X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=adns.git;a=blobdiff_plain;f=regress%2Fm1test;h=493db0b0fbea2a34ae6c98e181be3706a1f3fe62;hp=81b46345a4b00f11148941fc86ac9eb7a82a905c;hb=2260f64fef01236f3cb0d3da98dbeeeb117c224c;hpb=e24e7155ee921f30b195b079d0e2d29bf268a354 diff --git a/regress/m1test b/regress/m1test index 81b4634..493db0b 100755 --- a/regress/m1test +++ b/regress/m1test @@ -1,13 +1,12 @@ -#!/bin/sh +#!/bin/bash # usage: m1test [] ' # test recording script # -# This file is -# Copyright (C) 1998-2000 Ian Jackson -# -# It is part of adns, which is -# Copyright (C) 1997-2000 Ian Jackson -# Copyright (C) 1999 Tony Finch +# This file is part of adns, which is +# Copyright (C) 1997-2000,2003,2006 Ian Jackson +# Copyright (C) 1999-2000,2003,2006 Tony Finch +# Copyright (C) 1991 Massachusetts Institute of Technology +# (See the file INSTALL for full details.) # # 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 @@ -25,45 +24,84 @@ set -e +: ${srcdir=.} if [ $# -lt 3 ] then echo >&2 \ -'usage: m1test [] [=] - ' +'usage: m1test [-] ["<"] + [=] +("<" means read input from case-.in)' exit 1 fi -case="case-$1"; shift +case="$srcdir/case-$1"; shift initfile="$1"; shift -hrecord="./hrecord" +hrecord="./adnstest_record" case "$1" in -*) initflags="$1"; shift esac +if test "x$1" = "x<" +then + shift; exec <"$case.in" +fi + case "$1" in =*) hrecord="`echo \"$1\" | sed -e 's/^=//'`"; shift esac +if test ! -f "$hrecord" -a -f "${hrecord}_record" +then + case "$hrecord" in + /*) program="$hrecord" ;; + *) program="./$hrecord" ;; + esac + hrecord="${program}_record" +else + program="$(echo "$hrecord" | sed -e 's/ .*//; s/_record$//')" +fi + queryargs="$*" -initstring="`cat init-$initfile.text`" +initstring="`cat $srcdir/init-$initfile.text`" +xinitflagsf=$srcdir/$program-xinitflags.text +if test -f $xinitflagsf +then + useinitflags="$initflags $(cat $xinitflagsf)"; +else + useinitflags="$initflags /" +fi -echo $initfile $initflags >"$case.sys" +echo $program $initfile $initflags >"$case.sys" echo "$queryargs" >>"$case.sys" EF_DISABLE_BANNER=1 export EF_DISABLE_BANNER -echo running hrecord $initflags "/... $queryargs" +rm -f pipe.out pipe.err +mknod pipe.out p +mknod pipe.err p +tee pipe.out +exec 5>pipe.err + +echo running hrecord $initflags "... $queryargs" set +e -ADNS_TEST_OUT_FD=3 3>>"$case.sys" >"$case.out" 2>"$case.err" >"$case.sys" >&4 2>&5 \ + $hrecord $useinitflags"$initstring" $queryargs rc=$? set -e -echo "rc=$rc" >>$case.out +echo "rc=$rc" >&4 +exec 4>&- +exec 5>&- + +wait $tee_out +wait $tee_err -egrep . -- "$case.err" "$case.out" echo "exit status: $rc"