• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 // SPDX-License-Identifier: GPL-2.0
2 
3 #include <linux/bitops.h>
4 #include <linux/slab.h>
5 #include <linux/bio.h>
6 #include <linux/mm.h>
7 #include <linux/pagemap.h>
8 #include <linux/page-flags.h>
9 #include <linux/spinlock.h>
10 #include <linux/blkdev.h>
11 #include <linux/swap.h>
12 #include <linux/writeback.h>
13 #include <linux/pagevec.h>
14 #include <linux/prefetch.h>
15 #include <linux/cleancache.h>
16 #include "extent_io.h"
17 #include "extent_map.h"
18 #include "ctree.h"
19 #include "btrfs_inode.h"
20 #include "volumes.h"
21 #include "check-integrity.h"
22 #include "locking.h"
23 #include "rcu-string.h"
24 #include "backref.h"
25 #include "disk-io.h"
26 
27 static struct kmem_cache *extent_state_cache;
28 static struct kmem_cache *extent_buffer_cache;
29 static struct bio_set btrfs_bioset;
30 
extent_state_in_tree(const struct extent_state * state)31 static inline bool extent_state_in_tree(const struct extent_state *state)
32 {
33 	return !RB_EMPTY_NODE(&state->rb_node);
34 }
35 
36 #ifdef CONFIG_BTRFS_DEBUG
37 static LIST_HEAD(buffers);
38 static LIST_HEAD(states);
39 
40 static DEFINE_SPINLOCK(leak_lock);
41 
42 static inline
btrfs_leak_debug_add(struct list_head * new,struct list_head * head)43 void btrfs_leak_debug_add(struct list_head *new, struct list_head *head)
44 {
45 	unsigned long flags;
46 
47 	spin_lock_irqsave(&leak_lock, flags);
48 	list_add(new, head);
49 	spin_unlock_irqrestore(&leak_lock, flags);
50 }
51 
52 static inline
btrfs_leak_debug_del(struct list_head * entry)53 void btrfs_leak_debug_del(struct list_head *entry)
54 {
55 	unsigned long flags;
56 
57 	spin_lock_irqsave(&leak_lock, flags);
58 	list_del(entry);
59 	spin_unlock_irqrestore(&leak_lock, flags);
60 }
61 
62 static inline
btrfs_leak_debug_check(void)63 void btrfs_leak_debug_check(void)
64 {
65 	struct extent_state *state;
66 	struct extent_buffer *eb;
67 
68 	while (!list_empty(&states)) {
69 		state = list_entry(states.next, struct extent_state, leak_list);
70 		pr_err("BTRFS: state leak: start %llu end %llu state %u in tree %d refs %d\n",
71 		       state->start, state->end, state->state,
72 		       extent_state_in_tree(state),
73 		       refcount_read(&state->refs));
74 		list_del(&state->leak_list);
75 		kmem_cache_free(extent_state_cache, state);
76 	}
77 
78 	while (!list_empty(&buffers)) {
79 		eb = list_entry(buffers.next, struct extent_buffer, leak_list);
80 		pr_err("BTRFS: buffer leak start %llu len %lu refs %d bflags %lu\n",
81 		       eb->start, eb->len, atomic_read(&eb->refs), eb->bflags);
82 		list_del(&eb->leak_list);
83 		kmem_cache_free(extent_buffer_cache, eb);
84 	}
85 }
86 
87 #define btrfs_debug_check_extent_io_range(tree, start, end)		\
88 	__btrfs_debug_check_extent_io_range(__func__, (tree), (start), (end))
__btrfs_debug_check_extent_io_range(const char * caller,struct extent_io_tree * tree,u64 start,u64 end)89 static inline void __btrfs_debug_check_extent_io_range(const char *caller,
90 		struct extent_io_tree *tree, u64 start, u64 end)
91 {
92 	struct inode *inode = tree->private_data;
93 	u64 isize;
94 
95 	if (!inode || !is_data_inode(inode))
96 		return;
97 
98 	isize = i_size_read(inode);
99 	if (end >= PAGE_SIZE && (end % 2) == 0 && end != isize - 1) {
100 		btrfs_debug_rl(BTRFS_I(inode)->root->fs_info,
101 		    "%s: ino %llu isize %llu odd range [%llu,%llu]",
102 			caller, btrfs_ino(BTRFS_I(inode)), isize, start, end);
103 	}
104 }
105 #else
106 #define btrfs_leak_debug_add(new, head)	do {} while (0)
107 #define btrfs_leak_debug_del(entry)	do {} while (0)
108 #define btrfs_leak_debug_check()	do {} while (0)
109 #define btrfs_debug_check_extent_io_range(c, s, e)	do {} while (0)
110 #endif
111 
112 struct tree_entry {
113 	u64 start;
114 	u64 end;
115 	struct rb_node rb_node;
116 };
117 
118 struct extent_page_data {
119 	struct bio *bio;
120 	struct extent_io_tree *tree;
121 	/* tells writepage not to lock the state bits for this range
122 	 * it still does the unlocking
123 	 */
124 	unsigned int extent_locked:1;
125 
126 	/* tells the submit_bio code to use REQ_SYNC */
127 	unsigned int sync_io:1;
128 };
129 
add_extent_changeset(struct extent_state * state,unsigned bits,struct extent_changeset * changeset,int set)130 static int add_extent_changeset(struct extent_state *state, unsigned bits,
131 				 struct extent_changeset *changeset,
132 				 int set)
133 {
134 	int ret;
135 
136 	if (!changeset)
137 		return 0;
138 	if (set && (state->state & bits) == bits)
139 		return 0;
140 	if (!set && (state->state & bits) == 0)
141 		return 0;
142 	changeset->bytes_changed += state->end - state->start + 1;
143 	ret = ulist_add(&changeset->range_changed, state->start, state->end,
144 			GFP_ATOMIC);
145 	return ret;
146 }
147 
submit_one_bio(struct bio * bio,int mirror_num,unsigned long bio_flags)148 static int __must_check submit_one_bio(struct bio *bio, int mirror_num,
149 				       unsigned long bio_flags)
150 {
151 	blk_status_t ret = 0;
152 	struct extent_io_tree *tree = bio->bi_private;
153 
154 	bio->bi_private = NULL;
155 
156 	if (tree->ops)
157 		ret = tree->ops->submit_bio_hook(tree->private_data, bio,
158 						 mirror_num, bio_flags);
159 	else
160 		btrfsic_submit_bio(bio);
161 
162 	return blk_status_to_errno(ret);
163 }
164 
165 /* Cleanup unsubmitted bios */
end_write_bio(struct extent_page_data * epd,int ret)166 static void end_write_bio(struct extent_page_data *epd, int ret)
167 {
168 	if (epd->bio) {
169 		epd->bio->bi_status = errno_to_blk_status(ret);
170 		bio_endio(epd->bio);
171 		epd->bio = NULL;
172 	}
173 }
174 
175 /*
176  * Submit bio from extent page data via submit_one_bio
177  *
178  * Return 0 if everything is OK.
179  * Return <0 for error.
180  */
flush_write_bio(struct extent_page_data * epd)181 static int __must_check flush_write_bio(struct extent_page_data *epd)
182 {
183 	int ret = 0;
184 
185 	if (epd->bio) {
186 		ret = submit_one_bio(epd->bio, 0, 0);
187 		/*
188 		 * Clean up of epd->bio is handled by its endio function.
189 		 * And endio is either triggered by successful bio execution
190 		 * or the error handler of submit bio hook.
191 		 * So at this point, no matter what happened, we don't need
192 		 * to clean up epd->bio.
193 		 */
194 		epd->bio = NULL;
195 	}
196 	return ret;
197 }
198 
extent_io_init(void)199 int __init extent_io_init(void)
200 {
201 	extent_state_cache = kmem_cache_create("btrfs_extent_state",
202 			sizeof(struct extent_state), 0,
203 			SLAB_MEM_SPREAD, NULL);
204 	if (!extent_state_cache)
205 		return -ENOMEM;
206 
207 	extent_buffer_cache = kmem_cache_create("btrfs_extent_buffer",
208 			sizeof(struct extent_buffer), 0,
209 			SLAB_MEM_SPREAD, NULL);
210 	if (!extent_buffer_cache)
211 		goto free_state_cache;
212 
213 	if (bioset_init(&btrfs_bioset, BIO_POOL_SIZE,
214 			offsetof(struct btrfs_io_bio, bio),
215 			BIOSET_NEED_BVECS))
216 		goto free_buffer_cache;
217 
218 	if (bioset_integrity_create(&btrfs_bioset, BIO_POOL_SIZE))
219 		goto free_bioset;
220 
221 	return 0;
222 
223 free_bioset:
224 	bioset_exit(&btrfs_bioset);
225 
226 free_buffer_cache:
227 	kmem_cache_destroy(extent_buffer_cache);
228 	extent_buffer_cache = NULL;
229 
230 free_state_cache:
231 	kmem_cache_destroy(extent_state_cache);
232 	extent_state_cache = NULL;
233 	return -ENOMEM;
234 }
235 
extent_io_exit(void)236 void __cold extent_io_exit(void)
237 {
238 	btrfs_leak_debug_check();
239 
240 	/*
241 	 * Make sure all delayed rcu free are flushed before we
242 	 * destroy caches.
243 	 */
244 	rcu_barrier();
245 	kmem_cache_destroy(extent_state_cache);
246 	kmem_cache_destroy(extent_buffer_cache);
247 	bioset_exit(&btrfs_bioset);
248 }
249 
extent_io_tree_init(struct btrfs_fs_info * fs_info,struct extent_io_tree * tree,unsigned int owner,void * private_data)250 void extent_io_tree_init(struct btrfs_fs_info *fs_info,
251 			 struct extent_io_tree *tree, unsigned int owner,
252 			 void *private_data)
253 {
254 	tree->fs_info = fs_info;
255 	tree->state = RB_ROOT;
256 	tree->ops = NULL;
257 	tree->dirty_bytes = 0;
258 	spin_lock_init(&tree->lock);
259 	tree->private_data = private_data;
260 	tree->owner = owner;
261 }
262 
extent_io_tree_release(struct extent_io_tree * tree)263 void extent_io_tree_release(struct extent_io_tree *tree)
264 {
265 	spin_lock(&tree->lock);
266 	/*
267 	 * Do a single barrier for the waitqueue_active check here, the state
268 	 * of the waitqueue should not change once extent_io_tree_release is
269 	 * called.
270 	 */
271 	smp_mb();
272 	while (!RB_EMPTY_ROOT(&tree->state)) {
273 		struct rb_node *node;
274 		struct extent_state *state;
275 
276 		node = rb_first(&tree->state);
277 		state = rb_entry(node, struct extent_state, rb_node);
278 		rb_erase(&state->rb_node, &tree->state);
279 		RB_CLEAR_NODE(&state->rb_node);
280 		/*
281 		 * btree io trees aren't supposed to have tasks waiting for
282 		 * changes in the flags of extent states ever.
283 		 */
284 		ASSERT(!waitqueue_active(&state->wq));
285 		free_extent_state(state);
286 
287 		cond_resched_lock(&tree->lock);
288 	}
289 	spin_unlock(&tree->lock);
290 }
291 
alloc_extent_state(gfp_t mask)292 static struct extent_state *alloc_extent_state(gfp_t mask)
293 {
294 	struct extent_state *state;
295 
296 	/*
297 	 * The given mask might be not appropriate for the slab allocator,
298 	 * drop the unsupported bits
299 	 */
300 	mask &= ~(__GFP_DMA32|__GFP_HIGHMEM);
301 	state = kmem_cache_alloc(extent_state_cache, mask);
302 	if (!state)
303 		return state;
304 	state->state = 0;
305 	state->failrec = NULL;
306 	RB_CLEAR_NODE(&state->rb_node);
307 	btrfs_leak_debug_add(&state->leak_list, &states);
308 	refcount_set(&state->refs, 1);
309 	init_waitqueue_head(&state->wq);
310 	trace_alloc_extent_state(state, mask, _RET_IP_);
311 	return state;
312 }
313 
free_extent_state(struct extent_state * state)314 void free_extent_state(struct extent_state *state)
315 {
316 	if (!state)
317 		return;
318 	if (refcount_dec_and_test(&state->refs)) {
319 		WARN_ON(extent_state_in_tree(state));
320 		btrfs_leak_debug_del(&state->leak_list);
321 		trace_free_extent_state(state, _RET_IP_);
322 		kmem_cache_free(extent_state_cache, state);
323 	}
324 }
325 
tree_insert(struct rb_root * root,struct rb_node * search_start,u64 offset,struct rb_node * node,struct rb_node *** p_in,struct rb_node ** parent_in)326 static struct rb_node *tree_insert(struct rb_root *root,
327 				   struct rb_node *search_start,
328 				   u64 offset,
329 				   struct rb_node *node,
330 				   struct rb_node ***p_in,
331 				   struct rb_node **parent_in)
332 {
333 	struct rb_node **p;
334 	struct rb_node *parent = NULL;
335 	struct tree_entry *entry;
336 
337 	if (p_in && parent_in) {
338 		p = *p_in;
339 		parent = *parent_in;
340 		goto do_insert;
341 	}
342 
343 	p = search_start ? &search_start : &root->rb_node;
344 	while (*p) {
345 		parent = *p;
346 		entry = rb_entry(parent, struct tree_entry, rb_node);
347 
348 		if (offset < entry->start)
349 			p = &(*p)->rb_left;
350 		else if (offset > entry->end)
351 			p = &(*p)->rb_right;
352 		else
353 			return parent;
354 	}
355 
356 do_insert:
357 	rb_link_node(node, parent, p);
358 	rb_insert_color(node, root);
359 	return NULL;
360 }
361 
362 /**
363  * __etree_search - searche @tree for an entry that contains @offset. Such
364  * entry would have entry->start <= offset && entry->end >= offset.
365  *
366  * @tree - the tree to search
367  * @offset - offset that should fall within an entry in @tree
368  * @next_ret - pointer to the first entry whose range ends after @offset
369  * @prev - pointer to the first entry whose range begins before @offset
370  * @p_ret - pointer where new node should be anchored (used when inserting an
371  *	    entry in the tree)
372  * @parent_ret - points to entry which would have been the parent of the entry,
373  *               containing @offset
374  *
375  * This function returns a pointer to the entry that contains @offset byte
376  * address. If no such entry exists, then NULL is returned and the other
377  * pointer arguments to the function are filled, otherwise the found entry is
378  * returned and other pointers are left untouched.
379  */
__etree_search(struct extent_io_tree * tree,u64 offset,struct rb_node ** next_ret,struct rb_node ** prev_ret,struct rb_node *** p_ret,struct rb_node ** parent_ret)380 static struct rb_node *__etree_search(struct extent_io_tree *tree, u64 offset,
381 				      struct rb_node **next_ret,
382 				      struct rb_node **prev_ret,
383 				      struct rb_node ***p_ret,
384 				      struct rb_node **parent_ret)
385 {
386 	struct rb_root *root = &tree->state;
387 	struct rb_node **n = &root->rb_node;
388 	struct rb_node *prev = NULL;
389 	struct rb_node *orig_prev = NULL;
390 	struct tree_entry *entry;
391 	struct tree_entry *prev_entry = NULL;
392 
393 	while (*n) {
394 		prev = *n;
395 		entry = rb_entry(prev, struct tree_entry, rb_node);
396 		prev_entry = entry;
397 
398 		if (offset < entry->start)
399 			n = &(*n)->rb_left;
400 		else if (offset > entry->end)
401 			n = &(*n)->rb_right;
402 		else
403 			return *n;
404 	}
405 
406 	if (p_ret)
407 		*p_ret = n;
408 	if (parent_ret)
409 		*parent_ret = prev;
410 
411 	if (next_ret) {
412 		orig_prev = prev;
413 		while (prev && offset > prev_entry->end) {
414 			prev = rb_next(prev);
415 			prev_entry = rb_entry(prev, struct tree_entry, rb_node);
416 		}
417 		*next_ret = prev;
418 		prev = orig_prev;
419 	}
420 
421 	if (prev_ret) {
422 		prev_entry = rb_entry(prev, struct tree_entry, rb_node);
423 		while (prev && offset < prev_entry->start) {
424 			prev = rb_prev(prev);
425 			prev_entry = rb_entry(prev, struct tree_entry, rb_node);
426 		}
427 		*prev_ret = prev;
428 	}
429 	return NULL;
430 }
431 
432 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)433 tree_search_for_insert(struct extent_io_tree *tree,
434 		       u64 offset,
435 		       struct rb_node ***p_ret,
436 		       struct rb_node **parent_ret)
437 {
438 	struct rb_node *next= NULL;
439 	struct rb_node *ret;
440 
441 	ret = __etree_search(tree, offset, &next, NULL, p_ret, parent_ret);
442 	if (!ret)
443 		return next;
444 	return ret;
445 }
446 
tree_search(struct extent_io_tree * tree,u64 offset)447 static inline struct rb_node *tree_search(struct extent_io_tree *tree,
448 					  u64 offset)
449 {
450 	return tree_search_for_insert(tree, offset, NULL, NULL);
451 }
452 
453 /*
454  * utility function to look for merge candidates inside a given range.
455  * Any extents with matching state are merged together into a single
456  * extent in the tree.  Extents with EXTENT_IO in their state field
457  * are not merged because the end_io handlers need to be able to do
458  * operations on them without sleeping (or doing allocations/splits).
459  *
460  * This should be called with the tree lock held.
461  */
merge_state(struct extent_io_tree * tree,struct extent_state * state)462 static void merge_state(struct extent_io_tree *tree,
463 		        struct extent_state *state)
464 {
465 	struct extent_state *other;
466 	struct rb_node *other_node;
467 
468 	if (state->state & (EXTENT_LOCKED | EXTENT_BOUNDARY))
469 		return;
470 
471 	other_node = rb_prev(&state->rb_node);
472 	if (other_node) {
473 		other = rb_entry(other_node, struct extent_state, rb_node);
474 		if (other->end == state->start - 1 &&
475 		    other->state == state->state) {
476 			if (tree->private_data &&
477 			    is_data_inode(tree->private_data))
478 				btrfs_merge_delalloc_extent(tree->private_data,
479 							    state, other);
480 			state->start = other->start;
481 			rb_erase(&other->rb_node, &tree->state);
482 			RB_CLEAR_NODE(&other->rb_node);
483 			free_extent_state(other);
484 		}
485 	}
486 	other_node = rb_next(&state->rb_node);
487 	if (other_node) {
488 		other = rb_entry(other_node, struct extent_state, rb_node);
489 		if (other->start == state->end + 1 &&
490 		    other->state == state->state) {
491 			if (tree->private_data &&
492 			    is_data_inode(tree->private_data))
493 				btrfs_merge_delalloc_extent(tree->private_data,
494 							    state, other);
495 			state->end = other->end;
496 			rb_erase(&other->rb_node, &tree->state);
497 			RB_CLEAR_NODE(&other->rb_node);
498 			free_extent_state(other);
499 		}
500 	}
501 }
502 
503 static void set_state_bits(struct extent_io_tree *tree,
504 			   struct extent_state *state, unsigned *bits,
505 			   struct extent_changeset *changeset);
506 
507 /*
508  * insert an extent_state struct into the tree.  'bits' are set on the
509  * struct before it is inserted.
510  *
511  * This may return -EEXIST if the extent is already there, in which case the
512  * state struct is freed.
513  *
514  * The tree lock is not taken internally.  This is a utility function and
515  * probably isn't what you want to call (see set/clear_extent_bit).
516  */
insert_state(struct extent_io_tree * tree,struct extent_state * state,u64 start,u64 end,struct rb_node *** p,struct rb_node ** parent,unsigned * bits,struct extent_changeset * changeset)517 static int insert_state(struct extent_io_tree *tree,
518 			struct extent_state *state, u64 start, u64 end,
519 			struct rb_node ***p,
520 			struct rb_node **parent,
521 			unsigned *bits, struct extent_changeset *changeset)
522 {
523 	struct rb_node *node;
524 
525 	if (end < start) {
526 		btrfs_err(tree->fs_info,
527 			"insert state: end < start %llu %llu", end, start);
528 		WARN_ON(1);
529 	}
530 	state->start = start;
531 	state->end = end;
532 
533 	set_state_bits(tree, state, bits, changeset);
534 
535 	node = tree_insert(&tree->state, NULL, end, &state->rb_node, p, parent);
536 	if (node) {
537 		struct extent_state *found;
538 		found = rb_entry(node, struct extent_state, rb_node);
539 		btrfs_err(tree->fs_info,
540 		       "found node %llu %llu on insert of %llu %llu",
541 		       found->start, found->end, start, end);
542 		return -EEXIST;
543 	}
544 	merge_state(tree, state);
545 	return 0;
546 }
547 
548 /*
549  * split a given extent state struct in two, inserting the preallocated
550  * struct 'prealloc' as the newly created second half.  'split' indicates an
551  * offset inside 'orig' where it should be split.
552  *
553  * Before calling,
554  * the tree has 'orig' at [orig->start, orig->end].  After calling, there
555  * are two extent state structs in the tree:
556  * prealloc: [orig->start, split - 1]
557  * orig: [ split, orig->end ]
558  *
559  * The tree locks are not taken by this function. They need to be held
560  * by the caller.
561  */
split_state(struct extent_io_tree * tree,struct extent_state * orig,struct extent_state * prealloc,u64 split)562 static int split_state(struct extent_io_tree *tree, struct extent_state *orig,
563 		       struct extent_state *prealloc, u64 split)
564 {
565 	struct rb_node *node;
566 
567 	if (tree->private_data && is_data_inode(tree->private_data))
568 		btrfs_split_delalloc_extent(tree->private_data, orig, split);
569 
570 	prealloc->start = orig->start;
571 	prealloc->end = split - 1;
572 	prealloc->state = orig->state;
573 	orig->start = split;
574 
575 	node = tree_insert(&tree->state, &orig->rb_node, prealloc->end,
576 			   &prealloc->rb_node, NULL, NULL);
577 	if (node) {
578 		free_extent_state(prealloc);
579 		return -EEXIST;
580 	}
581 	return 0;
582 }
583 
next_state(struct extent_state * state)584 static struct extent_state *next_state(struct extent_state *state)
585 {
586 	struct rb_node *next = rb_next(&state->rb_node);
587 	if (next)
588 		return rb_entry(next, struct extent_state, rb_node);
589 	else
590 		return NULL;
591 }
592 
593 /*
594  * utility function to clear some bits in an extent state struct.
595  * it will optionally wake up anyone waiting on this state (wake == 1).
596  *
597  * If no bits are set on the state struct after clearing things, the
598  * struct is freed and removed from the tree
599  */
clear_state_bit(struct extent_io_tree * tree,struct extent_state * state,unsigned * bits,int wake,struct extent_changeset * changeset)600 static struct extent_state *clear_state_bit(struct extent_io_tree *tree,
601 					    struct extent_state *state,
602 					    unsigned *bits, int wake,
603 					    struct extent_changeset *changeset)
604 {
605 	struct extent_state *next;
606 	unsigned bits_to_clear = *bits & ~EXTENT_CTLBITS;
607 	int ret;
608 
609 	if ((bits_to_clear & EXTENT_DIRTY) && (state->state & EXTENT_DIRTY)) {
610 		u64 range = state->end - state->start + 1;
611 		WARN_ON(range > tree->dirty_bytes);
612 		tree->dirty_bytes -= range;
613 	}
614 
615 	if (tree->private_data && is_data_inode(tree->private_data))
616 		btrfs_clear_delalloc_extent(tree->private_data, state, bits);
617 
618 	ret = add_extent_changeset(state, bits_to_clear, changeset, 0);
619 	BUG_ON(ret < 0);
620 	state->state &= ~bits_to_clear;
621 	if (wake)
622 		wake_up(&state->wq);
623 	if (state->state == 0) {
624 		next = next_state(state);
625 		if (extent_state_in_tree(state)) {
626 			rb_erase(&state->rb_node, &tree->state);
627 			RB_CLEAR_NODE(&state->rb_node);
628 			free_extent_state(state);
629 		} else {
630 			WARN_ON(1);
631 		}
632 	} else {
633 		merge_state(tree, state);
634 		next = next_state(state);
635 	}
636 	return next;
637 }
638 
639 static struct extent_state *
alloc_extent_state_atomic(struct extent_state * prealloc)640 alloc_extent_state_atomic(struct extent_state *prealloc)
641 {
642 	if (!prealloc)
643 		prealloc = alloc_extent_state(GFP_ATOMIC);
644 
645 	return prealloc;
646 }
647 
extent_io_tree_panic(struct extent_io_tree * tree,int err)648 static void extent_io_tree_panic(struct extent_io_tree *tree, int err)
649 {
650 	struct inode *inode = tree->private_data;
651 
652 	btrfs_panic(btrfs_sb(inode->i_sb), err,
653 	"locking error: extent tree was modified by another thread while locked");
654 }
655 
656 /*
657  * clear some bits on a range in the tree.  This may require splitting
658  * or inserting elements in the tree, so the gfp mask is used to
659  * indicate which allocations or sleeping are allowed.
660  *
661  * pass 'wake' == 1 to kick any sleepers, and 'delete' == 1 to remove
662  * the given range from the tree regardless of state (ie for truncate).
663  *
664  * the range [start, end] is inclusive.
665  *
666  * This takes the tree lock, and returns 0 on success and < 0 on error.
667  */
__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)668 int __clear_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
669 			      unsigned bits, int wake, int delete,
670 			      struct extent_state **cached_state,
671 			      gfp_t mask, struct extent_changeset *changeset)
672 {
673 	struct extent_state *state;
674 	struct extent_state *cached;
675 	struct extent_state *prealloc = NULL;
676 	struct rb_node *node;
677 	u64 last_end;
678 	int err;
679 	int clear = 0;
680 
681 	btrfs_debug_check_extent_io_range(tree, start, end);
682 	trace_btrfs_clear_extent_bit(tree, start, end - start + 1, bits);
683 
684 	if (bits & EXTENT_DELALLOC)
685 		bits |= EXTENT_NORESERVE;
686 
687 	if (delete)
688 		bits |= ~EXTENT_CTLBITS;
689 
690 	if (bits & (EXTENT_LOCKED | EXTENT_BOUNDARY))
691 		clear = 1;
692 again:
693 	if (!prealloc && gfpflags_allow_blocking(mask)) {
694 		/*
695 		 * Don't care for allocation failure here because we might end
696 		 * up not needing the pre-allocated extent state at all, which
697 		 * is the case if we only have in the tree extent states that
698 		 * cover our input range and don't cover too any other range.
699 		 * If we end up needing a new extent state we allocate it later.
700 		 */
701 		prealloc = alloc_extent_state(mask);
702 	}
703 
704 	spin_lock(&tree->lock);
705 	if (cached_state) {
706 		cached = *cached_state;
707 
708 		if (clear) {
709 			*cached_state = NULL;
710 			cached_state = NULL;
711 		}
712 
713 		if (cached && extent_state_in_tree(cached) &&
714 		    cached->start <= start && cached->end > start) {
715 			if (clear)
716 				refcount_dec(&cached->refs);
717 			state = cached;
718 			goto hit_next;
719 		}
720 		if (clear)
721 			free_extent_state(cached);
722 	}
723 	/*
724 	 * this search will find the extents that end after
725 	 * our range starts
726 	 */
727 	node = tree_search(tree, start);
728 	if (!node)
729 		goto out;
730 	state = rb_entry(node, struct extent_state, rb_node);
731 hit_next:
732 	if (state->start > end)
733 		goto out;
734 	WARN_ON(state->end < start);
735 	last_end = state->end;
736 
737 	/* the state doesn't have the wanted bits, go ahead */
738 	if (!(state->state & bits)) {
739 		state = next_state(state);
740 		goto next;
741 	}
742 
743 	/*
744 	 *     | ---- desired range ---- |
745 	 *  | state | or
746 	 *  | ------------- state -------------- |
747 	 *
748 	 * We need to split the extent we found, and may flip
749 	 * bits on second half.
750 	 *
751 	 * If the extent we found extends past our range, we
752 	 * just split and search again.  It'll get split again
753 	 * the next time though.
754 	 *
755 	 * If the extent we found is inside our range, we clear
756 	 * the desired bit on it.
757 	 */
758 
759 	if (state->start < start) {
760 		prealloc = alloc_extent_state_atomic(prealloc);
761 		BUG_ON(!prealloc);
762 		err = split_state(tree, state, prealloc, start);
763 		if (err)
764 			extent_io_tree_panic(tree, err);
765 
766 		prealloc = NULL;
767 		if (err)
768 			goto out;
769 		if (state->end <= end) {
770 			state = clear_state_bit(tree, state, &bits, wake,
771 						changeset);
772 			goto next;
773 		}
774 		goto search_again;
775 	}
776 	/*
777 	 * | ---- desired range ---- |
778 	 *                        | state |
779 	 * We need to split the extent, and clear the bit
780 	 * on the first half
781 	 */
782 	if (state->start <= end && state->end > end) {
783 		prealloc = alloc_extent_state_atomic(prealloc);
784 		BUG_ON(!prealloc);
785 		err = split_state(tree, state, prealloc, end + 1);
786 		if (err)
787 			extent_io_tree_panic(tree, err);
788 
789 		if (wake)
790 			wake_up(&state->wq);
791 
792 		clear_state_bit(tree, prealloc, &bits, wake, changeset);
793 
794 		prealloc = NULL;
795 		goto out;
796 	}
797 
798 	state = clear_state_bit(tree, state, &bits, wake, changeset);
799 next:
800 	if (last_end == (u64)-1)
801 		goto out;
802 	start = last_end + 1;
803 	if (start <= end && state && !need_resched())
804 		goto hit_next;
805 
806 search_again:
807 	if (start > end)
808 		goto out;
809 	spin_unlock(&tree->lock);
810 	if (gfpflags_allow_blocking(mask))
811 		cond_resched();
812 	goto again;
813 
814 out:
815 	spin_unlock(&tree->lock);
816 	if (prealloc)
817 		free_extent_state(prealloc);
818 
819 	return 0;
820 
821 }
822 
wait_on_state(struct extent_io_tree * tree,struct extent_state * state)823 static void wait_on_state(struct extent_io_tree *tree,
824 			  struct extent_state *state)
825 		__releases(tree->lock)
826 		__acquires(tree->lock)
827 {
828 	DEFINE_WAIT(wait);
829 	prepare_to_wait(&state->wq, &wait, TASK_UNINTERRUPTIBLE);
830 	spin_unlock(&tree->lock);
831 	schedule();
832 	spin_lock(&tree->lock);
833 	finish_wait(&state->wq, &wait);
834 }
835 
836 /*
837  * waits for one or more bits to clear on a range in the state tree.
838  * The range [start, end] is inclusive.
839  * The tree lock is taken by this function
840  */
wait_extent_bit(struct extent_io_tree * tree,u64 start,u64 end,unsigned long bits)841 static void wait_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
842 			    unsigned long bits)
843 {
844 	struct extent_state *state;
845 	struct rb_node *node;
846 
847 	btrfs_debug_check_extent_io_range(tree, start, end);
848 
849 	spin_lock(&tree->lock);
850 again:
851 	while (1) {
852 		/*
853 		 * this search will find all the extents that end after
854 		 * our range starts
855 		 */
856 		node = tree_search(tree, start);
857 process_node:
858 		if (!node)
859 			break;
860 
861 		state = rb_entry(node, struct extent_state, rb_node);
862 
863 		if (state->start > end)
864 			goto out;
865 
866 		if (state->state & bits) {
867 			start = state->start;
868 			refcount_inc(&state->refs);
869 			wait_on_state(tree, state);
870 			free_extent_state(state);
871 			goto again;
872 		}
873 		start = state->end + 1;
874 
875 		if (start > end)
876 			break;
877 
878 		if (!cond_resched_lock(&tree->lock)) {
879 			node = rb_next(node);
880 			goto process_node;
881 		}
882 	}
883 out:
884 	spin_unlock(&tree->lock);
885 }
886 
set_state_bits(struct extent_io_tree * tree,struct extent_state * state,unsigned * bits,struct extent_changeset * changeset)887 static void set_state_bits(struct extent_io_tree *tree,
888 			   struct extent_state *state,
889 			   unsigned *bits, struct extent_changeset *changeset)
890 {
891 	unsigned bits_to_set = *bits & ~EXTENT_CTLBITS;
892 	int ret;
893 
894 	if (tree->private_data && is_data_inode(tree->private_data))
895 		btrfs_set_delalloc_extent(tree->private_data, state, bits);
896 
897 	if ((bits_to_set & EXTENT_DIRTY) && !(state->state & EXTENT_DIRTY)) {
898 		u64 range = state->end - state->start + 1;
899 		tree->dirty_bytes += range;
900 	}
901 	ret = add_extent_changeset(state, bits_to_set, changeset, 1);
902 	BUG_ON(ret < 0);
903 	state->state |= bits_to_set;
904 }
905 
cache_state_if_flags(struct extent_state * state,struct extent_state ** cached_ptr,unsigned flags)906 static void cache_state_if_flags(struct extent_state *state,
907 				 struct extent_state **cached_ptr,
908 				 unsigned flags)
909 {
910 	if (cached_ptr && !(*cached_ptr)) {
911 		if (!flags || (state->state & flags)) {
912 			*cached_ptr = state;
913 			refcount_inc(&state->refs);
914 		}
915 	}
916 }
917 
cache_state(struct extent_state * state,struct extent_state ** cached_ptr)918 static void cache_state(struct extent_state *state,
919 			struct extent_state **cached_ptr)
920 {
921 	return cache_state_if_flags(state, cached_ptr,
922 				    EXTENT_LOCKED | EXTENT_BOUNDARY);
923 }
924 
925 /*
926  * set some bits on a range in the tree.  This may require allocations or
927  * sleeping, so the gfp mask is used to indicate what is allowed.
928  *
929  * If any of the exclusive bits are set, this will fail with -EEXIST if some
930  * part of the range already has the desired bits set.  The start of the
931  * existing range is returned in failed_start in this case.
932  *
933  * [start, end] is inclusive This takes the tree lock.
934  */
935 
936 static int __must_check
__set_extent_bit(struct extent_io_tree * tree,u64 start,u64 end,unsigned bits,unsigned exclusive_bits,u64 * failed_start,struct extent_state ** cached_state,gfp_t mask,struct extent_changeset * changeset)937 __set_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
938 		 unsigned bits, unsigned exclusive_bits,
939 		 u64 *failed_start, struct extent_state **cached_state,
940 		 gfp_t mask, struct extent_changeset *changeset)
941 {
942 	struct extent_state *state;
943 	struct extent_state *prealloc = NULL;
944 	struct rb_node *node;
945 	struct rb_node **p;
946 	struct rb_node *parent;
947 	int err = 0;
948 	u64 last_start;
949 	u64 last_end;
950 
951 	btrfs_debug_check_extent_io_range(tree, start, end);
952 	trace_btrfs_set_extent_bit(tree, start, end - start + 1, bits);
953 
954 again:
955 	if (!prealloc && gfpflags_allow_blocking(mask)) {
956 		/*
957 		 * Don't care for allocation failure here because we might end
958 		 * up not needing the pre-allocated extent state at all, which
959 		 * is the case if we only have in the tree extent states that
960 		 * cover our input range and don't cover too any other range.
961 		 * If we end up needing a new extent state we allocate it later.
962 		 */
963 		prealloc = alloc_extent_state(mask);
964 	}
965 
966 	spin_lock(&tree->lock);
967 	if (cached_state && *cached_state) {
968 		state = *cached_state;
969 		if (state->start <= start && state->end > start &&
970 		    extent_state_in_tree(state)) {
971 			node = &state->rb_node;
972 			goto hit_next;
973 		}
974 	}
975 	/*
976 	 * this search will find all the extents that end after
977 	 * our range starts.
978 	 */
979 	node = tree_search_for_insert(tree, start, &p, &parent);
980 	if (!node) {
981 		prealloc = alloc_extent_state_atomic(prealloc);
982 		BUG_ON(!prealloc);
983 		err = insert_state(tree, prealloc, start, end,
984 				   &p, &parent, &bits, changeset);
985 		if (err)
986 			extent_io_tree_panic(tree, err);
987 
988 		cache_state(prealloc, cached_state);
989 		prealloc = NULL;
990 		goto out;
991 	}
992 	state = rb_entry(node, struct extent_state, rb_node);
993 hit_next:
994 	last_start = state->start;
995 	last_end = state->end;
996 
997 	/*
998 	 * | ---- desired range ---- |
999 	 * | state |
1000 	 *
1001 	 * Just lock what we found and keep going
1002 	 */
1003 	if (state->start == start && state->end <= end) {
1004 		if (state->state & exclusive_bits) {
1005 			*failed_start = state->start;
1006 			err = -EEXIST;
1007 			goto out;
1008 		}
1009 
1010 		set_state_bits(tree, state, &bits, changeset);
1011 		cache_state(state, cached_state);
1012 		merge_state(tree, state);
1013 		if (last_end == (u64)-1)
1014 			goto out;
1015 		start = last_end + 1;
1016 		state = next_state(state);
1017 		if (start < end && state && state->start == start &&
1018 		    !need_resched())
1019 			goto hit_next;
1020 		goto search_again;
1021 	}
1022 
1023 	/*
1024 	 *     | ---- desired range ---- |
1025 	 * | state |
1026 	 *   or
1027 	 * | ------------- state -------------- |
1028 	 *
1029 	 * We need to split the extent we found, and may flip bits on
1030 	 * second half.
1031 	 *
1032 	 * If the extent we found extends past our
1033 	 * range, we just split and search again.  It'll get split
1034 	 * again the next time though.
1035 	 *
1036 	 * If the extent we found is inside our range, we set the
1037 	 * desired bit on it.
1038 	 */
1039 	if (state->start < start) {
1040 		if (state->state & exclusive_bits) {
1041 			*failed_start = start;
1042 			err = -EEXIST;
1043 			goto out;
1044 		}
1045 
1046 		prealloc = alloc_extent_state_atomic(prealloc);
1047 		BUG_ON(!prealloc);
1048 		err = split_state(tree, state, prealloc, start);
1049 		if (err)
1050 			extent_io_tree_panic(tree, err);
1051 
1052 		prealloc = NULL;
1053 		if (err)
1054 			goto out;
1055 		if (state->end <= end) {
1056 			set_state_bits(tree, state, &bits, changeset);
1057 			cache_state(state, cached_state);
1058 			merge_state(tree, state);
1059 			if (last_end == (u64)-1)
1060 				goto out;
1061 			start = last_end + 1;
1062 			state = next_state(state);
1063 			if (start < end && state && state->start == start &&
1064 			    !need_resched())
1065 				goto hit_next;
1066 		}
1067 		goto search_again;
1068 	}
1069 	/*
1070 	 * | ---- desired range ---- |
1071 	 *     | state | or               | state |
1072 	 *
1073 	 * There's a hole, we need to insert something in it and
1074 	 * ignore the extent we found.
1075 	 */
1076 	if (state->start > start) {
1077 		u64 this_end;
1078 		if (end < last_start)
1079 			this_end = end;
1080 		else
1081 			this_end = last_start - 1;
1082 
1083 		prealloc = alloc_extent_state_atomic(prealloc);
1084 		BUG_ON(!prealloc);
1085 
1086 		/*
1087 		 * Avoid to free 'prealloc' if it can be merged with
1088 		 * the later extent.
1089 		 */
1090 		err = insert_state(tree, prealloc, start, this_end,
1091 				   NULL, NULL, &bits, changeset);
1092 		if (err)
1093 			extent_io_tree_panic(tree, err);
1094 
1095 		cache_state(prealloc, cached_state);
1096 		prealloc = NULL;
1097 		start = this_end + 1;
1098 		goto search_again;
1099 	}
1100 	/*
1101 	 * | ---- desired range ---- |
1102 	 *                        | state |
1103 	 * We need to split the extent, and set the bit
1104 	 * on the first half
1105 	 */
1106 	if (state->start <= end && state->end > end) {
1107 		if (state->state & exclusive_bits) {
1108 			*failed_start = start;
1109 			err = -EEXIST;
1110 			goto out;
1111 		}
1112 
1113 		prealloc = alloc_extent_state_atomic(prealloc);
1114 		BUG_ON(!prealloc);
1115 		err = split_state(tree, state, prealloc, end + 1);
1116 		if (err)
1117 			extent_io_tree_panic(tree, err);
1118 
1119 		set_state_bits(tree, prealloc, &bits, changeset);
1120 		cache_state(prealloc, cached_state);
1121 		merge_state(tree, prealloc);
1122 		prealloc = NULL;
1123 		goto out;
1124 	}
1125 
1126 search_again:
1127 	if (start > end)
1128 		goto out;
1129 	spin_unlock(&tree->lock);
1130 	if (gfpflags_allow_blocking(mask))
1131 		cond_resched();
1132 	goto again;
1133 
1134 out:
1135 	spin_unlock(&tree->lock);
1136 	if (prealloc)
1137 		free_extent_state(prealloc);
1138 
1139 	return err;
1140 
1141 }
1142 
set_extent_bit(struct extent_io_tree * tree,u64 start,u64 end,unsigned bits,u64 * failed_start,struct extent_state ** cached_state,gfp_t mask)1143 int set_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1144 		   unsigned bits, u64 * failed_start,
1145 		   struct extent_state **cached_state, gfp_t mask)
1146 {
1147 	return __set_extent_bit(tree, start, end, bits, 0, failed_start,
1148 				cached_state, mask, NULL);
1149 }
1150 
1151 
1152 /**
1153  * convert_extent_bit - convert all bits in a given range from one bit to
1154  * 			another
1155  * @tree:	the io tree to search
1156  * @start:	the start offset in bytes
1157  * @end:	the end offset in bytes (inclusive)
1158  * @bits:	the bits to set in this range
1159  * @clear_bits:	the bits to clear in this range
1160  * @cached_state:	state that we're going to cache
1161  *
1162  * This will go through and set bits for the given range.  If any states exist
1163  * already in this range they are set with the given bit and cleared of the
1164  * clear_bits.  This is only meant to be used by things that are mergeable, ie
1165  * converting from say DELALLOC to DIRTY.  This is not meant to be used with
1166  * boundary bits like LOCK.
1167  *
1168  * All allocations are done with GFP_NOFS.
1169  */
convert_extent_bit(struct extent_io_tree * tree,u64 start,u64 end,unsigned bits,unsigned clear_bits,struct extent_state ** cached_state)1170 int convert_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1171 		       unsigned bits, unsigned clear_bits,
1172 		       struct extent_state **cached_state)
1173 {
1174 	struct extent_state *state;
1175 	struct extent_state *prealloc = NULL;
1176 	struct rb_node *node;
1177 	struct rb_node **p;
1178 	struct rb_node *parent;
1179 	int err = 0;
1180 	u64 last_start;
1181 	u64 last_end;
1182 	bool first_iteration = true;
1183 
1184 	btrfs_debug_check_extent_io_range(tree, start, end);
1185 	trace_btrfs_convert_extent_bit(tree, start, end - start + 1, bits,
1186 				       clear_bits);
1187 
1188 again:
1189 	if (!prealloc) {
1190 		/*
1191 		 * Best effort, don't worry if extent state allocation fails
1192 		 * here for the first iteration. We might have a cached state
1193 		 * that matches exactly the target range, in which case no
1194 		 * extent state allocations are needed. We'll only know this
1195 		 * after locking the tree.
1196 		 */
1197 		prealloc = alloc_extent_state(GFP_NOFS);
1198 		if (!prealloc && !first_iteration)
1199 			return -ENOMEM;
1200 	}
1201 
1202 	spin_lock(&tree->lock);
1203 	if (cached_state && *cached_state) {
1204 		state = *cached_state;
1205 		if (state->start <= start && state->end > start &&
1206 		    extent_state_in_tree(state)) {
1207 			node = &state->rb_node;
1208 			goto hit_next;
1209 		}
1210 	}
1211 
1212 	/*
1213 	 * this search will find all the extents that end after
1214 	 * our range starts.
1215 	 */
1216 	node = tree_search_for_insert(tree, start, &p, &parent);
1217 	if (!node) {
1218 		prealloc = alloc_extent_state_atomic(prealloc);
1219 		if (!prealloc) {
1220 			err = -ENOMEM;
1221 			goto out;
1222 		}
1223 		err = insert_state(tree, prealloc, start, end,
1224 				   &p, &parent, &bits, NULL);
1225 		if (err)
1226 			extent_io_tree_panic(tree, err);
1227 		cache_state(prealloc, cached_state);
1228 		prealloc = NULL;
1229 		goto out;
1230 	}
1231 	state = rb_entry(node, struct extent_state, rb_node);
1232 hit_next:
1233 	last_start = state->start;
1234 	last_end = state->end;
1235 
1236 	/*
1237 	 * | ---- desired range ---- |
1238 	 * | state |
1239 	 *
1240 	 * Just lock what we found and keep going
1241 	 */
1242 	if (state->start == start && state->end <= end) {
1243 		set_state_bits(tree, state, &bits, NULL);
1244 		cache_state(state, cached_state);
1245 		state = clear_state_bit(tree, state, &clear_bits, 0, NULL);
1246 		if (last_end == (u64)-1)
1247 			goto out;
1248 		start = last_end + 1;
1249 		if (start < end && state && state->start == start &&
1250 		    !need_resched())
1251 			goto hit_next;
1252 		goto search_again;
1253 	}
1254 
1255 	/*
1256 	 *     | ---- desired range ---- |
1257 	 * | state |
1258 	 *   or
1259 	 * | ------------- state -------------- |
1260 	 *
1261 	 * We need to split the extent we found, and may flip bits on
1262 	 * second half.
1263 	 *
1264 	 * If the extent we found extends past our
1265 	 * range, we just split and search again.  It'll get split
1266 	 * again the next time though.
1267 	 *
1268 	 * If the extent we found is inside our range, we set the
1269 	 * desired bit on it.
1270 	 */
1271 	if (state->start < start) {
1272 		prealloc = alloc_extent_state_atomic(prealloc);
1273 		if (!prealloc) {
1274 			err = -ENOMEM;
1275 			goto out;
1276 		}
1277 		err = split_state(tree, state, prealloc, start);
1278 		if (err)
1279 			extent_io_tree_panic(tree, err);
1280 		prealloc = NULL;
1281 		if (err)
1282 			goto out;
1283 		if (state->end <= end) {
1284 			set_state_bits(tree, state, &bits, NULL);
1285 			cache_state(state, cached_state);
1286 			state = clear_state_bit(tree, state, &clear_bits, 0,
1287 						NULL);
1288 			if (last_end == (u64)-1)
1289 				goto out;
1290 			start = last_end + 1;
1291 			if (start < end && state && state->start == start &&
1292 			    !need_resched())
1293 				goto hit_next;
1294 		}
1295 		goto search_again;
1296 	}
1297 	/*
1298 	 * | ---- desired range ---- |
1299 	 *     | state | or               | state |
1300 	 *
1301 	 * There's a hole, we need to insert something in it and
1302 	 * ignore the extent we found.
1303 	 */
1304 	if (state->start > start) {
1305 		u64 this_end;
1306 		if (end < last_start)
1307 			this_end = end;
1308 		else
1309 			this_end = last_start - 1;
1310 
1311 		prealloc = alloc_extent_state_atomic(prealloc);
1312 		if (!prealloc) {
1313 			err = -ENOMEM;
1314 			goto out;
1315 		}
1316 
1317 		/*
1318 		 * Avoid to free 'prealloc' if it can be merged with
1319 		 * the later extent.
1320 		 */
1321 		err = insert_state(tree, prealloc, start, this_end,
1322 				   NULL, NULL, &bits, NULL);
1323 		if (err)
1324 			extent_io_tree_panic(tree, err);
1325 		cache_state(prealloc, cached_state);
1326 		prealloc = NULL;
1327 		start = this_end + 1;
1328 		goto search_again;
1329 	}
1330 	/*
1331 	 * | ---- desired range ---- |
1332 	 *                        | state |
1333 	 * We need to split the extent, and set the bit
1334 	 * on the first half
1335 	 */
1336 	if (state->start <= end && state->end > end) {
1337 		prealloc = alloc_extent_state_atomic(prealloc);
1338 		if (!prealloc) {
1339 			err = -ENOMEM;
1340 			goto out;
1341 		}
1342 
1343 		err = split_state(tree, state, prealloc, end + 1);
1344 		if (err)
1345 			extent_io_tree_panic(tree, err);
1346 
1347 		set_state_bits(tree, prealloc, &bits, NULL);
1348 		cache_state(prealloc, cached_state);
1349 		clear_state_bit(tree, prealloc, &clear_bits, 0, NULL);
1350 		prealloc = NULL;
1351 		goto out;
1352 	}
1353 
1354 search_again:
1355 	if (start > end)
1356 		goto out;
1357 	spin_unlock(&tree->lock);
1358 	cond_resched();
1359 	first_iteration = false;
1360 	goto again;
1361 
1362 out:
1363 	spin_unlock(&tree->lock);
1364 	if (prealloc)
1365 		free_extent_state(prealloc);
1366 
1367 	return err;
1368 }
1369 
1370 /* wrappers around set/clear extent bit */
set_record_extent_bits(struct extent_io_tree * tree,u64 start,u64 end,unsigned bits,struct extent_changeset * changeset)1371 int set_record_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1372 			   unsigned bits, struct extent_changeset *changeset)
1373 {
1374 	/*
1375 	 * We don't support EXTENT_LOCKED yet, as current changeset will
1376 	 * record any bits changed, so for EXTENT_LOCKED case, it will
1377 	 * either fail with -EEXIST or changeset will record the whole
1378 	 * range.
1379 	 */
1380 	BUG_ON(bits & EXTENT_LOCKED);
1381 
1382 	return __set_extent_bit(tree, start, end, bits, 0, NULL, NULL, GFP_NOFS,
1383 				changeset);
1384 }
1385 
set_extent_bits_nowait(struct extent_io_tree * tree,u64 start,u64 end,unsigned bits)1386 int set_extent_bits_nowait(struct extent_io_tree *tree, u64 start, u64 end,
1387 			   unsigned bits)
1388 {
1389 	return __set_extent_bit(tree, start, end, bits, 0, NULL, NULL,
1390 				GFP_NOWAIT, NULL);
1391 }
1392 
clear_extent_bit(struct extent_io_tree * tree,u64 start,u64 end,unsigned bits,int wake,int delete,struct extent_state ** cached)1393 int clear_extent_bit(struct extent_io_tree *tree, u64 start, u64 end,
1394 		     unsigned bits, int wake, int delete,
1395 		     struct extent_state **cached)
1396 {
1397 	return __clear_extent_bit(tree, start, end, bits, wake, delete,
1398 				  cached, GFP_NOFS, NULL);
1399 }
1400 
clear_record_extent_bits(struct extent_io_tree * tree,u64 start,u64 end,unsigned bits,struct extent_changeset * changeset)1401 int clear_record_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1402 		unsigned bits, struct extent_changeset *changeset)
1403 {
1404 	/*
1405 	 * Don't support EXTENT_LOCKED case, same reason as
1406 	 * set_record_extent_bits().
1407 	 */
1408 	BUG_ON(bits & EXTENT_LOCKED);
1409 
1410 	return __clear_extent_bit(tree, start, end, bits, 0, 0, NULL, GFP_NOFS,
1411 				  changeset);
1412 }
1413 
1414 /*
1415  * either insert or lock state struct between start and end use mask to tell
1416  * us if waiting is desired.
1417  */
lock_extent_bits(struct extent_io_tree * tree,u64 start,u64 end,struct extent_state ** cached_state)1418 int lock_extent_bits(struct extent_io_tree *tree, u64 start, u64 end,
1419 		     struct extent_state **cached_state)
1420 {
1421 	int err;
1422 	u64 failed_start;
1423 
1424 	while (1) {
1425 		err = __set_extent_bit(tree, start, end, EXTENT_LOCKED,
1426 				       EXTENT_LOCKED, &failed_start,
1427 				       cached_state, GFP_NOFS, NULL);
1428 		if (err == -EEXIST) {
1429 			wait_extent_bit(tree, failed_start, end, EXTENT_LOCKED);
1430 			start = failed_start;
1431 		} else
1432 			break;
1433 		WARN_ON(start > end);
1434 	}
1435 	return err;
1436 }
1437 
try_lock_extent(struct extent_io_tree * tree,u64 start,u64 end)1438 int try_lock_extent(struct extent_io_tree *tree, u64 start, u64 end)
1439 {
1440 	int err;
1441 	u64 failed_start;
1442 
1443 	err = __set_extent_bit(tree, start, end, EXTENT_LOCKED, EXTENT_LOCKED,
1444 			       &failed_start, NULL, GFP_NOFS, NULL);
1445 	if (err == -EEXIST) {
1446 		if (failed_start > start)
1447 			clear_extent_bit(tree, start, failed_start - 1,
1448 					 EXTENT_LOCKED, 1, 0, NULL);
1449 		return 0;
1450 	}
1451 	return 1;
1452 }
1453 
extent_range_clear_dirty_for_io(struct inode * inode,u64 start,u64 end)1454 void extent_range_clear_dirty_for_io(struct inode *inode, u64 start, u64 end)
1455 {
1456 	unsigned long index = start >> PAGE_SHIFT;
1457 	unsigned long end_index = end >> PAGE_SHIFT;
1458 	struct page *page;
1459 
1460 	while (index <= end_index) {
1461 		page = find_get_page(inode->i_mapping, index);
1462 		BUG_ON(!page); /* Pages should be in the extent_io_tree */
1463 		clear_page_dirty_for_io(page);
1464 		put_page(page);
1465 		index++;
1466 	}
1467 }
1468 
extent_range_redirty_for_io(struct inode * inode,u64 start,u64 end)1469 void extent_range_redirty_for_io(struct inode *inode, u64 start, u64 end)
1470 {
1471 	unsigned long index = start >> PAGE_SHIFT;
1472 	unsigned long end_index = end >> PAGE_SHIFT;
1473 	struct page *page;
1474 
1475 	while (index <= end_index) {
1476 		page = find_get_page(inode->i_mapping, index);
1477 		BUG_ON(!page); /* Pages should be in the extent_io_tree */
1478 		__set_page_dirty_nobuffers(page);
1479 		account_page_redirty(page);
1480 		put_page(page);
1481 		index++;
1482 	}
1483 }
1484 
1485 /* find the first state struct with 'bits' set after 'start', and
1486  * return it.  tree->lock must be held.  NULL will returned if
1487  * nothing was found after 'start'
1488  */
1489 static struct extent_state *
find_first_extent_bit_state(struct extent_io_tree * tree,u64 start,unsigned bits)1490 find_first_extent_bit_state(struct extent_io_tree *tree,
1491 			    u64 start, unsigned bits)
1492 {
1493 	struct rb_node *node;
1494 	struct extent_state *state;
1495 
1496 	/*
1497 	 * this search will find all the extents that end after
1498 	 * our range starts.
1499 	 */
1500 	node = tree_search(tree, start);
1501 	if (!node)
1502 		goto out;
1503 
1504 	while (1) {
1505 		state = rb_entry(node, struct extent_state, rb_node);
1506 		if (state->end >= start && (state->state & bits))
1507 			return state;
1508 
1509 		node = rb_next(node);
1510 		if (!node)
1511 			break;
1512 	}
1513 out:
1514 	return NULL;
1515 }
1516 
1517 /*
1518  * find the first offset in the io tree with 'bits' set. zero is
1519  * returned if we find something, and *start_ret and *end_ret are
1520  * set to reflect the state struct that was found.
1521  *
1522  * If nothing was found, 1 is returned. If found something, return 0.
1523  */
find_first_extent_bit(struct extent_io_tree * tree,u64 start,u64 * start_ret,u64 * end_ret,unsigned bits,struct extent_state ** cached_state)1524 int find_first_extent_bit(struct extent_io_tree *tree, u64 start,
1525 			  u64 *start_ret, u64 *end_ret, unsigned bits,
1526 			  struct extent_state **cached_state)
1527 {
1528 	struct extent_state *state;
1529 	int ret = 1;
1530 
1531 	spin_lock(&tree->lock);
1532 	if (cached_state && *cached_state) {
1533 		state = *cached_state;
1534 		if (state->end == start - 1 && extent_state_in_tree(state)) {
1535 			while ((state = next_state(state)) != NULL) {
1536 				if (state->state & bits)
1537 					goto got_it;
1538 			}
1539 			free_extent_state(*cached_state);
1540 			*cached_state = NULL;
1541 			goto out;
1542 		}
1543 		free_extent_state(*cached_state);
1544 		*cached_state = NULL;
1545 	}
1546 
1547 	state = find_first_extent_bit_state(tree, start, bits);
1548 got_it:
1549 	if (state) {
1550 		cache_state_if_flags(state, cached_state, 0);
1551 		*start_ret = state->start;
1552 		*end_ret = state->end;
1553 		ret = 0;
1554 	}
1555 out:
1556 	spin_unlock(&tree->lock);
1557 	return ret;
1558 }
1559 
1560 /**
1561  * find_first_clear_extent_bit - find the first range that has @bits not set.
1562  * This range could start before @start.
1563  *
1564  * @tree - the tree to search
1565  * @start - the offset at/after which the found extent should start
1566  * @start_ret - records the beginning of the range
1567  * @end_ret - records the end of the range (inclusive)
1568  * @bits - the set of bits which must be unset
1569  *
1570  * Since unallocated range is also considered one which doesn't have the bits
1571  * set it's possible that @end_ret contains -1, this happens in case the range
1572  * spans (last_range_end, end of device]. In this case it's up to the caller to
1573  * trim @end_ret to the appropriate size.
1574  */
find_first_clear_extent_bit(struct extent_io_tree * tree,u64 start,u64 * start_ret,u64 * end_ret,unsigned bits)1575 void find_first_clear_extent_bit(struct extent_io_tree *tree, u64 start,
1576 				 u64 *start_ret, u64 *end_ret, unsigned bits)
1577 {
1578 	struct extent_state *state;
1579 	struct rb_node *node, *prev = NULL, *next;
1580 
1581 	spin_lock(&tree->lock);
1582 
1583 	/* Find first extent with bits cleared */
1584 	while (1) {
1585 		node = __etree_search(tree, start, &next, &prev, NULL, NULL);
1586 		if (!node) {
1587 			node = next;
1588 			if (!node) {
1589 				/*
1590 				 * We are past the last allocated chunk,
1591 				 * set start at the end of the last extent. The
1592 				 * device alloc tree should never be empty so
1593 				 * prev is always set.
1594 				 */
1595 				ASSERT(prev);
1596 				state = rb_entry(prev, struct extent_state, rb_node);
1597 				*start_ret = state->end + 1;
1598 				*end_ret = -1;
1599 				goto out;
1600 			}
1601 		}
1602 		/*
1603 		 * At this point 'node' either contains 'start' or start is
1604 		 * before 'node'
1605 		 */
1606 		state = rb_entry(node, struct extent_state, rb_node);
1607 
1608 		if (in_range(start, state->start, state->end - state->start + 1)) {
1609 			if (state->state & bits) {
1610 				/*
1611 				 * |--range with bits sets--|
1612 				 *    |
1613 				 *    start
1614 				 */
1615 				start = state->end + 1;
1616 			} else {
1617 				/*
1618 				 * 'start' falls within a range that doesn't
1619 				 * have the bits set, so take its start as
1620 				 * the beginning of the desired range
1621 				 *
1622 				 * |--range with bits cleared----|
1623 				 *      |
1624 				 *      start
1625 				 */
1626 				*start_ret = state->start;
1627 				break;
1628 			}
1629 		} else {
1630 			/*
1631 			 * |---prev range---|---hole/unset---|---node range---|
1632 			 *                          |
1633 			 *                        start
1634 			 *
1635 			 *                        or
1636 			 *
1637 			 * |---hole/unset--||--first node--|
1638 			 * 0   |
1639 			 *    start
1640 			 */
1641 			if (prev) {
1642 				state = rb_entry(prev, struct extent_state,
1643 						 rb_node);
1644 				*start_ret = state->end + 1;
1645 			} else {
1646 				*start_ret = 0;
1647 			}
1648 			break;
1649 		}
1650 	}
1651 
1652 	/*
1653 	 * Find the longest stretch from start until an entry which has the
1654 	 * bits set
1655 	 */
1656 	while (1) {
1657 		state = rb_entry(node, struct extent_state, rb_node);
1658 		if (state->end >= start && !(state->state & bits)) {
1659 			*end_ret = state->end;
1660 		} else {
1661 			*end_ret = state->start - 1;
1662 			break;
1663 		}
1664 
1665 		node = rb_next(node);
1666 		if (!node)
1667 			break;
1668 	}
1669 out:
1670 	spin_unlock(&tree->lock);
1671 }
1672 
1673 /*
1674  * find a contiguous range of bytes in the file marked as delalloc, not
1675  * more than 'max_bytes'.  start and end are used to return the range,
1676  *
1677  * true is returned if we find something, false if nothing was in the tree
1678  */
find_delalloc_range(struct extent_io_tree * tree,u64 * start,u64 * end,u64 max_bytes,struct extent_state ** cached_state)1679 static noinline bool find_delalloc_range(struct extent_io_tree *tree,
1680 					u64 *start, u64 *end, u64 max_bytes,
1681 					struct extent_state **cached_state)
1682 {
1683 	struct rb_node *node;
1684 	struct extent_state *state;
1685 	u64 cur_start = *start;
1686 	bool found = false;
1687 	u64 total_bytes = 0;
1688 
1689 	spin_lock(&tree->lock);
1690 
1691 	/*
1692 	 * this search will find all the extents that end after
1693 	 * our range starts.
1694 	 */
1695 	node = tree_search(tree, cur_start);
1696 	if (!node) {
1697 		*end = (u64)-1;
1698 		goto out;
1699 	}
1700 
1701 	while (1) {
1702 		state = rb_entry(node, struct extent_state, rb_node);
1703 		if (found && (state->start != cur_start ||
1704 			      (state->state & EXTENT_BOUNDARY))) {
1705 			goto out;
1706 		}
1707 		if (!(state->state & EXTENT_DELALLOC)) {
1708 			if (!found)
1709 				*end = state->end;
1710 			goto out;
1711 		}
1712 		if (!found) {
1713 			*start = state->start;
1714 			*cached_state = state;
1715 			refcount_inc(&state->refs);
1716 		}
1717 		found = true;
1718 		*end = state->end;
1719 		cur_start = state->end + 1;
1720 		node = rb_next(node);
1721 		total_bytes += state->end - state->start + 1;
1722 		if (total_bytes >= max_bytes)
1723 			break;
1724 		if (!node)
1725 			break;
1726 	}
1727 out:
1728 	spin_unlock(&tree->lock);
1729 	return found;
1730 }
1731 
1732 static int __process_pages_contig(struct address_space *mapping,
1733 				  struct page *locked_page,
1734 				  pgoff_t start_index, pgoff_t end_index,
1735 				  unsigned long page_ops, pgoff_t *index_ret);
1736 
__unlock_for_delalloc(struct inode * inode,struct page * locked_page,u64 start,u64 end)1737 static noinline void __unlock_for_delalloc(struct inode *inode,
1738 					   struct page *locked_page,
1739 					   u64 start, u64 end)
1740 {
1741 	unsigned long index = start >> PAGE_SHIFT;
1742 	unsigned long end_index = end >> PAGE_SHIFT;
1743 
1744 	ASSERT(locked_page);
1745 	if (index == locked_page->index && end_index == index)
1746 		return;
1747 
1748 	__process_pages_contig(inode->i_mapping, locked_page, index, end_index,
1749 			       PAGE_UNLOCK, NULL);
1750 }
1751 
lock_delalloc_pages(struct inode * inode,struct page * locked_page,u64 delalloc_start,u64 delalloc_end)1752 static noinline int lock_delalloc_pages(struct inode *inode,
1753 					struct page *locked_page,
1754 					u64 delalloc_start,
1755 					u64 delalloc_end)
1756 {
1757 	unsigned long index = delalloc_start >> PAGE_SHIFT;
1758 	unsigned long index_ret = index;
1759 	unsigned long end_index = delalloc_end >> PAGE_SHIFT;
1760 	int ret;
1761 
1762 	ASSERT(locked_page);
1763 	if (index == locked_page->index && index == end_index)
1764 		return 0;
1765 
1766 	ret = __process_pages_contig(inode->i_mapping, locked_page, index,
1767 				     end_index, PAGE_LOCK, &index_ret);
1768 	if (ret == -EAGAIN)
1769 		__unlock_for_delalloc(inode, locked_page, delalloc_start,
1770 				      (u64)index_ret << PAGE_SHIFT);
1771 	return ret;
1772 }
1773 
1774 /*
1775  * Find and lock a contiguous range of bytes in the file marked as delalloc, no
1776  * more than @max_bytes.  @Start and @end are used to return the range,
1777  *
1778  * Return: true if we find something
1779  *         false if nothing was in the tree
1780  */
1781 EXPORT_FOR_TESTS
find_lock_delalloc_range(struct inode * inode,struct page * locked_page,u64 * start,u64 * end)1782 noinline_for_stack bool find_lock_delalloc_range(struct inode *inode,
1783 				    struct page *locked_page, u64 *start,
1784 				    u64 *end)
1785 {
1786 	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
1787 	u64 max_bytes = BTRFS_MAX_EXTENT_SIZE;
1788 	u64 delalloc_start;
1789 	u64 delalloc_end;
1790 	bool found;
1791 	struct extent_state *cached_state = NULL;
1792 	int ret;
1793 	int loops = 0;
1794 
1795 again:
1796 	/* step one, find a bunch of delalloc bytes starting at start */
1797 	delalloc_start = *start;
1798 	delalloc_end = 0;
1799 	found = find_delalloc_range(tree, &delalloc_start, &delalloc_end,
1800 				    max_bytes, &cached_state);
1801 	if (!found || delalloc_end <= *start) {
1802 		*start = delalloc_start;
1803 		*end = delalloc_end;
1804 		free_extent_state(cached_state);
1805 		return false;
1806 	}
1807 
1808 	/*
1809 	 * start comes from the offset of locked_page.  We have to lock
1810 	 * pages in order, so we can't process delalloc bytes before
1811 	 * locked_page
1812 	 */
1813 	if (delalloc_start < *start)
1814 		delalloc_start = *start;
1815 
1816 	/*
1817 	 * make sure to limit the number of pages we try to lock down
1818 	 */
1819 	if (delalloc_end + 1 - delalloc_start > max_bytes)
1820 		delalloc_end = delalloc_start + max_bytes - 1;
1821 
1822 	/* step two, lock all the pages after the page that has start */
1823 	ret = lock_delalloc_pages(inode, locked_page,
1824 				  delalloc_start, delalloc_end);
1825 	ASSERT(!ret || ret == -EAGAIN);
1826 	if (ret == -EAGAIN) {
1827 		/* some of the pages are gone, lets avoid looping by
1828 		 * shortening the size of the delalloc range we're searching
1829 		 */
1830 		free_extent_state(cached_state);
1831 		cached_state = NULL;
1832 		if (!loops) {
1833 			max_bytes = PAGE_SIZE;
1834 			loops = 1;
1835 			goto again;
1836 		} else {
1837 			found = false;
1838 			goto out_failed;
1839 		}
1840 	}
1841 
1842 	/* step three, lock the state bits for the whole range */
1843 	lock_extent_bits(tree, delalloc_start, delalloc_end, &cached_state);
1844 
1845 	/* then test to make sure it is all still delalloc */
1846 	ret = test_range_bit(tree, delalloc_start, delalloc_end,
1847 			     EXTENT_DELALLOC, 1, cached_state);
1848 	if (!ret) {
1849 		unlock_extent_cached(tree, delalloc_start, delalloc_end,
1850 				     &cached_state);
1851 		__unlock_for_delalloc(inode, locked_page,
1852 			      delalloc_start, delalloc_end);
1853 		cond_resched();
1854 		goto again;
1855 	}
1856 	free_extent_state(cached_state);
1857 	*start = delalloc_start;
1858 	*end = delalloc_end;
1859 out_failed:
1860 	return found;
1861 }
1862 
__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)1863 static int __process_pages_contig(struct address_space *mapping,
1864 				  struct page *locked_page,
1865 				  pgoff_t start_index, pgoff_t end_index,
1866 				  unsigned long page_ops, pgoff_t *index_ret)
1867 {
1868 	unsigned long nr_pages = end_index - start_index + 1;
1869 	unsigned long pages_locked = 0;
1870 	pgoff_t index = start_index;
1871 	struct page *pages[16];
1872 	unsigned ret;
1873 	int err = 0;
1874 	int i;
1875 
1876 	if (page_ops & PAGE_LOCK) {
1877 		ASSERT(page_ops == PAGE_LOCK);
1878 		ASSERT(index_ret && *index_ret == start_index);
1879 	}
1880 
1881 	if ((page_ops & PAGE_SET_ERROR) && nr_pages > 0)
1882 		mapping_set_error(mapping, -EIO);
1883 
1884 	while (nr_pages > 0) {
1885 		ret = find_get_pages_contig(mapping, index,
1886 				     min_t(unsigned long,
1887 				     nr_pages, ARRAY_SIZE(pages)), pages);
1888 		if (ret == 0) {
1889 			/*
1890 			 * Only if we're going to lock these pages,
1891 			 * can we find nothing at @index.
1892 			 */
1893 			ASSERT(page_ops & PAGE_LOCK);
1894 			err = -EAGAIN;
1895 			goto out;
1896 		}
1897 
1898 		for (i = 0; i < ret; i++) {
1899 			if (page_ops & PAGE_SET_PRIVATE2)
1900 				SetPagePrivate2(pages[i]);
1901 
1902 			if (locked_page && pages[i] == locked_page) {
1903 				put_page(pages[i]);
1904 				pages_locked++;
1905 				continue;
1906 			}
1907 			if (page_ops & PAGE_CLEAR_DIRTY)
1908 				clear_page_dirty_for_io(pages[i]);
1909 			if (page_ops & PAGE_SET_WRITEBACK)
1910 				set_page_writeback(pages[i]);
1911 			if (page_ops & PAGE_SET_ERROR)
1912 				SetPageError(pages[i]);
1913 			if (page_ops & PAGE_END_WRITEBACK)
1914 				end_page_writeback(pages[i]);
1915 			if (page_ops & PAGE_UNLOCK)
1916 				unlock_page(pages[i]);
1917 			if (page_ops & PAGE_LOCK) {
1918 				lock_page(pages[i]);
1919 				if (!PageDirty(pages[i]) ||
1920 				    pages[i]->mapping != mapping) {
1921 					unlock_page(pages[i]);
1922 					put_page(pages[i]);
1923 					err = -EAGAIN;
1924 					goto out;
1925 				}
1926 			}
1927 			put_page(pages[i]);
1928 			pages_locked++;
1929 		}
1930 		nr_pages -= ret;
1931 		index += ret;
1932 		cond_resched();
1933 	}
1934 out:
1935 	if (err && index_ret)
1936 		*index_ret = start_index + pages_locked - 1;
1937 	return err;
1938 }
1939 
extent_clear_unlock_delalloc(struct inode * inode,u64 start,u64 end,struct page * locked_page,unsigned clear_bits,unsigned long page_ops)1940 void extent_clear_unlock_delalloc(struct inode *inode, u64 start, u64 end,
1941 				  struct page *locked_page,
1942 				  unsigned clear_bits,
1943 				  unsigned long page_ops)
1944 {
1945 	clear_extent_bit(&BTRFS_I(inode)->io_tree, start, end, clear_bits, 1, 0,
1946 			 NULL);
1947 
1948 	__process_pages_contig(inode->i_mapping, locked_page,
1949 			       start >> PAGE_SHIFT, end >> PAGE_SHIFT,
1950 			       page_ops, NULL);
1951 }
1952 
1953 /*
1954  * count the number of bytes in the tree that have a given bit(s)
1955  * set.  This can be fairly slow, except for EXTENT_DIRTY which is
1956  * cached.  The total number found is returned.
1957  */
count_range_bits(struct extent_io_tree * tree,u64 * start,u64 search_end,u64 max_bytes,unsigned bits,int contig)1958 u64 count_range_bits(struct extent_io_tree *tree,
1959 		     u64 *start, u64 search_end, u64 max_bytes,
1960 		     unsigned bits, int contig)
1961 {
1962 	struct rb_node *node;
1963 	struct extent_state *state;
1964 	u64 cur_start = *start;
1965 	u64 total_bytes = 0;
1966 	u64 last = 0;
1967 	int found = 0;
1968 
1969 	if (WARN_ON(search_end <= cur_start))
1970 		return 0;
1971 
1972 	spin_lock(&tree->lock);
1973 	if (cur_start == 0 && bits == EXTENT_DIRTY) {
1974 		total_bytes = tree->dirty_bytes;
1975 		goto out;
1976 	}
1977 	/*
1978 	 * this search will find all the extents that end after
1979 	 * our range starts.
1980 	 */
1981 	node = tree_search(tree, cur_start);
1982 	if (!node)
1983 		goto out;
1984 
1985 	while (1) {
1986 		state = rb_entry(node, struct extent_state, rb_node);
1987 		if (state->start > search_end)
1988 			break;
1989 		if (contig && found && state->start > last + 1)
1990 			break;
1991 		if (state->end >= cur_start && (state->state & bits) == bits) {
1992 			total_bytes += min(search_end, state->end) + 1 -
1993 				       max(cur_start, state->start);
1994 			if (total_bytes >= max_bytes)
1995 				break;
1996 			if (!found) {
1997 				*start = max(cur_start, state->start);
1998 				found = 1;
1999 			}
2000 			last = state->end;
2001 		} else if (contig && found) {
2002 			break;
2003 		}
2004 		node = rb_next(node);
2005 		if (!node)
2006 			break;
2007 	}
2008 out:
2009 	spin_unlock(&tree->lock);
2010 	return total_bytes;
2011 }
2012 
2013 /*
2014  * set the private field for a given byte offset in the tree.  If there isn't
2015  * an extent_state there already, this does nothing.
2016  */
set_state_failrec(struct extent_io_tree * tree,u64 start,struct io_failure_record * failrec)2017 static noinline int set_state_failrec(struct extent_io_tree *tree, u64 start,
2018 		struct io_failure_record *failrec)
2019 {
2020 	struct rb_node *node;
2021 	struct extent_state *state;
2022 	int ret = 0;
2023 
2024 	spin_lock(&tree->lock);
2025 	/*
2026 	 * this search will find all the extents that end after
2027 	 * our range starts.
2028 	 */
2029 	node = tree_search(tree, start);
2030 	if (!node) {
2031 		ret = -ENOENT;
2032 		goto out;
2033 	}
2034 	state = rb_entry(node, struct extent_state, rb_node);
2035 	if (state->start != start) {
2036 		ret = -ENOENT;
2037 		goto out;
2038 	}
2039 	state->failrec = failrec;
2040 out:
2041 	spin_unlock(&tree->lock);
2042 	return ret;
2043 }
2044 
get_state_failrec(struct extent_io_tree * tree,u64 start,struct io_failure_record ** failrec)2045 static noinline int get_state_failrec(struct extent_io_tree *tree, u64 start,
2046 		struct io_failure_record **failrec)
2047 {
2048 	struct rb_node *node;
2049 	struct extent_state *state;
2050 	int ret = 0;
2051 
2052 	spin_lock(&tree->lock);
2053 	/*
2054 	 * this search will find all the extents that end after
2055 	 * our range starts.
2056 	 */
2057 	node = tree_search(tree, start);
2058 	if (!node) {
2059 		ret = -ENOENT;
2060 		goto out;
2061 	}
2062 	state = rb_entry(node, struct extent_state, rb_node);
2063 	if (state->start != start) {
2064 		ret = -ENOENT;
2065 		goto out;
2066 	}
2067 	*failrec = state->failrec;
2068 out:
2069 	spin_unlock(&tree->lock);
2070 	return ret;
2071 }
2072 
2073 /*
2074  * searches a range in the state tree for a given mask.
2075  * If 'filled' == 1, this returns 1 only if every extent in the tree
2076  * has the bits set.  Otherwise, 1 is returned if any bit in the
2077  * range is found set.
2078  */
test_range_bit(struct extent_io_tree * tree,u64 start,u64 end,unsigned bits,int filled,struct extent_state * cached)2079 int test_range_bit(struct extent_io_tree *tree, u64 start, u64 end,
2080 		   unsigned bits, int filled, struct extent_state *cached)
2081 {
2082 	struct extent_state *state = NULL;
2083 	struct rb_node *node;
2084 	int bitset = 0;
2085 
2086 	spin_lock(&tree->lock);
2087 	if (cached && extent_state_in_tree(cached) && cached->start <= start &&
2088 	    cached->end > start)
2089 		node = &cached->rb_node;
2090 	else
2091 		node = tree_search(tree, start);
2092 	while (node && start <= end) {
2093 		state = rb_entry(node, struct extent_state, rb_node);
2094 
2095 		if (filled && state->start > start) {
2096 			bitset = 0;
2097 			break;
2098 		}
2099 
2100 		if (state->start > end)
2101 			break;
2102 
2103 		if (state->state & bits) {
2104 			bitset = 1;
2105 			if (!filled)
2106 				break;
2107 		} else if (filled) {
2108 			bitset = 0;
2109 			break;
2110 		}
2111 
2112 		if (state->end == (u64)-1)
2113 			break;
2114 
2115 		start = state->end + 1;
2116 		if (start > end)
2117 			break;
2118 		node = rb_next(node);
2119 		if (!node) {
2120 			if (filled)
2121 				bitset = 0;
2122 			break;
2123 		}
2124 	}
2125 	spin_unlock(&tree->lock);
2126 	return bitset;
2127 }
2128 
2129 /*
2130  * helper function to set a given page up to date if all the
2131  * extents in the tree for that page are up to date
2132  */
check_page_uptodate(struct extent_io_tree * tree,struct page * page)2133 static void check_page_uptodate(struct extent_io_tree *tree, struct page *page)
2134 {
2135 	u64 start = page_offset(page);
2136 	u64 end = start + PAGE_SIZE - 1;
2137 	if (test_range_bit(tree, start, end, EXTENT_UPTODATE, 1, NULL))
2138 		SetPageUptodate(page);
2139 }
2140 
free_io_failure(struct extent_io_tree * failure_tree,struct extent_io_tree * io_tree,struct io_failure_record * rec)2141 int free_io_failure(struct extent_io_tree *failure_tree,
2142 		    struct extent_io_tree *io_tree,
2143 		    struct io_failure_record *rec)
2144 {
2145 	int ret;
2146 	int err = 0;
2147 
2148 	set_state_failrec(failure_tree, rec->start, NULL);
2149 	ret = clear_extent_bits(failure_tree, rec->start,
2150 				rec->start + rec->len - 1,
2151 				EXTENT_LOCKED | EXTENT_DIRTY);
2152 	if (ret)
2153 		err = ret;
2154 
2155 	ret = clear_extent_bits(io_tree, rec->start,
2156 				rec->start + rec->len - 1,
2157 				EXTENT_DAMAGED);
2158 	if (ret && !err)
2159 		err = ret;
2160 
2161 	kfree(rec);
2162 	return err;
2163 }
2164 
2165 /*
2166  * this bypasses the standard btrfs submit functions deliberately, as
2167  * the standard behavior is to write all copies in a raid setup. here we only
2168  * want to write the one bad copy. so we do the mapping for ourselves and issue
2169  * submit_bio directly.
2170  * to avoid any synchronization issues, wait for the data after writing, which
2171  * actually prevents the read that triggered the error from finishing.
2172  * currently, there can be no more than two copies of every data bit. thus,
2173  * exactly one rewrite is required.
2174  */
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)2175 int repair_io_failure(struct btrfs_fs_info *fs_info, u64 ino, u64 start,
2176 		      u64 length, u64 logical, struct page *page,
2177 		      unsigned int pg_offset, int mirror_num)
2178 {
2179 	struct bio *bio;
2180 	struct btrfs_device *dev;
2181 	u64 map_length = 0;
2182 	u64 sector;
2183 	struct btrfs_bio *bbio = NULL;
2184 	int ret;
2185 
2186 	ASSERT(!(fs_info->sb->s_flags & SB_RDONLY));
2187 	BUG_ON(!mirror_num);
2188 
2189 	bio = btrfs_io_bio_alloc(1);
2190 	bio->bi_iter.bi_size = 0;
2191 	map_length = length;
2192 
2193 	/*
2194 	 * Avoid races with device replace and make sure our bbio has devices
2195 	 * associated to its stripes that don't go away while we are doing the
2196 	 * read repair operation.
2197 	 */
2198 	btrfs_bio_counter_inc_blocked(fs_info);
2199 	if (btrfs_is_parity_mirror(fs_info, logical, length)) {
2200 		/*
2201 		 * Note that we don't use BTRFS_MAP_WRITE because it's supposed
2202 		 * to update all raid stripes, but here we just want to correct
2203 		 * bad stripe, thus BTRFS_MAP_READ is abused to only get the bad
2204 		 * stripe's dev and sector.
2205 		 */
2206 		ret = btrfs_map_block(fs_info, BTRFS_MAP_READ, logical,
2207 				      &map_length, &bbio, 0);
2208 		if (ret) {
2209 			btrfs_bio_counter_dec(fs_info);
2210 			bio_put(bio);
2211 			return -EIO;
2212 		}
2213 		ASSERT(bbio->mirror_num == 1);
2214 	} else {
2215 		ret = btrfs_map_block(fs_info, BTRFS_MAP_WRITE, logical,
2216 				      &map_length, &bbio, mirror_num);
2217 		if (ret) {
2218 			btrfs_bio_counter_dec(fs_info);
2219 			bio_put(bio);
2220 			return -EIO;
2221 		}
2222 		BUG_ON(mirror_num != bbio->mirror_num);
2223 	}
2224 
2225 	sector = bbio->stripes[bbio->mirror_num - 1].physical >> 9;
2226 	bio->bi_iter.bi_sector = sector;
2227 	dev = bbio->stripes[bbio->mirror_num - 1].dev;
2228 	btrfs_put_bbio(bbio);
2229 	if (!dev || !dev->bdev ||
2230 	    !test_bit(BTRFS_DEV_STATE_WRITEABLE, &dev->dev_state)) {
2231 		btrfs_bio_counter_dec(fs_info);
2232 		bio_put(bio);
2233 		return -EIO;
2234 	}
2235 	bio_set_dev(bio, dev->bdev);
2236 	bio->bi_opf = REQ_OP_WRITE | REQ_SYNC;
2237 	bio_add_page(bio, page, length, pg_offset);
2238 
2239 	if (btrfsic_submit_bio_wait(bio)) {
2240 		/* try to remap that extent elsewhere? */
2241 		btrfs_bio_counter_dec(fs_info);
2242 		bio_put(bio);
2243 		btrfs_dev_stat_inc_and_print(dev, BTRFS_DEV_STAT_WRITE_ERRS);
2244 		return -EIO;
2245 	}
2246 
2247 	btrfs_info_rl_in_rcu(fs_info,
2248 		"read error corrected: ino %llu off %llu (dev %s sector %llu)",
2249 				  ino, start,
2250 				  rcu_str_deref(dev->name), sector);
2251 	btrfs_bio_counter_dec(fs_info);
2252 	bio_put(bio);
2253 	return 0;
2254 }
2255 
btrfs_repair_eb_io_failure(struct extent_buffer * eb,int mirror_num)2256 int btrfs_repair_eb_io_failure(struct extent_buffer *eb, int mirror_num)
2257 {
2258 	struct btrfs_fs_info *fs_info = eb->fs_info;
2259 	u64 start = eb->start;
2260 	int i, num_pages = num_extent_pages(eb);
2261 	int ret = 0;
2262 
2263 	if (sb_rdonly(fs_info->sb))
2264 		return -EROFS;
2265 
2266 	for (i = 0; i < num_pages; i++) {
2267 		struct page *p = eb->pages[i];
2268 
2269 		ret = repair_io_failure(fs_info, 0, start, PAGE_SIZE, start, p,
2270 					start - page_offset(p), mirror_num);
2271 		if (ret)
2272 			break;
2273 		start += PAGE_SIZE;
2274 	}
2275 
2276 	return ret;
2277 }
2278 
2279 /*
2280  * each time an IO finishes, we do a fast check in the IO failure tree
2281  * to see if we need to process or clean up an io_failure_record
2282  */
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)2283 int clean_io_failure(struct btrfs_fs_info *fs_info,
2284 		     struct extent_io_tree *failure_tree,
2285 		     struct extent_io_tree *io_tree, u64 start,
2286 		     struct page *page, u64 ino, unsigned int pg_offset)
2287 {
2288 	u64 private;
2289 	struct io_failure_record *failrec;
2290 	struct extent_state *state;
2291 	int num_copies;
2292 	int ret;
2293 
2294 	private = 0;
2295 	ret = count_range_bits(failure_tree, &private, (u64)-1, 1,
2296 			       EXTENT_DIRTY, 0);
2297 	if (!ret)
2298 		return 0;
2299 
2300 	ret = get_state_failrec(failure_tree, start, &failrec);
2301 	if (ret)
2302 		return 0;
2303 
2304 	BUG_ON(!failrec->this_mirror);
2305 
2306 	if (failrec->in_validation) {
2307 		/* there was no real error, just free the record */
2308 		btrfs_debug(fs_info,
2309 			"clean_io_failure: freeing dummy error at %llu",
2310 			failrec->start);
2311 		goto out;
2312 	}
2313 	if (sb_rdonly(fs_info->sb))
2314 		goto out;
2315 
2316 	spin_lock(&io_tree->lock);
2317 	state = find_first_extent_bit_state(io_tree,
2318 					    failrec->start,
2319 					    EXTENT_LOCKED);
2320 	spin_unlock(&io_tree->lock);
2321 
2322 	if (state && state->start <= failrec->start &&
2323 	    state->end >= failrec->start + failrec->len - 1) {
2324 		num_copies = btrfs_num_copies(fs_info, failrec->logical,
2325 					      failrec->len);
2326 		if (num_copies > 1)  {
2327 			repair_io_failure(fs_info, ino, start, failrec->len,
2328 					  failrec->logical, page, pg_offset,
2329 					  failrec->failed_mirror);
2330 		}
2331 	}
2332 
2333 out:
2334 	free_io_failure(failure_tree, io_tree, failrec);
2335 
2336 	return 0;
2337 }
2338 
2339 /*
2340  * Can be called when
2341  * - hold extent lock
2342  * - under ordered extent
2343  * - the inode is freeing
2344  */
btrfs_free_io_failure_record(struct btrfs_inode * inode,u64 start,u64 end)2345 void btrfs_free_io_failure_record(struct btrfs_inode *inode, u64 start, u64 end)
2346 {
2347 	struct extent_io_tree *failure_tree = &inode->io_failure_tree;
2348 	struct io_failure_record *failrec;
2349 	struct extent_state *state, *next;
2350 
2351 	if (RB_EMPTY_ROOT(&failure_tree->state))
2352 		return;
2353 
2354 	spin_lock(&failure_tree->lock);
2355 	state = find_first_extent_bit_state(failure_tree, start, EXTENT_DIRTY);
2356 	while (state) {
2357 		if (state->start > end)
2358 			break;
2359 
2360 		ASSERT(state->end <= end);
2361 
2362 		next = next_state(state);
2363 
2364 		failrec = state->failrec;
2365 		free_extent_state(state);
2366 		kfree(failrec);
2367 
2368 		state = next;
2369 	}
2370 	spin_unlock(&failure_tree->lock);
2371 }
2372 
btrfs_get_io_failure_record(struct inode * inode,u64 start,u64 end,struct io_failure_record ** failrec_ret)2373 int btrfs_get_io_failure_record(struct inode *inode, u64 start, u64 end,
2374 		struct io_failure_record **failrec_ret)
2375 {
2376 	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2377 	struct io_failure_record *failrec;
2378 	struct extent_map *em;
2379 	struct extent_io_tree *failure_tree = &BTRFS_I(inode)->io_failure_tree;
2380 	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
2381 	struct extent_map_tree *em_tree = &BTRFS_I(inode)->extent_tree;
2382 	int ret;
2383 	u64 logical;
2384 
2385 	ret = get_state_failrec(failure_tree, start, &failrec);
2386 	if (ret) {
2387 		failrec = kzalloc(sizeof(*failrec), GFP_NOFS);
2388 		if (!failrec)
2389 			return -ENOMEM;
2390 
2391 		failrec->start = start;
2392 		failrec->len = end - start + 1;
2393 		failrec->this_mirror = 0;
2394 		failrec->bio_flags = 0;
2395 		failrec->in_validation = 0;
2396 
2397 		read_lock(&em_tree->lock);
2398 		em = lookup_extent_mapping(em_tree, start, failrec->len);
2399 		if (!em) {
2400 			read_unlock(&em_tree->lock);
2401 			kfree(failrec);
2402 			return -EIO;
2403 		}
2404 
2405 		if (em->start > start || em->start + em->len <= start) {
2406 			free_extent_map(em);
2407 			em = NULL;
2408 		}
2409 		read_unlock(&em_tree->lock);
2410 		if (!em) {
2411 			kfree(failrec);
2412 			return -EIO;
2413 		}
2414 
2415 		logical = start - em->start;
2416 		logical = em->block_start + logical;
2417 		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags)) {
2418 			logical = em->block_start;
2419 			failrec->bio_flags = EXTENT_BIO_COMPRESSED;
2420 			extent_set_compress_type(&failrec->bio_flags,
2421 						 em->compress_type);
2422 		}
2423 
2424 		btrfs_debug(fs_info,
2425 			"Get IO Failure Record: (new) logical=%llu, start=%llu, len=%llu",
2426 			logical, start, failrec->len);
2427 
2428 		failrec->logical = logical;
2429 		free_extent_map(em);
2430 
2431 		/* set the bits in the private failure tree */
2432 		ret = set_extent_bits(failure_tree, start, end,
2433 					EXTENT_LOCKED | EXTENT_DIRTY);
2434 		if (ret >= 0)
2435 			ret = set_state_failrec(failure_tree, start, failrec);
2436 		/* set the bits in the inode's tree */
2437 		if (ret >= 0)
2438 			ret = set_extent_bits(tree, start, end, EXTENT_DAMAGED);
2439 		if (ret < 0) {
2440 			kfree(failrec);
2441 			return ret;
2442 		}
2443 	} else {
2444 		btrfs_debug(fs_info,
2445 			"Get IO Failure Record: (found) logical=%llu, start=%llu, len=%llu, validation=%d",
2446 			failrec->logical, failrec->start, failrec->len,
2447 			failrec->in_validation);
2448 		/*
2449 		 * when data can be on disk more than twice, add to failrec here
2450 		 * (e.g. with a list for failed_mirror) to make
2451 		 * clean_io_failure() clean all those errors at once.
2452 		 */
2453 	}
2454 
2455 	*failrec_ret = failrec;
2456 
2457 	return 0;
2458 }
2459 
btrfs_check_repairable(struct inode * inode,unsigned failed_bio_pages,struct io_failure_record * failrec,int failed_mirror)2460 bool btrfs_check_repairable(struct inode *inode, unsigned failed_bio_pages,
2461 			   struct io_failure_record *failrec, int failed_mirror)
2462 {
2463 	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2464 	int num_copies;
2465 
2466 	num_copies = btrfs_num_copies(fs_info, failrec->logical, failrec->len);
2467 	if (num_copies == 1) {
2468 		/*
2469 		 * we only have a single copy of the data, so don't bother with
2470 		 * all the retry and error correction code that follows. no
2471 		 * matter what the error is, it is very likely to persist.
2472 		 */
2473 		btrfs_debug(fs_info,
2474 			"Check Repairable: cannot repair, num_copies=%d, next_mirror %d, failed_mirror %d",
2475 			num_copies, failrec->this_mirror, failed_mirror);
2476 		return false;
2477 	}
2478 
2479 	/*
2480 	 * there are two premises:
2481 	 *	a) deliver good data to the caller
2482 	 *	b) correct the bad sectors on disk
2483 	 */
2484 	if (failed_bio_pages > 1) {
2485 		/*
2486 		 * to fulfill b), we need to know the exact failing sectors, as
2487 		 * we don't want to rewrite any more than the failed ones. thus,
2488 		 * we need separate read requests for the failed bio
2489 		 *
2490 		 * if the following BUG_ON triggers, our validation request got
2491 		 * merged. we need separate requests for our algorithm to work.
2492 		 */
2493 		BUG_ON(failrec->in_validation);
2494 		failrec->in_validation = 1;
2495 		failrec->this_mirror = failed_mirror;
2496 	} else {
2497 		/*
2498 		 * we're ready to fulfill a) and b) alongside. get a good copy
2499 		 * of the failed sector and if we succeed, we have setup
2500 		 * everything for repair_io_failure to do the rest for us.
2501 		 */
2502 		if (failrec->in_validation) {
2503 			BUG_ON(failrec->this_mirror != failed_mirror);
2504 			failrec->in_validation = 0;
2505 			failrec->this_mirror = 0;
2506 		}
2507 		failrec->failed_mirror = failed_mirror;
2508 		failrec->this_mirror++;
2509 		if (failrec->this_mirror == failed_mirror)
2510 			failrec->this_mirror++;
2511 	}
2512 
2513 	if (failrec->this_mirror > num_copies) {
2514 		btrfs_debug(fs_info,
2515 			"Check Repairable: (fail) num_copies=%d, next_mirror %d, failed_mirror %d",
2516 			num_copies, failrec->this_mirror, failed_mirror);
2517 		return false;
2518 	}
2519 
2520 	return true;
2521 }
2522 
2523 
btrfs_create_repair_bio(struct inode * inode,struct bio * failed_bio,struct io_failure_record * failrec,struct page * page,int pg_offset,int icsum,bio_end_io_t * endio_func,void * data)2524 struct bio *btrfs_create_repair_bio(struct inode *inode, struct bio *failed_bio,
2525 				    struct io_failure_record *failrec,
2526 				    struct page *page, int pg_offset, int icsum,
2527 				    bio_end_io_t *endio_func, void *data)
2528 {
2529 	struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2530 	struct bio *bio;
2531 	struct btrfs_io_bio *btrfs_failed_bio;
2532 	struct btrfs_io_bio *btrfs_bio;
2533 
2534 	bio = btrfs_io_bio_alloc(1);
2535 	bio->bi_end_io = endio_func;
2536 	bio->bi_iter.bi_sector = failrec->logical >> 9;
2537 	bio_set_dev(bio, fs_info->fs_devices->latest_bdev);
2538 	bio->bi_iter.bi_size = 0;
2539 	bio->bi_private = data;
2540 
2541 	btrfs_failed_bio = btrfs_io_bio(failed_bio);
2542 	if (btrfs_failed_bio->csum) {
2543 		u16 csum_size = btrfs_super_csum_size(fs_info->super_copy);
2544 
2545 		btrfs_bio = btrfs_io_bio(bio);
2546 		btrfs_bio->csum = btrfs_bio->csum_inline;
2547 		icsum *= csum_size;
2548 		memcpy(btrfs_bio->csum, btrfs_failed_bio->csum + icsum,
2549 		       csum_size);
2550 	}
2551 
2552 	bio_add_page(bio, page, failrec->len, pg_offset);
2553 
2554 	return bio;
2555 }
2556 
2557 /*
2558  * This is a generic handler for readpage errors. If other copies exist, read
2559  * those and write back good data to the failed position. Does not investigate
2560  * in remapping the failed extent elsewhere, hoping the device will be smart
2561  * enough to do this as needed
2562  */
bio_readpage_error(struct bio * failed_bio,u64 phy_offset,struct page * page,u64 start,u64 end,int failed_mirror)2563 static int bio_readpage_error(struct bio *failed_bio, u64 phy_offset,
2564 			      struct page *page, u64 start, u64 end,
2565 			      int failed_mirror)
2566 {
2567 	struct io_failure_record *failrec;
2568 	struct inode *inode = page->mapping->host;
2569 	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
2570 	struct extent_io_tree *failure_tree = &BTRFS_I(inode)->io_failure_tree;
2571 	struct bio *bio;
2572 	int read_mode = 0;
2573 	blk_status_t status;
2574 	int ret;
2575 	unsigned failed_bio_pages = failed_bio->bi_iter.bi_size >> PAGE_SHIFT;
2576 
2577 	BUG_ON(bio_op(failed_bio) == REQ_OP_WRITE);
2578 
2579 	ret = btrfs_get_io_failure_record(inode, start, end, &failrec);
2580 	if (ret)
2581 		return ret;
2582 
2583 	if (!btrfs_check_repairable(inode, failed_bio_pages, failrec,
2584 				    failed_mirror)) {
2585 		free_io_failure(failure_tree, tree, failrec);
2586 		return -EIO;
2587 	}
2588 
2589 	if (failed_bio_pages > 1)
2590 		read_mode |= REQ_FAILFAST_DEV;
2591 
2592 	phy_offset >>= inode->i_sb->s_blocksize_bits;
2593 	bio = btrfs_create_repair_bio(inode, failed_bio, failrec, page,
2594 				      start - page_offset(page),
2595 				      (int)phy_offset, failed_bio->bi_end_io,
2596 				      NULL);
2597 	bio->bi_opf = REQ_OP_READ | read_mode;
2598 
2599 	btrfs_debug(btrfs_sb(inode->i_sb),
2600 		"Repair Read Error: submitting new read[%#x] to this_mirror=%d, in_validation=%d",
2601 		read_mode, failrec->this_mirror, failrec->in_validation);
2602 
2603 	status = tree->ops->submit_bio_hook(tree->private_data, bio, failrec->this_mirror,
2604 					 failrec->bio_flags);
2605 	if (status) {
2606 		free_io_failure(failure_tree, tree, failrec);
2607 		bio_put(bio);
2608 		ret = blk_status_to_errno(status);
2609 	}
2610 
2611 	return ret;
2612 }
2613 
2614 /* lots and lots of room for performance fixes in the end_bio funcs */
2615 
end_extent_writepage(struct page * page,int err,u64 start,u64 end)2616 void end_extent_writepage(struct page *page, int err, u64 start, u64 end)
2617 {
2618 	int uptodate = (err == 0);
2619 	int ret = 0;
2620 
2621 	btrfs_writepage_endio_finish_ordered(page, start, end, uptodate);
2622 
2623 	if (!uptodate) {
2624 		ClearPageUptodate(page);
2625 		SetPageError(page);
2626 		ret = err < 0 ? err : -EIO;
2627 		mapping_set_error(page->mapping, ret);
2628 	}
2629 }
2630 
2631 /*
2632  * after a writepage IO is done, we need to:
2633  * clear the uptodate bits on error
2634  * clear the writeback bits in the extent tree for this IO
2635  * end_page_writeback if the page has no more pending IO
2636  *
2637  * Scheduling is not allowed, so the extent state tree is expected
2638  * to have one and only one object corresponding to this IO.
2639  */
end_bio_extent_writepage(struct bio * bio)2640 static void end_bio_extent_writepage(struct bio *bio)
2641 {
2642 	int error = blk_status_to_errno(bio->bi_status);
2643 	struct bio_vec *bvec;
2644 	u64 start;
2645 	u64 end;
2646 	struct bvec_iter_all iter_all;
2647 
2648 	ASSERT(!bio_flagged(bio, BIO_CLONED));
2649 	bio_for_each_segment_all(bvec, bio, iter_all) {
2650 		struct page *page = bvec->bv_page;
2651 		struct inode *inode = page->mapping->host;
2652 		struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2653 
2654 		/* We always issue full-page reads, but if some block
2655 		 * in a page fails to read, blk_update_request() will
2656 		 * advance bv_offset and adjust bv_len to compensate.
2657 		 * Print a warning for nonzero offsets, and an error
2658 		 * if they don't add up to a full page.  */
2659 		if (bvec->bv_offset || bvec->bv_len != PAGE_SIZE) {
2660 			if (bvec->bv_offset + bvec->bv_len != PAGE_SIZE)
2661 				btrfs_err(fs_info,
2662 				   "partial page write in btrfs with offset %u and length %u",
2663 					bvec->bv_offset, bvec->bv_len);
2664 			else
2665 				btrfs_info(fs_info,
2666 				   "incomplete page write in btrfs with offset %u and length %u",
2667 					bvec->bv_offset, bvec->bv_len);
2668 		}
2669 
2670 		start = page_offset(page);
2671 		end = start + bvec->bv_offset + bvec->bv_len - 1;
2672 
2673 		end_extent_writepage(page, error, start, end);
2674 		end_page_writeback(page);
2675 	}
2676 
2677 	bio_put(bio);
2678 }
2679 
2680 static void
endio_readpage_release_extent(struct extent_io_tree * tree,u64 start,u64 len,int uptodate)2681 endio_readpage_release_extent(struct extent_io_tree *tree, u64 start, u64 len,
2682 			      int uptodate)
2683 {
2684 	struct extent_state *cached = NULL;
2685 	u64 end = start + len - 1;
2686 
2687 	if (uptodate && tree->track_uptodate)
2688 		set_extent_uptodate(tree, start, end, &cached, GFP_ATOMIC);
2689 	unlock_extent_cached_atomic(tree, start, end, &cached);
2690 }
2691 
2692 /*
2693  * after a readpage IO is done, we need to:
2694  * clear the uptodate bits on error
2695  * set the uptodate bits if things worked
2696  * set the page up to date if all extents in the tree are uptodate
2697  * clear the lock bit in the extent tree
2698  * unlock the page if there are no other extents locked for it
2699  *
2700  * Scheduling is not allowed, so the extent state tree is expected
2701  * to have one and only one object corresponding to this IO.
2702  */
end_bio_extent_readpage(struct bio * bio)2703 static void end_bio_extent_readpage(struct bio *bio)
2704 {
2705 	struct bio_vec *bvec;
2706 	int uptodate = !bio->bi_status;
2707 	struct btrfs_io_bio *io_bio = btrfs_io_bio(bio);
2708 	struct extent_io_tree *tree, *failure_tree;
2709 	u64 offset = 0;
2710 	u64 start;
2711 	u64 end;
2712 	u64 len;
2713 	u64 extent_start = 0;
2714 	u64 extent_len = 0;
2715 	int mirror;
2716 	int ret;
2717 	struct bvec_iter_all iter_all;
2718 
2719 	ASSERT(!bio_flagged(bio, BIO_CLONED));
2720 	bio_for_each_segment_all(bvec, bio, iter_all) {
2721 		struct page *page = bvec->bv_page;
2722 		struct inode *inode = page->mapping->host;
2723 		struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2724 		bool data_inode = btrfs_ino(BTRFS_I(inode))
2725 			!= BTRFS_BTREE_INODE_OBJECTID;
2726 
2727 		btrfs_debug(fs_info,
2728 			"end_bio_extent_readpage: bi_sector=%llu, err=%d, mirror=%u",
2729 			(u64)bio->bi_iter.bi_sector, bio->bi_status,
2730 			io_bio->mirror_num);
2731 		tree = &BTRFS_I(inode)->io_tree;
2732 		failure_tree = &BTRFS_I(inode)->io_failure_tree;
2733 
2734 		/* We always issue full-page reads, but if some block
2735 		 * in a page fails to read, blk_update_request() will
2736 		 * advance bv_offset and adjust bv_len to compensate.
2737 		 * Print a warning for nonzero offsets, and an error
2738 		 * if they don't add up to a full page.  */
2739 		if (bvec->bv_offset || bvec->bv_len != PAGE_SIZE) {
2740 			if (bvec->bv_offset + bvec->bv_len != PAGE_SIZE)
2741 				btrfs_err(fs_info,
2742 					"partial page read in btrfs with offset %u and length %u",
2743 					bvec->bv_offset, bvec->bv_len);
2744 			else
2745 				btrfs_info(fs_info,
2746 					"incomplete page read in btrfs with offset %u and length %u",
2747 					bvec->bv_offset, bvec->bv_len);
2748 		}
2749 
2750 		start = page_offset(page);
2751 		end = start + bvec->bv_offset + bvec->bv_len - 1;
2752 		len = bvec->bv_len;
2753 
2754 		mirror = io_bio->mirror_num;
2755 		if (likely(uptodate)) {
2756 			ret = tree->ops->readpage_end_io_hook(io_bio, offset,
2757 							      page, start, end,
2758 							      mirror);
2759 			if (ret)
2760 				uptodate = 0;
2761 			else
2762 				clean_io_failure(BTRFS_I(inode)->root->fs_info,
2763 						 failure_tree, tree, start,
2764 						 page,
2765 						 btrfs_ino(BTRFS_I(inode)), 0);
2766 		}
2767 
2768 		if (likely(uptodate))
2769 			goto readpage_ok;
2770 
2771 		if (data_inode) {
2772 
2773 			/*
2774 			 * The generic bio_readpage_error handles errors the
2775 			 * following way: If possible, new read requests are
2776 			 * created and submitted and will end up in
2777 			 * end_bio_extent_readpage as well (if we're lucky,
2778 			 * not in the !uptodate case). In that case it returns
2779 			 * 0 and we just go on with the next page in our bio.
2780 			 * If it can't handle the error it will return -EIO and
2781 			 * we remain responsible for that page.
2782 			 */
2783 			ret = bio_readpage_error(bio, offset, page, start, end,
2784 						 mirror);
2785 			if (ret == 0) {
2786 				uptodate = !bio->bi_status;
2787 				offset += len;
2788 				continue;
2789 			}
2790 		} else {
2791 			struct extent_buffer *eb;
2792 
2793 			eb = (struct extent_buffer *)page->private;
2794 			set_bit(EXTENT_BUFFER_READ_ERR, &eb->bflags);
2795 			eb->read_mirror = mirror;
2796 			atomic_dec(&eb->io_pages);
2797 			if (test_and_clear_bit(EXTENT_BUFFER_READAHEAD,
2798 					       &eb->bflags))
2799 				btree_readahead_hook(eb, -EIO);
2800 		}
2801 readpage_ok:
2802 		if (likely(uptodate)) {
2803 			loff_t i_size = i_size_read(inode);
2804 			pgoff_t end_index = i_size >> PAGE_SHIFT;
2805 			unsigned off;
2806 
2807 			/* Zero out the end if this page straddles i_size */
2808 			off = offset_in_page(i_size);
2809 			if (page->index == end_index && off)
2810 				zero_user_segment(page, off, PAGE_SIZE);
2811 			SetPageUptodate(page);
2812 		} else {
2813 			ClearPageUptodate(page);
2814 			SetPageError(page);
2815 		}
2816 		unlock_page(page);
2817 		offset += len;
2818 
2819 		if (unlikely(!uptodate)) {
2820 			if (extent_len) {
2821 				endio_readpage_release_extent(tree,
2822 							      extent_start,
2823 							      extent_len, 1);
2824 				extent_start = 0;
2825 				extent_len = 0;
2826 			}
2827 			endio_readpage_release_extent(tree, start,
2828 						      end - start + 1, 0);
2829 		} else if (!extent_len) {
2830 			extent_start = start;
2831 			extent_len = end + 1 - start;
2832 		} else if (extent_start + extent_len == start) {
2833 			extent_len += end + 1 - start;
2834 		} else {
2835 			endio_readpage_release_extent(tree, extent_start,
2836 						      extent_len, uptodate);
2837 			extent_start = start;
2838 			extent_len = end + 1 - start;
2839 		}
2840 	}
2841 
2842 	if (extent_len)
2843 		endio_readpage_release_extent(tree, extent_start, extent_len,
2844 					      uptodate);
2845 	btrfs_io_bio_free_csum(io_bio);
2846 	bio_put(bio);
2847 }
2848 
2849 /*
2850  * Initialize the members up to but not including 'bio'. Use after allocating a
2851  * new bio by bio_alloc_bioset as it does not initialize the bytes outside of
2852  * 'bio' because use of __GFP_ZERO is not supported.
2853  */
btrfs_io_bio_init(struct btrfs_io_bio * btrfs_bio)2854 static inline void btrfs_io_bio_init(struct btrfs_io_bio *btrfs_bio)
2855 {
2856 	memset(btrfs_bio, 0, offsetof(struct btrfs_io_bio, bio));
2857 }
2858 
2859 /*
2860  * The following helpers allocate a bio. As it's backed by a bioset, it'll
2861  * never fail.  We're returning a bio right now but you can call btrfs_io_bio
2862  * for the appropriate container_of magic
2863  */
btrfs_bio_alloc(u64 first_byte)2864 struct bio *btrfs_bio_alloc(u64 first_byte)
2865 {
2866 	struct bio *bio;
2867 
2868 	bio = bio_alloc_bioset(GFP_NOFS, BIO_MAX_PAGES, &btrfs_bioset);
2869 	bio->bi_iter.bi_sector = first_byte >> 9;
2870 	btrfs_io_bio_init(btrfs_io_bio(bio));
2871 	return bio;
2872 }
2873 
btrfs_bio_clone(struct bio * bio)2874 struct bio *btrfs_bio_clone(struct bio *bio)
2875 {
2876 	struct btrfs_io_bio *btrfs_bio;
2877 	struct bio *new;
2878 
2879 	/* Bio allocation backed by a bioset does not fail */
2880 	new = bio_clone_fast(bio, GFP_NOFS, &btrfs_bioset);
2881 	btrfs_bio = btrfs_io_bio(new);
2882 	btrfs_io_bio_init(btrfs_bio);
2883 	btrfs_bio->iter = bio->bi_iter;
2884 	return new;
2885 }
2886 
btrfs_io_bio_alloc(unsigned int nr_iovecs)2887 struct bio *btrfs_io_bio_alloc(unsigned int nr_iovecs)
2888 {
2889 	struct bio *bio;
2890 
2891 	/* Bio allocation backed by a bioset does not fail */
2892 	bio = bio_alloc_bioset(GFP_NOFS, nr_iovecs, &btrfs_bioset);
2893 	btrfs_io_bio_init(btrfs_io_bio(bio));
2894 	return bio;
2895 }
2896 
btrfs_bio_clone_partial(struct bio * orig,int offset,int size)2897 struct bio *btrfs_bio_clone_partial(struct bio *orig, int offset, int size)
2898 {
2899 	struct bio *bio;
2900 	struct btrfs_io_bio *btrfs_bio;
2901 
2902 	/* this will never fail when it's backed by a bioset */
2903 	bio = bio_clone_fast(orig, GFP_NOFS, &btrfs_bioset);
2904 	ASSERT(bio);
2905 
2906 	btrfs_bio = btrfs_io_bio(bio);
2907 	btrfs_io_bio_init(btrfs_bio);
2908 
2909 	bio_trim(bio, offset >> 9, size >> 9);
2910 	btrfs_bio->iter = bio->bi_iter;
2911 	return bio;
2912 }
2913 
2914 /*
2915  * @opf:	bio REQ_OP_* and REQ_* flags as one value
2916  * @tree:	tree so we can call our merge_bio hook
2917  * @wbc:	optional writeback control for io accounting
2918  * @page:	page to add to the bio
2919  * @pg_offset:	offset of the new bio or to check whether we are adding
2920  *              a contiguous page to the previous one
2921  * @size:	portion of page that we want to write
2922  * @offset:	starting offset in the page
2923  * @bdev:	attach newly created bios to this bdev
2924  * @bio_ret:	must be valid pointer, newly allocated bio will be stored there
2925  * @end_io_func:     end_io callback for new bio
2926  * @mirror_num:	     desired mirror to read/write
2927  * @prev_bio_flags:  flags of previous bio to see if we can merge the current one
2928  * @bio_flags:	flags of the current bio to see if we can merge them
2929  */
submit_extent_page(unsigned int opf,struct extent_io_tree * tree,struct writeback_control * wbc,struct page * page,u64 offset,size_t size,unsigned long pg_offset,struct block_device * bdev,struct bio ** bio_ret,bio_end_io_t end_io_func,int mirror_num,unsigned long prev_bio_flags,unsigned long bio_flags,bool force_bio_submit)2930 static int submit_extent_page(unsigned int opf, struct extent_io_tree *tree,
2931 			      struct writeback_control *wbc,
2932 			      struct page *page, u64 offset,
2933 			      size_t size, unsigned long pg_offset,
2934 			      struct block_device *bdev,
2935 			      struct bio **bio_ret,
2936 			      bio_end_io_t end_io_func,
2937 			      int mirror_num,
2938 			      unsigned long prev_bio_flags,
2939 			      unsigned long bio_flags,
2940 			      bool force_bio_submit)
2941 {
2942 	int ret = 0;
2943 	struct bio *bio;
2944 	size_t page_size = min_t(size_t, size, PAGE_SIZE);
2945 	sector_t sector = offset >> 9;
2946 
2947 	ASSERT(bio_ret);
2948 
2949 	if (*bio_ret) {
2950 		bool contig;
2951 		bool can_merge = true;
2952 
2953 		bio = *bio_ret;
2954 		if (prev_bio_flags & EXTENT_BIO_COMPRESSED)
2955 			contig = bio->bi_iter.bi_sector == sector;
2956 		else
2957 			contig = bio_end_sector(bio) == sector;
2958 
2959 		ASSERT(tree->ops);
2960 		if (btrfs_bio_fits_in_stripe(page, page_size, bio, bio_flags))
2961 			can_merge = false;
2962 
2963 		if (prev_bio_flags != bio_flags || !contig || !can_merge ||
2964 		    force_bio_submit ||
2965 		    bio_add_page(bio, page, page_size, pg_offset) < page_size) {
2966 			ret = submit_one_bio(bio, mirror_num, prev_bio_flags);
2967 			if (ret < 0) {
2968 				*bio_ret = NULL;
2969 				return ret;
2970 			}
2971 			bio = NULL;
2972 		} else {
2973 			if (wbc)
2974 				wbc_account_cgroup_owner(wbc, page, page_size);
2975 			return 0;
2976 		}
2977 	}
2978 
2979 	bio = btrfs_bio_alloc(offset);
2980 	bio_set_dev(bio, bdev);
2981 	bio_add_page(bio, page, page_size, pg_offset);
2982 	bio->bi_end_io = end_io_func;
2983 	bio->bi_private = tree;
2984 	bio->bi_write_hint = page->mapping->host->i_write_hint;
2985 	bio->bi_opf = opf;
2986 	if (wbc) {
2987 		wbc_init_bio(wbc, bio);
2988 		wbc_account_cgroup_owner(wbc, page, page_size);
2989 	}
2990 
2991 	*bio_ret = bio;
2992 
2993 	return ret;
2994 }
2995 
attach_extent_buffer_page(struct extent_buffer * eb,struct page * page)2996 static void attach_extent_buffer_page(struct extent_buffer *eb,
2997 				      struct page *page)
2998 {
2999 	if (!PagePrivate(page)) {
3000 		SetPagePrivate(page);
3001 		get_page(page);
3002 		set_page_private(page, (unsigned long)eb);
3003 	} else {
3004 		WARN_ON(page->private != (unsigned long)eb);
3005 	}
3006 }
3007 
set_page_extent_mapped(struct page * page)3008 void set_page_extent_mapped(struct page *page)
3009 {
3010 	if (!PagePrivate(page)) {
3011 		SetPagePrivate(page);
3012 		get_page(page);
3013 		set_page_private(page, EXTENT_PAGE_PRIVATE);
3014 	}
3015 }
3016 
3017 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)3018 __get_extent_map(struct inode *inode, struct page *page, size_t pg_offset,
3019 		 u64 start, u64 len, get_extent_t *get_extent,
3020 		 struct extent_map **em_cached)
3021 {
3022 	struct extent_map *em;
3023 
3024 	if (em_cached && *em_cached) {
3025 		em = *em_cached;
3026 		if (extent_map_in_tree(em) && start >= em->start &&
3027 		    start < extent_map_end(em)) {
3028 			refcount_inc(&em->refs);
3029 			return em;
3030 		}
3031 
3032 		free_extent_map(em);
3033 		*em_cached = NULL;
3034 	}
3035 
3036 	em = get_extent(BTRFS_I(inode), page, pg_offset, start, len, 0);
3037 	if (em_cached && !IS_ERR_OR_NULL(em)) {
3038 		BUG_ON(*em_cached);
3039 		refcount_inc(&em->refs);
3040 		*em_cached = em;
3041 	}
3042 	return em;
3043 }
3044 /*
3045  * basic readpage implementation.  Locked extent state structs are inserted
3046  * into the tree that are removed when the IO is done (by the end_io
3047  * handlers)
3048  * XXX JDM: This needs looking at to ensure proper page locking
3049  * return 0 on success, otherwise return error
3050  */
__do_readpage(struct extent_io_tree * tree,struct page * page,get_extent_t * get_extent,struct extent_map ** em_cached,struct bio ** bio,int mirror_num,unsigned long * bio_flags,unsigned int read_flags,u64 * prev_em_start)3051 static int __do_readpage(struct extent_io_tree *tree,
3052 			 struct page *page,
3053 			 get_extent_t *get_extent,
3054 			 struct extent_map **em_cached,
3055 			 struct bio **bio, int mirror_num,
3056 			 unsigned long *bio_flags, unsigned int read_flags,
3057 			 u64 *prev_em_start)
3058 {
3059 	struct inode *inode = page->mapping->host;
3060 	u64 start = page_offset(page);
3061 	const u64 end = start + PAGE_SIZE - 1;
3062 	u64 cur = start;
3063 	u64 extent_offset;
3064 	u64 last_byte = i_size_read(inode);
3065 	u64 block_start;
3066 	u64 cur_end;
3067 	struct extent_map *em;
3068 	struct block_device *bdev;
3069 	int ret = 0;
3070 	int nr = 0;
3071 	size_t pg_offset = 0;
3072 	size_t iosize;
3073 	size_t disk_io_size;
3074 	size_t blocksize = inode->i_sb->s_blocksize;
3075 	unsigned long this_bio_flag = 0;
3076 
3077 	set_page_extent_mapped(page);
3078 
3079 	if (!PageUptodate(page)) {
3080 		if (cleancache_get_page(page) == 0) {
3081 			BUG_ON(blocksize != PAGE_SIZE);
3082 			unlock_extent(tree, start, end);
3083 			goto out;
3084 		}
3085 	}
3086 
3087 	if (page->index == last_byte >> PAGE_SHIFT) {
3088 		char *userpage;
3089 		size_t zero_offset = offset_in_page(last_byte);
3090 
3091 		if (zero_offset) {
3092 			iosize = PAGE_SIZE - zero_offset;
3093 			userpage = kmap_atomic(page);
3094 			memset(userpage + zero_offset, 0, iosize);
3095 			flush_dcache_page(page);
3096 			kunmap_atomic(userpage);
3097 		}
3098 	}
3099 	while (cur <= end) {
3100 		bool force_bio_submit = false;
3101 		u64 offset;
3102 
3103 		if (cur >= last_byte) {
3104 			char *userpage;
3105 			struct extent_state *cached = NULL;
3106 
3107 			iosize = PAGE_SIZE - pg_offset;
3108 			userpage = kmap_atomic(page);
3109 			memset(userpage + pg_offset, 0, iosize);
3110 			flush_dcache_page(page);
3111 			kunmap_atomic(userpage);
3112 			set_extent_uptodate(tree, cur, cur + iosize - 1,
3113 					    &cached, GFP_NOFS);
3114 			unlock_extent_cached(tree, cur,
3115 					     cur + iosize - 1, &cached);
3116 			break;
3117 		}
3118 		em = __get_extent_map(inode, page, pg_offset, cur,
3119 				      end - cur + 1, get_extent, em_cached);
3120 		if (IS_ERR_OR_NULL(em)) {
3121 			SetPageError(page);
3122 			unlock_extent(tree, cur, end);
3123 			break;
3124 		}
3125 		extent_offset = cur - em->start;
3126 		BUG_ON(extent_map_end(em) <= cur);
3127 		BUG_ON(end < cur);
3128 
3129 		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags)) {
3130 			this_bio_flag |= EXTENT_BIO_COMPRESSED;
3131 			extent_set_compress_type(&this_bio_flag,
3132 						 em->compress_type);
3133 		}
3134 
3135 		iosize = min(extent_map_end(em) - cur, end - cur + 1);
3136 		cur_end = min(extent_map_end(em) - 1, end);
3137 		iosize = ALIGN(iosize, blocksize);
3138 		if (this_bio_flag & EXTENT_BIO_COMPRESSED) {
3139 			disk_io_size = em->block_len;
3140 			offset = em->block_start;
3141 		} else {
3142 			offset = em->block_start + extent_offset;
3143 			disk_io_size = iosize;
3144 		}
3145 		bdev = em->bdev;
3146 		block_start = em->block_start;
3147 		if (test_bit(EXTENT_FLAG_PREALLOC, &em->flags))
3148 			block_start = EXTENT_MAP_HOLE;
3149 
3150 		/*
3151 		 * If we have a file range that points to a compressed extent
3152 		 * and it's followed by a consecutive file range that points to
3153 		 * to the same compressed extent (possibly with a different
3154 		 * offset and/or length, so it either points to the whole extent
3155 		 * or only part of it), we must make sure we do not submit a
3156 		 * single bio to populate the pages for the 2 ranges because
3157 		 * this makes the compressed extent read zero out the pages
3158 		 * belonging to the 2nd range. Imagine the following scenario:
3159 		 *
3160 		 *  File layout
3161 		 *  [0 - 8K]                     [8K - 24K]
3162 		 *    |                               |
3163 		 *    |                               |
3164 		 * points to extent X,         points to extent X,
3165 		 * offset 4K, length of 8K     offset 0, length 16K
3166 		 *
3167 		 * [extent X, compressed length = 4K uncompressed length = 16K]
3168 		 *
3169 		 * If the bio to read the compressed extent covers both ranges,
3170 		 * it will decompress extent X into the pages belonging to the
3171 		 * first range and then it will stop, zeroing out the remaining
3172 		 * pages that belong to the other range that points to extent X.
3173 		 * So here we make sure we submit 2 bios, one for the first
3174 		 * range and another one for the third range. Both will target
3175 		 * the same physical extent from disk, but we can't currently
3176 		 * make the compressed bio endio callback populate the pages
3177 		 * for both ranges because each compressed bio is tightly
3178 		 * coupled with a single extent map, and each range can have
3179 		 * an extent map with a different offset value relative to the
3180 		 * uncompressed data of our extent and different lengths. This
3181 		 * is a corner case so we prioritize correctness over
3182 		 * non-optimal behavior (submitting 2 bios for the same extent).
3183 		 */
3184 		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags) &&
3185 		    prev_em_start && *prev_em_start != (u64)-1 &&
3186 		    *prev_em_start != em->start)
3187 			force_bio_submit = true;
3188 
3189 		if (prev_em_start)
3190 			*prev_em_start = em->start;
3191 
3192 		free_extent_map(em);
3193 		em = NULL;
3194 
3195 		/* we've found a hole, just zero and go on */
3196 		if (block_start == EXTENT_MAP_HOLE) {
3197 			char *userpage;
3198 			struct extent_state *cached = NULL;
3199 
3200 			userpage = kmap_atomic(page);
3201 			memset(userpage + pg_offset, 0, iosize);
3202 			flush_dcache_page(page);
3203 			kunmap_atomic(userpage);
3204 
3205 			set_extent_uptodate(tree, cur, cur + iosize - 1,
3206 					    &cached, GFP_NOFS);
3207 			unlock_extent_cached(tree, cur,
3208 					     cur + iosize - 1, &cached);
3209 			cur = cur + iosize;
3210 			pg_offset += iosize;
3211 			continue;
3212 		}
3213 		/* the get_extent function already copied into the page */
3214 		if (test_range_bit(tree, cur, cur_end,
3215 				   EXTENT_UPTODATE, 1, NULL)) {
3216 			check_page_uptodate(tree, page);
3217 			unlock_extent(tree, cur, cur + iosize - 1);
3218 			cur = cur + iosize;
3219 			pg_offset += iosize;
3220 			continue;
3221 		}
3222 		/* we have an inline extent but it didn't get marked up
3223 		 * to date.  Error out
3224 		 */
3225 		if (block_start == EXTENT_MAP_INLINE) {
3226 			SetPageError(page);
3227 			unlock_extent(tree, cur, cur + iosize - 1);
3228 			cur = cur + iosize;
3229 			pg_offset += iosize;
3230 			continue;
3231 		}
3232 
3233 		ret = submit_extent_page(REQ_OP_READ | read_flags, tree, NULL,
3234 					 page, offset, disk_io_size,
3235 					 pg_offset, bdev, bio,
3236 					 end_bio_extent_readpage, mirror_num,
3237 					 *bio_flags,
3238 					 this_bio_flag,
3239 					 force_bio_submit);
3240 		if (!ret) {
3241 			nr++;
3242 			*bio_flags = this_bio_flag;
3243 		} else {
3244 			SetPageError(page);
3245 			unlock_extent(tree, cur, cur + iosize - 1);
3246 			goto out;
3247 		}
3248 		cur = cur + iosize;
3249 		pg_offset += iosize;
3250 	}
3251 out:
3252 	if (!nr) {
3253 		if (!PageError(page))
3254 			SetPageUptodate(page);
3255 		unlock_page(page);
3256 	}
3257 	return ret;
3258 }
3259 
contiguous_readpages(struct extent_io_tree * tree,struct page * pages[],int nr_pages,u64 start,u64 end,struct extent_map ** em_cached,struct bio ** bio,unsigned long * bio_flags,u64 * prev_em_start)3260 static inline void contiguous_readpages(struct extent_io_tree *tree,
3261 					     struct page *pages[], int nr_pages,
3262 					     u64 start, u64 end,
3263 					     struct extent_map **em_cached,
3264 					     struct bio **bio,
3265 					     unsigned long *bio_flags,
3266 					     u64 *prev_em_start)
3267 {
3268 	struct btrfs_inode *inode = BTRFS_I(pages[0]->mapping->host);
3269 	int index;
3270 
3271 	btrfs_lock_and_flush_ordered_range(tree, inode, start, end, NULL);
3272 
3273 	for (index = 0; index < nr_pages; index++) {
3274 		__do_readpage(tree, pages[index], btrfs_get_extent, em_cached,
3275 				bio, 0, bio_flags, REQ_RAHEAD, prev_em_start);
3276 		put_page(pages[index]);
3277 	}
3278 }
3279 
__extent_read_full_page(struct extent_io_tree * tree,struct page * page,get_extent_t * get_extent,struct bio ** bio,int mirror_num,unsigned long * bio_flags,unsigned int read_flags)3280 static int __extent_read_full_page(struct extent_io_tree *tree,
3281 				   struct page *page,
3282 				   get_extent_t *get_extent,
3283 				   struct bio **bio, int mirror_num,
3284 				   unsigned long *bio_flags,
3285 				   unsigned int read_flags)
3286 {
3287 	struct btrfs_inode *inode = BTRFS_I(page->mapping->host);
3288 	u64 start = page_offset(page);
3289 	u64 end = start + PAGE_SIZE - 1;
3290 	int ret;
3291 
3292 	btrfs_lock_and_flush_ordered_range(tree, inode, start, end, NULL);
3293 
3294 	ret = __do_readpage(tree, page, get_extent, NULL, bio, mirror_num,
3295 			    bio_flags, read_flags, NULL);
3296 	return ret;
3297 }
3298 
extent_read_full_page(struct extent_io_tree * tree,struct page * page,get_extent_t * get_extent,int mirror_num)3299 int extent_read_full_page(struct extent_io_tree *tree, struct page *page,
3300 			    get_extent_t *get_extent, int mirror_num)
3301 {
3302 	struct bio *bio = NULL;
3303 	unsigned long bio_flags = 0;
3304 	int ret;
3305 
3306 	ret = __extent_read_full_page(tree, page, get_extent, &bio, mirror_num,
3307 				      &bio_flags, 0);
3308 	if (bio)
3309 		ret = submit_one_bio(bio, mirror_num, bio_flags);
3310 	return ret;
3311 }
3312 
update_nr_written(struct writeback_control * wbc,unsigned long nr_written)3313 static void update_nr_written(struct writeback_control *wbc,
3314 			      unsigned long nr_written)
3315 {
3316 	wbc->nr_to_write -= nr_written;
3317 }
3318 
3319 /*
3320  * helper for __extent_writepage, doing all of the delayed allocation setup.
3321  *
3322  * This returns 1 if btrfs_run_delalloc_range function did all the work required
3323  * to write the page (copy into inline extent).  In this case the IO has
3324  * been started and the page is already unlocked.
3325  *
3326  * This returns 0 if all went well (page still locked)
3327  * This returns < 0 if there were errors (page still locked)
3328  */
writepage_delalloc(struct inode * inode,struct page * page,struct writeback_control * wbc,u64 delalloc_start,unsigned long * nr_written)3329 static noinline_for_stack int writepage_delalloc(struct inode *inode,
3330 		struct page *page, struct writeback_control *wbc,
3331 		u64 delalloc_start, unsigned long *nr_written)
3332 {
3333 	u64 page_end = delalloc_start + PAGE_SIZE - 1;
3334 	bool found;
3335 	u64 delalloc_to_write = 0;
3336 	u64 delalloc_end = 0;
3337 	int ret;
3338 	int page_started = 0;
3339 
3340 
3341 	while (delalloc_end < page_end) {
3342 		found = find_lock_delalloc_range(inode, page,
3343 					       &delalloc_start,
3344 					       &delalloc_end);
3345 		if (!found) {
3346 			delalloc_start = delalloc_end + 1;
3347 			continue;
3348 		}
3349 		ret = btrfs_run_delalloc_range(inode, page, delalloc_start,
3350 				delalloc_end, &page_started, nr_written, wbc);
3351 		if (ret) {
3352 			SetPageError(page);
3353 			/*
3354 			 * btrfs_run_delalloc_range should return < 0 for error
3355 			 * but just in case, we use > 0 here meaning the IO is
3356 			 * started, so we don't want to return > 0 unless
3357 			 * things are going well.
3358 			 */
3359 			ret = ret < 0 ? ret : -EIO;
3360 			goto done;
3361 		}
3362 		/*
3363 		 * delalloc_end is already one less than the total length, so
3364 		 * we don't subtract one from PAGE_SIZE
3365 		 */
3366 		delalloc_to_write += (delalloc_end - delalloc_start +
3367 				      PAGE_SIZE) >> PAGE_SHIFT;
3368 		delalloc_start = delalloc_end + 1;
3369 	}
3370 	if (wbc->nr_to_write < delalloc_to_write) {
3371 		int thresh = 8192;
3372 
3373 		if (delalloc_to_write < thresh * 2)
3374 			thresh = delalloc_to_write;
3375 		wbc->nr_to_write = min_t(u64, delalloc_to_write,
3376 					 thresh);
3377 	}
3378 
3379 	/* did the fill delalloc function already unlock and start
3380 	 * the IO?
3381 	 */
3382 	if (page_started) {
3383 		/*
3384 		 * we've unlocked the page, so we can't update
3385 		 * the mapping's writeback index, just update
3386 		 * nr_to_write.
3387 		 */
3388 		wbc->nr_to_write -= *nr_written;
3389 		return 1;
3390 	}
3391 
3392 	ret = 0;
3393 
3394 done:
3395 	return ret;
3396 }
3397 
3398 /*
3399  * helper for __extent_writepage.  This calls the writepage start hooks,
3400  * and does the loop to map the page into extents and bios.
3401  *
3402  * We return 1 if the IO is started and the page is unlocked,
3403  * 0 if all went well (page still locked)
3404  * < 0 if there were errors (page still locked)
3405  */
__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,unsigned int write_flags,int * nr_ret)3406 static noinline_for_stack int __extent_writepage_io(struct inode *inode,
3407 				 struct page *page,
3408 				 struct writeback_control *wbc,
3409 				 struct extent_page_data *epd,
3410 				 loff_t i_size,
3411 				 unsigned long nr_written,
3412 				 unsigned int write_flags, int *nr_ret)
3413 {
3414 	struct extent_io_tree *tree = epd->tree;
3415 	u64 start = page_offset(page);
3416 	u64 page_end = start + PAGE_SIZE - 1;
3417 	u64 end;
3418 	u64 cur = start;
3419 	u64 extent_offset;
3420 	u64 block_start;
3421 	u64 iosize;
3422 	struct extent_map *em;
3423 	struct block_device *bdev;
3424 	size_t pg_offset = 0;
3425 	size_t blocksize;
3426 	int ret = 0;
3427 	int nr = 0;
3428 	bool compressed;
3429 
3430 	ret = btrfs_writepage_cow_fixup(page, start, page_end);
3431 	if (ret) {
3432 		/* Fixup worker will requeue */
3433 		if (ret == -EBUSY)
3434 			wbc->pages_skipped++;
3435 		else
3436 			redirty_page_for_writepage(wbc, page);
3437 
3438 		update_nr_written(wbc, nr_written);
3439 		unlock_page(page);
3440 		return 1;
3441 	}
3442 
3443 	/*
3444 	 * we don't want to touch the inode after unlocking the page,
3445 	 * so we update the mapping writeback index now
3446 	 */
3447 	update_nr_written(wbc, nr_written + 1);
3448 
3449 	end = page_end;
3450 	if (i_size <= start) {
3451 		btrfs_writepage_endio_finish_ordered(page, start, page_end, 1);
3452 		goto done;
3453 	}
3454 
3455 	blocksize = inode->i_sb->s_blocksize;
3456 
3457 	while (cur <= end) {
3458 		u64 em_end;
3459 		u64 offset;
3460 
3461 		if (cur >= i_size) {
3462 			btrfs_writepage_endio_finish_ordered(page, cur,
3463 							     page_end, 1);
3464 			break;
3465 		}
3466 		em = btrfs_get_extent(BTRFS_I(inode), page, pg_offset, cur,
3467 				     end - cur + 1, 1);
3468 		if (IS_ERR_OR_NULL(em)) {
3469 			SetPageError(page);
3470 			ret = PTR_ERR_OR_ZERO(em);
3471 			break;
3472 		}
3473 
3474 		extent_offset = cur - em->start;
3475 		em_end = extent_map_end(em);
3476 		BUG_ON(em_end <= cur);
3477 		BUG_ON(end < cur);
3478 		iosize = min(em_end - cur, end - cur + 1);
3479 		iosize = ALIGN(iosize, blocksize);
3480 		offset = em->block_start + extent_offset;
3481 		bdev = em->bdev;
3482 		block_start = em->block_start;
3483 		compressed = test_bit(EXTENT_FLAG_COMPRESSED, &em->flags);
3484 		free_extent_map(em);
3485 		em = NULL;
3486 
3487 		/*
3488 		 * compressed and inline extents are written through other
3489 		 * paths in the FS
3490 		 */
3491 		if (compressed || block_start == EXTENT_MAP_HOLE ||
3492 		    block_start == EXTENT_MAP_INLINE) {
3493 			/*
3494 			 * end_io notification does not happen here for
3495 			 * compressed extents
3496 			 */
3497 			if (!compressed)
3498 				btrfs_writepage_endio_finish_ordered(page, cur,
3499 							    cur + iosize - 1,
3500 							    1);
3501 			else if (compressed) {
3502 				/* we don't want to end_page_writeback on
3503 				 * a compressed extent.  this happens
3504 				 * elsewhere
3505 				 */
3506 				nr++;
3507 			}
3508 
3509 			cur += iosize;
3510 			pg_offset += iosize;
3511 			continue;
3512 		}
3513 
3514 		btrfs_set_range_writeback(tree, cur, cur + iosize - 1);
3515 		if (!PageWriteback(page)) {
3516 			btrfs_err(BTRFS_I(inode)->root->fs_info,
3517 				   "page %lu not writeback, cur %llu end %llu",
3518 			       page->index, cur, end);
3519 		}
3520 
3521 		ret = submit_extent_page(REQ_OP_WRITE | write_flags, tree, wbc,
3522 					 page, offset, iosize, pg_offset,
3523 					 bdev, &epd->bio,
3524 					 end_bio_extent_writepage,
3525 					 0, 0, 0, false);
3526 		if (ret) {
3527 			SetPageError(page);
3528 			if (PageWriteback(page))
3529 				end_page_writeback(page);
3530 		}
3531 
3532 		cur = cur + iosize;
3533 		pg_offset += iosize;
3534 		nr++;
3535 	}
3536 done:
3537 	*nr_ret = nr;
3538 	return ret;
3539 }
3540 
3541 /*
3542  * the writepage semantics are similar to regular writepage.  extent
3543  * records are inserted to lock ranges in the tree, and as dirty areas
3544  * are found, they are marked writeback.  Then the lock bits are removed
3545  * and the end_io handler clears the writeback ranges
3546  *
3547  * Return 0 if everything goes well.
3548  * Return <0 for error.
3549  */
__extent_writepage(struct page * page,struct writeback_control * wbc,struct extent_page_data * epd)3550 static int __extent_writepage(struct page *page, struct writeback_control *wbc,
3551 			      struct extent_page_data *epd)
3552 {
3553 	struct inode *inode = page->mapping->host;
3554 	u64 start = page_offset(page);
3555 	u64 page_end = start + PAGE_SIZE - 1;
3556 	int ret;
3557 	int nr = 0;
3558 	size_t pg_offset = 0;
3559 	loff_t i_size = i_size_read(inode);
3560 	unsigned long end_index = i_size >> PAGE_SHIFT;
3561 	unsigned int write_flags = 0;
3562 	unsigned long nr_written = 0;
3563 
3564 	write_flags = wbc_to_write_flags(wbc);
3565 
3566 	trace___extent_writepage(page, inode, wbc);
3567 
3568 	WARN_ON(!PageLocked(page));
3569 
3570 	ClearPageError(page);
3571 
3572 	pg_offset = offset_in_page(i_size);
3573 	if (page->index > end_index ||
3574 	   (page->index == end_index && !pg_offset)) {
3575 		page->mapping->a_ops->invalidatepage(page, 0, PAGE_SIZE);
3576 		unlock_page(page);
3577 		return 0;
3578 	}
3579 
3580 	if (page->index == end_index) {
3581 		char *userpage;
3582 
3583 		userpage = kmap_atomic(page);
3584 		memset(userpage + pg_offset, 0,
3585 		       PAGE_SIZE - pg_offset);
3586 		kunmap_atomic(userpage);
3587 		flush_dcache_page(page);
3588 	}
3589 
3590 	pg_offset = 0;
3591 
3592 	set_page_extent_mapped(page);
3593 
3594 	if (!epd->extent_locked) {
3595 		ret = writepage_delalloc(inode, page, wbc, start, &nr_written);
3596 		if (ret == 1)
3597 			goto done_unlocked;
3598 		if (ret)
3599 			goto done;
3600 	}
3601 
3602 	ret = __extent_writepage_io(inode, page, wbc, epd,
3603 				    i_size, nr_written, write_flags, &nr);
3604 	if (ret == 1)
3605 		goto done_unlocked;
3606 
3607 done:
3608 	if (nr == 0) {
3609 		/* make sure the mapping tag for page dirty gets cleared */
3610 		set_page_writeback(page);
3611 		end_page_writeback(page);
3612 	}
3613 	if (PageError(page)) {
3614 		ret = ret < 0 ? ret : -EIO;
3615 		end_extent_writepage(page, ret, start, page_end);
3616 	}
3617 	unlock_page(page);
3618 	ASSERT(ret <= 0);
3619 	return ret;
3620 
3621 done_unlocked:
3622 	return 0;
3623 }
3624 
wait_on_extent_buffer_writeback(struct extent_buffer * eb)3625 void wait_on_extent_buffer_writeback(struct extent_buffer *eb)
3626 {
3627 	wait_on_bit_io(&eb->bflags, EXTENT_BUFFER_WRITEBACK,
3628 		       TASK_UNINTERRUPTIBLE);
3629 }
3630 
end_extent_buffer_writeback(struct extent_buffer * eb)3631 static void end_extent_buffer_writeback(struct extent_buffer *eb)
3632 {
3633 	clear_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags);
3634 	smp_mb__after_atomic();
3635 	wake_up_bit(&eb->bflags, EXTENT_BUFFER_WRITEBACK);
3636 }
3637 
3638 /*
3639  * Lock eb pages and flush the bio if we can't the locks
3640  *
3641  * Return  0 if nothing went wrong
3642  * Return >0 is same as 0, except bio is not submitted
3643  * Return <0 if something went wrong, no page is locked
3644  */
lock_extent_buffer_for_io(struct extent_buffer * eb,struct extent_page_data * epd)3645 static noinline_for_stack int lock_extent_buffer_for_io(struct extent_buffer *eb,
3646 			  struct extent_page_data *epd)
3647 {
3648 	struct btrfs_fs_info *fs_info = eb->fs_info;
3649 	int i, num_pages, failed_page_nr;
3650 	int flush = 0;
3651 	int ret = 0;
3652 
3653 	if (!btrfs_try_tree_write_lock(eb)) {
3654 		ret = flush_write_bio(epd);
3655 		if (ret < 0)
3656 			return ret;
3657 		flush = 1;
3658 		btrfs_tree_lock(eb);
3659 	}
3660 
3661 	if (test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags)) {
3662 		btrfs_tree_unlock(eb);
3663 		if (!epd->sync_io)
3664 			return 0;
3665 		if (!flush) {
3666 			ret = flush_write_bio(epd);
3667 			if (ret < 0)
3668 				return ret;
3669 			flush = 1;
3670 		}
3671 		while (1) {
3672 			wait_on_extent_buffer_writeback(eb);
3673 			btrfs_tree_lock(eb);
3674 			if (!test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags))
3675 				break;
3676 			btrfs_tree_unlock(eb);
3677 		}
3678 	}
3679 
3680 	/*
3681 	 * We need to do this to prevent races in people who check if the eb is
3682 	 * under IO since we can end up having no IO bits set for a short period
3683 	 * of time.
3684 	 */
3685 	spin_lock(&eb->refs_lock);
3686 	if (test_and_clear_bit(EXTENT_BUFFER_DIRTY, &eb->bflags)) {
3687 		set_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags);
3688 		spin_unlock(&eb->refs_lock);
3689 		btrfs_set_header_flag(eb, BTRFS_HEADER_FLAG_WRITTEN);
3690 		percpu_counter_add_batch(&fs_info->dirty_metadata_bytes,
3691 					 -eb->len,
3692 					 fs_info->dirty_metadata_batch);
3693 		ret = 1;
3694 	} else {
3695 		spin_unlock(&eb->refs_lock);
3696 	}
3697 
3698 	btrfs_tree_unlock(eb);
3699 
3700 	if (!ret)
3701 		return ret;
3702 
3703 	num_pages = num_extent_pages(eb);
3704 	for (i = 0; i < num_pages; i++) {
3705 		struct page *p = eb->pages[i];
3706 
3707 		if (!trylock_page(p)) {
3708 			if (!flush) {
3709 				int err;
3710 
3711 				err = flush_write_bio(epd);
3712 				if (err < 0) {
3713 					ret = err;
3714 					failed_page_nr = i;
3715 					goto err_unlock;
3716 				}
3717 				flush = 1;
3718 			}
3719 			lock_page(p);
3720 		}
3721 	}
3722 
3723 	return ret;
3724 err_unlock:
3725 	/* Unlock already locked pages */
3726 	for (i = 0; i < failed_page_nr; i++)
3727 		unlock_page(eb->pages[i]);
3728 	/*
3729 	 * Clear EXTENT_BUFFER_WRITEBACK and wake up anyone waiting on it.
3730 	 * Also set back EXTENT_BUFFER_DIRTY so future attempts to this eb can
3731 	 * be made and undo everything done before.
3732 	 */
3733 	btrfs_tree_lock(eb);
3734 	spin_lock(&eb->refs_lock);
3735 	set_bit(EXTENT_BUFFER_DIRTY, &eb->bflags);
3736 	end_extent_buffer_writeback(eb);
3737 	spin_unlock(&eb->refs_lock);
3738 	percpu_counter_add_batch(&fs_info->dirty_metadata_bytes, eb->len,
3739 				 fs_info->dirty_metadata_batch);
3740 	btrfs_clear_header_flag(eb, BTRFS_HEADER_FLAG_WRITTEN);
3741 	btrfs_tree_unlock(eb);
3742 	return ret;
3743 }
3744 
set_btree_ioerr(struct page * page)3745 static void set_btree_ioerr(struct page *page)
3746 {
3747 	struct extent_buffer *eb = (struct extent_buffer *)page->private;
3748 	struct btrfs_fs_info *fs_info;
3749 
3750 	SetPageError(page);
3751 	if (test_and_set_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags))
3752 		return;
3753 
3754 	/*
3755 	 * If we error out, we should add back the dirty_metadata_bytes
3756 	 * to make it consistent.
3757 	 */
3758 	fs_info = eb->fs_info;
3759 	percpu_counter_add_batch(&fs_info->dirty_metadata_bytes,
3760 				 eb->len, fs_info->dirty_metadata_batch);
3761 
3762 	/*
3763 	 * If writeback for a btree extent that doesn't belong to a log tree
3764 	 * failed, increment the counter transaction->eb_write_errors.
3765 	 * We do this because while the transaction is running and before it's
3766 	 * committing (when we call filemap_fdata[write|wait]_range against
3767 	 * the btree inode), we might have
3768 	 * btree_inode->i_mapping->a_ops->writepages() called by the VM - if it
3769 	 * returns an error or an error happens during writeback, when we're
3770 	 * committing the transaction we wouldn't know about it, since the pages
3771 	 * can be no longer dirty nor marked anymore for writeback (if a
3772 	 * subsequent modification to the extent buffer didn't happen before the
3773 	 * transaction commit), which makes filemap_fdata[write|wait]_range not
3774 	 * able to find the pages tagged with SetPageError at transaction
3775 	 * commit time. So if this happens we must abort the transaction,
3776 	 * otherwise we commit a super block with btree roots that point to
3777 	 * btree nodes/leafs whose content on disk is invalid - either garbage
3778 	 * or the content of some node/leaf from a past generation that got
3779 	 * cowed or deleted and is no longer valid.
3780 	 *
3781 	 * Note: setting AS_EIO/AS_ENOSPC in the btree inode's i_mapping would
3782 	 * not be enough - we need to distinguish between log tree extents vs
3783 	 * non-log tree extents, and the next filemap_fdatawait_range() call
3784 	 * will catch and clear such errors in the mapping - and that call might
3785 	 * be from a log sync and not from a transaction commit. Also, checking
3786 	 * for the eb flag EXTENT_BUFFER_WRITE_ERR at transaction commit time is
3787 	 * not done and would not be reliable - the eb might have been released
3788 	 * from memory and reading it back again means that flag would not be
3789 	 * set (since it's a runtime flag, not persisted on disk).
3790 	 *
3791 	 * Using the flags below in the btree inode also makes us achieve the
3792 	 * goal of AS_EIO/AS_ENOSPC when writepages() returns success, started
3793 	 * writeback for all dirty pages and before filemap_fdatawait_range()
3794 	 * is called, the writeback for all dirty pages had already finished
3795 	 * with errors - because we were not using AS_EIO/AS_ENOSPC,
3796 	 * filemap_fdatawait_range() would return success, as it could not know
3797 	 * that writeback errors happened (the pages were no longer tagged for
3798 	 * writeback).
3799 	 */
3800 	switch (eb->log_index) {
3801 	case -1:
3802 		set_bit(BTRFS_FS_BTREE_ERR, &eb->fs_info->flags);
3803 		break;
3804 	case 0:
3805 		set_bit(BTRFS_FS_LOG1_ERR, &eb->fs_info->flags);
3806 		break;
3807 	case 1:
3808 		set_bit(BTRFS_FS_LOG2_ERR, &eb->fs_info->flags);
3809 		break;
3810 	default:
3811 		BUG(); /* unexpected, logic error */
3812 	}
3813 }
3814 
end_bio_extent_buffer_writepage(struct bio * bio)3815 static void end_bio_extent_buffer_writepage(struct bio *bio)
3816 {
3817 	struct bio_vec *bvec;
3818 	struct extent_buffer *eb;
3819 	int done;
3820 	struct bvec_iter_all iter_all;
3821 
3822 	ASSERT(!bio_flagged(bio, BIO_CLONED));
3823 	bio_for_each_segment_all(bvec, bio, iter_all) {
3824 		struct page *page = bvec->bv_page;
3825 
3826 		eb = (struct extent_buffer *)page->private;
3827 		BUG_ON(!eb);
3828 		done = atomic_dec_and_test(&eb->io_pages);
3829 
3830 		if (bio->bi_status ||
3831 		    test_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags)) {
3832 			ClearPageUptodate(page);
3833 			set_btree_ioerr(page);
3834 		}
3835 
3836 		end_page_writeback(page);
3837 
3838 		if (!done)
3839 			continue;
3840 
3841 		end_extent_buffer_writeback(eb);
3842 	}
3843 
3844 	bio_put(bio);
3845 }
3846 
write_one_eb(struct extent_buffer * eb,struct writeback_control * wbc,struct extent_page_data * epd)3847 static noinline_for_stack int write_one_eb(struct extent_buffer *eb,
3848 			struct writeback_control *wbc,
3849 			struct extent_page_data *epd)
3850 {
3851 	struct btrfs_fs_info *fs_info = eb->fs_info;
3852 	struct block_device *bdev = fs_info->fs_devices->latest_bdev;
3853 	struct extent_io_tree *tree = &BTRFS_I(fs_info->btree_inode)->io_tree;
3854 	u64 offset = eb->start;
3855 	u32 nritems;
3856 	int i, num_pages;
3857 	unsigned long start, end;
3858 	unsigned int write_flags = wbc_to_write_flags(wbc) | REQ_META;
3859 	int ret = 0;
3860 
3861 	clear_bit(EXTENT_BUFFER_WRITE_ERR, &eb->bflags);
3862 	num_pages = num_extent_pages(eb);
3863 	atomic_set(&eb->io_pages, num_pages);
3864 
3865 	/* set btree blocks beyond nritems with 0 to avoid stale content. */
3866 	nritems = btrfs_header_nritems(eb);
3867 	if (btrfs_header_level(eb) > 0) {
3868 		end = btrfs_node_key_ptr_offset(nritems);
3869 
3870 		memzero_extent_buffer(eb, end, eb->len - end);
3871 	} else {
3872 		/*
3873 		 * leaf:
3874 		 * header 0 1 2 .. N ... data_N .. data_2 data_1 data_0
3875 		 */
3876 		start = btrfs_item_nr_offset(nritems);
3877 		end = BTRFS_LEAF_DATA_OFFSET + leaf_data_end(eb);
3878 		memzero_extent_buffer(eb, start, end - start);
3879 	}
3880 
3881 	for (i = 0; i < num_pages; i++) {
3882 		struct page *p = eb->pages[i];
3883 
3884 		clear_page_dirty_for_io(p);
3885 		set_page_writeback(p);
3886 		ret = submit_extent_page(REQ_OP_WRITE | write_flags, tree, wbc,
3887 					 p, offset, PAGE_SIZE, 0, bdev,
3888 					 &epd->bio,
3889 					 end_bio_extent_buffer_writepage,
3890 					 0, 0, 0, false);
3891 		if (ret) {
3892 			set_btree_ioerr(p);
3893 			if (PageWriteback(p))
3894 				end_page_writeback(p);
3895 			if (atomic_sub_and_test(num_pages - i, &eb->io_pages))
3896 				end_extent_buffer_writeback(eb);
3897 			ret = -EIO;
3898 			break;
3899 		}
3900 		offset += PAGE_SIZE;
3901 		update_nr_written(wbc, 1);
3902 		unlock_page(p);
3903 	}
3904 
3905 	if (unlikely(ret)) {
3906 		for (; i < num_pages; i++) {
3907 			struct page *p = eb->pages[i];
3908 			clear_page_dirty_for_io(p);
3909 			unlock_page(p);
3910 		}
3911 	}
3912 
3913 	return ret;
3914 }
3915 
btree_write_cache_pages(struct address_space * mapping,struct writeback_control * wbc)3916 int btree_write_cache_pages(struct address_space *mapping,
3917 				   struct writeback_control *wbc)
3918 {
3919 	struct extent_io_tree *tree = &BTRFS_I(mapping->host)->io_tree;
3920 	struct extent_buffer *eb, *prev_eb = NULL;
3921 	struct extent_page_data epd = {
3922 		.bio = NULL,
3923 		.tree = tree,
3924 		.extent_locked = 0,
3925 		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
3926 	};
3927 	int ret = 0;
3928 	int done = 0;
3929 	int nr_to_write_done = 0;
3930 	struct pagevec pvec;
3931 	int nr_pages;
3932 	pgoff_t index;
3933 	pgoff_t end;		/* Inclusive */
3934 	int scanned = 0;
3935 	xa_mark_t tag;
3936 
3937 	pagevec_init(&pvec);
3938 	if (wbc->range_cyclic) {
3939 		index = mapping->writeback_index; /* Start from prev offset */
3940 		end = -1;
3941 	} else {
3942 		index = wbc->range_start >> PAGE_SHIFT;
3943 		end = wbc->range_end >> PAGE_SHIFT;
3944 		scanned = 1;
3945 	}
3946 	if (wbc->sync_mode == WB_SYNC_ALL)
3947 		tag = PAGECACHE_TAG_TOWRITE;
3948 	else
3949 		tag = PAGECACHE_TAG_DIRTY;
3950 retry:
3951 	if (wbc->sync_mode == WB_SYNC_ALL)
3952 		tag_pages_for_writeback(mapping, index, end);
3953 	while (!done && !nr_to_write_done && (index <= end) &&
3954 	       (nr_pages = pagevec_lookup_range_tag(&pvec, mapping, &index, end,
3955 			tag))) {
3956 		unsigned i;
3957 
3958 		scanned = 1;
3959 		for (i = 0; i < nr_pages; i++) {
3960 			struct page *page = pvec.pages[i];
3961 
3962 			if (!PagePrivate(page))
3963 				continue;
3964 
3965 			spin_lock(&mapping->private_lock);
3966 			if (!PagePrivate(page)) {
3967 				spin_unlock(&mapping->private_lock);
3968 				continue;
3969 			}
3970 
3971 			eb = (struct extent_buffer *)page->private;
3972 
3973 			/*
3974 			 * Shouldn't happen and normally this would be a BUG_ON
3975 			 * but no sense in crashing the users box for something
3976 			 * we can survive anyway.
3977 			 */
3978 			if (WARN_ON(!eb)) {
3979 				spin_unlock(&mapping->private_lock);
3980 				continue;
3981 			}
3982 
3983 			if (eb == prev_eb) {
3984 				spin_unlock(&mapping->private_lock);
3985 				continue;
3986 			}
3987 
3988 			ret = atomic_inc_not_zero(&eb->refs);
3989 			spin_unlock(&mapping->private_lock);
3990 			if (!ret)
3991 				continue;
3992 
3993 			prev_eb = eb;
3994 			ret = lock_extent_buffer_for_io(eb, &epd);
3995 			if (!ret) {
3996 				free_extent_buffer(eb);
3997 				continue;
3998 			} else if (ret < 0) {
3999 				done = 1;
4000 				free_extent_buffer(eb);
4001 				break;
4002 			}
4003 
4004 			ret = write_one_eb(eb, wbc, &epd);
4005 			if (ret) {
4006 				done = 1;
4007 				free_extent_buffer(eb);
4008 				break;
4009 			}
4010 			free_extent_buffer(eb);
4011 
4012 			/*
4013 			 * the filesystem may choose to bump up nr_to_write.
4014 			 * We have to make sure to honor the new nr_to_write
4015 			 * at any time
4016 			 */
4017 			nr_to_write_done = wbc->nr_to_write <= 0;
4018 		}
4019 		pagevec_release(&pvec);
4020 		cond_resched();
4021 	}
4022 	if (!scanned && !done) {
4023 		/*
4024 		 * We hit the last page and there is more work to be done: wrap
4025 		 * back to the start of the file
4026 		 */
4027 		scanned = 1;
4028 		index = 0;
4029 		goto retry;
4030 	}
4031 	ASSERT(ret <= 0);
4032 	if (ret < 0) {
4033 		end_write_bio(&epd, ret);
4034 		return ret;
4035 	}
4036 	ret = flush_write_bio(&epd);
4037 	return ret;
4038 }
4039 
4040 /**
4041  * write_cache_pages - walk the list of dirty pages of the given address space and write all of them.
4042  * @mapping: address space structure to write
4043  * @wbc: subtract the number of written pages from *@wbc->nr_to_write
4044  * @data: data passed to __extent_writepage function
4045  *
4046  * If a page is already under I/O, write_cache_pages() skips it, even
4047  * if it's dirty.  This is desirable behaviour for memory-cleaning writeback,
4048  * but it is INCORRECT for data-integrity system calls such as fsync().  fsync()
4049  * and msync() need to guarantee that all the data which was dirty at the time
4050  * the call was made get new I/O started against them.  If wbc->sync_mode is
4051  * WB_SYNC_ALL then we were called for data integrity and we must wait for
4052  * existing IO to complete.
4053  */
extent_write_cache_pages(struct address_space * mapping,struct writeback_control * wbc,struct extent_page_data * epd)4054 static int extent_write_cache_pages(struct address_space *mapping,
4055 			     struct writeback_control *wbc,
4056 			     struct extent_page_data *epd)
4057 {
4058 	struct inode *inode = mapping->host;
4059 	int ret = 0;
4060 	int done = 0;
4061 	int nr_to_write_done = 0;
4062 	struct pagevec pvec;
4063 	int nr_pages;
4064 	pgoff_t index;
4065 	pgoff_t end;		/* Inclusive */
4066 	pgoff_t done_index;
4067 	int range_whole = 0;
4068 	int scanned = 0;
4069 	xa_mark_t tag;
4070 
4071 	/*
4072 	 * We have to hold onto the inode so that ordered extents can do their
4073 	 * work when the IO finishes.  The alternative to this is failing to add
4074 	 * an ordered extent if the igrab() fails there and that is a huge pain
4075 	 * to deal with, so instead just hold onto the inode throughout the
4076 	 * writepages operation.  If it fails here we are freeing up the inode
4077 	 * anyway and we'd rather not waste our time writing out stuff that is
4078 	 * going to be truncated anyway.
4079 	 */
4080 	if (!igrab(inode))
4081 		return 0;
4082 
4083 	pagevec_init(&pvec);
4084 	if (wbc->range_cyclic) {
4085 		index = mapping->writeback_index; /* Start from prev offset */
4086 		end = -1;
4087 	} else {
4088 		index = wbc->range_start >> PAGE_SHIFT;
4089 		end = wbc->range_end >> PAGE_SHIFT;
4090 		if (wbc->range_start == 0 && wbc->range_end == LLONG_MAX)
4091 			range_whole = 1;
4092 		scanned = 1;
4093 	}
4094 
4095 	/*
4096 	 * We do the tagged writepage as long as the snapshot flush bit is set
4097 	 * and we are the first one who do the filemap_flush() on this inode.
4098 	 *
4099 	 * The nr_to_write == LONG_MAX is needed to make sure other flushers do
4100 	 * not race in and drop the bit.
4101 	 */
4102 	if (range_whole && wbc->nr_to_write == LONG_MAX &&
4103 	    test_and_clear_bit(BTRFS_INODE_SNAPSHOT_FLUSH,
4104 			       &BTRFS_I(inode)->runtime_flags))
4105 		wbc->tagged_writepages = 1;
4106 
4107 	if (wbc->sync_mode == WB_SYNC_ALL || wbc->tagged_writepages)
4108 		tag = PAGECACHE_TAG_TOWRITE;
4109 	else
4110 		tag = PAGECACHE_TAG_DIRTY;
4111 retry:
4112 	if (wbc->sync_mode == WB_SYNC_ALL || wbc->tagged_writepages)
4113 		tag_pages_for_writeback(mapping, index, end);
4114 	done_index = index;
4115 	while (!done && !nr_to_write_done && (index <= end) &&
4116 			(nr_pages = pagevec_lookup_range_tag(&pvec, mapping,
4117 						&index, end, tag))) {
4118 		unsigned i;
4119 
4120 		scanned = 1;
4121 		for (i = 0; i < nr_pages; i++) {
4122 			struct page *page = pvec.pages[i];
4123 
4124 			done_index = page->index + 1;
4125 			/*
4126 			 * At this point we hold neither the i_pages lock nor
4127 			 * the page lock: the page may be truncated or
4128 			 * invalidated (changing page->mapping to NULL),
4129 			 * or even swizzled back from swapper_space to
4130 			 * tmpfs file mapping
4131 			 */
4132 			if (!trylock_page(page)) {
4133 				ret = flush_write_bio(epd);
4134 				BUG_ON(ret < 0);
4135 				lock_page(page);
4136 			}
4137 
4138 			if (unlikely(page->mapping != mapping)) {
4139 				unlock_page(page);
4140 				continue;
4141 			}
4142 
4143 			if (wbc->sync_mode != WB_SYNC_NONE) {
4144 				if (PageWriteback(page)) {
4145 					ret = flush_write_bio(epd);
4146 					BUG_ON(ret < 0);
4147 				}
4148 				wait_on_page_writeback(page);
4149 			}
4150 
4151 			if (PageWriteback(page) ||
4152 			    !clear_page_dirty_for_io(page)) {
4153 				unlock_page(page);
4154 				continue;
4155 			}
4156 
4157 			ret = __extent_writepage(page, wbc, epd);
4158 			if (ret < 0) {
4159 				done = 1;
4160 				break;
4161 			}
4162 
4163 			/*
4164 			 * the filesystem may choose to bump up nr_to_write.
4165 			 * We have to make sure to honor the new nr_to_write
4166 			 * at any time
4167 			 */
4168 			nr_to_write_done = wbc->nr_to_write <= 0;
4169 		}
4170 		pagevec_release(&pvec);
4171 		cond_resched();
4172 	}
4173 	if (!scanned && !done) {
4174 		/*
4175 		 * We hit the last page and there is more work to be done: wrap
4176 		 * back to the start of the file
4177 		 */
4178 		scanned = 1;
4179 		index = 0;
4180 		goto retry;
4181 	}
4182 
4183 	if (wbc->range_cyclic || (wbc->nr_to_write > 0 && range_whole))
4184 		mapping->writeback_index = done_index;
4185 
4186 	btrfs_add_delayed_iput(inode);
4187 	return ret;
4188 }
4189 
extent_write_full_page(struct page * page,struct writeback_control * wbc)4190 int extent_write_full_page(struct page *page, struct writeback_control *wbc)
4191 {
4192 	int ret;
4193 	struct extent_page_data epd = {
4194 		.bio = NULL,
4195 		.tree = &BTRFS_I(page->mapping->host)->io_tree,
4196 		.extent_locked = 0,
4197 		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4198 	};
4199 
4200 	ret = __extent_writepage(page, wbc, &epd);
4201 	ASSERT(ret <= 0);
4202 	if (ret < 0) {
4203 		end_write_bio(&epd, ret);
4204 		return ret;
4205 	}
4206 
4207 	ret = flush_write_bio(&epd);
4208 	ASSERT(ret <= 0);
4209 	return ret;
4210 }
4211 
extent_write_locked_range(struct inode * inode,u64 start,u64 end,int mode)4212 int extent_write_locked_range(struct inode *inode, u64 start, u64 end,
4213 			      int mode)
4214 {
4215 	int ret = 0;
4216 	struct address_space *mapping = inode->i_mapping;
4217 	struct extent_io_tree *tree = &BTRFS_I(inode)->io_tree;
4218 	struct page *page;
4219 	unsigned long nr_pages = (end - start + PAGE_SIZE) >>
4220 		PAGE_SHIFT;
4221 
4222 	struct extent_page_data epd = {
4223 		.bio = NULL,
4224 		.tree = tree,
4225 		.extent_locked = 1,
4226 		.sync_io = mode == WB_SYNC_ALL,
4227 	};
4228 	struct writeback_control wbc_writepages = {
4229 		.sync_mode	= mode,
4230 		.nr_to_write	= nr_pages * 2,
4231 		.range_start	= start,
4232 		.range_end	= end + 1,
4233 	};
4234 
4235 	while (start <= end) {
4236 		page = find_get_page(mapping, start >> PAGE_SHIFT);
4237 		if (clear_page_dirty_for_io(page))
4238 			ret = __extent_writepage(page, &wbc_writepages, &epd);
4239 		else {
4240 			btrfs_writepage_endio_finish_ordered(page, start,
4241 						    start + PAGE_SIZE - 1, 1);
4242 			unlock_page(page);
4243 		}
4244 		put_page(page);
4245 		start += PAGE_SIZE;
4246 	}
4247 
4248 	ASSERT(ret <= 0);
4249 	if (ret < 0) {
4250 		end_write_bio(&epd, ret);
4251 		return ret;
4252 	}
4253 	ret = flush_write_bio(&epd);
4254 	return ret;
4255 }
4256 
extent_writepages(struct address_space * mapping,struct writeback_control * wbc)4257 int extent_writepages(struct address_space *mapping,
4258 		      struct writeback_control *wbc)
4259 {
4260 	int ret = 0;
4261 	struct extent_page_data epd = {
4262 		.bio = NULL,
4263 		.tree = &BTRFS_I(mapping->host)->io_tree,
4264 		.extent_locked = 0,
4265 		.sync_io = wbc->sync_mode == WB_SYNC_ALL,
4266 	};
4267 
4268 	ret = extent_write_cache_pages(mapping, wbc, &epd);
4269 	ASSERT(ret <= 0);
4270 	if (ret < 0) {
4271 		end_write_bio(&epd, ret);
4272 		return ret;
4273 	}
4274 	ret = flush_write_bio(&epd);
4275 	return ret;
4276 }
4277 
extent_readpages(struct address_space * mapping,struct list_head * pages,unsigned nr_pages)4278 int extent_readpages(struct address_space *mapping, struct list_head *pages,
4279 		     unsigned nr_pages)
4280 {
4281 	struct bio *bio = NULL;
4282 	unsigned long bio_flags = 0;
4283 	struct page *pagepool[16];
4284 	struct extent_map *em_cached = NULL;
4285 	struct extent_io_tree *tree = &BTRFS_I(mapping->host)->io_tree;
4286 	int nr = 0;
4287 	u64 prev_em_start = (u64)-1;
4288 
4289 	while (!list_empty(pages)) {
4290 		u64 contig_end = 0;
4291 
4292 		for (nr = 0; nr < ARRAY_SIZE(pagepool) && !list_empty(pages);) {
4293 			struct page *page = lru_to_page(pages);
4294 
4295 			prefetchw(&page->flags);
4296 			list_del(&page->lru);
4297 			if (add_to_page_cache_lru(page, mapping, page->index,
4298 						readahead_gfp_mask(mapping))) {
4299 				put_page(page);
4300 				break;
4301 			}
4302 
4303 			pagepool[nr++] = page;
4304 			contig_end = page_offset(page) + PAGE_SIZE - 1;
4305 		}
4306 
4307 		if (nr) {
4308 			u64 contig_start = page_offset(pagepool[0]);
4309 
4310 			ASSERT(contig_start + nr * PAGE_SIZE - 1 == contig_end);
4311 
4312 			contiguous_readpages(tree, pagepool, nr, contig_start,
4313 				     contig_end, &em_cached, &bio, &bio_flags,
4314 				     &prev_em_start);
4315 		}
4316 	}
4317 
4318 	if (em_cached)
4319 		free_extent_map(em_cached);
4320 
4321 	if (bio)
4322 		return submit_one_bio(bio, 0, bio_flags);
4323 	return 0;
4324 }
4325 
4326 /*
4327  * basic invalidatepage code, this waits on any locked or writeback
4328  * ranges corresponding to the page, and then deletes any extent state
4329  * records from the tree
4330  */
extent_invalidatepage(struct extent_io_tree * tree,struct page * page,unsigned long offset)4331 int extent_invalidatepage(struct extent_io_tree *tree,
4332 			  struct page *page, unsigned long offset)
4333 {
4334 	struct extent_state *cached_state = NULL;
4335 	u64 start = page_offset(page);
4336 	u64 end = start + PAGE_SIZE - 1;
4337 	size_t blocksize = page->mapping->host->i_sb->s_blocksize;
4338 
4339 	start += ALIGN(offset, blocksize);
4340 	if (start > end)
4341 		return 0;
4342 
4343 	lock_extent_bits(tree, start, end, &cached_state);
4344 	wait_on_page_writeback(page);
4345 	clear_extent_bit(tree, start, end, EXTENT_LOCKED | EXTENT_DELALLOC |
4346 			 EXTENT_DO_ACCOUNTING, 1, 1, &cached_state);
4347 	return 0;
4348 }
4349 
4350 /*
4351  * a helper for releasepage, this tests for areas of the page that
4352  * are locked or under IO and drops the related state bits if it is safe
4353  * to drop the page.
4354  */
try_release_extent_state(struct extent_io_tree * tree,struct page * page,gfp_t mask)4355 static int try_release_extent_state(struct extent_io_tree *tree,
4356 				    struct page *page, gfp_t mask)
4357 {
4358 	u64 start = page_offset(page);
4359 	u64 end = start + PAGE_SIZE - 1;
4360 	int ret = 1;
4361 
4362 	if (test_range_bit(tree, start, end, EXTENT_LOCKED, 0, NULL)) {
4363 		ret = 0;
4364 	} else {
4365 		/*
4366 		 * at this point we can safely clear everything except the
4367 		 * locked bit and the nodatasum bit
4368 		 */
4369 		ret = __clear_extent_bit(tree, start, end,
4370 				 ~(EXTENT_LOCKED | EXTENT_NODATASUM),
4371 				 0, 0, NULL, mask, NULL);
4372 
4373 		/* if clear_extent_bit failed for enomem reasons,
4374 		 * we can't allow the release to continue.
4375 		 */
4376 		if (ret < 0)
4377 			ret = 0;
4378 		else
4379 			ret = 1;
4380 	}
4381 	return ret;
4382 }
4383 
4384 /*
4385  * a helper for releasepage.  As long as there are no locked extents
4386  * in the range corresponding to the page, both state records and extent
4387  * map records are removed
4388  */
try_release_extent_mapping(struct page * page,gfp_t mask)4389 int try_release_extent_mapping(struct page *page, gfp_t mask)
4390 {
4391 	struct extent_map *em;
4392 	u64 start = page_offset(page);
4393 	u64 end = start + PAGE_SIZE - 1;
4394 	struct btrfs_inode *btrfs_inode = BTRFS_I(page->mapping->host);
4395 	struct extent_io_tree *tree = &btrfs_inode->io_tree;
4396 	struct extent_map_tree *map = &btrfs_inode->extent_tree;
4397 
4398 	if (gfpflags_allow_blocking(mask) &&
4399 	    page->mapping->host->i_size > SZ_16M) {
4400 		u64 len;
4401 		while (start <= end) {
4402 			len = end - start + 1;
4403 			write_lock(&map->lock);
4404 			em = lookup_extent_mapping(map, start, len);
4405 			if (!em) {
4406 				write_unlock(&map->lock);
4407 				break;
4408 			}
4409 			if (test_bit(EXTENT_FLAG_PINNED, &em->flags) ||
4410 			    em->start != start) {
4411 				write_unlock(&map->lock);
4412 				free_extent_map(em);
4413 				break;
4414 			}
4415 			if (!test_range_bit(tree, em->start,
4416 					    extent_map_end(em) - 1,
4417 					    EXTENT_LOCKED, 0, NULL)) {
4418 				set_bit(BTRFS_INODE_NEEDS_FULL_SYNC,
4419 					&btrfs_inode->runtime_flags);
4420 				remove_extent_mapping(map, em);
4421 				/* once for the rb tree */
4422 				free_extent_map(em);
4423 			}
4424 			start = extent_map_end(em);
4425 			write_unlock(&map->lock);
4426 
4427 			/* once for us */
4428 			free_extent_map(em);
4429 		}
4430 	}
4431 	return try_release_extent_state(tree, page, mask);
4432 }
4433 
4434 /*
4435  * helper function for fiemap, which doesn't want to see any holes.
4436  * This maps until we find something past 'last'
4437  */
get_extent_skip_holes(struct inode * inode,u64 offset,u64 last)4438 static struct extent_map *get_extent_skip_holes(struct inode *inode,
4439 						u64 offset, u64 last)
4440 {
4441 	u64 sectorsize = btrfs_inode_sectorsize(inode);
4442 	struct extent_map *em;
4443 	u64 len;
4444 
4445 	if (offset >= last)
4446 		return NULL;
4447 
4448 	while (1) {
4449 		len = last - offset;
4450 		if (len == 0)
4451 			break;
4452 		len = ALIGN(len, sectorsize);
4453 		em = btrfs_get_extent_fiemap(BTRFS_I(inode), offset, len);
4454 		if (IS_ERR_OR_NULL(em))
4455 			return em;
4456 
4457 		/* if this isn't a hole return it */
4458 		if (em->block_start != EXTENT_MAP_HOLE)
4459 			return em;
4460 
4461 		/* this is a hole, advance to the next extent */
4462 		offset = extent_map_end(em);
4463 		free_extent_map(em);
4464 		if (offset >= last)
4465 			break;
4466 	}
4467 	return NULL;
4468 }
4469 
4470 /*
4471  * To cache previous fiemap extent
4472  *
4473  * Will be used for merging fiemap extent
4474  */
4475 struct fiemap_cache {
4476 	u64 offset;
4477 	u64 phys;
4478 	u64 len;
4479 	u32 flags;
4480 	bool cached;
4481 };
4482 
4483 /*
4484  * Helper to submit fiemap extent.
4485  *
4486  * Will try to merge current fiemap extent specified by @offset, @phys,
4487  * @len and @flags with cached one.
4488  * And only when we fails to merge, cached one will be submitted as
4489  * fiemap extent.
4490  *
4491  * Return value is the same as fiemap_fill_next_extent().
4492  */
emit_fiemap_extent(struct fiemap_extent_info * fieinfo,struct fiemap_cache * cache,u64 offset,u64 phys,u64 len,u32 flags)4493 static int emit_fiemap_extent(struct fiemap_extent_info *fieinfo,
4494 				struct fiemap_cache *cache,
4495 				u64 offset, u64 phys, u64 len, u32 flags)
4496 {
4497 	int ret = 0;
4498 
4499 	if (!cache->cached)
4500 		goto assign;
4501 
4502 	/*
4503 	 * Sanity check, extent_fiemap() should have ensured that new
4504 	 * fiemap extent won't overlap with cached one.
4505 	 * Not recoverable.
4506 	 *
4507 	 * NOTE: Physical address can overlap, due to compression
4508 	 */
4509 	if (cache->offset + cache->len > offset) {
4510 		WARN_ON(1);
4511 		return -EINVAL;
4512 	}
4513 
4514 	/*
4515 	 * Only merges fiemap extents if
4516 	 * 1) Their logical addresses are continuous
4517 	 *
4518 	 * 2) Their physical addresses are continuous
4519 	 *    So truly compressed (physical size smaller than logical size)
4520 	 *    extents won't get merged with each other
4521 	 *
4522 	 * 3) Share same flags except FIEMAP_EXTENT_LAST
4523 	 *    So regular extent won't get merged with prealloc extent
4524 	 */
4525 	if (cache->offset + cache->len  == offset &&
4526 	    cache->phys + cache->len == phys  &&
4527 	    (cache->flags & ~FIEMAP_EXTENT_LAST) ==
4528 			(flags & ~FIEMAP_EXTENT_LAST)) {
4529 		cache->len += len;
4530 		cache->flags |= flags;
4531 		goto try_submit_last;
4532 	}
4533 
4534 	/* Not mergeable, need to submit cached one */
4535 	ret = fiemap_fill_next_extent(fieinfo, cache->offset, cache->phys,
4536 				      cache->len, cache->flags);
4537 	cache->cached = false;
4538 	if (ret)
4539 		return ret;
4540 assign:
4541 	cache->cached = true;
4542 	cache->offset = offset;
4543 	cache->phys = phys;
4544 	cache->len = len;
4545 	cache->flags = flags;
4546 try_submit_last:
4547 	if (cache->flags & FIEMAP_EXTENT_LAST) {
4548 		ret = fiemap_fill_next_extent(fieinfo, cache->offset,
4549 				cache->phys, cache->len, cache->flags);
4550 		cache->cached = false;
4551 	}
4552 	return ret;
4553 }
4554 
4555 /*
4556  * Emit last fiemap cache
4557  *
4558  * The last fiemap cache may still be cached in the following case:
4559  * 0		      4k		    8k
4560  * |<- Fiemap range ->|
4561  * |<------------  First extent ----------->|
4562  *
4563  * In this case, the first extent range will be cached but not emitted.
4564  * So we must emit it before ending extent_fiemap().
4565  */
emit_last_fiemap_cache(struct fiemap_extent_info * fieinfo,struct fiemap_cache * cache)4566 static int emit_last_fiemap_cache(struct fiemap_extent_info *fieinfo,
4567 				  struct fiemap_cache *cache)
4568 {
4569 	int ret;
4570 
4571 	if (!cache->cached)
4572 		return 0;
4573 
4574 	ret = fiemap_fill_next_extent(fieinfo, cache->offset, cache->phys,
4575 				      cache->len, cache->flags);
4576 	cache->cached = false;
4577 	if (ret > 0)
4578 		ret = 0;
4579 	return ret;
4580 }
4581 
extent_fiemap(struct inode * inode,struct fiemap_extent_info * fieinfo,__u64 start,__u64 len)4582 int extent_fiemap(struct inode *inode, struct fiemap_extent_info *fieinfo,
4583 		__u64 start, __u64 len)
4584 {
4585 	int ret = 0;
4586 	u64 off = start;
4587 	u64 max = start + len;
4588 	u32 flags = 0;
4589 	u32 found_type;
4590 	u64 last;
4591 	u64 last_for_get_extent = 0;
4592 	u64 disko = 0;
4593 	u64 isize = i_size_read(inode);
4594 	struct btrfs_key found_key;
4595 	struct extent_map *em = NULL;
4596 	struct extent_state *cached_state = NULL;
4597 	struct btrfs_path *path;
4598 	struct btrfs_root *root = BTRFS_I(inode)->root;
4599 	struct fiemap_cache cache = { 0 };
4600 	struct ulist *roots;
4601 	struct ulist *tmp_ulist;
4602 	int end = 0;
4603 	u64 em_start = 0;
4604 	u64 em_len = 0;
4605 	u64 em_end = 0;
4606 
4607 	if (len == 0)
4608 		return -EINVAL;
4609 
4610 	path = btrfs_alloc_path();
4611 	if (!path)
4612 		return -ENOMEM;
4613 	path->leave_spinning = 1;
4614 
4615 	roots = ulist_alloc(GFP_KERNEL);
4616 	tmp_ulist = ulist_alloc(GFP_KERNEL);
4617 	if (!roots || !tmp_ulist) {
4618 		ret = -ENOMEM;
4619 		goto out_free_ulist;
4620 	}
4621 
4622 	start = round_down(start, btrfs_inode_sectorsize(inode));
4623 	len = round_up(max, btrfs_inode_sectorsize(inode)) - start;
4624 
4625 	/*
4626 	 * lookup the last file extent.  We're not using i_size here
4627 	 * because there might be preallocation past i_size
4628 	 */
4629 	ret = btrfs_lookup_file_extent(NULL, root, path,
4630 			btrfs_ino(BTRFS_I(inode)), -1, 0);
4631 	if (ret < 0) {
4632 		goto out_free_ulist;
4633 	} else {
4634 		WARN_ON(!ret);
4635 		if (ret == 1)
4636 			ret = 0;
4637 	}
4638 
4639 	path->slots[0]--;
4640 	btrfs_item_key_to_cpu(path->nodes[0], &found_key, path->slots[0]);
4641 	found_type = found_key.type;
4642 
4643 	/* No extents, but there might be delalloc bits */
4644 	if (found_key.objectid != btrfs_ino(BTRFS_I(inode)) ||
4645 	    found_type != BTRFS_EXTENT_DATA_KEY) {
4646 		/* have to trust i_size as the end */
4647 		last = (u64)-1;
4648 		last_for_get_extent = isize;
4649 	} else {
4650 		/*
4651 		 * remember the start of the last extent.  There are a
4652 		 * bunch of different factors that go into the length of the
4653 		 * extent, so its much less complex to remember where it started
4654 		 */
4655 		last = found_key.offset;
4656 		last_for_get_extent = last + 1;
4657 	}
4658 	btrfs_release_path(path);
4659 
4660 	/*
4661 	 * we might have some extents allocated but more delalloc past those
4662 	 * extents.  so, we trust isize unless the start of the last extent is
4663 	 * beyond isize
4664 	 */
4665 	if (last < isize) {
4666 		last = (u64)-1;
4667 		last_for_get_extent = isize;
4668 	}
4669 
4670 	lock_extent_bits(&BTRFS_I(inode)->io_tree, start, start + len - 1,
4671 			 &cached_state);
4672 
4673 	em = get_extent_skip_holes(inode, start, last_for_get_extent);
4674 	if (!em)
4675 		goto out;
4676 	if (IS_ERR(em)) {
4677 		ret = PTR_ERR(em);
4678 		goto out;
4679 	}
4680 
4681 	while (!end) {
4682 		u64 offset_in_extent = 0;
4683 
4684 		/* break if the extent we found is outside the range */
4685 		if (em->start >= max || extent_map_end(em) < off)
4686 			break;
4687 
4688 		/*
4689 		 * get_extent may return an extent that starts before our
4690 		 * requested range.  We have to make sure the ranges
4691 		 * we return to fiemap always move forward and don't
4692 		 * overlap, so adjust the offsets here
4693 		 */
4694 		em_start = max(em->start, off);
4695 
4696 		/*
4697 		 * record the offset from the start of the extent
4698 		 * for adjusting the disk offset below.  Only do this if the
4699 		 * extent isn't compressed since our in ram offset may be past
4700 		 * what we have actually allocated on disk.
4701 		 */
4702 		if (!test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
4703 			offset_in_extent = em_start - em->start;
4704 		em_end = extent_map_end(em);
4705 		em_len = em_end - em_start;
4706 		flags = 0;
4707 		if (em->block_start < EXTENT_MAP_LAST_BYTE)
4708 			disko = em->block_start + offset_in_extent;
4709 		else
4710 			disko = 0;
4711 
4712 		/*
4713 		 * bump off for our next call to get_extent
4714 		 */
4715 		off = extent_map_end(em);
4716 		if (off >= max)
4717 			end = 1;
4718 
4719 		if (em->block_start == EXTENT_MAP_LAST_BYTE) {
4720 			end = 1;
4721 			flags |= FIEMAP_EXTENT_LAST;
4722 		} else if (em->block_start == EXTENT_MAP_INLINE) {
4723 			flags |= (FIEMAP_EXTENT_DATA_INLINE |
4724 				  FIEMAP_EXTENT_NOT_ALIGNED);
4725 		} else if (em->block_start == EXTENT_MAP_DELALLOC) {
4726 			flags |= (FIEMAP_EXTENT_DELALLOC |
4727 				  FIEMAP_EXTENT_UNKNOWN);
4728 		} else if (fieinfo->fi_extents_max) {
4729 			u64 bytenr = em->block_start -
4730 				(em->start - em->orig_start);
4731 
4732 			/*
4733 			 * As btrfs supports shared space, this information
4734 			 * can be exported to userspace tools via
4735 			 * flag FIEMAP_EXTENT_SHARED.  If fi_extents_max == 0
4736 			 * then we're just getting a count and we can skip the
4737 			 * lookup stuff.
4738 			 */
4739 			ret = btrfs_check_shared(root,
4740 						 btrfs_ino(BTRFS_I(inode)),
4741 						 bytenr, roots, tmp_ulist);
4742 			if (ret < 0)
4743 				goto out_free;
4744 			if (ret)
4745 				flags |= FIEMAP_EXTENT_SHARED;
4746 			ret = 0;
4747 		}
4748 		if (test_bit(EXTENT_FLAG_COMPRESSED, &em->flags))
4749 			flags |= FIEMAP_EXTENT_ENCODED;
4750 		if (test_bit(EXTENT_FLAG_PREALLOC, &em->flags))
4751 			flags |= FIEMAP_EXTENT_UNWRITTEN;
4752 
4753 		free_extent_map(em);
4754 		em = NULL;
4755 		if ((em_start >= last) || em_len == (u64)-1 ||
4756 		   (last == (u64)-1 && isize <= em_end)) {
4757 			flags |= FIEMAP_EXTENT_LAST;
4758 			end = 1;
4759 		}
4760 
4761 		/* now scan forward to see if this is really the last extent. */
4762 		em = get_extent_skip_holes(inode, off, last_for_get_extent);
4763 		if (IS_ERR(em)) {
4764 			ret = PTR_ERR(em);
4765 			goto out;
4766 		}
4767 		if (!em) {
4768 			flags |= FIEMAP_EXTENT_LAST;
4769 			end = 1;
4770 		}
4771 		ret = emit_fiemap_extent(fieinfo, &cache, em_start, disko,
4772 					   em_len, flags);
4773 		if (ret) {
4774 			if (ret == 1)
4775 				ret = 0;
4776 			goto out_free;
4777 		}
4778 	}
4779 out_free:
4780 	if (!ret)
4781 		ret = emit_last_fiemap_cache(fieinfo, &cache);
4782 	free_extent_map(em);
4783 out:
4784 	unlock_extent_cached(&BTRFS_I(inode)->io_tree, start, start + len - 1,
4785 			     &cached_state);
4786 
4787 out_free_ulist:
4788 	btrfs_free_path(path);
4789 	ulist_free(roots);
4790 	ulist_free(tmp_ulist);
4791 	return ret;
4792 }
4793 
__free_extent_buffer(struct extent_buffer * eb)4794 static void __free_extent_buffer(struct extent_buffer *eb)
4795 {
4796 	btrfs_leak_debug_del(&eb->leak_list);
4797 	kmem_cache_free(extent_buffer_cache, eb);
4798 }
4799 
extent_buffer_under_io(struct extent_buffer * eb)4800 int extent_buffer_under_io(struct extent_buffer *eb)
4801 {
4802 	return (atomic_read(&eb->io_pages) ||
4803 		test_bit(EXTENT_BUFFER_WRITEBACK, &eb->bflags) ||
4804 		test_bit(EXTENT_BUFFER_DIRTY, &eb->bflags));
4805 }
4806 
4807 /*
4808  * Release all pages attached to the extent buffer.
4809  */
btrfs_release_extent_buffer_pages(struct extent_buffer * eb)4810 static void btrfs_release_extent_buffer_pages(struct extent_buffer *eb)
4811 {
4812 	int i;
4813 	int num_pages;
4814 	int mapped = !test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags);
4815 
4816 	BUG_ON(extent_buffer_under_io(eb));
4817 
4818 	num_pages = num_extent_pages(eb);
4819 	for (i = 0; i < num_pages; i++) {
4820 		struct page *page = eb->pages[i];
4821 
4822 		if (!page)
4823 			continue;
4824 		if (mapped)
4825 			spin_lock(&page->mapping->private_lock);
4826 		/*
4827 		 * We do this since we'll remove the pages after we've
4828 		 * removed the eb from the radix tree, so we could race
4829 		 * and have this page now attached to the new eb.  So
4830 		 * only clear page_private if it's still connected to
4831 		 * this eb.
4832 		 */
4833 		if (PagePrivate(page) &&
4834 		    page->private == (unsigned long)eb) {
4835 			BUG_ON(test_bit(EXTENT_BUFFER_DIRTY, &eb->bflags));
4836 			BUG_ON(PageDirty(page));
4837 			BUG_ON(PageWriteback(page));
4838 			/*
4839 			 * We need to make sure we haven't be attached
4840 			 * to a new eb.
4841 			 */
4842 			ClearPagePrivate(page);
4843 			set_page_private(page, 0);
4844 			/* One for the page private */
4845 			put_page(page);
4846 		}
4847 
4848 		if (mapped)
4849 			spin_unlock(&page->mapping->private_lock);
4850 
4851 		/* One for when we allocated the page */
4852 		put_page(page);
4853 	}
4854 }
4855 
4856 /*
4857  * Helper for releasing the extent buffer.
4858  */
btrfs_release_extent_buffer(struct extent_buffer * eb)4859 static inline void btrfs_release_extent_buffer(struct extent_buffer *eb)
4860 {
4861 	btrfs_release_extent_buffer_pages(eb);
4862 	__free_extent_buffer(eb);
4863 }
4864 
4865 static struct extent_buffer *
__alloc_extent_buffer(struct btrfs_fs_info * fs_info,u64 start,unsigned long len)4866 __alloc_extent_buffer(struct btrfs_fs_info *fs_info, u64 start,
4867 		      unsigned long len)
4868 {
4869 	struct extent_buffer *eb = NULL;
4870 
4871 	eb = kmem_cache_zalloc(extent_buffer_cache, GFP_NOFS|__GFP_NOFAIL);
4872 	eb->start = start;
4873 	eb->len = len;
4874 	eb->fs_info = fs_info;
4875 	eb->bflags = 0;
4876 	rwlock_init(&eb->lock);
4877 	atomic_set(&eb->blocking_readers, 0);
4878 	eb->blocking_writers = 0;
4879 	eb->lock_nested = false;
4880 	init_waitqueue_head(&eb->write_lock_wq);
4881 	init_waitqueue_head(&eb->read_lock_wq);
4882 
4883 	btrfs_leak_debug_add(&eb->leak_list, &buffers);
4884 
4885 	spin_lock_init(&eb->refs_lock);
4886 	atomic_set(&eb->refs, 1);
4887 	atomic_set(&eb->io_pages, 0);
4888 
4889 	/*
4890 	 * Sanity checks, currently the maximum is 64k covered by 16x 4k pages
4891 	 */
4892 	BUILD_BUG_ON(BTRFS_MAX_METADATA_BLOCKSIZE
4893 		> MAX_INLINE_EXTENT_BUFFER_SIZE);
4894 	BUG_ON(len > MAX_INLINE_EXTENT_BUFFER_SIZE);
4895 
4896 #ifdef CONFIG_BTRFS_DEBUG
4897 	eb->spinning_writers = 0;
4898 	atomic_set(&eb->spinning_readers, 0);
4899 	atomic_set(&eb->read_locks, 0);
4900 	eb->write_locks = 0;
4901 #endif
4902 
4903 	return eb;
4904 }
4905 
btrfs_clone_extent_buffer(struct extent_buffer * src)4906 struct extent_buffer *btrfs_clone_extent_buffer(struct extent_buffer *src)
4907 {
4908 	int i;
4909 	struct page *p;
4910 	struct extent_buffer *new;
4911 	int num_pages = num_extent_pages(src);
4912 
4913 	new = __alloc_extent_buffer(src->fs_info, src->start, src->len);
4914 	if (new == NULL)
4915 		return NULL;
4916 
4917 	for (i = 0; i < num_pages; i++) {
4918 		p = alloc_page(GFP_NOFS);
4919 		if (!p) {
4920 			btrfs_release_extent_buffer(new);
4921 			return NULL;
4922 		}
4923 		attach_extent_buffer_page(new, p);
4924 		WARN_ON(PageDirty(p));
4925 		SetPageUptodate(p);
4926 		new->pages[i] = p;
4927 		copy_page(page_address(p), page_address(src->pages[i]));
4928 	}
4929 
4930 	set_bit(EXTENT_BUFFER_UPTODATE, &new->bflags);
4931 	set_bit(EXTENT_BUFFER_UNMAPPED, &new->bflags);
4932 
4933 	return new;
4934 }
4935 
__alloc_dummy_extent_buffer(struct btrfs_fs_info * fs_info,u64 start,unsigned long len)4936 struct extent_buffer *__alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
4937 						  u64 start, unsigned long len)
4938 {
4939 	struct extent_buffer *eb;
4940 	int num_pages;
4941 	int i;
4942 
4943 	eb = __alloc_extent_buffer(fs_info, start, len);
4944 	if (!eb)
4945 		return NULL;
4946 
4947 	num_pages = num_extent_pages(eb);
4948 	for (i = 0; i < num_pages; i++) {
4949 		eb->pages[i] = alloc_page(GFP_NOFS);
4950 		if (!eb->pages[i])
4951 			goto err;
4952 	}
4953 	set_extent_buffer_uptodate(eb);
4954 	btrfs_set_header_nritems(eb, 0);
4955 	set_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags);
4956 
4957 	return eb;
4958 err:
4959 	for (; i > 0; i--)
4960 		__free_page(eb->pages[i - 1]);
4961 	__free_extent_buffer(eb);
4962 	return NULL;
4963 }
4964 
alloc_dummy_extent_buffer(struct btrfs_fs_info * fs_info,u64 start)4965 struct extent_buffer *alloc_dummy_extent_buffer(struct btrfs_fs_info *fs_info,
4966 						u64 start)
4967 {
4968 	return __alloc_dummy_extent_buffer(fs_info, start, fs_info->nodesize);
4969 }
4970 
check_buffer_tree_ref(struct extent_buffer * eb)4971 static void check_buffer_tree_ref(struct extent_buffer *eb)
4972 {
4973 	int refs;
4974 	/* the ref bit is tricky.  We have to make sure it is set
4975 	 * if we have the buffer dirty.   Otherwise the
4976 	 * code to free a buffer can end up dropping a dirty
4977 	 * page
4978 	 *
4979 	 * Once the ref bit is set, it won't go away while the
4980 	 * buffer is dirty or in writeback, and it also won't
4981 	 * go away while we have the reference count on the
4982 	 * eb bumped.
4983 	 *
4984 	 * We can't just set the ref bit without bumping the
4985 	 * ref on the eb because free_extent_buffer might
4986 	 * see the ref bit and try to clear it.  If this happens
4987 	 * free_extent_buffer might end up dropping our original
4988 	 * ref by mistake and freeing the page before we are able
4989 	 * to add one more ref.
4990 	 *
4991 	 * So bump the ref count first, then set the bit.  If someone
4992 	 * beat us to it, drop the ref we added.
4993 	 */
4994 	refs = atomic_read(&eb->refs);
4995 	if (refs >= 2 && test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
4996 		return;
4997 
4998 	spin_lock(&eb->refs_lock);
4999 	if (!test_and_set_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
5000 		atomic_inc(&eb->refs);
5001 	spin_unlock(&eb->refs_lock);
5002 }
5003 
mark_extent_buffer_accessed(struct extent_buffer * eb,struct page * accessed)5004 static void mark_extent_buffer_accessed(struct extent_buffer *eb,
5005 		struct page *accessed)
5006 {
5007 	int num_pages, i;
5008 
5009 	check_buffer_tree_ref(eb);
5010 
5011 	num_pages = num_extent_pages(eb);
5012 	for (i = 0; i < num_pages; i++) {
5013 		struct page *p = eb->pages[i];
5014 
5015 		if (p != accessed)
5016 			mark_page_accessed(p);
5017 	}
5018 }
5019 
find_extent_buffer(struct btrfs_fs_info * fs_info,u64 start)5020 struct extent_buffer *find_extent_buffer(struct btrfs_fs_info *fs_info,
5021 					 u64 start)
5022 {
5023 	struct extent_buffer *eb;
5024 
5025 	rcu_read_lock();
5026 	eb = radix_tree_lookup(&fs_info->buffer_radix,
5027 			       start >> PAGE_SHIFT);
5028 	if (eb && atomic_inc_not_zero(&eb->refs)) {
5029 		rcu_read_unlock();
5030 		/*
5031 		 * Lock our eb's refs_lock to avoid races with
5032 		 * free_extent_buffer. When we get our eb it might be flagged
5033 		 * with EXTENT_BUFFER_STALE and another task running
5034 		 * free_extent_buffer might have seen that flag set,
5035 		 * eb->refs == 2, that the buffer isn't under IO (dirty and
5036 		 * writeback flags not set) and it's still in the tree (flag
5037 		 * EXTENT_BUFFER_TREE_REF set), therefore being in the process
5038 		 * of decrementing the extent buffer's reference count twice.
5039 		 * So here we could race and increment the eb's reference count,
5040 		 * clear its stale flag, mark it as dirty and drop our reference
5041 		 * before the other task finishes executing free_extent_buffer,
5042 		 * which would later result in an attempt to free an extent
5043 		 * buffer that is dirty.
5044 		 */
5045 		if (test_bit(EXTENT_BUFFER_STALE, &eb->bflags)) {
5046 			spin_lock(&eb->refs_lock);
5047 			spin_unlock(&eb->refs_lock);
5048 		}
5049 		mark_extent_buffer_accessed(eb, NULL);
5050 		return eb;
5051 	}
5052 	rcu_read_unlock();
5053 
5054 	return NULL;
5055 }
5056 
5057 #ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
alloc_test_extent_buffer(struct btrfs_fs_info * fs_info,u64 start)5058 struct extent_buffer *alloc_test_extent_buffer(struct btrfs_fs_info *fs_info,
5059 					u64 start)
5060 {
5061 	struct extent_buffer *eb, *exists = NULL;
5062 	int ret;
5063 
5064 	eb = find_extent_buffer(fs_info, start);
5065 	if (eb)
5066 		return eb;
5067 	eb = alloc_dummy_extent_buffer(fs_info, start);
5068 	if (!eb)
5069 		return ERR_PTR(-ENOMEM);
5070 	eb->fs_info = fs_info;
5071 again:
5072 	ret = radix_tree_preload(GFP_NOFS);
5073 	if (ret) {
5074 		exists = ERR_PTR(ret);
5075 		goto free_eb;
5076 	}
5077 	spin_lock(&fs_info->buffer_lock);
5078 	ret = radix_tree_insert(&fs_info->buffer_radix,
5079 				start >> PAGE_SHIFT, eb);
5080 	spin_unlock(&fs_info->buffer_lock);
5081 	radix_tree_preload_end();
5082 	if (ret == -EEXIST) {
5083 		exists = find_extent_buffer(fs_info, start);
5084 		if (exists)
5085 			goto free_eb;
5086 		else
5087 			goto again;
5088 	}
5089 	check_buffer_tree_ref(eb);
5090 	set_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags);
5091 
5092 	return eb;
5093 free_eb:
5094 	btrfs_release_extent_buffer(eb);
5095 	return exists;
5096 }
5097 #endif
5098 
alloc_extent_buffer(struct btrfs_fs_info * fs_info,u64 start)5099 struct extent_buffer *alloc_extent_buffer(struct btrfs_fs_info *fs_info,
5100 					  u64 start)
5101 {
5102 	unsigned long len = fs_info->nodesize;
5103 	int num_pages;
5104 	int i;
5105 	unsigned long index = start >> PAGE_SHIFT;
5106 	struct extent_buffer *eb;
5107 	struct extent_buffer *exists = NULL;
5108 	struct page *p;
5109 	struct address_space *mapping = fs_info->btree_inode->i_mapping;
5110 	int uptodate = 1;
5111 	int ret;
5112 
5113 	if (!IS_ALIGNED(start, fs_info->sectorsize)) {
5114 		btrfs_err(fs_info, "bad tree block start %llu", start);
5115 		return ERR_PTR(-EINVAL);
5116 	}
5117 
5118 	eb = find_extent_buffer(fs_info, start);
5119 	if (eb)
5120 		return eb;
5121 
5122 	eb = __alloc_extent_buffer(fs_info, start, len);
5123 	if (!eb)
5124 		return ERR_PTR(-ENOMEM);
5125 
5126 	num_pages = num_extent_pages(eb);
5127 	for (i = 0; i < num_pages; i++, index++) {
5128 		p = find_or_create_page(mapping, index, GFP_NOFS|__GFP_NOFAIL);
5129 		if (!p) {
5130 			exists = ERR_PTR(-ENOMEM);
5131 			goto free_eb;
5132 		}
5133 
5134 		spin_lock(&mapping->private_lock);
5135 		if (PagePrivate(p)) {
5136 			/*
5137 			 * We could have already allocated an eb for this page
5138 			 * and attached one so lets see if we can get a ref on
5139 			 * the existing eb, and if we can we know it's good and
5140 			 * we can just return that one, else we know we can just
5141 			 * overwrite page->private.
5142 			 */
5143 			exists = (struct extent_buffer *)p->private;
5144 			if (atomic_inc_not_zero(&exists->refs)) {
5145 				spin_unlock(&mapping->private_lock);
5146 				unlock_page(p);
5147 				put_page(p);
5148 				mark_extent_buffer_accessed(exists, p);
5149 				goto free_eb;
5150 			}
5151 			exists = NULL;
5152 
5153 			/*
5154 			 * Do this so attach doesn't complain and we need to
5155 			 * drop the ref the old guy had.
5156 			 */
5157 			ClearPagePrivate(p);
5158 			WARN_ON(PageDirty(p));
5159 			put_page(p);
5160 		}
5161 		attach_extent_buffer_page(eb, p);
5162 		spin_unlock(&mapping->private_lock);
5163 		WARN_ON(PageDirty(p));
5164 		eb->pages[i] = p;
5165 		if (!PageUptodate(p))
5166 			uptodate = 0;
5167 
5168 		/*
5169 		 * We can't unlock the pages just yet since the extent buffer
5170 		 * hasn't been properly inserted in the radix tree, this
5171 		 * opens a race with btree_releasepage which can free a page
5172 		 * while we are still filling in all pages for the buffer and
5173 		 * we could crash.
5174 		 */
5175 	}
5176 	if (uptodate)
5177 		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5178 again:
5179 	ret = radix_tree_preload(GFP_NOFS);
5180 	if (ret) {
5181 		exists = ERR_PTR(ret);
5182 		goto free_eb;
5183 	}
5184 
5185 	spin_lock(&fs_info->buffer_lock);
5186 	ret = radix_tree_insert(&fs_info->buffer_radix,
5187 				start >> PAGE_SHIFT, eb);
5188 	spin_unlock(&fs_info->buffer_lock);
5189 	radix_tree_preload_end();
5190 	if (ret == -EEXIST) {
5191 		exists = find_extent_buffer(fs_info, start);
5192 		if (exists)
5193 			goto free_eb;
5194 		else
5195 			goto again;
5196 	}
5197 	/* add one reference for the tree */
5198 	check_buffer_tree_ref(eb);
5199 	set_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags);
5200 
5201 	/*
5202 	 * Now it's safe to unlock the pages because any calls to
5203 	 * btree_releasepage will correctly detect that a page belongs to a
5204 	 * live buffer and won't free them prematurely.
5205 	 */
5206 	for (i = 0; i < num_pages; i++)
5207 		unlock_page(eb->pages[i]);
5208 	return eb;
5209 
5210 free_eb:
5211 	WARN_ON(!atomic_dec_and_test(&eb->refs));
5212 	for (i = 0; i < num_pages; i++) {
5213 		if (eb->pages[i])
5214 			unlock_page(eb->pages[i]);
5215 	}
5216 
5217 	btrfs_release_extent_buffer(eb);
5218 	return exists;
5219 }
5220 
btrfs_release_extent_buffer_rcu(struct rcu_head * head)5221 static inline void btrfs_release_extent_buffer_rcu(struct rcu_head *head)
5222 {
5223 	struct extent_buffer *eb =
5224 			container_of(head, struct extent_buffer, rcu_head);
5225 
5226 	__free_extent_buffer(eb);
5227 }
5228 
release_extent_buffer(struct extent_buffer * eb)5229 static int release_extent_buffer(struct extent_buffer *eb)
5230 {
5231 	lockdep_assert_held(&eb->refs_lock);
5232 
5233 	WARN_ON(atomic_read(&eb->refs) == 0);
5234 	if (atomic_dec_and_test(&eb->refs)) {
5235 		if (test_and_clear_bit(EXTENT_BUFFER_IN_TREE, &eb->bflags)) {
5236 			struct btrfs_fs_info *fs_info = eb->fs_info;
5237 
5238 			spin_unlock(&eb->refs_lock);
5239 
5240 			spin_lock(&fs_info->buffer_lock);
5241 			radix_tree_delete(&fs_info->buffer_radix,
5242 					  eb->start >> PAGE_SHIFT);
5243 			spin_unlock(&fs_info->buffer_lock);
5244 		} else {
5245 			spin_unlock(&eb->refs_lock);
5246 		}
5247 
5248 		/* Should be safe to release our pages at this point */
5249 		btrfs_release_extent_buffer_pages(eb);
5250 #ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
5251 		if (unlikely(test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags))) {
5252 			__free_extent_buffer(eb);
5253 			return 1;
5254 		}
5255 #endif
5256 		call_rcu(&eb->rcu_head, btrfs_release_extent_buffer_rcu);
5257 		return 1;
5258 	}
5259 	spin_unlock(&eb->refs_lock);
5260 
5261 	return 0;
5262 }
5263 
free_extent_buffer(struct extent_buffer * eb)5264 void free_extent_buffer(struct extent_buffer *eb)
5265 {
5266 	int refs;
5267 	int old;
5268 	if (!eb)
5269 		return;
5270 
5271 	while (1) {
5272 		refs = atomic_read(&eb->refs);
5273 		if ((!test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags) && refs <= 3)
5274 		    || (test_bit(EXTENT_BUFFER_UNMAPPED, &eb->bflags) &&
5275 			refs == 1))
5276 			break;
5277 		old = atomic_cmpxchg(&eb->refs, refs, refs - 1);
5278 		if (old == refs)
5279 			return;
5280 	}
5281 
5282 	spin_lock(&eb->refs_lock);
5283 	if (atomic_read(&eb->refs) == 2 &&
5284 	    test_bit(EXTENT_BUFFER_STALE, &eb->bflags) &&
5285 	    !extent_buffer_under_io(eb) &&
5286 	    test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
5287 		atomic_dec(&eb->refs);
5288 
5289 	/*
5290 	 * I know this is terrible, but it's temporary until we stop tracking
5291 	 * the uptodate bits and such for the extent buffers.
5292 	 */
5293 	release_extent_buffer(eb);
5294 }
5295 
free_extent_buffer_stale(struct extent_buffer * eb)5296 void free_extent_buffer_stale(struct extent_buffer *eb)
5297 {
5298 	if (!eb)
5299 		return;
5300 
5301 	spin_lock(&eb->refs_lock);
5302 	set_bit(EXTENT_BUFFER_STALE, &eb->bflags);
5303 
5304 	if (atomic_read(&eb->refs) == 2 && !extent_buffer_under_io(eb) &&
5305 	    test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags))
5306 		atomic_dec(&eb->refs);
5307 	release_extent_buffer(eb);
5308 }
5309 
clear_extent_buffer_dirty(struct extent_buffer * eb)5310 void clear_extent_buffer_dirty(struct extent_buffer *eb)
5311 {
5312 	int i;
5313 	int num_pages;
5314 	struct page *page;
5315 
5316 	num_pages = num_extent_pages(eb);
5317 
5318 	for (i = 0; i < num_pages; i++) {
5319 		page = eb->pages[i];
5320 		if (!PageDirty(page))
5321 			continue;
5322 
5323 		lock_page(page);
5324 		WARN_ON(!PagePrivate(page));
5325 
5326 		clear_page_dirty_for_io(page);
5327 		xa_lock_irq(&page->mapping->i_pages);
5328 		if (!PageDirty(page))
5329 			__xa_clear_mark(&page->mapping->i_pages,
5330 					page_index(page), PAGECACHE_TAG_DIRTY);
5331 		xa_unlock_irq(&page->mapping->i_pages);
5332 		ClearPageError(page);
5333 		unlock_page(page);
5334 	}
5335 	WARN_ON(atomic_read(&eb->refs) == 0);
5336 }
5337 
set_extent_buffer_dirty(struct extent_buffer * eb)5338 bool set_extent_buffer_dirty(struct extent_buffer *eb)
5339 {
5340 	int i;
5341 	int num_pages;
5342 	bool was_dirty;
5343 
5344 	check_buffer_tree_ref(eb);
5345 
5346 	was_dirty = test_and_set_bit(EXTENT_BUFFER_DIRTY, &eb->bflags);
5347 
5348 	num_pages = num_extent_pages(eb);
5349 	WARN_ON(atomic_read(&eb->refs) == 0);
5350 	WARN_ON(!test_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags));
5351 
5352 	if (!was_dirty)
5353 		for (i = 0; i < num_pages; i++)
5354 			set_page_dirty(eb->pages[i]);
5355 
5356 #ifdef CONFIG_BTRFS_DEBUG
5357 	for (i = 0; i < num_pages; i++)
5358 		ASSERT(PageDirty(eb->pages[i]));
5359 #endif
5360 
5361 	return was_dirty;
5362 }
5363 
clear_extent_buffer_uptodate(struct extent_buffer * eb)5364 void clear_extent_buffer_uptodate(struct extent_buffer *eb)
5365 {
5366 	int i;
5367 	struct page *page;
5368 	int num_pages;
5369 
5370 	clear_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5371 	num_pages = num_extent_pages(eb);
5372 	for (i = 0; i < num_pages; i++) {
5373 		page = eb->pages[i];
5374 		if (page)
5375 			ClearPageUptodate(page);
5376 	}
5377 }
5378 
set_extent_buffer_uptodate(struct extent_buffer * eb)5379 void set_extent_buffer_uptodate(struct extent_buffer *eb)
5380 {
5381 	int i;
5382 	struct page *page;
5383 	int num_pages;
5384 
5385 	set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5386 	num_pages = num_extent_pages(eb);
5387 	for (i = 0; i < num_pages; i++) {
5388 		page = eb->pages[i];
5389 		SetPageUptodate(page);
5390 	}
5391 }
5392 
read_extent_buffer_pages(struct extent_buffer * eb,int wait,int mirror_num)5393 int read_extent_buffer_pages(struct extent_buffer *eb, int wait, int mirror_num)
5394 {
5395 	int i;
5396 	struct page *page;
5397 	int err;
5398 	int ret = 0;
5399 	int locked_pages = 0;
5400 	int all_uptodate = 1;
5401 	int num_pages;
5402 	unsigned long num_reads = 0;
5403 	struct bio *bio = NULL;
5404 	unsigned long bio_flags = 0;
5405 	struct extent_io_tree *tree = &BTRFS_I(eb->fs_info->btree_inode)->io_tree;
5406 
5407 	if (test_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags))
5408 		return 0;
5409 
5410 	num_pages = num_extent_pages(eb);
5411 	for (i = 0; i < num_pages; i++) {
5412 		page = eb->pages[i];
5413 		if (wait == WAIT_NONE) {
5414 			if (!trylock_page(page))
5415 				goto unlock_exit;
5416 		} else {
5417 			lock_page(page);
5418 		}
5419 		locked_pages++;
5420 	}
5421 	/*
5422 	 * We need to firstly lock all pages to make sure that
5423 	 * the uptodate bit of our pages won't be affected by
5424 	 * clear_extent_buffer_uptodate().
5425 	 */
5426 	for (i = 0; i < num_pages; i++) {
5427 		page = eb->pages[i];
5428 		if (!PageUptodate(page)) {
5429 			num_reads++;
5430 			all_uptodate = 0;
5431 		}
5432 	}
5433 
5434 	if (all_uptodate) {
5435 		set_bit(EXTENT_BUFFER_UPTODATE, &eb->bflags);
5436 		goto unlock_exit;
5437 	}
5438 
5439 	clear_bit(EXTENT_BUFFER_READ_ERR, &eb->bflags);
5440 	eb->read_mirror = 0;
5441 	atomic_set(&eb->io_pages, num_reads);
5442 	for (i = 0; i < num_pages; i++) {
5443 		page = eb->pages[i];
5444 
5445 		if (!PageUptodate(page)) {
5446 			if (ret) {
5447 				atomic_dec(&eb->io_pages);
5448 				unlock_page(page);
5449 				continue;
5450 			}
5451 
5452 			ClearPageError(page);
5453 			err = __extent_read_full_page(tree, page,
5454 						      btree_get_extent, &bio,
5455 						      mirror_num, &bio_flags,
5456 						      REQ_META);
5457 			if (err) {
5458 				ret = err;
5459 				/*
5460 				 * We use &bio in above __extent_read_full_page,
5461 				 * so we ensure that if it returns error, the
5462 				 * current page fails to add itself to bio and
5463 				 * it's been unlocked.
5464 				 *
5465 				 * We must dec io_pages by ourselves.
5466 				 */
5467 				atomic_dec(&eb->io_pages);
5468 			}
5469 		} else {
5470 			unlock_page(page);
5471 		}
5472 	}
5473 
5474 	if (bio) {
5475 		err = submit_one_bio(bio, mirror_num, bio_flags);
5476 		if (err)
5477 			return err;
5478 	}
5479 
5480 	if (ret || wait != WAIT_COMPLETE)
5481 		return ret;
5482 
5483 	for (i = 0; i < num_pages; i++) {
5484 		page = eb->pages[i];
5485 		wait_on_page_locked(page);
5486 		if (!PageUptodate(page))
5487 			ret = -EIO;
5488 	}
5489 
5490 	return ret;
5491 
5492 unlock_exit:
5493 	while (locked_pages > 0) {
5494 		locked_pages--;
5495 		page = eb->pages[locked_pages];
5496 		unlock_page(page);
5497 	}
5498 	return ret;
5499 }
5500 
read_extent_buffer(const struct extent_buffer * eb,void * dstv,unsigned long start,unsigned long len)5501 void read_extent_buffer(const struct extent_buffer *eb, void *dstv,
5502 			unsigned long start, unsigned long len)
5503 {
5504 	size_t cur;
5505 	size_t offset;
5506 	struct page *page;
5507 	char *kaddr;
5508 	char *dst = (char *)dstv;
5509 	size_t start_offset = offset_in_page(eb->start);
5510 	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5511 
5512 	if (start + len > eb->len) {
5513 		WARN(1, KERN_ERR "btrfs bad mapping eb start %llu len %lu, wanted %lu %lu\n",
5514 		     eb->start, eb->len, start, len);
5515 		memset(dst, 0, len);
5516 		return;
5517 	}
5518 
5519 	offset = offset_in_page(start_offset + start);
5520 
5521 	while (len > 0) {
5522 		page = eb->pages[i];
5523 
5524 		cur = min(len, (PAGE_SIZE - offset));
5525 		kaddr = page_address(page);
5526 		memcpy(dst, kaddr + offset, cur);
5527 
5528 		dst += cur;
5529 		len -= cur;
5530 		offset = 0;
5531 		i++;
5532 	}
5533 }
5534 
read_extent_buffer_to_user(const struct extent_buffer * eb,void __user * dstv,unsigned long start,unsigned long len)5535 int read_extent_buffer_to_user(const struct extent_buffer *eb,
5536 			       void __user *dstv,
5537 			       unsigned long start, unsigned long len)
5538 {
5539 	size_t cur;
5540 	size_t offset;
5541 	struct page *page;
5542 	char *kaddr;
5543 	char __user *dst = (char __user *)dstv;
5544 	size_t start_offset = offset_in_page(eb->start);
5545 	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5546 	int ret = 0;
5547 
5548 	WARN_ON(start > eb->len);
5549 	WARN_ON(start + len > eb->start + eb->len);
5550 
5551 	offset = offset_in_page(start_offset + start);
5552 
5553 	while (len > 0) {
5554 		page = eb->pages[i];
5555 
5556 		cur = min(len, (PAGE_SIZE - offset));
5557 		kaddr = page_address(page);
5558 		if (copy_to_user(dst, kaddr + offset, cur)) {
5559 			ret = -EFAULT;
5560 			break;
5561 		}
5562 
5563 		dst += cur;
5564 		len -= cur;
5565 		offset = 0;
5566 		i++;
5567 	}
5568 
5569 	return ret;
5570 }
5571 
5572 /*
5573  * return 0 if the item is found within a page.
5574  * return 1 if the item spans two pages.
5575  * return -EINVAL otherwise.
5576  */
map_private_extent_buffer(const struct extent_buffer * eb,unsigned long start,unsigned long min_len,char ** map,unsigned long * map_start,unsigned long * map_len)5577 int map_private_extent_buffer(const struct extent_buffer *eb,
5578 			      unsigned long start, unsigned long min_len,
5579 			      char **map, unsigned long *map_start,
5580 			      unsigned long *map_len)
5581 {
5582 	size_t offset;
5583 	char *kaddr;
5584 	struct page *p;
5585 	size_t start_offset = offset_in_page(eb->start);
5586 	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5587 	unsigned long end_i = (start_offset + start + min_len - 1) >>
5588 		PAGE_SHIFT;
5589 
5590 	if (start + min_len > eb->len) {
5591 		WARN(1, KERN_ERR "btrfs bad mapping eb start %llu len %lu, wanted %lu %lu\n",
5592 		       eb->start, eb->len, start, min_len);
5593 		return -EINVAL;
5594 	}
5595 
5596 	if (i != end_i)
5597 		return 1;
5598 
5599 	if (i == 0) {
5600 		offset = start_offset;
5601 		*map_start = 0;
5602 	} else {
5603 		offset = 0;
5604 		*map_start = ((u64)i << PAGE_SHIFT) - start_offset;
5605 	}
5606 
5607 	p = eb->pages[i];
5608 	kaddr = page_address(p);
5609 	*map = kaddr + offset;
5610 	*map_len = PAGE_SIZE - offset;
5611 	return 0;
5612 }
5613 
memcmp_extent_buffer(const struct extent_buffer * eb,const void * ptrv,unsigned long start,unsigned long len)5614 int memcmp_extent_buffer(const struct extent_buffer *eb, const void *ptrv,
5615 			 unsigned long start, unsigned long len)
5616 {
5617 	size_t cur;
5618 	size_t offset;
5619 	struct page *page;
5620 	char *kaddr;
5621 	char *ptr = (char *)ptrv;
5622 	size_t start_offset = offset_in_page(eb->start);
5623 	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5624 	int ret = 0;
5625 
5626 	WARN_ON(start > eb->len);
5627 	WARN_ON(start + len > eb->start + eb->len);
5628 
5629 	offset = offset_in_page(start_offset + start);
5630 
5631 	while (len > 0) {
5632 		page = eb->pages[i];
5633 
5634 		cur = min(len, (PAGE_SIZE - offset));
5635 
5636 		kaddr = page_address(page);
5637 		ret = memcmp(ptr, kaddr + offset, cur);
5638 		if (ret)
5639 			break;
5640 
5641 		ptr += cur;
5642 		len -= cur;
5643 		offset = 0;
5644 		i++;
5645 	}
5646 	return ret;
5647 }
5648 
write_extent_buffer_chunk_tree_uuid(struct extent_buffer * eb,const void * srcv)5649 void write_extent_buffer_chunk_tree_uuid(struct extent_buffer *eb,
5650 		const void *srcv)
5651 {
5652 	char *kaddr;
5653 
5654 	WARN_ON(!PageUptodate(eb->pages[0]));
5655 	kaddr = page_address(eb->pages[0]);
5656 	memcpy(kaddr + offsetof(struct btrfs_header, chunk_tree_uuid), srcv,
5657 			BTRFS_FSID_SIZE);
5658 }
5659 
write_extent_buffer_fsid(struct extent_buffer * eb,const void * srcv)5660 void write_extent_buffer_fsid(struct extent_buffer *eb, const void *srcv)
5661 {
5662 	char *kaddr;
5663 
5664 	WARN_ON(!PageUptodate(eb->pages[0]));
5665 	kaddr = page_address(eb->pages[0]);
5666 	memcpy(kaddr + offsetof(struct btrfs_header, fsid), srcv,
5667 			BTRFS_FSID_SIZE);
5668 }
5669 
write_extent_buffer(struct extent_buffer * eb,const void * srcv,unsigned long start,unsigned long len)5670 void write_extent_buffer(struct extent_buffer *eb, const void *srcv,
5671 			 unsigned long start, unsigned long len)
5672 {
5673 	size_t cur;
5674 	size_t offset;
5675 	struct page *page;
5676 	char *kaddr;
5677 	char *src = (char *)srcv;
5678 	size_t start_offset = offset_in_page(eb->start);
5679 	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5680 
5681 	WARN_ON(start > eb->len);
5682 	WARN_ON(start + len > eb->start + eb->len);
5683 
5684 	offset = offset_in_page(start_offset + start);
5685 
5686 	while (len > 0) {
5687 		page = eb->pages[i];
5688 		WARN_ON(!PageUptodate(page));
5689 
5690 		cur = min(len, PAGE_SIZE - offset);
5691 		kaddr = page_address(page);
5692 		memcpy(kaddr + offset, src, cur);
5693 
5694 		src += cur;
5695 		len -= cur;
5696 		offset = 0;
5697 		i++;
5698 	}
5699 }
5700 
memzero_extent_buffer(struct extent_buffer * eb,unsigned long start,unsigned long len)5701 void memzero_extent_buffer(struct extent_buffer *eb, unsigned long start,
5702 		unsigned long len)
5703 {
5704 	size_t cur;
5705 	size_t offset;
5706 	struct page *page;
5707 	char *kaddr;
5708 	size_t start_offset = offset_in_page(eb->start);
5709 	unsigned long i = (start_offset + start) >> PAGE_SHIFT;
5710 
5711 	WARN_ON(start > eb->len);
5712 	WARN_ON(start + len > eb->start + eb->len);
5713 
5714 	offset = offset_in_page(start_offset + start);
5715 
5716 	while (len > 0) {
5717 		page = eb->pages[i];
5718 		WARN_ON(!PageUptodate(page));
5719 
5720 		cur = min(len, PAGE_SIZE - offset);
5721 		kaddr = page_address(page);
5722 		memset(kaddr + offset, 0, cur);
5723 
5724 		len -= cur;
5725 		offset = 0;
5726 		i++;
5727 	}
5728 }
5729 
copy_extent_buffer_full(struct extent_buffer * dst,struct extent_buffer * src)5730 void copy_extent_buffer_full(struct extent_buffer *dst,
5731 			     struct extent_buffer *src)
5732 {
5733 	int i;
5734 	int num_pages;
5735 
5736 	ASSERT(dst->len == src->len);
5737 
5738 	num_pages = num_extent_pages(dst);
5739 	for (i = 0; i < num_pages; i++)
5740 		copy_page(page_address(dst->pages[i]),
5741 				page_address(src->pages[i]));
5742 }
5743 
copy_extent_buffer(struct extent_buffer * dst,struct extent_buffer * src,unsigned long dst_offset,unsigned long src_offset,unsigned long len)5744 void copy_extent_buffer(struct extent_buffer *dst, struct extent_buffer *src,
5745 			unsigned long dst_offset, unsigned long src_offset,
5746 			unsigned long len)
5747 {
5748 	u64 dst_len = dst->len;
5749 	size_t cur;
5750 	size_t offset;
5751 	struct page *page;
5752 	char *kaddr;
5753 	size_t start_offset = offset_in_page(dst->start);
5754 	unsigned long i = (start_offset + dst_offset) >> PAGE_SHIFT;
5755 
5756 	WARN_ON(src->len != dst_len);
5757 
5758 	offset = offset_in_page(start_offset + dst_offset);
5759 
5760 	while (len > 0) {
5761 		page = dst->pages[i];
5762 		WARN_ON(!PageUptodate(page));
5763 
5764 		cur = min(len, (unsigned long)(PAGE_SIZE - offset));
5765 
5766 		kaddr = page_address(page);
5767 		read_extent_buffer(src, kaddr + offset, src_offset, cur);
5768 
5769 		src_offset += cur;
5770 		len -= cur;
5771 		offset = 0;
5772 		i++;
5773 	}
5774 }
5775 
5776 /*
5777  * eb_bitmap_offset() - calculate the page and offset of the byte containing the
5778  * given bit number
5779  * @eb: the extent buffer
5780  * @start: offset of the bitmap item in the extent buffer
5781  * @nr: bit number
5782  * @page_index: return index of the page in the extent buffer that contains the
5783  * given bit number
5784  * @page_offset: return offset into the page given by page_index
5785  *
5786  * This helper hides the ugliness of finding the byte in an extent buffer which
5787  * contains a given bit.
5788  */
eb_bitmap_offset(struct extent_buffer * eb,unsigned long start,unsigned long nr,unsigned long * page_index,size_t * page_offset)5789 static inline void eb_bitmap_offset(struct extent_buffer *eb,
5790 				    unsigned long start, unsigned long nr,
5791 				    unsigned long *page_index,
5792 				    size_t *page_offset)
5793 {
5794 	size_t start_offset = offset_in_page(eb->start);
5795 	size_t byte_offset = BIT_BYTE(nr);
5796 	size_t offset;
5797 
5798 	/*
5799 	 * The byte we want is the offset of the extent buffer + the offset of
5800 	 * the bitmap item in the extent buffer + the offset of the byte in the
5801 	 * bitmap item.
5802 	 */
5803 	offset = start_offset + start + byte_offset;
5804 
5805 	*page_index = offset >> PAGE_SHIFT;
5806 	*page_offset = offset_in_page(offset);
5807 }
5808 
5809 /**
5810  * extent_buffer_test_bit - determine whether a bit in a bitmap item is set
5811  * @eb: the extent buffer
5812  * @start: offset of the bitmap item in the extent buffer
5813  * @nr: bit number to test
5814  */
extent_buffer_test_bit(struct extent_buffer * eb,unsigned long start,unsigned long nr)5815 int extent_buffer_test_bit(struct extent_buffer *eb, unsigned long start,
5816 			   unsigned long nr)
5817 {
5818 	u8 *kaddr;
5819 	struct page *page;
5820 	unsigned long i;
5821 	size_t offset;
5822 
5823 	eb_bitmap_offset(eb, start, nr, &i, &offset);
5824 	page = eb->pages[i];
5825 	WARN_ON(!PageUptodate(page));
5826 	kaddr = page_address(page);
5827 	return 1U & (kaddr[offset] >> (nr & (BITS_PER_BYTE - 1)));
5828 }
5829 
5830 /**
5831  * extent_buffer_bitmap_set - set an area of a bitmap
5832  * @eb: the extent buffer
5833  * @start: offset of the bitmap item in the extent buffer
5834  * @pos: bit number of the first bit
5835  * @len: number of bits to set
5836  */
extent_buffer_bitmap_set(struct extent_buffer * eb,unsigned long start,unsigned long pos,unsigned long len)5837 void extent_buffer_bitmap_set(struct extent_buffer *eb, unsigned long start,
5838 			      unsigned long pos, unsigned long len)
5839 {
5840 	u8 *kaddr;
5841 	struct page *page;
5842 	unsigned long i;
5843 	size_t offset;
5844 	const unsigned int size = pos + len;
5845 	int bits_to_set = BITS_PER_BYTE - (pos % BITS_PER_BYTE);
5846 	u8 mask_to_set = BITMAP_FIRST_BYTE_MASK(pos);
5847 
5848 	eb_bitmap_offset(eb, start, pos, &i, &offset);
5849 	page = eb->pages[i];
5850 	WARN_ON(!PageUptodate(page));
5851 	kaddr = page_address(page);
5852 
5853 	while (len >= bits_to_set) {
5854 		kaddr[offset] |= mask_to_set;
5855 		len -= bits_to_set;
5856 		bits_to_set = BITS_PER_BYTE;
5857 		mask_to_set = ~0;
5858 		if (++offset >= PAGE_SIZE && len > 0) {
5859 			offset = 0;
5860 			page = eb->pages[++i];
5861 			WARN_ON(!PageUptodate(page));
5862 			kaddr = page_address(page);
5863 		}
5864 	}
5865 	if (len) {
5866 		mask_to_set &= BITMAP_LAST_BYTE_MASK(size);
5867 		kaddr[offset] |= mask_to_set;
5868 	}
5869 }
5870 
5871 
5872 /**
5873  * extent_buffer_bitmap_clear - clear an area of a bitmap
5874  * @eb: the extent buffer
5875  * @start: offset of the bitmap item in the extent buffer
5876  * @pos: bit number of the first bit
5877  * @len: number of bits to clear
5878  */
extent_buffer_bitmap_clear(struct extent_buffer * eb,unsigned long start,unsigned long pos,unsigned long len)5879 void extent_buffer_bitmap_clear(struct extent_buffer *eb, unsigned long start,
5880 				unsigned long pos, unsigned long len)
5881 {
5882 	u8 *kaddr;
5883 	struct page *page;
5884 	unsigned long i;
5885 	size_t offset;
5886 	const unsigned int size = pos + len;
5887 	int bits_to_clear = BITS_PER_BYTE - (pos % BITS_PER_BYTE);
5888 	u8 mask_to_clear = BITMAP_FIRST_BYTE_MASK(pos);
5889 
5890 	eb_bitmap_offset(eb, start, pos, &i, &offset);
5891 	page = eb->pages[i];
5892 	WARN_ON(!PageUptodate(page));
5893 	kaddr = page_address(page);
5894 
5895 	while (len >= bits_to_clear) {
5896 		kaddr[offset] &= ~mask_to_clear;
5897 		len -= bits_to_clear;
5898 		bits_to_clear = BITS_PER_BYTE;
5899 		mask_to_clear = ~0;
5900 		if (++offset >= PAGE_SIZE && len > 0) {
5901 			offset = 0;
5902 			page = eb->pages[++i];
5903 			WARN_ON(!PageUptodate(page));
5904 			kaddr = page_address(page);
5905 		}
5906 	}
5907 	if (len) {
5908 		mask_to_clear &= BITMAP_LAST_BYTE_MASK(size);
5909 		kaddr[offset] &= ~mask_to_clear;
5910 	}
5911 }
5912 
areas_overlap(unsigned long src,unsigned long dst,unsigned long len)5913 static inline bool areas_overlap(unsigned long src, unsigned long dst, unsigned long len)
5914 {
5915 	unsigned long distance = (src > dst) ? src - dst : dst - src;
5916 	return distance < len;
5917 }
5918 
copy_pages(struct page * dst_page,struct page * src_page,unsigned long dst_off,unsigned long src_off,unsigned long len)5919 static void copy_pages(struct page *dst_page, struct page *src_page,
5920 		       unsigned long dst_off, unsigned long src_off,
5921 		       unsigned long len)
5922 {
5923 	char *dst_kaddr = page_address(dst_page);
5924 	char *src_kaddr;
5925 	int must_memmove = 0;
5926 
5927 	if (dst_page != src_page) {
5928 		src_kaddr = page_address(src_page);
5929 	} else {
5930 		src_kaddr = dst_kaddr;
5931 		if (areas_overlap(src_off, dst_off, len))
5932 			must_memmove = 1;
5933 	}
5934 
5935 	if (must_memmove)
5936 		memmove(dst_kaddr + dst_off, src_kaddr + src_off, len);
5937 	else
5938 		memcpy(dst_kaddr + dst_off, src_kaddr + src_off, len);
5939 }
5940 
memcpy_extent_buffer(struct extent_buffer * dst,unsigned long dst_offset,unsigned long src_offset,unsigned long len)5941 void memcpy_extent_buffer(struct extent_buffer *dst, unsigned long dst_offset,
5942 			   unsigned long src_offset, unsigned long len)
5943 {
5944 	struct btrfs_fs_info *fs_info = dst->fs_info;
5945 	size_t cur;
5946 	size_t dst_off_in_page;
5947 	size_t src_off_in_page;
5948 	size_t start_offset = offset_in_page(dst->start);
5949 	unsigned long dst_i;
5950 	unsigned long src_i;
5951 
5952 	if (src_offset + len > dst->len) {
5953 		btrfs_err(fs_info,
5954 			"memmove bogus src_offset %lu move len %lu dst len %lu",
5955 			 src_offset, len, dst->len);
5956 		BUG();
5957 	}
5958 	if (dst_offset + len > dst->len) {
5959 		btrfs_err(fs_info,
5960 			"memmove bogus dst_offset %lu move len %lu dst len %lu",
5961 			 dst_offset, len, dst->len);
5962 		BUG();
5963 	}
5964 
5965 	while (len > 0) {
5966 		dst_off_in_page = offset_in_page(start_offset + dst_offset);
5967 		src_off_in_page = offset_in_page(start_offset + src_offset);
5968 
5969 		dst_i = (start_offset + dst_offset) >> PAGE_SHIFT;
5970 		src_i = (start_offset + src_offset) >> PAGE_SHIFT;
5971 
5972 		cur = min(len, (unsigned long)(PAGE_SIZE -
5973 					       src_off_in_page));
5974 		cur = min_t(unsigned long, cur,
5975 			(unsigned long)(PAGE_SIZE - dst_off_in_page));
5976 
5977 		copy_pages(dst->pages[dst_i], dst->pages[src_i],
5978 			   dst_off_in_page, src_off_in_page, cur);
5979 
5980 		src_offset += cur;
5981 		dst_offset += cur;
5982 		len -= cur;
5983 	}
5984 }
5985 
memmove_extent_buffer(struct extent_buffer * dst,unsigned long dst_offset,unsigned long src_offset,unsigned long len)5986 void memmove_extent_buffer(struct extent_buffer *dst, unsigned long dst_offset,
5987 			   unsigned long src_offset, unsigned long len)
5988 {
5989 	struct btrfs_fs_info *fs_info = dst->fs_info;
5990 	size_t cur;
5991 	size_t dst_off_in_page;
5992 	size_t src_off_in_page;
5993 	unsigned long dst_end = dst_offset + len - 1;
5994 	unsigned long src_end = src_offset + len - 1;
5995 	size_t start_offset = offset_in_page(dst->start);
5996 	unsigned long dst_i;
5997 	unsigned long src_i;
5998 
5999 	if (src_offset + len > dst->len) {
6000 		btrfs_err(fs_info,
6001 			  "memmove bogus src_offset %lu move len %lu len %lu",
6002 			  src_offset, len, dst->len);
6003 		BUG();
6004 	}
6005 	if (dst_offset + len > dst->len) {
6006 		btrfs_err(fs_info,
6007 			  "memmove bogus dst_offset %lu move len %lu len %lu",
6008 			  dst_offset, len, dst->len);
6009 		BUG();
6010 	}
6011 	if (dst_offset < src_offset) {
6012 		memcpy_extent_buffer(dst, dst_offset, src_offset, len);
6013 		return;
6014 	}
6015 	while (len > 0) {
6016 		dst_i = (start_offset + dst_end) >> PAGE_SHIFT;
6017 		src_i = (start_offset + src_end) >> PAGE_SHIFT;
6018 
6019 		dst_off_in_page = offset_in_page(start_offset + dst_end);
6020 		src_off_in_page = offset_in_page(start_offset + src_end);
6021 
6022 		cur = min_t(unsigned long, len, src_off_in_page + 1);
6023 		cur = min(cur, dst_off_in_page + 1);
6024 		copy_pages(dst->pages[dst_i], dst->pages[src_i],
6025 			   dst_off_in_page - cur + 1,
6026 			   src_off_in_page - cur + 1, cur);
6027 
6028 		dst_end -= cur;
6029 		src_end -= cur;
6030 		len -= cur;
6031 	}
6032 }
6033 
try_release_extent_buffer(struct page * page)6034 int try_release_extent_buffer(struct page *page)
6035 {
6036 	struct extent_buffer *eb;
6037 
6038 	/*
6039 	 * We need to make sure nobody is attaching this page to an eb right
6040 	 * now.
6041 	 */
6042 	spin_lock(&page->mapping->private_lock);
6043 	if (!PagePrivate(page)) {
6044 		spin_unlock(&page->mapping->private_lock);
6045 		return 1;
6046 	}
6047 
6048 	eb = (struct extent_buffer *)page->private;
6049 	BUG_ON(!eb);
6050 
6051 	/*
6052 	 * This is a little awful but should be ok, we need to make sure that
6053 	 * the eb doesn't disappear out from under us while we're looking at
6054 	 * this page.
6055 	 */
6056 	spin_lock(&eb->refs_lock);
6057 	if (atomic_read(&eb->refs) != 1 || extent_buffer_under_io(eb)) {
6058 		spin_unlock(&eb->refs_lock);
6059 		spin_unlock(&page->mapping->private_lock);
6060 		return 0;
6061 	}
6062 	spin_unlock(&page->mapping->private_lock);
6063 
6064 	/*
6065 	 * If tree ref isn't set then we know the ref on this eb is a real ref,
6066 	 * so just return, this page will likely be freed soon anyway.
6067 	 */
6068 	if (!test_and_clear_bit(EXTENT_BUFFER_TREE_REF, &eb->bflags)) {
6069 		spin_unlock(&eb->refs_lock);
6070 		return 0;
6071 	}
6072 
6073 	return release_extent_buffer(eb);
6074 }
6075