1 /* $NetBSD: gss_set_cred_option.c,v 1.2 2017/01/28 21:31:46 christos Exp $ */
2
3 /*
4 * Copyright (c) 2004, PADL Software Pty Ltd.
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 *
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 *
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 *
18 * 3. Neither the name of PADL Software nor the names of its contributors
19 * may be used to endorse or promote products derived from this software
20 * without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY PADL SOFTWARE AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL PADL SOFTWARE OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
33 */
34
35 #include "mech_locl.h"
36
37 GSSAPI_LIB_FUNCTION OM_uint32 GSSAPI_LIB_CALL
gss_set_cred_option(OM_uint32 * minor_status,gss_cred_id_t * cred_handle,const gss_OID object,const gss_buffer_t value)38 gss_set_cred_option (OM_uint32 *minor_status,
39 gss_cred_id_t *cred_handle,
40 const gss_OID object,
41 const gss_buffer_t value)
42 {
43 struct _gss_cred *cred = (struct _gss_cred *) *cred_handle;
44 OM_uint32 major_status = GSS_S_COMPLETE;
45 struct _gss_mechanism_cred *mc;
46 int one_ok = 0;
47
48 *minor_status = 0;
49
50 _gss_load_mech();
51
52 if (cred == NULL) {
53 struct _gss_mech_switch *m;
54
55 cred = malloc(sizeof(*cred));
56 if (cred == NULL)
57 return GSS_S_FAILURE;
58
59 HEIM_SLIST_INIT(&cred->gc_mc);
60
61 HEIM_SLIST_FOREACH(m, &_gss_mechs, gm_link) {
62
63 if (m->gm_mech.gm_set_cred_option == NULL)
64 continue;
65
66 mc = malloc(sizeof(*mc));
67 if (mc == NULL) {
68 *cred_handle = (gss_cred_id_t)cred;
69 gss_release_cred(minor_status, cred_handle);
70 *minor_status = ENOMEM;
71 return GSS_S_FAILURE;
72 }
73
74 mc->gmc_mech = &m->gm_mech;
75 mc->gmc_mech_oid = &m->gm_mech_oid;
76 mc->gmc_cred = GSS_C_NO_CREDENTIAL;
77
78 major_status = m->gm_mech.gm_set_cred_option(
79 minor_status, &mc->gmc_cred, object, value);
80
81 if (major_status) {
82 free(mc);
83 continue;
84 }
85 one_ok = 1;
86 HEIM_SLIST_INSERT_HEAD(&cred->gc_mc, mc, gmc_link);
87 }
88 *cred_handle = (gss_cred_id_t)cred;
89 if (!one_ok) {
90 OM_uint32 junk;
91 gss_release_cred(&junk, cred_handle);
92 }
93 } else {
94 gssapi_mech_interface m;
95
96 HEIM_SLIST_FOREACH(mc, &cred->gc_mc, gmc_link) {
97 m = mc->gmc_mech;
98
99 if (m == NULL)
100 return GSS_S_BAD_MECH;
101
102 if (m->gm_set_cred_option == NULL)
103 continue;
104
105 major_status = m->gm_set_cred_option(minor_status,
106 &mc->gmc_cred, object, value);
107 if (major_status == GSS_S_COMPLETE)
108 one_ok = 1;
109 else
110 _gss_mg_error(m, major_status, *minor_status);
111
112 }
113 }
114 if (one_ok) {
115 *minor_status = 0;
116 return GSS_S_COMPLETE;
117 }
118 return major_status;
119 }
120
121