write.c 44.2 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3
/*
 * linux/fs/nfs/write.c
 *
4
 * Write file data over NFS.
L
Linus Torvalds 已提交
5 6 7 8 9 10 11 12 13 14
 *
 * Copyright (C) 1996, 1997, Olaf Kirch <okir@monad.swb.de>
 */

#include <linux/types.h>
#include <linux/slab.h>
#include <linux/mm.h>
#include <linux/pagemap.h>
#include <linux/file.h>
#include <linux/writeback.h>
15
#include <linux/swap.h>
16
#include <linux/migrate.h>
L
Linus Torvalds 已提交
17 18 19 20 21

#include <linux/sunrpc/clnt.h>
#include <linux/nfs_fs.h>
#include <linux/nfs_mount.h>
#include <linux/nfs_page.h>
22 23
#include <linux/backing-dev.h>

L
Linus Torvalds 已提交
24 25 26
#include <asm/uaccess.h>

#include "delegation.h"
27
#include "internal.h"
C
Chuck Lever 已提交
28
#include "iostat.h"
29
#include "nfs4_fs.h"
30
#include "fscache.h"
31
#include "pnfs.h"
L
Linus Torvalds 已提交
32 33 34 35 36 37 38 39 40

#define NFSDBG_FACILITY		NFSDBG_PAGECACHE

#define MIN_POOL_WRITE		(32)
#define MIN_POOL_COMMIT		(4)

/*
 * Local function declarations
 */
41 42
static void nfs_pageio_init_write(struct nfs_pageio_descriptor *desc,
				  struct inode *inode, int ioflags);
43
static void nfs_redirty_request(struct nfs_page *req);
44 45 46
static const struct rpc_call_ops nfs_write_partial_ops;
static const struct rpc_call_ops nfs_write_full_ops;
static const struct rpc_call_ops nfs_commit_ops;
L
Linus Torvalds 已提交
47

48
static struct kmem_cache *nfs_wdata_cachep;
49
static mempool_t *nfs_wdata_mempool;
L
Linus Torvalds 已提交
50 51
static mempool_t *nfs_commit_mempool;

52
struct nfs_write_data *nfs_commitdata_alloc(void)
L
Linus Torvalds 已提交
53
{
C
Christoph Lameter 已提交
54
	struct nfs_write_data *p = mempool_alloc(nfs_commit_mempool, GFP_NOFS);
55

L
Linus Torvalds 已提交
56 57 58 59 60 61
	if (p) {
		memset(p, 0, sizeof(*p));
		INIT_LIST_HEAD(&p->pages);
	}
	return p;
}
62
EXPORT_SYMBOL_GPL(nfs_commitdata_alloc);
L
Linus Torvalds 已提交
63

64
void nfs_commit_free(struct nfs_write_data *p)
L
Linus Torvalds 已提交
65
{
66 67
	if (p && (p->pagevec != &p->page_array[0]))
		kfree(p->pagevec);
L
Linus Torvalds 已提交
68 69
	mempool_free(p, nfs_commit_mempool);
}
70
EXPORT_SYMBOL_GPL(nfs_commit_free);
L
Linus Torvalds 已提交
71

72
struct nfs_write_data *nfs_writedata_alloc(unsigned int pagecount)
73
{
C
Christoph Lameter 已提交
74
	struct nfs_write_data *p = mempool_alloc(nfs_wdata_mempool, GFP_NOFS);
75 76 77 78

	if (p) {
		memset(p, 0, sizeof(*p));
		INIT_LIST_HEAD(&p->pages);
79
		p->npages = pagecount;
80 81
		if (pagecount <= ARRAY_SIZE(p->page_array))
			p->pagevec = p->page_array;
82
		else {
83 84
			p->pagevec = kcalloc(pagecount, sizeof(struct page *), GFP_NOFS);
			if (!p->pagevec) {
85 86 87 88 89 90 91 92
				mempool_free(p, nfs_wdata_mempool);
				p = NULL;
			}
		}
	}
	return p;
}

T
Trond Myklebust 已提交
93
void nfs_writedata_free(struct nfs_write_data *p)
94 95 96 97 98 99
{
	if (p && (p->pagevec != &p->page_array[0]))
		kfree(p->pagevec);
	mempool_free(p, nfs_wdata_mempool);
}

100
void nfs_writedata_release(struct nfs_write_data *wdata)
L
Linus Torvalds 已提交
101
{
102
	put_lseg(wdata->lseg);
103
	put_nfs_open_context(wdata->args.context);
L
Linus Torvalds 已提交
104 105 106
	nfs_writedata_free(wdata);
}

107 108 109 110 111 112 113
static void nfs_context_set_write_error(struct nfs_open_context *ctx, int error)
{
	ctx->error = error;
	smp_wmb();
	set_bit(NFS_CONTEXT_ERROR_WRITE, &ctx->flags);
}

114 115 116 117 118 119 120
static struct nfs_page *nfs_page_find_request_locked(struct page *page)
{
	struct nfs_page *req = NULL;

	if (PagePrivate(page)) {
		req = (struct nfs_page *)page_private(page);
		if (req != NULL)
121
			kref_get(&req->wb_kref);
122 123 124 125 126 127
	}
	return req;
}

static struct nfs_page *nfs_page_find_request(struct page *page)
{
128
	struct inode *inode = page->mapping->host;
129 130
	struct nfs_page *req = NULL;

131
	spin_lock(&inode->i_lock);
132
	req = nfs_page_find_request_locked(page);
133
	spin_unlock(&inode->i_lock);
134 135 136
	return req;
}

L
Linus Torvalds 已提交
137 138 139 140
/* Adjust the file length if we're writing beyond the end */
static void nfs_grow_file(struct page *page, unsigned int offset, unsigned int count)
{
	struct inode *inode = page->mapping->host;
141 142
	loff_t end, i_size;
	pgoff_t end_index;
L
Linus Torvalds 已提交
143

144 145 146
	spin_lock(&inode->i_lock);
	i_size = i_size_read(inode);
	end_index = (i_size - 1) >> PAGE_CACHE_SHIFT;
L
Linus Torvalds 已提交
147
	if (i_size > 0 && page->index < end_index)
148
		goto out;
L
Linus Torvalds 已提交
149 150
	end = ((loff_t)page->index << PAGE_CACHE_SHIFT) + ((loff_t)offset+count);
	if (i_size >= end)
151
		goto out;
L
Linus Torvalds 已提交
152
	i_size_write(inode, end);
153 154 155
	nfs_inc_stats(inode, NFSIOS_EXTENDWRITE);
out:
	spin_unlock(&inode->i_lock);
L
Linus Torvalds 已提交
156 157
}

158 159 160 161 162 163 164
/* A writeback failed: mark the page as bad, and invalidate the page cache */
static void nfs_set_pageerror(struct page *page)
{
	SetPageError(page);
	nfs_zap_mapping(page->mapping->host, page->mapping);
}

L
Linus Torvalds 已提交
165 166 167 168 169 170 171 172 173
/* We can set the PG_uptodate flag if we see that a write request
 * covers the full page.
 */
static void nfs_mark_uptodate(struct page *page, unsigned int base, unsigned int count)
{
	if (PageUptodate(page))
		return;
	if (base != 0)
		return;
174
	if (count != nfs_page_length(page))
L
Linus Torvalds 已提交
175
		return;
176
	SetPageUptodate(page);
L
Linus Torvalds 已提交
177 178 179 180 181
}

static int wb_priority(struct writeback_control *wbc)
{
	if (wbc->for_reclaim)
182
		return FLUSH_HIGHPRI | FLUSH_STABLE;
183
	if (wbc->for_kupdate || wbc->for_background)
184 185
		return FLUSH_LOWPRI | FLUSH_COND_STABLE;
	return FLUSH_COND_STABLE;
L
Linus Torvalds 已提交
186 187
}

188 189 190 191 192 193 194 195 196 197
/*
 * NFS congestion control
 */

int nfs_congestion_kb;

#define NFS_CONGESTION_ON_THRESH 	(nfs_congestion_kb >> (PAGE_SHIFT-10))
#define NFS_CONGESTION_OFF_THRESH	\
	(NFS_CONGESTION_ON_THRESH - (NFS_CONGESTION_ON_THRESH >> 2))

198
static int nfs_set_page_writeback(struct page *page)
199
{
200 201 202
	int ret = test_set_page_writeback(page);

	if (!ret) {
203 204 205
		struct inode *inode = page->mapping->host;
		struct nfs_server *nfss = NFS_SERVER(inode);

206
		page_cache_get(page);
207
		if (atomic_long_inc_return(&nfss->writeback) >
208 209 210 211
				NFS_CONGESTION_ON_THRESH) {
			set_bdi_congested(&nfss->backing_dev_info,
						BLK_RW_ASYNC);
		}
212
	}
213
	return ret;
214 215 216 217 218 219 220 221
}

static void nfs_end_page_writeback(struct page *page)
{
	struct inode *inode = page->mapping->host;
	struct nfs_server *nfss = NFS_SERVER(inode);

	end_page_writeback(page);
222
	page_cache_release(page);
P
Peter Zijlstra 已提交
223
	if (atomic_long_dec_return(&nfss->writeback) < NFS_CONGESTION_OFF_THRESH)
224
		clear_bdi_congested(&nfss->backing_dev_info, BLK_RW_ASYNC);
225 226
}

