From: Thomas Rast Date: Mon, 12 Dec 2011 18:09:15 GMT Subject: [PATCH 3/3] t/lib-terminal: test test-terminal's sanity Message-ID: <44602402ecfd0e49c202f03e87540934aa23bce0.1323713230.git.trast@student.ethz.ch> In-Reply-To: The previous two commits show that getting test-terminal.perl right is not trivial. Let lib-terminal.sh run a simple test that ensures it actually opens TTYs for std{in,out,err} and that it does not let stdin pass through. Signed-off-by: Thomas Rast --- t/lib-terminal.sh | 19 +++++++++++++++++++ 1 files changed, 19 insertions(+), 0 deletions(-) diff --git a/t/lib-terminal.sh b/t/lib-terminal.sh index 58d911d..9e4ff9c 100644 --- a/t/lib-terminal.sh +++ b/t/lib-terminal.sh @@ -33,3 +33,22 @@ test_expect_success PERL 'set up terminal for tests' ' } fi ' + +cat >expect1 <expect2 + +test_expect_success TTY 'test-terminal.perl is sane' ' + test_terminal perl -e " + use POSIX qw(isatty); + print \"stdin: \", isatty(STDIN), \"\\n\"; + print \"stdout: \", isatty(STDOUT), \"\\n\"; + print \"stderr: \", isatty(STDERR), \"\\n\"; + " >actual1 && + test_cmp expect1 actual1 && + echo foo | test_terminal cat - >actual2 && + test_cmp expect2 actual2 +' -- 1.7.8.431.g2abf2