Merge branch 'x86-uv-for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git...
[sfrench/cifs-2.6.git] / tools / perf / builtin-annotate.c
1 /*
2  * builtin-annotate.c
3  *
4  * Builtin annotate 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.
7  */
8 #include "builtin.h"
9
10 #include "util/util.h"
11
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
18 #include "perf.h"
19 #include "util/debug.h"
20
21 #include "util/event.h"
22 #include "util/parse-options.h"
23 #include "util/parse-events.h"
24 #include "util/thread.h"
25 #include "util/sort.h"
26 #include "util/hist.h"
27 #include "util/session.h"
28
29 static char             const *input_name = "perf.data";
30
31 static bool             force;
32
33 static bool             full_paths;
34
35 static bool             print_line;
36
37 static const char *sym_hist_filter;
38
39 static int hists__add_entry(struct hists *self, struct addr_location *al)
40 {
41         struct hist_entry *he;
42
43         if (sym_hist_filter != NULL &&
44             (al->sym == NULL || strcmp(sym_hist_filter, al->sym->name) != 0)) {
45                 /* We're only interested in a symbol named sym_hist_filter */
46                 if (al->sym != NULL) {
47                         rb_erase(&al->sym->rb_node,
48                                  &al->map->dso->symbols[al->map->type]);
49                         symbol__delete(al->sym);
50                 }
51                 return 0;
52         }
53
54         he = __hists__add_entry(self, al, NULL, 1);
55         if (he == NULL)
56                 return -ENOMEM;
57
58         return hist_entry__inc_addr_samples(he, al->addr);
59 }
60
61 static int process_sample_event(event_t *event, struct perf_session *session)
62 {
63         struct addr_location al;
64         struct sample_data data;
65
66         if (event__preprocess_sample(event, session, &al, &data, NULL) < 0) {
67                 pr_warning("problem processing %d event, skipping it.\n",
68                            event->header.type);
69                 return -1;
70         }
71
72         if (!al.filtered && hists__add_entry(&session->hists, &al)) {
73                 pr_warning("problem incrementing symbol count, "
74                            "skipping event\n");
75                 return -1;
76         }
77
78         return 0;
79 }
80
81 static int objdump_line__print(struct objdump_line *self,
82                                struct list_head *head,
83                                struct hist_entry *he, u64 len)
84 {
85         struct symbol *sym = he->ms.sym;
86         static const char *prev_line;
87         static const char *prev_color;
88
89         if (self->offset != -1) {
90                 const char *path = NULL;
91                 unsigned int hits = 0;
92                 double percent = 0.0;
93                 const char *color;
94                 struct sym_priv *priv = symbol__priv(sym);
95                 struct sym_ext *sym_ext = priv->ext;
96                 struct sym_hist *h = priv->hist;
97                 s64 offset = self->offset;
98                 struct objdump_line *next = objdump__get_next_ip_line(head, self);
99
100                 while (offset < (s64)len &&
101                        (next == NULL || offset < next->offset)) {
102                         if (sym_ext) {
103                                 if (path == NULL)
104                                         path = sym_ext[offset].path;
105                                 percent += sym_ext[offset].percent;
106                         } else
107                                 hits += h->ip[offset];
108
109                         ++offset;
110                 }
111
112                 if (sym_ext == NULL && h->sum)
113                         percent = 100.0 * hits / h->sum;
114
115                 color = get_percent_color(percent);
116
117                 /*
118                  * Also color the filename and line if needed, with
119                  * the same color than the percentage. Don't print it
120                  * twice for close colored ip with the same filename:line
121                  */
122                 if (path) {
123                         if (!prev_line || strcmp(prev_line, path)
124                                        || color != prev_color) {
125                                 color_fprintf(stdout, color, " %s", path);
126                                 prev_line = path;
127                                 prev_color = color;
128                         }
129                 }
130
131                 color_fprintf(stdout, color, " %7.2f", percent);
132                 printf(" :      ");
133                 color_fprintf(stdout, PERF_COLOR_BLUE, "%s\n", self->line);
134         } else {
135                 if (!*self->line)
136                         printf("         :\n");
137                 else
138                         printf("         :      %s\n", self->line);
139         }
140
141         return 0;
142 }
143
144 static struct rb_root root_sym_ext;
145
146 static void insert_source_line(struct sym_ext *sym_ext)
147 {
148         struct sym_ext *iter;
149         struct rb_node **p = &root_sym_ext.rb_node;
150         struct rb_node *parent = NULL;
151
152         while (*p != NULL) {
153                 parent = *p;
154                 iter = rb_entry(parent, struct sym_ext, node);
155
156                 if (sym_ext->percent > iter->percent)
157                         p = &(*p)->rb_left;
158                 else
159                         p = &(*p)->rb_right;
160         }
161
162         rb_link_node(&sym_ext->node, parent, p);
163         rb_insert_color(&sym_ext->node, &root_sym_ext);
164 }
165
166 static void free_source_line(struct hist_entry *he, int len)
167 {
168         struct sym_priv *priv = symbol__priv(he->ms.sym);
169         struct sym_ext *sym_ext = priv->ext;
170         int i;
171
172         if (!sym_ext)
173                 return;
174
175         for (i = 0; i < len; i++)
176                 free(sym_ext[i].path);
177         free(sym_ext);
178
179         priv->ext = NULL;
180         root_sym_ext = RB_ROOT;
181 }
182
183 /* Get the filename:line for the colored entries */
184 static void
185 get_source_line(struct hist_entry *he, int len, const char *filename)
186 {
187         struct symbol *sym = he->ms.sym;
188         u64 start;
189         int i;
190         char cmd[PATH_MAX * 2];
191         struct sym_ext *sym_ext;
192         struct sym_priv *priv = symbol__priv(sym);
193         struct sym_hist *h = priv->hist;
194
195         if (!h->sum)
196                 return;
197
198         sym_ext = priv->ext = calloc(len, sizeof(struct sym_ext));
199         if (!priv->ext)
200                 return;
201
202         start = he->ms.map->unmap_ip(he->ms.map, sym->start);
203
204         for (i = 0; i < len; i++) {
205                 char *path = NULL;
206                 size_t line_len;
207                 u64 offset;
208                 FILE *fp;
209
210                 sym_ext[i].percent = 100.0 * h->ip[i] / h->sum;
211                 if (sym_ext[i].percent <= 0.5)
212                         continue;
213
214                 offset = start + i;
215                 sprintf(cmd, "addr2line -e %s %016llx", filename, offset);
216                 fp = popen(cmd, "r");
217                 if (!fp)
218                         continue;
219
220                 if (getline(&path, &line_len, fp) < 0 || !line_len)
221                         goto next;
222
223                 sym_ext[i].path = malloc(sizeof(char) * line_len + 1);
224                 if (!sym_ext[i].path)
225                         goto next;
226
227                 strcpy(sym_ext[i].path, path);
228                 insert_source_line(&sym_ext[i]);
229
230         next:
231                 pclose(fp);
232         }
233 }
234
235 static void print_summary(const char *filename)
236 {
237         struct sym_ext *sym_ext;
238         struct rb_node *node;
239
240         printf("\nSorted summary for file %s\n", filename);
241         printf("----------------------------------------------\n\n");
242
243         if (RB_EMPTY_ROOT(&root_sym_ext)) {
244                 printf(" Nothing higher than %1.1f%%\n", MIN_GREEN);
245                 return;
246         }
247
248         node = rb_first(&root_sym_ext);
249         while (node) {
250                 double percent;
251                 const char *color;
252                 char *path;
253
254                 sym_ext = rb_entry(node, struct sym_ext, node);
255                 percent = sym_ext->percent;
256                 color = get_percent_color(percent);
257                 path = sym_ext->path;
258
259                 color_fprintf(stdout, color, " %7.2f %s", percent, path);
260                 node = rb_next(node);
261         }
262 }
263
264 static void hist_entry__print_hits(struct hist_entry *self)
265 {
266         struct symbol *sym = self->ms.sym;
267         struct sym_priv *priv = symbol__priv(sym);
268         struct sym_hist *h = priv->hist;
269         u64 len = sym->end - sym->start, offset;
270
271         for (offset = 0; offset < len; ++offset)
272                 if (h->ip[offset] != 0)
273                         printf("%*Lx: %Lu\n", BITS_PER_LONG / 2,
274                                sym->start + offset, h->ip[offset]);
275         printf("%*s: %Lu\n", BITS_PER_LONG / 2, "h->sum", h->sum);
276 }
277
278 static int hist_entry__tty_annotate(struct hist_entry *he)
279 {
280         struct map *map = he->ms.map;
281         struct dso *dso = map->dso;
282         struct symbol *sym = he->ms.sym;
283         const char *filename = dso->long_name, *d_filename;
284         u64 len;
285         LIST_HEAD(head);
286         struct objdump_line *pos, *n;
287
288         if (hist_entry__annotate(he, &head) < 0)
289                 return -1;
290
291         if (full_paths)
292                 d_filename = filename;
293         else
294                 d_filename = basename(filename);
295
296         len = sym->end - sym->start;
297
298         if (print_line) {
299                 get_source_line(he, len, filename);
300                 print_summary(filename);
301         }
302
303         printf("\n\n------------------------------------------------\n");
304         printf(" Percent |      Source code & Disassembly of %s\n", d_filename);
305         printf("------------------------------------------------\n");
306
307         if (verbose)
308                 hist_entry__print_hits(he);
309
310         list_for_each_entry_safe(pos, n, &head, node) {
311                 objdump_line__print(pos, &head, he, len);
312                 list_del(&pos->node);
313                 objdump_line__free(pos);
314         }
315
316         if (print_line)
317                 free_source_line(he, len);
318
319         return 0;
320 }
321
322 static void hists__find_annotations(struct hists *self)
323 {
324         struct rb_node *first = rb_first(&self->entries), *nd = first;
325         int key = KEY_RIGHT;
326
327         while (nd) {
328                 struct hist_entry *he = rb_entry(nd, struct hist_entry, rb_node);
329                 struct sym_priv *priv;
330
331                 if (he->ms.sym == NULL || he->ms.map->dso->annotate_warned)
332                         goto find_next;
333
334                 priv = symbol__priv(he->ms.sym);
335                 if (priv->hist == NULL) {
336 find_next:
337                         if (key == KEY_LEFT)
338                                 nd = rb_prev(nd);
339                         else
340                                 nd = rb_next(nd);
341                         continue;
342                 }
343
344                 if (use_browser > 0) {
345                         key = hist_entry__tui_annotate(he);
346                         if (is_exit_key(key))
347                                 break;
348                         switch (key) {
349                         case KEY_RIGHT:
350                         case '\t':
351                                 nd = rb_next(nd);
352                                 break;
353                         case KEY_LEFT:
354                                 if (nd == first)
355                                         continue;
356                                 nd = rb_prev(nd);
357                         default:
358                                 break;
359                         }
360                 } else {
361                         hist_entry__tty_annotate(he);
362                         nd = rb_next(nd);
363                         /*
364                          * Since we have a hist_entry per IP for the same
365                          * symbol, free he->ms.sym->hist to signal we already
366                          * processed this symbol.
367                          */
368                         free(priv->hist);
369                         priv->hist = NULL;
370                 }
371         }
372 }
373
374 static struct perf_event_ops event_ops = {
375         .sample = process_sample_event,
376         .mmap   = event__process_mmap,
377         .comm   = event__process_comm,
378         .fork   = event__process_task,
379 };
380
381 static int __cmd_annotate(void)
382 {
383         int ret;
384         struct perf_session *session;
385
386         session = perf_session__new(input_name, O_RDONLY, force, false);
387         if (session == NULL)
388                 return -ENOMEM;
389
390         ret = perf_session__process_events(session, &event_ops);
391         if (ret)
392                 goto out_delete;
393
394         if (dump_trace) {
395                 perf_session__fprintf_nr_events(session, stdout);
396                 goto out_delete;
397         }
398
399         if (verbose > 3)
400                 perf_session__fprintf(session, stdout);
401
402         if (verbose > 2)
403                 perf_session__fprintf_dsos(session, stdout);
404
405         hists__collapse_resort(&session->hists);
406         hists__output_resort(&session->hists);
407         hists__find_annotations(&session->hists);
408 out_delete:
409         perf_session__delete(session);
410
411         return ret;
412 }
413
414 static const char * const annotate_usage[] = {
415         "perf annotate [<options>] <command>",
416         NULL
417 };
418
419 static const struct option options[] = {
420         OPT_STRING('i', "input", &input_name, "file",
421                     "input file name"),
422         OPT_STRING('d', "dsos", &symbol_conf.dso_list_str, "dso[,dso...]",
423                    "only consider symbols in these dsos"),
424         OPT_STRING('s', "symbol", &sym_hist_filter, "symbol",
425                     "symbol to annotate"),
426         OPT_BOOLEAN('f', "force", &force, "don't complain, do it"),
427         OPT_INCR('v', "verbose", &verbose,
428                     "be more verbose (show symbol address, etc)"),
429         OPT_BOOLEAN('D', "dump-raw-trace", &dump_trace,
430                     "dump raw trace in ASCII"),
431         OPT_STRING('k', "vmlinux", &symbol_conf.vmlinux_name,
432                    "file", "vmlinux pathname"),
433         OPT_BOOLEAN('m', "modules", &symbol_conf.use_modules,
434                     "load module symbols - WARNING: use only with -k and LIVE kernel"),
435         OPT_BOOLEAN('l', "print-line", &print_line,
436                     "print matching source lines (may be slow)"),
437         OPT_BOOLEAN('P', "full-paths", &full_paths,
438                     "Don't shorten the displayed pathnames"),
439         OPT_END()
440 };
441
442 int cmd_annotate(int argc, const char **argv, const char *prefix __used)
443 {
444         argc = parse_options(argc, argv, options, annotate_usage, 0);
445
446         setup_browser();
447
448         symbol_conf.priv_size = sizeof(struct sym_priv);
449         symbol_conf.try_vmlinux_path = true;
450
451         if (symbol__init() < 0)
452                 return -1;
453
454         setup_sorting(annotate_usage, options);
455
456         if (argc) {
457                 /*
458                  * Special case: if there's an argument left then assume tha
459                  * it's a symbol filter:
460                  */
461                 if (argc > 1)
462                         usage_with_options(annotate_usage, options);
463
464                 sym_hist_filter = argv[0];
465         }
466
467         if (field_sep && *field_sep == '.') {
468                 pr_err("'.' is the only non valid --field-separator argument\n");
469                 return -1;
470         }
471
472         return __cmd_annotate();
473 }