NFS: Don't drop CB requests with invalid principals
[pandora-kernel.git] / fs / nfs / callback_xdr.c
1 /*
2  * linux/fs/nfs/callback_xdr.c
3  *
4  * Copyright (C) 2004 Trond Myklebust
5  *
6  * NFSv4 callback encode/decode procedures
7  */
8 #include <linux/kernel.h>
9 #include <linux/sunrpc/svc.h>
10 #include <linux/nfs4.h>
11 #include <linux/nfs_fs.h>
12 #include <linux/ratelimit.h>
13 #include <linux/printk.h>
14 #include <linux/slab.h>
15 #include <linux/sunrpc/bc_xprt.h>
16 #include "nfs4_fs.h"
17 #include "callback.h"
18 #include "internal.h"
19
20 #define CB_OP_TAGLEN_MAXSZ      (512)
21 #define CB_OP_HDR_RES_MAXSZ     (2 + CB_OP_TAGLEN_MAXSZ)
22 #define CB_OP_GETATTR_BITMAP_MAXSZ      (4)
23 #define CB_OP_GETATTR_RES_MAXSZ (CB_OP_HDR_RES_MAXSZ + \
24                                 CB_OP_GETATTR_BITMAP_MAXSZ + \
25                                 2 + 2 + 3 + 3)
26 #define CB_OP_RECALL_RES_MAXSZ  (CB_OP_HDR_RES_MAXSZ)
27
28 #if defined(CONFIG_NFS_V4_1)
29 #define CB_OP_LAYOUTRECALL_RES_MAXSZ    (CB_OP_HDR_RES_MAXSZ)
30 #define CB_OP_DEVICENOTIFY_RES_MAXSZ    (CB_OP_HDR_RES_MAXSZ)
31 #define CB_OP_SEQUENCE_RES_MAXSZ        (CB_OP_HDR_RES_MAXSZ + \
32                                         4 + 1 + 3)
33 #define CB_OP_RECALLANY_RES_MAXSZ       (CB_OP_HDR_RES_MAXSZ)
34 #define CB_OP_RECALLSLOT_RES_MAXSZ      (CB_OP_HDR_RES_MAXSZ)
35 #endif /* CONFIG_NFS_V4_1 */
36
37 #define NFSDBG_FACILITY NFSDBG_CALLBACK
38
39 /* Internal error code */
40 #define NFS4ERR_RESOURCE_HDR    11050
41
42 typedef __be32 (*callback_process_op_t)(void *, void *,
43                                         struct cb_process_state *);
44 typedef __be32 (*callback_decode_arg_t)(struct svc_rqst *, struct xdr_stream *, void *);
45 typedef __be32 (*callback_encode_res_t)(struct svc_rqst *, struct xdr_stream *, void *);
46
47
48 struct callback_op {
49         callback_process_op_t process_op;
50         callback_decode_arg_t decode_args;
51         callback_encode_res_t encode_res;
52         long res_maxsize;
53 };
54
55 static struct callback_op callback_ops[];
56
57 static __be32 nfs4_callback_null(struct svc_rqst *rqstp, void *argp, void *resp)
58 {
59         return htonl(NFS4_OK);
60 }
61
62 static int nfs4_decode_void(struct svc_rqst *rqstp, __be32 *p, void *dummy)
63 {
64         return xdr_argsize_check(rqstp, p);
65 }
66
67 static int nfs4_encode_void(struct svc_rqst *rqstp, __be32 *p, void *dummy)
68 {
69         return xdr_ressize_check(rqstp, p);
70 }
71
72 static __be32 *read_buf(struct xdr_stream *xdr, int nbytes)
73 {
74         __be32 *p;
75
76         p = xdr_inline_decode(xdr, nbytes);
77         if (unlikely(p == NULL))
78                 printk(KERN_WARNING "NFSv4 callback reply buffer overflowed!\n");
79         return p;
80 }
81
82 static __be32 decode_string(struct xdr_stream *xdr, unsigned int *len, const char **str)
83 {
84         __be32 *p;
85
86         p = read_buf(xdr, 4);
87         if (unlikely(p == NULL))
88                 return htonl(NFS4ERR_RESOURCE);
89         *len = ntohl(*p);
90
91         if (*len != 0) {
92                 p = read_buf(xdr, *len);
93                 if (unlikely(p == NULL))
94                         return htonl(NFS4ERR_RESOURCE);
95                 *str = (const char *)p;
96         } else
97                 *str = NULL;
98
99         return 0;
100 }
101
102 static __be32 decode_fh(struct xdr_stream *xdr, struct nfs_fh *fh)
103 {
104         __be32 *p;
105
106         p = read_buf(xdr, 4);
107         if (unlikely(p == NULL))
108                 return htonl(NFS4ERR_RESOURCE);
109         fh->size = ntohl(*p);
110         if (fh->size > NFS4_FHSIZE)
111                 return htonl(NFS4ERR_BADHANDLE);
112         p = read_buf(xdr, fh->size);
113         if (unlikely(p == NULL))
114                 return htonl(NFS4ERR_RESOURCE);
115         memcpy(&fh->data[0], p, fh->size);
116         memset(&fh->data[fh->size], 0, sizeof(fh->data) - fh->size);
117         return 0;
118 }
119
120 static __be32 decode_bitmap(struct xdr_stream *xdr, uint32_t *bitmap)
121 {
122         __be32 *p;
123         unsigned int attrlen;
124
125         p = read_buf(xdr, 4);
126         if (unlikely(p == NULL))
127                 return htonl(NFS4ERR_RESOURCE);
128         attrlen = ntohl(*p);
129         p = read_buf(xdr, attrlen << 2);
130         if (unlikely(p == NULL))
131                 return htonl(NFS4ERR_RESOURCE);
132         if (likely(attrlen > 0))
133                 bitmap[0] = ntohl(*p++);
134         if (attrlen > 1)
135                 bitmap[1] = ntohl(*p);
136         return 0;
137 }
138
139 static __be32 decode_stateid(struct xdr_stream *xdr, nfs4_stateid *stateid)
140 {
141         __be32 *p;
142
143         p = read_buf(xdr, 16);
144         if (unlikely(p == NULL))
145                 return htonl(NFS4ERR_RESOURCE);
146         memcpy(stateid->data, p, 16);
147         return 0;
148 }
149
150 static __be32 decode_compound_hdr_arg(struct xdr_stream *xdr, struct cb_compound_hdr_arg *hdr)
151 {
152         __be32 *p;
153         __be32 status;
154
155         status = decode_string(xdr, &hdr->taglen, &hdr->tag);
156         if (unlikely(status != 0))
157                 return status;
158         /* We do not like overly long tags! */
159         if (hdr->taglen > CB_OP_TAGLEN_MAXSZ - 12) {
160                 printk("NFSv4 CALLBACK %s: client sent tag of length %u\n",
161                                 __func__, hdr->taglen);
162                 return htonl(NFS4ERR_RESOURCE);
163         }
164         p = read_buf(xdr, 12);
165         if (unlikely(p == NULL))
166                 return htonl(NFS4ERR_RESOURCE);
167         hdr->minorversion = ntohl(*p++);
168         /* Check minor version is zero or one. */
169         if (hdr->minorversion <= 1) {
170                 hdr->cb_ident = ntohl(*p++); /* ignored by v4.1 */
171         } else {
172                 pr_warn_ratelimited("NFS: %s: NFSv4 server callback with "
173                         "illegal minor version %u!\n",
174                         __func__, hdr->minorversion);
175                 return htonl(NFS4ERR_MINOR_VERS_MISMATCH);
176         }
177         hdr->nops = ntohl(*p);
178         dprintk("%s: minorversion %d nops %d\n", __func__,
179                 hdr->minorversion, hdr->nops);
180         return 0;
181 }
182
183 static __be32 decode_op_hdr(struct xdr_stream *xdr, unsigned int *op)
184 {
185         __be32 *p;
186         p = read_buf(xdr, 4);
187         if (unlikely(p == NULL))
188                 return htonl(NFS4ERR_RESOURCE_HDR);
189         *op = ntohl(*p);
190         return 0;
191 }
192
193 static __be32 decode_getattr_args(struct svc_rqst *rqstp, struct xdr_stream *xdr, struct cb_getattrargs *args)
194 {
195         __be32 status;
196
197         status = decode_fh(xdr, &args->fh);
198         if (unlikely(status != 0))
199                 goto out;
200         args->addr = svc_addr(rqstp);
201         status = decode_bitmap(xdr, args->bitmap);
202 out:
203         dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
204         return status;
205 }
206
207 static __be32 decode_recall_args(struct svc_rqst *rqstp, struct xdr_stream *xdr, struct cb_recallargs *args)
208 {
209         __be32 *p;
210         __be32 status;
211
212         args->addr = svc_addr(rqstp);
213         status = decode_stateid(xdr, &args->stateid);
214         if (unlikely(status != 0))
215                 goto out;
216         p = read_buf(xdr, 4);
217         if (unlikely(p == NULL)) {
218                 status = htonl(NFS4ERR_RESOURCE);
219                 goto out;
220         }
221         args->truncate = ntohl(*p);
222         status = decode_fh(xdr, &args->fh);
223 out:
224         dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
225         return status;
226 }
227
228 #if defined(CONFIG_NFS_V4_1)
229
230 static __be32 decode_layoutrecall_args(struct svc_rqst *rqstp,
231                                        struct xdr_stream *xdr,
232                                        struct cb_layoutrecallargs *args)
233 {
234         __be32 *p;
235         __be32 status = 0;
236         uint32_t iomode;
237
238         args->cbl_addr = svc_addr(rqstp);
239         p = read_buf(xdr, 4 * sizeof(uint32_t));
240         if (unlikely(p == NULL)) {
241                 status = htonl(NFS4ERR_BADXDR);
242                 goto out;
243         }
244
245         args->cbl_layout_type = ntohl(*p++);
246         /* Depite the spec's xdr, iomode really belongs in the FILE switch,
247          * as it is unusable and ignored with the other types.
248          */
249         iomode = ntohl(*p++);
250         args->cbl_layoutchanged = ntohl(*p++);
251         args->cbl_recall_type = ntohl(*p++);
252
253         if (args->cbl_recall_type == RETURN_FILE) {
254                 args->cbl_range.iomode = iomode;
255                 status = decode_fh(xdr, &args->cbl_fh);
256                 if (unlikely(status != 0))
257                         goto out;
258
259                 p = read_buf(xdr, 2 * sizeof(uint64_t));
260                 if (unlikely(p == NULL)) {
261                         status = htonl(NFS4ERR_BADXDR);
262                         goto out;
263                 }
264                 p = xdr_decode_hyper(p, &args->cbl_range.offset);
265                 p = xdr_decode_hyper(p, &args->cbl_range.length);
266                 status = decode_stateid(xdr, &args->cbl_stateid);
267                 if (unlikely(status != 0))
268                         goto out;
269         } else if (args->cbl_recall_type == RETURN_FSID) {
270                 p = read_buf(xdr, 2 * sizeof(uint64_t));
271                 if (unlikely(p == NULL)) {
272                         status = htonl(NFS4ERR_BADXDR);
273                         goto out;
274                 }
275                 p = xdr_decode_hyper(p, &args->cbl_fsid.major);
276                 p = xdr_decode_hyper(p, &args->cbl_fsid.minor);
277         } else if (args->cbl_recall_type != RETURN_ALL) {
278                 status = htonl(NFS4ERR_BADXDR);
279                 goto out;
280         }
281         dprintk("%s: ltype 0x%x iomode %d changed %d recall_type %d\n",
282                 __func__,
283                 args->cbl_layout_type, iomode,
284                 args->cbl_layoutchanged, args->cbl_recall_type);
285 out:
286         dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
287         return status;
288 }
289
290 static
291 __be32 decode_devicenotify_args(struct svc_rqst *rqstp,
292                                 struct xdr_stream *xdr,
293                                 struct cb_devicenotifyargs *args)
294 {
295         __be32 *p;
296         __be32 status = 0;
297         u32 tmp;
298         int n, i;
299         args->ndevs = 0;
300
301         /* Num of device notifications */
302         p = read_buf(xdr, sizeof(uint32_t));
303         if (unlikely(p == NULL)) {
304                 status = htonl(NFS4ERR_BADXDR);
305                 goto out;
306         }
307         n = ntohl(*p++);
308         if (n <= 0)
309                 goto out;
310
311         args->devs = kmalloc(n * sizeof(*args->devs), GFP_KERNEL);
312         if (!args->devs) {
313                 status = htonl(NFS4ERR_DELAY);
314                 goto out;
315         }
316
317         /* Decode each dev notification */
318         for (i = 0; i < n; i++) {
319                 struct cb_devicenotifyitem *dev = &args->devs[i];
320
321                 p = read_buf(xdr, (4 * sizeof(uint32_t)) + NFS4_DEVICEID4_SIZE);
322                 if (unlikely(p == NULL)) {
323                         status = htonl(NFS4ERR_BADXDR);
324                         goto err;
325                 }
326
327                 tmp = ntohl(*p++);      /* bitmap size */
328                 if (tmp != 1) {
329                         status = htonl(NFS4ERR_INVAL);
330                         goto err;
331                 }
332                 dev->cbd_notify_type = ntohl(*p++);
333                 if (dev->cbd_notify_type != NOTIFY_DEVICEID4_CHANGE &&
334                     dev->cbd_notify_type != NOTIFY_DEVICEID4_DELETE) {
335                         status = htonl(NFS4ERR_INVAL);
336                         goto err;
337                 }
338
339                 tmp = ntohl(*p++);      /* opaque size */
340                 if (((dev->cbd_notify_type == NOTIFY_DEVICEID4_CHANGE) &&
341                      (tmp != NFS4_DEVICEID4_SIZE + 8)) ||
342                     ((dev->cbd_notify_type == NOTIFY_DEVICEID4_DELETE) &&
343                      (tmp != NFS4_DEVICEID4_SIZE + 4))) {
344                         status = htonl(NFS4ERR_INVAL);
345                         goto err;
346                 }
347                 dev->cbd_layout_type = ntohl(*p++);
348                 memcpy(dev->cbd_dev_id.data, p, NFS4_DEVICEID4_SIZE);
349                 p += XDR_QUADLEN(NFS4_DEVICEID4_SIZE);
350
351                 if (dev->cbd_layout_type == NOTIFY_DEVICEID4_CHANGE) {
352                         p = read_buf(xdr, sizeof(uint32_t));
353                         if (unlikely(p == NULL)) {
354                                 status = htonl(NFS4ERR_BADXDR);
355                                 goto err;
356                         }
357                         dev->cbd_immediate = ntohl(*p++);
358                 } else {
359                         dev->cbd_immediate = 0;
360                 }
361
362                 args->ndevs++;
363
364                 dprintk("%s: type %d layout 0x%x immediate %d\n",
365                         __func__, dev->cbd_notify_type, dev->cbd_layout_type,
366                         dev->cbd_immediate);
367         }
368 out:
369         dprintk("%s: status %d ndevs %d\n",
370                 __func__, ntohl(status), args->ndevs);
371         return status;
372 err:
373         kfree(args->devs);
374         goto out;
375 }
376
377 static __be32 decode_sessionid(struct xdr_stream *xdr,
378                                  struct nfs4_sessionid *sid)
379 {
380         __be32 *p;
381         int len = NFS4_MAX_SESSIONID_LEN;
382
383         p = read_buf(xdr, len);
384         if (unlikely(p == NULL))
385                 return htonl(NFS4ERR_RESOURCE);
386
387         memcpy(sid->data, p, len);
388         return 0;
389 }
390
391 static __be32 decode_rc_list(struct xdr_stream *xdr,
392                                struct referring_call_list *rc_list)
393 {
394         __be32 *p;
395         int i;
396         __be32 status;
397
398         status = decode_sessionid(xdr, &rc_list->rcl_sessionid);
399         if (status)
400                 goto out;
401
402         status = htonl(NFS4ERR_RESOURCE);
403         p = read_buf(xdr, sizeof(uint32_t));
404         if (unlikely(p == NULL))
405                 goto out;
406
407         rc_list->rcl_nrefcalls = ntohl(*p++);
408         if (rc_list->rcl_nrefcalls) {
409                 p = read_buf(xdr,
410                              rc_list->rcl_nrefcalls * 2 * sizeof(uint32_t));
411                 if (unlikely(p == NULL))
412                         goto out;
413                 rc_list->rcl_refcalls = kmalloc(rc_list->rcl_nrefcalls *
414                                                 sizeof(*rc_list->rcl_refcalls),
415                                                 GFP_KERNEL);
416                 if (unlikely(rc_list->rcl_refcalls == NULL))
417                         goto out;
418                 for (i = 0; i < rc_list->rcl_nrefcalls; i++) {
419                         rc_list->rcl_refcalls[i].rc_sequenceid = ntohl(*p++);
420                         rc_list->rcl_refcalls[i].rc_slotid = ntohl(*p++);
421                 }
422         }
423         status = 0;
424
425 out:
426         return status;
427 }
428
429 static __be32 decode_cb_sequence_args(struct svc_rqst *rqstp,
430                                         struct xdr_stream *xdr,
431                                         struct cb_sequenceargs *args)
432 {
433         __be32 *p;
434         int i;
435         __be32 status;
436
437         status = decode_sessionid(xdr, &args->csa_sessionid);
438         if (status)
439                 goto out;
440
441         status = htonl(NFS4ERR_RESOURCE);
442         p = read_buf(xdr, 5 * sizeof(uint32_t));
443         if (unlikely(p == NULL))
444                 goto out;
445
446         args->csa_addr = svc_addr(rqstp);
447         args->csa_sequenceid = ntohl(*p++);
448         args->csa_slotid = ntohl(*p++);
449         args->csa_highestslotid = ntohl(*p++);
450         args->csa_cachethis = ntohl(*p++);
451         args->csa_nrclists = ntohl(*p++);
452         args->csa_rclists = NULL;
453         if (args->csa_nrclists) {
454                 args->csa_rclists = kmalloc_array(args->csa_nrclists,
455                                                   sizeof(*args->csa_rclists),
456                                                   GFP_KERNEL);
457                 if (unlikely(args->csa_rclists == NULL))
458                         goto out;
459
460                 for (i = 0; i < args->csa_nrclists; i++) {
461                         status = decode_rc_list(xdr, &args->csa_rclists[i]);
462                         if (status) {
463                                 args->csa_nrclists = i;
464                                 goto out_free;
465                         }
466                 }
467         }
468         status = 0;
469
470         dprintk("%s: sessionid %x:%x:%x:%x sequenceid %u slotid %u "
471                 "highestslotid %u cachethis %d nrclists %u\n",
472                 __func__,
473                 ((u32 *)&args->csa_sessionid)[0],
474                 ((u32 *)&args->csa_sessionid)[1],
475                 ((u32 *)&args->csa_sessionid)[2],
476                 ((u32 *)&args->csa_sessionid)[3],
477                 args->csa_sequenceid, args->csa_slotid,
478                 args->csa_highestslotid, args->csa_cachethis,
479                 args->csa_nrclists);
480 out:
481         dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
482         return status;
483
484 out_free:
485         for (i = 0; i < args->csa_nrclists; i++)
486                 kfree(args->csa_rclists[i].rcl_refcalls);
487         kfree(args->csa_rclists);
488         goto out;
489 }
490
491 static __be32 decode_recallany_args(struct svc_rqst *rqstp,
492                                       struct xdr_stream *xdr,
493                                       struct cb_recallanyargs *args)
494 {
495         uint32_t bitmap[2];
496         __be32 *p, status;
497
498         args->craa_addr = svc_addr(rqstp);
499         p = read_buf(xdr, 4);
500         if (unlikely(p == NULL))
501                 return htonl(NFS4ERR_BADXDR);
502         args->craa_objs_to_keep = ntohl(*p++);
503         status = decode_bitmap(xdr, bitmap);
504         if (unlikely(status))
505                 return status;
506         args->craa_type_mask = bitmap[0];
507
508         return 0;
509 }
510
511 static __be32 decode_recallslot_args(struct svc_rqst *rqstp,
512                                         struct xdr_stream *xdr,
513                                         struct cb_recallslotargs *args)
514 {
515         __be32 *p;
516
517         args->crsa_addr = svc_addr(rqstp);
518         p = read_buf(xdr, 4);
519         if (unlikely(p == NULL))
520                 return htonl(NFS4ERR_BADXDR);
521         args->crsa_target_max_slots = ntohl(*p++);
522         return 0;
523 }
524
525 #endif /* CONFIG_NFS_V4_1 */
526
527 static __be32 encode_string(struct xdr_stream *xdr, unsigned int len, const char *str)
528 {
529         __be32 *p;
530
531         p = xdr_reserve_space(xdr, 4 + len);
532         if (unlikely(p == NULL))
533                 return htonl(NFS4ERR_RESOURCE);
534         xdr_encode_opaque(p, str, len);
535         return 0;
536 }
537
538 #define CB_SUPPORTED_ATTR0 (FATTR4_WORD0_CHANGE|FATTR4_WORD0_SIZE)
539 #define CB_SUPPORTED_ATTR1 (FATTR4_WORD1_TIME_METADATA|FATTR4_WORD1_TIME_MODIFY)
540 static __be32 encode_attr_bitmap(struct xdr_stream *xdr, const uint32_t *bitmap, __be32 **savep)
541 {
542         __be32 bm[2];
543         __be32 *p;
544
545         bm[0] = htonl(bitmap[0] & CB_SUPPORTED_ATTR0);
546         bm[1] = htonl(bitmap[1] & CB_SUPPORTED_ATTR1);
547         if (bm[1] != 0) {
548                 p = xdr_reserve_space(xdr, 16);
549                 if (unlikely(p == NULL))
550                         return htonl(NFS4ERR_RESOURCE);
551                 *p++ = htonl(2);
552                 *p++ = bm[0];
553                 *p++ = bm[1];
554         } else if (bm[0] != 0) {
555                 p = xdr_reserve_space(xdr, 12);
556                 if (unlikely(p == NULL))
557                         return htonl(NFS4ERR_RESOURCE);
558                 *p++ = htonl(1);
559                 *p++ = bm[0];
560         } else {
561                 p = xdr_reserve_space(xdr, 8);
562                 if (unlikely(p == NULL))
563                         return htonl(NFS4ERR_RESOURCE);
564                 *p++ = htonl(0);
565         }
566         *savep = p;
567         return 0;
568 }
569
570 static __be32 encode_attr_change(struct xdr_stream *xdr, const uint32_t *bitmap, uint64_t change)
571 {
572         __be32 *p;
573
574         if (!(bitmap[0] & FATTR4_WORD0_CHANGE))
575                 return 0;
576         p = xdr_reserve_space(xdr, 8);
577         if (unlikely(!p))
578                 return htonl(NFS4ERR_RESOURCE);
579         p = xdr_encode_hyper(p, change);
580         return 0;
581 }
582
583 static __be32 encode_attr_size(struct xdr_stream *xdr, const uint32_t *bitmap, uint64_t size)
584 {
585         __be32 *p;
586
587         if (!(bitmap[0] & FATTR4_WORD0_SIZE))
588                 return 0;
589         p = xdr_reserve_space(xdr, 8);
590         if (unlikely(!p))
591                 return htonl(NFS4ERR_RESOURCE);
592         p = xdr_encode_hyper(p, size);
593         return 0;
594 }
595
596 static __be32 encode_attr_time(struct xdr_stream *xdr, const struct timespec *time)
597 {
598         __be32 *p;
599
600         p = xdr_reserve_space(xdr, 12);
601         if (unlikely(!p))
602                 return htonl(NFS4ERR_RESOURCE);
603         p = xdr_encode_hyper(p, time->tv_sec);
604         *p = htonl(time->tv_nsec);
605         return 0;
606 }
607
608 static __be32 encode_attr_ctime(struct xdr_stream *xdr, const uint32_t *bitmap, const struct timespec *time)
609 {
610         if (!(bitmap[1] & FATTR4_WORD1_TIME_METADATA))
611                 return 0;
612         return encode_attr_time(xdr,time);
613 }
614
615 static __be32 encode_attr_mtime(struct xdr_stream *xdr, const uint32_t *bitmap, const struct timespec *time)
616 {
617         if (!(bitmap[1] & FATTR4_WORD1_TIME_MODIFY))
618                 return 0;
619         return encode_attr_time(xdr,time);
620 }
621
622 static __be32 encode_compound_hdr_res(struct xdr_stream *xdr, struct cb_compound_hdr_res *hdr)
623 {
624         __be32 status;
625
626         hdr->status = xdr_reserve_space(xdr, 4);
627         if (unlikely(hdr->status == NULL))
628                 return htonl(NFS4ERR_RESOURCE);
629         status = encode_string(xdr, hdr->taglen, hdr->tag);
630         if (unlikely(status != 0))
631                 return status;
632         hdr->nops = xdr_reserve_space(xdr, 4);
633         if (unlikely(hdr->nops == NULL))
634                 return htonl(NFS4ERR_RESOURCE);
635         return 0;
636 }
637
638 static __be32 encode_op_hdr(struct xdr_stream *xdr, uint32_t op, __be32 res)
639 {
640         __be32 *p;
641         
642         p = xdr_reserve_space(xdr, 8);
643         if (unlikely(p == NULL))
644                 return htonl(NFS4ERR_RESOURCE_HDR);
645         *p++ = htonl(op);
646         *p = res;
647         return 0;
648 }
649
650 static __be32 encode_getattr_res(struct svc_rqst *rqstp, struct xdr_stream *xdr, const struct cb_getattrres *res)
651 {
652         __be32 *savep = NULL;
653         __be32 status = res->status;
654         
655         if (unlikely(status != 0))
656                 goto out;
657         status = encode_attr_bitmap(xdr, res->bitmap, &savep);
658         if (unlikely(status != 0))
659                 goto out;
660         status = encode_attr_change(xdr, res->bitmap, res->change_attr);
661         if (unlikely(status != 0))
662                 goto out;
663         status = encode_attr_size(xdr, res->bitmap, res->size);
664         if (unlikely(status != 0))
665                 goto out;
666         status = encode_attr_ctime(xdr, res->bitmap, &res->ctime);
667         if (unlikely(status != 0))
668                 goto out;
669         status = encode_attr_mtime(xdr, res->bitmap, &res->mtime);
670         *savep = htonl((unsigned int)((char *)xdr->p - (char *)(savep+1)));
671 out:
672         dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
673         return status;
674 }
675
676 #if defined(CONFIG_NFS_V4_1)
677
678 static __be32 encode_sessionid(struct xdr_stream *xdr,
679                                  const struct nfs4_sessionid *sid)
680 {
681         __be32 *p;
682         int len = NFS4_MAX_SESSIONID_LEN;
683
684         p = xdr_reserve_space(xdr, len);
685         if (unlikely(p == NULL))
686                 return htonl(NFS4ERR_RESOURCE);
687
688         memcpy(p, sid, len);
689         return 0;
690 }
691
692 static __be32 encode_cb_sequence_res(struct svc_rqst *rqstp,
693                                        struct xdr_stream *xdr,
694                                        const struct cb_sequenceres *res)
695 {
696         __be32 *p;
697         unsigned status = res->csr_status;
698
699         if (unlikely(status != 0))
700                 goto out;
701
702         encode_sessionid(xdr, &res->csr_sessionid);
703
704         p = xdr_reserve_space(xdr, 4 * sizeof(uint32_t));
705         if (unlikely(p == NULL))
706                 return htonl(NFS4ERR_RESOURCE);
707
708         *p++ = htonl(res->csr_sequenceid);
709         *p++ = htonl(res->csr_slotid);
710         *p++ = htonl(res->csr_highestslotid);
711         *p++ = htonl(res->csr_target_highestslotid);
712 out:
713         dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
714         return status;
715 }
716
717 static __be32
718 preprocess_nfs41_op(int nop, unsigned int op_nr, struct callback_op **op)
719 {
720         if (op_nr == OP_CB_SEQUENCE) {
721                 if (nop != 0)
722                         return htonl(NFS4ERR_SEQUENCE_POS);
723         } else {
724                 if (nop == 0)
725                         return htonl(NFS4ERR_OP_NOT_IN_SESSION);
726         }
727
728         switch (op_nr) {
729         case OP_CB_GETATTR:
730         case OP_CB_RECALL:
731         case OP_CB_SEQUENCE:
732         case OP_CB_RECALL_ANY:
733         case OP_CB_RECALL_SLOT:
734         case OP_CB_LAYOUTRECALL:
735         case OP_CB_NOTIFY_DEVICEID:
736                 *op = &callback_ops[op_nr];
737                 break;
738
739         case OP_CB_NOTIFY:
740         case OP_CB_PUSH_DELEG:
741         case OP_CB_RECALLABLE_OBJ_AVAIL:
742         case OP_CB_WANTS_CANCELLED:
743         case OP_CB_NOTIFY_LOCK:
744                 return htonl(NFS4ERR_NOTSUPP);
745
746         default:
747                 return htonl(NFS4ERR_OP_ILLEGAL);
748         }
749
750         return htonl(NFS_OK);
751 }
752
753 static void nfs4_callback_free_slot(struct nfs4_session *session)
754 {
755         struct nfs4_slot_table *tbl = &session->bc_slot_table;
756
757         spin_lock(&tbl->slot_tbl_lock);
758         /*
759          * Let the state manager know callback processing done.
760          * A single slot, so highest used slotid is either 0 or -1
761          */
762         tbl->highest_used_slotid = -1;
763         nfs4_check_drain_bc_complete(session);
764         spin_unlock(&tbl->slot_tbl_lock);
765 }
766
767 static void nfs4_cb_free_slot(struct cb_process_state *cps)
768 {
769         if (cps->slotid != -1)
770                 nfs4_callback_free_slot(cps->clp->cl_session);
771 }
772
773 #else /* CONFIG_NFS_V4_1 */
774
775 static __be32
776 preprocess_nfs41_op(int nop, unsigned int op_nr, struct callback_op **op)
777 {
778         return htonl(NFS4ERR_MINOR_VERS_MISMATCH);
779 }
780
781 static void nfs4_cb_free_slot(struct cb_process_state *cps)
782 {
783 }
784 #endif /* CONFIG_NFS_V4_1 */
785
786 static __be32
787 preprocess_nfs4_op(unsigned int op_nr, struct callback_op **op)
788 {
789         switch (op_nr) {
790         case OP_CB_GETATTR:
791         case OP_CB_RECALL:
792                 *op = &callback_ops[op_nr];
793                 break;
794         default:
795                 return htonl(NFS4ERR_OP_ILLEGAL);
796         }
797
798         return htonl(NFS_OK);
799 }
800
801 static __be32 process_op(uint32_t minorversion, int nop,
802                 struct svc_rqst *rqstp,
803                 struct xdr_stream *xdr_in, void *argp,
804                 struct xdr_stream *xdr_out, void *resp,
805                 struct cb_process_state *cps)
806 {
807         struct callback_op *op = &callback_ops[0];
808         unsigned int op_nr;
809         __be32 status;
810         long maxlen;
811         __be32 res;
812
813         dprintk("%s: start\n", __func__);
814         status = decode_op_hdr(xdr_in, &op_nr);
815         if (unlikely(status))
816                 return status;
817
818         dprintk("%s: minorversion=%d nop=%d op_nr=%u\n",
819                 __func__, minorversion, nop, op_nr);
820
821         status = minorversion ? preprocess_nfs41_op(nop, op_nr, &op) :
822                                 preprocess_nfs4_op(op_nr, &op);
823         if (status == htonl(NFS4ERR_OP_ILLEGAL))
824                 op_nr = OP_CB_ILLEGAL;
825         if (status)
826                 goto encode_hdr;
827
828         if (cps->drc_status) {
829                 status = cps->drc_status;
830                 goto encode_hdr;
831         }
832
833         maxlen = xdr_out->end - xdr_out->p;
834         if (maxlen > 0 && maxlen < PAGE_SIZE) {
835                 status = op->decode_args(rqstp, xdr_in, argp);
836                 if (likely(status == 0))
837                         status = op->process_op(argp, resp, cps);
838         } else
839                 status = htonl(NFS4ERR_RESOURCE);
840
841 encode_hdr:
842         res = encode_op_hdr(xdr_out, op_nr, status);
843         if (unlikely(res))
844                 return res;
845         if (op->encode_res != NULL && status == 0)
846                 status = op->encode_res(rqstp, xdr_out, resp);
847         dprintk("%s: done, status = %d\n", __func__, ntohl(status));
848         return status;
849 }
850
851 /*
852  * Decode, process and encode a COMPOUND
853  */
854 static __be32 nfs4_callback_compound(struct svc_rqst *rqstp, void *argp, void *resp)
855 {
856         struct cb_compound_hdr_arg hdr_arg = { 0 };
857         struct cb_compound_hdr_res hdr_res = { NULL };
858         struct xdr_stream xdr_in, xdr_out;
859         __be32 *p, status;
860         struct cb_process_state cps = {
861                 .drc_status = 0,
862                 .clp = NULL,
863                 .slotid = -1,
864         };
865         unsigned int nops = 0;
866
867         dprintk("%s: start\n", __func__);
868
869         xdr_init_decode(&xdr_in, &rqstp->rq_arg, rqstp->rq_arg.head[0].iov_base);
870
871         p = (__be32*)((char *)rqstp->rq_res.head[0].iov_base + rqstp->rq_res.head[0].iov_len);
872         xdr_init_encode(&xdr_out, &rqstp->rq_res, p);
873
874         status = decode_compound_hdr_arg(&xdr_in, &hdr_arg);
875         if (status == __constant_htonl(NFS4ERR_RESOURCE))
876                 return rpc_garbage_args;
877
878         if (hdr_arg.minorversion == 0) {
879                 cps.clp = nfs4_find_client_ident(hdr_arg.cb_ident);
880                 if (!cps.clp || !check_gss_callback_principal(cps.clp, rqstp))
881                         goto out_invalidcred;
882         }
883
884         hdr_res.taglen = hdr_arg.taglen;
885         hdr_res.tag = hdr_arg.tag;
886         if (encode_compound_hdr_res(&xdr_out, &hdr_res) != 0)
887                 return rpc_system_err;
888
889         while (status == 0 && nops != hdr_arg.nops) {
890                 status = process_op(hdr_arg.minorversion, nops, rqstp,
891                                     &xdr_in, argp, &xdr_out, resp, &cps);
892                 nops++;
893         }
894
895         /* Buffer overflow in decode_ops_hdr or encode_ops_hdr. Return
896         * resource error in cb_compound status without returning op */
897         if (unlikely(status == htonl(NFS4ERR_RESOURCE_HDR))) {
898                 status = htonl(NFS4ERR_RESOURCE);
899                 nops--;
900         }
901
902         *hdr_res.status = status;
903         *hdr_res.nops = htonl(nops);
904         nfs4_cb_free_slot(&cps);
905         nfs_put_client(cps.clp);
906         dprintk("%s: done, status = %u\n", __func__, ntohl(status));
907         return rpc_success;
908
909 out_invalidcred:
910         pr_warn_ratelimited("NFS: NFSv4 callback contains invalid cred\n");
911         return rpc_autherr_badcred;
912 }
913
914 /*
915  * Define NFS4 callback COMPOUND ops.
916  */
917 static struct callback_op callback_ops[] = {
918         [0] = {
919                 .res_maxsize = CB_OP_HDR_RES_MAXSZ,
920         },
921         [OP_CB_GETATTR] = {
922                 .process_op = (callback_process_op_t)nfs4_callback_getattr,
923                 .decode_args = (callback_decode_arg_t)decode_getattr_args,
924                 .encode_res = (callback_encode_res_t)encode_getattr_res,
925                 .res_maxsize = CB_OP_GETATTR_RES_MAXSZ,
926         },
927         [OP_CB_RECALL] = {
928                 .process_op = (callback_process_op_t)nfs4_callback_recall,
929                 .decode_args = (callback_decode_arg_t)decode_recall_args,
930                 .res_maxsize = CB_OP_RECALL_RES_MAXSZ,
931         },
932 #if defined(CONFIG_NFS_V4_1)
933         [OP_CB_LAYOUTRECALL] = {
934                 .process_op = (callback_process_op_t)nfs4_callback_layoutrecall,
935                 .decode_args =
936                         (callback_decode_arg_t)decode_layoutrecall_args,
937                 .res_maxsize = CB_OP_LAYOUTRECALL_RES_MAXSZ,
938         },
939         [OP_CB_NOTIFY_DEVICEID] = {
940                 .process_op = (callback_process_op_t)nfs4_callback_devicenotify,
941                 .decode_args =
942                         (callback_decode_arg_t)decode_devicenotify_args,
943                 .res_maxsize = CB_OP_DEVICENOTIFY_RES_MAXSZ,
944         },
945         [OP_CB_SEQUENCE] = {
946                 .process_op = (callback_process_op_t)nfs4_callback_sequence,
947                 .decode_args = (callback_decode_arg_t)decode_cb_sequence_args,
948                 .encode_res = (callback_encode_res_t)encode_cb_sequence_res,
949                 .res_maxsize = CB_OP_SEQUENCE_RES_MAXSZ,
950         },
951         [OP_CB_RECALL_ANY] = {
952                 .process_op = (callback_process_op_t)nfs4_callback_recallany,
953                 .decode_args = (callback_decode_arg_t)decode_recallany_args,
954                 .res_maxsize = CB_OP_RECALLANY_RES_MAXSZ,
955         },
956         [OP_CB_RECALL_SLOT] = {
957                 .process_op = (callback_process_op_t)nfs4_callback_recallslot,
958                 .decode_args = (callback_decode_arg_t)decode_recallslot_args,
959                 .res_maxsize = CB_OP_RECALLSLOT_RES_MAXSZ,
960         },
961 #endif /* CONFIG_NFS_V4_1 */
962 };
963
964 /*
965  * Define NFS4 callback procedures
966  */
967 static struct svc_procedure nfs4_callback_procedures1[] = {
968         [CB_NULL] = {
969                 .pc_func = nfs4_callback_null,
970                 .pc_decode = (kxdrproc_t)nfs4_decode_void,
971                 .pc_encode = (kxdrproc_t)nfs4_encode_void,
972                 .pc_xdrressize = 1,
973         },
974         [CB_COMPOUND] = {
975                 .pc_func = nfs4_callback_compound,
976                 .pc_encode = (kxdrproc_t)nfs4_encode_void,
977                 .pc_argsize = 256,
978                 .pc_ressize = 256,
979                 .pc_xdrressize = NFS4_CALLBACK_BUFSIZE,
980         }
981 };
982
983 struct svc_version nfs4_callback_version1 = {
984         .vs_vers = 1,
985         .vs_nproc = ARRAY_SIZE(nfs4_callback_procedures1),
986         .vs_proc = nfs4_callback_procedures1,
987         .vs_xdrsize = NFS4_CALLBACK_XDRSIZE,
988         .vs_dispatch = NULL,
989         .vs_hidden = 1,
990 };
991
992 struct svc_version nfs4_callback_version4 = {
993         .vs_vers = 4,
994         .vs_nproc = ARRAY_SIZE(nfs4_callback_procedures1),
995         .vs_proc = nfs4_callback_procedures1,
996         .vs_xdrsize = NFS4_CALLBACK_XDRSIZE,
997         .vs_dispatch = NULL,
998         .vs_hidden = 1,
999 };