extent_io.c 150.9 KB
Newer Older
1
// SPDX-License-Identifier: GPL-2.0
2 3 4 5 6 7 8 9 10 11 12
#include <linux/bitops.h>
#include <linux/slab.h>
#include <linux/bio.h>
#include <linux/mm.h>
#include <linux/pagemap.h>
#include <linux/page-flags.h>
#include <linux/spinlock.h>
#include <linux/blkdev.h>
#include <linux/swap.h>
#include <linux/writeback.h>
#include <linux/pagevec.h>
13
#include <linux/prefetch.h>
D
Dan Magenheimer 已提交
14
#include <linux/cleancache.h>
15 16
#include "extent_io.h"
#include "extent_map.h"
17 18
#include "ctree.h"
#include "btrfs_inode.h"
19
#include "volumes.h"
20
#include "check-integrity.h"
21
#include "locking.h"
22
#include "rcu-string.h"
23
#include "backref.h"
24
#include "disk-io.h"
25 26 27

static struct kmem_cache *extent_state_cache;
static struct kmem_cache *extent_buffer_cache;
28
static struct bio_set *btrfs_bioset;
29

30 31 32 33 34
static inline bool extent_state_in_tree(const struct extent_state *state)
{
	return !RB_EMPTY_NODE(&state->rb_node);
}

35
#ifdef CONFIG_BTRFS_DEBUG
36 37
static LIST_HEAD(buffers);
static LIST_HEAD(states);
C
Chris Mason 已提交
38

C
Chris Mason 已提交
39
static DEFINE_SPINLOCK(leak_lock);
40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68

static inline
void btrfs_leak_debug_add(struct list_head *new, struct list_head *head)
{
	unsigned long flags;

	spin_lock_irqsave(&leak_lock, flags);
	list_add(new, head);
	spin_unlock_irqrestore(&leak_lock, flags);
}

static inline
void btrfs_leak_debug_del(struct list_head *entry)
{
	unsigned long flags;

	spin_lock_irqsave(&leak_lock, flags);
	list_del(entry);
	spin_unlock_irqrestore(&leak_lock, flags);
}

static inline
void btrfs_leak_debug_check(void)
{
	struct extent_state *state;
	struct extent_buffer *eb;

	while (!list_empty(&states)) {
		state = list_entry(states.next, struct extent_state, leak_list);
69
		pr_err("BTRFS: state leak: start %llu end %llu state %u in tree %d refs %d\n",
70 71
		       state->start, state->end, state->state,
		       extent_state_in_tree(state),
72
		       refcount_read(&state->refs));
73 74 75 76 77 78
		list_del(&state->leak_list);
		kmem_cache_free(extent_state_cache, state);
	}

	while (!list_empty(&buffers)) {
		eb = list_entry(buffers.next, struct extent_buffer, leak_list);
79
		pr_err("BTRFS: buffer leak start %llu len %lu refs %d\n",
80
		       eb->start, eb->len, atomic_read(&eb->refs));
81 82 83 84
		list_del(&eb->leak_list);
		kmem_cache_free(extent_buffer_cache, eb);
	}
}
85

86 87
#define btrfs_debug_check_extent_io_range(tree, start, end)		\
	__btrfs_debug_check_extent_io_range(__func__, (tree), (start), (end))
88
static inline void __btrfs_debug_check_extent_io_range(const char *caller,
89
		struct extent_io_tree *tree, u64 start, u64 end)
90
{
91 92 93
	if (tree->ops && tree->ops->check_extent_io_range)
		tree->ops->check_extent_io_range(tree->private_data, caller,
						 start, end);
94
}
95 96 97 98
#else
#define btrfs_leak_debug_add(new, head)	do {} while (0)
#define btrfs_leak_debug_del(entry)	do {} while (0)
#define btrfs_leak_debug_check()	do {} while (0)
99
#define btrfs_debug_check_extent_io_range(c, s, e)	do {} while (0)
C
Chris Mason 已提交
100
#endif
101 102 103 104 105 106 107 108 109 110 111 112

#define BUFFER_LRU_MAX 64

struct tree_entry {
	u64 start;
	u64 end;
	struct rb_node rb_node;
};

struct extent_page_data {
	struct bio *bio;
	struct extent_io_tree *tree;
113 114 115
	/* tells writepage not to lock the state bits for this range
	 * it still does the unlocking
	 */
116 117
	unsigned int extent_locked:1;

118
	/* tells the submit_bio code to use REQ_SYNC */
119
	unsigned int sync_io:1;
120 121
};

122 123 124 125 126 127 128 129 130 131
static void add_extent_changeset(struct extent_state *state, unsigned bits,
				 struct extent_changeset *changeset,
				 int set)
{
	int ret;

	if (!changeset)
		return;
	if (set && (state->state & bits) == bits)
		return;
132 133
	if (!set && (state->state & bits) == 0)
		return;
134
	changeset->bytes_changed += state->end - state->start + 1;
135
	ret = ulist_add(&changeset->range_changed, state->start, state->end,
136 137 138 139 140
			GFP_ATOMIC);
	/* ENOMEM */
	BUG_ON(ret < 0);
}

141
static noinline void flush_write_bio(void *data);
142 143 144
static inline struct btrfs_fs_info *
tree_fs_info(struct extent_io_tree *tree)
{
145 146 147
	if (tree->ops)
		return tree->ops->tree_fs_info(tree->private_data);
	return NULL;
148
}
149

150 151
int __init extent_io_init(void)
{
D
David Sterba 已提交
152
	extent_state_cache = kmem_cache_create("btrfs_extent_state",
153
			sizeof(struct extent_state), 0,
154
			SLAB_MEM_SPREAD, NULL);
155 156 157
	if (!extent_state_cache)
		return -ENOMEM;

D
David Sterba 已提交
158
	extent_buffer_cache = kmem_cache_create("btrfs_extent_buffer",
159
			sizeof(struct extent_buffer), 0,
160
			SLAB_MEM_SPREAD, NULL);
161 162
	if (!extent_buffer_cache)
		goto free_state_cache;
163 164

	btrfs_bioset = bioset_create(BIO_POOL_SIZE,
165 166
				     offsetof(struct btrfs_io_bio, bio),
				     BIOSET_NEED_BVECS);
167 168
	if (!btrfs_bioset)
		goto free_buffer_cache;
169 170 171 172

	if (bioset_integrity_create(btrfs_bioset, BIO_POOL_SIZE))
		goto free_bioset;

173 174
	return 0;

175 176 177 178
free_bioset:
	bioset_free(btrfs_bioset);
	btrfs_bioset = NULL;

179 180 181 182
free_buffer_cache:
	kmem_cache_destroy(extent_buffer_cache);
	extent_buffer_cache = NULL;

183 184
free_state_cache:
	kmem_cache_destroy(extent_state_cache);
185
	extent_state_cache = NULL;
186 187 188 189 190
	return -ENOMEM;
}

void extent_io_exit(void)
{
191
	btrfs_leak_debug_check();
192 193 194 195 196 197

	/*
	 * Make sure all delayed rcu free are flushed before we
	 * destroy caches.
	 */
	rcu_barrier();
198 199
	kmem_cache_destroy(extent_state_cache);
	kmem_cache_destroy(extent_buffer_cache);
200 201
	if (btrfs_bioset)
		bioset_free(btrfs_bioset);
202 203 204
}

void extent_io_tree_init(struct extent_io_tree *tree,
205
			 void *private_data)
206
{
207
	tree->state = RB_ROOT;
208 209
	tree->ops = NULL;
	tree->dirty_bytes = 0;
210
	spin_lock_init(&tree->lock);
211
	tree->private_data = private_data;
212 213
}

214
static struct extent_state *alloc_extent_state(gfp_t mask)
215 216 217
{
	struct extent_state *state;

218 219 220 221 222
	/*
	 * The given mask might be not appropriate for the slab allocator,
	 * drop the unsupported bits
	 */
	mask &= ~(__GFP_DMA32|__GFP_HIGHMEM);
223
	state = kmem_cache_alloc(extent_state_cache, mask);
224
	if (!state)
225 226
		return state;
	state->state = 0;
227
	state->failrec = NULL;
228
	RB_CLEAR_NODE(&state->rb_node);
229
	btrfs_leak_debug_add(&state->leak_list, &states);
230
	refcount_set(&state->refs, 1);
231
	init_waitqueue_head(&state->wq);
232
	trace_alloc_extent_state(state, mask, _RET_IP_);
233 234 235
	return state;
}

236
void free_extent_state(struct extent_state *state)
237 238 239
{
	if (!state)
		return;
240
	if (refcount_dec_and_test(&state->refs)) {
241
		WARN_ON(extent_state_in_tree(state));
242
		btrfs_leak_debug_del(&state->leak_list);
243
		trace_free_extent_state(state, _RET_IP_);
244 245 246 247
		kmem_cache_free(extent_state_cache, state);
	}
}

248 249 250
static struct rb_node *tree_insert(struct rb_root *root,
				   struct rb_node *search_start,
				   u64 offset,
251 252 253
				   struct rb_node *node,
				   struct rb_node ***p_in,
				   struct rb_node **parent_in)
254
{
255
	struct rb_node **p;
C
Chris Mason 已提交
256
	struct rb_node *parent = NULL;
257 258
	struct tree_entry *entry;

259 260 261 262 263 264
	if (p_in && parent_in) {
		p = *p_in;
		parent = *parent_in;
		goto do_insert;
	}

265
	p = search_start ? &search_start : &root->rb_node;
C
Chris Mason 已提交
266
	while (*p) {
267 268 269 270 271 272 273 274 275 276 277
		parent = *p;
		entry = rb_entry(parent, struct tree_entry, rb_node);

		if (offset < entry->start)
			p = &(*p)->rb_left;
		else if (offset > entry->end)
			p = &(*p)->rb_right;
		else
			return parent;
	}

278
do_insert:
279 280 281 282 283
	rb_link_node(node, parent, p);
	rb_insert_color(node, root);
	return NULL;
}

284
static struct rb_node *__etree_search(struct extent_io_tree *tree, u64 offset,
285 286 287 288
				      struct rb_node **prev_ret,
				      struct rb_node **next_ret,
				      struct rb_node ***p_ret,
				      struct rb_node **parent_ret)
289
{
290
	struct rb_root *root = &tree->state;
291
	struct rb_node **n = &root->rb_node;
292 293 294 295 296
	struct rb_node *prev = NULL;
	struct rb_node *orig_prev = NULL;
	struct tree_entry *entry;
	struct tree_entry *prev_entry = NULL;

297 298 299
	while (*n) {
		prev = *n;
		entry = rb_entry(prev, struct tree_entry, rb_node);
300 301 302
		prev_entry = entry;

		if (offset < entry->start)
303
			n = &(*n)->rb_left;
304
		else if (offset > entry->end)
305
			n = &(*n)->rb_right;
C
Chris Mason 已提交
306
		else
307
			return *n;
308 309
	}

310 311 312 313 314
	if (p_ret)
		*p_ret = n;
	if (parent_ret)
		*parent_ret = prev;

315 316
	if (prev_ret) {
		orig_prev = prev;
C
Chris Mason 已提交
317
		while (prev && offset > prev_entry->end) {
318 319 320 321 322 323 324 325 326
			prev = rb_next(prev);
			prev_entry = rb_entry(prev, struct tree_entry, rb_node);
		}
		*prev_ret = prev;
		prev = orig_prev;
	}

	if (next_ret) {
		prev_entry = rb_entry(prev, struct tree_entry, rb_node);
C
Chris Mason 已提交
327
		while (prev && offset < prev_entry->start) {
328 329 330 331 332 333 334 335
			prev = rb_prev(prev);
			prev_entry = rb_entry(prev, struct tree_entry, rb_node);
		}
		*next_ret = prev;
	}
	return NULL;
}

336 337 338 339 340
static inline struct rb_node *
tree_search_for_insert(struct extent_io_tree *tree,
		       u64 offset,
		       struct rb_node ***p_ret,
		       struct rb_node **parent_ret)
341
{
342
	struct rb_node *prev = NULL;
343
	struct rb_node *ret;
344

345
	ret = __etree_search(tree, offset, &prev, NULL, p_ret, parent_ret);
C
Chris Mason 已提交
346
	if (!ret)
347 348 349 350
		return prev;
	return ret;
}

351 352 353 354 355 356
static inline struct rb_node *tree_search(struct extent_io_tree *tree,
					  u64 offset)
{
	return tree_search_for_insert(tree, offset, NULL, NULL);
}

J
Josef Bacik 已提交
357 358 359 360
static void merge_cb(struct extent_io_tree *tree, struct extent_state *new,
		     struct extent_state *other)
{
	if (tree->ops && tree->ops->merge_extent_hook)
361
		tree->ops->merge_extent_hook(tree->private_data, new, other);
J
Josef Bacik 已提交
362 363
}

364 365 366 367 368 369 370 371 372
/*
 * utility function to look for merge candidates inside a given range.
 * Any extents with matching state are merged together into a single
 * extent in the tree.  Extents with EXTENT_IO in their state field
 * are not merged because the end_io handlers need to be able to do
 * operations on them without sleeping (or doing allocations/splits).
 *
 * This should be called with the tree lock held.
 */
373 374
static void merge_state(struct extent_io_tree *tree,
		        struct extent_state *state)
375 376 377 378
{
	struct extent_state *other;
	struct rb_node *other_node;

379
	if (state->state & (EXTENT_IOBITS | EXTENT_BOUNDARY))
380
		return;
381 382 383 384 385 386

	other_node = rb_prev(&state->rb_node);
	if (other_node) {
		other = rb_entry(other_node, struct extent_state, rb_node);
		if (other->end == state->start - 1 &&
		    other->state == state->state) {
J
Josef Bacik 已提交
387
			merge_cb(tree, state, other);
388 389
			state->start = other->start;
			rb_erase(&other->rb_node, &tree->state);
390
			RB_CLEAR_NODE(&other->rb_node);
391 392 393 394 395 396 397 398
			free_extent_state(other);
		}
	}
	other_node = rb_next(&state->rb_node);
	if (other_node) {
		other = rb_entry(other_node, struct extent_state, rb_node);
		if (other->start == state->end + 1 &&
		    other->state == state->state) {
J
Josef Bacik 已提交
399
			merge_cb(tree, state, other);
400 401
			state->end = other->end;
			rb_erase(&other->rb_node, &tree->state);
402
			RB_CLEAR_NODE(&other->rb_node);
403
			free_extent_state(other);
404 405 406 407
		}
	}
}

408
static void set_state_cb(struct extent_io_tree *tree,
409
			 struct extent_state *state, unsigned *bits)
410
{
411
	if (tree->ops && tree->ops->set_bit_hook)
412
		tree->ops->set_bit_hook(tree->private_data, state, bits);
413 414 415
}

static void clear_state_cb(struct extent_io_tree *tree,
416
			   struct extent_state *state, unsigned *bits)
417
{
J
Josef Bacik 已提交
418
	if (tree->ops && tree->ops->clear_bit_hook)
419
		tree->ops->clear_bit_hook(tree->private_data, state, bits);
420 421
}

422
static void set_state_bits(struct extent_io_tree *tree,
423 424
			   struct extent_state *state, unsigned *bits,
			   struct extent_changeset *changeset);
425

426 427 428 429 430 431 432 433 434 435 436 437
/*
 * insert an extent_state struct into the tree.  'bits' are set on the
 * struct before it is inserted.
 *
 * This may return -EEXIST if the extent is already there, in which case the
 * state struct is freed.
 *
 * The tree lock is not taken internally.  This is a utility function and
 * probably isn't what you want to call (see set/clear_extent_bit).
 */
static int insert_state(struct extent_io_tree *tree,
			struct extent_state *state, u64 start, u64 end,
438 439
			struct rb_node ***p,
			struct rb_node **parent,
440
			unsigned *bits, struct extent_changeset *changeset)
441 442 443
{
	struct rb_node *node;

J
Julia Lawall 已提交
444
	if (end < start)
445
		WARN(1, KERN_ERR "BTRFS: end < start %llu %llu\n",
446
		       end, start);
447 448
	state->start = start;
	state->end = end;
J
Josef Bacik 已提交
449

450
	set_state_bits(tree, state, bits, changeset);
451

452
	node = tree_insert(&tree->state, NULL, end, &state->rb_node, p, parent);
453 454 455
	if (node) {
		struct extent_state *found;
		found = rb_entry(node, struct extent_state, rb_node);
456
		pr_err("BTRFS: found node %llu %llu on insert of %llu %llu\n",
457
		       found->start, found->end, start, end);
458 459 460 461 462 463
		return -EEXIST;
	}
	merge_state(tree, state);
	return 0;
}

464
static void split_cb(struct extent_io_tree *tree, struct extent_state *orig,
J
Josef Bacik 已提交
465 466 467
		     u64 split)
{
	if (tree->ops && tree->ops->split_extent_hook)
468
		tree->ops->split_extent_hook(tree->private_data, orig, split);
J
Josef Bacik 已提交
469 470
}

471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488
/*
 * split a given extent state struct in two, inserting the preallocated
 * struct 'prealloc' as the newly created second half.  'split' indicates an
 * offset inside 'orig' where it should be split.
 *
 * Before calling,
 * the tree has 'orig' at [orig->start, orig->end].  After calling, there
 * are two extent state structs in the tree:
 * prealloc: [orig->start, split - 1]
 * orig: [ split, orig->end ]
 *
 * The tree locks are not taken by this function. They need to be held
 * by the caller.
 */
static int split_state(struct extent_io_tree *tree, struct extent_state *orig,
		       struct extent_state *prealloc, u64 split)
{
	struct rb_node *node;
J
Josef Bacik 已提交
489 490 491

	split_cb(tree, orig, split);

492 493 494 495 496
	prealloc->start = orig->start;
	prealloc->end = split - 1;
	prealloc->state = orig->state;
	orig->start = split;

497 498
	node = tree_insert(&tree->state, &orig->rb_node, prealloc->end,
			   &prealloc->rb_node, NULL, NULL);
499 500 501 502 503 504 505
	if (node) {
		free_extent_state(prealloc);
		return -EEXIST;
	}
	return 0;
}

506 507 508 509 510 511 512 513 514
static struct extent_state *next_state(struct extent_state *state)
{
	struct rb_node *next = rb_next(&state->rb_node);
	if (next)
		return rb_entry(next, struct extent_state, rb_node);
	else
		return NULL;
}

515 516
/*
 * utility function to clear some bits in an extent state struct.
517
 * it will optionally wake up any one waiting on this state (wake == 1).
518 519 520 521
 *
 * If no bits are set on the state struct after clearing things, the
 * struct is freed and removed from the tree
 */
522 523
static struct extent_state *clear_state_bit(struct extent_io_tree *tree,
					    struct extent_state *state,
524 525
					    unsigned *bits, int wake,
					    struct extent_changeset *changeset)
526
{
527
	struct extent_state *next;
528
	unsigned bits_to_clear = *bits & ~EXTENT_CTLBITS;
529

530
	if ((bits_to_clear & EXTENT_DIRTY) && (state->state & EXTENT_DIRTY)) {
531 532 533 534
		u64 range = state->end - state->start + 1;
		WARN_ON(range > tree->dirty_bytes);
		tree->dirty_bytes -= range;
	}
535
	clear_state_cb(tree, state, bits);
536
	add_extent_changeset(state, bits_to_clear, changeset, 0);
537
	state->state &= ~bits_to_clear;
538 539
	if (wake)
		wake_up(&state->wq);
540
	if (state->state == 0) {
541
		next = next_state(state);
542
		if (extent_state_in_tree(state)) {
543
			rb_erase(&state->rb_node, &tree->state);
544
			RB_CLEAR_NODE(&state->rb_node);
545 546 547 548 549 550
			free_extent_state(state);
		} else {
			WARN_ON(1);
		}
	} else {
		merge_state(tree, state);
551
		next = next_state(state);
552
	}
553
	return next;
554 555
}

556 557 558 559 560 561 562 563 564
static struct extent_state *
alloc_extent_state_atomic(struct extent_state *prealloc)
{
	if (!prealloc)
		prealloc = alloc_extent_state(GFP_ATOMIC);

	return prealloc;
}

565
static void extent_io_tree_panic(struct extent_io_tree *tree, int err)
566
{
J
Jeff Mahoney 已提交
567 568
	btrfs_panic(tree_fs_info(tree), err,
		    "Locking error: Extent tree was modified by another thread while locked.");
569 570
}

571 572 573 574 575 576 577 578 579 580
/*
 * clear some bits on a range in the tree.  This may require splitting
 * or inserting elements in the tree, so the gfp mask is used to
 * indicate which allocations or sleeping are allowed.
 *
 * pass 'wake' == 1 to kick any sleepers, and 'delete' == 1 to remove
 * the given range from the tree regardless of state (ie for truncate).
 *
 * the range [start, end] is inclusive.
 *
581
 * This takes the tree lock, and returns 0 on success and < 0 on error.
582
 */
583
int __clear_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
584 585 586
			      unsigned bits, int wake, int delete,
			      struct extent_state **cached_state,
			      gfp_t mask, struct extent_changeset *changeset)
587 588
{
	struct extent_state *state;
589
	struct extent_state *cached;
590 591
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
592
	u64 last_end;
593
	int err;
594
	int clear = 0;
595

596
	btrfs_debug_check_extent_io_range(tree, start, end);
597

598 599 600
	if (bits & EXTENT_DELALLOC)
		bits |= EXTENT_NORESERVE;

601 602 603 604
	if (delete)
		bits |= ~EXTENT_CTLBITS;
	bits |= EXTENT_FIRST_DELALLOC;

605 606
	if (bits & (EXTENT_IOBITS | EXTENT_BOUNDARY))
		clear = 1;
607
again:
608
	if (!prealloc && gfpflags_allow_blocking(mask)) {
609 610 611 612 613 614 615
		/*
		 * Don't care for allocation failure here because we might end
		 * up not needing the pre-allocated extent state at all, which
		 * is the case if we only have in the tree extent states that
		 * cover our input range and don't cover too any other range.
		 * If we end up needing a new extent state we allocate it later.
		 */
616 617 618
		prealloc = alloc_extent_state(mask);
	}

619
	spin_lock(&tree->lock);
620 621
	if (cached_state) {
		cached = *cached_state;
622 623 624 625 626 627

		if (clear) {
			*cached_state = NULL;
			cached_state = NULL;
		}

628 629
		if (cached && extent_state_in_tree(cached) &&
		    cached->start <= start && cached->end > start) {
630
			if (clear)
631
				refcount_dec(&cached->refs);
632
			state = cached;
633
			goto hit_next;
634
		}
635 636
		if (clear)
			free_extent_state(cached);
637
	}
638 639 640 641
	/*
	 * this search will find the extents that end after
	 * our range starts
	 */
642
	node = tree_search(tree, start);
643 644 645
	if (!node)
		goto out;
	state = rb_entry(node, struct extent_state, rb_node);
646
hit_next:
647 648 649
	if (state->start > end)
		goto out;
	WARN_ON(state->end < start);
650
	last_end = state->end;
651

652
	/* the state doesn't have the wanted bits, go ahead */
653 654
	if (!(state->state & bits)) {
		state = next_state(state);
655
		goto next;
656
	}
657

658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674
	/*
	 *     | ---- desired range ---- |
	 *  | state | or
	 *  | ------------- state -------------- |
	 *
	 * We need to split the extent we found, and may flip
	 * bits on second half.
	 *
	 * If the extent we found extends past our range, we
	 * just split and search again.  It'll get split again
	 * the next time though.
	 *
	 * If the extent we found is inside our range, we clear
	 * the desired bit on it.
	 */

	if (state->start < start) {
675 676
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
677
		err = split_state(tree, state, prealloc, start);
678 679 680
		if (err)
			extent_io_tree_panic(tree, err);

681 682 683 684
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
685 686
			state = clear_state_bit(tree, state, &bits, wake,
						changeset);
687
			goto next;
688 689 690 691 692 693 694 695 696 697
		}
		goto search_again;
	}
	/*
	 * | ---- desired range ---- |
	 *                        | state |
	 * We need to split the extent, and clear the bit
	 * on the first half
	 */
	if (state->start <= end && state->end > end) {
698 699
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
700
		err = split_state(tree, state, prealloc, end + 1);
701 702 703
		if (err)
			extent_io_tree_panic(tree, err);

704 705
		if (wake)
			wake_up(&state->wq);
706

707
		clear_state_bit(tree, prealloc, &bits, wake, changeset);
J
Josef Bacik 已提交
708

709 710 711
		prealloc = NULL;
		goto out;
	}
712

713
	state = clear_state_bit(tree, state, &bits, wake, changeset);
714
next:
715 716 717
	if (last_end == (u64)-1)
		goto out;
	start = last_end + 1;
718
	if (start <= end && state && !need_resched())
719
		goto hit_next;
720 721 722 723

search_again:
	if (start > end)
		goto out;
724
	spin_unlock(&tree->lock);
725
	if (gfpflags_allow_blocking(mask))
726 727
		cond_resched();
	goto again;
728 729 730 731 732 733 734 735

out:
	spin_unlock(&tree->lock);
	if (prealloc)
		free_extent_state(prealloc);

	return 0;

736 737
}

738 739
static void wait_on_state(struct extent_io_tree *tree,
			  struct extent_state *state)
740 741
		__releases(tree->lock)
		__acquires(tree->lock)
742 743 744
{
	DEFINE_WAIT(wait);
	prepare_to_wait(&state->wq, &wait, TASK_UNINTERRUPTIBLE);
745
	spin_unlock(&tree->lock);
746
	schedule();
747
	spin_lock(&tree->lock);
748 749 750 751 752 753 754 755
	finish_wait(&state->wq, &wait);
}

/*
 * waits for one or more bits to clear on a range in the state tree.
 * The range [start, end] is inclusive.
 * The tree lock is taken by this function
 */
756 757
static void wait_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
			    unsigned long bits)
758 759 760 761
{
	struct extent_state *state;
	struct rb_node *node;

762
	btrfs_debug_check_extent_io_range(tree, start, end);
763

764
	spin_lock(&tree->lock);
765 766 767 768 769 770
again:
	while (1) {
		/*
		 * this search will find all the extents that end after
		 * our range starts
		 */
771
		node = tree_search(tree, start);
772
process_node:
773 774 775 776 777 778 779 780 781 782
		if (!node)
			break;

		state = rb_entry(node, struct extent_state, rb_node);

		if (state->start > end)
			goto out;

		if (state->state & bits) {
			start = state->start;
783
			refcount_inc(&state->refs);
784 785 786 787 788 789 790 791 792
			wait_on_state(tree, state);
			free_extent_state(state);
			goto again;
		}
		start = state->end + 1;

		if (start > end)
			break;

793 794 795 796
		if (!cond_resched_lock(&tree->lock)) {
			node = rb_next(node);
			goto process_node;
		}
797 798
	}
out:
799
	spin_unlock(&tree->lock);
800 801
}

802
static void set_state_bits(struct extent_io_tree *tree,
803
			   struct extent_state *state,
804
			   unsigned *bits, struct extent_changeset *changeset)
805
{
806
	unsigned bits_to_set = *bits & ~EXTENT_CTLBITS;
J
Josef Bacik 已提交
807

808
	set_state_cb(tree, state, bits);
809
	if ((bits_to_set & EXTENT_DIRTY) && !(state->state & EXTENT_DIRTY)) {
810 811 812
		u64 range = state->end - state->start + 1;
		tree->dirty_bytes += range;
	}
813
	add_extent_changeset(state, bits_to_set, changeset, 1);
814
	state->state |= bits_to_set;
815 816
}

