| /* |
| * debugXML.c : This is a set of routines used for debugging the tree |
| * produced by the XML parser. |
| * |
| * See Copyright for the status of this software. |
| * |
| * Daniel Veillard <Daniel.Veillard@w3.org> |
| */ |
| |
| #include <stdio.h> |
| #include "tree.h" |
| #include "parser.h" |
| #include "debugXML.h" |
| |
| #define IS_BLANK(c) \ |
| (((c) == '\n') || ((c) == '\r') || ((c) == '\t') || ((c) == ' ')) |
| |
| void xmlDebugDumpString(FILE *output, const xmlChar *str) { |
| int i; |
| for (i = 0;i < 40;i++) |
| if (str[i] == 0) return; |
| else if (IS_BLANK(str[i])) fputc(' ', output); |
| else fputc(str[i], output); |
| fprintf(output, "..."); |
| } |
| |
| void xmlDebugDumpNamespace(FILE *output, xmlNsPtr ns, int depth) { |
| int i; |
| char shift[100]; |
| |
| for (i = 0;((i < depth) && (i < 25));i++) |
| shift[2 * i] = shift[2 * i + 1] = ' '; |
| shift[2 * i] = shift[2 * i + 1] = 0; |
| |
| fprintf(output, shift); |
| if (ns->type == XML_GLOBAL_NAMESPACE) |
| fprintf(output, "old "); |
| if (ns->prefix != NULL) |
| fprintf(output, "namespace %s href=", ns->prefix); |
| else |
| fprintf(output, "default namespace href=", ns->prefix); |
| |
| xmlDebugDumpString(output, ns->href); |
| fprintf(output, "\n"); |
| } |
| |
| void xmlDebugDumpNamespaceList(FILE *output, xmlNsPtr ns, int depth) { |
| while (ns != NULL) { |
| xmlDebugDumpNamespace(output, ns, depth); |
| ns = ns->next; |
| } |
| } |
| |
| void xmlDebugDumpEntity(FILE *output, xmlEntityPtr ent, int depth) { |
| int i; |
| char shift[100]; |
| |
| for (i = 0;((i < depth) && (i < 25));i++) |
| shift[2 * i] = shift[2 * i + 1] = ' '; |
| shift[2 * i] = shift[2 * i + 1] = 0; |
| |
| fprintf(output, shift); |
| switch (ent->type) { |
| case XML_INTERNAL_GENERAL_ENTITY: |
| fprintf(output, "INTERNAL_GENERAL_ENTITY "); |
| break; |
| case XML_EXTERNAL_GENERAL_PARSED_ENTITY: |
| fprintf(output, "EXTERNAL_GENERAL_PARSED_ENTITY "); |
| break; |
| case XML_EXTERNAL_GENERAL_UNPARSED_ENTITY: |
| fprintf(output, "EXTERNAL_GENERAL_UNPARSED_ENTITY "); |
| break; |
| case XML_INTERNAL_PARAMETER_ENTITY: |
| fprintf(output, "INTERNAL_PARAMETER_ENTITY "); |
| break; |
| case XML_EXTERNAL_PARAMETER_ENTITY: |
| fprintf(output, "EXTERNAL_PARAMETER_ENTITY "); |
| break; |
| default: |
| fprintf(output, "ENTITY_%d ! ", ent->type); |
| } |
| fprintf(output, "%s\n", ent->name); |
| if (ent->ExternalID) { |
| fprintf(output, shift); |
| fprintf(output, "ExternalID=%s\n", ent->ExternalID); |
| } |
| if (ent->SystemID) { |
| fprintf(output, shift); |
| fprintf(output, "SystemID=%s\n", ent->SystemID); |
| } |
| if (ent->content) { |
| fprintf(output, shift); |
| fprintf(output, "content="); |
| xmlDebugDumpString(output, ent->content); |
| fprintf(output, "\n"); |
| } |
| } |
| |
| void xmlDebugDumpAttr(FILE *output, xmlAttrPtr attr, int depth) { |
| int i; |
| char shift[100]; |
| |
| for (i = 0;((i < depth) && (i < 25));i++) |
| shift[2 * i] = shift[2 * i + 1] = ' '; |
| shift[2 * i] = shift[2 * i + 1] = 0; |
| |
| fprintf(output, shift); |
| fprintf(output, "ATTRIBUTE %s\n", attr->name); |
| if (attr->val != NULL) |
| xmlDebugDumpNodeList(output, attr->val, depth + 1); |
| } |
| |
| void xmlDebugDumpAttrList(FILE *output, xmlAttrPtr attr, int depth) { |
| while (attr != NULL) { |
| xmlDebugDumpAttr(output, attr, depth); |
| attr = attr->next; |
| } |
| } |
| |
| void xmlDebugDumpOneNode(FILE *output, xmlNodePtr node, int depth) { |
| int i; |
| char shift[100]; |
| |
| for (i = 0;((i < depth) && (i < 25));i++) |
| shift[2 * i] = shift[2 * i + 1] = ' '; |
| shift[2 * i] = shift[2 * i + 1] = 0; |
| |
| fprintf(output, shift); |
| switch (node->type) { |
| case XML_ELEMENT_NODE: |
| fprintf(output, "ELEMENT "); |
| if (node->ns != NULL) |
| fprintf(output, "%s:%s\n", node->ns->prefix, node->name); |
| else |
| fprintf(output, "%s\n", node->name); |
| break; |
| case XML_ATTRIBUTE_NODE: |
| fprintf(output, "Error, ATTRIBUTE found here\n"); |
| break; |
| case XML_TEXT_NODE: |
| fprintf(output, "TEXT\n"); |
| break; |
| case XML_CDATA_SECTION_NODE: |
| fprintf(output, "CDATA_SECTION\n"); |
| break; |
| case XML_ENTITY_REF_NODE: |
| fprintf(output, "ENTITY_REF\n"); |
| break; |
| case XML_ENTITY_NODE: |
| fprintf(output, "ENTITY\n"); |
| break; |
| case XML_PI_NODE: |
| fprintf(output, "PI %s\n", node->name); |
| break; |
| case XML_COMMENT_NODE: |
| fprintf(output, "COMMENT\n"); |
| break; |
| case XML_DOCUMENT_NODE: |
| case XML_HTML_DOCUMENT_NODE: |
| fprintf(output, "Error, DOCUMENT found here\n"); |
| break; |
| case XML_DOCUMENT_TYPE_NODE: |
| fprintf(output, "DOCUMENT_TYPE\n"); |
| break; |
| case XML_DOCUMENT_FRAG_NODE: |
| fprintf(output, "DOCUMENT_FRAG\n"); |
| break; |
| case XML_NOTATION_NODE: |
| fprintf(output, "NOTATION\n"); |
| break; |
| default: |
| fprintf(output, "NODE_%d\n", node->type); |
| } |
| if (node->doc == NULL) { |
| fprintf(output, shift); |
| fprintf(output, "doc == NULL !!!\n"); |
| } |
| if (node->nsDef != NULL) |
| xmlDebugDumpNamespaceList(output, node->nsDef, depth + 1); |
| if (node->properties != NULL) |
| xmlDebugDumpAttrList(output, node->properties, depth + 1); |
| if (node->type != XML_ENTITY_REF_NODE) { |
| if (node->content != NULL) { |
| fprintf(output, shift); |
| fprintf(output, "content="); |
| #ifndef XML_USE_BUFFER_CONTENT |
| xmlDebugDumpString(output, node->content); |
| #else |
| xmlDebugDumpString(output, xmlBufferContent(node->content)); |
| #endif |
| fprintf(output, "\n"); |
| } |
| } else { |
| xmlEntityPtr ent; |
| ent = xmlGetDocEntity(node->doc, node->name); |
| if (ent != NULL) |
| xmlDebugDumpEntity(output, ent, depth + 1); |
| } |
| } |
| |
| void xmlDebugDumpNode(FILE *output, xmlNodePtr node, int depth) { |
| xmlDebugDumpOneNode(output, node, depth); |
| if (node->childs != NULL) |
| xmlDebugDumpNodeList(output, node->childs, depth + 1); |
| } |
| |
| void xmlDebugDumpNodeList(FILE *output, xmlNodePtr node, int depth) { |
| while (node != NULL) { |
| xmlDebugDumpNode(output, node, depth); |
| node = node->next; |
| } |
| } |
| |
| |
| void xmlDebugDumpDocument(FILE *output, xmlDocPtr doc) { |
| if (output == NULL) output = stdout; |
| if (doc == NULL) { |
| fprintf(output, "DOCUMENT == NULL !\n"); |
| return; |
| } |
| |
| switch (doc->type) { |
| case XML_ELEMENT_NODE: |
| fprintf(output, "Error, ELEMENT found here "); |
| break; |
| case XML_ATTRIBUTE_NODE: |
| fprintf(output, "Error, ATTRIBUTE found here\n"); |
| break; |
| case XML_TEXT_NODE: |
| fprintf(output, "Error, TEXT\n"); |
| break; |
| case XML_CDATA_SECTION_NODE: |
| fprintf(output, "Error, CDATA_SECTION\n"); |
| break; |
| case XML_ENTITY_REF_NODE: |
| fprintf(output, "Error, ENTITY_REF\n"); |
| break; |
| case XML_ENTITY_NODE: |
| fprintf(output, "Error, ENTITY\n"); |
| break; |
| case XML_PI_NODE: |
| fprintf(output, "Error, PI\n"); |
| break; |
| case XML_COMMENT_NODE: |
| fprintf(output, "Error, COMMENT\n"); |
| break; |
| case XML_DOCUMENT_NODE: |
| fprintf(output, "DOCUMENT\n"); |
| break; |
| case XML_HTML_DOCUMENT_NODE: |
| fprintf(output, "HTML DOCUMENT\n"); |
| break; |
| case XML_DOCUMENT_TYPE_NODE: |
| fprintf(output, "Error, DOCUMENT_TYPE\n"); |
| break; |
| case XML_DOCUMENT_FRAG_NODE: |
| fprintf(output, "Error, DOCUMENT_FRAG\n"); |
| break; |
| case XML_NOTATION_NODE: |
| fprintf(output, "Error, NOTATION\n"); |
| break; |
| default: |
| fprintf(output, "NODE_%d\n", doc->type); |
| } |
| if (doc->name != NULL) { |
| fprintf(output, "name="); |
| xmlDebugDumpString(output, BAD_CAST doc->name); |
| fprintf(output, "\n"); |
| } |
| if (doc->version != NULL) { |
| fprintf(output, "version="); |
| xmlDebugDumpString(output, doc->version); |
| fprintf(output, "\n"); |
| } |
| if (doc->encoding != NULL) { |
| fprintf(output, "encoding="); |
| xmlDebugDumpString(output, doc->encoding); |
| fprintf(output, "\n"); |
| } |
| if (doc->standalone) |
| fprintf(output, "standalone=true\n"); |
| if (doc->oldNs != NULL) |
| xmlDebugDumpNamespaceList(output, doc->oldNs, 0); |
| if (doc->root != NULL) |
| xmlDebugDumpNodeList(output, doc->root, 1); |
| } |
| |
| void xmlDebugDumpEntities(FILE *output, xmlDocPtr doc) { |
| int i; |
| xmlEntityPtr cur; |
| |
| if (output == NULL) output = stdout; |
| if (doc == NULL) { |
| fprintf(output, "DOCUMENT == NULL !\n"); |
| return; |
| } |
| |
| switch (doc->type) { |
| case XML_ELEMENT_NODE: |
| fprintf(output, "Error, ELEMENT found here "); |
| break; |
| case XML_ATTRIBUTE_NODE: |
| fprintf(output, "Error, ATTRIBUTE found here\n"); |
| break; |
| case XML_TEXT_NODE: |
| fprintf(output, "Error, TEXT\n"); |
| break; |
| case XML_CDATA_SECTION_NODE: |
| fprintf(output, "Error, CDATA_SECTION\n"); |
| break; |
| case XML_ENTITY_REF_NODE: |
| fprintf(output, "Error, ENTITY_REF\n"); |
| break; |
| case XML_ENTITY_NODE: |
| fprintf(output, "Error, ENTITY\n"); |
| break; |
| case XML_PI_NODE: |
| fprintf(output, "Error, PI\n"); |
| break; |
| case XML_COMMENT_NODE: |
| fprintf(output, "Error, COMMENT\n"); |
| break; |
| case XML_DOCUMENT_NODE: |
| fprintf(output, "DOCUMENT\n"); |
| break; |
| case XML_HTML_DOCUMENT_NODE: |
| fprintf(output, "HTML DOCUMENT\n"); |
| break; |
| case XML_DOCUMENT_TYPE_NODE: |
| fprintf(output, "Error, DOCUMENT_TYPE\n"); |
| break; |
| case XML_DOCUMENT_FRAG_NODE: |
| fprintf(output, "Error, DOCUMENT_FRAG\n"); |
| break; |
| case XML_NOTATION_NODE: |
| fprintf(output, "Error, NOTATION\n"); |
| break; |
| default: |
| fprintf(output, "NODE_%d\n", doc->type); |
| } |
| if ((doc->intSubset != NULL) && (doc->intSubset->entities != NULL)) { |
| xmlEntitiesTablePtr table = (xmlEntitiesTablePtr) |
| doc->intSubset->entities; |
| fprintf(output, "Entities in internal subset\n"); |
| for (i = 0;i < table->nb_entities;i++) { |
| cur = &table->table[i]; |
| fprintf(output, "%d : %s : ", i, cur->name); |
| switch (cur->type) { |
| case XML_INTERNAL_GENERAL_ENTITY: |
| fprintf(output, "INTERNAL GENERAL"); |
| break; |
| case XML_EXTERNAL_GENERAL_PARSED_ENTITY: |
| fprintf(output, "EXTERNAL PARSED"); |
| break; |
| case XML_EXTERNAL_GENERAL_UNPARSED_ENTITY: |
| fprintf(output, "EXTERNAL UNPARSED"); |
| break; |
| case XML_INTERNAL_PARAMETER_ENTITY: |
| fprintf(output, "INTERNAL PARAMETER"); |
| break; |
| case XML_EXTERNAL_PARAMETER_ENTITY: |
| fprintf(output, "EXTERNAL PARAMETER"); |
| break; |
| default: |
| fprintf(output, "UNKNOWN TYPE %d", |
| cur->type); |
| } |
| if (cur->ExternalID != NULL) |
| fprintf(output, "ID \"%s\"", cur->ExternalID); |
| if (cur->SystemID != NULL) |
| fprintf(output, "SYSTEM \"%s\"", cur->SystemID); |
| if (cur->orig != NULL) |
| fprintf(output, "\n orig \"%s\"", cur->orig); |
| if (cur->content != NULL) |
| fprintf(output, "\n content \"%s\"", cur->content); |
| fprintf(output, "\n"); |
| } |
| } else |
| fprintf(output, "No entities in internal subset\n"); |
| if ((doc->extSubset != NULL) && (doc->extSubset->entities != NULL)) { |
| xmlEntitiesTablePtr table = (xmlEntitiesTablePtr) |
| doc->extSubset->entities; |
| fprintf(output, "Entities in external subset\n"); |
| for (i = 0;i < table->nb_entities;i++) { |
| cur = &table->table[i]; |
| fprintf(output, "%d : %s : ", i, cur->name); |
| switch (cur->type) { |
| case XML_INTERNAL_GENERAL_ENTITY: |
| fprintf(output, "INTERNAL GENERAL"); |
| break; |
| case XML_EXTERNAL_GENERAL_PARSED_ENTITY: |
| fprintf(output, "EXTERNAL PARSED"); |
| break; |
| case XML_EXTERNAL_GENERAL_UNPARSED_ENTITY: |
| fprintf(output, "EXTERNAL UNPARSED"); |
| break; |
| case XML_INTERNAL_PARAMETER_ENTITY: |
| fprintf(output, "INTERNAL PARAMETER"); |
| break; |
| case XML_EXTERNAL_PARAMETER_ENTITY: |
| fprintf(output, "EXTERNAL PARAMETER"); |
| break; |
| default: |
| fprintf(output, "UNKNOWN TYPE %d", |
| cur->type); |
| } |
| if (cur->ExternalID != NULL) |
| fprintf(output, "ID \"%s\"", cur->ExternalID); |
| if (cur->SystemID != NULL) |
| fprintf(output, "SYSTEM \"%s\"", cur->SystemID); |
| if (cur->orig != NULL) |
| fprintf(output, "\n orig \"%s\"", cur->orig); |
| if (cur->content != NULL) |
| fprintf(output, "\n content \"%s\"", cur->content); |
| fprintf(output, "\n"); |
| } |
| } else |
| fprintf(output, "No entities in external subset\n"); |
| } |