[linux-2.6-block.git] / tools / perf / ui / stdio / hist.c

#include <stdio.h>

#include "../../util/util.h"
#include "../../util/hist.h"
#include "../../util/sort.h"
#include "../../util/evsel.h"


static size_t callchain__fprintf_left_margin(FILE *fp, int left_margin)
{
	int i;
	int ret = fprintf(fp, "            ");

	for (i = 0; i < left_margin; i++)
		ret += fprintf(fp, " ");

	return ret;
}

static size_t ipchain__fprintf_graph_line(FILE *fp, int depth, int depth_mask,
					  int left_margin)
{
	int i;
	size_t ret = callchain__fprintf_left_margin(fp, left_margin);

	for (i = 0; i < depth; i++)
		if (depth_mask & (1 << i))
			ret += fprintf(fp, "|          ");
		else
			ret += fprintf(fp, "           ");

	ret += fprintf(fp, "\n");

	return ret;
}

static size_t ipchain__fprintf_graph(FILE *fp, struct callchain_node *node,
				     struct callchain_list *chain,
				     int depth, int depth_mask, int period,
				     u64 total_samples, int left_margin)
{
	int i;
	size_t ret = 0;
	char bf[1024];

	ret += callchain__fprintf_left_margin(fp, left_margin);
	for (i = 0; i < depth; i++) {
		if (depth_mask & (1 << i))
			ret += fprintf(fp, "|");
		else
			ret += fprintf(fp, " ");
		if (!period && i == depth - 1) {
			ret += fprintf(fp, "--");
			ret += callchain_node__fprintf_value(node, fp, total_samples);
			ret += fprintf(fp, "--");
		} else
			ret += fprintf(fp, "%s", "          ");
	}
	fputs(callchain_list__sym_name(chain, bf, sizeof(bf), false), fp);
	fputc('\n', fp);
	return ret;
}

static struct symbol *rem_sq_bracket;
static struct callchain_list rem_hits;

static void init_rem_hits(void)
{
	rem_sq_bracket = malloc(sizeof(*rem_sq_bracket) + 6);
	if (!rem_sq_bracket) {
		fprintf(stderr, "Not enough memory to display remaining hits\n");
		return;
	}

	strcpy(rem_sq_bracket->name, "[...]");
	rem_hits.ms.sym = rem_sq_bracket;
}

static size_t __callchain__fprintf_graph(FILE *fp, struct rb_root *root,
					 u64 total_samples, int depth,
					 int depth_mask, int left_margin)
{
	struct rb_node *node, *next;
	struct callchain_node *child = NULL;
	struct callchain_list *chain;
	int new_depth_mask = depth_mask;
	u64 remaining;
	size_t ret = 0;
	int i;
	uint entries_printed = 0;
	int cumul_count = 0;

	remaining = total_samples;

	node = rb_first(root);
	while (node) {
		u64 new_total;
		u64 cumul;

		child = rb_entry(node, struct callchain_node, rb_node);
		cumul = callchain_cumul_hits(child);
		remaining -= cumul;
		cumul_count += callchain_cumul_counts(child);

		/*
		 * The depth mask manages the output of pipes that show
		 * the depth. We don't want to keep the pipes of the current
		 * level for the last child of this depth.
		 * Except if we have remaining filtered hits. They will
		 * supersede the last child
		 */
		next = rb_next(node);
		if (!next && (callchain_param.mode != CHAIN_GRAPH_REL || !remaining))
			new_depth_mask &= ~(1 << (depth - 1));

		/*
		 * But we keep the older depth mask for the line separator
		 * to keep the level link until we reach the last child
		 */
		ret += ipchain__fprintf_graph_line(fp, depth, depth_mask,
						   left_margin);
		i = 0;
		list_for_each_entry(chain, &child->val, list) {
			ret += ipchain__fprintf_graph(fp, child, chain, depth,
						      new_depth_mask, i++,
						      total_samples,
						      left_margin);
		}

		if (callchain_param.mode == CHAIN_GRAPH_REL)
			new_total = child->children_hit;
		else
			new_total = total_samples;

		ret += __callchain__fprintf_graph(fp, &child->rb_root, new_total,
						  depth + 1,
						  new_depth_mask | (1 << depth),
						  left_margin);
		node = next;
		if (++entries_printed == callchain_param.print_limit)
			break;
	}

	if (callchain_param.mode == CHAIN_GRAPH_REL &&
		remaining && remaining != total_samples) {
		struct callchain_node rem_node = {
			.hit = remaining,
		};

		if (!rem_sq_bracket)
			return ret;

		if (callchain_param.value == CCVAL_COUNT && child && child->parent) {
			rem_node.count = child->parent->children_count - cumul_count;
			if (rem_node.count <= 0)
				return ret;
		}

		new_depth_mask &= ~(1 << (depth - 1));
		ret += ipchain__fprintf_graph(fp, &rem_node, &rem_hits, depth,
					      new_depth_mask, 0, total_samples,
					      left_margin);
	}

	return ret;
}

