From: Richard Levitte Date: Fri, 14 Feb 2020 07:37:32 +0000 (+0100) Subject: TEST: Modify test/recipes/80-test_ocsp.t to leave artifacts behind X-Git-Tag: openssl-3.0.0-alpha1~435 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=acf3360cadd959819307192d66269ab648d48a98;p=thirdparty%2Fopenssl.git TEST: Modify test/recipes/80-test_ocsp.t to leave artifacts behind Reviewed-by: Paul Dale (Merged from https://github.com/openssl/openssl/pull/11080) --- diff --git a/test/recipes/80-test_ocsp.t b/test/recipes/80-test_ocsp.t index 5ca069801bc..74ef7e36624 100644 --- a/test/recipes/80-test_ocsp.t +++ b/test/recipes/80-test_ocsp.t @@ -12,6 +12,7 @@ use warnings; use POSIX; use File::Spec::Functions qw/devnull catfile/; +use File::Basename; use File::Copy; use OpenSSL::Test qw/:DEFAULT with pipe srctop_dir data_file/; use OpenSSL::Test::Utils; @@ -34,18 +35,18 @@ sub test_ocsp { $untrusted = $CAfile; } my $expected_exit = shift; + my $outputfile = basename($inputfile, '.ors') . '.dat'; run(app(["openssl", "base64", "-d", "-in", catfile($ocspdir,$inputfile), - "-out", "ocsp-resp-fff.dat"])); + "-out", $outputfile])); with({ exit_checker => sub { return shift == $expected_exit; } }, - sub { ok(run(app(["openssl", "ocsp", "-respin", "ocsp-resp-fff.dat", + sub { ok(run(app(["openssl", "ocsp", "-respin", $outputfile, "-partial_chain", @check_time, "-CAfile", catfile($ocspdir, $CAfile), "-verify_other", catfile($ocspdir, $untrusted), "-no-CApath"])), $title); }); - unlink "ocsp-resp-fff.dat"; } plan tests => 11;