extent_io.c 157.1 KB
Newer Older
1
// SPDX-License-Identifier: GPL-2.0
2

3 4 5 6 7 8 9 10 11 12 13
#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>
14
#include <linux/prefetch.h>
D
Dan Magenheimer 已提交
15
#include <linux/cleancache.h>
16
#include "extent_io.h"
17
#include "extent-io-tree.h"
18
#include "extent_map.h"
19 20
#include "ctree.h"
#include "btrfs_inode.h"
21
#include "volumes.h"
22
#include "check-integrity.h"
23
#include "locking.h"
24
#include "rcu-string.h"
25
#include "backref.h"
26
#include "disk-io.h"
27 28 29

static struct kmem_cache *extent_state_cache;
static struct kmem_cache *extent_buffer_cache;
30
static struct bio_set btrfs_bioset;
31

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

37
#ifdef CONFIG_BTRFS_DEBUG
38
static LIST_HEAD(states);
C
Chris Mason 已提交
39
static DEFINE_SPINLOCK(leak_lock);
40

41 42 43
static inline void btrfs_leak_debug_add(spinlock_t *lock,
					struct list_head *new,
					struct list_head *head)
44 45 46
{
	unsigned long flags;

47
	spin_lock_irqsave(lock, flags);
48
	list_add(new, head);
49
	spin_unlock_irqrestore(lock, flags);
50 51
}

52 53
static inline void btrfs_leak_debug_del(spinlock_t *lock,
					struct list_head *entry)
54 55 56
{
	unsigned long flags;

57
	spin_lock_irqsave(lock, flags);
58
	list_del(entry);
59
	spin_unlock_irqrestore(lock, flags);
60 61
}

62
void btrfs_extent_buffer_leak_debug_check(struct btrfs_fs_info *fs_info)
63 64
{
	struct extent_buffer *eb;
65
	unsigned long flags;
66

67 68 69 70 71 72 73
	/*
	 * If we didn't get into open_ctree our allocated_ebs will not be
	 * initialized, so just skip this.
	 */
	if (!fs_info->allocated_ebs.next)
		return;

74 75 76 77
	spin_lock_irqsave(&fs_info->eb_leak_lock, flags);
	while (!list_empty(&fs_info->allocated_ebs)) {
		eb = list_first_entry(&fs_info->allocated_ebs,
				      struct extent_buffer, leak_list);
78 79 80 81
		pr_err(
	"BTRFS: buffer leak start %llu len %lu refs %d bflags %lu owner %llu\n",
		       eb->start, eb->len, atomic_read(&eb->refs), eb->bflags,
		       btrfs_header_owner(eb));
82 83 84
		list_del(&eb->leak_list);
		kmem_cache_free(extent_buffer_cache, eb);
	}
85
	spin_unlock_irqrestore(&fs_info->eb_leak_lock, flags);
86 87 88 89 90 91
}

static inline void btrfs_extent_state_leak_debug_check(void)
{
	struct extent_state *state;

92 93
	while (!list_empty(&states)) {
		state = list_entry(states.next, struct extent_state, leak_list);
94
		pr_err("BTRFS: state leak: start %llu end %llu state %u in tree %d refs %d\n",
95 96
		       state->start, state->end, state->state,
		       extent_state_in_tree(state),
97
		       refcount_read(&state->refs));
98 99 100 101
		list_del(&state->leak_list);
		kmem_cache_free(extent_state_cache, state);
	}
}
102

103 104
#define btrfs_debug_check_extent_io_range(tree, start, end)		\
	__btrfs_debug_check_extent_io_range(__func__, (tree), (start), (end))
105
static inline void __btrfs_debug_check_extent_io_range(const char *caller,
106
		struct extent_io_tree *tree, u64 start, u64 end)
107
{
108 109 110 111 112 113 114 115 116 117 118 119
	struct inode *inode = tree->private_data;
	u64 isize;

	if (!inode || !is_data_inode(inode))
		return;

	isize = i_size_read(inode);
	if (end >= PAGE_SIZE && (end % 2) == 0 && end != isize - 1) {
		btrfs_debug_rl(BTRFS_I(inode)->root->fs_info,
		    "%s: ino %llu isize %llu odd range [%llu,%llu]",
			caller, btrfs_ino(BTRFS_I(inode)), isize, start, end);
	}
120
}
121
#else
122 123
#define btrfs_leak_debug_add(lock, new, head)	do {} while (0)
#define btrfs_leak_debug_del(lock, entry)	do {} while (0)
124
#define btrfs_extent_state_leak_debug_check()	do {} while (0)
125
#define btrfs_debug_check_extent_io_range(c, s, e)	do {} while (0)
C
Chris Mason 已提交
126
#endif
127 128 129 130 131 132 133 134 135

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

struct extent_page_data {
	struct bio *bio;
136 137 138
	/* tells writepage not to lock the state bits for this range
	 * it still does the unlocking
	 */
139 140
	unsigned int extent_locked:1;

141
	/* tells the submit_bio code to use REQ_SYNC */
142
	unsigned int sync_io:1;
143 144
};

145
static int add_extent_changeset(struct extent_state *state, unsigned bits,
146 147 148 149 150 151
				 struct extent_changeset *changeset,
				 int set)
{
	int ret;

	if (!changeset)
152
		return 0;
153
	if (set && (state->state & bits) == bits)
154
		return 0;
155
	if (!set && (state->state & bits) == 0)
156
		return 0;
157
	changeset->bytes_changed += state->end - state->start + 1;
158
	ret = ulist_add(&changeset->range_changed, state->start, state->end,
159
			GFP_ATOMIC);
160
	return ret;
161 162
}

163 164
int __must_check submit_one_bio(struct bio *bio, int mirror_num,
				unsigned long bio_flags)
165 166 167 168 169 170 171 172
{
	blk_status_t ret = 0;
	struct extent_io_tree *tree = bio->bi_private;

	bio->bi_private = NULL;

	if (tree->ops)
		ret = tree->ops->submit_bio_hook(tree->private_data, bio,
173
						 mirror_num, bio_flags);
174 175 176 177 178 179
	else
		btrfsic_submit_bio(bio);

	return blk_status_to_errno(ret);
}

180 181 182 183 184 185 186 187 188 189
/* Cleanup unsubmitted bios */
static void end_write_bio(struct extent_page_data *epd, int ret)
{
	if (epd->bio) {
		epd->bio->bi_status = errno_to_blk_status(ret);
		bio_endio(epd->bio);
		epd->bio = NULL;
	}
}

190 191 192 193 194 195 196
/*
 * Submit bio from extent page data via submit_one_bio
 *
 * Return 0 if everything is OK.
 * Return <0 for error.
 */
static int __must_check flush_write_bio(struct extent_page_data *epd)
197
{
198
	int ret = 0;
199

200
	if (epd->bio) {
201
		ret = submit_one_bio(epd->bio, 0, 0);
202 203 204 205 206 207 208
		/*
		 * Clean up of epd->bio is handled by its endio function.
		 * And endio is either triggered by successful bio execution
		 * or the error handler of submit bio hook.
		 * So at this point, no matter what happened, we don't need
		 * to clean up epd->bio.
		 */
209 210
		epd->bio = NULL;
	}
211
	return ret;
212
}
213

214
int __init extent_state_cache_init(void)
215
{
D
David Sterba 已提交
216
	extent_state_cache = kmem_cache_create("btrfs_extent_state",
217
			sizeof(struct extent_state), 0,
218
			SLAB_MEM_SPREAD, NULL);
219 220
	if (!extent_state_cache)
		return -ENOMEM;
221 222
	return 0;
}
223

224 225
int __init extent_io_init(void)
{
D
David Sterba 已提交
226
	extent_buffer_cache = kmem_cache_create("btrfs_extent_buffer",
227
			sizeof(struct extent_buffer), 0,
228
			SLAB_MEM_SPREAD, NULL);
229
	if (!extent_buffer_cache)
230
		return -ENOMEM;
231

232 233 234
	if (bioset_init(&btrfs_bioset, BIO_POOL_SIZE,
			offsetof(struct btrfs_io_bio, bio),
			BIOSET_NEED_BVECS))
235
		goto free_buffer_cache;
236

237
	if (bioset_integrity_create(&btrfs_bioset, BIO_POOL_SIZE))
238 239
		goto free_bioset;

240 241
	return 0;

242
free_bioset:
243
	bioset_exit(&btrfs_bioset);
244

245 246 247
free_buffer_cache:
	kmem_cache_destroy(extent_buffer_cache);
	extent_buffer_cache = NULL;
248 249
	return -ENOMEM;
}
250

251 252 253
void __cold extent_state_cache_exit(void)
{
	btrfs_extent_state_leak_debug_check();
254 255 256
	kmem_cache_destroy(extent_state_cache);
}

257
void __cold extent_io_exit(void)
258
{
259 260 261 262 263
	/*
	 * Make sure all delayed rcu free are flushed before we
	 * destroy caches.
	 */
	rcu_barrier();
264
	kmem_cache_destroy(extent_buffer_cache);
265
	bioset_exit(&btrfs_bioset);
266 267
}

268 269 270 271 272 273 274 275 276
/*
 * For the file_extent_tree, we want to hold the inode lock when we lookup and
 * update the disk_i_size, but lockdep will complain because our io_tree we hold
 * the tree lock and get the inode lock when setting delalloc.  These two things
 * are unrelated, so make a class for the file_extent_tree so we don't get the
 * two locking patterns mixed up.
 */
static struct lock_class_key file_extent_tree_class;

277
void extent_io_tree_init(struct btrfs_fs_info *fs_info,
278 279
			 struct extent_io_tree *tree, unsigned int owner,
			 void *private_data)
280
{
281
	tree->fs_info = fs_info;
282
	tree->state = RB_ROOT;
283 284
	tree->ops = NULL;
	tree->dirty_bytes = 0;
285
	spin_lock_init(&tree->lock);
286
	tree->private_data = private_data;
287
	tree->owner = owner;
288 289
	if (owner == IO_TREE_INODE_FILE_EXTENT)
		lockdep_set_class(&tree->lock, &file_extent_tree_class);
290 291
}

292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320
void extent_io_tree_release(struct extent_io_tree *tree)
{
	spin_lock(&tree->lock);
	/*
	 * Do a single barrier for the waitqueue_active check here, the state
	 * of the waitqueue should not change once extent_io_tree_release is
	 * called.
	 */
	smp_mb();
	while (!RB_EMPTY_ROOT(&tree->state)) {
		struct rb_node *node;
		struct extent_state *state;

		node = rb_first(&tree->state);
		state = rb_entry(node, struct extent_state, rb_node);
		rb_erase(&state->rb_node, &tree->state);
		RB_CLEAR_NODE(&state->rb_node);
		/*
		 * btree io trees aren't supposed to have tasks waiting for
		 * changes in the flags of extent states ever.
		 */
		ASSERT(!waitqueue_active(&state->wq));
		free_extent_state(state);

		cond_resched_lock(&tree->lock);
	}
	spin_unlock(&tree->lock);
}

321
static struct extent_state *alloc_extent_state(gfp_t mask)
322 323 324
{
	struct extent_state *state;

325 326 327 328 329
	/*
	 * The given mask might be not appropriate for the slab allocator,
	 * drop the unsupported bits
	 */
	mask &= ~(__GFP_DMA32|__GFP_HIGHMEM);
330
	state = kmem_cache_alloc(extent_state_cache, mask);
331
	if (!state)
332 333
		return state;
	state->state = 0;
334
	state->failrec = NULL;
335
	RB_CLEAR_NODE(&state->rb_node);
336
	btrfs_leak_debug_add(&leak_lock, &state->leak_list, &states);
337
	refcount_set(&state->refs, 1);
338
	init_waitqueue_head(&state->wq);
339
	trace_alloc_extent_state(state, mask, _RET_IP_);
340 341 342
	return state;
}

343
void free_extent_state(struct extent_state *state)
344 345 346
{
	if (!state)
		return;
347
	if (refcount_dec_and_test(&state->refs)) {
348
		WARN_ON(extent_state_in_tree(state));
349
		btrfs_leak_debug_del(&leak_lock, &state->leak_list);
350
		trace_free_extent_state(state, _RET_IP_);
351 352 353 354
		kmem_cache_free(extent_state_cache, state);
	}
}

355 356 357
static struct rb_node *tree_insert(struct rb_root *root,
				   struct rb_node *search_start,
				   u64 offset,
358 359 360
				   struct rb_node *node,
				   struct rb_node ***p_in,
				   struct rb_node **parent_in)
361
{
362
	struct rb_node **p;
C
Chris Mason 已提交
363
	struct rb_node *parent = NULL;
364 365
	struct tree_entry *entry;

366 367 368 369 370 371
	if (p_in && parent_in) {
		p = *p_in;
		parent = *parent_in;
		goto do_insert;
	}

372
	p = search_start ? &search_start : &root->rb_node;
C
Chris Mason 已提交
373
	while (*p) {
374 375 376 377 378 379 380 381 382 383 384
		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;
	}

385
do_insert:
386 387 388 389 390
	rb_link_node(node, parent, p);
	rb_insert_color(node, root);
	return NULL;
}

N
Nikolay Borisov 已提交
391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408
/**
 * __etree_search - searche @tree for an entry that contains @offset. Such
 * entry would have entry->start <= offset && entry->end >= offset.
 *
 * @tree - the tree to search
 * @offset - offset that should fall within an entry in @tree
 * @next_ret - pointer to the first entry whose range ends after @offset
 * @prev - pointer to the first entry whose range begins before @offset
 * @p_ret - pointer where new node should be anchored (used when inserting an
 *	    entry in the tree)
 * @parent_ret - points to entry which would have been the parent of the entry,
 *               containing @offset
 *
 * This function returns a pointer to the entry that contains @offset byte
 * address. If no such entry exists, then NULL is returned and the other
 * pointer arguments to the function are filled, otherwise the found entry is
 * returned and other pointers are left untouched.
 */
409
static struct rb_node *__etree_search(struct extent_io_tree *tree, u64 offset,
410
				      struct rb_node **next_ret,
411
				      struct rb_node **prev_ret,
412 413
				      struct rb_node ***p_ret,
				      struct rb_node **parent_ret)
414
{
415
	struct rb_root *root = &tree->state;
416
	struct rb_node **n = &root->rb_node;
417 418 419 420 421
	struct rb_node *prev = NULL;
	struct rb_node *orig_prev = NULL;
	struct tree_entry *entry;
	struct tree_entry *prev_entry = NULL;

422 423 424
	while (*n) {
		prev = *n;
		entry = rb_entry(prev, struct tree_entry, rb_node);
425 426 427
		prev_entry = entry;

		if (offset < entry->start)
428
			n = &(*n)->rb_left;
429
		else if (offset > entry->end)
430
			n = &(*n)->rb_right;
C
Chris Mason 已提交
431
		else
432
			return *n;
433 434
	}

435 436 437 438 439
	if (p_ret)
		*p_ret = n;
	if (parent_ret)
		*parent_ret = prev;

440
	if (next_ret) {
441
		orig_prev = prev;
C
Chris Mason 已提交
442
		while (prev && offset > prev_entry->end) {
443 444 445
			prev = rb_next(prev);
			prev_entry = rb_entry(prev, struct tree_entry, rb_node);
		}
446
		*next_ret = prev;
447 448 449
		prev = orig_prev;
	}

450
	if (prev_ret) {
451
		prev_entry = rb_entry(prev, struct tree_entry, rb_node);
C
Chris Mason 已提交
452
		while (prev && offset < prev_entry->start) {
453 454 455
			prev = rb_prev(prev);
			prev_entry = rb_entry(prev, struct tree_entry, rb_node);
		}
456
		*prev_ret = prev;
457 458 459 460
	}
	return NULL;
}

461 462 463 464 465
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)
466
{
467
	struct rb_node *next= NULL;
468
	struct rb_node *ret;
469

470
	ret = __etree_search(tree, offset, &next, NULL, p_ret, parent_ret);
C
Chris Mason 已提交
471
	if (!ret)
472
		return next;
473 474 475
	return ret;
}

476 477 478 479 480 481
static inline struct rb_node *tree_search(struct extent_io_tree *tree,
					  u64 offset)
{
	return tree_search_for_insert(tree, offset, NULL, NULL);
}

482 483 484 485 486 487 488 489 490
/*
 * 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.
 */
491 492
static void merge_state(struct extent_io_tree *tree,
		        struct extent_state *state)
493 494 495 496
{
	struct extent_state *other;
	struct rb_node *other_node;

N
Nikolay Borisov 已提交
497
	if (state->state & (EXTENT_LOCKED | EXTENT_BOUNDARY))
498
		return;
499 500 501 502 503 504

	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) {
505 506 507 508
			if (tree->private_data &&
			    is_data_inode(tree->private_data))
				btrfs_merge_delalloc_extent(tree->private_data,
							    state, other);
509 510
			state->start = other->start;
			rb_erase(&other->rb_node, &tree->state);
511
			RB_CLEAR_NODE(&other->rb_node);
512 513 514 515 516 517 518 519
			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) {
520 521 522 523
			if (tree->private_data &&
			    is_data_inode(tree->private_data))
				btrfs_merge_delalloc_extent(tree->private_data,
							    state, other);
524 525
			state->end = other->end;
			rb_erase(&other->rb_node, &tree->state);
526
			RB_CLEAR_NODE(&other->rb_node);
527
			free_extent_state(other);
528 529 530 531
		}
	}
}

532
static void set_state_bits(struct extent_io_tree *tree,
533 534
			   struct extent_state *state, unsigned *bits,
			   struct extent_changeset *changeset);
535

536 537 538 539 540 541 542 543 544 545 546 547
/*
 * 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,
548 549
			struct rb_node ***p,
			struct rb_node **parent,
550
			unsigned *bits, struct extent_changeset *changeset)
551 552 553
{
	struct rb_node *node;

554 555 556 557 558
	if (end < start) {
		btrfs_err(tree->fs_info,
			"insert state: end < start %llu %llu", end, start);
		WARN_ON(1);
	}
559 560
	state->start = start;
	state->end = end;
J
Josef Bacik 已提交
561

562
	set_state_bits(tree, state, bits, changeset);
563

564
	node = tree_insert(&tree->state, NULL, end, &state->rb_node, p, parent);
565 566 567
	if (node) {
		struct extent_state *found;
		found = rb_entry(node, struct extent_state, rb_node);
568 569
		btrfs_err(tree->fs_info,
		       "found node %llu %llu on insert of %llu %llu",
570
		       found->start, found->end, start, end);
571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594
		return -EEXIST;
	}
	merge_state(tree, state);
	return 0;
}

/*
 * 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 已提交
595

596 597
	if (tree->private_data && is_data_inode(tree->private_data))
		btrfs_split_delalloc_extent(tree->private_data, orig, split);
J
Josef Bacik 已提交
598

599 600 601 602 603
	prealloc->start = orig->start;
	prealloc->end = split - 1;
	prealloc->state = orig->state;
	orig->start = split;

604 605
	node = tree_insert(&tree->state, &orig->rb_node, prealloc->end,
			   &prealloc->rb_node, NULL, NULL);
606 607 608 609 610 611 612
	if (node) {
		free_extent_state(prealloc);
		return -EEXIST;
	}
	return 0;
}

613 614 615 616 617 618 619 620 621
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;
}

622 623
/*
 * utility function to clear some bits in an extent state struct.
624
 * it will optionally wake up anyone waiting on this state (wake == 1).
625 626 627 628
 *
 * If no bits are set on the state struct after clearing things, the
 * struct is freed and removed from the tree
 */
629 630
static struct extent_state *clear_state_bit(struct extent_io_tree *tree,
					    struct extent_state *state,
631 632
					    unsigned *bits, int wake,
					    struct extent_changeset *changeset)
633
{
634
	struct extent_state *next;
635
	unsigned bits_to_clear = *bits & ~EXTENT_CTLBITS;
636
	int ret;
637

638
	if ((bits_to_clear & EXTENT_DIRTY) && (state->state & EXTENT_DIRTY)) {
639 640 641 642
		u64 range = state->end - state->start + 1;
		WARN_ON(range > tree->dirty_bytes);
		tree->dirty_bytes -= range;
	}
643 644 645 646

	if (tree->private_data && is_data_inode(tree->private_data))
		btrfs_clear_delalloc_extent(tree->private_data, state, bits);

647 648
	ret = add_extent_changeset(state, bits_to_clear, changeset, 0);
	BUG_ON(ret < 0);
649
	state->state &= ~bits_to_clear;
650 651
	if (wake)
		wake_up(&state->wq);
652
	if (state->state == 0) {
653
		next = next_state(state);
654
		if (extent_state_in_tree(state)) {
655
			rb_erase(&state->rb_node, &tree->state);
656
			RB_CLEAR_NODE(&state->rb_node);
657 658 659 660 661 662
			free_extent_state(state);
		} else {
			WARN_ON(1);
		}
	} else {
		merge_state(tree, state);
663
		next = next_state(state);
664
	}
665
	return next;
666 667
}

668 669 670 671 672 673 674 675 676
static struct extent_state *
alloc_extent_state_atomic(struct extent_state *prealloc)
{
	if (!prealloc)
		prealloc = alloc_extent_state(GFP_ATOMIC);

	return prealloc;
}

677
static void extent_io_tree_panic(struct extent_io_tree *tree, int err)
678
{
679 680 681 682
	struct inode *inode = tree->private_data;

	btrfs_panic(btrfs_sb(inode->i_sb), err,
	"locking error: extent tree was modified by another thread while locked");
683 684
}

685 686 687 688 689 690 691 692 693 694
/*
 * 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.
 *
695
 * This takes the tree lock, and returns 0 on success and < 0 on error.
696
 */
697
int __clear_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
698 699 700
			      unsigned bits, int wake, int delete,
			      struct extent_state **cached_state,
			      gfp_t mask, struct extent_changeset *changeset)
