X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/b6ed915cccf834d6e3b3ef9f4939706de7281add..2b60a54adb3b0bf5a9b927708085492b816a6015:/test/install-mh/test-version-check

diff --git a/test/install-mh/test-version-check b/test/install-mh/test-version-check
index a336f5d6..2db8565b 100755
--- a/test/install-mh/test-version-check
+++ b/test/install-mh/test-version-check
@@ -17,91 +17,106 @@ fi
 
 setup_test
 
-# ???? debug
-test -t 0  &&  echo stdin connected  ||  echo stdin not connected
-test -t 1  &&  echo stdout connected  ||  echo stdout not connected
-test -t 2  &&  echo stderr connected  ||  echo stderr not connected
-# ???? debug
-
-require_prog script
-#### Use minimal arguments to script(1), i.e., just the file in
-#### which to save the output.  We do pipe input to script, which is
-#### discouraged by the NOTES and BUGS sections of its man page.
-#### But that seems to work.
-
-actual="$MH_TEST_DIR/test-version-check$$.actual"
+actual="${MH_TEST_DIR}/test-version-check$$.actual"
 context="${MH_TEST_DIR}"/Mail/context
 version="Version: nmh-${MH_VERSION}"
+cmd="${MH_TEST_DIR}/Mail/cmd"
+runpty="${MH_OBJ_DIR}/test/runpty"
+
+#### Run a command but don't wait for user input.  We switched from script(1)
+#### to our own utility, runpty.  Check that it makes the command look like
+#### it's connected to a terminal below.
+run_without_input() {
+    #### Create a command to use as a shell for script.
+    cat >"${cmd}" <<EOF
+#! /bin/sh
+$*
+EOF
+    chmod +x "${cmd}"
+
+    "$runpty" "${actual}" "${cmd}"
+}
+
+#### Ensure that runpty makes the program look like it's connected to a
+#### terminal.  The welcome message code in sbr/utils.c needs that.
+run_without_input 'if test -t 0  -a  -t 1  -a  -t 2; then echo tty; fi'
+grep tty "${actual}" >/dev/null || test_skip "runpty doesn't simulate tty"
+
 
 # Removing Version will trigger the welcome message.  (setup_test
 # inserted it so that other tests wouldn't show it.)
-grep -v Version "$context" > "$context.NEW"
-mv -f "$context.NEW" "$context"
+grep -v Version "${context}" > "${context}.NEW"
+mv -f "${context}.NEW" "${context}"
 
 
 start_test 'mhparam skips the welcome message'
-printf 'mhparam path\nexit\n' | script "$actual" >/dev/null
-grep 'Welcome to nmh version ' "$actual" >/dev/null  &&  false
+run_without_input mhparam path
+grep 'Welcome to nmh version ' "${actual}" >/dev/null  &&  false
 # Make sure that version wasn't added to context.
 grep "^${version}$" "${MH_TEST_DIR}/Mail/context" >/dev/null  &&  false
-rm "$actual"
+rm "${actual}"
 
 
 start_test 'Welcome: disable in profile skips the welcome message'
 cp "${MH}" "${MH}-welcome"
 printf 'Welcome: disable\n' >> "${MH}-welcome"
-(printf 'pick last\nexit\n' | MH="${MH}-welcome" script "$actual" >/dev/null)
-grep 'Welcome to nmh version ' "$actual" >/dev/null  &&  false
+# Run the function in subshell instead of augmenting the environment
+# for a single command, so that the environment does not retain the
+# MH setting.  That can happen when run under distcheck, depending
+# on the user's shell.
+(MH="${MH}-welcome"; run_without_input pick last)
+rm "${MH}-welcome"
+grep 'Welcome to nmh version ' "${actual}" >/dev/null  &&  false
 # Make sure that version wasn't added to context.
 grep "^${version}$" "${MH_TEST_DIR}/Mail/context" >/dev/null  &&  false
-rm "$actual"
+rm "${actual}"
 
 
 start_test 'with welcome message'
-printf 'pick last\nexit\n' | script "$actual" >/dev/null
-grep 'Welcome to nmh version ' "$actual" >/dev/null
+run_without_input pick last
+grep 'Welcome to nmh version ' "${actual}" >/dev/null
 # Make sure that version was added to context.
 grep "^${version}$" "${MH_TEST_DIR}/Mail/context" >/dev/null
-rm "$actual"
+rm "${actual}"
 
 
 start_test 'without welcome message'
 # After running the previous test, this one should not have
 # the welcome message.
-printf 'pick last\nexit\n' | script "$actual" >/dev/null
-grep 'Welcome to nmh version ' "$actual" >/dev/null  &&  false
+run_without_input pick last
+grep 'Welcome to nmh version ' "${actual}" >/dev/null  &&  false
 # Make sure that version is still in context.
 grep "^${version}$" "${MH_TEST_DIR}/Mail/context" >/dev/null
-rm "$actual"
+rm "${actual}"
 
 
 start_test 'with MHCONTEXT, welcome only if older'
 MHCONTEXT="${MH_TEST_DIR}/Mail/context2"; export MHCONTEXT
 printf 'Version: nmh-1.5\n' >"${MHCONTEXT}"
-printf 'pick last\nexit\n' | script "$actual" >/dev/null
-grep 'Welcome to nmh version ' "$actual" >/dev/null
+run_without_input pick last
+grep 'Welcome to nmh version ' "${actual}" >/dev/null
 # And make sure that version did get updated in context.
 grep "^${version}$" "${MHCONTEXT}" >/dev/null
-rm "$actual"
+rm "${actual}"
 
 
 start_test "with MHCONTEXT doesn't welcome if newer"
 printf 'Version: nmh-10000.0\n' >"${MHCONTEXT}"
-printf 'pick last\nexit\n' | script "$actual" >/dev/null
-grep 'Welcome to nmh version ' "$actual" >/dev/null  &&  false
+run_without_input pick last
+grep 'Welcome to nmh version ' "${actual}" >/dev/null  &&  false
 # And make sure that version didn't get updated in context.
 grep '^Version: nmh-10000.0$' "${MHCONTEXT}" >/dev/null
-rm "$actual"
+rm "${actual}"
 
 
 start_test 'with MHCONTEXT but no version, no welcome and update'
 printf '' >"${MHCONTEXT}"
-printf 'pick last\nexit\n' | script "$actual" >/dev/null
-grep 'Welcome to nmh version ' "$actual" >/dev/null  &&  false
+run_without_input pick last
+grep 'Welcome to nmh version ' "${actual}" >/dev/null  &&  false
 # And make sure that version did get updated in context.
 grep "^${version}$" "${MHCONTEXT}" >/dev/null
-rm "$actual"
+rm "${actual}"
 
 
 finish_test
-exit $failed
+exit ${failed}