1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 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 /* RCSID("$Id: gss_set_cred_option.c 21126 2007-06-18 20:19:59Z lha $"); */ 35 36 #include <gssapi/gssapi.h> 37 #include <stdlib.h> 38 #include <errno.h> 39 40 #include "mech_switch.h" 41 #include "cred.h" 42 43 OM_uint32 44 gss_set_cred_option (OM_uint32 *minor_status, 45 gss_cred_id_t *cred_handle, 46 const gss_OID object, 47 const gss_buffer_t value) 48 { 49 struct _gss_cred *cred = (struct _gss_cred *) *cred_handle; 50 OM_uint32 major_status = GSS_S_COMPLETE; 51 struct _gss_mechanism_cred *mc; 52 int one_ok = 0; 53 54 *minor_status = 0; 55 56 _gss_load_mech(); 57 58 if (cred == NULL) { 59 struct _gss_mech_switch *m; 60 61 cred = malloc(sizeof(*cred)); 62 if (cred == NULL) 63 return GSS_S_FAILURE; 64 65 SLIST_INIT(&cred->gc_mc); 66 67 SLIST_FOREACH(m, &_gss_mechs, gm_link) { 68 69 if (m->gm_set_cred_option == NULL) 70 continue; 71 72 mc = malloc(sizeof(*mc)); 73 if (mc == NULL) { 74 *cred_handle = (gss_cred_id_t)cred; 75 gss_release_cred(minor_status, cred_handle); 76 *minor_status = ENOMEM; 77 return GSS_S_FAILURE; 78 } 79 80 mc->gmc_mech = m; 81 mc->gmc_mech_oid = &m->gm_mech_oid; 82 mc->gmc_cred = GSS_C_NO_CREDENTIAL; 83 84 major_status = m->gm_set_cred_option( 85 minor_status, &mc->gmc_cred, object, value); 86 87 if (major_status) { 88 free(mc); 89 continue; 90 } 91 one_ok = 1; 92 SLIST_INSERT_HEAD(&cred->gc_mc, mc, gmc_link); 93 } 94 *cred_handle = (gss_cred_id_t)cred; 95 if (!one_ok) { 96 OM_uint32 junk; 97 gss_release_cred(&junk, cred_handle); 98 } 99 } else { 100 struct _gss_mech_switch *m; 101 102 SLIST_FOREACH(mc, &cred->gc_mc, gmc_link) { 103 m = mc->gmc_mech; 104 105 if (m == NULL) 106 return GSS_S_BAD_MECH; 107 108 if (m->gm_set_cred_option == NULL) 109 continue; 110 111 major_status = m->gm_set_cred_option(minor_status, 112 &mc->gmc_cred, object, value); 113 if (major_status == GSS_S_COMPLETE) 114 one_ok = 1; 115 else 116 _gss_mg_error(m, major_status, *minor_status); 117 118 } 119 } 120 if (one_ok) { 121 *minor_status = 0; 122 return (GSS_S_COMPLETE); 123 } 124 return (major_status); 125 } 126 127