[linux.git] / fs / lockd / xdr.c

/*
 * linux/fs/lockd/xdr.c
 *
 * XDR support for lockd and the lock client.
 *
 * Copyright (C) 1995, 1996 Olaf Kirch <[email protected]>
 */

#include <linux/types.h>
#include <linux/sched.h>
#include <linux/utsname.h>
#include <linux/nfs.h>

#include <linux/sunrpc/xdr.h>
#include <linux/sunrpc/clnt.h>
#include <linux/sunrpc/svc.h>
#include <linux/sunrpc/stats.h>
#include <linux/lockd/lockd.h>
#include <linux/lockd/sm_inter.h>

#define NLMDBG_FACILITY		NLMDBG_XDR


static inline loff_t
s32_to_loff_t(__s32 offset)
{
	return (loff_t)offset;
}

static inline __s32
loff_t_to_s32(loff_t offset)
{
	__s32 res;
	if (offset >= NLM_OFFSET_MAX)
		res = NLM_OFFSET_MAX;
	else if (offset <= -NLM_OFFSET_MAX)
		res = -NLM_OFFSET_MAX;
	else
		res = offset;
	return res;
}

/*
 * XDR functions for basic NLM types
 */
static __be32 *nlm_decode_cookie(__be32 *p, struct nlm_cookie *c)
{
	unsigned int	len;

	len = ntohl(*p++);
	
	if(len==0)
	{
		c->len=4;
		memset(c->data, 0, 4);	/* hockeypux brain damage */
	}
	else if(len<=NLM_MAXCOOKIELEN)
	{
		c->len=len;
		memcpy(c->data, p, len);
		p+=XDR_QUADLEN(len);
	}
	else 
	{
		dprintk("lockd: bad cookie size %d (only cookies under "
			"%d bytes are supported.)\n",
				len, NLM_MAXCOOKIELEN);
		return NULL;
	}
	return p;
}

static inline __be32 *
nlm_encode_cookie(__be32 *p, struct nlm_cookie *c)
{
	*p++ = htonl(c->len);
	memcpy(p, c->data, c->len);
	p+=XDR_QUADLEN(c->len);
	return p;
}

static __be32 *
nlm_decode_fh(__be32 *p, struct nfs_fh *f)
{
	unsigned int	len;

	if ((len = ntohl(*p++)) != NFS2_FHSIZE) {
		dprintk("lockd: bad fhandle size %d (should be %d)\n",
			len, NFS2_FHSIZE);
		return NULL;
	}
	f->size = NFS2_FHSIZE;
	memset(f->data, 0, sizeof(f->data));
	memcpy(f->data, p, NFS2_FHSIZE);
	return p + XDR_QUADLEN(NFS2_FHSIZE);
}

static inline __be32 *
nlm_encode_fh(__be32 *p, struct nfs_fh *f)
{
	*p++ = htonl(NFS2_FHSIZE);
	memcpy(p, f->data, NFS2_FHSIZE);
	return p + XDR_QUADLEN(NFS2_FHSIZE);
}

/*
 * Encode and decode owner handle
 */
static inline __be32 *
nlm_decode_oh(__be32 *p, struct xdr_netobj *oh)
{
	return xdr_decode_netobj(p, oh);
}

static inline __be32 *
nlm_encode_oh(__be32 *p, struct xdr_netobj *oh)
{
	return xdr_encode_netobj(p, oh);
}

static __be32 *
nlm_decode_lock(__be32 *p, struct nlm_lock *lock)
{
	struct file_lock	*fl = &lock->fl;
	s32			start, len, end;

	if (!(p = xdr_decode_string_inplace(p, &lock->caller,
					    &lock->len,
					    NLM_MAXSTRLEN))
	 || !(p = nlm_decode_fh(p, &lock->fh))
	 || !(p = nlm_decode_oh(p, &lock->oh)))
		return NULL;
	lock->svid  = ntohl(*p++);

	locks_init_lock(fl);
	fl->fl_owner = current->files;
	fl->fl_pid   = (pid_t)lock->svid;
	fl->fl_flags = FL_POSIX;
	fl->fl_type  = F_RDLCK;		/* as good as anything else */
	start = ntohl(*p++);
	len = ntohl(*p++);
	end = start + len - 1;

	fl->fl_start = s32_to_loff_t(start);

	if (len == 0 || end < 0)
		fl->fl_end = OFFSET_MAX;
	else
		fl->fl_end = s32_to_loff_t(end);
	return p;
}

/*
 * Encode a lock as part of an NLM call
 */
static __be32 *
nlm_encode_lock(__be32 *p, struct nlm_lock *lock)
{
	struct file_lock	*fl = &lock->fl;
	__s32			start, len;

	if (!(p = xdr_encode_string(p, lock->caller))
	 || !(p = nlm_encode_fh(p, &lock->fh))
	 || !(p = nlm_encode_oh(p, &lock->oh)))
		return NULL;

	if (fl->fl_start > NLM_OFFSET_MAX
	 || (fl->fl_end > NLM_OFFSET_MAX && fl->fl_end != OFFSET_MAX))
		return NULL;

	start = loff_t_to_s32(fl->fl_start);
	if (fl->fl_end == OFFSET_MAX)
		len = 0;
	else
		len = loff_t_to_s32(fl->fl_end - fl->fl_start + 1);

	*p++ = htonl(lock->svid);
	*p++ = htonl(start);
	*p++ = htonl(len);

	return p;
}

/*
 * Encode result of a TEST/TEST_MSG call
 */
