1 /* 2 * runtest.c: C program to run libxml2 regression tests without 3 * requiring make or Python, and reducing platform dependancies 4 * to a strict minimum. 5 * 6 * To compile on Unixes: 7 * cc -o runtest `xml2-config --cflags` runtest.c `xml2-config --libs` -lpthread 8 * 9 * See Copyright for the status of this software. 10 * 11 * daniel (at) veillard.com 12 */ 13 14 #ifdef HAVE_CONFIG_H 15 #include "libxml.h" 16 #else 17 #include <stdio.h> 18 #endif 19 20 #if !defined(_WIN32) || defined(__CYGWIN__) 21 #include <unistd.h> 22 #endif 23 #include <string.h> 24 #include <sys/types.h> 25 #include <sys/stat.h> 26 #include <fcntl.h> 27 28 #include <libxml/parser.h> 29 #include <libxml/tree.h> 30 #include <libxml/uri.h> 31 32 #ifdef LIBXML_OUTPUT_ENABLED 33 #ifdef LIBXML_READER_ENABLED 34 #include <libxml/xmlreader.h> 35 #endif 36 37 #ifdef LIBXML_XINCLUDE_ENABLED 38 #include <libxml/xinclude.h> 39 #endif 40 41 #ifdef LIBXML_XPATH_ENABLED 42 #include <libxml/xpath.h> 43 #include <libxml/xpathInternals.h> 44 #ifdef LIBXML_XPTR_ENABLED 45 #include <libxml/xpointer.h> 46 #endif 47 #endif 48 49 #ifdef LIBXML_SCHEMAS_ENABLED 50 #include <libxml/relaxng.h> 51 #include <libxml/xmlschemas.h> 52 #include <libxml/xmlschemastypes.h> 53 #endif 54 55 #ifdef LIBXML_PATTERN_ENABLED 56 #include <libxml/pattern.h> 57 #endif 58 59 #ifdef LIBXML_C14N_ENABLED 60 #include <libxml/c14n.h> 61 #endif 62 63 #ifdef LIBXML_HTML_ENABLED 64 #include <libxml/HTMLparser.h> 65 #include <libxml/HTMLtree.h> 66 67 /* 68 * pseudo flag for the unification of HTML and XML tests 69 */ 70 #define XML_PARSE_HTML 1 << 24 71 #endif 72 73 #if defined(LIBXML_THREAD_ENABLED) && defined(LIBXML_CATALOG_ENABLED) 74 #include <libxml/globals.h> 75 #include <libxml/threads.h> 76 #include <libxml/parser.h> 77 #include <libxml/catalog.h> 78 #include <string.h> 79 #endif 80 81 /* 82 * O_BINARY is just for Windows compatibility - if it isn't defined 83 * on this system, avoid any compilation error 84 */ 85 #ifdef O_BINARY 86 #define RD_FLAGS O_RDONLY | O_BINARY 87 #else 88 #define RD_FLAGS O_RDONLY 89 #endif 90 91 typedef int (*functest) (const char *filename, const char *result, 92 const char *error, int options); 93 94 typedef struct testDesc testDesc; 95 typedef testDesc *testDescPtr; 96 struct testDesc { 97 const char *desc; /* descripton of the test */ 98 functest func; /* function implementing the test */ 99 const char *in; /* glob to path for input files */ 100 const char *out; /* output directory */ 101 const char *suffix;/* suffix for output files */ 102 const char *err; /* suffix for error output files */ 103 int options; /* parser options for the test */ 104 }; 105 106 static int checkTestFile(const char *filename); 107 108 #if defined(_WIN32) && !defined(__CYGWIN__) 109 110 #include <windows.h> 111 #include <io.h> 112 113 typedef struct 114 { 115 size_t gl_pathc; /* Count of paths matched so far */ 116 char **gl_pathv; /* List of matched pathnames. */ 117 size_t gl_offs; /* Slots to reserve in 'gl_pathv'. */ 118 } glob_t; 119 120 #define GLOB_DOOFFS 0 121 static int glob(const char *pattern, int flags, 122 int errfunc(const char *epath, int eerrno), 123 glob_t *pglob) { 124 glob_t *ret; 125 WIN32_FIND_DATA FindFileData; 126 HANDLE hFind; 127 unsigned int nb_paths = 0; 128 char directory[500]; 129 int len; 130 131 if ((pattern == NULL) || (pglob == NULL)) return(-1); 132 133 strncpy(directory, pattern, 499); 134 for (len = strlen(directory);len >= 0;len--) { 135 if (directory[len] == '/') { 136 len++; 137 directory[len] = 0; 138 break; 139 } 140 } 141 if (len <= 0) 142 len = 0; 143 144 145 ret = pglob; 146 memset(ret, 0, sizeof(glob_t)); 147 148 hFind = FindFirstFileA(pattern, &FindFileData); 149 if (hFind == INVALID_HANDLE_VALUE) 150 return(0); 151 nb_paths = 20; 152 ret->gl_pathv = (char **) malloc(nb_paths * sizeof(char *)); 153 if (ret->gl_pathv == NULL) { 154 FindClose(hFind); 155 return(-1); 156 } 157 strncpy(directory + len, FindFileData.cFileName, 499 - len); 158 ret->gl_pathv[ret->gl_pathc] = strdup(directory); 159 if (ret->gl_pathv[ret->gl_pathc] == NULL) 160 goto done; 161 ret->gl_pathc++; 162 while(FindNextFileA(hFind, &FindFileData)) { 163 if (FindFileData.cFileName[0] == '.') 164 continue; 165 if (ret->gl_pathc + 2 > nb_paths) { 166 char **tmp = realloc(ret->gl_pathv, nb_paths * 2 * sizeof(char *)); 167 if (tmp == NULL) 168 break; 169 ret->gl_pathv = tmp; 170 nb_paths *= 2; 171 } 172 strncpy(directory + len, FindFileData.cFileName, 499 - len); 173 ret->gl_pathv[ret->gl_pathc] = strdup(directory); 174 if (ret->gl_pathv[ret->gl_pathc] == NULL) 175 break; 176 ret->gl_pathc++; 177 } 178 ret->gl_pathv[ret->gl_pathc] = NULL; 179 180 done: 181 FindClose(hFind); 182 return(0); 183 } 184 185 186 187 static void globfree(glob_t *pglob) { 188 unsigned int i; 189 if (pglob == NULL) 190 return; 191 192 for (i = 0;i < pglob->gl_pathc;i++) { 193 if (pglob->gl_pathv[i] != NULL) 194 free(pglob->gl_pathv[i]); 195 } 196 } 197 #define vsnprintf _vsnprintf 198 #define snprintf _snprintf 199 #else 200 #include <glob.h> 201 #endif 202 203 /************************************************************************ 204 * * 205 * Libxml2 specific routines * 206 * * 207 ************************************************************************/ 208 209 static int nb_tests = 0; 210 static int nb_errors = 0; 211 static int nb_leaks = 0; 212 static int extraMemoryFromResolver = 0; 213 214 static int 215 fatalError(void) { 216 fprintf(stderr, "Exitting tests on fatal error\n"); 217 exit(1); 218 } 219 220 /* 221 * We need to trap calls to the resolver to not account memory for the catalog 222 * which is shared to the current running test. We also don't want to have 223 * network downloads modifying tests. 224 */ 225 static xmlParserInputPtr 226 testExternalEntityLoader(const char *URL, const char *ID, 227 xmlParserCtxtPtr ctxt) { 228 xmlParserInputPtr ret; 229 230 if (checkTestFile(URL)) { 231 ret = xmlNoNetExternalEntityLoader(URL, ID, ctxt); 232 } else { 233 int memused = xmlMemUsed(); 234 ret = xmlNoNetExternalEntityLoader(URL, ID, ctxt); 235 extraMemoryFromResolver += xmlMemUsed() - memused; 236 } 237 238 return(ret); 239 } 240 241 /* 242 * Trapping the error messages at the generic level to grab the equivalent of 243 * stderr messages on CLI tools. 244 */ 245 static char testErrors[32769]; 246 static int testErrorsSize = 0; 247 248 static void XMLCDECL 249 testErrorHandler(void *ctx ATTRIBUTE_UNUSED, const char *msg, ...) { 250 va_list args; 251 int res; 252 253 if (testErrorsSize >= 32768) 254 return; 255 va_start(args, msg); 256 res = vsnprintf(&testErrors[testErrorsSize], 257 32768 - testErrorsSize, 258 msg, args); 259 va_end(args); 260 if (testErrorsSize + res >= 32768) { 261 /* buffer is full */ 262 testErrorsSize = 32768; 263 testErrors[testErrorsSize] = 0; 264 } else { 265 testErrorsSize += res; 266 } 267 testErrors[testErrorsSize] = 0; 268 } 269 270 static void XMLCDECL 271 channel(void *ctx ATTRIBUTE_UNUSED, const char *msg, ...) { 272 va_list args; 273 int res; 274 275 if (testErrorsSize >= 32768) 276 return; 277 va_start(args, msg); 278 res = vsnprintf(&testErrors[testErrorsSize], 279 32768 - testErrorsSize, 280 msg, args); 281 va_end(args); 282 if (testErrorsSize + res >= 32768) { 283 /* buffer is full */ 284 testErrorsSize = 32768; 285 testErrors[testErrorsSize] = 0; 286 } else { 287 testErrorsSize += res; 288 } 289 testErrors[testErrorsSize] = 0; 290 } 291 292 /** 293 * xmlParserPrintFileContext: 294 * @input: an xmlParserInputPtr input 295 * 296 * Displays current context within the input content for error tracking 297 */ 298 299 static void 300 xmlParserPrintFileContextInternal(xmlParserInputPtr input , 301 xmlGenericErrorFunc chanl, void *data ) { 302 const xmlChar *cur, *base; 303 unsigned int n, col; /* GCC warns if signed, because compared with sizeof() */ 304 xmlChar content[81]; /* space for 80 chars + line terminator */ 305 xmlChar *ctnt; 306 307 if (input == NULL) return; 308 cur = input->cur; 309 base = input->base; 310 /* skip backwards over any end-of-lines */ 311 while ((cur > base) && ((*(cur) == '\n') || (*(cur) == '\r'))) { 312 cur--; 313 } 314 n = 0; 315 /* search backwards for beginning-of-line (to max buff size) */ 316 while ((n++ < (sizeof(content)-1)) && (cur > base) && 317 (*(cur) != '\n') && (*(cur) != '\r')) 318 cur--; 319 if ((*(cur) == '\n') || (*(cur) == '\r')) cur++; 320 /* calculate the error position in terms of the current position */ 321 col = input->cur - cur; 322 /* search forward for end-of-line (to max buff size) */ 323 n = 0; 324 ctnt = content; 325 /* copy selected text to our buffer */ 326 while ((*cur != 0) && (*(cur) != '\n') && 327 (*(cur) != '\r') && (n < sizeof(content)-1)) { 328 *ctnt++ = *cur++; 329 n++; 330 } 331 *ctnt = 0; 332 /* print out the selected text */ 333 chanl(data ,"%s\n", content); 334 /* create blank line with problem pointer */ 335 n = 0; 336 ctnt = content; 337 /* (leave buffer space for pointer + line terminator) */ 338 while ((n<col) && (n++ < sizeof(content)-2) && (*ctnt != 0)) { 339 if (*(ctnt) != '\t') 340 *(ctnt) = ' '; 341 ctnt++; 342 } 343 *ctnt++ = '^'; 344 *ctnt = 0; 345 chanl(data ,"%s\n", content); 346 } 347 348 static void 349 testStructuredErrorHandler(void *ctx ATTRIBUTE_UNUSED, xmlErrorPtr err) { 350 char *file = NULL; 351 int line = 0; 352 int code = -1; 353 int domain; 354 void *data = NULL; 355 const char *str; 356 const xmlChar *name = NULL; 357 xmlNodePtr node; 358 xmlErrorLevel level; 359 xmlParserInputPtr input = NULL; 360 xmlParserInputPtr cur = NULL; 361 xmlParserCtxtPtr ctxt = NULL; 362 363 if (err == NULL) 364 return; 365 366 file = err->file; 367 line = err->line; 368 code = err->code; 369 domain = err->domain; 370 level = err->level; 371 node = err->node; 372 if ((domain == XML_FROM_PARSER) || (domain == XML_FROM_HTML) || 373 (domain == XML_FROM_DTD) || (domain == XML_FROM_NAMESPACE) || 374 (domain == XML_FROM_IO) || (domain == XML_FROM_VALID)) { 375 ctxt = err->ctxt; 376 } 377 str = err->message; 378 379 if (code == XML_ERR_OK) 380 return; 381 382 if ((node != NULL) && (node->type == XML_ELEMENT_NODE)) 383 name = node->name; 384 385 /* 386 * Maintain the compatibility with the legacy error handling 387 */ 388 if (ctxt != NULL) { 389 input = ctxt->input; 390 if ((input != NULL) && (input->filename == NULL) && 391 (ctxt->inputNr > 1)) { 392 cur = input; 393 input = ctxt->inputTab[ctxt->inputNr - 2]; 394 } 395 if (input != NULL) { 396 if (input->filename) 397 channel(data, "%s:%d: ", input->filename, input->line); 398 else if ((line != 0) && (domain == XML_FROM_PARSER)) 399 channel(data, "Entity: line %d: ", input->line); 400 } 401 } else { 402 if (file != NULL) 403 channel(data, "%s:%d: ", file, line); 404 else if ((line != 0) && (domain == XML_FROM_PARSER)) 405 channel(data, "Entity: line %d: ", line); 406 } 407 if (name != NULL) { 408 channel(data, "element %s: ", name); 409 } 410 if (code == XML_ERR_OK) 411 return; 412 switch (domain) { 413 case XML_FROM_PARSER: 414 channel(data, "parser "); 415 break; 416 case XML_FROM_NAMESPACE: 417 channel(data, "namespace "); 418 break; 419 case XML_FROM_DTD: 420 case XML_FROM_VALID: 421 channel(data, "validity "); 422 break; 423 case XML_FROM_HTML: 424 channel(data, "HTML parser "); 425 break; 426 case XML_FROM_MEMORY: 427 channel(data, "memory "); 428 break; 429 case XML_FROM_OUTPUT: 430 channel(data, "output "); 431 break; 432 case XML_FROM_IO: 433 channel(data, "I/O "); 434 break; 435 case XML_FROM_XINCLUDE: 436 channel(data, "XInclude "); 437 break; 438 case XML_FROM_XPATH: 439 channel(data, "XPath "); 440 break; 441 case XML_FROM_XPOINTER: 442 channel(data, "parser "); 443 break; 444 case XML_FROM_REGEXP: 445 channel(data, "regexp "); 446 break; 447 case XML_FROM_MODULE: 448 channel(data, "module "); 449 break; 450 case XML_FROM_SCHEMASV: 451 channel(data, "Schemas validity "); 452 break; 453 case XML_FROM_SCHEMASP: 454 channel(data, "Schemas parser "); 455 break; 456 case XML_FROM_RELAXNGP: 457 channel(data, "Relax-NG parser "); 458 break; 459 case XML_FROM_RELAXNGV: 460 channel(data, "Relax-NG validity "); 461 break; 462 case XML_FROM_CATALOG: 463 channel(data, "Catalog "); 464 break; 465 case XML_FROM_C14N: 466 channel(data, "C14N "); 467 break; 468 case XML_FROM_XSLT: 469 channel(data, "XSLT "); 470 break; 471 default: 472 break; 473 } 474 if (code == XML_ERR_OK) 475 return; 476 switch (level) { 477 case XML_ERR_NONE: 478 channel(data, ": "); 479 break; 480 case XML_ERR_WARNING: 481 channel(data, "warning : "); 482 break; 483 case XML_ERR_ERROR: 484 channel(data, "error : "); 485 break; 486 case XML_ERR_FATAL: 487 channel(data, "error : "); 488 break; 489 } 490 if (code == XML_ERR_OK) 491 return; 492 if (str != NULL) { 493 int len; 494 len = xmlStrlen((const xmlChar *)str); 495 if ((len > 0) && (str[len - 1] != '\n')) 496 channel(data, "%s\n", str); 497 else 498 channel(data, "%s", str); 499 } else { 500 channel(data, "%s\n", "out of memory error"); 501 } 502 if (code == XML_ERR_OK) 503 return; 504 505 if (ctxt != NULL) { 506 xmlParserPrintFileContextInternal(input, channel, data); 507 if (cur != NULL) { 508 if (cur->filename) 509 channel(data, "%s:%d: \n", cur->filename, cur->line); 510 else if ((line != 0) && (domain == XML_FROM_PARSER)) 511 channel(data, "Entity: line %d: \n", cur->line); 512 xmlParserPrintFileContextInternal(cur, channel, data); 513 } 514 } 515 if ((domain == XML_FROM_XPATH) && (err->str1 != NULL) && 516 (err->int1 < 100) && 517 (err->int1 < xmlStrlen((const xmlChar *)err->str1))) { 518 xmlChar buf[150]; 519 int i; 520 521 channel(data, "%s\n", err->str1); 522 for (i=0;i < err->int1;i++) 523 buf[i] = ' '; 524 buf[i++] = '^'; 525 buf[i] = 0; 526 channel(data, "%s\n", buf); 527 } 528 } 529 530 static void 531 initializeLibxml2(void) { 532 xmlGetWarningsDefaultValue = 0; 533 xmlPedanticParserDefault(0); 534 535 xmlMemSetup(xmlMemFree, xmlMemMalloc, xmlMemRealloc, xmlMemoryStrdup); 536 xmlInitParser(); 537 xmlSetExternalEntityLoader(testExternalEntityLoader); 538 xmlSetStructuredErrorFunc(NULL, testStructuredErrorHandler); 539 #ifdef LIBXML_SCHEMAS_ENABLED 540 xmlSchemaInitTypes(); 541 xmlRelaxNGInitTypes(); 542 #endif 543 } 544 545 546 /************************************************************************ 547 * * 548 * File name and path utilities * 549 * * 550 ************************************************************************/ 551 552 static const char *baseFilename(const char *filename) { 553 const char *cur; 554 if (filename == NULL) 555 return(NULL); 556 cur = &filename[strlen(filename)]; 557 while ((cur > filename) && (*cur != '/')) 558 cur--; 559 if (*cur == '/') 560 return(cur + 1); 561 return(cur); 562 } 563 564 static char *resultFilename(const char *filename, const char *out, 565 const char *suffix) { 566 const char *base; 567 char res[500]; 568 char suffixbuff[500]; 569 570 /************* 571 if ((filename[0] == 't') && (filename[1] == 'e') && 572 (filename[2] == 's') && (filename[3] == 't') && 573 (filename[4] == '/')) 574 filename = &filename[5]; 575 *************/ 576 577 base = baseFilename(filename); 578 if (suffix == NULL) 579 suffix = ".tmp"; 580 if (out == NULL) 581 out = ""; 582 583 strncpy(suffixbuff,suffix,499); 584 #ifdef VMS 585 if(strstr(base,".") && suffixbuff[0]=='.') 586 suffixbuff[0]='_'; 587 #endif 588 589 snprintf(res, 499, "%s%s%s", out, base, suffixbuff); 590 res[499] = 0; 591 return(strdup(res)); 592 } 593 594 static int checkTestFile(const char *filename) { 595 struct stat buf; 596 597 if (stat(filename, &buf) == -1) 598 return(0); 599 600 #if defined(_WIN32) && !defined(__CYGWIN__) 601 if (!(buf.st_mode & _S_IFREG)) 602 return(0); 603 #else 604 if (!S_ISREG(buf.st_mode)) 605 return(0); 606 #endif 607 608 return(1); 609 } 610 611 static int compareFiles(const char *r1, const char *r2) { 612 int res1, res2; 613 int fd1, fd2; 614 char bytes1[4096]; 615 char bytes2[4096]; 616 617 fd1 = open(r1, RD_FLAGS); 618 if (fd1 < 0) 619 return(-1); 620 fd2 = open(r2, RD_FLAGS); 621 if (fd2 < 0) { 622 close(fd1); 623 return(-1); 624 } 625 while (1) { 626 res1 = read(fd1, bytes1, 4096); 627 res2 = read(fd2, bytes2, 4096); 628 if ((res1 != res2) || (res1 < 0)) { 629 close(fd1); 630 close(fd2); 631 return(1); 632 } 633 if (res1 == 0) 634 break; 635 if (memcmp(bytes1, bytes2, res1) != 0) { 636 close(fd1); 637 close(fd2); 638 return(1); 639 } 640 } 641 close(fd1); 642 close(fd2); 643 return(0); 644 } 645 646 static int compareFileMem(const char *filename, const char *mem, int size) { 647 int res; 648 int fd; 649 char bytes[4096]; 650 int idx = 0; 651 struct stat info; 652 653 if (stat(filename, &info) < 0) 654 return(-1); 655 if (info.st_size != size) 656 return(-1); 657 fd = open(filename, RD_FLAGS); 658 if (fd < 0) 659 return(-1); 660 while (idx < size) { 661 res = read(fd, bytes, 4096); 662 if (res <= 0) 663 break; 664 if (res + idx > size) 665 break; 666 if (memcmp(bytes, &mem[idx], res) != 0) { 667 int ix; 668 for (ix=0; ix<res; ix++) 669 if (bytes[ix] != mem[idx+ix]) 670 break; 671 fprintf(stderr,"Compare error at position %d\n", idx+ix); 672 close(fd); 673 return(1); 674 } 675 idx += res; 676 } 677 close(fd); 678 return(idx != size); 679 } 680 681 static int loadMem(const char *filename, const char **mem, int *size) { 682 int fd, res; 683 struct stat info; 684 char *base; 685 int siz = 0; 686 if (stat(filename, &info) < 0) 687 return(-1); 688 base = malloc(info.st_size + 1); 689 if (base == NULL) 690 return(-1); 691 if ((fd = open(filename, RD_FLAGS)) < 0) { 692 free(base); 693 return(-1); 694 } 695 while ((res = read(fd, &base[siz], info.st_size - siz)) > 0) { 696 siz += res; 697 } 698 close(fd); 699 #if !defined(_WIN32) 700 if (siz != info.st_size) { 701 free(base); 702 return(-1); 703 } 704 #endif 705 base[siz] = 0; 706 *mem = base; 707 *size = siz; 708 return(0); 709 } 710 711 static int unloadMem(const char *mem) { 712 free((char *)mem); 713 return(0); 714 } 715 716 /************************************************************************ 717 * * 718 * Tests implementations * 719 * * 720 ************************************************************************/ 721 722 /************************************************************************ 723 * * 724 * Parse to SAX based tests * 725 * * 726 ************************************************************************/ 727 728 static FILE *SAXdebug = NULL; 729 730 /* 731 * empty SAX block 732 */ 733 static xmlSAXHandler emptySAXHandlerStruct = { 734 NULL, /* internalSubset */ 735 NULL, /* isStandalone */ 736 NULL, /* hasInternalSubset */ 737 NULL, /* hasExternalSubset */ 738 NULL, /* resolveEntity */ 739 NULL, /* getEntity */ 740 NULL, /* entityDecl */ 741 NULL, /* notationDecl */ 742 NULL, /* attributeDecl */ 743 NULL, /* elementDecl */ 744 NULL, /* unparsedEntityDecl */ 745 NULL, /* setDocumentLocator */ 746 NULL, /* startDocument */ 747 NULL, /* endDocument */ 748 NULL, /* startElement */ 749 NULL, /* endElement */ 750 NULL, /* reference */ 751 NULL, /* characters */ 752 NULL, /* ignorableWhitespace */ 753 NULL, /* processingInstruction */ 754 NULL, /* comment */ 755 NULL, /* xmlParserWarning */ 756 NULL, /* xmlParserError */ 757 NULL, /* xmlParserError */ 758 NULL, /* getParameterEntity */ 759 NULL, /* cdataBlock; */ 760 NULL, /* externalSubset; */ 761 1, 762 NULL, 763 NULL, /* startElementNs */ 764 NULL, /* endElementNs */ 765 NULL /* xmlStructuredErrorFunc */ 766 }; 767 768 static xmlSAXHandlerPtr emptySAXHandler = &emptySAXHandlerStruct; 769 static int callbacks = 0; 770 static int quiet = 0; 771 772 /** 773 * isStandaloneDebug: 774 * @ctxt: An XML parser context 775 * 776 * Is this document tagged standalone ? 777 * 778 * Returns 1 if true 779 */ 780 static int 781 isStandaloneDebug(void *ctx ATTRIBUTE_UNUSED) 782 { 783 callbacks++; 784 if (quiet) 785 return(0); 786 fprintf(SAXdebug, "SAX.isStandalone()\n"); 787 return(0); 788 } 789 790 /** 791 * hasInternalSubsetDebug: 792 * @ctxt: An XML parser context 793 * 794 * Does this document has an internal subset 795 * 796 * Returns 1 if true 797 */ 798 static int 799 hasInternalSubsetDebug(void *ctx ATTRIBUTE_UNUSED) 800 { 801 callbacks++; 802 if (quiet) 803 return(0); 804 fprintf(SAXdebug, "SAX.hasInternalSubset()\n"); 805 return(0); 806 } 807 808 /** 809 * hasExternalSubsetDebug: 810 * @ctxt: An XML parser context 811 * 812 * Does this document has an external subset 813 * 814 * Returns 1 if true 815 */ 816 static int 817 hasExternalSubsetDebug(void *ctx ATTRIBUTE_UNUSED) 818 { 819 callbacks++; 820 if (quiet) 821 return(0); 822 fprintf(SAXdebug, "SAX.hasExternalSubset()\n"); 823 return(0); 824 } 825 826 /** 827 * internalSubsetDebug: 828 * @ctxt: An XML parser context 829 * 830 * Does this document has an internal subset 831 */ 832 static void 833 internalSubsetDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name, 834 const xmlChar *ExternalID, const xmlChar *SystemID) 835 { 836 callbacks++; 837 if (quiet) 838 return; 839 fprintf(SAXdebug, "SAX.internalSubset(%s,", name); 840 if (ExternalID == NULL) 841 fprintf(SAXdebug, " ,"); 842 else 843 fprintf(SAXdebug, " %s,", ExternalID); 844 if (SystemID == NULL) 845 fprintf(SAXdebug, " )\n"); 846 else 847 fprintf(SAXdebug, " %s)\n", SystemID); 848 } 849 850 /** 851 * externalSubsetDebug: 852 * @ctxt: An XML parser context 853 * 854 * Does this document has an external subset 855 */ 856 static void 857 externalSubsetDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name, 858 const xmlChar *ExternalID, const xmlChar *SystemID) 859 { 860 callbacks++; 861 if (quiet) 862 return; 863 fprintf(SAXdebug, "SAX.externalSubset(%s,", name); 864 if (ExternalID == NULL) 865 fprintf(SAXdebug, " ,"); 866 else 867 fprintf(SAXdebug, " %s,", ExternalID); 868 if (SystemID == NULL) 869 fprintf(SAXdebug, " )\n"); 870 else 871 fprintf(SAXdebug, " %s)\n", SystemID); 872 } 873 874 /** 875 * resolveEntityDebug: 876 * @ctxt: An XML parser context 877 * @publicId: The public ID of the entity 878 * @systemId: The system ID of the entity 879 * 880 * Special entity resolver, better left to the parser, it has 881 * more context than the application layer. 882 * The default behaviour is to NOT resolve the entities, in that case 883 * the ENTITY_REF nodes are built in the structure (and the parameter 884 * values). 885 * 886 * Returns the xmlParserInputPtr if inlined or NULL for DOM behaviour. 887 */ 888 static xmlParserInputPtr 889 resolveEntityDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *publicId, const xmlChar *systemId) 890 { 891 callbacks++; 892 if (quiet) 893 return(NULL); 894 /* xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; */ 895 896 897 fprintf(SAXdebug, "SAX.resolveEntity("); 898 if (publicId != NULL) 899 fprintf(SAXdebug, "%s", (char *)publicId); 900 else 901 fprintf(SAXdebug, " "); 902 if (systemId != NULL) 903 fprintf(SAXdebug, ", %s)\n", (char *)systemId); 904 else 905 fprintf(SAXdebug, ", )\n"); 906 /********* 907 if (systemId != NULL) { 908 return(xmlNewInputFromFile(ctxt, (char *) systemId)); 909 } 910 *********/ 911 return(NULL); 912 } 913 914 /** 915 * getEntityDebug: 916 * @ctxt: An XML parser context 917 * @name: The entity name 918 * 919 * Get an entity by name 920 * 921 * Returns the xmlParserInputPtr if inlined or NULL for DOM behaviour. 922 */ 923 static xmlEntityPtr 924 getEntityDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name) 925 { 926 callbacks++; 927 if (quiet) 928 return(NULL); 929 fprintf(SAXdebug, "SAX.getEntity(%s)\n", name); 930 return(NULL); 931 } 932 933 /** 934 * getParameterEntityDebug: 935 * @ctxt: An XML parser context 936 * @name: The entity name 937 * 938 * Get a parameter entity by name 939 * 940 * Returns the xmlParserInputPtr 941 */ 942 static xmlEntityPtr 943 getParameterEntityDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name) 944 { 945 callbacks++; 946 if (quiet) 947 return(NULL); 948 fprintf(SAXdebug, "SAX.getParameterEntity(%s)\n", name); 949 return(NULL); 950 } 951 952 953 /** 954 * entityDeclDebug: 955 * @ctxt: An XML parser context 956 * @name: the entity name 957 * @type: the entity type 958 * @publicId: The public ID of the entity 959 * @systemId: The system ID of the entity 960 * @content: the entity value (without processing). 961 * 962 * An entity definition has been parsed 963 */ 964 static void 965 entityDeclDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name, int type, 966 const xmlChar *publicId, const xmlChar *systemId, xmlChar *content) 967 { 968 const xmlChar *nullstr = BAD_CAST "(null)"; 969 /* not all libraries handle printing null pointers nicely */ 970 if (publicId == NULL) 971 publicId = nullstr; 972 if (systemId == NULL) 973 systemId = nullstr; 974 if (content == NULL) 975 content = (xmlChar *)nullstr; 976 callbacks++; 977 if (quiet) 978 return; 979 fprintf(SAXdebug, "SAX.entityDecl(%s, %d, %s, %s, %s)\n", 980 name, type, publicId, systemId, content); 981 } 982 983 /** 984 * attributeDeclDebug: 985 * @ctxt: An XML parser context 986 * @name: the attribute name 987 * @type: the attribute type 988 * 989 * An attribute definition has been parsed 990 */ 991 static void 992 attributeDeclDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar * elem, 993 const xmlChar * name, int type, int def, 994 const xmlChar * defaultValue, xmlEnumerationPtr tree) 995 { 996 callbacks++; 997 if (quiet) 998 return; 999 if (defaultValue == NULL) 1000 fprintf(SAXdebug, "SAX.attributeDecl(%s, %s, %d, %d, NULL, ...)\n", 1001 elem, name, type, def); 1002 else 1003 fprintf(SAXdebug, "SAX.attributeDecl(%s, %s, %d, %d, %s, ...)\n", 1004 elem, name, type, def, defaultValue); 1005 xmlFreeEnumeration(tree); 1006 } 1007 1008 /** 1009 * elementDeclDebug: 1010 * @ctxt: An XML parser context 1011 * @name: the element name 1012 * @type: the element type 1013 * @content: the element value (without processing). 1014 * 1015 * An element definition has been parsed 1016 */ 1017 static void 1018 elementDeclDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name, int type, 1019 xmlElementContentPtr content ATTRIBUTE_UNUSED) 1020 { 1021 callbacks++; 1022 if (quiet) 1023 return; 1024 fprintf(SAXdebug, "SAX.elementDecl(%s, %d, ...)\n", 1025 name, type); 1026 } 1027 1028 /** 1029 * notationDeclDebug: 1030 * @ctxt: An XML parser context 1031 * @name: The name of the notation 1032 * @publicId: The public ID of the entity 1033 * @systemId: The system ID of the entity 1034 * 1035 * What to do when a notation declaration has been parsed. 1036 */ 1037 static void 1038 notationDeclDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name, 1039 const xmlChar *publicId, const xmlChar *systemId) 1040 { 1041 callbacks++; 1042 if (quiet) 1043 return; 1044 fprintf(SAXdebug, "SAX.notationDecl(%s, %s, %s)\n", 1045 (char *) name, (char *) publicId, (char *) systemId); 1046 } 1047 1048 /** 1049 * unparsedEntityDeclDebug: 1050 * @ctxt: An XML parser context 1051 * @name: The name of the entity 1052 * @publicId: The public ID of the entity 1053 * @systemId: The system ID of the entity 1054 * @notationName: the name of the notation 1055 * 1056 * What to do when an unparsed entity declaration is parsed 1057 */ 1058 static void 1059 unparsedEntityDeclDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name, 1060 const xmlChar *publicId, const xmlChar *systemId, 1061 const xmlChar *notationName) 1062 { 1063 const xmlChar *nullstr = BAD_CAST "(null)"; 1064 1065 if (publicId == NULL) 1066 publicId = nullstr; 1067 if (systemId == NULL) 1068 systemId = nullstr; 1069 if (notationName == NULL) 1070 notationName = nullstr; 1071 callbacks++; 1072 if (quiet) 1073 return; 1074 fprintf(SAXdebug, "SAX.unparsedEntityDecl(%s, %s, %s, %s)\n", 1075 (char *) name, (char *) publicId, (char *) systemId, 1076 (char *) notationName); 1077 } 1078 1079 /** 1080 * setDocumentLocatorDebug: 1081 * @ctxt: An XML parser context 1082 * @loc: A SAX Locator 1083 * 1084 * Receive the document locator at startup, actually xmlDefaultSAXLocator 1085 * Everything is available on the context, so this is useless in our case. 1086 */ 1087 static void 1088 setDocumentLocatorDebug(void *ctx ATTRIBUTE_UNUSED, xmlSAXLocatorPtr loc ATTRIBUTE_UNUSED) 1089 { 1090 callbacks++; 1091 if (quiet) 1092 return; 1093 fprintf(SAXdebug, "SAX.setDocumentLocator()\n"); 1094 } 1095 1096 /** 1097 * startDocumentDebug: 1098 * @ctxt: An XML parser context 1099 * 1100 * called when the document start being processed. 1101 */ 1102 static void 1103 startDocumentDebug(void *ctx ATTRIBUTE_UNUSED) 1104 { 1105 callbacks++; 1106 if (quiet) 1107 return; 1108 fprintf(SAXdebug, "SAX.startDocument()\n"); 1109 } 1110 1111 /** 1112 * endDocumentDebug: 1113 * @ctxt: An XML parser context 1114 * 1115 * called when the document end has been detected. 1116 */ 1117 static void 1118 endDocumentDebug(void *ctx ATTRIBUTE_UNUSED) 1119 { 1120 callbacks++; 1121 if (quiet) 1122 return; 1123 fprintf(SAXdebug, "SAX.endDocument()\n"); 1124 } 1125 1126 /** 1127 * startElementDebug: 1128 * @ctxt: An XML parser context 1129 * @name: The element name 1130 * 1131 * called when an opening tag has been processed. 1132 */ 1133 static void 1134 startElementDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name, const xmlChar **atts) 1135 { 1136 int i; 1137 1138 callbacks++; 1139 if (quiet) 1140 return; 1141 fprintf(SAXdebug, "SAX.startElement(%s", (char *) name); 1142 if (atts != NULL) { 1143 for (i = 0;(atts[i] != NULL);i++) { 1144 fprintf(SAXdebug, ", %s='", atts[i++]); 1145 if (atts[i] != NULL) 1146 fprintf(SAXdebug, "%s'", atts[i]); 1147 } 1148 } 1149 fprintf(SAXdebug, ")\n"); 1150 } 1151 1152 /** 1153 * endElementDebug: 1154 * @ctxt: An XML parser context 1155 * @name: The element name 1156 * 1157 * called when the end of an element has been detected. 1158 */ 1159 static void 1160 endElementDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name) 1161 { 1162 callbacks++; 1163 if (quiet) 1164 return; 1165 fprintf(SAXdebug, "SAX.endElement(%s)\n", (char *) name); 1166 } 1167 1168 /** 1169 * charactersDebug: 1170 * @ctxt: An XML parser context 1171 * @ch: a xmlChar string 1172 * @len: the number of xmlChar 1173 * 1174 * receiving some chars from the parser. 1175 * Question: how much at a time ??? 1176 */ 1177 static void 1178 charactersDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *ch, int len) 1179 { 1180 char output[40]; 1181 int i; 1182 1183 callbacks++; 1184 if (quiet) 1185 return; 1186 for (i = 0;(i<len) && (i < 30);i++) 1187 output[i] = ch[i]; 1188 output[i] = 0; 1189 1190 fprintf(SAXdebug, "SAX.characters(%s, %d)\n", output, len); 1191 } 1192 1193 /** 1194 * referenceDebug: 1195 * @ctxt: An XML parser context 1196 * @name: The entity name 1197 * 1198 * called when an entity reference is detected. 1199 */ 1200 static void 1201 referenceDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name) 1202 { 1203 callbacks++; 1204 if (quiet) 1205 return; 1206 fprintf(SAXdebug, "SAX.reference(%s)\n", name); 1207 } 1208 1209 /** 1210 * ignorableWhitespaceDebug: 1211 * @ctxt: An XML parser context 1212 * @ch: a xmlChar string 1213 * @start: the first char in the string 1214 * @len: the number of xmlChar 1215 * 1216 * receiving some ignorable whitespaces from the parser. 1217 * Question: how much at a time ??? 1218 */ 1219 static void 1220 ignorableWhitespaceDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *ch, int len) 1221 { 1222 char output[40]; 1223 int i; 1224 1225 callbacks++; 1226 if (quiet) 1227 return; 1228 for (i = 0;(i<len) && (i < 30);i++) 1229 output[i] = ch[i]; 1230 output[i] = 0; 1231 fprintf(SAXdebug, "SAX.ignorableWhitespace(%s, %d)\n", output, len); 1232 } 1233 1234 /** 1235 * processingInstructionDebug: 1236 * @ctxt: An XML parser context 1237 * @target: the target name 1238 * @data: the PI data's 1239 * @len: the number of xmlChar 1240 * 1241 * A processing instruction has been parsed. 1242 */ 1243 static void 1244 processingInstructionDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *target, 1245 const xmlChar *data) 1246 { 1247 callbacks++; 1248 if (quiet) 1249 return; 1250 if (data != NULL) 1251 fprintf(SAXdebug, "SAX.processingInstruction(%s, %s)\n", 1252 (char *) target, (char *) data); 1253 else 1254 fprintf(SAXdebug, "SAX.processingInstruction(%s, NULL)\n", 1255 (char *) target); 1256 } 1257 1258 /** 1259 * cdataBlockDebug: 1260 * @ctx: the user data (XML parser context) 1261 * @value: The pcdata content 1262 * @len: the block length 1263 * 1264 * called when a pcdata block has been parsed 1265 */ 1266 static void 1267 cdataBlockDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *value, int len) 1268 { 1269 callbacks++; 1270 if (quiet) 1271 return; 1272 fprintf(SAXdebug, "SAX.pcdata(%.20s, %d)\n", 1273 (char *) value, len); 1274 } 1275 1276 /** 1277 * commentDebug: 1278 * @ctxt: An XML parser context 1279 * @value: the comment content 1280 * 1281 * A comment has been parsed. 1282 */ 1283 static void 1284 commentDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *value) 1285 { 1286 callbacks++; 1287 if (quiet) 1288 return; 1289 fprintf(SAXdebug, "SAX.comment(%s)\n", value); 1290 } 1291 1292 /** 1293 * warningDebug: 1294 * @ctxt: An XML parser context 1295 * @msg: the message to display/transmit 1296 * @...: extra parameters for the message display 1297 * 1298 * Display and format a warning messages, gives file, line, position and 1299 * extra parameters. 1300 */ 1301 static void XMLCDECL 1302 warningDebug(void *ctx ATTRIBUTE_UNUSED, const char *msg, ...) 1303 { 1304 va_list args; 1305 1306 callbacks++; 1307 if (quiet) 1308 return; 1309 va_start(args, msg); 1310 fprintf(SAXdebug, "SAX.warning: "); 1311 vfprintf(SAXdebug, msg, args); 1312 va_end(args); 1313 } 1314 1315 /** 1316 * errorDebug: 1317 * @ctxt: An XML parser context 1318 * @msg: the message to display/transmit 1319 * @...: extra parameters for the message display 1320 * 1321 * Display and format a error messages, gives file, line, position and 1322 * extra parameters. 1323 */ 1324 static void XMLCDECL 1325 errorDebug(void *ctx ATTRIBUTE_UNUSED, const char *msg, ...) 1326 { 1327 va_list args; 1328 1329 callbacks++; 1330 if (quiet) 1331 return; 1332 va_start(args, msg); 1333 fprintf(SAXdebug, "SAX.error: "); 1334 vfprintf(SAXdebug, msg, args); 1335 va_end(args); 1336 } 1337 1338 /** 1339 * fatalErrorDebug: 1340 * @ctxt: An XML parser context 1341 * @msg: the message to display/transmit 1342 * @...: extra parameters for the message display 1343 * 1344 * Display and format a fatalError messages, gives file, line, position and 1345 * extra parameters. 1346 */ 1347 static void XMLCDECL 1348 fatalErrorDebug(void *ctx ATTRIBUTE_UNUSED, const char *msg, ...) 1349 { 1350 va_list args; 1351 1352 callbacks++; 1353 if (quiet) 1354 return; 1355 va_start(args, msg); 1356 fprintf(SAXdebug, "SAX.fatalError: "); 1357 vfprintf(SAXdebug, msg, args); 1358 va_end(args); 1359 } 1360 1361 static xmlSAXHandler debugSAXHandlerStruct = { 1362 internalSubsetDebug, 1363 isStandaloneDebug, 1364 hasInternalSubsetDebug, 1365 hasExternalSubsetDebug, 1366 resolveEntityDebug, 1367 getEntityDebug, 1368 entityDeclDebug, 1369 notationDeclDebug, 1370 attributeDeclDebug, 1371 elementDeclDebug, 1372 unparsedEntityDeclDebug, 1373 setDocumentLocatorDebug, 1374 startDocumentDebug, 1375 endDocumentDebug, 1376 startElementDebug, 1377 endElementDebug, 1378 referenceDebug, 1379 charactersDebug, 1380 ignorableWhitespaceDebug, 1381 processingInstructionDebug, 1382 commentDebug, 1383 warningDebug, 1384 errorDebug, 1385 fatalErrorDebug, 1386 getParameterEntityDebug, 1387 cdataBlockDebug, 1388 externalSubsetDebug, 1389 1, 1390 NULL, 1391 NULL, 1392 NULL, 1393 NULL 1394 }; 1395 1396 static xmlSAXHandlerPtr debugSAXHandler = &debugSAXHandlerStruct; 1397 1398 /* 1399 * SAX2 specific callbacks 1400 */ 1401 /** 1402 * startElementNsDebug: 1403 * @ctxt: An XML parser context 1404 * @name: The element name 1405 * 1406 * called when an opening tag has been processed. 1407 */ 1408 static void 1409 startElementNsDebug(void *ctx ATTRIBUTE_UNUSED, 1410 const xmlChar *localname, 1411 const xmlChar *prefix, 1412 const xmlChar *URI, 1413 int nb_namespaces, 1414 const xmlChar **namespaces, 1415 int nb_attributes, 1416 int nb_defaulted, 1417 const xmlChar **attributes) 1418 { 1419 int i; 1420 1421 callbacks++; 1422 if (quiet) 1423 return; 1424 fprintf(SAXdebug, "SAX.startElementNs(%s", (char *) localname); 1425 if (prefix == NULL) 1426 fprintf(SAXdebug, ", NULL"); 1427 else 1428 fprintf(SAXdebug, ", %s", (char *) prefix); 1429 if (URI == NULL) 1430 fprintf(SAXdebug, ", NULL"); 1431 else 1432 fprintf(SAXdebug, ", '%s'", (char *) URI); 1433 fprintf(SAXdebug, ", %d", nb_namespaces); 1434 1435 if (namespaces != NULL) { 1436 for (i = 0;i < nb_namespaces * 2;i++) { 1437 fprintf(SAXdebug, ", xmlns"); 1438 if (namespaces[i] != NULL) 1439 fprintf(SAXdebug, ":%s", namespaces[i]); 1440 i++; 1441 fprintf(SAXdebug, "='%s'", namespaces[i]); 1442 } 1443 } 1444 fprintf(SAXdebug, ", %d, %d", nb_attributes, nb_defaulted); 1445 if (attributes != NULL) { 1446 for (i = 0;i < nb_attributes * 5;i += 5) { 1447 if (attributes[i + 1] != NULL) 1448 fprintf(SAXdebug, ", %s:%s='", attributes[i + 1], attributes[i]); 1449 else 1450 fprintf(SAXdebug, ", %s='", attributes[i]); 1451 fprintf(SAXdebug, "%.4s...', %d", attributes[i + 3], 1452 (int)(attributes[i + 4] - attributes[i + 3])); 1453 } 1454 } 1455 fprintf(SAXdebug, ")\n"); 1456 } 1457 1458 /** 1459 * endElementDebug: 1460 * @ctxt: An XML parser context 1461 * @name: The element name 1462 * 1463 * called when the end of an element has been detected. 1464 */ 1465 static void 1466 endElementNsDebug(void *ctx ATTRIBUTE_UNUSED, 1467 const xmlChar *localname, 1468 const xmlChar *prefix, 1469 const xmlChar *URI) 1470 { 1471 callbacks++; 1472 if (quiet) 1473 return; 1474 fprintf(SAXdebug, "SAX.endElementNs(%s", (char *) localname); 1475 if (prefix == NULL) 1476 fprintf(SAXdebug, ", NULL"); 1477 else 1478 fprintf(SAXdebug, ", %s", (char *) prefix); 1479 if (URI == NULL) 1480 fprintf(SAXdebug, ", NULL)\n"); 1481 else 1482 fprintf(SAXdebug, ", '%s')\n", (char *) URI); 1483 } 1484 1485 static xmlSAXHandler debugSAX2HandlerStruct = { 1486 internalSubsetDebug, 1487 isStandaloneDebug, 1488 hasInternalSubsetDebug, 1489 hasExternalSubsetDebug, 1490 resolveEntityDebug, 1491 getEntityDebug, 1492 entityDeclDebug, 1493 notationDeclDebug, 1494 attributeDeclDebug, 1495 elementDeclDebug, 1496 unparsedEntityDeclDebug, 1497 setDocumentLocatorDebug, 1498 startDocumentDebug, 1499 endDocumentDebug, 1500 NULL, 1501 NULL, 1502 referenceDebug, 1503 charactersDebug, 1504 ignorableWhitespaceDebug, 1505 processingInstructionDebug, 1506 commentDebug, 1507 warningDebug, 1508 errorDebug, 1509 fatalErrorDebug, 1510 getParameterEntityDebug, 1511 cdataBlockDebug, 1512 externalSubsetDebug, 1513 XML_SAX2_MAGIC, 1514 NULL, 1515 startElementNsDebug, 1516 endElementNsDebug, 1517 NULL 1518 }; 1519 1520 static xmlSAXHandlerPtr debugSAX2Handler = &debugSAX2HandlerStruct; 1521 1522 #ifdef LIBXML_HTML_ENABLED 1523 /** 1524 * htmlstartElementDebug: 1525 * @ctxt: An XML parser context 1526 * @name: The element name 1527 * 1528 * called when an opening tag has been processed. 1529 */ 1530 static void 1531 htmlstartElementDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *name, const xmlChar **atts) 1532 { 1533 int i; 1534 1535 fprintf(SAXdebug, "SAX.startElement(%s", (char *) name); 1536 if (atts != NULL) { 1537 for (i = 0;(atts[i] != NULL);i++) { 1538 fprintf(SAXdebug, ", %s", atts[i++]); 1539 if (atts[i] != NULL) { 1540 unsigned char output[40]; 1541 const unsigned char *att = atts[i]; 1542 int outlen, attlen; 1543 fprintf(SAXdebug, "='"); 1544 while ((attlen = strlen((char*)att)) > 0) { 1545 outlen = sizeof output - 1; 1546 htmlEncodeEntities(output, &outlen, att, &attlen, '\''); 1547 output[outlen] = 0; 1548 fprintf(SAXdebug, "%s", (char *) output); 1549 att += attlen; 1550 } 1551 fprintf(SAXdebug, "'"); 1552 } 1553 } 1554 } 1555 fprintf(SAXdebug, ")\n"); 1556 } 1557 1558 /** 1559 * htmlcharactersDebug: 1560 * @ctxt: An XML parser context 1561 * @ch: a xmlChar string 1562 * @len: the number of xmlChar 1563 * 1564 * receiving some chars from the parser. 1565 * Question: how much at a time ??? 1566 */ 1567 static void 1568 htmlcharactersDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *ch, int len) 1569 { 1570 unsigned char output[40]; 1571 int inlen = len, outlen = 30; 1572 1573 htmlEncodeEntities(output, &outlen, ch, &inlen, 0); 1574 output[outlen] = 0; 1575 1576 fprintf(SAXdebug, "SAX.characters(%s, %d)\n", output, len); 1577 } 1578 1579 /** 1580 * htmlcdataDebug: 1581 * @ctxt: An XML parser context 1582 * @ch: a xmlChar string 1583 * @len: the number of xmlChar 1584 * 1585 * receiving some cdata chars from the parser. 1586 * Question: how much at a time ??? 1587 */ 1588 static void 1589 htmlcdataDebug(void *ctx ATTRIBUTE_UNUSED, const xmlChar *ch, int len) 1590 { 1591 unsigned char output[40]; 1592 int inlen = len, outlen = 30; 1593 1594 htmlEncodeEntities(output, &outlen, ch, &inlen, 0); 1595 output[outlen] = 0; 1596 1597 fprintf(SAXdebug, "SAX.cdata(%s, %d)\n", output, len); 1598 } 1599 1600 static xmlSAXHandler debugHTMLSAXHandlerStruct = { 1601 internalSubsetDebug, 1602 isStandaloneDebug, 1603 hasInternalSubsetDebug, 1604 hasExternalSubsetDebug, 1605 resolveEntityDebug, 1606 getEntityDebug, 1607 entityDeclDebug, 1608 notationDeclDebug, 1609 attributeDeclDebug, 1610 elementDeclDebug, 1611 unparsedEntityDeclDebug, 1612 setDocumentLocatorDebug, 1613 startDocumentDebug, 1614 endDocumentDebug, 1615 htmlstartElementDebug, 1616 endElementDebug, 1617 referenceDebug, 1618 htmlcharactersDebug, 1619 ignorableWhitespaceDebug, 1620 processingInstructionDebug, 1621 commentDebug, 1622 warningDebug, 1623 errorDebug, 1624 fatalErrorDebug, 1625 getParameterEntityDebug, 1626 htmlcdataDebug, 1627 externalSubsetDebug, 1628 1, 1629 NULL, 1630 NULL, 1631 NULL, 1632 NULL 1633 }; 1634 1635 static xmlSAXHandlerPtr debugHTMLSAXHandler = &debugHTMLSAXHandlerStruct; 1636 #endif /* LIBXML_HTML_ENABLED */ 1637 1638 #ifdef LIBXML_SAX1_ENABLED 1639 /** 1640 * saxParseTest: 1641 * @filename: the file to parse 1642 * @result: the file with expected result 1643 * @err: the file with error messages 1644 * 1645 * Parse a file using the SAX API and check for errors. 1646 * 1647 * Returns 0 in case of success, an error code otherwise 1648 */ 1649 static int 1650 saxParseTest(const char *filename, const char *result, 1651 const char *err ATTRIBUTE_UNUSED, 1652 int options) { 1653 int ret; 1654 char *temp; 1655 1656 nb_tests++; 1657 temp = resultFilename(filename, "", ".res"); 1658 if (temp == NULL) { 1659 fprintf(stderr, "out of memory\n"); 1660 fatalError(); 1661 } 1662 SAXdebug = fopen(temp, "wb"); 1663 if (SAXdebug == NULL) { 1664 fprintf(stderr, "Failed to write to %s\n", temp); 1665 free(temp); 1666 return(-1); 1667 } 1668 1669 /* for SAX we really want the callbacks though the context handlers */ 1670 xmlSetStructuredErrorFunc(NULL, NULL); 1671 xmlSetGenericErrorFunc(NULL, testErrorHandler); 1672 1673 #ifdef LIBXML_HTML_ENABLED 1674 if (options & XML_PARSE_HTML) { 1675 htmlSAXParseFile(filename, NULL, emptySAXHandler, NULL); 1676 ret = 0; 1677 } else 1678 #endif 1679 ret = xmlSAXUserParseFile(emptySAXHandler, NULL, filename); 1680 if (ret == XML_WAR_UNDECLARED_ENTITY) { 1681 fprintf(SAXdebug, "xmlSAXUserParseFile returned error %d\n", ret); 1682 ret = 0; 1683 } 1684 if (ret != 0) { 1685 fprintf(stderr, "Failed to parse %s\n", filename); 1686 return(1); 1687 } 1688 #ifdef LIBXML_HTML_ENABLED 1689 if (options & XML_PARSE_HTML) { 1690 htmlSAXParseFile(filename, NULL, debugHTMLSAXHandler, NULL); 1691 ret = 0; 1692 } else 1693 #endif 1694 if (options & XML_PARSE_SAX1) { 1695 ret = xmlSAXUserParseFile(debugSAXHandler, NULL, filename); 1696 } else { 1697 ret = xmlSAXUserParseFile(debugSAX2Handler, NULL, filename); 1698 } 1699 if (ret == XML_WAR_UNDECLARED_ENTITY) { 1700 fprintf(SAXdebug, "xmlSAXUserParseFile returned error %d\n", ret); 1701 ret = 0; 1702 } 1703 fclose(SAXdebug); 1704 if (compareFiles(temp, result)) { 1705 fprintf(stderr, "Got a difference for %s\n", filename); 1706 ret = 1; 1707 } 1708 if (temp != NULL) { 1709 unlink(temp); 1710 free(temp); 1711 } 1712 1713 /* switch back to structured error handling */ 1714 xmlSetGenericErrorFunc(NULL, NULL); 1715 xmlSetStructuredErrorFunc(NULL, testStructuredErrorHandler); 1716 1717 return(ret); 1718 } 1719 #endif 1720 1721 /************************************************************************ 1722 * * 1723 * Parse to tree based tests * 1724 * * 1725 ************************************************************************/ 1726 /** 1727 * oldParseTest: 1728 * @filename: the file to parse 1729 * @result: the file with expected result 1730 * @err: the file with error messages: unused 1731 * 1732 * Parse a file using the old xmlParseFile API, then serialize back 1733 * reparse the result and serialize again, then check for deviation 1734 * in serialization. 1735 * 1736 * Returns 0 in case of success, an error code otherwise 1737 */ 1738 static int 1739 oldParseTest(const char *filename, const char *result, 1740 const char *err ATTRIBUTE_UNUSED, 1741 int options ATTRIBUTE_UNUSED) { 1742 xmlDocPtr doc; 1743 char *temp; 1744 int res = 0; 1745 1746 nb_tests++; 1747 /* 1748 * base of the test, parse with the old API 1749 */ 1750 #ifdef LIBXML_SAX1_ENABLED 1751 doc = xmlParseFile(filename); 1752 #else 1753 doc = xmlReadFile(filename, NULL, 0); 1754 #endif 1755 if (doc == NULL) 1756 return(1); 1757 temp = resultFilename(filename, "", ".res"); 1758 if (temp == NULL) { 1759 fprintf(stderr, "out of memory\n"); 1760 fatalError(); 1761 } 1762 xmlSaveFile(temp, doc); 1763 if (compareFiles(temp, result)) { 1764 res = 1; 1765 } 1766 xmlFreeDoc(doc); 1767 1768 /* 1769 * Parse the saved result to make sure the round trip is okay 1770 */ 1771 #ifdef LIBXML_SAX1_ENABLED 1772 doc = xmlParseFile(temp); 1773 #else 1774 doc = xmlReadFile(temp, NULL, 0); 1775 #endif 1776 if (doc == NULL) 1777 return(1); 1778 xmlSaveFile(temp, doc); 1779 if (compareFiles(temp, result)) { 1780 res = 1; 1781 } 1782 xmlFreeDoc(doc); 1783 1784 if (temp != NULL) { 1785 unlink(temp); 1786 free(temp); 1787 } 1788 return(res); 1789 } 1790 1791 #ifdef LIBXML_PUSH_ENABLED 1792 /** 1793 * pushParseTest: 1794 * @filename: the file to parse 1795 * @result: the file with expected result 1796 * @err: the file with error messages: unused 1797 * 1798 * Parse a file using the Push API, then serialize back 1799 * to check for content. 1800 * 1801 * Returns 0 in case of success, an error code otherwise 1802 */ 1803 static int 1804 pushParseTest(const char *filename, const char *result, 1805 const char *err ATTRIBUTE_UNUSED, 1806 int options) { 1807 xmlParserCtxtPtr ctxt; 1808 xmlDocPtr doc; 1809 const char *base; 1810 int size, res; 1811 int cur = 0; 1812 1813 nb_tests++; 1814 /* 1815 * load the document in memory and work from there. 1816 */ 1817 if (loadMem(filename, &base, &size) != 0) { 1818 fprintf(stderr, "Failed to load %s\n", filename); 1819 return(-1); 1820 } 1821 1822 #ifdef LIBXML_HTML_ENABLED 1823 if (options & XML_PARSE_HTML) 1824 ctxt = htmlCreatePushParserCtxt(NULL, NULL, base + cur, 4, filename, 1825 XML_CHAR_ENCODING_NONE); 1826 else 1827 #endif 1828 ctxt = xmlCreatePushParserCtxt(NULL, NULL, base + cur, 4, filename); 1829 xmlCtxtUseOptions(ctxt, options); 1830 cur += 4; 1831 while (cur < size) { 1832 if (cur + 1024 >= size) { 1833 #ifdef LIBXML_HTML_ENABLED 1834 if (options & XML_PARSE_HTML) 1835 htmlParseChunk(ctxt, base + cur, size - cur, 1); 1836 else 1837 #endif 1838 xmlParseChunk(ctxt, base + cur, size - cur, 1); 1839 break; 1840 } else { 1841 #ifdef LIBXML_HTML_ENABLED 1842 if (options & XML_PARSE_HTML) 1843 htmlParseChunk(ctxt, base + cur, 1024, 0); 1844 else 1845 #endif 1846 xmlParseChunk(ctxt, base + cur, 1024, 0); 1847 cur += 1024; 1848 } 1849 } 1850 doc = ctxt->myDoc; 1851 #ifdef LIBXML_HTML_ENABLED 1852 if (options & XML_PARSE_HTML) 1853 res = 1; 1854 else 1855 #endif 1856 res = ctxt->wellFormed; 1857 xmlFreeParserCtxt(ctxt); 1858 free((char *)base); 1859 if (!res) { 1860 xmlFreeDoc(doc); 1861 fprintf(stderr, "Failed to parse %s\n", filename); 1862 return(-1); 1863 } 1864 #ifdef LIBXML_HTML_ENABLED 1865 if (options & XML_PARSE_HTML) 1866 htmlDocDumpMemory(doc, (xmlChar **) &base, &size); 1867 else 1868 #endif 1869 xmlDocDumpMemory(doc, (xmlChar **) &base, &size); 1870 xmlFreeDoc(doc); 1871 res = compareFileMem(result, base, size); 1872 if ((base == NULL) || (res != 0)) { 1873 if (base != NULL) 1874 xmlFree((char *)base); 1875 fprintf(stderr, "Result for %s failed\n", filename); 1876 return(-1); 1877 } 1878 xmlFree((char *)base); 1879 if (err != NULL) { 1880 res = compareFileMem(err, testErrors, testErrorsSize); 1881 if (res != 0) { 1882 fprintf(stderr, "Error for %s failed\n", filename); 1883 return(-1); 1884 } 1885 } 1886 return(0); 1887 } 1888 #endif 1889 1890 /** 1891 * memParseTest: 1892 * @filename: the file to parse 1893 * @result: the file with expected result 1894 * @err: the file with error messages: unused 1895 * 1896 * Parse a file using the old xmlReadMemory API, then serialize back 1897 * reparse the result and serialize again, then check for deviation 1898 * in serialization. 1899 * 1900 * Returns 0 in case of success, an error code otherwise 1901 */ 1902 static int 1903 memParseTest(const char *filename, const char *result, 1904 const char *err ATTRIBUTE_UNUSED, 1905 int options ATTRIBUTE_UNUSED) { 1906 xmlDocPtr doc; 1907 const char *base; 1908 int size, res; 1909 1910 nb_tests++; 1911 /* 1912 * load and parse the memory 1913 */ 1914 if (loadMem(filename, &base, &size) != 0) { 1915 fprintf(stderr, "Failed to load %s\n", filename); 1916 return(-1); 1917 } 1918 1919 doc = xmlReadMemory(base, size, filename, NULL, 0); 1920 unloadMem(base); 1921 if (doc == NULL) { 1922 return(1); 1923 } 1924 xmlDocDumpMemory(doc, (xmlChar **) &base, &size); 1925 xmlFreeDoc(doc); 1926 res = compareFileMem(result, base, size); 1927 if ((base == NULL) || (res != 0)) { 1928 if (base != NULL) 1929 xmlFree((char *)base); 1930 fprintf(stderr, "Result for %s failed\n", filename); 1931 return(-1); 1932 } 1933 xmlFree((char *)base); 1934 return(0); 1935 } 1936 1937 /** 1938 * noentParseTest: 1939 * @filename: the file to parse 1940 * @result: the file with expected result 1941 * @err: the file with error messages: unused 1942 * 1943 * Parse a file with entity resolution, then serialize back 1944 * reparse the result and serialize again, then check for deviation 1945 * in serialization. 1946 * 1947 * Returns 0 in case of success, an error code otherwise 1948 */ 1949 static int 1950 noentParseTest(const char *filename, const char *result, 1951 const char *err ATTRIBUTE_UNUSED, 1952 int options) { 1953 xmlDocPtr doc; 1954 char *temp; 1955 int res = 0; 1956 1957 nb_tests++; 1958 /* 1959 * base of the test, parse with the old API 1960 */ 1961 doc = xmlReadFile(filename, NULL, options); 1962 if (doc == NULL) 1963 return(1); 1964 temp = resultFilename(filename, "", ".res"); 1965 if (temp == NULL) { 1966 fprintf(stderr, "Out of memory\n"); 1967 fatalError(); 1968 } 1969 xmlSaveFile(temp, doc); 1970 if (compareFiles(temp, result)) { 1971 res = 1; 1972 } 1973 xmlFreeDoc(doc); 1974 1975 /* 1976 * Parse the saved result to make sure the round trip is okay 1977 */ 1978 doc = xmlReadFile(filename, NULL, options); 1979 if (doc == NULL) 1980 return(1); 1981 xmlSaveFile(temp, doc); 1982 if (compareFiles(temp, result)) { 1983 res = 1; 1984 } 1985 xmlFreeDoc(doc); 1986 1987 if (temp != NULL) { 1988 unlink(temp); 1989 free(temp); 1990 } 1991 return(res); 1992 } 1993 1994 /** 1995 * errParseTest: 1996 * @filename: the file to parse 1997 * @result: the file with expected result 1998 * @err: the file with error messages 1999 * 2000 * Parse a file using the xmlReadFile API and check for errors. 2001 * 2002 * Returns 0 in case of success, an error code otherwise 2003 */ 2004 static int 2005 errParseTest(const char *filename, const char *result, const char *err, 2006 int options) { 2007 xmlDocPtr doc; 2008 const char *base = NULL; 2009 int size, res = 0; 2010 2011 nb_tests++; 2012 #ifdef LIBXML_HTML_ENABLED 2013 if (options & XML_PARSE_HTML) { 2014 doc = htmlReadFile(filename, NULL, options); 2015 } else 2016 #endif 2017 #ifdef LIBXML_XINCLUDE_ENABLED 2018 if (options & XML_PARSE_XINCLUDE) { 2019 doc = xmlReadFile(filename, NULL, options); 2020 xmlXIncludeProcessFlags(doc, options); 2021 } else 2022 #endif 2023 { 2024 xmlGetWarningsDefaultValue = 1; 2025 doc = xmlReadFile(filename, NULL, options); 2026 } 2027 xmlGetWarningsDefaultValue = 0; 2028 if (result) { 2029 if (doc == NULL) { 2030 base = ""; 2031 size = 0; 2032 } else { 2033 #ifdef LIBXML_HTML_ENABLED 2034 if (options & XML_PARSE_HTML) { 2035 htmlDocDumpMemory(doc, (xmlChar **) &base, &size); 2036 } else 2037 #endif 2038 xmlDocDumpMemory(doc, (xmlChar **) &base, &size); 2039 } 2040 res = compareFileMem(result, base, size); 2041 } 2042 if (doc != NULL) { 2043 if (base != NULL) 2044 xmlFree((char *)base); 2045 xmlFreeDoc(doc); 2046 } 2047 if (res != 0) { 2048 fprintf(stderr, "Result for %s failed\n", filename); 2049 return(-1); 2050 } 2051 if (err != NULL) { 2052 res = compareFileMem(err, testErrors, testErrorsSize); 2053 if (res != 0) { 2054 fprintf(stderr, "Error for %s failed\n", filename); 2055 return(-1); 2056 } 2057 } else if (options & XML_PARSE_DTDVALID) { 2058 if (testErrorsSize != 0) 2059 fprintf(stderr, "Validation for %s failed\n", filename); 2060 } 2061 2062 return(0); 2063 } 2064 2065 #ifdef LIBXML_READER_ENABLED 2066 /************************************************************************ 2067 * * 2068 * Reader based tests * 2069 * * 2070 ************************************************************************/ 2071 2072 static void processNode(FILE *out, xmlTextReaderPtr reader) { 2073 const xmlChar *name, *value; 2074 int type, empty; 2075 2076 type = xmlTextReaderNodeType(reader); 2077 empty = xmlTextReaderIsEmptyElement(reader); 2078 2079 name = xmlTextReaderConstName(reader); 2080 if (name == NULL) 2081 name = BAD_CAST "--"; 2082 2083 value = xmlTextReaderConstValue(reader); 2084 2085 2086 fprintf(out, "%d %d %s %d %d", 2087 xmlTextReaderDepth(reader), 2088 type, 2089 name, 2090 empty, 2091 xmlTextReaderHasValue(reader)); 2092 if (value == NULL) 2093 fprintf(out, "\n"); 2094 else { 2095 fprintf(out, " %s\n", value); 2096 } 2097 } 2098 static int 2099 streamProcessTest(const char *filename, const char *result, const char *err, 2100 xmlTextReaderPtr reader, const char *rng) { 2101 int ret; 2102 char *temp = NULL; 2103 FILE *t = NULL; 2104 2105 if (reader == NULL) 2106 return(-1); 2107 2108 nb_tests++; 2109 if (result != NULL) { 2110 temp = resultFilename(filename, "", ".res"); 2111 if (temp == NULL) { 2112 fprintf(stderr, "Out of memory\n"); 2113 fatalError(); 2114 } 2115 t = fopen(temp, "wb"); 2116 if (t == NULL) { 2117 fprintf(stderr, "Can't open temp file %s\n", temp); 2118 free(temp); 2119 return(-1); 2120 } 2121 } 2122 #ifdef LIBXML_SCHEMAS_ENABLED 2123 if (rng != NULL) { 2124 ret = xmlTextReaderRelaxNGValidate(reader, rng); 2125 if (ret < 0) { 2126 testErrorHandler(NULL, "Relax-NG schema %s failed to compile\n", 2127 rng); 2128 fclose(t); 2129 if (temp != NULL) { 2130 unlink(temp); 2131 free(temp); 2132 } 2133 return(0); 2134 } 2135 } 2136 #endif 2137 xmlGetWarningsDefaultValue = 1; 2138 ret = xmlTextReaderRead(reader); 2139 while (ret == 1) { 2140 if ((t != NULL) && (rng == NULL)) 2141 processNode(t, reader); 2142 ret = xmlTextReaderRead(reader); 2143 } 2144 if (ret != 0) { 2145 testErrorHandler(NULL, "%s : failed to parse\n", filename); 2146 } 2147 if (rng != NULL) { 2148 if (xmlTextReaderIsValid(reader) != 1) { 2149 testErrorHandler(NULL, "%s fails to validate\n", filename); 2150 } else { 2151 testErrorHandler(NULL, "%s validates\n", filename); 2152 } 2153 } 2154 xmlGetWarningsDefaultValue = 0; 2155 if (t != NULL) { 2156 fclose(t); 2157 ret = compareFiles(temp, result); 2158 if (temp != NULL) { 2159 unlink(temp); 2160 free(temp); 2161 } 2162 if (ret) { 2163 fprintf(stderr, "Result for %s failed\n", filename); 2164 return(-1); 2165 } 2166 } 2167 if (err != NULL) { 2168 ret = compareFileMem(err, testErrors, testErrorsSize); 2169 if (ret != 0) { 2170 fprintf(stderr, "Error for %s failed\n", filename); 2171 printf("%s", testErrors); 2172 return(-1); 2173 } 2174 } 2175 2176 return(0); 2177 } 2178 2179 /** 2180 * streamParseTest: 2181 * @filename: the file to parse 2182 * @result: the file with expected result 2183 * @err: the file with error messages 2184 * 2185 * Parse a file using the reader API and check for errors. 2186 * 2187 * Returns 0 in case of success, an error code otherwise 2188 */ 2189 static int 2190 streamParseTest(const char *filename, const char *result, const char *err, 2191 int options) { 2192 xmlTextReaderPtr reader; 2193 int ret; 2194 2195 reader = xmlReaderForFile(filename, NULL, options); 2196 ret = streamProcessTest(filename, result, err, reader, NULL); 2197 xmlFreeTextReader(reader); 2198 return(ret); 2199 } 2200 2201 /** 2202 * walkerParseTest: 2203 * @filename: the file to parse 2204 * @result: the file with expected result 2205 * @err: the file with error messages 2206 * 2207 * Parse a file using the walker, i.e. a reader built from a atree. 2208 * 2209 * Returns 0 in case of success, an error code otherwise 2210 */ 2211 static int 2212 walkerParseTest(const char *filename, const char *result, const char *err, 2213 int options) { 2214 xmlDocPtr doc; 2215 xmlTextReaderPtr reader; 2216 int ret; 2217 2218 doc = xmlReadFile(filename, NULL, options); 2219 if (doc == NULL) { 2220 fprintf(stderr, "Failed to parse %s\n", filename); 2221 return(-1); 2222 } 2223 reader = xmlReaderWalker(doc); 2224 ret = streamProcessTest(filename, result, err, reader, NULL); 2225 xmlFreeTextReader(reader); 2226 xmlFreeDoc(doc); 2227 return(ret); 2228 } 2229 2230 /** 2231 * streamMemParseTest: 2232 * @filename: the file to parse 2233 * @result: the file with expected result 2234 * @err: the file with error messages 2235 * 2236 * Parse a file using the reader API from memory and check for errors. 2237 * 2238 * Returns 0 in case of success, an error code otherwise 2239 */ 2240 static int 2241 streamMemParseTest(const char *filename, const char *result, const char *err, 2242 int options) { 2243 xmlTextReaderPtr reader; 2244 int ret; 2245 const char *base; 2246 int size; 2247 2248 /* 2249 * load and parse the memory 2250 */ 2251 if (loadMem(filename, &base, &size) != 0) { 2252 fprintf(stderr, "Failed to load %s\n", filename); 2253 return(-1); 2254 } 2255 reader = xmlReaderForMemory(base, size, filename, NULL, options); 2256 ret = streamProcessTest(filename, result, err, reader, NULL); 2257 free((char *)base); 2258 xmlFreeTextReader(reader); 2259 return(ret); 2260 } 2261 #endif 2262 2263 #ifdef LIBXML_XPATH_ENABLED 2264 #ifdef LIBXML_DEBUG_ENABLED 2265 /************************************************************************ 2266 * * 2267 * XPath and XPointer based tests * 2268 * * 2269 ************************************************************************/ 2270 2271 static FILE *xpathOutput; 2272 static xmlDocPtr xpathDocument; 2273 2274 static void 2275 testXPath(const char *str, int xptr, int expr) { 2276 xmlXPathObjectPtr res; 2277 xmlXPathContextPtr ctxt; 2278 2279 nb_tests++; 2280 #if defined(LIBXML_XPTR_ENABLED) 2281 if (xptr) { 2282 ctxt = xmlXPtrNewContext(xpathDocument, NULL, NULL); 2283 res = xmlXPtrEval(BAD_CAST str, ctxt); 2284 } else { 2285 #endif 2286 ctxt = xmlXPathNewContext(xpathDocument); 2287 ctxt->node = xmlDocGetRootElement(xpathDocument); 2288 if (expr) 2289 res = xmlXPathEvalExpression(BAD_CAST str, ctxt); 2290 else { 2291 /* res = xmlXPathEval(BAD_CAST str, ctxt); */ 2292 xmlXPathCompExprPtr comp; 2293 2294 comp = xmlXPathCompile(BAD_CAST str); 2295 if (comp != NULL) { 2296 res = xmlXPathCompiledEval(comp, ctxt); 2297 xmlXPathFreeCompExpr(comp); 2298 } else 2299 res = NULL; 2300 } 2301 #if defined(LIBXML_XPTR_ENABLED) 2302 } 2303 #endif 2304 xmlXPathDebugDumpObject(xpathOutput, res, 0); 2305 xmlXPathFreeObject(res); 2306 xmlXPathFreeContext(ctxt); 2307 } 2308 2309 /** 2310 * xpathExprTest: 2311 * @filename: the file to parse 2312 * @result: the file with expected result 2313 * @err: the file with error messages 2314 * 2315 * Parse a file containing XPath standalone expressions and evaluate them 2316 * 2317 * Returns 0 in case of success, an error code otherwise 2318 */ 2319 static int 2320 xpathCommonTest(const char *filename, const char *result, 2321 int xptr, int expr) { 2322 FILE *input; 2323 char expression[5000]; 2324 int len, ret = 0; 2325 char *temp; 2326 2327 temp = resultFilename(filename, "", ".res"); 2328 if (temp == NULL) { 2329 fprintf(stderr, "Out of memory\n"); 2330 fatalError(); 2331 } 2332 xpathOutput = fopen(temp, "wb"); 2333 if (xpathOutput == NULL) { 2334 fprintf(stderr, "failed to open output file %s\n", temp); 2335 free(temp); 2336 return(-1); 2337 } 2338 2339 input = fopen(filename, "rb"); 2340 if (input == NULL) { 2341 xmlGenericError(xmlGenericErrorContext, 2342 "Cannot open %s for reading\n", filename); 2343 free(temp); 2344 return(-1); 2345 } 2346 while (fgets(expression, 4500, input) != NULL) { 2347 len = strlen(expression); 2348 len--; 2349 while ((len >= 0) && 2350 ((expression[len] == '\n') || (expression[len] == '\t') || 2351 (expression[len] == '\r') || (expression[len] == ' '))) len--; 2352 expression[len + 1] = 0; 2353 if (len >= 0) { 2354 fprintf(xpathOutput, 2355 "\n========================\nExpression: %s\n", 2356 expression) ; 2357 testXPath(expression, xptr, expr); 2358 } 2359 } 2360 2361 fclose(input); 2362 fclose(xpathOutput); 2363 if (result != NULL) { 2364 ret = compareFiles(temp, result); 2365 if (ret) { 2366 fprintf(stderr, "Result for %s failed\n", filename); 2367 } 2368 } 2369 2370 if (temp != NULL) { 2371 unlink(temp); 2372 free(temp); 2373 } 2374 return(ret); 2375 } 2376 2377 /** 2378 * xpathExprTest: 2379 * @filename: the file to parse 2380 * @result: the file with expected result 2381 * @err: the file with error messages 2382 * 2383 * Parse a file containing XPath standalone expressions and evaluate them 2384 * 2385 * Returns 0 in case of success, an error code otherwise 2386 */ 2387 static int 2388 xpathExprTest(const char *filename, const char *result, 2389 const char *err ATTRIBUTE_UNUSED, 2390 int options ATTRIBUTE_UNUSED) { 2391 return(xpathCommonTest(filename, result, 0, 1)); 2392 } 2393 2394 /** 2395 * xpathDocTest: 2396 * @filename: the file to parse 2397 * @result: the file with expected result 2398 * @err: the file with error messages 2399 * 2400 * Parse a file containing XPath expressions and evaluate them against 2401 * a set of corresponding documents. 2402 * 2403 * Returns 0 in case of success, an error code otherwise 2404 */ 2405 static int 2406 xpathDocTest(const char *filename, 2407 const char *resul ATTRIBUTE_UNUSED, 2408 const char *err ATTRIBUTE_UNUSED, 2409 int options) { 2410 2411 char pattern[500]; 2412 char result[500]; 2413 glob_t globbuf; 2414 size_t i; 2415 int ret = 0, res; 2416 2417 xpathDocument = xmlReadFile(filename, NULL, 2418 options | XML_PARSE_DTDATTR | XML_PARSE_NOENT); 2419 if (xpathDocument == NULL) { 2420 fprintf(stderr, "Failed to load %s\n", filename); 2421 return(-1); 2422 } 2423 2424 snprintf(pattern, 499, "./test/XPath/tests/%s*", baseFilename(filename)); 2425 pattern[499] = 0; 2426 globbuf.gl_offs = 0; 2427 glob(pattern, GLOB_DOOFFS, NULL, &globbuf); 2428 for (i = 0;i < globbuf.gl_pathc;i++) { 2429 snprintf(result, 499, "result/XPath/tests/%s", 2430 baseFilename(globbuf.gl_pathv[i])); 2431 res = xpathCommonTest(globbuf.gl_pathv[i], &result[0], 0, 0); 2432 if (res != 0) 2433 ret = res; 2434 } 2435 globfree(&globbuf); 2436 2437 xmlFreeDoc(xpathDocument); 2438 return(ret); 2439 } 2440 2441 #ifdef LIBXML_XPTR_ENABLED 2442 /** 2443 * xptrDocTest: 2444 * @filename: the file to parse 2445 * @result: the file with expected result 2446 * @err: the file with error messages 2447 * 2448 * Parse a file containing XPath expressions and evaluate them against 2449 * a set of corresponding documents. 2450 * 2451 * Returns 0 in case of success, an error code otherwise 2452 */ 2453 static int 2454 xptrDocTest(const char *filename, 2455 const char *resul ATTRIBUTE_UNUSED, 2456 const char *err ATTRIBUTE_UNUSED, 2457 int options) { 2458 2459 char pattern[500]; 2460 char result[500]; 2461 glob_t globbuf; 2462 size_t i; 2463 int ret = 0, res; 2464 2465 xpathDocument = xmlReadFile(filename, NULL, 2466 options | XML_PARSE_DTDATTR | XML_PARSE_NOENT); 2467 if (xpathDocument == NULL) { 2468 fprintf(stderr, "Failed to load %s\n", filename); 2469 return(-1); 2470 } 2471 2472 snprintf(pattern, 499, "./test/XPath/xptr/%s*", baseFilename(filename)); 2473 pattern[499] = 0; 2474 globbuf.gl_offs = 0; 2475 glob(pattern, GLOB_DOOFFS, NULL, &globbuf); 2476 for (i = 0;i < globbuf.gl_pathc;i++) { 2477 snprintf(result, 499, "result/XPath/xptr/%s", 2478 baseFilename(globbuf.gl_pathv[i])); 2479 res = xpathCommonTest(globbuf.gl_pathv[i], &result[0], 1, 0); 2480 if (res != 0) 2481 ret = res; 2482 } 2483 globfree(&globbuf); 2484 2485 xmlFreeDoc(xpathDocument); 2486 return(ret); 2487 } 2488 #endif /* LIBXML_XPTR_ENABLED */ 2489 2490 /** 2491 * xmlidDocTest: 2492 * @filename: the file to parse 2493 * @result: the file with expected result 2494 * @err: the file with error messages 2495 * 2496 * Parse a file containing xml:id and check for errors and verify 2497 * that XPath queries will work on them as expected. 2498 * 2499 * Returns 0 in case of success, an error code otherwise 2500 */ 2501 static int 2502 xmlidDocTest(const char *filename, 2503 const char *result, 2504 const char *err, 2505 int options) { 2506 2507 int res = 0; 2508 int ret = 0; 2509 char *temp; 2510 2511 xpathDocument = xmlReadFile(filename, NULL, 2512 options | XML_PARSE_DTDATTR | XML_PARSE_NOENT); 2513 if (xpathDocument == NULL) { 2514 fprintf(stderr, "Failed to load %s\n", filename); 2515 return(-1); 2516 } 2517 2518 temp = resultFilename(filename, "", ".res"); 2519 if (temp == NULL) { 2520 fprintf(stderr, "Out of memory\n"); 2521 fatalError(); 2522 } 2523 xpathOutput = fopen(temp, "wb"); 2524 if (xpathOutput == NULL) { 2525 fprintf(stderr, "failed to open output file %s\n", temp); 2526 xmlFreeDoc(xpathDocument); 2527 free(temp); 2528 return(-1); 2529 } 2530 2531 testXPath("id('bar')", 0, 0); 2532 2533 fclose(xpathOutput); 2534 if (result != NULL) { 2535 ret = compareFiles(temp, result); 2536 if (ret) { 2537 fprintf(stderr, "Result for %s failed\n", filename); 2538 res = 1; 2539 } 2540 } 2541 2542 if (temp != NULL) { 2543 unlink(temp); 2544 free(temp); 2545 } 2546 xmlFreeDoc(xpathDocument); 2547 2548 if (err != NULL) { 2549 ret = compareFileMem(err, testErrors, testErrorsSize); 2550 if (ret != 0) { 2551 fprintf(stderr, "Error for %s failed\n", filename); 2552 res = 1; 2553 } 2554 } 2555 return(res); 2556 } 2557 2558 #endif /* LIBXML_DEBUG_ENABLED */ 2559 #endif /* XPATH */ 2560 /************************************************************************ 2561 * * 2562 * URI based tests * 2563 * * 2564 ************************************************************************/ 2565 2566 static void 2567 handleURI(const char *str, const char *base, FILE *o) { 2568 int ret; 2569 xmlURIPtr uri; 2570 xmlChar *res = NULL; 2571 2572 uri = xmlCreateURI(); 2573 2574 if (base == NULL) { 2575 ret = xmlParseURIReference(uri, str); 2576 if (ret != 0) 2577 fprintf(o, "%s : error %d\n", str, ret); 2578 else { 2579 xmlNormalizeURIPath(uri->path); 2580 xmlPrintURI(o, uri); 2581 fprintf(o, "\n"); 2582 } 2583 } else { 2584 res = xmlBuildURI((xmlChar *)str, (xmlChar *) base); 2585 if (res != NULL) { 2586 fprintf(o, "%s\n", (char *) res); 2587 } 2588 else 2589 fprintf(o, "::ERROR::\n"); 2590 } 2591 if (res != NULL) 2592 xmlFree(res); 2593 xmlFreeURI(uri); 2594 } 2595 2596 /** 2597 * uriCommonTest: 2598 * @filename: the file to parse 2599 * @result: the file with expected result 2600 * @err: the file with error messages 2601 * 2602 * Parse a file containing URI and check for errors 2603 * 2604 * Returns 0 in case of success, an error code otherwise 2605 */ 2606 static int 2607 uriCommonTest(const char *filename, 2608 const char *result, 2609 const char *err, 2610 const char *base) { 2611 char *temp; 2612 FILE *o, *f; 2613 char str[1024]; 2614 int res = 0, i, ret; 2615 2616 temp = resultFilename(filename, "", ".res"); 2617 if (temp == NULL) { 2618 fprintf(stderr, "Out of memory\n"); 2619 fatalError(); 2620 } 2621 o = fopen(temp, "wb"); 2622 if (o == NULL) { 2623 fprintf(stderr, "failed to open output file %s\n", temp); 2624 free(temp); 2625 return(-1); 2626 } 2627 f = fopen(filename, "rb"); 2628 if (f == NULL) { 2629 fprintf(stderr, "failed to open input file %s\n", filename); 2630 fclose(o); 2631 if (temp != NULL) { 2632 unlink(temp); 2633 free(temp); 2634 } 2635 return(-1); 2636 } 2637 2638 while (1) { 2639 /* 2640 * read one line in string buffer. 2641 */ 2642 if (fgets (&str[0], sizeof (str) - 1, f) == NULL) 2643 break; 2644 2645 /* 2646 * remove the ending spaces 2647 */ 2648 i = strlen(str); 2649 while ((i > 0) && 2650 ((str[i - 1] == '\n') || (str[i - 1] == '\r') || 2651 (str[i - 1] == ' ') || (str[i - 1] == '\t'))) { 2652 i--; 2653 str[i] = 0; 2654 } 2655 nb_tests++; 2656 handleURI(str, base, o); 2657 } 2658 2659 fclose(f); 2660 fclose(o); 2661 2662 if (result != NULL) { 2663 ret = compareFiles(temp, result); 2664 if (ret) { 2665 fprintf(stderr, "Result for %s failed\n", filename); 2666 res = 1; 2667 } 2668 } 2669 if (err != NULL) { 2670 ret = compareFileMem(err, testErrors, testErrorsSize); 2671 if (ret != 0) { 2672 fprintf(stderr, "Error for %s failed\n", filename); 2673 res = 1; 2674 } 2675 } 2676 2677 if (temp != NULL) { 2678 unlink(temp); 2679 free(temp); 2680 } 2681 return(res); 2682 } 2683 2684 /** 2685 * uriParseTest: 2686 * @filename: the file to parse 2687 * @result: the file with expected result 2688 * @err: the file with error messages 2689 * 2690 * Parse a file containing URI and check for errors 2691 * 2692 * Returns 0 in case of success, an error code otherwise 2693 */ 2694 static int 2695 uriParseTest(const char *filename, 2696 const char *result, 2697 const char *err, 2698 int options ATTRIBUTE_UNUSED) { 2699 return(uriCommonTest(filename, result, err, NULL)); 2700 } 2701 2702 /** 2703 * uriBaseTest: 2704 * @filename: the file to parse 2705 * @result: the file with expected result 2706 * @err: the file with error messages 2707 * 2708 * Parse a file containing URI, compose them against a fixed base and 2709 * check for errors 2710 * 2711 * Returns 0 in case of success, an error code otherwise 2712 */ 2713 static int 2714 uriBaseTest(const char *filename, 2715 const char *result, 2716 const char *err, 2717 int options ATTRIBUTE_UNUSED) { 2718 return(uriCommonTest(filename, result, err, 2719 "http://foo.com/path/to/index.html?orig#help")); 2720 } 2721 2722 static int urip_success = 1; 2723 static int urip_current = 0; 2724 static const char *urip_testURLs[] = { 2725 "urip://example.com/a b.html", 2726 "urip://example.com/a%20b.html", 2727 "file:///path/to/a b.html", 2728 "file:///path/to/a%20b.html", 2729 "/path/to/a b.html", 2730 "/path/to/a%20b.html", 2731 "urip://example.com/rsum.html", 2732 "urip://example.com/test?a=1&b=2%263&c=4#foo", 2733 NULL 2734 }; 2735 static const char *urip_rcvsURLs[] = { 2736 /* it is an URI the strings must be escaped */ 2737 "urip://example.com/a%20b.html", 2738 /* check that % escaping is not broken */ 2739 "urip://example.com/a%20b.html", 2740 /* it's an URI path the strings must be escaped */ 2741 "file:///path/to/a%20b.html", 2742 /* check that % escaping is not broken */ 2743 "file:///path/to/a%20b.html", 2744 /* this is not an URI, this is a path, so this should not be escaped */ 2745 "/path/to/a b.html", 2746 /* check that paths with % are not broken */ 2747 "/path/to/a%20b.html", 2748 /* out of context the encoding can't be guessed byte by byte conversion */ 2749 "urip://example.com/r%E9sum%E9.html", 2750 /* verify we don't destroy URIs especially the query part */ 2751 "urip://example.com/test?a=1&b=2%263&c=4#foo", 2752 NULL 2753 }; 2754 static const char *urip_res = "<list/>"; 2755 static const char *urip_cur = NULL; 2756 static int urip_rlen; 2757 2758 /** 2759 * uripMatch: 2760 * @URI: an URI to test 2761 * 2762 * Check for an urip: query 2763 * 2764 * Returns 1 if yes and 0 if another Input module should be used 2765 */ 2766 static int 2767 uripMatch(const char * URI) { 2768 if ((URI == NULL) || (!strcmp(URI, "file:///etc/xml/catalog"))) 2769 return(0); 2770 /* Verify we received the escaped URL */ 2771 if (strcmp(urip_rcvsURLs[urip_current], URI)) 2772 urip_success = 0; 2773 return(1); 2774 } 2775 2776 /** 2777 * uripOpen: 2778 * @URI: an URI to test 2779 * 2780 * Return a pointer to the urip: query handler, in this example simply 2781 * the urip_current pointer... 2782 * 2783 * Returns an Input context or NULL in case or error 2784 */ 2785 static void * 2786 uripOpen(const char * URI) { 2787 if ((URI == NULL) || (!strcmp(URI, "file:///etc/xml/catalog"))) 2788 return(NULL); 2789 /* Verify we received the escaped URL */ 2790 if (strcmp(urip_rcvsURLs[urip_current], URI)) 2791 urip_success = 0; 2792 urip_cur = urip_res; 2793 urip_rlen = strlen(urip_res); 2794 return((void *) urip_cur); 2795 } 2796 2797 /** 2798 * uripClose: 2799 * @context: the read context 2800 * 2801 * Close the urip: query handler 2802 * 2803 * Returns 0 or -1 in case of error 2804 */ 2805 static int 2806 uripClose(void * context) { 2807 if (context == NULL) return(-1); 2808 urip_cur = NULL; 2809 urip_rlen = 0; 2810 return(0); 2811 } 2812 2813 /** 2814 * uripRead: 2815 * @context: the read context 2816 * @buffer: where to store data 2817 * @len: number of bytes to read 2818 * 2819 * Implement an urip: query read. 2820 * 2821 * Returns the number of bytes read or -1 in case of error 2822 */ 2823 static int 2824 uripRead(void * context, char * buffer, int len) { 2825 const char *ptr = (const char *) context; 2826 2827 if ((context == NULL) || (buffer == NULL) || (len < 0)) 2828 return(-1); 2829 2830 if (len > urip_rlen) len = urip_rlen; 2831 memcpy(buffer, ptr, len); 2832 urip_rlen -= len; 2833 return(len); 2834 } 2835 2836 static int 2837 urip_checkURL(const char *URL) { 2838 xmlDocPtr doc; 2839 2840 doc = xmlReadFile(URL, NULL, 0); 2841 if (doc == NULL) 2842 return(-1); 2843 xmlFreeDoc(doc); 2844 return(1); 2845 } 2846 2847 /** 2848 * uriPathTest: 2849 * @filename: ignored 2850 * @result: ignored 2851 * @err: ignored 2852 * 2853 * Run a set of tests to check how Path and URI are handled before 2854 * being passed to the I/O layer 2855 * 2856 * Returns 0 in case of success, an error code otherwise 2857 */ 2858 static int 2859 uriPathTest(const char *filename ATTRIBUTE_UNUSED, 2860 const char *result ATTRIBUTE_UNUSED, 2861 const char *err ATTRIBUTE_UNUSED, 2862 int options ATTRIBUTE_UNUSED) { 2863 int parsed; 2864 int failures = 0; 2865 2866 /* 2867 * register the new I/O handlers 2868 */ 2869 if (xmlRegisterInputCallbacks(uripMatch, uripOpen, uripRead, uripClose) < 0) 2870 { 2871 fprintf(stderr, "failed to register HTTP handler\n"); 2872 return(-1); 2873 } 2874 2875 for (urip_current = 0;urip_testURLs[urip_current] != NULL;urip_current++) { 2876 urip_success = 1; 2877 parsed = urip_checkURL(urip_testURLs[urip_current]); 2878 if (urip_success != 1) { 2879 fprintf(stderr, "failed the URL passing test for %s", 2880 urip_testURLs[urip_current]); 2881 failures++; 2882 } else if (parsed != 1) { 2883 fprintf(stderr, "failed the parsing test for %s", 2884 urip_testURLs[urip_current]); 2885 failures++; 2886 } 2887 nb_tests++; 2888 } 2889 2890 xmlPopInputCallbacks(); 2891 return(failures); 2892 } 2893 2894 #ifdef LIBXML_SCHEMAS_ENABLED 2895 /************************************************************************ 2896 * * 2897 * Schemas tests * 2898 * * 2899 ************************************************************************/ 2900 static int 2901 schemasOneTest(const char *sch, 2902 const char *filename, 2903 const char *result, 2904 const char *err, 2905 int options, 2906 xmlSchemaPtr schemas) { 2907 xmlDocPtr doc; 2908 xmlSchemaValidCtxtPtr ctxt; 2909 int ret = 0; 2910 int validResult = 0; 2911 char *temp; 2912 FILE *schemasOutput; 2913 2914 doc = xmlReadFile(filename, NULL, options); 2915 if (doc == NULL) { 2916 fprintf(stderr, "failed to parse instance %s for %s\n", filename, sch); 2917 return(-1); 2918 } 2919 2920 temp = resultFilename(result, "", ".res"); 2921 if (temp == NULL) { 2922 fprintf(stderr, "Out of memory\n"); 2923 fatalError(); 2924 } 2925 schemasOutput = fopen(temp, "wb"); 2926 if (schemasOutput == NULL) { 2927 fprintf(stderr, "failed to open output file %s\n", temp); 2928 xmlFreeDoc(doc); 2929 free(temp); 2930 return(-1); 2931 } 2932 2933 ctxt = xmlSchemaNewValidCtxt(schemas); 2934 xmlSchemaSetValidErrors(ctxt, 2935 (xmlSchemaValidityErrorFunc) testErrorHandler, 2936 (xmlSchemaValidityWarningFunc) testErrorHandler, 2937 ctxt); 2938 validResult = xmlSchemaValidateDoc(ctxt, doc); 2939 if (validResult == 0) { 2940 fprintf(schemasOutput, "%s validates\n", filename); 2941 } else if (validResult > 0) { 2942 fprintf(schemasOutput, "%s fails to validate\n", filename); 2943 } else { 2944 fprintf(schemasOutput, "%s validation generated an internal error\n", 2945 filename); 2946 } 2947 fclose(schemasOutput); 2948 if (result) { 2949 if (compareFiles(temp, result)) { 2950 fprintf(stderr, "Result for %s on %s failed\n", filename, sch); 2951 ret = 1; 2952 } 2953 } 2954 if (temp != NULL) { 2955 unlink(temp); 2956 free(temp); 2957 } 2958 2959 if ((validResult != 0) && (err != NULL)) { 2960 if (compareFileMem(err, testErrors, testErrorsSize)) { 2961 fprintf(stderr, "Error for %s on %s failed\n", filename, sch); 2962 ret = 1; 2963 } 2964 } 2965 2966 xmlSchemaFreeValidCtxt(ctxt); 2967 xmlFreeDoc(doc); 2968 return(ret); 2969 } 2970 /** 2971 * schemasTest: 2972 * @filename: the schemas file 2973 * @result: the file with expected result 2974 * @err: the file with error messages 2975 * 2976 * Parse a file containing URI, compose them against a fixed base and 2977 * check for errors 2978 * 2979 * Returns 0 in case of success, an error code otherwise 2980 */ 2981 static int 2982 schemasTest(const char *filename, 2983 const char *resul ATTRIBUTE_UNUSED, 2984 const char *errr ATTRIBUTE_UNUSED, 2985 int options) { 2986 const char *base = baseFilename(filename); 2987 const char *base2; 2988 const char *instance; 2989 xmlSchemaParserCtxtPtr ctxt; 2990 xmlSchemaPtr schemas; 2991 int res = 0, len, ret; 2992 char pattern[500]; 2993 char prefix[500]; 2994 char result[500]; 2995 char err[500]; 2996 glob_t globbuf; 2997 size_t i; 2998 char count = 0; 2999 3000 /* first compile the schemas if possible */ 3001 ctxt = xmlSchemaNewParserCtxt(filename); 3002 xmlSchemaSetParserErrors(ctxt, 3003 (xmlSchemaValidityErrorFunc) testErrorHandler, 3004 (xmlSchemaValidityWarningFunc) testErrorHandler, 3005 ctxt); 3006 schemas = xmlSchemaParse(ctxt); 3007 xmlSchemaFreeParserCtxt(ctxt); 3008 3009 /* 3010 * most of the mess is about the output filenames generated by the Makefile 3011 */ 3012 len = strlen(base); 3013 if ((len > 499) || (len < 5)) { 3014 xmlSchemaFree(schemas); 3015 return(-1); 3016 } 3017 len -= 4; /* remove trailing .xsd */ 3018 if (base[len - 2] == '_') { 3019 len -= 2; /* remove subtest number */ 3020 } 3021 if (base[len - 2] == '_') { 3022 len -= 2; /* remove subtest number */ 3023 } 3024 memcpy(prefix, base, len); 3025 prefix[len] = 0; 3026 3027 snprintf(pattern, 499, "./test/schemas/%s_?.xml", prefix); 3028 pattern[499] = 0; 3029 3030 if (base[len] == '_') { 3031 len += 2; 3032 memcpy(prefix, base, len); 3033 prefix[len] = 0; 3034 } 3035 3036 globbuf.gl_offs = 0; 3037 glob(pattern, GLOB_DOOFFS, NULL, &globbuf); 3038 for (i = 0;i < globbuf.gl_pathc;i++) { 3039 testErrorsSize = 0; 3040 testErrors[0] = 0; 3041 instance = globbuf.gl_pathv[i]; 3042 base2 = baseFilename(instance); 3043 len = strlen(base2); 3044 if ((len > 6) && (base2[len - 6] == '_')) { 3045 count = base2[len - 5]; 3046 snprintf(result, 499, "result/schemas/%s_%c", 3047 prefix, count); 3048 result[499] = 0; 3049 snprintf(err, 499, "result/schemas/%s_%c.err", 3050 prefix, count); 3051 err[499] = 0; 3052 } else { 3053 fprintf(stderr, "don't know how to process %s\n", instance); 3054 continue; 3055 } 3056 if (schemas == NULL) { 3057 } else { 3058 nb_tests++; 3059 ret = schemasOneTest(filename, instance, result, err, 3060 options, schemas); 3061 if (ret != 0) 3062 res = ret; 3063 } 3064 } 3065 globfree(&globbuf); 3066 xmlSchemaFree(schemas); 3067 3068 return(res); 3069 } 3070 3071 /************************************************************************ 3072 * * 3073 * Schemas tests * 3074 * * 3075 ************************************************************************/ 3076 static int 3077 rngOneTest(const char *sch, 3078 const char *filename, 3079 const char *result, 3080 const char *err, 3081 int options, 3082 xmlRelaxNGPtr schemas) { 3083 xmlDocPtr doc; 3084 xmlRelaxNGValidCtxtPtr ctxt; 3085 int ret = 0; 3086 char *temp; 3087 FILE *schemasOutput; 3088 3089 doc = xmlReadFile(filename, NULL, options); 3090 if (doc == NULL) { 3091 fprintf(stderr, "failed to parse instance %s for %s\n", filename, sch); 3092 return(-1); 3093 } 3094 3095 temp = resultFilename(result, "", ".res"); 3096 if (temp == NULL) { 3097 fprintf(stderr, "Out of memory\n"); 3098 fatalError(); 3099 } 3100 schemasOutput = fopen(temp, "wb"); 3101 if (schemasOutput == NULL) { 3102 fprintf(stderr, "failed to open output file %s\n", temp); 3103 xmlFreeDoc(doc); 3104 free(temp); 3105 return(-1); 3106 } 3107 3108 ctxt = xmlRelaxNGNewValidCtxt(schemas); 3109 xmlRelaxNGSetValidErrors(ctxt, 3110 (xmlRelaxNGValidityErrorFunc) testErrorHandler, 3111 (xmlRelaxNGValidityWarningFunc) testErrorHandler, 3112 ctxt); 3113 ret = xmlRelaxNGValidateDoc(ctxt, doc); 3114 if (ret == 0) { 3115 testErrorHandler(NULL, "%s validates\n", filename); 3116 } else if (ret > 0) { 3117 testErrorHandler(NULL, "%s fails to validate\n", filename); 3118 } else { 3119 testErrorHandler(NULL, "%s validation generated an internal error\n", 3120 filename); 3121 } 3122 fclose(schemasOutput); 3123 ret = 0; 3124 if (result) { 3125 if (compareFiles(temp, result)) { 3126 fprintf(stderr, "Result for %s on %s failed\n", filename, sch); 3127 ret = 1; 3128 } 3129 } 3130 if (temp != NULL) { 3131 unlink(temp); 3132 free(temp); 3133 } 3134 3135 if (err != NULL) { 3136 if (compareFileMem(err, testErrors, testErrorsSize)) { 3137 fprintf(stderr, "Error for %s on %s failed\n", filename, sch); 3138 ret = 1; 3139 printf("%s", testErrors); 3140 } 3141 } 3142 3143 3144 xmlRelaxNGFreeValidCtxt(ctxt); 3145 xmlFreeDoc(doc); 3146 return(ret); 3147 } 3148 /** 3149 * rngTest: 3150 * @filename: the schemas file 3151 * @result: the file with expected result 3152 * @err: the file with error messages 3153 * 3154 * Parse an RNG schemas and then apply it to the related .xml 3155 * 3156 * Returns 0 in case of success, an error code otherwise 3157 */ 3158 static int 3159 rngTest(const char *filename, 3160 const char *resul ATTRIBUTE_UNUSED, 3161 const char *errr ATTRIBUTE_UNUSED, 3162 int options) { 3163 const char *base = baseFilename(filename); 3164 const char *base2; 3165 const char *instance; 3166 xmlRelaxNGParserCtxtPtr ctxt; 3167 xmlRelaxNGPtr schemas; 3168 int res = 0, len, ret = 0; 3169 char pattern[500]; 3170 char prefix[500]; 3171 char result[500]; 3172 char err[500]; 3173 glob_t globbuf; 3174 size_t i; 3175 char count = 0; 3176 3177 /* first compile the schemas if possible */ 3178 ctxt = xmlRelaxNGNewParserCtxt(filename); 3179 xmlRelaxNGSetParserErrors(ctxt, 3180 (xmlRelaxNGValidityErrorFunc) testErrorHandler, 3181 (xmlRelaxNGValidityWarningFunc) testErrorHandler, 3182 ctxt); 3183 schemas = xmlRelaxNGParse(ctxt); 3184 xmlRelaxNGFreeParserCtxt(ctxt); 3185 3186 /* 3187 * most of the mess is about the output filenames generated by the Makefile 3188 */ 3189 len = strlen(base); 3190 if ((len > 499) || (len < 5)) { 3191 xmlRelaxNGFree(schemas); 3192 return(-1); 3193 } 3194 len -= 4; /* remove trailing .rng */ 3195 memcpy(prefix, base, len); 3196 prefix[len] = 0; 3197 3198 snprintf(pattern, 499, "./test/relaxng/%s_?.xml", prefix); 3199 pattern[499] = 0; 3200 3201 globbuf.gl_offs = 0; 3202 glob(pattern, GLOB_DOOFFS, NULL, &globbuf); 3203 for (i = 0;i < globbuf.gl_pathc;i++) { 3204 testErrorsSize = 0; 3205 testErrors[0] = 0; 3206 instance = globbuf.gl_pathv[i]; 3207 base2 = baseFilename(instance); 3208 len = strlen(base2); 3209 if ((len > 6) && (base2[len - 6] == '_')) { 3210 count = base2[len - 5]; 3211 snprintf(result, 499, "result/relaxng/%s_%c", 3212 prefix, count); 3213 result[499] = 0; 3214 snprintf(err, 499, "result/relaxng/%s_%c.err", 3215 prefix, count); 3216 err[499] = 0; 3217 } else { 3218 fprintf(stderr, "don't know how to process %s\n", instance); 3219 continue; 3220 } 3221 if (schemas == NULL) { 3222 } else { 3223 nb_tests++; 3224 ret = rngOneTest(filename, instance, result, err, 3225 options, schemas); 3226 if (res != 0) 3227 ret = res; 3228 } 3229 } 3230 globfree(&globbuf); 3231 xmlRelaxNGFree(schemas); 3232 3233 return(ret); 3234 } 3235 3236 #ifdef LIBXML_READER_ENABLED 3237 /** 3238 * rngStreamTest: 3239 * @filename: the schemas file 3240 * @result: the file with expected result 3241 * @err: the file with error messages 3242 * 3243 * Parse a set of files with streaming, applying an RNG schemas 3244 * 3245 * Returns 0 in case of success, an error code otherwise 3246 */ 3247 static int 3248 rngStreamTest(const char *filename, 3249 const char *resul ATTRIBUTE_UNUSED, 3250 const char *errr ATTRIBUTE_UNUSED, 3251 int options) { 3252 const char *base = baseFilename(filename); 3253 const char *base2; 3254 const char *instance; 3255 int res = 0, len, ret; 3256 char pattern[500]; 3257 char prefix[500]; 3258 char result[500]; 3259 char err[500]; 3260 glob_t globbuf; 3261 size_t i; 3262 char count = 0; 3263 xmlTextReaderPtr reader; 3264 int disable_err = 0; 3265 3266 /* 3267 * most of the mess is about the output filenames generated by the Makefile 3268 */ 3269 len = strlen(base); 3270 if ((len > 499) || (len < 5)) { 3271 fprintf(stderr, "len(base) == %d !\n", len); 3272 return(-1); 3273 } 3274 len -= 4; /* remove trailing .rng */ 3275 memcpy(prefix, base, len); 3276 prefix[len] = 0; 3277 3278 /* 3279 * strictly unifying the error messages is nearly impossible this 3280 * hack is also done in the Makefile 3281 */ 3282 if ((!strcmp(prefix, "tutor10_1")) || (!strcmp(prefix, "tutor10_2")) || 3283 (!strcmp(prefix, "tutor3_2")) || (!strcmp(prefix, "307377")) || 3284 (!strcmp(prefix, "tutor8_2"))) 3285 disable_err = 1; 3286 3287 snprintf(pattern, 499, "./test/relaxng/%s_?.xml", prefix); 3288 pattern[499] = 0; 3289 3290 globbuf.gl_offs = 0; 3291 glob(pattern, GLOB_DOOFFS, NULL, &globbuf); 3292 for (i = 0;i < globbuf.gl_pathc;i++) { 3293 testErrorsSize = 0; 3294 testErrors[0] = 0; 3295 instance = globbuf.gl_pathv[i]; 3296 base2 = baseFilename(instance); 3297 len = strlen(base2); 3298 if ((len > 6) && (base2[len - 6] == '_')) { 3299 count = base2[len - 5]; 3300 snprintf(result, 499, "result/relaxng/%s_%c", 3301 prefix, count); 3302 result[499] = 0; 3303 snprintf(err, 499, "result/relaxng/%s_%c.err", 3304 prefix, count); 3305 err[499] = 0; 3306 } else { 3307 fprintf(stderr, "don't know how to process %s\n", instance); 3308 continue; 3309 } 3310 reader = xmlReaderForFile(instance, NULL, options); 3311 if (reader == NULL) { 3312 fprintf(stderr, "Failed to build reder for %s\n", instance); 3313 } 3314 if (disable_err == 1) 3315 ret = streamProcessTest(instance, result, NULL, reader, filename); 3316 else 3317 ret = streamProcessTest(instance, result, err, reader, filename); 3318 xmlFreeTextReader(reader); 3319 if (ret != 0) { 3320 fprintf(stderr, "instance %s failed\n", instance); 3321 res = ret; 3322 } 3323 } 3324 globfree(&globbuf); 3325 3326 return(res); 3327 } 3328 #endif /* READER */ 3329 3330 #endif 3331 3332 #ifdef LIBXML_PATTERN_ENABLED 3333 #ifdef LIBXML_READER_ENABLED 3334 /************************************************************************ 3335 * * 3336 * Patterns tests * 3337 * * 3338 ************************************************************************/ 3339 static void patternNode(FILE *out, xmlTextReaderPtr reader, 3340 const char *pattern, xmlPatternPtr patternc, 3341 xmlStreamCtxtPtr patstream) { 3342 xmlChar *path = NULL; 3343 int match = -1; 3344 int type, empty; 3345 3346 type = xmlTextReaderNodeType(reader); 3347 empty = xmlTextReaderIsEmptyElement(reader); 3348 3349 if (type == XML_READER_TYPE_ELEMENT) { 3350 /* do the check only on element start */ 3351 match = xmlPatternMatch(patternc, xmlTextReaderCurrentNode(reader)); 3352 3353 if (match) { 3354 path = xmlGetNodePath(xmlTextReaderCurrentNode(reader)); 3355 fprintf(out, "Node %s matches pattern %s\n", path, pattern); 3356 } 3357 } 3358 if (patstream != NULL) { 3359 int ret; 3360 3361 if (type == XML_READER_TYPE_ELEMENT) { 3362 ret = xmlStreamPush(patstream, 3363 xmlTextReaderConstLocalName(reader), 3364 xmlTextReaderConstNamespaceUri(reader)); 3365 if (ret < 0) { 3366 fprintf(out, "xmlStreamPush() failure\n"); 3367 xmlFreeStreamCtxt(patstream); 3368 patstream = NULL; 3369 } else if (ret != match) { 3370 if (path == NULL) { 3371 path = xmlGetNodePath( 3372 xmlTextReaderCurrentNode(reader)); 3373 } 3374 fprintf(out, 3375 "xmlPatternMatch and xmlStreamPush disagree\n"); 3376 fprintf(out, 3377 " pattern %s node %s\n", 3378 pattern, path); 3379 } 3380 3381 3382 } 3383 if ((type == XML_READER_TYPE_END_ELEMENT) || 3384 ((type == XML_READER_TYPE_ELEMENT) && (empty))) { 3385 ret = xmlStreamPop(patstream); 3386 if (ret < 0) { 3387 fprintf(out, "xmlStreamPop() failure\n"); 3388 xmlFreeStreamCtxt(patstream); 3389 patstream = NULL; 3390 } 3391 } 3392 } 3393 if (path != NULL) 3394 xmlFree(path); 3395 } 3396 3397 /** 3398 * patternTest: 3399 * @filename: the schemas file 3400 * @result: the file with expected result 3401 * @err: the file with error messages 3402 * 3403 * Parse a set of files with streaming, applying an RNG schemas 3404 * 3405 * Returns 0 in case of success, an error code otherwise 3406 */ 3407 static int 3408 patternTest(const char *filename, 3409 const char *resul ATTRIBUTE_UNUSED, 3410 const char *err ATTRIBUTE_UNUSED, 3411 int options) { 3412 xmlPatternPtr patternc = NULL; 3413 xmlStreamCtxtPtr patstream = NULL; 3414 FILE *o, *f; 3415 char str[1024]; 3416 char xml[500]; 3417 char result[500]; 3418 int len, i; 3419 int ret = 0, res; 3420 char *temp; 3421 xmlTextReaderPtr reader; 3422 xmlDocPtr doc; 3423 3424 len = strlen(filename); 3425 len -= 4; 3426 memcpy(xml, filename, len); 3427 xml[len] = 0; 3428 snprintf(result, 499, "result/pattern/%s", baseFilename(xml)); 3429 result[499] = 0; 3430 memcpy(xml + len, ".xml", 5); 3431 3432 if (!checkTestFile(xml)) { 3433 fprintf(stderr, "Missing xml file %s\n", xml); 3434 return(-1); 3435 } 3436 if (!checkTestFile(result)) { 3437 fprintf(stderr, "Missing result file %s\n", result); 3438 return(-1); 3439 } 3440 f = fopen(filename, "rb"); 3441 if (f == NULL) { 3442 fprintf(stderr, "Failed to open %s\n", filename); 3443 return(-1); 3444 } 3445 temp = resultFilename(filename, "", ".res"); 3446 if (temp == NULL) { 3447 fprintf(stderr, "Out of memory\n"); 3448 fatalError(); 3449 } 3450 o = fopen(temp, "wb"); 3451 if (o == NULL) { 3452 fprintf(stderr, "failed to open output file %s\n", temp); 3453 fclose(f); 3454 free(temp); 3455 return(-1); 3456 } 3457 while (1) { 3458 /* 3459 * read one line in string buffer. 3460 */ 3461 if (fgets (&str[0], sizeof (str) - 1, f) == NULL) 3462 break; 3463 3464 /* 3465 * remove the ending spaces 3466 */ 3467 i = strlen(str); 3468 while ((i > 0) && 3469 ((str[i - 1] == '\n') || (str[i - 1] == '\r') || 3470 (str[i - 1] == ' ') || (str[i - 1] == '\t'))) { 3471 i--; 3472 str[i] = 0; 3473 } 3474 doc = xmlReadFile(xml, NULL, options); 3475 if (doc == NULL) { 3476 fprintf(stderr, "Failed to parse %s\n", xml); 3477 ret = 1; 3478 } else { 3479 xmlNodePtr root; 3480 const xmlChar *namespaces[22]; 3481 int j; 3482 xmlNsPtr ns; 3483 3484 root = xmlDocGetRootElement(doc); 3485 for (ns = root->nsDef, j = 0;ns != NULL && j < 20;ns=ns->next) { 3486 namespaces[j++] = ns->href; 3487 namespaces[j++] = ns->prefix; 3488 } 3489 namespaces[j++] = NULL; 3490 namespaces[j] = NULL; 3491 3492 patternc = xmlPatterncompile((const xmlChar *) str, doc->dict, 3493 0, &namespaces[0]); 3494 if (patternc == NULL) { 3495 testErrorHandler(NULL, 3496 "Pattern %s failed to compile\n", str); 3497 xmlFreeDoc(doc); 3498 ret = 1; 3499 continue; 3500 } 3501 patstream = xmlPatternGetStreamCtxt(patternc); 3502 if (patstream != NULL) { 3503 ret = xmlStreamPush(patstream, NULL, NULL); 3504 if (ret < 0) { 3505 fprintf(stderr, "xmlStreamPush() failure\n"); 3506 xmlFreeStreamCtxt(patstream); 3507 patstream = NULL; 3508 } 3509 } 3510 nb_tests++; 3511 3512 reader = xmlReaderWalker(doc); 3513 res = xmlTextReaderRead(reader); 3514 while (res == 1) { 3515 patternNode(o, reader, str, patternc, patstream); 3516 res = xmlTextReaderRead(reader); 3517 } 3518 if (res != 0) { 3519 fprintf(o, "%s : failed to parse\n", filename); 3520 } 3521 xmlFreeTextReader(reader); 3522 xmlFreeDoc(doc); 3523 xmlFreeStreamCtxt(patstream); 3524 patstream = NULL; 3525 xmlFreePattern(patternc); 3526 3527 } 3528 } 3529 3530 fclose(f); 3531 fclose(o); 3532 3533 ret = compareFiles(temp, result); 3534 if (ret) { 3535 fprintf(stderr, "Result for %s failed\n", filename); 3536 ret = 1; 3537 } 3538 if (temp != NULL) { 3539 unlink(temp); 3540 free(temp); 3541 } 3542 return(ret); 3543 } 3544 #endif /* READER */ 3545 #endif /* PATTERN */ 3546 #ifdef LIBXML_C14N_ENABLED 3547 /************************************************************************ 3548 * * 3549 * Canonicalization tests * 3550 * * 3551 ************************************************************************/ 3552 static xmlXPathObjectPtr 3553 load_xpath_expr (xmlDocPtr parent_doc, const char* filename) { 3554 xmlXPathObjectPtr xpath; 3555 xmlDocPtr doc; 3556 xmlChar *expr; 3557 xmlXPathContextPtr ctx; 3558 xmlNodePtr node; 3559 xmlNsPtr ns; 3560 3561 /* 3562 * load XPath expr as a file 3563 */ 3564 xmlLoadExtDtdDefaultValue = XML_DETECT_IDS | XML_COMPLETE_ATTRS; 3565 xmlSubstituteEntitiesDefault(1); 3566 3567 doc = xmlReadFile(filename, NULL, XML_PARSE_DTDATTR | XML_PARSE_NOENT); 3568 if (doc == NULL) { 3569 fprintf(stderr, "Error: unable to parse file \"%s\"\n", filename); 3570 return(NULL); 3571 } 3572 3573 /* 3574 * Check the document is of the right kind 3575 */ 3576 if(xmlDocGetRootElement(doc) == NULL) { 3577 fprintf(stderr,"Error: empty document for file \"%s\"\n", filename); 3578 xmlFreeDoc(doc); 3579 return(NULL); 3580 } 3581 3582 node = doc->children; 3583 while(node != NULL && !xmlStrEqual(node->name, (const xmlChar *)"XPath")) { 3584 node = node->next; 3585 } 3586 3587 if(node == NULL) { 3588 fprintf(stderr,"Error: XPath element expected in the file \"%s\"\n", filename); 3589 xmlFreeDoc(doc); 3590 return(NULL); 3591 } 3592 3593 expr = xmlNodeGetContent(node); 3594 if(expr == NULL) { 3595 fprintf(stderr,"Error: XPath content element is NULL \"%s\"\n", filename); 3596 xmlFreeDoc(doc); 3597 return(NULL); 3598 } 3599 3600 ctx = xmlXPathNewContext(parent_doc); 3601 if(ctx == NULL) { 3602 fprintf(stderr,"Error: unable to create new context\n"); 3603 xmlFree(expr); 3604 xmlFreeDoc(doc); 3605 return(NULL); 3606 } 3607 3608 /* 3609 * Register namespaces 3610 */ 3611 ns = node->nsDef; 3612 while(ns != NULL) { 3613 if(xmlXPathRegisterNs(ctx, ns->prefix, ns->href) != 0) { 3614 fprintf(stderr,"Error: unable to register NS with prefix=\"%s\" and href=\"%s\"\n", ns->prefix, ns->href); 3615 xmlFree(expr); 3616 xmlXPathFreeContext(ctx); 3617 xmlFreeDoc(doc); 3618 return(NULL); 3619 } 3620 ns = ns->next; 3621 } 3622 3623 /* 3624 * Evaluate xpath 3625 */ 3626 xpath = xmlXPathEvalExpression(expr, ctx); 3627 if(xpath == NULL) { 3628 fprintf(stderr,"Error: unable to evaluate xpath expression\n"); 3629 xmlFree(expr); 3630 xmlXPathFreeContext(ctx); 3631 xmlFreeDoc(doc); 3632 return(NULL); 3633 } 3634 3635 /* print_xpath_nodes(xpath->nodesetval); */ 3636 3637 xmlFree(expr); 3638 xmlXPathFreeContext(ctx); 3639 xmlFreeDoc(doc); 3640 return(xpath); 3641 } 3642 3643 /* 3644 * Macro used to grow the current buffer. 3645 */ 3646 #define xxx_growBufferReentrant() { \ 3647 buffer_size *= 2; \ 3648 buffer = (xmlChar **) \ 3649 xmlRealloc(buffer, buffer_size * sizeof(xmlChar*)); \ 3650 if (buffer == NULL) { \ 3651 perror("realloc failed"); \ 3652 return(NULL); \ 3653 } \ 3654 } 3655 3656 static xmlChar ** 3657 parse_list(xmlChar *str) { 3658 xmlChar **buffer; 3659 xmlChar **out = NULL; 3660 int buffer_size = 0; 3661 int len; 3662 3663 if(str == NULL) { 3664 return(NULL); 3665 } 3666 3667 len = xmlStrlen(str); 3668 if((str[0] == '\'') && (str[len - 1] == '\'')) { 3669 str[len - 1] = '\0'; 3670 str++; 3671 } 3672 /* 3673 * allocate an translation buffer. 3674 */ 3675 buffer_size = 1000; 3676 buffer = (xmlChar **) xmlMalloc(buffer_size * sizeof(xmlChar*)); 3677 if (buffer == NULL) { 3678 perror("malloc failed"); 3679 return(NULL); 3680 } 3681 out = buffer; 3682 3683 while(*str != '\0') { 3684 if (out - buffer > buffer_size - 10) { 3685 int indx = out - buffer; 3686 3687 xxx_growBufferReentrant(); 3688 out = &buffer[indx]; 3689 } 3690 (*out++) = str; 3691 while(*str != ',' && *str != '\0') ++str; 3692 if(*str == ',') *(str++) = '\0'; 3693 } 3694 (*out) = NULL; 3695 return buffer; 3696 } 3697 3698 static int 3699 c14nRunTest(const char* xml_filename, int with_comments, int mode, 3700 const char* xpath_filename, const char *ns_filename, 3701 const char* result_file) { 3702 xmlDocPtr doc; 3703 xmlXPathObjectPtr xpath = NULL; 3704 xmlChar *result = NULL; 3705 int ret; 3706 xmlChar **inclusive_namespaces = NULL; 3707 const char *nslist = NULL; 3708 int nssize; 3709 3710 3711 /* 3712 * build an XML tree from a the file; we need to add default 3713 * attributes and resolve all character and entities references 3714 */ 3715 xmlLoadExtDtdDefaultValue = XML_DETECT_IDS | XML_COMPLETE_ATTRS; 3716 xmlSubstituteEntitiesDefault(1); 3717 3718 doc = xmlReadFile(xml_filename, NULL, XML_PARSE_DTDATTR | XML_PARSE_NOENT); 3719 if (doc == NULL) { 3720 fprintf(stderr, "Error: unable to parse file \"%s\"\n", xml_filename); 3721 return(-1); 3722 } 3723 3724 /* 3725 * Check the document is of the right kind 3726 */ 3727 if(xmlDocGetRootElement(doc) == NULL) { 3728 fprintf(stderr,"Error: empty document for file \"%s\"\n", xml_filename); 3729 xmlFreeDoc(doc); 3730 return(-1); 3731 } 3732 3733 /* 3734 * load xpath file if specified 3735 */ 3736 if(xpath_filename) { 3737 xpath = load_xpath_expr(doc, xpath_filename); 3738 if(xpath == NULL) { 3739 fprintf(stderr,"Error: unable to evaluate xpath expression\n"); 3740 xmlFreeDoc(doc); 3741 return(-1); 3742 } 3743 } 3744 3745 if (ns_filename != NULL) { 3746 if (loadMem(ns_filename, &nslist, &nssize)) { 3747 fprintf(stderr,"Error: unable to evaluate xpath expression\n"); 3748 if(xpath != NULL) xmlXPathFreeObject(xpath); 3749 xmlFreeDoc(doc); 3750 return(-1); 3751 } 3752 inclusive_namespaces = parse_list((xmlChar *) nslist); 3753 } 3754 3755 /* 3756 * Canonical form 3757 */ 3758 /* fprintf(stderr,"File \"%s\" loaded: start canonization\n", xml_filename); */ 3759 ret = xmlC14NDocDumpMemory(doc, 3760 (xpath) ? xpath->nodesetval : NULL, 3761 mode, inclusive_namespaces, 3762 with_comments, &result); 3763 if (ret >= 0) { 3764 if(result != NULL) { 3765 if (compareFileMem(result_file, (const char *) result, ret)) { 3766 fprintf(stderr, "Result mismatch for %s\n", xml_filename); 3767 fprintf(stderr, "RESULT:\n%s\n", (const char*)result); 3768 ret = -1; 3769 } 3770 } 3771 } else { 3772 fprintf(stderr,"Error: failed to canonicalize XML file \"%s\" (ret=%d)\n", xml_filename, ret); 3773 ret = -1; 3774 } 3775 3776 /* 3777 * Cleanup 3778 */ 3779 if (result != NULL) xmlFree(result); 3780 if(xpath != NULL) xmlXPathFreeObject(xpath); 3781 if (inclusive_namespaces != NULL) xmlFree(inclusive_namespaces); 3782 if (nslist != NULL) free((char *) nslist); 3783 xmlFreeDoc(doc); 3784 3785 return(ret); 3786 } 3787 3788 static int 3789 c14nCommonTest(const char *filename, int with_comments, int mode, 3790 const char *subdir) { 3791 char buf[500]; 3792 char prefix[500]; 3793 const char *base; 3794 int len; 3795 char *result = NULL; 3796 char *xpath = NULL; 3797 char *ns = NULL; 3798 int ret = 0; 3799 3800 base = baseFilename(filename); 3801 len = strlen(base); 3802 len -= 4; 3803 memcpy(prefix, base, len); 3804 prefix[len] = 0; 3805 3806 snprintf(buf, 499, "result/c14n/%s/%s", subdir,prefix); 3807 if (!checkTestFile(buf)) { 3808 fprintf(stderr, "Missing result file %s", buf); 3809 return(-1); 3810 } 3811 result = strdup(buf); 3812 snprintf(buf, 499, "test/c14n/%s/%s.xpath", subdir,prefix); 3813 if (checkTestFile(buf)) { 3814 xpath = strdup(buf); 3815 } 3816 snprintf(buf, 499, "test/c14n/%s/%s.ns", subdir,prefix); 3817 if (checkTestFile(buf)) { 3818 ns = strdup(buf); 3819 } 3820 3821 nb_tests++; 3822 if (c14nRunTest(filename, with_comments, mode, 3823 xpath, ns, result) < 0) 3824 ret = 1; 3825 3826 if (result != NULL) free(result); 3827 if (xpath != NULL) free(xpath); 3828 if (ns != NULL) free(ns); 3829 return(ret); 3830 } 3831 3832 static int 3833 c14nWithCommentTest(const char *filename, 3834 const char *resul ATTRIBUTE_UNUSED, 3835 const char *err ATTRIBUTE_UNUSED, 3836 int options ATTRIBUTE_UNUSED) { 3837 return(c14nCommonTest(filename, 1, XML_C14N_1_0, "with-comments")); 3838 } 3839 static int 3840 c14nWithoutCommentTest(const char *filename, 3841 const char *resul ATTRIBUTE_UNUSED, 3842 const char *err ATTRIBUTE_UNUSED, 3843 int options ATTRIBUTE_UNUSED) { 3844 return(c14nCommonTest(filename, 0, XML_C14N_1_0, "without-comments")); 3845 } 3846 static int 3847 c14nExcWithoutCommentTest(const char *filename, 3848 const char *resul ATTRIBUTE_UNUSED, 3849 const char *err ATTRIBUTE_UNUSED, 3850 int options ATTRIBUTE_UNUSED) { 3851 return(c14nCommonTest(filename, 0, XML_C14N_EXCLUSIVE_1_0, "exc-without-comments")); 3852 } 3853 static int 3854 c14n11WithoutCommentTest(const char *filename, 3855 const char *resul ATTRIBUTE_UNUSED, 3856 const char *err ATTRIBUTE_UNUSED, 3857 int options ATTRIBUTE_UNUSED) { 3858 return(c14nCommonTest(filename, 0, XML_C14N_1_1, "1-1-without-comments")); 3859 } 3860 #endif 3861 #if defined(LIBXML_THREAD_ENABLED) && defined(LIBXML_CATALOG_ENABLED) && defined (LIBXML_SAX1_ENABLED) 3862 /************************************************************************ 3863 * * 3864 * Catalog and threads test * 3865 * * 3866 ************************************************************************/ 3867 3868 /* 3869 * mostly a cut and paste from testThreads.c 3870 */ 3871 #define MAX_ARGC 20 3872 3873 static const char *catalog = "test/threads/complex.xml"; 3874 static const char *testfiles[] = { 3875 "test/threads/abc.xml", 3876 "test/threads/acb.xml", 3877 "test/threads/bac.xml", 3878 "test/threads/bca.xml", 3879 "test/threads/cab.xml", 3880 "test/threads/cba.xml", 3881 "test/threads/invalid.xml", 3882 }; 3883 3884 static const char *Okay = "OK"; 3885 static const char *Failed = "Failed"; 3886 3887 #ifndef xmlDoValidityCheckingDefaultValue 3888 #error xmlDoValidityCheckingDefaultValue is not a macro 3889 #endif 3890 #ifndef xmlGenericErrorContext 3891 #error xmlGenericErrorContext is not a macro 3892 #endif 3893 3894 static void * 3895 thread_specific_data(void *private_data) 3896 { 3897 xmlDocPtr myDoc; 3898 const char *filename = (const char *) private_data; 3899 int okay = 1; 3900 3901 if (!strcmp(filename, "test/threads/invalid.xml")) { 3902 xmlDoValidityCheckingDefaultValue = 0; 3903 xmlGenericErrorContext = stdout; 3904 } else { 3905 xmlDoValidityCheckingDefaultValue = 1; 3906 xmlGenericErrorContext = stderr; 3907 } 3908 myDoc = xmlParseFile(filename); 3909 if (myDoc) { 3910 xmlFreeDoc(myDoc); 3911 } else { 3912 printf("parse failed\n"); 3913 okay = 0; 3914 } 3915 if (!strcmp(filename, "test/threads/invalid.xml")) { 3916 if (xmlDoValidityCheckingDefaultValue != 0) { 3917 printf("ValidityCheckingDefaultValue override failed\n"); 3918 okay = 0; 3919 } 3920 if (xmlGenericErrorContext != stdout) { 3921 printf("xmlGenericErrorContext override failed\n"); 3922 okay = 0; 3923 } 3924 } else { 3925 if (xmlDoValidityCheckingDefaultValue != 1) { 3926 printf("ValidityCheckingDefaultValue override failed\n"); 3927 okay = 0; 3928 } 3929 if (xmlGenericErrorContext != stderr) { 3930 printf("xmlGenericErrorContext override failed\n"); 3931 okay = 0; 3932 } 3933 } 3934 if (okay == 0) 3935 return ((void *) Failed); 3936 return ((void *) Okay); 3937 } 3938 3939 #if defined(linux) || defined(__sun) || defined(__APPLE_CC__) 3940 3941 #include <pthread.h> 3942 3943 static pthread_t tid[MAX_ARGC]; 3944 3945 static int 3946 testThread(void) 3947 { 3948 unsigned int i, repeat; 3949 unsigned int num_threads = sizeof(testfiles) / sizeof(testfiles[0]); 3950 void *results[MAX_ARGC]; 3951 int ret; 3952 int res = 0; 3953 3954 xmlInitParser(); 3955 3956 for (repeat = 0; repeat < 500; repeat++) { 3957 xmlLoadCatalog(catalog); 3958 nb_tests++; 3959 3960 for (i = 0; i < num_threads; i++) { 3961 results[i] = NULL; 3962 tid[i] = (pthread_t) - 1; 3963 } 3964 3965 for (i = 0; i < num_threads; i++) { 3966 ret = pthread_create(&tid[i], 0, thread_specific_data, 3967 (void *) testfiles[i]); 3968 if (ret != 0) { 3969 fprintf(stderr, "pthread_create failed\n"); 3970 return (1); 3971 } 3972 } 3973 for (i = 0; i < num_threads; i++) { 3974 ret = pthread_join(tid[i], &results[i]); 3975 if (ret != 0) { 3976 fprintf(stderr, "pthread_join failed\n"); 3977 return (1); 3978 } 3979 } 3980 3981 xmlCatalogCleanup(); 3982 for (i = 0; i < num_threads; i++) 3983 if (results[i] != (void *) Okay) { 3984 fprintf(stderr, "Thread %d handling %s failed\n", 3985 i, testfiles[i]); 3986 res = 1; 3987 } 3988 } 3989 return (res); 3990 } 3991 3992 #elif defined WIN32 3993 #include <windows.h> 3994 #include <string.h> 3995 3996 #define TEST_REPEAT_COUNT 500 3997 3998 static HANDLE tid[MAX_ARGC]; 3999 4000 static DWORD WINAPI 4001 win32_thread_specific_data(void *private_data) 4002 { 4003 return((DWORD) thread_specific_data(private_data)); 4004 } 4005 4006 static int 4007 testThread(void) 4008 { 4009 unsigned int i, repeat; 4010 unsigned int num_threads = sizeof(testfiles) / sizeof(testfiles[0]); 4011 DWORD results[MAX_ARGC]; 4012 BOOL ret; 4013 int res = 0; 4014 4015 xmlInitParser(); 4016 for (repeat = 0; repeat < TEST_REPEAT_COUNT; repeat++) { 4017 xmlLoadCatalog(catalog); 4018 nb_tests++; 4019 4020 for (i = 0; i < num_threads; i++) { 4021 results[i] = 0; 4022 tid[i] = (HANDLE) - 1; 4023 } 4024 4025 for (i = 0; i < num_threads; i++) { 4026 DWORD useless; 4027 4028 tid[i] = CreateThread(NULL, 0, 4029 win32_thread_specific_data, 4030 (void *) testfiles[i], 0, 4031 &useless); 4032 if (tid[i] == NULL) { 4033 fprintf(stderr, "CreateThread failed\n"); 4034 return(1); 4035 } 4036 } 4037 4038 if (WaitForMultipleObjects(num_threads, tid, TRUE, INFINITE) == 4039 WAIT_FAILED) { 4040 fprintf(stderr, "WaitForMultipleObjects failed\n"); 4041 return(1); 4042 } 4043 4044 for (i = 0; i < num_threads; i++) { 4045 ret = GetExitCodeThread(tid[i], &results[i]); 4046 if (ret == 0) { 4047 fprintf(stderr, "GetExitCodeThread failed\n"); 4048 return(1); 4049 } 4050 CloseHandle(tid[i]); 4051 } 4052 4053 xmlCatalogCleanup(); 4054 for (i = 0; i < num_threads; i++) { 4055 if (results[i] != (DWORD) Okay) { 4056 fprintf(stderr, "Thread %d handling %s failed\n", 4057 i, testfiles[i]); 4058 res = 1; 4059 } 4060 } 4061 } 4062 4063 return (res); 4064 } 4065 4066 #elif defined __BEOS__ 4067 #include <OS.h> 4068 4069 static thread_id tid[MAX_ARGC]; 4070 4071 static int 4072 testThread(void) 4073 { 4074 unsigned int i, repeat; 4075 unsigned int num_threads = sizeof(testfiles) / sizeof(testfiles[0]); 4076 void *results[MAX_ARGC]; 4077 status_t ret; 4078 int res = 0; 4079 4080 xmlInitParser(); 4081 for (repeat = 0; repeat < 500; repeat++) { 4082 xmlLoadCatalog(catalog); 4083 for (i = 0; i < num_threads; i++) { 4084 results[i] = NULL; 4085 tid[i] = (thread_id) - 1; 4086 } 4087 for (i = 0; i < num_threads; i++) { 4088 tid[i] = 4089 spawn_thread(thread_specific_data, "xmlTestThread", 4090 B_NORMAL_PRIORITY, (void *) testfiles[i]); 4091 if (tid[i] < B_OK) { 4092 fprintf(stderr, "beos_thread_create failed\n"); 4093 return (1); 4094 } 4095 printf("beos_thread_create %d -> %d\n", i, tid[i]); 4096 } 4097 for (i = 0; i < num_threads; i++) { 4098 ret = wait_for_thread(tid[i], &results[i]); 4099 printf("beos_thread_wait %d -> %d\n", i, ret); 4100 if (ret != B_OK) { 4101 fprintf(stderr, "beos_thread_wait failed\n"); 4102 return (1); 4103 } 4104 } 4105 4106 xmlCatalogCleanup(); 4107 ret = B_OK; 4108 for (i = 0; i < num_threads; i++) 4109 if (results[i] != (void *) Okay) { 4110 printf("Thread %d handling %s failed\n", i, testfiles[i]); 4111 ret = B_ERROR; 4112 } 4113 } 4114 if (ret != B_OK) 4115 return(1); 4116 return (0); 4117 } 4118 #else 4119 static int 4120 testThread(void) 4121 { 4122 fprintf(stderr, 4123 "Specific platform thread support not detected\n"); 4124 return (-1); 4125 } 4126 #endif 4127 static int 4128 threadsTest(const char *filename ATTRIBUTE_UNUSED, 4129 const char *resul ATTRIBUTE_UNUSED, 4130 const char *err ATTRIBUTE_UNUSED, 4131 int options ATTRIBUTE_UNUSED) { 4132 return(testThread()); 4133 } 4134 #endif 4135 /************************************************************************ 4136 * * 4137 * Tests Descriptions * 4138 * * 4139 ************************************************************************/ 4140 4141 static 4142 testDesc testDescriptions[] = { 4143 { "XML regression tests" , 4144 oldParseTest, "./test/*", "result/", "", NULL, 4145 0 }, 4146 { "XML regression tests on memory" , 4147 memParseTest, "./test/*", "result/", "", NULL, 4148 0 }, 4149 { "XML entity subst regression tests" , 4150 noentParseTest, "./test/*", "result/noent/", "", NULL, 4151 XML_PARSE_NOENT }, 4152 { "XML Namespaces regression tests", 4153 errParseTest, "./test/namespaces/*", "result/namespaces/", "", ".err", 4154 0 }, 4155 { "Error cases regression tests", 4156 errParseTest, "./test/errors/*.xml", "result/errors/", "", ".err", 4157 0 }, 4158 #ifdef LIBXML_READER_ENABLED 4159 { "Error cases stream regression tests", 4160 streamParseTest, "./test/errors/*.xml", "result/errors/", NULL, ".str", 4161 0 }, 4162 { "Reader regression tests", 4163 streamParseTest, "./test/*", "result/", ".rdr", NULL, 4164 0 }, 4165 { "Reader entities substitution regression tests", 4166 streamParseTest, "./test/*", "result/", ".rde", NULL, 4167 XML_PARSE_NOENT }, 4168 { "Reader on memory regression tests", 4169 streamMemParseTest, "./test/*", "result/", ".rdr", NULL, 4170 0 }, 4171 { "Walker regression tests", 4172 walkerParseTest, "./test/*", "result/", ".rdr", NULL, 4173 0 }, 4174 #endif 4175 #ifdef LIBXML_SAX1_ENABLED 4176 { "SAX1 callbacks regression tests" , 4177 saxParseTest, "./test/*", "result/", ".sax", NULL, 4178 XML_PARSE_SAX1 }, 4179 { "SAX2 callbacks regression tests" , 4180 saxParseTest, "./test/*", "result/", ".sax2", NULL, 4181 0 }, 4182 #endif 4183 #ifdef LIBXML_PUSH_ENABLED 4184 { "XML push regression tests" , 4185 pushParseTest, "./test/*", "result/", "", NULL, 4186 0 }, 4187 #endif 4188 #ifdef LIBXML_HTML_ENABLED 4189 { "HTML regression tests" , 4190 errParseTest, "./test/HTML/*", "result/HTML/", "", ".err", 4191 XML_PARSE_HTML }, 4192 #ifdef LIBXML_PUSH_ENABLED 4193 { "Push HTML regression tests" , 4194 pushParseTest, "./test/HTML/*", "result/HTML/", "", ".err", 4195 XML_PARSE_HTML }, 4196 #endif 4197 #ifdef LIBXML_SAX1_ENABLED 4198 { "HTML SAX regression tests" , 4199 saxParseTest, "./test/HTML/*", "result/HTML/", ".sax", NULL, 4200 XML_PARSE_HTML }, 4201 #endif 4202 #endif 4203 #ifdef LIBXML_VALID_ENABLED 4204 { "Valid documents regression tests" , 4205 errParseTest, "./test/VCM/*", NULL, NULL, NULL, 4206 XML_PARSE_DTDVALID }, 4207 { "Validity checking regression tests" , 4208 errParseTest, "./test/VC/*", "result/VC/", NULL, "", 4209 XML_PARSE_DTDVALID }, 4210 { "General documents valid regression tests" , 4211 errParseTest, "./test/valid/*", "result/valid/", "", ".err", 4212 XML_PARSE_DTDVALID }, 4213 #endif 4214 #ifdef LIBXML_XINCLUDE_ENABLED 4215 { "XInclude regression tests" , 4216 errParseTest, "./test/XInclude/docs/*", "result/XInclude/", "", NULL, 4217 /* Ignore errors at this point ".err", */ 4218 XML_PARSE_XINCLUDE }, 4219 #ifdef LIBXML_READER_ENABLED 4220 { "XInclude xmlReader regression tests", 4221 streamParseTest, "./test/XInclude/docs/*", "result/XInclude/", ".rdr", 4222 /* Ignore errors at this point ".err", */ 4223 NULL, XML_PARSE_XINCLUDE }, 4224 #endif 4225 { "XInclude regression tests stripping include nodes" , 4226 errParseTest, "./test/XInclude/docs/*", "result/XInclude/", "", NULL, 4227 /* Ignore errors at this point ".err", */ 4228 XML_PARSE_XINCLUDE | XML_PARSE_NOXINCNODE }, 4229 #ifdef LIBXML_READER_ENABLED 4230 { "XInclude xmlReader regression tests stripping include nodes", 4231 streamParseTest, "./test/XInclude/docs/*", "result/XInclude/", ".rdr", 4232 /* Ignore errors at this point ".err", */ 4233 NULL, XML_PARSE_XINCLUDE | XML_PARSE_NOXINCNODE }, 4234 #endif 4235 #endif 4236 #ifdef LIBXML_XPATH_ENABLED 4237 #ifdef LIBXML_DEBUG_ENABLED 4238 { "XPath expressions regression tests" , 4239 xpathExprTest, "./test/XPath/expr/*", "result/XPath/expr/", "", NULL, 4240 0 }, 4241 { "XPath document queries regression tests" , 4242 xpathDocTest, "./test/XPath/docs/*", NULL, NULL, NULL, 4243 0 }, 4244 #ifdef LIBXML_XPTR_ENABLED 4245 { "XPointer document queries regression tests" , 4246 xptrDocTest, "./test/XPath/docs/*", NULL, NULL, NULL, 4247 0 }, 4248 #endif 4249 { "xml:id regression tests" , 4250 xmlidDocTest, "./test/xmlid/*", "result/xmlid/", "", ".err", 4251 0 }, 4252 #endif 4253 #endif 4254 { "URI parsing tests" , 4255 uriParseTest, "./test/URI/*.uri", "result/URI/", "", NULL, 4256 0 }, 4257 { "URI base composition tests" , 4258 uriBaseTest, "./test/URI/*.data", "result/URI/", "", NULL, 4259 0 }, 4260 { "Path URI conversion tests" , 4261 uriPathTest, NULL, NULL, NULL, NULL, 4262 0 }, 4263 #ifdef LIBXML_SCHEMAS_ENABLED 4264 { "Schemas regression tests" , 4265 schemasTest, "./test/schemas/*_*.xsd", NULL, NULL, NULL, 4266 0 }, 4267 { "Relax-NG regression tests" , 4268 rngTest, "./test/relaxng/*.rng", NULL, NULL, NULL, 4269 XML_PARSE_DTDATTR | XML_PARSE_NOENT }, 4270 #ifdef LIBXML_READER_ENABLED 4271 { "Relax-NG streaming regression tests" , 4272 rngStreamTest, "./test/relaxng/*.rng", NULL, NULL, NULL, 4273 XML_PARSE_DTDATTR | XML_PARSE_NOENT }, 4274 #endif 4275 #endif 4276 #ifdef LIBXML_PATTERN_ENABLED 4277 #ifdef LIBXML_READER_ENABLED 4278 { "Pattern regression tests" , 4279 patternTest, "./test/pattern/*.pat", "result/pattern/", NULL, NULL, 4280 0 }, 4281 #endif 4282 #endif 4283 #ifdef LIBXML_C14N_ENABLED 4284 { "C14N with comments regression tests" , 4285 c14nWithCommentTest, "./test/c14n/with-comments/*.xml", NULL, NULL, NULL, 4286 0 }, 4287 { "C14N without comments regression tests" , 4288 c14nWithoutCommentTest, "./test/c14n/without-comments/*.xml", NULL, NULL, NULL, 4289 0 }, 4290 { "C14N exclusive without comments regression tests" , 4291 c14nExcWithoutCommentTest, "./test/c14n/exc-without-comments/*.xml", NULL, NULL, NULL, 4292 0 }, 4293 { "C14N 1.1 without comments regression tests" , 4294 c14n11WithoutCommentTest, "./test/c14n/1-1-without-comments/*.xml", NULL, NULL, NULL, 4295 0 }, 4296 #endif 4297 #if defined(LIBXML_THREAD_ENABLED) && defined(LIBXML_CATALOG_ENABLED) && defined(LIBXML_SAX1_ENABLED) 4298 { "Catalog and Threads regression tests" , 4299 threadsTest, NULL, NULL, NULL, NULL, 4300 0 }, 4301 #endif 4302 {NULL, NULL, NULL, NULL, NULL, NULL, 0} 4303 }; 4304 4305 /************************************************************************ 4306 * * 4307 * The main code driving the tests * 4308 * * 4309 ************************************************************************/ 4310 4311 static int 4312 launchTests(testDescPtr tst) { 4313 int res = 0, err = 0; 4314 size_t i; 4315 char *result; 4316 char *error; 4317 int mem; 4318 4319 if (tst == NULL) return(-1); 4320 if (tst->in != NULL) { 4321 glob_t globbuf; 4322 4323 globbuf.gl_offs = 0; 4324 glob(tst->in, GLOB_DOOFFS, NULL, &globbuf); 4325 for (i = 0;i < globbuf.gl_pathc;i++) { 4326 if (!checkTestFile(globbuf.gl_pathv[i])) 4327 continue; 4328 if (tst->suffix != NULL) { 4329 result = resultFilename(globbuf.gl_pathv[i], tst->out, 4330 tst->suffix); 4331 if (result == NULL) { 4332 fprintf(stderr, "Out of memory !\n"); 4333 fatalError(); 4334 } 4335 } else { 4336 result = NULL; 4337 } 4338 if (tst->err != NULL) { 4339 error = resultFilename(globbuf.gl_pathv[i], tst->out, 4340 tst->err); 4341 if (error == NULL) { 4342 fprintf(stderr, "Out of memory !\n"); 4343 fatalError(); 4344 } 4345 } else { 4346 error = NULL; 4347 } 4348 if ((result) &&(!checkTestFile(result))) { 4349 fprintf(stderr, "Missing result file %s\n", result); 4350 } else if ((error) &&(!checkTestFile(error))) { 4351 fprintf(stderr, "Missing error file %s\n", error); 4352 } else { 4353 mem = xmlMemUsed(); 4354 extraMemoryFromResolver = 0; 4355 testErrorsSize = 0; 4356 testErrors[0] = 0; 4357 res = tst->func(globbuf.gl_pathv[i], result, error, 4358 tst->options | XML_PARSE_COMPACT); 4359 xmlResetLastError(); 4360 if (res != 0) { 4361 fprintf(stderr, "File %s generated an error\n", 4362 globbuf.gl_pathv[i]); 4363 nb_errors++; 4364 err++; 4365 } 4366 else if (xmlMemUsed() != mem) { 4367 if ((xmlMemUsed() != mem) && 4368 (extraMemoryFromResolver == 0)) { 4369 fprintf(stderr, "File %s leaked %d bytes\n", 4370 globbuf.gl_pathv[i], xmlMemUsed() - mem); 4371 nb_leaks++; 4372 err++; 4373 } 4374 } 4375 testErrorsSize = 0; 4376 } 4377 if (result) 4378 free(result); 4379 if (error) 4380 free(error); 4381 } 4382 globfree(&globbuf); 4383 } else { 4384 testErrorsSize = 0; 4385 testErrors[0] = 0; 4386 extraMemoryFromResolver = 0; 4387 res = tst->func(NULL, NULL, NULL, tst->options); 4388 if (res != 0) { 4389 nb_errors++; 4390 err++; 4391 } 4392 } 4393 return(err); 4394 } 4395 4396 static int verbose = 0; 4397 static int tests_quiet = 0; 4398 4399 static int 4400 runtest(int i) { 4401 int ret = 0, res; 4402 int old_errors, old_tests, old_leaks; 4403 4404 old_errors = nb_errors; 4405 old_tests = nb_tests; 4406 old_leaks = nb_leaks; 4407 if ((tests_quiet == 0) && (testDescriptions[i].desc != NULL)) 4408 printf("## %s\n", testDescriptions[i].desc); 4409 res = launchTests(&testDescriptions[i]); 4410 if (res != 0) 4411 ret++; 4412 if (verbose) { 4413 if ((nb_errors == old_errors) && (nb_leaks == old_leaks)) 4414 printf("Ran %d tests, no errors\n", nb_tests - old_tests); 4415 else 4416 printf("Ran %d tests, %d errors, %d leaks\n", 4417 nb_tests - old_tests, 4418 nb_errors - old_errors, 4419 nb_leaks - old_leaks); 4420 } 4421 return(ret); 4422 } 4423 4424 int 4425 main(int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED) { 4426 int i, a, ret = 0; 4427 int subset = 0; 4428 4429 initializeLibxml2(); 4430 4431 for (a = 1; a < argc;a++) { 4432 if (!strcmp(argv[a], "-v")) 4433 verbose = 1; 4434 else if (!strcmp(argv[a], "-quiet")) 4435 tests_quiet = 1; 4436 else { 4437 for (i = 0; testDescriptions[i].func != NULL; i++) { 4438 if (strstr(testDescriptions[i].desc, argv[a])) { 4439 ret += runtest(i); 4440 subset++; 4441 } 4442 } 4443 } 4444 } 4445 if (subset == 0) { 4446 for (i = 0; testDescriptions[i].func != NULL; i++) { 4447 ret += runtest(i); 4448 } 4449 } 4450 if ((nb_errors == 0) && (nb_leaks == 0)) { 4451 ret = 0; 4452 printf("Total %d tests, no errors\n", 4453 nb_tests); 4454 } else { 4455 ret = 1; 4456 printf("Total %d tests, %d errors, %d leaks\n", 4457 nb_tests, nb_errors, nb_leaks); 4458 } 4459 xmlCleanupParser(); 4460 xmlMemoryDump(); 4461 4462 return(ret); 4463 } 4464 4465 #else /* ! LIBXML_OUTPUT_ENABLED */ 4466 int 4467 main(int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED) { 4468 fprintf(stderr, "runtest requires output to be enabled in libxml2\n"); 4469 return(1); 4470 } 4471 #endif 4472
