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));