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

/*
 * linux/fs/lockd/svc4proc.c
 *
 * Lockd server procedures. We don't implement the NLM_*_RES 
 * procedures because we don't use the async procedures.
 *
 * Copyright (C) 1996, Olaf Kirch <[email protected]>
 */

#include <linux/types.h>
#include <linux/time.h>
#include <linux/lockd/lockd.h>
#include <linux/lockd/share.h>

#define NLMDBG_FACILITY		NLMDBG_CLIENT

/*
 * Obtain client and file from arguments
 */
static __be32
nlm4svc_retrieve_args(struct svc_rqst *rqstp, struct nlm_args *argp,
			struct nlm_host **hostp, struct nlm_file **filp)
{
	struct nlm_host		*host = NULL;
	struct nlm_file		*file = NULL;
	struct nlm_lock		*lock = &argp->lock;
	__be32			error = 0;

	/* nfsd callbacks must have been installed for this procedure */
	if (!nlmsvc_ops)
		return nlm_lck_denied_nolocks;

	/* Obtain host handle */
	if (!(host = nlmsvc_lookup_host(rqstp, lock->caller, lock->len))
	 || (argp->monitor && nsm_monitor(host) < 0))
		goto no_locks;
	*hostp = host;

	/* Obtain file pointer. Not used by FREE_ALL call. */
	if (filp != NULL) {
		if ((error = nlm_lookup_file(rqstp, &file, &lock->fh)) != 0)
			goto no_locks;
		*filp = file;

		/* Set up the missing parts of the file_lock structure */
		lock->fl.fl_file  = file->f_file;
		lock->fl.fl_owner = (fl_owner_t) host;
		lock->fl.fl_lmops = &nlmsvc_lock_operations;
	}

	return 0;

no_locks:
	nlmsvc_release_host(host);
 	if (error)
		return error;	
	return nlm_lck_denied_nolocks;
}

/*
 * NULL: Test for presence of service
 */
static __be32
nlm4svc_proc_null(struct svc_rqst *rqstp, void *argp, void *resp)
{
	dprintk("lockd: NULL          called\n");
	return rpc_success;
}

/*
 * TEST: Check for conflicting lock
 */
static __be32
nlm4svc_proc_test(struct svc_rqst *rqstp, struct nlm_args *argp,
				         struct nlm_res  *resp)
{
	struct nlm_host	*host;
	struct nlm_file	*file;
	__be32 rc = rpc_success;

	dprintk("lockd: TEST4        called\n");
	resp->cookie = argp->cookie;

	/* Obtain client and file */
	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
		return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;

	/* Now check for conflicting locks */
	resp->status = nlmsvc_testlock(rqstp, file, host, &argp->lock, &resp->lock, &resp->cookie);
	if (resp->status == nlm_drop_reply)
		rc = rpc_drop_reply;
	else
		dprintk("lockd: TEST4        status %d\n", ntohl(resp->status));

	nlmsvc_release_host(host);
	nlm_release_file(file);
	return rc;
}

static __be32
nlm4svc_proc_lock(struct svc_rqst *rqstp, struct nlm_args *argp,
				         struct nlm_res  *resp)
{
	struct nlm_host	*host;
	struct nlm_file	*file;
	__be32 rc = rpc_success;

	dprintk("lockd: LOCK          called\n");

	resp->cookie = argp->cookie;

	/* Obtain client and file */
	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
		return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;

#if 0
	/* If supplied state doesn't match current state, we assume it's
	 * an old request that time-warped somehow. Any error return would
	 * do in this case because it's irrelevant anyway.
	 *
	 * NB: We don't retrieve the remote host's state yet.
	 */
	if (host->h_nsmstate && host->h_nsmstate != argp->state) {
		resp->status = nlm_lck_denied_nolocks;
	} else
#endif

	/* Now try to lock the file */
	resp->status = nlmsvc_lock(rqstp, file, host, &argp->lock,
					argp->block, &argp->cookie,
					argp->reclaim);
	if (resp->status == nlm_drop_reply)
		rc = rpc_drop_reply;
	else
		dprintk("lockd: LOCK         status %d\n", ntohl(resp->status));

	nlmsvc_release_host(host);
	nlm_release_file(file);
	return rc;
}

static __be32
nlm4svc_proc_cancel(struct svc_rqst *rqstp, struct nlm_args *argp,
				           struct nlm_res  *resp)
{
	struct nlm_host	*host;
	struct nlm_file	*file;

	dprintk("lockd: CANCEL        called\n");

	resp->cookie = argp->cookie;

	/* Don't accept requests during grace period */
	if (locks_in_grace()) {
		resp->status = nlm_lck_denied_grace_period;
		return rpc_success;
	}

	/* Obtain client and file */
	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
		return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;

	/* Try to cancel request. */
	resp->status = nlmsvc_cancel_blocked(file, &argp->lock);

	dprintk("lockd: CANCEL        status %d\n", ntohl(resp->status));
	nlmsvc_release_host(host);
	nlm_release_file(file);
	return rpc_success;
}

