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