ftmarshal.c File Reference

#include <stdlib.h>
#include <stdarg.h>
#include <stdio.h>
#include <string.h>
#include <assert.h>
#include "windef.h"
#include "winbase.h"
#include "objbase.h"
#include "wine/debug.h"
#include "compobj_private.h"

Include dependency graph for ftmarshal.c:

Go to the source code of this file.

Classes
struct	_FTMarshalImpl

Macros
#define	COBJMACROS

Typedefs
typedef struct _FTMarshalImpl	FTMarshalImpl

Functions
	WINE_DEFAULT_DEBUG_CHANNEL (ole)
static FTMarshalImpl *	impl_from_IUnknown (IUnknown *iface)
static FTMarshalImpl *	impl_from_IMarshal (IMarshal *iface)
static HRESULT WINAPI	IiFTMUnknown_fnQueryInterface (IUnknown *iface, REFIID riid, LPVOID *ppv)
static ULONG WINAPI	IiFTMUnknown_fnAddRef (IUnknown *iface)
static ULONG WINAPI	IiFTMUnknown_fnRelease (IUnknown *iface)
static HRESULT WINAPI	FTMarshalImpl_QueryInterface (LPMARSHAL iface, REFIID riid, LPVOID *ppv)
static ULONG WINAPI	FTMarshalImpl_AddRef (LPMARSHAL iface)
static ULONG WINAPI	FTMarshalImpl_Release (LPMARSHAL iface)
static HRESULT WINAPI	FTMarshalImpl_GetUnmarshalClass (LPMARSHAL iface, REFIID riid, void *pv, DWORD dwDestContext, void *pvDestContext, DWORD mshlflags, CLSID *pCid)
static HRESULT WINAPI	FTMarshalImpl_GetMarshalSizeMax (LPMARSHAL iface, REFIID riid, void *pv, DWORD dwDestContext, void *pvDestContext, DWORD mshlflags, DWORD *pSize)
static HRESULT WINAPI	FTMarshalImpl_MarshalInterface (LPMARSHAL iface, IStream *pStm, REFIID riid, void *pv, DWORD dwDestContext, void *pvDestContext, DWORD mshlflags)
static HRESULT WINAPI	FTMarshalImpl_UnmarshalInterface (LPMARSHAL iface, IStream *pStm, REFIID riid, void **ppv)
static HRESULT WINAPI	FTMarshalImpl_ReleaseMarshalData (LPMARSHAL iface, IStream *pStm)
static HRESULT WINAPI	FTMarshalImpl_DisconnectObject (LPMARSHAL iface, DWORD dwReserved)
HRESULT WINAPI	CoCreateFreeThreadedMarshaler (LPUNKNOWN punkOuter, LPUNKNOWN *ppunkMarshal)
static HRESULT WINAPI	FTMarshalCF_QueryInterface (LPCLASSFACTORY iface, REFIID riid, LPVOID *ppv)
static ULONG WINAPI	FTMarshalCF_AddRef (LPCLASSFACTORY iface)
static ULONG WINAPI	FTMarshalCF_Release (LPCLASSFACTORY iface)
static HRESULT WINAPI	FTMarshalCF_CreateInstance (LPCLASSFACTORY iface, LPUNKNOWN pUnk, REFIID riid, LPVOID *ppv)
static HRESULT WINAPI	FTMarshalCF_LockServer (LPCLASSFACTORY iface, BOOL fLock)
HRESULT	FTMarshalCF_Create (REFIID riid, LPVOID *ppv)

Variables
static const IUnknownVtbl	iunkvt
static const IMarshalVtbl	ftmvtbl
static const IClassFactoryVtbl	FTMarshalCFVtbl
static const IClassFactoryVtbl *	FTMarshalCF = &FTMarshalCFVtbl

Macro Definition Documentation

COBJMACROS

#define COBJMACROS

Definition at line 27 of file ftmarshal.c.

Typedef Documentation

FTMarshalImpl

typedef struct _FTMarshalImpl FTMarshalImpl

Function Documentation

CoCreateFreeThreadedMarshaler()

HRESULT WINAPI CoCreateFreeThreadedMarshaler	(	LPUNKNOWN	punkOuter,
		LPUNKNOWN *	ppunkMarshal
	)