static __be32 *
nlm_encode_testres(__be32 *p, struct nlm_res *resp)
{
	s32		start, len;

	if (!(p = nlm_encode_cookie(p, &resp->cookie)))
		return NULL;
	*p++ = resp->status;

	if (resp->status == nlm_lck_denied) {
		struct file_lock	*fl = &resp->lock.fl;

		*p++ = (fl->fl_type == F_RDLCK)? xdr_zero : xdr_one;
		*p++ = htonl(resp->lock.svid);

		/* Encode owner handle. */
		if (!(p = xdr_encode_netobj(p, &resp->lock.oh)))
			return NULL;

		start = loff_t_to_s32(fl->fl_start);
		if (fl->fl_end == OFFSET_MAX)
			len = 0;
		else
			len = loff_t_to_s32(fl->fl_end - fl->fl_start + 1);

		*p++ = htonl(start);
		*p++ = htonl(len);
	}

	return p;
}


/*
 * First, the server side XDR functions
 */
int
nlmsvc_decode_testargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
{
	u32	exclusive;

	if (!(p = nlm_decode_cookie(p, &argp->cookie)))
		return 0;

	exclusive = ntohl(*p++);
	if (!(p = nlm_decode_lock(p, &argp->lock)))
		return 0;
	if (exclusive)
		argp->lock.fl.fl_type = F_WRLCK;

	return xdr_argsize_check(rqstp, p);
}

int
nlmsvc_encode_testres(struct svc_rqst *rqstp, __be32 *p, struct nlm_res *resp)
{
	if (!(p = nlm_encode_testres(p, resp)))
		return 0;
	return xdr_ressize_check(rqstp, p);
}

int
nlmsvc_decode_lockargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
{
	u32	exclusive;

	if (!(p = nlm_decode_cookie(p, &argp->cookie)))
		return 0;
	argp->block  = ntohl(*p++);
	exclusive    = ntohl(*p++);
	if (!(p = nlm_decode_lock(p, &argp->lock)))
		return 0;
	if (exclusive)
		argp->lock.fl.fl_type = F_WRLCK;
	argp->reclaim = ntohl(*p++);
	argp->state   = ntohl(*p++);
	argp->monitor = 1;		/* monitor client by default */

	return xdr_argsize_check(rqstp, p);
}

int
nlmsvc_decode_cancargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
{
	u32	exclusive;

	if (!(p = nlm_decode_cookie(p, &argp->cookie)))
		return 0;
	argp->block = ntohl(*p++);
	exclusive = ntohl(*p++);
	if (!(p = nlm_decode_lock(p, &argp->lock)))
		return 0;
	if (exclusive)
		argp->lock.fl.fl_type = F_WRLCK;
	return xdr_argsize_check(rqstp, p);
}

int
nlmsvc_decode_unlockargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
{
	if (!(p = nlm_decode_cookie(p, &argp->cookie))
	 || !(p = nlm_decode_lock(p, &argp->lock)))
		return 0;
	argp->lock.fl.fl_type = F_UNLCK;
	return xdr_argsize_check(rqstp, p);
}

int
nlmsvc_decode_shareargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
{
	struct nlm_lock	*lock = &argp->lock;

	memset(lock, 0, sizeof(*lock));
	locks_init_lock(&lock->fl);
	lock->svid = ~(u32) 0;
	lock->fl.fl_pid = (pid_t)lock->svid;

	if (!(p = nlm_decode_cookie(p, &argp->cookie))
	 || !(p = xdr_decode_string_inplace(p, &lock->caller,
					    &lock->len, NLM_MAXSTRLEN))
	 || !(p = nlm_decode_fh(p, &lock->fh))
	 || !(p = nlm_decode_oh(p, &lock->oh)))
		return 0;
	argp->fsm_mode = ntohl(*p++);
	argp->fsm_access = ntohl(*p++);
	return xdr_argsize_check(rqstp, p);
}

int
nlmsvc_encode_shareres(struct svc_rqst *rqstp, __be32 *p, struct nlm_res *resp)
{
	if (!(p = nlm_encode_cookie(p, &resp->cookie)))
		return 0;
	*p++ = resp->status;
	*p++ = xdr_zero;		/* sequence argument */
	return xdr_ressize_check(rqstp, p);
}

int
nlmsvc_encode_res(struct svc_rqst *rqstp, __be32 *p, struct nlm_res *resp)
{
	if (!(p = nlm_encode_cookie(p, &resp->cookie)))
		return 0;
	*p++ = resp->status;
	return xdr_ressize_check(rqstp, p);
}

int
nlmsvc_decode_notify(struct svc_rqst *rqstp, __be32 *p, struct nlm_args *argp)
{
	struct nlm_lock	*lock = &argp->lock;

	if (!(p = xdr_decode_string_inplace(p, &lock->caller,
					    &lock->len, NLM_MAXSTRLEN)))
		return 0;
	argp->state = ntohl(*p++);
	return xdr_argsize_check(rqstp, p);
}

int
nlmsvc_decode_reboot(struct svc_rqst *rqstp, __be32 *p, struct nlm_reboot *argp)
{
	if (!(p = xdr_decode_string_inplace(p, &argp->mon, &argp->len, SM_MAXSTRLEN)))
		return 0;
	argp->state = ntohl(*p++);
	/* Preserve the address in network byte order */
	argp->addr = *p++;
	argp->vers = *p++;
	argp->proto = *p++;
	return xdr_argsize_check(rqstp, p);
}

int
nlmsvc_decode_res(struct svc_rqst *rqstp, __be32 *p, struct nlm_res *resp)
{
	if (!(p = nlm_decode_cookie(p, &resp->cookie)))
		return 0;
	resp->status = *p++;
	return xdr_argsize_check(rqstp, p);
}

int
nlmsvc_decode_void(struct svc_rqst *rqstp, __be32 *p, void *dummy)
{
	return xdr_argsize_check(rqstp, p);
}

int
nlmsvc_encode_void(struct svc_rqst *rqstp, __be32 *p, void *dummy)
{
	return xdr_ressize_check(rqstp, p);
}

/*
 * Now, the client side XDR functions
 */
