extent_io.c 154.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 39
static LIST_HEAD(buffers);
static LIST_HEAD(states);
C
Chris Mason 已提交
40

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

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

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

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

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

63
static inline void btrfs_extent_buffer_leak_debug_check(void)
64 65 66
{
	struct extent_buffer *eb;

67 68 69 70 71 72 73 74 75 76 77 78 79
	while (!list_empty(&buffers)) {
		eb = list_entry(buffers.next, struct extent_buffer, leak_list);
		pr_err("BTRFS: buffer leak start %llu len %lu refs %d bflags %lu\n",
		       eb->start, eb->len, atomic_read(&eb->refs), eb->bflags);
		list_del(&eb->leak_list);
		kmem_cache_free(extent_buffer_cache, eb);
	}
}

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

80 81
	while (!list_empty(&states)) {
		state = list_entry(states.next, struct extent_state, leak_list);
82
		pr_err("BTRFS: state leak: start %llu end %llu state %u in tree %d refs %d\n",
83 84
		       state->start, state->end, state->state,
		       extent_state_in_tree(state),
85
		       refcount_read(&state->refs));
86 87 88 89
		list_del(&state->leak_list);
		kmem_cache_free(extent_state_cache, state);
	}
}
90

91 92
#define btrfs_debug_check_extent_io_range(tree, start, end)		\
	__btrfs_debug_check_extent_io_range(__func__, (tree), (start), (end))
93
static inline void __btrfs_debug_check_extent_io_range(const char *caller,
94
		struct extent_io_tree *tree, u64 start, u64 end)
95
{
96 97 98 99 100 101 102 103 104 105 106 107
	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);
	}
108
}
109 110 111
#else
#define btrfs_leak_debug_add(new, head)	do {} while (0)
#define btrfs_leak_debug_del(entry)	do {} while (0)
112 113
#define btrfs_extent_buffer_leak_debug_check()	do {} while (0)
#define btrfs_extent_state_leak_debug_check()	do {} while (0)
114
#define btrfs_debug_check_extent_io_range(c, s, e)	do {} while (0)
C
Chris Mason 已提交
115
#endif
116 117 118 119 120 121 122 123 124 125

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

struct extent_page_data {
	struct bio *bio;
	struct extent_io_tree *tree;
126 127 128
	/* tells writepage not to lock the state bits for this range
	 * it still does the unlocking
	 */
129 130
	unsigned int extent_locked:1;

131
	/* tells the submit_bio code to use REQ_SYNC */
132
	unsigned int sync_io:1;
133 134
};

135
static int add_extent_changeset(struct extent_state *state, unsigned bits,
136 137 138 139 140 141
				 struct extent_changeset *changeset,
				 int set)
{
	int ret;

	if (!changeset)
142
		return 0;
143
	if (set && (state->state & bits) == bits)
144
		return 0;
145
	if (!set && (state->state & bits) == 0)
146
		return 0;
147
	changeset->bytes_changed += state->end - state->start + 1;
148
	ret = ulist_add(&changeset->range_changed, state->start, state->end,
149
			GFP_ATOMIC);
150
	return ret;
151 152
}

153 154 155 156 157 158 159 160 161 162
static int __must_check submit_one_bio(struct bio *bio, int mirror_num,
				       unsigned long bio_flags)
{
	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,
163
						 mirror_num, bio_flags);
164 165 166 167 168 169
	else
		btrfsic_submit_bio(bio);

	return blk_status_to_errno(ret);
}

170 171 172 173 174 175 176 177 178 179
/* 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;
	}
}

180 181 182 183 184 185 186
/*
 * 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)
187
{
188
	int ret = 0;
189

190
	if (epd->bio) {
191
		ret = submit_one_bio(epd->bio, 0, 0);
192 193 194 195 196 197 198
		/*
		 * 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.
		 */
199 200
		epd->bio = NULL;
	}
201
	return ret;
202
}
203

204
int __init extent_state_cache_init(void)
205
{
D
David Sterba 已提交
206
	extent_state_cache = kmem_cache_create("btrfs_extent_state",
207
			sizeof(struct extent_state), 0,
208
			SLAB_MEM_SPREAD, NULL);
209 210
	if (!extent_state_cache)
		return -ENOMEM;
211 212
	return 0;
}
213

214 215
int __init extent_io_init(void)
{
D
David Sterba 已提交
216
	extent_buffer_cache = kmem_cache_create("btrfs_extent_buffer",
217
			sizeof(struct extent_buffer), 0,
218
			SLAB_MEM_SPREAD, NULL);
219
	if (!extent_buffer_cache)
220
		return -ENOMEM;
221

222 223 224
	if (bioset_init(&btrfs_bioset, BIO_POOL_SIZE,
			offsetof(struct btrfs_io_bio, bio),
			BIOSET_NEED_BVECS))
225
		goto free_buffer_cache;
226

227
	if (bioset_integrity_create(&btrfs_bioset, BIO_POOL_SIZE))
228 229
		goto free_bioset;

230 231
	return 0;

232
free_bioset:
233
	bioset_exit(&btrfs_bioset);
234

235 236 237
free_buffer_cache:
	kmem_cache_destroy(extent_buffer_cache);
	extent_buffer_cache = NULL;
238 239
	return -ENOMEM;
}
240

241 242 243
void __cold extent_state_cache_exit(void)
{
	btrfs_extent_state_leak_debug_check();
244 245 246
	kmem_cache_destroy(extent_state_cache);
}

247
void __cold extent_io_exit(void)
248
{
249
	btrfs_extent_buffer_leak_debug_check();
250 251 252 253 254 255

	/*
	 * Make sure all delayed rcu free are flushed before we
	 * destroy caches.
	 */
	rcu_barrier();
256
	kmem_cache_destroy(extent_buffer_cache);
257
	bioset_exit(&btrfs_bioset);
258 259
}

260
void extent_io_tree_init(struct btrfs_fs_info *fs_info,
261 262
			 struct extent_io_tree *tree, unsigned int owner,
			 void *private_data)
263
{
264
	tree->fs_info = fs_info;
265
	tree->state = RB_ROOT;
266 267
	tree->ops = NULL;
	tree->dirty_bytes = 0;
268
	spin_lock_init(&tree->lock);
269
	tree->private_data = private_data;
270
	tree->owner = owner;
271 272
}

273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301
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);
}

302
static struct extent_state *alloc_extent_state(gfp_t mask)
303 304 305
{
	struct extent_state *state;

306 307 308 309 310
	/*
	 * The given mask might be not appropriate for the slab allocator,
	 * drop the unsupported bits
	 */
	mask &= ~(__GFP_DMA32|__GFP_HIGHMEM);
311
	state = kmem_cache_alloc(extent_state_cache, mask);
312
	if (!state)
313 314
		return state;
	state->state = 0;
315
	state->failrec = NULL;
316
	RB_CLEAR_NODE(&state->rb_node);
317
	btrfs_leak_debug_add(&state->leak_list, &states);
318
	refcount_set(&state->refs, 1);
319
	init_waitqueue_head(&state->wq);
320
	trace_alloc_extent_state(state, mask, _RET_IP_);
321 322 323
	return state;
}

324
void free_extent_state(struct extent_state *state)
325 326 327
{
	if (!state)
		return;
328
	if (refcount_dec_and_test(&state->refs)) {
329
		WARN_ON(extent_state_in_tree(state));
330
		btrfs_leak_debug_del(&state->leak_list);
331
		trace_free_extent_state(state, _RET_IP_);
332 333 334 335
		kmem_cache_free(extent_state_cache, state);
	}
}

336 337 338
static struct rb_node *tree_insert(struct rb_root *root,
				   struct rb_node *search_start,
				   u64 offset,
339 340 341
				   struct rb_node *node,
				   struct rb_node ***p_in,
				   struct rb_node **parent_in)
342
{
343
	struct rb_node **p;
C
Chris Mason 已提交
344
	struct rb_node *parent = NULL;
345 346
	struct tree_entry *entry;

347 348 349 350 351 352
	if (p_in && parent_in) {
		p = *p_in;
		parent = *parent_in;
		goto do_insert;
	}

353
	p = search_start ? &search_start : &root->rb_node;
C
Chris Mason 已提交
354
	while (*p) {
355 356 357 358 359 360 361 362 363 364 365
		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;
	}

366
do_insert:
367 368 369 370 371
	rb_link_node(node, parent, p);
	rb_insert_color(node, root);
	return NULL;
}

N
Nikolay Borisov 已提交
372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389
/**
 * __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.
 */
390
static struct rb_node *__etree_search(struct extent_io_tree *tree, u64 offset,
391
				      struct rb_node **next_ret,
392
				      struct rb_node **prev_ret,
393 394
				      struct rb_node ***p_ret,
				      struct rb_node **parent_ret)
395
{
396
	struct rb_root *root = &tree->state;
397
	struct rb_node **n = &root->rb_node;
398 399 400 401 402
	struct rb_node *prev = NULL;
	struct rb_node *orig_prev = NULL;
	struct tree_entry *entry;
	struct tree_entry *prev_entry = NULL;

403 404 405
	while (*n) {
		prev = *n;
		entry = rb_entry(prev, struct tree_entry, rb_node);
406 407 408
		prev_entry = entry;

		if (offset < entry->start)
409
			n = &(*n)->rb_left;
410
		else if (offset > entry->end)
411
			n = &(*n)->rb_right;
C
Chris Mason 已提交
412
		else
413
			return *n;
414 415
	}

416 417 418 419 420
	if (p_ret)
		*p_ret = n;
	if (parent_ret)
		*parent_ret = prev;

421
	if (next_ret) {
422
		orig_prev = prev;
C
Chris Mason 已提交
423
		while (prev && offset > prev_entry->end) {
424 425 426
			prev = rb_next(prev);
			prev_entry = rb_entry(prev, struct tree_entry, rb_node);
		}
427
		*next_ret = prev;
428 429 430
		prev = orig_prev;
	}

431
	if (prev_ret) {
432
		prev_entry = rb_entry(prev, struct tree_entry, rb_node);
C
Chris Mason 已提交
433
		while (prev && offset < prev_entry->start) {
434 435 436
			prev = rb_prev(prev);
			prev_entry = rb_entry(prev, struct tree_entry, rb_node);
		}
437
		*prev_ret = prev;
438 439 440 441
	}
	return NULL;
}

442 443 444 445 446
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)
447
{
448
	struct rb_node *next= NULL;
449
	struct rb_node *ret;
450

451
	ret = __etree_search(tree, offset, &next, NULL, p_ret, parent_ret);
C
Chris Mason 已提交
452
	if (!ret)
453
		return next;
454 455 456
	return ret;
}

457 458 459 460 461 462
static inline struct rb_node *tree_search(struct extent_io_tree *tree,
					  u64 offset)
{
	return tree_search_for_insert(tree, offset, NULL, NULL);
}

463 464 465 466 467 468 469 470 471
/*
 * 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.
 */
472 473
static void merge_state(struct extent_io_tree *tree,
		        struct extent_state *state)
474 475 476 477
{
	struct extent_state *other;
	struct rb_node *other_node;

N
Nikolay Borisov 已提交
478
	if (state->state & (EXTENT_LOCKED | EXTENT_BOUNDARY))
479
		return;
480 481 482 483 484 485

	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) {
486 487 488 489
			if (tree->private_data &&
			    is_data_inode(tree->private_data))
				btrfs_merge_delalloc_extent(tree->private_data,
							    state, other);
490 491
			state->start = other->start;
			rb_erase(&other->rb_node, &tree->state);
492
			RB_CLEAR_NODE(&other->rb_node);
493 494 495 496 497 498 499 500
			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) {
501 502 503 504
			if (tree->private_data &&
			    is_data_inode(tree->private_data))
				btrfs_merge_delalloc_extent(tree->private_data,
							    state, other);
505 506
			state->end = other->end;
			rb_erase(&other->rb_node, &tree->state);
507
			RB_CLEAR_NODE(&other->rb_node);
508
			free_extent_state(other);
509 510 511 512
		}
	}
}

513
static void set_state_bits(struct extent_io_tree *tree,
514 515
			   struct extent_state *state, unsigned *bits,
			   struct extent_changeset *changeset);
516

517 518 519 520 521 522 523 524 525 526 527 528
/*
 * 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,
529 530
			struct rb_node ***p,
			struct rb_node **parent,
531
			unsigned *bits, struct extent_changeset *changeset)
532 533 534
{
	struct rb_node *node;

535 536 537 538 539
	if (end < start) {
		btrfs_err(tree->fs_info,
			"insert state: end < start %llu %llu", end, start);
		WARN_ON(1);
	}
540 541
	state->start = start;
	state->end = end;
J
Josef Bacik 已提交
542

543
	set_state_bits(tree, state, bits, changeset);
544

545
	node = tree_insert(&tree->state, NULL, end, &state->rb_node, p, parent);
546 547 548
	if (node) {
		struct extent_state *found;
		found = rb_entry(node, struct extent_state, rb_node);
549 550
		btrfs_err(tree->fs_info,
		       "found node %llu %llu on insert of %llu %llu",
551
		       found->start, found->end, start, end);
552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575
		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 已提交
576

577 578
	if (tree->private_data && is_data_inode(tree->private_data))
		btrfs_split_delalloc_extent(tree->private_data, orig, split);
J
Josef Bacik 已提交
579

580 581 582 583 584
	prealloc->start = orig->start;
	prealloc->end = split - 1;
	prealloc->state = orig->state;
	orig->start = split;

585 586
	node = tree_insert(&tree->state, &orig->rb_node, prealloc->end,
			   &prealloc->rb_node, NULL, NULL);
587 588 589 590 591 592 593
	if (node) {
		free_extent_state(prealloc);
		return -EEXIST;
	}
	return 0;
}

594 595 596 597 598 599 600 601 602
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;
}

603 604
/*
 * utility function to clear some bits in an extent state struct.
605
 * it will optionally wake up anyone waiting on this state (wake == 1).
606 607 608 609
 *
 * If no bits are set on the state struct after clearing things, the
 * struct is freed and removed from the tree
 */
610 611
static struct extent_state *clear_state_bit(struct extent_io_tree *tree,
					    struct extent_state *state,
612 613
					    unsigned *bits, int wake,
					    struct extent_changeset *changeset)
614
{
615
	struct extent_state *next;
616
	unsigned bits_to_clear = *bits & ~EXTENT_CTLBITS;
617
	int ret;
618

619
	if ((bits_to_clear & EXTENT_DIRTY) && (state->state & EXTENT_DIRTY)) {
620 621 622 623
		u64 range = state->end - state->start + 1;
		WARN_ON(range > tree->dirty_bytes);
		tree->dirty_bytes -= range;
	}
624 625 626 627

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

628 629
	ret = add_extent_changeset(state, bits_to_clear, changeset, 0);
	BUG_ON(ret < 0);
630
	state->state &= ~bits_to_clear;
631 632
	if (wake)
		wake_up(&state->wq);
633
	if (state->state == 0) {
634
		next = next_state(state);
635
		if (extent_state_in_tree(state)) {
636
			rb_erase(&state->rb_node, &tree->state);
637
			RB_CLEAR_NODE(&state->rb_node);
638 639 640 641 642 643
			free_extent_state(state);
		} else {
			WARN_ON(1);
		}
	} else {
		merge_state(tree, state);
644
		next = next_state(state);
645
	}
646
	return next;
647 648
}

649 650 651 652 653 654 655 656 657
static struct extent_state *
alloc_extent_state_atomic(struct extent_state *prealloc)
{
	if (!prealloc)
		prealloc = alloc_extent_state(GFP_ATOMIC);

	return prealloc;
}

658
static void extent_io_tree_panic(struct extent_io_tree *tree, int err)
659
{
660 661 662 663
	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");
664 665
}

666 667 668 669 670 671 672 673 674 675
/*
 * 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.
 *
676
 * This takes the tree lock, and returns 0 on success and < 0 on error.
677
 */
678
int __clear_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
679 680 681
			      unsigned bits, int wake, int delete,
			      struct extent_state **cached_state,
			      gfp_t mask, struct extent_changeset *changeset)
682 683
{
	struct extent_state *state;
684
	struct extent_state *cached;
685 686
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
687
	u64 last_end;
688
	int err;
689
	int clear = 0;
690

691
	btrfs_debug_check_extent_io_range(tree, start, end);
692
	trace_btrfs_clear_extent_bit(tree, start, end - start + 1, bits);
693

694 695 696
	if (bits & EXTENT_DELALLOC)
		bits |= EXTENT_NORESERVE;

697 698 699
	if (delete)
		bits |= ~EXTENT_CTLBITS;

N
Nikolay Borisov 已提交
700
	if (bits & (EXTENT_LOCKED | EXTENT_BOUNDARY))
701
		clear = 1;
702
again:
703
	if (!prealloc && gfpflags_allow_blocking(mask)) {
704 705 706 707 708 709 710
		/*
		 * 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.
		 */
711 712 713
		prealloc = alloc_extent_state(mask);
	}

714
	spin_lock(&tree->lock);
715 716
	if (cached_state) {
		cached = *cached_state;
717 718 719 720 721 722

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

723 724
		if (cached && extent_state_in_tree(cached) &&
		    cached->start <= start && cached->end > start) {
725
			if (clear)
726
				refcount_dec(&cached->refs);
727
			state = cached;
728
			goto hit_next;
729
		}
730 731
		if (clear)
			free_extent_state(cached);
732
	}
733 734 735 736
	/*
	 * this search will find the extents that end after
	 * our range starts
	 */
737
	node = tree_search(tree, start);
738 739 740
	if (!node)
		goto out;
	state = rb_entry(node, struct extent_state, rb_node);
741
hit_next:
742 743 744
	if (state->start > end)
		goto out;
	WARN_ON(state->end < start);
745
	last_end = state->end;
746

747
	/* the state doesn't have the wanted bits, go ahead */
748 749
	if (!(state->state & bits)) {
		state = next_state(state);
750
		goto next;
751
	}
752

753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769
	/*
	 *     | ---- 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) {
770 771
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
772
		err = split_state(tree, state, prealloc, start);
773 774 775
		if (err)
			extent_io_tree_panic(tree, err);

776 777 778 779
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
780 781
			state = clear_state_bit(tree, state, &bits, wake,
						changeset);
782
			goto next;
783 784 785 786 787 788 789 790 791 792
		}
		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) {
793 794
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
795
		err = split_state(tree, state, prealloc, end + 1);
796 797 798
		if (err)
			extent_io_tree_panic(tree, err);

799 800
		if (wake)
			wake_up(&state->wq);
801

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

804 805 806
		prealloc = NULL;
		goto out;
	}
807

808
	state = clear_state_bit(tree, state, &bits, wake, changeset);
809
next:
810 811 812
	if (last_end == (u64)-1)
		goto out;
	start = last_end + 1;
813
	if (start <= end && state && !need_resched())
814
		goto hit_next;
815 816 817 818

search_again:
	if (start > end)
		goto out;
819
	spin_unlock(&tree->lock);
820
	if (gfpflags_allow_blocking(mask))
821 822
		cond_resched();
	goto again;
823 824 825 826 827 828 829 830

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

	return 0;

831 832
}

833 834
static void wait_on_state(struct extent_io_tree *tree,
			  struct extent_state *state)
835 836
		__releases(tree->lock)
		__acquires(tree->lock)
837 838 839
{
	DEFINE_WAIT(wait);
	prepare_to_wait(&state->wq, &wait, TASK_UNINTERRUPTIBLE);
840
	spin_unlock(&tree->lock);
841
	schedule();
842
	spin_lock(&tree->lock);
843 844 845 846 847 848 849 850
	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
 */
851 852
static void wait_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
			    unsigned long bits)
853 854 855 856
{
	struct extent_state *state;
	struct rb_node *node;

857
	btrfs_debug_check_extent_io_range(tree, start, end);
858

859
	spin_lock(&tree->lock);
860 861 862 863 864 865
again:
	while (1) {
		/*
		 * this search will find all the extents that end after
		 * our range starts
		 */
866
		node = tree_search(tree, start);
867
process_node:
868 869 870 871 872 873 874 875 876 877
		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;
878
			refcount_inc(&state->refs);
879 880 881 882 883 884 885 886 887
			wait_on_state(tree, state);
			free_extent_state(state);
			goto again;
		}
		start = state->end + 1;

		if (start > end)
			break;

888 889 890 891
		if (!cond_resched_lock(&tree->lock)) {
			node = rb_next(node);
			goto process_node;
		}
892 893
	}
out:
894
	spin_unlock(&tree->lock);
895 896
}

897
static void set_state_bits(struct extent_io_tree *tree,
898
			   struct extent_state *state,
899
			   unsigned *bits, struct extent_changeset *changeset)
900
{
901
	unsigned bits_to_set = *bits & ~EXTENT_CTLBITS;
902
	int ret;
J
Josef Bacik 已提交
903

904 905 906
	if (tree->private_data && is_data_inode(tree->private_data))
		btrfs_set_delalloc_extent(tree->private_data, state, bits);

907
	if ((bits_to_set & EXTENT_DIRTY) && !(state->state & EXTENT_DIRTY)) {
908 909 910
		u64 range = state->end - state->start + 1;
		tree->dirty_bytes += range;
	}
911 912
	ret = add_extent_changeset(state, bits_to_set, changeset, 1);
	BUG_ON(ret < 0);
913
	state->state |= bits_to_set;
914 915
}

916 917
static void cache_state_if_flags(struct extent_state *state,
				 struct extent_state **cached_ptr,
918
				 unsigned flags)