227
static struct nfs_page *nfs_find_and_lock_request(struct page *page, bool nonblock)
228
{
229
	struct inode *inode = page->mapping->host;
230 231 232
	struct nfs_page *req;
	int ret;

233
	spin_lock(&inode->i_lock);
234
	for (;;) {
235
		req = nfs_page_find_request_locked(page);
236 237
		if (req == NULL)
			break;
238
		if (nfs_set_page_tag_locked(req))
239 240
			break;
		/* Note: If we hold the page lock, as is the case in nfs_writepage,
241
		 *	 then the call to nfs_set_page_tag_locked() will always
242 243 244
		 *	 succeed provided that someone hasn't already marked the
		 *	 request as dirty (in which case we don't care).
		 */
245
		spin_unlock(&inode->i_lock);
246 247 248 249
		if (!nonblock)
			ret = nfs_wait_on_request(req);
		else
			ret = -EAGAIN;
250 251
		nfs_release_request(req);
		if (ret != 0)
252
			return ERR_PTR(ret);
253
		spin_lock(&inode->i_lock);
254
	}
255
	spin_unlock(&inode->i_lock);
256 257 258 259 260 261 262 263
	return req;
}

/*
 * Find an associated nfs write request, and prepare to flush it out
 * May return an error if the user signalled nfs_wait_on_request().
 */
static int nfs_page_async_flush(struct nfs_pageio_descriptor *pgio,
264
				struct page *page, bool nonblock)
265 266 267 268
{
	struct nfs_page *req;
	int ret = 0;

269
	req = nfs_find_and_lock_request(page, nonblock);
270 271 272 273 274 275 276 277 278 279
	if (!req)
		goto out;
	ret = PTR_ERR(req);
	if (IS_ERR(req))
		goto out;

	ret = nfs_set_page_writeback(page);
	BUG_ON(ret != 0);
	BUG_ON(test_bit(PG_CLEAN, &req->wb_flags));

280 281
	if (!nfs_pageio_add_request(pgio, req)) {
		nfs_redirty_request(req);
282
		ret = pgio->pg_error;
283
	}
284 285
out:
	return ret;
286 287
}

T
Trond Myklebust 已提交
288
static int nfs_do_writepage(struct page *page, struct writeback_control *wbc, struct nfs_pageio_descriptor *pgio)
L
Linus Torvalds 已提交
289 290
{
	struct inode *inode = page->mapping->host;
291
	int ret;
L
Linus Torvalds 已提交
292

C
Chuck Lever 已提交
293 294 295
	nfs_inc_stats(inode, NFSIOS_VFSWRITEPAGE);
	nfs_add_stats(inode, NFSIOS_WRITEPAGES, 1);

296
	nfs_pageio_cond_complete(pgio, page->index);
297
	ret = nfs_page_async_flush(pgio, page, wbc->sync_mode == WB_SYNC_NONE);
298 299 300 301 302
	if (ret == -EAGAIN) {
		redirty_page_for_writepage(wbc, page);
		ret = 0;
	}
	return ret;
T
Trond Myklebust 已提交
303
}
304

T
Trond Myklebust 已提交
305 306 307 308 309 310 311
/*
 * Write an mmapped page to the server.
 */
static int nfs_writepage_locked(struct page *page, struct writeback_control *wbc)
{
	struct nfs_pageio_descriptor pgio;
	int err;
312

T
Trond Myklebust 已提交
313 314 315 316 317 318 319 320
	nfs_pageio_init_write(&pgio, page->mapping->host, wb_priority(wbc));
	err = nfs_do_writepage(page, wbc, &pgio);
	nfs_pageio_complete(&pgio);
	if (err < 0)
		return err;
	if (pgio.pg_error < 0)
		return pgio.pg_error;
	return 0;
321 322 323 324
}

int nfs_writepage(struct page *page, struct writeback_control *wbc)
{
T
Trond Myklebust 已提交
325
	int ret;
326

T
Trond Myklebust 已提交
327
	ret = nfs_writepage_locked(page, wbc);
L
Linus Torvalds 已提交
328
	unlock_page(page);
T
Trond Myklebust 已提交
329 330 331 332 333 334 335 336 337 338
	return ret;
}

static int nfs_writepages_callback(struct page *page, struct writeback_control *wbc, void *data)
{
	int ret;

	ret = nfs_do_writepage(page, wbc, data);
	unlock_page(page);
	return ret;
L
Linus Torvalds 已提交
339 340 341 342 343
}

int nfs_writepages(struct address_space *mapping, struct writeback_control *wbc)
{
	struct inode *inode = mapping->host;
344
	unsigned long *bitlock = &NFS_I(inode)->flags;
345
	struct nfs_pageio_descriptor pgio;
L
Linus Torvalds 已提交
346 347
	int err;

348 349 350 351 352 353
	/* Stop dirtying of new pages while we sync */
	err = wait_on_bit_lock(bitlock, NFS_INO_FLUSHING,
			nfs_wait_bit_killable, TASK_KILLABLE);
	if (err)
		goto out_err;

C
Chuck Lever 已提交
354 355
	nfs_inc_stats(inode, NFSIOS_VFSWRITEPAGES);

356
	nfs_pageio_init_write(&pgio, inode, wb_priority(wbc));
T
Trond Myklebust 已提交
357
	err = write_cache_pages(mapping, wbc, nfs_writepages_callback, &pgio);
358
	nfs_pageio_complete(&pgio);
359 360 361 362 363

	clear_bit_unlock(NFS_INO_FLUSHING, bitlock);
	smp_mb__after_clear_bit();
	wake_up_bit(bitlock, NFS_INO_FLUSHING);

T
Trond Myklebust 已提交
364
	if (err < 0)
365 366 367 368
		goto out_err;
	err = pgio.pg_error;
	if (err < 0)
		goto out_err;
369
	return 0;
370 371
out_err:
	return err;
L
Linus Torvalds 已提交
372 373 374 375 376
}

/*
 * Insert a write request into an inode
 */
377
static int nfs_inode_add_request(struct inode *inode, struct nfs_page *req)
L
Linus Torvalds 已提交
378 379 380 381
{
	struct nfs_inode *nfsi = NFS_I(inode);
	int error;

382 383 384 385 386 387 388 389
	error = radix_tree_preload(GFP_NOFS);
	if (error != 0)
		goto out;

	/* Lock the request! */
	nfs_lock_request_dontget(req);

	spin_lock(&inode->i_lock);
L
Linus Torvalds 已提交
390
	error = radix_tree_insert(&nfsi->nfs_page_tree, req->wb_index, req);
391
	BUG_ON(error);
392 393
	if (!nfsi->npages && nfs_have_delegation(inode, FMODE_WRITE))
		nfsi->change_attr++;
394
	set_bit(PG_MAPPED, &req->wb_flags);
395
	SetPagePrivate(req->wb_page);
396
	set_page_private(req->wb_page, (unsigned long)req);
L
Linus Torvalds 已提交
397
	nfsi->npages++;
398
	kref_get(&req->wb_kref);
399 400
	radix_tree_tag_set(&nfsi->nfs_page_tree, req->wb_index,
				NFS_PAGE_TAG_LOCKED);
401 402 403 404
	spin_unlock(&inode->i_lock);
	radix_tree_preload_end();
out:
	return error;
L
Linus Torvalds 已提交
405 406 407
}

/*
408
 * Remove a write request from an inode
L
Linus Torvalds 已提交
409 410 411
 */
static void nfs_inode_remove_request(struct nfs_page *req)
{
412
	struct inode *inode = req->wb_context->dentry->d_inode;
L
Linus Torvalds 已提交
413 414 415 416
	struct nfs_inode *nfsi = NFS_I(inode);

	BUG_ON (!NFS_WBACK_BUSY(req));

417
	spin_lock(&inode->i_lock);
418
	set_page_private(req->wb_page, 0);
419
	ClearPagePrivate(req->wb_page);
420
	clear_bit(PG_MAPPED, &req->wb_flags);
L
Linus Torvalds 已提交
421 422
	radix_tree_delete(&nfsi->nfs_page_tree, req->wb_index);
	nfsi->npages--;
423
	spin_unlock(&inode->i_lock);
L
Linus Torvalds 已提交
424 425 426
	nfs_release_request(req);
}

427
static void
F
Fred 已提交
428
nfs_mark_request_dirty(struct nfs_page *req)
429 430
{
	__set_page_dirty_nobuffers(req->wb_page);
431
	__mark_inode_dirty(req->wb_page->mapping->host, I_DIRTY_DATASYNC);
432 433
}

L
Linus Torvalds 已提交
434 435 436 437 438
#if defined(CONFIG_NFS_V3) || defined(CONFIG_NFS_V4)
/*
 * Add a request to the inode's commit list.
 */
static void
439
nfs_mark_request_commit(struct nfs_page *req, struct pnfs_layout_segment *lseg)
L
Linus Torvalds 已提交
440
{
441
	struct inode *inode = req->wb_context->dentry->d_inode;
L
Linus Torvalds 已提交
442 443
	struct nfs_inode *nfsi = NFS_I(inode);

444
	spin_lock(&inode->i_lock);
445
	set_bit(PG_CLEAN, &(req)->wb_flags);
446 447 448
	radix_tree_tag_set(&nfsi->nfs_page_tree,
			req->wb_index,
			NFS_PAGE_TAG_COMMIT);
449
	nfsi->ncommit++;
450
	spin_unlock(&inode->i_lock);
451
	pnfs_mark_request_commit(req, lseg);
452
	inc_zone_page_state(req->wb_page, NR_UNSTABLE_NFS);
453
	inc_bdi_stat(req->wb_page->mapping->backing_dev_info, BDI_RECLAIMABLE);
454
	__mark_inode_dirty(inode, I_DIRTY_DATASYNC);
L
Linus Torvalds 已提交
455
}
456