817 818
static void cache_state_if_flags(struct extent_state *state,
				 struct extent_state **cached_ptr,
819
				 unsigned flags)
820 821
{
	if (cached_ptr && !(*cached_ptr)) {
822
		if (!flags || (state->state & flags)) {
823
			*cached_ptr = state;
824
			refcount_inc(&state->refs);
825 826 827 828
		}
	}
}

829 830 831 832 833 834 835
static void cache_state(struct extent_state *state,
			struct extent_state **cached_ptr)
{
	return cache_state_if_flags(state, cached_ptr,
				    EXTENT_IOBITS | EXTENT_BOUNDARY);
}

836
/*
837 838
 * set some bits on a range in the tree.  This may require allocations or
 * sleeping, so the gfp mask is used to indicate what is allowed.
839
 *
840 841 842
 * If any of the exclusive bits are set, this will fail with -EEXIST if some
 * part of the range already has the desired bits set.  The start of the
 * existing range is returned in failed_start in this case.
843
 *
844
 * [start, end] is inclusive This takes the tree lock.
845
 */
846

J
Jeff Mahoney 已提交
847 848
static int __must_check
__set_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
849
		 unsigned bits, unsigned exclusive_bits,
850
		 u64 *failed_start, struct extent_state **cached_state,
851
		 gfp_t mask, struct extent_changeset *changeset)
852 853 854 855
{
	struct extent_state *state;
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
856 857
	struct rb_node **p;
	struct rb_node *parent;
858 859 860
	int err = 0;
	u64 last_start;
	u64 last_end;
861

862
	btrfs_debug_check_extent_io_range(tree, start, end);
863

864
	bits |= EXTENT_FIRST_DELALLOC;
865
again:
866
	if (!prealloc && gfpflags_allow_blocking(mask)) {
867 868 869 870 871 872 873
		/*
		 * Don't care for allocation failure here because we might end
		 * up not needing the pre-allocated extent state at all, which
		 * is the case if we only have in the tree extent states that
		 * cover our input range and don't cover too any other range.
		 * If we end up needing a new extent state we allocate it later.
		 */
874 875 876
		prealloc = alloc_extent_state(mask);
	}

877
	spin_lock(&tree->lock);
878 879
	if (cached_state && *cached_state) {
		state = *cached_state;
880
		if (state->start <= start && state->end > start &&
881
		    extent_state_in_tree(state)) {
882 883 884 885
			node = &state->rb_node;
			goto hit_next;
		}
	}
886 887 888 889
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
890
	node = tree_search_for_insert(tree, start, &p, &parent);
891
	if (!node) {
892 893
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
894
		err = insert_state(tree, prealloc, start, end,
895
				   &p, &parent, &bits, changeset);
896 897 898
		if (err)
			extent_io_tree_panic(tree, err);

899
		cache_state(prealloc, cached_state);
900 901 902 903
		prealloc = NULL;
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
C
Chris Mason 已提交
904
hit_next:
905 906 907 908 909 910 911 912 913 914
	last_start = state->start;
	last_end = state->end;

	/*
	 * | ---- desired range ---- |
	 * | state |
	 *
	 * Just lock what we found and keep going
	 */
	if (state->start == start && state->end <= end) {
915
		if (state->state & exclusive_bits) {
916 917 918 919
			*failed_start = state->start;
			err = -EEXIST;
			goto out;
		}
920

921
		set_state_bits(tree, state, &bits, changeset);
922
		cache_state(state, cached_state);
923
		merge_state(tree, state);
924 925 926
		if (last_end == (u64)-1)
			goto out;
		start = last_end + 1;
927 928 929 930
		state = next_state(state);
		if (start < end && state && state->start == start &&
		    !need_resched())
			goto hit_next;
931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950
		goto search_again;
	}

	/*
	 *     | ---- desired range ---- |
	 * | state |
	 *   or
	 * | ------------- state -------------- |
	 *
	 * We need to split the extent we found, and may flip bits on
	 * second half.
	 *
	 * If the extent we found extends past our
	 * range, we just split and search again.  It'll get split
	 * again the next time though.
	 *
	 * If the extent we found is inside our range, we set the
	 * desired bit on it.
	 */
	if (state->start < start) {
951
		if (state->state & exclusive_bits) {
952 953 954 955
			*failed_start = start;
			err = -EEXIST;
			goto out;
		}
956 957 958

		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
959
		err = split_state(tree, state, prealloc, start);
960 961 962
		if (err)
			extent_io_tree_panic(tree, err);

963 964 965 966
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
967
			set_state_bits(tree, state, &bits, changeset);
968
			cache_state(state, cached_state);
969
			merge_state(tree, state);
970 971 972
			if (last_end == (u64)-1)
				goto out;
			start = last_end + 1;
973 974 975 976
			state = next_state(state);
			if (start < end && state && state->start == start &&
			    !need_resched())
				goto hit_next;
977 978 979 980 981 982 983 984 985 986 987 988 989 990 991
		}
		goto search_again;
	}
	/*
	 * | ---- desired range ---- |
	 *     | state | or               | state |
	 *
	 * There's a hole, we need to insert something in it and
	 * ignore the extent we found.
	 */
	if (state->start > start) {
		u64 this_end;
		if (end < last_start)
			this_end = end;
		else
C
Chris Mason 已提交
992
			this_end = last_start - 1;
993 994 995

		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
996 997 998 999 1000

		/*
		 * Avoid to free 'prealloc' if it can be merged with
		 * the later extent.
		 */
1001
		err = insert_state(tree, prealloc, start, this_end,
1002
				   NULL, NULL, &bits, changeset);
1003 1004 1005
		if (err)
			extent_io_tree_panic(tree, err);

J
Josef Bacik 已提交
1006 1007
		cache_state(prealloc, cached_state);
		prealloc = NULL;
1008 1009 1010 1011 1012 1013 1014 1015 1016 1017
		start = this_end + 1;
		goto search_again;
	}
	/*
	 * | ---- desired range ---- |
	 *                        | state |
	 * We need to split the extent, and set the bit
	 * on the first half
	 */
	if (state->start <= end && state->end > end) {
1018
		if (state->state & exclusive_bits) {
1019 1020 1021 1022
			*failed_start = start;
			err = -EEXIST;
			goto out;
		}
1023 1024 1025

		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
1026
		err = split_state(tree, state, prealloc, end + 1);
1027 1028
		if (err)
			extent_io_tree_panic(tree, err);
1029

1030
		set_state_bits(tree, prealloc, &bits, changeset);
1031
		cache_state(prealloc, cached_state);
1032 1033 1034 1035 1036
		merge_state(tree, prealloc);
		prealloc = NULL;
		goto out;
	}

1037 1038 1039 1040 1041 1042 1043
search_again:
	if (start > end)
		goto out;
	spin_unlock(&tree->lock);
	if (gfpflags_allow_blocking(mask))
		cond_resched();
	goto again;
1044 1045

out:
1046
	spin_unlock(&tree->lock);
1047 1048 1049 1050 1051 1052 1053
	if (prealloc)
		free_extent_state(prealloc);

	return err;

}

1054
int set_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1055
		   unsigned bits, u64 * failed_start,
1056
		   struct extent_state **cached_state, gfp_t mask)
J
Jeff Mahoney 已提交
1057 1058
{
	return __set_extent_bit(tree, start, end, bits, 0, failed_start,
1059
				cached_state, mask, NULL);
J
Jeff Mahoney 已提交
1060 1061 1062
}


J
Josef Bacik 已提交
1063
/**
L
Liu Bo 已提交
1064 1065
 * convert_extent_bit - convert all bits in a given range from one bit to
 * 			another
J
Josef Bacik 已提交
1066 1067 1068 1069 1070
 * @tree:	the io tree to search
 * @start:	the start offset in bytes
 * @end:	the end offset in bytes (inclusive)
 * @bits:	the bits to set in this range
 * @clear_bits:	the bits to clear in this range
1071
 * @cached_state:	state that we're going to cache
J
Josef Bacik 已提交
1072 1073 1074 1075 1076 1077
 *
 * This will go through and set bits for the given range.  If any states exist
 * already in this range they are set with the given bit and cleared of the
 * clear_bits.  This is only meant to be used by things that are mergeable, ie
 * converting from say DELALLOC to DIRTY.  This is not meant to be used with
 * boundary bits like LOCK.
1078 1079
 *
 * All allocations are done with GFP_NOFS.
J
Josef Bacik 已提交
1080 1081
 */
int convert_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1082
		       unsigned bits, unsigned clear_bits,
1083
		       struct extent_state **cached_state)
J
Josef Bacik 已提交
1084 1085 1086 1087
{
	struct extent_state *state;
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
1088 1089
	struct rb_node **p;
	struct rb_node *parent;
J
Josef Bacik 已提交
1090 1091 1092
	int err = 0;
	u64 last_start;
	u64 last_end;
1093
	bool first_iteration = true;
J
Josef Bacik 已提交
1094

1095
	btrfs_debug_check_extent_io_range(tree, start, end);
1096

J
Josef Bacik 已提交
1097
again:
1098
	if (!prealloc) {
1099 1100 1101 1102 1103 1104 1105
		/*
		 * Best effort, don't worry if extent state allocation fails
		 * here for the first iteration. We might have a cached state
		 * that matches exactly the target range, in which case no
		 * extent state allocations are needed. We'll only know this
		 * after locking the tree.
		 */
1106
		prealloc = alloc_extent_state(GFP_NOFS);
1107
		if (!prealloc && !first_iteration)
J
Josef Bacik 已提交
1108 1109 1110 1111
			return -ENOMEM;
	}

	spin_lock(&tree->lock);
1112 1113 1114
	if (cached_state && *cached_state) {
		state = *cached_state;
		if (state->start <= start && state->end > start &&
1115
		    extent_state_in_tree(state)) {
1116 1117 1118 1119 1120
			node = &state->rb_node;
			goto hit_next;
		}
	}

J
Josef Bacik 已提交
1121 1122 1123 1124
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1125
	node = tree_search_for_insert(tree, start, &p, &parent);
J
Josef Bacik 已提交
1126 1127
	if (!node) {
		prealloc = alloc_extent_state_atomic(prealloc);
1128 1129 1130 1131
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
1132
		err = insert_state(tree, prealloc, start, end,
1133
				   &p, &parent, &bits, NULL);
1134 1135
		if (err)
			extent_io_tree_panic(tree, err);
1136 1137
		cache_state(prealloc, cached_state);
		prealloc = NULL;
J
Josef Bacik 已提交
1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
hit_next:
	last_start = state->start;
	last_end = state->end;

	/*
	 * | ---- desired range ---- |
	 * | state |
	 *
	 * Just lock what we found and keep going
	 */
	if (state->start == start && state->end <= end) {
1152
		set_state_bits(tree, state, &bits, NULL);
1153
		cache_state(state, cached_state);
1154
		state = clear_state_bit(tree, state, &clear_bits, 0, NULL);
J
Josef Bacik 已提交
1155 1156 1157
		if (last_end == (u64)-1)
			goto out;
		start = last_end + 1;
1158 1159 1160
		if (start < end && state && state->start == start &&
		    !need_resched())
			goto hit_next;
J
Josef Bacik 已提交
1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181
		goto search_again;
	}

	/*
	 *     | ---- desired range ---- |
	 * | state |
	 *   or
	 * | ------------- state -------------- |
	 *
	 * We need to split the extent we found, and may flip bits on
	 * second half.
	 *
	 * If the extent we found extends past our
	 * range, we just split and search again.  It'll get split
	 * again the next time though.
	 *
	 * If the extent we found is inside our range, we set the
	 * desired bit on it.
	 */
	if (state->start < start) {
		prealloc = alloc_extent_state_atomic(prealloc);
1182 1183 1184 1185
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1186
		err = split_state(tree, state, prealloc, start);
1187 1188
		if (err)
			extent_io_tree_panic(tree, err);
J
Josef Bacik 已提交
1189 1190 1191 1192
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
1193
			set_state_bits(tree, state, &bits, NULL);
1194
			cache_state(state, cached_state);
1195 1196
			state = clear_state_bit(tree, state, &clear_bits, 0,
						NULL);
J
Josef Bacik 已提交
1197 1198 1199
			if (last_end == (u64)-1)
				goto out;
			start = last_end + 1;
1200 1201 1202
			if (start < end && state && state->start == start &&
			    !need_resched())
				goto hit_next;
J
Josef Bacik 已提交
1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220
		}
		goto search_again;
	}
	/*
	 * | ---- desired range ---- |
	 *     | state | or               | state |
	 *
	 * There's a hole, we need to insert something in it and
	 * ignore the extent we found.
	 */
	if (state->start > start) {
		u64 this_end;
		if (end < last_start)
			this_end = end;
		else
			this_end = last_start - 1;

		prealloc = alloc_extent_state_atomic(prealloc);
1221 1222 1223 1224
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1225 1226 1227 1228 1229 1230

		/*
		 * Avoid to free 'prealloc' if it can be merged with
		 * the later extent.
		 */
		err = insert_state(tree, prealloc, start, this_end,
1231
				   NULL, NULL, &bits, NULL);
1232 1233
		if (err)
			extent_io_tree_panic(tree, err);
1234
		cache_state(prealloc, cached_state);
J
Josef Bacik 已提交
1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246
		prealloc = NULL;
		start = this_end + 1;
		goto search_again;
	}
	/*
	 * | ---- desired range ---- |
	 *                        | state |
	 * We need to split the extent, and set the bit
	 * on the first half
	 */
	if (state->start <= end && state->end > end) {
		prealloc = alloc_extent_state_atomic(prealloc);
1247 1248 1249 1250
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1251 1252

		err = split_state(tree, state, prealloc, end + 1);
1253 1254
		if (err)
			extent_io_tree_panic(tree, err);
J
Josef Bacik 已提交
1255

1256
		set_state_bits(tree, prealloc, &bits, NULL);
1257
		cache_state(prealloc, cached_state);
1258
		clear_state_bit(tree, prealloc, &clear_bits, 0, NULL);
J
Josef Bacik 已提交
1259 1260 1261 1262 1263 1264 1265 1266
		prealloc = NULL;
		goto out;
	}

search_again:
	if (start > end)
		goto out;
	spin_unlock(&tree->lock);
1267
	cond_resched();
1268
	first_iteration = false;
J
Josef Bacik 已提交
1269 1270 1271 1272 1273 1274 1275 1276 1277 1278
	goto again;

out:
	spin_unlock(&tree->lock);
	if (prealloc)
		free_extent_state(prealloc);

	return err;
}

1279
/* wrappers around set/clear extent bit */
1280
int set_record_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1281
			   unsigned bits, struct extent_changeset *changeset)
1282 1283 1284 1285 1286 1287 1288 1289 1290
{
	/*
	 * We don't support EXTENT_LOCKED yet, as current changeset will
	 * record any bits changed, so for EXTENT_LOCKED case, it will
	 * either fail with -EEXIST or changeset will record the whole
	 * range.
	 */
	BUG_ON(bits & EXTENT_LOCKED);

1291
	return __set_extent_bit(tree, start, end, bits, 0, NULL, NULL, GFP_NOFS,
1292 1293 1294
				changeset);
}

1295 1296
int clear_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
		     unsigned bits, int wake, int delete,
1297
		     struct extent_state **cached)
1298 1299
{
	return __clear_extent_bit(tree, start, end, bits, wake, delete,
1300
				  cached, GFP_NOFS, NULL);
1301 1302 1303
}

int clear_record_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1304
		unsigned bits, struct extent_changeset *changeset)
1305 1306 1307 1308 1309 1310 1311
{
	/*
	 * Don't support EXTENT_LOCKED case, same reason as
	 * set_record_extent_bits().
	 */
	BUG_ON(bits & EXTENT_LOCKED);

1312
	return __clear_extent_bit(tree, start, end, bits, 0, 0, NULL, GFP_NOFS,
1313 1314 1315
				  changeset);
}

C
Chris Mason 已提交
1316 1317 1318 1319
/*
 * either insert or lock state struct between start and end use mask to tell
 * us if waiting is desired.
 */
1320
int lock_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1321
		     struct extent_state **cached_state)
1322 1323 1324
{
	int err;
	u64 failed_start;
1325

1326
	while (1) {
1327
		err = __set_extent_bit(tree, start, end, EXTENT_LOCKED,
J
Jeff Mahoney 已提交
1328
				       EXTENT_LOCKED, &failed_start,
1329
				       cached_state, GFP_NOFS, NULL);
1330
		if (err == -EEXIST) {
1331 1332
			wait_extent_bit(tree, failed_start, end, EXTENT_LOCKED);
			start = failed_start;
1333
		} else
1334 1335 1336 1337 1338 1339
			break;
		WARN_ON(start > end);
	}
	return err;
}

1340
int try_lock_extent(struct extent_io_tree *tree, u64 start, u64 end)
1341 1342 1343 1344
{
	int err;
	u64 failed_start;

J
Jeff Mahoney 已提交
1345
	err = __set_extent_bit(tree, start, end, EXTENT_LOCKED, EXTENT_LOCKED,
1346
			       &failed_start, NULL, GFP_NOFS, NULL);
Y
Yan Zheng 已提交
1347 1348 1349
	if (err == -EEXIST) {
		if (failed_start > start)
			clear_extent_bit(tree, start, failed_start - 1,
1350
					 EXTENT_LOCKED, 1, 0, NULL);
1351
		return 0;
Y
Yan Zheng 已提交
1352
	}
1353 1354 1355
	return 1;
}

1356
void extent_range_clear_dirty_for_io(struct inode *inode, u64 start, u64 end)
1357
{
1358 1359
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
1360 1361 1362 1363 1364 1365
	struct page *page;

	while (index <= end_index) {
		page = find_get_page(inode->i_mapping, index);
		BUG_ON(!page); /* Pages should be in the extent_io_tree */
		clear_page_dirty_for_io(page);
1366
		put_page(page);
1367 1368 1369 1370
		index++;
	}
}

1371
void extent_range_redirty_for_io(struct inode *inode, u64 start, u64 end)
1372
{
1373 1374
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
1375 1376 1377 1378 1379 1380
	struct page *page;

	while (index <= end_index) {
		page = find_get_page(inode->i_mapping, index);
		BUG_ON(!page); /* Pages should be in the extent_io_tree */
		__set_page_dirty_nobuffers(page);
1381
		account_page_redirty(page);
1382
		put_page(page);
1383 1384 1385 1386
		index++;
	}
}

1387 1388 1389
/*
 * helper function to set both pages and extents in the tree writeback
 */
1390
static void set_range_writeback(struct extent_io_tree *tree, u64 start, u64 end)
1391
{
1392
	tree->ops->set_range_writeback(tree->private_data, start, end);
1393 1394
}

C
Chris Mason 已提交
1395 1396 1397 1398
/* find the first state struct with 'bits' set after 'start', and
 * return it.  tree->lock must be held.  NULL will returned if
 * nothing was found after 'start'
 */
1399 1400
static struct extent_state *
find_first_extent_bit_state(struct extent_io_tree *tree,
1401
			    u64 start, unsigned bits)
C
Chris Mason 已提交
1402 1403 1404 1405 1406 1407 1408 1409 1410
{
	struct rb_node *node;
	struct extent_state *state;

	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
	node = tree_search(tree, start);
C
Chris Mason 已提交
1411
	if (!node)
C
Chris Mason 已提交
1412 1413
		goto out;

C
Chris Mason 已提交
1414
	while (1) {
C
Chris Mason 已提交
1415
		state = rb_entry(node, struct extent_state, rb_node);
C
Chris Mason 已提交
1416
		if (state->end >= start && (state->state & bits))
C
Chris Mason 已提交
1417
			return state;
C
Chris Mason 已提交
1418

C
Chris Mason 已提交
1419 1420 1421 1422 1423 1424 1425 1426
		node = rb_next(node);
		if (!node)
			break;
	}
out:
	return NULL;
}

1427 1428 1429 1430 1431
/*
 * find the first offset in the io tree with 'bits' set. zero is
 * returned if we find something, and *start_ret and *end_ret are
 * set to reflect the state struct that was found.
 *
1432
 * If nothing was found, 1 is returned. If found something, return 0.
1433 1434
 */
int find_first_extent_bit(struct extent_io_tree *tree, u64 start,
1435
			  u64 *start_ret, u64 *end_ret, unsigned bits,
1436
			  struct extent_state **cached_state)
1437 1438
{
	struct extent_state *state;
1439
	struct rb_node *n;
1440 1441 1442
	int ret = 1;

	spin_lock(&tree->lock);
1443 1444
	if (cached_state && *cached_state) {
		state = *cached_state;
1445
		if (state->end == start - 1 && extent_state_in_tree(state)) {
1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461
			n = rb_next(&state->rb_node);
			while (n) {
				state = rb_entry(n, struct extent_state,
						 rb_node);
				if (state->state & bits)
					goto got_it;
				n = rb_next(n);
			}
			free_extent_state(*cached_state);
			*cached_state = NULL;
			goto out;
		}
		free_extent_state(*cached_state);
		*cached_state = NULL;
	}

1462
	state = find_first_extent_bit_state(tree, start, bits);
1463
got_it:
1464
	if (state) {
1465
		cache_state_if_flags(state, cached_state, 0);
1466 1467 1468 1469
		*start_ret = state->start;
		*end_ret = state->end;
		ret = 0;
	}
1470
out:
1471 1472 1473 1474
	spin_unlock(&tree->lock);
	return ret;
}

C
Chris Mason 已提交
1475 1476 1477 1478 1479 1480
/*
 * find a contiguous range of bytes in the file marked as delalloc, not
 * more than 'max_bytes'.  start and end are used to return the range,
 *
 * 1 is returned if we find something, 0 if nothing was in the tree
 */
C
Chris Mason 已提交
1481
static noinline u64 find_delalloc_range(struct extent_io_tree *tree,
1482 1483
					u64 *start, u64 *end, u64 max_bytes,
					struct extent_state **cached_state)
1484 1485 1486 1487 1488 1489 1490
{
	struct rb_node *node;
	struct extent_state *state;
	u64 cur_start = *start;
	u64 found = 0;
	u64 total_bytes = 0;

1491
	spin_lock(&tree->lock);
C
Chris Mason 已提交
1492

1493 1494 1495 1496
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1497
	node = tree_search(tree, cur_start);
1498
	if (!node) {
1499 1500
		if (!found)
			*end = (u64)-1;
1501 1502 1503
		goto out;
	}

C
Chris Mason 已提交
1504
	while (1) {
1505
		state = rb_entry(node, struct extent_state, rb_node);
1506 1507
		if (found && (state->start != cur_start ||
			      (state->state & EXTENT_BOUNDARY))) {
1508 1509 1510 1511 1512 1513 1514
			goto out;
		}
		if (!(state->state & EXTENT_DELALLOC)) {
			if (!found)
				*end = state->end;
			goto out;
		}
1515
		if (!found) {
1516
			*start = state->start;
1517
			*cached_state = state;
1518
			refcount_inc(&state->refs);
1519
		}
1520 1521 1522 1523 1524
		found++;
		*end = state->end;
		cur_start = state->end + 1;
		node = rb_next(node);
		total_bytes += state->end - state->start + 1;
1525
		if (total_bytes >= max_bytes)
1526 1527
			break;
		if (!node)
1528 1529 1530
			break;
	}
out:
1531
	spin_unlock(&tree->lock);
1532 1533 1534
	return found;
}

1535 1536 1537 1538 1539
static int __process_pages_contig(struct address_space *mapping,
				  struct page *locked_page,
				  pgoff_t start_index, pgoff_t end_index,
				  unsigned long page_ops, pgoff_t *index_ret);

1540 1541 1542
static noinline void __unlock_for_delalloc(struct inode *inode,
					   struct page *locked_page,
					   u64 start, u64 end)
C
Chris Mason 已提交
1543
{
1544 1545
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
C
Chris Mason 已提交
1546

1547
	ASSERT(locked_page);
C
Chris Mason 已提交
1548
	if (index == locked_page->index && end_index == index)
1549
		return;
C
Chris Mason 已提交
1550

1551 1552
	__process_pages_contig(inode->i_mapping, locked_page, index, end_index,
			       PAGE_UNLOCK, NULL);
C
Chris Mason 已提交
1553 1554 1555 1556 1557 1558 1559
}

static noinline int lock_delalloc_pages(struct inode *inode,
					struct page *locked_page,
					u64 delalloc_start,
					u64 delalloc_end)
{
1560
	unsigned long index = delalloc_start >> PAGE_SHIFT;
1561
	unsigned long index_ret = index;
1562
	unsigned long end_index = delalloc_end >> PAGE_SHIFT;
C
Chris Mason 已提交
1563 1564
	int ret;

1565
	ASSERT(locked_page);
C
Chris Mason 已提交
1566 1567 1568
	if (index == locked_page->index && index == end_index)
		return 0;

1569 1570 1571 1572 1573
	ret = __process_pages_contig(inode->i_mapping, locked_page, index,
				     end_index, PAGE_LOCK, &index_ret);
	if (ret == -EAGAIN)
		__unlock_for_delalloc(inode, locked_page, delalloc_start,
				      (u64)index_ret << PAGE_SHIFT);
C
Chris Mason 已提交
1574 1575 1576 1577 1578 1579 1580 1581 1582
	return ret;
}

/*
 * find a contiguous range of bytes in the file marked as delalloc, not
 * more than 'max_bytes'.  start and end are used to return the range,
 *
 * 1 is returned if we find something, 0 if nothing was in the tree
 */
1583 1584 1585 1586
STATIC u64 find_lock_delalloc_range(struct inode *inode,
				    struct extent_io_tree *tree,
				    struct page *locked_page, u64 *start,
				    u64 *end, u64 max_bytes)
C
Chris Mason 已提交
1587 1588 1589 1590
{
	u64 delalloc_start;
	u64 delalloc_end;
	u64 found;
1591
	struct extent_state *cached_state = NULL;
C
Chris Mason 已提交
1592 1593 1594 1595 1596 1597 1598 1599
	int ret;
	int loops = 0;

again:
	/* step one, find a bunch of delalloc bytes starting at start */
	delalloc_start = *start;
	delalloc_end = 0;
	found = find_delalloc_range(tree, &delalloc_start, &delalloc_end,
1600
				    max_bytes, &cached_state);
C
Chris Mason 已提交
1601
	if (!found || delalloc_end <= *start) {
C
Chris Mason 已提交
1602 1603
		*start = delalloc_start;
		*end = delalloc_end;
1604
		free_extent_state(cached_state);
L
Liu Bo 已提交
1605
		return 0;
C
Chris Mason 已提交
1606 1607
	}

C
Chris Mason 已提交
1608 1609 1610 1611 1612
	/*
	 * start comes from the offset of locked_page.  We have to lock
	 * pages in order, so we can't process delalloc bytes before
	 * locked_page
	 */
C
Chris Mason 已提交
1613
	if (delalloc_start < *start)
C
Chris Mason 已提交
1614 1615
		delalloc_start = *start;

C
Chris Mason 已提交
1616 1617 1618
	/*
	 * make sure to limit the number of pages we try to lock down
	 */
1619 1620
	if (delalloc_end + 1 - delalloc_start > max_bytes)
		delalloc_end = delalloc_start + max_bytes - 1;
C
Chris Mason 已提交
1621

C
Chris Mason 已提交
1622 1623 1624 1625 1626 1627 1628
	/* step two, lock all the pages after the page that has start */
	ret = lock_delalloc_pages(inode, locked_page,
				  delalloc_start, delalloc_end);
	if (ret == -EAGAIN) {
		/* some of the pages are gone, lets avoid looping by
		 * shortening the size of the delalloc range we're searching
		 */
1629
		free_extent_state(cached_state);
1630
		cached_state = NULL;
C
Chris Mason 已提交
1631
		if (!loops) {
1632
			max_bytes = PAGE_SIZE;
C
Chris Mason 已提交
1633 1634 1635 1636 1637 1638 1639
			loops = 1;
			goto again;
		} else {
			found = 0;
			goto out_failed;
		}
	}
1640
	BUG_ON(ret); /* Only valid values are 0 and -EAGAIN */
C
Chris Mason 已提交
1641 1642

	/* step three, lock the state bits for the whole range */
1643
	lock_extent_bits(tree, delalloc_start, delalloc_end, &cached_state);
C
Chris Mason 已提交
1644 1645 1646

	/* then test to make sure it is all still delalloc */
	ret = test_range_bit(tree, delalloc_start, delalloc_end,
1647
			     EXTENT_DELALLOC, 1, cached_state);
C
Chris Mason 已提交
1648
	if (!ret) {
1649 1650
		unlock_extent_cached(tree, delalloc_start, delalloc_end,
				     &cached_state, GFP_NOFS);
C
Chris Mason 已提交
1651 1652 1653 1654 1655
		__unlock_for_delalloc(inode, locked_page,
			      delalloc_start, delalloc_end);
		cond_resched();
		goto again;
	}
1656
	free_extent_state(cached_state);
C
Chris Mason 已提交
1657 1658 1659 1660 1661 1662
	*start = delalloc_start;
	*end = delalloc_end;
out_failed:
	return found;
}

