X-Git-Url: http://git.tuebingen.mpg.de/?a=blobdiff_plain;f=t%2Ft0005-man.sh;fp=t%2Ft0005-man.sh;h=7a627aad34784eab0a9fd15de5ff2883b48235fd;hb=0a4967c495ac46a5b7d7440e5e5a6df43d5a8f04;hp=0000000000000000000000000000000000000000;hpb=ccd2581a1d421d05be9d621c9d85eff90d390d20;p=paraslash.git

diff --git a/t/t0005-man.sh b/t/t0005-man.sh
new file mode 100755
index 00000000..7a627aad
--- /dev/null
+++ b/t/t0005-man.sh
@@ -0,0 +1,64 @@
+#!/usr/bin/env bash
+
+test_description='Parse generated man pages.
+
+Simple sanity checks of some man pages.
+
+* para_audiod: Check that list of audiod commands is present
+* para_server: Check that list of server/afs commands is present
+* para_play: Check that list of play commands is present
+
+* para_{recv,filter,write,audiod}: Check for presence of
+filter/receiver/writer options as appropriate '
+
+. ${0%/*}/test-lib.sh
+
+rfw_regex='Options for .\{100,\}Options for ' # recv/filter/writer
+
+grep_man()
+{
+	local regex="$1" exe="$2"
+	tr '\n' ' ' < "$o_man_dir/para_$exe.1" | grep -q "$regex"
+}
+
+# check that options of all reveivers/filters/writers are contained
+# in the man pages
+
+regex="$rfw_regex"
+test_expect_success 'para_recv: receiver options' "grep_man '$regex' recv"
+test_expect_success 'para_filter: filter options' "grep_man '$regex' filter"
+test_expect_success 'para_write: writer options' "grep_man '$regex' write"
+test_require_objects "audiod"
+if [[ -n "$result" ]]; then
+	test_skip 'para_audiod' "missing object(s): $result"
+else
+	test_expect_success 'para_audiod: recv/filter/writer options' \
+		"grep_man '$regex' audiod"
+fi
+
+# check various command lists
+
+test_require_objects "audiod"
+if [[ -n "$result" ]]; then
+	test_skip 'para_audiod' "missing object(s): $result"
+else
+	regex='LIST OF AUDIOD COMMANDS.\{200,\}'
+	test_expect_success 'para_audiod: command list' \
+		"grep_man '$regex' audiod"
+fi
+
+test_require_objects "server"
+missing_objects="$result"
+if [[ -n "$missing_objects" ]]; then
+	test_skip "para_server" "missing object(s): $missing_objects"
+else
+	regex='LIST OF SERVER COMMANDS.\{100,\}LIST OF AFS COMMANDS'
+	test_expect_success 'para_server: server/afs commands' \
+		"grep_man '$regex' server"
+fi
+
+# para_play is always built
+regex='LIST OF COMMANDS.\{100,\}'
+test_expect_success 'para_play: play commands' "grep_man '$regex' play"
+regex="$rfw_regex"
+test_done