2 * Unit tests for ITfInputProcessor
4 * Copyright 2009 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
24 #include "wine/test.h"
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;
41 #define SINK_UNEXPECTED 0
42 #define SINK_EXPECTED 1
45 static BOOL test_ShouldActivate
= FALSE
;
46 static BOOL test_ShouldDeactivate
= FALSE
;
48 static DWORD tmSinkCookie
;
49 static DWORD tmSinkRefCount
;
50 static ITfDocumentMgr
*test_CurrentFocus
= NULL
;
51 static ITfDocumentMgr
*test_PrevFocus
= NULL
;
52 static INT test_OnSetFocus
= SINK_UNEXPECTED
;
53 static INT test_OnInitDocumentMgr
= SINK_UNEXPECTED
;
54 static INT test_OnPushContext
= SINK_UNEXPECTED
;
55 static INT test_OnPopContext
= SINK_UNEXPECTED
;
56 static INT test_KEV_OnSetFocus
= SINK_UNEXPECTED
;
58 HRESULT
RegisterTextService(REFCLSID rclsid
);
59 HRESULT
UnregisterTextService();
60 HRESULT
ThreadMgrEventSink_Constructor(IUnknown
**ppOut
);
61 HRESULT
TextStoreACP_Constructor(IUnknown
**ppOut
);
63 DEFINE_GUID(CLSID_FakeService
, 0xEDE1A7AD,0x66DE,0x47E0,0xB6,0x20,0x3E,0x92,0xF8,0x24,0x6B,0xF3);
64 DEFINE_GUID(CLSID_TF_InputProcessorProfiles
, 0x33c53a50,0xf456,0x4884,0xb0,0x49,0x85,0xfd,0x64,0x3e,0xcf,0xed);
65 DEFINE_GUID(CLSID_TF_CategoryMgr
, 0xA4B544A1,0x438D,0x4B41,0x93,0x25,0x86,0x95,0x23,0xE2,0xD6,0xC7);
66 DEFINE_GUID(GUID_TFCAT_TIP_KEYBOARD
, 0x34745c63,0xb2f0,0x4784,0x8b,0x67,0x5e,0x12,0xc8,0x70,0x1a,0x31);
67 DEFINE_GUID(GUID_TFCAT_TIP_SPEECH
, 0xB5A73CD1,0x8355,0x426B,0xA1,0x61,0x25,0x98,0x08,0xF2,0x6B,0x14);
68 DEFINE_GUID(GUID_TFCAT_TIP_HANDWRITING
, 0x246ecb87,0xc2f2,0x4abe,0x90,0x5b,0xc8,0xb3,0x8a,0xdd,0x2c,0x43);
69 DEFINE_GUID (GUID_TFCAT_DISPLAYATTRIBUTEPROVIDER
, 0x046B8C80,0x1647,0x40F7,0x9B,0x21,0xB9,0x3B,0x81,0xAA,0xBC,0x1B);
70 DEFINE_GUID(GUID_NULL
,0,0,0,0,0,0,0,0,0,0,0);
71 DEFINE_GUID(CLSID_TF_ThreadMgr
, 0x529a9e6b,0x6587,0x4f23,0xab,0x9e,0x9c,0x7d,0x68,0x3e,0x3c,0x50);
72 DEFINE_GUID(CLSID_PreservedKey
, 0xA0ED8E55,0xCD3B,0x4274,0xB2,0x95,0xF6,0xC9,0xBA,0x2B,0x84,0x72);
75 static HRESULT
initialize(void)
79 hr
= CoCreateInstance (&CLSID_TF_InputProcessorProfiles
, NULL
,
80 CLSCTX_INPROC_SERVER
, &IID_ITfInputProcessorProfiles
, (void**)&g_ipp
);
82 hr
= CoCreateInstance (&CLSID_TF_CategoryMgr
, NULL
,
83 CLSCTX_INPROC_SERVER
, &IID_ITfCategoryMgr
, (void**)&g_cm
);
85 hr
= CoCreateInstance (&CLSID_TF_ThreadMgr
, NULL
,
86 CLSCTX_INPROC_SERVER
, &IID_ITfThreadMgr
, (void**)&g_tm
);
90 static void cleanup(void)
93 ITfInputProcessorProfiles_Release(g_ipp
);
95 ITfCategoryMgr_Release(g_cm
);
97 ITfThreadMgr_Release(g_tm
);
101 static void test_Register(void)
105 static const WCHAR szDesc
[] = {'F','a','k','e',' ','W','i','n','e',' ','S','e','r','v','i','c','e',0};
106 static const WCHAR szFile
[] = {'F','a','k','e',' ','W','i','n','e',' ','S','e','r','v','i','c','e',' ','F','i','l','e',0};
108 hr
= ITfInputProcessorProfiles_GetCurrentLanguage(g_ipp
,&gLangid
);
109 ok(SUCCEEDED(hr
),"Unable to get current language id\n");
110 trace("Current Language %x\n",gLangid
);
112 hr
= RegisterTextService(&CLSID_FakeService
);
113 ok(SUCCEEDED(hr
),"Unable to register COM for TextService\n");
114 hr
= ITfInputProcessorProfiles_Register(g_ipp
, &CLSID_FakeService
);
115 ok(SUCCEEDED(hr
),"Unable to register text service(%x)\n",hr
);
116 hr
= ITfInputProcessorProfiles_AddLanguageProfile(g_ipp
, &CLSID_FakeService
, gLangid
, &CLSID_FakeService
, szDesc
, sizeof(szDesc
)/sizeof(WCHAR
), szFile
, sizeof(szFile
)/sizeof(WCHAR
), 1);
117 ok(SUCCEEDED(hr
),"Unable to add Language Profile (%x)\n",hr
);
120 static void test_Unregister(void)
123 hr
= ITfInputProcessorProfiles_Unregister(g_ipp
, &CLSID_FakeService
);
124 ok(SUCCEEDED(hr
),"Unable to unregister text service(%x)\n",hr
);
125 UnregisterTextService();
128 static void test_EnumInputProcessorInfo(void)
133 if (SUCCEEDED(ITfInputProcessorProfiles_EnumInputProcessorInfo(g_ipp
, &ppEnum
)))
137 while (IEnumGUID_Next(ppEnum
, 1, &g
, &fetched
) == S_OK
)
139 if(IsEqualGUID(&g
,&CLSID_FakeService
))
143 ok(found
,"Did not find registered text service\n");
146 static void test_EnumLanguageProfiles(void)
149 IEnumTfLanguageProfiles
*ppEnum
;
150 if (SUCCEEDED(ITfInputProcessorProfiles_EnumLanguageProfiles(g_ipp
,gLangid
,&ppEnum
)))
152 TF_LANGUAGEPROFILE profile
;
153 while (IEnumTfLanguageProfiles_Next(ppEnum
,1,&profile
,NULL
)==S_OK
)
155 if (IsEqualGUID(&profile
.clsid
,&CLSID_FakeService
))
158 ok(profile
.langid
== gLangid
, "LangId Incorrect\n");
159 ok(IsEqualGUID(&profile
.catid
,&GUID_TFCAT_TIP_KEYBOARD
), "CatId Incorrect\n");
160 ok(IsEqualGUID(&profile
.guidProfile
,&CLSID_FakeService
), "guidProfile Incorrect\n");
164 ok(found
,"Registered text service not found\n");
167 static void test_RegisterCategory(void)
170 hr
= ITfCategoryMgr_RegisterCategory(g_cm
, &CLSID_FakeService
, &GUID_TFCAT_TIP_KEYBOARD
, &CLSID_FakeService
);
171 ok(SUCCEEDED(hr
),"ITfCategoryMgr_RegisterCategory failed\n");
172 hr
= ITfCategoryMgr_RegisterCategory(g_cm
, &CLSID_FakeService
, &GUID_TFCAT_DISPLAYATTRIBUTEPROVIDER
, &CLSID_FakeService
);
173 ok(SUCCEEDED(hr
),"ITfCategoryMgr_RegisterCategory failed\n");
176 static void test_UnregisterCategory(void)
179 hr
= ITfCategoryMgr_UnregisterCategory(g_cm
, &CLSID_FakeService
, &GUID_TFCAT_TIP_KEYBOARD
, &CLSID_FakeService
);
180 ok(SUCCEEDED(hr
),"ITfCategoryMgr_UnregisterCategory failed\n");
181 hr
= ITfCategoryMgr_UnregisterCategory(g_cm
, &CLSID_FakeService
, &GUID_TFCAT_DISPLAYATTRIBUTEPROVIDER
, &CLSID_FakeService
);
182 ok(SUCCEEDED(hr
),"ITfCategoryMgr_UnregisterCategory failed\n");
185 static void test_FindClosestCategory(void)
189 const GUID
*list
[3] = {&GUID_TFCAT_TIP_SPEECH
, &GUID_TFCAT_TIP_KEYBOARD
, &GUID_TFCAT_TIP_HANDWRITING
};
191 hr
= ITfCategoryMgr_FindClosestCategory(g_cm
, &CLSID_FakeService
, &output
, NULL
, 0);
192 ok(SUCCEEDED(hr
),"ITfCategoryMgr_FindClosestCategory failed (%x)\n",hr
);
193 ok(IsEqualGUID(&output
,&GUID_TFCAT_DISPLAYATTRIBUTEPROVIDER
),"Wrong GUID\n");
195 hr
= ITfCategoryMgr_FindClosestCategory(g_cm
, &CLSID_FakeService
, &output
, list
, 1);
196 ok(SUCCEEDED(hr
),"ITfCategoryMgr_FindClosestCategory failed (%x)\n",hr
);
197 ok(IsEqualGUID(&output
,&GUID_NULL
),"Wrong GUID\n");
199 hr
= ITfCategoryMgr_FindClosestCategory(g_cm
, &CLSID_FakeService
, &output
, list
, 3);
200 ok(SUCCEEDED(hr
),"ITfCategoryMgr_FindClosestCategory failed (%x)\n",hr
);
201 ok(IsEqualGUID(&output
,&GUID_TFCAT_TIP_KEYBOARD
),"Wrong GUID\n");
204 static void test_Enable(void)
207 BOOL enabled
= FALSE
;
209 hr
= ITfInputProcessorProfiles_EnableLanguageProfile(g_ipp
,&CLSID_FakeService
, gLangid
, &CLSID_FakeService
, TRUE
);
210 ok(SUCCEEDED(hr
),"Failed to enable text service\n");
211 hr
= ITfInputProcessorProfiles_IsEnabledLanguageProfile(g_ipp
,&CLSID_FakeService
, gLangid
, &CLSID_FakeService
, &enabled
);
212 ok(SUCCEEDED(hr
),"Failed to get enabled state\n");
213 ok(enabled
== TRUE
,"enabled state incorrect\n");
216 static void test_Disable(void)
220 trace("Disabling\n");
221 hr
= ITfInputProcessorProfiles_EnableLanguageProfile(g_ipp
,&CLSID_FakeService
, gLangid
, &CLSID_FakeService
, FALSE
);
222 ok(SUCCEEDED(hr
),"Failed to disable text service\n");
225 static void test_ThreadMgrAdviseSinks(void)
227 ITfSource
*source
= NULL
;
231 hr
= ITfThreadMgr_QueryInterface(g_tm
, &IID_ITfSource
, (LPVOID
*)&source
);
232 ok(SUCCEEDED(hr
),"Failed to get IID_ITfSource for ThreadMgr\n");
236 ThreadMgrEventSink_Constructor(&sink
);
240 hr
= ITfSource_AdviseSink(source
,&IID_ITfThreadMgrEventSink
, sink
, &tmSinkCookie
);
241 ok(SUCCEEDED(hr
),"Failed to Advise Sink\n");
242 ok(tmSinkCookie
!=0,"Failed to get sink cookie\n");
244 /* Advising the sink adds a ref, Relesing here lets the object be deleted
247 IUnknown_Release(sink
);
248 ITfSource_Release(source
);
251 static void test_ThreadMgrUnadviseSinks(void)
253 ITfSource
*source
= NULL
;
256 hr
= ITfThreadMgr_QueryInterface(g_tm
, &IID_ITfSource
, (LPVOID
*)&source
);
257 ok(SUCCEEDED(hr
),"Failed to get IID_ITfSource for ThreadMgr\n");
262 hr
= ITfSource_UnadviseSink(source
, tmSinkCookie
);
263 ok(SUCCEEDED(hr
),"Failed to unadvise Sink\n");
264 ITfSource_Release(source
);
267 /**********************************************************************
269 **********************************************************************/
270 typedef struct tagKeyEventSink
272 const ITfKeyEventSinkVtbl
*KeyEventSinkVtbl
;
276 static void KeyEventSink_Destructor(KeyEventSink
*This
)
278 HeapFree(GetProcessHeap(),0,This
);
281 static HRESULT WINAPI
KeyEventSink_QueryInterface(ITfKeyEventSink
*iface
, REFIID iid
, LPVOID
*ppvOut
)
283 KeyEventSink
*This
= (KeyEventSink
*)iface
;
286 if (IsEqualIID(iid
, &IID_IUnknown
) || IsEqualIID(iid
, &IID_ITfKeyEventSink
))
293 IUnknown_AddRef(iface
);
297 return E_NOINTERFACE
;
300 static ULONG WINAPI
KeyEventSink_AddRef(ITfKeyEventSink
*iface
)
302 KeyEventSink
*This
= (KeyEventSink
*)iface
;
303 return InterlockedIncrement(&This
->refCount
);
306 static ULONG WINAPI
KeyEventSink_Release(ITfKeyEventSink
*iface
)
308 KeyEventSink
*This
= (KeyEventSink
*)iface
;
311 ret
= InterlockedDecrement(&This
->refCount
);
313 KeyEventSink_Destructor(This
);
317 static HRESULT WINAPI
KeyEventSink_OnSetFocus(ITfKeyEventSink
*iface
,
320 ok(test_KEV_OnSetFocus
== SINK_EXPECTED
,"Unexpected KeyEventSink_OnSetFocus\n");
321 test_KEV_OnSetFocus
= SINK_FIRED
;
325 static HRESULT WINAPI
KeyEventSink_OnTestKeyDown(ITfKeyEventSink
*iface
,
326 ITfContext
*pic
, WPARAM wParam
, LPARAM lParam
, BOOL
*pfEaten
)
332 static HRESULT WINAPI
KeyEventSink_OnTestKeyUp(ITfKeyEventSink
*iface
,
333 ITfContext
*pic
, WPARAM wParam
, LPARAM lParam
, BOOL
*pfEaten
)
339 static HRESULT WINAPI
KeyEventSink_OnKeyDown(ITfKeyEventSink
*iface
,
340 ITfContext
*pic
, WPARAM wParam
, LPARAM lParam
, BOOL
*pfEaten
)
346 static HRESULT WINAPI
KeyEventSink_OnKeyUp(ITfKeyEventSink
*iface
,
347 ITfContext
*pic
, WPARAM wParam
, LPARAM lParam
, BOOL
*pfEaten
)
353 static HRESULT WINAPI
KeyEventSink_OnPreservedKey(ITfKeyEventSink
*iface
,
354 ITfContext
*pic
, REFGUID rguid
, BOOL
*pfEaten
)
360 static const ITfKeyEventSinkVtbl KeyEventSink_KeyEventSinkVtbl
=
362 KeyEventSink_QueryInterface
,
364 KeyEventSink_Release
,
366 KeyEventSink_OnSetFocus
,
367 KeyEventSink_OnTestKeyDown
,
368 KeyEventSink_OnTestKeyUp
,
369 KeyEventSink_OnKeyDown
,
370 KeyEventSink_OnKeyUp
,
371 KeyEventSink_OnPreservedKey
374 HRESULT
KeyEventSink_Constructor(ITfKeyEventSink
**ppOut
)
378 This
= HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY
,sizeof(KeyEventSink
));
380 return E_OUTOFMEMORY
;
382 This
->KeyEventSinkVtbl
= &KeyEventSink_KeyEventSinkVtbl
;
385 *ppOut
= (ITfKeyEventSink
*)This
;
390 static void test_KeystrokeMgr(void)
392 ITfKeystrokeMgr
*keymgr
= NULL
;
394 TF_PRESERVEDKEY tfpk
;
396 ITfKeyEventSink
*sink
;
398 KeyEventSink_Constructor(&sink
);
400 hr
= ITfThreadMgr_QueryInterface(g_tm
, &IID_ITfKeystrokeMgr
, (LPVOID
*)&keymgr
);
401 ok(SUCCEEDED(hr
),"Failed to get IID_ITfKeystrokeMgr for ThreadMgr\n");
404 tfpk
.uModifiers
= TF_MOD_SHIFT
;
406 test_KEV_OnSetFocus
= SINK_EXPECTED
;
407 hr
= ITfKeystrokeMgr_AdviseKeyEventSink(keymgr
,tid
,sink
,TRUE
);
408 todo_wine
ok(SUCCEEDED(hr
),"ITfKeystrokeMgr_AdviseKeyEventSink failed\n");
409 todo_wine
ok(test_KEV_OnSetFocus
== SINK_FIRED
, "KeyEventSink_OnSetFocus not fired as expected\n");
411 hr
=ITfKeystrokeMgr_PreserveKey(keymgr
, 0, &CLSID_PreservedKey
, &tfpk
, NULL
, 0);
412 todo_wine
ok(hr
==E_INVALIDARG
,"ITfKeystrokeMgr_PreserveKey inproperly succeeded\n");
414 hr
=ITfKeystrokeMgr_PreserveKey(keymgr
, tid
, &CLSID_PreservedKey
, &tfpk
, NULL
, 0);
415 todo_wine
ok(SUCCEEDED(hr
),"ITfKeystrokeMgr_PreserveKey failed\n");
417 hr
=ITfKeystrokeMgr_PreserveKey(keymgr
, tid
, &CLSID_PreservedKey
, &tfpk
, NULL
, 0);
418 todo_wine
ok(hr
== TF_E_ALREADY_EXISTS
,"ITfKeystrokeMgr_PreserveKey inproperly succeeded\n");
421 hr
= ITfKeystrokeMgr_IsPreservedKey(keymgr
, &CLSID_PreservedKey
, &tfpk
, &preserved
);
422 todo_wine
ok(hr
== S_OK
, "ITfKeystrokeMgr_IsPreservedKey failed\n");
423 if (hr
== S_OK
) todo_wine
ok(preserved
== TRUE
,"misreporting preserved key\n");
425 hr
= ITfKeystrokeMgr_UnpreserveKey(keymgr
, &CLSID_PreservedKey
,&tfpk
);
426 todo_wine
ok(SUCCEEDED(hr
),"ITfKeystrokeMgr_UnpreserveKey failed\n");
428 hr
= ITfKeystrokeMgr_IsPreservedKey(keymgr
, &CLSID_PreservedKey
, &tfpk
, &preserved
);
429 todo_wine
ok(hr
== S_FALSE
, "ITfKeystrokeMgr_IsPreservedKey failed\n");
430 if (hr
== S_FALSE
) todo_wine
ok(preserved
== FALSE
,"misreporting preserved key\n");
432 hr
= ITfKeystrokeMgr_UnpreserveKey(keymgr
, &CLSID_PreservedKey
,&tfpk
);
433 todo_wine
ok(hr
==CONNECT_E_NOCONNECTION
,"ITfKeystrokeMgr_UnpreserveKey inproperly succeeded\n");
435 hr
= ITfKeystrokeMgr_UnadviseKeyEventSink(keymgr
,tid
);
436 todo_wine
ok(SUCCEEDED(hr
),"ITfKeystrokeMgr_UnadviseKeyEventSink failed\n");
438 ITfKeystrokeMgr_Release(keymgr
);
439 ITfKeyEventSink_Release(sink
);
442 static void test_Activate(void)
446 hr
= ITfInputProcessorProfiles_ActivateLanguageProfile(g_ipp
,&CLSID_FakeService
,gLangid
,&CLSID_FakeService
);
447 todo_wine
ok(SUCCEEDED(hr
),"Failed to Activate text service\n");
450 static int inline check_context_refcount(ITfContext
*iface
)
452 IUnknown_AddRef(iface
);
453 return IUnknown_Release(iface
);
456 static void test_startSession(void)
461 ITfDocumentMgr
*dmtest
;
462 ITfContext
*cxt
,*cxt2
,*cxt3
,*cxtTest
;
465 test_ShouldActivate
= TRUE
;
466 ITfThreadMgr_Activate(g_tm
,&cid
);
467 todo_wine
ok(cid
!= tid
,"TextService id mistakenly matches Client id\n");
469 hr
= ITfThreadMgr_CreateDocumentMgr(g_tm
,&g_dm
);
470 ok(SUCCEEDED(hr
),"CreateDocumentMgr failed\n");
472 hr
= ITfThreadMgr_GetFocus(g_tm
,&dmtest
);
473 ok(SUCCEEDED(hr
),"GetFocus Failed\n");
474 ok(dmtest
== NULL
,"Initial focus not null\n");
476 test_CurrentFocus
= g_dm
;
477 test_PrevFocus
= NULL
;
478 test_OnSetFocus
= SINK_EXPECTED
;
479 hr
= ITfThreadMgr_SetFocus(g_tm
,g_dm
);
480 ok(SUCCEEDED(hr
),"SetFocus Failed\n");
481 ok(test_OnSetFocus
== SINK_FIRED
, "OnSetFocus sink not called\n");
482 test_OnSetFocus
= SINK_UNEXPECTED
;
484 hr
= ITfThreadMgr_GetFocus(g_tm
,&dmtest
);
485 ok(SUCCEEDED(hr
),"GetFocus Failed\n");
486 ok(g_dm
== dmtest
,"Expected DocumentMgr not focused\n");
488 cnt
= ITfDocumentMgr_Release(g_dm
);
489 ok(cnt
== 2,"DocumentMgr refcount not expected (2 vs %i)\n",cnt
);
491 hr
= ITfThreadMgr_GetFocus(g_tm
,&dmtest
);
492 ok(SUCCEEDED(hr
),"GetFocus Failed\n");
493 ok(g_dm
== dmtest
,"Expected DocumentMgr not focused\n");
495 TextStoreACP_Constructor((IUnknown
**)&ts
);
497 hr
= ITfDocumentMgr_CreateContext(g_dm
, cid
, 0, (IUnknown
*)ts
, &cxt
, &editCookie
);
498 ok(SUCCEEDED(hr
),"CreateContext Failed\n");
500 hr
= ITfDocumentMgr_CreateContext(g_dm
, cid
, 0, NULL
, &cxt2
, &editCookie
);
501 ok(SUCCEEDED(hr
),"CreateContext Failed\n");
503 hr
= ITfDocumentMgr_CreateContext(g_dm
, cid
, 0, NULL
, &cxt3
, &editCookie
);
504 ok(SUCCEEDED(hr
),"CreateContext Failed\n");
506 cnt
= check_context_refcount(cxt
);
507 test_OnPushContext
= SINK_EXPECTED
;
508 test_OnInitDocumentMgr
= SINK_EXPECTED
;
509 hr
= ITfDocumentMgr_Push(g_dm
, cxt
);
510 ok(SUCCEEDED(hr
),"Push Failed\n");
511 ok(check_context_refcount(cxt
) > cnt
, "Ref count did not increase\n");
512 ok(test_OnPushContext
== SINK_FIRED
, "OnPushContext sink not fired\n");
513 ok(test_OnInitDocumentMgr
== SINK_FIRED
, "OnInitDocumentMgr sink not fired\n");
515 hr
= ITfDocumentMgr_GetTop(g_dm
, &cxtTest
);
516 ok(SUCCEEDED(hr
),"GetTop Failed\n");
517 ok(cxtTest
== cxt
, "Wrong context on top\n");
518 ok(check_context_refcount(cxt
) > cnt
, "Ref count did not increase\n");
519 cnt
= ITfContext_Release(cxtTest
);
521 hr
= ITfDocumentMgr_GetBase(g_dm
, &cxtTest
);
522 ok(SUCCEEDED(hr
),"GetBase Failed\n");
523 ok(cxtTest
== cxt
, "Wrong context on Base\n");
524 ok(check_context_refcount(cxt
) > cnt
, "Ref count did not increase\n");
525 ITfContext_Release(cxtTest
);
527 check_context_refcount(cxt2
);
528 test_OnPushContext
= SINK_EXPECTED
;
529 hr
= ITfDocumentMgr_Push(g_dm
, cxt2
);
530 ok(SUCCEEDED(hr
),"Push Failed\n");
531 ok(test_OnPushContext
== SINK_FIRED
, "OnPushContext sink not fired\n");
533 cnt
= check_context_refcount(cxt2
);
534 hr
= ITfDocumentMgr_GetTop(g_dm
, &cxtTest
);
535 ok(SUCCEEDED(hr
),"GetTop Failed\n");
536 ok(cxtTest
== cxt2
, "Wrong context on top\n");
537 ok(check_context_refcount(cxt2
) > cnt
, "Ref count did not increase\n");
538 ITfContext_Release(cxtTest
);
540 cnt
= check_context_refcount(cxt
);
541 hr
= ITfDocumentMgr_GetBase(g_dm
, &cxtTest
);
542 ok(SUCCEEDED(hr
),"GetBase Failed\n");
543 ok(cxtTest
== cxt
, "Wrong context on Base\n");
544 ok(check_context_refcount(cxt
) > cnt
, "Ref count did not increase\n");
545 ITfContext_Release(cxtTest
);
547 cnt
= check_context_refcount(cxt3
);
548 hr
= ITfDocumentMgr_Push(g_dm
, cxt3
);
549 ok(!SUCCEEDED(hr
),"Push Succeeded\n");
550 ok(check_context_refcount(cxt3
) == cnt
, "Ref changed\n");
552 cnt
= check_context_refcount(cxt2
);
553 hr
= ITfDocumentMgr_GetTop(g_dm
, &cxtTest
);
554 ok(SUCCEEDED(hr
),"GetTop Failed\n");
555 ok(cxtTest
== cxt2
, "Wrong context on top\n");
556 ok(check_context_refcount(cxt2
) > cnt
, "Ref count did not increase\n");
557 ITfContext_Release(cxtTest
);
559 cnt
= check_context_refcount(cxt
);
560 hr
= ITfDocumentMgr_GetBase(g_dm
, &cxtTest
);
561 ok(SUCCEEDED(hr
),"GetBase Failed\n");
562 ok(cxtTest
== cxt
, "Wrong context on Base\n");
563 ok(check_context_refcount(cxt
) > cnt
, "Ref count did not increase\n");
564 ITfContext_Release(cxtTest
);
566 cnt
= check_context_refcount(cxt2
);
567 test_OnPopContext
= SINK_EXPECTED
;
568 hr
= ITfDocumentMgr_Pop(g_dm
, 0);
569 ok(SUCCEEDED(hr
),"Pop Failed\n");
570 ok(check_context_refcount(cxt2
) < cnt
, "Ref count did not decrease\n");
571 ok(test_OnPopContext
== SINK_FIRED
, "OnPopContext sink not fired\n");
573 hr
= ITfDocumentMgr_GetTop(g_dm
, &cxtTest
);
574 ok(SUCCEEDED(hr
),"GetTop Failed\n");
575 ok(cxtTest
== cxt
, "Wrong context on top\n");
576 ITfContext_Release(cxtTest
);
578 hr
= ITfDocumentMgr_GetBase(g_dm
, &cxtTest
);
579 ok(SUCCEEDED(hr
),"GetBase Failed\n");
580 ok(cxtTest
== cxt
, "Wrong context on base\n");
581 ITfContext_Release(cxtTest
);
583 hr
= ITfDocumentMgr_Pop(g_dm
, 0);
584 ok(!SUCCEEDED(hr
),"Pop Succeeded\n");
586 hr
= ITfDocumentMgr_GetTop(g_dm
, &cxtTest
);
587 ok(SUCCEEDED(hr
),"GetTop Failed\n");
588 ok(cxtTest
== cxt
, "Wrong context on top\n");
589 ITfContext_Release(cxtTest
);
591 hr
= ITfDocumentMgr_GetBase(g_dm
, &cxtTest
);
592 ok(SUCCEEDED(hr
),"GetBase Failed\n");
593 ok(cxtTest
== cxt
, "Wrong context on base\n");
594 ITfContext_Release(cxtTest
);
596 ITfContext_Release(cxt
);
597 ITfContext_Release(cxt2
);
598 ITfContext_Release(cxt3
);
601 static void test_endSession(void)
603 test_ShouldDeactivate
= TRUE
;
604 test_CurrentFocus
= NULL
;
605 test_PrevFocus
= g_dm
;
606 test_OnSetFocus
= SINK_EXPECTED
;
607 ITfThreadMgr_Deactivate(g_tm
);
608 ok(test_OnSetFocus
== SINK_FIRED
, "OnSetFocus sink not called\n");
609 test_OnSetFocus
= SINK_UNEXPECTED
;
612 START_TEST(inputprocessor
)
614 if (SUCCEEDED(initialize()))
617 test_RegisterCategory();
618 test_EnumInputProcessorInfo();
620 test_ThreadMgrAdviseSinks();
625 test_EnumLanguageProfiles();
626 test_FindClosestCategory();
628 test_ThreadMgrUnadviseSinks();
629 test_UnregisterCategory();
633 skip("Unable to create InputProcessor\n");
637 /**********************************************************************
639 **********************************************************************/
640 typedef struct tagTextStoreACP
642 const ITextStoreACPVtbl
*TextStoreACPVtbl
;
646 static void TextStoreACP_Destructor(TextStoreACP
*This
)
648 HeapFree(GetProcessHeap(),0,This
);
651 static HRESULT WINAPI
TextStoreACP_QueryInterface(ITextStoreACP
*iface
, REFIID iid
, LPVOID
*ppvOut
)
653 TextStoreACP
*This
= (TextStoreACP
*)iface
;
656 if (IsEqualIID(iid
, &IID_IUnknown
) || IsEqualIID(iid
, &IID_ITextStoreACP
))
663 IUnknown_AddRef(iface
);
667 return E_NOINTERFACE
;
670 static ULONG WINAPI
TextStoreACP_AddRef(ITextStoreACP
*iface
)
672 TextStoreACP
*This
= (TextStoreACP
*)iface
;
673 return InterlockedIncrement(&This
->refCount
);
676 static ULONG WINAPI
TextStoreACP_Release(ITextStoreACP
*iface
)
678 TextStoreACP
*This
= (TextStoreACP
*)iface
;
681 ret
= InterlockedDecrement(&This
->refCount
);
683 TextStoreACP_Destructor(This
);
687 static HRESULT WINAPI
TextStoreACP_AdviseSink(ITextStoreACP
*iface
,
688 REFIID riid
, IUnknown
*punk
, DWORD dwMask
)
694 static HRESULT WINAPI
TextStoreACP_UnadviseSink(ITextStoreACP
*iface
,
700 static HRESULT WINAPI
TextStoreACP_RequestLock(ITextStoreACP
*iface
,
701 DWORD dwLockFlags
, HRESULT
*phrSession
)
706 static HRESULT WINAPI
TextStoreACP_GetStatus(ITextStoreACP
*iface
,
712 static HRESULT WINAPI
TextStoreACP_QueryInsert(ITextStoreACP
*iface
,
713 LONG acpTestStart
, LONG acpTestEnd
, ULONG cch
, LONG
*pacpResultStart
,
719 static HRESULT WINAPI
TextStoreACP_GetSelection(ITextStoreACP
*iface
,
720 ULONG ulIndex
, ULONG ulCount
, TS_SELECTION_ACP
*pSelection
, ULONG
*pcFetched
)
725 static HRESULT WINAPI
TextStoreACP_SetSelection(ITextStoreACP
*iface
,
726 ULONG ulCount
, const TS_SELECTION_ACP
*pSelection
)
731 static HRESULT WINAPI
TextStoreACP_GetText(ITextStoreACP
*iface
,
732 LONG acpStart
, LONG acpEnd
, WCHAR
*pchPlain
, ULONG cchPlainReq
,
733 ULONG
*pcchPlainRet
, TS_RUNINFO
*prgRunInfo
, ULONG cRunInfoReq
,
734 ULONG
*pcRunInfoRet
, LONG
*pacpNext
)
739 static HRESULT WINAPI
TextStoreACP_SetText(ITextStoreACP
*iface
,
740 DWORD dwFlags
, LONG acpStart
, LONG acpEnd
, const WCHAR
*pchText
,
741 ULONG cch
, TS_TEXTCHANGE
*pChange
)
746 static HRESULT WINAPI
TextStoreACP_GetFormattedText(ITextStoreACP
*iface
,
747 LONG acpStart
, LONG acpEnd
, IDataObject
**ppDataObject
)
752 static HRESULT WINAPI
TextStoreACP_GetEmbedded(ITextStoreACP
*iface
,
753 LONG acpPos
, REFGUID rguidService
, REFIID riid
, IUnknown
**ppunk
)
758 static HRESULT WINAPI
TextStoreACP_QueryInsertEmbedded(ITextStoreACP
*iface
,
759 const GUID
*pguidService
, const FORMATETC
*pFormatEtc
, BOOL
*pfInsertable
)
764 static HRESULT WINAPI
TextStoreACP_InsertEmbedded(ITextStoreACP
*iface
,
765 DWORD dwFlags
, LONG acpStart
, LONG acpEnd
, IDataObject
*pDataObject
,
766 TS_TEXTCHANGE
*pChange
)
771 static HRESULT WINAPI
TextStoreACP_InsertTextAtSelection(ITextStoreACP
*iface
,
772 DWORD dwFlags
, const WCHAR
*pchText
, ULONG cch
, LONG
*pacpStart
,
773 LONG
*pacpEnd
, TS_TEXTCHANGE
*pChange
)
778 static HRESULT WINAPI
TextStoreACP_InsertEmbeddedAtSelection(ITextStoreACP
*iface
,
779 DWORD dwFlags
, IDataObject
*pDataObject
, LONG
*pacpStart
, LONG
*pacpEnd
,
780 TS_TEXTCHANGE
*pChange
)
785 static HRESULT WINAPI
TextStoreACP_RequestSupportedAttrs(ITextStoreACP
*iface
,
786 DWORD dwFlags
, ULONG cFilterAttrs
, const TS_ATTRID
*paFilterAttrs
)
791 static HRESULT WINAPI
TextStoreACP_RequestAttrsAtPosition(ITextStoreACP
*iface
,
792 LONG acpPos
, ULONG cFilterAttrs
, const TS_ATTRID
*paFilterAttrs
,
798 static HRESULT WINAPI
TextStoreACP_RequestAttrsTransitioningAtPosition(ITextStoreACP
*iface
,
799 LONG acpPos
, ULONG cFilterAttrs
, const TS_ATTRID
*paFilterAttrs
,
805 static HRESULT WINAPI
TextStoreACP_FindNextAttrTransition(ITextStoreACP
*iface
,
806 LONG acpStart
, LONG acpHalt
, ULONG cFilterAttrs
, const TS_ATTRID
*paFilterAttrs
,
807 DWORD dwFlags
, LONG
*pacpNext
, BOOL
*pfFound
, LONG
*plFoundOffset
)
812 static HRESULT WINAPI
TextStoreACP_RetrieveRequestedAttrs(ITextStoreACP
*iface
,
813 ULONG ulCount
, TS_ATTRVAL
*paAttrVals
, ULONG
*pcFetched
)
818 static HRESULT WINAPI
TextStoreACP_GetEndACP(ITextStoreACP
*iface
,
824 static HRESULT WINAPI
TextStoreACP_GetActiveView(ITextStoreACP
*iface
,
825 TsViewCookie
*pvcView
)
830 static HRESULT WINAPI
TextStoreACP_GetACPFromPoint(ITextStoreACP
*iface
,
831 TsViewCookie vcView
, const POINT
*ptScreen
, DWORD dwFlags
,
837 static HRESULT WINAPI
TextStoreACP_GetTextExt(ITextStoreACP
*iface
,
838 TsViewCookie vcView
, LONG acpStart
, LONG acpEnd
, RECT
*prc
,
844 static HRESULT WINAPI
TextStoreACP_GetScreenExt(ITextStoreACP
*iface
,
845 TsViewCookie vcView
, RECT
*prc
)
850 static HRESULT WINAPI
TextStoreACP_GetWnd(ITextStoreACP
*iface
,
851 TsViewCookie vcView
, HWND
*phwnd
)
857 static const ITextStoreACPVtbl TextStoreACP_TextStoreACPVtbl
=
859 TextStoreACP_QueryInterface
,
861 TextStoreACP_Release
,
863 TextStoreACP_AdviseSink
,
864 TextStoreACP_UnadviseSink
,
865 TextStoreACP_RequestLock
,
866 TextStoreACP_GetStatus
,
867 TextStoreACP_QueryInsert
,
868 TextStoreACP_GetSelection
,
869 TextStoreACP_SetSelection
,
870 TextStoreACP_GetText
,
871 TextStoreACP_SetText
,
872 TextStoreACP_GetFormattedText
,
873 TextStoreACP_GetEmbedded
,
874 TextStoreACP_QueryInsertEmbedded
,
875 TextStoreACP_InsertEmbedded
,
876 TextStoreACP_InsertTextAtSelection
,
877 TextStoreACP_InsertEmbeddedAtSelection
,
878 TextStoreACP_RequestSupportedAttrs
,
879 TextStoreACP_RequestAttrsAtPosition
,
880 TextStoreACP_RequestAttrsTransitioningAtPosition
,
881 TextStoreACP_FindNextAttrTransition
,
882 TextStoreACP_RetrieveRequestedAttrs
,
883 TextStoreACP_GetEndACP
,
884 TextStoreACP_GetActiveView
,
885 TextStoreACP_GetACPFromPoint
,
886 TextStoreACP_GetTextExt
,
887 TextStoreACP_GetScreenExt
,
891 HRESULT
TextStoreACP_Constructor(IUnknown
**ppOut
)
895 This
= HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY
,sizeof(TextStoreACP
));
897 return E_OUTOFMEMORY
;
899 This
->TextStoreACPVtbl
= &TextStoreACP_TextStoreACPVtbl
;
902 *ppOut
= (IUnknown
*)This
;
906 /**********************************************************************
907 * ITfThreadMgrEventSink
908 **********************************************************************/
909 typedef struct tagThreadMgrEventSink
911 const ITfThreadMgrEventSinkVtbl
*ThreadMgrEventSinkVtbl
;
913 } ThreadMgrEventSink
;
915 static void ThreadMgrEventSink_Destructor(ThreadMgrEventSink
*This
)
917 HeapFree(GetProcessHeap(),0,This
);
920 static HRESULT WINAPI
ThreadMgrEventSink_QueryInterface(ITfThreadMgrEventSink
*iface
, REFIID iid
, LPVOID
*ppvOut
)
922 ThreadMgrEventSink
*This
= (ThreadMgrEventSink
*)iface
;
925 if (IsEqualIID(iid
, &IID_IUnknown
) || IsEqualIID(iid
, &IID_ITfThreadMgrEventSink
))
932 IUnknown_AddRef(iface
);
936 return E_NOINTERFACE
;
939 static ULONG WINAPI
ThreadMgrEventSink_AddRef(ITfThreadMgrEventSink
*iface
)
941 ThreadMgrEventSink
*This
= (ThreadMgrEventSink
*)iface
;
942 ok (tmSinkRefCount
== This
->refCount
,"ThreadMgrEventSink refcount off %i vs %i\n",This
->refCount
,tmSinkRefCount
);
943 return InterlockedIncrement(&This
->refCount
);
946 static ULONG WINAPI
ThreadMgrEventSink_Release(ITfThreadMgrEventSink
*iface
)
948 ThreadMgrEventSink
*This
= (ThreadMgrEventSink
*)iface
;
951 ok (tmSinkRefCount
== This
->refCount
,"ThreadMgrEventSink refcount off %i vs %i\n",This
->refCount
,tmSinkRefCount
);
952 ret
= InterlockedDecrement(&This
->refCount
);
954 ThreadMgrEventSink_Destructor(This
);
958 static HRESULT WINAPI
ThreadMgrEventSink_OnInitDocumentMgr(ITfThreadMgrEventSink
*iface
,
959 ITfDocumentMgr
*pdim
)
961 ok(test_OnInitDocumentMgr
== SINK_EXPECTED
, "Unexpected OnInitDocumentMgr sink\n");
962 test_OnInitDocumentMgr
= SINK_FIRED
;
966 static HRESULT WINAPI
ThreadMgrEventSink_OnUninitDocumentMgr(ITfThreadMgrEventSink
*iface
,
967 ITfDocumentMgr
*pdim
)
973 static HRESULT WINAPI
ThreadMgrEventSink_OnSetFocus(ITfThreadMgrEventSink
*iface
,
974 ITfDocumentMgr
*pdimFocus
, ITfDocumentMgr
*pdimPrevFocus
)
976 ok(test_OnSetFocus
== SINK_EXPECTED
, "Unexpected OnSetFocus sink\n");
977 ok(pdimFocus
== test_CurrentFocus
,"Sink reports wrong focus\n");
978 ok(pdimPrevFocus
== test_PrevFocus
,"Sink reports wrong previous focus\n");
979 test_OnSetFocus
= SINK_FIRED
;
983 static HRESULT WINAPI
ThreadMgrEventSink_OnPushContext(ITfThreadMgrEventSink
*iface
,
986 ok(test_OnPushContext
== SINK_EXPECTED
, "Unexpected OnPushContext sink\n");
987 test_OnPushContext
= SINK_FIRED
;
991 static HRESULT WINAPI
ThreadMgrEventSink_OnPopContext(ITfThreadMgrEventSink
*iface
,
994 ok(test_OnPopContext
== SINK_EXPECTED
, "Unexpected OnPopContext sink\n");
995 test_OnPopContext
= SINK_FIRED
;
999 static const ITfThreadMgrEventSinkVtbl ThreadMgrEventSink_ThreadMgrEventSinkVtbl
=
1001 ThreadMgrEventSink_QueryInterface
,
1002 ThreadMgrEventSink_AddRef
,
1003 ThreadMgrEventSink_Release
,
1005 ThreadMgrEventSink_OnInitDocumentMgr
,
1006 ThreadMgrEventSink_OnUninitDocumentMgr
,
1007 ThreadMgrEventSink_OnSetFocus
,
1008 ThreadMgrEventSink_OnPushContext
,
1009 ThreadMgrEventSink_OnPopContext
1012 HRESULT
ThreadMgrEventSink_Constructor(IUnknown
**ppOut
)
1014 ThreadMgrEventSink
*This
;
1016 This
= HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY
,sizeof(ThreadMgrEventSink
));
1018 return E_OUTOFMEMORY
;
1020 This
->ThreadMgrEventSinkVtbl
= &ThreadMgrEventSink_ThreadMgrEventSinkVtbl
;
1023 *ppOut
= (IUnknown
*)This
;
1028 /********************************************************************************************
1029 * Stub text service for testing
1030 ********************************************************************************************/
1032 static LONG TS_refCount
;
1033 static IClassFactory
*cf
;
1036 typedef HRESULT (*LPFNCONSTRUCTOR
)(IUnknown
*pUnkOuter
, IUnknown
**ppvOut
);
1038 typedef struct tagClassFactory
1040 const IClassFactoryVtbl
*vtbl
;
1042 LPFNCONSTRUCTOR ctor
;
1045 typedef struct tagTextService
1047 const ITfTextInputProcessorVtbl
*TextInputProcessorVtbl
;
1051 static void ClassFactory_Destructor(ClassFactory
*This
)
1053 HeapFree(GetProcessHeap(),0,This
);
1057 static HRESULT WINAPI
ClassFactory_QueryInterface(IClassFactory
*iface
, REFIID riid
, LPVOID
*ppvOut
)
1060 if (IsEqualIID(riid
, &IID_IClassFactory
) || IsEqualIID(riid
, &IID_IUnknown
))
1062 IClassFactory_AddRef(iface
);
1067 return E_NOINTERFACE
;
1070 static ULONG WINAPI
ClassFactory_AddRef(IClassFactory
*iface
)
1072 ClassFactory
*This
= (ClassFactory
*)iface
;
1073 return InterlockedIncrement(&This
->ref
);
1076 static ULONG WINAPI
ClassFactory_Release(IClassFactory
*iface
)
1078 ClassFactory
*This
= (ClassFactory
*)iface
;
1079 ULONG ret
= InterlockedDecrement(&This
->ref
);
1082 ClassFactory_Destructor(This
);
1086 static HRESULT WINAPI
ClassFactory_CreateInstance(IClassFactory
*iface
, IUnknown
*punkOuter
, REFIID iid
, LPVOID
*ppvOut
)
1088 ClassFactory
*This
= (ClassFactory
*)iface
;
1092 ret
= This
->ctor(punkOuter
, &obj
);
1095 ret
= IUnknown_QueryInterface(obj
, iid
, ppvOut
);
1096 IUnknown_Release(obj
);
1100 static HRESULT WINAPI
ClassFactory_LockServer(IClassFactory
*iface
, BOOL fLock
)
1103 InterlockedIncrement(&TS_refCount
);
1105 InterlockedDecrement(&TS_refCount
);
1110 static const IClassFactoryVtbl ClassFactoryVtbl
= {
1112 ClassFactory_QueryInterface
,
1113 ClassFactory_AddRef
,
1114 ClassFactory_Release
,
1117 ClassFactory_CreateInstance
,
1118 ClassFactory_LockServer
1121 static HRESULT
ClassFactory_Constructor(LPFNCONSTRUCTOR ctor
, LPVOID
*ppvOut
)
1123 ClassFactory
*This
= HeapAlloc(GetProcessHeap(),0,sizeof(ClassFactory
));
1124 This
->vtbl
= &ClassFactoryVtbl
;
1127 *ppvOut
= (LPVOID
)This
;
1132 static void TextService_Destructor(TextService
*This
)
1134 HeapFree(GetProcessHeap(),0,This
);
1137 static HRESULT WINAPI
TextService_QueryInterface(ITfTextInputProcessor
*iface
, REFIID iid
, LPVOID
*ppvOut
)
1139 TextService
*This
= (TextService
*)iface
;
1142 if (IsEqualIID(iid
, &IID_IUnknown
) || IsEqualIID(iid
, &IID_ITfTextInputProcessor
))
1149 IUnknown_AddRef(iface
);
1153 return E_NOINTERFACE
;
1156 static ULONG WINAPI
TextService_AddRef(ITfTextInputProcessor
*iface
)
1158 TextService
*This
= (TextService
*)iface
;
1159 return InterlockedIncrement(&This
->refCount
);
1162 static ULONG WINAPI
TextService_Release(ITfTextInputProcessor
*iface
)
1164 TextService
*This
= (TextService
*)iface
;
1167 ret
= InterlockedDecrement(&This
->refCount
);
1169 TextService_Destructor(This
);
1173 static HRESULT WINAPI
TextService_Activate(ITfTextInputProcessor
*iface
,
1174 ITfThreadMgr
*ptim
, TfClientId id
)
1176 trace("TextService_Activate\n");
1177 ok(test_ShouldActivate
,"Activation came unexpectedly\n");
1182 static HRESULT WINAPI
TextService_Deactivate(ITfTextInputProcessor
*iface
)
1184 trace("TextService_Deactivate\n");
1185 ok(test_ShouldDeactivate
,"Deactivation came unexpectedly\n");
1189 static const ITfTextInputProcessorVtbl TextService_TextInputProcessorVtbl
=
1191 TextService_QueryInterface
,
1193 TextService_Release
,
1195 TextService_Activate
,
1196 TextService_Deactivate
1199 HRESULT
TextService_Constructor(IUnknown
*pUnkOuter
, IUnknown
**ppOut
)
1203 return CLASS_E_NOAGGREGATION
;
1205 This
= HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY
,sizeof(TextService
));
1207 return E_OUTOFMEMORY
;
1209 This
->TextInputProcessorVtbl
= &TextService_TextInputProcessorVtbl
;
1212 *ppOut
= (IUnknown
*)This
;
1216 HRESULT
RegisterTextService(REFCLSID rclsid
)
1218 ClassFactory_Constructor( TextService_Constructor
,(LPVOID
*)&cf
);
1219 return CoRegisterClassObject(rclsid
, (IUnknown
*) cf
, CLSCTX_INPROC_SERVER
, REGCLS_MULTIPLEUSE
, ®id
);
1222 HRESULT
UnregisterTextService()
1224 return CoRevokeClassObject(regid
);