457 458 459 460 461 462 463 464 465 466 467 468 469
static int
nfs_clear_request_commit(struct nfs_page *req)
{
	struct page *page = req->wb_page;

	if (test_and_clear_bit(PG_CLEAN, &(req)->wb_flags)) {
		dec_zone_page_state(page, NR_UNSTABLE_NFS);
		dec_bdi_stat(page->mapping->backing_dev_info, BDI_RECLAIMABLE);
		return 1;
	}
	return 0;
}

470 471 472
static inline
int nfs_write_need_commit(struct nfs_write_data *data)
{
473 474 475 476
	if (data->verf.committed == NFS_DATA_SYNC)
		return data->lseg == NULL;
	else
		return data->verf.committed != NFS_FILE_SYNC;
477 478 479
}

static inline
480 481
int nfs_reschedule_unstable_write(struct nfs_page *req,
				  struct nfs_write_data *data)
482
{
483
	if (test_and_clear_bit(PG_NEED_COMMIT, &req->wb_flags)) {
484
		nfs_mark_request_commit(req, data->lseg);
485 486 487
		return 1;
	}
	if (test_and_clear_bit(PG_NEED_RESCHED, &req->wb_flags)) {
F
Fred 已提交
488
		nfs_mark_request_dirty(req);
489 490 491 492 493 494
		return 1;
	}
	return 0;
}
#else
static inline void
495
nfs_mark_request_commit(struct nfs_page *req, struct pnfs_layout_segment *lseg)
496 497 498
{
}

499 500 501 502 503 504
static inline int
nfs_clear_request_commit(struct nfs_page *req)
{
	return 0;
}

505 506 507 508 509 510 511
static inline
int nfs_write_need_commit(struct nfs_write_data *data)
{
	return 0;
}

static inline
512 513
int nfs_reschedule_unstable_write(struct nfs_page *req,
				  struct nfs_write_data *data)
514 515 516
{
	return 0;
}
L
Linus Torvalds 已提交
517 518
#endif

T
Trond Myklebust 已提交
519
#if defined(CONFIG_NFS_V3) || defined(CONFIG_NFS_V4)
520 521 522 523 524 525
static int
nfs_need_commit(struct nfs_inode *nfsi)
{
	return radix_tree_tagged(&nfsi->nfs_page_tree, NFS_PAGE_TAG_COMMIT);
}

L
Linus Torvalds 已提交
526 527 528 529 530 531 532 533 534 535 536
/*
 * nfs_scan_commit - Scan an inode for commit requests
 * @inode: NFS inode to scan
 * @dst: destination list
 * @idx_start: lower bound of page->index to scan.
 * @npages: idx_start + npages sets the upper bound to scan.
 *
 * Moves requests from the inode's 'commit' request list.
 * The requests are *not* checked to ensure that they form a contiguous set.
 */
static int
537
nfs_scan_commit(struct inode *inode, struct list_head *dst, pgoff_t idx_start, unsigned int npages)
L
Linus Torvalds 已提交
538 539
{
	struct nfs_inode *nfsi = NFS_I(inode);
540
	int ret;
541

542 543 544
	if (!nfs_need_commit(nfsi))
		return 0;

545
	spin_lock(&inode->i_lock);
546 547 548
	ret = nfs_scan_list(nfsi, dst, idx_start, npages, NFS_PAGE_TAG_COMMIT);
	if (ret > 0)
		nfsi->ncommit -= ret;
549 550
	spin_unlock(&inode->i_lock);

551 552
	if (nfs_need_commit(NFS_I(inode)))
		__mark_inode_dirty(inode, I_DIRTY_DATASYNC);
553

554
	return ret;
L
Linus Torvalds 已提交
555
}
556
#else
557 558 559 560 561
static inline int nfs_need_commit(struct nfs_inode *nfsi)
{
	return 0;
}

562
static inline int nfs_scan_commit(struct inode *inode, struct list_head *dst, pgoff_t idx_start, unsigned int npages)
563 564 565
{
	return 0;
}
L
Linus Torvalds 已提交
566 567 568
#endif

/*
569 570
 * Search for an existing write request, and attempt to update
 * it to reflect a new dirty region on a given page.
L
Linus Torvalds 已提交
571
 *
572 573
 * If the attempt fails, then the existing request is flushed out
 * to disk.
L
Linus Torvalds 已提交
574
 */
575 576 577 578
static struct nfs_page *nfs_try_to_update_request(struct inode *inode,
		struct page *page,
		unsigned int offset,
		unsigned int bytes)
L
Linus Torvalds 已提交
579
{
580 581 582 583 584 585 586
	struct nfs_page *req;
	unsigned int rqend;
	unsigned int end;
	int error;

	if (!PagePrivate(page))
		return NULL;
L
Linus Torvalds 已提交
587 588

	end = offset + bytes;
589
	spin_lock(&inode->i_lock);
L
Linus Torvalds 已提交
590 591

	for (;;) {
592
		req = nfs_page_find_request_locked(page);
593 594 595 596 597 598 599 600 601 602
		if (req == NULL)
			goto out_unlock;

		rqend = req->wb_offset + req->wb_bytes;
		/*
		 * Tell the caller to flush out the request if
		 * the offsets are non-contiguous.
		 * Note: nfs_flush_incompatible() will already
		 * have flushed out requests having wrong owners.
		 */
603
		if (offset > rqend
604 605 606 607
		    || end < req->wb_offset)
			goto out_flushme;

		if (nfs_set_page_tag_locked(req))
L
Linus Torvalds 已提交
608 609
			break;

610
		/* The request is locked, so wait and then retry */
611
		spin_unlock(&inode->i_lock);
612 613 614 615 616
		error = nfs_wait_on_request(req);
		nfs_release_request(req);
		if (error != 0)
			goto out_err;
		spin_lock(&inode->i_lock);
L
Linus Torvalds 已提交
617 618
	}

619
	if (nfs_clear_request_commit(req) &&
620 621
	    radix_tree_tag_clear(&NFS_I(inode)->nfs_page_tree,
				 req->wb_index, NFS_PAGE_TAG_COMMIT) != NULL) {
622
		NFS_I(inode)->ncommit--;
623 624
		pnfs_clear_request_commit(req);
	}
625

L
Linus Torvalds 已提交
626 627 628 629 630 631 632
	/* Okay, the request matches. Update the region */
	if (offset < req->wb_offset) {
		req->wb_offset = offset;
		req->wb_pgbase = offset;
	}
	if (end > rqend)
		req->wb_bytes = end - req->wb_offset;
633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658
	else
		req->wb_bytes = rqend - req->wb_offset;
out_unlock:
	spin_unlock(&inode->i_lock);
	return req;
out_flushme:
	spin_unlock(&inode->i_lock);
	nfs_release_request(req);
	error = nfs_wb_page(inode, page);
out_err:
	return ERR_PTR(error);
}

/*
 * Try to update an existing write request, or create one if there is none.
 *
 * Note: Should always be called with the Page Lock held to prevent races
 * if we have to add a new request. Also assumes that the caller has
 * already called nfs_flush_incompatible() if necessary.
 */
static struct nfs_page * nfs_setup_write_request(struct nfs_open_context* ctx,
		struct page *page, unsigned int offset, unsigned int bytes)
{
	struct inode *inode = page->mapping->host;
	struct nfs_page	*req;
	int error;
L
Linus Torvalds 已提交
659

660 661 662 663 664 665 666 667 668 669 670
	req = nfs_try_to_update_request(inode, page, offset, bytes);
	if (req != NULL)
		goto out;
	req = nfs_create_request(ctx, inode, page, offset, bytes);
	if (IS_ERR(req))
		goto out;
	error = nfs_inode_add_request(inode, req);
	if (error != 0) {
		nfs_release_request(req);
		req = ERR_PTR(error);
	}
671
out:
T
Trond Myklebust 已提交
672
	return req;
L
Linus Torvalds 已提交
673 674
}

675 676 677 678 679 680 681 682 683 684 685
static int nfs_writepage_setup(struct nfs_open_context *ctx, struct page *page,
		unsigned int offset, unsigned int count)
{
	struct nfs_page	*req;

	req = nfs_setup_write_request(ctx, page, offset, count);
	if (IS_ERR(req))
		return PTR_ERR(req);
	/* Update file length */
	nfs_grow_file(page, offset, count);
	nfs_mark_uptodate(page, req->wb_pgbase, req->wb_bytes);
686
	nfs_mark_request_dirty(req);
687 688 689 690
	nfs_clear_page_tag_locked(req);
	return 0;
}