919 920
{
	if (cached_ptr && !(*cached_ptr)) {
921
		if (!flags || (state->state & flags)) {
922
			*cached_ptr = state;
923
			refcount_inc(&state->refs);
924 925 926 927
		}
	}
}

928 929 930 931
static void cache_state(struct extent_state *state,
			struct extent_state **cached_ptr)
{
	return cache_state_if_flags(state, cached_ptr,
N
Nikolay Borisov 已提交
932
				    EXTENT_LOCKED | EXTENT_BOUNDARY);
933 934
}

935
/*
936 937
 * 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.
938
 *
939 940 941
 * 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.
942
 *
943
 * [start, end] is inclusive This takes the tree lock.
944
 */
945

J
Jeff Mahoney 已提交
946 947
static int __must_check
__set_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
948
		 unsigned bits, unsigned exclusive_bits,
949
		 u64 *failed_start, struct extent_state **cached_state,
950
		 gfp_t mask, struct extent_changeset *changeset)
951 952 953 954
{
	struct extent_state *state;
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
955 956
	struct rb_node **p;
	struct rb_node *parent;
957 958 959
	int err = 0;
	u64 last_start;
	u64 last_end;
960

961
	btrfs_debug_check_extent_io_range(tree, start, end);
962
	trace_btrfs_set_extent_bit(tree, start, end - start + 1, bits);
963

964
again:
965
	if (!prealloc && gfpflags_allow_blocking(mask)) {
966 967 968 969 970 971 972
		/*
		 * 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.
		 */
973 974 975
		prealloc = alloc_extent_state(mask);
	}

976
	spin_lock(&tree->lock);
977 978
	if (cached_state && *cached_state) {
		state = *cached_state;
979
		if (state->start <= start && state->end > start &&
980
		    extent_state_in_tree(state)) {
981 982 983 984
			node = &state->rb_node;
			goto hit_next;
		}
	}
985 986 987 988
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
989
	node = tree_search_for_insert(tree, start, &p, &parent);
990
	if (!node) {
991 992
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
993
		err = insert_state(tree, prealloc, start, end,
994
				   &p, &parent, &bits, changeset);
995 996 997
		if (err)
			extent_io_tree_panic(tree, err);

998
		cache_state(prealloc, cached_state);
999 1000 1001 1002
		prealloc = NULL;
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
C
Chris Mason 已提交
1003
hit_next:
1004 1005 1006 1007 1008 1009 1010 1011 1012 1013
	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) {
1014
		if (state->state & exclusive_bits) {
1015 1016 1017 1018
			*failed_start = state->start;
			err = -EEXIST;
			goto out;
		}
1019

1020
		set_state_bits(tree, state, &bits, changeset);
1021
		cache_state(state, cached_state);
1022
		merge_state(tree, state);
1023 1024 1025
		if (last_end == (u64)-1)
			goto out;
		start = last_end + 1;
1026 1027 1028 1029
		state = next_state(state);
		if (start < end && state && state->start == start &&
		    !need_resched())
			goto hit_next;
1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049
		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) {
1050
		if (state->state & exclusive_bits) {
1051 1052 1053 1054
			*failed_start = start;
			err = -EEXIST;
			goto out;
		}
1055 1056 1057

		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
1058
		err = split_state(tree, state, prealloc, start);
1059 1060 1061
		if (err)
			extent_io_tree_panic(tree, err);

1062 1063 1064 1065
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
1066
			set_state_bits(tree, state, &bits, changeset);
1067
			cache_state(state, cached_state);
1068
			merge_state(tree, state);
1069 1070 1071
			if (last_end == (u64)-1)
				goto out;
			start = last_end + 1;
1072 1073 1074 1075
			state = next_state(state);
			if (start < end && state && state->start == start &&
			    !need_resched())
				goto hit_next;
1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090
		}
		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 已提交
1091
			this_end = last_start - 1;
1092 1093 1094

		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
1095 1096 1097 1098 1099

		/*
		 * Avoid to free 'prealloc' if it can be merged with
		 * the later extent.
		 */
1100
		err = insert_state(tree, prealloc, start, this_end,
1101
				   NULL, NULL, &bits, changeset);
1102 1103 1104
		if (err)
			extent_io_tree_panic(tree, err);

J
Josef Bacik 已提交
1105 1106
		cache_state(prealloc, cached_state);
		prealloc = NULL;
1107 1108 1109 1110 1111 1112 1113 1114 1115 1116
		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) {
1117
		if (state->state & exclusive_bits) {
1118 1119 1120 1121
			*failed_start = start;
			err = -EEXIST;
			goto out;
		}
1122 1123 1124

		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
1125
		err = split_state(tree, state, prealloc, end + 1);
1126 1127
		if (err)
			extent_io_tree_panic(tree, err);
1128

1129
		set_state_bits(tree, prealloc, &bits, changeset);
1130
		cache_state(prealloc, cached_state);
1131 1132 1133 1134 1135
		merge_state(tree, prealloc);
		prealloc = NULL;
		goto out;
	}

1136 1137 1138 1139 1140 1141 1142
search_again:
	if (start > end)
		goto out;
	spin_unlock(&tree->lock);
	if (gfpflags_allow_blocking(mask))
		cond_resched();
	goto again;
1143 1144

out:
1145
	spin_unlock(&tree->lock);
1146 1147 1148 1149 1150 1151 1152
	if (prealloc)
		free_extent_state(prealloc);

	return err;

}

1153
int set_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1154
		   unsigned bits, u64 * failed_start,
1155
		   struct extent_state **cached_state, gfp_t mask)
J
Jeff Mahoney 已提交
1156 1157
{
	return __set_extent_bit(tree, start, end, bits, 0, failed_start,
1158
				cached_state, mask, NULL);
J
Jeff Mahoney 已提交
1159 1160 1161
}


J
Josef Bacik 已提交
1162
/**
L
Liu Bo 已提交
1163 1164
 * convert_extent_bit - convert all bits in a given range from one bit to
 * 			another
J
Josef Bacik 已提交
1165 1166 1167 1168 1169
 * @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
1170
 * @cached_state:	state that we're going to cache
J
Josef Bacik 已提交
1171 1172 1173 1174 1175 1176
 *
 * 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.
1177 1178
 *
 * All allocations are done with GFP_NOFS.
J
Josef Bacik 已提交
1179 1180
 */
int convert_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1181
		       unsigned bits, unsigned clear_bits,
1182
		       struct extent_state **cached_state)
J
Josef Bacik 已提交
1183 1184 1185 1186
{
	struct extent_state *state;
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
1187 1188
	struct rb_node **p;
	struct rb_node *parent;
J
Josef Bacik 已提交
1189 1190 1191
	int err = 0;
	u64 last_start;
	u64 last_end;
1192
	bool first_iteration = true;
J
Josef Bacik 已提交
1193

1194
	btrfs_debug_check_extent_io_range(tree, start, end);
1195 1196
	trace_btrfs_convert_extent_bit(tree, start, end - start + 1, bits,
				       clear_bits);
1197

J
Josef Bacik 已提交
1198
again:
1199
	if (!prealloc) {
1200 1201 1202 1203 1204 1205 1206
		/*
		 * 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.
		 */
1207
		prealloc = alloc_extent_state(GFP_NOFS);
1208
		if (!prealloc && !first_iteration)
J
Josef Bacik 已提交
1209 1210 1211 1212
			return -ENOMEM;
	}

	spin_lock(&tree->lock);
1213 1214 1215
	if (cached_state && *cached_state) {
		state = *cached_state;
		if (state->start <= start && state->end > start &&
1216
		    extent_state_in_tree(state)) {
1217 1218 1219 1220 1221
			node = &state->rb_node;
			goto hit_next;
		}
	}

J
Josef Bacik 已提交
1222 1223 1224 1225
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1226
	node = tree_search_for_insert(tree, start, &p, &parent);
J
Josef Bacik 已提交
1227 1228
	if (!node) {
		prealloc = alloc_extent_state_atomic(prealloc);
1229 1230 1231 1232
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
1233
		err = insert_state(tree, prealloc, start, end,
1234
				   &p, &parent, &bits, NULL);
1235 1236
		if (err)
			extent_io_tree_panic(tree, err);
1237 1238
		cache_state(prealloc, cached_state);
		prealloc = NULL;
J
Josef Bacik 已提交
1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252
		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) {
1253
		set_state_bits(tree, state, &bits, NULL);
1254
		cache_state(state, cached_state);
1255
		state = clear_state_bit(tree, state, &clear_bits, 0, NULL);
J
Josef Bacik 已提交
1256 1257 1258
		if (last_end == (u64)-1)
			goto out;
		start = last_end + 1;
1259 1260 1261
		if (start < end && state && state->start == start &&
		    !need_resched())
			goto hit_next;
J
Josef Bacik 已提交
1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282
		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);
1283 1284 1285 1286
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1287
		err = split_state(tree, state, prealloc, start);
1288 1289
		if (err)
			extent_io_tree_panic(tree, err);
J
Josef Bacik 已提交
1290 1291 1292 1293
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
1294
			set_state_bits(tree, state, &bits, NULL);
1295
			cache_state(state, cached_state);
1296 1297
			state = clear_state_bit(tree, state, &clear_bits, 0,
						NULL);
J
Josef Bacik 已提交
1298 1299 1300
			if (last_end == (u64)-1)
				goto out;
			start = last_end + 1;
1301 1302 1303
			if (start < end && state && state->start == start &&
			    !need_resched())
				goto hit_next;
J
Josef Bacik 已提交
1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321
		}
		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);
1322 1323 1324 1325
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1326 1327 1328 1329 1330 1331

		/*
		 * Avoid to free 'prealloc' if it can be merged with
		 * the later extent.
		 */
		err = insert_state(tree, prealloc, start, this_end,
1332
				   NULL, NULL, &bits, NULL);
1333 1334
		if (err)
			extent_io_tree_panic(tree, err);
1335
		cache_state(prealloc, cached_state);
J
Josef Bacik 已提交
1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347
		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);
1348 1349 1350 1351
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1352 1353

		err = split_state(tree, state, prealloc, end + 1);
1354 1355
		if (err)
			extent_io_tree_panic(tree, err);
J
Josef Bacik 已提交
1356

1357
		set_state_bits(tree, prealloc, &bits, NULL);
1358
		cache_state(prealloc, cached_state);
1359
		clear_state_bit(tree, prealloc, &clear_bits, 0, NULL);
J
Josef Bacik 已提交
1360 1361 1362 1363 1364 1365 1366 1367
		prealloc = NULL;
		goto out;
	}

search_again:
	if (start > end)
		goto out;
	spin_unlock(&tree->lock);
1368
	cond_resched();
1369
	first_iteration = false;
J
Josef Bacik 已提交
1370 1371 1372 1373 1374 1375 1376 1377 1378 1379
	goto again;

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

	return err;
}

1380
/* wrappers around set/clear extent bit */
1381
int set_record_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1382
			   unsigned bits, struct extent_changeset *changeset)
1383 1384 1385 1386 1387 1388 1389 1390 1391
{
	/*
	 * 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);

1392
	return __set_extent_bit(tree, start, end, bits, 0, NULL, NULL, GFP_NOFS,
1393 1394 1395
				changeset);
}

1396 1397 1398 1399 1400 1401 1402
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);
}

1403 1404
int clear_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
		     unsigned bits, int wake, int delete,
1405
		     struct extent_state **cached)
1406 1407
{
	return __clear_extent_bit(tree, start, end, bits, wake, delete,
1408
				  cached, GFP_NOFS, NULL);
1409 1410 1411
}

int clear_record_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1412
		unsigned bits, struct extent_changeset *changeset)
1413 1414 1415 1416 1417 1418 1419
{
	/*
	 * Don't support EXTENT_LOCKED case, same reason as
	 * set_record_extent_bits().
	 */
	BUG_ON(bits & EXTENT_LOCKED);

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

C
Chris Mason 已提交
1424 1425 1426 1427
/*
 * either insert or lock state struct between start and end use mask to tell
 * us if waiting is desired.
 */
1428
int lock_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1429
		     struct extent_state **cached_state)
1430 1431 1432
{
	int err;
	u64 failed_start;
1433

1434
	while (1) {
1435
		err = __set_extent_bit(tree, start, end, EXTENT_LOCKED,
J
Jeff Mahoney 已提交
1436
				       EXTENT_LOCKED, &failed_start,
1437
				       cached_state, GFP_NOFS, NULL);
1438
		if (err == -EEXIST) {
1439 1440
			wait_extent_bit(tree, failed_start, end, EXTENT_LOCKED);
			start = failed_start;
1441
		} else
1442 1443 1444 1445 1446 1447
			break;
		WARN_ON(start > end);
	}
	return err;
}

1448
int try_lock_extent(struct extent_io_tree *tree, u64 start, u64 end)
1449 1450 1451 1452
{
	int err;
	u64 failed_start;

J
Jeff Mahoney 已提交
1453
	err = __set_extent_bit(tree, start, end, EXTENT_LOCKED, EXTENT_LOCKED,
1454
			       &failed_start, NULL, GFP_NOFS, NULL);
Y
Yan Zheng 已提交
1455 1456 1457
	if (err == -EEXIST) {
		if (failed_start > start)
			clear_extent_bit(tree, start, failed_start - 1,
1458
					 EXTENT_LOCKED, 1, 0, NULL);
1459
		return 0;
Y
Yan Zheng 已提交
1460
	}
1461 1462 1463
	return 1;
}

1464
void extent_range_clear_dirty_for_io(struct inode *inode, u64 start, u64 end)
1465
{
1466 1467
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
1468 1469 1470 1471 1472 1473
	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);
1474
		put_page(page);
1475 1476 1477 1478
		index++;
	}
}

1479
void extent_range_redirty_for_io(struct inode *inode, u64 start, u64 end)
1480
{
1481 1482
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
1483 1484 1485 1486 1487 1488
	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);
1489
		account_page_redirty(page);
1490
		put_page(page);
1491 1492 1493 1494
		index++;
	}
}

C
Chris Mason 已提交
1495 1496 1497 1498
/* 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'
 */
1499 1500
static struct extent_state *
find_first_extent_bit_state(struct extent_io_tree *tree,
1501
			    u64 start, unsigned bits)
C
Chris Mason 已提交
1502 1503 1504 1505 1506 1507 1508 1509 1510
{
	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 已提交
1511
	if (!node)
C
Chris Mason 已提交
1512 1513
		goto out;

C
Chris Mason 已提交
1514
	while (1) {
C
Chris Mason 已提交
1515
		state = rb_entry(node, struct extent_state, rb_node);
C
Chris Mason 已提交
1516
		if (state->end >= start && (state->state & bits))
C
Chris Mason 已提交
1517
			return state;
C
Chris Mason 已提交
1518

C
Chris Mason 已提交
1519 1520 1521 1522 1523 1524 1525 1526
		node = rb_next(node);
		if (!node)
			break;
	}
out:
	return NULL;
}

1527 1528 1529 1530 1531
/*
 * 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.
 *
1532
 * If nothing was found, 1 is returned. If found something, return 0.
1533 1534
 */
int find_first_extent_bit(struct extent_io_tree *tree, u64 start,
1535
			  u64 *start_ret, u64 *end_ret, unsigned bits,
1536
			  struct extent_state **cached_state)
1537 1538 1539 1540 1541
{
	struct extent_state *state;
	int ret = 1;

	spin_lock(&tree->lock);
1542 1543
	if (cached_state && *cached_state) {
		state = *cached_state;
1544
		if (state->end == start - 1 && extent_state_in_tree(state)) {
1545
			while ((state = next_state(state)) != NULL) {
1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556
				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;
	}

1557
	state = find_first_extent_bit_state(tree, start, bits);
1558
got_it:
1559
	if (state) {
1560
		cache_state_if_flags(state, cached_state, 0);
1561 1562 1563 1564
		*start_ret = state->start;
		*end_ret = state->end;
		ret = 0;
	}
1565
out:
1566 1567 1568 1569
	spin_unlock(&tree->lock);
	return ret;
}

1570
/**
1571 1572
 * find_first_clear_extent_bit - find the first range that has @bits not set.
 * This range could start before @start.
1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611
 *
 * @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);
		if (!node) {
			node = next;
			if (!node) {
				/*
				 * We are past the last allocated chunk,
				 * set start at the end of the last extent. The
				 * device alloc tree should never be empty so
				 * prev is always set.
				 */
				ASSERT(prev);
				state = rb_entry(prev, struct extent_state, rb_node);
				*start_ret = state->end + 1;
				*end_ret = -1;
				goto out;
			}
		}
1612 1613 1614 1615
		/*
		 * At this point 'node' either contains 'start' or start is
		 * before 'node'
		 */
1616
		state = rb_entry(node, struct extent_state, rb_node);
1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638

		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;
			}
1639
		} else {
1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657
			/*
			 * |---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;
			}
1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682
			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 已提交
1683 1684 1685 1686
/*
 * 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,
 *
1687
 * true is returned if we find something, false if nothing was in the tree
C
Chris Mason 已提交
1688
 */
J
Josef Bacik 已提交
1689 1690 1691
bool btrfs_find_delalloc_range(struct extent_io_tree *tree, u64 *start,
			       u64 *end, u64 max_bytes,
			       struct extent_state **cached_state)
1692 1693 1694 1695
{
	struct rb_node *node;
	struct extent_state *state;
	u64 cur_start = *start;
1696
	bool found = false;
1697 1698
	u64 total_bytes = 0;

1699
	spin_lock(&tree->lock);
C
Chris Mason 已提交
1700

1701 1702 1703 1704
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1705
	node = tree_search(tree, cur_start);
1706
	if (!node) {
1707
		*end = (u64)-1;
1708 1709 1710
		goto out;
	}

C
Chris Mason 已提交
1711
	while (1) {
1712
		state = rb_entry(node, struct extent_state, rb_node);
1713 1714
		if (found && (state->start != cur_start ||
			      (state->state & EXTENT_BOUNDARY))) {
1715 1716 1717 1718 1719 1720 1721
			goto out;
		}
		if (!(state->state & EXTENT_DELALLOC)) {
			if (!found)
				*end = state->end;
			goto out;
		}
1722
		if (!found) {
1723
			*start = state->start;
1724
			*cached_state = state;
1725
			refcount_inc(&state->refs);
1726
		}
1727
		found = true;
1728 1729 1730 1731
		*end = state->end;
		cur_start = state->end + 1;
		node = rb_next(node);
		total_bytes += state->end - state->start + 1;
1732
		if (total_bytes >= max_bytes)
1733 1734
			break;
		if (!node)
1735 1736 1737
			break;
	}
out:
1738
	spin_unlock(&tree->lock);
1739 1740 1741
	return found;
}

1742 1743 1744 1745 1746
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);

1747 1748 1749
static noinline void __unlock_for_delalloc(struct inode *inode,
					   struct page *locked_page,
					   u64 start, u64 end)
C
Chris Mason 已提交
1750
{
1751 1752
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
C
Chris Mason 已提交
1753

1754
	ASSERT(locked_page);
C
Chris Mason 已提交
1755
	if (index == locked_page->index && end_index == index)
1756
		return;
C
Chris Mason 已提交
1757

1758 1759
	__process_pages_contig(inode->i_mapping, locked_page, index, end_index,
			       PAGE_UNLOCK, NULL);
C
Chris Mason 已提交
1760 1761 1762 1763 1764 1765 1766
}

static noinline int lock_delalloc_pages(struct inode *inode,
					struct page *locked_page,
					u64 delalloc_start,
					u64 delalloc_end)
{
1767
	unsigned long index = delalloc_start >> PAGE_SHIFT;
1768
	unsigned long index_ret = index;
1769
	unsigned long end_index = delalloc_end >> PAGE_SHIFT;
C
Chris Mason 已提交
1770 1771
	int ret;

1772
	ASSERT(locked_page);
C
Chris Mason 已提交
1773 1774 1775
	if (index == locked_page->index && index == end_index)
		return 0;

1776 1777 1778 1779 1780
	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 已提交
1781 1782 1783 1784
	return ret;
}

/*
1785 1786
 * 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 已提交
1787
 *
1788 1789
 * Return: true if we find something
 *         false if nothing was in the tree
C
Chris Mason 已提交
1790
 */
1791
EXPORT_FOR_TESTS
1792
noinline_for_stack bool find_lock_delalloc_range(struct inode *inode,
1793
				    struct page *locked_page, u64 *start,
1794
				    u64 *end)
