hists.c 66.8 KB
Newer Older
1 2 3 4 5
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <linux/rbtree.h>

6 7 8 9 10 11
#include "../../util/evsel.h"
#include "../../util/evlist.h"
#include "../../util/hist.h"
#include "../../util/pstack.h"
#include "../../util/sort.h"
#include "../../util/util.h"
12
#include "../../util/top.h"
13
#include "../../arch/common.h"
14 15 16 17

#include "../browser.h"
#include "../helpline.h"
#include "../util.h"
18
#include "../ui.h"
19
#include "map.h"
20
#include "annotate.h"
21 22 23 24 25 26

struct hist_browser {
	struct ui_browser   b;
	struct hists	    *hists;
	struct hist_entry   *he_selection;
	struct map_symbol   *selection;
27
	struct hist_browser_timer *hbt;
28
	struct pstack	    *pstack;
29
	struct perf_env *env;
30
	int		     print_seq;
31
	bool		     show_dso;
32
	bool		     show_headers;
33
	float		     min_pcnt;
34
	u64		     nr_non_filtered_entries;
35
	u64		     nr_callchain_rows;
36 37
};

38 39
extern void hist_browser__init_hpp(void);

40 41 42
static int hists__browser_title(struct hists *hists,
				struct hist_browser_timer *hbt,
				char *bf, size_t size);
43
static void hist_browser__update_nr_entries(struct hist_browser *hb);
44

45 46 47
static struct rb_node *hists__filter_entries(struct rb_node *nd,
					     float min_pcnt);

48 49
static bool hist_browser__has_filter(struct hist_browser *hb)
{
50
	return hists__has_filter(hb->hists) || hb->min_pcnt || symbol_conf.has_filter;
51 52
}

53 54 55 56 57 58 59 60 61 62 63 64
static int hist_browser__get_folding(struct hist_browser *browser)
{
	struct rb_node *nd;
	struct hists *hists = browser->hists;
	int unfolded_rows = 0;

	for (nd = rb_first(&hists->entries);
	     (nd = hists__filter_entries(nd, browser->min_pcnt)) != NULL;
	     nd = rb_next(nd)) {
		struct hist_entry *he =
			rb_entry(nd, struct hist_entry, rb_node);

65
		if (he->unfolded)
66 67 68 69 70
			unfolded_rows += he->nr_rows;
	}
	return unfolded_rows;
}

71 72 73 74 75 76 77 78 79
static u32 hist_browser__nr_entries(struct hist_browser *hb)
{
	u32 nr_entries;

	if (hist_browser__has_filter(hb))
		nr_entries = hb->nr_non_filtered_entries;
	else
		nr_entries = hb->hists->nr_entries;

80
	hb->nr_callchain_rows = hist_browser__get_folding(hb);
81 82 83
	return nr_entries + hb->nr_callchain_rows;
}

84 85 86 87 88 89 90 91 92 93 94 95 96 97 98
static void hist_browser__update_rows(struct hist_browser *hb)
{
	struct ui_browser *browser = &hb->b;
	u16 header_offset = hb->show_headers ? 1 : 0, index_row;

	browser->rows = browser->height - header_offset;
	/*
	 * Verify if we were at the last line and that line isn't
	 * visibe because we now show the header line(s).
	 */
	index_row = browser->index - browser->top_idx;
	if (index_row >= browser->rows)
		browser->index -= index_row - browser->rows + 1;
}

99
static void hist_browser__refresh_dimensions(struct ui_browser *browser)
100
{
101 102
	struct hist_browser *hb = container_of(browser, struct hist_browser, b);

103
	/* 3 == +/- toggle symbol before actual hist_entry rendering */
104 105 106 107 108 109 110 111
	browser->width = 3 + (hists__sort_list_width(hb->hists) + sizeof("[k]"));
	/*
 	 * FIXME: Just keeping existing behaviour, but this really should be
 	 *	  before updating browser->width, as it will invalidate the
 	 *	  calculation above. Fix this and the fallout in another
 	 *	  changeset.
 	 */
	ui_browser__refresh_dimensions(browser);
112
	hist_browser__update_rows(hb);
113 114
}

115 116
static void hist_browser__gotorc(struct hist_browser *browser, int row, int column)
{
117 118 119
	u16 header_offset = browser->show_headers ? 1 : 0;

	ui_browser__gotorc(&browser->b, row + header_offset, column);
120 121
}

122
static void hist_browser__reset(struct hist_browser *browser)
123
{
124 125 126 127 128 129
	/*
	 * The hists__remove_entry_filter() already folds non-filtered
	 * entries so we can assume it has 0 callchain rows.
	 */
	browser->nr_callchain_rows = 0;

130
	hist_browser__update_nr_entries(browser);
131
	browser->b.nr_entries = hist_browser__nr_entries(browser);
132
	hist_browser__refresh_dimensions(&browser->b);
133
	ui_browser__reset_index(&browser->b);
134 135 136 137 138 139 140
}

static char tree__folded_sign(bool unfolded)
{
	return unfolded ? '-' : '+';
}

141
static char hist_entry__folded(const struct hist_entry *he)
142
{
143
	return he->has_children ? tree__folded_sign(he->unfolded) : ' ';
144 145
}

146
static char callchain_list__folded(const struct callchain_list *cl)
147
{
148
	return cl->has_children ? tree__folded_sign(cl->unfolded) : ' ';
149 150
}

151
static void callchain_list__set_folding(struct callchain_list *cl, bool unfold)
152
{
153
	cl->unfolded = unfold ? cl->has_children : false;
154 155
}

156
static int callchain_node__count_rows_rb_tree(struct callchain_node *node)
157 158 159 160
{
	int n = 0;
	struct rb_node *nd;

161
	for (nd = rb_first(&node->rb_root); nd; nd = rb_next(nd)) {
162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180
		struct callchain_node *child = rb_entry(nd, struct callchain_node, rb_node);
		struct callchain_list *chain;
		char folded_sign = ' '; /* No children */

		list_for_each_entry(chain, &child->val, list) {
			++n;
			/* We need this because we may not have children */
			folded_sign = callchain_list__folded(chain);
			if (folded_sign == '+')
				break;
		}

		if (folded_sign == '-') /* Have children and they're unfolded */
			n += callchain_node__count_rows_rb_tree(child);
	}

	return n;
}

181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209
static int callchain_node__count_flat_rows(struct callchain_node *node)
{
	struct callchain_list *chain;
	char folded_sign = 0;
	int n = 0;

	list_for_each_entry(chain, &node->parent_val, list) {
		if (!folded_sign) {
			/* only check first chain list entry */
			folded_sign = callchain_list__folded(chain);
			if (folded_sign == '+')
				return 1;
		}
		n++;
	}

	list_for_each_entry(chain, &node->val, list) {
		if (!folded_sign) {
			/* node->parent_val list might be empty */
			folded_sign = callchain_list__folded(chain);
			if (folded_sign == '+')
				return 1;
		}
		n++;
	}

	return n;
}

210 211 212 213 214
static int callchain_node__count_folded_rows(struct callchain_node *node __maybe_unused)
{
	return 1;
}

215 216 217 218 219 220
static int callchain_node__count_rows(struct callchain_node *node)
{
	struct callchain_list *chain;
	bool unfolded = false;
	int n = 0;

221 222
	if (callchain_param.mode == CHAIN_FLAT)
		return callchain_node__count_flat_rows(node);
223 224
	else if (callchain_param.mode == CHAIN_FOLDED)
		return callchain_node__count_folded_rows(node);
225

226 227
	list_for_each_entry(chain, &node->val, list) {
		++n;
228
		unfolded = chain->unfolded;
229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249
	}

	if (unfolded)
		n += callchain_node__count_rows_rb_tree(node);

	return n;
}

static int callchain__count_rows(struct rb_root *chain)
{
	struct rb_node *nd;
	int n = 0;

	for (nd = rb_first(chain); nd; nd = rb_next(nd)) {
		struct callchain_node *node = rb_entry(nd, struct callchain_node, rb_node);
		n += callchain_node__count_rows(node);
	}

	return n;
}

250
static bool hist_entry__toggle_fold(struct hist_entry *he)
251
{
252
	if (!he)
253 254
		return false;

255
	if (!he->has_children)
256 257
		return false;

258 259 260 261 262 263 264 265 266 267 268 269 270
	he->unfolded = !he->unfolded;
	return true;
}

static bool callchain_list__toggle_fold(struct callchain_list *cl)
{
	if (!cl)
		return false;

	if (!cl->has_children)
		return false;

	cl->unfolded = !cl->unfolded;
271 272 273
	return true;
}

274
static void callchain_node__init_have_children_rb_tree(struct callchain_node *node)
275
{
276
	struct rb_node *nd = rb_first(&node->rb_root);
277

278
	for (nd = rb_first(&node->rb_root); nd; nd = rb_next(nd)) {
279 280
		struct callchain_node *child = rb_entry(nd, struct callchain_node, rb_node);
		struct callchain_list *chain;
281
		bool first = true;
282 283 284 285

		list_for_each_entry(chain, &child->val, list) {
			if (first) {
				first = false;
286
				chain->has_children = chain->list.next != &child->val ||
287
							 !RB_EMPTY_ROOT(&child->rb_root);
288
			} else
289
				chain->has_children = chain->list.next == &child->val &&
290
							 !RB_EMPTY_ROOT(&child->rb_root);
291 292 293 294 295 296
		}

		callchain_node__init_have_children_rb_tree(child);
	}
}

297 298
static void callchain_node__init_have_children(struct callchain_node *node,
					       bool has_sibling)
299 300 301
{
	struct callchain_list *chain;

302
	chain = list_entry(node->val.next, struct callchain_list, list);
303
	chain->has_children = has_sibling;
304

305
	if (node->val.next != node->val.prev) {
306
		chain = list_entry(node->val.prev, struct callchain_list, list);
307
		chain->has_children = !RB_EMPTY_ROOT(&node->rb_root);
308
	}
309

310
	callchain_node__init_have_children_rb_tree(node);
311 312
}

313
static void callchain__init_have_children(struct rb_root *root)
314
{
315 316
	struct rb_node *nd = rb_first(root);
	bool has_sibling = nd && rb_next(nd);
317

318
	for (nd = rb_first(root); nd; nd = rb_next(nd)) {
319
		struct callchain_node *node = rb_entry(nd, struct callchain_node, rb_node);
320
		callchain_node__init_have_children(node, has_sibling);
321 322
		if (callchain_param.mode == CHAIN_FLAT ||
		    callchain_param.mode == CHAIN_FOLDED)
323
			callchain_node__make_parent_list(node);
324 325 326
	}
}

327
static void hist_entry__init_have_children(struct hist_entry *he)
328
{
329
	if (!he->init_have_children) {
330
		he->has_children = !RB_EMPTY_ROOT(&he->sorted_chain);
331 332
		callchain__init_have_children(&he->sorted_chain);
		he->init_have_children = true;
333 334 335
	}
}

