32#define ok_ole_success(hr, func) ok(hr == S_OK, func " failed with error %#08lx\n", hr)
36 HKEY hkey = 0, hkey2 = 0;
42 "Implemented Categories\\{deadcafe-0000-0000-0000-000000000000}",
52 "CLSID\\{deadcafe-beed-bead-dead-cafebeaddead}\\Implemented Categories\\{deadcafe-0000-0000-0000-000000000000}");
54 "CLSID\\{deadcafe-beed-bead-dead-cafebeaddead}\\Implemented Categories");
56 "CLSID\\{deadcafe-beed-bead-dead-cafebeaddead}");
62 REFCLSID rclsid = &CLSID_StdComponentCategoriesMgr;
77 &IID_ICatInformation, (
void **)&pICat);
80 hr = ICatInformation_EnumClassesOfCategories(pICat, -1,
NULL, -1,
NULL,
84 IEnumGUID_Release(pIEnum);
86 hr = ICatInformation_EnumClassesOfCategories(pICat, 1, the_cat, -1,
NULL,
90 hr = IEnumGUID_Next(pIEnum,1,the_guid, &fetched);
92 ok (fetched == 0,
"Fetched wrong number of guids %lu\n",fetched);
93 IEnumGUID_Release(pIEnum);
97 hr = ICatInformation_EnumClassesOfCategories(pICat, 1, the_cat, -1,
NULL, &pIEnum);
100 hr = IEnumGUID_Next(pIEnum,1,the_guid, &fetched);
101 ok (
hr ==
S_OK,
"Expected S_OK, got 0x%08lx\n",
hr);
102 ok (fetched == 1,
"Fetched wrong number of guids %lu\n",fetched);
103 ok (
IsEqualGUID(the_guid,&wanted_guid),
"Guids do not match\n");
105 IEnumGUID_Release(pIEnum);
108 else skip(
"Could not register the test category\n" );
110 ICatInformation_Release(pICat);
#define RegCloseKey(hKey)
LONG WINAPI RegCreateKeyA(HKEY hKey, LPCSTR lpSubKey, PHKEY phkResult)
LONG WINAPI RegSetValueA(HKEY hKeyOriginal, LPCSTR lpSubKey, DWORD dwType, LPCSTR lpData, DWORD cbData)
LONG WINAPI RegDeleteKeyA(_In_ HKEY hKey, _In_ LPCSTR lpSubKey)
HRESULT WINAPI CLSIDFromString(LPCOLESTR str, LPCLSID clsid)
HRESULT WINAPI DECLSPEC_HOTPATCH CoCreateInstance(REFCLSID rclsid, IUnknown *outer, DWORD cls_context, REFIID riid, void **obj)
HRESULT WINAPI DECLSPEC_HOTPATCH OleInitialize(LPVOID reserved)
void WINAPI DECLSPEC_HOTPATCH OleUninitialize(void)
#define ok_ole_success(hr, func)
static void unregister_testentry(void)
static void do_enum(void)
static BOOL register_testentry(void)
#define IsEqualGUID(rguid1, rguid2)
#define HKEY_CLASSES_ROOT