L
Linus Torvalds 已提交
691 692
int nfs_flush_incompatible(struct file *file, struct page *page)
{
693
	struct nfs_open_context *ctx = nfs_file_open_context(file);
L
Linus Torvalds 已提交
694
	struct nfs_page	*req;
T
Trond Myklebust 已提交
695
	int do_flush, status;
L
Linus Torvalds 已提交
696 697 698 699 700 701 702 703
	/*
	 * Look for a request corresponding to this page. If there
	 * is one, and it belongs to another file, we flush it out
	 * before we try to copy anything into the page. Do this
	 * due to the lack of an ACCESS-type call in NFSv2.
	 * Also do the same if we find a request from an existing
	 * dropped page.
	 */
T
Trond Myklebust 已提交
704 705 706 707
	do {
		req = nfs_page_find_request(page);
		if (req == NULL)
			return 0;
708 709 710
		do_flush = req->wb_page != page || req->wb_context != ctx ||
			req->wb_lock_context->lockowner != current->files ||
			req->wb_lock_context->pid != current->tgid;
L
Linus Torvalds 已提交
711
		nfs_release_request(req);
T
Trond Myklebust 已提交
712 713 714 715 716
		if (!do_flush)
			return 0;
		status = nfs_wb_page(page->mapping->host, page);
	} while (status == 0);
	return status;
L
Linus Torvalds 已提交
717 718
}

719 720 721 722 723 724 725 726 727 728 729
/*
 * If the page cache is marked as unsafe or invalid, then we can't rely on
 * the PageUptodate() flag. In this case, we will need to turn off
 * write optimisations that depend on the page contents being correct.
 */
static int nfs_write_pageuptodate(struct page *page, struct inode *inode)
{
	return PageUptodate(page) &&
		!(NFS_I(inode)->cache_validity & (NFS_INO_REVAL_PAGECACHE|NFS_INO_INVALID_DATA));
}

L
Linus Torvalds 已提交
730 731 732 733 734 735 736 737 738
/*
 * Update and possibly write a cached page of an NFS file.
 *
 * XXX: Keep an eye on generic_file_read to make sure it doesn't do bad
 * things with a page scheduled for an RPC call (e.g. invalidate it).
 */
int nfs_updatepage(struct file *file, struct page *page,
		unsigned int offset, unsigned int count)
{
739
	struct nfs_open_context *ctx = nfs_file_open_context(file);
L
Linus Torvalds 已提交
740 741 742
	struct inode	*inode = page->mapping->host;
	int		status = 0;

C
Chuck Lever 已提交
743 744
	nfs_inc_stats(inode, NFSIOS_VFSUPDATEPAGE);

745
	dprintk("NFS:       nfs_updatepage(%s/%s %d@%lld)\n",
746 747
		file->f_path.dentry->d_parent->d_name.name,
		file->f_path.dentry->d_name.name, count,
748
		(long long)(page_offset(page) + offset));
L
Linus Torvalds 已提交
749 750

	/* If we're not using byte range locks, and we know the page
751 752 753
	 * is up to date, it may be more efficient to extend the write
	 * to cover the entire page in order to avoid fragmentation
	 * inefficiencies.
L
Linus Torvalds 已提交
754
	 */
755 756
	if (nfs_write_pageuptodate(page, inode) &&
			inode->i_flock == NULL &&
757
			!(file->f_flags & O_DSYNC)) {
758
		count = max(count + offset, nfs_page_length(page));
L
Linus Torvalds 已提交
759 760 761
		offset = 0;
	}

762
	status = nfs_writepage_setup(ctx, page, offset, count);
763 764
	if (status < 0)
		nfs_set_pageerror(page);
L
Linus Torvalds 已提交
765

766
	dprintk("NFS:       nfs_updatepage returns %d (isize %lld)\n",
L
Linus Torvalds 已提交
767 768 769 770
			status, (long long)i_size_read(inode));
	return status;
}

771 772
static void nfs_writepage_release(struct nfs_page *req,
				  struct nfs_write_data *data)
L
Linus Torvalds 已提交
773
{
774
	struct page *page = req->wb_page;
L
Linus Torvalds 已提交
775

776
	if (PageError(req->wb_page) || !nfs_reschedule_unstable_write(req, data))
777
		nfs_inode_remove_request(req);
778
	nfs_clear_page_tag_locked(req);
779
	nfs_end_page_writeback(page);
L
Linus Torvalds 已提交
780 781
}

782
static int flush_task_priority(int how)
L
Linus Torvalds 已提交
783 784 785 786 787 788 789 790 791 792
{
	switch (how & (FLUSH_HIGHPRI|FLUSH_LOWPRI)) {
		case FLUSH_HIGHPRI:
			return RPC_PRIORITY_HIGH;
		case FLUSH_LOWPRI:
			return RPC_PRIORITY_LOW;
	}
	return RPC_PRIORITY_NORMAL;
}

793
int nfs_initiate_write(struct nfs_write_data *data,
794 795 796
		       struct rpc_clnt *clnt,
		       const struct rpc_call_ops *call_ops,
		       int how)
L
Linus Torvalds 已提交
797
{
798
	struct inode *inode = data->inode;
799
	int priority = flush_task_priority(how);
800
	struct rpc_task *task;
801 802 803
	struct rpc_message msg = {
		.rpc_argp = &data->args,
		.rpc_resp = &data->res,
804
		.rpc_cred = data->cred,
805
	};
806
	struct rpc_task_setup task_setup_data = {
807
		.rpc_client = clnt,
808
		.task = &data->task,
809
		.rpc_message = &msg,
810 811
		.callback_ops = call_ops,
		.callback_data = data,
812
		.workqueue = nfsiod_workqueue,
813
		.flags = RPC_TASK_ASYNC,
814
		.priority = priority,
815
	};
816
	int ret = 0;
L
Linus Torvalds 已提交
817

818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842
	/* Set up the initial task struct.  */
	NFS_PROTO(inode)->write_setup(data, &msg);

	dprintk("NFS: %5u initiated write call "
		"(req %s/%lld, %u bytes @ offset %llu)\n",
		data->task.tk_pid,
		inode->i_sb->s_id,
		(long long)NFS_FILEID(inode),
		data->args.count,
		(unsigned long long)data->args.offset);

	task = rpc_run_task(&task_setup_data);
	if (IS_ERR(task)) {
		ret = PTR_ERR(task);
		goto out;
	}
	if (how & FLUSH_SYNC) {
		ret = rpc_wait_for_completion_task(task);
		if (ret == 0)
			ret = task->tk_status;
	}
	rpc_put_task(task);
out:
	return ret;
}
843
EXPORT_SYMBOL_GPL(nfs_initiate_write);
844 845 846 847

/*
 * Set up the argument/result storage required for the RPC call.
 */
848
static void nfs_write_rpcsetup(struct nfs_page *req,
849 850 851 852
		struct nfs_write_data *data,
		unsigned int count, unsigned int offset,
		int how)
{
853
	struct inode *inode = req->wb_context->dentry->d_inode;
854

L
Linus Torvalds 已提交
855 856 857 858
	/* Set up the RPC argument and reply structs
	 * NB: take care not to mess about with data->commit et al. */

	data->req = req;
859
	data->inode = inode = req->wb_context->dentry->d_inode;
860
	data->cred = req->wb_context->cred;
L
Linus Torvalds 已提交
861 862 863

	data->args.fh     = NFS_FH(inode);
	data->args.offset = req_offset(req) + offset;
864 865
	/* pnfs_set_layoutcommit needs this */
	data->mds_offset = data->args.offset;
L
Linus Torvalds 已提交
866 867 868
	data->args.pgbase = req->wb_pgbase + offset;
	data->args.pages  = data->pagevec;
	data->args.count  = count;
869
	data->args.context = get_nfs_open_context(req->wb_context);
870
	data->args.lock_context = req->wb_lock_context;
871
	data->args.stable  = NFS_UNSTABLE;
872 873 874 875 876 877 878 879
	switch (how & (FLUSH_STABLE | FLUSH_COND_STABLE)) {
	case 0:
		break;
	case FLUSH_COND_STABLE:
		if (nfs_need_commit(NFS_I(inode)))
			break;
	default:
		data->args.stable = NFS_FILE_SYNC;
880
	}
L
Linus Torvalds 已提交
881 882 883 884

	data->res.fattr   = &data->fattr;
	data->res.count   = count;
	data->res.verf    = &data->verf;
885
	nfs_fattr_init(&data->fattr);
886
}
L
Linus Torvalds 已提交
887

888 889 890 891
static int nfs_do_write(struct nfs_write_data *data,
		const struct rpc_call_ops *call_ops,
		int how)
{
892
	struct inode *inode = data->args.context->dentry->d_inode;
893

894
	return nfs_initiate_write(data, NFS_CLIENT(inode), call_ops, how);
L
Linus Torvalds 已提交
895 896
}

897 898 899 900 901 902 903 904 905 906 907 908 909
static int nfs_do_multiple_writes(struct list_head *head,
		const struct rpc_call_ops *call_ops,
		int how)
{
	struct nfs_write_data *data;
	int ret = 0;

	while (!list_empty(head)) {
		int ret2;

		data = list_entry(head->next, struct nfs_write_data, list);
		list_del_init(&data->list);
		
910
		ret2 = nfs_do_write(data, call_ops, how);
911 912 913 914 915 916
		 if (ret == 0)
			 ret = ret2;
	}
	return ret;
}

F
Fred 已提交
917 918 919 920 921 922
/* If a nfs_flush_* function fails, it should remove reqs from @head and
 * call this on each, which will prepare them to be retried on next
 * writeback using standard nfs.
 */
