wbrawner/openssl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Convert 90-test_external.t to using "executable" rather than "system"

Browse source 
Use the newly added "executable" function rather than "system". Also filter
the output to add a prefix to every line so that the "ok" doesn't confuse
Test::More

Reviewed-by: Richard Levitte <levitte@openssl.org>
Reviewed-by: Matt Caswell <matt@openssl.org>
This commit is contained in:
Richard Levitte 2016-10-14 15:52:50 +01:00 committed by Matt Caswell
parent ce2596d404
commit d5df08afb4
1 changed files with 16 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
test/recipes/90-test_external.t
View file

@ -9,7 +9,7 @@
use OpenSSL::Test;
use OpenSSL::Test::Utils;
use OpenSSL::Test qw/:DEFAULT srctop_file/;
use OpenSSL::Test qw/:DEFAULT srctop_file cmdstr/;
setup("test_external");
@ -20,9 +20,19 @@ if (!$ENV{BORING_RUNNER_DIR}) {
plan tests => 1;
indir $ENV{BORING_RUNNER_DIR} => sub {
ok(!system("go", "test", "-shim-path",
srctop_file("test", "ossl_shim", "ossl_shim"),
"-shim-config",
srctop_file("test", "ossl_shim", "ossl_config.json"), "-pipe"),
"running external tests");
ok(filter_run(executable(["go", "test", "-shim-path",
srctop_file("test", "ossl_shim", "ossl_shim"),
"-shim-config",
srctop_file("test", "ossl_shim",
"ossl_config.json"),
"-pipe"])),
}, create => 0, cleanup => 0;
sub filter_run {
my $cmd = cmdstr(shift);
open(PIPE, "-|", $cmd);
while(<PIPE>) {
print STDOUT "go test: ", $_;
}
close PIPE;
}