Initial testing stuff; want to rearrange.

[adns] / regress / m1test

diff --git a/regress/m1test b/regress/m1test
new file mode 100755 (executable)
index 0000000..361e5b1
--- /dev/null
+++ b/regress/m1test
@@ -0,0 +1,16 @@
+#!/bin/sh
+# usage: m1test <name> <initfile> <queryargs>
+
+set -e
+tcn="$1"
+initfile="$2"
+queryargs="$*"
+test -d ../testcases || cd testcases
+
+initstring="`cat $initfile.init`"
+
+exec >$tcn.log
+echo "$initfile"
+echo "$queryargs"
+
+H../hrecord "/$initstring" $queryargs