static void nfs_redirty_request(struct nfs_page *req)
{
923 924
	struct page *page = req->wb_page;

F
Fred 已提交
925 926
	nfs_mark_request_dirty(req);
	nfs_clear_page_tag_locked(req);
927
	nfs_end_page_writeback(page);
F
Fred 已提交
928 929
}

L
Linus Torvalds 已提交
930 931 932 933
/*
 * Generate multiple small requests to write out a single
 * contiguous dirty area on one page.
 */
934
static int nfs_flush_multi(struct nfs_pageio_descriptor *desc, struct list_head *res)
L
Linus Torvalds 已提交
935
{
F
Fred Isaman 已提交
936
	struct nfs_page *req = nfs_list_entry(desc->pg_list.next);
L
Linus Torvalds 已提交
937 938
	struct page *page = req->wb_page;
	struct nfs_write_data *data;
939
	size_t wsize = desc->pg_bsize, nbytes;
940
	unsigned int offset;
L
Linus Torvalds 已提交
941
	int requests = 0;
942
	int ret = 0;
L
Linus Torvalds 已提交
943 944 945

	nfs_list_remove_request(req);

946 947 948 949 950 951
	if ((desc->pg_ioflags & FLUSH_COND_STABLE) &&
	    (desc->pg_moreio || NFS_I(desc->pg_inode)->ncommit ||
	     desc->pg_count > wsize))
		desc->pg_ioflags &= ~FLUSH_COND_STABLE;


952
	offset = 0;
F
Fred Isaman 已提交
953
	nbytes = desc->pg_count;
954 955 956
	do {
		size_t len = min(nbytes, wsize);

957
		data = nfs_writedata_alloc(1);
L
Linus Torvalds 已提交
958 959
		if (!data)
			goto out_bad;
960 961 962
		data->pagevec[0] = page;
		nfs_write_rpcsetup(req, data, wsize, offset, desc->pg_ioflags);
		list_add(&data->list, res);
L
Linus Torvalds 已提交
963
		requests++;
964
		nbytes -= len;
965
		offset += len;
966
	} while (nbytes != 0);
L
Linus Torvalds 已提交
967
	atomic_set(&req->wb_complete, requests);
968
	desc->pg_rpc_callops = &nfs_write_partial_ops;
969
	return ret;
L
Linus Torvalds 已提交
970 971

out_bad:
972 973
	while (!list_empty(res)) {
		data = list_entry(res->next, struct nfs_write_data, list);
974
		list_del(&data->list);
975
		nfs_writedata_free(data);
L
Linus Torvalds 已提交
976
	}
977
	nfs_redirty_request(req);
L
Linus Torvalds 已提交
978 979 980 981 982 983 984 985 986 987 988
	return -ENOMEM;
}

/*
 * Create an RPC task for the given write request and kick it.
 * The page must have been locked by the caller.
 *
 * It may happen that the page we're passed is not marked dirty.
 * This is the case if nfs_updatepage detects a conflicting request
 * that has been written but not committed.
 */
989
static int nfs_flush_one(struct nfs_pageio_descriptor *desc, struct list_head *res)
L
Linus Torvalds 已提交
990 991 992 993
{
	struct nfs_page		*req;
	struct page		**pages;
	struct nfs_write_data	*data;
F
Fred Isaman 已提交
994
	struct list_head *head = &desc->pg_list;
995
	int ret = 0;
L
Linus Torvalds 已提交
996

F
Fred Isaman 已提交
997 998
	data = nfs_writedata_alloc(nfs_page_array_len(desc->pg_base,
						      desc->pg_count));
999 1000 1001 1002 1003 1004 1005 1006 1007
	if (!data) {
		while (!list_empty(head)) {
			req = nfs_list_entry(head->next);
			nfs_list_remove_request(req);
			nfs_redirty_request(req);
		}
		ret = -ENOMEM;
		goto out;
	}
L
Linus Torvalds 已提交
1008 1009 1010 1011 1012 1013 1014 1015 1016 1017
	pages = data->pagevec;
	while (!list_empty(head)) {
		req = nfs_list_entry(head->next);
		nfs_list_remove_request(req);
		nfs_list_add_request(req, &data->pages);
		ClearPageError(req->wb_page);
		*pages++ = req->wb_page;
	}
	req = nfs_list_entry(data->pages.next);

1018 1019 1020 1021
	if ((desc->pg_ioflags & FLUSH_COND_STABLE) &&
	    (desc->pg_moreio || NFS_I(desc->pg_inode)->ncommit))
		desc->pg_ioflags &= ~FLUSH_COND_STABLE;

L
Linus Torvalds 已提交
1022
	/* Set up the argument struct */
1023
	nfs_write_rpcsetup(req, data, desc->pg_count, 0, desc->pg_ioflags);
1024
	list_add(&data->list, res);
1025
	desc->pg_rpc_callops = &nfs_write_full_ops;
1026 1027
out:
	return ret;
L
Linus Torvalds 已提交
1028 1029
}

1030 1031 1032 1033 1034 1035 1036 1037
int nfs_generic_flush(struct nfs_pageio_descriptor *desc, struct list_head *head)
{
	if (desc->pg_bsize < PAGE_CACHE_SIZE)
		return nfs_flush_multi(desc, head);
	return nfs_flush_one(desc, head);
}

static int nfs_generic_pg_writepages(struct nfs_pageio_descriptor *desc)
1038
{
1039 1040 1041
	LIST_HEAD(head);
	int ret;

1042
	ret = nfs_generic_flush(desc, &head);
1043 1044
	if (ret == 0)
		ret = nfs_do_multiple_writes(&head, desc->pg_rpc_callops,
1045
				desc->pg_ioflags);
1046
	return ret;
1047 1048 1049 1050 1051 1052 1053
}

static const struct nfs_pageio_ops nfs_pageio_write_ops = {
	.pg_test = nfs_generic_pg_test,
	.pg_doio = nfs_generic_pg_writepages,
};

1054
static void nfs_pageio_init_write_mds(struct nfs_pageio_descriptor *pgio,
1055
				  struct inode *inode, int ioflags)
L
Linus Torvalds 已提交
1056
{
1057 1058 1059
	nfs_pageio_init(pgio, inode, &nfs_pageio_write_ops,
				NFS_SERVER(inode)->wsize, ioflags);
}
L
Linus Torvalds 已提交
1060

1061 1062 1063 1064 1065
void nfs_pageio_reset_write_mds(struct nfs_pageio_descriptor *pgio)
{
	pgio->pg_ops = &nfs_pageio_write_ops;
	pgio->pg_bsize = NFS_SERVER(pgio->pg_inode)->wsize;
}
1066
EXPORT_SYMBOL_GPL(nfs_pageio_reset_write_mds);
1067

1068 1069 1070 1071 1072
static void nfs_pageio_init_write(struct nfs_pageio_descriptor *pgio,
				  struct inode *inode, int ioflags)
{
	if (!pnfs_pageio_init_write(pgio, inode, ioflags))
		nfs_pageio_init_write_mds(pgio, inode, ioflags);
L
Linus Torvalds 已提交
1073 1074 1075 1076 1077
}

/*
 * Handle a write reply that flushed part of a page.
 */
1078
static void nfs_writeback_done_partial(struct rpc_task *task, void *calldata)
L
Linus Torvalds 已提交
1079
{
1080
	struct nfs_write_data	*data = calldata;
L
Linus Torvalds 已提交
1081

1082 1083
	dprintk("NFS: %5u write(%s/%lld %d@%lld)",
		task->tk_pid,
1084
		data->req->wb_context->dentry->d_inode->i_sb->s_id,
1085
		(long long)
1086
		  NFS_FILEID(data->req->wb_context->dentry->d_inode),
1087
		data->req->wb_bytes, (long long)req_offset(data->req));
L
Linus Torvalds 已提交
1088

1089 1090
	nfs_writeback_done(task, data);
}
1091

1092 1093 1094 1095 1096 1097 1098 1099
static void nfs_writeback_release_partial(void *calldata)
{
	struct nfs_write_data	*data = calldata;
	struct nfs_page		*req = data->req;
	struct page		*page = req->wb_page;
	int status = data->task.tk_status;

	if (status < 0) {
1100
		nfs_set_pageerror(page);
1101 1102
		nfs_context_set_write_error(req->wb_context, status);
		dprintk(", error = %d\n", status);
1103
		goto out;
L
Linus Torvalds 已提交
1104 1105
	}

1106
	if (nfs_write_need_commit(data)) {
1107
		struct inode *inode = page->mapping->host;
1108

1109
		spin_lock(&inode->i_lock);
1110 1111 1112 1113 1114 1115 1116 1117 1118 1119
		if (test_bit(PG_NEED_RESCHED, &req->wb_flags)) {
			/* Do nothing we need to resend the writes */
		} else if (!test_and_set_bit(PG_NEED_COMMIT, &req->wb_flags)) {
			memcpy(&req->wb_verf, &data->verf, sizeof(req->wb_verf));
			dprintk(" defer commit\n");
		} else if (memcmp(&req->wb_verf, &data->verf, sizeof(req->wb_verf))) {
			set_bit(PG_NEED_RESCHED, &req->wb_flags);
			clear_bit(PG_NEED_COMMIT, &req->wb_flags);
			dprintk(" server reboot detected\n");
		}
1120
		spin_unlock(&inode->i_lock);
1121 1122 1123 1124
	} else
		dprintk(" OK\n");

out:
L
Linus Torvalds 已提交
1125
	if (atomic_dec_and_test(&req->wb_complete))
1126
		nfs_writepage_release(req, data);
1127
	nfs_writedata_release(calldata);
L
Linus Torvalds 已提交
1128 1129
}

