msxml4: Add self-registration for CLSID_DOMDocument40, accept it in classfactory.

dlls/msxml3/factory.c

@@ -147,7 +147,8 @@ HRESULT WINAPI DllGetClassObject( REFCLSID rclsid, REFIID iid, LPVOID *ppv )
 
     if( IsEqualCLSID( rclsid, &CLSID_DOMDocument ) ||   /* Version indep. v 2.x */
         IsEqualCLSID( rclsid, &CLSID_DOMDocument2 ) ||  /* Version indep. v 3.0 */
-        IsEqualCLSID( rclsid, &CLSID_DOMDocument30 ) )  /* Version dep.   v 3.0 */
+        IsEqualCLSID( rclsid, &CLSID_DOMDocument30 )||  /* Version dep.   v 3.0 */
+        IsEqualCLSID( rclsid, &CLSID_DOMDocument40 ))   /* Version dep.   v 4.0 */
     {
         cf = (IClassFactory*) &domdoccf.lpVtbl;
     }

dlls/msxml4/Makefile.in

@@ -4,10 +4,11 @@ TOPOBJDIR = ../..
 SRCDIR    = @srcdir@
 VPATH     = @srcdir@
 MODULE    = msxml4.dll
-IMPORTS   = kernel32
+IMPORTS   = ole32 advapi32 kernel32
 
 C_SRCS = \
-	main.c
+	main.c \
+	regsvr.c
 
 @MAKE_DLL_RULES@
 

dlls/msxml4/msxml4.spec

 @ stdcall -private DllCanUnloadNow()
-@ stub -private DllGetClassObject
-@ stub -private DllRegisterServer
-@ stub -private DllUnregisterServer
+@ stdcall -private DllGetClassObject(ptr ptr ptr) msxml3.DllGetClassObject
+@ stdcall -private DllRegisterServer()
+@ stdcall -private DllUnregisterServer()

include/msxml2.idl

@@ -1070,6 +1070,14 @@ coclass DOMDocument30
     [default, source] dispinterface XMLDOMDocumentEvents;
 }
 
+[
+    uuid(88d969c0-f192-11d4-a65f-0040963251e5)
+]
+coclass DOMDocument40
+{
+    [default] interface IXMLDOMDocument2;
+    [default, source] dispinterface XMLDOMDocumentEvents;
+}
 
 [
     uuid(F6D90F12-9C73-11D3-B32E-00C04F990BB4)

tools/wine.inf.in

@@ -2404,6 +2404,7 @@ HKLM,%CurrentVersion%\Telephony\Country List\998,"SameAreaRule",,"G"
 11,,msisip.dll,1
 11,,mstask.dll,1
 11,,msxml3.dll,1
+11,,msxml4.dll,1
 11,,objsel.dll,1
 11,,oledb32.dll,1
 11,,qcap.dll,1