2 * Copyright (c) 2005 Doug Rabson
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 #include <gssapi/gssapi.h>
33 #include "mech_switch.h"
37 static struct _gss_mechanism_cred *
38 _gss_copy_cred(struct _gss_mechanism_cred *mc)
40 struct _gss_mechanism_cred *new_mc;
41 struct _gss_mech_switch *m = mc->gmc_mech;
42 OM_uint32 major_status, minor_status;
45 OM_uint32 initiator_lifetime, acceptor_lifetime;
46 gss_cred_usage_t cred_usage;
48 major_status = m->gm_inquire_cred_by_mech(&minor_status,
49 mc->gmc_cred, mc->gmc_mech_oid,
50 &name, &initiator_lifetime, &acceptor_lifetime, &cred_usage);
54 major_status = m->gm_add_cred(&minor_status,
55 GSS_C_NO_CREDENTIAL, name, mc->gmc_mech_oid,
56 cred_usage, initiator_lifetime, acceptor_lifetime,
58 m->gm_release_name(&minor_status, &name);
63 new_mc = malloc(sizeof(struct _gss_mechanism_cred));
65 m->gm_release_cred(&minor_status, &cred);
69 new_mc->gmc_mech_oid = &m->gm_mech_oid;
70 new_mc->gmc_cred = cred;
76 gss_add_cred(OM_uint32 *minor_status,
77 const gss_cred_id_t input_cred_handle,
78 const gss_name_t desired_name,
79 const gss_OID desired_mech,
80 gss_cred_usage_t cred_usage,
81 OM_uint32 initiator_time_req,
82 OM_uint32 acceptor_time_req,
83 gss_cred_id_t *output_cred_handle,
84 gss_OID_set *actual_mechs,
85 OM_uint32 *initiator_time_rec,
86 OM_uint32 *acceptor_time_rec)
88 OM_uint32 major_status;
89 struct _gss_mech_switch *m;
91 struct _gss_name *name = (struct _gss_name *) desired_name;
92 struct _gss_cred *cred = (struct _gss_cred *) input_cred_handle;
93 struct _gss_cred *new_cred;
94 struct _gss_mechanism_cred *mc, *target_mc, *copy_mc;
95 struct _gss_mechanism_name *mn;
96 OM_uint32 min_time, time, junk;
99 *output_cred_handle = 0;
102 new_cred = malloc(sizeof(struct _gss_cred));
104 *minor_status = ENOMEM;
105 return (GSS_S_FAILURE);
107 new_cred->gc_usage = cred_usage;
108 SLIST_INIT(&new_cred->gc_mc);
111 * We go through all the mc attached to the input_cred_handle
112 * and check the mechanism. If it matches, we call
113 * gss_add_cred for that mechanism, otherwise we copy the mc
118 SLIST_FOREACH(mc, &cred->gc_mc, gmc_link) {
119 if (_gss_oid_equal(mc->gmc_mech, desired_mech)) {
122 copy_mc = _gss_copy_cred(mc);
124 gss_release_cred(&junk, (gss_cred_id_t*) &new_cred);
125 *minor_status = ENOMEM;
126 return (GSS_S_FAILURE);
128 SLIST_INSERT_HEAD(&new_cred->gc_mc, copy_mc, gmc_link);
133 * Figure out a suitable mn, if any.
136 mn = _gss_find_mn((struct _gss_name *) desired_name,
140 return (GSS_S_BAD_NAME);
146 m = _gss_find_mech_switch(desired_mech);
148 mc = malloc(sizeof(struct _gss_mechanism_cred));
150 gss_release_cred(&junk, (gss_cred_id_t*) &new_cred);
151 *minor_status = ENOMEM;
152 return (GSS_S_FAILURE);
155 mc->gmc_mech_oid = &m->gm_mech_oid;
157 major_status = m->gm_add_cred(minor_status,
158 target_mc ? target_mc->gmc_cred : GSS_C_NO_CREDENTIAL,
159 desired_name ? mn->gmn_name : GSS_C_NO_NAME,
170 gss_release_cred(&junk, (gss_cred_id_t*) &new_cred);
172 return (major_status);
174 SLIST_INSERT_HEAD(&new_cred->gc_mc, mc, gmc_link);
175 *output_cred_handle = (gss_cred_id_t) new_cred;
177 return (GSS_S_COMPLETE);