tools/perf/builtin-diff.c

   1 /*
   2  * builtin-diff.c
   3  *
   4  * Builtin diff command: Analyze two perf.data input files, look up and read
   5  * DSOs and symbol information, sort them and produce a diff.
   6  */
   7 #include "builtin.h"
   8
   9 #include "util/debug.h"
  10 #include "util/event.h"
  11 #include "util/hist.h"
  12 #include "util/evsel.h"
  13 #include "util/evlist.h"
  14 #include "util/session.h"
  15 #include "util/tool.h"
  16 #include "util/sort.h"
  17 #include "util/symbol.h"
  18 #include "util/util.h"
  19 #include "util/data.h"
  20
  21 #include <stdlib.h>
  22 #include <math.h>
  23
  24 /* Diff command specific HPP columns. */
  25 enum {
  26         PERF_HPP_DIFF__BASELINE,
  27         PERF_HPP_DIFF__PERIOD,
  28         PERF_HPP_DIFF__PERIOD_BASELINE,
  29         PERF_HPP_DIFF__DELTA,
  30         PERF_HPP_DIFF__RATIO,
  31         PERF_HPP_DIFF__WEIGHTED_DIFF,
  32         PERF_HPP_DIFF__FORMULA,
  33
  34         PERF_HPP_DIFF__MAX_INDEX
  35 };
  36
  37 struct diff_hpp_fmt {
  38         struct perf_hpp_fmt      fmt;
  39         int                      idx;
  40         char                    *header;
  41         int                      header_width;
  42 };
  43
  44 struct data__file {
  45         struct perf_session     *session;
  46         struct perf_data_file   file;
  47         int                      idx;
  48         struct hists            *hists;
  49         struct diff_hpp_fmt      fmt[PERF_HPP_DIFF__MAX_INDEX];
  50 };
  51
  52 static struct data__file *data__files;
  53 static int data__files_cnt;
  54
  55 #define data__for_each_file_start(i, d, s)      \
  56         for (i = s, d = &data__files[s];        \
  57              i < data__files_cnt;               \
  58              i++, d = &data__files[i])
  59
  60 #define data__for_each_file(i, d) data__for_each_file_start(i, d, 0)
  61 #define data__for_each_file_new(i, d) data__for_each_file_start(i, d, 1)
  62
  63 static char diff__default_sort_order[] = "dso,symbol";
  64 static bool force;
  65 static bool show_period;
  66 static bool show_formula;
  67 static bool show_baseline_only;
  68 static unsigned int sort_compute;
  69
  70 static s64 compute_wdiff_w1;
  71 static s64 compute_wdiff_w2;
  72
  73 enum {
  74         COMPUTE_DELTA,
  75         COMPUTE_RATIO,
  76         COMPUTE_WEIGHTED_DIFF,
  77         COMPUTE_MAX,
  78 };
  79
  80 const char *compute_names[COMPUTE_MAX] = {
  81         [COMPUTE_DELTA] = "delta",
  82         [COMPUTE_RATIO] = "ratio",
  83         [COMPUTE_WEIGHTED_DIFF] = "wdiff",
  84 };
  85
  86 static int compute;
  87
  88 static int compute_2_hpp[COMPUTE_MAX] = {
  89         [COMPUTE_DELTA]         = PERF_HPP_DIFF__DELTA,
  90         [COMPUTE_RATIO]         = PERF_HPP_DIFF__RATIO,
  91         [COMPUTE_WEIGHTED_DIFF] = PERF_HPP_DIFF__WEIGHTED_DIFF,
  92 };
  93
  94 #define MAX_COL_WIDTH 70
  95
  96 static struct header_column {
  97         const char *name;
  98         int width;
  99 } columns[PERF_HPP_DIFF__MAX_INDEX] = {
 100         [PERF_HPP_DIFF__BASELINE] = {
 101                 .name  = "Baseline",
 102         },
 103         [PERF_HPP_DIFF__PERIOD] = {
 104                 .name  = "Period",
 105                 .width = 14,
 106         },
 107         [PERF_HPP_DIFF__PERIOD_BASELINE] = {
 108                 .name  = "Base period",
 109                 .width = 14,
 110         },
 111         [PERF_HPP_DIFF__DELTA] = {
 112                 .name  = "Delta",
 113                 .width = 7,
 114         },
 115         [PERF_HPP_DIFF__RATIO] = {
 116                 .name  = "Ratio",
 117                 .width = 14,
 118         },
 119         [PERF_HPP_DIFF__WEIGHTED_DIFF] = {
 120                 .name  = "Weighted diff",
 121                 .width = 14,
 122         },
 123         [PERF_HPP_DIFF__FORMULA] = {
 124                 .name  = "Formula",
 125                 .width = MAX_COL_WIDTH,
 126         }
 127 };
 128
 129 static int setup_compute_opt_wdiff(char *opt)
 130 {
 131         char *w1_str = opt;
 132         char *w2_str;
 133
 134         int ret = -EINVAL;
 135
 136         if (!opt)
 137                 goto out;
 138
 139         w2_str = strchr(opt, ',');
 140         if (!w2_str)
 141                 goto out;
 142
 143         *w2_str++ = 0x0;
 144         if (!*w2_str)
 145                 goto out;
 146
 147         compute_wdiff_w1 = strtol(w1_str, NULL, 10);
 148         compute_wdiff_w2 = strtol(w2_str, NULL, 10);
 149
 150         if (!compute_wdiff_w1 || !compute_wdiff_w2)
 151                 goto out;
 152
 153         pr_debug("compute wdiff w1(%" PRId64 ") w2(%" PRId64 ")\n",
 154                   compute_wdiff_w1, compute_wdiff_w2);
 155
 156         ret = 0;
 157
 158  out:
 159         if (ret)
 160                 pr_err("Failed: wrong weight data, use 'wdiff:w1,w2'\n");
 161
 162         return ret;
 163 }
 164
 165 static int setup_compute_opt(char *opt)
 166 {
 167         if (compute == COMPUTE_WEIGHTED_DIFF)
 168                 return setup_compute_opt_wdiff(opt);
 169
 170         if (opt) {
 171                 pr_err("Failed: extra option specified '%s'", opt);
 172                 return -EINVAL;
 173         }
 174
 175         return 0;
 176 }
 177
 178 static int setup_compute(const struct option *opt, const char *str,
 179                          int unset __maybe_unused)
 180 {
 181         int *cp = (int *) opt->value;
 182         char *cstr = (char *) str;
 183         char buf[50];
 184         unsigned i;
 185         char *option;
 186
 187         if (!str) {
 188                 *cp = COMPUTE_DELTA;
 189                 return 0;
 190         }
 191
 192         option = strchr(str, ':');
 193         if (option) {
 194                 unsigned len = option++ - str;
 195
 196                 /*
 197                  * The str data are not writeable, so we need
 198                  * to use another buffer.
 199                  */
 200
 201                 /* No option value is longer. */
 202                 if (len >= sizeof(buf))
 203                         return -EINVAL;
 204
 205                 strncpy(buf, str, len);
 206                 buf[len] = 0x0;
 207                 cstr = buf;
 208         }
 209
 210         for (i = 0; i < COMPUTE_MAX; i++)
 211                 if (!strcmp(cstr, compute_names[i])) {
 212                         *cp = i;
 213                         return setup_compute_opt(option);
 214                 }
 215
 216         pr_err("Failed: '%s' is not computation method "
 217                "(use 'delta','ratio' or 'wdiff')\n", str);
 218         return -EINVAL;
 219 }
 220
 221 static double period_percent(struct hist_entry *he, u64 period)
 222 {
 223         u64 total = he->hists->stats.total_period;
 224         return (period * 100.0) / total;
 225 }
 226
 227 static double compute_delta(struct hist_entry *he, struct hist_entry *pair)
 228 {
 229         double old_percent = period_percent(he, he->stat.period);
 230         double new_percent = period_percent(pair, pair->stat.period);
 231
 232         pair->diff.period_ratio_delta = new_percent - old_percent;
 233         pair->diff.computed = true;
 234         return pair->diff.period_ratio_delta;
 235 }
 236
 237 static double compute_ratio(struct hist_entry *he, struct hist_entry *pair)
 238 {
 239         double old_period = he->stat.period ?: 1;
 240         double new_period = pair->stat.period;
 241
 242         pair->diff.computed = true;
 243         pair->diff.period_ratio = new_period / old_period;
 244         return pair->diff.period_ratio;
 245 }
 246
 247 static s64 compute_wdiff(struct hist_entry *he, struct hist_entry *pair)
 248 {
 249         u64 old_period = he->stat.period;
 250         u64 new_period = pair->stat.period;
 251
 252         pair->diff.computed = true;
 253         pair->diff.wdiff = new_period * compute_wdiff_w2 -
 254                            old_period * compute_wdiff_w1;
 255
 256         return pair->diff.wdiff;
 257 }
 258
 259 static int formula_delta(struct hist_entry *he, struct hist_entry *pair,
 260                          char *buf, size_t size)
 261 {
 262         return scnprintf(buf, size,
 263                          "(%" PRIu64 " * 100 / %" PRIu64 ") - "
 264                          "(%" PRIu64 " * 100 / %" PRIu64 ")",
 265                           pair->stat.period, pair->hists->stats.total_period,
 266                           he->stat.period, he->hists->stats.total_period);
 267 }
 268
 269 static int formula_ratio(struct hist_entry *he, struct hist_entry *pair,
 270                          char *buf, size_t size)
 271 {
 272         double old_period = he->stat.period;
 273         double new_period = pair->stat.period;
 274
 275         return scnprintf(buf, size, "%.0F / %.0F", new_period, old_period);
 276 }
 277
 278 static int formula_wdiff(struct hist_entry *he, struct hist_entry *pair,
 279                          char *buf, size_t size)
 280 {
 281         u64 old_period = he->stat.period;
 282         u64 new_period = pair->stat.period;
 283
 284         return scnprintf(buf, size,
 285                   "(%" PRIu64 " * " "%" PRId64 ") - (%" PRIu64 " * " "%" PRId64 ")",
 286                   new_period, compute_wdiff_w2, old_period, compute_wdiff_w1);
 287 }
 288
 289 static int formula_fprintf(struct hist_entry *he, struct hist_entry *pair,
 290                            char *buf, size_t size)
 291 {
 292         switch (compute) {
 293         case COMPUTE_DELTA:
 294                 return formula_delta(he, pair, buf, size);
 295         case COMPUTE_RATIO:
 296                 return formula_ratio(he, pair, buf, size);
 297         case COMPUTE_WEIGHTED_DIFF:
 298                 return formula_wdiff(he, pair, buf, size);
 299         default:
 300                 BUG_ON(1);
 301         }
 302
 303         return -1;
 304 }
 305
 306 static int hists__add_entry(struct hists *hists,
 307                             struct addr_location *al, u64 period,
 308                             u64 weight, u64 transaction)
 309 {
 310         if (__hists__add_entry(hists, al, NULL, NULL, NULL, period, weight,
 311                                transaction) != NULL)
 312                 return 0;
 313         return -ENOMEM;
 314 }
 315
 316 static int diff__process_sample_event(struct perf_tool *tool __maybe_unused,
 317                                       union perf_event *event,
 318                                       struct perf_sample *sample,
 319                                       struct perf_evsel *evsel,
 320                                       struct machine *machine)
 321 {
 322         struct addr_location al;
 323
 324         if (perf_event__preprocess_sample(event, machine, &al, sample) < 0) {
 325                 pr_warning("problem processing %d event, skipping it.\n",
 326                            event->header.type);
 327                 return -1;
 328         }
 329
 330         if (al.filtered)
 331                 return 0;
 332
 333         if (hists__add_entry(&evsel->hists, &al, sample->period,
 334                              sample->weight, sample->transaction)) {
 335                 pr_warning("problem incrementing symbol period, skipping event\n");
 336                 return -1;
 337         }
 338
 339         evsel->hists.stats.total_period += sample->period;
 340         return 0;
 341 }
 342
 343 static struct perf_tool tool = {
 344         .sample = diff__process_sample_event,
 345         .mmap   = perf_event__process_mmap,
 346         .comm   = perf_event__process_comm,
 347         .exit   = perf_event__process_exit,
 348         .fork   = perf_event__process_fork,
 349         .lost   = perf_event__process_lost,
 350         .ordered_samples = true,
 351         .ordering_requires_timestamps = true,
 352 };
 353
 354 static struct perf_evsel *evsel_match(struct perf_evsel *evsel,
 355                                       struct perf_evlist *evlist)
 356 {
 357         struct perf_evsel *e;
 358
 359         list_for_each_entry(e, &evlist->entries, node)
 360                 if (perf_evsel__match2(evsel, e))
 361                         return e;
 362
 363         return NULL;
 364 }
 365
 366 static void perf_evlist__collapse_resort(struct perf_evlist *evlist)
 367 {
 368         struct perf_evsel *evsel;
 369
 370         list_for_each_entry(evsel, &evlist->entries, node) {
 371                 struct hists *hists = &evsel->hists;
 372
 373                 hists__collapse_resort(hists, NULL);
 374         }
 375 }
 376
 377 static struct hist_entry*
 378 get_pair_data(struct hist_entry *he, struct data__file *d)
 379 {
 380         if (hist_entry__has_pairs(he)) {
 381                 struct hist_entry *pair;
 382
 383                 list_for_each_entry(pair, &he->pairs.head, pairs.node)
 384                         if (pair->hists == d->hists)
 385                                 return pair;
 386         }
 387
 388         return NULL;
 389 }
 390
 391 static struct hist_entry*
 392 get_pair_fmt(struct hist_entry *he, struct diff_hpp_fmt *dfmt)
 393 {
 394         void *ptr = dfmt - dfmt->idx;
 395         struct data__file *d = container_of(ptr, struct data__file, fmt);
 396
 397         return get_pair_data(he, d);
 398 }
 399
 400 static void hists__baseline_only(struct hists *hists)
 401 {
 402         struct rb_root *root;
 403         struct rb_node *next;
 404
 405         if (sort__need_collapse)
 406                 root = &hists->entries_collapsed;
 407         else
 408                 root = hists->entries_in;
 409
 410         next = rb_first(root);
 411         while (next != NULL) {
 412                 struct hist_entry *he = rb_entry(next, struct hist_entry, rb_node_in);
 413
 414                 next = rb_next(&he->rb_node_in);
 415                 if (!hist_entry__next_pair(he)) {
 416                         rb_erase(&he->rb_node_in, root);
 417                         hist_entry__free(he);
 418                 }
 419         }
 420 }
 421
 422 static void hists__precompute(struct hists *hists)
 423 {
 424         struct rb_root *root;
 425         struct rb_node *next;
 426
 427         if (sort__need_collapse)
 428                 root = &hists->entries_collapsed;
 429         else
 430                 root = hists->entries_in;
 431
 432         next = rb_first(root);
 433         while (next != NULL) {
 434                 struct hist_entry *he, *pair;
 435
 436                 he   = rb_entry(next, struct hist_entry, rb_node_in);
 437                 next = rb_next(&he->rb_node_in);
 438
 439                 pair = get_pair_data(he, &data__files[sort_compute]);
 440                 if (!pair)
 441                         continue;
 442
 443                 switch (compute) {
 444                 case COMPUTE_DELTA:
 445                         compute_delta(he, pair);
 446                         break;
 447                 case COMPUTE_RATIO:
 448                         compute_ratio(he, pair);
 449                         break;
 450                 case COMPUTE_WEIGHTED_DIFF:
 451                         compute_wdiff(he, pair);
 452                         break;
 453                 default:
 454                         BUG_ON(1);
 455                 }
 456         }
 457 }
 458
 459 static int64_t cmp_doubles(double l, double r)
 460 {
 461         if (l > r)
 462                 return -1;
 463         else if (l < r)
 464                 return 1;
 465         else
 466                 return 0;
 467 }
 468
 469 static int64_t
 470 __hist_entry__cmp_compute(struct hist_entry *left, struct hist_entry *right,
 471                         int c)
 472 {
 473         switch (c) {
 474         case COMPUTE_DELTA:
 475         {
 476                 double l = left->diff.period_ratio_delta;
 477                 double r = right->diff.period_ratio_delta;
 478
 479                 return cmp_doubles(l, r);
 480         }
 481         case COMPUTE_RATIO:
 482         {
 483                 double l = left->diff.period_ratio;
 484                 double r = right->diff.period_ratio;
 485
 486                 return cmp_doubles(l, r);
 487         }
 488         case COMPUTE_WEIGHTED_DIFF:
 489         {
 490                 s64 l = left->diff.wdiff;
 491                 s64 r = right->diff.wdiff;
 492
 493                 return r - l;
 494         }
 495         default:
 496                 BUG_ON(1);
 497         }
 498
 499         return 0;
 500 }
 501
 502 static int64_t
 503 hist_entry__cmp_compute(struct hist_entry *left, struct hist_entry *right,
 504                         int c)
 505 {
 506         bool pairs_left  = hist_entry__has_pairs(left);
 507         bool pairs_right = hist_entry__has_pairs(right);
 508         struct hist_entry *p_right, *p_left;
 509
 510         if (!pairs_left && !pairs_right)
 511                 return 0;
 512
 513         if (!pairs_left || !pairs_right)
 514                 return pairs_left ? -1 : 1;
 515
 516         p_left  = get_pair_data(left,  &data__files[sort_compute]);
 517         p_right = get_pair_data(right, &data__files[sort_compute]);
 518
 519         if (!p_left && !p_right)
 520                 return 0;
 521
 522         if (!p_left || !p_right)
 523                 return p_left ? -1 : 1;
 524
 525         /*
 526          * We have 2 entries of same kind, let's
 527          * make the data comparison.
 528          */
 529         return __hist_entry__cmp_compute(p_left, p_right, c);
 530 }
 531
 532 static void insert_hist_entry_by_compute(struct rb_root *root,
 533                                          struct hist_entry *he,
 534                                          int c)
 535 {
 536         struct rb_node **p = &root->rb_node;
 537         struct rb_node *parent = NULL;
 538         struct hist_entry *iter;
 539
 540         while (*p != NULL) {
 541                 parent = *p;
 542                 iter = rb_entry(parent, struct hist_entry, rb_node);
 543                 if (hist_entry__cmp_compute(he, iter, c) < 0)
 544                         p = &(*p)->rb_left;
 545                 else
 546                         p = &(*p)->rb_right;
 547         }
 548
 549         rb_link_node(&he->rb_node, parent, p);
 550         rb_insert_color(&he->rb_node, root);
 551 }
 552
 553 static void hists__compute_resort(struct hists *hists)
 554 {
 555         struct rb_root *root;
 556         struct rb_node *next;
 557
 558         if (sort__need_collapse)
 559                 root = &hists->entries_collapsed;
 560         else
 561                 root = hists->entries_in;
 562
 563         hists->entries = RB_ROOT;
 564         next = rb_first(root);
 565
 566         hists->nr_entries = 0;
 567         hists->stats.total_period = 0;
 568         hists__reset_col_len(hists);
 569
 570         while (next != NULL) {
 571                 struct hist_entry *he;
 572
 573                 he = rb_entry(next, struct hist_entry, rb_node_in);
 574                 next = rb_next(&he->rb_node_in);
 575
 576                 insert_hist_entry_by_compute(&hists->entries, he, compute);
 577                 hists__inc_nr_entries(hists, he);
 578         }
 579 }
 580
 581 static void hists__process(struct hists *hists)
 582 {
 583         if (show_baseline_only)
 584                 hists__baseline_only(hists);
 585
 586         if (sort_compute) {
 587                 hists__precompute(hists);
 588                 hists__compute_resort(hists);
 589         } else {
 590                 hists__output_resort(hists);
 591         }
 592
 593         hists__fprintf(hists, true, 0, 0, 0, stdout);
 594 }
 595
 596 static void data__fprintf(void)
 597 {
 598         struct data__file *d;
 599         int i;
 600
 601         fprintf(stdout, "# Data files:\n");
 602
 603         data__for_each_file(i, d)
 604                 fprintf(stdout, "#  [%d] %s %s\n",
 605                         d->idx, d->file.path,
 606                         !d->idx ? "(Baseline)" : "");
 607
 608         fprintf(stdout, "#\n");
 609 }
 610
 611 static void data_process(void)
 612 {
 613         struct perf_evlist *evlist_base = data__files[0].session->evlist;
 614         struct perf_evsel *evsel_base;
 615         bool first = true;
 616
 617         list_for_each_entry(evsel_base, &evlist_base->entries, node) {
 618                 struct data__file *d;
 619                 int i;
 620
 621                 data__for_each_file_new(i, d) {
 622                         struct perf_evlist *evlist = d->session->evlist;
 623                         struct perf_evsel *evsel;
 624
 625                         evsel = evsel_match(evsel_base, evlist);
 626                         if (!evsel)
 627                                 continue;
 628
 629                         d->hists = &evsel->hists;
 630
 631                         hists__match(&evsel_base->hists, &evsel->hists);
 632
 633                         if (!show_baseline_only)
 634                                 hists__link(&evsel_base->hists,
 635                                             &evsel->hists);
 636                 }
 637
 638                 fprintf(stdout, "%s# Event '%s'\n#\n", first ? "" : "\n",
 639                         perf_evsel__name(evsel_base));
 640
 641                 first = false;
 642
 643                 if (verbose || data__files_cnt > 2)
 644                         data__fprintf();
 645
 646                 hists__process(&evsel_base->hists);
 647         }
 648 }
 649
 650 static void data__free(struct data__file *d)
 651 {
 652         int col;
 653
 654         for (col = 0; col < PERF_HPP_DIFF__MAX_INDEX; col++) {
 655                 struct diff_hpp_fmt *fmt = &d->fmt[col];
 656
 657                 free(fmt->header);
 658         }
 659 }
 660
 661 static int __cmd_diff(void)
 662 {
 663         struct data__file *d;
 664         int ret = -EINVAL, i;
 665
 666         data__for_each_file(i, d) {
 667                 d->session = perf_session__new(&d->file, false, &tool);
 668                 if (!d->session) {
 669                         pr_err("Failed to open %s\n", d->file.path);
 670                         ret = -ENOMEM;
 671                         goto out_delete;
 672                 }
 673
 674                 ret = perf_session__process_events(d->session, &tool);
 675                 if (ret) {
 676                         pr_err("Failed to process %s\n", d->file.path);
 677                         goto out_delete;
 678                 }
 679
 680                 perf_evlist__collapse_resort(d->session->evlist);
 681         }
 682
 683         data_process();
 684
 685  out_delete:
 686         data__for_each_file(i, d) {
 687                 if (d->session)
 688                         perf_session__delete(d->session);
 689
 690                 data__free(d);
 691         }
 692
 693         free(data__files);
 694         return ret;
 695 }
 696
 697 static const char * const diff_usage[] = {
 698         "perf diff [<options>] [old_file] [new_file]",
 699         NULL,
 700 };
 701
 702 static const struct option options[] = {
 703         OPT_INCR('v', "verbose", &verbose,
 704                     "be more verbose (show symbol address, etc)"),
 705         OPT_BOOLEAN('b', "baseline-only", &show_baseline_only,
 706                     "Show only items with match in baseline"),
 707         OPT_CALLBACK('c', "compute", &compute,
 708                      "delta,ratio,wdiff:w1,w2 (default delta)",
 709                      "Entries differential computation selection",
 710                      setup_compute),
 711         OPT_BOOLEAN('p', "period", &show_period,
 712                     "Show period values."),
 713         OPT_BOOLEAN('F', "formula", &show_formula,
 714                     "Show formula."),
 715         OPT_BOOLEAN('D', "dump-raw-trace", &dump_trace,
 716                     "dump raw trace in ASCII"),
 717         OPT_BOOLEAN('f', "force", &force, "don't complain, do it"),
 718         OPT_BOOLEAN('m', "modules", &symbol_conf.use_modules,
 719                     "load module symbols - WARNING: use only with -k and LIVE kernel"),
 720         OPT_STRING('d', "dsos", &symbol_conf.dso_list_str, "dso[,dso...]",
 721                    "only consider symbols in these dsos"),
 722         OPT_STRING('C', "comms", &symbol_conf.comm_list_str, "comm[,comm...]",
 723                    "only consider symbols in these comms"),
 724         OPT_STRING('S', "symbols", &symbol_conf.sym_list_str, "symbol[,symbol...]",
 725                    "only consider these symbols"),
 726         OPT_STRING('s', "sort", &sort_order, "key[,key2...]",
 727                    "sort by key(s): pid, comm, dso, symbol, parent"),
 728         OPT_STRING('t', "field-separator", &symbol_conf.field_sep, "separator",
 729                    "separator for columns, no spaces will be added between "
 730                    "columns '.' is reserved."),
 731         OPT_STRING(0, "symfs", &symbol_conf.symfs, "directory",
 732                     "Look for files with symbols relative to this directory"),
 733         OPT_UINTEGER('o', "order", &sort_compute, "Specify compute sorting."),
 734         OPT_END()
 735 };
 736
 737 static double baseline_percent(struct hist_entry *he)
 738 {
 739         struct hists *hists = he->hists;
 740         return 100.0 * he->stat.period / hists->stats.total_period;
 741 }
 742
 743 static int hpp__color_baseline(struct perf_hpp_fmt *fmt,
 744                                struct perf_hpp *hpp, struct hist_entry *he)
 745 {
 746         struct diff_hpp_fmt *dfmt =
 747                 container_of(fmt, struct diff_hpp_fmt, fmt);
 748         double percent = baseline_percent(he);
 749         char pfmt[20] = " ";
 750
 751         if (!he->dummy) {
 752                 scnprintf(pfmt, 20, "%%%d.2f%%%%", dfmt->header_width - 1);
 753                 return percent_color_snprintf(hpp->buf, hpp->size,
 754                                               pfmt, percent);
 755         } else
 756                 return scnprintf(hpp->buf, hpp->size, "%*s",
 757                                  dfmt->header_width, pfmt);
 758 }
 759
 760 static int hpp__entry_baseline(struct hist_entry *he, char *buf, size_t size)
 761 {
 762         double percent = baseline_percent(he);
 763         const char *fmt = symbol_conf.field_sep ? "%.2f" : "%6.2f%%";
 764         int ret = 0;
 765
 766         if (!he->dummy)
 767                 ret = scnprintf(buf, size, fmt, percent);
 768
 769         return ret;
 770 }
 771
 772 static void
 773 hpp__entry_unpair(struct hist_entry *he, int idx, char *buf, size_t size)
 774 {
 775         switch (idx) {
 776         case PERF_HPP_DIFF__PERIOD_BASELINE:
 777                 scnprintf(buf, size, "%" PRIu64, he->stat.period);
 778                 break;
 779
 780         default:
 781                 break;
 782         }
 783 }
 784
 785 static void
 786 hpp__entry_pair(struct hist_entry *he, struct hist_entry *pair,
 787                 int idx, char *buf, size_t size)
 788 {
 789         double diff;
 790         double ratio;
 791         s64 wdiff;
 792
 793         switch (idx) {
 794         case PERF_HPP_DIFF__DELTA:
 795                 if (pair->diff.computed)
 796                         diff = pair->diff.period_ratio_delta;
 797                 else
 798                         diff = compute_delta(he, pair);
 799
 800                 if (fabs(diff) >= 0.01)
 801                         scnprintf(buf, size, "%+4.2F%%", diff);
 802                 break;
 803
 804         case PERF_HPP_DIFF__RATIO:
 805                 /* No point for ratio number if we are dummy.. */
 806                 if (he->dummy)
 807                         break;
 808
 809                 if (pair->diff.computed)
 810                         ratio = pair->diff.period_ratio;
 811                 else
 812                         ratio = compute_ratio(he, pair);
 813
 814                 if (ratio > 0.0)
 815                         scnprintf(buf, size, "%14.6F", ratio);
 816                 break;
 817
 818         case PERF_HPP_DIFF__WEIGHTED_DIFF:
 819                 /* No point for wdiff number if we are dummy.. */
 820                 if (he->dummy)
 821                         break;
 822
 823                 if (pair->diff.computed)
 824                         wdiff = pair->diff.wdiff;
 825                 else
 826                         wdiff = compute_wdiff(he, pair);
 827
 828                 if (wdiff != 0)
 829                         scnprintf(buf, size, "%14ld", wdiff);
 830                 break;
 831
 832         case PERF_HPP_DIFF__FORMULA:
 833                 formula_fprintf(he, pair, buf, size);
 834                 break;
 835
 836         case PERF_HPP_DIFF__PERIOD:
 837                 scnprintf(buf, size, "%" PRIu64, pair->stat.period);
 838                 break;
 839
 840         default:
 841                 BUG_ON(1);
 842         };
 843 }
 844
 845 static void
 846 __hpp__entry_global(struct hist_entry *he, struct diff_hpp_fmt *dfmt,
 847                     char *buf, size_t size)
 848 {
 849         struct hist_entry *pair = get_pair_fmt(he, dfmt);
 850         int idx = dfmt->idx;
 851
 852         /* baseline is special */
 853         if (idx == PERF_HPP_DIFF__BASELINE)
 854                 hpp__entry_baseline(he, buf, size);
 855         else {
 856                 if (pair)
 857                         hpp__entry_pair(he, pair, idx, buf, size);
 858                 else
 859                         hpp__entry_unpair(he, idx, buf, size);
 860         }
 861 }
 862
 863 static int hpp__entry_global(struct perf_hpp_fmt *_fmt, struct perf_hpp *hpp,
 864                              struct hist_entry *he)
 865 {
 866         struct diff_hpp_fmt *dfmt =
 867                 container_of(_fmt, struct diff_hpp_fmt, fmt);
 868         char buf[MAX_COL_WIDTH] = " ";
 869
 870         __hpp__entry_global(he, dfmt, buf, MAX_COL_WIDTH);
 871
 872         if (symbol_conf.field_sep)
 873                 return scnprintf(hpp->buf, hpp->size, "%s", buf);
 874         else
 875                 return scnprintf(hpp->buf, hpp->size, "%*s",
 876                                  dfmt->header_width, buf);
 877 }
 878
 879 static int hpp__header(struct perf_hpp_fmt *fmt,
 880                        struct perf_hpp *hpp)
 881 {
 882         struct diff_hpp_fmt *dfmt =
 883                 container_of(fmt, struct diff_hpp_fmt, fmt);
 884
 885         BUG_ON(!dfmt->header);
 886         return scnprintf(hpp->buf, hpp->size, dfmt->header);
 887 }
 888
 889 static int hpp__width(struct perf_hpp_fmt *fmt,
 890                       struct perf_hpp *hpp __maybe_unused)
 891 {
 892         struct diff_hpp_fmt *dfmt =
 893                 container_of(fmt, struct diff_hpp_fmt, fmt);
 894
 895         BUG_ON(dfmt->header_width <= 0);
 896         return dfmt->header_width;
 897 }
 898
 899 static void init_header(struct data__file *d, struct diff_hpp_fmt *dfmt)
 900 {
 901 #define MAX_HEADER_NAME 100
 902         char buf_indent[MAX_HEADER_NAME];
 903         char buf[MAX_HEADER_NAME];
 904         const char *header = NULL;
 905         int width = 0;
 906
 907         BUG_ON(dfmt->idx >= PERF_HPP_DIFF__MAX_INDEX);
 908         header = columns[dfmt->idx].name;
 909         width  = columns[dfmt->idx].width;
 910
 911         /* Only our defined HPP fmts should appear here. */
 912         BUG_ON(!header);
 913
 914         if (data__files_cnt > 2)
 915                 scnprintf(buf, MAX_HEADER_NAME, "%s/%d", header, d->idx);
 916
 917 #define NAME (data__files_cnt > 2 ? buf : header)
 918         dfmt->header_width = width;
 919         width = (int) strlen(NAME);
 920         if (dfmt->header_width < width)
 921                 dfmt->header_width = width;
 922
 923         scnprintf(buf_indent, MAX_HEADER_NAME, "%*s",
 924                   dfmt->header_width, NAME);
 925
 926         dfmt->header = strdup(buf_indent);
 927 #undef MAX_HEADER_NAME
 928 #undef NAME
 929 }
 930
 931 static void data__hpp_register(struct data__file *d, int idx)
 932 {
 933         struct diff_hpp_fmt *dfmt = &d->fmt[idx];
 934         struct perf_hpp_fmt *fmt = &dfmt->fmt;
 935
 936         dfmt->idx = idx;
 937
 938         fmt->header = hpp__header;
 939         fmt->width  = hpp__width;
 940         fmt->entry  = hpp__entry_global;
 941
 942         /* TODO more colors */
 943         if (idx == PERF_HPP_DIFF__BASELINE)
 944                 fmt->color = hpp__color_baseline;
 945
 946         init_header(d, dfmt);
 947         perf_hpp__column_register(fmt);
 948 }
 949
 950 static void ui_init(void)
 951 {
 952         struct data__file *d;
 953         int i;
 954
 955         data__for_each_file(i, d) {
 956
 957                 /*
 958                  * Baseline or compute realted columns:
 959                  *
 960                  *   PERF_HPP_DIFF__BASELINE
 961                  *   PERF_HPP_DIFF__DELTA
 962                  *   PERF_HPP_DIFF__RATIO
 963                  *   PERF_HPP_DIFF__WEIGHTED_DIFF
 964                  */
 965                 data__hpp_register(d, i ? compute_2_hpp[compute] :
 966                                           PERF_HPP_DIFF__BASELINE);
 967
 968                 /*
 969                  * And the rest:
 970                  *
 971                  * PERF_HPP_DIFF__FORMULA
 972                  * PERF_HPP_DIFF__PERIOD
 973                  * PERF_HPP_DIFF__PERIOD_BASELINE
 974                  */
 975                 if (show_formula && i)
 976                         data__hpp_register(d, PERF_HPP_DIFF__FORMULA);
 977
 978                 if (show_period)
 979                         data__hpp_register(d, i ? PERF_HPP_DIFF__PERIOD :
 980                                                   PERF_HPP_DIFF__PERIOD_BASELINE);
 981         }
 982 }
 983
 984 static int data_init(int argc, const char **argv)
 985 {
 986         struct data__file *d;
 987         static const char *defaults[] = {
 988                 "perf.data.old",
 989                 "perf.data",
 990         };
 991         bool use_default = true;
 992         int i;
 993
 994         data__files_cnt = 2;
 995
 996         if (argc) {
 997                 if (argc == 1)
 998                         defaults[1] = argv[0];
 999                 else {
1000                         data__files_cnt = argc;
1001                         use_default = false;
1002                 }
1003         } else if (symbol_conf.default_guest_vmlinux_name ||
1004                    symbol_conf.default_guest_kallsyms) {
1005                 defaults[0] = "perf.data.host";
1006                 defaults[1] = "perf.data.guest";
1007         }
1008
1009         if (sort_compute >= (unsigned int) data__files_cnt) {
1010                 pr_err("Order option out of limit.\n");
1011                 return -EINVAL;
1012         }
1013
1014         data__files = zalloc(sizeof(*data__files) * data__files_cnt);
1015         if (!data__files)
1016                 return -ENOMEM;
1017
1018         data__for_each_file(i, d) {
1019                 struct perf_data_file *file = &d->file;
1020
1021                 file->path  = use_default ? defaults[i] : argv[i];
1022                 file->mode  = PERF_DATA_MODE_READ,
1023                 file->force = force,
1024
1025                 d->idx  = i;
1026         }
1027
1028         return 0;
1029 }
1030
1031 int cmd_diff(int argc, const char **argv, const char *prefix __maybe_unused)
1032 {
1033         sort_order = diff__default_sort_order;
1034         argc = parse_options(argc, argv, options, diff_usage, 0);
1035
1036         if (symbol__init() < 0)
1037                 return -1;
1038
1039         if (data_init(argc, argv) < 0)
1040                 return -1;
1041
1042         ui_init();
1043
1044         if (setup_sorting() < 0)
1045                 usage_with_options(diff_usage, options);
1046
1047         setup_pager();
1048
1049         sort__setup_elide(NULL);
1050
1051         return __cmd_diff();
1052 }