Definition at line 331 of file ftmarshal.c.

{
 
    FTMarshalImpl *ftm;
 
    TRACE ("(%p %p)\n", punkOuter, ppunkMarshal);
 
    ftm = HeapAlloc (GetProcessHeap (), 0, sizeof (FTMarshalImpl));
    if (!ftm)
    return E_OUTOFMEMORY;
 
    ftm->IUnknown_inner.lpVtbl = &iunkvt;
    ftm->IMarshal_iface.lpVtbl = &ftmvtbl;
    ftm->ref = 1;
    ftm->outer_unk = punkOuter ? punkOuter : &ftm->IUnknown_inner;
 
    *ppunkMarshal = &ftm->IUnknown_inner;
    return S_OK;
}

Referenced by FTMarshalCF_CreateInstance(), and test_freethreadedmarshaler().

FTMarshalCF_AddRef()

static ULONG WINAPI FTMarshalCF_AddRef ( LPCLASSFACTORY  iface )

static

Definition at line 364 of file ftmarshal.c.

{
    return 2; /* non-heap based object */
}

FTMarshalCF_Create()

HRESULT FTMarshalCF_Create	(	REFIID	riid,
		LPVOID *	ppv
	)

Definition at line 411 of file ftmarshal.c.

{
    return IClassFactory_QueryInterface((IClassFactory *)&FTMarshalCF, riid, ppv);
}

Referenced by CoGetClassObject().

FTMarshalCF_CreateInstance()

static HRESULT WINAPI FTMarshalCF_CreateInstance ( LPCLASSFACTORY  iface, LPUNKNOWN  pUnk, REFIID  riid, LPVOID *  ppv  )

static

Definition at line 374 of file ftmarshal.c.

{
    IUnknown *pUnknown;
    HRESULT  hr;
 
    TRACE("(%p, %s, %p)\n", pUnk, debugstr_guid(riid), ppv);
 
    *ppv = NULL;
 
    hr = CoCreateFreeThreadedMarshaler(pUnk, &pUnknown);
 
    if (SUCCEEDED(hr))
    {
        hr = IUnknown_QueryInterface(pUnknown, riid, ppv);
        IUnknown_Release(pUnknown);
    }
 
    return hr;
}

FTMarshalCF_LockServer()

static HRESULT WINAPI FTMarshalCF_LockServer ( LPCLASSFACTORY  iface, BOOL  fLock  )

static

Definition at line 395 of file ftmarshal.c.

{
    FIXME("(%d), stub!\n",fLock);
    return S_OK;
}

FTMarshalCF_QueryInterface()

static HRESULT WINAPI FTMarshalCF_QueryInterface ( LPCLASSFACTORY  iface, REFIID  riid, LPVOID *  ppv  )

static

Definition at line 351 of file ftmarshal.c.

{
    *ppv = NULL;
    if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IClassFactory))
    {
        *ppv = iface;
        IClassFactory_AddRef(iface);
        return S_OK;
    }
    return E_NOINTERFACE;
}

FTMarshalCF_Release()

static ULONG WINAPI FTMarshalCF_Release ( LPCLASSFACTORY  iface )

static

Definition at line 369 of file ftmarshal.c.

{
    return 1; /* non-heap based object */
}

FTMarshalImpl_AddRef()

static ULONG WINAPI FTMarshalImpl_AddRef ( LPMARSHAL  iface )

static

Definition at line 117 of file ftmarshal.c.

{
 
    FTMarshalImpl *This = impl_from_IMarshal(iface);
 
    TRACE ("\n");
    return IUnknown_AddRef(This->outer_unk);
}

FTMarshalImpl_DisconnectObject()

static HRESULT WINAPI FTMarshalImpl_DisconnectObject ( LPMARSHAL  iface, DWORD  dwReserved  )

static

Definition at line 290 of file ftmarshal.c.

{
    TRACE ("()\n");
    /* nothing to do */
    return S_OK;
}

FTMarshalImpl_GetMarshalSizeMax()