/*
 * UNLOCK: release a lock
 */
static __be32
nlm4svc_proc_unlock(struct svc_rqst *rqstp, struct nlm_args *argp,
				           struct nlm_res  *resp)
{
	struct nlm_host	*host;
	struct nlm_file	*file;

	dprintk("lockd: UNLOCK        called\n");

	resp->cookie = argp->cookie;

	/* Don't accept new lock requests during grace period */
	if (locks_in_grace()) {
		resp->status = nlm_lck_denied_grace_period;
		return rpc_success;
	}

	/* Obtain client and file */
	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
		return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;

	/* Now try to remove the lock */
	resp->status = nlmsvc_unlock(file, &argp->lock);

	dprintk("lockd: UNLOCK        status %d\n", ntohl(resp->status));
	nlmsvc_release_host(host);
	nlm_release_file(file);
	return rpc_success;
}

/*
 * GRANTED: A server calls us to tell that a process' lock request
 * was granted
 */
static __be32
nlm4svc_proc_granted(struct svc_rqst *rqstp, struct nlm_args *argp,
				            struct nlm_res  *resp)
{
	resp->cookie = argp->cookie;

	dprintk("lockd: GRANTED       called\n");
	resp->status = nlmclnt_grant(svc_addr(rqstp), &argp->lock);
	dprintk("lockd: GRANTED       status %d\n", ntohl(resp->status));
	return rpc_success;
}

/*
 * This is the generic lockd callback for async RPC calls
 */
static void nlm4svc_callback_exit(struct rpc_task *task, void *data)
{
	dprintk("lockd: %5u callback returned %d\n", task->tk_pid,
			-task->tk_status);
}

static void nlm4svc_callback_release(void *data)
{
	nlmsvc_release_call(data);
}

static const struct rpc_call_ops nlm4svc_callback_ops = {
	.rpc_call_done = nlm4svc_callback_exit,
	.rpc_release = nlm4svc_callback_release,
};

/*
 * `Async' versions of the above service routines. They aren't really,
 * because we send the callback before the reply proper. I hope this
 * doesn't break any clients.
 */
static __be32 nlm4svc_callback(struct svc_rqst *rqstp, u32 proc, struct nlm_args *argp,
		__be32 (*func)(struct svc_rqst *, struct nlm_args *, struct nlm_res  *))
{
	struct nlm_host	*host;
	struct nlm_rqst	*call;
	__be32 stat;

	host = nlmsvc_lookup_host(rqstp,
				  argp->lock.caller,
				  argp->lock.len);
	if (host == NULL)
		return rpc_system_err;

	call = nlm_alloc_call(host);
	if (call == NULL)
		return rpc_system_err;

	stat = func(rqstp, argp, &call->a_res);
	if (stat != 0) {
		nlmsvc_release_call(call);
		return stat;
	}

	call->a_flags = RPC_TASK_ASYNC;
	if (nlm_async_reply(call, proc, &nlm4svc_callback_ops) < 0)
		return rpc_system_err;
	return rpc_success;
}

static __be32 nlm4svc_proc_test_msg(struct svc_rqst *rqstp, struct nlm_args *argp,
					     void	     *resp)
{
	dprintk("lockd: TEST_MSG      called\n");
	return nlm4svc_callback(rqstp, NLMPROC_TEST_RES, argp, nlm4svc_proc_test);
}

static __be32 nlm4svc_proc_lock_msg(struct svc_rqst *rqstp, struct nlm_args *argp,
					     void	     *resp)
{
	dprintk("lockd: LOCK_MSG      called\n");
	return nlm4svc_callback(rqstp, NLMPROC_LOCK_RES, argp, nlm4svc_proc_lock);
}

static __be32 nlm4svc_proc_cancel_msg(struct svc_rqst *rqstp, struct nlm_args *argp,
					       void	       *resp)
{
	dprintk("lockd: CANCEL_MSG    called\n");
	return nlm4svc_callback(rqstp, NLMPROC_CANCEL_RES, argp, nlm4svc_proc_cancel);
}

static __be32 nlm4svc_proc_unlock_msg(struct svc_rqst *rqstp, struct nlm_args *argp,
                                               void            *resp)
{
	dprintk("lockd: UNLOCK_MSG    called\n");
	return nlm4svc_callback(rqstp, NLMPROC_UNLOCK_RES, argp, nlm4svc_proc_unlock);
}

static __be32 nlm4svc_proc_granted_msg(struct svc_rqst *rqstp, struct nlm_args *argp,
                                                void            *resp)
{
	dprintk("lockd: GRANTED_MSG   called\n");
	return nlm4svc_callback(rqstp, NLMPROC_GRANTED_RES, argp, nlm4svc_proc_granted);
}

/*
 * SHARE: create a DOS share or alter existing share.
 */
