extent_io.c 152.1 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11
#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>
12
#include <linux/prefetch.h>
D
Dan Magenheimer 已提交
13
#include <linux/cleancache.h>
14 15
#include "extent_io.h"
#include "extent_map.h"
16 17
#include "ctree.h"
#include "btrfs_inode.h"
18
#include "volumes.h"
19
#include "check-integrity.h"
20
#include "locking.h"
21
#include "rcu-string.h"
22
#include "backref.h"
23
#include "transaction.h"
24 25 26

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

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

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

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

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

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

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

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

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

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

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

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

#define BUFFER_LRU_MAX 64

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

struct extent_page_data {
	struct bio *bio;
	struct extent_io_tree *tree;
	get_extent_t *get_extent;
113
	unsigned long bio_flags;
114 115 116 117

	/* tells writepage not to lock the state bits for this range
	 * it still does the unlocking
	 */
118 119
	unsigned int extent_locked:1;

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

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

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

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

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

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

	btrfs_bioset = bioset_create(BIO_POOL_SIZE,
				     offsetof(struct btrfs_io_bio, bio));
	if (!btrfs_bioset)
		goto free_buffer_cache;
170 171 172 173

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

174 175
	return 0;

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

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

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

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

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

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

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

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

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

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

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

266
	p = search_start ? &search_start : &root->rb_node;
C
Chris Mason 已提交
267
	while (*p) {
268 269 270 271 272 273 274 275 276 277 278
		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;
	}

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

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

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

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

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

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

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

337 338 339 340 341
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)
342
{
343
	struct rb_node *prev = NULL;
344
	struct rb_node *ret;
345

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

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

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

365 366 367 368 369 370 371 372 373
/*
 * 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.
 */
374 375
static void merge_state(struct extent_io_tree *tree,
		        struct extent_state *state)
376 377 378 379
{
	struct extent_state *other;
	struct rb_node *other_node;

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

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

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

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

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

427 428 429 430 431 432 433 434 435 436 437 438
/*
 * 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,
439 440
			struct rb_node ***p,
			struct rb_node **parent,
441
			unsigned *bits, struct extent_changeset *changeset)
442 443 444
{
	struct rb_node *node;

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

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

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

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

472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489
/*
 * 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 已提交
490 491 492

	split_cb(tree, orig, split);

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

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

507 508 509 510 511 512 513 514 515
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;
}

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

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

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

	return prealloc;
}

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

572 573 574 575 576 577 578 579 580 581
/*
 * 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.
 *
582
 * This takes the tree lock, and returns 0 on success and < 0 on error.
583
 */
584 585 586 587
static int __clear_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
			      unsigned bits, int wake, int delete,
			      struct extent_state **cached_state,
			      gfp_t mask, struct extent_changeset *changeset)
588 589
{
	struct extent_state *state;
590
	struct extent_state *cached;
591 592
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
593
	u64 last_end;
594
	int err;
595
	int clear = 0;
596

597
	btrfs_debug_check_extent_io_range(tree, start, end);
598

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

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

606 607
	if (bits & (EXTENT_IOBITS | EXTENT_BOUNDARY))
		clear = 1;
608
again:
609
	if (!prealloc && gfpflags_allow_blocking(mask)) {
610 611 612 613 614 615 616
		/*
		 * 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.
		 */
617 618 619
		prealloc = alloc_extent_state(mask);
	}

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

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

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

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

659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675
	/*
	 *     | ---- 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) {
676 677
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
678
		err = split_state(tree, state, prealloc, start);
679 680 681
		if (err)
			extent_io_tree_panic(tree, err);

682 683 684 685
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
686 687
			state = clear_state_bit(tree, state, &bits, wake,
						changeset);
688
			goto next;
689 690 691 692 693 694 695 696 697 698
		}
		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) {
699 700
		prealloc = alloc_extent_state_atomic(prealloc);
		BUG_ON(!prealloc);
701
		err = split_state(tree, state, prealloc, end + 1);
702 703 704
		if (err)
			extent_io_tree_panic(tree, err);

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

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

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

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

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

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

	return 0;

737 738
}

739 740
static void wait_on_state(struct extent_io_tree *tree,
			  struct extent_state *state)
741 742
		__releases(tree->lock)
		__acquires(tree->lock)
743 744 745
{
	DEFINE_WAIT(wait);
	prepare_to_wait(&state->wq, &wait, TASK_UNINTERRUPTIBLE);
746
	spin_unlock(&tree->lock);
747
	schedule();
748
	spin_lock(&tree->lock);
749 750 751 752 753 754 755 756
	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
 */
757 758
static void wait_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
			    unsigned long bits)
759 760 761 762
{
	struct extent_state *state;
	struct rb_node *node;

763
	btrfs_debug_check_extent_io_range(tree, start, end);
764

765
	spin_lock(&tree->lock);
766 767 768 769 770 771
again:
	while (1) {
		/*
		 * this search will find all the extents that end after
		 * our range starts
		 */
772
		node = tree_search(tree, start);
773
process_node:
774 775 776 777 778 779 780 781 782 783
		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;
784
			refcount_inc(&state->refs);
785 786 787 788 789 790 791 792 793
			wait_on_state(tree, state);
			free_extent_state(state);
			goto again;
		}
		start = state->end + 1;

		if (start > end)
			break;

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

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

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

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

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

837
/*
838 839
 * 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.
840
 *
841 842 843
 * 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.
844
 *
845
 * [start, end] is inclusive This takes the tree lock.
846
 */
847

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

863
	btrfs_debug_check_extent_io_range(tree, start, end);
864

865
	bits |= EXTENT_FIRST_DELALLOC;
866
again:
867
	if (!prealloc && gfpflags_allow_blocking(mask)) {
868 869 870 871 872 873 874
		/*
		 * 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.
		 */
875 876 877
		prealloc = alloc_extent_state(mask);
	}

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

900
		cache_state(prealloc, cached_state);
901 902 903 904
		prealloc = NULL;
		goto out;
	}
	state = rb_entry(node, struct extent_state, rb_node);
C
Chris Mason 已提交
905
hit_next:
906 907 908 909 910 911 912 913 914 915
	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) {
916
		if (state->state & exclusive_bits) {
917 918 919 920
			*failed_start = state->start;
			err = -EEXIST;
			goto out;
		}
921

922
		set_state_bits(tree, state, &bits, changeset);
923
		cache_state(state, cached_state);
924
		merge_state(tree, state);
925 926 927
		if (last_end == (u64)-1)
			goto out;
		start = last_end + 1;
928 929 930 931
		state = next_state(state);
		if (start < end && state && state->start == start &&
		    !need_resched())
			goto hit_next;
932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951
		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) {
952
		if (state->state & exclusive_bits) {
953 954 955 956
			*failed_start = start;
			err = -EEXIST;
			goto out;
		}
957 958 959

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

964 965 966 967
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
968
			set_state_bits(tree, state, &bits, changeset);
969
			cache_state(state, cached_state);
970
			merge_state(tree, state);
971 972 973
			if (last_end == (u64)-1)
				goto out;
			start = last_end + 1;
974 975 976 977
			state = next_state(state);
			if (start < end && state && state->start == start &&
			    !need_resched())
				goto hit_next;
978 979 980 981 982 983 984 985 986 987 988 989 990 991 992
		}
		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 已提交
993
			this_end = last_start - 1;
994 995 996

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

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

J
Josef Bacik 已提交
1007 1008
		cache_state(prealloc, cached_state);
		prealloc = NULL;
1009 1010 1011 1012 1013 1014 1015 1016 1017 1018
		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) {
1019
		if (state->state & exclusive_bits) {
1020 1021 1022 1023
			*failed_start = start;
			err = -EEXIST;
			goto out;
		}
1024 1025 1026

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

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

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

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

	return err;

}

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


J
Josef Bacik 已提交
1064
/**
L
Liu Bo 已提交
1065 1066
 * convert_extent_bit - convert all bits in a given range from one bit to
 * 			another
J
Josef Bacik 已提交
1067 1068 1069 1070 1071
 * @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
1072
 * @cached_state:	state that we're going to cache
J
Josef Bacik 已提交
1073 1074 1075 1076 1077 1078
 *
 * 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.
1079 1080
 *
 * All allocations are done with GFP_NOFS.
J
Josef Bacik 已提交
1081 1082
 */
int convert_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1083
		       unsigned bits, unsigned clear_bits,
1084
		       struct extent_state **cached_state)
J
Josef Bacik 已提交
1085 1086 1087 1088
{
	struct extent_state *state;
	struct extent_state *prealloc = NULL;
	struct rb_node *node;
1089 1090
	struct rb_node **p;
	struct rb_node *parent;
J
Josef Bacik 已提交
1091 1092 1093
	int err = 0;
	u64 last_start;
	u64 last_end;
1094
	bool first_iteration = true;
J
Josef Bacik 已提交
1095

1096
	btrfs_debug_check_extent_io_range(tree, start, end);
1097

J
Josef Bacik 已提交
1098
again:
1099
	if (!prealloc) {
1100 1101 1102 1103 1104 1105 1106
		/*
		 * 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.
		 */
1107
		prealloc = alloc_extent_state(GFP_NOFS);
1108
		if (!prealloc && !first_iteration)
J
Josef Bacik 已提交
1109 1110 1111 1112
			return -ENOMEM;
	}

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

J
Josef Bacik 已提交
1122 1123 1124 1125
	/*
	 * this search will find all the extents that end after
	 * our range starts.
	 */
1126
	node = tree_search_for_insert(tree, start, &p, &parent);
J
Josef Bacik 已提交
1127 1128
	if (!node) {
		prealloc = alloc_extent_state_atomic(prealloc);
1129 1130 1131 1132
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
1133
		err = insert_state(tree, prealloc, start, end,
1134
				   &p, &parent, &bits, NULL);
1135 1136
		if (err)
			extent_io_tree_panic(tree, err);
1137 1138
		cache_state(prealloc, cached_state);
		prealloc = NULL;
J
Josef Bacik 已提交
1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152
		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) {
1153
		set_state_bits(tree, state, &bits, NULL);
1154
		cache_state(state, cached_state);
1155
		state = clear_state_bit(tree, state, &clear_bits, 0, NULL);
J
Josef Bacik 已提交
1156 1157 1158
		if (last_end == (u64)-1)
			goto out;
		start = last_end + 1;
1159 1160 1161
		if (start < end && state && state->start == start &&
		    !need_resched())
			goto hit_next;
J
Josef Bacik 已提交
1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182
		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);
1183 1184 1185 1186
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1187
		err = split_state(tree, state, prealloc, start);
1188 1189
		if (err)
			extent_io_tree_panic(tree, err);
J
Josef Bacik 已提交
1190 1191 1192 1193
		prealloc = NULL;
		if (err)
			goto out;
		if (state->end <= end) {
1194
			set_state_bits(tree, state, &bits, NULL);
1195
			cache_state(state, cached_state);
1196 1197
			state = clear_state_bit(tree, state, &clear_bits, 0,
						NULL);
J
Josef Bacik 已提交
1198 1199 1200
			if (last_end == (u64)-1)
				goto out;
			start = last_end + 1;
1201 1202 1203
			if (start < end && state && state->start == start &&
			    !need_resched())
				goto hit_next;
J
Josef Bacik 已提交
1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221
		}
		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);
1222 1223 1224 1225
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1226 1227 1228 1229 1230 1231

		/*
		 * Avoid to free 'prealloc' if it can be merged with
		 * the later extent.
		 */
		err = insert_state(tree, prealloc, start, this_end,
1232
				   NULL, NULL, &bits, NULL);
1233 1234
		if (err)
			extent_io_tree_panic(tree, err);
1235
		cache_state(prealloc, cached_state);
J
Josef Bacik 已提交
1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247
		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);
1248 1249 1250 1251
		if (!prealloc) {
			err = -ENOMEM;
			goto out;
		}
J
Josef Bacik 已提交
1252 1253

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

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

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

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

	return err;
}

1280
/* wrappers around set/clear extent bit */
1281
int set_record_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1282
			   unsigned bits, struct extent_changeset *changeset)
