A couple more tests and a script to manage.
[adns] / regress / r1test
1 #!/bin/sh
2 # usage: r1test <testcasename>
3
4 set -e
5 casename="$1"
6 case="case-$casename"
7
8 exec <"$case.sys"
9 read initfile
10 read queryargs
11
12 initstring="`cat init-$initfile.text`"
13
14 set +e
15 ADNS_TEST_REPORT_FD=3 3>>"$case.report-o" >"$case.stdout-o" 2>"$case.stderr-o" \
16 ./hplayback "/$initstring" $queryargs
17 rc=$?
18 set -e
19
20 if test $rc != 0
21 then
22 egrep . -- "$case.report-o" "$case.stdout-o" "$case.stderr-o"
23 echo >&2 "FAILED $case - EXIT STATUS $rc"
24 exit 2
25 fi
26
27 for part in stdout stderr
28 do
29 if diff -- "$case.$part" "$case.$part-o"
30 then
31 :
32 else
33 echo >&2 "FAILED $case - WRONG OUTPUT"
34 exit 2
35 fi
36 done
37
38 echo -n "$casename "
39
40 exit 0