Add some test coverage for PEM_read_bio_PrivateKey

Reviewed-by: Rich Salz <rsalz@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/4047)
This commit is contained in:
Bernd Edlinger 2017-07-29 12:23:00 +02:00
parent 02fd47c8b0
commit 0443b1171d

View File

@ -74,7 +74,7 @@ my $n = (3 * scalar @noexist_files)
+ (4 * scalar @generated_files)
+ (scalar keys %generated_file_files)
+ (scalar @noexist_file_files)
+ 3;
+ 4;
plan tests => $n;
@ -83,6 +83,10 @@ indir "store_$$" => sub {
{
skip "failed initialisation", $n unless init();
# test PEM_read_bio_PrivateKey
ok(run(app(["openssl", "rsa", "-in", "rsa-key-pkcs8-pbes2-sha256.pem",
"-passin", "pass:password"])));
foreach (@noexist_files) {
my $file = srctop_file($_);
ok(!run(app(["openssl", "storeutl", $file])));