blob: 26b1ebe52f0c858fc4702fee053733ad7ac719ce [file] [log] [blame]
Damien Millerd4a8b7e1999-10-27 13:42:43 +10001/*
Damien Millere4340be2000-09-16 13:29:08 +11002 * Copyright (c) 1999 Dug Song. All rights reserved.
Damien Miller4af51302000-04-16 11:18:38 +10003 *
Damien Millere4340be2000-09-16 13:29:08 +11004 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
6 * are met:
7 * 1. Redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer.
9 * 2. Redistributions in binary form must reproduce the above copyright
10 * notice, this list of conditions and the following disclaimer in the
11 * documentation and/or other materials provided with the distribution.
12 *
13 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
14 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
15 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
16 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
17 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
18 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
19 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
20 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
21 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
22 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
Damien Miller95def091999-11-25 00:26:21 +110023 */
Damien Millerd4a8b7e1999-10-27 13:42:43 +100024
Damien Millerd4a8b7e1999-10-27 13:42:43 +100025#include "includes.h"
Damien Millereba71ba2000-04-29 23:57:08 +100026#include "uuencode.h"
Damien Millerd4a8b7e1999-10-27 13:42:43 +100027
Ben Lindstrombba81212001-06-25 05:01:22 +000028RCSID("$OpenBSD: radix.c,v 1.16 2001/06/23 15:12:19 itojun Exp $");
Damien Millerbf7f4662000-06-23 10:16:38 +100029
Damien Millerd4a8b7e1999-10-27 13:42:43 +100030#ifdef AFS
31#include <krb.h>
32
Ben Lindstrombba81212001-06-25 05:01:22 +000033#include <radix.h>
34
Ben Lindstrom46c16222000-12-22 01:43:59 +000035typedef u_char my_u_char;
36typedef u_int my_u_int32_t;
37typedef u_short my_u_short;
Damien Millerd4a8b7e1999-10-27 13:42:43 +100038
39/* Nasty macros from BIND-4.9.2 */
40
41#define GETSHORT(s, cp) { \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000042 register my_u_char *t_cp = (my_u_char *)(cp); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100043 (s) = (((my_u_short)t_cp[0]) << 8) \
44 | (((my_u_short)t_cp[1])) \
45 ; \
46 (cp) += 2; \
47}
48
49#define GETLONG(l, cp) { \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000050 register my_u_char *t_cp = (my_u_char *)(cp); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100051 (l) = (((my_u_int32_t)t_cp[0]) << 24) \
52 | (((my_u_int32_t)t_cp[1]) << 16) \
53 | (((my_u_int32_t)t_cp[2]) << 8) \
54 | (((my_u_int32_t)t_cp[3])) \
55 ; \
56 (cp) += 4; \
57}
58
59#define PUTSHORT(s, cp) { \
60 register my_u_short t_s = (my_u_short)(s); \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000061 register my_u_char *t_cp = (my_u_char *)(cp); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100062 *t_cp++ = t_s >> 8; \
63 *t_cp = t_s; \
64 (cp) += 2; \
65}
66
67#define PUTLONG(l, cp) { \
68 register my_u_int32_t t_l = (my_u_int32_t)(l); \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000069 register my_u_char *t_cp = (my_u_char *)(cp); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100070 *t_cp++ = t_l >> 24; \
71 *t_cp++ = t_l >> 16; \
72 *t_cp++ = t_l >> 8; \
73 *t_cp = t_l; \
74 (cp) += 4; \
75}
76
77#define GETSTRING(s, p, p_l) { \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000078 register char *p_targ = (p) + p_l; \
79 register char *s_c = (s); \
80 register char *p_c = (p); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100081 while (*p_c && (p_c < p_targ)) { \
82 *s_c++ = *p_c++; \
83 } \
84 if (p_c == p_targ) { \
85 return 1; \
86 } \
87 *s_c = *p_c++; \
88 (p_l) = (p_l) - (p_c - (p)); \
89 (p) = p_c; \
90}
91
92
Damien Miller4af51302000-04-16 11:18:38 +100093int
Ben Lindstrom46c16222000-12-22 01:43:59 +000094creds_to_radix(CREDENTIALS *creds, u_char *buf, size_t buflen)
Damien Millerd4a8b7e1999-10-27 13:42:43 +100095{
Damien Miller95def091999-11-25 00:26:21 +110096 char *p, *s;
97 int len;
98 char temp[2048];
Damien Millerd4a8b7e1999-10-27 13:42:43 +100099
Damien Miller95def091999-11-25 00:26:21 +1100100 p = temp;
101 *p++ = 1; /* version */
102 s = creds->service;
103 while (*s)
104 *p++ = *s++;
105 *p++ = *s;
106 s = creds->instance;
107 while (*s)
108 *p++ = *s++;
109 *p++ = *s;
110 s = creds->realm;
111 while (*s)
112 *p++ = *s++;
113 *p++ = *s;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000114
Damien Miller95def091999-11-25 00:26:21 +1100115 s = creds->pname;
116 while (*s)
117 *p++ = *s++;
118 *p++ = *s;
119 s = creds->pinst;
120 while (*s)
121 *p++ = *s++;
122 *p++ = *s;
123 /* Null string to repeat the realm. */
124 *p++ = '\0';
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000125
Damien Miller95def091999-11-25 00:26:21 +1100126 PUTLONG(creds->issue_date, p);
127 {
Ben Lindstrom46c16222000-12-22 01:43:59 +0000128 u_int endTime;
129 endTime = (u_int) krb_life_to_time(creds->issue_date,
Damien Miller95def091999-11-25 00:26:21 +1100130 creds->lifetime);
131 PUTLONG(endTime, p);
132 }
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000133
Damien Miller95def091999-11-25 00:26:21 +1100134 memcpy(p, &creds->session, sizeof(creds->session));
135 p += sizeof(creds->session);
136
137 PUTSHORT(creds->kvno, p);
138 PUTLONG(creds->ticket_st.length, p);
139
140 memcpy(p, creds->ticket_st.dat, creds->ticket_st.length);
141 p += creds->ticket_st.length;
142 len = p - temp;
143
Ben Lindstrom46c16222000-12-22 01:43:59 +0000144 return (uuencode((u_char *)temp, len, (char *)buf, buflen));
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000145}
146
Damien Miller4af51302000-04-16 11:18:38 +1000147int
Damien Miller95def091999-11-25 00:26:21 +1100148radix_to_creds(const char *buf, CREDENTIALS *creds)
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000149{
150
Damien Miller95def091999-11-25 00:26:21 +1100151 char *p;
152 int len, tl;
153 char version;
154 char temp[2048];
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000155
Ben Lindstrom46c16222000-12-22 01:43:59 +0000156 len = uudecode(buf, (u_char *)temp, sizeof(temp));
Damien Millere247cc42000-05-07 12:03:14 +1000157 if (len < 0)
Damien Miller95def091999-11-25 00:26:21 +1100158 return 0;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000159
Damien Miller95def091999-11-25 00:26:21 +1100160 p = temp;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000161
Damien Miller95def091999-11-25 00:26:21 +1100162 /* check version and length! */
163 if (len < 1)
164 return 0;
165 version = *p;
166 p++;
167 len--;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000168
Damien Miller95def091999-11-25 00:26:21 +1100169 GETSTRING(creds->service, p, len);
170 GETSTRING(creds->instance, p, len);
171 GETSTRING(creds->realm, p, len);
172
173 GETSTRING(creds->pname, p, len);
174 GETSTRING(creds->pinst, p, len);
175 /* Ignore possibly different realm. */
176 while (*p && len)
177 p++, len--;
178 if (len == 0)
179 return 0;
180 p++, len--;
181
182 /* Enough space for remaining fixed-length parts? */
183 if (len < (4 + 4 + sizeof(creds->session) + 2 + 4))
184 return 0;
185
186 GETLONG(creds->issue_date, p);
187 len -= 4;
188 {
Ben Lindstrom46c16222000-12-22 01:43:59 +0000189 u_int endTime;
Damien Miller95def091999-11-25 00:26:21 +1100190 GETLONG(endTime, p);
191 len -= 4;
192 creds->lifetime = krb_time_to_life(creds->issue_date, endTime);
193 }
194
195 memcpy(&creds->session, p, sizeof(creds->session));
196 p += sizeof(creds->session);
197 len -= sizeof(creds->session);
198
199 GETSHORT(creds->kvno, p);
200 len -= 2;
201 GETLONG(creds->ticket_st.length, p);
202 len -= 4;
203
204 tl = creds->ticket_st.length;
205 if (tl < 0 || tl > len || tl > sizeof(creds->ticket_st.dat))
206 return 0;
207
208 memcpy(creds->ticket_st.dat, p, tl);
209 p += tl;
210 len -= tl;
211
212 return 1;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000213}
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000214#endif /* AFS */