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     *minor = krb5_init_context(&ctx->kerberosCtx);
  51     if (*minor != 0) {
  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
  80     if (ctx == GSS_C_NO_CONTEXT) {
  81         return GSS_S_COMPLETE;
  82     }
  83
  84     if (CTX_IS_INITIATOR(ctx)) {
  85         releaseInitiatorContext(&ctx->initiatorCtx);
  86     } else {
  87         releaseAcceptorContext(&ctx->acceptorCtx);
  88     }
  89
  90     if (ctx->rfc3961Key != NULL) {
  91         krb5_free_keyblock(ctx->kerberosCtx, ctx->rfc3961Key);
  92     }
  93
  94     if (ctx->kerberosCtx != NULL) {
  95         krb5_free_context(ctx->kerberosCtx);
  96     }
  97
  98     gssEapReleaseName(&tmpMinor, &ctx->initiatorName);
  99     gssEapReleaseName(&tmpMinor, &ctx->acceptorName);
 100     gss_release_oid(&tmpMinor, &ctx->mechanismUsed);
 101     sequenceFree(ctx->seqState);
 102
 103     memset(ctx, 0, sizeof(*ctx));
 104     GSSEAP_FREE(ctx);
 105     *pCtx = GSS_C_NO_CONTEXT;
 106
 107     *minor = 0;
 108     return GSS_S_COMPLETE;
 109 }