void likwid_markerNextGroup(void)
{
int i;
int next_group;
if (!likwid_init)
{
return;
}
next_group = (groupSet->activeGroup + 1) % numberOfGroups;
if (next_group != groupSet->activeGroup)
{
i = perfmon_switchActiveGroup(next_group);
}
return;
}
void
likwid_markerNextGroup(void)
{
int i;
int next_group;
if (!likwid_init)
{
return;
}
next_group = (groupSet->activeGroup + 1) % numberOfGroups;
if (next_group != groupSet->activeGroup)
{
DEBUG_PRINT(DEBUGLEV_DEVELOP, Switch from group %d to group %d, groupSet->activeGroup, next_group);
i = perfmon_switchActiveGroup(next_group);
}
return;
}
static int lua_likwid_switchGroup(lua_State* L)
{
int ret = -1;
int newgroup = lua_tonumber(L,1)-1;
if (perfmon_isInitialized == 0)
{
return 0;
}
if (newgroup >= perfmon_getNumberOfGroups())
{
newgroup = 0;
}
if (newgroup == perfmon_getIdOfActiveGroup())
{
lua_pushinteger(L, ret);
return 1;
}
ret = perfmon_switchActiveGroup(newgroup);
lua_pushinteger(L, ret);
return 1;
}
int test_perfmonswitch()
{
CpuInfo_t cpuinfo;
int group1, group2;
int cpu = 0;
topology_init();
cpuinfo = get_cpuInfo();
if (cpuinfo->isIntel == 0)
{
topology_finalize();
return 1;
}
int ret = perfmon_init(1, &cpu);
if (ret != 0)
goto fail;
ret = perfmon_addEventSet(eventset_ok);
if (ret != 0)
goto fail;
group1 = ret;
ret = perfmon_addEventSet(eventset_option);
if (ret != 1)
goto fail;
group2 = ret;
ret = perfmon_setupCounters(group1);
if (ret != 0)
goto fail;
if (perfmon_getIdOfActiveGroup() != group1)
goto fail;
ret = perfmon_switchActiveGroup(group2);
if (perfmon_getIdOfActiveGroup() != group2)
goto fail;
perfmon_finalize();
topology_finalize();
return 1;
fail:
perfmon_finalize();
topology_finalize();
return 0;
}