1130 1131 1132 1133 1134
#if defined(CONFIG_NFS_V4_1)
void nfs_write_prepare(struct rpc_task *task, void *calldata)
{
	struct nfs_write_data *data = calldata;

1135 1136
	if (nfs4_setup_sequence(NFS_SERVER(data->inode),
				&data->args.seq_args,
1137 1138 1139 1140 1141 1142
				&data->res.seq_res, 1, task))
		return;
	rpc_call_start(task);
}
#endif /* CONFIG_NFS_V4_1 */

1143
static const struct rpc_call_ops nfs_write_partial_ops = {
1144 1145 1146
#if defined(CONFIG_NFS_V4_1)
	.rpc_call_prepare = nfs_write_prepare,
#endif /* CONFIG_NFS_V4_1 */
1147
	.rpc_call_done = nfs_writeback_done_partial,
1148
	.rpc_release = nfs_writeback_release_partial,
1149 1150
};

L
Linus Torvalds 已提交
1151 1152 1153 1154 1155 1156 1157
/*
 * Handle a write reply that flushes a whole page.
 *
 * FIXME: There is an inherent race with invalidate_inode_pages and
 *	  writebacks since the page->count is kept > 1 for as long
 *	  as the page has a write request pending.
 */
1158
static void nfs_writeback_done_full(struct rpc_task *task, void *calldata)
L
Linus Torvalds 已提交
1159
{
1160
	struct nfs_write_data	*data = calldata;
L
Linus Torvalds 已提交
1161

1162 1163 1164 1165 1166 1167 1168
	nfs_writeback_done(task, data);
}

static void nfs_writeback_release_full(void *calldata)
{
	struct nfs_write_data	*data = calldata;
	int status = data->task.tk_status;
1169

L
Linus Torvalds 已提交
1170 1171
	/* Update attributes as result of writeback. */
	while (!list_empty(&data->pages)) {
1172 1173 1174
		struct nfs_page *req = nfs_list_entry(data->pages.next);
		struct page *page = req->wb_page;

L
Linus Torvalds 已提交
1175 1176
		nfs_list_remove_request(req);

1177 1178
		dprintk("NFS: %5u write (%s/%lld %d@%lld)",
			data->task.tk_pid,
1179 1180
			req->wb_context->dentry->d_inode->i_sb->s_id,
			(long long)NFS_FILEID(req->wb_context->dentry->d_inode),
L
Linus Torvalds 已提交
1181 1182 1183
			req->wb_bytes,
			(long long)req_offset(req));

1184
		if (status < 0) {
1185
			nfs_set_pageerror(page);
1186 1187
			nfs_context_set_write_error(req->wb_context, status);
			dprintk(", error = %d\n", status);
1188
			goto remove_request;
L
Linus Torvalds 已提交
1189 1190
		}

1191 1192
		if (nfs_write_need_commit(data)) {
			memcpy(&req->wb_verf, &data->verf, sizeof(req->wb_verf));
1193
			nfs_mark_request_commit(req, data->lseg);
1194
			dprintk(" marked for commit\n");
L
Linus Torvalds 已提交
1195 1196
			goto next;
		}
1197 1198
		dprintk(" OK\n");
remove_request:
L
Linus Torvalds 已提交
1199 1200
		nfs_inode_remove_request(req);
	next:
1201
		nfs_clear_page_tag_locked(req);
1202
		nfs_end_page_writeback(page);
L
Linus Torvalds 已提交
1203
	}
1204
	nfs_writedata_release(calldata);
L
Linus Torvalds 已提交
1205 1206
}

1207
static const struct rpc_call_ops nfs_write_full_ops = {
1208 1209 1210
#if defined(CONFIG_NFS_V4_1)
	.rpc_call_prepare = nfs_write_prepare,
#endif /* CONFIG_NFS_V4_1 */
1211
	.rpc_call_done = nfs_writeback_done_full,
1212
	.rpc_release = nfs_writeback_release_full,
1213 1214 1215
};


L
Linus Torvalds 已提交
1216 1217 1218
/*
 * This function is called when the WRITE call is complete.
 */
1219
void nfs_writeback_done(struct rpc_task *task, struct nfs_write_data *data)
L
Linus Torvalds 已提交
1220 1221 1222
{
	struct nfs_writeargs	*argp = &data->args;
	struct nfs_writeres	*resp = &data->res;
1223
	struct nfs_server	*server = NFS_SERVER(data->inode);
1224
	int status;
L
Linus Torvalds 已提交
1225

C
Chuck Lever 已提交
1226
	dprintk("NFS: %5u nfs_writeback_done (status %d)\n",
L
Linus Torvalds 已提交
1227 1228
		task->tk_pid, task->tk_status);

1229 1230 1231 1232 1233 1234 1235
	/*
	 * ->write_done will attempt to use post-op attributes to detect
	 * conflicting writes by other clients.  A strict interpretation
	 * of close-to-open would allow us to continue caching even if
	 * another writer had changed the file, but some applications
	 * depend on tighter cache coherency when writing.
	 */
1236 1237
	status = NFS_PROTO(data->inode)->write_done(task, data);
	if (status != 0)
1238
		return;
C
Chuck Lever 已提交
1239 1240
	nfs_add_stats(data->inode, NFSIOS_SERVERWRITTENBYTES, resp->count);

L
Linus Torvalds 已提交
1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252
#if defined(CONFIG_NFS_V3) || defined(CONFIG_NFS_V4)
	if (resp->verf->committed < argp->stable && task->tk_status >= 0) {
		/* We tried a write call, but the server did not
		 * commit data to stable storage even though we
		 * requested it.
		 * Note: There is a known bug in Tru64 < 5.0 in which
		 *	 the server reports NFS_DATA_SYNC, but performs
		 *	 NFS_FILE_SYNC. We therefore implement this checking
		 *	 as a dprintk() in order to avoid filling syslog.
		 */
		static unsigned long    complain;

1253
		/* Note this will print the MDS for a DS write */
L
Linus Torvalds 已提交
1254
		if (time_before(complain, jiffies)) {
1255
			dprintk("NFS:       faulty NFS server %s:"
L
Linus Torvalds 已提交
1256
				" (committed = %d) != (stable = %d)\n",
1257
				server->nfs_client->cl_hostname,
L
Linus Torvalds 已提交
1258 1259 1260 1261 1262 1263 1264 1265 1266
				resp->verf->committed, argp->stable);
			complain = jiffies + 300 * HZ;
		}
	}
#endif
	/* Is this a short write? */
	if (task->tk_status >= 0 && resp->count < argp->count) {
		static unsigned long    complain;

C
Chuck Lever 已提交
1267 1268
		nfs_inc_stats(data->inode, NFSIOS_SHORTWRITE);

L
Linus Torvalds 已提交
1269 1270 1271 1272 1273
		/* Has the server at least made some progress? */
		if (resp->count != 0) {
			/* Was this an NFSv2 write or an NFSv3 stable write? */
			if (resp->verf->committed != NFS_UNSTABLE) {
				/* Resend from where the server left off */
1274
				data->mds_offset += resp->count;
L
Linus Torvalds 已提交
1275 1276 1277 1278 1279 1280 1281 1282 1283
				argp->offset += resp->count;
				argp->pgbase += resp->count;
				argp->count -= resp->count;
			} else {
				/* Resend as a stable write in order to avoid
				 * headaches in the case of a server crash.
				 */
				argp->stable = NFS_FILE_SYNC;
			}
1284
			nfs_restart_rpc(task, server->nfs_client);
1285
			return;
L
Linus Torvalds 已提交
1286 1287 1288 1289 1290 1291 1292 1293 1294 1295
		}
		if (time_before(complain, jiffies)) {
			printk(KERN_WARNING
			       "NFS: Server wrote zero bytes, expected %u.\n",
					argp->count);
			complain = jiffies + 300 * HZ;
		}
		/* Can't do anything about it except throw an error. */
		task->tk_status = -EIO;
	}
1296
	return;
L
Linus Torvalds 已提交
1297 1298 1299 1300
}


#if defined(CONFIG_NFS_V3) || defined(CONFIG_NFS_V4)
1301 1302
static int nfs_commit_set_lock(struct nfs_inode *nfsi, int may_wait)
{
1303 1304
	int ret;

1305 1306
	if (!test_and_set_bit(NFS_INO_COMMIT, &nfsi->flags))
		return 1;
1307 1308 1309 1310 1311 1312 1313
	if (!may_wait)
		return 0;
	ret = out_of_line_wait_on_bit_lock(&nfsi->flags,
				NFS_INO_COMMIT,
				nfs_wait_bit_killable,
				TASK_KILLABLE);
	return (ret < 0) ? ret : 1;
1314 1315
}

1316
void nfs_commit_clear_lock(struct nfs_inode *nfsi)
1317 1318 1319 1320 1321
{
	clear_bit(NFS_INO_COMMIT, &nfsi->flags);
	smp_mb__after_clear_bit();
	wake_up_bit(&nfsi->flags, NFS_INO_COMMIT);
}
1322
EXPORT_SYMBOL_GPL(nfs_commit_clear_lock);
1323

1324
void nfs_commitdata_release(void *data)
L
Linus Torvalds 已提交
1325
{
1326 1327
	struct nfs_write_data *wdata = data;

1328
	put_lseg(wdata->lseg);
1329
	put_nfs_open_context(wdata->args.context);
L
Linus Torvalds 已提交
1330 1331
	nfs_commit_free(wdata);
}
1332
EXPORT_SYMBOL_GPL(nfs_commitdata_release);
L
Linus Torvalds 已提交
1333

1334
int nfs_initiate_commit(struct nfs_write_data *data, struct rpc_clnt *clnt,
1335 1336
			const struct rpc_call_ops *call_ops,
			int how)
L
Linus Torvalds 已提交
1337
{
1338
	struct rpc_task *task;
1339
	int priority = flush_task_priority(how);
1340 1341 1342
	struct rpc_message msg = {
		.rpc_argp = &data->args,
		.rpc_resp = &data->res,
1343
		.rpc_cred = data->cred,
1344
	};
1345
	struct rpc_task_setup task_setup_data = {
1346
		.task = &data->task,
1347
		.rpc_client = clnt,
1348
		.rpc_message = &msg,
1349
		.callback_ops = call_ops,
1350
		.callback_data = data,
1351
		.workqueue = nfsiod_workqueue,
1352
		.flags = RPC_TASK_ASYNC,
1353
		.priority = priority,
1354
	};
1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367
	/* Set up the initial task struct.  */
	NFS_PROTO(data->inode)->commit_setup(data, &msg);

	dprintk("NFS: %5u initiated commit call\n", data->task.tk_pid);

	task = rpc_run_task(&task_setup_data);
	if (IS_ERR(task))
		return PTR_ERR(task);
	if (how & FLUSH_SYNC)
		rpc_wait_for_completion_task(task);
	rpc_put_task(task);
	return 0;
}
1368
EXPORT_SYMBOL_GPL(nfs_initiate_commit);
1369 1370 1371 1372

/*
 * Set up the argument/result storage required for the RPC call.
 */
1373
void nfs_init_commit(struct nfs_write_data *data,
1374 1375
			    struct list_head *head,
			    struct pnfs_layout_segment *lseg)
1376 1377
{
	struct nfs_page *first = nfs_list_entry(head->next);
1378
	struct inode *inode = first->wb_context->dentry->d_inode;
L
Linus Torvalds 已提交
1379 1380 1381 1382 1383 1384 1385

	/* Set up the RPC argument and reply structs
	 * NB: take care not to mess about with data->commit et al. */

	list_splice_init(head, &data->pages);

	data->inode	  = inode;
1386
	data->cred	  = first->wb_context->cred;
1387
	data->lseg	  = lseg; /* reference transferred */
1388
	data->mds_ops     = &nfs_commit_ops;
L
Linus Torvalds 已提交
1389 1390

	data->args.fh     = NFS_FH(data->inode);
1391 1392 1393
	/* Note: we always request a commit of the entire inode */
	data->args.offset = 0;
	data->args.count  = 0;
1394
	data->args.context = get_nfs_open_context(first->wb_context);
1395
	data->res.count   = 0;
L
Linus Torvalds 已提交
1396 1397
	data->res.fattr   = &data->fattr;
	data->res.verf    = &data->verf;
1398
	nfs_fattr_init(&data->fattr);
L
Linus Torvalds 已提交
1399
}
1400
EXPORT_SYMBOL_GPL(nfs_init_commit);
L
Linus Torvalds 已提交
1401

1402
void nfs_retry_commit(struct list_head *page_list,
1403
		      struct pnfs_layout_segment *lseg)
1404 1405 1406 1407 1408 1409
{
	struct nfs_page *req;

	while (!list_empty(page_list)) {
		req = nfs_list_entry(page_list->next);
		nfs_list_remove_request(req);
1410
		nfs_mark_request_commit(req, lseg);
1411 1412 1413 1414 1415 1416
		dec_zone_page_state(req->wb_page, NR_UNSTABLE_NFS);
		dec_bdi_stat(req->wb_page->mapping->backing_dev_info,
			     BDI_RECLAIMABLE);
		nfs_clear_page_tag_locked(req);
	}
}
1417
EXPORT_SYMBOL_GPL(nfs_retry_commit);
1418

L
Linus Torvalds 已提交
1419 1420 1421 1422
/*
 * Commit dirty pages
 */
static int
1423
nfs_commit_list(struct inode *inode, struct list_head *head, int how)
L
Linus Torvalds 已提交
1424 1425 1426
{
	struct nfs_write_data	*data;

1427
	data = nfs_commitdata_alloc();
L
Linus Torvalds 已提交
1428 1429 1430 1431 1432

	if (!data)
		goto out_bad;

	/* Set up the argument struct */
1433
	nfs_init_commit(data, head, NULL);
1434
	return nfs_initiate_commit(data, NFS_CLIENT(inode), data->mds_ops, how);
L
Linus Torvalds 已提交
1435
 out_bad:
1436
	nfs_retry_commit(head, NULL);
1437
	nfs_commit_clear_lock(NFS_I(inode));
L
Linus Torvalds 已提交
1438 1439 1440 1441 1442 1443
	return -ENOMEM;
}

/*
 * COMMIT call returned
 */
1444
static void nfs_commit_done(struct rpc_task *task, void *calldata)
L
Linus Torvalds 已提交
1445
{
1446
	struct nfs_write_data	*data = calldata;
L
Linus Torvalds 已提交
1447

C
Chuck Lever 已提交
1448
        dprintk("NFS: %5u nfs_commit_done (status %d)\n",
L
Linus Torvalds 已提交
1449 1450
                                task->tk_pid, task->tk_status);

1451
	/* Call the NFS version-specific code */
1452
	NFS_PROTO(data->inode)->commit_done(task, data);
1453 1454
}

1455
void nfs_commit_release_pages(struct nfs_write_data *data)
1456
{
1457
	struct nfs_page	*req;
1458
	int status = data->task.tk_status;
1459

L
Linus Torvalds 已提交
1460 1461 1462
	while (!list_empty(&data->pages)) {
		req = nfs_list_entry(data->pages.next);
		nfs_list_remove_request(req);
1463
		nfs_clear_request_commit(req);
L
Linus Torvalds 已提交
1464

1465
		dprintk("NFS:       commit (%s/%lld %d@%lld)",
1466 1467
			req->wb_context->dentry->d_sb->s_id,
			(long long)NFS_FILEID(req->wb_context->dentry->d_inode),
L
Linus Torvalds 已提交
1468 1469
			req->wb_bytes,
			(long long)req_offset(req));
1470 1471
		if (status < 0) {
			nfs_context_set_write_error(req->wb_context, status);
L
Linus Torvalds 已提交
1472
			nfs_inode_remove_request(req);
1473
			dprintk(", error = %d\n", status);
L
Linus Torvalds 已提交
1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486
			goto next;
		}

		/* Okay, COMMIT succeeded, apparently. Check the verifier
		 * returned by the server against all stored verfs. */
		if (!memcmp(req->wb_verf.verifier, data->verf.verifier, sizeof(data->verf.verifier))) {
			/* We have a match */
			nfs_inode_remove_request(req);
			dprintk(" OK\n");
			goto next;
		}
		/* We have a mismatch. Write the page again */
		dprintk(" mismatch\n");
F
Fred 已提交
1487
		nfs_mark_request_dirty(req);
L
Linus Torvalds 已提交
1488
	next:
1489
		nfs_clear_page_tag_locked(req);
L
Linus Torvalds 已提交
1490
	}
1491
}
1492
EXPORT_SYMBOL_GPL(nfs_commit_release_pages);
1493 1494 1495 1496 1497 1498

static void nfs_commit_release(void *calldata)
{
	struct nfs_write_data *data = calldata;

	nfs_commit_release_pages(data);
1499
	nfs_commit_clear_lock(NFS_I(data->inode));
1500
	nfs_commitdata_release(calldata);
L
Linus Torvalds 已提交
1501
}
1502 1503

static const struct rpc_call_ops nfs_commit_ops = {
1504 1505 1506
#if defined(CONFIG_NFS_V4_1)
	.rpc_call_prepare = nfs_write_prepare,
#endif /* CONFIG_NFS_V4_1 */
1507 1508 1509
	.rpc_call_done = nfs_commit_done,
	.rpc_release = nfs_commit_release,
};
L
Linus Torvalds 已提交
1510

1511
int nfs_commit_inode(struct inode *inode, int how)
L
Linus Torvalds 已提交
1512 1513
{
	LIST_HEAD(head);
1514
	int may_wait = how & FLUSH_SYNC;
1515
	int res;
L
Linus Torvalds 已提交
1516

1517 1518
	res = nfs_commit_set_lock(NFS_I(inode), may_wait);
	if (res <= 0)
1519
		goto out_mark_dirty;
1520
	res = nfs_scan_commit(inode, &head, 0, 0);
L
Linus Torvalds 已提交
1521
	if (res) {
1522 1523 1524 1525 1526
		int error;

		error = pnfs_commit_list(inode, &head, how);
		if (error == PNFS_NOT_ATTEMPTED)
			error = nfs_commit_list(inode, &head, how);
1527 1528
		if (error < 0)
			return error;
1529
		if (!may_wait)
1530
			goto out_mark_dirty;
1531 1532 1533 1534 1535 1536
		error = wait_on_bit(&NFS_I(inode)->flags,
				NFS_INO_COMMIT,
				nfs_wait_bit_killable,
				TASK_KILLABLE);
		if (error < 0)
			return error;
1537 1538
	} else
		nfs_commit_clear_lock(NFS_I(inode));
1539 1540 1541 1542 1543 1544 1545 1546
	return res;
	/* Note: If we exit without ensuring that the commit is complete,
	 * we must mark the inode as dirty. Otherwise, future calls to
	 * sync_inode() with the WB_SYNC_ALL flag set will fail to ensure
	 * that the data is on the disk.
	 */
out_mark_dirty:
	__mark_inode_dirty(inode, I_DIRTY_DATASYNC);
L
Linus Torvalds 已提交
1547 1548
	return res;
}
1549 1550 1551

