NFS: Convert nfs_write_begin/end to use folios
[linux-2.6-block.git] / fs / nfs / file.c
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  *  linux/fs/nfs/file.c
4  *
5  *  Copyright (C) 1992  Rick Sladkey
6  *
7  *  Changes Copyright (C) 1994 by Florian La Roche
8  *   - Do not copy data too often around in the kernel.
9  *   - In nfs_file_read the return value of kmalloc wasn't checked.
10  *   - Put in a better version of read look-ahead buffering. Original idea
11  *     and implementation by Wai S Kok elekokws@ee.nus.sg.
12  *
13  *  Expire cache on write to a file by Wai S Kok (Oct 1994).
14  *
15  *  Total rewrite of read side for new NFS buffer cache.. Linus.
16  *
17  *  nfs regular file handling functions
18  */
19
20 #include <linux/module.h>
21 #include <linux/time.h>
22 #include <linux/kernel.h>
23 #include <linux/errno.h>
24 #include <linux/fcntl.h>
25 #include <linux/stat.h>
26 #include <linux/nfs_fs.h>
27 #include <linux/nfs_mount.h>
28 #include <linux/mm.h>
29 #include <linux/pagemap.h>
30 #include <linux/gfp.h>
31 #include <linux/swap.h>
32
33 #include <linux/uaccess.h>
34
35 #include "delegation.h"
36 #include "internal.h"
37 #include "iostat.h"
38 #include "fscache.h"
39 #include "pnfs.h"
40
41 #include "nfstrace.h"
42
43 #define NFSDBG_FACILITY         NFSDBG_FILE
44
45 static const struct vm_operations_struct nfs_file_vm_ops;
46
47 int nfs_check_flags(int flags)
48 {
49         if ((flags & (O_APPEND | O_DIRECT)) == (O_APPEND | O_DIRECT))
50                 return -EINVAL;
51
52         return 0;
53 }
54 EXPORT_SYMBOL_GPL(nfs_check_flags);
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(%pD2)\n", filp);
65
66         nfs_inc_stats(inode, NFSIOS_VFSOPEN);
67         res = nfs_check_flags(filp->f_flags);
68         if (res)
69                 return res;
70
71         res = nfs_open(inode, filp);
72         if (res == 0)
73                 filp->f_mode |= FMODE_CAN_ODIRECT;
74         return res;
75 }
76
77 int
78 nfs_file_release(struct inode *inode, struct file *filp)
79 {
80         dprintk("NFS: release(%pD2)\n", filp);
81
82         nfs_inc_stats(inode, NFSIOS_VFSRELEASE);
83         nfs_file_clear_open_context(filp);
84         nfs_fscache_release_file(inode, filp);
85         return 0;
86 }
87 EXPORT_SYMBOL_GPL(nfs_file_release);
88
89 /**
90  * nfs_revalidate_file_size - Revalidate the file size
91  * @inode: pointer to inode struct
92  * @filp: pointer to struct file
93  *
94  * Revalidates the file length. This is basically a wrapper around
95  * nfs_revalidate_inode() that takes into account the fact that we may
96  * have cached writes (in which case we don't care about the server's
97  * idea of what the file length is), or O_DIRECT (in which case we
98  * shouldn't trust the cache).
99  */
100 static int nfs_revalidate_file_size(struct inode *inode, struct file *filp)
101 {
102         struct nfs_server *server = NFS_SERVER(inode);
103
104         if (filp->f_flags & O_DIRECT)
105                 goto force_reval;
106         if (nfs_check_cache_invalid(inode, NFS_INO_INVALID_SIZE))
107                 goto force_reval;
108         return 0;
109 force_reval:
110         return __nfs_revalidate_inode(server, inode);
111 }
112
113 loff_t nfs_file_llseek(struct file *filp, loff_t offset, int whence)
114 {
115         dprintk("NFS: llseek file(%pD2, %lld, %d)\n",
116                         filp, offset, whence);
117
118         /*
119          * whence == SEEK_END || SEEK_DATA || SEEK_HOLE => we must revalidate
120          * the cached file length
121          */
122         if (whence != SEEK_SET && whence != SEEK_CUR) {
123                 struct inode *inode = filp->f_mapping->host;
124
125                 int retval = nfs_revalidate_file_size(inode, filp);
126                 if (retval < 0)
127                         return (loff_t)retval;
128         }
129
130         return generic_file_llseek(filp, offset, whence);
131 }
132 EXPORT_SYMBOL_GPL(nfs_file_llseek);
133
134 /*
135  * Flush all dirty pages, and check for write errors.
136  */
137 static int
138 nfs_file_flush(struct file *file, fl_owner_t id)
139 {
140         struct inode    *inode = file_inode(file);
141         errseq_t since;
142
143         dprintk("NFS: flush(%pD2)\n", file);
144
145         nfs_inc_stats(inode, NFSIOS_VFSFLUSH);
146         if ((file->f_mode & FMODE_WRITE) == 0)
147                 return 0;
148
149         /* Flush writes to the server and return any errors */
150         since = filemap_sample_wb_err(file->f_mapping);
151         nfs_wb_all(inode);
152         return filemap_check_wb_err(file->f_mapping, since);
153 }
154
155 ssize_t
156 nfs_file_read(struct kiocb *iocb, struct iov_iter *to)
157 {
158         struct inode *inode = file_inode(iocb->ki_filp);
159         ssize_t result;
160
161         if (iocb->ki_flags & IOCB_DIRECT)
162                 return nfs_file_direct_read(iocb, to, false);
163
164         dprintk("NFS: read(%pD2, %zu@%lu)\n",
165                 iocb->ki_filp,
166                 iov_iter_count(to), (unsigned long) iocb->ki_pos);
167
168         nfs_start_io_read(inode);
169         result = nfs_revalidate_mapping(inode, iocb->ki_filp->f_mapping);
170         if (!result) {
171                 result = generic_file_read_iter(iocb, to);
172                 if (result > 0)
173                         nfs_add_stats(inode, NFSIOS_NORMALREADBYTES, result);
174         }
175         nfs_end_io_read(inode);
176         return result;
177 }
178 EXPORT_SYMBOL_GPL(nfs_file_read);
179
180 int
181 nfs_file_mmap(struct file * file, struct vm_area_struct * vma)
182 {
183         struct inode *inode = file_inode(file);
184         int     status;
185
186         dprintk("NFS: mmap(%pD2)\n", file);
187
188         /* Note: generic_file_mmap() returns ENOSYS on nommu systems
189          *       so we call that before revalidating the mapping
190          */
191         status = generic_file_mmap(file, vma);
192         if (!status) {
193                 vma->vm_ops = &nfs_file_vm_ops;
194                 status = nfs_revalidate_mapping(inode, file->f_mapping);
195         }
196         return status;
197 }
198 EXPORT_SYMBOL_GPL(nfs_file_mmap);
199
200 /*
201  * Flush any dirty pages for this process, and check for write errors.
202  * The return status from this call provides a reliable indication of
203  * whether any write errors occurred for this process.
204  */
205 static int
206 nfs_file_fsync_commit(struct file *file, int datasync)
207 {
208         struct inode *inode = file_inode(file);
209         int ret, ret2;
210
211         dprintk("NFS: fsync file(%pD2) datasync %d\n", file, datasync);
212
213         nfs_inc_stats(inode, NFSIOS_VFSFSYNC);
214         ret = nfs_commit_inode(inode, FLUSH_SYNC);
215         ret2 = file_check_and_advance_wb_err(file);
216         if (ret2 < 0)
217                 return ret2;
218         return ret;
219 }
220
221 int
222 nfs_file_fsync(struct file *file, loff_t start, loff_t end, int datasync)
223 {
224         struct inode *inode = file_inode(file);
225         struct nfs_inode *nfsi = NFS_I(inode);
226         long save_nredirtied = atomic_long_read(&nfsi->redirtied_pages);
227         long nredirtied;
228         int ret;
229
230         trace_nfs_fsync_enter(inode);
231
232         for (;;) {
233                 ret = file_write_and_wait_range(file, start, end);
234                 if (ret != 0)
235                         break;
236                 ret = nfs_file_fsync_commit(file, datasync);
237                 if (ret != 0)
238                         break;
239                 ret = pnfs_sync_inode(inode, !!datasync);
240                 if (ret != 0)
241                         break;
242                 nredirtied = atomic_long_read(&nfsi->redirtied_pages);
243                 if (nredirtied == save_nredirtied)
244                         break;
245                 save_nredirtied = nredirtied;
246         }
247
248         trace_nfs_fsync_exit(inode, ret);
249         return ret;
250 }
251 EXPORT_SYMBOL_GPL(nfs_file_fsync);
252
253 /*
254  * Decide whether a read/modify/write cycle may be more efficient
255  * then a modify/write/read cycle when writing to a page in the
256  * page cache.
257  *
258  * Some pNFS layout drivers can only read/write at a certain block
259  * granularity like all block devices and therefore we must perform
260  * read/modify/write whenever a page hasn't read yet and the data
261  * to be written there is not aligned to a block boundary and/or
262  * smaller than the block size.
263  *
264  * The modify/write/read cycle may occur if a page is read before
265  * being completely filled by the writer.  In this situation, the
266  * page must be completely written to stable storage on the server
267  * before it can be refilled by reading in the page from the server.
268  * This can lead to expensive, small, FILE_SYNC mode writes being
269  * done.
270  *
271  * It may be more efficient to read the page first if the file is
272  * open for reading in addition to writing, the page is not marked
273  * as Uptodate, it is not dirty or waiting to be committed,
274  * indicating that it was previously allocated and then modified,
275  * that there were valid bytes of data in that range of the file,
276  * and that the new data won't completely replace the old data in
277  * that range of the file.
278  */
279 static bool nfs_folio_is_full_write(struct folio *folio, loff_t pos,
280                                     unsigned int len)
281 {
282         unsigned int pglen = nfs_folio_length(folio);
283         unsigned int offset = offset_in_folio(folio, pos);
284         unsigned int end = offset + len;
285
286         return !pglen || (end >= pglen && !offset);
287 }
288
289 static bool nfs_want_read_modify_write(struct file *file, struct folio *folio,
290                                        loff_t pos, unsigned int len)
291 {
292         /*
293          * Up-to-date pages, those with ongoing or full-page write
294          * don't need read/modify/write
295          */
296         if (folio_test_uptodate(folio) || folio_test_private(folio) ||
297             nfs_folio_is_full_write(folio, pos, len))
298                 return false;
299
300         if (pnfs_ld_read_whole_page(file_inode(file)))
301                 return true;
302         /* Open for reading too? */
303         if (file->f_mode & FMODE_READ)
304                 return true;
305         return false;
306 }
307
308 static struct folio *
309 nfs_folio_grab_cache_write_begin(struct address_space *mapping, pgoff_t index)
310 {
311         unsigned fgp_flags = FGP_LOCK | FGP_WRITE | FGP_CREAT | FGP_STABLE;
312
313         return __filemap_get_folio(mapping, index, fgp_flags,
314                                    mapping_gfp_mask(mapping));
315 }
316
317 /*
318  * This does the "real" work of the write. We must allocate and lock the
319  * page to be sent back to the generic routine, which then copies the
320  * data from user space.
321  *
322  * If the writer ends up delaying the write, the writer needs to
323  * increment the page use counts until he is done with the page.
324  */
325 static int nfs_write_begin(struct file *file, struct address_space *mapping,
326                            loff_t pos, unsigned len, struct page **pagep,
327                            void **fsdata)
328 {
329         struct folio *folio;
330         int once_thru = 0;
331         int ret;
332
333         dfprintk(PAGECACHE, "NFS: write_begin(%pD2(%lu), %u@%lld)\n",
334                 file, mapping->host->i_ino, len, (long long) pos);
335
336 start:
337         folio = nfs_folio_grab_cache_write_begin(mapping, pos >> PAGE_SHIFT);
338         if (!folio)
339                 return -ENOMEM;
340         *pagep = &folio->page;
341
342         ret = nfs_flush_incompatible(file, folio);
343         if (ret) {
344                 folio_unlock(folio);
345                 folio_put(folio);
346         } else if (!once_thru &&
347                    nfs_want_read_modify_write(file, folio, pos, len)) {
348                 once_thru = 1;
349                 ret = nfs_read_folio(file, folio);
350                 folio_put(folio);
351                 if (!ret)
352                         goto start;
353         }
354         return ret;
355 }
356
357 static int nfs_write_end(struct file *file, struct address_space *mapping,
358                          loff_t pos, unsigned len, unsigned copied,
359                          struct page *page, void *fsdata)
360 {
361         struct nfs_open_context *ctx = nfs_file_open_context(file);
362         struct folio *folio = page_folio(page);
363         unsigned offset = offset_in_folio(folio, pos);
364         int status;
365
366         dfprintk(PAGECACHE, "NFS: write_end(%pD2(%lu), %u@%lld)\n",
367                 file, mapping->host->i_ino, len, (long long) pos);
368
369         /*
370          * Zero any uninitialised parts of the page, and then mark the page
371          * as up to date if it turns out that we're extending the file.
372          */
373         if (!folio_test_uptodate(folio)) {
374                 size_t fsize = folio_size(folio);
375                 unsigned pglen = nfs_folio_length(folio);
376                 unsigned end = offset + copied;
377
378                 if (pglen == 0) {
379                         folio_zero_segments(folio, 0, offset, end, fsize);
380                         folio_mark_uptodate(folio);
381                 } else if (end >= pglen) {
382                         folio_zero_segment(folio, end, fsize);
383                         if (offset == 0)
384                                 folio_mark_uptodate(folio);
385                 } else
386                         folio_zero_segment(folio, pglen, fsize);
387         }
388
389         status = nfs_update_folio(file, folio, offset, copied);
390
391         folio_unlock(folio);
392         folio_put(folio);
393
394         if (status < 0)
395                 return status;
396         NFS_I(mapping->host)->write_io += copied;
397
398         if (nfs_ctx_key_to_expire(ctx, mapping->host))
399                 nfs_wb_all(mapping->host);
400
401         return copied;
402 }
403
404 /*
405  * Partially or wholly invalidate a page
406  * - Release the private state associated with a page if undergoing complete
407  *   page invalidation
408  * - Called if either PG_private or PG_fscache is set on the page
409  * - Caller holds page lock
410  */
411 static void nfs_invalidate_folio(struct folio *folio, size_t offset,
412                                 size_t length)
413 {
414         dfprintk(PAGECACHE, "NFS: invalidate_folio(%lu, %zu, %zu)\n",
415                  folio->index, offset, length);
416
417         if (offset != 0 || length < folio_size(folio))
418                 return;
419         /* Cancel any unstarted writes on this page */
420         nfs_wb_folio_cancel(folio->mapping->host, folio);
421         folio_wait_fscache(folio);
422 }
423
424 /*
425  * Attempt to release the private state associated with a folio
426  * - Called if either private or fscache flags are set on the folio
427  * - Caller holds folio lock
428  * - Return true (may release folio) or false (may not)
429  */
430 static bool nfs_release_folio(struct folio *folio, gfp_t gfp)
431 {
432         dfprintk(PAGECACHE, "NFS: release_folio(%p)\n", folio);
433
434         /* If the private flag is set, then the folio is not freeable */
435         if (folio_test_private(folio))
436                 return false;
437         return nfs_fscache_release_folio(folio, gfp);
438 }
439
440 static void nfs_check_dirty_writeback(struct folio *folio,
441                                 bool *dirty, bool *writeback)
442 {
443         struct nfs_inode *nfsi;
444         struct address_space *mapping = folio->mapping;
445
446         /*
447          * Check if an unstable folio is currently being committed and
448          * if so, have the VM treat it as if the folio is under writeback
449          * so it will not block due to folios that will shortly be freeable.
450          */
451         nfsi = NFS_I(mapping->host);
452         if (atomic_read(&nfsi->commit_info.rpcs_out)) {
453                 *writeback = true;
454                 return;
455         }
456
457         /*
458          * If the private flag is set, then the folio is not freeable
459          * and as the inode is not being committed, it's not going to
460          * be cleaned in the near future so treat it as dirty
461          */
462         if (folio_test_private(folio))
463                 *dirty = true;
464 }
465
466 /*
467  * Attempt to clear the private state associated with a page when an error
468  * occurs that requires the cached contents of an inode to be written back or
469  * destroyed
470  * - Called if either PG_private or fscache is set on the page
471  * - Caller holds page lock
472  * - Return 0 if successful, -error otherwise
473  */
474 static int nfs_launder_folio(struct folio *folio)
475 {
476         struct inode *inode = folio->mapping->host;
477
478         dfprintk(PAGECACHE, "NFS: launder_folio(%ld, %llu)\n",
479                 inode->i_ino, folio_pos(folio));
480
481         folio_wait_fscache(folio);
482         return nfs_wb_folio(inode, folio);
483 }
484
485 static int nfs_swap_activate(struct swap_info_struct *sis, struct file *file,
486                                                 sector_t *span)
487 {
488         unsigned long blocks;
489         long long isize;
490         int ret;
491         struct inode *inode = file_inode(file);
492         struct rpc_clnt *clnt = NFS_CLIENT(inode);
493         struct nfs_client *cl = NFS_SERVER(inode)->nfs_client;
494
495         spin_lock(&inode->i_lock);
496         blocks = inode->i_blocks;
497         isize = inode->i_size;
498         spin_unlock(&inode->i_lock);
499         if (blocks*512 < isize) {
500                 pr_warn("swap activate: swapfile has holes\n");
501                 return -EINVAL;
502         }
503
504         ret = rpc_clnt_swap_activate(clnt);
505         if (ret)
506                 return ret;
507         ret = add_swap_extent(sis, 0, sis->max, 0);
508         if (ret < 0) {
509                 rpc_clnt_swap_deactivate(clnt);
510                 return ret;
511         }
512
513         *span = sis->pages;
514
515         if (cl->rpc_ops->enable_swap)
516                 cl->rpc_ops->enable_swap(inode);
517
518         sis->flags |= SWP_FS_OPS;
519         return ret;
520 }
521
522 static void nfs_swap_deactivate(struct file *file)
523 {
524         struct inode *inode = file_inode(file);
525         struct rpc_clnt *clnt = NFS_CLIENT(inode);
526         struct nfs_client *cl = NFS_SERVER(inode)->nfs_client;
527
528         rpc_clnt_swap_deactivate(clnt);
529         if (cl->rpc_ops->disable_swap)
530                 cl->rpc_ops->disable_swap(file_inode(file));
531 }
532
533 const struct address_space_operations nfs_file_aops = {
534         .read_folio = nfs_read_folio,
535         .readahead = nfs_readahead,
536         .dirty_folio = filemap_dirty_folio,
537         .writepage = nfs_writepage,
538         .writepages = nfs_writepages,
539         .write_begin = nfs_write_begin,
540         .write_end = nfs_write_end,
541         .invalidate_folio = nfs_invalidate_folio,
542         .release_folio = nfs_release_folio,
543         .migrate_folio = nfs_migrate_folio,
544         .launder_folio = nfs_launder_folio,
545         .is_dirty_writeback = nfs_check_dirty_writeback,
546         .error_remove_page = generic_error_remove_page,
547         .swap_activate = nfs_swap_activate,
548         .swap_deactivate = nfs_swap_deactivate,
549         .swap_rw = nfs_swap_rw,
550 };
551
552 /*
553  * Notification that a PTE pointing to an NFS page is about to be made
554  * writable, implying that someone is about to modify the page through a
555  * shared-writable mapping
556  */
557 static vm_fault_t nfs_vm_page_mkwrite(struct vm_fault *vmf)
558 {
559         struct page *page = vmf->page;
560         struct file *filp = vmf->vma->vm_file;
561         struct inode *inode = file_inode(filp);
562         unsigned pagelen;
563         vm_fault_t ret = VM_FAULT_NOPAGE;
564         struct address_space *mapping;
565         struct folio *folio = page_folio(page);
566
567         dfprintk(PAGECACHE, "NFS: vm_page_mkwrite(%pD2(%lu), offset %lld)\n",
568                 filp, filp->f_mapping->host->i_ino,
569                 (long long)page_offset(page));
570
571         sb_start_pagefault(inode->i_sb);
572
573         /* make sure the cache has finished storing the page */
574         if (PageFsCache(page) &&
575             wait_on_page_fscache_killable(vmf->page) < 0) {
576                 ret = VM_FAULT_RETRY;
577                 goto out;
578         }
579
580         wait_on_bit_action(&NFS_I(inode)->flags, NFS_INO_INVALIDATING,
581                            nfs_wait_bit_killable,
582                            TASK_KILLABLE|TASK_FREEZABLE_UNSAFE);
583
584         lock_page(page);
585         mapping = page_file_mapping(page);
586         if (mapping != inode->i_mapping)
587                 goto out_unlock;
588
589         wait_on_page_writeback(page);
590
591         pagelen = nfs_page_length(page);
592         if (pagelen == 0)
593                 goto out_unlock;
594
595         ret = VM_FAULT_LOCKED;
596         if (nfs_flush_incompatible(filp, folio) == 0 &&
597             nfs_update_folio(filp, folio, 0, pagelen) == 0)
598                 goto out;
599
600         ret = VM_FAULT_SIGBUS;
601 out_unlock:
602         unlock_page(page);
603 out:
604         sb_end_pagefault(inode->i_sb);
605         return ret;
606 }
607
608 static const struct vm_operations_struct nfs_file_vm_ops = {
609         .fault = filemap_fault,
610         .map_pages = filemap_map_pages,
611         .page_mkwrite = nfs_vm_page_mkwrite,
612 };
613
614 ssize_t nfs_file_write(struct kiocb *iocb, struct iov_iter *from)
615 {
616         struct file *file = iocb->ki_filp;
617         struct inode *inode = file_inode(file);
618         unsigned int mntflags = NFS_SERVER(inode)->flags;
619         ssize_t result, written;
620         errseq_t since;
621         int error;
622
623         result = nfs_key_timeout_notify(file, inode);
624         if (result)
625                 return result;
626
627         if (iocb->ki_flags & IOCB_DIRECT)
628                 return nfs_file_direct_write(iocb, from, false);
629
630         dprintk("NFS: write(%pD2, %zu@%Ld)\n",
631                 file, iov_iter_count(from), (long long) iocb->ki_pos);
632
633         if (IS_SWAPFILE(inode))
634                 goto out_swapfile;
635         /*
636          * O_APPEND implies that we must revalidate the file length.
637          */
638         if (iocb->ki_flags & IOCB_APPEND || iocb->ki_pos > i_size_read(inode)) {
639                 result = nfs_revalidate_file_size(inode, file);
640                 if (result)
641                         return result;
642         }
643
644         nfs_clear_invalid_mapping(file->f_mapping);
645
646         since = filemap_sample_wb_err(file->f_mapping);
647         nfs_start_io_write(inode);
648         result = generic_write_checks(iocb, from);
649         if (result > 0) {
650                 current->backing_dev_info = inode_to_bdi(inode);
651                 result = generic_perform_write(iocb, from);
652                 current->backing_dev_info = NULL;
653         }
654         nfs_end_io_write(inode);
655         if (result <= 0)
656                 goto out;
657
658         written = result;
659         iocb->ki_pos += written;
660         nfs_add_stats(inode, NFSIOS_NORMALWRITTENBYTES, written);
661
662         if (mntflags & NFS_MOUNT_WRITE_EAGER) {
663                 result = filemap_fdatawrite_range(file->f_mapping,
664                                                   iocb->ki_pos - written,
665                                                   iocb->ki_pos - 1);
666                 if (result < 0)
667                         goto out;
668         }
669         if (mntflags & NFS_MOUNT_WRITE_WAIT) {
670                 filemap_fdatawait_range(file->f_mapping,
671                                         iocb->ki_pos - written,
672                                         iocb->ki_pos - 1);
673         }
674         result = generic_write_sync(iocb, written);
675         if (result < 0)
676                 return result;
677
678 out:
679         /* Return error values */
680         error = filemap_check_wb_err(file->f_mapping, since);
681         switch (error) {
682         default:
683                 break;
684         case -EDQUOT:
685         case -EFBIG:
686         case -ENOSPC:
687                 nfs_wb_all(inode);
688                 error = file_check_and_advance_wb_err(file);
689                 if (error < 0)
690                         result = error;
691         }
692         return result;
693
694 out_swapfile:
695         printk(KERN_INFO "NFS: attempt to write to active swap file!\n");
696         return -ETXTBSY;
697 }
698 EXPORT_SYMBOL_GPL(nfs_file_write);
699
700 static int
701 do_getlk(struct file *filp, int cmd, struct file_lock *fl, int is_local)
702 {
703         struct inode *inode = filp->f_mapping->host;
704         int status = 0;
705         unsigned int saved_type = fl->fl_type;
706
707         /* Try local locking first */
708         posix_test_lock(filp, fl);
709         if (fl->fl_type != F_UNLCK) {
710                 /* found a conflict */
711                 goto out;
712         }
713         fl->fl_type = saved_type;
714
715         if (NFS_PROTO(inode)->have_delegation(inode, FMODE_READ))
716                 goto out_noconflict;
717
718         if (is_local)
719                 goto out_noconflict;
720
721         status = NFS_PROTO(inode)->lock(filp, cmd, fl);
722 out:
723         return status;
724 out_noconflict:
725         fl->fl_type = F_UNLCK;
726         goto out;
727 }
728
729 static int
730 do_unlk(struct file *filp, int cmd, struct file_lock *fl, int is_local)
731 {
732         struct inode *inode = filp->f_mapping->host;
733         struct nfs_lock_context *l_ctx;
734         int status;
735
736         /*
737          * Flush all pending writes before doing anything
738          * with locks..
739          */
740         nfs_wb_all(inode);
741
742         l_ctx = nfs_get_lock_context(nfs_file_open_context(filp));
743         if (!IS_ERR(l_ctx)) {
744                 status = nfs_iocounter_wait(l_ctx);
745                 nfs_put_lock_context(l_ctx);
746                 /*  NOTE: special case
747                  *      If we're signalled while cleaning up locks on process exit, we
748                  *      still need to complete the unlock.
749                  */
750                 if (status < 0 && !(fl->fl_flags & FL_CLOSE))
751                         return status;
752         }
753
754         /*
755          * Use local locking if mounted with "-onolock" or with appropriate
756          * "-olocal_lock="
757          */
758         if (!is_local)
759                 status = NFS_PROTO(inode)->lock(filp, cmd, fl);
760         else
761                 status = locks_lock_file_wait(filp, fl);
762         return status;
763 }
764
765 static int
766 do_setlk(struct file *filp, int cmd, struct file_lock *fl, int is_local)
767 {
768         struct inode *inode = filp->f_mapping->host;
769         int status;
770
771         /*
772          * Flush all pending writes before doing anything
773          * with locks..
774          */
775         status = nfs_sync_mapping(filp->f_mapping);
776         if (status != 0)
777                 goto out;
778
779         /*
780          * Use local locking if mounted with "-onolock" or with appropriate
781          * "-olocal_lock="
782          */
783         if (!is_local)
784                 status = NFS_PROTO(inode)->lock(filp, cmd, fl);
785         else
786                 status = locks_lock_file_wait(filp, fl);
787         if (status < 0)
788                 goto out;
789
790         /*
791          * Invalidate cache to prevent missing any changes.  If
792          * the file is mapped, clear the page cache as well so
793          * those mappings will be loaded.
794          *
795          * This makes locking act as a cache coherency point.
796          */
797         nfs_sync_mapping(filp->f_mapping);
798         if (!NFS_PROTO(inode)->have_delegation(inode, FMODE_READ)) {
799                 nfs_zap_caches(inode);
800                 if (mapping_mapped(filp->f_mapping))
801                         nfs_revalidate_mapping(inode, filp->f_mapping);
802         }
803 out:
804         return status;
805 }
806
807 /*
808  * Lock a (portion of) a file
809  */
810 int nfs_lock(struct file *filp, int cmd, struct file_lock *fl)
811 {
812         struct inode *inode = filp->f_mapping->host;
813         int ret = -ENOLCK;
814         int is_local = 0;
815
816         dprintk("NFS: lock(%pD2, t=%x, fl=%x, r=%lld:%lld)\n",
817                         filp, fl->fl_type, fl->fl_flags,
818                         (long long)fl->fl_start, (long long)fl->fl_end);
819
820         nfs_inc_stats(inode, NFSIOS_VFSLOCK);
821
822         if (fl->fl_flags & FL_RECLAIM)
823                 return -ENOGRACE;
824
825         if (NFS_SERVER(inode)->flags & NFS_MOUNT_LOCAL_FCNTL)
826                 is_local = 1;
827
828         if (NFS_PROTO(inode)->lock_check_bounds != NULL) {
829                 ret = NFS_PROTO(inode)->lock_check_bounds(fl);
830                 if (ret < 0)
831                         goto out_err;
832         }
833
834         if (IS_GETLK(cmd))
835                 ret = do_getlk(filp, cmd, fl, is_local);
836         else if (fl->fl_type == F_UNLCK)
837                 ret = do_unlk(filp, cmd, fl, is_local);
838         else
839                 ret = do_setlk(filp, cmd, fl, is_local);
840 out_err:
841         return ret;
842 }
843 EXPORT_SYMBOL_GPL(nfs_lock);
844
845 /*
846  * Lock a (portion of) a file
847  */
848 int nfs_flock(struct file *filp, int cmd, struct file_lock *fl)
849 {
850         struct inode *inode = filp->f_mapping->host;
851         int is_local = 0;
852
853         dprintk("NFS: flock(%pD2, t=%x, fl=%x)\n",
854                         filp, fl->fl_type, fl->fl_flags);
855
856         if (!(fl->fl_flags & FL_FLOCK))
857                 return -ENOLCK;
858
859         if (NFS_SERVER(inode)->flags & NFS_MOUNT_LOCAL_FLOCK)
860                 is_local = 1;
861
862         /* We're simulating flock() locks using posix locks on the server */
863         if (fl->fl_type == F_UNLCK)
864                 return do_unlk(filp, cmd, fl, is_local);
865         return do_setlk(filp, cmd, fl, is_local);
866 }
867 EXPORT_SYMBOL_GPL(nfs_flock);
868
869 const struct file_operations nfs_file_operations = {
870         .llseek         = nfs_file_llseek,
871         .read_iter      = nfs_file_read,
872         .write_iter     = nfs_file_write,
873         .mmap           = nfs_file_mmap,
874         .open           = nfs_file_open,
875         .flush          = nfs_file_flush,
876         .release        = nfs_file_release,
877         .fsync          = nfs_file_fsync,
878         .lock           = nfs_lock,
879         .flock          = nfs_flock,
880         .splice_read    = generic_file_splice_read,
881         .splice_write   = iter_file_splice_write,
882         .check_flags    = nfs_check_flags,
883         .setlease       = simple_nosetlease,
884 };
885 EXPORT_SYMBOL_GPL(nfs_file_operations);