2 * Copyright (c) 2011, 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
34 * Utility routines for context handles.
37 #include "gssapiP_eap.h"
40 gssEapAllocContext(OM_uint32 *minor,
46 GSSEAP_ASSERT(*pCtx == GSS_C_NO_CONTEXT);
48 ctx = (gss_ctx_id_t)GSSEAP_CALLOC(1, sizeof(*ctx));
54 if (GSSEAP_MUTEX_INIT(&ctx->mutex) != 0) {
55 *minor = GSSEAP_GET_LAST_ERROR();
56 gssEapReleaseContext(&tmpMinor, &ctx);
60 ctx->state = GSSEAP_STATE_INITIAL;
61 ctx->mechanismUsed = GSS_C_NO_OID;
64 * Integrity, confidentiality, sequencing and replay detection are
65 * always available. Regardless of what flags are requested in
66 * GSS_Init_sec_context, implementations MUST set the flag corresponding
67 * to these services in the output of GSS_Init_sec_context and
68 * GSS_Accept_sec_context.
70 ctx->gssFlags = GSS_C_TRANS_FLAG | /* exporting contexts */
71 GSS_C_INTEG_FLAG | /* integrity */
72 GSS_C_CONF_FLAG | /* confidentiality */
73 GSS_C_SEQUENCE_FLAG | /* sequencing */
74 GSS_C_REPLAY_FLAG; /* replay detection */
78 return GSS_S_COMPLETE;
82 releaseInitiatorContext(struct gss_eap_initiator_ctx *ctx)
84 eap_peer_sm_deinit(ctx->eap);
87 #ifdef GSSEAP_ENABLE_ACCEPTOR
89 releaseAcceptorContext(struct gss_eap_acceptor_ctx *ctx)
93 if (ctx->radConn != NULL)
94 rs_conn_destroy(ctx->radConn);
95 if (ctx->radContext != NULL)
96 rs_context_destroy(ctx->radContext);
97 if (ctx->radServer != NULL)
98 GSSEAP_FREE(ctx->radServer);
99 gss_release_buffer(&tmpMinor, &ctx->state);
100 if (ctx->vps != NULL)
101 gssEapRadiusFreeAvps(&tmpMinor, &ctx->vps);
103 #endif /* GSSEAP_ENABLE_ACCEPTOR */
106 gssEapReleaseContext(OM_uint32 *minor,
110 gss_ctx_id_t ctx = *pCtx;
111 krb5_context krbContext = NULL;
113 if (ctx == GSS_C_NO_CONTEXT) {
114 return GSS_S_COMPLETE;
117 gssEapKerberosInit(&tmpMinor, &krbContext);
119 #ifdef GSSEAP_ENABLE_REAUTH
120 if (ctx->flags & CTX_FLAG_KRB_REAUTH) {
121 gssDeleteSecContext(&tmpMinor, &ctx->reauthCtx, GSS_C_NO_BUFFER);
123 #endif /* GSSEAP_ENABLE_REAUTH */
124 if (CTX_IS_INITIATOR(ctx)) {
125 releaseInitiatorContext(&ctx->initiatorCtx);
127 #ifdef GSSEAP_ENABLE_ACCEPTOR
129 releaseAcceptorContext(&ctx->acceptorCtx);
131 #endif /* GSSEAP_ENABLE_ACCEPTOR */
133 krb5_free_keyblock_contents(krbContext, &ctx->rfc3961Key);
134 gssEapReleaseName(&tmpMinor, &ctx->initiatorName);
135 gssEapReleaseName(&tmpMinor, &ctx->acceptorName);
136 gssEapReleaseOid(&tmpMinor, &ctx->mechanismUsed);
137 sequenceFree(&tmpMinor, &ctx->seqState);
138 gssEapReleaseCred(&tmpMinor, &ctx->cred);
140 GSSEAP_MUTEX_DESTROY(&ctx->mutex);
142 memset(ctx, 0, sizeof(*ctx));
144 *pCtx = GSS_C_NO_CONTEXT;
147 return GSS_S_COMPLETE;
151 gssEapMakeToken(OM_uint32 *minor,
153 const gss_buffer_t innerToken,
154 enum gss_eap_token_type tokenType,
155 gss_buffer_t outputToken)
159 GSSEAP_ASSERT(ctx->mechanismUsed != GSS_C_NO_OID);
161 outputToken->length = tokenSize(ctx->mechanismUsed, innerToken->length);
162 outputToken->value = GSSEAP_MALLOC(outputToken->length);
163 if (outputToken->value == NULL) {
165 return GSS_S_FAILURE;
168 p = (unsigned char *)outputToken->value;
169 makeTokenHeader(ctx->mechanismUsed, innerToken->length, &p, tokenType);
170 memcpy(p, innerToken->value, innerToken->length);
173 return GSS_S_COMPLETE;
177 gssEapVerifyToken(OM_uint32 *minor,
179 const gss_buffer_t inputToken,
180 enum gss_eap_token_type *actualToken,
181 gss_buffer_t innerInputToken)
185 unsigned char *p = (unsigned char *)inputToken->value;
189 if (ctx->mechanismUsed != GSS_C_NO_OID) {
190 oid = ctx->mechanismUsed;
192 oidBuf.elements = NULL;
197 major = verifyTokenHeader(minor, oid, &bodySize, &p,
198 inputToken->length, actualToken);
199 if (GSS_ERROR(major))
202 if (ctx->mechanismUsed == GSS_C_NO_OID) {
203 major = gssEapCanonicalizeOid(minor, oid, 0, &ctx->mechanismUsed);
204 if (GSS_ERROR(major))
208 innerInputToken->length = bodySize;
209 innerInputToken->value = p;
212 return GSS_S_COMPLETE;
216 gssEapContextTime(OM_uint32 *minor,
217 gss_ctx_id_t context_handle,
222 if (context_handle->expiryTime == 0) {
223 *time_rec = GSS_C_INDEFINITE;
225 time_t now, lifetime;
228 lifetime = context_handle->expiryTime - now;
231 return GSS_S_CONTEXT_EXPIRED;
233 *time_rec = lifetime;
236 return GSS_S_COMPLETE;
240 gssEapMakeOrVerifyTokenMIC(OM_uint32 *minor,
242 gss_buffer_t tokenMIC,
246 gss_iov_buffer_desc *iov = NULL;
248 enum gss_eap_token_type tokType;
249 OM_uint32 micTokType;
250 unsigned char wireTokType[2];
251 unsigned char *innerTokTypes = NULL, *innerTokLengths = NULL;
252 const struct gss_eap_token_buffer_set *tokens;
254 tokens = verifyMIC ? ctx->inputTokens : ctx->outputTokens;
256 GSSEAP_ASSERT(tokens != NULL);
258 iov = GSSEAP_CALLOC(2 + (3 * tokens->buffers.count) + 1, sizeof(*iov));
260 major = GSS_S_FAILURE;
265 innerTokTypes = GSSEAP_MALLOC(4 * tokens->buffers.count);
266 if (innerTokTypes == NULL) {
268 major = GSS_S_FAILURE;
272 innerTokLengths = GSSEAP_MALLOC(4 * tokens->buffers.count);
273 if (innerTokLengths == NULL) {
274 major = GSS_S_FAILURE;
280 GSSEAP_ASSERT(ctx->mechanismUsed != GSS_C_NO_OID);
281 iov[i].type = GSS_IOV_BUFFER_TYPE_DATA;
282 iov[i].buffer.length = ctx->mechanismUsed->length;
283 iov[i].buffer.value = ctx->mechanismUsed->elements;
287 if (CTX_IS_INITIATOR(ctx) ^ verifyMIC) {
288 tokType = TOK_TYPE_INITIATOR_CONTEXT;
289 micTokType = ITOK_TYPE_INITIATOR_MIC;
291 tokType = TOK_TYPE_ACCEPTOR_CONTEXT;
292 micTokType = ITOK_TYPE_ACCEPTOR_MIC;
294 store_uint16_be(tokType, wireTokType);
296 iov[i].type = GSS_IOV_BUFFER_TYPE_DATA;
297 iov[i].buffer.length = sizeof(wireTokType);
298 iov[i].buffer.value = wireTokType;
301 for (j = 0; j < tokens->buffers.count; j++) {
303 (tokens->types[j] & ITOK_TYPE_MASK) == micTokType)
304 continue; /* will use this slot for trailer */
306 iov[i].type = GSS_IOV_BUFFER_TYPE_DATA;
307 iov[i].buffer.length = 4;
308 iov[i].buffer.value = &innerTokTypes[j * 4];
309 store_uint32_be(tokens->types[j] & ~(ITOK_FLAG_VERIFIED),
310 iov[i].buffer.value);
313 iov[i].type = GSS_IOV_BUFFER_TYPE_DATA;
314 iov[i].buffer.length = 4;
315 iov[i].buffer.value = &innerTokLengths[j * 4];
316 store_uint32_be(tokens->buffers.elements[j].length,
317 iov[i].buffer.value);
320 iov[i].type = GSS_IOV_BUFFER_TYPE_DATA;
321 iov[i].buffer = tokens->buffers.elements[j];
326 GSSEAP_ASSERT(tokenMIC->length >= 16);
328 GSSEAP_ASSERT(i < 2 + (3 * tokens->buffers.count));
330 iov[i].type = GSS_IOV_BUFFER_TYPE_HEADER;
331 iov[i].buffer = *tokenMIC;
334 major = gssEapUnwrapOrVerifyMIC(minor, ctx, NULL, NULL,
335 iov, i, TOK_TYPE_MIC);
337 iov[i++].type = GSS_IOV_BUFFER_TYPE_HEADER | GSS_IOV_BUFFER_FLAG_ALLOCATE;
338 major = gssEapWrapOrGetMIC(minor, ctx, FALSE, NULL,
339 iov, i, TOK_TYPE_MIC);
340 if (!GSS_ERROR(major))
341 *tokenMIC = iov[i - 1].buffer;
346 gssEapReleaseIov(iov, tokens->buffers.count);
347 if (innerTokTypes != NULL)
348 GSSEAP_FREE(innerTokTypes);
349 if (innerTokLengths != NULL)
350 GSSEAP_FREE(innerTokLengths);
356 gssEapMakeTokenMIC(OM_uint32 *minor,
358 gss_buffer_t tokenMIC)
360 tokenMIC->length = 0;
361 tokenMIC->value = NULL;
363 return gssEapMakeOrVerifyTokenMIC(minor, ctx, tokenMIC, FALSE);
367 gssEapVerifyTokenMIC(OM_uint32 *minor,
369 const gss_buffer_t tokenMIC)
371 if (tokenMIC->length < 16) {
372 *minor = GSSEAP_TOK_TRUNC;
373 return GSS_S_BAD_SIG;
376 return gssEapMakeOrVerifyTokenMIC(minor, ctx, tokenMIC, TRUE);