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