comctl32: Constify some variables.
[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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, 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->csTxtSrv.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": ITextServicesImpl.csTxtSrv");
82    ITextImpl->ref = 1;
83    ITextHost_AddRef(pITextHost);
84    ITextImpl->pMyHost = pITextHost;
85    ITextImpl->lpVtbl = &textservices_Vtbl;
86
87    if (pUnkOuter)
88    {
89       FIXME("Support aggregation\n");
90       return CLASS_E_NOAGGREGATION;
91    }
92
93    *ppUnk = (IUnknown *)ITextImpl;
94    return S_OK;
95 }
96
97 #define ICOM_THIS_MULTI(impl,field,iface) \
98                     impl* const This=(impl*)((char*)(iface) - offsetof(impl,field))
99
100 static HRESULT WINAPI fnTextSrv_QueryInterface(ITextServices * iface,
101                                                REFIID riid,
102                                                LPVOID * ppv)
103 {
104    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
105    TRACE("(%p/%p)->(%s, %p)\n", This, iface, debugstr_guid(riid), ppv);
106    *ppv = NULL;
107    if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_ITextServices))
108       *ppv = (LPVOID)This;
109
110    if (*ppv)
111    {
112       IUnknown_AddRef((IUnknown *)(*ppv));
113       TRACE ("-- Interface = %p\n", *ppv);
114       return S_OK;
115    }
116    FIXME("Unknown interface: %s\n", debugstr_guid(riid));
117    return E_NOINTERFACE;
118 }
119
120 static ULONG WINAPI fnTextSrv_AddRef(ITextServices *iface)
121 {
122    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
123    DWORD ref = InterlockedIncrement(&This->ref);
124
125    TRACE("(%p/%p)->() AddRef from %d\n", This, iface, ref - 1);
126    return ref;
127 }
128
129 static ULONG WINAPI fnTextSrv_Release(ITextServices *iface)
130 {
131    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
132    DWORD ref = InterlockedDecrement(&This->ref);
133
134    TRACE("(%p/%p)->() Release from %d\n", This, iface, ref + 1);
135
136    if (!ref)
137    {
138       ITextHost_Release(This->pMyHost);
139       This->csTxtSrv.DebugInfo->Spare[0] = 0;
140       DeleteCriticalSection(&This->csTxtSrv);
141       CoTaskMemFree(This);
142    }
143    return ref;
144 }
145
146 HRESULT WINAPI fnTextSrv_TxSendMessage(ITextServices *iface,
147                                        UINT msg,
148                                        WPARAM wparam,
149                                        LPARAM lparam,
150                                        LRESULT* plresult)
151 {
152    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
153
154    FIXME("%p: STUB\n", This);
155    return E_NOTIMPL;
156 }
157
158 HRESULT WINAPI fnTextSrv_TxDraw(ITextServices *iface,
159                                 DWORD dwDrawAspect,
160                                 LONG lindex,
161                                 void* pvAspect,
162                                 DVTARGETDEVICE* ptd,
163                                 HDC hdcDraw,
164                                 HDC hdcTargetDev,
165                                 LPCRECTL lprcBounds,
166                                 LPCRECTL lprcWBounds,
167                                 LPRECT lprcUpdate,
168                                 BOOL (CALLBACK * pfnContinue)(DWORD),
169                                 DWORD dwContinue,
170                                 LONG lViewId)
171 {
172    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
173
174    FIXME("%p: STUB\n", This);
175    return E_NOTIMPL;
176 }
177
178 HRESULT WINAPI fnTextSrv_TxGetHScroll(ITextServices *iface,
179                                       LONG* plMin,
180                                       LONG* plMax,
181                                       LONG* plPos,
182                                       LONG* plPage,
183                                       BOOL* pfEnabled)
184 {
185    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
186
187    FIXME("%p: STUB\n", This);
188    return E_NOTIMPL;
189 }
190
191 HRESULT WINAPI fnTextSrv_TxGetVScroll(ITextServices *iface,
192                                       LONG* plMin,
193                                       LONG* plMax,
194                                       LONG* plPos,
195                                       LONG* plPage,
196                                       BOOL* pfEnabled)
197 {
198    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
199
200    FIXME("%p: STUB\n", This);
201    return E_NOTIMPL;
202 }
203
204 HRESULT WINAPI fnTextSrv_OnTxSetCursor(ITextServices *iface,
205                                        DWORD dwDrawAspect,
206                                        LONG lindex,
207                                        void* pvAspect,
208                                        DVTARGETDEVICE* ptd,
209                                        HDC hdcDraw,
210                                        HDC hicTargetDev,
211                                        LPCRECT lprcClient,
212                                        INT x, INT y)
213 {
214    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
215
216    FIXME("%p: STUB\n", This);
217    return E_NOTIMPL;
218 }
219
220 HRESULT WINAPI fnTextSrv_TxQueryHitPoint(ITextServices *iface,
221                                          DWORD dwDrawAspect,
222                                          LONG lindex,
223                                          void* pvAspect,
224                                          DVTARGETDEVICE* ptd,
225                                          HDC hdcDraw,
226                                          HDC hicTargetDev,
227                                          LPCRECT lprcClient,
228                                          INT x, INT y,
229                                          DWORD* pHitResult)
230 {
231    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
232
233    FIXME("%p: STUB\n", This);
234    return E_NOTIMPL;
235 }
236
237 HRESULT WINAPI fnTextSrv_OnTxInplaceActivate(ITextServices *iface,
238                                              LPCRECT prcClient)
239 {
240    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
241
242    FIXME("%p: STUB\n", This);
243    return E_NOTIMPL;
244 }
245
246 HRESULT WINAPI fnTextSrv_OnTxInplaceDeactivate(ITextServices *iface)
247 {
248    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
249
250    FIXME("%p: STUB\n", This);
251    return E_NOTIMPL;
252 }
253
254 HRESULT WINAPI fnTextSrv_OnTxUIActivate(ITextServices *iface)
255 {
256    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
257
258    FIXME("%p: STUB\n", This);
259    return E_NOTIMPL;
260 }
261
262 HRESULT WINAPI fnTextSrv_OnTxUIDeactivate(ITextServices *iface)
263 {
264    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
265
266    FIXME("%p: STUB\n", This);
267    return E_NOTIMPL;
268 }
269
270 HRESULT WINAPI fnTextSrv_TxGetText(ITextServices *iface,
271                                    BSTR* pbstrText)
272 {
273    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
274
275    FIXME("%p: STUB\n", This);
276    return E_NOTIMPL;
277 }
278
279 HRESULT WINAPI fnTextSrv_TxSetText(ITextServices *iface,
280                                    LPCWSTR pszText)
281 {
282    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
283
284    FIXME("%p: STUB\n", This);
285    return E_NOTIMPL;
286 }
287
288 HRESULT WINAPI fnTextSrv_TxGetCurrentTargetX(ITextServices *iface,
289                                              LONG* x)
290 {
291    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
292
293    FIXME("%p: STUB\n", This);
294    return E_NOTIMPL;
295 }
296
297 HRESULT WINAPI fnTextSrv_TxGetBaseLinePos(ITextServices *iface,
298                                           LONG* x)
299 {
300    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
301
302    FIXME("%p: STUB\n", This);
303    return E_NOTIMPL;
304 }
305
306 HRESULT WINAPI fnTextSrv_TxGetNaturalSize(ITextServices *iface,
307                                           DWORD dwAspect,
308                                           HDC hdcDraw,
309                                           HDC hicTargetDev,
310                                           DVTARGETDEVICE* ptd,
311                                           DWORD dwMode,
312                                           const SIZEL* psizelExtent,
313                                           LONG* pwidth,
314                                           LONG* pheight)
315 {
316    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
317
318    FIXME("%p: STUB\n", This);
319    return E_NOTIMPL;
320 }
321
322 HRESULT WINAPI fnTextSrv_TxGetDropTarget(ITextServices *iface,
323                                          IDropTarget** ppDropTarget)
324 {
325    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
326
327    FIXME("%p: STUB\n", This);
328    return E_NOTIMPL;
329 }
330
331 HRESULT WINAPI fnTextSrv_OnTxPropertyBitsChange(ITextServices *iface,
332                                                 DWORD dwMask,
333                                                 DWORD dwBits)
334 {
335    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
336
337    FIXME("%p: STUB\n", This);
338    return E_NOTIMPL;
339 }
340
341 HRESULT WINAPI fnTextSrv_TxGetCachedSize(ITextServices *iface,
342                                          DWORD* pdwWidth,
343                                          DWORD* pdwHeight)
344 {
345    ICOM_THIS_MULTI(ITextServicesImpl, lpVtbl, iface);
346
347    FIXME("%p: STUB\n", This);
348    return E_NOTIMPL;
349 }
350
351 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxSendMessage)
352 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxDraw)
353 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetHScroll)
354 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetVScroll)
355 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxSetCursor)
356 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxQueryHitPoint)
357 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxInplaceActivate)
358 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxInplaceDeactivate)
359 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxUIActivate)
360 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxUIDeactivate)
361 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetText)
362 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxSetText)
363 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetCurrentTargetX)
364 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetBaseLinePos)
365 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetNaturalSize)
366 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetDropTarget)
367 DEFINE_THISCALL_WRAPPER(fnTextSrv_OnTxPropertyBitsChange)
368 DEFINE_THISCALL_WRAPPER(fnTextSrv_TxGetCachedSize)
369
370 static const ITextServicesVtbl textservices_Vtbl =
371 {
372    fnTextSrv_QueryInterface,
373    fnTextSrv_AddRef,
374    fnTextSrv_Release,
375    THISCALL(fnTextSrv_TxSendMessage),
376    THISCALL(fnTextSrv_TxDraw),
377    THISCALL(fnTextSrv_TxGetHScroll),
378    THISCALL(fnTextSrv_TxGetVScroll),
379    THISCALL(fnTextSrv_OnTxSetCursor),
380    THISCALL(fnTextSrv_TxQueryHitPoint),
381    THISCALL(fnTextSrv_OnTxInplaceActivate),
382    THISCALL(fnTextSrv_OnTxInplaceDeactivate),
383    THISCALL(fnTextSrv_OnTxUIActivate),
384    THISCALL(fnTextSrv_OnTxUIDeactivate),
385    THISCALL(fnTextSrv_TxGetText),
386    THISCALL(fnTextSrv_TxSetText),
387    THISCALL(fnTextSrv_TxGetCurrentTargetX),
388    THISCALL(fnTextSrv_TxGetBaseLinePos),
389    THISCALL(fnTextSrv_TxGetNaturalSize),
390    THISCALL(fnTextSrv_TxGetDropTarget),
391    THISCALL(fnTextSrv_OnTxPropertyBitsChange),
392    THISCALL(fnTextSrv_TxGetCachedSize)
393 };