[PATCH 1/8] msxml3: Add a function to validate a tree against a schema cache

[Adam Martinson]

---
 dlls/msxml3/msxml_private.h |    1 +
 dlls/msxml3/schema.c        |   77 +++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 78 insertions(+), 0 deletions(-)

diff --git a/dlls/msxml3/msxml_private.h b/dlls/msxml3/msxml_private.h
index 7fcfea7..01d4824 100644
--- a/dlls/msxml3/msxml_private.h
+++ b/dlls/msxml3/msxml_private.h
@@ -192,6 +192,7 @@ extern HRESULT node_replace_child(xmlnode*,IXMLDOMNode*,IXMLDOMNode*,IXMLDOMNode
 extern HRESULT node_put_text(xmlnode*,BSTR);
 
 extern HRESULT DOMDocument_create_from_xmldoc(xmlDocPtr xmldoc, IXMLDOMDocument3 **document);
+extern HRESULT SchemaCache_validate_tree(IXMLDOMSchemaCollection2* iface, xmlNodePtr tree);
 
 static inline BSTR bstr_from_xmlChar(const xmlChar *str)
 {
diff --git a/dlls/msxml3/schema.c b/dlls/msxml3/schema.c
index 0120333..4a0f426 100644
--- a/dlls/msxml3/schema.c
+++ b/dlls/msxml3/schema.c
@@ -611,6 +611,83 @@ static const struct IXMLDOMSchemaCollection2Vtbl schema_cache_vtbl =
     schema_cache_getDeclaration
 };
 
+static void LIBXML2_LOG_CALLBACK validate_error(void* ctx, char const* msg, ...)
+{
+    va_list ap;
+    va_start(ap, msg);
+    LIBXML2_CALLBACK_ERR(SchemaCache_validate_tree, msg, ap);
+    va_end(ap);
+}
+
+static void LIBXML2_LOG_CALLBACK validate_warning(void* ctx, char const* msg, ...)
+{
+    va_list ap;
+    va_start(ap, msg);
+    LIBXML2_CALLBACK_WARN(SchemaCache_validate_tree, msg, ap);
+    va_end(ap);
+}
+
+static void validate_serror(void* ctx, xmlErrorPtr err)
+{
+    LIBXML2_CALLBACK_SERROR(SchemaCache_validate_tree, err);
+}
+
+HRESULT SchemaCache_validate_tree(IXMLDOMSchemaCollection2* iface, xmlNodePtr tree)
+{
+    schema_cache* This = impl_from_IXMLDOMSchemaCollection2(iface);
+    cache_entry* entry;
+    xmlChar const* ns = NULL;
+    TRACE("(%p, %p)\n", This, tree);
+
+    if (!tree)
+        return E_POINTER;
+
+    if ((xmlNodePtr)tree->doc == tree)
+    {
+        xmlNodePtr root = xmlDocGetRootElement(tree->doc);
+        if (root && root->ns)
+            ns = root->ns->href;
+    }
+    else if (tree->ns)
+    {
+        ns = tree->ns->href;
+    }
+
+    entry = xmlHashLookup(This->cache, ns);
+    /* TODO: if the ns is not in the cache, and it's a URL,
+     *       do we try to load from that? */
+    if (entry)
+    {
+        if (entry->type == SCHEMA_TYPE_XDR)
+        {
+            FIXME("partial stub: XDR schema support not implemented\n");
+            return S_OK;
+        }
+        else if (entry->type == SCHEMA_TYPE_XSD)
+        {
+            xmlSchemaValidCtxtPtr svctx;
+            int err;
+            /* TODO: if validateOnLoad property is false,
+             *       we probably need to validate the schema here. */
+            svctx = xmlSchemaNewValidCtxt(entry->schema);
+            xmlSchemaSetValidErrors(svctx, validate_error, validate_warning, NULL);
+            #if LIBXML_VERSION >= 20621
+                xmlSchemaSetValidStructuredErrors(svctx, validate_serror, NULL);
+            #endif
+
+            if ((xmlNodePtr)tree->doc == tree)
+                err = xmlSchemaValidateDoc(svctx, (xmlDocPtr)tree);
+            else
+                err = xmlSchemaValidateOneElement(svctx, tree);
+
+            xmlSchemaFreeValidCtxt(svctx);
+            return err? S_FALSE : S_OK;
+        }
+    }
+
+    return E_FAIL;
+}
+
 HRESULT SchemaCache_create(IUnknown* pUnkOuter, void** ppObj)
 {
     schema_cache* This = heap_alloc(sizeof(schema_cache));
-- 
1.7.2.3


--------------020204050206080402090204--