#ifdef NLMCLNT_SUPPORT_SHARES
static int
nlmclt_decode_void(struct rpc_rqst *req, u32 *p, void *ptr)
{
	return 0;
}
#endif

static int
nlmclt_encode_testargs(struct rpc_rqst *req, __be32 *p, nlm_args *argp)
{
	struct nlm_lock	*lock = &argp->lock;

	if (!(p = nlm_encode_cookie(p, &argp->cookie)))
		return -EIO;
	*p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero;
	if (!(p = nlm_encode_lock(p, lock)))
		return -EIO;
	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	return 0;
}

static int
nlmclt_decode_testres(struct rpc_rqst *req, __be32 *p, struct nlm_res *resp)
{
	if (!(p = nlm_decode_cookie(p, &resp->cookie)))
		return -EIO;
	resp->status = *p++;
	if (resp->status == nlm_lck_denied) {
		struct file_lock	*fl = &resp->lock.fl;
		u32			excl;
		s32			start, len, end;

		memset(&resp->lock, 0, sizeof(resp->lock));
		locks_init_lock(fl);
		excl = ntohl(*p++);
		resp->lock.svid = ntohl(*p++);
		fl->fl_pid = (pid_t)resp->lock.svid;
		if (!(p = nlm_decode_oh(p, &resp->lock.oh)))
			return -EIO;

		fl->fl_flags = FL_POSIX;
		fl->fl_type  = excl? F_WRLCK : F_RDLCK;
		start = ntohl(*p++);
		len = ntohl(*p++);
		end = start + len - 1;

		fl->fl_start = s32_to_loff_t(start);
		if (len == 0 || end < 0)
			fl->fl_end = OFFSET_MAX;
		else
			fl->fl_end = s32_to_loff_t(end);
	}
	return 0;
}


static int
nlmclt_encode_lockargs(struct rpc_rqst *req, __be32 *p, nlm_args *argp)
{
	struct nlm_lock	*lock = &argp->lock;

	if (!(p = nlm_encode_cookie(p, &argp->cookie)))
		return -EIO;
	*p++ = argp->block? xdr_one : xdr_zero;
	*p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero;
	if (!(p = nlm_encode_lock(p, lock)))
		return -EIO;
	*p++ = argp->reclaim? xdr_one : xdr_zero;
	*p++ = htonl(argp->state);
	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	return 0;
}

static int
nlmclt_encode_cancargs(struct rpc_rqst *req, __be32 *p, nlm_args *argp)
{
	struct nlm_lock	*lock = &argp->lock;

	if (!(p = nlm_encode_cookie(p, &argp->cookie)))
		return -EIO;
	*p++ = argp->block? xdr_one : xdr_zero;
	*p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero;
	if (!(p = nlm_encode_lock(p, lock)))
		return -EIO;
	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	return 0;
}

static int
nlmclt_encode_unlockargs(struct rpc_rqst *req, __be32 *p, nlm_args *argp)
{
	struct nlm_lock	*lock = &argp->lock;

	if (!(p = nlm_encode_cookie(p, &argp->cookie)))
		return -EIO;
	if (!(p = nlm_encode_lock(p, lock)))
		return -EIO;
	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	return 0;
}

static int
nlmclt_encode_res(struct rpc_rqst *req, __be32 *p, struct nlm_res *resp)
{
	if (!(p = nlm_encode_cookie(p, &resp->cookie)))
		return -EIO;
	*p++ = resp->status;
	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	return 0;
}

static int
nlmclt_encode_testres(struct rpc_rqst *req, __be32 *p, struct nlm_res *resp)
{
	if (!(p = nlm_encode_testres(p, resp)))
		return -EIO;
	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	return 0;
}

static int
nlmclt_decode_res(struct rpc_rqst *req, __be32 *p, struct nlm_res *resp)
{
	if (!(p = nlm_decode_cookie(p, &resp->cookie)))
		return -EIO;
	resp->status = *p++;
	return 0;
}

#if (NLMCLNT_OHSIZE > XDR_MAX_NETOBJ)
#  error "NLM host name cannot be larger than XDR_MAX_NETOBJ!"
#endif

/*
 * Buffer requirements for NLM
 */
#define NLM_void_sz		0
#define NLM_cookie_sz		1+XDR_QUADLEN(NLM_MAXCOOKIELEN)
#define NLM_caller_sz		1+XDR_QUADLEN(NLMCLNT_OHSIZE)
#define NLM_owner_sz		1+XDR_QUADLEN(NLMCLNT_OHSIZE)
#define NLM_fhandle_sz		1+XDR_QUADLEN(NFS2_FHSIZE)
#define NLM_lock_sz		3+NLM_caller_sz+NLM_owner_sz+NLM_fhandle_sz
#define NLM_holder_sz		4+NLM_owner_sz

#define NLM_testargs_sz		NLM_cookie_sz+1+NLM_lock_sz
#define NLM_lockargs_sz		NLM_cookie_sz+4+NLM_lock_sz
#define NLM_cancargs_sz		NLM_cookie_sz+2+NLM_lock_sz
#define NLM_unlockargs_sz	NLM_cookie_sz+NLM_lock_sz

#define NLM_testres_sz		NLM_cookie_sz+1+NLM_holder_sz
#define NLM_res_sz		NLM_cookie_sz+1
#define NLM_norep_sz		0

/*
 * For NLM, a void procedure really returns nothing
 */
#define nlmclt_decode_norep	NULL

#define PROC(proc, argtype, restype)	\
[NLMPROC_##proc] = {							\
	.p_proc      = NLMPROC_##proc,					\
	.p_encode    = (kxdrproc_t) nlmclt_encode_##argtype,		\
	.p_decode    = (kxdrproc_t) nlmclt_decode_##restype,		\
	.p_arglen    = NLM_##argtype##_sz,				\
	.p_replen    = NLM_##restype##_sz,				\
	.p_statidx   = NLMPROC_##proc,					\
	.p_name      = #proc,						\
	}

