xref: /openbmc/linux/tools/perf/builtin-list.c (revision 7f1005dd)
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * builtin-list.c
4  *
5  * Builtin list command: list all event types
6  *
7  * Copyright (C) 2009, Thomas Gleixner <tglx@linutronix.de>
8  * Copyright (C) 2008-2009, Red Hat Inc, Ingo Molnar <mingo@redhat.com>
9  * Copyright (C) 2011, Red Hat Inc, Arnaldo Carvalho de Melo <acme@redhat.com>
10  */
11 #include "builtin.h"
12 
13 #include "util/print-events.h"
14 #include "util/pmus.h"
15 #include "util/pmu.h"
16 #include "util/debug.h"
17 #include "util/metricgroup.h"
18 #include "util/pfm.h"
19 #include "util/string2.h"
20 #include "util/strlist.h"
21 #include "util/strbuf.h"
22 #include <subcmd/pager.h>
23 #include <subcmd/parse-options.h>
24 #include <linux/zalloc.h>
25 #include <stdarg.h>
26 #include <stdio.h>
27 
28 /**
29  * struct print_state - State and configuration passed to the default_print
30  * functions.
31  */
32 struct print_state {
33 	/**
34 	 * @pmu_glob: Optionally restrict PMU and metric matching to PMU or
35 	 * debugfs subsystem name.
36 	 */
37 	char *pmu_glob;
38 	/** @event_glob: Optional pattern matching glob. */
39 	char *event_glob;
40 	/** @name_only: Print event or metric names only. */
41 	bool name_only;
42 	/** @desc: Print the event or metric description. */
43 	bool desc;
44 	/** @long_desc: Print longer event or metric description. */
45 	bool long_desc;
46 	/** @deprecated: Print deprecated events or metrics. */
47 	bool deprecated;
48 	/**
49 	 * @detailed: Print extra information on the perf event such as names
50 	 * and expressions used internally by events.
51 	 */
52 	bool detailed;
53 	/** @metrics: Controls printing of metric and metric groups. */
54 	bool metrics;
55 	/** @metricgroups: Controls printing of metric and metric groups. */
56 	bool metricgroups;
57 	/** @last_topic: The last printed event topic. */
58 	char *last_topic;
59 	/** @last_metricgroups: The last printed metric group. */
60 	char *last_metricgroups;
61 	/** @visited_metrics: Metrics that are printed to avoid duplicates. */
62 	struct strlist *visited_metrics;
63 };
64 
65 static void default_print_start(void *ps)
66 {
67 	struct print_state *print_state = ps;
68 
69 	if (!print_state->name_only && pager_in_use())
70 		printf("\nList of pre-defined events (to be used in -e or -M):\n\n");
71 }
72 
73 static void default_print_end(void *print_state __maybe_unused) {}
74 
75 static void wordwrap(const char *s, int start, int max, int corr)
76 {
77 	int column = start;
78 	int n;
79 	bool saw_newline = false;
80 
81 	while (*s) {
82 		int wlen = strcspn(s, " \t\n");
83 
84 		if ((column + wlen >= max && column > start) || saw_newline) {
85 			printf("\n%*s", start, "");
86 			column = start + corr;
87 		}
88 		n = printf("%s%.*s", column > start ? " " : "", wlen, s);
89 		if (n <= 0)
90 			break;
91 		saw_newline = s[wlen] == '\n';
92 		s += wlen;
93 		column += n;
94 		s = skip_spaces(s);
95 	}
96 }
97 
98 static void default_print_event(void *ps, const char *pmu_name, const char *topic,
99 				const char *event_name, const char *event_alias,
100 				const char *scale_unit __maybe_unused,
101 				bool deprecated, const char *event_type_desc,
102 				const char *desc, const char *long_desc,
103 				const char *encoding_desc)
104 {
105 	struct print_state *print_state = ps;
106 	int pos;
107 
108 	if (deprecated && !print_state->deprecated)
109 		return;
110 
111 	if (print_state->pmu_glob && pmu_name && !strglobmatch(pmu_name, print_state->pmu_glob))
112 		return;
113 
114 	if (print_state->event_glob &&
115 	    (!event_name || !strglobmatch(event_name, print_state->event_glob)) &&
116 	    (!event_alias || !strglobmatch(event_alias, print_state->event_glob)) &&
117 	    (!topic || !strglobmatch_nocase(topic, print_state->event_glob)))
118 		return;
119 
120 	if (print_state->name_only) {
121 		if (event_alias && strlen(event_alias))
122 			printf("%s ", event_alias);
123 		else
124 			printf("%s ", event_name);
125 		return;
126 	}
127 
128 	if (strcmp(print_state->last_topic, topic ?: "")) {
129 		if (topic)
130 			printf("\n%s:\n", topic);
131 		zfree(&print_state->last_topic);
132 		print_state->last_topic = strdup(topic ?: "");
133 	}
134 
135 	if (event_alias && strlen(event_alias))
136 		pos = printf("  %s OR %s", event_name, event_alias);
137 	else
138 		pos = printf("  %s", event_name);
139 
140 	if (!topic && event_type_desc) {
141 		for (; pos < 53; pos++)
142 			putchar(' ');
143 		printf("[%s]\n", event_type_desc);
144 	} else
145 		putchar('\n');
146 
147 	if (desc && print_state->desc) {
148 		char *desc_with_unit = NULL;
149 		int desc_len = -1;
150 
151 		if (pmu_name && strcmp(pmu_name, "default_core")) {
152 			desc_len = strlen(desc);
153 			desc_len = asprintf(&desc_with_unit,
154 					    desc[desc_len - 1] != '.'
155 					      ? "%s. Unit: %s" : "%s Unit: %s",
156 					    desc, pmu_name);
157 		}
158 		printf("%*s", 8, "[");
159 		wordwrap(desc_len > 0 ? desc_with_unit : desc, 8, pager_get_columns(), 0);
160 		printf("]\n");
161 		free(desc_with_unit);
162 	}
163 	long_desc = long_desc ?: desc;
164 	if (long_desc && print_state->long_desc) {
165 		printf("%*s", 8, "[");
166 		wordwrap(long_desc, 8, pager_get_columns(), 0);
167 		printf("]\n");
168 	}
169 
170 	if (print_state->detailed && encoding_desc) {
171 		printf("%*s", 8, "");
172 		wordwrap(encoding_desc, 8, pager_get_columns(), 0);
173 		putchar('\n');
174 	}
175 }
176 
177 static void default_print_metric(void *ps,
178 				const char *group,
179 				const char *name,
180 				const char *desc,
181 				const char *long_desc,
182 				const char *expr,
183 				const char *threshold,
184 				const char *unit __maybe_unused)
185 {
186 	struct print_state *print_state = ps;
187 
188 	if (print_state->event_glob &&
189 	    (!print_state->metrics || !name || !strglobmatch(name, print_state->event_glob)) &&
190 	    (!print_state->metricgroups || !group || !strglobmatch(group, print_state->event_glob)))
191 		return;
192 
193 	if (!print_state->name_only && !print_state->last_metricgroups) {
194 		if (print_state->metricgroups) {
195 			printf("\nMetric Groups:\n");
196 			if (!print_state->metrics)
197 				putchar('\n');
198 		} else {
199 			printf("\nMetrics:\n\n");
200 		}
201 	}
202 	if (!print_state->last_metricgroups ||
203 	    strcmp(print_state->last_metricgroups, group ?: "")) {
204 		if (group && print_state->metricgroups) {
205 			if (print_state->name_only)
206 				printf("%s ", group);
207 			else if (print_state->metrics) {
208 				const char *gdesc = describe_metricgroup(group);
209 
210 				if (gdesc)
211 					printf("\n%s: [%s]\n", group, gdesc);
212 				else
213 					printf("\n%s:\n", group);
214 			} else
215 				printf("%s\n", group);
216 		}
217 		zfree(&print_state->last_metricgroups);
218 		print_state->last_metricgroups = strdup(group ?: "");
219 	}
220 	if (!print_state->metrics)
221 		return;
222 
223 	if (print_state->name_only) {
224 		if (print_state->metrics &&
225 		    !strlist__has_entry(print_state->visited_metrics, name)) {
226 			printf("%s ", name);
227 			strlist__add(print_state->visited_metrics, name);
228 		}
229 		return;
230 	}
231 	printf("  %s\n", name);
232 
233 	if (desc && print_state->desc) {
234 		printf("%*s", 8, "[");
235 		wordwrap(desc, 8, pager_get_columns(), 0);
236 		printf("]\n");
237 	}
238 	if (long_desc && print_state->long_desc) {
239 		printf("%*s", 8, "[");
240 		wordwrap(long_desc, 8, pager_get_columns(), 0);
241 		printf("]\n");
242 	}
243 	if (expr && print_state->detailed) {
244 		printf("%*s", 8, "[");
245 		wordwrap(expr, 8, pager_get_columns(), 0);
246 		printf("]\n");
247 	}
248 	if (threshold && print_state->detailed) {
249 		printf("%*s", 8, "[");
250 		wordwrap(threshold, 8, pager_get_columns(), 0);
251 		printf("]\n");
252 	}
253 }
254 
255 struct json_print_state {
256 	/** Should a separator be printed prior to the next item? */
257 	bool need_sep;
258 };
259 
260 static void json_print_start(void *print_state __maybe_unused)
261 {
262 	printf("[\n");
263 }
264 
265 static void json_print_end(void *ps)
266 {
267 	struct json_print_state *print_state = ps;
268 
269 	printf("%s]\n", print_state->need_sep ? "\n" : "");
270 }
271 
272 static void fix_escape_printf(struct strbuf *buf, const char *fmt, ...)
273 {
274 	va_list args;
275 
276 	va_start(args, fmt);
277 	strbuf_setlen(buf, 0);
278 	for (size_t fmt_pos = 0; fmt_pos < strlen(fmt); fmt_pos++) {
279 		switch (fmt[fmt_pos]) {
280 		case '%':
281 			fmt_pos++;
282 			switch (fmt[fmt_pos]) {
283 			case 's': {
284 				const char *s = va_arg(args, const char*);
285 
286 				strbuf_addstr(buf, s);
287 				break;
288 			}
289 			case 'S': {
290 				const char *s = va_arg(args, const char*);
291 
292 				for (size_t s_pos = 0; s_pos < strlen(s); s_pos++) {
293 					switch (s[s_pos]) {
294 					case '\n':
295 						strbuf_addstr(buf, "\\n");
296 						break;
297 					case '\\':
298 						fallthrough;
299 					case '\"':
300 						strbuf_addch(buf, '\\');
301 						fallthrough;
302 					default:
303 						strbuf_addch(buf, s[s_pos]);
304 						break;
305 					}
306 				}
307 				break;
308 			}
309 			default:
310 				pr_err("Unexpected format character '%c'\n", fmt[fmt_pos]);
311 				strbuf_addch(buf, '%');
312 				strbuf_addch(buf, fmt[fmt_pos]);
313 			}
314 			break;
315 		default:
316 			strbuf_addch(buf, fmt[fmt_pos]);
317 			break;
318 		}
319 	}
320 	va_end(args);
321 	fputs(buf->buf, stdout);
322 }
323 
324 static void json_print_event(void *ps, const char *pmu_name, const char *topic,
325 			     const char *event_name, const char *event_alias,
326 			     const char *scale_unit,
327 			     bool deprecated, const char *event_type_desc,
328 			     const char *desc, const char *long_desc,
329 			     const char *encoding_desc)
330 {
331 	struct json_print_state *print_state = ps;
332 	bool need_sep = false;
333 	struct strbuf buf;
334 
335 	strbuf_init(&buf, 0);
336 	printf("%s{\n", print_state->need_sep ? ",\n" : "");
337 	print_state->need_sep = true;
338 	if (pmu_name) {
339 		fix_escape_printf(&buf, "\t\"Unit\": \"%S\"", pmu_name);
340 		need_sep = true;
341 	}
342 	if (topic) {
343 		fix_escape_printf(&buf, "%s\t\"Topic\": \"%S\"", need_sep ? ",\n" : "", topic);
344 		need_sep = true;
345 	}
346 	if (event_name) {
347 		fix_escape_printf(&buf, "%s\t\"EventName\": \"%S\"", need_sep ? ",\n" : "",
348 				  event_name);
349 		need_sep = true;
350 	}
351 	if (event_alias && strlen(event_alias)) {
352 		fix_escape_printf(&buf, "%s\t\"EventAlias\": \"%S\"", need_sep ? ",\n" : "",
353 				  event_alias);
354 		need_sep = true;
355 	}
356 	if (scale_unit && strlen(scale_unit)) {
357 		fix_escape_printf(&buf, "%s\t\"ScaleUnit\": \"%S\"", need_sep ? ",\n" : "",
358 				  scale_unit);
359 		need_sep = true;
360 	}
361 	if (event_type_desc) {
362 		fix_escape_printf(&buf, "%s\t\"EventType\": \"%S\"", need_sep ? ",\n" : "",
363 				  event_type_desc);
364 		need_sep = true;
365 	}
366 	if (deprecated) {
367 		fix_escape_printf(&buf, "%s\t\"Deprecated\": \"%S\"", need_sep ? ",\n" : "",
368 				  deprecated ? "1" : "0");
369 		need_sep = true;
370 	}
371 	if (desc) {
372 		fix_escape_printf(&buf, "%s\t\"BriefDescription\": \"%S\"", need_sep ? ",\n" : "",
373 				  desc);
374 		need_sep = true;
375 	}
376 	if (long_desc) {
377 		fix_escape_printf(&buf, "%s\t\"PublicDescription\": \"%S\"", need_sep ? ",\n" : "",
378 				  long_desc);
379 		need_sep = true;
380 	}
381 	if (encoding_desc) {
382 		fix_escape_printf(&buf, "%s\t\"Encoding\": \"%S\"", need_sep ? ",\n" : "",
383 				  encoding_desc);
384 		need_sep = true;
385 	}
386 	printf("%s}", need_sep ? "\n" : "");
387 	strbuf_release(&buf);
388 }
389 
390 static void json_print_metric(void *ps __maybe_unused, const char *group,
391 			      const char *name, const char *desc,
392 			      const char *long_desc, const char *expr,
393 			      const char *threshold, const char *unit)
394 {
395 	struct json_print_state *print_state = ps;
396 	bool need_sep = false;
397 	struct strbuf buf;
398 
399 	strbuf_init(&buf, 0);
400 	printf("%s{\n", print_state->need_sep ? ",\n" : "");
401 	print_state->need_sep = true;
402 	if (group) {
403 		fix_escape_printf(&buf, "\t\"MetricGroup\": \"%S\"", group);
404 		need_sep = true;
405 	}
406 	if (name) {
407 		fix_escape_printf(&buf, "%s\t\"MetricName\": \"%S\"", need_sep ? ",\n" : "", name);
408 		need_sep = true;
409 	}
410 	if (expr) {
411 		fix_escape_printf(&buf, "%s\t\"MetricExpr\": \"%S\"", need_sep ? ",\n" : "", expr);
412 		need_sep = true;
413 	}
414 	if (threshold) {
415 		fix_escape_printf(&buf, "%s\t\"MetricThreshold\": \"%S\"", need_sep ? ",\n" : "",
416 				  threshold);
417 		need_sep = true;
418 	}
419 	if (unit) {
420 		fix_escape_printf(&buf, "%s\t\"ScaleUnit\": \"%S\"", need_sep ? ",\n" : "", unit);
421 		need_sep = true;
422 	}
423 	if (desc) {
424 		fix_escape_printf(&buf, "%s\t\"BriefDescription\": \"%S\"", need_sep ? ",\n" : "",
425 				  desc);
426 		need_sep = true;
427 	}
428 	if (long_desc) {
429 		fix_escape_printf(&buf, "%s\t\"PublicDescription\": \"%S\"", need_sep ? ",\n" : "",
430 				  long_desc);
431 		need_sep = true;
432 	}
433 	printf("%s}", need_sep ? "\n" : "");
434 	strbuf_release(&buf);
435 }
436 
437 static bool json_skip_duplicate_pmus(void *ps __maybe_unused)
438 {
439 	return false;
440 }
441 
442 static bool default_skip_duplicate_pmus(void *ps)
443 {
444 	struct print_state *print_state = ps;
445 
446 	return !print_state->long_desc;
447 }
448 
449 int cmd_list(int argc, const char **argv)
450 {
451 	int i, ret = 0;
452 	struct print_state default_ps = {};
453 	struct print_state json_ps = {};
454 	void *ps = &default_ps;
455 	struct print_callbacks print_cb = {
456 		.print_start = default_print_start,
457 		.print_end = default_print_end,
458 		.print_event = default_print_event,
459 		.print_metric = default_print_metric,
460 		.skip_duplicate_pmus = default_skip_duplicate_pmus,
461 	};
462 	const char *cputype = NULL;
463 	const char *unit_name = NULL;
464 	bool json = false;
465 	struct option list_options[] = {
466 		OPT_BOOLEAN(0, "raw-dump", &default_ps.name_only, "Dump raw events"),
467 		OPT_BOOLEAN('j', "json", &json, "JSON encode events and metrics"),
468 		OPT_BOOLEAN('d', "desc", &default_ps.desc,
469 			    "Print extra event descriptions. --no-desc to not print."),
470 		OPT_BOOLEAN('v', "long-desc", &default_ps.long_desc,
471 			    "Print longer event descriptions."),
472 		OPT_BOOLEAN(0, "details", &default_ps.detailed,
473 			    "Print information on the perf event names and expressions used internally by events."),
474 		OPT_BOOLEAN(0, "deprecated", &default_ps.deprecated,
475 			    "Print deprecated events."),
476 		OPT_STRING(0, "cputype", &cputype, "cpu type",
477 			   "Limit PMU or metric printing to the given PMU (e.g. cpu, core or atom)."),
478 		OPT_STRING(0, "unit", &unit_name, "PMU name",
479 			   "Limit PMU or metric printing to the specified PMU."),
480 		OPT_INCR(0, "debug", &verbose,
481 			     "Enable debugging output"),
482 		OPT_END()
483 	};
484 	const char * const list_usage[] = {
485 #ifdef HAVE_LIBPFM
486 		"perf list [<options>] [hw|sw|cache|tracepoint|pmu|sdt|metric|metricgroup|event_glob|pfm]",
487 #else
488 		"perf list [<options>] [hw|sw|cache|tracepoint|pmu|sdt|metric|metricgroup|event_glob]",
489 #endif
490 		NULL
491 	};
492 
493 	set_option_flag(list_options, 0, "raw-dump", PARSE_OPT_HIDDEN);
494 	/* Hide hybrid flag for the more generic 'unit' flag. */
495 	set_option_flag(list_options, 0, "cputype", PARSE_OPT_HIDDEN);
496 
497 	argc = parse_options(argc, argv, list_options, list_usage,
498 			     PARSE_OPT_STOP_AT_NON_OPTION);
499 
500 	setup_pager();
501 
502 	if (!default_ps.name_only)
503 		setup_pager();
504 
505 	if (json) {
506 		print_cb = (struct print_callbacks){
507 			.print_start = json_print_start,
508 			.print_end = json_print_end,
509 			.print_event = json_print_event,
510 			.print_metric = json_print_metric,
511 			.skip_duplicate_pmus = json_skip_duplicate_pmus,
512 		};
513 		ps = &json_ps;
514 	} else {
515 		default_ps.desc = !default_ps.long_desc;
516 		default_ps.last_topic = strdup("");
517 		assert(default_ps.last_topic);
518 		default_ps.visited_metrics = strlist__new(NULL, NULL);
519 		assert(default_ps.visited_metrics);
520 		if (unit_name)
521 			default_ps.pmu_glob = strdup(unit_name);
522 		else if (cputype) {
523 			const struct perf_pmu *pmu = perf_pmus__pmu_for_pmu_filter(cputype);
524 
525 			if (!pmu) {
526 				pr_err("ERROR: cputype is not supported!\n");
527 				ret = -1;
528 				goto out;
529 			}
530 			default_ps.pmu_glob = strdup(pmu->name);
531 		}
532 	}
533 	print_cb.print_start(ps);
534 
535 	if (argc == 0) {
536 		default_ps.metrics = true;
537 		default_ps.metricgroups = true;
538 		print_events(&print_cb, ps);
539 		goto out;
540 	}
541 
542 	for (i = 0; i < argc; ++i) {
543 		char *sep, *s;
544 
545 		if (strcmp(argv[i], "tracepoint") == 0)
546 			print_tracepoint_events(&print_cb, ps);
547 		else if (strcmp(argv[i], "hw") == 0 ||
548 			 strcmp(argv[i], "hardware") == 0)
549 			print_symbol_events(&print_cb, ps, PERF_TYPE_HARDWARE,
550 					event_symbols_hw, PERF_COUNT_HW_MAX);
551 		else if (strcmp(argv[i], "sw") == 0 ||
552 			 strcmp(argv[i], "software") == 0) {
553 			print_symbol_events(&print_cb, ps, PERF_TYPE_SOFTWARE,
554 					event_symbols_sw, PERF_COUNT_SW_MAX);
555 			print_tool_events(&print_cb, ps);
556 		} else if (strcmp(argv[i], "cache") == 0 ||
557 			 strcmp(argv[i], "hwcache") == 0)
558 			print_hwcache_events(&print_cb, ps);
559 		else if (strcmp(argv[i], "pmu") == 0)
560 			perf_pmus__print_pmu_events(&print_cb, ps);
561 		else if (strcmp(argv[i], "sdt") == 0)
562 			print_sdt_events(&print_cb, ps);
563 		else if (strcmp(argv[i], "metric") == 0 || strcmp(argv[i], "metrics") == 0) {
564 			default_ps.metricgroups = false;
565 			default_ps.metrics = true;
566 			metricgroup__print(&print_cb, ps);
567 		} else if (strcmp(argv[i], "metricgroup") == 0 ||
568 			   strcmp(argv[i], "metricgroups") == 0) {
569 			default_ps.metricgroups = true;
570 			default_ps.metrics = false;
571 			metricgroup__print(&print_cb, ps);
572 		}
573 #ifdef HAVE_LIBPFM
574 		else if (strcmp(argv[i], "pfm") == 0)
575 			print_libpfm_events(&print_cb, ps);
576 #endif
577 		else if ((sep = strchr(argv[i], ':')) != NULL) {
578 			char *old_pmu_glob = default_ps.pmu_glob;
579 
580 			default_ps.event_glob = strdup(argv[i]);
581 			if (!default_ps.event_glob) {
582 				ret = -1;
583 				goto out;
584 			}
585 
586 			print_tracepoint_events(&print_cb, ps);
587 			print_sdt_events(&print_cb, ps);
588 			default_ps.metrics = true;
589 			default_ps.metricgroups = true;
590 			metricgroup__print(&print_cb, ps);
591 			zfree(&default_ps.event_glob);
592 			default_ps.pmu_glob = old_pmu_glob;
593 		} else {
594 			if (asprintf(&s, "*%s*", argv[i]) < 0) {
595 				printf("Critical: Not enough memory! Trying to continue...\n");
596 				continue;
597 			}
598 			default_ps.event_glob = s;
599 			print_symbol_events(&print_cb, ps, PERF_TYPE_HARDWARE,
600 					event_symbols_hw, PERF_COUNT_HW_MAX);
601 			print_symbol_events(&print_cb, ps, PERF_TYPE_SOFTWARE,
602 					event_symbols_sw, PERF_COUNT_SW_MAX);
603 			print_tool_events(&print_cb, ps);
604 			print_hwcache_events(&print_cb, ps);
605 			perf_pmus__print_pmu_events(&print_cb, ps);
606 			print_tracepoint_events(&print_cb, ps);
607 			print_sdt_events(&print_cb, ps);
608 			default_ps.metrics = true;
609 			default_ps.metricgroups = true;
610 			metricgroup__print(&print_cb, ps);
611 			free(s);
612 		}
613 	}
614 
615 out:
616 	print_cb.print_end(ps);
617 	free(default_ps.pmu_glob);
618 	free(default_ps.last_topic);
619 	free(default_ps.last_metricgroups);
620 	strlist__delete(default_ps.visited_metrics);
621 	return ret;
622 }
623