38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#define IN_LIBXML

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#include "libxml.h"

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#ifdef LIBXML_SCHEMATRON_ENABLED

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#include <string.h>

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#include <libxml/parser.h>

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#include <libxml/tree.h>

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#include <libxml/uri.h>

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#include <libxml/xpath.h>

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#include <libxml/xpathInternals.h>

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#include <libxml/pattern.h>

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#include <libxml/schematron.h>

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#define SCHEMATRON_PARSE_OPTIONS XML_PARSE_NOENT

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#define SCT_OLD_NS BAD_CAST "http://www.ascc.net/xml/schematron"

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#define XML_SCHEMATRON_NS BAD_CAST "http://purl.oclc.org/dsdl/schematron"

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic const xmlChar *xmlSchematronNs = XML_SCHEMATRON_NS;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic const xmlChar *xmlOldSchematronNs = SCT_OLD_NS;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#define IS_SCHEMATRON(node, elem) \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ((node != NULL) && (node->type == XML_ELEMENT_NODE ) && \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (node->ns != NULL) && \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (xmlStrEqual(node->name, (const xmlChar *) elem)) && \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ((xmlStrEqual(node->ns->href, xmlSchematronNs)) || \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (xmlStrEqual(node->ns->href, xmlOldSchematronNs))))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#define NEXT_SCHEMATRON(node) \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (node != NULL) { \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((node->type == XML_ELEMENT_NODE ) && (node->ns != NULL) && \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ((xmlStrEqual(node->ns->href, xmlSchematronNs)) || \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (xmlStrEqual(node->ns->href, xmlOldSchematronNs)))) \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync break; \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync node = node->next; \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#define TODO \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlGenericError(xmlGenericErrorContext, \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "Unimplemented block at %s:%d\n", \

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync __FILE__, __LINE__);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsynctypedef enum {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMATRON_ASSERT=1,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMATRON_REPORT=2

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync} xmlSchematronTestType;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsynctypedef struct _xmlSchematronTest xmlSchematronTest;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsynctypedef xmlSchematronTest *xmlSchematronTestPtr;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstruct _xmlSchematronTest {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronTestPtr next; /* the next test in the list */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronTestType type; /* the test type */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr node; /* the node in the tree */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *test; /* the expression to test */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlXPathCompExprPtr comp; /* the compiled expression */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *report; /* the message to report */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync};

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsynctypedef struct _xmlSchematronRule xmlSchematronRule;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsynctypedef xmlSchematronRule *xmlSchematronRulePtr;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstruct _xmlSchematronRule {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr next; /* the next rule in the list */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr patnext;/* the next rule in the pattern list */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr node; /* the node in the tree */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *context; /* the context evaluation rule */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronTestPtr tests; /* the list of tests */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlPatternPtr pattern; /* the compiled pattern associated */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *report; /* the message to report */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync};

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsynctypedef struct _xmlSchematronPattern xmlSchematronPattern;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsynctypedef xmlSchematronPattern *xmlSchematronPatternPtr;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstruct _xmlSchematronPattern {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPatternPtr next;/* the next pattern in the list */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr rules; /* the list of rules */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *name; /* the name of the pattern */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync};

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstruct _xmlSchematron {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const xmlChar *name; /* schema name */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int preserve; /* was the document passed by the user */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDocPtr doc; /* pointer to the parsed document */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int flags; /* specific to this schematron */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync void *_private; /* unused by the library */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDictPtr dict; /* the dictionnary used internally */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const xmlChar *title; /* the title if any */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int nbNs; /* the number of namespaces */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int nbPattern; /* the number of patterns */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPatternPtr patterns;/* the patterns found */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr rules; /* the rules gathered */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int nbNamespaces; /* number of namespaces in the array */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int maxNamespaces; /* size of the array */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const xmlChar **namespaces; /* the array of namespaces */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync};

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstruct _xmlSchematronValidCtxt {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int type;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int flags; /* an or of xmlSchematronValidOptions */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDictPtr dict;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int nberrors;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int err;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPtr schema;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlXPathContextPtr xctxt;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync FILE *outputFile; /* if using XML_SCHEMATRON_OUT_FILE */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlBufferPtr outputBuffer; /* if using XML_SCHEMATRON_OUT_BUFFER */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlOutputWriteCallback iowrite; /* if using XML_SCHEMATRON_OUT_IO */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlOutputCloseCallback ioclose;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync void *ioctx;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync};

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstruct _xmlSchematronParserCtxt {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int type;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const xmlChar *URL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDocPtr doc;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int preserve; /* Whether the doc should be freed */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const char *buffer;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int size;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDictPtr dict; /* dictionnary for interned string names */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int nberrors;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int err;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlXPathContextPtr xctxt; /* the XPath context used for compilation */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPtr schema;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int nbNamespaces; /* number of namespaces in the array */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int maxNamespaces; /* size of the array */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const xmlChar **namespaces; /* the array of namespaces */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int nbIncludes; /* number of includes in the array */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int maxIncludes; /* size of the array */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr *includes; /* the array of includes */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /* error rreporting data */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync void *userData; /* user specific data block */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronValidityErrorFunc error;/* the callback in case of errors */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronValidityWarningFunc warning;/* callback in case of warning */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlStructuredErrorFunc serror; /* the structured function */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync};

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#define XML_STRON_CTXT_PARSER 1

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#define XML_STRON_CTXT_VALIDATOR 2

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronPErrMemory(xmlSchematronParserCtxtPtr ctxt,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const char *extra, xmlNodePtr node)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->nberrors++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync __xmlSimpleError(XML_FROM_SCHEMASP, XML_ERR_NO_MEMORY, node, NULL,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync extra);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronPErr(xmlSchematronParserCtxtPtr ctxt, xmlNodePtr node, int error,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const char *msg, const xmlChar * str1, const xmlChar * str2)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlGenericErrorFunc channel = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlStructuredErrorFunc schannel = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync void *data = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->nberrors++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync channel = ctxt->error;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync data = ctxt->userData;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync schannel = ctxt->serror;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync __xmlRaiseError(schannel, channel, data, ctxt, node, XML_FROM_SCHEMASP,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync error, XML_ERR_ERROR, NULL, 0,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (const char *) str1, (const char *) str2, NULL, 0, 0,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync msg, str1, str2);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronVErrMemory(xmlSchematronValidCtxtPtr ctxt,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const char *extra, xmlNodePtr node)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->nberrors++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->err = XML_SCHEMAV_INTERNAL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync __xmlSimpleError(XML_FROM_SCHEMASV, XML_ERR_NO_MEMORY, node, NULL,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync extra);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic xmlSchematronTestPtr

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronAddTest(xmlSchematronParserCtxtPtr ctxt,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronTestType type,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr rule,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr node, xmlChar *test, xmlChar *report)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronTestPtr ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlXPathCompExprPtr comp;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((ctxt == NULL) || (rule == NULL) || (node == NULL) ||

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (test == NULL))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /*

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync comp = xmlXPathCtxtCompile(ctxt->xctxt, test);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (comp == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, node,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "Failed to compile test expression %s",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync test, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = (xmlSchematronTestPtr) xmlMalloc(sizeof(xmlSchematronTest));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(ctxt, "allocating schema test", node);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync memset(ret, 0, sizeof(xmlSchematronTest));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->type = type;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->node = node;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->test = test;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->comp = comp;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->report = report;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->next = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (rule->tests == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync rule->tests = ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronTestPtr prev = rule->tests;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (prev->next != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync prev = prev->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync prev->next = ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronFreeTests(xmlSchematronTestPtr tests) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronTestPtr next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (tests != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync next = tests->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (tests->test != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(tests->test);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (tests->comp != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlXPathFreeCompExpr(tests->comp);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (tests->report != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(tests->report);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(tests);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync tests = next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic xmlSchematronRulePtr

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronAddRule(xmlSchematronParserCtxtPtr ctxt, xmlSchematronPtr schema,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPatternPtr pat, xmlNodePtr node,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *context, xmlChar *report)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlPatternPtr pattern;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((ctxt == NULL) || (schema == NULL) || (node == NULL) ||

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (context == NULL))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /*

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync pattern = xmlPatterncompile(context, ctxt->dict, XML_PATTERN_XPATH,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->namespaces);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (pattern == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, node,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "Failed to compile context expression %s",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync context, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = (xmlSchematronRulePtr) xmlMalloc(sizeof(xmlSchematronRule));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(ctxt, "allocating schema rule", node);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync memset(ret, 0, sizeof(xmlSchematronRule));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->node = node;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->context = context;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->pattern = pattern;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->report = report;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->next = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (schema->rules == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync schema->rules = ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr prev = schema->rules;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (prev->next != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync prev = prev->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync prev->next = ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->patnext = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (pat->rules == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync pat->rules = ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr prev = pat->rules;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (prev->patnext != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync prev = prev->patnext;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync prev->patnext = ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronFreeRules(xmlSchematronRulePtr rules) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (rules != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync next = rules->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (rules->tests)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronFreeTests(rules->tests);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (rules->context != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(rules->context);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (rules->pattern)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFreePattern(rules->pattern);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (rules->report != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(rules->report);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(rules);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync rules = next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic xmlSchematronPatternPtr

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronAddPattern(xmlSchematronParserCtxtPtr ctxt,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPtr schema, xmlNodePtr node, xmlChar *name)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPatternPtr ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((ctxt == NULL) || (schema == NULL) || (node == NULL) || (name == NULL))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = (xmlSchematronPatternPtr) xmlMalloc(sizeof(xmlSchematronPattern));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(ctxt, "allocating schema pattern", node);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync memset(ret, 0, sizeof(xmlSchematronPattern));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->name = name;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->next = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (schema->patterns == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync schema->patterns = ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPatternPtr prev = schema->patterns;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (prev->next != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync prev = prev->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync prev->next = ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronFreePatterns(xmlSchematronPatternPtr patterns) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPatternPtr next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (patterns != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync next = patterns->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (patterns->name != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(patterns->name);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(patterns);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync patterns = next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic xmlSchematronPtr

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronNewSchematron(xmlSchematronParserCtxtPtr ctxt)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPtr ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = (xmlSchematronPtr) xmlMalloc(sizeof(xmlSchematron));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(ctxt, "allocating schema", NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync memset(ret, 0, sizeof(xmlSchematron));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->dict = ctxt->dict;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDictReference(ret->dict);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronFree(xmlSchematronPtr schema)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (schema == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((schema->doc != NULL) && (!(schema->preserve)))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFreeDoc(schema->doc);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (schema->namespaces != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree((char **) schema->namespaces);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronFreeRules(schema->rules);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronFreePatterns(schema->patterns);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDictFree(schema->dict);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(schema);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronNewParserCtxt(const char *URL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronParserCtxtPtr ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (URL == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret =

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (xmlSchematronParserCtxtPtr)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlMalloc(sizeof(xmlSchematronParserCtxt));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating schema parser context",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync memset(ret, 0, sizeof(xmlSchematronParserCtxt));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->type = XML_STRON_CTXT_PARSER;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->dict = xmlDictCreate();

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->URL = xmlDictLookup(ret->dict, (const xmlChar *) URL, -1);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->includes = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->xctxt = xmlXPathNewContext(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret->xctxt == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating schema parser XPath context",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronFreeParserCtxt(ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->xctxt->flags = XML_XPATH_CHECKNS;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronNewMemParserCtxt(const char *buffer, int size)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronParserCtxtPtr ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((buffer == NULL) || (size <= 0))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret =

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (xmlSchematronParserCtxtPtr)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlMalloc(sizeof(xmlSchematronParserCtxt));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating schema parser context",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync memset(ret, 0, sizeof(xmlSchematronParserCtxt));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->buffer = buffer;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->size = size;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->dict = xmlDictCreate();

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->xctxt = xmlXPathNewContext(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret->xctxt == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating schema parser XPath context",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronFreeParserCtxt(ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronNewDocParserCtxt(xmlDocPtr doc)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronParserCtxtPtr ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (doc == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret =

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (xmlSchematronParserCtxtPtr)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlMalloc(sizeof(xmlSchematronParserCtxt));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating schema parser context",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync memset(ret, 0, sizeof(xmlSchematronParserCtxt));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->doc = doc;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->dict = xmlDictCreate();

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /* The application has responsibility for the document */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->preserve = 1;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->xctxt = xmlXPathNewContext(doc);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret->xctxt == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating schema parser XPath context",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronFreeParserCtxt(ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronFreeParserCtxt(xmlSchematronParserCtxtPtr ctxt)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->doc != NULL && !ctxt->preserve)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFreeDoc(ctxt->doc);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->xctxt != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlXPathFreeContext(ctxt->xctxt);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->namespaces != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree((char **) ctxt->namespaces);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDictFree(ctxt->dict);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(ctxt);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#if 0

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronPushInclude(xmlSchematronParserCtxtPtr ctxt,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDocPtr doc, xmlNodePtr cur)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->includes == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->maxIncludes = 10;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->includes = (xmlNodePtr *)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlMalloc(ctxt->maxIncludes * 2 * sizeof(xmlNodePtr));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->includes == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating parser includes",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->nbIncludes = 0;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else if (ctxt->nbIncludes + 2 >= ctxt->maxIncludes) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr *tmp;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync tmp = (xmlNodePtr *)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlRealloc(ctxt->includes, ctxt->maxIncludes * 4 *

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync sizeof(xmlNodePtr));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (tmp == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating parser includes",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->includes = tmp;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->maxIncludes *= 2;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->includes[2 * ctxt->nbIncludes] = cur;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->includes[2 * ctxt->nbIncludes + 1] = (xmlNodePtr) doc;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->nbIncludes++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic xmlNodePtr

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronPopInclude(xmlSchematronParserCtxtPtr ctxt)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDocPtr doc;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->nbIncludes <= 0)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->nbIncludes--;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync doc = (xmlDocPtr) ctxt->includes[2 * ctxt->nbIncludes + 1];

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = ctxt->includes[2 * ctxt->nbIncludes];

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFreeDoc(doc);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = ret->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(xmlSchematronPopInclude(ctxt));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#endif

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronAddNamespace(xmlSchematronParserCtxtPtr ctxt,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const xmlChar *prefix, const xmlChar *ns)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->namespaces == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->maxNamespaces = 10;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->namespaces = (const xmlChar **)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlMalloc(ctxt->maxNamespaces * 2 * sizeof(const xmlChar *));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->namespaces == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating parser namespaces",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->nbNamespaces = 0;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else if (ctxt->nbNamespaces + 2 >= ctxt->maxNamespaces) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const xmlChar **tmp;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync tmp = (const xmlChar **)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlRealloc((xmlChar **) ctxt->namespaces, ctxt->maxNamespaces * 4 *

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync sizeof(const xmlChar *));

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (tmp == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErrMemory(NULL, "allocating parser namespaces",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->namespaces = tmp;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->maxNamespaces *= 2;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->namespaces[2 * ctxt->nbNamespaces] =

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDictLookup(ctxt->dict, ns, -1);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->namespaces[2 * ctxt->nbNamespaces + 1] =

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDictLookup(ctxt->dict, prefix, -1);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->nbNamespaces++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->namespaces[2 * ctxt->nbNamespaces] = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->namespaces[2 * ctxt->nbNamespaces + 1] = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronParseRule(xmlSchematronParserCtxtPtr ctxt,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPatternPtr pattern,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr rule)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr cur;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int nbChecks = 0;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *test;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *context;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *report;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronRulePtr ruleptr;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronTestPtr testptr;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((ctxt == NULL) || (rule == NULL)) return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync context = xmlGetNoNsProp(rule, BAD_CAST "context");

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (context == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, rule,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "rule has no context attribute",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else if (context[0] == 0) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, rule,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "rule has an empty context attribute",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(context);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ruleptr = xmlSchematronAddRule(ctxt, ctxt->schema, pattern,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync rule, context, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ruleptr == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(context);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync cur = rule->children;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NEXT_SCHEMATRON(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (cur != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (IS_SCHEMATRON(cur, "assert")) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync nbChecks++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync test = xmlGetNoNsProp(cur, BAD_CAST "test");

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (test == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "assert has no test attribute",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else if (test[0] == 0) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "assert has an empty test attribute",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(test);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /* TODO will need dynamic processing instead */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync report = xmlNodeGetContent(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync testptr = xmlSchematronAddTest(ctxt, XML_SCHEMATRON_ASSERT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ruleptr, cur, test, report);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (testptr == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(test);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else if (IS_SCHEMATRON(cur, "report")) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync nbChecks++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync test = xmlGetNoNsProp(cur, BAD_CAST "test");

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (test == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "assert has no test attribute",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else if (test[0] == 0) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "assert has an empty test attribute",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(test);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /* TODO will need dynamic processing instead */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync report = xmlNodeGetContent(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync testptr = xmlSchematronAddTest(ctxt, XML_SCHEMATRON_REPORT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ruleptr, cur, test, report);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (testptr == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(test);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "Expecting an assert or a report element instead of %s",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync cur->name, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync cur = cur->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NEXT_SCHEMATRON(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (nbChecks == 0) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, rule,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "rule has no assert nor report element", NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronParsePattern(xmlSchematronParserCtxtPtr ctxt, xmlNodePtr pat)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr cur;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPatternPtr pattern;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int nbRules = 0;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *id;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((ctxt == NULL) || (pat == NULL)) return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync id = xmlGetNoNsProp(pat, BAD_CAST "id");

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (id == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync id = xmlGetNoNsProp(pat, BAD_CAST "name");

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync pattern = xmlSchematronAddPattern(ctxt, ctxt->schema, pat, id);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (pattern == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (id != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(id);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync cur = pat->children;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NEXT_SCHEMATRON(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (cur != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (IS_SCHEMATRON(cur, "rule")) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronParseRule(ctxt, pattern, cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync nbRules++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "Expecting a rule element instead of %s", cur->name, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync cur = cur->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NEXT_SCHEMATRON(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (nbRules == 0) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, pat,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "Pattern has no rule element", NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#if 0

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic xmlNodePtr

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronLoadInclude(xmlSchematronParserCtxtPtr ctxt, xmlNodePtr cur)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr ret = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDocPtr doc = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *href = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *base = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *URI = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((ctxt == NULL) || (cur == NULL))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync href = xmlGetNoNsProp(cur, BAD_CAST "href");

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (href == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "Include has no href attribute", NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(cur->next);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /* do the URI base composition, load and find the root */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync base = xmlNodeGetBase(cur->doc, cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync URI = xmlBuildURI(href, base);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync doc = xmlReadFile((const char *) URI, NULL, SCHEMATRON_PARSE_OPTIONS);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (doc == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_FAILED_LOAD,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "could not load include '%s'.\n",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync URI, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync goto done;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = xmlDocGetRootElement(doc);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_FAILED_LOAD,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "could not find root from include '%s'.\n",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync URI, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync goto done;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /* Success, push the include for rollback on exit */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPushInclude(ctxt, doc, cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncdone:

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (doc != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFreeDoc(doc);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(href);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (base != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(base);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (URI != NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(URI);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync#endif

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronParse(xmlSchematronParserCtxtPtr ctxt)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync{

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPtr ret = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlDocPtr doc;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr root, cur;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync int preserve = 0;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->nberrors = 0;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /*

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->URL != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync doc = xmlReadFile((const char *) ctxt->URL, NULL,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync SCHEMATRON_PARSE_OPTIONS);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (doc == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, NULL,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_FAILED_LOAD,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "xmlSchematronParse: could not load '%s'.\n",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->URL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->preserve = 0;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else if (ctxt->buffer != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync doc = xmlReadMemory(ctxt->buffer, ctxt->size, NULL, NULL,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync SCHEMATRON_PARSE_OPTIONS);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (doc == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, NULL,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_FAILED_PARSE,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "xmlSchematronParse: could not parse.\n",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync doc->URL = xmlStrdup(BAD_CAST "in_memory_buffer");

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->URL = xmlDictLookup(ctxt->dict, BAD_CAST "in_memory_buffer", -1);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->preserve = 0;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else if (ctxt->doc != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync doc = ctxt->doc;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync preserve = 1;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->preserve = 1;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, NULL,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOTHING_TO_PARSE,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "xmlSchematronParse: could not parse.\n",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /*

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync root = xmlDocGetRootElement(doc);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (root == NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, (xmlNodePtr) doc,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "The schema has no document element.\n", NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (!preserve) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFreeDoc(doc);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (!IS_SCHEMATRON(root, "schema")) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, root,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "The XML document '%s' is not a XML schematron document",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->URL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync goto exit;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = xmlSchematronNewSchematron(ctxt);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync goto exit;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->schema = ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /*

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync cur = root->children;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NEXT_SCHEMATRON(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (IS_SCHEMATRON(cur, "title")) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *title = xmlNodeGetContent(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (title != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->title = xmlDictLookup(ret->dict, title, -1);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(title);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync cur = cur->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NEXT_SCHEMATRON(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (IS_SCHEMATRON(cur, "ns")) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *prefix = xmlGetNoNsProp(cur, BAD_CAST "prefix");

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *uri = xmlGetNoNsProp(cur, BAD_CAST "uri");

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((uri == NULL) || (uri[0] == 0)) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "ns element has no uri", NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((prefix == NULL) || (prefix[0] == 0)) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "ns element has no prefix", NULL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((prefix) && (uri)) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlXPathRegisterNs(ctxt->xctxt, prefix, uri);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronAddNamespace(ctxt, prefix, uri);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->nbNs++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (uri)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(uri);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (prefix)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFree(prefix);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync cur = cur->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NEXT_SCHEMATRON(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (cur != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (IS_SCHEMATRON(cur, "pattern")) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronParsePattern(ctxt, cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->nbPattern++;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, cur,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "Expecting a pattern element instead of %s", cur->name, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync cur = cur->next;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync NEXT_SCHEMATRON(cur);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret->nbPattern == 0) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronPErr(ctxt, root,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync XML_SCHEMAP_NOROOT,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync "The schematron document '%s' has no pattern",

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->URL, NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync goto exit;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /* the original document must be kept for reporting */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->doc = doc;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (preserve) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->preserve = 1;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync preserve = 1;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncexit:

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (!preserve) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlFreeDoc(doc);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ctxt->nberrors != 0) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlSchematronFree(ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync } else {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->namespaces = ctxt->namespaces;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret->nbNamespaces = ctxt->nbNamespaces;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->namespaces = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync }

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return (ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic xmlNodePtr

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronGetNode(xmlSchematronValidCtxtPtr ctxt,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr cur, const xmlChar *xpath) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr node = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlXPathObjectPtr ret;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((ctxt == NULL) || (cur == NULL) || (xpath == NULL))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->xctxt->doc = cur->doc;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ctxt->xctxt->node = cur;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = xmlXPathEval(xpath, ctxt->xctxt);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if (ret == NULL)

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(NULL);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((ret->type == XPATH_NODESET) &&

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (ret->nodesetval != NULL) && (ret->nodesetval->nodeNr > 0))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync node = ret->nodesetval->nodeTab[0];

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlXPathFreeObject(ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(node);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic void

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronReportOutput(xmlSchematronValidCtxtPtr ctxt ATTRIBUTE_UNUSED,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr cur ATTRIBUTE_UNUSED,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync const char *msg) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync /* TODO */

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync fprintf(stderr, "%s", msg);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync}

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncstatic xmlChar *

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsyncxmlSchematronFormatReport(xmlSchematronValidCtxtPtr ctxt,

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr test, xmlNodePtr cur) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *ret = NULL;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlNodePtr child, node;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((test == NULL) || (cur == NULL))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync return(ret);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync child = test->children;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync while (child != NULL) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync if ((child->type == XML_TEXT_NODE) ||

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync (child->type == XML_CDATA_SECTION_NODE))

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync ret = xmlStrcat(ret, child->content);

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync else if (IS_SCHEMATRON(child, "name")) {

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync xmlChar *path;

38ae7e4efe803ea78b6499cd05a394db32623e41vboxsync