C
Chris Mason 已提交
1795
{
1796
	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
1797
	u64 max_bytes = BTRFS_MAX_EXTENT_SIZE;
C
Chris Mason 已提交
1798 1799
	u64 delalloc_start;
	u64 delalloc_end;
1800
	bool found;
1801
	struct extent_state *cached_state = NULL;
C
Chris Mason 已提交
1802 1803 1804 1805 1806 1807 1808
	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 已提交
1809 1810
	found = btrfs_find_delalloc_range(tree, &delalloc_start, &delalloc_end,
					  max_bytes, &cached_state);
C
Chris Mason 已提交
1811
	if (!found || delalloc_end <= *start) {
C
Chris Mason 已提交
1812 1813
		*start = delalloc_start;
		*end = delalloc_end;
1814
		free_extent_state(cached_state);
1815
		return false;
C
Chris Mason 已提交
1816 1817
	}

C
Chris Mason 已提交
1818 1819 1820 1821 1822
	/*
	 * 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 已提交
1823
	if (delalloc_start < *start)
C
Chris Mason 已提交
1824 1825
		delalloc_start = *start;

C
Chris Mason 已提交
1826 1827 1828
	/*
	 * make sure to limit the number of pages we try to lock down
	 */
1829 1830
	if (delalloc_end + 1 - delalloc_start > max_bytes)
		delalloc_end = delalloc_start + max_bytes - 1;
C
Chris Mason 已提交
1831

C
Chris Mason 已提交
1832 1833 1834
	/* step two, lock all the pages after the page that has start */
	ret = lock_delalloc_pages(inode, locked_page,
				  delalloc_start, delalloc_end);
1835
	ASSERT(!ret || ret == -EAGAIN);
C
Chris Mason 已提交
1836 1837 1838 1839
	if (ret == -EAGAIN) {
		/* some of the pages are gone, lets avoid looping by
		 * shortening the size of the delalloc range we're searching
		 */
1840
		free_extent_state(cached_state);
1841
		cached_state = NULL;
C
Chris Mason 已提交
1842
		if (!loops) {
1843
			max_bytes = PAGE_SIZE;
C
Chris Mason 已提交
1844 1845 1846
			loops = 1;
			goto again;
		} else {
1847
			found = false;
C
Chris Mason 已提交
1848 1849 1850 1851 1852
			goto out_failed;
		}
	}

	/* step three, lock the state bits for the whole range */
1853
	lock_extent_bits(tree, delalloc_start, delalloc_end, &cached_state);
C
Chris Mason 已提交
1854 1855 1856

	/* then test to make sure it is all still delalloc */
	ret = test_range_bit(tree, delalloc_start, delalloc_end,
1857
			     EXTENT_DELALLOC, 1, cached_state);
C
Chris Mason 已提交
1858
	if (!ret) {
1859
		unlock_extent_cached(tree, delalloc_start, delalloc_end,
1860
				     &cached_state);
C
Chris Mason 已提交
1861 1862 1863 1864 1865
		__unlock_for_delalloc(inode, locked_page,
			      delalloc_start, delalloc_end);
		cond_resched();
		goto again;
	}
1866
	free_extent_state(cached_state);
C
Chris Mason 已提交
1867 1868 1869 1870 1871 1872
	*start = delalloc_start;
	*end = delalloc_end;
out_failed:
	return found;
}

1873 1874 1875 1876
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 已提交
1877
{
1878
	unsigned long nr_pages = end_index - start_index + 1;
1879
	unsigned long pages_locked = 0;
1880
	pgoff_t index = start_index;
C
Chris Mason 已提交
1881
	struct page *pages[16];
1882
	unsigned ret;
1883
	int err = 0;
C
Chris Mason 已提交
1884
	int i;
1885

1886 1887 1888 1889 1890
	if (page_ops & PAGE_LOCK) {
		ASSERT(page_ops == PAGE_LOCK);
		ASSERT(index_ret && *index_ret == start_index);
	}

1891
	if ((page_ops & PAGE_SET_ERROR) && nr_pages > 0)
1892
		mapping_set_error(mapping, -EIO);
1893

C
Chris Mason 已提交
1894
	while (nr_pages > 0) {
1895
		ret = find_get_pages_contig(mapping, index,
1896 1897
				     min_t(unsigned long,
				     nr_pages, ARRAY_SIZE(pages)), pages);
1898 1899 1900 1901 1902 1903
		if (ret == 0) {
			/*
			 * Only if we're going to lock these pages,
			 * can we find nothing at @index.
			 */
			ASSERT(page_ops & PAGE_LOCK);
1904 1905
			err = -EAGAIN;
			goto out;
1906
		}
1907

1908
		for (i = 0; i < ret; i++) {
1909
			if (page_ops & PAGE_SET_PRIVATE2)
1910 1911
				SetPagePrivate2(pages[i]);

1912
			if (locked_page && pages[i] == locked_page) {
1913
				put_page(pages[i]);
1914
				pages_locked++;
C
Chris Mason 已提交
1915 1916
				continue;
			}
1917
			if (page_ops & PAGE_CLEAR_DIRTY)
C
Chris Mason 已提交
1918
				clear_page_dirty_for_io(pages[i]);
1919
			if (page_ops & PAGE_SET_WRITEBACK)
C
Chris Mason 已提交
1920
				set_page_writeback(pages[i]);
1921 1922
			if (page_ops & PAGE_SET_ERROR)
				SetPageError(pages[i]);
1923
			if (page_ops & PAGE_END_WRITEBACK)
C
Chris Mason 已提交
1924
				end_page_writeback(pages[i]);
1925
			if (page_ops & PAGE_UNLOCK)
1926
				unlock_page(pages[i]);
1927 1928 1929 1930 1931 1932 1933 1934 1935 1936
			if (page_ops & PAGE_LOCK) {
				lock_page(pages[i]);
				if (!PageDirty(pages[i]) ||
				    pages[i]->mapping != mapping) {
					unlock_page(pages[i]);
					put_page(pages[i]);
					err = -EAGAIN;
					goto out;
				}
			}
1937
			put_page(pages[i]);
1938
			pages_locked++;
C
Chris Mason 已提交
1939 1940 1941 1942 1943
		}
		nr_pages -= ret;
		index += ret;
		cond_resched();
	}
1944 1945 1946 1947
out:
	if (err && index_ret)
		*index_ret = start_index + pages_locked - 1;
	return err;
C
Chris Mason 已提交
1948 1949
}

1950
void extent_clear_unlock_delalloc(struct inode *inode, u64 start, u64 end,
1951 1952 1953
				  struct page *locked_page,
				  unsigned clear_bits,
				  unsigned long page_ops)
1954 1955
{
	clear_extent_bit(&BTRFS_I(inode)->io_tree, start, end, clear_bits, 1, 0,
1956
			 NULL);
1957 1958 1959

	__process_pages_contig(inode->i_mapping, locked_page,
			       start >> PAGE_SHIFT, end >> PAGE_SHIFT,
1960
			       page_ops, NULL);
1961 1962
}

C
Chris Mason 已提交
1963 1964 1965 1966 1967
/*
 * 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.
 */
1968 1969
u64 count_range_bits(struct extent_io_tree *tree,
		     u64 *start, u64 search_end, u64 max_bytes,
1970
		     unsigned bits, int contig)
1971 1972 1973 1974 1975
{
	struct rb_node *node;
	struct extent_state *state;
	u64 cur_start = *start;
	u64 total_bytes = 0;
1976
	u64 last = 0;
1977 1978
	int found = 0;

1979
	if (WARN_ON(search_end <= cur_start))
1980 1981
		return 0;

1982
	spin_lock(&tree->lock);
1983 1984 1985 1986 1987 1988 1989 1990
	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.
	 */
1991
	node = tree_search(tree, cur_start);
C
Chris Mason 已提交
1992
	if (!node)
1993 1994
		goto out;

C
Chris Mason 已提交
1995
	while (1) {
1996 1997 1998
		state = rb_entry(node, struct extent_state, rb_node);
		if (state->start > search_end)
			break;
1999 2000 2001
		if (contig && found && state->start > last + 1)
			break;
		if (state->end >= cur_start && (state->state & bits) == bits) {
2002 2003 2004 2005 2006
			total_bytes += min(search_end, state->end) + 1 -
				       max(cur_start, state->start);
			if (total_bytes >= max_bytes)
				break;
			if (!found) {
2007
				*start = max(cur_start, state->start);
2008 2009
				found = 1;
			}
2010 2011 2012
			last = state->end;
		} else if (contig && found) {
			break;
2013 2014 2015 2016 2017 2018
		}
		node = rb_next(node);
		if (!node)
			break;
	}
out:
2019
	spin_unlock(&tree->lock);
2020 2021
	return total_bytes;
}
2022

C
Chris Mason 已提交
2023 2024 2025 2026
/*
 * set the private field for a given byte offset in the tree.  If there isn't
 * an extent_state there already, this does nothing.
 */
2027 2028
int set_state_failrec(struct extent_io_tree *tree, u64 start,
		      struct io_failure_record *failrec)
2029 2030 2031 2032 2033
{
	struct rb_node *node;
	struct extent_state *state;
	int ret = 0;

2034
	spin_lock(&tree->lock);
2035 2036 2037 2038
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
2039
	node = tree_search(tree, start);
2040
	if (!node) {
2041 2042 2043 2044 2045 2046 2047 2048
		ret = -ENOENT;
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
	if (state->start != start) {
		ret = -ENOENT;
		goto out;
	}
2049
	state->failrec = failrec;
2050
out:
2051
	spin_unlock(&tree->lock);
2052 2053 2054
	return ret;
}

2055 2056
int get_state_failrec(struct extent_io_tree *tree, u64 start,
		      struct io_failure_record **failrec)
2057 2058 2059 2060 2061
{
	struct rb_node *node;
	struct extent_state *state;
	int ret = 0;

2062
	spin_lock(&tree->lock);
2063 2064 2065 2066
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
2067
	node = tree_search(tree, start);
2068
	if (!node) {
2069 2070 2071 2072 2073 2074 2075 2076
		ret = -ENOENT;
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
	if (state->start != start) {
		ret = -ENOENT;
		goto out;
	}
2077
	*failrec = state->failrec;
2078
out:
2079
	spin_unlock(&tree->lock);
2080 2081 2082 2083 2084
	return ret;
}

/*
 * searches a range in the state tree for a given mask.
2085
 * If 'filled' == 1, this returns 1 only if every extent in the tree
2086 2087 2088 2089
 * 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,
2090
		   unsigned bits, int filled, struct extent_state *cached)
2091 2092 2093 2094 2095
{
	struct extent_state *state = NULL;
	struct rb_node *node;
	int bitset = 0;

2096
	spin_lock(&tree->lock);
2097
	if (cached && extent_state_in_tree(cached) && cached->start <= start &&
2098
	    cached->end > start)
2099 2100 2101
		node = &cached->rb_node;
	else
		node = tree_search(tree, start);
2102 2103 2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120
	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;
		}
2121 2122 2123 2124

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

2125 2126 2127 2128 2129 2130 2131 2132 2133 2134
		start = state->end + 1;
		if (start > end)
			break;
		node = rb_next(node);
		if (!node) {
			if (filled)
				bitset = 0;
			break;
		}
	}
2135
	spin_unlock(&tree->lock);
2136 2137 2138 2139 2140 2141 2142
	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
 */
2143
static void check_page_uptodate(struct extent_io_tree *tree, struct page *page)
2144
{
M
Miao Xie 已提交
2145
	u64 start = page_offset(page);
2146
	u64 end = start + PAGE_SIZE - 1;
2147
	if (test_range_bit(tree, start, end, EXTENT_UPTODATE, 1, NULL))
2148 2149 2150
		SetPageUptodate(page);
}

2151 2152 2153
int free_io_failure(struct extent_io_tree *failure_tree,
		    struct extent_io_tree *io_tree,
		    struct io_failure_record *rec)
2154 2155 2156 2157
{
	int ret;
	int err = 0;

2158
	set_state_failrec(failure_tree, rec->start, NULL);
2159 2160
	ret = clear_extent_bits(failure_tree, rec->start,
				rec->start + rec->len - 1,
2161
				EXTENT_LOCKED | EXTENT_DIRTY);
2162 2163 2164
	if (ret)
		err = ret;

2165
	ret = clear_extent_bits(io_tree, rec->start,
D
David Woodhouse 已提交
2166
				rec->start + rec->len - 1,
2167
				EXTENT_DAMAGED);
D
David Woodhouse 已提交
2168 2169
	if (ret && !err)
		err = ret;
2170 2171 2172 2173 2174 2175 2176 2177 2178 2179

	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.
2180
 * to avoid any synchronization issues, wait for the data after writing, which
2181 2182 2183 2184
 * 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.
 */
2185 2186 2187
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)
2188 2189 2190 2191 2192 2193 2194 2195
{
	struct bio *bio;
	struct btrfs_device *dev;
	u64 map_length = 0;
	u64 sector;
	struct btrfs_bio *bbio = NULL;
	int ret;

2196
	ASSERT(!(fs_info->sb->s_flags & SB_RDONLY));
2197 2198
	BUG_ON(!mirror_num);

2199
	bio = btrfs_io_bio_alloc(1);
2200
	bio->bi_iter.bi_size = 0;
2201 2202
	map_length = length;

2203 2204 2205 2206 2207 2208
	/*
	 * 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);
2209
	if (btrfs_is_parity_mirror(fs_info, logical, length)) {
2210 2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232
		/*
		 * 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);
2233
	}
2234 2235

	sector = bbio->stripes[bbio->mirror_num - 1].physical >> 9;
2236
	bio->bi_iter.bi_sector = sector;
2237
	dev = bbio->stripes[bbio->mirror_num - 1].dev;
2238
	btrfs_put_bbio(bbio);
2239 2240
	if (!dev || !dev->bdev ||
	    !test_bit(BTRFS_DEV_STATE_WRITEABLE, &dev->dev_state)) {
2241
		btrfs_bio_counter_dec(fs_info);
2242 2243 2244
		bio_put(bio);
		return -EIO;
	}
2245
	bio_set_dev(bio, dev->bdev);
2246
	bio->bi_opf = REQ_OP_WRITE | REQ_SYNC;
2247
	bio_add_page(bio, page, length, pg_offset);
2248

2249
	if (btrfsic_submit_bio_wait(bio)) {
2250
		/* try to remap that extent elsewhere? */
2251
		btrfs_bio_counter_dec(fs_info);
2252
		bio_put(bio);
2253
		btrfs_dev_stat_inc_and_print(dev, BTRFS_DEV_STAT_WRITE_ERRS);
2254 2255 2256
		return -EIO;
	}

2257 2258
	btrfs_info_rl_in_rcu(fs_info,
		"read error corrected: ino %llu off %llu (dev %s sector %llu)",
2259
				  ino, start,
2260
				  rcu_str_deref(dev->name), sector);
2261
	btrfs_bio_counter_dec(fs_info);
2262 2263 2264 2265
	bio_put(bio);
	return 0;
}

2266
int btrfs_repair_eb_io_failure(struct extent_buffer *eb, int mirror_num)
2267
{
2268
	struct btrfs_fs_info *fs_info = eb->fs_info;
2269
	u64 start = eb->start;
2270
	int i, num_pages = num_extent_pages(eb);
2271
	int ret = 0;
2272

2273
	if (sb_rdonly(fs_info->sb))
2274 2275
		return -EROFS;

2276
	for (i = 0; i < num_pages; i++) {
2277
		struct page *p = eb->pages[i];
2278

2279
		ret = repair_io_failure(fs_info, 0, start, PAGE_SIZE, start, p,
2280
					start - page_offset(p), mirror_num);
2281 2282
		if (ret)
			break;
2283
		start += PAGE_SIZE;
2284 2285 2286 2287 2288
	}

	return ret;
}

2289 2290 2291 2292
/*
 * 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
 */
2293 2294 2295 2296
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)
2297 2298 2299 2300 2301 2302 2303 2304
{
	u64 private;
	struct io_failure_record *failrec;
	struct extent_state *state;
	int num_copies;
	int ret;

	private = 0;
2305 2306
	ret = count_range_bits(failure_tree, &private, (u64)-1, 1,
			       EXTENT_DIRTY, 0);
2307 2308 2309
	if (!ret)
		return 0;

2310
	ret = get_state_failrec(failure_tree, start, &failrec);
2311 2312 2313 2314 2315 2316 2317
	if (ret)
		return 0;

	BUG_ON(!failrec->this_mirror);

	if (failrec->in_validation) {
		/* there was no real error, just free the record */
2318 2319 2320
		btrfs_debug(fs_info,
			"clean_io_failure: freeing dummy error at %llu",
			failrec->start);
2321 2322
		goto out;
	}
2323
	if (sb_rdonly(fs_info->sb))
2324
		goto out;
2325

2326 2327
	spin_lock(&io_tree->lock);
	state = find_first_extent_bit_state(io_tree,
2328 2329
					    failrec->start,
					    EXTENT_LOCKED);
2330
	spin_unlock(&io_tree->lock);
2331

2332 2333
	if (state && state->start <= failrec->start &&
	    state->end >= failrec->start + failrec->len - 1) {
2334 2335
		num_copies = btrfs_num_copies(fs_info, failrec->logical,
					      failrec->len);
2336
		if (num_copies > 1)  {
2337 2338 2339
			repair_io_failure(fs_info, ino, start, failrec->len,
					  failrec->logical, page, pg_offset,
					  failrec->failed_mirror);
2340 2341 2342 2343
		}
	}

out:
2344
	free_io_failure(failure_tree, io_tree, failrec);
2345

2346
	return 0;
2347 2348
}

2349 2350 2351 2352 2353 2354
/*
 * Can be called when
 * - hold extent lock
 * - under ordered extent
 * - the inode is freeing
 */
2355
void btrfs_free_io_failure_record(struct btrfs_inode *inode, u64 start, u64 end)
2356
{
2357
	struct extent_io_tree *failure_tree = &inode->io_failure_tree;
2358 2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373
	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);

2374
		failrec = state->failrec;
2375 2376 2377 2378 2379 2380 2381 2382
		free_extent_state(state);
		kfree(failrec);

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

2383
int btrfs_get_io_failure_record(struct inode *inode, u64 start, u64 end,
2384
		struct io_failure_record **failrec_ret)
2385
{
2386
	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2387
	struct io_failure_record *failrec;
2388 2389 2390 2391 2392 2393 2394
	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;

2395
	ret = get_state_failrec(failure_tree, start, &failrec);
2396 2397 2398 2399
	if (ret) {
		failrec = kzalloc(sizeof(*failrec), GFP_NOFS);
		if (!failrec)
			return -ENOMEM;
2400

2401 2402 2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413 2414
		failrec->start = start;
		failrec->len = end - start + 1;
		failrec->this_mirror = 0;
		failrec->bio_flags = 0;
		failrec->in_validation = 0;

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

2415
		if (em->start > start || em->start + em->len <= start) {
2416 2417 2418 2419
			free_extent_map(em);
			em = NULL;
		}
		read_unlock(&em_tree->lock);
2420
		if (!em) {
2421 2422 2423
			kfree(failrec);
			return -EIO;
		}
2424

2425 2426 2427 2428 2429 2430 2431 2432
		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);
		}
2433

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

2438 2439 2440 2441 2442
		failrec->logical = logical;
		free_extent_map(em);

		/* set the bits in the private failure tree */
		ret = set_extent_bits(failure_tree, start, end,
2443
					EXTENT_LOCKED | EXTENT_DIRTY);
2444
		if (ret >= 0)
2445
			ret = set_state_failrec(failure_tree, start, failrec);
2446 2447
		/* set the bits in the inode's tree */
		if (ret >= 0)
2448
			ret = set_extent_bits(tree, start, end, EXTENT_DAMAGED);
2449 2450 2451 2452 2453
		if (ret < 0) {
			kfree(failrec);
			return ret;
		}
	} else {
2454 2455 2456 2457
		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);
2458 2459 2460 2461 2462 2463
		/*
		 * 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.
		 */
	}
2464 2465 2466 2467 2468 2469

	*failrec_ret = failrec;

	return 0;
}

2470
bool btrfs_check_repairable(struct inode *inode, unsigned failed_bio_pages,
2471 2472
			   struct io_failure_record *failrec, int failed_mirror)
{
2473
	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2474 2475
	int num_copies;

2476
	num_copies = btrfs_num_copies(fs_info, failrec->logical, failrec->len);
2477 2478 2479 2480 2481 2482
	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.
		 */
2483 2484 2485
		btrfs_debug(fs_info,
			"Check Repairable: cannot repair, num_copies=%d, next_mirror %d, failed_mirror %d",
			num_copies, failrec->this_mirror, failed_mirror);
2486
		return false;
2487 2488 2489 2490 2491 2492 2493
	}

	/*
	 * there are two premises:
	 *	a) deliver good data to the caller
	 *	b) correct the bad sectors on disk
	 */