1283 1284 1285 1286 1287 1288 1289 1290 1291
{
	/*
	 * 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);

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

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

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

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

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

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

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

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

1357
void extent_range_clear_dirty_for_io(struct inode *inode, u64 start, u64 end)
1358
{
1359 1360
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
1361 1362 1363 1364 1365 1366
	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);
1367
		put_page(page);
1368 1369 1370 1371
		index++;
	}
}

1372
void extent_range_redirty_for_io(struct inode *inode, u64 start, u64 end)
1373
{
1374 1375
	unsigned long index = start >> PAGE_SHIFT;
	unsigned long end_index = end >> PAGE_SHIFT;
1376 1377 1378 1379 1380 1381
	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);
1382
		account_page_redirty(page);
1383
		put_page(page);
1384 1385 1386 1387
		index++;
	}
}

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

C
Chris Mason 已提交
1396 1397 1398 1399
/* 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'
 */
1400 1401
static struct extent_state *
find_first_extent_bit_state(struct extent_io_tree *tree,
1402
			    u64 start, unsigned bits)
C
Chris Mason 已提交
1403 1404 1405 1406 1407 1408 1409 1410 1411
{
	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 已提交
1412
	if (!node)
C
Chris Mason 已提交
1413 1414
		goto out;

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

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

1428 1429 1430 1431 1432
/*
 * 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.
 *
1433
 * If nothing was found, 1 is returned. If found something, return 0.
1434 1435
 */
int find_first_extent_bit(struct extent_io_tree *tree, u64 start,
1436
			  u64 *start_ret, u64 *end_ret, unsigned bits,
1437
			  struct extent_state **cached_state)
1438 1439
{
	struct extent_state *state;
1440
	struct rb_node *n;
1441 1442 1443
	int ret = 1;

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

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

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

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

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

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

1536 1537 1538 1539 1540
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);

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

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

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

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

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

1570 1571 1572 1573 1574
	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 已提交
1575 1576 1577 1578 1579 1580 1581 1582 1583
	return ret;
}

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

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

C
Chris Mason 已提交
1609 1610 1611 1612 1613
	/*
	 * 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 已提交
1614
	if (delalloc_start < *start)
C
Chris Mason 已提交
1615 1616
		delalloc_start = *start;

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

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

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

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

1664 1665 1666 1667
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 已提交
1668
{
1669
	unsigned long nr_pages = end_index - start_index + 1;
1670
	unsigned long pages_locked = 0;
1671
	pgoff_t index = start_index;
C
Chris Mason 已提交
1672
	struct page *pages[16];
1673
	unsigned ret;
1674
	int err = 0;
C
Chris Mason 已提交
1675
	int i;
1676

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

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

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

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

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

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

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

C
Chris Mason 已提交
1754 1755 1756 1757 1758
/*
 * 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.
 */
1759 1760
u64 count_range_bits(struct extent_io_tree *tree,
		     u64 *start, u64 search_end, u64 max_bytes,
1761
		     unsigned bits, int contig)
1762 1763 1764 1765 1766
{
	struct rb_node *node;
	struct extent_state *state;
	u64 cur_start = *start;
	u64 total_bytes = 0;
1767
	u64 last = 0;
1768 1769
	int found = 0;

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

1773
	spin_lock(&tree->lock);
1774 1775 1776 1777 1778 1779 1780 1781
	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.
	 */
1782
	node = tree_search(tree, cur_start);
C
Chris Mason 已提交
1783
	if (!node)
1784 1785
		goto out;

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

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

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

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

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

/*
 * searches a range in the state tree for a given mask.
1876
 * If 'filled' == 1, this returns 1 only if every extent in the tree
1877 1878 1879 1880
 * 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,
1881
		   unsigned bits, int filled, struct extent_state *cached)
1882 1883 1884 1885 1886
{
	struct extent_state *state = NULL;
	struct rb_node *node;
	int bitset = 0;

1887
	spin_lock(&tree->lock);
1888
	if (cached && extent_state_in_tree(cached) && cached->start <= start &&
1889
	    cached->end > start)
1890 1891 1892
		node = &cached->rb_node;
	else
		node = tree_search(tree, start);
1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911
	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;
		}
1912 1913 1914 1915

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

1916 1917 1918 1919 1920 1921 1922 1923 1924 1925
		start = state->end + 1;
		if (start > end)
			break;
		node = rb_next(node);
		if (!node) {
			if (filled)
				bitset = 0;
			break;
		}
	}
1926
	spin_unlock(&tree->lock);
1927 1928 1929 1930 1931 1932 1933
	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
 */
1934
static void check_page_uptodate(struct extent_io_tree *tree, struct page *page)
1935
{
M
Miao Xie 已提交
1936
	u64 start = page_offset(page);
1937
	u64 end = start + PAGE_SIZE - 1;
1938
	if (test_range_bit(tree, start, end, EXTENT_UPTODATE, 1, NULL))
1939 1940 1941
		SetPageUptodate(page);
}

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

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

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

	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.
1971
 * to avoid any synchronization issues, wait for the data after writing, which
1972 1973 1974 1975
 * 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.
 */
1976 1977 1978
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)
1979 1980 1981 1982 1983 1984 1985 1986
{
	struct bio *bio;
	struct btrfs_device *dev;
	u64 map_length = 0;
	u64 sector;
	struct btrfs_bio *bbio = NULL;
	int ret;

1987
	ASSERT(!(fs_info->sb->s_flags & MS_RDONLY));
1988 1989
	BUG_ON(!mirror_num);

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

1994 1995 1996 1997 1998 1999
	/*
	 * 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);
2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023
	if (btrfs_is_parity_mirror(fs_info, logical, length, mirror_num)) {
		/*
		 * 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);
2024
	}
2025 2026

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

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

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

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

2063
	if (fs_info->sb->s_flags & MS_RDONLY)
2064 2065
		return -EROFS;

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

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

	return ret;
}

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

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

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

	BUG_ON(!failrec->this_mirror);

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

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

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

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

2136
	return 0;
2137 2138
}

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

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

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

		ASSERT(state->end <= end);

		next = next_state(state);

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

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

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

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

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

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

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

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

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

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

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

	*failrec_ret = failrec;

	return 0;
}

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

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

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

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

2320 2321 2322 2323 2324 2325 2326
	return 1;
}


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

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

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

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

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

	return bio;
}

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

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

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

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

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

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

	phy_offset >>= inode->i_sb->s_blocksize_bits;
	bio = btrfs_create_repair_bio(inode, failed_bio, failrec, page,
				      start - page_offset(page),
2395 2396
				      (int)phy_offset, failed_bio->bi_end_io,
				      NULL);
2397
	if (!bio) {
2398
		free_io_failure(failure_tree, tree, failrec);
2399 2400
		return -EIO;
	}
2401
	bio_set_op_attrs(bio, REQ_OP_READ, read_mode);
2402

2403 2404 2405
	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);
2406

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

2414
	return ret;
2415 2416
}

2417 2418
/* lots and lots of room for performance fixes in the end_bio funcs */

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

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

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

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

2439 2440 2441 2442 2443 2444 2445 2446 2447
/*
 * 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.
 */
2448
static void end_bio_extent_writepage(struct bio *bio)
2449
{
2450
	struct bio_vec *bvec;
2451 2452
	u64 start;
	u64 end;
2453
	int i;
2454

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

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

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

2479
		end_extent_writepage(page, bio->bi_error, start, end);
2480
		end_page_writeback(page);
2481
	}
2482

2483 2484 2485
	bio_put(bio);
}

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

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

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

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

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

2537 2538 2539 2540 2541
		/* 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.  */
2542 2543
		if (bvec->bv_offset || bvec->bv_len != PAGE_SIZE) {
			if (bvec->bv_offset + bvec->bv_len != PAGE_SIZE)
2544 2545
				btrfs_err(fs_info,
					"partial page read in btrfs with offset %u and length %u",
2546 2547
					bvec->bv_offset, bvec->bv_len);
			else
2548 2549
				btrfs_info(fs_info,
					"incomplete page read in btrfs with offset %u and length %u",
2550 2551
					bvec->bv_offset, bvec->bv_len);
		}
2552

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

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

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

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

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

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

		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;
		}
2646
	}
2647

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

2656 2657 2658 2659 2660 2661 2662 2663 2664 2665
/*
 * 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.
 */
static inline void btrfs_io_bio_init(struct btrfs_io_bio *btrfs_bio)
{
	memset(btrfs_bio, 0, offsetof(struct btrfs_io_bio, bio));
}

2666
/*
2667 2668 2669
 * 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
2670
 */
2671
struct bio *btrfs_bio_alloc(struct block_device *bdev, u64 first_byte)
2672 2673 2674
{
	struct bio *bio;

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

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

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

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

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

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

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

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

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

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

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

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

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

2742 2743 2744 2745
	bio_put(bio);
	return ret;
}

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

}

2758
static int submit_extent_page(int op, int op_flags, struct extent_io_tree *tree,
2759
			      struct writeback_control *wbc,
2760 2761 2762 2763
			      struct page *page, sector_t sector,
			      size_t size, unsigned long offset,
			      struct block_device *bdev,
			      struct bio **bio_ret,
2764
			      bio_end_io_t end_io_func,
C
Chris Mason 已提交
2765 2766
			      int mirror_num,
			      unsigned long prev_bio_flags,
2767 2768
			      unsigned long bio_flags,
			      bool force_bio_submit)
2769 2770 2771
{
	int ret = 0;
	struct bio *bio;
C
Chris Mason 已提交
2772 2773
	int contig = 0;
	int old_compressed = prev_bio_flags & EXTENT_BIO_COMPRESSED;
2774
	size_t page_size = min_t(size_t, size, PAGE_SIZE);
2775 2776 2777

	if (bio_ret && *bio_ret) {
		bio = *bio_ret;
C
Chris Mason 已提交
2778
		if (old_compressed)
2779
			contig = bio->bi_iter.bi_sector == sector;
C
Chris Mason 已提交
2780
		else
K
Kent Overstreet 已提交
2781
			contig = bio_end_sector(bio) == sector;
C
Chris Mason 已提交
2782 2783

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

2800
	bio = btrfs_bio_alloc(bdev, sector << 9);
C
Chris Mason 已提交
2801
	bio_add_page(bio, page, page_size, offset);
2802 2803
	bio->bi_end_io = end_io_func;
	bio->bi_private = tree;
2804
	bio_set_op_attrs(bio, op, op_flags);
2805 2806 2807 2808
	if (wbc) {
		wbc_init_bio(wbc, bio);
		wbc_account_io(wbc, page, page_size);
	}
2809

C
Chris Mason 已提交
2810
	if (bio_ret)
2811
		*bio_ret = bio;
C
Chris Mason 已提交
2812
	else
2813
		ret = submit_one_bio(bio, mirror_num, bio_flags);
2814 2815 2816 2817

	return ret;
}

2818 2819
static void attach_extent_buffer_page(struct extent_buffer *eb,
				      struct page *page)
2820 2821 2822
{
	if (!PagePrivate(page)) {
		SetPagePrivate(page);
2823
		get_page(page);
J
Josef Bacik 已提交
2824 2825 2826
		set_page_private(page, (unsigned long)eb);
	} else {
		WARN_ON(page->private != (unsigned long)eb);
2827 2828 2829
	}
}

J
Josef Bacik 已提交
2830
void set_page_extent_mapped(struct page *page)
2831
{
J
Josef Bacik 已提交
2832 2833
	if (!PagePrivate(page)) {
		SetPagePrivate(page);
2834
		get_page(page);
J
Josef Bacik 已提交
2835 2836
		set_page_private(page, EXTENT_PAGE_PRIVATE);
	}
2837 2838
}

2839 2840 2841 2842 2843 2844 2845 2846 2847
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;
2848
		if (extent_map_in_tree(em) && start >= em->start &&
2849
		    start < extent_map_end(em)) {
2850
			refcount_inc(&em->refs);
2851 2852 2853 2854 2855 2856 2857
			return em;
		}

		free_extent_map(em);
		*em_cached = NULL;
	}

2858
	em = get_extent(BTRFS_I(inode), page, pg_offset, start, len, 0);
2859 2860
	if (em_cached && !IS_ERR_OR_NULL(em)) {
		BUG_ON(*em_cached);
2861
		refcount_inc(&em->refs);
2862 2863 2864 2865
		*em_cached = em;
	}
	return em;
}
2866 2867 2868 2869
/*
 * 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)
2870
 * XXX JDM: This needs looking at to ensure proper page locking
2871
 * return 0 on success, otherwise return error
2872
 */
2873 2874 2875
static int __do_readpage(struct extent_io_tree *tree,
			 struct page *page,
			 get_extent_t *get_extent,
2876
			 struct extent_map **em_cached,
2877
			 struct bio **bio, int mirror_num,
2878
			 unsigned long *bio_flags, int read_flags,
2879
			 u64 *prev_em_start)