static size_t callchain__fprintf_graph(FILE *fp, struct rb_root *root,
				       u64 total_samples, int left_margin)
{
	struct callchain_node *cnode;
	struct callchain_list *chain;
	u32 entries_printed = 0;
	bool printed = false;
	struct rb_node *node;
	int i = 0;
	int ret = 0;
	char bf[1024];

	/*
	 * If have one single callchain root, don't bother printing
	 * its percentage (100 % in fractal mode and the same percentage
	 * than the hist in graph mode). This also avoid one level of column.
	 */
	node = rb_first(root);
	if (node && !rb_next(node)) {
		cnode = rb_entry(node, struct callchain_node, rb_node);
		list_for_each_entry(chain, &cnode->val, list) {
			/*
			 * If we sort by symbol, the first entry is the same than
			 * the symbol. No need to print it otherwise it appears as
			 * displayed twice.
			 */
			if (!i++ && field_order == NULL &&
			    sort_order && !prefixcmp(sort_order, "sym"))
				continue;
			if (!printed) {
				ret += callchain__fprintf_left_margin(fp, left_margin);
				ret += fprintf(fp, "|\n");
				ret += callchain__fprintf_left_margin(fp, left_margin);
				ret += fprintf(fp, "---");
				left_margin += 3;
				printed = true;
			} else
				ret += callchain__fprintf_left_margin(fp, left_margin);

			ret += fprintf(fp, "%s\n", callchain_list__sym_name(chain, bf, sizeof(bf),
							false));

			if (++entries_printed == callchain_param.print_limit)
				break;
		}
		root = &cnode->rb_root;
	}

	ret += __callchain__fprintf_graph(fp, root, total_samples,
					  1, 1, left_margin);
	ret += fprintf(fp, "\n");

	return ret;
}

static size_t __callchain__fprintf_flat(FILE *fp, struct callchain_node *node,
					u64 total_samples)
{
	struct callchain_list *chain;
	size_t ret = 0;
	char bf[1024];

	if (!node)
		return 0;

	ret += __callchain__fprintf_flat(fp, node->parent, total_samples);


	list_for_each_entry(chain, &node->val, list) {
		if (chain->ip >= PERF_CONTEXT_MAX)
			continue;
		ret += fprintf(fp, "                %s\n", callchain_list__sym_name(chain,
					bf, sizeof(bf), false));
	}

	return ret;
}

static size_t callchain__fprintf_flat(FILE *fp, struct rb_root *tree,
				      u64 total_samples)
{
	size_t ret = 0;
	u32 entries_printed = 0;
	struct callchain_node *chain;
	struct rb_node *rb_node = rb_first(tree);

	while (rb_node) {
		chain = rb_entry(rb_node, struct callchain_node, rb_node);

		ret += fprintf(fp, "           ");
		ret += callchain_node__fprintf_value(chain, fp, total_samples);
		ret += fprintf(fp, "\n");
		ret += __callchain__fprintf_flat(fp, chain, total_samples);
		ret += fprintf(fp, "\n");
		if (++entries_printed == callchain_param.print_limit)
			break;

		rb_node = rb_next(rb_node);
	}

	return ret;
}