336
static bool hist_browser__toggle_fold(struct hist_browser *browser)
337
{
338 339 340 341 342
	struct hist_entry *he = browser->he_selection;
	struct map_symbol *ms = browser->selection;
	struct callchain_list *cl = container_of(ms, struct callchain_list, ms);
	bool has_children;

343 344 345
	if (!he || !ms)
		return false;

346 347 348 349
	if (ms == &he->ms)
		has_children = hist_entry__toggle_fold(he);
	else
		has_children = callchain_list__toggle_fold(cl);
350

351
	if (has_children) {
352
		hist_entry__init_have_children(he);
353 354
		browser->b.nr_entries -= he->nr_rows;
		browser->nr_callchain_rows -= he->nr_rows;
355

356
		if (he->unfolded)
357 358 359
			he->nr_rows = callchain__count_rows(&he->sorted_chain);
		else
			he->nr_rows = 0;
360 361 362

		browser->b.nr_entries += he->nr_rows;
		browser->nr_callchain_rows += he->nr_rows;
363 364 365 366 367 368 369 370

		return true;
	}

	/* If it doesn't have children, no toggling performed */
	return false;
}

371
static int callchain_node__set_folding_rb_tree(struct callchain_node *node, bool unfold)
372 373 374 375
{
	int n = 0;
	struct rb_node *nd;

376
	for (nd = rb_first(&node->rb_root); nd; nd = rb_next(nd)) {
377 378 379 380 381 382
		struct callchain_node *child = rb_entry(nd, struct callchain_node, rb_node);
		struct callchain_list *chain;
		bool has_children = false;

		list_for_each_entry(chain, &child->val, list) {
			++n;
383 384
			callchain_list__set_folding(chain, unfold);
			has_children = chain->has_children;
385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401
		}

		if (has_children)
			n += callchain_node__set_folding_rb_tree(child, unfold);
	}

	return n;
}

static int callchain_node__set_folding(struct callchain_node *node, bool unfold)
{
	struct callchain_list *chain;
	bool has_children = false;
	int n = 0;

	list_for_each_entry(chain, &node->val, list) {
		++n;
402 403
		callchain_list__set_folding(chain, unfold);
		has_children = chain->has_children;
404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424
	}

	if (has_children)
		n += callchain_node__set_folding_rb_tree(node, unfold);

	return n;
}

static int callchain__set_folding(struct rb_root *chain, bool unfold)
{
	struct rb_node *nd;
	int n = 0;

	for (nd = rb_first(chain); nd; nd = rb_next(nd)) {
		struct callchain_node *node = rb_entry(nd, struct callchain_node, rb_node);
		n += callchain_node__set_folding(node, unfold);
	}

	return n;
}

425
static void hist_entry__set_folding(struct hist_entry *he, bool unfold)
426
{
427
	hist_entry__init_have_children(he);
428
	he->unfolded = unfold ? he->has_children : false;
429

430
	if (he->has_children) {
431 432
		int n = callchain__set_folding(&he->sorted_chain, unfold);
		he->nr_rows = unfold ? n : 0;
433
	} else
434
		he->nr_rows = 0;
435 436
}

437 438
static void
__hist_browser__set_folding(struct hist_browser *browser, bool unfold)
439 440
{
	struct rb_node *nd;
441
	struct hists *hists = browser->hists;
442

443
	for (nd = rb_first(&hists->entries);
444
	     (nd = hists__filter_entries(nd, browser->min_pcnt)) != NULL;
445
	     nd = rb_next(nd)) {
446 447
		struct hist_entry *he = rb_entry(nd, struct hist_entry, rb_node);
		hist_entry__set_folding(he, unfold);
448
		browser->nr_callchain_rows += he->nr_rows;
449 450 451
	}
}

452
static void hist_browser__set_folding(struct hist_browser *browser, bool unfold)
453
{
454 455 456 457
	browser->nr_callchain_rows = 0;
	__hist_browser__set_folding(browser, unfold);

	browser->b.nr_entries = hist_browser__nr_entries(browser);
458
	/* Go to the start, we may be way after valid entries after a collapse */
459
	ui_browser__reset_index(&browser->b);
460 461
}

462 463 464 465 466 467 468 469 470
static void ui_browser__warn_lost_events(struct ui_browser *browser)
{
	ui_browser__warning(browser, 4,
		"Events are being lost, check IO/CPU overload!\n\n"
		"You may want to run 'perf' using a RT scheduler policy:\n\n"
		" perf top -r 80\n\n"
		"Or reduce the sampling frequency.");
}

471
static int hist_browser__run(struct hist_browser *browser, const char *help)
472
{
473
	int key;
474
	char title[160];
475
	struct hist_browser_timer *hbt = browser->hbt;
476
	int delay_secs = hbt ? hbt->refresh : 0;
477

478
	browser->b.entries = &browser->hists->entries;
479
	browser->b.nr_entries = hist_browser__nr_entries(browser);
480

481
	hists__browser_title(browser->hists, hbt, title, sizeof(title));
482

483
	if (ui_browser__show(&browser->b, title, "%s", help) < 0)
484 485 486
		return -1;

	while (1) {
487
		key = ui_browser__run(&browser->b, delay_secs);
488

489
		switch (key) {
490 491
		case K_TIMER: {
			u64 nr_entries;
492
			hbt->timer(hbt->arg);
493

494
			if (hist_browser__has_filter(browser))
495
				hist_browser__update_nr_entries(browser);
496

497
			nr_entries = hist_browser__nr_entries(browser);
498
			ui_browser__update_nr_entries(&browser->b, nr_entries);
499

500 501 502 503 504
			if (browser->hists->stats.nr_lost_warned !=
			    browser->hists->stats.nr_events[PERF_RECORD_LOST]) {
				browser->hists->stats.nr_lost_warned =
					browser->hists->stats.nr_events[PERF_RECORD_LOST];
				ui_browser__warn_lost_events(&browser->b);
505 506
			}

507 508
			hists__browser_title(browser->hists,
					     hbt, title, sizeof(title));
509
			ui_browser__show_title(&browser->b, title);
510
			continue;
511
		}
512
		case 'D': { /* Debug */
513
			static int seq;
514
			struct hist_entry *h = rb_entry(browser->b.top,
515 516
							struct hist_entry, rb_node);
			ui_helpline__pop();
517
			ui_helpline__fpush("%d: nr_ent=(%d,%d), rows=%d, idx=%d, fve: idx=%d, row_off=%d, nrows=%d",
518 519
					   seq++, browser->b.nr_entries,
					   browser->hists->nr_entries,
520
					   browser->b.rows,
521 522
					   browser->b.index,
					   browser->b.top_idx,
523 524
					   h->row_offset, h->nr_rows);
		}
525 526 527
			break;
		case 'C':
			/* Collapse the whole world. */
528
			hist_browser__set_folding(browser, false);
529 530 531
			break;
		case 'E':
			/* Expand the whole world. */
532
			hist_browser__set_folding(browser, true);
533
			break;
534 535 536 537
		case 'H':
			browser->show_headers = !browser->show_headers;
			hist_browser__update_rows(browser);
			break;
538
		case K_ENTER:
539
			if (hist_browser__toggle_fold(browser))
540 541 542
				break;
			/* fall thru */
		default:
543
			goto out;
544 545
		}
	}
546
out:
547
	ui_browser__hide(&browser->b);
548
	return key;
549 550
}

551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566
struct callchain_print_arg {
	/* for hists browser */
	off_t	row_offset;
	bool	is_current_entry;

	/* for file dump */
	FILE	*fp;
	int	printed;
};

typedef void (*print_callchain_entry_fn)(struct hist_browser *browser,
					 struct callchain_list *chain,
					 const char *str, int offset,
					 unsigned short row,
					 struct callchain_print_arg *arg);

567 568
static void hist_browser__show_callchain_entry(struct hist_browser *browser,
					       struct callchain_list *chain,
569 570 571
					       const char *str, int offset,
					       unsigned short row,
					       struct callchain_print_arg *arg)
572 573
{
	int color, width;
574
	char folded_sign = callchain_list__folded(chain);
575
	bool show_annotated = browser->show_dso && chain->ms.sym && symbol__annotation(chain->ms.sym)->src;
576 577 578 579 580 581

	color = HE_COLORSET_NORMAL;
	width = browser->b.width - (offset + 2);
	if (ui_browser__is_current_entry(&browser->b, row)) {
		browser->selection = &chain->ms;
		color = HE_COLORSET_SELECTED;
582
		arg->is_current_entry = true;
583 584 585 586
	}

	ui_browser__set_color(&browser->b, color);
	hist_browser__gotorc(browser, row, 0);
587
	ui_browser__write_nstring(&browser->b, " ", offset);
588
	ui_browser__printf(&browser->b, "%c", folded_sign);
589
	ui_browser__write_graph(&browser->b, show_annotated ? SLSMG_RARROW_CHAR : ' ');
590
	ui_browser__write_nstring(&browser->b, str, width);
591 592
}

593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619
static void hist_browser__fprintf_callchain_entry(struct hist_browser *b __maybe_unused,
						  struct callchain_list *chain,
						  const char *str, int offset,
						  unsigned short row __maybe_unused,
						  struct callchain_print_arg *arg)
{
	char folded_sign = callchain_list__folded(chain);

	arg->printed += fprintf(arg->fp, "%*s%c %s\n", offset, " ",
				folded_sign, str);
}

typedef bool (*check_output_full_fn)(struct hist_browser *browser,
				     unsigned short row);

static bool hist_browser__check_output_full(struct hist_browser *browser,
					    unsigned short row)
{
	return browser->b.rows == row;
}

static bool hist_browser__check_dump_full(struct hist_browser *browser __maybe_unused,
					  unsigned short row __maybe_unused)
{
	return false;
}

620 621
#define LEVEL_OFFSET_STEP 3

622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659
static int hist_browser__show_callchain_list(struct hist_browser *browser,
					     struct callchain_node *node,
					     struct callchain_list *chain,
					     unsigned short row, u64 total,
					     bool need_percent, int offset,
					     print_callchain_entry_fn print,
					     struct callchain_print_arg *arg)
{
	char bf[1024], *alloc_str;
	const char *str;

	if (arg->row_offset != 0) {
		arg->row_offset--;
		return 0;
	}

	alloc_str = NULL;
	str = callchain_list__sym_name(chain, bf, sizeof(bf),
				       browser->show_dso);

	if (need_percent) {
		char buf[64];

		callchain_node__scnprintf_value(node, buf, sizeof(buf),
						total);

		if (asprintf(&alloc_str, "%s %s", buf, str) < 0)
			str = "Not enough memory!";
		else
			str = alloc_str;
	}

	print(browser, chain, str, offset, row, arg);

	free(alloc_str);
	return 1;
}

660 661 662 663 664 665 666 667 668 669 670 671 672 673
static bool check_percent_display(struct rb_node *node, u64 parent_total)
{
	struct callchain_node *child;

	if (node == NULL)
		return false;

	if (rb_next(node))
		return true;

	child = rb_entry(node, struct callchain_node, rb_node);
	return callchain_cumul_hits(child) != parent_total;
}