2880 2881
{
	struct inode *inode = page->mapping->host;
M
Miao Xie 已提交
2882
	u64 start = page_offset(page);
2883
	u64 page_end = start + PAGE_SIZE - 1;
2884 2885 2886 2887 2888 2889 2890 2891 2892
	u64 end;
	u64 cur = start;
	u64 extent_offset;
	u64 last_byte = i_size_read(inode);
	u64 block_start;
	u64 cur_end;
	sector_t sector;
	struct extent_map *em;
	struct block_device *bdev;
2893
	int ret = 0;
2894
	int nr = 0;
2895
	size_t pg_offset = 0;
2896
	size_t iosize;
C
Chris Mason 已提交
2897
	size_t disk_io_size;
2898
	size_t blocksize = inode->i_sb->s_blocksize;
2899
	unsigned long this_bio_flag = 0;
2900 2901 2902

	set_page_extent_mapped(page);

2903
	end = page_end;
D
Dan Magenheimer 已提交
2904 2905 2906
	if (!PageUptodate(page)) {
		if (cleancache_get_page(page) == 0) {
			BUG_ON(blocksize != PAGE_SIZE);
2907
			unlock_extent(tree, start, end);
D
Dan Magenheimer 已提交
2908 2909 2910 2911
			goto out;
		}
	}

2912
	if (page->index == last_byte >> PAGE_SHIFT) {
C
Chris Mason 已提交
2913
		char *userpage;
2914
		size_t zero_offset = last_byte & (PAGE_SIZE - 1);
C
Chris Mason 已提交
2915 2916

		if (zero_offset) {
2917
			iosize = PAGE_SIZE - zero_offset;
2918
			userpage = kmap_atomic(page);
C
Chris Mason 已提交
2919 2920
			memset(userpage + zero_offset, 0, iosize);
			flush_dcache_page(page);
2921
			kunmap_atomic(userpage);
C
Chris Mason 已提交
2922 2923
		}
	}
2924
	while (cur <= end) {
2925
		bool force_bio_submit = false;
2926

2927 2928
		if (cur >= last_byte) {
			char *userpage;
2929 2930
			struct extent_state *cached = NULL;

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

2954
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags)) {
2955
			this_bio_flag |= EXTENT_BIO_COMPRESSED;
2956 2957 2958
			extent_set_compress_type(&this_bio_flag,
						 em->compress_type);
		}
C
Chris Mason 已提交
2959

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

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

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

3017 3018 3019 3020 3021 3022
		free_extent_map(em);
		em = NULL;

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

3025
			userpage = kmap_atomic(page);
3026
			memset(userpage + pg_offset, 0, iosize);
3027
			flush_dcache_page(page);
3028
			kunmap_atomic(userpage);
3029 3030

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

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

3086 3087 3088 3089
static inline void __do_contiguous_readpages(struct extent_io_tree *tree,
					     struct page *pages[], int nr_pages,
					     u64 start, u64 end,
					     get_extent_t *get_extent,
3090
					     struct extent_map **em_cached,
3091
					     struct bio **bio, int mirror_num,
3092
					     unsigned long *bio_flags,
3093
					     u64 *prev_em_start)
3094 3095 3096 3097 3098 3099 3100 3101
{
	struct inode *inode;
	struct btrfs_ordered_extent *ordered;
	int index;

	inode = pages[0]->mapping->host;
	while (1) {
		lock_extent(tree, start, end);
3102
		ordered = btrfs_lookup_ordered_range(BTRFS_I(inode), start,
3103 3104 3105 3106 3107 3108 3109 3110 3111
						     end - start + 1);
		if (!ordered)
			break;
		unlock_extent(tree, start, end);
		btrfs_start_ordered_extent(inode, ordered, 1);
		btrfs_put_ordered_extent(ordered);
	}

	for (index = 0; index < nr_pages; index++) {
3112
		__do_readpage(tree, pages[index], get_extent, em_cached, bio,
3113
			      mirror_num, bio_flags, 0, prev_em_start);
3114
		put_page(pages[index]);
3115 3116 3117 3118 3119 3120
	}
}

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

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

	if (end)
		__do_contiguous_readpages(tree, &pages[first_index],
					  index - first_index, start,
3155
					  end, get_extent, em_cached, bio,
3156
					  mirror_num, bio_flags,
3157
					  prev_em_start);
3158 3159 3160 3161 3162 3163
}

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,
3164
				   unsigned long *bio_flags, int read_flags)
3165 3166 3167 3168
{
	struct inode *inode = page->mapping->host;
	struct btrfs_ordered_extent *ordered;
	u64 start = page_offset(page);
3169
	u64 end = start + PAGE_SIZE - 1;
3170 3171 3172 3173
	int ret;

	while (1) {
		lock_extent(tree, start, end);
3174
		ordered = btrfs_lookup_ordered_range(BTRFS_I(inode), start,
3175
						PAGE_SIZE);
3176 3177 3178 3179 3180 3181 3182
		if (!ordered)
			break;
		unlock_extent(tree, start, end);
		btrfs_start_ordered_extent(inode, ordered, 1);
		btrfs_put_ordered_extent(ordered);
	}

3183
	ret = __do_readpage(tree, page, get_extent, NULL, bio, mirror_num,
3184
			    bio_flags, read_flags, NULL);
3185 3186 3187
	return ret;
}

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

3195
	ret = __extent_read_full_page(tree, page, get_extent, &bio, mirror_num,
3196
				      &bio_flags, 0);
3197
	if (bio)
3198
		ret = submit_one_bio(bio, mirror_num, bio_flags);
3199 3200 3201
	return ret;
}

3202
static void update_nr_written(struct writeback_control *wbc,
3203
			      unsigned long nr_written)
3204 3205 3206 3207
{
	wbc->nr_to_write -= nr_written;
}

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

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

	while (delalloc_end < page_end) {
		nr_delalloc = find_lock_delalloc_range(inode, tree,
					       page,
					       &delalloc_start,
					       &delalloc_end,
3240
					       BTRFS_MAX_EXTENT_SIZE);
3241 3242 3243 3244 3245 3246 3247 3248 3249 3250 3251 3252 3253 3254 3255 3256 3257 3258 3259 3260 3261
		if (nr_delalloc == 0) {
			delalloc_start = delalloc_end + 1;
			continue;
		}
		ret = tree->ops->fill_delalloc(inode, page,
					       delalloc_start,
					       delalloc_end,
					       &page_started,
					       nr_written);
		/* File system has been set read-only */
		if (ret) {
			SetPageError(page);
			/* fill_delalloc should be return < 0 for error
			 * but just in case, we use > 0 here meaning the
			 * IO is started, so we don't want to return > 0
			 * unless things are going well.
			 */
			ret = ret < 0 ? ret : -EIO;
			goto done;
		}
		/*
3262 3263
		 * delalloc_end is already one less than the total length, so
		 * we don't subtract one from PAGE_SIZE
3264 3265
		 */
		delalloc_to_write += (delalloc_end - delalloc_start +
3266
				      PAGE_SIZE) >> PAGE_SHIFT;
3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289 3290 3291 3292 3293 3294 3295 3296 3297 3298 3299 3300 3301 3302 3303 3304 3305 3306 3307 3308 3309 3310 3311
		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,
				 int write_flags, int *nr_ret)
3312 3313
{
	struct extent_io_tree *tree = epd->tree;
M
Miao Xie 已提交
3314
	u64 start = page_offset(page);
3315
	u64 page_end = start + PAGE_SIZE - 1;
3316 3317 3318 3319 3320 3321 3322 3323
	u64 end;
	u64 cur = start;
	u64 extent_offset;
	u64 block_start;
	u64 iosize;
	sector_t sector;
	struct extent_map *em;
	struct block_device *bdev;
3324
	size_t pg_offset = 0;
3325
	size_t blocksize;
3326 3327 3328
	int ret = 0;
	int nr = 0;
	bool compressed;
C
Chris Mason 已提交
3329

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

3340
			update_nr_written(wbc, nr_written);
3341
			unlock_page(page);
3342
			return 1;
3343 3344 3345
		}
	}

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

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

	blocksize = inode->i_sb->s_blocksize;

	while (cur <= end) {
3363
		u64 em_end;
3364

3365
		if (cur >= i_size) {
3366 3367 3368
			if (tree->ops && tree->ops->writepage_end_io_hook)
				tree->ops->writepage_end_io_hook(page, cur,
							 page_end, NULL, 1);
3369 3370
			break;
		}
3371
		em = epd->get_extent(BTRFS_I(inode), page, pg_offset, cur,
3372
				     end - cur + 1, 1);
3373
		if (IS_ERR_OR_NULL(em)) {
3374
			SetPageError(page);
3375
			ret = PTR_ERR_OR_ZERO(em);
3376 3377 3378 3379
			break;
		}

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

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

			cur += iosize;
3416
			pg_offset += iosize;
3417 3418
			continue;
		}
C
Chris Mason 已提交
3419

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

3427 3428
		ret = submit_extent_page(REQ_OP_WRITE, write_flags, tree, wbc,
					 page, sector, iosize, pg_offset,
3429
					 bdev, &epd->bio,
3430 3431
					 end_bio_extent_writepage,
					 0, 0, 0, false);
3432
		if (ret) {
3433
			SetPageError(page);
3434 3435 3436
			if (PageWriteback(page))
				end_page_writeback(page);
		}
3437 3438

		cur = cur + iosize;
3439
		pg_offset += iosize;
3440 3441
		nr++;
	}
3442 3443 3444 3445 3446 3447 3448 3449 3450 3451 3452 3453 3454 3455 3456 3457 3458
done:
	*nr_ret = nr;
	return ret;
}

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

	if (wbc->sync_mode == WB_SYNC_ALL)
3469
		write_flags = REQ_SYNC;
3470 3471 3472 3473 3474 3475 3476

	trace___extent_writepage(page, inode, wbc);

	WARN_ON(!PageLocked(page));

	ClearPageError(page);

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

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

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

	pg_offset = 0;

	set_page_extent_mapped(page);

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

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

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

3523
done_unlocked:
3524 3525 3526
	return 0;
}

3527
void wait_on_extent_buffer_writeback(struct extent_buffer *eb)
3528
{
3529 3530
	wait_on_bit_io(&eb->bflags, EXTENT_BUFFER_WRITEBACK,
		       TASK_UNINTERRUPTIBLE);
3531 3532
}

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

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

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

