[linux-2.6-block.git] / net / sunrpc / auth_gss / gss_rpc_upcall.c

/*
 *  linux/net/sunrpc/gss_rpc_upcall.c
 *
 *  Copyright (C) 2012 Simo Sorce <simo@redhat.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

#include <linux/types.h>
#include <linux/un.h>

#include <linux/sunrpc/svcauth.h>
#include "gss_rpc_upcall.h"

#define GSSPROXY_SOCK_PATHNAME	"/var/run/gssproxy.sock"

#define GSSPROXY_PROGRAM	(400112u)
#define GSSPROXY_VERS_1		(1u)

/*
 * Encoding/Decoding functions
 */

enum {
	GSSX_NULL = 0,	/* Unused */
        GSSX_INDICATE_MECHS = 1,
        GSSX_GET_CALL_CONTEXT = 2,
        GSSX_IMPORT_AND_CANON_NAME = 3,
        GSSX_EXPORT_CRED = 4,
        GSSX_IMPORT_CRED = 5,
        GSSX_ACQUIRE_CRED = 6,
        GSSX_STORE_CRED = 7,
        GSSX_INIT_SEC_CONTEXT = 8,
        GSSX_ACCEPT_SEC_CONTEXT = 9,
        GSSX_RELEASE_HANDLE = 10,
        GSSX_GET_MIC = 11,
        GSSX_VERIFY = 12,
        GSSX_WRAP = 13,
        GSSX_UNWRAP = 14,
        GSSX_WRAP_SIZE_LIMIT = 15,
};

#define PROC(proc, name)				\
[GSSX_##proc] = {					\
	.p_proc   = GSSX_##proc,			\
	.p_encode = gssx_enc_##name,	\
	.p_decode = gssx_dec_##name,	\
	.p_arglen = GSSX_ARG_##name##_sz,		\
	.p_replen = GSSX_RES_##name##_sz, 		\
	.p_statidx = GSSX_##proc,			\
	.p_name   = #proc,				\
}

static const struct rpc_procinfo gssp_procedures[] = {
	PROC(INDICATE_MECHS, indicate_mechs),
        PROC(GET_CALL_CONTEXT, get_call_context),
        PROC(IMPORT_AND_CANON_NAME, import_and_canon_name),
        PROC(EXPORT_CRED, export_cred),
        PROC(IMPORT_CRED, import_cred),
        PROC(ACQUIRE_CRED, acquire_cred),
        PROC(STORE_CRED, store_cred),
        PROC(INIT_SEC_CONTEXT, init_sec_context),
        PROC(ACCEPT_SEC_CONTEXT, accept_sec_context),
        PROC(RELEASE_HANDLE, release_handle),
        PROC(GET_MIC, get_mic),
        PROC(VERIFY, verify),
        PROC(WRAP, wrap),
        PROC(UNWRAP, unwrap),
        PROC(WRAP_SIZE_LIMIT, wrap_size_limit),
};


/*
 * Common transport functions
 */

static const struct rpc_program gssp_program;

static int gssp_rpc_create(struct net *net, struct rpc_clnt **_clnt)
{
	static const struct sockaddr_un gssp_localaddr = {
		.sun_family		= AF_LOCAL,
		.sun_path		= GSSPROXY_SOCK_PATHNAME,
	};
	struct rpc_create_args args = {
		.net		= net,
		.protocol	= XPRT_TRANSPORT_LOCAL,
		.address	= (struct sockaddr *)&gssp_localaddr,
		.addrsize	= sizeof(gssp_localaddr),
		.servername	= "localhost",
		.program	= &gssp_program,
		.version	= GSSPROXY_VERS_1,
		.authflavor	= RPC_AUTH_NULL,
		/*
		 * Note we want connection to be done in the caller's
		 * filesystem namespace.  We therefore turn off the idle
		 * timeout, which would result in reconnections being
		 * done without the correct namespace:
		 */
		.flags		= RPC_CLNT_CREATE_NOPING |
				  RPC_CLNT_CREATE_NO_IDLE_TIMEOUT
	};
	struct rpc_clnt *clnt;
	int result = 0;

	clnt = rpc_create(&args);
	if (IS_ERR(clnt)) {
		dprintk("RPC:       failed to create AF_LOCAL gssproxy "
				"client (errno %ld).\n", PTR_ERR(clnt));
		result = PTR_ERR(clnt);
		*_clnt = NULL;
		goto out;
	}

	dprintk("RPC:       created new gssp local client (gssp_local_clnt: "
			"%p)\n", clnt);
	*_clnt = clnt;

out:
	return result;
}

void init_gssp_clnt(struct sunrpc_net *sn)
{
	mutex_init(&sn->gssp_lock);
	sn->gssp_clnt = NULL;
}

int set_gssp_clnt(struct net *net)
{
	struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
	struct rpc_clnt *clnt;
	int ret;

	mutex_lock(&sn->gssp_lock);
	ret = gssp_rpc_create(net, &clnt);
	if (!ret) {
		if (sn->gssp_clnt)
			rpc_shutdown_client(sn->gssp_clnt);
		sn->gssp_clnt = clnt;
	}
	mutex_unlock(&sn->gssp_lock);
	return ret;
}

void clear_gssp_clnt(struct sunrpc_net *sn)
{
	mutex_lock(&sn->gssp_lock);
	if (sn->gssp_clnt) {
		rpc_shutdown_client(sn->gssp_clnt);
		sn->gssp_clnt = NULL;
	}
	mutex_unlock(&sn->gssp_lock);
}

static struct rpc_clnt *get_gssp_clnt(struct sunrpc_net *sn)
{
	struct rpc_clnt *clnt;

	mutex_lock(&sn->gssp_lock);
	clnt = sn->gssp_clnt;
	if (clnt)
		atomic_inc(&clnt->cl_count);
	mutex_unlock(&sn->gssp_lock);
	return clnt;
}

static int gssp_call(struct net *net, struct rpc_message *msg)
{
	struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
	struct rpc_clnt *clnt;
	int status;

	clnt = get_gssp_clnt(sn);
	if (!clnt)
		return -EIO;
	status = rpc_call_sync(clnt, msg, 0);
	if (status < 0) {
		dprintk("gssp: rpc_call returned error %d\n", -status);
		switch (status) {
		case -EPROTONOSUPPORT:
			status = -EINVAL;
			break;
		case -ECONNREFUSED:
		case -ETIMEDOUT:
		case -ENOTCONN:
			status = -EAGAIN;
			break;
		case -ERESTARTSYS:
			if (signalled ())
				status = -EINTR;
			break;
		default:
			break;
		}
	}
	rpc_release_client(clnt);
	return status;
}

static void gssp_free_receive_pages(struct gssx_arg_accept_sec_context *arg)
{
	int i;

	for (i = 0; i < arg->npages && arg->pages[i]; i++)
		__free_page(arg->pages[i]);

	kfree(arg->pages);
}

static int gssp_alloc_receive_pages(struct gssx_arg_accept_sec_context *arg)
{
	arg->npages = DIV_ROUND_UP(NGROUPS_MAX * 4, PAGE_SIZE);
	arg->pages = kcalloc(arg->npages, sizeof(struct page *), GFP_KERNEL);
	/*
	 * XXX: actual pages are allocated by xdr layer in
	 * xdr_partial_copy_from_skb.
	 */
	if (!arg->pages)
		return -ENOMEM;
	return 0;
}

static char *gssp_stringify(struct xdr_netobj *netobj)
{
	return kstrndup(netobj->data, netobj->len, GFP_KERNEL);
}

static void gssp_hostbased_service(char **principal)
{
	char *c;

	if (!*principal)
		return;

	/* terminate and remove realm part */
	c = strchr(*principal, '@');
	if (c) {
		*c = '\0';

		/* change service-hostname delimiter */
		c = strchr(*principal, '/');
		if (c)
			*c = '@';
	}
	if (!c) {
		/* not a service principal */
		kfree(*principal);
		*principal = NULL;
	}
}

/*
 * Public functions
 */

/* numbers somewhat arbitrary but large enough for current needs */
#define GSSX_MAX_OUT_HANDLE	128
#define GSSX_MAX_SRC_PRINC	256
#define GSSX_KMEMBUF (GSSX_max_output_handle_sz + \
			GSSX_max_oid_sz + \
			GSSX_max_princ_sz + \
			sizeof(struct svc_cred))

int gssp_accept_sec_context_upcall(struct net *net,
				struct gssp_upcall_data *data)
{
	struct gssx_ctx ctxh = {
		.state = data->in_handle
	};
	struct gssx_arg_accept_sec_context arg = {
		.input_token = data->in_token,
	};
	struct gssx_ctx rctxh = {
		/*
		 * pass in the max length we expect for each of these
		 * buffers but let the xdr code kmalloc them:
		 */
		.exported_context_token.len = GSSX_max_output_handle_sz,
		.mech.len = GSS_OID_MAX_LEN,
		.targ_name.display_name.len = GSSX_max_princ_sz,
		.src_name.display_name.len = GSSX_max_princ_sz
	};
	struct gssx_res_accept_sec_context res = {
		.context_handle = &rctxh,
		.output_token = &data->out_token
	};
	struct rpc_message msg = {
		.rpc_proc = &gssp_procedures[GSSX_ACCEPT_SEC_CONTEXT],
		.rpc_argp = &arg,
		.rpc_resp = &res,
		.rpc_cred = NULL, /* FIXME ? */
	};
	struct xdr_netobj client_name = { 0 , NULL };
	struct xdr_netobj target_name = { 0, NULL };
	int ret;

	if (data->in_handle.len != 0)
		arg.context_handle = &ctxh;
	res.output_token->len = GSSX_max_output_token_sz;

	ret = gssp_alloc_receive_pages(&arg);
	if (ret)
		return ret;

	ret = gssp_call(net, &msg);

	gssp_free_receive_pages(&arg);

	/* we need to fetch all data even in case of error so
	 * that we can free special strctures is they have been allocated */
	data->major_status = res.status.major_status;
	data->minor_status = res.status.minor_status;
	if (res.context_handle) {
		data->out_handle = rctxh.exported_context_token;
		data->mech_oid.len = rctxh.mech.len;
		if (rctxh.mech.data) {
			memcpy(data->mech_oid.data, rctxh.mech.data,
						data->mech_oid.len);
			kfree(rctxh.mech.data);
		}
		client_name = rctxh.src_name.display_name;
		target_name = rctxh.targ_name.display_name;
	}

	if (res.options.count == 1) {
		gssx_buffer *value = &res.options.data[0].value;
		/* Currently we only decode CREDS_VALUE, if we add
		 * anything else we'll have to loop and match on the
		 * option name */
		if (value->len == 1) {
			/* steal group info from struct svc_cred */
			data->creds = *(struct svc_cred *)value->data;
			data->found_creds = 1;
		}
		/* whether we use it or not, free data */
		kfree(value->data);
	}

	if (res.options.count != 0) {
		kfree(res.options.data);
	}

	/* convert to GSS_NT_HOSTBASED_SERVICE form and set into creds */
	if (data->found_creds) {
		if (client_name.data) {
			data->creds.cr_raw_principal =
					gssp_stringify(&client_name);
			data->creds.cr_principal =
					gssp_stringify(&client_name);
			gssp_hostbased_service(&data->creds.cr_principal);
		}
		if (target_name.data) {
			data->creds.cr_targ_princ =
					gssp_stringify(&target_name);
			gssp_hostbased_service(&data->creds.cr_targ_princ);
		}
	}
	kfree(client_name.data);
	kfree(target_name.data);

	return ret;
}

void gssp_free_upcall_data(struct gssp_upcall_data *data)
{
	kfree(data->in_handle.data);
	kfree(data->out_handle.data);
	kfree(data->out_token.data);
	free_svc_cred(&data->creds);
}

/*
 * Initialization stuff
 */
static unsigned int gssp_version1_counts[ARRAY_SIZE(gssp_procedures)];
static const struct rpc_version gssp_version1 = {
	.number		= GSSPROXY_VERS_1,
	.nrprocs	= ARRAY_SIZE(gssp_procedures),
	.procs		= gssp_procedures,
	.counts		= gssp_version1_counts,
};

static const struct rpc_version *gssp_version[] = {
	NULL,
	&gssp_version1,
};

static struct rpc_stat gssp_stats;

static const struct rpc_program gssp_program = {
	.name		= "gssproxy",
	.number		= GSSPROXY_PROGRAM,
	.nrvers		= ARRAY_SIZE(gssp_version),
	.version	= gssp_version,
	.stats		= &gssp_stats,
};
Commit	Line	Data
1d658336 SS	1	/*
	2	* linux/net/sunrpc/gss_rpc_upcall.c
	3	*
	4	* Copyright (C) 2012 Simo Sorce <simo@redhat.com>
	5	*
	6	* This program is free software; you can redistribute it and/or modify
	7	* it under the terms of the GNU General Public License as published by
	8	* the Free Software Foundation; either version 2 of the License, or
	9	* (at your option) any later version.
	10	*
	11	* This program is distributed in the hope that it will be useful,
	12	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	14	* GNU General Public License for more details.
	15	*
	16	* You should have received a copy of the GNU General Public License
	17	* along with this program; if not, write to the Free Software
	18	* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
	19	*/
	20
	21	#include <linux/types.h>
	22	#include <linux/un.h>
	23
	24	#include <linux/sunrpc/svcauth.h>
	25	#include "gss_rpc_upcall.h"
	26
	27	#define GSSPROXY_SOCK_PATHNAME "/var/run/gssproxy.sock"
	28
	29	#define GSSPROXY_PROGRAM (400112u)
	30	#define GSSPROXY_VERS_1 (1u)
	31
	32	/*
	33	* Encoding/Decoding functions
	34	*/
	35
	36	enum {
	37	GSSX_NULL = 0, /* Unused */
	38	GSSX_INDICATE_MECHS = 1,
	39	GSSX_GET_CALL_CONTEXT = 2,
	40	GSSX_IMPORT_AND_CANON_NAME = 3,
	41	GSSX_EXPORT_CRED = 4,
	42	GSSX_IMPORT_CRED = 5,
	43	GSSX_ACQUIRE_CRED = 6,
	44	GSSX_STORE_CRED = 7,
	45	GSSX_INIT_SEC_CONTEXT = 8,
	46	GSSX_ACCEPT_SEC_CONTEXT = 9,
	47	GSSX_RELEASE_HANDLE = 10,
	48	GSSX_GET_MIC = 11,
	49	GSSX_VERIFY = 12,
	50	GSSX_WRAP = 13,
	51	GSSX_UNWRAP = 14,
	52	GSSX_WRAP_SIZE_LIMIT = 15,
	53	};
	54
	55	#define PROC(proc, name) \
	56	[GSSX_##proc] = { \
	57	.p_proc = GSSX_##proc, \
89daf360	58	.p_encode = gssx_enc_##name, \
305c6241	59	.p_decode = gssx_dec_##name, \
1d658336 SS	60	.p_arglen = GSSX_ARG_##name##_sz, \
	61	.p_replen = GSSX_RES_##name##_sz, \
	62	.p_statidx = GSSX_##proc, \
	63	.p_name = #proc, \
	64	}
	65
499b4988	66	static const struct rpc_procinfo gssp_procedures[] = {
1d658336 SS	67	PROC(INDICATE_MECHS, indicate_mechs),
	68	PROC(GET_CALL_CONTEXT, get_call_context),
	69	PROC(IMPORT_AND_CANON_NAME, import_and_canon_name),
	70	PROC(EXPORT_CRED, export_cred),
	71	PROC(IMPORT_CRED, import_cred),
	72	PROC(ACQUIRE_CRED, acquire_cred),
	73	PROC(STORE_CRED, store_cred),
	74	PROC(INIT_SEC_CONTEXT, init_sec_context),
	75	PROC(ACCEPT_SEC_CONTEXT, accept_sec_context),
	76	PROC(RELEASE_HANDLE, release_handle),
	77	PROC(GET_MIC, get_mic),
	78	PROC(VERIFY, verify),
	79	PROC(WRAP, wrap),
	80	PROC(UNWRAP, unwrap),
	81	PROC(WRAP_SIZE_LIMIT, wrap_size_limit),
	82	};
	83
	84
	85
	86	/*
	87	* Common transport functions
	88	*/
	89
	90	static const struct rpc_program gssp_program;
	91
	92	static int gssp_rpc_create(struct net net, struct rpc_clnt *_clnt)
	93	{
	94	static const struct sockaddr_un gssp_localaddr = {
	95	.sun_family = AF_LOCAL,
	96	.sun_path = GSSPROXY_SOCK_PATHNAME,
	97	};
	98	struct rpc_create_args args = {
	99	.net = net,
	100	.protocol = XPRT_TRANSPORT_LOCAL,
	101	.address = (struct sockaddr *)&gssp_localaddr,
	102	.addrsize = sizeof(gssp_localaddr),
	103	.servername = "localhost",
	104	.program = &gssp_program,
	105	.version = GSSPROXY_VERS_1,
	106	.authflavor = RPC_AUTH_NULL,
	107	/*
	108	* Note we want connection to be done in the caller's
	109	* filesystem namespace. We therefore turn off the idle
	110	* timeout, which would result in reconnections being
	111	* done without the correct namespace:
	112	*/
	113	.flags = RPC_CLNT_CREATE_NOPING \|
	114	RPC_CLNT_CREATE_NO_IDLE_TIMEOUT
	115	};
	116	struct rpc_clnt *clnt;
	117	int result = 0;
	118
	119	clnt = rpc_create(&args);
	120	if (IS_ERR(clnt)) {
	121	dprintk("RPC: failed to create AF_LOCAL gssproxy "
	122	"client (errno %ld).\n", PTR_ERR(clnt));
9f96392b	123	result = PTR_ERR(clnt);
1d658336 SS	124	*_clnt = NULL;
	125	goto out;
	126	}
	127
	128	dprintk("RPC: created new gssp local client (gssp_local_clnt: "
	129	"%p)\n", clnt);
	130	*_clnt = clnt;
	131
	132	out:
	133	return result;
	134	}
	135
	136	void init_gssp_clnt(struct sunrpc_net *sn)
	137	{
	138	mutex_init(&sn->gssp_lock);
	139	sn->gssp_clnt = NULL;
	140	}
	141
	142	int set_gssp_clnt(struct net *net)
	143	{
	144	struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
	145	struct rpc_clnt *clnt;
	146	int ret;
	147
	148	mutex_lock(&sn->gssp_lock);
	149	ret = gssp_rpc_create(net, &clnt);
	150	if (!ret) {
	151	if (sn->gssp_clnt)
	152	rpc_shutdown_client(sn->gssp_clnt);
	153	sn->gssp_clnt = clnt;
	154	}
	155	mutex_unlock(&sn->gssp_lock);
	156	return ret;
	157	}
	158
	159	void clear_gssp_clnt(struct sunrpc_net *sn)
	160	{
	161	mutex_lock(&sn->gssp_lock);
	162	if (sn->gssp_clnt) {
	163	rpc_shutdown_client(sn->gssp_clnt);
	164	sn->gssp_clnt = NULL;
	165	}
	166	mutex_unlock(&sn->gssp_lock);
	167	}
	168
	169	static struct rpc_clnt get_gssp_clnt(struct sunrpc_net sn)
	170	{
	171	struct rpc_clnt *clnt;
	172
	173	mutex_lock(&sn->gssp_lock);
	174	clnt = sn->gssp_clnt;
	175	if (clnt)
	176	atomic_inc(&clnt->cl_count);
	177	mutex_unlock(&sn->gssp_lock);
	178	return clnt;
	179	}
	180
	181	static int gssp_call(struct net net, struct rpc_message msg)
	182	{
	183	struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
	184	struct rpc_clnt *clnt;
	185	int status;
	186
	187	clnt = get_gssp_clnt(sn);
188	if (!clnt)
189	return -EIO;
190	status = rpc_call_sync(clnt, msg, 0);
191	if (status < 0) {
192	dprintk("gssp: rpc_call returned error %d\n", -status);
193	switch (status) {
194	case -EPROTONOSUPPORT:
195	status = -EINVAL;
196	break;
197	case -ECONNREFUSED:
198	case -ETIMEDOUT:
199	case -ENOTCONN:
200	status = -EAGAIN;
201	break;
202	case -ERESTARTSYS:
203	if (signalled ())
204	status = -EINTR;
205	break;
206	default:
207	break;
208	}
209	}
210	rpc_release_client(clnt);
211	return status;
212	}
213
9dfd87da BF	214	static void gssp_free_receive_pages(struct gssx_arg_accept_sec_context *arg)
	215	{
	216	int i;
	217
	218	for (i = 0; i < arg->npages && arg->pages[i]; i++)
	219	__free_page(arg->pages[i]);
a1d1e9be DR	220
a1d1e9be DR	221	kfree(arg->pages);
9dfd87da BF	222	}
	223
	224	static int gssp_alloc_receive_pages(struct gssx_arg_accept_sec_context *arg)
	225	{
9dfd87da	226	arg->npages = DIV_ROUND_UP(NGROUPS_MAX * 4, PAGE_SIZE);
6396bb22	227	arg->pages = kcalloc(arg->npages, sizeof(struct page *), GFP_KERNEL);
d4a51656 BF	228	/*
	229	* XXX: actual pages are allocated by xdr layer in
	230	* xdr_partial_copy_from_skb.
	231	*/
	232	if (!arg->pages)
	233	return -ENOMEM;
9dfd87da BF	234	return 0;
9dfd87da BF	235	}
1d658336	236
9abdda5d CL	237	static char gssp_stringify(struct xdr_netobj netobj)
	238	{
	239	return kstrndup(netobj->data, netobj->len, GFP_KERNEL);
	240	}
	241
	242	static void gssp_hostbased_service(char **principal)
	243	{
	244	char *c;
	245
	246	if (!*principal)
	247	return;
	248
	249	/* terminate and remove realm part */
	250	c = strchr(*principal, '@');
	251	if (c) {
	252	*c = '\0';
	253
	254	/* change service-hostname delimiter */
	255	c = strchr(*principal, '/');
	256	if (c)
	257	*c = '@';
	258	}
	259	if (!c) {
	260	/* not a service principal */
	261	kfree(*principal);
	262	*principal = NULL;
	263	}
	264	}
	265
