ole/ole2.c

   1 /*
   2  *      OLE2 library
   3  *
   4  *      Copyright 1995  Martin von Loewis
   5  */
   6
   7 #include "windows.h"
   8 #include "winerror.h"
   9 #include "ole2.h"
  10 #include "process.h"
  11 #include "debug.h"
  12
  13 /***********************************************************************
  14  *           OleBuildVersion     [OLE.1]
  15  */
  16 DWORD WINAPI OleBuildVersion()
  17 {
  18     TRACE(ole,"(void)\n");
  19     return (rmm<<16)+rup;
  20 }
  21
  22 /***********************************************************************
  23  *           OleInitialize       (OLE2.2) (OLE32.108)
  24  */
  25 HRESULT WINAPI OleInitialize(LPVOID reserved)
  26 {
  27     FIXME(ole,"OleInitialize - stub\n");
  28     return S_OK;
  29 }
  30
  31 /***********************************************************************
  32  * CoGetCurrentProcess [OLE2.2][OLE32.108]
  33  *
  34  * NOTES
  35  *   Is DWORD really the correct return type for this function?
  36  */
  37 DWORD WINAPI CoGetCurrentProcess() {
  38         return (DWORD)PROCESS_Current();
  39 }
  40
  41 /***********************************************************************
  42  *           OleUnitialize       (OLE2.3) (OLE32.131)
  43  */
  44 void WINAPI OleUninitialize(void)
  45 {
  46     FIXME(ole,"stub\n");
  47 }
  48
  49 /***********************************************************************
  50  *           OleFlushClipboard   [OLE2.76]
  51  */
  52 HRESULT WINAPI OleFlushClipboard()
  53 {
  54     return S_OK;
  55 }
  56
  57 /***********************************************************************
  58  *           CoRegisterMessageFilter   [OLE32.38]
  59  */
  60 HRESULT WINAPI CoRegisterMessageFilter32(
  61     LPMESSAGEFILTER lpMessageFilter,    /* Pointer to interface */
  62     LPMESSAGEFILTER *lplpMessageFilter  /* Indirect pointer to prior instance if non-NULL */
  63 ) {
  64     FIXME(ole,"stub\n");
  65     if (lplpMessageFilter) {
  66         *lplpMessageFilter = NULL;
  67     }
  68     return S_OK;
  69 }
  70
  71 /***********************************************************************
  72  *           OleInitializeWOW (OLE32.27)
  73  */
  74 HRESULT WINAPI OleInitializeWOW(DWORD x) {
  75         FIXME(ole,"(0x%08lx),stub!\n",x);
  76         return 0;
  77 }
  78
  79 /***********************************************************************
  80  *           GetRunningObjectTable (OLE2.30)
  81  */
  82 HRESULT WINAPI GetRunningObjectTable16(DWORD reserved, LPVOID *pprot) {
  83         FIXME(ole,"(%ld,%p),stub!\n",reserved,pprot);
  84         return E_FAIL;
  85 }
  86
  87 /***********************************************************************
  88  *           RegisterDragDrop (OLE2.35)
  89  */
  90 HRESULT WINAPI RegisterDragDrop16(
  91         HWND16 hwnd,
  92         LPDROPTARGET pDropTarget
  93 ) {
  94         FIXME(ole,"(0x%04x,%p),stub!\n",hwnd,pDropTarget);
  95         return S_OK;
  96 }
  97