diff options
author | Richard Levitte <levitte@openssl.org> | 2015-04-19 23:49:30 +0200 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2015-09-07 16:10:58 +0200 |
commit | d11b43fdd30f084c19136359d0e3e4a06631abf9 (patch) | |
tree | 918474dc0f23ce693eb1f6c8e35655e303069c77 /test/recipes | |
parent | Ignore the log files (diff) | |
download | openssl-d11b43fdd30f084c19136359d0e3e4a06631abf9.tar.xz openssl-d11b43fdd30f084c19136359d0e3e4a06631abf9.zip |
Remove test targets from Makefile, have it use run_tests.pl
Also remove recipes/00-check_testalltests.t, since it will lack the
information from the now gone alltests target.
Reviewed-by: Rich Salz <rsalz@openssl.org>
Diffstat (limited to 'test/recipes')
-rw-r--r-- | test/recipes/00-check_testalltests.t | 63 |
1 files changed, 0 insertions, 63 deletions
diff --git a/test/recipes/00-check_testalltests.t b/test/recipes/00-check_testalltests.t deleted file mode 100644 index 35eb992803..0000000000 --- a/test/recipes/00-check_testalltests.t +++ /dev/null @@ -1,63 +0,0 @@ -#! /usr/bin/perl - -use strict; - -use File::Spec::Functions; -use Test::More; - -use lib 'testlib'; -use OpenSSL::Test; - -setup("check_testalltests"); - -my $Makefile = top_file("test","Makefile"); - -plan tests => 2; -if (ok(open(FH,$Makefile), "test/Makefile exists")) { - subtest 'Finding test scripts for the alltests target' => sub { - find_tests(\*FH); close FH; - }; -} else { - diag("Expected to find $Makefile"); -} - -#------------- -# test script finder -sub find_tests { - my $fh = shift; - my $line; - while(<$fh>) { - chomp; - $line = $_; - last if /^alltests:/; - } - while(<$fh>) { - chomp; - my $l = $_; - $line =~ s/\\\s*$/$l/; - last if $line !~ /\\\s*$/; - } - close $fh; - $line =~ s/^alltests:\s*//; - - # It's part of the test_ssl recipe - $line =~ s/\s+test_ss\s+/ /; - - # It's split into sha1, sha256 and sha512 - $line =~ s/\s+test_sha\s+/ test_sha1 test_sha256 test_sha512 /; - - my %foundfiles = - map { - s/^test_//; - $_ => top_file("test", - "recipes/[0-9][0-9]-test_$_.t"); } split(/\s+/, - $line); - - plan tests => scalar (keys %foundfiles); - - foreach (sort keys %foundfiles) { - my @check = glob($foundfiles{$_}); - ok(scalar @check, "check that a test for $_ exists") - || diag("Expected to find something matching $foundfiles{$_}"); - } -} |