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