t/regress: color sequences in dash
[barcat.git] / t / regress.t
index 9cde232c0d2926d98272abc1f4101215bbc9543b..d7961cc79e01e5cd31aa86e37d7a9bd4dd89d60c 100755 (executable)
@@ -10,7 +10,7 @@ colorize=
 test -t 1 && colorize=1
 color () {
        test -n "$colorize" &&
-       printf '\e[%sm' $@
+       printf '\33[%sm' $@
 }
 regenerate=
 diffcmd () {
@@ -26,7 +26,12 @@ do
        esac
 done
 
-for candidate in ${@:-t*.out}
+params="${@:-t*.out}"
+color 0\;36
+echo "1..$(echo $params | wc -w)"
+color 0
+
+for candidate in $params
 do
        test_count=$((test_count+1))
        file="${candidate%.out}"
@@ -35,11 +40,17 @@ do
 
        set -- barcat
        [ -r "$input" ] && set -- "$@" "$input"
-       case "$name" in *\ -*) set -- "$@" -"${name#* -}";; esac
        case "$name" in
+               *\ -*)
+                       args="${name#* -}"
+                       set -- "$@" -"${args% [?|]*}"
+                       ;;
+       esac
+       case "$name" in
+               *' ?' ) set -- sh -c "\$0 \$@ 2>/dev/null" "$@";;
                *' ?'*) set -- sh -c "\$0 \$@ | test \$\? = ${name#* \?}" "$@";;
                *' |'*) set -- sh -c "\$0 \$@ | ${name#* |}" "$@";;
-               *)      set -- "$1" $2 $3
+               *)      eval set -- "$1" $2 $3
        esac
 
        if test -n "$regenerate"
@@ -62,8 +73,15 @@ do
 
        if test 0 != $?
        then
-               fail_count=$((fail_count+1))
-               color 1\;31
+               case "$name" in
+               *' #TODO')
+                       color 33
+                       ;;
+               *)
+                       fail_count=$((fail_count+1))
+                       color 1\;31
+               esac
+
                printf 'not '
        fi
        echo "ok $test_count - $name"
@@ -79,8 +97,6 @@ else
        echo "# failed $fail_count among $test_count test(s)"
        fail_count=1  # exit code
 fi
-
-color 0\;36
-echo "1..$test_count"
 color 0
+
 exit $fail_count