1663 1664 1665 1666
static int __process_pages_contig(struct address_space *mapping,
				  struct page *locked_page,
				  pgoff_t start_index, pgoff_t end_index,
				  unsigned long page_ops, pgoff_t *index_ret)
C
Chris Mason 已提交
1667
{
1668
	unsigned long nr_pages = end_index - start_index + 1;
1669
	unsigned long pages_locked = 0;
1670
	pgoff_t index = start_index;
C
Chris Mason 已提交
1671
	struct page *pages[16];
1672
	unsigned ret;
1673
	int err = 0;
C
Chris Mason 已提交
1674
	int i;
1675

1676 1677 1678 1679 1680
	if (page_ops & PAGE_LOCK) {
		ASSERT(page_ops == PAGE_LOCK);
		ASSERT(index_ret && *index_ret == start_index);
	}

1681
	if ((page_ops & PAGE_SET_ERROR) && nr_pages > 0)
1682
		mapping_set_error(mapping, -EIO);
1683

C
Chris Mason 已提交
1684
	while (nr_pages > 0) {
1685
		ret = find_get_pages_contig(mapping, index,
1686 1687
				     min_t(unsigned long,
				     nr_pages, ARRAY_SIZE(pages)), pages);
1688 1689 1690 1691 1692 1693
		if (ret == 0) {
			/*
			 * Only if we're going to lock these pages,
			 * can we find nothing at @index.
			 */
			ASSERT(page_ops & PAGE_LOCK);
1694 1695
			err = -EAGAIN;
			goto out;
1696
		}
1697

1698
		for (i = 0; i < ret; i++) {
1699
			if (page_ops & PAGE_SET_PRIVATE2)
1700 1701
				SetPagePrivate2(pages[i]);

C
Chris Mason 已提交
1702
			if (pages[i] == locked_page) {
1703
				put_page(pages[i]);
1704
				pages_locked++;
C
Chris Mason 已提交
1705 1706
				continue;
			}
1707
			if (page_ops & PAGE_CLEAR_DIRTY)
C
Chris Mason 已提交
1708
				clear_page_dirty_for_io(pages[i]);
1709
			if (page_ops & PAGE_SET_WRITEBACK)
C
Chris Mason 已提交
1710
				set_page_writeback(pages[i]);
1711 1712
			if (page_ops & PAGE_SET_ERROR)
				SetPageError(pages[i]);
1713
			if (page_ops & PAGE_END_WRITEBACK)
C
Chris Mason 已提交
1714
				end_page_writeback(pages[i]);
1715
			if (page_ops & PAGE_UNLOCK)
1716
				unlock_page(pages[i]);
1717 1718 1719 1720 1721 1722 1723 1724 1725 1726
			if (page_ops & PAGE_LOCK) {
				lock_page(pages[i]);
				if (!PageDirty(pages[i]) ||
				    pages[i]->mapping != mapping) {
					unlock_page(pages[i]);
					put_page(pages[i]);
					err = -EAGAIN;
					goto out;
				}
			}
1727
			put_page(pages[i]);
1728
			pages_locked++;
C
Chris Mason 已提交
1729 1730 1731 1732 1733
		}
		nr_pages -= ret;
		index += ret;
		cond_resched();
	}
1734 1735 1736 1737
out:
	if (err && index_ret)
		*index_ret = start_index + pages_locked - 1;
	return err;
C
Chris Mason 已提交
1738 1739
}

1740 1741 1742 1743 1744 1745
void extent_clear_unlock_delalloc(struct inode *inode, u64 start, u64 end,
				 u64 delalloc_end, struct page *locked_page,
				 unsigned clear_bits,
				 unsigned long page_ops)
{
	clear_extent_bit(&BTRFS_I(inode)->io_tree, start, end, clear_bits, 1, 0,
1746
			 NULL);
1747 1748 1749

	__process_pages_contig(inode->i_mapping, locked_page,
			       start >> PAGE_SHIFT, end >> PAGE_SHIFT,
1750
			       page_ops, NULL);
1751 1752
}

C
Chris Mason 已提交
1753 1754 1755 1756 1757
/*
 * count the number of bytes in the tree that have a given bit(s)
 * set.  This can be fairly slow, except for EXTENT_DIRTY which is
 * cached.  The total number found is returned.
 */
1758 1759
u64 count_range_bits(struct extent_io_tree *tree,
		     u64 *start, u64 search_end, u64 max_bytes,
1760
		     unsigned bits, int contig)
1761 1762 1763 1764 1765
{
	struct rb_node *node;
	struct extent_state *state;
	u64 cur_start = *start;
	u64 total_bytes = 0;
1766
	u64 last = 0;
1767 1768
	int found = 0;

1769
	if (WARN_ON(search_end <= cur_start))
1770 1771
		return 0;

1772
	spin_lock(&tree->lock);
1773 1774 1775 1776 1777 1778 1779 1780
	if (cur_start == 0 && bits == EXTENT_DIRTY) {
		total_bytes = tree->dirty_bytes;
		goto out;
	}
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1781
	node = tree_search(tree, cur_start);
C
Chris Mason 已提交
1782
	if (!node)
1783 1784
		goto out;

C
Chris Mason 已提交
1785
	while (1) {
1786 1787 1788
		state = rb_entry(node, struct extent_state, rb_node);
		if (state->start > search_end)
			break;
1789 1790 1791
		if (contig && found && state->start > last + 1)
			break;
		if (state->end >= cur_start && (state->state & bits) == bits) {
1792 1793 1794 1795 1796
			total_bytes += min(search_end, state->end) + 1 -
				       max(cur_start, state->start);
			if (total_bytes >= max_bytes)
				break;
			if (!found) {
1797
				*start = max(cur_start, state->start);
1798 1799
				found = 1;
			}
1800 1801 1802
			last = state->end;
		} else if (contig && found) {
			break;
1803 1804 1805 1806 1807 1808
		}
		node = rb_next(node);
		if (!node)
			break;
	}
out:
1809
	spin_unlock(&tree->lock);
1810 1811
	return total_bytes;
}
1812

C
Chris Mason 已提交
1813 1814 1815 1816
/*
 * set the private field for a given byte offset in the tree.  If there isn't
 * an extent_state there already, this does nothing.
 */
1817
static noinline int set_state_failrec(struct extent_io_tree *tree, u64 start,
1818
		struct io_failure_record *failrec)
1819 1820 1821 1822 1823
{
	struct rb_node *node;
	struct extent_state *state;
	int ret = 0;

1824
	spin_lock(&tree->lock);
1825 1826 1827 1828
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1829
	node = tree_search(tree, start);
1830
	if (!node) {
1831 1832 1833 1834 1835 1836 1837 1838
		ret = -ENOENT;
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
	if (state->start != start) {
		ret = -ENOENT;
		goto out;
	}
1839
	state->failrec = failrec;
1840
out:
1841
	spin_unlock(&tree->lock);
1842 1843 1844
	return ret;
}

1845
static noinline int get_state_failrec(struct extent_io_tree *tree, u64 start,
1846
		struct io_failure_record **failrec)
1847 1848 1849 1850 1851
{
	struct rb_node *node;
	struct extent_state *state;
	int ret = 0;

1852
	spin_lock(&tree->lock);
1853 1854 1855 1856
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1857
	node = tree_search(tree, start);
1858
	if (!node) {
1859 1860 1861 1862 1863 1864 1865 1866
		ret = -ENOENT;
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
	if (state->start != start) {
		ret = -ENOENT;
		goto out;
	}
1867
	*failrec = state->failrec;
1868
out:
1869
	spin_unlock(&tree->lock);
1870 1871 1872 1873 1874
	return ret;
}

/*
 * searches a range in the state tree for a given mask.
1875
 * If 'filled' == 1, this returns 1 only if every extent in the tree
1876 1877 1878 1879
 * has the bits set.  Otherwise, 1 is returned if any bit in the
 * range is found set.
 */
int test_range_bit(struct extent_io_tree *tree, u64 start, u64 end,
1880
		   unsigned bits, int filled, struct extent_state *cached)
1881 1882 1883 1884 1885
{
	struct extent_state *state = NULL;
	struct rb_node *node;
	int bitset = 0;

1886
	spin_lock(&tree->lock);
1887
	if (cached && extent_state_in_tree(cached) && cached->start <= start &&
1888
	    cached->end > start)
1889 1890 1891
		node = &cached->rb_node;
	else
		node = tree_search(tree, start);
1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910
	while (node && start <= end) {
		state = rb_entry(node, struct extent_state, rb_node);

		if (filled && state->start > start) {
			bitset = 0;
			break;
		}

		if (state->start > end)
			break;

		if (state->state & bits) {
			bitset = 1;
			if (!filled)
				break;
		} else if (filled) {
			bitset = 0;
			break;
		}
1911 1912 1913 1914

		if (state->end == (u64)-1)
			break;

1915 1916 1917 1918 1919 1920 1921 1922 1923 1924
		start = state->end + 1;
		if (start > end)
			break;
		node = rb_next(node);
		if (!node) {
			if (filled)
				bitset = 0;
			break;
		}
	}
1925
	spin_unlock(&tree->lock);
1926 1927 1928 1929 1930 1931 1932
	return bitset;
}

/*
 * helper function to set a given page up to date if all the
 * extents in the tree for that page are up to date
 */
1933
static void check_page_uptodate(struct extent_io_tree *tree, struct page *page)
1934
{
M
Miao Xie 已提交
1935
	u64 start = page_offset(page);
1936
	u64 end = start + PAGE_SIZE - 1;
1937
	if (test_range_bit(tree, start, end, EXTENT_UPTODATE, 1, NULL))
1938 1939 1940
		SetPageUptodate(page);
}

1941 1942 1943
int free_io_failure(struct extent_io_tree *failure_tree,
		    struct extent_io_tree *io_tree,
		    struct io_failure_record *rec)
1944 1945 1946 1947
{
	int ret;
	int err = 0;

1948
	set_state_failrec(failure_tree, rec->start, NULL);
1949 1950
	ret = clear_extent_bits(failure_tree, rec->start,
				rec->start + rec->len - 1,
1951
				EXTENT_LOCKED | EXTENT_DIRTY);
1952 1953 1954
	if (ret)
		err = ret;

1955
	ret = clear_extent_bits(io_tree, rec->start,
D
David Woodhouse 已提交
1956
				rec->start + rec->len - 1,
1957
				EXTENT_DAMAGED);
D
David Woodhouse 已提交
1958 1959
	if (ret && !err)
		err = ret;
1960 1961 1962 1963 1964 1965 1966 1967 1968 1969

	kfree(rec);
	return err;
}

/*
 * this bypasses the standard btrfs submit functions deliberately, as
 * the standard behavior is to write all copies in a raid setup. here we only
 * want to write the one bad copy. so we do the mapping for ourselves and issue
 * submit_bio directly.
1970
 * to avoid any synchronization issues, wait for the data after writing, which
1971 1972 1973 1974
 * actually prevents the read that triggered the error from finishing.
 * currently, there can be no more than two copies of every data bit. thus,
 * exactly one rewrite is required.
 */
1975 1976 1977
int repair_io_failure(struct btrfs_fs_info *fs_info, u64 ino, u64 start,
		      u64 length, u64 logical, struct page *page,
		      unsigned int pg_offset, int mirror_num)
1978 1979 1980 1981 1982 1983 1984 1985
{
	struct bio *bio;
	struct btrfs_device *dev;
	u64 map_length = 0;
	u64 sector;
	struct btrfs_bio *bbio = NULL;
	int ret;

1986
	ASSERT(!(fs_info->sb->s_flags & SB_RDONLY));
1987 1988
	BUG_ON(!mirror_num);

1989
	bio = btrfs_io_bio_alloc(1);
1990
	bio->bi_iter.bi_size = 0;
1991 1992
	map_length = length;

1993 1994 1995 1996 1997 1998
	/*
	 * Avoid races with device replace and make sure our bbio has devices
	 * associated to its stripes that don't go away while we are doing the
	 * read repair operation.
	 */
	btrfs_bio_counter_inc_blocked(fs_info);
1999
	if (btrfs_is_parity_mirror(fs_info, logical, length)) {
2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022
		/*
		 * Note that we don't use BTRFS_MAP_WRITE because it's supposed
		 * to update all raid stripes, but here we just want to correct
		 * bad stripe, thus BTRFS_MAP_READ is abused to only get the bad
		 * stripe's dev and sector.
		 */
		ret = btrfs_map_block(fs_info, BTRFS_MAP_READ, logical,
				      &map_length, &bbio, 0);
		if (ret) {
			btrfs_bio_counter_dec(fs_info);
			bio_put(bio);
			return -EIO;
		}
		ASSERT(bbio->mirror_num == 1);
	} else {
		ret = btrfs_map_block(fs_info, BTRFS_MAP_WRITE, logical,
				      &map_length, &bbio, mirror_num);
		if (ret) {
			btrfs_bio_counter_dec(fs_info);
			bio_put(bio);
			return -EIO;
		}
		BUG_ON(mirror_num != bbio->mirror_num);
2023
	}
2024 2025

	sector = bbio->stripes[bbio->mirror_num - 1].physical >> 9;
2026
	bio->bi_iter.bi_sector = sector;
2027
	dev = bbio->stripes[bbio->mirror_num - 1].dev;
2028
	btrfs_put_bbio(bbio);
2029 2030
	if (!dev || !dev->bdev ||
	    !test_bit(BTRFS_DEV_STATE_WRITEABLE, &dev->dev_state)) {
2031
		btrfs_bio_counter_dec(fs_info);
2032 2033 2034
		bio_put(bio);
		return -EIO;
	}
2035
	bio_set_dev(bio, dev->bdev);
2036
	bio->bi_opf = REQ_OP_WRITE | REQ_SYNC;
2037
	bio_add_page(bio, page, length, pg_offset);
2038

2039
	if (btrfsic_submit_bio_wait(bio)) {
2040
		/* try to remap that extent elsewhere? */
2041
		btrfs_bio_counter_dec(fs_info);
2042
		bio_put(bio);
2043
		btrfs_dev_stat_inc_and_print(dev, BTRFS_DEV_STAT_WRITE_ERRS);
2044 2045 2046
		return -EIO;
	}

2047 2048
	btrfs_info_rl_in_rcu(fs_info,
		"read error corrected: ino %llu off %llu (dev %s sector %llu)",
2049
				  ino, start,
2050
				  rcu_str_deref(dev->name), sector);
2051
	btrfs_bio_counter_dec(fs_info);
2052 2053 2054 2055
	bio_put(bio);
	return 0;
}

2056 2057
int repair_eb_io_failure(struct btrfs_fs_info *fs_info,
			 struct extent_buffer *eb, int mirror_num)
2058 2059 2060
{
	u64 start = eb->start;
	unsigned long i, num_pages = num_extent_pages(eb->start, eb->len);
2061
	int ret = 0;
2062

2063
	if (sb_rdonly(fs_info->sb))
2064 2065
		return -EROFS;

2066
	for (i = 0; i < num_pages; i++) {
2067
		struct page *p = eb->pages[i];
2068

2069
		ret = repair_io_failure(fs_info, 0, start, PAGE_SIZE, start, p,
2070
					start - page_offset(p), mirror_num);
2071 2072
		if (ret)
			break;
2073
		start += PAGE_SIZE;
2074 2075 2076 2077 2078
	}

	return ret;
}

2079 2080 2081 2082
/*
 * each time an IO finishes, we do a fast check in the IO failure tree
 * to see if we need to process or clean up an io_failure_record
 */
2083 2084 2085 2086
int clean_io_failure(struct btrfs_fs_info *fs_info,
		     struct extent_io_tree *failure_tree,
		     struct extent_io_tree *io_tree, u64 start,
		     struct page *page, u64 ino, unsigned int pg_offset)
2087 2088 2089 2090 2091 2092 2093 2094
{
	u64 private;
	struct io_failure_record *failrec;
	struct extent_state *state;
	int num_copies;
	int ret;

	private = 0;
2095 2096
	ret = count_range_bits(failure_tree, &private, (u64)-1, 1,
			       EXTENT_DIRTY, 0);
2097 2098 2099
	if (!ret)
		return 0;

2100
	ret = get_state_failrec(failure_tree, start, &failrec);
2101 2102 2103 2104 2105 2106 2107
	if (ret)
		return 0;

	BUG_ON(!failrec->this_mirror);

	if (failrec->in_validation) {
		/* there was no real error, just free the record */
2108 2109 2110
		btrfs_debug(fs_info,
			"clean_io_failure: freeing dummy error at %llu",
			failrec->start);
2111 2112
		goto out;
	}
2113
	if (sb_rdonly(fs_info->sb))
2114
		goto out;
2115

2116 2117
	spin_lock(&io_tree->lock);
	state = find_first_extent_bit_state(io_tree,
2118 2119
					    failrec->start,
					    EXTENT_LOCKED);
2120
	spin_unlock(&io_tree->lock);
2121

2122 2123
	if (state && state->start <= failrec->start &&
	    state->end >= failrec->start + failrec->len - 1) {
2124 2125
		num_copies = btrfs_num_copies(fs_info, failrec->logical,
					      failrec->len);
2126
		if (num_copies > 1)  {
2127 2128 2129
			repair_io_failure(fs_info, ino, start, failrec->len,
					  failrec->logical, page, pg_offset,
					  failrec->failed_mirror);
2130 2131 2132 2133
		}
	}

out:
2134
	free_io_failure(failure_tree, io_tree, failrec);
2135

2136
	return 0;
2137 2138
}

2139 2140 2141 2142 2143 2144
/*
 * Can be called when
 * - hold extent lock
 * - under ordered extent
 * - the inode is freeing
 */
2145
void btrfs_free_io_failure_record(struct btrfs_inode *inode, u64 start, u64 end)
2146
{
2147
	struct extent_io_tree *failure_tree = &inode->io_failure_tree;
2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163
	struct io_failure_record *failrec;
	struct extent_state *state, *next;

	if (RB_EMPTY_ROOT(&failure_tree->state))
		return;

	spin_lock(&failure_tree->lock);
	state = find_first_extent_bit_state(failure_tree, start, EXTENT_DIRTY);
	while (state) {
		if (state->start > end)
			break;

		ASSERT(state->end <= end);

		next = next_state(state);

2164
		failrec = state->failrec;
2165 2166 2167 2168 2169 2170 2171 2172
		free_extent_state(state);
		kfree(failrec);

		state = next;
	}
	spin_unlock(&failure_tree->lock);
}

2173
int btrfs_get_io_failure_record(struct inode *inode, u64 start, u64 end,
2174
		struct io_failure_record **failrec_ret)
2175
{
2176
	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2177
	struct io_failure_record *failrec;
2178 2179 2180 2181 2182 2183 2184
	struct extent_map *em;
	struct extent_io_tree *failure_tree = &BTRFS_I(inode)->io_failure_tree;
	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
	struct extent_map_tree *em_tree = &BTRFS_I(inode)->extent_tree;
	int ret;
	u64 logical;

2185
	ret = get_state_failrec(failure_tree, start, &failrec);
2186 2187 2188 2189
	if (ret) {
		failrec = kzalloc(sizeof(*failrec), GFP_NOFS);
		if (!failrec)
			return -ENOMEM;
2190

2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204
		failrec->start = start;
		failrec->len = end - start + 1;
		failrec->this_mirror = 0;
		failrec->bio_flags = 0;
		failrec->in_validation = 0;

		read_lock(&em_tree->lock);
		em = lookup_extent_mapping(em_tree, start, failrec->len);
		if (!em) {
			read_unlock(&em_tree->lock);
			kfree(failrec);
			return -EIO;
		}

2205
		if (em->start > start || em->start + em->len <= start) {
2206 2207 2208 2209
			free_extent_map(em);
			em = NULL;
		}
		read_unlock(&em_tree->lock);
2210
		if (!em) {
2211 2212 2213
			kfree(failrec);
			return -EIO;
		}
2214

2215 2216 2217 2218 2219 2220 2221 2222
		logical = start - em->start;
		logical = em->block_start + logical;
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags)) {
			logical = em->block_start;
			failrec->bio_flags = EXTENT_BIO_COMPRESSED;
			extent_set_compress_type(&failrec->bio_flags,
						 em->compress_type);
		}
2223

2224 2225 2226
		btrfs_debug(fs_info,
			"Get IO Failure Record: (new) logical=%llu, start=%llu, len=%llu",
			logical, start, failrec->len);
2227

2228 2229 2230 2231 2232
		failrec->logical = logical;
		free_extent_map(em);

		/* set the bits in the private failure tree */
		ret = set_extent_bits(failure_tree, start, end,
2233
					EXTENT_LOCKED | EXTENT_DIRTY);
2234
		if (ret >= 0)
2235
			ret = set_state_failrec(failure_tree, start, failrec);
2236 2237
		/* set the bits in the inode's tree */
		if (ret >= 0)
2238
			ret = set_extent_bits(tree, start, end, EXTENT_DAMAGED);
2239 2240 2241 2242 2243
		if (ret < 0) {
			kfree(failrec);
			return ret;
		}
	} else {
2244 2245 2246 2247
		btrfs_debug(fs_info,
			"Get IO Failure Record: (found) logical=%llu, start=%llu, len=%llu, validation=%d",
			failrec->logical, failrec->start, failrec->len,
			failrec->in_validation);
2248 2249 2250 2251 2252 2253
		/*
		 * when data can be on disk more than twice, add to failrec here
		 * (e.g. with a list for failed_mirror) to make
		 * clean_io_failure() clean all those errors at once.
		 */
	}
2254 2255 2256 2257 2258 2259

	*failrec_ret = failrec;

	return 0;
}

2260
bool btrfs_check_repairable(struct inode *inode, struct bio *failed_bio,
2261 2262
			   struct io_failure_record *failrec, int failed_mirror)
{
2263
	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2264 2265
	int num_copies;

2266
	num_copies = btrfs_num_copies(fs_info, failrec->logical, failrec->len);
2267 2268 2269 2270 2271 2272
	if (num_copies == 1) {
		/*
		 * we only have a single copy of the data, so don't bother with
		 * all the retry and error correction code that follows. no
		 * matter what the error is, it is very likely to persist.
		 */
2273 2274 2275
		btrfs_debug(fs_info,
			"Check Repairable: cannot repair, num_copies=%d, next_mirror %d, failed_mirror %d",
			num_copies, failrec->this_mirror, failed_mirror);
2276
		return false;
2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312
	}

	/*
	 * there are two premises:
	 *	a) deliver good data to the caller
	 *	b) correct the bad sectors on disk
	 */
	if (failed_bio->bi_vcnt > 1) {
		/*
		 * to fulfill b), we need to know the exact failing sectors, as
		 * we don't want to rewrite any more than the failed ones. thus,
		 * we need separate read requests for the failed bio
		 *
		 * if the following BUG_ON triggers, our validation request got
		 * merged. we need separate requests for our algorithm to work.
		 */
		BUG_ON(failrec->in_validation);
		failrec->in_validation = 1;
		failrec->this_mirror = failed_mirror;
	} else {
		/*
		 * we're ready to fulfill a) and b) alongside. get a good copy
		 * of the failed sector and if we succeed, we have setup
		 * everything for repair_io_failure to do the rest for us.
		 */
		if (failrec->in_validation) {
			BUG_ON(failrec->this_mirror != failed_mirror);
			failrec->in_validation = 0;
			failrec->this_mirror = 0;
		}
		failrec->failed_mirror = failed_mirror;
		failrec->this_mirror++;
		if (failrec->this_mirror == failed_mirror)
			failrec->this_mirror++;
	}

2313
	if (failrec->this_mirror > num_copies) {
2314 2315 2316
		btrfs_debug(fs_info,
			"Check Repairable: (fail) num_copies=%d, next_mirror %d, failed_mirror %d",
			num_copies, failrec->this_mirror, failed_mirror);
2317
		return false;
2318 2319
	}

2320
	return true;
2321 2322 2323 2324 2325 2326
}


struct bio *btrfs_create_repair_bio(struct inode *inode, struct bio *failed_bio,
				    struct io_failure_record *failrec,
				    struct page *page, int pg_offset, int icsum,
2327
				    bio_end_io_t *endio_func, void *data)
2328
{
2329
	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2330 2331 2332 2333
	struct bio *bio;
	struct btrfs_io_bio *btrfs_failed_bio;
	struct btrfs_io_bio *btrfs_bio;

2334
	bio = btrfs_io_bio_alloc(1);
2335
	bio->bi_end_io = endio_func;
2336
	bio->bi_iter.bi_sector = failrec->logical >> 9;
2337
	bio_set_dev(bio, fs_info->fs_devices->latest_bdev);
2338
	bio->bi_iter.bi_size = 0;
2339
	bio->bi_private = data;
2340

2341 2342 2343 2344 2345 2346
	btrfs_failed_bio = btrfs_io_bio(failed_bio);
	if (btrfs_failed_bio->csum) {
		u16 csum_size = btrfs_super_csum_size(fs_info->super_copy);

		btrfs_bio = btrfs_io_bio(bio);
		btrfs_bio->csum = btrfs_bio->csum_inline;
2347 2348
		icsum *= csum_size;
		memcpy(btrfs_bio->csum, btrfs_failed_bio->csum + icsum,
2349 2350 2351
		       csum_size);
	}

2352 2353 2354 2355 2356 2357 2358 2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371
	bio_add_page(bio, page, failrec->len, pg_offset);

	return bio;
}

/*
 * this is a generic handler for readpage errors (default
 * readpage_io_failed_hook). if other copies exist, read those and write back
 * good data to the failed position. does not investigate in remapping the
 * failed extent elsewhere, hoping the device will be smart enough to do this as
 * needed
 */

