file.c 22.9 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
/*
 *  linux/fs/nfs/file.c
 *
 *  Copyright (C) 1992  Rick Sladkey
 *
 *  Changes Copyright (C) 1994 by Florian La Roche
 *   - Do not copy data too often around in the kernel.
 *   - In nfs_file_read the return value of kmalloc wasn't checked.
 *   - Put in a better version of read look-ahead buffering. Original idea
 *     and implementation by Wai S Kok elekokws@ee.nus.sg.
 *
 *  Expire cache on write to a file by Wai S Kok (Oct 1994).
 *
 *  Total rewrite of read side for new NFS buffer cache.. Linus.
 *
 *  nfs regular file handling functions
 */

#include <linux/time.h>
#include <linux/kernel.h>
#include <linux/errno.h>
#include <linux/fcntl.h>
#include <linux/stat.h>
#include <linux/nfs_fs.h>
#include <linux/nfs_mount.h>
#include <linux/mm.h>
#include <linux/pagemap.h>
A
Alexey Dobriyan 已提交
28
#include <linux/aio.h>
29
#include <linux/gfp.h>
30
#include <linux/swap.h>
L
Linus Torvalds 已提交
31 32 33 34

#include <asm/uaccess.h>

#include "delegation.h"
35
#include "internal.h"
C
Chuck Lever 已提交
36
#include "iostat.h"
D
David Howells 已提交
37
#include "fscache.h"
L
Linus Torvalds 已提交
38 39 40

#define NFSDBG_FACILITY		NFSDBG_FILE

41
static const struct vm_operations_struct nfs_file_vm_ops;
42

L
Linus Torvalds 已提交
43 44 45 46 47
/* Hack for future NFS swap support */
#ifndef IS_SWAPFILE
# define IS_SWAPFILE(inode)	(0)
#endif

48
int nfs_check_flags(int flags)
L
Linus Torvalds 已提交
49 50 51 52 53 54 55 56 57 58 59 60 61 62 63
{
	if ((flags & (O_APPEND | O_DIRECT)) == (O_APPEND | O_DIRECT))
		return -EINVAL;

	return 0;
}

/*
 * Open file
 */
static int
nfs_file_open(struct inode *inode, struct file *filp)
{
	int res;

C
Chuck Lever 已提交
64
	dprintk("NFS: open file(%s/%s)\n",
65 66 67
			filp->f_path.dentry->d_parent->d_name.name,
			filp->f_path.dentry->d_name.name);

68
	nfs_inc_stats(inode, NFSIOS_VFSOPEN);
L
Linus Torvalds 已提交
69 70 71 72
	res = nfs_check_flags(filp->f_flags);
	if (res)
		return res;

73
	res = nfs_open(inode, filp);
L
Linus Torvalds 已提交
74 75 76
	return res;
}

77
int
L
Linus Torvalds 已提交
78 79
nfs_file_release(struct inode *inode, struct file *filp)
{
C
Chuck Lever 已提交
80
	dprintk("NFS: release(%s/%s)\n",
81 82
			filp->f_path.dentry->d_parent->d_name.name,
			filp->f_path.dentry->d_name.name);
C
Chuck Lever 已提交
83

C
Chuck Lever 已提交
84
	nfs_inc_stats(inode, NFSIOS_VFSRELEASE);
85
	return nfs_release(inode, filp);
L
Linus Torvalds 已提交
86 87
}

88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103
/**
 * nfs_revalidate_size - Revalidate the file size
 * @inode - pointer to inode struct
 * @file - pointer to struct file
 *
 * Revalidates the file length. This is basically a wrapper around
 * nfs_revalidate_inode() that takes into account the fact that we may
 * have cached writes (in which case we don't care about the server's
 * idea of what the file length is), or O_DIRECT (in which case we
 * shouldn't trust the cache).
 */
static int nfs_revalidate_file_size(struct inode *inode, struct file *filp)
{
	struct nfs_server *server = NFS_SERVER(inode);
	struct nfs_inode *nfsi = NFS_I(inode);

104 105 106
	if (nfs_have_delegated_attributes(inode))
		goto out_noreval;

107 108
	if (filp->f_flags & O_DIRECT)
		goto force_reval;
109 110 111 112 113 114
	if (nfsi->cache_validity & NFS_INO_REVAL_PAGECACHE)
		goto force_reval;
	if (nfs_attribute_timeout(inode))
		goto force_reval;
out_noreval:
	return 0;
115 116 117 118
force_reval:
	return __nfs_revalidate_inode(server, inode);
}