2494
	if (failed_bio_pages > 1) {
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
		/*
		 * 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++;
	}

2523
	if (failrec->this_mirror > num_copies) {
2524 2525 2526
		btrfs_debug(fs_info,
			"Check Repairable: (fail) num_copies=%d, next_mirror %d, failed_mirror %d",
			num_copies, failrec->this_mirror, failed_mirror);
2527
		return false;
2528 2529
	}

2530
	return true;
2531 2532 2533 2534 2535 2536
}


struct bio *btrfs_create_repair_bio(struct inode *inode, struct bio *failed_bio,
				    struct io_failure_record *failrec,
				    struct page *page, int pg_offset, int icsum,
2537
				    bio_end_io_t *endio_func, void *data)
2538
{
2539
	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2540 2541 2542 2543
	struct bio *bio;
	struct btrfs_io_bio *btrfs_failed_bio;
	struct btrfs_io_bio *btrfs_bio;

2544
	bio = btrfs_io_bio_alloc(1);
2545
	bio->bi_end_io = endio_func;
2546 2547
	bio->bi_iter.bi_sector = failrec->logical >> 9;
	bio->bi_iter.bi_size = 0;
2548
	bio->bi_private = data;
2549

2550 2551 2552 2553 2554 2555
	btrfs_failed_bio = btrfs_io_bio(failed_bio);
	if (btrfs_failed_bio->csum) {
		u16 csum_size = btrfs_super_csum_size(fs_info->super_copy);

		btrfs_bio = btrfs_io_bio(bio);
		btrfs_bio->csum = btrfs_bio->csum_inline;
2556 2557
		icsum *= csum_size;
		memcpy(btrfs_bio->csum, btrfs_failed_bio->csum + icsum,
2558 2559 2560
		       csum_size);
	}

2561 2562 2563 2564 2565 2566
	bio_add_page(bio, page, failrec->len, pg_offset);

	return bio;
}

/*
2567 2568 2569 2570
 * This is a generic handler for readpage errors. If other copies exist, read
 * those and write back good data to the failed position. Does not investigate
 * in remapping the failed extent elsewhere, hoping the device will be smart
 * enough to do this as needed
2571 2572 2573 2574 2575 2576 2577 2578
 */
static int bio_readpage_error(struct bio *failed_bio, u64 phy_offset,
			      struct page *page, u64 start, u64 end,
			      int failed_mirror)
{
	struct io_failure_record *failrec;
	struct inode *inode = page->mapping->host;
	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
2579
	struct extent_io_tree *failure_tree = &BTRFS_I(inode)->io_failure_tree;
2580
	struct bio *bio;
2581
	int read_mode = 0;
2582
	blk_status_t status;
2583
	int ret;
2584
	unsigned failed_bio_pages = failed_bio->bi_iter.bi_size >> PAGE_SHIFT;
2585

2586
	BUG_ON(bio_op(failed_bio) == REQ_OP_WRITE);
2587 2588 2589 2590 2591

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

2592
	if (!btrfs_check_repairable(inode, failed_bio_pages, failrec,
2593
				    failed_mirror)) {
2594
		free_io_failure(failure_tree, tree, failrec);
2595 2596 2597
		return -EIO;
	}

2598
	if (failed_bio_pages > 1)
2599
		read_mode |= REQ_FAILFAST_DEV;
2600 2601 2602 2603

	phy_offset >>= inode->i_sb->s_blocksize_bits;
	bio = btrfs_create_repair_bio(inode, failed_bio, failrec, page,
				      start - page_offset(page),
2604 2605
				      (int)phy_offset, failed_bio->bi_end_io,
				      NULL);
D
David Sterba 已提交
2606
	bio->bi_opf = REQ_OP_READ | read_mode;
2607

2608 2609 2610
	btrfs_debug(btrfs_sb(inode->i_sb),
		"Repair Read Error: submitting new read[%#x] to this_mirror=%d, in_validation=%d",
		read_mode, failrec->this_mirror, failrec->in_validation);
2611

2612
	status = tree->ops->submit_bio_hook(tree->private_data, bio, failrec->this_mirror,
2613
					 failrec->bio_flags);
2614
	if (status) {
2615
		free_io_failure(failure_tree, tree, failrec);
2616
		bio_put(bio);
2617
		ret = blk_status_to_errno(status);
2618 2619
	}

2620
	return ret;
2621 2622
}

2623 2624
/* lots and lots of room for performance fixes in the end_bio funcs */

2625
void end_extent_writepage(struct page *page, int err, u64 start, u64 end)
2626 2627
{
	int uptodate = (err == 0);
2628
	int ret = 0;
2629

2630
	btrfs_writepage_endio_finish_ordered(page, start, end, uptodate);
2631 2632 2633 2634

	if (!uptodate) {
		ClearPageUptodate(page);
		SetPageError(page);
2635
		ret = err < 0 ? err : -EIO;
2636
		mapping_set_error(page->mapping, ret);
2637 2638 2639
	}
}

2640 2641 2642 2643 2644 2645 2646 2647 2648
/*
 * 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.
 */
2649
static void end_bio_extent_writepage(struct bio *bio)
2650
{
2651
	int error = blk_status_to_errno(bio->bi_status);
2652
	struct bio_vec *bvec;
2653 2654
	u64 start;
	u64 end;
2655
	struct bvec_iter_all iter_all;
2656

2657
	ASSERT(!bio_flagged(bio, BIO_CLONED));
2658
	bio_for_each_segment_all(bvec, bio, iter_all) {
2659
		struct page *page = bvec->bv_page;
2660 2661
		struct inode *inode = page->mapping->host;
		struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2662

2663 2664 2665 2666 2667
		/* 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.  */
2668 2669
		if (bvec->bv_offset || bvec->bv_len != PAGE_SIZE) {
			if (bvec->bv_offset + bvec->bv_len != PAGE_SIZE)
2670
				btrfs_err(fs_info,
2671 2672 2673
				   "partial page write in btrfs with offset %u and length %u",
					bvec->bv_offset, bvec->bv_len);
			else
2674
				btrfs_info(fs_info,
J
Jeff Mahoney 已提交
2675
				   "incomplete page write in btrfs with offset %u and length %u",
2676 2677
					bvec->bv_offset, bvec->bv_len);
		}
2678

2679 2680
		start = page_offset(page);
		end = start + bvec->bv_offset + bvec->bv_len - 1;
2681

2682
		end_extent_writepage(page, error, start, end);
2683
		end_page_writeback(page);
2684
	}
2685

2686 2687 2688
	bio_put(bio);
}

2689 2690 2691 2692 2693 2694 2695 2696 2697
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);
2698
	unlock_extent_cached_atomic(tree, start, end, &cached);
2699 2700
}

2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711
/*
 * 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.
 */
2712
static void end_bio_extent_readpage(struct bio *bio)
2713
{
2714
	struct bio_vec *bvec;
2715
	int uptodate = !bio->bi_status;
2716
	struct btrfs_io_bio *io_bio = btrfs_io_bio(bio);
2717
	struct extent_io_tree *tree, *failure_tree;
2718
	u64 offset = 0;
2719 2720
	u64 start;
	u64 end;
2721
	u64 len;
2722 2723
	u64 extent_start = 0;
	u64 extent_len = 0;
2724
	int mirror;
2725
	int ret;
2726
	struct bvec_iter_all iter_all;
2727

2728
	ASSERT(!bio_flagged(bio, BIO_CLONED));
2729
	bio_for_each_segment_all(bvec, bio, iter_all) {
2730
		struct page *page = bvec->bv_page;
2731
		struct inode *inode = page->mapping->host;
2732
		struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2733 2734
		bool data_inode = btrfs_ino(BTRFS_I(inode))
			!= BTRFS_BTREE_INODE_OBJECTID;
2735

2736 2737
		btrfs_debug(fs_info,
			"end_bio_extent_readpage: bi_sector=%llu, err=%d, mirror=%u",
2738
			(u64)bio->bi_iter.bi_sector, bio->bi_status,
2739
			io_bio->mirror_num);
2740
		tree = &BTRFS_I(inode)->io_tree;
2741
		failure_tree = &BTRFS_I(inode)->io_failure_tree;
2742

2743 2744 2745 2746 2747
		/* 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.  */
2748 2749
		if (bvec->bv_offset || bvec->bv_len != PAGE_SIZE) {
			if (bvec->bv_offset + bvec->bv_len != PAGE_SIZE)
2750 2751
				btrfs_err(fs_info,
					"partial page read in btrfs with offset %u and length %u",
2752 2753
					bvec->bv_offset, bvec->bv_len);
			else
2754 2755
				btrfs_info(fs_info,
					"incomplete page read in btrfs with offset %u and length %u",
2756 2757
					bvec->bv_offset, bvec->bv_len);
		}
2758

2759 2760
		start = page_offset(page);
		end = start + bvec->bv_offset + bvec->bv_len - 1;
2761
		len = bvec->bv_len;
2762

2763
		mirror = io_bio->mirror_num;
2764
		if (likely(uptodate)) {
2765 2766 2767
			ret = tree->ops->readpage_end_io_hook(io_bio, offset,
							      page, start, end,
							      mirror);
2768
			if (ret)
2769
				uptodate = 0;
2770
			else
2771 2772 2773 2774
				clean_io_failure(BTRFS_I(inode)->root->fs_info,
						 failure_tree, tree, start,
						 page,
						 btrfs_ino(BTRFS_I(inode)), 0);
2775
		}
2776

2777 2778 2779
		if (likely(uptodate))
			goto readpage_ok;

2780
		if (data_inode) {
L
Liu Bo 已提交
2781

2782
			/*
2783 2784 2785 2786 2787 2788 2789 2790
			 * 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.
2791
			 */
2792 2793 2794 2795 2796 2797 2798 2799 2800 2801 2802 2803 2804 2805 2806 2807 2808
			ret = bio_readpage_error(bio, offset, page, start, end,
						 mirror);
			if (ret == 0) {
				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);
2809
		}
2810
readpage_ok:
2811
		if (likely(uptodate)) {
2812
			loff_t i_size = i_size_read(inode);
2813
			pgoff_t end_index = i_size >> PAGE_SHIFT;
2814
			unsigned off;
2815 2816

			/* Zero out the end if this page straddles i_size */
2817
			off = offset_in_page(i_size);
2818
			if (page->index == end_index && off)
2819
				zero_user_segment(page, off, PAGE_SIZE);
2820
			SetPageUptodate(page);
2821
		} else {
2822 2823
			ClearPageUptodate(page);
			SetPageError(page);
2824
		}
2825
		unlock_page(page);
2826
		offset += len;
2827 2828 2829 2830 2831 2832 2833 2834 2835 2836 2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 2848

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

2851 2852 2853
	if (extent_len)
		endio_readpage_release_extent(tree, extent_start, extent_len,
					      uptodate);
2854
	btrfs_io_bio_free_csum(io_bio);
2855 2856 2857
	bio_put(bio);
}

2858
/*
2859 2860 2861
 * 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.
2862
 */
2863
static inline void btrfs_io_bio_init(struct btrfs_io_bio *btrfs_bio)
2864
{
2865 2866
	memset(btrfs_bio, 0, offsetof(struct btrfs_io_bio, bio));
}
2867

2868
/*
2869 2870 2871
 * 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
2872
 */
2873
struct bio *btrfs_bio_alloc(u64 first_byte)
2874 2875 2876
{
	struct bio *bio;

2877
	bio = bio_alloc_bioset(GFP_NOFS, BIO_MAX_PAGES, &btrfs_bioset);
2878
	bio->bi_iter.bi_sector = first_byte >> 9;
2879
	btrfs_io_bio_init(btrfs_io_bio(bio));
2880 2881 2882
	return bio;
}

2883
struct bio *btrfs_bio_clone(struct bio *bio)
2884
{
2885 2886
	struct btrfs_io_bio *btrfs_bio;
	struct bio *new;
2887

2888
	/* Bio allocation backed by a bioset does not fail */
2889
	new = bio_clone_fast(bio, GFP_NOFS, &btrfs_bioset);
2890
	btrfs_bio = btrfs_io_bio(new);
2891
	btrfs_io_bio_init(btrfs_bio);
2892
	btrfs_bio->iter = bio->bi_iter;
2893 2894
	return new;
}
2895

2896
struct bio *btrfs_io_bio_alloc(unsigned int nr_iovecs)
2897
{
2898 2899
	struct bio *bio;

2900
	/* Bio allocation backed by a bioset does not fail */
2901
	bio = bio_alloc_bioset(GFP_NOFS, nr_iovecs, &btrfs_bioset);
2902
	btrfs_io_bio_init(btrfs_io_bio(bio));
2903
	return bio;
2904 2905
}

2906
struct bio *btrfs_bio_clone_partial(struct bio *orig, int offset, int size)
2907 2908 2909 2910 2911
{
	struct bio *bio;
	struct btrfs_io_bio *btrfs_bio;

	/* this will never fail when it's backed by a bioset */
2912
	bio = bio_clone_fast(orig, GFP_NOFS, &btrfs_bioset);
2913 2914 2915
	ASSERT(bio);

	btrfs_bio = btrfs_io_bio(bio);
2916
	btrfs_io_bio_init(btrfs_bio);
2917 2918

	bio_trim(bio, offset >> 9, size >> 9);
2919
	btrfs_bio->iter = bio->bi_iter;
2920 2921
	return bio;
}
2922

2923 2924
/*
 * @opf:	bio REQ_OP_* and REQ_* flags as one value
2925 2926 2927 2928 2929 2930 2931
 * @tree:	tree so we can call our merge_bio hook
 * @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
2932
 * @bio_ret:	must be valid pointer, newly allocated bio will be stored there
2933 2934 2935 2936
 * @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
2937 2938
 */
static int submit_extent_page(unsigned int opf, struct extent_io_tree *tree,
2939
			      struct writeback_control *wbc,
2940
			      struct page *page, u64 offset,
2941
			      size_t size, unsigned long pg_offset,
2942
			      struct bio **bio_ret,
2943
			      bio_end_io_t end_io_func,
C
Chris Mason 已提交
2944 2945
			      int mirror_num,
			      unsigned long prev_bio_flags,
2946 2947
			      unsigned long bio_flags,
			      bool force_bio_submit)
2948 2949 2950
{
	int ret = 0;
	struct bio *bio;
2951
	size_t page_size = min_t(size_t, size, PAGE_SIZE);
2952
	sector_t sector = offset >> 9;
2953

2954 2955 2956
	ASSERT(bio_ret);

	if (*bio_ret) {
2957 2958 2959
		bool contig;
		bool can_merge = true;

2960
		bio = *bio_ret;
2961
		if (prev_bio_flags & EXTENT_BIO_COMPRESSED)
2962
			contig = bio->bi_iter.bi_sector == sector;
C
Chris Mason 已提交
2963
		else
K
Kent Overstreet 已提交
2964
			contig = bio_end_sector(bio) == sector;
C
Chris Mason 已提交
2965

2966 2967
		ASSERT(tree->ops);
		if (btrfs_bio_fits_in_stripe(page, page_size, bio, bio_flags))
2968 2969 2970
			can_merge = false;

		if (prev_bio_flags != bio_flags || !contig || !can_merge ||
2971
		    force_bio_submit ||
2972
		    bio_add_page(bio, page, page_size, pg_offset) < page_size) {
2973
			ret = submit_one_bio(bio, mirror_num, prev_bio_flags);
2974 2975
			if (ret < 0) {
				*bio_ret = NULL;
2976
				return ret;
2977
			}
2978 2979
			bio = NULL;
		} else {
2980
			if (wbc)
2981
				wbc_account_cgroup_owner(wbc, page, page_size);
2982 2983 2984
			return 0;
		}
	}
C
Chris Mason 已提交
2985

2986
	bio = btrfs_bio_alloc(offset);
2987
	bio_add_page(bio, page, page_size, pg_offset);
2988 2989
	bio->bi_end_io = end_io_func;
	bio->bi_private = tree;
2990
	bio->bi_write_hint = page->mapping->host->i_write_hint;
2991
	bio->bi_opf = opf;
2992
	if (wbc) {
2993 2994 2995 2996
		struct block_device *bdev;

		bdev = BTRFS_I(page->mapping->host)->root->fs_info->fs_devices->latest_bdev;
		bio_set_dev(bio, bdev);
2997
		wbc_init_bio(wbc, bio);
2998
		wbc_account_cgroup_owner(wbc, page, page_size);
2999
	}
3000

3001
	*bio_ret = bio;
3002 3003 3004 3005

	return ret;
}

3006 3007
static void attach_extent_buffer_page(struct extent_buffer *eb,
				      struct page *page)
3008 3009 3010
{
	if (!PagePrivate(page)) {
		SetPagePrivate(page);
3011
		get_page(page);
J
Josef Bacik 已提交
3012 3013 3014
		set_page_private(page, (unsigned long)eb);
	} else {
		WARN_ON(page->private != (unsigned long)eb);
3015 3016 3017
	}
}

J
Josef Bacik 已提交
3018
void set_page_extent_mapped(struct page *page)
3019
{
J
Josef Bacik 已提交
3020 3021
	if (!PagePrivate(page)) {
		SetPagePrivate(page);
3022
		get_page(page);
J
Josef Bacik 已提交
3023 3024
		set_page_private(page, EXTENT_PAGE_PRIVATE);
	}
3025 3026
}

3027 3028 3029 3030 3031 3032 3033 3034 3035
static struct extent_map *
__get_extent_map(struct inode *inode, struct page *page, size_t pg_offset,
		 u64 start, u64 len, get_extent_t *get_extent,
		 struct extent_map **em_cached)
{
	struct extent_map *em;

	if (em_cached && *em_cached) {
		em = *em_cached;
3036
		if (extent_map_in_tree(em) && start >= em->start &&
3037
		    start < extent_map_end(em)) {
3038
			refcount_inc(&em->refs);
3039 3040 3041 3042 3043 3044 3045
			return em;
		}

		free_extent_map(em);
		*em_cached = NULL;
	}

3046
	em = get_extent(BTRFS_I(inode), page, pg_offset, start, len, 0);
3047 3048
	if (em_cached && !IS_ERR_OR_NULL(em)) {
		BUG_ON(*em_cached);
3049
		refcount_inc(&em->refs);
3050 3051 3052 3053
		*em_cached = em;
	}
	return em;
}
3054 3055 3056 3057
/*
 * 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)
3058
 * XXX JDM: This needs looking at to ensure proper page locking
3059
 * return 0 on success, otherwise return error
3060
 */
3061 3062 3063
static int __do_readpage(struct extent_io_tree *tree,
			 struct page *page,
			 get_extent_t *get_extent,
3064
			 struct extent_map **em_cached,
3065
			 struct bio **bio, int mirror_num,
3066
			 unsigned long *bio_flags, unsigned int read_flags,
3067
			 u64 *prev_em_start)
3068 3069
{
	struct inode *inode = page->mapping->host;
M
Miao Xie 已提交
3070
	u64 start = page_offset(page);
3071
	const u64 end = start + PAGE_SIZE - 1;
3072 3073 3074 3075 3076 3077
	u64 cur = start;
	u64 extent_offset;
	u64 last_byte = i_size_read(inode);
	u64 block_start;
	u64 cur_end;
	struct extent_map *em;
3078
	int ret = 0;
3079
	int nr = 0;
3080
	size_t pg_offset = 0;
3081
	size_t iosize;
C
Chris Mason 已提交
3082
	size_t disk_io_size;
3083
	size_t blocksize = inode->i_sb->s_blocksize;
3084
	unsigned long this_bio_flag = 0;
3085 3086 3087

	set_page_extent_mapped(page);

D
Dan Magenheimer 已提交
3088 3089 3090
	if (!PageUptodate(page)) {
		if (cleancache_get_page(page) == 0) {
			BUG_ON(blocksize != PAGE_SIZE);
3091
			unlock_extent(tree, start, end);
D
Dan Magenheimer 已提交
3092 3093 3094 3095
			goto out;
		}
	}

3096
	if (page->index == last_byte >> PAGE_SHIFT) {
C
Chris Mason 已提交
3097
		char *userpage;
3098
		size_t zero_offset = offset_in_page(last_byte);
C
Chris Mason 已提交
3099 3100

		if (zero_offset) {
3101
			iosize = PAGE_SIZE - zero_offset;
3102
			userpage = kmap_atomic(page);
C
Chris Mason 已提交
3103 3104
			memset(userpage + zero_offset, 0, iosize);
			flush_dcache_page(page);
3105
			kunmap_atomic(userpage);
C
Chris Mason 已提交
3106 3107
		}
	}
3108
	while (cur <= end) {
3109
		bool force_bio_submit = false;
3110
		u64 offset;
3111

3112 3113
		if (cur >= last_byte) {
			char *userpage;
3114 3115
			struct extent_state *cached = NULL;

3116
			iosize = PAGE_SIZE - pg_offset;
3117
			userpage = kmap_atomic(page);
3118
			memset(userpage + pg_offset, 0, iosize);
3119
			flush_dcache_page(page);
3120
			kunmap_atomic(userpage);
3121
			set_extent_uptodate(tree, cur, cur + iosize - 1,
3122
					    &cached, GFP_NOFS);
3123
			unlock_extent_cached(tree, cur,
3124
					     cur + iosize - 1, &cached);
3125 3126
			break;
		}
3127 3128
		em = __get_extent_map(inode, page, pg_offset, cur,
				      end - cur + 1, get_extent, em_cached);
3129
		if (IS_ERR_OR_NULL(em)) {
3130
			SetPageError(page);
3131
			unlock_extent(tree, cur, end);
3132 3133 3134 3135 3136 3137
			break;
		}
		extent_offset = cur - em->start;
		BUG_ON(extent_map_end(em) <= cur);
		BUG_ON(end < cur);

3138
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags)) {
3139
			this_bio_flag |= EXTENT_BIO_COMPRESSED;
3140 3141 3142
			extent_set_compress_type(&this_bio_flag,
						 em->compress_type);
		}
C
Chris Mason 已提交
3143

3144 3145
		iosize = min(extent_map_end(em) - cur, end - cur + 1);
		cur_end = min(extent_map_end(em) - 1, end);
3146
		iosize = ALIGN(iosize, blocksize);
C
Chris Mason 已提交
3147 3148
		if (this_bio_flag & EXTENT_BIO_COMPRESSED) {
			disk_io_size = em->block_len;
3149
			offset = em->block_start;
C
Chris Mason 已提交
3150
		} else {
3151
			offset = em->block_start + extent_offset;
C
Chris Mason 已提交
3152 3153
			disk_io_size = iosize;
		}
3154
		block_start = em->block_start;
Y
Yan Zheng 已提交
3155 3156
		if (test_bit(EXTENT_FLAG_PREALLOC, &em->flags))
			block_start = EXTENT_MAP_HOLE;
3157 3158 3159 3160 3161 3162 3163 3164 3165 3166 3167 3168 3169 3170 3171 3172 3173 3174 3175 3176 3177 3178 3179 3180 3181 3182 3183 3184 3185 3186 3187 3188 3189 3190 3191 3192 3193

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

		if (prev_em_start)
3198
			*prev_em_start = em->start;
3199

3200 3201 3202 3203 3204 3205
		free_extent_map(em);
		em = NULL;

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

3208
			userpage = kmap_atomic(page);
3209
			memset(userpage + pg_offset, 0, iosize);
3210
			flush_dcache_page(page);
3211
			kunmap_atomic(userpage);
3212 3213

			set_extent_uptodate(tree, cur, cur + iosize - 1,
3214
					    &cached, GFP_NOFS);
3215
			unlock_extent_cached(tree, cur,
3216
					     cur + iosize - 1, &cached);
3217
			cur = cur + iosize;
3218
			pg_offset += iosize;
3219 3220 3221
			continue;
		}
		/* the get_extent function already copied into the page */
