Alistair Leslie-Hughes : rpcrt4: Added stub function CreateStubFromTypeInfo .

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 9d056eb8e24f7c6789b255e21ca3978ae6dd1d78
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=9d056eb8e24f7c6789b255e21ca3978ae6dd1d78

Author: Alistair Leslie-Hughes <leslie_alistair at hotmail.com>
Date:   Mon Mar 22 20:27:22 2010 +1100

rpcrt4: Added stub function CreateStubFromTypeInfo.

---

 dlls/rpcrt4/cproxy.c    |   21 +++++++++++++++++++++
 dlls/rpcrt4/rpcrt4.spec |    2 +-
 2 files changed, 22 insertions(+), 1 deletions(-)

diff --git a/dlls/rpcrt4/cproxy.c b/dlls/rpcrt4/cproxy.c
index 9ce555f..59ec80d 100644
--- a/dlls/rpcrt4/cproxy.c
+++ b/dlls/rpcrt4/cproxy.c
@@ -483,3 +483,24 @@ CreateProxyFromTypeInfo( LPTYPEINFO pTypeInfo, LPUNKNOWN pUnkOuter, REFIID riid,
     }
     return E_NOTIMPL;
 }
+
+HRESULT WINAPI
+CreateStubFromTypeInfo(ITypeInfo *pTypeInfo, REFIID riid, IUnknown *pUnkServer,
+                       IRpcStubBuffer **ppStub )
+{
+    typedef INT (WINAPI *MessageBoxA)(HWND,LPCSTR,LPCSTR,UINT);
+    HMODULE hUser32 = LoadLibraryA("user32");
+    MessageBoxA pMessageBoxA = (void *)GetProcAddress(hUser32, "MessageBoxA");
+
+    FIXME("%p %s %p %p\n", pTypeInfo, debugstr_guid(riid), pUnkServer, ppStub);
+    if (pMessageBoxA)
+    {
+        pMessageBoxA(NULL,
+            "The native implementation of OLEAUT32.DLL cannot be used "
+            "with Wine's RPCRT4.DLL. Remove OLEAUT32.DLL and try again.\n",
+            "Wine: Unimplemented CreateProxyFromTypeInfo",
+            0x10);
+        ExitProcess(1);
+    }
+    return E_NOTIMPL;
+}
diff --git a/dlls/rpcrt4/rpcrt4.spec b/dlls/rpcrt4/rpcrt4.spec
index 6ce9401..477b3f0 100644
--- a/dlls/rpcrt4/rpcrt4.spec
+++ b/dlls/rpcrt4/rpcrt4.spec
@@ -1,5 +1,5 @@
 @ stdcall CreateProxyFromTypeInfo(ptr ptr ptr ptr ptr)
-@ stub CreateStubFromTypeInfo
+@ stdcall CreateStubFromTypeInfo(ptr ptr ptr ptr)
 @ stdcall CStdStubBuffer_AddRef(ptr)
 @ stdcall CStdStubBuffer_Connect(ptr ptr)
 @ stdcall CStdStubBuffer_CountRefs(ptr)