1307 lines
38 KiB
C
1307 lines
38 KiB
C
/*
|
|
* Active Template Library ActiveX functions (atl.dll)
|
|
*
|
|
* Copyright 2006 Andrey Turkin
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
*/
|
|
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
|
|
#define COBJMACROS
|
|
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "winerror.h"
|
|
#include "winuser.h"
|
|
#include "wine/debug.h"
|
|
#include "objbase.h"
|
|
#include "objidl.h"
|
|
#include "ole2.h"
|
|
#include "exdisp.h"
|
|
#include "atlbase.h"
|
|
#include "atliface.h"
|
|
#include "atlwin.h"
|
|
|
|
#include "wine/unicode.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(atl);
|
|
|
|
typedef struct IOCS {
|
|
const IOleClientSiteVtbl *lpOleClientSiteVtbl;
|
|
const IOleContainerVtbl *lpOleContainerVtbl;
|
|
const IOleInPlaceSiteWindowlessVtbl *lpOleInPlaceSiteWindowlessVtbl;
|
|
const IOleInPlaceFrameVtbl *lpOleInPlaceFrameVtbl;
|
|
const IOleControlSiteVtbl *lpOleControlSiteVtbl;
|
|
|
|
LONG ref;
|
|
HWND hWnd;
|
|
IOleObject *control;
|
|
RECT size;
|
|
WNDPROC OrigWndProc;
|
|
BOOL fActive, fInPlace, fWindowless;
|
|
} IOCS;
|
|
|
|
/**********************************************************************
|
|
* AtlAxWin class window procedure
|
|
*/
|
|
static LRESULT CALLBACK AtlAxWin_wndproc( HWND hWnd, UINT wMsg, WPARAM wParam, LPARAM lParam )
|
|
{
|
|
if ( wMsg == WM_CREATE )
|
|
{
|
|
DWORD len = GetWindowTextLengthW( hWnd ) + 1;
|
|
WCHAR *ptr = HeapAlloc( GetProcessHeap(), 0, len*sizeof(WCHAR) );
|
|
if (!ptr)
|
|
return 1;
|
|
GetWindowTextW( hWnd, ptr, len );
|
|
AtlAxCreateControlEx( ptr, hWnd, NULL, NULL, NULL, NULL, NULL );
|
|
HeapFree( GetProcessHeap(), 0, ptr );
|
|
return 0;
|
|
}
|
|
return DefWindowProcW( hWnd, wMsg, wParam, lParam );
|
|
}
|
|
|
|
/***********************************************************************
|
|
* AtlAxWinInit [ATL.@]
|
|
* Initializes the control-hosting code: registering the AtlAxWin,
|
|
* AtlAxWin7 and AtlAxWinLic7 window classes and some messages.
|
|
*
|
|
* RETURNS
|
|
* TRUE or FALSE
|
|
*/
|
|
|
|
BOOL WINAPI AtlAxWinInit(void)
|
|
{
|
|
WNDCLASSEXW wcex;
|
|
const WCHAR AtlAxWin[] = {'A','t','l','A','x','W','i','n',0};
|
|
|
|
FIXME("semi-stub\n");
|
|
|
|
if ( FAILED( OleInitialize(NULL) ) )
|
|
return FALSE;
|
|
|
|
wcex.cbSize = sizeof(wcex);
|
|
wcex.style = 0;
|
|
wcex.cbClsExtra = 0;
|
|
wcex.cbWndExtra = 0;
|
|
wcex.hInstance = GetModuleHandleW( NULL );
|
|
wcex.hIcon = NULL;
|
|
wcex.hCursor = NULL;
|
|
wcex.hbrBackground = NULL;
|
|
wcex.lpszMenuName = NULL;
|
|
wcex.hIconSm = 0;
|
|
|
|
wcex.lpfnWndProc = AtlAxWin_wndproc;
|
|
wcex.lpszClassName = AtlAxWin;
|
|
if ( !RegisterClassExW( &wcex ) )
|
|
return FALSE;
|
|
|
|
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)
|
|
#define THIS2IOLECONTAINER(This) ((IOleContainer*)&This->lpOleContainerVtbl)
|
|
#define THIS2IOLEINPLACESITEWINDOWLESS(This) ((IOleInPlaceSiteWindowless*)&This->lpOleInPlaceSiteWindowlessVtbl)
|
|
#define THIS2IOLEINPLACEFRAME(This) ((IOleInPlaceFrame*)&This->lpOleInPlaceFrameVtbl)
|
|
#define THIS2IOLECONTROLSITE(This) ((IOleControlSite*)&This->lpOleControlSiteVtbl)
|
|
|
|
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);
|
|
} else if ( IsEqualIID( &IID_IOleContainer, riid ) )
|
|
{
|
|
*ppv = THIS2IOLECONTAINER(This);
|
|
} else if ( IsEqualIID( &IID_IOleInPlaceSite, riid ) || IsEqualIID( &IID_IOleInPlaceSiteEx, riid ) || IsEqualIID( &IID_IOleInPlaceSiteWindowless, riid ) )
|
|
{
|
|
*ppv = THIS2IOLEINPLACESITEWINDOWLESS(This);
|
|
} else if ( IsEqualIID( &IID_IOleInPlaceFrame, riid ) )
|
|
{
|
|
*ppv = THIS2IOLEINPLACEFRAME(This);
|
|
} else if ( IsEqualIID( &IID_IOleControlSite, riid ) )
|
|
{
|
|
*ppv = THIS2IOLECONTROLSITE(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)))
|
|
|
|
/****** IOleClientSite *****/
|
|
#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);
|
|
TRACE( "(%p, %p)\n", This, ppContainer );
|
|
return OleClientSite_QueryInterface( iface, &IID_IOleContainer, (void**)ppContainer );
|
|
}
|
|
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
|
|
|
|
|
|
/****** IOleContainer *****/
|
|
#define IFACE2THIS(iface) DEFINE_THIS(IOCS, OleContainer, iface)
|
|
static HRESULT WINAPI OleContainer_QueryInterface( IOleContainer* iface, REFIID riid, void** ppv)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_QueryInterface( This, riid, ppv );
|
|
}
|
|
static ULONG WINAPI OleContainer_AddRef(IOleContainer* iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_AddRef(This);
|
|
}
|
|
static ULONG WINAPI OleContainer_Release(IOleContainer* iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_Release(This);
|
|
}
|
|
static HRESULT WINAPI OleContainer_ParseDisplayName(IOleContainer* iface, IBindCtx* pbc,
|
|
LPOLESTR pszDisplayName, ULONG* pchEaten, IMoniker** ppmkOut)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
FIXME( "(%p,%p,%s,%p,%p) - stub\n", This, pbc, debugstr_w(pszDisplayName), pchEaten, ppmkOut );
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleContainer_EnumObjects(IOleContainer* iface, DWORD grfFlags, IEnumUnknown** ppenum)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
FIXME( "(%p, %u, %p) - stub\n", This, grfFlags, ppenum );
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleContainer_LockContainer(IOleContainer* iface, BOOL fLock)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
FIXME( "(%p, %s) - stub\n", This, fLock?"TRUE":"FALSE" );
|
|
return E_NOTIMPL;
|
|
}
|
|
#undef IFACE2THIS
|
|
|
|
|
|
/****** IOleInPlaceSiteWindowless *******/
|
|
#define IFACE2THIS(iface) DEFINE_THIS(IOCS, OleInPlaceSiteWindowless, iface)
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_QueryInterface(IOleInPlaceSiteWindowless *iface, REFIID riid, void **ppv)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_QueryInterface(This, riid, ppv);
|
|
}
|
|
static ULONG WINAPI OleInPlaceSiteWindowless_AddRef(IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_AddRef(This);
|
|
}
|
|
static ULONG WINAPI OleInPlaceSiteWindowless_Release(IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_Release(This);
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_GetWindow(IOleInPlaceSiteWindowless* iface, HWND* phwnd)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
TRACE("(%p,%p)\n", This, phwnd);
|
|
*phwnd = This->hWnd;
|
|
return S_OK;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_ContextSensitiveHelp(IOleInPlaceSiteWindowless* iface, BOOL fEnterMode)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
FIXME("(%p,%d) - stub\n", This, fEnterMode);
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_CanInPlaceActivate(IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
TRACE("(%p)\n", This);
|
|
return S_OK;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_OnInPlaceActivate(IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
TRACE("(%p)\n", This);
|
|
|
|
This->fInPlace = TRUE;
|
|
return S_OK;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_OnUIActivate(IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
TRACE("(%p)\n", This);
|
|
|
|
return S_OK;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_GetWindowContext(IOleInPlaceSiteWindowless *iface,
|
|
IOleInPlaceFrame **ppFrame, IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
|
|
LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
TRACE("(%p,%p,%p,%p,%p,%p)\n", This, ppFrame, ppDoc, lprcPosRect, lprcClipRect, lpFrameInfo);
|
|
|
|
if ( lprcClipRect )
|
|
memcpy(lprcClipRect, &This->size, sizeof(RECT));
|
|
if ( lprcPosRect )
|
|
memcpy(lprcPosRect, &This->size, sizeof(RECT));
|
|
|
|
if ( ppFrame )
|
|
{
|
|
IOCS_QueryInterface( This, &IID_IOleInPlaceFrame, (void**) ppFrame );
|
|
}
|
|
|
|
if ( ppDoc )
|
|
*ppDoc = NULL;
|
|
|
|
if ( lpFrameInfo )
|
|
{
|
|
lpFrameInfo->fMDIApp = FALSE;
|
|
lpFrameInfo->hwndFrame = This->hWnd;
|
|
lpFrameInfo->haccel = NULL;
|
|
lpFrameInfo->cAccelEntries = 0;
|
|
}
|
|
|
|
return S_OK;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_Scroll(IOleInPlaceSiteWindowless *iface, SIZE scrollExtent)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
FIXME("(%p) - stub\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_OnUIDeactivate(IOleInPlaceSiteWindowless *iface, BOOL fUndoable)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
FIXME("(%p,%d) - stub\n", This, fUndoable);
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_OnInPlaceDeactivate(IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
TRACE("(%p)\n", This);
|
|
|
|
This->fInPlace = This->fWindowless = FALSE;
|
|
return S_OK;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_DiscardUndoState(IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
FIXME("(%p) - stub\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_DeactivateAndUndo(IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
FIXME("(%p) - stub\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_OnPosRectChange(IOleInPlaceSiteWindowless *iface, LPCRECT lprcPosRect)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
FIXME("(%p,%p) - stub\n", This, lprcPosRect);
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_OnInPlaceActivateEx( IOleInPlaceSiteWindowless *iface, BOOL* pfNoRedraw, DWORD dwFlags)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
TRACE("\n");
|
|
|
|
This->fActive = This->fInPlace = TRUE;
|
|
if ( dwFlags & ACTIVATE_WINDOWLESS )
|
|
This->fWindowless = TRUE;
|
|
return S_OK;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_OnInPlaceDeactivateEx( IOleInPlaceSiteWindowless *iface, BOOL fNoRedraw)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
TRACE("\n");
|
|
|
|
This->fActive = This->fInPlace = This->fWindowless = FALSE;
|
|
return S_OK;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_RequestUIActivate( IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_CanWindowlessActivate( IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
FIXME("\n");
|
|
return S_OK;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_GetCapture( IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_SetCapture( IOleInPlaceSiteWindowless *iface, BOOL fCapture)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_GetFocus( IOleInPlaceSiteWindowless *iface)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_SetFocus( IOleInPlaceSiteWindowless *iface, BOOL fFocus)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_GetDC( IOleInPlaceSiteWindowless *iface, LPCRECT pRect, DWORD grfFlags, HDC* phDC)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_ReleaseDC( IOleInPlaceSiteWindowless *iface, HDC hDC)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_InvalidateRect( IOleInPlaceSiteWindowless *iface, LPCRECT pRect, BOOL fErase)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_InvalidateRgn( IOleInPlaceSiteWindowless *iface, HRGN hRGN, BOOL fErase)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_ScrollRect( IOleInPlaceSiteWindowless *iface, INT dx, INT dy, LPCRECT pRectScroll, LPCRECT pRectClip)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_AdjustRect( IOleInPlaceSiteWindowless *iface, LPRECT prc)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceSiteWindowless_OnDefWindowMessage( IOleInPlaceSiteWindowless *iface, UINT msg, WPARAM wParam, LPARAM lParam, LRESULT* plResult)
|
|
{
|
|
FIXME("\n");
|
|
return E_NOTIMPL;
|
|
}
|
|
#undef IFACE2THIS
|
|
|
|
|
|
/****** IOleInPlaceFrame *******/
|
|
#define IFACE2THIS(iface) DEFINE_THIS(IOCS, OleInPlaceFrame, iface)
|
|
static HRESULT WINAPI OleInPlaceFrame_QueryInterface(IOleInPlaceFrame *iface, REFIID riid, void **ppv)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_QueryInterface(This, riid, ppv);
|
|
}
|
|
static ULONG WINAPI OleInPlaceFrame_AddRef(IOleInPlaceFrame *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_AddRef(This);
|
|
}
|
|
static ULONG WINAPI OleInPlaceFrame_Release(IOleInPlaceFrame *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_Release(This);
|
|
}
|
|
static HRESULT WINAPI OleInPlaceFrame_GetWindow(IOleInPlaceFrame *iface, HWND *phWnd)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
TRACE( "(%p,%p)\n", This, phWnd );
|
|
|
|
*phWnd = This->hWnd;
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p,%d) - stub\n", This, fEnterMode );
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p,%p) - stub\n", This, lprectBorder );
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_RequestBorderSpace(IOleInPlaceFrame *iface, LPCBORDERWIDTHS pborderwidths)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p,%p) - stub\n", This, pborderwidths );
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_SetBorderSpace(IOleInPlaceFrame *iface, LPCBORDERWIDTHS pborderwidths)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p,%p) - stub\n", This, pborderwidths );
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_SetActiveObject(IOleInPlaceFrame *iface, IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p,%p,%s) - stub\n", This, pActiveObject, debugstr_w(pszObjName) );
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared, LPOLEMENUGROUPWIDTHS lpMenuWidths)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p,%p,%p) - stub\n", This, hmenuShared, lpMenuWidths );
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared, HOLEMENU holemenu, HWND hwndActiveObject)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p,%p,%p,%p) - stub\n", This, hmenuShared, holemenu, hwndActiveObject );
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleInPlaceFrame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p, %p) - stub\n", This, hmenuShared );
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p, %s) - stub\n", This, debugstr_w( pszStatusText ) );
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p, %d) - stub\n", This, fEnable );
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI OleInPlaceFrame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
|
|
FIXME( "(%p, %p, %x) - stub\n", This, lpmsg, wID );
|
|
return E_NOTIMPL;
|
|
}
|
|
#undef IFACE2THIS
|
|
|
|
|
|
/****** IOleControlSite *******/
|
|
#define IFACE2THIS(iface) DEFINE_THIS(IOCS, OleControlSite, iface)
|
|
static HRESULT WINAPI OleControlSite_QueryInterface(IOleControlSite *iface, REFIID riid, void **ppv)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_QueryInterface(This, riid, ppv);
|
|
}
|
|
static ULONG WINAPI OleControlSite_AddRef(IOleControlSite *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_AddRef(This);
|
|
}
|
|
static ULONG WINAPI OleControlSite_Release(IOleControlSite *iface)
|
|
{
|
|
IOCS *This = IFACE2THIS(iface);
|
|
return IOCS_Release(This);
|
|
}
|
|
static HRESULT WINAPI OleControlSite_OnControlInfoChanged( IOleControlSite* This)
|
|
{
|
|
FIXME( "\n" );
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleControlSite_LockInPlaceActive( IOleControlSite* This, BOOL fLock)
|
|
{
|
|
FIXME( "\n" );
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleControlSite_GetExtendedControl( IOleControlSite* This, IDispatch** ppDisp)
|
|
{
|
|
FIXME( "\n" );
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleControlSite_TransformCoords( IOleControlSite* This, POINTL* pPtlHimetric, POINTF* pPtfContainer, DWORD dwFlags)
|
|
{
|
|
FIXME( "\n" );
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleControlSite_TranslateAccelerator( IOleControlSite* This, MSG* pMsg, DWORD grfModifiers)
|
|
{
|
|
FIXME( "\n" );
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleControlSite_OnFocus( IOleControlSite* This, BOOL fGotFocus)
|
|
{
|
|
FIXME( "\n" );
|
|
return E_NOTIMPL;
|
|
}
|
|
static HRESULT WINAPI OleControlSite_ShowPropertyFrame( IOleControlSite* This)
|
|
{
|
|
FIXME( "\n" );
|
|
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 const IOleContainerVtbl OleContainer_vtbl = {
|
|
OleContainer_QueryInterface,
|
|
OleContainer_AddRef,
|
|
OleContainer_Release,
|
|
OleContainer_ParseDisplayName,
|
|
OleContainer_EnumObjects,
|
|
OleContainer_LockContainer
|
|
};
|
|
static const IOleInPlaceSiteWindowlessVtbl OleInPlaceSiteWindowless_vtbl = {
|
|
OleInPlaceSiteWindowless_QueryInterface,
|
|
OleInPlaceSiteWindowless_AddRef,
|
|
OleInPlaceSiteWindowless_Release,
|
|
OleInPlaceSiteWindowless_GetWindow,
|
|
OleInPlaceSiteWindowless_ContextSensitiveHelp,
|
|
OleInPlaceSiteWindowless_CanInPlaceActivate,
|
|
OleInPlaceSiteWindowless_OnInPlaceActivate,
|
|
OleInPlaceSiteWindowless_OnUIActivate,
|
|
OleInPlaceSiteWindowless_GetWindowContext,
|
|
OleInPlaceSiteWindowless_Scroll,
|
|
OleInPlaceSiteWindowless_OnUIDeactivate,
|
|
OleInPlaceSiteWindowless_OnInPlaceDeactivate,
|
|
OleInPlaceSiteWindowless_DiscardUndoState,
|
|
OleInPlaceSiteWindowless_DeactivateAndUndo,
|
|
OleInPlaceSiteWindowless_OnPosRectChange,
|
|
OleInPlaceSiteWindowless_OnInPlaceActivateEx,
|
|
OleInPlaceSiteWindowless_OnInPlaceDeactivateEx,
|
|
OleInPlaceSiteWindowless_RequestUIActivate,
|
|
OleInPlaceSiteWindowless_CanWindowlessActivate,
|
|
OleInPlaceSiteWindowless_GetCapture,
|
|
OleInPlaceSiteWindowless_SetCapture,
|
|
OleInPlaceSiteWindowless_GetFocus,
|
|
OleInPlaceSiteWindowless_SetFocus,
|
|
OleInPlaceSiteWindowless_GetDC,
|
|
OleInPlaceSiteWindowless_ReleaseDC,
|
|
OleInPlaceSiteWindowless_InvalidateRect,
|
|
OleInPlaceSiteWindowless_InvalidateRgn,
|
|
OleInPlaceSiteWindowless_ScrollRect,
|
|
OleInPlaceSiteWindowless_AdjustRect,
|
|
OleInPlaceSiteWindowless_OnDefWindowMessage
|
|
};
|
|
static const IOleInPlaceFrameVtbl OleInPlaceFrame_vtbl =
|
|
{
|
|
OleInPlaceFrame_QueryInterface,
|
|
OleInPlaceFrame_AddRef,
|
|
OleInPlaceFrame_Release,
|
|
OleInPlaceFrame_GetWindow,
|
|
OleInPlaceFrame_ContextSensitiveHelp,
|
|
OleInPlaceFrame_GetBorder,
|
|
OleInPlaceFrame_RequestBorderSpace,
|
|
OleInPlaceFrame_SetBorderSpace,
|
|
OleInPlaceFrame_SetActiveObject,
|
|
OleInPlaceFrame_InsertMenus,
|
|
OleInPlaceFrame_SetMenu,
|
|
OleInPlaceFrame_RemoveMenus,
|
|
OleInPlaceFrame_SetStatusText,
|
|
OleInPlaceFrame_EnableModeless,
|
|
OleInPlaceFrame_TranslateAccelerator
|
|
};
|
|
static const IOleControlSiteVtbl OleControlSite_vtbl =
|
|
{
|
|
OleControlSite_QueryInterface,
|
|
OleControlSite_AddRef,
|
|
OleControlSite_Release,
|
|
OleControlSite_OnControlInfoChanged,
|
|
OleControlSite_LockInPlaceActive,
|
|
OleControlSite_GetExtendedControl,
|
|
OleControlSite_TransformCoords,
|
|
OleControlSite_TranslateAccelerator,
|
|
OleControlSite_OnFocus,
|
|
OleControlSite_ShowPropertyFrame
|
|
};
|
|
|
|
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;
|
|
|
|
This->size.left = rect->left; This->size.right = rect->right; This->size.top = rect->top; This->size.bottom = rect->bottom;
|
|
|
|
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 );
|
|
|
|
if ( This->fInPlace )
|
|
{
|
|
IOleInPlaceObject *wl;
|
|
|
|
if ( SUCCEEDED( IOleObject_QueryInterface( This->control, &IID_IOleInPlaceObject, (void**)&wl ) ) )
|
|
{
|
|
IOleInPlaceObject_SetObjectRects( wl, rect, rect );
|
|
IOleInPlaceObject_Release( wl );
|
|
}
|
|
}
|
|
}
|
|
|
|
static void IOCS_OnShow( IOCS *This, BOOL fShow )
|
|
{
|
|
if (!This->control || This->fActive || !fShow )
|
|
return;
|
|
|
|
This->fActive = TRUE;
|
|
}
|
|
|
|
static void IOCS_OnDraw( IOCS *This )
|
|
{
|
|
IViewObject *view;
|
|
|
|
if ( !This->control || !This->fWindowless )
|
|
return;
|
|
|
|
if ( SUCCEEDED( IOleObject_QueryInterface( This->control, &IID_IViewObject, (void**)&view ) ) )
|
|
{
|
|
HDC dc = GetDC( This->hWnd );
|
|
RECTL rect;
|
|
|
|
rect.left = This->size.left; rect.top = This->size.top;
|
|
rect.bottom = This->size.bottom; rect.right = This->size.right;
|
|
|
|
IViewObject_Draw( view, DVASPECT_CONTENT, ~0, NULL, NULL, 0, dc, &rect, &rect, NULL, 0 );
|
|
IViewObject_Release( view );
|
|
ReleaseDC( This->hWnd, dc );
|
|
}
|
|
}
|
|
|
|
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;
|
|
case WM_SHOWWINDOW:
|
|
IOCS_OnShow( This, (BOOL) wParam );
|
|
break;
|
|
case WM_PAINT:
|
|
IOCS_OnDraw( This );
|
|
break;
|
|
}
|
|
|
|
return CallWindowProcW( 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 ) );
|
|
SetWindowLongPtrW( hWnd, GWLP_USERDATA, (ULONG_PTR) This );
|
|
This->OrigWndProc = (WNDPROC)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 );
|
|
IOleObject_DoVerb( This->control, OLEIVERB_INPLACEACTIVATE, NULL, THIS2IOLECLIENTSITE( This ), 0, This->hWnd, &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->lpOleContainerVtbl = &OleContainer_vtbl;
|
|
This->lpOleInPlaceSiteWindowlessVtbl = &OleInPlaceSiteWindowless_vtbl;
|
|
This->lpOleInPlaceFrameVtbl = &OleInPlaceFrame_vtbl;
|
|
This->lpOleControlSiteVtbl = &OleControlSite_vtbl;
|
|
This->ref = 1;
|
|
|
|
This->OrigWndProc = NULL;
|
|
This->hWnd = NULL;
|
|
This->fWindowless = This->fActive = This->fInPlace = FALSE;
|
|
|
|
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.@]
|
|
*/
|
|
HRESULT WINAPI AtlAxCreateControl(LPCOLESTR lpszName, HWND hWnd,
|
|
IStream *pStream, IUnknown **ppUnkContainer)
|
|
{
|
|
return AtlAxCreateControlEx( lpszName, hWnd, pStream, ppUnkContainer,
|
|
NULL, NULL, NULL );
|
|
}
|
|
|
|
/***********************************************************************
|
|
* AtlAxCreateControlEx [ATL.@]
|
|
*
|
|
* REMARKS
|
|
* See http://www.codeproject.com/com/cwebpage.asp for some background
|
|
*
|
|
*/
|
|
HRESULT WINAPI AtlAxCreateControlEx(LPCOLESTR lpszName, HWND hWnd,
|
|
IStream *pStream, IUnknown **ppUnkContainer, IUnknown **ppUnkControl,
|
|
REFIID iidSink, IUnknown *punkSink)
|
|
{
|
|
CLSID controlId;
|
|
HRESULT hRes;
|
|
IOleObject *pControl;
|
|
IUnknown *pUnkControl;
|
|
IPersistStreamInit *pPSInit;
|
|
IUnknown *pContainer;
|
|
enum {IsGUID=0,IsHTML=1,IsURL=2} content;
|
|
|
|
TRACE("(%s %p %p %p %p %p %p)\n", debugstr_w(lpszName), hWnd, pStream,
|
|
ppUnkContainer, ppUnkControl, iidSink, punkSink);
|
|
|
|
hRes = CLSIDFromString( (LPOLESTR) lpszName, &controlId );
|
|
if ( FAILED(hRes) )
|
|
hRes = CLSIDFromProgID( lpszName, &controlId );
|
|
if ( SUCCEEDED( hRes ) )
|
|
content = IsGUID;
|
|
else {
|
|
/* FIXME - check for MSHTML: prefix! */
|
|
content = IsURL;
|
|
memcpy( &controlId, &CLSID_WebBrowser, sizeof(controlId) );
|
|
}
|
|
|
|
hRes = CoCreateInstance( &controlId, 0, CLSCTX_ALL, &IID_IOleObject,
|
|
(void**) &pControl );
|
|
if ( FAILED( hRes ) )
|
|
{
|
|
WARN( "cannot create ActiveX control %s instance - error 0x%08x\n",
|
|
debugstr_guid( &controlId ), hRes );
|
|
return hRes;
|
|
}
|
|
|
|
hRes = IOleObject_QueryInterface( pControl, &IID_IPersistStreamInit, (void**) &pPSInit );
|
|
if ( SUCCEEDED( hRes ) )
|
|
{
|
|
if (!pStream)
|
|
IPersistStreamInit_InitNew( pPSInit );
|
|
else
|
|
IPersistStreamInit_Load( pPSInit, pStream );
|
|
IPersistStreamInit_Release( pPSInit );
|
|
} else
|
|
WARN("cannot get IID_IPersistStreamInit out of control\n");
|
|
|
|
IOleObject_QueryInterface( pControl, &IID_IUnknown, (void**) &pUnkControl );
|
|
IOleObject_Release( pControl );
|
|
|
|
|
|
hRes = AtlAxAttachControl( pUnkControl, hWnd, &pContainer );
|
|
if ( FAILED( hRes ) )
|
|
WARN("cannot attach control to window\n");
|
|
|
|
if ( content == IsURL )
|
|
{
|
|
IWebBrowser2 *browser;
|
|
|
|
hRes = IOleObject_QueryInterface( pControl, &IID_IWebBrowser2, (void**) &browser );
|
|
if ( !browser )
|
|
WARN( "Cannot query IWebBrowser2 interface: %08x\n", hRes );
|
|
else {
|
|
VARIANT url;
|
|
|
|
IWebBrowser2_put_Visible( browser, VARIANT_TRUE ); /* it seems that native does this on URL (but do not on MSHTML:! why? */
|
|
|
|
V_VT(&url) = VT_BSTR;
|
|
V_BSTR(&url) = SysAllocString( lpszName );
|
|
|
|
hRes = IWebBrowser2_Navigate2( browser, &url, NULL, NULL, NULL, NULL );
|
|
if ( FAILED( hRes ) )
|
|
WARN( "IWebBrowser2::Navigate2 failed: %08x\n", hRes );
|
|
SysFreeString( V_BSTR(&url) );
|
|
|
|
IWebBrowser2_Release( browser );
|
|
}
|
|
}
|
|
|
|
if (ppUnkContainer)
|
|
{
|
|
*ppUnkContainer = pContainer;
|
|
if ( pContainer )
|
|
IUnknown_AddRef( pContainer );
|
|
}
|
|
if (ppUnkControl)
|
|
{
|
|
*ppUnkControl = pUnkControl;
|
|
if ( pUnkControl )
|
|
IUnknown_AddRef( pUnkControl );
|
|
}
|
|
|
|
if ( pUnkControl )
|
|
IUnknown_Release( pUnkControl );
|
|
if ( pContainer )
|
|
IUnknown_Release( pContainer );
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* AtlAxAttachControl [ATL.@]
|
|
*/
|
|
HRESULT WINAPI AtlAxAttachControl(IUnknown* pControl, HWND hWnd, IUnknown** ppUnkContainer)
|
|
{
|
|
IOCS *pUnkContainer;
|
|
HRESULT hr;
|
|
|
|
TRACE( "%p %p %p\n", pControl, hWnd, ppUnkContainer );
|
|
|
|
*ppUnkContainer = NULL;
|
|
|
|
hr = IOCS_Create( hWnd, pControl, &pUnkContainer );
|
|
if ( SUCCEEDED( hr ) )
|
|
{
|
|
*ppUnkContainer = (IUnknown*) pUnkContainer;
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* Helper function for AX_ConvertDialogTemplate
|
|
*/
|
|
static inline BOOL advance_array(WORD **pptr, DWORD *palloc, DWORD *pfilled, const WORD *data, DWORD size)
|
|
{
|
|
if ( (*pfilled + size) > *palloc )
|
|
{
|
|
*palloc = ((*pfilled+size) + 0xFF) & ~0xFF;
|
|
*pptr = HeapReAlloc( GetProcessHeap(), 0, *pptr, *palloc * sizeof(WORD) );
|
|
if (!*pptr)
|
|
return FALSE;
|
|
}
|
|
RtlMoveMemory( *pptr+*pfilled, data, size * sizeof(WORD) );
|
|
*pfilled += size;
|
|
return TRUE;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* Convert ActiveX control templates to AtlAxWin class instances
|
|
*/
|
|
static LPDLGTEMPLATEW AX_ConvertDialogTemplate(LPCDLGTEMPLATEW src_tmpl)
|
|
{
|
|
#define GET_WORD(x) (*(const WORD *)(x))
|
|
#define GET_DWORD(x) (*(const DWORD *)(x))
|
|
#define PUT_BLOCK(x,y) do {if (!advance_array(&output, &allocated, &filled, (x), (y))) return NULL;} while (0)
|
|
#define PUT_WORD(x) do {WORD w = (x);PUT_BLOCK(&w, 1);} while(0)
|
|
#define PUT_DWORD(x) do {DWORD w = (x);PUT_BLOCK(&w, 2);} while(0)
|
|
const WORD *tmp, *src = (const WORD *)src_tmpl;
|
|
WORD *output;
|
|
DWORD allocated, filled; /* in WORDs */
|
|
BOOL ext;
|
|
WORD signature, dlgver, rescount;
|
|
DWORD style;
|
|
|
|
filled = 0; allocated = 256;
|
|
output = HeapAlloc( GetProcessHeap(), 0, allocated * sizeof(WORD) );
|
|
if (!output)
|
|
return NULL;
|
|
|
|
/* header */
|
|
tmp = src;
|
|
signature = GET_WORD(src);
|
|
dlgver = GET_WORD(src + 1);
|
|
if (signature == 1 && dlgver == 0xFFFF)
|
|
{
|
|
ext = TRUE;
|
|
src += 6;
|
|
style = GET_DWORD(src);
|
|
src += 2;
|
|
rescount = GET_WORD(src++);
|
|
src += 4;
|
|
if ( GET_WORD(src) == 0xFFFF ) /* menu */
|
|
src += 2;
|
|
else
|
|
src += strlenW(src) + 1;
|
|
if ( GET_WORD(src) == 0xFFFF ) /* class */
|
|
src += 2;
|
|
else
|
|
src += strlenW(src) + 1;
|
|
src += strlenW(src) + 1; /* title */
|
|
if ( style & (DS_SETFONT | DS_SHELLFONT) )
|
|
{
|
|
src += 3;
|
|
src += strlenW(src) + 1;
|
|
}
|
|
} else {
|
|
ext = FALSE;
|
|
style = GET_DWORD(src);
|
|
src += 4;
|
|
rescount = GET_WORD(src++);
|
|
src += 4;
|
|
if ( GET_WORD(src) == 0xFFFF ) /* menu */
|
|
src += 2;
|
|
else
|
|
src += strlenW(src) + 1;
|
|
if ( GET_WORD(src) == 0xFFFF ) /* class */
|
|
src += 2;
|
|
else
|
|
src += strlenW(src) + 1;
|
|
src += strlenW(src) + 1; /* title */
|
|
if ( style & DS_SETFONT )
|
|
{
|
|
src++;
|
|
src += strlenW(src) + 1;
|
|
}
|
|
}
|
|
PUT_BLOCK(tmp, src-tmp);
|
|
|
|
while(rescount--)
|
|
{
|
|
src = (const WORD *)( ( ((ULONG_PTR)src) + 3) & ~3); /* align on DWORD boundary */
|
|
filled = (filled + 1) & ~1; /* depends on DWORD-aligned allocation unit */
|
|
|
|
tmp = src;
|
|
if (ext)
|
|
src += 11;
|
|
else
|
|
src += 9;
|
|
PUT_BLOCK(tmp, src-tmp);
|
|
|
|
tmp = src;
|
|
if ( GET_WORD(src) == 0xFFFF ) /* class */
|
|
{
|
|
src += 2;
|
|
} else
|
|
{
|
|
src += strlenW(src) + 1;
|
|
}
|
|
src += strlenW(src) + 1; /* title */
|
|
if ( GET_WORD(tmp) == '{' ) /* all this mess created because of this line */
|
|
{
|
|
static const WCHAR AtlAxWin[9]={'A','t','l','A','x','W','i','n',0};
|
|
PUT_BLOCK(AtlAxWin, sizeof(AtlAxWin)/sizeof(WCHAR));
|
|
PUT_BLOCK(tmp, strlenW(tmp)+1);
|
|
} else
|
|
PUT_BLOCK(tmp, src-tmp);
|
|
|
|
if ( GET_WORD(src) )
|
|
{
|
|
WORD size = (GET_WORD(src)+sizeof(WORD)-1) / sizeof(WORD); /* quite ugly :( Maybe use BYTE* instead of WORD* everywhere ? */
|
|
PUT_BLOCK(src, size);
|
|
src+=size;
|
|
}
|
|
else
|
|
{
|
|
PUT_WORD(0);
|
|
src++;
|
|
}
|
|
}
|
|
return (LPDLGTEMPLATEW) output;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* AtlAxCreateDialogA [ATL.@]
|
|
*
|
|
* Creates a dialog window
|
|
*
|
|
* PARAMS
|
|
* hInst [I] Application instance
|
|
* name [I] Dialog box template name
|
|
* owner [I] Dialog box parent HWND
|
|
* dlgProc [I] Dialog box procedure
|
|
* param [I] This value will be passed to dlgProc as WM_INITDIALOG's message lParam
|
|
*
|
|
* RETURNS
|
|
* Window handle of dialog window.
|
|
*/
|
|
HWND WINAPI AtlAxCreateDialogA(HINSTANCE hInst, LPCSTR name, HWND owner, DLGPROC dlgProc ,LPARAM param)
|
|
{
|
|
HWND res = NULL;
|
|
int length;
|
|
WCHAR *nameW;
|
|
|
|
if ( HIWORD(name) == 0 )
|
|
return AtlAxCreateDialogW( hInst, (LPCWSTR) name, owner, dlgProc, param );
|
|
|
|
length = MultiByteToWideChar( CP_ACP, 0, name, -1, NULL, 0 );
|
|
nameW = HeapAlloc( GetProcessHeap(), 0, length * sizeof(WCHAR) );
|
|
if (nameW)
|
|
{
|
|
MultiByteToWideChar( CP_ACP, 0, name, -1, nameW, length );
|
|
res = AtlAxCreateDialogW( hInst, nameW, owner, dlgProc, param );
|
|
HeapFree( GetProcessHeap(), 0, nameW );
|
|
}
|
|
return res;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* AtlAxCreateDialogW [ATL.@]
|
|
*
|
|
* See AtlAxCreateDialogA
|
|
*
|
|
*/
|
|
HWND WINAPI AtlAxCreateDialogW(HINSTANCE hInst, LPCWSTR name, HWND owner, DLGPROC dlgProc ,LPARAM param)
|
|
{
|
|
HRSRC hrsrc;
|
|
HGLOBAL hgl;
|
|
LPCDLGTEMPLATEW ptr;
|
|
LPDLGTEMPLATEW newptr;
|
|
HWND res;
|
|
|
|
FIXME("(%p %s %p %p %lx) - not tested\n", hInst, debugstr_w(name), owner, dlgProc, param);
|
|
|
|
hrsrc = FindResourceW( hInst, name, (LPWSTR)RT_DIALOG );
|
|
if ( !hrsrc )
|
|
return NULL;
|
|
hgl = LoadResource (hInst, hrsrc);
|
|
if ( !hgl )
|
|
return NULL;
|
|
ptr = (LPCDLGTEMPLATEW)LockResource ( hgl );
|
|
if (!ptr)
|
|
{
|
|
FreeResource( hgl );
|
|
return NULL;
|
|
}
|
|
newptr = AX_ConvertDialogTemplate( ptr );
|
|
if ( newptr )
|
|
{
|
|
res = CreateDialogIndirectParamW( hInst, newptr, owner, dlgProc, param );
|
|
HeapFree( GetProcessHeap(), 0, newptr );
|
|
} else
|
|
res = NULL;
|
|
FreeResource ( hrsrc );
|
|
return res;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* AtlAxGetHost [ATL.@]
|
|
*
|
|
*/
|
|
HRESULT WINAPI AtlAxGetHost(HWND hWnd, IUnknown **pUnk)
|
|
{
|
|
IOCS *This;
|
|
|
|
TRACE( "(%p, %p)\n", hWnd, pUnk );
|
|
|
|
*pUnk = NULL;
|
|
|
|
This = (IOCS*) GetWindowLongPtrW( hWnd, GWLP_USERDATA );
|
|
if ( !This )
|
|
{
|
|
WARN("No container attached to %p\n", hWnd );
|
|
return E_FAIL;
|
|
}
|
|
|
|
return IOCS_QueryInterface( This, &IID_IUnknown, (void**) pUnk );
|
|
}
|
|
|
|
/***********************************************************************
|
|
* AtlAxGetControl [ATL.@]
|
|
*
|
|
*/
|
|
HRESULT WINAPI AtlAxGetControl(HWND hWnd, IUnknown **pUnk)
|
|
{
|
|
IOCS *This;
|
|
|
|
TRACE( "(%p, %p)\n", hWnd, pUnk );
|
|
|
|
*pUnk = NULL;
|
|
|
|
This = (IOCS*) GetWindowLongPtrW( hWnd, GWLP_USERDATA );
|
|
if ( !This || !This->control )
|
|
{
|
|
WARN("No control attached to %p\n", hWnd );
|
|
return E_FAIL;
|
|
}
|
|
|
|
return IOleObject_QueryInterface( This->control, &IID_IUnknown, (void**) pUnk );
|
|
}
|