static struct rpc_procinfo	nlm_procedures[] = {
    PROC(TEST,		testargs,	testres),
    PROC(LOCK,		lockargs,	res),
    PROC(CANCEL,	cancargs,	res),
    PROC(UNLOCK,	unlockargs,	res),
    PROC(GRANTED,	testargs,	res),
    PROC(TEST_MSG,	testargs,	norep),
    PROC(LOCK_MSG,	lockargs,	norep),
    PROC(CANCEL_MSG,	cancargs,	norep),
    PROC(UNLOCK_MSG,	unlockargs,	norep),
    PROC(GRANTED_MSG,	testargs,	norep),
    PROC(TEST_RES,	testres,	norep),
    PROC(LOCK_RES,	res,		norep),
    PROC(CANCEL_RES,	res,		norep),
    PROC(UNLOCK_RES,	res,		norep),
    PROC(GRANTED_RES,	res,		norep),
#ifdef NLMCLNT_SUPPORT_SHARES
    PROC(SHARE,		shareargs,	shareres),
    PROC(UNSHARE,	shareargs,	shareres),
    PROC(NM_LOCK,	lockargs,	res),
    PROC(FREE_ALL,	notify,		void),
#endif
};

static struct rpc_version	nlm_version1 = {
		.number		= 1,
		.nrprocs	= 16,
		.procs		= nlm_procedures,
};

static struct rpc_version	nlm_version3 = {
		.number		= 3,
		.nrprocs	= 24,
		.procs		= nlm_procedures,
};

static struct rpc_version *	nlm_versions[] = {
	[1] = &nlm_version1,
	[3] = &nlm_version3,
#ifdef 	CONFIG_LOCKD_V4
	[4] = &nlm_version4,
#endif
};

static struct rpc_stat		nlm_stats;

struct rpc_program		nlm_program = {
		.name		= "lockd",
		.number		= NLM_PROGRAM,
		.nrvers		= ARRAY_SIZE(nlm_versions),
		.version	= nlm_versions,
		.stats		= &nlm_stats,
};

#ifdef RPC_DEBUG
const char *nlmdbg_cookie2a(const struct nlm_cookie *cookie)
{
	/*
	 * We can get away with a static buffer because we're only
	 * called with BKL held.
	 */
	static char buf[2*NLM_MAXCOOKIELEN+1];
	int i;
	int len = sizeof(buf);
	char *p = buf;

	len--;	/* allow for trailing \0 */
	if (len < 3)
		return "???";
	for (i = 0 ; i < cookie->len ; i++) {
		if (len < 2) {
			strcpy(p-3, "...");
			break;
		}
		sprintf(p, "%02x", cookie->data[i]);
		p += 2;
		len -= 2;
	}
	*p = '\0';

	return buf;
}
#endif
Commit	Line	Data
1da177e4 LT	1	/*
	2	* linux/fs/lockd/xdr.c
	3	*
	4	* XDR support for lockd and the lock client.
	5	*
	6	* Copyright (C) 1995, 1996 Olaf Kirch <[email protected]>
	7	*/
	8
1da177e4 LT	9	#include <linux/types.h>
	10	#include <linux/sched.h>
	11	#include <linux/utsname.h>
	12	#include <linux/nfs.h>
	13
	14	#include <linux/sunrpc/xdr.h>
	15	#include <linux/sunrpc/clnt.h>
	16	#include <linux/sunrpc/svc.h>
	17	#include <linux/sunrpc/stats.h>
	18	#include <linux/lockd/lockd.h>
	19	#include <linux/lockd/sm_inter.h>
	20
	21	#define NLMDBG_FACILITY NLMDBG_XDR
	22
	23
	24	static inline loff_t
	25	s32_to_loff_t(__s32 offset)
	26	{
	27	return (loff_t)offset;
	28	}
	29
	30	static inline __s32
	31	loff_t_to_s32(loff_t offset)
	32	{
	33	__s32 res;
	34	if (offset >= NLM_OFFSET_MAX)
	35	res = NLM_OFFSET_MAX;
	36	else if (offset <= -NLM_OFFSET_MAX)
	37	res = -NLM_OFFSET_MAX;
	38	else
	39	res = offset;
	40	return res;
	41	}
	42
	43	/*
	44	* XDR functions for basic NLM types
	45	*/
52921e02	46	static __be32 nlm_decode_cookie(__be32 p, struct nlm_cookie *c)
1da177e4 LT	47	{
	48	unsigned int len;
	49
	50	len = ntohl(*p++);
	51
	52	if(len==0)
	53	{
	54	c->len=4;
	55	memset(c->data, 0, 4); /* hockeypux brain damage */
	56	}
	57	else if(len<=NLM_MAXCOOKIELEN)
	58	{
	59	c->len=len;
	60	memcpy(c->data, p, len);
	61	p+=XDR_QUADLEN(len);
	62	}
	63	else
	64	{
e159a08b CL	65	dprintk("lockd: bad cookie size %d (only cookies under "
	66	"%d bytes are supported.)\n",
	67	len, NLM_MAXCOOKIELEN);
1da177e4 LT	68	return NULL;
	69	}
	70	return p;
	71	}
	72
52921e02 AV	73	static inline __be32 *
52921e02 AV	74	nlm_encode_cookie(__be32 p, struct nlm_cookie c)
1da177e4 LT	75	{
	76	*p++ = htonl(c->len);
	77	memcpy(p, c->data, c->len);
	78	p+=XDR_QUADLEN(c->len);
	79	return p;
	80	}
	81
