xfstests: include test subdirectory support
[xfstests-dev.git] / 004
1 #! /bin/bash
2 # FS QA Test No. 004
3 #
4 # exercise xfs_db bug #789674 and other freesp functionality
5 #
6 #-----------------------------------------------------------------------
7 # Copyright (c) 2000-2002 Silicon Graphics, Inc.  All Rights Reserved.
8 #
9 # This program is free software; you can redistribute it and/or
10 # modify it under the terms of the GNU General Public License as
11 # published by the Free Software Foundation.
12 #
13 # This program is distributed in the hope that it would be useful,
14 # but WITHOUT ANY WARRANTY; without even the implied warranty of
15 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 # GNU General Public License for more details.
17 #
18 # You should have received a copy of the GNU General Public License
19 # along with this program; if not, write the Free Software Foundation,
20 # Inc.,  51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
21 #
22 #-----------------------------------------------------------------------
23 #
24
25 seq=`basename $0`
26 echo "QA output created by $seq"
27
28 here=`pwd`
29 tmp=/tmp/$$
30 status=0
31
32 _cleanup()
33 {
34         umount $SCRATCH_MNT
35         rm -f $tmp.*
36         exit $status
37 }
38 trap "_cleanup" 0 1 2 3 15
39
40 _populate_scratch()
41 {
42         echo "=== mkfs output ===" >>$seq.full
43         _scratch_mkfs_xfs | tee -a $seq.full | _filter_mkfs 2>$tmp.mkfs
44         . $tmp.mkfs
45         _scratch_mount
46         dd if=/dev/zero of=$SCRATCH_MNT/foo count=200 bs=4096 >/dev/null 2>&1 &
47         dd if=/dev/zero of=$SCRATCH_MNT/goo count=400 bs=4096 >/dev/null 2>&1 &
48         dd if=/dev/zero of=$SCRATCH_MNT/moo count=800 bs=4096 >/dev/null 2>&1 &
49         wait
50         umount $SCRATCH_MNT                     # flush everything
51         _scratch_mount                          # and then remount
52 }
53
54
55 # get standard environment, filters and checks
56 . ./common.rc
57 . ./common.filter
58
59 # real QA test starts here
60 _supported_fs xfs
61 _supported_os IRIX Linux
62
63 _need_to_be_root
64 _require_scratch
65 _require_no_large_scratch_dev
66
67 rm -f $seq.full
68
69 _populate_scratch
70
71 [ "$HOSTOS" = "Linux" ] && DF_PROG="$DF_PROG -P --block-size=512"
72
73 eval `$DF_PROG $SCRATCH_MNT 2>&1 \
74         | tail -1 | $AWK_PROG '{ printf "blocks=%u used=%u avail=%u\n", $3, $4, $5 }'`
75 echo "df gave: blocks=$blocks used=$used avail=$avail" >>$seq.full
76 echo "blocksize from mkfs is '$dbsize'" >>$seq.full
77
78 xfs_db -r -c "freesp -s" $SCRATCH_DEV >$tmp.xfs_db
79 echo "xfs_db for $SCRATCH_DEV" >>$seq.full
80 cat $tmp.xfs_db >>$seq.full
81
82 eval `$XFS_IO_PROG -x -c resblks $SCRATCH_MNT 2>&1 \
83         | $AWK_PROG '/available/ { printf "resblks=%u\n", $5 }'`
84 echo "resblks gave: resblks=$resblks" >>$seq.full
85
86 # check the 'blocks' field from freesp command is OK
87 # since 2.6.18, df does not report the 4 blocks per AG that cannot
88 # be allocated, hence we check for that exact mismatch.
89 # since ~2.6.22, reserved blocks are used by default and df does
90 # not report them, hence check for an exact mismatch.
91 perl -ne '
92         BEGIN   { $avail ='$avail' * 512;
93                   $answer="(no xfs_db free blocks line?)" }
94         /free blocks (\d+)$/    || next;
95         $freesp = $1 * '$dbsize';
96         if ($freesp == $avail) {
97                 $answer = "yes";
98         } else {
99                 $avail = $avail + (('$agcount' + 1) * '$dbsize' * 4);
100                 if ($freesp == $avail) {
101                         $answer = "yes";
102                 } else {
103                         $avail = $avail + ('$resblks' * '$dbsize');
104                         if ($freesp == $avail) {
105                                 $answer = "yes";
106                         } else {
107                                 $answer = "no ($freesp != $avail)";
108                         }
109                 }
110         }
111         END     { print "$answer\n" }
112         ' <$tmp.xfs_db >$tmp.ans
113 ans="`cat $tmp.ans`"
114 echo "Checking blocks column same as df: $ans"
115 if [ "$ans" != yes ]
116 then
117         echo "Error: $SCRATCH_DEV: freesp mismatch: $ans"
118         echo "xfs_db output ..."
119         cat $tmp.xfs_db
120         status=1
121 fi
122
123 # check the 'pct' field from freesp command is good
124 perl -ne '
125             BEGIN       { $percent = 0; }
126             /free/      && next;        # skip over free extent size number
127             if (/\s+(\d+\.\d+)$/) {
128                 $percent += $1;
129             }
130             END { $percent += 0.5; print int($percent), "\n" }  # round up
131 ' <$tmp.xfs_db >$tmp.ans
132 ans="`cat $tmp.ans`"
133 echo "Checking percent column yields 100: $ans"
134 if [ "$ans" != 100 ]
135 then
136         echo "Error: $SCRATCH_DEV: pct mismatch: $ans (expected 100)"
137         echo "xfs_db output ..."
138         cat $tmp.xfs_db
139         status=1
140 fi
141
142 exit