1d658336 SS	266	/*
	267	* Public functions
	268	*/
	269
	270	/* numbers somewhat arbitrary but large enough for current needs */
	271	#define GSSX_MAX_OUT_HANDLE 128
1d658336 SS	272	#define GSSX_MAX_SRC_PRINC 256
	273	#define GSSX_KMEMBUF (GSSX_max_output_handle_sz + \
	274	GSSX_max_oid_sz + \
	275	GSSX_max_princ_sz + \
	276	sizeof(struct svc_cred))
	277
	278	int gssp_accept_sec_context_upcall(struct net *net,
	279	struct gssp_upcall_data *data)
	280	{
	281	struct gssx_ctx ctxh = {
	282	.state = data->in_handle
	283	};
	284	struct gssx_arg_accept_sec_context arg = {
	285	.input_token = data->in_token,
	286	};
	287	struct gssx_ctx rctxh = {
	288	/*
	289	* pass in the max length we expect for each of these
	290	* buffers but let the xdr code kmalloc them:
	291	*/
	292	.exported_context_token.len = GSSX_max_output_handle_sz,
b1df7637	293	.mech.len = GSS_OID_MAX_LEN,
9abdda5d	294	.targ_name.display_name.len = GSSX_max_princ_sz,
1d658336 SS	295	.src_name.display_name.len = GSSX_max_princ_sz
	296	};
	297	struct gssx_res_accept_sec_context res = {
	298	.context_handle = &rctxh,
	299	.output_token = &data->out_token
	300	};
	301	struct rpc_message msg = {
	302	.rpc_proc = &gssp_procedures[GSSX_ACCEPT_SEC_CONTEXT],
	303	.rpc_argp = &arg,
	304	.rpc_resp = &res,
	305	.rpc_cred = NULL, /* FIXME ? */
	306	};
	307	struct xdr_netobj client_name = { 0 , NULL };
9abdda5d	308	struct xdr_netobj target_name = { 0, NULL };
1d658336 SS	309	int ret;
	310
	311	if (data->in_handle.len != 0)
	312	arg.context_handle = &ctxh;
	313	res.output_token->len = GSSX_max_output_token_sz;
	314
9dfd87da BF	315	ret = gssp_alloc_receive_pages(&arg);
	316	if (ret)
	317	return ret;
	318
1d658336 SS	319	ret = gssp_call(net, &msg);
1d658336 SS	320
9dfd87da BF	321	gssp_free_receive_pages(&arg);
9dfd87da BF	322
1d658336 SS	323	/* we need to fetch all data even in case of error so
	324	* that we can free special strctures is they have been allocated */
	325	data->major_status = res.status.major_status;
	326	data->minor_status = res.status.minor_status;
	327	if (res.context_handle) {
	328	data->out_handle = rctxh.exported_context_token;
b1df7637	329	data->mech_oid.len = rctxh.mech.len;
0070ed3d	330	if (rctxh.mech.data) {
c66080ad	331	memcpy(data->mech_oid.data, rctxh.mech.data,
b1df7637	332	data->mech_oid.len);
0070ed3d DW	333	kfree(rctxh.mech.data);
0070ed3d DW	334	}
1d658336	335	client_name = rctxh.src_name.display_name;
9abdda5d	336	target_name = rctxh.targ_name.display_name;
1d658336 SS	337	}
	338
	339	if (res.options.count == 1) {
	340	gssx_buffer *value = &res.options.data[0].value;
	341	/* Currently we only decode CREDS_VALUE, if we add
	342	* anything else we'll have to loop and match on the
	343	* option name */
	344	if (value->len == 1) {
	345	/* steal group info from struct svc_cred */
	346	data->creds = (struct svc_cred )value->data;
	347	data->found_creds = 1;
	348	}
	349	/* whether we use it or not, free data */
	350	kfree(value->data);
	351	}
	352
	353	if (res.options.count != 0) {
	354	kfree(res.options.data);
	355	}
	356
	357	/* convert to GSS_NT_HOSTBASED_SERVICE form and set into creds */
9abdda5d CL	358	if (data->found_creds) {
	359	if (client_name.data) {
	360	data->creds.cr_raw_principal =
	361	gssp_stringify(&client_name);
	362	data->creds.cr_principal =
	363	gssp_stringify(&client_name);
	364	gssp_hostbased_service(&data->creds.cr_principal);
	365	}
	366	if (target_name.data) {
	367	data->creds.cr_targ_princ =
	368	gssp_stringify(&target_name);
	369	gssp_hostbased_service(&data->creds.cr_targ_princ);
1d658336 SS	370	}
	371	}
	372	kfree(client_name.data);
9abdda5d	373	kfree(target_name.data);
1d658336 SS	374
	375	return ret;
	376	}
	377
	378	void gssp_free_upcall_data(struct gssp_upcall_data *data)
	379	{
	380	kfree(data->in_handle.data);
	381	kfree(data->out_handle.data);
	382	kfree(data->out_token.data);
1d658336 SS	383	free_svc_cred(&data->creds);
	384	}
	385
	386	/*
	387	* Initialization stuff
	388	*/
1c5876dd	389	static unsigned int gssp_version1_counts[ARRAY_SIZE(gssp_procedures)];
1d658336 SS	390	static const struct rpc_version gssp_version1 = {
	391	.number = GSSPROXY_VERS_1,
	392	.nrprocs = ARRAY_SIZE(gssp_procedures),
	393	.procs = gssp_procedures,
1c5876dd	394	.counts = gssp_version1_counts,
1d658336 SS	395	};
	396
	397	static const struct rpc_version *gssp_version[] = {
	398	NULL,
	399	&gssp_version1,
	400	};
	401
	402	static struct rpc_stat gssp_stats;
	403
	404	static const struct rpc_program gssp_program = {
	405	.name = "gssproxy",
	406	.number = GSSPROXY_PROGRAM,
	407	.nrvers = ARRAY_SIZE(gssp_version),
	408	.version = gssp_version,
	409	.stats = &gssp_stats,
	410	};