52921e02 AV	82	static __be32 *
52921e02 AV	83	nlm_decode_fh(__be32 p, struct nfs_fh f)
1da177e4 LT	84	{
	85	unsigned int len;
	86
	87	if ((len = ntohl(*p++)) != NFS2_FHSIZE) {
e159a08b	88	dprintk("lockd: bad fhandle size %d (should be %d)\n",
1da177e4 LT	89	len, NFS2_FHSIZE);
	90	return NULL;
	91	}
	92	f->size = NFS2_FHSIZE;
	93	memset(f->data, 0, sizeof(f->data));
	94	memcpy(f->data, p, NFS2_FHSIZE);
	95	return p + XDR_QUADLEN(NFS2_FHSIZE);
	96	}
	97
52921e02 AV	98	static inline __be32 *
52921e02 AV	99	nlm_encode_fh(__be32 p, struct nfs_fh f)
1da177e4 LT	100	{
	101	*p++ = htonl(NFS2_FHSIZE);
	102	memcpy(p, f->data, NFS2_FHSIZE);
	103	return p + XDR_QUADLEN(NFS2_FHSIZE);
	104	}
	105
	106	/*
	107	* Encode and decode owner handle
	108	*/
52921e02 AV	109	static inline __be32 *
52921e02 AV	110	nlm_decode_oh(__be32 p, struct xdr_netobj oh)
1da177e4 LT	111	{
	112	return xdr_decode_netobj(p, oh);
	113	}
	114
52921e02 AV	115	static inline __be32 *
52921e02 AV	116	nlm_encode_oh(__be32 p, struct xdr_netobj oh)
1da177e4 LT	117	{
	118	return xdr_encode_netobj(p, oh);
	119	}
	120
52921e02 AV	121	static __be32 *
52921e02 AV	122	nlm_decode_lock(__be32 p, struct nlm_lock lock)
1da177e4 LT	123	{
	124	struct file_lock *fl = &lock->fl;
	125	s32 start, len, end;
	126
	127	if (!(p = xdr_decode_string_inplace(p, &lock->caller,
	128	&lock->len,
	129	NLM_MAXSTRLEN))
	130	\|\| !(p = nlm_decode_fh(p, &lock->fh))
	131	\|\| !(p = nlm_decode_oh(p, &lock->oh)))
	132	return NULL;
7bab377f	133	lock->svid = ntohl(*p++);
1da177e4 LT	134
	135	locks_init_lock(fl);
	136	fl->fl_owner = current->files;
7bab377f	137	fl->fl_pid = (pid_t)lock->svid;
1da177e4 LT	138	fl->fl_flags = FL_POSIX;
	139	fl->fl_type = F_RDLCK; /* as good as anything else */
	140	start = ntohl(*p++);
	141	len = ntohl(*p++);
	142	end = start + len - 1;
	143
	144	fl->fl_start = s32_to_loff_t(start);
	145
	146	if (len == 0 \|\| end < 0)
	147	fl->fl_end = OFFSET_MAX;
	148	else
	149	fl->fl_end = s32_to_loff_t(end);
	150	return p;
	151	}
	152
	153	/*
	154	* Encode a lock as part of an NLM call
	155	*/
52921e02 AV	156	static __be32 *
52921e02 AV	157	nlm_encode_lock(__be32 p, struct nlm_lock lock)
1da177e4 LT	158	{
	159	struct file_lock *fl = &lock->fl;
	160	__s32 start, len;
	161
	162	if (!(p = xdr_encode_string(p, lock->caller))
	163	\|\| !(p = nlm_encode_fh(p, &lock->fh))
	164	\|\| !(p = nlm_encode_oh(p, &lock->oh)))
	165	return NULL;
	166
	167	if (fl->fl_start > NLM_OFFSET_MAX
	168	\|\| (fl->fl_end > NLM_OFFSET_MAX && fl->fl_end != OFFSET_MAX))
	169	return NULL;
	170
	171	start = loff_t_to_s32(fl->fl_start);
	172	if (fl->fl_end == OFFSET_MAX)
	173	len = 0;
	174	else
	175	len = loff_t_to_s32(fl->fl_end - fl->fl_start + 1);
	176
7bab377f	177	*p++ = htonl(lock->svid);
1da177e4 LT	178	*p++ = htonl(start);
	179	*p++ = htonl(len);
	180
	181	return p;
	182	}
	183
	184	/*
	185	* Encode result of a TEST/TEST_MSG call
	186	*/
52921e02 AV	187	static __be32 *
52921e02 AV	188	nlm_encode_testres(__be32 p, struct nlm_res resp)
1da177e4 LT	189	{
	190	s32 start, len;
	191
	192	if (!(p = nlm_encode_cookie(p, &resp->cookie)))
	193	return NULL;
	194	*p++ = resp->status;
	195
	196	if (resp->status == nlm_lck_denied) {
	197	struct file_lock *fl = &resp->lock.fl;
	198
	199	*p++ = (fl->fl_type == F_RDLCK)? xdr_zero : xdr_one;
7bab377f	200	*p++ = htonl(resp->lock.svid);
1da177e4 LT	201
	202	/* Encode owner handle. */
	203	if (!(p = xdr_encode_netobj(p, &resp->lock.oh)))
	204	return NULL;
	205
	206	start = loff_t_to_s32(fl->fl_start);
	207	if (fl->fl_end == OFFSET_MAX)
	208	len = 0;
	209	else
	210	len = loff_t_to_s32(fl->fl_end - fl->fl_start + 1);
	211
	212	*p++ = htonl(start);
	213	*p++ = htonl(len);
	214	}
	215
	216	return p;
	217	}
	218
	219
	220	/*
	221	* First, the server side XDR functions
	222	*/
	223	int
