alt: Host component implementation: IOleClientSite.
This commit is contained in:
Andrey Turkin
Alexandre Julliard
parent
fff2d8e82b
commit
e1d94f3633
|
|
@ -41,6 +41,15 @@
|
||||||
|
|
||||||
WINE_DEFAULT_DEBUG_CHANNEL(atl);
|
WINE_DEFAULT_DEBUG_CHANNEL(atl);
|
||||||
|
|
||||||
|
typedef struct IOCS {
|
||||||
|
const IOleClientSiteVtbl *lpOleClientSiteVtbl;
|
||||||
|
|
||||||
|
LONG ref;
|
||||||
|
HWND hWnd;
|
||||||
|
IOleObject *control;
|
||||||
|
WNDPROC OrigWndProc;
|
||||||
|
} IOCS;
|
||||||
|
|
||||||
/**********************************************************************
|
/**********************************************************************
|
||||||
* AtlAxWin class window procedure
|
* AtlAxWin class window procedure
|
||||||
*/
|
*/
|
||||||
|
|
@ -98,6 +107,249 @@ BOOL WINAPI AtlAxWinInit(void)
|
||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/***********************************************************************
|
||||||
|
* Atl container component implementation
|
||||||
|
*/
|
||||||
|
|
||||||
|
|
||||||
|
static ULONG WINAPI IOCS_AddRef(IOCS *This)
|
||||||
|
{
|
||||||
|
ULONG ref = InterlockedIncrement(&This->ref);
|
||||||
|
|
||||||
|
TRACE( "(%p) : AddRef from %d\n", This, ref - 1 );
|
||||||
|
|
||||||
|
return ref;
|
||||||
|
}
|
||||||
|
|
||||||
|
#define THIS2IOLECLIENTSITE(This) ((IOleClientSite*)&This->lpOleClientSiteVtbl)
|
||||||
|
|
||||||
|
static HRESULT WINAPI IOCS_QueryInterface(IOCS *This, REFIID riid, void **ppv)
|
||||||
|
{
|
||||||
|
*ppv = NULL;
|
||||||
|
|
||||||
|
if ( IsEqualIID( &IID_IUnknown, riid )
|
||||||
|
|| IsEqualIID( &IID_IOleClientSite, riid ) )
|
||||||
|
{
|
||||||
|
*ppv = THIS2IOLECLIENTSITE(This);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (*ppv)
|
||||||
|
{
|
||||||
|
IOCS_AddRef( This );
|
||||||
|
return S_OK;
|
||||||
|
}
|
||||||
|
|
||||||
|
WARN("unsupported interface %s\n", debugstr_guid( riid ) );
|
||||||
|
*ppv = NULL;
|
||||||
|
return E_NOINTERFACE;
|
||||||
|
}
|
||||||
|
|
||||||
|
static HRESULT IOCS_Detach( IOCS *This );
|
||||||
|
static ULONG WINAPI IOCS_Release(IOCS *This)
|
||||||
|
{
|
||||||
|
ULONG ref = InterlockedDecrement(&This->ref);
|
||||||
|
|
||||||
|
TRACE( "(%p) : ReleaseRef to %d\n", This, ref );
|
||||||
|
|
||||||
|
if (!ref)
|
||||||
|
{
|
||||||
|
IOCS_Detach( This );
|
||||||
|
HeapFree( GetProcessHeap(), 0, This );
|
||||||
|
}
|
||||||
|
|
||||||
|
return ref;
|
||||||
|
}
|
||||||
|
|
||||||
|
#define DEFINE_THIS(cls,ifc,iface) ((cls*)((BYTE*)(iface)-offsetof(cls,lp ## ifc ## Vtbl)))
|
||||||
|
|
||||||
|
#undef IFACE2THIS
|
||||||
|
#define IFACE2THIS(iface) DEFINE_THIS(IOCS,OleClientSite, iface)
|
||||||
|
static HRESULT WINAPI OleClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
|
||||||
|
{
|
||||||
|
IOCS *This = IFACE2THIS(iface);
|
||||||
|
return IOCS_QueryInterface(This, riid, ppv);
|
||||||
|
}
|
||||||
|
static ULONG WINAPI OleClientSite_AddRef(IOleClientSite *iface)
|
||||||
|
{
|
||||||
|
IOCS *This = IFACE2THIS(iface);
|
||||||
|
return IOCS_AddRef(This);
|
||||||
|
}
|
||||||
|
static ULONG WINAPI OleClientSite_Release(IOleClientSite *iface)
|
||||||
|
{
|
||||||
|
IOCS *This = IFACE2THIS(iface);
|
||||||
|
return IOCS_Release(This);
|
||||||
|
}
|
||||||
|
static HRESULT WINAPI OleClientSite_SaveObject(IOleClientSite *iface)
|
||||||
|
{
|
||||||
|
IOCS *This = IFACE2THIS(iface);
|
||||||
|
FIXME( "(%p) - stub\n", This );
|
||||||
|
return E_NOTIMPL;
|
||||||
|
}
|
||||||
|
static HRESULT WINAPI OleClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker, IMoniker **ppmk)
|
||||||
|
{
|
||||||
|
IOCS *This = IFACE2THIS(iface);
|
||||||
|
|
||||||
|
FIXME( "(%p, 0x%x, 0x%x, %p)\n", This, dwAssign, dwWhichMoniker, ppmk );
|
||||||
|
return E_NOTIMPL;
|
||||||
|
}
|
||||||
|
static HRESULT WINAPI OleClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
|
||||||
|
{
|
||||||
|
IOCS *This = IFACE2THIS(iface);
|
||||||
|
FIXME( "(%p, %p)\n", This, ppContainer );
|
||||||
|
return E_NOTIMPL;
|
||||||
|
}
|
||||||
|
static HRESULT WINAPI OleClientSite_ShowObject(IOleClientSite *iface)
|
||||||
|
{
|
||||||
|
IOCS *This = IFACE2THIS(iface);
|
||||||
|
FIXME( "(%p) - stub\n", This );
|
||||||
|
return S_OK;
|
||||||
|
}
|
||||||
|
static HRESULT WINAPI OleClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
|
||||||
|
{
|
||||||
|
IOCS *This = IFACE2THIS(iface);
|
||||||
|
FIXME( "(%p, %s) - stub\n", This, fShow ? "TRUE" : "FALSE" );
|
||||||
|
return E_NOTIMPL;
|
||||||
|
}
|
||||||
|
static HRESULT WINAPI OleClientSite_RequestNewObjectLayout(IOleClientSite *iface)
|
||||||
|
{
|
||||||
|
IOCS *This = IFACE2THIS(iface);
|
||||||
|
FIXME( "(%p) - stub\n", This );
|
||||||
|
return E_NOTIMPL;
|
||||||
|
}
|
||||||
|
#undef IFACE2THIS
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
static const IOleClientSiteVtbl OleClientSite_vtbl = {
|
||||||
|
OleClientSite_QueryInterface,
|
||||||
|
OleClientSite_AddRef,
|
||||||
|
OleClientSite_Release,
|
||||||
|
OleClientSite_SaveObject,
|
||||||
|
OleClientSite_GetMoniker,
|
||||||
|
OleClientSite_GetContainer,
|
||||||
|
OleClientSite_ShowObject,
|
||||||
|
OleClientSite_OnShowWindow,
|
||||||
|
OleClientSite_RequestNewObjectLayout
|
||||||
|
};
|
||||||
|
|
||||||
|
static HRESULT IOCS_Detach( IOCS *This ) /* remove subclassing */
|
||||||
|
{
|
||||||
|
if ( This->hWnd )
|
||||||
|
{
|
||||||
|
SetWindowLongPtrW( This->hWnd, GWLP_WNDPROC, (ULONG_PTR) This->OrigWndProc );
|
||||||
|
SetWindowLongPtrW( This->hWnd, GWLP_USERDATA, (LONG_PTR) NULL );
|
||||||
|
This->hWnd = NULL;
|
||||||
|
}
|
||||||
|
if ( This->control )
|
||||||
|
{
|
||||||
|
IOleObject *control = This->control;
|
||||||
|
|
||||||
|
This->control = NULL;
|
||||||
|
IOleObject_SetClientSite( control, NULL );
|
||||||
|
IOleObject_Release( control );
|
||||||
|
}
|
||||||
|
return S_OK;
|
||||||
|
}
|
||||||
|
|
||||||
|
static void IOCS_OnSize( IOCS* This, LPCRECT rect )
|
||||||
|
{
|
||||||
|
SIZEL inPix, inHi;
|
||||||
|
|
||||||
|
if ( !This->control )
|
||||||
|
return;
|
||||||
|
|
||||||
|
inPix.cx = rect->right - rect->left;
|
||||||
|
inPix.cy = rect->bottom - rect->top;
|
||||||
|
AtlPixelToHiMetric( &inPix, &inHi );
|
||||||
|
IOleObject_SetExtent( This->control, DVASPECT_CONTENT, &inHi );
|
||||||
|
}
|
||||||
|
|
||||||
|
static LRESULT IOCS_OnWndProc( IOCS *This, HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam )
|
||||||
|
{
|
||||||
|
WNDPROC OrigWndProc = This->OrigWndProc;
|
||||||
|
|
||||||
|
switch( uMsg )
|
||||||
|
{
|
||||||
|
case WM_DESTROY:
|
||||||
|
IOCS_Detach( This );
|
||||||
|
break;
|
||||||
|
case WM_SIZE:
|
||||||
|
{
|
||||||
|
RECT r;
|
||||||
|
r.left = r.top = 0;
|
||||||
|
r.right = LOWORD( lParam );
|
||||||
|
r.bottom = HIWORD( lParam );
|
||||||
|
IOCS_OnSize( This, &r );
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
|
||||||
|
return OrigWndProc( hWnd, uMsg, wParam, lParam );
|
||||||
|
}
|
||||||
|
|
||||||
|
static LRESULT CALLBACK AtlHost_wndproc( HWND hWnd, UINT wMsg, WPARAM wParam, LPARAM lParam )
|
||||||
|
{
|
||||||
|
IOCS *This = (IOCS*) GetWindowLongPtrW( hWnd, GWLP_USERDATA );
|
||||||
|
return IOCS_OnWndProc( This, hWnd, wMsg, wParam, lParam );
|
||||||
|
}
|
||||||
|
|
||||||
|
static HRESULT IOCS_Attach( IOCS *This, HWND hWnd, IUnknown *pUnkControl ) /* subclass hWnd */
|
||||||
|
{
|
||||||
|
This->hWnd = hWnd;
|
||||||
|
IUnknown_QueryInterface( pUnkControl, &IID_IOleObject, (void**)&This->control );
|
||||||
|
IOleObject_SetClientSite( This->control, THIS2IOLECLIENTSITE( This ) );
|
||||||
|
This->OrigWndProc = (WNDPROC) GetWindowLongPtrW( This->hWnd, GWLP_WNDPROC );
|
||||||
|
SetWindowLongPtrW( hWnd, GWLP_USERDATA, (ULONG_PTR) This );
|
||||||
|
SetWindowLongPtrW( hWnd, GWLP_WNDPROC, (ULONG_PTR) AtlHost_wndproc );
|
||||||
|
|
||||||
|
return S_OK;
|
||||||
|
}
|
||||||
|
|
||||||
|
static HRESULT IOCS_Init( IOCS *This )
|
||||||
|
{
|
||||||
|
RECT rect;
|
||||||
|
static const WCHAR AXWIN[] = {'A','X','W','I','N',0};
|
||||||
|
|
||||||
|
IOleObject_SetHostNames( This->control, AXWIN, AXWIN );
|
||||||
|
|
||||||
|
GetClientRect( This->hWnd, &rect );
|
||||||
|
IOCS_OnSize( This, &rect );
|
||||||
|
|
||||||
|
return S_OK;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**********************************************************************
|
||||||
|
* Create new instance of Atl host component and attach it to window *
|
||||||
|
*/
|
||||||
|
static HRESULT IOCS_Create( HWND hWnd, IUnknown *pUnkControl, IOCS **ppSite )
|
||||||
|
{
|
||||||
|
HRESULT hr;
|
||||||
|
IOCS *This;
|
||||||
|
|
||||||
|
*ppSite = NULL;
|
||||||
|
This = HeapAlloc(GetProcessHeap(), 0, sizeof(IOCS));
|
||||||
|
|
||||||
|
if (!This)
|
||||||
|
return E_OUTOFMEMORY;
|
||||||
|
|
||||||
|
This->lpOleClientSiteVtbl = &OleClientSite_vtbl;
|
||||||
|
This->ref = 1;
|
||||||
|
|
||||||
|
This->OrigWndProc = NULL;
|
||||||
|
This->hWnd = NULL;
|
||||||
|
|
||||||
|
hr = IOCS_Attach( This, hWnd, pUnkControl );
|
||||||
|
if ( SUCCEEDED( hr ) )
|
||||||
|
hr = IOCS_Init( This );
|
||||||
|
if ( SUCCEEDED( hr ) )
|
||||||
|
*ppSite = This;
|
||||||
|
else
|
||||||
|
IOCS_Release( This );
|
||||||
|
|
||||||
|
return hr;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
/***********************************************************************
|
/***********************************************************************
|
||||||
* AtlAxCreateControl [ATL.@]
|
* AtlAxCreateControl [ATL.@]
|
||||||
*/
|
*/
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue