write.c 40.8 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>
L
Linus Torvalds 已提交
16 17 18 19 20

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

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

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

#define NFSDBG_FACILITY		NFSDBG_PAGECACHE

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

/*
 * Local function declarations
 */
38 39
static void nfs_pageio_init_write(struct nfs_pageio_descriptor *desc,
				  struct inode *inode, int ioflags);
40
static void nfs_redirty_request(struct nfs_page *req);
41 42 43
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 已提交
44

45
static struct kmem_cache *nfs_wdata_cachep;
46
static mempool_t *nfs_wdata_mempool;
L
Linus Torvalds 已提交
47 48
static mempool_t *nfs_commit_mempool;

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

L
Linus Torvalds 已提交
53 54 55
	if (p) {
		memset(p, 0, sizeof(*p));
		INIT_LIST_HEAD(&p->pages);
A
Andy Adamson 已提交
56
		p->res.seq_res.sr_slotid = NFS4_MAX_SLOT_TABLE;
L
Linus Torvalds 已提交
57 58 59 60
	}
	return p;
}

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

68
struct nfs_write_data *nfs_writedata_alloc(unsigned int pagecount)
69
{
C
Christoph Lameter 已提交
70
	struct nfs_write_data *p = mempool_alloc(nfs_wdata_mempool, GFP_NOFS);
71 72 73 74

	if (p) {
		memset(p, 0, sizeof(*p));
		INIT_LIST_HEAD(&p->pages);
75
		p->npages = pagecount;
A
Andy Adamson 已提交
76
		p->res.seq_res.sr_slotid = NFS4_MAX_SLOT_TABLE;
77 78
		if (pagecount <= ARRAY_SIZE(p->page_array))
			p->pagevec = p->page_array;
79
		else {
80 81
			p->pagevec = kcalloc(pagecount, sizeof(struct page *), GFP_NOFS);
			if (!p->pagevec) {
82 83 84 85 86 87 88 89
				mempool_free(p, nfs_wdata_mempool);
				p = NULL;
			}
		}
	}
	return p;
}

90
static void nfs_writedata_free(struct nfs_write_data *p)
91 92 93 94 95 96
{
	if (p && (p->pagevec != &p->page_array[0]))
		kfree(p->pagevec);
	mempool_free(p, nfs_wdata_mempool);
}

97
void nfs_writedata_release(void *data)
L
Linus Torvalds 已提交
98
{
99 100 101
	struct nfs_write_data *wdata = data;

	put_nfs_open_context(wdata->args.context);
L
Linus Torvalds 已提交
102 103 104
	nfs_writedata_free(wdata);
}

105 106 107 108 109 110 111
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);
}

112 113 114 115 116 117 118
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)
119
			kref_get(&req->wb_kref);
120 121 122 123 124 125
	}
	return req;
}

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

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

L
Linus Torvalds 已提交
135 136 137 138
/* 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;
139 140
	loff_t end, i_size;
	pgoff_t end_index;
L
Linus Torvalds 已提交
141

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

156 157 158 159 160 161 162
/* 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 已提交
163 164 165 166 167 168 169 170 171
/* 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;
172
	if (count != nfs_page_length(page))
L
Linus Torvalds 已提交
173
		return;
174
	SetPageUptodate(page);
L
Linus Torvalds 已提交
175 176 177 178 179
}

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

186 187 188 189 190 191 192 193 194 195
/*
 * 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))

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

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

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

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);
P
Peter Zijlstra 已提交
219
	if (atomic_long_dec_return(&nfss->writeback) < NFS_CONGESTION_OFF_THRESH)
220
		clear_bdi_congested(&nfss->backing_dev_info, BLK_RW_ASYNC);
221 222
}

223 224
/*
 * Find an associated nfs write request, and prepare to flush it out
T
Trond Myklebust 已提交
225
 * May return an error if the user signalled nfs_wait_on_request().
226
 */
227 228
static int nfs_page_async_flush(struct nfs_pageio_descriptor *pgio,
				struct page *page)
229
{
230
	struct inode *inode = page->mapping->host;
231 232 233
	struct nfs_page *req;
	int ret;

234
	spin_lock(&inode->i_lock);
235 236 237
	for(;;) {
		req = nfs_page_find_request_locked(page);
		if (req == NULL) {
238
			spin_unlock(&inode->i_lock);
T
Trond Myklebust 已提交
239
			return 0;
240
		}
241
		if (nfs_set_page_tag_locked(req))
242 243
			break;
		/* Note: If we hold the page lock, as is the case in nfs_writepage,
244
		 *	 then the call to nfs_set_page_tag_locked() will always
245 246 247
		 *	 succeed provided that someone hasn't already marked the
		 *	 request as dirty (in which case we don't care).
		 */
248
		spin_unlock(&inode->i_lock);
249 250 251 252
		ret = nfs_wait_on_request(req);
		nfs_release_request(req);
		if (ret != 0)
			return ret;
253
		spin_lock(&inode->i_lock);
254
	}
255
	if (test_bit(PG_CLEAN, &req->wb_flags)) {
256
		spin_unlock(&inode->i_lock);
257
		BUG();
258
	}
259
	if (nfs_set_page_writeback(page) != 0) {
260
		spin_unlock(&inode->i_lock);
261 262
		BUG();
	}
263
	spin_unlock(&inode->i_lock);
264 265 266 267
	if (!nfs_pageio_add_request(pgio, req)) {
		nfs_redirty_request(req);
		return pgio->pg_error;
	}
T
Trond Myklebust 已提交
268
	return 0;
269 270
}

T
Trond Myklebust 已提交
271
static int nfs_do_writepage(struct page *page, struct writeback_control *wbc, struct nfs_pageio_descriptor *pgio)
L
Linus Torvalds 已提交
272 273 274
{
	struct inode *inode = page->mapping->host;

C
Chuck Lever 已提交
275 276 277
	nfs_inc_stats(inode, NFSIOS_VFSWRITEPAGE);
	nfs_add_stats(inode, NFSIOS_WRITEPAGES, 1);

278
	nfs_pageio_cond_complete(pgio, page->index);
T
Trond Myklebust 已提交
279 280
	return nfs_page_async_flush(pgio, page);
}
281