701 702
{
	struct extent_state *state;
703
	struct extent_state *cached;
704 705
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
706
	u64 last_end;
707
	int err;
708
	int clear = 0;
709

710
	btrfs_debug_check_extent_io_range(tree, start, end);
711
	trace_btrfs_clear_extent_bit(tree, start, end - start + 1, bits);
712

713 714 715
	if (bits & EXTENT_DELALLOC)
		bits |= EXTENT_NORESERVE;

716 717 718
	if (delete)
		bits |= ~EXTENT_CTLBITS;

N
Nikolay Borisov 已提交
719
	if (bits & (EXTENT_LOCKED | EXTENT_BOUNDARY))
720
		clear = 1;
721
again:
722
	if (!prealloc && gfpflags_allow_blocking(mask)) {
723 724 725 726 727 728 729
		/*
		 * 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.
		 */
730 731 732
		prealloc = alloc_extent_state(mask);
	}

733
	spin_lock(&tree->lock);
734 735
	if (cached_state) {
		cached = *cached_state;
736 737 738 739 740 741

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

742 743
		if (cached && extent_state_in_tree(cached) &&
		    cached->start <= start && cached->end > start) {
744
			if (clear)
745
				refcount_dec(&cached->refs);
746
			state = cached;
747
			goto hit_next;
748
		}
749 750
		if (clear)
			free_extent_state(cached);
751
	}
752 753 754 755
	/*
	 * this search will find the extents that end after
	 * our range starts
	 */
756
	node = tree_search(tree, start);
757 758 759
	if (!node)
		goto out;
	state = rb_entry(node, struct extent_state, rb_node);
760
hit_next:
761 762 763
	if (state->start > end)
		goto out;
	WARN_ON(state->end < start);
764
	last_end = state->end;
765

766
	/* the state doesn't have the wanted bits, go ahead */
767 768
	if (!(state->state & bits)) {
		state = next_state(state);
769
		goto next;
770
	}
771

772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788
	/*
	 *     | ---- 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) {
789 790
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
791
		err = split_state(tree, state, prealloc, start);
792 793 794
		if (err)
			extent_io_tree_panic(tree, err);

795 796 797 798
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
799 800
			state = clear_state_bit(tree, state, &bits, wake,
						changeset);
801
			goto next;
802 803 804 805 806 807 808 809 810 811
		}
		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) {
812 813
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
814
		err = split_state(tree, state, prealloc, end + 1);
815 816 817
		if (err)
			extent_io_tree_panic(tree, err);

818 819
		if (wake)
			wake_up(&state->wq);
820

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

823 824 825
		prealloc = NULL;
		goto out;
	}
826

827
	state = clear_state_bit(tree, state, &bits, wake, changeset);
828
next:
829 830 831
	if (last_end == (u64)-1)
		goto out;
	start = last_end + 1;
832
	if (start <= end && state && !need_resched())
833
		goto hit_next;
834 835 836 837

search_again:
	if (start > end)
		goto out;
838
	spin_unlock(&tree->lock);
839
	if (gfpflags_allow_blocking(mask))
840 841
		cond_resched();
	goto again;
842 843 844 845 846 847 848 849

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

	return 0;

850 851
}

852 853
static void wait_on_state(struct extent_io_tree *tree,
			  struct extent_state *state)
854 855
		__releases(tree->lock)
		__acquires(tree->lock)
856 857 858
{
	DEFINE_WAIT(wait);
	prepare_to_wait(&state->wq, &wait, TASK_UNINTERRUPTIBLE);
859
	spin_unlock(&tree->lock);
860
	schedule();
861
	spin_lock(&tree->lock);
862 863 864 865 866 867 868 869
	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
 */
870 871
static void wait_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
			    unsigned long bits)
872 873 874 875
{
	struct extent_state *state;
	struct rb_node *node;

876
	btrfs_debug_check_extent_io_range(tree, start, end);
877

878
	spin_lock(&tree->lock);
879 880 881 882 883 884
again:
	while (1) {
		/*
		 * this search will find all the extents that end after
		 * our range starts
		 */
885
		node = tree_search(tree, start);
886
process_node:
887 888 889 890 891 892 893 894 895 896
		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;
897
			refcount_inc(&state->refs);
898 899 900 901 902 903 904 905 906
			wait_on_state(tree, state);
			free_extent_state(state);
			goto again;
		}
		start = state->end + 1;

		if (start > end)
			break;

907 908 909 910
		if (!cond_resched_lock(&tree->lock)) {
			node = rb_next(node);
			goto process_node;
		}
911 912
	}
out:
913
	spin_unlock(&tree->lock);
914 915
}

916
static void set_state_bits(struct extent_io_tree *tree,
917
			   struct extent_state *state,
918
			   unsigned *bits, struct extent_changeset *changeset)
919
{
920
	unsigned bits_to_set = *bits & ~EXTENT_CTLBITS;
921
	int ret;
J
Josef Bacik 已提交
922

923 924 925
	if (tree->private_data && is_data_inode(tree->private_data))
		btrfs_set_delalloc_extent(tree->private_data, state, bits);

926
	if ((bits_to_set & EXTENT_DIRTY) && !(state->state & EXTENT_DIRTY)) {
927 928 929
		u64 range = state->end - state->start + 1;
		tree->dirty_bytes += range;
	}
930 931
	ret = add_extent_changeset(state, bits_to_set, changeset, 1);
	BUG_ON(ret < 0);
932
	state->state |= bits_to_set;
933 934
}

935 936
static void cache_state_if_flags(struct extent_state *state,
				 struct extent_state **cached_ptr,
937
				 unsigned flags)
938 939
{
	if (cached_ptr && !(*cached_ptr)) {
940
		if (!flags || (state->state & flags)) {
941
			*cached_ptr = state;
942
			refcount_inc(&state->refs);
943 944 945 946
		}
	}
}

947 948 949 950
static void cache_state(struct extent_state *state,
			struct extent_state **cached_ptr)
{
	return cache_state_if_flags(state, cached_ptr,
N
Nikolay Borisov 已提交
951
				    EXTENT_LOCKED | EXTENT_BOUNDARY);
952 953
}

954
/*
955 956
 * 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.
957
 *
958 959 960
 * 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.
961
 *
962
 * [start, end] is inclusive This takes the tree lock.
963
 */
964

J
Jeff Mahoney 已提交
965 966
static int __must_check
__set_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
967
		 unsigned bits, unsigned exclusive_bits,
968
		 u64 *failed_start, struct extent_state **cached_state,
969
		 gfp_t mask, struct extent_changeset *changeset)
970 971 972 973
{
	struct extent_state *state;
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
974 975
	struct rb_node **p;
	struct rb_node *parent;
976 977 978
	int err = 0;
	u64 last_start;
	u64 last_end;
979

980
	btrfs_debug_check_extent_io_range(tree, start, end);
981
	trace_btrfs_set_extent_bit(tree, start, end - start + 1, bits);
982

983
again:
984
	if (!prealloc && gfpflags_allow_blocking(mask)) {
985 986 987 988 989 990 991
		/*
		 * 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.
		 */
992 993 994
		prealloc = alloc_extent_state(mask);
	}

995
	spin_lock(&tree->lock);
996 997
	if (cached_state && *cached_state) {
		state = *cached_state;
998
		if (state->start <= start && state->end > start &&
999
		    extent_state_in_tree(state)) {
1000 1001 1002 1003
			node = &state->rb_node;
			goto hit_next;
		}
	}
1004 1005 1006 1007
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1008
	node = tree_search_for_insert(tree, start, &p, &parent);
1009
	if (!node) {
1010 1011
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
1012
		err = insert_state(tree, prealloc, start, end,
1013
				   &p, &parent, &bits, changeset);
1014 1015 1016
		if (err)
			extent_io_tree_panic(tree, err);

1017
		cache_state(prealloc, cached_state);
1018 1019 1020 1021
		prealloc = NULL;
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
C
Chris Mason 已提交
1022
hit_next:
1023 1024 1025 1026 1027 1028 1029 1030 1031 1032
	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) {
1033
		if (state->state & exclusive_bits) {
1034 1035 1036 1037
			*failed_start = state->start;
			err = -EEXIST;
			goto out;
		}
1038

1039
		set_state_bits(tree, state, &bits, changeset);
1040
		cache_state(state, cached_state);
1041
		merge_state(tree, state);
1042 1043 1044
		if (last_end == (u64)-1)
			goto out;
		start = last_end + 1;
1045 1046 1047 1048
		state = next_state(state);
		if (start < end && state && state->start == start &&
		    !need_resched())
			goto hit_next;
1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068
		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) {
1069
		if (state->state & exclusive_bits) {
1070 1071 1072 1073
			*failed_start = start;
			err = -EEXIST;
			goto out;
		}
1074

1075 1076 1077 1078 1079 1080 1081 1082 1083 1084
		/*
		 * If this extent already has all the bits we want set, then
		 * skip it, not necessary to split it or do anything with it.
		 */
		if ((state->state & bits) == bits) {
			start = state->end + 1;
			cache_state(state, cached_state);
			goto search_again;
		}

1085 1086
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
1087
		err = split_state(tree, state, prealloc, start);
1088 1089 1090
		if (err)
			extent_io_tree_panic(tree, err);

1091 1092 1093 1094
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
1095
			set_state_bits(tree, state, &bits, changeset);
1096
			cache_state(state, cached_state);
1097
			merge_state(tree, state);
1098 1099 1100
			if (last_end == (u64)-1)
				goto out;
			start = last_end + 1;
1101 1102 1103 1104
			state = next_state(state);
			if (start < end && state && state->start == start &&
			    !need_resched())
				goto hit_next;
1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119
		}
		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 已提交
1120
			this_end = last_start - 1;
1121 1122 1123

		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
1124 1125 1126 1127 1128

		/*
		 * Avoid to free 'prealloc' if it can be merged with
		 * the later extent.
		 */
1129
		err = insert_state(tree, prealloc, start, this_end,
1130
				   NULL, NULL, &bits, changeset);
1131 1132 1133
		if (err)
			extent_io_tree_panic(tree, err);

J
Josef Bacik 已提交
1134 1135
		cache_state(prealloc, cached_state);
		prealloc = NULL;
1136 1137 1138 1139 1140 1141 1142 1143 1144 1145
		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) {
1146
		if (state->state & exclusive_bits) {
1147 1148 1149 1150
			*failed_start = start;
			err = -EEXIST;
			goto out;
		}
1151 1152 1153

		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
1154
		err = split_state(tree, state, prealloc, end + 1);
1155 1156
		if (err)
			extent_io_tree_panic(tree, err);
1157

1158
		set_state_bits(tree, prealloc, &bits, changeset);
1159
		cache_state(prealloc, cached_state);
1160 1161 1162 1163 1164
		merge_state(tree, prealloc);
		prealloc = NULL;
		goto out;
	}

1165 1166 1167 1168 1169 1170 1171
search_again:
	if (start > end)
		goto out;
	spin_unlock(&tree->lock);
	if (gfpflags_allow_blocking(mask))
		cond_resched();
	goto again;
1172 1173

out:
1174
	spin_unlock(&tree->lock);
1175 1176 1177 1178 1179 1180 1181
	if (prealloc)
		free_extent_state(prealloc);

	return err;

}

1182
int set_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1183
		   unsigned bits, u64 * failed_start,
1184
		   struct extent_state **cached_state, gfp_t mask)
J
Jeff Mahoney 已提交
1185 1186
{
	return __set_extent_bit(tree, start, end, bits, 0, failed_start,
1187
				cached_state, mask, NULL);
J
Jeff Mahoney 已提交
1188 1189 1190
}


J
Josef Bacik 已提交
1191
/**
L
Liu Bo 已提交
1192 1193
 * convert_extent_bit - convert all bits in a given range from one bit to
 * 			another
J
Josef Bacik 已提交
1194 1195 1196 1197 1198
 * @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
1199
 * @cached_state:	state that we're going to cache
J
Josef Bacik 已提交
1200 1201 1202 1203 1204 1205
 *
 * 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.
1206 1207
 *
 * All allocations are done with GFP_NOFS.
J
Josef Bacik 已提交
1208 1209
 */
int convert_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1210
		       unsigned bits, unsigned clear_bits,
1211
		       struct extent_state **cached_state)
J
Josef Bacik 已提交
1212 1213 1214 1215
{
	struct extent_state *state;
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
1216 1217
	struct rb_node **p;
	struct rb_node *parent;
J
Josef Bacik 已提交
1218 1219 1220
	int err = 0;
	u64 last_start;
	u64 last_end;
1221
	bool first_iteration = true;
J
Josef Bacik 已提交
1222

1223
	btrfs_debug_check_extent_io_range(tree, start, end);
1224 1225
	trace_btrfs_convert_extent_bit(tree, start, end - start + 1, bits,
				       clear_bits);
1226

J
Josef Bacik 已提交
1227
again:
1228
	if (!prealloc) {
1229 1230 1231 1232 1233 1234 1235
		/*
		 * 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.
		 */
1236
		prealloc = alloc_extent_state(GFP_NOFS);
1237
		if (!prealloc && !first_iteration)
J
Josef Bacik 已提交
1238 1239 1240 1241
			return -ENOMEM;
	}

	spin_lock(&tree->lock);
1242 1243 1244
	if (cached_state && *cached_state) {
		state = *cached_state;
		if (state->start <= start && state->end > start &&
1245
		    extent_state_in_tree(state)) {
1246 1247 1248 1249 1250
			node = &state->rb_node;
			goto hit_next;
		}
	}

J
Josef Bacik 已提交
1251 1252 1253 1254
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1255
	node = tree_search_for_insert(tree, start, &p, &parent);
J
Josef Bacik 已提交
1256 1257
	if (!node) {
		prealloc = alloc_extent_state_atomic(prealloc);
1258 1259 1260 1261
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
1262
		err = insert_state(tree, prealloc, start, end,
1263
				   &p, &parent, &bits, NULL);
1264 1265
		if (err)
			extent_io_tree_panic(tree, err);
1266 1267
		cache_state(prealloc, cached_state);
		prealloc = NULL;
J
Josef Bacik 已提交
1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281
		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) {
1282
		set_state_bits(tree, state, &bits, NULL);
1283
		cache_state(state, cached_state);
1284
		state = clear_state_bit(tree, state, &clear_bits, 0, NULL);
J
Josef Bacik 已提交
1285 1286 1287
		if (last_end == (u64)-1)
			goto out;
		start = last_end + 1;
1288 1289 1290
		if (start < end && state && state->start == start &&
		    !need_resched())
			goto hit_next;
J
Josef Bacik 已提交
1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311
		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);
1312 1313 1314 1315
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1316
		err = split_state(tree, state, prealloc, start);
1317 1318
		if (err)
			extent_io_tree_panic(tree, err);
J
Josef Bacik 已提交
1319 1320 1321 1322
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
1323
			set_state_bits(tree, state, &bits, NULL);
1324
			cache_state(state, cached_state);
1325 1326
			state = clear_state_bit(tree, state, &clear_bits, 0,
						NULL);
J
Josef Bacik 已提交
1327 1328 1329
			if (last_end == (u64)-1)
				goto out;
			start = last_end + 1;
1330 1331 1332
			if (start < end && state && state->start == start &&
			    !need_resched())
				goto hit_next;
J
Josef Bacik 已提交
1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350
		}
		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);
1351 1352 1353 1354
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1355 1356 1357 1358 1359 1360

		/*
		 * Avoid to free 'prealloc' if it can be merged with
		 * the later extent.
		 */
		err = insert_state(tree, prealloc, start, this_end,
1361
				   NULL, NULL, &bits, NULL);
1362 1363
		if (err)
			extent_io_tree_panic(tree, err);
1364
		cache_state(prealloc, cached_state);
J
Josef Bacik 已提交
1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376
		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);
1377 1378 1379 1380
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1381 1382

		err = split_state(tree, state, prealloc, end + 1);
1383 1384
		if (err)
			extent_io_tree_panic(tree, err);
J
Josef Bacik 已提交
1385

1386
		set_state_bits(tree, prealloc, &bits, NULL);
1387
		cache_state(prealloc, cached_state);
1388
		clear_state_bit(tree, prealloc, &clear_bits, 0, NULL);
J
Josef Bacik 已提交
1389 1390 1391 1392 1393 1394 1395 1396
		prealloc = NULL;
		goto out;
	}

search_again:
	if (start > end)
		goto out;
	spin_unlock(&tree->lock);
1397
	cond_resched();
1398
	first_iteration = false;
J
Josef Bacik 已提交
1399 1400 1401 1402 1403 1404 1405 1406 1407 1408
	goto again;

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

	return err;
}

1409
/* wrappers around set/clear extent bit */
1410
int set_record_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1411
			   unsigned bits, struct extent_changeset *changeset)
1412 1413 1414 1415 1416 1417 1418 1419 1420
{
	/*
	 * 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);

1421
	return __set_extent_bit(tree, start, end, bits, 0, NULL, NULL, GFP_NOFS,
1422 1423 1424
				changeset);
}

1425 1426 1427 1428 1429 1430 1431
int set_extent_bits_nowait(struct extent_io_tree *tree, u64 start, u64 end,
			   unsigned bits)
{
	return __set_extent_bit(tree, start, end, bits, 0, NULL, NULL,
				GFP_NOWAIT, NULL);
}

1432 1433
int clear_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
		     unsigned bits, int wake, int delete,
1434
		     struct extent_state **cached)
1435 1436
{
	return __clear_extent_bit(tree, start, end, bits, wake, delete,
1437
				  cached, GFP_NOFS, NULL);
1438 1439 1440
}

int clear_record_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1441
		unsigned bits, struct extent_changeset *changeset)
1442 1443 1444 1445 1446 1447 1448
{
	/*
	 * Don't support EXTENT_LOCKED case, same reason as
	 * set_record_extent_bits().
	 */
	BUG_ON(bits & EXTENT_LOCKED);

1449
	return __clear_extent_bit(tree, start, end, bits, 0, 0, NULL, GFP_NOFS,
1450 1451 1452
				  changeset);
}

C
Chris Mason 已提交
1453 1454 1455 1456
/*
 * either insert or lock state struct between start and end use mask to tell
 * us if waiting is desired.
 */
1457
int lock_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1458
		     struct extent_state **cached_state)
1459 1460 1461
{
	int err;
	u64 failed_start;
1462

1463
	while (1) {
1464
		err = __set_extent_bit(tree, start, end, EXTENT_LOCKED,
J
Jeff Mahoney 已提交
1465
				       EXTENT_LOCKED, &failed_start,
1466
				       cached_state, GFP_NOFS, NULL);
1467
		if (err == -EEXIST) {
1468 1469
			wait_extent_bit(tree, failed_start, end, EXTENT_LOCKED);
			start = failed_start;
1470
		} else
1471 1472 1473 1474 1475 1476
			break;
		WARN_ON(start > end);
	}
	return err;
}

1477
int try_lock_extent(struct extent_io_tree *tree, u64 start, u64 end)
1478 1479 1480 1481
{
	int err;
	u64 failed_start;

J
Jeff Mahoney 已提交
1482
	err = __set_extent_bit(tree, start, end, EXTENT_LOCKED, EXTENT_LOCKED,
1483
			       &failed_start, NULL, GFP_NOFS, NULL);
Y
Yan Zheng 已提交
1484 1485 1486
	if (err == -EEXIST) {
		if (failed_start > start)
			clear_extent_bit(tree, start, failed_start - 1,
1487
					 EXTENT_LOCKED, 1, 0, NULL);
1488
		return 0;
Y
Yan Zheng 已提交
1489
	}
1490 1491 1492
	return 1;
}

1493
void extent_range_clear_dirty_for_io(struct inode *inode, u64 start, u64 end)
1494
{
1495 1496
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
1497 1498 1499 1500 1501 1502
	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);
1503
		put_page(page);
1504 1505 1506 1507
		index++;
	}
}

1508
void extent_range_redirty_for_io(struct inode *inode, u64 start, u64 end)
1509
{
1510 1511
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
1512 1513 1514 1515 1516 1517
	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);
1518
		account_page_redirty(page);
1519
		put_page(page);
1520 1521 1522 1523
		index++;
	}
}

C
Chris Mason 已提交
1524 1525 1526 1527
/* 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'
 */
1528 1529
static struct extent_state *
find_first_extent_bit_state(struct extent_io_tree *tree,
1530
			    u64 start, unsigned bits)
C
Chris Mason 已提交
1531 1532 1533 1534 1535 1536 1537 1538 1539
{
	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 已提交
1540
	if (!node)
C
Chris Mason 已提交
1541 1542
		goto out;

C
Chris Mason 已提交
1543
	while (1) {
C
Chris Mason 已提交
1544
		state = rb_entry(node, struct extent_state, rb_node);
C
Chris Mason 已提交
1545
		if (state->end >= start && (state->state & bits))
C
Chris Mason 已提交
1546
			return state;
C
Chris Mason 已提交
1547

C
Chris Mason 已提交
1548 1549 1550 1551 1552 1553 1554 1555
		node = rb_next(node);
		if (!node)
			break;
	}
out:
	return NULL;
}

1556 1557 1558 1559 1560
/*
 * 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.
 *
1561
 * If nothing was found, 1 is returned. If found something, return 0.
1562 1563
 */
int find_first_extent_bit(struct extent_io_tree *tree, u64 start,
1564
			  u64 *start_ret, u64 *end_ret, unsigned bits,
1565
			  struct extent_state **cached_state)
1566 1567 1568 1569 1570
{
	struct extent_state *state;
	int ret = 1;

	spin_lock(&tree->lock);
1571 1572
	if (cached_state && *cached_state) {
		state = *cached_state;
1573
		if (state->end == start - 1 && extent_state_in_tree(state)) {
1574
			while ((state = next_state(state)) != NULL) {
1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585
				if (state->state & bits)
					goto got_it;
			}
			free_extent_state(*cached_state);
			*cached_state = NULL;
			goto out;
		}
		free_extent_state(*cached_state);
		*cached_state = NULL;
	}

1586
	state = find_first_extent_bit_state(tree, start, bits);
1587
got_it:
1588
	if (state) {
1589
		cache_state_if_flags(state, cached_state, 0);
1590 1591 1592 1593
		*start_ret = state->start;
		*end_ret = state->end;
		ret = 0;
	}
1594
out:
1595 1596 1597 1598
	spin_unlock(&tree->lock);
	return ret;
}

1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635
/**
 * find_contiguous_extent_bit: find a contiguous area of bits
 * @tree - io tree to check
 * @start - offset to start the search from
 * @start_ret - the first offset we found with the bits set
 * @end_ret - the final contiguous range of the bits that were set
 * @bits - bits to look for
 *
 * set_extent_bit and clear_extent_bit can temporarily split contiguous ranges
 * to set bits appropriately, and then merge them again.  During this time it
 * will drop the tree->lock, so use this helper if you want to find the actual
 * contiguous area for given bits.  We will search to the first bit we find, and
 * then walk down the tree until we find a non-contiguous area.  The area
 * returned will be the full contiguous area with the bits set.
 */
int find_contiguous_extent_bit(struct extent_io_tree *tree, u64 start,
			       u64 *start_ret, u64 *end_ret, unsigned bits)
{
	struct extent_state *state;
	int ret = 1;

	spin_lock(&tree->lock);
	state = find_first_extent_bit_state(tree, start, bits);
	if (state) {
		*start_ret = state->start;
		*end_ret = state->end;
		while ((state = next_state(state)) != NULL) {
			if (state->start > (*end_ret + 1))
				break;
			*end_ret = state->end;
		}
		ret = 0;
	}
	spin_unlock(&tree->lock);
	return ret;
}

1636
/**
1637 1638
 * find_first_clear_extent_bit - find the first range that has @bits not set.
 * This range could start before @start.
1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661
 *
 * @tree - the tree to search
 * @start - the offset at/after which the found extent should start
 * @start_ret - records the beginning of the range
 * @end_ret - records the end of the range (inclusive)
 * @bits - the set of bits which must be unset
 *
 * Since unallocated range is also considered one which doesn't have the bits
 * set it's possible that @end_ret contains -1, this happens in case the range
 * spans (last_range_end, end of device]. In this case it's up to the caller to
 * trim @end_ret to the appropriate size.
 */