52921e02	224	nlmsvc_decode_testargs(struct svc_rqst rqstp, __be32 p, nlm_args *argp)
1da177e4 LT	225	{
	226	u32 exclusive;
	227
	228	if (!(p = nlm_decode_cookie(p, &argp->cookie)))
	229	return 0;
	230
	231	exclusive = ntohl(*p++);
	232	if (!(p = nlm_decode_lock(p, &argp->lock)))
	233	return 0;
	234	if (exclusive)
	235	argp->lock.fl.fl_type = F_WRLCK;
	236
	237	return xdr_argsize_check(rqstp, p);
	238	}
	239
	240	int
52921e02	241	nlmsvc_encode_testres(struct svc_rqst rqstp, __be32 p, struct nlm_res *resp)
1da177e4 LT	242	{
	243	if (!(p = nlm_encode_testres(p, resp)))
	244	return 0;
	245	return xdr_ressize_check(rqstp, p);
	246	}
	247
	248	int
52921e02	249	nlmsvc_decode_lockargs(struct svc_rqst rqstp, __be32 p, nlm_args *argp)
1da177e4 LT	250	{
	251	u32 exclusive;
	252
	253	if (!(p = nlm_decode_cookie(p, &argp->cookie)))
	254	return 0;
	255	argp->block = ntohl(*p++);
	256	exclusive = ntohl(*p++);
	257	if (!(p = nlm_decode_lock(p, &argp->lock)))
	258	return 0;
	259	if (exclusive)
	260	argp->lock.fl.fl_type = F_WRLCK;
	261	argp->reclaim = ntohl(*p++);
	262	argp->state = ntohl(*p++);
	263	argp->monitor = 1; /* monitor client by default */
	264
	265	return xdr_argsize_check(rqstp, p);
	266	}
	267
	268	int
52921e02	269	nlmsvc_decode_cancargs(struct svc_rqst rqstp, __be32 p, nlm_args *argp)
1da177e4 LT	270	{
	271	u32 exclusive;
	272
	273	if (!(p = nlm_decode_cookie(p, &argp->cookie)))
	274	return 0;
	275	argp->block = ntohl(*p++);
	276	exclusive = ntohl(*p++);
	277	if (!(p = nlm_decode_lock(p, &argp->lock)))
	278	return 0;
	279	if (exclusive)
	280	argp->lock.fl.fl_type = F_WRLCK;
	281	return xdr_argsize_check(rqstp, p);
	282	}
	283
	284	int
52921e02	285	nlmsvc_decode_unlockargs(struct svc_rqst rqstp, __be32 p, nlm_args *argp)
1da177e4 LT	286	{
	287	if (!(p = nlm_decode_cookie(p, &argp->cookie))
	288	\|\| !(p = nlm_decode_lock(p, &argp->lock)))
	289	return 0;
	290	argp->lock.fl.fl_type = F_UNLCK;
	291	return xdr_argsize_check(rqstp, p);
	292	}
	293
	294	int
52921e02	295	nlmsvc_decode_shareargs(struct svc_rqst rqstp, __be32 p, nlm_args *argp)
1da177e4 LT	296	{
	297	struct nlm_lock *lock = &argp->lock;
	298
	299	memset(lock, 0, sizeof(*lock));
	300	locks_init_lock(&lock->fl);
7bab377f TM	301	lock->svid = ~(u32) 0;
7bab377f TM	302	lock->fl.fl_pid = (pid_t)lock->svid;
1da177e4 LT	303
	304	if (!(p = nlm_decode_cookie(p, &argp->cookie))
	305	\|\| !(p = xdr_decode_string_inplace(p, &lock->caller,
	306	&lock->len, NLM_MAXSTRLEN))
	307	\|\| !(p = nlm_decode_fh(p, &lock->fh))
	308	\|\| !(p = nlm_decode_oh(p, &lock->oh)))
	309	return 0;
	310	argp->fsm_mode = ntohl(*p++);
	311	argp->fsm_access = ntohl(*p++);
	312	return xdr_argsize_check(rqstp, p);
	313	}
	314
	315	int
52921e02	316	nlmsvc_encode_shareres(struct svc_rqst rqstp, __be32 p, struct nlm_res *resp)
1da177e4 LT	317	{
	318	if (!(p = nlm_encode_cookie(p, &resp->cookie)))
	319	return 0;
	320	*p++ = resp->status;
	321	p++ = xdr_zero; / sequence argument */
	322	return xdr_ressize_check(rqstp, p);
	323	}
	324
	325	int
52921e02	326	nlmsvc_encode_res(struct svc_rqst rqstp, __be32 p, struct nlm_res *resp)
1da177e4 LT	327	{
	328	if (!(p = nlm_encode_cookie(p, &resp->cookie)))
	329	return 0;
	330	*p++ = resp->status;
	331	return xdr_ressize_check(rqstp, p);
	332	}
	333
	334	int
52921e02	335	nlmsvc_decode_notify(struct svc_rqst rqstp, __be32 p, struct nlm_args *argp)
1da177e4 LT	336	{
	337	struct nlm_lock *lock = &argp->lock;
	338
	339	if (!(p = xdr_decode_string_inplace(p, &lock->caller,
	340	&lock->len, NLM_MAXSTRLEN)))
	341	return 0;
	342	argp->state = ntohl(*p++);
	343	return xdr_argsize_check(rqstp, p);
	344	}
	345
	346	int
52921e02	347	nlmsvc_decode_reboot(struct svc_rqst rqstp, __be32 p, struct nlm_reboot *argp)
1da177e4 LT	348	{
	349	if (!(p = xdr_decode_string_inplace(p, &argp->mon, &argp->len, SM_MAXSTRLEN)))
	350	return 0;
	351	argp->state = ntohl(*p++);
	352	/* Preserve the address in network byte order */
	353	argp->addr = *p++;
	354	argp->vers = *p++;
	355	argp->proto = *p++;
	356	return xdr_argsize_check(rqstp, p);
	357	}
	358
	359	int
