msctf: Implement ITfKeystrokeMgr::UnpreserveKey.
[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 tagPreservedKey
60 {
61     struct list     entry;
62     GUID            guid;
63     TF_PRESERVEDKEY prekey;
64     LPWSTR          description;
65     TfClientId      tid;
66 } PreservedKey;
67
68 typedef struct tagACLMulti {
69     const ITfThreadMgrVtbl *ThreadMgrVtbl;
70     const ITfSourceVtbl *SourceVtbl;
71     const ITfKeystrokeMgrVtbl *KeystrokeMgrVtbl;
72     const ITfMessagePumpVtbl *MessagePumpVtbl;
73     const ITfClientIdVtbl *ClientIdVtbl;
74     LONG refCount;
75
76     const ITfThreadMgrEventSinkVtbl *ThreadMgrEventSinkVtbl; /* internal */
77
78     ITfDocumentMgr *focus;
79
80     struct list CurrentPreservedKeys;
81
82     /* kept as separate lists to reduce unnecessary iterations */
83     struct list     ActiveLanguageProfileNotifySink;
84     struct list     DisplayAttributeNotifySink;
85     struct list     KeyTraceEventSink;
86     struct list     PreservedKeyNotifySink;
87     struct list     ThreadFocusSink;
88     struct list     ThreadMgrEventSink;
89 } ThreadMgr;
90
91 static inline ThreadMgr *impl_from_ITfSourceVtbl(ITfSource *iface)
92 {
93     return (ThreadMgr *)((char *)iface - FIELD_OFFSET(ThreadMgr,SourceVtbl));
94 }
95
96 static inline ThreadMgr *impl_from_ITfKeystrokeMgrVtbl(ITfKeystrokeMgr *iface)
97 {
98     return (ThreadMgr *)((char *)iface - FIELD_OFFSET(ThreadMgr,KeystrokeMgrVtbl));
99 }
100
101 static inline ThreadMgr *impl_from_ITfMessagePumpVtbl(ITfMessagePump *iface)
102 {
103     return (ThreadMgr *)((char *)iface - FIELD_OFFSET(ThreadMgr,MessagePumpVtbl));
104 }
105
106 static inline ThreadMgr *impl_from_ITfClientIdVtbl(ITfClientId *iface)
107 {
108     return (ThreadMgr *)((char *)iface - FIELD_OFFSET(ThreadMgr,ClientIdVtbl));
109 }
110
111 static inline ThreadMgr *impl_from_ITfThreadMgrEventSink(ITfThreadMgrEventSink *iface)
112 {
113     return (ThreadMgr *)((char *)iface - FIELD_OFFSET(ThreadMgr,ThreadMgrEventSinkVtbl));
114 }
115
116 static void free_sink(ThreadMgrSink *sink)
117 {
118         IUnknown_Release(sink->interfaces.pIUnknown);
119         HeapFree(GetProcessHeap(),0,sink);
120 }
121
122 static void ThreadMgr_Destructor(ThreadMgr *This)
123 {
124     struct list *cursor, *cursor2;
125
126     TlsSetValue(tlsIndex,NULL);
127     TRACE("destroying %p\n", This);
128     if (This->focus)
129         ITfDocumentMgr_Release(This->focus);
130
131     /* free sinks */
132     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->ActiveLanguageProfileNotifySink)
133     {
134         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
135         list_remove(cursor);
136         free_sink(sink);
137     }
138     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->DisplayAttributeNotifySink)
139     {
140         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
141         list_remove(cursor);
142         free_sink(sink);
143     }
144     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->KeyTraceEventSink)
145     {
146         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
147         list_remove(cursor);
148         free_sink(sink);
149     }
150     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->PreservedKeyNotifySink)
151     {
152         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
153         list_remove(cursor);
154         free_sink(sink);
155     }
156     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->ThreadFocusSink)
157     {
158         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
159         list_remove(cursor);
160         free_sink(sink);
161     }
162     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->ThreadMgrEventSink)
163     {
164         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
165         list_remove(cursor);
166         free_sink(sink);
167     }
168
169     LIST_FOR_EACH_SAFE(cursor, cursor2, &This->CurrentPreservedKeys)
170     {
171         PreservedKey* key = LIST_ENTRY(cursor,PreservedKey,entry);
172         list_remove(cursor);
173         HeapFree(GetProcessHeap(),0,key->description);
174         HeapFree(GetProcessHeap(),0,key);
175     }
176
177     HeapFree(GetProcessHeap(),0,This);
178 }
179
180 static HRESULT WINAPI ThreadMgr_QueryInterface(ITfThreadMgr *iface, REFIID iid, LPVOID *ppvOut)
181 {
182     ThreadMgr *This = (ThreadMgr *)iface;
183     *ppvOut = NULL;
184
185     if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_ITfThreadMgr))
186     {
187         *ppvOut = This;
188     }
189     else if (IsEqualIID(iid, &IID_ITfSource))
190     {
191         *ppvOut = &This->SourceVtbl;
192     }
193     else if (IsEqualIID(iid, &IID_ITfKeystrokeMgr))
194     {
195         *ppvOut = &This->KeystrokeMgrVtbl;
196     }
197     else if (IsEqualIID(iid, &IID_ITfMessagePump))
198     {
199         *ppvOut = &This->MessagePumpVtbl;
200     }
201     else if (IsEqualIID(iid, &IID_ITfClientId))
202     {
203         *ppvOut = &This->ClientIdVtbl;
204     }
205
206     if (*ppvOut)
207     {
208         IUnknown_AddRef(iface);
209         return S_OK;
210     }
211
212     WARN("unsupported interface: %s\n", debugstr_guid(iid));
213     return E_NOINTERFACE;
214 }
215
216 static ULONG WINAPI ThreadMgr_AddRef(ITfThreadMgr *iface)
217 {
218     ThreadMgr *This = (ThreadMgr *)iface;
219     return InterlockedIncrement(&This->refCount);
220 }
221
222 static ULONG WINAPI ThreadMgr_Release(ITfThreadMgr *iface)
223 {
224     ThreadMgr *This = (ThreadMgr *)iface;
225     ULONG ret;
226
227     ret = InterlockedDecrement(&This->refCount);
228     if (ret == 0)
229         ThreadMgr_Destructor(This);
230     return ret;
231 }
232
233 /*****************************************************
234  * ITfThreadMgr functions
235  *****************************************************/
236
237 static HRESULT WINAPI ThreadMgr_fnActivate( ITfThreadMgr* iface, TfClientId *ptid)
238 {
239     ThreadMgr *This = (ThreadMgr *)iface;
240     FIXME("STUB:(%p)\n",This);
241     return E_NOTIMPL;
242 }
243
244 static HRESULT WINAPI ThreadMgr_fnDeactivate( ITfThreadMgr* iface)
245 {
246     ThreadMgr *This = (ThreadMgr *)iface;
247     FIXME("STUB:(%p)\n",This);
248
249     if (This->focus)
250     {
251         ITfThreadMgrEventSink_OnSetFocus((ITfThreadMgrEventSink*)&This->ThreadMgrEventSinkVtbl, 0, This->focus);
252         ITfDocumentMgr_Release(This->focus);
253         This->focus = 0;
254     }
255
256     return E_NOTIMPL;
257 }
258
259 static HRESULT WINAPI ThreadMgr_CreateDocumentMgr( ITfThreadMgr* iface, ITfDocumentMgr
260 **ppdim)
261 {
262     ThreadMgr *This = (ThreadMgr *)iface;
263     TRACE("(%p)\n",iface);
264     return DocumentMgr_Constructor((ITfThreadMgrEventSink*)&This->ThreadMgrEventSinkVtbl, ppdim);
265 }
266
267 static HRESULT WINAPI ThreadMgr_EnumDocumentMgrs( ITfThreadMgr* iface, IEnumTfDocumentMgrs
268 **ppEnum)
269 {
270     ThreadMgr *This = (ThreadMgr *)iface;
271     FIXME("STUB:(%p)\n",This);
272     return E_NOTIMPL;
273 }
274
275 static HRESULT WINAPI ThreadMgr_GetFocus( ITfThreadMgr* iface, ITfDocumentMgr
276 **ppdimFocus)
277 {
278     ThreadMgr *This = (ThreadMgr *)iface;
279     TRACE("(%p)\n",This);
280
281     if (!ppdimFocus)
282         return E_INVALIDARG;
283
284     *ppdimFocus = This->focus;
285
286     TRACE("->%p\n",This->focus);
287
288     if (This->focus == NULL)
289         return S_FALSE;
290
291     ITfDocumentMgr_AddRef(This->focus);
292
293     return S_OK;
294 }
295
296 static HRESULT WINAPI ThreadMgr_SetFocus( ITfThreadMgr* iface, ITfDocumentMgr *pdimFocus)
297 {
298     ITfDocumentMgr *check;
299     ThreadMgr *This = (ThreadMgr *)iface;
300
301     TRACE("(%p) %p\n",This,pdimFocus);
302
303     if (!pdimFocus || FAILED(IUnknown_QueryInterface(pdimFocus,&IID_ITfDocumentMgr,(LPVOID*) &check)))
304         return E_INVALIDARG;
305
306     ITfThreadMgrEventSink_OnSetFocus((ITfThreadMgrEventSink*)&This->ThreadMgrEventSinkVtbl, check, This->focus);
307
308     if (This->focus)
309         ITfDocumentMgr_Release(This->focus);
310
311     This->focus = check;
312     return S_OK;
313 }
314
315 static HRESULT WINAPI ThreadMgr_AssociateFocus( ITfThreadMgr* iface, HWND hwnd,
316 ITfDocumentMgr *pdimNew, ITfDocumentMgr **ppdimPrev)
317 {
318     ThreadMgr *This = (ThreadMgr *)iface;
319     FIXME("STUB:(%p)\n",This);
320     return E_NOTIMPL;
321 }
322
323 static HRESULT WINAPI ThreadMgr_IsThreadFocus( ITfThreadMgr* iface, BOOL *pfThreadFocus)
324 {
325     ThreadMgr *This = (ThreadMgr *)iface;
326     FIXME("STUB:(%p)\n",This);
327     return E_NOTIMPL;
328 }
329
330 static HRESULT WINAPI ThreadMgr_GetFunctionProvider( ITfThreadMgr* iface, REFCLSID clsid,
331 ITfFunctionProvider **ppFuncProv)
332 {
333     ThreadMgr *This = (ThreadMgr *)iface;
334     FIXME("STUB:(%p)\n",This);
335     return E_NOTIMPL;
336 }
337
338 static HRESULT WINAPI ThreadMgr_EnumFunctionProviders( ITfThreadMgr* iface,
339 IEnumTfFunctionProviders **ppEnum)
340 {
341     ThreadMgr *This = (ThreadMgr *)iface;
342     FIXME("STUB:(%p)\n",This);
343     return E_NOTIMPL;
344 }
345
346 static HRESULT WINAPI ThreadMgr_GetGlobalCompartment( ITfThreadMgr* iface,
347 ITfCompartmentMgr **ppCompMgr)
348 {
349     ThreadMgr *This = (ThreadMgr *)iface;
350     FIXME("STUB:(%p)\n",This);
351     return E_NOTIMPL;
352 }
353
354 static const ITfThreadMgrVtbl ThreadMgr_ThreadMgrVtbl =
355 {
356     ThreadMgr_QueryInterface,
357     ThreadMgr_AddRef,
358     ThreadMgr_Release,
359
360     ThreadMgr_fnActivate,
361     ThreadMgr_fnDeactivate,
362     ThreadMgr_CreateDocumentMgr,
363     ThreadMgr_EnumDocumentMgrs,
364     ThreadMgr_GetFocus,
365     ThreadMgr_SetFocus,
366     ThreadMgr_AssociateFocus,
367     ThreadMgr_IsThreadFocus,
368     ThreadMgr_GetFunctionProvider,
369     ThreadMgr_EnumFunctionProviders,
370     ThreadMgr_GetGlobalCompartment
371 };
372
373
374 static HRESULT WINAPI Source_QueryInterface(ITfSource *iface, REFIID iid, LPVOID *ppvOut)
375 {
376     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
377     return ThreadMgr_QueryInterface((ITfThreadMgr *)This, iid, *ppvOut);
378 }
379
380 static ULONG WINAPI Source_AddRef(ITfSource *iface)
381 {
382     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
383     return ThreadMgr_AddRef((ITfThreadMgr*)This);
384 }
385
386 static ULONG WINAPI Source_Release(ITfSource *iface)
387 {
388     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
389     return ThreadMgr_Release((ITfThreadMgr *)This);
390 }
391
392 /*****************************************************
393  * ITfSource functions
394  *****************************************************/
395 static WINAPI HRESULT ThreadMgrSource_AdviseSink(ITfSource *iface,
396         REFIID riid, IUnknown *punk, DWORD *pdwCookie)
397 {
398     ThreadMgrSink *tms;
399     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
400
401     TRACE("(%p) %s %p %p\n",This,debugstr_guid(riid),punk,pdwCookie);
402
403     if (!riid || !punk || !pdwCookie)
404         return E_INVALIDARG;
405
406     if (IsEqualIID(riid, &IID_ITfThreadMgrEventSink))
407     {
408         tms = HeapAlloc(GetProcessHeap(),0,sizeof(ThreadMgrSink));
409         if (!tms)
410             return E_OUTOFMEMORY;
411         if (!SUCCEEDED(IUnknown_QueryInterface(punk, riid, (LPVOID*)&tms->interfaces.pITfThreadMgrEventSink)))
412         {
413             HeapFree(GetProcessHeap(),0,tms);
414             return CONNECT_E_CANNOTCONNECT;
415         }
416         list_add_head(&This->ThreadMgrEventSink,&tms->entry);
417         *pdwCookie = generate_Cookie(COOKIE_MAGIC_TMSINK, tms);
418     }
419     else
420     {
421         FIXME("(%p) Unhandled Sink: %s\n",This,debugstr_guid(riid));
422         return E_NOTIMPL;
423     }
424
425     TRACE("cookie %x\n",*pdwCookie);
426
427     return S_OK;
428 }
429
430 static WINAPI HRESULT ThreadMgrSource_UnadviseSink(ITfSource *iface, DWORD pdwCookie)
431 {
432     ThreadMgrSink *sink;
433     ThreadMgr *This = impl_from_ITfSourceVtbl(iface);
434
435     TRACE("(%p) %x\n",This,pdwCookie);
436
437     if (get_Cookie_magic(pdwCookie)!=COOKIE_MAGIC_TMSINK)
438         return E_INVALIDARG;
439
440     sink = (ThreadMgrSink*)remove_Cookie(pdwCookie);
441     if (!sink)
442         return CONNECT_E_NOCONNECTION;
443
444     list_remove(&sink->entry);
445     free_sink(sink);
446
447     return S_OK;
448 }
449
450 static const ITfSourceVtbl ThreadMgr_SourceVtbl =
451 {
452     Source_QueryInterface,
453     Source_AddRef,
454     Source_Release,
455
456     ThreadMgrSource_AdviseSink,
457     ThreadMgrSource_UnadviseSink,
458 };
459
460 /*****************************************************
461  * ITfKeystrokeMgr functions
462  *****************************************************/
463
464 static HRESULT WINAPI KeystrokeMgr_QueryInterface(ITfKeystrokeMgr *iface, REFIID iid, LPVOID *ppvOut)
465 {
466     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
467     return ThreadMgr_QueryInterface((ITfThreadMgr *)This, iid, *ppvOut);
468 }
469
470 static ULONG WINAPI KeystrokeMgr_AddRef(ITfKeystrokeMgr *iface)
471 {
472     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
473     return ThreadMgr_AddRef((ITfThreadMgr*)This);
474 }
475
476 static ULONG WINAPI KeystrokeMgr_Release(ITfKeystrokeMgr *iface)
477 {
478     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
479     return ThreadMgr_Release((ITfThreadMgr *)This);
480 }
481
482 static HRESULT WINAPI KeystrokeMgr_AdviseKeyEventSink(ITfKeystrokeMgr *iface,
483         TfClientId tid, ITfKeyEventSink *pSink, BOOL fForeground)
484 {
485     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
486     FIXME("STUB:(%p)\n",This);
487     return E_NOTIMPL;
488 }
489
490 static HRESULT WINAPI KeystrokeMgr_UnadviseKeyEventSink(ITfKeystrokeMgr *iface,
491         TfClientId tid)
492 {
493     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
494     FIXME("STUB:(%p)\n",This);
495     return E_NOTIMPL;
496 }
497
498 static HRESULT WINAPI KeystrokeMgr_GetForeground(ITfKeystrokeMgr *iface,
499         CLSID *pclsid)
500 {
501     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
502     FIXME("STUB:(%p)\n",This);
503     return E_NOTIMPL;
504 }
505
506 static HRESULT WINAPI KeystrokeMgr_TestKeyDown(ITfKeystrokeMgr *iface,
507         WPARAM wParam, LPARAM lParam, BOOL *pfEaten)
508 {
509     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
510     FIXME("STUB:(%p)\n",This);
511     return E_NOTIMPL;
512 }
513
514 static HRESULT WINAPI KeystrokeMgr_TestKeyUp(ITfKeystrokeMgr *iface,
515         WPARAM wParam, LPARAM lParam, BOOL *pfEaten)
516 {
517     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
518     FIXME("STUB:(%p)\n",This);
519     return E_NOTIMPL;
520 }
521
522 static HRESULT WINAPI KeystrokeMgr_KeyDown(ITfKeystrokeMgr *iface,
523         WPARAM wParam, LPARAM lParam, BOOL *pfEaten)
524 {
525     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
526     FIXME("STUB:(%p)\n",This);
527     return E_NOTIMPL;
528 }
529
530 static HRESULT WINAPI KeystrokeMgr_KeyUp(ITfKeystrokeMgr *iface,
531         WPARAM wParam, LPARAM lParam, BOOL *pfEaten)
532 {
533     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
534     FIXME("STUB:(%p)\n",This);
535     return E_NOTIMPL;
536 }
537
538 static HRESULT WINAPI KeystrokeMgr_GetPreservedKey(ITfKeystrokeMgr *iface,
539         ITfContext *pic, const TF_PRESERVEDKEY *pprekey, GUID *pguid)
540 {
541     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
542     FIXME("STUB:(%p)\n",This);
543     return E_NOTIMPL;
544 }
545
546 static HRESULT WINAPI KeystrokeMgr_IsPreservedKey(ITfKeystrokeMgr *iface,
547         REFGUID rguid, const TF_PRESERVEDKEY *pprekey, BOOL *pfRegistered)
548 {
549     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
550     FIXME("STUB:(%p)\n",This);
551     return E_NOTIMPL;
552 }
553
554 static HRESULT WINAPI KeystrokeMgr_PreserveKey(ITfKeystrokeMgr *iface,
555         TfClientId tid, REFGUID rguid, const TF_PRESERVEDKEY *prekey,
556         const WCHAR *pchDesc, ULONG cchDesc)
557 {
558     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
559     struct list *cursor;
560     PreservedKey *newkey;
561
562     TRACE("(%p) %x %s (%x,%x) %s\n",This,tid, debugstr_guid(rguid),(prekey)?prekey->uVKey:0,(prekey)?prekey->uModifiers:0,debugstr_wn(pchDesc,cchDesc));
563
564     if (!tid || ! rguid || !prekey || (cchDesc && !pchDesc))
565         return E_INVALIDARG;
566
567     LIST_FOR_EACH(cursor, &This->CurrentPreservedKeys)
568     {
569         PreservedKey* key = LIST_ENTRY(cursor,PreservedKey,entry);
570         if (IsEqualGUID(rguid,&key->guid) && prekey->uVKey == key->prekey.uVKey && prekey->uModifiers == key->prekey.uModifiers)
571             return TF_E_ALREADY_EXISTS;
572     }
573
574     newkey = HeapAlloc(GetProcessHeap(),0,sizeof(PreservedKey));
575     if (!newkey)
576         return E_OUTOFMEMORY;
577
578     newkey->guid  = *rguid;
579     newkey->prekey = *prekey;
580     newkey->tid = tid;
581     if (cchDesc)
582     {
583         newkey->description = HeapAlloc(GetProcessHeap(),0,cchDesc * sizeof(WCHAR));
584         if (!newkey->description)
585         {
586             HeapFree(GetProcessHeap(),0,newkey);
587             return E_OUTOFMEMORY;
588         }
589         memcpy(newkey->description, pchDesc, cchDesc*sizeof(WCHAR));
590     }
591
592     list_add_head(&This->CurrentPreservedKeys,&newkey->entry);
593
594     return S_OK;
595 }
596
597 static HRESULT WINAPI KeystrokeMgr_UnpreserveKey(ITfKeystrokeMgr *iface,
598         REFGUID rguid, const TF_PRESERVEDKEY *pprekey)
599 {
600     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
601     PreservedKey* key = NULL;
602     struct list *cursor;
603     TRACE("(%p) %s (%x %x)\n",This,debugstr_guid(rguid),(pprekey)?pprekey->uVKey:0, (pprekey)?pprekey->uModifiers:0);
604
605     if (!pprekey || !rguid)
606         return E_INVALIDARG;
607
608     LIST_FOR_EACH(cursor, &This->CurrentPreservedKeys)
609     {
610         key = LIST_ENTRY(cursor,PreservedKey,entry);
611         if (IsEqualGUID(rguid,&key->guid) && pprekey->uVKey == key->prekey.uVKey && pprekey->uModifiers == key->prekey.uModifiers)
612             break;
613         key = NULL;
614     }
615
616     if (!key)
617         return CONNECT_E_NOCONNECTION;
618
619     list_remove(&key->entry);
620     HeapFree(GetProcessHeap(),0,key->description);
621     HeapFree(GetProcessHeap(),0,key);
622
623     return S_OK;
624 }
625
626 static HRESULT WINAPI KeystrokeMgr_SetPreservedKeyDescription(ITfKeystrokeMgr *iface,
627         REFGUID rguid, const WCHAR *pchDesc, ULONG cchDesc)
628 {
629     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
630     FIXME("STUB:(%p)\n",This);
631     return E_NOTIMPL;
632 }
633
634 static HRESULT WINAPI KeystrokeMgr_GetPreservedKeyDescription(ITfKeystrokeMgr *iface,
635         REFGUID rguid, BSTR *pbstrDesc)
636 {
637     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
638     FIXME("STUB:(%p)\n",This);
639     return E_NOTIMPL;
640 }
641
642 static HRESULT WINAPI KeystrokeMgr_SimulatePreservedKey(ITfKeystrokeMgr *iface,
643         ITfContext *pic, REFGUID rguid, BOOL *pfEaten)
644 {
645     ThreadMgr *This = impl_from_ITfKeystrokeMgrVtbl(iface);
646     FIXME("STUB:(%p)\n",This);
647     return E_NOTIMPL;
648 }
649
650 static const ITfKeystrokeMgrVtbl ThreadMgr_KeystrokeMgrVtbl =
651 {
652     KeystrokeMgr_QueryInterface,
653     KeystrokeMgr_AddRef,
654     KeystrokeMgr_Release,
655
656     KeystrokeMgr_AdviseKeyEventSink,
657     KeystrokeMgr_UnadviseKeyEventSink,
658     KeystrokeMgr_GetForeground,
659     KeystrokeMgr_TestKeyDown,
660     KeystrokeMgr_TestKeyUp,
661     KeystrokeMgr_KeyDown,
662     KeystrokeMgr_KeyUp,
663     KeystrokeMgr_GetPreservedKey,
664     KeystrokeMgr_IsPreservedKey,
665     KeystrokeMgr_PreserveKey,
666     KeystrokeMgr_UnpreserveKey,
667     KeystrokeMgr_SetPreservedKeyDescription,
668     KeystrokeMgr_GetPreservedKeyDescription,
669     KeystrokeMgr_SimulatePreservedKey
670 };
671
672 /*****************************************************
673  * ITfMessagePump functions
674  *****************************************************/
675
676 static HRESULT WINAPI MessagePump_QueryInterface(ITfMessagePump *iface, REFIID iid, LPVOID *ppvOut)
677 {
678     ThreadMgr *This = impl_from_ITfMessagePumpVtbl(iface);
679     return ThreadMgr_QueryInterface((ITfThreadMgr *)This, iid, *ppvOut);
680 }
681
682 static ULONG WINAPI MessagePump_AddRef(ITfMessagePump *iface)
683 {
684     ThreadMgr *This = impl_from_ITfMessagePumpVtbl(iface);
685     return ThreadMgr_AddRef((ITfThreadMgr*)This);
686 }
687
688 static ULONG WINAPI MessagePump_Release(ITfMessagePump *iface)
689 {
690     ThreadMgr *This = impl_from_ITfMessagePumpVtbl(iface);
691     return ThreadMgr_Release((ITfThreadMgr *)This);
692 }
693
694 static HRESULT WINAPI MessagePump_PeekMessageA(ITfMessagePump *iface,
695         LPMSG pMsg, HWND hwnd, UINT wMsgFilterMin, UINT wMsgFilterMax,
696         UINT wRemoveMsg, BOOL *pfResult)
697 {
698     if (!pfResult)
699         return E_INVALIDARG;
700     *pfResult = PeekMessageA(pMsg, hwnd, wMsgFilterMin, wMsgFilterMax, wRemoveMsg);
701     return S_OK;
702 }
703
704 static HRESULT WINAPI MessagePump_GetMessageA(ITfMessagePump *iface,
705         LPMSG pMsg, HWND hwnd, UINT wMsgFilterMin, UINT wMsgFilterMax,
706         BOOL *pfResult)
707 {
708     if (!pfResult)
709         return E_INVALIDARG;
710     *pfResult = GetMessageA(pMsg, hwnd, wMsgFilterMin, wMsgFilterMax);
711     return S_OK;
712 }
713
714 static HRESULT WINAPI MessagePump_PeekMessageW(ITfMessagePump *iface,
715         LPMSG pMsg, HWND hwnd, UINT wMsgFilterMin, UINT wMsgFilterMax,
716         UINT wRemoveMsg, BOOL *pfResult)
717 {
718     if (!pfResult)
719         return E_INVALIDARG;
720     *pfResult = PeekMessageW(pMsg, hwnd, wMsgFilterMin, wMsgFilterMax, wRemoveMsg);
721     return S_OK;
722 }
723
724 static HRESULT WINAPI MessagePump_GetMessageW(ITfMessagePump *iface,
725         LPMSG pMsg, HWND hwnd, UINT wMsgFilterMin, UINT wMsgFilterMax,
726         BOOL *pfResult)
727 {
728     if (!pfResult)
729         return E_INVALIDARG;
730     *pfResult = GetMessageW(pMsg, hwnd, wMsgFilterMin, wMsgFilterMax);
731     return S_OK;
732 }
733
734 static const ITfMessagePumpVtbl ThreadMgr_MessagePumpVtbl =
735 {
736     MessagePump_QueryInterface,
737     MessagePump_AddRef,
738     MessagePump_Release,
739
740     MessagePump_PeekMessageA,
741     MessagePump_GetMessageA,
742     MessagePump_PeekMessageW,
743     MessagePump_GetMessageW
744 };
745
746 /*****************************************************
747  * ITfClientId functions
748  *****************************************************/
749
750 static HRESULT WINAPI ClientId_QueryInterface(ITfClientId *iface, REFIID iid, LPVOID *ppvOut)
751 {
752     ThreadMgr *This = impl_from_ITfClientIdVtbl(iface);
753     return ThreadMgr_QueryInterface((ITfThreadMgr *)This, iid, *ppvOut);
754 }
755
756 static ULONG WINAPI ClientId_AddRef(ITfClientId *iface)
757 {
758     ThreadMgr *This = impl_from_ITfClientIdVtbl(iface);
759     return ThreadMgr_AddRef((ITfThreadMgr*)This);
760 }
761
762 static ULONG WINAPI ClientId_Release(ITfClientId *iface)
763 {
764     ThreadMgr *This = impl_from_ITfClientIdVtbl(iface);
765     return ThreadMgr_Release((ITfThreadMgr *)This);
766 }
767
768 static HRESULT WINAPI ClientId_GetClientId(ITfClientId *iface,
769     REFCLSID rclsid, TfClientId *ptid)
770
771 {
772     HRESULT hr;
773     ITfCategoryMgr *catmgr;
774     ThreadMgr *This = impl_from_ITfClientIdVtbl(iface);
775
776     TRACE("(%p) %s\n",This,debugstr_guid(rclsid));
777
778     CategoryMgr_Constructor(NULL,(IUnknown**)&catmgr);
779     hr = ITfCategoryMgr_RegisterGUID(catmgr,rclsid,ptid);
780     ITfCategoryMgr_Release(catmgr);
781
782     return hr;
783 }
784
785 static const ITfClientIdVtbl ThreadMgr_ClientIdVtbl =
786 {
787     ClientId_QueryInterface,
788     ClientId_AddRef,
789     ClientId_Release,
790
791     ClientId_GetClientId
792 };
793
794 /*****************************************************
795  * ITfThreadMgrEventSink functions  (internal)
796  *****************************************************/
797 static HRESULT WINAPI ThreadMgrEventSink_QueryInterface(ITfThreadMgrEventSink *iface, REFIID iid, LPVOID *ppvOut)
798 {
799     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
800     return ThreadMgr_QueryInterface((ITfThreadMgr *)This, iid, *ppvOut);
801 }
802
803 static ULONG WINAPI ThreadMgrEventSink_AddRef(ITfThreadMgrEventSink *iface)
804 {
805     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
806     return ThreadMgr_AddRef((ITfThreadMgr*)This);
807 }
808
809 static ULONG WINAPI ThreadMgrEventSink_Release(ITfThreadMgrEventSink *iface)
810 {
811     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
812     return ThreadMgr_Release((ITfThreadMgr *)This);
813 }
814
815
816 static WINAPI HRESULT ThreadMgrEventSink_OnInitDocumentMgr(
817         ITfThreadMgrEventSink *iface,ITfDocumentMgr *pdim)
818 {
819     struct list *cursor;
820     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
821
822     TRACE("(%p) %p\n",This,pdim);
823
824     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
825     {
826         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
827         ITfThreadMgrEventSink_OnInitDocumentMgr(sink->interfaces.pITfThreadMgrEventSink,pdim);
828     }
829
830     return S_OK;
831 }
832
833 static WINAPI HRESULT ThreadMgrEventSink_OnUninitDocumentMgr(
834         ITfThreadMgrEventSink *iface, ITfDocumentMgr *pdim)
835 {
836     struct list *cursor;
837     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
838
839     TRACE("(%p) %p\n",This,pdim);
840
841     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
842     {
843         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
844         ITfThreadMgrEventSink_OnUninitDocumentMgr(sink->interfaces.pITfThreadMgrEventSink,pdim);
845     }
846
847     return S_OK;
848 }
849
850 static WINAPI HRESULT ThreadMgrEventSink_OnSetFocus(
851         ITfThreadMgrEventSink *iface, ITfDocumentMgr *pdimFocus,
852         ITfDocumentMgr *pdimPrevFocus)
853 {
854     struct list *cursor;
855     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
856
857     TRACE("(%p) %p %p\n",This,pdimFocus, pdimPrevFocus);
858
859     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
860     {
861         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
862         ITfThreadMgrEventSink_OnSetFocus(sink->interfaces.pITfThreadMgrEventSink, pdimFocus, pdimPrevFocus);
863     }
864
865     return S_OK;
866 }
867
868 static WINAPI HRESULT ThreadMgrEventSink_OnPushContext(
869         ITfThreadMgrEventSink *iface, ITfContext *pic)
870 {
871     struct list *cursor;
872     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
873
874     TRACE("(%p) %p\n",This,pic);
875
876     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
877     {
878         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
879         ITfThreadMgrEventSink_OnPushContext(sink->interfaces.pITfThreadMgrEventSink,pic);
880     }
881
882     return S_OK;
883 }
884
885 static WINAPI HRESULT ThreadMgrEventSink_OnPopContext(
886         ITfThreadMgrEventSink *iface, ITfContext *pic)
887 {
888     struct list *cursor;
889     ThreadMgr *This = impl_from_ITfThreadMgrEventSink(iface);
890
891     TRACE("(%p) %p\n",This,pic);
892
893     LIST_FOR_EACH(cursor, &This->ThreadMgrEventSink)
894     {
895         ThreadMgrSink* sink = LIST_ENTRY(cursor,ThreadMgrSink,entry);
896         ITfThreadMgrEventSink_OnPopContext(sink->interfaces.pITfThreadMgrEventSink,pic);
897     }
898
899     return S_OK;
900 }
901
902 static const ITfThreadMgrEventSinkVtbl ThreadMgr_ThreadMgrEventSinkVtbl =
903 {
904     ThreadMgrEventSink_QueryInterface,
905     ThreadMgrEventSink_AddRef,
906     ThreadMgrEventSink_Release,
907
908     ThreadMgrEventSink_OnInitDocumentMgr,
909     ThreadMgrEventSink_OnUninitDocumentMgr,
910     ThreadMgrEventSink_OnSetFocus,
911     ThreadMgrEventSink_OnPushContext,
912     ThreadMgrEventSink_OnPopContext
913 };
914
915 HRESULT ThreadMgr_Constructor(IUnknown *pUnkOuter, IUnknown **ppOut)
916 {
917     ThreadMgr *This;
918     if (pUnkOuter)
919         return CLASS_E_NOAGGREGATION;
920
921     /* Only 1 ThreadMgr is created per thread */
922     This = TlsGetValue(tlsIndex);
923     if (This)
924     {
925         ThreadMgr_AddRef((ITfThreadMgr*)This);
926         *ppOut = (IUnknown*)This;
927         return S_OK;
928     }
929
930     This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(ThreadMgr));
931     if (This == NULL)
932         return E_OUTOFMEMORY;
933
934     This->ThreadMgrVtbl= &ThreadMgr_ThreadMgrVtbl;
935     This->SourceVtbl = &ThreadMgr_SourceVtbl;
936     This->KeystrokeMgrVtbl= &ThreadMgr_KeystrokeMgrVtbl;
937     This->MessagePumpVtbl= &ThreadMgr_MessagePumpVtbl;
938     This->ClientIdVtbl = &ThreadMgr_ClientIdVtbl;
939     This->ThreadMgrEventSinkVtbl = &ThreadMgr_ThreadMgrEventSinkVtbl;
940     This->refCount = 1;
941     TlsSetValue(tlsIndex,This);
942
943     list_init(&This->CurrentPreservedKeys);
944
945     list_init(&This->ActiveLanguageProfileNotifySink);
946     list_init(&This->DisplayAttributeNotifySink);
947     list_init(&This->KeyTraceEventSink);
948     list_init(&This->PreservedKeyNotifySink);
949     list_init(&This->ThreadFocusSink);
950     list_init(&This->ThreadMgrEventSink);
951
952     TRACE("returning %p\n", This);
953     *ppOut = (IUnknown *)This;
954     return S_OK;
955 }