052

   1 #! /bin/sh
   2 # XFS QA Test No. 052
   3 #
   4 # Ensure that quota(1) displays blocksizes matching ondisk dquots.
   5 #
   6 # MOUNT_OPTIONS can be set to grpquota to test group quota,
   7 # defaults to usrquota if MOUNT_OPTIONS is not set.
   8 #
   9 #-----------------------------------------------------------------------
  10 # Copyright (c) 2000-2002 Silicon Graphics, Inc.  All Rights Reserved.
  11 #
  12 # This program is free software; you can redistribute it and/or modify it
  13 # under the terms of version 2 of the GNU General Public License as
  14 # published by the Free Software Foundation.
  15 #
  16 # This program is distributed in the hope that it would be useful, but
  17 # WITHOUT ANY WARRANTY; without even the implied warranty of
  18 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  19 #
  20 # Further, this software is distributed without any warranty that it is
  21 # free of the rightful claim of any third person regarding infringement
  22 # or the like.  Any license provided herein, whether implied or
  23 # otherwise, applies only to this software file.  Patent licenses, if
  24 # any, provided herein do not apply to combinations of this program with
  25 # other software, or any other product whatsoever.
  26 #
  27 # You should have received a copy of the GNU General Public License along
  28 # with this program; if not, write the Free Software Foundation, Inc., 59
  29 # Temple Place - Suite 330, Boston MA 02111-1307, USA.
  30 #
  31 # Contact information: Silicon Graphics, Inc., 1600 Amphitheatre Pkwy,
  32 # Mountain View, CA  94043, or:
  33 #
  34 # http://www.sgi.com
  35 #
  36 # For further information regarding this notice, see:
  37 #
  38 # http://oss.sgi.com/projects/GenInfo/SGIGPLNoticeExplan/
  39 #-----------------------------------------------------------------------
  40 #
  41 # creator
  42 owner=nathans@sgi.com
  43
  44 seq=`basename $0`
  45 echo "QA output created by $seq"
  46
  47 here=`pwd`
  48 tmp=/tmp/$$
  49 status=1        # failure is the default!
  50
  51 # get standard environment, filters and checks
  52 . ./common.rc
  53 . ./common.filter
  54 . ./common.quota
  55
  56 _cleanup()
  57 {
  58         umount $SCRATCH_MNT 2>/dev/null
  59         rm -f $tmp.*
  60 }
  61 trap "_cleanup; exit \$status" 0 1 2 3 15
  62 rm -f $seq.full
  63
  64 _require_scratch
  65 _require_quota
  66
  67 # setup a default run
  68 if [ -z "$MOUNT_OPTIONS" ]; then
  69         MOUNT_OPTIONS="-o usrquota"; export MOUNT_OPTIONS
  70 fi
  71
  72 # real QA test starts here
  73 _scratch_mkfs_xfs | _filter_mkfs 2>$tmp.mkfs
  74 cat $tmp.mkfs >>$seq.full
  75 chmod a+w $seq.full     # arbitrary users will write here
  76
  77 # keep the blocksize from mkfs ($dbsize)
  78 . $tmp.mkfs
  79
  80 _qmount
  81
  82 # setup user/group to test
  83 if src/feature -U $SCRATCH_DEV ; then
  84         type=u ; eval `_choose_uid`
  85 elif src/feature -G $SCRATCH_DEV ; then
  86         type=g ; eval `_choose_gid`
  87 else
  88         _notrun "No quota support at mount time"
  89 fi
  90
  91 # create 100 (fs-blocksize) blocks
  92 _file_as_id $SCRATCH_MNT/foo $id $type $dbsize 220
  93 sync
  94
  95 # set limit at 1001 (1k) blocks
  96 setquota -$type $id 1001 1001 10 10 $SCRATCH_DEV
  97
  98 # cross check blks, softblks, hardblks <-> quota, xfs_db
  99 quota -$type $id | tee -a $seq.full | perl -ne '
 100         if (m,^\s*'$SCRATCH_DEV'\s+(\d+)\s+(\d+)\s+(\d+), ||
 101                 ($next == 1 && m,^\s+(\d+)\s+(\d+)\s+(\d+),)) {
 102                 print "used_blocks=", $1, "\n";
 103                 print "soft_blocks=", $2, "\n";
 104                 print "hard_blocks=", $3, "\n";
 105                 $next = 0;
 106         }
 107         elsif (m,^\s*'$SCRATCH_DEV',) {         # devfs (long) names
 108                 $next = 1;
 109         }' | LC_COLLATE=POSIX sort >$tmp.quota
 110
 111 echo ===quota output >> $seq.full
 112 cat $tmp.quota >> $seq.full
 113 [ ! -s $tmp.quota ] && echo "warning: quota output file is empty"
 114
 115 umount $SCRATCH_MNT
 116
 117 # note - does (insitu) conversion from fs blocks to 1K blocks
 118 xfs_db -rc "dquot -$type $id" -c p $SCRATCH_DEV | tee -a $seq.full | perl -ne '
 119         if (/^diskdq.bcount = (\d+)$/) {
 120                  print "used_blocks=", $1 * '$dbsize' / 1024, "\n";
 121         }
 122         elsif (/^diskdq.blk_hardlimit = (\d+)$/) {
 123                  print "hard_blocks=", $1 * '$dbsize' / 1024, "\n";
 124         }
 125         elsif (/^diskdq.blk_softlimit = (\d+)$/) {
 126                 print "soft_blocks=", $1 * '$dbsize' / 1024, "\n";
 127         }' | LC_COLLATE=POSIX sort >$tmp.xfs_db
 128
 129 echo ===xfs_db output >> $seq.full
 130 cat $tmp.xfs_db >> $seq.full
 131 [ ! -s $tmp.xfs_db ] && echo "warning: xfs_db output file is empty"
 132
 133 echo Comparing out of quota and xfs_db
 134 diff $tmp.quota $tmp.xfs_db
 135 [ $? -eq 0 ] && echo OK.
 136
 137 # success, all done
 138 status=0
 139 exit