add install root for tests

[zpackage] / t / tap.sh

diff --git a/t/tap.sh b/t/tap.sh
index 553128ffe01e9a55e5e58570acc07699f1dab1ea..00530027795577e8cd9d51c46b297e34461f5b4c 100755 (executable)
--- a/t/tap.sh
+++ b/t/tap.sh
@@ -7,12 +7,40 @@ tryrun() {
        note="$@"
        program=$1
        shift
-       $program "$@"
-       if [ $? -ne 0 ]; then
+       $program "$@" > test.out 2>&1
+       tap_return_value=$?
+       if [ $tap_return_value -ne 0 ]; then
                printf 'not ';
        fi
        tn=$((tn + 1))
        printf 'ok %d - %s %s\n' $tn $program "$*"
+       if [ $tap_return_value -ne 0 ]; then
+               cat test.out | diagstdin
+       fi
+       return $tap_return_value
+}
+
+require() {
+       note="$*"
+       program=$1
+       shift
+       $program "$@" > test.out 2>&1
+       rv=$?
+       tn=$((tn + 1))
+       if [ $rv -ne 0 ]; then
+               printf 'not ok %d - %s %s\n' $tn $program "$*"
+               cat test.out | diagstdin
+               rm test.out
+               bailout "exit status $rv";
+       fi
+       printf 'ok %d - %s %s\n' $tn $program "$*"
+
+}
+
+bailout() {
+       diag "$@"
+       printf "bail out!\n";
+       exit 255;
 }
 
 shownote() {
@@ -21,6 +49,18 @@ shownote() {
        fi
 }
 
+diag() {
+       printf '# %s\n' "$@"
+}
+
+diagfile() {
+       sed -e 's/^/# /' $1
+}
+
+diagstdin() {
+       sed -e 's/^/# /'
+}
+
 okexit() {
        exitwith 0 "$*"
 }
@@ -42,12 +82,13 @@ exitwith() {
        note=
        if [ $rv -ne $1 ]; then
                printf 'not ';
-               note=$(printf '# got "%d" expected "%d"' "$1" "$2")
+               note=$(printf 'got "%d" expected "%d"' "$rv" "$1")
        fi
        shift
        tn=$((tn + 1))
        printf 'ok %d - %s\n' $tn "$*"
        shownote
+       return $rv
 }
 
 okstreq() {
@@ -73,3 +114,13 @@ finish() {
                printf '1..%d\n' $tn
        fi
 }
+
+skip() {
+       tap_skipping=$1
+       shift
+       while [ $tap_skipping -gt 0 ]; do
+               tn=$((tn + 1))
+               tap_skipping=$((tap_skipping - 1))
+               printf 'ok %d - skip %s\n' $tn "$*"
+       done
+}