static HRESULT WINAPI FTMarshalImpl_GetMarshalSizeMax ( LPMARSHAL  iface, REFIID  riid, void *  pv, DWORD  dwDestContext, void *  pvDestContext, DWORD  mshlflags, DWORD *  pSize  )

static

Definition at line 150 of file ftmarshal.c.

{
 
    IMarshal *pMarshal = NULL;
    HRESULT hres;
 
    TRACE("(%s, %p, 0x%x, %p, 0x%x, %p)\n", debugstr_guid(riid), pv,
        dwDestContext, pvDestContext, mshlflags, pSize);
 
    /* if the marshalling happens inside the same process the interface pointer is
       copied between the apartments */
    if (dwDestContext == MSHCTX_INPROC || dwDestContext == MSHCTX_CROSSCTX) {
        *pSize = sizeof (mshlflags) + sizeof (pv) + sizeof (DWORD) + sizeof (GUID);
        return S_OK;
    }
 
    /* use the standard marshaller to handle all other cases */
    CoGetStandardMarshal (riid, pv, dwDestContext, pvDestContext, mshlflags, &pMarshal);
    hres = IMarshal_GetMarshalSizeMax (pMarshal, riid, pv, dwDestContext, pvDestContext, mshlflags, pSize);
    IMarshal_Release (pMarshal);
    return hres;
}

FTMarshalImpl_GetUnmarshalClass()

static HRESULT WINAPI FTMarshalImpl_GetUnmarshalClass ( LPMARSHAL  iface, REFIID  riid, void *  pv, DWORD  dwDestContext, void *  pvDestContext, DWORD  mshlflags, CLSID *  pCid  )

static

Definition at line 137 of file ftmarshal.c.

{
    TRACE("(%s, %p, 0x%x, %p, 0x%x, %p)\n", debugstr_guid(riid), pv,
        dwDestContext, pvDestContext, mshlflags, pCid);
    if (dwDestContext == MSHCTX_INPROC || dwDestContext == MSHCTX_CROSSCTX)
        *pCid = CLSID_InProcFreeMarshaler;
    else
        *pCid = CLSID_StdMarshal;
    return S_OK;
}

FTMarshalImpl_MarshalInterface()

static HRESULT WINAPI FTMarshalImpl_MarshalInterface ( LPMARSHAL  iface, IStream *  pStm, REFIID  riid, void *  pv, DWORD  dwDestContext, void *  pvDestContext, DWORD  mshlflags  )

static

Definition at line 175 of file ftmarshal.c.

{
 
    IMarshal *pMarshal = NULL;
    HRESULT hres;
 
    TRACE("(%p, %s, %p, 0x%x, %p, 0x%x)\n", pStm, debugstr_guid(riid), pv,
        dwDestContext, pvDestContext, mshlflags);
 
    /* if the marshalling happens inside the same process the interface pointer is
       copied between the apartments */
    if (dwDestContext == MSHCTX_INPROC || dwDestContext == MSHCTX_CROSSCTX) {
        void *object;
        DWORD constant = 0;
        GUID unknown_guid = { 0 };
 
        hres = IUnknown_QueryInterface((IUnknown *)pv, riid, &object);
        if (FAILED(hres))
            return hres;
 
        /* don't hold a reference to table-weak marshaled interfaces */
        if (mshlflags & MSHLFLAGS_TABLEWEAK)
            IUnknown_Release((IUnknown *)object);
 
        hres = IStream_Write (pStm, &mshlflags, sizeof (mshlflags), NULL);
        if (hres != S_OK) return STG_E_MEDIUMFULL;
 
        hres = IStream_Write (pStm, &object, sizeof (object), NULL);
        if (hres != S_OK) return STG_E_MEDIUMFULL;
 
        if (sizeof(object) == sizeof(DWORD))
        {
            hres = IStream_Write (pStm, &constant, sizeof (constant), NULL);
            if (hres != S_OK) return STG_E_MEDIUMFULL;
        }
 
        hres = IStream_Write (pStm, &unknown_guid, sizeof (unknown_guid), NULL);
        if (hres != S_OK) return STG_E_MEDIUMFULL;
 
        return S_OK;
    }
 
    /* use the standard marshaler to handle all other cases */
    CoGetStandardMarshal (riid, pv, dwDestContext, pvDestContext, mshlflags, &pMarshal);
    hres = IMarshal_MarshalInterface (pMarshal, pStm, riid, pv, dwDestContext, pvDestContext, mshlflags);
    IMarshal_Release (pMarshal);
    return hres;
}