static int bio_readpage_error(struct bio *failed_bio, u64 phy_offset,
			      struct page *page, u64 start, u64 end,
			      int failed_mirror)
{
	struct io_failure_record *failrec;
	struct inode *inode = page->mapping->host;
	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
2372
	struct extent_io_tree *failure_tree = &BTRFS_I(inode)->io_failure_tree;
2373
	struct bio *bio;
2374
	int read_mode = 0;
2375
	blk_status_t status;
2376 2377
	int ret;

2378
	BUG_ON(bio_op(failed_bio) == REQ_OP_WRITE);
2379 2380 2381 2382 2383

	ret = btrfs_get_io_failure_record(inode, start, end, &failrec);
	if (ret)
		return ret;

2384 2385
	if (!btrfs_check_repairable(inode, failed_bio, failrec,
				    failed_mirror)) {
2386
		free_io_failure(failure_tree, tree, failrec);
2387 2388 2389 2390
		return -EIO;
	}

	if (failed_bio->bi_vcnt > 1)
2391
		read_mode |= REQ_FAILFAST_DEV;
2392 2393 2394 2395

	phy_offset >>= inode->i_sb->s_blocksize_bits;
	bio = btrfs_create_repair_bio(inode, failed_bio, failrec, page,
				      start - page_offset(page),
2396 2397
				      (int)phy_offset, failed_bio->bi_end_io,
				      NULL);
2398
	bio_set_op_attrs(bio, REQ_OP_READ, read_mode);
2399

2400 2401 2402
	btrfs_debug(btrfs_sb(inode->i_sb),
		"Repair Read Error: submitting new read[%#x] to this_mirror=%d, in_validation=%d",
		read_mode, failrec->this_mirror, failrec->in_validation);
2403

2404
	status = tree->ops->submit_bio_hook(tree->private_data, bio, failrec->this_mirror,
2405
					 failrec->bio_flags, 0);
2406
	if (status) {
2407
		free_io_failure(failure_tree, tree, failrec);
2408
		bio_put(bio);
2409
		ret = blk_status_to_errno(status);
2410 2411
	}

2412
	return ret;
2413 2414
}

2415 2416
/* lots and lots of room for performance fixes in the end_bio funcs */

2417
void end_extent_writepage(struct page *page, int err, u64 start, u64 end)
2418 2419 2420
{
	int uptodate = (err == 0);
	struct extent_io_tree *tree;
2421
	int ret = 0;
2422 2423 2424

	tree = &BTRFS_I(page->mapping->host)->io_tree;

2425 2426 2427
	if (tree->ops && tree->ops->writepage_end_io_hook)
		tree->ops->writepage_end_io_hook(page, start, end, NULL,
				uptodate);
2428 2429 2430 2431

	if (!uptodate) {
		ClearPageUptodate(page);
		SetPageError(page);
2432
		ret = err < 0 ? err : -EIO;
2433
		mapping_set_error(page->mapping, ret);
2434 2435 2436
	}
}

2437 2438 2439 2440 2441 2442 2443 2444 2445
/*
 * after a writepage IO is done, we need to:
 * clear the uptodate bits on error
 * clear the writeback bits in the extent tree for this IO
 * end_page_writeback if the page has no more pending IO
 *
 * Scheduling is not allowed, so the extent state tree is expected
 * to have one and only one object corresponding to this IO.
 */
2446
static void end_bio_extent_writepage(struct bio *bio)
2447
{
2448
	int error = blk_status_to_errno(bio->bi_status);
2449
	struct bio_vec *bvec;
2450 2451
	u64 start;
	u64 end;
2452
	int i;
2453

2454
	ASSERT(!bio_flagged(bio, BIO_CLONED));
2455
	bio_for_each_segment_all(bvec, bio, i) {
2456
		struct page *page = bvec->bv_page;
2457 2458
		struct inode *inode = page->mapping->host;
		struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2459

2460 2461 2462 2463 2464
		/* We always issue full-page reads, but if some block
		 * in a page fails to read, blk_update_request() will
		 * advance bv_offset and adjust bv_len to compensate.
		 * Print a warning for nonzero offsets, and an error
		 * if they don't add up to a full page.  */
2465 2466
		if (bvec->bv_offset || bvec->bv_len != PAGE_SIZE) {
			if (bvec->bv_offset + bvec->bv_len != PAGE_SIZE)
2467
				btrfs_err(fs_info,
2468 2469 2470
				   "partial page write in btrfs with offset %u and length %u",
					bvec->bv_offset, bvec->bv_len);
			else
2471
				btrfs_info(fs_info,
J
Jeff Mahoney 已提交
2472
				   "incomplete page write in btrfs with offset %u and length %u",
2473 2474
					bvec->bv_offset, bvec->bv_len);
		}
2475

2476 2477
		start = page_offset(page);
		end = start + bvec->bv_offset + bvec->bv_len - 1;
2478

2479
		end_extent_writepage(page, error, start, end);
2480
		end_page_writeback(page);
2481
	}
2482

2483 2484 2485
	bio_put(bio);
}

2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497
static void
endio_readpage_release_extent(struct extent_io_tree *tree, u64 start, u64 len,
			      int uptodate)
{
	struct extent_state *cached = NULL;
	u64 end = start + len - 1;

	if (uptodate && tree->track_uptodate)
		set_extent_uptodate(tree, start, end, &cached, GFP_ATOMIC);
	unlock_extent_cached(tree, start, end, &cached, GFP_ATOMIC);
}

2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508
/*
 * after a readpage IO is done, we need to:
 * clear the uptodate bits on error
 * set the uptodate bits if things worked
 * set the page up to date if all extents in the tree are uptodate
 * clear the lock bit in the extent tree
 * unlock the page if there are no other extents locked for it
 *
 * Scheduling is not allowed, so the extent state tree is expected
 * to have one and only one object corresponding to this IO.
 */
2509
static void end_bio_extent_readpage(struct bio *bio)
2510
{
2511
	struct bio_vec *bvec;
2512
	int uptodate = !bio->bi_status;
2513
	struct btrfs_io_bio *io_bio = btrfs_io_bio(bio);
2514
	struct extent_io_tree *tree, *failure_tree;
2515
	u64 offset = 0;
2516 2517
	u64 start;
	u64 end;
2518
	u64 len;
2519 2520
	u64 extent_start = 0;
	u64 extent_len = 0;
2521
	int mirror;
2522
	int ret;
2523
	int i;
2524

2525
	ASSERT(!bio_flagged(bio, BIO_CLONED));
2526
	bio_for_each_segment_all(bvec, bio, i) {
2527
		struct page *page = bvec->bv_page;
2528
		struct inode *inode = page->mapping->host;
2529
		struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2530

2531 2532
		btrfs_debug(fs_info,
			"end_bio_extent_readpage: bi_sector=%llu, err=%d, mirror=%u",
2533
			(u64)bio->bi_iter.bi_sector, bio->bi_status,
2534
			io_bio->mirror_num);
2535
		tree = &BTRFS_I(inode)->io_tree;
2536
		failure_tree = &BTRFS_I(inode)->io_failure_tree;
2537

2538 2539 2540 2541 2542
		/* We always issue full-page reads, but if some block
		 * in a page fails to read, blk_update_request() will
		 * advance bv_offset and adjust bv_len to compensate.
		 * Print a warning for nonzero offsets, and an error
		 * if they don't add up to a full page.  */
2543 2544
		if (bvec->bv_offset || bvec->bv_len != PAGE_SIZE) {
			if (bvec->bv_offset + bvec->bv_len != PAGE_SIZE)
2545 2546
				btrfs_err(fs_info,
					"partial page read in btrfs with offset %u and length %u",
2547 2548
					bvec->bv_offset, bvec->bv_len);
			else
2549 2550
				btrfs_info(fs_info,
					"incomplete page read in btrfs with offset %u and length %u",
2551 2552
					bvec->bv_offset, bvec->bv_len);
		}
2553

2554 2555
		start = page_offset(page);
		end = start + bvec->bv_offset + bvec->bv_len - 1;
2556
		len = bvec->bv_len;
2557

2558
		mirror = io_bio->mirror_num;
2559
		if (likely(uptodate && tree->ops)) {
2560 2561 2562
			ret = tree->ops->readpage_end_io_hook(io_bio, offset,
							      page, start, end,
							      mirror);
2563
			if (ret)
2564
				uptodate = 0;
2565
			else
2566 2567 2568 2569
				clean_io_failure(BTRFS_I(inode)->root->fs_info,
						 failure_tree, tree, start,
						 page,
						 btrfs_ino(BTRFS_I(inode)), 0);
2570
		}
2571

2572 2573 2574
		if (likely(uptodate))
			goto readpage_ok;

2575
		if (tree->ops) {
2576
			ret = tree->ops->readpage_io_failed_hook(page, mirror);
L
Liu Bo 已提交
2577 2578 2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591 2592 2593 2594
			if (ret == -EAGAIN) {
				/*
				 * Data inode's readpage_io_failed_hook() always
				 * returns -EAGAIN.
				 *
				 * The generic bio_readpage_error handles errors
				 * the following way: If possible, new read
				 * requests are created and submitted and will
				 * end up in end_bio_extent_readpage as well (if
				 * we're lucky, not in the !uptodate case). In
				 * that case it returns 0 and we just go on with
				 * the next page in our bio. If it can't handle
				 * the error it will return -EIO and we remain
				 * responsible for that page.
				 */
				ret = bio_readpage_error(bio, offset, page,
							 start, end, mirror);
				if (ret == 0) {
2595
					uptodate = !bio->bi_status;
L
Liu Bo 已提交
2596 2597 2598 2599 2600
					offset += len;
					continue;
				}
			}

2601
			/*
L
Liu Bo 已提交
2602 2603 2604
			 * metadata's readpage_io_failed_hook() always returns
			 * -EIO and fixes nothing.  -EIO is also returned if
			 * data inode error could not be fixed.
2605
			 */
L
Liu Bo 已提交
2606
			ASSERT(ret == -EIO);
2607
		}
2608
readpage_ok:
2609
		if (likely(uptodate)) {
2610
			loff_t i_size = i_size_read(inode);
2611
			pgoff_t end_index = i_size >> PAGE_SHIFT;
2612
			unsigned off;
2613 2614

			/* Zero out the end if this page straddles i_size */
2615
			off = i_size & (PAGE_SIZE-1);
2616
			if (page->index == end_index && off)
2617
				zero_user_segment(page, off, PAGE_SIZE);
2618
			SetPageUptodate(page);
2619
		} else {
2620 2621
			ClearPageUptodate(page);
			SetPageError(page);
2622
		}
2623
		unlock_page(page);
2624
		offset += len;
2625 2626 2627 2628 2629 2630 2631 2632 2633 2634 2635 2636 2637 2638 2639 2640 2641 2642 2643 2644 2645 2646

		if (unlikely(!uptodate)) {
			if (extent_len) {
				endio_readpage_release_extent(tree,
							      extent_start,
							      extent_len, 1);
				extent_start = 0;
				extent_len = 0;
			}
			endio_readpage_release_extent(tree, start,
						      end - start + 1, 0);
		} else if (!extent_len) {
			extent_start = start;
			extent_len = end + 1 - start;
		} else if (extent_start + extent_len == start) {
			extent_len += end + 1 - start;
		} else {
			endio_readpage_release_extent(tree, extent_start,
						      extent_len, uptodate);
			extent_start = start;
			extent_len = end + 1 - start;
		}
2647
	}
2648

2649 2650 2651
	if (extent_len)
		endio_readpage_release_extent(tree, extent_start, extent_len,
					      uptodate);
2652
	if (io_bio->end_io)
2653
		io_bio->end_io(io_bio, blk_status_to_errno(bio->bi_status));
2654 2655 2656
	bio_put(bio);
}

2657
/*
2658 2659 2660
 * Initialize the members up to but not including 'bio'. Use after allocating a
 * new bio by bio_alloc_bioset as it does not initialize the bytes outside of
 * 'bio' because use of __GFP_ZERO is not supported.
2661
 */
2662
static inline void btrfs_io_bio_init(struct btrfs_io_bio *btrfs_bio)
2663
{
2664 2665
	memset(btrfs_bio, 0, offsetof(struct btrfs_io_bio, bio));
}
2666

2667
/*
2668 2669 2670
 * The following helpers allocate a bio. As it's backed by a bioset, it'll
 * never fail.  We're returning a bio right now but you can call btrfs_io_bio
 * for the appropriate container_of magic
2671
 */
2672
struct bio *btrfs_bio_alloc(struct block_device *bdev, u64 first_byte)
2673 2674 2675
{
	struct bio *bio;

2676
	bio = bio_alloc_bioset(GFP_NOFS, BIO_MAX_PAGES, btrfs_bioset);
2677
	bio_set_dev(bio, bdev);
2678
	bio->bi_iter.bi_sector = first_byte >> 9;
2679
	btrfs_io_bio_init(btrfs_io_bio(bio));
2680 2681 2682
	return bio;
}

2683
struct bio *btrfs_bio_clone(struct bio *bio)
2684
{
2685 2686
	struct btrfs_io_bio *btrfs_bio;
	struct bio *new;
2687

2688
	/* Bio allocation backed by a bioset does not fail */
2689
	new = bio_clone_fast(bio, GFP_NOFS, btrfs_bioset);
2690
	btrfs_bio = btrfs_io_bio(new);
2691
	btrfs_io_bio_init(btrfs_bio);
2692
	btrfs_bio->iter = bio->bi_iter;
2693 2694
	return new;
}
2695

2696
struct bio *btrfs_io_bio_alloc(unsigned int nr_iovecs)
2697
{
2698 2699
	struct bio *bio;

2700
	/* Bio allocation backed by a bioset does not fail */
2701
	bio = bio_alloc_bioset(GFP_NOFS, nr_iovecs, btrfs_bioset);
2702
	btrfs_io_bio_init(btrfs_io_bio(bio));
2703
	return bio;
2704 2705
}

2706
struct bio *btrfs_bio_clone_partial(struct bio *orig, int offset, int size)
2707 2708 2709 2710 2711
{
	struct bio *bio;
	struct btrfs_io_bio *btrfs_bio;

	/* this will never fail when it's backed by a bioset */
2712
	bio = bio_clone_fast(orig, GFP_NOFS, btrfs_bioset);
2713 2714 2715
	ASSERT(bio);

	btrfs_bio = btrfs_io_bio(bio);
2716
	btrfs_io_bio_init(btrfs_bio);
2717 2718

	bio_trim(bio, offset >> 9, size >> 9);
2719
	btrfs_bio->iter = bio->bi_iter;
2720 2721
	return bio;
}
2722

2723 2724
static int __must_check submit_one_bio(struct bio *bio, int mirror_num,
				       unsigned long bio_flags)
2725
{
2726
	blk_status_t ret = 0;
2727 2728 2729 2730 2731
	struct bio_vec *bvec = bio->bi_io_vec + bio->bi_vcnt - 1;
	struct page *page = bvec->bv_page;
	struct extent_io_tree *tree = bio->bi_private;
	u64 start;

M
Miao Xie 已提交
2732
	start = page_offset(page) + bvec->bv_offset;
2733

2734
	bio->bi_private = NULL;
2735 2736
	bio_get(bio);

2737
	if (tree->ops)
2738
		ret = tree->ops->submit_bio_hook(tree->private_data, bio,
2739
					   mirror_num, bio_flags, start);
2740
	else
2741
		btrfsic_submit_bio(bio);
2742

2743
	bio_put(bio);
2744
	return blk_status_to_errno(ret);
2745 2746
}

2747
static int merge_bio(struct extent_io_tree *tree, struct page *page,
2748 2749 2750 2751
		     unsigned long offset, size_t size, struct bio *bio,
		     unsigned long bio_flags)
{
	int ret = 0;
2752
	if (tree->ops)
2753
		ret = tree->ops->merge_bio_hook(page, offset, size, bio,
2754 2755 2756 2757 2758
						bio_flags);
	return ret;

}

2759 2760 2761 2762
/*
 * @opf:	bio REQ_OP_* and REQ_* flags as one value
 */
static int submit_extent_page(unsigned int opf, struct extent_io_tree *tree,
2763
			      struct writeback_control *wbc,
2764
			      struct page *page, u64 offset,
2765
			      size_t size, unsigned long pg_offset,
2766 2767
			      struct block_device *bdev,
			      struct bio **bio_ret,
2768
			      bio_end_io_t end_io_func,
C
Chris Mason 已提交
2769 2770
			      int mirror_num,
			      unsigned long prev_bio_flags,
2771 2772
			      unsigned long bio_flags,
			      bool force_bio_submit)
2773 2774 2775
{
	int ret = 0;
	struct bio *bio;
C
Chris Mason 已提交
2776 2777
	int contig = 0;
	int old_compressed = prev_bio_flags & EXTENT_BIO_COMPRESSED;
2778
	size_t page_size = min_t(size_t, size, PAGE_SIZE);
2779
	sector_t sector = offset >> 9;
2780 2781 2782

	if (bio_ret && *bio_ret) {
		bio = *bio_ret;
C
Chris Mason 已提交
2783
		if (old_compressed)
2784
			contig = bio->bi_iter.bi_sector == sector;
C
Chris Mason 已提交
2785
		else
K
Kent Overstreet 已提交
2786
			contig = bio_end_sector(bio) == sector;
C
Chris Mason 已提交
2787 2788

		if (prev_bio_flags != bio_flags || !contig ||
2789
		    force_bio_submit ||
2790 2791
		    merge_bio(tree, page, pg_offset, page_size, bio, bio_flags) ||
		    bio_add_page(bio, page, page_size, pg_offset) < page_size) {
2792
			ret = submit_one_bio(bio, mirror_num, prev_bio_flags);
2793 2794
			if (ret < 0) {
				*bio_ret = NULL;
2795
				return ret;
2796
			}
2797 2798
			bio = NULL;
		} else {
2799 2800
			if (wbc)
				wbc_account_io(wbc, page, page_size);
2801 2802 2803
			return 0;
		}
	}
C
Chris Mason 已提交
2804

2805
	bio = btrfs_bio_alloc(bdev, offset);
2806
	bio_add_page(bio, page, page_size, pg_offset);
2807 2808
	bio->bi_end_io = end_io_func;
	bio->bi_private = tree;
2809
	bio->bi_write_hint = page->mapping->host->i_write_hint;
2810
	bio->bi_opf = opf;
2811 2812 2813 2814
	if (wbc) {
		wbc_init_bio(wbc, bio);
		wbc_account_io(wbc, page, page_size);
	}
2815

C
Chris Mason 已提交
2816
	if (bio_ret)
2817
		*bio_ret = bio;
C
Chris Mason 已提交
2818
	else
2819
		ret = submit_one_bio(bio, mirror_num, bio_flags);
2820 2821 2822 2823

	return ret;
}

2824 2825
static void attach_extent_buffer_page(struct extent_buffer *eb,
				      struct page *page)
2826 2827 2828
{
	if (!PagePrivate(page)) {
		SetPagePrivate(page);
2829
		get_page(page);
J
Josef Bacik 已提交
2830 2831 2832
		set_page_private(page, (unsigned long)eb);
	} else {
		WARN_ON(page->private != (unsigned long)eb);
2833 2834 2835
	}
}

J
Josef Bacik 已提交
2836
void set_page_extent_mapped(struct page *page)
2837
{
J
Josef Bacik 已提交
2838 2839
	if (!PagePrivate(page)) {
		SetPagePrivate(page);
2840
		get_page(page);
J
Josef Bacik 已提交
2841 2842
		set_page_private(page, EXTENT_PAGE_PRIVATE);
	}
2843 2844
}

2845 2846 2847 2848 2849 2850 2851 2852 2853
static struct extent_map *
__get_extent_map(struct inode *inode, struct page *page, size_t pg_offset,
		 u64 start, u64 len, get_extent_t *get_extent,
		 struct extent_map **em_cached)
{
	struct extent_map *em;

	if (em_cached && *em_cached) {
		em = *em_cached;
2854
		if (extent_map_in_tree(em) && start >= em->start &&
2855
		    start < extent_map_end(em)) {
2856
			refcount_inc(&em->refs);
2857 2858 2859 2860 2861 2862 2863
			return em;
		}

		free_extent_map(em);
		*em_cached = NULL;
	}

2864
	em = get_extent(BTRFS_I(inode), page, pg_offset, start, len, 0);
2865 2866
	if (em_cached && !IS_ERR_OR_NULL(em)) {
		BUG_ON(*em_cached);
2867
		refcount_inc(&em->refs);
2868 2869 2870 2871
		*em_cached = em;
	}
	return em;
}
2872 2873 2874 2875
/*
 * basic readpage implementation.  Locked extent state structs are inserted
 * into the tree that are removed when the IO is done (by the end_io
 * handlers)
2876
 * XXX JDM: This needs looking at to ensure proper page locking
2877
 * return 0 on success, otherwise return error
2878
 */
2879 2880 2881
static int __do_readpage(struct extent_io_tree *tree,
			 struct page *page,
			 get_extent_t *get_extent,
2882
			 struct extent_map **em_cached,
2883
			 struct bio **bio, int mirror_num,
2884
			 unsigned long *bio_flags, unsigned int read_flags,
2885
			 u64 *prev_em_start)
2886 2887
{
	struct inode *inode = page->mapping->host;
M
Miao Xie 已提交
2888
	u64 start = page_offset(page);
2889
	u64 page_end = start + PAGE_SIZE - 1;
2890 2891 2892 2893 2894 2895 2896 2897
	u64 end;
	u64 cur = start;
	u64 extent_offset;
	u64 last_byte = i_size_read(inode);
	u64 block_start;
	u64 cur_end;
	struct extent_map *em;
	struct block_device *bdev;
2898
	int ret = 0;
2899
	int nr = 0;
2900
	size_t pg_offset = 0;
2901
	size_t iosize;
C
Chris Mason 已提交
2902
	size_t disk_io_size;
2903
	size_t blocksize = inode->i_sb->s_blocksize;
2904
	unsigned long this_bio_flag = 0;
2905 2906 2907

	set_page_extent_mapped(page);

2908
	end = page_end;
D
Dan Magenheimer 已提交
2909 2910 2911
	if (!PageUptodate(page)) {
		if (cleancache_get_page(page) == 0) {
			BUG_ON(blocksize != PAGE_SIZE);
2912
			unlock_extent(tree, start, end);
D
Dan Magenheimer 已提交
2913 2914 2915 2916
			goto out;
		}
	}

2917
	if (page->index == last_byte >> PAGE_SHIFT) {
C
Chris Mason 已提交
2918
		char *userpage;
2919
		size_t zero_offset = last_byte & (PAGE_SIZE - 1);
C
Chris Mason 已提交
2920 2921

		if (zero_offset) {
2922
			iosize = PAGE_SIZE - zero_offset;
2923
			userpage = kmap_atomic(page);
C
Chris Mason 已提交
2924 2925
			memset(userpage + zero_offset, 0, iosize);
			flush_dcache_page(page);
2926
			kunmap_atomic(userpage);
C
Chris Mason 已提交
2927 2928
		}
	}
2929
	while (cur <= end) {
2930
		bool force_bio_submit = false;
2931
		u64 offset;
2932

2933 2934
		if (cur >= last_byte) {
			char *userpage;
2935 2936
			struct extent_state *cached = NULL;

2937
			iosize = PAGE_SIZE - pg_offset;
2938
			userpage = kmap_atomic(page);
2939
			memset(userpage + pg_offset, 0, iosize);
2940
			flush_dcache_page(page);
2941
			kunmap_atomic(userpage);
2942
			set_extent_uptodate(tree, cur, cur + iosize - 1,
2943
					    &cached, GFP_NOFS);
2944 2945 2946
			unlock_extent_cached(tree, cur,
					     cur + iosize - 1,
					     &cached, GFP_NOFS);
2947 2948
			break;
		}
2949 2950
		em = __get_extent_map(inode, page, pg_offset, cur,
				      end - cur + 1, get_extent, em_cached);
2951
		if (IS_ERR_OR_NULL(em)) {
2952
			SetPageError(page);
2953
			unlock_extent(tree, cur, end);
2954 2955 2956 2957 2958 2959
			break;
		}
		extent_offset = cur - em->start;
		BUG_ON(extent_map_end(em) <= cur);
		BUG_ON(end < cur);

2960
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags)) {
2961
			this_bio_flag |= EXTENT_BIO_COMPRESSED;
2962 2963 2964
			extent_set_compress_type(&this_bio_flag,
						 em->compress_type);
		}
C
Chris Mason 已提交
2965

2966 2967
		iosize = min(extent_map_end(em) - cur, end - cur + 1);
		cur_end = min(extent_map_end(em) - 1, end);
2968
		iosize = ALIGN(iosize, blocksize);
C
Chris Mason 已提交
2969 2970
		if (this_bio_flag & EXTENT_BIO_COMPRESSED) {
			disk_io_size = em->block_len;
2971
			offset = em->block_start;
C
Chris Mason 已提交
2972
		} else {
2973
			offset = em->block_start + extent_offset;
C
Chris Mason 已提交
2974 2975
			disk_io_size = iosize;
		}
2976 2977
		bdev = em->bdev;
		block_start = em->block_start;
Y
Yan Zheng 已提交
2978 2979
		if (test_bit(EXTENT_FLAG_PREALLOC, &em->flags))
			block_start = EXTENT_MAP_HOLE;
2980 2981 2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022

		/*
		 * If we have a file range that points to a compressed extent
		 * and it's followed by a consecutive file range that points to
		 * to the same compressed extent (possibly with a different
		 * offset and/or length, so it either points to the whole extent
		 * or only part of it), we must make sure we do not submit a
		 * single bio to populate the pages for the 2 ranges because
		 * this makes the compressed extent read zero out the pages
		 * belonging to the 2nd range. Imagine the following scenario:
		 *
		 *  File layout
		 *  [0 - 8K]                     [8K - 24K]
		 *    |                               |
		 *    |                               |
		 * points to extent X,         points to extent X,
		 * offset 4K, length of 8K     offset 0, length 16K
		 *
		 * [extent X, compressed length = 4K uncompressed length = 16K]
		 *
		 * If the bio to read the compressed extent covers both ranges,
		 * it will decompress extent X into the pages belonging to the
		 * first range and then it will stop, zeroing out the remaining
		 * pages that belong to the other range that points to extent X.
		 * So here we make sure we submit 2 bios, one for the first
		 * range and another one for the third range. Both will target
		 * the same physical extent from disk, but we can't currently
		 * make the compressed bio endio callback populate the pages
		 * for both ranges because each compressed bio is tightly
		 * coupled with a single extent map, and each range can have
		 * an extent map with a different offset value relative to the
		 * uncompressed data of our extent and different lengths. This
		 * is a corner case so we prioritize correctness over
		 * non-optimal behavior (submitting 2 bios for the same extent).
		 */
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags) &&
		    prev_em_start && *prev_em_start != (u64)-1 &&
		    *prev_em_start != em->orig_start)
			force_bio_submit = true;

		if (prev_em_start)
			*prev_em_start = em->orig_start;

3023 3024 3025 3026 3027 3028
		free_extent_map(em);
		em = NULL;

		/* we've found a hole, just zero and go on */
		if (block_start == EXTENT_MAP_HOLE) {
			char *userpage;
3029 3030
			struct extent_state *cached = NULL;

3031
			userpage = kmap_atomic(page);
3032
			memset(userpage + pg_offset, 0, iosize);
3033
			flush_dcache_page(page);
3034
			kunmap_atomic(userpage);
3035 3036

			set_extent_uptodate(tree, cur, cur + iosize - 1,
3037
					    &cached, GFP_NOFS);
3038 3039 3040
			unlock_extent_cached(tree, cur,
					     cur + iosize - 1,
					     &cached, GFP_NOFS);
3041
			cur = cur + iosize;
3042
			pg_offset += iosize;
3043 3044 3045
			continue;
		}
		/* the get_extent function already copied into the page */
