Home | History | Annotate | Download | only in libgss
      1     0  stevel /*
      2     0  stevel  * CDDL HEADER START
      3     0  stevel  *
      4     0  stevel  * The contents of this file are subject to the terms of the
      5  9698   Peter  * Common Development and Distribution License (the "License").
      6  9698   Peter  * You may not use this file except in compliance with the License.
      7     0  stevel  *
      8     0  stevel  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
      9     0  stevel  * or http://www.opensolaris.org/os/licensing.
     10     0  stevel  * See the License for the specific language governing permissions
     11     0  stevel  * and limitations under the License.
     12     0  stevel  *
     13     0  stevel  * When distributing Covered Code, include this CDDL HEADER in each
     14     0  stevel  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
     15     0  stevel  * If applicable, add the following below this CDDL HEADER, with the
     16     0  stevel  * fields enclosed by brackets "[]" replaced with your own identifying
     17     0  stevel  * information: Portions Copyright [yyyy] [name of copyright owner]
     18     0  stevel  *
     19     0  stevel  * CDDL HEADER END
     20     0  stevel  */
     21     0  stevel /*
     22  9698   Peter  * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
     23     0  stevel  * Use is subject to license terms.
     24     0  stevel  */
     25     0  stevel 
     26     0  stevel /*
     27     0  stevel  *  glue routine for gss_export_sec_context
     28     0  stevel  */
     29     0  stevel 
     30     0  stevel #include <mechglueP.h>
     31     0  stevel #include <stdio.h>
     32     0  stevel #include <errno.h>
     33     0  stevel #ifdef HAVE_STDLIB_H
     34     0  stevel #include <stdlib.h>
     35     0  stevel #endif
     36     0  stevel #include <string.h>
     37  9698   Peter 
     38  9698   Peter static OM_uint32 val_exp_sec_ctx_args(
     39  9698   Peter 	OM_uint32 *minor_status,
     40  9698   Peter 	gss_ctx_id_t *context_handle,
     41  9698   Peter 	gss_buffer_t interprocess_token)
     42  9698   Peter {
     43  9698   Peter 
     44  9698   Peter 	/* Initialize outputs. */
     45  9698   Peter 
     46  9698   Peter 	if (minor_status != NULL)
     47  9698   Peter 		*minor_status = 0;
     48  9698   Peter 
     49  9698   Peter 	if (interprocess_token != GSS_C_NO_BUFFER) {
     50  9698   Peter 		interprocess_token->length = 0;
     51  9698   Peter 		interprocess_token->value = NULL;
     52  9698   Peter 	}
     53  9698   Peter 
     54  9698   Peter 	/* Validate arguments. */
     55  9698   Peter 
     56  9698   Peter 	if (minor_status == NULL)
     57  9698   Peter 		return (GSS_S_CALL_INACCESSIBLE_WRITE);
     58  9698   Peter 
     59  9698   Peter 	if (context_handle == NULL || *context_handle == GSS_C_NO_CONTEXT)
     60  9698   Peter 		return (GSS_S_CALL_INACCESSIBLE_READ | GSS_S_NO_CONTEXT);
     61  9698   Peter 
     62  9698   Peter 	if (interprocess_token == GSS_C_NO_BUFFER)
     63  9698   Peter 		return (GSS_S_CALL_INACCESSIBLE_WRITE);
     64  9698   Peter 
     65  9698   Peter 	return (GSS_S_COMPLETE);
     66  9698   Peter }
     67     0  stevel 
     68     0  stevel OM_uint32
     69     0  stevel gss_export_sec_context(minor_status,
     70     0  stevel 			context_handle,
     71     0  stevel 			interprocess_token)
     72     0  stevel 
     73     0  stevel OM_uint32 *minor_status;
     74     0  stevel gss_ctx_id_t *context_handle;
     75     0  stevel gss_buffer_t interprocess_token;
     76     0  stevel 
     77     0  stevel {
     78     0  stevel 	OM_uint32		status;
     79     0  stevel 	OM_uint32 		length;
     80     0  stevel 	gss_union_ctx_id_t	ctx;
     81     0  stevel 	gss_mechanism		mech;
     82     0  stevel 	gss_buffer_desc		token;
     83     0  stevel 	char			*buf;
     84     0  stevel 
     85  9698   Peter 	status = val_exp_sec_ctx_args(minor_status,
     86  9698   Peter 				context_handle, interprocess_token);
     87  9698   Peter 	if (status != GSS_S_COMPLETE)
     88  9698   Peter 		return (status);
     89     0  stevel 
     90     0  stevel 	/*
     91     0  stevel 	 * select the approprate underlying mechanism routine and
     92     0  stevel 	 * call it.
     93     0  stevel 	 */
     94     0  stevel 
     95     0  stevel 	ctx = (gss_union_ctx_id_t)*context_handle;
     96     0  stevel 	mech = __gss_get_mechanism(ctx->mech_type);
     97     0  stevel 	if (!mech)
     98     0  stevel 		return (GSS_S_BAD_MECH);
     99     0  stevel 	if (!mech->gss_export_sec_context)
    100     0  stevel 		return (GSS_S_UNAVAILABLE);
    101     0  stevel 
    102     0  stevel 	status = mech->gss_export_sec_context(mech->context, minor_status,
    103     0  stevel 					&ctx->internal_ctx_id, &token);
    104     0  stevel 	if (status != GSS_S_COMPLETE)
    105     0  stevel 		return (status);
    106     0  stevel 
    107     0  stevel 	length = token.length + 4 + ctx->mech_type->length;
    108     0  stevel 	interprocess_token->length = length;
    109     0  stevel 	interprocess_token->value = malloc(length);
    110     0  stevel 	if (interprocess_token->value == 0) {
    111     0  stevel 		(void) gss_release_buffer(minor_status, &token);
    112     0  stevel 		return (GSS_S_FAILURE);
    113     0  stevel 	}
    114     0  stevel 	buf = interprocess_token->value;
    115     0  stevel 	length = ctx->mech_type->length;
    116     0  stevel 	buf[3] = (unsigned char) (length & 0xFF);
    117     0  stevel 	length >>= 8;
    118     0  stevel 	buf[2] = (unsigned char) (length & 0xFF);
    119     0  stevel 	length >>= 8;
    120     0  stevel 	buf[1] = (unsigned char) (length & 0xFF);
    121     0  stevel 	length >>= 8;
    122     0  stevel 	buf[0] = (unsigned char) (length & 0xFF);
    123     0  stevel 	(void) memcpy(buf+4, ctx->mech_type->elements,
    124     0  stevel 			(size_t)ctx->mech_type->length);
    125     0  stevel 	(void) memcpy(buf+4+ctx->mech_type->length, token.value, token.length);
    126     0  stevel 
    127     0  stevel 	(void) gss_release_buffer(minor_status, &token);
    128     0  stevel 
    129     0  stevel 	free(ctx->mech_type->elements);
    130     0  stevel 	free(ctx->mech_type);
    131     0  stevel 	free(ctx);
    132     0  stevel 	*context_handle = 0;
    133     0  stevel 
    134     0  stevel 	return (GSS_S_COMPLETE);
    135     0  stevel }
    136