674 675 676
static int hist_browser__show_callchain_flat(struct hist_browser *browser,
					     struct rb_root *root,
					     unsigned short row, u64 total,
677
					     u64 parent_total,
678 679 680 681 682 683 684 685 686
					     print_callchain_entry_fn print,
					     struct callchain_print_arg *arg,
					     check_output_full_fn is_output_full)
{
	struct rb_node *node;
	int first_row = row, offset = LEVEL_OFFSET_STEP;
	bool need_percent;

	node = rb_first(root);
687
	need_percent = check_percent_display(node, parent_total);
688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751

	while (node) {
		struct callchain_node *child = rb_entry(node, struct callchain_node, rb_node);
		struct rb_node *next = rb_next(node);
		struct callchain_list *chain;
		char folded_sign = ' ';
		int first = true;
		int extra_offset = 0;

		list_for_each_entry(chain, &child->parent_val, list) {
			bool was_first = first;

			if (first)
				first = false;
			else if (need_percent)
				extra_offset = LEVEL_OFFSET_STEP;

			folded_sign = callchain_list__folded(chain);

			row += hist_browser__show_callchain_list(browser, child,
							chain, row, total,
							was_first && need_percent,
							offset + extra_offset,
							print, arg);

			if (is_output_full(browser, row))
				goto out;

			if (folded_sign == '+')
				goto next;
		}

		list_for_each_entry(chain, &child->val, list) {
			bool was_first = first;

			if (first)
				first = false;
			else if (need_percent)
				extra_offset = LEVEL_OFFSET_STEP;

			folded_sign = callchain_list__folded(chain);

			row += hist_browser__show_callchain_list(browser, child,
							chain, row, total,
							was_first && need_percent,
							offset + extra_offset,
							print, arg);

			if (is_output_full(browser, row))
				goto out;

			if (folded_sign == '+')
				break;
		}

next:
		if (is_output_full(browser, row))
			break;
		node = next;
	}
out:
	return row - first_row;
}

752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780
static char *hist_browser__folded_callchain_str(struct hist_browser *browser,
						struct callchain_list *chain,
						char *value_str, char *old_str)
{
	char bf[1024];
	const char *str;
	char *new;

	str = callchain_list__sym_name(chain, bf, sizeof(bf),
				       browser->show_dso);
	if (old_str) {
		if (asprintf(&new, "%s%s%s", old_str,
			     symbol_conf.field_sep ?: ";", str) < 0)
			new = NULL;
	} else {
		if (value_str) {
			if (asprintf(&new, "%s %s", value_str, str) < 0)
				new = NULL;
		} else {
			if (asprintf(&new, "%s", str) < 0)
				new = NULL;
		}
	}
	return new;
}

static int hist_browser__show_callchain_folded(struct hist_browser *browser,
					       struct rb_root *root,
					       unsigned short row, u64 total,
781
					       u64 parent_total,
782 783 784 785 786 787 788 789 790
					       print_callchain_entry_fn print,
					       struct callchain_print_arg *arg,
					       check_output_full_fn is_output_full)
{
	struct rb_node *node;
	int first_row = row, offset = LEVEL_OFFSET_STEP;
	bool need_percent;

	node = rb_first(root);
791
	need_percent = check_percent_display(node, parent_total);
792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862

	while (node) {
		struct callchain_node *child = rb_entry(node, struct callchain_node, rb_node);
		struct rb_node *next = rb_next(node);
		struct callchain_list *chain, *first_chain = NULL;
		int first = true;
		char *value_str = NULL, *value_str_alloc = NULL;
		char *chain_str = NULL, *chain_str_alloc = NULL;

		if (arg->row_offset != 0) {
			arg->row_offset--;
			goto next;
		}

		if (need_percent) {
			char buf[64];

			callchain_node__scnprintf_value(child, buf, sizeof(buf), total);
			if (asprintf(&value_str, "%s", buf) < 0) {
				value_str = (char *)"<...>";
				goto do_print;
			}
			value_str_alloc = value_str;
		}

		list_for_each_entry(chain, &child->parent_val, list) {
			chain_str = hist_browser__folded_callchain_str(browser,
						chain, value_str, chain_str);
			if (first) {
				first = false;
				first_chain = chain;
			}

			if (chain_str == NULL) {
				chain_str = (char *)"Not enough memory!";
				goto do_print;
			}

			chain_str_alloc = chain_str;
		}

		list_for_each_entry(chain, &child->val, list) {
			chain_str = hist_browser__folded_callchain_str(browser,
						chain, value_str, chain_str);
			if (first) {
				first = false;
				first_chain = chain;
			}

			if (chain_str == NULL) {
				chain_str = (char *)"Not enough memory!";
				goto do_print;
			}

			chain_str_alloc = chain_str;
		}

do_print:
		print(browser, first_chain, chain_str, offset, row++, arg);
		free(value_str_alloc);
		free(chain_str_alloc);

next:
		if (is_output_full(browser, row))
			break;
		node = next;
	}

	return row - first_row;
}

863
static int hist_browser__show_callchain_graph(struct hist_browser *browser,
864
					struct rb_root *root, int level,
865
					unsigned short row, u64 total,
866
					u64 parent_total,
867 868 869
					print_callchain_entry_fn print,
					struct callchain_print_arg *arg,
					check_output_full_fn is_output_full)
870 871
{
	struct rb_node *node;
872
	int first_row = row, offset = level * LEVEL_OFFSET_STEP;
873
	bool need_percent;
874 875 876 877
	u64 percent_total = total;

	if (callchain_param.mode == CHAIN_GRAPH_REL)
		percent_total = parent_total;
878

879
	node = rb_first(root);
880
	need_percent = check_percent_display(node, parent_total);
881

882 883 884 885 886 887 888 889 890 891 892
	while (node) {
		struct callchain_node *child = rb_entry(node, struct callchain_node, rb_node);
		struct rb_node *next = rb_next(node);
		struct callchain_list *chain;
		char folded_sign = ' ';
		int first = true;
		int extra_offset = 0;

		list_for_each_entry(chain, &child->val, list) {
			bool was_first = first;

893
			if (first)
894
				first = false;
895
			else if (need_percent)
896 897 898
				extra_offset = LEVEL_OFFSET_STEP;

			folded_sign = callchain_list__folded(chain);
899

900
			row += hist_browser__show_callchain_list(browser, child,
901
							chain, row, percent_total,
902 903 904
							was_first && need_percent,
							offset + extra_offset,
							print, arg);
905

906
			if (is_output_full(browser, row))
907
				goto out;
908

909 910 911 912 913 914 915
			if (folded_sign == '+')
				break;
		}

		if (folded_sign == '-') {
			const int new_level = level + (extra_offset ? 2 : 1);

916
			row += hist_browser__show_callchain_graph(browser, &child->rb_root,
917 918
							    new_level, row, total,
							    child->children_hit,
919
							    print, arg, is_output_full);
920
		}
921
		if (is_output_full(browser, row))
922
			break;
923
		node = next;
924
	}
925
out:
926 927 928
	return row - first_row;
}

929 930 931 932 933 934 935 936
static int hist_browser__show_callchain(struct hist_browser *browser,
					struct hist_entry *entry, int level,
					unsigned short row,
					print_callchain_entry_fn print,
					struct callchain_print_arg *arg,
					check_output_full_fn is_output_full)
{
	u64 total = hists__total_period(entry->hists);
937
	u64 parent_total;
938 939
	int printed;

940 941 942 943
	if (symbol_conf.cumulate_callchain)
		parent_total = entry->stat_acc->period;
	else
		parent_total = entry->stat.period;
944 945 946

	if (callchain_param.mode == CHAIN_FLAT) {
		printed = hist_browser__show_callchain_flat(browser,
947 948 949
						&entry->sorted_chain, row,
						total, parent_total, print, arg,
						is_output_full);
950 951
	} else if (callchain_param.mode == CHAIN_FOLDED) {
		printed = hist_browser__show_callchain_folded(browser,
952 953 954
						&entry->sorted_chain, row,
						total, parent_total, print, arg,
						is_output_full);
955 956
	} else {
		printed = hist_browser__show_callchain_graph(browser,
957 958 959
						&entry->sorted_chain, level, row,
						total, parent_total, print, arg,
						is_output_full);
960 961 962 963 964 965 966 967
	}

	if (arg->is_current_entry)
		browser->he_selection = entry;

	return printed;
}

968 969 970 971 972 973
struct hpp_arg {
	struct ui_browser *b;
	char folded_sign;
	bool current_entry;
};

974 975 976
static int __hpp__slsmg_color_printf(struct perf_hpp *hpp, const char *fmt, ...)
{
	struct hpp_arg *arg = hpp->ptr;
977
	int ret, len;
978 979
	va_list args;
	double percent;
980

981
	va_start(args, fmt);
982
	len = va_arg(args, int);
983 984
	percent = va_arg(args, double);
	va_end(args);
985

986
	ui_browser__set_percent_color(arg->b, percent, arg->current_entry);
987

988
	ret = scnprintf(hpp->buf, hpp->size, fmt, len, percent);
989
	ui_browser__printf(arg->b, "%s", hpp->buf);
990

991
	advance_hpp(hpp, ret);
992 993 994
	return ret;
}

995
#define __HPP_COLOR_PERCENT_FN(_type, _field)				\
996 997 998 999 1000
static u64 __hpp_get_##_field(struct hist_entry *he)			\
{									\
	return he->stat._field;						\
}									\
									\
1001
static int								\
1002
hist_browser__hpp_color_##_type(struct perf_hpp_fmt *fmt,		\
1003 1004
				struct perf_hpp *hpp,			\
				struct hist_entry *he)			\
1005
{									\
1006 1007
	return hpp__fmt(fmt, hpp, he, __hpp_get_##_field, " %*.2f%%",	\
			__hpp__slsmg_color_printf, true);		\
1008 1009
}

1010 1011 1012 1013 1014 1015 1016
#define __HPP_COLOR_ACC_PERCENT_FN(_type, _field)			\
static u64 __hpp_get_acc_##_field(struct hist_entry *he)		\
{									\
	return he->stat_acc->_field;					\
}									\
									\
static int								\
1017
hist_browser__hpp_color_##_type(struct perf_hpp_fmt *fmt,		\
1018 1019 1020 1021
				struct perf_hpp *hpp,			\
				struct hist_entry *he)			\
{									\
	if (!symbol_conf.cumulate_callchain) {				\
1022
		struct hpp_arg *arg = hpp->ptr;				\
1023
		int len = fmt->user_len ?: fmt->len;			\
1024
		int ret = scnprintf(hpp->buf, hpp->size,		\
1025
				    "%*s", len, "N/A");			\
1026
		ui_browser__printf(arg->b, "%s", hpp->buf);		\
1027 1028 1029
									\
		return ret;						\
	}								\
1030 1031
	return hpp__fmt(fmt, hpp, he, __hpp_get_acc_##_field,		\
			" %*.2f%%", __hpp__slsmg_color_printf, true);	\
1032 1033
}

1034 1035 1036 1037 1038
__HPP_COLOR_PERCENT_FN(overhead, period)
__HPP_COLOR_PERCENT_FN(overhead_sys, period_sys)
__HPP_COLOR_PERCENT_FN(overhead_us, period_us)
__HPP_COLOR_PERCENT_FN(overhead_guest_sys, period_guest_sys)
__HPP_COLOR_PERCENT_FN(overhead_guest_us, period_guest_us)
1039
__HPP_COLOR_ACC_PERCENT_FN(overhead_acc, period)
1040

1041
#undef __HPP_COLOR_PERCENT_FN
1042
#undef __HPP_COLOR_ACC_PERCENT_FN
1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055

