Change OpenSSL::Test to be an extension of Test::More

It became tedious as well as error prone to have all recipes use
Test::More as well as OpenSSL::Test.  The easier way is to make
OpenSSL::Test an extension of Test::More, thereby having all version
checks as well as future checks firmly there.  Additionally, that
allows us to extend existing Test::More functions if the need would
arise.

Reviewed-by: Rich Salz <rsalz@openssl.org>
This commit is contained in:
Richard Levitte 2015-04-30 08:51:24 +02:00
parent caadc54381
commit fd99c6b599
25 changed files with 6 additions and 29 deletions

View File

@ -3,8 +3,6 @@
use strict;
use File::Spec::Functions;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("check_testexes");
@ -51,7 +49,7 @@ my $MINFO = top_file("MINFO");
plan tests => $numtests;
skip "because $MINFO found. If you want this test to run, please do 'perl util/mkfiles.pl > $MINFO'", 1
skip "because $MINFO not found. If you want this test to run, please do 'perl util/mkfiles.pl > $MINFO'", 1
unless %foundfiles;
foreach (sort keys %foundfiles) {

View File

@ -5,7 +5,6 @@ use warnings;
use Math::BigInt;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_bn");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_dsa");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_ec");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_rsa");

View File

@ -7,7 +7,6 @@ use File::Spec::Functions qw/catfile/;
use File::Copy;
use File::Compare qw/compare_text/;
use File::Basename;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_enc");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_crl");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_gen");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_pkcs7");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_req");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_sid");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec::Functions qw/canonpath/;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_dir top_file/;
setup("test_verify");

View File

@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_x509");

View File

@ -3,7 +3,6 @@
use strict;
use warnings;
use Test::More 0.96;
use OpenSSL::Test;
setup("test_engine");

View File

@ -3,7 +3,6 @@
use strict;
use warnings;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_evp");

View File

@ -3,7 +3,6 @@
use strict;
use warnings;
use Test::More 0.96;
use OpenSSL::Test;
setup("test_evp_extra");

View File

@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec::Functions qw/splitdir curdir catfile devnull/;
use File::Path 2.00 qw/remove_tree/;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT cmdstr top_file quotify/;
setup("test_ca");

View File

@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec::Functions qw/catfile/;
use File::Compare qw/compare_text/;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_dir top_file/;
setup("test_cms");

View File

@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec::Functions qw/devnull catfile/;
use File::Copy;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT with pipe top_dir/;
setup("test_ocsp");

View File

@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec;
use File::Copy;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT with top_file/;
setup("test_ssl");

View File

@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec::Functions qw/splitdir curdir catfile/;
use File::Compare;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT cmdstr top_file/;
setup("test_tsa");

View File

@ -2,7 +2,6 @@
use strict;
use warnings;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_dir/;
setup("test_gost2814789");

View File

@ -5,7 +5,6 @@ use warnings;
use File::Compare qw/compare_text/;
use File::Copy;
use Test::More 0.96;
use lib 'testlib';
use OpenSSL::Test qw/:DEFAULT top_file/;

View File

@ -3,12 +3,15 @@ package OpenSSL::Test;
use strict;
use warnings;
use Test::More 0.96;
use Exporter;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
$VERSION = "0.5";
@ISA = qw(Exporter);
@EXPORT = qw(setup indir app test run);
@EXPORT_OK = qw(top_dir top_file pipe with cmdstr quotify));
@EXPORT = (@Test::More::EXPORT, qw(setup indir app test run));
@EXPORT_OK = (@Test::More::EXPORT_OK, qw(top_dir top_file pipe with cmdstr
quotify));
use File::Copy;
@ -16,7 +19,6 @@ use File::Spec::Functions qw/file_name_is_absolute curdir canonpath splitdir
catdir catfile splitpath catpath devnull abs2rel
rel2abs/;
use File::Path 2.00 qw/remove_tree mkpath/;
use Test::More 0.96;
my $test_name = undef;

View File

@ -10,7 +10,6 @@ $VERSION = "0.1";
@EXPORT = qw(simple_test);
use Test::More 0.96;
use OpenSSL::Test;
# args: