Loading...
1// SPDX-License-Identifier: GPL-2.0
2#include <errno.h>
3#include <inttypes.h>
4#include <math.h>
5#include <string.h>
6#include "counts.h"
7#include "cpumap.h"
8#include "debug.h"
9#include "header.h"
10#include "stat.h"
11#include "session.h"
12#include "target.h"
13#include "evlist.h"
14#include "evsel.h"
15#include "thread_map.h"
16#include <linux/zalloc.h>
17
18void update_stats(struct stats *stats, u64 val)
19{
20 double delta;
21
22 stats->n++;
23 delta = val - stats->mean;
24 stats->mean += delta / stats->n;
25 stats->M2 += delta*(val - stats->mean);
26
27 if (val > stats->max)
28 stats->max = val;
29
30 if (val < stats->min)
31 stats->min = val;
32}
33
34double avg_stats(struct stats *stats)
35{
36 return stats->mean;
37}
38
39/*
40 * http://en.wikipedia.org/wiki/Algorithms_for_calculating_variance
41 *
42 * (\Sum n_i^2) - ((\Sum n_i)^2)/n
43 * s^2 = -------------------------------
44 * n - 1
45 *
46 * http://en.wikipedia.org/wiki/Stddev
47 *
48 * The std dev of the mean is related to the std dev by:
49 *
50 * s
51 * s_mean = -------
52 * sqrt(n)
53 *
54 */
55double stddev_stats(struct stats *stats)
56{
57 double variance, variance_mean;
58
59 if (stats->n < 2)
60 return 0.0;
61
62 variance = stats->M2 / (stats->n - 1);
63 variance_mean = variance / stats->n;
64
65 return sqrt(variance_mean);
66}
67
68double rel_stddev_stats(double stddev, double avg)
69{
70 double pct = 0.0;
71
72 if (avg)
73 pct = 100.0 * stddev/avg;
74
75 return pct;
76}
77
78bool __perf_evsel_stat__is(struct evsel *evsel,
79 enum perf_stat_evsel_id id)
80{
81 struct perf_stat_evsel *ps = evsel->stats;
82
83 return ps->id == id;
84}
85
86#define ID(id, name) [PERF_STAT_EVSEL_ID__##id] = #name
87static const char *id_str[PERF_STAT_EVSEL_ID__MAX] = {
88 ID(NONE, x),
89 ID(CYCLES_IN_TX, cpu/cycles-t/),
90 ID(TRANSACTION_START, cpu/tx-start/),
91 ID(ELISION_START, cpu/el-start/),
92 ID(CYCLES_IN_TX_CP, cpu/cycles-ct/),
93 ID(TOPDOWN_TOTAL_SLOTS, topdown-total-slots),
94 ID(TOPDOWN_SLOTS_ISSUED, topdown-slots-issued),
95 ID(TOPDOWN_SLOTS_RETIRED, topdown-slots-retired),
96 ID(TOPDOWN_FETCH_BUBBLES, topdown-fetch-bubbles),
97 ID(TOPDOWN_RECOVERY_BUBBLES, topdown-recovery-bubbles),
98 ID(SMI_NUM, msr/smi/),
99 ID(APERF, msr/aperf/),
100};
101#undef ID
102
103static void perf_stat_evsel_id_init(struct evsel *evsel)
104{
105 struct perf_stat_evsel *ps = evsel->stats;
106 int i;
107
108 /* ps->id is 0 hence PERF_STAT_EVSEL_ID__NONE by default */
109
110 for (i = 0; i < PERF_STAT_EVSEL_ID__MAX; i++) {
111 if (!strcmp(perf_evsel__name(evsel), id_str[i])) {
112 ps->id = i;
113 break;
114 }
115 }
116}
117
118static void perf_evsel__reset_stat_priv(struct evsel *evsel)
119{
120 int i;
121 struct perf_stat_evsel *ps = evsel->stats;
122
123 for (i = 0; i < 3; i++)
124 init_stats(&ps->res_stats[i]);
125
126 perf_stat_evsel_id_init(evsel);
127}
128
129static int perf_evsel__alloc_stat_priv(struct evsel *evsel)
130{
131 evsel->stats = zalloc(sizeof(struct perf_stat_evsel));
132 if (evsel->stats == NULL)
133 return -ENOMEM;
134 perf_evsel__reset_stat_priv(evsel);
135 return 0;
136}
137
138static void perf_evsel__free_stat_priv(struct evsel *evsel)
139{
140 struct perf_stat_evsel *ps = evsel->stats;
141
142 if (ps)
143 zfree(&ps->group_data);
144 zfree(&evsel->stats);
145}
146
147static int perf_evsel__alloc_prev_raw_counts(struct evsel *evsel,
148 int ncpus, int nthreads)
149{
150 struct perf_counts *counts;
151
152 counts = perf_counts__new(ncpus, nthreads);
153 if (counts)
154 evsel->prev_raw_counts = counts;
155
156 return counts ? 0 : -ENOMEM;
157}
158
159static void perf_evsel__free_prev_raw_counts(struct evsel *evsel)
160{
161 perf_counts__delete(evsel->prev_raw_counts);
162 evsel->prev_raw_counts = NULL;
163}
164
165static void perf_evsel__reset_prev_raw_counts(struct evsel *evsel)
166{
167 if (evsel->prev_raw_counts) {
168 evsel->prev_raw_counts->aggr.val = 0;
169 evsel->prev_raw_counts->aggr.ena = 0;
170 evsel->prev_raw_counts->aggr.run = 0;
171 }
172}
173
174static int perf_evsel__alloc_stats(struct evsel *evsel, bool alloc_raw)
175{
176 int ncpus = perf_evsel__nr_cpus(evsel);
177 int nthreads = perf_thread_map__nr(evsel->core.threads);
178
179 if (perf_evsel__alloc_stat_priv(evsel) < 0 ||
180 perf_evsel__alloc_counts(evsel, ncpus, nthreads) < 0 ||
181 (alloc_raw && perf_evsel__alloc_prev_raw_counts(evsel, ncpus, nthreads) < 0))
182 return -ENOMEM;
183
184 return 0;
185}
186
187int perf_evlist__alloc_stats(struct evlist *evlist, bool alloc_raw)
188{
189 struct evsel *evsel;
190
191 evlist__for_each_entry(evlist, evsel) {
192 if (perf_evsel__alloc_stats(evsel, alloc_raw))
193 goto out_free;
194 }
195
196 return 0;
197
198out_free:
199 perf_evlist__free_stats(evlist);
200 return -1;
201}
202
203void perf_evlist__free_stats(struct evlist *evlist)
204{
205 struct evsel *evsel;
206
207 evlist__for_each_entry(evlist, evsel) {
208 perf_evsel__free_stat_priv(evsel);
209 perf_evsel__free_counts(evsel);
210 perf_evsel__free_prev_raw_counts(evsel);
211 }
212}
213
214void perf_evlist__reset_stats(struct evlist *evlist)
215{
216 struct evsel *evsel;
217
218 evlist__for_each_entry(evlist, evsel) {
219 perf_evsel__reset_stat_priv(evsel);
220 perf_evsel__reset_counts(evsel);
221 }
222}
223
224void perf_evlist__reset_prev_raw_counts(struct evlist *evlist)
225{
226 struct evsel *evsel;
227
228 evlist__for_each_entry(evlist, evsel)
229 perf_evsel__reset_prev_raw_counts(evsel);
230}
231
232static void zero_per_pkg(struct evsel *counter)
233{
234 if (counter->per_pkg_mask)
235 memset(counter->per_pkg_mask, 0, cpu__max_cpu());
236}
237
238static int check_per_pkg(struct evsel *counter,
239 struct perf_counts_values *vals, int cpu, bool *skip)
240{
241 unsigned long *mask = counter->per_pkg_mask;
242 struct perf_cpu_map *cpus = evsel__cpus(counter);
243 int s;
244
245 *skip = false;
246
247 if (!counter->per_pkg)
248 return 0;
249
250 if (perf_cpu_map__empty(cpus))
251 return 0;
252
253 if (!mask) {
254 mask = zalloc(cpu__max_cpu());
255 if (!mask)
256 return -ENOMEM;
257
258 counter->per_pkg_mask = mask;
259 }
260
261 /*
262 * we do not consider an event that has not run as a good
263 * instance to mark a package as used (skip=1). Otherwise
264 * we may run into a situation where the first CPU in a package
265 * is not running anything, yet the second is, and this function
266 * would mark the package as used after the first CPU and would
267 * not read the values from the second CPU.
268 */
269 if (!(vals->run && vals->ena))
270 return 0;
271
272 s = cpu_map__get_socket(cpus, cpu, NULL);
273 if (s < 0)
274 return -1;
275
276 *skip = test_and_set_bit(s, mask) == 1;
277 return 0;
278}
279
280static int
281process_counter_values(struct perf_stat_config *config, struct evsel *evsel,
282 int cpu, int thread,
283 struct perf_counts_values *count)
284{
285 struct perf_counts_values *aggr = &evsel->counts->aggr;
286 static struct perf_counts_values zero;
287 bool skip = false;
288
289 if (check_per_pkg(evsel, count, cpu, &skip)) {
290 pr_err("failed to read per-pkg counter\n");
291 return -1;
292 }
293
294 if (skip)
295 count = &zero;
296
297 switch (config->aggr_mode) {
298 case AGGR_THREAD:
299 case AGGR_CORE:
300 case AGGR_DIE:
301 case AGGR_SOCKET:
302 case AGGR_NONE:
303 if (!evsel->snapshot)
304 perf_evsel__compute_deltas(evsel, cpu, thread, count);
305 perf_counts_values__scale(count, config->scale, NULL);
306 if ((config->aggr_mode == AGGR_NONE) && (!evsel->percore)) {
307 perf_stat__update_shadow_stats(evsel, count->val,
308 cpu, &rt_stat);
309 }
310
311 if (config->aggr_mode == AGGR_THREAD) {
312 if (config->stats)
313 perf_stat__update_shadow_stats(evsel,
314 count->val, 0, &config->stats[thread]);
315 else
316 perf_stat__update_shadow_stats(evsel,
317 count->val, 0, &rt_stat);
318 }
319 break;
320 case AGGR_GLOBAL:
321 aggr->val += count->val;
322 aggr->ena += count->ena;
323 aggr->run += count->run;
324 case AGGR_UNSET:
325 default:
326 break;
327 }
328
329 return 0;
330}
331
332static int process_counter_maps(struct perf_stat_config *config,
333 struct evsel *counter)
334{
335 int nthreads = perf_thread_map__nr(counter->core.threads);
336 int ncpus = perf_evsel__nr_cpus(counter);
337 int cpu, thread;
338
339 if (counter->core.system_wide)
340 nthreads = 1;
341
342 for (thread = 0; thread < nthreads; thread++) {
343 for (cpu = 0; cpu < ncpus; cpu++) {
344 if (process_counter_values(config, counter, cpu, thread,
345 perf_counts(counter->counts, cpu, thread)))
346 return -1;
347 }
348 }
349
350 return 0;
351}
352
353int perf_stat_process_counter(struct perf_stat_config *config,
354 struct evsel *counter)
355{
356 struct perf_counts_values *aggr = &counter->counts->aggr;
357 struct perf_stat_evsel *ps = counter->stats;
358 u64 *count = counter->counts->aggr.values;
359 int i, ret;
360
361 aggr->val = aggr->ena = aggr->run = 0;
362
363 /*
364 * We calculate counter's data every interval,
365 * and the display code shows ps->res_stats
366 * avg value. We need to zero the stats for
367 * interval mode, otherwise overall avg running
368 * averages will be shown for each interval.
369 */
370 if (config->interval)
371 init_stats(ps->res_stats);
372
373 if (counter->per_pkg)
374 zero_per_pkg(counter);
375
376 ret = process_counter_maps(config, counter);
377 if (ret)
378 return ret;
379
380 if (config->aggr_mode != AGGR_GLOBAL)
381 return 0;
382
383 if (!counter->snapshot)
384 perf_evsel__compute_deltas(counter, -1, -1, aggr);
385 perf_counts_values__scale(aggr, config->scale, &counter->counts->scaled);
386
387 for (i = 0; i < 3; i++)
388 update_stats(&ps->res_stats[i], count[i]);
389
390 if (verbose > 0) {
391 fprintf(config->output, "%s: %" PRIu64 " %" PRIu64 " %" PRIu64 "\n",
392 perf_evsel__name(counter), count[0], count[1], count[2]);
393 }
394
395 /*
396 * Save the full runtime - to allow normalization during printout:
397 */
398 perf_stat__update_shadow_stats(counter, *count, 0, &rt_stat);
399
400 return 0;
401}
402
403int perf_event__process_stat_event(struct perf_session *session,
404 union perf_event *event)
405{
406 struct perf_counts_values count;
407 struct perf_record_stat *st = &event->stat;
408 struct evsel *counter;
409
410 count.val = st->val;
411 count.ena = st->ena;
412 count.run = st->run;
413
414 counter = perf_evlist__id2evsel(session->evlist, st->id);
415 if (!counter) {
416 pr_err("Failed to resolve counter for stat event.\n");
417 return -EINVAL;
418 }
419
420 *perf_counts(counter->counts, st->cpu, st->thread) = count;
421 counter->supported = true;
422 return 0;
423}
424
425size_t perf_event__fprintf_stat(union perf_event *event, FILE *fp)
426{
427 struct perf_record_stat *st = (struct perf_record_stat *)event;
428 size_t ret;
429
430 ret = fprintf(fp, "\n... id %" PRI_lu64 ", cpu %d, thread %d\n",
431 st->id, st->cpu, st->thread);
432 ret += fprintf(fp, "... value %" PRI_lu64 ", enabled %" PRI_lu64 ", running %" PRI_lu64 "\n",
433 st->val, st->ena, st->run);
434
435 return ret;
436}
437
438size_t perf_event__fprintf_stat_round(union perf_event *event, FILE *fp)
439{
440 struct perf_record_stat_round *rd = (struct perf_record_stat_round *)event;
441 size_t ret;
442
443 ret = fprintf(fp, "\n... time %" PRI_lu64 ", type %s\n", rd->time,
444 rd->type == PERF_STAT_ROUND_TYPE__FINAL ? "FINAL" : "INTERVAL");
445
446 return ret;
447}
448
449size_t perf_event__fprintf_stat_config(union perf_event *event, FILE *fp)
450{
451 struct perf_stat_config sc;
452 size_t ret;
453
454 perf_event__read_stat_config(&sc, &event->stat_config);
455
456 ret = fprintf(fp, "\n");
457 ret += fprintf(fp, "... aggr_mode %d\n", sc.aggr_mode);
458 ret += fprintf(fp, "... scale %d\n", sc.scale);
459 ret += fprintf(fp, "... interval %u\n", sc.interval);
460
461 return ret;
462}
463
464int create_perf_stat_counter(struct evsel *evsel,
465 struct perf_stat_config *config,
466 struct target *target)
467{
468 struct perf_event_attr *attr = &evsel->core.attr;
469 struct evsel *leader = evsel->leader;
470
471 attr->read_format = PERF_FORMAT_TOTAL_TIME_ENABLED |
472 PERF_FORMAT_TOTAL_TIME_RUNNING;
473
474 /*
475 * The event is part of non trivial group, let's enable
476 * the group read (for leader) and ID retrieval for all
477 * members.
478 */
479 if (leader->core.nr_members > 1)
480 attr->read_format |= PERF_FORMAT_ID|PERF_FORMAT_GROUP;
481
482 attr->inherit = !config->no_inherit;
483
484 /*
485 * Some events get initialized with sample_(period/type) set,
486 * like tracepoints. Clear it up for counting.
487 */
488 attr->sample_period = 0;
489
490 if (config->identifier)
491 attr->sample_type = PERF_SAMPLE_IDENTIFIER;
492
493 /*
494 * Disabling all counters initially, they will be enabled
495 * either manually by us or by kernel via enable_on_exec
496 * set later.
497 */
498 if (perf_evsel__is_group_leader(evsel)) {
499 attr->disabled = 1;
500
501 /*
502 * In case of initial_delay we enable tracee
503 * events manually.
504 */
505 if (target__none(target) && !config->initial_delay)
506 attr->enable_on_exec = 1;
507 }
508
509 if (target__has_cpu(target) && !target__has_per_thread(target))
510 return perf_evsel__open_per_cpu(evsel, evsel__cpus(evsel));
511
512 return perf_evsel__open_per_thread(evsel, evsel->core.threads);
513}
1// SPDX-License-Identifier: GPL-2.0
2#include <errno.h>
3#include <inttypes.h>
4#include <math.h>
5#include <string.h>
6#include "counts.h"
7#include "cpumap.h"
8#include "debug.h"
9#include "header.h"
10#include "stat.h"
11#include "session.h"
12#include "target.h"
13#include "evlist.h"
14#include "evsel.h"
15#include "thread_map.h"
16#include "hashmap.h"
17#include <linux/zalloc.h>
18
19void update_stats(struct stats *stats, u64 val)
20{
21 double delta;
22
23 stats->n++;
24 delta = val - stats->mean;
25 stats->mean += delta / stats->n;
26 stats->M2 += delta*(val - stats->mean);
27
28 if (val > stats->max)
29 stats->max = val;
30
31 if (val < stats->min)
32 stats->min = val;
33}
34
35double avg_stats(struct stats *stats)
36{
37 return stats->mean;
38}
39
40/*
41 * http://en.wikipedia.org/wiki/Algorithms_for_calculating_variance
42 *
43 * (\Sum n_i^2) - ((\Sum n_i)^2)/n
44 * s^2 = -------------------------------
45 * n - 1
46 *
47 * http://en.wikipedia.org/wiki/Stddev
48 *
49 * The std dev of the mean is related to the std dev by:
50 *
51 * s
52 * s_mean = -------
53 * sqrt(n)
54 *
55 */
56double stddev_stats(struct stats *stats)
57{
58 double variance, variance_mean;
59
60 if (stats->n < 2)
61 return 0.0;
62
63 variance = stats->M2 / (stats->n - 1);
64 variance_mean = variance / stats->n;
65
66 return sqrt(variance_mean);
67}
68
69double rel_stddev_stats(double stddev, double avg)
70{
71 double pct = 0.0;
72
73 if (avg)
74 pct = 100.0 * stddev/avg;
75
76 return pct;
77}
78
79bool __perf_stat_evsel__is(struct evsel *evsel, enum perf_stat_evsel_id id)
80{
81 struct perf_stat_evsel *ps = evsel->stats;
82
83 return ps->id == id;
84}
85
86#define ID(id, name) [PERF_STAT_EVSEL_ID__##id] = #name
87static const char *id_str[PERF_STAT_EVSEL_ID__MAX] = {
88 ID(NONE, x),
89 ID(CYCLES_IN_TX, cpu/cycles-t/),
90 ID(TRANSACTION_START, cpu/tx-start/),
91 ID(ELISION_START, cpu/el-start/),
92 ID(CYCLES_IN_TX_CP, cpu/cycles-ct/),
93 ID(TOPDOWN_TOTAL_SLOTS, topdown-total-slots),
94 ID(TOPDOWN_SLOTS_ISSUED, topdown-slots-issued),
95 ID(TOPDOWN_SLOTS_RETIRED, topdown-slots-retired),
96 ID(TOPDOWN_FETCH_BUBBLES, topdown-fetch-bubbles),
97 ID(TOPDOWN_RECOVERY_BUBBLES, topdown-recovery-bubbles),
98 ID(TOPDOWN_RETIRING, topdown-retiring),
99 ID(TOPDOWN_BAD_SPEC, topdown-bad-spec),
100 ID(TOPDOWN_FE_BOUND, topdown-fe-bound),
101 ID(TOPDOWN_BE_BOUND, topdown-be-bound),
102 ID(TOPDOWN_HEAVY_OPS, topdown-heavy-ops),
103 ID(TOPDOWN_BR_MISPREDICT, topdown-br-mispredict),
104 ID(TOPDOWN_FETCH_LAT, topdown-fetch-lat),
105 ID(TOPDOWN_MEM_BOUND, topdown-mem-bound),
106 ID(SMI_NUM, msr/smi/),
107 ID(APERF, msr/aperf/),
108};
109#undef ID
110
111static void perf_stat_evsel_id_init(struct evsel *evsel)
112{
113 struct perf_stat_evsel *ps = evsel->stats;
114 int i;
115
116 /* ps->id is 0 hence PERF_STAT_EVSEL_ID__NONE by default */
117
118 for (i = 0; i < PERF_STAT_EVSEL_ID__MAX; i++) {
119 if (!strcmp(evsel__name(evsel), id_str[i])) {
120 ps->id = i;
121 break;
122 }
123 }
124}
125
126static void evsel__reset_stat_priv(struct evsel *evsel)
127{
128 int i;
129 struct perf_stat_evsel *ps = evsel->stats;
130
131 for (i = 0; i < 3; i++)
132 init_stats(&ps->res_stats[i]);
133
134 perf_stat_evsel_id_init(evsel);
135}
136
137static int evsel__alloc_stat_priv(struct evsel *evsel)
138{
139 evsel->stats = zalloc(sizeof(struct perf_stat_evsel));
140 if (evsel->stats == NULL)
141 return -ENOMEM;
142 evsel__reset_stat_priv(evsel);
143 return 0;
144}
145
146static void evsel__free_stat_priv(struct evsel *evsel)
147{
148 struct perf_stat_evsel *ps = evsel->stats;
149
150 if (ps)
151 zfree(&ps->group_data);
152 zfree(&evsel->stats);
153}
154
155static int evsel__alloc_prev_raw_counts(struct evsel *evsel, int ncpus, int nthreads)
156{
157 struct perf_counts *counts;
158
159 counts = perf_counts__new(ncpus, nthreads);
160 if (counts)
161 evsel->prev_raw_counts = counts;
162
163 return counts ? 0 : -ENOMEM;
164}
165
166static void evsel__free_prev_raw_counts(struct evsel *evsel)
167{
168 perf_counts__delete(evsel->prev_raw_counts);
169 evsel->prev_raw_counts = NULL;
170}
171
172static void evsel__reset_prev_raw_counts(struct evsel *evsel)
173{
174 if (evsel->prev_raw_counts)
175 perf_counts__reset(evsel->prev_raw_counts);
176}
177
178static int evsel__alloc_stats(struct evsel *evsel, bool alloc_raw)
179{
180 int ncpus = evsel__nr_cpus(evsel);
181 int nthreads = perf_thread_map__nr(evsel->core.threads);
182
183 if (evsel__alloc_stat_priv(evsel) < 0 ||
184 evsel__alloc_counts(evsel, ncpus, nthreads) < 0 ||
185 (alloc_raw && evsel__alloc_prev_raw_counts(evsel, ncpus, nthreads) < 0))
186 return -ENOMEM;
187
188 return 0;
189}
190
191int evlist__alloc_stats(struct evlist *evlist, bool alloc_raw)
192{
193 struct evsel *evsel;
194
195 evlist__for_each_entry(evlist, evsel) {
196 if (evsel__alloc_stats(evsel, alloc_raw))
197 goto out_free;
198 }
199
200 return 0;
201
202out_free:
203 evlist__free_stats(evlist);
204 return -1;
205}
206
207void evlist__free_stats(struct evlist *evlist)
208{
209 struct evsel *evsel;
210
211 evlist__for_each_entry(evlist, evsel) {
212 evsel__free_stat_priv(evsel);
213 evsel__free_counts(evsel);
214 evsel__free_prev_raw_counts(evsel);
215 }
216}
217
218void evlist__reset_stats(struct evlist *evlist)
219{
220 struct evsel *evsel;
221
222 evlist__for_each_entry(evlist, evsel) {
223 evsel__reset_stat_priv(evsel);
224 evsel__reset_counts(evsel);
225 }
226}
227
228void evlist__reset_prev_raw_counts(struct evlist *evlist)
229{
230 struct evsel *evsel;
231
232 evlist__for_each_entry(evlist, evsel)
233 evsel__reset_prev_raw_counts(evsel);
234}
235
236static void evsel__copy_prev_raw_counts(struct evsel *evsel)
237{
238 int ncpus = evsel__nr_cpus(evsel);
239 int nthreads = perf_thread_map__nr(evsel->core.threads);
240
241 for (int thread = 0; thread < nthreads; thread++) {
242 for (int cpu = 0; cpu < ncpus; cpu++) {
243 *perf_counts(evsel->counts, cpu, thread) =
244 *perf_counts(evsel->prev_raw_counts, cpu,
245 thread);
246 }
247 }
248
249 evsel->counts->aggr = evsel->prev_raw_counts->aggr;
250}
251
252void evlist__copy_prev_raw_counts(struct evlist *evlist)
253{
254 struct evsel *evsel;
255
256 evlist__for_each_entry(evlist, evsel)
257 evsel__copy_prev_raw_counts(evsel);
258}
259
260void evlist__save_aggr_prev_raw_counts(struct evlist *evlist)
261{
262 struct evsel *evsel;
263
264 /*
265 * To collect the overall statistics for interval mode,
266 * we copy the counts from evsel->prev_raw_counts to
267 * evsel->counts. The perf_stat_process_counter creates
268 * aggr values from per cpu values, but the per cpu values
269 * are 0 for AGGR_GLOBAL. So we use a trick that saves the
270 * previous aggr value to the first member of perf_counts,
271 * then aggr calculation in process_counter_values can work
272 * correctly.
273 */
274 evlist__for_each_entry(evlist, evsel) {
275 *perf_counts(evsel->prev_raw_counts, 0, 0) =
276 evsel->prev_raw_counts->aggr;
277 }
278}
279
280static size_t pkg_id_hash(const void *__key, void *ctx __maybe_unused)
281{
282 uint64_t *key = (uint64_t *) __key;
283
284 return *key & 0xffffffff;
285}
286
287static bool pkg_id_equal(const void *__key1, const void *__key2,
288 void *ctx __maybe_unused)
289{
290 uint64_t *key1 = (uint64_t *) __key1;
291 uint64_t *key2 = (uint64_t *) __key2;
292
293 return *key1 == *key2;
294}
295
296static int check_per_pkg(struct evsel *counter,
297 struct perf_counts_values *vals, int cpu, bool *skip)
298{
299 struct hashmap *mask = counter->per_pkg_mask;
300 struct perf_cpu_map *cpus = evsel__cpus(counter);
301 int s, d, ret = 0;
302 uint64_t *key;
303
304 *skip = false;
305
306 if (!counter->per_pkg)
307 return 0;
308
309 if (perf_cpu_map__empty(cpus))
310 return 0;
311
312 if (!mask) {
313 mask = hashmap__new(pkg_id_hash, pkg_id_equal, NULL);
314 if (!mask)
315 return -ENOMEM;
316
317 counter->per_pkg_mask = mask;
318 }
319
320 /*
321 * we do not consider an event that has not run as a good
322 * instance to mark a package as used (skip=1). Otherwise
323 * we may run into a situation where the first CPU in a package
324 * is not running anything, yet the second is, and this function
325 * would mark the package as used after the first CPU and would
326 * not read the values from the second CPU.
327 */
328 if (!(vals->run && vals->ena))
329 return 0;
330
331 s = cpu_map__get_socket(cpus, cpu, NULL).socket;
332 if (s < 0)
333 return -1;
334
335 /*
336 * On multi-die system, die_id > 0. On no-die system, die_id = 0.
337 * We use hashmap(socket, die) to check the used socket+die pair.
338 */
339 d = cpu_map__get_die(cpus, cpu, NULL).die;
340 if (d < 0)
341 return -1;
342
343 key = malloc(sizeof(*key));
344 if (!key)
345 return -ENOMEM;
346
347 *key = (uint64_t)d << 32 | s;
348 if (hashmap__find(mask, (void *)key, NULL))
349 *skip = true;
350 else
351 ret = hashmap__add(mask, (void *)key, (void *)1);
352
353 return ret;
354}
355
356static int
357process_counter_values(struct perf_stat_config *config, struct evsel *evsel,
358 int cpu, int thread,
359 struct perf_counts_values *count)
360{
361 struct perf_counts_values *aggr = &evsel->counts->aggr;
362 static struct perf_counts_values zero;
363 bool skip = false;
364
365 if (check_per_pkg(evsel, count, cpu, &skip)) {
366 pr_err("failed to read per-pkg counter\n");
367 return -1;
368 }
369
370 if (skip)
371 count = &zero;
372
373 switch (config->aggr_mode) {
374 case AGGR_THREAD:
375 case AGGR_CORE:
376 case AGGR_DIE:
377 case AGGR_SOCKET:
378 case AGGR_NODE:
379 case AGGR_NONE:
380 if (!evsel->snapshot)
381 evsel__compute_deltas(evsel, cpu, thread, count);
382 perf_counts_values__scale(count, config->scale, NULL);
383 if ((config->aggr_mode == AGGR_NONE) && (!evsel->percore)) {
384 perf_stat__update_shadow_stats(evsel, count->val,
385 cpu, &rt_stat);
386 }
387
388 if (config->aggr_mode == AGGR_THREAD) {
389 if (config->stats)
390 perf_stat__update_shadow_stats(evsel,
391 count->val, 0, &config->stats[thread]);
392 else
393 perf_stat__update_shadow_stats(evsel,
394 count->val, 0, &rt_stat);
395 }
396 break;
397 case AGGR_GLOBAL:
398 aggr->val += count->val;
399 aggr->ena += count->ena;
400 aggr->run += count->run;
401 case AGGR_UNSET:
402 default:
403 break;
404 }
405
406 return 0;
407}
408
409static int process_counter_maps(struct perf_stat_config *config,
410 struct evsel *counter)
411{
412 int nthreads = perf_thread_map__nr(counter->core.threads);
413 int ncpus = evsel__nr_cpus(counter);
414 int cpu, thread;
415
416 if (counter->core.system_wide)
417 nthreads = 1;
418
419 for (thread = 0; thread < nthreads; thread++) {
420 for (cpu = 0; cpu < ncpus; cpu++) {
421 if (process_counter_values(config, counter, cpu, thread,
422 perf_counts(counter->counts, cpu, thread)))
423 return -1;
424 }
425 }
426
427 return 0;
428}
429
430int perf_stat_process_counter(struct perf_stat_config *config,
431 struct evsel *counter)
432{
433 struct perf_counts_values *aggr = &counter->counts->aggr;
434 struct perf_stat_evsel *ps = counter->stats;
435 u64 *count = counter->counts->aggr.values;
436 int i, ret;
437
438 aggr->val = aggr->ena = aggr->run = 0;
439
440 if (counter->per_pkg)
441 evsel__zero_per_pkg(counter);
442
443 ret = process_counter_maps(config, counter);
444 if (ret)
445 return ret;
446
447 if (config->aggr_mode != AGGR_GLOBAL)
448 return 0;
449
450 if (!counter->snapshot)
451 evsel__compute_deltas(counter, -1, -1, aggr);
452 perf_counts_values__scale(aggr, config->scale, &counter->counts->scaled);
453
454 for (i = 0; i < 3; i++)
455 update_stats(&ps->res_stats[i], count[i]);
456
457 if (verbose > 0) {
458 fprintf(config->output, "%s: %" PRIu64 " %" PRIu64 " %" PRIu64 "\n",
459 evsel__name(counter), count[0], count[1], count[2]);
460 }
461
462 /*
463 * Save the full runtime - to allow normalization during printout:
464 */
465 perf_stat__update_shadow_stats(counter, *count, 0, &rt_stat);
466
467 return 0;
468}
469
470int perf_event__process_stat_event(struct perf_session *session,
471 union perf_event *event)
472{
473 struct perf_counts_values count;
474 struct perf_record_stat *st = &event->stat;
475 struct evsel *counter;
476
477 count.val = st->val;
478 count.ena = st->ena;
479 count.run = st->run;
480
481 counter = evlist__id2evsel(session->evlist, st->id);
482 if (!counter) {
483 pr_err("Failed to resolve counter for stat event.\n");
484 return -EINVAL;
485 }
486
487 *perf_counts(counter->counts, st->cpu, st->thread) = count;
488 counter->supported = true;
489 return 0;
490}
491
492size_t perf_event__fprintf_stat(union perf_event *event, FILE *fp)
493{
494 struct perf_record_stat *st = (struct perf_record_stat *)event;
495 size_t ret;
496
497 ret = fprintf(fp, "\n... id %" PRI_lu64 ", cpu %d, thread %d\n",
498 st->id, st->cpu, st->thread);
499 ret += fprintf(fp, "... value %" PRI_lu64 ", enabled %" PRI_lu64 ", running %" PRI_lu64 "\n",
500 st->val, st->ena, st->run);
501
502 return ret;
503}
504
505size_t perf_event__fprintf_stat_round(union perf_event *event, FILE *fp)
506{
507 struct perf_record_stat_round *rd = (struct perf_record_stat_round *)event;
508 size_t ret;
509
510 ret = fprintf(fp, "\n... time %" PRI_lu64 ", type %s\n", rd->time,
511 rd->type == PERF_STAT_ROUND_TYPE__FINAL ? "FINAL" : "INTERVAL");
512
513 return ret;
514}
515
516size_t perf_event__fprintf_stat_config(union perf_event *event, FILE *fp)
517{
518 struct perf_stat_config sc;
519 size_t ret;
520
521 perf_event__read_stat_config(&sc, &event->stat_config);
522
523 ret = fprintf(fp, "\n");
524 ret += fprintf(fp, "... aggr_mode %d\n", sc.aggr_mode);
525 ret += fprintf(fp, "... scale %d\n", sc.scale);
526 ret += fprintf(fp, "... interval %u\n", sc.interval);
527
528 return ret;
529}
530
531int create_perf_stat_counter(struct evsel *evsel,
532 struct perf_stat_config *config,
533 struct target *target,
534 int cpu)
535{
536 struct perf_event_attr *attr = &evsel->core.attr;
537 struct evsel *leader = evsel__leader(evsel);
538
539 attr->read_format = PERF_FORMAT_TOTAL_TIME_ENABLED |
540 PERF_FORMAT_TOTAL_TIME_RUNNING;
541
542 /*
543 * The event is part of non trivial group, let's enable
544 * the group read (for leader) and ID retrieval for all
545 * members.
546 */
547 if (leader->core.nr_members > 1)
548 attr->read_format |= PERF_FORMAT_ID|PERF_FORMAT_GROUP;
549
550 attr->inherit = !config->no_inherit && list_empty(&evsel->bpf_counter_list);
551
552 /*
553 * Some events get initialized with sample_(period/type) set,
554 * like tracepoints. Clear it up for counting.
555 */
556 attr->sample_period = 0;
557
558 if (config->identifier)
559 attr->sample_type = PERF_SAMPLE_IDENTIFIER;
560
561 if (config->all_user) {
562 attr->exclude_kernel = 1;
563 attr->exclude_user = 0;
564 }
565
566 if (config->all_kernel) {
567 attr->exclude_kernel = 0;
568 attr->exclude_user = 1;
569 }
570
571 /*
572 * Disabling all counters initially, they will be enabled
573 * either manually by us or by kernel via enable_on_exec
574 * set later.
575 */
576 if (evsel__is_group_leader(evsel)) {
577 attr->disabled = 1;
578
579 /*
580 * In case of initial_delay we enable tracee
581 * events manually.
582 */
583 if (target__none(target) && !config->initial_delay)
584 attr->enable_on_exec = 1;
585 }
586
587 if (target__has_cpu(target) && !target__has_per_thread(target))
588 return evsel__open_per_cpu(evsel, evsel__cpus(evsel), cpu);
589
590 return evsel__open_per_thread(evsel, evsel->core.threads);
591}