Pull acpi-debug into release branch
[linux-2.6] / fs / lockd / xdr4.c
1 /*
2  * linux/fs/lockd/xdr4.c
3  *
4  * XDR support for lockd and the lock client.
5  *
6  * Copyright (C) 1995, 1996 Olaf Kirch <okir@monad.swb.de>
7  * Copyright (C) 1999, Trond Myklebust <trond.myklebust@fys.uio.no>
8  */
9
10 #include <linux/types.h>
11 #include <linux/sched.h>
12 #include <linux/utsname.h>
13 #include <linux/nfs.h>
14
15 #include <linux/sunrpc/xdr.h>
16 #include <linux/sunrpc/clnt.h>
17 #include <linux/sunrpc/svc.h>
18 #include <linux/sunrpc/stats.h>
19 #include <linux/lockd/lockd.h>
20 #include <linux/lockd/sm_inter.h>
21
22 #define NLMDBG_FACILITY         NLMDBG_XDR
23
24 static inline loff_t
25 s64_to_loff_t(__s64 offset)
26 {
27         return (loff_t)offset;
28 }
29
30
31 static inline s64
32 loff_t_to_s64(loff_t offset)
33 {
34         s64 res;
35         if (offset > NLM4_OFFSET_MAX)
36                 res = NLM4_OFFSET_MAX;
37         else if (offset < -NLM4_OFFSET_MAX)
38                 res = -NLM4_OFFSET_MAX;
39         else
40                 res = offset;
41         return res;
42 }
43
44 /*
45  * XDR functions for basic NLM types
46  */
47 static __be32 *
48 nlm4_decode_cookie(__be32 *p, struct nlm_cookie *c)
49 {
50         unsigned int    len;
51
52         len = ntohl(*p++);
53         
54         if(len==0)
55         {
56                 c->len=4;
57                 memset(c->data, 0, 4);  /* hockeypux brain damage */
58         }
59         else if(len<=NLM_MAXCOOKIELEN)
60         {
61                 c->len=len;
62                 memcpy(c->data, p, len);
63                 p+=XDR_QUADLEN(len);
64         }
65         else 
66         {
67                 printk(KERN_NOTICE
68                         "lockd: bad cookie size %d (only cookies under %d bytes are supported.)\n", len, NLM_MAXCOOKIELEN);
69                 return NULL;
70         }
71         return p;
72 }
73
74 static __be32 *
75 nlm4_encode_cookie(__be32 *p, struct nlm_cookie *c)
76 {
77         *p++ = htonl(c->len);
78         memcpy(p, c->data, c->len);
79         p+=XDR_QUADLEN(c->len);
80         return p;
81 }
82
83 static __be32 *
84 nlm4_decode_fh(__be32 *p, struct nfs_fh *f)
85 {
86         memset(f->data, 0, sizeof(f->data));
87         f->size = ntohl(*p++);
88         if (f->size > NFS_MAXFHSIZE) {
89                 printk(KERN_NOTICE
90                         "lockd: bad fhandle size %d (should be <=%d)\n",
91                         f->size, NFS_MAXFHSIZE);
92                 return NULL;
93         }
94         memcpy(f->data, p, f->size);
95         return p + XDR_QUADLEN(f->size);
96 }
97
98 static __be32 *
99 nlm4_encode_fh(__be32 *p, struct nfs_fh *f)
100 {
101         *p++ = htonl(f->size);
102         if (f->size) p[XDR_QUADLEN(f->size)-1] = 0; /* don't leak anything */
103         memcpy(p, f->data, f->size);
104         return p + XDR_QUADLEN(f->size);
105 }
106
107 /*
108  * Encode and decode owner handle
109  */
110 static __be32 *
111 nlm4_decode_oh(__be32 *p, struct xdr_netobj *oh)
112 {
113         return xdr_decode_netobj(p, oh);
114 }
115
116 static __be32 *
117 nlm4_encode_oh(__be32 *p, struct xdr_netobj *oh)
118 {
119         return xdr_encode_netobj(p, oh);
120 }
121
122 static __be32 *
123 nlm4_decode_lock(__be32 *p, struct nlm_lock *lock)
124 {
125         struct file_lock        *fl = &lock->fl;
126         __u64                   len, start;
127         __s64                   end;
128
129         if (!(p = xdr_decode_string_inplace(p, &lock->caller,
130                                             &lock->len, NLM_MAXSTRLEN))
131          || !(p = nlm4_decode_fh(p, &lock->fh))
132          || !(p = nlm4_decode_oh(p, &lock->oh)))
133                 return NULL;
134         lock->svid  = ntohl(*p++);
135
136         locks_init_lock(fl);
137         fl->fl_owner = current->files;
138         fl->fl_pid   = (pid_t)lock->svid;
139         fl->fl_flags = FL_POSIX;
140         fl->fl_type  = F_RDLCK;         /* as good as anything else */
141         p = xdr_decode_hyper(p, &start);
142         p = xdr_decode_hyper(p, &len);
143         end = start + len - 1;
144
145         fl->fl_start = s64_to_loff_t(start);
146
147         if (len == 0 || end < 0)
148                 fl->fl_end = OFFSET_MAX;
149         else
150                 fl->fl_end = s64_to_loff_t(end);
151         return p;
152 }
153
154 /*
155  * Encode a lock as part of an NLM call
156  */
157 static __be32 *
158 nlm4_encode_lock(__be32 *p, struct nlm_lock *lock)
159 {
160         struct file_lock        *fl = &lock->fl;
161         __s64                   start, len;
162
163         if (!(p = xdr_encode_string(p, lock->caller))
164          || !(p = nlm4_encode_fh(p, &lock->fh))
165          || !(p = nlm4_encode_oh(p, &lock->oh)))
166                 return NULL;
167
168         if (fl->fl_start > NLM4_OFFSET_MAX
169          || (fl->fl_end > NLM4_OFFSET_MAX && fl->fl_end != OFFSET_MAX))
170                 return NULL;
171
172         *p++ = htonl(lock->svid);
173
174         start = loff_t_to_s64(fl->fl_start);
175         if (fl->fl_end == OFFSET_MAX)
176                 len = 0;
177         else
178                 len = loff_t_to_s64(fl->fl_end - fl->fl_start + 1);
179
180         p = xdr_encode_hyper(p, start);
181         p = xdr_encode_hyper(p, len);
182
183         return p;
184 }
185
186 /*
187  * Encode result of a TEST/TEST_MSG call
188  */
189 static __be32 *
190 nlm4_encode_testres(__be32 *p, struct nlm_res *resp)
191 {
192         s64             start, len;
193
194         dprintk("xdr: before encode_testres (p %p resp %p)\n", p, resp);
195         if (!(p = nlm4_encode_cookie(p, &resp->cookie)))
196                 return NULL;
197         *p++ = resp->status;
198
199         if (resp->status == nlm_lck_denied) {
200                 struct file_lock        *fl = &resp->lock.fl;
201
202                 *p++ = (fl->fl_type == F_RDLCK)? xdr_zero : xdr_one;
203                 *p++ = htonl(resp->lock.svid);
204
205                 /* Encode owner handle. */
206                 if (!(p = xdr_encode_netobj(p, &resp->lock.oh)))
207                         return NULL;
208
209                 start = loff_t_to_s64(fl->fl_start);
210                 if (fl->fl_end == OFFSET_MAX)
211                         len = 0;
212                 else
213                         len = loff_t_to_s64(fl->fl_end - fl->fl_start + 1);
214                 
215                 p = xdr_encode_hyper(p, start);
216                 p = xdr_encode_hyper(p, len);
217                 dprintk("xdr: encode_testres (status %u pid %d type %d start %Ld end %Ld)\n",
218                         resp->status, (int)resp->lock.svid, fl->fl_type,
219                         (long long)fl->fl_start,  (long long)fl->fl_end);
220         }
221
222         dprintk("xdr: after encode_testres (p %p resp %p)\n", p, resp);
223         return p;
224 }
225
226
227 /*
228  * First, the server side XDR functions
229  */
230 int
231 nlm4svc_decode_testargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
232 {
233         u32     exclusive;
234
235         if (!(p = nlm4_decode_cookie(p, &argp->cookie)))
236                 return 0;
237
238         exclusive = ntohl(*p++);
239         if (!(p = nlm4_decode_lock(p, &argp->lock)))
240                 return 0;
241         if (exclusive)
242                 argp->lock.fl.fl_type = F_WRLCK;
243
244         return xdr_argsize_check(rqstp, p);
245 }
246
247 int
248 nlm4svc_encode_testres(struct svc_rqst *rqstp, __be32 *p, struct nlm_res *resp)
249 {
250         if (!(p = nlm4_encode_testres(p, resp)))
251                 return 0;
252         return xdr_ressize_check(rqstp, p);
253 }
254
255 int
256 nlm4svc_decode_lockargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
257 {
258         u32     exclusive;
259
260         if (!(p = nlm4_decode_cookie(p, &argp->cookie)))
261                 return 0;
262         argp->block  = ntohl(*p++);
263         exclusive    = ntohl(*p++);
264         if (!(p = nlm4_decode_lock(p, &argp->lock)))
265                 return 0;
266         if (exclusive)
267                 argp->lock.fl.fl_type = F_WRLCK;
268         argp->reclaim = ntohl(*p++);
269         argp->state   = ntohl(*p++);
270         argp->monitor = 1;              /* monitor client by default */
271
272         return xdr_argsize_check(rqstp, p);
273 }
274
275 int
276 nlm4svc_decode_cancargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
277 {
278         u32     exclusive;
279
280         if (!(p = nlm4_decode_cookie(p, &argp->cookie)))
281                 return 0;
282         argp->block = ntohl(*p++);
283         exclusive = ntohl(*p++);
284         if (!(p = nlm4_decode_lock(p, &argp->lock)))
285                 return 0;
286         if (exclusive)
287                 argp->lock.fl.fl_type = F_WRLCK;
288         return xdr_argsize_check(rqstp, p);
289 }
290
291 int
292 nlm4svc_decode_unlockargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
293 {
294         if (!(p = nlm4_decode_cookie(p, &argp->cookie))
295          || !(p = nlm4_decode_lock(p, &argp->lock)))
296                 return 0;
297         argp->lock.fl.fl_type = F_UNLCK;
298         return xdr_argsize_check(rqstp, p);
299 }
300
301 int
302 nlm4svc_decode_shareargs(struct svc_rqst *rqstp, __be32 *p, nlm_args *argp)
303 {
304         struct nlm_lock *lock = &argp->lock;
305
306         memset(lock, 0, sizeof(*lock));
307         locks_init_lock(&lock->fl);
308         lock->svid = ~(u32) 0;
309         lock->fl.fl_pid = (pid_t)lock->svid;
310
311         if (!(p = nlm4_decode_cookie(p, &argp->cookie))
312          || !(p = xdr_decode_string_inplace(p, &lock->caller,
313                                             &lock->len, NLM_MAXSTRLEN))
314          || !(p = nlm4_decode_fh(p, &lock->fh))
315          || !(p = nlm4_decode_oh(p, &lock->oh)))
316                 return 0;
317         argp->fsm_mode = ntohl(*p++);
318         argp->fsm_access = ntohl(*p++);
319         return xdr_argsize_check(rqstp, p);
320 }
321
322 int
323 nlm4svc_encode_shareres(struct svc_rqst *rqstp, __be32 *p, struct nlm_res *resp)
324 {
325         if (!(p = nlm4_encode_cookie(p, &resp->cookie)))
326                 return 0;
327         *p++ = resp->status;
328         *p++ = xdr_zero;                /* sequence argument */
329         return xdr_ressize_check(rqstp, p);
330 }
331
332 int
333 nlm4svc_encode_res(struct svc_rqst *rqstp, __be32 *p, struct nlm_res *resp)
334 {
335         if (!(p = nlm4_encode_cookie(p, &resp->cookie)))
336                 return 0;
337         *p++ = resp->status;
338         return xdr_ressize_check(rqstp, p);
339 }
340
341 int
342 nlm4svc_decode_notify(struct svc_rqst *rqstp, __be32 *p, struct nlm_args *argp)
343 {
344         struct nlm_lock *lock = &argp->lock;
345
346         if (!(p = xdr_decode_string_inplace(p, &lock->caller,
347                                             &lock->len, NLM_MAXSTRLEN)))
348                 return 0;
349         argp->state = ntohl(*p++);
350         return xdr_argsize_check(rqstp, p);
351 }
352
353 int
354 nlm4svc_decode_reboot(struct svc_rqst *rqstp, __be32 *p, struct nlm_reboot *argp)
355 {
356         if (!(p = xdr_decode_string_inplace(p, &argp->mon, &argp->len, SM_MAXSTRLEN)))
357                 return 0;
358         argp->state = ntohl(*p++);
359         /* Preserve the address in network byte order */
360         argp->addr  = *p++;
361         argp->vers  = *p++;
362         argp->proto = *p++;
363         return xdr_argsize_check(rqstp, p);
364 }
365
366 int
367 nlm4svc_decode_res(struct svc_rqst *rqstp, __be32 *p, struct nlm_res *resp)
368 {
369         if (!(p = nlm4_decode_cookie(p, &resp->cookie)))
370                 return 0;
371         resp->status = *p++;
372         return xdr_argsize_check(rqstp, p);
373 }
374
375 int
376 nlm4svc_decode_void(struct svc_rqst *rqstp, __be32 *p, void *dummy)
377 {
378         return xdr_argsize_check(rqstp, p);
379 }
380
381 int
382 nlm4svc_encode_void(struct svc_rqst *rqstp, __be32 *p, void *dummy)
383 {
384         return xdr_ressize_check(rqstp, p);
385 }
386
387 /*
388  * Now, the client side XDR functions
389  */
390 #ifdef NLMCLNT_SUPPORT_SHARES
391 static int
392 nlm4clt_decode_void(struct rpc_rqst *req, __be32 *p, void *ptr)
393 {
394         return 0;
395 }
396 #endif
397
398 static int
399 nlm4clt_encode_testargs(struct rpc_rqst *req, __be32 *p, nlm_args *argp)
400 {
401         struct nlm_lock *lock = &argp->lock;
402
403         if (!(p = nlm4_encode_cookie(p, &argp->cookie)))
404                 return -EIO;
405         *p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero;
406         if (!(p = nlm4_encode_lock(p, lock)))
407                 return -EIO;
408         req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
409         return 0;
410 }
411
412 static int
413 nlm4clt_decode_testres(struct rpc_rqst *req, __be32 *p, struct nlm_res *resp)
414 {
415         if (!(p = nlm4_decode_cookie(p, &resp->cookie)))
416                 return -EIO;
417         resp->status = *p++;
418         if (resp->status == nlm_lck_denied) {
419                 struct file_lock        *fl = &resp->lock.fl;
420                 u32                     excl;
421                 __u64                   start, len;
422                 __s64                   end;
423
424                 memset(&resp->lock, 0, sizeof(resp->lock));
425                 locks_init_lock(fl);
426                 excl = ntohl(*p++);
427                 resp->lock.svid = ntohl(*p++);
428                 fl->fl_pid = (pid_t)resp->lock.svid;
429                 if (!(p = nlm4_decode_oh(p, &resp->lock.oh)))
430                         return -EIO;
431
432                 fl->fl_flags = FL_POSIX;
433                 fl->fl_type  = excl? F_WRLCK : F_RDLCK;
434                 p = xdr_decode_hyper(p, &start);
435                 p = xdr_decode_hyper(p, &len);
436                 end = start + len - 1;
437
438                 fl->fl_start = s64_to_loff_t(start);
439                 if (len == 0 || end < 0)
440                         fl->fl_end = OFFSET_MAX;
441                 else
442                         fl->fl_end = s64_to_loff_t(end);
443         }
444         return 0;
445 }
446
447
448 static int
449 nlm4clt_encode_lockargs(struct rpc_rqst *req, __be32 *p, nlm_args *argp)
450 {
451         struct nlm_lock *lock = &argp->lock;
452
453         if (!(p = nlm4_encode_cookie(p, &argp->cookie)))
454                 return -EIO;
455         *p++ = argp->block? xdr_one : xdr_zero;
456         *p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero;
457         if (!(p = nlm4_encode_lock(p, lock)))
458                 return -EIO;
459         *p++ = argp->reclaim? xdr_one : xdr_zero;
460         *p++ = htonl(argp->state);
461         req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
462         return 0;
463 }
464
465 static int
466 nlm4clt_encode_cancargs(struct rpc_rqst *req, __be32 *p, nlm_args *argp)
467 {
468         struct nlm_lock *lock = &argp->lock;
469
470         if (!(p = nlm4_encode_cookie(p, &argp->cookie)))
471                 return -EIO;
472         *p++ = argp->block? xdr_one : xdr_zero;
473         *p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero;
474         if (!(p = nlm4_encode_lock(p, lock)))
475                 return -EIO;
476         req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
477         return 0;
478 }
479
480 static int
481 nlm4clt_encode_unlockargs(struct rpc_rqst *req, __be32 *p, nlm_args *argp)
482 {
483         struct nlm_lock *lock = &argp->lock;
484
485         if (!(p = nlm4_encode_cookie(p, &argp->cookie)))
486                 return -EIO;
487         if (!(p = nlm4_encode_lock(p, lock)))
488                 return -EIO;
489         req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
490         return 0;
491 }
492
493 static int
494 nlm4clt_encode_res(struct rpc_rqst *req, __be32 *p, struct nlm_res *resp)
495 {
496         if (!(p = nlm4_encode_cookie(p, &resp->cookie)))
497                 return -EIO;
498         *p++ = resp->status;
499         req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
500         return 0;
501 }
502
503 static int
504 nlm4clt_encode_testres(struct rpc_rqst *req, __be32 *p, struct nlm_res *resp)
505 {
506         if (!(p = nlm4_encode_testres(p, resp)))
507                 return -EIO;
508         req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
509         return 0;
510 }
511
512 static int
513 nlm4clt_decode_res(struct rpc_rqst *req, __be32 *p, struct nlm_res *resp)
514 {
515         if (!(p = nlm4_decode_cookie(p, &resp->cookie)))
516                 return -EIO;
517         resp->status = *p++;
518         return 0;
519 }
520
521 #if (NLMCLNT_OHSIZE > XDR_MAX_NETOBJ)
522 #  error "NLM host name cannot be larger than XDR_MAX_NETOBJ!"
523 #endif
524
525 #if (NLMCLNT_OHSIZE > NLM_MAXSTRLEN)
526 #  error "NLM host name cannot be larger than NLM's maximum string length!"
527 #endif
528
529 /*
530  * Buffer requirements for NLM
531  */
532 #define NLM4_void_sz            0
533 #define NLM4_cookie_sz          1+XDR_QUADLEN(NLM_MAXCOOKIELEN)
534 #define NLM4_caller_sz          1+XDR_QUADLEN(NLMCLNT_OHSIZE)
535 #define NLM4_owner_sz           1+XDR_QUADLEN(NLMCLNT_OHSIZE)
536 #define NLM4_fhandle_sz         1+XDR_QUADLEN(NFS3_FHSIZE)
537 #define NLM4_lock_sz            5+NLM4_caller_sz+NLM4_owner_sz+NLM4_fhandle_sz
538 #define NLM4_holder_sz          6+NLM4_owner_sz
539
540 #define NLM4_testargs_sz        NLM4_cookie_sz+1+NLM4_lock_sz
541 #define NLM4_lockargs_sz        NLM4_cookie_sz+4+NLM4_lock_sz
542 #define NLM4_cancargs_sz        NLM4_cookie_sz+2+NLM4_lock_sz
543 #define NLM4_unlockargs_sz      NLM4_cookie_sz+NLM4_lock_sz
544
545 #define NLM4_testres_sz         NLM4_cookie_sz+1+NLM4_holder_sz
546 #define NLM4_res_sz             NLM4_cookie_sz+1
547 #define NLM4_norep_sz           0
548
549 /*
550  * For NLM, a void procedure really returns nothing
551  */
552 #define nlm4clt_decode_norep    NULL
553
554 #define PROC(proc, argtype, restype)                                    \
555 [NLMPROC_##proc] = {                                                    \
556         .p_proc      = NLMPROC_##proc,                                  \
557         .p_encode    = (kxdrproc_t) nlm4clt_encode_##argtype,           \
558         .p_decode    = (kxdrproc_t) nlm4clt_decode_##restype,           \
559         .p_arglen    = NLM4_##argtype##_sz,                             \
560         .p_replen    = NLM4_##restype##_sz,                             \
561         .p_statidx   = NLMPROC_##proc,                                  \
562         .p_name      = #proc,                                           \
563         }
564
565 static struct rpc_procinfo      nlm4_procedures[] = {
566     PROC(TEST,          testargs,       testres),
567     PROC(LOCK,          lockargs,       res),
568     PROC(CANCEL,        cancargs,       res),
569     PROC(UNLOCK,        unlockargs,     res),
570     PROC(GRANTED,       testargs,       res),
571     PROC(TEST_MSG,      testargs,       norep),
572     PROC(LOCK_MSG,      lockargs,       norep),
573     PROC(CANCEL_MSG,    cancargs,       norep),
574     PROC(UNLOCK_MSG,    unlockargs,     norep),
575     PROC(GRANTED_MSG,   testargs,       norep),
576     PROC(TEST_RES,      testres,        norep),
577     PROC(LOCK_RES,      res,            norep),
578     PROC(CANCEL_RES,    res,            norep),
579     PROC(UNLOCK_RES,    res,            norep),
580     PROC(GRANTED_RES,   res,            norep),
581 #ifdef NLMCLNT_SUPPORT_SHARES
582     PROC(SHARE,         shareargs,      shareres),
583     PROC(UNSHARE,       shareargs,      shareres),
584     PROC(NM_LOCK,       lockargs,       res),
585     PROC(FREE_ALL,      notify,         void),
586 #endif
587 };
588
589 struct rpc_version      nlm_version4 = {
590         .number         = 4,
591         .nrprocs        = 24,
592         .procs          = nlm4_procedures,
593 };