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