T
Trond Myklebust 已提交
282 283 284 285 286 287 288
/*
 * 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;
289

T
Trond Myklebust 已提交
290 291 292 293 294 295 296 297
	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;
298 299 300 301
}

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

T
Trond Myklebust 已提交
304
	ret = nfs_writepage_locked(page, wbc);
L
Linus Torvalds 已提交
305
	unlock_page(page);
T
Trond Myklebust 已提交
306 307 308 309 310 311 312 313 314 315
	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 已提交
316 317 318 319 320
}

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

325 326 327 328 329 330
	/* 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 已提交
331 332
	nfs_inc_stats(inode, NFSIOS_VFSWRITEPAGES);

333
	nfs_pageio_init_write(&pgio, inode, wb_priority(wbc));
T
Trond Myklebust 已提交
334
	err = write_cache_pages(mapping, wbc, nfs_writepages_callback, &pgio);
335
	nfs_pageio_complete(&pgio);
336 337 338 339 340

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

T
Trond Myklebust 已提交
341
	if (err < 0)
342 343 344 345
		goto out_err;
	err = pgio.pg_error;
	if (err < 0)
		goto out_err;
346
	return 0;
347 348
out_err:
	return err;
L
Linus Torvalds 已提交
349 350 351 352 353
}

/*
 * Insert a write request into an inode
 */
354
static int nfs_inode_add_request(struct inode *inode, struct nfs_page *req)
L
Linus Torvalds 已提交
355 356 357 358
{
	struct nfs_inode *nfsi = NFS_I(inode);
	int error;

359 360 361 362 363 364 365 366
	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 已提交
367
	error = radix_tree_insert(&nfsi->nfs_page_tree, req->wb_index, req);
368
	BUG_ON(error);
L
Linus Torvalds 已提交
369 370 371 372 373
	if (!nfsi->npages) {
		igrab(inode);
		if (nfs_have_delegation(inode, FMODE_WRITE))
			nfsi->change_attr++;
	}
374
	SetPagePrivate(req->wb_page);
375
	set_page_private(req->wb_page, (unsigned long)req);
L
Linus Torvalds 已提交
376
	nfsi->npages++;
377
	kref_get(&req->wb_kref);
378 379
	radix_tree_tag_set(&nfsi->nfs_page_tree, req->wb_index,
				NFS_PAGE_TAG_LOCKED);
380 381 382 383
	spin_unlock(&inode->i_lock);
	radix_tree_preload_end();
out:
	return error;
L
Linus Torvalds 已提交
384 385 386
}

/*
387
 * Remove a write request from an inode
L
Linus Torvalds 已提交
388 389 390
 */
static void nfs_inode_remove_request(struct nfs_page *req)
{
391
	struct inode *inode = req->wb_context->path.dentry->d_inode;
L
Linus Torvalds 已提交
392 393 394 395
	struct nfs_inode *nfsi = NFS_I(inode);

	BUG_ON (!NFS_WBACK_BUSY(req));

396
	spin_lock(&inode->i_lock);
397
	set_page_private(req->wb_page, 0);
398
	ClearPagePrivate(req->wb_page);
L
Linus Torvalds 已提交
399 400 401
	radix_tree_delete(&nfsi->nfs_page_tree, req->wb_index);
	nfsi->npages--;
	if (!nfsi->npages) {
402
		spin_unlock(&inode->i_lock);
L
Linus Torvalds 已提交
403 404
		iput(inode);
	} else
405
		spin_unlock(&inode->i_lock);
L
Linus Torvalds 已提交
406 407 408 409
	nfs_clear_request(req);
	nfs_release_request(req);
}

410
static void
F
Fred 已提交
411
nfs_mark_request_dirty(struct nfs_page *req)
412 413 414 415
{
	__set_page_dirty_nobuffers(req->wb_page);
}

L
Linus Torvalds 已提交
416 417 418 419 420 421 422
#if defined(CONFIG_NFS_V3) || defined(CONFIG_NFS_V4)
/*
 * Add a request to the inode's commit list.
 */
static void
nfs_mark_request_commit(struct nfs_page *req)
{
423
	struct inode *inode = req->wb_context->path.dentry->d_inode;
L
Linus Torvalds 已提交
424 425
	struct nfs_inode *nfsi = NFS_I(inode);

426
	spin_lock(&inode->i_lock);
427
	set_bit(PG_CLEAN, &(req)->wb_flags);
428 429 430
	radix_tree_tag_set(&nfsi->nfs_page_tree,
			req->wb_index,
			NFS_PAGE_TAG_COMMIT);
431
	spin_unlock(&inode->i_lock);
432
	inc_zone_page_state(req->wb_page, NR_UNSTABLE_NFS);
433
	inc_bdi_stat(req->wb_page->mapping->backing_dev_info, BDI_RECLAIMABLE);
434
	__mark_inode_dirty(inode, I_DIRTY_DATASYNC);
L
Linus Torvalds 已提交
435
}
436

437 438 439 440 441 442 443 444 445 446 447 448 449
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;
}

450 451 452 453 454 455 456 457 458
static inline
int nfs_write_need_commit(struct nfs_write_data *data)
{
	return data->verf.committed != NFS_FILE_SYNC;
}

static inline
int nfs_reschedule_unstable_write(struct nfs_page *req)
{
459
	if (test_and_clear_bit(PG_NEED_COMMIT, &req->wb_flags)) {
460 461 462 463
		nfs_mark_request_commit(req);
		return 1;
	}
	if (test_and_clear_bit(PG_NEED_RESCHED, &req->wb_flags)) {
F
Fred 已提交
464
		nfs_mark_request_dirty(req);
465 466 467 468 469 470 471 472 473 474
		return 1;
	}
	return 0;
}
#else
static inline void
nfs_mark_request_commit(struct nfs_page *req)
{
}

475 476 477 478 479 480
static inline int
nfs_clear_request_commit(struct nfs_page *req)
{
	return 0;
}

481 482 483 484 485 486 487 488 489 490 491
static inline
int nfs_write_need_commit(struct nfs_write_data *data)
{
	return 0;
}

static inline
int nfs_reschedule_unstable_write(struct nfs_page *req)
{
	return 0;
}
L
Linus Torvalds 已提交
492 493 494 495 496
#endif

/*
 * Wait for a request to complete.
 *
497
 * Interruptible by fatal signals only.
L
Linus Torvalds 已提交
498
 */
