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     *pCtx = ctx;
  57
  58     return GSS_S_COMPLETE;
  59 }
  60
  61 static void
  62 releaseInitiatorContext(struct eap_gss_initiator_ctx *ctx)
  63 {
  64     eap_peer_sm_deinit(ctx->eap);
  65     wpabuf_free(ctx->eapReqData);
  66 }
  67
  68 static void
  69 releaseAcceptorContext(struct eap_gss_acceptor_ctx *ctx)
  70 {
  71 }
  72
  73 OM_uint32
  74 gssEapReleaseContext(OM_uint32 *minor,
  75                      gss_ctx_id_t *pCtx)
  76 {
  77     OM_uint32 major, tmpMinor;
  78     gss_ctx_id_t ctx = *pCtx;
  79     krb5_context krbContext = NULL;
  80
  81     if (ctx == GSS_C_NO_CONTEXT) {
  82         return GSS_S_COMPLETE;
  83     }
  84
  85     gssEapKerberosInit(&tmpMinor, &krbContext);
  86
  87     if (CTX_IS_INITIATOR(ctx)) {
  88         releaseInitiatorContext(&ctx->initiatorCtx);
  89     } else {
  90         releaseAcceptorContext(&ctx->acceptorCtx);
  91     }
  92
  93     krb5_free_keyblock_contents(krbContext, &ctx->rfc3961Key);
  94     gssEapReleaseName(&tmpMinor, &ctx->initiatorName);
  95     gssEapReleaseName(&tmpMinor, &ctx->acceptorName);
  96     gss_release_oid(&tmpMinor, &ctx->mechanismUsed);
  97     sequenceFree(ctx->seqState);
  98
  99     GSSEAP_MUTEX_DESTROY(&ctx->mutex);
 100
 101     memset(ctx, 0, sizeof(*ctx));
 102     GSSEAP_FREE(ctx);
 103     *pCtx = GSS_C_NO_CONTEXT;
 104
 105     *minor = 0;
 106     return GSS_S_COMPLETE;
 107 }