From 0340edcf6770c40a251be7e7ffb0f02d020ecd45 Mon Sep 17 00:00:00 2001
From: Richard Levitte <levitte@openssl.org>
Date: Sat, 13 Feb 2016 11:49:56 +0100
Subject: [PATCH] Remove 00-test_checkexes.t, as it has lost its relevance

In the early stages of creating the new test framework,
00-test_checkexes was a temporary check to ensure we had a recipe for
every test program in test/.  By now, this test has fulfilled its
purpose, and we've learned how to make recipes properly.  It's time
for this check to go away.

Reviewed-by: Rich Salz <rsalz@openssl.org>
---
 test/recipes/00-check_testexes.t | 59 --------------------------------
 1 file changed, 59 deletions(-)
 delete mode 100644 test/recipes/00-check_testexes.t

diff --git a/test/recipes/00-check_testexes.t b/test/recipes/00-check_testexes.t
deleted file mode 100644
index 9da85f26af..0000000000
--- a/test/recipes/00-check_testexes.t
+++ /dev/null
@@ -1,59 +0,0 @@
-#! /usr/bin/perl
-
-use strict;
-
-use File::Spec::Functions;
-use File::Basename;
-use OpenSSL::Test qw/:DEFAULT bldtop_file/;
-
-setup("check_testexes");
-
-my $OpenSSL_ver = "";
-my $Makefile = bldtop_file("Makefile");
-if (open(FH, $Makefile)) {
-    $OpenSSL_ver =
-	(map { s/\R//; s/^VERSION=([^\s]*)\s*$//; $1 } grep { /^VERSION=/ } <FH>)[0];
-    close FH;
-}
-
-my $MINFO = bldtop_file("MINFO");
-
-plan skip_all => "because MINFO not found. If you want this test to run, please do 'perl util/mkfiles.pl > MINFO'"
-    unless open(FH,$MINFO);
-
-my $MINFO_ver = "";
-
-while(<FH>) {
-    s/\R//;	# chomp;
-    if (/^VERSION=([^\s]*)\s*$/) {
-	$MINFO_ver = $1;
-    }
-    last if /^RELATIVE_DIRECTORY=test$/;
-}
-while(<FH>) {
-    s/\R//;	# chomp;
-    last if /^EXE=/;
-}
-close FH;
-
-plan skip_all => "because MINFO is not from this OpenSSL version. If you want this test to run, please do 'perl util/mkfiles.pl > MINFO'"
-    unless $OpenSSL_ver eq $MINFO_ver;
-
-s/^EXE=\s*//;
-s/\s*$//;
-my @expected_tests =
-    map { s/\..*$//;		# Remove extension
-	  s/_?test$//;		# Remove 'test', possibly prefixed with '_'
-	  s/(sha\d+)t/$1/;	# sha comes with no t at the end
-	  $_; } split(/\s+/, $_);
-
-plan tests => scalar @expected_tests;
-
-my @found_tests =
-    map { basename($_) } glob(bldtop_file("test", "recipes", "*.t"));
-
-foreach my $test (sort @expected_tests) {
-    ok(scalar(grep(/^[0-9][0-9]-test_$test\.t$/, @found_tests)),
-       "check that a test for $test exists")
-	|| diag("Expected to find something matching '[0-9][0-9]-test_$test.t'");
-}