119
loff_t nfs_file_llseek(struct file *filp, loff_t offset, int origin)
120
{
C
Chuck Lever 已提交
121
	dprintk("NFS: llseek file(%s/%s, %lld, %d)\n",
122 123 124 125
			filp->f_path.dentry->d_parent->d_name.name,
			filp->f_path.dentry->d_name.name,
			offset, origin);

126 127 128 129
	/*
	 * origin == SEEK_END || SEEK_DATA || SEEK_HOLE => we must revalidate
	 * the cached file length
	 */
130
	if (origin != SEEK_SET && origin != SEEK_CUR) {
131
		struct inode *inode = filp->f_mapping->host;
T
Trond Myklebust 已提交
132

133 134 135
		int retval = nfs_revalidate_file_size(inode, filp);
		if (retval < 0)
			return (loff_t)retval;
136
	}
T
Trond Myklebust 已提交
137

138
	return generic_file_llseek(filp, offset, origin);
139 140
}

L
Linus Torvalds 已提交
141 142 143
/*
 * Flush all dirty pages, and check for write errors.
 */
144
int
145
nfs_file_flush(struct file *file, fl_owner_t id)
L
Linus Torvalds 已提交
146
{
C
Chuck Lever 已提交
147 148
	struct dentry	*dentry = file->f_path.dentry;
	struct inode	*inode = dentry->d_inode;
L
Linus Torvalds 已提交
149

C
Chuck Lever 已提交
150 151 152
	dprintk("NFS: flush(%s/%s)\n",
			dentry->d_parent->d_name.name,
			dentry->d_name.name);
L
Linus Torvalds 已提交
153

154
	nfs_inc_stats(inode, NFSIOS_VFSFLUSH);
L
Linus Torvalds 已提交
155 156
	if ((file->f_mode & FMODE_WRITE) == 0)
		return 0;
157

158 159 160 161
	/*
	 * If we're holding a write delegation, then just start the i/o
	 * but don't wait for completion (or send a commit).
	 */
162
	if (NFS_PROTO(inode)->have_delegation(inode, FMODE_WRITE))
163 164
		return filemap_fdatawrite(file->f_mapping);

T
Trond Myklebust 已提交
165
	/* Flush writes to the server and return any errors */
T
Trond Myklebust 已提交
166
	return vfs_fsync(file, 0);
L
Linus Torvalds 已提交
167 168
}

169
ssize_t
170 171
nfs_file_read(struct kiocb *iocb, const struct iovec *iov,
		unsigned long nr_segs, loff_t pos)
L
Linus Torvalds 已提交
172
{
173
	struct dentry * dentry = iocb->ki_filp->f_path.dentry;
L
Linus Torvalds 已提交
174 175 176 177
	struct inode * inode = dentry->d_inode;
	ssize_t result;

	if (iocb->ki_filp->f_flags & O_DIRECT)
178
		return nfs_file_direct_read(iocb, iov, nr_segs, pos);
L
Linus Torvalds 已提交
179

C
Chuck Lever 已提交
180
	dprintk("NFS: read(%s/%s, %lu@%lu)\n",
L
Linus Torvalds 已提交
181
		dentry->d_parent->d_name.name, dentry->d_name.name,
182
		(unsigned long) iov_length(iov, nr_segs), (unsigned long) pos);
L
Linus Torvalds 已提交
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 188 189
		if (result > 0)
			nfs_add_stats(inode, NFSIOS_NORMALREADBYTES, result);
	}
L
Linus Torvalds 已提交
190 191 192
	return result;
}

193
ssize_t
194 195 196
nfs_file_splice_read(struct file *filp, loff_t *ppos,
		     struct pipe_inode_info *pipe, size_t count,
		     unsigned int flags)
L
Linus Torvalds 已提交
197
{
198
	struct dentry *dentry = filp->f_path.dentry;
L
Linus Torvalds 已提交
199 200 201
	struct inode *inode = dentry->d_inode;
	ssize_t res;

C
Chuck Lever 已提交
202
	dprintk("NFS: splice_read(%s/%s, %lu@%Lu)\n",
L
Linus Torvalds 已提交
203 204 205
		dentry->d_parent->d_name.name, dentry->d_name.name,
		(unsigned long) count, (unsigned long long) *ppos);

206
	res = nfs_revalidate_mapping(inode, filp->f_mapping);
207
	if (!res) {
208
		res = generic_file_splice_read(filp, ppos, pipe, count, flags);
209 210 211
		if (res > 0)
			nfs_add_stats(inode, NFSIOS_NORMALREADBYTES, res);
	}
L
Linus Torvalds 已提交
212 213 214
	return res;
}

