/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (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 2004 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*
 *  glue routine gss_import_name
 *
 */

#include "mechglueP.h"
#include <sys/errno.h>
OM_uint32
gss_import_name(
        OM_uint32 *minor_status,
        const gss_buffer_t input_name_buffer,
        const gss_OID input_name_type,
        gss_name_t *output_name)

{
        gss_union_name_t        union_name;
        OM_uint32               major_status = GSS_S_FAILURE;

        if (minor_status)
                *minor_status = 0;

        /* if output_name is NULL, simply return */

        if (output_name == NULL)
                return (GSS_S_COMPLETE);

        *output_name = 0;

        if (input_name_buffer == GSS_C_NO_BUFFER || input_name_type == NULL)
                return (GSS_S_BAD_NAME);

        /*
         * First create the union name struct that will hold the external
         * name and the name type.
         */

        union_name = (gss_union_name_t) MALLOC(sizeof (gss_union_name_desc));

        if (!union_name) {
                *minor_status = ENOMEM;
                goto allocation_failure;
        }
        union_name->mech_type = 0;
        union_name->mech_name = 0;
        union_name->name_type = 0;
        union_name->external_name = 0;

        /*
         * All we do here is record the external name and name_type.
         * When the name is actually used, the underlying gss_import_name()
         * is called for the appropriate mechanism.
         * Since the name type may be a constant or comming from the
         * rpc resoults, we must make a copy.
         */
        union_name->external_name =
        (gss_buffer_t) MALLOC(sizeof (gss_buffer_desc));

        if (!union_name->external_name) {
                *minor_status = ENOMEM;
                goto allocation_failure;
        }

        union_name->external_name->length = input_name_buffer->length;
        union_name->external_name->value =
        (void *) MALLOC(input_name_buffer->length);

        if (!union_name->external_name->value) {
                *minor_status = ENOMEM;
                goto allocation_failure;
        }

        (void) memcpy(union_name->external_name->value,
            input_name_buffer->value, input_name_buffer->length);

        /*
         * making a copy of the name_type structure and elements
         * we now delete it when calling gss_release_name
         */
        union_name->name_type = (gss_OID) MALLOC(sizeof (gss_OID_desc));

        if (!union_name->name_type) {
                *minor_status = ENOMEM;
                goto allocation_failure;
        }

        union_name->name_type->elements = (void *)
                MALLOC(input_name_type->length);

        if (!union_name->name_type->elements) {
                *minor_status = ENOMEM;
                goto allocation_failure;
        }

        (void) memcpy(union_name->name_type->elements,
                input_name_type->elements, input_name_type->length);
        union_name->name_type->length = input_name_type->length;

        *output_name = (gss_name_t) union_name;

        return (GSS_S_COMPLETE);

allocation_failure:
        if (union_name) {

                if (union_name->external_name) {
                        if (union_name->external_name->value)
                                FREE(union_name->external_name->value,
                                        union_name->external_name->length);
                        FREE(union_name->external_name,
                                sizeof (gss_buffer_desc));
                }

                if (union_name->name_type) {
                        FREE(union_name->name_type, sizeof (gss_OID_desc));
                }
                FREE(union_name, sizeof (gss_union_name_desc));
        }
        return (major_status);
}