mirror of
https://git.hardenedbsd.org/hardenedbsd/HardenedBSD.git
synced 2024-12-24 10:52:36 +01:00
215 lines
4.9 KiB
C
215 lines
4.9 KiB
C
/*
|
|
* Copyright (c) 1999 Dug Song. All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
|
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include "includes.h"
|
|
#include "uuencode.h"
|
|
|
|
RCSID("$OpenBSD: radix.c,v 1.17 2001/11/19 19:02:16 mpech Exp $");
|
|
|
|
#ifdef AFS
|
|
#include <krb.h>
|
|
|
|
#include <radix.h>
|
|
|
|
typedef u_char my_u_char;
|
|
typedef u_int my_u_int32_t;
|
|
typedef u_short my_u_short;
|
|
|
|
/* Nasty macros from BIND-4.9.2 */
|
|
|
|
#define GETSHORT(s, cp) { \
|
|
my_u_char *t_cp = (my_u_char *)(cp); \
|
|
(s) = (((my_u_short)t_cp[0]) << 8) \
|
|
| (((my_u_short)t_cp[1])) \
|
|
; \
|
|
(cp) += 2; \
|
|
}
|
|
|
|
#define GETLONG(l, cp) { \
|
|
my_u_char *t_cp = (my_u_char *)(cp); \
|
|
(l) = (((my_u_int32_t)t_cp[0]) << 24) \
|
|
| (((my_u_int32_t)t_cp[1]) << 16) \
|
|
| (((my_u_int32_t)t_cp[2]) << 8) \
|
|
| (((my_u_int32_t)t_cp[3])) \
|
|
; \
|
|
(cp) += 4; \
|
|
}
|
|
|
|
#define PUTSHORT(s, cp) { \
|
|
my_u_short t_s = (my_u_short)(s); \
|
|
my_u_char *t_cp = (my_u_char *)(cp); \
|
|
*t_cp++ = t_s >> 8; \
|
|
*t_cp = t_s; \
|
|
(cp) += 2; \
|
|
}
|
|
|
|
#define PUTLONG(l, cp) { \
|
|
my_u_int32_t t_l = (my_u_int32_t)(l); \
|
|
my_u_char *t_cp = (my_u_char *)(cp); \
|
|
*t_cp++ = t_l >> 24; \
|
|
*t_cp++ = t_l >> 16; \
|
|
*t_cp++ = t_l >> 8; \
|
|
*t_cp = t_l; \
|
|
(cp) += 4; \
|
|
}
|
|
|
|
#define GETSTRING(s, p, p_l) { \
|
|
char *p_targ = (p) + p_l; \
|
|
char *s_c = (s); \
|
|
char *p_c = (p); \
|
|
while (*p_c && (p_c < p_targ)) { \
|
|
*s_c++ = *p_c++; \
|
|
} \
|
|
if (p_c == p_targ) { \
|
|
return 1; \
|
|
} \
|
|
*s_c = *p_c++; \
|
|
(p_l) = (p_l) - (p_c - (p)); \
|
|
(p) = p_c; \
|
|
}
|
|
|
|
|
|
int
|
|
creds_to_radix(CREDENTIALS *creds, u_char *buf, size_t buflen)
|
|
{
|
|
char *p, *s;
|
|
int len;
|
|
char temp[2048];
|
|
|
|
p = temp;
|
|
*p++ = 1; /* version */
|
|
s = creds->service;
|
|
while (*s)
|
|
*p++ = *s++;
|
|
*p++ = *s;
|
|
s = creds->instance;
|
|
while (*s)
|
|
*p++ = *s++;
|
|
*p++ = *s;
|
|
s = creds->realm;
|
|
while (*s)
|
|
*p++ = *s++;
|
|
*p++ = *s;
|
|
|
|
s = creds->pname;
|
|
while (*s)
|
|
*p++ = *s++;
|
|
*p++ = *s;
|
|
s = creds->pinst;
|
|
while (*s)
|
|
*p++ = *s++;
|
|
*p++ = *s;
|
|
/* Null string to repeat the realm. */
|
|
*p++ = '\0';
|
|
|
|
PUTLONG(creds->issue_date, p);
|
|
{
|
|
u_int endTime;
|
|
endTime = (u_int) krb_life_to_time(creds->issue_date,
|
|
creds->lifetime);
|
|
PUTLONG(endTime, p);
|
|
}
|
|
|
|
memcpy(p, &creds->session, sizeof(creds->session));
|
|
p += sizeof(creds->session);
|
|
|
|
PUTSHORT(creds->kvno, p);
|
|
PUTLONG(creds->ticket_st.length, p);
|
|
|
|
memcpy(p, creds->ticket_st.dat, creds->ticket_st.length);
|
|
p += creds->ticket_st.length;
|
|
len = p - temp;
|
|
|
|
return (uuencode((u_char *)temp, len, (char *)buf, buflen));
|
|
}
|
|
|
|
int
|
|
radix_to_creds(const char *buf, CREDENTIALS *creds)
|
|
{
|
|
|
|
char *p;
|
|
int len, tl;
|
|
char version;
|
|
char temp[2048];
|
|
|
|
len = uudecode(buf, (u_char *)temp, sizeof(temp));
|
|
if (len < 0)
|
|
return 0;
|
|
|
|
p = temp;
|
|
|
|
/* check version and length! */
|
|
if (len < 1)
|
|
return 0;
|
|
version = *p;
|
|
p++;
|
|
len--;
|
|
|
|
GETSTRING(creds->service, p, len);
|
|
GETSTRING(creds->instance, p, len);
|
|
GETSTRING(creds->realm, p, len);
|
|
|
|
GETSTRING(creds->pname, p, len);
|
|
GETSTRING(creds->pinst, p, len);
|
|
/* Ignore possibly different realm. */
|
|
while (*p && len)
|
|
p++, len--;
|
|
if (len == 0)
|
|
return 0;
|
|
p++, len--;
|
|
|
|
/* Enough space for remaining fixed-length parts? */
|
|
if (len < (4 + 4 + sizeof(creds->session) + 2 + 4))
|
|
return 0;
|
|
|
|
GETLONG(creds->issue_date, p);
|
|
len -= 4;
|
|
{
|
|
u_int endTime;
|
|
GETLONG(endTime, p);
|
|
len -= 4;
|
|
creds->lifetime = krb_time_to_life(creds->issue_date, endTime);
|
|
}
|
|
|
|
memcpy(&creds->session, p, sizeof(creds->session));
|
|
p += sizeof(creds->session);
|
|
len -= sizeof(creds->session);
|
|
|
|
GETSHORT(creds->kvno, p);
|
|
len -= 2;
|
|
GETLONG(creds->ticket_st.length, p);
|
|
len -= 4;
|
|
|
|
tl = creds->ticket_st.length;
|
|
if (tl < 0 || tl > len || tl > sizeof(creds->ticket_st.dat))
|
|
return 0;
|
|
|
|
memcpy(creds->ticket_st.dat, p, tl);
|
|
p += tl;
|
|
len -= tl;
|
|
|
|
return 1;
|
|
}
|
|
#endif /* AFS */
|