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 <perf/cpumap.h>
8 #include "color.h"
9 #include "counts.h"
10 #include "debug.h"
11 #include "evlist.h"
12 #include "evsel.h"
13 #include "stat.h"
14 #include "top.h"
15 #include "thread_map.h"
16 #include "cpumap.h"
17 #include "string2.h"
18 #include <linux/ctype.h>
19 #include "cgroup.h"
20 #include <api/fs/fs.h>
21 #include "util.h"
22 #include "iostat.h"
23 #include "pmu.h"
24 #include "pmus.h"
25 #include "tool_pmu.h"
26 
27 #define CNTR_NOT_SUPPORTED	"<not supported>"
28 #define CNTR_NOT_COUNTED	"<not counted>"
29 
30 #define MGROUP_LEN   50
31 #define METRIC_LEN   38
32 #define EVNAME_LEN   32
33 #define COUNTS_LEN   18
34 #define INTERVAL_LEN 16
35 #define CGROUP_LEN   16
36 #define COMM_LEN     16
37 #define PID_LEN       7
38 #define CPUS_LEN      4
39 
40 static int aggr_header_lens[] = {
41 	[AGGR_CORE] 	= 18,
42 	[AGGR_CACHE]	= 22,
43 	[AGGR_CLUSTER]	= 20,
44 	[AGGR_DIE] 	= 12,
45 	[AGGR_SOCKET] 	= 6,
46 	[AGGR_NODE] 	= 6,
47 	[AGGR_NONE] 	= 6,
48 	[AGGR_THREAD] 	= 16,
49 	[AGGR_GLOBAL] 	= 0,
50 };
51 
52 static const char *aggr_header_csv[] = {
53 	[AGGR_CORE] 	= 	"core,cpus,",
54 	[AGGR_CACHE]	= 	"cache,cpus,",
55 	[AGGR_CLUSTER]	= 	"cluster,cpus,",
56 	[AGGR_DIE] 	= 	"die,cpus,",
57 	[AGGR_SOCKET] 	= 	"socket,cpus,",
58 	[AGGR_NONE] 	= 	"cpu,",
59 	[AGGR_THREAD] 	= 	"comm-pid,",
60 	[AGGR_NODE] 	= 	"node,",
61 	[AGGR_GLOBAL] 	=	""
62 };
63 
64 static const char *aggr_header_std[] = {
65 	[AGGR_CORE] 	= 	"core",
66 	[AGGR_CACHE] 	= 	"cache",
67 	[AGGR_CLUSTER]	= 	"cluster",
68 	[AGGR_DIE] 	= 	"die",
69 	[AGGR_SOCKET] 	= 	"socket",
70 	[AGGR_NONE] 	= 	"cpu",
71 	[AGGR_THREAD] 	= 	"comm-pid",
72 	[AGGR_NODE] 	= 	"node",
73 	[AGGR_GLOBAL] 	=	""
74 };
75 
metric_threshold_classify__color(enum metric_threshold_classify thresh)76 const char *metric_threshold_classify__color(enum metric_threshold_classify thresh)
77 {
78 	const char * const colors[] = {
79 		"", /* unknown */
80 		PERF_COLOR_RED,     /* bad */
81 		PERF_COLOR_MAGENTA, /* nearly bad */
82 		PERF_COLOR_YELLOW,  /* less good */
83 		PERF_COLOR_GREEN,   /* good */
84 	};
85 	static_assert(ARRAY_SIZE(colors) - 1  == METRIC_THRESHOLD_GOOD, "missing enum value");
86 	return colors[thresh];
87 }
88 
metric_threshold_classify__str(enum metric_threshold_classify thresh)89 static const char *metric_threshold_classify__str(enum metric_threshold_classify thresh)
90 {
91 	const char * const strs[] = {
92 		"unknown",
93 		"bad",
94 		"nearly bad",
95 		"less good",
96 		"good",
97 	};
98 	static_assert(ARRAY_SIZE(strs) - 1  == METRIC_THRESHOLD_GOOD, "missing enum value");
99 	return strs[thresh];
100 }
101 
print_running_std(struct perf_stat_config * config,u64 run,u64 ena)102 static void print_running_std(struct perf_stat_config *config, u64 run, u64 ena)
103 {
104 	if (run != ena)
105 		fprintf(config->output, "  (%.2f%%)", 100.0 * run / ena);
106 }
107 
print_running_csv(struct perf_stat_config * config,u64 run,u64 ena)108 static void print_running_csv(struct perf_stat_config *config, u64 run, u64 ena)
109 {
110 	double enabled_percent = 100;
111 
112 	if (run != ena)
113 		enabled_percent = 100 * run / ena;
114 	fprintf(config->output, "%s%" PRIu64 "%s%.2f",
115 		config->csv_sep, run, config->csv_sep, enabled_percent);
116 }
117 struct outstate {
118 	/* Std mode: insert a newline before the next metric */
119 	bool newline;
120 	/* JSON mode: track need for comma for a previous field or not */
121 	bool first;
122 	/* Num CSV separators remaining to pad out when not all fields are printed */
123 	int  csv_col_pad;
124 
125 	/*
126 	 * The following don't track state across fields, but are here as a shortcut to
127 	 * pass data to the print functions. The alternative would be to update the
128 	 * function signatures of the entire print stack to pass them through.
129 	 */
130 	/* Place to output to */
131 	FILE * const fh;
132 	/* Lines are timestamped in --interval-print mode */
133 	char timestamp[64];
134 	/* Num items aggregated in current line. See struct perf_stat_aggr.nr */
135 	int aggr_nr;
136 	/* Core/socket/die etc ID for the current line */
137 	struct aggr_cpu_id id;
138 	/* Event for current line */
139 	struct evsel *evsel;
140 	/* Cgroup for current line */
141 	struct cgroup *cgrp;
142 };
143 
json_sep(struct outstate * os)144 static const char *json_sep(struct outstate *os)
145 {
146 	const char *sep = os->first ? "" : ", ";
147 
148 	os->first = false;
149 	return sep;
150 }
151 
152 #define json_out(os, format, ...) fprintf((os)->fh, "%s" format, json_sep(os), ##__VA_ARGS__)
153 
print_running_json(struct outstate * os,u64 run,u64 ena)154 static void print_running_json(struct outstate *os, u64 run, u64 ena)
155 {
156 	double enabled_percent = 100;
157 
158 	if (run != ena)
159 		enabled_percent = 100 * run / ena;
160 	json_out(os, "\"event-runtime\" : %" PRIu64 ", \"pcnt-running\" : %.2f",
161 		 run, enabled_percent);
162 }
163 
print_running(struct perf_stat_config * config,struct outstate * os,u64 run,u64 ena,bool before_metric)164 static void print_running(struct perf_stat_config *config, struct outstate *os,
165 			  u64 run, u64 ena, bool before_metric)
166 {
167 	if (config->json_output) {
168 		if (before_metric)
169 			print_running_json(os, run, ena);
170 	} else if (config->csv_output) {
171 		if (before_metric)
172 			print_running_csv(config, run, ena);
173 	} else {
174 		if (!before_metric)
175 			print_running_std(config, run, ena);
176 	}
177 }
178 
print_noise_pct_std(struct perf_stat_config * config,double pct)179 static void print_noise_pct_std(struct perf_stat_config *config,
180 				double pct)
181 {
182 	if (pct)
183 		fprintf(config->output, "  ( +-%6.2f%% )", pct);
184 }
185 
print_noise_pct_csv(struct perf_stat_config * config,double pct)186 static void print_noise_pct_csv(struct perf_stat_config *config,
187 				double pct)
188 {
189 	fprintf(config->output, "%s%.2f%%", config->csv_sep, pct);
190 }
191 
print_noise_pct_json(struct outstate * os,double pct)192 static void print_noise_pct_json(struct outstate *os,
193 				 double pct)
194 {
195 	json_out(os, "\"variance\" : %.2f", pct);
196 }
197 
print_noise_pct(struct perf_stat_config * config,struct outstate * os,double total,double avg,bool before_metric)198 static void print_noise_pct(struct perf_stat_config *config, struct outstate *os,
199 			    double total, double avg, bool before_metric)
200 {
201 	double pct = rel_stddev_stats(total, avg);
202 
203 	if (config->json_output) {
204 		if (before_metric)
205 			print_noise_pct_json(os, pct);
206 	} else if (config->csv_output) {
207 		if (before_metric)
208 			print_noise_pct_csv(config, pct);
209 	} else {
210 		if (!before_metric)
211 			print_noise_pct_std(config, pct);
212 	}
213 }
214 
print_noise(struct perf_stat_config * config,struct outstate * os,struct evsel * evsel,double avg,bool before_metric)215 static void print_noise(struct perf_stat_config *config, struct outstate *os,
216 			struct evsel *evsel, double avg, bool before_metric)
217 {
218 	struct perf_stat_evsel *ps;
219 
220 	if (config->run_count == 1)
221 		return;
222 
223 	ps = evsel->stats;
224 	print_noise_pct(config, os, stddev_stats(&ps->res_stats), avg, before_metric);
225 }
226 
print_cgroup_std(struct perf_stat_config * config,const char * cgrp_name)227 static void print_cgroup_std(struct perf_stat_config *config, const char *cgrp_name)
228 {
229 	fprintf(config->output, " %-*s", CGROUP_LEN, cgrp_name);
230 }
231 
print_cgroup_csv(struct perf_stat_config * config,const char * cgrp_name)232 static void print_cgroup_csv(struct perf_stat_config *config, const char *cgrp_name)
233 {
234 	fprintf(config->output, "%s%s", config->csv_sep, cgrp_name);
235 }
236 
print_cgroup_json(struct outstate * os,const char * cgrp_name)237 static void print_cgroup_json(struct outstate *os, const char *cgrp_name)
238 {
239 	json_out(os, "\"cgroup\" : \"%s\"", cgrp_name);
240 }
241 
print_cgroup(struct perf_stat_config * config,struct outstate * os,struct cgroup * cgrp)242 static void print_cgroup(struct perf_stat_config *config, struct outstate *os,
243 			 struct cgroup *cgrp)
244 {
245 	if (nr_cgroups || config->cgroup_list) {
246 		const char *cgrp_name = cgrp ? cgrp->name  : "";
247 
248 		if (config->json_output)
249 			print_cgroup_json(os, cgrp_name);
250 		else if (config->csv_output)
251 			print_cgroup_csv(config, cgrp_name);
252 		else
253 			print_cgroup_std(config, cgrp_name);
254 	}
255 }
256 
print_aggr_id_std(struct perf_stat_config * config,struct evsel * evsel,struct aggr_cpu_id id,int aggr_nr)257 static void print_aggr_id_std(struct perf_stat_config *config,
258 			      struct evsel *evsel, struct aggr_cpu_id id, int aggr_nr)
259 {
260 	FILE *output = config->output;
261 	int idx = config->aggr_mode;
262 	char buf[128];
263 
264 	switch (config->aggr_mode) {
265 	case AGGR_CORE:
266 		snprintf(buf, sizeof(buf), "S%d-D%d-C%d", id.socket, id.die, id.core);
267 		break;
268 	case AGGR_CACHE:
269 		snprintf(buf, sizeof(buf), "S%d-D%d-L%d-ID%d",
270 			 id.socket, id.die, id.cache_lvl, id.cache);
271 		break;
272 	case AGGR_CLUSTER:
273 		snprintf(buf, sizeof(buf), "S%d-D%d-CLS%d", id.socket, id.die, id.cluster);
274 		break;
275 	case AGGR_DIE:
276 		snprintf(buf, sizeof(buf), "S%d-D%d", id.socket, id.die);
277 		break;
278 	case AGGR_SOCKET:
279 		snprintf(buf, sizeof(buf), "S%d", id.socket);
280 		break;
281 	case AGGR_NODE:
282 		snprintf(buf, sizeof(buf), "N%d", id.node);
283 		break;
284 	case AGGR_NONE:
285 		if (evsel->percore && !config->percore_show_thread) {
286 			snprintf(buf, sizeof(buf), "S%d-D%d-C%d ",
287 				id.socket, id.die, id.core);
288 			fprintf(output, "%-*s ",
289 				aggr_header_lens[AGGR_CORE], buf);
290 		} else if (id.cpu.cpu > -1) {
291 			fprintf(output, "CPU%-*d ",
292 				aggr_header_lens[AGGR_NONE] - 3, id.cpu.cpu);
293 		}
294 		return;
295 	case AGGR_THREAD:
296 		fprintf(output, "%*s-%-*d ",
297 			COMM_LEN, perf_thread_map__comm(evsel->core.threads, id.thread_idx),
298 			PID_LEN, perf_thread_map__pid(evsel->core.threads, id.thread_idx));
299 		return;
300 	case AGGR_GLOBAL:
301 	case AGGR_UNSET:
302 	case AGGR_MAX:
303 	default:
304 		return;
305 	}
306 
307 	fprintf(output, "%-*s %*d ", aggr_header_lens[idx], buf, 4, aggr_nr);
308 }
309 
print_aggr_id_csv(struct perf_stat_config * config,struct evsel * evsel,struct aggr_cpu_id id,int aggr_nr)310 static void print_aggr_id_csv(struct perf_stat_config *config,
311 			      struct evsel *evsel, struct aggr_cpu_id id, int aggr_nr)
312 {
313 	FILE *output = config->output;
314 	const char *sep = config->csv_sep;
315 
316 	switch (config->aggr_mode) {
317 	case AGGR_CORE:
318 		fprintf(output, "S%d-D%d-C%d%s%d%s",
319 			id.socket, id.die, id.core, sep, aggr_nr, sep);
320 		break;
321 	case AGGR_CACHE:
322 		fprintf(config->output, "S%d-D%d-L%d-ID%d%s%d%s",
323 			id.socket, id.die, id.cache_lvl, id.cache, sep, aggr_nr, sep);
324 		break;
325 	case AGGR_CLUSTER:
326 		fprintf(config->output, "S%d-D%d-CLS%d%s%d%s",
327 			id.socket, id.die, id.cluster, sep, aggr_nr, sep);
328 		break;
329 	case AGGR_DIE:
330 		fprintf(output, "S%d-D%d%s%d%s",
331 			id.socket, id.die, sep, aggr_nr, sep);
332 		break;
333 	case AGGR_SOCKET:
334 		fprintf(output, "S%d%s%d%s",
335 			id.socket, sep, aggr_nr, sep);
336 		break;
337 	case AGGR_NODE:
338 		fprintf(output, "N%d%s%d%s",
339 			id.node, sep, aggr_nr, sep);
340 		break;
341 	case AGGR_NONE:
342 		if (evsel->percore && !config->percore_show_thread) {
343 			fprintf(output, "S%d-D%d-C%d%s",
344 				id.socket, id.die, id.core, sep);
345 		} else if (id.cpu.cpu > -1) {
346 			fprintf(output, "CPU%d%s",
347 				id.cpu.cpu, sep);
348 		}
349 		break;
350 	case AGGR_THREAD:
351 		fprintf(output, "%s-%d%s",
352 			perf_thread_map__comm(evsel->core.threads, id.thread_idx),
353 			perf_thread_map__pid(evsel->core.threads, id.thread_idx),
354 			sep);
355 		break;
356 	case AGGR_GLOBAL:
357 	case AGGR_UNSET:
358 	case AGGR_MAX:
359 	default:
360 		break;
361 	}
362 }
363 
print_aggr_id_json(struct perf_stat_config * config,struct outstate * os,struct evsel * evsel,struct aggr_cpu_id id,int aggr_nr)364 static void print_aggr_id_json(struct perf_stat_config *config, struct outstate *os,
365 			       struct evsel *evsel, struct aggr_cpu_id id, int aggr_nr)
366 {
367 	switch (config->aggr_mode) {
368 	case AGGR_CORE:
369 		json_out(os, "\"core\" : \"S%d-D%d-C%d\", \"aggregate-number\" : %d",
370 			id.socket, id.die, id.core, aggr_nr);
371 		break;
372 	case AGGR_CACHE:
373 		json_out(os, "\"cache\" : \"S%d-D%d-L%d-ID%d\", \"aggregate-number\" : %d",
374 			id.socket, id.die, id.cache_lvl, id.cache, aggr_nr);
375 		break;
376 	case AGGR_CLUSTER:
377 		json_out(os, "\"cluster\" : \"S%d-D%d-CLS%d\", \"aggregate-number\" : %d",
378 			id.socket, id.die, id.cluster, aggr_nr);
379 		break;
380 	case AGGR_DIE:
381 		json_out(os, "\"die\" : \"S%d-D%d\", \"aggregate-number\" : %d",
382 			id.socket, id.die, aggr_nr);
383 		break;
384 	case AGGR_SOCKET:
385 		json_out(os, "\"socket\" : \"S%d\", \"aggregate-number\" : %d",
386 			id.socket, aggr_nr);
387 		break;
388 	case AGGR_NODE:
389 		json_out(os, "\"node\" : \"N%d\", \"aggregate-number\" : %d",
390 			id.node, aggr_nr);
391 		break;
392 	case AGGR_NONE:
393 		if (evsel->percore && !config->percore_show_thread) {
394 			json_out(os, "\"core\" : \"S%d-D%d-C%d\"",
395 				id.socket, id.die, id.core);
396 		} else if (id.cpu.cpu > -1) {
397 			json_out(os, "\"cpu\" : \"%d\"",
398 				id.cpu.cpu);
399 		}
400 		break;
401 	case AGGR_THREAD:
402 		json_out(os, "\"thread\" : \"%s-%d\"",
403 			perf_thread_map__comm(evsel->core.threads, id.thread_idx),
404 			perf_thread_map__pid(evsel->core.threads, id.thread_idx));
405 		break;
406 	case AGGR_GLOBAL:
407 	case AGGR_UNSET:
408 	case AGGR_MAX:
409 	default:
410 		break;
411 	}
412 }
413 
aggr_printout(struct perf_stat_config * config,struct outstate * os,struct evsel * evsel,struct aggr_cpu_id id,int aggr_nr)414 static void aggr_printout(struct perf_stat_config *config, struct outstate *os,
415 			  struct evsel *evsel, struct aggr_cpu_id id, int aggr_nr)
416 {
417 	if (config->json_output)
418 		print_aggr_id_json(config, os, evsel, id, aggr_nr);
419 	else if (config->csv_output)
420 		print_aggr_id_csv(config, evsel, id, aggr_nr);
421 	else
422 		print_aggr_id_std(config, evsel, id, aggr_nr);
423 }
424 
new_line_std(struct perf_stat_config * config __maybe_unused,void * ctx)425 static void new_line_std(struct perf_stat_config *config __maybe_unused,
426 			 void *ctx)
427 {
428 	struct outstate *os = ctx;
429 
430 	os->newline = true;
431 }
432 
__new_line_std_csv(struct perf_stat_config * config,struct outstate * os)433 static inline void __new_line_std_csv(struct perf_stat_config *config,
434 				      struct outstate *os)
435 {
436 	fputc('\n', os->fh);
437 	if (config->interval)
438 		fputs(os->timestamp, os->fh);
439 	aggr_printout(config, os, os->evsel, os->id, os->aggr_nr);
440 }
441 
__new_line_std(struct outstate * os)442 static inline void __new_line_std(struct outstate *os)
443 {
444 	fprintf(os->fh, "                                                 ");
445 }
446 
do_new_line_std(struct perf_stat_config * config,struct outstate * os)447 static void do_new_line_std(struct perf_stat_config *config,
448 			    struct outstate *os)
449 {
450 	__new_line_std_csv(config, os);
451 	if (config->aggr_mode == AGGR_NONE)
452 		fprintf(os->fh, "        ");
453 	__new_line_std(os);
454 }
455 
print_metric_std(struct perf_stat_config * config,void * ctx,enum metric_threshold_classify thresh,const char * fmt,const char * unit,double val)456 static void print_metric_std(struct perf_stat_config *config,
457 			     void *ctx, enum metric_threshold_classify thresh,
458 			     const char *fmt, const char *unit, double val)
459 {
460 	struct outstate *os = ctx;
461 	FILE *out = os->fh;
462 	int n;
463 	bool newline = os->newline;
464 	const char *color = metric_threshold_classify__color(thresh);
465 
466 	os->newline = false;
467 
468 	if (unit == NULL || fmt == NULL) {
469 		fprintf(out, "%-*s", METRIC_LEN, "");
470 		return;
471 	}
472 
473 	if (newline)
474 		do_new_line_std(config, os);
475 
476 	n = fprintf(out, " # ");
477 	if (color)
478 		n += color_fprintf(out, color, fmt, val);
479 	else
480 		n += fprintf(out, fmt, val);
481 	fprintf(out, " %-*s", METRIC_LEN - n - 1, unit);
482 }
483 
new_line_csv(struct perf_stat_config * config,void * ctx)484 static void new_line_csv(struct perf_stat_config *config, void *ctx)
485 {
486 	struct outstate *os = ctx;
487 	int i;
488 
489 	__new_line_std_csv(config, os);
490 	for (i = 0; i < os->csv_col_pad; i++)
491 		fputs(config->csv_sep, os->fh);
492 }
493 
print_metric_csv(struct perf_stat_config * config __maybe_unused,void * ctx,enum metric_threshold_classify thresh __maybe_unused,const char * fmt,const char * unit,double val)494 static void print_metric_csv(struct perf_stat_config *config __maybe_unused,
495 			     void *ctx,
496 			     enum metric_threshold_classify thresh __maybe_unused,
497 			     const char *fmt, const char *unit, double val)
498 {
499 	struct outstate *os = ctx;
500 	FILE *out = os->fh;
501 	char buf[64], *vals, *ends;
502 
503 	if (unit == NULL || fmt == NULL) {
504 		fprintf(out, "%s%s", config->csv_sep, config->csv_sep);
505 		return;
506 	}
507 	snprintf(buf, sizeof(buf), fmt, val);
508 	ends = vals = skip_spaces(buf);
509 	while (isdigit(*ends) || *ends == '.')
510 		ends++;
511 	*ends = 0;
512 	fprintf(out, "%s%s%s%s", config->csv_sep, vals, config->csv_sep, skip_spaces(unit));
513 }
514 
print_metric_json(struct perf_stat_config * config __maybe_unused,void * ctx,enum metric_threshold_classify thresh,const char * fmt __maybe_unused,const char * unit,double val)515 static void print_metric_json(struct perf_stat_config *config __maybe_unused,
516 			     void *ctx,
517 			     enum metric_threshold_classify thresh,
518 			     const char *fmt __maybe_unused,
519 			     const char *unit, double val)
520 {
521 	struct outstate *os = ctx;
522 	FILE *out = os->fh;
523 
524 	if (unit) {
525 		json_out(os, "\"metric-value\" : \"%f\", \"metric-unit\" : \"%s\"", val, unit);
526 		if (thresh != METRIC_THRESHOLD_UNKNOWN) {
527 			json_out(os, "\"metric-threshold\" : \"%s\"",
528 				metric_threshold_classify__str(thresh));
529 		}
530 	}
531 	if (!config->metric_only)
532 		fprintf(out, "}");
533 }
534 
new_line_json(struct perf_stat_config * config,void * ctx)535 static void new_line_json(struct perf_stat_config *config, void *ctx)
536 {
537 	struct outstate *os = ctx;
538 
539 	fputs("\n{", os->fh);
540 	os->first = true;
541 	if (config->interval)
542 		json_out(os, "%s", os->timestamp);
543 
544 	aggr_printout(config, os, os->evsel, os->id, os->aggr_nr);
545 }
546 
print_metricgroup_header_json(struct perf_stat_config * config,void * ctx,const char * metricgroup_name)547 static void print_metricgroup_header_json(struct perf_stat_config *config,
548 					  void *ctx,
549 					  const char *metricgroup_name)
550 {
551 	if (!metricgroup_name)
552 		return;
553 
554 	json_out((struct outstate *) ctx, "\"metricgroup\" : \"%s\"}", metricgroup_name);
555 	new_line_json(config, ctx);
556 }
557 
print_metricgroup_header_csv(struct perf_stat_config * config,void * ctx,const char * metricgroup_name)558 static void print_metricgroup_header_csv(struct perf_stat_config *config,
559 					 void *ctx,
560 					 const char *metricgroup_name)
561 {
562 	struct outstate *os = ctx;
563 	int i;
564 
565 	if (!metricgroup_name) {
566 		/* Leave space for running and enabling */
567 		for (i = 0; i < os->csv_col_pad - 2; i++)
568 			fputs(config->csv_sep, os->fh);
569 		return;
570 	}
571 
572 	for (i = 0; i < os->csv_col_pad; i++)
573 		fputs(config->csv_sep, os->fh);
574 	fprintf(config->output, "%s", metricgroup_name);
575 	new_line_csv(config, ctx);
576 }
577 
print_metricgroup_header_std(struct perf_stat_config * config,void * ctx,const char * metricgroup_name)578 static void print_metricgroup_header_std(struct perf_stat_config *config,
579 					 void *ctx,
580 					 const char *metricgroup_name)
581 {
582 	struct outstate *os = ctx;
583 	int n;
584 
585 	if (!metricgroup_name) {
586 		__new_line_std(os);
587 		return;
588 	}
589 
590 	n = fprintf(config->output, " %*s", EVNAME_LEN, metricgroup_name);
591 
592 	fprintf(config->output, "%*s", MGROUP_LEN - n - 1, "");
593 }
594 
595 /* Filter out some columns that don't work well in metrics only mode */
596 
valid_only_metric(const char * unit)597 static bool valid_only_metric(const char *unit)
598 {
599 	if (!unit)
600 		return false;
601 	if (strstr(unit, "/sec") ||
602 	    strstr(unit, "CPUs utilized"))
603 		return false;
604 	return true;
605 }
606 
fixunit(char * buf,struct evsel * evsel,const char * unit)607 static const char *fixunit(char *buf, struct evsel *evsel,
608 			   const char *unit)
609 {
610 	if (!strncmp(unit, "of all", 6)) {
611 		snprintf(buf, 1024, "%s %s", evsel__name(evsel),
612 			 unit);
613 		return buf;
614 	}
615 	return unit;
616 }
617 
print_metric_only(struct perf_stat_config * config,void * ctx,enum metric_threshold_classify thresh,const char * fmt,const char * unit,double val)618 static void print_metric_only(struct perf_stat_config *config,
619 			      void *ctx, enum metric_threshold_classify thresh,
620 			      const char *fmt, const char *unit, double val)
621 {
622 	struct outstate *os = ctx;
623 	FILE *out = os->fh;
624 	char buf[1024], str[1024];
625 	unsigned mlen = config->metric_only_len;
626 	const char *color = metric_threshold_classify__color(thresh);
627 
628 	if (!valid_only_metric(unit))
629 		return;
630 	unit = fixunit(buf, os->evsel, unit);
631 	if (mlen < strlen(unit))
632 		mlen = strlen(unit) + 1;
633 
634 	if (color)
635 		mlen += strlen(color) + sizeof(PERF_COLOR_RESET) - 1;
636 
637 	color_snprintf(str, sizeof(str), color ?: "", fmt ?: "", val);
638 	fprintf(out, "%*s ", mlen, str);
639 	os->first = false;
640 }
641 
print_metric_only_csv(struct perf_stat_config * config __maybe_unused,void * ctx,enum metric_threshold_classify thresh __maybe_unused,const char * fmt,const char * unit,double val)642 static void print_metric_only_csv(struct perf_stat_config *config __maybe_unused,
643 				  void *ctx,
644 				  enum metric_threshold_classify thresh __maybe_unused,
645 				  const char *fmt,
646 				  const char *unit, double val)
647 {
648 	struct outstate *os = ctx;
649 	FILE *out = os->fh;
650 	char buf[64], *vals, *ends;
651 	char tbuf[1024];
652 
653 	if (!valid_only_metric(unit))
654 		return;
655 	unit = fixunit(tbuf, os->evsel, unit);
656 	snprintf(buf, sizeof(buf), fmt ?: "", val);
657 	ends = vals = skip_spaces(buf);
658 	while (isdigit(*ends) || *ends == '.')
659 		ends++;
660 	*ends = 0;
661 	fprintf(out, "%s%s", vals, config->csv_sep);
662 	os->first = false;
663 }
664 
print_metric_only_json(struct perf_stat_config * config __maybe_unused,void * ctx,enum metric_threshold_classify thresh __maybe_unused,const char * fmt,const char * unit,double val)665 static void print_metric_only_json(struct perf_stat_config *config __maybe_unused,
666 				  void *ctx,
667 				  enum metric_threshold_classify thresh __maybe_unused,
668 				  const char *fmt,
669 				  const char *unit, double val)
670 {
671 	struct outstate *os = ctx;
672 	char buf[64], *ends;
673 	char tbuf[1024];
674 	const char *vals;
675 
676 	if (!valid_only_metric(unit))
677 		return;
678 	unit = fixunit(tbuf, os->evsel, unit);
679 	if (!unit[0])
680 		return;
681 	snprintf(buf, sizeof(buf), fmt ?: "", val);
682 	vals = ends = skip_spaces(buf);
683 	while (isdigit(*ends) || *ends == '.')
684 		ends++;
685 	*ends = 0;
686 	if (!vals[0])
687 		vals = "none";
688 	json_out(os, "\"%s\" : \"%s\"", unit, vals);
689 }
690 
print_metric_header(struct perf_stat_config * config,void * ctx,enum metric_threshold_classify thresh __maybe_unused,const char * fmt __maybe_unused,const char * unit,double val __maybe_unused)691 static void print_metric_header(struct perf_stat_config *config,
692 				void *ctx,
693 				enum metric_threshold_classify thresh __maybe_unused,
694 				const char *fmt __maybe_unused,
695 				const char *unit, double val __maybe_unused)
696 {
697 	struct outstate *os = ctx;
698 	char tbuf[1024];
699 
700 	/* In case of iostat, print metric header for first root port only */
701 	if (config->iostat_run &&
702 	    os->evsel->priv != os->evsel->evlist->selected->priv)
703 		return;
704 
705 	if (os->evsel->cgrp != os->cgrp)
706 		return;
707 
708 	if (!valid_only_metric(unit))
709 		return;
710 	unit = fixunit(tbuf, os->evsel, unit);
711 
712 	if (config->json_output)
713 		return;
714 	else if (config->csv_output)
715 		fprintf(os->fh, "%s%s", unit, config->csv_sep);
716 	else
717 		fprintf(os->fh, "%*s ", config->metric_only_len, unit);
718 }
719 
print_counter_value_std(struct perf_stat_config * config,struct evsel * evsel,double avg,bool ok)720 static void print_counter_value_std(struct perf_stat_config *config,
721 				    struct evsel *evsel, double avg, bool ok)
722 {
723 	FILE *output = config->output;
724 	double sc =  evsel->scale;
725 	const char *fmt;
726 	const char *bad_count = evsel->supported ? CNTR_NOT_COUNTED : CNTR_NOT_SUPPORTED;
727 
728 	if (config->big_num)
729 		fmt = floor(sc) != sc ? "%'*.2f " : "%'*.0f ";
730 	else
731 		fmt = floor(sc) != sc ? "%*.2f " : "%*.0f ";
732 
733 	if (ok)
734 		fprintf(output, fmt, COUNTS_LEN, avg);
735 	else
736 		fprintf(output, "%*s ", COUNTS_LEN, bad_count);
737 
738 	if (evsel->unit)
739 		fprintf(output, "%-*s ", config->unit_width, evsel->unit);
740 
741 	fprintf(output, "%-*s", EVNAME_LEN, evsel__name(evsel));
742 }
743 
print_counter_value_csv(struct perf_stat_config * config,struct evsel * evsel,double avg,bool ok)744 static void print_counter_value_csv(struct perf_stat_config *config,
745 				    struct evsel *evsel, double avg, bool ok)
746 {
747 	FILE *output = config->output;
748 	double sc =  evsel->scale;
749 	const char *sep = config->csv_sep;
750 	const char *fmt = floor(sc) != sc ? "%.2f%s" : "%.0f%s";
751 	const char *bad_count = evsel->supported ? CNTR_NOT_COUNTED : CNTR_NOT_SUPPORTED;
752 
753 	if (ok)
754 		fprintf(output, fmt, avg, sep);
755 	else
756 		fprintf(output, "%s%s", bad_count, sep);
757 
758 	if (evsel->unit)
759 		fprintf(output, "%s%s", evsel->unit, sep);
760 
761 	fprintf(output, "%s", evsel__name(evsel));
762 }
763 
print_counter_value_json(struct outstate * os,struct evsel * evsel,double avg,bool ok)764 static void print_counter_value_json(struct outstate *os,
765 				     struct evsel *evsel, double avg, bool ok)
766 {
767 	const char *bad_count = evsel->supported ? CNTR_NOT_COUNTED : CNTR_NOT_SUPPORTED;
768 
769 	if (ok)
770 		json_out(os, "\"counter-value\" : \"%f\"", avg);
771 	else
772 		json_out(os, "\"counter-value\" : \"%s\"", bad_count);
773 
774 	if (evsel->unit)
775 		json_out(os, "\"unit\" : \"%s\"", evsel->unit);
776 
777 	json_out(os, "\"event\" : \"%s\"", evsel__name(evsel));
778 }
779 
print_counter_value(struct perf_stat_config * config,struct outstate * os,struct evsel * evsel,double avg,bool ok)780 static void print_counter_value(struct perf_stat_config *config, struct outstate *os,
781 				struct evsel *evsel, double avg, bool ok)
782 {
783 	if (config->json_output)
784 		print_counter_value_json(os, evsel, avg, ok);
785 	else if (config->csv_output)
786 		print_counter_value_csv(config, evsel, avg, ok);
787 	else
788 		print_counter_value_std(config, evsel, avg, ok);
789 }
790 
abs_printout(struct perf_stat_config * config,struct outstate * os,struct aggr_cpu_id id,int aggr_nr,struct evsel * evsel,double avg,bool ok)791 static void abs_printout(struct perf_stat_config *config,
792 			 struct outstate *os,
793 			 struct aggr_cpu_id id, int aggr_nr,
794 			 struct evsel *evsel, double avg, bool ok)
795 {
796 	aggr_printout(config, os, evsel, id, aggr_nr);
797 	print_counter_value(config, os, evsel, avg, ok);
798 	print_cgroup(config, os, evsel->cgrp);
799 }
800 
is_mixed_hw_group(struct evsel * counter)801 static bool is_mixed_hw_group(struct evsel *counter)
802 {
803 	struct evlist *evlist = counter->evlist;
804 	u32 pmu_type = counter->core.attr.type;
805 	struct evsel *pos;
806 
807 	if (counter->core.nr_members < 2)
808 		return false;
809 
810 	evlist__for_each_entry(evlist, pos) {
811 		/* software events can be part of any hardware group */
812 		if (pos->core.attr.type == PERF_TYPE_SOFTWARE)
813 			continue;
814 		if (pmu_type == PERF_TYPE_SOFTWARE) {
815 			pmu_type = pos->core.attr.type;
816 			continue;
817 		}
818 		if (pmu_type != pos->core.attr.type)
819 			return true;
820 	}
821 
822 	return false;
823 }
824 
evlist__has_hybrid(struct evlist * evlist)825 static bool evlist__has_hybrid(struct evlist *evlist)
826 {
827 	struct evsel *evsel;
828 
829 	if (perf_pmus__num_core_pmus() == 1)
830 		return false;
831 
832 	evlist__for_each_entry(evlist, evsel) {
833 		if (evsel->core.is_pmu_core)
834 			return true;
835 	}
836 
837 	return false;
838 }
839 
printout(struct perf_stat_config * config,struct outstate * os,double uval,u64 run,u64 ena,double noise,int aggr_idx)840 static void printout(struct perf_stat_config *config, struct outstate *os,
841 		     double uval, u64 run, u64 ena, double noise, int aggr_idx)
842 {
843 	struct perf_stat_output_ctx out;
844 	print_metric_t pm;
845 	new_line_t nl;
846 	print_metricgroup_header_t pmh;
847 	bool ok = true;
848 	struct evsel *counter = os->evsel;
849 
850 	if (config->csv_output) {
851 		pm = config->metric_only ? print_metric_only_csv : print_metric_csv;
852 		nl = config->metric_only ? NULL : new_line_csv;
853 		pmh = print_metricgroup_header_csv;
854 		os->csv_col_pad = 4 + (counter->cgrp ? 1 : 0);
855 	} else if (config->json_output) {
856 		pm = config->metric_only ? print_metric_only_json : print_metric_json;
857 		nl = config->metric_only ? NULL : new_line_json;
858 		pmh = print_metricgroup_header_json;
859 	} else {
860 		pm = config->metric_only ? print_metric_only : print_metric_std;
861 		nl = config->metric_only ? NULL : new_line_std;
862 		pmh = print_metricgroup_header_std;
863 	}
864 
865 	if (run == 0 || ena == 0 || counter->counts->scaled == -1) {
866 		if (config->metric_only) {
867 			pm(config, os, METRIC_THRESHOLD_UNKNOWN, /*format=*/NULL,
868 			   /*unit=*/NULL, /*val=*/0);
869 			return;
870 		}
871 
872 		ok = false;
873 
874 		if (counter->supported) {
875 			if (!evlist__has_hybrid(counter->evlist)) {
876 				config->print_free_counters_hint = 1;
877 				if (is_mixed_hw_group(counter))
878 					config->print_mixed_hw_group_error = 1;
879 			}
880 		}
881 	}
882 
883 	out.print_metric = pm;
884 	out.new_line = nl;
885 	out.print_metricgroup_header = pmh;
886 	out.ctx = os;
887 	out.force_header = false;
888 
889 	if (!config->metric_only && !counter->default_metricgroup) {
890 		abs_printout(config, os, os->id, os->aggr_nr, counter, uval, ok);
891 
892 		print_noise(config, os, counter, noise, /*before_metric=*/true);
893 		print_running(config, os, run, ena, /*before_metric=*/true);
894 	}
895 
896 	if (ok) {
897 		if (!config->metric_only && counter->default_metricgroup) {
898 			void *from = NULL;
899 
900 			aggr_printout(config, os, os->evsel, os->id, os->aggr_nr);
901 			/* Print out all the metricgroup with the same metric event. */
902 			do {
903 				int num = 0;
904 
905 				/* Print out the new line for the next new metricgroup. */
906 				if (from) {
907 					if (config->json_output)
908 						new_line_json(config, (void *)os);
909 					else
910 						__new_line_std_csv(config, os);
911 				}
912 
913 				print_noise(config, os, counter, noise, /*before_metric=*/true);
914 				print_running(config, os, run, ena, /*before_metric=*/true);
915 				from = perf_stat__print_shadow_stats_metricgroup(config, counter, aggr_idx,
916 										 &num, from, &out,
917 										 &config->metric_events);
918 			} while (from != NULL);
919 		} else
920 			perf_stat__print_shadow_stats(config, counter, uval, aggr_idx,
921 						      &out, &config->metric_events);
922 	} else {
923 		pm(config, os, METRIC_THRESHOLD_UNKNOWN, /*format=*/NULL, /*unit=*/NULL, /*val=*/0);
924 	}
925 
926 	if (!config->metric_only) {
927 		print_noise(config, os, counter, noise, /*before_metric=*/false);
928 		print_running(config, os, run, ena, /*before_metric=*/false);
929 	}
930 }
931 
uniquify_event_name(struct evsel * counter)932 static void uniquify_event_name(struct evsel *counter)
933 {
934 	const char *name, *pmu_name;
935 	char *new_name, *config;
936 	int ret;
937 
938 	/* The evsel was already uniquified. */
939 	if (counter->uniquified_name)
940 		return;
941 
942 	/* Avoid checking to uniquify twice. */
943 	counter->uniquified_name = true;
944 
945 	/* The evsel has a "name=" config term or is from libpfm. */
946 	if (counter->use_config_name || counter->is_libpfm_event)
947 		return;
948 
949 	/* Legacy no PMU event, don't uniquify. */
950 	if  (!counter->pmu ||
951 	     (counter->pmu->type < PERF_TYPE_MAX && counter->pmu->type != PERF_TYPE_RAW))
952 		return;
953 
954 	/* A sysfs or json event replacing a legacy event, don't uniquify. */
955 	if (counter->pmu->is_core && counter->alternate_hw_config != PERF_COUNT_HW_MAX)
956 		return;
957 
958 	name = evsel__name(counter);
959 	pmu_name = counter->pmu->name;
960 	/* Already prefixed by the PMU name. */
961 	if (!strncmp(name, pmu_name, strlen(pmu_name)))
962 		return;
963 
964 	config = strchr(name, '/');
965 	if (config) {
966 		int len = config - name;
967 
968 		if (config[1] == '/') {
969 			/* case: event// */
970 			ret = asprintf(&new_name, "%s/%.*s/%s", pmu_name, len, name, config + 2);
971 		} else {
972 			/* case: event/.../ */
973 			ret = asprintf(&new_name, "%s/%.*s,%s", pmu_name, len, name, config + 1);
974 		}
975 	} else {
976 		config = strchr(name, ':');
977 		if (config) {
978 			/* case: event:.. */
979 			int len = config - name;
980 
981 			ret = asprintf(&new_name, "%s/%.*s/%s", pmu_name, len, name, config + 1);
982 		} else {
983 			/* case: event */
984 			ret = asprintf(&new_name, "%s/%s/", pmu_name, name);
985 		}
986 	}
987 	if (ret > 0) {
988 		free(counter->name);
989 		counter->name = new_name;
990 	} else {
991 		/* ENOMEM from asprintf. */
992 		counter->uniquified_name = false;
993 	}
994 }
995 
hybrid_uniquify(struct evsel * evsel,struct perf_stat_config * config)996 static bool hybrid_uniquify(struct evsel *evsel, struct perf_stat_config *config)
997 {
998 	return evsel__is_hybrid(evsel) && !config->hybrid_merge;
999 }
1000 
uniquify_counter(struct perf_stat_config * config,struct evsel * counter)1001 static void uniquify_counter(struct perf_stat_config *config, struct evsel *counter)
1002 {
1003 	if (config->aggr_mode == AGGR_NONE || hybrid_uniquify(counter, config))
1004 		uniquify_event_name(counter);
1005 }
1006 
1007 /**
1008  * should_skip_zero_count() - Check if the event should print 0 values.
1009  * @config: The perf stat configuration (including aggregation mode).
1010  * @counter: The evsel with its associated cpumap.
1011  * @id: The aggregation id that is being queried.
1012  *
1013  * Due to mismatch between the event cpumap or thread-map and the
1014  * aggregation mode, sometimes it'd iterate the counter with the map
1015  * which does not contain any values.
1016  *
1017  * For example, uncore events have dedicated CPUs to manage them,
1018  * result for other CPUs should be zero and skipped.
1019  *
1020  * Return: %true if the value should NOT be printed, %false if the value
1021  * needs to be printed like "<not counted>" or "<not supported>".
1022  */
should_skip_zero_counter(struct perf_stat_config * config,struct evsel * counter,const struct aggr_cpu_id * id)1023 static bool should_skip_zero_counter(struct perf_stat_config *config,
1024 				     struct evsel *counter,
1025 				     const struct aggr_cpu_id *id)
1026 {
1027 	struct perf_cpu cpu;
1028 	int idx;
1029 
1030 	/*
1031 	 * Skip unsupported default events when not verbose. (default events
1032 	 * are all marked 'skippable').
1033 	 */
1034 	if (verbose == 0 && counter->skippable && !counter->supported)
1035 		return true;
1036 
1037 	/*
1038 	 * Skip value 0 when enabling --per-thread globally,
1039 	 * otherwise it will have too many 0 output.
1040 	 */
1041 	if (config->aggr_mode == AGGR_THREAD && config->system_wide)
1042 		return true;
1043 
1044 	/*
1045 	 * Many tool events are only gathered on the first index, skip other
1046 	 * zero values.
1047 	 */
1048 	if (evsel__is_tool(counter)) {
1049 		struct aggr_cpu_id own_id =
1050 			config->aggr_get_id(config, (struct perf_cpu){ .cpu = 0 });
1051 
1052 		return !aggr_cpu_id__equal(id, &own_id);
1053 	}
1054 
1055 	/*
1056 	 * Skip value 0 when it's an uncore event and the given aggr id
1057 	 * does not belong to the PMU cpumask.
1058 	 */
1059 	if (!counter->pmu || !counter->pmu->is_uncore)
1060 		return false;
1061 
1062 	perf_cpu_map__for_each_cpu(cpu, idx, counter->pmu->cpus) {
1063 		struct aggr_cpu_id own_id = config->aggr_get_id(config, cpu);
1064 
1065 		if (aggr_cpu_id__equal(id, &own_id))
1066 			return false;
1067 	}
1068 	return true;
1069 }
1070 
print_counter_aggrdata(struct perf_stat_config * config,struct evsel * counter,int aggr_idx,struct outstate * os)1071 static void print_counter_aggrdata(struct perf_stat_config *config,
1072 				   struct evsel *counter, int aggr_idx,
1073 				   struct outstate *os)
1074 {
1075 	FILE *output = config->output;
1076 	u64 ena, run, val;
1077 	double uval;
1078 	struct perf_stat_evsel *ps = counter->stats;
1079 	struct perf_stat_aggr *aggr = &ps->aggr[aggr_idx];
1080 	struct aggr_cpu_id id = config->aggr_map->map[aggr_idx];
1081 	double avg = aggr->counts.val;
1082 	bool metric_only = config->metric_only;
1083 
1084 	os->id = id;
1085 	os->aggr_nr = aggr->nr;
1086 	os->evsel = counter;
1087 
1088 	/* Skip already merged uncore/hybrid events */
1089 	if (counter->merged_stat)
1090 		return;
1091 
1092 	uniquify_counter(config, counter);
1093 
1094 	val = aggr->counts.val;
1095 	ena = aggr->counts.ena;
1096 	run = aggr->counts.run;
1097 
1098 	if (perf_stat__skip_metric_event(counter, &config->metric_events, ena, run))
1099 		return;
1100 
1101 	if (val == 0 && should_skip_zero_counter(config, counter, &id))
1102 		return;
1103 
1104 	if (!metric_only) {
1105 		if (config->json_output) {
1106 			os->first = true;
1107 			fputc('{', output);
1108 		}
1109 		if (config->interval) {
1110 			if (config->json_output)
1111 				json_out(os, "%s", os->timestamp);
1112 			else
1113 				fprintf(output, "%s", os->timestamp);
1114 		} else if (config->summary && config->csv_output &&
1115 			   !config->no_csv_summary)
1116 			fprintf(output, "%s%s", "summary", config->csv_sep);
1117 	}
1118 
1119 	uval = val * counter->scale;
1120 
1121 	printout(config, os, uval, run, ena, avg, aggr_idx);
1122 
1123 	if (!metric_only)
1124 		fputc('\n', output);
1125 }
1126 
print_metric_begin(struct perf_stat_config * config,struct evlist * evlist,struct outstate * os,int aggr_idx)1127 static void print_metric_begin(struct perf_stat_config *config,
1128 			       struct evlist *evlist,
1129 			       struct outstate *os, int aggr_idx)
1130 {
1131 	struct perf_stat_aggr *aggr;
1132 	struct aggr_cpu_id id;
1133 	struct evsel *evsel;
1134 
1135 	os->first = true;
1136 	if (!config->metric_only)
1137 		return;
1138 
1139 	if (config->json_output)
1140 		fputc('{', config->output);
1141 
1142 	if (config->interval) {
1143 		if (config->json_output)
1144 			json_out(os, "%s", os->timestamp);
1145 		else
1146 			fprintf(config->output, "%s", os->timestamp);
1147 	}
1148 	evsel = evlist__first(evlist);
1149 	id = config->aggr_map->map[aggr_idx];
1150 	aggr = &evsel->stats->aggr[aggr_idx];
1151 	aggr_printout(config, os, evsel, id, aggr->nr);
1152 
1153 	print_cgroup(config, os, os->cgrp ? : evsel->cgrp);
1154 }
1155 
print_metric_end(struct perf_stat_config * config,struct outstate * os)1156 static void print_metric_end(struct perf_stat_config *config, struct outstate *os)
1157 {
1158 	FILE *output = config->output;
1159 
1160 	if (!config->metric_only)
1161 		return;
1162 
1163 	if (config->json_output) {
1164 		if (os->first)
1165 			fputs("\"metric-value\" : \"none\"", output);
1166 		fputc('}', output);
1167 	}
1168 	fputc('\n', output);
1169 }
1170 
print_aggr(struct perf_stat_config * config,struct evlist * evlist,struct outstate * os)1171 static void print_aggr(struct perf_stat_config *config,
1172 		       struct evlist *evlist,
1173 		       struct outstate *os)
1174 {
1175 	struct evsel *counter;
1176 	int aggr_idx;
1177 
1178 	if (!config->aggr_map || !config->aggr_get_id)
1179 		return;
1180 
1181 	/*
1182 	 * With metric_only everything is on a single line.
1183 	 * Without each counter has its own line.
1184 	 */
1185 	cpu_aggr_map__for_each_idx(aggr_idx, config->aggr_map) {
1186 		print_metric_begin(config, evlist, os, aggr_idx);
1187 
1188 		evlist__for_each_entry(evlist, counter) {
1189 			print_counter_aggrdata(config, counter, aggr_idx, os);
1190 		}
1191 		print_metric_end(config, os);
1192 	}
1193 }
1194 
print_aggr_cgroup(struct perf_stat_config * config,struct evlist * evlist,struct outstate * os)1195 static void print_aggr_cgroup(struct perf_stat_config *config,
1196 			      struct evlist *evlist,
1197 			      struct outstate *os)
1198 {
1199 	struct evsel *counter, *evsel;
1200 	int aggr_idx;
1201 
1202 	if (!config->aggr_map || !config->aggr_get_id)
1203 		return;
1204 
1205 	evlist__for_each_entry(evlist, evsel) {
1206 		if (os->cgrp == evsel->cgrp)
1207 			continue;
1208 
1209 		os->cgrp = evsel->cgrp;
1210 
1211 		cpu_aggr_map__for_each_idx(aggr_idx, config->aggr_map) {
1212 			print_metric_begin(config, evlist, os, aggr_idx);
1213 
1214 			evlist__for_each_entry(evlist, counter) {
1215 				if (counter->cgrp != os->cgrp)
1216 					continue;
1217 
1218 				print_counter_aggrdata(config, counter, aggr_idx, os);
1219 			}
1220 			print_metric_end(config, os);
1221 		}
1222 	}
1223 }
1224 
print_counter(struct perf_stat_config * config,struct evsel * counter,struct outstate * os)1225 static void print_counter(struct perf_stat_config *config,
1226 			  struct evsel *counter, struct outstate *os)
1227 {
1228 	int aggr_idx;
1229 
1230 	/* AGGR_THREAD doesn't have config->aggr_get_id */
1231 	if (!config->aggr_map)
1232 		return;
1233 
1234 	cpu_aggr_map__for_each_idx(aggr_idx, config->aggr_map) {
1235 		print_counter_aggrdata(config, counter, aggr_idx, os);
1236 	}
1237 }
1238 
print_no_aggr_metric(struct perf_stat_config * config,struct evlist * evlist,struct outstate * os)1239 static void print_no_aggr_metric(struct perf_stat_config *config,
1240 				 struct evlist *evlist,
1241 				 struct outstate *os)
1242 {
1243 	int all_idx;
1244 	struct perf_cpu cpu;
1245 
1246 	perf_cpu_map__for_each_cpu(cpu, all_idx, evlist->core.user_requested_cpus) {
1247 		struct evsel *counter;
1248 		bool first = true;
1249 
1250 		evlist__for_each_entry(evlist, counter) {
1251 			u64 ena, run, val;
1252 			double uval;
1253 			struct perf_stat_evsel *ps = counter->stats;
1254 			int aggr_idx = 0;
1255 
1256 			if (!perf_cpu_map__has(evsel__cpus(counter), cpu))
1257 				continue;
1258 
1259 			cpu_aggr_map__for_each_idx(aggr_idx, config->aggr_map) {
1260 				if (config->aggr_map->map[aggr_idx].cpu.cpu == cpu.cpu)
1261 					break;
1262 			}
1263 
1264 			os->evsel = counter;
1265 			os->id = aggr_cpu_id__cpu(cpu, /*data=*/NULL);
1266 			if (first) {
1267 				print_metric_begin(config, evlist, os, aggr_idx);
1268 				first = false;
1269 			}
1270 			val = ps->aggr[aggr_idx].counts.val;
1271 			ena = ps->aggr[aggr_idx].counts.ena;
1272 			run = ps->aggr[aggr_idx].counts.run;
1273 
1274 			uval = val * counter->scale;
1275 			printout(config, os, uval, run, ena, 1.0, aggr_idx);
1276 		}
1277 		if (!first)
1278 			print_metric_end(config, os);
1279 	}
1280 }
1281 
print_metric_headers_std(struct perf_stat_config * config,bool no_indent)1282 static void print_metric_headers_std(struct perf_stat_config *config,
1283 				     bool no_indent)
1284 {
1285 	fputc(' ', config->output);
1286 
1287 	if (!no_indent) {
1288 		int len = aggr_header_lens[config->aggr_mode];
1289 
1290 		if (nr_cgroups || config->cgroup_list)
1291 			len += CGROUP_LEN + 1;
1292 
1293 		fprintf(config->output, "%*s", len, "");
1294 	}
1295 }
1296 
print_metric_headers_csv(struct perf_stat_config * config,bool no_indent __maybe_unused)1297 static void print_metric_headers_csv(struct perf_stat_config *config,
1298 				     bool no_indent __maybe_unused)
1299 {
1300 	const char *p;
1301 
1302 	if (config->interval)
1303 		fprintf(config->output, "time%s", config->csv_sep);
1304 	if (config->iostat_run)
1305 		return;
1306 
1307 	p = aggr_header_csv[config->aggr_mode];
1308 	while (*p) {
1309 		if (*p == ',')
1310 			fputs(config->csv_sep, config->output);
1311 		else
1312 			fputc(*p, config->output);
1313 		p++;
1314 	}
1315 }
1316 
print_metric_headers_json(struct perf_stat_config * config __maybe_unused,bool no_indent __maybe_unused)1317 static void print_metric_headers_json(struct perf_stat_config *config __maybe_unused,
1318 				      bool no_indent __maybe_unused)
1319 {
1320 }
1321 
print_metric_headers(struct perf_stat_config * config,struct evlist * evlist,bool no_indent)1322 static void print_metric_headers(struct perf_stat_config *config,
1323 				 struct evlist *evlist, bool no_indent)
1324 {
1325 	struct evsel *counter;
1326 	struct outstate os = {
1327 		.fh = config->output
1328 	};
1329 	struct perf_stat_output_ctx out = {
1330 		.ctx = &os,
1331 		.print_metric = print_metric_header,
1332 		.new_line = NULL,
1333 		.force_header = true,
1334 	};
1335 
1336 	if (config->json_output)
1337 		print_metric_headers_json(config, no_indent);
1338 	else if (config->csv_output)
1339 		print_metric_headers_csv(config, no_indent);
1340 	else
1341 		print_metric_headers_std(config, no_indent);
1342 
1343 	if (config->iostat_run)
1344 		iostat_print_header_prefix(config);
1345 
1346 	if (config->cgroup_list)
1347 		os.cgrp = evlist__first(evlist)->cgrp;
1348 
1349 	/* Print metrics headers only */
1350 	evlist__for_each_entry(evlist, counter) {
1351 		if (!config->iostat_run &&
1352 		    config->aggr_mode != AGGR_NONE && counter->metric_leader != counter)
1353 			continue;
1354 
1355 		os.evsel = counter;
1356 
1357 		perf_stat__print_shadow_stats(config, counter, 0,
1358 					      0,
1359 					      &out,
1360 					      &config->metric_events);
1361 	}
1362 
1363 	if (!config->json_output)
1364 		fputc('\n', config->output);
1365 }
1366 
prepare_timestamp(struct perf_stat_config * config,struct outstate * os,struct timespec * ts)1367 static void prepare_timestamp(struct perf_stat_config *config,
1368 			      struct outstate *os, struct timespec *ts)
1369 {
1370 	if (config->iostat_run)
1371 		return;
1372 
1373 	if (config->json_output)
1374 		scnprintf(os->timestamp, sizeof(os->timestamp), "\"interval\" : %lu.%09lu",
1375 			  (unsigned long) ts->tv_sec, ts->tv_nsec);
1376 	else if (config->csv_output)
1377 		scnprintf(os->timestamp, sizeof(os->timestamp), "%lu.%09lu%s",
1378 			  (unsigned long) ts->tv_sec, ts->tv_nsec, config->csv_sep);
1379 	else
1380 		scnprintf(os->timestamp, sizeof(os->timestamp), "%6lu.%09lu ",
1381 			  (unsigned long) ts->tv_sec, ts->tv_nsec);
1382 }
1383 
print_header_interval_std(struct perf_stat_config * config,struct target * _target __maybe_unused,struct evlist * evlist,int argc __maybe_unused,const char ** argv __maybe_unused)1384 static void print_header_interval_std(struct perf_stat_config *config,
1385 				      struct target *_target __maybe_unused,
1386 				      struct evlist *evlist,
1387 				      int argc __maybe_unused,
1388 				      const char **argv __maybe_unused)
1389 {
1390 	FILE *output = config->output;
1391 
1392 	switch (config->aggr_mode) {
1393 	case AGGR_NODE:
1394 	case AGGR_SOCKET:
1395 	case AGGR_DIE:
1396 	case AGGR_CLUSTER:
1397 	case AGGR_CACHE:
1398 	case AGGR_CORE:
1399 		fprintf(output, "#%*s %-*s cpus",
1400 			INTERVAL_LEN - 1, "time",
1401 			aggr_header_lens[config->aggr_mode],
1402 			aggr_header_std[config->aggr_mode]);
1403 		break;
1404 	case AGGR_NONE:
1405 		fprintf(output, "#%*s %-*s",
1406 			INTERVAL_LEN - 1, "time",
1407 			aggr_header_lens[config->aggr_mode],
1408 			aggr_header_std[config->aggr_mode]);
1409 		break;
1410 	case AGGR_THREAD:
1411 		fprintf(output, "#%*s %*s-%-*s",
1412 			INTERVAL_LEN - 1, "time",
1413 			COMM_LEN, "comm", PID_LEN, "pid");
1414 		break;
1415 	case AGGR_GLOBAL:
1416 	default:
1417 		if (!config->iostat_run)
1418 			fprintf(output, "#%*s",
1419 				INTERVAL_LEN - 1, "time");
1420 	case AGGR_UNSET:
1421 	case AGGR_MAX:
1422 		break;
1423 	}
1424 
1425 	if (config->metric_only)
1426 		print_metric_headers(config, evlist, true);
1427 	else
1428 		fprintf(output, " %*s %*s events\n",
1429 			COUNTS_LEN, "counts", config->unit_width, "unit");
1430 }
1431 
print_header_std(struct perf_stat_config * config,struct target * _target,struct evlist * evlist,int argc,const char ** argv)1432 static void print_header_std(struct perf_stat_config *config,
1433 			     struct target *_target, struct evlist *evlist,
1434 			     int argc, const char **argv)
1435 {
1436 	FILE *output = config->output;
1437 	int i;
1438 
1439 	fprintf(output, "\n");
1440 	fprintf(output, " Performance counter stats for ");
1441 	if (_target->bpf_str)
1442 		fprintf(output, "\'BPF program(s) %s", _target->bpf_str);
1443 	else if (_target->system_wide)
1444 		fprintf(output, "\'system wide");
1445 	else if (_target->cpu_list)
1446 		fprintf(output, "\'CPU(s) %s", _target->cpu_list);
1447 	else if (!target__has_task(_target)) {
1448 		fprintf(output, "\'%s", argv ? argv[0] : "pipe");
1449 		for (i = 1; argv && (i < argc); i++)
1450 			fprintf(output, " %s", argv[i]);
1451 	} else if (_target->pid)
1452 		fprintf(output, "process id \'%s", _target->pid);
1453 	else
1454 		fprintf(output, "thread id \'%s", _target->tid);
1455 
1456 	fprintf(output, "\'");
1457 	if (config->run_count > 1)
1458 		fprintf(output, " (%d runs)", config->run_count);
1459 	fprintf(output, ":\n\n");
1460 
1461 	if (config->metric_only)
1462 		print_metric_headers(config, evlist, false);
1463 }
1464 
print_header_csv(struct perf_stat_config * config,struct target * _target __maybe_unused,struct evlist * evlist,int argc __maybe_unused,const char ** argv __maybe_unused)1465 static void print_header_csv(struct perf_stat_config *config,
1466 			     struct target *_target __maybe_unused,
1467 			     struct evlist *evlist,
1468 			     int argc __maybe_unused,
1469 			     const char **argv __maybe_unused)
1470 {
1471 	if (config->metric_only)
1472 		print_metric_headers(config, evlist, true);
1473 }
print_header_json(struct perf_stat_config * config,struct target * _target __maybe_unused,struct evlist * evlist,int argc __maybe_unused,const char ** argv __maybe_unused)1474 static void print_header_json(struct perf_stat_config *config,
1475 			      struct target *_target __maybe_unused,
1476 			      struct evlist *evlist,
1477 			      int argc __maybe_unused,
1478 			      const char **argv __maybe_unused)
1479 {
1480 	if (config->metric_only)
1481 		print_metric_headers(config, evlist, true);
1482 }
1483 
print_header(struct perf_stat_config * config,struct target * _target,struct evlist * evlist,int argc,const char ** argv)1484 static void print_header(struct perf_stat_config *config,
1485 			 struct target *_target,
1486 			 struct evlist *evlist,
1487 			 int argc, const char **argv)
1488 {
1489 	static int num_print_iv;
1490 
1491 	fflush(stdout);
1492 
1493 	if (config->interval_clear)
1494 		puts(CONSOLE_CLEAR);
1495 
1496 	if (num_print_iv == 0 || config->interval_clear) {
1497 		if (config->json_output)
1498 			print_header_json(config, _target, evlist, argc, argv);
1499 		else if (config->csv_output)
1500 			print_header_csv(config, _target, evlist, argc, argv);
1501 		else if (config->interval)
1502 			print_header_interval_std(config, _target, evlist, argc, argv);
1503 		else
1504 			print_header_std(config, _target, evlist, argc, argv);
1505 	}
1506 
1507 	if (num_print_iv++ == 25)
1508 		num_print_iv = 0;
1509 }
1510 
get_precision(double num)1511 static int get_precision(double num)
1512 {
1513 	if (num > 1)
1514 		return 0;
1515 
1516 	return lround(ceil(-log10(num)));
1517 }
1518 
print_table(struct perf_stat_config * config,FILE * output,int precision,double avg)1519 static void print_table(struct perf_stat_config *config,
1520 			FILE *output, int precision, double avg)
1521 {
1522 	char tmp[64];
1523 	int idx, indent = 0;
1524 
1525 	scnprintf(tmp, 64, " %17.*f", precision, avg);
1526 	while (tmp[indent] == ' ')
1527 		indent++;
1528 
1529 	fprintf(output, "%*s# Table of individual measurements:\n", indent, "");
1530 
1531 	for (idx = 0; idx < config->run_count; idx++) {
1532 		double run = (double) config->walltime_run[idx] / NSEC_PER_SEC;
1533 		int h, n = 1 + abs((int) (100.0 * (run - avg)/run) / 5);
1534 
1535 		fprintf(output, " %17.*f (%+.*f) ",
1536 			precision, run, precision, run - avg);
1537 
1538 		for (h = 0; h < n; h++)
1539 			fprintf(output, "#");
1540 
1541 		fprintf(output, "\n");
1542 	}
1543 
1544 	fprintf(output, "\n%*s# Final result:\n", indent, "");
1545 }
1546 
timeval2double(struct timeval * t)1547 static double timeval2double(struct timeval *t)
1548 {
1549 	return t->tv_sec + (double) t->tv_usec/USEC_PER_SEC;
1550 }
1551 
print_footer(struct perf_stat_config * config)1552 static void print_footer(struct perf_stat_config *config)
1553 {
1554 	double avg = avg_stats(config->walltime_nsecs_stats) / NSEC_PER_SEC;
1555 	FILE *output = config->output;
1556 
1557 	if (config->interval || config->csv_output || config->json_output)
1558 		return;
1559 
1560 	if (!config->null_run)
1561 		fprintf(output, "\n");
1562 
1563 	if (config->run_count == 1) {
1564 		fprintf(output, " %17.9f seconds time elapsed", avg);
1565 
1566 		if (config->ru_display) {
1567 			double ru_utime = timeval2double(&config->ru_data.ru_utime);
1568 			double ru_stime = timeval2double(&config->ru_data.ru_stime);
1569 
1570 			fprintf(output, "\n\n");
1571 			fprintf(output, " %17.9f seconds user\n", ru_utime);
1572 			fprintf(output, " %17.9f seconds sys\n", ru_stime);
1573 		}
1574 	} else {
1575 		double sd = stddev_stats(config->walltime_nsecs_stats) / NSEC_PER_SEC;
1576 		/*
1577 		 * Display at most 2 more significant
1578 		 * digits than the stddev inaccuracy.
1579 		 */
1580 		int precision = get_precision(sd) + 2;
1581 
1582 		if (config->walltime_run_table)
1583 			print_table(config, output, precision, avg);
1584 
1585 		fprintf(output, " %17.*f +- %.*f seconds time elapsed",
1586 			precision, avg, precision, sd);
1587 
1588 		print_noise_pct(config, NULL, sd, avg, /*before_metric=*/false);
1589 	}
1590 	fprintf(output, "\n\n");
1591 
1592 	if (config->print_free_counters_hint && sysctl__nmi_watchdog_enabled())
1593 		fprintf(output,
1594 "Some events weren't counted. Try disabling the NMI watchdog:\n"
1595 "	echo 0 > /proc/sys/kernel/nmi_watchdog\n"
1596 "	perf stat ...\n"
1597 "	echo 1 > /proc/sys/kernel/nmi_watchdog\n");
1598 
1599 	if (config->print_mixed_hw_group_error)
1600 		fprintf(output,
1601 			"The events in group usually have to be from "
1602 			"the same PMU. Try reorganizing the group.\n");
1603 }
1604 
print_percore(struct perf_stat_config * config,struct evsel * counter,struct outstate * os)1605 static void print_percore(struct perf_stat_config *config,
1606 			  struct evsel *counter, struct outstate *os)
1607 {
1608 	bool metric_only = config->metric_only;
1609 	FILE *output = config->output;
1610 	struct cpu_aggr_map *core_map;
1611 	int aggr_idx, core_map_len = 0;
1612 
1613 	if (!config->aggr_map || !config->aggr_get_id)
1614 		return;
1615 
1616 	if (config->percore_show_thread)
1617 		return print_counter(config, counter, os);
1618 
1619 	/*
1620 	 * core_map will hold the aggr_cpu_id for the cores that have been
1621 	 * printed so that each core is printed just once.
1622 	 */
1623 	core_map = cpu_aggr_map__empty_new(config->aggr_map->nr);
1624 	if (core_map == NULL) {
1625 		fprintf(output, "Cannot allocate per-core aggr map for display\n");
1626 		return;
1627 	}
1628 
1629 	cpu_aggr_map__for_each_idx(aggr_idx, config->aggr_map) {
1630 		struct perf_cpu curr_cpu = config->aggr_map->map[aggr_idx].cpu;
1631 		struct aggr_cpu_id core_id = aggr_cpu_id__core(curr_cpu, NULL);
1632 		bool found = false;
1633 
1634 		for (int i = 0; i < core_map_len; i++) {
1635 			if (aggr_cpu_id__equal(&core_map->map[i], &core_id)) {
1636 				found = true;
1637 				break;
1638 			}
1639 		}
1640 		if (found)
1641 			continue;
1642 
1643 		print_counter_aggrdata(config, counter, aggr_idx, os);
1644 
1645 		core_map->map[core_map_len++] = core_id;
1646 	}
1647 	free(core_map);
1648 
1649 	if (metric_only)
1650 		fputc('\n', output);
1651 }
1652 
print_cgroup_counter(struct perf_stat_config * config,struct evlist * evlist,struct outstate * os)1653 static void print_cgroup_counter(struct perf_stat_config *config, struct evlist *evlist,
1654 				 struct outstate *os)
1655 {
1656 	struct evsel *counter;
1657 
1658 	evlist__for_each_entry(evlist, counter) {
1659 		if (os->cgrp != counter->cgrp) {
1660 			if (os->cgrp != NULL)
1661 				print_metric_end(config, os);
1662 
1663 			os->cgrp = counter->cgrp;
1664 			print_metric_begin(config, evlist, os, /*aggr_idx=*/0);
1665 		}
1666 
1667 		print_counter(config, counter, os);
1668 	}
1669 	if (os->cgrp)
1670 		print_metric_end(config, os);
1671 }
1672 
disable_uniquify(struct evlist * evlist)1673 static void disable_uniquify(struct evlist *evlist)
1674 {
1675 	struct evsel *counter;
1676 	struct perf_pmu *last_pmu = NULL;
1677 	bool first = true;
1678 
1679 	evlist__for_each_entry(evlist, counter) {
1680 		/* If PMUs vary then uniquify can be useful. */
1681 		if (!first && counter->pmu != last_pmu)
1682 			return;
1683 		first = false;
1684 		if (counter->pmu) {
1685 			/* Allow uniquify for uncore PMUs. */
1686 			if (!counter->pmu->is_core)
1687 				return;
1688 			/* Keep hybrid event names uniquified for clarity. */
1689 			if (perf_pmus__num_core_pmus() > 1)
1690 				return;
1691 		}
1692 	}
1693 	evlist__for_each_entry_continue(evlist, counter) {
1694 		counter->uniquified_name = true;
1695 	}
1696 }
1697 
evlist__print_counters(struct evlist * evlist,struct perf_stat_config * config,struct target * _target,struct timespec * ts,int argc,const char ** argv)1698 void evlist__print_counters(struct evlist *evlist, struct perf_stat_config *config,
1699 			    struct target *_target, struct timespec *ts,
1700 			    int argc, const char **argv)
1701 {
1702 	bool metric_only = config->metric_only;
1703 	struct evsel *counter;
1704 	struct outstate os = {
1705 		.fh = config->output,
1706 		.first = true,
1707 	};
1708 
1709 	disable_uniquify(evlist);
1710 
1711 	if (config->iostat_run)
1712 		evlist->selected = evlist__first(evlist);
1713 
1714 	if (config->interval)
1715 		prepare_timestamp(config, &os, ts);
1716 
1717 	print_header(config, _target, evlist, argc, argv);
1718 
1719 	switch (config->aggr_mode) {
1720 	case AGGR_CORE:
1721 	case AGGR_CACHE:
1722 	case AGGR_CLUSTER:
1723 	case AGGR_DIE:
1724 	case AGGR_SOCKET:
1725 	case AGGR_NODE:
1726 		if (config->cgroup_list)
1727 			print_aggr_cgroup(config, evlist, &os);
1728 		else
1729 			print_aggr(config, evlist, &os);
1730 		break;
1731 	case AGGR_THREAD:
1732 	case AGGR_GLOBAL:
1733 		if (config->iostat_run) {
1734 			iostat_print_counters(evlist, config, ts, os.timestamp,
1735 					      (iostat_print_counter_t)print_counter, &os);
1736 		} else if (config->cgroup_list) {
1737 			print_cgroup_counter(config, evlist, &os);
1738 		} else {
1739 			print_metric_begin(config, evlist, &os, /*aggr_idx=*/0);
1740 			evlist__for_each_entry(evlist, counter) {
1741 				print_counter(config, counter, &os);
1742 			}
1743 			print_metric_end(config, &os);
1744 		}
1745 		break;
1746 	case AGGR_NONE:
1747 		if (metric_only)
1748 			print_no_aggr_metric(config, evlist, &os);
1749 		else {
1750 			evlist__for_each_entry(evlist, counter) {
1751 				if (counter->percore)
1752 					print_percore(config, counter, &os);
1753 				else
1754 					print_counter(config, counter, &os);
1755 			}
1756 		}
1757 		break;
1758 	case AGGR_MAX:
1759 	case AGGR_UNSET:
1760 	default:
1761 		break;
1762 	}
1763 
1764 	print_footer(config);
1765 
1766 	fflush(config->output);
1767 }
1768