Loading...
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Copyright (C) 2013 Fusion IO. All rights reserved.
4 */
5
6#include <linux/pagemap.h>
7#include <linux/pagevec.h>
8#include <linux/sched.h>
9#include <linux/slab.h>
10#include <linux/sizes.h>
11#include "btrfs-tests.h"
12#include "../ctree.h"
13#include "../extent_io.h"
14#include "../btrfs_inode.h"
15
16#define PROCESS_UNLOCK (1 << 0)
17#define PROCESS_RELEASE (1 << 1)
18#define PROCESS_TEST_LOCKED (1 << 2)
19
20static noinline int process_page_range(struct inode *inode, u64 start, u64 end,
21 unsigned long flags)
22{
23 int ret;
24 struct folio_batch fbatch;
25 unsigned long index = start >> PAGE_SHIFT;
26 unsigned long end_index = end >> PAGE_SHIFT;
27 int i;
28 int count = 0;
29 int loops = 0;
30
31 folio_batch_init(&fbatch);
32
33 while (index <= end_index) {
34 ret = filemap_get_folios_contig(inode->i_mapping, &index,
35 end_index, &fbatch);
36 for (i = 0; i < ret; i++) {
37 struct folio *folio = fbatch.folios[i];
38
39 if (flags & PROCESS_TEST_LOCKED &&
40 !folio_test_locked(folio))
41 count++;
42 if (flags & PROCESS_UNLOCK && folio_test_locked(folio))
43 folio_unlock(folio);
44 if (flags & PROCESS_RELEASE)
45 folio_put(folio);
46 }
47 folio_batch_release(&fbatch);
48 cond_resched();
49 loops++;
50 if (loops > 100000) {
51 printk(KERN_ERR
52 "stuck in a loop, start %llu, end %llu, ret %d\n",
53 start, end, ret);
54 break;
55 }
56 }
57
58 return count;
59}
60
61#define STATE_FLAG_STR_LEN 256
62
63#define PRINT_ONE_FLAG(state, dest, cur, name) \
64({ \
65 if (state->state & EXTENT_##name) \
66 cur += scnprintf(dest + cur, STATE_FLAG_STR_LEN - cur, \
67 "%s" #name, cur == 0 ? "" : "|"); \
68})
69
70static void extent_flag_to_str(const struct extent_state *state, char *dest)
71{
72 int cur = 0;
73
74 dest[0] = 0;
75 PRINT_ONE_FLAG(state, dest, cur, DIRTY);
76 PRINT_ONE_FLAG(state, dest, cur, UPTODATE);
77 PRINT_ONE_FLAG(state, dest, cur, LOCKED);
78 PRINT_ONE_FLAG(state, dest, cur, NEW);
79 PRINT_ONE_FLAG(state, dest, cur, DELALLOC);
80 PRINT_ONE_FLAG(state, dest, cur, DEFRAG);
81 PRINT_ONE_FLAG(state, dest, cur, BOUNDARY);
82 PRINT_ONE_FLAG(state, dest, cur, NODATASUM);
83 PRINT_ONE_FLAG(state, dest, cur, CLEAR_META_RESV);
84 PRINT_ONE_FLAG(state, dest, cur, NEED_WAIT);
85 PRINT_ONE_FLAG(state, dest, cur, NORESERVE);
86 PRINT_ONE_FLAG(state, dest, cur, QGROUP_RESERVED);
87 PRINT_ONE_FLAG(state, dest, cur, CLEAR_DATA_RESV);
88}
89
90static void dump_extent_io_tree(const struct extent_io_tree *tree)
91{
92 struct rb_node *node;
93 char flags_str[STATE_FLAG_STR_LEN];
94
95 node = rb_first(&tree->state);
96 test_msg("io tree content:");
97 while (node) {
98 struct extent_state *state;
99
100 state = rb_entry(node, struct extent_state, rb_node);
101 extent_flag_to_str(state, flags_str);
102 test_msg(" start=%llu len=%llu flags=%s", state->start,
103 state->end + 1 - state->start, flags_str);
104 node = rb_next(node);
105 }
106}
107
108static int test_find_delalloc(u32 sectorsize)
109{
110 struct inode *inode;
111 struct extent_io_tree *tmp;
112 struct page *page;
113 struct page *locked_page = NULL;
114 unsigned long index = 0;
115 /* In this test we need at least 2 file extents at its maximum size */
116 u64 max_bytes = BTRFS_MAX_EXTENT_SIZE;
117 u64 total_dirty = 2 * max_bytes;
118 u64 start, end, test_start;
119 bool found;
120 int ret = -EINVAL;
121
122 test_msg("running find delalloc tests");
123
124 inode = btrfs_new_test_inode();
125 if (!inode) {
126 test_std_err(TEST_ALLOC_INODE);
127 return -ENOMEM;
128 }
129 tmp = &BTRFS_I(inode)->io_tree;
130
131 /*
132 * Passing NULL as we don't have fs_info but tracepoints are not used
133 * at this point
134 */
135 extent_io_tree_init(NULL, tmp, IO_TREE_SELFTEST);
136
137 /*
138 * First go through and create and mark all of our pages dirty, we pin
139 * everything to make sure our pages don't get evicted and screw up our
140 * test.
141 */
142 for (index = 0; index < (total_dirty >> PAGE_SHIFT); index++) {
143 page = find_or_create_page(inode->i_mapping, index, GFP_KERNEL);
144 if (!page) {
145 test_err("failed to allocate test page");
146 ret = -ENOMEM;
147 goto out;
148 }
149 SetPageDirty(page);
150 if (index) {
151 unlock_page(page);
152 } else {
153 get_page(page);
154 locked_page = page;
155 }
156 }
157
158 /* Test this scenario
159 * |--- delalloc ---|
160 * |--- search ---|
161 */
162 set_extent_bit(tmp, 0, sectorsize - 1, EXTENT_DELALLOC, NULL);
163 start = 0;
164 end = start + PAGE_SIZE - 1;
165 found = find_lock_delalloc_range(inode, locked_page, &start,
166 &end);
167 if (!found) {
168 test_err("should have found at least one delalloc");
169 goto out_bits;
170 }
171 if (start != 0 || end != (sectorsize - 1)) {
172 test_err("expected start 0 end %u, got start %llu end %llu",
173 sectorsize - 1, start, end);
174 goto out_bits;
175 }
176 unlock_extent(tmp, start, end, NULL);
177 unlock_page(locked_page);
178 put_page(locked_page);
179
180 /*
181 * Test this scenario
182 *
183 * |--- delalloc ---|
184 * |--- search ---|
185 */
186 test_start = SZ_64M;
187 locked_page = find_lock_page(inode->i_mapping,
188 test_start >> PAGE_SHIFT);
189 if (!locked_page) {
190 test_err("couldn't find the locked page");
191 goto out_bits;
192 }
193 set_extent_bit(tmp, sectorsize, max_bytes - 1, EXTENT_DELALLOC, NULL);
194 start = test_start;
195 end = start + PAGE_SIZE - 1;
196 found = find_lock_delalloc_range(inode, locked_page, &start,
197 &end);
198 if (!found) {
199 test_err("couldn't find delalloc in our range");
200 goto out_bits;
201 }
202 if (start != test_start || end != max_bytes - 1) {
203 test_err("expected start %llu end %llu, got start %llu, end %llu",
204 test_start, max_bytes - 1, start, end);
205 goto out_bits;
206 }
207 if (process_page_range(inode, start, end,
208 PROCESS_TEST_LOCKED | PROCESS_UNLOCK)) {
209 test_err("there were unlocked pages in the range");
210 goto out_bits;
211 }
212 unlock_extent(tmp, start, end, NULL);
213 /* locked_page was unlocked above */
214 put_page(locked_page);
215
216 /*
217 * Test this scenario
218 * |--- delalloc ---|
219 * |--- search ---|
220 */
221 test_start = max_bytes + sectorsize;
222 locked_page = find_lock_page(inode->i_mapping, test_start >>
223 PAGE_SHIFT);
224 if (!locked_page) {
225 test_err("couldn't find the locked page");
226 goto out_bits;
227 }
228 start = test_start;
229 end = start + PAGE_SIZE - 1;
230 found = find_lock_delalloc_range(inode, locked_page, &start,
231 &end);
232 if (found) {
233 test_err("found range when we shouldn't have");
234 goto out_bits;
235 }
236 if (end != test_start + PAGE_SIZE - 1) {
237 test_err("did not return the proper end offset");
238 goto out_bits;
239 }
240
241 /*
242 * Test this scenario
243 * [------- delalloc -------|
244 * [max_bytes]|-- search--|
245 *
246 * We are re-using our test_start from above since it works out well.
247 */
248 set_extent_bit(tmp, max_bytes, total_dirty - 1, EXTENT_DELALLOC, NULL);
249 start = test_start;
250 end = start + PAGE_SIZE - 1;
251 found = find_lock_delalloc_range(inode, locked_page, &start,
252 &end);
253 if (!found) {
254 test_err("didn't find our range");
255 goto out_bits;
256 }
257 if (start != test_start || end != total_dirty - 1) {
258 test_err("expected start %llu end %llu, got start %llu end %llu",
259 test_start, total_dirty - 1, start, end);
260 goto out_bits;
261 }
262 if (process_page_range(inode, start, end,
263 PROCESS_TEST_LOCKED | PROCESS_UNLOCK)) {
264 test_err("pages in range were not all locked");
265 goto out_bits;
266 }
267 unlock_extent(tmp, start, end, NULL);
268
269 /*
270 * Now to test where we run into a page that is no longer dirty in the
271 * range we want to find.
272 */
273 page = find_get_page(inode->i_mapping,
274 (max_bytes + SZ_1M) >> PAGE_SHIFT);
275 if (!page) {
276 test_err("couldn't find our page");
277 goto out_bits;
278 }
279 ClearPageDirty(page);
280 put_page(page);
281
282 /* We unlocked it in the previous test */
283 lock_page(locked_page);
284 start = test_start;
285 end = start + PAGE_SIZE - 1;
286 /*
287 * Currently if we fail to find dirty pages in the delalloc range we
288 * will adjust max_bytes down to PAGE_SIZE and then re-search. If
289 * this changes at any point in the future we will need to fix this
290 * tests expected behavior.
291 */
292 found = find_lock_delalloc_range(inode, locked_page, &start,
293 &end);
294 if (!found) {
295 test_err("didn't find our range");
296 goto out_bits;
297 }
298 if (start != test_start && end != test_start + PAGE_SIZE - 1) {
299 test_err("expected start %llu end %llu, got start %llu end %llu",
300 test_start, test_start + PAGE_SIZE - 1, start, end);
301 goto out_bits;
302 }
303 if (process_page_range(inode, start, end, PROCESS_TEST_LOCKED |
304 PROCESS_UNLOCK)) {
305 test_err("pages in range were not all locked");
306 goto out_bits;
307 }
308 ret = 0;
309out_bits:
310 if (ret)
311 dump_extent_io_tree(tmp);
312 clear_extent_bits(tmp, 0, total_dirty - 1, (unsigned)-1);
313out:
314 if (locked_page)
315 put_page(locked_page);
316 process_page_range(inode, 0, total_dirty - 1,
317 PROCESS_UNLOCK | PROCESS_RELEASE);
318 iput(inode);
319 return ret;
320}
321
322static int check_eb_bitmap(unsigned long *bitmap, struct extent_buffer *eb)
323{
324 unsigned long i;
325
326 for (i = 0; i < eb->len * BITS_PER_BYTE; i++) {
327 int bit, bit1;
328
329 bit = !!test_bit(i, bitmap);
330 bit1 = !!extent_buffer_test_bit(eb, 0, i);
331 if (bit1 != bit) {
332 u8 has;
333 u8 expect;
334
335 read_extent_buffer(eb, &has, i / BITS_PER_BYTE, 1);
336 expect = bitmap_get_value8(bitmap, ALIGN(i, BITS_PER_BYTE));
337
338 test_err(
339 "bits do not match, start byte 0 bit %lu, byte %lu has 0x%02x expect 0x%02x",
340 i, i / BITS_PER_BYTE, has, expect);
341 return -EINVAL;
342 }
343
344 bit1 = !!extent_buffer_test_bit(eb, i / BITS_PER_BYTE,
345 i % BITS_PER_BYTE);
346 if (bit1 != bit) {
347 u8 has;
348 u8 expect;
349
350 read_extent_buffer(eb, &has, i / BITS_PER_BYTE, 1);
351 expect = bitmap_get_value8(bitmap, ALIGN(i, BITS_PER_BYTE));
352
353 test_err(
354 "bits do not match, start byte %lu bit %lu, byte %lu has 0x%02x expect 0x%02x",
355 i / BITS_PER_BYTE, i % BITS_PER_BYTE,
356 i / BITS_PER_BYTE, has, expect);
357 return -EINVAL;
358 }
359 }
360 return 0;
361}
362
363static int test_bitmap_set(const char *name, unsigned long *bitmap,
364 struct extent_buffer *eb,
365 unsigned long byte_start, unsigned long bit_start,
366 unsigned long bit_len)
367{
368 int ret;
369
370 bitmap_set(bitmap, byte_start * BITS_PER_BYTE + bit_start, bit_len);
371 extent_buffer_bitmap_set(eb, byte_start, bit_start, bit_len);
372 ret = check_eb_bitmap(bitmap, eb);
373 if (ret < 0)
374 test_err("%s test failed", name);
375 return ret;
376}
377
378static int test_bitmap_clear(const char *name, unsigned long *bitmap,
379 struct extent_buffer *eb,
380 unsigned long byte_start, unsigned long bit_start,
381 unsigned long bit_len)
382{
383 int ret;
384
385 bitmap_clear(bitmap, byte_start * BITS_PER_BYTE + bit_start, bit_len);
386 extent_buffer_bitmap_clear(eb, byte_start, bit_start, bit_len);
387 ret = check_eb_bitmap(bitmap, eb);
388 if (ret < 0)
389 test_err("%s test failed", name);
390 return ret;
391}
392static int __test_eb_bitmaps(unsigned long *bitmap, struct extent_buffer *eb)
393{
394 unsigned long i, j;
395 unsigned long byte_len = eb->len;
396 u32 x;
397 int ret;
398
399 ret = test_bitmap_clear("clear all run 1", bitmap, eb, 0, 0,
400 byte_len * BITS_PER_BYTE);
401 if (ret < 0)
402 return ret;
403
404 ret = test_bitmap_set("set all", bitmap, eb, 0, 0, byte_len * BITS_PER_BYTE);
405 if (ret < 0)
406 return ret;
407
408 ret = test_bitmap_clear("clear all run 2", bitmap, eb, 0, 0,
409 byte_len * BITS_PER_BYTE);
410 if (ret < 0)
411 return ret;
412
413 ret = test_bitmap_set("same byte set", bitmap, eb, 0, 2, 4);
414 if (ret < 0)
415 return ret;
416
417 ret = test_bitmap_clear("same byte partial clear", bitmap, eb, 0, 4, 1);
418 if (ret < 0)
419 return ret;
420
421 ret = test_bitmap_set("cross byte set", bitmap, eb, 2, 4, 8);
422 if (ret < 0)
423 return ret;
424
425 ret = test_bitmap_set("cross multi byte set", bitmap, eb, 4, 4, 24);
426 if (ret < 0)
427 return ret;
428
429 ret = test_bitmap_clear("cross byte clear", bitmap, eb, 2, 6, 4);
430 if (ret < 0)
431 return ret;
432
433 ret = test_bitmap_clear("cross multi byte clear", bitmap, eb, 4, 6, 20);
434 if (ret < 0)
435 return ret;
436
437 /* Straddling pages test */
438 if (byte_len > PAGE_SIZE) {
439 ret = test_bitmap_set("cross page set", bitmap, eb,
440 PAGE_SIZE - sizeof(long) / 2, 0,
441 sizeof(long) * BITS_PER_BYTE);
442 if (ret < 0)
443 return ret;
444
445 ret = test_bitmap_set("cross page set all", bitmap, eb, 0, 0,
446 byte_len * BITS_PER_BYTE);
447 if (ret < 0)
448 return ret;
449
450 ret = test_bitmap_clear("cross page clear", bitmap, eb,
451 PAGE_SIZE - sizeof(long) / 2, 0,
452 sizeof(long) * BITS_PER_BYTE);
453 if (ret < 0)
454 return ret;
455 }
456
457 /*
458 * Generate a wonky pseudo-random bit pattern for the sake of not using
459 * something repetitive that could miss some hypothetical off-by-n bug.
460 */
461 x = 0;
462 ret = test_bitmap_clear("clear all run 3", bitmap, eb, 0, 0,
463 byte_len * BITS_PER_BYTE);
464 if (ret < 0)
465 return ret;
466
467 for (i = 0; i < byte_len * BITS_PER_BYTE / 32; i++) {
468 x = (0x19660dULL * (u64)x + 0x3c6ef35fULL) & 0xffffffffU;
469 for (j = 0; j < 32; j++) {
470 if (x & (1U << j)) {
471 bitmap_set(bitmap, i * 32 + j, 1);
472 extent_buffer_bitmap_set(eb, 0, i * 32 + j, 1);
473 }
474 }
475 }
476
477 ret = check_eb_bitmap(bitmap, eb);
478 if (ret) {
479 test_err("random bit pattern failed");
480 return ret;
481 }
482
483 return 0;
484}
485
486static int test_eb_bitmaps(u32 sectorsize, u32 nodesize)
487{
488 struct btrfs_fs_info *fs_info;
489 unsigned long *bitmap = NULL;
490 struct extent_buffer *eb = NULL;
491 int ret;
492
493 test_msg("running extent buffer bitmap tests");
494
495 fs_info = btrfs_alloc_dummy_fs_info(nodesize, sectorsize);
496 if (!fs_info) {
497 test_std_err(TEST_ALLOC_FS_INFO);
498 return -ENOMEM;
499 }
500
501 bitmap = kmalloc(nodesize, GFP_KERNEL);
502 if (!bitmap) {
503 test_err("couldn't allocate test bitmap");
504 ret = -ENOMEM;
505 goto out;
506 }
507
508 eb = __alloc_dummy_extent_buffer(fs_info, 0, nodesize);
509 if (!eb) {
510 test_std_err(TEST_ALLOC_ROOT);
511 ret = -ENOMEM;
512 goto out;
513 }
514
515 ret = __test_eb_bitmaps(bitmap, eb);
516 if (ret)
517 goto out;
518
519 free_extent_buffer(eb);
520
521 /*
522 * Test again for case where the tree block is sectorsize aligned but
523 * not nodesize aligned.
524 */
525 eb = __alloc_dummy_extent_buffer(fs_info, sectorsize, nodesize);
526 if (!eb) {
527 test_std_err(TEST_ALLOC_ROOT);
528 ret = -ENOMEM;
529 goto out;
530 }
531
532 ret = __test_eb_bitmaps(bitmap, eb);
533out:
534 free_extent_buffer(eb);
535 kfree(bitmap);
536 btrfs_free_dummy_fs_info(fs_info);
537 return ret;
538}
539
540static int test_find_first_clear_extent_bit(void)
541{
542 struct extent_io_tree tree;
543 u64 start, end;
544 int ret = -EINVAL;
545
546 test_msg("running find_first_clear_extent_bit test");
547
548 extent_io_tree_init(NULL, &tree, IO_TREE_SELFTEST);
549
550 /* Test correct handling of empty tree */
551 find_first_clear_extent_bit(&tree, 0, &start, &end, CHUNK_TRIMMED);
552 if (start != 0 || end != -1) {
553 test_err(
554 "error getting a range from completely empty tree: start %llu end %llu",
555 start, end);
556 goto out;
557 }
558 /*
559 * Set 1M-4M alloc/discard and 32M-64M thus leaving a hole between
560 * 4M-32M
561 */
562 set_extent_bit(&tree, SZ_1M, SZ_4M - 1,
563 CHUNK_TRIMMED | CHUNK_ALLOCATED, NULL);
564
565 find_first_clear_extent_bit(&tree, SZ_512K, &start, &end,
566 CHUNK_TRIMMED | CHUNK_ALLOCATED);
567
568 if (start != 0 || end != SZ_1M - 1) {
569 test_err("error finding beginning range: start %llu end %llu",
570 start, end);
571 goto out;
572 }
573
574 /* Now add 32M-64M so that we have a hole between 4M-32M */
575 set_extent_bit(&tree, SZ_32M, SZ_64M - 1,
576 CHUNK_TRIMMED | CHUNK_ALLOCATED, NULL);
577
578 /*
579 * Request first hole starting at 12M, we should get 4M-32M
580 */
581 find_first_clear_extent_bit(&tree, 12 * SZ_1M, &start, &end,
582 CHUNK_TRIMMED | CHUNK_ALLOCATED);
583
584 if (start != SZ_4M || end != SZ_32M - 1) {
585 test_err("error finding trimmed range: start %llu end %llu",
586 start, end);
587 goto out;
588 }
589
590 /*
591 * Search in the middle of allocated range, should get the next one
592 * available, which happens to be unallocated -> 4M-32M
593 */
594 find_first_clear_extent_bit(&tree, SZ_2M, &start, &end,
595 CHUNK_TRIMMED | CHUNK_ALLOCATED);
596
597 if (start != SZ_4M || end != SZ_32M - 1) {
598 test_err("error finding next unalloc range: start %llu end %llu",
599 start, end);
600 goto out;
601 }
602
603 /*
604 * Set 64M-72M with CHUNK_ALLOC flag, then search for CHUNK_TRIMMED flag
605 * being unset in this range, we should get the entry in range 64M-72M
606 */
607 set_extent_bit(&tree, SZ_64M, SZ_64M + SZ_8M - 1, CHUNK_ALLOCATED, NULL);
608 find_first_clear_extent_bit(&tree, SZ_64M + SZ_1M, &start, &end,
609 CHUNK_TRIMMED);
610
611 if (start != SZ_64M || end != SZ_64M + SZ_8M - 1) {
612 test_err("error finding exact range: start %llu end %llu",
613 start, end);
614 goto out;
615 }
616
617 find_first_clear_extent_bit(&tree, SZ_64M - SZ_8M, &start, &end,
618 CHUNK_TRIMMED);
619
620 /*
621 * Search in the middle of set range whose immediate neighbour doesn't
622 * have the bits set so it must be returned
623 */
624 if (start != SZ_64M || end != SZ_64M + SZ_8M - 1) {
625 test_err("error finding next alloc range: start %llu end %llu",
626 start, end);
627 goto out;
628 }
629
630 /*
631 * Search beyond any known range, shall return after last known range
632 * and end should be -1
633 */
634 find_first_clear_extent_bit(&tree, -1, &start, &end, CHUNK_TRIMMED);
635 if (start != SZ_64M + SZ_8M || end != -1) {
636 test_err(
637 "error handling beyond end of range search: start %llu end %llu",
638 start, end);
639 goto out;
640 }
641
642 ret = 0;
643out:
644 if (ret)
645 dump_extent_io_tree(&tree);
646 clear_extent_bits(&tree, 0, (u64)-1, CHUNK_TRIMMED | CHUNK_ALLOCATED);
647
648 return ret;
649}
650
651static void dump_eb_and_memory_contents(struct extent_buffer *eb, void *memory,
652 const char *test_name)
653{
654 for (int i = 0; i < eb->len; i++) {
655 struct page *page = folio_page(eb->folios[i >> PAGE_SHIFT], 0);
656 void *addr = page_address(page) + offset_in_page(i);
657
658 if (memcmp(addr, memory + i, 1) != 0) {
659 test_err("%s failed", test_name);
660 test_err("eb and memory diffs at byte %u, eb has 0x%02x memory has 0x%02x",
661 i, *(u8 *)addr, *(u8 *)(memory + i));
662 return;
663 }
664 }
665}
666
667static int verify_eb_and_memory(struct extent_buffer *eb, void *memory,
668 const char *test_name)
669{
670 for (int i = 0; i < (eb->len >> PAGE_SHIFT); i++) {
671 void *eb_addr = folio_address(eb->folios[i]);
672
673 if (memcmp(memory + (i << PAGE_SHIFT), eb_addr, PAGE_SIZE) != 0) {
674 dump_eb_and_memory_contents(eb, memory, test_name);
675 return -EUCLEAN;
676 }
677 }
678 return 0;
679}
680
681/*
682 * Init both memory and extent buffer contents to the same randomly generated
683 * contents.
684 */
685static void init_eb_and_memory(struct extent_buffer *eb, void *memory)
686{
687 get_random_bytes(memory, eb->len);
688 write_extent_buffer(eb, memory, 0, eb->len);
689}
690
691static int test_eb_mem_ops(u32 sectorsize, u32 nodesize)
692{
693 struct btrfs_fs_info *fs_info;
694 struct extent_buffer *eb = NULL;
695 void *memory = NULL;
696 int ret;
697
698 test_msg("running extent buffer memory operation tests");
699
700 fs_info = btrfs_alloc_dummy_fs_info(nodesize, sectorsize);
701 if (!fs_info) {
702 test_std_err(TEST_ALLOC_FS_INFO);
703 return -ENOMEM;
704 }
705
706 memory = kvzalloc(nodesize, GFP_KERNEL);
707 if (!memory) {
708 test_err("failed to allocate memory");
709 ret = -ENOMEM;
710 goto out;
711 }
712
713 eb = __alloc_dummy_extent_buffer(fs_info, SZ_1M, nodesize);
714 if (!eb) {
715 test_std_err(TEST_ALLOC_EXTENT_BUFFER);
716 ret = -ENOMEM;
717 goto out;
718 }
719
720 init_eb_and_memory(eb, memory);
721 ret = verify_eb_and_memory(eb, memory, "full eb write");
722 if (ret < 0)
723 goto out;
724
725 memcpy(memory, memory + 16, 16);
726 memcpy_extent_buffer(eb, 0, 16, 16);
727 ret = verify_eb_and_memory(eb, memory, "same page non-overlapping memcpy 1");
728 if (ret < 0)
729 goto out;
730
731 memcpy(memory, memory + 2048, 16);
732 memcpy_extent_buffer(eb, 0, 2048, 16);
733 ret = verify_eb_and_memory(eb, memory, "same page non-overlapping memcpy 2");
734 if (ret < 0)
735 goto out;
736 memcpy(memory, memory + 2048, 2048);
737 memcpy_extent_buffer(eb, 0, 2048, 2048);
738 ret = verify_eb_and_memory(eb, memory, "same page non-overlapping memcpy 3");
739 if (ret < 0)
740 goto out;
741
742 memmove(memory + 512, memory + 256, 512);
743 memmove_extent_buffer(eb, 512, 256, 512);
744 ret = verify_eb_and_memory(eb, memory, "same page overlapping memcpy 1");
745 if (ret < 0)
746 goto out;
747
748 memmove(memory + 2048, memory + 512, 2048);
749 memmove_extent_buffer(eb, 2048, 512, 2048);
750 ret = verify_eb_and_memory(eb, memory, "same page overlapping memcpy 2");
751 if (ret < 0)
752 goto out;
753 memmove(memory + 512, memory + 2048, 2048);
754 memmove_extent_buffer(eb, 512, 2048, 2048);
755 ret = verify_eb_and_memory(eb, memory, "same page overlapping memcpy 3");
756 if (ret < 0)
757 goto out;
758
759 if (nodesize > PAGE_SIZE) {
760 memcpy(memory, memory + 4096 - 128, 256);
761 memcpy_extent_buffer(eb, 0, 4096 - 128, 256);
762 ret = verify_eb_and_memory(eb, memory, "cross page non-overlapping memcpy 1");
763 if (ret < 0)
764 goto out;
765
766 memcpy(memory + 4096 - 128, memory + 4096 + 128, 256);
767 memcpy_extent_buffer(eb, 4096 - 128, 4096 + 128, 256);
768 ret = verify_eb_and_memory(eb, memory, "cross page non-overlapping memcpy 2");
769 if (ret < 0)
770 goto out;
771
772 memmove(memory + 4096 - 128, memory + 4096 - 64, 256);
773 memmove_extent_buffer(eb, 4096 - 128, 4096 - 64, 256);
774 ret = verify_eb_and_memory(eb, memory, "cross page overlapping memcpy 1");
775 if (ret < 0)
776 goto out;
777
778 memmove(memory + 4096 - 64, memory + 4096 - 128, 256);
779 memmove_extent_buffer(eb, 4096 - 64, 4096 - 128, 256);
780 ret = verify_eb_and_memory(eb, memory, "cross page overlapping memcpy 2");
781 if (ret < 0)
782 goto out;
783 }
784out:
785 free_extent_buffer(eb);
786 kvfree(memory);
787 btrfs_free_dummy_fs_info(fs_info);
788 return ret;
789}
790
791int btrfs_test_extent_io(u32 sectorsize, u32 nodesize)
792{
793 int ret;
794
795 test_msg("running extent I/O tests");
796
797 ret = test_find_delalloc(sectorsize);
798 if (ret)
799 goto out;
800
801 ret = test_find_first_clear_extent_bit();
802 if (ret)
803 goto out;
804
805 ret = test_eb_bitmaps(sectorsize, nodesize);
806 if (ret)
807 goto out;
808
809 ret = test_eb_mem_ops(sectorsize, nodesize);
810out:
811 return ret;
812}
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Copyright (C) 2013 Fusion IO. All rights reserved.
4 */
5
6#include <linux/pagemap.h>
7#include <linux/sched.h>
8#include <linux/slab.h>
9#include <linux/sizes.h>
10#include "btrfs-tests.h"
11#include "../ctree.h"
12#include "../extent_io.h"
13#include "../btrfs_inode.h"
14
15#define PROCESS_UNLOCK (1 << 0)
16#define PROCESS_RELEASE (1 << 1)
17#define PROCESS_TEST_LOCKED (1 << 2)
18
19static noinline int process_page_range(struct inode *inode, u64 start, u64 end,
20 unsigned long flags)
21{
22 int ret;
23 struct page *pages[16];
24 unsigned long index = start >> PAGE_SHIFT;
25 unsigned long end_index = end >> PAGE_SHIFT;
26 unsigned long nr_pages = end_index - index + 1;
27 int i;
28 int count = 0;
29 int loops = 0;
30
31 while (nr_pages > 0) {
32 ret = find_get_pages_contig(inode->i_mapping, index,
33 min_t(unsigned long, nr_pages,
34 ARRAY_SIZE(pages)), pages);
35 for (i = 0; i < ret; i++) {
36 if (flags & PROCESS_TEST_LOCKED &&
37 !PageLocked(pages[i]))
38 count++;
39 if (flags & PROCESS_UNLOCK && PageLocked(pages[i]))
40 unlock_page(pages[i]);
41 put_page(pages[i]);
42 if (flags & PROCESS_RELEASE)
43 put_page(pages[i]);
44 }
45 nr_pages -= ret;
46 index += ret;
47 cond_resched();
48 loops++;
49 if (loops > 100000) {
50 printk(KERN_ERR
51 "stuck in a loop, start %llu, end %llu, nr_pages %lu, ret %d\n",
52 start, end, nr_pages, ret);
53 break;
54 }
55 }
56 return count;
57}
58
59static int test_find_delalloc(u32 sectorsize)
60{
61 struct inode *inode;
62 struct extent_io_tree *tmp;
63 struct page *page;
64 struct page *locked_page = NULL;
65 unsigned long index = 0;
66 /* In this test we need at least 2 file extents at its maximum size */
67 u64 max_bytes = BTRFS_MAX_EXTENT_SIZE;
68 u64 total_dirty = 2 * max_bytes;
69 u64 start, end, test_start;
70 bool found;
71 int ret = -EINVAL;
72
73 test_msg("running find delalloc tests");
74
75 inode = btrfs_new_test_inode();
76 if (!inode) {
77 test_std_err(TEST_ALLOC_INODE);
78 return -ENOMEM;
79 }
80 tmp = &BTRFS_I(inode)->io_tree;
81
82 /*
83 * Passing NULL as we don't have fs_info but tracepoints are not used
84 * at this point
85 */
86 extent_io_tree_init(NULL, tmp, IO_TREE_SELFTEST, NULL);
87
88 /*
89 * First go through and create and mark all of our pages dirty, we pin
90 * everything to make sure our pages don't get evicted and screw up our
91 * test.
92 */
93 for (index = 0; index < (total_dirty >> PAGE_SHIFT); index++) {
94 page = find_or_create_page(inode->i_mapping, index, GFP_KERNEL);
95 if (!page) {
96 test_err("failed to allocate test page");
97 ret = -ENOMEM;
98 goto out;
99 }
100 SetPageDirty(page);
101 if (index) {
102 unlock_page(page);
103 } else {
104 get_page(page);
105 locked_page = page;
106 }
107 }
108
109 /* Test this scenario
110 * |--- delalloc ---|
111 * |--- search ---|
112 */
113 set_extent_delalloc(tmp, 0, sectorsize - 1, 0, NULL);
114 start = 0;
115 end = 0;
116 found = find_lock_delalloc_range(inode, locked_page, &start,
117 &end);
118 if (!found) {
119 test_err("should have found at least one delalloc");
120 goto out_bits;
121 }
122 if (start != 0 || end != (sectorsize - 1)) {
123 test_err("expected start 0 end %u, got start %llu end %llu",
124 sectorsize - 1, start, end);
125 goto out_bits;
126 }
127 unlock_extent(tmp, start, end);
128 unlock_page(locked_page);
129 put_page(locked_page);
130
131 /*
132 * Test this scenario
133 *
134 * |--- delalloc ---|
135 * |--- search ---|
136 */
137 test_start = SZ_64M;
138 locked_page = find_lock_page(inode->i_mapping,
139 test_start >> PAGE_SHIFT);
140 if (!locked_page) {
141 test_err("couldn't find the locked page");
142 goto out_bits;
143 }
144 set_extent_delalloc(tmp, sectorsize, max_bytes - 1, 0, NULL);
145 start = test_start;
146 end = 0;
147 found = find_lock_delalloc_range(inode, locked_page, &start,
148 &end);
149 if (!found) {
150 test_err("couldn't find delalloc in our range");
151 goto out_bits;
152 }
153 if (start != test_start || end != max_bytes - 1) {
154 test_err("expected start %llu end %llu, got start %llu, end %llu",
155 test_start, max_bytes - 1, start, end);
156 goto out_bits;
157 }
158 if (process_page_range(inode, start, end,
159 PROCESS_TEST_LOCKED | PROCESS_UNLOCK)) {
160 test_err("there were unlocked pages in the range");
161 goto out_bits;
162 }
163 unlock_extent(tmp, start, end);
164 /* locked_page was unlocked above */
165 put_page(locked_page);
166
167 /*
168 * Test this scenario
169 * |--- delalloc ---|
170 * |--- search ---|
171 */
172 test_start = max_bytes + sectorsize;
173 locked_page = find_lock_page(inode->i_mapping, test_start >>
174 PAGE_SHIFT);
175 if (!locked_page) {
176 test_err("couldn't find the locked page");
177 goto out_bits;
178 }
179 start = test_start;
180 end = 0;
181 found = find_lock_delalloc_range(inode, locked_page, &start,
182 &end);
183 if (found) {
184 test_err("found range when we shouldn't have");
185 goto out_bits;
186 }
187 if (end != (u64)-1) {
188 test_err("did not return the proper end offset");
189 goto out_bits;
190 }
191
192 /*
193 * Test this scenario
194 * [------- delalloc -------|
195 * [max_bytes]|-- search--|
196 *
197 * We are re-using our test_start from above since it works out well.
198 */
199 set_extent_delalloc(tmp, max_bytes, total_dirty - 1, 0, NULL);
200 start = test_start;
201 end = 0;
202 found = find_lock_delalloc_range(inode, locked_page, &start,
203 &end);
204 if (!found) {
205 test_err("didn't find our range");
206 goto out_bits;
207 }
208 if (start != test_start || end != total_dirty - 1) {
209 test_err("expected start %llu end %llu, got start %llu end %llu",
210 test_start, total_dirty - 1, start, end);
211 goto out_bits;
212 }
213 if (process_page_range(inode, start, end,
214 PROCESS_TEST_LOCKED | PROCESS_UNLOCK)) {
215 test_err("pages in range were not all locked");
216 goto out_bits;
217 }
218 unlock_extent(tmp, start, end);
219
220 /*
221 * Now to test where we run into a page that is no longer dirty in the
222 * range we want to find.
223 */
224 page = find_get_page(inode->i_mapping,
225 (max_bytes + SZ_1M) >> PAGE_SHIFT);
226 if (!page) {
227 test_err("couldn't find our page");
228 goto out_bits;
229 }
230 ClearPageDirty(page);
231 put_page(page);
232
233 /* We unlocked it in the previous test */
234 lock_page(locked_page);
235 start = test_start;
236 end = 0;
237 /*
238 * Currently if we fail to find dirty pages in the delalloc range we
239 * will adjust max_bytes down to PAGE_SIZE and then re-search. If
240 * this changes at any point in the future we will need to fix this
241 * tests expected behavior.
242 */
243 found = find_lock_delalloc_range(inode, locked_page, &start,
244 &end);
245 if (!found) {
246 test_err("didn't find our range");
247 goto out_bits;
248 }
249 if (start != test_start && end != test_start + PAGE_SIZE - 1) {
250 test_err("expected start %llu end %llu, got start %llu end %llu",
251 test_start, test_start + PAGE_SIZE - 1, start, end);
252 goto out_bits;
253 }
254 if (process_page_range(inode, start, end, PROCESS_TEST_LOCKED |
255 PROCESS_UNLOCK)) {
256 test_err("pages in range were not all locked");
257 goto out_bits;
258 }
259 ret = 0;
260out_bits:
261 clear_extent_bits(tmp, 0, total_dirty - 1, (unsigned)-1);
262out:
263 if (locked_page)
264 put_page(locked_page);
265 process_page_range(inode, 0, total_dirty - 1,
266 PROCESS_UNLOCK | PROCESS_RELEASE);
267 iput(inode);
268 return ret;
269}
270
271static int check_eb_bitmap(unsigned long *bitmap, struct extent_buffer *eb,
272 unsigned long len)
273{
274 unsigned long i;
275
276 for (i = 0; i < len * BITS_PER_BYTE; i++) {
277 int bit, bit1;
278
279 bit = !!test_bit(i, bitmap);
280 bit1 = !!extent_buffer_test_bit(eb, 0, i);
281 if (bit1 != bit) {
282 test_err("bits do not match");
283 return -EINVAL;
284 }
285
286 bit1 = !!extent_buffer_test_bit(eb, i / BITS_PER_BYTE,
287 i % BITS_PER_BYTE);
288 if (bit1 != bit) {
289 test_err("offset bits do not match");
290 return -EINVAL;
291 }
292 }
293 return 0;
294}
295
296static int __test_eb_bitmaps(unsigned long *bitmap, struct extent_buffer *eb,
297 unsigned long len)
298{
299 unsigned long i, j;
300 u32 x;
301 int ret;
302
303 memset(bitmap, 0, len);
304 memzero_extent_buffer(eb, 0, len);
305 if (memcmp_extent_buffer(eb, bitmap, 0, len) != 0) {
306 test_err("bitmap was not zeroed");
307 return -EINVAL;
308 }
309
310 bitmap_set(bitmap, 0, len * BITS_PER_BYTE);
311 extent_buffer_bitmap_set(eb, 0, 0, len * BITS_PER_BYTE);
312 ret = check_eb_bitmap(bitmap, eb, len);
313 if (ret) {
314 test_err("setting all bits failed");
315 return ret;
316 }
317
318 bitmap_clear(bitmap, 0, len * BITS_PER_BYTE);
319 extent_buffer_bitmap_clear(eb, 0, 0, len * BITS_PER_BYTE);
320 ret = check_eb_bitmap(bitmap, eb, len);
321 if (ret) {
322 test_err("clearing all bits failed");
323 return ret;
324 }
325
326 /* Straddling pages test */
327 if (len > PAGE_SIZE) {
328 bitmap_set(bitmap,
329 (PAGE_SIZE - sizeof(long) / 2) * BITS_PER_BYTE,
330 sizeof(long) * BITS_PER_BYTE);
331 extent_buffer_bitmap_set(eb, PAGE_SIZE - sizeof(long) / 2, 0,
332 sizeof(long) * BITS_PER_BYTE);
333 ret = check_eb_bitmap(bitmap, eb, len);
334 if (ret) {
335 test_err("setting straddling pages failed");
336 return ret;
337 }
338
339 bitmap_set(bitmap, 0, len * BITS_PER_BYTE);
340 bitmap_clear(bitmap,
341 (PAGE_SIZE - sizeof(long) / 2) * BITS_PER_BYTE,
342 sizeof(long) * BITS_PER_BYTE);
343 extent_buffer_bitmap_set(eb, 0, 0, len * BITS_PER_BYTE);
344 extent_buffer_bitmap_clear(eb, PAGE_SIZE - sizeof(long) / 2, 0,
345 sizeof(long) * BITS_PER_BYTE);
346 ret = check_eb_bitmap(bitmap, eb, len);
347 if (ret) {
348 test_err("clearing straddling pages failed");
349 return ret;
350 }
351 }
352
353 /*
354 * Generate a wonky pseudo-random bit pattern for the sake of not using
355 * something repetitive that could miss some hypothetical off-by-n bug.
356 */
357 x = 0;
358 bitmap_clear(bitmap, 0, len * BITS_PER_BYTE);
359 extent_buffer_bitmap_clear(eb, 0, 0, len * BITS_PER_BYTE);
360 for (i = 0; i < len * BITS_PER_BYTE / 32; i++) {
361 x = (0x19660dULL * (u64)x + 0x3c6ef35fULL) & 0xffffffffU;
362 for (j = 0; j < 32; j++) {
363 if (x & (1U << j)) {
364 bitmap_set(bitmap, i * 32 + j, 1);
365 extent_buffer_bitmap_set(eb, 0, i * 32 + j, 1);
366 }
367 }
368 }
369
370 ret = check_eb_bitmap(bitmap, eb, len);
371 if (ret) {
372 test_err("random bit pattern failed");
373 return ret;
374 }
375
376 return 0;
377}
378
379static int test_eb_bitmaps(u32 sectorsize, u32 nodesize)
380{
381 struct btrfs_fs_info *fs_info;
382 unsigned long len;
383 unsigned long *bitmap = NULL;
384 struct extent_buffer *eb = NULL;
385 int ret;
386
387 test_msg("running extent buffer bitmap tests");
388
389 /*
390 * In ppc64, sectorsize can be 64K, thus 4 * 64K will be larger than
391 * BTRFS_MAX_METADATA_BLOCKSIZE.
392 */
393 len = (sectorsize < BTRFS_MAX_METADATA_BLOCKSIZE)
394 ? sectorsize * 4 : sectorsize;
395
396 fs_info = btrfs_alloc_dummy_fs_info(len, len);
397 if (!fs_info) {
398 test_std_err(TEST_ALLOC_FS_INFO);
399 return -ENOMEM;
400 }
401
402 bitmap = kmalloc(len, GFP_KERNEL);
403 if (!bitmap) {
404 test_err("couldn't allocate test bitmap");
405 ret = -ENOMEM;
406 goto out;
407 }
408
409 eb = __alloc_dummy_extent_buffer(fs_info, 0, len);
410 if (!eb) {
411 test_std_err(TEST_ALLOC_ROOT);
412 ret = -ENOMEM;
413 goto out;
414 }
415
416 ret = __test_eb_bitmaps(bitmap, eb, len);
417 if (ret)
418 goto out;
419
420 /* Do it over again with an extent buffer which isn't page-aligned. */
421 free_extent_buffer(eb);
422 eb = __alloc_dummy_extent_buffer(fs_info, nodesize / 2, len);
423 if (!eb) {
424 test_std_err(TEST_ALLOC_ROOT);
425 ret = -ENOMEM;
426 goto out;
427 }
428
429 ret = __test_eb_bitmaps(bitmap, eb, len);
430out:
431 free_extent_buffer(eb);
432 kfree(bitmap);
433 btrfs_free_dummy_fs_info(fs_info);
434 return ret;
435}
436
437static int test_find_first_clear_extent_bit(void)
438{
439 struct extent_io_tree tree;
440 u64 start, end;
441 int ret = -EINVAL;
442
443 test_msg("running find_first_clear_extent_bit test");
444 extent_io_tree_init(NULL, &tree, IO_TREE_SELFTEST, NULL);
445
446 /*
447 * Set 1M-4M alloc/discard and 32M-64M thus leaving a hole between
448 * 4M-32M
449 */
450 set_extent_bits(&tree, SZ_1M, SZ_4M - 1,
451 CHUNK_TRIMMED | CHUNK_ALLOCATED);
452
453 find_first_clear_extent_bit(&tree, SZ_512K, &start, &end,
454 CHUNK_TRIMMED | CHUNK_ALLOCATED);
455
456 if (start != 0 || end != SZ_1M - 1) {
457 test_err("error finding beginning range: start %llu end %llu",
458 start, end);
459 goto out;
460 }
461
462 /* Now add 32M-64M so that we have a hole between 4M-32M */
463 set_extent_bits(&tree, SZ_32M, SZ_64M - 1,
464 CHUNK_TRIMMED | CHUNK_ALLOCATED);
465
466 /*
467 * Request first hole starting at 12M, we should get 4M-32M
468 */
469 find_first_clear_extent_bit(&tree, 12 * SZ_1M, &start, &end,
470 CHUNK_TRIMMED | CHUNK_ALLOCATED);
471
472 if (start != SZ_4M || end != SZ_32M - 1) {
473 test_err("error finding trimmed range: start %llu end %llu",
474 start, end);
475 goto out;
476 }
477
478 /*
479 * Search in the middle of allocated range, should get the next one
480 * available, which happens to be unallocated -> 4M-32M
481 */
482 find_first_clear_extent_bit(&tree, SZ_2M, &start, &end,
483 CHUNK_TRIMMED | CHUNK_ALLOCATED);
484
485 if (start != SZ_4M || end != SZ_32M - 1) {
486 test_err("error finding next unalloc range: start %llu end %llu",
487 start, end);
488 goto out;
489 }
490
491 /*
492 * Set 64M-72M with CHUNK_ALLOC flag, then search for CHUNK_TRIMMED flag
493 * being unset in this range, we should get the entry in range 64M-72M
494 */
495 set_extent_bits(&tree, SZ_64M, SZ_64M + SZ_8M - 1, CHUNK_ALLOCATED);
496 find_first_clear_extent_bit(&tree, SZ_64M + SZ_1M, &start, &end,
497 CHUNK_TRIMMED);
498
499 if (start != SZ_64M || end != SZ_64M + SZ_8M - 1) {
500 test_err("error finding exact range: start %llu end %llu",
501 start, end);
502 goto out;
503 }
504
505 find_first_clear_extent_bit(&tree, SZ_64M - SZ_8M, &start, &end,
506 CHUNK_TRIMMED);
507
508 /*
509 * Search in the middle of set range whose immediate neighbour doesn't
510 * have the bits set so it must be returned
511 */
512 if (start != SZ_64M || end != SZ_64M + SZ_8M - 1) {
513 test_err("error finding next alloc range: start %llu end %llu",
514 start, end);
515 goto out;
516 }
517
518 /*
519 * Search beyond any known range, shall return after last known range
520 * and end should be -1
521 */
522 find_first_clear_extent_bit(&tree, -1, &start, &end, CHUNK_TRIMMED);
523 if (start != SZ_64M + SZ_8M || end != -1) {
524 test_err(
525 "error handling beyond end of range search: start %llu end %llu",
526 start, end);
527 goto out;
528 }
529
530 ret = 0;
531out:
532 clear_extent_bits(&tree, 0, (u64)-1, CHUNK_TRIMMED | CHUNK_ALLOCATED);
533
534 return ret;
535}
536
537int btrfs_test_extent_io(u32 sectorsize, u32 nodesize)
538{
539 int ret;
540
541 test_msg("running extent I/O tests");
542
543 ret = test_find_delalloc(sectorsize);
544 if (ret)
545 goto out;
546
547 ret = test_find_first_clear_extent_bit();
548 if (ret)
549 goto out;
550
551 ret = test_eb_bitmaps(sectorsize, nodesize);
552out:
553 return ret;
554}