3222 3223
		if (test_range_bit(tree, cur, cur_end,
				   EXTENT_UPTODATE, 1, NULL)) {
3224
			check_page_uptodate(tree, page);
3225
			unlock_extent(tree, cur, cur + iosize - 1);
3226
			cur = cur + iosize;
3227
			pg_offset += iosize;
3228 3229
			continue;
		}
3230 3231 3232 3233 3234
		/* we have an inline extent but it didn't get marked up
		 * to date.  Error out
		 */
		if (block_start == EXTENT_MAP_INLINE) {
			SetPageError(page);
3235
			unlock_extent(tree, cur, cur + iosize - 1);
3236
			cur = cur + iosize;
3237
			pg_offset += iosize;
3238 3239
			continue;
		}
3240

3241
		ret = submit_extent_page(REQ_OP_READ | read_flags, tree, NULL,
3242
					 page, offset, disk_io_size,
3243
					 pg_offset, bio,
C
Chris Mason 已提交
3244 3245
					 end_bio_extent_readpage, mirror_num,
					 *bio_flags,
3246 3247
					 this_bio_flag,
					 force_bio_submit);
3248 3249 3250 3251
		if (!ret) {
			nr++;
			*bio_flags = this_bio_flag;
		} else {
3252
			SetPageError(page);
3253
			unlock_extent(tree, cur, cur + iosize - 1);
3254
			goto out;
3255
		}
3256
		cur = cur + iosize;
3257
		pg_offset += iosize;
3258
	}
D
Dan Magenheimer 已提交
3259
out:
3260 3261 3262 3263 3264
	if (!nr) {
		if (!PageError(page))
			SetPageUptodate(page);
		unlock_page(page);
	}
3265
	return ret;
3266 3267
}

3268
static inline void contiguous_readpages(struct extent_io_tree *tree,
3269 3270
					     struct page *pages[], int nr_pages,
					     u64 start, u64 end,
3271
					     struct extent_map **em_cached,
3272
					     struct bio **bio,
3273
					     unsigned long *bio_flags,
3274
					     u64 *prev_em_start)
3275
{
3276
	struct btrfs_inode *inode = BTRFS_I(pages[0]->mapping->host);
3277 3278
	int index;

3279
	btrfs_lock_and_flush_ordered_range(tree, inode, start, end, NULL);
3280 3281

	for (index = 0; index < nr_pages; index++) {
3282
		__do_readpage(tree, pages[index], btrfs_get_extent, em_cached,
3283
				bio, 0, bio_flags, REQ_RAHEAD, prev_em_start);
3284
		put_page(pages[index]);
3285 3286 3287 3288 3289 3290 3291
	}
}

static int __extent_read_full_page(struct extent_io_tree *tree,
				   struct page *page,
				   get_extent_t *get_extent,
				   struct bio **bio, int mirror_num,
3292 3293
				   unsigned long *bio_flags,
				   unsigned int read_flags)
3294
{
3295
	struct btrfs_inode *inode = BTRFS_I(page->mapping->host);
3296
	u64 start = page_offset(page);
3297
	u64 end = start + PAGE_SIZE - 1;
3298 3299
	int ret;

3300
	btrfs_lock_and_flush_ordered_range(tree, inode, start, end, NULL);
3301

3302
	ret = __do_readpage(tree, page, get_extent, NULL, bio, mirror_num,
3303
			    bio_flags, read_flags, NULL);
3304 3305 3306
	return ret;
}

3307
int extent_read_full_page(struct extent_io_tree *tree, struct page *page,
3308
			    get_extent_t *get_extent, int mirror_num)
3309 3310
{
	struct bio *bio = NULL;
C
Chris Mason 已提交
3311
	unsigned long bio_flags = 0;
3312 3313
	int ret;

3314
	ret = __extent_read_full_page(tree, page, get_extent, &bio, mirror_num,
3315
				      &bio_flags, 0);
3316
	if (bio)
3317
		ret = submit_one_bio(bio, mirror_num, bio_flags);
3318 3319 3320
	return ret;
}

3321
static void update_nr_written(struct writeback_control *wbc,
3322
			      unsigned long nr_written)
3323 3324 3325 3326
{
	wbc->nr_to_write -= nr_written;
}

3327
/*
3328 3329
 * helper for __extent_writepage, doing all of the delayed allocation setup.
 *
3330
 * This returns 1 if btrfs_run_delalloc_range function did all the work required
3331 3332 3333 3334 3335
 * 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)
3336
 */
3337
static noinline_for_stack int writepage_delalloc(struct inode *inode,
3338 3339
		struct page *page, struct writeback_control *wbc,
		u64 delalloc_start, unsigned long *nr_written)
3340
{
3341
	u64 page_end = delalloc_start + PAGE_SIZE - 1;
3342
	bool found;
3343 3344 3345 3346 3347 3348 3349
	u64 delalloc_to_write = 0;
	u64 delalloc_end = 0;
	int ret;
	int page_started = 0;


	while (delalloc_end < page_end) {
3350
		found = find_lock_delalloc_range(inode, page,
3351
					       &delalloc_start,
3352
					       &delalloc_end);
3353
		if (!found) {
3354 3355 3356
			delalloc_start = delalloc_end + 1;
			continue;
		}
3357 3358
		ret = btrfs_run_delalloc_range(inode, page, delalloc_start,
				delalloc_end, &page_started, nr_written, wbc);
3359 3360
		if (ret) {
			SetPageError(page);
3361 3362 3363 3364 3365
			/*
			 * 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.
3366 3367 3368 3369 3370
			 */
			ret = ret < 0 ? ret : -EIO;
			goto done;
		}
		/*
3371 3372
		 * delalloc_end is already one less than the total length, so
		 * we don't subtract one from PAGE_SIZE
3373 3374
		 */
		delalloc_to_write += (delalloc_end - delalloc_start +
3375
				      PAGE_SIZE) >> PAGE_SHIFT;
3376 3377 3378 3379 3380 3381 3382 3383 3384 3385 3386 3387 3388 3389 3390 3391 3392 3393 3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419
		delalloc_start = delalloc_end + 1;
	}
	if (wbc->nr_to_write < delalloc_to_write) {
		int thresh = 8192;

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

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

	ret = 0;

done:
	return ret;
}

/*
 * helper for __extent_writepage.  This calls the writepage start hooks,
 * and does the loop to map the page into extents and bios.
 *
 * We return 1 if the IO is started and the page is unlocked,
 * 0 if all went well (page still locked)
 * < 0 if there were errors (page still locked)
 */
static noinline_for_stack int __extent_writepage_io(struct inode *inode,
				 struct page *page,
				 struct writeback_control *wbc,
				 struct extent_page_data *epd,
				 loff_t i_size,
				 unsigned long nr_written,
3420
				 int *nr_ret)
3421 3422
{
	struct extent_io_tree *tree = epd->tree;
M
Miao Xie 已提交
3423
	u64 start = page_offset(page);
3424
	u64 page_end = start + PAGE_SIZE - 1;
3425 3426 3427 3428 3429 3430
	u64 end;
	u64 cur = start;
	u64 extent_offset;
	u64 block_start;
	u64 iosize;
	struct extent_map *em;
3431
	size_t pg_offset = 0;
3432
	size_t blocksize;
3433 3434
	int ret = 0;
	int nr = 0;
3435
	const unsigned int write_flags = wbc_to_write_flags(wbc);
3436
	bool compressed;
C
Chris Mason 已提交
3437

3438 3439 3440 3441 3442 3443 3444
	ret = btrfs_writepage_cow_fixup(page, start, page_end);
	if (ret) {
		/* Fixup worker will requeue */
		if (ret == -EBUSY)
			wbc->pages_skipped++;
		else
			redirty_page_for_writepage(wbc, page);
3445

3446 3447 3448
		update_nr_written(wbc, nr_written);
		unlock_page(page);
		return 1;
3449 3450
	}

3451 3452 3453 3454
	/*
	 * we don't want to touch the inode after unlocking the page,
	 * so we update the mapping writeback index now
	 */
3455
	update_nr_written(wbc, nr_written + 1);
3456

3457 3458 3459 3460
	end = page_end;
	blocksize = inode->i_sb->s_blocksize;

	while (cur <= end) {
3461
		u64 em_end;
3462
		u64 offset;
3463

3464
		if (cur >= i_size) {
3465
			btrfs_writepage_endio_finish_ordered(page, cur,
3466
							     page_end, 1);
3467 3468
			break;
		}
3469
		em = btrfs_get_extent(BTRFS_I(inode), page, pg_offset, cur,
3470
				     end - cur + 1, 1);
3471
		if (IS_ERR_OR_NULL(em)) {
3472
			SetPageError(page);
3473
			ret = PTR_ERR_OR_ZERO(em);
3474 3475 3476 3477
			break;
		}

		extent_offset = cur - em->start;
3478 3479
		em_end = extent_map_end(em);
		BUG_ON(em_end <= cur);
3480
		BUG_ON(end < cur);
3481
		iosize = min(em_end - cur, end - cur + 1);
3482
		iosize = ALIGN(iosize, blocksize);
3483
		offset = em->block_start + extent_offset;
3484
		block_start = em->block_start;
C
Chris Mason 已提交
3485
		compressed = test_bit(EXTENT_FLAG_COMPRESSED, &em->flags);
3486 3487 3488
		free_extent_map(em);
		em = NULL;

C
Chris Mason 已提交
3489 3490 3491 3492 3493
		/*
		 * compressed and inline extents are written through other
		 * paths in the FS
		 */
		if (compressed || block_start == EXTENT_MAP_HOLE ||
3494
		    block_start == EXTENT_MAP_INLINE) {
C
Chris Mason 已提交
3495 3496 3497 3498
			/*
			 * end_io notification does not happen here for
			 * compressed extents
			 */
3499 3500 3501
			if (!compressed)
				btrfs_writepage_endio_finish_ordered(page, cur,
							    cur + iosize - 1,
3502
							    1);
C
Chris Mason 已提交
3503 3504 3505 3506 3507 3508 3509 3510 3511
			else if (compressed) {
				/* we don't want to end_page_writeback on
				 * a compressed extent.  this happens
				 * elsewhere
				 */
				nr++;
			}

			cur += iosize;
3512
			pg_offset += iosize;
3513 3514
			continue;
		}
C
Chris Mason 已提交
3515

3516
		btrfs_set_range_writeback(tree, cur, cur + iosize - 1);
3517 3518 3519 3520
		if (!PageWriteback(page)) {
			btrfs_err(BTRFS_I(inode)->root->fs_info,
				   "page %lu not writeback, cur %llu end %llu",
			       page->index, cur, end);
3521
		}
3522

3523
		ret = submit_extent_page(REQ_OP_WRITE | write_flags, tree, wbc,
3524
					 page, offset, iosize, pg_offset,
3525
					 &epd->bio,
3526 3527
					 end_bio_extent_writepage,
					 0, 0, 0, false);
3528
		if (ret) {
3529
			SetPageError(page);
3530 3531 3532
			if (PageWriteback(page))
				end_page_writeback(page);
		}
3533 3534

		cur = cur + iosize;
3535
		pg_offset += iosize;
3536 3537
		nr++;
	}
3538 3539 3540 3541 3542 3543 3544 3545 3546
	*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
3547 3548 3549
 *
 * Return 0 if everything goes well.
 * Return <0 for error.
3550 3551
 */
static int __extent_writepage(struct page *page, struct writeback_control *wbc,
3552
			      struct extent_page_data *epd)
3553 3554 3555
{
	struct inode *inode = page->mapping->host;
	u64 start = page_offset(page);
3556
	u64 page_end = start + PAGE_SIZE - 1;
3557 3558
	int ret;
	int nr = 0;
3559
	size_t pg_offset;
3560
	loff_t i_size = i_size_read(inode);
3561
	unsigned long end_index = i_size >> PAGE_SHIFT;
3562 3563 3564 3565 3566 3567 3568 3569
	unsigned long nr_written = 0;

	trace___extent_writepage(page, inode, wbc);

	WARN_ON(!PageLocked(page));

	ClearPageError(page);

3570
	pg_offset = offset_in_page(i_size);
3571 3572
	if (page->index > end_index ||
	   (page->index == end_index && !pg_offset)) {
3573
		page->mapping->a_ops->invalidatepage(page, 0, PAGE_SIZE);
3574 3575 3576 3577 3578 3579 3580 3581 3582
		unlock_page(page);
		return 0;
	}

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

		userpage = kmap_atomic(page);
		memset(userpage + pg_offset, 0,
3583
		       PAGE_SIZE - pg_offset);
3584 3585 3586 3587 3588 3589
		kunmap_atomic(userpage);
		flush_dcache_page(page);
	}

	set_page_extent_mapped(page);

3590
	if (!epd->extent_locked) {
3591
		ret = writepage_delalloc(inode, page, wbc, start, &nr_written);
3592
		if (ret == 1)
3593
			return 0;
3594 3595 3596
		if (ret)
			goto done;
	}
3597 3598

	ret = __extent_writepage_io(inode, page, wbc, epd,
3599
				    i_size, nr_written, &nr);
3600
	if (ret == 1)
3601
		return 0;
3602

3603 3604 3605 3606 3607 3608
done:
	if (nr == 0) {
		/* make sure the mapping tag for page dirty gets cleared */
		set_page_writeback(page);
		end_page_writeback(page);
	}
3609 3610 3611 3612
	if (PageError(page)) {
		ret = ret < 0 ? ret : -EIO;
		end_extent_writepage(page, ret, start, page_end);
	}
3613
	unlock_page(page);
3614
	ASSERT(ret <= 0);
3615
	return ret;
3616 3617
}

3618
void wait_on_extent_buffer_writeback(struct extent_buffer *eb)
3619
{
3620 3621
	wait_on_bit_io(&eb->bflags, EXTENT_BUFFER_WRITEBACK,
		       TASK_UNINTERRUPTIBLE);
3622 3623
}

3624 3625 3626 3627 3628 3629 3630
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);
}

3631 3632 3633 3634 3635 3636 3637
/*
 * 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
 */
3638
static noinline_for_stack int lock_extent_buffer_for_io(struct extent_buffer *eb,
3639
			  struct extent_page_data *epd)
3640
{
3641
	struct btrfs_fs_info *fs_info = eb->fs_info;
3642
	int i, num_pages, failed_page_nr;
3643 3644 3645 3646
	int flush = 0;
	int ret = 0;

	if (!btrfs_try_tree_write_lock(eb)) {
3647
		ret = flush_write_bio(epd);
3648 3649 3650
		if (ret < 0)
			return ret;
		flush = 1;
3651 3652 3653 3654 3655 3656 3657 3658
		btrfs_tree_lock(eb);
	}

	if (test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags)) {
		btrfs_tree_unlock(eb);
		if (!epd->sync_io)
			return 0;
		if (!flush) {
3659
			ret = flush_write_bio(epd);
3660 3661
			if (ret < 0)
				return ret;
3662 3663
			flush = 1;
		}
C
Chris Mason 已提交
3664 3665 3666 3667 3668
		while (1) {
			wait_on_extent_buffer_writeback(eb);
			btrfs_tree_lock(eb);
			if (!test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags))
				break;
3669 3670 3671 3672
			btrfs_tree_unlock(eb);
		}
	}

3673 3674 3675 3676 3677 3678
	/*
	 * 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);
3679 3680
	if (test_and_clear_bit(EXTENT_BUFFER_DIRTY, &eb->bflags)) {
		set_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags);
3681
		spin_unlock(&eb->refs_lock);
3682
		btrfs_set_header_flag(eb, BTRFS_HEADER_FLAG_WRITTEN);
3683 3684 3685
		percpu_counter_add_batch(&fs_info->dirty_metadata_bytes,
					 -eb->len,
					 fs_info->dirty_metadata_batch);
3686
		ret = 1;
3687 3688
	} else {
		spin_unlock(&eb->refs_lock);
3689 3690 3691 3692 3693 3694 3695
	}

	btrfs_tree_unlock(eb);

	if (!ret)
		return ret;

3696
	num_pages = num_extent_pages(eb);
3697
	for (i = 0; i < num_pages; i++) {
3698
		struct page *p = eb->pages[i];
3699 3700 3701

		if (!trylock_page(p)) {
			if (!flush) {
3702 3703 3704 3705 3706
				int err;

				err = flush_write_bio(epd);
				if (err < 0) {
					ret = err;
3707 3708 3709
					failed_page_nr = i;
					goto err_unlock;
				}
3710 3711 3712 3713 3714 3715 3716
				flush = 1;
			}
			lock_page(p);
		}
	}

	return ret;
3717 3718 3719 3720
err_unlock:
	/* Unlock already locked pages */
	for (i = 0; i < failed_page_nr; i++)
		unlock_page(eb->pages[i]);
3721 3722 3723 3724 3725 3726 3727 3728 3729 3730 3731 3732 3733 3734
	/*
	 * 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);
3735
	return ret;
3736 3737
}

3738 3739 3740
static void set_btree_ioerr(struct page *page)
{
	struct extent_buffer *eb = (struct extent_buffer *)page->private;
3741
	struct btrfs_fs_info *fs_info;
3742 3743 3744 3745 3746

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

3747 3748 3749 3750 3751 3752 3753 3754
	/*
	 * 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);

3755 3756 3757 3758 3759 3760 3761 3762 3763 3764 3765 3766 3767 3768 3769 3770 3771 3772 3773 3774 3775 3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794
	/*
	 * 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:
3795
		set_bit(BTRFS_FS_BTREE_ERR, &eb->fs_info->flags);
3796 3797
		break;
	case 0:
3798
		set_bit(BTRFS_FS_LOG1_ERR, &eb->fs_info->flags);
3799 3800
		break;
	case 1:
3801
		set_bit(BTRFS_FS_LOG2_ERR, &eb->fs_info->flags);
3802 3803 3804 3805 3806 3807
		break;
	default:
		BUG(); /* unexpected, logic error */
	}
}

3808
static void end_bio_extent_buffer_writepage(struct bio *bio)
3809
{
3810
	struct bio_vec *bvec;
3811
	struct extent_buffer *eb;
3812
	int done;
3813
	struct bvec_iter_all iter_all;
3814

3815
	ASSERT(!bio_flagged(bio, BIO_CLONED));
3816
	bio_for_each_segment_all(bvec, bio, iter_all) {
3817 3818 3819 3820 3821 3822
		struct page *page = bvec->bv_page;

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

3823
		if (bio->bi_status ||
3824
		    test_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags)) {
3825
			ClearPageUptodate(page);
3826
			set_btree_ioerr(page);
3827 3828 3829 3830 3831 3832 3833 3834
		}

		end_page_writeback(page);

		if (!done)
			continue;

		end_extent_buffer_writeback(eb);
3835
	}
3836 3837 3838 3839

	bio_put(bio);
}

3840
static noinline_for_stack int write_one_eb(struct extent_buffer *eb,
3841 3842 3843
			struct writeback_control *wbc,
			struct extent_page_data *epd)
{
3844
	struct btrfs_fs_info *fs_info = eb->fs_info;
3845
	struct extent_io_tree *tree = &BTRFS_I(fs_info->btree_inode)->io_tree;
3846
	u64 offset = eb->start;
3847
	u32 nritems;
3848
	int i, num_pages;
3849
	unsigned long start, end;
3850
	unsigned int write_flags = wbc_to_write_flags(wbc) | REQ_META;
3851
	int ret = 0;
3852

3853
	clear_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags);
3854
	num_pages = num_extent_pages(eb);
3855
	atomic_set(&eb->io_pages, num_pages);
3856

3857 3858
	/* set btree blocks beyond nritems with 0 to avoid stale content. */
	nritems = btrfs_header_nritems(eb);
3859 3860 3861
	if (btrfs_header_level(eb) > 0) {
		end = btrfs_node_key_ptr_offset(nritems);

3862
		memzero_extent_buffer(eb, end, eb->len - end);
3863 3864 3865 3866 3867 3868
	} else {
		/*
		 * leaf:
		 * header 0 1 2 .. N ... data_N .. data_2 data_1 data_0
		 */
		start = btrfs_item_nr_offset(nritems);
3869
		end = BTRFS_LEAF_DATA_OFFSET + leaf_data_end(eb);
3870
		memzero_extent_buffer(eb, start, end - start);
3871 3872
	}

3873
	for (i = 0; i < num_pages; i++) {
3874
		struct page *p = eb->pages[i];
3875 3876 3877

		clear_page_dirty_for_io(p);
		set_page_writeback(p);
3878
		ret = submit_extent_page(REQ_OP_WRITE | write_flags, tree, wbc,
3879
					 p, offset, PAGE_SIZE, 0,
3880
					 &epd->bio,
3881
					 end_bio_extent_buffer_writepage,
3882
					 0, 0, 0, false);
3883
		if (ret) {
3884
			set_btree_ioerr(p);
3885 3886
			if (PageWriteback(p))
				end_page_writeback(p);
3887 3888 3889 3890 3891
			if (atomic_sub_and_test(num_pages - i, &eb->io_pages))
				end_extent_buffer_writeback(eb);
			ret = -EIO;
			break;
		}
3892
		offset += PAGE_SIZE;
3893
		update_nr_written(wbc, 1);
3894 3895 3896 3897 3898
		unlock_page(p);
	}

	if (unlikely(ret)) {
		for (; i < num_pages; i++) {
3899
			struct page *p = eb->pages[i];
3900
			clear_page_dirty_for_io(p);
3901 3902 3903 3904 3905 3906 3907 3908 3909 3910 3911 3912 3913 3914 3915 3916 3917 3918 3919 3920 3921 3922 3923 3924 3925 3926
			unlock_page(p);
		}
	}

	return ret;
}

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

