inquire_cred.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 gss_inquire_cred(OM_uint32 *minor,
  37                  gss_cred_id_t cred,
  38                  gss_name_t *name,
  39                  OM_uint32 *pLifetime,
  40                  gss_cred_usage_t *cred_usage,
  41                  gss_OID_set *mechanisms)
  42 {
  43     OM_uint32 major;
  44
  45     if (cred == NULL) {
  46         *minor = EINVAL;
  47         return GSS_S_NO_CRED;
  48     }
  49
  50     GSSEAP_MUTEX_LOCK(&cred->mutex);
  51
  52     if (name != NULL) {
  53         major = gssEapDuplicateName(minor, cred->name, name);
  54         if (GSS_ERROR(major))
  55             goto cleanup;
  56     }
  57
  58     if (pLifetime != NULL) {
  59         time_t now, lifetime;
  60
  61         if (cred->expiryTime == 0) {
  62             lifetime = GSS_C_INDEFINITE;
  63         } else  {
  64             now = time(NULL);
  65             lifetime = now - cred->expiryTime;
  66             if (lifetime < 0)
  67                 lifetime = 0;
  68         }
  69
  70         *pLifetime = lifetime;
  71     }
  72
  73     if (cred_usage != NULL) {
  74         OM_uint32 flags = (cred->flags & (CRED_FLAG_INITIATE | CRED_FLAG_ACCEPT));
  75
  76         switch (flags) {
  77         case CRED_FLAG_INITIATE:
  78             *cred_usage = GSS_C_INITIATE;
  79             break;
  80         case CRED_FLAG_ACCEPT:
  81             *cred_usage = GSS_C_ACCEPT;
  82             break;
  83         default:
  84             *cred_usage = GSS_C_BOTH;
  85             break;
  86         }
  87     }
  88
  89     if (mechanisms != NULL) {
  90         if (cred->mechanisms != GSS_C_NO_OID_SET)
  91             major = duplicateOidSet(minor, cred->mechanisms, mechanisms);
  92         else
  93             major = gssEapIndicateMechs(minor, mechanisms);
  94         if (GSS_ERROR(major))
  95             goto cleanup;
  96     }
  97
  98     major = GSS_S_COMPLETE;
  99     *minor = 0;
 100
 101 cleanup:
 102     GSSEAP_MUTEX_UNLOCK(&cred->mutex);
 103
 104     return major;
 105 }