3046 3047
		if (test_range_bit(tree, cur, cur_end,
				   EXTENT_UPTODATE, 1, NULL)) {
3048
			check_page_uptodate(tree, page);
3049
			unlock_extent(tree, cur, cur + iosize - 1);
3050
			cur = cur + iosize;
3051
			pg_offset += iosize;
3052 3053
			continue;
		}
3054 3055 3056 3057 3058
		/* we have an inline extent but it didn't get marked up
		 * to date.  Error out
		 */
		if (block_start == EXTENT_MAP_INLINE) {
			SetPageError(page);
3059
			unlock_extent(tree, cur, cur + iosize - 1);
3060
			cur = cur + iosize;
3061
			pg_offset += iosize;
3062 3063
			continue;
		}
3064

3065
		ret = submit_extent_page(REQ_OP_READ | read_flags, tree, NULL,
3066 3067
					 page, offset, disk_io_size,
					 pg_offset, bdev, bio,
C
Chris Mason 已提交
3068 3069
					 end_bio_extent_readpage, mirror_num,
					 *bio_flags,
3070 3071
					 this_bio_flag,
					 force_bio_submit);
3072 3073 3074 3075
		if (!ret) {
			nr++;
			*bio_flags = this_bio_flag;
		} else {
3076
			SetPageError(page);
3077
			unlock_extent(tree, cur, cur + iosize - 1);
3078
			goto out;
3079
		}
3080
		cur = cur + iosize;
3081
		pg_offset += iosize;
3082
	}
D
Dan Magenheimer 已提交
3083
out:
3084 3085 3086 3087 3088
	if (!nr) {
		if (!PageError(page))
			SetPageUptodate(page);
		unlock_page(page);
	}
3089
	return ret;
3090 3091
}

3092 3093 3094
static inline void __do_contiguous_readpages(struct extent_io_tree *tree,
					     struct page *pages[], int nr_pages,
					     u64 start, u64 end,
3095
					     struct extent_map **em_cached,
3096
					     struct bio **bio,
3097
					     unsigned long *bio_flags,
3098
					     u64 *prev_em_start)
3099 3100 3101 3102 3103 3104 3105 3106
{
	struct inode *inode;
	struct btrfs_ordered_extent *ordered;
	int index;

	inode = pages[0]->mapping->host;
	while (1) {
		lock_extent(tree, start, end);
3107
		ordered = btrfs_lookup_ordered_range(BTRFS_I(inode), start,
3108 3109 3110 3111 3112 3113 3114 3115 3116
						     end - start + 1);
		if (!ordered)
			break;
		unlock_extent(tree, start, end);
		btrfs_start_ordered_extent(inode, ordered, 1);
		btrfs_put_ordered_extent(ordered);
	}

	for (index = 0; index < nr_pages; index++) {
3117 3118
		__do_readpage(tree, pages[index], btrfs_get_extent, em_cached,
				bio, 0, bio_flags, 0, prev_em_start);
3119
		put_page(pages[index]);
3120 3121 3122 3123 3124
	}
}

static void __extent_readpages(struct extent_io_tree *tree,
			       struct page *pages[],
3125
			       int nr_pages,
3126
			       struct extent_map **em_cached,
3127
			       struct bio **bio, unsigned long *bio_flags,
3128
			       u64 *prev_em_start)
3129
{
3130
	u64 start = 0;
3131 3132 3133
	u64 end = 0;
	u64 page_start;
	int index;
3134
	int first_index = 0;
3135 3136 3137 3138 3139

	for (index = 0; index < nr_pages; index++) {
		page_start = page_offset(pages[index]);
		if (!end) {
			start = page_start;
3140
			end = start + PAGE_SIZE - 1;
3141 3142
			first_index = index;
		} else if (end + 1 == page_start) {
3143
			end += PAGE_SIZE;
3144 3145 3146
		} else {
			__do_contiguous_readpages(tree, &pages[first_index],
						  index - first_index, start,
3147
						  end, em_cached,
3148
						  bio, bio_flags,
3149
						  prev_em_start);
3150
			start = page_start;
3151
			end = start + PAGE_SIZE - 1;
3152 3153 3154 3155 3156 3157 3158
			first_index = index;
		}
	}

	if (end)
		__do_contiguous_readpages(tree, &pages[first_index],
					  index - first_index, start,
3159
					  end, em_cached, bio,
3160
					  bio_flags, prev_em_start);
3161 3162 3163 3164 3165 3166
}

static int __extent_read_full_page(struct extent_io_tree *tree,
				   struct page *page,
				   get_extent_t *get_extent,
				   struct bio **bio, int mirror_num,
3167 3168
				   unsigned long *bio_flags,
				   unsigned int read_flags)
3169 3170 3171 3172
{
	struct inode *inode = page->mapping->host;
	struct btrfs_ordered_extent *ordered;
	u64 start = page_offset(page);
3173
	u64 end = start + PAGE_SIZE - 1;
3174 3175 3176 3177
	int ret;

	while (1) {
		lock_extent(tree, start, end);
3178
		ordered = btrfs_lookup_ordered_range(BTRFS_I(inode), start,
3179
						PAGE_SIZE);
3180 3181 3182 3183 3184 3185 3186
		if (!ordered)
			break;
		unlock_extent(tree, start, end);
		btrfs_start_ordered_extent(inode, ordered, 1);
		btrfs_put_ordered_extent(ordered);
	}

3187
	ret = __do_readpage(tree, page, get_extent, NULL, bio, mirror_num,
3188
			    bio_flags, read_flags, NULL);
3189 3190 3191
	return ret;
}

3192
int extent_read_full_page(struct extent_io_tree *tree, struct page *page,
3193
			    get_extent_t *get_extent, int mirror_num)
3194 3195
{
	struct bio *bio = NULL;
C
Chris Mason 已提交
3196
	unsigned long bio_flags = 0;
3197 3198
	int ret;

3199
	ret = __extent_read_full_page(tree, page, get_extent, &bio, mirror_num,
3200
				      &bio_flags, 0);
3201
	if (bio)
3202
		ret = submit_one_bio(bio, mirror_num, bio_flags);
3203 3204 3205
	return ret;
}

3206
static void update_nr_written(struct writeback_control *wbc,
3207
			      unsigned long nr_written)
3208 3209 3210 3211
{
	wbc->nr_to_write -= nr_written;
}

3212
/*
3213 3214 3215 3216 3217 3218 3219 3220
 * helper for __extent_writepage, doing all of the delayed allocation setup.
 *
 * This returns 1 if our fill_delalloc function did all the work required
 * to write the page (copy into inline extent).  In this case the IO has
 * been started and the page is already unlocked.
 *
 * This returns 0 if all went well (page still locked)
 * This returns < 0 if there were errors (page still locked)
3221
 */
3222 3223 3224 3225 3226 3227 3228
static noinline_for_stack int writepage_delalloc(struct inode *inode,
			      struct page *page, struct writeback_control *wbc,
			      struct extent_page_data *epd,
			      u64 delalloc_start,
			      unsigned long *nr_written)
{
	struct extent_io_tree *tree = epd->tree;
3229
	u64 page_end = delalloc_start + PAGE_SIZE - 1;
3230 3231 3232 3233 3234 3235 3236 3237 3238 3239 3240 3241 3242 3243
	u64 nr_delalloc;
	u64 delalloc_to_write = 0;
	u64 delalloc_end = 0;
	int ret;
	int page_started = 0;

	if (epd->extent_locked || !tree->ops || !tree->ops->fill_delalloc)
		return 0;

	while (delalloc_end < page_end) {
		nr_delalloc = find_lock_delalloc_range(inode, tree,
					       page,
					       &delalloc_start,
					       &delalloc_end,
3244
					       BTRFS_MAX_EXTENT_SIZE);
3245 3246 3247 3248 3249 3250 3251 3252
		if (nr_delalloc == 0) {
			delalloc_start = delalloc_end + 1;
			continue;
		}
		ret = tree->ops->fill_delalloc(inode, page,
					       delalloc_start,
					       delalloc_end,
					       &page_started,
3253
					       nr_written, wbc);
3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265
		/* File system has been set read-only */
		if (ret) {
			SetPageError(page);
			/* fill_delalloc should be return < 0 for error
			 * but just in case, we use > 0 here meaning the
			 * IO is started, so we don't want to return > 0
			 * unless things are going well.
			 */
			ret = ret < 0 ? ret : -EIO;
			goto done;
		}
		/*
3266 3267
		 * delalloc_end is already one less than the total length, so
		 * we don't subtract one from PAGE_SIZE
3268 3269
		 */
		delalloc_to_write += (delalloc_end - delalloc_start +
3270
				      PAGE_SIZE) >> PAGE_SHIFT;
3271 3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289 3290 3291 3292 3293 3294 3295 3296 3297 3298 3299 3300 3301 3302 3303 3304 3305 3306 3307 3308 3309 3310 3311 3312 3313 3314
		delalloc_start = delalloc_end + 1;
	}
	if (wbc->nr_to_write < delalloc_to_write) {
		int thresh = 8192;

		if (delalloc_to_write < thresh * 2)
			thresh = delalloc_to_write;
		wbc->nr_to_write = min_t(u64, delalloc_to_write,
					 thresh);
	}

	/* did the fill delalloc function already unlock and start
	 * the IO?
	 */
	if (page_started) {
		/*
		 * we've unlocked the page, so we can't update
		 * the mapping's writeback index, just update
		 * nr_to_write.
		 */
		wbc->nr_to_write -= *nr_written;
		return 1;
	}

	ret = 0;

done:
	return ret;
}

/*
 * helper for __extent_writepage.  This calls the writepage start hooks,
 * and does the loop to map the page into extents and bios.
 *
 * We return 1 if the IO is started and the page is unlocked,
 * 0 if all went well (page still locked)
 * < 0 if there were errors (page still locked)
 */
static noinline_for_stack int __extent_writepage_io(struct inode *inode,
				 struct page *page,
				 struct writeback_control *wbc,
				 struct extent_page_data *epd,
				 loff_t i_size,
				 unsigned long nr_written,
3315
				 unsigned int write_flags, int *nr_ret)
3316 3317
{
	struct extent_io_tree *tree = epd->tree;
M
Miao Xie 已提交
3318
	u64 start = page_offset(page);
3319
	u64 page_end = start + PAGE_SIZE - 1;
3320 3321 3322 3323 3324 3325 3326
	u64 end;
	u64 cur = start;
	u64 extent_offset;
	u64 block_start;
	u64 iosize;
	struct extent_map *em;
	struct block_device *bdev;
3327
	size_t pg_offset = 0;
3328
	size_t blocksize;
3329 3330 3331
	int ret = 0;
	int nr = 0;
	bool compressed;
C
Chris Mason 已提交
3332

3333
	if (tree->ops && tree->ops->writepage_start_hook) {
C
Chris Mason 已提交
3334 3335
		ret = tree->ops->writepage_start_hook(page, start,
						      page_end);
3336 3337 3338 3339 3340 3341
		if (ret) {
			/* Fixup worker will requeue */
			if (ret == -EBUSY)
				wbc->pages_skipped++;
			else
				redirty_page_for_writepage(wbc, page);
3342

3343
			update_nr_written(wbc, nr_written);
3344
			unlock_page(page);
3345
			return 1;
3346 3347 3348
		}
	}

3349 3350 3351 3352
	/*
	 * we don't want to touch the inode after unlocking the page,
	 * so we update the mapping writeback index now
	 */
3353
	update_nr_written(wbc, nr_written + 1);
3354

3355
	end = page_end;
3356
	if (i_size <= start) {
3357 3358 3359
		if (tree->ops && tree->ops->writepage_end_io_hook)
			tree->ops->writepage_end_io_hook(page, start,
							 page_end, NULL, 1);
3360 3361 3362 3363 3364 3365
		goto done;
	}

	blocksize = inode->i_sb->s_blocksize;

	while (cur <= end) {
3366
		u64 em_end;
3367
		u64 offset;
3368

3369
		if (cur >= i_size) {
3370 3371 3372
			if (tree->ops && tree->ops->writepage_end_io_hook)
				tree->ops->writepage_end_io_hook(page, cur,
							 page_end, NULL, 1);
3373 3374
			break;
		}
3375
		em = btrfs_get_extent(BTRFS_I(inode), page, pg_offset, cur,
3376
				     end - cur + 1, 1);
3377
		if (IS_ERR_OR_NULL(em)) {
3378
			SetPageError(page);
3379
			ret = PTR_ERR_OR_ZERO(em);
3380 3381 3382 3383
			break;
		}

		extent_offset = cur - em->start;
3384 3385
		em_end = extent_map_end(em);
		BUG_ON(em_end <= cur);
3386
		BUG_ON(end < cur);
3387
		iosize = min(em_end - cur, end - cur + 1);
3388
		iosize = ALIGN(iosize, blocksize);
3389
		offset = em->block_start + extent_offset;
3390 3391
		bdev = em->bdev;
		block_start = em->block_start;
C
Chris Mason 已提交
3392
		compressed = test_bit(EXTENT_FLAG_COMPRESSED, &em->flags);
3393 3394 3395
		free_extent_map(em);
		em = NULL;

C
Chris Mason 已提交
3396 3397 3398 3399 3400
		/*
		 * compressed and inline extents are written through other
		 * paths in the FS
		 */
		if (compressed || block_start == EXTENT_MAP_HOLE ||
3401
		    block_start == EXTENT_MAP_INLINE) {
C
Chris Mason 已提交
3402 3403 3404 3405 3406 3407
			/*
			 * end_io notification does not happen here for
			 * compressed extents
			 */
			if (!compressed && tree->ops &&
			    tree->ops->writepage_end_io_hook)
3408 3409 3410
				tree->ops->writepage_end_io_hook(page, cur,
							 cur + iosize - 1,
							 NULL, 1);
C
Chris Mason 已提交
3411 3412 3413 3414 3415 3416 3417 3418 3419
			else if (compressed) {
				/* we don't want to end_page_writeback on
				 * a compressed extent.  this happens
				 * elsewhere
				 */
				nr++;
			}

			cur += iosize;
3420
			pg_offset += iosize;
3421 3422
			continue;
		}
C
Chris Mason 已提交
3423

3424 3425 3426 3427 3428
		set_range_writeback(tree, cur, cur + iosize - 1);
		if (!PageWriteback(page)) {
			btrfs_err(BTRFS_I(inode)->root->fs_info,
				   "page %lu not writeback, cur %llu end %llu",
			       page->index, cur, end);
3429
		}
3430

3431
		ret = submit_extent_page(REQ_OP_WRITE | write_flags, tree, wbc,
3432
					 page, offset, iosize, pg_offset,
3433
					 bdev, &epd->bio,
3434 3435
					 end_bio_extent_writepage,
					 0, 0, 0, false);
3436
		if (ret) {
3437
			SetPageError(page);
3438 3439 3440
			if (PageWriteback(page))
				end_page_writeback(page);
		}
3441 3442

		cur = cur + iosize;
3443
		pg_offset += iosize;
3444 3445
		nr++;
	}
3446 3447 3448 3449 3450 3451 3452 3453 3454 3455 3456 3457 3458 3459 3460 3461 3462
done:
	*nr_ret = nr;
	return ret;
}

/*
 * the writepage semantics are similar to regular writepage.  extent
 * records are inserted to lock ranges in the tree, and as dirty areas
 * are found, they are marked writeback.  Then the lock bits are removed
 * and the end_io handler clears the writeback ranges
 */
static int __extent_writepage(struct page *page, struct writeback_control *wbc,
			      void *data)
{
	struct inode *inode = page->mapping->host;
	struct extent_page_data *epd = data;
	u64 start = page_offset(page);
3463
	u64 page_end = start + PAGE_SIZE - 1;
3464 3465 3466 3467
	int ret;
	int nr = 0;
	size_t pg_offset = 0;
	loff_t i_size = i_size_read(inode);
3468
	unsigned long end_index = i_size >> PAGE_SHIFT;
3469
	unsigned int write_flags = 0;
3470 3471
	unsigned long nr_written = 0;

3472
	write_flags = wbc_to_write_flags(wbc);
3473 3474 3475 3476 3477 3478 3479

	trace___extent_writepage(page, inode, wbc);

	WARN_ON(!PageLocked(page));

	ClearPageError(page);

3480
	pg_offset = i_size & (PAGE_SIZE - 1);
3481 3482
	if (page->index > end_index ||
	   (page->index == end_index && !pg_offset)) {
3483
		page->mapping->a_ops->invalidatepage(page, 0, PAGE_SIZE);
3484 3485 3486 3487 3488 3489 3490 3491 3492
		unlock_page(page);
		return 0;
	}

	if (page->index == end_index) {
		char *userpage;

		userpage = kmap_atomic(page);
		memset(userpage + pg_offset, 0,
3493
		       PAGE_SIZE - pg_offset);
3494 3495 3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512
		kunmap_atomic(userpage);
		flush_dcache_page(page);
	}

	pg_offset = 0;

	set_page_extent_mapped(page);

	ret = writepage_delalloc(inode, page, wbc, epd, start, &nr_written);
	if (ret == 1)
		goto done_unlocked;
	if (ret)
		goto done;

	ret = __extent_writepage_io(inode, page, wbc, epd,
				    i_size, nr_written, write_flags, &nr);
	if (ret == 1)
		goto done_unlocked;

3513 3514 3515 3516 3517 3518
done:
	if (nr == 0) {
		/* make sure the mapping tag for page dirty gets cleared */
		set_page_writeback(page);
		end_page_writeback(page);
	}
3519 3520 3521 3522
	if (PageError(page)) {
		ret = ret < 0 ? ret : -EIO;
		end_extent_writepage(page, ret, start, page_end);
	}
3523
	unlock_page(page);
3524
	return ret;
3525

3526
done_unlocked:
3527 3528 3529
	return 0;
}

3530
void wait_on_extent_buffer_writeback(struct extent_buffer *eb)
3531
{
3532 3533
	wait_on_bit_io(&eb->bflags, EXTENT_BUFFER_WRITEBACK,
		       TASK_UNINTERRUPTIBLE);
3534 3535
}

3536 3537 3538 3539
static noinline_for_stack int
lock_extent_buffer_for_io(struct extent_buffer *eb,
			  struct btrfs_fs_info *fs_info,
			  struct extent_page_data *epd)
3540 3541 3542 3543 3544 3545 3546 3547 3548 3549 3550 3551 3552 3553 3554 3555 3556 3557 3558
{
	unsigned long i, num_pages;
	int flush = 0;
	int ret = 0;

	if (!btrfs_try_tree_write_lock(eb)) {
		flush = 1;
		flush_write_bio(epd);
		btrfs_tree_lock(eb);
	}

	if (test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags)) {
		btrfs_tree_unlock(eb);
		if (!epd->sync_io)
			return 0;
		if (!flush) {
			flush_write_bio(epd);
			flush = 1;
		}
C
Chris Mason 已提交
3559 3560 3561 3562 3563
		while (1) {
			wait_on_extent_buffer_writeback(eb);
			btrfs_tree_lock(eb);
			if (!test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags))
				break;
3564 3565 3566 3567
			btrfs_tree_unlock(eb);
		}
	}

3568 3569 3570 3571 3572 3573
	/*
	 * We need to do this to prevent races in people who check if the eb is
	 * under IO since we can end up having no IO bits set for a short period
	 * of time.
	 */
	spin_lock(&eb->refs_lock);
3574 3575
	if (test_and_clear_bit(EXTENT_BUFFER_DIRTY, &eb->bflags)) {
		set_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags);
3576
		spin_unlock(&eb->refs_lock);
3577
		btrfs_set_header_flag(eb, BTRFS_HEADER_FLAG_WRITTEN);
3578 3579 3580
		percpu_counter_add_batch(&fs_info->dirty_metadata_bytes,
					 -eb->len,
					 fs_info->dirty_metadata_batch);
3581
		ret = 1;
3582 3583
	} else {
		spin_unlock(&eb->refs_lock);
3584 3585 3586 3587 3588 3589 3590 3591 3592
	}

	btrfs_tree_unlock(eb);

	if (!ret)
		return ret;

	num_pages = num_extent_pages(eb->start, eb->len);
	for (i = 0; i < num_pages; i++) {
3593
		struct page *p = eb->pages[i];
3594 3595 3596 3597 3598 3599 3600 3601 3602 3603 3604 3605 3606 3607 3608 3609

		if (!trylock_page(p)) {
			if (!flush) {
				flush_write_bio(epd);
				flush = 1;
			}
			lock_page(p);
		}
	}

	return ret;
}

static void end_extent_buffer_writeback(struct extent_buffer *eb)
{
	clear_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags);
3610
	smp_mb__after_atomic();
3611 3612 3613
	wake_up_bit(&eb->bflags, EXTENT_BUFFER_WRITEBACK);
}

3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630 3631 3632 3633 3634 3635 3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649 3650 3651 3652 3653 3654 3655 3656 3657 3658 3659 3660 3661
static void set_btree_ioerr(struct page *page)
{
	struct extent_buffer *eb = (struct extent_buffer *)page->private;

	SetPageError(page);
	if (test_and_set_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags))
		return;

	/*
	 * If writeback for a btree extent that doesn't belong to a log tree
	 * failed, increment the counter transaction->eb_write_errors.
	 * We do this because while the transaction is running and before it's
	 * committing (when we call filemap_fdata[write|wait]_range against
	 * the btree inode), we might have
	 * btree_inode->i_mapping->a_ops->writepages() called by the VM - if it
	 * returns an error or an error happens during writeback, when we're
	 * committing the transaction we wouldn't know about it, since the pages
	 * can be no longer dirty nor marked anymore for writeback (if a
	 * subsequent modification to the extent buffer didn't happen before the
	 * transaction commit), which makes filemap_fdata[write|wait]_range not
	 * able to find the pages tagged with SetPageError at transaction
	 * commit time. So if this happens we must abort the transaction,
	 * otherwise we commit a super block with btree roots that point to
	 * btree nodes/leafs whose content on disk is invalid - either garbage
	 * or the content of some node/leaf from a past generation that got
	 * cowed or deleted and is no longer valid.
	 *
	 * Note: setting AS_EIO/AS_ENOSPC in the btree inode's i_mapping would
	 * not be enough - we need to distinguish between log tree extents vs
	 * non-log tree extents, and the next filemap_fdatawait_range() call
	 * will catch and clear such errors in the mapping - and that call might
	 * be from a log sync and not from a transaction commit. Also, checking
	 * for the eb flag EXTENT_BUFFER_WRITE_ERR at transaction commit time is
	 * not done and would not be reliable - the eb might have been released
	 * from memory and reading it back again means that flag would not be
	 * set (since it's a runtime flag, not persisted on disk).
	 *
	 * Using the flags below in the btree inode also makes us achieve the
	 * goal of AS_EIO/AS_ENOSPC when writepages() returns success, started
	 * writeback for all dirty pages and before filemap_fdatawait_range()
	 * is called, the writeback for all dirty pages had already finished
	 * with errors - because we were not using AS_EIO/AS_ENOSPC,
	 * filemap_fdatawait_range() would return success, as it could not know
	 * that writeback errors happened (the pages were no longer tagged for
	 * writeback).
	 */
	switch (eb->log_index) {
	case -1:
3662
		set_bit(BTRFS_FS_BTREE_ERR, &eb->fs_info->flags);
3663 3664
		break;
	case 0:
3665
		set_bit(BTRFS_FS_LOG1_ERR, &eb->fs_info->flags);
3666 3667
		break;
	case 1:
3668
		set_bit(BTRFS_FS_LOG2_ERR, &eb->fs_info->flags);
3669 3670 3671 3672 3673 3674
		break;
	default:
		BUG(); /* unexpected, logic error */
	}
}

3675
static void end_bio_extent_buffer_writepage(struct bio *bio)
3676
{
3677
	struct bio_vec *bvec;
3678
	struct extent_buffer *eb;
3679
	int i, done;
3680

3681
	ASSERT(!bio_flagged(bio, BIO_CLONED));
3682
	bio_for_each_segment_all(bvec, bio, i) {
3683 3684 3685 3686 3687 3688
		struct page *page = bvec->bv_page;

		eb = (struct extent_buffer *)page->private;
		BUG_ON(!eb);
		done = atomic_dec_and_test(&eb->io_pages);

3689
		if (bio->bi_status ||
3690
		    test_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags)) {
3691
			ClearPageUptodate(page);
3692
			set_btree_ioerr(page);
3693 3694 3695 3696 3697 3698 3699 3700
		}

		end_page_writeback(page);

		if (!done)
			continue;

		end_extent_buffer_writeback(eb);
3701
	}
3702 3703 3704 3705

	bio_put(bio);
}

3706
static noinline_for_stack int write_one_eb(struct extent_buffer *eb,
3707 3708 3709 3710 3711
			struct btrfs_fs_info *fs_info,
			struct writeback_control *wbc,
			struct extent_page_data *epd)
{
	struct block_device *bdev = fs_info->fs_devices->latest_bdev;
3712
	struct extent_io_tree *tree = &BTRFS_I(fs_info->btree_inode)->io_tree;
3713
	u64 offset = eb->start;
3714
	u32 nritems;
3715
	unsigned long i, num_pages;
3716
	unsigned long start, end;
3717
	unsigned int write_flags = wbc_to_write_flags(wbc) | REQ_META;
3718
	int ret = 0;
3719

3720
	clear_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags);
3721 3722
	num_pages = num_extent_pages(eb->start, eb->len);
	atomic_set(&eb->io_pages, num_pages);
3723

3724 3725
	/* set btree blocks beyond nritems with 0 to avoid stale content. */
	nritems = btrfs_header_nritems(eb);
3726 3727 3728
	if (btrfs_header_level(eb) > 0) {
		end = btrfs_node_key_ptr_offset(nritems);

3729
		memzero_extent_buffer(eb, end, eb->len - end);
3730 3731 3732 3733 3734 3735
	} else {
		/*
		 * leaf:
		 * header 0 1 2 .. N ... data_N .. data_2 data_1 data_0
		 */
		start = btrfs_item_nr_offset(nritems);
3736
		end = BTRFS_LEAF_DATA_OFFSET + leaf_data_end(fs_info, eb);
3737
		memzero_extent_buffer(eb, start, end - start);
3738 3739
	}

3740
	for (i = 0; i < num_pages; i++) {
3741
		struct page *p = eb->pages[i];
3742 3743 3744

		clear_page_dirty_for_io(p);
		set_page_writeback(p);
3745
		ret = submit_extent_page(REQ_OP_WRITE | write_flags, tree, wbc,
3746
					 p, offset, PAGE_SIZE, 0, bdev,
3747
					 &epd->bio,
3748
					 end_bio_extent_buffer_writepage,
3749
					 0, 0, 0, false);
3750
		if (ret) {
3751
			set_btree_ioerr(p);
3752 3753
			if (PageWriteback(p))
				end_page_writeback(p);
3754 3755 3756 3757 3758
			if (atomic_sub_and_test(num_pages - i, &eb->io_pages))
				end_extent_buffer_writeback(eb);
			ret = -EIO;
			break;
		}
3759
		offset += PAGE_SIZE;
3760
		update_nr_written(wbc, 1);
3761 3762 3763 3764 3765
		unlock_page(p);
	}

	if (unlikely(ret)) {
		for (; i < num_pages; i++) {
3766
			struct page *p = eb->pages[i];
3767
			clear_page_dirty_for_io(p);
3768 3769 3770 3771 3772 3773 3774 3775 3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794 3795 3796
			unlock_page(p);
		}
	}

	return ret;
}