3929
	pagevec_init(&pvec);
3930 3931 3932 3933
	if (wbc->range_cyclic) {
		index = mapping->writeback_index; /* Start from prev offset */
		end = -1;
	} else {
3934 3935
		index = wbc->range_start >> PAGE_SHIFT;
		end = wbc->range_end >> PAGE_SHIFT;
3936 3937 3938 3939 3940 3941 3942 3943 3944 3945
		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 已提交
3946
	       (nr_pages = pagevec_lookup_range_tag(&pvec, mapping, &index, end,
3947
			tag))) {
3948 3949 3950 3951 3952 3953 3954 3955 3956
		unsigned i;

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

			if (!PagePrivate(page))
				continue;

3957 3958 3959 3960 3961 3962
			spin_lock(&mapping->private_lock);
			if (!PagePrivate(page)) {
				spin_unlock(&mapping->private_lock);
				continue;
			}

3963
			eb = (struct extent_buffer *)page->private;
3964 3965 3966 3967 3968 3969

			/*
			 * 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.
			 */
3970
			if (WARN_ON(!eb)) {
3971
				spin_unlock(&mapping->private_lock);
3972 3973 3974
				continue;
			}

3975 3976
			if (eb == prev_eb) {
				spin_unlock(&mapping->private_lock);
3977
				continue;
3978
			}
3979

3980 3981 3982
			ret = atomic_inc_not_zero(&eb->refs);
			spin_unlock(&mapping->private_lock);
			if (!ret)
3983 3984 3985
				continue;

			prev_eb = eb;
3986
			ret = lock_extent_buffer_for_io(eb, &epd);
3987 3988 3989
			if (!ret) {
				free_extent_buffer(eb);
				continue;
3990 3991 3992 3993
			} else if (ret < 0) {
				done = 1;
				free_extent_buffer(eb);
				break;
3994 3995
			}

3996
			ret = write_one_eb(eb, wbc, &epd);
3997 3998 3999 4000 4001 4002 4003 4004 4005 4006 4007 4008 4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022
			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;
	}
4023 4024 4025 4026 4027 4028
	ASSERT(ret <= 0);
	if (ret < 0) {
		end_write_bio(&epd, ret);
		return ret;
	}
	ret = flush_write_bio(&epd);
4029 4030 4031
	return ret;
}

4032
/**
C
Chris Mason 已提交
4033
 * write_cache_pages - walk the list of dirty pages of the given address space and write all of them.
4034 4035
 * @mapping: address space structure to write
 * @wbc: subtract the number of written pages from *@wbc->nr_to_write
4036
 * @data: data passed to __extent_writepage function
4037 4038 4039 4040 4041 4042 4043 4044 4045
 *
 * 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.
 */
4046
static int extent_write_cache_pages(struct address_space *mapping,
C
Chris Mason 已提交
4047
			     struct writeback_control *wbc,
4048
			     struct extent_page_data *epd)
4049
{
4050
	struct inode *inode = mapping->host;
4051 4052
	int ret = 0;
	int done = 0;
4053
	int nr_to_write_done = 0;
4054 4055 4056 4057
	struct pagevec pvec;
	int nr_pages;
	pgoff_t index;
	pgoff_t end;		/* Inclusive */
4058 4059
	pgoff_t done_index;
	int range_whole = 0;
4060
	int scanned = 0;
M
Matthew Wilcox 已提交
4061
	xa_mark_t tag;
4062

4063 4064 4065 4066 4067 4068 4069 4070 4071 4072 4073 4074
	/*
	 * 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;

4075
	pagevec_init(&pvec);
4076 4077 4078 4079
	if (wbc->range_cyclic) {
		index = mapping->writeback_index; /* Start from prev offset */
		end = -1;
	} else {
4080 4081
		index = wbc->range_start >> PAGE_SHIFT;
		end = wbc->range_end >> PAGE_SHIFT;
4082 4083
		if (wbc->range_start == 0 && wbc->range_end == LLONG_MAX)
			range_whole = 1;
4084 4085
		scanned = 1;
	}
4086 4087 4088 4089 4090 4091 4092 4093 4094 4095 4096 4097 4098 4099

	/*
	 * 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)
4100 4101 4102
		tag = PAGECACHE_TAG_TOWRITE;
	else
		tag = PAGECACHE_TAG_DIRTY;
4103
retry:
4104
	if (wbc->sync_mode == WB_SYNC_ALL || wbc->tagged_writepages)
4105
		tag_pages_for_writeback(mapping, index, end);
4106
	done_index = index;
4107
	while (!done && !nr_to_write_done && (index <= end) &&
4108 4109
			(nr_pages = pagevec_lookup_range_tag(&pvec, mapping,
						&index, end, tag))) {
4110 4111 4112 4113 4114 4115
		unsigned i;

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

4116
			done_index = page->index + 1;
4117
			/*
M
Matthew Wilcox 已提交
4118 4119 4120 4121 4122
			 * 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
4123
			 */
4124
			if (!trylock_page(page)) {
4125 4126
				ret = flush_write_bio(epd);
				BUG_ON(ret < 0);
4127
				lock_page(page);
4128
			}
4129 4130 4131 4132 4133 4134

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

C
Chris Mason 已提交
4135
			if (wbc->sync_mode != WB_SYNC_NONE) {
4136 4137 4138 4139
				if (PageWriteback(page)) {
					ret = flush_write_bio(epd);
					BUG_ON(ret < 0);
				}
4140
				wait_on_page_writeback(page);
C
Chris Mason 已提交
4141
			}
4142 4143 4144 4145 4146 4147 4148

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

4149
			ret = __extent_writepage(page, wbc, epd);
4150 4151 4152 4153
			if (ret < 0) {
				done = 1;
				break;
			}
4154 4155 4156 4157 4158 4159 4160

			/*
			 * 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;
4161 4162 4163 4164
		}
		pagevec_release(&pvec);
		cond_resched();
	}
4165
	if (!scanned && !done) {
4166 4167 4168 4169 4170 4171 4172 4173
		/*
		 * 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;
	}
4174 4175 4176 4177

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

4178
	btrfs_add_delayed_iput(inode);
4179
	return ret;
4180 4181
}

4182
int extent_write_full_page(struct page *page, struct writeback_control *wbc)
4183 4184 4185 4186
{
	int ret;
	struct extent_page_data epd = {
		.bio = NULL,
4187
		.tree = &BTRFS_I(page->mapping->host)->io_tree,
4188
		.extent_locked = 0,
4189
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4190 4191 4192
	};

	ret = __extent_writepage(page, wbc, &epd);
4193 4194 4195 4196 4197
	ASSERT(ret <= 0);
	if (ret < 0) {
		end_write_bio(&epd, ret);
		return ret;
	}
4198

4199 4200
	ret = flush_write_bio(&epd);
	ASSERT(ret <= 0);
4201 4202 4203
	return ret;
}

4204
int extent_write_locked_range(struct inode *inode, u64 start, u64 end,
4205 4206 4207 4208
			      int mode)
{
	int ret = 0;
	struct address_space *mapping = inode->i_mapping;
4209
	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
4210
	struct page *page;
4211 4212
	unsigned long nr_pages = (end - start + PAGE_SIZE) >>
		PAGE_SHIFT;
4213 4214 4215 4216 4217

	struct extent_page_data epd = {
		.bio = NULL,
		.tree = tree,
		.extent_locked = 1,
4218
		.sync_io = mode == WB_SYNC_ALL,
4219 4220 4221 4222 4223 4224
	};
	struct writeback_control wbc_writepages = {
		.sync_mode	= mode,
		.nr_to_write	= nr_pages * 2,
		.range_start	= start,
		.range_end	= end + 1,
4225 4226 4227
		/* We're called from an async helper function */
		.punt_to_cgroup	= 1,
		.no_cgroup_owner = 1,
4228 4229
	};

4230
	wbc_attach_fdatawrite_inode(&wbc_writepages, inode);
C
Chris Mason 已提交
4231
	while (start <= end) {
4232
		page = find_get_page(mapping, start >> PAGE_SHIFT);
4233 4234 4235
		if (clear_page_dirty_for_io(page))
			ret = __extent_writepage(page, &wbc_writepages, &epd);
		else {
4236
			btrfs_writepage_endio_finish_ordered(page, start,
4237
						    start + PAGE_SIZE - 1, 1);
4238 4239
			unlock_page(page);
		}
4240 4241
		put_page(page);
		start += PAGE_SIZE;
4242 4243
	}

4244
	ASSERT(ret <= 0);
4245 4246 4247
	if (ret == 0)
		ret = flush_write_bio(&epd);
	else
4248
		end_write_bio(&epd, ret);
4249 4250

	wbc_detach_inode(&wbc_writepages);
4251 4252
	return ret;
}
4253

4254
int extent_writepages(struct address_space *mapping,
4255 4256 4257 4258 4259
		      struct writeback_control *wbc)
{
	int ret = 0;
	struct extent_page_data epd = {
		.bio = NULL,
4260
		.tree = &BTRFS_I(mapping->host)->io_tree,
4261
		.extent_locked = 0,
4262
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4263 4264
	};

4265
	ret = extent_write_cache_pages(mapping, wbc, &epd);
4266 4267 4268 4269 4270 4271
	ASSERT(ret <= 0);
	if (ret < 0) {
		end_write_bio(&epd, ret);
		return ret;
	}
	ret = flush_write_bio(&epd);
4272 4273 4274
	return ret;
}

4275 4276
int extent_readpages(struct address_space *mapping, struct list_head *pages,
		     unsigned nr_pages)
4277 4278
{
	struct bio *bio = NULL;
C
Chris Mason 已提交
4279
	unsigned long bio_flags = 0;
L
Liu Bo 已提交
4280
	struct page *pagepool[16];
4281
	struct extent_map *em_cached = NULL;
4282
	struct extent_io_tree *tree = &BTRFS_I(mapping->host)->io_tree;
L
Liu Bo 已提交
4283
	int nr = 0;
4284
	u64 prev_em_start = (u64)-1;
4285

4286
	while (!list_empty(pages)) {
4287 4288
		u64 contig_end = 0;

4289
		for (nr = 0; nr < ARRAY_SIZE(pagepool) && !list_empty(pages);) {
4290
			struct page *page = lru_to_page(pages);
4291

4292 4293 4294 4295 4296
			prefetchw(&page->flags);
			list_del(&page->lru);
			if (add_to_page_cache_lru(page, mapping, page->index,
						readahead_gfp_mask(mapping))) {
				put_page(page);
4297
				break;
4298 4299 4300
			}

			pagepool[nr++] = page;
4301
			contig_end = page_offset(page) + PAGE_SIZE - 1;
4302
		}
L
Liu Bo 已提交
4303

4304 4305 4306 4307 4308 4309 4310 4311 4312
		if (nr) {
			u64 contig_start = page_offset(pagepool[0]);

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

			contiguous_readpages(tree, pagepool, nr, contig_start,
				     contig_end, &em_cached, &bio, &bio_flags,
				     &prev_em_start);
		}
4313
	}
L
Liu Bo 已提交
4314

4315 4316 4317
	if (em_cached)
		free_extent_map(em_cached);

4318
	if (bio)
4319
		return submit_one_bio(bio, 0, bio_flags);
4320 4321 4322 4323 4324 4325 4326 4327 4328 4329 4330
	return 0;
}

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

4336
	start += ALIGN(offset, blocksize);
4337 4338 4339
	if (start > end)
		return 0;

4340
	lock_extent_bits(tree, start, end, &cached_state);
4341
	wait_on_page_writeback(page);
4342 4343
	clear_extent_bit(tree, start, end, EXTENT_LOCKED | EXTENT_DELALLOC |
			 EXTENT_DO_ACCOUNTING, 1, 1, &cached_state);
4344 4345 4346
	return 0;
}

4347 4348 4349 4350 4351
/*
 * 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.
 */
4352
static int try_release_extent_state(struct extent_io_tree *tree,
4353
				    struct page *page, gfp_t mask)
4354
{
M
Miao Xie 已提交
4355
	u64 start = page_offset(page);
4356
	u64 end = start + PAGE_SIZE - 1;
4357 4358
	int ret = 1;

N
Nikolay Borisov 已提交
4359
	if (test_range_bit(tree, start, end, EXTENT_LOCKED, 0, NULL)) {
4360
		ret = 0;
N
Nikolay Borisov 已提交
4361
	} else {
4362 4363 4364 4365
		/*
		 * at this point we can safely clear everything except the
		 * locked bit and the nodatasum bit
		 */
4366
		ret = __clear_extent_bit(tree, start, end,
4367
				 ~(EXTENT_LOCKED | EXTENT_NODATASUM),
4368
				 0, 0, NULL, mask, NULL);
4369 4370 4371 4372 4373 4374 4375 4376

		/* if clear_extent_bit failed for enomem reasons,
		 * we can't allow the release to continue.
		 */
		if (ret < 0)
			ret = 0;
		else
			ret = 1;
4377 4378 4379 4380
	}
	return ret;
}

4381 4382 4383 4384 4385
/*
 * 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
 */
4386
int try_release_extent_mapping(struct page *page, gfp_t mask)
4387 4388
{
	struct extent_map *em;
M
Miao Xie 已提交
4389
	u64 start = page_offset(page);
4390
	u64 end = start + PAGE_SIZE - 1;
4391 4392 4393
	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;
4394

4395
	if (gfpflags_allow_blocking(mask) &&
4396
	    page->mapping->host->i_size > SZ_16M) {
4397
		u64 len;
4398
		while (start <= end) {
4399
			len = end - start + 1;
4400
			write_lock(&map->lock);
4401
			em = lookup_extent_mapping(map, start, len);
4402
			if (!em) {
4403
				write_unlock(&map->lock);
4404 4405
				break;
			}
4406 4407
			if (test_bit(EXTENT_FLAG_PINNED, &em->flags) ||
			    em->start != start) {
4408
				write_unlock(&map->lock);
4409 4410 4411 4412 4413
				free_extent_map(em);
				break;
			}
			if (!test_range_bit(tree, em->start,
					    extent_map_end(em) - 1,
N
Nikolay Borisov 已提交
4414
					    EXTENT_LOCKED, 0, NULL)) {
4415 4416
				set_bit(BTRFS_INODE_NEEDS_FULL_SYNC,
					&btrfs_inode->runtime_flags);
4417 4418 4419 4420 4421
				remove_extent_mapping(map, em);
				/* once for the rb tree */
				free_extent_map(em);
			}
			start = extent_map_end(em);
4422
			write_unlock(&map->lock);
4423 4424

			/* once for us */
4425 4426 4427
			free_extent_map(em);
		}
	}
4428
	return try_release_extent_state(tree, page, mask);
4429 4430
}

4431 4432 4433 4434 4435
/*
 * helper function for fiemap, which doesn't want to see any holes.
 * This maps until we find something past 'last'
 */
static struct extent_map *get_extent_skip_holes(struct inode *inode,
4436
						u64 offset, u64 last)
4437
{
4438
	u64 sectorsize = btrfs_inode_sectorsize(inode);
4439 4440 4441 4442 4443 4444
	struct extent_map *em;
	u64 len;

	if (offset >= last)
		return NULL;

4445
	while (1) {
4446 4447 4448
		len = last - offset;
		if (len == 0)
			break;
4449
		len = ALIGN(len, sectorsize);
4450
		em = btrfs_get_extent_fiemap(BTRFS_I(inode), offset, len);
4451
		if (IS_ERR_OR_NULL(em))
4452 4453 4454
			return em;

		/* if this isn't a hole return it */
4455
		if (em->block_start != EXTENT_MAP_HOLE)
4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466
			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;
}

4467 4468 4469 4470 4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481 4482 4483 4484 4485 4486 4487 4488 4489 4490 4491 4492 4493 4494 4495 4496 4497 4498 4499 4500
/*
 * 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
4501
	 * fiemap extent won't overlap with cached one.
4502 4503 4504 4505 4506 4507 4508 4509 4510 4511 4512 4513 4514 4515 4516 4517 4518 4519 4520 4521 4522 4523 4524 4525 4526 4527 4528 4529 4530 4531 4532 4533 4534 4535 4536 4537 4538 4539 4540 4541 4542 4543 4544 4545 4546 4547 4548 4549 4550 4551 4552
	 * 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;
}

/*
4553
 * Emit last fiemap cache
4554
 *
4555 4556 4557 4558 4559 4560 4561
 * 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().
4562
 */
4563
static int emit_last_fiemap_cache(struct fiemap_extent_info *fieinfo,
4564
				  struct fiemap_cache *cache)
4565 4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577 4578
{
	int ret;

	if (!cache->cached)
		return 0;

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

Y
Yehuda Sadeh 已提交
4579
int extent_fiemap(struct inode *inode, struct fiemap_extent_info *fieinfo,
4580
		__u64 start, __u64 len)
Y
Yehuda Sadeh 已提交
4581
{
J
Josef Bacik 已提交
4582
	int ret = 0;
Y
Yehuda Sadeh 已提交
4583 4584 4585
	u64 off = start;
	u64 max = start + len;
	u32 flags = 0;
J
Josef Bacik 已提交
4586 4587
	u32 found_type;
	u64 last;
4588
	u64 last_for_get_extent = 0;
Y
Yehuda Sadeh 已提交
4589
	u64 disko = 0;
4590
	u64 isize = i_size_read(inode);
J
Josef Bacik 已提交
4591
	struct btrfs_key found_key;
Y
Yehuda Sadeh 已提交
4592
	struct extent_map *em = NULL;
4593
	struct extent_state *cached_state = NULL;
J
Josef Bacik 已提交
4594
	struct btrfs_path *path;
4595
	struct btrfs_root *root = BTRFS_I(inode)->root;
4596
	struct fiemap_cache cache = { 0 };
4597 4598
	struct ulist *roots;
	struct ulist *tmp_ulist;
Y
Yehuda Sadeh 已提交
4599
	int end = 0;
4600 4601 4602
	u64 em_start = 0;
	u64 em_len = 0;
	u64 em_end = 0;
Y
Yehuda Sadeh 已提交
4603 4604 4605 4606

	if (len == 0)
		return -EINVAL;

J
Josef Bacik 已提交
4607 4608 4609 4610 4611
	path = btrfs_alloc_path();
	if (!path)
		return -ENOMEM;
	path->leave_spinning = 1;

4612 4613 4614 4615 4616 4617 4618
	roots = ulist_alloc(GFP_KERNEL);
	tmp_ulist = ulist_alloc(GFP_KERNEL);
	if (!roots || !tmp_ulist) {
		ret = -ENOMEM;
		goto out_free_ulist;
	}

4619 4620
	start = round_down(start, btrfs_inode_sectorsize(inode));
	len = round_up(max, btrfs_inode_sectorsize(inode)) - start;
4621

4622 4623 4624 4625
	/*
	 * lookup the last file extent.  We're not using i_size here
	 * because there might be preallocation past i_size
	 */
4626 4627
	ret = btrfs_lookup_file_extent(NULL, root, path,
			btrfs_ino(BTRFS_I(inode)), -1, 0);
J
Josef Bacik 已提交
4628
	if (ret < 0) {
4629
		goto out_free_ulist;
4630 4631 4632 4633
	} else {
		WARN_ON(!ret);
		if (ret == 1)
			ret = 0;
J
Josef Bacik 已提交
4634
	}
4635

J
Josef Bacik 已提交
4636 4637
	path->slots[0]--;
	btrfs_item_key_to_cpu(path->nodes[0], &found_key, path->slots[0]);
4638
	found_type = found_key.type;
J
Josef Bacik 已提交
4639

4640
	/* No extents, but there might be delalloc bits */
4641
	if (found_key.objectid != btrfs_ino(BTRFS_I(inode)) ||
J
Josef Bacik 已提交
4642
	    found_type != BTRFS_EXTENT_DATA_KEY) {
4643 4644 4645 4646 4647 4648 4649 4650 4651 4652 4653
		/* 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 已提交
4654
	}
4655
	btrfs_release_path(path);
J
Josef Bacik 已提交
4656

4657 4658 4659 4660 4661 4662 4663 4664 4665 4666
	/*
	 * 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;
	}

4667
	lock_extent_bits(&BTRFS_I(inode)->io_tree, start, start + len - 1,
4668
			 &cached_state);
4669

4670
	em = get_extent_skip_holes(inode, start, last_for_get_extent);
Y
Yehuda Sadeh 已提交
4671 4672 4673 4674 4675 4676
	if (!em)
		goto out;
	if (IS_ERR(em)) {
		ret = PTR_ERR(em);
		goto out;
	}
J
Josef Bacik 已提交
4677

Y
Yehuda Sadeh 已提交
4678
	while (!end) {
4679
		u64 offset_in_extent = 0;
4680 4681 4682 4683 4684 4685 4686 4687 4688 4689 4690 4691

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

4693 4694
		/*
		 * record the offset from the start of the extent
4695 4696 4697
		 * 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.
4698
		 */
4699 4700
		if (!test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
			offset_in_extent = em_start - em->start;
4701
		em_end = extent_map_end(em);
4702
		em_len = em_end - em_start;
Y
Yehuda Sadeh 已提交
4703
		flags = 0;
4704 4705 4706 4707
		if (em->block_start < EXTENT_MAP_LAST_BYTE)
			disko = em->block_start + offset_in_extent;
		else
			disko = 0;
Y
Yehuda Sadeh 已提交
4708

4709 4710 4711 4712 4713 4714 4715
		/*
		 * bump off for our next call to get_extent
		 */
		off = extent_map_end(em);
		if (off >= max)
			end = 1;

4716
		if (em->block_start == EXTENT_MAP_LAST_BYTE) {
Y
Yehuda Sadeh 已提交
4717 4718
			end = 1;
			flags |= FIEMAP_EXTENT_LAST;
4719
		} else if (em->block_start == EXTENT_MAP_INLINE) {
Y
Yehuda Sadeh 已提交
4720 4721
			flags |= (FIEMAP_EXTENT_DATA_INLINE |
				  FIEMAP_EXTENT_NOT_ALIGNED);
4722
		} else if (em->block_start == EXTENT_MAP_DELALLOC) {
Y
Yehuda Sadeh 已提交
4723 4724
			flags |= (FIEMAP_EXTENT_DELALLOC |
				  FIEMAP_EXTENT_UNKNOWN);
4725 4726 4727
		} else if (fieinfo->fi_extents_max) {
			u64 bytenr = em->block_start -
				(em->start - em->orig_start);
4728 4729 4730 4731

			/*
			 * As btrfs supports shared space, this information
			 * can be exported to userspace tools via
4732 4733 4734
			 * flag FIEMAP_EXTENT_SHARED.  If fi_extents_max == 0
			 * then we're just getting a count and we can skip the
			 * lookup stuff.
4735
			 */
4736 4737
			ret = btrfs_check_shared(root,
						 btrfs_ino(BTRFS_I(inode)),
4738
						 bytenr, roots, tmp_ulist);
4739
			if (ret < 0)
4740
				goto out_free;
4741
			if (ret)
4742
				flags |= FIEMAP_EXTENT_SHARED;
4743
			ret = 0;
Y
Yehuda Sadeh 已提交
4744 4745 4746
		}
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
			flags |= FIEMAP_EXTENT_ENCODED;
4747 4748
		if (test_bit(EXTENT_FLAG_PREALLOC, &em->flags))
			flags |= FIEMAP_EXTENT_UNWRITTEN;
Y
Yehuda Sadeh 已提交
4749 4750 4751

		free_extent_map(em);
		em = NULL;
4752 4753
		if ((em_start >= last) || em_len == (u64)-1 ||
		   (last == (u64)-1 && isize <= em_end)) {
Y
Yehuda Sadeh 已提交
4754 4755 4756 4757
			flags |= FIEMAP_EXTENT_LAST;
			end = 1;
		}

4758
		/* now scan forward to see if this is really the last extent. */
4759
		em = get_extent_skip_holes(inode, off, last_for_get_extent);
4760 4761 4762 4763 4764
		if (IS_ERR(em)) {
			ret = PTR_ERR(em);
			goto out;
		}
		if (!em) {
J
Josef Bacik 已提交
4765 4766 4767
			flags |= FIEMAP_EXTENT_LAST;
			end = 1;
		}
4768 4769
		ret = emit_fiemap_extent(fieinfo, &cache, em_start, disko,
					   em_len, flags);
4770 4771 4772
		if (ret) {
			if (ret == 1)
				ret = 0;
4773
			goto out_free;
4774
		}
Y
Yehuda Sadeh 已提交
4775 4776
	}
out_free:
4777
	if (!ret)
4778
		ret = emit_last_fiemap_cache(fieinfo, &cache);
Y
Yehuda Sadeh 已提交
4779 4780
	free_extent_map(em);
out:
L
Liu Bo 已提交
4781
	unlock_extent_cached(&BTRFS_I(inode)->io_tree, start, start + len - 1,
4782
			     &cached_state);
4783 4784

out_free_ulist:
4785
	btrfs_free_path(path);
4786 4787
	ulist_free(roots);
	ulist_free(tmp_ulist);
Y
Yehuda Sadeh 已提交
4788 4789 4790
	return ret;
}

4791 4792
static void __free_extent_buffer(struct extent_buffer *eb)
{
4793
	btrfs_leak_debug_del(&eb->leak_list);
4794 4795 4796
	kmem_cache_free(extent_buffer_cache, eb);
}

4797
int extent_buffer_under_io(struct extent_buffer *eb)
4798 4799 4800 4801 4802 4803 4804
{
	return (atomic_read(&eb->io_pages) ||
		test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags) ||
		test_bit(EXTENT_BUFFER_DIRTY, &eb->bflags));
}

/*
4805
 * Release all pages attached to the extent buffer.
4806
 */
4807
static void btrfs_release_extent_buffer_pages(struct extent_buffer *eb)
4808
{
4809 4810
	int i;
	int num_pages;
4811
	int mapped = !test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags);
4812 4813 4814

	BUG_ON(extent_buffer_under_io(eb));

4815 4816 4817
	num_pages = num_extent_pages(eb);
	for (i = 0; i < num_pages; i++) {
		struct page *page = eb->pages[i];
4818

4819 4820 4821
		if (!page)
			continue;
		if (mapped)
4822
			spin_lock(&page->mapping->private_lock);
4823 4824 4825 4826 4827 4828 4829 4830 4831 4832 4833 4834
		/*
		 * 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));
4835
			/*
4836 4837
			 * We need to make sure we haven't be attached
			 * to a new eb.
4838
			 */
4839 4840 4841
			ClearPagePrivate(page);
			set_page_private(page, 0);
			/* One for the page private */
4842
			put_page(page);
4843
		}
4844 4845 4846 4847

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

4848
		/* One for when we allocated the page */
4849
		put_page(page);
4850
	}
4851 4852 4853 4854 4855 4856 4857
}