static size_t __callchain__fprintf_folded(FILE *fp, struct callchain_node *node)
{
	const char *sep = symbol_conf.field_sep ?: ";";
	struct callchain_list *chain;
	size_t ret = 0;
	char bf[1024];
	bool first;

	if (!node)
		return 0;

	ret += __callchain__fprintf_folded(fp, node->parent);

	first = (ret == 0);
	list_for_each_entry(chain, &node->val, list) {
		if (chain->ip >= PERF_CONTEXT_MAX)
			continue;
		ret += fprintf(fp, "%s%s", first ? "" : sep,
			       callchain_list__sym_name(chain,
						bf, sizeof(bf), false));
		first = false;
	}

	return ret;
}

static size_t callchain__fprintf_folded(FILE *fp, struct rb_root *tree,
					u64 total_samples)
{
	size_t ret = 0;
	u32 entries_printed = 0;
	struct callchain_node *chain;
	struct rb_node *rb_node = rb_first(tree);

	while (rb_node) {

		chain = rb_entry(rb_node, struct callchain_node, rb_node);

		ret += callchain_node__fprintf_value(chain, fp, total_samples);
		ret += fprintf(fp, " ");
		ret += __callchain__fprintf_folded(fp, chain);
		ret += fprintf(fp, "\n");
		if (++entries_printed == callchain_param.print_limit)
			break;

		rb_node = rb_next(rb_node);
	}

	return ret;
}

static size_t hist_entry_callchain__fprintf(struct hist_entry *he,
					    u64 total_samples, int left_margin,
					    FILE *fp)
{
	switch (callchain_param.mode) {
	case CHAIN_GRAPH_REL:
		return callchain__fprintf_graph(fp, &he->sorted_chain,
						symbol_conf.cumulate_callchain ?
						he->stat_acc->period : he->stat.period,
						left_margin);
		break;
	case CHAIN_GRAPH_ABS:
		return callchain__fprintf_graph(fp, &he->sorted_chain, total_samples,
						left_margin);
		break;
	case CHAIN_FLAT:
		return callchain__fprintf_flat(fp, &he->sorted_chain, total_samples);
		break;
	case CHAIN_FOLDED:
		return callchain__fprintf_folded(fp, &he->sorted_chain, total_samples);
		break;
	case CHAIN_NONE:
		break;
	default:
		pr_err("Bad callchain mode\n");
	}

	return 0;
}

static size_t hist_entry__callchain_fprintf(struct hist_entry *he,
					    struct hists *hists,
					    FILE *fp)
{
	int left_margin = 0;
	u64 total_period = hists->stats.total_period;

	if (field_order == NULL && (sort_order == NULL ||
				    !prefixcmp(sort_order, "comm"))) {
		struct perf_hpp_fmt *fmt;

		perf_hpp__for_each_format(fmt) {
			if (!perf_hpp__is_sort_entry(fmt))
				continue;

			/* must be 'comm' sort entry */
			left_margin = fmt->width(fmt, NULL, hists_to_evsel(hists));
			left_margin -= thread__comm_len(he->thread);
			break;
		}
	}
	return hist_entry_callchain__fprintf(he, total_period, left_margin, fp);
}

static int hist_entry__snprintf(struct hist_entry *he, struct perf_hpp *hpp)
{
	const char *sep = symbol_conf.field_sep;
	struct perf_hpp_fmt *fmt;
	char *start = hpp->buf;
	int ret;
	bool first = true;

	if (symbol_conf.exclude_other && !he->parent)
		return 0;

	perf_hpp__for_each_format(fmt) {
		if (perf_hpp__should_skip(fmt))
			continue;

		/*
		 * If there's no field_sep, we still need
		 * to display initial '  '.
		 */
		if (!sep || !first) {
			ret = scnprintf(hpp->buf, hpp->size, "%s", sep ?: "  ");
			advance_hpp(hpp, ret);
		} else
			first = false;

		if (perf_hpp__use_color() && fmt->color)
			ret = fmt->color(fmt, hpp, he);
		else
			ret = fmt->entry(fmt, hpp, he);

		advance_hpp(hpp, ret);
	}

	return hpp->buf - start;
}

