diff options
author | Jay Berkenbilt <ejb@ql.org> | 2019-11-06 03:29:34 +0100 |
---|---|---|
committer | Jay Berkenbilt <ejb@ql.org> | 2019-11-09 15:53:42 +0100 |
commit | 1639d972ea0b30711b9a762fe4475cdb2b229be1 (patch) | |
tree | abbbaf84565b729e7b535a21692db39235264a09 /libtests/qtest/md5.test | |
parent | 127a957aee7bf7ae242a606d035e9e3d9b300307 (diff) | |
download | qpdf-1639d972ea0b30711b9a762fe4475cdb2b229be1.tar.zst |
Run libtests for crypto with all available providers
If QPDF_CRYPTO_PROVIDER is set, just run the tests for the given
provider. This is to support cases of running the entire test suite
for each provider. If QPDF_CRYPTO_PROVIDER is not set, run the tests
that exercise the cyrpto provider for each available provider.
Diffstat (limited to 'libtests/qtest/md5.test')
-rw-r--r-- | libtests/qtest/md5.test | 32 |
1 files changed, 26 insertions, 6 deletions
diff --git a/libtests/qtest/md5.test b/libtests/qtest/md5.test index 076a37ec..1cf57727 100644 --- a/libtests/qtest/md5.test +++ b/libtests/qtest/md5.test @@ -9,10 +9,30 @@ require TestDriver; my $td = new TestDriver('md5'); -$td->runtest("md5", - {$td->COMMAND => "md5"}, - {$td->FILE => "md5.out", - $td->EXIT_STATUS => 0}, - $td->NORMALIZE_NEWLINES); +my @providers = (); +if (exists $ENV{'QPDF_CRYPTO_PROVIDER'}) +{ + push(@providers, $ENV{'QPDF_CRYPTO_PROVIDER'}); +} +else +{ + open(Q, "qpdf --show-crypto|") or die; + while (<Q>) + { + s/\s+$//s; + push(@providers, $_); + } + close(Q); +} +foreach my $p (@providers) +{ + $ENV{'QPDF_CRYPTO_PROVIDER'} = $p; -$td->report(1); + $td->runtest("md5 ($p)", + {$td->COMMAND => "md5"}, + {$td->FILE => "md5.out", + $td->EXIT_STATUS => 0}, + $td->NORMALIZE_NEWLINES); +} + +$td->report(scalar(@providers)); |