perf annotate browser: Allow navigation to called functions
[sfrench/cifs-2.6.git] / tools / perf / util / ui / browsers / annotate.c
1 #include "../browser.h"
2 #include "../helpline.h"
3 #include "../libslang.h"
4 #include "../../annotate.h"
5 #include "../../hist.h"
6 #include "../../sort.h"
7 #include "../../symbol.h"
8 #include <pthread.h>
9
10 static void ui__error_window(const char *fmt, ...)
11 {
12         va_list ap;
13
14         va_start(ap, fmt);
15         newtWinMessagev((char *)"Error", (char *)"Ok", (char *)fmt, ap);
16         va_end(ap);
17 }
18
19 struct annotate_browser {
20         struct ui_browser b;
21         struct rb_root    entries;
22         struct rb_node    *curr_hot;
23         struct objdump_line *selection;
24 };
25
26 struct objdump_line_rb_node {
27         struct rb_node  rb_node;
28         double          percent;
29         u32             idx;
30 };
31
32 static inline
33 struct objdump_line_rb_node *objdump_line__rb(struct objdump_line *self)
34 {
35         return (struct objdump_line_rb_node *)(self + 1);
36 }
37
38 static void annotate_browser__write(struct ui_browser *self, void *entry, int row)
39 {
40         struct annotate_browser *ab = container_of(self, struct annotate_browser, b);
41         struct objdump_line *ol = rb_entry(entry, struct objdump_line, node);
42         bool current_entry = ui_browser__is_current_entry(self, row);
43         int width = self->width;
44
45         if (ol->offset != -1) {
46                 struct objdump_line_rb_node *olrb = objdump_line__rb(ol);
47                 ui_browser__set_percent_color(self, olrb->percent, current_entry);
48                 slsmg_printf(" %7.2f ", olrb->percent);
49         } else {
50                 ui_browser__set_percent_color(self, 0, current_entry);
51                 slsmg_write_nstring(" ", 9);
52         }
53
54         SLsmg_write_char(':');
55         slsmg_write_nstring(" ", 8);
56         if (!*ol->line)
57                 slsmg_write_nstring(" ", width - 18);
58         else
59                 slsmg_write_nstring(ol->line, width - 18);
60
61         if (!current_entry)
62                 ui_browser__set_color(self, HE_COLORSET_CODE);
63         else
64                 ab->selection = ol;
65 }
66
67 static double objdump_line__calc_percent(struct objdump_line *self,
68                                          struct symbol *sym, int evidx)
69 {
70         double percent = 0.0;
71
72         if (self->offset != -1) {
73                 int len = sym->end - sym->start;
74                 unsigned int hits = 0;
75                 struct annotation *notes = symbol__annotation(sym);
76                 struct source_line *src_line = notes->src->lines;
77                 struct sym_hist *h = annotation__histogram(notes, evidx);
78                 s64 offset = self->offset;
79                 struct objdump_line *next;
80
81                 next = objdump__get_next_ip_line(&notes->src->source, self);
82                 while (offset < (s64)len &&
83                        (next == NULL || offset < next->offset)) {
84                         if (src_line) {
85                                 percent += src_line[offset].percent;
86                         } else
87                                 hits += h->addr[offset];
88
89                         ++offset;
90                 }
91                 /*
92                  * If the percentage wasn't already calculated in
93                  * symbol__get_source_line, do it now:
94                  */
95                 if (src_line == NULL && h->sum)
96                         percent = 100.0 * hits / h->sum;
97         }
98
99         return percent;
100 }
101
102 static void objdump__insert_line(struct rb_root *self,
103                                  struct objdump_line_rb_node *line)
104 {
105         struct rb_node **p = &self->rb_node;
106         struct rb_node *parent = NULL;
107         struct objdump_line_rb_node *l;
108
109         while (*p != NULL) {
110                 parent = *p;
111                 l = rb_entry(parent, struct objdump_line_rb_node, rb_node);
112                 if (line->percent < l->percent)
113                         p = &(*p)->rb_left;
114                 else
115                         p = &(*p)->rb_right;
116         }
117         rb_link_node(&line->rb_node, parent, p);
118         rb_insert_color(&line->rb_node, self);
119 }
120
121 static void annotate_browser__set_top(struct annotate_browser *self,
122                                       struct rb_node *nd)
123 {
124         struct objdump_line_rb_node *rbpos;
125         struct objdump_line *pos;
126         unsigned back;
127
128         ui_browser__refresh_dimensions(&self->b);
129         back = self->b.height / 2;
130         rbpos = rb_entry(nd, struct objdump_line_rb_node, rb_node);
131         pos = ((struct objdump_line *)rbpos) - 1;
132         self->b.top_idx = self->b.index = rbpos->idx;
133
134         while (self->b.top_idx != 0 && back != 0) {
135                 pos = list_entry(pos->node.prev, struct objdump_line, node);
136
137                 --self->b.top_idx;
138                 --back;
139         }
140
141         self->b.top = pos;
142         self->curr_hot = nd;
143 }
144
145 static void annotate_browser__calc_percent(struct annotate_browser *browser,
146                                            int evidx)
147 {
148         struct map_symbol *ms = browser->b.priv;
149         struct symbol *sym = ms->sym;
150         struct annotation *notes = symbol__annotation(sym);
151         struct objdump_line *pos;
152
153         browser->entries = RB_ROOT;
154
155         pthread_mutex_lock(&notes->lock);
156
157         list_for_each_entry(pos, &notes->src->source, node) {
158                 struct objdump_line_rb_node *rbpos = objdump_line__rb(pos);
159                 rbpos->percent = objdump_line__calc_percent(pos, sym, evidx);
160                 if (rbpos->percent < 0.01) {
161                         RB_CLEAR_NODE(&rbpos->rb_node);
162                         continue;
163                 }
164                 objdump__insert_line(&browser->entries, rbpos);
165         }
166         pthread_mutex_unlock(&notes->lock);
167
168         browser->curr_hot = rb_last(&browser->entries);
169 }
170
171 static int annotate_browser__run(struct annotate_browser *self, int evidx,
172                                  int nr_events, void(*timer)(void *arg),
173                                  void *arg, int delay_secs)
174 {
175         struct rb_node *nd = NULL;
176         struct map_symbol *ms = self->b.priv;
177         struct symbol *sym = ms->sym;
178         /*
179          * RIGHT To allow builtin-annotate to cycle thru multiple symbols by
180          * examining the exit key for this function.
181          */
182         int exit_keys[] = { 'H', NEWT_KEY_TAB, NEWT_KEY_UNTAB,
183                             NEWT_KEY_RIGHT, NEWT_KEY_ENTER, 0 };
184         int key;
185
186         if (ui_browser__show(&self->b, sym->name,
187                              "<-, -> or ESC: exit, TAB/shift+TAB: "
188                              "cycle hottest lines, H: Hottest") < 0)
189                 return -1;
190
191         ui_browser__add_exit_keys(&self->b, exit_keys);
192         annotate_browser__calc_percent(self, evidx);
193
194         if (self->curr_hot)
195                 annotate_browser__set_top(self, self->curr_hot);
196
197         nd = self->curr_hot;
198
199         if (delay_secs != 0)
200                 newtFormSetTimer(self->b.form, delay_secs * 1000);
201
202         while (1) {
203                 key = ui_browser__run(&self->b);
204
205                 if (delay_secs != 0) {
206                         annotate_browser__calc_percent(self, evidx);
207                         /*
208                          * Current line focus got out of the list of most active
209                          * lines, NULL it so that if TAB|UNTAB is pressed, we
210                          * move to curr_hot (current hottest line).
211                          */
212                         if (nd != NULL && RB_EMPTY_NODE(nd))
213                                 nd = NULL;
214                 }
215
216                 switch (key) {
217                 case -1:
218                         /*
219                          * FIXME we need to check if it was
220                          * es.reason == NEWT_EXIT_TIMER
221                          */
222                         if (timer != NULL)
223                                 timer(arg);
224
225                         if (delay_secs != 0)
226                                 symbol__annotate_decay_histogram(sym, evidx);
227                         continue;
228                 case NEWT_KEY_TAB:
229                         if (nd != NULL) {
230                                 nd = rb_prev(nd);
231                                 if (nd == NULL)
232                                         nd = rb_last(&self->entries);
233                         } else
234                                 nd = self->curr_hot;
235                         break;
236                 case NEWT_KEY_UNTAB:
237                         if (nd != NULL)
238                                 nd = rb_next(nd);
239                                 if (nd == NULL)
240                                         nd = rb_first(&self->entries);
241                         else
242                                 nd = self->curr_hot;
243                         break;
244                 case 'H':
245                         nd = self->curr_hot;
246                         break;
247                 case NEWT_KEY_ENTER:
248                         if (self->selection != NULL) {
249                                 char *s = strstr(self->selection->line, "callq ");
250                                 struct annotation *notes;
251                                 struct symbol *target;
252                                 u64 ip;
253
254                                 if (s == NULL)
255                                         continue;
256
257                                 s = strchr(s, ' ');
258                                 if (s++ == NULL)
259                                         continue;
260
261                                 ip = strtoull(s, NULL, 16);
262                                 ip = ms->map->map_ip(ms->map, ip);
263                                 target = map__find_symbol(ms->map, ip, NULL);
264                                 if (target == NULL)
265                                         continue;
266
267                                 notes = symbol__annotation(target);
268                                 pthread_mutex_lock(&notes->lock);
269
270                                 if (notes->src == NULL &&
271                                     symbol__alloc_hist(target, nr_events) < 0) {
272                                         pthread_mutex_unlock(&notes->lock);
273                                         ui__warning("Not enough memory for annotating '%s' symbol!\n",
274                                                     target->name);
275                                         continue;
276                                 }
277
278                                 pthread_mutex_unlock(&notes->lock);
279                                 symbol__tui_annotate(target, ms->map, evidx, nr_events,
280                                                      timer, arg, delay_secs);
281                         }
282                         break;
283                 default:
284                         goto out;
285                 }
286
287                 if (nd != NULL)
288                         annotate_browser__set_top(self, nd);
289         }
290 out:
291         ui_browser__hide(&self->b);
292         return key;
293 }
294
295 int hist_entry__tui_annotate(struct hist_entry *he, int evidx, int nr_events,
296                              void(*timer)(void *arg), void *arg, int delay_secs)
297 {
298         return symbol__tui_annotate(he->ms.sym, he->ms.map, evidx, nr_events,
299                                     timer, arg, delay_secs);
300 }
301
302 int symbol__tui_annotate(struct symbol *sym, struct map *map, int evidx,
303                          int nr_events, void(*timer)(void *arg), void *arg,
304                          int delay_secs)
305 {
306         struct objdump_line *pos, *n;
307         struct annotation *notes;
308         struct map_symbol ms = {
309                 .map = map,
310                 .sym = sym,
311         };
312         struct annotate_browser browser = {
313                 .b = {
314                         .refresh = ui_browser__list_head_refresh,
315                         .seek    = ui_browser__list_head_seek,
316                         .write   = annotate_browser__write,
317                         .priv    = &ms,
318                 },
319         };
320         int ret;
321
322         if (sym == NULL)
323                 return -1;
324
325         if (map->dso->annotate_warned)
326                 return -1;
327
328         if (symbol__annotate(sym, map, sizeof(struct objdump_line_rb_node)) < 0) {
329                 ui__error_window(ui_helpline__last_msg);
330                 return -1;
331         }
332
333         ui_helpline__push("Press <- or ESC to exit");
334
335         notes = symbol__annotation(sym);
336
337         list_for_each_entry(pos, &notes->src->source, node) {
338                 struct objdump_line_rb_node *rbpos;
339                 size_t line_len = strlen(pos->line);
340
341                 if (browser.b.width < line_len)
342                         browser.b.width = line_len;
343                 rbpos = objdump_line__rb(pos);
344                 rbpos->idx = browser.b.nr_entries++;
345         }
346
347         browser.b.entries = &notes->src->source,
348         browser.b.width += 18; /* Percentage */
349         ret = annotate_browser__run(&browser, evidx, nr_events,
350                                     timer, arg, delay_secs);
351         list_for_each_entry_safe(pos, n, &notes->src->source, node) {
352                 list_del(&pos->node);
353                 objdump_line__free(pos);
354         }
355         return ret;
356 }