52921e02	360	nlmsvc_decode_res(struct svc_rqst rqstp, __be32 p, struct nlm_res *resp)
1da177e4 LT	361	{
	362	if (!(p = nlm_decode_cookie(p, &resp->cookie)))
	363	return 0;
e8c5c045	364	resp->status = *p++;
1da177e4 LT	365	return xdr_argsize_check(rqstp, p);
	366	}
	367
	368	int
52921e02	369	nlmsvc_decode_void(struct svc_rqst rqstp, __be32 p, void *dummy)
1da177e4 LT	370	{
	371	return xdr_argsize_check(rqstp, p);
	372	}
	373
	374	int
52921e02	375	nlmsvc_encode_void(struct svc_rqst rqstp, __be32 p, void *dummy)
1da177e4 LT	376	{
	377	return xdr_ressize_check(rqstp, p);
	378	}
	379
	380	/*
	381	* Now, the client side XDR functions
	382	*/
	383	#ifdef NLMCLNT_SUPPORT_SHARES
	384	static int
	385	nlmclt_decode_void(struct rpc_rqst req, u32 p, void *ptr)
	386	{
	387	return 0;
	388	}
	389	#endif
	390
	391	static int
52921e02	392	nlmclt_encode_testargs(struct rpc_rqst req, __be32 p, nlm_args *argp)
1da177e4 LT	393	{
	394	struct nlm_lock *lock = &argp->lock;
	395
	396	if (!(p = nlm_encode_cookie(p, &argp->cookie)))
	397	return -EIO;
	398	*p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero;
	399	if (!(p = nlm_encode_lock(p, lock)))
	400	return -EIO;
	401	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	402	return 0;
	403	}
	404
	405	static int
52921e02	406	nlmclt_decode_testres(struct rpc_rqst req, __be32 p, struct nlm_res *resp)
1da177e4 LT	407	{
	408	if (!(p = nlm_decode_cookie(p, &resp->cookie)))
	409	return -EIO;
e8c5c045 AV	410	resp->status = *p++;
e8c5c045 AV	411	if (resp->status == nlm_lck_denied) {
1da177e4 LT	412	struct file_lock *fl = &resp->lock.fl;
	413	u32 excl;
	414	s32 start, len, end;
	415
	416	memset(&resp->lock, 0, sizeof(resp->lock));
	417	locks_init_lock(fl);
	418	excl = ntohl(*p++);
7bab377f TM	419	resp->lock.svid = ntohl(*p++);
7bab377f TM	420	fl->fl_pid = (pid_t)resp->lock.svid;
1da177e4 LT	421	if (!(p = nlm_decode_oh(p, &resp->lock.oh)))
	422	return -EIO;
	423
	424	fl->fl_flags = FL_POSIX;
	425	fl->fl_type = excl? F_WRLCK : F_RDLCK;
	426	start = ntohl(*p++);
	427	len = ntohl(*p++);
	428	end = start + len - 1;
	429
	430	fl->fl_start = s32_to_loff_t(start);
	431	if (len == 0 \|\| end < 0)
	432	fl->fl_end = OFFSET_MAX;
	433	else
	434	fl->fl_end = s32_to_loff_t(end);
	435	}
	436	return 0;
	437	}
	438
	439
	440	static int
52921e02	441	nlmclt_encode_lockargs(struct rpc_rqst req, __be32 p, nlm_args *argp)
1da177e4 LT	442	{
	443	struct nlm_lock *lock = &argp->lock;
	444
	445	if (!(p = nlm_encode_cookie(p, &argp->cookie)))
	446	return -EIO;
	447	*p++ = argp->block? xdr_one : xdr_zero;
	448	*p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero;
	449	if (!(p = nlm_encode_lock(p, lock)))
	450	return -EIO;
	451	*p++ = argp->reclaim? xdr_one : xdr_zero;
	452	*p++ = htonl(argp->state);
	453	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	454	return 0;
	455	}
	456
	457	static int
52921e02	458	nlmclt_encode_cancargs(struct rpc_rqst req, __be32 p, nlm_args *argp)
1da177e4 LT	459	{
	460	struct nlm_lock *lock = &argp->lock;
	461
	462	if (!(p = nlm_encode_cookie(p, &argp->cookie)))
	463	return -EIO;
	464	*p++ = argp->block? xdr_one : xdr_zero;
	465	*p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero;
	466	if (!(p = nlm_encode_lock(p, lock)))
	467	return -EIO;
	468	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	469	return 0;
	470	}
	471
	472	static int
52921e02	473	nlmclt_encode_unlockargs(struct rpc_rqst req, __be32 p, nlm_args *argp)
1da177e4 LT	474	{
	475	struct nlm_lock *lock = &argp->lock;
	476
	477	if (!(p = nlm_encode_cookie(p, &argp->cookie)))
	478	return -EIO;
	479	if (!(p = nlm_encode_lock(p, lock)))
	480	return -EIO;
	481	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	482	return 0;
	483	}
	484
	485	static int
52921e02	486	nlmclt_encode_res(struct rpc_rqst req, __be32 p, struct nlm_res *resp)
1da177e4 LT	487	{
	488	if (!(p = nlm_encode_cookie(p, &resp->cookie)))
	489	return -EIO;
	490	*p++ = resp->status;
	491	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	492	return 0;
	493	}
	494
	495	static int
52921e02	496	nlmclt_encode_testres(struct rpc_rqst req, __be32 p, struct nlm_res *resp)
1da177e4 LT	497	{
	498	if (!(p = nlm_encode_testres(p, resp)))
	499	return -EIO;
	500	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
	501	return 0;
	502	}
	503
	504	static int
52921e02	505	nlmclt_decode_res(struct rpc_rqst req, __be32 p, struct nlm_res *resp)
1da177e4 LT	506	{
	507	if (!(p = nlm_decode_cookie(p, &resp->cookie)))
	508	return -EIO;
e8c5c045	509	resp->status = *p++;
1da177e4 LT	510	return 0;
	511	}
	512
