tools/perf/util/ui/browsers/top.c

   1 /*
   2  * Copyright (C) 2011, Red Hat Inc, Arnaldo Carvalho de Melo <acme@redhat.com>
   3  *
   4  * Parts came from builtin-{top,stat,record}.c, see those files for further
   5  * copyright notes.
   6  *
   7  * Released under the GPL v2. (and only v2, not any later version)
   8  */
   9 #include "../browser.h"
  10 #include "../../annotate.h"
  11 #include "../helpline.h"
  12 #include "../libslang.h"
  13 #include "../../evlist.h"
  14 #include "../../hist.h"
  15 #include "../../sort.h"
  16 #include "../../symbol.h"
  17 #include "../../top.h"
  18
  19 struct perf_top_browser {
  20         struct ui_browser b;
  21         struct rb_root    root;
  22         struct sym_entry  *selection;
  23         float             sum_ksamples;
  24         int               dso_width;
  25         int               dso_short_width;
  26         int               sym_width;
  27 };
  28
  29 static void perf_top_browser__write(struct ui_browser *browser, void *entry, int row)
  30 {
  31         struct perf_top_browser *top_browser = container_of(browser, struct perf_top_browser, b);
  32         struct sym_entry *syme = rb_entry(entry, struct sym_entry, rb_node);
  33         bool current_entry = ui_browser__is_current_entry(browser, row);
  34         struct symbol *symbol = sym_entry__symbol(syme);
  35         struct perf_top *top = browser->priv;
  36         int width = browser->width;
  37         double pcnt;
  38
  39         pcnt = 100.0 - (100.0 * ((top_browser->sum_ksamples - syme->snap_count) /
  40                                  top_browser->sum_ksamples));
  41         ui_browser__set_percent_color(browser, pcnt, current_entry);
  42
  43         if (top->evlist->nr_entries == 1 || !top->display_weighted) {
  44                 slsmg_printf("%20.2f ", syme->weight);
  45                 width -= 24;
  46         } else {
  47                 slsmg_printf("%9.1f %10ld ", syme->weight, syme->snap_count);
  48                 width -= 23;
  49         }
  50
  51         slsmg_printf("%4.1f%%", pcnt);
  52         width -= 7;
  53
  54         if (verbose) {
  55                 slsmg_printf(" %016" PRIx64, symbol->start);
  56                 width -= 17;
  57         }
  58
  59         slsmg_printf(" %-*.*s ", top_browser->sym_width, top_browser->sym_width,
  60                      symbol->name);
  61         width -= top_browser->sym_width;
  62         slsmg_write_nstring(width >= syme->map->dso->long_name_len ?
  63                                 syme->map->dso->long_name :
  64                                 syme->map->dso->short_name, width);
  65
  66         if (current_entry)
  67                 top_browser->selection = syme;
  68 }
  69
  70 static void perf_top_browser__update_rb_tree(struct perf_top_browser *browser)
  71 {
  72         struct perf_top *top = browser->b.priv;
  73
  74         browser->root = RB_ROOT;
  75         browser->b.top = NULL;
  76         browser->sum_ksamples = perf_top__decay_samples(top, &browser->root);
  77         perf_top__find_widths(top, &browser->root, &browser->dso_width,
  78                               &browser->dso_short_width,
  79                               &browser->sym_width);
  80         if (browser->sym_width + browser->dso_width > browser->b.width - 29) {
  81                 browser->dso_width = browser->dso_short_width;
  82                 if (browser->sym_width + browser->dso_width > browser->b.width - 29)
  83                         browser->sym_width = browser->b.width - browser->dso_width - 29;
  84         }
  85         browser->b.nr_entries = top->rb_entries;
  86 }
  87
  88 static void perf_top_browser__annotate(struct perf_top_browser *browser)
  89 {
  90         struct sym_entry *syme = browser->selection;
  91         struct symbol *sym = sym_entry__symbol(syme);
  92         struct annotation *notes = symbol__annotation(sym);
  93         struct perf_top *top = browser->b.priv;
  94
  95         if (notes->src != NULL)
  96                 goto do_annotation;
  97
  98         pthread_mutex_lock(&notes->lock);
  99
 100         top->sym_filter_entry = NULL;
 101
 102         if (symbol__alloc_hist(sym, top->evlist->nr_entries) < 0) {
 103                 pr_err("Not enough memory for annotating '%s' symbol!\n",
 104                        sym->name);
 105                 pthread_mutex_unlock(&notes->lock);
 106                 return;
 107         }
 108
 109         top->sym_filter_entry = syme;
 110
 111         pthread_mutex_unlock(&notes->lock);
 112 do_annotation:
 113         symbol__tui_annotate(sym, syme->map, 0, top->delay_secs * 1000);
 114 }
 115
 116 static int perf_top_browser__run(struct perf_top_browser *browser)
 117 {
 118         int key;
 119         char title[160];
 120         struct perf_top *top = browser->b.priv;
 121         int delay_msecs = top->delay_secs * 1000;
 122         int exit_keys[] = { 'a', NEWT_KEY_ENTER, NEWT_KEY_RIGHT, 0, };
 123
 124         perf_top_browser__update_rb_tree(browser);
 125         perf_top__header_snprintf(top, title, sizeof(title));
 126         perf_top__reset_sample_counters(top);
 127
 128         if (ui_browser__show(&browser->b, title,
 129                              "ESC: exit, ENTER|->|a: Live Annotate") < 0)
 130                 return -1;
 131
 132         newtFormSetTimer(browser->b.form, delay_msecs);
 133         ui_browser__add_exit_keys(&browser->b, exit_keys);
 134
 135         while (1) {
 136                 key = ui_browser__run(&browser->b);
 137
 138                 switch (key) {
 139                 case -1:
 140                         /* FIXME we need to check if it was es.reason == NEWT_EXIT_TIMER */
 141                         perf_top_browser__update_rb_tree(browser);
 142                         perf_top__header_snprintf(top, title, sizeof(title));
 143                         perf_top__reset_sample_counters(top);
 144                         ui_browser__set_color(&browser->b, NEWT_COLORSET_ROOT);
 145                         SLsmg_gotorc(0, 0);
 146                         slsmg_write_nstring(title, browser->b.width);
 147                         break;
 148                 case 'a':
 149                 case NEWT_KEY_RIGHT:
 150                 case NEWT_KEY_ENTER:
 151                         if (browser->selection)
 152                                 perf_top_browser__annotate(browser);
 153                         break;
 154                 default:
 155                         goto out;
 156                 }
 157         }
 158 out:
 159         ui_browser__hide(&browser->b);
 160         return key;
 161 }
 162
 163 int perf_top__tui_browser(struct perf_top *top)
 164 {
 165         struct perf_top_browser browser = {
 166                 .b = {
 167                         .entries = &browser.root,
 168                         .refresh = ui_browser__rb_tree_refresh,
 169                         .seek    = ui_browser__rb_tree_seek,
 170                         .write   = perf_top_browser__write,
 171                         .priv    = top,
 172                 },
 173         };
 174
 175         ui_helpline__push("Press <- or ESC to exit");
 176         return perf_top_browser__run(&browser);
 177 }