#! /bin/bash
# FS QA Test No. generic/018
#
# Basic defragmentation sanity tests
#
#-----------------------------------------------------------------------
# Copyright (c) 2009 Eric Sandeen.  All Rights Reserved.
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License as
# published by the Free Software Foundation.
#
# This program is distributed in the hope that it would be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write the Free Software Foundation,
# Inc.,  51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
#-----------------------------------------------------------------------
#

seq=`basename $0`
seqres=$RESULT_DIR/$seq
echo "QA output created by $seq"

here=`pwd`
tmp=/tmp/$$
status=1	# failure is the default!
trap "_cleanup; exit \$status" 0 1 2 3 15

_cleanup()
{
    cd /
    rm -f $tmp.*
}

# get standard environment, filters and checks
. ./common/rc
. ./common/filter
. ./common/defrag

# real QA test starts here
_supported_fs generic
_supported_os Linux

# We require scratch so that we'll have free contiguous space
_require_scratch
_scratch_mkfs >/dev/null 2>&1
_scratch_mount

_require_defrag

fragfile=$SCRATCH_MNT/fragfile.$$

rm -f $fragfile

# Craft some fragmented files, defrag them, check the result.
bsize=4096

echo "zero-length file:" | tee -a $seqres.full
touch $fragfile
_defrag --before 0 --after 0 $fragfile

echo "Sparse file (no blocks):" | tee -a $seqres.full
$XFS_IO_PROG -f -c "truncate 1m" $fragfile
_defrag --before 0 --after 0 $fragfile

echo "Contiguous file:" | tee -a $seqres.full
$XFS_IO_PROG -f -c "pwrite -b $((4 * bsize)) 0 $((4 * bsize))" $fragfile \
					> /dev/null
_defrag --before 1 --after 1 $fragfile

echo "Write backwards sync, but contiguous - should defrag to 1 extent" | tee -a $seqres.full
for i in `seq 9 -1 0`; do
	$XFS_IO_PROG -fs -c "pwrite -b $bsize $((i * bsize)) $bsize" $fragfile \
					> /dev/null
done

# Accept fewer fragments than we might expect; we don't have perfect control.
_defrag --max_before 10 --min_before 5 --after 1 $fragfile

echo "Write backwards sync leaving holes - defrag should do nothing" | tee -a $seqres.full
for i in `seq 31 -2 0`; do
	$XFS_IO_PROG -fs -c "pwrite -b $bsize $((i * bsize)) $bsize" $fragfile \
					> /dev/null
done
_defrag --before 16 --after 16 $fragfile

echo "Write forwards sync leaving holes - defrag should do nothing" | tee -a $seqres.full
for i in `seq 0 2 31`; do
	$XFS_IO_PROG -fs -c "pwrite -b $bsize $((i * bsize)) $bsize" $fragfile \
					> /dev/null
done
_defrag --before 16 --after 16 $fragfile

rm -f $seqres.full
status=0
exit
