riched20: Store reference to editor in ole interface.
[wine] / dlls / riched20 / txtsrv.c
1 /*
2  * RichEdit - functions and interfaces around CreateTextServices
3  *
4  * Copyright 2005, 2006, Maarten Lankhorst
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #include "config.h"
22 #include "wine/port.h"
23
24 #define NONAMELESSSTRUCT
25 #define NONAMELESSUNION
26 #define COBJMACROS
27
28 #include "editor.h"
29 #include "ole2.h"
30 #include "richole.h"
31 #include "winreg.h"
32 #include "imm.h"
33 #include "textserv.h"
34 #include "wine/debug.h"
35 #include "editstr.h"
36
37 #ifdef __i386__  /* thiscall functions are i386-specific */
38
39 #define THISCALL(func) __thiscall_ ## func
40 #define DEFINE_THISCALL_WRAPPER(func) \
41    extern typeof(func) THISCALL(func); \
42    __ASM_GLOBAL_FUNC(__thiscall_ ## func, \
43                    "popl %eax\n\t" \
44                    "pushl %ecx\n\t" \
45                    "pushl %eax\n\t" \
46                    "jmp " __ASM_NAME(#func) )
47 #else /* __i386__ */
48
49 #define THISCALL(func) func
50 #define DEFINE_THISCALL_WRAPPER(func) /* nothing */
51
52 #endif /* __i386__ */
53
54 WINE_DEFAULT_DEBUG_CHANNEL(richedit);
55
56 typedef struct ITextServicesImpl {
57    const ITextServicesVtbl *lpVtbl;
58    ITextHost *pMyHost;
59    LONG ref;
60    CRITICAL_SECTION csTxtSrv;
61 } ITextServicesImpl;
62
63 static const ITextServicesVtbl textservices_Vtbl;
64
65 /******************************************************************
66  *        CreateTextServices (RICHED20.4)
67  */
68 HRESULT WINAPI CreateTextServices(IUnknown  * pUnkOuter,
69                                   ITextHost * pITextHost,
70                                   IUnknown  **ppUnk)
71 {
72    ITextServicesImpl *ITextImpl;
73    TRACE("%p %p --> %p\n", pUnkOuter, pITextHost, ppUnk);
74    if (pITextHost == NULL)
75       return E_POINTER;
76
77    ITextImpl = CoTaskMemAlloc(sizeof(*ITextImpl));
78    if (ITextImpl == NULL)
79       return E_OUTOFMEMORY;
80    InitializeCriticalSection(&ITextImpl->csTxtSrv);
81    ITextImpl->ref = 1;
82    ITextImpl->pMyHost = pITextHost;
83    ITextImpl->lpVtbl = &textservices_Vtbl;
84
85    if (pUnkOuter)
86    {
87       FIXME("Support aggregation\n");
88       return CLASS_E_NOAGGREGATION;
89    }
90
91    *ppUnk = (IUnknown *)ITextImpl;
92    return S_OK;
93 }
94
95 #define ICOM_THIS_MULTI(impl,field,iface) \
96                     impl* const This=(impl*)((char*)(iface) - offsetof(impl,field))
97
98 static HRESULT WINAPI fnTextSrv_QueryInterface(ITextServices * iface,
99                                                REFIID riid,
100                                                LPVOID * ppv)
101 {
102    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
103    TRACE("(%p/%p)->(%s, %p)\n", This, iface, debugstr_guid(riid), ppv);
104    *ppv = NULL;
105    if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_ITextServices))
106       *ppv = (LPVOID)This;
107
108    if (*ppv)
109    {
110       IUnknown_AddRef((IUnknown *)(*ppv));
111       TRACE ("-- Interface = %p\n", *ppv);
112       return S_OK;
113    }
114    FIXME("Unknown interface: %s\n", debugstr_guid(riid));
115    return E_NOINTERFACE;
116 }
117
118 static ULONG WINAPI fnTextSrv_AddRef(ITextServices *iface)
119 {
120    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
121    DWORD ref = InterlockedIncrement(&This->ref);
122
123    TRACE("(%p/%p)->() AddRef from %ld\n", This, iface, ref - 1);
124    return ref;
125 }
126
127 static ULONG WINAPI fnTextSrv_Release(ITextServices *iface)
128 {
129    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
130    DWORD ref = InterlockedDecrement(&This->ref);
131
132    TRACE("(%p/%p)->() Release from %ld\n", This, iface, ref + 1);
133
134    if (!ref)
135    {
136       ITextHost_Release(This->pMyHost);
137       DeleteCriticalSection(&This->csTxtSrv);
138       CoTaskMemFree(This);
139    }
140    return ref;
141 }
142
143 HRESULT WINAPI fnTextSrv_TxSendMessage(ITextServices *iface,
144                                        UINT msg,
145                                        WPARAM wparam,
146                                        LPARAM lparam,
147                                        LRESULT* plresult)
148 {
149    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
150
151    FIXME("%p: STUB\n", This);
152    return E_NOTIMPL;
153 }
154
155 HRESULT WINAPI fnTextSrv_TxDraw(ITextServices *iface,
156                                 DWORD dwDrawAspect,
157                                 LONG lindex,
158                                 void* pvAspect,
159                                 DVTARGETDEVICE* ptd,
160                                 HDC hdcDraw,
161                                 HDC hdcTargetDev,
162                                 LPCRECTL lprcBounds,
163                                 LPCRECTL lprcWBounds,
164                                 LPRECT lprcUpdate,
165                                 BOOL (CALLBACK * pfnContinue)(DWORD),
166                                 DWORD dwContinue,
167                                 LONG lViewId)
168 {
169    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
170
171    FIXME("%p: STUB\n", This);
172    return E_NOTIMPL;
173 }
174
175 HRESULT WINAPI fnTextSrv_TxGetHScroll(ITextServices *iface,
176                                       LONG* plMin,
177                                       LONG* plMax,
178                                       LONG* plPos,
179                                       LONG* plPage,
180                                       BOOL* pfEnabled)
181 {
182    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
183
184    FIXME("%p: STUB\n", This);
185    return E_NOTIMPL;
186 }
187
188 HRESULT WINAPI fnTextSrv_TxGetVScroll(ITextServices *iface,
189                                       LONG* plMin,
190                                       LONG* plMax,
191                                       LONG* plPos,
192                                       LONG* plPage,
193                                       BOOL* pfEnabled)
194 {
195    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
196
197    FIXME("%p: STUB\n", This);
198    return E_NOTIMPL;
199 }
200
201 HRESULT WINAPI fnTextSrv_OnTxSetCursor(ITextServices *iface,
202                                        DWORD dwDrawAspect,
203                                        LONG lindex,
204                                        void* pvAspect,
205                                        DVTARGETDEVICE* ptd,
206                                        HDC hdcDraw,
207                                        HDC hicTargetDev,
208                                        LPCRECT lprcClient,
209                                        INT x, INT y)
210 {
211    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
212
213    FIXME("%p: STUB\n", This);
214    return E_NOTIMPL;
215 }
216
217 HRESULT WINAPI fnTextSrv_TxQueryHitPoint(ITextServices *iface,
218                                          DWORD dwDrawAspect,
219                                          LONG lindex,
220                                          void* pvAspect,
221                                          DVTARGETDEVICE* ptd,
222                                          HDC hdcDraw,
223                                          HDC hicTargetDev,
224                                          LPCRECT lprcClient,
225                                          INT x, INT y,
226                                          DWORD* pHitResult)
227 {
228    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
229
230    FIXME("%p: STUB\n", This);
231    return E_NOTIMPL;
232 }
233
234 HRESULT WINAPI fnTextSrv_OnTxInplaceActivate(ITextServices *iface,
235                                              LPCRECT prcClient)
236 {
237    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
238
239    FIXME("%p: STUB\n", This);
240    return E_NOTIMPL;
241 }
242
243 HRESULT WINAPI fnTextSrv_OnTxInplaceDeactivate(ITextServices *iface)
244 {
245    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
246
247    FIXME("%p: STUB\n", This);
248    return E_NOTIMPL;
249 }
250
251 HRESULT WINAPI fnTextSrv_OnTxUIActivate(ITextServices *iface)
252 {
253    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
254
255    FIXME("%p: STUB\n", This);
256    return E_NOTIMPL;
257 }
258
259 HRESULT WINAPI fnTextSrv_OnTxUIDeactivate(ITextServices *iface)
260 {
261    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
262
263    FIXME("%p: STUB\n", This);
264    return E_NOTIMPL;
265 }
266
267 HRESULT WINAPI fnTextSrv_TxGetText(ITextServices *iface,
268                                    BSTR* pbstrText)
269 {
270    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
271
272    FIXME("%p: STUB\n", This);
273    return E_NOTIMPL;
274 }
275
276 HRESULT WINAPI fnTextSrv_TxSetText(ITextServices *iface,
277                                    LPCWSTR pszText)
278 {
279    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
280
281    FIXME("%p: STUB\n", This);
282    return E_NOTIMPL;
283 }
284
285 HRESULT WINAPI fnTextSrv_TxGetCurrentTargetX(ITextServices *iface,
286                                              LONG* x)
287 {
288    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
289
290    FIXME("%p: STUB\n", This);
291    return E_NOTIMPL;
292 }
293
294 HRESULT WINAPI fnTextSrv_TxGetBaseLinePos(ITextServices *iface,
295                                           LONG* x)
296 {
297    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
298
299    FIXME("%p: STUB\n", This);
300    return E_NOTIMPL;
301 }
302
303 HRESULT WINAPI fnTextSrv_TxGetNaturalSize(ITextServices *iface,
304                                           DWORD dwAspect,
305                                           HDC hdcDraw,
306                                           HDC hicTargetDev,
307                                           DVTARGETDEVICE* ptd,
308                                           DWORD dwMode,
309                                           const SIZEL* psizelExtent,
310                                           LONG* pwidth,
311                                           LONG* pheight)
312 {
313    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
314
315    FIXME("%p: STUB\n", This);
316    return E_NOTIMPL;
317 }
318
319 HRESULT WINAPI fnTextSrv_TxGetDropTarget(ITextServices *iface,
320                                          IDropTarget** ppDropTarget)
321 {
322    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
323
324    FIXME("%p: STUB\n", This);
325    return E_NOTIMPL;
326 }
327
328 HRESULT WINAPI fnTextSrv_OnTxPropertyBitsChange(ITextServices *iface,
329                                                 DWORD dwMask,
330                                                 DWORD dwBits)
331 {
332    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
333
334    FIXME("%p: STUB\n", This);
335    return E_NOTIMPL;
336 }
337
338 HRESULT WINAPI fnTextSrv_TxGetCachedSize(ITextServices *iface,
339                                          DWORD* pdwWidth,
340                                          DWORD* pdwHeight)
341 {
342    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
343
344    FIXME("%p: STUB\n", This);
345    return E_NOTIMPL;
346 }
347
348 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxSendMessage);
349 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxDraw);
350 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetHScroll);
351 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetVScroll);
352 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxSetCursor);
353 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxQueryHitPoint);
354 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxInplaceActivate);
355 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxInplaceDeactivate);
356 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxUIActivate);
357 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxUIDeactivate);
358 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetText);
359 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxSetText);
360 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetCurrentTargetX);
361 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetBaseLinePos);
362 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetNaturalSize);
363 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetDropTarget);
364 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxPropertyBitsChange);
365 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetCachedSize);
366
367 static const ITextServicesVtbl textservices_Vtbl =
368 {
369    fnTextSrv_QueryInterface,
370    fnTextSrv_AddRef,
371    fnTextSrv_Release,
372    THISCALL(fnTextSrv_TxSendMessage),
373    THISCALL(fnTextSrv_TxDraw),
374    THISCALL(fnTextSrv_TxGetHScroll),
375    THISCALL(fnTextSrv_TxGetVScroll),
376    THISCALL(fnTextSrv_OnTxSetCursor),
377    THISCALL(fnTextSrv_TxQueryHitPoint),
378    THISCALL(fnTextSrv_OnTxInplaceActivate),
379    THISCALL(fnTextSrv_OnTxInplaceDeactivate),
380    THISCALL(fnTextSrv_OnTxUIActivate),
381    THISCALL(fnTextSrv_OnTxUIDeactivate),
382    THISCALL(fnTextSrv_TxGetText),
383    THISCALL(fnTextSrv_TxSetText),
384    THISCALL(fnTextSrv_TxGetCurrentTargetX),
385    THISCALL(fnTextSrv_TxGetBaseLinePos),
386    THISCALL(fnTextSrv_TxGetNaturalSize),
387    THISCALL(fnTextSrv_TxGetDropTarget),
388    THISCALL(fnTextSrv_OnTxPropertyBitsChange),
389    THISCALL(fnTextSrv_TxGetCachedSize)
390 };