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: &attr, pid: -1, cpu: 0, group_fd, flags: 0);
49}
50
51static 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(type: types[2], config: configs[2], group_fd: -1);
71 if (fd < 0)
72 return -1;
73 close(fd);
74 return 0;
75 }
76 }
77 }
78 return -1;
79}
80
81static 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(type: types[i], config: configs[i], group_fd: -1);
87 if (group_fd == -1)
88 return -1;
89
90 sibling_fd1 = event_open(type: types[j], config: 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(type: types[k], config: 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
109static 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
136DEFINE_SUITE("Event groups", event_groups);
137

source code of linux/tools/perf/tests/event_groups.c