3565 3566 3567 3568 3569 3570
	/*
	 * 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);
3571 3572
	if (test_and_clear_bit(EXTENT_BUFFER_DIRTY, &eb->bflags)) {
		set_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags);
3573
		spin_unlock(&eb->refs_lock);
3574
		btrfs_set_header_flag(eb, BTRFS_HEADER_FLAG_WRITTEN);
3575 3576 3577
		__percpu_counter_add(&fs_info->dirty_metadata_bytes,
				     -eb->len,
				     fs_info->dirty_metadata_batch);
3578
		ret = 1;
3579 3580
	} else {
		spin_unlock(&eb->refs_lock);
3581 3582 3583 3584 3585 3586 3587 3588 3589
	}

	btrfs_tree_unlock(eb);

	if (!ret)
		return ret;

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

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

	return ret;
}

static void end_extent_buffer_writeback(struct extent_buffer *eb)
{
	clear_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags);
3607
	smp_mb__after_atomic();
3608 3609 3610
	wake_up_bit(&eb->bflags, EXTENT_BUFFER_WRITEBACK);
}

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

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

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

3672
static void end_bio_extent_buffer_writepage(struct bio *bio)
3673
{
3674
	struct bio_vec *bvec;
3675
	struct extent_buffer *eb;
3676
	int i, done;
3677

3678
	bio_for_each_segment_all(bvec, bio, i) {
3679 3680 3681 3682 3683 3684
		struct page *page = bvec->bv_page;

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

3685 3686
		if (bio->bi_error ||
		    test_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags)) {
3687
			ClearPageUptodate(page);
3688
			set_btree_ioerr(page);
3689 3690 3691 3692 3693 3694 3695 3696
		}

		end_page_writeback(page);

		if (!done)
			continue;

		end_extent_buffer_writeback(eb);
3697
	}
3698 3699 3700 3701

	bio_put(bio);
}

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

3717
	clear_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags);
3718 3719
	num_pages = num_extent_pages(eb->start, eb->len);
	atomic_set(&eb->io_pages, num_pages);
3720 3721 3722
	if (btrfs_header_owner(eb) == BTRFS_TREE_LOG_OBJECTID)
		bio_flags = EXTENT_BIO_TREE_LOG;

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

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

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

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

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

	return ret;
}

int btree_write_cache_pages(struct address_space *mapping,
				   struct writeback_control *wbc)
{
	struct extent_io_tree *tree = &BTRFS_I(mapping->host)->io_tree;
	struct btrfs_fs_info *fs_info = BTRFS_I(mapping->host)->root->fs_info;
	struct extent_buffer *eb, *prev_eb = NULL;
	struct extent_page_data epd = {
		.bio = NULL,
		.tree = tree,
		.extent_locked = 0,
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
3786
		.bio_flags = 0,
3787 3788 3789 3790 3791 3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802
	};
	int ret = 0;
	int done = 0;
	int nr_to_write_done = 0;
	struct pagevec pvec;
	int nr_pages;
	pgoff_t index;
	pgoff_t end;		/* Inclusive */
	int scanned = 0;
	int tag;

	pagevec_init(&pvec, 0);
	if (wbc->range_cyclic) {
		index = mapping->writeback_index; /* Start from prev offset */
		end = -1;
	} else {
3803 3804
		index = wbc->range_start >> PAGE_SHIFT;
		end = wbc->range_end >> PAGE_SHIFT;
3805 3806 3807 3808 3809 3810 3811 3812 3813 3814 3815 3816 3817 3818 3819 3820 3821 3822 3823 3824 3825 3826 3827 3828 3829 3830
		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) &&
	       (nr_pages = pagevec_lookup_tag(&pvec, mapping, &index, tag,
			min(end - index, (pgoff_t)PAGEVEC_SIZE-1) + 1))) {
		unsigned i;

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

			if (!PagePrivate(page))
				continue;

			if (!wbc->range_cyclic && page->index > end) {
				done = 1;
				break;
			}

3831 3832 3833 3834 3835 3836
			spin_lock(&mapping->private_lock);
			if (!PagePrivate(page)) {
				spin_unlock(&mapping->private_lock);
				continue;
			}

3837
			eb = (struct extent_buffer *)page->private;
3838 3839 3840 3841 3842 3843

			/*
			 * 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.
			 */
3844
			if (WARN_ON(!eb)) {
3845
				spin_unlock(&mapping->private_lock);
3846 3847 3848
				continue;
			}

3849 3850
			if (eb == prev_eb) {
				spin_unlock(&mapping->private_lock);
3851
				continue;
3852
			}
3853

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

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

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

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

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

3930 3931 3932 3933 3934 3935 3936 3937 3938 3939 3940 3941
	/*
	 * 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;

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

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

3970
			done_index = page->index;
3971 3972 3973 3974 3975 3976 3977
			/*
			 * At this point we hold neither mapping->tree_lock nor
			 * lock on the page itself: the page may be truncated or
			 * invalidated (changing page->mapping to NULL), or even
			 * swizzled back from swapper_space to tmpfs file
			 * mapping
			 */
3978 3979 3980
			if (!trylock_page(page)) {
				flush_fn(data);
				lock_page(page);
3981
			}
3982 3983 3984 3985 3986 3987 3988 3989 3990 3991 3992 3993

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

			if (!wbc->range_cyclic && page->index > end) {
				done = 1;
				unlock_page(page);
				continue;
			}

C
Chris Mason 已提交
3994
			if (wbc->sync_mode != WB_SYNC_NONE) {
3995 3996
				if (PageWriteback(page))
					flush_fn(data);
3997
				wait_on_page_writeback(page);
C
Chris Mason 已提交
3998
			}
3999 4000 4001 4002 4003 4004 4005 4006 4007 4008 4009 4010 4011

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

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

			if (unlikely(ret == AOP_WRITEPAGE_ACTIVATE)) {
				unlock_page(page);
				ret = 0;
			}
4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025
			if (ret < 0) {
				/*
				 * done_index is set past this page,
				 * so media errors will not choke
				 * background writeout for the entire
				 * file. This has consequences for
				 * range_cyclic semantics (ie. it may
				 * not be suitable for data integrity
				 * writeout).
				 */
				done_index = page->index + 1;
				done = 1;
				break;
			}
4026 4027 4028 4029 4030 4031 4032

			/*
			 * 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;
4033 4034 4035 4036
		}
		pagevec_release(&pvec);
		cond_resched();
	}
4037
	if (!scanned && !done) {
4038 4039 4040 4041 4042 4043 4044 4045
		/*
		 * 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;
	}
4046 4047 4048 4049

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

4050
	btrfs_add_delayed_iput(inode);
4051
	return ret;
4052 4053
}

4054
static void flush_epd_write_bio(struct extent_page_data *epd)
C
Chris Mason 已提交
4055 4056
{
	if (epd->bio) {
4057 4058
		int ret;

4059
		bio_set_op_attrs(epd->bio, REQ_OP_WRITE,
4060
				 epd->sync_io ? REQ_SYNC : 0);
4061

4062
		ret = submit_one_bio(epd->bio, 0, epd->bio_flags);
4063
		BUG_ON(ret < 0); /* -ENOMEM */
C
Chris Mason 已提交
4064 4065 4066 4067
		epd->bio = NULL;
	}
}

4068 4069 4070 4071 4072 4073
static noinline void flush_write_bio(void *data)
{
	struct extent_page_data *epd = data;
	flush_epd_write_bio(epd);
}

4074 4075 4076 4077 4078 4079 4080 4081 4082
int extent_write_full_page(struct extent_io_tree *tree, struct page *page,
			  get_extent_t *get_extent,
			  struct writeback_control *wbc)
{
	int ret;
	struct extent_page_data epd = {
		.bio = NULL,
		.tree = tree,
		.get_extent = get_extent,
4083
		.extent_locked = 0,
4084
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4085
		.bio_flags = 0,
4086 4087 4088 4089
	};

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

4090
	flush_epd_write_bio(&epd);
4091 4092 4093
	return ret;
}

4094 4095 4096 4097 4098 4099 4100
int extent_write_locked_range(struct extent_io_tree *tree, struct inode *inode,
			      u64 start, u64 end, get_extent_t *get_extent,
			      int mode)
{
	int ret = 0;
	struct address_space *mapping = inode->i_mapping;
	struct page *page;
4101 4102
	unsigned long nr_pages = (end - start + PAGE_SIZE) >>
		PAGE_SHIFT;
4103 4104 4105 4106 4107 4108

	struct extent_page_data epd = {
		.bio = NULL,
		.tree = tree,
		.get_extent = get_extent,
		.extent_locked = 1,
4109
		.sync_io = mode == WB_SYNC_ALL,
4110
		.bio_flags = 0,
4111 4112 4113 4114 4115 4116 4117 4118
	};
	struct writeback_control wbc_writepages = {
		.sync_mode	= mode,
		.nr_to_write	= nr_pages * 2,
		.range_start	= start,
		.range_end	= end + 1,
	};

C
Chris Mason 已提交
4119
	while (start <= end) {
4120
		page = find_get_page(mapping, start >> PAGE_SHIFT);
4121 4122 4123 4124 4125
		if (clear_page_dirty_for_io(page))
			ret = __extent_writepage(page, &wbc_writepages, &epd);
		else {
			if (tree->ops && tree->ops->writepage_end_io_hook)
				tree->ops->writepage_end_io_hook(page, start,
4126
						 start + PAGE_SIZE - 1,
4127 4128 4129
						 NULL, 1);
			unlock_page(page);
		}
4130 4131
		put_page(page);
		start += PAGE_SIZE;
4132 4133
	}

4134
	flush_epd_write_bio(&epd);
4135 4136
	return ret;
}
4137 4138 4139 4140 4141 4142 4143 4144 4145 4146 4147

int extent_writepages(struct extent_io_tree *tree,
		      struct address_space *mapping,
		      get_extent_t *get_extent,
		      struct writeback_control *wbc)
{
	int ret = 0;
	struct extent_page_data epd = {
		.bio = NULL,
		.tree = tree,
		.get_extent = get_extent,
4148
		.extent_locked = 0,
4149
		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4150
		.bio_flags = 0,
4151 4152
	};

4153
	ret = extent_write_cache_pages(mapping, wbc, __extent_writepage, &epd,
C
Chris Mason 已提交
4154
				       flush_write_bio);
4155
	flush_epd_write_bio(&epd);
4156 4157 4158 4159 4160 4161 4162 4163 4164 4165
	return ret;
}

int extent_readpages(struct extent_io_tree *tree,
		     struct address_space *mapping,
		     struct list_head *pages, unsigned nr_pages,
		     get_extent_t get_extent)
{
	struct bio *bio = NULL;
	unsigned page_idx;
C
Chris Mason 已提交
4166
	unsigned long bio_flags = 0;
L
Liu Bo 已提交
4167 4168
	struct page *pagepool[16];
	struct page *page;
4169
	struct extent_map *em_cached = NULL;
L
Liu Bo 已提交
4170
	int nr = 0;
4171
	u64 prev_em_start = (u64)-1;
4172 4173

	for (page_idx = 0; page_idx < nr_pages; page_idx++) {
L
Liu Bo 已提交
4174
		page = list_entry(pages->prev, struct page, lru);
4175 4176 4177

		prefetchw(&page->flags);
		list_del(&page->lru);
L
Liu Bo 已提交
4178
		if (add_to_page_cache_lru(page, mapping,
4179 4180
					page->index,
					readahead_gfp_mask(mapping))) {
4181
			put_page(page);
L
Liu Bo 已提交
4182
			continue;
4183
		}
L
Liu Bo 已提交
4184 4185 4186 4187

		pagepool[nr++] = page;
		if (nr < ARRAY_SIZE(pagepool))
			continue;
4188
		__extent_readpages(tree, pagepool, nr, get_extent, &em_cached,
4189
				   &bio, 0, &bio_flags, &prev_em_start);
L
Liu Bo 已提交
4190
		nr = 0;
4191
	}
4192
	if (nr)
4193
		__extent_readpages(tree, pagepool, nr, get_extent, &em_cached,
4194
				   &bio, 0, &bio_flags, &prev_em_start);
L
Liu Bo 已提交
4195

4196 4197 4198
	if (em_cached)
		free_extent_map(em_cached);

4199 4200
	BUG_ON(!list_empty(pages));
	if (bio)
4201
		return submit_one_bio(bio, 0, bio_flags);
4202 4203 4204 4205 4206 4207 4208 4209 4210 4211 4212
	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)
{
4213
	struct extent_state *cached_state = NULL;
M
Miao Xie 已提交
4214
	u64 start = page_offset(page);
4215
	u64 end = start + PAGE_SIZE - 1;
4216 4217
	size_t blocksize = page->mapping->host->i_sb->s_blocksize;

4218
	start += ALIGN(offset, blocksize);
4219 4220 4221
	if (start > end)
		return 0;

4222
	lock_extent_bits(tree, start, end, &cached_state);
4223
	wait_on_page_writeback(page);
4224
	clear_extent_bit(tree, start, end,
4225 4226
			 EXTENT_LOCKED | EXTENT_DIRTY | EXTENT_DELALLOC |
			 EXTENT_DO_ACCOUNTING,
4227
			 1, 1, &cached_state, GFP_NOFS);
4228 4229 4230
	return 0;
}

4231 4232 4233 4234 4235
/*
 * 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.
 */
4236 4237 4238
static int try_release_extent_state(struct extent_map_tree *map,
				    struct extent_io_tree *tree,
				    struct page *page, gfp_t mask)
4239
{
M
Miao Xie 已提交
4240
	u64 start = page_offset(page);
4241
	u64 end = start + PAGE_SIZE - 1;
4242 4243
	int ret = 1;

4244
	if (test_range_bit(tree, start, end,
4245
			   EXTENT_IOBITS, 0, NULL))
4246 4247
		ret = 0;
	else {
4248 4249 4250 4251
		/*
		 * at this point we can safely clear everything except the
		 * locked bit and the nodatasum bit
		 */
4252
		ret = clear_extent_bit(tree, start, end,
4253 4254
				 ~(EXTENT_LOCKED | EXTENT_NODATASUM),
				 0, 0, NULL, mask);
4255 4256 4257 4258 4259 4260 4261 4262

		/* if clear_extent_bit failed for enomem reasons,
		 * we can't allow the release to continue.
		 */
		if (ret < 0)
			ret = 0;
		else
			ret = 1;
4263 4264 4265 4266
	}
	return ret;
}

