Fixes for Heimdal (macOS) builds from Stefan.
[mech_eap.git] / mech_eap / store_cred.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 #include "gssapiP_eap.h"
34
35 OM_uint32 GSSAPI_CALLCONV
36 gss_store_cred(OM_uint32 *minor,
37                const gss_cred_id_t cred,
38                gss_cred_usage_t input_usage,
39                const gss_OID desired_mech GSSEAP_UNUSED,
40 #ifdef GSSEAP_ENABLE_REAUTH
41                OM_uint32 overwrite_cred,
42                OM_uint32 default_cred,
43 #else
44                OM_uint32 overwrite_cred GSSEAP_UNUSED,
45                OM_uint32 default_cred GSSEAP_UNUSED,
46 #endif
47                gss_OID_set *elements_stored,
48                gss_cred_usage_t *cred_usage_stored)
49 {
50     OM_uint32 major;
51
52     if (elements_stored != NULL)
53         *elements_stored = GSS_C_NO_OID_SET;
54     if (cred_usage_stored != NULL)
55         *cred_usage_stored = input_usage;
56
57     if (cred == GSS_C_NO_CREDENTIAL) {
58         *minor = EINVAL;
59         return GSS_S_CALL_INACCESSIBLE_READ | GSS_S_NO_CRED;
60     }
61
62     GSSEAP_MUTEX_LOCK(&cred->mutex);
63
64     major = GSS_S_COMPLETE;
65     *minor = 0;
66
67 #ifdef GSSEAP_ENABLE_REAUTH
68     if (cred->reauthCred != GSS_C_NO_CREDENTIAL) {
69         major = gssStoreCred(minor,
70                              cred->reauthCred,
71                              input_usage,
72                              (gss_OID)gss_mech_krb5,
73                              overwrite_cred,
74                              default_cred,
75                              elements_stored,
76                              cred_usage_stored);
77     }
78 #endif
79
80     GSSEAP_MUTEX_UNLOCK(&cred->mutex);
81
82     return major;
83 }