void find_first_clear_extent_bit(struct extent_io_tree *tree, u64 start,
				 u64 *start_ret, u64 *end_ret, unsigned bits)
{
	struct extent_state *state;
	struct rb_node *node, *prev = NULL, *next;

	spin_lock(&tree->lock);

	/* Find first extent with bits cleared */
	while (1) {
		node = __etree_search(tree, start, &next, &prev, NULL, NULL);
1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679
		if (!node && !next && !prev) {
			/*
			 * Tree is completely empty, send full range and let
			 * caller deal with it
			 */
			*start_ret = 0;
			*end_ret = -1;
			goto out;
		} else if (!node && !next) {
			/*
			 * We are past the last allocated chunk, set start at
			 * the end of the last extent.
			 */
			state = rb_entry(prev, struct extent_state, rb_node);
			*start_ret = state->end + 1;
			*end_ret = -1;
			goto out;
		} else if (!node) {
1680 1681
			node = next;
		}
1682 1683 1684 1685
		/*
		 * At this point 'node' either contains 'start' or start is
		 * before 'node'
		 */
1686
		state = rb_entry(node, struct extent_state, rb_node);
1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708

		if (in_range(start, state->start, state->end - state->start + 1)) {
			if (state->state & bits) {
				/*
				 * |--range with bits sets--|
				 *    |
				 *    start
				 */
				start = state->end + 1;
			} else {
				/*
				 * 'start' falls within a range that doesn't
				 * have the bits set, so take its start as
				 * the beginning of the desired range
				 *
				 * |--range with bits cleared----|
				 *      |
				 *      start
				 */
				*start_ret = state->start;
				break;
			}
1709
		} else {
1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727
			/*
			 * |---prev range---|---hole/unset---|---node range---|
			 *                          |
			 *                        start
			 *
			 *                        or
			 *
			 * |---hole/unset--||--first node--|
			 * 0   |
			 *    start
			 */
			if (prev) {
				state = rb_entry(prev, struct extent_state,
						 rb_node);
				*start_ret = state->end + 1;
			} else {
				*start_ret = 0;
			}
1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752
			break;
		}
	}

	/*
	 * Find the longest stretch from start until an entry which has the
	 * bits set
	 */
	while (1) {
		state = rb_entry(node, struct extent_state, rb_node);
		if (state->end >= start && !(state->state & bits)) {
			*end_ret = state->end;
		} else {
			*end_ret = state->start - 1;
			break;
		}

		node = rb_next(node);
		if (!node)
			break;
	}
out:
	spin_unlock(&tree->lock);
}

C
Chris Mason 已提交
1753 1754 1755 1756
/*
 * 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,
 *
1757
 * true is returned if we find something, false if nothing was in the tree
C
Chris Mason 已提交
1758
 */
J
Josef Bacik 已提交
1759 1760 1761
bool btrfs_find_delalloc_range(struct extent_io_tree *tree, u64 *start,
			       u64 *end, u64 max_bytes,
			       struct extent_state **cached_state)
1762 1763 1764 1765
{
	struct rb_node *node;
	struct extent_state *state;
	u64 cur_start = *start;
1766
	bool found = false;
1767 1768
	u64 total_bytes = 0;

1769
	spin_lock(&tree->lock);
C
Chris Mason 已提交
1770

1771 1772 1773 1774
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1775
	node = tree_search(tree, cur_start);
1776
	if (!node) {
1777
		*end = (u64)-1;
1778 1779 1780
		goto out;
	}

C
Chris Mason 已提交
1781
	while (1) {
1782
		state = rb_entry(node, struct extent_state, rb_node);
1783 1784
		if (found && (state->start != cur_start ||
			      (state->state & EXTENT_BOUNDARY))) {
1785 1786 1787 1788 1789 1790 1791
			goto out;
		}
		if (!(state->state & EXTENT_DELALLOC)) {
			if (!found)
				*end = state->end;
			goto out;
		}
1792
		if (!found) {
1793
			*start = state->start;
1794
			*cached_state = state;
1795
			refcount_inc(&state->refs);
1796
		}
1797
		found = true;
1798 1799 1800 1801
		*end = state->end;
		cur_start = state->end + 1;
		node = rb_next(node);
		total_bytes += state->end - state->start + 1;
1802
		if (total_bytes >= max_bytes)
1803 1804
			break;
		if (!node)
1805 1806 1807
			break;
	}
out:
1808
	spin_unlock(&tree->lock);
1809 1810 1811
	return found;
}

1812 1813 1814 1815 1816
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);

1817 1818 1819
static noinline void __unlock_for_delalloc(struct inode *inode,
					   struct page *locked_page,
					   u64 start, u64 end)
C
Chris Mason 已提交
1820
{
1821 1822
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
C
Chris Mason 已提交
1823

1824
	ASSERT(locked_page);
C
Chris Mason 已提交
1825
	if (index == locked_page->index && end_index == index)
1826
		return;
C
Chris Mason 已提交
1827

1828 1829
	__process_pages_contig(inode->i_mapping, locked_page, index, end_index,
			       PAGE_UNLOCK, NULL);
C
Chris Mason 已提交
1830 1831 1832 1833 1834 1835 1836
}

static noinline int lock_delalloc_pages(struct inode *inode,
					struct page *locked_page,
					u64 delalloc_start,
					u64 delalloc_end)
{
1837
	unsigned long index = delalloc_start >> PAGE_SHIFT;
1838
	unsigned long index_ret = index;
1839
	unsigned long end_index = delalloc_end >> PAGE_SHIFT;
C
Chris Mason 已提交
1840 1841
	int ret;

1842
	ASSERT(locked_page);
C
Chris Mason 已提交
1843 1844 1845
	if (index == locked_page->index && index == end_index)
		return 0;

1846 1847 1848 1849 1850
	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 已提交
1851 1852 1853 1854
	return ret;
}

/*
1855 1856
 * Find and lock a contiguous range of bytes in the file marked as delalloc, no
 * more than @max_bytes.  @Start and @end are used to return the range,
C
Chris Mason 已提交
1857
 *
1858 1859
 * Return: true if we find something
 *         false if nothing was in the tree
C
Chris Mason 已提交
1860
 */
1861
EXPORT_FOR_TESTS
1862
noinline_for_stack bool find_lock_delalloc_range(struct inode *inode,
1863
				    struct page *locked_page, u64 *start,
1864
				    u64 *end)
C
Chris Mason 已提交
1865
{
1866
	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
1867
	u64 max_bytes = BTRFS_MAX_EXTENT_SIZE;
C
Chris Mason 已提交
1868 1869
	u64 delalloc_start;
	u64 delalloc_end;
1870
	bool found;
1871
	struct extent_state *cached_state = NULL;
C
Chris Mason 已提交
1872 1873 1874 1875 1876 1877 1878
	int ret;
	int loops = 0;

again:
	/* step one, find a bunch of delalloc bytes starting at start */
	delalloc_start = *start;
	delalloc_end = 0;
J
Josef Bacik 已提交
1879 1880
	found = btrfs_find_delalloc_range(tree, &delalloc_start, &delalloc_end,
					  max_bytes, &cached_state);
C
Chris Mason 已提交
1881
	if (!found || delalloc_end <= *start) {
C
Chris Mason 已提交
1882 1883
		*start = delalloc_start;
		*end = delalloc_end;
1884
		free_extent_state(cached_state);
1885
		return false;
C
Chris Mason 已提交
1886 1887
	}

C
Chris Mason 已提交
1888 1889 1890 1891 1892
	/*
	 * 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 已提交
1893
	if (delalloc_start < *start)
C
Chris Mason 已提交
1894 1895
		delalloc_start = *start;

C
Chris Mason 已提交
1896 1897 1898
	/*
	 * make sure to limit the number of pages we try to lock down
	 */
1899 1900
	if (delalloc_end + 1 - delalloc_start > max_bytes)
		delalloc_end = delalloc_start + max_bytes - 1;
C
Chris Mason 已提交
1901

C
Chris Mason 已提交
1902 1903 1904
	/* step two, lock all the pages after the page that has start */
	ret = lock_delalloc_pages(inode, locked_page,
				  delalloc_start, delalloc_end);
1905
	ASSERT(!ret || ret == -EAGAIN);
C
Chris Mason 已提交
1906 1907 1908 1909
	if (ret == -EAGAIN) {
		/* some of the pages are gone, lets avoid looping by
		 * shortening the size of the delalloc range we're searching
		 */
1910
		free_extent_state(cached_state);
1911
		cached_state = NULL;
C
Chris Mason 已提交
1912
		if (!loops) {
1913
			max_bytes = PAGE_SIZE;
C
Chris Mason 已提交
1914 1915 1916
			loops = 1;
			goto again;
		} else {
1917
			found = false;
C
Chris Mason 已提交
1918 1919 1920 1921 1922
			goto out_failed;
		}
	}

	/* step three, lock the state bits for the whole range */
1923
	lock_extent_bits(tree, delalloc_start, delalloc_end, &cached_state);
C
Chris Mason 已提交
1924 1925 1926

	/* then test to make sure it is all still delalloc */
	ret = test_range_bit(tree, delalloc_start, delalloc_end,
1927
			     EXTENT_DELALLOC, 1, cached_state);
C
Chris Mason 已提交
1928
	if (!ret) {
1929
		unlock_extent_cached(tree, delalloc_start, delalloc_end,
1930
				     &cached_state);
C
Chris Mason 已提交
1931 1932 1933 1934 1935
		__unlock_for_delalloc(inode, locked_page,
			      delalloc_start, delalloc_end);
		cond_resched();
		goto again;
	}
1936
	free_extent_state(cached_state);
C
Chris Mason 已提交
1937 1938 1939 1940 1941 1942
	*start = delalloc_start;
	*end = delalloc_end;
out_failed:
	return found;
}

1943 1944 1945 1946
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 已提交
1947
{
1948
	unsigned long nr_pages = end_index - start_index + 1;
1949
	unsigned long pages_locked = 0;
1950
	pgoff_t index = start_index;
C
Chris Mason 已提交
1951
	struct page *pages[16];
1952
	unsigned ret;
1953
	int err = 0;
C
Chris Mason 已提交
1954
	int i;
1955

1956 1957 1958 1959 1960
	if (page_ops & PAGE_LOCK) {
		ASSERT(page_ops == PAGE_LOCK);
		ASSERT(index_ret && *index_ret == start_index);
	}

1961
	if ((page_ops & PAGE_SET_ERROR) && nr_pages > 0)
1962
		mapping_set_error(mapping, -EIO);
1963

C
Chris Mason 已提交
1964
	while (nr_pages > 0) {
1965
		ret = find_get_pages_contig(mapping, index,
1966 1967
				     min_t(unsigned long,
				     nr_pages, ARRAY_SIZE(pages)), pages);
1968 1969 1970 1971 1972 1973
		if (ret == 0) {
			/*
			 * Only if we're going to lock these pages,
			 * can we find nothing at @index.
			 */
			ASSERT(page_ops & PAGE_LOCK);
1974 1975
			err = -EAGAIN;
			goto out;
1976
		}
1977

1978
		for (i = 0; i < ret; i++) {
1979
			if (page_ops & PAGE_SET_PRIVATE2)
1980 1981
				SetPagePrivate2(pages[i]);

1982
			if (locked_page && pages[i] == locked_page) {
1983
				put_page(pages[i]);
1984
				pages_locked++;
C
Chris Mason 已提交
1985 1986
				continue;
			}
1987
			if (page_ops & PAGE_CLEAR_DIRTY)
C
Chris Mason 已提交
1988
				clear_page_dirty_for_io(pages[i]);
1989
			if (page_ops & PAGE_SET_WRITEBACK)
C
Chris Mason 已提交
1990
				set_page_writeback(pages[i]);
1991 1992
			if (page_ops & PAGE_SET_ERROR)
				SetPageError(pages[i]);
1993
			if (page_ops & PAGE_END_WRITEBACK)
C
Chris Mason 已提交
1994
				end_page_writeback(pages[i]);
1995
			if (page_ops & PAGE_UNLOCK)
1996
				unlock_page(pages[i]);
1997 1998 1999 2000 2001
			if (page_ops & PAGE_LOCK) {
				lock_page(pages[i]);
				if (!PageDirty(pages[i]) ||
				    pages[i]->mapping != mapping) {
					unlock_page(pages[i]);
2002 2003
					for (; i < ret; i++)
						put_page(pages[i]);
2004 2005 2006 2007
					err = -EAGAIN;
					goto out;
				}
			}
2008
			put_page(pages[i]);
2009
			pages_locked++;
C
Chris Mason 已提交
2010 2011 2012 2013 2014
		}
		nr_pages -= ret;
		index += ret;
		cond_resched();
	}
2015 2016 2017 2018
out:
	if (err && index_ret)
		*index_ret = start_index + pages_locked - 1;
	return err;
C
Chris Mason 已提交
2019 2020
}

2021
void extent_clear_unlock_delalloc(struct btrfs_inode *inode, u64 start, u64 end,
2022 2023 2024
				  struct page *locked_page,
				  unsigned clear_bits,
				  unsigned long page_ops)
2025
{
2026
	clear_extent_bit(&inode->io_tree, start, end, clear_bits, 1, 0, NULL);
2027

2028
	__process_pages_contig(inode->vfs_inode.i_mapping, locked_page,
2029
			       start >> PAGE_SHIFT, end >> PAGE_SHIFT,
2030
			       page_ops, NULL);
2031 2032
}

C
Chris Mason 已提交
2033 2034 2035 2036 2037
/*
 * 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.
 */
2038 2039
u64 count_range_bits(struct extent_io_tree *tree,
		     u64 *start, u64 search_end, u64 max_bytes,
2040
		     unsigned bits, int contig)
2041 2042 2043 2044 2045
{
	struct rb_node *node;
	struct extent_state *state;
	u64 cur_start = *start;
	u64 total_bytes = 0;
2046
	u64 last = 0;
2047 2048
	int found = 0;

2049
	if (WARN_ON(search_end <= cur_start))
2050 2051
		return 0;

2052
	spin_lock(&tree->lock);
2053 2054 2055 2056 2057 2058 2059 2060
	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.
	 */
2061
	node = tree_search(tree, cur_start);
C
Chris Mason 已提交
2062
	if (!node)
2063 2064
		goto out;

C
Chris Mason 已提交
2065
	while (1) {
2066 2067 2068
		state = rb_entry(node, struct extent_state, rb_node);
		if (state->start > search_end)
			break;
2069 2070 2071
		if (contig && found && state->start > last + 1)
			break;
		if (state->end >= cur_start && (state->state & bits) == bits) {
2072 2073 2074 2075 2076
			total_bytes += min(search_end, state->end) + 1 -
				       max(cur_start, state->start);
			if (total_bytes >= max_bytes)
				break;
			if (!found) {
2077
				*start = max(cur_start, state->start);
2078 2079
				found = 1;
			}
2080 2081 2082
			last = state->end;
		} else if (contig && found) {
			break;
2083 2084 2085 2086 2087 2088
		}
		node = rb_next(node);
		if (!node)
			break;
	}
out:
2089
	spin_unlock(&tree->lock);
2090 2091
	return total_bytes;
}
2092

C
Chris Mason 已提交
2093 2094 2095 2096
/*
 * set the private field for a given byte offset in the tree.  If there isn't
 * an extent_state there already, this does nothing.
 */
2097 2098
int set_state_failrec(struct extent_io_tree *tree, u64 start,
		      struct io_failure_record *failrec)
2099 2100 2101 2102 2103
{
	struct rb_node *node;
	struct extent_state *state;
	int ret = 0;

2104
	spin_lock(&tree->lock);
2105 2106 2107 2108
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
2109
	node = tree_search(tree, start);
2110
	if (!node) {
2111 2112 2113 2114 2115 2116 2117 2118
		ret = -ENOENT;
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
	if (state->start != start) {
		ret = -ENOENT;
		goto out;
	}
2119
	state->failrec = failrec;
2120
out:
2121
	spin_unlock(&tree->lock);
2122 2123 2124
	return ret;
}

2125
struct io_failure_record *get_state_failrec(struct extent_io_tree *tree, u64 start)
2126 2127 2128
{
	struct rb_node *node;
	struct extent_state *state;
2129
	struct io_failure_record *failrec;
2130

2131
	spin_lock(&tree->lock);
2132 2133 2134 2135
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
2136
	node = tree_search(tree, start);
2137
	if (!node) {
2138
		failrec = ERR_PTR(-ENOENT);
2139 2140 2141 2142
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
	if (state->start != start) {
2143
		failrec = ERR_PTR(-ENOENT);
2144 2145
		goto out;
	}
2146 2147

	failrec = state->failrec;
2148
out:
2149
	spin_unlock(&tree->lock);
2150
	return failrec;
2151 2152 2153 2154
}

/*
 * searches a range in the state tree for a given mask.
2155
 * If 'filled' == 1, this returns 1 only if every extent in the tree
2156 2157 2158 2159
 * 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,
2160
		   unsigned bits, int filled, struct extent_state *cached)
2161 2162 2163 2164 2165
{
	struct extent_state *state = NULL;
	struct rb_node *node;
	int bitset = 0;

2166
	spin_lock(&tree->lock);
2167
	if (cached && extent_state_in_tree(cached) && cached->start <= start &&
2168
	    cached->end > start)
2169 2170 2171
		node = &cached->rb_node;
	else
		node = tree_search(tree, start);
2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190
	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;
		}
2191 2192 2193 2194

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

2195 2196 2197 2198 2199 2200 2201 2202 2203 2204
		start = state->end + 1;
		if (start > end)
			break;
		node = rb_next(node);
		if (!node) {
			if (filled)
				bitset = 0;
			break;
		}
	}
2205
	spin_unlock(&tree->lock);
2206 2207 2208 2209 2210 2211 2212
	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
 */
2213
static void check_page_uptodate(struct extent_io_tree *tree, struct page *page)
2214
{
M
Miao Xie 已提交
2215
	u64 start = page_offset(page);
2216
	u64 end = start + PAGE_SIZE - 1;
2217
	if (test_range_bit(tree, start, end, EXTENT_UPTODATE, 1, NULL))
2218 2219 2220
		SetPageUptodate(page);
}

2221 2222 2223
int free_io_failure(struct extent_io_tree *failure_tree,
		    struct extent_io_tree *io_tree,
		    struct io_failure_record *rec)
2224 2225 2226 2227
{
	int ret;
	int err = 0;

2228
	set_state_failrec(failure_tree, rec->start, NULL);
2229 2230
	ret = clear_extent_bits(failure_tree, rec->start,
				rec->start + rec->len - 1,
2231
				EXTENT_LOCKED | EXTENT_DIRTY);
2232 2233 2234
	if (ret)
		err = ret;

2235
	ret = clear_extent_bits(io_tree, rec->start,
D
David Woodhouse 已提交
2236
				rec->start + rec->len - 1,
2237
				EXTENT_DAMAGED);
D
David Woodhouse 已提交
2238 2239
	if (ret && !err)
		err = ret;
2240 2241 2242 2243 2244 2245 2246 2247 2248 2249

	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.
2250
 * to avoid any synchronization issues, wait for the data after writing, which
2251 2252 2253 2254
 * 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.
 */
2255 2256 2257
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)
2258 2259 2260 2261 2262 2263 2264 2265
{
	struct bio *bio;
	struct btrfs_device *dev;
	u64 map_length = 0;
	u64 sector;
	struct btrfs_bio *bbio = NULL;
	int ret;

2266
	ASSERT(!(fs_info->sb->s_flags & SB_RDONLY));
2267 2268
	BUG_ON(!mirror_num);

2269
	bio = btrfs_io_bio_alloc(1);
2270
	bio->bi_iter.bi_size = 0;
2271 2272
	map_length = length;

2273 2274 2275 2276 2277 2278
	/*
	 * 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);
2279
	if (btrfs_is_parity_mirror(fs_info, logical, length)) {
2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302
		/*
		 * 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);
2303
	}
2304 2305

	sector = bbio->stripes[bbio->mirror_num - 1].physical >> 9;
2306
	bio->bi_iter.bi_sector = sector;
2307
	dev = bbio->stripes[bbio->mirror_num - 1].dev;
2308
	btrfs_put_bbio(bbio);
2309 2310
	if (!dev || !dev->bdev ||
	    !test_bit(BTRFS_DEV_STATE_WRITEABLE, &dev->dev_state)) {
2311
		btrfs_bio_counter_dec(fs_info);
2312 2313 2314
		bio_put(bio);
		return -EIO;
	}
2315
	bio_set_dev(bio, dev->bdev);
2316
	bio->bi_opf = REQ_OP_WRITE | REQ_SYNC;
2317
	bio_add_page(bio, page, length, pg_offset);
2318

2319
	if (btrfsic_submit_bio_wait(bio)) {
2320
		/* try to remap that extent elsewhere? */
2321
		btrfs_bio_counter_dec(fs_info);
2322
		bio_put(bio);
2323
		btrfs_dev_stat_inc_and_print(dev, BTRFS_DEV_STAT_WRITE_ERRS);
2324 2325 2326
		return -EIO;
	}

2327 2328
	btrfs_info_rl_in_rcu(fs_info,
		"read error corrected: ino %llu off %llu (dev %s sector %llu)",
2329
				  ino, start,
2330
				  rcu_str_deref(dev->name), sector);
2331
	btrfs_bio_counter_dec(fs_info);
2332 2333 2334 2335
	bio_put(bio);
	return 0;
}

2336
int btrfs_repair_eb_io_failure(const struct extent_buffer *eb, int mirror_num)
2337
{
2338
	struct btrfs_fs_info *fs_info = eb->fs_info;
2339
	u64 start = eb->start;
2340
	int i, num_pages = num_extent_pages(eb);
2341
	int ret = 0;
2342

2343
	if (sb_rdonly(fs_info->sb))
2344 2345
		return -EROFS;

2346
	for (i = 0; i < num_pages; i++) {
2347
		struct page *p = eb->pages[i];
2348

2349
		ret = repair_io_failure(fs_info, 0, start, PAGE_SIZE, start, p,
2350
					start - page_offset(p), mirror_num);
2351 2352
		if (ret)
			break;
2353
		start += PAGE_SIZE;
2354 2355 2356 2357 2358
	}

	return ret;
}

2359 2360 2361 2362
/*
 * 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
 */
2363 2364 2365 2366
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)
2367 2368 2369 2370 2371 2372 2373 2374
{
	u64 private;
	struct io_failure_record *failrec;
	struct extent_state *state;
	int num_copies;
	int ret;

	private = 0;
2375 2376
	ret = count_range_bits(failure_tree, &private, (u64)-1, 1,
			       EXTENT_DIRTY, 0);
2377 2378 2379
	if (!ret)
		return 0;

2380 2381
	failrec = get_state_failrec(failure_tree, start);
	if (IS_ERR(failrec))
2382 2383 2384 2385 2386 2387
		return 0;

	BUG_ON(!failrec->this_mirror);

	if (failrec->in_validation) {
		/* there was no real error, just free the record */
2388 2389 2390
		btrfs_debug(fs_info,
			"clean_io_failure: freeing dummy error at %llu",
			failrec->start);
2391 2392
		goto out;
	}
2393
	if (sb_rdonly(fs_info->sb))
2394
		goto out;
2395

2396 2397
	spin_lock(&io_tree->lock);
	state = find_first_extent_bit_state(io_tree,
2398 2399
					    failrec->start,
					    EXTENT_LOCKED);
2400
	spin_unlock(&io_tree->lock);
2401

2402 2403
	if (state && state->start <= failrec->start &&
	    state->end >= failrec->start + failrec->len - 1) {
2404 2405
		num_copies = btrfs_num_copies(fs_info, failrec->logical,
					      failrec->len);
2406
		if (num_copies > 1)  {
2407 2408 2409
			repair_io_failure(fs_info, ino, start, failrec->len,
					  failrec->logical, page, pg_offset,
					  failrec->failed_mirror);
2410 2411 2412 2413
		}
	}

out:
2414
	free_io_failure(failure_tree, io_tree, failrec);
2415

2416
	return 0;
2417 2418
}

