1// SPDX-License-Identifier: GPL-2.0
  2#include <string.h>
  3#include <unistd.h>
  4#include <stdio.h>
  5#include "linux/perf_event.h"
  6#include "tests.h"
  7#include "debug.h"
  8#include "pmu.h"
  9#include "pmus.h"
 10#include "header.h"
 11#include "../perf-sys.h"
 12
 13/* hw: cycles, sw: context-switch, uncore: [arch dependent] */
 14static int types[] = {0, 1, -1};
 15static unsigned long configs[] = {0, 3, 0};
 16
 17#define NR_UNCORE_PMUS 5
 18
 19/* Uncore pmus that support more than 3 counters */
 20static struct uncore_pmus {
 21	const char *name;
 22	__u64 config;
 23} uncore_pmus[NR_UNCORE_PMUS] = {
 24	{ "amd_l3", 0x0 },
 25	{ "amd_df", 0x0 },
 26	{ "uncore_imc_0", 0x1 },         /* Intel */
 27	{ "core_imc", 0x318 },           /* PowerPC: core_imc/CPM_STCX_FIN/ */
 28	{ "hv_24x7", 0x22000000003 },    /* PowerPC: hv_24x7/CPM_STCX_FIN/ */
 29};
 30
 31static int event_open(int type, unsigned long config, int group_fd)
 32{
 33	struct perf_event_attr attr;
 34
 35	memset(&attr, 0, sizeof(struct perf_event_attr));
 36	attr.type = type;
 37	attr.size = sizeof(struct perf_event_attr);
 38	attr.config = config;
 39	/*
 40	 * When creating an event group, typically the group leader is
 41	 * initialized with disabled set to 1 and any child events are
 42	 * initialized with disabled set to 0. Despite disabled being 0,
 43	 * the child events will not start until the group leader is
 44	 * enabled.
 45	 */
 46	attr.disabled = group_fd == -1 ? 1 : 0;
 47
 48	return sys_perf_event_open(&attr, -1, 0, group_fd, 0);
 49}
 50
 51static int setup_uncore_event(void)
 52{
 53	struct perf_pmu *pmu;
 54	int i, fd;
 55
 56	if (list_empty(&pmus))
 57		perf_pmu__scan(NULL);
 58
 59	perf_pmus__for_each_pmu(pmu) {
 60		for (i = 0; i < NR_UNCORE_PMUS; i++) {
 61			if (!strcmp(uncore_pmus[i].name, pmu->name)) {
 62				pr_debug("Using %s for uncore pmu event\n", pmu->name);
 63				types[2] = pmu->type;
 64				configs[2] = uncore_pmus[i].config;
 65				/*
 66				 * Check if the chosen uncore pmu event can be
 67				 * used in the test. For example, incase of accessing
 68				 * hv_24x7 pmu counters, partition should have
 69				 * additional permissions. If not, event open will
 70				 * fail. So check if the event open succeeds
 71				 * before proceeding.
 72				 */
 73				fd = event_open(types[2], configs[2], -1);
 74				if (fd < 0)
 75					return -1;
 76				close(fd);
 77				return 0;
 78			}
 79		}
 80	}
 81	return -1;
 82}
 83
 84static int run_test(int i, int j, int k)
 85{
 86	int erroneous = ((((1 << i) | (1 << j) | (1 << k)) & 5) == 5);
 87	int group_fd, sibling_fd1, sibling_fd2;
 88
 89	group_fd = event_open(types[i], configs[i], -1);
 90	if (group_fd == -1)
 91		return -1;
 92
 93	sibling_fd1 = event_open(types[j], configs[j], group_fd);
 94	if (sibling_fd1 == -1) {
 95		close(group_fd);
 96		return erroneous ? 0 : -1;
 97	}
 98
 99	sibling_fd2 = event_open(types[k], configs[k], group_fd);
100	if (sibling_fd2 == -1) {
101		close(sibling_fd1);
102		close(group_fd);
103		return erroneous ? 0 : -1;
104	}
105
106	close(sibling_fd2);
107	close(sibling_fd1);
108	close(group_fd);
109	return erroneous ? -1 : 0;
110}
111
112static int test__event_groups(struct test_suite *text __maybe_unused, int subtest __maybe_unused)
113{
114	int i, j, k;
115	int ret;
116	int r;
117
118	ret = setup_uncore_event();
119	if (ret || types[2] == -1)
120		return TEST_SKIP;
121
122	ret = TEST_OK;
123	for (i = 0; i < 3; i++) {
124		for (j = 0; j < 3; j++) {
125			for (k = 0; k < 3; k++) {
126				r = run_test(i, j, k);
127				if (r)
128					ret = TEST_FAIL;
129
130				pr_debug("0x%x 0x%lx, 0x%x 0x%lx, 0x%x 0x%lx: %s\n",
131					 types[i], configs[i], types[j], configs[j],
132					 types[k], configs[k], r ? "Fail" : "Pass");
133			}
134		}
135	}
136	return ret;
137}
138
139DEFINE_SUITE("Event groups", event_groups);