80ae3127699f32c9c3ac92bd7682dd75843f9060
[safe/jmp/linux-2.6] / fs / lockd / clntproc.c
1 /*
2  * linux/fs/lockd/clntproc.c
3  *
4  * RPC procedures for the client side NLM implementation
5  *
6  * Copyright (C) 1996, Olaf Kirch <okir@monad.swb.de>
7  */
8
9 #include <linux/config.h>
10 #include <linux/module.h>
11 #include <linux/types.h>
12 #include <linux/errno.h>
13 #include <linux/fs.h>
14 #include <linux/nfs_fs.h>
15 #include <linux/utsname.h>
16 #include <linux/smp_lock.h>
17 #include <linux/sunrpc/clnt.h>
18 #include <linux/sunrpc/svc.h>
19 #include <linux/lockd/lockd.h>
20 #include <linux/lockd/sm_inter.h>
21
22 #define NLMDBG_FACILITY         NLMDBG_CLIENT
23 #define NLMCLNT_GRACE_WAIT      (5*HZ)
24 #define NLMCLNT_POLL_TIMEOUT    (30*HZ)
25 #define NLMCLNT_MAX_RETRIES     3
26
27 static int      nlmclnt_test(struct nlm_rqst *, struct file_lock *);
28 static int      nlmclnt_lock(struct nlm_rqst *, struct file_lock *);
29 static int      nlmclnt_unlock(struct nlm_rqst *, struct file_lock *);
30 static int      nlm_stat_to_errno(u32 stat);
31 static void     nlmclnt_locks_init_private(struct file_lock *fl, struct nlm_host *host);
32 static int      nlmclnt_cancel(struct nlm_host *, int , struct file_lock *);
33
34 static const struct rpc_call_ops nlmclnt_unlock_ops;
35 static const struct rpc_call_ops nlmclnt_cancel_ops;
36
37 /*
38  * Cookie counter for NLM requests
39  */
40 static u32      nlm_cookie = 0x1234;
41
42 static inline void nlmclnt_next_cookie(struct nlm_cookie *c)
43 {
44         memcpy(c->data, &nlm_cookie, 4);
45         memset(c->data+4, 0, 4);
46         c->len=4;
47         nlm_cookie++;
48 }
49
50 static struct nlm_lockowner *nlm_get_lockowner(struct nlm_lockowner *lockowner)
51 {
52         atomic_inc(&lockowner->count);
53         return lockowner;
54 }
55
56 static void nlm_put_lockowner(struct nlm_lockowner *lockowner)
57 {
58         if (!atomic_dec_and_lock(&lockowner->count, &lockowner->host->h_lock))
59                 return;
60         list_del(&lockowner->list);
61         spin_unlock(&lockowner->host->h_lock);
62         nlm_release_host(lockowner->host);
63         kfree(lockowner);
64 }
65
66 static inline int nlm_pidbusy(struct nlm_host *host, uint32_t pid)
67 {
68         struct nlm_lockowner *lockowner;
69         list_for_each_entry(lockowner, &host->h_lockowners, list) {
70                 if (lockowner->pid == pid)
71                         return -EBUSY;
72         }
73         return 0;
74 }
75
76 static inline uint32_t __nlm_alloc_pid(struct nlm_host *host)
77 {
78         uint32_t res;
79         do {
80                 res = host->h_pidcount++;
81         } while (nlm_pidbusy(host, res) < 0);
82         return res;
83 }
84
85 static struct nlm_lockowner *__nlm_find_lockowner(struct nlm_host *host, fl_owner_t owner)
86 {
87         struct nlm_lockowner *lockowner;
88         list_for_each_entry(lockowner, &host->h_lockowners, list) {
89                 if (lockowner->owner != owner)
90                         continue;
91                 return nlm_get_lockowner(lockowner);
92         }
93         return NULL;
94 }
95
96 static struct nlm_lockowner *nlm_find_lockowner(struct nlm_host *host, fl_owner_t owner)
97 {
98         struct nlm_lockowner *res, *new = NULL;
99
100         spin_lock(&host->h_lock);
101         res = __nlm_find_lockowner(host, owner);
102         if (res == NULL) {
103                 spin_unlock(&host->h_lock);
104                 new = (struct nlm_lockowner *)kmalloc(sizeof(*new), GFP_KERNEL);
105                 spin_lock(&host->h_lock);
106                 res = __nlm_find_lockowner(host, owner);
107                 if (res == NULL && new != NULL) {
108                         res = new;
109                         atomic_set(&new->count, 1);
110                         new->owner = owner;
111                         new->pid = __nlm_alloc_pid(host);
112                         new->host = nlm_get_host(host);
113                         list_add(&new->list, &host->h_lockowners);
114                         new = NULL;
115                 }
116         }
117         spin_unlock(&host->h_lock);
118         kfree(new);
119         return res;
120 }
121
122 /*
123  * Initialize arguments for TEST/LOCK/UNLOCK/CANCEL calls
124  */
125 static void nlmclnt_setlockargs(struct nlm_rqst *req, struct file_lock *fl)
126 {
127         struct nlm_args *argp = &req->a_args;
128         struct nlm_lock *lock = &argp->lock;
129
130         nlmclnt_next_cookie(&argp->cookie);
131         argp->state   = nsm_local_state;
132         memcpy(&lock->fh, NFS_FH(fl->fl_file->f_dentry->d_inode), sizeof(struct nfs_fh));
133         lock->caller  = system_utsname.nodename;
134         lock->oh.data = req->a_owner;
135         lock->oh.len  = snprintf(req->a_owner, sizeof(req->a_owner), "%u@%s",
136                                 (unsigned int)fl->fl_u.nfs_fl.owner->pid,
137                                 system_utsname.nodename);
138         lock->svid = fl->fl_u.nfs_fl.owner->pid;
139         locks_copy_lock(&lock->fl, fl);
140 }
141
142 static void nlmclnt_release_lockargs(struct nlm_rqst *req)
143 {
144         struct file_lock *fl = &req->a_args.lock.fl;
145
146         if (fl->fl_ops && fl->fl_ops->fl_release_private)
147                 fl->fl_ops->fl_release_private(fl);
148 }
149
150 /*
151  * This is the main entry point for the NLM client.
152  */
153 int
154 nlmclnt_proc(struct inode *inode, int cmd, struct file_lock *fl)
155 {
156         struct nfs_server       *nfssrv = NFS_SERVER(inode);
157         struct nlm_host         *host;
158         struct nlm_rqst         reqst, *call = &reqst;
159         sigset_t                oldset;
160         unsigned long           flags;
161         int                     status, proto, vers;
162
163         vers = (NFS_PROTO(inode)->version == 3) ? 4 : 1;
164         if (NFS_PROTO(inode)->version > 3) {
165                 printk(KERN_NOTICE "NFSv4 file locking not implemented!\n");
166                 return -ENOLCK;
167         }
168
169         /* Retrieve transport protocol from NFS client */
170         proto = NFS_CLIENT(inode)->cl_xprt->prot;
171
172         if (!(host = nlmclnt_lookup_host(NFS_ADDR(inode), proto, vers)))
173                 return -ENOLCK;
174
175         /* Create RPC client handle if not there, and copy soft
176          * and intr flags from NFS client. */
177         if (host->h_rpcclnt == NULL) {
178                 struct rpc_clnt *clnt;
179
180                 /* Bind an rpc client to this host handle (does not
181                  * perform a portmapper lookup) */
182                 if (!(clnt = nlm_bind_host(host))) {
183                         status = -ENOLCK;
184                         goto done;
185                 }
186                 clnt->cl_softrtry = nfssrv->client->cl_softrtry;
187                 clnt->cl_intr = nfssrv->client->cl_intr;
188         }
189
190         /* Keep the old signal mask */
191         spin_lock_irqsave(&current->sighand->siglock, flags);
192         oldset = current->blocked;
193
194         /* If we're cleaning up locks because the process is exiting,
195          * perform the RPC call asynchronously. */
196         if ((IS_SETLK(cmd) || IS_SETLKW(cmd))
197             && fl->fl_type == F_UNLCK
198             && (current->flags & PF_EXITING)) {
199                 sigfillset(&current->blocked);  /* Mask all signals */
200                 recalc_sigpending();
201                 spin_unlock_irqrestore(&current->sighand->siglock, flags);
202
203                 call = nlmclnt_alloc_call();
204                 if (!call) {
205                         status = -ENOMEM;
206                         goto out_restore;
207                 }
208                 call->a_flags = RPC_TASK_ASYNC;
209         } else {
210                 spin_unlock_irqrestore(&current->sighand->siglock, flags);
211                 memset(call, 0, sizeof(*call));
212                 locks_init_lock(&call->a_args.lock.fl);
213                 locks_init_lock(&call->a_res.lock.fl);
214         }
215         call->a_host = host;
216
217         nlmclnt_locks_init_private(fl, host);
218
219         /* Set up the argument struct */
220         nlmclnt_setlockargs(call, fl);
221
222         if (IS_SETLK(cmd) || IS_SETLKW(cmd)) {
223                 if (fl->fl_type != F_UNLCK) {
224                         call->a_args.block = IS_SETLKW(cmd) ? 1 : 0;
225                         status = nlmclnt_lock(call, fl);
226                 } else
227                         status = nlmclnt_unlock(call, fl);
228         } else if (IS_GETLK(cmd))
229                 status = nlmclnt_test(call, fl);
230         else
231                 status = -EINVAL;
232
233  out_restore:
234         spin_lock_irqsave(&current->sighand->siglock, flags);
235         current->blocked = oldset;
236         recalc_sigpending();
237         spin_unlock_irqrestore(&current->sighand->siglock, flags);
238
239 done:
240         dprintk("lockd: clnt proc returns %d\n", status);
241         nlm_release_host(host);
242         return status;
243 }
244 EXPORT_SYMBOL(nlmclnt_proc);
245
246 /*
247  * Allocate an NLM RPC call struct
248  */
249 struct nlm_rqst *
250 nlmclnt_alloc_call(void)
251 {
252         struct nlm_rqst *call;
253
254         for(;;) {
255                 call = kzalloc(sizeof(*call), GFP_KERNEL);
256                 if (call != NULL) {
257                         locks_init_lock(&call->a_args.lock.fl);
258                         locks_init_lock(&call->a_res.lock.fl);
259                         return call;
260                 }
261                 if (signalled())
262                         break;
263                 printk("nlmclnt_alloc_call: failed, waiting for memory\n");
264                 schedule_timeout_interruptible(5*HZ);
265         }
266         return NULL;
267 }
268
269 static int nlm_wait_on_grace(wait_queue_head_t *queue)
270 {
271         DEFINE_WAIT(wait);
272         int status = -EINTR;
273
274         prepare_to_wait(queue, &wait, TASK_INTERRUPTIBLE);
275         if (!signalled ()) {
276                 schedule_timeout(NLMCLNT_GRACE_WAIT);
277                 try_to_freeze();
278                 if (!signalled ())
279                         status = 0;
280         }
281         finish_wait(queue, &wait);
282         return status;
283 }
284
285 /*
286  * Generic NLM call
287  */
288 static int
289 nlmclnt_call(struct nlm_rqst *req, u32 proc)
290 {
291         struct nlm_host *host = req->a_host;
292         struct rpc_clnt *clnt;
293         struct nlm_args *argp = &req->a_args;
294         struct nlm_res  *resp = &req->a_res;
295         struct rpc_message msg = {
296                 .rpc_argp       = argp,
297                 .rpc_resp       = resp,
298         };
299         int             status;
300
301         dprintk("lockd: call procedure %d on %s\n",
302                         (int)proc, host->h_name);
303
304         do {
305                 if (host->h_reclaiming && !argp->reclaim)
306                         goto in_grace_period;
307
308                 /* If we have no RPC client yet, create one. */
309                 if ((clnt = nlm_bind_host(host)) == NULL)
310                         return -ENOLCK;
311                 msg.rpc_proc = &clnt->cl_procinfo[proc];
312
313                 /* Perform the RPC call. If an error occurs, try again */
314                 if ((status = rpc_call_sync(clnt, &msg, 0)) < 0) {
315                         dprintk("lockd: rpc_call returned error %d\n", -status);
316                         switch (status) {
317                         case -EPROTONOSUPPORT:
318                                 status = -EINVAL;
319                                 break;
320                         case -ECONNREFUSED:
321                         case -ETIMEDOUT:
322                         case -ENOTCONN:
323                                 nlm_rebind_host(host);
324                                 status = -EAGAIN;
325                                 break;
326                         case -ERESTARTSYS:
327                                 return signalled () ? -EINTR : status;
328                         default:
329                                 break;
330                         }
331                         break;
332                 } else
333                 if (resp->status == NLM_LCK_DENIED_GRACE_PERIOD) {
334                         dprintk("lockd: server in grace period\n");
335                         if (argp->reclaim) {
336                                 printk(KERN_WARNING
337                                      "lockd: spurious grace period reject?!\n");
338                                 return -ENOLCK;
339                         }
340                 } else {
341                         if (!argp->reclaim) {
342                                 /* We appear to be out of the grace period */
343                                 wake_up_all(&host->h_gracewait);
344                         }
345                         dprintk("lockd: server returns status %d\n", resp->status);
346                         return 0;       /* Okay, call complete */
347                 }
348
349 in_grace_period:
350                 /*
351                  * The server has rebooted and appears to be in the grace
352                  * period during which locks are only allowed to be
353                  * reclaimed.
354                  * We can only back off and try again later.
355                  */
356                 status = nlm_wait_on_grace(&host->h_gracewait);
357         } while (status == 0);
358
359         return status;
360 }
361
362 /*
363  * Generic NLM call, async version.
364  */
365 int nlmsvc_async_call(struct nlm_rqst *req, u32 proc, const struct rpc_call_ops *tk_ops)
366 {
367         struct nlm_host *host = req->a_host;
368         struct rpc_clnt *clnt;
369         struct rpc_message msg = {
370                 .rpc_argp       = &req->a_args,
371                 .rpc_resp       = &req->a_res,
372         };
373         int             status;
374
375         dprintk("lockd: call procedure %d on %s (async)\n",
376                         (int)proc, host->h_name);
377
378         /* If we have no RPC client yet, create one. */
379         if ((clnt = nlm_bind_host(host)) == NULL)
380                 return -ENOLCK;
381         msg.rpc_proc = &clnt->cl_procinfo[proc];
382
383         /* bootstrap and kick off the async RPC call */
384         status = rpc_call_async(clnt, &msg, RPC_TASK_ASYNC, tk_ops, req);
385
386         return status;
387 }
388
389 static int nlmclnt_async_call(struct nlm_rqst *req, u32 proc, const struct rpc_call_ops *tk_ops)
390 {
391         struct nlm_host *host = req->a_host;
392         struct rpc_clnt *clnt;
393         struct nlm_args *argp = &req->a_args;
394         struct nlm_res  *resp = &req->a_res;
395         struct rpc_message msg = {
396                 .rpc_argp       = argp,
397                 .rpc_resp       = resp,
398         };
399         int             status;
400
401         dprintk("lockd: call procedure %d on %s (async)\n",
402                         (int)proc, host->h_name);
403
404         /* If we have no RPC client yet, create one. */
405         if ((clnt = nlm_bind_host(host)) == NULL)
406                 return -ENOLCK;
407         msg.rpc_proc = &clnt->cl_procinfo[proc];
408
409         /* Increment host refcount */
410         nlm_get_host(host);
411         /* bootstrap and kick off the async RPC call */
412         status = rpc_call_async(clnt, &msg, RPC_TASK_ASYNC, tk_ops, req);
413         if (status < 0)
414                 nlm_release_host(host);
415         return status;
416 }
417
418 /*
419  * TEST for the presence of a conflicting lock
420  */
421 static int
422 nlmclnt_test(struct nlm_rqst *req, struct file_lock *fl)
423 {
424         int     status;
425
426         status = nlmclnt_call(req, NLMPROC_TEST);
427         nlmclnt_release_lockargs(req);
428         if (status < 0)
429                 return status;
430
431         status = req->a_res.status;
432         if (status == NLM_LCK_GRANTED) {
433                 fl->fl_type = F_UNLCK;
434         } if (status == NLM_LCK_DENIED) {
435                 /*
436                  * Report the conflicting lock back to the application.
437                  */
438                 locks_copy_lock(fl, &req->a_res.lock.fl);
439                 fl->fl_pid = 0;
440         } else {
441                 return nlm_stat_to_errno(req->a_res.status);
442         }
443
444         return 0;
445 }
446
447 static void nlmclnt_locks_copy_lock(struct file_lock *new, struct file_lock *fl)
448 {
449         memcpy(&new->fl_u.nfs_fl, &fl->fl_u.nfs_fl, sizeof(new->fl_u.nfs_fl));
450         nlm_get_lockowner(new->fl_u.nfs_fl.owner);
451 }
452
453 static void nlmclnt_locks_release_private(struct file_lock *fl)
454 {
455         nlm_put_lockowner(fl->fl_u.nfs_fl.owner);
456         fl->fl_ops = NULL;
457 }
458
459 static struct file_lock_operations nlmclnt_lock_ops = {
460         .fl_copy_lock = nlmclnt_locks_copy_lock,
461         .fl_release_private = nlmclnt_locks_release_private,
462 };
463
464 static void nlmclnt_locks_init_private(struct file_lock *fl, struct nlm_host *host)
465 {
466         BUG_ON(fl->fl_ops != NULL);
467         fl->fl_u.nfs_fl.state = 0;
468         fl->fl_u.nfs_fl.flags = 0;
469         fl->fl_u.nfs_fl.owner = nlm_find_lockowner(host, fl->fl_owner);
470         fl->fl_ops = &nlmclnt_lock_ops;
471 }
472
473 static void do_vfs_lock(struct file_lock *fl)
474 {
475         int res = 0;
476         switch (fl->fl_flags & (FL_POSIX|FL_FLOCK)) {
477                 case FL_POSIX:
478                         res = posix_lock_file_wait(fl->fl_file, fl);
479                         break;
480                 case FL_FLOCK:
481                         res = flock_lock_file_wait(fl->fl_file, fl);
482                         break;
483                 default:
484                         BUG();
485         }
486         if (res < 0)
487                 printk(KERN_WARNING "%s: VFS is out of sync with lock manager!\n",
488                                 __FUNCTION__);
489 }
490
491 /*
492  * LOCK: Try to create a lock
493  *
494  *                      Programmer Harassment Alert
495  *
496  * When given a blocking lock request in a sync RPC call, the HPUX lockd
497  * will faithfully return LCK_BLOCKED but never cares to notify us when
498  * the lock could be granted. This way, our local process could hang
499  * around forever waiting for the callback.
500  *
501  *  Solution A: Implement busy-waiting
502  *  Solution B: Use the async version of the call (NLM_LOCK_{MSG,RES})
503  *
504  * For now I am implementing solution A, because I hate the idea of
505  * re-implementing lockd for a third time in two months. The async
506  * calls shouldn't be too hard to do, however.
507  *
508  * This is one of the lovely things about standards in the NFS area:
509  * they're so soft and squishy you can't really blame HP for doing this.
510  */
511 static int
512 nlmclnt_lock(struct nlm_rqst *req, struct file_lock *fl)
513 {
514         struct nlm_host *host = req->a_host;
515         struct nlm_res  *resp = &req->a_res;
516         long timeout;
517         int status;
518
519         if (!host->h_monitored && nsm_monitor(host) < 0) {
520                 printk(KERN_NOTICE "lockd: failed to monitor %s\n",
521                                         host->h_name);
522                 status = -ENOLCK;
523                 goto out;
524         }
525
526         if (req->a_args.block) {
527                 status = nlmclnt_prepare_block(req, host, fl);
528                 if (status < 0)
529                         goto out;
530         }
531         for(;;) {
532                 status = nlmclnt_call(req, NLMPROC_LOCK);
533                 if (status < 0)
534                         goto out_unblock;
535                 if (resp->status != NLM_LCK_BLOCKED)
536                         break;
537                 /* Wait on an NLM blocking lock */
538                 timeout = nlmclnt_block(req, NLMCLNT_POLL_TIMEOUT);
539                 /* Did a reclaimer thread notify us of a server reboot? */
540                 if (resp->status ==  NLM_LCK_DENIED_GRACE_PERIOD)
541                         continue;
542                 if (resp->status != NLM_LCK_BLOCKED)
543                         break;
544                 if (timeout >= 0)
545                         continue;
546                 /* We were interrupted. Send a CANCEL request to the server
547                  * and exit
548                  */
549                 status = (int)timeout;
550                 goto out_unblock;
551         }
552
553         if (resp->status == NLM_LCK_GRANTED) {
554                 fl->fl_u.nfs_fl.state = host->h_state;
555                 fl->fl_u.nfs_fl.flags |= NFS_LCK_GRANTED;
556                 fl->fl_flags |= FL_SLEEP;
557                 do_vfs_lock(fl);
558         }
559         status = nlm_stat_to_errno(resp->status);
560 out_unblock:
561         nlmclnt_finish_block(req);
562         /* Cancel the blocked request if it is still pending */
563         if (resp->status == NLM_LCK_BLOCKED)
564                 nlmclnt_cancel(host, req->a_args.block, fl);
565 out:
566         nlmclnt_release_lockargs(req);
567         return status;
568 }
569
570 /*
571  * RECLAIM: Try to reclaim a lock
572  */
573 int
574 nlmclnt_reclaim(struct nlm_host *host, struct file_lock *fl)
575 {
576         struct nlm_rqst reqst, *req;
577         int             status;
578
579         req = &reqst;
580         memset(req, 0, sizeof(*req));
581         locks_init_lock(&req->a_args.lock.fl);
582         locks_init_lock(&req->a_res.lock.fl);
583         req->a_host  = host;
584         req->a_flags = 0;
585
586         /* Set up the argument struct */
587         nlmclnt_setlockargs(req, fl);
588         req->a_args.reclaim = 1;
589
590         if ((status = nlmclnt_call(req, NLMPROC_LOCK)) >= 0
591          && req->a_res.status == NLM_LCK_GRANTED)
592                 return 0;
593
594         printk(KERN_WARNING "lockd: failed to reclaim lock for pid %d "
595                                 "(errno %d, status %d)\n", fl->fl_pid,
596                                 status, req->a_res.status);
597
598         /*
599          * FIXME: This is a serious failure. We can
600          *
601          *  a.  Ignore the problem
602          *  b.  Send the owning process some signal (Linux doesn't have
603          *      SIGLOST, though...)
604          *  c.  Retry the operation
605          *
606          * Until someone comes up with a simple implementation
607          * for b or c, I'll choose option a.
608          */
609
610         return -ENOLCK;
611 }
612
613 /*
614  * UNLOCK: remove an existing lock
615  */
616 static int
617 nlmclnt_unlock(struct nlm_rqst *req, struct file_lock *fl)
618 {
619         struct nlm_res  *resp = &req->a_res;
620         int             status;
621
622         /* Clean the GRANTED flag now so the lock doesn't get
623          * reclaimed while we're stuck in the unlock call. */
624         fl->fl_u.nfs_fl.flags &= ~NFS_LCK_GRANTED;
625
626         /*
627          * Note: the server is supposed to either grant us the unlock
628          * request, or to deny it with NLM_LCK_DENIED_GRACE_PERIOD. In either
629          * case, we want to unlock.
630          */
631         do_vfs_lock(fl);
632
633         if (req->a_flags & RPC_TASK_ASYNC) {
634                 status = nlmclnt_async_call(req, NLMPROC_UNLOCK,
635                                         &nlmclnt_unlock_ops);
636                 /* Hrmf... Do the unlock early since locks_remove_posix()
637                  * really expects us to free the lock synchronously */
638                 if (status < 0) {
639                         nlmclnt_release_lockargs(req);
640                         kfree(req);
641                 }
642                 return status;
643         }
644
645         status = nlmclnt_call(req, NLMPROC_UNLOCK);
646         nlmclnt_release_lockargs(req);
647         if (status < 0)
648                 return status;
649
650         if (resp->status == NLM_LCK_GRANTED)
651                 return 0;
652
653         if (resp->status != NLM_LCK_DENIED_NOLOCKS)
654                 printk("lockd: unexpected unlock status: %d\n", resp->status);
655
656         /* What to do now? I'm out of my depth... */
657
658         return -ENOLCK;
659 }
660
661 static void nlmclnt_unlock_callback(struct rpc_task *task, void *data)
662 {
663         struct nlm_rqst *req = data;
664         int             status = req->a_res.status;
665
666         if (RPC_ASSASSINATED(task))
667                 goto die;
668
669         if (task->tk_status < 0) {
670                 dprintk("lockd: unlock failed (err = %d)\n", -task->tk_status);
671                 goto retry_rebind;
672         }
673         if (status == NLM_LCK_DENIED_GRACE_PERIOD) {
674                 rpc_delay(task, NLMCLNT_GRACE_WAIT);
675                 goto retry_unlock;
676         }
677         if (status != NLM_LCK_GRANTED)
678                 printk(KERN_WARNING "lockd: unexpected unlock status: %d\n", status);
679 die:
680         nlm_release_host(req->a_host);
681         nlmclnt_release_lockargs(req);
682         kfree(req);
683         return;
684  retry_rebind:
685         nlm_rebind_host(req->a_host);
686  retry_unlock:
687         rpc_restart_call(task);
688 }
689
690 static const struct rpc_call_ops nlmclnt_unlock_ops = {
691         .rpc_call_done = nlmclnt_unlock_callback,
692 };
693
694 /*
695  * Cancel a blocked lock request.
696  * We always use an async RPC call for this in order not to hang a
697  * process that has been Ctrl-C'ed.
698  */
699 static int nlmclnt_cancel(struct nlm_host *host, int block, struct file_lock *fl)
700 {
701         struct nlm_rqst *req;
702         unsigned long   flags;
703         sigset_t        oldset;
704         int             status;
705
706         /* Block all signals while setting up call */
707         spin_lock_irqsave(&current->sighand->siglock, flags);
708         oldset = current->blocked;
709         sigfillset(&current->blocked);
710         recalc_sigpending();
711         spin_unlock_irqrestore(&current->sighand->siglock, flags);
712
713         req = nlmclnt_alloc_call();
714         if (!req)
715                 return -ENOMEM;
716         req->a_host  = host;
717         req->a_flags = RPC_TASK_ASYNC;
718
719         nlmclnt_setlockargs(req, fl);
720         req->a_args.block = block;
721
722         status = nlmclnt_async_call(req, NLMPROC_CANCEL, &nlmclnt_cancel_ops);
723         if (status < 0) {
724                 nlmclnt_release_lockargs(req);
725                 kfree(req);
726         }
727
728         spin_lock_irqsave(&current->sighand->siglock, flags);
729         current->blocked = oldset;
730         recalc_sigpending();
731         spin_unlock_irqrestore(&current->sighand->siglock, flags);
732
733         return status;
734 }
735
736 static void nlmclnt_cancel_callback(struct rpc_task *task, void *data)
737 {
738         struct nlm_rqst *req = data;
739
740         if (RPC_ASSASSINATED(task))
741                 goto die;
742
743         if (task->tk_status < 0) {
744                 dprintk("lockd: CANCEL call error %d, retrying.\n",
745                                         task->tk_status);
746                 goto retry_cancel;
747         }
748
749         dprintk("lockd: cancel status %d (task %d)\n",
750                         req->a_res.status, task->tk_pid);
751
752         switch (req->a_res.status) {
753         case NLM_LCK_GRANTED:
754         case NLM_LCK_DENIED_GRACE_PERIOD:
755                 /* Everything's good */
756                 break;
757         case NLM_LCK_DENIED_NOLOCKS:
758                 dprintk("lockd: CANCEL failed (server has no locks)\n");
759                 goto retry_cancel;
760         default:
761                 printk(KERN_NOTICE "lockd: weird return %d for CANCEL call\n",
762                         req->a_res.status);
763         }
764
765 die:
766         nlm_release_host(req->a_host);
767         nlmclnt_release_lockargs(req);
768         kfree(req);
769         return;
770
771 retry_cancel:
772         /* Don't ever retry more than 3 times */
773         if (req->a_retries++ >= NLMCLNT_MAX_RETRIES)
774                 goto die;
775         nlm_rebind_host(req->a_host);
776         rpc_restart_call(task);
777         rpc_delay(task, 30 * HZ);
778 }
779
780 static const struct rpc_call_ops nlmclnt_cancel_ops = {
781         .rpc_call_done = nlmclnt_cancel_callback,
782 };
783
784 /*
785  * Convert an NLM status code to a generic kernel errno
786  */
787 static int
788 nlm_stat_to_errno(u32 status)
789 {
790         switch(status) {
791         case NLM_LCK_GRANTED:
792                 return 0;
793         case NLM_LCK_DENIED:
794                 return -EAGAIN;
795         case NLM_LCK_DENIED_NOLOCKS:
796         case NLM_LCK_DENIED_GRACE_PERIOD:
797                 return -ENOLCK;
798         case NLM_LCK_BLOCKED:
799                 printk(KERN_NOTICE "lockd: unexpected status NLM_BLOCKED\n");
800                 return -ENOLCK;
801 #ifdef CONFIG_LOCKD_V4
802         case NLM_DEADLCK:
803                 return -EDEADLK;
804         case NLM_ROFS:
805                 return -EROFS;
806         case NLM_STALE_FH:
807                 return -ESTALE;
808         case NLM_FBIG:
809                 return -EOVERFLOW;
810         case NLM_FAILED:
811                 return -ENOLCK;
812 #endif
813         }
814         printk(KERN_NOTICE "lockd: unexpected server status %d\n", status);
815         return -ENOLCK;
816 }