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"
38 static struct _gss_mechanism_cred
*
39 _gss_copy_cred(struct _gss_mechanism_cred
*mc
)
41 struct _gss_mechanism_cred
*new_mc
;
42 struct _gss_mech_switch
*m
= mc
->gmc_mech
;
43 OM_uint32 major_status
, minor_status
;
46 OM_uint32 initiator_lifetime
, acceptor_lifetime
;
47 gss_cred_usage_t cred_usage
;
49 major_status
= m
->gm_inquire_cred_by_mech(&minor_status
,
50 mc
->gmc_cred
, mc
->gmc_mech_oid
,
51 &name
, &initiator_lifetime
, &acceptor_lifetime
, &cred_usage
);
53 _gss_mg_error(m
, major_status
, minor_status
);
57 major_status
= m
->gm_add_cred(&minor_status
,
58 GSS_C_NO_CREDENTIAL
, name
, mc
->gmc_mech_oid
,
59 cred_usage
, initiator_lifetime
, acceptor_lifetime
,
61 m
->gm_release_name(&minor_status
, &name
);
64 _gss_mg_error(m
, major_status
, minor_status
);
68 new_mc
= malloc(sizeof(struct _gss_mechanism_cred
));
70 m
->gm_release_cred(&minor_status
, &cred
);
74 new_mc
->gmc_mech_oid
= &m
->gm_mech_oid
;
75 new_mc
->gmc_cred
= cred
;
81 gss_add_cred(OM_uint32
*minor_status
,
82 const gss_cred_id_t input_cred_handle
,
83 const gss_name_t desired_name
,
84 const gss_OID desired_mech
,
85 gss_cred_usage_t cred_usage
,
86 OM_uint32 initiator_time_req
,
87 OM_uint32 acceptor_time_req
,
88 gss_cred_id_t
*output_cred_handle
,
89 gss_OID_set
*actual_mechs
,
90 OM_uint32
*initiator_time_rec
,
91 OM_uint32
*acceptor_time_rec
)
93 OM_uint32 major_status
;
94 struct _gss_mech_switch
*m
;
95 struct _gss_cred
*cred
= (struct _gss_cred
*) input_cred_handle
;
96 struct _gss_cred
*new_cred
;
97 gss_cred_id_t release_cred
;
98 struct _gss_mechanism_cred
*mc
, *target_mc
, *copy_mc
;
99 struct _gss_mechanism_name
*mn
;
103 *output_cred_handle
= GSS_C_NO_CREDENTIAL
;
104 if (initiator_time_rec
)
105 *initiator_time_rec
= 0;
106 if (acceptor_time_rec
)
107 *acceptor_time_rec
= 0;
109 *actual_mechs
= GSS_C_NO_OID_SET
;
111 new_cred
= malloc(sizeof(struct _gss_cred
));
113 *minor_status
= ENOMEM
;
114 return (GSS_S_FAILURE
);
116 SLIST_INIT(&new_cred
->gc_mc
);
119 * We go through all the mc attached to the input_cred_handle
120 * and check the mechanism. If it matches, we call
121 * gss_add_cred for that mechanism, otherwise we copy the mc
126 SLIST_FOREACH(mc
, &cred
->gc_mc
, gmc_link
) {
127 if (gss_oid_equal(mc
->gmc_mech_oid
, desired_mech
)) {
130 copy_mc
= _gss_copy_cred(mc
);
132 release_cred
= (gss_cred_id_t
) new_cred
;
133 gss_release_cred(&junk
, &release_cred
);
134 *minor_status
= ENOMEM
;
135 return (GSS_S_FAILURE
);
137 SLIST_INSERT_HEAD(&new_cred
->gc_mc
, copy_mc
, gmc_link
);
142 * Figure out a suitable mn, if any.
145 major_status
= _gss_find_mn(minor_status
,
146 (struct _gss_name
*) desired_name
,
149 if (major_status
!= GSS_S_COMPLETE
) {
151 return (major_status
);
157 m
= _gss_find_mech_switch(desired_mech
);
159 mc
= malloc(sizeof(struct _gss_mechanism_cred
));
161 release_cred
= (gss_cred_id_t
) new_cred
;
162 gss_release_cred(&junk
, &release_cred
);
163 *minor_status
= ENOMEM
;
164 return (GSS_S_FAILURE
);
167 mc
->gmc_mech_oid
= &m
->gm_mech_oid
;
169 major_status
= m
->gm_add_cred(minor_status
,
170 target_mc
? target_mc
->gmc_cred
: GSS_C_NO_CREDENTIAL
,
171 desired_name
? mn
->gmn_name
: GSS_C_NO_NAME
,
182 _gss_mg_error(m
, major_status
, *minor_status
);
183 release_cred
= (gss_cred_id_t
) new_cred
;
184 gss_release_cred(&junk
, &release_cred
);
186 return (major_status
);
188 SLIST_INSERT_HEAD(&new_cred
->gc_mc
, mc
, gmc_link
);
189 *output_cred_handle
= (gss_cred_id_t
) new_cred
;
191 return (GSS_S_COMPLETE
);