215
int
L
Linus Torvalds 已提交
216 217
nfs_file_mmap(struct file * file, struct vm_area_struct * vma)
{
218
	struct dentry *dentry = file->f_path.dentry;
L
Linus Torvalds 已提交
219 220 221
	struct inode *inode = dentry->d_inode;
	int	status;

C
Chuck Lever 已提交
222
	dprintk("NFS: mmap(%s/%s)\n",
L
Linus Torvalds 已提交
223 224
		dentry->d_parent->d_name.name, dentry->d_name.name);

225 226 227 228
	/* Note: generic_file_mmap() returns ENOSYS on nommu systems
	 *       so we call that before revalidating the mapping
	 */
	status = generic_file_mmap(file, vma);
229 230
	if (!status) {
		vma->vm_ops = &nfs_file_vm_ops;
231
		status = nfs_revalidate_mapping(inode, file->f_mapping);
232
	}
L
Linus Torvalds 已提交
233 234 235 236 237 238 239
	return status;
}

/*
 * Flush any dirty pages for this process, and check for write errors.
 * The return status from this call provides a reliable indication of
 * whether any write errors occurred for this process.
T
Trond Myklebust 已提交
240 241 242 243 244
 *
 * Notice that it clears the NFS_CONTEXT_ERROR_WRITE before synching to
 * disk, but it retrieves and clears ctx->error after synching, despite
 * the two being set at the same time in nfs_context_set_write_error().
 * This is because the former is used to notify the _next_ call to
L
Lucas De Marchi 已提交
245
 * nfs_file_write() that a write error occurred, and hence cause it to
T
Trond Myklebust 已提交
246
 * fall back to doing a synchronous write.
L
Linus Torvalds 已提交
247
 */
248
int
249
nfs_file_fsync_commit(struct file *file, loff_t start, loff_t end, int datasync)
L
Linus Torvalds 已提交
250
{
251
	struct dentry *dentry = file->f_path.dentry;
252
	struct nfs_open_context *ctx = nfs_file_open_context(file);
L
Linus Torvalds 已提交
253
	struct inode *inode = dentry->d_inode;
T
Trond Myklebust 已提交
254 255 256
	int have_error, status;
	int ret = 0;

C
Chuck Lever 已提交
257
	dprintk("NFS: fsync file(%s/%s) datasync %d\n",
258 259
			dentry->d_parent->d_name.name, dentry->d_name.name,
			datasync);
L
Linus Torvalds 已提交
260

C
Chuck Lever 已提交
261
	nfs_inc_stats(inode, NFSIOS_VFSFSYNC);
T
Trond Myklebust 已提交
262 263
	have_error = test_and_clear_bit(NFS_CONTEXT_ERROR_WRITE, &ctx->flags);
	status = nfs_commit_inode(inode, FLUSH_SYNC);
264 265
	if (status >= 0 && ret < 0)
		status = ret;
T
Trond Myklebust 已提交
266 267 268
	have_error |= test_bit(NFS_CONTEXT_ERROR_WRITE, &ctx->flags);
	if (have_error)
		ret = xchg(&ctx->error, 0);
269
	if (!ret && status < 0)
T
Trond Myklebust 已提交
270
		ret = status;
271 272 273 274 275 276 277 278 279 280 281 282
	return ret;
}

static int
nfs_file_fsync(struct file *file, loff_t start, loff_t end, int datasync)
{
	int ret;
	struct inode *inode = file->f_path.dentry->d_inode;

	ret = filemap_write_and_wait_range(inode->i_mapping, start, end);
	mutex_lock(&inode->i_mutex);
	ret = nfs_file_fsync_commit(file, start, end, datasync);
283
	mutex_unlock(&inode->i_mutex);
284

T
Trond Myklebust 已提交
285
	return ret;
L
Linus Torvalds 已提交
286 287
}

288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323
/*
 * Decide whether a read/modify/write cycle may be more efficient
 * then a modify/write/read cycle when writing to a page in the
 * page cache.
 *
 * The modify/write/read cycle may occur if a page is read before
 * being completely filled by the writer.  In this situation, the
 * page must be completely written to stable storage on the server
 * before it can be refilled by reading in the page from the server.
 * This can lead to expensive, small, FILE_SYNC mode writes being
 * done.
 *
 * It may be more efficient to read the page first if the file is
 * open for reading in addition to writing, the page is not marked
 * as Uptodate, it is not dirty or waiting to be committed,
 * indicating that it was previously allocated and then modified,
 * that there were valid bytes of data in that range of the file,
 * and that the new data won't completely replace the old data in
 * that range of the file.
 */
static int nfs_want_read_modify_write(struct file *file, struct page *page,
			loff_t pos, unsigned len)
{
	unsigned int pglen = nfs_page_length(page);
	unsigned int offset = pos & (PAGE_CACHE_SIZE - 1);
	unsigned int end = offset + len;

	if ((file->f_mode & FMODE_READ) &&	/* open for read? */
	    !PageUptodate(page) &&		/* Uptodate? */
	    !PagePrivate(page) &&		/* i/o request already? */
	    pglen &&				/* valid bytes of file? */
	    (end < pglen || offset))		/* replace all valid bytes? */
		return 1;
	return 0;
}

