From 647b9831dc5cb2f2bfe775a8802416cdd51ed59d Mon Sep 17 00:00:00 2001 From: Jay Berkenbilt Date: Wed, 20 Dec 2023 07:17:06 -0500 Subject: Have qpdf-test-compare handle certain /ID differences Rationale is in comments in the code. Deterministic ID tests explicitly do not use this tool. --- compare-for-test/qtest/compare.test | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'compare-for-test/qtest/compare.test') diff --git a/compare-for-test/qtest/compare.test b/compare-for-test/qtest/compare.test index 48625cf3..bcf6b788 100644 --- a/compare-for-test/qtest/compare.test +++ b/compare-for-test/qtest/compare.test @@ -52,6 +52,7 @@ my @diff = ( ["diff-data-unc.pdf", "5,0: stream data differs"], ["diff-stream-dict.pdf", "4,0: stream dictionaries differ"], ["diff-object-type.pdf", "6,0: different types"], + ["diff-id.pdf", "trailer: object contents differ"], ); $n_tests += 2 * scalar(@diff); @@ -90,4 +91,12 @@ $td->runtest("compare object stream files (same)", {$td->COMMAND => "env QPDF_COMPARE_WHY=1 qpdf-test-compare ostream1.pdf ostream2.pdf"}, {$td->FILE => "ostream2.pdf", $td->EXIT_STATUS => 0}); +$n_tests += 2; +$td->runtest("files identical except /ID[1]", + {$td->COMMAND => "env QPDF_COMPARE_WHY=1 qpdf-test-compare zlib.pdf zlib-new-id.pdf"}, + {$td->FILE => "zlib-new-id.pdf", $td->EXIT_STATUS => 0}); +$td->runtest("/ID[0] = /ID[1]", + {$td->COMMAND => "env QPDF_COMPARE_WHY=1 qpdf-test-compare zlib-new-id1.pdf zlib-new-id2.pdf"}, + {$td->FILE => "zlib-new-id2.pdf", $td->EXIT_STATUS => 0}); + $td->report($n_tests); -- cgit v1.2.3-54-g00ecf