499
static int nfs_wait_on_requests_locked(struct inode *inode, pgoff_t idx_start, unsigned int npages)
L
Linus Torvalds 已提交
500 501 502
{
	struct nfs_inode *nfsi = NFS_I(inode);
	struct nfs_page *req;
503
	pgoff_t idx_end, next;
L
Linus Torvalds 已提交
504 505 506 507 508 509 510 511 512
	unsigned int		res = 0;
	int			error;

	if (npages == 0)
		idx_end = ~0;
	else
		idx_end = idx_start + npages - 1;

	next = idx_start;
513
	while (radix_tree_gang_lookup_tag(&nfsi->nfs_page_tree, (void **)&req, next, 1, NFS_PAGE_TAG_LOCKED)) {
L
Linus Torvalds 已提交
514 515 516 517
		if (req->wb_index > idx_end)
			break;

		next = req->wb_index + 1;
518
		BUG_ON(!NFS_WBACK_BUSY(req));
L
Linus Torvalds 已提交
519

520
		kref_get(&req->wb_kref);
521
		spin_unlock(&inode->i_lock);
L
Linus Torvalds 已提交
522 523
		error = nfs_wait_on_request(req);
		nfs_release_request(req);
524
		spin_lock(&inode->i_lock);
L
Linus Torvalds 已提交
525 526 527 528 529 530 531
		if (error < 0)
			return error;
		res++;
	}
	return res;
}

T
Trond Myklebust 已提交
532 533 534 535 536 537 538
static void nfs_cancel_commit_list(struct list_head *head)
{
	struct nfs_page *req;

	while(!list_empty(head)) {
		req = nfs_list_entry(head->next);
		nfs_list_remove_request(req);
539
		nfs_clear_request_commit(req);
T
Trond Myklebust 已提交
540
		nfs_inode_remove_request(req);
541
		nfs_unlock_request(req);
T
Trond Myklebust 已提交
542 543 544
	}
}

T
Trond Myklebust 已提交
545
#if defined(CONFIG_NFS_V3) || defined(CONFIG_NFS_V4)
546 547 548 549 550 551
static int
nfs_need_commit(struct nfs_inode *nfsi)
{
	return radix_tree_tagged(&nfsi->nfs_page_tree, NFS_PAGE_TAG_COMMIT);
}

L
Linus Torvalds 已提交
552 553 554 555 556 557 558 559 560 561 562
/*
 * 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
563
nfs_scan_commit(struct inode *inode, struct list_head *dst, pgoff_t idx_start, unsigned int npages)
L
Linus Torvalds 已提交
564 565
{
	struct nfs_inode *nfsi = NFS_I(inode);
566

567 568 569 570
	if (!nfs_need_commit(nfsi))
		return 0;

	return nfs_scan_list(nfsi, dst, idx_start, npages, NFS_PAGE_TAG_COMMIT);
L
Linus Torvalds 已提交
571
}
572
#else
573 574 575 576 577
static inline int nfs_need_commit(struct nfs_inode *nfsi)
{
	return 0;
}

578
static inline int nfs_scan_commit(struct inode *inode, struct list_head *dst, pgoff_t idx_start, unsigned int npages)
579 580 581
{
	return 0;
}
L
Linus Torvalds 已提交
582 583 584
#endif

/*
585 586
 * Search for an existing write request, and attempt to update
 * it to reflect a new dirty region on a given page.
L
Linus Torvalds 已提交
587
 *
588 589
 * If the attempt fails, then the existing request is flushed out
 * to disk.
L
Linus Torvalds 已提交
590
 */
591 592 593 594
static struct nfs_page *nfs_try_to_update_request(struct inode *inode,
		struct page *page,
		unsigned int offset,
		unsigned int bytes)
L
Linus Torvalds 已提交
595
{
596 597 598 599 600 601 602
	struct nfs_page *req;
	unsigned int rqend;
	unsigned int end;
	int error;

	if (!PagePrivate(page))
		return NULL;
L
Linus Torvalds 已提交
603 604

	end = offset + bytes;
605
	spin_lock(&inode->i_lock);
L
Linus Torvalds 已提交
606 607

	for (;;) {
608
		req = nfs_page_find_request_locked(page);
609 610 611 612 613 614 615 616 617 618
		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.
		 */
619
		if (offset > rqend
620 621 622 623
		    || end < req->wb_offset)
			goto out_flushme;

		if (nfs_set_page_tag_locked(req))
L
Linus Torvalds 已提交
624 625
			break;

626
		/* The request is locked, so wait and then retry */
627
		spin_unlock(&inode->i_lock);
628 629 630 631 632
		error = nfs_wait_on_request(req);
		nfs_release_request(req);
		if (error != 0)
			goto out_err;
		spin_lock(&inode->i_lock);
L
Linus Torvalds 已提交
633 634
	}

635 636 637 638
	if (nfs_clear_request_commit(req))
		radix_tree_tag_clear(&NFS_I(inode)->nfs_page_tree,
				req->wb_index, NFS_PAGE_TAG_COMMIT);

L
Linus Torvalds 已提交
639 640 641 642 643 644 645
	/* 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;
646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671
	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 已提交
672

673 674 675 676 677 678 679 680 681 682 683
	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);
	}
684
out:
T
Trond Myklebust 已提交
685
	return req;
L
Linus Torvalds 已提交
686 687
}

688 689 690 691 692 693 694 695 696 697 698 699 700 701 702
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);
	nfs_clear_page_tag_locked(req);
	return 0;
}

L
Linus Torvalds 已提交
703 704
int nfs_flush_incompatible(struct file *file, struct page *page)
{
705
	struct nfs_open_context *ctx = nfs_file_open_context(file);
L
Linus Torvalds 已提交
706
	struct nfs_page	*req;
T
Trond Myklebust 已提交
707
	int do_flush, status;
L
Linus Torvalds 已提交
708 709 710 711 712 713 714 715
	/*
	 * 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 已提交
716 717 718 719
	do {
		req = nfs_page_find_request(page);
		if (req == NULL)
			return 0;
720
		do_flush = req->wb_page != page || req->wb_context != ctx;
L
Linus Torvalds 已提交
721
		nfs_release_request(req);
T
Trond Myklebust 已提交
722 723 724 725 726
		if (!do_flush)
			return 0;
		status = nfs_wb_page(page->mapping->host, page);
	} while (status == 0);
	return status;
L
Linus Torvalds 已提交
727 728
}

729 730 731 732 733 734 735 736 737 738 739
/*
 * 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 已提交
740 741 742 743 744 745 746 747 748
/*
 * 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)
{
749
	struct nfs_open_context *ctx = nfs_file_open_context(file);
L
Linus Torvalds 已提交
750 751 752
	struct inode	*inode = page->mapping->host;
	int		status = 0;

C
Chuck Lever 已提交
753 754
	nfs_inc_stats(inode, NFSIOS_VFSUPDATEPAGE);

755
	dprintk("NFS:       nfs_updatepage(%s/%s %d@%lld)\n",
756 757
		file->f_path.dentry->d_parent->d_name.name,
		file->f_path.dentry->d_name.name, count,
758
		(long long)(page_offset(page) + offset));
L
Linus Torvalds 已提交
759 760

	/* If we're not using byte range locks, and we know the page
761 762 763
	 * 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 已提交
764
	 */
765 766
	if (nfs_write_pageuptodate(page, inode) &&
			inode->i_flock == NULL &&
767
			!(file->f_flags & O_SYNC)) {
768
		count = max(count + offset, nfs_page_length(page));
L
Linus Torvalds 已提交
769 770 771
		offset = 0;
	}

772
	status = nfs_writepage_setup(ctx, page, offset, count);
773 774 775 776
	if (status < 0)
		nfs_set_pageerror(page);
	else
		__set_page_dirty_nobuffers(page);
L
Linus Torvalds 已提交
777

778
	dprintk("NFS:       nfs_updatepage returns %d (isize %lld)\n",
L
Linus Torvalds 已提交
779 780 781 782 783 784 785
			status, (long long)i_size_read(inode));
	return status;
}