2419 2420 2421 2422 2423 2424
/*
 * Can be called when
 * - hold extent lock
 * - under ordered extent
 * - the inode is freeing
 */
2425
void btrfs_free_io_failure_record(struct btrfs_inode *inode, u64 start, u64 end)
2426
{
2427
	struct extent_io_tree *failure_tree = &inode->io_failure_tree;
2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443
	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);

2444
		failrec = state->failrec;
2445 2446 2447 2448 2449 2450 2451 2452
		free_extent_state(state);
		kfree(failrec);

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

2453 2454
static struct io_failure_record *btrfs_get_io_failure_record(struct inode *inode,
							     u64 start, u64 end)
2455
{
2456
	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2457
	struct io_failure_record *failrec;
2458 2459 2460 2461 2462 2463 2464
	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;

2465
	failrec = get_state_failrec(failure_tree, start);
2466
	if (!IS_ERR(failrec)) {
2467 2468 2469 2470
		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);
2471 2472 2473 2474 2475
		/*
		 * 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.
		 */
2476 2477

		return failrec;
2478
	}
2479

2480 2481 2482
	failrec = kzalloc(sizeof(*failrec), GFP_NOFS);
	if (!failrec)
		return ERR_PTR(-ENOMEM);
2483

2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497 2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535
	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 ERR_PTR(-EIO);
	}

	if (em->start > start || em->start + em->len <= start) {
		free_extent_map(em);
		em = NULL;
	}
	read_unlock(&em_tree->lock);
	if (!em) {
		kfree(failrec);
		return ERR_PTR(-EIO);
	}

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

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

	failrec->logical = logical;
	free_extent_map(em);

	/* Set the bits in the private failure tree */
	ret = set_extent_bits(failure_tree, start, end,
			      EXTENT_LOCKED | EXTENT_DIRTY);
	if (ret >= 0) {
		ret = set_state_failrec(failure_tree, start, failrec);
		/* Set the bits in the inode's tree */
		ret = set_extent_bits(tree, start, end, EXTENT_DAMAGED);
	} else if (ret < 0) {
		kfree(failrec);
		return ERR_PTR(ret);
	}

	return failrec;
2536 2537
}

2538 2539 2540
static bool btrfs_check_repairable(struct inode *inode, bool needs_validation,
				   struct io_failure_record *failrec,
				   int failed_mirror)
2541
{
2542
	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2543 2544
	int num_copies;

2545
	num_copies = btrfs_num_copies(fs_info, failrec->logical, failrec->len);
2546 2547 2548 2549 2550 2551
	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.
		 */
2552 2553 2554
		btrfs_debug(fs_info,
			"Check Repairable: cannot repair, num_copies=%d, next_mirror %d, failed_mirror %d",
			num_copies, failrec->this_mirror, failed_mirror);
2555
		return false;
2556 2557 2558 2559 2560 2561 2562
	}

	/*
	 * there are two premises:
	 *	a) deliver good data to the caller
	 *	b) correct the bad sectors on disk
	 */
2563
	if (needs_validation) {
2564 2565 2566 2567 2568 2569 2570 2571 2572 2573 2574 2575 2576 2577 2578 2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591
		/*
		 * 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++;
	}

2592
	if (failrec->this_mirror > num_copies) {
2593 2594 2595
		btrfs_debug(fs_info,
			"Check Repairable: (fail) num_copies=%d, next_mirror %d, failed_mirror %d",
			num_copies, failrec->this_mirror, failed_mirror);
2596
		return false;
2597 2598
	}

2599
	return true;
2600 2601
}

2602
static bool btrfs_io_needs_validation(struct inode *inode, struct bio *bio)
2603
{
2604
	u64 len = 0;
2605
	const u32 blocksize = inode->i_sb->s_blocksize;
2606

2607 2608 2609 2610 2611 2612 2613
	/*
	 * If bi_status is BLK_STS_OK, then this was a checksum error, not an
	 * I/O error. In this case, we already know exactly which sector was
	 * bad, so we don't need to validate.
	 */
	if (bio->bi_status == BLK_STS_OK)
		return false;
2614

2615 2616 2617
	/*
	 * We need to validate each sector individually if the failed I/O was
	 * for multiple sectors.
2618 2619 2620 2621 2622 2623 2624 2625 2626
	 *
	 * There are a few possible bios that can end up here:
	 * 1. A buffered read bio, which is not cloned.
	 * 2. A direct I/O read bio, which is cloned.
	 * 3. A (buffered or direct) repair bio, which is not cloned.
	 *
	 * For cloned bios (case 2), we can get the size from
	 * btrfs_io_bio->iter; for non-cloned bios (cases 1 and 3), we can get
	 * it from the bvecs.
2627
	 */
2628 2629
	if (bio_flagged(bio, BIO_CLONED)) {
		if (btrfs_io_bio(bio)->iter.bi_size > blocksize)
2630
			return true;
2631 2632 2633
	} else {
		struct bio_vec *bvec;
		int i;
2634

2635 2636 2637 2638 2639
		bio_for_each_bvec_all(bvec, bio, i) {
			len += bvec->bv_len;
			if (len > blocksize)
				return true;
		}
2640
	}
2641
	return false;
2642 2643
}

2644 2645 2646 2647 2648
blk_status_t btrfs_submit_read_repair(struct inode *inode,
				      struct bio *failed_bio, u64 phy_offset,
				      struct page *page, unsigned int pgoff,
				      u64 start, u64 end, int failed_mirror,
				      submit_bio_hook_t *submit_bio_hook)
2649 2650
{
	struct io_failure_record *failrec;
2651
	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2652
	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
2653
	struct extent_io_tree *failure_tree = &BTRFS_I(inode)->io_failure_tree;
2654 2655
	struct btrfs_io_bio *failed_io_bio = btrfs_io_bio(failed_bio);
	const int icsum = phy_offset >> inode->i_sb->s_blocksize_bits;
2656
	bool need_validation;
2657 2658
	struct bio *repair_bio;
	struct btrfs_io_bio *repair_io_bio;
2659
	blk_status_t status;
2660

2661 2662
	btrfs_debug(fs_info,
		   "repair read error: read error at %llu", start);
2663

2664
	BUG_ON(bio_op(failed_bio) == REQ_OP_WRITE);
2665

2666 2667 2668
	failrec = btrfs_get_io_failure_record(inode, start, end);
	if (IS_ERR(failrec))
		return errno_to_blk_status(PTR_ERR(failrec));
2669

2670
	need_validation = btrfs_io_needs_validation(inode, failed_bio);
2671

2672
	if (!btrfs_check_repairable(inode, need_validation, failrec,
2673
				    failed_mirror)) {
2674
		free_io_failure(failure_tree, tree, failrec);
2675
		return BLK_STS_IOERR;
2676 2677
	}

2678 2679 2680
	repair_bio = btrfs_io_bio_alloc(1);
	repair_io_bio = btrfs_io_bio(repair_bio);
	repair_bio->bi_opf = REQ_OP_READ;
2681
	if (need_validation)
2682 2683 2684 2685
		repair_bio->bi_opf |= REQ_FAILFAST_DEV;
	repair_bio->bi_end_io = failed_bio->bi_end_io;
	repair_bio->bi_iter.bi_sector = failrec->logical >> 9;
	repair_bio->bi_private = failed_bio->bi_private;
2686

2687 2688 2689 2690 2691 2692 2693
	if (failed_io_bio->csum) {
		const u16 csum_size = btrfs_super_csum_size(fs_info->super_copy);

		repair_io_bio->csum = repair_io_bio->csum_inline;
		memcpy(repair_io_bio->csum,
		       failed_io_bio->csum + csum_size * icsum, csum_size);
	}
2694

2695 2696 2697
	bio_add_page(repair_bio, page, failrec->len, pgoff);
	repair_io_bio->logical = failrec->start;
	repair_io_bio->iter = repair_bio->bi_iter;
2698

2699
	btrfs_debug(btrfs_sb(inode->i_sb),
2700 2701
"repair read error: submitting new read to mirror %d, in_validation=%d",
		    failrec->this_mirror, failrec->in_validation);
2702

2703 2704
	status = submit_bio_hook(inode, repair_bio, failrec->this_mirror,
				 failrec->bio_flags);
2705
	if (status) {
2706
		free_io_failure(failure_tree, tree, failrec);
2707
		bio_put(repair_bio);
2708
	}
2709
	return status;
2710 2711
}

2712 2713
/* lots and lots of room for performance fixes in the end_bio funcs */

2714
void end_extent_writepage(struct page *page, int err, u64 start, u64 end)
2715 2716
{
	int uptodate = (err == 0);
2717
	int ret = 0;
2718

2719
	btrfs_writepage_endio_finish_ordered(page, start, end, uptodate);
2720 2721 2722 2723

	if (!uptodate) {
		ClearPageUptodate(page);
		SetPageError(page);
2724
		ret = err < 0 ? err : -EIO;
2725
		mapping_set_error(page->mapping, ret);
2726 2727 2728
	}
}

2729 2730 2731 2732 2733 2734 2735 2736 2737
/*
 * 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.
 */
2738
static void end_bio_extent_writepage(struct bio *bio)
2739
{
2740
	int error = blk_status_to_errno(bio->bi_status);
2741
	struct bio_vec *bvec;
2742 2743
	u64 start;
	u64 end;
2744
	struct bvec_iter_all iter_all;
2745

2746
	ASSERT(!bio_flagged(bio, BIO_CLONED));
2747
	bio_for_each_segment_all(bvec, bio, iter_all) {
2748
		struct page *page = bvec->bv_page;
2749 2750
		struct inode *inode = page->mapping->host;
		struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2751

2752 2753 2754 2755 2756
		/* 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.  */
2757 2758
		if (bvec->bv_offset || bvec->bv_len != PAGE_SIZE) {
			if (bvec->bv_offset + bvec->bv_len != PAGE_SIZE)
2759
				btrfs_err(fs_info,
2760 2761 2762
				   "partial page write in btrfs with offset %u and length %u",
					bvec->bv_offset, bvec->bv_len);
			else
2763
				btrfs_info(fs_info,
J
Jeff Mahoney 已提交
2764
				   "incomplete page write in btrfs with offset %u and length %u",
2765 2766
					bvec->bv_offset, bvec->bv_len);
		}
2767

2768 2769
		start = page_offset(page);
		end = start + bvec->bv_offset + bvec->bv_len - 1;
2770

2771
		end_extent_writepage(page, error, start, end);
2772
		end_page_writeback(page);
2773
	}
2774

2775 2776 2777
	bio_put(bio);
}

2778 2779 2780 2781 2782 2783 2784 2785 2786
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);
2787
	unlock_extent_cached_atomic(tree, start, end, &cached);
2788 2789
}

2790 2791 2792 2793 2794 2795 2796 2797 2798 2799 2800
/*
 * 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.
 */
2801
static void end_bio_extent_readpage(struct bio *bio)
2802
{
2803
	struct bio_vec *bvec;
2804
	int uptodate = !bio->bi_status;
2805
	struct btrfs_io_bio *io_bio = btrfs_io_bio(bio);
2806
	struct extent_io_tree *tree, *failure_tree;
2807
	u64 offset = 0;
2808 2809
	u64 start;
	u64 end;
2810
	u64 len;
2811 2812
	u64 extent_start = 0;
	u64 extent_len = 0;
2813
	int mirror;
2814
	int ret;
2815
	struct bvec_iter_all iter_all;
2816

2817
	ASSERT(!bio_flagged(bio, BIO_CLONED));
2818
	bio_for_each_segment_all(bvec, bio, iter_all) {
2819
		struct page *page = bvec->bv_page;
2820
		struct inode *inode = page->mapping->host;
2821
		struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2822 2823
		bool data_inode = btrfs_ino(BTRFS_I(inode))
			!= BTRFS_BTREE_INODE_OBJECTID;
2824

2825 2826
		btrfs_debug(fs_info,
			"end_bio_extent_readpage: bi_sector=%llu, err=%d, mirror=%u",
2827
			(u64)bio->bi_iter.bi_sector, bio->bi_status,
2828
			io_bio->mirror_num);
2829
		tree = &BTRFS_I(inode)->io_tree;
2830
		failure_tree = &BTRFS_I(inode)->io_failure_tree;
2831

2832 2833 2834 2835 2836
		/* 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.  */
2837 2838
		if (bvec->bv_offset || bvec->bv_len != PAGE_SIZE) {
			if (bvec->bv_offset + bvec->bv_len != PAGE_SIZE)
2839 2840
				btrfs_err(fs_info,
					"partial page read in btrfs with offset %u and length %u",
2841 2842
					bvec->bv_offset, bvec->bv_len);
			else
2843 2844
				btrfs_info(fs_info,
					"incomplete page read in btrfs with offset %u and length %u",
2845 2846
					bvec->bv_offset, bvec->bv_len);
		}
2847

2848 2849
		start = page_offset(page);
		end = start + bvec->bv_offset + bvec->bv_len - 1;
2850
		len = bvec->bv_len;
2851

2852
		mirror = io_bio->mirror_num;
2853
		if (likely(uptodate)) {
2854 2855 2856 2857 2858 2859
			if (data_inode)
				ret = btrfs_verify_data_csum(io_bio, offset, page,
							     start, end, mirror);
			else
				ret = btrfs_validate_metadata_buffer(io_bio,
					offset, page, start, end, mirror);
2860
			if (ret)
2861
				uptodate = 0;
2862
			else
2863 2864 2865 2866
				clean_io_failure(BTRFS_I(inode)->root->fs_info,
						 failure_tree, tree, start,
						 page,
						 btrfs_ino(BTRFS_I(inode)), 0);
2867
		}
2868

2869 2870 2871
		if (likely(uptodate))
			goto readpage_ok;

2872
		if (data_inode) {
L
Liu Bo 已提交
2873

2874
			/*
2875 2876 2877 2878 2879 2880 2881 2882
			 * 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.
2883
			 */
2884 2885 2886 2887
			if (!btrfs_submit_read_repair(inode, bio, offset, page,
						start - page_offset(page),
						start, end, mirror,
						tree->ops->submit_bio_hook)) {
2888 2889 2890 2891 2892 2893 2894 2895 2896 2897 2898 2899 2900 2901
				uptodate = !bio->bi_status;
				offset += len;
				continue;
			}
		} else {
			struct extent_buffer *eb;

			eb = (struct extent_buffer *)page->private;
			set_bit(EXTENT_BUFFER_READ_ERR, &eb->bflags);
			eb->read_mirror = mirror;
			atomic_dec(&eb->io_pages);
			if (test_and_clear_bit(EXTENT_BUFFER_READAHEAD,
					       &eb->bflags))
				btree_readahead_hook(eb, -EIO);
2902
		}
2903
readpage_ok:
2904
		if (likely(uptodate)) {
2905
			loff_t i_size = i_size_read(inode);
2906
			pgoff_t end_index = i_size >> PAGE_SHIFT;
2907
			unsigned off;
2908 2909

			/* Zero out the end if this page straddles i_size */
2910
			off = offset_in_page(i_size);
2911
			if (page->index == end_index && off)
2912
				zero_user_segment(page, off, PAGE_SIZE);
2913
			SetPageUptodate(page);
2914
		} else {
2915 2916
			ClearPageUptodate(page);
			SetPageError(page);
2917
		}
2918
		unlock_page(page);
2919
		offset += len;
2920 2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932 2933 2934 2935 2936 2937 2938 2939 2940 2941

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

2944 2945 2946
	if (extent_len)
		endio_readpage_release_extent(tree, extent_start, extent_len,
					      uptodate);
2947
	btrfs_io_bio_free_csum(io_bio);
2948 2949 2950
	bio_put(bio);
}

2951
/*
2952 2953 2954
 * 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.
2955
 */
2956
static inline void btrfs_io_bio_init(struct btrfs_io_bio *btrfs_bio)
2957
{
2958 2959
	memset(btrfs_bio, 0, offsetof(struct btrfs_io_bio, bio));
}
2960

2961
/*
2962 2963 2964
 * 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
2965
 */
2966
struct bio *btrfs_bio_alloc(u64 first_byte)
2967 2968 2969
{
	struct bio *bio;

2970
	bio = bio_alloc_bioset(GFP_NOFS, BIO_MAX_PAGES, &btrfs_bioset);
2971
	bio->bi_iter.bi_sector = first_byte >> 9;
2972
	btrfs_io_bio_init(btrfs_io_bio(bio));
2973 2974 2975
	return bio;
}

2976
struct bio *btrfs_bio_clone(struct bio *bio)
2977
{
2978 2979
	struct btrfs_io_bio *btrfs_bio;
	struct bio *new;
2980

2981
	/* Bio allocation backed by a bioset does not fail */
2982
	new = bio_clone_fast(bio, GFP_NOFS, &btrfs_bioset);
2983
	btrfs_bio = btrfs_io_bio(new);
2984
	btrfs_io_bio_init(btrfs_bio);
2985
	btrfs_bio->iter = bio->bi_iter;
2986 2987
	return new;
}
2988

2989
struct bio *btrfs_io_bio_alloc(unsigned int nr_iovecs)
2990
{
2991 2992
	struct bio *bio;

2993
	/* Bio allocation backed by a bioset does not fail */
2994
	bio = bio_alloc_bioset(GFP_NOFS, nr_iovecs, &btrfs_bioset);
2995
	btrfs_io_bio_init(btrfs_io_bio(bio));
2996
	return bio;
2997 2998
}

2999
struct bio *btrfs_bio_clone_partial(struct bio *orig, int offset, int size)
3000 3001 3002 3003 3004
{
	struct bio *bio;
	struct btrfs_io_bio *btrfs_bio;

	/* this will never fail when it's backed by a bioset */
3005
	bio = bio_clone_fast(orig, GFP_NOFS, &btrfs_bioset);
3006 3007 3008
	ASSERT(bio);

	btrfs_bio = btrfs_io_bio(bio);
3009
	btrfs_io_bio_init(btrfs_bio);
3010 3011

	bio_trim(bio, offset >> 9, size >> 9);
3012
	btrfs_bio->iter = bio->bi_iter;
3013 3014
	return bio;
}
3015

3016 3017
/*
 * @opf:	bio REQ_OP_* and REQ_* flags as one value
3018 3019 3020 3021 3022 3023
 * @wbc:	optional writeback control for io accounting
 * @page:	page to add to the bio
 * @pg_offset:	offset of the new bio or to check whether we are adding
 *              a contiguous page to the previous one
 * @size:	portion of page that we want to write
 * @offset:	starting offset in the page
3024
 * @bio_ret:	must be valid pointer, newly allocated bio will be stored there
3025 3026 3027 3028
 * @end_io_func:     end_io callback for new bio
 * @mirror_num:	     desired mirror to read/write
 * @prev_bio_flags:  flags of previous bio to see if we can merge the current one
 * @bio_flags:	flags of the current bio to see if we can merge them
3029
 */
3030
static int submit_extent_page(unsigned int opf,
3031
			      struct writeback_control *wbc,
3032
			      struct page *page, u64 offset,
3033
			      size_t size, unsigned long pg_offset,
3034
			      struct bio **bio_ret,
3035
			      bio_end_io_t end_io_func,
C
Chris Mason 已提交
3036 3037
			      int mirror_num,
			      unsigned long prev_bio_flags,
3038 3039
			      unsigned long bio_flags,
			      bool force_bio_submit)
3040 3041 3042
{
	int ret = 0;
	struct bio *bio;
3043
	size_t page_size = min_t(size_t, size, PAGE_SIZE);
3044
	sector_t sector = offset >> 9;
3045
	struct extent_io_tree *tree = &BTRFS_I(page->mapping->host)->io_tree;
3046

3047 3048 3049
	ASSERT(bio_ret);

	if (*bio_ret) {
3050 3051 3052
		bool contig;
		bool can_merge = true;

3053
		bio = *bio_ret;
3054
		if (prev_bio_flags & EXTENT_BIO_COMPRESSED)
3055
			contig = bio->bi_iter.bi_sector == sector;
C
Chris Mason 已提交
3056
		else
K
Kent Overstreet 已提交
3057
			contig = bio_end_sector(bio) == sector;
C
Chris Mason 已提交
3058

3059 3060
		ASSERT(tree->ops);
		if (btrfs_bio_fits_in_stripe(page, page_size, bio, bio_flags))
3061 3062 3063
			can_merge = false;

		if (prev_bio_flags != bio_flags || !contig || !can_merge ||
3064
		    force_bio_submit ||
3065
		    bio_add_page(bio, page, page_size, pg_offset) < page_size) {
3066
			ret = submit_one_bio(bio, mirror_num, prev_bio_flags);
3067 3068
			if (ret < 0) {
				*bio_ret = NULL;
3069
				return ret;
3070
			}
3071 3072
			bio = NULL;
		} else {
3073
			if (wbc)
3074
				wbc_account_cgroup_owner(wbc, page, page_size);
3075 3076 3077
			return 0;
		}
	}
C
Chris Mason 已提交
3078

3079
	bio = btrfs_bio_alloc(offset);
3080
	bio_add_page(bio, page, page_size, pg_offset);
3081 3082
	bio->bi_end_io = end_io_func;
	bio->bi_private = tree;
3083
	bio->bi_write_hint = page->mapping->host->i_write_hint;
3084
	bio->bi_opf = opf;
3085
	if (wbc) {
3086 3087 3088 3089
		struct block_device *bdev;

		bdev = BTRFS_I(page->mapping->host)->root->fs_info->fs_devices->latest_bdev;
		bio_set_dev(bio, bdev);
3090
		wbc_init_bio(wbc, bio);
3091
		wbc_account_cgroup_owner(wbc, page, page_size);
3092
	}
3093

3094
	*bio_ret = bio;
3095 3096 3097 3098

	return ret;
}

3099 3100
static void attach_extent_buffer_page(struct extent_buffer *eb,
				      struct page *page)
3101
{
3102 3103 3104
	if (!PagePrivate(page))
		attach_page_private(page, eb);
	else
J
Josef Bacik 已提交
3105
		WARN_ON(page->private != (unsigned long)eb);
3106 3107
}

J
Josef Bacik 已提交
3108
void set_page_extent_mapped(struct page *page)
3109
{
3110 3111
	if (!PagePrivate(page))
		attach_page_private(page, (void *)EXTENT_PAGE_PRIVATE);
3112 3113
}

3114 3115
static struct extent_map *
__get_extent_map(struct inode *inode, struct page *page, size_t pg_offset,
3116
		 u64 start, u64 len, struct extent_map **em_cached)
3117 3118 3119 3120 3121
{
	struct extent_map *em;

	if (em_cached && *em_cached) {
		em = *em_cached;
3122
		if (extent_map_in_tree(em) && start >= em->start &&
3123
		    start < extent_map_end(em)) {
3124
			refcount_inc(&em->refs);
3125 3126 3127 3128 3129 3130 3131
			return em;
		}

		free_extent_map(em);
		*em_cached = NULL;
	}

3132
	em = btrfs_get_extent(BTRFS_I(inode), page, pg_offset, start, len);
3133 3134
	if (em_cached && !IS_ERR_OR_NULL(em)) {
		BUG_ON(*em_cached);
3135
		refcount_inc(&em->refs);
3136 3137 3138 3139
		*em_cached = em;
	}
	return em;
}
3140 3141 3142 3143
/*
 * 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)
3144
 * XXX JDM: This needs looking at to ensure proper page locking
3145
 * return 0 on success, otherwise return error
3146
 */
3147 3148 3149
int btrfs_do_readpage(struct page *page, struct extent_map **em_cached,
		      struct bio **bio, unsigned long *bio_flags,
		      unsigned int read_flags, u64 *prev_em_start)
3150 3151
{
	struct inode *inode = page->mapping->host;
M
Miao Xie 已提交
3152
	u64 start = page_offset(page);
3153
	const u64 end = start + PAGE_SIZE - 1;
3154 3155 3156 3157 3158 3159
	u64 cur = start;
	u64 extent_offset;
	u64 last_byte = i_size_read(inode);
	u64 block_start;
	u64 cur_end;
	struct extent_map *em;
3160
	int ret = 0;
3161
	int nr = 0;
3162
	size_t pg_offset = 0;
3163
	size_t iosize;
C
Chris Mason 已提交
3164
	size_t disk_io_size;
3165
	size_t blocksize = inode->i_sb->s_blocksize;
3166
	unsigned long this_bio_flag = 0;
3167
	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
3168

3169 3170
	set_page_extent_mapped(page);

D
Dan Magenheimer 已提交
3171 3172 3173
	if (!PageUptodate(page)) {
		if (cleancache_get_page(page) == 0) {
			BUG_ON(blocksize != PAGE_SIZE);
3174
			unlock_extent(tree, start, end);
D
Dan Magenheimer 已提交
3175 3176 3177 3178
			goto out;
		}
	}

3179
	if (page->index == last_byte >> PAGE_SHIFT) {
C
Chris Mason 已提交
3180
		char *userpage;
3181
		size_t zero_offset = offset_in_page(last_byte);
C
Chris Mason 已提交
3182 3183

		if (zero_offset) {
3184
			iosize = PAGE_SIZE - zero_offset;
3185
			userpage = kmap_atomic(page);
C
Chris Mason 已提交
3186 3187
			memset(userpage + zero_offset, 0, iosize);
			flush_dcache_page(page);
3188
			kunmap_atomic(userpage);
C
Chris Mason 已提交
3189 3190
		}
	}
3191
	while (cur <= end) {
3192
		bool force_bio_submit = false;
3193
		u64 offset;
3194

3195 3196
		if (cur >= last_byte) {
			char *userpage;
3197 3198
			struct extent_state *cached = NULL;

3199
			iosize = PAGE_SIZE - pg_offset;
3200
			userpage = kmap_atomic(page);
3201
			memset(userpage + pg_offset, 0, iosize);
3202
			flush_dcache_page(page);
3203
			kunmap_atomic(userpage);
3204
			set_extent_uptodate(tree, cur, cur + iosize - 1,
3205
					    &cached, GFP_NOFS);
3206
			unlock_extent_cached(tree, cur,
3207
					     cur + iosize - 1, &cached);
3208 3209
			break;
		}
3210
		em = __get_extent_map(inode, page, pg_offset, cur,
3211
				      end - cur + 1, em_cached);
3212
		if (IS_ERR_OR_NULL(em)) {
3213
			SetPageError(page);
3214
			unlock_extent(tree, cur, end);
3215 3216 3217 3218 3219 3220
			break;
		}
		extent_offset = cur - em->start;
		BUG_ON(extent_map_end(em) <= cur);
		BUG_ON(end < cur);

3221
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags)) {
3222
			this_bio_flag |= EXTENT_BIO_COMPRESSED;
3223 3224 3225
			extent_set_compress_type(&this_bio_flag,
						 em->compress_type);
		}
C
Chris Mason 已提交
3226

3227 3228
		iosize = min(extent_map_end(em) - cur, end - cur + 1);
		cur_end = min(extent_map_end(em) - 1, end);
3229
		iosize = ALIGN(iosize, blocksize);
C
Chris Mason 已提交
3230 3231
		if (this_bio_flag & EXTENT_BIO_COMPRESSED) {
			disk_io_size = em->block_len;
3232
			offset = em->block_start;
C
Chris Mason 已提交
3233
		} else {
3234
			offset = em->block_start + extent_offset;
C
Chris Mason 已提交
3235 3236
			disk_io_size = iosize;
		}
3237
		block_start = em->block_start;
Y
Yan Zheng 已提交
3238 3239
		if (test_bit(EXTENT_FLAG_PREALLOC, &em->flags))
			block_start = EXTENT_MAP_HOLE;
3240 3241 3242

		/*
		 * If we have a file range that points to a compressed extent
3243
		 * and it's followed by a consecutive file range that points
3244 3245 3246 3247 3248 3249 3250 3251 3252 3253 3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265 3266 3267 3268 3269 3270 3271 3272 3273 3274 3275 3276
		 * 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 &&
3277
		    *prev_em_start != em->start)
3278 3279 3280
			force_bio_submit = true;

		if (prev_em_start)
3281
			*prev_em_start = em->start;
3282

3283 3284 3285 3286 3287 3288
		free_extent_map(em);
		em = NULL;

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

3291
			userpage = kmap_atomic(page);
3292
			memset(userpage + pg_offset, 0, iosize);
3293
			flush_dcache_page(page);
3294
			kunmap_atomic(userpage);
3295 3296

			set_extent_uptodate(tree, cur, cur + iosize - 1,
3297
					    &cached, GFP_NOFS);
3298
			unlock_extent_cached(tree, cur,
3299
					     cur + iosize - 1, &cached);
3300
			cur = cur + iosize;
3301
			pg_offset += iosize;
3302 3303 3304
			continue;
		}
		/* the get_extent function already copied into the page */
3305 3306
		if (test_range_bit(tree, cur, cur_end,
				   EXTENT_UPTODATE, 1, NULL)) {
3307
			check_page_uptodate(tree, page);
3308
			unlock_extent(tree, cur, cur + iosize - 1);
3309
			cur = cur + iosize;
3310
			pg_offset += iosize;
3311 3312
			continue;
		}
3313 3314 3315 3316 3317
		/* we have an inline extent but it didn't get marked up
		 * to date.  Error out
		 */
		if (block_start == EXTENT_MAP_INLINE) {
			SetPageError(page);
3318
			unlock_extent(tree, cur, cur + iosize - 1);
3319
			cur = cur + iosize;
3320
			pg_offset += iosize;
3321 3322
			continue;
		}
3323

3324
		ret = submit_extent_page(REQ_OP_READ | read_flags, NULL,
3325
					 page, offset, disk_io_size,
3326
					 pg_offset, bio,
3327
					 end_bio_extent_readpage, 0,
C
Chris Mason 已提交
3328
					 *bio_flags,
3329 3330
					 this_bio_flag,
					 force_bio_submit);
3331 3332 3333 3334
		if (!ret) {
			nr++;
			*bio_flags = this_bio_flag;
		} else {
3335
			SetPageError(page);
3336
			unlock_extent(tree, cur, cur + iosize - 1);
3337
			goto out;
3338
		}
3339
		cur = cur + iosize;
3340
		pg_offset += iosize;
3341
	}