4267 4268 4269 4270 4271 4272
/*
 * a helper for releasepage.  As long as there are no locked extents
 * in the range corresponding to the page, both state records and extent
 * map records are removed
 */
int try_release_extent_mapping(struct extent_map_tree *map,
4273 4274
			       struct extent_io_tree *tree, struct page *page,
			       gfp_t mask)
4275 4276
{
	struct extent_map *em;
M
Miao Xie 已提交
4277
	u64 start = page_offset(page);
4278
	u64 end = start + PAGE_SIZE - 1;
4279

4280
	if (gfpflags_allow_blocking(mask) &&
4281
	    page->mapping->host->i_size > SZ_16M) {
4282
		u64 len;
4283
		while (start <= end) {
4284
			len = end - start + 1;
4285
			write_lock(&map->lock);
4286
			em = lookup_extent_mapping(map, start, len);
4287
			if (!em) {
4288
				write_unlock(&map->lock);
4289 4290
				break;
			}
4291 4292
			if (test_bit(EXTENT_FLAG_PINNED, &em->flags) ||
			    em->start != start) {
4293
				write_unlock(&map->lock);
4294 4295 4296 4297 4298
				free_extent_map(em);
				break;
			}
			if (!test_range_bit(tree, em->start,
					    extent_map_end(em) - 1,
4299
					    EXTENT_LOCKED | EXTENT_WRITEBACK,
4300
					    0, NULL)) {
4301 4302 4303 4304 4305
				remove_extent_mapping(map, em);
				/* once for the rb tree */
				free_extent_map(em);
			}
			start = extent_map_end(em);
4306
			write_unlock(&map->lock);
4307 4308

			/* once for us */
4309 4310 4311
			free_extent_map(em);
		}
	}
4312
	return try_release_extent_state(map, tree, page, mask);
4313 4314
}

4315 4316 4317 4318 4319 4320 4321 4322 4323
/*
 * 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,
						u64 offset,
						u64 last,
						get_extent_t *get_extent)
{
4324
	u64 sectorsize = btrfs_inode_sectorsize(inode);
4325 4326 4327 4328 4329 4330
	struct extent_map *em;
	u64 len;

	if (offset >= last)
		return NULL;

4331
	while (1) {
4332 4333 4334
		len = last - offset;
		if (len == 0)
			break;
4335
		len = ALIGN(len, sectorsize);
4336
		em = get_extent(BTRFS_I(inode), NULL, 0, offset, len, 0);
4337
		if (IS_ERR_OR_NULL(em))
4338 4339 4340 4341 4342 4343 4344 4345 4346 4347 4348 4349 4350 4351 4352 4353 4354
			return em;

		/* if this isn't a hole return it */
		if (!test_bit(EXTENT_FLAG_VACANCY, &em->flags) &&
		    em->block_start != EXTENT_MAP_HOLE) {
			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;
}

4355 4356 4357 4358 4359 4360 4361 4362 4363 4364 4365 4366 4367 4368 4369 4370 4371 4372 4373 4374 4375 4376 4377 4378 4379 4380 4381 4382 4383 4384 4385 4386 4387 4388 4389 4390 4391 4392 4393 4394 4395 4396 4397 4398 4399 4400 4401 4402 4403 4404 4405 4406 4407 4408 4409 4410 4411 4412 4413 4414 4415 4416 4417 4418 4419 4420 4421 4422 4423 4424 4425 4426 4427 4428 4429 4430 4431 4432 4433 4434 4435 4436 4437 4438 4439 4440 4441 4442 4443 4444 4445 4446 4447 4448 4449 4450 4451 4452 4453 4454 4455 4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466 4467 4468 4469 4470 4471
/*
 * To cache previous fiemap extent
 *
 * Will be used for merging fiemap extent
 */
struct fiemap_cache {
	u64 offset;
	u64 phys;
	u64 len;
	u32 flags;
	bool cached;
};

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

	if (!cache->cached)
		goto assign;

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

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

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

/*
 * Sanity check for fiemap cache
 *
 * All fiemap cache should be submitted by emit_fiemap_extent()
 * Iteration should be terminated either by last fiemap extent or
 * fieinfo->fi_extents_max.
 * So no cached fiemap should exist.
 */
static int check_fiemap_cache(struct btrfs_fs_info *fs_info,
			       struct fiemap_extent_info *fieinfo,
			       struct fiemap_cache *cache)
{
	int ret;

	if (!cache->cached)
		return 0;

	/* Small and recoverbale problem, only to info developer */
#ifdef CONFIG_BTRFS_DEBUG
	WARN_ON(1);
#endif
	btrfs_warn(fs_info,
		   "unhandled fiemap cache detected: offset=%llu phys=%llu len=%llu flags=0x%x",
		   cache->offset, cache->phys, cache->len, cache->flags);
	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 已提交
4472 4473 4474
int extent_fiemap(struct inode *inode, struct fiemap_extent_info *fieinfo,
		__u64 start, __u64 len, get_extent_t *get_extent)
{
J
Josef Bacik 已提交
4475
	int ret = 0;
Y
Yehuda Sadeh 已提交
4476 4477 4478
	u64 off = start;
	u64 max = start + len;
	u32 flags = 0;
J
Josef Bacik 已提交
4479 4480
	u32 found_type;
	u64 last;
4481
	u64 last_for_get_extent = 0;
Y
Yehuda Sadeh 已提交
4482
	u64 disko = 0;
4483
	u64 isize = i_size_read(inode);
J
Josef Bacik 已提交
4484
	struct btrfs_key found_key;
Y
Yehuda Sadeh 已提交
4485
	struct extent_map *em = NULL;
4486
	struct extent_state *cached_state = NULL;
J
Josef Bacik 已提交
4487
	struct btrfs_path *path;
4488
	struct btrfs_root *root = BTRFS_I(inode)->root;
4489
	struct fiemap_cache cache = { 0 };
Y
Yehuda Sadeh 已提交
4490
	int end = 0;
4491 4492 4493
	u64 em_start = 0;
	u64 em_len = 0;
	u64 em_end = 0;
Y
Yehuda Sadeh 已提交
4494 4495 4496 4497

	if (len == 0)
		return -EINVAL;

J
Josef Bacik 已提交
4498 4499 4500 4501 4502
	path = btrfs_alloc_path();
	if (!path)
		return -ENOMEM;
	path->leave_spinning = 1;

4503 4504
	start = round_down(start, btrfs_inode_sectorsize(inode));
	len = round_up(max, btrfs_inode_sectorsize(inode)) - start;
4505

4506 4507 4508 4509
	/*
	 * lookup the last file extent.  We're not using i_size here
	 * because there might be preallocation past i_size
	 */
4510 4511
	ret = btrfs_lookup_file_extent(NULL, root, path,
			btrfs_ino(BTRFS_I(inode)), -1, 0);
J
Josef Bacik 已提交
4512 4513 4514
	if (ret < 0) {
		btrfs_free_path(path);
		return ret;
4515 4516 4517 4518
	} else {
		WARN_ON(!ret);
		if (ret == 1)
			ret = 0;
J
Josef Bacik 已提交
4519
	}
4520

J
Josef Bacik 已提交
4521 4522
	path->slots[0]--;
	btrfs_item_key_to_cpu(path->nodes[0], &found_key, path->slots[0]);
4523
	found_type = found_key.type;
J
Josef Bacik 已提交
4524

4525
	/* No extents, but there might be delalloc bits */
4526
	if (found_key.objectid != btrfs_ino(BTRFS_I(inode)) ||
J
Josef Bacik 已提交
4527
	    found_type != BTRFS_EXTENT_DATA_KEY) {
4528 4529 4530 4531 4532 4533 4534 4535 4536 4537 4538
		/* 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 已提交
4539
	}
4540
	btrfs_release_path(path);
J
Josef Bacik 已提交
4541

4542 4543 4544 4545 4546 4547 4548 4549 4550 4551
	/*
	 * 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;
	}

4552
	lock_extent_bits(&BTRFS_I(inode)->io_tree, start, start + len - 1,
4553
			 &cached_state);
4554

4555
	em = get_extent_skip_holes(inode, start, last_for_get_extent,
4556
				   get_extent);
Y
Yehuda Sadeh 已提交
4557 4558 4559 4560 4561 4562
	if (!em)
		goto out;
	if (IS_ERR(em)) {
		ret = PTR_ERR(em);
		goto out;
	}
J
Josef Bacik 已提交
4563

Y
Yehuda Sadeh 已提交
4564
	while (!end) {
4565
		u64 offset_in_extent = 0;
4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577

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

4579 4580
		/*
		 * record the offset from the start of the extent
4581 4582 4583
		 * 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.
4584
		 */
4585 4586
		if (!test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
			offset_in_extent = em_start - em->start;
4587
		em_end = extent_map_end(em);
4588
		em_len = em_end - em_start;
Y
Yehuda Sadeh 已提交
4589 4590 4591
		disko = 0;
		flags = 0;

4592 4593 4594 4595 4596 4597 4598
		/*
		 * bump off for our next call to get_extent
		 */
		off = extent_map_end(em);
		if (off >= max)
			end = 1;

4599
		if (em->block_start == EXTENT_MAP_LAST_BYTE) {
Y
Yehuda Sadeh 已提交
4600 4601
			end = 1;
			flags |= FIEMAP_EXTENT_LAST;
4602
		} else if (em->block_start == EXTENT_MAP_INLINE) {
Y
Yehuda Sadeh 已提交
4603 4604
			flags |= (FIEMAP_EXTENT_DATA_INLINE |
				  FIEMAP_EXTENT_NOT_ALIGNED);
4605
		} else if (em->block_start == EXTENT_MAP_DELALLOC) {
Y
Yehuda Sadeh 已提交
4606 4607
			flags |= (FIEMAP_EXTENT_DELALLOC |
				  FIEMAP_EXTENT_UNKNOWN);
4608
		} else if (fieinfo->fi_extents_max) {
4609 4610
			struct btrfs_trans_handle *trans;

4611 4612
			u64 bytenr = em->block_start -
				(em->start - em->orig_start);
4613

4614
			disko = em->block_start + offset_in_extent;
4615

4616 4617 4618 4619 4620 4621 4622 4623 4624 4625 4626
			/*
			 * We need a trans handle to get delayed refs
			 */
			trans = btrfs_join_transaction(root);
			/*
			 * It's OK if we can't start a trans we can still check
			 * from commit_root
			 */
			if (IS_ERR(trans))
				trans = NULL;

4627 4628 4629
			/*
			 * As btrfs supports shared space, this information
			 * can be exported to userspace tools via
4630 4631 4632
			 * flag FIEMAP_EXTENT_SHARED.  If fi_extents_max == 0
			 * then we're just getting a count and we can skip the
			 * lookup stuff.
4633
			 */
4634
			ret = btrfs_check_shared(trans, root->fs_info,
4635 4636
					root->objectid,
					btrfs_ino(BTRFS_I(inode)), bytenr);
4637
			if (trans)
4638
				btrfs_end_transaction(trans);
4639
			if (ret < 0)
4640
				goto out_free;
4641
			if (ret)
4642
				flags |= FIEMAP_EXTENT_SHARED;
4643
			ret = 0;
Y
Yehuda Sadeh 已提交
4644 4645 4646
		}
		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
			flags |= FIEMAP_EXTENT_ENCODED;
4647 4648
		if (test_bit(EXTENT_FLAG_PREALLOC, &em->flags))
			flags |= FIEMAP_EXTENT_UNWRITTEN;
Y
Yehuda Sadeh 已提交
4649 4650 4651

		free_extent_map(em);
		em = NULL;
4652 4653
		if ((em_start >= last) || em_len == (u64)-1 ||
		   (last == (u64)-1 && isize <= em_end)) {
Y
Yehuda Sadeh 已提交
4654 4655 4656 4657
			flags |= FIEMAP_EXTENT_LAST;
			end = 1;
		}

4658 4659 4660 4661 4662 4663 4664 4665
		/* now scan forward to see if this is really the last extent. */
		em = get_extent_skip_holes(inode, off, last_for_get_extent,
					   get_extent);
		if (IS_ERR(em)) {
			ret = PTR_ERR(em);
			goto out;
		}
		if (!em) {
J
Josef Bacik 已提交
4666 4667 4668
			flags |= FIEMAP_EXTENT_LAST;
			end = 1;
		}
4669 4670
		ret = emit_fiemap_extent(fieinfo, &cache, em_start, disko,
					   em_len, flags);
4671 4672 4673
		if (ret) {
			if (ret == 1)
				ret = 0;
4674
			goto out_free;
4675
		}
Y
Yehuda Sadeh 已提交
4676 4677
	}
out_free:
4678 4679
	if (!ret)
		ret = check_fiemap_cache(root->fs_info, fieinfo, &cache);
Y
Yehuda Sadeh 已提交
4680 4681
	free_extent_map(em);
out:
4682
	btrfs_free_path(path);
L
Liu Bo 已提交
4683
	unlock_extent_cached(&BTRFS_I(inode)->io_tree, start, start + len - 1,
4684
			     &cached_state, GFP_NOFS);
Y
Yehuda Sadeh 已提交
4685 4686 4687
	return ret;
}

4688 4689
static void __free_extent_buffer(struct extent_buffer *eb)
{
4690
	btrfs_leak_debug_del(&eb->leak_list);
4691 4692 4693
	kmem_cache_free(extent_buffer_cache, eb);
}

4694
int extent_buffer_under_io(struct extent_buffer *eb)
4695 4696 4697 4698 4699 4700 4701 4702 4703
{
	return (atomic_read(&eb->io_pages) ||
		test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags) ||
		test_bit(EXTENT_BUFFER_DIRTY, &eb->bflags));
}

/*
 * Helper for releasing extent buffer page.
 */
4704
static void btrfs_release_extent_buffer_page(struct extent_buffer *eb)
4705 4706 4707 4708 4709 4710 4711
{
	unsigned long index;
	struct page *page;
	int mapped = !test_bit(EXTENT_BUFFER_DUMMY, &eb->bflags);

	BUG_ON(extent_buffer_under_io(eb));

4712 4713
	index = num_extent_pages(eb->start, eb->len);
	if (index == 0)
4714 4715 4716 4717
		return;

	do {
		index--;
4718
		page = eb->pages[index];
4719 4720 4721
		if (!page)
			continue;
		if (mapped)
4722
			spin_lock(&page->mapping->private_lock);
4723 4724 4725 4726 4727 4728 4729 4730 4731 4732 4733 4734
		/*
		 * 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));
4735
			/*
4736 4737
			 * We need to make sure we haven't be attached
			 * to a new eb.
4738
			 */
4739 4740 4741
			ClearPagePrivate(page);
			set_page_private(page, 0);
			/* One for the page private */
4742
			put_page(page);
4743
		}
4744 4745 4746 4747

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

4748
		/* One for when we allocated the page */
4749
		put_page(page);
4750
	} while (index != 0);
4751 4752 4753 4754 4755 4756 4757
}