L
Linus Torvalds 已提交
324
/*
N
Nick Piggin 已提交
325 326 327
 * This does the "real" work of the write. We must allocate and lock the
 * page to be sent back to the generic routine, which then copies the
 * data from user space.
L
Linus Torvalds 已提交
328 329 330 331
 *
 * If the writer ends up delaying the write, the writer needs to
 * increment the page use counts until he is done with the page.
 */
N
Nick Piggin 已提交
332 333 334
static int nfs_write_begin(struct file *file, struct address_space *mapping,
			loff_t pos, unsigned len, unsigned flags,
			struct page **pagep, void **fsdata)
L
Linus Torvalds 已提交
335
{
N
Nick Piggin 已提交
336
	int ret;
337
	pgoff_t index = pos >> PAGE_CACHE_SHIFT;
N
Nick Piggin 已提交
338
	struct page *page;
339
	int once_thru = 0;
N
Nick Piggin 已提交
340

341 342 343 344 345
	dfprintk(PAGECACHE, "NFS: write_begin(%s/%s(%ld), %u@%lld)\n",
		file->f_path.dentry->d_parent->d_name.name,
		file->f_path.dentry->d_name.name,
		mapping->host->i_ino, len, (long long) pos);

346
start:
347 348 349 350 351 352 353 354 355
	/*
	 * Prevent starvation issues if someone is doing a consistency
	 * sync-to-disk
	 */
	ret = wait_on_bit(&NFS_I(mapping->host)->flags, NFS_INO_FLUSHING,
			nfs_wait_bit_killable, TASK_KILLABLE);
	if (ret)
		return ret;

356
	page = grab_cache_page_write_begin(mapping, index, flags);
N
Nick Piggin 已提交
357 358 359 360 361 362 363 364
	if (!page)
		return -ENOMEM;
	*pagep = page;

	ret = nfs_flush_incompatible(file, page);
	if (ret) {
		unlock_page(page);
		page_cache_release(page);
365 366 367 368 369 370 371
	} else if (!once_thru &&
		   nfs_want_read_modify_write(file, page, pos, len)) {
		once_thru = 1;
		ret = nfs_readpage(file, page);
		page_cache_release(page);
		if (!ret)
			goto start;
N
Nick Piggin 已提交
372 373
	}
	return ret;
L
Linus Torvalds 已提交
374 375
}

N
Nick Piggin 已提交
376 377 378
static int nfs_write_end(struct file *file, struct address_space *mapping,
			loff_t pos, unsigned len, unsigned copied,
			struct page *page, void *fsdata)
L
Linus Torvalds 已提交
379
{
N
Nick Piggin 已提交
380 381
	unsigned offset = pos & (PAGE_CACHE_SIZE - 1);
	int status;
L
Linus Torvalds 已提交
382

383 384 385 386 387
	dfprintk(PAGECACHE, "NFS: write_end(%s/%s(%ld), %u@%lld)\n",
		file->f_path.dentry->d_parent->d_name.name,
		file->f_path.dentry->d_name.name,
		mapping->host->i_ino, len, (long long) pos);

388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407
	/*
	 * Zero any uninitialised parts of the page, and then mark the page
	 * as up to date if it turns out that we're extending the file.
	 */
	if (!PageUptodate(page)) {
		unsigned pglen = nfs_page_length(page);
		unsigned end = offset + len;

		if (pglen == 0) {
			zero_user_segments(page, 0, offset,
					end, PAGE_CACHE_SIZE);
			SetPageUptodate(page);
		} else if (end >= pglen) {
			zero_user_segment(page, end, PAGE_CACHE_SIZE);
			if (offset == 0)
				SetPageUptodate(page);
		} else
			zero_user_segment(page, pglen, PAGE_CACHE_SIZE);
	}

N
Nick Piggin 已提交
408 409 410 411 412
	status = nfs_updatepage(file, page, offset, copied);

	unlock_page(page);
	page_cache_release(page);

C
Chuck Lever 已提交
413 414
	if (status < 0)
		return status;
415
	NFS_I(mapping->host)->write_io += copied;
C
Chuck Lever 已提交
416
	return copied;
L
Linus Torvalds 已提交
417 418
}

419 420 421 422
/*
 * Partially or wholly invalidate a page
 * - Release the private state associated with a page if undergoing complete
 *   page invalidation
D
David Howells 已提交
423
 * - Called if either PG_private or PG_fscache is set on the page
424 425
 * - Caller holds page lock
 */
