4 * Copyright 2008 Aric Stewart, CodeWeavers
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.
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.
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
26 #include "wine/debug.h"
36 #include "inputscope.h"
38 #include "msctf_internal.h"
40 WINE_DEFAULT_DEBUG_CHANNEL(msctf
);
50 TF_LANGUAGEPROFILE LanguageProfile
;
51 ITfTextInputProcessor
*pITfTextInputProcessor
;
52 ITfThreadMgrEx
*pITfThreadMgrEx
;
53 ITfKeyEventSink
*pITfKeyEventSink
;
55 } ActivatedTextService
;
60 ActivatedTextService
*ats
;
63 static CookieInternal
*cookies
;
65 static UINT array_size
;
67 static struct list AtsList
= LIST_INIT(AtsList
);
68 static UINT activated
= 0;
71 TfClientId processId
= 0;
72 ITfCompartmentMgr
*globalCompartmentMgr
= NULL
;
74 const WCHAR szwSystemTIPKey
[] = {'S','O','F','T','W','A','R','E','\\','M','i','c','r','o','s','o','f','t','\\','C','T','F','\\','T','I','P',0};
75 const WCHAR szwSystemCTFKey
[] = {'S','O','F','T','W','A','R','E','\\','M','i','c','r','o','s','o','f','t','\\','C','T','F',0};
77 typedef HRESULT (*LPFNCONSTRUCTOR
)(IUnknown
*pUnkOuter
, IUnknown
**ppvOut
);
83 {&CLSID_TF_ThreadMgr
, ThreadMgr_Constructor
},
84 {&CLSID_TF_InputProcessorProfiles
, InputProcessorProfiles_Constructor
},
85 {&CLSID_TF_CategoryMgr
, CategoryMgr_Constructor
},
86 {&CLSID_TF_LangBarMgr
, LangBarMgr_Constructor
},
87 {&CLSID_TF_DisplayAttributeMgr
, DisplayAttributeMgr_Constructor
},
91 typedef struct tagClassFactory
93 IClassFactory IClassFactory_iface
;
98 static inline ClassFactory
*impl_from_IClassFactory(IClassFactory
*iface
)
100 return CONTAINING_RECORD(iface
, ClassFactory
, IClassFactory_iface
);
103 static void ClassFactory_Destructor(ClassFactory
*This
)
105 TRACE("Destroying class factory %p\n", This
);
109 static HRESULT WINAPI
ClassFactory_QueryInterface(IClassFactory
*iface
, REFIID riid
, LPVOID
*ppvOut
)
112 if (IsEqualIID(riid
, &IID_IClassFactory
) || IsEqualIID(riid
, &IID_IUnknown
)) {
113 IClassFactory_AddRef(iface
);
118 WARN("Unknown interface %s\n", debugstr_guid(riid
));
119 return E_NOINTERFACE
;
122 static ULONG WINAPI
ClassFactory_AddRef(IClassFactory
*iface
)
124 ClassFactory
*This
= impl_from_IClassFactory(iface
);
125 return InterlockedIncrement(&This
->ref
);
128 static ULONG WINAPI
ClassFactory_Release(IClassFactory
*iface
)
130 ClassFactory
*This
= impl_from_IClassFactory(iface
);
131 ULONG ret
= InterlockedDecrement(&This
->ref
);
134 ClassFactory_Destructor(This
);
138 static HRESULT WINAPI
ClassFactory_CreateInstance(IClassFactory
*iface
, IUnknown
*punkOuter
, REFIID iid
, LPVOID
*ppvOut
)
140 ClassFactory
*This
= impl_from_IClassFactory(iface
);
144 TRACE("(%p, %p, %s, %p)\n", iface
, punkOuter
, debugstr_guid(iid
), ppvOut
);
145 ret
= This
->ctor(punkOuter
, &obj
);
148 ret
= IUnknown_QueryInterface(obj
, iid
, ppvOut
);
149 IUnknown_Release(obj
);
153 static HRESULT WINAPI
ClassFactory_LockServer(IClassFactory
*iface
, BOOL fLock
)
155 ClassFactory
*This
= impl_from_IClassFactory(iface
);
157 TRACE("(%p)->(%x)\n", This
, fLock
);
162 static const IClassFactoryVtbl ClassFactoryVtbl
= {
164 ClassFactory_QueryInterface
,
166 ClassFactory_Release
,
169 ClassFactory_CreateInstance
,
170 ClassFactory_LockServer
173 static HRESULT
ClassFactory_Constructor(LPFNCONSTRUCTOR ctor
, LPVOID
*ppvOut
)
175 ClassFactory
*This
= malloc(sizeof(ClassFactory
));
176 This
->IClassFactory_iface
.lpVtbl
= &ClassFactoryVtbl
;
179 *ppvOut
= &This
->IClassFactory_iface
;
180 TRACE("Created class factory %p\n", This
);
184 /*************************************************************************
185 * DWORD Cookie Management
187 DWORD
generate_Cookie(DWORD magic
, LPVOID data
)
191 /* try to reuse IDs if possible */
192 for (i
= 0; i
< id_last
; i
++)
193 if (cookies
[i
].id
== 0) break;
199 cookies
= calloc(10, sizeof(CookieInternal
));
202 ERR("Out of memory, Unable to alloc cookies array\n");
209 CookieInternal
*new_cookies
= _recalloc(cookies
, array_size
* 2, sizeof(CookieInternal
));
212 ERR("Out of memory, Unable to realloc cookies array\n");
215 cookies
= new_cookies
;
220 cookies
[i
].id
= i
+ 1; /* a return of 0 is used for failure */
221 cookies
[i
].magic
= magic
;
222 cookies
[i
].data
= data
;
227 return cookies
[i
].id
;
230 DWORD
get_Cookie_magic(DWORD id
)
234 if (index
>= id_last
)
237 if (cookies
[index
].id
== 0)
240 return cookies
[index
].magic
;
243 LPVOID
get_Cookie_data(DWORD id
)
247 if (index
>= id_last
)
250 if (cookies
[index
].id
== 0)
253 return cookies
[index
].data
;
256 LPVOID
remove_Cookie(DWORD id
)
260 if (index
>= id_last
)
263 if (cookies
[index
].id
== 0)
266 cookies
[index
].id
= 0;
267 return cookies
[index
].data
;
270 DWORD
enumerate_Cookie(DWORD magic
, DWORD
*index
)
273 for (i
= *index
; i
< id_last
; i
++)
274 if (cookies
[i
].id
!= 0 && cookies
[i
].magic
== magic
)
277 return cookies
[i
].id
;
282 HRESULT
advise_sink(struct list
*sink_list
, REFIID riid
, DWORD cookie_magic
, IUnknown
*unk
, DWORD
*cookie
)
286 sink
= malloc(sizeof(*sink
));
288 return E_OUTOFMEMORY
;
290 if (FAILED(IUnknown_QueryInterface(unk
, riid
, (void**)&sink
->interfaces
.pIUnknown
)))
293 return CONNECT_E_CANNOTCONNECT
;
296 list_add_head(sink_list
, &sink
->entry
);
297 *cookie
= generate_Cookie(cookie_magic
, sink
);
298 TRACE("cookie %lx\n", *cookie
);
302 static void free_sink(Sink
*sink
)
304 list_remove(&sink
->entry
);
305 IUnknown_Release(sink
->interfaces
.pIUnknown
);
309 HRESULT
unadvise_sink(DWORD cookie
)
313 sink
= remove_Cookie(cookie
);
315 return CONNECT_E_NOCONNECTION
;
321 void free_sinks(struct list
*sink_list
)
323 while(!list_empty(sink_list
))
325 Sink
* sink
= LIST_ENTRY(sink_list
->next
, Sink
, entry
);
330 /*****************************************************************************
331 * Active Text Service Management
332 *****************************************************************************/
333 static HRESULT
activate_given_ts(ActivatedTextService
*actsvr
, ITfThreadMgrEx
*tm
)
337 /* Already Active? */
338 if (actsvr
->pITfTextInputProcessor
)
341 hr
= CoCreateInstance (&actsvr
->LanguageProfile
.clsid
, NULL
, CLSCTX_INPROC_SERVER
,
342 &IID_ITfTextInputProcessor
, (void**)&actsvr
->pITfTextInputProcessor
);
343 if (FAILED(hr
)) return hr
;
345 hr
= ITfTextInputProcessor_Activate(actsvr
->pITfTextInputProcessor
, (ITfThreadMgr
*)tm
, actsvr
->tid
);
348 ITfTextInputProcessor_Release(actsvr
->pITfTextInputProcessor
);
349 actsvr
->pITfTextInputProcessor
= NULL
;
353 actsvr
->pITfThreadMgrEx
= tm
;
354 ITfThreadMgrEx_AddRef(tm
);
358 static HRESULT
deactivate_given_ts(ActivatedTextService
*actsvr
)
362 if (actsvr
->pITfTextInputProcessor
)
364 hr
= ITfTextInputProcessor_Deactivate(actsvr
->pITfTextInputProcessor
);
365 ITfTextInputProcessor_Release(actsvr
->pITfTextInputProcessor
);
366 ITfThreadMgrEx_Release(actsvr
->pITfThreadMgrEx
);
367 actsvr
->pITfTextInputProcessor
= NULL
;
368 actsvr
->pITfThreadMgrEx
= NULL
;
374 static void deactivate_remove_conflicting_ts(REFCLSID catid
)
376 AtsEntry
*ats
, *cursor2
;
378 LIST_FOR_EACH_ENTRY_SAFE(ats
, cursor2
, &AtsList
, AtsEntry
, entry
)
380 if (IsEqualCLSID(catid
,&ats
->ats
->LanguageProfile
.catid
))
382 deactivate_given_ts(ats
->ats
);
383 list_remove(&ats
->entry
);
386 /* we are guaranteeing there is only 1 */
392 HRESULT
add_active_textservice(TF_LANGUAGEPROFILE
*lp
)
394 ActivatedTextService
*actsvr
;
395 ITfCategoryMgr
*catmgr
;
397 ITfThreadMgrEx
*tm
= TlsGetValue(tlsIndex
);
398 ITfClientId
*clientid
;
400 if (!tm
) return E_UNEXPECTED
;
402 actsvr
= malloc(sizeof(ActivatedTextService
));
403 if (!actsvr
) return E_OUTOFMEMORY
;
405 ITfThreadMgrEx_QueryInterface(tm
, &IID_ITfClientId
, (void **)&clientid
);
406 ITfClientId_GetClientId(clientid
, &lp
->clsid
, &actsvr
->tid
);
407 ITfClientId_Release(clientid
);
412 return E_OUTOFMEMORY
;
415 actsvr
->pITfTextInputProcessor
= NULL
;
416 actsvr
->LanguageProfile
= *lp
;
417 actsvr
->pITfKeyEventSink
= NULL
;
419 /* get TIP category */
420 if (SUCCEEDED(CategoryMgr_Constructor(NULL
,(IUnknown
**)&catmgr
)))
422 static const GUID
*list
[3] = {&GUID_TFCAT_TIP_SPEECH
, &GUID_TFCAT_TIP_KEYBOARD
, &GUID_TFCAT_TIP_HANDWRITING
};
424 ITfCategoryMgr_FindClosestCategory(catmgr
,
425 &actsvr
->LanguageProfile
.clsid
, &actsvr
->LanguageProfile
.catid
,
428 ITfCategoryMgr_Release(catmgr
);
432 ERR("CategoryMgr construction failed\n");
433 actsvr
->LanguageProfile
.catid
= GUID_NULL
;
436 if (!IsEqualGUID(&actsvr
->LanguageProfile
.catid
,&GUID_NULL
))
437 deactivate_remove_conflicting_ts(&actsvr
->LanguageProfile
.catid
);
440 activate_given_ts(actsvr
, tm
);
442 entry
= malloc(sizeof(AtsEntry
));
447 return E_OUTOFMEMORY
;
451 list_add_head(&AtsList
, &entry
->entry
);
456 BOOL
get_active_textservice(REFCLSID rclsid
, TF_LANGUAGEPROFILE
*profile
)
460 LIST_FOR_EACH_ENTRY(ats
, &AtsList
, AtsEntry
, entry
)
462 if (IsEqualCLSID(rclsid
,&ats
->ats
->LanguageProfile
.clsid
))
465 *profile
= ats
->ats
->LanguageProfile
;
472 HRESULT
activate_textservices(ITfThreadMgrEx
*tm
)
481 LIST_FOR_EACH_ENTRY(ats
, &AtsList
, AtsEntry
, entry
)
483 hr
= activate_given_ts(ats
->ats
, tm
);
485 FIXME("Failed to activate text service\n");
490 HRESULT
deactivate_textservices(void)
498 LIST_FOR_EACH_ENTRY(ats
, &AtsList
, AtsEntry
, entry
)
499 deactivate_given_ts(ats
->ats
);
504 CLSID
get_textservice_clsid(TfClientId tid
)
508 LIST_FOR_EACH_ENTRY(ats
, &AtsList
, AtsEntry
, entry
)
509 if (ats
->ats
->tid
== tid
)
510 return ats
->ats
->LanguageProfile
.clsid
;
514 HRESULT
get_textservice_sink(TfClientId tid
, REFCLSID iid
, IUnknown
**sink
)
518 if (!IsEqualCLSID(iid
,&IID_ITfKeyEventSink
))
519 return E_NOINTERFACE
;
521 LIST_FOR_EACH_ENTRY(ats
, &AtsList
, AtsEntry
, entry
)
522 if (ats
->ats
->tid
== tid
)
524 *sink
= (IUnknown
*)ats
->ats
->pITfKeyEventSink
;
531 HRESULT
set_textservice_sink(TfClientId tid
, REFCLSID iid
, IUnknown
* sink
)
535 if (!IsEqualCLSID(iid
,&IID_ITfKeyEventSink
))
536 return E_NOINTERFACE
;
538 LIST_FOR_EACH_ENTRY(ats
, &AtsList
, AtsEntry
, entry
)
539 if (ats
->ats
->tid
== tid
)
541 ats
->ats
->pITfKeyEventSink
= (ITfKeyEventSink
*)sink
;
548 /*************************************************************************
551 BOOL WINAPI
DllMain(HINSTANCE hinst
, DWORD fdwReason
, LPVOID fImpLoad
)
553 TRACE("%p 0x%lx %p\n", hinst
, fdwReason
, fImpLoad
);
556 case DLL_PROCESS_ATTACH
:
557 tlsIndex
= TlsAlloc();
559 case DLL_PROCESS_DETACH
:
567 /***********************************************************************
568 * DllGetClassObject (MSCTF.@)
570 HRESULT WINAPI
DllGetClassObject(REFCLSID clsid
, REFIID iid
, LPVOID
*ppvOut
)
575 if (!IsEqualIID(iid
, &IID_IUnknown
) && !IsEqualIID(iid
, &IID_IClassFactory
))
576 return E_NOINTERFACE
;
578 for (i
= 0; ClassesTable
[i
].clsid
!= NULL
; i
++)
579 if (IsEqualCLSID(ClassesTable
[i
].clsid
, clsid
)) {
580 return ClassFactory_Constructor(ClassesTable
[i
].ctor
, ppvOut
);
582 FIXME("CLSID %s not supported\n", debugstr_guid(clsid
));
583 return CLASS_E_CLASSNOTAVAILABLE
;
586 /***********************************************************************
587 * TF_CreateThreadMgr (MSCTF.@)
589 HRESULT WINAPI
TF_CreateThreadMgr(ITfThreadMgr
**pptim
)
592 return ThreadMgr_Constructor(NULL
,(IUnknown
**)pptim
);
595 /***********************************************************************
596 * TF_GetThreadMgr (MSCTF.@)
598 HRESULT WINAPI
TF_GetThreadMgr(ITfThreadMgr
**pptim
)
601 *pptim
= TlsGetValue(tlsIndex
);
604 ITfThreadMgr_AddRef(*pptim
);
609 /***********************************************************************
610 * SetInputScope(MSCTF.@)
612 HRESULT WINAPI
SetInputScope(HWND hwnd
, InputScope inputscope
)
614 FIXME("STUB: %p %i\n",hwnd
,inputscope
);
618 /***********************************************************************
619 * SetInputScopes(MSCTF.@)
621 HRESULT WINAPI
SetInputScopes(HWND hwnd
, const InputScope
*pInputScopes
,
622 UINT cInputScopes
, WCHAR
**ppszPhraseList
,
623 UINT cPhrases
, WCHAR
*pszRegExp
, WCHAR
*pszSRGS
)
626 FIXME("STUB: %p ... %s %s\n",hwnd
, debugstr_w(pszRegExp
), debugstr_w(pszSRGS
));
627 for (i
= 0; i
< cInputScopes
; i
++)
628 TRACE("\tScope[%u] = %i\n",i
,pInputScopes
[i
]);
629 for (i
= 0; i
< cPhrases
; i
++)
630 TRACE("\tPhrase[%u] = %s\n",i
,debugstr_w(ppszPhraseList
[i
]));
635 /***********************************************************************
636 * TF_CreateInputProcessorProfiles(MSCTF.@)
638 HRESULT WINAPI
TF_CreateInputProcessorProfiles(
639 ITfInputProcessorProfiles
**ppipr
)
641 return InputProcessorProfiles_Constructor(NULL
,(IUnknown
**)ppipr
);
644 /***********************************************************************
645 * TF_InvalidAssemblyListCacheIfExist(MSCTF.@)
647 HRESULT WINAPI
TF_InvalidAssemblyListCacheIfExist(void)
653 /***********************************************************************
654 * TF_CreateLangBarMgr (MSCTF.@)
656 HRESULT WINAPI
TF_CreateLangBarMgr(ITfLangBarMgr
**pppbm
)
659 return LangBarMgr_Constructor(NULL
,(IUnknown
**)pppbm
);
662 HRESULT WINAPI
TF_CreateLangBarItemMgr(ITfLangBarItemMgr
**pplbim
)
664 FIXME("stub %p\n", pplbim
);
670 /***********************************************************************
671 * TF_InitMlngInfo (MSCTF.@)
673 HRESULT WINAPI
TF_InitMlngInfo(void)