static void nfs_writepage_release(struct nfs_page *req)
{

T
Trond Myklebust 已提交
786
	if (PageError(req->wb_page) || !nfs_reschedule_unstable_write(req)) {
787 788 789 790
		nfs_end_page_writeback(req->wb_page);
		nfs_inode_remove_request(req);
	} else
		nfs_end_page_writeback(req->wb_page);
791
	nfs_clear_page_tag_locked(req);
L
Linus Torvalds 已提交
792 793
}

794
static int flush_task_priority(int how)
L
Linus Torvalds 已提交
795 796 797 798 799 800 801 802 803 804 805 806 807
{
	switch (how & (FLUSH_HIGHPRI|FLUSH_LOWPRI)) {
		case FLUSH_HIGHPRI:
			return RPC_PRIORITY_HIGH;
		case FLUSH_LOWPRI:
			return RPC_PRIORITY_LOW;
	}
	return RPC_PRIORITY_NORMAL;
}

/*
 * Set up the argument/result storage required for the RPC call.
 */
808
static int nfs_write_rpcsetup(struct nfs_page *req,
L
Linus Torvalds 已提交
809
		struct nfs_write_data *data,
810
		const struct rpc_call_ops *call_ops,
L
Linus Torvalds 已提交
811 812 813
		unsigned int count, unsigned int offset,
		int how)
{
814 815
	struct inode *inode = req->wb_context->path.dentry->d_inode;
	int flags = (how & FLUSH_SYNC) ? 0 : RPC_TASK_ASYNC;
816
	int priority = flush_task_priority(how);
817
	struct rpc_task *task;
818 819 820 821 822
	struct rpc_message msg = {
		.rpc_argp = &data->args,
		.rpc_resp = &data->res,
		.rpc_cred = req->wb_context->cred,
	};
823 824
	struct rpc_task_setup task_setup_data = {
		.rpc_client = NFS_CLIENT(inode),
825
		.task = &data->task,
826
		.rpc_message = &msg,
827 828
		.callback_ops = call_ops,
		.callback_data = data,
829
		.workqueue = nfsiod_workqueue,
830
		.flags = flags,
831
		.priority = priority,
832
	};
L
Linus Torvalds 已提交
833 834 835 836 837

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

	data->req = req;
838
	data->inode = inode = req->wb_context->path.dentry->d_inode;
839
	data->cred = msg.rpc_cred;
L
Linus Torvalds 已提交
840 841 842 843 844 845

	data->args.fh     = NFS_FH(inode);
	data->args.offset = req_offset(req) + offset;
	data->args.pgbase = req->wb_pgbase + offset;
	data->args.pages  = data->pagevec;
	data->args.count  = count;
846
	data->args.context = get_nfs_open_context(req->wb_context);
847 848 849
	data->args.stable  = NFS_UNSTABLE;
	if (how & FLUSH_STABLE) {
		data->args.stable = NFS_DATA_SYNC;
850
		if (!nfs_need_commit(NFS_I(inode)))
851 852
			data->args.stable = NFS_FILE_SYNC;
	}
L
Linus Torvalds 已提交
853 854 855 856

	data->res.fattr   = &data->fattr;
	data->res.count   = count;
	data->res.verf    = &data->verf;
857
	nfs_fattr_init(&data->fattr);
L
Linus Torvalds 已提交
858

859
	/* Set up the initial task struct.  */
860
	NFS_PROTO(inode)->write_setup(data, &msg);
L
Linus Torvalds 已提交
861

C
Chuck Lever 已提交
862
	dprintk("NFS: %5u initiated write call "
863
		"(req %s/%lld, %u bytes @ offset %llu)\n",
864
		data->task.tk_pid,
L
Linus Torvalds 已提交
865 866 867 868 869
		inode->i_sb->s_id,
		(long long)NFS_FILEID(inode),
		count,
		(unsigned long long)data->args.offset);

870
	task = rpc_run_task(&task_setup_data);
871 872 873 874
	if (IS_ERR(task))
		return PTR_ERR(task);
	rpc_put_task(task);
	return 0;
L
Linus Torvalds 已提交
875 876
}

F
Fred 已提交
877 878 879 880 881 882 883 884 885 886 887
/* 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)
{
	nfs_mark_request_dirty(req);
	nfs_end_page_writeback(req->wb_page);
	nfs_clear_page_tag_locked(req);
}

L
Linus Torvalds 已提交
888 889 890 891
/*
 * Generate multiple small requests to write out a single
 * contiguous dirty area on one page.
 */
