file.c 22.8 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_file_mapping(page)->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
	/* Only do I/O if gfp is a superset of GFP_KERNEL */
451 452 453 454 455 456 457 458
	if (mapping && (gfp & GFP_KERNEL) == GFP_KERNEL) {
		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);
	}
459
	/* If PagePrivate() is set, then the page is not freeable */
D
David Howells 已提交
460 461 462
	if (PagePrivate(page))
		return 0;
	return nfs_fscache_release_page(page, gfp);
463 464
}

465 466 467 468
/*
 * 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 已提交
469
 * - Called if either PG_private or fscache is set on the page
470 471 472
 * - Caller holds page lock
 * - Return 0 if successful, -error otherwise
 */
473 474
static int nfs_launder_page(struct page *page)
{
475
	struct inode *inode = page_file_mapping(page)->host;
D
David Howells 已提交
476
	struct nfs_inode *nfsi = NFS_I(inode);
477 478 479 480

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

D
David Howells 已提交
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 = {
L
Linus Torvalds 已提交
486 487
	.readpage = nfs_readpage,
	.readpages = nfs_readpages,
T
Trond Myklebust 已提交
488
	.set_page_dirty = __set_page_dirty_nobuffers,
L
Linus Torvalds 已提交
489 490
	.writepage = nfs_writepage,
	.writepages = nfs_writepages,
N
Nick Piggin 已提交
491 492
	.write_begin = nfs_write_begin,
	.write_end = nfs_write_end,
493 494
	.invalidatepage = nfs_invalidate_page,
	.releasepage = nfs_release_page,
L
Linus Torvalds 已提交
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,
L
Linus Torvalds 已提交
499 500
};

501 502 503 504 505
/*
 * 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
 */
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;
N
Nick Piggin 已提交
513
	struct address_space *mapping;
514

515 516 517 518 519
	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 已提交
520 521 522
	/* make sure the cache has finished storing the page */
	nfs_fscache_wait_on_page_write(NFS_I(dentry->d_inode), page);

523
	lock_page(page);
524
	mapping = page_file_mapping(page);
525
	if (mapping != dentry->d_inode->i_mapping)
526 527
		goto out_unlock;

528 529
	wait_on_page_writeback(page);

530
	pagelen = nfs_page_length(page);
531 532
	if (pagelen == 0)
		goto out_unlock;
N
Nick Piggin 已提交
533

534 535 536 537
	ret = VM_FAULT_LOCKED;
	if (nfs_flush_incompatible(filp, page) == 0 &&
	    nfs_updatepage(filp, page, 0, pagelen) == 0)
		goto out;
538

539
	ret = VM_FAULT_SIGBUS;
540 541
out_unlock:
	unlock_page(page);
542 543
out:
	return ret;
544 545
}

546
static const struct vm_operations_struct nfs_file_vm_ops = {
547 548 549 550
	.fault = filemap_fault,
	.page_mkwrite = nfs_vm_page_mkwrite,
};

551 552 553 554
static int nfs_need_sync_write(struct file *filp, struct inode *inode)
{
	struct nfs_open_context *ctx;

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

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

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

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

	result = -EBUSY;
	if (IS_SWAPFILE(inode))
		goto out_swapfile;
582 583 584 585 586 587 588
	/*
	 * 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;
589
	}
L
Linus Torvalds 已提交
590 591 592 593 594

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

595
	result = generic_file_aio_write(iocb, iov, nr_segs, pos);
596 597 598
	if (result > 0)
		written = result;

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

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

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

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

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

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

661
	if (NFS_PROTO(inode)->have_delegation(inode, FMODE_READ))
662 663
		goto out_noconflict;

664
	if (is_local)
665 666 667 668
		goto out_noconflict;

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

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;
}

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

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

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

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

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

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

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

L
Linus Torvalds 已提交
748
	/*
R
Ricardo Labiaga 已提交
749 750 751 752
	 * 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 已提交
753 754
	 * This makes locking act as a cache coherency point.
	 */
T
Trond Myklebust 已提交
755
	nfs_sync_mapping(filp->f_mapping);
756
	if (!NFS_PROTO(inode)->have_delegation(inode, FMODE_READ)) {
R
Ricardo Labiaga 已提交
757 758 759 760 761
		if (is_time_granular(&NFS_SERVER(inode)->time_delta))
			__nfs_revalidate_inode(NFS_SERVER(inode), inode);
		else
			nfs_zap_caches(inode);
	}
L
Linus Torvalds 已提交
762 763 764 765 766 767 768
out:
	return status;
}

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

C
Chuck Lever 已提交
775 776 777
	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 已提交
778 779
			fl->fl_type, fl->fl_flags,
			(long long)fl->fl_start, (long long)fl->fl_end);
C
Chuck Lever 已提交
780

C
Chuck Lever 已提交
781
	nfs_inc_stats(inode, NFSIOS_VFSLOCK);
L
Linus Torvalds 已提交
782 783

	/* No mandatory locks over NFS */
784
	if (__mandatory_lock(inode) && fl->fl_type != F_UNLCK)
785 786
		goto out_err;

787 788 789
	if (NFS_SERVER(inode)->flags & NFS_MOUNT_LOCAL_FCNTL)
		is_local = 1;

790 791 792 793 794
	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 已提交
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 803
out_err:
	return ret;
L
Linus Torvalds 已提交
804 805 806 807 808
}

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

C
Chuck Lever 已提交
814 815 816
	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 已提交
817 818 819 820 821
			fl->fl_type, fl->fl_flags);

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

822 823 824
	if (NFS_SERVER(inode)->flags & NFS_MOUNT_LOCAL_FLOCK)
		is_local = 1;

L
Linus Torvalds 已提交
825 826 827 828 829 830
	/* 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)
831 832
		return do_unlk(filp, cmd, fl, is_local);
	return do_setlk(filp, cmd, fl, is_local);
L
Linus Torvalds 已提交
833
}
J
J. Bruce Fields 已提交
834

C
Chuck Lever 已提交
835 836 837 838
/*
 * There is no protocol support for leases, so we have no way to implement
 * them correctly in the face of opens by other clients.
 */
839
int nfs_setlease(struct file *file, long arg, struct file_lock **fl)
J
J. Bruce Fields 已提交
840
{
C
Chuck Lever 已提交
841 842 843
	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 已提交
844 845
	return -EINVAL;
}
846

847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864
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,
};