1226031Sstas/*-
2226031Sstas * Copyright (c) 2005 Doug Rabson
3226031Sstas * All rights reserved.
4226031Sstas *
5226031Sstas * Redistribution and use in source and binary forms, with or without
6226031Sstas * modification, are permitted provided that the following conditions
7226031Sstas * are met:
8226031Sstas * 1. Redistributions of source code must retain the above copyright
9226031Sstas *    notice, this list of conditions and the following disclaimer.
10226031Sstas * 2. Redistributions in binary form must reproduce the above copyright
11226031Sstas *    notice, this list of conditions and the following disclaimer in the
12226031Sstas *    documentation and/or other materials provided with the distribution.
13226031Sstas *
14226031Sstas * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15226031Sstas * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16226031Sstas * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17226031Sstas * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18226031Sstas * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19226031Sstas * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20226031Sstas * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21226031Sstas * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22226031Sstas * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23226031Sstas * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24226031Sstas * SUCH DAMAGE.
25226031Sstas *
26226031Sstas *	$FreeBSD: src/lib/libgssapi/gss_export_sec_context.c,v 1.1 2005/12/29 14:40:20 dfr Exp $
27226031Sstas */
28226031Sstas
29226031Sstas#include "mech_locl.h"
30226031Sstas
31226031SstasGSSAPI_LIB_FUNCTION OM_uint32 GSSAPI_LIB_CALL
32226031Sstasgss_export_sec_context(OM_uint32 *minor_status,
33226031Sstas    gss_ctx_id_t *context_handle,
34226031Sstas    gss_buffer_t interprocess_token)
35226031Sstas{
36226031Sstas	OM_uint32 major_status;
37226031Sstas	struct _gss_context *ctx = (struct _gss_context *) *context_handle;
38226031Sstas	gssapi_mech_interface m = ctx->gc_mech;
39226031Sstas	gss_buffer_desc buf;
40226031Sstas
41226031Sstas	_mg_buffer_zero(interprocess_token);
42226031Sstas
43226031Sstas	major_status = m->gm_export_sec_context(minor_status,
44226031Sstas	    &ctx->gc_ctx, &buf);
45226031Sstas
46226031Sstas	if (major_status == GSS_S_COMPLETE) {
47226031Sstas		unsigned char *p;
48226031Sstas
49226031Sstas		free(ctx);
50226031Sstas		*context_handle = GSS_C_NO_CONTEXT;
51226031Sstas		interprocess_token->length = buf.length
52226031Sstas			+ 2 + m->gm_mech_oid.length;
53226031Sstas		interprocess_token->value = malloc(interprocess_token->length);
54226031Sstas		if (!interprocess_token->value) {
55226031Sstas			/*
56226031Sstas			 * We are in trouble here - the context is
57226031Sstas			 * already gone. This is allowed as long as we
58226031Sstas			 * set the caller's context_handle to
59226031Sstas			 * GSS_C_NO_CONTEXT, which we did above.
60226031Sstas			 * Return GSS_S_FAILURE.
61226031Sstas			 */
62226031Sstas			_mg_buffer_zero(interprocess_token);
63226031Sstas			*minor_status = ENOMEM;
64226031Sstas			return (GSS_S_FAILURE);
65226031Sstas		}
66226031Sstas		p = interprocess_token->value;
67226031Sstas		p[0] = m->gm_mech_oid.length >> 8;
68226031Sstas		p[1] = m->gm_mech_oid.length;
69226031Sstas		memcpy(p + 2, m->gm_mech_oid.elements, m->gm_mech_oid.length);
70226031Sstas		memcpy(p + 2 + m->gm_mech_oid.length, buf.value, buf.length);
71226031Sstas		gss_release_buffer(minor_status, &buf);
72226031Sstas	} else {
73226031Sstas		_gss_mg_error(m, major_status, *minor_status);
74226031Sstas	}
75226031Sstas
76226031Sstas	return (major_status);
77226031Sstas}
78