int btree_write_cache_pages(struct address_space *mapping,
				   struct writeback_control *wbc)
{
	struct extent_io_tree *tree = &BTRFS_I(mapping->host)->io_tree;
	struct btrfs_fs_info *fs_info = BTRFS_I(mapping->host)->root->fs_info;
	struct extent_buffer *eb, *prev_eb = NULL;
	struct extent_page_data epd = {
		.bio = NULL,
		.tree = tree,
		.extent_locked = 0,
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
	};
	int ret = 0;
	int done = 0;
	int nr_to_write_done = 0;
	struct pagevec pvec;
	int nr_pages;
	pgoff_t index;
	pgoff_t end;		/* Inclusive */
	int scanned = 0;
	int tag;

3797
	pagevec_init(&pvec);
3798 3799 3800 3801
	if (wbc->range_cyclic) {
		index = mapping->writeback_index; /* Start from prev offset */
		end = -1;
	} else {
3802 3803
		index = wbc->range_start >> PAGE_SHIFT;
		end = wbc->range_end >> PAGE_SHIFT;
3804 3805 3806 3807 3808 3809 3810 3811 3812 3813
		scanned = 1;
	}
	if (wbc->sync_mode == WB_SYNC_ALL)
		tag = PAGECACHE_TAG_TOWRITE;
	else
		tag = PAGECACHE_TAG_DIRTY;
retry:
	if (wbc->sync_mode == WB_SYNC_ALL)
		tag_pages_for_writeback(mapping, index, end);
	while (!done && !nr_to_write_done && (index <= end) &&
J
Jan Kara 已提交
3814
	       (nr_pages = pagevec_lookup_range_tag(&pvec, mapping, &index, end,
3815
			tag))) {
3816 3817 3818 3819 3820 3821 3822 3823 3824
		unsigned i;

		scanned = 1;
		for (i = 0; i < nr_pages; i++) {
			struct page *page = pvec.pages[i];

			if (!PagePrivate(page))
				continue;

3825 3826 3827 3828 3829 3830
			spin_lock(&mapping->private_lock);
			if (!PagePrivate(page)) {
				spin_unlock(&mapping->private_lock);
				continue;
			}

3831
			eb = (struct extent_buffer *)page->private;
3832 3833 3834 3835 3836 3837

			/*
			 * Shouldn't happen and normally this would be a BUG_ON
			 * but no sense in crashing the users box for something
			 * we can survive anyway.
			 */
3838
			if (WARN_ON(!eb)) {
3839
				spin_unlock(&mapping->private_lock);
3840 3841 3842
				continue;
			}

3843 3844
			if (eb == prev_eb) {
				spin_unlock(&mapping->private_lock);
3845
				continue;
3846
			}
3847

3848 3849 3850
			ret = atomic_inc_not_zero(&eb->refs);
			spin_unlock(&mapping->private_lock);
			if (!ret)
3851 3852 3853 3854 3855 3856 3857 3858 3859 3860 3861 3862 3863 3864 3865 3866 3867 3868 3869 3870 3871 3872 3873 3874 3875 3876 3877 3878 3879 3880 3881 3882 3883 3884 3885 3886 3887 3888 3889 3890
				continue;

			prev_eb = eb;
			ret = lock_extent_buffer_for_io(eb, fs_info, &epd);
			if (!ret) {
				free_extent_buffer(eb);
				continue;
			}

			ret = write_one_eb(eb, fs_info, wbc, &epd);
			if (ret) {
				done = 1;
				free_extent_buffer(eb);
				break;
			}
			free_extent_buffer(eb);

			/*
			 * the filesystem may choose to bump up nr_to_write.
			 * We have to make sure to honor the new nr_to_write
			 * at any time
			 */
			nr_to_write_done = wbc->nr_to_write <= 0;
		}
		pagevec_release(&pvec);
		cond_resched();
	}
	if (!scanned && !done) {
		/*
		 * We hit the last page and there is more work to be done: wrap
		 * back to the start of the file
		 */
		scanned = 1;
		index = 0;
		goto retry;
	}
	flush_write_bio(&epd);
	return ret;
}

3891
/**
C
Chris Mason 已提交
3892
 * write_cache_pages - walk the list of dirty pages of the given address space and write all of them.
3893 3894 3895 3896 3897 3898 3899 3900 3901 3902 3903 3904 3905
 * @mapping: address space structure to write
 * @wbc: subtract the number of written pages from *@wbc->nr_to_write
 * @writepage: function called for each page
 * @data: data passed to writepage function
 *
 * If a page is already under I/O, write_cache_pages() skips it, even
 * if it's dirty.  This is desirable behaviour for memory-cleaning writeback,
 * but it is INCORRECT for data-integrity system calls such as fsync().  fsync()
 * and msync() need to guarantee that all the data which was dirty at the time
 * the call was made get new I/O started against them.  If wbc->sync_mode is
 * WB_SYNC_ALL then we were called for data integrity and we must wait for
 * existing IO to complete.
 */
3906
static int extent_write_cache_pages(struct address_space *mapping,
C
Chris Mason 已提交
3907
			     struct writeback_control *wbc,
C
Chris Mason 已提交
3908 3909
			     writepage_t writepage, void *data,
			     void (*flush_fn)(void *))
3910
{
3911
	struct inode *inode = mapping->host;
3912 3913
	int ret = 0;
	int done = 0;
3914
	int nr_to_write_done = 0;
3915 3916 3917 3918
	struct pagevec pvec;
	int nr_pages;
	pgoff_t index;
	pgoff_t end;		/* Inclusive */
3919 3920
	pgoff_t done_index;
	int range_whole = 0;
3921
	int scanned = 0;
3922
	int tag;
3923

3924 3925 3926 3927 3928 3929 3930 3931 3932 3933 3934 3935
	/*
	 * We have to hold onto the inode so that ordered extents can do their
	 * work when the IO finishes.  The alternative to this is failing to add
	 * an ordered extent if the igrab() fails there and that is a huge pain
	 * to deal with, so instead just hold onto the inode throughout the
	 * writepages operation.  If it fails here we are freeing up the inode
	 * anyway and we'd rather not waste our time writing out stuff that is
	 * going to be truncated anyway.
	 */
	if (!igrab(inode))
		return 0;

3936
	pagevec_init(&pvec);
3937 3938 3939 3940
	if (wbc->range_cyclic) {
		index = mapping->writeback_index; /* Start from prev offset */
		end = -1;
	} else {
3941 3942
		index = wbc->range_start >> PAGE_SHIFT;
		end = wbc->range_end >> PAGE_SHIFT;
3943 3944
		if (wbc->range_start == 0 && wbc->range_end == LLONG_MAX)
			range_whole = 1;
3945 3946
		scanned = 1;
	}
3947 3948 3949 3950
	if (wbc->sync_mode == WB_SYNC_ALL)
		tag = PAGECACHE_TAG_TOWRITE;
	else
		tag = PAGECACHE_TAG_DIRTY;
3951
retry:
3952 3953
	if (wbc->sync_mode == WB_SYNC_ALL)
		tag_pages_for_writeback(mapping, index, end);
3954
	done_index = index;
3955
	while (!done && !nr_to_write_done && (index <= end) &&
3956 3957
			(nr_pages = pagevec_lookup_range_tag(&pvec, mapping,
						&index, end, tag))) {
3958 3959 3960 3961 3962 3963
		unsigned i;

		scanned = 1;
		for (i = 0; i < nr_pages; i++) {
			struct page *page = pvec.pages[i];

3964
			done_index = page->index;
3965 3966 3967 3968 3969 3970 3971
			/*
			 * At this point we hold neither mapping->tree_lock nor
			 * lock on the page itself: the page may be truncated or
			 * invalidated (changing page->mapping to NULL), or even
			 * swizzled back from swapper_space to tmpfs file
			 * mapping
			 */
3972 3973 3974
			if (!trylock_page(page)) {
				flush_fn(data);
				lock_page(page);
3975
			}
3976 3977 3978 3979 3980 3981

			if (unlikely(page->mapping != mapping)) {
				unlock_page(page);
				continue;
			}

C
Chris Mason 已提交
3982
			if (wbc->sync_mode != WB_SYNC_NONE) {
3983 3984
				if (PageWriteback(page))
					flush_fn(data);
3985
				wait_on_page_writeback(page);
C
Chris Mason 已提交
3986
			}
3987 3988 3989 3990 3991 3992 3993 3994 3995 3996 3997 3998 3999

			if (PageWriteback(page) ||
			    !clear_page_dirty_for_io(page)) {
				unlock_page(page);
				continue;
			}

			ret = (*writepage)(page, wbc, data);

			if (unlikely(ret == AOP_WRITEPAGE_ACTIVATE)) {
				unlock_page(page);
				ret = 0;
			}
4000 4001 4002 4003 4004 4005 4006 4007 4008 4009 4010 4011 4012 4013
			if (ret < 0) {
				/*
				 * done_index is set past this page,
				 * so media errors will not choke
				 * background writeout for the entire
				 * file. This has consequences for
				 * range_cyclic semantics (ie. it may
				 * not be suitable for data integrity
				 * writeout).
				 */
				done_index = page->index + 1;
				done = 1;
				break;
			}
4014 4015 4016 4017 4018 4019 4020

			/*
			 * the filesystem may choose to bump up nr_to_write.
			 * We have to make sure to honor the new nr_to_write
			 * at any time
			 */
			nr_to_write_done = wbc->nr_to_write <= 0;
4021 4022 4023 4024
		}
		pagevec_release(&pvec);
		cond_resched();
	}
4025
	if (!scanned && !done) {
4026 4027 4028 4029 4030 4031 4032 4033
		/*
		 * We hit the last page and there is more work to be done: wrap
		 * back to the start of the file
		 */
		scanned = 1;
		index = 0;
		goto retry;
	}
4034 4035 4036 4037

	if (wbc->range_cyclic || (wbc->nr_to_write > 0 && range_whole))
		mapping->writeback_index = done_index;

4038
	btrfs_add_delayed_iput(inode);
4039
	return ret;
4040 4041
}

4042
static void flush_epd_write_bio(struct extent_page_data *epd)
C
Chris Mason 已提交
4043 4044
{
	if (epd->bio) {
4045 4046
		int ret;

4047
		ret = submit_one_bio(epd->bio, 0, 0);
4048
		BUG_ON(ret < 0); /* -ENOMEM */
C
Chris Mason 已提交
4049 4050 4051 4052
		epd->bio = NULL;
	}
}

4053 4054 4055 4056 4057 4058
static noinline void flush_write_bio(void *data)
{
	struct extent_page_data *epd = data;
	flush_epd_write_bio(epd);
}

4059
int extent_write_full_page(struct page *page, struct writeback_control *wbc)
4060 4061 4062 4063
{
	int ret;
	struct extent_page_data epd = {
		.bio = NULL,
4064
		.tree = &BTRFS_I(page->mapping->host)->io_tree,
4065
		.extent_locked = 0,
4066
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4067 4068 4069 4070
	};

	ret = __extent_writepage(page, wbc, &epd);

4071
	flush_epd_write_bio(&epd);
4072 4073 4074
	return ret;
}

4075 4076
int extent_write_locked_range(struct inode *inode, u64 start, u64 end,
			      int mode)
4077 4078 4079
{
	int ret = 0;
	struct address_space *mapping = inode->i_mapping;
4080
	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
4081
	struct page *page;
4082 4083
	unsigned long nr_pages = (end - start + PAGE_SIZE) >>
		PAGE_SHIFT;
4084 4085 4086 4087 4088

	struct extent_page_data epd = {
		.bio = NULL,
		.tree = tree,
		.extent_locked = 1,
4089
		.sync_io = mode == WB_SYNC_ALL,
4090 4091 4092 4093 4094 4095 4096 4097
	};
	struct writeback_control wbc_writepages = {
		.sync_mode	= mode,
		.nr_to_write	= nr_pages * 2,
		.range_start	= start,
		.range_end	= end + 1,
	};

C
Chris Mason 已提交
4098
	while (start <= end) {
4099
		page = find_get_page(mapping, start >> PAGE_SHIFT);
4100 4101 4102 4103 4104
		if (clear_page_dirty_for_io(page))
			ret = __extent_writepage(page, &wbc_writepages, &epd);
		else {
			if (tree->ops && tree->ops->writepage_end_io_hook)
				tree->ops->writepage_end_io_hook(page, start,
4105
						 start + PAGE_SIZE - 1,
4106 4107 4108
						 NULL, 1);
			unlock_page(page);
		}
4109 4110
		put_page(page);
		start += PAGE_SIZE;
4111 4112
	}

4113
	flush_epd_write_bio(&epd);
4114 4115
	return ret;
}
4116 4117 4118 4119 4120 4121 4122 4123 4124

int extent_writepages(struct extent_io_tree *tree,
		      struct address_space *mapping,
		      struct writeback_control *wbc)
{
	int ret = 0;
	struct extent_page_data epd = {
		.bio = NULL,
		.tree = tree,
4125
		.extent_locked = 0,
4126
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4127 4128
	};

4129
	ret = extent_write_cache_pages(mapping, wbc, __extent_writepage, &epd,
C
Chris Mason 已提交
4130
				       flush_write_bio);
4131
	flush_epd_write_bio(&epd);
4132 4133 4134 4135 4136
	return ret;
}

int extent_readpages(struct extent_io_tree *tree,
		     struct address_space *mapping,
4137
		     struct list_head *pages, unsigned nr_pages)
4138 4139 4140
{
	struct bio *bio = NULL;
	unsigned page_idx;
C
Chris Mason 已提交
4141
	unsigned long bio_flags = 0;
L
Liu Bo 已提交
4142 4143
	struct page *pagepool[16];
	struct page *page;
4144
	struct extent_map *em_cached = NULL;
L
Liu Bo 已提交
4145
	int nr = 0;
4146
	u64 prev_em_start = (u64)-1;
4147 4148

	for (page_idx = 0; page_idx < nr_pages; page_idx++) {
L
Liu Bo 已提交
4149
		page = list_entry(pages->prev, struct page, lru);
4150 4151 4152

		prefetchw(&page->flags);
		list_del(&page->lru);
L
Liu Bo 已提交
4153
		if (add_to_page_cache_lru(page, mapping,
4154 4155
					page->index,
					readahead_gfp_mask(mapping))) {
4156
			put_page(page);
L
Liu Bo 已提交
4157
			continue;
4158
		}
L
Liu Bo 已提交
4159 4160 4161 4162

		pagepool[nr++] = page;
		if (nr < ARRAY_SIZE(pagepool))
			continue;
4163 4164
		__extent_readpages(tree, pagepool, nr, &em_cached, &bio,
				&bio_flags, &prev_em_start);
L
Liu Bo 已提交
4165
		nr = 0;
4166
	}
4167
	if (nr)
4168 4169
		__extent_readpages(tree, pagepool, nr, &em_cached, &bio,
				&bio_flags, &prev_em_start);
L
Liu Bo 已提交
4170

4171 4172 4173
	if (em_cached)
		free_extent_map(em_cached);

4174 4175
	BUG_ON(!list_empty(pages));
	if (bio)
4176
		return submit_one_bio(bio, 0, bio_flags);
4177 4178 4179 4180 4181 4182 4183 4184 4185 4186 4187
	return 0;
}

/*
 * basic invalidatepage code, this waits on any locked or writeback
 * ranges corresponding to the page, and then deletes any extent state
 * records from the tree
 */
int extent_invalidatepage(struct extent_io_tree *tree,
			  struct page *page, unsigned long offset)
{
4188
	struct extent_state *cached_state = NULL;
M
Miao Xie 已提交
4189
	u64 start = page_offset(page);
4190
	u64 end = start + PAGE_SIZE - 1;
4191 4192
	size_t blocksize = page->mapping->host->i_sb->s_blocksize;

4193
	start += ALIGN(offset, blocksize);
4194 4195 4196
	if (start > end)
		return 0;

4197
	lock_extent_bits(tree, start, end, &cached_state);
4198
	wait_on_page_writeback(page);
4199
	clear_extent_bit(tree, start, end,
4200 4201
			 EXTENT_LOCKED | EXTENT_DIRTY | EXTENT_DELALLOC |
			 EXTENT_DO_ACCOUNTING,
4202
			 1, 1, &cached_state);
4203 4204 4205
	return 0;
}

4206 4207 4208 4209 4210
/*
 * a helper for releasepage, this tests for areas of the page that
 * are locked or under IO and drops the related state bits if it is safe
 * to drop the page.
 */
4211 4212 4213
static int try_release_extent_state(struct extent_map_tree *map,
				    struct extent_io_tree *tree,
				    struct page *page, gfp_t mask)
4214
{
M
Miao Xie 已提交
4215
	u64 start = page_offset(page);
4216
	u64 end = start + PAGE_SIZE - 1;
4217 4218
	int ret = 1;

4219
	if (test_range_bit(tree, start, end,
4220
			   EXTENT_IOBITS, 0, NULL))
4221 4222
		ret = 0;
	else {
4223 4224 4225 4226
		/*
		 * at this point we can safely clear everything except the
		 * locked bit and the nodatasum bit
		 */
4227
		ret = __clear_extent_bit(tree, start, end,
4228
				 ~(EXTENT_LOCKED | EXTENT_NODATASUM),
4229
				 0, 0, NULL, mask, NULL);
4230 4231 4232 4233 4234 4235 4236 4237

		/* if clear_extent_bit failed for enomem reasons,
		 * we can't allow the release to continue.
		 */
		if (ret < 0)
			ret = 0;
		else
			ret = 1;
4238 4239 4240 4241
	}
	return ret;
}

4242 4243 4244 4245 4246 4247
/*
 * a helper for releasepage.  As long as there are no locked extents
 * in the range corresponding to the page, both state records and extent
 * map records are removed
 */
int try_release_extent_mapping(struct extent_map_tree *map,
4248 4249
			       struct extent_io_tree *tree, struct page *page,
			       gfp_t mask)
4250 4251
{
	struct extent_map *em;
M
Miao Xie 已提交
4252
	u64 start = page_offset(page);
4253
	u64 end = start + PAGE_SIZE - 1;
4254

4255
	if (gfpflags_allow_blocking(mask) &&
4256
	    page->mapping->host->i_size > SZ_16M) {
4257
		u64 len;
4258
		while (start <= end) {
4259
			len = end - start + 1;
4260
			write_lock(&map->lock);
4261
			em = lookup_extent_mapping(map, start, len);
4262
			if (!em) {
4263
				write_unlock(&map->lock);
4264 4265
				break;
			}
4266 4267
			if (test_bit(EXTENT_FLAG_PINNED, &em->flags) ||
			    em->start != start) {
4268
				write_unlock(&map->lock);
4269 4270 4271 4272 4273
				free_extent_map(em);
				break;
			}
			if (!test_range_bit(tree, em->start,
					    extent_map_end(em) - 1,
4274
					    EXTENT_LOCKED | EXTENT_WRITEBACK,
4275
					    0, NULL)) {
4276 4277 4278 4279 4280
				remove_extent_mapping(map, em);
				/* once for the rb tree */
				free_extent_map(em);
			}
			start = extent_map_end(em);
4281
			write_unlock(&map->lock);
4282 4283

			/* once for us */
4284 4285 4286
			free_extent_map(em);
		}
	}
4287
	return try_release_extent_state(map, tree, page, mask);
4288 4289
}

4290 4291 4292 4293 4294
/*
 * helper function for fiemap, which doesn't want to see any holes.
 * This maps until we find something past 'last'
 */
static struct extent_map *get_extent_skip_holes(struct inode *inode,
4295
						u64 offset, u64 last)
4296
{
4297
	u64 sectorsize = btrfs_inode_sectorsize(inode);
4298 4299 4300 4301 4302 4303
	struct extent_map *em;
	u64 len;

	if (offset >= last)
		return NULL;

4304
	while (1) {
4305 4306 4307
		len = last - offset;
		if (len == 0)
			break;
4308
		len = ALIGN(len, sectorsize);
4309 4310
		em = btrfs_get_extent_fiemap(BTRFS_I(inode), NULL, 0, offset,
				len, 0);
4311
		if (IS_ERR_OR_NULL(em))
4312 4313 4314
			return em;

		/* if this isn't a hole return it */
4315
		if (em->block_start != EXTENT_MAP_HOLE)
4316 4317 4318 4319 4320 4321 4322 4323 4324 4325 4326
			return em;

		/* this is a hole, advance to the next extent */
		offset = extent_map_end(em);
		free_extent_map(em);
		if (offset >= last)
			break;
	}
	return NULL;
}

4327 4328 4329 4330 4331 4332 4333 4334 4335 4336 4337 4338 4339 4340 4341 4342 4343 4344 4345 4346 4347 4348 4349 4350 4351 4352 4353 4354 4355 4356 4357 4358 4359 4360 4361 4362 4363 4364 4365 4366 4367 4368 4369 4370 4371 4372 4373 4374 4375 4376 4377 4378 4379 4380 4381 4382 4383 4384 4385 4386 4387 4388 4389 4390 4391 4392 4393 4394 4395 4396 4397 4398 4399 4400 4401 4402 4403 4404 4405 4406 4407 4408 4409 4410 4411 4412
/*
 * To cache previous fiemap extent
 *
 * Will be used for merging fiemap extent
 */
struct fiemap_cache {
	u64 offset;
	u64 phys;
	u64 len;
	u32 flags;
	bool cached;
};

/*
 * Helper to submit fiemap extent.
 *
 * Will try to merge current fiemap extent specified by @offset, @phys,
 * @len and @flags with cached one.
 * And only when we fails to merge, cached one will be submitted as
 * fiemap extent.
 *
 * Return value is the same as fiemap_fill_next_extent().
 */
static int emit_fiemap_extent(struct fiemap_extent_info *fieinfo,
				struct fiemap_cache *cache,
				u64 offset, u64 phys, u64 len, u32 flags)
{
	int ret = 0;

	if (!cache->cached)
		goto assign;

	/*
	 * Sanity check, extent_fiemap() should have ensured that new
	 * fiemap extent won't overlap with cahced one.
	 * Not recoverable.
	 *
	 * NOTE: Physical address can overlap, due to compression
	 */
	if (cache->offset + cache->len > offset) {
		WARN_ON(1);
		return -EINVAL;
	}

	/*
	 * Only merges fiemap extents if
	 * 1) Their logical addresses are continuous
	 *
	 * 2) Their physical addresses are continuous
	 *    So truly compressed (physical size smaller than logical size)
	 *    extents won't get merged with each other
	 *
	 * 3) Share same flags except FIEMAP_EXTENT_LAST
	 *    So regular extent won't get merged with prealloc extent
	 */
	if (cache->offset + cache->len  == offset &&
	    cache->phys + cache->len == phys  &&
	    (cache->flags & ~FIEMAP_EXTENT_LAST) ==
			(flags & ~FIEMAP_EXTENT_LAST)) {
		cache->len += len;
		cache->flags |= flags;
		goto try_submit_last;
	}

	/* Not mergeable, need to submit cached one */
	ret = fiemap_fill_next_extent(fieinfo, cache->offset, cache->phys,
				      cache->len, cache->flags);
	cache->cached = false;
	if (ret)
		return ret;
assign:
	cache->cached = true;
	cache->offset = offset;
	cache->phys = phys;
	cache->len = len;
	cache->flags = flags;
try_submit_last:
	if (cache->flags & FIEMAP_EXTENT_LAST) {
		ret = fiemap_fill_next_extent(fieinfo, cache->offset,
				cache->phys, cache->len, cache->flags);
		cache->cached = false;
	}
	return ret;
}

/*
4413
 * Emit last fiemap cache
4414
 *
4415 4416 4417 4418 4419 4420 4421
 * The last fiemap cache may still be cached in the following case:
 * 0		      4k		    8k
 * |<- Fiemap range ->|
 * |<------------  First extent ----------->|
 *
 * In this case, the first extent range will be cached but not emitted.
 * So we must emit it before ending extent_fiemap().
4422
 */
4423 4424 4425
static int emit_last_fiemap_cache(struct btrfs_fs_info *fs_info,
				  struct fiemap_extent_info *fieinfo,
				  struct fiemap_cache *cache)
4426 4427 4428 4429 4430 4431 4432 4433 4434 4435 4436 4437 4438 4439
{
	int ret;

	if (!cache->cached)
		return 0;

	ret = fiemap_fill_next_extent(fieinfo, cache->offset, cache->phys,
				      cache->len, cache->flags);
	cache->cached = false;
	if (ret > 0)
		ret = 0;
	return ret;
}

Y
Yehuda Sadeh 已提交
4440
int extent_fiemap(struct inode *inode, struct fiemap_extent_info *fieinfo,
4441
		__u64 start, __u64 len)
