xref: /freebsd/contrib/expat/tests/runtests.c (revision 0b3105a37d7adcadcb720112fed4dc4e8040be99)
1 /* Copyright (c) 1998, 1999, 2000 Thai Open Source Software Center Ltd
2    See the file COPYING for copying permission.
3 
4    runtest.c : run the Expat test suite
5 */
6 
7 #ifdef HAVE_EXPAT_CONFIG_H
8 #include <expat_config.h>
9 #endif
10 
11 #include <assert.h>
12 #include <stdlib.h>
13 #include <stdio.h>
14 #include <string.h>
15 #include <stdint.h>
16 
17 #include "expat.h"
18 #include "chardata.h"
19 #include "minicheck.h"
20 
21 #if defined(__amigaos__) && defined(__USE_INLINE__)
22 #include <proto/expat.h>
23 #endif
24 
25 #ifdef XML_LARGE_SIZE
26 #define XML_FMT_INT_MOD "ll"
27 #else
28 #define XML_FMT_INT_MOD "l"
29 #endif
30 
31 static XML_Parser parser;
32 
33 
34 static void
35 basic_setup(void)
36 {
37     parser = XML_ParserCreate(NULL);
38     if (parser == NULL)
39         fail("Parser not created.");
40 }
41 
42 static void
43 basic_teardown(void)
44 {
45     if (parser != NULL)
46         XML_ParserFree(parser);
47 }
48 
49 /* Generate a failure using the parser state to create an error message;
50    this should be used when the parser reports an error we weren't
51    expecting.
52 */
53 static void
54 _xml_failure(XML_Parser parser, const char *file, int line)
55 {
56     char buffer[1024];
57     enum XML_Error err = XML_GetErrorCode(parser);
58     sprintf(buffer,
59             "    %d: %s (line %" XML_FMT_INT_MOD "u, offset %"\
60                 XML_FMT_INT_MOD "u)\n    reported from %s, line %d\n",
61             err,
62             XML_ErrorString(err),
63             XML_GetCurrentLineNumber(parser),
64             XML_GetCurrentColumnNumber(parser),
65             file, line);
66     _fail_unless(0, file, line, buffer);
67 }
68 
69 #define xml_failure(parser) _xml_failure((parser), __FILE__, __LINE__)
70 
71 static void
72 _expect_failure(char *text, enum XML_Error errorCode, char *errorMessage,
73                 char *file, int lineno)
74 {
75     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_OK)
76         /* Hackish use of _fail_unless() macro, but let's us report
77            the right filename and line number. */
78         _fail_unless(0, file, lineno, errorMessage);
79     if (XML_GetErrorCode(parser) != errorCode)
80         _xml_failure(parser, file, lineno);
81 }
82 
83 #define expect_failure(text, errorCode, errorMessage) \
84         _expect_failure((text), (errorCode), (errorMessage), \
85                         __FILE__, __LINE__)
86 
87 /* Dummy handlers for when we need to set a handler to tickle a bug,
88    but it doesn't need to do anything.
89 */
90 
91 static void XMLCALL
92 dummy_start_doctype_handler(void           *userData,
93                             const XML_Char *doctypeName,
94                             const XML_Char *sysid,
95                             const XML_Char *pubid,
96                             int            has_internal_subset)
97 {}
98 
99 static void XMLCALL
100 dummy_end_doctype_handler(void *userData)
101 {}
102 
103 static void XMLCALL
104 dummy_entity_decl_handler(void           *userData,
105                           const XML_Char *entityName,
106                           int            is_parameter_entity,
107                           const XML_Char *value,
108                           int            value_length,
109                           const XML_Char *base,
110                           const XML_Char *systemId,
111                           const XML_Char *publicId,
112                           const XML_Char *notationName)
113 {}
114 
115 static void XMLCALL
116 dummy_notation_decl_handler(void *userData,
117                             const XML_Char *notationName,
118                             const XML_Char *base,
119                             const XML_Char *systemId,
120                             const XML_Char *publicId)
121 {}
122 
123 static void XMLCALL
124 dummy_element_decl_handler(void *userData,
125                            const XML_Char *name,
126                            XML_Content *model)
127 {}
128 
129 static void XMLCALL
130 dummy_attlist_decl_handler(void           *userData,
131                            const XML_Char *elname,
132                            const XML_Char *attname,
133                            const XML_Char *att_type,
134                            const XML_Char *dflt,
135                            int            isrequired)
136 {}
137 
138 static void XMLCALL
139 dummy_comment_handler(void *userData, const XML_Char *data)
140 {}
141 
142 static void XMLCALL
143 dummy_pi_handler(void *userData, const XML_Char *target, const XML_Char *data)
144 {}
145 
146 static void XMLCALL
147 dummy_start_element(void *userData,
148                     const XML_Char *name, const XML_Char **atts)
149 {}
150 
151 
152 /*
153  * Character & encoding tests.
154  */
155 
156 START_TEST(test_nul_byte)
157 {
158     char text[] = "<doc>\0</doc>";
159 
160     /* test that a NUL byte (in US-ASCII data) is an error */
161     if (XML_Parse(parser, text, sizeof(text) - 1, XML_TRUE) == XML_STATUS_OK)
162         fail("Parser did not report error on NUL-byte.");
163     if (XML_GetErrorCode(parser) != XML_ERROR_INVALID_TOKEN)
164         xml_failure(parser);
165 }
166 END_TEST
167 
168 
169 START_TEST(test_u0000_char)
170 {
171     /* test that a NUL byte (in US-ASCII data) is an error */
172     expect_failure("<doc>&#0;</doc>",
173                    XML_ERROR_BAD_CHAR_REF,
174                    "Parser did not report error on NUL-byte.");
175 }
176 END_TEST
177 
178 START_TEST(test_bom_utf8)
179 {
180     /* This test is really just making sure we don't core on a UTF-8 BOM. */
181     char *text = "\357\273\277<e/>";
182 
183     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
184         xml_failure(parser);
185 }
186 END_TEST
187 
188 START_TEST(test_bom_utf16_be)
189 {
190     char text[] = "\376\377\0<\0e\0/\0>";
191 
192     if (XML_Parse(parser, text, sizeof(text)-1, XML_TRUE) == XML_STATUS_ERROR)
193         xml_failure(parser);
194 }
195 END_TEST
196 
197 START_TEST(test_bom_utf16_le)
198 {
199     char text[] = "\377\376<\0e\0/\0>\0";
200 
201     if (XML_Parse(parser, text, sizeof(text)-1, XML_TRUE) == XML_STATUS_ERROR)
202         xml_failure(parser);
203 }
204 END_TEST
205 
206 static void XMLCALL
207 accumulate_characters(void *userData, const XML_Char *s, int len)
208 {
209     CharData_AppendXMLChars((CharData *)userData, s, len);
210 }
211 
212 static void XMLCALL
213 accumulate_attribute(void *userData, const XML_Char *name,
214                      const XML_Char **atts)
215 {
216     CharData *storage = (CharData *)userData;
217     if (storage->count < 0 && atts != NULL && atts[0] != NULL) {
218         /* "accumulate" the value of the first attribute we see */
219         CharData_AppendXMLChars(storage, atts[1], -1);
220     }
221 }
222 
223 
224 static void
225 _run_character_check(XML_Char *text, XML_Char *expected,
226                      const char *file, int line)
227 {
228     CharData storage;
229 
230     CharData_Init(&storage);
231     XML_SetUserData(parser, &storage);
232     XML_SetCharacterDataHandler(parser, accumulate_characters);
233     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
234         _xml_failure(parser, file, line);
235     CharData_CheckXMLChars(&storage, expected);
236 }
237 
238 #define run_character_check(text, expected) \
239         _run_character_check(text, expected, __FILE__, __LINE__)
240 
241 static void
242 _run_attribute_check(XML_Char *text, XML_Char *expected,
243                      const char *file, int line)
244 {
245     CharData storage;
246 
247     CharData_Init(&storage);
248     XML_SetUserData(parser, &storage);
249     XML_SetStartElementHandler(parser, accumulate_attribute);
250     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
251         _xml_failure(parser, file, line);
252     CharData_CheckXMLChars(&storage, expected);
253 }
254 
255 #define run_attribute_check(text, expected) \
256         _run_attribute_check(text, expected, __FILE__, __LINE__)
257 
258 /* Regression test for SF bug #491986. */
259 START_TEST(test_danish_latin1)
260 {
261     char *text =
262         "<?xml version='1.0' encoding='iso-8859-1'?>\n"
263         "<e>J\xF8rgen \xE6\xF8\xE5\xC6\xD8\xC5</e>";
264     run_character_check(text,
265              "J\xC3\xB8rgen \xC3\xA6\xC3\xB8\xC3\xA5\xC3\x86\xC3\x98\xC3\x85");
266 }
267 END_TEST
268 
269 
270 /* Regression test for SF bug #514281. */
271 START_TEST(test_french_charref_hexidecimal)
272 {
273     char *text =
274         "<?xml version='1.0' encoding='iso-8859-1'?>\n"
275         "<doc>&#xE9;&#xE8;&#xE0;&#xE7;&#xEA;&#xC8;</doc>";
276     run_character_check(text,
277                         "\xC3\xA9\xC3\xA8\xC3\xA0\xC3\xA7\xC3\xAA\xC3\x88");
278 }
279 END_TEST
280 
281 START_TEST(test_french_charref_decimal)
282 {
283     char *text =
284         "<?xml version='1.0' encoding='iso-8859-1'?>\n"
285         "<doc>&#233;&#232;&#224;&#231;&#234;&#200;</doc>";
286     run_character_check(text,
287                         "\xC3\xA9\xC3\xA8\xC3\xA0\xC3\xA7\xC3\xAA\xC3\x88");
288 }
289 END_TEST
290 
291 START_TEST(test_french_latin1)
292 {
293     char *text =
294         "<?xml version='1.0' encoding='iso-8859-1'?>\n"
295         "<doc>\xE9\xE8\xE0\xE7\xEa\xC8</doc>";
296     run_character_check(text,
297                         "\xC3\xA9\xC3\xA8\xC3\xA0\xC3\xA7\xC3\xAA\xC3\x88");
298 }
299 END_TEST
300 
301 START_TEST(test_french_utf8)
302 {
303     char *text =
304         "<?xml version='1.0' encoding='utf-8'?>\n"
305         "<doc>\xC3\xA9</doc>";
306     run_character_check(text, "\xC3\xA9");
307 }
308 END_TEST
309 
310 /* Regression test for SF bug #600479.
311    XXX There should be a test that exercises all legal XML Unicode
312    characters as PCDATA and attribute value content, and XML Name
313    characters as part of element and attribute names.
314 */
315 START_TEST(test_utf8_false_rejection)
316 {
317     char *text = "<doc>\xEF\xBA\xBF</doc>";
318     run_character_check(text, "\xEF\xBA\xBF");
319 }
320 END_TEST
321 
322 /* Regression test for SF bug #477667.
323    This test assures that any 8-bit character followed by a 7-bit
324    character will not be mistakenly interpreted as a valid UTF-8
325    sequence.
326 */
327 START_TEST(test_illegal_utf8)
328 {
329     char text[100];
330     int i;
331 
332     for (i = 128; i <= 255; ++i) {
333         sprintf(text, "<e>%ccd</e>", i);
334         if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_OK) {
335             sprintf(text,
336                     "expected token error for '%c' (ordinal %d) in UTF-8 text",
337                     i, i);
338             fail(text);
339         }
340         else if (XML_GetErrorCode(parser) != XML_ERROR_INVALID_TOKEN)
341             xml_failure(parser);
342         /* Reset the parser since we use the same parser repeatedly. */
343         XML_ParserReset(parser, NULL);
344     }
345 }
346 END_TEST
347 
348 START_TEST(test_utf16)
349 {
350     /* <?xml version="1.0" encoding="UTF-16"?>
351        <doc a='123'>some text</doc>
352     */
353     char text[] =
354         "\000<\000?\000x\000m\000\154\000 \000v\000e\000r\000s\000i\000o"
355         "\000n\000=\000'\0001\000.\000\060\000'\000 \000e\000n\000c\000o"
356         "\000d\000i\000n\000g\000=\000'\000U\000T\000F\000-\0001\000\066"
357         "\000'\000?\000>\000\n"
358         "\000<\000d\000o\000c\000 \000a\000=\000'\0001\0002\0003\000'"
359         "\000>\000s\000o\000m\000e\000 \000t\000e\000x\000t\000<\000/"
360         "\000d\000o\000c\000>";
361     if (XML_Parse(parser, text, sizeof(text)-1, XML_TRUE) == XML_STATUS_ERROR)
362         xml_failure(parser);
363 }
364 END_TEST
365 
366 START_TEST(test_utf16_le_epilog_newline)
367 {
368     unsigned int first_chunk_bytes = 17;
369     char text[] =
370         "\xFF\xFE"                      /* BOM */
371         "<\000e\000/\000>\000"          /* document element */
372         "\r\000\n\000\r\000\n\000";     /* epilog */
373 
374     if (first_chunk_bytes >= sizeof(text) - 1)
375         fail("bad value of first_chunk_bytes");
376     if (  XML_Parse(parser, text, first_chunk_bytes, XML_FALSE)
377           == XML_STATUS_ERROR)
378         xml_failure(parser);
379     else {
380         enum XML_Status rc;
381         rc = XML_Parse(parser, text + first_chunk_bytes,
382                        sizeof(text) - first_chunk_bytes - 1, XML_TRUE);
383         if (rc == XML_STATUS_ERROR)
384             xml_failure(parser);
385     }
386 }
387 END_TEST
388 
389 /* Regression test for SF bug #481609, #774028. */
390 START_TEST(test_latin1_umlauts)
391 {
392     char *text =
393         "<?xml version='1.0' encoding='iso-8859-1'?>\n"
394         "<e a='\xE4 \xF6 \xFC &#228; &#246; &#252; &#x00E4; &#x0F6; &#xFC; >'\n"
395         "  >\xE4 \xF6 \xFC &#228; &#246; &#252; &#x00E4; &#x0F6; &#xFC; ></e>";
396     char *utf8 =
397         "\xC3\xA4 \xC3\xB6 \xC3\xBC "
398         "\xC3\xA4 \xC3\xB6 \xC3\xBC "
399         "\xC3\xA4 \xC3\xB6 \xC3\xBC >";
400     run_character_check(text, utf8);
401     XML_ParserReset(parser, NULL);
402     run_attribute_check(text, utf8);
403 }
404 END_TEST
405 
406 /* Regression test #1 for SF bug #653180. */
407 START_TEST(test_line_number_after_parse)
408 {
409     char *text =
410         "<tag>\n"
411         "\n"
412         "\n</tag>";
413     XML_Size lineno;
414 
415     if (XML_Parse(parser, text, strlen(text), XML_FALSE) == XML_STATUS_ERROR)
416         xml_failure(parser);
417     lineno = XML_GetCurrentLineNumber(parser);
418     if (lineno != 4) {
419         char buffer[100];
420         sprintf(buffer,
421             "expected 4 lines, saw %" XML_FMT_INT_MOD "u", lineno);
422         fail(buffer);
423     }
424 }
425 END_TEST
426 
427 /* Regression test #2 for SF bug #653180. */
428 START_TEST(test_column_number_after_parse)
429 {
430     char *text = "<tag></tag>";
431     XML_Size colno;
432 
433     if (XML_Parse(parser, text, strlen(text), XML_FALSE) == XML_STATUS_ERROR)
434         xml_failure(parser);
435     colno = XML_GetCurrentColumnNumber(parser);
436     if (colno != 11) {
437         char buffer[100];
438         sprintf(buffer,
439             "expected 11 columns, saw %" XML_FMT_INT_MOD "u", colno);
440         fail(buffer);
441     }
442 }
443 END_TEST
444 
445 static void XMLCALL
446 start_element_event_handler2(void *userData, const XML_Char *name,
447 			     const XML_Char **attr)
448 {
449     CharData *storage = (CharData *) userData;
450     char buffer[100];
451 
452     sprintf(buffer,
453         "<%s> at col:%" XML_FMT_INT_MOD "u line:%"\
454             XML_FMT_INT_MOD "u\n", name,
455 	    XML_GetCurrentColumnNumber(parser),
456 	    XML_GetCurrentLineNumber(parser));
457     CharData_AppendString(storage, buffer);
458 }
459 
460 static void XMLCALL
461 end_element_event_handler2(void *userData, const XML_Char *name)
462 {
463     CharData *storage = (CharData *) userData;
464     char buffer[100];
465 
466     sprintf(buffer,
467         "</%s> at col:%" XML_FMT_INT_MOD "u line:%"\
468             XML_FMT_INT_MOD "u\n", name,
469 	    XML_GetCurrentColumnNumber(parser),
470 	    XML_GetCurrentLineNumber(parser));
471     CharData_AppendString(storage, buffer);
472 }
473 
474 /* Regression test #3 for SF bug #653180. */
475 START_TEST(test_line_and_column_numbers_inside_handlers)
476 {
477     char *text =
478         "<a>\n"        /* Unix end-of-line */
479         "  <b>\r\n"    /* Windows end-of-line */
480         "    <c/>\r"   /* Mac OS end-of-line */
481         "  </b>\n"
482         "  <d>\n"
483         "    <f/>\n"
484         "  </d>\n"
485         "</a>";
486     char *expected =
487         "<a> at col:0 line:1\n"
488         "<b> at col:2 line:2\n"
489         "<c> at col:4 line:3\n"
490         "</c> at col:8 line:3\n"
491         "</b> at col:2 line:4\n"
492         "<d> at col:2 line:5\n"
493         "<f> at col:4 line:6\n"
494         "</f> at col:8 line:6\n"
495         "</d> at col:2 line:7\n"
496         "</a> at col:0 line:8\n";
497     CharData storage;
498 
499     CharData_Init(&storage);
500     XML_SetUserData(parser, &storage);
501     XML_SetStartElementHandler(parser, start_element_event_handler2);
502     XML_SetEndElementHandler(parser, end_element_event_handler2);
503     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
504         xml_failure(parser);
505 
506     CharData_CheckString(&storage, expected);
507 }
508 END_TEST
509 
510 /* Regression test #4 for SF bug #653180. */
511 START_TEST(test_line_number_after_error)
512 {
513     char *text =
514         "<a>\n"
515         "  <b>\n"
516         "  </a>";  /* missing </b> */
517     XML_Size lineno;
518     if (XML_Parse(parser, text, strlen(text), XML_FALSE) != XML_STATUS_ERROR)
519         fail("Expected a parse error");
520 
521     lineno = XML_GetCurrentLineNumber(parser);
522     if (lineno != 3) {
523         char buffer[100];
524         sprintf(buffer, "expected 3 lines, saw %" XML_FMT_INT_MOD "u", lineno);
525         fail(buffer);
526     }
527 }
528 END_TEST
529 
530 /* Regression test #5 for SF bug #653180. */
531 START_TEST(test_column_number_after_error)
532 {
533     char *text =
534         "<a>\n"
535         "  <b>\n"
536         "  </a>";  /* missing </b> */
537     XML_Size colno;
538     if (XML_Parse(parser, text, strlen(text), XML_FALSE) != XML_STATUS_ERROR)
539         fail("Expected a parse error");
540 
541     colno = XML_GetCurrentColumnNumber(parser);
542     if (colno != 4) {
543         char buffer[100];
544         sprintf(buffer,
545             "expected 4 columns, saw %" XML_FMT_INT_MOD "u", colno);
546         fail(buffer);
547     }
548 }
549 END_TEST
550 
551 /* Regression test for SF bug #478332. */
552 START_TEST(test_really_long_lines)
553 {
554     /* This parses an input line longer than INIT_DATA_BUF_SIZE
555        characters long (defined to be 1024 in xmlparse.c).  We take a
556        really cheesy approach to building the input buffer, because
557        this avoids writing bugs in buffer-filling code.
558     */
559     char *text =
560         "<e>"
561         /* 64 chars */
562         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
563         /* until we have at least 1024 characters on the line: */
564         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
565         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
566         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
567         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
568         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
569         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
570         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
571         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
572         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
573         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
574         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
575         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
576         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
577         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
578         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
579         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-+"
580         "</e>";
581     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
582         xml_failure(parser);
583 }
584 END_TEST
585 
586 
587 /*
588  * Element event tests.
589  */
590 
591 static void XMLCALL
592 end_element_event_handler(void *userData, const XML_Char *name)
593 {
594     CharData *storage = (CharData *) userData;
595     CharData_AppendString(storage, "/");
596     CharData_AppendXMLChars(storage, name, -1);
597 }
598 
599 START_TEST(test_end_element_events)
600 {
601     char *text = "<a><b><c/></b><d><f/></d></a>";
602     char *expected = "/c/b/f/d/a";
603     CharData storage;
604 
605     CharData_Init(&storage);
606     XML_SetUserData(parser, &storage);
607     XML_SetEndElementHandler(parser, end_element_event_handler);
608     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
609         xml_failure(parser);
610     CharData_CheckString(&storage, expected);
611 }
612 END_TEST
613 
614 
615 /*
616  * Attribute tests.
617  */
618 
619 /* Helpers used by the following test; this checks any "attr" and "refs"
620    attributes to make sure whitespace has been normalized.
621 
622    Return true if whitespace has been normalized in a string, using
623    the rules for attribute value normalization.  The 'is_cdata' flag
624    is needed since CDATA attributes don't need to have multiple
625    whitespace characters collapsed to a single space, while other
626    attribute data types do.  (Section 3.3.3 of the recommendation.)
627 */
628 static int
629 is_whitespace_normalized(const XML_Char *s, int is_cdata)
630 {
631     int blanks = 0;
632     int at_start = 1;
633     while (*s) {
634         if (*s == ' ')
635             ++blanks;
636         else if (*s == '\t' || *s == '\n' || *s == '\r')
637             return 0;
638         else {
639             if (at_start) {
640                 at_start = 0;
641                 if (blanks && !is_cdata)
642                     /* illegal leading blanks */
643                     return 0;
644             }
645             else if (blanks > 1 && !is_cdata)
646                 return 0;
647             blanks = 0;
648         }
649         ++s;
650     }
651     if (blanks && !is_cdata)
652         return 0;
653     return 1;
654 }
655 
656 /* Check the attribute whitespace checker: */
657 static void
658 testhelper_is_whitespace_normalized(void)
659 {
660     assert(is_whitespace_normalized("abc", 0));
661     assert(is_whitespace_normalized("abc", 1));
662     assert(is_whitespace_normalized("abc def ghi", 0));
663     assert(is_whitespace_normalized("abc def ghi", 1));
664     assert(!is_whitespace_normalized(" abc def ghi", 0));
665     assert(is_whitespace_normalized(" abc def ghi", 1));
666     assert(!is_whitespace_normalized("abc  def ghi", 0));
667     assert(is_whitespace_normalized("abc  def ghi", 1));
668     assert(!is_whitespace_normalized("abc def ghi ", 0));
669     assert(is_whitespace_normalized("abc def ghi ", 1));
670     assert(!is_whitespace_normalized(" ", 0));
671     assert(is_whitespace_normalized(" ", 1));
672     assert(!is_whitespace_normalized("\t", 0));
673     assert(!is_whitespace_normalized("\t", 1));
674     assert(!is_whitespace_normalized("\n", 0));
675     assert(!is_whitespace_normalized("\n", 1));
676     assert(!is_whitespace_normalized("\r", 0));
677     assert(!is_whitespace_normalized("\r", 1));
678     assert(!is_whitespace_normalized("abc\t def", 1));
679 }
680 
681 static void XMLCALL
682 check_attr_contains_normalized_whitespace(void *userData,
683                                           const XML_Char *name,
684                                           const XML_Char **atts)
685 {
686     int i;
687     for (i = 0; atts[i] != NULL; i += 2) {
688         const XML_Char *attrname = atts[i];
689         const XML_Char *value = atts[i + 1];
690         if (strcmp("attr", attrname) == 0
691             || strcmp("ents", attrname) == 0
692             || strcmp("refs", attrname) == 0) {
693             if (!is_whitespace_normalized(value, 0)) {
694                 char buffer[256];
695                 sprintf(buffer, "attribute value not normalized: %s='%s'",
696                         attrname, value);
697                 fail(buffer);
698             }
699         }
700     }
701 }
702 
703 START_TEST(test_attr_whitespace_normalization)
704 {
705     char *text =
706         "<!DOCTYPE doc [\n"
707         "  <!ATTLIST doc\n"
708         "            attr NMTOKENS #REQUIRED\n"
709         "            ents ENTITIES #REQUIRED\n"
710         "            refs IDREFS   #REQUIRED>\n"
711         "]>\n"
712         "<doc attr='    a  b c\t\td\te\t' refs=' id-1   \t  id-2\t\t'  \n"
713         "     ents=' ent-1   \t\r\n"
714         "            ent-2  ' >\n"
715         "  <e id='id-1'/>\n"
716         "  <e id='id-2'/>\n"
717         "</doc>";
718 
719     XML_SetStartElementHandler(parser,
720                                check_attr_contains_normalized_whitespace);
721     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
722         xml_failure(parser);
723 }
724 END_TEST
725 
726 
727 /*
728  * XML declaration tests.
729  */
730 
731 START_TEST(test_xmldecl_misplaced)
732 {
733     expect_failure("\n"
734                    "<?xml version='1.0'?>\n"
735                    "<a/>",
736                    XML_ERROR_MISPLACED_XML_PI,
737                    "failed to report misplaced XML declaration");
738 }
739 END_TEST
740 
741 /* Regression test for SF bug #584832. */
742 static int XMLCALL
743 UnknownEncodingHandler(void *data,const XML_Char *encoding,XML_Encoding *info)
744 {
745     if (strcmp(encoding,"unsupported-encoding") == 0) {
746         int i;
747         for (i = 0; i < 256; ++i)
748             info->map[i] = i;
749         info->data = NULL;
750         info->convert = NULL;
751         info->release = NULL;
752         return XML_STATUS_OK;
753     }
754     return XML_STATUS_ERROR;
755 }
756 
757 START_TEST(test_unknown_encoding_internal_entity)
758 {
759     char *text =
760         "<?xml version='1.0' encoding='unsupported-encoding'?>\n"
761         "<!DOCTYPE test [<!ENTITY foo 'bar'>]>\n"
762         "<test a='&foo;'/>";
763 
764     XML_SetUnknownEncodingHandler(parser, UnknownEncodingHandler, NULL);
765     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
766         xml_failure(parser);
767 }
768 END_TEST
769 
770 /* Regression test for SF bug #620106. */
771 static int XMLCALL
772 external_entity_loader_set_encoding(XML_Parser parser,
773                                     const XML_Char *context,
774                                     const XML_Char *base,
775                                     const XML_Char *systemId,
776                                     const XML_Char *publicId)
777 {
778     /* This text says it's an unsupported encoding, but it's really
779        UTF-8, which we tell Expat using XML_SetEncoding().
780     */
781     char *text =
782         "<?xml encoding='iso-8859-3'?>"
783         "\xC3\xA9";
784     XML_Parser extparser;
785 
786     extparser = XML_ExternalEntityParserCreate(parser, context, NULL);
787     if (extparser == NULL)
788         fail("Could not create external entity parser.");
789     if (!XML_SetEncoding(extparser, "utf-8"))
790         fail("XML_SetEncoding() ignored for external entity");
791     if (  XML_Parse(extparser, text, strlen(text), XML_TRUE)
792           == XML_STATUS_ERROR) {
793         xml_failure(parser);
794         return 0;
795     }
796     return 1;
797 }
798 
799 START_TEST(test_ext_entity_set_encoding)
800 {
801     char *text =
802         "<!DOCTYPE doc [\n"
803         "  <!ENTITY en SYSTEM 'http://xml.libexpat.org/dummy.ent'>\n"
804         "]>\n"
805         "<doc>&en;</doc>";
806 
807     XML_SetExternalEntityRefHandler(parser,
808                                     external_entity_loader_set_encoding);
809     run_character_check(text, "\xC3\xA9");
810 }
811 END_TEST
812 
813 /* Test that no error is reported for unknown entities if we don't
814    read an external subset.  This was fixed in Expat 1.95.5.
815 */
816 START_TEST(test_wfc_undeclared_entity_unread_external_subset) {
817     char *text =
818         "<!DOCTYPE doc SYSTEM 'foo'>\n"
819         "<doc>&entity;</doc>";
820 
821     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
822         xml_failure(parser);
823 }
824 END_TEST
825 
826 /* Test that an error is reported for unknown entities if we don't
827    have an external subset.
828 */
829 START_TEST(test_wfc_undeclared_entity_no_external_subset) {
830     expect_failure("<doc>&entity;</doc>",
831                    XML_ERROR_UNDEFINED_ENTITY,
832                    "Parser did not report undefined entity w/out a DTD.");
833 }
834 END_TEST
835 
836 /* Test that an error is reported for unknown entities if we don't
837    read an external subset, but have been declared standalone.
838 */
839 START_TEST(test_wfc_undeclared_entity_standalone) {
840     char *text =
841         "<?xml version='1.0' encoding='us-ascii' standalone='yes'?>\n"
842         "<!DOCTYPE doc SYSTEM 'foo'>\n"
843         "<doc>&entity;</doc>";
844 
845     expect_failure(text,
846                    XML_ERROR_UNDEFINED_ENTITY,
847                    "Parser did not report undefined entity (standalone).");
848 }
849 END_TEST
850 
851 static int XMLCALL
852 external_entity_loader(XML_Parser parser,
853                        const XML_Char *context,
854                        const XML_Char *base,
855                        const XML_Char *systemId,
856                        const XML_Char *publicId)
857 {
858     char *text = (char *)XML_GetUserData(parser);
859     XML_Parser extparser;
860 
861     extparser = XML_ExternalEntityParserCreate(parser, context, NULL);
862     if (extparser == NULL)
863         fail("Could not create external entity parser.");
864     if (  XML_Parse(extparser, text, strlen(text), XML_TRUE)
865           == XML_STATUS_ERROR) {
866         xml_failure(parser);
867         return XML_STATUS_ERROR;
868     }
869     return XML_STATUS_OK;
870 }
871 
872 /* Test that an error is reported for unknown entities if we have read
873    an external subset, and standalone is true.
874 */
875 START_TEST(test_wfc_undeclared_entity_with_external_subset_standalone) {
876     char *text =
877         "<?xml version='1.0' encoding='us-ascii' standalone='yes'?>\n"
878         "<!DOCTYPE doc SYSTEM 'foo'>\n"
879         "<doc>&entity;</doc>";
880     char *foo_text =
881         "<!ELEMENT doc (#PCDATA)*>";
882 
883     XML_SetParamEntityParsing(parser, XML_PARAM_ENTITY_PARSING_ALWAYS);
884     XML_SetUserData(parser, foo_text);
885     XML_SetExternalEntityRefHandler(parser, external_entity_loader);
886     expect_failure(text,
887                    XML_ERROR_UNDEFINED_ENTITY,
888                    "Parser did not report undefined entity (external DTD).");
889 }
890 END_TEST
891 
892 /* Test that no error is reported for unknown entities if we have read
893    an external subset, and standalone is false.
894 */
895 START_TEST(test_wfc_undeclared_entity_with_external_subset) {
896     char *text =
897         "<?xml version='1.0' encoding='us-ascii'?>\n"
898         "<!DOCTYPE doc SYSTEM 'foo'>\n"
899         "<doc>&entity;</doc>";
900     char *foo_text =
901         "<!ELEMENT doc (#PCDATA)*>";
902 
903     XML_SetParamEntityParsing(parser, XML_PARAM_ENTITY_PARSING_ALWAYS);
904     XML_SetUserData(parser, foo_text);
905     XML_SetExternalEntityRefHandler(parser, external_entity_loader);
906     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
907         xml_failure(parser);
908 }
909 END_TEST
910 
911 START_TEST(test_wfc_no_recursive_entity_refs)
912 {
913     char *text =
914         "<!DOCTYPE doc [\n"
915         "  <!ENTITY entity '&#38;entity;'>\n"
916         "]>\n"
917         "<doc>&entity;</doc>";
918 
919     expect_failure(text,
920                    XML_ERROR_RECURSIVE_ENTITY_REF,
921                    "Parser did not report recursive entity reference.");
922 }
923 END_TEST
924 
925 /* Regression test for SF bug #483514. */
926 START_TEST(test_dtd_default_handling)
927 {
928     char *text =
929         "<!DOCTYPE doc [\n"
930         "<!ENTITY e SYSTEM 'http://xml.libexpat.org/e'>\n"
931         "<!NOTATION n SYSTEM 'http://xml.libexpat.org/n'>\n"
932         "<!ELEMENT doc EMPTY>\n"
933         "<!ATTLIST doc a CDATA #IMPLIED>\n"
934         "<?pi in dtd?>\n"
935         "<!--comment in dtd-->\n"
936         "]><doc/>";
937 
938     XML_SetDefaultHandler(parser, accumulate_characters);
939     XML_SetDoctypeDeclHandler(parser,
940                               dummy_start_doctype_handler,
941                               dummy_end_doctype_handler);
942     XML_SetEntityDeclHandler(parser, dummy_entity_decl_handler);
943     XML_SetNotationDeclHandler(parser, dummy_notation_decl_handler);
944     XML_SetElementDeclHandler(parser, dummy_element_decl_handler);
945     XML_SetAttlistDeclHandler(parser, dummy_attlist_decl_handler);
946     XML_SetProcessingInstructionHandler(parser, dummy_pi_handler);
947     XML_SetCommentHandler(parser, dummy_comment_handler);
948     run_character_check(text, "\n\n\n\n\n\n\n<doc/>");
949 }
950 END_TEST
951 
952 /* See related SF bug #673791.
953    When namespace processing is enabled, setting the namespace URI for
954    a prefix is not allowed; this test ensures that it *is* allowed
955    when namespace processing is not enabled.
956    (See Namespaces in XML, section 2.)
957 */
958 START_TEST(test_empty_ns_without_namespaces)
959 {
960     char *text =
961         "<doc xmlns:prefix='http://www.example.com/'>\n"
962         "  <e xmlns:prefix=''/>\n"
963         "</doc>";
964 
965     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
966         xml_failure(parser);
967 }
968 END_TEST
969 
970 /* Regression test for SF bug #824420.
971    Checks that an xmlns:prefix attribute set in an attribute's default
972    value isn't misinterpreted.
973 */
974 START_TEST(test_ns_in_attribute_default_without_namespaces)
975 {
976     char *text =
977         "<!DOCTYPE e:element [\n"
978         "  <!ATTLIST e:element\n"
979         "    xmlns:e CDATA 'http://example.com/'>\n"
980         "      ]>\n"
981         "<e:element/>";
982 
983     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
984         xml_failure(parser);
985 }
986 END_TEST
987 
988 static char *long_character_data_text =
989     "<?xml version='1.0' encoding='iso-8859-1'?><s>"
990     "012345678901234567890123456789012345678901234567890123456789"
991     "012345678901234567890123456789012345678901234567890123456789"
992     "012345678901234567890123456789012345678901234567890123456789"
993     "012345678901234567890123456789012345678901234567890123456789"
994     "012345678901234567890123456789012345678901234567890123456789"
995     "012345678901234567890123456789012345678901234567890123456789"
996     "012345678901234567890123456789012345678901234567890123456789"
997     "012345678901234567890123456789012345678901234567890123456789"
998     "012345678901234567890123456789012345678901234567890123456789"
999     "012345678901234567890123456789012345678901234567890123456789"
1000     "012345678901234567890123456789012345678901234567890123456789"
1001     "012345678901234567890123456789012345678901234567890123456789"
1002     "012345678901234567890123456789012345678901234567890123456789"
1003     "012345678901234567890123456789012345678901234567890123456789"
1004     "012345678901234567890123456789012345678901234567890123456789"
1005     "012345678901234567890123456789012345678901234567890123456789"
1006     "012345678901234567890123456789012345678901234567890123456789"
1007     "012345678901234567890123456789012345678901234567890123456789"
1008     "012345678901234567890123456789012345678901234567890123456789"
1009     "012345678901234567890123456789012345678901234567890123456789"
1010     "</s>";
1011 
1012 static XML_Bool resumable = XML_FALSE;
1013 
1014 static void
1015 clearing_aborting_character_handler(void *userData,
1016                                     const XML_Char *s, int len)
1017 {
1018     XML_StopParser(parser, resumable);
1019     XML_SetCharacterDataHandler(parser, NULL);
1020 }
1021 
1022 /* Regression test for SF bug #1515266: missing check of stopped
1023    parser in doContext() 'for' loop. */
1024 START_TEST(test_stop_parser_between_char_data_calls)
1025 {
1026     /* The sample data must be big enough that there are two calls to
1027        the character data handler from within the inner "for" loop of
1028        the XML_TOK_DATA_CHARS case in doContent(), and the character
1029        handler must stop the parser and clear the character data
1030        handler.
1031     */
1032     char *text = long_character_data_text;
1033 
1034     XML_SetCharacterDataHandler(parser, clearing_aborting_character_handler);
1035     resumable = XML_FALSE;
1036     if (XML_Parse(parser, text, strlen(text), XML_TRUE) != XML_STATUS_ERROR)
1037         xml_failure(parser);
1038     if (XML_GetErrorCode(parser) != XML_ERROR_ABORTED)
1039         xml_failure(parser);
1040 }
1041 END_TEST
1042 
1043 /* Regression test for SF bug #1515266: missing check of stopped
1044    parser in doContext() 'for' loop. */
1045 START_TEST(test_suspend_parser_between_char_data_calls)
1046 {
1047     /* The sample data must be big enough that there are two calls to
1048        the character data handler from within the inner "for" loop of
1049        the XML_TOK_DATA_CHARS case in doContent(), and the character
1050        handler must stop the parser and clear the character data
1051        handler.
1052     */
1053     char *text = long_character_data_text;
1054 
1055     XML_SetCharacterDataHandler(parser, clearing_aborting_character_handler);
1056     resumable = XML_TRUE;
1057     if (XML_Parse(parser, text, strlen(text), XML_TRUE) != XML_STATUS_SUSPENDED)
1058         xml_failure(parser);
1059     if (XML_GetErrorCode(parser) != XML_ERROR_NONE)
1060         xml_failure(parser);
1061 }
1062 END_TEST
1063 
1064 
1065 /*
1066  * Namespaces tests.
1067  */
1068 
1069 static void
1070 namespace_setup(void)
1071 {
1072     parser = XML_ParserCreateNS(NULL, ' ');
1073     if (parser == NULL)
1074         fail("Parser not created.");
1075 }
1076 
1077 static void
1078 namespace_teardown(void)
1079 {
1080     basic_teardown();
1081 }
1082 
1083 /* Check that an element name and attribute name match the expected values.
1084    The expected values are passed as an array reference of string pointers
1085    provided as the userData argument; the first is the expected
1086    element name, and the second is the expected attribute name.
1087 */
1088 static void XMLCALL
1089 triplet_start_checker(void *userData, const XML_Char *name,
1090                       const XML_Char **atts)
1091 {
1092     char **elemstr = (char **)userData;
1093     char buffer[1024];
1094     if (strcmp(elemstr[0], name) != 0) {
1095         sprintf(buffer, "unexpected start string: '%s'", name);
1096         fail(buffer);
1097     }
1098     if (strcmp(elemstr[1], atts[0]) != 0) {
1099         sprintf(buffer, "unexpected attribute string: '%s'", atts[0]);
1100         fail(buffer);
1101     }
1102 }
1103 
1104 /* Check that the element name passed to the end-element handler matches
1105    the expected value.  The expected value is passed as the first element
1106    in an array of strings passed as the userData argument.
1107 */
1108 static void XMLCALL
1109 triplet_end_checker(void *userData, const XML_Char *name)
1110 {
1111     char **elemstr = (char **)userData;
1112     if (strcmp(elemstr[0], name) != 0) {
1113         char buffer[1024];
1114         sprintf(buffer, "unexpected end string: '%s'", name);
1115         fail(buffer);
1116     }
1117 }
1118 
1119 START_TEST(test_return_ns_triplet)
1120 {
1121     char *text =
1122         "<foo:e xmlns:foo='http://expat.sf.net/' bar:a='12'\n"
1123         "       xmlns:bar='http://expat.sf.net/'></foo:e>";
1124     char *elemstr[] = {
1125         "http://expat.sf.net/ e foo",
1126         "http://expat.sf.net/ a bar"
1127     };
1128     XML_SetReturnNSTriplet(parser, XML_TRUE);
1129     XML_SetUserData(parser, elemstr);
1130     XML_SetElementHandler(parser, triplet_start_checker, triplet_end_checker);
1131     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
1132         xml_failure(parser);
1133 }
1134 END_TEST
1135 
1136 static void XMLCALL
1137 overwrite_start_checker(void *userData, const XML_Char *name,
1138                         const XML_Char **atts)
1139 {
1140     CharData *storage = (CharData *) userData;
1141     CharData_AppendString(storage, "start ");
1142     CharData_AppendXMLChars(storage, name, -1);
1143     while (*atts != NULL) {
1144         CharData_AppendString(storage, "\nattribute ");
1145         CharData_AppendXMLChars(storage, *atts, -1);
1146         atts += 2;
1147     }
1148     CharData_AppendString(storage, "\n");
1149 }
1150 
1151 static void XMLCALL
1152 overwrite_end_checker(void *userData, const XML_Char *name)
1153 {
1154     CharData *storage = (CharData *) userData;
1155     CharData_AppendString(storage, "end ");
1156     CharData_AppendXMLChars(storage, name, -1);
1157     CharData_AppendString(storage, "\n");
1158 }
1159 
1160 static void
1161 run_ns_tagname_overwrite_test(char *text, char *result)
1162 {
1163     CharData storage;
1164     CharData_Init(&storage);
1165     XML_SetUserData(parser, &storage);
1166     XML_SetElementHandler(parser,
1167                           overwrite_start_checker, overwrite_end_checker);
1168     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
1169         xml_failure(parser);
1170     CharData_CheckString(&storage, result);
1171 }
1172 
1173 /* Regression test for SF bug #566334. */
1174 START_TEST(test_ns_tagname_overwrite)
1175 {
1176     char *text =
1177         "<n:e xmlns:n='http://xml.libexpat.org/'>\n"
1178         "  <n:f n:attr='foo'/>\n"
1179         "  <n:g n:attr2='bar'/>\n"
1180         "</n:e>";
1181     char *result =
1182         "start http://xml.libexpat.org/ e\n"
1183         "start http://xml.libexpat.org/ f\n"
1184         "attribute http://xml.libexpat.org/ attr\n"
1185         "end http://xml.libexpat.org/ f\n"
1186         "start http://xml.libexpat.org/ g\n"
1187         "attribute http://xml.libexpat.org/ attr2\n"
1188         "end http://xml.libexpat.org/ g\n"
1189         "end http://xml.libexpat.org/ e\n";
1190     run_ns_tagname_overwrite_test(text, result);
1191 }
1192 END_TEST
1193 
1194 /* Regression test for SF bug #566334. */
1195 START_TEST(test_ns_tagname_overwrite_triplet)
1196 {
1197     char *text =
1198         "<n:e xmlns:n='http://xml.libexpat.org/'>\n"
1199         "  <n:f n:attr='foo'/>\n"
1200         "  <n:g n:attr2='bar'/>\n"
1201         "</n:e>";
1202     char *result =
1203         "start http://xml.libexpat.org/ e n\n"
1204         "start http://xml.libexpat.org/ f n\n"
1205         "attribute http://xml.libexpat.org/ attr n\n"
1206         "end http://xml.libexpat.org/ f n\n"
1207         "start http://xml.libexpat.org/ g n\n"
1208         "attribute http://xml.libexpat.org/ attr2 n\n"
1209         "end http://xml.libexpat.org/ g n\n"
1210         "end http://xml.libexpat.org/ e n\n";
1211     XML_SetReturnNSTriplet(parser, XML_TRUE);
1212     run_ns_tagname_overwrite_test(text, result);
1213 }
1214 END_TEST
1215 
1216 
1217 /* Regression test for SF bug #620343. */
1218 static void XMLCALL
1219 start_element_fail(void *userData,
1220                    const XML_Char *name, const XML_Char **atts)
1221 {
1222     /* We should never get here. */
1223     fail("should never reach start_element_fail()");
1224 }
1225 
1226 static void XMLCALL
1227 start_ns_clearing_start_element(void *userData,
1228                                 const XML_Char *prefix,
1229                                 const XML_Char *uri)
1230 {
1231     XML_SetStartElementHandler((XML_Parser) userData, NULL);
1232 }
1233 
1234 START_TEST(test_start_ns_clears_start_element)
1235 {
1236     /* This needs to use separate start/end tags; using the empty tag
1237        syntax doesn't cause the problematic path through Expat to be
1238        taken.
1239     */
1240     char *text = "<e xmlns='http://xml.libexpat.org/'></e>";
1241 
1242     XML_SetStartElementHandler(parser, start_element_fail);
1243     XML_SetStartNamespaceDeclHandler(parser, start_ns_clearing_start_element);
1244     XML_UseParserAsHandlerArg(parser);
1245     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
1246         xml_failure(parser);
1247 }
1248 END_TEST
1249 
1250 /* Regression test for SF bug #616863. */
1251 static int XMLCALL
1252 external_entity_handler(XML_Parser parser,
1253                         const XML_Char *context,
1254                         const XML_Char *base,
1255                         const XML_Char *systemId,
1256                         const XML_Char *publicId)
1257 {
1258     intptr_t callno = 1 + (intptr_t)XML_GetUserData(parser);
1259     char *text;
1260     XML_Parser p2;
1261 
1262     if (callno == 1)
1263         text = ("<!ELEMENT doc (e+)>\n"
1264                 "<!ATTLIST doc xmlns CDATA #IMPLIED>\n"
1265                 "<!ELEMENT e EMPTY>\n");
1266     else
1267         text = ("<?xml version='1.0' encoding='us-ascii'?>"
1268                 "<e/>");
1269 
1270     XML_SetUserData(parser, (void *) callno);
1271     p2 = XML_ExternalEntityParserCreate(parser, context, NULL);
1272     if (XML_Parse(p2, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR) {
1273         xml_failure(p2);
1274         return 0;
1275     }
1276     XML_ParserFree(p2);
1277     return 1;
1278 }
1279 
1280 START_TEST(test_default_ns_from_ext_subset_and_ext_ge)
1281 {
1282     char *text =
1283         "<?xml version='1.0'?>\n"
1284         "<!DOCTYPE doc SYSTEM 'http://xml.libexpat.org/doc.dtd' [\n"
1285         "  <!ENTITY en SYSTEM 'http://xml.libexpat.org/entity.ent'>\n"
1286         "]>\n"
1287         "<doc xmlns='http://xml.libexpat.org/ns1'>\n"
1288         "&en;\n"
1289         "</doc>";
1290 
1291     XML_SetParamEntityParsing(parser, XML_PARAM_ENTITY_PARSING_ALWAYS);
1292     XML_SetExternalEntityRefHandler(parser, external_entity_handler);
1293     /* We actually need to set this handler to tickle this bug. */
1294     XML_SetStartElementHandler(parser, dummy_start_element);
1295     XML_SetUserData(parser, NULL);
1296     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
1297         xml_failure(parser);
1298 }
1299 END_TEST
1300 
1301 /* Regression test #1 for SF bug #673791. */
1302 START_TEST(test_ns_prefix_with_empty_uri_1)
1303 {
1304     char *text =
1305         "<doc xmlns:prefix='http://xml.libexpat.org/'>\n"
1306         "  <e xmlns:prefix=''/>\n"
1307         "</doc>";
1308 
1309     expect_failure(text,
1310                    XML_ERROR_UNDECLARING_PREFIX,
1311                    "Did not report re-setting namespace"
1312                    " URI with prefix to ''.");
1313 }
1314 END_TEST
1315 
1316 /* Regression test #2 for SF bug #673791. */
1317 START_TEST(test_ns_prefix_with_empty_uri_2)
1318 {
1319     char *text =
1320         "<?xml version='1.0'?>\n"
1321         "<docelem xmlns:pre=''/>";
1322 
1323     expect_failure(text,
1324                    XML_ERROR_UNDECLARING_PREFIX,
1325                    "Did not report setting namespace URI with prefix to ''.");
1326 }
1327 END_TEST
1328 
1329 /* Regression test #3 for SF bug #673791. */
1330 START_TEST(test_ns_prefix_with_empty_uri_3)
1331 {
1332     char *text =
1333         "<!DOCTYPE doc [\n"
1334         "  <!ELEMENT doc EMPTY>\n"
1335         "  <!ATTLIST doc\n"
1336         "    xmlns:prefix CDATA ''>\n"
1337         "]>\n"
1338         "<doc/>";
1339 
1340     expect_failure(text,
1341                    XML_ERROR_UNDECLARING_PREFIX,
1342                    "Didn't report attr default setting NS w/ prefix to ''.");
1343 }
1344 END_TEST
1345 
1346 /* Regression test #4 for SF bug #673791. */
1347 START_TEST(test_ns_prefix_with_empty_uri_4)
1348 {
1349     char *text =
1350         "<!DOCTYPE doc [\n"
1351         "  <!ELEMENT prefix:doc EMPTY>\n"
1352         "  <!ATTLIST prefix:doc\n"
1353         "    xmlns:prefix CDATA 'http://xml.libexpat.org/'>\n"
1354         "]>\n"
1355         "<prefix:doc/>";
1356     /* Packaged info expected by the end element handler;
1357        the weird structuring lets us re-use the triplet_end_checker()
1358        function also used for another test. */
1359     char *elemstr[] = {
1360         "http://xml.libexpat.org/ doc prefix"
1361     };
1362     XML_SetReturnNSTriplet(parser, XML_TRUE);
1363     XML_SetUserData(parser, elemstr);
1364     XML_SetEndElementHandler(parser, triplet_end_checker);
1365     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
1366         xml_failure(parser);
1367 }
1368 END_TEST
1369 
1370 START_TEST(test_ns_default_with_empty_uri)
1371 {
1372     char *text =
1373         "<doc xmlns='http://xml.libexpat.org/'>\n"
1374         "  <e xmlns=''/>\n"
1375         "</doc>";
1376     if (XML_Parse(parser, text, strlen(text), XML_TRUE) == XML_STATUS_ERROR)
1377         xml_failure(parser);
1378 }
1379 END_TEST
1380 
1381 /* Regression test for SF bug #692964: two prefixes for one namespace. */
1382 START_TEST(test_ns_duplicate_attrs_diff_prefixes)
1383 {
1384     char *text =
1385         "<doc xmlns:a='http://xml.libexpat.org/a'\n"
1386         "     xmlns:b='http://xml.libexpat.org/a'\n"
1387         "     a:a='v' b:a='v' />";
1388     expect_failure(text,
1389                    XML_ERROR_DUPLICATE_ATTRIBUTE,
1390                    "did not report multiple attributes with same URI+name");
1391 }
1392 END_TEST
1393 
1394 /* Regression test for SF bug #695401: unbound prefix. */
1395 START_TEST(test_ns_unbound_prefix_on_attribute)
1396 {
1397     char *text = "<doc a:attr=''/>";
1398     expect_failure(text,
1399                    XML_ERROR_UNBOUND_PREFIX,
1400                    "did not report unbound prefix on attribute");
1401 }
1402 END_TEST
1403 
1404 /* Regression test for SF bug #695401: unbound prefix. */
1405 START_TEST(test_ns_unbound_prefix_on_element)
1406 {
1407     char *text = "<a:doc/>";
1408     expect_failure(text,
1409                    XML_ERROR_UNBOUND_PREFIX,
1410                    "did not report unbound prefix on element");
1411 }
1412 END_TEST
1413 
1414 static Suite *
1415 make_suite(void)
1416 {
1417     Suite *s = suite_create("basic");
1418     TCase *tc_basic = tcase_create("basic tests");
1419     TCase *tc_namespace = tcase_create("XML namespaces");
1420 
1421     suite_add_tcase(s, tc_basic);
1422     tcase_add_checked_fixture(tc_basic, basic_setup, basic_teardown);
1423     tcase_add_test(tc_basic, test_nul_byte);
1424     tcase_add_test(tc_basic, test_u0000_char);
1425     tcase_add_test(tc_basic, test_bom_utf8);
1426     tcase_add_test(tc_basic, test_bom_utf16_be);
1427     tcase_add_test(tc_basic, test_bom_utf16_le);
1428     tcase_add_test(tc_basic, test_illegal_utf8);
1429     tcase_add_test(tc_basic, test_utf16);
1430     tcase_add_test(tc_basic, test_utf16_le_epilog_newline);
1431     tcase_add_test(tc_basic, test_latin1_umlauts);
1432     /* Regression test for SF bug #491986. */
1433     tcase_add_test(tc_basic, test_danish_latin1);
1434     /* Regression test for SF bug #514281. */
1435     tcase_add_test(tc_basic, test_french_charref_hexidecimal);
1436     tcase_add_test(tc_basic, test_french_charref_decimal);
1437     tcase_add_test(tc_basic, test_french_latin1);
1438     tcase_add_test(tc_basic, test_french_utf8);
1439     tcase_add_test(tc_basic, test_utf8_false_rejection);
1440     tcase_add_test(tc_basic, test_line_number_after_parse);
1441     tcase_add_test(tc_basic, test_column_number_after_parse);
1442     tcase_add_test(tc_basic, test_line_and_column_numbers_inside_handlers);
1443     tcase_add_test(tc_basic, test_line_number_after_error);
1444     tcase_add_test(tc_basic, test_column_number_after_error);
1445     tcase_add_test(tc_basic, test_really_long_lines);
1446     tcase_add_test(tc_basic, test_end_element_events);
1447     tcase_add_test(tc_basic, test_attr_whitespace_normalization);
1448     tcase_add_test(tc_basic, test_xmldecl_misplaced);
1449     tcase_add_test(tc_basic, test_unknown_encoding_internal_entity);
1450     tcase_add_test(tc_basic,
1451                    test_wfc_undeclared_entity_unread_external_subset);
1452     tcase_add_test(tc_basic, test_wfc_undeclared_entity_no_external_subset);
1453     tcase_add_test(tc_basic, test_wfc_undeclared_entity_standalone);
1454     tcase_add_test(tc_basic, test_wfc_undeclared_entity_with_external_subset);
1455     tcase_add_test(tc_basic,
1456                    test_wfc_undeclared_entity_with_external_subset_standalone);
1457     tcase_add_test(tc_basic, test_wfc_no_recursive_entity_refs);
1458     tcase_add_test(tc_basic, test_ext_entity_set_encoding);
1459     tcase_add_test(tc_basic, test_dtd_default_handling);
1460     tcase_add_test(tc_basic, test_empty_ns_without_namespaces);
1461     tcase_add_test(tc_basic, test_ns_in_attribute_default_without_namespaces);
1462     tcase_add_test(tc_basic, test_stop_parser_between_char_data_calls);
1463     tcase_add_test(tc_basic, test_suspend_parser_between_char_data_calls);
1464 
1465     suite_add_tcase(s, tc_namespace);
1466     tcase_add_checked_fixture(tc_namespace,
1467                               namespace_setup, namespace_teardown);
1468     tcase_add_test(tc_namespace, test_return_ns_triplet);
1469     tcase_add_test(tc_namespace, test_ns_tagname_overwrite);
1470     tcase_add_test(tc_namespace, test_ns_tagname_overwrite_triplet);
1471     tcase_add_test(tc_namespace, test_start_ns_clears_start_element);
1472     tcase_add_test(tc_namespace, test_default_ns_from_ext_subset_and_ext_ge);
1473     tcase_add_test(tc_namespace, test_ns_prefix_with_empty_uri_1);
1474     tcase_add_test(tc_namespace, test_ns_prefix_with_empty_uri_2);
1475     tcase_add_test(tc_namespace, test_ns_prefix_with_empty_uri_3);
1476     tcase_add_test(tc_namespace, test_ns_prefix_with_empty_uri_4);
1477     tcase_add_test(tc_namespace, test_ns_default_with_empty_uri);
1478     tcase_add_test(tc_namespace, test_ns_duplicate_attrs_diff_prefixes);
1479     tcase_add_test(tc_namespace, test_ns_unbound_prefix_on_attribute);
1480     tcase_add_test(tc_namespace, test_ns_unbound_prefix_on_element);
1481 
1482     return s;
1483 }
1484 
1485 
1486 int
1487 main(int argc, char *argv[])
1488 {
1489     int i, nf;
1490     int verbosity = CK_NORMAL;
1491     Suite *s = make_suite();
1492     SRunner *sr = srunner_create(s);
1493 
1494     /* run the tests for internal helper functions */
1495     testhelper_is_whitespace_normalized();
1496 
1497     for (i = 1; i < argc; ++i) {
1498         char *opt = argv[i];
1499         if (strcmp(opt, "-v") == 0 || strcmp(opt, "--verbose") == 0)
1500             verbosity = CK_VERBOSE;
1501         else if (strcmp(opt, "-q") == 0 || strcmp(opt, "--quiet") == 0)
1502             verbosity = CK_SILENT;
1503         else {
1504             fprintf(stderr, "runtests: unknown option '%s'\n", opt);
1505             return 2;
1506         }
1507     }
1508     if (verbosity != CK_SILENT)
1509         printf("Expat version: %s\n", XML_ExpatVersion());
1510     srunner_run_all(sr, verbosity);
1511     nf = srunner_ntests_failed(sr);
1512     srunner_free(sr);
1513 
1514     return (nf == 0) ? EXIT_SUCCESS : EXIT_FAILURE;
1515 }
1516