1 | // SPDX-License-Identifier: GPL-2.0 |
2 | /* |
3 | * Copyright(C) 2015 Linaro Limited. All rights reserved. |
4 | * Author: Mathieu Poirier <mathieu.poirier@linaro.org> |
5 | */ |
6 | |
7 | #include <dirent.h> |
8 | #include <stdbool.h> |
9 | #include <linux/coresight-pmu.h> |
10 | #include <linux/zalloc.h> |
11 | #include <api/fs/fs.h> |
12 | |
13 | #include "../../../util/auxtrace.h" |
14 | #include "../../../util/debug.h" |
15 | #include "../../../util/evlist.h" |
16 | #include "../../../util/pmu.h" |
17 | #include "../../../util/pmus.h" |
18 | #include "cs-etm.h" |
19 | #include "arm-spe.h" |
20 | #include "hisi-ptt.h" |
21 | |
22 | static struct perf_pmu **find_all_arm_spe_pmus(int *nr_spes, int *err) |
23 | { |
24 | struct perf_pmu **arm_spe_pmus = NULL; |
25 | int ret, i, nr_cpus = sysconf(_SC_NPROCESSORS_CONF); |
26 | /* arm_spe_xxxxxxxxx\0 */ |
27 | char arm_spe_pmu_name[sizeof(ARM_SPE_PMU_NAME) + 10]; |
28 | |
29 | arm_spe_pmus = zalloc(sizeof(struct perf_pmu *) * nr_cpus); |
30 | if (!arm_spe_pmus) { |
31 | pr_err("spes alloc failed\n" ); |
32 | *err = -ENOMEM; |
33 | return NULL; |
34 | } |
35 | |
36 | for (i = 0; i < nr_cpus; i++) { |
37 | ret = sprintf(buf: arm_spe_pmu_name, fmt: "%s%d" , ARM_SPE_PMU_NAME, i); |
38 | if (ret < 0) { |
39 | pr_err("sprintf failed\n" ); |
40 | *err = -ENOMEM; |
41 | return NULL; |
42 | } |
43 | |
44 | arm_spe_pmus[*nr_spes] = perf_pmus__find(name: arm_spe_pmu_name); |
45 | if (arm_spe_pmus[*nr_spes]) { |
46 | pr_debug2("%s %d: arm_spe_pmu %d type %d name %s\n" , |
47 | __func__, __LINE__, *nr_spes, |
48 | arm_spe_pmus[*nr_spes]->type, |
49 | arm_spe_pmus[*nr_spes]->name); |
50 | (*nr_spes)++; |
51 | } |
52 | } |
53 | |
54 | return arm_spe_pmus; |
55 | } |
56 | |
57 | static struct perf_pmu **find_all_hisi_ptt_pmus(int *nr_ptts, int *err) |
58 | { |
59 | struct perf_pmu **hisi_ptt_pmus = NULL; |
60 | struct dirent *dent; |
61 | char path[PATH_MAX]; |
62 | DIR *dir = NULL; |
63 | int idx = 0; |
64 | |
65 | perf_pmu__event_source_devices_scnprintf(pathname: path, size: sizeof(path)); |
66 | dir = opendir(path); |
67 | if (!dir) { |
68 | pr_err("can't read directory '%s'\n" , path); |
69 | *err = -EINVAL; |
70 | return NULL; |
71 | } |
72 | |
73 | while ((dent = readdir(dir))) { |
74 | if (strstr(dent->d_name, HISI_PTT_PMU_NAME)) |
75 | (*nr_ptts)++; |
76 | } |
77 | |
78 | if (!(*nr_ptts)) |
79 | goto out; |
80 | |
81 | hisi_ptt_pmus = zalloc(sizeof(struct perf_pmu *) * (*nr_ptts)); |
82 | if (!hisi_ptt_pmus) { |
83 | pr_err("hisi_ptt alloc failed\n" ); |
84 | *err = -ENOMEM; |
85 | goto out; |
86 | } |
87 | |
88 | rewinddir(dir); |
89 | while ((dent = readdir(dir))) { |
90 | if (strstr(dent->d_name, HISI_PTT_PMU_NAME) && idx < *nr_ptts) { |
91 | hisi_ptt_pmus[idx] = perf_pmus__find(name: dent->d_name); |
92 | if (hisi_ptt_pmus[idx]) |
93 | idx++; |
94 | } |
95 | } |
96 | |
97 | out: |
98 | closedir(dir); |
99 | return hisi_ptt_pmus; |
100 | } |
101 | |
102 | static struct perf_pmu *find_pmu_for_event(struct perf_pmu **pmus, |
103 | int pmu_nr, struct evsel *evsel) |
104 | { |
105 | int i; |
106 | |
107 | if (!pmus) |
108 | return NULL; |
109 | |
110 | for (i = 0; i < pmu_nr; i++) { |
111 | if (evsel->core.attr.type == pmus[i]->type) |
112 | return pmus[i]; |
113 | } |
114 | |
115 | return NULL; |
116 | } |
117 | |
118 | struct auxtrace_record |
119 | *auxtrace_record__init(struct evlist *evlist, int *err) |
120 | { |
121 | struct perf_pmu *cs_etm_pmu = NULL; |
122 | struct perf_pmu **arm_spe_pmus = NULL; |
123 | struct perf_pmu **hisi_ptt_pmus = NULL; |
124 | struct evsel *evsel; |
125 | struct perf_pmu *found_etm = NULL; |
126 | struct perf_pmu *found_spe = NULL; |
127 | struct perf_pmu *found_ptt = NULL; |
128 | int auxtrace_event_cnt = 0; |
129 | int nr_spes = 0; |
130 | int nr_ptts = 0; |
131 | |
132 | if (!evlist) |
133 | return NULL; |
134 | |
135 | cs_etm_pmu = perf_pmus__find(CORESIGHT_ETM_PMU_NAME); |
136 | arm_spe_pmus = find_all_arm_spe_pmus(nr_spes: &nr_spes, err); |
137 | hisi_ptt_pmus = find_all_hisi_ptt_pmus(nr_ptts: &nr_ptts, err); |
138 | |
139 | evlist__for_each_entry(evlist, evsel) { |
140 | if (cs_etm_pmu && !found_etm) |
141 | found_etm = find_pmu_for_event(pmus: &cs_etm_pmu, pmu_nr: 1, evsel); |
142 | |
143 | if (arm_spe_pmus && !found_spe) |
144 | found_spe = find_pmu_for_event(pmus: arm_spe_pmus, pmu_nr: nr_spes, evsel); |
145 | |
146 | if (hisi_ptt_pmus && !found_ptt) |
147 | found_ptt = find_pmu_for_event(pmus: hisi_ptt_pmus, pmu_nr: nr_ptts, evsel); |
148 | } |
149 | |
150 | free(arm_spe_pmus); |
151 | free(hisi_ptt_pmus); |
152 | |
153 | if (found_etm) |
154 | auxtrace_event_cnt++; |
155 | |
156 | if (found_spe) |
157 | auxtrace_event_cnt++; |
158 | |
159 | if (found_ptt) |
160 | auxtrace_event_cnt++; |
161 | |
162 | if (auxtrace_event_cnt > 1) { |
163 | pr_err("Concurrent AUX trace operation not currently supported\n" ); |
164 | *err = -EOPNOTSUPP; |
165 | return NULL; |
166 | } |
167 | |
168 | if (found_etm) |
169 | return cs_etm_record_init(err); |
170 | |
171 | #if defined(__aarch64__) |
172 | if (found_spe) |
173 | return arm_spe_recording_init(err, found_spe); |
174 | |
175 | if (found_ptt) |
176 | return hisi_ptt_recording_init(err, found_ptt); |
177 | #endif |
178 | |
179 | /* |
180 | * Clear 'err' even if we haven't found an event - that way perf |
181 | * record can still be used even if tracers aren't present. The NULL |
182 | * return value will take care of telling the infrastructure HW tracing |
183 | * isn't available. |
184 | */ |
185 | *err = 0; |
186 | return NULL; |
187 | } |
188 | |
189 | #if defined(__arm__) |
190 | u64 compat_auxtrace_mmap__read_head(struct auxtrace_mmap *mm) |
191 | { |
192 | struct perf_event_mmap_page *pc = mm->userpg; |
193 | u64 result; |
194 | |
195 | __asm__ __volatile__( |
196 | " ldrd %0, %H0, [%1]" |
197 | : "=&r" (result) |
198 | : "r" (&pc->aux_head), "Qo" (pc->aux_head) |
199 | ); |
200 | |
201 | return result; |
202 | } |
203 | |
204 | int compat_auxtrace_mmap__write_tail(struct auxtrace_mmap *mm, u64 tail) |
205 | { |
206 | struct perf_event_mmap_page *pc = mm->userpg; |
207 | |
208 | /* Ensure all reads are done before we write the tail out */ |
209 | smp_mb(); |
210 | |
211 | __asm__ __volatile__( |
212 | " strd %2, %H2, [%1]" |
213 | : "=Qo" (pc->aux_tail) |
214 | : "r" (&pc->aux_tail), "r" (tail) |
215 | ); |
216 | |
217 | return 0; |
218 | } |
219 | #endif |
220 | |