1 /***************************************************************************************
2 * AntiMonikers implementation
4 * Copyright 1999 Noomen Hamza
5 ***************************************************************************************/
11 #include "wine/unicode.h"
12 #include "wine/obj_base.h"
13 #include "wine/obj_misc.h"
14 #include "wine/obj_storage.h"
15 #include "wine/obj_moniker.h"
16 #include "debugtools.h"
18 DEFAULT_DEBUG_CHANNEL(ole
);
20 /* AntiMoniker data structure */
21 typedef struct AntiMonikerImpl
{
23 ICOM_VTABLE(IMoniker
)* lpvtbl1
; /* VTable relative to the IMoniker interface.*/
25 /* The ROT (RunningObjectTable implementation) uses the IROTData interface to test whether
26 * two monikers are equal. That's whay IROTData interface is implemented by monikers.
28 ICOM_VTABLE(IROTData
)* lpvtbl2
; /* VTable relative to the IROTData interface.*/
30 ULONG ref
; /* reference counter for this object */
34 /********************************************************************************/
35 /* AntiMoniker prototype functions : */
37 /* IUnknown prototype functions */
38 static HRESULT WINAPI
AntiMonikerImpl_QueryInterface(IMoniker
* iface
,REFIID riid
,void** ppvObject
);
39 static ULONG WINAPI
AntiMonikerImpl_AddRef(IMoniker
* iface
);
40 static ULONG WINAPI
AntiMonikerImpl_Release(IMoniker
* iface
);
42 /* IPersist prototype functions */
43 static HRESULT WINAPI
AntiMonikerImpl_GetClassID(IMoniker
* iface
, CLSID
*pClassID
);
45 /* IPersistStream prototype functions */
46 static HRESULT WINAPI
AntiMonikerImpl_IsDirty(IMoniker
* iface
);
47 static HRESULT WINAPI
AntiMonikerImpl_Load(IMoniker
* iface
, IStream
* pStm
);
48 static HRESULT WINAPI
AntiMonikerImpl_Save(IMoniker
* iface
, IStream
* pStm
, BOOL fClearDirty
);
49 static HRESULT WINAPI
AntiMonikerImpl_GetSizeMax(IMoniker
* iface
, ULARGE_INTEGER
* pcbSize
);
51 /* IMoniker prototype functions */
52 static HRESULT WINAPI
AntiMonikerImpl_BindToObject(IMoniker
* iface
,IBindCtx
* pbc
, IMoniker
* pmkToLeft
, REFIID riid
, VOID
** ppvResult
);
53 static HRESULT WINAPI
AntiMonikerImpl_BindToStorage(IMoniker
* iface
,IBindCtx
* pbc
, IMoniker
* pmkToLeft
, REFIID riid
, VOID
** ppvResult
);
54 static HRESULT WINAPI
AntiMonikerImpl_Reduce(IMoniker
* iface
,IBindCtx
* pbc
, DWORD dwReduceHowFar
,IMoniker
** ppmkToLeft
, IMoniker
** ppmkReduced
);
55 static HRESULT WINAPI
AntiMonikerImpl_ComposeWith(IMoniker
* iface
,IMoniker
* pmkRight
,BOOL fOnlyIfNotGeneric
, IMoniker
** ppmkComposite
);
56 static HRESULT WINAPI
AntiMonikerImpl_Enum(IMoniker
* iface
,BOOL fForward
, IEnumMoniker
** ppenumMoniker
);
57 static HRESULT WINAPI
AntiMonikerImpl_IsEqual(IMoniker
* iface
,IMoniker
* pmkOtherMoniker
);
58 static HRESULT WINAPI
AntiMonikerImpl_Hash(IMoniker
* iface
,DWORD
* pdwHash
);
59 static HRESULT WINAPI
AntiMonikerImpl_IsRunning(IMoniker
* iface
,IBindCtx
* pbc
, IMoniker
* pmkToLeft
, IMoniker
* pmkNewlyRunning
);
60 static HRESULT WINAPI
AntiMonikerImpl_GetTimeOfLastChange(IMoniker
* iface
, IBindCtx
* pbc
, IMoniker
* pmkToLeft
, FILETIME
* pAntiTime
);
61 static HRESULT WINAPI
AntiMonikerImpl_Inverse(IMoniker
* iface
,IMoniker
** ppmk
);
62 static HRESULT WINAPI
AntiMonikerImpl_CommonPrefixWith(IMoniker
* iface
,IMoniker
* pmkOther
, IMoniker
** ppmkPrefix
);
63 static HRESULT WINAPI
AntiMonikerImpl_RelativePathTo(IMoniker
* iface
,IMoniker
* pmOther
, IMoniker
** ppmkRelPath
);
64 static HRESULT WINAPI
AntiMonikerImpl_GetDisplayName(IMoniker
* iface
,IBindCtx
* pbc
, IMoniker
* pmkToLeft
, LPOLESTR
*ppszDisplayName
);
65 static HRESULT WINAPI
AntiMonikerImpl_ParseDisplayName(IMoniker
* iface
,IBindCtx
* pbc
, IMoniker
* pmkToLeft
, LPOLESTR pszDisplayName
, ULONG
* pchEaten
, IMoniker
** ppmkOut
);
66 static HRESULT WINAPI
AntiMonikerImpl_IsSystemMoniker(IMoniker
* iface
,DWORD
* pwdMksys
);
68 /********************************************************************************/
69 /* IROTData prototype functions */
71 /* IUnknown prototype functions */
72 static HRESULT WINAPI
AntiMonikerROTDataImpl_QueryInterface(IROTData
* iface
,REFIID riid
,VOID
** ppvObject
);
73 static ULONG WINAPI
AntiMonikerROTDataImpl_AddRef(IROTData
* iface
);
74 static ULONG WINAPI
AntiMonikerROTDataImpl_Release(IROTData
* iface
);
76 /* IROTData prototype function */
77 static HRESULT WINAPI
AntiMonikerROTDataImpl_GetComparaisonData(IROTData
* iface
,BYTE
* pbData
,ULONG cbMax
,ULONG
* pcbData
);
79 /* Local function used by AntiMoniker implementation */
80 HRESULT WINAPI
AntiMonikerImpl_Construct(AntiMonikerImpl
* iface
);
81 HRESULT WINAPI
AntiMonikerImpl_Destroy(AntiMonikerImpl
* iface
);
83 /********************************************************************************/
84 /* Virtual function table for the AntiMonikerImpl class which include IPersist,*/
85 /* IPersistStream and IMoniker functions. */
86 static ICOM_VTABLE(IMoniker
) VT_AntiMonikerImpl
=
88 ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
89 AntiMonikerImpl_QueryInterface
,
90 AntiMonikerImpl_AddRef
,
91 AntiMonikerImpl_Release
,
92 AntiMonikerImpl_GetClassID
,
93 AntiMonikerImpl_IsDirty
,
96 AntiMonikerImpl_GetSizeMax
,
97 AntiMonikerImpl_BindToObject
,
98 AntiMonikerImpl_BindToStorage
,
99 AntiMonikerImpl_Reduce
,
100 AntiMonikerImpl_ComposeWith
,
101 AntiMonikerImpl_Enum
,
102 AntiMonikerImpl_IsEqual
,
103 AntiMonikerImpl_Hash
,
104 AntiMonikerImpl_IsRunning
,
105 AntiMonikerImpl_GetTimeOfLastChange
,
106 AntiMonikerImpl_Inverse
,
107 AntiMonikerImpl_CommonPrefixWith
,
108 AntiMonikerImpl_RelativePathTo
,
109 AntiMonikerImpl_GetDisplayName
,
110 AntiMonikerImpl_ParseDisplayName
,
111 AntiMonikerImpl_IsSystemMoniker
114 /********************************************************************************/
115 /* Virtual function table for the IROTData class. */
116 static ICOM_VTABLE(IROTData
) VT_ROTDataImpl
=
118 ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
119 AntiMonikerROTDataImpl_QueryInterface
,
120 AntiMonikerROTDataImpl_AddRef
,
121 AntiMonikerROTDataImpl_Release
,
122 AntiMonikerROTDataImpl_GetComparaisonData
125 /*******************************************************************************
126 * AntiMoniker_QueryInterface
127 *******************************************************************************/
128 HRESULT WINAPI
AntiMonikerImpl_QueryInterface(IMoniker
* iface
,REFIID riid
,void** ppvObject
)
130 ICOM_THIS(AntiMonikerImpl
,iface
);
132 TRACE("(%p,%p,%p)\n",This
,riid
,ppvObject
);
134 /* Perform a sanity check on the parameters.*/
135 if ( (This
==0) || (ppvObject
==0) )
138 /* Initialize the return parameter */
141 /* Compare the riid with the interface IDs implemented by this object.*/
142 if (IsEqualIID(&IID_IUnknown
, riid
) ||
143 IsEqualIID(&IID_IPersist
, riid
) ||
144 IsEqualIID(&IID_IPersistStream
, riid
) ||
145 IsEqualIID(&IID_IMoniker
, riid
)
148 else if (IsEqualIID(&IID_IROTData
, riid
))
149 *ppvObject
= (IROTData
*)&(This
->lpvtbl2
);
151 /* Check that we obtained an interface.*/
153 return E_NOINTERFACE
;
155 /* Query Interface always increases the reference count by one when it is successful */
156 AntiMonikerImpl_AddRef(iface
);
161 /******************************************************************************
163 ******************************************************************************/
164 ULONG WINAPI
AntiMonikerImpl_AddRef(IMoniker
* iface
)
166 ICOM_THIS(AntiMonikerImpl
,iface
);
168 TRACE("(%p)\n",This
);
170 return ++(This
->ref
);
173 /******************************************************************************
174 * AntiMoniker_Release
175 ******************************************************************************/
176 ULONG WINAPI
AntiMonikerImpl_Release(IMoniker
* iface
)
178 ICOM_THIS(AntiMonikerImpl
,iface
);
180 TRACE("(%p)\n",This
);
184 /* destroy the object if there's no more reference on it */
187 AntiMonikerImpl_Destroy(This
);
194 /******************************************************************************
195 * AntiMoniker_GetClassID
196 ******************************************************************************/
197 HRESULT WINAPI
AntiMonikerImpl_GetClassID(IMoniker
* iface
,CLSID
*pClassID
)
199 TRACE("(%p,%p),stub!\n",iface
,pClassID
);
204 *pClassID
= CLSID_AntiMoniker
;
209 /******************************************************************************
210 * AntiMoniker_IsDirty
211 ******************************************************************************/
212 HRESULT WINAPI
AntiMonikerImpl_IsDirty(IMoniker
* iface
)
214 /* Note that the OLE-provided implementations of the IPersistStream::IsDirty
215 method in the OLE-provided moniker interfaces always return S_FALSE because
216 their internal state never changes. */
218 TRACE("(%p)\n",iface
);
223 /******************************************************************************
225 ******************************************************************************/
226 HRESULT WINAPI
AntiMonikerImpl_Load(IMoniker
* iface
,IStream
* pStm
)
228 DWORD constant
=1,dwbuffer
;
231 /* data read by this function is only a DWORD constant (must be 1) ! */
232 res
=IStream_Read(pStm
,&dwbuffer
,sizeof(DWORD
),NULL
);
234 if (SUCCEEDED(res
)&& dwbuffer
!=constant
)
240 /******************************************************************************
242 ******************************************************************************/
243 HRESULT WINAPI
AntiMonikerImpl_Save(IMoniker
* iface
,IStream
* pStm
,BOOL fClearDirty
)
248 /* data writen by this function is only a DWORD constant seted to 1 ! */
249 res
=IStream_Write(pStm
,&constant
,sizeof(constant
),NULL
);
254 /******************************************************************************
255 * AntiMoniker_GetSizeMax
256 ******************************************************************************/
257 HRESULT WINAPI
AntiMonikerImpl_GetSizeMax(IMoniker
* iface
,
258 ULARGE_INTEGER
* pcbSize
)/* Pointer to size of stream needed to save object */
260 TRACE("(%p,%p)\n",iface
,pcbSize
);
265 /* for more details see AntiMonikerImpl_Save coments */
267 /* Normaly the sizemax must be the size of DWORD ! but I tested this function it ususlly return 16 bytes */
268 /* more than the number of bytes used by AntiMoniker::Save function */
269 pcbSize
->s
.LowPart
= sizeof(DWORD
)+16;
271 pcbSize
->s
.HighPart
=0;
276 /******************************************************************************
277 * AntiMoniker_Construct (local function)
278 *******************************************************************************/
279 HRESULT WINAPI
AntiMonikerImpl_Construct(AntiMonikerImpl
* This
)
282 TRACE("(%p)\n",This
);
284 /* Initialize the virtual fgunction table. */
285 This
->lpvtbl1
= &VT_AntiMonikerImpl
;
286 This
->lpvtbl2
= &VT_ROTDataImpl
;
292 /******************************************************************************
293 * AntiMoniker_Destroy (local function)
294 *******************************************************************************/
295 HRESULT WINAPI
AntiMonikerImpl_Destroy(AntiMonikerImpl
* This
)
297 TRACE("(%p)\n",This
);
299 return HeapFree(GetProcessHeap(),0,This
);
302 /******************************************************************************
303 * AntiMoniker_BindToObject
304 ******************************************************************************/
305 HRESULT WINAPI
AntiMonikerImpl_BindToObject(IMoniker
* iface
,
311 TRACE("(%p,%p,%p,%p,%p)\n",iface
,pbc
,pmkToLeft
,riid
,ppvResult
);
315 /******************************************************************************
316 * AntiMoniker_BindToStorage
317 ******************************************************************************/
318 HRESULT WINAPI
AntiMonikerImpl_BindToStorage(IMoniker
* iface
,
324 TRACE("(%p,%p,%p,%p,%p)\n",iface
,pbc
,pmkToLeft
,riid
,ppvResult
);
328 /******************************************************************************
330 ******************************************************************************/
331 HRESULT WINAPI
AntiMonikerImpl_Reduce(IMoniker
* iface
,
333 DWORD dwReduceHowFar
,
334 IMoniker
** ppmkToLeft
,
335 IMoniker
** ppmkReduced
)
337 TRACE("(%p,%p,%ld,%p,%p)\n",iface
,pbc
,dwReduceHowFar
,ppmkToLeft
,ppmkReduced
);
339 if (ppmkReduced
==NULL
)
342 AntiMonikerImpl_AddRef(iface
);
346 return MK_S_REDUCED_TO_SELF
;
348 /******************************************************************************
349 * AntiMoniker_ComposeWith
350 ******************************************************************************/
351 HRESULT WINAPI
AntiMonikerImpl_ComposeWith(IMoniker
* iface
,
353 BOOL fOnlyIfNotGeneric
,
354 IMoniker
** ppmkComposite
)
357 TRACE("(%p,%p,%d,%p)\n",iface
,pmkRight
,fOnlyIfNotGeneric
,ppmkComposite
);
359 if ((ppmkComposite
==NULL
)||(pmkRight
==NULL
))
364 if (fOnlyIfNotGeneric
)
365 return MK_E_NEEDGENERIC
;
367 return CreateGenericComposite(iface
,pmkRight
,ppmkComposite
);
370 /******************************************************************************
372 ******************************************************************************/
373 HRESULT WINAPI
AntiMonikerImpl_Enum(IMoniker
* iface
,BOOL fForward
, IEnumMoniker
** ppenumMoniker
)
375 TRACE("(%p,%d,%p)\n",iface
,fForward
,ppenumMoniker
);
377 if (ppenumMoniker
== NULL
)
380 *ppenumMoniker
= NULL
;
385 /******************************************************************************
386 * AntiMoniker_IsEqual
387 ******************************************************************************/
388 HRESULT WINAPI
AntiMonikerImpl_IsEqual(IMoniker
* iface
,IMoniker
* pmkOtherMoniker
)
392 TRACE("(%p,%p)\n",iface
,pmkOtherMoniker
);
394 if (pmkOtherMoniker
==NULL
)
397 IMoniker_IsSystemMoniker(pmkOtherMoniker
,&mkSys
);
399 if (mkSys
==MKSYS_ANTIMONIKER
)
405 /******************************************************************************
407 ******************************************************************************/
408 HRESULT WINAPI
AntiMonikerImpl_Hash(IMoniker
* iface
,DWORD
* pdwHash
)
418 /******************************************************************************
419 * AntiMoniker_IsRunning
420 ******************************************************************************/
421 HRESULT WINAPI
AntiMonikerImpl_IsRunning(IMoniker
* iface
,
424 IMoniker
* pmkNewlyRunning
)
426 IRunningObjectTable
* rot
;
429 TRACE("(%p,%p,%p,%p)\n",iface
,pbc
,pmkToLeft
,pmkNewlyRunning
);
434 res
=IBindCtx_GetRunningObjectTable(pbc
,&rot
);
439 res
= IRunningObjectTable_IsRunning(rot
,iface
);
441 IRunningObjectTable_Release(rot
);
446 /******************************************************************************
447 * AntiMoniker_GetTimeOfLastChange
448 ******************************************************************************/
449 HRESULT WINAPI
AntiMonikerImpl_GetTimeOfLastChange(IMoniker
* iface
,
454 TRACE("(%p,%p,%p,%p)\n",iface
,pbc
,pmkToLeft
,pAntiTime
);
458 /******************************************************************************
459 * AntiMoniker_Inverse
460 ******************************************************************************/
461 HRESULT WINAPI
AntiMonikerImpl_Inverse(IMoniker
* iface
,IMoniker
** ppmk
)
463 TRACE("(%p,%p)\n",iface
,ppmk
);
470 return MK_E_NOINVERSE
;
473 /******************************************************************************
474 * AntiMoniker_CommonPrefixWith
475 ******************************************************************************/
476 HRESULT WINAPI
AntiMonikerImpl_CommonPrefixWith(IMoniker
* iface
,IMoniker
* pmkOther
,IMoniker
** ppmkPrefix
)
480 IMoniker_IsSystemMoniker(pmkOther
,&mkSys
);
482 if(mkSys
==MKSYS_ITEMMONIKER
){
484 IMoniker_AddRef(iface
);
488 IMoniker_AddRef(iface
);
493 return MonikerCommonPrefixWith(iface
,pmkOther
,ppmkPrefix
);
496 /******************************************************************************
497 * AntiMoniker_RelativePathTo
498 ******************************************************************************/
499 HRESULT WINAPI
AntiMonikerImpl_RelativePathTo(IMoniker
* iface
,IMoniker
* pmOther
, IMoniker
** ppmkRelPath
)
501 TRACE("(%p,%p,%p)\n",iface
,pmOther
,ppmkRelPath
);
503 if (ppmkRelPath
==NULL
)
506 IMoniker_AddRef(pmOther
);
508 *ppmkRelPath
=pmOther
;
513 /******************************************************************************
514 * AntiMoniker_GetDisplayName
515 ******************************************************************************/
516 HRESULT WINAPI
AntiMonikerImpl_GetDisplayName(IMoniker
* iface
,
519 LPOLESTR
*ppszDisplayName
)
521 WCHAR back
[]={'\\','.','.',0};
523 TRACE("(%p,%p,%p,%p)\n",iface
,pbc
,pmkToLeft
,ppszDisplayName
);
525 if (ppszDisplayName
==NULL
)
528 if (pmkToLeft
!=NULL
){
529 FIXME("() pmkToLeft!=NULL not implemented \n");
533 *ppszDisplayName
=CoTaskMemAlloc(sizeof(back
));
535 if (*ppszDisplayName
==NULL
)
536 return E_OUTOFMEMORY
;
538 strcpyW(*ppszDisplayName
,back
);
543 /******************************************************************************
544 * AntiMoniker_ParseDisplayName
545 ******************************************************************************/
546 HRESULT WINAPI
AntiMonikerImpl_ParseDisplayName(IMoniker
* iface
,
549 LPOLESTR pszDisplayName
,
553 TRACE("(%p,%p,%p,%p,%p,%p)\n",iface
,pbc
,pmkToLeft
,pszDisplayName
,pchEaten
,ppmkOut
);
557 /******************************************************************************
558 * AntiMoniker_IsSystemMonker
559 ******************************************************************************/
560 HRESULT WINAPI
AntiMonikerImpl_IsSystemMoniker(IMoniker
* iface
,DWORD
* pwdMksys
)
562 TRACE("(%p,%p)\n",iface
,pwdMksys
);
567 (*pwdMksys
)=MKSYS_ANTIMONIKER
;
572 /*******************************************************************************
573 * AntiMonikerIROTData_QueryInterface
574 *******************************************************************************/
575 HRESULT WINAPI
AntiMonikerROTDataImpl_QueryInterface(IROTData
*iface
,REFIID riid
,VOID
** ppvObject
)
578 ICOM_THIS_From_IROTData(IMoniker
, iface
);
580 TRACE("(%p,%p,%p)\n",iface
,riid
,ppvObject
);
582 return AntiMonikerImpl_QueryInterface(This
, riid
, ppvObject
);
585 /***********************************************************************
586 * AntiMonikerIROTData_AddRef
588 ULONG WINAPI
AntiMonikerROTDataImpl_AddRef(IROTData
*iface
)
590 ICOM_THIS_From_IROTData(IMoniker
, iface
);
592 TRACE("(%p)\n",iface
);
594 return AntiMonikerImpl_AddRef(This
);
597 /***********************************************************************
598 * AntiMonikerIROTData_Release
600 ULONG WINAPI
AntiMonikerROTDataImpl_Release(IROTData
* iface
)
602 ICOM_THIS_From_IROTData(IMoniker
, iface
);
604 TRACE("(%p)\n",iface
);
606 return AntiMonikerImpl_Release(This
);
609 /******************************************************************************
610 * AntiMonikerIROTData_GetComparaisonData
611 ******************************************************************************/
612 HRESULT WINAPI
AntiMonikerROTDataImpl_GetComparaisonData(IROTData
* iface
,
621 /******************************************************************************
622 * CreateAntiMoniker [OLE.55]
623 ******************************************************************************/
624 HRESULT WINAPI
CreateAntiMoniker(LPMONIKER
* ppmk
)
626 AntiMonikerImpl
* newAntiMoniker
= 0;
628 IID riid
=IID_IMoniker
;
630 TRACE("(%p)\n",ppmk
);
632 newAntiMoniker
= HeapAlloc(GetProcessHeap(), 0, sizeof(AntiMonikerImpl
));
634 if (newAntiMoniker
== 0)
635 return STG_E_INSUFFICIENTMEMORY
;
637 hr
= AntiMonikerImpl_Construct(newAntiMoniker
);
641 HeapFree(GetProcessHeap(),0,newAntiMoniker
);
645 hr
= AntiMonikerImpl_QueryInterface((IMoniker
*)newAntiMoniker
,&riid
,(void**)ppmk
);