D
Dan Magenheimer 已提交
3342
out:
3343 3344 3345 3346 3347
	if (!nr) {
		if (!PageError(page))
			SetPageUptodate(page);
		unlock_page(page);
	}
3348
	return ret;
3349 3350
}

3351
static inline void contiguous_readpages(struct page *pages[], int nr_pages,
3352
					     u64 start, u64 end,
3353
					     struct extent_map **em_cached,
3354
					     struct bio **bio,
3355
					     unsigned long *bio_flags,
3356
					     u64 *prev_em_start)
3357
{
3358
	struct btrfs_inode *inode = BTRFS_I(pages[0]->mapping->host);
3359 3360
	int index;

3361
	btrfs_lock_and_flush_ordered_range(inode, start, end, NULL);
3362 3363

	for (index = 0; index < nr_pages; index++) {
3364 3365
		btrfs_do_readpage(pages[index], em_cached, bio, bio_flags,
				  REQ_RAHEAD, prev_em_start);
3366
		put_page(pages[index]);
3367 3368 3369
	}
}

3370
static void update_nr_written(struct writeback_control *wbc,
3371
			      unsigned long nr_written)
3372 3373 3374 3375
{
	wbc->nr_to_write -= nr_written;
}

3376
/*
3377 3378
 * helper for __extent_writepage, doing all of the delayed allocation setup.
 *
3379
 * This returns 1 if btrfs_run_delalloc_range function did all the work required
3380 3381 3382 3383 3384
 * 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)
3385
 */
3386
static noinline_for_stack int writepage_delalloc(struct btrfs_inode *inode,
3387 3388
		struct page *page, struct writeback_control *wbc,
		u64 delalloc_start, unsigned long *nr_written)
3389
{
3390
	u64 page_end = delalloc_start + PAGE_SIZE - 1;
3391
	bool found;
3392 3393 3394 3395 3396 3397 3398
	u64 delalloc_to_write = 0;
	u64 delalloc_end = 0;
	int ret;
	int page_started = 0;


	while (delalloc_end < page_end) {
3399
		found = find_lock_delalloc_range(&inode->vfs_inode, page,
3400
					       &delalloc_start,
3401
					       &delalloc_end);
3402
		if (!found) {
3403 3404 3405
			delalloc_start = delalloc_end + 1;
			continue;
		}
3406
		ret = btrfs_run_delalloc_range(inode, page, delalloc_start,
3407
				delalloc_end, &page_started, nr_written, wbc);
3408 3409
		if (ret) {
			SetPageError(page);
3410 3411 3412 3413 3414
			/*
			 * btrfs_run_delalloc_range should 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.
3415
			 */
3416
			return ret < 0 ? ret : -EIO;
3417 3418
		}
		/*
3419 3420
		 * delalloc_end is already one less than the total length, so
		 * we don't subtract one from PAGE_SIZE
3421 3422
		 */
		delalloc_to_write += (delalloc_end - delalloc_start +
3423
				      PAGE_SIZE) >> PAGE_SHIFT;
3424 3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435 3436 3437 3438 3439 3440 3441 3442 3443 3444 3445 3446 3447
		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;
	}

3448
	return 0;
3449 3450 3451 3452 3453 3454 3455 3456 3457 3458
}

/*
 * 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)
 */
3459
static noinline_for_stack int __extent_writepage_io(struct btrfs_inode *inode,
3460 3461 3462 3463 3464
				 struct page *page,
				 struct writeback_control *wbc,
				 struct extent_page_data *epd,
				 loff_t i_size,
				 unsigned long nr_written,
3465
				 int *nr_ret)
3466
{
3467
	struct extent_io_tree *tree = &inode->io_tree;
M
Miao Xie 已提交
3468
	u64 start = page_offset(page);
3469
	u64 page_end = start + PAGE_SIZE - 1;
3470 3471 3472 3473 3474 3475
	u64 end;
	u64 cur = start;
	u64 extent_offset;
	u64 block_start;
	u64 iosize;
	struct extent_map *em;
3476
	size_t pg_offset = 0;
3477
	size_t blocksize;
3478 3479
	int ret = 0;
	int nr = 0;
3480
	const unsigned int write_flags = wbc_to_write_flags(wbc);
3481
	bool compressed;
C
Chris Mason 已提交
3482

3483 3484 3485
	ret = btrfs_writepage_cow_fixup(page, start, page_end);
	if (ret) {
		/* Fixup worker will requeue */
3486
		redirty_page_for_writepage(wbc, page);
3487 3488 3489
		update_nr_written(wbc, nr_written);
		unlock_page(page);
		return 1;
3490 3491
	}

3492 3493 3494 3495
	/*
	 * we don't want to touch the inode after unlocking the page,
	 * so we update the mapping writeback index now
	 */
3496
	update_nr_written(wbc, nr_written + 1);
3497

3498
	end = page_end;
3499
	blocksize = inode->vfs_inode.i_sb->s_blocksize;
3500 3501

	while (cur <= end) {
3502
		u64 em_end;
3503
		u64 offset;
3504

3505
		if (cur >= i_size) {
3506
			btrfs_writepage_endio_finish_ordered(page, cur,
3507
							     page_end, 1);
3508 3509
			break;
		}
3510
		em = btrfs_get_extent(inode, NULL, 0, cur, end - cur + 1);
3511
		if (IS_ERR_OR_NULL(em)) {
3512
			SetPageError(page);
3513
			ret = PTR_ERR_OR_ZERO(em);
3514 3515 3516 3517
			break;
		}

		extent_offset = cur - em->start;
3518 3519
		em_end = extent_map_end(em);
		BUG_ON(em_end <= cur);
3520
		BUG_ON(end < cur);
3521
		iosize = min(em_end - cur, end - cur + 1);
3522
		iosize = ALIGN(iosize, blocksize);
3523
		offset = em->block_start + extent_offset;
3524
		block_start = em->block_start;
C
Chris Mason 已提交
3525
		compressed = test_bit(EXTENT_FLAG_COMPRESSED, &em->flags);
3526 3527 3528
		free_extent_map(em);
		em = NULL;

C
Chris Mason 已提交
3529 3530 3531 3532 3533
		/*
		 * compressed and inline extents are written through other
		 * paths in the FS
		 */
		if (compressed || block_start == EXTENT_MAP_HOLE ||
3534
		    block_start == EXTENT_MAP_INLINE) {
3535
			if (compressed)
C
Chris Mason 已提交
3536
				nr++;
3537 3538 3539
			else
				btrfs_writepage_endio_finish_ordered(page, cur,
							cur + iosize - 1, 1);
C
Chris Mason 已提交
3540
			cur += iosize;
3541
			pg_offset += iosize;
3542 3543
			continue;
		}
C
Chris Mason 已提交
3544

3545
		btrfs_set_range_writeback(tree, cur, cur + iosize - 1);
3546
		if (!PageWriteback(page)) {
3547
			btrfs_err(inode->root->fs_info,
3548 3549
				   "page %lu not writeback, cur %llu end %llu",
			       page->index, cur, end);
3550
		}
3551

3552
		ret = submit_extent_page(REQ_OP_WRITE | write_flags, wbc,
3553
					 page, offset, iosize, pg_offset,
3554
					 &epd->bio,
3555 3556
					 end_bio_extent_writepage,
					 0, 0, 0, false);
3557
		if (ret) {
3558
			SetPageError(page);
3559 3560 3561
			if (PageWriteback(page))
				end_page_writeback(page);
		}
3562 3563

		cur = cur + iosize;
3564
		pg_offset += iosize;
3565 3566
		nr++;
	}
3567 3568 3569 3570 3571 3572 3573 3574 3575
	*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
3576 3577 3578
 *
 * Return 0 if everything goes well.
 * Return <0 for error.
3579 3580
 */
static int __extent_writepage(struct page *page, struct writeback_control *wbc,
3581
			      struct extent_page_data *epd)
3582 3583 3584
{
	struct inode *inode = page->mapping->host;
	u64 start = page_offset(page);
3585
	u64 page_end = start + PAGE_SIZE - 1;
3586 3587
	int ret;
	int nr = 0;
3588
	size_t pg_offset;
3589
	loff_t i_size = i_size_read(inode);
3590
	unsigned long end_index = i_size >> PAGE_SHIFT;
3591 3592 3593 3594 3595 3596 3597 3598
	unsigned long nr_written = 0;

	trace___extent_writepage(page, inode, wbc);

	WARN_ON(!PageLocked(page));

	ClearPageError(page);

3599
	pg_offset = offset_in_page(i_size);
3600 3601
	if (page->index > end_index ||
	   (page->index == end_index && !pg_offset)) {
3602
		page->mapping->a_ops->invalidatepage(page, 0, PAGE_SIZE);
3603 3604 3605 3606 3607 3608 3609 3610 3611
		unlock_page(page);
		return 0;
	}

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

		userpage = kmap_atomic(page);
		memset(userpage + pg_offset, 0,
3612
		       PAGE_SIZE - pg_offset);
3613 3614 3615 3616 3617 3618
		kunmap_atomic(userpage);
		flush_dcache_page(page);
	}

	set_page_extent_mapped(page);

3619
	if (!epd->extent_locked) {
3620 3621
		ret = writepage_delalloc(BTRFS_I(inode), page, wbc, start,
					 &nr_written);
3622
		if (ret == 1)
3623
			return 0;
3624 3625 3626
		if (ret)
			goto done;
	}
3627

3628 3629
	ret = __extent_writepage_io(BTRFS_I(inode), page, wbc, epd, i_size,
				    nr_written, &nr);
3630
	if (ret == 1)
3631
		return 0;
3632

3633 3634 3635 3636 3637 3638
done:
	if (nr == 0) {
		/* make sure the mapping tag for page dirty gets cleared */
		set_page_writeback(page);
		end_page_writeback(page);
	}
3639 3640 3641 3642
	if (PageError(page)) {
		ret = ret < 0 ? ret : -EIO;
		end_extent_writepage(page, ret, start, page_end);
	}
3643
	unlock_page(page);
3644
	ASSERT(ret <= 0);
3645
	return ret;
3646 3647
}

3648
void wait_on_extent_buffer_writeback(struct extent_buffer *eb)
3649
{
3650 3651
	wait_on_bit_io(&eb->bflags, EXTENT_BUFFER_WRITEBACK,
		       TASK_UNINTERRUPTIBLE);
3652 3653
}

3654 3655 3656 3657 3658 3659 3660
static void end_extent_buffer_writeback(struct extent_buffer *eb)
{
	clear_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags);
	smp_mb__after_atomic();
	wake_up_bit(&eb->bflags, EXTENT_BUFFER_WRITEBACK);
}

3661 3662 3663 3664 3665 3666 3667
/*
 * Lock eb pages and flush the bio if we can't the locks
 *
 * Return  0 if nothing went wrong
 * Return >0 is same as 0, except bio is not submitted
 * Return <0 if something went wrong, no page is locked
 */
3668
static noinline_for_stack int lock_extent_buffer_for_io(struct extent_buffer *eb,
3669
			  struct extent_page_data *epd)
3670
{
3671
	struct btrfs_fs_info *fs_info = eb->fs_info;
3672
	int i, num_pages, failed_page_nr;
3673 3674 3675 3676
	int flush = 0;
	int ret = 0;

	if (!btrfs_try_tree_write_lock(eb)) {
3677
		ret = flush_write_bio(epd);
3678 3679 3680
		if (ret < 0)
			return ret;
		flush = 1;
3681 3682 3683 3684 3685 3686 3687 3688
		btrfs_tree_lock(eb);
	}

	if (test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags)) {
		btrfs_tree_unlock(eb);
		if (!epd->sync_io)
			return 0;
		if (!flush) {
3689
			ret = flush_write_bio(epd);
3690 3691
			if (ret < 0)
				return ret;
3692 3693
			flush = 1;
		}
C
Chris Mason 已提交
3694 3695 3696 3697 3698
		while (1) {
			wait_on_extent_buffer_writeback(eb);
			btrfs_tree_lock(eb);
			if (!test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags))
				break;
3699 3700 3701 3702
			btrfs_tree_unlock(eb);
		}
	}

3703 3704 3705 3706 3707 3708
	/*
	 * 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);
3709 3710
	if (test_and_clear_bit(EXTENT_BUFFER_DIRTY, &eb->bflags)) {
		set_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags);
3711
		spin_unlock(&eb->refs_lock);
3712
		btrfs_set_header_flag(eb, BTRFS_HEADER_FLAG_WRITTEN);
3713 3714 3715
		percpu_counter_add_batch(&fs_info->dirty_metadata_bytes,
					 -eb->len,
					 fs_info->dirty_metadata_batch);
3716
		ret = 1;
3717 3718
	} else {
		spin_unlock(&eb->refs_lock);
3719 3720 3721 3722 3723 3724 3725
	}

	btrfs_tree_unlock(eb);

	if (!ret)
		return ret;

3726
	num_pages = num_extent_pages(eb);
3727
	for (i = 0; i < num_pages; i++) {
3728
		struct page *p = eb->pages[i];
3729 3730 3731

		if (!trylock_page(p)) {
			if (!flush) {
3732 3733 3734 3735 3736
				int err;

				err = flush_write_bio(epd);
				if (err < 0) {
					ret = err;
3737 3738 3739
					failed_page_nr = i;
					goto err_unlock;
				}
3740 3741 3742 3743 3744 3745 3746
				flush = 1;
			}
			lock_page(p);
		}
	}

	return ret;
3747 3748 3749 3750
err_unlock:
	/* Unlock already locked pages */
	for (i = 0; i < failed_page_nr; i++)
		unlock_page(eb->pages[i]);
3751 3752 3753 3754 3755 3756 3757 3758 3759 3760 3761 3762 3763 3764
	/*
	 * Clear EXTENT_BUFFER_WRITEBACK and wake up anyone waiting on it.
	 * Also set back EXTENT_BUFFER_DIRTY so future attempts to this eb can
	 * be made and undo everything done before.
	 */
	btrfs_tree_lock(eb);
	spin_lock(&eb->refs_lock);
	set_bit(EXTENT_BUFFER_DIRTY, &eb->bflags);
	end_extent_buffer_writeback(eb);
	spin_unlock(&eb->refs_lock);
	percpu_counter_add_batch(&fs_info->dirty_metadata_bytes, eb->len,
				 fs_info->dirty_metadata_batch);
	btrfs_clear_header_flag(eb, BTRFS_HEADER_FLAG_WRITTEN);
	btrfs_tree_unlock(eb);
3765
	return ret;
3766 3767
}

3768 3769 3770
static void set_btree_ioerr(struct page *page)
{
	struct extent_buffer *eb = (struct extent_buffer *)page->private;
3771
	struct btrfs_fs_info *fs_info;
3772 3773 3774 3775 3776

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

3777 3778 3779 3780 3781 3782 3783 3784
	/*
	 * If we error out, we should add back the dirty_metadata_bytes
	 * to make it consistent.
	 */
	fs_info = eb->fs_info;
	percpu_counter_add_batch(&fs_info->dirty_metadata_bytes,
				 eb->len, fs_info->dirty_metadata_batch);

3785 3786 3787 3788 3789 3790 3791 3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802 3803 3804 3805 3806 3807 3808 3809 3810 3811 3812 3813 3814 3815 3816 3817 3818 3819 3820 3821 3822 3823 3824
	/*
	 * 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:
3825
		set_bit(BTRFS_FS_BTREE_ERR, &eb->fs_info->flags);
3826 3827
		break;
	case 0:
3828
		set_bit(BTRFS_FS_LOG1_ERR, &eb->fs_info->flags);
3829 3830
		break;
	case 1:
3831
		set_bit(BTRFS_FS_LOG2_ERR, &eb->fs_info->flags);
3832 3833 3834 3835 3836 3837
		break;
	default:
		BUG(); /* unexpected, logic error */
	}
}

3838
static void end_bio_extent_buffer_writepage(struct bio *bio)
3839
{
3840
	struct bio_vec *bvec;
3841
	struct extent_buffer *eb;
3842
	int done;
3843
	struct bvec_iter_all iter_all;
3844

3845
	ASSERT(!bio_flagged(bio, BIO_CLONED));
3846
	bio_for_each_segment_all(bvec, bio, iter_all) {
3847 3848 3849 3850 3851 3852
		struct page *page = bvec->bv_page;

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

3853
		if (bio->bi_status ||
3854
		    test_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags)) {
3855
			ClearPageUptodate(page);
3856
			set_btree_ioerr(page);
3857 3858 3859 3860 3861 3862 3863 3864
		}

		end_page_writeback(page);

		if (!done)
			continue;

		end_extent_buffer_writeback(eb);
3865
	}
