1 | /** @file
|
---|
2 | * ATL lookalike, just the tiny subset we actually need.
|
---|
3 | */
|
---|
4 |
|
---|
5 | /*
|
---|
6 | * Copyright (C) 2016-2019 Oracle Corporation
|
---|
7 | *
|
---|
8 | * This file is part of VirtualBox Open Source Edition (OSE), as
|
---|
9 | * available from http://www.virtualbox.org. This file is free software;
|
---|
10 | * you can redistribute it and/or modify it under the terms of the GNU
|
---|
11 | * General Public License (GPL) as published by the Free Software
|
---|
12 | * Foundation, in version 2 as it comes in the "COPYING" file of the
|
---|
13 | * VirtualBox OSE distribution. VirtualBox OSE is distributed in the
|
---|
14 | * hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
|
---|
15 | *
|
---|
16 | * The contents of this file may alternatively be used under the terms
|
---|
17 | * of the Common Development and Distribution License Version 1.0
|
---|
18 | * (CDDL) only, as it comes in the "COPYING.CDDL" file of the
|
---|
19 | * VirtualBox OSE distribution, in which case the provisions of the
|
---|
20 | * CDDL are applicable instead of those of the GPL.
|
---|
21 | *
|
---|
22 | * You may elect to license modified versions of this file under the
|
---|
23 | * terms and conditions of either the GPL or the CDDL or both.
|
---|
24 | */
|
---|
25 |
|
---|
26 | #ifndef VBOX_INCLUDED_com_microatl_h
|
---|
27 | #define VBOX_INCLUDED_com_microatl_h
|
---|
28 | #ifndef RT_WITHOUT_PRAGMA_ONCE
|
---|
29 | # pragma once
|
---|
30 | #endif
|
---|
31 |
|
---|
32 | #include <VBox/cdefs.h> /* VBOX_STRICT */
|
---|
33 | #include <iprt/assert.h>
|
---|
34 | #include <iprt/critsect.h>
|
---|
35 | #include <iprt/errcore.h> /* RT_FAILURE() */
|
---|
36 |
|
---|
37 | #include <iprt/win/windows.h>
|
---|
38 |
|
---|
39 | #include <new>
|
---|
40 |
|
---|
41 |
|
---|
42 | namespace ATL
|
---|
43 | {
|
---|
44 |
|
---|
45 | #define ATL_NO_VTABLE __declspec(novtable)
|
---|
46 |
|
---|
47 | class CAtlModule;
|
---|
48 | __declspec(selectany) CAtlModule *_pAtlModule = NULL;
|
---|
49 |
|
---|
50 | class CComModule;
|
---|
51 | __declspec(selectany) CComModule *_pModule = NULL;
|
---|
52 |
|
---|
53 | typedef HRESULT (WINAPI FNCREATEINSTANCE)(void *pv, REFIID riid, void **ppv);
|
---|
54 | typedef FNCREATEINSTANCE *PFNCREATEINSTANCE;
|
---|
55 | typedef HRESULT (WINAPI FNINTERFACEMAPHELPER)(void *pv, REFIID riid, void **ppv, DWORD_PTR dw);
|
---|
56 | typedef FNINTERFACEMAPHELPER *PFNINTERFACEMAPHELPER;
|
---|
57 | typedef void (__stdcall FNATLTERMFUNC)(void *pv);
|
---|
58 | typedef FNATLTERMFUNC *PFNATLTERMFUNC;
|
---|
59 |
|
---|
60 | struct _ATL_TERMFUNC_ELEM
|
---|
61 | {
|
---|
62 | PFNATLTERMFUNC pfn;
|
---|
63 | void *pv;
|
---|
64 | _ATL_TERMFUNC_ELEM *pNext;
|
---|
65 | };
|
---|
66 |
|
---|
67 | struct _ATL_INTMAP_ENTRY
|
---|
68 | {
|
---|
69 | const IID *piid; // interface ID
|
---|
70 | DWORD_PTR dw;
|
---|
71 | PFNINTERFACEMAPHELPER pFunc; // NULL: end of array, 1: offset based map entry, other: function pointer
|
---|
72 | };
|
---|
73 |
|
---|
74 | #define COM_SIMPLEMAPENTRY ((ATL::PFNINTERFACEMAPHELPER)1)
|
---|
75 |
|
---|
76 | #define DECLARE_CLASSFACTORY_EX(c) typedef ATL::CComCreator<ATL::CComObjectNoLock<c> > _ClassFactoryCreatorClass;
|
---|
77 | #define DECLARE_CLASSFACTORY() DECLARE_CLASSFACTORY_EX(ATL::CComClassFactory)
|
---|
78 | #define DECLARE_CLASSFACTORY_SINGLETON(o) DECLARE_CLASSFACTORY_EX(ATL::CComClassFactorySingleton<o>)
|
---|
79 | #define DECLARE_AGGREGATABLE(c) \
|
---|
80 | public: \
|
---|
81 | typedef ATL::CComCreator2<ATL::CComCreator<ATL::CComObject<c> >, ATL::CComCreator<ATL::CComAggObject<c> > > _CreatorClass;
|
---|
82 | #define DECLARE_NOT_AGGREGATABLE(c) \
|
---|
83 | public: \
|
---|
84 | typedef ATL::CComCreator2<ATL::CComCreator<ATL::CComObject<c> >, ATL::CComFailCreator<CLASS_E_NOAGGREGATION> > _CreatorClass;
|
---|
85 |
|
---|
86 | #define DECLARE_PROTECT_FINAL_CONSTRUCT() \
|
---|
87 | void InternalFinalConstructAddRef() \
|
---|
88 | { \
|
---|
89 | InternalAddRef(); \
|
---|
90 | } \
|
---|
91 | void InternalFinalConstructRelease() \
|
---|
92 | { \
|
---|
93 | InternalRelease(); \
|
---|
94 | }
|
---|
95 |
|
---|
96 | #define BEGIN_COM_MAP(c) \
|
---|
97 | public: \
|
---|
98 | typedef c _ComClass; \
|
---|
99 | HRESULT _InternalQueryInterface(REFIID iid, void **ppvObj) throw() \
|
---|
100 | { \
|
---|
101 | return InternalQueryInterface(this, _GetEntries(), iid, ppvObj); \
|
---|
102 | } \
|
---|
103 | const static ATL::_ATL_INTMAP_ENTRY *WINAPI _GetEntries() throw() \
|
---|
104 | { \
|
---|
105 | static const ATL::_ATL_INTMAP_ENTRY _aInterfaces[] = \
|
---|
106 | {
|
---|
107 |
|
---|
108 | #define COM_INTERFACE_ENTRY(c) \
|
---|
109 | { &__uuidof(c), (DWORD_PTR)(static_cast<c *>((_ComClass *)8))-8, COM_SIMPLEMAPENTRY },
|
---|
110 |
|
---|
111 | #define COM_INTERFACE_ENTRY2(c, c2) \
|
---|
112 | { &__uuidof(c), (DWORD_PTR)(static_cast<c *>(static_cast<c2 *>((_ComClass *)8)))-8, COM_SIMPLEMAPENTRY },
|
---|
113 |
|
---|
114 | #define COM_INTERFACE_ENTRY_AGGREGATE(iid, pUnk) \
|
---|
115 | { &iid, (DWORD_PTR)RT_UOFFSETOF(_ComClass, pUnk), _Delegate},
|
---|
116 |
|
---|
117 | #define END_COM_MAP() \
|
---|
118 | { NULL, 0, NULL} \
|
---|
119 | }; \
|
---|
120 | return _aInterfaces; \
|
---|
121 | } \
|
---|
122 | virtual ULONG STDMETHODCALLTYPE AddRef(void) throw() = 0; \
|
---|
123 | virtual ULONG STDMETHODCALLTYPE Release(void) throw() = 0; \
|
---|
124 | STDMETHOD(QueryInterface)(REFIID, void **) throw() = 0;
|
---|
125 |
|
---|
126 | struct _ATL_OBJMAP_ENTRY
|
---|
127 | {
|
---|
128 | const CLSID *pclsid;
|
---|
129 | PFNCREATEINSTANCE pfnGetClassObject;
|
---|
130 | PFNCREATEINSTANCE pfnCreateInstance;
|
---|
131 | IUnknown *pCF;
|
---|
132 | DWORD dwRegister;
|
---|
133 | };
|
---|
134 |
|
---|
135 | #define BEGIN_OBJECT_MAP(o) static ATL::_ATL_OBJMAP_ENTRY o[] = {
|
---|
136 | #define END_OBJECT_MAP() {NULL, NULL, NULL, NULL, 0}};
|
---|
137 | #define OBJECT_ENTRY(clsid, c) {&clsid, c::_ClassFactoryCreatorClass::CreateInstance, c::_CreatorClass::CreateInstance, NULL, 0 },
|
---|
138 |
|
---|
139 |
|
---|
140 | class CComCriticalSection
|
---|
141 | {
|
---|
142 | public:
|
---|
143 | CComCriticalSection() throw()
|
---|
144 | {
|
---|
145 | memset(&m_CritSect, 0, sizeof(m_CritSect));
|
---|
146 | }
|
---|
147 | ~CComCriticalSection()
|
---|
148 | {
|
---|
149 | }
|
---|
150 | HRESULT Lock() throw()
|
---|
151 | {
|
---|
152 | RTCritSectEnter(&m_CritSect);
|
---|
153 | return S_OK;
|
---|
154 | }
|
---|
155 | HRESULT Unlock() throw()
|
---|
156 | {
|
---|
157 | RTCritSectLeave(&m_CritSect);
|
---|
158 | return S_OK;
|
---|
159 | }
|
---|
160 | HRESULT Init() throw()
|
---|
161 | {
|
---|
162 | HRESULT hrc = S_OK;
|
---|
163 | if (RT_FAILURE(RTCritSectInit(&m_CritSect)))
|
---|
164 | hrc = E_FAIL;
|
---|
165 | return hrc;
|
---|
166 | }
|
---|
167 |
|
---|
168 | HRESULT Term() throw()
|
---|
169 | {
|
---|
170 | RTCritSectDelete(&m_CritSect);
|
---|
171 | return S_OK;
|
---|
172 | }
|
---|
173 |
|
---|
174 | RTCRITSECT m_CritSect;
|
---|
175 | };
|
---|
176 |
|
---|
177 | template <class TLock> class CComCritSectLock
|
---|
178 | {
|
---|
179 | public:
|
---|
180 | CComCritSectLock(CComCriticalSection &cs, bool fInitialLock = true) :
|
---|
181 | m_cs(cs),
|
---|
182 | m_fLocked(false)
|
---|
183 | {
|
---|
184 | if (fInitialLock)
|
---|
185 | {
|
---|
186 | HRESULT hrc = Lock();
|
---|
187 | if (FAILED(hrc))
|
---|
188 | throw hrc;
|
---|
189 | }
|
---|
190 | }
|
---|
191 |
|
---|
192 | ~CComCritSectLock() throw()
|
---|
193 | {
|
---|
194 | if (m_fLocked)
|
---|
195 | Unlock();
|
---|
196 | }
|
---|
197 |
|
---|
198 | HRESULT Lock()
|
---|
199 | {
|
---|
200 | Assert(!m_fLocked);
|
---|
201 | HRESULT hrc = m_cs.Lock();
|
---|
202 | if (FAILED(hrc))
|
---|
203 | return hrc;
|
---|
204 | m_fLocked = true;
|
---|
205 | return S_OK;
|
---|
206 | }
|
---|
207 |
|
---|
208 | void Unlock() throw()
|
---|
209 | {
|
---|
210 | Assert(m_fLocked);
|
---|
211 | m_cs.Unlock();
|
---|
212 | m_fLocked = false;
|
---|
213 | }
|
---|
214 |
|
---|
215 |
|
---|
216 | private:
|
---|
217 | TLock &m_cs;
|
---|
218 | bool m_fLocked;
|
---|
219 |
|
---|
220 | CComCritSectLock(const CComCritSectLock&) throw(); // Do not call.
|
---|
221 | CComCritSectLock &operator=(const CComCritSectLock &) throw(); // Do not call.
|
---|
222 | };
|
---|
223 |
|
---|
224 | class CComFakeCriticalSection
|
---|
225 | {
|
---|
226 | public:
|
---|
227 | HRESULT Lock() throw()
|
---|
228 | {
|
---|
229 | return S_OK;
|
---|
230 | }
|
---|
231 | HRESULT Unlock() throw()
|
---|
232 | {
|
---|
233 | return S_OK;
|
---|
234 | }
|
---|
235 | HRESULT Init() throw()
|
---|
236 | {
|
---|
237 | return S_OK;
|
---|
238 | }
|
---|
239 | HRESULT Term() throw()
|
---|
240 | {
|
---|
241 | return S_OK;
|
---|
242 | }
|
---|
243 | };
|
---|
244 |
|
---|
245 | class CComAutoCriticalSection : public CComCriticalSection
|
---|
246 | {
|
---|
247 | public:
|
---|
248 | CComAutoCriticalSection()
|
---|
249 | {
|
---|
250 | HRESULT hrc = CComCriticalSection::Init();
|
---|
251 | if (FAILED(hrc))
|
---|
252 | throw hrc;
|
---|
253 | }
|
---|
254 | ~CComAutoCriticalSection() throw()
|
---|
255 | {
|
---|
256 | CComCriticalSection::Term();
|
---|
257 | }
|
---|
258 | private :
|
---|
259 | HRESULT Init() throw(); // Do not call.
|
---|
260 | HRESULT Term() throw(); // Do not call.
|
---|
261 | };
|
---|
262 |
|
---|
263 | class CComAutoDeleteCriticalSection : public CComCriticalSection
|
---|
264 | {
|
---|
265 | public:
|
---|
266 | CComAutoDeleteCriticalSection(): m_fInit(false)
|
---|
267 | {
|
---|
268 | }
|
---|
269 |
|
---|
270 | ~CComAutoDeleteCriticalSection() throw()
|
---|
271 | {
|
---|
272 | if (!m_fInit)
|
---|
273 | return;
|
---|
274 | m_fInit = false;
|
---|
275 | CComCriticalSection::Term();
|
---|
276 | }
|
---|
277 |
|
---|
278 | HRESULT Init() throw()
|
---|
279 | {
|
---|
280 | Assert(!m_fInit);
|
---|
281 | HRESULT hrc = CComCriticalSection::Init();
|
---|
282 | if (SUCCEEDED(hrc))
|
---|
283 | m_fInit = true;
|
---|
284 | return hrc;
|
---|
285 | }
|
---|
286 |
|
---|
287 | HRESULT Lock()
|
---|
288 | {
|
---|
289 | Assert(m_fInit);
|
---|
290 | return CComCriticalSection::Lock();
|
---|
291 | }
|
---|
292 |
|
---|
293 | HRESULT Unlock()
|
---|
294 | {
|
---|
295 | Assert(m_fInit);
|
---|
296 | return CComCriticalSection::Unlock();
|
---|
297 | }
|
---|
298 |
|
---|
299 | private:
|
---|
300 | HRESULT Term() throw();
|
---|
301 | bool m_fInit;
|
---|
302 | };
|
---|
303 |
|
---|
304 |
|
---|
305 | class CComMultiThreadModelNoCS
|
---|
306 | {
|
---|
307 | public:
|
---|
308 | static ULONG WINAPI Increment(LONG *pL) throw()
|
---|
309 | {
|
---|
310 | return InterlockedIncrement(pL);
|
---|
311 | }
|
---|
312 | static ULONG WINAPI Decrement(LONG *pL) throw()
|
---|
313 | {
|
---|
314 | return InterlockedDecrement(pL);
|
---|
315 | }
|
---|
316 | typedef CComFakeCriticalSection AutoCriticalSection;
|
---|
317 | typedef CComFakeCriticalSection AutoDeleteCriticalSection;
|
---|
318 | typedef CComMultiThreadModelNoCS ThreadModelNoCS;
|
---|
319 | };
|
---|
320 |
|
---|
321 | class CComMultiThreadModel
|
---|
322 | {
|
---|
323 | public:
|
---|
324 | static ULONG WINAPI Increment(LONG *pL) throw()
|
---|
325 | {
|
---|
326 | return InterlockedIncrement(pL);
|
---|
327 | }
|
---|
328 | static ULONG WINAPI Decrement(LONG *pL) throw()
|
---|
329 | {
|
---|
330 | return InterlockedDecrement(pL);
|
---|
331 | }
|
---|
332 | typedef CComAutoCriticalSection AutoCriticalSection;
|
---|
333 | typedef CComAutoDeleteCriticalSection AutoDeleteCriticalSection;
|
---|
334 | typedef CComMultiThreadModelNoCS ThreadModelNoCS;
|
---|
335 | };
|
---|
336 |
|
---|
337 | class ATL_NO_VTABLE CAtlModule
|
---|
338 | {
|
---|
339 | public:
|
---|
340 | static GUID m_LibID;
|
---|
341 | CComCriticalSection m_csStaticDataInitAndTypeInfo;
|
---|
342 |
|
---|
343 | CAtlModule() throw()
|
---|
344 | {
|
---|
345 | // One instance only per linking namespace!
|
---|
346 | AssertMsg(!_pAtlModule, ("CAtlModule: trying to create more than one instance per linking namespace\n"));
|
---|
347 |
|
---|
348 | fInit = false;
|
---|
349 |
|
---|
350 | m_cLock = 0;
|
---|
351 | m_pTermFuncs = NULL;
|
---|
352 | _pAtlModule = this;
|
---|
353 |
|
---|
354 | if (FAILED(m_csStaticDataInitAndTypeInfo.Init()))
|
---|
355 | {
|
---|
356 | AssertMsgFailed(("CAtlModule: failed to init critsect\n"));
|
---|
357 | return;
|
---|
358 | }
|
---|
359 | fInit = true;
|
---|
360 | }
|
---|
361 |
|
---|
362 | void Term() throw()
|
---|
363 | {
|
---|
364 | if (!fInit)
|
---|
365 | return;
|
---|
366 |
|
---|
367 | // Call all term functions.
|
---|
368 | if (m_pTermFuncs)
|
---|
369 | {
|
---|
370 | _ATL_TERMFUNC_ELEM *p = m_pTermFuncs;
|
---|
371 | _ATL_TERMFUNC_ELEM *pNext;
|
---|
372 | while (p)
|
---|
373 | {
|
---|
374 | p->pfn(p->pv);
|
---|
375 | pNext = p->pNext;
|
---|
376 | delete p;
|
---|
377 | p = pNext;
|
---|
378 | }
|
---|
379 | m_pTermFuncs = NULL;
|
---|
380 | }
|
---|
381 | m_csStaticDataInitAndTypeInfo.Term();
|
---|
382 | fInit = false;
|
---|
383 | }
|
---|
384 |
|
---|
385 | virtual ~CAtlModule() throw()
|
---|
386 | {
|
---|
387 | Term();
|
---|
388 | }
|
---|
389 |
|
---|
390 | virtual LONG Lock() throw()
|
---|
391 | {
|
---|
392 | return CComMultiThreadModel::Increment(&m_cLock);
|
---|
393 | }
|
---|
394 |
|
---|
395 | virtual LONG Unlock() throw()
|
---|
396 | {
|
---|
397 | return CComMultiThreadModel::Decrement(&m_cLock);
|
---|
398 | }
|
---|
399 |
|
---|
400 | virtual LONG GetLockCount() throw()
|
---|
401 | {
|
---|
402 | return m_cLock;
|
---|
403 | }
|
---|
404 |
|
---|
405 | HRESULT AddTermFunc(PFNATLTERMFUNC pfn, void *pv)
|
---|
406 | {
|
---|
407 | _ATL_TERMFUNC_ELEM *pNew = new(std::nothrow) _ATL_TERMFUNC_ELEM;
|
---|
408 | if (!pNew)
|
---|
409 | return E_OUTOFMEMORY;
|
---|
410 | pNew->pfn = pfn;
|
---|
411 | pNew->pv = pv;
|
---|
412 | CComCritSectLock<CComCriticalSection> lock(m_csStaticDataInitAndTypeInfo, false);
|
---|
413 | HRESULT hrc = lock.Lock();
|
---|
414 | if (SUCCEEDED(hrc))
|
---|
415 | {
|
---|
416 | pNew->pNext = m_pTermFuncs;
|
---|
417 | m_pTermFuncs = pNew;
|
---|
418 | }
|
---|
419 | else
|
---|
420 | {
|
---|
421 | delete pNew;
|
---|
422 | AssertMsgFailed(("CComModule::AddTermFunc: failed to lock critsect\n"));
|
---|
423 | }
|
---|
424 | return hrc;
|
---|
425 | }
|
---|
426 |
|
---|
427 | protected:
|
---|
428 | bool fInit;
|
---|
429 | LONG m_cLock;
|
---|
430 | _ATL_TERMFUNC_ELEM *m_pTermFuncs;
|
---|
431 | };
|
---|
432 |
|
---|
433 | __declspec(selectany) GUID CAtlModule::m_LibID = {0x0, 0x0, 0x0, {0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0} };
|
---|
434 |
|
---|
435 | struct _ATL_COM_MODULE
|
---|
436 | {
|
---|
437 | HINSTANCE m_hInstTypeLib;
|
---|
438 | CComCriticalSection m_csObjMap;
|
---|
439 | };
|
---|
440 |
|
---|
441 | #ifndef _delayimp_h
|
---|
442 | extern "C" IMAGE_DOS_HEADER __ImageBase;
|
---|
443 | #endif
|
---|
444 |
|
---|
445 | class CAtlComModule : public _ATL_COM_MODULE
|
---|
446 | {
|
---|
447 | public:
|
---|
448 | static bool m_fInitFailed;
|
---|
449 | CAtlComModule() throw()
|
---|
450 | {
|
---|
451 | m_hInstTypeLib = reinterpret_cast<HINSTANCE>(&__ImageBase);
|
---|
452 |
|
---|
453 | if (FAILED(m_csObjMap.Init()))
|
---|
454 | {
|
---|
455 | AssertMsgFailed(("CAtlComModule: critsect init failed\n"));
|
---|
456 | m_fInitFailed = true;
|
---|
457 | return;
|
---|
458 | }
|
---|
459 | }
|
---|
460 |
|
---|
461 | ~CAtlComModule()
|
---|
462 | {
|
---|
463 | Term();
|
---|
464 | }
|
---|
465 |
|
---|
466 | void Term()
|
---|
467 | {
|
---|
468 | m_csObjMap.Term();
|
---|
469 | }
|
---|
470 | };
|
---|
471 |
|
---|
472 | __declspec(selectany) bool CAtlComModule::m_fInitFailed = false;
|
---|
473 | __declspec(selectany) CAtlComModule _AtlComModule;
|
---|
474 |
|
---|
475 | template <class T> class ATL_NO_VTABLE CAtlModuleT : public CAtlModule
|
---|
476 | {
|
---|
477 | public:
|
---|
478 | CAtlModuleT() throw()
|
---|
479 | {
|
---|
480 | T::InitLibId();
|
---|
481 | }
|
---|
482 |
|
---|
483 | static void InitLibId() throw()
|
---|
484 | {
|
---|
485 | }
|
---|
486 | };
|
---|
487 |
|
---|
488 | /**
|
---|
489 | *
|
---|
490 | * This class not _not_ be statically instantiated as a global variable! It may
|
---|
491 | * use VBoxRT before it's initialized otherwise, messing up logging and whatnot.
|
---|
492 | *
|
---|
493 | * When possible create the instance inside the TrustedMain() or main() as a
|
---|
494 | * stack variable. In DLLs use 'new' to instantiate it in the DllMain function.
|
---|
495 | */
|
---|
496 | class CComModule : public CAtlModuleT<CComModule>
|
---|
497 | {
|
---|
498 | public:
|
---|
499 | CComModule()
|
---|
500 | {
|
---|
501 | // One instance only per linking namespace!
|
---|
502 | AssertMsg(!_pModule, ("CComModule: trying to create more than one instance per linking namespace\n"));
|
---|
503 | _pModule = this;
|
---|
504 | m_pObjMap = NULL;
|
---|
505 | }
|
---|
506 |
|
---|
507 | ~CComModule()
|
---|
508 | {
|
---|
509 | }
|
---|
510 |
|
---|
511 | _ATL_OBJMAP_ENTRY *m_pObjMap;
|
---|
512 | HRESULT Init(_ATL_OBJMAP_ENTRY *p, HINSTANCE h, const GUID *pLibID = NULL) throw()
|
---|
513 | {
|
---|
514 | RT_NOREF1(h);
|
---|
515 |
|
---|
516 | if (pLibID)
|
---|
517 | m_LibID = *pLibID;
|
---|
518 |
|
---|
519 | // Go over the object map to do some sanity checking, making things
|
---|
520 | // crash early if something is seriously busted.
|
---|
521 | _ATL_OBJMAP_ENTRY *pEntry;
|
---|
522 | if (p != (_ATL_OBJMAP_ENTRY *)-1)
|
---|
523 | {
|
---|
524 | m_pObjMap = p;
|
---|
525 | if (m_pObjMap)
|
---|
526 | {
|
---|
527 | pEntry = m_pObjMap;
|
---|
528 | while (pEntry->pclsid)
|
---|
529 | pEntry++;
|
---|
530 | }
|
---|
531 | }
|
---|
532 | return S_OK;
|
---|
533 | }
|
---|
534 |
|
---|
535 | void Term() throw()
|
---|
536 | {
|
---|
537 | _ATL_OBJMAP_ENTRY *pEntry;
|
---|
538 | if (m_pObjMap)
|
---|
539 | {
|
---|
540 | pEntry = m_pObjMap;
|
---|
541 | while (pEntry->pclsid)
|
---|
542 | {
|
---|
543 | if (pEntry->pCF)
|
---|
544 | pEntry->pCF->Release();
|
---|
545 | pEntry->pCF = NULL;
|
---|
546 | pEntry++;
|
---|
547 | }
|
---|
548 | }
|
---|
549 |
|
---|
550 | CAtlModuleT<CComModule>::Term();
|
---|
551 | }
|
---|
552 |
|
---|
553 | HRESULT GetClassObject(REFCLSID rclsid, REFIID riid, void **ppv) throw()
|
---|
554 | {
|
---|
555 | *ppv = NULL;
|
---|
556 | HRESULT hrc = S_OK;
|
---|
557 |
|
---|
558 | if (m_pObjMap)
|
---|
559 | {
|
---|
560 | const _ATL_OBJMAP_ENTRY *pEntry = m_pObjMap;
|
---|
561 |
|
---|
562 | while (pEntry->pclsid)
|
---|
563 | {
|
---|
564 | if (pEntry->pfnGetClassObject && rclsid == *pEntry->pclsid)
|
---|
565 | {
|
---|
566 | if (!pEntry->pCF)
|
---|
567 | {
|
---|
568 | CComCritSectLock<CComCriticalSection> lock(_AtlComModule.m_csObjMap, false);
|
---|
569 | hrc = lock.Lock();
|
---|
570 | if (FAILED(hrc))
|
---|
571 | {
|
---|
572 | AssertMsgFailed(("CComModule::GetClassObject: failed to lock critsect\n"));
|
---|
573 | break;
|
---|
574 | }
|
---|
575 |
|
---|
576 | if (!pEntry->pCF)
|
---|
577 | {
|
---|
578 | hrc = pEntry->pfnGetClassObject(pEntry->pfnCreateInstance, __uuidof(IUnknown), (void **)&pEntry->pCF);
|
---|
579 | }
|
---|
580 | }
|
---|
581 |
|
---|
582 | if (pEntry->pCF)
|
---|
583 | {
|
---|
584 | hrc = pEntry->pCF->QueryInterface(riid, ppv);
|
---|
585 | }
|
---|
586 | break;
|
---|
587 | }
|
---|
588 | pEntry++;
|
---|
589 | }
|
---|
590 | }
|
---|
591 |
|
---|
592 | return hrc;
|
---|
593 | }
|
---|
594 |
|
---|
595 | // For EXE only: register all class factories with COM.
|
---|
596 | HRESULT RegisterClassObjects(DWORD dwClsContext, DWORD dwFlags) throw()
|
---|
597 | {
|
---|
598 | HRESULT hrc = S_OK;
|
---|
599 | _ATL_OBJMAP_ENTRY *pEntry;
|
---|
600 | if (m_pObjMap)
|
---|
601 | {
|
---|
602 | pEntry = m_pObjMap;
|
---|
603 | while (pEntry->pclsid && SUCCEEDED(hrc))
|
---|
604 | {
|
---|
605 | if (pEntry->pfnGetClassObject)
|
---|
606 | {
|
---|
607 | IUnknown *p;
|
---|
608 | hrc = pEntry->pfnGetClassObject(pEntry->pfnCreateInstance, __uuidof(IUnknown), (void **)&p);
|
---|
609 | if (SUCCEEDED(hrc))
|
---|
610 | hrc = CoRegisterClassObject(*(pEntry->pclsid), p, dwClsContext, dwFlags, &pEntry->dwRegister);
|
---|
611 | if (p)
|
---|
612 | p->Release();
|
---|
613 | }
|
---|
614 | pEntry++;
|
---|
615 | }
|
---|
616 | }
|
---|
617 | return hrc;
|
---|
618 | }
|
---|
619 | // For EXE only: revoke all class factories with COM.
|
---|
620 | HRESULT RevokeClassObjects() throw()
|
---|
621 | {
|
---|
622 | HRESULT hrc = S_OK;
|
---|
623 | _ATL_OBJMAP_ENTRY *pEntry;
|
---|
624 | if (m_pObjMap != NULL)
|
---|
625 | {
|
---|
626 | pEntry = m_pObjMap;
|
---|
627 | while (pEntry->pclsid && SUCCEEDED(hrc))
|
---|
628 | {
|
---|
629 | if (pEntry->dwRegister)
|
---|
630 | hrc = CoRevokeClassObject(pEntry->dwRegister);
|
---|
631 | pEntry++;
|
---|
632 | }
|
---|
633 | }
|
---|
634 | return hrc;
|
---|
635 | }
|
---|
636 | };
|
---|
637 |
|
---|
638 |
|
---|
639 | template <class T> class CComCreator
|
---|
640 | {
|
---|
641 | public:
|
---|
642 | static HRESULT WINAPI CreateInstance(void *pv, REFIID riid, void **ppv)
|
---|
643 | {
|
---|
644 | AssertReturn(ppv, E_POINTER);
|
---|
645 | *ppv = NULL;
|
---|
646 | HRESULT hrc = E_OUTOFMEMORY;
|
---|
647 | T *p = new(std::nothrow) T(pv);
|
---|
648 | if (p)
|
---|
649 | {
|
---|
650 | p->SetVoid(pv);
|
---|
651 | p->InternalFinalConstructAddRef();
|
---|
652 | hrc = p->_AtlInitialConstruct();
|
---|
653 | if (SUCCEEDED(hrc))
|
---|
654 | hrc = p->FinalConstruct();
|
---|
655 | p->InternalFinalConstructRelease();
|
---|
656 | if (SUCCEEDED(hrc))
|
---|
657 | hrc = p->QueryInterface(riid, ppv);
|
---|
658 | if (FAILED(hrc))
|
---|
659 | delete p;
|
---|
660 | }
|
---|
661 | return hrc;
|
---|
662 | }
|
---|
663 | };
|
---|
664 |
|
---|
665 | template <HRESULT hrc> class CComFailCreator
|
---|
666 | {
|
---|
667 | public:
|
---|
668 | static HRESULT WINAPI CreateInstance(void *, REFIID, void **ppv)
|
---|
669 | {
|
---|
670 | AssertReturn(ppv, E_POINTER);
|
---|
671 | *ppv = NULL;
|
---|
672 |
|
---|
673 | return hrc;
|
---|
674 | }
|
---|
675 | };
|
---|
676 |
|
---|
677 | template <class T1, class T2> class CComCreator2
|
---|
678 | {
|
---|
679 | public:
|
---|
680 | static HRESULT WINAPI CreateInstance(void *pv, REFIID riid, void **ppv)
|
---|
681 | {
|
---|
682 | AssertReturn(ppv, E_POINTER);
|
---|
683 |
|
---|
684 | return !pv ? T1::CreateInstance(NULL, riid, ppv) : T2::CreateInstance(pv, riid, ppv);
|
---|
685 | }
|
---|
686 | };
|
---|
687 |
|
---|
688 | template <class Base> class CComObjectCached : public Base
|
---|
689 | {
|
---|
690 | public:
|
---|
691 | CComObjectCached(void * = NULL)
|
---|
692 | {
|
---|
693 | }
|
---|
694 | virtual ~CComObjectCached()
|
---|
695 | {
|
---|
696 | // Catch refcount screwups by setting refcount to -(LONG_MAX/2).
|
---|
697 | m_iRef = -(LONG_MAX/2);
|
---|
698 | FinalRelease();
|
---|
699 | }
|
---|
700 | STDMETHOD_(ULONG, AddRef)() throw()
|
---|
701 | {
|
---|
702 | // If you get errors about undefined InternalAddRef then Base does not
|
---|
703 | // derive from CComObjectRootEx.
|
---|
704 | ULONG l = InternalAddRef();
|
---|
705 | if (l == 2)
|
---|
706 | {
|
---|
707 | AssertMsg(_pAtlModule, ("ATL: referring to ATL module without having one declared in this linking namespace\n"));
|
---|
708 | _pAtlModule->Lock();
|
---|
709 | }
|
---|
710 | return l;
|
---|
711 | }
|
---|
712 | STDMETHOD_(ULONG, Release)() throw()
|
---|
713 | {
|
---|
714 | // If you get errors about undefined InternalRelease then Base does not
|
---|
715 | // derive from CComObjectRootEx.
|
---|
716 | ULONG l = InternalRelease();
|
---|
717 | if (l == 0)
|
---|
718 | delete this;
|
---|
719 | else if (l == 1)
|
---|
720 | {
|
---|
721 | AssertMsg(_pAtlModule, ("ATL: referring to ATL module without having one declared in this linking namespace\n"));
|
---|
722 | _pAtlModule->Unlock();
|
---|
723 | }
|
---|
724 | return l;
|
---|
725 | }
|
---|
726 | STDMETHOD(QueryInterface)(REFIID iid, void **ppvObj) throw()
|
---|
727 | {
|
---|
728 | // If you get errors about undefined _InternalQueryInterface then
|
---|
729 | // double check BEGIN_COM_MAP in the class definition.
|
---|
730 | return _InternalQueryInterface(iid, ppvObj);
|
---|
731 | }
|
---|
732 | static HRESULT WINAPI CreateInstance(CComObjectCached<Base> **pp) throw()
|
---|
733 | {
|
---|
734 | AssertReturn(pp, E_POINTER);
|
---|
735 | *pp = NULL;
|
---|
736 |
|
---|
737 | HRESULT hrc = E_OUTOFMEMORY;
|
---|
738 | CComObjectCached<Base> *p = new(std::nothrow) CComObjectCached<Base>();
|
---|
739 | if (p)
|
---|
740 | {
|
---|
741 | p->SetVoid(NULL);
|
---|
742 | p->InternalFinalConstructAddRef();
|
---|
743 | hrc = p->_AtlInitialConstruct();
|
---|
744 | if (SUCCEEDED(hrc))
|
---|
745 | hrc = p->FinalConstruct();
|
---|
746 | p->InternalFinalConstructRelease();
|
---|
747 | if (FAILED(hrc))
|
---|
748 | delete p;
|
---|
749 | else
|
---|
750 | *pp = p;
|
---|
751 | }
|
---|
752 | return hrc;
|
---|
753 | }
|
---|
754 | };
|
---|
755 |
|
---|
756 | template <class Base> class CComObjectNoLock : public Base
|
---|
757 | {
|
---|
758 | public:
|
---|
759 | CComObjectNoLock(void * = NULL)
|
---|
760 | {
|
---|
761 | }
|
---|
762 | virtual ~CComObjectNoLock()
|
---|
763 | {
|
---|
764 | // Catch refcount screwups by setting refcount to -(LONG_MAX/2).
|
---|
765 | m_iRef = -(LONG_MAX/2);
|
---|
766 | FinalRelease();
|
---|
767 | }
|
---|
768 | STDMETHOD_(ULONG, AddRef)() throw()
|
---|
769 | {
|
---|
770 | // If you get errors about undefined InternalAddRef then Base does not
|
---|
771 | // derive from CComObjectRootEx.
|
---|
772 | return InternalAddRef();
|
---|
773 | }
|
---|
774 | STDMETHOD_(ULONG, Release)() throw()
|
---|
775 | {
|
---|
776 | // If you get errors about undefined InternalRelease then Base does not
|
---|
777 | // derive from CComObjectRootEx.
|
---|
778 | ULONG l = InternalRelease();
|
---|
779 | if (l == 0)
|
---|
780 | delete this;
|
---|
781 | return l;
|
---|
782 | }
|
---|
783 | STDMETHOD(QueryInterface)(REFIID iid, void **ppvObj) throw()
|
---|
784 | {
|
---|
785 | // If you get errors about undefined _InternalQueryInterface then
|
---|
786 | // double check BEGIN_COM_MAP in the class definition.
|
---|
787 | return _InternalQueryInterface(iid, ppvObj);
|
---|
788 | }
|
---|
789 | };
|
---|
790 |
|
---|
791 | class CComTypeInfoHolder
|
---|
792 | {
|
---|
793 | /** @todo implement type info caching, making stuff more efficient - would we benefit? */
|
---|
794 | public:
|
---|
795 | const GUID *m_pGUID;
|
---|
796 | const GUID *m_pLibID;
|
---|
797 | WORD m_iMajor;
|
---|
798 | WORD m_iMinor;
|
---|
799 | ITypeInfo *m_pTInfo;
|
---|
800 |
|
---|
801 | HRESULT GetTypeInfo(UINT iTInfo, LCID lcid, ITypeInfo **ppTInfo)
|
---|
802 | {
|
---|
803 | if (iTInfo != 0)
|
---|
804 | return DISP_E_BADINDEX;
|
---|
805 | return GetTI(lcid, ppTInfo);
|
---|
806 | }
|
---|
807 | HRESULT GetIDsOfNames(REFIID riid, LPOLESTR *pwszNames, UINT cNames, LCID lcid, DISPID *pDispID)
|
---|
808 | {
|
---|
809 | RT_NOREF1(riid); /* should be IID_NULL */
|
---|
810 | HRESULT hrc = FetchTI(lcid);
|
---|
811 | if (m_pTInfo)
|
---|
812 | hrc = m_pTInfo->GetIDsOfNames(pwszNames, cNames, pDispID);
|
---|
813 | return hrc;
|
---|
814 | }
|
---|
815 | HRESULT Invoke(IDispatch *p, DISPID DispID, REFIID riid, LCID lcid, WORD iFlags, DISPPARAMS *pDispParams,
|
---|
816 | VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
|
---|
817 | {
|
---|
818 | RT_NOREF1(riid); /* should be IID_NULL */
|
---|
819 | HRESULT hrc = FetchTI(lcid);
|
---|
820 | if (m_pTInfo)
|
---|
821 | hrc = m_pTInfo->Invoke(p, DispID, iFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
|
---|
822 | return hrc;
|
---|
823 | }
|
---|
824 | private:
|
---|
825 | static void __stdcall Cleanup(void *pv)
|
---|
826 | {
|
---|
827 | AssertReturnVoid(pv);
|
---|
828 | CComTypeInfoHolder *p = (CComTypeInfoHolder *)pv;
|
---|
829 | if (p->m_pTInfo != NULL)
|
---|
830 | p->m_pTInfo->Release();
|
---|
831 | p->m_pTInfo = NULL;
|
---|
832 | }
|
---|
833 |
|
---|
834 | HRESULT GetTI(LCID lcid)
|
---|
835 | {
|
---|
836 | AssertMsg(_pAtlModule, ("ATL: referring to ATL module without having one declared in this linking namespace\n"));
|
---|
837 | Assert(m_pLibID && m_pGUID);
|
---|
838 | if (m_pTInfo)
|
---|
839 | return S_OK;
|
---|
840 | CComCritSectLock<CComCriticalSection> lock(_pAtlModule->m_csStaticDataInitAndTypeInfo, false);
|
---|
841 | HRESULT hrc = lock.Lock();
|
---|
842 | ITypeLib *pTypeLib = NULL;
|
---|
843 | Assert(*m_pLibID != GUID_NULL);
|
---|
844 | hrc = LoadRegTypeLib(*m_pLibID, m_iMajor, m_iMinor, lcid, &pTypeLib);
|
---|
845 | if (SUCCEEDED(hrc))
|
---|
846 | {
|
---|
847 | ITypeInfo *pTypeInfo;
|
---|
848 | hrc = pTypeLib->GetTypeInfoOfGuid(*m_pGUID, &pTypeInfo);
|
---|
849 | if (SUCCEEDED(hrc))
|
---|
850 | {
|
---|
851 | ITypeInfo2 *pTypeInfo2;
|
---|
852 | if (SUCCEEDED(pTypeInfo->QueryInterface(__uuidof(ITypeInfo2), (void **)&pTypeInfo2)))
|
---|
853 | {
|
---|
854 | pTypeInfo->Release();
|
---|
855 | pTypeInfo = pTypeInfo2;
|
---|
856 | }
|
---|
857 | m_pTInfo = pTypeInfo;
|
---|
858 | _pAtlModule->AddTermFunc(Cleanup, (void *)this);
|
---|
859 | }
|
---|
860 | pTypeLib->Release();
|
---|
861 | }
|
---|
862 | return hrc;
|
---|
863 | }
|
---|
864 | HRESULT GetTI(LCID lcid, ITypeInfo **ppTInfo)
|
---|
865 | {
|
---|
866 | AssertReturn(ppTInfo, E_POINTER);
|
---|
867 | HRESULT hrc = S_OK;
|
---|
868 | if (!m_pTInfo)
|
---|
869 | hrc = GetTI(lcid);
|
---|
870 | if (m_pTInfo)
|
---|
871 | {
|
---|
872 | m_pTInfo->AddRef();
|
---|
873 | hrc = S_OK;
|
---|
874 | }
|
---|
875 | *ppTInfo = m_pTInfo;
|
---|
876 | return hrc;
|
---|
877 | }
|
---|
878 | HRESULT FetchTI(LCID lcid)
|
---|
879 | {
|
---|
880 | if (!m_pTInfo)
|
---|
881 | return GetTI(lcid);
|
---|
882 | return S_OK;
|
---|
883 | }
|
---|
884 | };
|
---|
885 |
|
---|
886 | template <class ThreadModel> class CComObjectRootEx
|
---|
887 | {
|
---|
888 | public:
|
---|
889 | typedef ThreadModel _ThreadModel;
|
---|
890 | CComObjectRootEx()
|
---|
891 | {
|
---|
892 | m_iRef = 0L;
|
---|
893 | }
|
---|
894 | ~CComObjectRootEx()
|
---|
895 | {
|
---|
896 | }
|
---|
897 | ULONG InternalAddRef()
|
---|
898 | {
|
---|
899 | Assert(m_iRef != -1L);
|
---|
900 | return ThreadModel::Increment(&m_iRef);
|
---|
901 | }
|
---|
902 | ULONG InternalRelease()
|
---|
903 | {
|
---|
904 | #ifdef VBOX_STRICT
|
---|
905 | LONG c = ThreadModel::Decrement(&m_iRef);
|
---|
906 | AssertMsg(c >= -(LONG_MAX / 2), /* See ~CComObjectNoLock, ~CComObject & ~CComAggObject. */
|
---|
907 | ("Release called on object which has been already destroyed!\n"));
|
---|
908 | return c;
|
---|
909 | #else
|
---|
910 | return ThreadModel::Decrement(&m_iRef);
|
---|
911 | #endif
|
---|
912 | }
|
---|
913 | ULONG OuterAddRef()
|
---|
914 | {
|
---|
915 | return m_pOuterUnknown->AddRef();
|
---|
916 | }
|
---|
917 | ULONG OuterRelease()
|
---|
918 | {
|
---|
919 | return m_pOuterUnknown->Release();
|
---|
920 | }
|
---|
921 | HRESULT OuterQueryInterface(REFIID iid, void **ppvObject)
|
---|
922 | {
|
---|
923 | return m_pOuterUnknown->QueryInterface(iid, ppvObject);
|
---|
924 | }
|
---|
925 | HRESULT _AtlInitialConstruct()
|
---|
926 | {
|
---|
927 | return m_CritSect.Init();
|
---|
928 | }
|
---|
929 | void Lock()
|
---|
930 | {
|
---|
931 | m_CritSect.Lock();
|
---|
932 | }
|
---|
933 | void Unlock()
|
---|
934 | {
|
---|
935 | m_CritSect.Unlock();
|
---|
936 | }
|
---|
937 | void SetVoid(void *)
|
---|
938 | {
|
---|
939 | }
|
---|
940 | void InternalFinalConstructAddRef()
|
---|
941 | {
|
---|
942 | }
|
---|
943 | void InternalFinalConstructRelease()
|
---|
944 | {
|
---|
945 | Assert(m_iRef == 0);
|
---|
946 | }
|
---|
947 | HRESULT FinalConstruct()
|
---|
948 | {
|
---|
949 | return S_OK;
|
---|
950 | }
|
---|
951 | void FinalRelease()
|
---|
952 | {
|
---|
953 | }
|
---|
954 | static HRESULT WINAPI InternalQueryInterface(void *pThis, const _ATL_INTMAP_ENTRY *pEntries, REFIID iid, void **ppvObj)
|
---|
955 | {
|
---|
956 | AssertReturn(pThis, E_INVALIDARG);
|
---|
957 | AssertReturn(pEntries, E_INVALIDARG);
|
---|
958 | AssertReturn(ppvObj, E_POINTER);
|
---|
959 | *ppvObj = NULL;
|
---|
960 | if (iid == IID_IUnknown)
|
---|
961 | {
|
---|
962 | // For IUnknown use first interface, must be simple map entry.
|
---|
963 | Assert(pEntries->pFunc == COM_SIMPLEMAPENTRY);
|
---|
964 | IUnknown *pObj = (IUnknown *)((INT_PTR)pThis + pEntries->dw);
|
---|
965 | pObj->AddRef();
|
---|
966 | *ppvObj = pObj;
|
---|
967 | return S_OK;
|
---|
968 | }
|
---|
969 | while (pEntries->pFunc)
|
---|
970 | {
|
---|
971 | if (iid == *pEntries->piid)
|
---|
972 | {
|
---|
973 | if (pEntries->pFunc == COM_SIMPLEMAPENTRY)
|
---|
974 | {
|
---|
975 | IUnknown *pObj = (IUnknown *)((INT_PTR)pThis + pEntries->dw);
|
---|
976 | pObj->AddRef();
|
---|
977 | *ppvObj = pObj;
|
---|
978 | return S_OK;
|
---|
979 | }
|
---|
980 | else
|
---|
981 | return pEntries->pFunc(pThis, iid, ppvObj, pEntries->dw);
|
---|
982 | }
|
---|
983 | pEntries++;
|
---|
984 | }
|
---|
985 | return E_NOINTERFACE;
|
---|
986 | }
|
---|
987 | static HRESULT WINAPI _Delegate(void *pThis, REFIID iid, void **ppvObj, DWORD_PTR dw)
|
---|
988 | {
|
---|
989 | AssertPtrReturn(pThis, E_NOINTERFACE);
|
---|
990 | IUnknown *pObj = *(IUnknown **)((DWORD_PTR)pThis + dw);
|
---|
991 | // If this assertion fails then the object has a delegation with a NULL
|
---|
992 | // object pointer, which is highly unusual often means that the pointer
|
---|
993 | // was not set up correctly. Check the COM interface map of the class
|
---|
994 | // for bugs with initializing.
|
---|
995 | AssertPtrReturn(pObj, E_NOINTERFACE);
|
---|
996 | return pObj->QueryInterface(iid, ppvObj);
|
---|
997 | }
|
---|
998 |
|
---|
999 | union
|
---|
1000 | {
|
---|
1001 | LONG m_iRef;
|
---|
1002 | IUnknown *m_pOuterUnknown;
|
---|
1003 | };
|
---|
1004 | private:
|
---|
1005 | typename ThreadModel::AutoDeleteCriticalSection m_CritSect;
|
---|
1006 | };
|
---|
1007 |
|
---|
1008 | template <class Base> class CComObject : public Base
|
---|
1009 | {
|
---|
1010 | public:
|
---|
1011 | CComObject(void * = NULL) throw()
|
---|
1012 | {
|
---|
1013 | AssertMsg(_pAtlModule, ("ATL: referring to ATL module without having one declared in this linking namespace\n"));
|
---|
1014 | _pAtlModule->Lock();
|
---|
1015 | }
|
---|
1016 | virtual ~CComObject() throw()
|
---|
1017 | {
|
---|
1018 | AssertMsg(_pAtlModule, ("ATL: referring to ATL module without having one declared in this linking namespace\n"));
|
---|
1019 | // Catch refcount screwups by setting refcount to -(LONG_MAX/2).
|
---|
1020 | m_iRef = -(LONG_MAX/2);
|
---|
1021 | FinalRelease();
|
---|
1022 | _pAtlModule->Unlock();
|
---|
1023 | }
|
---|
1024 | STDMETHOD_(ULONG, AddRef)()
|
---|
1025 | {
|
---|
1026 | // If you get errors about undefined InternalAddRef then Base does not
|
---|
1027 | // derive from CComObjectRootEx.
|
---|
1028 | return InternalAddRef();
|
---|
1029 | }
|
---|
1030 | STDMETHOD_(ULONG, Release)()
|
---|
1031 | {
|
---|
1032 | // If you get errors about undefined InternalRelease then Base does not
|
---|
1033 | // derive from CComObjectRootEx.
|
---|
1034 | ULONG l = InternalRelease();
|
---|
1035 | if (l == 0)
|
---|
1036 | delete this;
|
---|
1037 | return l;
|
---|
1038 | }
|
---|
1039 | STDMETHOD(QueryInterface)(REFIID iid, void **ppvObj) throw()
|
---|
1040 | {
|
---|
1041 | // If you get errors about undefined _InternalQueryInterface then
|
---|
1042 | // double check BEGIN_COM_MAP in the class definition.
|
---|
1043 | return _InternalQueryInterface(iid, ppvObj);
|
---|
1044 | }
|
---|
1045 |
|
---|
1046 | static HRESULT WINAPI CreateInstance(CComObject<Base> **pp) throw()
|
---|
1047 | {
|
---|
1048 | AssertReturn(pp, E_POINTER);
|
---|
1049 | *pp = NULL;
|
---|
1050 |
|
---|
1051 | HRESULT hrc = E_OUTOFMEMORY;
|
---|
1052 | CComObject<Base> *p = new(std::nothrow) CComObject<Base>();
|
---|
1053 | if (p)
|
---|
1054 | {
|
---|
1055 | p->InternalFinalConstructAddRef();
|
---|
1056 | hrc = p->_AtlInitialConstruct();
|
---|
1057 | if (SUCCEEDED(hrc))
|
---|
1058 | hrc = p->FinalConstruct();
|
---|
1059 | p->InternalFinalConstructRelease();
|
---|
1060 | if (FAILED(hrc))
|
---|
1061 | {
|
---|
1062 | delete p;
|
---|
1063 | p = NULL;
|
---|
1064 | }
|
---|
1065 | }
|
---|
1066 | *pp = p;
|
---|
1067 | return hrc;
|
---|
1068 | }
|
---|
1069 | };
|
---|
1070 |
|
---|
1071 | template <class T, const IID *piid, const GUID *pLibID, WORD iMajor = 1, WORD iMinor = 0> class ATL_NO_VTABLE IDispatchImpl : public T
|
---|
1072 | {
|
---|
1073 | public:
|
---|
1074 | // IDispatch
|
---|
1075 | STDMETHOD(GetTypeInfoCount)(UINT *pcTInfo)
|
---|
1076 | {
|
---|
1077 | if (!pcTInfo)
|
---|
1078 | return E_POINTER;
|
---|
1079 | *pcTInfo = 1;
|
---|
1080 | return S_OK;
|
---|
1081 | }
|
---|
1082 | STDMETHOD(GetTypeInfo)(UINT cTInfo, LCID lcid, ITypeInfo **ppTInfo)
|
---|
1083 | {
|
---|
1084 | return tih.GetTypeInfo(cTInfo, lcid, ppTInfo);
|
---|
1085 | }
|
---|
1086 | STDMETHOD(GetIDsOfNames)(REFIID riid, LPOLESTR *pwszNames, UINT cNames, LCID lcid, DISPID *pDispID)
|
---|
1087 | {
|
---|
1088 | return tih.GetIDsOfNames(riid, pwszNames, cNames, lcid, pDispID);
|
---|
1089 | }
|
---|
1090 | STDMETHOD(Invoke)(DISPID DispID, REFIID riid, LCID lcid, WORD iFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
|
---|
1091 | {
|
---|
1092 | return tih.Invoke((IDispatch *)this, DispID, riid, lcid, iFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
|
---|
1093 | }
|
---|
1094 | protected:
|
---|
1095 | static CComTypeInfoHolder tih;
|
---|
1096 | static HRESULT GetTI(LCID lcid, ITypeInfo **ppTInfo)
|
---|
1097 | {
|
---|
1098 | return tih.GetTI(lcid, ppTInfo);
|
---|
1099 | }
|
---|
1100 | };
|
---|
1101 |
|
---|
1102 | template <class T, const IID *piid, const GUID *pLibID, WORD iMajor, WORD iMinor> CComTypeInfoHolder IDispatchImpl<T, piid, pLibID, iMajor, iMinor>::tih = { piid, pLibID, iMajor, iMinor, NULL };
|
---|
1103 |
|
---|
1104 |
|
---|
1105 | template <class Base> class CComContainedObject : public Base
|
---|
1106 | {
|
---|
1107 | public:
|
---|
1108 | CComContainedObject(void *pv)
|
---|
1109 | {
|
---|
1110 | m_pOuterUnknown = (IUnknown *)pv;
|
---|
1111 | }
|
---|
1112 |
|
---|
1113 | STDMETHOD_(ULONG, AddRef)() throw()
|
---|
1114 | {
|
---|
1115 | return OuterAddRef();
|
---|
1116 | }
|
---|
1117 | STDMETHOD_(ULONG, Release)() throw()
|
---|
1118 | {
|
---|
1119 | return OuterRelease();
|
---|
1120 | }
|
---|
1121 | STDMETHOD(QueryInterface)(REFIID iid, void **ppvObj) throw()
|
---|
1122 | {
|
---|
1123 | return OuterQueryInterface(iid, ppvObj);
|
---|
1124 | }
|
---|
1125 | };
|
---|
1126 |
|
---|
1127 | template <class Aggregated> class CComAggObject :
|
---|
1128 | public IUnknown,
|
---|
1129 | public CComObjectRootEx<typename Aggregated::_ThreadModel::ThreadModelNoCS>
|
---|
1130 | {
|
---|
1131 | public:
|
---|
1132 | CComAggObject(void *pv) :
|
---|
1133 | m_Aggregated(pv)
|
---|
1134 | {
|
---|
1135 | AssertMsg(_pAtlModule, ("ATL: referring to ATL module without having one declared in this linking namespace\n"));
|
---|
1136 | _pAtlModule->Lock();
|
---|
1137 | }
|
---|
1138 | virtual ~CComAggObject()
|
---|
1139 | {
|
---|
1140 | AssertMsg(_pAtlModule, ("ATL: referring to ATL module without having one declared in this linking namespace\n"));
|
---|
1141 | // Catch refcount screwups by setting refcount to -(LONG_MAX/2).
|
---|
1142 | m_iRef = -(LONG_MAX/2);
|
---|
1143 | FinalRelease();
|
---|
1144 | _pAtlModule->Unlock();
|
---|
1145 | }
|
---|
1146 | HRESULT _AtlInitialConstruct()
|
---|
1147 | {
|
---|
1148 | HRESULT hrc = m_Aggregated._AtlInitialConstruct();
|
---|
1149 | if (SUCCEEDED(hrc))
|
---|
1150 | {
|
---|
1151 | hrc = CComObjectRootEx<typename Aggregated::_ThreadModel::ThreadModelNoCS>::_AtlInitialConstruct();
|
---|
1152 | }
|
---|
1153 | return hrc;
|
---|
1154 | }
|
---|
1155 | HRESULT FinalConstruct()
|
---|
1156 | {
|
---|
1157 | CComObjectRootEx<Aggregated::_ThreadModel::ThreadModelNoCS>::FinalConstruct();
|
---|
1158 | return m_Aggregated.FinalConstruct();
|
---|
1159 | }
|
---|
1160 | void FinalRelease()
|
---|
1161 | {
|
---|
1162 | CComObjectRootEx<Aggregated::_ThreadModel::ThreadModelNoCS>::FinalRelease();
|
---|
1163 | m_Aggregated.FinalRelease();
|
---|
1164 | }
|
---|
1165 |
|
---|
1166 | STDMETHOD_(ULONG, AddRef)()
|
---|
1167 | {
|
---|
1168 | return InternalAddRef();
|
---|
1169 | }
|
---|
1170 | STDMETHOD_(ULONG, Release)()
|
---|
1171 | {
|
---|
1172 | ULONG l = InternalRelease();
|
---|
1173 | if (l == 0)
|
---|
1174 | delete this;
|
---|
1175 | return l;
|
---|
1176 | }
|
---|
1177 | STDMETHOD(QueryInterface)(REFIID iid, void **ppvObj)
|
---|
1178 | {
|
---|
1179 | AssertReturn(ppvObj, E_POINTER);
|
---|
1180 | *ppvObj = NULL;
|
---|
1181 |
|
---|
1182 | HRESULT hrc = S_OK;
|
---|
1183 | if (iid == __uuidof(IUnknown))
|
---|
1184 | {
|
---|
1185 | *ppvObj = (void *)(IUnknown *)this;
|
---|
1186 | AddRef();
|
---|
1187 | }
|
---|
1188 | else
|
---|
1189 | hrc = m_Aggregated._InternalQueryInterface(iid, ppvObj);
|
---|
1190 | return hrc;
|
---|
1191 | }
|
---|
1192 | static HRESULT WINAPI CreateInstance(LPUNKNOWN pUnkOuter, CComAggObject<Aggregated> **pp)
|
---|
1193 | {
|
---|
1194 | AssertReturn(pp, E_POINTER);
|
---|
1195 | *pp = NULL;
|
---|
1196 |
|
---|
1197 | HRESULT hrc = E_OUTOFMEMORY;
|
---|
1198 | CComAggObject<Aggregated> *p = new(std::nothrow) CComAggObject<Aggregated>(pUnkOuter);
|
---|
1199 | if (p)
|
---|
1200 | {
|
---|
1201 | p->SetVoid(NULL);
|
---|
1202 | p->InternalFinalConstructAddRef();
|
---|
1203 | hrc = p->_AtlInitialConstruct();
|
---|
1204 | if (SUCCEEDED(hrc))
|
---|
1205 | hrc = p->FinalConstruct();
|
---|
1206 | p->InternalFinalConstructRelease();
|
---|
1207 | if (FAILED(hrc))
|
---|
1208 | delete p;
|
---|
1209 | else
|
---|
1210 | *pp = p;
|
---|
1211 | }
|
---|
1212 | return hrc;
|
---|
1213 | }
|
---|
1214 |
|
---|
1215 | CComContainedObject<Aggregated> m_Aggregated;
|
---|
1216 | };
|
---|
1217 |
|
---|
1218 | class CComClassFactory:
|
---|
1219 | public IClassFactory,
|
---|
1220 | public CComObjectRootEx<CComMultiThreadModel>
|
---|
1221 | {
|
---|
1222 | public:
|
---|
1223 | BEGIN_COM_MAP(CComClassFactory)
|
---|
1224 | COM_INTERFACE_ENTRY(IClassFactory)
|
---|
1225 | END_COM_MAP()
|
---|
1226 |
|
---|
1227 | virtual ~CComClassFactory()
|
---|
1228 | {
|
---|
1229 | }
|
---|
1230 |
|
---|
1231 | // IClassFactory
|
---|
1232 | STDMETHOD(CreateInstance)(LPUNKNOWN pUnkOuter, REFIID riid, void **ppvObj)
|
---|
1233 | {
|
---|
1234 | Assert(m_pfnCreateInstance);
|
---|
1235 | HRESULT hrc = E_POINTER;
|
---|
1236 | if (ppvObj)
|
---|
1237 | {
|
---|
1238 | *ppvObj = NULL;
|
---|
1239 | if (pUnkOuter && riid != __uuidof(IUnknown))
|
---|
1240 | {
|
---|
1241 | AssertMsgFailed(("CComClassFactory: cannot create an aggregated object other than IUnknown\n"));
|
---|
1242 | hrc = CLASS_E_NOAGGREGATION;
|
---|
1243 | }
|
---|
1244 | else
|
---|
1245 | hrc = m_pfnCreateInstance(pUnkOuter, riid, ppvObj);
|
---|
1246 | }
|
---|
1247 | return hrc;
|
---|
1248 | }
|
---|
1249 |
|
---|
1250 | STDMETHOD(LockServer)(BOOL fLock)
|
---|
1251 | {
|
---|
1252 | AssertMsg(_pAtlModule, ("ATL: referring to ATL module without having one declared in this linking namespace\n"));
|
---|
1253 | if (fLock)
|
---|
1254 | _pAtlModule->Lock();
|
---|
1255 | else
|
---|
1256 | _pAtlModule->Unlock();
|
---|
1257 | return S_OK;
|
---|
1258 | }
|
---|
1259 |
|
---|
1260 | // Set creator for use by the factory.
|
---|
1261 | void SetVoid(void *pv)
|
---|
1262 | {
|
---|
1263 | m_pfnCreateInstance = (PFNCREATEINSTANCE)pv;
|
---|
1264 | }
|
---|
1265 |
|
---|
1266 | PFNCREATEINSTANCE m_pfnCreateInstance;
|
---|
1267 | };
|
---|
1268 |
|
---|
1269 | template <class T> class CComClassFactorySingleton : public CComClassFactory
|
---|
1270 | {
|
---|
1271 | public:
|
---|
1272 | CComClassFactorySingleton() :
|
---|
1273 | m_hrc(S_OK),
|
---|
1274 | m_pObj(NULL)
|
---|
1275 | {
|
---|
1276 | }
|
---|
1277 | virtual ~CComClassFactorySingleton()
|
---|
1278 | {
|
---|
1279 | if (m_pObj)
|
---|
1280 | m_pObj->Release();
|
---|
1281 | }
|
---|
1282 | // IClassFactory
|
---|
1283 | STDMETHOD(CreateInstance)(LPUNKNOWN pUnkOuter, REFIID riid, void **pvObj)
|
---|
1284 | {
|
---|
1285 | HRESULT hrc = E_POINTER;
|
---|
1286 | if (ppvObj)
|
---|
1287 | {
|
---|
1288 | *ppvObj = NULL;
|
---|
1289 | // Singleton factories do not support aggregation.
|
---|
1290 | AssertReturn(!pUnkOuter, CLASS_E_NOAGGREGATION);
|
---|
1291 |
|
---|
1292 | // Test if singleton is already created. Do it outside the lock,
|
---|
1293 | // relying on atomic checks. Remember the inherent race!
|
---|
1294 | if (SUCCEEDED(m_hrc) && !m_pObj)
|
---|
1295 | {
|
---|
1296 | Lock();
|
---|
1297 | // Make sure that the module is in use, otherwise the
|
---|
1298 | // module can terminate while we're creating a new
|
---|
1299 | // instance, which leads to strange errors.
|
---|
1300 | LockServer(true);
|
---|
1301 | __try
|
---|
1302 | {
|
---|
1303 | // Repeat above test to avoid races when multiple threads
|
---|
1304 | // want to create a singleton simultaneously.
|
---|
1305 | if (SUCCEEDED(m_hrc) && !m_pObj)
|
---|
1306 | {
|
---|
1307 | CComObjectCached<T> *p;
|
---|
1308 | m_hrc = CComObjectCached<T>::CreateInstance(&p);
|
---|
1309 | if (SUCCEEDED(m_hrc))
|
---|
1310 | {
|
---|
1311 | m_hrc = p->QueryInterface(IID_IUnknown, (void **)&m_pObj);
|
---|
1312 | if (FAILED(m_hrc))
|
---|
1313 | {
|
---|
1314 | delete p;
|
---|
1315 | }
|
---|
1316 | }
|
---|
1317 | }
|
---|
1318 | }
|
---|
1319 | __finally
|
---|
1320 | {
|
---|
1321 | Unlock();
|
---|
1322 | LockServer(false);
|
---|
1323 | }
|
---|
1324 | }
|
---|
1325 | if (SUCCEEDED(m_hrc))
|
---|
1326 | {
|
---|
1327 | hrc = m_pObj->QueryInterface(riid, ppvObj);
|
---|
1328 | }
|
---|
1329 | else
|
---|
1330 | {
|
---|
1331 | hrc = m_hrc;
|
---|
1332 | }
|
---|
1333 | }
|
---|
1334 | return hrc;
|
---|
1335 | }
|
---|
1336 | HRESULT m_hrc;
|
---|
1337 | IUnknown *m_pObj;
|
---|
1338 | };
|
---|
1339 |
|
---|
1340 |
|
---|
1341 | template <class T, const CLSID *pClsID = &CLSID_NULL> class CComCoClass
|
---|
1342 | {
|
---|
1343 | public:
|
---|
1344 | DECLARE_CLASSFACTORY()
|
---|
1345 | DECLARE_AGGREGATABLE(T)
|
---|
1346 | static const CLSID& WINAPI GetObjectCLSID()
|
---|
1347 | {
|
---|
1348 | return *pClsID;
|
---|
1349 | }
|
---|
1350 | template <class Q>
|
---|
1351 | static HRESULT CreateInstance(Q **pp)
|
---|
1352 | {
|
---|
1353 | return T::_CreatorClass::CreateInstance(NULL, __uuidof(Q), (void **)pp);
|
---|
1354 | }
|
---|
1355 | };
|
---|
1356 |
|
---|
1357 | } /* namespace ATL */
|
---|
1358 |
|
---|
1359 | #endif /* !VBOX_INCLUDED_com_microatl_h */
|
---|
1360 |
|
---|