#! /bin/sh
# XFS QA Test No. 071
#
# Exercise IO at large file offsets.
#
#-----------------------------------------------------------------------
# Copyright (c) 2000-2003 Silicon Graphics, Inc.  All Rights Reserved.
# 
# This program is free software; you can redistribute it and/or modify it
# under the terms of version 2 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.
# 
# Further, this software is distributed without any warranty that it is
# free of the rightful claim of any third person regarding infringement
# or the like.  Any license provided herein, whether implied or
# otherwise, applies only to this software file.  Patent licenses, if
# any, provided herein do not apply to combinations of this program with
# other software, or any other product whatsoever.
# 
# You should have received a copy of the GNU General Public License along
# with this program; if not, write the Free Software Foundation, Inc., 59
# Temple Place - Suite 330, Boston MA 02111-1307, USA.
# 
# Contact information: Silicon Graphics, Inc., 1600 Amphitheatre Pkwy,
# Mountain View, CA  94043, or:
# 
# http://www.sgi.com 
# 
# For further information regarding this notice, see: 
# 
# http://oss.sgi.com/projects/GenInfo/SGIGPLNoticeExplan/
#-----------------------------------------------------------------------
#
# creator
owner=nathans@sgi.com

seq=`basename $0`
echo "QA output created by $seq"
rm -f $seq.full

here=`pwd`
tmp=/tmp/$$
status=1	# failure is the default!

_cleanup()
{
    rm -f $tmp.*
    umount $SCRATCH_DEV 2>/dev/null
}
trap "_cleanup; exit \$status" 0 1 2 3 15

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

_filter_io()
{
    sed -e "s/$dbsize/1FSB/g"
}

_filter_off()
{
    sed -e "s/$1/<OFFSET>/g" | _filter_io
}

write_block()
{
    location=$1
    words=$2
    offset=$3
    bytes=$4
    direct=$5

    [ `$direct` ] && flags=-d

    echo "Writing $bytes bytes, offset is $words (direct=$direct)" | _filter_io
    echo "Writing $bytes bytes at $location $words (direct=$direct)" >>$seq.full
    xfs_io -c "pwrite $offset 512" $flags $SCRATCH_MNT/$seq \
	2>&1 | _filter_off $offset | tee -a $seq.full
    xfs_bmap -v $SCRATCH_MNT/$seq >>$seq.full

    echo "Reading $bytes bytes (direct=$direct)" | _filter_io
    echo "Reading $bytes bytes at $location (direct=$direct)" >>$seq.full
    xfs_io -c "pread $offset $bytes" $flags $SCRATCH_MNT/$seq \
	2>&1 | _filter_off $offset | tee -a $seq.full

    xfs_io -c "pread -v $offset $bytes" $flags $SCRATCH_MNT/$seq >>$seq.full

    echo | tee -a $seq.full
}

# real QA test starts here
_require_scratch
_scratch_mkfs_xfs | _filter_mkfs 2>$tmp.mkfs
source $tmp.mkfs
echo
_scratch_mount

# Okay... filesize limit depends on blocksize, bits per long and
# also if large block device patch is enabled (can't dynamically
# check that, so use env var USE_LBD_PATCH to override default).
# 
# Note:
# We check from 1Tb below our guessed limit to 1Tb above it, and
# see what happens for each 1Tb increment along the way (first
# half should succeed, second half should fail to create a file).
# So, number calculated here is not the actual limit, its a ways
# above that, hopefully.

bitsperlong=`src/feature -w`
if [ "$bitsperlong" -eq 32 ]; then
    upperbound=`expr $dbsize / 512`
    # which is 8(TB) for 4K, 4(TB) for 2k, ... etc.
    [ "$USE_LBD_PATCH" = yes ] && upperbound=16
    # limited by page cache index when LBD patch onboard.
else
    upperbound=`echo 8 \* 1024 \* 1024 | bc` 
    # 8 exabytes (working in TBs below)
fi

# Step from (upperbound-1)(Tb) through (upperbound+1(Tb), &
# seeks/writes/reads on each boundary (using holey files) -
# 1byte back from the boundary, and 1FSB back from the same
# boundary (and stash xfs_bmap output), before moving onto
# each new test point.

xfs_io -c "truncate 0" -f $SCRATCH_MNT/$seq

oneTB=`echo 1024 \* 1024 \* 1024 \* 1024 | bc`
count=`expr $upperbound - 1`
upperbound=`expr $upperbound + 1`

while [ $count -le $upperbound ]
do
    # buffered IO
    offset=`echo $oneTB \* $count | bc`
    write_block $count "+0" $offset 512 false
    offset=`echo $oneTB \* $count \- 1 | bc`
    write_block $count "minus 1 byte" $offset 512 false
    offset=`echo $oneTB \* $count \- $dbsize | bc`
    write_block $count "minus 1FSB" $offset 512 false
    write_block $count "minus 1FSB" $offset 1 false

    # direct IO
    offset=`echo $oneTB \* $count | bc`
    write_block $count "+0" $offset $dbsize true
    offset=`echo $oneTB \* $count \- 1 | bc`
    write_block $count "minus 1FSB" $offset $dbsize true

    echo === Iterating, `expr $upperbound - $count` remains
    echo
    echo
    count=`expr $count + 1`
done

# success, all done
status=0
exit