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