/*
 * Helper for releasing the extent buffer.
 */
static inline void btrfs_release_extent_buffer(struct extent_buffer *eb)
{
4858
	btrfs_release_extent_buffer_pages(eb);
4859 4860 4861
	__free_extent_buffer(eb);
}

4862 4863
static struct extent_buffer *
__alloc_extent_buffer(struct btrfs_fs_info *fs_info, u64 start,
4864
		      unsigned long len)
4865 4866 4867
{
	struct extent_buffer *eb = NULL;

4868
	eb = kmem_cache_zalloc(extent_buffer_cache, GFP_NOFS|__GFP_NOFAIL);
4869 4870
	eb->start = start;
	eb->len = len;
4871
	eb->fs_info = fs_info;
4872
	eb->bflags = 0;
4873 4874
	rwlock_init(&eb->lock);
	atomic_set(&eb->blocking_readers, 0);
4875
	eb->blocking_writers = 0;
4876
	eb->lock_nested = false;
4877 4878
	init_waitqueue_head(&eb->write_lock_wq);
	init_waitqueue_head(&eb->read_lock_wq);
4879

4880 4881
	btrfs_leak_debug_add(&eb->leak_list, &buffers);

4882
	spin_lock_init(&eb->refs_lock);
4883
	atomic_set(&eb->refs, 1);
4884
	atomic_set(&eb->io_pages, 0);
4885

4886 4887 4888 4889 4890 4891
	/*
	 * 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);
4892

4893
#ifdef CONFIG_BTRFS_DEBUG
4894
	eb->spinning_writers = 0;
4895
	atomic_set(&eb->spinning_readers, 0);
4896
	atomic_set(&eb->read_locks, 0);
4897
	eb->write_locks = 0;
4898 4899
#endif

4900 4901 4902
	return eb;
}

4903 4904
struct extent_buffer *btrfs_clone_extent_buffer(struct extent_buffer *src)
{
4905
	int i;
4906 4907
	struct page *p;
	struct extent_buffer *new;
4908
	int num_pages = num_extent_pages(src);
4909

4910
	new = __alloc_extent_buffer(src->fs_info, src->start, src->len);
4911 4912 4913 4914
	if (new == NULL)
		return NULL;

	for (i = 0; i < num_pages; i++) {
4915
		p = alloc_page(GFP_NOFS);
4916 4917 4918 4919
		if (!p) {
			btrfs_release_extent_buffer(new);
			return NULL;
		}
4920 4921 4922 4923
		attach_extent_buffer_page(new, p);
		WARN_ON(PageDirty(p));
		SetPageUptodate(p);
		new->pages[i] = p;
4924
		copy_page(page_address(p), page_address(src->pages[i]));
4925 4926 4927
	}

	set_bit(EXTENT_BUFFER_UPTODATE, &new->bflags);
4928
	set_bit(EXTENT_BUFFER_UNMAPPED, &new->bflags);
4929 4930 4931 4932

	return new;
}

4933 4934
struct extent_buffer *__alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
						  u64 start, unsigned long len)
4935 4936
{
	struct extent_buffer *eb;
4937 4938
	int num_pages;
	int i;
4939

4940
	eb = __alloc_extent_buffer(fs_info, start, len);
4941 4942 4943
	if (!eb)
		return NULL;

4944
	num_pages = num_extent_pages(eb);
4945
	for (i = 0; i < num_pages; i++) {
4946
		eb->pages[i] = alloc_page(GFP_NOFS);
4947 4948 4949 4950 4951
		if (!eb->pages[i])
			goto err;
	}
	set_extent_buffer_uptodate(eb);
	btrfs_set_header_nritems(eb, 0);
4952
	set_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags);
4953 4954 4955

	return eb;
err:
4956 4957
	for (; i > 0; i--)
		__free_page(eb->pages[i - 1]);
4958 4959 4960 4961
	__free_extent_buffer(eb);
	return NULL;
}

4962
struct extent_buffer *alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
4963
						u64 start)
4964
{
4965
	return __alloc_dummy_extent_buffer(fs_info, start, fs_info->nodesize);
4966 4967
}

4968 4969
static void check_buffer_tree_ref(struct extent_buffer *eb)
{
4970
	int refs;
4971 4972 4973 4974 4975 4976 4977 4978 4979 4980 4981 4982 4983 4984 4985 4986 4987 4988 4989 4990
	/* the ref bit is tricky.  We have to make sure it is set
	 * if we have the buffer dirty.   Otherwise the
	 * code to free a buffer can end up dropping a dirty
	 * page
	 *
	 * Once the ref bit is set, it won't go away while the
	 * buffer is dirty or in writeback, and it also won't
	 * go away while we have the reference count on the
	 * eb bumped.
	 *
	 * We can't just set the ref bit without bumping the
	 * ref on the eb because free_extent_buffer might
	 * see the ref bit and try to clear it.  If this happens
	 * free_extent_buffer might end up dropping our original
	 * ref by mistake and freeing the page before we are able
	 * to add one more ref.
	 *
	 * So bump the ref count first, then set the bit.  If someone
	 * beat us to it, drop the ref we added.
	 */
4991 4992 4993 4994
	refs = atomic_read(&eb->refs);
	if (refs >= 2 && test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
		return;

4995 4996
	spin_lock(&eb->refs_lock);
	if (!test_and_set_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
4997
		atomic_inc(&eb->refs);
4998
	spin_unlock(&eb->refs_lock);
4999 5000
}

5001 5002
static void mark_extent_buffer_accessed(struct extent_buffer *eb,
		struct page *accessed)
5003
{
5004
	int num_pages, i;
5005

5006 5007
	check_buffer_tree_ref(eb);

5008
	num_pages = num_extent_pages(eb);
5009
	for (i = 0; i < num_pages; i++) {
5010 5011
		struct page *p = eb->pages[i];

5012 5013
		if (p != accessed)
			mark_page_accessed(p);
5014 5015 5016
	}
}

5017 5018
struct extent_buffer *find_extent_buffer(struct btrfs_fs_info *fs_info,
					 u64 start)
5019 5020 5021 5022
{
	struct extent_buffer *eb;

	rcu_read_lock();
5023
	eb = radix_tree_lookup(&fs_info->buffer_radix,
5024
			       start >> PAGE_SHIFT);
5025 5026
	if (eb && atomic_inc_not_zero(&eb->refs)) {
		rcu_read_unlock();
5027 5028 5029 5030 5031 5032 5033 5034 5035 5036 5037 5038 5039 5040 5041 5042 5043 5044 5045
		/*
		 * 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);
		}
5046
		mark_extent_buffer_accessed(eb, NULL);
5047 5048 5049 5050 5051 5052 5053
		return eb;
	}
	rcu_read_unlock();

	return NULL;
}

5054 5055
#ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
struct extent_buffer *alloc_test_extent_buffer(struct btrfs_fs_info *fs_info,
5056
					u64 start)
5057 5058 5059 5060 5061 5062 5063
{
	struct extent_buffer *eb, *exists = NULL;
	int ret;

	eb = find_extent_buffer(fs_info, start);
	if (eb)
		return eb;
5064
	eb = alloc_dummy_extent_buffer(fs_info, start);
5065
	if (!eb)
5066
		return ERR_PTR(-ENOMEM);
5067 5068
	eb->fs_info = fs_info;
again:
5069
	ret = radix_tree_preload(GFP_NOFS);
5070 5071
	if (ret) {
		exists = ERR_PTR(ret);
5072
		goto free_eb;
5073
	}
5074 5075
	spin_lock(&fs_info->buffer_lock);
	ret = radix_tree_insert(&fs_info->buffer_radix,
5076
				start >> PAGE_SHIFT, eb);
5077 5078 5079 5080 5081 5082 5083 5084 5085 5086 5087 5088 5089 5090 5091 5092 5093 5094 5095
	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

5096
struct extent_buffer *alloc_extent_buffer(struct btrfs_fs_info *fs_info,
5097
					  u64 start)
5098
{
5099
	unsigned long len = fs_info->nodesize;
5100 5101
	int num_pages;
	int i;
5102
	unsigned long index = start >> PAGE_SHIFT;
5103
	struct extent_buffer *eb;
5104
	struct extent_buffer *exists = NULL;
5105
	struct page *p;
5106
	struct address_space *mapping = fs_info->btree_inode->i_mapping;
5107
	int uptodate = 1;
5108
	int ret;
5109

5110
	if (!IS_ALIGNED(start, fs_info->sectorsize)) {
5111 5112 5113 5114
		btrfs_err(fs_info, "bad tree block start %llu", start);
		return ERR_PTR(-EINVAL);
	}

5115
	eb = find_extent_buffer(fs_info, start);
5116
	if (eb)
5117 5118
		return eb;

5119
	eb = __alloc_extent_buffer(fs_info, start, len);
5120
	if (!eb)
5121
		return ERR_PTR(-ENOMEM);
5122

5123
	num_pages = num_extent_pages(eb);
5124
	for (i = 0; i < num_pages; i++, index++) {
5125
		p = find_or_create_page(mapping, index, GFP_NOFS|__GFP_NOFAIL);
5126 5127
		if (!p) {
			exists = ERR_PTR(-ENOMEM);
5128
			goto free_eb;
5129
		}
J
Josef Bacik 已提交
5130 5131 5132 5133 5134 5135 5136 5137 5138 5139 5140 5141 5142 5143

		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);
5144
				put_page(p);
5145
				mark_extent_buffer_accessed(exists, p);
J
Josef Bacik 已提交
5146 5147
				goto free_eb;
			}
5148
			exists = NULL;
J
Josef Bacik 已提交
5149

5150
			/*
J
Josef Bacik 已提交
5151 5152 5153 5154
			 * Do this so attach doesn't complain and we need to
			 * drop the ref the old guy had.
			 */
			ClearPagePrivate(p);
5155
			WARN_ON(PageDirty(p));
5156
			put_page(p);
5157
		}
J
Josef Bacik 已提交
5158 5159
		attach_extent_buffer_page(eb, p);
		spin_unlock(&mapping->private_lock);
5160
		WARN_ON(PageDirty(p));
5161
		eb->pages[i] = p;
5162 5163
		if (!PageUptodate(p))
			uptodate = 0;
C
Chris Mason 已提交
5164 5165

		/*
5166 5167 5168 5169 5170
		 * 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 已提交
5171
		 */
5172 5173
	}
	if (uptodate)
5174
		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5175
again:
5176
	ret = radix_tree_preload(GFP_NOFS);
5177 5178
	if (ret) {
		exists = ERR_PTR(ret);
5179
		goto free_eb;
5180
	}
5181

5182 5183
	spin_lock(&fs_info->buffer_lock);
	ret = radix_tree_insert(&fs_info->buffer_radix,
5184
				start >> PAGE_SHIFT, eb);
5185
	spin_unlock(&fs_info->buffer_lock);
5186
	radix_tree_preload_end();
5187
	if (ret == -EEXIST) {
5188
		exists = find_extent_buffer(fs_info, start);
5189 5190 5191
		if (exists)
			goto free_eb;
		else
5192
			goto again;
5193 5194
	}
	/* add one reference for the tree */
5195
	check_buffer_tree_ref(eb);
5196
	set_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags);
C
Chris Mason 已提交
5197 5198

	/*
5199 5200 5201
	 * 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 已提交
5202
	 */
5203 5204
	for (i = 0; i < num_pages; i++)
		unlock_page(eb->pages[i]);
5205 5206
	return eb;

5207
free_eb:
5208
	WARN_ON(!atomic_dec_and_test(&eb->refs));
5209 5210 5211 5212
	for (i = 0; i < num_pages; i++) {
		if (eb->pages[i])
			unlock_page(eb->pages[i]);
	}
C
Chris Mason 已提交
5213

5214
	btrfs_release_extent_buffer(eb);
5215
	return exists;
5216 5217
}

5218 5219 5220 5221 5222 5223 5224 5225
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);
}

5226
static int release_extent_buffer(struct extent_buffer *eb)
5227
{
5228 5229
	lockdep_assert_held(&eb->refs_lock);

5230 5231
	WARN_ON(atomic_read(&eb->refs) == 0);
	if (atomic_dec_and_test(&eb->refs)) {
5232
		if (test_and_clear_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags)) {
5233
			struct btrfs_fs_info *fs_info = eb->fs_info;
5234

5235
			spin_unlock(&eb->refs_lock);
5236

5237 5238
			spin_lock(&fs_info->buffer_lock);
			radix_tree_delete(&fs_info->buffer_radix,
5239
					  eb->start >> PAGE_SHIFT);
5240
			spin_unlock(&fs_info->buffer_lock);
5241 5242
		} else {
			spin_unlock(&eb->refs_lock);
5243
		}
5244 5245

		/* Should be safe to release our pages at this point */
5246
		btrfs_release_extent_buffer_pages(eb);
5247
#ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
5248
		if (unlikely(test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags))) {
5249 5250 5251 5252
			__free_extent_buffer(eb);
			return 1;
		}
#endif
5253
		call_rcu(&eb->rcu_head, btrfs_release_extent_buffer_rcu);
5254
		return 1;
5255 5256
	}
	spin_unlock(&eb->refs_lock);
5257 5258

	return 0;
5259 5260
}

5261 5262
void free_extent_buffer(struct extent_buffer *eb)
{
5263 5264
	int refs;
	int old;
5265 5266 5267
	if (!eb)
		return;

5268 5269
	while (1) {
		refs = atomic_read(&eb->refs);
5270 5271 5272
		if ((!test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags) && refs <= 3)
		    || (test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags) &&
			refs == 1))
5273 5274 5275 5276 5277 5278
			break;
		old = atomic_cmpxchg(&eb->refs, refs, refs - 1);
		if (old == refs)
			return;
	}

5279 5280 5281
	spin_lock(&eb->refs_lock);
	if (atomic_read(&eb->refs) == 2 &&
	    test_bit(EXTENT_BUFFER_STALE, &eb->bflags) &&
5282
	    !extent_buffer_under_io(eb) &&
5283 5284 5285 5286 5287 5288 5289
	    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.
	 */
5290
	release_extent_buffer(eb);
5291 5292 5293 5294 5295
}

void free_extent_buffer_stale(struct extent_buffer *eb)
{
	if (!eb)
5296 5297
		return;

5298 5299 5300
	spin_lock(&eb->refs_lock);
	set_bit(EXTENT_BUFFER_STALE, &eb->bflags);

5301
	if (atomic_read(&eb->refs) == 2 && !extent_buffer_under_io(eb) &&
5302 5303
	    test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
		atomic_dec(&eb->refs);
5304
	release_extent_buffer(eb);
5305 5306
}

5307
void clear_extent_buffer_dirty(struct extent_buffer *eb)
5308
{
5309 5310
	int i;
	int num_pages;
5311 5312
	struct page *page;

5313
	num_pages = num_extent_pages(eb);
5314 5315

	for (i = 0; i < num_pages; i++) {
5316
		page = eb->pages[i];
5317
		if (!PageDirty(page))
C
Chris Mason 已提交
5318 5319
			continue;

5320
		lock_page(page);
C
Chris Mason 已提交
5321 5322
		WARN_ON(!PagePrivate(page));

5323
		clear_page_dirty_for_io(page);
M
Matthew Wilcox 已提交
5324
		xa_lock_irq(&page->mapping->i_pages);
5325 5326 5327
		if (!PageDirty(page))
			__xa_clear_mark(&page->mapping->i_pages,
					page_index(page), PAGECACHE_TAG_DIRTY);
M
Matthew Wilcox 已提交
5328
		xa_unlock_irq(&page->mapping->i_pages);
5329
		ClearPageError(page);
5330
		unlock_page(page);
5331
	}
5332
	WARN_ON(atomic_read(&eb->refs) == 0);
5333 5334
}

5335
bool set_extent_buffer_dirty(struct extent_buffer *eb)
5336
{
5337 5338
	int i;
	int num_pages;
5339
	bool was_dirty;
5340

5341 5342
	check_buffer_tree_ref(eb);

5343
	was_dirty = test_and_set_bit(EXTENT_BUFFER_DIRTY, &eb->bflags);
5344

5345
	num_pages = num_extent_pages(eb);
5346
	WARN_ON(atomic_read(&eb->refs) == 0);
5347 5348
	WARN_ON(!test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags));

5349 5350 5351
	if (!was_dirty)
		for (i = 0; i < num_pages; i++)
			set_page_dirty(eb->pages[i]);
5352 5353 5354 5355 5356 5357

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

5358
	return was_dirty;
5359 5360
}

