tools/perf/ui/stdio/hist.c

   1 #include <stdio.h>
   2
   3 #include "../../util/util.h"
   4 #include "../../util/hist.h"
   5 #include "../../util/sort.h"
   6 #include "../../util/evsel.h"
   7
   8
   9 static size_t callchain__fprintf_left_margin(FILE *fp, int left_margin)
  10 {
  11         int i;
  12         int ret = fprintf(fp, "            ");
  13
  14         for (i = 0; i < left_margin; i++)
  15                 ret += fprintf(fp, " ");
  16
  17         return ret;
  18 }
  19
  20 static size_t ipchain__fprintf_graph_line(FILE *fp, int depth, int depth_mask,
  21                                           int left_margin)
  22 {
  23         int i;
  24         size_t ret = callchain__fprintf_left_margin(fp, left_margin);
  25
  26         for (i = 0; i < depth; i++)
  27                 if (depth_mask & (1 << i))
  28                         ret += fprintf(fp, "|          ");
  29                 else
  30                         ret += fprintf(fp, "           ");
  31
  32         ret += fprintf(fp, "\n");
  33
  34         return ret;
  35 }
  36
  37 static size_t ipchain__fprintf_graph(FILE *fp, struct callchain_list *chain,
  38                                      int depth, int depth_mask, int period,
  39                                      u64 total_samples, u64 hits,
  40                                      int left_margin)
  41 {
  42         int i;
  43         size_t ret = 0;
  44
  45         ret += callchain__fprintf_left_margin(fp, left_margin);
  46         for (i = 0; i < depth; i++) {
  47                 if (depth_mask & (1 << i))
  48                         ret += fprintf(fp, "|");
  49                 else
  50                         ret += fprintf(fp, " ");
  51                 if (!period && i == depth - 1) {
  52                         double percent;
  53
  54                         percent = hits * 100.0 / total_samples;
  55                         ret += percent_color_fprintf(fp, "--%2.2f%%-- ", percent);
  56                 } else
  57                         ret += fprintf(fp, "%s", "          ");
  58         }
  59         if (chain->ms.sym)
  60                 ret += fprintf(fp, "%s\n", chain->ms.sym->name);
  61         else
  62                 ret += fprintf(fp, "0x%0" PRIx64 "\n", chain->ip);
  63
  64         return ret;
  65 }
  66
  67 static struct symbol *rem_sq_bracket;
  68 static struct callchain_list rem_hits;
  69
  70 static void init_rem_hits(void)
  71 {
  72         rem_sq_bracket = malloc(sizeof(*rem_sq_bracket) + 6);
  73         if (!rem_sq_bracket) {
  74                 fprintf(stderr, "Not enough memory to display remaining hits\n");
  75                 return;
  76         }
  77
  78         strcpy(rem_sq_bracket->name, "[...]");
  79         rem_hits.ms.sym = rem_sq_bracket;
  80 }
  81
  82 static size_t __callchain__fprintf_graph(FILE *fp, struct rb_root *root,
  83                                          u64 total_samples, int depth,
  84                                          int depth_mask, int left_margin)
  85 {
  86         struct rb_node *node, *next;
  87         struct callchain_node *child;
  88         struct callchain_list *chain;
  89         int new_depth_mask = depth_mask;
  90         u64 remaining;
  91         size_t ret = 0;
  92         int i;
  93         uint entries_printed = 0;
  94
  95         remaining = total_samples;
  96
  97         node = rb_first(root);
  98         while (node) {
  99                 u64 new_total;
 100                 u64 cumul;
 101
 102                 child = rb_entry(node, struct callchain_node, rb_node);
 103                 cumul = callchain_cumul_hits(child);
 104                 remaining -= cumul;
 105
 106                 /*
 107                  * The depth mask manages the output of pipes that show
 108                  * the depth. We don't want to keep the pipes of the current
 109                  * level for the last child of this depth.
 110                  * Except if we have remaining filtered hits. They will
 111                  * supersede the last child
 112                  */
 113                 next = rb_next(node);
 114                 if (!next && (callchain_param.mode != CHAIN_GRAPH_REL || !remaining))
 115                         new_depth_mask &= ~(1 << (depth - 1));
 116
 117                 /*
 118                  * But we keep the older depth mask for the line separator
 119                  * to keep the level link until we reach the last child
 120                  */
 121                 ret += ipchain__fprintf_graph_line(fp, depth, depth_mask,
 122                                                    left_margin);
 123                 i = 0;
 124                 list_for_each_entry(chain, &child->val, list) {
 125                         ret += ipchain__fprintf_graph(fp, chain, depth,
 126                                                       new_depth_mask, i++,
 127                                                       total_samples,
 128                                                       cumul,
 129                                                       left_margin);
 130                 }
 131
 132                 if (callchain_param.mode == CHAIN_GRAPH_REL)
 133                         new_total = child->children_hit;
 134                 else
 135                         new_total = total_samples;
 136
 137                 ret += __callchain__fprintf_graph(fp, &child->rb_root, new_total,
 138                                                   depth + 1,
 139                                                   new_depth_mask | (1 << depth),
 140                                                   left_margin);
 141                 node = next;
 142                 if (++entries_printed == callchain_param.print_limit)
 143                         break;
 144         }
 145
 146         if (callchain_param.mode == CHAIN_GRAPH_REL &&
 147                 remaining && remaining != total_samples) {
 148
 149                 if (!rem_sq_bracket)
 150                         return ret;
 151
 152                 new_depth_mask &= ~(1 << (depth - 1));
 153                 ret += ipchain__fprintf_graph(fp, &rem_hits, depth,
 154                                               new_depth_mask, 0, total_samples,
 155                                               remaining, left_margin);
 156         }
 157
 158         return ret;
 159 }
 160
 161 static size_t callchain__fprintf_graph(FILE *fp, struct rb_root *root,
 162                                        u64 total_samples, int left_margin)
 163 {
 164         struct callchain_node *cnode;
 165         struct callchain_list *chain;
 166         u32 entries_printed = 0;
 167         bool printed = false;
 168         struct rb_node *node;
 169         int i = 0;
 170         int ret = 0;
 171
 172         /*
 173          * If have one single callchain root, don't bother printing
 174          * its percentage (100 % in fractal mode and the same percentage
 175          * than the hist in graph mode). This also avoid one level of column.
 176          */
 177         node = rb_first(root);
 178         if (node && !rb_next(node)) {
 179                 cnode = rb_entry(node, struct callchain_node, rb_node);
 180                 list_for_each_entry(chain, &cnode->val, list) {
 181                         /*
 182                          * If we sort by symbol, the first entry is the same than
 183                          * the symbol. No need to print it otherwise it appears as
 184                          * displayed twice.
 185                          */
 186                         if (!i++ && sort__first_dimension == SORT_SYM)
 187                                 continue;
 188                         if (!printed) {
 189                                 ret += callchain__fprintf_left_margin(fp, left_margin);
 190                                 ret += fprintf(fp, "|\n");
 191                                 ret += callchain__fprintf_left_margin(fp, left_margin);
 192                                 ret += fprintf(fp, "---");
 193                                 left_margin += 3;
 194                                 printed = true;
 195                         } else
 196                                 ret += callchain__fprintf_left_margin(fp, left_margin);
 197
 198                         if (chain->ms.sym)
 199                                 ret += fprintf(fp, " %s\n", chain->ms.sym->name);
 200                         else
 201                                 ret += fprintf(fp, " %p\n", (void *)(long)chain->ip);
 202
 203                         if (++entries_printed == callchain_param.print_limit)
 204                                 break;
 205                 }
 206                 root = &cnode->rb_root;
 207         }
 208
 209         ret += __callchain__fprintf_graph(fp, root, total_samples,
 210                                           1, 1, left_margin);
 211         ret += fprintf(fp, "\n");
 212
 213         return ret;
 214 }
 215
 216 static size_t __callchain__fprintf_flat(FILE *fp, struct callchain_node *node,
 217                                         u64 total_samples)
 218 {
 219         struct callchain_list *chain;
 220         size_t ret = 0;
 221
 222         if (!node)
 223                 return 0;
 224
 225         ret += __callchain__fprintf_flat(fp, node->parent, total_samples);
 226
 227
 228         list_for_each_entry(chain, &node->val, list) {
 229                 if (chain->ip >= PERF_CONTEXT_MAX)
 230                         continue;
 231                 if (chain->ms.sym)
 232                         ret += fprintf(fp, "                %s\n", chain->ms.sym->name);
 233                 else
 234                         ret += fprintf(fp, "                %p\n",
 235                                         (void *)(long)chain->ip);
 236         }
 237
 238         return ret;
 239 }
 240
 241 static size_t callchain__fprintf_flat(FILE *fp, struct rb_root *tree,
 242                                       u64 total_samples)
 243 {
 244         size_t ret = 0;
 245         u32 entries_printed = 0;
 246         struct callchain_node *chain;
 247         struct rb_node *rb_node = rb_first(tree);
 248
 249         while (rb_node) {
 250                 double percent;
 251
 252                 chain = rb_entry(rb_node, struct callchain_node, rb_node);
 253                 percent = chain->hit * 100.0 / total_samples;
 254
 255                 ret = percent_color_fprintf(fp, "           %6.2f%%\n", percent);
 256                 ret += __callchain__fprintf_flat(fp, chain, total_samples);
 257                 ret += fprintf(fp, "\n");
 258                 if (++entries_printed == callchain_param.print_limit)
 259                         break;
 260
 261                 rb_node = rb_next(rb_node);
 262         }
 263
 264         return ret;
 265 }
 266
 267 static size_t hist_entry_callchain__fprintf(struct hist_entry *he,
 268                                             u64 total_samples, int left_margin,
 269                                             FILE *fp)
 270 {
 271         switch (callchain_param.mode) {
 272         case CHAIN_GRAPH_REL:
 273                 return callchain__fprintf_graph(fp, &he->sorted_chain, he->stat.period,
 274                                                 left_margin);
 275                 break;
 276         case CHAIN_GRAPH_ABS:
 277                 return callchain__fprintf_graph(fp, &he->sorted_chain, total_samples,
 278                                                 left_margin);
 279                 break;
 280         case CHAIN_FLAT:
 281                 return callchain__fprintf_flat(fp, &he->sorted_chain, total_samples);
 282                 break;
 283         case CHAIN_NONE:
 284                 break;
 285         default:
 286                 pr_err("Bad callchain mode\n");
 287         }
 288
 289         return 0;
 290 }
 291
 292 static size_t hist_entry__callchain_fprintf(struct hist_entry *he,
 293                                             struct hists *hists,
 294                                             FILE *fp)
 295 {
 296         int left_margin = 0;
 297         u64 total_period = hists->stats.total_period;
 298
 299         if (sort__first_dimension == SORT_COMM) {
 300                 struct sort_entry *se = list_first_entry(&hist_entry__sort_list,
 301                                                          typeof(*se), list);
 302                 left_margin = hists__col_len(hists, se->se_width_idx);
 303                 left_margin -= thread__comm_len(he->thread);
 304         }
 305
 306         return hist_entry_callchain__fprintf(he, total_period, left_margin, fp);
 307 }
 308
 309 static inline void advance_hpp(struct perf_hpp *hpp, int inc)
 310 {
 311         hpp->buf  += inc;
 312         hpp->size -= inc;
 313 }
 314
 315 static int hist_entry__period_snprintf(struct perf_hpp *hpp,
 316                                        struct hist_entry *he)
 317 {
 318         const char *sep = symbol_conf.field_sep;
 319         struct perf_hpp_fmt *fmt;
 320         char *start = hpp->buf;
 321         int ret;
 322         bool first = true;
 323
 324         if (symbol_conf.exclude_other && !he->parent)
 325                 return 0;
 326
 327         perf_hpp__for_each_format(fmt) {
 328                 /*
 329                  * If there's no field_sep, we still need
 330                  * to display initial '  '.
 331                  */
 332                 if (!sep || !first) {
 333                         ret = scnprintf(hpp->buf, hpp->size, "%s", sep ?: "  ");
 334                         advance_hpp(hpp, ret);
 335                 } else
 336                         first = false;
 337
 338                 if (perf_hpp__use_color() && fmt->color)
 339                         ret = fmt->color(fmt, hpp, he);
 340                 else
 341                         ret = fmt->entry(fmt, hpp, he);
 342
 343                 advance_hpp(hpp, ret);
 344         }
 345
 346         return hpp->buf - start;
 347 }
 348
 349 static int hist_entry__fprintf(struct hist_entry *he, size_t size,
 350                                struct hists *hists,
 351                                char *bf, size_t bfsz, FILE *fp)
 352 {
 353         int ret;
 354         struct perf_hpp hpp = {
 355                 .buf            = bf,
 356                 .size           = size,
 357         };
 358
 359         if (size == 0 || size > bfsz)
 360                 size = hpp.size = bfsz;
 361
 362         ret = hist_entry__period_snprintf(&hpp, he);
 363         hist_entry__sort_snprintf(he, bf + ret, size - ret, hists);
 364
 365         ret = fprintf(fp, "%s\n", bf);
 366
 367         if (symbol_conf.use_callchain)
 368                 ret += hist_entry__callchain_fprintf(he, hists, fp);
 369
 370         return ret;
 371 }
 372
 373 size_t hists__fprintf(struct hists *hists, bool show_header, int max_rows,
 374                       int max_cols, float min_pcnt, FILE *fp)
 375 {
 376         struct perf_hpp_fmt *fmt;
 377         struct sort_entry *se;
 378         struct rb_node *nd;
 379         size_t ret = 0;
 380         unsigned int width;
 381         const char *sep = symbol_conf.field_sep;
 382         const char *col_width = symbol_conf.col_width_list_str;
 383         int nr_rows = 0;
 384         char bf[96];
 385         struct perf_hpp dummy_hpp = {
 386                 .buf    = bf,
 387                 .size   = sizeof(bf),
 388                 .ptr    = hists_to_evsel(hists),
 389         };
 390         bool first = true;
 391         size_t linesz;
 392         char *line = NULL;
 393
 394         init_rem_hits();
 395
 396         if (!show_header)
 397                 goto print_entries;
 398
 399         fprintf(fp, "# ");
 400
 401         perf_hpp__for_each_format(fmt) {
 402                 if (!first)
 403                         fprintf(fp, "%s", sep ?: "  ");
 404                 else
 405                         first = false;
 406
 407                 fmt->header(fmt, &dummy_hpp);
 408                 fprintf(fp, "%s", bf);
 409         }
 410
 411         list_for_each_entry(se, &hist_entry__sort_list, list) {
 412                 if (se->elide)
 413                         continue;
 414                 if (sep) {
 415                         fprintf(fp, "%c%s", *sep, se->se_header);
 416                         continue;
 417                 }
 418                 width = strlen(se->se_header);
 419                 if (symbol_conf.col_width_list_str) {
 420                         if (col_width) {
 421                                 hists__set_col_len(hists, se->se_width_idx,
 422                                                    atoi(col_width));
 423                                 col_width = strchr(col_width, ',');
 424                                 if (col_width)
 425                                         ++col_width;
 426                         }
 427                 }
 428                 if (!hists__new_col_len(hists, se->se_width_idx, width))
 429                         width = hists__col_len(hists, se->se_width_idx);
 430                 fprintf(fp, "  %*s", width, se->se_header);
 431         }
 432
 433         fprintf(fp, "\n");
 434         if (max_rows && ++nr_rows >= max_rows)
 435                 goto out;
 436
 437         if (sep)
 438                 goto print_entries;
 439
 440         first = true;
 441
 442         fprintf(fp, "# ");
 443
 444         perf_hpp__for_each_format(fmt) {
 445                 unsigned int i;
 446
 447                 if (!first)
 448                         fprintf(fp, "%s", sep ?: "  ");
 449                 else
 450                         first = false;
 451
 452                 width = fmt->width(fmt, &dummy_hpp);
 453                 for (i = 0; i < width; i++)
 454                         fprintf(fp, ".");
 455         }
 456
 457         list_for_each_entry(se, &hist_entry__sort_list, list) {
 458                 unsigned int i;
 459
 460                 if (se->elide)
 461                         continue;
 462
 463                 fprintf(fp, "  ");
 464                 width = hists__col_len(hists, se->se_width_idx);
 465                 if (width == 0)
 466                         width = strlen(se->se_header);
 467                 for (i = 0; i < width; i++)
 468                         fprintf(fp, ".");
 469         }
 470
 471         fprintf(fp, "\n");
 472         if (max_rows && ++nr_rows >= max_rows)
 473                 goto out;
 474
 475         fprintf(fp, "#\n");
 476         if (max_rows && ++nr_rows >= max_rows)
 477                 goto out;
 478
 479 print_entries:
 480         linesz = hists__sort_list_width(hists) + 3 + 1;
 481         linesz += perf_hpp__color_overhead();
 482         line = malloc(linesz);
 483         if (line == NULL) {
 484                 ret = -1;
 485                 goto out;
 486         }
 487
 488         for (nd = rb_first(&hists->entries); nd; nd = rb_next(nd)) {
 489                 struct hist_entry *h = rb_entry(nd, struct hist_entry, rb_node);
 490                 float percent = h->stat.period * 100.0 /
 491                                         hists->stats.total_period;
 492
 493                 if (h->filtered)
 494                         continue;
 495
 496                 if (percent < min_pcnt)
 497                         continue;
 498
 499                 ret += hist_entry__fprintf(h, max_cols, hists, line, linesz, fp);
 500
 501                 if (max_rows && ++nr_rows >= max_rows)
 502                         break;
 503
 504                 if (h->ms.map == NULL && verbose > 1) {
 505                         __map_groups__fprintf_maps(&h->thread->mg,
 506                                                    MAP__FUNCTION, verbose, fp);
 507                         fprintf(fp, "%.10s end\n", graph_dotted_line);
 508                 }
 509         }
 510
 511         free(line);
 512 out:
 513         zfree(&rem_sq_bracket);
 514
 515         return ret;
 516 }
 517
 518 size_t events_stats__fprintf(struct events_stats *stats, FILE *fp)
 519 {
 520         int i;
 521         size_t ret = 0;
 522
 523         for (i = 0; i < PERF_RECORD_HEADER_MAX; ++i) {
 524                 const char *name;
 525
 526                 if (stats->nr_events[i] == 0)
 527                         continue;
 528
 529                 name = perf_event__name(i);
 530                 if (!strcmp(name, "UNKNOWN"))
 531                         continue;
 532
 533                 ret += fprintf(fp, "%16s events: %10d\n", name,
 534                                stats->nr_events[i]);
 535         }
 536
 537         return ret;
 538 }