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