From ed748a305e21a1ba4d8b7abed5d6e7ff3a11cdf5 Mon Sep 17 00:00:00 2001
From: Mike McCormack <mike@codeweavers.com>
Date: Thu, 11 Aug 2005 10:32:36 +0000
Subject: [PATCH] Implement IXMLDOMDocument::loadXML.

---
 dlls/msxml3/domdoc.c | 54 +++++++++++++++++++++++++++++++++++++++++---
 1 file changed, 51 insertions(+), 3 deletions(-)

diff --git a/dlls/msxml3/domdoc.c b/dlls/msxml3/domdoc.c
index 9518e2c2027..4fdb589ef3c 100644
--- a/dlls/msxml3/domdoc.c
+++ b/dlls/msxml3/domdoc.c
@@ -668,7 +668,8 @@ static xmlDocPtr doread( LPWSTR filename )
             ptr = MapViewOfFile( mapping, FILE_MAP_READ, 0, 0, len );
             if ( ptr )
             {
-                xmldoc = xmlParseMemory( ptr, len );
+                xmldoc = xmlReadMemory( ptr, len, NULL, NULL,
+                              XML_PARSE_NOERROR | XML_PARSE_NOWARNING );
                 UnmapViewOfFile( ptr );
             }
             CloseHandle( mapping );
@@ -781,13 +782,60 @@ static HRESULT WINAPI domdoc_abort(
 }
 
 
+BOOL bstr_to_utf8( BSTR bstr, char **pstr, int *plen )
+{
+    UINT len, blen = SysStringLen( bstr );
+    LPSTR str;
+
+    len = WideCharToMultiByte( CP_UTF8, 0, bstr, blen, NULL, 0, NULL, NULL );
+    str = HeapAlloc( GetProcessHeap(), 0, len );
+    if ( !str )
+        return FALSE;
+    WideCharToMultiByte( CP_UTF8, 0, bstr, blen, str, len, NULL, NULL );
+    *plen = len;
+    *pstr = str;
+    return TRUE;
+}
+
 static HRESULT WINAPI domdoc_loadXML(
     IXMLDOMDocument *iface,
     BSTR bstrXML,
     VARIANT_BOOL* isSuccessful )
 {
-    FIXME("\n");
-    return E_NOTIMPL;
+    domdoc *This = impl_from_IXMLDOMDocument( iface );
+    xmlDocPtr xmldoc;
+    char *str;
+    int len;
+
+    TRACE("%p %s %p\n", This, debugstr_w( bstrXML ), isSuccessful );
+
+    if ( This->node )
+    {
+        IXMLDOMNode_Release( This->node );
+        This->node = NULL;
+    }
+
+    if ( !isSuccessful )
+        return S_FALSE;
+
+    *isSuccessful = VARIANT_FALSE;
+
+    if ( !bstrXML )
+        return S_FALSE;
+
+    if ( !bstr_to_utf8( bstrXML, &str, &len ) )
+        return S_FALSE;
+
+    xmldoc = xmlReadMemory( str, len, NULL, NULL,
+                XML_PARSE_NOERROR | XML_PARSE_NOWARNING );
+    HeapFree( GetProcessHeap(), 0, str );
+
+    This->node = create_domdoc_node( xmldoc );
+    if( !This->node )
+        return S_FALSE;
+
+    *isSuccessful = VARIANT_TRUE;
+    return S_OK;
 }