void hist_browser__init_hpp(void)
{
	perf_hpp__format[PERF_HPP__OVERHEAD].color =
				hist_browser__hpp_color_overhead;
	perf_hpp__format[PERF_HPP__OVERHEAD_SYS].color =
				hist_browser__hpp_color_overhead_sys;
	perf_hpp__format[PERF_HPP__OVERHEAD_US].color =
				hist_browser__hpp_color_overhead_us;
	perf_hpp__format[PERF_HPP__OVERHEAD_GUEST_SYS].color =
				hist_browser__hpp_color_overhead_guest_sys;
	perf_hpp__format[PERF_HPP__OVERHEAD_GUEST_US].color =
				hist_browser__hpp_color_overhead_guest_us;
1056 1057
	perf_hpp__format[PERF_HPP__OVERHEAD_ACC].color =
				hist_browser__hpp_color_overhead_acc;
1058 1059
}

1060
static int hist_browser__show_entry(struct hist_browser *browser,
1061 1062 1063
				    struct hist_entry *entry,
				    unsigned short row)
{
1064
	int printed = 0;
1065
	int width = browser->b.width;
1066
	char folded_sign = ' ';
1067
	bool current_entry = ui_browser__is_current_entry(&browser->b, row);
1068
	off_t row_offset = entry->row_offset;
1069
	bool first = true;
1070
	struct perf_hpp_fmt *fmt;
1071 1072

	if (current_entry) {
1073 1074
		browser->he_selection = entry;
		browser->selection = &entry->ms;
1075 1076 1077
	}

	if (symbol_conf.use_callchain) {
1078
		hist_entry__init_have_children(entry);
1079 1080 1081 1082
		folded_sign = hist_entry__folded(entry);
	}

	if (row_offset == 0) {
1083
		struct hpp_arg arg = {
1084
			.b		= &browser->b,
1085 1086 1087
			.folded_sign	= folded_sign,
			.current_entry	= current_entry,
		};
1088
		int column = 0;
1089

1090
		hist_browser__gotorc(browser, row, 0);
1091

1092
		hists__for_each_format(browser->hists, fmt) {
1093 1094 1095 1096 1097 1098 1099
			char s[2048];
			struct perf_hpp hpp = {
				.buf	= s,
				.size	= sizeof(s),
				.ptr	= &arg,
			};

1100 1101
			if (perf_hpp__should_skip(fmt, entry->hists) ||
			    column++ < browser->b.horiz_scroll)
1102 1103
				continue;

1104 1105 1106 1107 1108 1109 1110 1111 1112 1113
			if (current_entry && browser->b.navkeypressed) {
				ui_browser__set_color(&browser->b,
						      HE_COLORSET_SELECTED);
			} else {
				ui_browser__set_color(&browser->b,
						      HE_COLORSET_NORMAL);
			}

			if (first) {
				if (symbol_conf.use_callchain) {
1114
					ui_browser__printf(&browser->b, "%c ", folded_sign);
1115 1116 1117 1118
					width -= 2;
				}
				first = false;
			} else {
1119
				ui_browser__printf(&browser->b, "  ");
1120 1121
				width -= 2;
			}
1122

1123
			if (fmt->color) {
1124 1125 1126 1127 1128 1129 1130
				int ret = fmt->color(fmt, &hpp, entry);
				hist_entry__snprintf_alignment(entry, &hpp, fmt, ret);
				/*
				 * fmt->color() already used ui_browser to
				 * print the non alignment bits, skip it (+ret):
				 */
				ui_browser__printf(&browser->b, "%s", s + ret);
1131
			} else {
1132
				hist_entry__snprintf_alignment(entry, &hpp, fmt, fmt->entry(fmt, &hpp, entry));
1133
				ui_browser__printf(&browser->b, "%s", s);
1134
			}
1135
			width -= hpp.buf - s;
1136 1137
		}

1138 1139 1140 1141
		/* The scroll bar isn't being used */
		if (!browser->b.navkeypressed)
			width += 1;

1142
		ui_browser__write_nstring(&browser->b, "", width);
1143

1144 1145 1146 1147 1148
		++row;
		++printed;
	} else
		--row_offset;

1149
	if (folded_sign == '-' && row != browser->b.rows) {
1150 1151 1152 1153
		struct callchain_print_arg arg = {
			.row_offset = row_offset,
			.is_current_entry = current_entry,
		};
1154

1155
		printed += hist_browser__show_callchain(browser, entry, 1, row,
1156 1157
					hist_browser__show_callchain_entry, &arg,
					hist_browser__check_output_full);
1158 1159 1160 1161 1162
	}

	return printed;
}

1163 1164 1165 1166 1167 1168
static int advance_hpp_check(struct perf_hpp *hpp, int inc)
{
	advance_hpp(hpp, inc);
	return hpp->size <= 0;
}

1169
static int hists_browser__scnprintf_headers(struct hist_browser *browser, char *buf, size_t size)
1170
{
1171
	struct hists *hists = browser->hists;
1172 1173 1174 1175 1176 1177
	struct perf_hpp dummy_hpp = {
		.buf    = buf,
		.size   = size,
	};
	struct perf_hpp_fmt *fmt;
	size_t ret = 0;
1178
	int column = 0;
1179 1180 1181 1182 1183 1184 1185

	if (symbol_conf.use_callchain) {
		ret = scnprintf(buf, size, "  ");
		if (advance_hpp_check(&dummy_hpp, ret))
			return ret;
	}

1186
	hists__for_each_format(browser->hists, fmt) {
1187
		if (perf_hpp__should_skip(fmt, hists)  || column++ < browser->b.horiz_scroll)
1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201
			continue;

		ret = fmt->header(fmt, &dummy_hpp, hists_to_evsel(hists));
		if (advance_hpp_check(&dummy_hpp, ret))
			break;

		ret = scnprintf(dummy_hpp.buf, dummy_hpp.size, "  ");
		if (advance_hpp_check(&dummy_hpp, ret))
			break;
	}

	return ret;
}

1202 1203
static void hist_browser__show_headers(struct hist_browser *browser)
{
1204 1205
	char headers[1024];

1206
	hists_browser__scnprintf_headers(browser, headers, sizeof(headers));
1207 1208
	ui_browser__gotorc(&browser->b, 0, 0);
	ui_browser__set_color(&browser->b, HE_COLORSET_ROOT);
1209
	ui_browser__write_nstring(&browser->b, headers, browser->b.width + 1);
1210 1211
}

1212 1213 1214 1215 1216 1217 1218 1219 1220 1221
static void ui_browser__hists_init_top(struct ui_browser *browser)
{
	if (browser->top == NULL) {
		struct hist_browser *hb;

		hb = container_of(browser, struct hist_browser, b);
		browser->top = rb_first(&hb->hists->entries);
	}
}

1222
static unsigned int hist_browser__refresh(struct ui_browser *browser)
1223 1224
{
	unsigned row = 0;
1225
	u16 header_offset = 0;
1226
	struct rb_node *nd;
1227
	struct hist_browser *hb = container_of(browser, struct hist_browser, b);
1228

1229 1230 1231 1232 1233
	if (hb->show_headers) {
		hist_browser__show_headers(hb);
		header_offset = 1;
	}

1234
	ui_browser__hists_init_top(browser);
1235 1236
	hb->he_selection = NULL;
	hb->selection = NULL;
1237

1238
	for (nd = browser->top; nd; nd = rb_next(nd)) {
1239
		struct hist_entry *h = rb_entry(nd, struct hist_entry, rb_node);
1240
		float percent;
1241 1242 1243 1244

		if (h->filtered)
			continue;

1245
		percent = hist_entry__get_percent_limit(h);
1246 1247 1248
		if (percent < hb->min_pcnt)
			continue;

1249
		row += hist_browser__show_entry(hb, h, row);
1250
		if (row == browser->rows)
1251 1252 1253
			break;
	}

1254
	return row + header_offset;
1255 1256
}

1257 1258
static struct rb_node *hists__filter_entries(struct rb_node *nd,
					     float min_pcnt)
1259 1260 1261
{
	while (nd != NULL) {
		struct hist_entry *h = rb_entry(nd, struct hist_entry, rb_node);
1262
		float percent = hist_entry__get_percent_limit(h);
1263

1264
		if (!h->filtered && percent >= min_pcnt)
1265 1266 1267 1268 1269 1270 1271 1272
			return nd;

		nd = rb_next(nd);
	}

	return NULL;
}

1273 1274
static struct rb_node *hists__filter_prev_entries(struct rb_node *nd,
						  float min_pcnt)
1275 1276 1277
{
	while (nd != NULL) {
		struct hist_entry *h = rb_entry(nd, struct hist_entry, rb_node);
1278
		float percent = hist_entry__get_percent_limit(h);
1279 1280

		if (!h->filtered && percent >= min_pcnt)
1281 1282 1283 1284 1285 1286 1287 1288
			return nd;

		nd = rb_prev(nd);
	}

	return NULL;
}

1289
static void ui_browser__hists_seek(struct ui_browser *browser,
1290 1291 1292 1293 1294
				   off_t offset, int whence)
{
	struct hist_entry *h;
	struct rb_node *nd;
	bool first = true;
1295 1296 1297
	struct hist_browser *hb;

	hb = container_of(browser, struct hist_browser, b);
1298

1299
	if (browser->nr_entries == 0)
1300 1301
		return;

1302
	ui_browser__hists_init_top(browser);
1303

1304 1305
	switch (whence) {
	case SEEK_SET:
1306
		nd = hists__filter_entries(rb_first(browser->entries),
1307
					   hb->min_pcnt);
1308 1309
		break;
	case SEEK_CUR:
1310
		nd = browser->top;
1311 1312
		goto do_offset;
	case SEEK_END:
1313
		nd = hists__filter_prev_entries(rb_last(browser->entries),
1314
						hb->min_pcnt);
1315 1316 1317 1318 1319 1320 1321 1322 1323 1324
		first = false;
		break;
	default:
		return;
	}

	/*
	 * Moves not relative to the first visible entry invalidates its
	 * row_offset:
	 */
1325
	h = rb_entry(browser->top, struct hist_entry, rb_node);
1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341
	h->row_offset = 0;

	/*
	 * Here we have to check if nd is expanded (+), if it is we can't go
	 * the next top level hist_entry, instead we must compute an offset of
	 * what _not_ to show and not change the first visible entry.
	 *
	 * This offset increments when we are going from top to bottom and
	 * decreases when we're going from bottom to top.
	 *
	 * As we don't have backpointers to the top level in the callchains
	 * structure, we need to always print the whole hist_entry callchain,
	 * skipping the first ones that are before the first visible entry
	 * and stop when we printed enough lines to fill the screen.
	 */
do_offset:
1342 1343 1344
	if (!nd)
		return;

1345 1346 1347
	if (offset > 0) {
		do {
			h = rb_entry(nd, struct hist_entry, rb_node);
1348
			if (h->unfolded) {
1349 1350 1351 1352 1353 1354 1355
				u16 remaining = h->nr_rows - h->row_offset;
				if (offset > remaining) {
					offset -= remaining;
					h->row_offset = 0;
				} else {
					h->row_offset += offset;
					offset = 0;
1356
					browser->top = nd;
1357 1358 1359
					break;
				}
			}
1360
			nd = hists__filter_entries(rb_next(nd), hb->min_pcnt);
1361 1362 1363
			if (nd == NULL)
				break;
			--offset;
1364
			browser->top = nd;
1365 1366 1367 1368
		} while (offset != 0);
	} else if (offset < 0) {
		while (1) {
			h = rb_entry(nd, struct hist_entry, rb_node);
1369
			if (h->unfolded) {
1370 1371 1372 1373 1374 1375 1376
				if (first) {
					if (-offset > h->row_offset) {
						offset += h->row_offset;
						h->row_offset = 0;
					} else {
						h->row_offset += offset;
						offset = 0;
1377
						browser->top = nd;
1378 1379 1380 1381 1382 1383 1384 1385 1386
						break;
					}
				} else {
					if (-offset > h->nr_rows) {
						offset += h->nr_rows;
						h->row_offset = 0;
					} else {
						h->row_offset = h->nr_rows + offset;
						offset = 0;
1387
						browser->top = nd;
1388 1389 1390 1391 1392
						break;
					}
				}
			}

1393
			nd = hists__filter_prev_entries(rb_prev(nd),
1394
							hb->min_pcnt);
1395 1396 1397
			if (nd == NULL)
				break;
			++offset;
1398
			browser->top = nd;
1399 1400 1401 1402 1403 1404 1405
			if (offset == 0) {
				/*
				 * Last unfiltered hist_entry, check if it is
				 * unfolded, if it is then we should have
				 * row_offset at its last entry.
				 */
				h = rb_entry(nd, struct hist_entry, rb_node);
1406
				if (h->unfolded)
1407 1408 1409 1410 1411 1412
					h->row_offset = h->nr_rows;
				break;
			}
			first = false;
		}
	} else {
1413
		browser->top = nd;
1414 1415 1416 1417 1418
		h = rb_entry(nd, struct hist_entry, rb_node);
		h->row_offset = 0;
	}
}