FTMarshalImpl_QueryInterface()

static HRESULT WINAPI FTMarshalImpl_QueryInterface ( LPMARSHAL  iface, REFIID  riid, LPVOID *  ppv  )

static

Definition at line 107 of file ftmarshal.c.

{
 
    FTMarshalImpl *This = impl_from_IMarshal(iface);
 
    TRACE ("(%p)->(%s,%p)\n", This, debugstr_guid (riid), ppv);
    return IUnknown_QueryInterface(This->outer_unk, riid, ppv);
}

FTMarshalImpl_Release()

static ULONG WINAPI FTMarshalImpl_Release ( LPMARSHAL  iface )

static

Definition at line 127 of file ftmarshal.c.

{
 
    FTMarshalImpl *This = impl_from_IMarshal(iface);
 
    TRACE ("\n");
    return IUnknown_Release(This->outer_unk);
}

FTMarshalImpl_ReleaseMarshalData()

static HRESULT WINAPI FTMarshalImpl_ReleaseMarshalData ( LPMARSHAL  iface, IStream *  pStm  )

static

Definition at line 259 of file ftmarshal.c.

{
    DWORD mshlflags;
    IUnknown *object;
    DWORD constant;
    GUID unknown_guid;
    HRESULT hres;
 
    TRACE ("(%p)\n", pStm);
 
    hres = IStream_Read (pStm, &mshlflags, sizeof (mshlflags), NULL);
    if (hres != S_OK) return STG_E_READFAULT;
 
    hres = IStream_Read (pStm, &object, sizeof (object), NULL);
    if (hres != S_OK) return STG_E_READFAULT;
 
    if (sizeof(object) == sizeof(DWORD))
    {
        hres = IStream_Read (pStm, &constant, sizeof (constant), NULL);
        if (hres != S_OK) return STG_E_READFAULT;
        if (constant != 0)
            FIXME("constant is 0x%x instead of 0\n", constant);
    }
 
    hres = IStream_Read (pStm, &unknown_guid, sizeof (unknown_guid), NULL);
    if (hres != S_OK) return STG_E_READFAULT;
 
    IUnknown_Release(object);
    return S_OK;
}

FTMarshalImpl_UnmarshalInterface()

static HRESULT WINAPI FTMarshalImpl_UnmarshalInterface ( LPMARSHAL  iface, IStream *  pStm, REFIID  riid, void **  ppv  )

static

Definition at line 226 of file ftmarshal.c.

{
    DWORD mshlflags;
    IUnknown *object;
    DWORD constant;
    GUID unknown_guid;
    HRESULT hres;
 
    TRACE ("(%p, %s, %p)\n", pStm, debugstr_guid(riid), ppv);
 
    hres = IStream_Read (pStm, &mshlflags, sizeof (mshlflags), NULL);
    if (hres != S_OK) return STG_E_READFAULT;
 
    hres = IStream_Read (pStm, &object, sizeof (object), NULL);
    if (hres != S_OK) return STG_E_READFAULT;
 
    if (sizeof(object) == sizeof(DWORD))
    {
        hres = IStream_Read (pStm, &constant, sizeof (constant), NULL);
        if (hres != S_OK) return STG_E_READFAULT;
        if (constant != 0)
            FIXME("constant is 0x%x instead of 0\n", constant);
    }
 
    hres = IStream_Read (pStm, &unknown_guid, sizeof (unknown_guid), NULL);
    if (hres != S_OK) return STG_E_READFAULT;
 
    hres = IUnknown_QueryInterface(object, riid, ppv);
    if (!(mshlflags & (MSHLFLAGS_TABLEWEAK|MSHLFLAGS_TABLESTRONG)))
        IUnknown_Release(object);
    return hres;
}

IiFTMUnknown_fnAddRef()

static ULONG WINAPI IiFTMUnknown_fnAddRef ( IUnknown *  iface )

static