/*
 * Helper for releasing the extent buffer.
 */
static inline void btrfs_release_extent_buffer(struct extent_buffer *eb)
{
4758
	btrfs_release_extent_buffer_page(eb);
4759 4760 4761
	__free_extent_buffer(eb);
}

4762 4763
static struct extent_buffer *
__alloc_extent_buffer(struct btrfs_fs_info *fs_info, u64 start,
4764
		      unsigned long len)
4765 4766 4767
{
	struct extent_buffer *eb = NULL;

4768
	eb = kmem_cache_zalloc(extent_buffer_cache, GFP_NOFS|__GFP_NOFAIL);
4769 4770
	eb->start = start;
	eb->len = len;
4771
	eb->fs_info = fs_info;
4772
	eb->bflags = 0;
4773 4774 4775 4776 4777 4778 4779
	rwlock_init(&eb->lock);
	atomic_set(&eb->write_locks, 0);
	atomic_set(&eb->read_locks, 0);
	atomic_set(&eb->blocking_readers, 0);
	atomic_set(&eb->blocking_writers, 0);
	atomic_set(&eb->spinning_readers, 0);
	atomic_set(&eb->spinning_writers, 0);
4780
	eb->lock_nested = 0;
4781 4782
	init_waitqueue_head(&eb->write_lock_wq);
	init_waitqueue_head(&eb->read_lock_wq);
4783

4784 4785
	btrfs_leak_debug_add(&eb->leak_list, &buffers);

4786
	spin_lock_init(&eb->refs_lock);
4787
	atomic_set(&eb->refs, 1);
4788
	atomic_set(&eb->io_pages, 0);
4789

4790 4791 4792 4793 4794 4795
	/*
	 * 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);
4796 4797 4798 4799

	return eb;
}

4800 4801 4802 4803 4804 4805 4806
struct extent_buffer *btrfs_clone_extent_buffer(struct extent_buffer *src)
{
	unsigned long i;
	struct page *p;
	struct extent_buffer *new;
	unsigned long num_pages = num_extent_pages(src->start, src->len);

4807
	new = __alloc_extent_buffer(src->fs_info, src->start, src->len);
4808 4809 4810 4811
	if (new == NULL)
		return NULL;

	for (i = 0; i < num_pages; i++) {
4812
		p = alloc_page(GFP_NOFS);
4813 4814 4815 4816
		if (!p) {
			btrfs_release_extent_buffer(new);
			return NULL;
		}
4817 4818 4819 4820
		attach_extent_buffer_page(new, p);
		WARN_ON(PageDirty(p));
		SetPageUptodate(p);
		new->pages[i] = p;
4821
		copy_page(page_address(p), page_address(src->pages[i]));
4822 4823 4824 4825 4826 4827 4828 4829
	}

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

	return new;
}

4830 4831
struct extent_buffer *__alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
						  u64 start, unsigned long len)
4832 4833
{
	struct extent_buffer *eb;
4834
	unsigned long num_pages;
4835 4836
	unsigned long i;

4837
	num_pages = num_extent_pages(start, len);
4838 4839

	eb = __alloc_extent_buffer(fs_info, start, len);
4840 4841 4842 4843
	if (!eb)
		return NULL;

	for (i = 0; i < num_pages; i++) {
4844
		eb->pages[i] = alloc_page(GFP_NOFS);
4845 4846 4847 4848 4849 4850 4851 4852 4853
		if (!eb->pages[i])
			goto err;
	}
	set_extent_buffer_uptodate(eb);
	btrfs_set_header_nritems(eb, 0);
	set_bit(EXTENT_BUFFER_DUMMY, &eb->bflags);

	return eb;
err:
4854 4855
	for (; i > 0; i--)
		__free_page(eb->pages[i - 1]);
4856 4857 4858 4859
	__free_extent_buffer(eb);
	return NULL;
}

4860
struct extent_buffer *alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
4861
						u64 start)
4862
{
4863
	return __alloc_dummy_extent_buffer(fs_info, start, fs_info->nodesize);
4864 4865
}

4866 4867
static void check_buffer_tree_ref(struct extent_buffer *eb)
{
4868
	int refs;
4869 4870 4871 4872 4873 4874 4875 4876 4877 4878 4879 4880 4881 4882 4883 4884 4885 4886 4887 4888
	/* 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.
	 */
4889 4890 4891 4892
	refs = atomic_read(&eb->refs);
	if (refs >= 2 && test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
		return;

4893 4894
	spin_lock(&eb->refs_lock);
	if (!test_and_set_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
4895
		atomic_inc(&eb->refs);
4896
	spin_unlock(&eb->refs_lock);
4897 4898
}

4899 4900
static void mark_extent_buffer_accessed(struct extent_buffer *eb,
		struct page *accessed)
4901 4902 4903
{
	unsigned long num_pages, i;

4904 4905
	check_buffer_tree_ref(eb);

4906 4907
	num_pages = num_extent_pages(eb->start, eb->len);
	for (i = 0; i < num_pages; i++) {
4908 4909
		struct page *p = eb->pages[i];

4910 4911
		if (p != accessed)
			mark_page_accessed(p);
4912 4913 4914
	}
}

4915 4916
struct extent_buffer *find_extent_buffer(struct btrfs_fs_info *fs_info,
					 u64 start)
4917 4918 4919 4920
{
	struct extent_buffer *eb;

	rcu_read_lock();
4921
	eb = radix_tree_lookup(&fs_info->buffer_radix,
4922
			       start >> PAGE_SHIFT);
4923 4924
	if (eb && atomic_inc_not_zero(&eb->refs)) {
		rcu_read_unlock();
4925 4926 4927 4928 4929 4930 4931 4932 4933 4934 4935 4936 4937 4938 4939 4940 4941 4942 4943
		/*
		 * 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);
		}
4944
		mark_extent_buffer_accessed(eb, NULL);
4945 4946 4947 4948 4949 4950 4951
		return eb;
	}
	rcu_read_unlock();

	return NULL;
}

4952 4953
#ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
struct extent_buffer *alloc_test_extent_buffer(struct btrfs_fs_info *fs_info,
4954
					u64 start)
4955 4956 4957 4958 4959 4960 4961
{
	struct extent_buffer *eb, *exists = NULL;
	int ret;

	eb = find_extent_buffer(fs_info, start);
	if (eb)
		return eb;
4962
	eb = alloc_dummy_extent_buffer(fs_info, start);
4963 4964 4965 4966
	if (!eb)
		return NULL;
	eb->fs_info = fs_info;
again:
4967
	ret = radix_tree_preload(GFP_NOFS);
4968 4969 4970 4971
	if (ret)
		goto free_eb;
	spin_lock(&fs_info->buffer_lock);
	ret = radix_tree_insert(&fs_info->buffer_radix,
4972
				start >> PAGE_SHIFT, eb);
4973 4974 4975 4976 4977 4978 4979 4980 4981 4982 4983 4984 4985 4986 4987 4988 4989 4990 4991 4992 4993 4994 4995 4996 4997 4998
	spin_unlock(&fs_info->buffer_lock);
	radix_tree_preload_end();
	if (ret == -EEXIST) {
		exists = find_extent_buffer(fs_info, start);
		if (exists)
			goto free_eb;
		else
			goto again;
	}
	check_buffer_tree_ref(eb);
	set_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags);

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

4999
struct extent_buffer *alloc_extent_buffer(struct btrfs_fs_info *fs_info,
5000
					  u64 start)
5001
{
5002
	unsigned long len = fs_info->nodesize;
5003 5004
	unsigned long num_pages = num_extent_pages(start, len);
	unsigned long i;
5005
	unsigned long index = start >> PAGE_SHIFT;
5006
	struct extent_buffer *eb;
5007
	struct extent_buffer *exists = NULL;
5008
	struct page *p;
5009
	struct address_space *mapping = fs_info->btree_inode->i_mapping;
5010
	int uptodate = 1;
5011
	int ret;
5012

5013
	if (!IS_ALIGNED(start, fs_info->sectorsize)) {
5014 5015 5016 5017
		btrfs_err(fs_info, "bad tree block start %llu", start);
		return ERR_PTR(-EINVAL);
	}

5018
	eb = find_extent_buffer(fs_info, start);
5019
	if (eb)
5020 5021
		return eb;

5022
	eb = __alloc_extent_buffer(fs_info, start, len);
5023
	if (!eb)
5024
		return ERR_PTR(-ENOMEM);
5025

5026
	for (i = 0; i < num_pages; i++, index++) {
5027
		p = find_or_create_page(mapping, index, GFP_NOFS|__GFP_NOFAIL);
5028 5029
		if (!p) {
			exists = ERR_PTR(-ENOMEM);
5030
			goto free_eb;
5031
		}
J
Josef Bacik 已提交
5032 5033 5034 5035 5036 5037 5038 5039 5040 5041 5042 5043 5044 5045

		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);
5046
				put_page(p);
5047
				mark_extent_buffer_accessed(exists, p);
J
Josef Bacik 已提交
5048 5049
				goto free_eb;
			}
5050
			exists = NULL;
J
Josef Bacik 已提交
5051

5052
			/*
J
Josef Bacik 已提交
5053 5054 5055 5056
			 * Do this so attach doesn't complain and we need to
			 * drop the ref the old guy had.
			 */
			ClearPagePrivate(p);
5057
			WARN_ON(PageDirty(p));
5058
			put_page(p);
5059
		}
J
Josef Bacik 已提交
5060 5061
		attach_extent_buffer_page(eb, p);
		spin_unlock(&mapping->private_lock);
5062
		WARN_ON(PageDirty(p));
5063
		eb->pages[i] = p;
5064 5065
		if (!PageUptodate(p))
			uptodate = 0;
C
Chris Mason 已提交
5066 5067 5068 5069 5070

		/*
		 * see below about how we avoid a nasty race with release page
		 * and why we unlock later
		 */
5071 5072
	}
	if (uptodate)
5073
		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5074
again:
5075
	ret = radix_tree_preload(GFP_NOFS);
5076 5077
	if (ret) {
		exists = ERR_PTR(ret);
5078
		goto free_eb;
5079
	}
5080

5081 5082
	spin_lock(&fs_info->buffer_lock);
	ret = radix_tree_insert(&fs_info->buffer_radix,
5083
				start >> PAGE_SHIFT, eb);
5084
	spin_unlock(&fs_info->buffer_lock);
5085
	radix_tree_preload_end();
5086
	if (ret == -EEXIST) {
5087
		exists = find_extent_buffer(fs_info, start);
5088 5089 5090
		if (exists)
			goto free_eb;
		else
5091
			goto again;
5092 5093
	}
	/* add one reference for the tree */
5094
	check_buffer_tree_ref(eb);
5095
	set_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags);
C
Chris Mason 已提交
5096 5097 5098 5099 5100 5101 5102 5103 5104 5105

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

5115
free_eb:
5116
	WARN_ON(!atomic_dec_and_test(&eb->refs));
5117 5118 5119 5120
	for (i = 0; i < num_pages; i++) {
		if (eb->pages[i])
			unlock_page(eb->pages[i]);
	}
C
Chris Mason 已提交
5121

5122
	btrfs_release_extent_buffer(eb);
5123
	return exists;
5124 5125
}

5126 5127 5128 5129 5130 5131 5132 5133 5134
static inline void btrfs_release_extent_buffer_rcu(struct rcu_head *head)
{
	struct extent_buffer *eb =
			container_of(head, struct extent_buffer, rcu_head);

	__free_extent_buffer(eb);
}

/* Expects to have eb->eb_lock already held */
5135
static int release_extent_buffer(struct extent_buffer *eb)
5136 5137 5138
{
	WARN_ON(atomic_read(&eb->refs) == 0);
	if (atomic_dec_and_test(&eb->refs)) {
5139
		if (test_and_clear_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags)) {
5140
			struct btrfs_fs_info *fs_info = eb->fs_info;
5141

5142
			spin_unlock(&eb->refs_lock);
5143

5144 5145
			spin_lock(&fs_info->buffer_lock);
			radix_tree_delete(&fs_info->buffer_radix,
5146
					  eb->start >> PAGE_SHIFT);
5147
			spin_unlock(&fs_info->buffer_lock);
5148 5149
		} else {
			spin_unlock(&eb->refs_lock);
5150
		}
5151 5152

		/* Should be safe to release our pages at this point */
5153
		btrfs_release_extent_buffer_page(eb);
5154 5155 5156 5157 5158 5159
#ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
		if (unlikely(test_bit(EXTENT_BUFFER_DUMMY, &eb->bflags))) {
			__free_extent_buffer(eb);
			return 1;
		}
#endif
5160
		call_rcu(&eb->rcu_head, btrfs_release_extent_buffer_rcu);
5161
		return 1;
5162 5163
	}
	spin_unlock(&eb->refs_lock);
5164 5165

	return 0;
5166 5167
}

5168 5169
void free_extent_buffer(struct extent_buffer *eb)
{
5170 5171
	int refs;
	int old;
5172 5173 5174
	if (!eb)
		return;

5175 5176 5177 5178 5179 5180 5181 5182 5183
	while (1) {
		refs = atomic_read(&eb->refs);
		if (refs <= 3)
			break;
		old = atomic_cmpxchg(&eb->refs, refs, refs - 1);
		if (old == refs)
			return;
	}

5184
	spin_lock(&eb->refs_lock);
5185 5186 5187 5188
	if (atomic_read(&eb->refs) == 2 &&
	    test_bit(EXTENT_BUFFER_DUMMY, &eb->bflags))
		atomic_dec(&eb->refs);

5189 5190
	if (atomic_read(&eb->refs) == 2 &&
	    test_bit(EXTENT_BUFFER_STALE, &eb->bflags) &&
5191
	    !extent_buffer_under_io(eb) &&
5192 5193 5194 5195 5196 5197 5198
	    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.
	 */
5199
	release_extent_buffer(eb);
5200 5201 5202 5203 5204
}

void free_extent_buffer_stale(struct extent_buffer *eb)
{
	if (!eb)
5205 5206
		return;

5207 5208 5209
	spin_lock(&eb->refs_lock);
	set_bit(EXTENT_BUFFER_STALE, &eb->bflags);

5210
	if (atomic_read(&eb->refs) == 2 && !extent_buffer_under_io(eb) &&
5211 5212
	    test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
		atomic_dec(&eb->refs);
5213
	release_extent_buffer(eb);
5214 5215
}

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

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

	for (i = 0; i < num_pages; i++) {
5225
		page = eb->pages[i];
5226
		if (!PageDirty(page))
C
Chris Mason 已提交
5227 5228
			continue;

5229
		lock_page(page);
C
Chris Mason 已提交
5230 5231
		WARN_ON(!PagePrivate(page));

5232
		clear_page_dirty_for_io(page);
5233
		spin_lock_irq(&page->mapping->tree_lock);
5234 5235 5236 5237 5238
		if (!PageDirty(page)) {
			radix_tree_tag_clear(&page->mapping->page_tree,
						page_index(page),
						PAGECACHE_TAG_DIRTY);
		}
5239
		spin_unlock_irq(&page->mapping->tree_lock);
5240
		ClearPageError(page);
5241
		unlock_page(page);
5242
	}
5243
	WARN_ON(atomic_read(&eb->refs) == 0);
5244 5245
}

5246
int set_extent_buffer_dirty(struct extent_buffer *eb)
5247 5248 5249
{
	unsigned long i;
	unsigned long num_pages;
5250
	int was_dirty = 0;
5251

5252 5253
	check_buffer_tree_ref(eb);

5254
	was_dirty = test_and_set_bit(EXTENT_BUFFER_DIRTY, &eb->bflags);
5255

5256
	num_pages = num_extent_pages(eb->start, eb->len);
5257
	WARN_ON(atomic_read(&eb->refs) == 0);
5258 5259
	WARN_ON(!test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags));

5260
	for (i = 0; i < num_pages; i++)
5261
		set_page_dirty(eb->pages[i]);
5262
	return was_dirty;
5263 5264
}

5265
void clear_extent_buffer_uptodate(struct extent_buffer *eb)
5266 5267 5268 5269 5270
{
	unsigned long i;
	struct page *page;
	unsigned long num_pages;

5271
	clear_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5272
	num_pages = num_extent_pages(eb->start, eb->len);
5273
	for (i = 0; i < num_pages; i++) {
5274
		page = eb->pages[i];
C
Chris Mason 已提交
5275 5276
		if (page)
			ClearPageUptodate(page);
5277 5278 5279
	}
}

5280
void set_extent_buffer_uptodate(struct extent_buffer *eb)
5281 5282 5283 5284 5285
{
	unsigned long i;
	struct page *page;
	unsigned long num_pages;

5286
	set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5287 5288
	num_pages = num_extent_pages(eb->start, eb->len);
	for (i = 0; i < num_pages; i++) {
5289
		page = eb->pages[i];
5290 5291 5292 5293
		SetPageUptodate(page);
	}
}

5294
int extent_buffer_uptodate(struct extent_buffer *eb)
5295
{
5296
	return test_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5297 5298 5299
}

int read_extent_buffer_pages(struct extent_io_tree *tree,
5300
			     struct extent_buffer *eb, int wait,
5301
			     get_extent_t *get_extent, int mirror_num)
5302 5303 5304 5305 5306
{
	unsigned long i;
	struct page *page;
	int err;
	int ret = 0;
5307 5308
	int locked_pages = 0;
	int all_uptodate = 1;
5309
	unsigned long num_pages;
5310
	unsigned long num_reads = 0;
5311
	struct bio *bio = NULL;
C
Chris Mason 已提交
5312
	unsigned long bio_flags = 0;
5313

5314
	if (test_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags))
5315 5316 5317
		return 0;

	num_pages = num_extent_pages(eb->start, eb->len);
5318
	for (i = 0; i < num_pages; i++) {
5319
		page = eb->pages[i];
5320
		if (wait == WAIT_NONE) {
5321
			if (!trylock_page(page))
5322
				goto unlock_exit;
5323 5324 5325
		} else {
			lock_page(page);
		}
5326
		locked_pages++;
5327 5328 5329 5330 5331 5332
	}
	/*
	 * 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().
	 */
5333
	for (i = 0; i < num_pages; i++) {
5334
		page = eb->pages[i];
5335 5336
		if (!PageUptodate(page)) {
			num_reads++;
5337
			all_uptodate = 0;
5338
		}
5339
	}
5340

5341
	if (all_uptodate) {
5342
		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5343 5344 5345
		goto unlock_exit;
	}

5346
	clear_bit(EXTENT_BUFFER_READ_ERR, &eb->bflags);
5347
	eb->read_mirror = 0;
5348
	atomic_set(&eb->io_pages, num_reads);
