blob: 3b149a82ba8241d6fa505daaa19c343e3fd9bd6f [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 Lindstrombf555ba2001-01-18 02:04:35 +000028RCSID("$OpenBSD: radix.c,v 1.15 2001/01/16 23:58:09 deraadt 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 Lindstrom46c16222000-12-22 01:43:59 +000033typedef u_char my_u_char;
34typedef u_int my_u_int32_t;
35typedef u_short my_u_short;
Damien Millerd4a8b7e1999-10-27 13:42:43 +100036
37/* Nasty macros from BIND-4.9.2 */
38
39#define GETSHORT(s, cp) { \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000040 register my_u_char *t_cp = (my_u_char *)(cp); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100041 (s) = (((my_u_short)t_cp[0]) << 8) \
42 | (((my_u_short)t_cp[1])) \
43 ; \
44 (cp) += 2; \
45}
46
47#define GETLONG(l, cp) { \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000048 register my_u_char *t_cp = (my_u_char *)(cp); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100049 (l) = (((my_u_int32_t)t_cp[0]) << 24) \
50 | (((my_u_int32_t)t_cp[1]) << 16) \
51 | (((my_u_int32_t)t_cp[2]) << 8) \
52 | (((my_u_int32_t)t_cp[3])) \
53 ; \
54 (cp) += 4; \
55}
56
57#define PUTSHORT(s, cp) { \
58 register my_u_short t_s = (my_u_short)(s); \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000059 register my_u_char *t_cp = (my_u_char *)(cp); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100060 *t_cp++ = t_s >> 8; \
61 *t_cp = t_s; \
62 (cp) += 2; \
63}
64
65#define PUTLONG(l, cp) { \
66 register my_u_int32_t t_l = (my_u_int32_t)(l); \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000067 register my_u_char *t_cp = (my_u_char *)(cp); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100068 *t_cp++ = t_l >> 24; \
69 *t_cp++ = t_l >> 16; \
70 *t_cp++ = t_l >> 8; \
71 *t_cp = t_l; \
72 (cp) += 4; \
73}
74
75#define GETSTRING(s, p, p_l) { \
Ben Lindstrombf555ba2001-01-18 02:04:35 +000076 register char *p_targ = (p) + p_l; \
77 register char *s_c = (s); \
78 register char *p_c = (p); \
Damien Millerd4a8b7e1999-10-27 13:42:43 +100079 while (*p_c && (p_c < p_targ)) { \
80 *s_c++ = *p_c++; \
81 } \
82 if (p_c == p_targ) { \
83 return 1; \
84 } \
85 *s_c = *p_c++; \
86 (p_l) = (p_l) - (p_c - (p)); \
87 (p) = p_c; \
88}
89
90
Damien Miller4af51302000-04-16 11:18:38 +100091int
Ben Lindstrom46c16222000-12-22 01:43:59 +000092creds_to_radix(CREDENTIALS *creds, u_char *buf, size_t buflen)
Damien Millerd4a8b7e1999-10-27 13:42:43 +100093{
Damien Miller95def091999-11-25 00:26:21 +110094 char *p, *s;
95 int len;
96 char temp[2048];
Damien Millerd4a8b7e1999-10-27 13:42:43 +100097
Damien Miller95def091999-11-25 00:26:21 +110098 p = temp;
99 *p++ = 1; /* version */
100 s = creds->service;
101 while (*s)
102 *p++ = *s++;
103 *p++ = *s;
104 s = creds->instance;
105 while (*s)
106 *p++ = *s++;
107 *p++ = *s;
108 s = creds->realm;
109 while (*s)
110 *p++ = *s++;
111 *p++ = *s;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000112
Damien Miller95def091999-11-25 00:26:21 +1100113 s = creds->pname;
114 while (*s)
115 *p++ = *s++;
116 *p++ = *s;
117 s = creds->pinst;
118 while (*s)
119 *p++ = *s++;
120 *p++ = *s;
121 /* Null string to repeat the realm. */
122 *p++ = '\0';
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000123
Damien Miller95def091999-11-25 00:26:21 +1100124 PUTLONG(creds->issue_date, p);
125 {
Ben Lindstrom46c16222000-12-22 01:43:59 +0000126 u_int endTime;
127 endTime = (u_int) krb_life_to_time(creds->issue_date,
Damien Miller95def091999-11-25 00:26:21 +1100128 creds->lifetime);
129 PUTLONG(endTime, p);
130 }
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000131
Damien Miller95def091999-11-25 00:26:21 +1100132 memcpy(p, &creds->session, sizeof(creds->session));
133 p += sizeof(creds->session);
134
135 PUTSHORT(creds->kvno, p);
136 PUTLONG(creds->ticket_st.length, p);
137
138 memcpy(p, creds->ticket_st.dat, creds->ticket_st.length);
139 p += creds->ticket_st.length;
140 len = p - temp;
141
Ben Lindstrom46c16222000-12-22 01:43:59 +0000142 return (uuencode((u_char *)temp, len, (char *)buf, buflen));
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000143}
144
Damien Miller4af51302000-04-16 11:18:38 +1000145int
Damien Miller95def091999-11-25 00:26:21 +1100146radix_to_creds(const char *buf, CREDENTIALS *creds)
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000147{
148
Damien Miller95def091999-11-25 00:26:21 +1100149 char *p;
150 int len, tl;
151 char version;
152 char temp[2048];
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000153
Ben Lindstrom46c16222000-12-22 01:43:59 +0000154 len = uudecode(buf, (u_char *)temp, sizeof(temp));
Damien Millere247cc42000-05-07 12:03:14 +1000155 if (len < 0)
Damien Miller95def091999-11-25 00:26:21 +1100156 return 0;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000157
Damien Miller95def091999-11-25 00:26:21 +1100158 p = temp;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000159
Damien Miller95def091999-11-25 00:26:21 +1100160 /* check version and length! */
161 if (len < 1)
162 return 0;
163 version = *p;
164 p++;
165 len--;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000166
Damien Miller95def091999-11-25 00:26:21 +1100167 GETSTRING(creds->service, p, len);
168 GETSTRING(creds->instance, p, len);
169 GETSTRING(creds->realm, p, len);
170
171 GETSTRING(creds->pname, p, len);
172 GETSTRING(creds->pinst, p, len);
173 /* Ignore possibly different realm. */
174 while (*p && len)
175 p++, len--;
176 if (len == 0)
177 return 0;
178 p++, len--;
179
180 /* Enough space for remaining fixed-length parts? */
181 if (len < (4 + 4 + sizeof(creds->session) + 2 + 4))
182 return 0;
183
184 GETLONG(creds->issue_date, p);
185 len -= 4;
186 {
Ben Lindstrom46c16222000-12-22 01:43:59 +0000187 u_int endTime;
Damien Miller95def091999-11-25 00:26:21 +1100188 GETLONG(endTime, p);
189 len -= 4;
190 creds->lifetime = krb_time_to_life(creds->issue_date, endTime);
191 }
192
193 memcpy(&creds->session, p, sizeof(creds->session));
194 p += sizeof(creds->session);
195 len -= sizeof(creds->session);
196
197 GETSHORT(creds->kvno, p);
198 len -= 2;
199 GETLONG(creds->ticket_st.length, p);
200 len -= 4;
201
202 tl = creds->ticket_st.length;
203 if (tl < 0 || tl > len || tl > sizeof(creds->ticket_st.dat))
204 return 0;
205
206 memcpy(creds->ticket_st.dat, p, tl);
207 p += tl;
208 len -= tl;
209
210 return 1;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000211}
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000212#endif /* AFS */