test/recipes/15-test_ec.t

   1 #! /usr/bin/perl
   2
   3 use strict;
   4 use warnings;
   5
   6 use File::Spec;
   7 use OpenSSL::Test qw/:DEFAULT top_file/;
   8 use OpenSSL::Test::Utils;
   9
  10 setup("test_ec");
  11
  12 plan tests => 5;
  13
  14 require_ok(top_file('test','recipes','tconversion.pl'));
  15
  16 ok(run(test(["ectest"])), "running ectest");
  17
  18  SKIP: {
  19      skip "Skipping ec conversion test", 3
  20          if disabled("ec");
  21
  22      subtest 'ec conversions -- private key' => sub {
  23          tconversion("ec", top_file("test","testec-p256.pem"));
  24      };
  25      subtest 'ec conversions -- private key PKCS#8' => sub {
  26          tconversion("ec", top_file("test","testec-p256.pem"), "pkey");
  27      };
  28      subtest 'ec conversions -- public key' => sub {
  29          tconversion("ec", top_file("test","testecpub-p256.pem"), "ec", "-pubin", "-pubout");
  30      };
  31 }