Definition at line 78 of file ftmarshal.c.

{
 
    FTMarshalImpl *This = impl_from_IUnknown(iface);
 
    TRACE ("\n");
    return InterlockedIncrement (&This->ref);
}

IiFTMUnknown_fnQueryInterface()

static HRESULT WINAPI IiFTMUnknown_fnQueryInterface ( IUnknown *  iface, REFIID  riid, LPVOID *  ppv  )

static

Definition at line 58 of file ftmarshal.c.

{
 
    FTMarshalImpl *This = impl_from_IUnknown(iface);
 
    TRACE ("\n");
    *ppv = NULL;
 
    if (IsEqualIID (&IID_IUnknown, riid))
        *ppv = &This->IUnknown_inner;
    else if (IsEqualIID (&IID_IMarshal, riid))
        *ppv = &This->IMarshal_iface;
    else {
    FIXME ("No interface for %s.\n", debugstr_guid (riid));
    return E_NOINTERFACE;
    }
    IUnknown_AddRef ((IUnknown *) * ppv);
    return S_OK;
}

IiFTMUnknown_fnRelease()

static ULONG WINAPI IiFTMUnknown_fnRelease ( IUnknown *  iface )

static

Definition at line 87 of file ftmarshal.c.

{
 
    FTMarshalImpl *This = impl_from_IUnknown(iface);
 
    TRACE ("\n");
    if (InterlockedDecrement (&This->ref))
    return This->ref;
    HeapFree (GetProcessHeap (), 0, This);
    return 0;
}

impl_from_IMarshal()

static FTMarshalImpl * impl_from_IMarshal ( IMarshal *  iface )

inlinestatic

Definition at line 51 of file ftmarshal.c.

{
    return CONTAINING_RECORD(iface, FTMarshalImpl, IMarshal_iface);
}

Referenced by FTMarshalImpl_AddRef(), FTMarshalImpl_QueryInterface(), and FTMarshalImpl_Release().

impl_from_IUnknown()

static FTMarshalImpl * impl_from_IUnknown ( IUnknown *  iface )

inlinestatic

Definition at line 46 of file ftmarshal.c.

{
    return CONTAINING_RECORD(iface, FTMarshalImpl, IUnknown_inner);
}

Referenced by IiFTMUnknown_fnAddRef(), IiFTMUnknown_fnQueryInterface(), and IiFTMUnknown_fnRelease().

WINE_DEFAULT_DEBUG_CHANNEL()

WINE_DEFAULT_DEBUG_CHANNEL

(

ole

)

Variable Documentation

FTMarshalCF

const IClassFactoryVtbl* FTMarshalCF = &FTMarshalCFVtbl

static

Definition at line 409 of file ftmarshal.c.

Referenced by FTMarshalCF_Create().

FTMarshalCFVtbl

const IClassFactoryVtbl FTMarshalCFVtbl

static

Initial value:

=
{
    FTMarshalCF_QueryInterface,
    FTMarshalCF_AddRef,
    FTMarshalCF_Release,
    FTMarshalCF_CreateInstance,
    FTMarshalCF_LockServer
}

Definition at line 401 of file ftmarshal.c.

ftmvtbl

const IMarshalVtbl ftmvtbl

static

Initial value:

=
{
    FTMarshalImpl_QueryInterface,
    FTMarshalImpl_AddRef,
    FTMarshalImpl_Release,
    FTMarshalImpl_GetUnmarshalClass,
    FTMarshalImpl_GetMarshalSizeMax,
    FTMarshalImpl_MarshalInterface,
    FTMarshalImpl_UnmarshalInterface,
    FTMarshalImpl_ReleaseMarshalData,
    FTMarshalImpl_DisconnectObject
}

Definition at line 297 of file ftmarshal.c.

Referenced by CoCreateFreeThreadedMarshaler().

iunkvt

const IUnknownVtbl iunkvt

static

Initial value:

=
{
    IiFTMUnknown_fnQueryInterface,
    IiFTMUnknown_fnAddRef,
    IiFTMUnknown_fnRelease
}

Definition at line 99 of file ftmarshal.c.

Referenced by CoCreateFreeThreadedMarshaler().