5349
	for (i = 0; i < num_pages; i++) {
5350
		page = eb->pages[i];
5351

5352
		if (!PageUptodate(page)) {
5353 5354 5355 5356 5357 5358
			if (ret) {
				atomic_dec(&eb->io_pages);
				unlock_page(page);
				continue;
			}

5359
			ClearPageError(page);
5360
			err = __extent_read_full_page(tree, page,
5361
						      get_extent, &bio,
5362
						      mirror_num, &bio_flags,
5363
						      REQ_META);
5364
			if (err) {
5365
				ret = err;
5366 5367 5368 5369 5370 5371 5372 5373 5374 5375
				/*
				 * 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);
			}
5376 5377 5378 5379 5380
		} else {
			unlock_page(page);
		}
	}

5381
	if (bio) {
5382
		err = submit_one_bio(bio, mirror_num, bio_flags);
5383 5384
		if (err)
			return err;
5385
	}
5386

5387
	if (ret || wait != WAIT_COMPLETE)
5388
		return ret;
C
Chris Mason 已提交
5389

5390
	for (i = 0; i < num_pages; i++) {
5391
		page = eb->pages[i];
5392
		wait_on_page_locked(page);
C
Chris Mason 已提交
5393
		if (!PageUptodate(page))
5394 5395
			ret = -EIO;
	}
C
Chris Mason 已提交
5396

5397
	return ret;
5398 5399

unlock_exit:
C
Chris Mason 已提交
5400
	while (locked_pages > 0) {
5401
		locked_pages--;
5402 5403
		page = eb->pages[locked_pages];
		unlock_page(page);
5404 5405
	}
	return ret;
5406 5407 5408 5409 5410 5411 5412 5413 5414 5415 5416
}

void read_extent_buffer(struct extent_buffer *eb, void *dstv,
			unsigned long start,
			unsigned long len)
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *dst = (char *)dstv;
5417 5418
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5419 5420 5421 5422

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

5423
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5424

C
Chris Mason 已提交
5425
	while (len > 0) {
5426
		page = eb->pages[i];
5427

5428
		cur = min(len, (PAGE_SIZE - offset));
5429
		kaddr = page_address(page);
5430 5431 5432 5433 5434 5435 5436 5437 5438
		memcpy(dst, kaddr + offset, cur);

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

5439 5440 5441 5442 5443 5444 5445 5446 5447
int read_extent_buffer_to_user(struct extent_buffer *eb, void __user *dstv,
			unsigned long start,
			unsigned long len)
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char __user *dst = (char __user *)dstv;
5448 5449
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5450 5451 5452 5453 5454
	int ret = 0;

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

5455
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5456 5457

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

5460
		cur = min(len, (PAGE_SIZE - offset));
5461 5462 5463 5464 5465 5466 5467 5468 5469 5470 5471 5472 5473 5474 5475
		kaddr = page_address(page);
		if (copy_to_user(dst, kaddr + offset, cur)) {
			ret = -EFAULT;
			break;
		}

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

	return ret;
}

5476 5477 5478 5479 5480
/*
 * return 0 if the item is found within a page.
 * return 1 if the item spans two pages.
 * return -EINVAL otherwise.
 */
5481
int map_private_extent_buffer(struct extent_buffer *eb, unsigned long start,
5482
			       unsigned long min_len, char **map,
5483
			       unsigned long *map_start,
5484
			       unsigned long *map_len)
5485
{
5486
	size_t offset = start & (PAGE_SIZE - 1);
5487 5488
	char *kaddr;
	struct page *p;
5489 5490
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5491
	unsigned long end_i = (start_offset + start + min_len - 1) >>
5492
		PAGE_SHIFT;
5493 5494

	if (i != end_i)
5495
		return 1;
5496 5497 5498 5499 5500 5501

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

5505
	if (start + min_len > eb->len) {
J
Jeff Mahoney 已提交
5506
		WARN(1, KERN_ERR "btrfs bad mapping eb start %llu len %lu, wanted %lu %lu\n",
5507
		       eb->start, eb->len, start, min_len);
5508
		return -EINVAL;
5509 5510
	}

5511
	p = eb->pages[i];
5512
	kaddr = page_address(p);
5513
	*map = kaddr + offset;
5514
	*map_len = PAGE_SIZE - offset;
5515 5516 5517 5518 5519 5520 5521 5522 5523 5524 5525 5526
	return 0;
}

int memcmp_extent_buffer(struct extent_buffer *eb, const void *ptrv,
			  unsigned long start,
			  unsigned long len)
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
	char *ptr = (char *)ptrv;
5527 5528
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5529 5530 5531 5532 5533
	int ret = 0;

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

5534
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5535

C
Chris Mason 已提交
5536
	while (len > 0) {
5537
		page = eb->pages[i];
5538

5539
		cur = min(len, (PAGE_SIZE - offset));
5540

5541
		kaddr = page_address(page);
5542 5543 5544 5545 5546 5547 5548 5549 5550 5551 5552 5553
		ret = memcmp(ptr, kaddr + offset, cur);
		if (ret)
			break;

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

5554 5555 5556 5557 5558 5559 5560 5561 5562 5563 5564 5565 5566 5567 5568 5569 5570 5571 5572 5573 5574
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);
}

5575 5576 5577 5578 5579 5580 5581 5582
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;
5583 5584
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5585 5586 5587 5588

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

5589
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5590

C
Chris Mason 已提交
5591
	while (len > 0) {
5592
		page = eb->pages[i];
5593 5594
		WARN_ON(!PageUptodate(page));

5595
		cur = min(len, PAGE_SIZE - offset);
5596
		kaddr = page_address(page);
5597 5598 5599 5600 5601 5602 5603 5604 5605
		memcpy(kaddr + offset, src, cur);

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

5606 5607
void memzero_extent_buffer(struct extent_buffer *eb, unsigned long start,
		unsigned long len)
5608 5609 5610 5611 5612
{
	size_t cur;
	size_t offset;
	struct page *page;
	char *kaddr;
5613 5614
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5615 5616 5617 5618

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

5619
	offset = (start_offset + start) & (PAGE_SIZE - 1);
5620

C
Chris Mason 已提交
5621
	while (len > 0) {
5622
		page = eb->pages[i];
5623 5624
		WARN_ON(!PageUptodate(page));

5625
		cur = min(len, PAGE_SIZE - offset);
5626
		kaddr = page_address(page);
5627
		memset(kaddr + offset, 0, cur);
5628 5629 5630 5631 5632 5633 5634

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

5635 5636 5637 5638 5639 5640 5641 5642 5643 5644 5645 5646 5647 5648
void copy_extent_buffer_full(struct extent_buffer *dst,
			     struct extent_buffer *src)
{
	int i;
	unsigned num_pages;

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

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

5649 5650 5651 5652 5653 5654 5655 5656 5657
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;
5658 5659
	size_t start_offset = dst->start & ((u64)PAGE_SIZE - 1);
	unsigned long i = (start_offset + dst_offset) >> PAGE_SHIFT;
5660 5661 5662 5663

	WARN_ON(src->len != dst_len);

	offset = (start_offset + dst_offset) &
5664
		(PAGE_SIZE - 1);
5665

C
Chris Mason 已提交
5666
	while (len > 0) {
5667
		page = dst->pages[i];
5668 5669
		WARN_ON(!PageUptodate(page));

5670
		cur = min(len, (unsigned long)(PAGE_SIZE - offset));
5671

5672
		kaddr = page_address(page);
5673 5674 5675 5676 5677 5678 5679 5680 5681
		read_extent_buffer(src, kaddr + offset, src_offset, cur);

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

5682 5683 5684 5685 5686 5687 5688 5689 5690 5691 5692
void le_bitmap_set(u8 *map, unsigned int start, int len)
{
	u8 *p = map + BIT_BYTE(start);
	const unsigned int size = start + len;
	int bits_to_set = BITS_PER_BYTE - (start % BITS_PER_BYTE);
	u8 mask_to_set = BITMAP_FIRST_BYTE_MASK(start);

	while (len - bits_to_set >= 0) {
		*p |= mask_to_set;
		len -= bits_to_set;
		bits_to_set = BITS_PER_BYTE;
D
Dan Carpenter 已提交
5693
		mask_to_set = ~0;
5694 5695 5696 5697 5698 5699 5700 5701 5702 5703 5704 5705 5706 5707 5708 5709 5710 5711 5712
		p++;
	}
	if (len) {
		mask_to_set &= BITMAP_LAST_BYTE_MASK(size);
		*p |= mask_to_set;
	}
}

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

	while (len - bits_to_clear >= 0) {
		*p &= ~mask_to_clear;
		len -= bits_to_clear;
		bits_to_clear = BITS_PER_BYTE;
D
Dan Carpenter 已提交
5713
		mask_to_clear = ~0;
5714 5715 5716 5717 5718 5719 5720
		p++;
	}
	if (len) {
		mask_to_clear &= BITMAP_LAST_BYTE_MASK(size);
		*p &= ~mask_to_clear;
	}
}
5721 5722 5723 5724 5725 5726 5727 5728 5729 5730 5731 5732 5733 5734 5735 5736 5737 5738 5739

/*
 * 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)
{
5740
	size_t start_offset = eb->start & ((u64)PAGE_SIZE - 1);
5741 5742 5743 5744 5745 5746 5747 5748 5749 5750
	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;

5751 5752
	*page_index = offset >> PAGE_SHIFT;
	*page_offset = offset & (PAGE_SIZE - 1);
5753 5754 5755 5756 5757 5758 5759 5760 5761 5762 5763
}

/**
 * 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)
{
5764
	u8 *kaddr;
5765 5766 5767 5768 5769 5770 5771 5772 5773 5774 5775 5776 5777 5778 5779 5780 5781 5782 5783 5784 5785
	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)
{
5786
	u8 *kaddr;
5787 5788 5789 5790 5791
	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);
5792
	u8 mask_to_set = BITMAP_FIRST_BYTE_MASK(pos);
5793 5794 5795 5796 5797 5798 5799 5800 5801 5802

	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 已提交
5803
		mask_to_set = ~0;
5804
		if (++offset >= PAGE_SIZE && len > 0) {
5805 5806 5807 5808 5809 5810 5811 5812 5813 5814 5815 5816 5817 5818 5819 5820 5821 5822 5823 5824 5825 5826 5827
			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)
{
5828
	u8 *kaddr;
5829 5830 5831 5832 5833
	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);
5834
	u8 mask_to_clear = BITMAP_FIRST_BYTE_MASK(pos);
5835 5836 5837 5838 5839 5840 5841 5842 5843 5844

	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 已提交
5845
		mask_to_clear = ~0;
5846
		if (++offset >= PAGE_SIZE && len > 0) {
5847 5848 5849 5850 5851 5852 5853 5854 5855 5856 5857 5858
			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;
	}
}

5859 5860 5861 5862 5863 5864
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;
}

5865 5866 5867 5868
static void copy_pages(struct page *dst_page, struct page *src_page,
		       unsigned long dst_off, unsigned long src_off,
		       unsigned long len)
{
5869
	char *dst_kaddr = page_address(dst_page);
5870
	char *src_kaddr;
5871
	int must_memmove = 0;
5872

5873
	if (dst_page != src_page) {
5874
		src_kaddr = page_address(src_page);
5875
	} else {
5876
		src_kaddr = dst_kaddr;
5877 5878
		if (areas_overlap(src_off, dst_off, len))
			must_memmove = 1;
5879
	}
5880

5881 5882 5883 5884
	if (must_memmove)
		memmove(dst_kaddr + dst_off, src_kaddr + src_off, len);
	else
		memcpy(dst_kaddr + dst_off, src_kaddr + src_off, len);
5885 5886 5887 5888 5889
}

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

	if (src_offset + len > dst->len) {
5899
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5900 5901
			"memmove bogus src_offset %lu move len %lu dst len %lu",
			 src_offset, len, dst->len);
5902 5903 5904
		BUG_ON(1);
	}
	if (dst_offset + len > dst->len) {
5905
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5906 5907
			"memmove bogus dst_offset %lu move len %lu dst len %lu",
			 dst_offset, len, dst->len);
5908 5909 5910
		BUG_ON(1);
	}

C
Chris Mason 已提交
5911
	while (len > 0) {
5912
		dst_off_in_page = (start_offset + dst_offset) &
5913
			(PAGE_SIZE - 1);
5914
		src_off_in_page = (start_offset + src_offset) &
5915
			(PAGE_SIZE - 1);
5916

5917 5918
		dst_i = (start_offset + dst_offset) >> PAGE_SHIFT;
		src_i = (start_offset + src_offset) >> PAGE_SHIFT;
5919

5920
		cur = min(len, (unsigned long)(PAGE_SIZE -
5921 5922
					       src_off_in_page));
		cur = min_t(unsigned long, cur,
5923
			(unsigned long)(PAGE_SIZE - dst_off_in_page));
5924

5925
		copy_pages(dst->pages[dst_i], dst->pages[src_i],
5926 5927 5928 5929 5930 5931 5932 5933 5934 5935 5936
			   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)
{
5937
	struct btrfs_fs_info *fs_info = dst->fs_info;
5938 5939 5940 5941 5942
	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;
5943
	size_t start_offset = dst->start & ((u64)PAGE_SIZE - 1);
5944 5945 5946 5947
	unsigned long dst_i;
	unsigned long src_i;

	if (src_offset + len > dst->len) {
5948
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5949 5950
			  "memmove bogus src_offset %lu move len %lu len %lu",
			  src_offset, len, dst->len);
5951 5952 5953
		BUG_ON(1);
	}
	if (dst_offset + len > dst->len) {
5954
		btrfs_err(fs_info,
J
Jeff Mahoney 已提交
5955 5956
			  "memmove bogus dst_offset %lu move len %lu len %lu",
			  dst_offset, len, dst->len);
5957 5958
		BUG_ON(1);
	}
5959
	if (dst_offset < src_offset) {
5960 5961 5962
		memcpy_extent_buffer(dst, dst_offset, src_offset, len);
		return;
	}
C
Chris Mason 已提交
5963
	while (len > 0) {
5964 5965
		dst_i = (start_offset + dst_end) >> PAGE_SHIFT;
		src_i = (start_offset + src_end) >> PAGE_SHIFT;
5966 5967

		dst_off_in_page = (start_offset + dst_end) &
5968
			(PAGE_SIZE - 1);
5969
		src_off_in_page = (start_offset + src_end) &
5970
			(PAGE_SIZE - 1);
5971 5972 5973

		cur = min_t(unsigned long, len, src_off_in_page + 1);
		cur = min(cur, dst_off_in_page + 1);
5974
		copy_pages(dst->pages[dst_i], dst->pages[src_i],
5975 5976 5977 5978 5979 5980 5981 5982
			   dst_off_in_page - cur + 1,
			   src_off_in_page - cur + 1, cur);

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

5984
int try_release_extent_buffer(struct page *page)
5985
{
5986 5987
	struct extent_buffer *eb;

5988
	/*
5989
	 * We need to make sure nobody is attaching this page to an eb right
5990 5991 5992 5993 5994
	 * now.
	 */
	spin_lock(&page->mapping->private_lock);
	if (!PagePrivate(page)) {
		spin_unlock(&page->mapping->private_lock);
J
Josef Bacik 已提交
5995
		return 1;
5996
	}
5997

5998 5999
	eb = (struct extent_buffer *)page->private;
	BUG_ON(!eb);
6000 6001

	/*
6002 6003 6004
	 * 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.
6005
	 */
6006
	spin_lock(&eb->refs_lock);
6007
	if (atomic_read(&eb->refs) != 1 || extent_buffer_under_io(eb)) {
6008 6009 6010
		spin_unlock(&eb->refs_lock);
		spin_unlock(&page->mapping->private_lock);
		return 0;
6011
	}
6012
	spin_unlock(&page->mapping->private_lock);
6013

6014
	/*
6015 6016
	 * 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.
6017
	 */
6018 6019 6020
	if (!test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags)) {
		spin_unlock(&eb->refs_lock);
		return 0;
6021
	}
6022

6023
	return release_extent_buffer(eb);
6024
}