diff options
Diffstat (limited to 'compare-for-test/qtest/compare.test')
-rw-r--r-- | compare-for-test/qtest/compare.test | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/compare-for-test/qtest/compare.test b/compare-for-test/qtest/compare.test index bcf6b788..198cdf6b 100644 --- a/compare-for-test/qtest/compare.test +++ b/compare-for-test/qtest/compare.test @@ -73,7 +73,7 @@ foreach my $f (@diff) } # Repeat for encrypted files. -$n_tests += 3; +$n_tests += 5; $td->runtest("byte-wise compare encrypted files", {$td->COMMAND => "cmp enc1.pdf enc2.pdf"}, {$td->REGEXP => ".*", $td->EXIT_STATUS => "!0"}); @@ -84,6 +84,13 @@ $td->runtest("compare encrypted files (different)", {$td->COMMAND => "env QPDF_COMPARE_WHY=1 qpdf-test-compare enc1.pdf diff-data-enc.pdf"}, {$td->STRING => "4,0: stream data differs\n", $td->EXIT_STATUS => 2}, $td->NORMALIZE_NEWLINES); +$td->runtest("with password (same)", + {$td->COMMAND => "env QPDF_COMPARE_WHY=1 qpdf-test-compare enc1.pdf enc2.pdf o"}, + {$td->FILE => "enc2.pdf", $td->EXIT_STATUS => 0}); +$td->runtest("with password (different)", + {$td->COMMAND => "env QPDF_COMPARE_WHY=1 qpdf-test-compare enc1.pdf diff-data-enc.pdf o"}, + {$td->STRING => "4,0: stream data differs\n", $td->EXIT_STATUS => 2}, + $td->NORMALIZE_NEWLINES); # Object streams $n_tests += 1; |