Y
Yehuda Sadeh 已提交
4442
{
J
Josef Bacik 已提交
4443
	int ret = 0;
Y
Yehuda Sadeh 已提交
4444 4445 4446
	u64 off = start;
	u64 max = start + len;
	u32 flags = 0;
J
Josef Bacik 已提交
4447 4448
	u32 found_type;
	u64 last;
4449
	u64 last_for_get_extent = 0;
Y
Yehuda Sadeh 已提交
4450
	u64 disko = 0;
4451
	u64 isize = i_size_read(inode);
J
Josef Bacik 已提交
4452
	struct btrfs_key found_key;
Y
Yehuda Sadeh 已提交
4453
	struct extent_map *em = NULL;
4454
	struct extent_state *cached_state = NULL;
J
Josef Bacik 已提交
4455
	struct btrfs_path *path;
4456
	struct btrfs_root *root = BTRFS_I(inode)->root;
4457
	struct fiemap_cache cache = { 0 };
Y
Yehuda Sadeh 已提交
4458
	int end = 0;
4459 4460 4461
	u64 em_start = 0;
	u64 em_len = 0;
	u64 em_end = 0;
Y
Yehuda Sadeh 已提交
4462 4463 4464 4465

	if (len == 0)
		return -EINVAL;

J
Josef Bacik 已提交
4466 4467 4468 4469 4470
	path = btrfs_alloc_path();
	if (!path)
		return -ENOMEM;
	path->leave_spinning = 1;

4471 4472
	start = round_down(start, btrfs_inode_sectorsize(inode));
	len = round_up(max, btrfs_inode_sectorsize(inode)) - start;
4473

4474 4475 4476 4477
	/*
	 * lookup the last file extent.  We're not using i_size here
	 * because there might be preallocation past i_size
	 */
4478 4479
	ret = btrfs_lookup_file_extent(NULL, root, path,
			btrfs_ino(BTRFS_I(inode)), -1, 0);
J
Josef Bacik 已提交
4480 4481 4482
	if (ret < 0) {
		btrfs_free_path(path);
		return ret;
4483 4484 4485 4486
	} else {
		WARN_ON(!ret);
		if (ret == 1)
			ret = 0;
J
Josef Bacik 已提交
4487
	}
4488

J
Josef Bacik 已提交
4489 4490
	path->slots[0]--;
	btrfs_item_key_to_cpu(path->nodes[0], &found_key, path->slots[0]);
4491
	found_type = found_key.type;
J
Josef Bacik 已提交
4492

4493
	/* No extents, but there might be delalloc bits */
4494
	if (found_key.objectid != btrfs_ino(BTRFS_I(inode)) ||
J
Josef Bacik 已提交
4495
	    found_type != BTRFS_EXTENT_DATA_KEY) {
4496 4497 4498 4499 4500 4501 4502 4503 4504 4505 4506
		/* have to trust i_size as the end */
		last = (u64)-1;
		last_for_get_extent = isize;
	} else {
		/*
		 * remember the start of the last extent.  There are a
		 * bunch of different factors that go into the length of the
		 * extent, so its much less complex to remember where it started
		 */
		last = found_key.offset;
		last_for_get_extent = last + 1;
J
Josef Bacik 已提交
4507
	}
4508
	btrfs_release_path(path);
J
Josef Bacik 已提交
4509

4510 4511 4512 4513 4514 4515 4516 4517 4518 4519
	/*
	 * we might have some extents allocated but more delalloc past those
	 * extents.  so, we trust isize unless the start of the last extent is
	 * beyond isize
	 */
	if (last < isize) {
		last = (u64)-1;
		last_for_get_extent = isize;
	}

4520
	lock_extent_bits(&BTRFS_I(inode)->io_tree, start, start + len - 1,
4521
			 &cached_state);
4522

4523
	em = get_extent_skip_holes(inode, start, last_for_get_extent);
Y
Yehuda Sadeh 已提交
4524 4525 4526 4527 4528 4529
	if (!em)
		goto out;
	if (IS_ERR(em)) {
		ret = PTR_ERR(em);
		goto out;
	}
J
Josef Bacik 已提交
4530

Y
Yehuda Sadeh 已提交
4531
	while (!end) {
4532
		u64 offset_in_extent = 0;
4533 4534 4535 4536 4537 4538 4539 4540 4541 4542 4543 4544

		/* break if the extent we found is outside the range */
		if (em->start >= max || extent_map_end(em) < off)
			break;

		/*
		 * get_extent may return an extent that starts before our
		 * requested range.  We have to make sure the ranges
		 * we return to fiemap always move forward and don't
		 * overlap, so adjust the offsets here
		 */
		em_start = max(em->start, off);
Y
Yehuda Sadeh 已提交
4545

4546 4547
		/*
		 * record the offset from the start of the extent
4548 4549 4550
		 * for adjusting the disk offset below.  Only do this if the
		 * extent isn't compressed since our in ram offset may be past
		 * what we have actually allocated on disk.
4551
		 */
4552 4553
		if (!test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
			offset_in_extent = em_start - em->start;
4554
		em_end = extent_map_end(em);
4555
		em_len = em_end - em_start;
Y
Yehuda Sadeh 已提交
4556 4557 4558
		disko = 0;
		flags = 0;

4559 4560 4561 4562 4563 4564 4565
		/*
		 * bump off for our next call to get_extent
		 */
		off = extent_map_end(em);
		if (off >= max)
			end = 1;

4566
		if (em->block_start == EXTENT_MAP_LAST_BYTE) {
Y
Yehuda Sadeh 已提交
4567 4568
			end = 1;
			flags |= FIEMAP_EXTENT_LAST;
4569
		} else if (em->block_start == EXTENT_MAP_INLINE) {
Y
Yehuda Sadeh 已提交
4570 4571
			flags |= (FIEMAP_EXTENT_DATA_INLINE |
				  FIEMAP_EXTENT_NOT_ALIGNED);
4572
		} else if (em->block_start == EXTENT_MAP_DELALLOC) {
Y
Yehuda Sadeh 已提交
4573 4574
			flags |= (FIEMAP_EXTENT_DELALLOC |
				  FIEMAP_EXTENT_UNKNOWN);
4575 4576 4577
		} else if (fieinfo->fi_extents_max) {
			u64 bytenr = em->block_start -
				(em->start - em->orig_start);
4578

4579
			disko = em->block_start + offset_in_extent;
4580 4581 4582 4583

			/*
			 * As btrfs supports shared space, this information
			 * can be exported to userspace tools via
4584 4585 4586
			 * flag FIEMAP_EXTENT_SHARED.  If fi_extents_max == 0
			 * then we're just getting a count and we can skip the
			 * lookup stuff.
4587
			 */
4588 4589 4590
			ret = btrfs_check_shared(root,
						 btrfs_ino(BTRFS_I(inode)),
						 bytenr);
4591
			if (ret < 0)
4592
				goto out_free;
4593
			if (ret)
4594
				flags |= FIEMAP_EXTENT_SHARED;
4595
			ret = 0;
Y
Yehuda Sadeh 已提交
4596 4597 4598
		}
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
			flags |= FIEMAP_EXTENT_ENCODED;
4599 4600
		if (test_bit(EXTENT_FLAG_PREALLOC, &em->flags))
			flags |= FIEMAP_EXTENT_UNWRITTEN;
Y
Yehuda Sadeh 已提交
4601 4602 4603

		free_extent_map(em);
		em = NULL;
4604 4605
		if ((em_start >= last) || em_len == (u64)-1 ||
		   (last == (u64)-1 && isize <= em_end)) {
Y
Yehuda Sadeh 已提交
4606 4607 4608 4609
			flags |= FIEMAP_EXTENT_LAST;
			end = 1;
		}

4610
		/* now scan forward to see if this is really the last extent. */
4611
		em = get_extent_skip_holes(inode, off, last_for_get_extent);
4612 4613 4614 4615 4616
		if (IS_ERR(em)) {
			ret = PTR_ERR(em);
			goto out;
		}
		if (!em) {
J
Josef Bacik 已提交
4617 4618 4619
			flags |= FIEMAP_EXTENT_LAST;
			end = 1;
		}
4620 4621
		ret = emit_fiemap_extent(fieinfo, &cache, em_start, disko,
					   em_len, flags);
4622 4623 4624
		if (ret) {
			if (ret == 1)
				ret = 0;
4625
			goto out_free;
4626
		}
Y
Yehuda Sadeh 已提交
4627 4628
	}
out_free:
4629
	if (!ret)
4630
		ret = emit_last_fiemap_cache(root->fs_info, fieinfo, &cache);
Y
Yehuda Sadeh 已提交
4631 4632
	free_extent_map(em);
out:
4633
	btrfs_free_path(path);
L
Liu Bo 已提交
4634
	unlock_extent_cached(&BTRFS_I(inode)->io_tree, start, start + len - 1,
4635
			     &cached_state, GFP_NOFS);
Y
Yehuda Sadeh 已提交
4636 4637 4638
	return ret;
}

4639 4640
static void __free_extent_buffer(struct extent_buffer *eb)
{
4641
	btrfs_leak_debug_del(&eb->leak_list);
4642 4643 4644
	kmem_cache_free(extent_buffer_cache, eb);
}

4645
int extent_buffer_under_io(struct extent_buffer *eb)
4646 4647 4648 4649 4650 4651 4652 4653 4654
{
	return (atomic_read(&eb->io_pages) ||
		test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags) ||
		test_bit(EXTENT_BUFFER_DIRTY, &eb->bflags));
}

/*
 * Helper for releasing extent buffer page.
 */
4655
static void btrfs_release_extent_buffer_page(struct extent_buffer *eb)
4656 4657 4658 4659 4660 4661 4662
{
	unsigned long index;
	struct page *page;
	int mapped = !test_bit(EXTENT_BUFFER_DUMMY, &eb->bflags);

	BUG_ON(extent_buffer_under_io(eb));

4663 4664
	index = num_extent_pages(eb->start, eb->len);
	if (index == 0)
4665 4666 4667 4668
		return;

	do {
		index--;
4669
		page = eb->pages[index];
4670 4671 4672
		if (!page)
			continue;
		if (mapped)
4673
			spin_lock(&page->mapping->private_lock);
4674 4675 4676 4677 4678 4679 4680 4681 4682 4683 4684 4685
		/*
		 * We do this since we'll remove the pages after we've
		 * removed the eb from the radix tree, so we could race
		 * and have this page now attached to the new eb.  So
		 * only clear page_private if it's still connected to
		 * this eb.
		 */
		if (PagePrivate(page) &&
		    page->private == (unsigned long)eb) {
			BUG_ON(test_bit(EXTENT_BUFFER_DIRTY, &eb->bflags));
			BUG_ON(PageDirty(page));
			BUG_ON(PageWriteback(page));
4686
			/*
4687 4688
			 * We need to make sure we haven't be attached
			 * to a new eb.
4689
			 */
4690 4691 4692
			ClearPagePrivate(page);
			set_page_private(page, 0);
			/* One for the page private */
4693
			put_page(page);
4694
		}
4695 4696 4697 4698

		if (mapped)
			spin_unlock(&page->mapping->private_lock);

4699
		/* One for when we allocated the page */
4700
		put_page(page);
4701
	} while (index != 0);
4702 4703 4704 4705 4706 4707 4708
}

/*
 * Helper for releasing the extent buffer.
 */
static inline void btrfs_release_extent_buffer(struct extent_buffer *eb)
{
4709
	btrfs_release_extent_buffer_page(eb);
4710 4711 4712
	__free_extent_buffer(eb);
}

4713 4714
static struct extent_buffer *
__alloc_extent_buffer(struct btrfs_fs_info *fs_info, u64 start,
4715
		      unsigned long len)
4716 4717 4718
{
	struct extent_buffer *eb = NULL;

4719
	eb = kmem_cache_zalloc(extent_buffer_cache, GFP_NOFS|__GFP_NOFAIL);
4720 4721
	eb->start = start;
	eb->len = len;
4722
	eb->fs_info = fs_info;
4723
	eb->bflags = 0;
4724 4725 4726 4727 4728 4729 4730
	rwlock_init(&eb->lock);
	atomic_set(&eb->write_locks, 0);
	atomic_set(&eb->read_locks, 0);
	atomic_set(&eb->blocking_readers, 0);
	atomic_set(&eb->blocking_writers, 0);
	atomic_set(&eb->spinning_readers, 0);
	atomic_set(&eb->spinning_writers, 0);
4731
	eb->lock_nested = 0;
4732 4733
	init_waitqueue_head(&eb->write_lock_wq);
	init_waitqueue_head(&eb->read_lock_wq);
4734

4735 4736
	btrfs_leak_debug_add(&eb->leak_list, &buffers);

4737
	spin_lock_init(&eb->refs_lock);
4738
	atomic_set(&eb->refs, 1);
4739
	atomic_set(&eb->io_pages, 0);
4740

4741 4742 4743 4744 4745 4746
	/*
	 * Sanity checks, currently the maximum is 64k covered by 16x 4k pages
	 */
	BUILD_BUG_ON(BTRFS_MAX_METADATA_BLOCKSIZE
		> MAX_INLINE_EXTENT_BUFFER_SIZE);
	BUG_ON(len > MAX_INLINE_EXTENT_BUFFER_SIZE);
4747 4748 4749 4750

	return eb;
}

4751 4752 4753 4754 4755 4756 4757
struct extent_buffer *btrfs_clone_extent_buffer(struct extent_buffer *src)
{
	unsigned long i;
	struct page *p;
	struct extent_buffer *new;
	unsigned long num_pages = num_extent_pages(src->start, src->len);

4758
	new = __alloc_extent_buffer(src->fs_info, src->start, src->len);
4759 4760 4761 4762
	if (new == NULL)
		return NULL;

	for (i = 0; i < num_pages; i++) {
4763
		p = alloc_page(GFP_NOFS);
4764 4765 4766 4767
		if (!p) {
			btrfs_release_extent_buffer(new);
			return NULL;
		}
4768 4769 4770 4771
		attach_extent_buffer_page(new, p);
		WARN_ON(PageDirty(p));
		SetPageUptodate(p);
		new->pages[i] = p;
4772
		copy_page(page_address(p), page_address(src->pages[i]));
4773 4774 4775 4776 4777 4778 4779 4780
	}

	set_bit(EXTENT_BUFFER_UPTODATE, &new->bflags);
	set_bit(EXTENT_BUFFER_DUMMY, &new->bflags);

	return new;
}

4781 4782
struct extent_buffer *__alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
						  u64 start, unsigned long len)
4783 4784
{
	struct extent_buffer *eb;
4785
	unsigned long num_pages;
4786 4787
	unsigned long i;

4788
	num_pages = num_extent_pages(start, len);
4789 4790

	eb = __alloc_extent_buffer(fs_info, start, len);
4791 4792 4793 4794
	if (!eb)
		return NULL;

	for (i = 0; i < num_pages; i++) {
4795
		eb->pages[i] = alloc_page(GFP_NOFS);
4796 4797 4798 4799 4800 4801 4802 4803 4804
		if (!eb->pages[i])
			goto err;
	}
	set_extent_buffer_uptodate(eb);
	btrfs_set_header_nritems(eb, 0);
	set_bit(EXTENT_BUFFER_DUMMY, &eb->bflags);

	return eb;
err:
4805 4806
	for (; i > 0; i--)
		__free_page(eb->pages[i - 1]);
4807 4808 4809 4810
	__free_extent_buffer(eb);
	return NULL;
}

4811
struct extent_buffer *alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
4812
						u64 start)
4813
{
4814
	return __alloc_dummy_extent_buffer(fs_info, start, fs_info->nodesize);
4815 4816
}

4817 4818
static void check_buffer_tree_ref(struct extent_buffer *eb)
{
4819
	int refs;
4820 4821 4822 4823 4824 4825 4826 4827 4828 4829 4830 4831 4832 4833 4834 4835 4836 4837 4838 4839
	/* the ref bit is tricky.  We have to make sure it is set
	 * if we have the buffer dirty.   Otherwise the
	 * code to free a buffer can end up dropping a dirty
	 * page
	 *
	 * Once the ref bit is set, it won't go away while the
	 * buffer is dirty or in writeback, and it also won't
	 * go away while we have the reference count on the
	 * eb bumped.
	 *
	 * We can't just set the ref bit without bumping the
	 * ref on the eb because free_extent_buffer might
	 * see the ref bit and try to clear it.  If this happens
	 * free_extent_buffer might end up dropping our original
	 * ref by mistake and freeing the page before we are able
	 * to add one more ref.
	 *
	 * So bump the ref count first, then set the bit.  If someone
	 * beat us to it, drop the ref we added.
	 */
4840 4841 4842 4843
	refs = atomic_read(&eb->refs);
	if (refs >= 2 && test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
		return;

4844 4845
	spin_lock(&eb->refs_lock);
	if (!test_and_set_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
4846
		atomic_inc(&eb->refs);
4847
	spin_unlock(&eb->refs_lock);
4848 4849
}

4850 4851
static void mark_extent_buffer_accessed(struct extent_buffer *eb,
		struct page *accessed)
4852 4853 4854
{
	unsigned long num_pages, i;

4855 4856
	check_buffer_tree_ref(eb);

4857 4858
	num_pages = num_extent_pages(eb->start, eb->len);
	for (i = 0; i < num_pages; i++) {
4859 4860
		struct page *p = eb->pages[i];

4861 4862
		if (p != accessed)
			mark_page_accessed(p);
4863 4864 4865
	}
}

4866 4867
struct extent_buffer *find_extent_buffer(struct btrfs_fs_info *fs_info,
					 u64 start)
4868 4869 4870 4871
{
	struct extent_buffer *eb;

	rcu_read_lock();
4872
	eb = radix_tree_lookup(&fs_info->buffer_radix,
4873
			       start >> PAGE_SHIFT);
4874 4875
	if (eb && atomic_inc_not_zero(&eb->refs)) {
		rcu_read_unlock();
4876 4877 4878 4879 4880 4881 4882 4883 4884 4885 4886 4887 4888 4889 4890 4891 4892 4893 4894
		/*
		 * Lock our eb's refs_lock to avoid races with
		 * free_extent_buffer. When we get our eb it might be flagged
		 * with EXTENT_BUFFER_STALE and another task running
		 * free_extent_buffer might have seen that flag set,
		 * eb->refs == 2, that the buffer isn't under IO (dirty and
		 * writeback flags not set) and it's still in the tree (flag
		 * EXTENT_BUFFER_TREE_REF set), therefore being in the process
		 * of decrementing the extent buffer's reference count twice.
		 * So here we could race and increment the eb's reference count,
		 * clear its stale flag, mark it as dirty and drop our reference
		 * before the other task finishes executing free_extent_buffer,
		 * which would later result in an attempt to free an extent
		 * buffer that is dirty.
		 */
		if (test_bit(EXTENT_BUFFER_STALE, &eb->bflags)) {
			spin_lock(&eb->refs_lock);
			spin_unlock(&eb->refs_lock);
		}
4895
		mark_extent_buffer_accessed(eb, NULL);
4896 4897 4898 4899 4900 4901 4902
		return eb;
	}
	rcu_read_unlock();

	return NULL;
}

4903 4904
#ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
struct extent_buffer *alloc_test_extent_buffer(struct btrfs_fs_info *fs_info,
4905
					u64 start)
4906 4907 4908 4909 4910 4911 4912
{
	struct extent_buffer *eb, *exists = NULL;
	int ret;

	eb = find_extent_buffer(fs_info, start);
	if (eb)
		return eb;
4913
	eb = alloc_dummy_extent_buffer(fs_info, start);
4914 4915 4916 4917
	if (!eb)
		return NULL;
	eb->fs_info = fs_info;
again:
4918
	ret = radix_tree_preload(GFP_NOFS);
4919 4920 4921 4922
	if (ret)
		goto free_eb;
	spin_lock(&fs_info->buffer_lock);
	ret = radix_tree_insert(&fs_info->buffer_radix,
4923
				start >> PAGE_SHIFT, eb);
4924 4925 4926 4927 4928 4929 4930 4931 4932 4933 4934 4935 4936 4937 4938 4939 4940 4941 4942 4943 4944 4945 4946 4947 4948 4949
	spin_unlock(&fs_info->buffer_lock);
	radix_tree_preload_end();
	if (ret == -EEXIST) {
		exists = find_extent_buffer(fs_info, start);
		if (exists)
			goto free_eb;
		else
			goto again;
	}
	check_buffer_tree_ref(eb);
	set_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags);

	/*
	 * We will free dummy extent buffer's if they come into
	 * free_extent_buffer with a ref count of 2, but if we are using this we
	 * want the buffers to stay in memory until we're done with them, so
	 * bump the ref count again.
	 */
	atomic_inc(&eb->refs);
	return eb;
free_eb:
	btrfs_release_extent_buffer(eb);
	return exists;
}
#endif

4950
struct extent_buffer *alloc_extent_buffer(struct btrfs_fs_info *fs_info,
4951
					  u64 start)
4952
{
4953
	unsigned long len = fs_info->nodesize;
4954 4955
	unsigned long num_pages = num_extent_pages(start, len);
	unsigned long i;
4956
	unsigned long index = start >> PAGE_SHIFT;
4957
	struct extent_buffer *eb;
4958
	struct extent_buffer *exists = NULL;
4959
	struct page *p;
4960
	struct address_space *mapping = fs_info->btree_inode->i_mapping;
4961
	int uptodate = 1;
4962
	int ret;
4963

4964
	if (!IS_ALIGNED(start, fs_info->sectorsize)) {
4965 4966 4967 4968
		btrfs_err(fs_info, "bad tree block start %llu", start);
		return ERR_PTR(-EINVAL);
	}

4969
	eb = find_extent_buffer(fs_info, start);
4970
	if (eb)
4971 4972
		return eb;

4973
	eb = __alloc_extent_buffer(fs_info, start, len);
4974
	if (!eb)
4975
		return ERR_PTR(-ENOMEM);
4976

4977
	for (i = 0; i < num_pages; i++, index++) {
4978
		p = find_or_create_page(mapping, index, GFP_NOFS|__GFP_NOFAIL);
4979 4980
		if (!p) {
			exists = ERR_PTR(-ENOMEM);
4981
			goto free_eb;
4982
		}
J
Josef Bacik 已提交
4983 4984 4985 4986 4987 4988 4989 4990 4991 4992 4993 4994 4995 4996

		spin_lock(&mapping->private_lock);
		if (PagePrivate(p)) {
			/*
			 * We could have already allocated an eb for this page
			 * and attached one so lets see if we can get a ref on
			 * the existing eb, and if we can we know it's good and
			 * we can just return that one, else we know we can just
			 * overwrite page->private.
			 */
			exists = (struct extent_buffer *)p->private;
			if (atomic_inc_not_zero(&exists->refs)) {
				spin_unlock(&mapping->private_lock);
				unlock_page(p);
4997
				put_page(p);
4998
				mark_extent_buffer_accessed(exists, p);
J
Josef Bacik 已提交
4999 5000
				goto free_eb;
			}
5001
			exists = NULL;
J
Josef Bacik 已提交
5002

5003
			/*
J
Josef Bacik 已提交
5004 5005 5006 5007
			 * Do this so attach doesn't complain and we need to
			 * drop the ref the old guy had.
			 */
			ClearPagePrivate(p);
5008
			WARN_ON(PageDirty(p));
5009
			put_page(p);
5010
		}
J
Josef Bacik 已提交
5011 5012
		attach_extent_buffer_page(eb, p);
		spin_unlock(&mapping->private_lock);
5013
		WARN_ON(PageDirty(p));
5014
		eb->pages[i] = p;
5015 5016
		if (!PageUptodate(p))
			uptodate = 0;
C
Chris Mason 已提交
5017 5018 5019 5020 5021

		/*
		 * see below about how we avoid a nasty race with release page
		 * and why we unlock later
		 */
5022 5023
	}
	if (uptodate)
5024
		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5025
again:
5026
	ret = radix_tree_preload(GFP_NOFS);
5027 5028
	if (ret) {
		exists = ERR_PTR(ret);
5029
		goto free_eb;
5030
	}
5031

5032 5033
	spin_lock(&fs_info->buffer_lock);
	ret = radix_tree_insert(&fs_info->buffer_radix,
5034
				start >> PAGE_SHIFT, eb);
5035
	spin_unlock(&fs_info->buffer_lock);
5036
	radix_tree_preload_end();
5037
	if (ret == -EEXIST) {
5038
		exists = find_extent_buffer(fs_info, start);
5039 5040 5041
		if (exists)
			goto free_eb;
		else
5042
			goto again;
5043 5044
	}
	/* add one reference for the tree */
5045
	check_buffer_tree_ref(eb);
5046
	set_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags);
C
Chris Mason 已提交
5047 5048 5049 5050 5051 5052 5053 5054 5055 5056

	/*
	 * there is a race where release page may have
	 * tried to find this extent buffer in the radix
	 * but failed.  It will tell the VM it is safe to
	 * reclaim the, and it will clear the page private bit.
	 * We must make sure to set the page private bit properly
	 * after the extent buffer is in the radix tree so
	 * it doesn't get lost
	 */
5057 5058
	SetPageChecked(eb->pages[0]);
	for (i = 1; i < num_pages; i++) {
5059
		p = eb->pages[i];
5060 5061 5062 5063
		ClearPageChecked(p);
		unlock_page(p);
	}
	unlock_page(eb->pages[0]);
5064 5065
	return eb;

5066
free_eb:
5067
	WARN_ON(!atomic_dec_and_test(&eb->refs));
5068 5069 5070 5071
	for (i = 0; i < num_pages; i++) {
		if (eb->pages[i])
			unlock_page(eb->pages[i]);
	}
C
Chris Mason 已提交
5072

5073
	btrfs_release_extent_buffer(eb);
5074
	return exists;
5075 5076
}

5077 5078 5079 5080 5081 5082 5083 5084 5085
static inline void btrfs_release_extent_buffer_rcu(struct rcu_head *head)
{
	struct extent_buffer *eb =
			container_of(head, struct extent_buffer, rcu_head);

	__free_extent_buffer(eb);
}

/* Expects to have eb->eb_lock already held */
5086
static int release_extent_buffer(struct extent_buffer *eb)
5087 5088 5089
{
	WARN_ON(atomic_read(&eb->refs) == 0);
	if (atomic_dec_and_test(&eb->refs)) {
5090
		if (test_and_clear_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags)) {
5091
			struct btrfs_fs_info *fs_info = eb->fs_info;
5092

5093
			spin_unlock(&eb->refs_lock);
5094

5095 5096
			spin_lock(&fs_info->buffer_lock);
			radix_tree_delete(&fs_info->buffer_radix,
5097
					  eb->start >> PAGE_SHIFT);
5098
			spin_unlock(&fs_info->buffer_lock);
5099 5100
		} else {
			spin_unlock(&eb->refs_lock);
5101
		}
5102 5103

		/* Should be safe to release our pages at this point */
5104
		btrfs_release_extent_buffer_page(eb);
5105 5106 5107 5108 5109 5110
#ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
		if (unlikely(test_bit(EXTENT_BUFFER_DUMMY, &eb->bflags))) {
			__free_extent_buffer(eb);
			return 1;
		}
#endif
5111
		call_rcu(&eb->rcu_head, btrfs_release_extent_buffer_rcu);
5112
		return 1;
5113 5114
	}
	spin_unlock(&eb->refs_lock);
5115 5116

	return 0;
5117 5118
}

