ole/oleobj.c

   1 /*
   2  *      OLE2 COM objects
   3  *
   4  *      Copyright 1998 Eric Kohl
   5  */
   6
   7
   8 #include "ole.h"
   9 #include "ole2.h"
  10 #include "winerror.h"
  11 #include "interfaces.h"
  12 #include "oleobj.h"
  13 #include "debug.h"
  14
  15
  16 #define IsEqualGUID(rguid1, rguid2) (!memcmp(rguid1, rguid2, sizeof(GUID)))
  17 #define IsEqualIID(riid1, riid2) IsEqualGUID(riid1, riid2)
  18 #define IsEqualCLSID(rclsid1, rclsid2) IsEqualGUID(rclsid1, rclsid2)
  19
  20
  21 /**************************************************************************
  22  *  IOleAdviseHolder Implementation
  23  */
  24 static HRESULT WINAPI IOleAdviseHolder_QueryInterface(LPOLEADVISEHOLDER,REFIID,LPVOID*);
  25 static ULONG WINAPI   IOleAdviseHolder_AddRef(LPOLEADVISEHOLDER);
  26 static ULONG WINAPI   IOleAdviseHolder_Release(LPOLEADVISEHOLDER);
  27 static HRESULT WINAPI IOleAdviseHolder_Advise(LPOLEADVISEHOLDER, IAdviseSink*, DWORD*);
  28 static HRESULT WINAPI IOleAdviseHolder_Unadvise (LPOLEADVISEHOLDER, DWORD);
  29 static HRESULT WINAPI IOleAdviseHolder_EnumAdvise (LPOLEADVISEHOLDER, IEnumSTATDATA **);
  30 static HRESULT WINAPI IOleAdviseHolder_SendOnRename (LPOLEADVISEHOLDER, IMoniker *);
  31 static HRESULT WINAPI IOleAdviseHolder_SendOnSave (LPOLEADVISEHOLDER this);
  32 static HRESULT WINAPI IOleAdviseHolder_SendOnClose (LPOLEADVISEHOLDER this);
  33
  34
  35 /**************************************************************************
  36  *  IOleAdviseHolder_VTable
  37  */
  38 static IOleAdviseHolder_VTable oahvt =
  39 {
  40     IOleAdviseHolder_QueryInterface,
  41     IOleAdviseHolder_AddRef,
  42     IOleAdviseHolder_Release,
  43     IOleAdviseHolder_Advise,
  44     IOleAdviseHolder_Unadvise,
  45     IOleAdviseHolder_EnumAdvise,
  46     IOleAdviseHolder_SendOnRename,
  47     IOleAdviseHolder_SendOnSave,
  48     IOleAdviseHolder_SendOnClose
  49 };
  50
  51 /**************************************************************************
  52  *  IOleAdviseHolder_Constructor
  53  */
  54
  55 LPOLEADVISEHOLDER IOleAdviseHolder_Constructor()
  56 {
  57     LPOLEADVISEHOLDER lpoah;
  58
  59     lpoah= (LPOLEADVISEHOLDER)HeapAlloc(GetProcessHeap(),0,sizeof(IOleAdviseHolder));
  60     lpoah->ref = 1;
  61     lpoah->lpvtbl = &oahvt;
  62     FIXME (ole, "(%p)->()\n", lpoah);
  63
  64     return lpoah;
  65 }
  66
  67 /**************************************************************************
  68  *  IOleAdviseHolder_QueryInterface
  69  */
  70 static HRESULT WINAPI
  71 IOleAdviseHolder_QueryInterface (LPOLEADVISEHOLDER this, REFIID riid, LPVOID *ppvObj)
  72 {
  73     char xriid[50];
  74     WINE_StringFromCLSID((LPCLSID)riid,xriid);
  75     FIXME (ole, "(%p)->(\n\tIID:\t%s)\n", this, xriid);
  76
  77     *ppvObj = NULL;
  78
  79     if(IsEqualIID(riid, &IID_IUnknown)) {
  80         /* IUnknown */
  81         *ppvObj = this;
  82     }
  83     else if(IsEqualIID(riid, &IID_IOleAdviseHolder)) {
  84         /* IOleAdviseHolder */
  85         *ppvObj = (IOleAdviseHolder*) this;
  86     }
  87
  88     if(*ppvObj) {
  89         (*(LPOLEADVISEHOLDER*)ppvObj)->lpvtbl->fnAddRef(this);
  90         FIXME (ole, "-- Interface: (%p)->(%p)\n", ppvObj, *ppvObj);
  91         return S_OK;
  92     }
  93
  94     FIXME (ole, "-- Interface: E_NOINTERFACE\n");
  95     return E_NOINTERFACE;
  96 }
  97
  98 /******************************************************************************
  99  * IOleAdviseHolder_AddRef
 100  */
 101 static ULONG WINAPI
 102 IOleAdviseHolder_AddRef (LPOLEADVISEHOLDER this)
 103 {
 104     FIXME (ole, "(%p)->(count=%lu)\n", this, this->ref);
 105     return ++(this->ref);
 106 }
 107
 108 /******************************************************************************
 109  * IOleAdviseHolder_Release
 110  */
 111 static ULONG WINAPI
 112 IOleAdviseHolder_Release (LPOLEADVISEHOLDER this)
 113 {
 114     FIXME (ole, "(%p)->(count=%lu)\n", this, this->ref);
 115     if (!--(this->ref)) {
 116         FIXME (ole, "-- destroying IOleAdviseHolder(%p)\n", this);
 117         HeapFree(GetProcessHeap(),0,this);
 118         return 0;
 119     }
 120     return this->ref;
 121 }
 122
 123 /******************************************************************************
 124  * IOleAdviseHolder_Advise
 125  */
 126 static HRESULT WINAPI
 127 IOleAdviseHolder_Advise (LPOLEADVISEHOLDER this,
 128                          IAdviseSink *pAdvise, DWORD *pdwConnection)
 129 {
 130     FIXME (ole, "(%p)->(%p %p)\n", this, pAdvise, pdwConnection);
 131
 132     *pdwConnection = 0;
 133
 134    return S_OK;
 135 }
 136
 137 /******************************************************************************
 138  * IOleAdviseHolder_Unadvise
 139  */
 140 static HRESULT WINAPI
 141 IOleAdviseHolder_Unadvise (LPOLEADVISEHOLDER this, DWORD dwConnection)
 142 {
 143     FIXME (ole, "(%p)->(%lu)\n", this, dwConnection);
 144
 145     return S_OK;
 146 }
 147
 148 /******************************************************************************
 149  * IOleAdviseHolder_EnumAdvise
 150  */
 151 static HRESULT WINAPI
 152 IOleAdviseHolder_EnumAdvise (LPOLEADVISEHOLDER this, IEnumSTATDATA **ppenumAdvise)
 153 {
 154     FIXME (ole, "(%p)->(%p)\n", this, ppenumAdvise);
 155
 156     *ppenumAdvise = NULL;
 157
 158     return S_OK;
 159 }
 160
 161 /******************************************************************************
 162  * IOleAdviseHolder_SendOnRename
 163  */
 164 static HRESULT WINAPI
 165 IOleAdviseHolder_SendOnRename (LPOLEADVISEHOLDER this, IMoniker *pmk)
 166 {
 167     FIXME (ole, "(%p)->(%p)\n", this, pmk);
 168
 169
 170     return S_OK;
 171 }
 172
 173 /******************************************************************************
 174  * IOleAdviseHolder_SendOnSave
 175  */
 176 static HRESULT WINAPI
 177 IOleAdviseHolder_SendOnSave (LPOLEADVISEHOLDER this)
 178 {
 179     FIXME (ole, "(%p)\n", this);
 180
 181
 182     return S_OK;
 183 }
 184
 185 /******************************************************************************
 186  * IOleAdviseHolder_SendOnClose
 187  */
 188 static HRESULT WINAPI
 189 IOleAdviseHolder_SendOnClose (LPOLEADVISEHOLDER this)
 190 {
 191     FIXME (ole, "(%p)\n", this);
 192
 193
 194     return S_OK;
 195 }
 196
 197 /***********************************************************************
 198  * API functions
 199  */
 200
 201 /***********************************************************************
 202  * CreateOleAdviseHolder [OLE32.59]
 203  */
 204 HRESULT WINAPI CreateOleAdviseHolder32 (LPOLEADVISEHOLDER *ppOAHolder)
 205 {
 206     FIXME(ole,"(%p): stub!\n", ppOAHolder);
 207
 208     *ppOAHolder = IOleAdviseHolder_Constructor ();
 209     if (*ppOAHolder)
 210         return S_OK;
 211
 212     *ppOAHolder = 0;
 213     return E_OUTOFMEMORY;
 214 }
 215