msctf: Context initialization happens before OnPushContext sink.
[wine] / dlls / msctf / tests / inputprocessor.c
1 /*
2  * Unit tests for ITfInputProcessor
3  *
4  * Copyright 2009 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 <stdio.h>
22
23 #define COBJMACROS
24 #include "wine/test.h"
25 #include "winuser.h"
26 #include "initguid.h"
27 #include "shlwapi.h"
28 #include "shlguid.h"
29 #include "comcat.h"
30 #include "msctf.h"
31 #include "olectl.h"
32
33 static ITfInputProcessorProfiles* g_ipp;
34 static LANGID gLangid;
35 static ITfCategoryMgr * g_cm = NULL;
36 static ITfThreadMgr* g_tm = NULL;
37 static ITfDocumentMgr *g_dm = NULL;
38 static TfClientId cid = 0;
39 static TfClientId tid = 0;
40
41 static ITextStoreACPSink *ACPSink;
42
43 #define SINK_UNEXPECTED 0
44 #define SINK_EXPECTED 1
45 #define SINK_FIRED 2
46
47 static BOOL test_ShouldActivate = FALSE;
48 static BOOL test_ShouldDeactivate = FALSE;
49
50 static DWORD tmSinkCookie;
51 static DWORD tmSinkRefCount;
52 static DWORD documentStatus;
53 static ITfDocumentMgr *test_CurrentFocus = NULL;
54 static ITfDocumentMgr *test_PrevFocus = NULL;
55 static INT  test_OnSetFocus = SINK_UNEXPECTED;
56 static INT  test_OnInitDocumentMgr = SINK_UNEXPECTED;
57 static INT  test_OnPushContext = SINK_UNEXPECTED;
58 static INT  test_OnPopContext = SINK_UNEXPECTED;
59 static INT  test_KEV_OnSetFocus = SINK_UNEXPECTED;
60 static INT  test_ACP_AdviseSink = SINK_UNEXPECTED;
61 static INT  test_ACP_GetStatus = SINK_UNEXPECTED;
62 static INT  test_ACP_RequestLock = SINK_UNEXPECTED;
63 static INT  test_ACP_GetEndACP = SINK_UNEXPECTED;
64 static INT  test_ACP_GetSelection = SINK_UNEXPECTED;
65 static INT  test_DoEditSession = SINK_UNEXPECTED;
66 static INT  test_ACP_InsertTextAtSelection = SINK_UNEXPECTED;
67 static INT  test_ACP_SetSelection = SINK_UNEXPECTED;
68
69
70 /**********************************************************************
71  * ITextStoreACP
72  **********************************************************************/
73 typedef struct tagTextStoreACP
74 {
75     const ITextStoreACPVtbl *TextStoreACPVtbl;
76     LONG refCount;
77
78 } TextStoreACP;
79
80 static void TextStoreACP_Destructor(TextStoreACP *This)
81 {
82     HeapFree(GetProcessHeap(),0,This);
83 }
84
85 static HRESULT WINAPI TextStoreACP_QueryInterface(ITextStoreACP *iface, REFIID iid, LPVOID *ppvOut)
86 {
87     TextStoreACP *This = (TextStoreACP *)iface;
88     *ppvOut = NULL;
89
90     if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_ITextStoreACP))
91     {
92         *ppvOut = This;
93     }
94
95     if (*ppvOut)
96     {
97         IUnknown_AddRef(iface);
98         return S_OK;
99     }
100
101     return E_NOINTERFACE;
102 }
103
104 static ULONG WINAPI TextStoreACP_AddRef(ITextStoreACP *iface)
105 {
106     TextStoreACP *This = (TextStoreACP *)iface;
107     return InterlockedIncrement(&This->refCount);
108 }
109
110 static ULONG WINAPI TextStoreACP_Release(ITextStoreACP *iface)
111 {
112     TextStoreACP *This = (TextStoreACP *)iface;
113     ULONG ret;
114
115     ret = InterlockedDecrement(&This->refCount);
116     if (ret == 0)
117         TextStoreACP_Destructor(This);
118     return ret;
119 }
120
121 static HRESULT WINAPI TextStoreACP_AdviseSink(ITextStoreACP *iface,
122     REFIID riid, IUnknown *punk, DWORD dwMask)
123 {
124     HRESULT hr;
125
126     ok(test_ACP_AdviseSink == SINK_EXPECTED, "Unexpected TextStoreACP_AdviseSink sink\n");
127     test_ACP_AdviseSink = SINK_FIRED;
128
129     hr = IUnknown_QueryInterface(punk, &IID_ITextStoreACPSink,(LPVOID*)(&ACPSink));
130     ok(SUCCEEDED(hr),"Unable to QueryInterface on sink\n");
131     return S_OK;
132 }
133
134 static HRESULT WINAPI TextStoreACP_UnadviseSink(ITextStoreACP *iface,
135     IUnknown *punk)
136 {
137     trace("\n");
138     return S_OK;
139 }
140
141 static HRESULT WINAPI TextStoreACP_RequestLock(ITextStoreACP *iface,
142     DWORD dwLockFlags, HRESULT *phrSession)
143 {
144     ok(test_ACP_RequestLock == SINK_EXPECTED,"Unexpected TextStoreACP_RequestLock\n");
145     test_ACP_RequestLock = SINK_FIRED;
146     *phrSession = ITextStoreACPSink_OnLockGranted(ACPSink, dwLockFlags);
147     return S_OK;
148 }
149 static HRESULT WINAPI TextStoreACP_GetStatus(ITextStoreACP *iface,
150     TS_STATUS *pdcs)
151 {
152     ok(test_ACP_GetStatus  == SINK_EXPECTED, "Unexpected TextStoreACP_GetStatus\n");
153     test_ACP_GetStatus = SINK_FIRED;
154     pdcs->dwDynamicFlags = documentStatus;
155     return S_OK;
156 }
157 static HRESULT WINAPI TextStoreACP_QueryInsert(ITextStoreACP *iface,
158     LONG acpTestStart, LONG acpTestEnd, ULONG cch, LONG *pacpResultStart,
159     LONG *pacpResultEnd)
160 {
161     trace("\n");
162     return S_OK;
163 }
164 static HRESULT WINAPI TextStoreACP_GetSelection(ITextStoreACP *iface,
165     ULONG ulIndex, ULONG ulCount, TS_SELECTION_ACP *pSelection, ULONG *pcFetched)
166 {
167     ok(test_ACP_GetSelection == SINK_EXPECTED, "Unexpected TextStoreACP_GetSelection\n");
168     test_ACP_GetSelection = SINK_FIRED;
169
170     pSelection->acpStart = 10;
171     pSelection->acpEnd = 20;
172     pSelection->style.fInterimChar = 0;
173     pSelection->style.ase = TS_AE_NONE;
174     *pcFetched = 1;
175
176     return S_OK;
177 }
178 static HRESULT WINAPI TextStoreACP_SetSelection(ITextStoreACP *iface,
179     ULONG ulCount, const TS_SELECTION_ACP *pSelection)
180 {
181     ok(test_ACP_SetSelection == SINK_EXPECTED,"Unexpected TextStoreACP_SetSelection\n");
182     test_ACP_SetSelection = SINK_FIRED;
183     return S_OK;
184 }
185 static HRESULT WINAPI TextStoreACP_GetText(ITextStoreACP *iface,
186     LONG acpStart, LONG acpEnd, WCHAR *pchPlain, ULONG cchPlainReq,
187     ULONG *pcchPlainRet, TS_RUNINFO *prgRunInfo, ULONG cRunInfoReq,
188     ULONG *pcRunInfoRet, LONG *pacpNext)
189 {
190     trace("\n");
191     return S_OK;
192 }
193 static HRESULT WINAPI TextStoreACP_SetText(ITextStoreACP *iface,
194     DWORD dwFlags, LONG acpStart, LONG acpEnd, const WCHAR *pchText,
195     ULONG cch, TS_TEXTCHANGE *pChange)
196 {
197     trace("\n");
198     return S_OK;
199 }
200 static HRESULT WINAPI TextStoreACP_GetFormattedText(ITextStoreACP *iface,
201     LONG acpStart, LONG acpEnd, IDataObject **ppDataObject)
202 {
203     trace("\n");
204     return S_OK;
205 }
206 static HRESULT WINAPI TextStoreACP_GetEmbedded(ITextStoreACP *iface,
207     LONG acpPos, REFGUID rguidService, REFIID riid, IUnknown **ppunk)
208 {
209     trace("\n");
210     return S_OK;
211 }
212 static HRESULT WINAPI TextStoreACP_QueryInsertEmbedded(ITextStoreACP *iface,
213     const GUID *pguidService, const FORMATETC *pFormatEtc, BOOL *pfInsertable)
214 {
215     trace("\n");
216     return S_OK;
217 }
218 static HRESULT WINAPI TextStoreACP_InsertEmbedded(ITextStoreACP *iface,
219     DWORD dwFlags, LONG acpStart, LONG acpEnd, IDataObject *pDataObject,
220     TS_TEXTCHANGE *pChange)
221 {
222     trace("\n");
223     return S_OK;
224 }
225 static HRESULT WINAPI TextStoreACP_InsertTextAtSelection(ITextStoreACP *iface,
226     DWORD dwFlags, const WCHAR *pchText, ULONG cch, LONG *pacpStart,
227     LONG *pacpEnd, TS_TEXTCHANGE *pChange)
228 {
229     ok(test_ACP_InsertTextAtSelection == SINK_EXPECTED,"Unexpected TextStoreACP_InsertTextAtSelection\n");
230     test_ACP_InsertTextAtSelection = SINK_FIRED;
231     return S_OK;
232 }
233 static HRESULT WINAPI TextStoreACP_InsertEmbeddedAtSelection(ITextStoreACP *iface,
234     DWORD dwFlags, IDataObject *pDataObject, LONG *pacpStart, LONG *pacpEnd,
235     TS_TEXTCHANGE *pChange)
236 {
237     trace("\n");
238     return S_OK;
239 }
240 static HRESULT WINAPI TextStoreACP_RequestSupportedAttrs(ITextStoreACP *iface,
241     DWORD dwFlags, ULONG cFilterAttrs, const TS_ATTRID *paFilterAttrs)
242 {
243     trace("\n");
244     return S_OK;
245 }
246 static HRESULT WINAPI TextStoreACP_RequestAttrsAtPosition(ITextStoreACP *iface,
247     LONG acpPos, ULONG cFilterAttrs, const TS_ATTRID *paFilterAttrs,
248     DWORD dwFlags)
249 {
250     trace("\n");
251     return S_OK;
252 }
253 static HRESULT WINAPI TextStoreACP_RequestAttrsTransitioningAtPosition(ITextStoreACP *iface,
254     LONG acpPos, ULONG cFilterAttrs, const TS_ATTRID *paFilterAttrs,
255     DWORD dwFlags)
256 {
257     trace("\n");
258     return S_OK;
259 }
260 static HRESULT WINAPI TextStoreACP_FindNextAttrTransition(ITextStoreACP *iface,
261     LONG acpStart, LONG acpHalt, ULONG cFilterAttrs, const TS_ATTRID *paFilterAttrs,
262     DWORD dwFlags, LONG *pacpNext, BOOL *pfFound, LONG *plFoundOffset)
263 {
264     trace("\n");
265     return S_OK;
266 }
267 static HRESULT WINAPI TextStoreACP_RetrieveRequestedAttrs(ITextStoreACP *iface,
268     ULONG ulCount, TS_ATTRVAL *paAttrVals, ULONG *pcFetched)
269 {
270     trace("\n");
271     return S_OK;
272 }
273 static HRESULT WINAPI TextStoreACP_GetEndACP(ITextStoreACP *iface,
274     LONG *pacp)
275 {
276     ok(test_ACP_GetEndACP == SINK_EXPECTED,"Unexpected TextStoreACP_GetEndACP\n");
277     test_ACP_GetEndACP = SINK_FIRED;
278     return S_OK;
279 }
280 static HRESULT WINAPI TextStoreACP_GetActiveView(ITextStoreACP *iface,
281     TsViewCookie *pvcView)
282 {
283     trace("\n");
284     return S_OK;
285 }
286 static HRESULT WINAPI TextStoreACP_GetACPFromPoint(ITextStoreACP *iface,
287     TsViewCookie vcView, const POINT *ptScreen, DWORD dwFlags,
288     LONG *pacp)
289 {
290     trace("\n");
291     return S_OK;
292 }
293 static HRESULT WINAPI TextStoreACP_GetTextExt(ITextStoreACP *iface,
294     TsViewCookie vcView, LONG acpStart, LONG acpEnd, RECT *prc,
295     BOOL *pfClipped)
296 {
297     trace("\n");
298     return S_OK;
299 }
300 static HRESULT WINAPI TextStoreACP_GetScreenExt(ITextStoreACP *iface,
301     TsViewCookie vcView, RECT *prc)
302 {
303     trace("\n");
304     return S_OK;
305 }
306 static HRESULT WINAPI TextStoreACP_GetWnd(ITextStoreACP *iface,
307     TsViewCookie vcView, HWND *phwnd)
308 {
309     trace("\n");
310     return S_OK;
311 }
312
313 static const ITextStoreACPVtbl TextStoreACP_TextStoreACPVtbl =
314 {
315     TextStoreACP_QueryInterface,
316     TextStoreACP_AddRef,
317     TextStoreACP_Release,
318
319     TextStoreACP_AdviseSink,
320     TextStoreACP_UnadviseSink,
321     TextStoreACP_RequestLock,
322     TextStoreACP_GetStatus,
323     TextStoreACP_QueryInsert,
324     TextStoreACP_GetSelection,
325     TextStoreACP_SetSelection,
326     TextStoreACP_GetText,
327     TextStoreACP_SetText,
328     TextStoreACP_GetFormattedText,
329     TextStoreACP_GetEmbedded,
330     TextStoreACP_QueryInsertEmbedded,
331     TextStoreACP_InsertEmbedded,
332     TextStoreACP_InsertTextAtSelection,
333     TextStoreACP_InsertEmbeddedAtSelection,
334     TextStoreACP_RequestSupportedAttrs,
335     TextStoreACP_RequestAttrsAtPosition,
336     TextStoreACP_RequestAttrsTransitioningAtPosition,
337     TextStoreACP_FindNextAttrTransition,
338     TextStoreACP_RetrieveRequestedAttrs,
339     TextStoreACP_GetEndACP,
340     TextStoreACP_GetActiveView,
341     TextStoreACP_GetACPFromPoint,
342     TextStoreACP_GetTextExt,
343     TextStoreACP_GetScreenExt,
344     TextStoreACP_GetWnd
345 };
346
347 static HRESULT TextStoreACP_Constructor(IUnknown **ppOut)
348 {
349     TextStoreACP *This;
350
351     This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(TextStoreACP));
352     if (This == NULL)
353         return E_OUTOFMEMORY;
354
355     This->TextStoreACPVtbl = &TextStoreACP_TextStoreACPVtbl;
356     This->refCount = 1;
357
358     *ppOut = (IUnknown *)This;
359     return S_OK;
360 }
361
362 /**********************************************************************
363  * ITfThreadMgrEventSink
364  **********************************************************************/
365 typedef struct tagThreadMgrEventSink
366 {
367     const ITfThreadMgrEventSinkVtbl *ThreadMgrEventSinkVtbl;
368     LONG refCount;
369 } ThreadMgrEventSink;
370
371 static void ThreadMgrEventSink_Destructor(ThreadMgrEventSink *This)
372 {
373     HeapFree(GetProcessHeap(),0,This);
374 }
375
376 static HRESULT WINAPI ThreadMgrEventSink_QueryInterface(ITfThreadMgrEventSink *iface, REFIID iid, LPVOID *ppvOut)
377 {
378     ThreadMgrEventSink *This = (ThreadMgrEventSink *)iface;
379     *ppvOut = NULL;
380
381     if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_ITfThreadMgrEventSink))
382     {
383         *ppvOut = This;
384     }
385
386     if (*ppvOut)
387     {
388         IUnknown_AddRef(iface);
389         return S_OK;
390     }
391
392     return E_NOINTERFACE;
393 }
394
395 static ULONG WINAPI ThreadMgrEventSink_AddRef(ITfThreadMgrEventSink *iface)
396 {
397     ThreadMgrEventSink *This = (ThreadMgrEventSink *)iface;
398     ok (tmSinkRefCount == This->refCount,"ThreadMgrEventSink refcount off %i vs %i\n",This->refCount,tmSinkRefCount);
399     return InterlockedIncrement(&This->refCount);
400 }
401
402 static ULONG WINAPI ThreadMgrEventSink_Release(ITfThreadMgrEventSink *iface)
403 {
404     ThreadMgrEventSink *This = (ThreadMgrEventSink *)iface;
405     ULONG ret;
406
407     ok (tmSinkRefCount == This->refCount,"ThreadMgrEventSink refcount off %i vs %i\n",This->refCount,tmSinkRefCount);
408     ret = InterlockedDecrement(&This->refCount);
409     if (ret == 0)
410         ThreadMgrEventSink_Destructor(This);
411     return ret;
412 }
413
414 static HRESULT WINAPI ThreadMgrEventSink_OnInitDocumentMgr(ITfThreadMgrEventSink *iface,
415 ITfDocumentMgr *pdim)
416 {
417     ok(test_OnInitDocumentMgr == SINK_EXPECTED, "Unexpected OnInitDocumentMgr sink\n");
418     test_OnInitDocumentMgr = SINK_FIRED;
419     return S_OK;
420 }
421
422 static HRESULT WINAPI ThreadMgrEventSink_OnUninitDocumentMgr(ITfThreadMgrEventSink *iface,
423 ITfDocumentMgr *pdim)
424 {
425     trace("\n");
426     return S_OK;
427 }
428
429 static HRESULT WINAPI ThreadMgrEventSink_OnSetFocus(ITfThreadMgrEventSink *iface,
430 ITfDocumentMgr *pdimFocus, ITfDocumentMgr *pdimPrevFocus)
431 {
432     ok(test_OnSetFocus == SINK_EXPECTED, "Unexpected OnSetFocus sink\n");
433     ok(pdimFocus == test_CurrentFocus,"Sink reports wrong focus\n");
434     ok(pdimPrevFocus == test_PrevFocus,"Sink reports wrong previous focus\n");
435     test_OnSetFocus = SINK_FIRED;
436     return S_OK;
437 }
438
439 static HRESULT WINAPI ThreadMgrEventSink_OnPushContext(ITfThreadMgrEventSink *iface,
440 ITfContext *pic)
441 {
442     HRESULT hr;
443     ITfDocumentMgr *docmgr;
444     ITfContext *test;
445
446     hr = ITfContext_GetDocumentMgr(pic,&docmgr);
447     ok(SUCCEEDED(hr),"GetDocumenMgr failed\n");
448     test = (ITfContext*)0xdeadbeef;
449     ITfDocumentMgr_Release(docmgr);
450     hr = ITfDocumentMgr_GetTop(docmgr,&test);
451     ok(SUCCEEDED(hr),"GetTop failed\n");
452     ok(test == pic, "Wrong context is on top\n");
453     if (test)
454         ITfContext_Release(test);
455
456     ok(test_OnPushContext == SINK_EXPECTED, "Unexpected OnPushContext sink\n");
457     test_OnPushContext = SINK_FIRED;
458     return S_OK;
459 }
460
461 static HRESULT WINAPI ThreadMgrEventSink_OnPopContext(ITfThreadMgrEventSink *iface,
462 ITfContext *pic)
463 {
464     ok(test_OnPopContext == SINK_EXPECTED, "Unexpected OnPopContext sink\n");
465     test_OnPopContext = SINK_FIRED;
466     return S_OK;
467 }
468
469 static const ITfThreadMgrEventSinkVtbl ThreadMgrEventSink_ThreadMgrEventSinkVtbl =
470 {
471     ThreadMgrEventSink_QueryInterface,
472     ThreadMgrEventSink_AddRef,
473     ThreadMgrEventSink_Release,
474
475     ThreadMgrEventSink_OnInitDocumentMgr,
476     ThreadMgrEventSink_OnUninitDocumentMgr,
477     ThreadMgrEventSink_OnSetFocus,
478     ThreadMgrEventSink_OnPushContext,
479     ThreadMgrEventSink_OnPopContext
480 };
481
482 static HRESULT ThreadMgrEventSink_Constructor(IUnknown **ppOut)
483 {
484     ThreadMgrEventSink *This;
485
486     This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(ThreadMgrEventSink));
487     if (This == NULL)
488         return E_OUTOFMEMORY;
489
490     This->ThreadMgrEventSinkVtbl = &ThreadMgrEventSink_ThreadMgrEventSinkVtbl;
491     This->refCount = 1;
492
493     *ppOut = (IUnknown *)This;
494     return S_OK;
495 }
496
497
498 /********************************************************************************************
499  * Stub text service for testing
500  ********************************************************************************************/
501
502 static LONG TS_refCount;
503 static IClassFactory *cf;
504 static DWORD regid;
505
506 typedef HRESULT (*LPFNCONSTRUCTOR)(IUnknown *pUnkOuter, IUnknown **ppvOut);
507
508 typedef struct tagClassFactory
509 {
510     const IClassFactoryVtbl *vtbl;
511     LONG   ref;
512     LPFNCONSTRUCTOR ctor;
513 } ClassFactory;
514
515 typedef struct tagTextService
516 {
517     const ITfTextInputProcessorVtbl *TextInputProcessorVtbl;
518     LONG refCount;
519 } TextService;
520
521 static void ClassFactory_Destructor(ClassFactory *This)
522 {
523     HeapFree(GetProcessHeap(),0,This);
524     TS_refCount--;
525 }
526
527 static HRESULT WINAPI ClassFactory_QueryInterface(IClassFactory *iface, REFIID riid, LPVOID *ppvOut)
528 {
529     *ppvOut = NULL;
530     if (IsEqualIID(riid, &IID_IClassFactory) || IsEqualIID(riid, &IID_IUnknown))
531     {
532         IClassFactory_AddRef(iface);
533         *ppvOut = iface;
534         return S_OK;
535     }
536
537     return E_NOINTERFACE;
538 }
539
540 static ULONG WINAPI ClassFactory_AddRef(IClassFactory *iface)
541 {
542     ClassFactory *This = (ClassFactory *)iface;
543     return InterlockedIncrement(&This->ref);
544 }
545
546 static ULONG WINAPI ClassFactory_Release(IClassFactory *iface)
547 {
548     ClassFactory *This = (ClassFactory *)iface;
549     ULONG ret = InterlockedDecrement(&This->ref);
550
551     if (ret == 0)
552         ClassFactory_Destructor(This);
553     return ret;
554 }
555
556 static HRESULT WINAPI ClassFactory_CreateInstance(IClassFactory *iface, IUnknown *punkOuter, REFIID iid, LPVOID *ppvOut)
557 {
558     ClassFactory *This = (ClassFactory *)iface;
559     HRESULT ret;
560     IUnknown *obj;
561
562     ret = This->ctor(punkOuter, &obj);
563     if (FAILED(ret))
564         return ret;
565     ret = IUnknown_QueryInterface(obj, iid, ppvOut);
566     IUnknown_Release(obj);
567     return ret;
568 }
569
570 static HRESULT WINAPI ClassFactory_LockServer(IClassFactory *iface, BOOL fLock)
571 {
572     if(fLock)
573         InterlockedIncrement(&TS_refCount);
574     else
575         InterlockedDecrement(&TS_refCount);
576
577     return S_OK;
578 }
579
580 static const IClassFactoryVtbl ClassFactoryVtbl = {
581     /* IUnknown */
582     ClassFactory_QueryInterface,
583     ClassFactory_AddRef,
584     ClassFactory_Release,
585
586     /* IClassFactory*/
587     ClassFactory_CreateInstance,
588     ClassFactory_LockServer
589 };
590
591 static HRESULT ClassFactory_Constructor(LPFNCONSTRUCTOR ctor, LPVOID *ppvOut)
592 {
593     ClassFactory *This = HeapAlloc(GetProcessHeap(),0,sizeof(ClassFactory));
594     This->vtbl = &ClassFactoryVtbl;
595     This->ref = 1;
596     This->ctor = ctor;
597     *ppvOut = (LPVOID)This;
598     TS_refCount++;
599     return S_OK;
600 }
601
602 static void TextService_Destructor(TextService *This)
603 {
604     HeapFree(GetProcessHeap(),0,This);
605 }
606
607 static HRESULT WINAPI TextService_QueryInterface(ITfTextInputProcessor *iface, REFIID iid, LPVOID *ppvOut)
608 {
609     TextService *This = (TextService *)iface;
610     *ppvOut = NULL;
611
612     if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_ITfTextInputProcessor))
613     {
614         *ppvOut = This;
615     }
616
617     if (*ppvOut)
618     {
619         IUnknown_AddRef(iface);
620         return S_OK;
621     }
622
623     return E_NOINTERFACE;
624 }
625
626 static ULONG WINAPI TextService_AddRef(ITfTextInputProcessor *iface)
627 {
628     TextService *This = (TextService *)iface;
629     return InterlockedIncrement(&This->refCount);
630 }
631
632 static ULONG WINAPI TextService_Release(ITfTextInputProcessor *iface)
633 {
634     TextService *This = (TextService *)iface;
635     ULONG ret;
636
637     ret = InterlockedDecrement(&This->refCount);
638     if (ret == 0)
639         TextService_Destructor(This);
640     return ret;
641 }
642
643 static HRESULT WINAPI TextService_Activate(ITfTextInputProcessor *iface,
644         ITfThreadMgr *ptim, TfClientId id)
645 {
646     trace("TextService_Activate\n");
647     ok(test_ShouldActivate,"Activation came unexpectedly\n");
648     tid = id;
649     return S_OK;
650 }
651
652 static HRESULT WINAPI TextService_Deactivate(ITfTextInputProcessor *iface)
653 {
654     trace("TextService_Deactivate\n");
655     ok(test_ShouldDeactivate,"Deactivation came unexpectedly\n");
656     return S_OK;
657 }
658
659 static const ITfTextInputProcessorVtbl TextService_TextInputProcessorVtbl=
660 {
661     TextService_QueryInterface,
662     TextService_AddRef,
663     TextService_Release,
664
665     TextService_Activate,
666     TextService_Deactivate
667 };
668
669 static HRESULT TextService_Constructor(IUnknown *pUnkOuter, IUnknown **ppOut)
670 {
671     TextService *This;
672     if (pUnkOuter)
673         return CLASS_E_NOAGGREGATION;
674
675     This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(TextService));
676     if (This == NULL)
677         return E_OUTOFMEMORY;
678
679     This->TextInputProcessorVtbl= &TextService_TextInputProcessorVtbl;
680     This->refCount = 1;
681
682     *ppOut = (IUnknown *)This;
683     return S_OK;
684 }
685
686 static HRESULT RegisterTextService(REFCLSID rclsid)
687 {
688     ClassFactory_Constructor( TextService_Constructor ,(LPVOID*)&cf);
689     return CoRegisterClassObject(rclsid, (IUnknown*) cf, CLSCTX_INPROC_SERVER, REGCLS_MULTIPLEUSE, &regid);
690 }
691
692 static HRESULT UnregisterTextService()
693 {
694     return CoRevokeClassObject(regid);
695 }
696
697 /*
698  * The tests
699  */
700
701 DEFINE_GUID(CLSID_FakeService, 0xEDE1A7AD,0x66DE,0x47E0,0xB6,0x20,0x3E,0x92,0xF8,0x24,0x6B,0xF3);
702 DEFINE_GUID(CLSID_TF_InputProcessorProfiles, 0x33c53a50,0xf456,0x4884,0xb0,0x49,0x85,0xfd,0x64,0x3e,0xcf,0xed);
703 DEFINE_GUID(CLSID_TF_CategoryMgr,         0xA4B544A1,0x438D,0x4B41,0x93,0x25,0x86,0x95,0x23,0xE2,0xD6,0xC7);
704 DEFINE_GUID(GUID_TFCAT_TIP_KEYBOARD,     0x34745c63,0xb2f0,0x4784,0x8b,0x67,0x5e,0x12,0xc8,0x70,0x1a,0x31);
705 DEFINE_GUID(GUID_TFCAT_TIP_SPEECH,       0xB5A73CD1,0x8355,0x426B,0xA1,0x61,0x25,0x98,0x08,0xF2,0x6B,0x14);
706 DEFINE_GUID(GUID_TFCAT_TIP_HANDWRITING,  0x246ecb87,0xc2f2,0x4abe,0x90,0x5b,0xc8,0xb3,0x8a,0xdd,0x2c,0x43);
707 DEFINE_GUID (GUID_TFCAT_DISPLAYATTRIBUTEPROVIDER,  0x046B8C80,0x1647,0x40F7,0x9B,0x21,0xB9,0x3B,0x81,0xAA,0xBC,0x1B);
708 DEFINE_GUID(GUID_NULL,0,0,0,0,0,0,0,0,0,0,0);
709 DEFINE_GUID(CLSID_TF_ThreadMgr,           0x529a9e6b,0x6587,0x4f23,0xab,0x9e,0x9c,0x7d,0x68,0x3e,0x3c,0x50);
710 DEFINE_GUID(CLSID_PreservedKey,           0xA0ED8E55,0xCD3B,0x4274,0xB2,0x95,0xF6,0xC9,0xBA,0x2B,0x84,0x72);
711 DEFINE_GUID(GUID_COMPARTMENT_KEYBOARD_DISABLED,     0x71a5b253,0x1951,0x466b,0x9f,0xbc,0x9c,0x88,0x08,0xfa,0x84,0xf2);
712 DEFINE_GUID(GUID_COMPARTMENT_KEYBOARD_OPENCLOSE,    0x58273aad,0x01bb,0x4164,0x95,0xc6,0x75,0x5b,0xa0,0xb5,0x16,0x2d);
713 DEFINE_GUID(GUID_COMPARTMENT_HANDWRITING_OPENCLOSE, 0xf9ae2c6b,0x1866,0x4361,0xaf,0x72,0x7a,0xa3,0x09,0x48,0x89,0x0e);
714 DEFINE_GUID(GUID_COMPARTMENT_SPEECH_DISABLED,       0x56c5c607,0x0703,0x4e59,0x8e,0x52,0xcb,0xc8,0x4e,0x8b,0xbe,0x35);
715 DEFINE_GUID(GUID_COMPARTMENT_SPEECH_OPENCLOSE,      0x544d6a63,0xe2e8,0x4752,0xbb,0xd1,0x00,0x09,0x60,0xbc,0xa0,0x83);
716 DEFINE_GUID(GUID_COMPARTMENT_SPEECH_GLOBALSTATE,    0x2a54fe8e,0x0d08,0x460c,0xa7,0x5d,0x87,0x03,0x5f,0xf4,0x36,0xc5);
717 DEFINE_GUID(GUID_COMPARTMENT_PERSISTMENUENABLED,    0x575f3783,0x70c8,0x47c8,0xae,0x5d,0x91,0xa0,0x1a,0x1f,0x75,0x92);
718 DEFINE_GUID(GUID_COMPARTMENT_EMPTYCONTEXT,          0xd7487dbf,0x804e,0x41c5,0x89,0x4d,0xad,0x96,0xfd,0x4e,0xea,0x13);
719 DEFINE_GUID(GUID_COMPARTMENT_TIPUISTATUS,           0x148ca3ec,0x0366,0x401c,0x8d,0x75,0xed,0x97,0x8d,0x85,0xfb,0xc9);
720
721 static HRESULT initialize(void)
722 {
723     HRESULT hr;
724     CoInitialize(NULL);
725     hr = CoCreateInstance (&CLSID_TF_InputProcessorProfiles, NULL,
726           CLSCTX_INPROC_SERVER, &IID_ITfInputProcessorProfiles, (void**)&g_ipp);
727     if (SUCCEEDED(hr))
728         hr = CoCreateInstance (&CLSID_TF_CategoryMgr, NULL,
729           CLSCTX_INPROC_SERVER, &IID_ITfCategoryMgr, (void**)&g_cm);
730     if (SUCCEEDED(hr))
731         hr = CoCreateInstance (&CLSID_TF_ThreadMgr, NULL,
732           CLSCTX_INPROC_SERVER, &IID_ITfThreadMgr, (void**)&g_tm);
733     return hr;
734 }
735
736 static void cleanup(void)
737 {
738     if (g_ipp)
739         ITfInputProcessorProfiles_Release(g_ipp);
740     if (g_cm)
741         ITfCategoryMgr_Release(g_cm);
742     if (g_tm)
743         ITfThreadMgr_Release(g_tm);
744     CoUninitialize();
745 }
746
747 static void test_Register(void)
748 {
749     HRESULT hr;
750
751     static const WCHAR szDesc[] = {'F','a','k','e',' ','W','i','n','e',' ','S','e','r','v','i','c','e',0};
752     static const WCHAR szFile[] = {'F','a','k','e',' ','W','i','n','e',' ','S','e','r','v','i','c','e',' ','F','i','l','e',0};
753
754     hr = ITfInputProcessorProfiles_GetCurrentLanguage(g_ipp,&gLangid);
755     ok(SUCCEEDED(hr),"Unable to get current language id\n");
756     trace("Current Language %x\n",gLangid);
757
758     hr = RegisterTextService(&CLSID_FakeService);
759     ok(SUCCEEDED(hr),"Unable to register COM for TextService\n");
760     hr = ITfInputProcessorProfiles_Register(g_ipp, &CLSID_FakeService);
761     ok(SUCCEEDED(hr),"Unable to register text service(%x)\n",hr);
762     hr = ITfInputProcessorProfiles_AddLanguageProfile(g_ipp, &CLSID_FakeService, gLangid, &CLSID_FakeService, szDesc, sizeof(szDesc)/sizeof(WCHAR), szFile, sizeof(szFile)/sizeof(WCHAR), 1);
763     ok(SUCCEEDED(hr),"Unable to add Language Profile (%x)\n",hr);
764 }
765
766 static void test_Unregister(void)
767 {
768     HRESULT hr;
769     hr = ITfInputProcessorProfiles_Unregister(g_ipp, &CLSID_FakeService);
770     ok(SUCCEEDED(hr),"Unable to unregister text service(%x)\n",hr);
771     UnregisterTextService();
772 }
773
774 static void test_EnumInputProcessorInfo(void)
775 {
776     IEnumGUID *ppEnum;
777     BOOL found = FALSE;
778
779     if (SUCCEEDED(ITfInputProcessorProfiles_EnumInputProcessorInfo(g_ipp, &ppEnum)))
780     {
781         ULONG fetched;
782         GUID g;
783         while (IEnumGUID_Next(ppEnum, 1, &g, &fetched) == S_OK)
784         {
785             if(IsEqualGUID(&g,&CLSID_FakeService))
786                 found = TRUE;
787         }
788     }
789     ok(found,"Did not find registered text service\n");
790 }
791
792 static void test_EnumLanguageProfiles(void)
793 {
794     BOOL found = FALSE;
795     IEnumTfLanguageProfiles *ppEnum;
796     if (SUCCEEDED(ITfInputProcessorProfiles_EnumLanguageProfiles(g_ipp,gLangid,&ppEnum)))
797     {
798         TF_LANGUAGEPROFILE profile;
799         while (IEnumTfLanguageProfiles_Next(ppEnum,1,&profile,NULL)==S_OK)
800         {
801             if (IsEqualGUID(&profile.clsid,&CLSID_FakeService))
802             {
803                 found = TRUE;
804                 ok(profile.langid == gLangid, "LangId Incorrect\n");
805                 ok(IsEqualGUID(&profile.catid,&GUID_TFCAT_TIP_KEYBOARD), "CatId Incorrect\n");
806                 ok(IsEqualGUID(&profile.guidProfile,&CLSID_FakeService), "guidProfile Incorrect\n");
807             }
808         }
809     }
810     ok(found,"Registered text service not found\n");
811 }
812
813 static void test_RegisterCategory(void)
814 {
815     HRESULT hr;
816     hr = ITfCategoryMgr_RegisterCategory(g_cm, &CLSID_FakeService, &GUID_TFCAT_TIP_KEYBOARD, &CLSID_FakeService);
817     ok(SUCCEEDED(hr),"ITfCategoryMgr_RegisterCategory failed\n");
818     hr = ITfCategoryMgr_RegisterCategory(g_cm, &CLSID_FakeService, &GUID_TFCAT_DISPLAYATTRIBUTEPROVIDER, &CLSID_FakeService);
819     ok(SUCCEEDED(hr),"ITfCategoryMgr_RegisterCategory failed\n");
820 }
821
822 static void test_UnregisterCategory(void)
823 {
824     HRESULT hr;
825     hr = ITfCategoryMgr_UnregisterCategory(g_cm, &CLSID_FakeService, &GUID_TFCAT_TIP_KEYBOARD, &CLSID_FakeService);
826     ok(SUCCEEDED(hr),"ITfCategoryMgr_UnregisterCategory failed\n");
827     hr = ITfCategoryMgr_UnregisterCategory(g_cm, &CLSID_FakeService, &GUID_TFCAT_DISPLAYATTRIBUTEPROVIDER, &CLSID_FakeService);
828     ok(SUCCEEDED(hr),"ITfCategoryMgr_UnregisterCategory failed\n");
829 }
830
831 static void test_FindClosestCategory(void)
832 {
833     GUID output;
834     HRESULT hr;
835     const GUID *list[3] = {&GUID_TFCAT_TIP_SPEECH, &GUID_TFCAT_TIP_KEYBOARD, &GUID_TFCAT_TIP_HANDWRITING};
836
837     hr = ITfCategoryMgr_FindClosestCategory(g_cm, &CLSID_FakeService, &output, NULL, 0);
838     ok(SUCCEEDED(hr),"ITfCategoryMgr_FindClosestCategory failed (%x)\n",hr);
839     ok(IsEqualGUID(&output,&GUID_TFCAT_DISPLAYATTRIBUTEPROVIDER),"Wrong GUID\n");
840
841     hr = ITfCategoryMgr_FindClosestCategory(g_cm, &CLSID_FakeService, &output, list, 1);
842     ok(SUCCEEDED(hr),"ITfCategoryMgr_FindClosestCategory failed (%x)\n",hr);
843     ok(IsEqualGUID(&output,&GUID_NULL),"Wrong GUID\n");
844
845     hr = ITfCategoryMgr_FindClosestCategory(g_cm, &CLSID_FakeService, &output, list, 3);
846     ok(SUCCEEDED(hr),"ITfCategoryMgr_FindClosestCategory failed (%x)\n",hr);
847     ok(IsEqualGUID(&output,&GUID_TFCAT_TIP_KEYBOARD),"Wrong GUID\n");
848 }
849
850 static void test_Enable(void)
851 {
852     HRESULT hr;
853     BOOL enabled = FALSE;
854
855     hr = ITfInputProcessorProfiles_EnableLanguageProfile(g_ipp,&CLSID_FakeService, gLangid, &CLSID_FakeService, TRUE);
856     ok(SUCCEEDED(hr),"Failed to enable text service\n");
857     hr = ITfInputProcessorProfiles_IsEnabledLanguageProfile(g_ipp,&CLSID_FakeService, gLangid, &CLSID_FakeService, &enabled);
858     ok(SUCCEEDED(hr),"Failed to get enabled state\n");
859     ok(enabled == TRUE,"enabled state incorrect\n");
860 }
861
862 static void test_Disable(void)
863 {
864     HRESULT hr;
865
866     trace("Disabling\n");
867     hr = ITfInputProcessorProfiles_EnableLanguageProfile(g_ipp,&CLSID_FakeService, gLangid, &CLSID_FakeService, FALSE);
868     ok(SUCCEEDED(hr),"Failed to disable text service\n");
869 }
870
871 static void test_ThreadMgrAdviseSinks(void)
872 {
873     ITfSource *source = NULL;
874     HRESULT hr;
875     IUnknown *sink;
876
877     hr = ITfThreadMgr_QueryInterface(g_tm, &IID_ITfSource, (LPVOID*)&source);
878     ok(SUCCEEDED(hr),"Failed to get IID_ITfSource for ThreadMgr\n");
879     if (!source)
880         return;
881
882     hr = ThreadMgrEventSink_Constructor(&sink);
883     ok(hr == S_OK, "got %08x\n", hr);
884     if(FAILED(hr)) return;
885
886     tmSinkRefCount = 1;
887     tmSinkCookie = 0;
888     hr = ITfSource_AdviseSink(source,&IID_ITfThreadMgrEventSink, sink, &tmSinkCookie);
889     ok(SUCCEEDED(hr),"Failed to Advise Sink\n");
890     ok(tmSinkCookie!=0,"Failed to get sink cookie\n");
891
892     /* Advising the sink adds a ref, Relesing here lets the object be deleted
893        when unadvised */
894     tmSinkRefCount = 2;
895     IUnknown_Release(sink);
896     ITfSource_Release(source);
897 }
898
899 static void test_ThreadMgrUnadviseSinks(void)
900 {
901     ITfSource *source = NULL;
902     HRESULT hr;
903
904     hr = ITfThreadMgr_QueryInterface(g_tm, &IID_ITfSource, (LPVOID*)&source);
905     ok(SUCCEEDED(hr),"Failed to get IID_ITfSource for ThreadMgr\n");
906     if (!source)
907         return;
908
909     tmSinkRefCount = 1;
910     hr = ITfSource_UnadviseSink(source, tmSinkCookie);
911     ok(SUCCEEDED(hr),"Failed to unadvise Sink\n");
912     ITfSource_Release(source);
913 }
914
915 /**********************************************************************
916  * ITfKeyEventSink
917  **********************************************************************/
918 typedef struct tagKeyEventSink
919 {
920     const ITfKeyEventSinkVtbl *KeyEventSinkVtbl;
921     LONG refCount;
922 } KeyEventSink;
923
924 static void KeyEventSink_Destructor(KeyEventSink *This)
925 {
926     HeapFree(GetProcessHeap(),0,This);
927 }
928
929 static HRESULT WINAPI KeyEventSink_QueryInterface(ITfKeyEventSink *iface, REFIID iid, LPVOID *ppvOut)
930 {
931     KeyEventSink *This = (KeyEventSink *)iface;
932     *ppvOut = NULL;
933
934     if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_ITfKeyEventSink))
935     {
936         *ppvOut = This;
937     }
938
939     if (*ppvOut)
940     {
941         IUnknown_AddRef(iface);
942         return S_OK;
943     }
944
945     return E_NOINTERFACE;
946 }
947
948 static ULONG WINAPI KeyEventSink_AddRef(ITfKeyEventSink *iface)
949 {
950     KeyEventSink *This = (KeyEventSink *)iface;
951     return InterlockedIncrement(&This->refCount);
952 }
953
954 static ULONG WINAPI KeyEventSink_Release(ITfKeyEventSink *iface)
955 {
956     KeyEventSink *This = (KeyEventSink *)iface;
957     ULONG ret;
958
959     ret = InterlockedDecrement(&This->refCount);
960     if (ret == 0)
961         KeyEventSink_Destructor(This);
962     return ret;
963 }
964
965 static HRESULT WINAPI KeyEventSink_OnSetFocus(ITfKeyEventSink *iface,
966         BOOL fForeground)
967 {
968     ok(test_KEV_OnSetFocus == SINK_EXPECTED,"Unexpected KeyEventSink_OnSetFocus\n");
969     test_KEV_OnSetFocus = SINK_FIRED;
970     return S_OK;
971 }
972
973 static HRESULT WINAPI KeyEventSink_OnTestKeyDown(ITfKeyEventSink *iface,
974         ITfContext *pic, WPARAM wParam, LPARAM lParam, BOOL *pfEaten)
975 {
976     trace("\n");
977     return S_OK;
978 }
979
980 static HRESULT WINAPI KeyEventSink_OnTestKeyUp(ITfKeyEventSink *iface,
981         ITfContext *pic, WPARAM wParam, LPARAM lParam, BOOL *pfEaten)
982 {
983     trace("\n");
984     return S_OK;
985 }
986
987 static HRESULT WINAPI KeyEventSink_OnKeyDown(ITfKeyEventSink *iface,
988         ITfContext *pic, WPARAM wParam, LPARAM lParam, BOOL *pfEaten)
989 {
990     trace("\n");
991     return S_OK;
992 }
993
994 static HRESULT WINAPI KeyEventSink_OnKeyUp(ITfKeyEventSink *iface,
995         ITfContext *pic, WPARAM wParam, LPARAM lParam, BOOL *pfEaten)
996 {
997     trace("\n");
998     return S_OK;
999 }
1000
1001 static HRESULT WINAPI KeyEventSink_OnPreservedKey(ITfKeyEventSink *iface,
1002     ITfContext *pic, REFGUID rguid, BOOL *pfEaten)
1003 {
1004     trace("\n");
1005     return S_OK;
1006 }
1007
1008 static const ITfKeyEventSinkVtbl KeyEventSink_KeyEventSinkVtbl =
1009 {
1010     KeyEventSink_QueryInterface,
1011     KeyEventSink_AddRef,
1012     KeyEventSink_Release,
1013
1014     KeyEventSink_OnSetFocus,
1015     KeyEventSink_OnTestKeyDown,
1016     KeyEventSink_OnTestKeyUp,
1017     KeyEventSink_OnKeyDown,
1018     KeyEventSink_OnKeyUp,
1019     KeyEventSink_OnPreservedKey
1020 };
1021
1022 static HRESULT KeyEventSink_Constructor(ITfKeyEventSink **ppOut)
1023 {
1024     KeyEventSink *This;
1025
1026     This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(KeyEventSink));
1027     if (This == NULL)
1028         return E_OUTOFMEMORY;
1029
1030     This->KeyEventSinkVtbl = &KeyEventSink_KeyEventSinkVtbl;
1031     This->refCount = 1;
1032
1033     *ppOut = (ITfKeyEventSink*)This;
1034     return S_OK;
1035 }
1036
1037
1038 static void test_KeystrokeMgr(void)
1039 {
1040     ITfKeystrokeMgr *keymgr= NULL;
1041     HRESULT hr;
1042     TF_PRESERVEDKEY tfpk;
1043     BOOL preserved;
1044     ITfKeyEventSink *sink = NULL;
1045
1046     KeyEventSink_Constructor(&sink);
1047
1048     hr = ITfThreadMgr_QueryInterface(g_tm, &IID_ITfKeystrokeMgr, (LPVOID*)&keymgr);
1049     ok(SUCCEEDED(hr),"Failed to get IID_ITfKeystrokeMgr for ThreadMgr\n");
1050
1051     tfpk.uVKey = 'A';
1052     tfpk.uModifiers = TF_MOD_SHIFT;
1053
1054     test_KEV_OnSetFocus = SINK_EXPECTED;
1055     hr = ITfKeystrokeMgr_AdviseKeyEventSink(keymgr,tid,sink,TRUE);
1056     ok(SUCCEEDED(hr),"ITfKeystrokeMgr_AdviseKeyEventSink failed\n");
1057     ok(test_KEV_OnSetFocus == SINK_FIRED, "KeyEventSink_OnSetFocus not fired as expected\n");
1058     hr = ITfKeystrokeMgr_AdviseKeyEventSink(keymgr,tid,sink,TRUE);
1059     ok(hr == CONNECT_E_ADVISELIMIT,"Wrong return, expected CONNECT_E_ADVISELIMIT\n");
1060     hr = ITfKeystrokeMgr_AdviseKeyEventSink(keymgr,cid,sink,TRUE);
1061     ok(hr == E_INVALIDARG,"Wrong return, expected E_INVALIDARG\n");
1062
1063     hr =ITfKeystrokeMgr_PreserveKey(keymgr, 0, &CLSID_PreservedKey, &tfpk, NULL, 0);
1064     ok(hr==E_INVALIDARG,"ITfKeystrokeMgr_PreserveKey inproperly succeeded\n");
1065
1066     hr =ITfKeystrokeMgr_PreserveKey(keymgr, tid, &CLSID_PreservedKey, &tfpk, NULL, 0);
1067     ok(SUCCEEDED(hr),"ITfKeystrokeMgr_PreserveKey failed\n");
1068
1069     hr =ITfKeystrokeMgr_PreserveKey(keymgr, tid, &CLSID_PreservedKey, &tfpk, NULL, 0);
1070     ok(hr == TF_E_ALREADY_EXISTS,"ITfKeystrokeMgr_PreserveKey inproperly succeeded\n");
1071
1072     preserved = FALSE;
1073     hr = ITfKeystrokeMgr_IsPreservedKey(keymgr, &CLSID_PreservedKey, &tfpk, &preserved);
1074     ok(hr == S_OK, "ITfKeystrokeMgr_IsPreservedKey failed\n");
1075     if (hr == S_OK) ok(preserved == TRUE,"misreporting preserved key\n");
1076
1077     hr = ITfKeystrokeMgr_UnpreserveKey(keymgr, &CLSID_PreservedKey,&tfpk);
1078     ok(SUCCEEDED(hr),"ITfKeystrokeMgr_UnpreserveKey failed\n");
1079
1080     hr = ITfKeystrokeMgr_IsPreservedKey(keymgr, &CLSID_PreservedKey, &tfpk, &preserved);
1081     ok(hr == S_FALSE, "ITfKeystrokeMgr_IsPreservedKey failed\n");
1082     if (hr == S_FALSE) ok(preserved == FALSE,"misreporting preserved key\n");
1083
1084     hr = ITfKeystrokeMgr_UnpreserveKey(keymgr, &CLSID_PreservedKey,&tfpk);
1085     ok(hr==CONNECT_E_NOCONNECTION,"ITfKeystrokeMgr_UnpreserveKey inproperly succeeded\n");
1086
1087     hr = ITfKeystrokeMgr_UnadviseKeyEventSink(keymgr,tid);
1088     ok(SUCCEEDED(hr),"ITfKeystrokeMgr_UnadviseKeyEventSink failed\n");
1089
1090     ITfKeystrokeMgr_Release(keymgr);
1091     ITfKeyEventSink_Release(sink);
1092 }
1093
1094 static void test_Activate(void)
1095 {
1096     HRESULT hr;
1097
1098     hr = ITfInputProcessorProfiles_ActivateLanguageProfile(g_ipp,&CLSID_FakeService,gLangid,&CLSID_FakeService);
1099     ok(SUCCEEDED(hr),"Failed to Activate text service\n");
1100 }
1101
1102 static inline int check_context_refcount(ITfContext *iface)
1103 {
1104     IUnknown_AddRef(iface);
1105     return IUnknown_Release(iface);
1106 }
1107
1108 static void test_startSession(void)
1109 {
1110     HRESULT hr;
1111     DWORD cnt;
1112     DWORD editCookie;
1113     ITfDocumentMgr *dmtest;
1114     ITfContext *cxt,*cxt2,*cxt3,*cxtTest;
1115     ITextStoreACP *ts;
1116     TfClientId cid2 = 0;
1117
1118     hr = ITfThreadMgr_Deactivate(g_tm);
1119     ok(hr == E_UNEXPECTED,"Deactivate should have failed with E_UNEXPECTED\n");
1120
1121     test_ShouldActivate = TRUE;
1122     hr  = ITfThreadMgr_Activate(g_tm,&cid);
1123     ok(SUCCEEDED(hr),"Failed to Activate\n");
1124     ok(cid != tid,"TextService id mistakenly matches Client id\n");
1125
1126     test_ShouldActivate = FALSE;
1127     hr = ITfThreadMgr_Activate(g_tm,&cid2);
1128     ok(SUCCEEDED(hr),"Failed to Activate\n");
1129     ok (cid == cid2, "Second activate client ID does not match\n");
1130
1131     hr = ITfThreadMgr_Deactivate(g_tm);
1132     ok(SUCCEEDED(hr),"Failed to Deactivate\n");
1133
1134     hr = ITfThreadMgr_CreateDocumentMgr(g_tm,&g_dm);
1135     ok(SUCCEEDED(hr),"CreateDocumentMgr failed\n");
1136
1137     hr = ITfThreadMgr_GetFocus(g_tm,&dmtest);
1138     ok(SUCCEEDED(hr),"GetFocus Failed\n");
1139     ok(dmtest == NULL,"Initial focus not null\n");
1140
1141     test_CurrentFocus = g_dm;
1142     test_PrevFocus = NULL;
1143     test_OnSetFocus  = SINK_EXPECTED;
1144     hr = ITfThreadMgr_SetFocus(g_tm,g_dm);
1145     ok(SUCCEEDED(hr),"SetFocus Failed\n");
1146     ok(test_OnSetFocus == SINK_FIRED, "OnSetFocus sink not called\n");
1147     test_OnSetFocus  = SINK_UNEXPECTED;
1148
1149     hr = ITfThreadMgr_GetFocus(g_tm,&dmtest);
1150     ok(SUCCEEDED(hr),"GetFocus Failed\n");
1151     ok(g_dm == dmtest,"Expected DocumentMgr not focused\n");
1152
1153     cnt = ITfDocumentMgr_Release(g_dm);
1154     ok(cnt == 2,"DocumentMgr refcount not expected (2 vs %i)\n",cnt);
1155
1156     hr = ITfThreadMgr_GetFocus(g_tm,&dmtest);
1157     ok(SUCCEEDED(hr),"GetFocus Failed\n");
1158     ok(g_dm == dmtest,"Expected DocumentMgr not focused\n");
1159
1160     TextStoreACP_Constructor((IUnknown**)&ts);
1161
1162     hr = ITfDocumentMgr_CreateContext(g_dm, cid, 0, (IUnknown*)ts, &cxt, &editCookie);
1163     ok(SUCCEEDED(hr),"CreateContext Failed\n");
1164
1165     hr = ITfDocumentMgr_CreateContext(g_dm, cid, 0, NULL, &cxt2, &editCookie);
1166     ok(SUCCEEDED(hr),"CreateContext Failed\n");
1167
1168     hr = ITfDocumentMgr_CreateContext(g_dm, cid, 0, NULL, &cxt3, &editCookie);
1169     ok(SUCCEEDED(hr),"CreateContext Failed\n");
1170
1171     hr = ITfContext_GetDocumentMgr(cxt,&dmtest);
1172     ok(hr == S_OK, "ITfContext_GetDocumentMgr failed with %x\n",hr);
1173     ok(dmtest == g_dm, "Wrong documentmgr\n");
1174     ITfDocumentMgr_Release(dmtest);
1175
1176     cnt = check_context_refcount(cxt);
1177     test_OnPushContext = SINK_EXPECTED;
1178     test_ACP_AdviseSink = SINK_EXPECTED;
1179     test_OnInitDocumentMgr = SINK_EXPECTED;
1180     hr = ITfDocumentMgr_Push(g_dm, cxt);
1181     ok(SUCCEEDED(hr),"Push Failed\n");
1182     ok(check_context_refcount(cxt) > cnt, "Ref count did not increase\n");
1183     ok(test_OnPushContext == SINK_FIRED, "OnPushContext sink not fired\n");
1184     ok(test_OnInitDocumentMgr == SINK_FIRED, "OnInitDocumentMgr sink not fired\n");
1185     ok(test_ACP_AdviseSink == SINK_FIRED,"TextStoreACP_AdviseSink not fired\n");
1186
1187     hr = ITfDocumentMgr_GetTop(g_dm, &cxtTest);
1188     ok(SUCCEEDED(hr),"GetTop Failed\n");
1189     ok(cxtTest == cxt, "Wrong context on top\n");
1190     ok(check_context_refcount(cxt) > cnt, "Ref count did not increase\n");
1191     cnt = ITfContext_Release(cxtTest);
1192
1193     hr = ITfDocumentMgr_GetBase(g_dm, &cxtTest);
1194     ok(SUCCEEDED(hr),"GetBase Failed\n");
1195     ok(cxtTest == cxt, "Wrong context on Base\n");
1196     ok(check_context_refcount(cxt) > cnt, "Ref count did not increase\n");
1197     ITfContext_Release(cxtTest);
1198
1199     check_context_refcount(cxt2);
1200     test_OnPushContext = SINK_EXPECTED;
1201     hr = ITfDocumentMgr_Push(g_dm, cxt2);
1202     ok(SUCCEEDED(hr),"Push Failed\n");
1203     ok(test_OnPushContext == SINK_FIRED, "OnPushContext sink not fired\n");
1204
1205     cnt = check_context_refcount(cxt2);
1206     hr = ITfDocumentMgr_GetTop(g_dm, &cxtTest);
1207     ok(SUCCEEDED(hr),"GetTop Failed\n");
1208     ok(cxtTest == cxt2, "Wrong context on top\n");
1209     ok(check_context_refcount(cxt2) > cnt, "Ref count did not increase\n");
1210     ITfContext_Release(cxtTest);
1211
1212     cnt = check_context_refcount(cxt);
1213     hr = ITfDocumentMgr_GetBase(g_dm, &cxtTest);
1214     ok(SUCCEEDED(hr),"GetBase Failed\n");
1215     ok(cxtTest == cxt, "Wrong context on Base\n");
1216     ok(check_context_refcount(cxt) > cnt, "Ref count did not increase\n");
1217     ITfContext_Release(cxtTest);
1218
1219     cnt = check_context_refcount(cxt3);
1220     hr = ITfDocumentMgr_Push(g_dm, cxt3);
1221     ok(FAILED(hr),"Push Succeeded\n");
1222     ok(check_context_refcount(cxt3) == cnt, "Ref changed\n");
1223
1224     cnt = check_context_refcount(cxt2);
1225     hr = ITfDocumentMgr_GetTop(g_dm, &cxtTest);
1226     ok(SUCCEEDED(hr),"GetTop Failed\n");
1227     ok(cxtTest == cxt2, "Wrong context on top\n");
1228     ok(check_context_refcount(cxt2) > cnt, "Ref count did not increase\n");
1229     ITfContext_Release(cxtTest);
1230
1231     cnt = check_context_refcount(cxt);
1232     hr = ITfDocumentMgr_GetBase(g_dm, &cxtTest);
1233     ok(SUCCEEDED(hr),"GetBase Failed\n");
1234     ok(cxtTest == cxt, "Wrong context on Base\n");
1235     ok(check_context_refcount(cxt) > cnt, "Ref count did not increase\n");
1236     ITfContext_Release(cxtTest);
1237
1238     cnt = check_context_refcount(cxt2);
1239     test_OnPopContext = SINK_EXPECTED;
1240     hr = ITfDocumentMgr_Pop(g_dm, 0);
1241     ok(SUCCEEDED(hr),"Pop Failed\n");
1242     ok(check_context_refcount(cxt2) < cnt, "Ref count did not decrease\n");
1243     ok(test_OnPopContext == SINK_FIRED, "OnPopContext sink not fired\n");
1244
1245     dmtest = (void *)0xfeedface;
1246     hr = ITfContext_GetDocumentMgr(cxt2,&dmtest);
1247     ok(hr == S_FALSE, "ITfContext_GetDocumentMgr wrong rc %x\n",hr);
1248     ok(dmtest == NULL,"returned documentmgr should be null\n");
1249
1250     hr = ITfDocumentMgr_GetTop(g_dm, &cxtTest);
1251     ok(SUCCEEDED(hr),"GetTop Failed\n");
1252     ok(cxtTest == cxt, "Wrong context on top\n");
1253     ITfContext_Release(cxtTest);
1254
1255     hr = ITfDocumentMgr_GetBase(g_dm, &cxtTest);
1256     ok(SUCCEEDED(hr),"GetBase Failed\n");
1257     ok(cxtTest == cxt, "Wrong context on base\n");
1258     ITfContext_Release(cxtTest);
1259
1260     hr = ITfDocumentMgr_Pop(g_dm, 0);
1261     ok(FAILED(hr),"Pop Succeeded\n");
1262
1263     hr = ITfDocumentMgr_GetTop(g_dm, &cxtTest);
1264     ok(SUCCEEDED(hr),"GetTop Failed\n");
1265     ok(cxtTest == cxt, "Wrong context on top\n");
1266     ITfContext_Release(cxtTest);
1267
1268     hr = ITfDocumentMgr_GetBase(g_dm, &cxtTest);
1269     ok(SUCCEEDED(hr),"GetBase Failed\n");
1270     ok(cxtTest == cxt, "Wrong context on base\n");
1271     ITfContext_Release(cxtTest);
1272
1273     ITfContext_Release(cxt);
1274     ITfContext_Release(cxt2);
1275     ITfContext_Release(cxt3);
1276 }
1277
1278 static void test_endSession(void)
1279 {
1280     HRESULT hr;
1281     test_ShouldDeactivate = TRUE;
1282     test_CurrentFocus = NULL;
1283     test_PrevFocus = g_dm;
1284     test_OnSetFocus  = SINK_EXPECTED;
1285     hr = ITfThreadMgr_Deactivate(g_tm);
1286     ok(SUCCEEDED(hr),"Failed to Deactivate\n");
1287     ok(test_OnSetFocus == SINK_FIRED, "OnSetFocus sink not called\n");
1288     test_OnSetFocus  = SINK_UNEXPECTED;
1289 }
1290
1291 static void test_TfGuidAtom(void)
1292 {
1293     GUID gtest,g1;
1294     HRESULT hr;
1295     TfGuidAtom atom1,atom2;
1296     BOOL equal;
1297
1298     CoCreateGuid(&gtest);
1299
1300     /* msdn reports this should return E_INVALIDARG.  However my test show it crashing (winxp)*/
1301     /*
1302     hr = ITfCategoryMgr_RegisterGUID(g_cm,&gtest,NULL);
1303     ok(hr==E_INVALIDARG,"ITfCategoryMgr_RegisterGUID should have failed\n");
1304     */
1305     hr = ITfCategoryMgr_RegisterGUID(g_cm,&gtest,&atom1);
1306     ok(SUCCEEDED(hr),"ITfCategoryMgr_RegisterGUID failed\n");
1307     hr = ITfCategoryMgr_RegisterGUID(g_cm,&gtest,&atom2);
1308     ok(SUCCEEDED(hr),"ITfCategoryMgr_RegisterGUID failed\n");
1309     ok(atom1 == atom2,"atoms do not match\n");
1310     hr = ITfCategoryMgr_GetGUID(g_cm,atom2,NULL);
1311     ok(hr==E_INVALIDARG,"ITfCategoryMgr_GetGUID should have failed\n");
1312     hr = ITfCategoryMgr_GetGUID(g_cm,atom2,&g1);
1313     ok(SUCCEEDED(hr),"ITfCategoryMgr_GetGUID failed\n");
1314     ok(IsEqualGUID(&g1,&gtest),"guids do not match\n");
1315     hr = ITfCategoryMgr_IsEqualTfGuidAtom(g_cm,atom1,&gtest,NULL);
1316     ok(hr==E_INVALIDARG,"ITfCategoryMgr_IsEqualTfGuidAtom should have failed\n");
1317     hr = ITfCategoryMgr_IsEqualTfGuidAtom(g_cm,atom1,&gtest,&equal);
1318     ok(SUCCEEDED(hr),"ITfCategoryMgr_IsEqualTfGuidAtom failed\n");
1319     ok(equal == TRUE,"Equal value invalid\n");
1320
1321     /* show that cid and tid TfClientIds are also TfGuidAtoms */
1322     hr = ITfCategoryMgr_IsEqualTfGuidAtom(g_cm,tid,&CLSID_FakeService,&equal);
1323     ok(SUCCEEDED(hr),"ITfCategoryMgr_IsEqualTfGuidAtom failed\n");
1324     ok(equal == TRUE,"Equal value invalid\n");
1325     hr = ITfCategoryMgr_GetGUID(g_cm,cid,&g1);
1326     ok(SUCCEEDED(hr),"ITfCategoryMgr_GetGUID failed\n");
1327     ok(!IsEqualGUID(&g1,&GUID_NULL),"guid should not be NULL\n");
1328 }
1329
1330 static void test_ClientId(void)
1331 {
1332     ITfClientId *pcid;
1333     TfClientId id1,id2;
1334     HRESULT hr;
1335     GUID g2;
1336
1337     hr = ITfThreadMgr_QueryInterface(g_tm, &IID_ITfClientId, (LPVOID*)&pcid);
1338     ok(SUCCEEDED(hr),"Unable to acquire ITfClientId interface\n");
1339
1340     CoCreateGuid(&g2);
1341
1342     hr = ITfClientId_GetClientId(pcid,&GUID_NULL,&id1);
1343     ok(SUCCEEDED(hr),"GetClientId failed\n");
1344     hr = ITfClientId_GetClientId(pcid,&GUID_NULL,&id2);
1345     ok(SUCCEEDED(hr),"GetClientId failed\n");
1346     ok(id1==id2,"Id's for GUID_NULL do not match\n");
1347     hr = ITfClientId_GetClientId(pcid,&CLSID_FakeService,&id2);
1348     ok(SUCCEEDED(hr),"GetClientId failed\n");
1349     ok(id2!=id1,"Id matches GUID_NULL\n");
1350     ok(id2==tid,"Id for CLSID_FakeService not matching tid\n");
1351     ok(id2!=cid,"Id for CLSID_FakeService matching cid\n");
1352     hr = ITfClientId_GetClientId(pcid,&g2,&id2);
1353     ok(SUCCEEDED(hr),"GetClientId failed\n");
1354     ok(id2!=id1,"Id matches GUID_NULL\n");
1355     ok(id2!=tid,"Id for random guid matching tid\n");
1356     ok(id2!=cid,"Id for random guid matching cid\n");
1357     ITfClientId_Release(pcid);
1358 }
1359
1360 /**********************************************************************
1361  * ITfEditSession
1362  **********************************************************************/
1363 typedef struct tagEditSession
1364 {
1365     const ITfEditSessionVtbl *EditSessionVtbl;
1366     LONG refCount;
1367 } EditSession;
1368
1369 static void EditSession_Destructor(EditSession *This)
1370 {
1371     HeapFree(GetProcessHeap(),0,This);
1372 }
1373
1374 static HRESULT WINAPI EditSession_QueryInterface(ITfEditSession *iface, REFIID iid, LPVOID *ppvOut)
1375 {
1376     EditSession *This = (EditSession *)iface;
1377     *ppvOut = NULL;
1378
1379     if (IsEqualIID(iid, &IID_IUnknown) || IsEqualIID(iid, &IID_ITfEditSession))
1380     {
1381         *ppvOut = This;
1382     }
1383
1384     if (*ppvOut)
1385     {
1386         IUnknown_AddRef(iface);
1387         return S_OK;
1388     }
1389
1390     return E_NOINTERFACE;
1391 }
1392
1393 static ULONG WINAPI EditSession_AddRef(ITfEditSession *iface)
1394 {
1395     EditSession *This = (EditSession *)iface;
1396     return InterlockedIncrement(&This->refCount);
1397 }
1398
1399 static ULONG WINAPI EditSession_Release(ITfEditSession *iface)
1400 {
1401     EditSession *This = (EditSession *)iface;
1402     ULONG ret;
1403
1404     ret = InterlockedDecrement(&This->refCount);
1405     if (ret == 0)
1406         EditSession_Destructor(This);
1407     return ret;
1408 }
1409
1410 static void test_InsertAtSelection(TfEditCookie ec, ITfContext *cxt)
1411 {
1412     HRESULT hr;
1413     ITfInsertAtSelection *iis;
1414     ITfRange *range=NULL;
1415     static const WCHAR txt[] = {'H','e','l','l','o',' ','W','o','r','l','d',0};
1416
1417     hr = ITfContext_QueryInterface(cxt, &IID_ITfInsertAtSelection , (LPVOID*)&iis);
1418     ok(SUCCEEDED(hr),"Failed to get ITfInsertAtSelection interface\n");
1419     test_ACP_InsertTextAtSelection = SINK_EXPECTED;
1420     hr = ITfInsertAtSelection_InsertTextAtSelection(iis, ec, 0, txt, 11, &range);
1421     ok(SUCCEEDED(hr),"ITfInsertAtSelection_InsertTextAtSelection failed %x\n",hr);
1422     ok(test_ACP_InsertTextAtSelection == SINK_FIRED,"expected InsertTextAtSelection not fired\n");
1423     ok(range != NULL,"No range returned\n");
1424     ITfRange_Release(range);
1425     ITfInsertAtSelection_Release(iis);
1426 }
1427
1428 static HRESULT WINAPI EditSession_DoEditSession(ITfEditSession *iface,
1429 TfEditCookie ec)
1430 {
1431     ITfContext *cxt;
1432     ITfDocumentMgr *dm;
1433     ITfRange *range;
1434     TF_SELECTION selection;
1435     ULONG fetched;
1436     HRESULT hr;
1437
1438     ok(test_DoEditSession == SINK_EXPECTED, "Unexpected DoEditSession\n");
1439     ok(test_ACP_RequestLock == SINK_FIRED,"Expected RequestLock not fired\n");
1440     test_DoEditSession = SINK_FIRED;
1441
1442     ITfThreadMgr_GetFocus(g_tm, &dm);
1443     ITfDocumentMgr_GetTop(dm,&cxt);
1444
1445     hr = ITfContext_GetStart(cxt,ec,NULL);
1446     ok(hr == E_INVALIDARG,"Unexpected return code %x\n",hr);
1447
1448     range = (ITfRange*)0xdeaddead;
1449     hr = ITfContext_GetStart(cxt,0xdeadcafe,&range);
1450     ok(hr == TF_E_NOLOCK,"Unexpected return code %x\n",hr);
1451     ok(range == NULL,"Range not set to NULL\n");
1452
1453     hr = ITfContext_GetStart(cxt,ec,&range);
1454     ok(SUCCEEDED(hr),"Unexpected return code %x\n",hr);
1455     ok(range != NULL,"Range set to NULL\n");
1456
1457     ITfRange_Release(range);
1458
1459     hr = ITfContext_GetEnd(cxt,ec,NULL);
1460     ok(hr == E_INVALIDARG,"Unexpected return code %x\n",hr);
1461
1462     range = (ITfRange*)0xdeaddead;
1463     hr = ITfContext_GetEnd(cxt,0xdeadcafe,&range);
1464     ok(hr == TF_E_NOLOCK,"Unexpected return code %x\n",hr);
1465     ok(range == NULL,"Range not set to NULL\n");
1466
1467     test_ACP_GetEndACP = SINK_EXPECTED;
1468     hr = ITfContext_GetEnd(cxt,ec,&range);
1469     ok(SUCCEEDED(hr),"Unexpected return code %x\n",hr);
1470     ok(range != NULL,"Range set to NULL\n");
1471     ok(test_ACP_GetEndACP == SINK_FIRED, "GetEndACP not fired as expected\n");
1472
1473     ITfRange_Release(range);
1474
1475     selection.range = NULL;
1476     test_ACP_GetSelection = SINK_EXPECTED;
1477     hr = ITfContext_GetSelection(cxt, ec, TF_DEFAULT_SELECTION, 1, &selection, &fetched);
1478     ok(SUCCEEDED(hr),"ITfContext_GetSelection failed\n");
1479     ok(fetched == 1,"fetched incorrect\n");
1480     ok(selection.range != NULL,"NULL range\n");
1481     ok(test_ACP_GetSelection == SINK_FIRED," expected ACP_GetSepection not fired\n");
1482     ITfRange_Release(selection.range);
1483
1484     test_InsertAtSelection(ec, cxt);
1485
1486     test_ACP_GetEndACP = SINK_EXPECTED;
1487     hr = ITfContext_GetEnd(cxt,ec,&range);
1488     ok(SUCCEEDED(hr),"Unexpected return code %x\n",hr);
1489     ok(range != NULL,"Range set to NULL\n");
1490     ok(test_ACP_GetEndACP == SINK_FIRED, "GetEndACP not fired as expected\n");
1491
1492     selection.range = range;
1493     selection.style.ase = TF_AE_NONE;
1494     selection.style.fInterimChar = FALSE;
1495     test_ACP_SetSelection = SINK_EXPECTED;
1496     hr = ITfContext_SetSelection(cxt, ec, 1, &selection);
1497     ok(test_ACP_SetSelection == SINK_FIRED, "SetSelection not fired as expected\n");
1498     ITfRange_Release(range);
1499
1500     ITfContext_Release(cxt);
1501     ITfDocumentMgr_Release(dm);
1502     return 0xdeadcafe;
1503 }
1504
1505 static const ITfEditSessionVtbl EditSession_EditSessionVtbl =
1506 {
1507     EditSession_QueryInterface,
1508     EditSession_AddRef,
1509     EditSession_Release,
1510
1511     EditSession_DoEditSession
1512 };
1513
1514 static HRESULT EditSession_Constructor(ITfEditSession **ppOut)
1515 {
1516     EditSession *This;
1517
1518     *ppOut = NULL;
1519     This = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(EditSession));
1520     if (This == NULL)
1521         return E_OUTOFMEMORY;
1522
1523     This->EditSessionVtbl = &EditSession_EditSessionVtbl;
1524     This->refCount = 1;
1525
1526     *ppOut = (ITfEditSession*)This;
1527     return S_OK;
1528 }
1529
1530 static void test_TStoApplicationText(void)
1531 {
1532     HRESULT hr, hrSession;
1533     ITfEditSession *es;
1534     ITfContext *cxt;
1535     ITfDocumentMgr *dm;
1536
1537     ITfThreadMgr_GetFocus(g_tm, &dm);
1538     EditSession_Constructor(&es);
1539     ITfDocumentMgr_GetTop(dm,&cxt);
1540
1541     hrSession = 0xfeedface;
1542     /* Test no premissions flags */
1543     hr = ITfContext_RequestEditSession(cxt, tid, es, TF_ES_SYNC, &hrSession);
1544     ok(hr == E_INVALIDARG,"RequestEditSession should have failed with %x not %x\n",E_INVALIDARG,hr);
1545     ok(hrSession == E_FAIL,"hrSession should be %x not %x\n",E_FAIL,hrSession);
1546
1547     documentStatus = TS_SD_READONLY;
1548     hrSession = 0xfeedface;
1549     test_ACP_GetStatus = SINK_EXPECTED;
1550     hr = ITfContext_RequestEditSession(cxt, tid, es, TF_ES_SYNC|TF_ES_READWRITE, &hrSession);
1551     ok(SUCCEEDED(hr),"ITfContext_RequestEditSession failed\n");
1552     ok(hrSession == TS_E_READONLY,"Unexpected hrSession (%x)\n",hrSession);
1553     ok(test_ACP_GetStatus == SINK_FIRED," expected GetStatus not fired\n");
1554
1555     /* signal a change to allow readwrite sessions */
1556     documentStatus = 0;
1557     test_ACP_RequestLock = SINK_EXPECTED;
1558     ITextStoreACPSink_OnStatusChange(ACPSink,documentStatus);
1559     ok(test_ACP_RequestLock == SINK_FIRED," expected RequestLock not fired\n");
1560
1561     test_ACP_GetStatus = SINK_EXPECTED;
1562     test_ACP_RequestLock = SINK_EXPECTED;
1563     test_DoEditSession = SINK_EXPECTED;
1564     hrSession = 0xfeedface;
1565     hr = ITfContext_RequestEditSession(cxt, tid, es, TF_ES_SYNC|TF_ES_READWRITE, &hrSession);
1566     ok(SUCCEEDED(hr),"ITfContext_RequestEditSession failed\n");
1567     ok(test_ACP_RequestLock == SINK_FIRED," expected RequestLock not fired\n");
1568     ok(test_DoEditSession == SINK_FIRED," expected DoEditSession not fired\n");
1569     ok(test_ACP_GetStatus == SINK_FIRED," expected GetStatus not fired\n");
1570     ok(hrSession == 0xdeadcafe,"Unexpected hrSession (%x)\n",hrSession);
1571
1572     ITfContext_Release(cxt);
1573     ITfDocumentMgr_Release(dm);
1574     ITfEditSession_Release(es);
1575 }
1576
1577 static void enum_compartments(ITfCompartmentMgr *cmpmgr, REFGUID present, REFGUID absent)
1578 {
1579     BOOL found,found2;
1580     IEnumGUID *ppEnum;
1581     found = FALSE;
1582     found2 = FALSE;
1583     if (SUCCEEDED(ITfCompartmentMgr_EnumCompartments(cmpmgr, &ppEnum)))
1584     {
1585         ULONG fetched;
1586         GUID g;
1587         while (IEnumGUID_Next(ppEnum, 1, &g, &fetched) == S_OK)
1588         {
1589             WCHAR str[50];
1590             CHAR strA[50];
1591             StringFromGUID2(&g,str,50);
1592             WideCharToMultiByte(CP_ACP,0,str,50,strA,50,0,0);
1593             trace("found %s\n",strA);
1594             if (present && IsEqualGUID(present,&g))
1595                 found = TRUE;
1596             if (absent && IsEqualGUID(absent, &g))
1597                 found2 = TRUE;
1598         }
1599         IEnumGUID_Release(ppEnum);
1600     }
1601     if (present)
1602         ok(found,"Did not find compartment\n");
1603     if (absent)
1604         ok(!found2,"Found compartment that should be absent\n");
1605 }
1606
1607 static void test_Compartments(void)
1608 {
1609     ITfContext *cxt;
1610     ITfDocumentMgr *dm;
1611     ITfCompartmentMgr *cmpmgr;
1612     ITfCompartment *cmp;
1613     HRESULT hr;
1614
1615     ITfThreadMgr_GetFocus(g_tm, &dm);
1616     ITfDocumentMgr_GetTop(dm,&cxt);
1617
1618     /* Global */
1619     hr = ITfThreadMgr_GetGlobalCompartment(g_tm, &cmpmgr);
1620     ok(SUCCEEDED(hr),"GetGlobalCompartment failed\n");
1621     hr = ITfCompartmentMgr_GetCompartment(cmpmgr, &GUID_COMPARTMENT_SPEECH_OPENCLOSE, &cmp);
1622     ok(SUCCEEDED(hr),"GetCompartment failed\n");
1623     ITfCompartment_Release(cmp);
1624     enum_compartments(cmpmgr,&GUID_COMPARTMENT_SPEECH_OPENCLOSE,NULL);
1625     ITfCompartmentMgr_Release(cmpmgr);
1626
1627     /* Thread */
1628     hr = ITfThreadMgr_QueryInterface(g_tm, &IID_ITfCompartmentMgr, (LPVOID*)&cmpmgr);
1629     ok(SUCCEEDED(hr),"ThreadMgr QI for IID_ITfCompartmentMgr failed\n");
1630     hr = ITfCompartmentMgr_GetCompartment(cmpmgr, &CLSID_FakeService, &cmp);
1631     ok(SUCCEEDED(hr),"GetCompartment failed\n");
1632     enum_compartments(cmpmgr,&CLSID_FakeService,&GUID_COMPARTMENT_SPEECH_OPENCLOSE);
1633     ITfCompartmentMgr_ClearCompartment(cmpmgr,tid,&CLSID_FakeService);
1634     enum_compartments(cmpmgr,NULL,&CLSID_FakeService);
1635     ITfCompartmentMgr_Release(cmpmgr);
1636     ITfCompartment_Release(cmp);
1637
1638     /* DocumentMgr */
1639     hr = ITfDocumentMgr_QueryInterface(dm, &IID_ITfCompartmentMgr, (LPVOID*)&cmpmgr);
1640     ok(SUCCEEDED(hr),"DocumentMgr QI for IID_ITfCompartmentMgr failed\n");
1641
1642     hr = ITfCompartmentMgr_GetCompartment(cmpmgr, &GUID_COMPARTMENT_PERSISTMENUENABLED, &cmp);
1643     ok(SUCCEEDED(hr),"GetCompartment failed\n");
1644     enum_compartments(cmpmgr,&GUID_COMPARTMENT_PERSISTMENUENABLED,&GUID_COMPARTMENT_SPEECH_OPENCLOSE);
1645     ITfCompartmentMgr_Release(cmpmgr);
1646
1647     /* Context */
1648     hr = ITfContext_QueryInterface(cxt, &IID_ITfCompartmentMgr, (LPVOID*)&cmpmgr);
1649     ok(SUCCEEDED(hr),"Context QI for IID_ITfCompartmentMgr failed\n");
1650     enum_compartments(cmpmgr,NULL,&GUID_COMPARTMENT_PERSISTMENUENABLED);
1651     ITfCompartmentMgr_Release(cmpmgr);
1652
1653     ITfContext_Release(cxt);
1654     ITfDocumentMgr_Release(dm);
1655 }
1656
1657 START_TEST(inputprocessor)
1658 {
1659     if (SUCCEEDED(initialize()))
1660     {
1661         test_Register();
1662         test_RegisterCategory();
1663         test_EnumInputProcessorInfo();
1664         test_Enable();
1665         test_ThreadMgrAdviseSinks();
1666         test_Activate();
1667         test_startSession();
1668         test_TfGuidAtom();
1669         test_ClientId();
1670         test_KeystrokeMgr();
1671         test_TStoApplicationText();
1672         test_Compartments();
1673         test_endSession();
1674         test_EnumLanguageProfiles();
1675         test_FindClosestCategory();
1676         test_Disable();
1677         test_ThreadMgrUnadviseSinks();
1678         test_UnregisterCategory();
1679         test_Unregister();
1680     }
1681     else
1682         skip("Unable to create InputProcessor\n");
1683     cleanup();
1684 }