5119 5120
void free_extent_buffer(struct extent_buffer *eb)
{
5121 5122
	int refs;
	int old;
5123 5124 5125
	if (!eb)
		return;

5126 5127 5128 5129 5130 5131 5132 5133 5134
	while (1) {
		refs = atomic_read(&eb->refs);
		if (refs <= 3)
			break;
		old = atomic_cmpxchg(&eb->refs, refs, refs - 1);
		if (old == refs)
			return;
	}

5135
	spin_lock(&eb->refs_lock);
5136 5137 5138 5139
	if (atomic_read(&eb->refs) == 2 &&
	    test_bit(EXTENT_BUFFER_DUMMY, &eb->bflags))
		atomic_dec(&eb->refs);

5140 5141
	if (atomic_read(&eb->refs) == 2 &&
	    test_bit(EXTENT_BUFFER_STALE, &eb->bflags) &&
5142
	    !extent_buffer_under_io(eb) &&
5143 5144 5145 5146 5147 5148 5149
	    test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
		atomic_dec(&eb->refs);

	/*
	 * I know this is terrible, but it's temporary until we stop tracking
	 * the uptodate bits and such for the extent buffers.
	 */
5150
	release_extent_buffer(eb);
5151 5152 5153 5154 5155
}

void free_extent_buffer_stale(struct extent_buffer *eb)
{
	if (!eb)
5156 5157
		return;

5158 5159 5160
	spin_lock(&eb->refs_lock);
	set_bit(EXTENT_BUFFER_STALE, &eb->bflags);

5161
	if (atomic_read(&eb->refs) == 2 && !extent_buffer_under_io(eb) &&
5162 5163
	    test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
		atomic_dec(&eb->refs);
5164
	release_extent_buffer(eb);
5165 5166
}

5167
void clear_extent_buffer_dirty(struct extent_buffer *eb)
5168 5169 5170 5171 5172 5173 5174 5175
{
	unsigned long i;
	unsigned long num_pages;
	struct page *page;

	num_pages = num_extent_pages(eb->start, eb->len);

	for (i = 0; i < num_pages; i++) {
5176
		page = eb->pages[i];
5177
		if (!PageDirty(page))
C
Chris Mason 已提交
5178 5179
			continue;

5180
		lock_page(page);
C
Chris Mason 已提交
5181 5182
		WARN_ON(!PagePrivate(page));

5183
		clear_page_dirty_for_io(page);
5184
		spin_lock_irq(&page->mapping->tree_lock);
5185 5186 5187 5188 5189
		if (!PageDirty(page)) {
			radix_tree_tag_clear(&page->mapping->page_tree,
						page_index(page),
						PAGECACHE_TAG_DIRTY);
		}
5190
		spin_unlock_irq(&page->mapping->tree_lock);
5191
		ClearPageError(page);
5192
		unlock_page(page);
5193
	}
5194
	WARN_ON(atomic_read(&eb->refs) == 0);
5195 5196
}

5197
int set_extent_buffer_dirty(struct extent_buffer *eb)
5198 5199 5200
{
	unsigned long i;
	unsigned long num_pages;
5201
	int was_dirty = 0;
5202

5203 5204
	check_buffer_tree_ref(eb);

5205
	was_dirty = test_and_set_bit(EXTENT_BUFFER_DIRTY, &eb->bflags);
5206

5207
	num_pages = num_extent_pages(eb->start, eb->len);
5208
	WARN_ON(atomic_read(&eb->refs) == 0);
5209 5210
	WARN_ON(!test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags));

5211
	for (i = 0; i < num_pages; i++)
5212
		set_page_dirty(eb->pages[i]);
5213
	return was_dirty;
5214 5215
}

5216
void clear_extent_buffer_uptodate(struct extent_buffer *eb)
5217 5218 5219 5220 5221
{
	unsigned long i;
	struct page *page;
	unsigned long num_pages;

5222
	clear_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5223
	num_pages = num_extent_pages(eb->start, eb->len);
5224
	for (i = 0; i < num_pages; i++) {
5225
		page = eb->pages[i];
C
Chris Mason 已提交
5226 5227
		if (page)
			ClearPageUptodate(page);
5228 5229 5230
	}
}

5231
void set_extent_buffer_uptodate(struct extent_buffer *eb)
5232 5233 5234 5235 5236
{
	unsigned long i;
	struct page *page;
	unsigned long num_pages;

5237
	set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5238 5239
	num_pages = num_extent_pages(eb->start, eb->len);
	for (i = 0; i < num_pages; i++) {
5240
		page = eb->pages[i];
5241 5242 5243 5244
		SetPageUptodate(page);
	}
}

5245
int extent_buffer_uptodate(struct extent_buffer *eb)
5246
{
5247
	return test_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5248 5249 5250
}

int read_extent_buffer_pages(struct extent_io_tree *tree,
5251
			     struct extent_buffer *eb, int wait, int mirror_num)
5252 5253 5254 5255 5256
{
	unsigned long i;
	struct page *page;
	int err;
	int ret = 0;
5257 5258
	int locked_pages = 0;
	int all_uptodate = 1;
5259
	unsigned long num_pages;
5260
	unsigned long num_reads = 0;
5261
	struct bio *bio = NULL;
C
Chris Mason 已提交
5262
	unsigned long bio_flags = 0;
5263

5264
	if (test_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags))
5265 5266 5267
		return 0;

	num_pages = num_extent_pages(eb->start, eb->len);
5268
	for (i = 0; i < num_pages; i++) {
5269
		page = eb->pages[i];
5270
		if (wait == WAIT_NONE) {
5271
			if (!trylock_page(page))
5272
				goto unlock_exit;
5273 5274 5275
		} else {
			lock_page(page);
		}
5276
		locked_pages++;
5277 5278 5279 5280 5281 5282
	}
	/*
	 * We need to firstly lock all pages to make sure that
	 * the uptodate bit of our pages won't be affected by
	 * clear_extent_buffer_uptodate().
	 */
5283
	for (i = 0; i < num_pages; i++) {
5284
		page = eb->pages[i];
5285 5286
		if (!PageUptodate(page)) {
			num_reads++;
5287
			all_uptodate = 0;
5288
		}
5289
	}
5290

5291
	if (all_uptodate) {
5292
		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5293 5294 5295
		goto unlock_exit;
	}

5296
	clear_bit(EXTENT_BUFFER_READ_ERR, &eb->bflags);
5297
	eb->read_mirror = 0;
5298
	atomic_set(&eb->io_pages, num_reads);
5299
	for (i = 0; i < num_pages; i++) {
5300
		page = eb->pages[i];
5301

5302
		if (!PageUptodate(page)) {
5303 5304 5305 5306 5307 5308
			if (ret) {
				atomic_dec(&eb->io_pages);
				unlock_page(page);
				continue;
			}

5309
			ClearPageError(page);
5310
			err = __extent_read_full_page(tree, page,
5311
						      btree_get_extent, &bio,
5312
						      mirror_num, &bio_flags,
5313
						      REQ_META);
5314
			if (err) {
5315
				ret = err;
5316 5317 5318 5319 5320 5321 5322 5323 5324 5325
				/*
				 * We use &bio in above __extent_read_full_page,
				 * so we ensure that if it returns error, the
				 * current page fails to add itself to bio and
				 * it's been unlocked.
				 *
				 * We must dec io_pages by ourselves.
				 */
				atomic_dec(&eb->io_pages);
			}
5326 5327 5328 5329 5330
		} else {
			unlock_page(page);
		}
	}

5331
	if (bio) {
5332
		err = submit_one_bio(bio, mirror_num, bio_flags);
5333 5334
		if (err)
			return err;
5335
	}
5336

5337
	if (ret || wait != WAIT_COMPLETE)
5338
		return ret;
C
Chris Mason 已提交
5339

5340
	for (i = 0; i < num_pages; i++) {
5341
		page = eb->pages[i];
5342
		wait_on_page_locked(page);
C
Chris Mason 已提交
5343
		if (!PageUptodate(page))
5344 5345
			ret = -EIO;
	}
C
Chris Mason 已提交
5346

5347
	return ret;
5348 5349

unlock_exit:
C
Chris Mason 已提交
5350
	while (locked_pages > 0) {
5351
		locked_pages--;
5352 5353
		page = eb->pages[locked_pages];
		unlock_page(page);
5354 5355
	}
	return ret;
5356 5357
}

5358 5359
void read_extent_buffer(const struct extent_buffer *eb, void *dstv,
			unsigned long start, unsigned long len)
5360 5361 5362 5363 5364 5365
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *dst = (char *)dstv;
5366 5367
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5368

5369 5370 5371 5372 5373 5374
	if (start + len > eb->len) {
		WARN(1, KERN_ERR "btrfs bad mapping eb start %llu len %lu, wanted %lu %lu\n",
		     eb->start, eb->len, start, len);
		memset(dst, 0, len);
		return;
	}
5375

5376
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5377

C
Chris Mason 已提交
5378
	while (len > 0) {
5379
		page = eb->pages[i];
5380

5381
		cur = min(len, (PAGE_SIZE - offset));
5382
		kaddr = page_address(page);
5383 5384 5385 5386 5387 5388 5389 5390 5391
		memcpy(dst, kaddr + offset, cur);

		dst += cur;
		len -= cur;
		offset = 0;
		i++;
	}
}

5392 5393 5394
int read_extent_buffer_to_user(const struct extent_buffer *eb,
			       void __user *dstv,
			       unsigned long start, unsigned long len)
5395 5396 5397 5398 5399 5400
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char __user *dst = (char __user *)dstv;
5401 5402
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5403 5404 5405 5406 5407
	int ret = 0;

	WARN_ON(start > eb->len);
	WARN_ON(start + len > eb->start + eb->len);

5408
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5409 5410

	while (len > 0) {
5411
		page = eb->pages[i];
5412

5413
		cur = min(len, (PAGE_SIZE - offset));
5414 5415 5416 5417 5418 5419 5420 5421 5422 5423 5424 5425 5426 5427 5428
		kaddr = page_address(page);
		if (copy_to_user(dst, kaddr + offset, cur)) {
			ret = -EFAULT;
			break;
		}

		dst += cur;
		len -= cur;
		offset = 0;
		i++;
	}

	return ret;
}

5429 5430 5431 5432 5433
/*
 * return 0 if the item is found within a page.
 * return 1 if the item spans two pages.
 * return -EINVAL otherwise.
 */
5434 5435 5436 5437
int map_private_extent_buffer(const struct extent_buffer *eb,
			      unsigned long start, unsigned long min_len,
			      char **map, unsigned long *map_start,
			      unsigned long *map_len)
5438
{
5439
	size_t offset = start & (PAGE_SIZE - 1);
5440 5441
	char *kaddr;
	struct page *p;
5442 5443
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5444
	unsigned long end_i = (start_offset + start + min_len - 1) >>
5445
		PAGE_SHIFT;
5446

5447 5448 5449 5450 5451 5452
	if (start + min_len > eb->len) {
		WARN(1, KERN_ERR "btrfs bad mapping eb start %llu len %lu, wanted %lu %lu\n",
		       eb->start, eb->len, start, min_len);
		return -EINVAL;
	}

5453
	if (i != end_i)
5454
		return 1;
5455 5456 5457 5458 5459 5460

	if (i == 0) {
		offset = start_offset;
		*map_start = 0;
	} else {
		offset = 0;
5461
		*map_start = ((u64)i << PAGE_SHIFT) - start_offset;
5462
	}
C
Chris Mason 已提交
5463

5464
	p = eb->pages[i];
5465
	kaddr = page_address(p);
5466
	*map = kaddr + offset;
5467
	*map_len = PAGE_SIZE - offset;
5468 5469 5470
	return 0;
}

5471 5472
int memcmp_extent_buffer(const struct extent_buffer *eb, const void *ptrv,
			 unsigned long start, unsigned long len)
5473 5474 5475 5476 5477 5478
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *ptr = (char *)ptrv;
5479 5480
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5481 5482 5483 5484 5485
	int ret = 0;

	WARN_ON(start > eb->len);
	WARN_ON(start + len > eb->start + eb->len);

5486
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5487

C
Chris Mason 已提交
5488
	while (len > 0) {
5489
		page = eb->pages[i];
5490

5491
		cur = min(len, (PAGE_SIZE - offset));
5492

5493
		kaddr = page_address(page);
5494 5495 5496 5497 5498 5499 5500 5501 5502 5503 5504 5505
		ret = memcmp(ptr, kaddr + offset, cur);
		if (ret)
			break;

		ptr += cur;
		len -= cur;
		offset = 0;
		i++;
	}
	return ret;
}

5506 5507 5508 5509 5510 5511 5512 5513 5514 5515 5516 5517 5518 5519 5520 5521 5522 5523 5524 5525 5526
void write_extent_buffer_chunk_tree_uuid(struct extent_buffer *eb,
		const void *srcv)
{
	char *kaddr;

	WARN_ON(!PageUptodate(eb->pages[0]));
	kaddr = page_address(eb->pages[0]);
	memcpy(kaddr + offsetof(struct btrfs_header, chunk_tree_uuid), srcv,
			BTRFS_FSID_SIZE);
}

void write_extent_buffer_fsid(struct extent_buffer *eb, const void *srcv)
{
	char *kaddr;

	WARN_ON(!PageUptodate(eb->pages[0]));
	kaddr = page_address(eb->pages[0]);
	memcpy(kaddr + offsetof(struct btrfs_header, fsid), srcv,
			BTRFS_FSID_SIZE);
}

5527 5528 5529 5530 5531 5532 5533 5534
void write_extent_buffer(struct extent_buffer *eb, const void *srcv,
			 unsigned long start, unsigned long len)
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *src = (char *)srcv;
5535 5536
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5537 5538 5539 5540

	WARN_ON(start > eb->len);
	WARN_ON(start + len > eb->start + eb->len);

5541
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5542

C
Chris Mason 已提交
5543
	while (len > 0) {
5544
		page = eb->pages[i];
5545 5546
		WARN_ON(!PageUptodate(page));

5547
		cur = min(len, PAGE_SIZE - offset);
5548
		kaddr = page_address(page);
5549 5550 5551 5552 5553 5554 5555 5556 5557
		memcpy(kaddr + offset, src, cur);

		src += cur;
		len -= cur;
		offset = 0;
		i++;
	}
}

5558 5559
void memzero_extent_buffer(struct extent_buffer *eb, unsigned long start,
		unsigned long len)
5560 5561 5562 5563 5564
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
5565 5566
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5567 5568 5569 5570

	WARN_ON(start > eb->len);
	WARN_ON(start + len > eb->start + eb->len);

5571
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5572

C
Chris Mason 已提交
5573
	while (len > 0) {
5574
		page = eb->pages[i];
5575 5576
		WARN_ON(!PageUptodate(page));

5577
		cur = min(len, PAGE_SIZE - offset);
5578
		kaddr = page_address(page);
5579
		memset(kaddr + offset, 0, cur);
5580 5581 5582 5583 5584 5585 5586

		len -= cur;
		offset = 0;
		i++;
	}
}

5587 5588 5589 5590 5591 5592 5593 5594 5595 5596 5597 5598 5599 5600
void copy_extent_buffer_full(struct extent_buffer *dst,
			     struct extent_buffer *src)
{
	int i;
	unsigned num_pages;

	ASSERT(dst->len == src->len);

	num_pages = num_extent_pages(dst->start, dst->len);
	for (i = 0; i < num_pages; i++)
		copy_page(page_address(dst->pages[i]),
				page_address(src->pages[i]));
}

5601 5602 5603 5604 5605 5606 5607 5608 5609
void copy_extent_buffer(struct extent_buffer *dst, struct extent_buffer *src,
			unsigned long dst_offset, unsigned long src_offset,
			unsigned long len)
{
	u64 dst_len = dst->len;
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
5610 5611
	size_t start_offset = dst->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + dst_offset) >> PAGE_SHIFT;
5612 5613 5614 5615

	WARN_ON(src->len != dst_len);

	offset = (start_offset + dst_offset) &
5616
		(PAGE_SIZE - 1);
5617

C
Chris Mason 已提交
5618
	while (len > 0) {
5619
		page = dst->pages[i];
5620 5621
		WARN_ON(!PageUptodate(page));

5622
		cur = min(len, (unsigned long)(PAGE_SIZE - offset));
5623

5624
		kaddr = page_address(page);
5625 5626 5627 5628 5629 5630 5631 5632 5633
		read_extent_buffer(src, kaddr + offset, src_offset, cur);

		src_offset += cur;
		len -= cur;
		offset = 0;
		i++;
	}
}

5634 5635 5636 5637 5638 5639 5640 5641 5642 5643 5644
void le_bitmap_set(u8 *map, unsigned int start, int len)
{
	u8 *p = map + BIT_BYTE(start);
	const unsigned int size = start + len;
	int bits_to_set = BITS_PER_BYTE - (start % BITS_PER_BYTE);
	u8 mask_to_set = BITMAP_FIRST_BYTE_MASK(start);

	while (len - bits_to_set >= 0) {
		*p |= mask_to_set;
		len -= bits_to_set;
		bits_to_set = BITS_PER_BYTE;
D
Dan Carpenter 已提交
5645
		mask_to_set = ~0;
5646 5647 5648 5649 5650 5651 5652 5653 5654 5655 5656 5657 5658 5659 5660 5661 5662 5663 5664
		p++;
	}
	if (len) {
		mask_to_set &= BITMAP_LAST_BYTE_MASK(size);
		*p |= mask_to_set;
	}
}

void le_bitmap_clear(u8 *map, unsigned int start, int len)
{
	u8 *p = map + BIT_BYTE(start);
	const unsigned int size = start + len;
	int bits_to_clear = BITS_PER_BYTE - (start % BITS_PER_BYTE);
	u8 mask_to_clear = BITMAP_FIRST_BYTE_MASK(start);

	while (len - bits_to_clear >= 0) {
		*p &= ~mask_to_clear;
		len -= bits_to_clear;
		bits_to_clear = BITS_PER_BYTE;
D
Dan Carpenter 已提交
5665
		mask_to_clear = ~0;
5666 5667 5668 5669 5670 5671 5672
		p++;
	}
	if (len) {
		mask_to_clear &= BITMAP_LAST_BYTE_MASK(size);
		*p &= ~mask_to_clear;
	}
}
5673 5674 5675 5676 5677 5678 5679 5680 5681 5682 5683 5684 5685 5686 5687 5688 5689 5690 5691

/*
 * eb_bitmap_offset() - calculate the page and offset of the byte containing the
 * given bit number
 * @eb: the extent buffer
 * @start: offset of the bitmap item in the extent buffer
 * @nr: bit number
 * @page_index: return index of the page in the extent buffer that contains the
 * given bit number
 * @page_offset: return offset into the page given by page_index
 *
 * This helper hides the ugliness of finding the byte in an extent buffer which
 * contains a given bit.
 */
static inline void eb_bitmap_offset(struct extent_buffer *eb,
				    unsigned long start, unsigned long nr,
				    unsigned long *page_index,
				    size_t *page_offset)
{
5692
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
5693 5694 5695 5696 5697 5698 5699 5700 5701 5702
	size_t byte_offset = BIT_BYTE(nr);
	size_t offset;

	/*
	 * The byte we want is the offset of the extent buffer + the offset of
	 * the bitmap item in the extent buffer + the offset of the byte in the
	 * bitmap item.
	 */
	offset = start_offset + start + byte_offset;

5703 5704
	*page_index = offset >> PAGE_SHIFT;
	*page_offset = offset & (PAGE_SIZE - 1);
5705 5706 5707 5708 5709 5710 5711 5712 5713 5714 5715
}

/**
 * extent_buffer_test_bit - determine whether a bit in a bitmap item is set
 * @eb: the extent buffer
 * @start: offset of the bitmap item in the extent buffer
 * @nr: bit number to test
 */
int extent_buffer_test_bit(struct extent_buffer *eb, unsigned long start,
			   unsigned long nr)
{
5716
	u8 *kaddr;
5717 5718 5719 5720 5721 5722 5723 5724 5725 5726 5727 5728 5729 5730 5731 5732 5733 5734 5735 5736 5737
	struct page *page;
	unsigned long i;
	size_t offset;

	eb_bitmap_offset(eb, start, nr, &i, &offset);
	page = eb->pages[i];
	WARN_ON(!PageUptodate(page));
	kaddr = page_address(page);
	return 1U & (kaddr[offset] >> (nr & (BITS_PER_BYTE - 1)));
}

/**
 * extent_buffer_bitmap_set - set an area of a bitmap
 * @eb: the extent buffer
 * @start: offset of the bitmap item in the extent buffer
 * @pos: bit number of the first bit
 * @len: number of bits to set
 */
void extent_buffer_bitmap_set(struct extent_buffer *eb, unsigned long start,
			      unsigned long pos, unsigned long len)
{
5738
	u8 *kaddr;
5739 5740 5741 5742 5743
	struct page *page;
	unsigned long i;
	size_t offset;
	const unsigned int size = pos + len;
	int bits_to_set = BITS_PER_BYTE - (pos % BITS_PER_BYTE);
5744
	u8 mask_to_set = BITMAP_FIRST_BYTE_MASK(pos);
5745 5746 5747 5748 5749 5750 5751 5752 5753 5754

	eb_bitmap_offset(eb, start, pos, &i, &offset);
	page = eb->pages[i];
	WARN_ON(!PageUptodate(page));
	kaddr = page_address(page);

	while (len >= bits_to_set) {
		kaddr[offset] |= mask_to_set;
		len -= bits_to_set;
		bits_to_set = BITS_PER_BYTE;
D
Dan Carpenter 已提交
5755
		mask_to_set = ~0;
5756
		if (++offset >= PAGE_SIZE && len > 0) {
5757 5758 5759 5760 5761 5762 5763 5764 5765 5766 5767 5768 5769 5770 5771 5772 5773 5774 5775 5776 5777 5778 5779
			offset = 0;
			page = eb->pages[++i];
			WARN_ON(!PageUptodate(page));
			kaddr = page_address(page);
		}
	}
	if (len) {
		mask_to_set &= BITMAP_LAST_BYTE_MASK(size);
		kaddr[offset] |= mask_to_set;
	}
}


/**
 * extent_buffer_bitmap_clear - clear an area of a bitmap
 * @eb: the extent buffer
 * @start: offset of the bitmap item in the extent buffer
 * @pos: bit number of the first bit
 * @len: number of bits to clear
 */
void extent_buffer_bitmap_clear(struct extent_buffer *eb, unsigned long start,
				unsigned long pos, unsigned long len)
{
5780
	u8 *kaddr;
5781 5782 5783 5784 5785
	struct page *page;
	unsigned long i;
	size_t offset;
	const unsigned int size = pos + len;
	int bits_to_clear = BITS_PER_BYTE - (pos % BITS_PER_BYTE);
5786
	u8 mask_to_clear = BITMAP_FIRST_BYTE_MASK(pos);
5787 5788 5789 5790 5791 5792 5793 5794 5795 5796

	eb_bitmap_offset(eb, start, pos, &i, &offset);
	page = eb->pages[i];
	WARN_ON(!PageUptodate(page));
	kaddr = page_address(page);

	while (len >= bits_to_clear) {
		kaddr[offset] &= ~mask_to_clear;
		len -= bits_to_clear;
		bits_to_clear = BITS_PER_BYTE;
D
Dan Carpenter 已提交
5797
		mask_to_clear = ~0;
5798
		if (++offset >= PAGE_SIZE && len > 0) {
5799 5800 5801 5802 5803 5804 5805 5806 5807 5808 5809 5810
			offset = 0;
			page = eb->pages[++i];
			WARN_ON(!PageUptodate(page));
			kaddr = page_address(page);
		}
	}
	if (len) {
		mask_to_clear &= BITMAP_LAST_BYTE_MASK(size);
		kaddr[offset] &= ~mask_to_clear;
	}
}

5811 5812 5813 5814 5815 5816
static inline bool areas_overlap(unsigned long src, unsigned long dst, unsigned long len)
{
	unsigned long distance = (src > dst) ? src - dst : dst - src;
	return distance < len;
}

5817 5818 5819 5820
static void copy_pages(struct page *dst_page, struct page *src_page,
		       unsigned long dst_off, unsigned long src_off,
		       unsigned long len)
{
5821
	char *dst_kaddr = page_address(dst_page);
5822
	char *src_kaddr;
5823
	int must_memmove = 0;
5824

5825
	if (dst_page != src_page) {
5826
		src_kaddr = page_address(src_page);
5827
	} else {
5828
		src_kaddr = dst_kaddr;
5829 5830
		if (areas_overlap(src_off, dst_off, len))
			must_memmove = 1;
5831
	}
5832

5833 5834 5835 5836
	if (must_memmove)
		memmove(dst_kaddr + dst_off, src_kaddr + src_off, len);
	else
		memcpy(dst_kaddr + dst_off, src_kaddr + src_off, len);
5837 5838 5839 5840 5841
}

void memcpy_extent_buffer(struct extent_buffer *dst, unsigned long dst_offset,
			   unsigned long src_offset, unsigned long len)
{
5842
	struct btrfs_fs_info *fs_info = dst->fs_info;
5843 5844 5845
	size_t cur;
	size_t dst_off_in_page;
	size_t src_off_in_page;
5846
	size_t start_offset = dst->start & ((u64)PAGE_SIZE - 1);
5847 5848 5849 5850
	unsigned long dst_i;
	unsigned long src_i;

	if (src_offset + len > dst->len) {
5851
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5852 5853
			"memmove bogus src_offset %lu move len %lu dst len %lu",
			 src_offset, len, dst->len);
5854 5855 5856
		BUG_ON(1);
	}
	if (dst_offset + len > dst->len) {
5857
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5858 5859
			"memmove bogus dst_offset %lu move len %lu dst len %lu",
			 dst_offset, len, dst->len);
5860 5861 5862
		BUG_ON(1);
	}

C
Chris Mason 已提交
5863
	while (len > 0) {
5864
		dst_off_in_page = (start_offset + dst_offset) &
5865
			(PAGE_SIZE - 1);
5866
		src_off_in_page = (start_offset + src_offset) &
5867
			(PAGE_SIZE - 1);
5868

5869 5870
		dst_i = (start_offset + dst_offset) >> PAGE_SHIFT;
		src_i = (start_offset + src_offset) >> PAGE_SHIFT;
5871

5872
		cur = min(len, (unsigned long)(PAGE_SIZE -
5873 5874
					       src_off_in_page));
		cur = min_t(unsigned long, cur,
5875
			(unsigned long)(PAGE_SIZE - dst_off_in_page));
5876

5877
		copy_pages(dst->pages[dst_i], dst->pages[src_i],
5878 5879 5880 5881 5882 5883 5884 5885 5886 5887 5888
			   dst_off_in_page, src_off_in_page, cur);

		src_offset += cur;
		dst_offset += cur;
		len -= cur;
	}
}

void memmove_extent_buffer(struct extent_buffer *dst, unsigned long dst_offset,
			   unsigned long src_offset, unsigned long len)
{
5889
	struct btrfs_fs_info *fs_info = dst->fs_info;
5890 5891 5892 5893 5894
	size_t cur;
	size_t dst_off_in_page;
	size_t src_off_in_page;
	unsigned long dst_end = dst_offset + len - 1;
	unsigned long src_end = src_offset + len - 1;
5895
	size_t start_offset = dst->start & ((u64)PAGE_SIZE - 1);
5896 5897 5898 5899
	unsigned long dst_i;
	unsigned long src_i;

	if (src_offset + len > dst->len) {
5900
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5901 5902
			  "memmove bogus src_offset %lu move len %lu len %lu",
			  src_offset, len, dst->len);
5903 5904 5905
		BUG_ON(1);
	}
	if (dst_offset + len > dst->len) {
5906
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5907 5908
			  "memmove bogus dst_offset %lu move len %lu len %lu",
			  dst_offset, len, dst->len);
5909 5910
		BUG_ON(1);
	}
5911
	if (dst_offset < src_offset) {
5912 5913 5914
		memcpy_extent_buffer(dst, dst_offset, src_offset, len);
		return;
	}
C
Chris Mason 已提交
5915
	while (len > 0) {
5916 5917
		dst_i = (start_offset + dst_end) >> PAGE_SHIFT;
		src_i = (start_offset + src_end) >> PAGE_SHIFT;
5918 5919

		dst_off_in_page = (start_offset + dst_end) &
5920
			(PAGE_SIZE - 1);
5921
		src_off_in_page = (start_offset + src_end) &
5922
			(PAGE_SIZE - 1);
5923 5924 5925

		cur = min_t(unsigned long, len, src_off_in_page + 1);
		cur = min(cur, dst_off_in_page + 1);
5926
		copy_pages(dst->pages[dst_i], dst->pages[src_i],
5927 5928 5929 5930 5931 5932 5933 5934
			   dst_off_in_page - cur + 1,
			   src_off_in_page - cur + 1, cur);

		dst_end -= cur;
		src_end -= cur;
		len -= cur;
	}
}
5935

5936
int try_release_extent_buffer(struct page *page)
5937
{
5938 5939
	struct extent_buffer *eb;

5940
	/*
5941
	 * We need to make sure nobody is attaching this page to an eb right
5942 5943 5944 5945 5946
	 * now.
	 */
	spin_lock(&page->mapping->private_lock);
	if (!PagePrivate(page)) {
		spin_unlock(&page->mapping->private_lock);
J
Josef Bacik 已提交
5947
		return 1;
5948
	}
5949

5950 5951
	eb = (struct extent_buffer *)page->private;
	BUG_ON(!eb);
5952 5953

	/*
5954 5955 5956
	 * This is a little awful but should be ok, we need to make sure that
	 * the eb doesn't disappear out from under us while we're looking at
	 * this page.
5957
	 */
5958
	spin_lock(&eb->refs_lock);
5959
	if (atomic_read(&eb->refs) != 1 || extent_buffer_under_io(eb)) {
5960 5961 5962
		spin_unlock(&eb->refs_lock);
		spin_unlock(&page->mapping->private_lock);
		return 0;
5963
	}
5964
	spin_unlock(&page->mapping->private_lock);
5965

5966
	/*
5967 5968
	 * If tree ref isn't set then we know the ref on this eb is a real ref,
	 * so just return, this page will likely be freed soon anyway.
5969
	 */
5970 5971 5972
	if (!test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags)) {
		spin_unlock(&eb->refs_lock);
		return 0;
5973
	}
5974

5975
	return release_extent_buffer(eb);
5976
}