static int hist_entry__fprintf(struct hist_entry *he, size_t size,
			       struct hists *hists,
			       char *bf, size_t bfsz, FILE *fp)
{
	int ret;
	struct perf_hpp hpp = {
		.buf		= bf,
		.size		= size,
	};

	if (size == 0 || size > bfsz)
		size = hpp.size = bfsz;

	hist_entry__snprintf(he, &hpp);

	ret = fprintf(fp, "%s\n", bf);

	if (symbol_conf.use_callchain)
		ret += hist_entry__callchain_fprintf(he, hists, fp);

	return ret;
}

size_t hists__fprintf(struct hists *hists, bool show_header, int max_rows,
		      int max_cols, float min_pcnt, FILE *fp)
{
	struct perf_hpp_fmt *fmt;
	struct rb_node *nd;
	size_t ret = 0;
	unsigned int width;
	const char *sep = symbol_conf.field_sep;
	int nr_rows = 0;
	char bf[96];
	struct perf_hpp dummy_hpp = {
		.buf	= bf,
		.size	= sizeof(bf),
	};
	bool first = true;
	size_t linesz;
	char *line = NULL;

	init_rem_hits();

	perf_hpp__for_each_format(fmt)
		perf_hpp__reset_width(fmt, hists);

	if (symbol_conf.col_width_list_str)
		perf_hpp__set_user_width(symbol_conf.col_width_list_str);

	if (!show_header)
		goto print_entries;

	fprintf(fp, "# ");

	perf_hpp__for_each_format(fmt) {
		if (perf_hpp__should_skip(fmt))
			continue;

		if (!first)
			fprintf(fp, "%s", sep ?: "  ");
		else
			first = false;

		fmt->header(fmt, &dummy_hpp, hists_to_evsel(hists));
		fprintf(fp, "%s", bf);
	}

	fprintf(fp, "\n");
	if (max_rows && ++nr_rows >= max_rows)
		goto out;

	if (sep)
		goto print_entries;

	first = true;

	fprintf(fp, "# ");

	perf_hpp__for_each_format(fmt) {
		unsigned int i;

		if (perf_hpp__should_skip(fmt))
			continue;

		if (!first)
			fprintf(fp, "%s", sep ?: "  ");
		else
			first = false;

		width = fmt->width(fmt, &dummy_hpp, hists_to_evsel(hists));
		for (i = 0; i < width; i++)
			fprintf(fp, ".");
	}

	fprintf(fp, "\n");
	if (max_rows && ++nr_rows >= max_rows)
		goto out;

	fprintf(fp, "#\n");
	if (max_rows && ++nr_rows >= max_rows)
		goto out;

print_entries:
	linesz = hists__sort_list_width(hists) + 3 + 1;
	linesz += perf_hpp__color_overhead();
	line = malloc(linesz);
	if (line == NULL) {
		ret = -1;
		goto out;
	}

	for (nd = rb_first(&hists->entries); nd; nd = rb_next(nd)) {
		struct hist_entry *h = rb_entry(nd, struct hist_entry, rb_node);
		float percent;

		if (h->filtered)
			continue;

		percent = hist_entry__get_percent_limit(h);
		if (percent < min_pcnt)
			continue;

		ret += hist_entry__fprintf(h, max_cols, hists, line, linesz, fp);

		if (max_rows && ++nr_rows >= max_rows)
			break;

		if (h->ms.map == NULL && verbose > 1) {
			__map_groups__fprintf_maps(h->thread->mg,
						   MAP__FUNCTION, fp);
			fprintf(fp, "%.10s end\n", graph_dotted_line);
		}
	}

	free(line);
out:
	zfree(&rem_sq_bracket);

	return ret;
}

size_t events_stats__fprintf(struct events_stats *stats, FILE *fp)
{
	int i;
	size_t ret = 0;

	for (i = 0; i < PERF_RECORD_HEADER_MAX; ++i) {
		const char *name;

		if (stats->nr_events[i] == 0)
			continue;

		name = perf_event__name(i);
		if (!strcmp(name, "UNKNOWN"))
			continue;

		ret += fprintf(fp, "%16s events: %10d\n", name,
			       stats->nr_events[i]);
	}

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