1419
static int hist_browser__fprintf_callchain(struct hist_browser *browser,
1420
					   struct hist_entry *he, FILE *fp)
1421
{
1422 1423 1424
	struct callchain_print_arg arg  = {
		.fp = fp,
	};
1425

1426
	hist_browser__show_callchain(browser, he, 1, 0,
1427 1428 1429
				     hist_browser__fprintf_callchain_entry, &arg,
				     hist_browser__check_dump_full);
	return arg.printed;
1430 1431 1432 1433 1434 1435 1436 1437
}

static int hist_browser__fprintf_entry(struct hist_browser *browser,
				       struct hist_entry *he, FILE *fp)
{
	char s[8192];
	int printed = 0;
	char folded_sign = ' ';
1438 1439 1440 1441 1442 1443 1444
	struct perf_hpp hpp = {
		.buf = s,
		.size = sizeof(s),
	};
	struct perf_hpp_fmt *fmt;
	bool first = true;
	int ret;
1445 1446 1447 1448 1449 1450 1451

	if (symbol_conf.use_callchain)
		folded_sign = hist_entry__folded(he);

	if (symbol_conf.use_callchain)
		printed += fprintf(fp, "%c ", folded_sign);

1452
	hists__for_each_format(browser->hists, fmt) {
1453
		if (perf_hpp__should_skip(fmt, he->hists))
1454 1455
			continue;

1456 1457 1458 1459 1460
		if (!first) {
			ret = scnprintf(hpp.buf, hpp.size, "  ");
			advance_hpp(&hpp, ret);
		} else
			first = false;
1461

1462
		ret = fmt->entry(fmt, &hpp, he);
1463
		ret = hist_entry__snprintf_alignment(he, &hpp, fmt, ret);
1464 1465
		advance_hpp(&hpp, ret);
	}
1466
	printed += fprintf(fp, "%s\n", s);
1467 1468

	if (folded_sign == '-')
1469
		printed += hist_browser__fprintf_callchain(browser, he, fp);
1470 1471 1472 1473 1474 1475

	return printed;
}

static int hist_browser__fprintf(struct hist_browser *browser, FILE *fp)
{
1476 1477
	struct rb_node *nd = hists__filter_entries(rb_first(browser->b.entries),
						   browser->min_pcnt);
1478 1479 1480 1481 1482 1483
	int printed = 0;

	while (nd) {
		struct hist_entry *h = rb_entry(nd, struct hist_entry, rb_node);

		printed += hist_browser__fprintf_entry(browser, h, fp);
1484
		nd = hists__filter_entries(rb_next(nd), browser->min_pcnt);
1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510
	}

	return printed;
}

static int hist_browser__dump(struct hist_browser *browser)
{
	char filename[64];
	FILE *fp;

	while (1) {
		scnprintf(filename, sizeof(filename), "perf.hist.%d", browser->print_seq);
		if (access(filename, F_OK))
			break;
		/*
 		 * XXX: Just an arbitrary lazy upper limit
 		 */
		if (++browser->print_seq == 8192) {
			ui_helpline__fpush("Too many perf.hist.N files, nothing written!");
			return -1;
		}
	}

	fp = fopen(filename, "w");
	if (fp == NULL) {
		char bf[64];
1511 1512
		const char *err = strerror_r(errno, bf, sizeof(bf));
		ui_helpline__fpush("Couldn't write to %s: %s", filename, err);
1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523
		return -1;
	}

	++browser->print_seq;
	hist_browser__fprintf(browser, fp);
	fclose(fp);
	ui_helpline__fpush("%s written!", filename);

	return 0;
}

1524
static struct hist_browser *hist_browser__new(struct hists *hists,
1525
					      struct hist_browser_timer *hbt,
1526
					      struct perf_env *env)
1527
{
1528
	struct hist_browser *browser = zalloc(sizeof(*browser));
1529

1530 1531 1532
	if (browser) {
		browser->hists = hists;
		browser->b.refresh = hist_browser__refresh;
1533
		browser->b.refresh_dimensions = hist_browser__refresh_dimensions;
1534 1535
		browser->b.seek = ui_browser__hists_seek;
		browser->b.use_navkeypressed = true;
1536
		browser->show_headers = symbol_conf.show_hist_headers;
1537
		browser->hbt = hbt;
1538
		browser->env = env;
1539 1540
	}

1541
	return browser;
1542 1543
}

1544
static void hist_browser__delete(struct hist_browser *browser)
1545
{
1546
	free(browser);
1547 1548
}

1549
static struct hist_entry *hist_browser__selected_entry(struct hist_browser *browser)
1550
{
1551
	return browser->he_selection;
1552 1553
}

1554
static struct thread *hist_browser__selected_thread(struct hist_browser *browser)
1555
{
1556
	return browser->he_selection->thread;
1557 1558
}

1559 1560 1561 1562 1563 1564 1565 1566 1567
/* Check whether the browser is for 'top' or 'report' */
static inline bool is_report_browser(void *timer)
{
	return timer == NULL;
}

static int hists__browser_title(struct hists *hists,
				struct hist_browser_timer *hbt,
				char *bf, size_t size)
1568
{
1569 1570
	char unit;
	int printed;
1571 1572
	const struct dso *dso = hists->dso_filter;
	const struct thread *thread = hists->thread_filter;
1573
	int socket_id = hists->socket_filter;
1574 1575
	unsigned long nr_samples = hists->stats.nr_events[PERF_RECORD_SAMPLE];
	u64 nr_events = hists->stats.total_period;
1576
	struct perf_evsel *evsel = hists_to_evsel(hists);
1577
	const char *ev_name = perf_evsel__name(evsel);
1578 1579
	char buf[512];
	size_t buflen = sizeof(buf);
1580 1581
	char ref[30] = " show reference callgraph, ";
	bool enable_ref = false;
1582

1583 1584 1585 1586 1587
	if (symbol_conf.filter_relative) {
		nr_samples = hists->stats.nr_non_filtered_samples;
		nr_events = hists->stats.total_non_filtered_period;
	}

1588
	if (perf_evsel__is_group_event(evsel)) {
1589 1590 1591 1592 1593 1594
		struct perf_evsel *pos;

		perf_evsel__group_desc(evsel, buf, buflen);
		ev_name = buf;

		for_each_group_member(pos, evsel) {
1595 1596
			struct hists *pos_hists = evsel__hists(pos);

1597
			if (symbol_conf.filter_relative) {
1598 1599
				nr_samples += pos_hists->stats.nr_non_filtered_samples;
				nr_events += pos_hists->stats.total_non_filtered_period;
1600
			} else {
1601 1602
				nr_samples += pos_hists->stats.nr_events[PERF_RECORD_SAMPLE];
				nr_events += pos_hists->stats.total_period;
1603
			}
1604 1605
		}
	}
1606

1607 1608 1609
	if (symbol_conf.show_ref_callgraph &&
	    strstr(ev_name, "call-graph=no"))
		enable_ref = true;
1610 1611
	nr_samples = convert_unit(nr_samples, &unit);
	printed = scnprintf(bf, size,
1612 1613
			   "Samples: %lu%c of event '%s',%sEvent count (approx.): %" PRIu64,
			   nr_samples, unit, ev_name, enable_ref ? ref : " ", nr_events);
1614

1615

1616
	if (hists->uid_filter_str)
1617
		printed += snprintf(bf + printed, size - printed,
1618
				    ", UID: %s", hists->uid_filter_str);
1619
	if (thread)
1620
		printed += scnprintf(bf + printed, size - printed,
1621
				    ", Thread: %s(%d)",
1622
				     (thread->comm_set ? thread__comm_str(thread) : ""),
1623
				    thread->tid);
1624
	if (dso)
1625
		printed += scnprintf(bf + printed, size - printed,
1626
				    ", DSO: %s", dso->short_name);
1627
	if (socket_id > -1)
1628
		printed += scnprintf(bf + printed, size - printed,
1629
				    ", Processor Socket: %d", socket_id);
1630 1631 1632 1633 1634 1635 1636
	if (!is_report_browser(hbt)) {
		struct perf_top *top = hbt->arg;

		if (top->zero)
			printed += scnprintf(bf + printed, size - printed, " [z]");
	}

1637
	return printed;
1638 1639
}

1640 1641 1642 1643
static inline void free_popup_options(char **options, int n)
{
	int i;

1644 1645
	for (i = 0; i < n; ++i)
		zfree(&options[i]);
1646 1647
}

1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697
/*
 * Only runtime switching of perf data file will make "input_name" point
 * to a malloced buffer. So add "is_input_name_malloced" flag to decide
 * whether we need to call free() for current "input_name" during the switch.
 */
static bool is_input_name_malloced = false;

static int switch_data_file(void)
{
	char *pwd, *options[32], *abs_path[32], *tmp;
	DIR *pwd_dir;
	int nr_options = 0, choice = -1, ret = -1;
	struct dirent *dent;

	pwd = getenv("PWD");
	if (!pwd)
		return ret;

	pwd_dir = opendir(pwd);
	if (!pwd_dir)
		return ret;

	memset(options, 0, sizeof(options));
	memset(options, 0, sizeof(abs_path));

	while ((dent = readdir(pwd_dir))) {
		char path[PATH_MAX];
		u64 magic;
		char *name = dent->d_name;
		FILE *file;

		if (!(dent->d_type == DT_REG))
			continue;

		snprintf(path, sizeof(path), "%s/%s", pwd, name);

		file = fopen(path, "r");
		if (!file)
			continue;

		if (fread(&magic, 1, 8, file) < 8)
			goto close_file_and_continue;

		if (is_perf_magic(magic)) {
			options[nr_options] = strdup(name);
			if (!options[nr_options])
				goto close_file_and_continue;

			abs_path[nr_options] = strdup(path);
			if (!abs_path[nr_options]) {
1698
				zfree(&options[nr_options]);
1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736
				ui__warning("Can't search all data files due to memory shortage.\n");
				fclose(file);
				break;
			}

			nr_options++;
		}

close_file_and_continue:
		fclose(file);
		if (nr_options >= 32) {
			ui__warning("Too many perf data files in PWD!\n"
				    "Only the first 32 files will be listed.\n");
			break;
		}
	}
	closedir(pwd_dir);

	if (nr_options) {
		choice = ui__popup_menu(nr_options, options);
		if (choice < nr_options && choice >= 0) {
			tmp = strdup(abs_path[choice]);
			if (tmp) {
				if (is_input_name_malloced)
					free((void *)input_name);
				input_name = tmp;
				is_input_name_malloced = true;
				ret = 0;
			} else
				ui__warning("Data switch failed due to memory shortage!\n");
		}
	}

	free_popup_options(options, nr_options);
	free_popup_options(abs_path, nr_options);
	return ret;
}

