cheng/libexpat
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
63ca4b129f
libexpat/expat/tests/runtests.c
Fred L. Drake, Jr. 4582daec8f Fix SF bug #575168: "Missing events for end-element".
2002-06-28 23:04:49 +00:00

693 lines
20 KiB
C
Raw Blame History

#include <assert.h>
#include <check.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include "expat.h"
#include "chardata.h"
static XML_Parser parser;
static void
basic_setup(void)
{
parser = XML_ParserCreate(NULL);
if (parser == NULL)
fail("Parser not created.");
}
static void
basic_teardown(void)
{
if (parser != NULL)
XML_ParserFree(parser);
}
/* Generate a failure using the parser state to create an error message;
this should be used when the parser reports an error we weren't
expecting.
*/
static void
_xml_failure(XML_Parser parser, const char *file, int line)
{
char buffer[1024];
sprintf(buffer,
"\n %s (line %d, offset %d)\n reported from %s, line %d",
XML_ErrorString(XML_GetErrorCode(parser)),
XML_GetCurrentLineNumber(parser),
XML_GetCurrentColumnNumber(parser),
file, line);
fail(buffer);
}
#define xml_failure(parser) _xml_failure((parser), __FILE__, __LINE__)
/*
* Character & encoding tests.
*/
START_TEST(test_nul_byte)
{
char text[] = "<doc>\0</doc>";
/* test that a NUL byte (in US-ASCII data) is an error */
if (XML_Parse(parser, text, sizeof(text) - 1, 1))
fail("Parser did not report error on NUL-byte.");
if (XML_GetErrorCode(parser) != XML_ERROR_INVALID_TOKEN)
xml_failure(parser);
}
END_TEST
START_TEST(test_u0000_char)
{
char *text = "<doc>&#0;</doc>";
/* test that a NUL byte (in US-ASCII data) is an error */
if (XML_Parse(parser, text, strlen(text), 1))
fail("Parser did not report error on NUL-byte.");
if (XML_GetErrorCode(parser) != XML_ERROR_BAD_CHAR_REF)
xml_failure(parser);
}
END_TEST
START_TEST(test_bom_utf8)
{
/* This test is really just making sure we don't core on a UTF-8 BOM. */
char *text = "\357\273\277<e/>";
if (!XML_Parse(parser, text, strlen(text), 1))
xml_failure(parser);
}
END_TEST
START_TEST(test_bom_utf16_be)
{
char text[] = "\376\377\0<\0e\0/\0>";
if (!XML_Parse(parser, text, sizeof(text) - 1, 1))
xml_failure(parser);
}
END_TEST
START_TEST(test_bom_utf16_le)
{
char text[] = "\377\376<\0e\0/\0>\0";
if (!XML_Parse(parser, text, sizeof(text) - 1, 1))
xml_failure(parser);
}
END_TEST
static void
accumulate_characters(void *userData, const XML_Char *s, int len)
{
CharData_AppendXMLChars((CharData *)userData, s, len);
}
static void
accumulate_attribute(void *userData, const XML_Char *name,
const XML_Char **atts)
{
CharData *storage = (CharData *)userData;
if (storage->count < 0 && atts != NULL && atts[0] != NULL) {
/* "accumulate" the value of the first attribute we see */
CharData_AppendXMLChars(storage, atts[1], -1);
}
}
static void
run_character_check(XML_Char *text, XML_Char *expected)
{
CharData storage;
CharData_Init(&storage);
XML_SetUserData(parser, &storage);
XML_SetCharacterDataHandler(parser, accumulate_characters);
if (!XML_Parse(parser, text, strlen(text), 1))
xml_failure(parser);
CharData_CheckXMLChars(&storage, expected);
}
static void
run_attribute_check(XML_Char *text, XML_Char *expected)
{
CharData storage;
CharData_Init(&storage);
XML_SetUserData(parser, &storage);
XML_SetStartElementHandler(parser, accumulate_attribute);
if (!XML_Parse(parser, text, strlen(text), 1))
xml_failure(parser);
CharData_CheckXMLChars(&storage, expected);
}
/* Regression test for SF bug #491986. */
START_TEST(test_danish_latin1)
{
char *text =
"<?xml version='1.0' encoding='iso-8859-1'?>\n"
"<e>J<>rgen <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD></e>";
run_character_check(text,
"J\xC3\xB8rgen \xC3\xA6\xC3\xB8\xC3\xA5\xC3\x86\xC3\x98\xC3\x85");
}
END_TEST
/* End regression test for SF bug #491986. */
/* Regression test for SF bug #514281. */
START_TEST(test_french_charref_hexidecimal)
{
char *text =
"<?xml version='1.0' encoding='iso-8859-1'?>\n"
"<doc>&#xE9;&#xE8;&#xE0;&#xE7;&#xEA;&#xC8;</doc>";
run_character_check(text,
"\xC3\xA9\xC3\xA8\xC3\xA0\xC3\xA7\xC3\xAA\xC3\x88");
}
END_TEST
START_TEST(test_french_charref_decimal)
{
char *text =
"<?xml version='1.0' encoding='iso-8859-1'?>\n"
"<doc>&#233;&#232;&#224;&#231;&#234;&#200;</doc>";
run_character_check(text,
"\xC3\xA9\xC3\xA8\xC3\xA0\xC3\xA7\xC3\xAA\xC3\x88");
}
END_TEST
START_TEST(test_french_latin1)
{
char *text =
"<?xml version='1.0' encoding='iso-8859-1'?>\n"
"<doc>\xE9\xE8\xE0\xE7\xEa\xC8</doc>";
run_character_check(text,
"\xC3\xA9\xC3\xA8\xC3\xA0\xC3\xA7\xC3\xAA\xC3\x88");
}
END_TEST
START_TEST(test_french_utf8)
{
char *text =
"<?xml version='1.0' encoding='utf-8'?>\n"
"<doc>\xC3\xA9</doc>";
run_character_check(text, "\xC3\xA9");
}
END_TEST
/* End regression test for SF bug #514281. */
/* Regression test for SF bug #477667.
This test assures that any 8-bit character followed by a 7-bit
character will not be mistakenly interpreted as a valid UTF-8
sequence.
*/
START_TEST(test_illegal_utf8)
{
char text[100];
int i;
for (i = 128; i <= 255; ++i) {
sprintf(text, "<e>%ccd</e>", i);
if (XML_Parse(parser, text, strlen(text), 1)) {
sprintf(text,
"expected token error for '%c' (ordinal %d) in UTF-8 text",
i, i);
fail(text);
}
else if (XML_GetErrorCode(parser) != XML_ERROR_INVALID_TOKEN)
xml_failure(parser);
/* Reset the parser since we use the same parser repeatedly. */
XML_ParserReset(parser, NULL);
}
}
END_TEST
START_TEST(test_utf16)
{
/* <?xml version="1.0" encoding="UTF-16"?>
<doc a='123'>some text</doc>
*/
char text[] =
"\000<\000?\000x\000m\000\154\000 \000v\000e\000r\000s\000i\000o"
"\000n\000=\000'\0001\000.\000\060\000'\000 \000e\000n\000c\000o"
"\000d\000i\000n\000g\000=\000'\000U\000T\000F\000-\0001\000\066"
"\000'\000?\000>\000\n"
"\000<\000d\000o\000c\000 \000a\000=\000'\0001\0002\0003\000'"
"\000>\000s\000o\000m\000e\000 \000t\000e\000x\000t\000<\000/"
"\000d\000o\000c\000>";
if (!XML_Parse(parser, text, sizeof(text) - 1, 1))
xml_failure(parser);
}
END_TEST
/* Regression test for SF bug #481609. */
START_TEST(test_latin1_umlauts)
{
char *text =
"<?xml version='1.0' encoding='iso-8859-1'?>\n"
"<e a='<27> <20> <20> &#228; &#246; &#252; &#x00E4; &#x0F6; &#xFC;'\n"
" ><3E> <20> <20> &#228; &#246; &#252; &#x00E4; &#x0F6; &#xFC;</e>";
char *utf8 =
"\xC3\xA4 \xC3\xB6 \xC3\xBC "
"\xC3\xA4 \xC3\xB6 \xC3\xBC "
"\xC3\xA4 \xC3\xB6 \xC3\xBC";
run_character_check(text, utf8);
XML_ParserReset(parser, NULL);
run_attribute_check(text, utf8);
}
END_TEST
/* Regression test for SF bug #422239 (maybe).
It's not clear that this reproduces enough of the context
of the reported bug.
*/
START_TEST(test_line_count)
{
char *text =
"<e>\n"
" <e/>\n"
"</e>";
int lineno;
if (!XML_Parse(parser, text, strlen(text), 1))
xml_failure(parser);
lineno = XML_GetCurrentLineNumber(parser);
if (lineno != 3) {
char buffer[100];
sprintf(buffer, "expected 3 lines, saw %d", lineno);
fail(buffer);
}
}
END_TEST
/*
* Element event tests.
*/
static void
end_element_event_handler(void *userData, const XML_Char *name)
{
CharData *storage = (CharData *) userData;
CharData_AppendString(storage, "/");
CharData_AppendXMLChars(storage, name, -1);
}
START_TEST(test_end_element_events)
{
char *text = "<a><b><c/></b><d><f/></d></a>";
char *expected = "/c/b/f/d/a";
CharData storage;
CharData_Init(&storage);
XML_SetUserData(parser, &storage);
XML_SetEndElementHandler(parser, end_element_event_handler);
if (!XML_Parse(parser, text, strlen(text), 1))
xml_failure(parser);
CharData_CheckString(&storage, expected);
}
END_TEST
/*
* Attribute tests.
*/
/* Helpers used by the following test; this checks any "attr" and "refs"
attributes to make sure whitespace has been normalized.
Return true if whitespace has been normalized in a string, using
the rules for attribute value normalization. The 'is_cdata' flag
is needed since CDATA attributes don't need to have multiple
whitespace characters collapsed to a single space, while other
attribute data types do. (Section 3.3.3 of the recommendation.)
*/
static int
is_whitespace_normalized(const XML_Char *s, int is_cdata)
{
int blanks = 0;
int at_start = 1;
while (*s) {
if (*s == ' ')
++blanks;
else if (*s == '\t' || *s == '\n' || *s == '\r')
return 0;
else {
if (at_start) {
at_start = 0;
if (blanks && !is_cdata)
/* illegal leading blanks */
return 0;
}
else if (blanks > 1 && !is_cdata)
return 0;
blanks = 0;
}
++s;
}
if (blanks && !is_cdata)
return 0;
return 1;
}
/* Check the attribute whitespace checker: */
static void
testhelper_is_whitespace_normalized(void)
{
assert(is_whitespace_normalized("abc", 0));
assert(is_whitespace_normalized("abc", 1));
assert(is_whitespace_normalized("abc def ghi", 0));
assert(is_whitespace_normalized("abc def ghi", 1));
assert(!is_whitespace_normalized(" abc def ghi", 0));
assert(is_whitespace_normalized(" abc def ghi", 1));
assert(!is_whitespace_normalized("abc def ghi", 0));
assert(is_whitespace_normalized("abc def ghi", 1));
assert(!is_whitespace_normalized("abc def ghi ", 0));
assert(is_whitespace_normalized("abc def ghi ", 1));
assert(!is_whitespace_normalized(" ", 0));
assert(is_whitespace_normalized(" ", 1));
assert(!is_whitespace_normalized("\t", 0));
assert(!is_whitespace_normalized("\t", 1));
assert(!is_whitespace_normalized("\n", 0));
assert(!is_whitespace_normalized("\n", 1));
assert(!is_whitespace_normalized("\r", 0));
assert(!is_whitespace_normalized("\r", 1));
assert(!is_whitespace_normalized("abc\t def", 1));
}
static void
check_attr_contains_normalized_whitespace(void *userdata,
const XML_Char *name,
const XML_Char **atts)
{
int i;
for (i = 0; atts[i] != NULL; i += 2) {
const XML_Char *attrname = atts[i];
const XML_Char *value = atts[i + 1];
if (strcmp("attr", attrname) == 0
|| strcmp("ents", attrname) == 0
|| strcmp("refs", attrname) == 0) {
if (!is_whitespace_normalized(value, 0)) {
char buffer[256];
sprintf(buffer, "attribute value not normalized: %s='%s'",
attrname, value);
fail(buffer);
}
}
}
}
START_TEST(test_attr_whitespace_normalization)
{
char *text =
"<!DOCTYPE doc [\n"
" <!ATTLIST doc\n"
" attr NMTOKENS #REQUIRED\n"
" ents ENTITIES #REQUIRED\n"
" refs IDREFS #REQUIRED>\n"
"]>\n"
"<doc attr=' a b c\t\td\te\t' refs=' id-1 \t id-2\t\t' \n"
" ents=' ent-1 \t\r\n"
" ent-2 ' >\n"
" <e id='id-1'/>\n"
" <e id='id-2'/>\n"
"</doc>";
XML_SetStartElementHandler(parser,
check_attr_contains_normalized_whitespace);
if (!XML_Parse(parser, text, strlen(text), 1))
xml_failure(parser);
}
END_TEST
/*
* XML declaration tests.
*/
START_TEST(test_xmldecl_misplaced)
{
char *text =
"\n"
"<?xml version='1.0'?>\n"
"<a>&eee;</a>";
if (!XML_Parse(parser, text, strlen(text), 1)) {
if (XML_GetErrorCode(parser) != XML_ERROR_MISPLACED_XML_PI)
xml_failure(parser);
}
else {
fail("expected XML_ERROR_MISPLACED_XML_PI with misplaced XML decl");
}
}
END_TEST
/*
* Namespaces tests.
*/
static void
namespace_setup(void)
{
parser = XML_ParserCreateNS(NULL, ' ');
if (parser == NULL)
fail("Parser not created.");
}
static void
namespace_teardown(void)
{
basic_teardown();
}
/* Check that an element name and attribute name match the expected values.
The expected values are passed as an array reference of string pointers
provided as the userData argument; the first is the expected
element name, and the second is the expected attribute name.
*/
static void
triplet_start_checker(void *userData, const XML_Char *name,
const XML_Char **atts)
{
char **elemstr = (char **)userData;
char buffer[1024];
if (strcmp(elemstr[0], name) != 0) {
sprintf(buffer, "unexpected start string: '%s'", name);
fail(buffer);
}
if (strcmp(elemstr[1], atts[0]) != 0) {
sprintf(buffer, "unexpected attribute string: '%s'", atts[0]);
fail(buffer);
}
}
/* Check that the element name passed to the end-element handler matches
the expected value. The expected value is passed as the first element
in an array of strings passed as the userData argument.
*/
static void
triplet_end_checker(void *userData, const XML_Char *name)
{
char **elemstr = (char **)userData;
if (strcmp(elemstr[0], name) != 0) {
char buffer[1024];
sprintf(buffer, "unexpected end string: '%s'", name);
fail(buffer);
}
}
START_TEST(test_return_ns_triplet)
{
char *text =
"<foo:e xmlns:foo='http://expat.sf.net/' bar:a='12'\n"
" xmlns:bar='http://expat.sf.net/'></foo:e>";
char *elemstr[] = {
"http://expat.sf.net/ e foo",
"http://expat.sf.net/ a bar"
};
XML_SetReturnNSTriplet(parser, 1);
XML_SetUserData(parser, elemstr);
XML_SetElementHandler(parser, triplet_start_checker, triplet_end_checker);
if (!XML_Parse(parser, text, strlen(text), 1))
xml_failure(parser);
}
END_TEST
static void
overwrite_start_checker(void *userData, const XML_Char *name,
const XML_Char **atts)
{
CharData *storage = (CharData *) userData;
CharData_AppendString(storage, "start ");
CharData_AppendXMLChars(storage, name, -1);
while (*atts != NULL) {
CharData_AppendString(storage, "\nattribute ");
CharData_AppendXMLChars(storage, *atts, -1);
atts += 2;
}
CharData_AppendString(storage, "\n");
}
static void
overwrite_end_checker(void *userData, const XML_Char *name)
{
CharData *storage = (CharData *) userData;
CharData_AppendString(storage, "end ");
CharData_AppendXMLChars(storage, name, -1);
CharData_AppendString(storage, "\n");
}
static void
run_ns_tagname_overwrite_test(char *text, char *result)
{
CharData storage;
CharData_Init(&storage);
XML_SetUserData(parser, &storage);
XML_SetElementHandler(parser,
overwrite_start_checker, overwrite_end_checker);
if (!XML_Parse(parser, text, strlen(text), 1))
xml_failure(parser);
CharData_CheckString(&storage, result);
}
/* Regression test for SF bug #566334. */
START_TEST(test_ns_tagname_overwrite)
{
char *text =
"<n:e xmlns:n='http://xml.libexpat.org/'>\n"
" <n:f n:attr='foo'/>\n"
" <n:g n:attr2='bar'/>\n"
"</n:e>";
char *result =
"start http://xml.libexpat.org/ e\n"
"start http://xml.libexpat.org/ f\n"
"attribute http://xml.libexpat.org/ attr\n"
"end http://xml.libexpat.org/ f\n"
"start http://xml.libexpat.org/ g\n"
"attribute http://xml.libexpat.org/ attr2\n"
"end http://xml.libexpat.org/ g\n"
"end http://xml.libexpat.org/ e\n";
run_ns_tagname_overwrite_test(text, result);
}
END_TEST
/* Regression test for SF bug #566334. */
START_TEST(test_ns_tagname_overwrite_triplet)
{
char *text =
"<n:e xmlns:n='http://xml.libexpat.org/'>\n"
" <n:f n:attr='foo'/>\n"
" <n:g n:attr2='bar'/>\n"
"</n:e>";
char *result =
"start http://xml.libexpat.org/ e n\n"
"start http://xml.libexpat.org/ f n\n"
"attribute http://xml.libexpat.org/ attr n\n"
"end http://xml.libexpat.org/ f n\n"
"start http://xml.libexpat.org/ g n\n"
"attribute http://xml.libexpat.org/ attr2 n\n"
"end http://xml.libexpat.org/ g n\n"
"end http://xml.libexpat.org/ e n\n";
XML_SetReturnNSTriplet(parser, 1);
run_ns_tagname_overwrite_test(text, result);
}
END_TEST
static Suite *
make_basic_suite(void)
{
Suite *s = suite_create("basic");
TCase *tc_chars = tcase_create("character tests");
TCase *tc_attrs = tcase_create("attributes");
TCase *tc_xmldecl = tcase_create("XML declaration");
TCase *tc_namespace = tcase_create("XML namespaces");
TCase *tc_elements = tcase_create("element events");
suite_add_tcase(s, tc_chars);
tcase_add_checked_fixture(tc_chars, basic_setup, basic_teardown);
tcase_add_test(tc_chars, test_nul_byte);
tcase_add_test(tc_chars, test_u0000_char);
tcase_add_test(tc_chars, test_bom_utf8);
tcase_add_test(tc_chars, test_bom_utf16_be);
tcase_add_test(tc_chars, test_bom_utf16_le);
tcase_add_test(tc_chars, test_illegal_utf8);
tcase_add_test(tc_chars, test_utf16);
tcase_add_test(tc_chars, test_latin1_umlauts);
/* Regression test for SF bug #491986. */
tcase_add_test(tc_chars, test_danish_latin1);
/* Regression test for SF bug #514281. */
tcase_add_test(tc_chars, test_french_charref_hexidecimal);
tcase_add_test(tc_chars, test_french_charref_decimal);
tcase_add_test(tc_chars, test_french_latin1);
tcase_add_test(tc_chars, test_french_utf8);
tcase_add_test(tc_chars, test_line_count);
suite_add_tcase(s, tc_elements);
tcase_add_checked_fixture(tc_elements, basic_setup, basic_teardown);
tcase_add_test(tc_elements, test_end_element_events);
suite_add_tcase(s, tc_attrs);
tcase_add_checked_fixture(tc_attrs, basic_setup, basic_teardown);
tcase_add_test(tc_attrs, test_attr_whitespace_normalization);
suite_add_tcase(s, tc_xmldecl);
tcase_add_checked_fixture(tc_xmldecl, basic_setup, basic_teardown);
tcase_add_test(tc_xmldecl, test_xmldecl_misplaced);
suite_add_tcase(s, tc_namespace);
tcase_add_checked_fixture(tc_namespace,
namespace_setup, namespace_teardown);
tcase_add_test(tc_namespace, test_return_ns_triplet);
tcase_add_test(tc_namespace, test_ns_tagname_overwrite);
tcase_add_test(tc_namespace, test_ns_tagname_overwrite_triplet);
return s;
}
int
main(int argc, char *argv[])
{
int i, nf;
int forking = 0, forking_set = 0;
int verbosity = CK_NORMAL;
Suite *s = make_basic_suite();
SRunner *sr = srunner_create(s);
/* run the tests for internal helper functions */
testhelper_is_whitespace_normalized();
for (i = 1; i < argc; ++i) {
char *opt = argv[i];
if (strcmp(opt, "-v") == 0 || strcmp(opt, "--verbose") == 0)
verbosity = CK_VERBOSE;
else if (strcmp(opt, "-q") == 0 || strcmp(opt, "--quiet") == 0)
verbosity = CK_SILENT;
else if (strcmp(opt, "-f") == 0 || strcmp(opt, "--fork") == 0) {
forking = 1;
forking_set = 1;
}
else if (strcmp(opt, "-n") == 0 || strcmp(opt, "--no-fork") == 0) {
forking = 0;
forking_set = 1;
}
else {
fprintf(stderr, "runtests: unknown option '%s'\n", opt);
return 2;
}
}
if (forking_set)
srunner_set_fork_status(sr, forking ? CK_FORK : CK_NOFORK);
srunner_run_all(sr, verbosity);
nf = srunner_ntests_failed(sr);
srunner_free(sr);
suite_free(s);
return (nf == 0) ? EXIT_SUCCESS : EXIT_FAILURE;
}
Reference in New Issue View Git Blame Copy Permalink