2
1
mirror of https://github.com/qpdf/qpdf.git synced 2024-05-28 16:00:53 +00:00

Fix tests with deterministic IDs

This commit is contained in:
Jay Berkenbilt 2023-12-20 07:44:19 -05:00
parent 647b9831dc
commit 321f9e79db
5 changed files with 17 additions and 16 deletions

View File

@ -194,8 +194,8 @@ $td->runtest("xref loop with append",
$td->EXIT_STATUS => 3}, $td->EXIT_STATUS => 3},
$td->NORMALIZE_NEWLINES); $td->NORMALIZE_NEWLINES);
$td->runtest("check output", $td->runtest("check output",
{$td->FILE => "a.pdf"}, {$td->COMMAND => "qpdf-test-compare a.pdf append-xref-loop-fixed.pdf"},
{$td->FILE => "append-xref-loop-fixed.pdf"}); {$td->FILE => "append-xref-loop-fixed.pdf", $td->EXIT_STATUS => 0});
$td->runtest("endobj not at newline", $td->runtest("endobj not at newline",
{$td->COMMAND => {$td->COMMAND =>
@ -204,8 +204,8 @@ $td->runtest("endobj not at newline",
$td->EXIT_STATUS => 3}, $td->EXIT_STATUS => 3},
$td->NORMALIZE_NEWLINES); $td->NORMALIZE_NEWLINES);
$td->runtest("check output", $td->runtest("check output",
{$td->FILE => "a.pdf"}, {$td->COMMAND => "qpdf-test-compare a.pdf endobj-at-eol-fixed.pdf"},
{$td->FILE => "endobj-at-eol-fixed.pdf"}); {$td->FILE => "endobj-at-eol-fixed.pdf", $td->EXIT_STATUS => 0});
cleanup(); cleanup();
$td->report($n_tests); $td->report($n_tests);

View File

@ -94,8 +94,8 @@ $td->runtest("overlay on page with no resources",
{$td->STRING => "", $td->EXIT_STATUS => 0}, {$td->STRING => "", $td->EXIT_STATUS => 0},
$td->NORMALIZE_NEWLINES); $td->NORMALIZE_NEWLINES);
$td->runtest("check overlay with no resources output", $td->runtest("check overlay with no resources output",
{$td->FILE => "a.pdf"}, {$td->COMMAND => "qpdf-test-compare a.pdf overlay-no-resources.pdf"},
{$td->FILE => "overlay-no-resources.pdf"}); {$td->FILE => "overlay-no-resources.pdf", $td->EXIT_STATUS => 0});
cleanup(); cleanup();
$td->report($n_tests); $td->report($n_tests);

View File

@ -23,9 +23,8 @@ $td->runtest("create file with many nulls",
{$td->STRING => "", $td->EXIT_STATUS => 0}, {$td->STRING => "", $td->EXIT_STATUS => 0},
$td->NORMALIZE_NEWLINES); $td->NORMALIZE_NEWLINES);
$td->runtest("compare output", $td->runtest("compare output",
{$td->FILE => "a.pdf"}, {$td->COMMAND => "qpdf-test-compare a.pdf many-nulls.pdf"},
{$td->FILE => "many-nulls.pdf"}, {$td->FILE => "many-nulls.pdf", $td->EXIT_STATUS => 0});
$td->NORMALIZE_NEWLINES);
$td->runtest("run check file", $td->runtest("run check file",
{$td->COMMAND => "qpdf --check a.pdf"}, {$td->COMMAND => "qpdf --check a.pdf"},
{$td->FILE => "many-nulls.out", $td->EXIT_STATUS => 0}, {$td->FILE => "many-nulls.out", $td->EXIT_STATUS => 0},

View File

@ -32,10 +32,12 @@ foreach my $d (['auto-ü', 1], ['auto-öπ', 2])
" --object-streams=generate --replace-input ./$u.pdf"}, " --object-streams=generate --replace-input ./$u.pdf"},
{$td->STRING => "", $td->EXIT_STATUS => 0}, {$td->STRING => "", $td->EXIT_STATUS => 0},
$td->NORMALIZE_NEWLINES); $td->NORMALIZE_NEWLINES);
# qpdf handles Unicode filenames on Windows, but qpdf-test-compare
# doesn't.
rename("$u.pdf", "u.pdf") or die;
$td->runtest("check output ($u)", $td->runtest("check output ($u)",
{$td->FILE => "$u.pdf"}, {$td->COMMAND => "qpdf-test-compare u.pdf replace-input.pdf"},
{$td->FILE => "replace-input.pdf"}, {$td->FILE => "replace-input.pdf", $td->EXIT_STATUS => 0});
$td->NORMALIZE_NEWLINES);
} }
system("cp xref-with-short-size.pdf auto-warn.pdf") == 0 or die; system("cp xref-with-short-size.pdf auto-warn.pdf") == 0 or die;
@ -46,8 +48,8 @@ $td->runtest("replace input with warnings",
$td->NORMALIZE_NEWLINES); $td->NORMALIZE_NEWLINES);
$td->runtest("check output", $td->runtest("check output",
{$td->FILE => "auto-warn.pdf"}, {$td->COMMAND => "qpdf-test-compare auto-warn.pdf warn-replace.pdf"},
{$td->FILE => "warn-replace.pdf"}); {$td->FILE => "warn-replace.pdf", $td->EXIT_STATUS => 0});
$td->runtest("check orig output", $td->runtest("check orig output",
{$td->FILE => "auto-warn.pdf.~qpdf-orig"}, {$td->FILE => "auto-warn.pdf.~qpdf-orig"},
{$td->FILE => "xref-with-short-size.pdf"}); {$td->FILE => "xref-with-short-size.pdf"});

View File

@ -27,8 +27,8 @@ $td->runtest("ensure object-types-os is up-to-date",
" object-types.pdf a.pdf"}, " object-types.pdf a.pdf"},
{$td->STRING => "", $td->EXIT_STATUS => 0}); {$td->STRING => "", $td->EXIT_STATUS => 0});
$td->runtest("check file", $td->runtest("check file",
{$td->FILE => "a.pdf"}, {$td->COMMAND => "qpdf-test-compare a.pdf object-types-os.pdf"},
{$td->FILE => "object-types-os.pdf"}); {$td->FILE => "object-types-os.pdf", $td->EXIT_STATUS => 0});
$td->runtest("type checks", $td->runtest("type checks",
{$td->COMMAND => "test_driver 42 object-types.pdf"}, {$td->COMMAND => "test_driver 42 object-types.pdf"},
{$td->FILE => "object-types.out", {$td->FILE => "object-types.out",