511d2e88 CL	513	#if (NLMCLNT_OHSIZE > XDR_MAX_NETOBJ)
	514	# error "NLM host name cannot be larger than XDR_MAX_NETOBJ!"
	515	#endif
	516
1da177e4 LT	517	/*
	518	* Buffer requirements for NLM
	519	*/
	520	#define NLM_void_sz 0
	521	#define NLM_cookie_sz 1+XDR_QUADLEN(NLM_MAXCOOKIELEN)
511d2e88 CL	522	#define NLM_caller_sz 1+XDR_QUADLEN(NLMCLNT_OHSIZE)
511d2e88 CL	523	#define NLM_owner_sz 1+XDR_QUADLEN(NLMCLNT_OHSIZE)
1da177e4	524	#define NLM_fhandle_sz 1+XDR_QUADLEN(NFS2_FHSIZE)
511d2e88 CL	525	#define NLM_lock_sz 3+NLM_caller_sz+NLM_owner_sz+NLM_fhandle_sz
511d2e88 CL	526	#define NLM_holder_sz 4+NLM_owner_sz
1da177e4 LT	527
	528	#define NLM_testargs_sz NLM_cookie_sz+1+NLM_lock_sz
	529	#define NLM_lockargs_sz NLM_cookie_sz+4+NLM_lock_sz
	530	#define NLM_cancargs_sz NLM_cookie_sz+2+NLM_lock_sz
	531	#define NLM_unlockargs_sz NLM_cookie_sz+NLM_lock_sz
	532
	533	#define NLM_testres_sz NLM_cookie_sz+1+NLM_holder_sz
	534	#define NLM_res_sz NLM_cookie_sz+1
	535	#define NLM_norep_sz 0
	536
1da177e4 LT	537	/*
	538	* For NLM, a void procedure really returns nothing
	539	*/
	540	#define nlmclt_decode_norep NULL
	541
	542	#define PROC(proc, argtype, restype) \
	543	[NLMPROC_##proc] = { \
	544	.p_proc = NLMPROC_##proc, \
	545	.p_encode = (kxdrproc_t) nlmclt_encode_##argtype, \
	546	.p_decode = (kxdrproc_t) nlmclt_decode_##restype, \
2bea90d4 CL	547	.p_arglen = NLM_##argtype##_sz, \
2bea90d4 CL	548	.p_replen = NLM_##restype##_sz, \
cc0175c1 CL	549	.p_statidx = NLMPROC_##proc, \
cc0175c1 CL	550	.p_name = #proc, \
1da177e4 LT	551	}
	552
	553	static struct rpc_procinfo nlm_procedures[] = {
	554	PROC(TEST, testargs, testres),
	555	PROC(LOCK, lockargs, res),
	556	PROC(CANCEL, cancargs, res),
	557	PROC(UNLOCK, unlockargs, res),
	558	PROC(GRANTED, testargs, res),
	559	PROC(TEST_MSG, testargs, norep),
	560	PROC(LOCK_MSG, lockargs, norep),
	561	PROC(CANCEL_MSG, cancargs, norep),
	562	PROC(UNLOCK_MSG, unlockargs, norep),
	563	PROC(GRANTED_MSG, testargs, norep),
	564	PROC(TEST_RES, testres, norep),
	565	PROC(LOCK_RES, res, norep),
	566	PROC(CANCEL_RES, res, norep),
	567	PROC(UNLOCK_RES, res, norep),
	568	PROC(GRANTED_RES, res, norep),
	569	#ifdef NLMCLNT_SUPPORT_SHARES
	570	PROC(SHARE, shareargs, shareres),
	571	PROC(UNSHARE, shareargs, shareres),
	572	PROC(NM_LOCK, lockargs, res),
	573	PROC(FREE_ALL, notify, void),
	574	#endif
	575	};
	576
	577	static struct rpc_version nlm_version1 = {
	578	.number = 1,
	579	.nrprocs = 16,
	580	.procs = nlm_procedures,
	581	};
	582
	583	static struct rpc_version nlm_version3 = {
	584	.number = 3,
	585	.nrprocs = 24,
	586	.procs = nlm_procedures,
	587	};
	588
1da177e4 LT	589	static struct rpc_version * nlm_versions[] = {
	590	[1] = &nlm_version1,
	591	[3] = &nlm_version3,
	592	#ifdef CONFIG_LOCKD_V4
	593	[4] = &nlm_version4,
	594	#endif
	595	};
	596
	597	static struct rpc_stat nlm_stats;
	598
	599	struct rpc_program nlm_program = {
	600	.name = "lockd",
	601	.number = NLM_PROGRAM,
e8c96f8c	602	.nrvers = ARRAY_SIZE(nlm_versions),
1da177e4 LT	603	.version = nlm_versions,
	604	.stats = &nlm_stats,
	605	};
	606
	607	#ifdef RPC_DEBUG
	608	const char nlmdbg_cookie2a(const struct nlm_cookie cookie)
	609	{
	610	/*
	611	* We can get away with a static buffer because we're only
	612	* called with BKL held.
	613	*/
	614	static char buf[2*NLM_MAXCOOKIELEN+1];
	615	int i;
	616	int len = sizeof(buf);
	617	char *p = buf;
	618
	619	len--; /* allow for trailing \0 */
	620	if (len < 3)
	621	return "???";
	622	for (i = 0 ; i < cookie->len ; i++) {
	623	if (len < 2) {
	624	strcpy(p-3, "...");
	625	break;
	626	}
	627	sprintf(p, "%02x", cookie->data[i]);
	628	p += 2;
	629	len -= 2;
	630	}
	631	*p = '\0';
	632
	633	return buf;
	634	}
	635	#endif