2 * Copyright (c) 2010, JANET(UK)
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of JANET(UK) nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
21 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * Portions Copyright 2003-2010 Massachusetts Institute of Technology.
34 * All Rights Reserved.
36 * Export of this software from the United States of America may
37 * require a specific license from the United States Government.
38 * It is the responsibility of any person or organization contemplating
39 * export to obtain such a license before exporting.
41 * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
42 * distribute this software and its documentation for any purpose and
43 * without fee is hereby granted, provided that the above copyright
44 * notice appear in all copies and that both that copyright notice and
45 * this permission notice appear in supporting documentation, and that
46 * the name of M.I.T. not be used in advertising or publicity pertaining
47 * to distribution of the software without specific, written prior
48 * permission. Furthermore if you modify this software you must label
49 * your software as modified software and not distribute it in such a
50 * fashion that it might be confused with the original M.I.T. software.
51 * M.I.T. makes no representations about the suitability of
52 * this software for any purpose. It is provided "as is" without express
53 * or implied warranty.
69 #include "util_saml.h"
71 #ifndef MIN /* Usually found in <sys/param.h>. */
72 #define MIN(_a,_b) ((_a)<(_b)?(_a):(_b))
75 #define KRB_KEY_TYPE(key) ((key)->enctype)
76 #define KRB_KEY_DATA(key) ((key)->contents)
77 #define KRB_KEY_LENGTH(key) ((key)->length)
78 #define KRB_KEY_INIT(key) do { \
79 KRB_KEY_TYPE(key) = ENCTYPE_NULL; \
80 KRB_KEY_DATA(key) = NULL; \
81 KRB_KEY_LENGTH(key) = 0; \
84 enum gss_eap_token_type {
85 TOK_TYPE_NONE = 0x0000, /* no token */
86 TOK_TYPE_MIC = 0x0404, /* RFC 4121 MIC token */
87 TOK_TYPE_WRAP = 0x0504, /* RFC 4121 wrap token */
88 TOK_TYPE_EXPORT_NAME = 0x0401, /* RFC 2743 exported name */
89 TOK_TYPE_EXPORT_NAME_COMPOSITE = 0x0402, /* draft-ietf-kitten-gss-naming */
90 TOK_TYPE_DELETE_CONTEXT = 0x0405, /* RFC 2743 delete context */
91 TOK_TYPE_EAP_RESP = 0x0601, /* draft-howlett-eap-gss */
92 TOK_TYPE_EAP_REQ = 0x0602, /* draft-howlett-eap-gss */
93 TOK_TYPE_GSS_CB = 0x0603, /* draft-howlett-eap-gss */
96 #define EAP_EXPORT_CONTEXT_V1 1
100 makeStringBuffer(OM_uint32 *minor,
102 gss_buffer_t buffer);
105 bufferToString(OM_uint32 *minor,
106 const gss_buffer_t buffer,
110 duplicateBuffer(OM_uint32 *minor,
111 const gss_buffer_t src,
115 bufferEqual(const gss_buffer_t b1, const gss_buffer_t b2)
117 return (b1->length == b2->length &&
118 memcmp(b1->value, b2->value, b2->length) == 0);
122 bufferEqualString(const gss_buffer_t b1, const char *s)
126 b2.length = strlen(s);
127 b2.value = (char *)s;
129 return bufferEqual(b1, &b2);
134 gssEapSign(krb5_context context,
138 krb5_keyusage sign_usage,
139 gss_iov_buffer_desc *iov,
143 gssEapVerify(krb5_context context,
147 krb5_keyusage sign_usage,
148 gss_iov_buffer_desc *iov,
154 gssEapEncodeGssChannelBindings(OM_uint32 *minor,
155 gss_channel_bindings_t chanBindings,
156 gss_buffer_t encodedBindings);
160 OM_uint32 gssEapAllocContext(OM_uint32 *minor, gss_ctx_id_t *pCtx);
161 OM_uint32 gssEapReleaseContext(OM_uint32 *minor, gss_ctx_id_t *pCtx);
164 gssEapMakeToken(OM_uint32 *minor,
166 const gss_buffer_t innerToken,
167 enum gss_eap_token_type tokenType,
168 gss_buffer_t outputToken);
171 gssEapVerifyToken(OM_uint32 *minor,
173 const gss_buffer_t inputToken,
174 enum gss_eap_token_type tokenType,
175 gss_buffer_t innerInputToken);
178 OM_uint32 gssEapAllocCred(OM_uint32 *minor, gss_cred_id_t *pCred);
179 OM_uint32 gssEapReleaseCred(OM_uint32 *minor, gss_cred_id_t *pCred);
182 gssEapAcquireCred(OM_uint32 *minor,
183 const gss_name_t desiredName,
184 const gss_buffer_t password,
186 const gss_OID_set desiredMechs,
188 gss_cred_id_t *pCred,
189 gss_OID_set *pActualMechs,
192 int gssEapCredAvailable(gss_cred_id_t cred, gss_OID mech);
196 gssEapEncrypt(krb5_context context, int dce_style, size_t ec,
197 size_t rrc, krb5_keyblock *key, int usage, krb5_pointer iv,
198 gss_iov_buffer_desc *iov, int iov_count);
201 gssEapDecrypt(krb5_context context, int dce_style, size_t ec,
202 size_t rrc, krb5_keyblock *key, int usage, krb5_pointer iv,
203 gss_iov_buffer_desc *iov, int iov_count);
206 gssEapMapCryptoFlag(OM_uint32 type);
209 gssEapLocateIov(gss_iov_buffer_desc *iov,
214 gssEapIovMessageLength(gss_iov_buffer_desc *iov,
217 size_t *assoc_data_length);
220 gssEapReleaseIov(gss_iov_buffer_desc *iov, int iov_count);
223 gssEapIsIntegrityOnly(gss_iov_buffer_desc *iov, int iov_count);
226 gssEapAllocIov(gss_iov_buffer_t iov, size_t size);
229 gssEapDeriveRfc3961Key(OM_uint32 *minor,
230 const unsigned char *key,
232 krb5_enctype enctype,
233 krb5_keyblock *pKey);
237 gssEapKerberosInit(OM_uint32 *minor, krb5_context *context);
240 rfc3961ChecksumTypeForKey(OM_uint32 *minor,
242 krb5_cksumtype *cksumtype);
244 #define GSSEAP_KRB_INIT(ctx) do { \
245 OM_uint32 tmpMajor; \
246 tmpMajor = gssEapKerberosInit(minor, ctx); \
247 if (GSS_ERROR(tmpMajor)) { \
254 gssEapInternalizeOid(const gss_OID oid,
255 gss_OID *const pInternalizedOid);
258 gssEapDefaultMech(OM_uint32 *minor,
262 gssEapIndicateMechs(OM_uint32 *minor,
266 gssEapEnctypeToOid(OM_uint32 *minor,
267 krb5_enctype enctype,
271 gssEapOidToEnctype(OM_uint32 *minor,
273 krb5_enctype *enctype);
276 gssEapIsMechanismOid(const gss_OID oid);
279 gssEapIsConcreteMechanismOid(const gss_OID oid);
282 gssEapValidateMechs(OM_uint32 *minor,
283 const gss_OID_set mechs);
286 enum gss_eap_attribute_type {
288 ATTR_TYPE_SAML_AAA_ASSERTION = 1,
289 ATTR_TYPE_SAML_ATTR = 2,
290 ATTR_TYPE_RADIUS_AVP = 3
293 OM_uint32 gssEapAllocName(OM_uint32 *minor, gss_name_t *pName);
294 OM_uint32 gssEapReleaseName(OM_uint32 *minor, gss_name_t *pName);
295 OM_uint32 gssEapExportName(OM_uint32 *minor,
296 const gss_name_t name,
297 gss_buffer_t exportedName,
299 OM_uint32 gssEapImportName(OM_uint32 *minor,
300 const gss_buffer_t input_name_buffer,
301 gss_OID input_name_type,
302 gss_name_t *output_name);
304 enum gss_eap_attribute_type
305 gssEapAttributePrefixToType(const gss_buffer_t prefix);
307 gssEapAttributeTypeToPrefix(enum gss_eap_attribute_type type);
309 decomposeAttributeName(OM_uint32 *minor,
310 const gss_buffer_t attribute,
312 gss_buffer_t suffix);
314 composeAttributeName(OM_uint32 *minor,
315 const gss_buffer_t prefix,
316 const gss_buffer_t suffix,
317 gss_buffer_t attribute);
321 composeOid(OM_uint32 *minor_status,
328 decomposeOid(OM_uint32 *minor_status,
335 duplicateOid(OM_uint32 *minor_status,
336 const gss_OID_desc * const oid,
340 duplicateOidSet(OM_uint32 *minor,
341 const gss_OID_set src,
345 oidEqual(const gss_OID_desc *o1, const gss_OID_desc *o2)
347 if (o1 == GSS_C_NO_OID)
348 return (o2 == GSS_C_NO_OID);
349 else if (o2 == GSS_C_NO_OID)
350 return (o1 == GSS_C_NO_OID);
352 return (o1->length == o2->length &&
353 memcmp(o1->elements, o2->elements, o1->length) == 0);
356 /* util_ordering.c */
358 sequenceInternalize(OM_uint32 *minor,
364 sequenceExternalize(OM_uint32 *minor,
370 sequenceSize(void *vqueue);
373 sequenceFree(OM_uint32 *minor, void **vqueue);
376 sequenceCheck(OM_uint32 *minor, void **vqueue, uint64_t seqnum);
379 sequenceInit(OM_uint32 *minor, void **vqueue, uint64_t seqnum,
380 int do_replay, int do_sequence, int wide_nums);
384 tokenSize(const gss_OID_desc *mech, size_t body_size);
387 makeTokenHeader(const gss_OID_desc *mech,
390 enum gss_eap_token_type tok_type);
393 verifyTokenHeader(OM_uint32 *minor,
396 unsigned char **buf_in,
398 enum gss_eap_token_type tok_type);
401 #define GSSEAP_CALLOC(count, size) (calloc((count), (size)))
402 #define GSSEAP_FREE(ptr) (free((ptr)))
403 #define GSSEAP_MALLOC(size) (malloc((size)))
404 #define GSSEAP_REALLOC(ptr, size) (realloc((ptr), (size)))
406 #define GSSEAP_NOT_IMPLEMENTED do { \
407 assert(0 && "not implemented"); \
409 return GSS_S_FAILURE; \
414 #define GSSEAP_MUTEX pthread_mutex_t
415 #define GSSEAP_MUTEX_INITIALIZER PTHREAD_MUTEX_INITIALIZER
417 #define GSSEAP_MUTEX_INIT(m) pthread_mutex_init((m), NULL)
418 #define GSSEAP_MUTEX_DESTROY(m) pthread_mutex_destroy((m))
419 #define GSSEAP_MUTEX_LOCK(m) pthread_mutex_lock((m))
420 #define GSSEAP_MUTEX_UNLOCK(m) pthread_mutex_unlock((m))
422 #define GSSEAP_THREAD_KEY pthread_key_t
423 #define GSSEAP_KEY_CREATE(k, d) pthread_key_create((k), (d))
424 #define GSSEAP_GETSPECIFIC(k) pthread_getspecific((k))
425 #define GSSEAP_SETSPECIFIC(k, d) pthread_setspecific((k), (d))
427 #define GSSEAP_THREAD_ONCE pthread_once_t
428 #define GSSEAP_ONCE(o, i) pthread_once((o), (i))
429 #define GSSEAP_ONCE_INITIALIZER PTHREAD_ONCE_INIT
431 /* Helper functions */
433 store_uint16_be(uint16_t val, void *vp)
435 unsigned char *p = (unsigned char *)vp;
437 p[0] = (val >> 8) & 0xff;
438 p[1] = (val ) & 0xff;
441 static inline uint16_t
442 load_uint16_be(const void *cvp)
444 const unsigned char *p = (const unsigned char *)cvp;
446 return (p[1] | (p[0] << 8));
450 store_uint32_be(uint32_t val, void *vp)
452 unsigned char *p = (unsigned char *)vp;
454 p[0] = (val >> 24) & 0xff;
455 p[1] = (val >> 16) & 0xff;
456 p[2] = (val >> 8) & 0xff;
457 p[3] = (val ) & 0xff;
460 static inline uint32_t
461 load_uint32_be(const void *cvp)
463 const unsigned char *p = (const unsigned char *)cvp;
465 return (p[3] | (p[2] << 8)
466 | ((uint32_t) p[1] << 16)
467 | ((uint32_t) p[0] << 24));
471 store_uint64_be(uint64_t val, void *vp)
473 unsigned char *p = (unsigned char *)vp;
475 p[0] = (unsigned char)((val >> 56) & 0xff);
476 p[1] = (unsigned char)((val >> 48) & 0xff);
477 p[2] = (unsigned char)((val >> 40) & 0xff);
478 p[3] = (unsigned char)((val >> 32) & 0xff);
479 p[4] = (unsigned char)((val >> 24) & 0xff);
480 p[5] = (unsigned char)((val >> 16) & 0xff);
481 p[6] = (unsigned char)((val >> 8) & 0xff);
482 p[7] = (unsigned char)((val ) & 0xff);
485 static inline uint64_t
486 load_uint64_be(const void *cvp)
488 const unsigned char *p = (const unsigned char *)cvp;
490 return ((uint64_t)load_uint32_be(p) << 32) | load_uint32_be(p + 4);
493 static inline unsigned char *
494 store_buffer(gss_buffer_t buffer, void *vp, int wide_nums)
496 unsigned char *p = (unsigned char *)vp;
499 store_uint64_be(buffer->length, p);
502 store_uint32_be(buffer->length, p);
506 if (buffer->value != NULL) {
507 memcpy(p, buffer->value, buffer->length);
514 static inline unsigned char *
515 load_buffer(const void *cvp, size_t length, gss_buffer_t buffer)
518 buffer->value = GSSEAP_MALLOC(length);
519 if (buffer->value == NULL)
521 buffer->length = length;
522 memcpy(buffer->value, cvp, length);
523 return (unsigned char *)cvp + length;
526 static inline unsigned char *
527 store_oid(gss_OID oid, void *vp)
531 if (oid != GSS_C_NO_OID) {
532 buf.length = oid->length;
533 buf.value = oid->elements;
539 return store_buffer(&buf, vp, FALSE);
546 #endif /* _UTIL_H_ */