static __be32
nlm4svc_proc_share(struct svc_rqst *rqstp, struct nlm_args *argp,
				          struct nlm_res  *resp)
{
	struct nlm_host	*host;
	struct nlm_file	*file;

	dprintk("lockd: SHARE         called\n");

	resp->cookie = argp->cookie;

	/* Don't accept new lock requests during grace period */
	if (locks_in_grace() && !argp->reclaim) {
		resp->status = nlm_lck_denied_grace_period;
		return rpc_success;
	}

	/* Obtain client and file */
	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
		return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;

	/* Now try to create the share */
	resp->status = nlmsvc_share_file(host, file, argp);

	dprintk("lockd: SHARE         status %d\n", ntohl(resp->status));
	nlmsvc_release_host(host);
	nlm_release_file(file);
	return rpc_success;
}

/*
 * UNSHARE: Release a DOS share.
 */
static __be32
nlm4svc_proc_unshare(struct svc_rqst *rqstp, struct nlm_args *argp,
				            struct nlm_res  *resp)
{
	struct nlm_host	*host;
	struct nlm_file	*file;

	dprintk("lockd: UNSHARE       called\n");

	resp->cookie = argp->cookie;

	/* Don't accept requests during grace period */
	if (locks_in_grace()) {
		resp->status = nlm_lck_denied_grace_period;
		return rpc_success;
	}

	/* Obtain client and file */
	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
		return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;

	/* Now try to lock the file */
	resp->status = nlmsvc_unshare_file(host, file, argp);

	dprintk("lockd: UNSHARE       status %d\n", ntohl(resp->status));
	nlmsvc_release_host(host);
	nlm_release_file(file);
	return rpc_success;
}

/*
 * NM_LOCK: Create an unmonitored lock
 */
static __be32
nlm4svc_proc_nm_lock(struct svc_rqst *rqstp, struct nlm_args *argp,
				            struct nlm_res  *resp)
{
	dprintk("lockd: NM_LOCK       called\n");

	argp->monitor = 0;		/* just clean the monitor flag */
	return nlm4svc_proc_lock(rqstp, argp, resp);
}

/*
 * FREE_ALL: Release all locks and shares held by client
 */
static __be32
nlm4svc_proc_free_all(struct svc_rqst *rqstp, struct nlm_args *argp,
					     void            *resp)
{
	struct nlm_host	*host;

	/* Obtain client */
	if (nlm4svc_retrieve_args(rqstp, argp, &host, NULL))
		return rpc_success;

	nlmsvc_free_host_resources(host);
	nlmsvc_release_host(host);
	return rpc_success;
}

/*
 * SM_NOTIFY: private callback from statd (not part of official NLM proto)
 */
static __be32
nlm4svc_proc_sm_notify(struct svc_rqst *rqstp, struct nlm_reboot *argp,
					      void	        *resp)
{
	dprintk("lockd: SM_NOTIFY     called\n");

	if (!nlm_privileged_requester(rqstp)) {
		char buf[RPC_MAX_ADDRBUFLEN];
		printk(KERN_WARNING "lockd: rejected NSM callback from %s\n",
				svc_print_addr(rqstp, buf, sizeof(buf)));
		return rpc_system_err;
	}

	nlm_host_rebooted(argp);
	return rpc_success;
}

/*
 * client sent a GRANTED_RES, let's remove the associated block
 */
static __be32
nlm4svc_proc_granted_res(struct svc_rqst *rqstp, struct nlm_res  *argp,
                                                void            *resp)
{
        if (!nlmsvc_ops)
                return rpc_success;

        dprintk("lockd: GRANTED_RES   called\n");

        nlmsvc_grant_reply(&argp->cookie, argp->status);
        return rpc_success;
}


/*
 * NLM Server procedures.
 */

#define nlm4svc_encode_norep	nlm4svc_encode_void
#define nlm4svc_decode_norep	nlm4svc_decode_void
#define nlm4svc_decode_testres	nlm4svc_decode_void
#define nlm4svc_decode_lockres	nlm4svc_decode_void
#define nlm4svc_decode_unlockres	nlm4svc_decode_void
#define nlm4svc_decode_cancelres	nlm4svc_decode_void
#define nlm4svc_decode_grantedres	nlm4svc_decode_void

#define nlm4svc_proc_none	nlm4svc_proc_null
#define nlm4svc_proc_test_res	nlm4svc_proc_null
#define nlm4svc_proc_lock_res	nlm4svc_proc_null
#define nlm4svc_proc_cancel_res	nlm4svc_proc_null
#define nlm4svc_proc_unlock_res	nlm4svc_proc_null

struct nlm_void			{ int dummy; };