static int nfs_commit_unstable_pages(struct inode *inode, struct writeback_control *wbc)
{
1552 1553 1554
	struct nfs_inode *nfsi = NFS_I(inode);
	int flags = FLUSH_SYNC;
	int ret = 0;
1555

1556 1557 1558 1559 1560 1561
	if (wbc->sync_mode == WB_SYNC_NONE) {
		/* Don't commit yet if this is a non-blocking flush and there
		 * are a lot of outstanding writes for this mapping.
		 */
		if (nfsi->ncommit <= (nfsi->npages >> 1))
			goto out_mark_dirty;
1562

1563
		/* don't wait for the COMMIT response */
1564
		flags = 0;
1565 1566
	}

1567 1568 1569 1570 1571 1572 1573 1574
	ret = nfs_commit_inode(inode, flags);
	if (ret >= 0) {
		if (wbc->sync_mode == WB_SYNC_NONE) {
			if (ret < wbc->nr_to_write)
				wbc->nr_to_write -= ret;
			else
				wbc->nr_to_write = 0;
		}
1575
		return 0;
1576 1577
	}
out_mark_dirty:
1578 1579 1580
	__mark_inode_dirty(inode, I_DIRTY_DATASYNC);
	return ret;
}
1581
#else
1582 1583 1584 1585
static int nfs_commit_unstable_pages(struct inode *inode, struct writeback_control *wbc)
{
	return 0;
}
L
Linus Torvalds 已提交
1586 1587
#endif

1588 1589
int nfs_write_inode(struct inode *inode, struct writeback_control *wbc)
{
A
Andy Adamson 已提交
1590 1591 1592 1593
	int ret;

	ret = nfs_commit_unstable_pages(inode, wbc);
	if (ret >= 0 && test_bit(NFS_INO_LAYOUTCOMMIT, &NFS_I(inode)->flags)) {
1594 1595
		int status;
		bool sync = true;
A
Andy Adamson 已提交
1596

1597
		if (wbc->sync_mode == WB_SYNC_NONE)
1598
			sync = false;
A
Andy Adamson 已提交
1599 1600 1601 1602 1603 1604

		status = pnfs_layoutcommit_inode(inode, sync);
		if (status < 0)
			return status;
	}
	return ret;
1605 1606
}

1607 1608 1609 1610
/*
 * flush the inode to disk.
 */
int nfs_wb_all(struct inode *inode)
T
Trond Myklebust 已提交
1611 1612
{
	struct writeback_control wbc = {
1613
		.sync_mode = WB_SYNC_ALL,
T
Trond Myklebust 已提交
1614
		.nr_to_write = LONG_MAX,
1615 1616
		.range_start = 0,
		.range_end = LLONG_MAX,
T
Trond Myklebust 已提交
1617 1618
	};

1619
	return sync_inode(inode, &wbc);
1620 1621
}

1622 1623 1624 1625 1626 1627 1628
int nfs_wb_page_cancel(struct inode *inode, struct page *page)
{
	struct nfs_page *req;
	int ret = 0;

	BUG_ON(!PageLocked(page));
	for (;;) {
1629
		wait_on_page_writeback(page);
1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643
		req = nfs_page_find_request(page);
		if (req == NULL)
			break;
		if (nfs_lock_request_dontget(req)) {
			nfs_inode_remove_request(req);
			/*
			 * In case nfs_inode_remove_request has marked the
			 * page as being dirty
			 */
			cancel_dirty_page(page, PAGE_CACHE_SIZE);
			nfs_unlock_request(req);
			break;
		}
		ret = nfs_wait_on_request(req);
1644
		nfs_release_request(req);
1645
		if (ret < 0)
1646
			break;
1647 1648 1649 1650
	}
	return ret;
}

T
Trond Myklebust 已提交
1651 1652 1653 1654
/*
 * Write back all requests on one page - we do this before reading it.
 */
int nfs_wb_page(struct inode *inode, struct page *page)
1655 1656 1657
{
	loff_t range_start = page_offset(page);
	loff_t range_end = range_start + (loff_t)(PAGE_CACHE_SIZE - 1);
1658 1659
	struct writeback_control wbc = {
		.sync_mode = WB_SYNC_ALL,
T
Trond Myklebust 已提交
1660
		.nr_to_write = 0,
1661 1662 1663 1664
		.range_start = range_start,
		.range_end = range_end,
	};
	int ret;
1665

1666
	for (;;) {
1667
		wait_on_page_writeback(page);
1668 1669 1670 1671
		if (clear_page_dirty_for_io(page)) {
			ret = nfs_writepage_locked(page, &wbc);
			if (ret < 0)
				goto out_error;
1672
			continue;
T
Trond Myklebust 已提交
1673
		}
1674 1675 1676
		if (!PagePrivate(page))
			break;
		ret = nfs_commit_inode(inode, FLUSH_SYNC);
1677
		if (ret < 0)
1678
			goto out_error;
T
Trond Myklebust 已提交
1679
	}
1680 1681
	return 0;
out_error:
1682
	return ret;
1683 1684
}

1685 1686 1687 1688 1689 1690 1691
#ifdef CONFIG_MIGRATION
int nfs_migrate_page(struct address_space *mapping, struct page *newpage,
		struct page *page)
{
	struct nfs_page *req;
	int ret;

1692
	nfs_fscache_release_page(page, GFP_KERNEL);
1693

1694
	req = nfs_find_and_lock_request(page, false);
1695 1696 1697 1698 1699 1700 1701 1702 1703 1704
	ret = PTR_ERR(req);
	if (IS_ERR(req))
		goto out;

	ret = migrate_page(mapping, newpage, page);
	if (!req)
		goto out;
	if (ret)
		goto out_unlock;
	page_cache_get(newpage);
T
Trond Myklebust 已提交
1705
	spin_lock(&mapping->host->i_lock);
1706 1707
	req->wb_page = newpage;
	SetPagePrivate(newpage);
T
Trond Myklebust 已提交
1708
	set_page_private(newpage, (unsigned long)req);
1709 1710
	ClearPagePrivate(page);
	set_page_private(page, 0);
T
Trond Myklebust 已提交
1711
	spin_unlock(&mapping->host->i_lock);
1712 1713 1714 1715 1716 1717 1718 1719
	page_cache_release(page);
out_unlock:
	nfs_clear_page_tag_locked(req);
out:
	return ret;
}
#endif

D
David Howells 已提交
1720
int __init nfs_init_writepagecache(void)
L
Linus Torvalds 已提交
1721 1722 1723 1724
{
	nfs_wdata_cachep = kmem_cache_create("nfs_write_data",
					     sizeof(struct nfs_write_data),
					     0, SLAB_HWCACHE_ALIGN,
1725
					     NULL);
L
Linus Torvalds 已提交
1726 1727 1728
	if (nfs_wdata_cachep == NULL)
		return -ENOMEM;

1729 1730
	nfs_wdata_mempool = mempool_create_slab_pool(MIN_POOL_WRITE,
						     nfs_wdata_cachep);
L
Linus Torvalds 已提交
1731 1732 1733
	if (nfs_wdata_mempool == NULL)
		return -ENOMEM;

1734 1735
	nfs_commit_mempool = mempool_create_slab_pool(MIN_POOL_COMMIT,
						      nfs_wdata_cachep);
L
Linus Torvalds 已提交
1736 1737 1738
	if (nfs_commit_mempool == NULL)
		return -ENOMEM;

1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758
	/*
	 * NFS congestion size, scale with available memory.
	 *
	 *  64MB:    8192k
	 * 128MB:   11585k
	 * 256MB:   16384k
	 * 512MB:   23170k
	 *   1GB:   32768k
	 *   2GB:   46340k
	 *   4GB:   65536k
	 *   8GB:   92681k
	 *  16GB:  131072k
	 *
	 * This allows larger machines to have larger/more transfers.
	 * Limit the default to 256M
	 */
	nfs_congestion_kb = (16*int_sqrt(totalram_pages)) << (PAGE_SHIFT-10);
	if (nfs_congestion_kb > 256*1024)
		nfs_congestion_kb = 256*1024;

L
Linus Torvalds 已提交
1759 1760 1761
	return 0;
}

1762
void nfs_destroy_writepagecache(void)
L
Linus Torvalds 已提交
1763 1764 1765
{
	mempool_destroy(nfs_commit_mempool);
	mempool_destroy(nfs_wdata_mempool);
1766
	kmem_cache_destroy(nfs_wdata_cachep);
L
Linus Torvalds 已提交
1767 1768
}