[thirdparty/openssl.git] / test / recipes / 25-test_pkcs7.t

#! /usr/bin/perl

use strict;
use warnings;

use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;

setup("test_pkcs7");

plan tests => 3;

require_ok(top_file('test','recipes','tconversion.pl'));

subtest 'pkcs7 conversions -- pkcs7' => sub {
    tconversion("p7", top_file("test", "testp7.pem"), "pkcs7");
};
subtest 'pkcs7 conversions -- pkcs7d' => sub {
    tconversion("p7d", top_file("test", "pkcs7-1.pem"), "pkcs7");
};
Commit	Line	Data
4650de3e RL	1	#! /usr/bin/perl
	2
	3	use strict;
	4	use warnings;
	5
	6	use File::Spec;
fb921436	7	use Test::More 0.96;
4650de3e RL	8	use OpenSSL::Test qw/:DEFAULT top_file/;
	9
	10	setup("test_pkcs7");
	11
	12	plan tests => 3;
	13
	14	require_ok(top_file('test','recipes','tconversion.pl'));
	15
	16	subtest 'pkcs7 conversions -- pkcs7' => sub {
	17	tconversion("p7", top_file("test", "testp7.pem"), "pkcs7");
	18	};
	19	subtest 'pkcs7 conversions -- pkcs7d' => sub {
	20	tconversion("p7d", top_file("test", "pkcs7-1.pem"), "pkcs7");
	21	};