2 # SPDX-License-Identifier: GPL-2.0
3 # Copyright (c) 2016, Oracle and/or its affiliates. All Rights Reserved.
7 # Test recovery of unused CoW reservations:
8 # - Create two reflinked files. Set extsz hint on second file.
9 # - Dirty a single byte on a number of CoW reservations in the second file.
10 # - Fsync to flush out the dirty pages.
11 # - Wait for the reclaim to run.
12 # - Write more and see how bad fragmentation is.
15 seqres=$RESULT_DIR/$seq
16 echo "QA output created by $seq"
20 status=1 # failure is the default!
21 trap "_cleanup; exit \$status" 0 1 2 3 15
26 echo $old_cow_lifetime > /proc/sys/fs/xfs/speculative_cow_prealloc_lifetime
30 # get standard environment, filters and checks
35 # real QA test starts here
38 _require_scratch_reflink
40 _require_xfs_io_command "cowextsize"
41 _require_xfs_io_command "falloc"
42 _require_xfs_io_command "fiemap"
44 old_cow_lifetime=$(cat /proc/sys/fs/xfs/speculative_cow_prealloc_lifetime)
48 echo "Format and mount"
49 _scratch_mkfs > $seqres.full 2>&1
50 _scratch_mount >> $seqres.full 2>&1
52 testdir=$SCRATCH_MNT/test-$seq
57 filesize=$((blksz * nr))
59 bufsize=$((blksz * bufnr))
61 _require_fs_space $SCRATCH_MNT $((filesize / 1024 * 3 * 5 / 4))
62 real_blksz=$(_get_block_size $testdir)
63 internal_blks=$((filesize / real_blksz))
65 echo "Create the original files"
66 $XFS_IO_PROG -c "cowextsize $bufsize" $testdir
67 $XFS_IO_PROG -f -c "pwrite -S 0x61 -b $bufsize 0 $filesize" $testdir/file1 >> $seqres.full
68 $XFS_IO_PROG -f -c "pwrite -S 0x61 -b $bufsize 0 $filesize" $testdir/file2.chk >> $seqres.full
69 _cp_reflink $testdir/file1 $testdir/file2 >> $seqres.full
73 md5sum $testdir/file1 | _filter_scratch
74 md5sum $testdir/file2 | _filter_scratch
75 md5sum $testdir/file2.chk | _filter_scratch
77 echo "CoW and leave leftovers"
78 echo 2 > /proc/sys/fs/xfs/speculative_cow_prealloc_lifetime
79 seq 2 2 $((nr - 1)) | while read f; do
80 $XFS_IO_PROG -f -c "pwrite -S 0x63 $((blksz * f - 1)) 1" $testdir/file2 >> $seqres.full
81 $XFS_IO_PROG -f -c "pwrite -S 0x63 $((blksz * f - 1)) 1" $testdir/file2.chk >> $seqres.full
85 echo "Wait for CoW expiration"
88 echo "Allocate free space"
89 for i in $(seq 1 32); do
90 $XFS_IO_PROG -f -c "falloc 0 1" $testdir/junk.$i >> $seqres.full
92 $XFS_IO_PROG -f -c "falloc 0 $filesize" $testdir/junk >> $seqres.full
94 echo "CoW and leave leftovers"
95 echo $old_cow_lifetime > /proc/sys/fs/xfs/speculative_cow_prealloc_lifetime
96 seq 2 2 $((nr - 1)) | while read f; do
97 $XFS_IO_PROG -f -c "pwrite -S 0x63 $((blksz * f)) 1" $testdir/file2 >> $seqres.full
98 $XFS_IO_PROG -f -c "pwrite -S 0x63 $((blksz * f)) 1" $testdir/file2.chk >> $seqres.full
103 md5sum $testdir/file1 | _filter_scratch
104 md5sum $testdir/file2 | _filter_scratch
105 md5sum $testdir/file2.chk | _filter_scratch
107 echo "Check extent counts"
108 old_extents=$(_count_extents $testdir/file1)
109 new_extents=$(_count_extents $testdir/file2)
111 echo "old extents: $old_extents" >> $seqres.full
112 echo "new extents: $new_extents" >> $seqres.full
113 echo "maximum extents: $internal_blks" >> $seqres.full
114 test $new_extents -le $((3 * nr / bufnr)) || echo "file2 more fragmented than expected"