1
2
3
4
5
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
20#include <stdlib.h>
21
22static char const *input_old = "perf.data.old",
23 *input_new = "perf.data";
24static char diff__default_sort_order[] = "dso,symbol";
25static bool force;
26static bool show_period;
27static bool show_formula;
28static bool show_baseline_only;
29static bool sort_compute;
30
31static s64 compute_wdiff_w1;
32static s64 compute_wdiff_w2;
33
34enum {
35 COMPUTE_DELTA,
36 COMPUTE_RATIO,
37 COMPUTE_WEIGHTED_DIFF,
38 COMPUTE_MAX,
39};
40
41const char *compute_names[COMPUTE_MAX] = {
42 [COMPUTE_DELTA] = "delta",
43 [COMPUTE_RATIO] = "ratio",
44 [COMPUTE_WEIGHTED_DIFF] = "wdiff",
45};
46
47static int compute;
48
49static int setup_compute_opt_wdiff(char *opt)
50{
51 char *w1_str = opt;
52 char *w2_str;
53
54 int ret = -EINVAL;
55
56 if (!opt)
57 goto out;
58
59 w2_str = strchr(opt, ',');
60 if (!w2_str)
61 goto out;
62
63 *w2_str++ = 0x0;
64 if (!*w2_str)
65 goto out;
66
67 compute_wdiff_w1 = strtol(w1_str, NULL, 10);
68 compute_wdiff_w2 = strtol(w2_str, NULL, 10);
69
70 if (!compute_wdiff_w1 || !compute_wdiff_w2)
71 goto out;
72
73 pr_debug("compute wdiff w1(%" PRId64 ") w2(%" PRId64 ")\n",
74 compute_wdiff_w1, compute_wdiff_w2);
75
76 ret = 0;
77
78 out:
79 if (ret)
80 pr_err("Failed: wrong weight data, use 'wdiff:w1,w2'\n");
81
82 return ret;
83}
84
85static int setup_compute_opt(char *opt)
86{
87 if (compute == COMPUTE_WEIGHTED_DIFF)
88 return setup_compute_opt_wdiff(opt);
89
90 if (opt) {
91 pr_err("Failed: extra option specified '%s'", opt);
92 return -EINVAL;
93 }
94
95 return 0;
96}
97
98static int setup_compute(const struct option *opt, const char *str,
99 int unset __maybe_unused)
100{
101 int *cp = (int *) opt->value;
102 char *cstr = (char *) str;
103 char buf[50];
104 unsigned i;
105 char *option;
106
107 if (!str) {
108 *cp = COMPUTE_DELTA;
109 return 0;
110 }
111
112 if (*str == '+') {
113 sort_compute = true;
114 cstr = (char *) ++str;
115 if (!*str)
116 return 0;
117 }
118
119 option = strchr(str, ':');
120 if (option) {
121 unsigned len = option++ - str;
122
123
124
125
126
127
128
129 if (len >= sizeof(buf))
130 return -EINVAL;
131
132 strncpy(buf, str, len);
133 buf[len] = 0x0;
134 cstr = buf;
135 }
136
137 for (i = 0; i < COMPUTE_MAX; i++)
138 if (!strcmp(cstr, compute_names[i])) {
139 *cp = i;
140 return setup_compute_opt(option);
141 }
142
143 pr_err("Failed: '%s' is not computation method "
144 "(use 'delta','ratio' or 'wdiff')\n", str);
145 return -EINVAL;
146}
147
148double perf_diff__period_percent(struct hist_entry *he, u64 period)
149{
150 u64 total = he->hists->stats.total_period;
151 return (period * 100.0) / total;
152}
153
154double perf_diff__compute_delta(struct hist_entry *he, struct hist_entry *pair)
155{
156 double new_percent = perf_diff__period_percent(he, he->stat.period);
157 double old_percent = perf_diff__period_percent(pair, pair->stat.period);
158
159 he->diff.period_ratio_delta = new_percent - old_percent;
160 he->diff.computed = true;
161 return he->diff.period_ratio_delta;
162}
163
164double perf_diff__compute_ratio(struct hist_entry *he, struct hist_entry *pair)
165{
166 double new_period = he->stat.period;
167 double old_period = pair->stat.period;
168
169 he->diff.computed = true;
170 he->diff.period_ratio = new_period / old_period;
171 return he->diff.period_ratio;
172}
173
174s64 perf_diff__compute_wdiff(struct hist_entry *he, struct hist_entry *pair)
175{
176 u64 new_period = he->stat.period;
177 u64 old_period = pair->stat.period;
178
179 he->diff.computed = true;
180 he->diff.wdiff = new_period * compute_wdiff_w2 -
181 old_period * compute_wdiff_w1;
182
183 return he->diff.wdiff;
184}
185
186static int formula_delta(struct hist_entry *he, struct hist_entry *pair,
187 char *buf, size_t size)
188{
189 return scnprintf(buf, size,
190 "(%" PRIu64 " * 100 / %" PRIu64 ") - "
191 "(%" PRIu64 " * 100 / %" PRIu64 ")",
192 he->stat.period, he->hists->stats.total_period,
193 pair->stat.period, pair->hists->stats.total_period);
194}
195
196static int formula_ratio(struct hist_entry *he, struct hist_entry *pair,
197 char *buf, size_t size)
198{
199 double new_period = he->stat.period;
200 double old_period = pair->stat.period;
201
202 return scnprintf(buf, size, "%.0F / %.0F", new_period, old_period);
203}
204
205static int formula_wdiff(struct hist_entry *he, struct hist_entry *pair,
206 char *buf, size_t size)
207{
208 u64 new_period = he->stat.period;
209 u64 old_period = pair->stat.period;
210
211 return scnprintf(buf, size,
212 "(%" PRIu64 " * " "%" PRId64 ") - (%" PRIu64 " * " "%" PRId64 ")",
213 new_period, compute_wdiff_w2, old_period, compute_wdiff_w1);
214}
215
216int perf_diff__formula(struct hist_entry *he, struct hist_entry *pair,
217 char *buf, size_t size)
218{
219 switch (compute) {
220 case COMPUTE_DELTA:
221 return formula_delta(he, pair, buf, size);
222 case COMPUTE_RATIO:
223 return formula_ratio(he, pair, buf, size);
224 case COMPUTE_WEIGHTED_DIFF:
225 return formula_wdiff(he, pair, buf, size);
226 default:
227 BUG_ON(1);
228 }
229
230 return -1;
231}
232
233static int hists__add_entry(struct hists *self,
234 struct addr_location *al, u64 period,
235 u64 weight)
236{
237 if (__hists__add_entry(self, al, NULL, period, weight) != NULL)
238 return 0;
239 return -ENOMEM;
240}
241
242static int diff__process_sample_event(struct perf_tool *tool __maybe_unused,
243 union perf_event *event,
244 struct perf_sample *sample,
245 struct perf_evsel *evsel,
246 struct machine *machine)
247{
248 struct addr_location al;
249
250 if (perf_event__preprocess_sample(event, machine, &al, sample, NULL) < 0) {
251 pr_warning("problem processing %d event, skipping it.\n",
252 event->header.type);
253 return -1;
254 }
255
256 if (al.filtered)
257 return 0;
258
259 if (hists__add_entry(&evsel->hists, &al, sample->period, sample->weight)) {
260 pr_warning("problem incrementing symbol period, skipping event\n");
261 return -1;
262 }
263
264 evsel->hists.stats.total_period += sample->period;
265 return 0;
266}
267
268static struct perf_tool tool = {
269 .sample = diff__process_sample_event,
270 .mmap = perf_event__process_mmap,
271 .comm = perf_event__process_comm,
272 .exit = perf_event__process_exit,
273 .fork = perf_event__process_fork,
274 .lost = perf_event__process_lost,
275 .ordered_samples = true,
276 .ordering_requires_timestamps = true,
277};
278
279static struct perf_evsel *evsel_match(struct perf_evsel *evsel,
280 struct perf_evlist *evlist)
281{
282 struct perf_evsel *e;
283
284 list_for_each_entry(e, &evlist->entries, node)
285 if (perf_evsel__match2(evsel, e))
286 return e;
287
288 return NULL;
289}
290
291static void perf_evlist__collapse_resort(struct perf_evlist *evlist)
292{
293 struct perf_evsel *evsel;
294
295 list_for_each_entry(evsel, &evlist->entries, node) {
296 struct hists *hists = &evsel->hists;
297
298 hists__collapse_resort(hists);
299 }
300}
301
302static void hists__baseline_only(struct hists *hists)
303{
304 struct rb_root *root;
305 struct rb_node *next;
306
307 if (sort__need_collapse)
308 root = &hists->entries_collapsed;
309 else
310 root = hists->entries_in;
311
312 next = rb_first(root);
313 while (next != NULL) {
314 struct hist_entry *he = rb_entry(next, struct hist_entry, rb_node_in);
315
316 next = rb_next(&he->rb_node_in);
317 if (!hist_entry__next_pair(he)) {
318 rb_erase(&he->rb_node_in, root);
319 hist_entry__free(he);
320 }
321 }
322}
323
324static void hists__precompute(struct hists *hists)
325{
326 struct rb_node *next = rb_first(&hists->entries);
327
328 while (next != NULL) {
329 struct hist_entry *he = rb_entry(next, struct hist_entry, rb_node);
330 struct hist_entry *pair = hist_entry__next_pair(he);
331
332 next = rb_next(&he->rb_node);
333 if (!pair)
334 continue;
335
336 switch (compute) {
337 case COMPUTE_DELTA:
338 perf_diff__compute_delta(he, pair);
339 break;
340 case COMPUTE_RATIO:
341 perf_diff__compute_ratio(he, pair);
342 break;
343 case COMPUTE_WEIGHTED_DIFF:
344 perf_diff__compute_wdiff(he, pair);
345 break;
346 default:
347 BUG_ON(1);
348 }
349 }
350}
351
352static int64_t cmp_doubles(double l, double r)
353{
354 if (l > r)
355 return -1;
356 else if (l < r)
357 return 1;
358 else
359 return 0;
360}
361
362static int64_t
363hist_entry__cmp_compute(struct hist_entry *left, struct hist_entry *right,
364 int c)
365{
366 switch (c) {
367 case COMPUTE_DELTA:
368 {
369 double l = left->diff.period_ratio_delta;
370 double r = right->diff.period_ratio_delta;
371
372 return cmp_doubles(l, r);
373 }
374 case COMPUTE_RATIO:
375 {
376 double l = left->diff.period_ratio;
377 double r = right->diff.period_ratio;
378
379 return cmp_doubles(l, r);
380 }
381 case COMPUTE_WEIGHTED_DIFF:
382 {
383 s64 l = left->diff.wdiff;
384 s64 r = right->diff.wdiff;
385
386 return r - l;
387 }
388 default:
389 BUG_ON(1);
390 }
391
392 return 0;
393}
394
395static void insert_hist_entry_by_compute(struct rb_root *root,
396 struct hist_entry *he,
397 int c)
398{
399 struct rb_node **p = &root->rb_node;
400 struct rb_node *parent = NULL;
401 struct hist_entry *iter;
402
403 while (*p != NULL) {
404 parent = *p;
405 iter = rb_entry(parent, struct hist_entry, rb_node);
406 if (hist_entry__cmp_compute(he, iter, c) < 0)
407 p = &(*p)->rb_left;
408 else
409 p = &(*p)->rb_right;
410 }
411
412 rb_link_node(&he->rb_node, parent, p);
413 rb_insert_color(&he->rb_node, root);
414}
415
416static void hists__compute_resort(struct hists *hists)
417{
418 struct rb_root *root;
419 struct rb_node *next;
420
421 if (sort__need_collapse)
422 root = &hists->entries_collapsed;
423 else
424 root = hists->entries_in;
425
426 hists->entries = RB_ROOT;
427 next = rb_first(root);
428
429 hists->nr_entries = 0;
430 hists->stats.total_period = 0;
431 hists__reset_col_len(hists);
432
433 while (next != NULL) {
434 struct hist_entry *he;
435
436 he = rb_entry(next, struct hist_entry, rb_node_in);
437 next = rb_next(&he->rb_node_in);
438
439 insert_hist_entry_by_compute(&hists->entries, he, compute);
440 hists__inc_nr_entries(hists, he);
441 }
442}
443
444static void hists__process(struct hists *old, struct hists *new)
445{
446 hists__match(new, old);
447
448 if (show_baseline_only)
449 hists__baseline_only(new);
450 else
451 hists__link(new, old);
452
453 if (sort_compute) {
454 hists__precompute(new);
455 hists__compute_resort(new);
456 } else {
457 hists__output_resort(new);
458 }
459
460 hists__fprintf(new, true, 0, 0, stdout);
461}
462
463static int __cmd_diff(void)
464{
465 int ret, i;
466#define older (session[0])
467#define newer (session[1])
468 struct perf_session *session[2];
469 struct perf_evlist *evlist_new, *evlist_old;
470 struct perf_evsel *evsel;
471 bool first = true;
472
473 older = perf_session__new(input_old, O_RDONLY, force, false,
474 &tool);
475 newer = perf_session__new(input_new, O_RDONLY, force, false,
476 &tool);
477 if (session[0] == NULL || session[1] == NULL)
478 return -ENOMEM;
479
480 for (i = 0; i < 2; ++i) {
481 ret = perf_session__process_events(session[i], &tool);
482 if (ret)
483 goto out_delete;
484 }
485
486 evlist_old = older->evlist;
487 evlist_new = newer->evlist;
488
489 perf_evlist__collapse_resort(evlist_old);
490 perf_evlist__collapse_resort(evlist_new);
491
492 list_for_each_entry(evsel, &evlist_new->entries, node) {
493 struct perf_evsel *evsel_old;
494
495 evsel_old = evsel_match(evsel, evlist_old);
496 if (!evsel_old)
497 continue;
498
499 fprintf(stdout, "%s# Event '%s'\n#\n", first ? "" : "\n",
500 perf_evsel__name(evsel));
501
502 first = false;
503
504 hists__process(&evsel_old->hists, &evsel->hists);
505 }
506
507out_delete:
508 for (i = 0; i < 2; ++i)
509 perf_session__delete(session[i]);
510 return ret;
511#undef older
512#undef newer
513}
514
515static const char * const diff_usage[] = {
516 "perf diff [<options>] [old_file] [new_file]",
517 NULL,
518};
519
520static const struct option options[] = {
521 OPT_INCR('v', "verbose", &verbose,
522 "be more verbose (show symbol address, etc)"),
523 OPT_BOOLEAN('b', "baseline-only", &show_baseline_only,
524 "Show only items with match in baseline"),
525 OPT_CALLBACK('c', "compute", &compute,
526 "delta,ratio,wdiff:w1,w2 (default delta)",
527 "Entries differential computation selection",
528 setup_compute),
529 OPT_BOOLEAN('p', "period", &show_period,
530 "Show period values."),
531 OPT_BOOLEAN('F', "formula", &show_formula,
532 "Show formula."),
533 OPT_BOOLEAN('D', "dump-raw-trace", &dump_trace,
534 "dump raw trace in ASCII"),
535 OPT_BOOLEAN('f', "force", &force, "don't complain, do it"),
536 OPT_BOOLEAN('m', "modules", &symbol_conf.use_modules,
537 "load module symbols - WARNING: use only with -k and LIVE kernel"),
538 OPT_STRING('d', "dsos", &symbol_conf.dso_list_str, "dso[,dso...]",
539 "only consider symbols in these dsos"),
540 OPT_STRING('C', "comms", &symbol_conf.comm_list_str, "comm[,comm...]",
541 "only consider symbols in these comms"),
542 OPT_STRING('S', "symbols", &symbol_conf.sym_list_str, "symbol[,symbol...]",
543 "only consider these symbols"),
544 OPT_STRING('s', "sort", &sort_order, "key[,key2...]",
545 "sort by key(s): pid, comm, dso, symbol, parent"),
546 OPT_STRING('t', "field-separator", &symbol_conf.field_sep, "separator",
547 "separator for columns, no spaces will be added between "
548 "columns '.' is reserved."),
549 OPT_STRING(0, "symfs", &symbol_conf.symfs, "directory",
550 "Look for files with symbols relative to this directory"),
551 OPT_END()
552};
553
554static void ui_init(void)
555{
556
557
558
559
560 perf_hpp__column_enable(PERF_HPP__BASELINE);
561
562 switch (compute) {
563 case COMPUTE_DELTA:
564 perf_hpp__column_enable(PERF_HPP__DELTA);
565 break;
566 case COMPUTE_RATIO:
567 perf_hpp__column_enable(PERF_HPP__RATIO);
568 break;
569 case COMPUTE_WEIGHTED_DIFF:
570 perf_hpp__column_enable(PERF_HPP__WEIGHTED_DIFF);
571 break;
572 default:
573 BUG_ON(1);
574 };
575
576 if (show_formula)
577 perf_hpp__column_enable(PERF_HPP__FORMULA);
578
579 if (show_period) {
580 perf_hpp__column_enable(PERF_HPP__PERIOD);
581 perf_hpp__column_enable(PERF_HPP__PERIOD_BASELINE);
582 }
583}
584
585int cmd_diff(int argc, const char **argv, const char *prefix __maybe_unused)
586{
587 sort_order = diff__default_sort_order;
588 argc = parse_options(argc, argv, options, diff_usage, 0);
589 if (argc) {
590 if (argc > 2)
591 usage_with_options(diff_usage, options);
592 if (argc == 2) {
593 input_old = argv[0];
594 input_new = argv[1];
595 } else
596 input_new = argv[0];
597 } else if (symbol_conf.default_guest_vmlinux_name ||
598 symbol_conf.default_guest_kallsyms) {
599 input_old = "perf.data.host";
600 input_new = "perf.data.guest";
601 }
602
603 symbol_conf.exclude_other = false;
604 if (symbol__init() < 0)
605 return -1;
606
607 ui_init();
608
609 if (setup_sorting() < 0)
610 usage_with_options(diff_usage, options);
611
612 setup_pager();
613
614 sort_entry__setup_elide(&sort_dso, symbol_conf.dso_list, "dso", NULL);
615 sort_entry__setup_elide(&sort_comm, symbol_conf.comm_list, "comm", NULL);
616 sort_entry__setup_elide(&sort_sym, symbol_conf.sym_list, "symbol", NULL);
617
618 return __cmd_diff();
619}
620
