4 * Builtin report command: Analyze the perf.data input file,
5 * look up and read DSOs and symbol information and display
6 * a histogram of results, along various sorting keys.
10 #include "util/util.h"
12 #include "util/color.h"
13 #include <linux/list.h>
14 #include "util/cache.h"
15 #include <linux/rbtree.h>
16 #include "util/symbol.h"
17 #include "util/string.h"
18 #include "util/callchain.h"
19 #include "util/strlist.h"
22 #include "util/header.h"
24 #include "util/parse-options.h"
25 #include "util/parse-events.h"
31 static char const *input_name = "perf.data";
32 static char *vmlinux = NULL;
34 static char default_sort_order[] = "comm,dso";
35 static char *sort_order = default_sort_order;
36 static char *dso_list_str, *comm_list_str, *sym_list_str,
38 static struct strlist *dso_list, *comm_list, *sym_list;
39 static char *field_sep;
42 static int show_mask = SHOW_KERNEL | SHOW_USER | SHOW_HV;
44 static int dump_trace = 0;
45 #define dprintf(x...) do { if (dump_trace) printf(x); } while (0)
46 #define cdprintf(x...) do { if (dump_trace) color_fprintf(stdout, color, x); } while (0)
49 #define eprintf(x...) do { if (verbose) fprintf(stderr, x); } while (0)
53 static int full_paths;
55 static unsigned long page_size;
56 static unsigned long mmap_window = 32;
58 static char default_parent_pattern[] = "^sys_|^do_page_fault";
59 static char *parent_pattern = default_parent_pattern;
60 static regex_t parent_regex;
62 static int exclude_other = 1;
64 static char callchain_default_opt[] = "fractal,0.5";
69 struct callchain_param callchain_param = {
70 .mode = CHAIN_GRAPH_ABS,
74 static u64 sample_type;
77 struct perf_event_header header;
80 unsigned char __more_data[];
84 struct perf_event_header header;
89 char filename[PATH_MAX];
93 struct perf_event_header header;
99 struct perf_event_header header;
103 struct period_event {
104 struct perf_event_header header;
111 struct perf_event_header header;
117 struct perf_event_header header;
123 typedef union event_union {
124 struct perf_event_header header;
126 struct mmap_event mmap;
127 struct comm_event comm;
128 struct fork_event fork;
129 struct period_event period;
130 struct lost_event lost;
131 struct read_event read;
134 static int repsep_fprintf(FILE *fp, const char *fmt, ...)
141 n = vfprintf(fp, fmt, ap);
144 n = vasprintf(&bf, fmt, ap);
148 sep = strchr(sep, *field_sep);
161 static LIST_HEAD(dsos);
162 static struct dso *kernel_dso;
163 static struct dso *vdso;
164 static struct dso *hypervisor_dso;
166 static void dsos__add(struct dso *dso)
168 list_add_tail(&dso->node, &dsos);
171 static struct dso *dsos__find(const char *name)
175 list_for_each_entry(pos, &dsos, node)
176 if (strcmp(pos->name, name) == 0)
181 static struct dso *dsos__findnew(const char *name)
183 struct dso *dso = dsos__find(name);
189 dso = dso__new(name, 0);
193 nr = dso__load(dso, NULL, verbose);
195 eprintf("Failed to open: %s\n", name);
199 eprintf("No symbols found in: %s, maybe install a debug package?\n", name);
210 static void dsos__fprintf(FILE *fp)
214 list_for_each_entry(pos, &dsos, node)
215 dso__fprintf(pos, fp);
218 static struct symbol *vdso__find_symbol(struct dso *dso, u64 ip)
220 return dso__find_symbol(dso, ip);
223 static int load_kernel(void)
227 kernel_dso = dso__new("[kernel]", 0);
231 err = dso__load_kernel(kernel_dso, vmlinux, NULL, verbose, modules);
233 dso__delete(kernel_dso);
236 dsos__add(kernel_dso);
238 vdso = dso__new("[vdso]", 0);
242 vdso->find_symbol = vdso__find_symbol;
246 hypervisor_dso = dso__new("[hypervisor]", 0);
249 dsos__add(hypervisor_dso);
254 static char __cwd[PATH_MAX];
255 static char *cwd = __cwd;
258 static int strcommon(const char *pathname)
262 while (pathname[n] == cwd[n] && n < cwdlen)
269 struct list_head node;
273 u64 (*map_ip)(struct map *, u64);
277 static u64 map__map_ip(struct map *map, u64 ip)
279 return ip - map->start + map->pgoff;
282 static u64 vdso__map_ip(struct map *map __used, u64 ip)
287 static inline int is_anon_memory(const char *filename)
289 return strcmp(filename, "//anon") == 0;
292 static struct map *map__new(struct mmap_event *event)
294 struct map *self = malloc(sizeof(*self));
297 const char *filename = event->filename;
298 char newfilename[PATH_MAX];
302 int n = strcommon(filename);
305 snprintf(newfilename, sizeof(newfilename),
306 ".%s", filename + n);
307 filename = newfilename;
311 anon = is_anon_memory(filename);
314 snprintf(newfilename, sizeof(newfilename), "/tmp/perf-%d.map", event->pid);
315 filename = newfilename;
318 self->start = event->start;
319 self->end = event->start + event->len;
320 self->pgoff = event->pgoff;
322 self->dso = dsos__findnew(filename);
323 if (self->dso == NULL)
326 if (self->dso == vdso || anon)
327 self->map_ip = vdso__map_ip;
329 self->map_ip = map__map_ip;
337 static struct map *map__clone(struct map *self)
339 struct map *map = malloc(sizeof(*self));
344 memcpy(map, self, sizeof(*self));
349 static int map__overlap(struct map *l, struct map *r)
351 if (l->start > r->start) {
357 if (l->end > r->start)
363 static size_t map__fprintf(struct map *self, FILE *fp)
365 return fprintf(fp, " %Lx-%Lx %Lx %s\n",
366 self->start, self->end, self->pgoff, self->dso->name);
371 struct rb_node rb_node;
372 struct list_head maps;
377 static struct thread *thread__new(pid_t pid)
379 struct thread *self = malloc(sizeof(*self));
383 self->comm = malloc(32);
385 snprintf(self->comm, 32, ":%d", self->pid);
386 INIT_LIST_HEAD(&self->maps);
392 static unsigned int dsos__col_width,
396 static int thread__set_comm(struct thread *self, const char *comm)
400 self->comm = strdup(comm);
404 if (!col_width_list_str && !field_sep &&
405 (!comm_list || strlist__has_entry(comm_list, comm))) {
406 unsigned int slen = strlen(comm);
407 if (slen > comms__col_width) {
408 comms__col_width = slen;
409 threads__col_width = slen + 6;
416 static size_t thread__fprintf(struct thread *self, FILE *fp)
419 size_t ret = fprintf(fp, "Thread %d %s\n", self->pid, self->comm);
421 list_for_each_entry(pos, &self->maps, node)
422 ret += map__fprintf(pos, fp);
428 static struct rb_root threads;
429 static struct thread *last_match;
431 static struct thread *threads__findnew(pid_t pid)
433 struct rb_node **p = &threads.rb_node;
434 struct rb_node *parent = NULL;
438 * Font-end cache - PID lookups come in blocks,
439 * so most of the time we dont have to look up
442 if (last_match && last_match->pid == pid)
447 th = rb_entry(parent, struct thread, rb_node);
449 if (th->pid == pid) {
460 th = thread__new(pid);
462 rb_link_node(&th->rb_node, parent, p);
463 rb_insert_color(&th->rb_node, &threads);
470 static void thread__insert_map(struct thread *self, struct map *map)
472 struct map *pos, *tmp;
474 list_for_each_entry_safe(pos, tmp, &self->maps, node) {
475 if (map__overlap(pos, map)) {
477 printf("overlapping maps:\n");
478 map__fprintf(map, stdout);
479 map__fprintf(pos, stdout);
482 if (map->start <= pos->start && map->end > pos->start)
483 pos->start = map->end;
485 if (map->end >= pos->end && map->start < pos->end)
486 pos->end = map->start;
489 printf("after collision:\n");
490 map__fprintf(pos, stdout);
493 if (pos->start >= pos->end) {
494 list_del_init(&pos->node);
500 list_add_tail(&map->node, &self->maps);
503 static int thread__fork(struct thread *self, struct thread *parent)
509 self->comm = strdup(parent->comm);
513 list_for_each_entry(map, &parent->maps, node) {
514 struct map *new = map__clone(map);
517 thread__insert_map(self, new);
523 static struct map *thread__find_map(struct thread *self, u64 ip)
530 list_for_each_entry(pos, &self->maps, node)
531 if (ip >= pos->start && ip <= pos->end)
537 static size_t threads__fprintf(FILE *fp)
542 for (nd = rb_first(&threads); nd; nd = rb_next(nd)) {
543 struct thread *pos = rb_entry(nd, struct thread, rb_node);
545 ret += thread__fprintf(pos, fp);
552 * histogram, sorted on item, collects counts
555 static struct rb_root hist;
558 struct rb_node rb_node;
560 struct thread *thread;
564 struct symbol *parent;
567 struct callchain_node callchain;
568 struct rb_root sorted_chain;
574 * configurable sorting bits
578 struct list_head list;
582 int64_t (*cmp)(struct hist_entry *, struct hist_entry *);
583 int64_t (*collapse)(struct hist_entry *, struct hist_entry *);
584 size_t (*print)(FILE *fp, struct hist_entry *, unsigned int width);
588 static int64_t cmp_null(void *l, void *r)
601 sort__thread_cmp(struct hist_entry *left, struct hist_entry *right)
603 return right->thread->pid - left->thread->pid;
607 sort__thread_print(FILE *fp, struct hist_entry *self, unsigned int width)
609 return repsep_fprintf(fp, "%*s:%5d", width - 6,
610 self->thread->comm ?: "", self->thread->pid);
613 static struct sort_entry sort_thread = {
614 .header = "Command: Pid",
615 .cmp = sort__thread_cmp,
616 .print = sort__thread_print,
617 .width = &threads__col_width,
623 sort__comm_cmp(struct hist_entry *left, struct hist_entry *right)
625 return right->thread->pid - left->thread->pid;
629 sort__comm_collapse(struct hist_entry *left, struct hist_entry *right)
631 char *comm_l = left->thread->comm;
632 char *comm_r = right->thread->comm;
634 if (!comm_l || !comm_r)
635 return cmp_null(comm_l, comm_r);
637 return strcmp(comm_l, comm_r);
641 sort__comm_print(FILE *fp, struct hist_entry *self, unsigned int width)
643 return repsep_fprintf(fp, "%*s", width, self->thread->comm);
646 static struct sort_entry sort_comm = {
648 .cmp = sort__comm_cmp,
649 .collapse = sort__comm_collapse,
650 .print = sort__comm_print,
651 .width = &comms__col_width,
657 sort__dso_cmp(struct hist_entry *left, struct hist_entry *right)
659 struct dso *dso_l = left->dso;
660 struct dso *dso_r = right->dso;
662 if (!dso_l || !dso_r)
663 return cmp_null(dso_l, dso_r);
665 return strcmp(dso_l->name, dso_r->name);
669 sort__dso_print(FILE *fp, struct hist_entry *self, unsigned int width)
672 return repsep_fprintf(fp, "%-*s", width, self->dso->name);
674 return repsep_fprintf(fp, "%*llx", width, (u64)self->ip);
677 static struct sort_entry sort_dso = {
678 .header = "Shared Object",
679 .cmp = sort__dso_cmp,
680 .print = sort__dso_print,
681 .width = &dsos__col_width,
687 sort__sym_cmp(struct hist_entry *left, struct hist_entry *right)
691 if (left->sym == right->sym)
694 ip_l = left->sym ? left->sym->start : left->ip;
695 ip_r = right->sym ? right->sym->start : right->ip;
697 return (int64_t)(ip_r - ip_l);
701 sort__sym_print(FILE *fp, struct hist_entry *self, unsigned int width __used)
706 ret += repsep_fprintf(fp, "%#018llx ", (u64)self->ip);
708 ret += repsep_fprintf(fp, "[%c] ", self->level);
710 ret += repsep_fprintf(fp, "%s", self->sym->name);
712 if (self->sym->module)
713 ret += repsep_fprintf(fp, "\t[%s]",
714 self->sym->module->name);
716 ret += repsep_fprintf(fp, "%#016llx", (u64)self->ip);
722 static struct sort_entry sort_sym = {
724 .cmp = sort__sym_cmp,
725 .print = sort__sym_print,
731 sort__parent_cmp(struct hist_entry *left, struct hist_entry *right)
733 struct symbol *sym_l = left->parent;
734 struct symbol *sym_r = right->parent;
736 if (!sym_l || !sym_r)
737 return cmp_null(sym_l, sym_r);
739 return strcmp(sym_l->name, sym_r->name);
743 sort__parent_print(FILE *fp, struct hist_entry *self, unsigned int width)
745 return repsep_fprintf(fp, "%-*s", width,
746 self->parent ? self->parent->name : "[other]");
749 static unsigned int parent_symbol__col_width;
751 static struct sort_entry sort_parent = {
752 .header = "Parent symbol",
753 .cmp = sort__parent_cmp,
754 .print = sort__parent_print,
755 .width = &parent_symbol__col_width,
758 static int sort__need_collapse = 0;
759 static int sort__has_parent = 0;
761 struct sort_dimension {
763 struct sort_entry *entry;
767 static struct sort_dimension sort_dimensions[] = {
768 { .name = "pid", .entry = &sort_thread, },
769 { .name = "comm", .entry = &sort_comm, },
770 { .name = "dso", .entry = &sort_dso, },
771 { .name = "symbol", .entry = &sort_sym, },
772 { .name = "parent", .entry = &sort_parent, },
775 static LIST_HEAD(hist_entry__sort_list);
777 static int sort_dimension__add(char *tok)
781 for (i = 0; i < ARRAY_SIZE(sort_dimensions); i++) {
782 struct sort_dimension *sd = &sort_dimensions[i];
787 if (strncasecmp(tok, sd->name, strlen(tok)))
790 if (sd->entry->collapse)
791 sort__need_collapse = 1;
793 if (sd->entry == &sort_parent) {
794 int ret = regcomp(&parent_regex, parent_pattern, REG_EXTENDED);
798 regerror(ret, &parent_regex, err, sizeof(err));
799 fprintf(stderr, "Invalid regex: %s\n%s",
800 parent_pattern, err);
803 sort__has_parent = 1;
806 list_add_tail(&sd->entry->list, &hist_entry__sort_list);
816 hist_entry__cmp(struct hist_entry *left, struct hist_entry *right)
818 struct sort_entry *se;
821 list_for_each_entry(se, &hist_entry__sort_list, list) {
822 cmp = se->cmp(left, right);
831 hist_entry__collapse(struct hist_entry *left, struct hist_entry *right)
833 struct sort_entry *se;
836 list_for_each_entry(se, &hist_entry__sort_list, list) {
837 int64_t (*f)(struct hist_entry *, struct hist_entry *);
839 f = se->collapse ?: se->cmp;
841 cmp = f(left, right);
849 static size_t ipchain__fprintf_graph_line(FILE *fp, int depth, int depth_mask)
854 ret += fprintf(fp, "%s", " ");
856 for (i = 0; i < depth; i++)
857 if (depth_mask & (1 << i))
858 ret += fprintf(fp, "| ");
860 ret += fprintf(fp, " ");
862 ret += fprintf(fp, "\n");
867 ipchain__fprintf_graph(FILE *fp, struct callchain_list *chain, int depth,
868 int depth_mask, int count, u64 total_samples,
874 ret += fprintf(fp, "%s", " ");
875 for (i = 0; i < depth; i++) {
876 if (depth_mask & (1 << i))
877 ret += fprintf(fp, "|");
879 ret += fprintf(fp, " ");
880 if (!count && i == depth - 1) {
883 percent = hits * 100.0 / total_samples;
884 ret += percent_color_fprintf(fp, "--%2.2f%%-- ", percent);
886 ret += fprintf(fp, "%s", " ");
889 ret += fprintf(fp, "%s\n", chain->sym->name);
891 ret += fprintf(fp, "%p\n", (void *)(long)chain->ip);
897 callchain__fprintf_graph(FILE *fp, struct callchain_node *self,
898 u64 total_samples, int depth, int depth_mask)
900 struct rb_node *node, *next;
901 struct callchain_node *child;
902 struct callchain_list *chain;
903 int new_depth_mask = depth_mask;
908 if (callchain_param.mode == CHAIN_GRAPH_REL)
909 new_total = self->cumul_hit;
911 new_total = total_samples;
913 node = rb_first(&self->rb_root);
915 child = rb_entry(node, struct callchain_node, rb_node);
918 * The depth mask manages the output of pipes that show
919 * the depth. We don't want to keep the pipes of the current
920 * level for the last child of this depth
922 next = rb_next(node);
924 new_depth_mask &= ~(1 << (depth - 1));
927 * But we keep the older depth mask for the line seperator
928 * to keep the level link until we reach the last child
930 ret += ipchain__fprintf_graph_line(fp, depth, depth_mask);
932 list_for_each_entry(chain, &child->val, list) {
933 if (chain->ip >= PERF_CONTEXT_MAX)
935 ret += ipchain__fprintf_graph(fp, chain, depth,
940 ret += callchain__fprintf_graph(fp, child, new_total,
942 new_depth_mask | (1 << depth));
950 callchain__fprintf_flat(FILE *fp, struct callchain_node *self,
953 struct callchain_list *chain;
959 ret += callchain__fprintf_flat(fp, self->parent, total_samples);
962 list_for_each_entry(chain, &self->val, list) {
963 if (chain->ip >= PERF_CONTEXT_MAX)
966 ret += fprintf(fp, " %s\n", chain->sym->name);
968 ret += fprintf(fp, " %p\n",
969 (void *)(long)chain->ip);
976 hist_entry_callchain__fprintf(FILE *fp, struct hist_entry *self,
979 struct rb_node *rb_node;
980 struct callchain_node *chain;
983 rb_node = rb_first(&self->sorted_chain);
987 chain = rb_entry(rb_node, struct callchain_node, rb_node);
988 percent = chain->hit * 100.0 / total_samples;
989 switch (callchain_param.mode) {
991 ret += percent_color_fprintf(fp, " %6.2f%%\n",
993 ret += callchain__fprintf_flat(fp, chain, total_samples);
995 case CHAIN_GRAPH_ABS: /* Falldown */
996 case CHAIN_GRAPH_REL:
997 ret += callchain__fprintf_graph(fp, chain,
998 total_samples, 1, 1);
1002 ret += fprintf(fp, "\n");
1003 rb_node = rb_next(rb_node);
1011 hist_entry__fprintf(FILE *fp, struct hist_entry *self, u64 total_samples)
1013 struct sort_entry *se;
1016 if (exclude_other && !self->parent)
1020 ret = percent_color_fprintf(fp,
1021 field_sep ? "%.2f" : " %6.2f%%",
1022 (self->count * 100.0) / total_samples);
1024 ret = fprintf(fp, field_sep ? "%lld" : "%12lld ", self->count);
1026 list_for_each_entry(se, &hist_entry__sort_list, list) {
1027 if (exclude_other && (se == &sort_parent))
1030 fprintf(fp, "%s", field_sep ?: " ");
1031 ret += se->print(fp, self, se->width ? *se->width : 0);
1034 ret += fprintf(fp, "\n");
1037 hist_entry_callchain__fprintf(fp, self, total_samples);
1046 static void dso__calc_col_width(struct dso *self)
1048 if (!col_width_list_str && !field_sep &&
1049 (!dso_list || strlist__has_entry(dso_list, self->name))) {
1050 unsigned int slen = strlen(self->name);
1051 if (slen > dsos__col_width)
1052 dsos__col_width = slen;
1055 self->slen_calculated = 1;
1058 static struct symbol *
1059 resolve_symbol(struct thread *thread, struct map **mapp,
1060 struct dso **dsop, u64 *ipp)
1062 struct dso *dso = dsop ? *dsop : NULL;
1063 struct map *map = mapp ? *mapp : NULL;
1075 map = thread__find_map(thread, ip);
1078 * We have to do this here as we may have a dso
1079 * with no symbol hit that has a name longer than
1080 * the ones with symbols sampled.
1082 if (!map->dso->slen_calculated)
1083 dso__calc_col_width(map->dso);
1088 ip = map->map_ip(map, ip);
1093 * If this is outside of all known maps,
1094 * and is a negative address, try to look it
1095 * up in the kernel dso, as it might be a
1096 * vsyscall (which executes in user-mode):
1098 if ((long long)ip < 0)
1101 dprintf(" ...... dso: %s\n", dso ? dso->name : "<not found>");
1102 dprintf(" ...... map: %Lx -> %Lx\n", *ipp, ip);
1111 return dso->find_symbol(dso, ip);
1114 static int call__match(struct symbol *sym)
1116 if (sym->name && !regexec(&parent_regex, sym->name, 0, NULL, 0))
1122 static struct symbol **
1123 resolve_callchain(struct thread *thread, struct map *map __used,
1124 struct ip_callchain *chain, struct hist_entry *entry)
1126 u64 context = PERF_CONTEXT_MAX;
1127 struct symbol **syms = NULL;
1131 syms = calloc(chain->nr, sizeof(*syms));
1133 fprintf(stderr, "Can't allocate memory for symbols\n");
1138 for (i = 0; i < chain->nr; i++) {
1139 u64 ip = chain->ips[i];
1140 struct dso *dso = NULL;
1143 if (ip >= PERF_CONTEXT_MAX) {
1149 case PERF_CONTEXT_HV:
1150 dso = hypervisor_dso;
1152 case PERF_CONTEXT_KERNEL:
1159 sym = resolve_symbol(thread, NULL, &dso, &ip);
1162 if (sort__has_parent && call__match(sym) &&
1164 entry->parent = sym;
1175 * collect histogram counts
1179 hist_entry__add(struct thread *thread, struct map *map, struct dso *dso,
1180 struct symbol *sym, u64 ip, struct ip_callchain *chain,
1181 char level, u64 count)
1183 struct rb_node **p = &hist.rb_node;
1184 struct rb_node *parent = NULL;
1185 struct hist_entry *he;
1186 struct symbol **syms = NULL;
1187 struct hist_entry entry = {
1196 .sorted_chain = RB_ROOT
1200 if ((sort__has_parent || callchain) && chain)
1201 syms = resolve_callchain(thread, map, chain, &entry);
1203 while (*p != NULL) {
1205 he = rb_entry(parent, struct hist_entry, rb_node);
1207 cmp = hist_entry__cmp(&entry, he);
1212 append_chain(&he->callchain, chain, syms);
1221 p = &(*p)->rb_right;
1224 he = malloc(sizeof(*he));
1229 callchain_init(&he->callchain);
1230 append_chain(&he->callchain, chain, syms);
1233 rb_link_node(&he->rb_node, parent, p);
1234 rb_insert_color(&he->rb_node, &hist);
1239 static void hist_entry__free(struct hist_entry *he)
1245 * collapse the histogram
1248 static struct rb_root collapse_hists;
1250 static void collapse__insert_entry(struct hist_entry *he)
1252 struct rb_node **p = &collapse_hists.rb_node;
1253 struct rb_node *parent = NULL;
1254 struct hist_entry *iter;
1257 while (*p != NULL) {
1259 iter = rb_entry(parent, struct hist_entry, rb_node);
1261 cmp = hist_entry__collapse(iter, he);
1264 iter->count += he->count;
1265 hist_entry__free(he);
1272 p = &(*p)->rb_right;
1275 rb_link_node(&he->rb_node, parent, p);
1276 rb_insert_color(&he->rb_node, &collapse_hists);
1279 static void collapse__resort(void)
1281 struct rb_node *next;
1282 struct hist_entry *n;
1284 if (!sort__need_collapse)
1287 next = rb_first(&hist);
1289 n = rb_entry(next, struct hist_entry, rb_node);
1290 next = rb_next(&n->rb_node);
1292 rb_erase(&n->rb_node, &hist);
1293 collapse__insert_entry(n);
1298 * reverse the map, sort on count.
1301 static struct rb_root output_hists;
1303 static void output__insert_entry(struct hist_entry *he, u64 min_callchain_hits)
1305 struct rb_node **p = &output_hists.rb_node;
1306 struct rb_node *parent = NULL;
1307 struct hist_entry *iter;
1310 callchain_param.sort(&he->sorted_chain, &he->callchain,
1311 min_callchain_hits, &callchain_param);
1313 while (*p != NULL) {
1315 iter = rb_entry(parent, struct hist_entry, rb_node);
1317 if (he->count > iter->count)
1320 p = &(*p)->rb_right;
1323 rb_link_node(&he->rb_node, parent, p);
1324 rb_insert_color(&he->rb_node, &output_hists);
1327 static void output__resort(u64 total_samples)
1329 struct rb_node *next;
1330 struct hist_entry *n;
1331 struct rb_root *tree = &hist;
1332 u64 min_callchain_hits;
1334 min_callchain_hits = total_samples * (callchain_param.min_percent / 100);
1336 if (sort__need_collapse)
1337 tree = &collapse_hists;
1339 next = rb_first(tree);
1342 n = rb_entry(next, struct hist_entry, rb_node);
1343 next = rb_next(&n->rb_node);
1345 rb_erase(&n->rb_node, tree);
1346 output__insert_entry(n, min_callchain_hits);
1350 static size_t output__fprintf(FILE *fp, u64 total_samples)
1352 struct hist_entry *pos;
1353 struct sort_entry *se;
1357 char *col_width = col_width_list_str;
1361 fprintf(fp, "# (%Ld samples)\n", (u64)total_samples);
1364 fprintf(fp, "# Overhead");
1365 list_for_each_entry(se, &hist_entry__sort_list, list) {
1366 if (exclude_other && (se == &sort_parent))
1369 fprintf(fp, "%c%s", *field_sep, se->header);
1372 width = strlen(se->header);
1374 if (col_width_list_str) {
1376 *se->width = atoi(col_width);
1377 col_width = strchr(col_width, ',');
1382 width = *se->width = max(*se->width, width);
1384 fprintf(fp, " %*s", width, se->header);
1391 fprintf(fp, "# ........");
1392 list_for_each_entry(se, &hist_entry__sort_list, list) {
1395 if (exclude_other && (se == &sort_parent))
1402 width = strlen(se->header);
1403 for (i = 0; i < width; i++)
1411 for (nd = rb_first(&output_hists); nd; nd = rb_next(nd)) {
1412 pos = rb_entry(nd, struct hist_entry, rb_node);
1413 ret += hist_entry__fprintf(fp, pos, total_samples);
1416 if (sort_order == default_sort_order &&
1417 parent_pattern == default_parent_pattern) {
1419 fprintf(fp, "# (For more details, try: perf report --sort comm,dso,symbol)\n");
1427 static void register_idle_thread(void)
1429 struct thread *thread = threads__findnew(0);
1431 if (thread == NULL ||
1432 thread__set_comm(thread, "[idle]")) {
1433 fprintf(stderr, "problem inserting idle task.\n");
1438 static unsigned long total = 0,
1445 static int validate_chain(struct ip_callchain *chain, event_t *event)
1447 unsigned int chain_size;
1449 chain_size = event->header.size;
1450 chain_size -= (unsigned long)&event->ip.__more_data - (unsigned long)event;
1452 if (chain->nr*sizeof(u64) > chain_size)
1459 process_sample_event(event_t *event, unsigned long offset, unsigned long head)
1463 struct dso *dso = NULL;
1464 struct thread *thread = threads__findnew(event->ip.pid);
1465 u64 ip = event->ip.ip;
1467 struct map *map = NULL;
1468 void *more_data = event->ip.__more_data;
1469 struct ip_callchain *chain = NULL;
1472 if (sample_type & PERF_SAMPLE_PERIOD) {
1473 period = *(u64 *)more_data;
1474 more_data += sizeof(u64);
1477 dprintf("%p [%p]: PERF_EVENT_SAMPLE (IP, %d): %d: %p period: %Ld\n",
1478 (void *)(offset + head),
1479 (void *)(long)(event->header.size),
1485 if (sample_type & PERF_SAMPLE_CALLCHAIN) {
1488 chain = (void *)more_data;
1490 dprintf("... chain: nr:%Lu\n", chain->nr);
1492 if (validate_chain(chain, event) < 0) {
1493 eprintf("call-chain problem with event, skipping it.\n");
1498 for (i = 0; i < chain->nr; i++)
1499 dprintf("..... %2d: %016Lx\n", i, chain->ips[i]);
1503 dprintf(" ... thread: %s:%d\n", thread->comm, thread->pid);
1505 if (thread == NULL) {
1506 eprintf("problem processing %d event, skipping it.\n",
1507 event->header.type);
1511 if (comm_list && !strlist__has_entry(comm_list, thread->comm))
1514 cpumode = event->header.misc & PERF_EVENT_MISC_CPUMODE_MASK;
1516 if (cpumode == PERF_EVENT_MISC_KERNEL) {
1522 dprintf(" ...... dso: %s\n", dso->name);
1524 } else if (cpumode == PERF_EVENT_MISC_USER) {
1533 dso = hypervisor_dso;
1535 dprintf(" ...... dso: [hypervisor]\n");
1538 if (show & show_mask) {
1539 struct symbol *sym = resolve_symbol(thread, &map, &dso, &ip);
1541 if (dso_list && dso && dso->name && !strlist__has_entry(dso_list, dso->name))
1544 if (sym_list && sym && !strlist__has_entry(sym_list, sym->name))
1547 if (hist_entry__add(thread, map, dso, sym, ip, chain, level, period)) {
1548 eprintf("problem incrementing symbol count, skipping event\n");
1558 process_mmap_event(event_t *event, unsigned long offset, unsigned long head)
1560 struct thread *thread = threads__findnew(event->mmap.pid);
1561 struct map *map = map__new(&event->mmap);
1563 dprintf("%p [%p]: PERF_EVENT_MMAP %d: [%p(%p) @ %p]: %s\n",
1564 (void *)(offset + head),
1565 (void *)(long)(event->header.size),
1567 (void *)(long)event->mmap.start,
1568 (void *)(long)event->mmap.len,
1569 (void *)(long)event->mmap.pgoff,
1570 event->mmap.filename);
1572 if (thread == NULL || map == NULL) {
1573 dprintf("problem processing PERF_EVENT_MMAP, skipping event.\n");
1577 thread__insert_map(thread, map);
1584 process_comm_event(event_t *event, unsigned long offset, unsigned long head)
1586 struct thread *thread = threads__findnew(event->comm.pid);
1588 dprintf("%p [%p]: PERF_EVENT_COMM: %s:%d\n",
1589 (void *)(offset + head),
1590 (void *)(long)(event->header.size),
1591 event->comm.comm, event->comm.pid);
1593 if (thread == NULL ||
1594 thread__set_comm(thread, event->comm.comm)) {
1595 dprintf("problem processing PERF_EVENT_COMM, skipping event.\n");
1604 process_fork_event(event_t *event, unsigned long offset, unsigned long head)
1606 struct thread *thread = threads__findnew(event->fork.pid);
1607 struct thread *parent = threads__findnew(event->fork.ppid);
1609 dprintf("%p [%p]: PERF_EVENT_FORK: %d:%d\n",
1610 (void *)(offset + head),
1611 (void *)(long)(event->header.size),
1612 event->fork.pid, event->fork.ppid);
1614 if (!thread || !parent || thread__fork(thread, parent)) {
1615 dprintf("problem processing PERF_EVENT_FORK, skipping event.\n");
1624 process_period_event(event_t *event, unsigned long offset, unsigned long head)
1626 dprintf("%p [%p]: PERF_EVENT_PERIOD: time:%Ld, id:%Ld: period:%Ld\n",
1627 (void *)(offset + head),
1628 (void *)(long)(event->header.size),
1631 event->period.sample_period);
1637 process_lost_event(event_t *event, unsigned long offset, unsigned long head)
1639 dprintf("%p [%p]: PERF_EVENT_LOST: id:%Ld: lost:%Ld\n",
1640 (void *)(offset + head),
1641 (void *)(long)(event->header.size),
1645 total_lost += event->lost.lost;
1650 static void trace_event(event_t *event)
1652 unsigned char *raw_event = (void *)event;
1653 char *color = PERF_COLOR_BLUE;
1660 cdprintf("\n. ... raw event: size %d bytes\n", event->header.size);
1662 for (i = 0; i < event->header.size; i++) {
1663 if ((i & 15) == 0) {
1665 cdprintf(" %04x: ", i);
1668 cdprintf(" %02x", raw_event[i]);
1670 if (((i & 15) == 15) || i == event->header.size-1) {
1672 for (j = 0; j < 15-(i & 15); j++)
1674 for (j = 0; j < (i & 15); j++) {
1675 if (isprint(raw_event[i-15+j]))
1676 cdprintf("%c", raw_event[i-15+j]);
1687 process_read_event(event_t *event, unsigned long offset, unsigned long head)
1689 dprintf("%p [%p]: PERF_EVENT_READ: %d %d %Lu\n",
1690 (void *)(offset + head),
1691 (void *)(long)(event->header.size),
1700 process_event(event_t *event, unsigned long offset, unsigned long head)
1704 switch (event->header.type) {
1705 case PERF_EVENT_SAMPLE:
1706 return process_sample_event(event, offset, head);
1708 case PERF_EVENT_MMAP:
1709 return process_mmap_event(event, offset, head);
1711 case PERF_EVENT_COMM:
1712 return process_comm_event(event, offset, head);
1714 case PERF_EVENT_FORK:
1715 return process_fork_event(event, offset, head);
1717 case PERF_EVENT_PERIOD:
1718 return process_period_event(event, offset, head);
1720 case PERF_EVENT_LOST:
1721 return process_lost_event(event, offset, head);
1723 case PERF_EVENT_READ:
1724 return process_read_event(event, offset, head);
1727 * We dont process them right now but they are fine:
1730 case PERF_EVENT_THROTTLE:
1731 case PERF_EVENT_UNTHROTTLE:
1741 static struct perf_header *header;
1743 static u64 perf_header__sample_type(void)
1745 u64 sample_type = 0;
1748 for (i = 0; i < header->attrs; i++) {
1749 struct perf_header_attr *attr = header->attr[i];
1752 sample_type = attr->attr.sample_type;
1753 else if (sample_type != attr->attr.sample_type)
1754 die("non matching sample_type");
1760 static int __cmd_report(void)
1762 int ret, rc = EXIT_FAILURE;
1763 unsigned long offset = 0;
1764 unsigned long head, shift;
1770 register_idle_thread();
1772 input = open(input_name, O_RDONLY);
1774 fprintf(stderr, " failed to open file: %s", input_name);
1775 if (!strcmp(input_name, "perf.data"))
1776 fprintf(stderr, " (try 'perf record' first)");
1777 fprintf(stderr, "\n");
1781 ret = fstat(input, &stat);
1783 perror("failed to stat file");
1787 if (!stat.st_size) {
1788 fprintf(stderr, "zero-sized file, nothing to do!\n");
1792 header = perf_header__read(input);
1793 head = header->data_offset;
1795 sample_type = perf_header__sample_type();
1797 if (!(sample_type & PERF_SAMPLE_CALLCHAIN)) {
1798 if (sort__has_parent) {
1799 fprintf(stderr, "selected --sort parent, but no"
1800 " callchain data. Did you call"
1801 " perf record without -g?\n");
1805 fprintf(stderr, "selected -c but no callchain data."
1806 " Did you call perf record without"
1812 if (load_kernel() < 0) {
1813 perror("failed to load kernel symbols");
1814 return EXIT_FAILURE;
1818 if (getcwd(__cwd, sizeof(__cwd)) == NULL) {
1819 perror("failed to get the current directory");
1820 return EXIT_FAILURE;
1822 cwdlen = strlen(cwd);
1828 shift = page_size * (head / page_size);
1833 buf = (char *)mmap(NULL, page_size * mmap_window, PROT_READ,
1834 MAP_SHARED, input, offset);
1835 if (buf == MAP_FAILED) {
1836 perror("failed to mmap file");
1841 event = (event_t *)(buf + head);
1843 size = event->header.size;
1847 if (head + event->header.size >= page_size * mmap_window) {
1850 shift = page_size * (head / page_size);
1852 ret = munmap(buf, page_size * mmap_window);
1860 size = event->header.size;
1862 dprintf("\n%p [%p]: event: %d\n",
1863 (void *)(offset + head),
1864 (void *)(long)event->header.size,
1865 event->header.type);
1867 if (!size || process_event(event, offset, head) < 0) {
1869 dprintf("%p [%p]: skipping unknown header type: %d\n",
1870 (void *)(offset + head),
1871 (void *)(long)(event->header.size),
1872 event->header.type);
1877 * assume we lost track of the stream, check alignment, and
1878 * increment a single u64 in the hope to catch on again 'soon'.
1881 if (unlikely(head & 7))
1889 if (offset + head >= header->data_offset + header->data_size)
1892 if (offset + head < (unsigned long)stat.st_size)
1899 dprintf(" IP events: %10ld\n", total);
1900 dprintf(" mmap events: %10ld\n", total_mmap);
1901 dprintf(" comm events: %10ld\n", total_comm);
1902 dprintf(" fork events: %10ld\n", total_fork);
1903 dprintf(" lost events: %10ld\n", total_lost);
1904 dprintf(" unknown events: %10ld\n", total_unknown);
1910 threads__fprintf(stdout);
1913 dsos__fprintf(stdout);
1916 output__resort(total);
1917 output__fprintf(stdout, total);
1923 parse_callchain_opt(const struct option *opt __used, const char *arg,
1934 tok = strtok((char *)arg, ",");
1938 /* get the output mode */
1939 if (!strncmp(tok, "graph", strlen(arg)))
1940 callchain_param.mode = CHAIN_GRAPH_ABS;
1942 else if (!strncmp(tok, "flat", strlen(arg)))
1943 callchain_param.mode = CHAIN_FLAT;
1945 else if (!strncmp(tok, "fractal", strlen(arg)))
1946 callchain_param.mode = CHAIN_GRAPH_REL;
1951 /* get the min percentage */
1952 tok = strtok(NULL, ",");
1956 callchain_param.min_percent = strtod(tok, &endptr);
1961 if (register_callchain_param(&callchain_param) < 0) {
1962 fprintf(stderr, "Can't register callchain params\n");
1968 static const char * const report_usage[] = {
1969 "perf report [<options>] <command>",
1973 static const struct option options[] = {
1974 OPT_STRING('i', "input", &input_name, "file",
1976 OPT_BOOLEAN('v', "verbose", &verbose,
1977 "be more verbose (show symbol address, etc)"),
1978 OPT_BOOLEAN('D', "dump-raw-trace", &dump_trace,
1979 "dump raw trace in ASCII"),
1980 OPT_STRING('k', "vmlinux", &vmlinux, "file", "vmlinux pathname"),
1981 OPT_BOOLEAN('m', "modules", &modules,
1982 "load module symbols - WARNING: use only with -k and LIVE kernel"),
1983 OPT_STRING('s', "sort", &sort_order, "key[,key2...]",
1984 "sort by key(s): pid, comm, dso, symbol, parent"),
1985 OPT_BOOLEAN('P', "full-paths", &full_paths,
1986 "Don't shorten the pathnames taking into account the cwd"),
1987 OPT_STRING('p', "parent", &parent_pattern, "regex",
1988 "regex filter to identify parent, see: '--sort parent'"),
1989 OPT_BOOLEAN('x', "exclude-other", &exclude_other,
1990 "Only display entries with parent-match"),
1991 OPT_CALLBACK_DEFAULT('c', "callchain", NULL, "output_type,min_percent",
1992 "Display callchains using output_type and min percent threshold. "
1993 "Default: flat,0", &parse_callchain_opt, callchain_default_opt),
1994 OPT_STRING('d', "dsos", &dso_list_str, "dso[,dso...]",
1995 "only consider symbols in these dsos"),
1996 OPT_STRING('C', "comms", &comm_list_str, "comm[,comm...]",
1997 "only consider symbols in these comms"),
1998 OPT_STRING('S', "symbols", &sym_list_str, "symbol[,symbol...]",
1999 "only consider these symbols"),
2000 OPT_STRING('w', "column-widths", &col_width_list_str,
2002 "don't try to adjust column width, use these fixed values"),
2003 OPT_STRING('t', "field-separator", &field_sep, "separator",
2004 "separator for columns, no spaces will be added between "
2005 "columns '.' is reserved."),
2009 static void setup_sorting(void)
2011 char *tmp, *tok, *str = strdup(sort_order);
2013 for (tok = strtok_r(str, ", ", &tmp);
2014 tok; tok = strtok_r(NULL, ", ", &tmp)) {
2015 if (sort_dimension__add(tok) < 0) {
2016 error("Unknown --sort key: `%s'", tok);
2017 usage_with_options(report_usage, options);
2024 static void setup_list(struct strlist **list, const char *list_str,
2025 const char *list_name)
2028 *list = strlist__new(true, list_str);
2030 fprintf(stderr, "problems parsing %s list\n",
2037 int cmd_report(int argc, const char **argv, const char *prefix __used)
2041 page_size = getpagesize();
2043 argc = parse_options(argc, argv, options, report_usage, 0);
2047 if (parent_pattern != default_parent_pattern)
2048 sort_dimension__add("parent");
2053 * Any (unrecognized) arguments left?
2056 usage_with_options(report_usage, options);
2058 setup_list(&dso_list, dso_list_str, "dso");
2059 setup_list(&comm_list, comm_list_str, "comm");
2060 setup_list(&sym_list, sym_list_str, "symbol");
2062 if (field_sep && *field_sep == '.') {
2063 fputs("'.' is the only non valid --field-separator argument\n",
2070 return __cmd_report();