3866 3867 3868 3869

	bio_put(bio);
}

3870
static noinline_for_stack int write_one_eb(struct extent_buffer *eb,
3871 3872 3873 3874
			struct writeback_control *wbc,
			struct extent_page_data *epd)
{
	u64 offset = eb->start;
3875
	u32 nritems;
3876
	int i, num_pages;
3877
	unsigned long start, end;
3878
	unsigned int write_flags = wbc_to_write_flags(wbc) | REQ_META;
3879
	int ret = 0;
3880

3881
	clear_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags);
3882
	num_pages = num_extent_pages(eb);
3883
	atomic_set(&eb->io_pages, num_pages);
3884

3885 3886
	/* set btree blocks beyond nritems with 0 to avoid stale content. */
	nritems = btrfs_header_nritems(eb);
3887 3888 3889
	if (btrfs_header_level(eb) > 0) {
		end = btrfs_node_key_ptr_offset(nritems);

3890
		memzero_extent_buffer(eb, end, eb->len - end);
3891 3892 3893 3894 3895 3896
	} else {
		/*
		 * leaf:
		 * header 0 1 2 .. N ... data_N .. data_2 data_1 data_0
		 */
		start = btrfs_item_nr_offset(nritems);
3897
		end = BTRFS_LEAF_DATA_OFFSET + leaf_data_end(eb);
3898
		memzero_extent_buffer(eb, start, end - start);
3899 3900
	}

3901
	for (i = 0; i < num_pages; i++) {
3902
		struct page *p = eb->pages[i];
3903 3904 3905

		clear_page_dirty_for_io(p);
		set_page_writeback(p);
3906
		ret = submit_extent_page(REQ_OP_WRITE | write_flags, wbc,
3907
					 p, offset, PAGE_SIZE, 0,
3908
					 &epd->bio,
3909
					 end_bio_extent_buffer_writepage,
3910
					 0, 0, 0, false);
3911
		if (ret) {
3912
			set_btree_ioerr(p);
3913 3914
			if (PageWriteback(p))
				end_page_writeback(p);
3915 3916 3917 3918 3919
			if (atomic_sub_and_test(num_pages - i, &eb->io_pages))
				end_extent_buffer_writeback(eb);
			ret = -EIO;
			break;
		}
3920
		offset += PAGE_SIZE;
3921
		update_nr_written(wbc, 1);
3922 3923 3924 3925 3926
		unlock_page(p);
	}

	if (unlikely(ret)) {
		for (; i < num_pages; i++) {
3927
			struct page *p = eb->pages[i];
3928
			clear_page_dirty_for_io(p);
3929 3930 3931 3932 3933 3934 3935 3936 3937 3938 3939 3940 3941 3942 3943 3944
			unlock_page(p);
		}
	}

	return ret;
}

int btree_write_cache_pages(struct address_space *mapping,
				   struct writeback_control *wbc)
{
	struct extent_buffer *eb, *prev_eb = NULL;
	struct extent_page_data epd = {
		.bio = NULL,
		.extent_locked = 0,
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
	};
3945
	struct btrfs_fs_info *fs_info = BTRFS_I(mapping->host)->root->fs_info;
3946 3947 3948 3949 3950 3951 3952 3953
	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;
M
Matthew Wilcox 已提交
3954
	xa_mark_t tag;
3955

3956
	pagevec_init(&pvec);
3957 3958 3959
	if (wbc->range_cyclic) {
		index = mapping->writeback_index; /* Start from prev offset */
		end = -1;
3960 3961 3962 3963 3964
		/*
		 * Start from the beginning does not need to cycle over the
		 * range, mark it as scanned.
		 */
		scanned = (index == 0);
3965
	} else {
3966 3967
		index = wbc->range_start >> PAGE_SHIFT;
		end = wbc->range_end >> PAGE_SHIFT;
3968 3969 3970 3971 3972 3973 3974 3975 3976 3977
		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 已提交
3978
	       (nr_pages = pagevec_lookup_range_tag(&pvec, mapping, &index, end,
3979
			tag))) {
3980 3981 3982 3983 3984 3985 3986 3987
		unsigned i;

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

			if (!PagePrivate(page))
				continue;

3988 3989 3990 3991 3992 3993
			spin_lock(&mapping->private_lock);
			if (!PagePrivate(page)) {
				spin_unlock(&mapping->private_lock);
				continue;
			}

3994
			eb = (struct extent_buffer *)page->private;
3995 3996 3997 3998 3999 4000

			/*
			 * 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.
			 */
4001
			if (WARN_ON(!eb)) {
4002
				spin_unlock(&mapping->private_lock);
4003 4004 4005
				continue;
			}

4006 4007
			if (eb == prev_eb) {
				spin_unlock(&mapping->private_lock);
4008
				continue;
4009
			}
4010

4011 4012 4013
			ret = atomic_inc_not_zero(&eb->refs);
			spin_unlock(&mapping->private_lock);
			if (!ret)
4014 4015 4016
				continue;

			prev_eb = eb;
4017
			ret = lock_extent_buffer_for_io(eb, &epd);
4018 4019 4020
			if (!ret) {
				free_extent_buffer(eb);
				continue;
4021 4022 4023 4024
			} else if (ret < 0) {
				done = 1;
				free_extent_buffer(eb);
				break;
4025 4026
			}

4027
			ret = write_one_eb(eb, wbc, &epd);
4028 4029 4030 4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 4045 4046 4047 4048 4049 4050 4051 4052 4053
			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;
	}
4054 4055 4056 4057 4058
	ASSERT(ret <= 0);
	if (ret < 0) {
		end_write_bio(&epd, ret);
		return ret;
	}
4059 4060 4061 4062 4063 4064 4065 4066 4067 4068 4069 4070 4071 4072 4073 4074 4075 4076 4077 4078 4079 4080 4081 4082 4083 4084 4085 4086 4087 4088
	/*
	 * If something went wrong, don't allow any metadata write bio to be
	 * submitted.
	 *
	 * This would prevent use-after-free if we had dirty pages not
	 * cleaned up, which can still happen by fuzzed images.
	 *
	 * - Bad extent tree
	 *   Allowing existing tree block to be allocated for other trees.
	 *
	 * - Log tree operations
	 *   Exiting tree blocks get allocated to log tree, bumps its
	 *   generation, then get cleaned in tree re-balance.
	 *   Such tree block will not be written back, since it's clean,
	 *   thus no WRITTEN flag set.
	 *   And after log writes back, this tree block is not traced by
	 *   any dirty extent_io_tree.
	 *
	 * - Offending tree block gets re-dirtied from its original owner
	 *   Since it has bumped generation, no WRITTEN flag, it can be
	 *   reused without COWing. This tree block will not be traced
	 *   by btrfs_transaction::dirty_pages.
	 *
	 *   Now such dirty tree block will not be cleaned by any dirty
	 *   extent io tree. Thus we don't want to submit such wild eb
	 *   if the fs already has error.
	 */
	if (!test_bit(BTRFS_FS_STATE_ERROR, &fs_info->fs_state)) {
		ret = flush_write_bio(&epd);
	} else {
4089
		ret = -EROFS;
4090 4091
		end_write_bio(&epd, ret);
	}
4092 4093 4094
	return ret;
}

4095
/**
C
Chris Mason 已提交
4096
 * write_cache_pages - walk the list of dirty pages of the given address space and write all of them.
4097 4098
 * @mapping: address space structure to write
 * @wbc: subtract the number of written pages from *@wbc->nr_to_write
4099
 * @data: data passed to __extent_writepage function
4100 4101 4102 4103 4104 4105 4106 4107 4108
 *
 * 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.
 */
4109
static int extent_write_cache_pages(struct address_space *mapping,
C
Chris Mason 已提交
4110
			     struct writeback_control *wbc,
4111
			     struct extent_page_data *epd)
4112
{
4113
	struct inode *inode = mapping->host;
4114 4115
	int ret = 0;
	int done = 0;
4116
	int nr_to_write_done = 0;
4117 4118 4119 4120
	struct pagevec pvec;
	int nr_pages;
	pgoff_t index;
	pgoff_t end;		/* Inclusive */
4121 4122
	pgoff_t done_index;
	int range_whole = 0;
4123
	int scanned = 0;
M
Matthew Wilcox 已提交
4124
	xa_mark_t tag;
4125

4126 4127 4128 4129 4130 4131 4132 4133 4134 4135 4136 4137
	/*
	 * 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;

4138
	pagevec_init(&pvec);
4139 4140 4141
	if (wbc->range_cyclic) {
		index = mapping->writeback_index; /* Start from prev offset */
		end = -1;
4142 4143 4144 4145 4146
		/*
		 * Start from the beginning does not need to cycle over the
		 * range, mark it as scanned.
		 */
		scanned = (index == 0);
4147
	} else {
4148 4149
		index = wbc->range_start >> PAGE_SHIFT;
		end = wbc->range_end >> PAGE_SHIFT;
4150 4151
		if (wbc->range_start == 0 && wbc->range_end == LLONG_MAX)
			range_whole = 1;
4152 4153
		scanned = 1;
	}
4154 4155 4156 4157 4158 4159 4160 4161 4162 4163 4164 4165 4166 4167

	/*
	 * We do the tagged writepage as long as the snapshot flush bit is set
	 * and we are the first one who do the filemap_flush() on this inode.
	 *
	 * The nr_to_write == LONG_MAX is needed to make sure other flushers do
	 * not race in and drop the bit.
	 */
	if (range_whole && wbc->nr_to_write == LONG_MAX &&
	    test_and_clear_bit(BTRFS_INODE_SNAPSHOT_FLUSH,
			       &BTRFS_I(inode)->runtime_flags))
		wbc->tagged_writepages = 1;

	if (wbc->sync_mode == WB_SYNC_ALL || wbc->tagged_writepages)
4168 4169 4170
		tag = PAGECACHE_TAG_TOWRITE;
	else
		tag = PAGECACHE_TAG_DIRTY;
4171
retry:
4172
	if (wbc->sync_mode == WB_SYNC_ALL || wbc->tagged_writepages)
4173
		tag_pages_for_writeback(mapping, index, end);
4174
	done_index = index;
4175
	while (!done && !nr_to_write_done && (index <= end) &&
4176 4177
			(nr_pages = pagevec_lookup_range_tag(&pvec, mapping,
						&index, end, tag))) {
4178 4179 4180 4181 4182
		unsigned i;

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

4183
			done_index = page->index + 1;
4184
			/*
M
Matthew Wilcox 已提交
4185 4186 4187 4188 4189
			 * At this point we hold neither the i_pages lock nor
			 * the page lock: the page may be truncated or
			 * invalidated (changing page->mapping to NULL),
			 * or even swizzled back from swapper_space to
			 * tmpfs file mapping
4190
			 */
4191
			if (!trylock_page(page)) {
4192 4193
				ret = flush_write_bio(epd);
				BUG_ON(ret < 0);
4194
				lock_page(page);
4195
			}
4196 4197 4198 4199 4200 4201

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

C
Chris Mason 已提交
4202
			if (wbc->sync_mode != WB_SYNC_NONE) {
4203 4204 4205 4206
				if (PageWriteback(page)) {
					ret = flush_write_bio(epd);
					BUG_ON(ret < 0);
				}
4207
				wait_on_page_writeback(page);
C
Chris Mason 已提交
4208
			}
4209 4210 4211 4212 4213 4214 4215

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

4216
			ret = __extent_writepage(page, wbc, epd);
4217 4218 4219 4220
			if (ret < 0) {
				done = 1;
				break;
			}
4221 4222 4223 4224 4225 4226 4227

			/*
			 * 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;
4228 4229 4230 4231
		}
		pagevec_release(&pvec);
		cond_resched();
	}
4232
	if (!scanned && !done) {
4233 4234 4235 4236 4237 4238
		/*
		 * 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;
4239 4240 4241 4242 4243 4244 4245 4246 4247 4248

		/*
		 * If we're looping we could run into a page that is locked by a
		 * writer and that writer could be waiting on writeback for a
		 * page in our current bio, and thus deadlock, so flush the
		 * write bio here.
		 */
		ret = flush_write_bio(epd);
		if (!ret)
			goto retry;
4249
	}
4250 4251 4252 4253

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

4254
	btrfs_add_delayed_iput(inode);
4255
	return ret;
4256 4257
}

4258
int extent_write_full_page(struct page *page, struct writeback_control *wbc)
4259 4260 4261 4262
{
	int ret;
	struct extent_page_data epd = {
		.bio = NULL,
4263
		.extent_locked = 0,
4264
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4265 4266 4267
	};

	ret = __extent_writepage(page, wbc, &epd);
4268 4269 4270 4271 4272
	ASSERT(ret <= 0);
	if (ret < 0) {
		end_write_bio(&epd, ret);
		return ret;
	}
4273

4274 4275
	ret = flush_write_bio(&epd);
	ASSERT(ret <= 0);
4276 4277 4278
	return ret;
}

4279
int extent_write_locked_range(struct inode *inode, u64 start, u64 end,
4280 4281 4282 4283 4284
			      int mode)
{
	int ret = 0;
	struct address_space *mapping = inode->i_mapping;
	struct page *page;
4285 4286
	unsigned long nr_pages = (end - start + PAGE_SIZE) >>
		PAGE_SHIFT;
4287 4288 4289 4290

	struct extent_page_data epd = {
		.bio = NULL,
		.extent_locked = 1,
4291
		.sync_io = mode == WB_SYNC_ALL,
4292 4293 4294 4295 4296 4297
	};
	struct writeback_control wbc_writepages = {
		.sync_mode	= mode,
		.nr_to_write	= nr_pages * 2,
		.range_start	= start,
		.range_end	= end + 1,
4298 4299 4300
		/* We're called from an async helper function */
		.punt_to_cgroup	= 1,
		.no_cgroup_owner = 1,
4301 4302
	};

4303
	wbc_attach_fdatawrite_inode(&wbc_writepages, inode);
C
Chris Mason 已提交
4304
	while (start <= end) {
4305
		page = find_get_page(mapping, start >> PAGE_SHIFT);
4306 4307 4308
		if (clear_page_dirty_for_io(page))
			ret = __extent_writepage(page, &wbc_writepages, &epd);
		else {
4309
			btrfs_writepage_endio_finish_ordered(page, start,
4310
						    start + PAGE_SIZE - 1, 1);
4311 4312
			unlock_page(page);
		}
4313 4314
		put_page(page);
		start += PAGE_SIZE;
4315 4316
	}

4317
	ASSERT(ret <= 0);
4318 4319 4320
	if (ret == 0)
		ret = flush_write_bio(&epd);
	else
4321
		end_write_bio(&epd, ret);
4322 4323

	wbc_detach_inode(&wbc_writepages);
4324 4325
	return ret;
}
4326

4327
int extent_writepages(struct address_space *mapping,
4328 4329 4330 4331 4332
		      struct writeback_control *wbc)
{
	int ret = 0;
	struct extent_page_data epd = {
		.bio = NULL,
4333
		.extent_locked = 0,
4334
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4335 4336
	};

4337
	ret = extent_write_cache_pages(mapping, wbc, &epd);
4338 4339 4340 4341 4342 4343
	ASSERT(ret <= 0);
	if (ret < 0) {
		end_write_bio(&epd, ret);
		return ret;
	}
	ret = flush_write_bio(&epd);
4344 4345 4346
	return ret;
}

4347
void extent_readahead(struct readahead_control *rac)
4348 4349
{
	struct bio *bio = NULL;
C
Chris Mason 已提交
4350
	unsigned long bio_flags = 0;
L
Liu Bo 已提交
4351
	struct page *pagepool[16];
4352
	struct extent_map *em_cached = NULL;
4353
	u64 prev_em_start = (u64)-1;
4354
	int nr;
4355

4356 4357 4358
	while ((nr = readahead_page_batch(rac, pagepool))) {
		u64 contig_start = page_offset(pagepool[0]);
		u64 contig_end = page_offset(pagepool[nr - 1]) + PAGE_SIZE - 1;
4359

4360
		ASSERT(contig_start + nr * PAGE_SIZE - 1 == contig_end);
4361

4362 4363
		contiguous_readpages(pagepool, nr, contig_start, contig_end,
				&em_cached, &bio, &bio_flags, &prev_em_start);
4364
	}
L
Liu Bo 已提交
4365

4366 4367 4368
	if (em_cached)
		free_extent_map(em_cached);

4369 4370 4371 4372
	if (bio) {
		if (submit_one_bio(bio, 0, bio_flags))
			return;
	}
4373 4374 4375 4376 4377 4378 4379 4380 4381 4382
}

/*
 * 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)
{
4383
	struct extent_state *cached_state = NULL;
M
Miao Xie 已提交
4384
	u64 start = page_offset(page);
4385
	u64 end = start + PAGE_SIZE - 1;
4386 4387
	size_t blocksize = page->mapping->host->i_sb->s_blocksize;

4388
	start += ALIGN(offset, blocksize);
4389 4390 4391
	if (start > end)
		return 0;

4392
	lock_extent_bits(tree, start, end, &cached_state);
4393
	wait_on_page_writeback(page);
4394 4395
	clear_extent_bit(tree, start, end, EXTENT_LOCKED | EXTENT_DELALLOC |
			 EXTENT_DO_ACCOUNTING, 1, 1, &cached_state);
4396 4397 4398
	return 0;
}

4399 4400 4401 4402 4403
/*
 * 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.
 */
4404
static int try_release_extent_state(struct extent_io_tree *tree,
4405
				    struct page *page, gfp_t mask)
4406
{
M
Miao Xie 已提交
4407
	u64 start = page_offset(page);
4408
	u64 end = start + PAGE_SIZE - 1;
4409 4410
	int ret = 1;

N
Nikolay Borisov 已提交
4411
	if (test_range_bit(tree, start, end, EXTENT_LOCKED, 0, NULL)) {
4412
		ret = 0;
N
Nikolay Borisov 已提交
4413
	} else {
4414 4415 4416 4417
		/*
		 * at this point we can safely clear everything except the
		 * locked bit and the nodatasum bit
		 */
4418
		ret = __clear_extent_bit(tree, start, end,
4419
				 ~(EXTENT_LOCKED | EXTENT_NODATASUM),
4420
				 0, 0, NULL, mask, NULL);
4421 4422 4423 4424 4425 4426 4427 4428

		/* if clear_extent_bit failed for enomem reasons,
		 * we can't allow the release to continue.
		 */
		if (ret < 0)
			ret = 0;
		else
			ret = 1;
4429 4430 4431 4432
	}
	return ret;
}

4433 4434 4435 4436 4437
/*
 * 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
 */
4438
int try_release_extent_mapping(struct page *page, gfp_t mask)
4439 4440
{
	struct extent_map *em;
M
Miao Xie 已提交
4441
	u64 start = page_offset(page);
4442
	u64 end = start + PAGE_SIZE - 1;
4443 4444 4445
	struct btrfs_inode *btrfs_inode = BTRFS_I(page->mapping->host);
	struct extent_io_tree *tree = &btrfs_inode->io_tree;
	struct extent_map_tree *map = &btrfs_inode->extent_tree;
4446

4447
	if (gfpflags_allow_blocking(mask) &&
4448
	    page->mapping->host->i_size > SZ_16M) {
4449
		u64 len;
4450
		while (start <= end) {
4451 4452 4453
			struct btrfs_fs_info *fs_info;
			u64 cur_gen;

4454
			len = end - start + 1;
4455
			write_lock(&map->lock);
4456
			em = lookup_extent_mapping(map, start, len);
4457
			if (!em) {
4458
				write_unlock(&map->lock);
4459 4460
				break;
			}
4461 4462
			if (test_bit(EXTENT_FLAG_PINNED, &em->flags) ||
			    em->start != start) {
4463
				write_unlock(&map->lock);
4464 4465 4466
				free_extent_map(em);
				break;
			}
4467 4468 4469 4470 4471 4472 4473 4474 4475 4476 4477
			if (test_range_bit(tree, em->start,
					   extent_map_end(em) - 1,
					   EXTENT_LOCKED, 0, NULL))
				goto next;
			/*
			 * If it's not in the list of modified extents, used
			 * by a fast fsync, we can remove it. If it's being
			 * logged we can safely remove it since fsync took an
			 * extra reference on the em.
			 */
			if (list_empty(&em->list) ||
4478 4479 4480 4481 4482 4483 4484 4485 4486 4487 4488 4489 4490 4491 4492 4493
			    test_bit(EXTENT_FLAG_LOGGING, &em->flags))
				goto remove_em;
			/*
			 * If it's in the list of modified extents, remove it
			 * only if its generation is older then the current one,
			 * in which case we don't need it for a fast fsync.
			 * Otherwise don't remove it, we could be racing with an
			 * ongoing fast fsync that could miss the new extent.
			 */
			fs_info = btrfs_inode->root->fs_info;
			spin_lock(&fs_info->trans_lock);
			cur_gen = fs_info->generation;
			spin_unlock(&fs_info->trans_lock);
			if (em->generation >= cur_gen)
				goto next;
remove_em:
4494 4495 4496 4497 4498 4499 4500 4501
			/*
			 * We only remove extent maps that are not in the list of
			 * modified extents or that are in the list but with a
			 * generation lower then the current generation, so there
			 * is no need to set the full fsync flag on the inode (it
			 * hurts the fsync performance for workloads with a data
			 * size that exceeds or is close to the system's memory).
			 */
4502 4503 4504
			remove_extent_mapping(map, em);
			/* once for the rb tree */
			free_extent_map(em);
4505
next:
4506
			start = extent_map_end(em);
4507
			write_unlock(&map->lock);
4508 4509

			/* once for us */
4510
			free_extent_map(em);
4511 4512

			cond_resched(); /* Allow large-extent preemption. */
4513 4514
		}
	}
4515
	return try_release_extent_state(tree, page, mask);
4516 4517
}

4518 4519 4520 4521
/*
 * helper function for fiemap, which doesn't want to see any holes.
 * This maps until we find something past 'last'
 */
4522
static struct extent_map *get_extent_skip_holes(struct btrfs_inode *inode,
4523
						u64 offset, u64 last)