426
static void nfs_invalidate_page(struct page *page, unsigned long offset)
427
{
428 429
	dfprintk(PAGECACHE, "NFS: invalidate_page(%p, %lu)\n", page, offset);

430 431
	if (offset != 0)
		return;
432
	/* Cancel any unstarted writes on this page */
433
	nfs_wb_page_cancel(page->mapping->host, page);
D
David Howells 已提交
434 435

	nfs_fscache_invalidate_page(page, page->mapping->host);
436 437
}

438 439
/*
 * Attempt to release the private state associated with a page
D
David Howells 已提交
440
 * - Called if either PG_private or PG_fscache is set on the page
441 442 443
 * - Caller holds page lock
 * - Return true (may release page) or false (may not)
 */
444 445
static int nfs_release_page(struct page *page, gfp_t gfp)
{
446 447
	struct address_space *mapping = page->mapping;

448 449
	dfprintk(PAGECACHE, "NFS: release_page(%p)\n", page);

450 451 452 453 454
	/* Only do I/O if gfp is a superset of GFP_KERNEL, and we're not
	 * doing this memory reclaim for a fs-related allocation.
	 */
	if (mapping && (gfp & GFP_KERNEL) == GFP_KERNEL &&
	    !(current->flags & PF_FSTRANS)) {
455 456 457 458 459 460 461
		int how = FLUSH_SYNC;

		/* Don't let kswapd deadlock waiting for OOM RPC calls */
		if (current_is_kswapd())
			how = 0;
		nfs_commit_inode(mapping->host, how);
	}
462
	/* If PagePrivate() is set, then the page is not freeable */
D
David Howells 已提交
463 464 465
	if (PagePrivate(page))
		return 0;
	return nfs_fscache_release_page(page, gfp);
466 467
}

468 469 470 471
/*
 * Attempt to clear the private state associated with a page when an error
 * occurs that requires the cached contents of an inode to be written back or
 * destroyed
D
David Howells 已提交
472
 * - Called if either PG_private or fscache is set on the page
473 474 475
 * - Caller holds page lock
 * - Return 0 if successful, -error otherwise
 */
476 477
static int nfs_launder_page(struct page *page)
{
478
	struct inode *inode = page->mapping->host;
D
David Howells 已提交
479
	struct nfs_inode *nfsi = NFS_I(inode);
480 481 482 483

	dfprintk(PAGECACHE, "NFS: launder_page(%ld, %llu)\n",
		inode->i_ino, (long long)page_offset(page));

D
David Howells 已提交
484
	nfs_fscache_wait_on_page_write(nfsi, page);
485
	return nfs_wb_page(inode, page);
486 487
}

488
const struct address_space_operations nfs_file_aops = {
L
Linus Torvalds 已提交
489 490
	.readpage = nfs_readpage,
	.readpages = nfs_readpages,
T
Trond Myklebust 已提交
491
	.set_page_dirty = __set_page_dirty_nobuffers,
L
Linus Torvalds 已提交
492 493
	.writepage = nfs_writepage,
	.writepages = nfs_writepages,
N
Nick Piggin 已提交
494 495
	.write_begin = nfs_write_begin,
	.write_end = nfs_write_end,
496 497
	.invalidatepage = nfs_invalidate_page,
	.releasepage = nfs_release_page,
L
Linus Torvalds 已提交
498
	.direct_IO = nfs_direct_IO,
499
	.migratepage = nfs_migrate_page,
500
	.launder_page = nfs_launder_page,
501
	.error_remove_page = generic_error_remove_page,
L
Linus Torvalds 已提交
502 503
};

504 505 506 507 508
/*
 * Notification that a PTE pointing to an NFS page is about to be made
 * writable, implying that someone is about to modify the page through a
 * shared-writable mapping
 */
509
static int nfs_vm_page_mkwrite(struct vm_area_struct *vma, struct vm_fault *vmf)
510
{
511
	struct page *page = vmf->page;
512
	struct file *filp = vma->vm_file;
513
	struct dentry *dentry = filp->f_path.dentry;
514
	unsigned pagelen;
515
	int ret = VM_FAULT_NOPAGE;
N
Nick Piggin 已提交
516
	struct address_space *mapping;
517

518 519 520 521 522
	dfprintk(PAGECACHE, "NFS: vm_page_mkwrite(%s/%s(%ld), offset %lld)\n",
		dentry->d_parent->d_name.name, dentry->d_name.name,
		filp->f_mapping->host->i_ino,
		(long long)page_offset(page));

D
David Howells 已提交
523 524 525
	/* make sure the cache has finished storing the page */
	nfs_fscache_wait_on_page_write(NFS_I(dentry->d_inode), page);

526
	lock_page(page);
N
Nick Piggin 已提交
527
	mapping = page->mapping;
528
	if (mapping != dentry->d_inode->i_mapping)
529 530
		goto out_unlock;

531 532
	wait_on_page_writeback(page);

533
	pagelen = nfs_page_length(page);
534 535
	if (pagelen == 0)
		goto out_unlock;
N
Nick Piggin 已提交
536

537 538 539 540
	ret = VM_FAULT_LOCKED;
	if (nfs_flush_incompatible(filp, page) == 0 &&
	    nfs_updatepage(filp, page, 0, pagelen) == 0)
		goto out;
541

542
	ret = VM_FAULT_SIGBUS;
543 544
out_unlock:
	unlock_page(page);
545 546
out:
	return ret;
547 548
}

