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