1737 1738 1739
struct popup_action {
	struct thread 		*thread;
	struct map_symbol 	ms;
1740
	int			socket;
1741 1742 1743 1744

	int (*fn)(struct hist_browser *browser, struct popup_action *act);
};

1745
static int
1746
do_annotate(struct hist_browser *browser, struct popup_action *act)
1747 1748 1749 1750 1751 1752
{
	struct perf_evsel *evsel;
	struct annotation *notes;
	struct hist_entry *he;
	int err;

1753
	if (!objdump_path && perf_env__lookup_objdump(browser->env))
1754 1755
		return 0;

1756
	notes = symbol__annotation(act->ms.sym);
1757 1758 1759 1760
	if (!notes->src)
		return 0;

	evsel = hists_to_evsel(browser->hists);
1761
	err = map_symbol__tui_annotate(&act->ms, evsel, browser->hbt);
1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776
	he = hist_browser__selected_entry(browser);
	/*
	 * offer option to annotate the other branch source or target
	 * (if they exists) when returning from annotate
	 */
	if ((err == 'q' || err == CTRL('c')) && he->branch_info)
		return 1;

	ui_browser__update_nr_entries(&browser->b, browser->hists->nr_entries);
	if (err)
		ui_browser__handle_resize(&browser->b);
	return 0;
}

static int
1777 1778 1779
add_annotate_opt(struct hist_browser *browser __maybe_unused,
		 struct popup_action *act, char **optstr,
		 struct map *map, struct symbol *sym)
1780
{
1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797
	if (sym == NULL || map->dso->annotate_warned)
		return 0;

	if (asprintf(optstr, "Annotate %s", sym->name) < 0)
		return 0;

	act->ms.map = map;
	act->ms.sym = sym;
	act->fn = do_annotate;
	return 1;
}

static int
do_zoom_thread(struct hist_browser *browser, struct popup_action *act)
{
	struct thread *thread = act->thread;

1798 1799 1800 1801 1802 1803
	if (browser->hists->thread_filter) {
		pstack__remove(browser->pstack, &browser->hists->thread_filter);
		perf_hpp__set_elide(HISTC_THREAD, false);
		thread__zput(browser->hists->thread_filter);
		ui_helpline__pop();
	} else {
1804
		ui_helpline__fpush("To zoom out press ESC or ENTER + \"Zoom out of %s(%d) thread\"",
1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817
				   thread->comm_set ? thread__comm_str(thread) : "",
				   thread->tid);
		browser->hists->thread_filter = thread__get(thread);
		perf_hpp__set_elide(HISTC_THREAD, false);
		pstack__push(browser->pstack, &browser->hists->thread_filter);
	}

	hists__filter_by_thread(browser->hists);
	hist_browser__reset(browser);
	return 0;
}

static int
1818 1819 1820
add_thread_opt(struct hist_browser *browser, struct popup_action *act,
	       char **optstr, struct thread *thread)
{
1821
	if (!sort__has_thread || thread == NULL)
1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836
		return 0;

	if (asprintf(optstr, "Zoom %s %s(%d) thread",
		     browser->hists->thread_filter ? "out of" : "into",
		     thread->comm_set ? thread__comm_str(thread) : "",
		     thread->tid) < 0)
		return 0;

	act->thread = thread;
	act->fn = do_zoom_thread;
	return 1;
}

static int
do_zoom_dso(struct hist_browser *browser, struct popup_action *act)
1837
{
1838
	struct map *map = act->ms.map;
1839

1840 1841 1842 1843 1844 1845
	if (browser->hists->dso_filter) {
		pstack__remove(browser->pstack, &browser->hists->dso_filter);
		perf_hpp__set_elide(HISTC_DSO, false);
		browser->hists->dso_filter = NULL;
		ui_helpline__pop();
	} else {
1846
		if (map == NULL)
1847
			return 0;
1848
		ui_helpline__fpush("To zoom out press ESC or ENTER + \"Zoom out of %s DSO\"",
1849 1850
				   __map__is_kernel(map) ? "the Kernel" : map->dso->short_name);
		browser->hists->dso_filter = map->dso;
1851 1852 1853 1854 1855 1856 1857 1858 1859 1860
		perf_hpp__set_elide(HISTC_DSO, true);
		pstack__push(browser->pstack, &browser->hists->dso_filter);
	}

	hists__filter_by_dso(browser->hists);
	hist_browser__reset(browser);
	return 0;
}

static int
1861
add_dso_opt(struct hist_browser *browser, struct popup_action *act,
1862
	    char **optstr, struct map *map)
1863
{
1864
	if (!sort__has_dso || map == NULL)
1865 1866 1867 1868
		return 0;

	if (asprintf(optstr, "Zoom %s %s DSO",
		     browser->hists->dso_filter ? "out of" : "into",
1869
		     __map__is_kernel(map) ? "the Kernel" : map->dso->short_name) < 0)
1870 1871
		return 0;

1872
	act->ms.map = map;
1873 1874 1875 1876 1877 1878 1879 1880 1881
	act->fn = do_zoom_dso;
	return 1;
}

static int
do_browse_map(struct hist_browser *browser __maybe_unused,
	      struct popup_action *act)
{
	map__browse(act->ms.map);
1882 1883 1884
	return 0;
}

1885 1886 1887 1888
static int
add_map_opt(struct hist_browser *browser __maybe_unused,
	    struct popup_action *act, char **optstr, struct map *map)
{
1889
	if (!sort__has_dso || map == NULL)
1890 1891 1892 1893 1894 1895 1896 1897 1898 1899
		return 0;

	if (asprintf(optstr, "Browse map details") < 0)
		return 0;

	act->ms.map = map;
	act->fn = do_browse_map;
	return 1;
}

1900 1901
static int
do_run_script(struct hist_browser *browser __maybe_unused,
1902
	      struct popup_action *act)
1903 1904 1905 1906
{
	char script_opt[64];
	memset(script_opt, 0, sizeof(script_opt));

1907
	if (act->thread) {
1908
		scnprintf(script_opt, sizeof(script_opt), " -c %s ",
1909 1910
			  thread__comm_str(act->thread));
	} else if (act->ms.sym) {
1911
		scnprintf(script_opt, sizeof(script_opt), " -S %s ",
1912
			  act->ms.sym->name);
1913 1914 1915 1916 1917 1918 1919
	}

	script_browse(script_opt);
	return 0;
}

static int
1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945
add_script_opt(struct hist_browser *browser __maybe_unused,
	       struct popup_action *act, char **optstr,
	       struct thread *thread, struct symbol *sym)
{
	if (thread) {
		if (asprintf(optstr, "Run scripts for samples of thread [%s]",
			     thread__comm_str(thread)) < 0)
			return 0;
	} else if (sym) {
		if (asprintf(optstr, "Run scripts for samples of symbol [%s]",
			     sym->name) < 0)
			return 0;
	} else {
		if (asprintf(optstr, "Run scripts for all samples") < 0)
			return 0;
	}

	act->thread = thread;
	act->ms.sym = sym;
	act->fn = do_run_script;
	return 1;
}

static int
do_switch_data(struct hist_browser *browser __maybe_unused,
	       struct popup_action *act __maybe_unused)
1946 1947 1948 1949
{
	if (switch_data_file()) {
		ui__warning("Won't switch the data files due to\n"
			    "no valid data file get selected!\n");
1950
		return 0;
1951 1952 1953 1954 1955
	}

	return K_SWITCH_INPUT_DATA;
}

1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986 1987
static int
add_switch_opt(struct hist_browser *browser,
	       struct popup_action *act, char **optstr)
{
	if (!is_report_browser(browser->hbt))
		return 0;

	if (asprintf(optstr, "Switch to another data file in PWD") < 0)
		return 0;

	act->fn = do_switch_data;
	return 1;
}

static int
do_exit_browser(struct hist_browser *browser __maybe_unused,
		struct popup_action *act __maybe_unused)
{
	return 0;
}

static int
add_exit_opt(struct hist_browser *browser __maybe_unused,
	     struct popup_action *act, char **optstr)
{
	if (asprintf(optstr, "Exit") < 0)
		return 0;

	act->fn = do_exit_browser;
	return 1;
}

1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009
static int
do_zoom_socket(struct hist_browser *browser, struct popup_action *act)
{
	if (browser->hists->socket_filter > -1) {
		pstack__remove(browser->pstack, &browser->hists->socket_filter);
		browser->hists->socket_filter = -1;
		perf_hpp__set_elide(HISTC_SOCKET, false);
	} else {
		browser->hists->socket_filter = act->socket;
		perf_hpp__set_elide(HISTC_SOCKET, true);
		pstack__push(browser->pstack, &browser->hists->socket_filter);
	}

	hists__filter_by_socket(browser->hists);
	hist_browser__reset(browser);
	return 0;
}

static int
add_socket_opt(struct hist_browser *browser, struct popup_action *act,
	       char **optstr, int socket_id)
{
2010
	if (!sort__has_socket || socket_id < 0)
2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022
		return 0;

	if (asprintf(optstr, "Zoom %s Processor Socket %d",
		     (browser->hists->socket_filter > -1) ? "out of" : "into",
		     socket_id) < 0)
		return 0;

	act->socket = socket_id;
	act->fn = do_zoom_socket;
	return 1;
}

2023
static void hist_browser__update_nr_entries(struct hist_browser *hb)
2024 2025 2026 2027
{
	u64 nr_entries = 0;
	struct rb_node *nd = rb_first(&hb->hists->entries);

2028 2029 2030 2031 2032
	if (hb->min_pcnt == 0) {
		hb->nr_non_filtered_entries = hb->hists->nr_non_filtered_entries;
		return;
	}

2033
	while ((nd = hists__filter_entries(nd, hb->min_pcnt)) != NULL) {
2034
		nr_entries++;
2035
		nd = rb_next(nd);
2036 2037
	}

2038
	hb->nr_non_filtered_entries = nr_entries;
2039
}
2040

2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074 2075 2076
static void hist_browser__update_percent_limit(struct hist_browser *hb,
					       double percent)
{
	struct hist_entry *he;
	struct rb_node *nd = rb_first(&hb->hists->entries);
	u64 total = hists__total_period(hb->hists);
	u64 min_callchain_hits = total * (percent / 100);

	hb->min_pcnt = callchain_param.min_percent = percent;

	if (!symbol_conf.use_callchain)
		return;

	while ((nd = hists__filter_entries(nd, hb->min_pcnt)) != NULL) {
		he = rb_entry(nd, struct hist_entry, rb_node);

		if (callchain_param.mode == CHAIN_GRAPH_REL) {
			total = he->stat.period;

			if (symbol_conf.cumulate_callchain)
				total = he->stat_acc->period;

			min_callchain_hits = total * (percent / 100);
		}

		callchain_param.sort(&he->sorted_chain, he->callchain,
				     min_callchain_hits, &callchain_param);

		/* force to re-evaluate folding state of callchains */
		he->init_have_children = false;
		hist_entry__set_folding(he, false);

		nd = rb_next(nd);
	}
}