549
static const struct vm_operations_struct nfs_file_vm_ops = {
550 551 552 553
	.fault = filemap_fault,
	.page_mkwrite = nfs_vm_page_mkwrite,
};

554 555 556 557
static int nfs_need_sync_write(struct file *filp, struct inode *inode)
{
	struct nfs_open_context *ctx;

558
	if (IS_SYNC(inode) || (filp->f_flags & O_DSYNC))
559
		return 1;
560
	ctx = nfs_file_open_context(filp);
561 562 563 564 565
	if (test_bit(NFS_CONTEXT_ERROR_WRITE, &ctx->flags))
		return 1;
	return 0;
}

566 567
ssize_t nfs_file_write(struct kiocb *iocb, const struct iovec *iov,
		       unsigned long nr_segs, loff_t pos)
L
Linus Torvalds 已提交
568
{
569
	struct dentry * dentry = iocb->ki_filp->f_path.dentry;
L
Linus Torvalds 已提交
570
	struct inode * inode = dentry->d_inode;
571
	unsigned long written = 0;
L
Linus Torvalds 已提交
572
	ssize_t result;
573
	size_t count = iov_length(iov, nr_segs);
L
Linus Torvalds 已提交
574 575

	if (iocb->ki_filp->f_flags & O_DIRECT)
576
		return nfs_file_direct_write(iocb, iov, nr_segs, pos);
L
Linus Torvalds 已提交
577

C
Chuck Lever 已提交
578
	dprintk("NFS: write(%s/%s, %lu@%Ld)\n",
L
Linus Torvalds 已提交
579
		dentry->d_parent->d_name.name, dentry->d_name.name,
C
Chuck Lever 已提交
580
		(unsigned long) count, (long long) pos);
L
Linus Torvalds 已提交
581 582 583 584

	result = -EBUSY;
	if (IS_SWAPFILE(inode))
		goto out_swapfile;
585 586 587 588 589 590 591
	/*
	 * O_APPEND implies that we must revalidate the file length.
	 */
	if (iocb->ki_filp->f_flags & O_APPEND) {
		result = nfs_revalidate_file_size(inode, iocb->ki_filp);
		if (result)
			goto out;
592
	}
L
Linus Torvalds 已提交
593 594 595 596 597

	result = count;
	if (!count)
		goto out;

598
	result = generic_file_aio_write(iocb, iov, nr_segs, pos);
599 600 601
	if (result > 0)
		written = result;

602
	/* Return error values for O_DSYNC and IS_SYNC() */
603
	if (result >= 0 && nfs_need_sync_write(iocb->ki_filp, inode)) {
T
Trond Myklebust 已提交
604
		int err = vfs_fsync(iocb->ki_filp, 0);
T
Trond Myklebust 已提交
605 606 607
		if (err < 0)
			result = err;
	}
608 609
	if (result > 0)
		nfs_add_stats(inode, NFSIOS_NORMALWRITTENBYTES, written);
L
Linus Torvalds 已提交
610 611 612 613 614 615 616 617
out:
	return result;

out_swapfile:
	printk(KERN_INFO "NFS: attempt to write to active swap file!\n");
	goto out;
}

618 619 620
ssize_t nfs_file_splice_write(struct pipe_inode_info *pipe,
			      struct file *filp, loff_t *ppos,
			      size_t count, unsigned int flags)
621 622 623
{
	struct dentry *dentry = filp->f_path.dentry;
	struct inode *inode = dentry->d_inode;
624
	unsigned long written = 0;
625 626 627 628 629 630 631 632 633 634 635
	ssize_t ret;

	dprintk("NFS splice_write(%s/%s, %lu@%llu)\n",
		dentry->d_parent->d_name.name, dentry->d_name.name,
		(unsigned long) count, (unsigned long long) *ppos);

	/*
	 * The combination of splice and an O_APPEND destination is disallowed.
	 */

	ret = generic_file_splice_write(pipe, filp, ppos, count, flags);
636 637 638
	if (ret > 0)
		written = ret;

639
	if (ret >= 0 && nfs_need_sync_write(filp, inode)) {
T
Trond Myklebust 已提交
640
		int err = vfs_fsync(filp, 0);
641 642 643
		if (err < 0)
			ret = err;
	}
644 645
	if (ret > 0)
		nfs_add_stats(inode, NFSIOS_NORMALWRITTENBYTES, written);
646 647 648
	return ret;
}

