mdw@git.distorted.org.uk Git - adns/blob - regress/m1test

   1 #!/bin/sh
   2 # usage: m1test <name> <initfile> [<initflags>] <queryargs>'
   3 # test recording script
   4 #
   5 #  This file is
   6 #    Copyright (C) 1998-2000 Ian Jackson <ian@davenant.greenend.org.uk>
   7 #
   8 #  It is part of adns, which is
   9 #    Copyright (C) 1997-2000 Ian Jackson <ian@davenant.greenend.org.uk>
  10 #    Copyright (C) 1999 Tony Finch <dot@dotat.at>
  11 #
  12 #  This program is free software; you can redistribute it and/or modify
  13 #  it under the terms of the GNU General Public License as published by
  14 #  the Free Software Foundation; either version 2, or (at your option)
  15 #  any later version.
  16 #
  17 #  This program is distributed in the hope that it will be useful,
  18 #  but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 #  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 #  GNU General Public License for more details.
  21 #
  22 #  You should have received a copy of the GNU General Public License
  23 #  along with this program; if not, write to the Free Software Foundation,
  24 #  Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  25
  26 set -e
  27
  28 if [ $# -lt 3 ]
  29 then
  30         echo >&2 'usage: m1test <name> <initfile> [<initflags>] <queryargs>'
  31         exit 1
  32 fi
  33
  34 case="case-$1"; shift
  35 initfile="$1"; shift
  36
  37 case "$1" in
  38 -*)     initflags="$1"; shift
  39 esac
  40
  41 queryargs="$*"
  42
  43 initstring="`cat init-$initfile.text`"
  44
  45 echo $initfile $initflags >"$case.sys"
  46 echo "$queryargs" >>"$case.sys"
  47
  48 EF_DISABLE_BANNER=1
  49 export EF_DISABLE_BANNER
  50
  51 echo running hrecord $initflags "/... $queryargs"
  52 set +e
  53 ADNS_TEST_OUT_FD=3 3>>"$case.sys" >"$case.out" 2>"$case.err" </dev/null \
  54  ./hrecord $initflags "/$initstring" $queryargs
  55 rc=$?
  56 set -e
  57
  58 echo "rc=$rc" >>$case.out
  59
  60 egrep . -- "$case.err" "$case.out"
  61 echo "exit status: $rc"