imagehlp: Forward some more 64-bit functions to dbghelp.
[wine] / dlls / msctf / threadmgr.c
1 /*
2  *  ITfThreadMgr implementation
3  *
4  *  Copyright 2008 Aric Stewart, CodeWeavers
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
23 #include <stdarg.h>
24
25 #define COBJMACROS
26
27 #include "wine/debug.h"
28 #include "windef.h"
29 #include "winbase.h"
30 #include "winreg.h"
31 #include "winuser.h"
32 #include "shlwapi.h"
33 #include "winerror.h"
34 #include "objbase.h"
35 #include "olectl.h"
36
37 #include "wine/unicode.h"
38 #include "wine/list.h"
39
40 #include "msctf.h"
41 #include "msctf_internal.h"
42
43 WINE_DEFAULT_DEBUG_CHANNEL(msctf);
44
45 typedef struct tagThreadMgrSink {
46     struct list         entry;
47     union {
48         /* ThreadMgr Sinks */
49         IUnknown            *pIUnknown;
50         /* ITfActiveLanguageProfileNotifySink *pITfActiveLanguageProfileNotifySink; */
51         /* ITfDisplayAttributeNotifySink *pITfDisplayAttributeNotifySink; */
52         /* ITfKeyTraceEventSink *pITfKeyTraceEventSink; */
53         /* ITfPreservedKeyNotifySink *pITfPreservedKeyNotifySink; */
54         /* ITfThreadFocusSink *pITfThreadFocusSink; */
55         ITfThreadMgrEventSink *pITfThreadMgrEventSink;
56     } interfaces;
57 } ThreadMgrSink;
58
59 typedef struct tagACLMulti {
60     const ITfThreadMgrVtbl *ThreadMgrVtbl;
61     const ITfSourceVtbl *SourceVtbl;
62     LONG refCount;
63
64     const ITfThreadMgrEventSinkVtbl *ThreadMgrEventSinkVtbl; /* internal */
65
66     ITfDocumentMgr *focus;
67
68     /* kept as separate lists to reduce unnecessary iterations */
69     struct list     ActiveLanguageProfileNotifySink;
70     struct list     DisplayAttributeNotifySink;
71     struct list     KeyTraceEventSink;
72     struct list     PreservedKeyNotifySink;
73     struct list     ThreadFocusSink;
74     struct list     ThreadMgrEventSink;
75 } ThreadMgr;
76
77 static inline ThreadMgr *impl_from_ITfSourceVtbl(ITfSource *iface)
78 {
79     return (ThreadMgr *)((char *)iface - FIELD_OFFSET(ThreadMgr,SourceVtbl));
80 }
81
82 static inline ThreadMgr *impl_from_ITfThreadMgrEventSink(ITfThreadMgrEventSink *iface)
83 {
84     return (ThreadMgr *)((char *)iface - FIELD_OFFSET(ThreadMgr,ThreadMgrEventSinkVtbl));
85 }
86
87 static void free_sink(ThreadMgrSink *sink)
88 {
89         IUnknown_Release(sink->interfaces.pIUnknown);
90         HeapFree(GetProcessHeap(),0,sink);
91 }
92
93 static void ThreadMgr_Destructor(ThreadMgr *This)
94 {
95     struct list *cursor, *cursor2;
96
97     TlsSetValue(tlsIndex,NULL);
98     TRACE("destroying %p\n", This);
99     if (This->focus)
100         ITfDocumentMgr_Release(This->focus);
101
102     /* free sinks */
103     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->ActiveLanguageProfileNotifySink)
104     {
105         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
106         list_remove(cursor);
107         free_sink(sink);
108     }
109     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->DisplayAttributeNotifySink)
110     {
111         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
112         list_remove(cursor);
113         free_sink(sink);
114     }
115     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->KeyTraceEventSink)
116     {
117         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
118         list_remove(cursor);
119         free_sink(sink);
120     }
121     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->PreservedKeyNotifySink)
122     {
123         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
124         list_remove(cursor);
125         free_sink(sink);
126     }
127     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->ThreadFocusSink)
128     {
129         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
130         list_remove(cursor);
131         free_sink(sink);
132     }
133     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->ThreadMgrEventSink)
134     {
135         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
136         list_remove(cursor);
137         free_sink(sink);
138     }
139
140     HeapFree(GetProcessHeap(),0,This);
141 }
142
143 static HRESULT WINAPI ThreadMgr_QueryInterface(ITfThreadMgr *iface, REFIID iid, LPVOID *ppvOut)
144 {
145     ThreadMgr *This = (ThreadMgr *)iface;
146     *ppvOut = NULL;
147
148     if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_ITfThreadMgr))
149     {
150         *ppvOut = This;
151     }
152     else if (IsEqualIID(iid, &IID_ITfSource))
153     {
154         *ppvOut = &This->SourceVtbl;
155     }
156
157     if (*ppvOut)
158     {
159         IUnknown_AddRef(iface);
160         return S_OK;
161     }
162
163     WARN("unsupported interface: %s\n", debugstr_guid(iid));
164     return E_NOINTERFACE;
165 }
166
167 static ULONG WINAPI ThreadMgr_AddRef(ITfThreadMgr *iface)
168 {
169     ThreadMgr *This = (ThreadMgr *)iface;
170     return InterlockedIncrement(&This->refCount);
171 }
172
173 static ULONG WINAPI ThreadMgr_Release(ITfThreadMgr *iface)
174 {
175     ThreadMgr *This = (ThreadMgr *)iface;
176     ULONG ret;
177
178     ret = InterlockedDecrement(&This->refCount);
179     if (ret == 0)
180         ThreadMgr_Destructor(This);
181     return ret;
182 }
183
184 /*****************************************************
185  * ITfThreadMgr functions
186  *****************************************************/
187
188 static HRESULT WINAPI ThreadMgr_fnActivate( ITfThreadMgr* iface, TfClientId *ptid)
189 {
190     ThreadMgr *This = (ThreadMgr *)iface;
191     FIXME("STUB:(%p)\n",This);
192     return E_NOTIMPL;
193 }
194
195 static HRESULT WINAPI ThreadMgr_fnDeactivate( ITfThreadMgr* iface)
196 {
197     ThreadMgr *This = (ThreadMgr *)iface;
198     FIXME("STUB:(%p)\n",This);
199
200     if (This->focus)
201     {
202         ITfThreadMgrEventSink_OnSetFocus((ITfThreadMgrEventSink*)&This->ThreadMgrEventSinkVtbl, 0, This->focus);
203         ITfDocumentMgr_Release(This->focus);
204         This->focus = 0;
205     }
206
207     return E_NOTIMPL;
208 }
209
210 static HRESULT WINAPI ThreadMgr_CreateDocumentMgr( ITfThreadMgr* iface, ITfDocumentMgr
211 **ppdim)
212 {
213     ThreadMgr *This = (ThreadMgr *)iface;
214     TRACE("(%p)\n",iface);
215     return DocumentMgr_Constructor((ITfThreadMgrEventSink*)&This->ThreadMgrEventSinkVtbl, ppdim);
216 }
217
218 static HRESULT WINAPI ThreadMgr_EnumDocumentMgrs( ITfThreadMgr* iface, IEnumTfDocumentMgrs
219 **ppEnum)
220 {
221     ThreadMgr *This = (ThreadMgr *)iface;
222     FIXME("STUB:(%p)\n",This);
223     return E_NOTIMPL;
224 }
225
226 static HRESULT WINAPI ThreadMgr_GetFocus( ITfThreadMgr* iface, ITfDocumentMgr
227 **ppdimFocus)
228 {
229     ThreadMgr *This = (ThreadMgr *)iface;
230     TRACE("(%p)\n",This);
231
232     if (!ppdimFocus)
233         return E_INVALIDARG;
234
235     *ppdimFocus = This->focus;
236
237     TRACE("->%p\n",This->focus);
238
239     if (This->focus == NULL)
240         return S_FALSE;
241
242     ITfDocumentMgr_AddRef(This->focus);
243
244     return S_OK;
245 }
246
247 static HRESULT WINAPI ThreadMgr_SetFocus( ITfThreadMgr* iface, ITfDocumentMgr *pdimFocus)
248 {
249     ITfDocumentMgr *check;
250     ThreadMgr *This = (ThreadMgr *)iface;
251
252     TRACE("(%p) %p\n",This,pdimFocus);
253
254     if (!pdimFocus || FAILED(IUnknown_QueryInterface(pdimFocus,&IID_ITfDocumentMgr,(LPVOID*) &check)))
255         return E_INVALIDARG;
256
257     ITfThreadMgrEventSink_OnSetFocus((ITfThreadMgrEventSink*)&This->ThreadMgrEventSinkVtbl, check, This->focus);
258
259     if (This->focus)
260         ITfDocumentMgr_Release(This->focus);
261
262     This->focus = check;
263     return S_OK;
264 }
265
266 static HRESULT WINAPI ThreadMgr_AssociateFocus( ITfThreadMgr* iface, HWND hwnd,
267 ITfDocumentMgr *pdimNew, ITfDocumentMgr **ppdimPrev)
268 {
269     ThreadMgr *This = (ThreadMgr *)iface;
270     FIXME("STUB:(%p)\n",This);
271     return E_NOTIMPL;
272 }
273
274 static HRESULT WINAPI ThreadMgr_IsThreadFocus( ITfThreadMgr* iface, BOOL *pfThreadFocus)
275 {
276     ThreadMgr *This = (ThreadMgr *)iface;
277     FIXME("STUB:(%p)\n",This);
278     return E_NOTIMPL;
279 }
280
281 static HRESULT WINAPI ThreadMgr_GetFunctionProvider( ITfThreadMgr* iface, REFCLSID clsid,
282 ITfFunctionProvider **ppFuncProv)
283 {
284     ThreadMgr *This = (ThreadMgr *)iface;
285     FIXME("STUB:(%p)\n",This);
286     return E_NOTIMPL;
287 }
288
289 static HRESULT WINAPI ThreadMgr_EnumFunctionProviders( ITfThreadMgr* iface,
290 IEnumTfFunctionProviders **ppEnum)
291 {
292     ThreadMgr *This = (ThreadMgr *)iface;
293     FIXME("STUB:(%p)\n",This);
294     return E_NOTIMPL;
295 }
296
297 static HRESULT WINAPI ThreadMgr_GetGlobalCompartment( ITfThreadMgr* iface,
298 ITfCompartmentMgr **ppCompMgr)
299 {
300     ThreadMgr *This = (ThreadMgr *)iface;
301     FIXME("STUB:(%p)\n",This);
302     return E_NOTIMPL;
303 }
304
305 static const ITfThreadMgrVtbl ThreadMgr_ThreadMgrVtbl =
306 {
307     ThreadMgr_QueryInterface,
308     ThreadMgr_AddRef,
309     ThreadMgr_Release,
310
311     ThreadMgr_fnActivate,
312     ThreadMgr_fnDeactivate,
313     ThreadMgr_CreateDocumentMgr,
314     ThreadMgr_EnumDocumentMgrs,
315     ThreadMgr_GetFocus,
316     ThreadMgr_SetFocus,
317     ThreadMgr_AssociateFocus,
318     ThreadMgr_IsThreadFocus,
319     ThreadMgr_GetFunctionProvider,
320     ThreadMgr_EnumFunctionProviders,
321     ThreadMgr_GetGlobalCompartment
322 };
323
324
325 static HRESULT WINAPI Source_QueryInterface(ITfSource *iface, REFIID iid, LPVOID *ppvOut)
326 {
327     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
328     return ThreadMgr_QueryInterface((ITfThreadMgr *)This, iid, *ppvOut);
329 }
330
331 static ULONG WINAPI Source_AddRef(ITfSource *iface)
332 {
333     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
334     return ThreadMgr_AddRef((ITfThreadMgr*)This);
335 }
336
337 static ULONG WINAPI Source_Release(ITfSource *iface)
338 {
339     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
340     return ThreadMgr_Release((ITfThreadMgr *)This);
341 }
342
343 /*****************************************************
344  * ITfSource functions
345  *****************************************************/
346 static WINAPI HRESULT ThreadMgrSource_AdviseSink(ITfSource *iface,
347         REFIID riid, IUnknown *punk, DWORD *pdwCookie)
348 {
349     ThreadMgrSink *tms;
350     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
351
352     TRACE("(%p) %s %p %p\n",This,debugstr_guid(riid),punk,pdwCookie);
353
354     if (!riid || !punk || !pdwCookie)
355         return E_INVALIDARG;
356
357     if (IsEqualIID(riid, &IID_ITfThreadMgrEventSink))
358     {
359         tms = HeapAlloc(GetProcessHeap(),0,sizeof(ThreadMgrSink));
360         if (!tms)
361             return E_OUTOFMEMORY;
362         if (!SUCCEEDED(IUnknown_QueryInterface(punk, riid, (LPVOID*)&tms->interfaces.pITfThreadMgrEventSink)))
363         {
364             HeapFree(GetProcessHeap(),0,tms);
365             return CONNECT_E_CANNOTCONNECT;
366         }
367         list_add_head(&This->ThreadMgrEventSink,&tms->entry);
368         *pdwCookie = (DWORD)tms;
369     }
370     else
371     {
372         FIXME("(%p) Unhandled Sink: %s\n",This,debugstr_guid(riid));
373         return E_NOTIMPL;
374     }
375
376     TRACE("cookie %x\n",*pdwCookie);
377
378     return S_OK;
379 }
380
381 static WINAPI HRESULT ThreadMgrSource_UnadviseSink(ITfSource *iface, DWORD pdwCookie)
382 {
383     ThreadMgrSink *sink = (ThreadMgrSink*)pdwCookie;
384     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
385     TRACE("(%p) %x\n",This,pdwCookie);
386
387     list_remove(&sink->entry);
388     free_sink(sink);
389
390     return S_OK;
391 }
392
393 static const ITfSourceVtbl ThreadMgr_SourceVtbl =
394 {
395     Source_QueryInterface,
396     Source_AddRef,
397     Source_Release,
398
399     ThreadMgrSource_AdviseSink,
400     ThreadMgrSource_UnadviseSink,
401 };
402
403 /*****************************************************
404  * ITfThreadMgrEventSink functions  (internal)
405  *****************************************************/
406 static HRESULT WINAPI ThreadMgrEventSink_QueryInterface(ITfThreadMgrEventSink *iface, REFIID iid, LPVOID *ppvOut)
407 {
408     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
409     return ThreadMgr_QueryInterface((ITfThreadMgr *)This, iid, *ppvOut);
410 }
411
412 static ULONG WINAPI ThreadMgrEventSink_AddRef(ITfThreadMgrEventSink *iface)
413 {
414     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
415     return ThreadMgr_AddRef((ITfThreadMgr*)This);
416 }
417
418 static ULONG WINAPI ThreadMgrEventSink_Release(ITfThreadMgrEventSink *iface)
419 {
420     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
421     return ThreadMgr_Release((ITfThreadMgr *)This);
422 }
423
424
425 static WINAPI HRESULT ThreadMgrEventSink_OnInitDocumentMgr(
426         ITfThreadMgrEventSink *iface,ITfDocumentMgr *pdim)
427 {
428     struct list *cursor;
429     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
430
431     TRACE("(%p) %p\n",This,pdim);
432
433     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
434     {
435         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
436         ITfThreadMgrEventSink_OnInitDocumentMgr(sink->interfaces.pITfThreadMgrEventSink,pdim);
437     }
438
439     return S_OK;
440 }
441
442 static WINAPI HRESULT ThreadMgrEventSink_OnUninitDocumentMgr(
443         ITfThreadMgrEventSink *iface, ITfDocumentMgr *pdim)
444 {
445     struct list *cursor;
446     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
447
448     TRACE("(%p) %p\n",This,pdim);
449
450     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
451     {
452         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
453         ITfThreadMgrEventSink_OnUninitDocumentMgr(sink->interfaces.pITfThreadMgrEventSink,pdim);
454     }
455
456     return S_OK;
457 }
458
459 static WINAPI HRESULT ThreadMgrEventSink_OnSetFocus(
460         ITfThreadMgrEventSink *iface, ITfDocumentMgr *pdimFocus,
461         ITfDocumentMgr *pdimPrevFocus)
462 {
463     struct list *cursor;
464     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
465
466     TRACE("(%p) %p %p\n",This,pdimFocus, pdimPrevFocus);
467
468     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
469     {
470         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
471         ITfThreadMgrEventSink_OnSetFocus(sink->interfaces.pITfThreadMgrEventSink, pdimFocus, pdimPrevFocus);
472     }
473
474     return S_OK;
475 }
476
477 static WINAPI HRESULT ThreadMgrEventSink_OnPushContext(
478         ITfThreadMgrEventSink *iface, ITfContext *pic)
479 {
480     struct list *cursor;
481     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
482
483     TRACE("(%p) %p\n",This,pic);
484
485     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
486     {
487         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
488         ITfThreadMgrEventSink_OnPushContext(sink->interfaces.pITfThreadMgrEventSink,pic);
489     }
490
491     return S_OK;
492 }
493
494 static WINAPI HRESULT ThreadMgrEventSink_OnPopContext(
495         ITfThreadMgrEventSink *iface, ITfContext *pic)
496 {
497     struct list *cursor;
498     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
499
500     TRACE("(%p) %p\n",This,pic);
501
502     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
503     {
504         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
505         ITfThreadMgrEventSink_OnPopContext(sink->interfaces.pITfThreadMgrEventSink,pic);
506     }
507
508     return S_OK;
509 }
510
511 static const ITfThreadMgrEventSinkVtbl ThreadMgr_ThreadMgrEventSinkVtbl =
512 {
513     ThreadMgrEventSink_QueryInterface,
514     ThreadMgrEventSink_AddRef,
515     ThreadMgrEventSink_Release,
516
517     ThreadMgrEventSink_OnInitDocumentMgr,
518     ThreadMgrEventSink_OnUninitDocumentMgr,
519     ThreadMgrEventSink_OnSetFocus,
520     ThreadMgrEventSink_OnPushContext,
521     ThreadMgrEventSink_OnPopContext
522 };
523
524 HRESULT ThreadMgr_Constructor(IUnknown *pUnkOuter, IUnknown **ppOut)
525 {
526     ThreadMgr *This;
527     if (pUnkOuter)
528         return CLASS_E_NOAGGREGATION;
529
530     /* Only 1 ThreadMgr is created per thread */
531     This = TlsGetValue(tlsIndex);
532     if (This)
533     {
534         ThreadMgr_AddRef((ITfThreadMgr*)This);
535         *ppOut = (IUnknown*)This;
536         return S_OK;
537     }
538
539     This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(ThreadMgr));
540     if (This == NULL)
541         return E_OUTOFMEMORY;
542
543     This->ThreadMgrVtbl= &ThreadMgr_ThreadMgrVtbl;
544     This->SourceVtbl = &ThreadMgr_SourceVtbl;
545     This->ThreadMgrEventSinkVtbl = &ThreadMgr_ThreadMgrEventSinkVtbl;
546     This->refCount = 1;
547     TlsSetValue(tlsIndex,This);
548
549     list_init(&This->ActiveLanguageProfileNotifySink);
550     list_init(&This->DisplayAttributeNotifySink);
551     list_init(&This->KeyTraceEventSink);
552     list_init(&This->PreservedKeyNotifySink);
553     list_init(&This->ThreadFocusSink);
554     list_init(&This->ThreadMgrEventSink);
555
556     TRACE("returning %p\n", This);
557     *ppOut = (IUnknown *)This;
558     return S_OK;
559 }