1 #include <stddef.h>
2 #include <stdlib.h>
3 #include <string.h>
4 #include <errno.h>
5 #include <sys/types.h>
6 #include <sys/stat.h>
7 #include <unistd.h>
8 #include <api/fs/fs.h>
9 #include "mem-events.h"
10 #include "debug.h"
11 #include "symbol.h"
12
13 unsigned int perf_mem_events__loads_ldlat = 30;
14
15 #define E(t, n, s) { .tag = t, .name = n, .sysfs_name = s }
16
17 struct perf_mem_event perf_mem_events[PERF_MEM_EVENTS__MAX] = {
18 E("ldlat-loads", "cpu/mem-loads,ldlat=%u/P", "mem-loads"),
19 E("ldlat-stores", "cpu/mem-stores/P", "mem-stores"),
20 };
21 #undef E
22
23 #undef E
24
25 static char mem_loads_name[100];
26 static bool mem_loads_name__init;
27
perf_mem_events__name(int i)28 char *perf_mem_events__name(int i)
29 {
30 if (i == PERF_MEM_EVENTS__LOAD) {
31 if (!mem_loads_name__init) {
32 mem_loads_name__init = true;
33 scnprintf(mem_loads_name, sizeof(mem_loads_name),
34 perf_mem_events[i].name,
35 perf_mem_events__loads_ldlat);
36 }
37 return mem_loads_name;
38 }
39
40 return (char *)perf_mem_events[i].name;
41 }
42
perf_mem_events__parse(const char * str)43 int perf_mem_events__parse(const char *str)
44 {
45 char *tok, *saveptr = NULL;
46 bool found = false;
47 char *buf;
48 int j;
49
50 /* We need buffer that we know we can write to. */
51 buf = malloc(strlen(str) + 1);
52 if (!buf)
53 return -ENOMEM;
54
55 strcpy(buf, str);
56
57 tok = strtok_r((char *)buf, ",", &saveptr);
58
59 while (tok) {
60 for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) {
61 struct perf_mem_event *e = &perf_mem_events[j];
62
63 if (strstr(e->tag, tok))
64 e->record = found = true;
65 }
66
67 tok = strtok_r(NULL, ",", &saveptr);
68 }
69
70 free(buf);
71
72 if (found)
73 return 0;
74
75 pr_err("failed: event '%s' not found, use '-e list' to get list of available events\n", str);
76 return -1;
77 }
78
perf_mem_events__init(void)79 int perf_mem_events__init(void)
80 {
81 const char *mnt = sysfs__mount();
82 bool found = false;
83 int j;
84
85 if (!mnt)
86 return -ENOENT;
87
88 for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) {
89 char path[PATH_MAX];
90 struct perf_mem_event *e = &perf_mem_events[j];
91 struct stat st;
92
93 scnprintf(path, PATH_MAX, "%s/devices/cpu/events/%s",
94 mnt, e->sysfs_name);
95
96 if (!stat(path, &st))
97 e->supported = found = true;
98 }
99
100 return found ? 0 : -ENOENT;
101 }
102
103 static const char * const tlb_access[] = {
104 "N/A",
105 "HIT",
106 "MISS",
107 "L1",
108 "L2",
109 "Walker",
110 "Fault",
111 };
112
perf_mem__tlb_scnprintf(char * out,size_t sz,struct mem_info * mem_info)113 int perf_mem__tlb_scnprintf(char *out, size_t sz, struct mem_info *mem_info)
114 {
115 size_t l = 0, i;
116 u64 m = PERF_MEM_TLB_NA;
117 u64 hit, miss;
118
119 sz -= 1; /* -1 for null termination */
120 out[0] = '\0';
121
122 if (mem_info)
123 m = mem_info->data_src.mem_dtlb;
124
125 hit = m & PERF_MEM_TLB_HIT;
126 miss = m & PERF_MEM_TLB_MISS;
127
128 /* already taken care of */
129 m &= ~(PERF_MEM_TLB_HIT|PERF_MEM_TLB_MISS);
130
131 for (i = 0; m && i < ARRAY_SIZE(tlb_access); i++, m >>= 1) {
132 if (!(m & 0x1))
133 continue;
134 if (l) {
135 strcat(out, " or ");
136 l += 4;
137 }
138 l += scnprintf(out + l, sz - l, tlb_access[i]);
139 }
140 if (*out == '\0')
141 l += scnprintf(out, sz - l, "N/A");
142 if (hit)
143 l += scnprintf(out + l, sz - l, " hit");
144 if (miss)
145 l += scnprintf(out + l, sz - l, " miss");
146
147 return l;
148 }
149
150 static const char * const mem_lvl[] = {
151 "N/A",
152 "HIT",
153 "MISS",
154 "L1",
155 "LFB",
156 "L2",
157 "L3",
158 "Local RAM",
159 "Remote RAM (1 hop)",
160 "Remote RAM (2 hops)",
161 "Remote Cache (1 hop)",
162 "Remote Cache (2 hops)",
163 "I/O",
164 "Uncached",
165 };
166
perf_mem__lvl_scnprintf(char * out,size_t sz,struct mem_info * mem_info)167 int perf_mem__lvl_scnprintf(char *out, size_t sz, struct mem_info *mem_info)
168 {
169 size_t i, l = 0;
170 u64 m = PERF_MEM_LVL_NA;
171 u64 hit, miss;
172
173 if (mem_info)
174 m = mem_info->data_src.mem_lvl;
175
176 sz -= 1; /* -1 for null termination */
177 out[0] = '\0';
178
179 hit = m & PERF_MEM_LVL_HIT;
180 miss = m & PERF_MEM_LVL_MISS;
181
182 /* already taken care of */
183 m &= ~(PERF_MEM_LVL_HIT|PERF_MEM_LVL_MISS);
184
185 for (i = 0; m && i < ARRAY_SIZE(mem_lvl); i++, m >>= 1) {
186 if (!(m & 0x1))
187 continue;
188 if (l) {
189 strcat(out, " or ");
190 l += 4;
191 }
192 l += scnprintf(out + l, sz - l, mem_lvl[i]);
193 }
194 if (*out == '\0')
195 l += scnprintf(out, sz - l, "N/A");
196 if (hit)
197 l += scnprintf(out + l, sz - l, " hit");
198 if (miss)
199 l += scnprintf(out + l, sz - l, " miss");
200
201 return l;
202 }
203
204 static const char * const snoop_access[] = {
205 "N/A",
206 "None",
207 "Miss",
208 "Hit",
209 "HitM",
210 };
211
perf_mem__snp_scnprintf(char * out,size_t sz,struct mem_info * mem_info)212 int perf_mem__snp_scnprintf(char *out, size_t sz, struct mem_info *mem_info)
213 {
214 size_t i, l = 0;
215 u64 m = PERF_MEM_SNOOP_NA;
216
217 sz -= 1; /* -1 for null termination */
218 out[0] = '\0';
219
220 if (mem_info)
221 m = mem_info->data_src.mem_snoop;
222
223 for (i = 0; m && i < ARRAY_SIZE(snoop_access); i++, m >>= 1) {
224 if (!(m & 0x1))
225 continue;
226 if (l) {
227 strcat(out, " or ");
228 l += 4;
229 }
230 l += scnprintf(out + l, sz - l, snoop_access[i]);
231 }
232
233 if (*out == '\0')
234 l += scnprintf(out, sz - l, "N/A");
235
236 return l;
237 }
238
perf_mem__lck_scnprintf(char * out,size_t sz,struct mem_info * mem_info)239 int perf_mem__lck_scnprintf(char *out, size_t sz, struct mem_info *mem_info)
240 {
241 u64 mask = PERF_MEM_LOCK_NA;
242 int l;
243
244 if (mem_info)
245 mask = mem_info->data_src.mem_lock;
246
247 if (mask & PERF_MEM_LOCK_NA)
248 l = scnprintf(out, sz, "N/A");
249 else if (mask & PERF_MEM_LOCK_LOCKED)
250 l = scnprintf(out, sz, "Yes");
251 else
252 l = scnprintf(out, sz, "No");
253
254 return l;
255 }
256
perf_script__meminfo_scnprintf(char * out,size_t sz,struct mem_info * mem_info)257 int perf_script__meminfo_scnprintf(char *out, size_t sz, struct mem_info *mem_info)
258 {
259 int i = 0;
260
261 i += perf_mem__lvl_scnprintf(out, sz, mem_info);
262 i += scnprintf(out + i, sz - i, "|SNP ");
263 i += perf_mem__snp_scnprintf(out + i, sz - i, mem_info);
264 i += scnprintf(out + i, sz - i, "|TLB ");
265 i += perf_mem__tlb_scnprintf(out + i, sz - i, mem_info);
266 i += scnprintf(out + i, sz - i, "|LCK ");
267 i += perf_mem__lck_scnprintf(out + i, sz - i, mem_info);
268
269 return i;
270 }
271