4524
{
4525
	u64 sectorsize = btrfs_inode_sectorsize(inode);
4526 4527 4528 4529 4530 4531
	struct extent_map *em;
	u64 len;

	if (offset >= last)
		return NULL;

4532
	while (1) {
4533 4534 4535
		len = last - offset;
		if (len == 0)
			break;
4536
		len = ALIGN(len, sectorsize);
4537
		em = btrfs_get_extent_fiemap(inode, offset, len);
4538
		if (IS_ERR_OR_NULL(em))
4539 4540 4541
			return em;

		/* if this isn't a hole return it */
4542
		if (em->block_start != EXTENT_MAP_HOLE)
4543 4544 4545 4546 4547 4548 4549 4550 4551 4552 4553
			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;
}

4554 4555 4556 4557 4558 4559 4560 4561 4562 4563 4564 4565 4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577 4578 4579 4580 4581 4582 4583 4584 4585 4586 4587
/*
 * 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
4588
	 * fiemap extent won't overlap with cached one.
4589 4590 4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602 4603 4604 4605 4606 4607 4608 4609 4610 4611 4612 4613 4614 4615 4616 4617 4618 4619 4620 4621 4622 4623 4624 4625 4626 4627 4628 4629 4630 4631 4632 4633 4634 4635 4636 4637 4638 4639
	 * 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;
}

/*
4640
 * Emit last fiemap cache
4641
 *
4642 4643 4644 4645 4646 4647 4648
 * 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().
4649
 */
4650
static int emit_last_fiemap_cache(struct fiemap_extent_info *fieinfo,
4651
				  struct fiemap_cache *cache)
4652 4653 4654 4655 4656 4657 4658 4659 4660 4661 4662 4663 4664 4665
{
	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;
}

4666
int extent_fiemap(struct btrfs_inode *inode, struct fiemap_extent_info *fieinfo,
4667
		  u64 start, u64 len)
Y
Yehuda Sadeh 已提交
4668
{
J
Josef Bacik 已提交
4669
	int ret = 0;
Y
Yehuda Sadeh 已提交
4670 4671 4672
	u64 off = start;
	u64 max = start + len;
	u32 flags = 0;
J
Josef Bacik 已提交
4673 4674
	u32 found_type;
	u64 last;
4675
	u64 last_for_get_extent = 0;
Y
Yehuda Sadeh 已提交
4676
	u64 disko = 0;
4677
	u64 isize = i_size_read(&inode->vfs_inode);
J
Josef Bacik 已提交
4678
	struct btrfs_key found_key;
Y
Yehuda Sadeh 已提交
4679
	struct extent_map *em = NULL;
4680
	struct extent_state *cached_state = NULL;
J
Josef Bacik 已提交
4681
	struct btrfs_path *path;
4682
	struct btrfs_root *root = inode->root;
4683
	struct fiemap_cache cache = { 0 };
4684 4685
	struct ulist *roots;
	struct ulist *tmp_ulist;
Y
Yehuda Sadeh 已提交
4686
	int end = 0;
4687 4688 4689
	u64 em_start = 0;
	u64 em_len = 0;
	u64 em_end = 0;
Y
Yehuda Sadeh 已提交
4690 4691 4692 4693

	if (len == 0)
		return -EINVAL;

J
Josef Bacik 已提交
4694 4695 4696 4697 4698
	path = btrfs_alloc_path();
	if (!path)
		return -ENOMEM;
	path->leave_spinning = 1;

4699 4700 4701 4702 4703 4704 4705
	roots = ulist_alloc(GFP_KERNEL);
	tmp_ulist = ulist_alloc(GFP_KERNEL);
	if (!roots || !tmp_ulist) {
		ret = -ENOMEM;
		goto out_free_ulist;
	}

4706 4707
	start = round_down(start, btrfs_inode_sectorsize(inode));
	len = round_up(max, btrfs_inode_sectorsize(inode)) - start;
4708

4709 4710 4711 4712
	/*
	 * lookup the last file extent.  We're not using i_size here
	 * because there might be preallocation past i_size
	 */
4713 4714
	ret = btrfs_lookup_file_extent(NULL, root, path, btrfs_ino(inode), -1,
				       0);
J
Josef Bacik 已提交
4715
	if (ret < 0) {
4716
		goto out_free_ulist;
4717 4718 4719 4720
	} else {
		WARN_ON(!ret);
		if (ret == 1)
			ret = 0;
J
Josef Bacik 已提交
4721
	}
4722

J
Josef Bacik 已提交
4723 4724
	path->slots[0]--;
	btrfs_item_key_to_cpu(path->nodes[0], &found_key, path->slots[0]);
4725
	found_type = found_key.type;
J
Josef Bacik 已提交
4726

4727
	/* No extents, but there might be delalloc bits */
4728
	if (found_key.objectid != btrfs_ino(inode) ||
J
Josef Bacik 已提交
4729
	    found_type != BTRFS_EXTENT_DATA_KEY) {
4730 4731 4732 4733 4734 4735 4736 4737 4738 4739 4740
		/* 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 已提交
4741
	}
4742
	btrfs_release_path(path);
J
Josef Bacik 已提交
4743

4744 4745 4746 4747 4748 4749 4750 4751 4752 4753
	/*
	 * 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;
	}

4754
	lock_extent_bits(&inode->io_tree, start, start + len - 1,
4755
			 &cached_state);
4756

4757
	em = get_extent_skip_holes(inode, start, last_for_get_extent);
Y
Yehuda Sadeh 已提交
4758 4759 4760 4761 4762 4763
	if (!em)
		goto out;
	if (IS_ERR(em)) {
		ret = PTR_ERR(em);
		goto out;
	}
J
Josef Bacik 已提交
4764

Y
Yehuda Sadeh 已提交
4765
	while (!end) {
4766
		u64 offset_in_extent = 0;
4767 4768 4769 4770 4771 4772 4773 4774 4775 4776 4777 4778

		/* 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 已提交
4779

4780 4781
		/*
		 * record the offset from the start of the extent
4782 4783 4784
		 * 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.
4785
		 */
4786 4787
		if (!test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
			offset_in_extent = em_start - em->start;
4788
		em_end = extent_map_end(em);
4789
		em_len = em_end - em_start;
Y
Yehuda Sadeh 已提交
4790
		flags = 0;
4791 4792 4793 4794
		if (em->block_start < EXTENT_MAP_LAST_BYTE)
			disko = em->block_start + offset_in_extent;
		else
			disko = 0;
Y
Yehuda Sadeh 已提交
4795

4796 4797 4798 4799 4800 4801 4802
		/*
		 * bump off for our next call to get_extent
		 */
		off = extent_map_end(em);
		if (off >= max)
			end = 1;

4803
		if (em->block_start == EXTENT_MAP_LAST_BYTE) {
Y
Yehuda Sadeh 已提交
4804 4805
			end = 1;
			flags |= FIEMAP_EXTENT_LAST;
4806
		} else if (em->block_start == EXTENT_MAP_INLINE) {
Y
Yehuda Sadeh 已提交
4807 4808
			flags |= (FIEMAP_EXTENT_DATA_INLINE |
				  FIEMAP_EXTENT_NOT_ALIGNED);
4809
		} else if (em->block_start == EXTENT_MAP_DELALLOC) {
Y
Yehuda Sadeh 已提交
4810 4811
			flags |= (FIEMAP_EXTENT_DELALLOC |
				  FIEMAP_EXTENT_UNKNOWN);
4812 4813 4814
		} else if (fieinfo->fi_extents_max) {
			u64 bytenr = em->block_start -
				(em->start - em->orig_start);
4815 4816 4817 4818

			/*
			 * As btrfs supports shared space, this information
			 * can be exported to userspace tools via
4819 4820 4821
			 * flag FIEMAP_EXTENT_SHARED.  If fi_extents_max == 0
			 * then we're just getting a count and we can skip the
			 * lookup stuff.
4822
			 */
4823
			ret = btrfs_check_shared(root, btrfs_ino(inode),
4824
						 bytenr, roots, tmp_ulist);
4825
			if (ret < 0)
4826
				goto out_free;
4827
			if (ret)
4828
				flags |= FIEMAP_EXTENT_SHARED;
4829
			ret = 0;
Y
Yehuda Sadeh 已提交
4830 4831 4832
		}
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
			flags |= FIEMAP_EXTENT_ENCODED;
4833 4834
		if (test_bit(EXTENT_FLAG_PREALLOC, &em->flags))
			flags |= FIEMAP_EXTENT_UNWRITTEN;
Y
Yehuda Sadeh 已提交
4835 4836 4837

		free_extent_map(em);
		em = NULL;
4838 4839
		if ((em_start >= last) || em_len == (u64)-1 ||
		   (last == (u64)-1 && isize <= em_end)) {
Y
Yehuda Sadeh 已提交
4840 4841 4842 4843
			flags |= FIEMAP_EXTENT_LAST;
			end = 1;
		}

4844
		/* now scan forward to see if this is really the last extent. */
4845
		em = get_extent_skip_holes(inode, off, last_for_get_extent);
4846 4847 4848 4849 4850
		if (IS_ERR(em)) {
			ret = PTR_ERR(em);
			goto out;
		}
		if (!em) {
J
Josef Bacik 已提交
4851 4852 4853
			flags |= FIEMAP_EXTENT_LAST;
			end = 1;
		}
4854 4855
		ret = emit_fiemap_extent(fieinfo, &cache, em_start, disko,
					   em_len, flags);
4856 4857 4858
		if (ret) {
			if (ret == 1)
				ret = 0;
4859
			goto out_free;
4860
		}
Y
Yehuda Sadeh 已提交
4861 4862
	}
out_free:
4863
	if (!ret)
4864
		ret = emit_last_fiemap_cache(fieinfo, &cache);
Y
Yehuda Sadeh 已提交
4865 4866
	free_extent_map(em);
out:
4867
	unlock_extent_cached(&inode->io_tree, start, start + len - 1,
4868
			     &cached_state);
4869 4870

out_free_ulist:
4871
	btrfs_free_path(path);
4872 4873
	ulist_free(roots);
	ulist_free(tmp_ulist);
Y
Yehuda Sadeh 已提交
4874 4875 4876
	return ret;
}

4877 4878 4879 4880 4881
static void __free_extent_buffer(struct extent_buffer *eb)
{
	kmem_cache_free(extent_buffer_cache, eb);
}

4882
int extent_buffer_under_io(const struct extent_buffer *eb)
4883 4884 4885 4886 4887 4888 4889
{
	return (atomic_read(&eb->io_pages) ||
		test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags) ||
		test_bit(EXTENT_BUFFER_DIRTY, &eb->bflags));
}

/*
4890
 * Release all pages attached to the extent buffer.
4891
 */
4892
static void btrfs_release_extent_buffer_pages(struct extent_buffer *eb)
4893
{
4894 4895
	int i;
	int num_pages;
4896
	int mapped = !test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags);
4897 4898 4899

	BUG_ON(extent_buffer_under_io(eb));

4900 4901 4902
	num_pages = num_extent_pages(eb);
	for (i = 0; i < num_pages; i++) {
		struct page *page = eb->pages[i];
4903

4904 4905 4906
		if (!page)
			continue;
		if (mapped)
4907
			spin_lock(&page->mapping->private_lock);
4908 4909 4910 4911 4912 4913 4914 4915 4916 4917 4918 4919
		/*
		 * 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));
4920
			/*
4921 4922
			 * We need to make sure we haven't be attached
			 * to a new eb.
4923
			 */
4924
			detach_page_private(page);
4925
		}
4926 4927 4928 4929

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

4930
		/* One for when we allocated the page */
4931
		put_page(page);
4932
	}
4933 4934 4935 4936 4937 4938 4939
}

/*
 * Helper for releasing the extent buffer.
 */
static inline void btrfs_release_extent_buffer(struct extent_buffer *eb)
{
4940
	btrfs_release_extent_buffer_pages(eb);
4941
	btrfs_leak_debug_del(&eb->fs_info->eb_leak_lock, &eb->leak_list);
4942 4943 4944
	__free_extent_buffer(eb);
}

4945 4946
static struct extent_buffer *
__alloc_extent_buffer(struct btrfs_fs_info *fs_info, u64 start,
4947
		      unsigned long len)
4948 4949 4950
{
	struct extent_buffer *eb = NULL;

4951
	eb = kmem_cache_zalloc(extent_buffer_cache, GFP_NOFS|__GFP_NOFAIL);
4952 4953
	eb->start = start;
	eb->len = len;
4954
	eb->fs_info = fs_info;
4955
	eb->bflags = 0;
4956 4957
	rwlock_init(&eb->lock);
	atomic_set(&eb->blocking_readers, 0);
4958
	eb->blocking_writers = 0;
4959
	eb->lock_recursed = false;
4960 4961
	init_waitqueue_head(&eb->write_lock_wq);
	init_waitqueue_head(&eb->read_lock_wq);
4962

4963 4964
	btrfs_leak_debug_add(&fs_info->eb_leak_lock, &eb->leak_list,
			     &fs_info->allocated_ebs);
4965

4966
	spin_lock_init(&eb->refs_lock);
4967
	atomic_set(&eb->refs, 1);
4968
	atomic_set(&eb->io_pages, 0);
4969

4970 4971 4972 4973 4974 4975
	/*
	 * 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);
4976

4977
#ifdef CONFIG_BTRFS_DEBUG
4978
	eb->spinning_writers = 0;
4979
	atomic_set(&eb->spinning_readers, 0);
4980
	atomic_set(&eb->read_locks, 0);
4981
	eb->write_locks = 0;
4982 4983
#endif

4984 4985 4986
	return eb;
}

4987
struct extent_buffer *btrfs_clone_extent_buffer(const struct extent_buffer *src)
4988
{
4989
	int i;
4990 4991
	struct page *p;
	struct extent_buffer *new;
4992
	int num_pages = num_extent_pages(src);
4993

4994
	new = __alloc_extent_buffer(src->fs_info, src->start, src->len);
4995 4996 4997 4998
	if (new == NULL)
		return NULL;

	for (i = 0; i < num_pages; i++) {
4999
		p = alloc_page(GFP_NOFS);
5000 5001 5002 5003
		if (!p) {
			btrfs_release_extent_buffer(new);
			return NULL;
		}
5004 5005 5006 5007
		attach_extent_buffer_page(new, p);
		WARN_ON(PageDirty(p));
		SetPageUptodate(p);
		new->pages[i] = p;
5008
		copy_page(page_address(p), page_address(src->pages[i]));
5009 5010 5011
	}

	set_bit(EXTENT_BUFFER_UPTODATE, &new->bflags);
5012
	set_bit(EXTENT_BUFFER_UNMAPPED, &new->bflags);
5013 5014 5015 5016

	return new;
}

5017 5018
struct extent_buffer *__alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
						  u64 start, unsigned long len)
5019 5020
{
	struct extent_buffer *eb;
5021 5022
	int num_pages;
	int i;
5023

5024
	eb = __alloc_extent_buffer(fs_info, start, len);
5025 5026 5027
	if (!eb)
		return NULL;

5028
	num_pages = num_extent_pages(eb);
5029
	for (i = 0; i < num_pages; i++) {
5030
		eb->pages[i] = alloc_page(GFP_NOFS);
5031 5032 5033 5034 5035
		if (!eb->pages[i])
			goto err;
	}
	set_extent_buffer_uptodate(eb);
	btrfs_set_header_nritems(eb, 0);
5036
	set_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags);
5037 5038 5039

	return eb;
err:
5040 5041
	for (; i > 0; i--)
		__free_page(eb->pages[i - 1]);
5042 5043 5044 5045
	__free_extent_buffer(eb);
	return NULL;
}

5046
struct extent_buffer *alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
5047
						u64 start)
5048
{
5049
	return __alloc_dummy_extent_buffer(fs_info, start, fs_info->nodesize);
5050 5051
}

5052 5053
static void check_buffer_tree_ref(struct extent_buffer *eb)
{
5054
	int refs;
5055 5056 5057 5058
	/*
	 * The TREE_REF bit is first set when the extent_buffer is added
	 * to the radix tree. It is also reset, if unset, when a new reference
	 * is created by find_extent_buffer.
5059
	 *
5060 5061 5062
	 * It is only cleared in two cases: freeing the last non-tree
	 * reference to the extent_buffer when its STALE bit is set or
	 * calling releasepage when the tree reference is the only reference.
5063
	 *
5064 5065 5066 5067 5068
	 * In both cases, care is taken to ensure that the extent_buffer's
	 * pages are not under io. However, releasepage can be concurrently
	 * called with creating new references, which is prone to race
	 * conditions between the calls to check_buffer_tree_ref in those
	 * codepaths and clearing TREE_REF in try_release_extent_buffer.
5069
	 *
5070 5071 5072 5073 5074 5075 5076
	 * The actual lifetime of the extent_buffer in the radix tree is
	 * adequately protected by the refcount, but the TREE_REF bit and
	 * its corresponding reference are not. To protect against this
	 * class of races, we call check_buffer_tree_ref from the codepaths
	 * which trigger io after they set eb->io_pages. Note that once io is
	 * initiated, TREE_REF can no longer be cleared, so that is the
	 * moment at which any such race is best fixed.
5077
	 */
5078 5079 5080 5081
	refs = atomic_read(&eb->refs);
	if (refs >= 2 && test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
		return;

5082 5083
	spin_lock(&eb->refs_lock);
	if (!test_and_set_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
5084
		atomic_inc(&eb->refs);
5085
	spin_unlock(&eb->refs_lock);
5086 5087
}

5088 5089
static void mark_extent_buffer_accessed(struct extent_buffer *eb,
		struct page *accessed)
5090
{
5091
	int num_pages, i;
5092

5093 5094
	check_buffer_tree_ref(eb);

5095
	num_pages = num_extent_pages(eb);
5096
	for (i = 0; i < num_pages; i++) {
5097 5098
		struct page *p = eb->pages[i];

5099 5100
		if (p != accessed)
			mark_page_accessed(p);
5101 5102 5103
	}
}

5104 5105
struct extent_buffer *find_extent_buffer(struct btrfs_fs_info *fs_info,
					 u64 start)
5106 5107 5108 5109
{
	struct extent_buffer *eb;

	rcu_read_lock();
5110
	eb = radix_tree_lookup(&fs_info->buffer_radix,
5111
			       start >> PAGE_SHIFT);
5112 5113
	if (eb && atomic_inc_not_zero(&eb->refs)) {
		rcu_read_unlock();
5114 5115 5116 5117 5118 5119 5120 5121 5122 5123 5124 5125 5126 5127 5128 5129 5130 5131 5132
		/*
		 * 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);
		}
5133
		mark_extent_buffer_accessed(eb, NULL);
5134 5135 5136 5137 5138 5139 5140
		return eb;
	}
	rcu_read_unlock();

	return NULL;
}

5141 5142
#ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
struct extent_buffer *alloc_test_extent_buffer(struct btrfs_fs_info *fs_info,
5143
					u64 start)
5144 5145 5146 5147 5148 5149 5150
{
	struct extent_buffer *eb, *exists = NULL;
	int ret;

	eb = find_extent_buffer(fs_info, start);
	if (eb)
		return eb;
5151
	eb = alloc_dummy_extent_buffer(fs_info, start);
5152
	if (!eb)
5153
		return ERR_PTR(-ENOMEM);
5154 5155
	eb->fs_info = fs_info;
again:
5156
	ret = radix_tree_preload(GFP_NOFS);
5157 5158
	if (ret) {
		exists = ERR_PTR(ret);
5159
		goto free_eb;
5160
	}
5161 5162
	spin_lock(&fs_info->buffer_lock);
	ret = radix_tree_insert(&fs_info->buffer_radix,
5163
				start >> PAGE_SHIFT, eb);
5164 5165 5166 5167 5168 5169 5170 5171 5172 5173 5174 5175 5176 5177 5178 5179 5180 5181 5182
	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);

	return eb;
free_eb:
	btrfs_release_extent_buffer(eb);
	return exists;
}
#endif

5183
struct extent_buffer *alloc_extent_buffer(struct btrfs_fs_info *fs_info,
5184
					  u64 start)
5185
{
5186
	unsigned long len = fs_info->nodesize;
5187 5188
	int num_pages;
	int i;
5189
	unsigned long index = start >> PAGE_SHIFT;
5190
	struct extent_buffer *eb;
5191
	struct extent_buffer *exists = NULL;
5192
	struct page *p;
5193
	struct address_space *mapping = fs_info->btree_inode->i_mapping;
5194
	int uptodate = 1;
5195
	int ret;
5196

5197
	if (!IS_ALIGNED(start, fs_info->sectorsize)) {
5198 5199 5200 5201
		btrfs_err(fs_info, "bad tree block start %llu", start);
		return ERR_PTR(-EINVAL);
	}

5202
	eb = find_extent_buffer(fs_info, start);
5203
	if (eb)
5204 5205
		return eb;

5206
	eb = __alloc_extent_buffer(fs_info, start, len);
5207
	if (!eb)
5208
		return ERR_PTR(-ENOMEM);
5209

5210
	num_pages = num_extent_pages(eb);
5211
	for (i = 0; i < num_pages; i++, index++) {
5212
		p = find_or_create_page(mapping, index, GFP_NOFS|__GFP_NOFAIL);
5213 5214
		if (!p) {
			exists = ERR_PTR(-ENOMEM);
5215
			goto free_eb;
5216
		}
J
Josef Bacik 已提交
5217 5218 5219 5220 5221 5222 5223 5224 5225 5226 5227 5228 5229 5230

		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);
5231
				put_page(p);
5232
				mark_extent_buffer_accessed(exists, p);
J
Josef Bacik 已提交
5233 5234
				goto free_eb;
			}
5235
			exists = NULL;
J
Josef Bacik 已提交
5236

5237
			/*
J
Josef Bacik 已提交
5238 5239 5240 5241
			 * Do this so attach doesn't complain and we need to
			 * drop the ref the old guy had.
			 */
			ClearPagePrivate(p);
5242
			WARN_ON(PageDirty(p));
5243
			put_page(p);
5244
		}
J
Josef Bacik 已提交
5245 5246
		attach_extent_buffer_page(eb, p);
		spin_unlock(&mapping->private_lock);
5247
		WARN_ON(PageDirty(p));
5248
		eb->pages[i] = p;
5249 5250
		if (!PageUptodate(p))
			uptodate = 0;
C
Chris Mason 已提交
5251 5252

		/*
5253 5254 5255 5256 5257
		 * We can't unlock the pages just yet since the extent buffer
		 * hasn't been properly inserted in the radix tree, this
		 * opens a race with btree_releasepage which can free a page
		 * while we are still filling in all pages for the buffer and
		 * we could crash.
C
Chris Mason 已提交
5258
		 */
5259 5260
	}
	if (uptodate)
5261
		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5262
again:
5263
	ret = radix_tree_preload(GFP_NOFS);
5264 5265
	if (ret) {
		exists = ERR_PTR(ret);
5266
		goto free_eb;
5267
	}
5268

5269 5270
	spin_lock(&fs_info->buffer_lock);
	ret = radix_tree_insert(&fs_info->buffer_radix,
5271
				start >> PAGE_SHIFT, eb);
5272
	spin_unlock(&fs_info->buffer_lock);
5273
	radix_tree_preload_end();
5274
	if (ret == -EEXIST) {
5275
		exists = find_extent_buffer(fs_info, start);
5276 5277 5278
		if (exists)
			goto free_eb;
		else
5279
			goto again;
5280 5281
	}
	/* add one reference for the tree */
5282
	check_buffer_tree_ref(eb);
5283
	set_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags);
C
Chris Mason 已提交
5284 5285

	/*
5286 5287 5288
	 * Now it's safe to unlock the pages because any calls to
	 * btree_releasepage will correctly detect that a page belongs to a
	 * live buffer and won't free them prematurely.
C
Chris Mason 已提交
5289
	 */
5290 5291
	for (i = 0; i < num_pages; i++)
		unlock_page(eb->pages[i]);
5292 5293
	return eb;

5294
free_eb:
5295
	WARN_ON(!atomic_dec_and_test(&eb->refs));
5296 5297 5298 5299
	for (i = 0; i < num_pages; i++) {
		if (eb->pages[i])
			unlock_page(eb->pages[i]);
	}
C
Chris Mason 已提交
5300

5301
	btrfs_release_extent_buffer(eb);
5302
	return exists;
5303 5304
}

