Sweden-Number/dlls/comcat/tests/comcat.c

120 lines
3.7 KiB
C
Raw Normal View History

/*
* tests for comcat functions
*
* Copyright 2006 Aric Stewart for CodeWeavers
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/
#define COBJMACROS
#include <stdio.h>
#include <initguid.h>
#include <windows.h>
#include "objbase.h"
#include "comcat.h"
#include "wine/test.h"
#define ok_ole_success(hr, func) ok(hr == S_OK, func " failed with error %#08lx\n", hr)
static BOOL register_testentry(void)
{
HKEY hkey = 0, hkey2 = 0;
DWORD ret;
ret = RegCreateKeyA(HKEY_CLASSES_ROOT,"CLSID\\{deadcafe-beed-bead-dead-cafebeaddead}", &hkey);
if (!ret) ret = RegSetValueA(hkey,NULL,REG_SZ,"ComCat Test key",16);
if (!ret) ret = RegCreateKeyA(hkey,
"Implemented Categories\\{deadcafe-0000-0000-0000-000000000000}",
&hkey2);
RegCloseKey(hkey);
RegCloseKey(hkey2);
return !ret;
}
static void unregister_testentry(void)
{
RegDeleteKeyA(HKEY_CLASSES_ROOT,
"CLSID\\{deadcafe-beed-bead-dead-cafebeaddead}\\Implemented Categories\\{deadcafe-0000-0000-0000-000000000000}");
RegDeleteKeyA(HKEY_CLASSES_ROOT,
"CLSID\\{deadcafe-beed-bead-dead-cafebeaddead}\\Implemented Categories");
RegDeleteKeyA(HKEY_CLASSES_ROOT,
"CLSID\\{deadcafe-beed-bead-dead-cafebeaddead}");
}
static void do_enum(void)
{
HRESULT hr;
REFCLSID rclsid = &CLSID_StdComponentCategoriesMgr;
ICatInformation *pICat = (ICatInformation*)0xdeadbeef;
GUID the_guid[1];
GUID the_cat[1];
GUID wanted_guid;
ULONG fetched = -1;
IEnumCLSID *pIEnum =(IEnumCLSID*)0xdeadcafe;
CLSIDFromString(L"{deadcafe-0000-0000-0000-000000000000}", the_cat);
CLSIDFromString(L"{deadcafe-beed-bead-dead-cafebeaddead}", &wanted_guid);
OleInitialize(NULL);
hr = CoCreateInstance(rclsid,NULL,CLSCTX_INPROC_SERVER,
&IID_ICatInformation, (void **)&pICat);
ok_ole_success(hr, "CoCreateInstance");
hr = ICatInformation_EnumClassesOfCategories(pICat, -1, NULL, -1, NULL,
&pIEnum);
ok_ole_success(hr,"ICatInformation_EnumClassesOfCategories");
IEnumGUID_Release(pIEnum);
hr = ICatInformation_EnumClassesOfCategories(pICat, 1, the_cat, -1, NULL,
&pIEnum);
ok_ole_success(hr,"ICatInformation_EnumClassesOfCategories");
hr = IEnumGUID_Next(pIEnum,1,the_guid, &fetched);
ok (hr == S_FALSE,"Expected S_FALSE, got 0x%08lx\n", hr);
ok (fetched == 0,"Fetched wrong number of guids %lu\n",fetched);
IEnumGUID_Release(pIEnum);
if (register_testentry())
{
hr = ICatInformation_EnumClassesOfCategories(pICat, 1, the_cat, -1, NULL, &pIEnum);
ok_ole_success(hr,"ICatInformation_EnumClassesOfCategories");
hr = IEnumGUID_Next(pIEnum,1,the_guid, &fetched);
ok (hr == S_OK,"Expected S_OK, got 0x%08lx\n", hr);
ok (fetched == 1,"Fetched wrong number of guids %lu\n",fetched);
ok (IsEqualGUID(the_guid,&wanted_guid),"Guids do not match\n");
IEnumGUID_Release(pIEnum);
unregister_testentry();
}
else skip( "Could not register the test category\n" );
ICatInformation_Release(pICat);
OleUninitialize();
}
START_TEST(comcat)
{
do_enum();
}