892
static int nfs_flush_multi(struct inode *inode, struct list_head *head, unsigned int npages, size_t count, int how)
L
Linus Torvalds 已提交
893 894 895 896
{
	struct nfs_page *req = nfs_list_entry(head->next);
	struct page *page = req->wb_page;
	struct nfs_write_data *data;
897 898
	size_t wsize = NFS_SERVER(inode)->wsize, nbytes;
	unsigned int offset;
L
Linus Torvalds 已提交
899
	int requests = 0;
900
	int ret = 0;
L
Linus Torvalds 已提交
901 902 903 904
	LIST_HEAD(list);

	nfs_list_remove_request(req);

905
	nbytes = count;
906 907 908
	do {
		size_t len = min(nbytes, wsize);

909
		data = nfs_writedata_alloc(1);
L
Linus Torvalds 已提交
910 911 912 913
		if (!data)
			goto out_bad;
		list_add(&data->pages, &list);
		requests++;
914 915
		nbytes -= len;
	} while (nbytes != 0);
L
Linus Torvalds 已提交
916 917 918 919
	atomic_set(&req->wb_complete, requests);

	ClearPageError(page);
	offset = 0;
920
	nbytes = count;
L
Linus Torvalds 已提交
921
	do {
922 923
		int ret2;

L
Linus Torvalds 已提交
924 925 926 927 928
		data = list_entry(list.next, struct nfs_write_data, pages);
		list_del_init(&data->pages);

		data->pagevec[0] = page;

929 930
		if (nbytes < wsize)
			wsize = nbytes;
931
		ret2 = nfs_write_rpcsetup(req, data, &nfs_write_partial_ops,
932
				   wsize, offset, how);
933 934
		if (ret == 0)
			ret = ret2;
935 936
		offset += wsize;
		nbytes -= wsize;
L
Linus Torvalds 已提交
937 938
	} while (nbytes != 0);

939
	return ret;
L
Linus Torvalds 已提交
940 941 942 943 944

out_bad:
	while (!list_empty(&list)) {
		data = list_entry(list.next, struct nfs_write_data, pages);
		list_del(&data->pages);
945
		nfs_writedata_release(data);
L
Linus Torvalds 已提交
946
	}
947
	nfs_redirty_request(req);
L
Linus Torvalds 已提交
948 949 950 951 952 953 954 955 956 957 958
	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.
 */
959
static int nfs_flush_one(struct inode *inode, struct list_head *head, unsigned int npages, size_t count, int how)
L
Linus Torvalds 已提交
960 961 962 963 964
{
	struct nfs_page		*req;
	struct page		**pages;
	struct nfs_write_data	*data;

965
	data = nfs_writedata_alloc(npages);
L
Linus Torvalds 已提交
966 967 968 969 970 971 972 973 974 975 976 977 978 979
	if (!data)
		goto out_bad;

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

	/* Set up the argument struct */
980
	return nfs_write_rpcsetup(req, data, &nfs_write_full_ops, count, 0, how);
L
Linus Torvalds 已提交
981 982
 out_bad:
	while (!list_empty(head)) {
983
		req = nfs_list_entry(head->next);
L
Linus Torvalds 已提交
984
		nfs_list_remove_request(req);
985
		nfs_redirty_request(req);
L
Linus Torvalds 已提交
986 987 988 989
	}
	return -ENOMEM;
}

990 991
static void nfs_pageio_init_write(struct nfs_pageio_descriptor *pgio,
				  struct inode *inode, int ioflags)
L
Linus Torvalds 已提交
992
{
993
	size_t wsize = NFS_SERVER(inode)->wsize;
L
Linus Torvalds 已提交
994

995
	if (wsize < PAGE_CACHE_SIZE)
996
		nfs_pageio_init(pgio, inode, nfs_flush_multi, wsize, ioflags);
997
	else
998
		nfs_pageio_init(pgio, inode, nfs_flush_one, wsize, ioflags);
L
Linus Torvalds 已提交
999 1000 1001 1002 1003
}

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

1008 1009 1010 1011 1012 1013
	dprintk("NFS: %5u write(%s/%lld %d@%lld)",
		task->tk_pid,
		data->req->wb_context->path.dentry->d_inode->i_sb->s_id,
		(long long)
		  NFS_FILEID(data->req->wb_context->path.dentry->d_inode),
		data->req->wb_bytes, (long long)req_offset(data->req));
L
Linus Torvalds 已提交
1014

1015 1016
	nfs_writeback_done(task, data);
}
1017

1018 1019 1020 1021 1022 1023 1024 1025
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) {
1026
		nfs_set_pageerror(page);
1027 1028
		nfs_context_set_write_error(req->wb_context, status);
		dprintk(", error = %d\n", status);
1029
		goto out;
L
Linus Torvalds 已提交
1030 1031
	}

1032
	if (nfs_write_need_commit(data)) {
1033
		struct inode *inode = page->mapping->host;
1034

1035
		spin_lock(&inode->i_lock);
1036 1037 1038 1039 1040 1041 1042 1043 1044 1045
		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");
		}
1046
		spin_unlock(&inode->i_lock);
1047 1048 1049 1050
	} else
		dprintk(" OK\n");

out:
L
Linus Torvalds 已提交
1051 1052
	if (atomic_dec_and_test(&req->wb_complete))
		nfs_writepage_release(req);
1053
	nfs_writedata_release(calldata);
L
Linus Torvalds 已提交
1054 1055
}

1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068
#if defined(CONFIG_NFS_V4_1)
void nfs_write_prepare(struct rpc_task *task, void *calldata)
{
	struct nfs_write_data *data = calldata;
	struct nfs_client *clp = (NFS_SERVER(data->inode))->nfs_client;

	if (nfs4_setup_sequence(clp, &data->args.seq_args,
				&data->res.seq_res, 1, task))
		return;
	rpc_call_start(task);
}
#endif /* CONFIG_NFS_V4_1 */

1069
static const struct rpc_call_ops nfs_write_partial_ops = {
1070 1071 1072
#if defined(CONFIG_NFS_V4_1)
	.rpc_call_prepare = nfs_write_prepare,
#endif /* CONFIG_NFS_V4_1 */
1073
	.rpc_call_done = nfs_writeback_done_partial,
1074
	.rpc_release = nfs_writeback_release_partial,
1075 1076
};

L
Linus Torvalds 已提交
1077 1078 1079 1080 1081 1082 1083
/*
 * 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.
 */