#define PROC(name, xargt, xrest, argt, rest, respsize)	\
 { .pc_func	= (svc_procfunc) nlm4svc_proc_##name,	\
   .pc_decode	= (kxdrproc_t) nlm4svc_decode_##xargt,	\
   .pc_encode	= (kxdrproc_t) nlm4svc_encode_##xrest,	\
   .pc_release	= NULL,					\
   .pc_argsize	= sizeof(struct nlm_##argt),		\
   .pc_ressize	= sizeof(struct nlm_##rest),		\
   .pc_xdrressize = respsize,				\
 }
#define	Ck	(1+XDR_QUADLEN(NLM_MAXCOOKIELEN))	/* cookie */
#define	No	(1+1024/4)				/* netobj */
#define	St	1					/* status */
#define	Rg	4					/* range (offset + length) */
struct svc_procedure		nlmsvc_procedures4[] = {
  PROC(null,		void,		void,		void,	void, 1),
  PROC(test,		testargs,	testres,	args,	res, Ck+St+2+No+Rg),
  PROC(lock,		lockargs,	res,		args,	res, Ck+St),
  PROC(cancel,		cancargs,	res,		args,	res, Ck+St),
  PROC(unlock,		unlockargs,	res,		args,	res, Ck+St),
  PROC(granted,		testargs,	res,		args,	res, Ck+St),
  PROC(test_msg,	testargs,	norep,		args,	void, 1),
  PROC(lock_msg,	lockargs,	norep,		args,	void, 1),
  PROC(cancel_msg,	cancargs,	norep,		args,	void, 1),
  PROC(unlock_msg,	unlockargs,	norep,		args,	void, 1),
  PROC(granted_msg,	testargs,	norep,		args,	void, 1),
  PROC(test_res,	testres,	norep,		res,	void, 1),
  PROC(lock_res,	lockres,	norep,		res,	void, 1),
  PROC(cancel_res,	cancelres,	norep,		res,	void, 1),
  PROC(unlock_res,	unlockres,	norep,		res,	void, 1),
  PROC(granted_res,	res,		norep,		res,	void, 1),
  /* statd callback */
  PROC(sm_notify,	reboot,		void,		reboot,	void, 1),
  PROC(none,		void,		void,		void,	void, 0),
  PROC(none,		void,		void,		void,	void, 0),
  PROC(none,		void,		void,		void,	void, 0),
  PROC(share,		shareargs,	shareres,	args,	res, Ck+St+1),
  PROC(unshare,		shareargs,	shareres,	args,	res, Ck+St+1),
  PROC(nm_lock,		lockargs,	res,		args,	res, Ck+St),
  PROC(free_all,	notify,		void,		args,	void, 1),

};
Commit	Line	Data
1da177e4 LT	1	/*
	2	* linux/fs/lockd/svc4proc.c
	3	*
	4	* Lockd server procedures. We don't implement the NLM_*_RES
	5	* procedures because we don't use the async procedures.
	6	*
	7	* Copyright (C) 1996, Olaf Kirch <[email protected]>
	8	*/
	9
	10	#include <linux/types.h>
	11	#include <linux/time.h>
1da177e4 LT	12	#include <linux/lockd/lockd.h>
1da177e4 LT	13	#include <linux/lockd/share.h>
1da177e4 LT	14
	15	#define NLMDBG_FACILITY NLMDBG_CLIENT
	16
1da177e4 LT	17	/*
	18	* Obtain client and file from arguments
	19	*/
52921e02	20	static __be32
1da177e4 LT	21	nlm4svc_retrieve_args(struct svc_rqst rqstp, struct nlm_args argp,
	22	struct nlm_host hostp, struct nlm_file filp)
	23	{
	24	struct nlm_host *host = NULL;
	25	struct nlm_file *file = NULL;
	26	struct nlm_lock *lock = &argp->lock;
52921e02	27	__be32 error = 0;
1da177e4 LT	28
	29	/* nfsd callbacks must have been installed for this procedure */
	30	if (!nlmsvc_ops)
	31	return nlm_lck_denied_nolocks;
	32
	33	/* Obtain host handle */
db4e4c9a	34	if (!(host = nlmsvc_lookup_host(rqstp, lock->caller, lock->len))
977faf39	35	\|\| (argp->monitor && nsm_monitor(host) < 0))
1da177e4 LT	36	goto no_locks;
	37	*hostp = host;
	38
	39	/* Obtain file pointer. Not used by FREE_ALL call. */
	40	if (filp != NULL) {
	41	if ((error = nlm_lookup_file(rqstp, &file, &lock->fh)) != 0)
	42	goto no_locks;
	43	*filp = file;
	44
	45	/* Set up the missing parts of the file_lock structure */
	46	lock->fl.fl_file = file->f_file;
	47	lock->fl.fl_owner = (fl_owner_t) host;
	48	lock->fl.fl_lmops = &nlmsvc_lock_operations;
	49	}
	50
	51	return 0;
	52
	53	no_locks:
67216b94	54	nlmsvc_release_host(host);
1da177e4 LT	55	if (error)
	56	return error;
	57	return nlm_lck_denied_nolocks;
	58	}
	59
	60	/*
	61	* NULL: Test for presence of service
	62	*/
7111c66e	63	static __be32
1da177e4 LT	64	nlm4svc_proc_null(struct svc_rqst rqstp, void argp, void *resp)
	65	{
	66	dprintk("lockd: NULL called\n");
	67	return rpc_success;
	68	}
	69
	70	/*
	71	* TEST: Check for conflicting lock
	72	*/
7111c66e	73	static __be32
1da177e4 LT	74	nlm4svc_proc_test(struct svc_rqst rqstp, struct nlm_args argp,
	75	struct nlm_res *resp)
	76	{
	77	struct nlm_host *host;
	78	struct nlm_file *file;
317602f3	79	__be32 rc = rpc_success;
1da177e4 LT	80
	81	dprintk("lockd: TEST4 called\n");
	82	resp->cookie = argp->cookie;
	83
1da177e4 LT	84	/* Obtain client and file */
1da177e4 LT	85	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
d343fce1	86	return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;
1da177e4 LT	87
1da177e4 LT	88	/* Now check for conflicting locks */
8f920d5e	89	resp->status = nlmsvc_testlock(rqstp, file, host, &argp->lock, &resp->lock, &resp->cookie);
5ea0d750	90	if (resp->status == nlm_drop_reply)
b7e6b869 OD	91	rc = rpc_drop_reply;
	92	else
	93	dprintk("lockd: TEST4 status %d\n", ntohl(resp->status));
1da177e4	94
67216b94	95	nlmsvc_release_host(host);
1da177e4	96	nlm_release_file(file);
b7e6b869	97	return rc;
1da177e4 LT	98	}
1da177e4 LT	99
7111c66e	100	static __be32
1da177e4 LT	101	nlm4svc_proc_lock(struct svc_rqst rqstp, struct nlm_args argp,
	102	struct nlm_res *resp)
	103	{
	104	struct nlm_host *host;
	105	struct nlm_file *file;
317602f3	106	__be32 rc = rpc_success;
1da177e4 LT	107
	108	dprintk("lockd: LOCK called\n");
	109
	110	resp->cookie = argp->cookie;
	111
1da177e4 LT	112	/* Obtain client and file */
1da177e4 LT	113	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
d343fce1	114	return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;
1da177e4 LT	115
	116	#if 0
	117	/* If supplied state doesn't match current state, we assume it's
	118	* an old request that time-warped somehow. Any error return would
	119	* do in this case because it's irrelevant anyway.
	120	*
	121	* NB: We don't retrieve the remote host's state yet.
	122	*/
	123	if (host->h_nsmstate && host->h_nsmstate != argp->state) {
	124	resp->status = nlm_lck_denied_nolocks;
	125	} else
	126	#endif
	127
	128	/* Now try to lock the file */
6cde4de8	129	resp->status = nlmsvc_lock(rqstp, file, host, &argp->lock,
b2b50289 BF	130	argp->block, &argp->cookie,
b2b50289 BF	131	argp->reclaim);
1a8322b2	132	if (resp->status == nlm_drop_reply)
b7e6b869 OD	133	rc = rpc_drop_reply;
	134	else
	135	dprintk("lockd: LOCK status %d\n", ntohl(resp->status));
1da177e4	136
67216b94	137	nlmsvc_release_host(host);
1da177e4	138	nlm_release_file(file);
b7e6b869	139	return rc;
1da177e4 LT	140	}
1da177e4 LT	141
7111c66e	142	static __be32
1da177e4 LT	143	nlm4svc_proc_cancel(struct svc_rqst rqstp, struct nlm_args argp,
	144	struct nlm_res *resp)
	145	{
	146	struct nlm_host *host;
	147	struct nlm_file *file;
	148
	149	dprintk("lockd: CANCEL called\n");
	150
	151	resp->cookie = argp->cookie;
	152
	153	/* Don't accept requests during grace period */
af558e33	154	if (locks_in_grace()) {
1da177e4 LT	155	resp->status = nlm_lck_denied_grace_period;
	156	return rpc_success;
	157	}
	158
	159	/* Obtain client and file */
	160	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
d343fce1	161	return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;
1da177e4 LT	162
	163	/* Try to cancel request. */
	164	resp->status = nlmsvc_cancel_blocked(file, &argp->lock);
	165
	166	dprintk("lockd: CANCEL status %d\n", ntohl(resp->status));
67216b94	167	nlmsvc_release_host(host);
1da177e4 LT	168	nlm_release_file(file);
	169	return rpc_success;
	170	}
	171
	172	/*
	173	* UNLOCK: release a lock
	174	*/
7111c66e	175	static __be32
1da177e4 LT	176	nlm4svc_proc_unlock(struct svc_rqst rqstp, struct nlm_args argp,
	177	struct nlm_res *resp)
	178	{
	179	struct nlm_host *host;
	180	struct nlm_file *file;
	181
	182	dprintk("lockd: UNLOCK called\n");
	183
	184	resp->cookie = argp->cookie;
	185
	186	/* Don't accept new lock requests during grace period */
af558e33	187	if (locks_in_grace()) {
1da177e4 LT	188	resp->status = nlm_lck_denied_grace_period;
	189	return rpc_success;
	190	}
	191
	192	/* Obtain client and file */
	193	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
d343fce1	194	return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;
1da177e4 LT	195
	196	/* Now try to remove the lock */
	197	resp->status = nlmsvc_unlock(file, &argp->lock);
	198
	199	dprintk("lockd: UNLOCK status %d\n", ntohl(resp->status));
67216b94	200	nlmsvc_release_host(host);
1da177e4 LT	201	nlm_release_file(file);
	202	return rpc_success;
	203	}
	204
	205	/*
	206	* GRANTED: A server calls us to tell that a process' lock request
	207	* was granted
	208	*/
7111c66e	209	static __be32
1da177e4 LT	210	nlm4svc_proc_granted(struct svc_rqst rqstp, struct nlm_args argp,
	211	struct nlm_res *resp)
	212	{
	213	resp->cookie = argp->cookie;
	214
	215	dprintk("lockd: GRANTED called\n");
dcff09f1	216	resp->status = nlmclnt_grant(svc_addr(rqstp), &argp->lock);
1da177e4 LT	217	dprintk("lockd: GRANTED status %d\n", ntohl(resp->status));
	218	return rpc_success;
	219	}
	220
d4716624 TM	221	/*
	222	* This is the generic lockd callback for async RPC calls
	223	*/
	224	static void nlm4svc_callback_exit(struct rpc_task task, void data)
	225	{
c041b5ff	226	dprintk("lockd: %5u callback returned %d\n", task->tk_pid,
d4716624 TM	227	-task->tk_status);
	228	}
	229
	230	static void nlm4svc_callback_release(void *data)
	231	{
7db836d4	232	nlmsvc_release_call(data);
d4716624 TM	233	}
	234
	235	static const struct rpc_call_ops nlm4svc_callback_ops = {
	236	.rpc_call_done = nlm4svc_callback_exit,
	237	.rpc_release = nlm4svc_callback_release,
	238	};
	239
1da177e4 LT	240	/*
	241	* `Async' versions of the above service routines. They aren't really,
	242	* because we send the callback before the reply proper. I hope this
	243	* doesn't break any clients.
	244	*/
7111c66e AV	245	static __be32 nlm4svc_callback(struct svc_rqst rqstp, u32 proc, struct nlm_args argp,
7111c66e AV	246	__be32 (func)(struct svc_rqst , struct nlm_args , struct nlm_res ))
1da177e4	247	{
d4716624 TM	248	struct nlm_host *host;
d4716624 TM	249	struct nlm_rqst *call;
7111c66e	250	__be32 stat;
1da177e4	251
db4e4c9a OK	252	host = nlmsvc_lookup_host(rqstp,
	253	argp->lock.caller,
	254	argp->lock.len);
d4716624 TM	255	if (host == NULL)
	256	return rpc_system_err;
	257
	258	call = nlm_alloc_call(host);
	259	if (call == NULL)
	260	return rpc_system_err;
	261
	262	stat = func(rqstp, argp, &call->a_res);
	263	if (stat != 0) {
7db836d4	264	nlmsvc_release_call(call);
d4716624 TM	265	return stat;
d4716624 TM	266	}
1da177e4	267
d4716624 TM	268	call->a_flags = RPC_TASK_ASYNC;
	269	if (nlm_async_reply(call, proc, &nlm4svc_callback_ops) < 0)
	270	return rpc_system_err;
	271	return rpc_success;
1da177e4 LT	272	}
1da177e4 LT	273
7111c66e	274	static __be32 nlm4svc_proc_test_msg(struct svc_rqst rqstp, struct nlm_args argp,
1da177e4 LT	275	void *resp)
1da177e4 LT	276	{
d4716624 TM	277	dprintk("lockd: TEST_MSG called\n");
	278	return nlm4svc_callback(rqstp, NLMPROC_TEST_RES, argp, nlm4svc_proc_test);
	279	}
1da177e4	280
7111c66e	281	static __be32 nlm4svc_proc_lock_msg(struct svc_rqst rqstp, struct nlm_args argp,
d4716624 TM	282	void *resp)
d4716624 TM	283	{
1da177e4	284	dprintk("lockd: LOCK_MSG called\n");
d4716624	285	return nlm4svc_callback(rqstp, NLMPROC_LOCK_RES, argp, nlm4svc_proc_lock);
1da177e4 LT	286	}
1da177e4 LT	287
7111c66e	288	static __be32 nlm4svc_proc_cancel_msg(struct svc_rqst rqstp, struct nlm_args argp,
1da177e4 LT	289	void *resp)
1da177e4 LT	290	{
1da177e4	291	dprintk("lockd: CANCEL_MSG called\n");
d4716624	292	return nlm4svc_callback(rqstp, NLMPROC_CANCEL_RES, argp, nlm4svc_proc_cancel);
1da177e4 LT	293	}
1da177e4 LT	294
7111c66e	295	static __be32 nlm4svc_proc_unlock_msg(struct svc_rqst rqstp, struct nlm_args argp,
1da177e4 LT	296	void *resp)
1da177e4 LT	297	{
1da177e4	298	dprintk("lockd: UNLOCK_MSG called\n");
d4716624	299	return nlm4svc_callback(rqstp, NLMPROC_UNLOCK_RES, argp, nlm4svc_proc_unlock);
1da177e4 LT	300	}
1da177e4 LT	301
7111c66e	302	static __be32 nlm4svc_proc_granted_msg(struct svc_rqst rqstp, struct nlm_args argp,
1da177e4 LT	303	void *resp)
1da177e4 LT	304	{
1da177e4	305	dprintk("lockd: GRANTED_MSG called\n");
d4716624	306	return nlm4svc_callback(rqstp, NLMPROC_GRANTED_RES, argp, nlm4svc_proc_granted);
1da177e4 LT	307	}
	308
	309	/*
	310	* SHARE: create a DOS share or alter existing share.
	311	*/
7111c66e	312	static __be32
1da177e4 LT	313	nlm4svc_proc_share(struct svc_rqst rqstp, struct nlm_args argp,
	314	struct nlm_res *resp)
	315	{
	316	struct nlm_host *host;
	317	struct nlm_file *file;
	318
	319	dprintk("lockd: SHARE called\n");
	320
	321	resp->cookie = argp->cookie;
	322
	323	/* Don't accept new lock requests during grace period */
af558e33	324	if (locks_in_grace() && !argp->reclaim) {
1da177e4 LT	325	resp->status = nlm_lck_denied_grace_period;
	326	return rpc_success;
	327	}
	328
	329	/* Obtain client and file */
	330	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
d343fce1	331	return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;
1da177e4 LT	332
	333	/* Now try to create the share */
	334	resp->status = nlmsvc_share_file(host, file, argp);
	335
	336	dprintk("lockd: SHARE status %d\n", ntohl(resp->status));
67216b94	337	nlmsvc_release_host(host);
1da177e4 LT	338	nlm_release_file(file);
	339	return rpc_success;
	340	}
	341
	342	/*
	343	* UNSHARE: Release a DOS share.
	344	*/
7111c66e	345	static __be32
1da177e4 LT	346	nlm4svc_proc_unshare(struct svc_rqst rqstp, struct nlm_args argp,
	347	struct nlm_res *resp)
	348	{
	349	struct nlm_host *host;
	350	struct nlm_file *file;
	351
	352	dprintk("lockd: UNSHARE called\n");
	353
	354	resp->cookie = argp->cookie;
	355
	356	/* Don't accept requests during grace period */
af558e33	357	if (locks_in_grace()) {
1da177e4 LT	358	resp->status = nlm_lck_denied_grace_period;
	359	return rpc_success;
	360	}
	361
	362	/* Obtain client and file */
	363	if ((resp->status = nlm4svc_retrieve_args(rqstp, argp, &host, &file)))
d343fce1	364	return resp->status == nlm_drop_reply ? rpc_drop_reply :rpc_success;
1da177e4 LT	365
	366	/* Now try to lock the file */
	367	resp->status = nlmsvc_unshare_file(host, file, argp);
	368
	369	dprintk("lockd: UNSHARE status %d\n", ntohl(resp->status));
67216b94	370	nlmsvc_release_host(host);
1da177e4 LT	371	nlm_release_file(file);
	372	return rpc_success;
	373	}
	374
	375	/*
	376	* NM_LOCK: Create an unmonitored lock
	377	*/
7111c66e	378	static __be32
1da177e4 LT	379	nlm4svc_proc_nm_lock(struct svc_rqst rqstp, struct nlm_args argp,
	380	struct nlm_res *resp)
	381	{
	382	dprintk("lockd: NM_LOCK called\n");
	383
	384	argp->monitor = 0; /* just clean the monitor flag */
	385	return nlm4svc_proc_lock(rqstp, argp, resp);
	386	}
	387
	388	/*
	389	* FREE_ALL: Release all locks and shares held by client
	390	*/
7111c66e	391	static __be32
1da177e4 LT	392	nlm4svc_proc_free_all(struct svc_rqst rqstp, struct nlm_args argp,
	393	void *resp)
	394	{
	395	struct nlm_host *host;
	396
	397	/* Obtain client */
	398	if (nlm4svc_retrieve_args(rqstp, argp, &host, NULL))
	399	return rpc_success;
	400
	401	nlmsvc_free_host_resources(host);
67216b94	402	nlmsvc_release_host(host);
1da177e4 LT	403	return rpc_success;
	404	}
	405
	406	/*
	407	* SM_NOTIFY: private callback from statd (not part of official NLM proto)
	408	*/
7111c66e	409	static __be32
1da177e4 LT	410	nlm4svc_proc_sm_notify(struct svc_rqst rqstp, struct nlm_reboot argp,
	411	void *resp)
	412	{
1da177e4	413	dprintk("lockd: SM_NOTIFY called\n");
b85e4676 CL	414
b85e4676 CL	415	if (!nlm_privileged_requester(rqstp)) {
ad06e4bd CL	416	char buf[RPC_MAX_ADDRBUFLEN];
	417	printk(KERN_WARNING "lockd: rejected NSM callback from %s\n",
	418	svc_print_addr(rqstp, buf, sizeof(buf)));
1da177e4 LT	419	return rpc_system_err;
	420	}
	421
7fefc9cb	422	nlm_host_rebooted(argp);
1da177e4 LT	423	return rpc_success;
	424	}
	425
	426	/*
	427	* client sent a GRANTED_RES, let's remove the associated block
	428	*/
7111c66e	429	static __be32
1da177e4 LT	430	nlm4svc_proc_granted_res(struct svc_rqst rqstp, struct nlm_res argp,
	431	void *resp)
	432	{
	433	if (!nlmsvc_ops)
	434	return rpc_success;
	435
	436	dprintk("lockd: GRANTED_RES called\n");
	437
39be4502	438	nlmsvc_grant_reply(&argp->cookie, argp->status);
1da177e4 LT	439	return rpc_success;
	440	}
	441
	442
1da177e4 LT	443	/*
	444	* NLM Server procedures.
	445	*/
	446
	447	#define nlm4svc_encode_norep nlm4svc_encode_void
	448	#define nlm4svc_decode_norep nlm4svc_decode_void
	449	#define nlm4svc_decode_testres nlm4svc_decode_void
	450	#define nlm4svc_decode_lockres nlm4svc_decode_void
	451	#define nlm4svc_decode_unlockres nlm4svc_decode_void
	452	#define nlm4svc_decode_cancelres nlm4svc_decode_void
	453	#define nlm4svc_decode_grantedres nlm4svc_decode_void
	454
	455	#define nlm4svc_proc_none nlm4svc_proc_null
	456	#define nlm4svc_proc_test_res nlm4svc_proc_null
	457	#define nlm4svc_proc_lock_res nlm4svc_proc_null
	458	#define nlm4svc_proc_cancel_res nlm4svc_proc_null
	459	#define nlm4svc_proc_unlock_res nlm4svc_proc_null
	460
	461	struct nlm_void { int dummy; };
	462
	463	#define PROC(name, xargt, xrest, argt, rest, respsize) \
	464	{ .pc_func = (svc_procfunc) nlm4svc_proc_##name, \
	465	.pc_decode = (kxdrproc_t) nlm4svc_decode_##xargt, \
	466	.pc_encode = (kxdrproc_t) nlm4svc_encode_##xrest, \
	467	.pc_release = NULL, \
	468	.pc_argsize = sizeof(struct nlm_##argt), \
	469	.pc_ressize = sizeof(struct nlm_##rest), \
	470	.pc_xdrressize = respsize, \
	471	}
	472	#define Ck (1+XDR_QUADLEN(NLM_MAXCOOKIELEN)) /* cookie */
	473	#define No (1+1024/4) /* netobj */
	474	#define St 1 /* status */
	475	#define Rg 4 /* range (offset + length) */
	476	struct svc_procedure nlmsvc_procedures4[] = {
	477	PROC(null, void, void, void, void, 1),
	478	PROC(test, testargs, testres, args, res, Ck+St+2+No+Rg),
	479	PROC(lock, lockargs, res, args, res, Ck+St),
	480	PROC(cancel, cancargs, res, args, res, Ck+St),
	481	PROC(unlock, unlockargs, res, args, res, Ck+St),
	482	PROC(granted, testargs, res, args, res, Ck+St),
	483	PROC(test_msg, testargs, norep, args, void, 1),
	484	PROC(lock_msg, lockargs, norep, args, void, 1),
	485	PROC(cancel_msg, cancargs, norep, args, void, 1),
	486	PROC(unlock_msg, unlockargs, norep, args, void, 1),
	487	PROC(granted_msg, testargs, norep, args, void, 1),
	488	PROC(test_res, testres, norep, res, void, 1),
	489	PROC(lock_res, lockres, norep, res, void, 1),
	490	PROC(cancel_res, cancelres, norep, res, void, 1),
	491	PROC(unlock_res, unlockres, norep, res, void, 1),
	492	PROC(granted_res, res, norep, res, void, 1),
	493	/* statd callback */
	494	PROC(sm_notify, reboot, void, reboot, void, 1),
	495	PROC(none, void, void, void, void, 0),
	496	PROC(none, void, void, void, void, 0),
	497	PROC(none, void, void, void, void, 0),
	498	PROC(share, shareargs, shareres, args, res, Ck+St+1),
	499	PROC(unshare, shareargs, shareres, args, res, Ck+St+1),
	500	PROC(nm_lock, lockargs, res, args, res, Ck+St),
	501	PROC(free_all, notify, void, args, void, 1),
	502
	503	};