1#include <stdlib.h>
2#include <stdio.h>
3#include <inttypes.h>
4#include <linux/string.h>
5#include <linux/time64.h>
6#include <math.h>
7#include "color.h"
8#include "counts.h"
9#include "evlist.h"
10#include "evsel.h"
11#include "stat.h"
12#include "top.h"
13#include "thread_map.h"
14#include "cpumap.h"
15#include "string2.h"
16#include <linux/ctype.h>
17#include "cgroup.h"
18#include <api/fs/fs.h>
19#include "util.h"
20
21#define CNTR_NOT_SUPPORTED "<not supported>"
22#define CNTR_NOT_COUNTED "<not counted>"
23
24static void print_running(struct perf_stat_config *config,
25 u64 run, u64 ena)
26{
27 if (config->csv_output) {
28 fprintf(config->output, "%s%" PRIu64 "%s%.2f",
29 config->csv_sep,
30 run,
31 config->csv_sep,
32 ena ? 100.0 * run / ena : 100.0);
33 } else if (run != ena) {
34 fprintf(config->output, " (%.2f%%)", 100.0 * run / ena);
35 }
36}
37
38static void print_noise_pct(struct perf_stat_config *config,
39 double total, double avg)
40{
41 double pct = rel_stddev_stats(total, avg);
42
43 if (config->csv_output)
44 fprintf(config->output, "%s%.2f%%", config->csv_sep, pct);
45 else if (pct)
46 fprintf(config->output, " ( +-%6.2f%% )", pct);
47}
48
49static void print_noise(struct perf_stat_config *config,
50 struct evsel *evsel, double avg)
51{
52 struct perf_stat_evsel *ps;
53
54 if (config->run_count == 1)
55 return;
56
57 ps = evsel->stats;
58 print_noise_pct(config, stddev_stats(&ps->res_stats[0]), avg);
59}
60
61static void print_cgroup(struct perf_stat_config *config, struct evsel *evsel)
62{
63 if (nr_cgroups) {
64 const char *cgrp_name = evsel->cgrp ? evsel->cgrp->name : "";
65 fprintf(config->output, "%s%s", config->csv_sep, cgrp_name);
66 }
67}
68
69
70static void aggr_printout(struct perf_stat_config *config,
71 struct evsel *evsel, int id, int nr)
72{
73 switch (config->aggr_mode) {
74 case AGGR_CORE:
75 fprintf(config->output, "S%d-D%d-C%*d%s%*d%s",
76 cpu_map__id_to_socket(id),
77 cpu_map__id_to_die(id),
78 config->csv_output ? 0 : -8,
79 cpu_map__id_to_cpu(id),
80 config->csv_sep,
81 config->csv_output ? 0 : 4,
82 nr,
83 config->csv_sep);
84 break;
85 case AGGR_DIE:
86 fprintf(config->output, "S%d-D%*d%s%*d%s",
87 cpu_map__id_to_socket(id << 16),
88 config->csv_output ? 0 : -8,
89 cpu_map__id_to_die(id << 16),
90 config->csv_sep,
91 config->csv_output ? 0 : 4,
92 nr,
93 config->csv_sep);
94 break;
95 case AGGR_SOCKET:
96 fprintf(config->output, "S%*d%s%*d%s",
97 config->csv_output ? 0 : -5,
98 id,
99 config->csv_sep,
100 config->csv_output ? 0 : 4,
101 nr,
102 config->csv_sep);
103 break;
104 case AGGR_NODE:
105 fprintf(config->output, "N%*d%s%*d%s",
106 config->csv_output ? 0 : -5,
107 id,
108 config->csv_sep,
109 config->csv_output ? 0 : 4,
110 nr,
111 config->csv_sep);
112 break;
113 case AGGR_NONE:
114 if (evsel->percore && !config->percore_show_thread) {
115 fprintf(config->output, "S%d-D%d-C%*d%s",
116 cpu_map__id_to_socket(id),
117 cpu_map__id_to_die(id),
118 config->csv_output ? 0 : -3,
119 cpu_map__id_to_cpu(id), config->csv_sep);
120 } else if (id > -1) {
121 fprintf(config->output, "CPU%*d%s",
122 config->csv_output ? 0 : -7,
123 evsel__cpus(evsel)->map[id],
124 config->csv_sep);
125 }
126 break;
127 case AGGR_THREAD:
128 fprintf(config->output, "%*s-%*d%s",
129 config->csv_output ? 0 : 16,
130 perf_thread_map__comm(evsel->core.threads, id),
131 config->csv_output ? 0 : -8,
132 perf_thread_map__pid(evsel->core.threads, id),
133 config->csv_sep);
134 break;
135 case AGGR_GLOBAL:
136 case AGGR_UNSET:
137 default:
138 break;
139 }
140}
141
142struct outstate {
143 FILE *fh;
144 bool newline;
145 const char *prefix;
146 int nfields;
147 int id, nr;
148 struct evsel *evsel;
149};
150
151#define METRIC_LEN 35
152
153static void new_line_std(struct perf_stat_config *config __maybe_unused,
154 void *ctx)
155{
156 struct outstate *os = ctx;
157
158 os->newline = true;
159}
160
161static void do_new_line_std(struct perf_stat_config *config,
162 struct outstate *os)
163{
164 fputc('\n', os->fh);
165 fputs(os->prefix, os->fh);
166 aggr_printout(config, os->evsel, os->id, os->nr);
167 if (config->aggr_mode == AGGR_NONE)
168 fprintf(os->fh, " ");
169 fprintf(os->fh, " ");
170}
171
172static void print_metric_std(struct perf_stat_config *config,
173 void *ctx, const char *color, const char *fmt,
174 const char *unit, double val)
175{
176 struct outstate *os = ctx;
177 FILE *out = os->fh;
178 int n;
179 bool newline = os->newline;
180
181 os->newline = false;
182
183 if (unit == NULL || fmt == NULL) {
184 fprintf(out, "%-*s", METRIC_LEN, "");
185 return;
186 }
187
188 if (newline)
189 do_new_line_std(config, os);
190
191 n = fprintf(out, " # ");
192 if (color)
193 n += color_fprintf(out, color, fmt, val);
194 else
195 n += fprintf(out, fmt, val);
196 fprintf(out, " %-*s", METRIC_LEN - n - 1, unit);
197}
198
199static void new_line_csv(struct perf_stat_config *config, void *ctx)
200{
201 struct outstate *os = ctx;
202 int i;
203
204 fputc('\n', os->fh);
205 if (os->prefix)
206 fprintf(os->fh, "%s%s", os->prefix, config->csv_sep);
207 aggr_printout(config, os->evsel, os->id, os->nr);
208 for (i = 0; i < os->nfields; i++)
209 fputs(config->csv_sep, os->fh);
210}
211
212static void print_metric_csv(struct perf_stat_config *config __maybe_unused,
213 void *ctx,
214 const char *color __maybe_unused,
215 const char *fmt, const char *unit, double val)
216{
217 struct outstate *os = ctx;
218 FILE *out = os->fh;
219 char buf[64], *vals, *ends;
220
221 if (unit == NULL || fmt == NULL) {
222 fprintf(out, "%s%s", config->csv_sep, config->csv_sep);
223 return;
224 }
225 snprintf(buf, sizeof(buf), fmt, val);
226 ends = vals = skip_spaces(buf);
227 while (isdigit(*ends) || *ends == '.')
228 ends++;
229 *ends = 0;
230 fprintf(out, "%s%s%s%s", config->csv_sep, vals, config->csv_sep, skip_spaces(unit));
231}
232
233
234
235static bool valid_only_metric(const char *unit)
236{
237 if (!unit)
238 return false;
239 if (strstr(unit, "/sec") ||
240 strstr(unit, "CPUs utilized"))
241 return false;
242 return true;
243}
244
245static const char *fixunit(char *buf, struct evsel *evsel,
246 const char *unit)
247{
248 if (!strncmp(unit, "of all", 6)) {
249 snprintf(buf, 1024, "%s %s", evsel__name(evsel),
250 unit);
251 return buf;
252 }
253 return unit;
254}
255
256static void print_metric_only(struct perf_stat_config *config,
257 void *ctx, const char *color, const char *fmt,
258 const char *unit, double val)
259{
260 struct outstate *os = ctx;
261 FILE *out = os->fh;
262 char buf[1024], str[1024];
263 unsigned mlen = config->metric_only_len;
264
265 if (!valid_only_metric(unit))
266 return;
267 unit = fixunit(buf, os->evsel, unit);
268 if (mlen < strlen(unit))
269 mlen = strlen(unit) + 1;
270
271 if (color)
272 mlen += strlen(color) + sizeof(PERF_COLOR_RESET) - 1;
273
274 color_snprintf(str, sizeof(str), color ?: "", fmt, val);
275 fprintf(out, "%*s ", mlen, str);
276}
277
278static void print_metric_only_csv(struct perf_stat_config *config __maybe_unused,
279 void *ctx, const char *color __maybe_unused,
280 const char *fmt,
281 const char *unit, double val)
282{
283 struct outstate *os = ctx;
284 FILE *out = os->fh;
285 char buf[64], *vals, *ends;
286 char tbuf[1024];
287
288 if (!valid_only_metric(unit))
289 return;
290 unit = fixunit(tbuf, os->evsel, unit);
291 snprintf(buf, sizeof buf, fmt, val);
292 ends = vals = skip_spaces(buf);
293 while (isdigit(*ends) || *ends == '.')
294 ends++;
295 *ends = 0;
296 fprintf(out, "%s%s", vals, config->csv_sep);
297}
298
299static void new_line_metric(struct perf_stat_config *config __maybe_unused,
300 void *ctx __maybe_unused)
301{
302}
303
304static void print_metric_header(struct perf_stat_config *config,
305 void *ctx, const char *color __maybe_unused,
306 const char *fmt __maybe_unused,
307 const char *unit, double val __maybe_unused)
308{
309 struct outstate *os = ctx;
310 char tbuf[1024];
311
312 if (!valid_only_metric(unit))
313 return;
314 unit = fixunit(tbuf, os->evsel, unit);
315 if (config->csv_output)
316 fprintf(os->fh, "%s%s", unit, config->csv_sep);
317 else
318 fprintf(os->fh, "%*s ", config->metric_only_len, unit);
319}
320
321static int first_shadow_cpu(struct perf_stat_config *config,
322 struct evsel *evsel, int id)
323{
324 struct evlist *evlist = evsel->evlist;
325 int i;
326
327 if (!config->aggr_get_id)
328 return 0;
329
330 if (config->aggr_mode == AGGR_NONE)
331 return id;
332
333 if (config->aggr_mode == AGGR_GLOBAL)
334 return 0;
335
336 for (i = 0; i < evsel__nr_cpus(evsel); i++) {
337 int cpu2 = evsel__cpus(evsel)->map[i];
338
339 if (config->aggr_get_id(config, evlist->core.cpus, cpu2) == id)
340 return cpu2;
341 }
342 return 0;
343}
344
345static void abs_printout(struct perf_stat_config *config,
346 int id, int nr, struct evsel *evsel, double avg)
347{
348 FILE *output = config->output;
349 double sc = evsel->scale;
350 const char *fmt;
351
352 if (config->csv_output) {
353 fmt = floor(sc) != sc ? "%.2f%s" : "%.0f%s";
354 } else {
355 if (config->big_num)
356 fmt = floor(sc) != sc ? "%'18.2f%s" : "%'18.0f%s";
357 else
358 fmt = floor(sc) != sc ? "%18.2f%s" : "%18.0f%s";
359 }
360
361 aggr_printout(config, evsel, id, nr);
362
363 fprintf(output, fmt, avg, config->csv_sep);
364
365 if (evsel->unit)
366 fprintf(output, "%-*s%s",
367 config->csv_output ? 0 : config->unit_width,
368 evsel->unit, config->csv_sep);
369
370 fprintf(output, "%-*s", config->csv_output ? 0 : 25, evsel__name(evsel));
371
372 print_cgroup(config, evsel);
373}
374
375static bool is_mixed_hw_group(struct evsel *counter)
376{
377 struct evlist *evlist = counter->evlist;
378 u32 pmu_type = counter->core.attr.type;
379 struct evsel *pos;
380
381 if (counter->core.nr_members < 2)
382 return false;
383
384 evlist__for_each_entry(evlist, pos) {
385
386 if (pos->core.attr.type == PERF_TYPE_SOFTWARE)
387 continue;
388 if (pmu_type == PERF_TYPE_SOFTWARE) {
389 pmu_type = pos->core.attr.type;
390 continue;
391 }
392 if (pmu_type != pos->core.attr.type)
393 return true;
394 }
395
396 return false;
397}
398
399static void printout(struct perf_stat_config *config, int id, int nr,
400 struct evsel *counter, double uval,
401 char *prefix, u64 run, u64 ena, double noise,
402 struct runtime_stat *st)
403{
404 struct perf_stat_output_ctx out;
405 struct outstate os = {
406 .fh = config->output,
407 .prefix = prefix ? prefix : "",
408 .id = id,
409 .nr = nr,
410 .evsel = counter,
411 };
412 print_metric_t pm = print_metric_std;
413 new_line_t nl;
414
415 if (config->metric_only) {
416 nl = new_line_metric;
417 if (config->csv_output)
418 pm = print_metric_only_csv;
419 else
420 pm = print_metric_only;
421 } else
422 nl = new_line_std;
423
424 if (config->csv_output && !config->metric_only) {
425 static int aggr_fields[] = {
426 [AGGR_GLOBAL] = 0,
427 [AGGR_THREAD] = 1,
428 [AGGR_NONE] = 1,
429 [AGGR_SOCKET] = 2,
430 [AGGR_DIE] = 2,
431 [AGGR_CORE] = 2,
432 };
433
434 pm = print_metric_csv;
435 nl = new_line_csv;
436 os.nfields = 3;
437 os.nfields += aggr_fields[config->aggr_mode];
438 if (counter->cgrp)
439 os.nfields++;
440 }
441 if (run == 0 || ena == 0 || counter->counts->scaled == -1) {
442 if (config->metric_only) {
443 pm(config, &os, NULL, "", "", 0);
444 return;
445 }
446 aggr_printout(config, counter, id, nr);
447
448 fprintf(config->output, "%*s%s",
449 config->csv_output ? 0 : 18,
450 counter->supported ? CNTR_NOT_COUNTED : CNTR_NOT_SUPPORTED,
451 config->csv_sep);
452
453 if (counter->supported) {
454 config->print_free_counters_hint = 1;
455 if (is_mixed_hw_group(counter))
456 config->print_mixed_hw_group_error = 1;
457 }
458
459 fprintf(config->output, "%-*s%s",
460 config->csv_output ? 0 : config->unit_width,
461 counter->unit, config->csv_sep);
462
463 fprintf(config->output, "%*s",
464 config->csv_output ? 0 : -25, evsel__name(counter));
465
466 print_cgroup(config, counter);
467
468 if (!config->csv_output)
469 pm(config, &os, NULL, NULL, "", 0);
470 print_noise(config, counter, noise);
471 print_running(config, run, ena);
472 if (config->csv_output)
473 pm(config, &os, NULL, NULL, "", 0);
474 return;
475 }
476
477 if (!config->metric_only)
478 abs_printout(config, id, nr, counter, uval);
479
480 out.print_metric = pm;
481 out.new_line = nl;
482 out.ctx = &os;
483 out.force_header = false;
484
485 if (config->csv_output && !config->metric_only) {
486 print_noise(config, counter, noise);
487 print_running(config, run, ena);
488 }
489
490 perf_stat__print_shadow_stats(config, counter, uval,
491 first_shadow_cpu(config, counter, id),
492 &out, &config->metric_events, st);
493 if (!config->csv_output && !config->metric_only) {
494 print_noise(config, counter, noise);
495 print_running(config, run, ena);
496 }
497}
498
499static void aggr_update_shadow(struct perf_stat_config *config,
500 struct evlist *evlist)
501{
502 int cpu, s2, id, s;
503 u64 val;
504 struct evsel *counter;
505
506 for (s = 0; s < config->aggr_map->nr; s++) {
507 id = config->aggr_map->map[s];
508 evlist__for_each_entry(evlist, counter) {
509 val = 0;
510 for (cpu = 0; cpu < evsel__nr_cpus(counter); cpu++) {
511 s2 = config->aggr_get_id(config, evlist->core.cpus, cpu);
512 if (s2 != id)
513 continue;
514 val += perf_counts(counter->counts, cpu, 0)->val;
515 }
516 perf_stat__update_shadow_stats(counter, val,
517 first_shadow_cpu(config, counter, id),
518 &rt_stat);
519 }
520 }
521}
522
523static void uniquify_event_name(struct evsel *counter)
524{
525 char *new_name;
526 char *config;
527
528 if (counter->uniquified_name ||
529 !counter->pmu_name || !strncmp(counter->name, counter->pmu_name,
530 strlen(counter->pmu_name)))
531 return;
532
533 config = strchr(counter->name, '/');
534 if (config) {
535 if (asprintf(&new_name,
536 "%s%s", counter->pmu_name, config) > 0) {
537 free(counter->name);
538 counter->name = new_name;
539 }
540 } else {
541 if (asprintf(&new_name,
542 "%s [%s]", counter->name, counter->pmu_name) > 0) {
543 free(counter->name);
544 counter->name = new_name;
545 }
546 }
547
548 counter->uniquified_name = true;
549}
550
551static void collect_all_aliases(struct perf_stat_config *config, struct evsel *counter,
552 void (*cb)(struct perf_stat_config *config, struct evsel *counter, void *data,
553 bool first),
554 void *data)
555{
556 struct evlist *evlist = counter->evlist;
557 struct evsel *alias;
558
559 alias = list_prepare_entry(counter, &(evlist->core.entries), core.node);
560 list_for_each_entry_continue (alias, &evlist->core.entries, core.node) {
561 if (strcmp(evsel__name(alias), evsel__name(counter)) ||
562 alias->scale != counter->scale ||
563 alias->cgrp != counter->cgrp ||
564 strcmp(alias->unit, counter->unit) ||
565 evsel__is_clock(alias) != evsel__is_clock(counter) ||
566 !strcmp(alias->pmu_name, counter->pmu_name))
567 break;
568 alias->merged_stat = true;
569 cb(config, alias, data, false);
570 }
571}
572
573static bool collect_data(struct perf_stat_config *config, struct evsel *counter,
574 void (*cb)(struct perf_stat_config *config, struct evsel *counter, void *data,
575 bool first),
576 void *data)
577{
578 if (counter->merged_stat)
579 return false;
580 cb(config, counter, data, true);
581 if (config->no_merge)
582 uniquify_event_name(counter);
583 else if (counter->auto_merge_stats)
584 collect_all_aliases(config, counter, cb, data);
585 return true;
586}
587
588struct aggr_data {
589 u64 ena, run, val;
590 int id;
591 int nr;
592 int cpu;
593};
594
595static void aggr_cb(struct perf_stat_config *config,
596 struct evsel *counter, void *data, bool first)
597{
598 struct aggr_data *ad = data;
599 int cpu, s2;
600
601 for (cpu = 0; cpu < evsel__nr_cpus(counter); cpu++) {
602 struct perf_counts_values *counts;
603
604 s2 = config->aggr_get_id(config, evsel__cpus(counter), cpu);
605 if (s2 != ad->id)
606 continue;
607 if (first)
608 ad->nr++;
609 counts = perf_counts(counter->counts, cpu, 0);
610
611
612
613
614 if (counts->ena == 0 || counts->run == 0 ||
615 counter->counts->scaled == -1) {
616 ad->ena = 0;
617 ad->run = 0;
618 break;
619 }
620 ad->val += counts->val;
621 ad->ena += counts->ena;
622 ad->run += counts->run;
623 }
624}
625
626static void print_counter_aggrdata(struct perf_stat_config *config,
627 struct evsel *counter, int s,
628 char *prefix, bool metric_only,
629 bool *first, int cpu)
630{
631 struct aggr_data ad;
632 FILE *output = config->output;
633 u64 ena, run, val;
634 int id, nr;
635 double uval;
636
637 ad.id = id = config->aggr_map->map[s];
638 ad.val = ad.ena = ad.run = 0;
639 ad.nr = 0;
640 if (!collect_data(config, counter, aggr_cb, &ad))
641 return;
642
643 nr = ad.nr;
644 ena = ad.ena;
645 run = ad.run;
646 val = ad.val;
647 if (*first && metric_only) {
648 *first = false;
649 aggr_printout(config, counter, id, nr);
650 }
651 if (prefix && !metric_only)
652 fprintf(output, "%s", prefix);
653
654 uval = val * counter->scale;
655 printout(config, cpu != -1 ? cpu : id, nr, counter, uval, prefix,
656 run, ena, 1.0, &rt_stat);
657 if (!metric_only)
658 fputc('\n', output);
659}
660
661static void print_aggr(struct perf_stat_config *config,
662 struct evlist *evlist,
663 char *prefix)
664{
665 bool metric_only = config->metric_only;
666 FILE *output = config->output;
667 struct evsel *counter;
668 int s;
669 bool first;
670
671 if (!config->aggr_map || !config->aggr_get_id)
672 return;
673
674 aggr_update_shadow(config, evlist);
675
676
677
678
679
680 for (s = 0; s < config->aggr_map->nr; s++) {
681 if (prefix && metric_only)
682 fprintf(output, "%s", prefix);
683
684 first = true;
685 evlist__for_each_entry(evlist, counter) {
686 print_counter_aggrdata(config, counter, s,
687 prefix, metric_only,
688 &first, -1);
689 }
690 if (metric_only)
691 fputc('\n', output);
692 }
693}
694
695static int cmp_val(const void *a, const void *b)
696{
697 return ((struct perf_aggr_thread_value *)b)->val -
698 ((struct perf_aggr_thread_value *)a)->val;
699}
700
701static struct perf_aggr_thread_value *sort_aggr_thread(
702 struct evsel *counter,
703 int nthreads, int ncpus,
704 int *ret,
705 struct target *_target)
706{
707 int cpu, thread, i = 0;
708 double uval;
709 struct perf_aggr_thread_value *buf;
710
711 buf = calloc(nthreads, sizeof(struct perf_aggr_thread_value));
712 if (!buf)
713 return NULL;
714
715 for (thread = 0; thread < nthreads; thread++) {
716 u64 ena = 0, run = 0, val = 0;
717
718 for (cpu = 0; cpu < ncpus; cpu++) {
719 val += perf_counts(counter->counts, cpu, thread)->val;
720 ena += perf_counts(counter->counts, cpu, thread)->ena;
721 run += perf_counts(counter->counts, cpu, thread)->run;
722 }
723
724 uval = val * counter->scale;
725
726
727
728
729
730 if (uval == 0.0 && target__has_per_thread(_target))
731 continue;
732
733 buf[i].counter = counter;
734 buf[i].id = thread;
735 buf[i].uval = uval;
736 buf[i].val = val;
737 buf[i].run = run;
738 buf[i].ena = ena;
739 i++;
740 }
741
742 qsort(buf, i, sizeof(struct perf_aggr_thread_value), cmp_val);
743
744 if (ret)
745 *ret = i;
746
747 return buf;
748}
749
750static void print_aggr_thread(struct perf_stat_config *config,
751 struct target *_target,
752 struct evsel *counter, char *prefix)
753{
754 FILE *output = config->output;
755 int nthreads = perf_thread_map__nr(counter->core.threads);
756 int ncpus = perf_cpu_map__nr(counter->core.cpus);
757 int thread, sorted_threads, id;
758 struct perf_aggr_thread_value *buf;
759
760 buf = sort_aggr_thread(counter, nthreads, ncpus, &sorted_threads, _target);
761 if (!buf) {
762 perror("cannot sort aggr thread");
763 return;
764 }
765
766 for (thread = 0; thread < sorted_threads; thread++) {
767 if (prefix)
768 fprintf(output, "%s", prefix);
769
770 id = buf[thread].id;
771 if (config->stats)
772 printout(config, id, 0, buf[thread].counter, buf[thread].uval,
773 prefix, buf[thread].run, buf[thread].ena, 1.0,
774 &config->stats[id]);
775 else
776 printout(config, id, 0, buf[thread].counter, buf[thread].uval,
777 prefix, buf[thread].run, buf[thread].ena, 1.0,
778 &rt_stat);
779 fputc('\n', output);
780 }
781
782 free(buf);
783}
784
785struct caggr_data {
786 double avg, avg_enabled, avg_running;
787};
788
789static void counter_aggr_cb(struct perf_stat_config *config __maybe_unused,
790 struct evsel *counter, void *data,
791 bool first __maybe_unused)
792{
793 struct caggr_data *cd = data;
794 struct perf_stat_evsel *ps = counter->stats;
795
796 cd->avg += avg_stats(&ps->res_stats[0]);
797 cd->avg_enabled += avg_stats(&ps->res_stats[1]);
798 cd->avg_running += avg_stats(&ps->res_stats[2]);
799}
800
801
802
803
804
805static void print_counter_aggr(struct perf_stat_config *config,
806 struct evsel *counter, char *prefix)
807{
808 bool metric_only = config->metric_only;
809 FILE *output = config->output;
810 double uval;
811 struct caggr_data cd = { .avg = 0.0 };
812
813 if (!collect_data(config, counter, counter_aggr_cb, &cd))
814 return;
815
816 if (prefix && !metric_only)
817 fprintf(output, "%s", prefix);
818
819 uval = cd.avg * counter->scale;
820 printout(config, -1, 0, counter, uval, prefix, cd.avg_running, cd.avg_enabled,
821 cd.avg, &rt_stat);
822 if (!metric_only)
823 fprintf(output, "\n");
824}
825
826static void counter_cb(struct perf_stat_config *config __maybe_unused,
827 struct evsel *counter, void *data,
828 bool first __maybe_unused)
829{
830 struct aggr_data *ad = data;
831
832 ad->val += perf_counts(counter->counts, ad->cpu, 0)->val;
833 ad->ena += perf_counts(counter->counts, ad->cpu, 0)->ena;
834 ad->run += perf_counts(counter->counts, ad->cpu, 0)->run;
835}
836
837
838
839
840
841static void print_counter(struct perf_stat_config *config,
842 struct evsel *counter, char *prefix)
843{
844 FILE *output = config->output;
845 u64 ena, run, val;
846 double uval;
847 int cpu;
848
849 for (cpu = 0; cpu < evsel__nr_cpus(counter); cpu++) {
850 struct aggr_data ad = { .cpu = cpu };
851
852 if (!collect_data(config, counter, counter_cb, &ad))
853 return;
854 val = ad.val;
855 ena = ad.ena;
856 run = ad.run;
857
858 if (prefix)
859 fprintf(output, "%s", prefix);
860
861 uval = val * counter->scale;
862 printout(config, cpu, 0, counter, uval, prefix, run, ena, 1.0,
863 &rt_stat);
864
865 fputc('\n', output);
866 }
867}
868
869static void print_no_aggr_metric(struct perf_stat_config *config,
870 struct evlist *evlist,
871 char *prefix)
872{
873 int cpu;
874 int nrcpus = 0;
875 struct evsel *counter;
876 u64 ena, run, val;
877 double uval;
878
879 nrcpus = evlist->core.cpus->nr;
880 for (cpu = 0; cpu < nrcpus; cpu++) {
881 bool first = true;
882
883 if (prefix)
884 fputs(prefix, config->output);
885 evlist__for_each_entry(evlist, counter) {
886 if (first) {
887 aggr_printout(config, counter, cpu, 0);
888 first = false;
889 }
890 val = perf_counts(counter->counts, cpu, 0)->val;
891 ena = perf_counts(counter->counts, cpu, 0)->ena;
892 run = perf_counts(counter->counts, cpu, 0)->run;
893
894 uval = val * counter->scale;
895 printout(config, cpu, 0, counter, uval, prefix, run, ena, 1.0,
896 &rt_stat);
897 }
898 fputc('\n', config->output);
899 }
900}
901
902static int aggr_header_lens[] = {
903 [AGGR_CORE] = 24,
904 [AGGR_DIE] = 18,
905 [AGGR_SOCKET] = 12,
906 [AGGR_NONE] = 6,
907 [AGGR_THREAD] = 24,
908 [AGGR_GLOBAL] = 0,
909};
910
911static const char *aggr_header_csv[] = {
912 [AGGR_CORE] = "core,cpus,",
913 [AGGR_DIE] = "die,cpus",
914 [AGGR_SOCKET] = "socket,cpus",
915 [AGGR_NONE] = "cpu,",
916 [AGGR_THREAD] = "comm-pid,",
917 [AGGR_GLOBAL] = ""
918};
919
920static void print_metric_headers(struct perf_stat_config *config,
921 struct evlist *evlist,
922 const char *prefix, bool no_indent)
923{
924 struct perf_stat_output_ctx out;
925 struct evsel *counter;
926 struct outstate os = {
927 .fh = config->output
928 };
929
930 if (prefix)
931 fprintf(config->output, "%s", prefix);
932
933 if (!config->csv_output && !no_indent)
934 fprintf(config->output, "%*s",
935 aggr_header_lens[config->aggr_mode], "");
936 if (config->csv_output) {
937 if (config->interval)
938 fputs("time,", config->output);
939 fputs(aggr_header_csv[config->aggr_mode], config->output);
940 }
941
942
943 evlist__for_each_entry(evlist, counter) {
944 os.evsel = counter;
945 out.ctx = &os;
946 out.print_metric = print_metric_header;
947 out.new_line = new_line_metric;
948 out.force_header = true;
949 os.evsel = counter;
950 perf_stat__print_shadow_stats(config, counter, 0,
951 0,
952 &out,
953 &config->metric_events,
954 &rt_stat);
955 }
956 fputc('\n', config->output);
957}
958
959static void print_interval(struct perf_stat_config *config,
960 struct evlist *evlist,
961 char *prefix, struct timespec *ts)
962{
963 bool metric_only = config->metric_only;
964 unsigned int unit_width = config->unit_width;
965 FILE *output = config->output;
966 static int num_print_interval;
967
968 if (config->interval_clear)
969 puts(CONSOLE_CLEAR);
970
971 sprintf(prefix, "%6lu.%09lu%s", ts->tv_sec, ts->tv_nsec, config->csv_sep);
972
973 if ((num_print_interval == 0 && !config->csv_output) || config->interval_clear) {
974 switch (config->aggr_mode) {
975 case AGGR_NODE:
976 fprintf(output, "# time node cpus");
977 if (!metric_only)
978 fprintf(output, " counts %*s events\n", unit_width, "unit");
979 break;
980 case AGGR_SOCKET:
981 fprintf(output, "# time socket cpus");
982 if (!metric_only)
983 fprintf(output, " counts %*s events\n", unit_width, "unit");
984 break;
985 case AGGR_DIE:
986 fprintf(output, "# time die cpus");
987 if (!metric_only)
988 fprintf(output, " counts %*s events\n", unit_width, "unit");
989 break;
990 case AGGR_CORE:
991 fprintf(output, "# time core cpus");
992 if (!metric_only)
993 fprintf(output, " counts %*s events\n", unit_width, "unit");
994 break;
995 case AGGR_NONE:
996 fprintf(output, "# time CPU ");
997 if (!metric_only)
998 fprintf(output, " counts %*s events\n", unit_width, "unit");
999 break;
1000 case AGGR_THREAD:
1001 fprintf(output, "# time comm-pid");
1002 if (!metric_only)
1003 fprintf(output, " counts %*s events\n", unit_width, "unit");
1004 break;
1005 case AGGR_GLOBAL:
1006 default:
1007 fprintf(output, "# time");
1008 if (!metric_only)
1009 fprintf(output, " counts %*s events\n", unit_width, "unit");
1010 case AGGR_UNSET:
1011 break;
1012 }
1013 }
1014
1015 if ((num_print_interval == 0 || config->interval_clear) && metric_only)
1016 print_metric_headers(config, evlist, " ", true);
1017 if (++num_print_interval == 25)
1018 num_print_interval = 0;
1019}
1020
1021static void print_header(struct perf_stat_config *config,
1022 struct target *_target,
1023 int argc, const char **argv)
1024{
1025 FILE *output = config->output;
1026 int i;
1027
1028 fflush(stdout);
1029
1030 if (!config->csv_output) {
1031 fprintf(output, "\n");
1032 fprintf(output, " Performance counter stats for ");
1033 if (_target->system_wide)
1034 fprintf(output, "\'system wide");
1035 else if (_target->cpu_list)
1036 fprintf(output, "\'CPU(s) %s", _target->cpu_list);
1037 else if (!target__has_task(_target)) {
1038 fprintf(output, "\'%s", argv ? argv[0] : "pipe");
1039 for (i = 1; argv && (i < argc); i++)
1040 fprintf(output, " %s", argv[i]);
1041 } else if (_target->pid)
1042 fprintf(output, "process id \'%s", _target->pid);
1043 else
1044 fprintf(output, "thread id \'%s", _target->tid);
1045
1046 fprintf(output, "\'");
1047 if (config->run_count > 1)
1048 fprintf(output, " (%d runs)", config->run_count);
1049 fprintf(output, ":\n\n");
1050 }
1051}
1052
1053static int get_precision(double num)
1054{
1055 if (num > 1)
1056 return 0;
1057
1058 return lround(ceil(-log10(num)));
1059}
1060
1061static void print_table(struct perf_stat_config *config,
1062 FILE *output, int precision, double avg)
1063{
1064 char tmp[64];
1065 int idx, indent = 0;
1066
1067 scnprintf(tmp, 64, " %17.*f", precision, avg);
1068 while (tmp[indent] == ' ')
1069 indent++;
1070
1071 fprintf(output, "%*s# Table of individual measurements:\n", indent, "");
1072
1073 for (idx = 0; idx < config->run_count; idx++) {
1074 double run = (double) config->walltime_run[idx] / NSEC_PER_SEC;
1075 int h, n = 1 + abs((int) (100.0 * (run - avg)/run) / 5);
1076
1077 fprintf(output, " %17.*f (%+.*f) ",
1078 precision, run, precision, run - avg);
1079
1080 for (h = 0; h < n; h++)
1081 fprintf(output, "#");
1082
1083 fprintf(output, "\n");
1084 }
1085
1086 fprintf(output, "\n%*s# Final result:\n", indent, "");
1087}
1088
1089static double timeval2double(struct timeval *t)
1090{
1091 return t->tv_sec + (double) t->tv_usec/USEC_PER_SEC;
1092}
1093
1094static void print_footer(struct perf_stat_config *config)
1095{
1096 double avg = avg_stats(config->walltime_nsecs_stats) / NSEC_PER_SEC;
1097 FILE *output = config->output;
1098
1099 if (!config->null_run)
1100 fprintf(output, "\n");
1101
1102 if (config->run_count == 1) {
1103 fprintf(output, " %17.9f seconds time elapsed", avg);
1104
1105 if (config->ru_display) {
1106 double ru_utime = timeval2double(&config->ru_data.ru_utime);
1107 double ru_stime = timeval2double(&config->ru_data.ru_stime);
1108
1109 fprintf(output, "\n\n");
1110 fprintf(output, " %17.9f seconds user\n", ru_utime);
1111 fprintf(output, " %17.9f seconds sys\n", ru_stime);
1112 }
1113 } else {
1114 double sd = stddev_stats(config->walltime_nsecs_stats) / NSEC_PER_SEC;
1115
1116
1117
1118
1119 int precision = get_precision(sd) + 2;
1120
1121 if (config->walltime_run_table)
1122 print_table(config, output, precision, avg);
1123
1124 fprintf(output, " %17.*f +- %.*f seconds time elapsed",
1125 precision, avg, precision, sd);
1126
1127 print_noise_pct(config, sd, avg);
1128 }
1129 fprintf(output, "\n\n");
1130
1131 if (config->print_free_counters_hint && sysctl__nmi_watchdog_enabled())
1132 fprintf(output,
1133"Some events weren't counted. Try disabling the NMI watchdog:\n"
1134" echo 0 > /proc/sys/kernel/nmi_watchdog\n"
1135" perf stat ...\n"
1136" echo 1 > /proc/sys/kernel/nmi_watchdog\n");
1137
1138 if (config->print_mixed_hw_group_error)
1139 fprintf(output,
1140 "The events in group usually have to be from "
1141 "the same PMU. Try reorganizing the group.\n");
1142}
1143
1144static void print_percore_thread(struct perf_stat_config *config,
1145 struct evsel *counter, char *prefix)
1146{
1147 int s, s2, id;
1148 bool first = true;
1149
1150 for (int i = 0; i < evsel__nr_cpus(counter); i++) {
1151 s2 = config->aggr_get_id(config, evsel__cpus(counter), i);
1152 for (s = 0; s < config->aggr_map->nr; s++) {
1153 id = config->aggr_map->map[s];
1154 if (s2 == id)
1155 break;
1156 }
1157
1158 print_counter_aggrdata(config, counter, s,
1159 prefix, false,
1160 &first, i);
1161 }
1162}
1163
1164static void print_percore(struct perf_stat_config *config,
1165 struct evsel *counter, char *prefix)
1166{
1167 bool metric_only = config->metric_only;
1168 FILE *output = config->output;
1169 int s;
1170 bool first = true;
1171
1172 if (!config->aggr_map || !config->aggr_get_id)
1173 return;
1174
1175 if (config->percore_show_thread)
1176 return print_percore_thread(config, counter, prefix);
1177
1178 for (s = 0; s < config->aggr_map->nr; s++) {
1179 if (prefix && metric_only)
1180 fprintf(output, "%s", prefix);
1181
1182 print_counter_aggrdata(config, counter, s,
1183 prefix, metric_only,
1184 &first, -1);
1185 }
1186
1187 if (metric_only)
1188 fputc('\n', output);
1189}
1190
1191void
1192perf_evlist__print_counters(struct evlist *evlist,
1193 struct perf_stat_config *config,
1194 struct target *_target,
1195 struct timespec *ts,
1196 int argc, const char **argv)
1197{
1198 bool metric_only = config->metric_only;
1199 int interval = config->interval;
1200 struct evsel *counter;
1201 char buf[64], *prefix = NULL;
1202
1203 if (interval)
1204 print_interval(config, evlist, prefix = buf, ts);
1205 else
1206 print_header(config, _target, argc, argv);
1207
1208 if (metric_only) {
1209 static int num_print_iv;
1210
1211 if (num_print_iv == 0 && !interval)
1212 print_metric_headers(config, evlist, prefix, false);
1213 if (num_print_iv++ == 25)
1214 num_print_iv = 0;
1215 if (config->aggr_mode == AGGR_GLOBAL && prefix)
1216 fprintf(config->output, "%s", prefix);
1217 }
1218
1219 switch (config->aggr_mode) {
1220 case AGGR_CORE:
1221 case AGGR_DIE:
1222 case AGGR_SOCKET:
1223 case AGGR_NODE:
1224 print_aggr(config, evlist, prefix);
1225 break;
1226 case AGGR_THREAD:
1227 evlist__for_each_entry(evlist, counter) {
1228 print_aggr_thread(config, _target, counter, prefix);
1229 }
1230 break;
1231 case AGGR_GLOBAL:
1232 evlist__for_each_entry(evlist, counter) {
1233 print_counter_aggr(config, counter, prefix);
1234 }
1235 if (metric_only)
1236 fputc('\n', config->output);
1237 break;
1238 case AGGR_NONE:
1239 if (metric_only)
1240 print_no_aggr_metric(config, evlist, prefix);
1241 else {
1242 evlist__for_each_entry(evlist, counter) {
1243 if (counter->percore)
1244 print_percore(config, counter, prefix);
1245 else
1246 print_counter(config, counter, prefix);
1247 }
1248 }
1249 break;
1250 case AGGR_UNSET:
1251 default:
1252 break;
1253 }
1254
1255 if (!interval && !config->csv_output)
1256 print_footer(config);
1257
1258 fflush(config->output);
1259}
1260