1084
static void nfs_writeback_done_full(struct rpc_task *task, void *calldata)
L
Linus Torvalds 已提交
1085
{
1086
	struct nfs_write_data	*data = calldata;
L
Linus Torvalds 已提交
1087

1088 1089 1090 1091 1092 1093 1094
	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;
1095

L
Linus Torvalds 已提交
1096 1097
	/* Update attributes as result of writeback. */
	while (!list_empty(&data->pages)) {
1098 1099 1100
		struct nfs_page *req = nfs_list_entry(data->pages.next);
		struct page *page = req->wb_page;

L
Linus Torvalds 已提交
1101 1102
		nfs_list_remove_request(req);

1103 1104
		dprintk("NFS: %5u write (%s/%lld %d@%lld)",
			data->task.tk_pid,
1105 1106
			req->wb_context->path.dentry->d_inode->i_sb->s_id,
			(long long)NFS_FILEID(req->wb_context->path.dentry->d_inode),
L
Linus Torvalds 已提交
1107 1108 1109
			req->wb_bytes,
			(long long)req_offset(req));

1110
		if (status < 0) {
1111
			nfs_set_pageerror(page);
1112 1113
			nfs_context_set_write_error(req->wb_context, status);
			dprintk(", error = %d\n", status);
1114
			goto remove_request;
L
Linus Torvalds 已提交
1115 1116
		}

1117 1118 1119 1120 1121
		if (nfs_write_need_commit(data)) {
			memcpy(&req->wb_verf, &data->verf, sizeof(req->wb_verf));
			nfs_mark_request_commit(req);
			nfs_end_page_writeback(page);
			dprintk(" marked for commit\n");
L
Linus Torvalds 已提交
1122 1123
			goto next;
		}
1124 1125 1126
		dprintk(" OK\n");
remove_request:
		nfs_end_page_writeback(page);
L
Linus Torvalds 已提交
1127 1128
		nfs_inode_remove_request(req);
	next:
1129
		nfs_clear_page_tag_locked(req);
L
Linus Torvalds 已提交
1130
	}
1131
	nfs_writedata_release(calldata);
L
Linus Torvalds 已提交
1132 1133
}

1134
static const struct rpc_call_ops nfs_write_full_ops = {
1135 1136 1137
#if defined(CONFIG_NFS_V4_1)
	.rpc_call_prepare = nfs_write_prepare,
#endif /* CONFIG_NFS_V4_1 */
1138
	.rpc_call_done = nfs_writeback_done_full,
1139
	.rpc_release = nfs_writeback_release_full,
1140 1141 1142
};


L
Linus Torvalds 已提交
1143 1144 1145
/*
 * This function is called when the WRITE call is complete.
 */
1146
int nfs_writeback_done(struct rpc_task *task, struct nfs_write_data *data)
L
Linus Torvalds 已提交
1147 1148 1149
{
	struct nfs_writeargs	*argp = &data->args;
	struct nfs_writeres	*resp = &data->res;
1150
	struct nfs_server	*server = NFS_SERVER(data->inode);
1151
	int status;
L
Linus Torvalds 已提交
1152

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

1156 1157 1158 1159 1160 1161 1162
	/*
	 * ->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.
	 */
1163 1164 1165
	status = NFS_PROTO(data->inode)->write_done(task, data);
	if (status != 0)
		return status;
C
Chuck Lever 已提交
1166 1167
	nfs_add_stats(data->inode, NFSIOS_SERVERWRITTENBYTES, resp->count);

L
Linus Torvalds 已提交
1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180
#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;

		if (time_before(complain, jiffies)) {
1181
			dprintk("NFS:       faulty NFS server %s:"
L
Linus Torvalds 已提交
1182
				" (committed = %d) != (stable = %d)\n",
1183
				server->nfs_client->cl_hostname,
L
Linus Torvalds 已提交
1184 1185 1186 1187 1188 1189 1190 1191 1192
				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 已提交
1193 1194
		nfs_inc_stats(data->inode, NFSIOS_SHORTWRITE);

L
Linus Torvalds 已提交
1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208
		/* 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 */
				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;
			}
1209
			nfs4_restart_rpc(task, server->nfs_client);
1210
			return -EAGAIN;
L
Linus Torvalds 已提交
1211 1212 1213 1214 1215 1216 1217 1218 1219 1220
		}
		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;
	}
1221
	nfs4_sequence_free_slot(server->nfs_client, &data->res.seq_res);
1222
	return 0;
L
Linus Torvalds 已提交
1223 1224 1225 1226
}


#if defined(CONFIG_NFS_V3) || defined(CONFIG_NFS_V4)
1227
void nfs_commitdata_release(void *data)
L
Linus Torvalds 已提交
1228
{
1229 1230 1231
	struct nfs_write_data *wdata = data;

	put_nfs_open_context(wdata->args.context);
L
Linus Torvalds 已提交
1232 1233 1234 1235 1236 1237
	nfs_commit_free(wdata);
}

/*
 * Set up the argument/result storage required for the RPC call.
 */
1238
static int nfs_commit_rpcsetup(struct list_head *head,
1239 1240
		struct nfs_write_data *data,
		int how)
L
Linus Torvalds 已提交
1241
{
1242 1243 1244
	struct nfs_page *first = nfs_list_entry(head->next);
	struct inode *inode = first->wb_context->path.dentry->d_inode;
	int flags = (how & FLUSH_SYNC) ? 0 : RPC_TASK_ASYNC;
1245
	int priority = flush_task_priority(how);
1246
	struct rpc_task *task;
1247 1248 1249 1250 1251
	struct rpc_message msg = {
		.rpc_argp = &data->args,
		.rpc_resp = &data->res,
		.rpc_cred = first->wb_context->cred,
	};
1252
	struct rpc_task_setup task_setup_data = {
1253
		.task = &data->task,
1254
		.rpc_client = NFS_CLIENT(inode),
1255
		.rpc_message = &msg,
1256 1257
		.callback_ops = &nfs_commit_ops,
		.callback_data = data,
1258
		.workqueue = nfsiod_workqueue,
1259
		.flags = flags,
1260
		.priority = priority,
1261
	};
L
Linus Torvalds 已提交
1262 1263 1264 1265 1266 1267 1268

	/* 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;
1269
	data->cred	  = msg.rpc_cred;
L
Linus Torvalds 已提交
1270 1271

	data->args.fh     = NFS_FH(data->inode);
1272 1273 1274
	/* Note: we always request a commit of the entire inode */
	data->args.offset = 0;
	data->args.count  = 0;
1275
	data->args.context = get_nfs_open_context(first->wb_context);
1276
	data->res.count   = 0;
L
Linus Torvalds 已提交
1277 1278
	data->res.fattr   = &data->fattr;
	data->res.verf    = &data->verf;
1279
	nfs_fattr_init(&data->fattr);
1280 1281

	/* Set up the initial task struct.  */
1282
	NFS_PROTO(inode)->commit_setup(data, &msg);
L
Linus Torvalds 已提交
1283

C
Chuck Lever 已提交
1284
	dprintk("NFS: %5u initiated commit call\n", data->task.tk_pid);
1285

1286
	task = rpc_run_task(&task_setup_data);
1287 1288 1289 1290
	if (IS_ERR(task))
		return PTR_ERR(task);
	rpc_put_task(task);
	return 0;
L
Linus Torvalds 已提交
1291 1292 1293 1294 1295 1296
}

/*
 * Commit dirty pages
 */
static int
1297
nfs_commit_list(struct inode *inode, struct list_head *head, int how)
L
Linus Torvalds 已提交
1298 1299 1300 1301
{
	struct nfs_write_data	*data;
	struct nfs_page         *req;

1302
	data = nfs_commitdata_alloc();
L
Linus Torvalds 已提交
1303 1304 1305 1306 1307

	if (!data)
		goto out_bad;

	/* Set up the argument struct */
1308
	return nfs_commit_rpcsetup(head, data, how);
L
Linus Torvalds 已提交
1309 1310 1311 1312 1313
 out_bad:
	while (!list_empty(head)) {
		req = nfs_list_entry(head->next);
		nfs_list_remove_request(req);
		nfs_mark_request_commit(req);
T
Trond Myklebust 已提交
1314
		dec_zone_page_state(req->wb_page, NR_UNSTABLE_NFS);
1315 1316
		dec_bdi_stat(req->wb_page->mapping->backing_dev_info,
				BDI_RECLAIMABLE);
1317
		nfs_clear_page_tag_locked(req);
L
Linus Torvalds 已提交
1318 1319 1320 1321 1322 1323 1324
	}
	return -ENOMEM;
}

/*
 * COMMIT call returned
 */
1325
static void nfs_commit_done(struct rpc_task *task, void *calldata)
L
Linus Torvalds 已提交
1326
{
1327
	struct nfs_write_data	*data = calldata;
L
Linus Torvalds 已提交
1328

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

1332 1333 1334
	/* Call the NFS version-specific code */
	if (NFS_PROTO(data->inode)->commit_done(task, data) != 0)
		return;
1335 1336 1337 1338 1339 1340 1341
}

