Merge branch 'spi/merge' of git://git.secretlab.ca/git/linux-2.6
[pandora-kernel.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, use_tui, use_stdio;
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 sample_data *sample,
62                                 struct perf_session *session)
63 {
64         struct addr_location al;
65
66         if (event__preprocess_sample(event, session, &al, sample, 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 %016" PRIx64, 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("%*" PRIx64 ": %" PRIu64 "\n", BITS_PER_LONG / 2,
274                                sym->start + offset, h->ip[offset]);
275         printf("%*s: %" PRIu64 "\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) < 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 *nd = rb_first(&self->entries), *next;
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                         switch (key) {
347                         case KEY_RIGHT:
348                                 next = rb_next(nd);
349                                 break;
350                         case KEY_LEFT:
351                                 next = rb_prev(nd);
352                                 break;
353                         default:
354                                 return;
355                         }
356
357                         if (next != NULL)
358                                 nd = next;
359                 } else {
360                         hist_entry__tty_annotate(he);
361                         nd = rb_next(nd);
362                         /*
363                          * Since we have a hist_entry per IP for the same
364                          * symbol, free he->ms.sym->hist to signal we already
365                          * processed this symbol.
366                          */
367                         free(priv->hist);
368                         priv->hist = NULL;
369                 }
370         }
371 }
372
373 static struct perf_event_ops event_ops = {
374         .sample = process_sample_event,
375         .mmap   = event__process_mmap,
376         .comm   = event__process_comm,
377         .fork   = event__process_task,
378         .ordered_samples = true,
379         .ordering_requires_timestamps = true,
380 };
381
382 static int __cmd_annotate(void)
383 {
384         int ret;
385         struct perf_session *session;
386
387         session = perf_session__new(input_name, O_RDONLY, force, false, &event_ops);
388         if (session == NULL)
389                 return -ENOMEM;
390
391         ret = perf_session__process_events(session, &event_ops);
392         if (ret)
393                 goto out_delete;
394
395         if (dump_trace) {
396                 perf_session__fprintf_nr_events(session, stdout);
397                 goto out_delete;
398         }
399
400         if (verbose > 3)
401                 perf_session__fprintf(session, stdout);
402
403         if (verbose > 2)
404                 perf_session__fprintf_dsos(session, stdout);
405
406         hists__collapse_resort(&session->hists);
407         hists__output_resort(&session->hists);
408         hists__find_annotations(&session->hists);
409 out_delete:
410         perf_session__delete(session);
411
412         return ret;
413 }
414
415 static const char * const annotate_usage[] = {
416         "perf annotate [<options>] <command>",
417         NULL
418 };
419
420 static const struct option options[] = {
421         OPT_STRING('i', "input", &input_name, "file",
422                     "input file name"),
423         OPT_STRING('d', "dsos", &symbol_conf.dso_list_str, "dso[,dso...]",
424                    "only consider symbols in these dsos"),
425         OPT_STRING('s', "symbol", &sym_hist_filter, "symbol",
426                     "symbol to annotate"),
427         OPT_BOOLEAN('f', "force", &force, "don't complain, do it"),
428         OPT_INCR('v', "verbose", &verbose,
429                     "be more verbose (show symbol address, etc)"),
430         OPT_BOOLEAN('D', "dump-raw-trace", &dump_trace,
431                     "dump raw trace in ASCII"),
432         OPT_BOOLEAN(0, "tui", &use_tui, "Use the TUI interface"),
433         OPT_BOOLEAN(0, "stdio", &use_stdio, "Use the stdio interface"),
434         OPT_STRING('k', "vmlinux", &symbol_conf.vmlinux_name,
435                    "file", "vmlinux pathname"),
436         OPT_BOOLEAN('m', "modules", &symbol_conf.use_modules,
437                     "load module symbols - WARNING: use only with -k and LIVE kernel"),
438         OPT_BOOLEAN('l', "print-line", &print_line,
439                     "print matching source lines (may be slow)"),
440         OPT_BOOLEAN('P', "full-paths", &full_paths,
441                     "Don't shorten the displayed pathnames"),
442         OPT_END()
443 };
444
445 int cmd_annotate(int argc, const char **argv, const char *prefix __used)
446 {
447         argc = parse_options(argc, argv, options, annotate_usage, 0);
448
449         if (use_stdio)
450                 use_browser = 0;
451         else if (use_tui)
452                 use_browser = 1;
453
454         setup_browser();
455
456         symbol_conf.priv_size = sizeof(struct sym_priv);
457         symbol_conf.try_vmlinux_path = true;
458
459         if (symbol__init() < 0)
460                 return -1;
461
462         setup_sorting(annotate_usage, options);
463
464         if (argc) {
465                 /*
466                  * Special case: if there's an argument left then assume tha
467                  * it's a symbol filter:
468                  */
469                 if (argc > 1)
470                         usage_with_options(annotate_usage, options);
471
472                 sym_hist_filter = argv[0];
473         }
474
475         if (field_sep && *field_sep == '.') {
476                 pr_err("'.' is the only non valid --field-separator argument\n");
477                 return -1;
478         }
479
480         return __cmd_annotate();
481 }