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
43typedef __be32 (*callback_process_op_t)(void *, void *,
44					struct cb_process_state *);
45typedef __be32 (*callback_decode_arg_t)(struct svc_rqst *, struct xdr_stream *, void *);
46typedef __be32 (*callback_encode_res_t)(struct svc_rqst *, struct xdr_stream *, void *);
47
48
49struct 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
56static struct callback_op callback_ops[];
57
58static __be32 nfs4_callback_null(struct svc_rqst *rqstp, void *argp, void *resp)
59{
60	return htonl(NFS4_OK);
61}
62
63static int nfs4_decode_void(struct svc_rqst *rqstp, __be32 *p, void *dummy)
64{
65	return xdr_argsize_check(rqstp, p);
66}
67
68static int nfs4_encode_void(struct svc_rqst *rqstp, __be32 *p, void *dummy)
69{
70	return xdr_ressize_check(rqstp, p);
71}
72
73static __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
83static __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
103static __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
121static __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
140static __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
151static __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
184static __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
194static __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);
203out:
204	dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
205	return status;
206}
207
208static __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);
224out:
225	dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
226	return status;
227}
228
229#if defined(CONFIG_NFS_V4_1)
230
231static __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);
286out:
287	dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
288	return status;
289}
290
291static
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	}
373out:
374	dprintk("%s: status %d ndevs %d\n",
375		__func__, ntohl(status), args->ndevs);
376	return status;
377err:
378	kfree(args->devs);
379	goto out;
380}
381
382static __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
396static __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
430out:
431	return status;
432}
433
434static __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);
485out:
486	dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
487	return status;
488
489out_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
496static __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
516static __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
532static __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)
545static __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
575static __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
588static __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
601static __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
613static __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
620static __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
627static __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
643static __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
655static __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)));
676out:
677	dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
678	return status;
679}
680
681#if defined(CONFIG_NFS_V4_1)
682
683static __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
697static __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);
717out:
718	dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
719	return status;
720}
721
722static __be32
723preprocess_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
758static 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
772static 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
780static __be32
781preprocess_nfs41_op(int nop, unsigned int op_nr, struct callback_op **op)
782{
783	return htonl(NFS4ERR_MINOR_VERS_MISMATCH);
784}
785
786static 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
792static __be32
793preprocess_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 */
804static __be32
805preprocess_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
811static __be32
812preprocess_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
826static __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
877encode_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 */
890static __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 == __constant_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 */
951static 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 */
1001static 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
1017struct 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
1026struct 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