From f53ddb2618cafea0414bb449d512a75e8e7b2693 Mon Sep 17 00:00:00 2001
From: "Dimitrie O. Paun" <dpaun@rogers.com>
Date: Tue, 7 Jan 2003 19:42:43 +0000
Subject: [PATCH] Stubs for DllGetClassObject, Ole[GS]etClipboard in ole2.

---
 dlls/ole32/ole2.spec   |  6 +++---
 dlls/ole32/ole2stubs.c | 27 +++++++++++++++++++++++++++
 2 files changed, 30 insertions(+), 3 deletions(-)

diff --git a/dlls/ole32/ole2.spec b/dlls/ole32/ole2.spec
index ccf718edea4..8b1e6508f9d 100644
--- a/dlls/ole32/ole2.spec
+++ b/dlls/ole32/ole2.spec
@@ -1,7 +1,7 @@
 1 pascal OleBuildVersion() OleBuildVersion
 2 pascal OleInitialize(ptr) OleInitialize
 3 pascal OleUninitialize() OleUninitialize
-4 stub DLLGETCLASSOBJECT
+4 pascal DllGetClassObject(ptr ptr ptr) DllGetClassObject16
 #5 WEP
 6 stub OLEQUERYLINKFROMDATA
 7 stub OLEQUERYCREATEFROMDATA
@@ -46,8 +46,8 @@
 46 stub MONIKERRELATIVEPATHTO
 47 stub MONIKERCOMMONPREFIXWITH
 48 stub ISACCELERATOR
-49 stub OLESETCLIPBOARD
-50 stub OLEGETCLIPBOARD
+49 pascal OleSetClipboard(ptr) OleSetClipboard16
+50 pascal OleGetClipboard(ptr) OleGetClipboard16
 51 stub OLEDUPLICATEDATA
 52 stub OLEGETICONOFFILE
 53 stub OLEGETICONOFCLASS
diff --git a/dlls/ole32/ole2stubs.c b/dlls/ole32/ole2stubs.c
index b02761f6b84..b3c02fb2a49 100644
--- a/dlls/ole32/ole2stubs.c
+++ b/dlls/ole32/ole2stubs.c
@@ -262,3 +262,30 @@ BOOL WINAPI CoIsOle1Class(REFCLSID clsid)
   FIXME("%s\n", debugstr_guid(clsid));
   return FALSE;
 }
+
+/***********************************************************************
+ *           DllGetClassObject                          [OLE2.4]
+ */
+HRESULT WINAPI DllGetClassObject16(REFCLSID rclsid, REFIID iid, LPVOID *ppv)
+{
+  FIXME("(%s, %s, %p): stub\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv);
+  return E_NOTIMPL;
+}
+
+/***********************************************************************
+ *           OleSetClipboard                            [OLE2.49]
+ */
+HRESULT WINAPI OleSetClipboard16(IDataObject* pDataObj)
+{
+  FIXME("(%p): stub\n", pDataObj);
+  return S_OK;
+}
+
+/***********************************************************************
+ *           OleGetClipboard                            [OLE2.50]
+ */
+HRESULT WINAPI OleGetClipboard16(IDataObject** ppDataObj)
+{
+  FIXME("(%p): stub\n", ppDataObj);
+  return E_NOTIMPL;
+}