xref: /linux/fs/nfsd/nfs4proc.c (revision 20d0021394c1b070bf04b22c5bc8fdb437edd4c5)
1 /*
2  *  fs/nfsd/nfs4proc.c
3  *
4  *  Server-side procedures for NFSv4.
5  *
6  *  Copyright (c) 2002 The Regents of the University of Michigan.
7  *  All rights reserved.
8  *
9  *  Kendrick Smith <kmsmith@umich.edu>
10  *  Andy Adamson   <andros@umich.edu>
11  *
12  *  Redistribution and use in source and binary forms, with or without
13  *  modification, are permitted provided that the following conditions
14  *  are met:
15  *
16  *  1. Redistributions of source code must retain the above copyright
17  *     notice, this list of conditions and the following disclaimer.
18  *  2. Redistributions in binary form must reproduce the above copyright
19  *     notice, this list of conditions and the following disclaimer in the
20  *     documentation and/or other materials provided with the distribution.
21  *  3. Neither the name of the University nor the names of its
22  *     contributors may be used to endorse or promote products derived
23  *     from this software without specific prior written permission.
24  *
25  *  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
26  *  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
27  *  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
28  *  DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29  *  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30  *  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31  *  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
32  *  BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
33  *  LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
34  *  NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
35  *  SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
36  *
37  * Note: some routines in this file are just trivial wrappers
38  * (e.g. nfsd4_lookup()) defined solely for the sake of consistent
39  * naming.  Since all such routines have been declared "inline",
40  * there shouldn't be any associated overhead.  At some point in
41  * the future, I might inline these "by hand" to clean up a
42  * little.
43  */
44 
45 #include <linux/param.h>
46 #include <linux/major.h>
47 #include <linux/slab.h>
48 #include <linux/file.h>
49 
50 #include <linux/sunrpc/svc.h>
51 #include <linux/nfsd/nfsd.h>
52 #include <linux/nfsd/cache.h>
53 #include <linux/nfs4.h>
54 #include <linux/nfsd/state.h>
55 #include <linux/nfsd/xdr4.h>
56 #include <linux/nfs4_acl.h>
57 
58 #define NFSDDBG_FACILITY		NFSDDBG_PROC
59 
60 static inline void
61 fh_dup2(struct svc_fh *dst, struct svc_fh *src)
62 {
63 	fh_put(dst);
64 	dget(src->fh_dentry);
65 	if (src->fh_export)
66 		cache_get(&src->fh_export->h);
67 	*dst = *src;
68 }
69 
70 static int
71 do_open_permission(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_open *open)
72 {
73 	int accmode, status;
74 
75 	if (open->op_truncate &&
76 		!(open->op_share_access & NFS4_SHARE_ACCESS_WRITE))
77 		return nfserr_inval;
78 
79 	accmode = MAY_NOP;
80 	if (open->op_share_access & NFS4_SHARE_ACCESS_READ)
81 		accmode = MAY_READ;
82 	if (open->op_share_deny & NFS4_SHARE_ACCESS_WRITE)
83 		accmode |= (MAY_WRITE | MAY_TRUNC);
84 	accmode |= MAY_OWNER_OVERRIDE;
85 
86 	status = fh_verify(rqstp, current_fh, S_IFREG, accmode);
87 
88 	return status;
89 }
90 
91 static int
92 do_open_lookup(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_open *open)
93 {
94 	struct svc_fh resfh;
95 	int status;
96 
97 	fh_init(&resfh, NFS4_FHSIZE);
98 	open->op_truncate = 0;
99 
100 	if (open->op_create) {
101 		/*
102 		 * Note: create modes (UNCHECKED,GUARDED...) are the same
103 		 * in NFSv4 as in v3.
104 		 */
105 		status = nfsd_create_v3(rqstp, current_fh, open->op_fname.data,
106 					open->op_fname.len, &open->op_iattr,
107 					&resfh, open->op_createmode,
108 					(u32 *)open->op_verf.data, &open->op_truncate);
109 	}
110 	else {
111 		status = nfsd_lookup(rqstp, current_fh,
112 				     open->op_fname.data, open->op_fname.len, &resfh);
113 		fh_unlock(current_fh);
114 	}
115 
116 	if (!status) {
117 		set_change_info(&open->op_cinfo, current_fh);
118 
119 		/* set reply cache */
120 		fh_dup2(current_fh, &resfh);
121 		open->op_stateowner->so_replay.rp_openfh_len =
122 			resfh.fh_handle.fh_size;
123 		memcpy(open->op_stateowner->so_replay.rp_openfh,
124 				&resfh.fh_handle.fh_base,
125 				resfh.fh_handle.fh_size);
126 
127 		status = do_open_permission(rqstp, current_fh, open);
128 	}
129 
130 	fh_put(&resfh);
131 	return status;
132 }
133 
134 static int
135 do_open_fhandle(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_open *open)
136 {
137 	int status;
138 
139 	/* Only reclaims from previously confirmed clients are valid */
140 	if ((status = nfs4_check_open_reclaim(&open->op_clientid)))
141 		return status;
142 
143 	/* We don't know the target directory, and therefore can not
144 	* set the change info
145 	*/
146 
147 	memset(&open->op_cinfo, 0, sizeof(struct nfsd4_change_info));
148 
149 	/* set replay cache */
150 	open->op_stateowner->so_replay.rp_openfh_len = current_fh->fh_handle.fh_size;
151 	memcpy(open->op_stateowner->so_replay.rp_openfh,
152 		&current_fh->fh_handle.fh_base,
153 		current_fh->fh_handle.fh_size);
154 
155 	open->op_truncate = (open->op_iattr.ia_valid & ATTR_SIZE) &&
156 		(open->op_iattr.ia_size == 0);
157 
158 	status = do_open_permission(rqstp, current_fh, open);
159 
160 	return status;
161 }
162 
163 
164 static inline int
165 nfsd4_open(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_open *open)
166 {
167 	int status;
168 	dprintk("NFSD: nfsd4_open filename %.*s op_stateowner %p\n",
169 		(int)open->op_fname.len, open->op_fname.data,
170 		open->op_stateowner);
171 
172 	/* This check required by spec. */
173 	if (open->op_create && open->op_claim_type != NFS4_OPEN_CLAIM_NULL)
174 		return nfserr_inval;
175 
176 	nfs4_lock_state();
177 
178 	/* check seqid for replay. set nfs4_owner */
179 	status = nfsd4_process_open1(open);
180 	if (status == NFSERR_REPLAY_ME) {
181 		struct nfs4_replay *rp = &open->op_stateowner->so_replay;
182 		fh_put(current_fh);
183 		current_fh->fh_handle.fh_size = rp->rp_openfh_len;
184 		memcpy(&current_fh->fh_handle.fh_base, rp->rp_openfh,
185 				rp->rp_openfh_len);
186 		status = fh_verify(rqstp, current_fh, 0, MAY_NOP);
187 		if (status)
188 			dprintk("nfsd4_open: replay failed"
189 				" restoring previous filehandle\n");
190 		else
191 			status = NFSERR_REPLAY_ME;
192 	}
193 	if (status)
194 		goto out;
195 	switch (open->op_claim_type) {
196 		case NFS4_OPEN_CLAIM_DELEGATE_CUR:
197 			status = nfserr_inval;
198 			if (open->op_create)
199 				goto out;
200 			/* fall through */
201 		case NFS4_OPEN_CLAIM_NULL:
202 			/*
203 			 * (1) set CURRENT_FH to the file being opened,
204 			 * creating it if necessary, (2) set open->op_cinfo,
205 			 * (3) set open->op_truncate if the file is to be
206 			 * truncated after opening, (4) do permission checking.
207 			 */
208 			status = do_open_lookup(rqstp, current_fh, open);
209 			if (status)
210 				goto out;
211 			break;
212 		case NFS4_OPEN_CLAIM_PREVIOUS:
213 			/*
214 			 * The CURRENT_FH is already set to the file being
215 			 * opened.  (1) set open->op_cinfo, (2) set
216 			 * open->op_truncate if the file is to be truncated
217 			 * after opening, (3) do permission checking.
218 			*/
219 			status = do_open_fhandle(rqstp, current_fh, open);
220 			if (status)
221 				goto out;
222 			break;
223              	case NFS4_OPEN_CLAIM_DELEGATE_PREV:
224 			printk("NFSD: unsupported OPEN claim type %d\n",
225 				open->op_claim_type);
226 			status = nfserr_notsupp;
227 			goto out;
228 		default:
229 			printk("NFSD: Invalid OPEN claim type %d\n",
230 				open->op_claim_type);
231 			status = nfserr_inval;
232 			goto out;
233 	}
234 	/*
235 	 * nfsd4_process_open2() does the actual opening of the file.  If
236 	 * successful, it (1) truncates the file if open->op_truncate was
237 	 * set, (2) sets open->op_stateid, (3) sets open->op_delegation.
238 	 */
239 	status = nfsd4_process_open2(rqstp, current_fh, open);
240 out:
241 	if (open->op_stateowner)
242 		nfs4_get_stateowner(open->op_stateowner);
243 	nfs4_unlock_state();
244 	return status;
245 }
246 
247 /*
248  * filehandle-manipulating ops.
249  */
250 static inline int
251 nfsd4_getfh(struct svc_fh *current_fh, struct svc_fh **getfh)
252 {
253 	if (!current_fh->fh_dentry)
254 		return nfserr_nofilehandle;
255 
256 	*getfh = current_fh;
257 	return nfs_ok;
258 }
259 
260 static inline int
261 nfsd4_putfh(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_putfh *putfh)
262 {
263 	fh_put(current_fh);
264 	current_fh->fh_handle.fh_size = putfh->pf_fhlen;
265 	memcpy(&current_fh->fh_handle.fh_base, putfh->pf_fhval, putfh->pf_fhlen);
266 	return fh_verify(rqstp, current_fh, 0, MAY_NOP);
267 }
268 
269 static inline int
270 nfsd4_putrootfh(struct svc_rqst *rqstp, struct svc_fh *current_fh)
271 {
272 	int status;
273 
274 	fh_put(current_fh);
275 	status = exp_pseudoroot(rqstp->rq_client, current_fh,
276 			      &rqstp->rq_chandle);
277 	if (!status)
278 		status = nfserrno(nfsd_setuser(rqstp, current_fh->fh_export));
279 	return status;
280 }
281 
282 static inline int
283 nfsd4_restorefh(struct svc_fh *current_fh, struct svc_fh *save_fh)
284 {
285 	if (!save_fh->fh_dentry)
286 		return nfserr_restorefh;
287 
288 	fh_dup2(current_fh, save_fh);
289 	return nfs_ok;
290 }
291 
292 static inline int
293 nfsd4_savefh(struct svc_fh *current_fh, struct svc_fh *save_fh)
294 {
295 	if (!current_fh->fh_dentry)
296 		return nfserr_nofilehandle;
297 
298 	fh_dup2(save_fh, current_fh);
299 	return nfs_ok;
300 }
301 
302 /*
303  * misc nfsv4 ops
304  */
305 static inline int
306 nfsd4_access(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_access *access)
307 {
308 	if (access->ac_req_access & ~NFS3_ACCESS_FULL)
309 		return nfserr_inval;
310 
311 	access->ac_resp_access = access->ac_req_access;
312 	return nfsd_access(rqstp, current_fh, &access->ac_resp_access, &access->ac_supported);
313 }
314 
315 static inline int
316 nfsd4_commit(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_commit *commit)
317 {
318 	int status;
319 
320 	u32 *p = (u32 *)commit->co_verf.data;
321 	*p++ = nfssvc_boot.tv_sec;
322 	*p++ = nfssvc_boot.tv_usec;
323 
324 	status = nfsd_commit(rqstp, current_fh, commit->co_offset, commit->co_count);
325 	if (status == nfserr_symlink)
326 		status = nfserr_inval;
327 	return status;
328 }
329 
330 static int
331 nfsd4_create(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_create *create)
332 {
333 	struct svc_fh resfh;
334 	int status;
335 	dev_t rdev;
336 
337 	fh_init(&resfh, NFS4_FHSIZE);
338 
339 	status = fh_verify(rqstp, current_fh, S_IFDIR, MAY_CREATE);
340 	if (status == nfserr_symlink)
341 		status = nfserr_notdir;
342 	if (status)
343 		return status;
344 
345 	switch (create->cr_type) {
346 	case NF4LNK:
347 		/* ugh! we have to null-terminate the linktext, or
348 		 * vfs_symlink() will choke.  it is always safe to
349 		 * null-terminate by brute force, since at worst we
350 		 * will overwrite the first byte of the create namelen
351 		 * in the XDR buffer, which has already been extracted
352 		 * during XDR decode.
353 		 */
354 		create->cr_linkname[create->cr_linklen] = 0;
355 
356 		status = nfsd_symlink(rqstp, current_fh, create->cr_name,
357 				      create->cr_namelen, create->cr_linkname,
358 				      create->cr_linklen, &resfh, &create->cr_iattr);
359 		break;
360 
361 	case NF4BLK:
362 		rdev = MKDEV(create->cr_specdata1, create->cr_specdata2);
363 		if (MAJOR(rdev) != create->cr_specdata1 ||
364 		    MINOR(rdev) != create->cr_specdata2)
365 			return nfserr_inval;
366 		status = nfsd_create(rqstp, current_fh, create->cr_name,
367 				     create->cr_namelen, &create->cr_iattr,
368 				     S_IFBLK, rdev, &resfh);
369 		break;
370 
371 	case NF4CHR:
372 		rdev = MKDEV(create->cr_specdata1, create->cr_specdata2);
373 		if (MAJOR(rdev) != create->cr_specdata1 ||
374 		    MINOR(rdev) != create->cr_specdata2)
375 			return nfserr_inval;
376 		status = nfsd_create(rqstp, current_fh, create->cr_name,
377 				     create->cr_namelen, &create->cr_iattr,
378 				     S_IFCHR, rdev, &resfh);
379 		break;
380 
381 	case NF4SOCK:
382 		status = nfsd_create(rqstp, current_fh, create->cr_name,
383 				     create->cr_namelen, &create->cr_iattr,
384 				     S_IFSOCK, 0, &resfh);
385 		break;
386 
387 	case NF4FIFO:
388 		status = nfsd_create(rqstp, current_fh, create->cr_name,
389 				     create->cr_namelen, &create->cr_iattr,
390 				     S_IFIFO, 0, &resfh);
391 		break;
392 
393 	case NF4DIR:
394 		create->cr_iattr.ia_valid &= ~ATTR_SIZE;
395 		status = nfsd_create(rqstp, current_fh, create->cr_name,
396 				     create->cr_namelen, &create->cr_iattr,
397 				     S_IFDIR, 0, &resfh);
398 		break;
399 
400 	default:
401 		status = nfserr_badtype;
402 	}
403 
404 	if (!status) {
405 		fh_unlock(current_fh);
406 		set_change_info(&create->cr_cinfo, current_fh);
407 		fh_dup2(current_fh, &resfh);
408 	}
409 
410 	fh_put(&resfh);
411 	return status;
412 }
413 
414 static inline int
415 nfsd4_getattr(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_getattr *getattr)
416 {
417 	int status;
418 
419 	status = fh_verify(rqstp, current_fh, 0, MAY_NOP);
420 	if (status)
421 		return status;
422 
423 	if (getattr->ga_bmval[1] & NFSD_WRITEONLY_ATTRS_WORD1)
424 		return nfserr_inval;
425 
426 	getattr->ga_bmval[0] &= NFSD_SUPPORTED_ATTRS_WORD0;
427 	getattr->ga_bmval[1] &= NFSD_SUPPORTED_ATTRS_WORD1;
428 
429 	getattr->ga_fhp = current_fh;
430 	return nfs_ok;
431 }
432 
433 static inline int
434 nfsd4_link(struct svc_rqst *rqstp, struct svc_fh *current_fh,
435 	   struct svc_fh *save_fh, struct nfsd4_link *link)
436 {
437 	int status = nfserr_nofilehandle;
438 
439 	if (!save_fh->fh_dentry)
440 		return status;
441 	status = nfsd_link(rqstp, current_fh, link->li_name, link->li_namelen, save_fh);
442 	if (!status)
443 		set_change_info(&link->li_cinfo, current_fh);
444 	return status;
445 }
446 
447 static int
448 nfsd4_lookupp(struct svc_rqst *rqstp, struct svc_fh *current_fh)
449 {
450 	struct svc_fh tmp_fh;
451 	int ret;
452 
453 	fh_init(&tmp_fh, NFS4_FHSIZE);
454 	if((ret = exp_pseudoroot(rqstp->rq_client, &tmp_fh,
455 			      &rqstp->rq_chandle)) != 0)
456 		return ret;
457 	if (tmp_fh.fh_dentry == current_fh->fh_dentry) {
458 		fh_put(&tmp_fh);
459 		return nfserr_noent;
460 	}
461 	fh_put(&tmp_fh);
462 	return nfsd_lookup(rqstp, current_fh, "..", 2, current_fh);
463 }
464 
465 static inline int
466 nfsd4_lookup(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_lookup *lookup)
467 {
468 	return nfsd_lookup(rqstp, current_fh, lookup->lo_name, lookup->lo_len, current_fh);
469 }
470 
471 static inline int
472 nfsd4_read(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_read *read)
473 {
474 	int status;
475 
476 	/* no need to check permission - this will be done in nfsd_read() */
477 
478 	read->rd_filp = NULL;
479 	if (read->rd_offset >= OFFSET_MAX)
480 		return nfserr_inval;
481 
482 	nfs4_lock_state();
483 	/* check stateid */
484 	if ((status = nfs4_preprocess_stateid_op(current_fh, &read->rd_stateid,
485 				CHECK_FH | RD_STATE, &read->rd_filp))) {
486 		dprintk("NFSD: nfsd4_read: couldn't process stateid!\n");
487 		goto out;
488 	}
489 	if (read->rd_filp)
490 		get_file(read->rd_filp);
491 	status = nfs_ok;
492 out:
493 	nfs4_unlock_state();
494 	read->rd_rqstp = rqstp;
495 	read->rd_fhp = current_fh;
496 	return status;
497 }
498 
499 static inline int
500 nfsd4_readdir(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_readdir *readdir)
501 {
502 	u64 cookie = readdir->rd_cookie;
503 	static const nfs4_verifier zeroverf;
504 
505 	/* no need to check permission - this will be done in nfsd_readdir() */
506 
507 	if (readdir->rd_bmval[1] & NFSD_WRITEONLY_ATTRS_WORD1)
508 		return nfserr_inval;
509 
510 	readdir->rd_bmval[0] &= NFSD_SUPPORTED_ATTRS_WORD0;
511 	readdir->rd_bmval[1] &= NFSD_SUPPORTED_ATTRS_WORD1;
512 
513 	if ((cookie > ~(u32)0) || (cookie == 1) || (cookie == 2) ||
514 	    (cookie == 0 && memcmp(readdir->rd_verf.data, zeroverf.data, NFS4_VERIFIER_SIZE)))
515 		return nfserr_bad_cookie;
516 
517 	readdir->rd_rqstp = rqstp;
518 	readdir->rd_fhp = current_fh;
519 	return nfs_ok;
520 }
521 
522 static inline int
523 nfsd4_readlink(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_readlink *readlink)
524 {
525 	readlink->rl_rqstp = rqstp;
526 	readlink->rl_fhp = current_fh;
527 	return nfs_ok;
528 }
529 
530 static inline int
531 nfsd4_remove(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_remove *remove)
532 {
533 	int status;
534 
535 	if (nfs4_in_grace())
536 		return nfserr_grace;
537 	status = nfsd_unlink(rqstp, current_fh, 0, remove->rm_name, remove->rm_namelen);
538 	if (status == nfserr_symlink)
539 		return nfserr_notdir;
540 	if (!status) {
541 		fh_unlock(current_fh);
542 		set_change_info(&remove->rm_cinfo, current_fh);
543 	}
544 	return status;
545 }
546 
547 static inline int
548 nfsd4_rename(struct svc_rqst *rqstp, struct svc_fh *current_fh,
549 	     struct svc_fh *save_fh, struct nfsd4_rename *rename)
550 {
551 	int status = nfserr_nofilehandle;
552 
553 	if (!save_fh->fh_dentry)
554 		return status;
555 	if (nfs4_in_grace() && !(save_fh->fh_export->ex_flags
556 					& NFSEXP_NOSUBTREECHECK))
557 		return nfserr_grace;
558 	status = nfsd_rename(rqstp, save_fh, rename->rn_sname,
559 			     rename->rn_snamelen, current_fh,
560 			     rename->rn_tname, rename->rn_tnamelen);
561 
562 	/* the underlying filesystem returns different error's than required
563 	 * by NFSv4. both save_fh and current_fh have been verified.. */
564 	if (status == nfserr_isdir)
565 		status = nfserr_exist;
566 	else if ((status == nfserr_notdir) &&
567                   (S_ISDIR(save_fh->fh_dentry->d_inode->i_mode) &&
568                    S_ISDIR(current_fh->fh_dentry->d_inode->i_mode)))
569 		status = nfserr_exist;
570 	else if (status == nfserr_symlink)
571 		status = nfserr_notdir;
572 
573 	if (!status) {
574 		set_change_info(&rename->rn_sinfo, current_fh);
575 		set_change_info(&rename->rn_tinfo, save_fh);
576 	}
577 	return status;
578 }
579 
580 static inline int
581 nfsd4_setattr(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_setattr *setattr)
582 {
583 	int status = nfs_ok;
584 
585 	if (!current_fh->fh_dentry)
586 		return nfserr_nofilehandle;
587 
588 	status = nfs_ok;
589 	if (setattr->sa_iattr.ia_valid & ATTR_SIZE) {
590 		nfs4_lock_state();
591 		if ((status = nfs4_preprocess_stateid_op(current_fh,
592 						&setattr->sa_stateid,
593 						CHECK_FH | WR_STATE, NULL))) {
594 			dprintk("NFSD: nfsd4_setattr: couldn't process stateid!\n");
595 			goto out_unlock;
596 		}
597 		nfs4_unlock_state();
598 	}
599 	status = nfs_ok;
600 	if (setattr->sa_acl != NULL)
601 		status = nfsd4_set_nfs4_acl(rqstp, current_fh, setattr->sa_acl);
602 	if (status)
603 		goto out;
604 	status = nfsd_setattr(rqstp, current_fh, &setattr->sa_iattr,
605 				0, (time_t)0);
606 out:
607 	return status;
608 out_unlock:
609 	nfs4_unlock_state();
610 	return status;
611 }
612 
613 static inline int
614 nfsd4_write(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_write *write)
615 {
616 	stateid_t *stateid = &write->wr_stateid;
617 	struct file *filp = NULL;
618 	u32 *p;
619 	int status = nfs_ok;
620 
621 	/* no need to check permission - this will be done in nfsd_write() */
622 
623 	if (write->wr_offset >= OFFSET_MAX)
624 		return nfserr_inval;
625 
626 	nfs4_lock_state();
627 	if ((status = nfs4_preprocess_stateid_op(current_fh, stateid,
628 					CHECK_FH | WR_STATE, &filp))) {
629 		dprintk("NFSD: nfsd4_write: couldn't process stateid!\n");
630 		goto out;
631 	}
632 	if (filp)
633 		get_file(filp);
634 	nfs4_unlock_state();
635 
636 	write->wr_bytes_written = write->wr_buflen;
637 	write->wr_how_written = write->wr_stable_how;
638 	p = (u32 *)write->wr_verifier.data;
639 	*p++ = nfssvc_boot.tv_sec;
640 	*p++ = nfssvc_boot.tv_usec;
641 
642 	status =  nfsd_write(rqstp, current_fh, filp, write->wr_offset,
643 			write->wr_vec, write->wr_vlen, write->wr_buflen,
644 			&write->wr_how_written);
645 	if (filp)
646 		fput(filp);
647 
648 	if (status == nfserr_symlink)
649 		status = nfserr_inval;
650 	return status;
651 out:
652 	nfs4_unlock_state();
653 	return status;
654 }
655 
656 /* This routine never returns NFS_OK!  If there are no other errors, it
657  * will return NFSERR_SAME or NFSERR_NOT_SAME depending on whether the
658  * attributes matched.  VERIFY is implemented by mapping NFSERR_SAME
659  * to NFS_OK after the call; NVERIFY by mapping NFSERR_NOT_SAME to NFS_OK.
660  */
661 static int
662 nfsd4_verify(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_verify *verify)
663 {
664 	u32 *buf, *p;
665 	int count;
666 	int status;
667 
668 	status = fh_verify(rqstp, current_fh, 0, MAY_NOP);
669 	if (status)
670 		return status;
671 
672 	if ((verify->ve_bmval[0] & ~NFSD_SUPPORTED_ATTRS_WORD0)
673 	    || (verify->ve_bmval[1] & ~NFSD_SUPPORTED_ATTRS_WORD1))
674 		return nfserr_attrnotsupp;
675 	if ((verify->ve_bmval[0] & FATTR4_WORD0_RDATTR_ERROR)
676 	    || (verify->ve_bmval[1] & NFSD_WRITEONLY_ATTRS_WORD1))
677 		return nfserr_inval;
678 	if (verify->ve_attrlen & 3)
679 		return nfserr_inval;
680 
681 	/* count in words:
682 	 *   bitmap_len(1) + bitmap(2) + attr_len(1) = 4
683 	 */
684 	count = 4 + (verify->ve_attrlen >> 2);
685 	buf = kmalloc(count << 2, GFP_KERNEL);
686 	if (!buf)
687 		return nfserr_resource;
688 
689 	status = nfsd4_encode_fattr(current_fh, current_fh->fh_export,
690 				    current_fh->fh_dentry, buf,
691 				    &count, verify->ve_bmval,
692 				    rqstp);
693 
694 	/* this means that nfsd4_encode_fattr() ran out of space */
695 	if (status == nfserr_resource && count == 0)
696 		status = nfserr_not_same;
697 	if (status)
698 		goto out_kfree;
699 
700 	p = buf + 3;
701 	status = nfserr_not_same;
702 	if (ntohl(*p++) != verify->ve_attrlen)
703 		goto out_kfree;
704 	if (!memcmp(p, verify->ve_attrval, verify->ve_attrlen))
705 		status = nfserr_same;
706 
707 out_kfree:
708 	kfree(buf);
709 	return status;
710 }
711 
712 /*
713  * NULL call.
714  */
715 static int
716 nfsd4_proc_null(struct svc_rqst *rqstp, void *argp, void *resp)
717 {
718 	return nfs_ok;
719 }
720 
721 
722 /*
723  * COMPOUND call.
724  */
725 static int
726 nfsd4_proc_compound(struct svc_rqst *rqstp,
727 		    struct nfsd4_compoundargs *args,
728 		    struct nfsd4_compoundres *resp)
729 {
730 	struct nfsd4_op	*op;
731 	struct svc_fh	*current_fh = NULL;
732 	struct svc_fh	*save_fh = NULL;
733 	struct nfs4_stateowner *replay_owner = NULL;
734 	int		slack_space;    /* in words, not bytes! */
735 	int		status;
736 
737 	status = nfserr_resource;
738 	current_fh = kmalloc(sizeof(*current_fh), GFP_KERNEL);
739 	if (current_fh == NULL)
740 		goto out;
741 	fh_init(current_fh, NFS4_FHSIZE);
742 	save_fh = kmalloc(sizeof(*save_fh), GFP_KERNEL);
743 	if (save_fh == NULL)
744 		goto out;
745 	fh_init(save_fh, NFS4_FHSIZE);
746 
747 	resp->xbuf = &rqstp->rq_res;
748 	resp->p = rqstp->rq_res.head[0].iov_base + rqstp->rq_res.head[0].iov_len;
749 	resp->tagp = resp->p;
750 	/* reserve space for: taglen, tag, and opcnt */
751 	resp->p += 2 + XDR_QUADLEN(args->taglen);
752 	resp->end = rqstp->rq_res.head[0].iov_base + PAGE_SIZE;
753 	resp->taglen = args->taglen;
754 	resp->tag = args->tag;
755 	resp->opcnt = 0;
756 	resp->rqstp = rqstp;
757 
758 	/*
759 	 * According to RFC3010, this takes precedence over all other errors.
760 	 */
761 	status = nfserr_minor_vers_mismatch;
762 	if (args->minorversion > NFSD_SUPPORTED_MINOR_VERSION)
763 		goto out;
764 
765 	status = nfs_ok;
766 	while (!status && resp->opcnt < args->opcnt) {
767 		op = &args->ops[resp->opcnt++];
768 
769 		/*
770 		 * The XDR decode routines may have pre-set op->status;
771 		 * for example, if there is a miscellaneous XDR error
772 		 * it will be set to nfserr_bad_xdr.
773 		 */
774 		if (op->status)
775 			goto encode_op;
776 
777 		/* We must be able to encode a successful response to
778 		 * this operation, with enough room left over to encode a
779 		 * failed response to the next operation.  If we don't
780 		 * have enough room, fail with ERR_RESOURCE.
781 		 */
782 /* FIXME - is slack_space *really* words, or bytes??? - neilb */
783 		slack_space = (char *)resp->end - (char *)resp->p;
784 		if (slack_space < COMPOUND_SLACK_SPACE + COMPOUND_ERR_SLACK_SPACE) {
785 			BUG_ON(slack_space < COMPOUND_ERR_SLACK_SPACE);
786 			op->status = nfserr_resource;
787 			goto encode_op;
788 		}
789 
790 		/* All operations except RENEW, SETCLIENTID, RESTOREFH
791 		* SETCLIENTID_CONFIRM, PUTFH and PUTROOTFH
792 		* require a valid current filehandle
793 		*
794 		* SETATTR NOFILEHANDLE error handled in nfsd4_setattr
795 		* due to required returned bitmap argument
796 		*/
797 		if ((!current_fh->fh_dentry) &&
798 		   !((op->opnum == OP_PUTFH) || (op->opnum == OP_PUTROOTFH) ||
799 		   (op->opnum == OP_SETCLIENTID) ||
800 		   (op->opnum == OP_SETCLIENTID_CONFIRM) ||
801 		   (op->opnum == OP_RENEW) || (op->opnum == OP_RESTOREFH) ||
802 		   (op->opnum == OP_RELEASE_LOCKOWNER) ||
803 		   (op->opnum == OP_SETATTR))) {
804 			op->status = nfserr_nofilehandle;
805 			goto encode_op;
806 		}
807 		switch (op->opnum) {
808 		case OP_ACCESS:
809 			op->status = nfsd4_access(rqstp, current_fh, &op->u.access);
810 			break;
811 		case OP_CLOSE:
812 			op->status = nfsd4_close(rqstp, current_fh, &op->u.close);
813 			replay_owner = op->u.close.cl_stateowner;
814 			break;
815 		case OP_COMMIT:
816 			op->status = nfsd4_commit(rqstp, current_fh, &op->u.commit);
817 			break;
818 		case OP_CREATE:
819 			op->status = nfsd4_create(rqstp, current_fh, &op->u.create);
820 			break;
821 		case OP_DELEGRETURN:
822 			op->status = nfsd4_delegreturn(rqstp, current_fh, &op->u.delegreturn);
823 			break;
824 		case OP_GETATTR:
825 			op->status = nfsd4_getattr(rqstp, current_fh, &op->u.getattr);
826 			break;
827 		case OP_GETFH:
828 			op->status = nfsd4_getfh(current_fh, &op->u.getfh);
829 			break;
830 		case OP_LINK:
831 			op->status = nfsd4_link(rqstp, current_fh, save_fh, &op->u.link);
832 			break;
833 		case OP_LOCK:
834 			op->status = nfsd4_lock(rqstp, current_fh, &op->u.lock);
835 			replay_owner = op->u.lock.lk_stateowner;
836 			break;
837 		case OP_LOCKT:
838 			op->status = nfsd4_lockt(rqstp, current_fh, &op->u.lockt);
839 			break;
840 		case OP_LOCKU:
841 			op->status = nfsd4_locku(rqstp, current_fh, &op->u.locku);
842 			replay_owner = op->u.locku.lu_stateowner;
843 			break;
844 		case OP_LOOKUP:
845 			op->status = nfsd4_lookup(rqstp, current_fh, &op->u.lookup);
846 			break;
847 		case OP_LOOKUPP:
848 			op->status = nfsd4_lookupp(rqstp, current_fh);
849 			break;
850 		case OP_NVERIFY:
851 			op->status = nfsd4_verify(rqstp, current_fh, &op->u.nverify);
852 			if (op->status == nfserr_not_same)
853 				op->status = nfs_ok;
854 			break;
855 		case OP_OPEN:
856 			op->status = nfsd4_open(rqstp, current_fh, &op->u.open);
857 			replay_owner = op->u.open.op_stateowner;
858 			break;
859 		case OP_OPEN_CONFIRM:
860 			op->status = nfsd4_open_confirm(rqstp, current_fh, &op->u.open_confirm);
861 			replay_owner = op->u.open_confirm.oc_stateowner;
862 			break;
863 		case OP_OPEN_DOWNGRADE:
864 			op->status = nfsd4_open_downgrade(rqstp, current_fh, &op->u.open_downgrade);
865 			replay_owner = op->u.open_downgrade.od_stateowner;
866 			break;
867 		case OP_PUTFH:
868 			op->status = nfsd4_putfh(rqstp, current_fh, &op->u.putfh);
869 			break;
870 		case OP_PUTROOTFH:
871 			op->status = nfsd4_putrootfh(rqstp, current_fh);
872 			break;
873 		case OP_READ:
874 			op->status = nfsd4_read(rqstp, current_fh, &op->u.read);
875 			break;
876 		case OP_READDIR:
877 			op->status = nfsd4_readdir(rqstp, current_fh, &op->u.readdir);
878 			break;
879 		case OP_READLINK:
880 			op->status = nfsd4_readlink(rqstp, current_fh, &op->u.readlink);
881 			break;
882 		case OP_REMOVE:
883 			op->status = nfsd4_remove(rqstp, current_fh, &op->u.remove);
884 			break;
885 		case OP_RENAME:
886 			op->status = nfsd4_rename(rqstp, current_fh, save_fh, &op->u.rename);
887 			break;
888 		case OP_RENEW:
889 			op->status = nfsd4_renew(&op->u.renew);
890 			break;
891 		case OP_RESTOREFH:
892 			op->status = nfsd4_restorefh(current_fh, save_fh);
893 			break;
894 		case OP_SAVEFH:
895 			op->status = nfsd4_savefh(current_fh, save_fh);
896 			break;
897 		case OP_SETATTR:
898 			op->status = nfsd4_setattr(rqstp, current_fh, &op->u.setattr);
899 			break;
900 		case OP_SETCLIENTID:
901 			op->status = nfsd4_setclientid(rqstp, &op->u.setclientid);
902 			break;
903 		case OP_SETCLIENTID_CONFIRM:
904 			op->status = nfsd4_setclientid_confirm(rqstp, &op->u.setclientid_confirm);
905 			break;
906 		case OP_VERIFY:
907 			op->status = nfsd4_verify(rqstp, current_fh, &op->u.verify);
908 			if (op->status == nfserr_same)
909 				op->status = nfs_ok;
910 			break;
911 		case OP_WRITE:
912 			op->status = nfsd4_write(rqstp, current_fh, &op->u.write);
913 			break;
914 		case OP_RELEASE_LOCKOWNER:
915 			op->status = nfsd4_release_lockowner(rqstp, &op->u.release_lockowner);
916 			break;
917 		default:
918 			BUG_ON(op->status == nfs_ok);
919 			break;
920 		}
921 
922 encode_op:
923 		if (op->status == NFSERR_REPLAY_ME) {
924 			op->replay = &replay_owner->so_replay;
925 			nfsd4_encode_replay(resp, op);
926 			status = op->status = op->replay->rp_status;
927 		} else {
928 			nfsd4_encode_operation(resp, op);
929 			status = op->status;
930 		}
931 		if (replay_owner && (replay_owner != (void *)(-1))) {
932 			nfs4_put_stateowner(replay_owner);
933 			replay_owner = NULL;
934 		}
935 		/* XXX Ugh, we need to get rid of this kind of special case: */
936 		if (op->opnum == OP_READ && op->u.read.rd_filp)
937 			fput(op->u.read.rd_filp);
938 	}
939 
940 out:
941 	nfsd4_release_compoundargs(args);
942 	if (current_fh)
943 		fh_put(current_fh);
944 	kfree(current_fh);
945 	if (save_fh)
946 		fh_put(save_fh);
947 	kfree(save_fh);
948 	return status;
949 }
950 
951 #define nfs4svc_decode_voidargs		NULL
952 #define nfs4svc_release_void		NULL
953 #define nfsd4_voidres			nfsd4_voidargs
954 #define nfs4svc_release_compound	NULL
955 struct nfsd4_voidargs { int dummy; };
956 
957 #define PROC(name, argt, rest, relt, cache, respsize)	\
958  { (svc_procfunc) nfsd4_proc_##name,		\
959    (kxdrproc_t) nfs4svc_decode_##argt##args,	\
960    (kxdrproc_t) nfs4svc_encode_##rest##res,	\
961    (kxdrproc_t) nfs4svc_release_##relt,		\
962    sizeof(struct nfsd4_##argt##args),		\
963    sizeof(struct nfsd4_##rest##res),		\
964    0,						\
965    cache,					\
966    respsize,					\
967  }
968 
969 /*
970  * TODO: At the present time, the NFSv4 server does not do XID caching
971  * of requests.  Implementing XID caching would not be a serious problem,
972  * although it would require a mild change in interfaces since one
973  * doesn't know whether an NFSv4 request is idempotent until after the
974  * XDR decode.  However, XID caching totally confuses pynfs (Peter
975  * Astrand's regression testsuite for NFSv4 servers), which reuses
976  * XID's liberally, so I've left it unimplemented until pynfs generates
977  * better XID's.
978  */
979 static struct svc_procedure		nfsd_procedures4[2] = {
980   PROC(null,	 void,		void,		void,	  RC_NOCACHE, 1),
981   PROC(compound, compound,	compound,	compound, RC_NOCACHE, NFSD_BUFSIZE)
982 };
983 
984 struct svc_version	nfsd_version4 = {
985 		.vs_vers	= 4,
986 		.vs_nproc	= 2,
987 		.vs_proc	= nfsd_procedures4,
988 		.vs_dispatch	= nfsd_dispatch,
989 		.vs_xdrsize	= NFS4_SVC_XDRSIZE,
990 };
991 
992 /*
993  * Local variables:
994  *  c-basic-offset: 8
995  * End:
996  */
997