5361
void clear_extent_buffer_uptodate(struct extent_buffer *eb)
5362
{
5363
	int i;
5364
	struct page *page;
5365
	int num_pages;
5366

5367
	clear_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5368
	num_pages = num_extent_pages(eb);
5369
	for (i = 0; i < num_pages; i++) {
5370
		page = eb->pages[i];
C
Chris Mason 已提交
5371 5372
		if (page)
			ClearPageUptodate(page);
5373 5374 5375
	}
}

5376
void set_extent_buffer_uptodate(struct extent_buffer *eb)
5377
{
5378
	int i;
5379
	struct page *page;
5380
	int num_pages;
5381

5382
	set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5383
	num_pages = num_extent_pages(eb);
5384
	for (i = 0; i < num_pages; i++) {
5385
		page = eb->pages[i];
5386 5387 5388 5389
		SetPageUptodate(page);
	}
}

5390
int read_extent_buffer_pages(struct extent_buffer *eb, int wait, int mirror_num)
5391
{
5392
	int i;
5393 5394 5395
	struct page *page;
	int err;
	int ret = 0;
5396 5397
	int locked_pages = 0;
	int all_uptodate = 1;
5398
	int num_pages;
5399
	unsigned long num_reads = 0;
5400
	struct bio *bio = NULL;
C
Chris Mason 已提交
5401
	unsigned long bio_flags = 0;
5402
	struct extent_io_tree *tree = &BTRFS_I(eb->fs_info->btree_inode)->io_tree;
5403

5404
	if (test_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags))
5405 5406
		return 0;

5407
	num_pages = num_extent_pages(eb);
5408
	for (i = 0; i < num_pages; i++) {
5409
		page = eb->pages[i];
5410
		if (wait == WAIT_NONE) {
5411
			if (!trylock_page(page))
5412
				goto unlock_exit;
5413 5414 5415
		} else {
			lock_page(page);
		}
5416
		locked_pages++;
5417 5418 5419 5420 5421 5422
	}
	/*
	 * 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().
	 */
5423
	for (i = 0; i < num_pages; i++) {
5424
		page = eb->pages[i];
5425 5426
		if (!PageUptodate(page)) {
			num_reads++;
5427
			all_uptodate = 0;
5428
		}
5429
	}
5430

5431
	if (all_uptodate) {
5432
		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5433 5434 5435
		goto unlock_exit;
	}

5436
	clear_bit(EXTENT_BUFFER_READ_ERR, &eb->bflags);
5437
	eb->read_mirror = 0;
5438
	atomic_set(&eb->io_pages, num_reads);
5439
	for (i = 0; i < num_pages; i++) {
5440
		page = eb->pages[i];
5441

5442
		if (!PageUptodate(page)) {
5443 5444 5445 5446 5447 5448
			if (ret) {
				atomic_dec(&eb->io_pages);
				unlock_page(page);
				continue;
			}

5449
			ClearPageError(page);
5450
			err = __extent_read_full_page(tree, page,
5451
						      btree_get_extent, &bio,
5452
						      mirror_num, &bio_flags,
5453
						      REQ_META);
5454
			if (err) {
5455
				ret = err;
5456 5457 5458 5459 5460 5461 5462 5463 5464 5465
				/*
				 * We use &bio in above __extent_read_full_page,
				 * so we ensure that if it returns error, the
				 * current page fails to add itself to bio and
				 * it's been unlocked.
				 *
				 * We must dec io_pages by ourselves.
				 */
				atomic_dec(&eb->io_pages);
			}
5466 5467 5468 5469 5470
		} else {
			unlock_page(page);
		}
	}

5471
	if (bio) {
5472
		err = submit_one_bio(bio, mirror_num, bio_flags);
5473 5474
		if (err)
			return err;
5475
	}
5476

5477
	if (ret || wait != WAIT_COMPLETE)
5478
		return ret;
C
Chris Mason 已提交
5479

5480
	for (i = 0; i < num_pages; i++) {
5481
		page = eb->pages[i];
5482
		wait_on_page_locked(page);
C
Chris Mason 已提交
5483
		if (!PageUptodate(page))
5484 5485
			ret = -EIO;
	}
C
Chris Mason 已提交
5486

5487
	return ret;
5488 5489

unlock_exit:
C
Chris Mason 已提交
5490
	while (locked_pages > 0) {
5491
		locked_pages--;
5492 5493
		page = eb->pages[locked_pages];
		unlock_page(page);
5494 5495
	}
	return ret;
5496 5497
}

5498 5499
void read_extent_buffer(const struct extent_buffer *eb, void *dstv,
			unsigned long start, unsigned long len)
5500 5501 5502 5503 5504 5505
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *dst = (char *)dstv;
5506
	size_t start_offset = offset_in_page(eb->start);
5507
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5508

5509 5510 5511 5512 5513 5514
	if (start + len > eb->len) {
		WARN(1, KERN_ERR "btrfs bad mapping eb start %llu len %lu, wanted %lu %lu\n",
		     eb->start, eb->len, start, len);
		memset(dst, 0, len);
		return;
	}
5515

5516
	offset = offset_in_page(start_offset + start);
5517

C
Chris Mason 已提交
5518
	while (len > 0) {
5519
		page = eb->pages[i];
5520

5521
		cur = min(len, (PAGE_SIZE - offset));
5522
		kaddr = page_address(page);
5523 5524 5525 5526 5527 5528 5529 5530 5531
		memcpy(dst, kaddr + offset, cur);

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

5532 5533 5534
int read_extent_buffer_to_user(const struct extent_buffer *eb,
			       void __user *dstv,
			       unsigned long start, unsigned long len)
5535 5536 5537 5538 5539 5540
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char __user *dst = (char __user *)dstv;
5541
	size_t start_offset = offset_in_page(eb->start);
5542
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5543 5544 5545 5546 5547
	int ret = 0;

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

5548
	offset = offset_in_page(start_offset + start);
5549 5550

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

5553
		cur = min(len, (PAGE_SIZE - offset));
5554 5555 5556 5557 5558 5559 5560 5561 5562 5563 5564 5565 5566 5567 5568
		kaddr = page_address(page);
		if (copy_to_user(dst, kaddr + offset, cur)) {
			ret = -EFAULT;
			break;
		}

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

	return ret;
}

5569 5570 5571 5572 5573
/*
 * return 0 if the item is found within a page.
 * return 1 if the item spans two pages.
 * return -EINVAL otherwise.
 */
5574 5575 5576 5577
int map_private_extent_buffer(const struct extent_buffer *eb,
			      unsigned long start, unsigned long min_len,
			      char **map, unsigned long *map_start,
			      unsigned long *map_len)
5578
{
5579
	size_t offset;
5580 5581
	char *kaddr;
	struct page *p;
5582
	size_t start_offset = offset_in_page(eb->start);
5583
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5584
	unsigned long end_i = (start_offset + start + min_len - 1) >>
5585
		PAGE_SHIFT;
5586

5587 5588 5589 5590 5591 5592
	if (start + min_len > eb->len) {
		WARN(1, KERN_ERR "btrfs bad mapping eb start %llu len %lu, wanted %lu %lu\n",
		       eb->start, eb->len, start, min_len);
		return -EINVAL;
	}

5593
	if (i != end_i)
5594
		return 1;
5595 5596 5597 5598 5599 5600

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

5604
	p = eb->pages[i];
5605
	kaddr = page_address(p);
5606
	*map = kaddr + offset;
5607
	*map_len = PAGE_SIZE - offset;
5608 5609 5610
	return 0;
}

5611 5612
int memcmp_extent_buffer(const struct extent_buffer *eb, const void *ptrv,
			 unsigned long start, unsigned long len)
5613 5614 5615 5616 5617 5618
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *ptr = (char *)ptrv;
5619
	size_t start_offset = offset_in_page(eb->start);
5620
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5621 5622 5623 5624 5625
	int ret = 0;

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

5626
	offset = offset_in_page(start_offset + start);
5627

C
Chris Mason 已提交
5628
	while (len > 0) {
5629
		page = eb->pages[i];
5630

5631
		cur = min(len, (PAGE_SIZE - offset));
5632

5633
		kaddr = page_address(page);
5634 5635 5636 5637 5638 5639 5640 5641 5642 5643 5644 5645
		ret = memcmp(ptr, kaddr + offset, cur);
		if (ret)
			break;

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

5646 5647 5648 5649 5650 5651 5652 5653 5654 5655 5656 5657 5658 5659 5660 5661 5662 5663 5664 5665 5666
void write_extent_buffer_chunk_tree_uuid(struct extent_buffer *eb,
		const void *srcv)
{
	char *kaddr;

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

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

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

5667 5668 5669 5670 5671 5672 5673 5674
void write_extent_buffer(struct extent_buffer *eb, const void *srcv,
			 unsigned long start, unsigned long len)
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *src = (char *)srcv;
5675
	size_t start_offset = offset_in_page(eb->start);
5676
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5677 5678 5679 5680

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

5681
	offset = offset_in_page(start_offset + start);
5682

C
Chris Mason 已提交
5683
	while (len > 0) {
5684
		page = eb->pages[i];
5685 5686
		WARN_ON(!PageUptodate(page));

5687
		cur = min(len, PAGE_SIZE - offset);
5688
		kaddr = page_address(page);
5689 5690 5691 5692 5693 5694 5695 5696 5697
		memcpy(kaddr + offset, src, cur);

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

5698 5699
void memzero_extent_buffer(struct extent_buffer *eb, unsigned long start,
		unsigned long len)
5700 5701 5702 5703 5704
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
5705
	size_t start_offset = offset_in_page(eb->start);
5706
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5707 5708 5709 5710

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

5711
	offset = offset_in_page(start_offset + start);
5712

C
Chris Mason 已提交
5713
	while (len > 0) {
5714
		page = eb->pages[i];
5715 5716
		WARN_ON(!PageUptodate(page));

5717
		cur = min(len, PAGE_SIZE - offset);
5718
		kaddr = page_address(page);
5719
		memset(kaddr + offset, 0, cur);
5720 5721 5722 5723 5724 5725 5726

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

5727 5728 5729 5730
void copy_extent_buffer_full(struct extent_buffer *dst,
			     struct extent_buffer *src)
{
	int i;
5731
	int num_pages;
5732 5733 5734

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

5735
	num_pages = num_extent_pages(dst);
5736 5737 5738 5739 5740
	for (i = 0; i < num_pages; i++)
		copy_page(page_address(dst->pages[i]),
				page_address(src->pages[i]));
}

5741 5742 5743 5744 5745 5746 5747 5748 5749
void copy_extent_buffer(struct extent_buffer *dst, struct extent_buffer *src,
			unsigned long dst_offset, unsigned long src_offset,
			unsigned long len)
{
	u64 dst_len = dst->len;
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
5750
	size_t start_offset = offset_in_page(dst->start);
5751
	unsigned long i = (start_offset + dst_offset) >> PAGE_SHIFT;
5752 5753 5754

	WARN_ON(src->len != dst_len);

5755
	offset = offset_in_page(start_offset + dst_offset);
5756

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

5761
		cur = min(len, (unsigned long)(PAGE_SIZE - offset));
5762

5763
		kaddr = page_address(page);
5764 5765 5766 5767 5768 5769 5770 5771 5772
		read_extent_buffer(src, kaddr + offset, src_offset, cur);

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

5773 5774 5775 5776 5777 5778 5779 5780 5781 5782 5783 5784 5785 5786 5787 5788 5789 5790
/*
 * eb_bitmap_offset() - calculate the page and offset of the byte containing the
 * given bit number
 * @eb: the extent buffer
 * @start: offset of the bitmap item in the extent buffer
 * @nr: bit number
 * @page_index: return index of the page in the extent buffer that contains the
 * given bit number
 * @page_offset: return offset into the page given by page_index
 *
 * This helper hides the ugliness of finding the byte in an extent buffer which
 * contains a given bit.
 */
static inline void eb_bitmap_offset(struct extent_buffer *eb,
				    unsigned long start, unsigned long nr,
				    unsigned long *page_index,
				    size_t *page_offset)
{
5791
	size_t start_offset = offset_in_page(eb->start);
5792 5793 5794 5795 5796 5797 5798 5799 5800 5801
	size_t byte_offset = BIT_BYTE(nr);
	size_t offset;

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

5802
	*page_index = offset >> PAGE_SHIFT;
5803
	*page_offset = offset_in_page(offset);
5804 5805 5806 5807 5808 5809 5810 5811 5812 5813 5814
}

/**
 * extent_buffer_test_bit - determine whether a bit in a bitmap item is set
 * @eb: the extent buffer
 * @start: offset of the bitmap item in the extent buffer
 * @nr: bit number to test
 */
int extent_buffer_test_bit(struct extent_buffer *eb, unsigned long start,
			   unsigned long nr)
{
5815
	u8 *kaddr;
5816 5817 5818 5819 5820 5821 5822 5823 5824 5825 5826 5827 5828 5829 5830 5831 5832 5833 5834 5835 5836
	struct page *page;
	unsigned long i;
	size_t offset;

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

/**
 * extent_buffer_bitmap_set - set an area of a bitmap
 * @eb: the extent buffer
 * @start: offset of the bitmap item in the extent buffer
 * @pos: bit number of the first bit
 * @len: number of bits to set
 */
void extent_buffer_bitmap_set(struct extent_buffer *eb, unsigned long start,
			      unsigned long pos, unsigned long len)
{
5837
	u8 *kaddr;
5838 5839 5840 5841 5842
	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);
5843
	u8 mask_to_set = BITMAP_FIRST_BYTE_MASK(pos);
5844 5845 5846 5847 5848 5849 5850 5851 5852 5853

	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 已提交
5854
		mask_to_set = ~0;
5855
		if (++offset >= PAGE_SIZE && len > 0) {
5856 5857 5858 5859 5860 5861 5862 5863 5864 5865 5866 5867 5868 5869 5870 5871 5872 5873 5874 5875 5876 5877 5878
			offset = 0;
			page = eb->pages[++i];
			WARN_ON(!PageUptodate(page));
			kaddr = page_address(page);
		}
	}
	if (len) {
		mask_to_set &= BITMAP_LAST_BYTE_MASK(size);
		kaddr[offset] |= mask_to_set;
	}
}


/**
 * extent_buffer_bitmap_clear - clear an area of a bitmap
 * @eb: the extent buffer
 * @start: offset of the bitmap item in the extent buffer
 * @pos: bit number of the first bit
 * @len: number of bits to clear
 */
void extent_buffer_bitmap_clear(struct extent_buffer *eb, unsigned long start,
				unsigned long pos, unsigned long len)
{
5879
	u8 *kaddr;
5880 5881 5882 5883 5884
	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);
5885
	u8 mask_to_clear = BITMAP_FIRST_BYTE_MASK(pos);
5886 5887 5888 5889 5890 5891 5892 5893 5894 5895

	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 已提交
5896
		mask_to_clear = ~0;
5897
		if (++offset >= PAGE_SIZE && len > 0) {
5898 5899 5900 5901 5902 5903 5904 5905 5906 5907 5908 5909
			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;
	}
}

5910 5911 5912 5913 5914 5915
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;
}

5916 5917 5918 5919
static void copy_pages(struct page *dst_page, struct page *src_page,
		       unsigned long dst_off, unsigned long src_off,
		       unsigned long len)
{
5920
	char *dst_kaddr = page_address(dst_page);
5921
	char *src_kaddr;
5922
	int must_memmove = 0;
5923

5924
	if (dst_page != src_page) {
5925
		src_kaddr = page_address(src_page);
5926
	} else {
5927
		src_kaddr = dst_kaddr;
5928 5929
		if (areas_overlap(src_off, dst_off, len))
			must_memmove = 1;
5930
	}
5931

5932 5933 5934 5935
	if (must_memmove)
		memmove(dst_kaddr + dst_off, src_kaddr + src_off, len);
	else
		memcpy(dst_kaddr + dst_off, src_kaddr + src_off, len);
5936 5937 5938 5939 5940
}

void memcpy_extent_buffer(struct extent_buffer *dst, unsigned long dst_offset,
			   unsigned long src_offset, unsigned long len)
{
5941
	struct btrfs_fs_info *fs_info = dst->fs_info;
5942 5943 5944
	size_t cur;
	size_t dst_off_in_page;
	size_t src_off_in_page;
5945
	size_t start_offset = offset_in_page(dst->start);
5946 5947 5948 5949
	unsigned long dst_i;
	unsigned long src_i;

	if (src_offset + len > dst->len) {
5950
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5951 5952
			"memmove bogus src_offset %lu move len %lu dst len %lu",
			 src_offset, len, dst->len);
5953
		BUG();
5954 5955
	}
	if (dst_offset + len > dst->len) {
5956
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5957 5958
			"memmove bogus dst_offset %lu move len %lu dst len %lu",
			 dst_offset, len, dst->len);
5959
		BUG();
5960 5961
	}

C
Chris Mason 已提交
5962
	while (len > 0) {
5963 5964
		dst_off_in_page = offset_in_page(start_offset + dst_offset);
		src_off_in_page = offset_in_page(start_offset + src_offset);
5965

5966 5967
		dst_i = (start_offset + dst_offset) >> PAGE_SHIFT;
		src_i = (start_offset + src_offset) >> PAGE_SHIFT;
5968

5969
		cur = min(len, (unsigned long)(PAGE_SIZE -
5970 5971
					       src_off_in_page));
		cur = min_t(unsigned long, cur,
5972
			(unsigned long)(PAGE_SIZE - dst_off_in_page));
5973

5974
		copy_pages(dst->pages[dst_i], dst->pages[src_i],
5975 5976 5977 5978 5979 5980 5981 5982 5983 5984 5985
			   dst_off_in_page, src_off_in_page, cur);

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

void memmove_extent_buffer(struct extent_buffer *dst, unsigned long dst_offset,
			   unsigned long src_offset, unsigned long len)
{
5986
	struct btrfs_fs_info *fs_info = dst->fs_info;
5987 5988 5989 5990 5991
	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;
5992
	size_t start_offset = offset_in_page(dst->start);
5993 5994 5995 5996
	unsigned long dst_i;
	unsigned long src_i;

	if (src_offset + len > dst->len) {
5997
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5998 5999
			  "memmove bogus src_offset %lu move len %lu len %lu",
			  src_offset, len, dst->len);
6000
		BUG();
6001 6002
	}
	if (dst_offset + len > dst->len) {
6003
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
6004 6005
			  "memmove bogus dst_offset %lu move len %lu len %lu",
			  dst_offset, len, dst->len);
6006
		BUG();
6007
	}
6008
	if (dst_offset < src_offset) {
6009 6010 6011
		memcpy_extent_buffer(dst, dst_offset, src_offset, len);
		return;
	}
C
Chris Mason 已提交
6012
	while (len > 0) {
6013 6014
		dst_i = (start_offset + dst_end) >> PAGE_SHIFT;
		src_i = (start_offset + src_end) >> PAGE_SHIFT;
6015

6016 6017
		dst_off_in_page = offset_in_page(start_offset + dst_end);
		src_off_in_page = offset_in_page(start_offset + src_end);
6018 6019 6020

		cur = min_t(unsigned long, len, src_off_in_page + 1);
		cur = min(cur, dst_off_in_page + 1);
6021
		copy_pages(dst->pages[dst_i], dst->pages[src_i],
6022 6023 6024 6025 6026 6027 6028 6029
			   dst_off_in_page - cur + 1,
			   src_off_in_page - cur + 1, cur);

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

6031
int try_release_extent_buffer(struct page *page)
6032
{
6033 6034
	struct extent_buffer *eb;

6035
	/*
6036
	 * We need to make sure nobody is attaching this page to an eb right
6037 6038 6039 6040 6041
	 * now.
	 */
	spin_lock(&page->mapping->private_lock);
	if (!PagePrivate(page)) {
		spin_unlock(&page->mapping->private_lock);
J
Josef Bacik 已提交
6042
		return 1;
6043
	}
6044

6045 6046
	eb = (struct extent_buffer *)page->private;
	BUG_ON(!eb);
6047 6048

	/*
6049 6050 6051
	 * 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.
6052
	 */
6053
	spin_lock(&eb->refs_lock);
6054
	if (atomic_read(&eb->refs) != 1 || extent_buffer_under_io(eb)) {
6055 6056 6057
		spin_unlock(&eb->refs_lock);
		spin_unlock(&page->mapping->private_lock);
		return 0;
6058
	}
6059
	spin_unlock(&page->mapping->private_lock);
6060

6061
	/*
6062 6063
	 * 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.
6064
	 */
6065 6066 6067
	if (!test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags)) {
		spin_unlock(&eb->refs_lock);
		return 0;
6068
	}
6069

6070
	return release_extent_buffer(eb);
6071
}