5305 5306 5307 5308 5309 5310 5311 5312
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);
}

5313
static int release_extent_buffer(struct extent_buffer *eb)
5314
	__releases(&eb->refs_lock)
5315
{
5316 5317
	lockdep_assert_held(&eb->refs_lock);

5318 5319
	WARN_ON(atomic_read(&eb->refs) == 0);
	if (atomic_dec_and_test(&eb->refs)) {
5320
		if (test_and_clear_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags)) {
5321
			struct btrfs_fs_info *fs_info = eb->fs_info;
5322

5323
			spin_unlock(&eb->refs_lock);
5324

5325 5326
			spin_lock(&fs_info->buffer_lock);
			radix_tree_delete(&fs_info->buffer_radix,
5327
					  eb->start >> PAGE_SHIFT);
5328
			spin_unlock(&fs_info->buffer_lock);
5329 5330
		} else {
			spin_unlock(&eb->refs_lock);
5331
		}
5332

5333
		btrfs_leak_debug_del(&eb->fs_info->eb_leak_lock, &eb->leak_list);
5334
		/* Should be safe to release our pages at this point */
5335
		btrfs_release_extent_buffer_pages(eb);
5336
#ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
5337
		if (unlikely(test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags))) {
5338 5339 5340 5341
			__free_extent_buffer(eb);
			return 1;
		}
#endif
5342
		call_rcu(&eb->rcu_head, btrfs_release_extent_buffer_rcu);
5343
		return 1;
5344 5345
	}
	spin_unlock(&eb->refs_lock);
5346 5347

	return 0;
5348 5349
}

5350 5351
void free_extent_buffer(struct extent_buffer *eb)
{
5352 5353
	int refs;
	int old;
5354 5355 5356
	if (!eb)
		return;

5357 5358
	while (1) {
		refs = atomic_read(&eb->refs);
5359 5360 5361
		if ((!test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags) && refs <= 3)
		    || (test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags) &&
			refs == 1))
5362 5363 5364 5365 5366 5367
			break;
		old = atomic_cmpxchg(&eb->refs, refs, refs - 1);
		if (old == refs)
			return;
	}

5368 5369 5370
	spin_lock(&eb->refs_lock);
	if (atomic_read(&eb->refs) == 2 &&
	    test_bit(EXTENT_BUFFER_STALE, &eb->bflags) &&
5371
	    !extent_buffer_under_io(eb) &&
5372 5373 5374 5375 5376 5377 5378
	    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.
	 */
5379
	release_extent_buffer(eb);
5380 5381 5382 5383 5384
}

void free_extent_buffer_stale(struct extent_buffer *eb)
{
	if (!eb)
5385 5386
		return;

5387 5388 5389
	spin_lock(&eb->refs_lock);
	set_bit(EXTENT_BUFFER_STALE, &eb->bflags);

5390
	if (atomic_read(&eb->refs) == 2 && !extent_buffer_under_io(eb) &&
5391 5392
	    test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
		atomic_dec(&eb->refs);
5393
	release_extent_buffer(eb);
5394 5395
}

5396
void clear_extent_buffer_dirty(const struct extent_buffer *eb)
5397
{
5398 5399
	int i;
	int num_pages;
5400 5401
	struct page *page;

5402
	num_pages = num_extent_pages(eb);
5403 5404

	for (i = 0; i < num_pages; i++) {
5405
		page = eb->pages[i];
5406
		if (!PageDirty(page))
C
Chris Mason 已提交
5407 5408
			continue;

5409
		lock_page(page);
C
Chris Mason 已提交
5410 5411
		WARN_ON(!PagePrivate(page));

5412
		clear_page_dirty_for_io(page);
M
Matthew Wilcox 已提交
5413
		xa_lock_irq(&page->mapping->i_pages);
5414 5415 5416
		if (!PageDirty(page))
			__xa_clear_mark(&page->mapping->i_pages,
					page_index(page), PAGECACHE_TAG_DIRTY);
M
Matthew Wilcox 已提交
5417
		xa_unlock_irq(&page->mapping->i_pages);
5418
		ClearPageError(page);
5419
		unlock_page(page);
5420
	}
5421
	WARN_ON(atomic_read(&eb->refs) == 0);
5422 5423
}

5424
bool set_extent_buffer_dirty(struct extent_buffer *eb)
5425
{
5426 5427
	int i;
	int num_pages;
5428
	bool was_dirty;
5429

5430 5431
	check_buffer_tree_ref(eb);

5432
	was_dirty = test_and_set_bit(EXTENT_BUFFER_DIRTY, &eb->bflags);
5433

5434
	num_pages = num_extent_pages(eb);
5435
	WARN_ON(atomic_read(&eb->refs) == 0);
5436 5437
	WARN_ON(!test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags));

5438 5439 5440
	if (!was_dirty)
		for (i = 0; i < num_pages; i++)
			set_page_dirty(eb->pages[i]);
5441 5442 5443 5444 5445 5446

#ifdef CONFIG_BTRFS_DEBUG
	for (i = 0; i < num_pages; i++)
		ASSERT(PageDirty(eb->pages[i]));
#endif

5447
	return was_dirty;
5448 5449
}

5450
void clear_extent_buffer_uptodate(struct extent_buffer *eb)
5451
{
5452
	int i;
5453
	struct page *page;
5454
	int num_pages;
5455

5456
	clear_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5457
	num_pages = num_extent_pages(eb);
5458
	for (i = 0; i < num_pages; i++) {
5459
		page = eb->pages[i];
C
Chris Mason 已提交
5460 5461
		if (page)
			ClearPageUptodate(page);
5462 5463 5464
	}
}

5465
void set_extent_buffer_uptodate(struct extent_buffer *eb)
5466
{
5467
	int i;
5468
	struct page *page;
5469
	int num_pages;
5470

5471
	set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5472
	num_pages = num_extent_pages(eb);
5473
	for (i = 0; i < num_pages; i++) {
5474
		page = eb->pages[i];
5475 5476 5477 5478
		SetPageUptodate(page);
	}
}

5479
int read_extent_buffer_pages(struct extent_buffer *eb, int wait, int mirror_num)
5480
{
5481
	int i;
5482 5483 5484
	struct page *page;
	int err;
	int ret = 0;
5485 5486
	int locked_pages = 0;
	int all_uptodate = 1;
5487
	int num_pages;
5488
	unsigned long num_reads = 0;
5489
	struct bio *bio = NULL;
C
Chris Mason 已提交
5490
	unsigned long bio_flags = 0;
5491

5492
	if (test_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags))
5493 5494
		return 0;

5495
	num_pages = num_extent_pages(eb);
5496
	for (i = 0; i < num_pages; i++) {
5497
		page = eb->pages[i];
5498
		if (wait == WAIT_NONE) {
5499
			if (!trylock_page(page))
5500
				goto unlock_exit;
5501 5502 5503
		} else {
			lock_page(page);
		}
5504
		locked_pages++;
5505 5506 5507 5508 5509 5510
	}
	/*
	 * 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().
	 */
5511
	for (i = 0; i < num_pages; i++) {
5512
		page = eb->pages[i];
5513 5514
		if (!PageUptodate(page)) {
			num_reads++;
5515
			all_uptodate = 0;
5516
		}
5517
	}
5518

5519
	if (all_uptodate) {
5520
		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5521 5522 5523
		goto unlock_exit;
	}

5524
	clear_bit(EXTENT_BUFFER_READ_ERR, &eb->bflags);
5525
	eb->read_mirror = 0;
5526
	atomic_set(&eb->io_pages, num_reads);
5527 5528 5529 5530 5531
	/*
	 * It is possible for releasepage to clear the TREE_REF bit before we
	 * set io_pages. See check_buffer_tree_ref for a more detailed comment.
	 */
	check_buffer_tree_ref(eb);
5532
	for (i = 0; i < num_pages; i++) {
5533
		page = eb->pages[i];
5534

5535
		if (!PageUptodate(page)) {
5536 5537 5538 5539 5540 5541
			if (ret) {
				atomic_dec(&eb->io_pages);
				unlock_page(page);
				continue;
			}

5542
			ClearPageError(page);
5543 5544 5545 5546
			err = submit_extent_page(REQ_OP_READ | REQ_META, NULL,
					 page, page_offset(page), PAGE_SIZE, 0,
					 &bio, end_bio_extent_readpage,
					 mirror_num, 0, 0, false);
5547 5548
			if (err) {
				/*
5549 5550 5551
				 * We failed to submit the bio so it's the
				 * caller's responsibility to perform cleanup
				 * i.e unlock page/set error bit.
5552
				 */
5553 5554 5555
				ret = err;
				SetPageError(page);
				unlock_page(page);
5556 5557
				atomic_dec(&eb->io_pages);
			}
5558 5559 5560 5561 5562
		} else {
			unlock_page(page);
		}
	}

5563
	if (bio) {
5564
		err = submit_one_bio(bio, mirror_num, bio_flags);
5565 5566
		if (err)
			return err;
5567
	}
5568

5569
	if (ret || wait != WAIT_COMPLETE)
5570
		return ret;
C
Chris Mason 已提交
5571

5572
	for (i = 0; i < num_pages; i++) {
5573
		page = eb->pages[i];
5574
		wait_on_page_locked(page);
C
Chris Mason 已提交
5575
		if (!PageUptodate(page))
5576 5577
			ret = -EIO;
	}
C
Chris Mason 已提交
5578

5579
	return ret;
5580 5581

unlock_exit:
C
Chris Mason 已提交
5582
	while (locked_pages > 0) {
5583
		locked_pages--;
5584 5585
		page = eb->pages[locked_pages];
		unlock_page(page);
5586 5587
	}
	return ret;
5588 5589
}

5590 5591 5592 5593 5594 5595 5596 5597 5598 5599 5600 5601 5602 5603 5604 5605 5606 5607 5608 5609 5610 5611 5612 5613 5614 5615 5616 5617 5618 5619
static bool report_eb_range(const struct extent_buffer *eb, unsigned long start,
			    unsigned long len)
{
	btrfs_warn(eb->fs_info,
		"access to eb bytenr %llu len %lu out of range start %lu len %lu",
		eb->start, eb->len, start, len);
	WARN_ON(IS_ENABLED(CONFIG_BTRFS_DEBUG));

	return true;
}

/*
 * Check if the [start, start + len) range is valid before reading/writing
 * the eb.
 * NOTE: @start and @len are offset inside the eb, not logical address.
 *
 * Caller should not touch the dst/src memory if this function returns error.
 */
static inline int check_eb_range(const struct extent_buffer *eb,
				 unsigned long start, unsigned long len)
{
	unsigned long offset;

	/* start, start + len should not go beyond eb->len nor overflow */
	if (unlikely(check_add_overflow(start, len, &offset) || offset > eb->len))
		return report_eb_range(eb, start, len);

	return false;
}

5620 5621
void read_extent_buffer(const struct extent_buffer *eb, void *dstv,
			unsigned long start, unsigned long len)
5622 5623 5624 5625 5626 5627
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *dst = (char *)dstv;
5628
	unsigned long i = start >> PAGE_SHIFT;
5629

5630
	if (check_eb_range(eb, start, len))
5631
		return;
5632

5633
	offset = offset_in_page(start);
5634

C
Chris Mason 已提交
5635
	while (len > 0) {
5636
		page = eb->pages[i];
5637

5638
		cur = min(len, (PAGE_SIZE - offset));
5639
		kaddr = page_address(page);
5640 5641 5642 5643 5644 5645 5646 5647 5648
		memcpy(dst, kaddr + offset, cur);

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

5649 5650 5651
int read_extent_buffer_to_user_nofault(const struct extent_buffer *eb,
				       void __user *dstv,
				       unsigned long start, unsigned long len)
5652 5653 5654 5655 5656 5657
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char __user *dst = (char __user *)dstv;
5658
	unsigned long i = start >> PAGE_SHIFT;
5659 5660 5661 5662 5663
	int ret = 0;

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

5664
	offset = offset_in_page(start);
5665 5666

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

5669
		cur = min(len, (PAGE_SIZE - offset));
5670
		kaddr = page_address(page);
5671
		if (copy_to_user_nofault(dst, kaddr + offset, cur)) {
5672 5673 5674 5675 5676 5677 5678 5679 5680 5681 5682 5683 5684
			ret = -EFAULT;
			break;
		}

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

	return ret;
}

5685 5686
int memcmp_extent_buffer(const struct extent_buffer *eb, const void *ptrv,
			 unsigned long start, unsigned long len)
5687 5688 5689 5690 5691 5692
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *ptr = (char *)ptrv;
5693
	unsigned long i = start >> PAGE_SHIFT;
5694 5695
	int ret = 0;

5696 5697
	if (check_eb_range(eb, start, len))
		return -EINVAL;
5698

5699
	offset = offset_in_page(start);
5700

C
Chris Mason 已提交
5701
	while (len > 0) {
5702
		page = eb->pages[i];
5703

5704
		cur = min(len, (PAGE_SIZE - offset));
5705

5706
		kaddr = page_address(page);
5707 5708 5709 5710 5711 5712 5713 5714 5715 5716 5717 5718
		ret = memcmp(ptr, kaddr + offset, cur);
		if (ret)
			break;

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

5719
void write_extent_buffer_chunk_tree_uuid(const struct extent_buffer *eb,
5720 5721 5722 5723 5724 5725 5726 5727 5728 5729
		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);
}

5730
void write_extent_buffer_fsid(const struct extent_buffer *eb, const void *srcv)
5731 5732 5733 5734 5735 5736 5737 5738 5739
{
	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);
}

5740
void write_extent_buffer(const struct extent_buffer *eb, const void *srcv,
5741 5742 5743 5744 5745 5746 5747
			 unsigned long start, unsigned long len)
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *src = (char *)srcv;
5748
	unsigned long i = start >> PAGE_SHIFT;
5749

5750 5751
	if (check_eb_range(eb, start, len))
		return;
5752

5753
	offset = offset_in_page(start);
5754

C
Chris Mason 已提交
5755
	while (len > 0) {
5756
		page = eb->pages[i];
5757 5758
		WARN_ON(!PageUptodate(page));

5759
		cur = min(len, PAGE_SIZE - offset);
5760
		kaddr = page_address(page);
5761 5762 5763 5764 5765 5766 5767 5768 5769
		memcpy(kaddr + offset, src, cur);

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

5770
void memzero_extent_buffer(const struct extent_buffer *eb, unsigned long start,
5771
		unsigned long len)
5772 5773 5774 5775 5776
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
5777
	unsigned long i = start >> PAGE_SHIFT;
5778

5779 5780
	if (check_eb_range(eb, start, len))
		return;
5781

5782
	offset = offset_in_page(start);
5783

C
Chris Mason 已提交
5784
	while (len > 0) {
5785
		page = eb->pages[i];
5786 5787
		WARN_ON(!PageUptodate(page));

5788
		cur = min(len, PAGE_SIZE - offset);
5789
		kaddr = page_address(page);
5790
		memset(kaddr + offset, 0, cur);
5791 5792 5793 5794 5795 5796 5797

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

5798 5799
void copy_extent_buffer_full(const struct extent_buffer *dst,
			     const struct extent_buffer *src)
5800 5801
{
	int i;
5802
	int num_pages;
5803 5804 5805

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

5806
	num_pages = num_extent_pages(dst);
5807 5808 5809 5810 5811
	for (i = 0; i < num_pages; i++)
		copy_page(page_address(dst->pages[i]),
				page_address(src->pages[i]));
}

5812 5813
void copy_extent_buffer(const struct extent_buffer *dst,
			const struct extent_buffer *src,
5814 5815 5816 5817 5818 5819 5820 5821
			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;
5822
	unsigned long i = dst_offset >> PAGE_SHIFT;
5823

5824 5825 5826 5827
	if (check_eb_range(dst, dst_offset, len) ||
	    check_eb_range(src, src_offset, len))
		return;

5828 5829
	WARN_ON(src->len != dst_len);

5830
	offset = offset_in_page(dst_offset);
5831

C
Chris Mason 已提交
5832
	while (len > 0) {
5833
		page = dst->pages[i];
5834 5835
		WARN_ON(!PageUptodate(page));

5836
		cur = min(len, (unsigned long)(PAGE_SIZE - offset));
5837

5838
		kaddr = page_address(page);
5839 5840 5841 5842 5843 5844 5845 5846 5847
		read_extent_buffer(src, kaddr + offset, src_offset, cur);

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

5848 5849 5850 5851 5852 5853 5854 5855 5856 5857 5858 5859 5860
/*
 * 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.
 */
5861
static inline void eb_bitmap_offset(const struct extent_buffer *eb,
5862 5863 5864 5865 5866 5867 5868 5869 5870 5871 5872 5873
				    unsigned long start, unsigned long nr,
				    unsigned long *page_index,
				    size_t *page_offset)
{
	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.
	 */
5874
	offset = start + byte_offset;
5875

5876
	*page_index = offset >> PAGE_SHIFT;
5877
	*page_offset = offset_in_page(offset);
5878 5879 5880 5881 5882 5883 5884 5885
}

/**
 * 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
 */
5886
int extent_buffer_test_bit(const struct extent_buffer *eb, unsigned long start,
5887 5888
			   unsigned long nr)
{
5889
	u8 *kaddr;
5890 5891 5892 5893 5894 5895 5896 5897 5898 5899 5900 5901 5902 5903 5904 5905 5906 5907
	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
 */
5908
void extent_buffer_bitmap_set(const struct extent_buffer *eb, unsigned long start,
5909 5910
			      unsigned long pos, unsigned long len)
{
5911
	u8 *kaddr;
5912 5913 5914 5915 5916
	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);
5917
	u8 mask_to_set = BITMAP_FIRST_BYTE_MASK(pos);
5918 5919 5920 5921 5922 5923 5924 5925 5926 5927

	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 已提交
5928
		mask_to_set = ~0;
5929
		if (++offset >= PAGE_SIZE && len > 0) {
5930 5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949
			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
 */
5950 5951 5952
void extent_buffer_bitmap_clear(const struct extent_buffer *eb,
				unsigned long start, unsigned long pos,
				unsigned long len)
5953
{
5954
	u8 *kaddr;
5955 5956 5957 5958 5959
	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);
5960
	u8 mask_to_clear = BITMAP_FIRST_BYTE_MASK(pos);
5961 5962 5963 5964 5965 5966 5967 5968 5969 5970

	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 已提交
5971
		mask_to_clear = ~0;
5972
		if (++offset >= PAGE_SIZE && len > 0) {
5973 5974 5975 5976 5977 5978 5979 5980 5981 5982 5983 5984
			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;
	}
}

5985 5986 5987 5988 5989 5990
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;
}

5991 5992 5993 5994
static void copy_pages(struct page *dst_page, struct page *src_page,
		       unsigned long dst_off, unsigned long src_off,
		       unsigned long len)
{
5995
	char *dst_kaddr = page_address(dst_page);
5996
	char *src_kaddr;
5997
	int must_memmove = 0;
5998

5999
	if (dst_page != src_page) {
6000
		src_kaddr = page_address(src_page);
6001
	} else {
6002
		src_kaddr = dst_kaddr;
6003 6004
		if (areas_overlap(src_off, dst_off, len))
			must_memmove = 1;
6005
	}
6006

6007 6008 6009 6010
	if (must_memmove)
		memmove(dst_kaddr + dst_off, src_kaddr + src_off, len);
	else
		memcpy(dst_kaddr + dst_off, src_kaddr + src_off, len);
6011 6012
}

6013 6014 6015
void memcpy_extent_buffer(const struct extent_buffer *dst,
			  unsigned long dst_offset, unsigned long src_offset,
			  unsigned long len)
6016 6017 6018 6019 6020 6021 6022
{
	size_t cur;
	size_t dst_off_in_page;
	size_t src_off_in_page;
	unsigned long dst_i;
	unsigned long src_i;

6023 6024 6025
	if (check_eb_range(dst, dst_offset, len) ||
	    check_eb_range(dst, src_offset, len))
		return;
6026

C
Chris Mason 已提交
6027
	while (len > 0) {
6028 6029
		dst_off_in_page = offset_in_page(dst_offset);
		src_off_in_page = offset_in_page(src_offset);
6030

6031 6032
		dst_i = dst_offset >> PAGE_SHIFT;
		src_i = src_offset >> PAGE_SHIFT;
6033

6034
		cur = min(len, (unsigned long)(PAGE_SIZE -
6035 6036
					       src_off_in_page));
		cur = min_t(unsigned long, cur,
6037
			(unsigned long)(PAGE_SIZE - dst_off_in_page));
6038

6039
		copy_pages(dst->pages[dst_i], dst->pages[src_i],
6040 6041 6042 6043 6044 6045 6046 6047
			   dst_off_in_page, src_off_in_page, cur);

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

6048 6049 6050
void memmove_extent_buffer(const struct extent_buffer *dst,
			   unsigned long dst_offset, unsigned long src_offset,
			   unsigned long len)
6051 6052 6053 6054 6055 6056 6057 6058 6059
{
	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;
	unsigned long dst_i;
	unsigned long src_i;

6060 6061 6062
	if (check_eb_range(dst, dst_offset, len) ||
	    check_eb_range(dst, src_offset, len))
		return;
6063
	if (dst_offset < src_offset) {
6064 6065 6066
		memcpy_extent_buffer(dst, dst_offset, src_offset, len);
		return;
	}
C
Chris Mason 已提交
6067
	while (len > 0) {
6068 6069
		dst_i = dst_end >> PAGE_SHIFT;
		src_i = src_end >> PAGE_SHIFT;
6070

6071 6072
		dst_off_in_page = offset_in_page(dst_end);
		src_off_in_page = offset_in_page(src_end);
6073 6074 6075

		cur = min_t(unsigned long, len, src_off_in_page + 1);
		cur = min(cur, dst_off_in_page + 1);
6076
		copy_pages(dst->pages[dst_i], dst->pages[src_i],
6077 6078 6079 6080 6081 6082 6083 6084
			   dst_off_in_page - cur + 1,
			   src_off_in_page - cur + 1, cur);

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

6086
int try_release_extent_buffer(struct page *page)
6087
{
6088 6089
	struct extent_buffer *eb;

6090
	/*
6091
	 * We need to make sure nobody is attaching this page to an eb right
6092 6093 6094 6095 6096
	 * now.
	 */
	spin_lock(&page->mapping->private_lock);
	if (!PagePrivate(page)) {
		spin_unlock(&page->mapping->private_lock);
J
Josef Bacik 已提交
6097
		return 1;
6098
	}
6099

6100 6101
	eb = (struct extent_buffer *)page->private;
	BUG_ON(!eb);
6102 6103

	/*
6104 6105 6106
	 * 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.
6107
	 */
6108
	spin_lock(&eb->refs_lock);
6109
	if (atomic_read(&eb->refs) != 1 || extent_buffer_under_io(eb)) {
6110 6111 6112
		spin_unlock(&eb->refs_lock);
		spin_unlock(&page->mapping->private_lock);
		return 0;
6113
	}
6114
	spin_unlock(&page->mapping->private_lock);
6115

6116
	/*
6117 6118
	 * 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.
6119
	 */
6120 6121 6122
	if (!test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags)) {
		spin_unlock(&eb->refs_lock);
		return 0;
6123
	}
6124

6125
	return release_extent_buffer(eb);
6126
}