forked from Mirrors/wine-wine
447 lines
14 KiB
C
447 lines
14 KiB
C
/*
|
|
* RichEdit - functions and interfaces around CreateTextServices
|
|
*
|
|
* Copyright 2005, 2006, Maarten Lankhorst
|
|
*
|
|
* 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 "config.h"
|
|
#include "wine/port.h"
|
|
|
|
#define COBJMACROS
|
|
|
|
#include "editor.h"
|
|
#include "ole2.h"
|
|
#include "oleauto.h"
|
|
#include "richole.h"
|
|
#include "tom.h"
|
|
#include "imm.h"
|
|
#include "textserv.h"
|
|
#include "wine/asm.h"
|
|
#include "wine/debug.h"
|
|
#include "editstr.h"
|
|
|
|
#ifdef __i386__ /* thiscall functions are i386-specific */
|
|
|
|
#define THISCALL(func) (void *) __thiscall_ ## func
|
|
#ifdef _MSC_VER
|
|
#define DEFINE_THISCALL_WRAPPER(func,args) \
|
|
__declspec(naked) HRESULT __thiscall_##func(void) \
|
|
{ \
|
|
__asm pop eax \
|
|
__asm push ecx \
|
|
__asm push eax \
|
|
__asm jmp func \
|
|
}
|
|
#else /* _MSC_VER */
|
|
#define DEFINE_THISCALL_WRAPPER(func,args) \
|
|
extern HRESULT __thiscall_ ## func(void); \
|
|
__ASM_GLOBAL_FUNC(__thiscall_ ## func, \
|
|
"popl %eax\n\t" \
|
|
"pushl %ecx\n\t" \
|
|
"pushl %eax\n\t" \
|
|
"jmp " __ASM_NAME(#func) __ASM_STDCALL(args) )
|
|
#endif /* _MSC_VER */
|
|
|
|
#else /* __i386__ */
|
|
|
|
#define THISCALL(func) func
|
|
#define DEFINE_THISCALL_WRAPPER(func,args) /* nothing */
|
|
|
|
#endif /* __i386__ */
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(richedit);
|
|
|
|
typedef struct ITextServicesImpl {
|
|
IUnknown IUnknown_inner;
|
|
ITextServices ITextServices_iface;
|
|
IUnknown *outer_unk;
|
|
LONG ref;
|
|
ITextHost *pMyHost;
|
|
CRITICAL_SECTION csTxtSrv;
|
|
ME_TextEditor *editor;
|
|
char spare[256];
|
|
} ITextServicesImpl;
|
|
|
|
static inline ITextServicesImpl *impl_from_IUnknown(IUnknown *iface)
|
|
{
|
|
return CONTAINING_RECORD(iface, ITextServicesImpl, IUnknown_inner);
|
|
}
|
|
|
|
static HRESULT WINAPI ITextServicesImpl_QueryInterface(IUnknown *iface, REFIID riid, void **ppv)
|
|
{
|
|
ITextServicesImpl *This = impl_from_IUnknown(iface);
|
|
|
|
TRACE("(%p)->(%s, %p)\n", iface, debugstr_guid(riid), ppv);
|
|
|
|
if (IsEqualIID(riid, &IID_IUnknown))
|
|
*ppv = &This->IUnknown_inner;
|
|
else if (IsEqualIID(riid, &IID_ITextServices))
|
|
*ppv = &This->ITextServices_iface;
|
|
else if (IsEqualIID(riid, &IID_IRichEditOle) || IsEqualIID(riid, &IID_ITextDocument) ||
|
|
IsEqualIID(riid, &IID_ITextDocument2Old)) {
|
|
if (!This->editor->reOle)
|
|
if (!CreateIRichEditOle(This->outer_unk, This->editor, (void **)(&This->editor->reOle)))
|
|
return E_OUTOFMEMORY;
|
|
return IUnknown_QueryInterface(This->editor->reOle, riid, ppv);
|
|
} else {
|
|
*ppv = NULL;
|
|
FIXME("Unknown interface: %s\n", debugstr_guid(riid));
|
|
return E_NOINTERFACE;
|
|
}
|
|
|
|
IUnknown_AddRef((IUnknown*)*ppv);
|
|
return S_OK;
|
|
}
|
|
|
|
static ULONG WINAPI ITextServicesImpl_AddRef(IUnknown *iface)
|
|
{
|
|
ITextServicesImpl *This = impl_from_IUnknown(iface);
|
|
LONG ref = InterlockedIncrement(&This->ref);
|
|
|
|
TRACE("(%p) ref=%d\n", This, ref);
|
|
|
|
return ref;
|
|
}
|
|
|
|
static ULONG WINAPI ITextServicesImpl_Release(IUnknown *iface)
|
|
{
|
|
ITextServicesImpl *This = impl_from_IUnknown(iface);
|
|
LONG ref = InterlockedDecrement(&This->ref);
|
|
|
|
TRACE("(%p) ref=%d\n", This, ref);
|
|
|
|
if (!ref)
|
|
{
|
|
ME_DestroyEditor(This->editor);
|
|
This->csTxtSrv.DebugInfo->Spare[0] = 0;
|
|
DeleteCriticalSection(&This->csTxtSrv);
|
|
CoTaskMemFree(This);
|
|
}
|
|
return ref;
|
|
}
|
|
|
|
static const IUnknownVtbl textservices_inner_vtbl =
|
|
{
|
|
ITextServicesImpl_QueryInterface,
|
|
ITextServicesImpl_AddRef,
|
|
ITextServicesImpl_Release
|
|
};
|
|
|
|
static inline ITextServicesImpl *impl_from_ITextServices(ITextServices *iface)
|
|
{
|
|
return CONTAINING_RECORD(iface, ITextServicesImpl, ITextServices_iface);
|
|
}
|
|
|
|
static HRESULT WINAPI fnTextSrv_QueryInterface(ITextServices *iface, REFIID riid, void **ppv)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
return IUnknown_QueryInterface(This->outer_unk, riid, ppv);
|
|
}
|
|
|
|
static ULONG WINAPI fnTextSrv_AddRef(ITextServices *iface)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
return IUnknown_AddRef(This->outer_unk);
|
|
}
|
|
|
|
static ULONG WINAPI fnTextSrv_Release(ITextServices *iface)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
return IUnknown_Release(This->outer_unk);
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxSendMessage(ITextServices *iface, UINT msg, WPARAM wparam,
|
|
LPARAM lparam, LRESULT *plresult)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
HRESULT hresult;
|
|
LRESULT lresult;
|
|
|
|
lresult = ME_HandleMessage(This->editor, msg, wparam, lparam, TRUE, &hresult);
|
|
if (plresult) *plresult = lresult;
|
|
return hresult;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxDraw(ITextServices *iface, DWORD dwDrawAspect, LONG lindex,
|
|
void *pvAspect, DVTARGETDEVICE *ptd, HDC hdcDraw, HDC hdcTargetDev,
|
|
LPCRECTL lprcBounds, LPCRECTL lprcWBounds, LPRECT lprcUpdate,
|
|
BOOL (CALLBACK * pfnContinue)(DWORD), DWORD dwContinue,
|
|
LONG lViewId)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxGetHScroll(ITextServices *iface, LONG *plMin, LONG *plMax, LONG *plPos,
|
|
LONG *plPage, BOOL *pfEnabled)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
if (plMin)
|
|
*plMin = This->editor->horz_si.nMin;
|
|
if (plMax)
|
|
*plMax = This->editor->horz_si.nMax;
|
|
if (plPos)
|
|
*plPos = This->editor->horz_si.nPos;
|
|
if (plPage)
|
|
*plPage = This->editor->horz_si.nPage;
|
|
if (pfEnabled)
|
|
*pfEnabled = (This->editor->styleFlags & WS_HSCROLL) != 0;
|
|
return S_OK;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxGetVScroll(ITextServices *iface, LONG *plMin, LONG *plMax, LONG *plPos,
|
|
LONG *plPage, BOOL *pfEnabled)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
if (plMin)
|
|
*plMin = This->editor->vert_si.nMin;
|
|
if (plMax)
|
|
*plMax = This->editor->vert_si.nMax;
|
|
if (plPos)
|
|
*plPos = This->editor->vert_si.nPos;
|
|
if (plPage)
|
|
*plPage = This->editor->vert_si.nPage;
|
|
if (pfEnabled)
|
|
*pfEnabled = (This->editor->styleFlags & WS_VSCROLL) != 0;
|
|
return S_OK;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_OnTxSetCursor(ITextServices *iface, DWORD dwDrawAspect, LONG lindex,
|
|
void *pvAspect, DVTARGETDEVICE *ptd, HDC hdcDraw,
|
|
HDC hicTargetDev, LPCRECT lprcClient, INT x, INT y)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxQueryHitPoint(ITextServices *iface, DWORD dwDrawAspect, LONG lindex,
|
|
void *pvAspect, DVTARGETDEVICE *ptd, HDC hdcDraw,
|
|
HDC hicTargetDev, LPCRECT lprcClient, INT x, INT y,
|
|
DWORD *pHitResult)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_OnTxInplaceActivate(ITextServices *iface, LPCRECT prcClient)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_OnTxInplaceDeactivate(ITextServices *iface)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_OnTxUIActivate(ITextServices *iface)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_OnTxUIDeactivate(ITextServices *iface)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxGetText(ITextServices *iface, BSTR *pbstrText)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
int length;
|
|
|
|
length = ME_GetTextLength(This->editor);
|
|
if (length)
|
|
{
|
|
ME_Cursor start;
|
|
BSTR bstr;
|
|
bstr = SysAllocStringByteLen(NULL, length * sizeof(WCHAR));
|
|
if (bstr == NULL)
|
|
return E_OUTOFMEMORY;
|
|
|
|
ME_CursorFromCharOfs(This->editor, 0, &start);
|
|
ME_GetTextW(This->editor, bstr, length, &start, INT_MAX, FALSE, FALSE);
|
|
*pbstrText = bstr;
|
|
} else {
|
|
*pbstrText = NULL;
|
|
}
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxSetText(ITextServices *iface, LPCWSTR pszText)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
ME_Cursor cursor;
|
|
|
|
ME_SetCursorToStart(This->editor, &cursor);
|
|
ME_InternalDeleteText(This->editor, &cursor, ME_GetTextLength(This->editor), FALSE);
|
|
if(pszText)
|
|
ME_InsertTextFromCursor(This->editor, 0, pszText, -1, This->editor->pBuffer->pDefaultStyle);
|
|
ME_SetSelection(This->editor, 0, 0);
|
|
This->editor->nModifyStep = 0;
|
|
OleFlushClipboard();
|
|
ME_EmptyUndoStack(This->editor);
|
|
ME_UpdateRepaint(This->editor, FALSE);
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxGetCurTargetX(ITextServices *iface, LONG *x)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxGetBaseLinePos(ITextServices *iface, LONG *x)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxGetNaturalSize(ITextServices *iface, DWORD dwAspect, HDC hdcDraw,
|
|
HDC hicTargetDev, DVTARGETDEVICE *ptd, DWORD dwMode,
|
|
const SIZEL *psizelExtent, LONG *pwidth, LONG *pheight)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxGetDropTarget(ITextServices *iface, IDropTarget **ppDropTarget)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_OnTxPropertyBitsChange(ITextServices *iface, DWORD dwMask, DWORD dwBits)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DECLSPEC_HIDDEN HRESULT WINAPI fnTextSrv_TxGetCachedSize(ITextServices *iface, DWORD *pdwWidth, DWORD *pdwHeight)
|
|
{
|
|
ITextServicesImpl *This = impl_from_ITextServices(iface);
|
|
|
|
FIXME("%p: STUB\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxSendMessage,20)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxDraw,52)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetHScroll,24)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetVScroll,24)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxSetCursor,40)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxQueryHitPoint,44)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxInplaceActivate,8)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxInplaceDeactivate,4)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxUIActivate,4)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxUIDeactivate,4)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetText,8)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxSetText,8)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetCurTargetX,8)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetBaseLinePos,8)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetNaturalSize,36)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetDropTarget,8)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxPropertyBitsChange,12)
|
|
DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetCachedSize,12)
|
|
|
|
static const ITextServicesVtbl textservices_vtbl =
|
|
{
|
|
fnTextSrv_QueryInterface,
|
|
fnTextSrv_AddRef,
|
|
fnTextSrv_Release,
|
|
THISCALL(fnTextSrv_TxSendMessage),
|
|
THISCALL(fnTextSrv_TxDraw),
|
|
THISCALL(fnTextSrv_TxGetHScroll),
|
|
THISCALL(fnTextSrv_TxGetVScroll),
|
|
THISCALL(fnTextSrv_OnTxSetCursor),
|
|
THISCALL(fnTextSrv_TxQueryHitPoint),
|
|
THISCALL(fnTextSrv_OnTxInplaceActivate),
|
|
THISCALL(fnTextSrv_OnTxInplaceDeactivate),
|
|
THISCALL(fnTextSrv_OnTxUIActivate),
|
|
THISCALL(fnTextSrv_OnTxUIDeactivate),
|
|
THISCALL(fnTextSrv_TxGetText),
|
|
THISCALL(fnTextSrv_TxSetText),
|
|
THISCALL(fnTextSrv_TxGetCurTargetX),
|
|
THISCALL(fnTextSrv_TxGetBaseLinePos),
|
|
THISCALL(fnTextSrv_TxGetNaturalSize),
|
|
THISCALL(fnTextSrv_TxGetDropTarget),
|
|
THISCALL(fnTextSrv_OnTxPropertyBitsChange),
|
|
THISCALL(fnTextSrv_TxGetCachedSize)
|
|
};
|
|
|
|
/******************************************************************
|
|
* CreateTextServices (RICHED20.4)
|
|
*/
|
|
HRESULT WINAPI CreateTextServices(IUnknown *pUnkOuter, ITextHost *pITextHost, IUnknown **ppUnk)
|
|
{
|
|
ITextServicesImpl *ITextImpl;
|
|
|
|
TRACE("%p %p --> %p\n", pUnkOuter, pITextHost, ppUnk);
|
|
if (pITextHost == NULL)
|
|
return E_POINTER;
|
|
|
|
ITextImpl = CoTaskMemAlloc(sizeof(*ITextImpl));
|
|
if (ITextImpl == NULL)
|
|
return E_OUTOFMEMORY;
|
|
InitializeCriticalSection(&ITextImpl->csTxtSrv);
|
|
ITextImpl->csTxtSrv.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": ITextServicesImpl.csTxtSrv");
|
|
ITextImpl->ref = 1;
|
|
ITextHost_AddRef(pITextHost);
|
|
ITextImpl->pMyHost = pITextHost;
|
|
ITextImpl->IUnknown_inner.lpVtbl = &textservices_inner_vtbl;
|
|
ITextImpl->ITextServices_iface.lpVtbl = &textservices_vtbl;
|
|
ITextImpl->editor = ME_MakeEditor(pITextHost, FALSE);
|
|
|
|
if (pUnkOuter)
|
|
ITextImpl->outer_unk = pUnkOuter;
|
|
else
|
|
ITextImpl->outer_unk = &ITextImpl->IUnknown_inner;
|
|
|
|
*ppUnk = &ITextImpl->IUnknown_inner;
|
|
return S_OK;
|
|
}
|