/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright (c) 1999, 2010, Oracle and/or its affiliates. All rights reserved.
 */

/*
 *  glue routine for gss_inquire_context
 */

#include <mechglueP.h>
#include "gssapiP_generic.h"

#define	MAX_MECH_OID_PAIRS 32

/* Last argument new for V2 */
OM_uint32
gss_inquire_names_for_mech(minor_status, mechanism, name_types)

OM_uint32 *		minor_status;
const gss_OID 		mechanism;
gss_OID_set *		name_types;

{
	OM_uint32		status;
	gss_mechanism		mech;

	/* Initialize outputs. */

	if (minor_status != NULL)
		*minor_status = 0;

	if (name_types != NULL)
		*name_types = GSS_C_NO_OID_SET;

	/* Validate arguments. */

	if (minor_status == NULL)
		return (GSS_S_CALL_INACCESSIBLE_WRITE);

	if (name_types == NULL)
		return (GSS_S_CALL_INACCESSIBLE_WRITE);

	/*
	 * select the approprate underlying mechanism routine and
	 * call it.
	 */

	mech = __gss_get_mechanism(mechanism);

	if (mech) {

		if (mech->gss_inquire_names_for_mech) {
			status = mech->gss_inquire_names_for_mech(
					mech->context,
					minor_status,
					mechanism,
					name_types);
			if (status != GSS_S_COMPLETE)
				map_error(minor_status, mech);
		} else
			status = GSS_S_UNAVAILABLE;

		return (status);
	}

	return (GSS_S_BAD_MECH);
}

static OM_uint32 val_inq_mechs4name_args(
	OM_uint32 *minor_status,
	const gss_name_t input_name,
	gss_OID_set *mech_set)
{

	/* Initialize outputs. */
	if (minor_status != NULL)
		*minor_status = 0;

	if (mech_set != NULL)
		*mech_set = GSS_C_NO_OID_SET;

	/* Validate arguments. */

	if (minor_status == NULL)
		return (GSS_S_CALL_INACCESSIBLE_WRITE);

	if (input_name == GSS_C_NO_NAME)
		return (GSS_S_BAD_NAME);

	return (GSS_S_COMPLETE);
}

OM_uint32
gss_inquire_mechs_for_name(minor_status, input_name, mech_set)

OM_uint32 *		minor_status;
const gss_name_t	input_name;
gss_OID_set *		mech_set;

{
	OM_uint32		status;
	static char		*mech_list[MAX_MECH_OID_PAIRS+1];
	gss_OID_set		mech_name_types;
	int			present;
	char 			*mechanism;
	gss_OID 		mechOid;
	gss_OID 		name_type;
	gss_buffer_desc		name_buffer;
	int			i;

	status = val_inq_mechs4name_args(minor_status, input_name, mech_set);
	if (status != GSS_S_COMPLETE)
		return (status);

	status = gss_create_empty_oid_set(minor_status, mech_set);
	if (status != GSS_S_COMPLETE)
		return (status);
	*mech_list = NULL;
	status = __gss_get_mechanisms(mech_list, MAX_MECH_OID_PAIRS+1);
	if (status != GSS_S_COMPLETE)
		return (status);
	for (i = 0; i < MAX_MECH_OID_PAIRS && mech_list[i] != NULL; i++) {
		mechanism = mech_list[i];
		if (__gss_mech_to_oid(mechanism, &mechOid) == GSS_S_COMPLETE) {
			status = gss_inquire_names_for_mech(
					minor_status,
					mechOid,
					&mech_name_types);
			if (status == GSS_S_COMPLETE) {
				status = gss_display_name(minor_status,
							input_name,
							&name_buffer,
							&name_type);

				(void) gss_release_buffer(NULL, &name_buffer);

				if (status == GSS_S_COMPLETE && name_type) {
					status = gss_test_oid_set_member(
							minor_status,
							name_type,
							mech_name_types,
							&present);
					if (status == GSS_S_COMPLETE &&
						present) {
						status = gss_add_oid_set_member(
							minor_status,
							mechOid,
							mech_set);
						if (status != GSS_S_COMPLETE) {
						(void) gss_release_oid_set(
							    minor_status,
							    &mech_name_types);
						(void) gss_release_oid_set(
							    minor_status,
							    mech_set);
							return (status);
						}
					}
				}
				(void) gss_release_oid_set(
					minor_status,
					&mech_name_types);
			}
		} else {
			(void) gss_release_oid_set(
				minor_status,
				mech_set);
			return (GSS_S_FAILURE);
		}
	}
	return (GSS_S_COMPLETE);
}