2077
static int perf_evsel__hists_browse(struct perf_evsel *evsel, int nr_events,
2078
				    const char *helpline,
2079
				    bool left_exits,
2080
				    struct hist_browser_timer *hbt,
2081
				    float min_pcnt,
2082
				    struct perf_env *env)
2083
{
2084
	struct hists *hists = evsel__hists(evsel);
2085
	struct hist_browser *browser = hist_browser__new(hists, hbt, env);
2086
	struct branch_info *bi;
2087 2088
#define MAX_OPTIONS  16
	char *options[MAX_OPTIONS];
2089
	struct popup_action actions[MAX_OPTIONS];
2090
	int nr_options = 0;
2091
	int key = -1;
2092
	char buf[64];
2093
	int delay_secs = hbt ? hbt->refresh : 0;
2094
	struct perf_hpp_fmt *fmt;
2095

2096 2097 2098 2099 2100 2101 2102 2103
#define HIST_BROWSER_HELP_COMMON					\
	"h/?/F1        Show this window\n"				\
	"UP/DOWN/PGUP\n"						\
	"PGDN/SPACE    Navigate\n"					\
	"q/ESC/CTRL+C  Exit browser\n\n"				\
	"For multiple event sessions:\n\n"				\
	"TAB/UNTAB     Switch events\n\n"				\
	"For symbolic views (--sort has sym):\n\n"			\
2104 2105
	"ENTER         Zoom into DSO/Threads & Annotate current symbol\n" \
	"ESC           Zoom out\n"					\
2106 2107 2108 2109
	"a             Annotate current symbol\n"			\
	"C             Collapse all callchains\n"			\
	"d             Zoom into current DSO\n"				\
	"E             Expand all callchains\n"				\
2110
	"F             Toggle percentage of filtered entries\n"		\
2111
	"H             Display column headers\n"			\
2112
	"L             Change percent limit\n"				\
2113
	"m             Display context menu\n"				\
2114
	"S             Zoom into current Processor Socket\n"		\
2115 2116 2117

	/* help messages are sorted by lexical order of the hotkey */
	const char report_help[] = HIST_BROWSER_HELP_COMMON
2118
	"i             Show header information\n"
2119 2120 2121 2122 2123 2124 2125 2126 2127 2128
	"P             Print histograms to perf.hist.N\n"
	"r             Run available scripts\n"
	"s             Switch to another data file in PWD\n"
	"t             Zoom into current Thread\n"
	"V             Verbose (DSO names in callchains, etc)\n"
	"/             Filter symbol by name";
	const char top_help[] = HIST_BROWSER_HELP_COMMON
	"P             Print histograms to perf.hist.N\n"
	"t             Zoom into current Thread\n"
	"V             Verbose (DSO names in callchains, etc)\n"
2129
	"z             Toggle zeroing of samples\n"
2130
	"f             Enable/Disable events\n"
2131 2132
	"/             Filter symbol by name";

2133 2134 2135
	if (browser == NULL)
		return -1;

2136 2137 2138 2139
	/* reset abort key so that it can get Ctrl-C as a key */
	SLang_reset_tty();
	SLang_init_tty(0, 0, 0);

2140
	if (min_pcnt)
2141
		browser->min_pcnt = min_pcnt;
2142
	hist_browser__update_nr_entries(browser);
2143

2144
	browser->pstack = pstack__new(3);
2145
	if (browser->pstack == NULL)
2146 2147 2148 2149
		goto out;

	ui_helpline__push(helpline);

2150
	memset(options, 0, sizeof(options));
2151
	memset(actions, 0, sizeof(actions));
2152

2153
	hists__for_each_format(browser->hists, fmt) {
2154
		perf_hpp__reset_width(fmt, hists);
2155 2156 2157 2158 2159 2160 2161 2162 2163
		/*
		 * This is done just once, and activates the horizontal scrolling
		 * code in the ui_browser code, it would be better to have a the
		 * counter in the perf_hpp code, but I couldn't find doing it here
		 * works, FIXME by setting this in hist_browser__new, for now, be
		 * clever 8-)
		 */
		++browser->b.columns;
	}
2164

2165 2166 2167
	if (symbol_conf.col_width_list_str)
		perf_hpp__set_user_width(symbol_conf.col_width_list_str);

2168
	while (1) {
2169
		struct thread *thread = NULL;
2170
		struct map *map = NULL;
2171
		int choice = 0;
2172
		int socked_id = -1;
2173

2174 2175
		nr_options = 0;

2176
		key = hist_browser__run(browser, helpline);
2177

2178 2179
		if (browser->he_selection != NULL) {
			thread = hist_browser__selected_thread(browser);
2180
			map = browser->selection->map;
2181
			socked_id = browser->he_selection->socket;
2182
		}
2183
		switch (key) {
2184 2185
		case K_TAB:
		case K_UNTAB:
2186 2187
			if (nr_events == 1)
				continue;
2188 2189 2190 2191 2192 2193
			/*
			 * Exit the browser, let hists__browser_tree
			 * go to the next or previous
			 */
			goto out_free_stack;
		case 'a':
2194
			if (!sort__has_sym) {
2195
				ui_browser__warning(&browser->b, delay_secs * 2,
2196
			"Annotation is only available for symbolic views, "
2197
			"include \"sym*\" in --sort to use it.");
2198 2199 2200
				continue;
			}

2201
			if (browser->selection == NULL ||
2202
			    browser->selection->sym == NULL ||
2203
			    browser->selection->map->dso->annotate_warned)
2204
				continue;
2205

2206 2207 2208
			actions->ms.map = browser->selection->map;
			actions->ms.sym = browser->selection->sym;
			do_annotate(browser, actions);
2209
			continue;
2210 2211 2212
		case 'P':
			hist_browser__dump(browser);
			continue;
2213
		case 'd':
2214
			actions->ms.map = map;
2215
			do_zoom_dso(browser, actions);
2216
			continue;
2217 2218 2219
		case 'V':
			browser->show_dso = !browser->show_dso;
			continue;
2220
		case 't':
2221 2222
			actions->thread = thread;
			do_zoom_thread(browser, actions);
2223
			continue;
2224 2225 2226 2227
		case 'S':
			actions->socket = socked_id;
			do_zoom_socket(browser, actions);
			continue;
2228
		case '/':
2229
			if (ui_browser__input_window("Symbol to show",
2230 2231
					"Please enter the name of symbol you want to see.\n"
					"To remove the filter later, press / + ENTER.",
2232 2233
					buf, "ENTER: OK, ESC: Cancel",
					delay_secs * 2) == K_ENTER) {
2234 2235
				hists->symbol_filter_str = *buf ? buf : NULL;
				hists__filter_by_symbol(hists);
2236 2237 2238
				hist_browser__reset(browser);
			}
			continue;
2239
		case 'r':
2240 2241 2242 2243 2244
			if (is_report_browser(hbt)) {
				actions->thread = NULL;
				actions->ms.sym = NULL;
				do_run_script(browser, actions);
			}
2245
			continue;
2246
		case 's':
2247
			if (is_report_browser(hbt)) {
2248
				key = do_switch_data(browser, actions);
2249 2250 2251
				if (key == K_SWITCH_INPUT_DATA)
					goto out_free_stack;
			}
2252
			continue;
2253 2254 2255 2256 2257
		case 'i':
			/* env->arch is NULL for live-mode (i.e. perf top) */
			if (env->arch)
				tui__header_window(env);
			continue;
2258 2259 2260
		case 'F':
			symbol_conf.filter_relative ^= 1;
			continue;
2261 2262 2263 2264 2265 2266 2267
		case 'z':
			if (!is_report_browser(hbt)) {
				struct perf_top *top = hbt->arg;

				top->zero = !top->zero;
			}
			continue;
2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285
		case 'L':
			if (ui_browser__input_window("Percent Limit",
					"Please enter the value you want to hide entries under that percent.",
					buf, "ENTER: OK, ESC: Cancel",
					delay_secs * 2) == K_ENTER) {
				char *end;
				double new_percent = strtod(buf, &end);

				if (new_percent < 0 || new_percent > 100) {
					ui_browser__warning(&browser->b, delay_secs * 2,
						"Invalid percent: %.2f", new_percent);
					continue;
				}

				hist_browser__update_percent_limit(browser, new_percent);
				hist_browser__reset(browser);
			}
			continue;
2286
		case K_F1:
2287 2288
		case 'h':
		case '?':
2289
			ui_browser__help_window(&browser->b,
2290
				is_report_browser(hbt) ? report_help : top_help);
2291
			continue;
2292 2293
		case K_ENTER:
		case K_RIGHT:
2294
		case 'm':
2295 2296
			/* menu */
			break;
2297
		case K_ESC:
2298
		case K_LEFT: {
2299
			const void *top;
2300

2301
			if (pstack__empty(browser->pstack)) {
2302 2303 2304 2305 2306
				/*
				 * Go back to the perf_evsel_menu__run or other user
				 */
				if (left_exits)
					goto out_free_stack;
2307 2308 2309 2310 2311 2312

				if (key == K_ESC &&
				    ui_browser__dialog_yesno(&browser->b,
							     "Do you really want to exit?"))
					goto out_free_stack;

2313
				continue;
2314
			}
2315
			top = pstack__peek(browser->pstack);
2316
			if (top == &browser->hists->dso_filter) {
2317 2318 2319 2320 2321 2322
				/*
				 * No need to set actions->dso here since
				 * it's just to remove the current filter.
				 * Ditto for thread below.
				 */
				do_zoom_dso(browser, actions);
2323
			} else if (top == &browser->hists->thread_filter) {
2324
				do_zoom_thread(browser, actions);
2325 2326 2327
			} else if (top == &browser->hists->socket_filter) {
				do_zoom_socket(browser, actions);
			}
2328 2329
			continue;
		}
2330 2331
		case 'q':
		case CTRL('c'):
2332
			goto out_free_stack;
2333
		case 'f':
2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 2345 2346 2347 2348 2349 2350
			if (!is_report_browser(hbt)) {
				struct perf_top *top = hbt->arg;

				perf_evlist__toggle_enable(top->evlist);
				/*
				 * No need to refresh, resort/decay histogram
				 * entries if we are not collecting samples:
				 */
				if (top->evlist->enabled) {
					helpline = "Press 'f' to disable the events or 'h' to see other hotkeys";
					hbt->refresh = delay_secs;
				} else {
					helpline = "Press 'f' again to re-enable the events";
					hbt->refresh = 0;
				}
				continue;
			}
2351
			/* Fall thru */
2352
		default:
2353
			helpline = "Press '?' for help on key bindings";
2354
			continue;
2355 2356
		}

2357
		if (!sort__has_sym || browser->selection == NULL)
2358 2359
			goto skip_annotation;

2360
		if (sort__mode == SORT_MODE__BRANCH) {
2361
			bi = browser->he_selection->branch_info;
2362 2363 2364 2365

			if (bi == NULL)
				goto skip_annotation;

2366 2367 2368 2369 2370 2371 2372 2373 2374 2375 2376
			nr_options += add_annotate_opt(browser,
						       &actions[nr_options],
						       &options[nr_options],
						       bi->from.map,
						       bi->from.sym);
			if (bi->to.sym != bi->from.sym)
				nr_options += add_annotate_opt(browser,
							&actions[nr_options],
							&options[nr_options],
							bi->to.map,
							bi->to.sym);
2377
		} else {
2378 2379 2380 2381 2382
			nr_options += add_annotate_opt(browser,
						       &actions[nr_options],
						       &options[nr_options],
						       browser->selection->map,
						       browser->selection->sym);
2383
		}
2384
skip_annotation:
2385 2386 2387
		nr_options += add_thread_opt(browser, &actions[nr_options],
					     &options[nr_options], thread);
		nr_options += add_dso_opt(browser, &actions[nr_options],
2388
					  &options[nr_options], map);
2389 2390
		nr_options += add_map_opt(browser, &actions[nr_options],
					  &options[nr_options],
2391 2392
					  browser->selection ?
						browser->selection->map : NULL);
2393 2394 2395
		nr_options += add_socket_opt(browser, &actions[nr_options],
					     &options[nr_options],
					     socked_id);
2396
		/* perf script support */
2397 2398 2399
		if (!is_report_browser(hbt))
			goto skip_scripting;

2400
		if (browser->he_selection) {
2401 2402 2403 2404 2405 2406
			if (sort__has_thread && thread) {
				nr_options += add_script_opt(browser,
							     &actions[nr_options],
							     &options[nr_options],
							     thread, NULL);
			}
2407 2408 2409 2410 2411 2412 2413 2414 2415
			/*
			 * Note that browser->selection != NULL
			 * when browser->he_selection is not NULL,
			 * so we don't need to check browser->selection
			 * before fetching browser->selection->sym like what
			 * we do before fetching browser->selection->map.
			 *
			 * See hist_browser__show_entry.
			 */
2416 2417 2418 2419 2420 2421
			if (sort__has_sym && browser->selection->sym) {
				nr_options += add_script_opt(browser,
							     &actions[nr_options],
							     &options[nr_options],
							     NULL, browser->selection->sym);
			}
2422
		}
2423 2424 2425 2426
		nr_options += add_script_opt(browser, &actions[nr_options],
					     &options[nr_options], NULL, NULL);
		nr_options += add_switch_opt(browser, &actions[nr_options],
					     &options[nr_options]);
2427
skip_scripting:
2428 2429
		nr_options += add_exit_opt(browser, &actions[nr_options],
					   &options[nr_options]);
2430

2431 2432
		do {
			struct popup_action *act;
2433

2434 2435 2436
			choice = ui__popup_menu(nr_options, options);
			if (choice == -1 || choice >= nr_options)
				break;
2437

2438 2439 2440
			act = &actions[choice];
			key = act->fn(browser, act);
		} while (key == 1);
2441

2442 2443
		if (key == K_SWITCH_INPUT_DATA)
			break;
2444 2445
	}
out_free_stack:
2446
	pstack__delete(browser->pstack);
2447 2448
out:
	hist_browser__delete(browser);
2449
	free_popup_options(options, MAX_OPTIONS);
2450 2451 2452
	return key;
}

