test/vis: convert vis specific tests to use the Lua API

Instead of using the keys utility to convert the textual key representation
into something a terminal would send and then pipe it to vis' standard input
use the Lua API to directly feed the keys into vis' input queue.

This has a number of advantages:

 - it is less fragile: the keys utility is incomplete and only handles the
   most common keys

 - it is faster because there is no need to artificially delay input
   after an <Escape> key to give vis a chance to distinguish between
   a single <Escape> and the start of an escape sequence

1 files changed, 24 insertions, 18 deletions

diff --git a/vis/test.sh b/vis/test.sh
index a52fe0f..775890c 100755
--- a/vis/test.sh
+++ b/vis/test.sh
@@ -1,31 +1,37 @@
 #!/bin/sh
 
 [ -z "$VIS" ] && VIS="../../vis"
+$VIS -v
 
-TESTS=$1
-[ -z "$TESTS" ] && TESTS=$(find . -name '*.keys' | sed 's/\.keys$//g')
-
-TESTS_RUN=0
 TESTS_OK=0
+TESTS_RUN=0
 
-$VIS -v
+if [ $# -gt 0 ]; then
+	test_files=$*
+else
+	printf ':help\n:/ Lua paths/,$ w help\n:qall\n' | $VIS 2> /dev/null && cat help && rm -f help
+	test_files="$(find . -type f -name '*.in')"
+fi
+
+export VIS_PATH=.
+
+for t in $test_files; do
+	TESTS_RUN=$((TESTS_RUN + 1))
+	t=${t%.in}
+	t=${t#./}
+	$VIS "$t".in < /dev/null 2> /dev/null
 
-for t in $TESTS; do
-	ERR="$t.err"
-	OUT="$t.out"
-	REF="$t.ref"
-	printf "Running test %s ... " "$t"
-	rm -f "$OUT" "$ERR"
-	{ cat "$t.keys"; printf "<Escape>:wq! $OUT<Enter>"; } | cpp -P | ../util/keys | $VIS "$t.in" 2> /dev/null
-	if [ -e "$OUT" ]; then
-		if cmp -s "$REF" "$OUT"; then
-			printf "OK\n"
-			TESTS_OK=$((TESTS_OK+1))
+	printf "%-50s" "$t"
+	if [ -e "$t".out ]; then
+		if cmp -s "$t".ref "$t".out 2> /dev/null; then
+			printf "PASS\n"
+			TESTS_OK=$((TESTS_OK + 1))
 		else
 			printf "FAIL\n"
-			diff -u "$REF" "$OUT" > "$ERR"
+			diff -u "$t".ref "$t".out > "$t".err
 		fi
-		TESTS_RUN=$((TESTS_RUN+1))
+	else
+		printf "ERROR\n"
 	fi
 done