2
1
mirror of https://github.com/qpdf/qpdf.git synced 2024-12-23 11:28:56 +00:00

Split qpdf-ctest test 24 into multiple tests

Thanks for the nudge from m-holger!
This commit is contained in:
Jay Berkenbilt 2021-12-09 15:20:37 -05:00
parent c5708e9180
commit 09f3737202
4 changed files with 262 additions and 57 deletions

View File

@ -500,16 +500,23 @@ static void test24(char const* infile,
char const* outfile, char const* outfile,
char const* outfile2) char const* outfile2)
{ {
/* This test case is designed for minimal.pdf. */ /* This test case is designed for minimal.pdf. Pull objects out of
* minimal.pdf to make sure all our accessors work as expected.
*/
qpdf_read(qpdf, infile, password); qpdf_read(qpdf, infile, password);
qpdf_oh trailer = qpdf_get_trailer(qpdf); qpdf_oh trailer = qpdf_get_trailer(qpdf);
/* The library never returns 0 */ /* The library never returns 0 */
assert(trailer == 1); assert(trailer == 1);
/* Get root two different ways */
qpdf_oh root = qpdf_get_root(qpdf); qpdf_oh root = qpdf_get_root(qpdf);
assert(qpdf_oh_get_generation(qpdf, root) == 0); assert(qpdf_oh_get_generation(qpdf, root) == 0);
qpdf_oh root_from_trailer = qpdf_oh_get_key(qpdf, trailer, "/Root"); qpdf_oh root_from_trailer = qpdf_oh_get_key(qpdf, trailer, "/Root");
assert(qpdf_oh_get_object_id(qpdf, root) == assert(qpdf_oh_get_object_id(qpdf, root) ==
qpdf_oh_get_object_id(qpdf, root_from_trailer)); qpdf_oh_get_object_id(qpdf, root_from_trailer));
/* Go to the first page and look at all the keys */
qpdf_oh pages = qpdf_oh_get_key(qpdf, root, "/Pages"); qpdf_oh pages = qpdf_oh_get_key(qpdf, root, "/Pages");
assert(qpdf_oh_is_dictionary(qpdf, pages)); assert(qpdf_oh_is_dictionary(qpdf, pages));
assert(qpdf_oh_is_initialized(qpdf, pages)); assert(qpdf_oh_is_initialized(qpdf, pages));
@ -522,6 +529,8 @@ static void test24(char const* infile,
{ {
printf("page dictionary key: %s\n", qpdf_oh_dict_next_key(qpdf)); printf("page dictionary key: %s\n", qpdf_oh_dict_next_key(qpdf));
} }
/* Inspect the first page */
qpdf_oh type = qpdf_oh_get_key(qpdf, page1, "/Type"); qpdf_oh type = qpdf_oh_get_key(qpdf, page1, "/Type");
assert(qpdf_oh_is_name(qpdf, type)); assert(qpdf_oh_is_name(qpdf, type));
assert(strcmp(qpdf_oh_get_name(qpdf, type), "/Page") == 0); assert(strcmp(qpdf_oh_get_name(qpdf, type), "/Page") == 0);
@ -531,32 +540,24 @@ static void test24(char const* infile,
assert(! qpdf_oh_is_scalar(qpdf, mediabox)); assert(! qpdf_oh_is_scalar(qpdf, mediabox));
assert(qpdf_oh_is_array(qpdf, mediabox)); assert(qpdf_oh_is_array(qpdf, mediabox));
assert(qpdf_oh_get_array_n_items(qpdf, mediabox) == 4); assert(qpdf_oh_get_array_n_items(qpdf, mediabox) == 4);
qpdf_oh wrapped_mediabox = qpdf_oh_wrap_in_array(qpdf, mediabox);
qpdf_oh cloned_mediabox = qpdf_oh_new_object(qpdf, mediabox);
assert(wrapped_mediabox != mediabox);
assert(cloned_mediabox != mediabox);
assert(qpdf_oh_get_array_n_items(qpdf, wrapped_mediabox) == 4);
for (int i = 0; i < 4; ++i) for (int i = 0; i < 4; ++i)
{ {
qpdf_oh item = qpdf_oh_get_array_item(qpdf, mediabox, i); qpdf_oh item = qpdf_oh_get_array_item(qpdf, mediabox, i);
qpdf_oh item2 = qpdf_oh_get_array_item(qpdf, wrapped_mediabox, i);
qpdf_oh item3 = qpdf_oh_get_array_item(qpdf, cloned_mediabox, i);
assert(qpdf_oh_get_int_value_as_int(qpdf, item) ==
qpdf_oh_get_int_value_as_int(qpdf, item2));
assert(qpdf_oh_get_int_value_as_int(qpdf, item) ==
qpdf_oh_get_int_value_as_int(qpdf, item3));
printf("item %d: %d %.2f\n", printf("item %d: %d %.2f\n",
i, qpdf_oh_get_int_value_as_int(qpdf, item), i, qpdf_oh_get_int_value_as_int(qpdf, item),
qpdf_oh_get_numeric_value(qpdf, item)); qpdf_oh_get_numeric_value(qpdf, item));
qpdf_oh_release(qpdf, item);
} }
/* Exercise different ways of looking at integers */
qpdf_oh i2 = qpdf_oh_get_array_item(qpdf, mediabox, 2); qpdf_oh i2 = qpdf_oh_get_array_item(qpdf, mediabox, 2);
assert(qpdf_oh_get_int_value_as_int(qpdf, i2) == 612); assert(qpdf_oh_get_int_value_as_int(qpdf, i2) == 612);
assert(qpdf_oh_get_int_value(qpdf, i2) == 612ll); assert(qpdf_oh_get_int_value(qpdf, i2) == 612ll);
assert(qpdf_oh_get_uint_value_as_uint(qpdf, i2) == 612u); assert(qpdf_oh_get_uint_value_as_uint(qpdf, i2) == 612u);
assert(qpdf_oh_get_uint_value(qpdf, i2) == 612ull); assert(qpdf_oh_get_uint_value(qpdf, i2) == 612ull);
/* Exercise accessors of other object types */
assert(! qpdf_oh_is_operator(qpdf, i2)); assert(! qpdf_oh_is_operator(qpdf, i2));
assert(! qpdf_oh_is_inline_image(qpdf, i2)); assert(! qpdf_oh_is_inline_image(qpdf, i2));
/* Chain calls. */
qpdf_oh encoding = qpdf_oh_get_key( qpdf_oh encoding = qpdf_oh_get_key(
qpdf, qpdf_oh_get_key( qpdf, qpdf_oh_get_key(
qpdf, qpdf_oh_get_key( qpdf, qpdf_oh_get_key(
@ -566,6 +567,8 @@ static void test24(char const* infile,
"/F1"), "/F1"),
"/Encoding"); "/Encoding");
assert(strcmp(qpdf_oh_get_name(qpdf, encoding), "/WinAnsiEncoding") == 0); assert(strcmp(qpdf_oh_get_name(qpdf, encoding), "/WinAnsiEncoding") == 0);
/* Look at page contents to exercise stream functions */
qpdf_oh contents = qpdf_oh_get_key(qpdf, page1, "/Contents"); qpdf_oh contents = qpdf_oh_get_key(qpdf, page1, "/Contents");
assert(qpdf_oh_is_stream(qpdf, contents)); assert(qpdf_oh_is_stream(qpdf, contents));
qpdf_oh contents_dict = qpdf_oh_get_dict(qpdf, contents); qpdf_oh contents_dict = qpdf_oh_get_dict(qpdf, contents);
@ -580,12 +583,15 @@ static void test24(char const* infile,
assert(qpdf_oh_get_object_id( assert(qpdf_oh_get_object_id(
qpdf, qpdf_oh_get_array_item(qpdf, contents_array, 0)) == qpdf, qpdf_oh_get_array_item(qpdf, contents_array, 0)) ==
qpdf_oh_get_object_id(qpdf, contents)); qpdf_oh_get_object_id(qpdf, contents));
/* Wrap in array for a non-trivial case */
qpdf_oh wrapped_contents_array = qpdf_oh wrapped_contents_array =
qpdf_oh_wrap_in_array(qpdf, contents_array); qpdf_oh_wrap_in_array(qpdf, contents_array);
assert(qpdf_oh_get_array_n_items(qpdf, wrapped_contents_array) == 1); assert(qpdf_oh_get_array_n_items(qpdf, wrapped_contents_array) == 1);
assert(qpdf_oh_get_object_id( assert(qpdf_oh_get_object_id(
qpdf, qpdf_oh_get_array_item(qpdf, wrapped_contents_array, 0)) == qpdf, qpdf_oh_get_array_item(qpdf, wrapped_contents_array, 0)) ==
qpdf_oh_get_object_id(qpdf, contents)); qpdf_oh_get_object_id(qpdf, contents));
/* Exercise functions that work with indirect objects */
qpdf_oh resources = qpdf_oh_get_key(qpdf, page1, "/Resources"); qpdf_oh resources = qpdf_oh_get_key(qpdf, page1, "/Resources");
qpdf_oh procset = qpdf_oh_get_key(qpdf, resources, "/ProcSet"); qpdf_oh procset = qpdf_oh_get_key(qpdf, resources, "/ProcSet");
assert(strcmp(qpdf_oh_unparse(qpdf, procset), assert(strcmp(qpdf_oh_unparse(qpdf, procset),
@ -595,8 +601,44 @@ static void test24(char const* infile,
qpdf_oh_make_direct(qpdf, procset); qpdf_oh_make_direct(qpdf, procset);
assert(strcmp(qpdf_oh_unparse(qpdf, procset), assert(strcmp(qpdf_oh_unparse(qpdf, procset),
"[ /PDF /Text ]") == 0); "[ /PDF /Text ]") == 0);
/* The replaced /ProcSet can be seen to be a direct object in the
* expected output PDF.
*/
qpdf_oh_replace_key(qpdf, resources, "/ProcSet", procset); qpdf_oh_replace_key(qpdf, resources, "/ProcSet", procset);
/* Release and access to exercise warnings and to show that write
* still works after releasing.
*/
qpdf_oh_release(qpdf, page1);
contents = qpdf_oh_get_key(qpdf, page1, "/Contents");
assert(qpdf_oh_is_null(qpdf, contents));
assert(qpdf_oh_is_array(qpdf, mediabox));
qpdf_oh_release_all(qpdf);
assert(! qpdf_oh_is_null(qpdf, mediabox));
assert(! qpdf_oh_is_array(qpdf, mediabox));
/* Make sure something is assigned when we exit so we check that
* it gets properly freed.
*/
qpdf_get_root(qpdf);
qpdf_init_write(qpdf, outfile);
qpdf_set_static_ID(qpdf, QPDF_TRUE);
qpdf_set_qdf_mode(qpdf, QPDF_TRUE);
qpdf_set_suppress_original_object_IDs(qpdf, QPDF_TRUE);
qpdf_write(qpdf);
report_errors();
}
static void test25(char const* infile,
char const* password,
char const* outfile,
char const* outfile2)
{
/* This test case is designed for minimal.pdf. */
qpdf_read(qpdf, infile, password);
qpdf_oh root = qpdf_get_root(qpdf);
/* Parse objects from a string */
qpdf_oh parsed = qpdf_oh_parse( qpdf_oh parsed = qpdf_oh_parse(
qpdf, "[ 1 2.0 (3\xf7) << /Four [/Five] >> null true ]"); qpdf, "[ 1 2.0 (3\xf7) << /Four [/Five] >> null true ]");
qpdf_oh p_int = qpdf_oh_get_array_item(qpdf, parsed, 0); qpdf_oh p_int = qpdf_oh_get_array_item(qpdf, parsed, 0);
@ -614,13 +656,6 @@ static void test24(char const* infile,
(strcmp(qpdf_oh_get_string_value(qpdf, p_string), "3\xf7") == 0) && (strcmp(qpdf_oh_get_string_value(qpdf, p_string), "3\xf7") == 0) &&
(strcmp(qpdf_oh_get_utf8_value(qpdf, p_string), "3\xc3\xb7") == 0) && (strcmp(qpdf_oh_get_utf8_value(qpdf, p_string), "3\xc3\xb7") == 0) &&
(strcmp(qpdf_oh_unparse_binary(qpdf, p_string), "<33f7>") == 0)); (strcmp(qpdf_oh_unparse_binary(qpdf, p_string), "<33f7>") == 0));
qpdf_oh p_string_with_null = qpdf_oh_parse(qpdf, "<6f6e650074776f>");
assert(qpdf_oh_is_string(qpdf, p_string_with_null) &&
(strcmp(qpdf_oh_get_string_value(qpdf, p_string_with_null),
"one") == 0) &&
(qpdf_get_last_string_length(qpdf) == 7) &&
(memcmp(qpdf_oh_get_string_value(qpdf, p_string_with_null),
"one\000two", 7) == 0));
assert(qpdf_oh_is_dictionary(qpdf, p_dict)); assert(qpdf_oh_is_dictionary(qpdf, p_dict));
qpdf_oh p_five = qpdf_oh_get_key(qpdf, p_dict, "/Four"); qpdf_oh p_five = qpdf_oh_get_key(qpdf, p_dict, "/Four");
assert(qpdf_oh_is_or_has_name(qpdf, p_five, "/Five")); assert(qpdf_oh_is_or_has_name(qpdf, p_five, "/Five"));
@ -669,33 +704,84 @@ static void test24(char const* infile,
qpdf, new_array, qpdf_oh_new_bool(qpdf, QPDF_TRUE)); qpdf, new_array, qpdf_oh_new_bool(qpdf, QPDF_TRUE));
qpdf_oh_replace_key(qpdf, root, "/QTest", new_dict); qpdf_oh_replace_key(qpdf, root, "/QTest", new_dict);
/* Release and access to exercise warnings */
qpdf_oh_release(qpdf, page1);
contents = qpdf_oh_get_key(qpdf, page1, "/Contents");
assert(qpdf_oh_is_null(qpdf, contents));
assert(qpdf_oh_is_array(qpdf, mediabox));
qpdf_oh_release_all(qpdf);
assert(! qpdf_oh_is_null(qpdf, mediabox));
assert(! qpdf_oh_is_array(qpdf, mediabox));
/* Make sure something is assigned when we exit so we check that
* it gets properl freed.
*/
qpdf_get_root(qpdf);
qpdf_init_write(qpdf, outfile); qpdf_init_write(qpdf, outfile);
qpdf_set_static_ID(qpdf, QPDF_TRUE); qpdf_set_static_ID(qpdf, QPDF_TRUE);
qpdf_set_qdf_mode(qpdf, QPDF_TRUE); qpdf_set_qdf_mode(qpdf, QPDF_TRUE);
qpdf_set_suppress_original_object_IDs(qpdf, QPDF_TRUE); qpdf_set_suppress_original_object_IDs(qpdf, QPDF_TRUE);
qpdf_write(qpdf); qpdf_write(qpdf);
report_errors(); report_errors();
}
static void test26(char const* infile,
char const* password,
char const* outfile,
char const* outfile2)
{
/* Make sure we detect uninitialized objects */ /* Make sure we detect uninitialized objects */
qpdf_data qpdf2 = qpdf_init(); qpdf_data qpdf2 = qpdf_init();
trailer = qpdf_get_trailer(qpdf2); qpdf_oh trailer = qpdf_get_trailer(qpdf2);
assert(! qpdf_oh_is_initialized(qpdf2, trailer)); assert(! qpdf_oh_is_initialized(qpdf2, trailer));
qpdf_cleanup(&qpdf2); qpdf_cleanup(&qpdf2);
} }
static void test27(char const* infile,
char const* password,
char const* outfile,
char const* outfile2)
{
/* Exercise a string with a null. Since the regular methods return
* char*, we can't see past the null character without looking
* explicitly at the length.
*/
qpdf_oh p_string_with_null = qpdf_oh_parse(qpdf, "<6f6e650074776f>");
assert(qpdf_oh_is_string(qpdf, p_string_with_null));
assert(strcmp(qpdf_oh_get_string_value(qpdf, p_string_with_null),
"one") == 0);
assert(qpdf_get_last_string_length(qpdf) == 7);
assert(memcmp(qpdf_oh_get_string_value(qpdf, p_string_with_null),
"one\000two", 7) == 0);
}
static void test28(char const* infile,
char const* password,
char const* outfile,
char const* outfile2)
{
/* This test case is designed for minimal.pdf. */
/* Look at the media box. The media box is in array. Trivially
* wrap it and also clone it and make sure we get different
* handles with the same contents.
*/
qpdf_read(qpdf, infile, password);
qpdf_oh root = qpdf_get_root(qpdf);
qpdf_oh pages = qpdf_oh_get_key(qpdf, root, "/Pages");
qpdf_oh kids = qpdf_oh_get_key(qpdf, pages, "/Kids");
qpdf_oh page1 = qpdf_oh_get_array_item(qpdf, kids, 0);
qpdf_oh mediabox = qpdf_oh_get_key(qpdf, page1, "/MediaBox");
qpdf_oh wrapped_mediabox = qpdf_oh_wrap_in_array(qpdf, mediabox);
qpdf_oh cloned_mediabox = qpdf_oh_new_object(qpdf, mediabox);
assert(wrapped_mediabox != mediabox);
assert(cloned_mediabox != mediabox);
assert(qpdf_oh_get_array_n_items(qpdf, wrapped_mediabox) == 4);
for (int i = 0; i < 4; ++i)
{
qpdf_oh item = qpdf_oh_get_array_item(qpdf, mediabox, i);
qpdf_oh item2 = qpdf_oh_get_array_item(qpdf, wrapped_mediabox, i);
qpdf_oh item3 = qpdf_oh_get_array_item(qpdf, cloned_mediabox, i);
assert(qpdf_oh_get_int_value_as_int(qpdf, item) ==
(i == 0 ? 0 :
i == 1 ? 0 :
i == 2 ? 612 :
i == 3 ? 792 :
-1));
assert(qpdf_oh_get_int_value_as_int(qpdf, item) ==
qpdf_oh_get_int_value_as_int(qpdf, item2));
assert(qpdf_oh_get_int_value_as_int(qpdf, item) ==
qpdf_oh_get_int_value_as_int(qpdf, item3));
qpdf_oh_release(qpdf, item);
}
}
int main(int argc, char* argv[]) int main(int argc, char* argv[])
{ {
char* p = 0; char* p = 0;
@ -760,6 +846,10 @@ int main(int argc, char* argv[])
(n == 22) ? test22 : (n == 22) ? test22 :
(n == 23) ? test23 : (n == 23) ? test23 :
(n == 24) ? test24 : (n == 24) ? test24 :
(n == 25) ? test25 :
(n == 26) ? test26 :
(n == 27) ? test27 :
(n == 28) ? test28 :
0); 0);
if (fn == 0) if (fn == 0)

View File

@ -4808,18 +4808,38 @@ foreach my $i (@c_check_types)
show_ntests(); show_ntests();
# ---------- # ----------
$td->notify("--- C API Object Handle ---"); $td->notify("--- C API Object Handle ---");
$n_tests += scalar(@c_check_types); $n_tests += 7;
$td->runtest("C check object handles", $td->runtest("C check object handles",
{$td->COMMAND => "qpdf-ctest 24 minimal.pdf '' a.pdf"}, {$td->COMMAND => "qpdf-ctest 24 minimal.pdf '' a.pdf"},
{$td->FILE => "c-object-handles.out", {$td->FILE => "c-object-handles.out",
$td->EXIT_STATUS => 0}, $td->EXIT_STATUS => 0},
$td->NORMALIZE_NEWLINES); $td->NORMALIZE_NEWLINES);
$td->runtest("check output", $td->runtest("check output",
{$td->FILE => 'a.pdf'}, {$td->FILE => 'a.pdf'},
{$td->FILE => 'c-object-handles-out.pdf'}); {$td->FILE => 'c-object-handles-out.pdf'});
$td->runtest("C check object handle creation",
{$td->COMMAND => "qpdf-ctest 25 minimal.pdf '' a.pdf"},
{$td->STRING => "", $td->EXIT_STATUS => 0},
$td->NORMALIZE_NEWLINES);
$td->runtest("check output",
{$td->FILE => 'a.pdf'},
{$td->FILE => 'c-object-handle-creation-out.pdf'});
$td->runtest("C uninitialized objects",
{$td->COMMAND => "qpdf-ctest 26 '' '' ''"},
{$td->STRING => "", $td->EXIT_STATUS => 0},
$td->NORMALIZE_NEWLINES);
$td->runtest("C string with embedded null",
{$td->COMMAND => "qpdf-ctest 27 '' '' ''"},
{$td->STRING => "", $td->EXIT_STATUS => 0},
$td->NORMALIZE_NEWLINES);
$td->runtest("C wrap and clone objects",
{$td->COMMAND => "qpdf-ctest 28 minimal.pdf '' ''"},
{$td->STRING => "", $td->EXIT_STATUS => 0},
$td->NORMALIZE_NEWLINES);
show_ntests(); show_ntests();
# ---------- # ----------
$td->notify("--- Content Preservation Tests ---"); $td->notify("--- Content Preservation Tests ---");

View File

@ -0,0 +1,109 @@
%PDF-1.3
%¿÷¢þ
%QDF-1.0
1 0 obj
<<
/Pages 2 0 R
/QTest <<
/B [
(potato)
<feff00710077007700f703c0>
/Quack
null
4.12
5.0
6
true
]
/C <<
>>
>>
/Type /Catalog
>>
endobj
2 0 obj
<<
/Count 1
/Kids [
3 0 R
]
/Type /Pages
>>
endobj
%% Page 1
3 0 obj
<<
/Contents 4 0 R
/MediaBox [
0
0
612
792
]
/Parent 2 0 R
/Resources <<
/Font <<
/F1 6 0 R
>>
/ProcSet 7 0 R
>>
/Type /Page
>>
endobj
%% Contents for page 1
4 0 obj
<<
/Length 5 0 R
>>
stream
BT
/F1 24 Tf
72 720 Td
(Potato) Tj
ET
endstream
endobj
5 0 obj
44
endobj
6 0 obj
<<
/BaseFont /Helvetica
/Encoding /WinAnsiEncoding
/Name /F1
/Subtype /Type1
/Type /Font
>>
endobj
7 0 obj
[
/PDF
/Text
]
endobj
xref
0 8
0000000000 65535 f
0000000025 00000 n
0000000240 00000 n
0000000322 00000 n
0000000537 00000 n
0000000636 00000 n
0000000655 00000 n
0000000773 00000 n
trailer <<
/Root 1 0 R
/Size 8
/ID [<31415926535897932384626433832795><31415926535897932384626433832795>]
>>
startxref
808
%%EOF

View File

@ -5,20 +5,6 @@
1 0 obj 1 0 obj
<< <<
/Pages 2 0 R /Pages 2 0 R
/QTest <<
/B [
(potato)
<feff00710077007700f703c0>
/Quack
null
4.12
5.0
6
true
]
/C <<
>>
>>
/Type /Catalog /Type /Catalog
>> >>
endobj endobj
@ -89,16 +75,16 @@ xref
0 7 0 7
0000000000 65535 f 0000000000 65535 f
0000000025 00000 n 0000000025 00000 n
0000000240 00000 n 0000000079 00000 n
0000000322 00000 n 0000000161 00000 n
0000000562 00000 n 0000000401 00000 n
0000000661 00000 n 0000000500 00000 n
0000000680 00000 n 0000000519 00000 n
trailer << trailer <<
/Root 1 0 R /Root 1 0 R
/Size 7 /Size 7
/ID [<31415926535897932384626433832795><31415926535897932384626433832795>] /ID [<31415926535897932384626433832795><31415926535897932384626433832795>]
>> >>
startxref startxref
798 637
%%EOF %%EOF