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 "mech_locl.h"
34
35GSSAPI_LIB_FUNCTION OM_uint32 GSSAPI_LIB_CALL
36gss_inquire_cred_by_oid (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	struct _gss_cred *cred = (struct _gss_cred *) cred_handle;
42	OM_uint32		status = GSS_S_COMPLETE;
43	struct _gss_mechanism_cred *mc;
44	gssapi_mech_interface	m;
45	gss_buffer_set_t set = GSS_C_NO_BUFFER_SET;
46
47	*minor_status = 0;
48	*data_set = GSS_C_NO_BUFFER_SET;
49
50	if (cred == NULL)
51		return GSS_S_NO_CRED;
52
53	HEIM_SLIST_FOREACH(mc, &cred->gc_mc, gmc_link) {
54		gss_buffer_set_t rset = GSS_C_NO_BUFFER_SET;
55		size_t i;
56
57		m = mc->gmc_mech;
58		if (m == NULL) {
59	       		gss_release_buffer_set(minor_status, &set);
60			*minor_status = 0;
61			return GSS_S_BAD_MECH;
62		}
63
64		if (m->gm_inquire_cred_by_oid == NULL)
65			continue;
66
67		status = m->gm_inquire_cred_by_oid(minor_status,
68		    mc->gmc_cred, desired_object, &rset);
69		if (status != GSS_S_COMPLETE)
70			continue;
71
72		for (i = 0; i < rset->count; i++) {
73			status = gss_add_buffer_set_member(minor_status,
74			     &rset->elements[i], &set);
75			if (status != GSS_S_COMPLETE)
76				break;
77		}
78		gss_release_buffer_set(minor_status, &rset);
79	}
80	if (set == GSS_C_NO_BUFFER_SET)
81		status = GSS_S_FAILURE;
82	*data_set = set;
83	*minor_status = 0;
84	return status;
85}
86
87