2453 2454 2455
struct perf_evsel_menu {
	struct ui_browser b;
	struct perf_evsel *selection;
2456
	bool lost_events, lost_events_warned;
2457
	float min_pcnt;
2458
	struct perf_env *env;
2459 2460 2461 2462 2463 2464 2465 2466
};

static void perf_evsel_menu__write(struct ui_browser *browser,
				   void *entry, int row)
{
	struct perf_evsel_menu *menu = container_of(browser,
						    struct perf_evsel_menu, b);
	struct perf_evsel *evsel = list_entry(entry, struct perf_evsel, node);
2467
	struct hists *hists = evsel__hists(evsel);
2468
	bool current_entry = ui_browser__is_current_entry(browser, row);
2469
	unsigned long nr_events = hists->stats.nr_events[PERF_RECORD_SAMPLE];
2470
	const char *ev_name = perf_evsel__name(evsel);
2471
	char bf[256], unit;
2472 2473
	const char *warn = " ";
	size_t printed;
2474 2475 2476 2477

	ui_browser__set_color(browser, current_entry ? HE_COLORSET_SELECTED :
						       HE_COLORSET_NORMAL);

2478
	if (perf_evsel__is_group_event(evsel)) {
2479 2480 2481 2482 2483
		struct perf_evsel *pos;

		ev_name = perf_evsel__group_name(evsel);

		for_each_group_member(pos, evsel) {
2484 2485
			struct hists *pos_hists = evsel__hists(pos);
			nr_events += pos_hists->stats.nr_events[PERF_RECORD_SAMPLE];
2486 2487 2488
		}
	}

2489
	nr_events = convert_unit(nr_events, &unit);
2490
	printed = scnprintf(bf, sizeof(bf), "%lu%c%s%s", nr_events,
2491
			   unit, unit == ' ' ? "" : " ", ev_name);
2492
	ui_browser__printf(browser, "%s", bf);
2493

2494
	nr_events = hists->stats.nr_events[PERF_RECORD_LOST];
2495 2496 2497 2498 2499
	if (nr_events != 0) {
		menu->lost_events = true;
		if (!current_entry)
			ui_browser__set_color(browser, HE_COLORSET_TOP);
		nr_events = convert_unit(nr_events, &unit);
2500 2501
		printed += scnprintf(bf, sizeof(bf), ": %ld%c%schunks LOST!",
				     nr_events, unit, unit == ' ' ? "" : " ");
2502 2503 2504
		warn = bf;
	}

2505
	ui_browser__write_nstring(browser, warn, browser->width - printed);
2506 2507 2508 2509 2510

	if (current_entry)
		menu->selection = evsel;
}

2511 2512
static int perf_evsel_menu__run(struct perf_evsel_menu *menu,
				int nr_events, const char *help,
2513
				struct hist_browser_timer *hbt)
2514
{
2515
	struct perf_evlist *evlist = menu->b.priv;
2516
	struct perf_evsel *pos;
2517
	const char *title = "Available samples";
2518
	int delay_secs = hbt ? hbt->refresh : 0;
2519
	int key;
2520

2521 2522 2523 2524 2525
	if (ui_browser__show(&menu->b, title,
			     "ESC: exit, ENTER|->: Browse histograms") < 0)
		return -1;

	while (1) {
2526
		key = ui_browser__run(&menu->b, delay_secs);
2527 2528

		switch (key) {
2529
		case K_TIMER:
2530
			hbt->timer(hbt->arg);
2531 2532 2533 2534 2535

			if (!menu->lost_events_warned && menu->lost_events) {
				ui_browser__warn_lost_events(&menu->b);
				menu->lost_events_warned = true;
			}
2536
			continue;
2537 2538
		case K_RIGHT:
		case K_ENTER:
2539 2540 2541 2542
			if (!menu->selection)
				continue;
			pos = menu->selection;
browse_hists:
2543 2544 2545 2546 2547
			perf_evlist__set_selected(evlist, pos);
			/*
			 * Give the calling tool a chance to populate the non
			 * default evsel resorted hists tree.
			 */
2548 2549
			if (hbt)
				hbt->timer(hbt->arg);
2550
			key = perf_evsel__hists_browse(pos, nr_events, help,
2551
						       true, hbt,
2552
						       menu->min_pcnt,
2553
						       menu->env);
2554
			ui_browser__show_title(&menu->b, title);
2555
			switch (key) {
2556
			case K_TAB:
2557
				if (pos->node.next == &evlist->entries)
2558
					pos = perf_evlist__first(evlist);
2559
				else
2560
					pos = perf_evsel__next(pos);
2561
				goto browse_hists;
2562
			case K_UNTAB:
2563
				if (pos->node.prev == &evlist->entries)
2564
					pos = perf_evlist__last(evlist);
2565
				else
2566
					pos = perf_evsel__prev(pos);
2567
				goto browse_hists;
2568
			case K_SWITCH_INPUT_DATA:
2569 2570 2571
			case 'q':
			case CTRL('c'):
				goto out;
2572
			case K_ESC:
2573 2574 2575
			default:
				continue;
			}
2576
		case K_LEFT:
2577
			continue;
2578
		case K_ESC:
2579 2580
			if (!ui_browser__dialog_yesno(&menu->b,
					       "Do you really want to exit?"))
2581 2582
				continue;
			/* Fall thru */
2583 2584 2585
		case 'q':
		case CTRL('c'):
			goto out;
2586
		default:
2587
			continue;
2588 2589 2590
		}
	}

2591 2592 2593 2594 2595
out:
	ui_browser__hide(&menu->b);
	return key;
}

2596
static bool filter_group_entries(struct ui_browser *browser __maybe_unused,
2597 2598 2599 2600 2601 2602 2603 2604 2605 2606
				 void *entry)
{
	struct perf_evsel *evsel = list_entry(entry, struct perf_evsel, node);

	if (symbol_conf.event_group && !perf_evsel__is_group_leader(evsel))
		return true;

	return false;
}

2607
static int __perf_evlist__tui_browse_hists(struct perf_evlist *evlist,
2608
					   int nr_entries, const char *help,
2609
					   struct hist_browser_timer *hbt,
2610
					   float min_pcnt,
2611
					   struct perf_env *env)
2612 2613 2614 2615 2616 2617 2618 2619
{
	struct perf_evsel *pos;
	struct perf_evsel_menu menu = {
		.b = {
			.entries    = &evlist->entries,
			.refresh    = ui_browser__list_head_refresh,
			.seek	    = ui_browser__list_head_seek,
			.write	    = perf_evsel_menu__write,
2620 2621
			.filter	    = filter_group_entries,
			.nr_entries = nr_entries,
2622 2623
			.priv	    = evlist,
		},
2624
		.min_pcnt = min_pcnt,
2625
		.env = env,
2626 2627 2628 2629
	};

	ui_helpline__push("Press ESC to exit");

2630
	evlist__for_each(evlist, pos) {
2631
		const char *ev_name = perf_evsel__name(pos);
2632 2633 2634 2635 2636 2637
		size_t line_len = strlen(ev_name) + 7;

		if (menu.b.width < line_len)
			menu.b.width = line_len;
	}

2638
	return perf_evsel_menu__run(&menu, nr_entries, help, hbt);
2639 2640
}

2641
int perf_evlist__tui_browse_hists(struct perf_evlist *evlist, const char *help,
2642
				  struct hist_browser_timer *hbt,
2643
				  float min_pcnt,
2644
				  struct perf_env *env)
2645
{
2646 2647 2648 2649
	int nr_entries = evlist->nr_entries;

single_entry:
	if (nr_entries == 1) {
2650
		struct perf_evsel *first = perf_evlist__first(evlist);
2651 2652

		return perf_evsel__hists_browse(first, nr_entries, help,
2653
						false, hbt, min_pcnt,
2654
						env);
2655 2656
	}

2657 2658 2659 2660
	if (symbol_conf.event_group) {
		struct perf_evsel *pos;

		nr_entries = 0;
2661
		evlist__for_each(evlist, pos) {
2662 2663
			if (perf_evsel__is_group_leader(pos))
				nr_entries++;
2664
		}
2665 2666 2667 2668 2669 2670

		if (nr_entries == 1)
			goto single_entry;
	}

	return __perf_evlist__tui_browse_hists(evlist, nr_entries, help,
2671
					       hbt, min_pcnt, env);
2672
}