1 /* 2 * Copyright (c) 2004, PADL Software Pty Ltd. 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 PADL Software 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 PADL SOFTWARE AND CONTRIBUTORS ``AS IS'' AND 21 * 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 PADL SOFTWARE 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 "gsskrb5_locl.h" 34 35 OM_uint32 GSSAPI_CALLCONV _gsskrb5_inquire_cred_by_oid 36 (OM_uint32 * minor_status, 37 const gss_cred_id_t cred_handle, 38 const gss_OID desired_object, 39 gss_buffer_set_t *data_set) 40 { 41 krb5_context context; 42 gsskrb5_cred cred = (gsskrb5_cred)cred_handle; 43 krb5_error_code ret; 44 gss_buffer_desc buffer; 45 char *str; 46 47 GSSAPI_KRB5_INIT (&context); 48 49 if (gss_oid_equal(desired_object, GSS_KRB5_COPY_CCACHE_X) == 0) { 50 *minor_status = EINVAL; 51 return GSS_S_FAILURE; 52 } 53 54 HEIMDAL_MUTEX_lock(&cred->cred_id_mutex); 55 56 if (cred->ccache == NULL) { 57 HEIMDAL_MUTEX_unlock(&cred->cred_id_mutex); 58 *minor_status = EINVAL; 59 return GSS_S_FAILURE; 60 } 61 62 ret = krb5_cc_get_full_name(context, cred->ccache, &str); 63 HEIMDAL_MUTEX_unlock(&cred->cred_id_mutex); 64 if (ret) { 65 *minor_status = ret; 66 return GSS_S_FAILURE; 67 } 68 69 buffer.value = str; 70 buffer.length = strlen(str); 71 72 ret = gss_add_buffer_set_member(minor_status, &buffer, data_set); 73 if (ret != GSS_S_COMPLETE) 74 _gsskrb5_clear_status (); 75 76 free(str); 77 78 *minor_status = 0; 79 return GSS_S_COMPLETE; 80 } 81 82