util_context.c

   1 /*
   2  * Copyright (c) 2010, JANET(UK)
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  *
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  *
  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.
  15  *
  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.
  19  *
  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
  30  * SUCH DAMAGE.
  31  */
  32
  33 #include "gssapiP_eap.h"
  34
  35 OM_uint32
  36 gssEapAllocContext(OM_uint32 *minor,
  37                    gss_ctx_id_t *pCtx)
  38 {
  39     OM_uint32 tmpMinor;
  40     gss_ctx_id_t ctx;
  41
  42     assert(*pCtx == GSS_C_NO_CONTEXT);
  43
  44     ctx = (gss_ctx_id_t)GSSEAP_CALLOC(1, sizeof(*ctx));
  45     if (ctx == NULL) {
  46         *minor = ENOMEM;
  47         return GSS_S_FAILURE;
  48     }
  49
  50     if (GSSEAP_MUTEX_INIT(&ctx->mutex) != 0) {
  51         *minor = errno;
  52         gssEapReleaseContext(&tmpMinor, &ctx);
  53         return GSS_S_FAILURE;
  54     }
  55
  56     *minor = krb5_init_context(&ctx->kerberosCtx);
  57     if (*minor != 0) {
  58         gssEapReleaseContext(&tmpMinor, &ctx);
  59         return GSS_S_FAILURE;
  60     }
  61
  62     *pCtx = ctx;
  63
  64     return GSS_S_COMPLETE;
  65 }
  66
  67 static void
  68 releaseInitiatorContext(struct eap_gss_initiator_ctx *ctx)
  69 {
  70     eap_peer_sm_deinit(ctx->eap);
  71     wpabuf_free(ctx->eapReqData);
  72 }
  73
  74 static void
  75 releaseAcceptorContext(struct eap_gss_acceptor_ctx *ctx)
  76 {
  77 }
  78
  79 OM_uint32
  80 gssEapReleaseContext(OM_uint32 *minor,
  81                      gss_ctx_id_t *pCtx)
  82 {
  83     OM_uint32 major, tmpMinor;
  84     gss_ctx_id_t ctx = *pCtx;
  85
  86     if (ctx == GSS_C_NO_CONTEXT) {
  87         return GSS_S_COMPLETE;
  88     }
  89
  90     if (CTX_IS_INITIATOR(ctx)) {
  91         releaseInitiatorContext(&ctx->initiatorCtx);
  92     } else {
  93         releaseAcceptorContext(&ctx->acceptorCtx);
  94     }
  95
  96     if (ctx->rfc3961Key != NULL) {
  97         krb5_free_keyblock(ctx->kerberosCtx, ctx->rfc3961Key);
  98     }
  99
 100     if (ctx->kerberosCtx != NULL) {
 101         krb5_free_context(ctx->kerberosCtx);
 102     }
 103
 104     gssEapReleaseName(&tmpMinor, &ctx->initiatorName);
 105     gssEapReleaseName(&tmpMinor, &ctx->acceptorName);
 106     gss_release_oid(&tmpMinor, &ctx->mechanismUsed);
 107     sequenceFree(ctx->seqState);
 108
 109     GSSEAP_MUTEX_DESTROY(&ctx->mutex);
 110
 111     memset(ctx, 0, sizeof(*ctx));
 112     GSSEAP_FREE(ctx);
 113     *pCtx = GSS_C_NO_CONTEXT;
 114
 115     *minor = 0;
 116     return GSS_S_COMPLETE;
 117 }