Add recipes for misc other things we want to test
authorRichard Levitte <levitte@openssl.org>
Sun, 19 Apr 2015 20:26:12 +0000 (22:26 +0200)
committerRichard Levitte <levitte@openssl.org>
Mon, 7 Sep 2015 14:10:57 +0000 (16:10 +0200)
Note that this required a change in constant_time_test.c, as it says
"ok", which interferes with what Test::Harness expects to see.  I had
constant_time_test.c say "success" instead.

Reviewed-by: Rich Salz <rsalz@openssl.org>
test/constant_time_test.c
test/recipes/90-test_constant_time.t [new file with mode: 0644]
test/recipes/90-test_gost2814789.t [new file with mode: 0644]
test/recipes/90-test_heartbeat.t [new file with mode: 0644]
test/recipes/90-test_ige.t [new file with mode: 0644]
test/recipes/90-test_jpake.t [new file with mode: 0644]
test/recipes/90-test_p5_crpt2.t [new file with mode: 0644]
test/recipes/90-test_srp.t [new file with mode: 0644]
test/recipes/90-test_v3name.t [new file with mode: 0644]

index ed3d7eaac4d88a59d64c618f7c242621ca9253ad..1c04cb7b6177c96355b458f664293fc8d9132e10 100644 (file)
@@ -295,7 +295,7 @@ int main(int argc, char *argv[])
     }
 
     if (!num_failed) {
-        fprintf(stdout, "ok (ran %d tests)\n", num_all);
+        fprintf(stdout, "success (ran %d tests)\n", num_all);
         return EXIT_SUCCESS;
     } else {
         fprintf(stdout, "%d of %d tests failed!\n", num_failed, num_all);
diff --git a/test/recipes/90-test_constant_time.t b/test/recipes/90-test_constant_time.t
new file mode 100644 (file)
index 0000000..4bdd0a0
--- /dev/null
@@ -0,0 +1,12 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+use OpenSSL::Test;
+
+setup("test_constant_time");
+
+plan tests => 1;
+ok(run(test(["constant_time_test"])), "running constant_time_test");
diff --git a/test/recipes/90-test_gost2814789.t b/test/recipes/90-test_gost2814789.t
new file mode 100644 (file)
index 0000000..b09e062
--- /dev/null
@@ -0,0 +1,14 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+use Test::More;
+use OpenSSL::Test qw/:DEFAULT top_dir/;
+
+setup("test_gost2814789");
+
+$ENV{OPENSSL_ENGINES} =
+    $ENV{BIN_D} ? top_dir($ENV{BIN_D}) : top_dir("engines", "ccgost");
+
+plan tests => 1;
+ok(run(test(["gost2814789test"])), 'running gost2814789test');
diff --git a/test/recipes/90-test_heartbeat.t b/test/recipes/90-test_heartbeat.t
new file mode 100644 (file)
index 0000000..5e22670
--- /dev/null
@@ -0,0 +1,12 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+use OpenSSL::Test;
+
+setup("test_heartbeat");
+
+plan tests => 1;
+ok(run(test(["heartbeat_test"])), "running heartbeat_test");
diff --git a/test/recipes/90-test_ige.t b/test/recipes/90-test_ige.t
new file mode 100644 (file)
index 0000000..6c99147
--- /dev/null
@@ -0,0 +1,12 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+use OpenSSL::Test;
+
+setup("test_ige");
+
+plan tests => 1;
+ok(run(test(["igetest"])), "running igetest");
diff --git a/test/recipes/90-test_jpake.t b/test/recipes/90-test_jpake.t
new file mode 100644 (file)
index 0000000..5b83df7
--- /dev/null
@@ -0,0 +1,12 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+use OpenSSL::Test;
+
+setup("test_jpake");
+
+plan tests => 1;
+ok(run(test(["jpaketest"])), "running jpaketest");
diff --git a/test/recipes/90-test_p5_crpt2.t b/test/recipes/90-test_p5_crpt2.t
new file mode 100644 (file)
index 0000000..e03c5b6
--- /dev/null
@@ -0,0 +1,12 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+use OpenSSL::Test;
+
+setup("test_p5_crpt2");
+
+plan tests => 1;
+ok(run(test(["p5_crpt2_test"])), "running p5_crpt2_test");
diff --git a/test/recipes/90-test_srp.t b/test/recipes/90-test_srp.t
new file mode 100644 (file)
index 0000000..9624020
--- /dev/null
@@ -0,0 +1,12 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+use OpenSSL::Test;
+
+setup("test_srp");
+
+plan tests => 1;
+ok(run(test(["srptest"])), "running srptest");
diff --git a/test/recipes/90-test_v3name.t b/test/recipes/90-test_v3name.t
new file mode 100644 (file)
index 0000000..17ac8b3
--- /dev/null
@@ -0,0 +1,12 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+use OpenSSL::Test;
+
+setup("test_v3name");
+
+plan tests => 1;
+ok(run(test(["v3nametest"])), "running v3nametest");