649 650
static int
do_getlk(struct file *filp, int cmd, struct file_lock *fl, int is_local)
L
Linus Torvalds 已提交
651 652 653
{
	struct inode *inode = filp->f_mapping->host;
	int status = 0;
654
	unsigned int saved_type = fl->fl_type;
L
Linus Torvalds 已提交
655

656
	/* Try local locking first */
657 658 659
	posix_test_lock(filp, fl);
	if (fl->fl_type != F_UNLCK) {
		/* found a conflict */
660
		goto out;
L
Linus Torvalds 已提交
661
	}
662
	fl->fl_type = saved_type;
663

664
	if (NFS_PROTO(inode)->have_delegation(inode, FMODE_READ))
665 666
		goto out_noconflict;

667
	if (is_local)
668 669 670 671
		goto out_noconflict;

	status = NFS_PROTO(inode)->lock(filp, cmd, fl);
out:
L
Linus Torvalds 已提交
672
	return status;
673 674 675
out_noconflict:
	fl->fl_type = F_UNLCK;
	goto out;
L
Linus Torvalds 已提交
676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693
}

static int do_vfs_lock(struct file *file, struct file_lock *fl)
{
	int res = 0;
	switch (fl->fl_flags & (FL_POSIX|FL_FLOCK)) {
		case FL_POSIX:
			res = posix_lock_file_wait(file, fl);
			break;
		case FL_FLOCK:
			res = flock_lock_file_wait(file, fl);
			break;
		default:
			BUG();
	}
	return res;
}

694 695
static int
do_unlk(struct file *filp, int cmd, struct file_lock *fl, int is_local)
L
Linus Torvalds 已提交
696 697 698 699 700 701 702 703
{
	struct inode *inode = filp->f_mapping->host;
	int status;

	/*
	 * Flush all pending writes before doing anything
	 * with locks..
	 */
T
Trond Myklebust 已提交
704
	nfs_sync_mapping(filp->f_mapping);
L
Linus Torvalds 已提交
705 706 707 708 709

	/* NOTE: special case
	 * 	If we're signalled while cleaning up locks on process exit, we
	 * 	still need to complete the unlock.
	 */
710 711 712 713 714
	/*
	 * Use local locking if mounted with "-onolock" or with appropriate
	 * "-olocal_lock="
	 */
	if (!is_local)
L
Linus Torvalds 已提交
715 716 717 718 719 720
		status = NFS_PROTO(inode)->lock(filp, cmd, fl);
	else
		status = do_vfs_lock(filp, fl);
	return status;
}

R
Ricardo Labiaga 已提交
721 722 723 724 725
static int
is_time_granular(struct timespec *ts) {
	return ((ts->tv_sec == 0) && (ts->tv_nsec <= 1000));
}

726 727
static int
do_setlk(struct file *filp, int cmd, struct file_lock *fl, int is_local)
L
Linus Torvalds 已提交
728 729 730 731 732 733 734 735
{
	struct inode *inode = filp->f_mapping->host;
	int status;

	/*
	 * Flush all pending writes before doing anything
	 * with locks..
	 */
T
Trond Myklebust 已提交
736 737
	status = nfs_sync_mapping(filp->f_mapping);
	if (status != 0)
L
Linus Torvalds 已提交
738 739
		goto out;

740 741 742 743 744
	/*
	 * Use local locking if mounted with "-onolock" or with appropriate
	 * "-olocal_lock="
	 */
	if (!is_local)
L
Linus Torvalds 已提交
745
		status = NFS_PROTO(inode)->lock(filp, cmd, fl);
746
	else
L
Linus Torvalds 已提交
747 748 749
		status = do_vfs_lock(filp, fl);
	if (status < 0)
		goto out;
R
Ricardo Labiaga 已提交
750

L
Linus Torvalds 已提交
751
	/*
R
Ricardo Labiaga 已提交
752 753 754 755
	 * Revalidate the cache if the server has time stamps granular
	 * enough to detect subsecond changes.  Otherwise, clear the
	 * cache to prevent missing any changes.
	 *
L
Linus Torvalds 已提交
756 757
	 * This makes locking act as a cache coherency point.
	 */
T
Trond Myklebust 已提交
758
	nfs_sync_mapping(filp->f_mapping);
759
	if (!NFS_PROTO(inode)->have_delegation(inode, FMODE_READ)) {
R
Ricardo Labiaga 已提交
760 761 762 763 764
		if (is_time_granular(&NFS_SERVER(inode)->time_delta))
			__nfs_revalidate_inode(NFS_SERVER(inode), inode);
		else
			nfs_zap_caches(inode);
	}
L
Linus Torvalds 已提交
765 766 767 768 769 770 771
out:
	return status;
}

/*
 * Lock a (portion of) a file
 */
772
int nfs_lock(struct file *filp, int cmd, struct file_lock *fl)
L
Linus Torvalds 已提交
773
{
C
Chuck Lever 已提交
774
	struct inode *inode = filp->f_mapping->host;
775
	int ret = -ENOLCK;
776
	int is_local = 0;
L
Linus Torvalds 已提交
777

C
Chuck Lever 已提交
778 779 780
	dprintk("NFS: lock(%s/%s, t=%x, fl=%x, r=%lld:%lld)\n",
			filp->f_path.dentry->d_parent->d_name.name,
			filp->f_path.dentry->d_name.name,
L
Linus Torvalds 已提交
781 782
			fl->fl_type, fl->fl_flags,
			(long long)fl->fl_start, (long long)fl->fl_end);
C
Chuck Lever 已提交
783

C
Chuck Lever 已提交
784
	nfs_inc_stats(inode, NFSIOS_VFSLOCK);
L
Linus Torvalds 已提交
785 786

	/* No mandatory locks over NFS */
787
	if (__mandatory_lock(inode) && fl->fl_type != F_UNLCK)
788 789
		goto out_err;

790 791 792
	if (NFS_SERVER(inode)->flags & NFS_MOUNT_LOCAL_FCNTL)
		is_local = 1;

793 794 795 796 797
	if (NFS_PROTO(inode)->lock_check_bounds != NULL) {
		ret = NFS_PROTO(inode)->lock_check_bounds(fl);
		if (ret < 0)
			goto out_err;
	}
L
Linus Torvalds 已提交
798 799

	if (IS_GETLK(cmd))
800
		ret = do_getlk(filp, cmd, fl, is_local);
801
	else if (fl->fl_type == F_UNLCK)
802
		ret = do_unlk(filp, cmd, fl, is_local);
803
	else
804
		ret = do_setlk(filp, cmd, fl, is_local);
805 806
out_err:
	return ret;
L
Linus Torvalds 已提交
807 808 809 810 811
}

/*
 * Lock a (portion of) a file
 */
812
int nfs_flock(struct file *filp, int cmd, struct file_lock *fl)
L
Linus Torvalds 已提交
813
{
814 815 816
	struct inode *inode = filp->f_mapping->host;
	int is_local = 0;

C
Chuck Lever 已提交
817 818 819
	dprintk("NFS: flock(%s/%s, t=%x, fl=%x)\n",
			filp->f_path.dentry->d_parent->d_name.name,
			filp->f_path.dentry->d_name.name,
L
Linus Torvalds 已提交
820 821 822 823 824
			fl->fl_type, fl->fl_flags);

	if (!(fl->fl_flags & FL_FLOCK))
		return -ENOLCK;

825 826 827
	if (NFS_SERVER(inode)->flags & NFS_MOUNT_LOCAL_FLOCK)
		is_local = 1;

L
Linus Torvalds 已提交
828 829 830 831 832 833
	/* We're simulating flock() locks using posix locks on the server */
	fl->fl_owner = (fl_owner_t)filp;
	fl->fl_start = 0;
	fl->fl_end = OFFSET_MAX;

	if (fl->fl_type == F_UNLCK)
834 835
		return do_unlk(filp, cmd, fl, is_local);
	return do_setlk(filp, cmd, fl, is_local);
L
Linus Torvalds 已提交
836
}
J
J. Bruce Fields 已提交
837

C
Chuck Lever 已提交
838 839 840 841
/*
 * There is no protocol support for leases, so we have no way to implement
 * them correctly in the face of opens by other clients.
 */
842
int nfs_setlease(struct file *file, long arg, struct file_lock **fl)
J
J. Bruce Fields 已提交
843
{
C
Chuck Lever 已提交
844 845 846
	dprintk("NFS: setlease(%s/%s, arg=%ld)\n",
			file->f_path.dentry->d_parent->d_name.name,
			file->f_path.dentry->d_name.name, arg);
J
J. Bruce Fields 已提交
847 848
	return -EINVAL;
}
849

850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867
const struct file_operations nfs_file_operations = {
	.llseek		= nfs_file_llseek,
	.read		= do_sync_read,
	.write		= do_sync_write,
	.aio_read	= nfs_file_read,
	.aio_write	= nfs_file_write,
	.mmap		= nfs_file_mmap,
	.open		= nfs_file_open,
	.flush		= nfs_file_flush,
	.release	= nfs_file_release,
	.fsync		= nfs_file_fsync,
	.lock		= nfs_lock,
	.flock		= nfs_flock,
	.splice_read	= nfs_file_splice_read,
	.splice_write	= nfs_file_splice_write,
	.check_flags	= nfs_check_flags,
	.setlease	= nfs_setlease,
};