static void nfs_commit_release(void *calldata)
{
	struct nfs_write_data	*data = calldata;
	struct nfs_page		*req;
	int status = data->task.tk_status;
1342

L
Linus Torvalds 已提交
1343 1344 1345
	while (!list_empty(&data->pages)) {
		req = nfs_list_entry(data->pages.next);
		nfs_list_remove_request(req);
1346
		nfs_clear_request_commit(req);
L
Linus Torvalds 已提交
1347

1348
		dprintk("NFS:       commit (%s/%lld %d@%lld)",
1349 1350
			req->wb_context->path.dentry->d_inode->i_sb->s_id,
			(long long)NFS_FILEID(req->wb_context->path.dentry->d_inode),
L
Linus Torvalds 已提交
1351 1352
			req->wb_bytes,
			(long long)req_offset(req));
1353 1354
		if (status < 0) {
			nfs_context_set_write_error(req->wb_context, status);
L
Linus Torvalds 已提交
1355
			nfs_inode_remove_request(req);
1356
			dprintk(", error = %d\n", status);
L
Linus Torvalds 已提交
1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369
			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 已提交
1370
		nfs_mark_request_dirty(req);
L
Linus Torvalds 已提交
1371
	next:
1372
		nfs_clear_page_tag_locked(req);
L
Linus Torvalds 已提交
1373
	}
1374
	nfs_commitdata_release(calldata);
L
Linus Torvalds 已提交
1375
}
1376 1377

static const struct rpc_call_ops nfs_commit_ops = {
1378 1379 1380
#if defined(CONFIG_NFS_V4_1)
	.rpc_call_prepare = nfs_write_prepare,
#endif /* CONFIG_NFS_V4_1 */
1381 1382 1383
	.rpc_call_done = nfs_commit_done,
	.rpc_release = nfs_commit_release,
};
L
Linus Torvalds 已提交
1384

1385
int nfs_commit_inode(struct inode *inode, int how)
L
Linus Torvalds 已提交
1386 1387
{
	LIST_HEAD(head);
T
Trond Myklebust 已提交
1388
	int res;
L
Linus Torvalds 已提交
1389

1390
	spin_lock(&inode->i_lock);
1391
	res = nfs_scan_commit(inode, &head, 0, 0);
1392
	spin_unlock(&inode->i_lock);
L
Linus Torvalds 已提交
1393
	if (res) {
T
Trond Myklebust 已提交
1394
		int error = nfs_commit_list(inode, &head, how);
1395 1396 1397
		if (error < 0)
			return error;
	}
L
Linus Torvalds 已提交
1398 1399
	return res;
}
1400 1401 1402 1403 1404
#else
static inline int nfs_commit_list(struct inode *inode, struct list_head *head, int how)
{
	return 0;
}
L
Linus Torvalds 已提交
1405 1406
#endif

1407
long nfs_sync_mapping_wait(struct address_space *mapping, struct writeback_control *wbc, int how)
L
Linus Torvalds 已提交
1408
{
1409
	struct inode *inode = mapping->host;
1410
	pgoff_t idx_start, idx_end;
1411
	unsigned int npages = 0;
1412
	LIST_HEAD(head);
1413
	int nocommit = how & FLUSH_NOCOMMIT;
T
Trond Myklebust 已提交
1414
	long pages, ret;
L
Linus Torvalds 已提交
1415

1416 1417 1418 1419 1420 1421 1422
	/* FIXME */
	if (wbc->range_cyclic)
		idx_start = 0;
	else {
		idx_start = wbc->range_start >> PAGE_CACHE_SHIFT;
		idx_end = wbc->range_end >> PAGE_CACHE_SHIFT;
		if (idx_end > idx_start) {
1423
			pgoff_t l_npages = 1 + idx_end - idx_start;
1424 1425
			npages = l_npages;
			if (sizeof(npages) != sizeof(l_npages) &&
1426
					(pgoff_t)npages != l_npages)
1427 1428 1429
				npages = 0;
		}
	}
1430
	how &= ~FLUSH_NOCOMMIT;
1431
	spin_lock(&inode->i_lock);
L
Linus Torvalds 已提交
1432
	do {
1433 1434
		ret = nfs_wait_on_requests_locked(inode, idx_start, npages);
		if (ret != 0)
1435
			continue;
1436 1437
		if (nocommit)
			break;
1438
		pages = nfs_scan_commit(inode, &head, idx_start, npages);
1439
		if (pages == 0)
1440
			break;
1441
		if (how & FLUSH_INVALIDATE) {
1442
			spin_unlock(&inode->i_lock);
T
Trond Myklebust 已提交
1443
			nfs_cancel_commit_list(&head);
1444
			ret = pages;
1445
			spin_lock(&inode->i_lock);
1446 1447 1448
			continue;
		}
		pages += nfs_scan_commit(inode, &head, 0, 0);
1449
		spin_unlock(&inode->i_lock);
1450
		ret = nfs_commit_list(inode, &head, how);
1451 1452
		spin_lock(&inode->i_lock);

1453
	} while (ret >= 0);
1454
	spin_unlock(&inode->i_lock);
1455
	return ret;
L
Linus Torvalds 已提交
1456 1457
}

T
Trond Myklebust 已提交
1458
static int __nfs_write_mapping(struct address_space *mapping, struct writeback_control *wbc, int how)
1459 1460 1461
{
	int ret;

T
Trond Myklebust 已提交
1462
	ret = nfs_writepages(mapping, wbc);
1463 1464
	if (ret < 0)
		goto out;
T
Trond Myklebust 已提交
1465
	ret = nfs_sync_mapping_wait(mapping, wbc, how);
1466 1467 1468
	if (ret < 0)
		goto out;
	return 0;
1469
out:
1470
	__mark_inode_dirty(mapping->host, I_DIRTY_PAGES);
1471 1472 1473
	return ret;
}

T
Trond Myklebust 已提交
1474 1475 1476 1477 1478
/* Two pass sync: first using WB_SYNC_NONE, then WB_SYNC_ALL */
static int nfs_write_mapping(struct address_space *mapping, int how)
{
	struct writeback_control wbc = {
		.bdi = mapping->backing_dev_info,
1479
		.sync_mode = WB_SYNC_ALL,
T
Trond Myklebust 已提交
1480
		.nr_to_write = LONG_MAX,
1481 1482
		.range_start = 0,
		.range_end = LLONG_MAX,
T
Trond Myklebust 已提交
1483 1484 1485 1486 1487 1488
		.for_writepages = 1,
	};

	return __nfs_write_mapping(mapping, &wbc, how);
}

1489 1490 1491 1492
/*
 * flush the inode to disk.
 */
int nfs_wb_all(struct inode *inode)
1493
{
1494 1495
	return nfs_write_mapping(inode->i_mapping, 0);
}
1496

1497 1498 1499
int nfs_wb_nocommit(struct inode *inode)
{
	return nfs_write_mapping(inode->i_mapping, FLUSH_NOCOMMIT);
1500 1501
}

1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520
int nfs_wb_page_cancel(struct inode *inode, struct page *page)
{
	struct nfs_page *req;
	loff_t range_start = page_offset(page);
	loff_t range_end = range_start + (loff_t)(PAGE_CACHE_SIZE - 1);
	struct writeback_control wbc = {
		.bdi = page->mapping->backing_dev_info,
		.sync_mode = WB_SYNC_ALL,
		.nr_to_write = LONG_MAX,
		.range_start = range_start,
		.range_end = range_end,
	};
	int ret = 0;

	BUG_ON(!PageLocked(page));
	for (;;) {
		req = nfs_page_find_request(page);
		if (req == NULL)
			goto out;
1521
		if (test_bit(PG_CLEAN, &req->wb_flags)) {
1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545
			nfs_release_request(req);
			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);
		if (ret < 0)
			goto out;
	}
	if (!PagePrivate(page))
		return 0;
	ret = nfs_sync_mapping_wait(page->mapping, &wbc, FLUSH_INVALIDATE);
out:
	return ret;
}

1546 1547
static int nfs_wb_page_priority(struct inode *inode, struct page *page,
				int how)
1548 1549 1550
{
	loff_t range_start = page_offset(page);
	loff_t range_end = range_start + (loff_t)(PAGE_CACHE_SIZE - 1);
1551 1552 1553 1554 1555 1556 1557 1558
	struct writeback_control wbc = {
		.bdi = page->mapping->backing_dev_info,
		.sync_mode = WB_SYNC_ALL,
		.nr_to_write = LONG_MAX,
		.range_start = range_start,
		.range_end = range_end,
	};
	int ret;
1559

1560 1561 1562 1563 1564 1565 1566 1567
	do {
		if (clear_page_dirty_for_io(page)) {
			ret = nfs_writepage_locked(page, &wbc);
			if (ret < 0)
				goto out_error;
		} else if (!PagePrivate(page))
			break;
		ret = nfs_sync_mapping_wait(page->mapping, &wbc, how);
1568
		if (ret < 0)
1569 1570 1571 1572
			goto out_error;
	} while (PagePrivate(page));
	return 0;
out_error:
1573
	__mark_inode_dirty(inode, I_DIRTY_PAGES);
1574
	return ret;
1575 1576 1577 1578 1579 1580 1581
}

/*
 * Write back all requests on one page - we do this before reading it.
 */
int nfs_wb_page(struct inode *inode, struct page* page)
{
1582
	return nfs_wb_page_priority(inode, page, FLUSH_STABLE);
1583 1584
}

D
David Howells 已提交
1585
int __init nfs_init_writepagecache(void)
L
Linus Torvalds 已提交
1586 1587 1588 1589
{
	nfs_wdata_cachep = kmem_cache_create("nfs_write_data",
					     sizeof(struct nfs_write_data),
					     0, SLAB_HWCACHE_ALIGN,
1590
					     NULL);
L
Linus Torvalds 已提交
1591 1592 1593
	if (nfs_wdata_cachep == NULL)
		return -ENOMEM;

1594 1595
	nfs_wdata_mempool = mempool_create_slab_pool(MIN_POOL_WRITE,
						     nfs_wdata_cachep);
L
Linus Torvalds 已提交
1596 1597 1598
	if (nfs_wdata_mempool == NULL)
		return -ENOMEM;

1599 1600
	nfs_commit_mempool = mempool_create_slab_pool(MIN_POOL_COMMIT,
						      nfs_wdata_cachep);
L
Linus Torvalds 已提交
1601 1602 1603
	if (nfs_commit_mempool == NULL)
		return -ENOMEM;

1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623
	/*
	 * 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 已提交
1624 1625 1626
	return 0;
}

1627
void nfs_destroy_writepagecache(void)
L
Linus Torvalds 已提交
1628 1629 1630
{
	mempool_destroy(nfs_commit_mempool);
	mempool_destroy(nfs_wdata_mempool);
1631
	kmem_cache_destroy(nfs_wdata_cachep);
L
Linus Torvalds 已提交
1632 1633
}