fs/nfsd/vfs.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  * File operations used by nfsd. Some of these have been ripped from
   4  * other parts of the kernel because they weren't exported, others
   5  * are partial duplicates with added or changed functionality.
   6  *
   7  * Note that several functions dget() the dentry upon which they want
   8  * to act, most notably those that create directory entries. Response
   9  * dentry's are dput()'d if necessary in the release callback.
  10  * So if you notice code paths that apparently fail to dput() the
  11  * dentry, don't worry--they have been taken care of.
  12  *
  13  * Copyright (C) 1995-1999 Olaf Kirch <[email protected]>
  14  * Zerocpy NFS support (C) 2002 Hirokazu Takahashi <[email protected]>
  15  */
  16
  17 #include <linux/fs.h>
  18 #include <linux/file.h>
  19 #include <linux/splice.h>
  20 #include <linux/falloc.h>
  21 #include <linux/fcntl.h>
  22 #include <linux/namei.h>
  23 #include <linux/delay.h>
  24 #include <linux/fsnotify.h>
  25 #include <linux/posix_acl_xattr.h>
  26 #include <linux/xattr.h>
  27 #include <linux/jhash.h>
  28 #include <linux/ima.h>
  29 #include <linux/slab.h>
  30 #include <linux/uaccess.h>
  31 #include <linux/exportfs.h>
  32 #include <linux/writeback.h>
  33 #include <linux/security.h>
  34
  35 #ifdef CONFIG_NFSD_V3
  36 #include "xdr3.h"
  37 #endif /* CONFIG_NFSD_V3 */
  38
  39 #ifdef CONFIG_NFSD_V4
  40 #include "../internal.h"
  41 #include "acl.h"
  42 #include "idmap.h"
  43 #endif /* CONFIG_NFSD_V4 */
  44
  45 #include "nfsd.h"
  46 #include "vfs.h"
  47 #include "filecache.h"
  48 #include "trace.h"
  49
  50 #define NFSDDBG_FACILITY                NFSDDBG_FILEOP
  51
  52 /*
  53  * Called from nfsd_lookup and encode_dirent. Check if we have crossed
  54  * a mount point.
  55  * Returns -EAGAIN or -ETIMEDOUT leaving *dpp and *expp unchanged,
  56  *  or nfs_ok having possibly changed *dpp and *expp
  57  */
  58 int
  59 nfsd_cross_mnt(struct svc_rqst *rqstp, struct dentry **dpp,
  60                         struct svc_export **expp)
  61 {
  62         struct svc_export *exp = *expp, *exp2 = NULL;
  63         struct dentry *dentry = *dpp;
  64         struct path path = {.mnt = mntget(exp->ex_path.mnt),
  65                             .dentry = dget(dentry)};
  66         int err = 0;
  67
  68         err = follow_down(&path);
  69         if (err < 0)
  70                 goto out;
  71         if (path.mnt == exp->ex_path.mnt && path.dentry == dentry &&
  72             nfsd_mountpoint(dentry, exp) == 2) {
  73                 /* This is only a mountpoint in some other namespace */
  74                 path_put(&path);
  75                 goto out;
  76         }
  77
  78         exp2 = rqst_exp_get_by_name(rqstp, &path);
  79         if (IS_ERR(exp2)) {
  80                 err = PTR_ERR(exp2);
  81                 /*
  82                  * We normally allow NFS clients to continue
  83                  * "underneath" a mountpoint that is not exported.
  84                  * The exception is V4ROOT, where no traversal is ever
  85                  * allowed without an explicit export of the new
  86                  * directory.
  87                  */
  88                 if (err == -ENOENT && !(exp->ex_flags & NFSEXP_V4ROOT))
  89                         err = 0;
  90                 path_put(&path);
  91                 goto out;
  92         }
  93         if (nfsd_v4client(rqstp) ||
  94                 (exp->ex_flags & NFSEXP_CROSSMOUNT) || EX_NOHIDE(exp2)) {
  95                 /* successfully crossed mount point */
  96                 /*
  97                  * This is subtle: path.dentry is *not* on path.mnt
  98                  * at this point.  The only reason we are safe is that
  99                  * original mnt is pinned down by exp, so we should
 100                  * put path *before* putting exp
 101                  */
 102                 *dpp = path.dentry;
 103                 path.dentry = dentry;
 104                 *expp = exp2;
 105                 exp2 = exp;
 106         }
 107         path_put(&path);
 108         exp_put(exp2);
 109 out:
 110         return err;
 111 }
 112
 113 static void follow_to_parent(struct path *path)
 114 {
 115         struct dentry *dp;
 116
 117         while (path->dentry == path->mnt->mnt_root && follow_up(path))
 118                 ;
 119         dp = dget_parent(path->dentry);
 120         dput(path->dentry);
 121         path->dentry = dp;
 122 }
 123
 124 static int nfsd_lookup_parent(struct svc_rqst *rqstp, struct dentry *dparent, struct svc_export **exp, struct dentry **dentryp)
 125 {
 126         struct svc_export *exp2;
 127         struct path path = {.mnt = mntget((*exp)->ex_path.mnt),
 128                             .dentry = dget(dparent)};
 129
 130         follow_to_parent(&path);
 131
 132         exp2 = rqst_exp_parent(rqstp, &path);
 133         if (PTR_ERR(exp2) == -ENOENT) {
 134                 *dentryp = dget(dparent);
 135         } else if (IS_ERR(exp2)) {
 136                 path_put(&path);
 137                 return PTR_ERR(exp2);
 138         } else {
 139                 *dentryp = dget(path.dentry);
 140                 exp_put(*exp);
 141                 *exp = exp2;
 142         }
 143         path_put(&path);
 144         return 0;
 145 }
 146
 147 /*
 148  * For nfsd purposes, we treat V4ROOT exports as though there was an
 149  * export at *every* directory.
 150  * We return:
 151  * '1' if this dentry *must* be an export point,
 152  * '2' if it might be, if there is really a mount here, and
 153  * '0' if there is no chance of an export point here.
 154  */
 155 int nfsd_mountpoint(struct dentry *dentry, struct svc_export *exp)
 156 {
 157         if (!d_inode(dentry))
 158                 return 0;
 159         if (exp->ex_flags & NFSEXP_V4ROOT)
 160                 return 1;
 161         if (nfsd4_is_junction(dentry))
 162                 return 1;
 163         if (d_mountpoint(dentry))
 164                 /*
 165                  * Might only be a mountpoint in a different namespace,
 166                  * but we need to check.
 167                  */
 168                 return 2;
 169         return 0;
 170 }
 171
 172 __be32
 173 nfsd_lookup_dentry(struct svc_rqst *rqstp, struct svc_fh *fhp,
 174                    const char *name, unsigned int len,
 175                    struct svc_export **exp_ret, struct dentry **dentry_ret)
 176 {
 177         struct svc_export       *exp;
 178         struct dentry           *dparent;
 179         struct dentry           *dentry;
 180         int                     host_err;
 181
 182         dprintk("nfsd: nfsd_lookup(fh %s, %.*s)\n", SVCFH_fmt(fhp), len,name);
 183
 184         dparent = fhp->fh_dentry;
 185         exp = exp_get(fhp->fh_export);
 186
 187         /* Lookup the name, but don't follow links */
 188         if (isdotent(name, len)) {
 189                 if (len==1)
 190                         dentry = dget(dparent);
 191                 else if (dparent != exp->ex_path.dentry)
 192                         dentry = dget_parent(dparent);
 193                 else if (!EX_NOHIDE(exp) && !nfsd_v4client(rqstp))
 194                         dentry = dget(dparent); /* .. == . just like at / */
 195                 else {
 196                         /* checking mountpoint crossing is very different when stepping up */
 197                         host_err = nfsd_lookup_parent(rqstp, dparent, &exp, &dentry);
 198                         if (host_err)
 199                                 goto out_nfserr;
 200                 }
 201         } else {
 202                 /*
 203                  * In the nfsd4_open() case, this may be held across
 204                  * subsequent open and delegation acquisition which may
 205                  * need to take the child's i_mutex:
 206                  */
 207                 fh_lock_nested(fhp, I_MUTEX_PARENT);
 208                 dentry = lookup_one_len(name, dparent, len);
 209                 host_err = PTR_ERR(dentry);
 210                 if (IS_ERR(dentry))
 211                         goto out_nfserr;
 212                 if (nfsd_mountpoint(dentry, exp)) {
 213                         /*
 214                          * We don't need the i_mutex after all.  It's
 215                          * still possible we could open this (regular
 216                          * files can be mountpoints too), but the
 217                          * i_mutex is just there to prevent renames of
 218                          * something that we might be about to delegate,
 219                          * and a mountpoint won't be renamed:
 220                          */
 221                         fh_unlock(fhp);
 222                         if ((host_err = nfsd_cross_mnt(rqstp, &dentry, &exp))) {
 223                                 dput(dentry);
 224                                 goto out_nfserr;
 225                         }
 226                 }
 227         }
 228         *dentry_ret = dentry;
 229         *exp_ret = exp;
 230         return 0;
 231
 232 out_nfserr:
 233         exp_put(exp);
 234         return nfserrno(host_err);
 235 }
 236
 237 /*
 238  * Look up one component of a pathname.
 239  * N.B. After this call _both_ fhp and resfh need an fh_put
 240  *
 241  * If the lookup would cross a mountpoint, and the mounted filesystem
 242  * is exported to the client with NFSEXP_NOHIDE, then the lookup is
 243  * accepted as it stands and the mounted directory is
 244  * returned. Otherwise the covered directory is returned.
 245  * NOTE: this mountpoint crossing is not supported properly by all
 246  *   clients and is explicitly disallowed for NFSv3
 247  *      NeilBrown <[email protected]>
 248  */
 249 __be32
 250 nfsd_lookup(struct svc_rqst *rqstp, struct svc_fh *fhp, const char *name,
 251                                 unsigned int len, struct svc_fh *resfh)
 252 {
 253         struct svc_export       *exp;
 254         struct dentry           *dentry;
 255         __be32 err;
 256
 257         err = fh_verify(rqstp, fhp, S_IFDIR, NFSD_MAY_EXEC);
 258         if (err)
 259                 return err;
 260         err = nfsd_lookup_dentry(rqstp, fhp, name, len, &exp, &dentry);
 261         if (err)
 262                 return err;
 263         err = check_nfsd_access(exp, rqstp);
 264         if (err)
 265                 goto out;
 266         /*
 267          * Note: we compose the file handle now, but as the
 268          * dentry may be negative, it may need to be updated.
 269          */
 270         err = fh_compose(resfh, exp, dentry, fhp);
 271         if (!err && d_really_is_negative(dentry))
 272                 err = nfserr_noent;
 273 out:
 274         dput(dentry);
 275         exp_put(exp);
 276         return err;
 277 }
 278
 279 /*
 280  * Commit metadata changes to stable storage.
 281  */
 282 static int
 283 commit_metadata(struct svc_fh *fhp)
 284 {
 285         struct inode *inode = d_inode(fhp->fh_dentry);
 286         const struct export_operations *export_ops = inode->i_sb->s_export_op;
 287
 288         if (!EX_ISSYNC(fhp->fh_export))
 289                 return 0;
 290
 291         if (export_ops->commit_metadata)
 292                 return export_ops->commit_metadata(inode);
 293         return sync_inode_metadata(inode, 1);
 294 }
 295
 296 /*
 297  * Go over the attributes and take care of the small differences between
 298  * NFS semantics and what Linux expects.
 299  */
 300 static void
 301 nfsd_sanitize_attrs(struct inode *inode, struct iattr *iap)
 302 {
 303         /* sanitize the mode change */
 304         if (iap->ia_valid & ATTR_MODE) {
 305                 iap->ia_mode &= S_IALLUGO;
 306                 iap->ia_mode |= (inode->i_mode & ~S_IALLUGO);
 307         }
 308
 309         /* Revoke setuid/setgid on chown */
 310         if (!S_ISDIR(inode->i_mode) &&
 311             ((iap->ia_valid & ATTR_UID) || (iap->ia_valid & ATTR_GID))) {
 312                 iap->ia_valid |= ATTR_KILL_PRIV;
 313                 if (iap->ia_valid & ATTR_MODE) {
 314                         /* we're setting mode too, just clear the s*id bits */
 315                         iap->ia_mode &= ~S_ISUID;
 316                         if (iap->ia_mode & S_IXGRP)
 317                                 iap->ia_mode &= ~S_ISGID;
 318                 } else {
 319                         /* set ATTR_KILL_* bits and let VFS handle it */
 320                         iap->ia_valid |= (ATTR_KILL_SUID | ATTR_KILL_SGID);
 321                 }
 322         }
 323 }
 324
 325 static __be32
 326 nfsd_get_write_access(struct svc_rqst *rqstp, struct svc_fh *fhp,
 327                 struct iattr *iap)
 328 {
 329         struct inode *inode = d_inode(fhp->fh_dentry);
 330         int host_err;
 331
 332         if (iap->ia_size < inode->i_size) {
 333                 __be32 err;
 334
 335                 err = nfsd_permission(rqstp, fhp->fh_export, fhp->fh_dentry,
 336                                 NFSD_MAY_TRUNC | NFSD_MAY_OWNER_OVERRIDE);
 337                 if (err)
 338                         return err;
 339         }
 340
 341         host_err = get_write_access(inode);
 342         if (host_err)
 343                 goto out_nfserrno;
 344
 345         host_err = locks_verify_truncate(inode, NULL, iap->ia_size);
 346         if (host_err)
 347                 goto out_put_write_access;
 348         return 0;
 349
 350 out_put_write_access:
 351         put_write_access(inode);
 352 out_nfserrno:
 353         return nfserrno(host_err);
 354 }
 355
 356 /*
 357  * Set various file attributes.  After this call fhp needs an fh_put.
 358  */
 359 __be32
 360 nfsd_setattr(struct svc_rqst *rqstp, struct svc_fh *fhp, struct iattr *iap,
 361              int check_guard, time_t guardtime)
 362 {
 363         struct dentry   *dentry;
 364         struct inode    *inode;
 365         int             accmode = NFSD_MAY_SATTR;
 366         umode_t         ftype = 0;
 367         __be32          err;
 368         int             host_err;
 369         bool            get_write_count;
 370         bool            size_change = (iap->ia_valid & ATTR_SIZE);
 371
 372         if (iap->ia_valid & ATTR_SIZE) {
 373                 accmode |= NFSD_MAY_WRITE|NFSD_MAY_OWNER_OVERRIDE;
 374                 ftype = S_IFREG;
 375         }
 376
 377         /*
 378          * If utimes(2) and friends are called with times not NULL, we should
 379          * not set NFSD_MAY_WRITE bit. Otherwise fh_verify->nfsd_permission
 380          * will return EACCES, when the caller's effective UID does not match
 381          * the owner of the file, and the caller is not privileged. In this
 382          * situation, we should return EPERM(notify_change will return this).
 383          */
 384         if (iap->ia_valid & (ATTR_ATIME | ATTR_MTIME)) {
 385                 accmode |= NFSD_MAY_OWNER_OVERRIDE;
 386                 if (!(iap->ia_valid & (ATTR_ATIME_SET | ATTR_MTIME_SET)))
 387                         accmode |= NFSD_MAY_WRITE;
 388         }
 389
 390         /* Callers that do fh_verify should do the fh_want_write: */
 391         get_write_count = !fhp->fh_dentry;
 392
 393         /* Get inode */
 394         err = fh_verify(rqstp, fhp, ftype, accmode);
 395         if (err)
 396                 return err;
 397         if (get_write_count) {
 398                 host_err = fh_want_write(fhp);
 399                 if (host_err)
 400                         goto out;
 401         }
 402
 403         dentry = fhp->fh_dentry;
 404         inode = d_inode(dentry);
 405
 406         /* Ignore any mode updates on symlinks */
 407         if (S_ISLNK(inode->i_mode))
 408                 iap->ia_valid &= ~ATTR_MODE;
 409
 410         if (!iap->ia_valid)
 411                 return 0;
 412
 413         nfsd_sanitize_attrs(inode, iap);
 414
 415         if (check_guard && guardtime != inode->i_ctime.tv_sec)
 416                 return nfserr_notsync;
 417
 418         /*
 419          * The size case is special, it changes the file in addition to the
 420          * attributes, and file systems don't expect it to be mixed with
 421          * "random" attribute changes.  We thus split out the size change
 422          * into a separate call to ->setattr, and do the rest as a separate
 423          * setattr call.
 424          */
 425         if (size_change) {
 426                 err = nfsd_get_write_access(rqstp, fhp, iap);
 427                 if (err)
 428                         return err;
 429         }
 430
 431         fh_lock(fhp);
 432         if (size_change) {
 433                 /*
 434                  * RFC5661, Section 18.30.4:
 435                  *   Changing the size of a file with SETATTR indirectly
 436                  *   changes the time_modify and change attributes.
 437                  *
 438                  * (and similar for the older RFCs)
 439                  */
 440                 struct iattr size_attr = {
 441                         .ia_valid       = ATTR_SIZE | ATTR_CTIME | ATTR_MTIME,
 442                         .ia_size        = iap->ia_size,
 443                 };
 444
 445                 host_err = notify_change(dentry, &size_attr, NULL);
 446                 if (host_err)
 447                         goto out_unlock;
 448                 iap->ia_valid &= ~ATTR_SIZE;
 449
 450                 /*
 451                  * Avoid the additional setattr call below if the only other
 452                  * attribute that the client sends is the mtime, as we update
 453                  * it as part of the size change above.
 454                  */
 455                 if ((iap->ia_valid & ~ATTR_MTIME) == 0)
 456                         goto out_unlock;
 457         }
 458
 459         iap->ia_valid |= ATTR_CTIME;
 460         host_err = notify_change(dentry, iap, NULL);
 461
 462 out_unlock:
 463         fh_unlock(fhp);
 464         if (size_change)
 465                 put_write_access(inode);
 466 out:
 467         if (!host_err)
 468                 host_err = commit_metadata(fhp);
 469         return nfserrno(host_err);
 470 }
 471
 472 #if defined(CONFIG_NFSD_V4)
 473 /*
 474  * NFS junction information is stored in an extended attribute.
 475  */
 476 #define NFSD_JUNCTION_XATTR_NAME        XATTR_TRUSTED_PREFIX "junction.nfs"
 477
 478 /**
 479  * nfsd4_is_junction - Test if an object could be an NFS junction
 480  *
 481  * @dentry: object to test
 482  *
 483  * Returns 1 if "dentry" appears to contain NFS junction information.
 484  * Otherwise 0 is returned.
 485  */
 486 int nfsd4_is_junction(struct dentry *dentry)
 487 {
 488         struct inode *inode = d_inode(dentry);
 489
 490         if (inode == NULL)
 491                 return 0;
 492         if (inode->i_mode & S_IXUGO)
 493                 return 0;
 494         if (!(inode->i_mode & S_ISVTX))
 495                 return 0;
 496         if (vfs_getxattr(dentry, NFSD_JUNCTION_XATTR_NAME, NULL, 0) <= 0)
 497                 return 0;
 498         return 1;
 499 }
 500 #ifdef CONFIG_NFSD_V4_SECURITY_LABEL
 501 __be32 nfsd4_set_nfs4_label(struct svc_rqst *rqstp, struct svc_fh *fhp,
 502                 struct xdr_netobj *label)
 503 {
 504         __be32 error;
 505         int host_error;
 506         struct dentry *dentry;
 507
 508         error = fh_verify(rqstp, fhp, 0 /* S_IFREG */, NFSD_MAY_SATTR);
 509         if (error)
 510                 return error;
 511
 512         dentry = fhp->fh_dentry;
 513
 514         inode_lock(d_inode(dentry));
 515         host_error = security_inode_setsecctx(dentry, label->data, label->len);
 516         inode_unlock(d_inode(dentry));
 517         return nfserrno(host_error);
 518 }
 519 #else
 520 __be32 nfsd4_set_nfs4_label(struct svc_rqst *rqstp, struct svc_fh *fhp,
 521                 struct xdr_netobj *label)
 522 {
 523         return nfserr_notsupp;
 524 }
 525 #endif
 526
 527 __be32 nfsd4_clone_file_range(struct file *src, u64 src_pos, struct file *dst,
 528                 u64 dst_pos, u64 count, bool sync)
 529 {
 530         loff_t cloned;
 531
 532         cloned = vfs_clone_file_range(src, src_pos, dst, dst_pos, count, 0);
 533         if (cloned < 0)
 534                 return nfserrno(cloned);
 535         if (count && cloned != count)
 536                 return nfserrno(-EINVAL);
 537         if (sync) {
 538                 loff_t dst_end = count ? dst_pos + count - 1 : LLONG_MAX;
 539                 int status = vfs_fsync_range(dst, dst_pos, dst_end, 0);
 540                 if (status < 0)
 541                         return nfserrno(status);
 542         }
 543         return 0;
 544 }
 545
 546 ssize_t nfsd_copy_file_range(struct file *src, u64 src_pos, struct file *dst,
 547                              u64 dst_pos, u64 count)
 548 {
 549
 550         /*
 551          * Limit copy to 4MB to prevent indefinitely blocking an nfsd
 552          * thread and client rpc slot.  The choice of 4MB is somewhat
 553          * arbitrary.  We might instead base this on r/wsize, or make it
 554          * tunable, or use a time instead of a byte limit, or implement
 555          * asynchronous copy.  In theory a client could also recognize a
 556          * limit like this and pipeline multiple COPY requests.
 557          */
 558         count = min_t(u64, count, 1 << 22);
 559         return vfs_copy_file_range(src, src_pos, dst, dst_pos, count, 0);
 560 }
 561
 562 __be32 nfsd4_vfs_fallocate(struct svc_rqst *rqstp, struct svc_fh *fhp,
 563                            struct file *file, loff_t offset, loff_t len,
 564                            int flags)
 565 {
 566         int error;
 567
 568         if (!S_ISREG(file_inode(file)->i_mode))
 569                 return nfserr_inval;
 570
 571         error = vfs_fallocate(file, flags, offset, len);
 572         if (!error)
 573                 error = commit_metadata(fhp);
 574
 575         return nfserrno(error);
 576 }
 577 #endif /* defined(CONFIG_NFSD_V4) */
 578
 579 #ifdef CONFIG_NFSD_V3
 580 /*
 581  * Check server access rights to a file system object
 582  */
 583 struct accessmap {
 584         u32             access;
 585         int             how;
 586 };
 587 static struct accessmap nfs3_regaccess[] = {
 588     {   NFS3_ACCESS_READ,       NFSD_MAY_READ                   },
 589     {   NFS3_ACCESS_EXECUTE,    NFSD_MAY_EXEC                   },
 590     {   NFS3_ACCESS_MODIFY,     NFSD_MAY_WRITE|NFSD_MAY_TRUNC   },
 591     {   NFS3_ACCESS_EXTEND,     NFSD_MAY_WRITE                  },
 592
 593     {   0,                      0                               }
 594 };
 595
 596 static struct accessmap nfs3_diraccess[] = {
 597     {   NFS3_ACCESS_READ,       NFSD_MAY_READ                   },
 598     {   NFS3_ACCESS_LOOKUP,     NFSD_MAY_EXEC                   },
 599     {   NFS3_ACCESS_MODIFY,     NFSD_MAY_EXEC|NFSD_MAY_WRITE|NFSD_MAY_TRUNC},
 600     {   NFS3_ACCESS_EXTEND,     NFSD_MAY_EXEC|NFSD_MAY_WRITE    },
 601     {   NFS3_ACCESS_DELETE,     NFSD_MAY_REMOVE                 },
 602
 603     {   0,                      0                               }
 604 };
 605
 606 static struct accessmap nfs3_anyaccess[] = {
 607         /* Some clients - Solaris 2.6 at least, make an access call
 608          * to the server to check for access for things like /dev/null
 609          * (which really, the server doesn't care about).  So
 610          * We provide simple access checking for them, looking
 611          * mainly at mode bits, and we make sure to ignore read-only
 612          * filesystem checks
 613          */
 614     {   NFS3_ACCESS_READ,       NFSD_MAY_READ                   },
 615     {   NFS3_ACCESS_EXECUTE,    NFSD_MAY_EXEC                   },
 616     {   NFS3_ACCESS_MODIFY,     NFSD_MAY_WRITE|NFSD_MAY_LOCAL_ACCESS    },
 617     {   NFS3_ACCESS_EXTEND,     NFSD_MAY_WRITE|NFSD_MAY_LOCAL_ACCESS    },
 618
 619     {   0,                      0                               }
 620 };
 621
 622 __be32
 623 nfsd_access(struct svc_rqst *rqstp, struct svc_fh *fhp, u32 *access, u32 *supported)
 624 {
 625         struct accessmap        *map;
 626         struct svc_export       *export;
 627         struct dentry           *dentry;
 628         u32                     query, result = 0, sresult = 0;
 629         __be32                  error;
 630
 631         error = fh_verify(rqstp, fhp, 0, NFSD_MAY_NOP);
 632         if (error)
 633                 goto out;
 634
 635         export = fhp->fh_export;
 636         dentry = fhp->fh_dentry;
 637
 638         if (d_is_reg(dentry))
 639                 map = nfs3_regaccess;
 640         else if (d_is_dir(dentry))
 641                 map = nfs3_diraccess;
 642         else
 643                 map = nfs3_anyaccess;
 644
 645
 646         query = *access;
 647         for  (; map->access; map++) {
 648                 if (map->access & query) {
 649                         __be32 err2;
 650
 651                         sresult |= map->access;
 652
 653                         err2 = nfsd_permission(rqstp, export, dentry, map->how);
 654                         switch (err2) {
 655                         case nfs_ok:
 656                                 result |= map->access;
 657                                 break;
 658
 659                         /* the following error codes just mean the access was not allowed,
 660                          * rather than an error occurred */
 661                         case nfserr_rofs:
 662                         case nfserr_acces:
 663                         case nfserr_perm:
 664                                 /* simply don't "or" in the access bit. */
 665                                 break;
 666                         default:
 667                                 error = err2;
 668                                 goto out;
 669                         }
 670                 }
 671         }
 672         *access = result;
 673         if (supported)
 674                 *supported = sresult;
 675
 676  out:
 677         return error;
 678 }
 679 #endif /* CONFIG_NFSD_V3 */
 680
 681 int nfsd_open_break_lease(struct inode *inode, int access)
 682 {
 683         unsigned int mode;
 684
 685         if (access & NFSD_MAY_NOT_BREAK_LEASE)
 686                 return 0;
 687         mode = (access & NFSD_MAY_WRITE) ? O_WRONLY : O_RDONLY;
 688         return break_lease(inode, mode | O_NONBLOCK);
 689 }
 690
 691 /*
 692  * Open an existing file or directory.
 693  * The may_flags argument indicates the type of open (read/write/lock)
 694  * and additional flags.
 695  * N.B. After this call fhp needs an fh_put
 696  */
 697 static __be32
 698 __nfsd_open(struct svc_rqst *rqstp, struct svc_fh *fhp, umode_t type,
 699                         int may_flags, struct file **filp)
 700 {
 701         struct path     path;
 702         struct inode    *inode;
 703         struct file     *file;
 704         int             flags = O_RDONLY|O_LARGEFILE;
 705         __be32          err;
 706         int             host_err = 0;
 707
 708         path.mnt = fhp->fh_export->ex_path.mnt;
 709         path.dentry = fhp->fh_dentry;
 710         inode = d_inode(path.dentry);
 711
 712         /* Disallow write access to files with the append-only bit set
 713          * or any access when mandatory locking enabled
 714          */
 715         err = nfserr_perm;
 716         if (IS_APPEND(inode) && (may_flags & NFSD_MAY_WRITE))
 717                 goto out;
 718         /*
 719          * We must ignore files (but only files) which might have mandatory
 720          * locks on them because there is no way to know if the accesser has
 721          * the lock.
 722          */
 723         if (S_ISREG((inode)->i_mode) && mandatory_lock(inode))
 724                 goto out;
 725
 726         if (!inode->i_fop)
 727                 goto out;
 728
 729         host_err = nfsd_open_break_lease(inode, may_flags);
 730         if (host_err) /* NOMEM or WOULDBLOCK */
 731                 goto out_nfserr;
 732
 733         if (may_flags & NFSD_MAY_WRITE) {
 734                 if (may_flags & NFSD_MAY_READ)
 735                         flags = O_RDWR|O_LARGEFILE;
 736                 else
 737                         flags = O_WRONLY|O_LARGEFILE;
 738         }
 739
 740         file = dentry_open(&path, flags, current_cred());
 741         if (IS_ERR(file)) {
 742                 host_err = PTR_ERR(file);
 743                 goto out_nfserr;
 744         }
 745
 746         host_err = ima_file_check(file, may_flags);
 747         if (host_err) {
 748                 fput(file);
 749                 goto out_nfserr;
 750         }
 751
 752         if (may_flags & NFSD_MAY_64BIT_COOKIE)
 753                 file->f_mode |= FMODE_64BITHASH;
 754         else
 755                 file->f_mode |= FMODE_32BITHASH;
 756
 757         *filp = file;
 758 out_nfserr:
 759         err = nfserrno(host_err);
 760 out:
 761         return err;
 762 }
 763
 764 __be32
 765 nfsd_open(struct svc_rqst *rqstp, struct svc_fh *fhp, umode_t type,
 766                 int may_flags, struct file **filp)
 767 {
 768         __be32 err;
 769
 770         validate_process_creds();
 771         /*
 772          * If we get here, then the client has already done an "open",
 773          * and (hopefully) checked permission - so allow OWNER_OVERRIDE
 774          * in case a chmod has now revoked permission.
 775          *
 776          * Arguably we should also allow the owner override for
 777          * directories, but we never have and it doesn't seem to have
 778          * caused anyone a problem.  If we were to change this, note
 779          * also that our filldir callbacks would need a variant of
 780          * lookup_one_len that doesn't check permissions.
 781          */
 782         if (type == S_IFREG)
 783                 may_flags |= NFSD_MAY_OWNER_OVERRIDE;
 784         err = fh_verify(rqstp, fhp, type, may_flags);
 785         if (!err)
 786                 err = __nfsd_open(rqstp, fhp, type, may_flags, filp);
 787         validate_process_creds();
 788         return err;
 789 }
 790
 791 __be32
 792 nfsd_open_verified(struct svc_rqst *rqstp, struct svc_fh *fhp, umode_t type,
 793                 int may_flags, struct file **filp)
 794 {
 795         __be32 err;
 796
 797         validate_process_creds();
 798         err = __nfsd_open(rqstp, fhp, type, may_flags, filp);
 799         validate_process_creds();
 800         return err;
 801 }
 802
 803 /*
 804  * Grab and keep cached pages associated with a file in the svc_rqst
 805  * so that they can be passed to the network sendmsg/sendpage routines
 806  * directly. They will be released after the sending has completed.
 807  */
 808 static int
 809 nfsd_splice_actor(struct pipe_inode_info *pipe, struct pipe_buffer *buf,
 810                   struct splice_desc *sd)
 811 {
 812         struct svc_rqst *rqstp = sd->u.data;
 813         struct page **pp = rqstp->rq_next_page;
 814         struct page *page = buf->page;
 815         size_t size;
 816
 817         size = sd->len;
 818
 819         if (rqstp->rq_res.page_len == 0) {
 820                 get_page(page);
 821                 put_page(*rqstp->rq_next_page);
 822                 *(rqstp->rq_next_page++) = page;
 823                 rqstp->rq_res.page_base = buf->offset;
 824                 rqstp->rq_res.page_len = size;
 825         } else if (page != pp[-1]) {
 826                 get_page(page);
 827                 if (*rqstp->rq_next_page)
 828                         put_page(*rqstp->rq_next_page);
 829                 *(rqstp->rq_next_page++) = page;
 830                 rqstp->rq_res.page_len += size;
 831         } else
 832                 rqstp->rq_res.page_len += size;
 833
 834         return size;
 835 }
 836
 837 static int nfsd_direct_splice_actor(struct pipe_inode_info *pipe,
 838                                     struct splice_desc *sd)
 839 {
 840         return __splice_from_pipe(pipe, sd, nfsd_splice_actor);
 841 }
 842
 843 static u32 nfsd_eof_on_read(struct file *file, loff_t offset, ssize_t len,
 844                 size_t expected)
 845 {
 846         if (expected != 0 && len == 0)
 847                 return 1;
 848         if (offset+len >= i_size_read(file_inode(file)))
 849                 return 1;
 850         return 0;
 851 }
 852
 853 static __be32 nfsd_finish_read(struct svc_rqst *rqstp, struct svc_fh *fhp,
 854                                struct file *file, loff_t offset,
 855                                unsigned long *count, u32 *eof, ssize_t host_err)
 856 {
 857         if (host_err >= 0) {
 858                 nfsdstats.io_read += host_err;
 859                 *eof = nfsd_eof_on_read(file, offset, host_err, *count);
 860                 *count = host_err;
 861                 fsnotify_access(file);
 862                 trace_nfsd_read_io_done(rqstp, fhp, offset, *count);
 863                 return 0;
 864         } else {
 865                 trace_nfsd_read_err(rqstp, fhp, offset, host_err);
 866                 return nfserrno(host_err);
 867         }
 868 }
 869
 870 __be32 nfsd_splice_read(struct svc_rqst *rqstp, struct svc_fh *fhp,
 871                         struct file *file, loff_t offset, unsigned long *count,
 872                         u32 *eof)
 873 {
 874         struct splice_desc sd = {
 875                 .len            = 0,
 876                 .total_len      = *count,
 877                 .pos            = offset,
 878                 .u.data         = rqstp,
 879         };
 880         ssize_t host_err;
 881
 882         trace_nfsd_read_splice(rqstp, fhp, offset, *count);
 883         rqstp->rq_next_page = rqstp->rq_respages + 1;
 884         host_err = splice_direct_to_actor(file, &sd, nfsd_direct_splice_actor);
 885         return nfsd_finish_read(rqstp, fhp, file, offset, count, eof, host_err);
 886 }
 887
 888 __be32 nfsd_readv(struct svc_rqst *rqstp, struct svc_fh *fhp,
 889                   struct file *file, loff_t offset,
 890                   struct kvec *vec, int vlen, unsigned long *count,
 891                   u32 *eof)
 892 {
 893         struct iov_iter iter;
 894         loff_t ppos = offset;
 895         ssize_t host_err;
 896
 897         trace_nfsd_read_vector(rqstp, fhp, offset, *count);
 898         iov_iter_kvec(&iter, READ, vec, vlen, *count);
 899         host_err = vfs_iter_read(file, &iter, &ppos, 0);
 900         return nfsd_finish_read(rqstp, fhp, file, offset, count, eof, host_err);
 901 }
 902
 903 /*
 904  * Gathered writes: If another process is currently writing to the file,
 905  * there's a high chance this is another nfsd (triggered by a bulk write
 906  * from a client's biod). Rather than syncing the file with each write
 907  * request, we sleep for 10 msec.
 908  *
 909  * I don't know if this roughly approximates C. Juszak's idea of
 910  * gathered writes, but it's a nice and simple solution (IMHO), and it
 911  * seems to work:-)
 912  *
 913  * Note: we do this only in the NFSv2 case, since v3 and higher have a
 914  * better tool (separate unstable writes and commits) for solving this
 915  * problem.
 916  */
 917 static int wait_for_concurrent_writes(struct file *file)
 918 {
 919         struct inode *inode = file_inode(file);
 920         static ino_t last_ino;
 921         static dev_t last_dev;
 922         int err = 0;
 923
 924         if (atomic_read(&inode->i_writecount) > 1
 925             || (last_ino == inode->i_ino && last_dev == inode->i_sb->s_dev)) {
 926                 dprintk("nfsd: write defer %d\n", task_pid_nr(current));
 927                 msleep(10);
 928                 dprintk("nfsd: write resume %d\n", task_pid_nr(current));
 929         }
 930
 931         if (inode->i_state & I_DIRTY) {
 932                 dprintk("nfsd: write sync %d\n", task_pid_nr(current));
 933                 err = vfs_fsync(file, 0);
 934         }
 935         last_ino = inode->i_ino;
 936         last_dev = inode->i_sb->s_dev;
 937         return err;
 938 }
 939
 940 __be32
 941 nfsd_vfs_write(struct svc_rqst *rqstp, struct svc_fh *fhp, struct file *file,
 942                                 loff_t offset, struct kvec *vec, int vlen,
 943                                 unsigned long *cnt, int stable)
 944 {
 945         struct svc_export       *exp;
 946         struct iov_iter         iter;
 947         __be32                  nfserr;
 948         int                     host_err;
 949         int                     use_wgather;
 950         loff_t                  pos = offset;
 951         unsigned int            pflags = current->flags;
 952         rwf_t                   flags = 0;
 953
 954         trace_nfsd_write_opened(rqstp, fhp, offset, *cnt);
 955
 956         if (test_bit(RQ_LOCAL, &rqstp->rq_flags))
 957                 /*
 958                  * We want less throttling in balance_dirty_pages()
 959                  * and shrink_inactive_list() so that nfs to
 960                  * localhost doesn't cause nfsd to lock up due to all
 961                  * the client's dirty pages or its congested queue.
 962                  */
 963                 current->flags |= PF_LESS_THROTTLE;
 964
 965         exp = fhp->fh_export;
 966         use_wgather = (rqstp->rq_vers == 2) && EX_WGATHER(exp);
 967
 968         if (!EX_ISSYNC(exp))
 969                 stable = NFS_UNSTABLE;
 970
 971         if (stable && !use_wgather)
 972                 flags |= RWF_SYNC;
 973
 974         iov_iter_kvec(&iter, WRITE, vec, vlen, *cnt);
 975         host_err = vfs_iter_write(file, &iter, &pos, flags);
 976         if (host_err < 0)
 977                 goto out_nfserr;
 978         nfsdstats.io_write += *cnt;
 979         fsnotify_modify(file);
 980
 981         if (stable && use_wgather) {
 982                 host_err = wait_for_concurrent_writes(file);
 983                 if (host_err < 0)
 984                         nfsd_reset_boot_verifier(net_generic(SVC_NET(rqstp),
 985                                                  nfsd_net_id));
 986         }
 987
 988 out_nfserr:
 989         if (host_err >= 0) {
 990                 trace_nfsd_write_io_done(rqstp, fhp, offset, *cnt);
 991                 nfserr = nfs_ok;
 992         } else {
 993                 trace_nfsd_write_err(rqstp, fhp, offset, host_err);
 994                 nfserr = nfserrno(host_err);
 995         }
 996         if (test_bit(RQ_LOCAL, &rqstp->rq_flags))
 997                 current_restore_flags(pflags, PF_LESS_THROTTLE);
 998         return nfserr;
 999 }
1000
1001 /*
1002  * Read data from a file. count must contain the requested read count
1003  * on entry. On return, *count contains the number of bytes actually read.
1004  * N.B. After this call fhp needs an fh_put
1005  */
1006 __be32 nfsd_read(struct svc_rqst *rqstp, struct svc_fh *fhp,
1007         loff_t offset, struct kvec *vec, int vlen, unsigned long *count,
1008         u32 *eof)
1009 {
1010         struct nfsd_file        *nf;
1011         struct file *file;
1012         __be32 err;
1013
1014         trace_nfsd_read_start(rqstp, fhp, offset, *count);
1015         err = nfsd_file_acquire(rqstp, fhp, NFSD_MAY_READ, &nf);
1016         if (err)
1017                 return err;
1018
1019         file = nf->nf_file;
1020         if (file->f_op->splice_read && test_bit(RQ_SPLICE_OK, &rqstp->rq_flags))
1021                 err = nfsd_splice_read(rqstp, fhp, file, offset, count, eof);
1022         else
1023                 err = nfsd_readv(rqstp, fhp, file, offset, vec, vlen, count, eof);
1024
1025         nfsd_file_put(nf);
1026
1027         trace_nfsd_read_done(rqstp, fhp, offset, *count);
1028
1029         return err;
1030 }
1031
1032 /*
1033  * Write data to a file.
1034  * The stable flag requests synchronous writes.
1035  * N.B. After this call fhp needs an fh_put
1036  */
1037 __be32
1038 nfsd_write(struct svc_rqst *rqstp, struct svc_fh *fhp, loff_t offset,
1039            struct kvec *vec, int vlen, unsigned long *cnt, int stable)
1040 {
1041         struct nfsd_file *nf;
1042         __be32 err;
1043
1044         trace_nfsd_write_start(rqstp, fhp, offset, *cnt);
1045
1046         err = nfsd_file_acquire(rqstp, fhp, NFSD_MAY_WRITE, &nf);
1047         if (err)
1048                 goto out;
1049
1050         err = nfsd_vfs_write(rqstp, fhp, nf->nf_file, offset, vec,
1051                         vlen, cnt, stable);
1052         nfsd_file_put(nf);
1053 out:
1054         trace_nfsd_write_done(rqstp, fhp, offset, *cnt);
1055         return err;
1056 }
1057
1058 #ifdef CONFIG_NFSD_V3
1059 /*
1060  * Commit all pending writes to stable storage.
1061  *
1062  * Note: we only guarantee that data that lies within the range specified
1063  * by the 'offset' and 'count' parameters will be synced.
1064  *
1065  * Unfortunately we cannot lock the file to make sure we return full WCC
1066  * data to the client, as locking happens lower down in the filesystem.
1067  */
1068 __be32
1069 nfsd_commit(struct svc_rqst *rqstp, struct svc_fh *fhp,
1070                loff_t offset, unsigned long count)
1071 {
1072         struct nfsd_file        *nf;
1073         loff_t                  end = LLONG_MAX;
1074         __be32                  err = nfserr_inval;
1075
1076         if (offset < 0)
1077                 goto out;
1078         if (count != 0) {
1079                 end = offset + (loff_t)count - 1;
1080                 if (end < offset)
1081                         goto out;
1082         }
1083
1084         err = nfsd_file_acquire(rqstp, fhp,
1085                         NFSD_MAY_WRITE|NFSD_MAY_NOT_BREAK_LEASE, &nf);
1086         if (err)
1087                 goto out;
1088         if (EX_ISSYNC(fhp->fh_export)) {
1089                 int err2 = vfs_fsync_range(nf->nf_file, offset, end, 0);
1090
1091                 switch (err2) {
1092                 case 0:
1093                         break;
1094                 case -EINVAL:
1095                         err = nfserr_notsupp;
1096                         break;
1097                 default:
1098                         err = nfserrno(err2);
1099                         nfsd_reset_boot_verifier(net_generic(nf->nf_net,
1100                                                  nfsd_net_id));
1101                 }
1102         }
1103
1104         nfsd_file_put(nf);
1105 out:
1106         return err;
1107 }
1108 #endif /* CONFIG_NFSD_V3 */
1109
1110 static __be32
1111 nfsd_create_setattr(struct svc_rqst *rqstp, struct svc_fh *resfhp,
1112                         struct iattr *iap)
1113 {
1114         /*
1115          * Mode has already been set earlier in create:
1116          */
1117         iap->ia_valid &= ~ATTR_MODE;
1118         /*
1119          * Setting uid/gid works only for root.  Irix appears to
1120          * send along the gid on create when it tries to implement
1121          * setgid directories via NFS:
1122          */
1123         if (!uid_eq(current_fsuid(), GLOBAL_ROOT_UID))
1124                 iap->ia_valid &= ~(ATTR_UID|ATTR_GID);
1125         if (iap->ia_valid)
1126                 return nfsd_setattr(rqstp, resfhp, iap, 0, (time_t)0);
1127         /* Callers expect file metadata to be committed here */
1128         return nfserrno(commit_metadata(resfhp));
1129 }
1130
1131 /* HPUX client sometimes creates a file in mode 000, and sets size to 0.
1132  * setting size to 0 may fail for some specific file systems by the permission
1133  * checking which requires WRITE permission but the mode is 000.
1134  * we ignore the resizing(to 0) on the just new created file, since the size is
1135  * 0 after file created.
1136  *
1137  * call this only after vfs_create() is called.
1138  * */
1139 static void
1140 nfsd_check_ignore_resizing(struct iattr *iap)
1141 {
1142         if ((iap->ia_valid & ATTR_SIZE) && (iap->ia_size == 0))
1143                 iap->ia_valid &= ~ATTR_SIZE;
1144 }
1145
1146 /* The parent directory should already be locked: */
1147 __be32
1148 nfsd_create_locked(struct svc_rqst *rqstp, struct svc_fh *fhp,
1149                 char *fname, int flen, struct iattr *iap,
1150                 int type, dev_t rdev, struct svc_fh *resfhp)
1151 {
1152         struct dentry   *dentry, *dchild;
1153         struct inode    *dirp;
1154         __be32          err;
1155         __be32          err2;
1156         int             host_err;
1157
1158         dentry = fhp->fh_dentry;
1159         dirp = d_inode(dentry);
1160
1161         dchild = dget(resfhp->fh_dentry);
1162         if (!fhp->fh_locked) {
1163                 WARN_ONCE(1, "nfsd_create: parent %pd2 not locked!\n",
1164                                 dentry);
1165                 err = nfserr_io;
1166                 goto out;
1167         }
1168
1169         err = nfsd_permission(rqstp, fhp->fh_export, dentry, NFSD_MAY_CREATE);
1170         if (err)
1171                 goto out;
1172
1173         if (!(iap->ia_valid & ATTR_MODE))
1174                 iap->ia_mode = 0;
1175         iap->ia_mode = (iap->ia_mode & S_IALLUGO) | type;
1176
1177         err = 0;
1178         host_err = 0;
1179         switch (type) {
1180         case S_IFREG:
1181                 host_err = vfs_create(dirp, dchild, iap->ia_mode, true);
1182                 if (!host_err)
1183                         nfsd_check_ignore_resizing(iap);
1184                 break;
1185         case S_IFDIR:
1186                 host_err = vfs_mkdir(dirp, dchild, iap->ia_mode);
1187                 if (!host_err && unlikely(d_unhashed(dchild))) {
1188                         struct dentry *d;
1189                         d = lookup_one_len(dchild->d_name.name,
1190                                            dchild->d_parent,
1191                                            dchild->d_name.len);
1192                         if (IS_ERR(d)) {
1193                                 host_err = PTR_ERR(d);
1194                                 break;
1195                         }
1196                         if (unlikely(d_is_negative(d))) {
1197                                 dput(d);
1198                                 err = nfserr_serverfault;
1199                                 goto out;
1200                         }
1201                         dput(resfhp->fh_dentry);
1202                         resfhp->fh_dentry = dget(d);
1203                         err = fh_update(resfhp);
1204                         dput(dchild);
1205                         dchild = d;
1206                         if (err)
1207                                 goto out;
1208                 }
1209                 break;
1210         case S_IFCHR:
1211         case S_IFBLK:
1212         case S_IFIFO:
1213         case S_IFSOCK:
1214                 host_err = vfs_mknod(dirp, dchild, iap->ia_mode, rdev);
1215                 break;
1216         default:
1217                 printk(KERN_WARNING "nfsd: bad file type %o in nfsd_create\n",
1218                        type);
1219                 host_err = -EINVAL;
1220         }
1221         if (host_err < 0)
1222                 goto out_nfserr;
1223
1224         err = nfsd_create_setattr(rqstp, resfhp, iap);
1225
1226         /*
1227          * nfsd_create_setattr already committed the child.  Transactional
1228          * filesystems had a chance to commit changes for both parent and
1229          * child simultaneously making the following commit_metadata a
1230          * noop.
1231          */
1232         err2 = nfserrno(commit_metadata(fhp));
1233         if (err2)
1234                 err = err2;
1235         /*
1236          * Update the file handle to get the new inode info.
1237          */
1238         if (!err)
1239                 err = fh_update(resfhp);
1240 out:
1241         dput(dchild);
1242         return err;
1243
1244 out_nfserr:
1245         err = nfserrno(host_err);
1246         goto out;
1247 }
1248
1249 /*
1250  * Create a filesystem object (regular, directory, special).
1251  * Note that the parent directory is left locked.
1252  *
1253  * N.B. Every call to nfsd_create needs an fh_put for _both_ fhp and resfhp
1254  */
1255 __be32
1256 nfsd_create(struct svc_rqst *rqstp, struct svc_fh *fhp,
1257                 char *fname, int flen, struct iattr *iap,
1258                 int type, dev_t rdev, struct svc_fh *resfhp)
1259 {
1260         struct dentry   *dentry, *dchild = NULL;
1261         __be32          err;
1262         int             host_err;
1263
1264         if (isdotent(fname, flen))
1265                 return nfserr_exist;
1266
1267         err = fh_verify(rqstp, fhp, S_IFDIR, NFSD_MAY_NOP);
1268         if (err)
1269                 return err;
1270
1271         dentry = fhp->fh_dentry;
1272
1273         host_err = fh_want_write(fhp);
1274         if (host_err)
1275                 return nfserrno(host_err);
1276
1277         fh_lock_nested(fhp, I_MUTEX_PARENT);
1278         dchild = lookup_one_len(fname, dentry, flen);
1279         host_err = PTR_ERR(dchild);
1280         if (IS_ERR(dchild))
1281                 return nfserrno(host_err);
1282         err = fh_compose(resfhp, fhp->fh_export, dchild, fhp);
1283         /*
1284          * We unconditionally drop our ref to dchild as fh_compose will have
1285          * already grabbed its own ref for it.
1286          */
1287         dput(dchild);
1288         if (err)
1289                 return err;
1290         return nfsd_create_locked(rqstp, fhp, fname, flen, iap, type,
1291                                         rdev, resfhp);
1292 }
1293
1294 #ifdef CONFIG_NFSD_V3
1295
1296 /*
1297  * NFSv3 and NFSv4 version of nfsd_create
1298  */
1299 __be32
1300 do_nfsd_create(struct svc_rqst *rqstp, struct svc_fh *fhp,
1301                 char *fname, int flen, struct iattr *iap,
1302                 struct svc_fh *resfhp, int createmode, u32 *verifier,
1303                 bool *truncp, bool *created)
1304 {
1305         struct dentry   *dentry, *dchild = NULL;
1306         struct inode    *dirp;
1307         __be32          err;
1308         int             host_err;
1309         __u32           v_mtime=0, v_atime=0;
1310
1311         err = nfserr_perm;
1312         if (!flen)
1313                 goto out;
1314         err = nfserr_exist;
1315         if (isdotent(fname, flen))
1316                 goto out;
1317         if (!(iap->ia_valid & ATTR_MODE))
1318                 iap->ia_mode = 0;
1319         err = fh_verify(rqstp, fhp, S_IFDIR, NFSD_MAY_EXEC);
1320         if (err)
1321                 goto out;
1322
1323         dentry = fhp->fh_dentry;
1324         dirp = d_inode(dentry);
1325
1326         host_err = fh_want_write(fhp);
1327         if (host_err)
1328                 goto out_nfserr;
1329
1330         fh_lock_nested(fhp, I_MUTEX_PARENT);
1331
1332         /*
1333          * Compose the response file handle.
1334          */
1335         dchild = lookup_one_len(fname, dentry, flen);
1336         host_err = PTR_ERR(dchild);
1337         if (IS_ERR(dchild))
1338                 goto out_nfserr;
1339
1340         /* If file doesn't exist, check for permissions to create one */
1341         if (d_really_is_negative(dchild)) {
1342                 err = fh_verify(rqstp, fhp, S_IFDIR, NFSD_MAY_CREATE);
1343                 if (err)
1344                         goto out;
1345         }
1346
1347         err = fh_compose(resfhp, fhp->fh_export, dchild, fhp);
1348         if (err)
1349                 goto out;
1350
1351         if (nfsd_create_is_exclusive(createmode)) {
1352                 /* solaris7 gets confused (bugid 4218508) if these have
1353                  * the high bit set, so just clear the high bits. If this is
1354                  * ever changed to use different attrs for storing the
1355                  * verifier, then do_open_lookup() will also need to be fixed
1356                  * accordingly.
1357                  */
1358                 v_mtime = verifier[0]&0x7fffffff;
1359                 v_atime = verifier[1]&0x7fffffff;
1360         }
1361
1362         if (d_really_is_positive(dchild)) {
1363                 err = 0;
1364
1365                 switch (createmode) {
1366                 case NFS3_CREATE_UNCHECKED:
1367                         if (! d_is_reg(dchild))
1368                                 goto out;
1369                         else if (truncp) {
1370                                 /* in nfsv4, we need to treat this case a little
1371                                  * differently.  we don't want to truncate the
1372                                  * file now; this would be wrong if the OPEN
1373                                  * fails for some other reason.  furthermore,
1374                                  * if the size is nonzero, we should ignore it
1375                                  * according to spec!
1376                                  */
1377                                 *truncp = (iap->ia_valid & ATTR_SIZE) && !iap->ia_size;
1378                         }
1379                         else {
1380                                 iap->ia_valid &= ATTR_SIZE;
1381                                 goto set_attr;
1382                         }
1383                         break;
1384                 case NFS3_CREATE_EXCLUSIVE:
1385                         if (   d_inode(dchild)->i_mtime.tv_sec == v_mtime
1386                             && d_inode(dchild)->i_atime.tv_sec == v_atime
1387                             && d_inode(dchild)->i_size  == 0 ) {
1388                                 if (created)
1389                                         *created = 1;
1390                                 break;
1391                         }
1392                         /* fall through */
1393                 case NFS4_CREATE_EXCLUSIVE4_1:
1394                         if (   d_inode(dchild)->i_mtime.tv_sec == v_mtime
1395                             && d_inode(dchild)->i_atime.tv_sec == v_atime
1396                             && d_inode(dchild)->i_size  == 0 ) {
1397                                 if (created)
1398                                         *created = 1;
1399                                 goto set_attr;
1400                         }
1401                         /* fall through */
1402                 case NFS3_CREATE_GUARDED:
1403                         err = nfserr_exist;
1404                 }
1405                 fh_drop_write(fhp);
1406                 goto out;
1407         }
1408
1409         host_err = vfs_create(dirp, dchild, iap->ia_mode, true);
1410         if (host_err < 0) {
1411                 fh_drop_write(fhp);
1412                 goto out_nfserr;
1413         }
1414         if (created)
1415                 *created = 1;
1416
1417         nfsd_check_ignore_resizing(iap);
1418
1419         if (nfsd_create_is_exclusive(createmode)) {
1420                 /* Cram the verifier into atime/mtime */
1421                 iap->ia_valid = ATTR_MTIME|ATTR_ATIME
1422                         | ATTR_MTIME_SET|ATTR_ATIME_SET;
1423                 /* XXX someone who knows this better please fix it for nsec */
1424                 iap->ia_mtime.tv_sec = v_mtime;
1425                 iap->ia_atime.tv_sec = v_atime;
1426                 iap->ia_mtime.tv_nsec = 0;
1427                 iap->ia_atime.tv_nsec = 0;
1428         }
1429
1430  set_attr:
1431         err = nfsd_create_setattr(rqstp, resfhp, iap);
1432
1433         /*
1434          * nfsd_create_setattr already committed the child
1435          * (and possibly also the parent).
1436          */
1437         if (!err)
1438                 err = nfserrno(commit_metadata(fhp));
1439
1440         /*
1441          * Update the filehandle to get the new inode info.
1442          */
1443         if (!err)
1444                 err = fh_update(resfhp);
1445
1446  out:
1447         fh_unlock(fhp);
1448         if (dchild && !IS_ERR(dchild))
1449                 dput(dchild);
1450         fh_drop_write(fhp);
1451         return err;
1452
1453  out_nfserr:
1454         err = nfserrno(host_err);
1455         goto out;
1456 }
1457 #endif /* CONFIG_NFSD_V3 */
1458
1459 /*
1460  * Read a symlink. On entry, *lenp must contain the maximum path length that
1461  * fits into the buffer. On return, it contains the true length.
1462  * N.B. After this call fhp needs an fh_put
1463  */
1464 __be32
1465 nfsd_readlink(struct svc_rqst *rqstp, struct svc_fh *fhp, char *buf, int *lenp)
1466 {
1467         __be32          err;
1468         const char *link;
1469         struct path path;
1470         DEFINE_DELAYED_CALL(done);
1471         int len;
1472
1473         err = fh_verify(rqstp, fhp, S_IFLNK, NFSD_MAY_NOP);
1474         if (unlikely(err))
1475                 return err;
1476
1477         path.mnt = fhp->fh_export->ex_path.mnt;
1478         path.dentry = fhp->fh_dentry;
1479
1480         if (unlikely(!d_is_symlink(path.dentry)))
1481                 return nfserr_inval;
1482
1483         touch_atime(&path);
1484
1485         link = vfs_get_link(path.dentry, &done);
1486         if (IS_ERR(link))
1487                 return nfserrno(PTR_ERR(link));
1488
1489         len = strlen(link);
1490         if (len < *lenp)
1491                 *lenp = len;
1492         memcpy(buf, link, *lenp);
1493         do_delayed_call(&done);
1494         return 0;
1495 }
1496
1497 /*
1498  * Create a symlink and look up its inode
1499  * N.B. After this call _both_ fhp and resfhp need an fh_put
1500  */
1501 __be32
1502 nfsd_symlink(struct svc_rqst *rqstp, struct svc_fh *fhp,
1503                                 char *fname, int flen,
1504                                 char *path,
1505                                 struct svc_fh *resfhp)
1506 {
1507         struct dentry   *dentry, *dnew;
1508         __be32          err, cerr;
1509         int             host_err;
1510
1511         err = nfserr_noent;
1512         if (!flen || path[0] == '\0')
1513                 goto out;
1514         err = nfserr_exist;
1515         if (isdotent(fname, flen))
1516                 goto out;
1517
1518         err = fh_verify(rqstp, fhp, S_IFDIR, NFSD_MAY_CREATE);
1519         if (err)
1520                 goto out;
1521
1522         host_err = fh_want_write(fhp);
1523         if (host_err)
1524                 goto out_nfserr;
1525
1526         fh_lock(fhp);
1527         dentry = fhp->fh_dentry;
1528         dnew = lookup_one_len(fname, dentry, flen);
1529         host_err = PTR_ERR(dnew);
1530         if (IS_ERR(dnew))
1531                 goto out_nfserr;
1532
1533         host_err = vfs_symlink(d_inode(dentry), dnew, path);
1534         err = nfserrno(host_err);
1535         if (!err)
1536                 err = nfserrno(commit_metadata(fhp));
1537         fh_unlock(fhp);
1538
1539         fh_drop_write(fhp);
1540
1541         cerr = fh_compose(resfhp, fhp->fh_export, dnew, fhp);
1542         dput(dnew);
1543         if (err==0) err = cerr;
1544 out:
1545         return err;
1546
1547 out_nfserr:
1548         err = nfserrno(host_err);
1549         goto out;
1550 }
1551
1552 /*
1553  * Create a hardlink
1554  * N.B. After this call _both_ ffhp and tfhp need an fh_put
1555  */
1556 __be32
1557 nfsd_link(struct svc_rqst *rqstp, struct svc_fh *ffhp,
1558                                 char *name, int len, struct svc_fh *tfhp)
1559 {
1560         struct dentry   *ddir, *dnew, *dold;
1561         struct inode    *dirp;
1562         __be32          err;
1563         int             host_err;
1564
1565         err = fh_verify(rqstp, ffhp, S_IFDIR, NFSD_MAY_CREATE);
1566         if (err)
1567                 goto out;
1568         err = fh_verify(rqstp, tfhp, 0, NFSD_MAY_NOP);
1569         if (err)
1570                 goto out;
1571         err = nfserr_isdir;
1572         if (d_is_dir(tfhp->fh_dentry))
1573                 goto out;
1574         err = nfserr_perm;
1575         if (!len)
1576                 goto out;
1577         err = nfserr_exist;
1578         if (isdotent(name, len))
1579                 goto out;
1580
1581         host_err = fh_want_write(tfhp);
1582         if (host_err) {
1583                 err = nfserrno(host_err);
1584                 goto out;
1585         }
1586
1587         fh_lock_nested(ffhp, I_MUTEX_PARENT);
1588         ddir = ffhp->fh_dentry;
1589         dirp = d_inode(ddir);
1590
1591         dnew = lookup_one_len(name, ddir, len);
1592         host_err = PTR_ERR(dnew);
1593         if (IS_ERR(dnew))
1594                 goto out_nfserr;
1595
1596         dold = tfhp->fh_dentry;
1597
1598         err = nfserr_noent;
1599         if (d_really_is_negative(dold))
1600                 goto out_dput;
1601         host_err = vfs_link(dold, dirp, dnew, NULL);
1602         if (!host_err) {
1603                 err = nfserrno(commit_metadata(ffhp));
1604                 if (!err)
1605                         err = nfserrno(commit_metadata(tfhp));
1606         } else {
1607                 if (host_err == -EXDEV && rqstp->rq_vers == 2)
1608                         err = nfserr_acces;
1609                 else
1610                         err = nfserrno(host_err);
1611         }
1612 out_dput:
1613         dput(dnew);
1614 out_unlock:
1615         fh_unlock(ffhp);
1616         fh_drop_write(tfhp);
1617 out:
1618         return err;
1619
1620 out_nfserr:
1621         err = nfserrno(host_err);
1622         goto out_unlock;
1623 }
1624
1625 static void
1626 nfsd_close_cached_files(struct dentry *dentry)
1627 {
1628         struct inode *inode = d_inode(dentry);
1629
1630         if (inode && S_ISREG(inode->i_mode))
1631                 nfsd_file_close_inode_sync(inode);
1632 }
1633
1634 static bool
1635 nfsd_has_cached_files(struct dentry *dentry)
1636 {
1637         bool            ret = false;
1638         struct inode *inode = d_inode(dentry);
1639
1640         if (inode && S_ISREG(inode->i_mode))
1641                 ret = nfsd_file_is_cached(inode);
1642         return ret;
1643 }
1644
1645 /*
1646  * Rename a file
1647  * N.B. After this call _both_ ffhp and tfhp need an fh_put
1648  */
1649 __be32
1650 nfsd_rename(struct svc_rqst *rqstp, struct svc_fh *ffhp, char *fname, int flen,
1651                             struct svc_fh *tfhp, char *tname, int tlen)
1652 {
1653         struct dentry   *fdentry, *tdentry, *odentry, *ndentry, *trap;
1654         struct inode    *fdir, *tdir;
1655         __be32          err;
1656         int             host_err;
1657         bool            has_cached = false;
1658
1659         err = fh_verify(rqstp, ffhp, S_IFDIR, NFSD_MAY_REMOVE);
1660         if (err)
1661                 goto out;
1662         err = fh_verify(rqstp, tfhp, S_IFDIR, NFSD_MAY_CREATE);
1663         if (err)
1664                 goto out;
1665
1666         fdentry = ffhp->fh_dentry;
1667         fdir = d_inode(fdentry);
1668
1669         tdentry = tfhp->fh_dentry;
1670         tdir = d_inode(tdentry);
1671
1672         err = nfserr_perm;
1673         if (!flen || isdotent(fname, flen) || !tlen || isdotent(tname, tlen))
1674                 goto out;
1675
1676 retry:
1677         host_err = fh_want_write(ffhp);
1678         if (host_err) {
1679                 err = nfserrno(host_err);
1680                 goto out;
1681         }
1682
1683         /* cannot use fh_lock as we need deadlock protective ordering
1684          * so do it by hand */
1685         trap = lock_rename(tdentry, fdentry);
1686         ffhp->fh_locked = tfhp->fh_locked = true;
1687         fill_pre_wcc(ffhp);
1688         fill_pre_wcc(tfhp);
1689
1690         odentry = lookup_one_len(fname, fdentry, flen);
1691         host_err = PTR_ERR(odentry);
1692         if (IS_ERR(odentry))
1693                 goto out_nfserr;
1694
1695         host_err = -ENOENT;
1696         if (d_really_is_negative(odentry))
1697                 goto out_dput_old;
1698         host_err = -EINVAL;
1699         if (odentry == trap)
1700                 goto out_dput_old;
1701
1702         ndentry = lookup_one_len(tname, tdentry, tlen);
1703         host_err = PTR_ERR(ndentry);
1704         if (IS_ERR(ndentry))
1705                 goto out_dput_old;
1706         host_err = -ENOTEMPTY;
1707         if (ndentry == trap)
1708                 goto out_dput_new;
1709
1710         host_err = -EXDEV;
1711         if (ffhp->fh_export->ex_path.mnt != tfhp->fh_export->ex_path.mnt)
1712                 goto out_dput_new;
1713         if (ffhp->fh_export->ex_path.dentry != tfhp->fh_export->ex_path.dentry)
1714                 goto out_dput_new;
1715
1716         if (nfsd_has_cached_files(ndentry)) {
1717                 has_cached = true;
1718                 goto out_dput_old;
1719         } else {
1720                 host_err = vfs_rename(fdir, odentry, tdir, ndentry, NULL, 0);
1721                 if (!host_err) {
1722                         host_err = commit_metadata(tfhp);
1723                         if (!host_err)
1724                                 host_err = commit_metadata(ffhp);
1725                 }
1726         }
1727  out_dput_new:
1728         dput(ndentry);
1729  out_dput_old:
1730         dput(odentry);
1731  out_nfserr:
1732         err = nfserrno(host_err);
1733         /*
1734          * We cannot rely on fh_unlock on the two filehandles,
1735          * as that would do the wrong thing if the two directories
1736          * were the same, so again we do it by hand.
1737          */
1738         if (!has_cached) {
1739                 fill_post_wcc(ffhp);
1740                 fill_post_wcc(tfhp);
1741         }
1742         unlock_rename(tdentry, fdentry);
1743         ffhp->fh_locked = tfhp->fh_locked = false;
1744         fh_drop_write(ffhp);
1745
1746         /*
1747          * If the target dentry has cached open files, then we need to try to
1748          * close them prior to doing the rename. Flushing delayed fput
1749          * shouldn't be done with locks held however, so we delay it until this
1750          * point and then reattempt the whole shebang.
1751          */
1752         if (has_cached) {
1753                 has_cached = false;
1754                 nfsd_close_cached_files(ndentry);
1755                 dput(ndentry);
1756                 goto retry;
1757         }
1758 out:
1759         return err;
1760 }
1761
1762 /*
1763  * Unlink a file or directory
1764  * N.B. After this call fhp needs an fh_put
1765  */
1766 __be32
1767 nfsd_unlink(struct svc_rqst *rqstp, struct svc_fh *fhp, int type,
1768                                 char *fname, int flen)
1769 {
1770         struct dentry   *dentry, *rdentry;
1771         struct inode    *dirp;
1772         __be32          err;
1773         int             host_err;
1774
1775         err = nfserr_acces;
1776         if (!flen || isdotent(fname, flen))
1777                 goto out;
1778         err = fh_verify(rqstp, fhp, S_IFDIR, NFSD_MAY_REMOVE);
1779         if (err)
1780                 goto out;
1781
1782         host_err = fh_want_write(fhp);
1783         if (host_err)
1784                 goto out_nfserr;
1785
1786         fh_lock_nested(fhp, I_MUTEX_PARENT);
1787         dentry = fhp->fh_dentry;
1788         dirp = d_inode(dentry);
1789
1790         rdentry = lookup_one_len(fname, dentry, flen);
1791         host_err = PTR_ERR(rdentry);
1792         if (IS_ERR(rdentry))
1793                 goto out_drop_write;
1794
1795         if (d_really_is_negative(rdentry)) {
1796                 dput(rdentry);
1797                 host_err = -ENOENT;
1798                 goto out_drop_write;
1799         }
1800
1801         if (!type)
1802                 type = d_inode(rdentry)->i_mode & S_IFMT;
1803
1804         if (type != S_IFDIR) {
1805                 nfsd_close_cached_files(rdentry);
1806                 host_err = vfs_unlink(dirp, rdentry, NULL);
1807         } else {
1808                 host_err = vfs_rmdir(dirp, rdentry);
1809         }
1810
1811         if (!host_err)
1812                 host_err = commit_metadata(fhp);
1813         dput(rdentry);
1814
1815 out_drop_write:
1816         fh_drop_write(fhp);
1817 out_nfserr:
1818         if (host_err == -EBUSY) {
1819                 /* name is mounted-on. There is no perfect
1820                  * error status.
1821                  */
1822                 if (nfsd_v4client(rqstp))
1823                         err = nfserr_file_open;
1824                 else
1825                         err = nfserr_acces;
1826         } else {
1827                 err = nfserrno(host_err);
1828         }
1829 out:
1830         return err;
1831 }
1832
1833 /*
1834  * We do this buffering because we must not call back into the file
1835  * system's ->lookup() method from the filldir callback. That may well
1836  * deadlock a number of file systems.
1837  *
1838  * This is based heavily on the implementation of same in XFS.
1839  */
1840 struct buffered_dirent {
1841         u64             ino;
1842         loff_t          offset;
1843         int             namlen;
1844         unsigned int    d_type;
1845         char            name[];
1846 };
1847
1848 struct readdir_data {
1849         struct dir_context ctx;
1850         char            *dirent;
1851         size_t          used;
1852         int             full;
1853 };
1854
1855 static int nfsd_buffered_filldir(struct dir_context *ctx, const char *name,
1856                                  int namlen, loff_t offset, u64 ino,
1857                                  unsigned int d_type)
1858 {
1859         struct readdir_data *buf =
1860                 container_of(ctx, struct readdir_data, ctx);
1861         struct buffered_dirent *de = (void *)(buf->dirent + buf->used);
1862         unsigned int reclen;
1863
1864         reclen = ALIGN(sizeof(struct buffered_dirent) + namlen, sizeof(u64));
1865         if (buf->used + reclen > PAGE_SIZE) {
1866                 buf->full = 1;
1867                 return -EINVAL;
1868         }
1869
1870         de->namlen = namlen;
1871         de->offset = offset;
1872         de->ino = ino;
1873         de->d_type = d_type;
1874         memcpy(de->name, name, namlen);
1875         buf->used += reclen;
1876
1877         return 0;
1878 }
1879
1880 static __be32 nfsd_buffered_readdir(struct file *file, nfsd_filldir_t func,
1881                                     struct readdir_cd *cdp, loff_t *offsetp)
1882 {
1883         struct buffered_dirent *de;
1884         int host_err;
1885         int size;
1886         loff_t offset;
1887         struct readdir_data buf = {
1888                 .ctx.actor = nfsd_buffered_filldir,
1889                 .dirent = (void *)__get_free_page(GFP_KERNEL)
1890         };
1891
1892         if (!buf.dirent)
1893                 return nfserrno(-ENOMEM);
1894
1895         offset = *offsetp;
1896
1897         while (1) {
1898                 unsigned int reclen;
1899
1900                 cdp->err = nfserr_eof; /* will be cleared on successful read */
1901                 buf.used = 0;
1902                 buf.full = 0;
1903
1904                 host_err = iterate_dir(file, &buf.ctx);
1905                 if (buf.full)
1906                         host_err = 0;
1907
1908                 if (host_err < 0)
1909                         break;
1910
1911                 size = buf.used;
1912
1913                 if (!size)
1914                         break;
1915
1916                 de = (struct buffered_dirent *)buf.dirent;
1917                 while (size > 0) {
1918                         offset = de->offset;
1919
1920                         if (func(cdp, de->name, de->namlen, de->offset,
1921                                  de->ino, de->d_type))
1922                                 break;
1923
1924                         if (cdp->err != nfs_ok)
1925                                 break;
1926
1927                         reclen = ALIGN(sizeof(*de) + de->namlen,
1928                                        sizeof(u64));
1929                         size -= reclen;
1930                         de = (struct buffered_dirent *)((char *)de + reclen);
1931                 }
1932                 if (size > 0) /* We bailed out early */
1933                         break;
1934
1935                 offset = vfs_llseek(file, 0, SEEK_CUR);
1936         }
1937
1938         free_page((unsigned long)(buf.dirent));
1939
1940         if (host_err)
1941                 return nfserrno(host_err);
1942
1943         *offsetp = offset;
1944         return cdp->err;
1945 }
1946
1947 /*
1948  * Read entries from a directory.
1949  * The  NFSv3/4 verifier we ignore for now.
1950  */
1951 __be32
1952 nfsd_readdir(struct svc_rqst *rqstp, struct svc_fh *fhp, loff_t *offsetp,
1953              struct readdir_cd *cdp, nfsd_filldir_t func)
1954 {
1955         __be32          err;
1956         struct file     *file;
1957         loff_t          offset = *offsetp;
1958         int             may_flags = NFSD_MAY_READ;
1959
1960         /* NFSv2 only supports 32 bit cookies */
1961         if (rqstp->rq_vers > 2)
1962                 may_flags |= NFSD_MAY_64BIT_COOKIE;
1963
1964         err = nfsd_open(rqstp, fhp, S_IFDIR, may_flags, &file);
1965         if (err)
1966                 goto out;
1967
1968         offset = vfs_llseek(file, offset, SEEK_SET);
1969         if (offset < 0) {
1970                 err = nfserrno((int)offset);
1971                 goto out_close;
1972         }
1973
1974         err = nfsd_buffered_readdir(file, func, cdp, offsetp);
1975
1976         if (err == nfserr_eof || err == nfserr_toosmall)
1977                 err = nfs_ok; /* can still be found in ->err */
1978 out_close:
1979         fput(file);
1980 out:
1981         return err;
1982 }
1983
1984 /*
1985  * Get file system stats
1986  * N.B. After this call fhp needs an fh_put
1987  */
1988 __be32
1989 nfsd_statfs(struct svc_rqst *rqstp, struct svc_fh *fhp, struct kstatfs *stat, int access)
1990 {
1991         __be32 err;
1992
1993         err = fh_verify(rqstp, fhp, 0, NFSD_MAY_NOP | access);
1994         if (!err) {
1995                 struct path path = {
1996                         .mnt    = fhp->fh_export->ex_path.mnt,
1997                         .dentry = fhp->fh_dentry,
1998                 };
1999                 if (vfs_statfs(&path, stat))
2000                         err = nfserr_io;
2001         }
2002         return err;
2003 }
2004
2005 static int exp_rdonly(struct svc_rqst *rqstp, struct svc_export *exp)
2006 {
2007         return nfsexp_flags(rqstp, exp) & NFSEXP_READONLY;
2008 }
2009
2010 /*
2011  * Check for a user's access permissions to this inode.
2012  */
2013 __be32
2014 nfsd_permission(struct svc_rqst *rqstp, struct svc_export *exp,
2015                                         struct dentry *dentry, int acc)
2016 {
2017         struct inode    *inode = d_inode(dentry);
2018         int             err;
2019
2020         if ((acc & NFSD_MAY_MASK) == NFSD_MAY_NOP)
2021                 return 0;
2022 #if 0
2023         dprintk("nfsd: permission 0x%x%s%s%s%s%s%s%s mode 0%o%s%s%s\n",
2024                 acc,
2025                 (acc & NFSD_MAY_READ)?  " read"  : "",
2026                 (acc & NFSD_MAY_WRITE)? " write" : "",
2027                 (acc & NFSD_MAY_EXEC)?  " exec"  : "",
2028                 (acc & NFSD_MAY_SATTR)? " sattr" : "",
2029                 (acc & NFSD_MAY_TRUNC)? " trunc" : "",
2030                 (acc & NFSD_MAY_LOCK)?  " lock"  : "",
2031                 (acc & NFSD_MAY_OWNER_OVERRIDE)? " owneroverride" : "",
2032                 inode->i_mode,
2033                 IS_IMMUTABLE(inode)?    " immut" : "",
2034                 IS_APPEND(inode)?       " append" : "",
2035                 __mnt_is_readonly(exp->ex_path.mnt)?    " ro" : "");
2036         dprintk("      owner %d/%d user %d/%d\n",
2037                 inode->i_uid, inode->i_gid, current_fsuid(), current_fsgid());
2038 #endif
2039
2040         /* Normally we reject any write/sattr etc access on a read-only file
2041          * system.  But if it is IRIX doing check on write-access for a
2042          * device special file, we ignore rofs.
2043          */
2044         if (!(acc & NFSD_MAY_LOCAL_ACCESS))
2045                 if (acc & (NFSD_MAY_WRITE | NFSD_MAY_SATTR | NFSD_MAY_TRUNC)) {
2046                         if (exp_rdonly(rqstp, exp) ||
2047                             __mnt_is_readonly(exp->ex_path.mnt))
2048                                 return nfserr_rofs;
2049                         if (/* (acc & NFSD_MAY_WRITE) && */ IS_IMMUTABLE(inode))
2050                                 return nfserr_perm;
2051                 }
2052         if ((acc & NFSD_MAY_TRUNC) && IS_APPEND(inode))
2053                 return nfserr_perm;
2054
2055         if (acc & NFSD_MAY_LOCK) {
2056                 /* If we cannot rely on authentication in NLM requests,
2057                  * just allow locks, otherwise require read permission, or
2058                  * ownership
2059                  */
2060                 if (exp->ex_flags & NFSEXP_NOAUTHNLM)
2061                         return 0;
2062                 else
2063                         acc = NFSD_MAY_READ | NFSD_MAY_OWNER_OVERRIDE;
2064         }
2065         /*
2066          * The file owner always gets access permission for accesses that
2067          * would normally be checked at open time. This is to make
2068          * file access work even when the client has done a fchmod(fd, 0).
2069          *
2070          * However, `cp foo bar' should fail nevertheless when bar is
2071          * readonly. A sensible way to do this might be to reject all
2072          * attempts to truncate a read-only file, because a creat() call
2073          * always implies file truncation.
2074          * ... but this isn't really fair.  A process may reasonably call
2075          * ftruncate on an open file descriptor on a file with perm 000.
2076          * We must trust the client to do permission checking - using "ACCESS"
2077          * with NFSv3.
2078          */
2079         if ((acc & NFSD_MAY_OWNER_OVERRIDE) &&
2080             uid_eq(inode->i_uid, current_fsuid()))
2081                 return 0;
2082
2083         /* This assumes  NFSD_MAY_{READ,WRITE,EXEC} == MAY_{READ,WRITE,EXEC} */
2084         err = inode_permission(inode, acc & (MAY_READ|MAY_WRITE|MAY_EXEC));
2085
2086         /* Allow read access to binaries even when mode 111 */
2087         if (err == -EACCES && S_ISREG(inode->i_mode) &&
2088              (acc == (NFSD_MAY_READ | NFSD_MAY_OWNER_OVERRIDE) ||
2089               acc == (NFSD_MAY_READ | NFSD_MAY_READ_IF_EXEC)))
2090                 err = inode_permission(inode, MAY_EXEC);
2091
2092         return err? nfserrno(err) : 0;
2093 }