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] */
14 static int types[] = {0, 1, -1};
15 static unsigned long configs[] = {0, 3, 0};
16 
17 #define NR_UNCORE_PMUS 5
18 
19 /* Uncore pmus that support more than 3 counters */
20 static 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 
event_open(int type,unsigned long config,int group_fd)31 static 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 
setup_uncore_event(void)51 static int setup_uncore_event(void)
52 {
53 	struct perf_pmu *pmu = NULL;
54 	int i, fd;
55 
56 	while ((pmu = perf_pmus__scan(pmu)) != NULL) {
57 		for (i = 0; i < NR_UNCORE_PMUS; i++) {
58 			if (!strcmp(uncore_pmus[i].name, pmu->name)) {
59 				pr_debug("Using %s for uncore pmu event\n", pmu->name);
60 				types[2] = pmu->type;
61 				configs[2] = uncore_pmus[i].config;
62 				/*
63 				 * Check if the chosen uncore pmu event can be
64 				 * used in the test. For example, incase of accessing
65 				 * hv_24x7 pmu counters, partition should have
66 				 * additional permissions. If not, event open will
67 				 * fail. So check if the event open succeeds
68 				 * before proceeding.
69 				 */
70 				fd = event_open(types[2], configs[2], -1);
71 				if (fd < 0)
72 					return -1;
73 				close(fd);
74 				return 0;
75 			}
76 		}
77 	}
78 	return -1;
79 }
80 
run_test(int i,int j,int k)81 static int run_test(int i, int j, int k)
82 {
83 	int erroneous = ((((1 << i) | (1 << j) | (1 << k)) & 5) == 5);
84 	int group_fd, sibling_fd1, sibling_fd2;
85 
86 	group_fd = event_open(types[i], configs[i], -1);
87 	if (group_fd == -1)
88 		return -1;
89 
90 	sibling_fd1 = event_open(types[j], configs[j], group_fd);
91 	if (sibling_fd1 == -1) {
92 		close(group_fd);
93 		return erroneous ? 0 : -1;
94 	}
95 
96 	sibling_fd2 = event_open(types[k], configs[k], group_fd);
97 	if (sibling_fd2 == -1) {
98 		close(sibling_fd1);
99 		close(group_fd);
100 		return erroneous ? 0 : -1;
101 	}
102 
103 	close(sibling_fd2);
104 	close(sibling_fd1);
105 	close(group_fd);
106 	return erroneous ? -1 : 0;
107 }
108 
test__event_groups(struct test_suite * text __maybe_unused,int subtest __maybe_unused)109 static int test__event_groups(struct test_suite *text __maybe_unused, int subtest __maybe_unused)
110 {
111 	int i, j, k;
112 	int ret;
113 	int r;
114 
115 	ret = setup_uncore_event();
116 	if (ret || types[2] == -1)
117 		return TEST_SKIP;
118 
119 	ret = TEST_OK;
120 	for (i = 0; i < 3; i++) {
121 		for (j = 0; j < 3; j++) {
122 			for (k = 0; k < 3; k++) {
123 				r = run_test(i, j, k);
124 				if (r)
125 					ret = TEST_FAIL;
126 
127 				pr_debug("0x%x 0x%lx, 0x%x 0x%lx, 0x%x 0x%lx: %s\n",
128 					 types[i], configs[i], types[j], configs[j],
129 					 types[k], configs[k], r ? "Fail" : "Pass");
130 			}
131 		}
132 	}
133 	return ret;
134 }
135 
136 DEFINE_SUITE("Event groups", event_groups);
137