set_cred_option.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 static OM_uint32
  36 setCredRadiusConfigFile(OM_uint32 *minor,
  37                         gss_cred_id_t cred,
  38                         const gss_OID oid,
  39                         const gss_buffer_t buffer)
  40 {
  41     OM_uint32 major;
  42     gss_buffer_desc configFileBuffer = GSS_C_EMPTY_BUFFER;
  43
  44     if (buffer != GSS_C_NO_BUFFER && buffer->length != 0) {
  45         major = duplicateBuffer(minor, buffer, &configFileBuffer);
  46         if (GSS_ERROR(major))
  47             return major;
  48     }
  49
  50     if (cred->radiusConfigFile != NULL)
  51         GSSEAP_FREE(cred->radiusConfigFile);
  52
  53     cred->radiusConfigFile = (char *)configFileBuffer.value;
  54
  55     *minor = 0;
  56     return GSS_S_COMPLETE;
  57 }
  58
  59 static OM_uint32
  60 setCredRadiusConfigStanza(OM_uint32 *minor,
  61                           gss_cred_id_t cred,
  62                           const gss_OID oid,
  63                           const gss_buffer_t buffer)
  64 {
  65     OM_uint32 major;
  66     gss_buffer_desc configStanzaBuffer = GSS_C_EMPTY_BUFFER;
  67
  68     if (buffer != GSS_C_NO_BUFFER && buffer->length != 0) {
  69         major = duplicateBuffer(minor, buffer, &configStanzaBuffer);
  70         if (GSS_ERROR(major))
  71             return major;
  72     }
  73
  74     if (cred->radiusConfigStanza != NULL)
  75         GSSEAP_FREE(cred->radiusConfigStanza);
  76
  77     cred->radiusConfigStanza = (char *)configStanzaBuffer.value;
  78
  79     *minor = 0;
  80     return GSS_S_COMPLETE;
  81 }
  82
  83 static OM_uint32
  84 setCredFlag(OM_uint32 *minor,
  85             gss_cred_id_t cred,
  86             const gss_OID oid,
  87             const gss_buffer_t buffer)
  88 {
  89     OM_uint32 flags;
  90     unsigned char *p;
  91
  92     if (buffer == GSS_C_NO_BUFFER || buffer->length < 4) {
  93         *minor = EINVAL;
  94         return GSS_S_FAILURE;
  95     }
  96
  97     p = (unsigned char *)buffer->value;
  98
  99     flags = load_uint32_be(buffer->value) & CRED_FLAG_PUBLIC_MASK;
 100
 101     if (buffer->length > 4 && p[4])
 102         cred->flags &= ~(flags);
 103     else
 104         cred->flags |= flags;
 105
 106     *minor = 0;
 107     return GSS_S_COMPLETE;
 108 }
 109
 110 static struct {
 111     gss_OID_desc oid;
 112     OM_uint32 (*setOption)(OM_uint32 *, gss_cred_id_t cred,
 113                            const gss_OID, const gss_buffer_t);
 114 } setCredOps[] = {
 115     /* 1.3.6.1.4.1.5322.22.3.3.1 */
 116     {
 117         { 11, "\x2B\x06\x01\x04\x01\xA9\x4A\x16\x03\x03\x01" },
 118         setCredRadiusConfigFile,
 119     },
 120     /* 1.3.6.1.4.1.5322.22.3.3.2 */
 121     {
 122         { 11, "\x2B\x06\x01\x04\x01\xA9\x4A\x16\x03\x03\x02" },
 123         setCredRadiusConfigStanza,
 124     },
 125     /* 1.3.6.1.4.1.5322.22.3.3.3 */
 126     {
 127         { 11, "\x2B\x06\x01\x04\x01\xA9\x4A\x16\x03\x03\x03" },
 128         setCredFlag,
 129     },
 130 };
 131
 132 gss_OID GSS_EAP_CRED_SET_RADIUS_CONFIG_FILE     = &setCredOps[0].oid;
 133 gss_OID GSS_EAP_CRED_SET_RADIUS_CONFIG_STANZA   = &setCredOps[1].oid;
 134 gss_OID GSS_EAP_CRED_SET_CRED_FLAG              = &setCredOps[2].oid;
 135
 136 OM_uint32
 137 gssspi_set_cred_option(OM_uint32 *minor,
 138                        gss_cred_id_t *pCred,
 139                        const gss_OID desired_object,
 140                        const gss_buffer_t value)
 141 {
 142     OM_uint32 major = GSS_S_UNAVAILABLE;
 143     gss_cred_id_t cred = *pCred;
 144     int i;
 145
 146     if (cred == GSS_C_NO_CREDENTIAL)
 147         return GSS_S_UNAVAILABLE;
 148
 149     GSSEAP_MUTEX_LOCK(&cred->mutex);
 150
 151     for (i = 0; i < sizeof(setCredOps) / sizeof(setCredOps[0]); i++) {
 152         if (oidEqual(&setCredOps[i].oid, desired_object)) {
 153             major = (*setCredOps[i].setOption)(minor, cred,
 154                                                desired_object, value);
 155             break;
 156         }
 157     }
 158
 159     GSSEAP_MUTEX_UNLOCK(&cred->mutex);
 160
 161     return major;
 162 }
 163
 164 #if 0
 165 OM_uint32
 166 gsseap_set_cred_flag(OM_uint32 *minor,
 167                      gss_cred_id_t cred,
 168                      OM_uint32 flag,
 169                      int clear)
 170 {
 171     unsigned char buf[5];
 172     gss_buffer_desc value;
 173
 174     value.length = sizeof(buf);
 175     value.value = buf;
 176
 177     store_uint32_be(flag, buf);
 178     buf[4] = (clear != 0);
 179
 180     return gssspi_set_cred_option(minor, cred,
 181                                   GSS_EAP_CRED_SET_CRED_FLAG, &value);
 182 }
 183 #endif