2 # SPDX-License-Identifier: GPL-2.0
3 # Copyright (c) 2016, Oracle and/or its affiliates. All Rights Reserved.
7 # See how well reflink handles reflinking a file with a million extents.
10 seqres="$RESULT_DIR/$seq"
11 echo "QA output created by $seq"
15 status=1 # failure is the default!
16 trap "_cleanup; exit \$status" 0 1 2 3 15
24 # get standard environment, filters and checks
30 # real QA test starts here
32 _require_scratch_reflink
34 _require_test_program "punch-alternating"
38 echo "Format and mount"
39 _scratch_mkfs > "$seqres.full" 2>&1
40 _scratch_mount >> "$seqres.full" 2>&1
42 testdir="$SCRATCH_MNT/test-$seq"
45 # Setup for one million blocks, but we'll accept stress testing down to
46 # 2^17 blocks... that should be plenty for anyone.
48 free_blocks=$(stat -f -c '%a' "$testdir")
49 blksz=$(_get_block_size "$testdir")
50 space_avail=$((free_blocks * blksz))
52 blocks_needed=$(( 2 ** (fnr + 1) ))
53 space_needed=$((blocks_needed * blksz * 5 / 4))
56 while test $space_needed -gt $space_avail; do
60 test $fnr -lt 17 && _notrun "Insufficient space for stress test; would only create $blocks_needed extents."
62 echo "Create a many-block file"
63 echo "creating $blocks_needed blocks..." >> "$seqres.full"
64 $XFS_IO_PROG -f -c "pwrite -S 0x61 -b 4194304 0 $((2 ** (fnr + 1) * blksz))" "$testdir/file1" >> "$seqres.full"
65 echo "punching..." >> "$seqres.full"
66 "$here/src/punch-alternating" "$testdir/file1" >> "$seqres.full"
67 echo "...done" >> "$seqres.full"
70 echo "Reflink the big file"
71 bytes=$((blocks_needed * blksz))
72 echo "reflinking $((blocks_needed / 2)) blocks, $((bytes / 2)) bytes" >> "$seqres.full"
73 _reflink_range "$testdir/file1" 0 "$testdir/file2" 0 $bytes >> "$seqres.full"