1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3 * builtin-top.c
4 *
5 * Builtin top command: Display a continuously updated profile of
6 * any workload, CPU or specific PID.
7 *
8 * Copyright (C) 2008, Red Hat Inc, Ingo Molnar <mingo@redhat.com>
9 * 2011, Red Hat Inc, Arnaldo Carvalho de Melo <acme@redhat.com>
10 *
11 * Improvements and fixes by:
12 *
13 * Arjan van de Ven <arjan@linux.intel.com>
14 * Yanmin Zhang <yanmin.zhang@intel.com>
15 * Wu Fengguang <fengguang.wu@intel.com>
16 * Mike Galbraith <efault@gmx.de>
17 * Paul Mackerras <paulus@samba.org>
18 */
19 #include "builtin.h"
20
21 #include "perf.h"
22
23 #include "util/annotate.h"
24 #include "util/bpf-event.h"
25 #include "util/cgroup.h"
26 #include "util/config.h"
27 #include "util/color.h"
28 #include "util/dso.h"
29 #include "util/evlist.h"
30 #include "util/evsel.h"
31 #include "util/evsel_config.h"
32 #include "util/event.h"
33 #include "util/machine.h"
34 #include "util/map.h"
35 #include "util/mmap.h"
36 #include "util/session.h"
37 #include "util/thread.h"
38 #include "util/symbol.h"
39 #include "util/synthetic-events.h"
40 #include "util/top.h"
41 #include "util/util.h"
42 #include <linux/rbtree.h>
43 #include <subcmd/parse-options.h>
44 #include "util/parse-events.h"
45 #include "util/callchain.h"
46 #include "util/cpumap.h"
47 #include "util/sort.h"
48 #include "util/string2.h"
49 #include "util/term.h"
50 #include "util/intlist.h"
51 #include "util/parse-branch-options.h"
52 #include "arch/common.h"
53 #include "ui/ui.h"
54
55 #include "util/debug.h"
56 #include "util/ordered-events.h"
57 #include "util/pfm.h"
58
59 #include <assert.h>
60 #include <elf.h>
61 #include <fcntl.h>
62
63 #include <stdio.h>
64 #include <termios.h>
65 #include <unistd.h>
66 #include <inttypes.h>
67
68 #include <errno.h>
69 #include <time.h>
70 #include <sched.h>
71 #include <signal.h>
72
73 #include <sys/syscall.h>
74 #include <sys/ioctl.h>
75 #include <poll.h>
76 #include <sys/prctl.h>
77 #include <sys/wait.h>
78 #include <sys/uio.h>
79 #include <sys/utsname.h>
80 #include <sys/mman.h>
81
82 #include <linux/stringify.h>
83 #include <linux/time64.h>
84 #include <linux/types.h>
85 #include <linux/err.h>
86
87 #include <linux/ctype.h>
88 #include <perf/mmap.h>
89
90 static volatile sig_atomic_t done;
91 static volatile sig_atomic_t resize;
92
93 #define HEADER_LINE_NR 5
94
perf_top__update_print_entries(struct perf_top * top)95 static void perf_top__update_print_entries(struct perf_top *top)
96 {
97 top->print_entries = top->winsize.ws_row - HEADER_LINE_NR;
98 }
99
winch_sig(int sig __maybe_unused)100 static void winch_sig(int sig __maybe_unused)
101 {
102 resize = 1;
103 }
104
perf_top__resize(struct perf_top * top)105 static void perf_top__resize(struct perf_top *top)
106 {
107 get_term_dimensions(&top->winsize);
108 perf_top__update_print_entries(top);
109 }
110
perf_top__parse_source(struct perf_top * top,struct hist_entry * he)111 static int perf_top__parse_source(struct perf_top *top, struct hist_entry *he)
112 {
113 struct evsel *evsel;
114 struct symbol *sym;
115 struct annotation *notes;
116 struct map *map;
117 struct dso *dso;
118 int err = -1;
119
120 if (!he || !he->ms.sym)
121 return -1;
122
123 evsel = hists_to_evsel(he->hists);
124
125 sym = he->ms.sym;
126 map = he->ms.map;
127 dso = map__dso(map);
128
129 /*
130 * We can't annotate with just /proc/kallsyms
131 */
132 if (dso__symtab_type(dso) == DSO_BINARY_TYPE__KALLSYMS && !dso__is_kcore(dso)) {
133 pr_err("Can't annotate %s: No vmlinux file was found in the "
134 "path\n", sym->name);
135 sleep(1);
136 return -1;
137 }
138
139 notes = symbol__annotation(sym);
140 annotation__lock(notes);
141
142 if (!symbol__hists(sym, top->evlist->core.nr_entries)) {
143 annotation__unlock(notes);
144 pr_err("Not enough memory for annotating '%s' symbol!\n",
145 sym->name);
146 sleep(1);
147 return err;
148 }
149
150 err = symbol__annotate(&he->ms, evsel, NULL);
151 if (err == 0) {
152 top->sym_filter_entry = he;
153 } else {
154 char msg[BUFSIZ];
155 symbol__strerror_disassemble(&he->ms, err, msg, sizeof(msg));
156 pr_err("Couldn't annotate %s: %s\n", sym->name, msg);
157 }
158
159 annotation__unlock(notes);
160 return err;
161 }
162
__zero_source_counters(struct hist_entry * he)163 static void __zero_source_counters(struct hist_entry *he)
164 {
165 struct symbol *sym = he->ms.sym;
166 symbol__annotate_zero_histograms(sym);
167 }
168
ui__warn_map_erange(struct map * map,struct symbol * sym,u64 ip)169 static void ui__warn_map_erange(struct map *map, struct symbol *sym, u64 ip)
170 {
171 struct utsname uts;
172 int err = uname(&uts);
173 struct dso *dso = map__dso(map);
174
175 ui__warning("Out of bounds address found:\n\n"
176 "Addr: %" PRIx64 "\n"
177 "DSO: %s %c\n"
178 "Map: %" PRIx64 "-%" PRIx64 "\n"
179 "Symbol: %" PRIx64 "-%" PRIx64 " %c %s\n"
180 "Arch: %s\n"
181 "Kernel: %s\n"
182 "Tools: %s\n\n"
183 "Not all samples will be on the annotation output.\n\n"
184 "Please report to linux-kernel@vger.kernel.org\n",
185 ip, dso__long_name(dso), dso__symtab_origin(dso),
186 map__start(map), map__end(map), sym->start, sym->end,
187 sym->binding == STB_GLOBAL ? 'g' :
188 sym->binding == STB_LOCAL ? 'l' : 'w', sym->name,
189 err ? "[unknown]" : uts.machine,
190 err ? "[unknown]" : uts.release, perf_version_string);
191 if (use_browser <= 0)
192 sleep(5);
193
194 map__set_erange_warned(map);
195 }
196
perf_top__record_precise_ip(struct perf_top * top,struct hist_entry * he,struct perf_sample * sample,struct evsel * evsel,u64 ip)197 static void perf_top__record_precise_ip(struct perf_top *top,
198 struct hist_entry *he,
199 struct perf_sample *sample,
200 struct evsel *evsel, u64 ip)
201 EXCLUSIVE_LOCKS_REQUIRED(he->hists->lock)
202 {
203 struct annotation *notes;
204 struct symbol *sym = he->ms.sym;
205 int err = 0;
206
207 if (sym == NULL || (use_browser == 0 &&
208 (top->sym_filter_entry == NULL ||
209 top->sym_filter_entry->ms.sym != sym)))
210 return;
211
212 notes = symbol__annotation(sym);
213
214 if (!annotation__trylock(notes))
215 return;
216
217 err = hist_entry__inc_addr_samples(he, sample, evsel, ip);
218
219 annotation__unlock(notes);
220
221 if (unlikely(err)) {
222 /*
223 * This function is now called with he->hists->lock held.
224 * Release it before going to sleep.
225 */
226 mutex_unlock(&he->hists->lock);
227
228 if (err == -ERANGE && !map__erange_warned(he->ms.map))
229 ui__warn_map_erange(he->ms.map, sym, ip);
230 else if (err == -ENOMEM) {
231 pr_err("Not enough memory for annotating '%s' symbol!\n",
232 sym->name);
233 sleep(1);
234 }
235
236 mutex_lock(&he->hists->lock);
237 }
238 }
239
perf_top__show_details(struct perf_top * top)240 static void perf_top__show_details(struct perf_top *top)
241 {
242 struct hist_entry *he = top->sym_filter_entry;
243 struct evsel *evsel;
244 struct annotation *notes;
245 struct symbol *symbol;
246 int more;
247
248 if (!he)
249 return;
250
251 evsel = hists_to_evsel(he->hists);
252
253 symbol = he->ms.sym;
254 notes = symbol__annotation(symbol);
255
256 annotation__lock(notes);
257
258 symbol__calc_percent(symbol, evsel);
259
260 if (notes->src == NULL)
261 goto out_unlock;
262
263 printf("Showing %s for %s\n", evsel__name(top->sym_evsel), symbol->name);
264 printf(" Events Pcnt (>=%d%%)\n", annotate_opts.min_pcnt);
265
266 more = symbol__annotate_printf(&he->ms, top->sym_evsel);
267
268 if (top->evlist->enabled) {
269 if (top->zero)
270 symbol__annotate_zero_histogram(symbol, top->sym_evsel->core.idx);
271 else
272 symbol__annotate_decay_histogram(symbol, top->sym_evsel->core.idx);
273 }
274 if (more != 0)
275 printf("%d lines not displayed, maybe increase display entries [e]\n", more);
276 out_unlock:
277 annotation__unlock(notes);
278 }
279
perf_top__resort_hists(struct perf_top * t)280 static void perf_top__resort_hists(struct perf_top *t)
281 {
282 struct evlist *evlist = t->evlist;
283 struct evsel *pos;
284
285 evlist__for_each_entry(evlist, pos) {
286 struct hists *hists = evsel__hists(pos);
287
288 /*
289 * unlink existing entries so that they can be linked
290 * in a correct order in hists__match() below.
291 */
292 hists__unlink(hists);
293
294 if (evlist->enabled) {
295 if (t->zero) {
296 hists__delete_entries(hists);
297 } else {
298 hists__decay_entries(hists, t->hide_user_symbols,
299 t->hide_kernel_symbols);
300 }
301 }
302
303 hists__collapse_resort(hists, NULL);
304
305 /* Non-group events are considered as leader */
306 if (symbol_conf.event_group && !evsel__is_group_leader(pos)) {
307 struct hists *leader_hists = evsel__hists(evsel__leader(pos));
308
309 hists__match(leader_hists, hists);
310 hists__link(leader_hists, hists);
311 }
312 }
313
314 evlist__for_each_entry(evlist, pos) {
315 evsel__output_resort(pos, NULL);
316 }
317 }
318
perf_top__print_sym_table(struct perf_top * top)319 static void perf_top__print_sym_table(struct perf_top *top)
320 {
321 char bf[160];
322 int printed = 0;
323 const int win_width = top->winsize.ws_col - 1;
324 struct evsel *evsel = top->sym_evsel;
325 struct hists *hists = evsel__hists(evsel);
326
327 puts(CONSOLE_CLEAR);
328
329 perf_top__header_snprintf(top, bf, sizeof(bf));
330 printf("%s\n", bf);
331
332 printf("%-*.*s\n", win_width, win_width, graph_dotted_line);
333
334 if (!top->record_opts.overwrite &&
335 (top->evlist->stats.nr_lost_warned !=
336 top->evlist->stats.nr_events[PERF_RECORD_LOST])) {
337 top->evlist->stats.nr_lost_warned =
338 top->evlist->stats.nr_events[PERF_RECORD_LOST];
339 color_fprintf(stdout, PERF_COLOR_RED,
340 "WARNING: LOST %d chunks, Check IO/CPU overload",
341 top->evlist->stats.nr_lost_warned);
342 ++printed;
343 }
344
345 if (top->sym_filter_entry) {
346 perf_top__show_details(top);
347 return;
348 }
349
350 perf_top__resort_hists(top);
351
352 hists__output_recalc_col_len(hists, top->print_entries - printed);
353 putchar('\n');
354 hists__fprintf(hists, false, top->print_entries - printed, win_width,
355 top->min_percent, stdout, !symbol_conf.use_callchain);
356 }
357
prompt_integer(int * target,const char * msg)358 static void prompt_integer(int *target, const char *msg)
359 {
360 char *buf = NULL, *p;
361 size_t dummy = 0;
362 int tmp;
363
364 fprintf(stdout, "\n%s: ", msg);
365 if (getline(&buf, &dummy, stdin) < 0)
366 return;
367
368 p = strchr(buf, '\n');
369 if (p)
370 *p = 0;
371
372 p = buf;
373 while(*p) {
374 if (!isdigit(*p))
375 goto out_free;
376 p++;
377 }
378 tmp = strtoul(buf, NULL, 10);
379 *target = tmp;
380 out_free:
381 free(buf);
382 }
383
prompt_percent(int * target,const char * msg)384 static void prompt_percent(int *target, const char *msg)
385 {
386 int tmp = 0;
387
388 prompt_integer(&tmp, msg);
389 if (tmp >= 0 && tmp <= 100)
390 *target = tmp;
391 }
392
perf_top__prompt_symbol(struct perf_top * top,const char * msg)393 static void perf_top__prompt_symbol(struct perf_top *top, const char *msg)
394 {
395 char *buf = NULL, *p;
396 struct hist_entry *syme = top->sym_filter_entry, *n, *found = NULL;
397 struct hists *hists = evsel__hists(top->sym_evsel);
398 struct rb_node *next;
399 size_t dummy = 0;
400
401 /* zero counters of active symbol */
402 if (syme) {
403 __zero_source_counters(syme);
404 top->sym_filter_entry = NULL;
405 }
406
407 fprintf(stdout, "\n%s: ", msg);
408 if (getline(&buf, &dummy, stdin) < 0)
409 goto out_free;
410
411 p = strchr(buf, '\n');
412 if (p)
413 *p = 0;
414
415 next = rb_first_cached(&hists->entries);
416 while (next) {
417 n = rb_entry(next, struct hist_entry, rb_node);
418 if (n->ms.sym && !strcmp(buf, n->ms.sym->name)) {
419 found = n;
420 break;
421 }
422 next = rb_next(&n->rb_node);
423 }
424
425 if (!found) {
426 fprintf(stderr, "Sorry, %s is not active.\n", buf);
427 sleep(1);
428 } else
429 perf_top__parse_source(top, found);
430
431 out_free:
432 free(buf);
433 }
434
perf_top__print_mapped_keys(struct perf_top * top)435 static void perf_top__print_mapped_keys(struct perf_top *top)
436 {
437 char *name = NULL;
438
439 if (top->sym_filter_entry) {
440 struct symbol *sym = top->sym_filter_entry->ms.sym;
441 name = sym->name;
442 }
443
444 fprintf(stdout, "\nMapped keys:\n");
445 fprintf(stdout, "\t[d] display refresh delay. \t(%d)\n", top->delay_secs);
446 fprintf(stdout, "\t[e] display entries (lines). \t(%d)\n", top->print_entries);
447
448 if (top->evlist->core.nr_entries > 1)
449 fprintf(stdout, "\t[E] active event counter. \t(%s)\n", evsel__name(top->sym_evsel));
450
451 fprintf(stdout, "\t[f] profile display filter (count). \t(%d)\n", top->count_filter);
452
453 fprintf(stdout, "\t[F] annotate display filter (percent). \t(%d%%)\n", annotate_opts.min_pcnt);
454 fprintf(stdout, "\t[s] annotate symbol. \t(%s)\n", name?: "NULL");
455 fprintf(stdout, "\t[S] stop annotation.\n");
456
457 fprintf(stdout,
458 "\t[K] hide kernel symbols. \t(%s)\n",
459 top->hide_kernel_symbols ? "yes" : "no");
460 fprintf(stdout,
461 "\t[U] hide user symbols. \t(%s)\n",
462 top->hide_user_symbols ? "yes" : "no");
463 fprintf(stdout, "\t[z] toggle sample zeroing. \t(%d)\n", top->zero ? 1 : 0);
464 fprintf(stdout, "\t[qQ] quit.\n");
465 }
466
perf_top__key_mapped(struct perf_top * top,int c)467 static int perf_top__key_mapped(struct perf_top *top, int c)
468 {
469 switch (c) {
470 case 'd':
471 case 'e':
472 case 'f':
473 case 'z':
474 case 'q':
475 case 'Q':
476 case 'K':
477 case 'U':
478 case 'F':
479 case 's':
480 case 'S':
481 return 1;
482 case 'E':
483 return top->evlist->core.nr_entries > 1 ? 1 : 0;
484 default:
485 break;
486 }
487
488 return 0;
489 }
490
perf_top__handle_keypress(struct perf_top * top,int c)491 static bool perf_top__handle_keypress(struct perf_top *top, int c)
492 {
493 bool ret = true;
494
495 if (!perf_top__key_mapped(top, c)) {
496 struct pollfd stdin_poll = { .fd = 0, .events = POLLIN };
497 struct termios save;
498
499 perf_top__print_mapped_keys(top);
500 fprintf(stdout, "\nEnter selection, or unmapped key to continue: ");
501 fflush(stdout);
502
503 set_term_quiet_input(&save);
504
505 poll(&stdin_poll, 1, -1);
506 c = getc(stdin);
507
508 tcsetattr(0, TCSAFLUSH, &save);
509 if (!perf_top__key_mapped(top, c))
510 return ret;
511 }
512
513 switch (c) {
514 case 'd':
515 prompt_integer(&top->delay_secs, "Enter display delay");
516 if (top->delay_secs < 1)
517 top->delay_secs = 1;
518 break;
519 case 'e':
520 prompt_integer(&top->print_entries, "Enter display entries (lines)");
521 if (top->print_entries == 0) {
522 perf_top__resize(top);
523 signal(SIGWINCH, winch_sig);
524 } else {
525 signal(SIGWINCH, SIG_DFL);
526 }
527 break;
528 case 'E':
529 if (top->evlist->core.nr_entries > 1) {
530 /* Select 0 as the default event: */
531 int counter = 0;
532
533 fprintf(stderr, "\nAvailable events:");
534
535 evlist__for_each_entry(top->evlist, top->sym_evsel)
536 fprintf(stderr, "\n\t%d %s", top->sym_evsel->core.idx, evsel__name(top->sym_evsel));
537
538 prompt_integer(&counter, "Enter details event counter");
539
540 if (counter >= top->evlist->core.nr_entries) {
541 top->sym_evsel = evlist__first(top->evlist);
542 fprintf(stderr, "Sorry, no such event, using %s.\n", evsel__name(top->sym_evsel));
543 sleep(1);
544 break;
545 }
546 evlist__for_each_entry(top->evlist, top->sym_evsel)
547 if (top->sym_evsel->core.idx == counter)
548 break;
549 } else
550 top->sym_evsel = evlist__first(top->evlist);
551 break;
552 case 'f':
553 prompt_integer(&top->count_filter, "Enter display event count filter");
554 break;
555 case 'F':
556 prompt_percent(&annotate_opts.min_pcnt,
557 "Enter details display event filter (percent)");
558 break;
559 case 'K':
560 top->hide_kernel_symbols = !top->hide_kernel_symbols;
561 break;
562 case 'q':
563 case 'Q':
564 printf("exiting.\n");
565 if (top->dump_symtab)
566 perf_session__fprintf_dsos(top->session, stderr);
567 ret = false;
568 break;
569 case 's':
570 perf_top__prompt_symbol(top, "Enter details symbol");
571 break;
572 case 'S':
573 if (!top->sym_filter_entry)
574 break;
575 else {
576 struct hist_entry *syme = top->sym_filter_entry;
577
578 top->sym_filter_entry = NULL;
579 __zero_source_counters(syme);
580 }
581 break;
582 case 'U':
583 top->hide_user_symbols = !top->hide_user_symbols;
584 break;
585 case 'z':
586 top->zero = !top->zero;
587 break;
588 default:
589 break;
590 }
591
592 return ret;
593 }
594
perf_top__sort_new_samples(void * arg)595 static void perf_top__sort_new_samples(void *arg)
596 {
597 struct perf_top *t = arg;
598
599 if (t->evlist->selected != NULL)
600 t->sym_evsel = t->evlist->selected;
601
602 perf_top__resort_hists(t);
603
604 if (t->lost || t->drop)
605 pr_warning("Too slow to read ring buffer (change period (-c/-F) or limit CPUs (-C)\n");
606 }
607
stop_top(void)608 static void stop_top(void)
609 {
610 session_done = 1;
611 done = 1;
612 }
613
display_thread_tui(void * arg)614 static void *display_thread_tui(void *arg)
615 {
616 struct evsel *pos;
617 struct perf_top *top = arg;
618 const char *help = "For a higher level overview, try: perf top --sort comm,dso";
619 struct hist_browser_timer hbt = {
620 .timer = perf_top__sort_new_samples,
621 .arg = top,
622 .refresh = top->delay_secs,
623 };
624 int ret;
625
626 /* In order to read symbols from other namespaces perf to needs to call
627 * setns(2). This isn't permitted if the struct_fs has multiple users.
628 * unshare(2) the fs so that we may continue to setns into namespaces
629 * that we're observing.
630 */
631 unshare(CLONE_FS);
632
633 prctl(PR_SET_NAME, "perf-top-UI", 0, 0, 0);
634
635 repeat:
636 perf_top__sort_new_samples(top);
637
638 /*
639 * Initialize the uid_filter_str, in the future the TUI will allow
640 * Zooming in/out UIDs. For now just use whatever the user passed
641 * via --uid.
642 */
643 evlist__for_each_entry(top->evlist, pos) {
644 struct hists *hists = evsel__hists(pos);
645 hists->uid_filter_str = top->record_opts.target.uid_str;
646 }
647
648 ret = evlist__tui_browse_hists(top->evlist, help, &hbt, top->min_percent,
649 &top->session->header.env, !top->record_opts.overwrite);
650 if (ret == K_RELOAD) {
651 top->zero = true;
652 goto repeat;
653 } else
654 stop_top();
655
656 return NULL;
657 }
658
display_sig(int sig __maybe_unused)659 static void display_sig(int sig __maybe_unused)
660 {
661 stop_top();
662 }
663
display_setup_sig(void)664 static void display_setup_sig(void)
665 {
666 signal(SIGSEGV, sighandler_dump_stack);
667 signal(SIGFPE, sighandler_dump_stack);
668 signal(SIGINT, display_sig);
669 signal(SIGQUIT, display_sig);
670 signal(SIGTERM, display_sig);
671 }
672
display_thread(void * arg)673 static void *display_thread(void *arg)
674 {
675 struct pollfd stdin_poll = { .fd = 0, .events = POLLIN };
676 struct termios save;
677 struct perf_top *top = arg;
678 int delay_msecs, c;
679
680 /* In order to read symbols from other namespaces perf to needs to call
681 * setns(2). This isn't permitted if the struct_fs has multiple users.
682 * unshare(2) the fs so that we may continue to setns into namespaces
683 * that we're observing.
684 */
685 unshare(CLONE_FS);
686
687 prctl(PR_SET_NAME, "perf-top-UI", 0, 0, 0);
688
689 display_setup_sig();
690 pthread__unblock_sigwinch();
691 repeat:
692 delay_msecs = top->delay_secs * MSEC_PER_SEC;
693 set_term_quiet_input(&save);
694 /* trash return*/
695 clearerr(stdin);
696 if (poll(&stdin_poll, 1, 0) > 0)
697 getc(stdin);
698
699 while (!done) {
700 perf_top__print_sym_table(top);
701 /*
702 * Either timeout expired or we got an EINTR due to SIGWINCH,
703 * refresh screen in both cases.
704 */
705 switch (poll(&stdin_poll, 1, delay_msecs)) {
706 case 0:
707 continue;
708 case -1:
709 if (errno == EINTR)
710 continue;
711 fallthrough;
712 default:
713 c = getc(stdin);
714 tcsetattr(0, TCSAFLUSH, &save);
715
716 if (perf_top__handle_keypress(top, c))
717 goto repeat;
718 stop_top();
719 }
720 }
721
722 tcsetattr(0, TCSAFLUSH, &save);
723 return NULL;
724 }
725
hist_iter__top_callback(struct hist_entry_iter * iter,struct addr_location * al,bool single,void * arg)726 static int hist_iter__top_callback(struct hist_entry_iter *iter,
727 struct addr_location *al, bool single,
728 void *arg)
729 EXCLUSIVE_LOCKS_REQUIRED(iter->he->hists->lock)
730 {
731 struct perf_top *top = arg;
732 struct evsel *evsel = iter->evsel;
733
734 if (perf_hpp_list.sym && single)
735 perf_top__record_precise_ip(top, iter->he, iter->sample, evsel, al->addr);
736
737 hist__account_cycles(iter->sample->branch_stack, al, iter->sample,
738 !(top->record_opts.branch_stack & PERF_SAMPLE_BRANCH_ANY),
739 NULL, evsel);
740 return 0;
741 }
742
perf_event__process_sample(const struct perf_tool * tool,const union perf_event * event,struct evsel * evsel,struct perf_sample * sample,struct machine * machine)743 static void perf_event__process_sample(const struct perf_tool *tool,
744 const union perf_event *event,
745 struct evsel *evsel,
746 struct perf_sample *sample,
747 struct machine *machine)
748 {
749 struct perf_top *top = container_of(tool, struct perf_top, tool);
750 struct addr_location al;
751
752 if (!machine && perf_guest) {
753 static struct intlist *seen;
754
755 if (!seen)
756 seen = intlist__new(NULL);
757
758 if (!intlist__has_entry(seen, sample->pid)) {
759 pr_err("Can't find guest [%d]'s kernel information\n",
760 sample->pid);
761 intlist__add(seen, sample->pid);
762 }
763 return;
764 }
765
766 if (!machine) {
767 pr_err("%u unprocessable samples recorded.\r",
768 top->session->evlist->stats.nr_unprocessable_samples++);
769 return;
770 }
771
772 if (event->header.misc & PERF_RECORD_MISC_EXACT_IP)
773 top->exact_samples++;
774
775 addr_location__init(&al);
776 if (machine__resolve(machine, &al, sample) < 0)
777 goto out;
778
779 if (top->stitch_lbr)
780 thread__set_lbr_stitch_enable(al.thread, true);
781
782 if (!machine->kptr_restrict_warned &&
783 symbol_conf.kptr_restrict &&
784 al.cpumode == PERF_RECORD_MISC_KERNEL) {
785 if (!evlist__exclude_kernel(top->session->evlist)) {
786 ui__warning(
787 "Kernel address maps (/proc/{kallsyms,modules}) are restricted.\n\n"
788 "Check /proc/sys/kernel/kptr_restrict and /proc/sys/kernel/perf_event_paranoid.\n\n"
789 "Kernel%s samples will not be resolved.\n",
790 al.map && map__has_symbols(al.map) ?
791 " modules" : "");
792 if (use_browser <= 0)
793 sleep(5);
794 }
795 machine->kptr_restrict_warned = true;
796 }
797
798 if (al.sym == NULL && al.map != NULL) {
799 const char *msg = "Kernel samples will not be resolved.\n";
800 /*
801 * As we do lazy loading of symtabs we only will know if the
802 * specified vmlinux file is invalid when we actually have a
803 * hit in kernel space and then try to load it. So if we get
804 * here and there are _no_ symbols in the DSO backing the
805 * kernel map, bail out.
806 *
807 * We may never get here, for instance, if we use -K/
808 * --hide-kernel-symbols, even if the user specifies an
809 * invalid --vmlinux ;-)
810 */
811 if (!machine->kptr_restrict_warned && !top->vmlinux_warned &&
812 __map__is_kernel(al.map) && map__has_symbols(al.map)) {
813 if (symbol_conf.vmlinux_name) {
814 char serr[256];
815
816 dso__strerror_load(map__dso(al.map), serr, sizeof(serr));
817 ui__warning("The %s file can't be used: %s\n%s",
818 symbol_conf.vmlinux_name, serr, msg);
819 } else {
820 ui__warning("A vmlinux file was not found.\n%s",
821 msg);
822 }
823
824 if (use_browser <= 0)
825 sleep(5);
826 top->vmlinux_warned = true;
827 }
828 }
829
830 if (al.sym == NULL || !al.sym->idle) {
831 struct hists *hists = evsel__hists(evsel);
832 struct hist_entry_iter iter = {
833 .evsel = evsel,
834 .sample = sample,
835 .add_entry_cb = hist_iter__top_callback,
836 };
837
838 if (symbol_conf.cumulate_callchain)
839 iter.ops = &hist_iter_cumulative;
840 else
841 iter.ops = &hist_iter_normal;
842
843 mutex_lock(&hists->lock);
844
845 if (hist_entry_iter__add(&iter, &al, top->max_stack, top) < 0)
846 pr_err("Problem incrementing symbol period, skipping event\n");
847
848 mutex_unlock(&hists->lock);
849 }
850
851 out:
852 addr_location__exit(&al);
853 }
854
855 static void
perf_top__process_lost(struct perf_top * top,union perf_event * event,struct evsel * evsel)856 perf_top__process_lost(struct perf_top *top, union perf_event *event,
857 struct evsel *evsel)
858 {
859 top->lost += event->lost.lost;
860 top->lost_total += event->lost.lost;
861 evsel->evlist->stats.total_lost += event->lost.lost;
862 }
863
864 static void
perf_top__process_lost_samples(struct perf_top * top,union perf_event * event,struct evsel * evsel)865 perf_top__process_lost_samples(struct perf_top *top,
866 union perf_event *event,
867 struct evsel *evsel)
868 {
869 top->lost += event->lost_samples.lost;
870 top->lost_total += event->lost_samples.lost;
871 evsel->evlist->stats.total_lost_samples += event->lost_samples.lost;
872 }
873
874 static u64 last_timestamp;
875
perf_top__mmap_read_idx(struct perf_top * top,int idx)876 static void perf_top__mmap_read_idx(struct perf_top *top, int idx)
877 {
878 struct record_opts *opts = &top->record_opts;
879 struct evlist *evlist = top->evlist;
880 struct mmap *md;
881 union perf_event *event;
882
883 md = opts->overwrite ? &evlist->overwrite_mmap[idx] : &evlist->mmap[idx];
884 if (perf_mmap__read_init(&md->core) < 0)
885 return;
886
887 while ((event = perf_mmap__read_event(&md->core)) != NULL) {
888 int ret;
889
890 ret = evlist__parse_sample_timestamp(evlist, event, &last_timestamp);
891 if (ret && ret != -1)
892 break;
893
894 ret = ordered_events__queue(top->qe.in, event, last_timestamp, 0, NULL);
895 if (ret)
896 break;
897
898 perf_mmap__consume(&md->core);
899
900 if (top->qe.rotate) {
901 mutex_lock(&top->qe.mutex);
902 top->qe.rotate = false;
903 cond_signal(&top->qe.cond);
904 mutex_unlock(&top->qe.mutex);
905 }
906 }
907
908 perf_mmap__read_done(&md->core);
909 }
910
perf_top__mmap_read(struct perf_top * top)911 static void perf_top__mmap_read(struct perf_top *top)
912 {
913 bool overwrite = top->record_opts.overwrite;
914 struct evlist *evlist = top->evlist;
915 int i;
916
917 if (overwrite)
918 evlist__toggle_bkw_mmap(evlist, BKW_MMAP_DATA_PENDING);
919
920 for (i = 0; i < top->evlist->core.nr_mmaps; i++)
921 perf_top__mmap_read_idx(top, i);
922
923 if (overwrite) {
924 evlist__toggle_bkw_mmap(evlist, BKW_MMAP_EMPTY);
925 evlist__toggle_bkw_mmap(evlist, BKW_MMAP_RUNNING);
926 }
927 }
928
929 /*
930 * Check per-event overwrite term.
931 * perf top should support consistent term for all events.
932 * - All events don't have per-event term
933 * E.g. "cpu/cpu-cycles/,cpu/instructions/"
934 * Nothing change, return 0.
935 * - All events have same per-event term
936 * E.g. "cpu/cpu-cycles,no-overwrite/,cpu/instructions,no-overwrite/
937 * Using the per-event setting to replace the opts->overwrite if
938 * they are different, then return 0.
939 * - Events have different per-event term
940 * E.g. "cpu/cpu-cycles,overwrite/,cpu/instructions,no-overwrite/"
941 * Return -1
942 * - Some of the event set per-event term, but some not.
943 * E.g. "cpu/cpu-cycles/,cpu/instructions,no-overwrite/"
944 * Return -1
945 */
perf_top__overwrite_check(struct perf_top * top)946 static int perf_top__overwrite_check(struct perf_top *top)
947 {
948 struct record_opts *opts = &top->record_opts;
949 struct evlist *evlist = top->evlist;
950 struct evsel_config_term *term;
951 struct list_head *config_terms;
952 struct evsel *evsel;
953 int set, overwrite = -1;
954
955 evlist__for_each_entry(evlist, evsel) {
956 set = -1;
957 config_terms = &evsel->config_terms;
958 list_for_each_entry(term, config_terms, list) {
959 if (term->type == EVSEL__CONFIG_TERM_OVERWRITE)
960 set = term->val.overwrite ? 1 : 0;
961 }
962
963 /* no term for current and previous event (likely) */
964 if ((overwrite < 0) && (set < 0))
965 continue;
966
967 /* has term for both current and previous event, compare */
968 if ((overwrite >= 0) && (set >= 0) && (overwrite != set))
969 return -1;
970
971 /* no term for current event but has term for previous one */
972 if ((overwrite >= 0) && (set < 0))
973 return -1;
974
975 /* has term for current event */
976 if ((overwrite < 0) && (set >= 0)) {
977 /* if it's first event, set overwrite */
978 if (evsel == evlist__first(evlist))
979 overwrite = set;
980 else
981 return -1;
982 }
983 }
984
985 if ((overwrite >= 0) && (opts->overwrite != overwrite))
986 opts->overwrite = overwrite;
987
988 return 0;
989 }
990
perf_top_overwrite_fallback(struct perf_top * top,struct evsel * evsel)991 static int perf_top_overwrite_fallback(struct perf_top *top,
992 struct evsel *evsel)
993 {
994 struct record_opts *opts = &top->record_opts;
995 struct evlist *evlist = top->evlist;
996 struct evsel *counter;
997
998 if (!opts->overwrite)
999 return 0;
1000
1001 /* only fall back when first event fails */
1002 if (evsel != evlist__first(evlist))
1003 return 0;
1004
1005 evlist__for_each_entry(evlist, counter)
1006 counter->core.attr.write_backward = false;
1007 opts->overwrite = false;
1008 pr_debug2("fall back to non-overwrite mode\n");
1009 return 1;
1010 }
1011
perf_top__start_counters(struct perf_top * top)1012 static int perf_top__start_counters(struct perf_top *top)
1013 {
1014 char msg[BUFSIZ];
1015 struct evsel *counter;
1016 struct evlist *evlist = top->evlist;
1017 struct record_opts *opts = &top->record_opts;
1018
1019 if (perf_top__overwrite_check(top)) {
1020 ui__error("perf top only support consistent per-event "
1021 "overwrite setting for all events\n");
1022 goto out_err;
1023 }
1024
1025 evlist__config(evlist, opts, &callchain_param);
1026
1027 evlist__for_each_entry(evlist, counter) {
1028 try_again:
1029 if (evsel__open(counter, counter->core.cpus,
1030 counter->core.threads) < 0) {
1031
1032 /*
1033 * Specially handle overwrite fall back.
1034 * Because perf top is the only tool which has
1035 * overwrite mode by default, support
1036 * both overwrite and non-overwrite mode, and
1037 * require consistent mode for all events.
1038 *
1039 * May move it to generic code with more tools
1040 * have similar attribute.
1041 */
1042 if (perf_missing_features.write_backward &&
1043 perf_top_overwrite_fallback(top, counter))
1044 goto try_again;
1045
1046 if (evsel__fallback(counter, &opts->target, errno, msg, sizeof(msg))) {
1047 if (verbose > 0)
1048 ui__warning("%s\n", msg);
1049 goto try_again;
1050 }
1051
1052 evsel__open_strerror(counter, &opts->target, errno, msg, sizeof(msg));
1053 ui__error("%s\n", msg);
1054 goto out_err;
1055 }
1056 }
1057
1058 if (evlist__apply_filters(evlist, &counter, &opts->target)) {
1059 pr_err("failed to set filter \"%s\" on event %s with %d (%s)\n",
1060 counter->filter ?: "BPF", evsel__name(counter), errno,
1061 str_error_r(errno, msg, sizeof(msg)));
1062 goto out_err;
1063 }
1064
1065 if (evlist__mmap(evlist, opts->mmap_pages) < 0) {
1066 ui__error("Failed to mmap with %d (%s)\n",
1067 errno, str_error_r(errno, msg, sizeof(msg)));
1068 goto out_err;
1069 }
1070
1071 return 0;
1072
1073 out_err:
1074 return -1;
1075 }
1076
callchain_param__setup_sample_type(struct callchain_param * callchain)1077 static int callchain_param__setup_sample_type(struct callchain_param *callchain)
1078 {
1079 if (callchain->mode != CHAIN_NONE) {
1080 if (callchain_register_param(callchain) < 0) {
1081 ui__error("Can't register callchain params.\n");
1082 return -EINVAL;
1083 }
1084 }
1085
1086 return 0;
1087 }
1088
rotate_queues(struct perf_top * top)1089 static struct ordered_events *rotate_queues(struct perf_top *top)
1090 {
1091 struct ordered_events *in = top->qe.in;
1092
1093 if (top->qe.in == &top->qe.data[1])
1094 top->qe.in = &top->qe.data[0];
1095 else
1096 top->qe.in = &top->qe.data[1];
1097
1098 return in;
1099 }
1100
process_thread(void * arg)1101 static void *process_thread(void *arg)
1102 {
1103 struct perf_top *top = arg;
1104
1105 while (!done) {
1106 struct ordered_events *out, *in = top->qe.in;
1107
1108 if (!in->nr_events) {
1109 usleep(100);
1110 continue;
1111 }
1112
1113 out = rotate_queues(top);
1114
1115 mutex_lock(&top->qe.mutex);
1116 top->qe.rotate = true;
1117 cond_wait(&top->qe.cond, &top->qe.mutex);
1118 mutex_unlock(&top->qe.mutex);
1119
1120 if (ordered_events__flush(out, OE_FLUSH__TOP))
1121 pr_err("failed to process events\n");
1122 }
1123
1124 return NULL;
1125 }
1126
1127 /*
1128 * Allow only 'top->delay_secs' seconds behind samples.
1129 */
should_drop(struct ordered_event * qevent,struct perf_top * top)1130 static int should_drop(struct ordered_event *qevent, struct perf_top *top)
1131 {
1132 union perf_event *event = qevent->event;
1133 u64 delay_timestamp;
1134
1135 if (event->header.type != PERF_RECORD_SAMPLE)
1136 return false;
1137
1138 delay_timestamp = qevent->timestamp + top->delay_secs * NSEC_PER_SEC;
1139 return delay_timestamp < last_timestamp;
1140 }
1141
deliver_event(struct ordered_events * qe,struct ordered_event * qevent)1142 static int deliver_event(struct ordered_events *qe,
1143 struct ordered_event *qevent)
1144 {
1145 struct perf_top *top = qe->data;
1146 struct evlist *evlist = top->evlist;
1147 struct perf_session *session = top->session;
1148 union perf_event *event = qevent->event;
1149 struct perf_sample sample;
1150 struct evsel *evsel;
1151 struct machine *machine;
1152 int ret = -1;
1153
1154 if (should_drop(qevent, top)) {
1155 top->drop++;
1156 top->drop_total++;
1157 return 0;
1158 }
1159
1160 ret = evlist__parse_sample(evlist, event, &sample);
1161 if (ret) {
1162 pr_err("Can't parse sample, err = %d\n", ret);
1163 goto next_event;
1164 }
1165
1166 evsel = evlist__id2evsel(session->evlist, sample.id);
1167 assert(evsel != NULL);
1168
1169 if (event->header.type == PERF_RECORD_SAMPLE) {
1170 if (evswitch__discard(&top->evswitch, evsel))
1171 return 0;
1172 ++top->samples;
1173 }
1174
1175 switch (sample.cpumode) {
1176 case PERF_RECORD_MISC_USER:
1177 ++top->us_samples;
1178 if (top->hide_user_symbols)
1179 goto next_event;
1180 machine = &session->machines.host;
1181 break;
1182 case PERF_RECORD_MISC_KERNEL:
1183 ++top->kernel_samples;
1184 if (top->hide_kernel_symbols)
1185 goto next_event;
1186 machine = &session->machines.host;
1187 break;
1188 case PERF_RECORD_MISC_GUEST_KERNEL:
1189 ++top->guest_kernel_samples;
1190 machine = perf_session__find_machine(session,
1191 sample.pid);
1192 break;
1193 case PERF_RECORD_MISC_GUEST_USER:
1194 ++top->guest_us_samples;
1195 /*
1196 * TODO: we don't process guest user from host side
1197 * except simple counting.
1198 */
1199 goto next_event;
1200 default:
1201 if (event->header.type == PERF_RECORD_SAMPLE)
1202 goto next_event;
1203 machine = &session->machines.host;
1204 break;
1205 }
1206
1207 if (event->header.type == PERF_RECORD_SAMPLE) {
1208 perf_event__process_sample(&top->tool, event, evsel,
1209 &sample, machine);
1210 } else if (event->header.type == PERF_RECORD_LOST) {
1211 perf_top__process_lost(top, event, evsel);
1212 } else if (event->header.type == PERF_RECORD_LOST_SAMPLES) {
1213 perf_top__process_lost_samples(top, event, evsel);
1214 } else if (event->header.type < PERF_RECORD_MAX) {
1215 events_stats__inc(&session->evlist->stats, event->header.type);
1216 machine__process_event(machine, event, &sample);
1217 } else
1218 ++session->evlist->stats.nr_unknown_events;
1219
1220 ret = 0;
1221 next_event:
1222 return ret;
1223 }
1224
init_process_thread(struct perf_top * top)1225 static void init_process_thread(struct perf_top *top)
1226 {
1227 ordered_events__init(&top->qe.data[0], deliver_event, top);
1228 ordered_events__init(&top->qe.data[1], deliver_event, top);
1229 ordered_events__set_copy_on_queue(&top->qe.data[0], true);
1230 ordered_events__set_copy_on_queue(&top->qe.data[1], true);
1231 top->qe.in = &top->qe.data[0];
1232 mutex_init(&top->qe.mutex);
1233 cond_init(&top->qe.cond);
1234 }
1235
exit_process_thread(struct perf_top * top)1236 static void exit_process_thread(struct perf_top *top)
1237 {
1238 ordered_events__free(&top->qe.data[0]);
1239 ordered_events__free(&top->qe.data[1]);
1240 mutex_destroy(&top->qe.mutex);
1241 cond_destroy(&top->qe.cond);
1242 }
1243
__cmd_top(struct perf_top * top)1244 static int __cmd_top(struct perf_top *top)
1245 {
1246 struct record_opts *opts = &top->record_opts;
1247 pthread_t thread, thread_process;
1248 int ret;
1249
1250 if (!annotate_opts.objdump_path) {
1251 ret = perf_env__lookup_objdump(&top->session->header.env,
1252 &annotate_opts.objdump_path);
1253 if (ret)
1254 return ret;
1255 }
1256
1257 ret = callchain_param__setup_sample_type(&callchain_param);
1258 if (ret)
1259 return ret;
1260
1261 if (perf_session__register_idle_thread(top->session) < 0)
1262 return ret;
1263
1264 if (top->nr_threads_synthesize > 1)
1265 perf_set_multithreaded();
1266
1267 init_process_thread(top);
1268
1269 if (opts->record_namespaces)
1270 top->tool.namespace_events = true;
1271 if (opts->record_cgroup) {
1272 #ifdef HAVE_FILE_HANDLE
1273 top->tool.cgroup_events = true;
1274 #else
1275 pr_err("cgroup tracking is not supported.\n");
1276 return -1;
1277 #endif
1278 }
1279
1280 ret = perf_event__synthesize_bpf_events(top->session, perf_event__process,
1281 &top->session->machines.host,
1282 &top->record_opts);
1283 if (ret < 0)
1284 pr_debug("Couldn't synthesize BPF events: Pre-existing BPF programs won't have symbols resolved.\n");
1285
1286 ret = perf_event__synthesize_cgroups(&top->tool, perf_event__process,
1287 &top->session->machines.host);
1288 if (ret < 0)
1289 pr_debug("Couldn't synthesize cgroup events.\n");
1290
1291 machine__synthesize_threads(&top->session->machines.host, &opts->target,
1292 top->evlist->core.threads, true, false,
1293 top->nr_threads_synthesize);
1294
1295 perf_set_multithreaded();
1296
1297 if (perf_hpp_list.socket) {
1298 ret = perf_env__read_cpu_topology_map(&perf_env);
1299 if (ret < 0) {
1300 char errbuf[BUFSIZ];
1301 const char *err = str_error_r(-ret, errbuf, sizeof(errbuf));
1302
1303 ui__error("Could not read the CPU topology map: %s\n", err);
1304 return ret;
1305 }
1306 }
1307
1308 evlist__uniquify_name(top->evlist);
1309 ret = perf_top__start_counters(top);
1310 if (ret)
1311 return ret;
1312
1313 top->session->evlist = top->evlist;
1314 perf_session__set_id_hdr_size(top->session);
1315
1316 /*
1317 * When perf is starting the traced process, all the events (apart from
1318 * group members) have enable_on_exec=1 set, so don't spoil it by
1319 * prematurely enabling them.
1320 *
1321 * XXX 'top' still doesn't start workloads like record, trace, but should,
1322 * so leave the check here.
1323 */
1324 if (!target__none(&opts->target))
1325 evlist__enable(top->evlist);
1326
1327 ret = -1;
1328 if (pthread_create(&thread_process, NULL, process_thread, top)) {
1329 ui__error("Could not create process thread.\n");
1330 return ret;
1331 }
1332
1333 if (pthread_create(&thread, NULL, (use_browser > 0 ? display_thread_tui :
1334 display_thread), top)) {
1335 ui__error("Could not create display thread.\n");
1336 goto out_join_thread;
1337 }
1338
1339 if (top->realtime_prio) {
1340 struct sched_param param;
1341
1342 param.sched_priority = top->realtime_prio;
1343 if (sched_setscheduler(0, SCHED_FIFO, ¶m)) {
1344 ui__error("Could not set realtime priority.\n");
1345 goto out_join;
1346 }
1347 }
1348
1349 /* Wait for a minimal set of events before starting the snapshot */
1350 evlist__poll(top->evlist, 100);
1351
1352 perf_top__mmap_read(top);
1353
1354 while (!done) {
1355 u64 hits = top->samples;
1356
1357 perf_top__mmap_read(top);
1358
1359 if (opts->overwrite || (hits == top->samples))
1360 ret = evlist__poll(top->evlist, 100);
1361
1362 if (resize) {
1363 perf_top__resize(top);
1364 resize = 0;
1365 }
1366 }
1367
1368 ret = 0;
1369 out_join:
1370 pthread_join(thread, NULL);
1371 out_join_thread:
1372 cond_signal(&top->qe.cond);
1373 pthread_join(thread_process, NULL);
1374 perf_set_singlethreaded();
1375 exit_process_thread(top);
1376 return ret;
1377 }
1378
1379 static int
callchain_opt(const struct option * opt,const char * arg,int unset)1380 callchain_opt(const struct option *opt, const char *arg, int unset)
1381 {
1382 symbol_conf.use_callchain = true;
1383 return record_callchain_opt(opt, arg, unset);
1384 }
1385
1386 static int
parse_callchain_opt(const struct option * opt,const char * arg,int unset)1387 parse_callchain_opt(const struct option *opt, const char *arg, int unset)
1388 {
1389 struct callchain_param *callchain = opt->value;
1390
1391 callchain->enabled = !unset;
1392 callchain->record_mode = CALLCHAIN_FP;
1393
1394 /*
1395 * --no-call-graph
1396 */
1397 if (unset) {
1398 symbol_conf.use_callchain = false;
1399 callchain->record_mode = CALLCHAIN_NONE;
1400 return 0;
1401 }
1402
1403 return parse_callchain_top_opt(arg);
1404 }
1405
perf_top_config(const char * var,const char * value,void * cb __maybe_unused)1406 static int perf_top_config(const char *var, const char *value, void *cb __maybe_unused)
1407 {
1408 if (!strcmp(var, "top.call-graph")) {
1409 var = "call-graph.record-mode";
1410 return perf_default_config(var, value, cb);
1411 }
1412 if (!strcmp(var, "top.children")) {
1413 symbol_conf.cumulate_callchain = perf_config_bool(var, value);
1414 return 0;
1415 }
1416
1417 return 0;
1418 }
1419
1420 static int
parse_percent_limit(const struct option * opt,const char * arg,int unset __maybe_unused)1421 parse_percent_limit(const struct option *opt, const char *arg,
1422 int unset __maybe_unused)
1423 {
1424 struct perf_top *top = opt->value;
1425
1426 top->min_percent = strtof(arg, NULL);
1427 return 0;
1428 }
1429
1430 const char top_callchain_help[] = CALLCHAIN_RECORD_HELP CALLCHAIN_REPORT_HELP
1431 "\n\t\t\t\tDefault: fp,graph,0.5,caller,function";
1432
cmd_top(int argc,const char ** argv)1433 int cmd_top(int argc, const char **argv)
1434 {
1435 char errbuf[BUFSIZ];
1436 struct perf_top top = {
1437 .count_filter = 5,
1438 .delay_secs = 2,
1439 .record_opts = {
1440 .mmap_pages = UINT_MAX,
1441 .user_freq = UINT_MAX,
1442 .user_interval = ULLONG_MAX,
1443 .freq = 4000, /* 4 KHz */
1444 .target = {
1445 .uses_mmap = true,
1446 },
1447 /*
1448 * FIXME: This will lose PERF_RECORD_MMAP and other metadata
1449 * when we pause, fix that and reenable. Probably using a
1450 * separate evlist with a dummy event, i.e. a non-overwrite
1451 * ring buffer just for metadata events, while PERF_RECORD_SAMPLE
1452 * stays in overwrite mode. -acme
1453 * */
1454 .overwrite = 0,
1455 .sample_time = true,
1456 .sample_time_set = true,
1457 },
1458 .max_stack = sysctl__max_stack(),
1459 .nr_threads_synthesize = UINT_MAX,
1460 };
1461 struct parse_events_option_args parse_events_option_args = {
1462 .evlistp = &top.evlist,
1463 };
1464 bool branch_call_mode = false;
1465 struct record_opts *opts = &top.record_opts;
1466 struct target *target = &opts->target;
1467 const char *disassembler_style = NULL, *objdump_path = NULL, *addr2line_path = NULL;
1468 const struct option options[] = {
1469 OPT_CALLBACK('e', "event", &parse_events_option_args, "event",
1470 "event selector. use 'perf list' to list available events",
1471 parse_events_option),
1472 OPT_CALLBACK(0, "filter", &top.evlist, "filter",
1473 "event filter", parse_filter),
1474 OPT_U64('c', "count", &opts->user_interval, "event period to sample"),
1475 OPT_STRING('p', "pid", &target->pid, "pid",
1476 "profile events on existing process id"),
1477 OPT_STRING('t', "tid", &target->tid, "tid",
1478 "profile events on existing thread id"),
1479 OPT_BOOLEAN('a', "all-cpus", &target->system_wide,
1480 "system-wide collection from all CPUs"),
1481 OPT_STRING('C', "cpu", &target->cpu_list, "cpu",
1482 "list of cpus to monitor"),
1483 OPT_STRING('k', "vmlinux", &symbol_conf.vmlinux_name,
1484 "file", "vmlinux pathname"),
1485 OPT_BOOLEAN(0, "ignore-vmlinux", &symbol_conf.ignore_vmlinux,
1486 "don't load vmlinux even if found"),
1487 OPT_STRING(0, "kallsyms", &symbol_conf.kallsyms_name,
1488 "file", "kallsyms pathname"),
1489 OPT_BOOLEAN('K', "hide_kernel_symbols", &top.hide_kernel_symbols,
1490 "hide kernel symbols"),
1491 OPT_CALLBACK('m', "mmap-pages", &opts->mmap_pages, "pages",
1492 "number of mmap data pages", evlist__parse_mmap_pages),
1493 OPT_INTEGER('r', "realtime", &top.realtime_prio,
1494 "collect data with this RT SCHED_FIFO priority"),
1495 OPT_INTEGER('d', "delay", &top.delay_secs,
1496 "number of seconds to delay between refreshes"),
1497 OPT_BOOLEAN('D', "dump-symtab", &top.dump_symtab,
1498 "dump the symbol table used for profiling"),
1499 OPT_INTEGER('f', "count-filter", &top.count_filter,
1500 "only display functions with more events than this"),
1501 OPT_BOOLEAN('i', "no-inherit", &opts->no_inherit,
1502 "child tasks do not inherit counters"),
1503 OPT_STRING(0, "sym-annotate", &top.sym_filter, "symbol name",
1504 "symbol to annotate"),
1505 OPT_BOOLEAN('z', "zero", &top.zero, "zero history across updates"),
1506 OPT_CALLBACK('F', "freq", &top.record_opts, "freq or 'max'",
1507 "profile at this frequency",
1508 record__parse_freq),
1509 OPT_INTEGER('E', "entries", &top.print_entries,
1510 "display this many functions"),
1511 OPT_BOOLEAN('U', "hide_user_symbols", &top.hide_user_symbols,
1512 "hide user symbols"),
1513 #ifdef HAVE_SLANG_SUPPORT
1514 OPT_BOOLEAN(0, "tui", &top.use_tui, "Use the TUI interface"),
1515 #endif
1516 OPT_BOOLEAN(0, "stdio", &top.use_stdio, "Use the stdio interface"),
1517 OPT_INCR('v', "verbose", &verbose,
1518 "be more verbose (show counter open errors, etc)"),
1519 OPT_STRING('s', "sort", &sort_order, "key[,key2...]",
1520 "sort by key(s): pid, comm, dso, symbol, parent, cpu, srcline, ..."
1521 " Please refer the man page for the complete list."),
1522 OPT_STRING(0, "fields", &field_order, "key[,keys...]",
1523 "output field(s): overhead, period, sample plus all of sort keys"),
1524 OPT_BOOLEAN('n', "show-nr-samples", &symbol_conf.show_nr_samples,
1525 "Show a column with the number of samples"),
1526 OPT_CALLBACK_NOOPT('g', NULL, &callchain_param,
1527 NULL, "enables call-graph recording and display",
1528 &callchain_opt),
1529 OPT_CALLBACK(0, "call-graph", &callchain_param,
1530 "record_mode[,record_size],print_type,threshold[,print_limit],order,sort_key[,branch]",
1531 top_callchain_help, &parse_callchain_opt),
1532 OPT_BOOLEAN(0, "children", &symbol_conf.cumulate_callchain,
1533 "Accumulate callchains of children and show total overhead as well"),
1534 OPT_INTEGER(0, "max-stack", &top.max_stack,
1535 "Set the maximum stack depth when parsing the callchain. "
1536 "Default: kernel.perf_event_max_stack or " __stringify(PERF_MAX_STACK_DEPTH)),
1537 OPT_CALLBACK(0, "ignore-callees", NULL, "regex",
1538 "ignore callees of these functions in call graphs",
1539 report_parse_ignore_callees_opt),
1540 OPT_BOOLEAN(0, "show-total-period", &symbol_conf.show_total_period,
1541 "Show a column with the sum of periods"),
1542 OPT_STRING(0, "dsos", &symbol_conf.dso_list_str, "dso[,dso...]",
1543 "only consider symbols in these dsos"),
1544 OPT_STRING(0, "comms", &symbol_conf.comm_list_str, "comm[,comm...]",
1545 "only consider symbols in these comms"),
1546 OPT_STRING(0, "symbols", &symbol_conf.sym_list_str, "symbol[,symbol...]",
1547 "only consider these symbols"),
1548 OPT_BOOLEAN(0, "source", &annotate_opts.annotate_src,
1549 "Interleave source code with assembly code (default)"),
1550 OPT_BOOLEAN(0, "asm-raw", &annotate_opts.show_asm_raw,
1551 "Display raw encoding of assembly instructions (default)"),
1552 OPT_BOOLEAN(0, "demangle-kernel", &symbol_conf.demangle_kernel,
1553 "Enable kernel symbol demangling"),
1554 OPT_BOOLEAN(0, "no-bpf-event", &top.record_opts.no_bpf_event, "do not record bpf events"),
1555 OPT_STRING(0, "objdump", &objdump_path, "path",
1556 "objdump binary to use for disassembly and annotations"),
1557 OPT_STRING(0, "addr2line", &addr2line_path, "path",
1558 "addr2line binary to use for line numbers"),
1559 OPT_STRING('M', "disassembler-style", &disassembler_style, "disassembler style",
1560 "Specify disassembler style (e.g. -M intel for intel syntax)"),
1561 OPT_STRING(0, "prefix", &annotate_opts.prefix, "prefix",
1562 "Add prefix to source file path names in programs (with --prefix-strip)"),
1563 OPT_STRING(0, "prefix-strip", &annotate_opts.prefix_strip, "N",
1564 "Strip first N entries of source file path name in programs (with --prefix)"),
1565 OPT_STRING('u', "uid", &target->uid_str, "user", "user to profile"),
1566 OPT_CALLBACK(0, "percent-limit", &top, "percent",
1567 "Don't show entries under that percent", parse_percent_limit),
1568 OPT_CALLBACK(0, "percentage", NULL, "relative|absolute",
1569 "How to display percentage of filtered entries", parse_filter_percentage),
1570 OPT_STRING('w', "column-widths", &symbol_conf.col_width_list_str,
1571 "width[,width...]",
1572 "don't try to adjust column width, use these fixed values"),
1573 OPT_UINTEGER(0, "proc-map-timeout", &proc_map_timeout,
1574 "per thread proc mmap processing timeout in ms"),
1575 OPT_CALLBACK_NOOPT('b', "branch-any", &opts->branch_stack,
1576 "branch any", "sample any taken branches",
1577 parse_branch_stack),
1578 OPT_CALLBACK('j', "branch-filter", &opts->branch_stack,
1579 "branch filter mask", "branch stack filter modes",
1580 parse_branch_stack),
1581 OPT_BOOLEAN(0, "branch-history", &branch_call_mode,
1582 "add last branch records to call history"),
1583 OPT_BOOLEAN(0, "raw-trace", &symbol_conf.raw_trace,
1584 "Show raw trace event output (do not use print fmt or plugins)"),
1585 OPT_BOOLEAN('H', "hierarchy", &symbol_conf.report_hierarchy,
1586 "Show entries in a hierarchy"),
1587 OPT_BOOLEAN(0, "overwrite", &top.record_opts.overwrite,
1588 "Use a backward ring buffer, default: no"),
1589 OPT_BOOLEAN(0, "force", &symbol_conf.force, "don't complain, do it"),
1590 OPT_UINTEGER(0, "num-thread-synthesize", &top.nr_threads_synthesize,
1591 "number of thread to run event synthesize"),
1592 OPT_CALLBACK('G', "cgroup", &top.evlist, "name",
1593 "monitor event in cgroup name only", parse_cgroups),
1594 OPT_BOOLEAN(0, "namespaces", &opts->record_namespaces,
1595 "Record namespaces events"),
1596 OPT_BOOLEAN(0, "all-cgroups", &opts->record_cgroup,
1597 "Record cgroup events"),
1598 OPT_INTEGER(0, "group-sort-idx", &symbol_conf.group_sort_idx,
1599 "Sort the output by the event at the index n in group. "
1600 "If n is invalid, sort by the first event. "
1601 "WARNING: should be used on grouped events."),
1602 OPT_BOOLEAN(0, "stitch-lbr", &top.stitch_lbr,
1603 "Enable LBR callgraph stitching approach"),
1604 #ifdef HAVE_LIBPFM
1605 OPT_CALLBACK(0, "pfm-events", &top.evlist, "event",
1606 "libpfm4 event selector. use 'perf list' to list available events",
1607 parse_libpfm_events_option),
1608 #endif
1609 OPTS_EVSWITCH(&top.evswitch),
1610 OPT_END()
1611 };
1612 const char * const top_usage[] = {
1613 "perf top [<options>]",
1614 NULL
1615 };
1616 int status = hists__init();
1617
1618 if (status < 0)
1619 return status;
1620
1621 annotation_options__init();
1622
1623 annotate_opts.min_pcnt = 5;
1624 annotate_opts.context = 4;
1625
1626 top.evlist = evlist__new();
1627 if (top.evlist == NULL)
1628 return -ENOMEM;
1629
1630 status = perf_config(perf_top_config, &top);
1631 if (status)
1632 return status;
1633 /*
1634 * Since the per arch annotation init routine may need the cpuid, read
1635 * it here, since we are not getting this from the perf.data header.
1636 */
1637 status = perf_env__read_cpuid(&perf_env);
1638 if (status) {
1639 /*
1640 * Some arches do not provide a get_cpuid(), so just use pr_debug, otherwise
1641 * warn the user explicitly.
1642 */
1643 eprintf(status == ENOSYS ? 1 : 0, verbose,
1644 "Couldn't read the cpuid for this machine: %s\n",
1645 str_error_r(errno, errbuf, sizeof(errbuf)));
1646 }
1647 top.evlist->env = &perf_env;
1648
1649 argc = parse_options(argc, argv, options, top_usage, 0);
1650 if (argc)
1651 usage_with_options(top_usage, options);
1652
1653 if (disassembler_style) {
1654 annotate_opts.disassembler_style = strdup(disassembler_style);
1655 if (!annotate_opts.disassembler_style)
1656 return -ENOMEM;
1657 }
1658 if (objdump_path) {
1659 annotate_opts.objdump_path = strdup(objdump_path);
1660 if (!annotate_opts.objdump_path)
1661 return -ENOMEM;
1662 }
1663 if (addr2line_path) {
1664 symbol_conf.addr2line_path = strdup(addr2line_path);
1665 if (!symbol_conf.addr2line_path)
1666 return -ENOMEM;
1667 }
1668
1669 status = symbol__validate_sym_arguments();
1670 if (status)
1671 goto out_delete_evlist;
1672
1673 if (annotate_check_args() < 0)
1674 goto out_delete_evlist;
1675
1676 if (!top.evlist->core.nr_entries) {
1677 bool can_profile_kernel = perf_event_paranoid_check(1);
1678 int err = parse_event(top.evlist, can_profile_kernel ? "cycles:P" : "cycles:Pu");
1679
1680 if (err)
1681 goto out_delete_evlist;
1682 }
1683
1684 status = evswitch__init(&top.evswitch, top.evlist, stderr);
1685 if (status)
1686 goto out_delete_evlist;
1687
1688 if (symbol_conf.report_hierarchy) {
1689 /* disable incompatible options */
1690 symbol_conf.event_group = false;
1691 symbol_conf.cumulate_callchain = false;
1692
1693 if (field_order) {
1694 pr_err("Error: --hierarchy and --fields options cannot be used together\n");
1695 parse_options_usage(top_usage, options, "fields", 0);
1696 parse_options_usage(NULL, options, "hierarchy", 0);
1697 goto out_delete_evlist;
1698 }
1699 }
1700
1701 if (top.stitch_lbr && !(callchain_param.record_mode == CALLCHAIN_LBR)) {
1702 pr_err("Error: --stitch-lbr must be used with --call-graph lbr\n");
1703 goto out_delete_evlist;
1704 }
1705
1706 if (nr_cgroups > 0 && opts->record_cgroup) {
1707 pr_err("--cgroup and --all-cgroups cannot be used together\n");
1708 goto out_delete_evlist;
1709 }
1710
1711 if (branch_call_mode) {
1712 if (!opts->branch_stack)
1713 opts->branch_stack = PERF_SAMPLE_BRANCH_ANY;
1714 symbol_conf.use_callchain = true;
1715 callchain_param.key = CCKEY_ADDRESS;
1716 callchain_param.branch_callstack = true;
1717 callchain_param.enabled = true;
1718 if (callchain_param.record_mode == CALLCHAIN_NONE)
1719 callchain_param.record_mode = CALLCHAIN_FP;
1720 callchain_register_param(&callchain_param);
1721 if (!sort_order)
1722 sort_order = "srcline,symbol,dso";
1723 }
1724
1725 if (opts->branch_stack && callchain_param.enabled)
1726 symbol_conf.show_branchflag_count = true;
1727
1728 sort__mode = SORT_MODE__TOP;
1729 /* display thread wants entries to be collapsed in a different tree */
1730 perf_hpp_list.need_collapse = 1;
1731
1732 if (top.use_stdio)
1733 use_browser = 0;
1734 #ifdef HAVE_SLANG_SUPPORT
1735 else if (top.use_tui)
1736 use_browser = 1;
1737 #endif
1738
1739 setup_browser(false);
1740
1741 if (setup_sorting(top.evlist) < 0) {
1742 if (sort_order)
1743 parse_options_usage(top_usage, options, "s", 1);
1744 if (field_order)
1745 parse_options_usage(sort_order ? NULL : top_usage,
1746 options, "fields", 0);
1747 goto out_delete_evlist;
1748 }
1749
1750 status = target__validate(target);
1751 if (status) {
1752 target__strerror(target, status, errbuf, BUFSIZ);
1753 ui__warning("%s\n", errbuf);
1754 }
1755
1756 status = target__parse_uid(target);
1757 if (status) {
1758 int saved_errno = errno;
1759
1760 target__strerror(target, status, errbuf, BUFSIZ);
1761 ui__error("%s\n", errbuf);
1762
1763 status = -saved_errno;
1764 goto out_delete_evlist;
1765 }
1766
1767 if (target__none(target))
1768 target->system_wide = true;
1769
1770 if (evlist__create_maps(top.evlist, target) < 0) {
1771 ui__error("Couldn't create thread/CPU maps: %s\n",
1772 errno == ENOENT ? "No such process" : str_error_r(errno, errbuf, sizeof(errbuf)));
1773 status = -errno;
1774 goto out_delete_evlist;
1775 }
1776
1777 if (top.delay_secs < 1)
1778 top.delay_secs = 1;
1779
1780 if (record_opts__config(opts)) {
1781 status = -EINVAL;
1782 goto out_delete_evlist;
1783 }
1784
1785 top.sym_evsel = evlist__first(top.evlist);
1786
1787 if (!callchain_param.enabled) {
1788 symbol_conf.cumulate_callchain = false;
1789 perf_hpp__cancel_cumulate();
1790 }
1791
1792 if (symbol_conf.cumulate_callchain && !callchain_param.order_set)
1793 callchain_param.order = ORDER_CALLER;
1794
1795 status = symbol__annotation_init();
1796 if (status < 0)
1797 goto out_delete_evlist;
1798
1799 annotation_config__init();
1800
1801 symbol_conf.try_vmlinux_path = (symbol_conf.vmlinux_name == NULL);
1802 status = symbol__init(NULL);
1803 if (status < 0)
1804 goto out_delete_evlist;
1805
1806 sort__setup_elide(stdout);
1807
1808 get_term_dimensions(&top.winsize);
1809 if (top.print_entries == 0) {
1810 perf_top__update_print_entries(&top);
1811 signal(SIGWINCH, winch_sig);
1812 }
1813
1814 top.session = perf_session__new(NULL, NULL);
1815 if (IS_ERR(top.session)) {
1816 status = PTR_ERR(top.session);
1817 top.session = NULL;
1818 goto out_delete_evlist;
1819 }
1820
1821 #ifdef HAVE_LIBBPF_SUPPORT
1822 if (!top.record_opts.no_bpf_event) {
1823 top.sb_evlist = evlist__new();
1824
1825 if (top.sb_evlist == NULL) {
1826 pr_err("Couldn't create side band evlist.\n.");
1827 status = -EINVAL;
1828 goto out_delete_evlist;
1829 }
1830
1831 if (evlist__add_bpf_sb_event(top.sb_evlist, &perf_env)) {
1832 pr_err("Couldn't ask for PERF_RECORD_BPF_EVENT side band events.\n.");
1833 status = -EINVAL;
1834 goto out_delete_evlist;
1835 }
1836 }
1837 #endif
1838
1839 if (evlist__start_sb_thread(top.sb_evlist, target)) {
1840 pr_debug("Couldn't start the BPF side band thread:\nBPF programs starting from now on won't be annotatable\n");
1841 opts->no_bpf_event = true;
1842 }
1843
1844 status = __cmd_top(&top);
1845
1846 if (!opts->no_bpf_event)
1847 evlist__stop_sb_thread(top.sb_evlist);
1848
1849 out_delete_evlist:
1850 evlist__delete(top.evlist);
1851 perf_session__delete(top.session);
1852 annotation_options__exit();
1853
1854 return status;
1855 }
1856