618 lines · 14.0 KB · C
RawDownload
/* * builtin-diff.c * * Builtin diff command: Analyze two perf.data input files, look up and read * DSOs and symbol information, sort them and produce a diff. */#include "builtin.h" #include "util/debug.h"#include "util/event.h"#include "util/hist.h"#include "util/evsel.h"#include "util/evlist.h"#include "util/session.h"#include "util/tool.h"#include "util/sort.h"#include "util/symbol.h"#include "util/util.h" #include <stdlib.h> static char const *input_old = "perf.data.old",		  *input_new = "perf.data";static char	  diff__default_sort_order[] = "dso,symbol";static bool  force;static bool show_period;static bool show_formula;static bool show_baseline_only;static bool sort_compute; static s64 compute_wdiff_w1;static s64 compute_wdiff_w2; enum {	COMPUTE_DELTA,	COMPUTE_RATIO,	COMPUTE_WEIGHTED_DIFF,	COMPUTE_MAX,}; const char *compute_names[COMPUTE_MAX] = {	[COMPUTE_DELTA] = "delta",	[COMPUTE_RATIO] = "ratio",	[COMPUTE_WEIGHTED_DIFF] = "wdiff",}; static int compute; static int setup_compute_opt_wdiff(char *opt){	char *w1_str = opt;	char *w2_str; 	int ret = -EINVAL; 	if (!opt)		goto out; 	w2_str = strchr(opt, ',');	if (!w2_str)		goto out; 	*w2_str++ = 0x0;	if (!*w2_str)		goto out; 	compute_wdiff_w1 = strtol(w1_str, NULL, 10);	compute_wdiff_w2 = strtol(w2_str, NULL, 10); 	if (!compute_wdiff_w1 || !compute_wdiff_w2)		goto out; 	pr_debug("compute wdiff w1(%" PRId64 ") w2(%" PRId64 ")\n",		  compute_wdiff_w1, compute_wdiff_w2); 	ret = 0;  out:	if (ret)		pr_err("Failed: wrong weight data, use 'wdiff:w1,w2'\n"); 	return ret;} static int setup_compute_opt(char *opt){	if (compute == COMPUTE_WEIGHTED_DIFF)		return setup_compute_opt_wdiff(opt); 	if (opt) {		pr_err("Failed: extra option specified '%s'", opt);		return -EINVAL;	} 	return 0;} static int setup_compute(const struct option *opt, const char *str,			 int unset __maybe_unused){	int *cp = (int *) opt->value;	char *cstr = (char *) str;	char buf[50];	unsigned i;	char *option; 	if (!str) {		*cp = COMPUTE_DELTA;		return 0;	} 	if (*str == '+') {		sort_compute = true;		cstr = (char *) ++str;		if (!*str)			return 0;	} 	option = strchr(str, ':');	if (option) {		unsigned len = option++ - str; 		/*		 * The str data are not writeable, so we need		 * to use another buffer.		 */ 		/* No option value is longer. */		if (len >= sizeof(buf))			return -EINVAL; 		strncpy(buf, str, len);		buf[len] = 0x0;		cstr = buf;	} 	for (i = 0; i < COMPUTE_MAX; i++)		if (!strcmp(cstr, compute_names[i])) {			*cp = i;			return setup_compute_opt(option);		} 	pr_err("Failed: '%s' is not computation method "	       "(use 'delta','ratio' or 'wdiff')\n", str);	return -EINVAL;} double perf_diff__period_percent(struct hist_entry *he, u64 period){	u64 total = he->hists->stats.total_period;	return (period * 100.0) / total;} double perf_diff__compute_delta(struct hist_entry *he, struct hist_entry *pair){	double new_percent = perf_diff__period_percent(he, he->stat.period);	double old_percent = perf_diff__period_percent(pair, pair->stat.period); 	he->diff.period_ratio_delta = new_percent - old_percent;	he->diff.computed = true;	return he->diff.period_ratio_delta;} double perf_diff__compute_ratio(struct hist_entry *he, struct hist_entry *pair){	double new_period = he->stat.period;	double old_period = pair->stat.period; 	he->diff.computed = true;	he->diff.period_ratio = new_period / old_period;	return he->diff.period_ratio;} s64 perf_diff__compute_wdiff(struct hist_entry *he, struct hist_entry *pair){	u64 new_period = he->stat.period;	u64 old_period = pair->stat.period; 	he->diff.computed = true;	he->diff.wdiff = new_period * compute_wdiff_w2 -			 old_period * compute_wdiff_w1; 	return he->diff.wdiff;} static int formula_delta(struct hist_entry *he, struct hist_entry *pair,			 char *buf, size_t size){	return scnprintf(buf, size,			 "(%" PRIu64 " * 100 / %" PRIu64 ") - "			 "(%" PRIu64 " * 100 / %" PRIu64 ")",			  he->stat.period, he->hists->stats.total_period,			  pair->stat.period, pair->hists->stats.total_period);} static int formula_ratio(struct hist_entry *he, struct hist_entry *pair,			 char *buf, size_t size){	double new_period = he->stat.period;	double old_period = pair->stat.period; 	return scnprintf(buf, size, "%.0F / %.0F", new_period, old_period);} static int formula_wdiff(struct hist_entry *he, struct hist_entry *pair,			 char *buf, size_t size){	u64 new_period = he->stat.period;	u64 old_period = pair->stat.period; 	return scnprintf(buf, size,		  "(%" PRIu64 " * " "%" PRId64 ") - (%" PRIu64 " * " "%" PRId64 ")",		  new_period, compute_wdiff_w2, old_period, compute_wdiff_w1);} int perf_diff__formula(struct hist_entry *he, struct hist_entry *pair,		       char *buf, size_t size){	switch (compute) {	case COMPUTE_DELTA:		return formula_delta(he, pair, buf, size);	case COMPUTE_RATIO:		return formula_ratio(he, pair, buf, size);	case COMPUTE_WEIGHTED_DIFF:		return formula_wdiff(he, pair, buf, size);	default:		BUG_ON(1);	} 	return -1;} static int hists__add_entry(struct hists *self,			    struct addr_location *al, u64 period){	if (__hists__add_entry(self, al, NULL, period) != NULL)		return 0;	return -ENOMEM;} static int diff__process_sample_event(struct perf_tool *tool __maybe_unused,				      union perf_event *event,				      struct perf_sample *sample,				      struct perf_evsel *evsel,				      struct machine *machine){	struct addr_location al; 	if (perf_event__preprocess_sample(event, machine, &al, sample, NULL) < 0) {		pr_warning("problem processing %d event, skipping it.\n",			   event->header.type);		return -1;	} 	if (al.filtered)		return 0; 	if (hists__add_entry(&evsel->hists, &al, sample->period)) {		pr_warning("problem incrementing symbol period, skipping event\n");		return -1;	} 	evsel->hists.stats.total_period += sample->period;	return 0;} static struct perf_tool tool = {	.sample	= diff__process_sample_event,	.mmap	= perf_event__process_mmap,	.comm	= perf_event__process_comm,	.exit	= perf_event__process_exit,	.fork	= perf_event__process_fork,	.lost	= perf_event__process_lost,	.ordered_samples = true,	.ordering_requires_timestamps = true,}; static struct perf_evsel *evsel_match(struct perf_evsel *evsel,				      struct perf_evlist *evlist){	struct perf_evsel *e; 	list_for_each_entry(e, &evlist->entries, node)		if (perf_evsel__match2(evsel, e))			return e; 	return NULL;} static void perf_evlist__collapse_resort(struct perf_evlist *evlist){	struct perf_evsel *evsel; 	list_for_each_entry(evsel, &evlist->entries, node) {		struct hists *hists = &evsel->hists; 		hists__collapse_resort(hists);	}} static void hists__baseline_only(struct hists *hists){	struct rb_root *root;	struct rb_node *next; 	if (sort__need_collapse)		root = &hists->entries_collapsed;	else		root = hists->entries_in; 	next = rb_first(root);	while (next != NULL) {		struct hist_entry *he = rb_entry(next, struct hist_entry, rb_node_in); 		next = rb_next(&he->rb_node_in);		if (!hist_entry__next_pair(he)) {			rb_erase(&he->rb_node_in, root);			hist_entry__free(he);		}	}} static void hists__precompute(struct hists *hists){	struct rb_node *next = rb_first(&hists->entries); 	while (next != NULL) {		struct hist_entry *he = rb_entry(next, struct hist_entry, rb_node);		struct hist_entry *pair = hist_entry__next_pair(he); 		next = rb_next(&he->rb_node);		if (!pair)			continue; 		switch (compute) {		case COMPUTE_DELTA:			perf_diff__compute_delta(he, pair);			break;		case COMPUTE_RATIO:			perf_diff__compute_ratio(he, pair);			break;		case COMPUTE_WEIGHTED_DIFF:			perf_diff__compute_wdiff(he, pair);			break;		default:			BUG_ON(1);		}	}} static int64_t cmp_doubles(double l, double r){	if (l > r)		return -1;	else if (l < r)		return 1;	else		return 0;} static int64_thist_entry__cmp_compute(struct hist_entry *left, struct hist_entry *right,			int c){	switch (c) {	case COMPUTE_DELTA:	{		double l = left->diff.period_ratio_delta;		double r = right->diff.period_ratio_delta; 		return cmp_doubles(l, r);	}	case COMPUTE_RATIO:	{		double l = left->diff.period_ratio;		double r = right->diff.period_ratio; 		return cmp_doubles(l, r);	}	case COMPUTE_WEIGHTED_DIFF:	{		s64 l = left->diff.wdiff;		s64 r = right->diff.wdiff; 		return r - l;	}	default:		BUG_ON(1);	} 	return 0;} static void insert_hist_entry_by_compute(struct rb_root *root,					 struct hist_entry *he,					 int c){	struct rb_node **p = &root->rb_node;	struct rb_node *parent = NULL;	struct hist_entry *iter; 	while (*p != NULL) {		parent = *p;		iter = rb_entry(parent, struct hist_entry, rb_node);		if (hist_entry__cmp_compute(he, iter, c) < 0)			p = &(*p)->rb_left;		else			p = &(*p)->rb_right;	} 	rb_link_node(&he->rb_node, parent, p);	rb_insert_color(&he->rb_node, root);} static void hists__compute_resort(struct hists *hists){	struct rb_root *root;	struct rb_node *next; 	if (sort__need_collapse)		root = &hists->entries_collapsed;	else		root = hists->entries_in; 	hists->entries = RB_ROOT;	next = rb_first(root); 	hists->nr_entries = 0;	hists->stats.total_period = 0;	hists__reset_col_len(hists); 	while (next != NULL) {		struct hist_entry *he; 		he = rb_entry(next, struct hist_entry, rb_node_in);		next = rb_next(&he->rb_node_in); 		insert_hist_entry_by_compute(&hists->entries, he, compute);		hists__inc_nr_entries(hists, he);	}} static void hists__process(struct hists *old, struct hists *new){	hists__match(new, old); 	if (show_baseline_only)		hists__baseline_only(new);	else		hists__link(new, old); 	if (sort_compute) {		hists__precompute(new);		hists__compute_resort(new);	} else {		hists__output_resort(new);	} 	hists__fprintf(new, true, 0, 0, stdout);} static int __cmd_diff(void){	int ret, i;#define older (session[0])#define newer (session[1])	struct perf_session *session[2];	struct perf_evlist *evlist_new, *evlist_old;	struct perf_evsel *evsel;	bool first = true; 	older = perf_session__new(input_old, O_RDONLY, force, false,				  &tool);	newer = perf_session__new(input_new, O_RDONLY, force, false,				  &tool);	if (session[0] == NULL || session[1] == NULL)		return -ENOMEM; 	for (i = 0; i < 2; ++i) {		ret = perf_session__process_events(session[i], &tool);		if (ret)			goto out_delete;	} 	evlist_old = older->evlist;	evlist_new = newer->evlist; 	perf_evlist__collapse_resort(evlist_old);	perf_evlist__collapse_resort(evlist_new); 	list_for_each_entry(evsel, &evlist_new->entries, node) {		struct perf_evsel *evsel_old; 		evsel_old = evsel_match(evsel, evlist_old);		if (!evsel_old)			continue; 		fprintf(stdout, "%s# Event '%s'\n#\n", first ? "" : "\n",			perf_evsel__name(evsel)); 

Lines 1–500 of 618.