commit aa284e7e76aba87f2e3bb782e8a3e4e70739ecfc
author Alistair Leslie-Hughes <leslie_alistair@hotmail.com> Tue Feb 19 12:36:53 2008 +1100
committer Alexandre Julliard <julliard@winehq.org> Tue Feb 19 14:15:05 2008 +0100
tree e896043de83363be1b34e874332b23c8749f83e2
parent c75df9b8427d41adc03cf9a92f73ecd44bf9e214

msxml3: Implemented IDispatch for IXMLDocument.

dlls/msxml3/xmldoc.c

diff --git a/dlls/msxml3/xmldoc.c b/dlls/msxml3/xmldoc.c
index ee72d1b..fb653ad 100644
--- a/dlls/msxml3/xmldoc.c
+++ b/dlls/msxml3/xmldoc.c
@@ -126,23 +126,50 @@
 
 static HRESULT WINAPI xmldoc_GetTypeInfoCount(IXMLDocument *iface, UINT* pctinfo)
 {
-    FIXME("\n");
-    return E_NOTIMPL;
+    xmldoc *This = impl_from_IXMLDocument(iface);
+
+    TRACE("(%p)->(%p)\n", This, pctinfo);
+
+    *pctinfo = 1;
+
+    return S_OK;
 }
 
 static HRESULT WINAPI xmldoc_GetTypeInfo(IXMLDocument *iface, UINT iTInfo,
                                          LCID lcid, ITypeInfo** ppTInfo)
 {
-    FIXME("\n");
-    return E_NOTIMPL;
+    xmldoc *This = impl_from_IXMLDocument(iface);
+    HRESULT hr;
+
+    TRACE("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
+
+    hr = get_typeinfo(IXMLDocument_tid, ppTInfo);
+
+    return hr;
 }
 
 static HRESULT WINAPI xmldoc_GetIDsOfNames(IXMLDocument *iface, REFIID riid,
                                            LPOLESTR* rgszNames, UINT cNames,
                                            LCID lcid, DISPID* rgDispId)
 {
-    FIXME("\n");
-    return E_NOTIMPL;
+    xmldoc *This = impl_from_IXMLDocument(iface);
+    ITypeInfo *typeinfo;
+    HRESULT hr;
+
+    TRACE("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
+          lcid, rgDispId);
+
+    if(!rgszNames || cNames == 0 || !rgDispId)
+        return E_INVALIDARG;
+
+    hr = get_typeinfo(IXMLDocument_tid, &typeinfo);
+    if(SUCCEEDED(hr))
+    {
+        hr = ITypeInfo_GetIDsOfNames(typeinfo, rgszNames, cNames, rgDispId);
+        ITypeInfo_Release(typeinfo);
+    }
+
+    return hr;
 }
 
 static HRESULT WINAPI xmldoc_Invoke(IXMLDocument *iface, DISPID dispIdMember,
@@ -150,8 +177,22 @@
                                     DISPPARAMS* pDispParams, VARIANT* pVarResult,
                                     EXCEPINFO* pExcepInfo, UINT* puArgErr)
 {
-    FIXME("\n");
-    return E_NOTIMPL;
+    xmldoc *This = impl_from_IXMLDocument(iface);
+    ITypeInfo *typeinfo;
+    HRESULT hr;
+
+    TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
+          lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
+
+    hr = get_typeinfo(IXMLDocument_tid, &typeinfo);
+    if(SUCCEEDED(hr))
+    {
+        hr = ITypeInfo_Invoke(typeinfo, &(This->lpVtbl), dispIdMember, wFlags, pDispParams,
+                pVarResult, pExcepInfo, puArgErr);
+        ITypeInfo_Release(typeinfo);
+    }
+
+    return hr;
 }
 
 static HRESULT WINAPI xmldoc_get_root(IXMLDocument *iface, IXMLElement **p)