inquire_sec_context_by_oid.c

   1 /*
   2  * Copyright (c) 2011, 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 /*
  34  * Return extended properties of a context handle.
  35  */
  36
  37 #include "gssapiP_eap.h"
  38
  39 static OM_uint32
  40 inquireSessionKey(OM_uint32 *minor,
  41                   const gss_ctx_id_t ctx,
  42                   const gss_OID desired_object GSSEAP_UNUSED,
  43                   gss_buffer_set_t *dataSet)
  44 {
  45     OM_uint32 major, tmpMinor;
  46     unsigned char oidBuf[16];
  47     gss_buffer_desc buf;
  48     gss_OID_desc oid;
  49
  50     buf.length = KRB_KEY_LENGTH(&ctx->rfc3961Key);
  51     buf.value = KRB_KEY_DATA(&ctx->rfc3961Key);
  52
  53     major = gss_add_buffer_set_member(minor, &buf, dataSet);
  54     if (GSS_ERROR(major))
  55         goto cleanup;
  56
  57     oid.length = sizeof(oidBuf);
  58     oid.elements = oidBuf;
  59
  60     major = composeOid(minor,
  61                        "\x2a\x86\x48\x86\xf7\x12\x01\x02\x02\x04",
  62                        10,
  63                        ctx->encryptionType,
  64                        &oid);
  65     if (GSS_ERROR(major))
  66         goto cleanup;
  67
  68     buf.length = oid.length;
  69     buf.value = oid.elements;
  70
  71     major = gss_add_buffer_set_member(minor, &buf, dataSet);
  72     if (GSS_ERROR(major))
  73         goto cleanup;
  74
  75     major = GSS_S_COMPLETE;
  76     *minor = 0;
  77
  78 cleanup:
  79     if (GSS_ERROR(major) && *dataSet != GSS_C_NO_BUFFER_SET) {
  80         gss_buffer_set_t set = *dataSet;
  81
  82         if (set->count != 0)
  83             memset(set->elements[0].value, 0, set->elements[0].length);
  84         gss_release_buffer_set(&tmpMinor, dataSet);
  85     }
  86
  87     return major;
  88 }
  89
  90 static struct {
  91     gss_OID_desc oid;
  92     OM_uint32 (*inquire)(OM_uint32 *, const gss_ctx_id_t,
  93                          const gss_OID, gss_buffer_set_t *);
  94 } inquireCtxOps[] = {
  95     {
  96         /* GSS_C_INQ_SSPI_SESSION_KEY */
  97         { 11, "\x2a\x86\x48\x86\xf7\x12\x01\x02\x02\x05\x05" },
  98         inquireSessionKey
  99     },
 100     {
 101         /* GSS_KRB5_EXPORT_LUCID_SEC_CONTEXT + v1 */
 102         { 12, "\x2a\x86\x48\x86\xf7\x12\x01\x02\x02\x05\x06\x01" },
 103         gssEapExportLucidSecContext
 104     },
 105 };
 106
 107 OM_uint32
 108 gss_inquire_sec_context_by_oid(OM_uint32 *minor,
 109                                const gss_ctx_id_t ctx,
 110                                const gss_OID desired_object,
 111                                gss_buffer_set_t *data_set)
 112 {
 113     OM_uint32 major;
 114     int i;
 115
 116     *data_set = GSS_C_NO_BUFFER_SET;
 117
 118     GSSEAP_MUTEX_LOCK(&ctx->mutex);
 119
 120     if (!CTX_IS_ESTABLISHED(ctx)) {
 121         *minor = GSSEAP_CONTEXT_INCOMPLETE;
 122         major = GSS_S_NO_CONTEXT;
 123         goto cleanup;
 124     }
 125
 126     major = GSS_S_UNAVAILABLE;
 127     *minor = GSSEAP_BAD_CONTEXT_OPTION;
 128
 129     for (i = 0; i < sizeof(inquireCtxOps) / sizeof(inquireCtxOps[0]); i++) {
 130         if (oidEqual(&inquireCtxOps[i].oid, desired_object)) {
 131             major = (*inquireCtxOps[i].inquire)(minor, ctx,
 132                                                  desired_object, data_set);
 133             break;
 134         }
 135     }
 136
 137 cleanup:
 138     GSSEAP_MUTEX_UNLOCK(&ctx->mutex);
 139
 140     return major;
 141 }