xref: /openbmc/linux/fs/lockd/clntproc.c (revision 4c060b531006e0711db32a132d6ac7661594b280)
11da177e4SLinus Torvalds /*
21da177e4SLinus Torvalds  * linux/fs/lockd/clntproc.c
31da177e4SLinus Torvalds  *
41da177e4SLinus Torvalds  * RPC procedures for the client side NLM implementation
51da177e4SLinus Torvalds  *
61da177e4SLinus Torvalds  * Copyright (C) 1996, Olaf Kirch <okir@monad.swb.de>
71da177e4SLinus Torvalds  */
81da177e4SLinus Torvalds 
91da177e4SLinus Torvalds #include <linux/config.h>
101da177e4SLinus Torvalds #include <linux/module.h>
111da177e4SLinus Torvalds #include <linux/types.h>
121da177e4SLinus Torvalds #include <linux/errno.h>
131da177e4SLinus Torvalds #include <linux/fs.h>
141da177e4SLinus Torvalds #include <linux/nfs_fs.h>
151da177e4SLinus Torvalds #include <linux/utsname.h>
161da177e4SLinus Torvalds #include <linux/smp_lock.h>
171da177e4SLinus Torvalds #include <linux/sunrpc/clnt.h>
181da177e4SLinus Torvalds #include <linux/sunrpc/svc.h>
191da177e4SLinus Torvalds #include <linux/lockd/lockd.h>
201da177e4SLinus Torvalds #include <linux/lockd/sm_inter.h>
211da177e4SLinus Torvalds 
221da177e4SLinus Torvalds #define NLMDBG_FACILITY		NLMDBG_CLIENT
231da177e4SLinus Torvalds #define NLMCLNT_GRACE_WAIT	(5*HZ)
24ecdbf769STrond Myklebust #define NLMCLNT_POLL_TIMEOUT	(30*HZ)
25aaaa9942STrond Myklebust #define NLMCLNT_MAX_RETRIES	3
261da177e4SLinus Torvalds 
271da177e4SLinus Torvalds static int	nlmclnt_test(struct nlm_rqst *, struct file_lock *);
281da177e4SLinus Torvalds static int	nlmclnt_lock(struct nlm_rqst *, struct file_lock *);
291da177e4SLinus Torvalds static int	nlmclnt_unlock(struct nlm_rqst *, struct file_lock *);
301da177e4SLinus Torvalds static int	nlm_stat_to_errno(u32 stat);
311da177e4SLinus Torvalds static void	nlmclnt_locks_init_private(struct file_lock *fl, struct nlm_host *host);
3216fb2425STrond Myklebust static int	nlmclnt_cancel(struct nlm_host *, int , struct file_lock *);
331da177e4SLinus Torvalds 
34963d8fe5STrond Myklebust static const struct rpc_call_ops nlmclnt_unlock_ops;
35963d8fe5STrond Myklebust static const struct rpc_call_ops nlmclnt_cancel_ops;
36963d8fe5STrond Myklebust 
371da177e4SLinus Torvalds /*
381da177e4SLinus Torvalds  * Cookie counter for NLM requests
391da177e4SLinus Torvalds  */
401da177e4SLinus Torvalds static u32	nlm_cookie = 0x1234;
411da177e4SLinus Torvalds 
421da177e4SLinus Torvalds static inline void nlmclnt_next_cookie(struct nlm_cookie *c)
431da177e4SLinus Torvalds {
441da177e4SLinus Torvalds 	memcpy(c->data, &nlm_cookie, 4);
451da177e4SLinus Torvalds 	memset(c->data+4, 0, 4);
461da177e4SLinus Torvalds 	c->len=4;
471da177e4SLinus Torvalds 	nlm_cookie++;
481da177e4SLinus Torvalds }
491da177e4SLinus Torvalds 
501da177e4SLinus Torvalds static struct nlm_lockowner *nlm_get_lockowner(struct nlm_lockowner *lockowner)
511da177e4SLinus Torvalds {
521da177e4SLinus Torvalds 	atomic_inc(&lockowner->count);
531da177e4SLinus Torvalds 	return lockowner;
541da177e4SLinus Torvalds }
551da177e4SLinus Torvalds 
561da177e4SLinus Torvalds static void nlm_put_lockowner(struct nlm_lockowner *lockowner)
571da177e4SLinus Torvalds {
581da177e4SLinus Torvalds 	if (!atomic_dec_and_lock(&lockowner->count, &lockowner->host->h_lock))
591da177e4SLinus Torvalds 		return;
601da177e4SLinus Torvalds 	list_del(&lockowner->list);
611da177e4SLinus Torvalds 	spin_unlock(&lockowner->host->h_lock);
621da177e4SLinus Torvalds 	nlm_release_host(lockowner->host);
631da177e4SLinus Torvalds 	kfree(lockowner);
641da177e4SLinus Torvalds }
651da177e4SLinus Torvalds 
661da177e4SLinus Torvalds static inline int nlm_pidbusy(struct nlm_host *host, uint32_t pid)
671da177e4SLinus Torvalds {
681da177e4SLinus Torvalds 	struct nlm_lockowner *lockowner;
691da177e4SLinus Torvalds 	list_for_each_entry(lockowner, &host->h_lockowners, list) {
701da177e4SLinus Torvalds 		if (lockowner->pid == pid)
711da177e4SLinus Torvalds 			return -EBUSY;
721da177e4SLinus Torvalds 	}
731da177e4SLinus Torvalds 	return 0;
741da177e4SLinus Torvalds }
751da177e4SLinus Torvalds 
761da177e4SLinus Torvalds static inline uint32_t __nlm_alloc_pid(struct nlm_host *host)
771da177e4SLinus Torvalds {
781da177e4SLinus Torvalds 	uint32_t res;
791da177e4SLinus Torvalds 	do {
801da177e4SLinus Torvalds 		res = host->h_pidcount++;
811da177e4SLinus Torvalds 	} while (nlm_pidbusy(host, res) < 0);
821da177e4SLinus Torvalds 	return res;
831da177e4SLinus Torvalds }
841da177e4SLinus Torvalds 
851da177e4SLinus Torvalds static struct nlm_lockowner *__nlm_find_lockowner(struct nlm_host *host, fl_owner_t owner)
861da177e4SLinus Torvalds {
871da177e4SLinus Torvalds 	struct nlm_lockowner *lockowner;
881da177e4SLinus Torvalds 	list_for_each_entry(lockowner, &host->h_lockowners, list) {
891da177e4SLinus Torvalds 		if (lockowner->owner != owner)
901da177e4SLinus Torvalds 			continue;
911da177e4SLinus Torvalds 		return nlm_get_lockowner(lockowner);
921da177e4SLinus Torvalds 	}
931da177e4SLinus Torvalds 	return NULL;
941da177e4SLinus Torvalds }
951da177e4SLinus Torvalds 
961da177e4SLinus Torvalds static struct nlm_lockowner *nlm_find_lockowner(struct nlm_host *host, fl_owner_t owner)
971da177e4SLinus Torvalds {
981da177e4SLinus Torvalds 	struct nlm_lockowner *res, *new = NULL;
991da177e4SLinus Torvalds 
1001da177e4SLinus Torvalds 	spin_lock(&host->h_lock);
1011da177e4SLinus Torvalds 	res = __nlm_find_lockowner(host, owner);
1021da177e4SLinus Torvalds 	if (res == NULL) {
1031da177e4SLinus Torvalds 		spin_unlock(&host->h_lock);
1041da177e4SLinus Torvalds 		new = (struct nlm_lockowner *)kmalloc(sizeof(*new), GFP_KERNEL);
1051da177e4SLinus Torvalds 		spin_lock(&host->h_lock);
1061da177e4SLinus Torvalds 		res = __nlm_find_lockowner(host, owner);
1071da177e4SLinus Torvalds 		if (res == NULL && new != NULL) {
1081da177e4SLinus Torvalds 			res = new;
1091da177e4SLinus Torvalds 			atomic_set(&new->count, 1);
1101da177e4SLinus Torvalds 			new->owner = owner;
1111da177e4SLinus Torvalds 			new->pid = __nlm_alloc_pid(host);
1121da177e4SLinus Torvalds 			new->host = nlm_get_host(host);
1131da177e4SLinus Torvalds 			list_add(&new->list, &host->h_lockowners);
1141da177e4SLinus Torvalds 			new = NULL;
1151da177e4SLinus Torvalds 		}
1161da177e4SLinus Torvalds 	}
1171da177e4SLinus Torvalds 	spin_unlock(&host->h_lock);
1181da177e4SLinus Torvalds 	kfree(new);
1191da177e4SLinus Torvalds 	return res;
1201da177e4SLinus Torvalds }
1211da177e4SLinus Torvalds 
1221da177e4SLinus Torvalds /*
1231da177e4SLinus Torvalds  * Initialize arguments for TEST/LOCK/UNLOCK/CANCEL calls
1241da177e4SLinus Torvalds  */
1251da177e4SLinus Torvalds static void nlmclnt_setlockargs(struct nlm_rqst *req, struct file_lock *fl)
1261da177e4SLinus Torvalds {
1271da177e4SLinus Torvalds 	struct nlm_args	*argp = &req->a_args;
1281da177e4SLinus Torvalds 	struct nlm_lock	*lock = &argp->lock;
1291da177e4SLinus Torvalds 
1301da177e4SLinus Torvalds 	nlmclnt_next_cookie(&argp->cookie);
1311da177e4SLinus Torvalds 	argp->state   = nsm_local_state;
1321da177e4SLinus Torvalds 	memcpy(&lock->fh, NFS_FH(fl->fl_file->f_dentry->d_inode), sizeof(struct nfs_fh));
1331da177e4SLinus Torvalds 	lock->caller  = system_utsname.nodename;
1341da177e4SLinus Torvalds 	lock->oh.data = req->a_owner;
1357bab377fSTrond Myklebust 	lock->oh.len  = snprintf(req->a_owner, sizeof(req->a_owner), "%u@%s",
1367bab377fSTrond Myklebust 				(unsigned int)fl->fl_u.nfs_fl.owner->pid,
1377bab377fSTrond Myklebust 				system_utsname.nodename);
1387bab377fSTrond Myklebust 	lock->svid = fl->fl_u.nfs_fl.owner->pid;
1391da177e4SLinus Torvalds 	locks_copy_lock(&lock->fl, fl);
1401da177e4SLinus Torvalds }
1411da177e4SLinus Torvalds 
1421da177e4SLinus Torvalds static void nlmclnt_release_lockargs(struct nlm_rqst *req)
1431da177e4SLinus Torvalds {
1441da177e4SLinus Torvalds 	struct file_lock *fl = &req->a_args.lock.fl;
1451da177e4SLinus Torvalds 
1461da177e4SLinus Torvalds 	if (fl->fl_ops && fl->fl_ops->fl_release_private)
1471da177e4SLinus Torvalds 		fl->fl_ops->fl_release_private(fl);
1481da177e4SLinus Torvalds }
1491da177e4SLinus Torvalds 
1501da177e4SLinus Torvalds /*
1511da177e4SLinus Torvalds  * This is the main entry point for the NLM client.
1521da177e4SLinus Torvalds  */
1531da177e4SLinus Torvalds int
1541da177e4SLinus Torvalds nlmclnt_proc(struct inode *inode, int cmd, struct file_lock *fl)
1551da177e4SLinus Torvalds {
1561da177e4SLinus Torvalds 	struct nfs_server	*nfssrv = NFS_SERVER(inode);
1571da177e4SLinus Torvalds 	struct nlm_host		*host;
1581da177e4SLinus Torvalds 	struct nlm_rqst		reqst, *call = &reqst;
1591da177e4SLinus Torvalds 	sigset_t		oldset;
1601da177e4SLinus Torvalds 	unsigned long		flags;
1611da177e4SLinus Torvalds 	int			status, proto, vers;
1621da177e4SLinus Torvalds 
1631da177e4SLinus Torvalds 	vers = (NFS_PROTO(inode)->version == 3) ? 4 : 1;
1641da177e4SLinus Torvalds 	if (NFS_PROTO(inode)->version > 3) {
1651da177e4SLinus Torvalds 		printk(KERN_NOTICE "NFSv4 file locking not implemented!\n");
1661da177e4SLinus Torvalds 		return -ENOLCK;
1671da177e4SLinus Torvalds 	}
1681da177e4SLinus Torvalds 
1691da177e4SLinus Torvalds 	/* Retrieve transport protocol from NFS client */
1701da177e4SLinus Torvalds 	proto = NFS_CLIENT(inode)->cl_xprt->prot;
1711da177e4SLinus Torvalds 
1721da177e4SLinus Torvalds 	if (!(host = nlmclnt_lookup_host(NFS_ADDR(inode), proto, vers)))
1731da177e4SLinus Torvalds 		return -ENOLCK;
1741da177e4SLinus Torvalds 
1751da177e4SLinus Torvalds 	/* Create RPC client handle if not there, and copy soft
1761da177e4SLinus Torvalds 	 * and intr flags from NFS client. */
1771da177e4SLinus Torvalds 	if (host->h_rpcclnt == NULL) {
1781da177e4SLinus Torvalds 		struct rpc_clnt	*clnt;
1791da177e4SLinus Torvalds 
1801da177e4SLinus Torvalds 		/* Bind an rpc client to this host handle (does not
1811da177e4SLinus Torvalds 		 * perform a portmapper lookup) */
1821da177e4SLinus Torvalds 		if (!(clnt = nlm_bind_host(host))) {
1831da177e4SLinus Torvalds 			status = -ENOLCK;
1841da177e4SLinus Torvalds 			goto done;
1851da177e4SLinus Torvalds 		}
1861da177e4SLinus Torvalds 		clnt->cl_softrtry = nfssrv->client->cl_softrtry;
1871da177e4SLinus Torvalds 		clnt->cl_intr = nfssrv->client->cl_intr;
1881da177e4SLinus Torvalds 	}
1891da177e4SLinus Torvalds 
1901da177e4SLinus Torvalds 	/* Keep the old signal mask */
1911da177e4SLinus Torvalds 	spin_lock_irqsave(&current->sighand->siglock, flags);
1921da177e4SLinus Torvalds 	oldset = current->blocked;
1931da177e4SLinus Torvalds 
1941da177e4SLinus Torvalds 	/* If we're cleaning up locks because the process is exiting,
1951da177e4SLinus Torvalds 	 * perform the RPC call asynchronously. */
1961da177e4SLinus Torvalds 	if ((IS_SETLK(cmd) || IS_SETLKW(cmd))
1971da177e4SLinus Torvalds 	    && fl->fl_type == F_UNLCK
1981da177e4SLinus Torvalds 	    && (current->flags & PF_EXITING)) {
1991da177e4SLinus Torvalds 		sigfillset(&current->blocked);	/* Mask all signals */
2001da177e4SLinus Torvalds 		recalc_sigpending();
2011da177e4SLinus Torvalds 		spin_unlock_irqrestore(&current->sighand->siglock, flags);
2021da177e4SLinus Torvalds 
2031da177e4SLinus Torvalds 		call = nlmclnt_alloc_call();
2041da177e4SLinus Torvalds 		if (!call) {
2051da177e4SLinus Torvalds 			status = -ENOMEM;
2061da177e4SLinus Torvalds 			goto out_restore;
2071da177e4SLinus Torvalds 		}
2081da177e4SLinus Torvalds 		call->a_flags = RPC_TASK_ASYNC;
2091da177e4SLinus Torvalds 	} else {
2101da177e4SLinus Torvalds 		spin_unlock_irqrestore(&current->sighand->siglock, flags);
2111da177e4SLinus Torvalds 		memset(call, 0, sizeof(*call));
2121da177e4SLinus Torvalds 		locks_init_lock(&call->a_args.lock.fl);
2131da177e4SLinus Torvalds 		locks_init_lock(&call->a_res.lock.fl);
2141da177e4SLinus Torvalds 	}
2151da177e4SLinus Torvalds 	call->a_host = host;
2161da177e4SLinus Torvalds 
2171da177e4SLinus Torvalds 	nlmclnt_locks_init_private(fl, host);
2181da177e4SLinus Torvalds 
2191da177e4SLinus Torvalds 	/* Set up the argument struct */
2201da177e4SLinus Torvalds 	nlmclnt_setlockargs(call, fl);
2211da177e4SLinus Torvalds 
2221da177e4SLinus Torvalds 	if (IS_SETLK(cmd) || IS_SETLKW(cmd)) {
2231da177e4SLinus Torvalds 		if (fl->fl_type != F_UNLCK) {
2241da177e4SLinus Torvalds 			call->a_args.block = IS_SETLKW(cmd) ? 1 : 0;
2251da177e4SLinus Torvalds 			status = nlmclnt_lock(call, fl);
2261da177e4SLinus Torvalds 		} else
2271da177e4SLinus Torvalds 			status = nlmclnt_unlock(call, fl);
2281da177e4SLinus Torvalds 	} else if (IS_GETLK(cmd))
2291da177e4SLinus Torvalds 		status = nlmclnt_test(call, fl);
2301da177e4SLinus Torvalds 	else
2311da177e4SLinus Torvalds 		status = -EINVAL;
2321da177e4SLinus Torvalds 
2331da177e4SLinus Torvalds  out_restore:
2341da177e4SLinus Torvalds 	spin_lock_irqsave(&current->sighand->siglock, flags);
2351da177e4SLinus Torvalds 	current->blocked = oldset;
2361da177e4SLinus Torvalds 	recalc_sigpending();
2371da177e4SLinus Torvalds 	spin_unlock_irqrestore(&current->sighand->siglock, flags);
2381da177e4SLinus Torvalds 
2391da177e4SLinus Torvalds done:
2401da177e4SLinus Torvalds 	dprintk("lockd: clnt proc returns %d\n", status);
2411da177e4SLinus Torvalds 	nlm_release_host(host);
2421da177e4SLinus Torvalds 	return status;
2431da177e4SLinus Torvalds }
2441da177e4SLinus Torvalds EXPORT_SYMBOL(nlmclnt_proc);
2451da177e4SLinus Torvalds 
2461da177e4SLinus Torvalds /*
2471da177e4SLinus Torvalds  * Allocate an NLM RPC call struct
2481da177e4SLinus Torvalds  */
2491da177e4SLinus Torvalds struct nlm_rqst *
2501da177e4SLinus Torvalds nlmclnt_alloc_call(void)
2511da177e4SLinus Torvalds {
2521da177e4SLinus Torvalds 	struct nlm_rqst	*call;
2531da177e4SLinus Torvalds 
25436943fa4STrond Myklebust 	for(;;) {
25536943fa4STrond Myklebust 		call = kzalloc(sizeof(*call), GFP_KERNEL);
25636943fa4STrond Myklebust 		if (call != NULL) {
2571da177e4SLinus Torvalds 			locks_init_lock(&call->a_args.lock.fl);
2581da177e4SLinus Torvalds 			locks_init_lock(&call->a_res.lock.fl);
2591da177e4SLinus Torvalds 			return call;
2601da177e4SLinus Torvalds 		}
26136943fa4STrond Myklebust 		if (signalled())
26236943fa4STrond Myklebust 			break;
2631da177e4SLinus Torvalds 		printk("nlmclnt_alloc_call: failed, waiting for memory\n");
264041e0e3bSNishanth Aravamudan 		schedule_timeout_interruptible(5*HZ);
2651da177e4SLinus Torvalds 	}
2661da177e4SLinus Torvalds 	return NULL;
2671da177e4SLinus Torvalds }
2681da177e4SLinus Torvalds 
2691da177e4SLinus Torvalds static int nlm_wait_on_grace(wait_queue_head_t *queue)
2701da177e4SLinus Torvalds {
2711da177e4SLinus Torvalds 	DEFINE_WAIT(wait);
2721da177e4SLinus Torvalds 	int status = -EINTR;
2731da177e4SLinus Torvalds 
2741da177e4SLinus Torvalds 	prepare_to_wait(queue, &wait, TASK_INTERRUPTIBLE);
2751da177e4SLinus Torvalds 	if (!signalled ()) {
2761da177e4SLinus Torvalds 		schedule_timeout(NLMCLNT_GRACE_WAIT);
2773e1d1d28SChristoph Lameter 		try_to_freeze();
2781da177e4SLinus Torvalds 		if (!signalled ())
2791da177e4SLinus Torvalds 			status = 0;
2801da177e4SLinus Torvalds 	}
2811da177e4SLinus Torvalds 	finish_wait(queue, &wait);
2821da177e4SLinus Torvalds 	return status;
2831da177e4SLinus Torvalds }
2841da177e4SLinus Torvalds 
2851da177e4SLinus Torvalds /*
2861da177e4SLinus Torvalds  * Generic NLM call
2871da177e4SLinus Torvalds  */
2881da177e4SLinus Torvalds static int
2891da177e4SLinus Torvalds nlmclnt_call(struct nlm_rqst *req, u32 proc)
2901da177e4SLinus Torvalds {
2911da177e4SLinus Torvalds 	struct nlm_host	*host = req->a_host;
2921da177e4SLinus Torvalds 	struct rpc_clnt	*clnt;
2931da177e4SLinus Torvalds 	struct nlm_args	*argp = &req->a_args;
2941da177e4SLinus Torvalds 	struct nlm_res	*resp = &req->a_res;
2951da177e4SLinus Torvalds 	struct rpc_message msg = {
2961da177e4SLinus Torvalds 		.rpc_argp	= argp,
2971da177e4SLinus Torvalds 		.rpc_resp	= resp,
2981da177e4SLinus Torvalds 	};
2991da177e4SLinus Torvalds 	int		status;
3001da177e4SLinus Torvalds 
3011da177e4SLinus Torvalds 	dprintk("lockd: call procedure %d on %s\n",
3021da177e4SLinus Torvalds 			(int)proc, host->h_name);
3031da177e4SLinus Torvalds 
3041da177e4SLinus Torvalds 	do {
3051da177e4SLinus Torvalds 		if (host->h_reclaiming && !argp->reclaim)
3061da177e4SLinus Torvalds 			goto in_grace_period;
3071da177e4SLinus Torvalds 
3081da177e4SLinus Torvalds 		/* If we have no RPC client yet, create one. */
3091da177e4SLinus Torvalds 		if ((clnt = nlm_bind_host(host)) == NULL)
3101da177e4SLinus Torvalds 			return -ENOLCK;
3111da177e4SLinus Torvalds 		msg.rpc_proc = &clnt->cl_procinfo[proc];
3121da177e4SLinus Torvalds 
3131da177e4SLinus Torvalds 		/* Perform the RPC call. If an error occurs, try again */
3141da177e4SLinus Torvalds 		if ((status = rpc_call_sync(clnt, &msg, 0)) < 0) {
3151da177e4SLinus Torvalds 			dprintk("lockd: rpc_call returned error %d\n", -status);
3161da177e4SLinus Torvalds 			switch (status) {
3171da177e4SLinus Torvalds 			case -EPROTONOSUPPORT:
3181da177e4SLinus Torvalds 				status = -EINVAL;
3191da177e4SLinus Torvalds 				break;
3201da177e4SLinus Torvalds 			case -ECONNREFUSED:
3211da177e4SLinus Torvalds 			case -ETIMEDOUT:
3221da177e4SLinus Torvalds 			case -ENOTCONN:
3231da177e4SLinus Torvalds 				nlm_rebind_host(host);
3241da177e4SLinus Torvalds 				status = -EAGAIN;
3251da177e4SLinus Torvalds 				break;
3261da177e4SLinus Torvalds 			case -ERESTARTSYS:
3271da177e4SLinus Torvalds 				return signalled () ? -EINTR : status;
3281da177e4SLinus Torvalds 			default:
3291da177e4SLinus Torvalds 				break;
3301da177e4SLinus Torvalds 			}
3311da177e4SLinus Torvalds 			break;
3321da177e4SLinus Torvalds 		} else
3331da177e4SLinus Torvalds 		if (resp->status == NLM_LCK_DENIED_GRACE_PERIOD) {
3341da177e4SLinus Torvalds 			dprintk("lockd: server in grace period\n");
3351da177e4SLinus Torvalds 			if (argp->reclaim) {
3361da177e4SLinus Torvalds 				printk(KERN_WARNING
3371da177e4SLinus Torvalds 				     "lockd: spurious grace period reject?!\n");
3381da177e4SLinus Torvalds 				return -ENOLCK;
3391da177e4SLinus Torvalds 			}
3401da177e4SLinus Torvalds 		} else {
3411da177e4SLinus Torvalds 			if (!argp->reclaim) {
3421da177e4SLinus Torvalds 				/* We appear to be out of the grace period */
3431da177e4SLinus Torvalds 				wake_up_all(&host->h_gracewait);
3441da177e4SLinus Torvalds 			}
3451da177e4SLinus Torvalds 			dprintk("lockd: server returns status %d\n", resp->status);
3461da177e4SLinus Torvalds 			return 0;	/* Okay, call complete */
3471da177e4SLinus Torvalds 		}
3481da177e4SLinus Torvalds 
3491da177e4SLinus Torvalds in_grace_period:
3501da177e4SLinus Torvalds 		/*
3511da177e4SLinus Torvalds 		 * The server has rebooted and appears to be in the grace
3521da177e4SLinus Torvalds 		 * period during which locks are only allowed to be
3531da177e4SLinus Torvalds 		 * reclaimed.
3541da177e4SLinus Torvalds 		 * We can only back off and try again later.
3551da177e4SLinus Torvalds 		 */
3561da177e4SLinus Torvalds 		status = nlm_wait_on_grace(&host->h_gracewait);
3571da177e4SLinus Torvalds 	} while (status == 0);
3581da177e4SLinus Torvalds 
3591da177e4SLinus Torvalds 	return status;
3601da177e4SLinus Torvalds }
3611da177e4SLinus Torvalds 
3621da177e4SLinus Torvalds /*
3631da177e4SLinus Torvalds  * Generic NLM call, async version.
3641da177e4SLinus Torvalds  */
365963d8fe5STrond Myklebust int nlmsvc_async_call(struct nlm_rqst *req, u32 proc, const struct rpc_call_ops *tk_ops)
3661da177e4SLinus Torvalds {
3671da177e4SLinus Torvalds 	struct nlm_host	*host = req->a_host;
3681da177e4SLinus Torvalds 	struct rpc_clnt	*clnt;
3691da177e4SLinus Torvalds 	struct rpc_message msg = {
3701da177e4SLinus Torvalds 		.rpc_argp	= &req->a_args,
3711da177e4SLinus Torvalds 		.rpc_resp	= &req->a_res,
3721da177e4SLinus Torvalds 	};
3731da177e4SLinus Torvalds 	int		status;
3741da177e4SLinus Torvalds 
3751da177e4SLinus Torvalds 	dprintk("lockd: call procedure %d on %s (async)\n",
3761da177e4SLinus Torvalds 			(int)proc, host->h_name);
3771da177e4SLinus Torvalds 
3781da177e4SLinus Torvalds 	/* If we have no RPC client yet, create one. */
3791da177e4SLinus Torvalds 	if ((clnt = nlm_bind_host(host)) == NULL)
3801da177e4SLinus Torvalds 		return -ENOLCK;
3811da177e4SLinus Torvalds 	msg.rpc_proc = &clnt->cl_procinfo[proc];
3821da177e4SLinus Torvalds 
3831da177e4SLinus Torvalds         /* bootstrap and kick off the async RPC call */
384963d8fe5STrond Myklebust         status = rpc_call_async(clnt, &msg, RPC_TASK_ASYNC, tk_ops, req);
3851da177e4SLinus Torvalds 
3861da177e4SLinus Torvalds 	return status;
3871da177e4SLinus Torvalds }
3881da177e4SLinus Torvalds 
389963d8fe5STrond Myklebust static int nlmclnt_async_call(struct nlm_rqst *req, u32 proc, const struct rpc_call_ops *tk_ops)
3901da177e4SLinus Torvalds {
3911da177e4SLinus Torvalds 	struct nlm_host	*host = req->a_host;
3921da177e4SLinus Torvalds 	struct rpc_clnt	*clnt;
3931da177e4SLinus Torvalds 	struct nlm_args	*argp = &req->a_args;
3941da177e4SLinus Torvalds 	struct nlm_res	*resp = &req->a_res;
3951da177e4SLinus Torvalds 	struct rpc_message msg = {
3961da177e4SLinus Torvalds 		.rpc_argp	= argp,
3971da177e4SLinus Torvalds 		.rpc_resp	= resp,
3981da177e4SLinus Torvalds 	};
3991da177e4SLinus Torvalds 	int		status;
4001da177e4SLinus Torvalds 
4011da177e4SLinus Torvalds 	dprintk("lockd: call procedure %d on %s (async)\n",
4021da177e4SLinus Torvalds 			(int)proc, host->h_name);
4031da177e4SLinus Torvalds 
4041da177e4SLinus Torvalds 	/* If we have no RPC client yet, create one. */
4051da177e4SLinus Torvalds 	if ((clnt = nlm_bind_host(host)) == NULL)
4061da177e4SLinus Torvalds 		return -ENOLCK;
4071da177e4SLinus Torvalds 	msg.rpc_proc = &clnt->cl_procinfo[proc];
4081da177e4SLinus Torvalds 
4091da177e4SLinus Torvalds 	/* Increment host refcount */
4101da177e4SLinus Torvalds 	nlm_get_host(host);
4111da177e4SLinus Torvalds         /* bootstrap and kick off the async RPC call */
412963d8fe5STrond Myklebust         status = rpc_call_async(clnt, &msg, RPC_TASK_ASYNC, tk_ops, req);
4131da177e4SLinus Torvalds 	if (status < 0)
4141da177e4SLinus Torvalds 		nlm_release_host(host);
4151da177e4SLinus Torvalds 	return status;
4161da177e4SLinus Torvalds }
4171da177e4SLinus Torvalds 
4181da177e4SLinus Torvalds /*
4191da177e4SLinus Torvalds  * TEST for the presence of a conflicting lock
4201da177e4SLinus Torvalds  */
4211da177e4SLinus Torvalds static int
4221da177e4SLinus Torvalds nlmclnt_test(struct nlm_rqst *req, struct file_lock *fl)
4231da177e4SLinus Torvalds {
4241da177e4SLinus Torvalds 	int	status;
4251da177e4SLinus Torvalds 
4261da177e4SLinus Torvalds 	status = nlmclnt_call(req, NLMPROC_TEST);
4271da177e4SLinus Torvalds 	nlmclnt_release_lockargs(req);
4281da177e4SLinus Torvalds 	if (status < 0)
4291da177e4SLinus Torvalds 		return status;
4301da177e4SLinus Torvalds 
4311da177e4SLinus Torvalds 	status = req->a_res.status;
4321da177e4SLinus Torvalds 	if (status == NLM_LCK_GRANTED) {
4331da177e4SLinus Torvalds 		fl->fl_type = F_UNLCK;
4341da177e4SLinus Torvalds 	} if (status == NLM_LCK_DENIED) {
4351da177e4SLinus Torvalds 		/*
4361da177e4SLinus Torvalds 		 * Report the conflicting lock back to the application.
4371da177e4SLinus Torvalds 		 */
4381da177e4SLinus Torvalds 		locks_copy_lock(fl, &req->a_res.lock.fl);
4391da177e4SLinus Torvalds 		fl->fl_pid = 0;
4401da177e4SLinus Torvalds 	} else {
4411da177e4SLinus Torvalds 		return nlm_stat_to_errno(req->a_res.status);
4421da177e4SLinus Torvalds 	}
4431da177e4SLinus Torvalds 
4441da177e4SLinus Torvalds 	return 0;
4451da177e4SLinus Torvalds }
4461da177e4SLinus Torvalds 
4471da177e4SLinus Torvalds static void nlmclnt_locks_copy_lock(struct file_lock *new, struct file_lock *fl)
4481da177e4SLinus Torvalds {
449*4c060b53STrond Myklebust 	new->fl_u.nfs_fl.state = fl->fl_u.nfs_fl.state;
450*4c060b53STrond Myklebust 	new->fl_u.nfs_fl.owner = nlm_get_lockowner(fl->fl_u.nfs_fl.owner);
451*4c060b53STrond Myklebust 	list_add_tail(&new->fl_u.nfs_fl.list, &fl->fl_u.nfs_fl.owner->host->h_granted);
4521da177e4SLinus Torvalds }
4531da177e4SLinus Torvalds 
4541da177e4SLinus Torvalds static void nlmclnt_locks_release_private(struct file_lock *fl)
4551da177e4SLinus Torvalds {
456*4c060b53STrond Myklebust 	list_del(&fl->fl_u.nfs_fl.list);
4571da177e4SLinus Torvalds 	nlm_put_lockowner(fl->fl_u.nfs_fl.owner);
4581da177e4SLinus Torvalds 	fl->fl_ops = NULL;
4591da177e4SLinus Torvalds }
4601da177e4SLinus Torvalds 
4611da177e4SLinus Torvalds static struct file_lock_operations nlmclnt_lock_ops = {
4621da177e4SLinus Torvalds 	.fl_copy_lock = nlmclnt_locks_copy_lock,
4631da177e4SLinus Torvalds 	.fl_release_private = nlmclnt_locks_release_private,
4641da177e4SLinus Torvalds };
4651da177e4SLinus Torvalds 
4661da177e4SLinus Torvalds static void nlmclnt_locks_init_private(struct file_lock *fl, struct nlm_host *host)
4671da177e4SLinus Torvalds {
4681da177e4SLinus Torvalds 	BUG_ON(fl->fl_ops != NULL);
4691da177e4SLinus Torvalds 	fl->fl_u.nfs_fl.state = 0;
4701da177e4SLinus Torvalds 	fl->fl_u.nfs_fl.owner = nlm_find_lockowner(host, fl->fl_owner);
471*4c060b53STrond Myklebust 	INIT_LIST_HEAD(&fl->fl_u.nfs_fl.list);
4721da177e4SLinus Torvalds 	fl->fl_ops = &nlmclnt_lock_ops;
4731da177e4SLinus Torvalds }
4741da177e4SLinus Torvalds 
4751da177e4SLinus Torvalds static void do_vfs_lock(struct file_lock *fl)
4761da177e4SLinus Torvalds {
4771da177e4SLinus Torvalds 	int res = 0;
4781da177e4SLinus Torvalds 	switch (fl->fl_flags & (FL_POSIX|FL_FLOCK)) {
4791da177e4SLinus Torvalds 		case FL_POSIX:
4801da177e4SLinus Torvalds 			res = posix_lock_file_wait(fl->fl_file, fl);
4811da177e4SLinus Torvalds 			break;
4821da177e4SLinus Torvalds 		case FL_FLOCK:
4831da177e4SLinus Torvalds 			res = flock_lock_file_wait(fl->fl_file, fl);
4841da177e4SLinus Torvalds 			break;
4851da177e4SLinus Torvalds 		default:
4861da177e4SLinus Torvalds 			BUG();
4871da177e4SLinus Torvalds 	}
4881da177e4SLinus Torvalds 	if (res < 0)
4891da177e4SLinus Torvalds 		printk(KERN_WARNING "%s: VFS is out of sync with lock manager!\n",
4901da177e4SLinus Torvalds 				__FUNCTION__);
4911da177e4SLinus Torvalds }
4921da177e4SLinus Torvalds 
4931da177e4SLinus Torvalds /*
4941da177e4SLinus Torvalds  * LOCK: Try to create a lock
4951da177e4SLinus Torvalds  *
4961da177e4SLinus Torvalds  *			Programmer Harassment Alert
4971da177e4SLinus Torvalds  *
4981da177e4SLinus Torvalds  * When given a blocking lock request in a sync RPC call, the HPUX lockd
4991da177e4SLinus Torvalds  * will faithfully return LCK_BLOCKED but never cares to notify us when
5001da177e4SLinus Torvalds  * the lock could be granted. This way, our local process could hang
5011da177e4SLinus Torvalds  * around forever waiting for the callback.
5021da177e4SLinus Torvalds  *
5031da177e4SLinus Torvalds  *  Solution A:	Implement busy-waiting
5041da177e4SLinus Torvalds  *  Solution B: Use the async version of the call (NLM_LOCK_{MSG,RES})
5051da177e4SLinus Torvalds  *
5061da177e4SLinus Torvalds  * For now I am implementing solution A, because I hate the idea of
5071da177e4SLinus Torvalds  * re-implementing lockd for a third time in two months. The async
5081da177e4SLinus Torvalds  * calls shouldn't be too hard to do, however.
5091da177e4SLinus Torvalds  *
5101da177e4SLinus Torvalds  * This is one of the lovely things about standards in the NFS area:
5111da177e4SLinus Torvalds  * they're so soft and squishy you can't really blame HP for doing this.
5121da177e4SLinus Torvalds  */
5131da177e4SLinus Torvalds static int
5141da177e4SLinus Torvalds nlmclnt_lock(struct nlm_rqst *req, struct file_lock *fl)
5151da177e4SLinus Torvalds {
5161da177e4SLinus Torvalds 	struct nlm_host	*host = req->a_host;
5171da177e4SLinus Torvalds 	struct nlm_res	*resp = &req->a_res;
518ecdbf769STrond Myklebust 	long timeout;
5191da177e4SLinus Torvalds 	int status;
5201da177e4SLinus Torvalds 
5211da177e4SLinus Torvalds 	if (!host->h_monitored && nsm_monitor(host) < 0) {
5221da177e4SLinus Torvalds 		printk(KERN_NOTICE "lockd: failed to monitor %s\n",
5231da177e4SLinus Torvalds 					host->h_name);
5241da177e4SLinus Torvalds 		status = -ENOLCK;
5251da177e4SLinus Torvalds 		goto out;
5261da177e4SLinus Torvalds 	}
5271da177e4SLinus Torvalds 
528ecdbf769STrond Myklebust 	if (req->a_args.block) {
529ecdbf769STrond Myklebust 		status = nlmclnt_prepare_block(req, host, fl);
5301da177e4SLinus Torvalds 		if (status < 0)
5311da177e4SLinus Torvalds 			goto out;
532ecdbf769STrond Myklebust 	}
533ecdbf769STrond Myklebust 	for(;;) {
534ecdbf769STrond Myklebust 		status = nlmclnt_call(req, NLMPROC_LOCK);
535ecdbf769STrond Myklebust 		if (status < 0)
536ecdbf769STrond Myklebust 			goto out_unblock;
537ecdbf769STrond Myklebust 		if (resp->status != NLM_LCK_BLOCKED)
538ecdbf769STrond Myklebust 			break;
539ecdbf769STrond Myklebust 		/* Wait on an NLM blocking lock */
540ecdbf769STrond Myklebust 		timeout = nlmclnt_block(req, NLMCLNT_POLL_TIMEOUT);
541ecdbf769STrond Myklebust 		/* Did a reclaimer thread notify us of a server reboot? */
542ecdbf769STrond Myklebust 		if (resp->status ==  NLM_LCK_DENIED_GRACE_PERIOD)
543ecdbf769STrond Myklebust 			continue;
544ecdbf769STrond Myklebust 		if (resp->status != NLM_LCK_BLOCKED)
545ecdbf769STrond Myklebust 			break;
546ecdbf769STrond Myklebust 		if (timeout >= 0)
547ecdbf769STrond Myklebust 			continue;
548ecdbf769STrond Myklebust 		/* We were interrupted. Send a CANCEL request to the server
549ecdbf769STrond Myklebust 		 * and exit
550ecdbf769STrond Myklebust 		 */
551ecdbf769STrond Myklebust 		status = (int)timeout;
552ecdbf769STrond Myklebust 		goto out_unblock;
553ecdbf769STrond Myklebust 	}
5541da177e4SLinus Torvalds 
5551da177e4SLinus Torvalds 	if (resp->status == NLM_LCK_GRANTED) {
5561da177e4SLinus Torvalds 		fl->fl_u.nfs_fl.state = host->h_state;
5571da177e4SLinus Torvalds 		fl->fl_flags |= FL_SLEEP;
558*4c060b53STrond Myklebust 		/* Ensure the resulting lock will get added to granted list */
5591da177e4SLinus Torvalds 		do_vfs_lock(fl);
5601da177e4SLinus Torvalds 	}
5611da177e4SLinus Torvalds 	status = nlm_stat_to_errno(resp->status);
562ecdbf769STrond Myklebust out_unblock:
563ecdbf769STrond Myklebust 	nlmclnt_finish_block(req);
564ecdbf769STrond Myklebust 	/* Cancel the blocked request if it is still pending */
565ecdbf769STrond Myklebust 	if (resp->status == NLM_LCK_BLOCKED)
56616fb2425STrond Myklebust 		nlmclnt_cancel(host, req->a_args.block, fl);
5671da177e4SLinus Torvalds out:
5681da177e4SLinus Torvalds 	nlmclnt_release_lockargs(req);
5691da177e4SLinus Torvalds 	return status;
5701da177e4SLinus Torvalds }
5711da177e4SLinus Torvalds 
5721da177e4SLinus Torvalds /*
5731da177e4SLinus Torvalds  * RECLAIM: Try to reclaim a lock
5741da177e4SLinus Torvalds  */
5751da177e4SLinus Torvalds int
5761da177e4SLinus Torvalds nlmclnt_reclaim(struct nlm_host *host, struct file_lock *fl)
5771da177e4SLinus Torvalds {
5781da177e4SLinus Torvalds 	struct nlm_rqst reqst, *req;
5791da177e4SLinus Torvalds 	int		status;
5801da177e4SLinus Torvalds 
5811da177e4SLinus Torvalds 	req = &reqst;
5821da177e4SLinus Torvalds 	memset(req, 0, sizeof(*req));
5831da177e4SLinus Torvalds 	locks_init_lock(&req->a_args.lock.fl);
5841da177e4SLinus Torvalds 	locks_init_lock(&req->a_res.lock.fl);
5851da177e4SLinus Torvalds 	req->a_host  = host;
5861da177e4SLinus Torvalds 	req->a_flags = 0;
5871da177e4SLinus Torvalds 
5881da177e4SLinus Torvalds 	/* Set up the argument struct */
5891da177e4SLinus Torvalds 	nlmclnt_setlockargs(req, fl);
5901da177e4SLinus Torvalds 	req->a_args.reclaim = 1;
5911da177e4SLinus Torvalds 
5921da177e4SLinus Torvalds 	if ((status = nlmclnt_call(req, NLMPROC_LOCK)) >= 0
5931da177e4SLinus Torvalds 	 && req->a_res.status == NLM_LCK_GRANTED)
5941da177e4SLinus Torvalds 		return 0;
5951da177e4SLinus Torvalds 
5961da177e4SLinus Torvalds 	printk(KERN_WARNING "lockd: failed to reclaim lock for pid %d "
5971da177e4SLinus Torvalds 				"(errno %d, status %d)\n", fl->fl_pid,
5981da177e4SLinus Torvalds 				status, req->a_res.status);
5991da177e4SLinus Torvalds 
6001da177e4SLinus Torvalds 	/*
6011da177e4SLinus Torvalds 	 * FIXME: This is a serious failure. We can
6021da177e4SLinus Torvalds 	 *
6031da177e4SLinus Torvalds 	 *  a.	Ignore the problem
6041da177e4SLinus Torvalds 	 *  b.	Send the owning process some signal (Linux doesn't have
6051da177e4SLinus Torvalds 	 *	SIGLOST, though...)
6061da177e4SLinus Torvalds 	 *  c.	Retry the operation
6071da177e4SLinus Torvalds 	 *
6081da177e4SLinus Torvalds 	 * Until someone comes up with a simple implementation
6091da177e4SLinus Torvalds 	 * for b or c, I'll choose option a.
6101da177e4SLinus Torvalds 	 */
6111da177e4SLinus Torvalds 
6121da177e4SLinus Torvalds 	return -ENOLCK;
6131da177e4SLinus Torvalds }
6141da177e4SLinus Torvalds 
6151da177e4SLinus Torvalds /*
6161da177e4SLinus Torvalds  * UNLOCK: remove an existing lock
6171da177e4SLinus Torvalds  */
6181da177e4SLinus Torvalds static int
6191da177e4SLinus Torvalds nlmclnt_unlock(struct nlm_rqst *req, struct file_lock *fl)
6201da177e4SLinus Torvalds {
6211da177e4SLinus Torvalds 	struct nlm_res	*resp = &req->a_res;
6221da177e4SLinus Torvalds 	int		status;
6231da177e4SLinus Torvalds 
62426bcbf96SChristoph Hellwig 	/*
62530f4e20aSTrond Myklebust 	 * Note: the server is supposed to either grant us the unlock
62630f4e20aSTrond Myklebust 	 * request, or to deny it with NLM_LCK_DENIED_GRACE_PERIOD. In either
62730f4e20aSTrond Myklebust 	 * case, we want to unlock.
62830f4e20aSTrond Myklebust 	 */
62930f4e20aSTrond Myklebust 	do_vfs_lock(fl);
63030f4e20aSTrond Myklebust 
6311da177e4SLinus Torvalds 	if (req->a_flags & RPC_TASK_ASYNC) {
6321da177e4SLinus Torvalds 		status = nlmclnt_async_call(req, NLMPROC_UNLOCK,
633963d8fe5STrond Myklebust 					&nlmclnt_unlock_ops);
6341da177e4SLinus Torvalds 		/* Hrmf... Do the unlock early since locks_remove_posix()
6351da177e4SLinus Torvalds 		 * really expects us to free the lock synchronously */
6361da177e4SLinus Torvalds 		if (status < 0) {
6371da177e4SLinus Torvalds 			nlmclnt_release_lockargs(req);
6381da177e4SLinus Torvalds 			kfree(req);
6391da177e4SLinus Torvalds 		}
6401da177e4SLinus Torvalds 		return status;
6411da177e4SLinus Torvalds 	}
6421da177e4SLinus Torvalds 
6431da177e4SLinus Torvalds 	status = nlmclnt_call(req, NLMPROC_UNLOCK);
6441da177e4SLinus Torvalds 	nlmclnt_release_lockargs(req);
6451da177e4SLinus Torvalds 	if (status < 0)
6461da177e4SLinus Torvalds 		return status;
6471da177e4SLinus Torvalds 
6481da177e4SLinus Torvalds 	if (resp->status == NLM_LCK_GRANTED)
6491da177e4SLinus Torvalds 		return 0;
6501da177e4SLinus Torvalds 
6511da177e4SLinus Torvalds 	if (resp->status != NLM_LCK_DENIED_NOLOCKS)
6521da177e4SLinus Torvalds 		printk("lockd: unexpected unlock status: %d\n", resp->status);
6531da177e4SLinus Torvalds 
6541da177e4SLinus Torvalds 	/* What to do now? I'm out of my depth... */
6551da177e4SLinus Torvalds 
6561da177e4SLinus Torvalds 	return -ENOLCK;
6571da177e4SLinus Torvalds }
6581da177e4SLinus Torvalds 
659963d8fe5STrond Myklebust static void nlmclnt_unlock_callback(struct rpc_task *task, void *data)
6601da177e4SLinus Torvalds {
661963d8fe5STrond Myklebust 	struct nlm_rqst	*req = data;
6621da177e4SLinus Torvalds 	int		status = req->a_res.status;
6631da177e4SLinus Torvalds 
6641da177e4SLinus Torvalds 	if (RPC_ASSASSINATED(task))
6651da177e4SLinus Torvalds 		goto die;
6661da177e4SLinus Torvalds 
6671da177e4SLinus Torvalds 	if (task->tk_status < 0) {
6681da177e4SLinus Torvalds 		dprintk("lockd: unlock failed (err = %d)\n", -task->tk_status);
6691da177e4SLinus Torvalds 		goto retry_rebind;
6701da177e4SLinus Torvalds 	}
6711da177e4SLinus Torvalds 	if (status == NLM_LCK_DENIED_GRACE_PERIOD) {
6721da177e4SLinus Torvalds 		rpc_delay(task, NLMCLNT_GRACE_WAIT);
6731da177e4SLinus Torvalds 		goto retry_unlock;
6741da177e4SLinus Torvalds 	}
6751da177e4SLinus Torvalds 	if (status != NLM_LCK_GRANTED)
6761da177e4SLinus Torvalds 		printk(KERN_WARNING "lockd: unexpected unlock status: %d\n", status);
6771da177e4SLinus Torvalds die:
6781da177e4SLinus Torvalds 	nlm_release_host(req->a_host);
6791da177e4SLinus Torvalds 	nlmclnt_release_lockargs(req);
6801da177e4SLinus Torvalds 	kfree(req);
6811da177e4SLinus Torvalds 	return;
6821da177e4SLinus Torvalds  retry_rebind:
6831da177e4SLinus Torvalds 	nlm_rebind_host(req->a_host);
6841da177e4SLinus Torvalds  retry_unlock:
6851da177e4SLinus Torvalds 	rpc_restart_call(task);
6861da177e4SLinus Torvalds }
6871da177e4SLinus Torvalds 
688963d8fe5STrond Myklebust static const struct rpc_call_ops nlmclnt_unlock_ops = {
689963d8fe5STrond Myklebust 	.rpc_call_done = nlmclnt_unlock_callback,
690963d8fe5STrond Myklebust };
691963d8fe5STrond Myklebust 
6921da177e4SLinus Torvalds /*
6931da177e4SLinus Torvalds  * Cancel a blocked lock request.
6941da177e4SLinus Torvalds  * We always use an async RPC call for this in order not to hang a
6951da177e4SLinus Torvalds  * process that has been Ctrl-C'ed.
6961da177e4SLinus Torvalds  */
69716fb2425STrond Myklebust static int nlmclnt_cancel(struct nlm_host *host, int block, struct file_lock *fl)
6981da177e4SLinus Torvalds {
6991da177e4SLinus Torvalds 	struct nlm_rqst	*req;
7001da177e4SLinus Torvalds 	unsigned long	flags;
7011da177e4SLinus Torvalds 	sigset_t	oldset;
7021da177e4SLinus Torvalds 	int		status;
7031da177e4SLinus Torvalds 
7041da177e4SLinus Torvalds 	/* Block all signals while setting up call */
7051da177e4SLinus Torvalds 	spin_lock_irqsave(&current->sighand->siglock, flags);
7061da177e4SLinus Torvalds 	oldset = current->blocked;
7071da177e4SLinus Torvalds 	sigfillset(&current->blocked);
7081da177e4SLinus Torvalds 	recalc_sigpending();
7091da177e4SLinus Torvalds 	spin_unlock_irqrestore(&current->sighand->siglock, flags);
7101da177e4SLinus Torvalds 
7111da177e4SLinus Torvalds 	req = nlmclnt_alloc_call();
7121da177e4SLinus Torvalds 	if (!req)
7131da177e4SLinus Torvalds 		return -ENOMEM;
7141da177e4SLinus Torvalds 	req->a_host  = host;
7151da177e4SLinus Torvalds 	req->a_flags = RPC_TASK_ASYNC;
7161da177e4SLinus Torvalds 
7171da177e4SLinus Torvalds 	nlmclnt_setlockargs(req, fl);
71816fb2425STrond Myklebust 	req->a_args.block = block;
7191da177e4SLinus Torvalds 
720963d8fe5STrond Myklebust 	status = nlmclnt_async_call(req, NLMPROC_CANCEL, &nlmclnt_cancel_ops);
7211da177e4SLinus Torvalds 	if (status < 0) {
7221da177e4SLinus Torvalds 		nlmclnt_release_lockargs(req);
7231da177e4SLinus Torvalds 		kfree(req);
7241da177e4SLinus Torvalds 	}
7251da177e4SLinus Torvalds 
7261da177e4SLinus Torvalds 	spin_lock_irqsave(&current->sighand->siglock, flags);
7271da177e4SLinus Torvalds 	current->blocked = oldset;
7281da177e4SLinus Torvalds 	recalc_sigpending();
7291da177e4SLinus Torvalds 	spin_unlock_irqrestore(&current->sighand->siglock, flags);
7301da177e4SLinus Torvalds 
7311da177e4SLinus Torvalds 	return status;
7321da177e4SLinus Torvalds }
7331da177e4SLinus Torvalds 
734963d8fe5STrond Myklebust static void nlmclnt_cancel_callback(struct rpc_task *task, void *data)
7351da177e4SLinus Torvalds {
736963d8fe5STrond Myklebust 	struct nlm_rqst	*req = data;
7371da177e4SLinus Torvalds 
7381da177e4SLinus Torvalds 	if (RPC_ASSASSINATED(task))
7391da177e4SLinus Torvalds 		goto die;
7401da177e4SLinus Torvalds 
7411da177e4SLinus Torvalds 	if (task->tk_status < 0) {
7421da177e4SLinus Torvalds 		dprintk("lockd: CANCEL call error %d, retrying.\n",
7431da177e4SLinus Torvalds 					task->tk_status);
7441da177e4SLinus Torvalds 		goto retry_cancel;
7451da177e4SLinus Torvalds 	}
7461da177e4SLinus Torvalds 
7471da177e4SLinus Torvalds 	dprintk("lockd: cancel status %d (task %d)\n",
7481da177e4SLinus Torvalds 			req->a_res.status, task->tk_pid);
7491da177e4SLinus Torvalds 
7501da177e4SLinus Torvalds 	switch (req->a_res.status) {
7511da177e4SLinus Torvalds 	case NLM_LCK_GRANTED:
7521da177e4SLinus Torvalds 	case NLM_LCK_DENIED_GRACE_PERIOD:
7531da177e4SLinus Torvalds 		/* Everything's good */
7541da177e4SLinus Torvalds 		break;
7551da177e4SLinus Torvalds 	case NLM_LCK_DENIED_NOLOCKS:
7561da177e4SLinus Torvalds 		dprintk("lockd: CANCEL failed (server has no locks)\n");
7571da177e4SLinus Torvalds 		goto retry_cancel;
7581da177e4SLinus Torvalds 	default:
7591da177e4SLinus Torvalds 		printk(KERN_NOTICE "lockd: weird return %d for CANCEL call\n",
7601da177e4SLinus Torvalds 			req->a_res.status);
7611da177e4SLinus Torvalds 	}
7621da177e4SLinus Torvalds 
7631da177e4SLinus Torvalds die:
7641da177e4SLinus Torvalds 	nlm_release_host(req->a_host);
7651da177e4SLinus Torvalds 	nlmclnt_release_lockargs(req);
7661da177e4SLinus Torvalds 	kfree(req);
7671da177e4SLinus Torvalds 	return;
7681da177e4SLinus Torvalds 
7691da177e4SLinus Torvalds retry_cancel:
770aaaa9942STrond Myklebust 	/* Don't ever retry more than 3 times */
771aaaa9942STrond Myklebust 	if (req->a_retries++ >= NLMCLNT_MAX_RETRIES)
772aaaa9942STrond Myklebust 		goto die;
7731da177e4SLinus Torvalds 	nlm_rebind_host(req->a_host);
7741da177e4SLinus Torvalds 	rpc_restart_call(task);
7751da177e4SLinus Torvalds 	rpc_delay(task, 30 * HZ);
7761da177e4SLinus Torvalds }
7771da177e4SLinus Torvalds 
778963d8fe5STrond Myklebust static const struct rpc_call_ops nlmclnt_cancel_ops = {
779963d8fe5STrond Myklebust 	.rpc_call_done = nlmclnt_cancel_callback,
780963d8fe5STrond Myklebust };
781963d8fe5STrond Myklebust 
7821da177e4SLinus Torvalds /*
7831da177e4SLinus Torvalds  * Convert an NLM status code to a generic kernel errno
7841da177e4SLinus Torvalds  */
7851da177e4SLinus Torvalds static int
7861da177e4SLinus Torvalds nlm_stat_to_errno(u32 status)
7871da177e4SLinus Torvalds {
7881da177e4SLinus Torvalds 	switch(status) {
7891da177e4SLinus Torvalds 	case NLM_LCK_GRANTED:
7901da177e4SLinus Torvalds 		return 0;
7911da177e4SLinus Torvalds 	case NLM_LCK_DENIED:
7921da177e4SLinus Torvalds 		return -EAGAIN;
7931da177e4SLinus Torvalds 	case NLM_LCK_DENIED_NOLOCKS:
7941da177e4SLinus Torvalds 	case NLM_LCK_DENIED_GRACE_PERIOD:
7951da177e4SLinus Torvalds 		return -ENOLCK;
7961da177e4SLinus Torvalds 	case NLM_LCK_BLOCKED:
7971da177e4SLinus Torvalds 		printk(KERN_NOTICE "lockd: unexpected status NLM_BLOCKED\n");
7981da177e4SLinus Torvalds 		return -ENOLCK;
7991da177e4SLinus Torvalds #ifdef CONFIG_LOCKD_V4
8001da177e4SLinus Torvalds 	case NLM_DEADLCK:
8011da177e4SLinus Torvalds 		return -EDEADLK;
8021da177e4SLinus Torvalds 	case NLM_ROFS:
8031da177e4SLinus Torvalds 		return -EROFS;
8041da177e4SLinus Torvalds 	case NLM_STALE_FH:
8051da177e4SLinus Torvalds 		return -ESTALE;
8061da177e4SLinus Torvalds 	case NLM_FBIG:
8071da177e4SLinus Torvalds 		return -EOVERFLOW;
8081da177e4SLinus Torvalds 	case NLM_FAILED:
8091da177e4SLinus Torvalds 		return -ENOLCK;
8101da177e4SLinus Torvalds #endif
8111da177e4SLinus Torvalds 	}
8121da177e4SLinus Torvalds 	printk(KERN_NOTICE "lockd: unexpected server status %d\n", status);
8131da177e4SLinus Torvalds 	return -ENOLCK;
8141da177e4SLinus Torvalds }
815