d3d8: Render state additions.
[wine/multimedia.git] / dlls / ole32 / stubmanager.c
blob2f2e297f280e168bcd9b7aa0574dcdaed77249bf
1 /*
2 * A stub manager is an object that controls interface stubs. It is
3 * identified by an OID (object identifier) and acts as the network
4 * identity of the object. There can be many stub managers in a
5 * process or apartment.
7 * Copyright 2002 Marcus Meissner
8 * Copyright 2004 Mike Hearn for CodeWeavers
9 * Copyright 2004 Robert Shearman (for CodeWeavers)
11 * This library is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU Lesser General Public
13 * License as published by the Free Software Foundation; either
14 * version 2.1 of the License, or (at your option) any later version.
16 * This library is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 * Lesser General Public License for more details.
21 * You should have received a copy of the GNU Lesser General Public
22 * License along with this library; if not, write to the Free Software
23 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
26 #define COBJMACROS
27 #define NONAMELESSUNION
28 #define NONAMELESSSTRUCT
30 #include <assert.h>
31 #include <stdarg.h>
32 #include <limits.h>
34 #include "windef.h"
35 #include "winbase.h"
36 #include "winuser.h"
37 #include "objbase.h"
38 #include "ole2.h"
39 #include "ole2ver.h"
40 #include "rpc.h"
41 #include "wine/debug.h"
42 #include "compobj_private.h"
44 WINE_DEFAULT_DEBUG_CHANNEL(ole);
46 static void stub_manager_delete_ifstub(struct stub_manager *m, struct ifstub *ifstub);
47 static struct ifstub *stub_manager_ipid_to_ifstub(struct stub_manager *m, const IPID *ipid);
49 /* creates a new stub manager and adds it into the apartment. caller must
50 * release stub manager when it is no longer required. the apartment and
51 * external refs together take one implicit ref */
52 struct stub_manager *new_stub_manager(APARTMENT *apt, IUnknown *object)
54 struct stub_manager *sm;
56 assert( apt );
58 sm = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(struct stub_manager));
59 if (!sm) return NULL;
61 list_init(&sm->ifstubs);
63 InitializeCriticalSection(&sm->lock);
64 DEBUG_SET_CRITSEC_NAME(&sm->lock, "stub_manager");
66 IUnknown_AddRef(object);
67 sm->object = object;
68 sm->apt = apt;
70 /* start off with 2 references because the stub is in the apartment
71 * and the caller will also hold a reference */
72 sm->refs = 2;
74 /* yes, that's right, this starts at zero. that's zero EXTERNAL
75 * refs, ie nobody has unmarshalled anything yet. we can't have
76 * negative refs because the stub manager cannot be explicitly
77 * killed, it has to die by somebody unmarshalling then releasing
78 * the marshalled ifptr.
80 sm->extrefs = 0;
82 EnterCriticalSection(&apt->cs);
83 sm->oid = apt->oidc++;
84 list_add_head(&apt->stubmgrs, &sm->entry);
85 LeaveCriticalSection(&apt->cs);
87 TRACE("Created new stub manager (oid=%s) at %p for object with IUnknown %p\n", wine_dbgstr_longlong(sm->oid), sm, object);
89 return sm;
92 /* caller must remove stub manager from apartment prior to calling this function */
93 static void stub_manager_delete(struct stub_manager *m)
95 struct list *cursor;
97 TRACE("destroying %p (oid=%s)\n", m, wine_dbgstr_longlong(m->oid));
99 /* release every ifstub */
100 while ((cursor = list_head(&m->ifstubs)))
102 struct ifstub *ifstub = LIST_ENTRY(cursor, struct ifstub, entry);
103 stub_manager_delete_ifstub(m, ifstub);
106 IUnknown_Release(m->object);
108 DEBUG_CLEAR_CRITSEC_NAME(&m->lock);
109 DeleteCriticalSection(&m->lock);
111 HeapFree(GetProcessHeap(), 0, m);
114 /* gets the stub manager associated with an object - caller must have
115 * a reference to the apartment while a reference to the stub manager is held.
116 * it must also call release on the stub manager when it is no longer needed */
117 struct stub_manager *get_stub_manager_from_object(APARTMENT *apt, void *object)
119 struct stub_manager *result = NULL;
120 struct list *cursor;
122 EnterCriticalSection(&apt->cs);
123 LIST_FOR_EACH( cursor, &apt->stubmgrs )
125 struct stub_manager *m = LIST_ENTRY( cursor, struct stub_manager, entry );
127 if (m->object == object)
129 result = m;
130 stub_manager_int_addref(result);
131 break;
134 LeaveCriticalSection(&apt->cs);
136 if (result)
137 TRACE("found %p for object %p\n", result, object);
138 else
139 TRACE("not found for object %p\n", object);
141 return result;
144 /* removes the apartment reference to an object, destroying it when no other
145 * threads have a reference to it */
146 void apartment_disconnectobject(struct apartment *apt, void *object)
148 int found = FALSE;
149 struct stub_manager *stubmgr;
151 EnterCriticalSection(&apt->cs);
152 LIST_FOR_EACH_ENTRY( stubmgr, &apt->stubmgrs, struct stub_manager, entry )
154 if (stubmgr->object == object)
156 found = TRUE;
157 stub_manager_int_release(stubmgr);
158 break;
161 LeaveCriticalSection(&apt->cs);
163 if (found)
164 TRACE("disconnect object %p\n", object);
165 else
166 WARN("couldn't find object %p\n", object);
169 /* gets the stub manager associated with an object id - caller must have
170 * a reference to the apartment while a reference to the stub manager is held.
171 * it must also call release on the stub manager when it is no longer needed */
172 struct stub_manager *get_stub_manager(APARTMENT *apt, OID oid)
174 struct stub_manager *result = NULL;
175 struct list *cursor;
177 EnterCriticalSection(&apt->cs);
178 LIST_FOR_EACH( cursor, &apt->stubmgrs )
180 struct stub_manager *m = LIST_ENTRY( cursor, struct stub_manager, entry );
182 if (m->oid == oid)
184 result = m;
185 stub_manager_int_addref(result);
186 break;
189 LeaveCriticalSection(&apt->cs);
191 if (result)
192 TRACE("found %p for oid %s\n", result, wine_dbgstr_longlong(oid));
193 else
194 TRACE("not found for oid %s\n", wine_dbgstr_longlong(oid));
196 return result;
199 /* increments the internal refcount */
200 ULONG stub_manager_int_addref(struct stub_manager *This)
202 ULONG refs;
204 EnterCriticalSection(&This->apt->cs);
205 refs = ++This->refs;
206 LeaveCriticalSection(&This->apt->cs);
208 TRACE("before %ld\n", refs - 1);
210 return refs;
213 /* decrements the internal refcount */
214 ULONG stub_manager_int_release(struct stub_manager *This)
216 ULONG refs;
217 APARTMENT *apt = This->apt;
219 EnterCriticalSection(&apt->cs);
220 refs = --This->refs;
222 TRACE("after %ld\n", refs);
224 /* remove from apartment so no other thread can access it... */
225 if (!refs)
226 list_remove(&This->entry);
228 LeaveCriticalSection(&apt->cs);
230 /* ... so now we can delete it without being inside the apartment critsec */
231 if (!refs)
232 stub_manager_delete(This);
234 return refs;
237 /* add some external references (ie from a client that unmarshaled an ifptr) */
238 ULONG stub_manager_ext_addref(struct stub_manager *m, ULONG refs)
240 ULONG rc;
242 EnterCriticalSection(&m->lock);
244 /* make sure we don't overflow extrefs */
245 refs = min(refs, (ULONG_MAX-1 - m->extrefs));
246 rc = (m->extrefs += refs);
248 LeaveCriticalSection(&m->lock);
250 TRACE("added %lu refs to %p (oid %s), rc is now %lu\n", refs, m, wine_dbgstr_longlong(m->oid), rc);
252 return rc;
255 /* remove some external references */
256 ULONG stub_manager_ext_release(struct stub_manager *m, ULONG refs)
258 ULONG rc;
260 EnterCriticalSection(&m->lock);
262 /* make sure we don't underflow extrefs */
263 refs = min(refs, m->extrefs);
264 rc = (m->extrefs -= refs);
266 LeaveCriticalSection(&m->lock);
268 TRACE("removed %lu refs from %p (oid %s), rc is now %lu\n", refs, m, wine_dbgstr_longlong(m->oid), rc);
270 if (rc == 0)
271 stub_manager_int_release(m);
273 return rc;
276 static struct ifstub *stub_manager_ipid_to_ifstub(struct stub_manager *m, const IPID *ipid)
278 struct list *cursor;
279 struct ifstub *result = NULL;
281 EnterCriticalSection(&m->lock);
282 LIST_FOR_EACH( cursor, &m->ifstubs )
284 struct ifstub *ifstub = LIST_ENTRY( cursor, struct ifstub, entry );
286 if (IsEqualGUID(ipid, &ifstub->ipid))
288 result = ifstub;
289 break;
292 LeaveCriticalSection(&m->lock);
294 return result;
297 struct ifstub *stub_manager_find_ifstub(struct stub_manager *m, REFIID iid, MSHLFLAGS flags)
299 struct ifstub *result = NULL;
300 struct ifstub *ifstub;
302 EnterCriticalSection(&m->lock);
303 LIST_FOR_EACH_ENTRY( ifstub, &m->ifstubs, struct ifstub, entry )
305 if (IsEqualIID(iid, &ifstub->iid) && (ifstub->flags == flags))
307 result = ifstub;
308 break;
311 LeaveCriticalSection(&m->lock);
313 return result;
316 /* gets the stub manager associated with an ipid - caller must have
317 * a reference to the apartment while a reference to the stub manager is held.
318 * it must also call release on the stub manager when it is no longer needed */
319 static struct stub_manager *get_stub_manager_from_ipid(APARTMENT *apt, const IPID *ipid)
321 struct stub_manager *result = NULL;
322 struct list *cursor;
324 EnterCriticalSection(&apt->cs);
325 LIST_FOR_EACH( cursor, &apt->stubmgrs )
327 struct stub_manager *m = LIST_ENTRY( cursor, struct stub_manager, entry );
329 if (stub_manager_ipid_to_ifstub(m, ipid))
331 result = m;
332 stub_manager_int_addref(result);
333 break;
336 LeaveCriticalSection(&apt->cs);
338 if (result)
339 TRACE("found %p for ipid %s\n", result, debugstr_guid(ipid));
340 else
341 ERR("not found for ipid %s\n", debugstr_guid(ipid));
343 return result;
346 HRESULT ipid_to_stub_manager(const IPID *ipid, APARTMENT **stub_apt, struct stub_manager **stubmgr_ret)
348 /* FIXME: hack for IRemUnknown */
349 if (ipid->Data2 == 0xffff)
350 *stub_apt = apartment_findfromoxid(*(OXID *)ipid->Data4, TRUE);
351 else
352 *stub_apt = apartment_findfromtid(ipid->Data2);
353 if (!*stub_apt)
355 TRACE("Couldn't find apartment corresponding to TID 0x%04x\n", ipid->Data2);
356 return RPC_E_INVALID_OBJECT;
358 *stubmgr_ret = get_stub_manager_from_ipid(*stub_apt, ipid);
359 if (!*stubmgr_ret)
361 apartment_release(*stub_apt);
362 *stub_apt = NULL;
363 return RPC_E_INVALID_OBJECT;
365 return S_OK;
368 /* gets the apartment, stub and channel of an object. the caller must
369 * release the references to all objects if the function returned success,
370 * otherwise no references are returned. */
371 HRESULT ipid_get_dispatch_params(const IPID *ipid, APARTMENT **stub_apt,
372 IRpcStubBuffer **stub, IRpcChannelBuffer **chan)
374 struct stub_manager *stubmgr;
375 struct ifstub *ifstub;
376 APARTMENT *apt;
377 HRESULT hr;
379 hr = ipid_to_stub_manager(ipid, &apt, &stubmgr);
380 if (hr != S_OK) return RPC_E_DISCONNECTED;
382 ifstub = stub_manager_ipid_to_ifstub(stubmgr, ipid);
383 if (ifstub)
385 *stub = ifstub->stubbuffer;
386 IRpcStubBuffer_AddRef(*stub);
387 *chan = ifstub->chan;
388 IRpcChannelBuffer_AddRef(*chan);
389 *stub_apt = apt;
391 stub_manager_int_release(stubmgr);
392 return S_OK;
394 else
396 stub_manager_int_release(stubmgr);
397 apartment_release(apt);
398 return RPC_E_DISCONNECTED;
402 /* generates an ipid in the following format (similar to native version):
403 * Data1 = apartment-local ipid counter
404 * Data2 = apartment creator thread ID
405 * Data3 = process ID
406 * Data4 = random value
408 static inline HRESULT generate_ipid(struct stub_manager *m, IPID *ipid)
410 HRESULT hr;
411 hr = UuidCreate(ipid);
412 if (FAILED(hr))
414 ERR("couldn't create IPID for stub manager %p\n", m);
415 UuidCreateNil(ipid);
416 return hr;
419 ipid->Data1 = InterlockedIncrement(&m->apt->ipidc);
420 ipid->Data2 = (USHORT)m->apt->tid;
421 ipid->Data3 = (USHORT)GetCurrentProcessId();
422 return S_OK;
425 /* registers a new interface stub COM object with the stub manager and returns registration record */
426 struct ifstub *stub_manager_new_ifstub(struct stub_manager *m, IRpcStubBuffer *sb, IUnknown *iptr, REFIID iid, MSHLFLAGS flags)
428 struct ifstub *stub;
429 HRESULT hr;
431 TRACE("oid=%s, stubbuffer=%p, iptr=%p, iid=%s\n",
432 wine_dbgstr_longlong(m->oid), sb, iptr, debugstr_guid(iid));
434 stub = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(struct ifstub));
435 if (!stub) return NULL;
437 hr = RPC_CreateServerChannel(&stub->chan);
438 if (hr != S_OK)
440 HeapFree(GetProcessHeap(), 0, stub);
441 return NULL;
444 stub->stubbuffer = sb;
445 if (sb) IRpcStubBuffer_AddRef(sb);
447 IUnknown_AddRef(iptr);
448 stub->iface = iptr;
449 stub->flags = flags;
450 stub->iid = *iid;
453 * FIXME: this is a hack for marshalling IRemUnknown. In real
454 * DCOM, the IPID of the IRemUnknown interface is generated like
455 * any other and passed to the OXID resolver which then returns it
456 * when queried. We don't have an OXID resolver yet so instead we
457 * use a magic IPID reserved for IRemUnknown.
459 if (IsEqualIID(iid, &IID_IRemUnknown))
461 stub->ipid.Data1 = 0xffffffff;
462 stub->ipid.Data2 = 0xffff;
463 stub->ipid.Data3 = 0xffff;
464 assert(sizeof(stub->ipid.Data4) == sizeof(m->apt->oxid));
465 memcpy(&stub->ipid.Data4, &m->apt->oxid, sizeof(OXID));
467 else
468 generate_ipid(m, &stub->ipid);
470 EnterCriticalSection(&m->lock);
471 list_add_head(&m->ifstubs, &stub->entry);
472 /* every normal marshal is counted so we don't allow more than we should */
473 if (flags & MSHLFLAGS_NORMAL) m->norm_refs++;
474 LeaveCriticalSection(&m->lock);
476 TRACE("ifstub %p created with ipid %s\n", stub, debugstr_guid(&stub->ipid));
478 return stub;
481 static void stub_manager_delete_ifstub(struct stub_manager *m, struct ifstub *ifstub)
483 TRACE("m=%p, m->oid=%s, ipid=%s\n", m, wine_dbgstr_longlong(m->oid), debugstr_guid(&ifstub->ipid));
485 list_remove(&ifstub->entry);
487 RPC_UnregisterInterface(&ifstub->iid);
489 if (ifstub->stubbuffer) IUnknown_Release(ifstub->stubbuffer);
490 IUnknown_Release(ifstub->iface);
491 IRpcChannelBuffer_Release(ifstub->chan);
493 HeapFree(GetProcessHeap(), 0, ifstub);
496 /* returns TRUE if it is possible to unmarshal, FALSE otherwise. */
497 BOOL stub_manager_notify_unmarshal(struct stub_manager *m, const IPID *ipid)
499 BOOL ret = TRUE;
500 struct ifstub *ifstub;
502 if (!(ifstub = stub_manager_ipid_to_ifstub(m, ipid)))
504 ERR("attempted unmarshal of unknown IPID %s\n", debugstr_guid(ipid));
505 return FALSE;
508 EnterCriticalSection(&m->lock);
510 /* track normal marshals so we can enforce rules whilst in-process */
511 if (ifstub->flags & MSHLFLAGS_NORMAL)
513 if (m->norm_refs)
514 m->norm_refs--;
515 else
517 ERR("attempted invalid normal unmarshal, norm_refs is zero\n");
518 ret = FALSE;
522 LeaveCriticalSection(&m->lock);
524 return ret;
527 /* handles refcounting for CoReleaseMarshalData */
528 void stub_manager_release_marshal_data(struct stub_manager *m, ULONG refs, const IPID *ipid)
530 struct ifstub *ifstub;
532 if (!(ifstub = stub_manager_ipid_to_ifstub(m, ipid)))
533 return;
535 if (ifstub->flags & MSHLFLAGS_TABLEWEAK)
536 refs = 0;
537 else
538 refs = 1;
540 stub_manager_ext_release(m, refs);
543 /* is an ifstub table marshaled? */
544 BOOL stub_manager_is_table_marshaled(struct stub_manager *m, const IPID *ipid)
546 struct ifstub *ifstub = stub_manager_ipid_to_ifstub(m, ipid);
548 assert( ifstub );
550 return ifstub->flags & (MSHLFLAGS_TABLESTRONG | MSHLFLAGS_TABLEWEAK);
554 /*****************************************************************************
556 * IRemUnknown implementation
559 * Note: this object is not related to the lifetime of a stub_manager, but it
560 * interacts with stub managers.
563 const IID IID_IRemUnknown = { 0x00000131, 0, 0, {0xc0, 0, 0, 0, 0, 0, 0, 0x46} };
565 typedef struct rem_unknown
567 const IRemUnknownVtbl *lpVtbl;
568 LONG refs;
569 } RemUnknown;
571 static const IRemUnknownVtbl RemUnknown_Vtbl;
574 /* construct an IRemUnknown object with one outstanding reference */
575 static HRESULT RemUnknown_Construct(IRemUnknown **ppRemUnknown)
577 RemUnknown *This = HeapAlloc(GetProcessHeap(), 0, sizeof(*This));
579 if (!This) return E_OUTOFMEMORY;
581 This->lpVtbl = &RemUnknown_Vtbl;
582 This->refs = 1;
584 *ppRemUnknown = (IRemUnknown *)This;
585 return S_OK;
588 static HRESULT WINAPI RemUnknown_QueryInterface(IRemUnknown *iface, REFIID riid, void **ppv)
590 TRACE("(%p)->(%s, %p)\n", iface, debugstr_guid(riid), ppv);
592 if (IsEqualIID(riid, &IID_IUnknown) ||
593 IsEqualIID(riid, &IID_IRemUnknown))
595 *ppv = (LPVOID)iface;
596 IRemUnknown_AddRef(iface);
597 return S_OK;
600 FIXME("No interface for iid %s\n", debugstr_guid(riid));
602 *ppv = NULL;
603 return E_NOINTERFACE;
606 static ULONG WINAPI RemUnknown_AddRef(IRemUnknown *iface)
608 ULONG refs;
609 RemUnknown *This = (RemUnknown *)iface;
611 refs = InterlockedIncrement(&This->refs);
613 TRACE("%p before: %ld\n", iface, refs-1);
614 return refs;
617 static ULONG WINAPI RemUnknown_Release(IRemUnknown *iface)
619 ULONG refs;
620 RemUnknown *This = (RemUnknown *)iface;
622 refs = InterlockedDecrement(&This->refs);
623 if (!refs)
624 HeapFree(GetProcessHeap(), 0, This);
626 TRACE("%p after: %ld\n", iface, refs);
627 return refs;
630 static HRESULT WINAPI RemUnknown_RemQueryInterface(IRemUnknown *iface,
631 REFIPID ripid, ULONG cRefs, USHORT cIids, IID *iids /* [size_is(cIids)] */,
632 REMQIRESULT **ppQIResults /* [size_is(,cIids)] */)
634 HRESULT hr;
635 USHORT i;
636 USHORT successful_qis = 0;
637 APARTMENT *apt;
638 struct stub_manager *stubmgr;
640 TRACE("(%p)->(%s, %ld, %d, %p, %p)\n", iface, debugstr_guid(ripid), cRefs, cIids, iids, ppQIResults);
642 hr = ipid_to_stub_manager(ripid, &apt, &stubmgr);
643 if (hr != S_OK) return hr;
645 *ppQIResults = CoTaskMemAlloc(sizeof(REMQIRESULT) * cIids);
647 for (i = 0; i < cIids; i++)
649 HRESULT hrobj = marshal_object(apt, &(*ppQIResults)[i].std, &iids[i],
650 stubmgr->object, MSHLFLAGS_NORMAL);
651 if (hrobj == S_OK)
652 successful_qis++;
653 (*ppQIResults)[i].hResult = hrobj;
656 stub_manager_int_release(stubmgr);
657 apartment_release(apt);
659 if (successful_qis == cIids)
660 return S_OK; /* we got all requested interfaces */
661 else if (successful_qis == 0)
662 return E_NOINTERFACE; /* we didn't get any interfaces */
663 else
664 return S_FALSE; /* we got some interfaces */
667 static HRESULT WINAPI RemUnknown_RemAddRef(IRemUnknown *iface,
668 USHORT cInterfaceRefs,
669 REMINTERFACEREF* InterfaceRefs /* [size_is(cInterfaceRefs)] */,
670 HRESULT *pResults /* [size_is(cInterfaceRefs)] */)
672 HRESULT hr = S_OK;
673 USHORT i;
675 TRACE("(%p)->(%d, %p, %p)\n", iface, cInterfaceRefs, InterfaceRefs, pResults);
677 for (i = 0; i < cInterfaceRefs; i++)
679 APARTMENT *apt;
680 struct stub_manager *stubmgr;
682 pResults[i] = ipid_to_stub_manager(&InterfaceRefs[i].ipid, &apt, &stubmgr);
683 if (pResults[i] != S_OK)
685 hr = S_FALSE;
686 continue;
689 stub_manager_ext_addref(stubmgr, InterfaceRefs[i].cPublicRefs);
690 if (InterfaceRefs[i].cPrivateRefs)
691 FIXME("Adding %ld refs securely not implemented\n", InterfaceRefs[i].cPrivateRefs);
693 stub_manager_int_release(stubmgr);
694 apartment_release(apt);
697 return hr;
700 static HRESULT WINAPI RemUnknown_RemRelease(IRemUnknown *iface,
701 USHORT cInterfaceRefs,
702 REMINTERFACEREF* InterfaceRefs /* [size_is(cInterfaceRefs)] */)
704 HRESULT hr = S_OK;
705 USHORT i;
707 TRACE("(%p)->(%d, %p)\n", iface, cInterfaceRefs, InterfaceRefs);
709 for (i = 0; i < cInterfaceRefs; i++)
711 APARTMENT *apt;
712 struct stub_manager *stubmgr;
714 hr = ipid_to_stub_manager(&InterfaceRefs[i].ipid, &apt, &stubmgr);
715 if (hr != S_OK)
717 hr = E_INVALIDARG;
718 /* FIXME: we should undo any changes already made in this function */
719 break;
722 stub_manager_ext_release(stubmgr, InterfaceRefs[i].cPublicRefs);
723 if (InterfaceRefs[i].cPrivateRefs)
724 FIXME("Releasing %ld refs securely not implemented\n", InterfaceRefs[i].cPrivateRefs);
726 stub_manager_int_release(stubmgr);
727 apartment_release(apt);
730 return hr;
733 static const IRemUnknownVtbl RemUnknown_Vtbl =
735 RemUnknown_QueryInterface,
736 RemUnknown_AddRef,
737 RemUnknown_Release,
738 RemUnknown_RemQueryInterface,
739 RemUnknown_RemAddRef,
740 RemUnknown_RemRelease
743 /* starts the IRemUnknown listener for the current apartment */
744 HRESULT start_apartment_remote_unknown()
746 IRemUnknown *pRemUnknown;
747 HRESULT hr = S_OK;
748 APARTMENT *apt = COM_CurrentApt();
750 EnterCriticalSection(&apt->cs);
751 if (!apt->remunk_exported)
753 /* create the IRemUnknown object */
754 hr = RemUnknown_Construct(&pRemUnknown);
755 if (hr == S_OK)
757 STDOBJREF stdobjref; /* dummy - not used */
758 /* register it with the stub manager */
759 hr = marshal_object(apt, &stdobjref, &IID_IRemUnknown, (IUnknown *)pRemUnknown, MSHLFLAGS_NORMAL);
760 /* release our reference to the object as the stub manager will manage the life cycle for us */
761 IRemUnknown_Release(pRemUnknown);
762 if (hr == S_OK)
763 apt->remunk_exported = TRUE;
766 LeaveCriticalSection(&apt->cs);
767 return hr;