chiark / gitweb /
fixes from www.gnu.org
[adns] / regress / r1test
CommitLineData
e3324da1 1#!/bin/sh
2# usage: r1test <testcasename>
89435c42 3# test execution script, for running one test
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>
c6826df6 10# Copyright (C) 1999-2000 Tony Finch <dot@dotat.at>
89435c42 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.
e3324da1 25
26set -e
ac45858e 27mrc=1
28trap 'exit $mrc' 0
29
a4443336 30casename="$1"
31case="case-$casename"
3c5796f7 32ocase="output-$casename"
e3324da1 33
d024926c 34exec 4<"$case.sys"
35read <&4 program initfile initflags
36read <&4 queryargs
e9d74277 37
38initstring="`cat init-$initfile.text`"
09aee00b 39xinitflagsf=$program-xinitflags.text
40if test -f $xinitflagsf
41then
49972772 42 initflags="$initflags `cat $xinitflagsf`";
09aee00b 43else
44 initflags="$initflags /"
45fi
e9d74277 46
3c5796f7 47rm -f $ocase.*
48
8f3b71b0 49EF_DISABLE_BANNER=1
50export EF_DISABLE_BANNER
51
d024926c 52if test -f "$case.in"
53then
54 exec <"$case.in"
55else
56 exec </dev/null
57fi
58
4b30caad 59playback=./${program}_playback
60if test ! -f $playback
61then
62 printf "SKIPPED-$casename "
63 mrc=5
64 exit
65fi
66
e9d74277 67set +e
4b30caad 68ADNS_TEST_REPORT_FD=3 ADNS_TEST_IN_FD=4 \
f9d56257 69 3>>"$ocase.report" 4<&4 >"$ocase.out" 2>"$ocase.err" \
4b30caad 70 $playback $initflags"$initstring" $queryargs
e9d74277 71rc=$?
72set -e
73
ac45858e 74if [ "$rc" = 5 ]
75then
cc0f95d0 76 printf "SKIPPED-$casename "
ac45858e 77 mrc=5
78 exit
79fi
80
7ca1d685 81echo "rc=$rc" >>$ocase.out
e9d74277 82
09a06b84 83failed=false
84for part in err out
e9d74277 85do
7ca1d685 86 if diff -u -- "$case.$part" "$ocase.$part"
e9d74277 87 then
88 :
89 else
8744cce8 90 failwhy="$failwhy WRONG OUTPUT"
e9d74277 91 fi
92done
93
4b30caad 94cat <&4 >"$ocase.leftover"
8744cce8 95if egrep . /dev/null "$ocase.leftover"
09a06b84 96then
8744cce8 97 failwhy="$failwhy EXITED EARLY"
98fi
99
100if [ "x$failwhy" != x ]
101then
102 scremain="`wc -l <\"$ocase.leftover\"`"
103 echo >&2 "FAILED $case -$failwhy - lines of syscall remaining $scremain"
ac45858e 104 mrc=2
105 exit
09a06b84 106fi
107
cc0f95d0 108printf "$casename "
ac45858e 109mrc=0