fs/nfs/file.c

   1 /*
   2  *  linux/fs/nfs/file.c
   3  *
   4  *  Copyright (C) 1992  Rick Sladkey
   5  *
   6  *  Changes Copyright (C) 1994 by Florian La Roche
   7  *   - Do not copy data too often around in the kernel.
   8  *   - In nfs_file_read the return value of kmalloc wasn't checked.
   9  *   - Put in a better version of read look-ahead buffering. Original idea
  10  *     and implementation by Wai S Kok elekokws@ee.nus.sg.
  11  *
  12  *  Expire cache on write to a file by Wai S Kok (Oct 1994).
  13  *
  14  *  Total rewrite of read side for new NFS buffer cache.. Linus.
  15  *
  16  *  nfs regular file handling functions
  17  */
  18
  19 #include <linux/time.h>
  20 #include <linux/kernel.h>
  21 #include <linux/errno.h>
  22 #include <linux/fcntl.h>
  23 #include <linux/stat.h>
  24 #include <linux/nfs_fs.h>
  25 #include <linux/nfs_mount.h>
  26 #include <linux/mm.h>
  27 #include <linux/pagemap.h>
  28 #include <linux/aio.h>
  29 #include <linux/gfp.h>
  30 #include <linux/swap.h>
  31
  32 #include <asm/uaccess.h>
  33
  34 #include "delegation.h"
  35 #include "internal.h"
  36 #include "iostat.h"
  37 #include "fscache.h"
  38
  39 #define NFSDBG_FACILITY         NFSDBG_FILE
  40
  41 static const struct vm_operations_struct nfs_file_vm_ops;
  42
  43 /* Hack for future NFS swap support */
  44 #ifndef IS_SWAPFILE
  45 # define IS_SWAPFILE(inode)     (0)
  46 #endif
  47
  48 int nfs_check_flags(int flags)
  49 {
  50         if ((flags & (O_APPEND | O_DIRECT)) == (O_APPEND | O_DIRECT))
  51                 return -EINVAL;
  52
  53         return 0;
  54 }
  55
  56 /*
  57  * Open file
  58  */
  59 static int
  60 nfs_file_open(struct inode *inode, struct file *filp)
  61 {
  62         int res;
  63
  64         dprintk("NFS: open file(%s/%s)\n",
  65                         filp->f_path.dentry->d_parent->d_name.name,
  66                         filp->f_path.dentry->d_name.name);
  67
  68         nfs_inc_stats(inode, NFSIOS_VFSOPEN);
  69         res = nfs_check_flags(filp->f_flags);
  70         if (res)
  71                 return res;
  72
  73         res = nfs_open(inode, filp);
  74         return res;
  75 }
  76
  77 int
  78 nfs_file_release(struct inode *inode, struct file *filp)
  79 {
  80         dprintk("NFS: release(%s/%s)\n",
  81                         filp->f_path.dentry->d_parent->d_name.name,
  82                         filp->f_path.dentry->d_name.name);
  83
  84         nfs_inc_stats(inode, NFSIOS_VFSRELEASE);
  85         return nfs_release(inode, filp);
  86 }
  87
  88 /**
  89  * nfs_revalidate_size - Revalidate the file size
  90  * @inode - pointer to inode struct
  91  * @file - pointer to struct file
  92  *
  93  * Revalidates the file length. This is basically a wrapper around
  94  * nfs_revalidate_inode() that takes into account the fact that we may
  95  * have cached writes (in which case we don't care about the server's
  96  * idea of what the file length is), or O_DIRECT (in which case we
  97  * shouldn't trust the cache).
  98  */
  99 static int nfs_revalidate_file_size(struct inode *inode, struct file *filp)
 100 {
 101         struct nfs_server *server = NFS_SERVER(inode);
 102         struct nfs_inode *nfsi = NFS_I(inode);
 103
 104         if (nfs_have_delegated_attributes(inode))
 105                 goto out_noreval;
 106
 107         if (filp->f_flags & O_DIRECT)
 108                 goto force_reval;
 109         if (nfsi->cache_validity & NFS_INO_REVAL_PAGECACHE)
 110                 goto force_reval;
 111         if (nfs_attribute_timeout(inode))
 112                 goto force_reval;
 113 out_noreval:
 114         return 0;
 115 force_reval:
 116         return __nfs_revalidate_inode(server, inode);
 117 }
 118
 119 loff_t nfs_file_llseek(struct file *filp, loff_t offset, int origin)
 120 {
 121         dprintk("NFS: llseek file(%s/%s, %lld, %d)\n",
 122                         filp->f_path.dentry->d_parent->d_name.name,
 123                         filp->f_path.dentry->d_name.name,
 124                         offset, origin);
 125
 126         /*
 127          * origin == SEEK_END || SEEK_DATA || SEEK_HOLE => we must revalidate
 128          * the cached file length
 129          */
 130         if (origin != SEEK_SET && origin != SEEK_CUR) {
 131                 struct inode *inode = filp->f_mapping->host;
 132
 133                 int retval = nfs_revalidate_file_size(inode, filp);
 134                 if (retval < 0)
 135                         return (loff_t)retval;
 136         }
 137
 138         return generic_file_llseek(filp, offset, origin);
 139 }
 140
 141 /*
 142  * Flush all dirty pages, and check for write errors.
 143  */
 144 int
 145 nfs_file_flush(struct file *file, fl_owner_t id)
 146 {
 147         struct dentry   *dentry = file->f_path.dentry;
 148         struct inode    *inode = dentry->d_inode;
 149
 150         dprintk("NFS: flush(%s/%s)\n",
 151                         dentry->d_parent->d_name.name,
 152                         dentry->d_name.name);
 153
 154         nfs_inc_stats(inode, NFSIOS_VFSFLUSH);
 155         if ((file->f_mode & FMODE_WRITE) == 0)
 156                 return 0;
 157
 158         /*
 159          * If we're holding a write delegation, then just start the i/o
 160          * but don't wait for completion (or send a commit).
 161          */
 162         if (NFS_PROTO(inode)->have_delegation(inode, FMODE_WRITE))
 163                 return filemap_fdatawrite(file->f_mapping);
 164
 165         /* Flush writes to the server and return any errors */
 166         return vfs_fsync(file, 0);
 167 }
 168
 169 ssize_t
 170 nfs_file_read(struct kiocb *iocb, const struct iovec *iov,
 171                 unsigned long nr_segs, loff_t pos)
 172 {
 173         struct dentry * dentry = iocb->ki_filp->f_path.dentry;
 174         struct inode * inode = dentry->d_inode;
 175         ssize_t result;
 176
 177         if (iocb->ki_filp->f_flags & O_DIRECT)
 178                 return nfs_file_direct_read(iocb, iov, nr_segs, pos);
 179
 180         dprintk("NFS: read(%s/%s, %lu@%lu)\n",
 181                 dentry->d_parent->d_name.name, dentry->d_name.name,
 182                 (unsigned long) iov_length(iov, nr_segs), (unsigned long) pos);
 183
 184         result = nfs_revalidate_mapping(inode, iocb->ki_filp->f_mapping);
 185         if (!result) {
 186                 result = generic_file_aio_read(iocb, iov, nr_segs, pos);
 187                 if (result > 0)
 188                         nfs_add_stats(inode, NFSIOS_NORMALREADBYTES, result);
 189         }
 190         return result;
 191 }
 192
 193 ssize_t
 194 nfs_file_splice_read(struct file *filp, loff_t *ppos,
 195                      struct pipe_inode_info *pipe, size_t count,
 196                      unsigned int flags)
 197 {
 198         struct dentry *dentry = filp->f_path.dentry;
 199         struct inode *inode = dentry->d_inode;
 200         ssize_t res;
 201
 202         dprintk("NFS: splice_read(%s/%s, %lu@%Lu)\n",
 203                 dentry->d_parent->d_name.name, dentry->d_name.name,
 204                 (unsigned long) count, (unsigned long long) *ppos);
 205
 206         res = nfs_revalidate_mapping(inode, filp->f_mapping);
 207         if (!res) {
 208                 res = generic_file_splice_read(filp, ppos, pipe, count, flags);
 209                 if (res > 0)
 210                         nfs_add_stats(inode, NFSIOS_NORMALREADBYTES, res);
 211         }
 212         return res;
 213 }
 214
 215 int
 216 nfs_file_mmap(struct file * file, struct vm_area_struct * vma)
 217 {
 218         struct dentry *dentry = file->f_path.dentry;
 219         struct inode *inode = dentry->d_inode;
 220         int     status;
 221
 222         dprintk("NFS: mmap(%s/%s)\n",
 223                 dentry->d_parent->d_name.name, dentry->d_name.name);
 224
 225         /* Note: generic_file_mmap() returns ENOSYS on nommu systems
 226          *       so we call that before revalidating the mapping
 227          */
 228         status = generic_file_mmap(file, vma);
 229         if (!status) {
 230                 vma->vm_ops = &nfs_file_vm_ops;
 231                 status = nfs_revalidate_mapping(inode, file->f_mapping);
 232         }
 233         return status;
 234 }
 235
 236 /*
 237  * Flush any dirty pages for this process, and check for write errors.
 238  * The return status from this call provides a reliable indication of
 239  * whether any write errors occurred for this process.
 240  *
 241  * Notice that it clears the NFS_CONTEXT_ERROR_WRITE before synching to
 242  * disk, but it retrieves and clears ctx->error after synching, despite
 243  * the two being set at the same time in nfs_context_set_write_error().
 244  * This is because the former is used to notify the _next_ call to
 245  * nfs_file_write() that a write error occurred, and hence cause it to
 246  * fall back to doing a synchronous write.
 247  */
 248 int
 249 nfs_file_fsync_commit(struct file *file, loff_t start, loff_t end, int datasync)
 250 {
 251         struct dentry *dentry = file->f_path.dentry;
 252         struct nfs_open_context *ctx = nfs_file_open_context(file);
 253         struct inode *inode = dentry->d_inode;
 254         int have_error, status;
 255         int ret = 0;
 256
 257         dprintk("NFS: fsync file(%s/%s) datasync %d\n",
 258                         dentry->d_parent->d_name.name, dentry->d_name.name,
 259                         datasync);
 260
 261         nfs_inc_stats(inode, NFSIOS_VFSFSYNC);
 262         have_error = test_and_clear_bit(NFS_CONTEXT_ERROR_WRITE, &ctx->flags);
 263         status = nfs_commit_inode(inode, FLUSH_SYNC);
 264         if (status >= 0 && ret < 0)
 265                 status = ret;
 266         have_error |= test_bit(NFS_CONTEXT_ERROR_WRITE, &ctx->flags);
 267         if (have_error)
 268                 ret = xchg(&ctx->error, 0);
 269         if (!ret && status < 0)
 270                 ret = status;
 271         return ret;
 272 }
 273
 274 static int
 275 nfs_file_fsync(struct file *file, loff_t start, loff_t end, int datasync)
 276 {
 277         int ret;
 278         struct inode *inode = file->f_path.dentry->d_inode;
 279
 280         ret = filemap_write_and_wait_range(inode->i_mapping, start, end);
 281         mutex_lock(&inode->i_mutex);
 282         ret = nfs_file_fsync_commit(file, start, end, datasync);
 283         mutex_unlock(&inode->i_mutex);
 284
 285         return ret;
 286 }
 287
 288 /*
 289  * Decide whether a read/modify/write cycle may be more efficient
 290  * then a modify/write/read cycle when writing to a page in the
 291  * page cache.
 292  *
 293  * The modify/write/read cycle may occur if a page is read before
 294  * being completely filled by the writer.  In this situation, the
 295  * page must be completely written to stable storage on the server
 296  * before it can be refilled by reading in the page from the server.
 297  * This can lead to expensive, small, FILE_SYNC mode writes being
 298  * done.
 299  *
 300  * It may be more efficient to read the page first if the file is
 301  * open for reading in addition to writing, the page is not marked
 302  * as Uptodate, it is not dirty or waiting to be committed,
 303  * indicating that it was previously allocated and then modified,
 304  * that there were valid bytes of data in that range of the file,
 305  * and that the new data won't completely replace the old data in
 306  * that range of the file.
 307  */
 308 static int nfs_want_read_modify_write(struct file *file, struct page *page,
 309                         loff_t pos, unsigned len)
 310 {
 311         unsigned int pglen = nfs_page_length(page);
 312         unsigned int offset = pos & (PAGE_CACHE_SIZE - 1);
 313         unsigned int end = offset + len;
 314
 315         if ((file->f_mode & FMODE_READ) &&      /* open for read? */
 316             !PageUptodate(page) &&              /* Uptodate? */
 317             !PagePrivate(page) &&               /* i/o request already? */
 318             pglen &&                            /* valid bytes of file? */
 319             (end < pglen || offset))            /* replace all valid bytes? */
 320                 return 1;
 321         return 0;
 322 }
 323
 324 /*
 325  * This does the "real" work of the write. We must allocate and lock the
 326  * page to be sent back to the generic routine, which then copies the
 327  * data from user space.
 328  *
 329  * If the writer ends up delaying the write, the writer needs to
 330  * increment the page use counts until he is done with the page.
 331  */
 332 static int nfs_write_begin(struct file *file, struct address_space *mapping,
 333                         loff_t pos, unsigned len, unsigned flags,
 334                         struct page **pagep, void **fsdata)
 335 {
 336         int ret;
 337         pgoff_t index = pos >> PAGE_CACHE_SHIFT;
 338         struct page *page;
 339         int once_thru = 0;
 340
 341         dfprintk(PAGECACHE, "NFS: write_begin(%s/%s(%ld), %u@%lld)\n",
 342                 file->f_path.dentry->d_parent->d_name.name,
 343                 file->f_path.dentry->d_name.name,
 344                 mapping->host->i_ino, len, (long long) pos);
 345
 346 start:
 347         /*
 348          * Prevent starvation issues if someone is doing a consistency
 349          * sync-to-disk
 350          */
 351         ret = wait_on_bit(&NFS_I(mapping->host)->flags, NFS_INO_FLUSHING,
 352                         nfs_wait_bit_killable, TASK_KILLABLE);
 353         if (ret)
 354                 return ret;
 355
 356         page = grab_cache_page_write_begin(mapping, index, flags);
 357         if (!page)
 358                 return -ENOMEM;
 359         *pagep = page;
 360
 361         ret = nfs_flush_incompatible(file, page);
 362         if (ret) {
 363                 unlock_page(page);
 364                 page_cache_release(page);
 365         } else if (!once_thru &&
 366                    nfs_want_read_modify_write(file, page, pos, len)) {
 367                 once_thru = 1;
 368                 ret = nfs_readpage(file, page);
 369                 page_cache_release(page);
 370                 if (!ret)
 371                         goto start;
 372         }
 373         return ret;
 374 }
 375
 376 static int nfs_write_end(struct file *file, struct address_space *mapping,
 377                         loff_t pos, unsigned len, unsigned copied,
 378                         struct page *page, void *fsdata)
 379 {
 380         unsigned offset = pos & (PAGE_CACHE_SIZE - 1);
 381         int status;
 382
 383         dfprintk(PAGECACHE, "NFS: write_end(%s/%s(%ld), %u@%lld)\n",
 384                 file->f_path.dentry->d_parent->d_name.name,
 385                 file->f_path.dentry->d_name.name,
 386                 mapping->host->i_ino, len, (long long) pos);
 387
 388         /*
 389          * Zero any uninitialised parts of the page, and then mark the page
 390          * as up to date if it turns out that we're extending the file.
 391          */
 392         if (!PageUptodate(page)) {
 393                 unsigned pglen = nfs_page_length(page);
 394                 unsigned end = offset + len;
 395
 396                 if (pglen == 0) {
 397                         zero_user_segments(page, 0, offset,
 398                                         end, PAGE_CACHE_SIZE);
 399                         SetPageUptodate(page);
 400                 } else if (end >= pglen) {
 401                         zero_user_segment(page, end, PAGE_CACHE_SIZE);
 402                         if (offset == 0)
 403                                 SetPageUptodate(page);
 404                 } else
 405                         zero_user_segment(page, pglen, PAGE_CACHE_SIZE);
 406         }
 407
 408         status = nfs_updatepage(file, page, offset, copied);
 409
 410         unlock_page(page);
 411         page_cache_release(page);
 412
 413         if (status < 0)
 414                 return status;
 415         NFS_I(mapping->host)->write_io += copied;
 416         return copied;
 417 }
 418
 419 /*
 420  * Partially or wholly invalidate a page
 421  * - Release the private state associated with a page if undergoing complete
 422  *   page invalidation
 423  * - Called if either PG_private or PG_fscache is set on the page
 424  * - Caller holds page lock
 425  */
 426 static void nfs_invalidate_page(struct page *page, unsigned long offset)
 427 {
 428         dfprintk(PAGECACHE, "NFS: invalidate_page(%p, %lu)\n", page, offset);
 429
 430         if (offset != 0)
 431                 return;
 432         /* Cancel any unstarted writes on this page */
 433         nfs_wb_page_cancel(page->mapping->host, page);
 434
 435         nfs_fscache_invalidate_page(page, page->mapping->host);
 436 }
 437
 438 /*
 439  * Attempt to release the private state associated with a page
 440  * - Called if either PG_private or PG_fscache is set on the page
 441  * - Caller holds page lock
 442  * - Return true (may release page) or false (may not)
 443  */
 444 static int nfs_release_page(struct page *page, gfp_t gfp)
 445 {
 446         struct address_space *mapping = page->mapping;
 447
 448         dfprintk(PAGECACHE, "NFS: release_page(%p)\n", page);
 449
 450         /* Only do I/O if gfp is a superset of GFP_KERNEL */
 451         if (mapping && (gfp & GFP_KERNEL) == GFP_KERNEL) {
 452                 int how = FLUSH_SYNC;
 453
 454                 /* Don't let kswapd deadlock waiting for OOM RPC calls */
 455                 if (current_is_kswapd())
 456                         how = 0;
 457                 nfs_commit_inode(mapping->host, how);
 458         }
 459         /* If PagePrivate() is set, then the page is not freeable */
 460         if (PagePrivate(page))
 461                 return 0;
 462         return nfs_fscache_release_page(page, gfp);
 463 }
 464
 465 /*
 466  * Attempt to clear the private state associated with a page when an error
 467  * occurs that requires the cached contents of an inode to be written back or
 468  * destroyed
 469  * - Called if either PG_private or fscache is set on the page
 470  * - Caller holds page lock
 471  * - Return 0 if successful, -error otherwise
 472  */
 473 static int nfs_launder_page(struct page *page)
 474 {
 475         struct inode *inode = page->mapping->host;
 476         struct nfs_inode *nfsi = NFS_I(inode);
 477
 478         dfprintk(PAGECACHE, "NFS: launder_page(%ld, %llu)\n",
 479                 inode->i_ino, (long long)page_offset(page));
 480
 481         nfs_fscache_wait_on_page_write(nfsi, page);
 482         return nfs_wb_page(inode, page);
 483 }
 484
 485 const struct address_space_operations nfs_file_aops = {
 486         .readpage = nfs_readpage,
 487         .readpages = nfs_readpages,
 488         .set_page_dirty = __set_page_dirty_nobuffers,
 489         .writepage = nfs_writepage,
 490         .writepages = nfs_writepages,
 491         .write_begin = nfs_write_begin,
 492         .write_end = nfs_write_end,
 493         .invalidatepage = nfs_invalidate_page,
 494         .releasepage = nfs_release_page,
 495         .direct_IO = nfs_direct_IO,
 496         .migratepage = nfs_migrate_page,
 497         .launder_page = nfs_launder_page,
 498         .error_remove_page = generic_error_remove_page,
 499 };
 500
 501 /*
 502  * Notification that a PTE pointing to an NFS page is about to be made
 503  * writable, implying that someone is about to modify the page through a
 504  * shared-writable mapping
 505  */
 506 static int nfs_vm_page_mkwrite(struct vm_area_struct *vma, struct vm_fault *vmf)
 507 {
 508         struct page *page = vmf->page;
 509         struct file *filp = vma->vm_file;
 510         struct dentry *dentry = filp->f_path.dentry;
 511         unsigned pagelen;
 512         int ret = VM_FAULT_NOPAGE;
 513         struct address_space *mapping;
 514
 515         dfprintk(PAGECACHE, "NFS: vm_page_mkwrite(%s/%s(%ld), offset %lld)\n",
 516                 dentry->d_parent->d_name.name, dentry->d_name.name,
 517                 filp->f_mapping->host->i_ino,
 518                 (long long)page_offset(page));
 519
 520         /* make sure the cache has finished storing the page */
 521         nfs_fscache_wait_on_page_write(NFS_I(dentry->d_inode), page);
 522
 523         lock_page(page);
 524         mapping = page->mapping;
 525         if (mapping != dentry->d_inode->i_mapping)
 526                 goto out_unlock;
 527
 528         wait_on_page_writeback(page);
 529
 530         pagelen = nfs_page_length(page);
 531         if (pagelen == 0)
 532                 goto out_unlock;
 533
 534         ret = VM_FAULT_LOCKED;
 535         if (nfs_flush_incompatible(filp, page) == 0 &&
 536             nfs_updatepage(filp, page, 0, pagelen) == 0)
 537                 goto out;
 538
 539         ret = VM_FAULT_SIGBUS;
 540 out_unlock:
 541         unlock_page(page);
 542 out:
 543         return ret;
 544 }
 545
 546 static const struct vm_operations_struct nfs_file_vm_ops = {
 547         .fault = filemap_fault,
 548         .page_mkwrite = nfs_vm_page_mkwrite,
 549 };
 550
 551 static int nfs_need_sync_write(struct file *filp, struct inode *inode)
 552 {
 553         struct nfs_open_context *ctx;
 554
 555         if (IS_SYNC(inode) || (filp->f_flags & O_DSYNC))
 556                 return 1;
 557         ctx = nfs_file_open_context(filp);
 558         if (test_bit(NFS_CONTEXT_ERROR_WRITE, &ctx->flags))
 559                 return 1;
 560         return 0;
 561 }
 562
 563 ssize_t nfs_file_write(struct kiocb *iocb, const struct iovec *iov,
 564                        unsigned long nr_segs, loff_t pos)
 565 {
 566         struct dentry * dentry = iocb->ki_filp->f_path.dentry;
 567         struct inode * inode = dentry->d_inode;
 568         unsigned long written = 0;
 569         ssize_t result;
 570         size_t count = iov_length(iov, nr_segs);
 571
 572         if (iocb->ki_filp->f_flags & O_DIRECT)
 573                 return nfs_file_direct_write(iocb, iov, nr_segs, pos);
 574
 575         dprintk("NFS: write(%s/%s, %lu@%Ld)\n",
 576                 dentry->d_parent->d_name.name, dentry->d_name.name,
 577                 (unsigned long) count, (long long) pos);
 578
 579         result = -EBUSY;
 580         if (IS_SWAPFILE(inode))
 581                 goto out_swapfile;
 582         /*
 583          * O_APPEND implies that we must revalidate the file length.
 584          */
 585         if (iocb->ki_filp->f_flags & O_APPEND) {
 586                 result = nfs_revalidate_file_size(inode, iocb->ki_filp);
 587                 if (result)
 588                         goto out;
 589         }
 590
 591         result = count;
 592         if (!count)
 593                 goto out;
 594
 595         result = generic_file_aio_write(iocb, iov, nr_segs, pos);
 596         if (result > 0)
 597                 written = result;
 598
 599         /* Return error values for O_DSYNC and IS_SYNC() */
 600         if (result >= 0 && nfs_need_sync_write(iocb->ki_filp, inode)) {
 601                 int err = vfs_fsync(iocb->ki_filp, 0);
 602                 if (err < 0)
 603                         result = err;
 604         }
 605         if (result > 0)
 606                 nfs_add_stats(inode, NFSIOS_NORMALWRITTENBYTES, written);
 607 out:
 608         return result;
 609
 610 out_swapfile:
 611         printk(KERN_INFO "NFS: attempt to write to active swap file!\n");
 612         goto out;
 613 }
 614
 615 ssize_t nfs_file_splice_write(struct pipe_inode_info *pipe,
 616                               struct file *filp, loff_t *ppos,
 617                               size_t count, unsigned int flags)
 618 {
 619         struct dentry *dentry = filp->f_path.dentry;
 620         struct inode *inode = dentry->d_inode;
 621         unsigned long written = 0;
 622         ssize_t ret;
 623
 624         dprintk("NFS splice_write(%s/%s, %lu@%llu)\n",
 625                 dentry->d_parent->d_name.name, dentry->d_name.name,
 626                 (unsigned long) count, (unsigned long long) *ppos);
 627
 628         /*
 629          * The combination of splice and an O_APPEND destination is disallowed.
 630          */
 631
 632         ret = generic_file_splice_write(pipe, filp, ppos, count, flags);
 633         if (ret > 0)
 634                 written = ret;
 635
 636         if (ret >= 0 && nfs_need_sync_write(filp, inode)) {
 637                 int err = vfs_fsync(filp, 0);
 638                 if (err < 0)
 639                         ret = err;
 640         }
 641         if (ret > 0)
 642                 nfs_add_stats(inode, NFSIOS_NORMALWRITTENBYTES, written);
 643         return ret;
 644 }
 645
 646 static int
 647 do_getlk(struct file *filp, int cmd, struct file_lock *fl, int is_local)
 648 {
 649         struct inode *inode = filp->f_mapping->host;
 650         int status = 0;
 651         unsigned int saved_type = fl->fl_type;
 652
 653         /* Try local locking first */
 654         posix_test_lock(filp, fl);
 655         if (fl->fl_type != F_UNLCK) {
 656                 /* found a conflict */
 657                 goto out;
 658         }
 659         fl->fl_type = saved_type;
 660
 661         if (NFS_PROTO(inode)->have_delegation(inode, FMODE_READ))
 662                 goto out_noconflict;
 663
 664         if (is_local)
 665                 goto out_noconflict;
 666
 667         status = NFS_PROTO(inode)->lock(filp, cmd, fl);
 668 out:
 669         return status;
 670 out_noconflict:
 671         fl->fl_type = F_UNLCK;
 672         goto out;
 673 }
 674
 675 static int do_vfs_lock(struct file *file, struct file_lock *fl)
 676 {
 677         int res = 0;
 678         switch (fl->fl_flags & (FL_POSIX|FL_FLOCK)) {
 679                 case FL_POSIX:
 680                         res = posix_lock_file_wait(file, fl);
 681                         break;
 682                 case FL_FLOCK:
 683                         res = flock_lock_file_wait(file, fl);
 684                         break;
 685                 default:
 686                         BUG();
 687         }
 688         return res;
 689 }
 690
 691 static int
 692 do_unlk(struct file *filp, int cmd, struct file_lock *fl, int is_local)
 693 {
 694         struct inode *inode = filp->f_mapping->host;
 695         int status;
 696
 697         /*
 698          * Flush all pending writes before doing anything
 699          * with locks..
 700          */
 701         nfs_sync_mapping(filp->f_mapping);
 702
 703         /* NOTE: special case
 704          *      If we're signalled while cleaning up locks on process exit, we
 705          *      still need to complete the unlock.
 706          */
 707         /*
 708          * Use local locking if mounted with "-onolock" or with appropriate
 709          * "-olocal_lock="
 710          */
 711         if (!is_local)
 712                 status = NFS_PROTO(inode)->lock(filp, cmd, fl);
 713         else
 714                 status = do_vfs_lock(filp, fl);
 715         return status;
 716 }
 717
 718 static int
 719 is_time_granular(struct timespec *ts) {
 720         return ((ts->tv_sec == 0) && (ts->tv_nsec <= 1000));
 721 }
 722
 723 static int
 724 do_setlk(struct file *filp, int cmd, struct file_lock *fl, int is_local)
 725 {
 726         struct inode *inode = filp->f_mapping->host;
 727         int status;
 728
 729         /*
 730          * Flush all pending writes before doing anything
 731          * with locks..
 732          */
 733         status = nfs_sync_mapping(filp->f_mapping);
 734         if (status != 0)
 735                 goto out;
 736
 737         /*
 738          * Use local locking if mounted with "-onolock" or with appropriate
 739          * "-olocal_lock="
 740          */
 741         if (!is_local)
 742                 status = NFS_PROTO(inode)->lock(filp, cmd, fl);
 743         else
 744                 status = do_vfs_lock(filp, fl);
 745         if (status < 0)
 746                 goto out;
 747
 748         /*
 749          * Revalidate the cache if the server has time stamps granular
 750          * enough to detect subsecond changes.  Otherwise, clear the
 751          * cache to prevent missing any changes.
 752          *
 753          * This makes locking act as a cache coherency point.
 754          */
 755         nfs_sync_mapping(filp->f_mapping);
 756         if (!NFS_PROTO(inode)->have_delegation(inode, FMODE_READ)) {
 757                 if (is_time_granular(&NFS_SERVER(inode)->time_delta))
 758                         __nfs_revalidate_inode(NFS_SERVER(inode), inode);
 759                 else
 760                         nfs_zap_caches(inode);
 761         }
 762 out:
 763         return status;
 764 }
 765
 766 /*
 767  * Lock a (portion of) a file
 768  */
 769 int nfs_lock(struct file *filp, int cmd, struct file_lock *fl)
 770 {
 771         struct inode *inode = filp->f_mapping->host;
 772         int ret = -ENOLCK;
 773         int is_local = 0;
 774
 775         dprintk("NFS: lock(%s/%s, t=%x, fl=%x, r=%lld:%lld)\n",
 776                         filp->f_path.dentry->d_parent->d_name.name,
 777                         filp->f_path.dentry->d_name.name,
 778                         fl->fl_type, fl->fl_flags,
 779                         (long long)fl->fl_start, (long long)fl->fl_end);
 780
 781         nfs_inc_stats(inode, NFSIOS_VFSLOCK);
 782
 783         /* No mandatory locks over NFS */
 784         if (__mandatory_lock(inode) && fl->fl_type != F_UNLCK)
 785                 goto out_err;
 786
 787         if (NFS_SERVER(inode)->flags & NFS_MOUNT_LOCAL_FCNTL)
 788                 is_local = 1;
 789
 790         if (NFS_PROTO(inode)->lock_check_bounds != NULL) {
 791                 ret = NFS_PROTO(inode)->lock_check_bounds(fl);
 792                 if (ret < 0)
 793                         goto out_err;
 794         }
 795
 796         if (IS_GETLK(cmd))
 797                 ret = do_getlk(filp, cmd, fl, is_local);
 798         else if (fl->fl_type == F_UNLCK)
 799                 ret = do_unlk(filp, cmd, fl, is_local);
 800         else
 801                 ret = do_setlk(filp, cmd, fl, is_local);
 802 out_err:
 803         return ret;
 804 }
 805
 806 /*
 807  * Lock a (portion of) a file
 808  */
 809 int nfs_flock(struct file *filp, int cmd, struct file_lock *fl)
 810 {
 811         struct inode *inode = filp->f_mapping->host;
 812         int is_local = 0;
 813
 814         dprintk("NFS: flock(%s/%s, t=%x, fl=%x)\n",
 815                         filp->f_path.dentry->d_parent->d_name.name,
 816                         filp->f_path.dentry->d_name.name,
 817                         fl->fl_type, fl->fl_flags);
 818
 819         if (!(fl->fl_flags & FL_FLOCK))
 820                 return -ENOLCK;
 821
 822         if (NFS_SERVER(inode)->flags & NFS_MOUNT_LOCAL_FLOCK)
 823                 is_local = 1;
 824
 825         /* We're simulating flock() locks using posix locks on the server */
 826         fl->fl_owner = (fl_owner_t)filp;
 827         fl->fl_start = 0;
 828         fl->fl_end = OFFSET_MAX;
 829
 830         if (fl->fl_type == F_UNLCK)
 831                 return do_unlk(filp, cmd, fl, is_local);
 832         return do_setlk(filp, cmd, fl, is_local);
 833 }
 834
 835 /*
 836  * There is no protocol support for leases, so we have no way to implement
 837  * them correctly in the face of opens by other clients.
 838  */
 839 int nfs_setlease(struct file *file, long arg, struct file_lock **fl)
 840 {
 841         dprintk("NFS: setlease(%s/%s, arg=%ld)\n",
 842                         file->f_path.dentry->d_parent->d_name.name,
 843                         file->f_path.dentry->d_name.name, arg);
 844         return -EINVAL;
 845 }
 846
 847 const struct file_operations nfs_file_operations = {
 848         .llseek         = nfs_file_llseek,
 849         .read           = do_sync_read,
 850         .write          = do_sync_write,
 851         .aio_read       = nfs_file_read,
 852         .aio_write      = nfs_file_write,
 853         .mmap           = nfs_file_mmap,
 854         .open           = nfs_file_open,
 855         .flush          = nfs_file_flush,
 856         .release        = nfs_file_release,
 857         .fsync          = nfs_file_fsync,
 858         .lock           = nfs_lock,
 859         .flock          = nfs_flock,
 860         .splice_read    = nfs_file_splice_read,
 861         .splice_write   = nfs_file_splice_write,
 862         .check_flags    = nfs_check_flags,
 863         .setlease       = nfs_setlease,
 864 };