Loading...
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * This is rewrite of original c2c tool introduced in here:
4 * http://lwn.net/Articles/588866/
5 *
6 * The original tool was changed to fit in current perf state.
7 *
8 * Original authors:
9 * Don Zickus <dzickus@redhat.com>
10 * Dick Fowles <fowles@inreach.com>
11 * Joe Mario <jmario@redhat.com>
12 */
13#include <errno.h>
14#include <inttypes.h>
15#include <linux/compiler.h>
16#include <linux/err.h>
17#include <linux/kernel.h>
18#include <linux/stringify.h>
19#include <linux/zalloc.h>
20#include <asm/bug.h>
21#include <sys/param.h>
22#include "debug.h"
23#include "builtin.h"
24#include <perf/cpumap.h>
25#include <subcmd/pager.h>
26#include <subcmd/parse-options.h>
27#include "map_symbol.h"
28#include "mem-events.h"
29#include "session.h"
30#include "hist.h"
31#include "sort.h"
32#include "tool.h"
33#include "cacheline.h"
34#include "data.h"
35#include "event.h"
36#include "evlist.h"
37#include "evsel.h"
38#include "ui/browsers/hists.h"
39#include "thread.h"
40#include "mem2node.h"
41#include "symbol.h"
42#include "ui/ui.h"
43#include "ui/progress.h"
44#include "../perf.h"
45#include "pmu.h"
46#include "pmu-hybrid.h"
47#include "string2.h"
48
49struct c2c_hists {
50 struct hists hists;
51 struct perf_hpp_list list;
52 struct c2c_stats stats;
53};
54
55struct compute_stats {
56 struct stats lcl_hitm;
57 struct stats rmt_hitm;
58 struct stats lcl_peer;
59 struct stats rmt_peer;
60 struct stats load;
61};
62
63struct c2c_hist_entry {
64 struct c2c_hists *hists;
65 struct c2c_stats stats;
66 unsigned long *cpuset;
67 unsigned long *nodeset;
68 struct c2c_stats *node_stats;
69 unsigned int cacheline_idx;
70
71 struct compute_stats cstats;
72
73 unsigned long paddr;
74 unsigned long paddr_cnt;
75 bool paddr_zero;
76 char *nodestr;
77
78 /*
79 * must be at the end,
80 * because of its callchain dynamic entry
81 */
82 struct hist_entry he;
83};
84
85static char const *coalesce_default = "iaddr";
86
87struct perf_c2c {
88 struct perf_tool tool;
89 struct c2c_hists hists;
90 struct mem2node mem2node;
91
92 unsigned long **nodes;
93 int nodes_cnt;
94 int cpus_cnt;
95 int *cpu2node;
96 int node_info;
97
98 bool show_src;
99 bool show_all;
100 bool use_stdio;
101 bool stats_only;
102 bool symbol_full;
103 bool stitch_lbr;
104
105 /* Shared cache line stats */
106 struct c2c_stats shared_clines_stats;
107 int shared_clines;
108
109 int display;
110
111 const char *coalesce;
112 char *cl_sort;
113 char *cl_resort;
114 char *cl_output;
115};
116
117enum {
118 DISPLAY_LCL_HITM,
119 DISPLAY_RMT_HITM,
120 DISPLAY_TOT_HITM,
121 DISPLAY_SNP_PEER,
122 DISPLAY_MAX,
123};
124
125static const char *display_str[DISPLAY_MAX] = {
126 [DISPLAY_LCL_HITM] = "Local HITMs",
127 [DISPLAY_RMT_HITM] = "Remote HITMs",
128 [DISPLAY_TOT_HITM] = "Total HITMs",
129 [DISPLAY_SNP_PEER] = "Peer Snoop",
130};
131
132static const struct option c2c_options[] = {
133 OPT_INCR('v', "verbose", &verbose, "be more verbose (show counter open errors, etc)"),
134 OPT_END()
135};
136
137static struct perf_c2c c2c;
138
139static void *c2c_he_zalloc(size_t size)
140{
141 struct c2c_hist_entry *c2c_he;
142
143 c2c_he = zalloc(size + sizeof(*c2c_he));
144 if (!c2c_he)
145 return NULL;
146
147 c2c_he->cpuset = bitmap_zalloc(c2c.cpus_cnt);
148 if (!c2c_he->cpuset)
149 goto out_free;
150
151 c2c_he->nodeset = bitmap_zalloc(c2c.nodes_cnt);
152 if (!c2c_he->nodeset)
153 goto out_free;
154
155 c2c_he->node_stats = zalloc(c2c.nodes_cnt * sizeof(*c2c_he->node_stats));
156 if (!c2c_he->node_stats)
157 goto out_free;
158
159 init_stats(&c2c_he->cstats.lcl_hitm);
160 init_stats(&c2c_he->cstats.rmt_hitm);
161 init_stats(&c2c_he->cstats.lcl_peer);
162 init_stats(&c2c_he->cstats.rmt_peer);
163 init_stats(&c2c_he->cstats.load);
164
165 return &c2c_he->he;
166
167out_free:
168 free(c2c_he->nodeset);
169 free(c2c_he->cpuset);
170 free(c2c_he);
171 return NULL;
172}
173
174static void c2c_he_free(void *he)
175{
176 struct c2c_hist_entry *c2c_he;
177
178 c2c_he = container_of(he, struct c2c_hist_entry, he);
179 if (c2c_he->hists) {
180 hists__delete_entries(&c2c_he->hists->hists);
181 free(c2c_he->hists);
182 }
183
184 free(c2c_he->cpuset);
185 free(c2c_he->nodeset);
186 free(c2c_he->nodestr);
187 free(c2c_he->node_stats);
188 free(c2c_he);
189}
190
191static struct hist_entry_ops c2c_entry_ops = {
192 .new = c2c_he_zalloc,
193 .free = c2c_he_free,
194};
195
196static int c2c_hists__init(struct c2c_hists *hists,
197 const char *sort,
198 int nr_header_lines);
199
200static struct c2c_hists*
201he__get_c2c_hists(struct hist_entry *he,
202 const char *sort,
203 int nr_header_lines)
204{
205 struct c2c_hist_entry *c2c_he;
206 struct c2c_hists *hists;
207 int ret;
208
209 c2c_he = container_of(he, struct c2c_hist_entry, he);
210 if (c2c_he->hists)
211 return c2c_he->hists;
212
213 hists = c2c_he->hists = zalloc(sizeof(*hists));
214 if (!hists)
215 return NULL;
216
217 ret = c2c_hists__init(hists, sort, nr_header_lines);
218 if (ret) {
219 free(hists);
220 return NULL;
221 }
222
223 return hists;
224}
225
226static void c2c_he__set_cpu(struct c2c_hist_entry *c2c_he,
227 struct perf_sample *sample)
228{
229 if (WARN_ONCE(sample->cpu == (unsigned int) -1,
230 "WARNING: no sample cpu value"))
231 return;
232
233 __set_bit(sample->cpu, c2c_he->cpuset);
234}
235
236static void c2c_he__set_node(struct c2c_hist_entry *c2c_he,
237 struct perf_sample *sample)
238{
239 int node;
240
241 if (!sample->phys_addr) {
242 c2c_he->paddr_zero = true;
243 return;
244 }
245
246 node = mem2node__node(&c2c.mem2node, sample->phys_addr);
247 if (WARN_ONCE(node < 0, "WARNING: failed to find node\n"))
248 return;
249
250 __set_bit(node, c2c_he->nodeset);
251
252 if (c2c_he->paddr != sample->phys_addr) {
253 c2c_he->paddr_cnt++;
254 c2c_he->paddr = sample->phys_addr;
255 }
256}
257
258static void compute_stats(struct c2c_hist_entry *c2c_he,
259 struct c2c_stats *stats,
260 u64 weight)
261{
262 struct compute_stats *cstats = &c2c_he->cstats;
263
264 if (stats->rmt_hitm)
265 update_stats(&cstats->rmt_hitm, weight);
266 else if (stats->lcl_hitm)
267 update_stats(&cstats->lcl_hitm, weight);
268 else if (stats->rmt_peer)
269 update_stats(&cstats->rmt_peer, weight);
270 else if (stats->lcl_peer)
271 update_stats(&cstats->lcl_peer, weight);
272 else if (stats->load)
273 update_stats(&cstats->load, weight);
274}
275
276static int process_sample_event(struct perf_tool *tool __maybe_unused,
277 union perf_event *event,
278 struct perf_sample *sample,
279 struct evsel *evsel,
280 struct machine *machine)
281{
282 struct c2c_hists *c2c_hists = &c2c.hists;
283 struct c2c_hist_entry *c2c_he;
284 struct c2c_stats stats = { .nr_entries = 0, };
285 struct hist_entry *he;
286 struct addr_location al;
287 struct mem_info *mi, *mi_dup;
288 int ret;
289
290 if (machine__resolve(machine, &al, sample) < 0) {
291 pr_debug("problem processing %d event, skipping it.\n",
292 event->header.type);
293 return -1;
294 }
295
296 if (c2c.stitch_lbr)
297 al.thread->lbr_stitch_enable = true;
298
299 ret = sample__resolve_callchain(sample, &callchain_cursor, NULL,
300 evsel, &al, sysctl_perf_event_max_stack);
301 if (ret)
302 goto out;
303
304 mi = sample__resolve_mem(sample, &al);
305 if (mi == NULL)
306 return -ENOMEM;
307
308 /*
309 * The mi object is released in hists__add_entry_ops,
310 * if it gets sorted out into existing data, so we need
311 * to take the copy now.
312 */
313 mi_dup = mem_info__get(mi);
314
315 c2c_decode_stats(&stats, mi);
316
317 he = hists__add_entry_ops(&c2c_hists->hists, &c2c_entry_ops,
318 &al, NULL, NULL, mi,
319 sample, true);
320 if (he == NULL)
321 goto free_mi;
322
323 c2c_he = container_of(he, struct c2c_hist_entry, he);
324 c2c_add_stats(&c2c_he->stats, &stats);
325 c2c_add_stats(&c2c_hists->stats, &stats);
326
327 c2c_he__set_cpu(c2c_he, sample);
328 c2c_he__set_node(c2c_he, sample);
329
330 hists__inc_nr_samples(&c2c_hists->hists, he->filtered);
331 ret = hist_entry__append_callchain(he, sample);
332
333 if (!ret) {
334 /*
335 * There's already been warning about missing
336 * sample's cpu value. Let's account all to
337 * node 0 in this case, without any further
338 * warning.
339 *
340 * Doing node stats only for single callchain data.
341 */
342 int cpu = sample->cpu == (unsigned int) -1 ? 0 : sample->cpu;
343 int node = c2c.cpu2node[cpu];
344
345 mi = mi_dup;
346
347 c2c_hists = he__get_c2c_hists(he, c2c.cl_sort, 2);
348 if (!c2c_hists)
349 goto free_mi;
350
351 he = hists__add_entry_ops(&c2c_hists->hists, &c2c_entry_ops,
352 &al, NULL, NULL, mi,
353 sample, true);
354 if (he == NULL)
355 goto free_mi;
356
357 c2c_he = container_of(he, struct c2c_hist_entry, he);
358 c2c_add_stats(&c2c_he->stats, &stats);
359 c2c_add_stats(&c2c_hists->stats, &stats);
360 c2c_add_stats(&c2c_he->node_stats[node], &stats);
361
362 compute_stats(c2c_he, &stats, sample->weight);
363
364 c2c_he__set_cpu(c2c_he, sample);
365 c2c_he__set_node(c2c_he, sample);
366
367 hists__inc_nr_samples(&c2c_hists->hists, he->filtered);
368 ret = hist_entry__append_callchain(he, sample);
369 }
370
371out:
372 addr_location__put(&al);
373 return ret;
374
375free_mi:
376 mem_info__put(mi_dup);
377 mem_info__put(mi);
378 ret = -ENOMEM;
379 goto out;
380}
381
382static struct perf_c2c c2c = {
383 .tool = {
384 .sample = process_sample_event,
385 .mmap = perf_event__process_mmap,
386 .mmap2 = perf_event__process_mmap2,
387 .comm = perf_event__process_comm,
388 .exit = perf_event__process_exit,
389 .fork = perf_event__process_fork,
390 .lost = perf_event__process_lost,
391 .attr = perf_event__process_attr,
392 .auxtrace_info = perf_event__process_auxtrace_info,
393 .auxtrace = perf_event__process_auxtrace,
394 .auxtrace_error = perf_event__process_auxtrace_error,
395 .ordered_events = true,
396 .ordering_requires_timestamps = true,
397 },
398};
399
400static const char * const c2c_usage[] = {
401 "perf c2c {record|report}",
402 NULL
403};
404
405static const char * const __usage_report[] = {
406 "perf c2c report",
407 NULL
408};
409
410static const char * const *report_c2c_usage = __usage_report;
411
412#define C2C_HEADER_MAX 2
413
414struct c2c_header {
415 struct {
416 const char *text;
417 int span;
418 } line[C2C_HEADER_MAX];
419};
420
421struct c2c_dimension {
422 struct c2c_header header;
423 const char *name;
424 int width;
425 struct sort_entry *se;
426
427 int64_t (*cmp)(struct perf_hpp_fmt *fmt,
428 struct hist_entry *, struct hist_entry *);
429 int (*entry)(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
430 struct hist_entry *he);
431 int (*color)(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
432 struct hist_entry *he);
433};
434
435struct c2c_fmt {
436 struct perf_hpp_fmt fmt;
437 struct c2c_dimension *dim;
438};
439
440#define SYMBOL_WIDTH 30
441
442static struct c2c_dimension dim_symbol;
443static struct c2c_dimension dim_srcline;
444
445static int symbol_width(struct hists *hists, struct sort_entry *se)
446{
447 int width = hists__col_len(hists, se->se_width_idx);
448
449 if (!c2c.symbol_full)
450 width = MIN(width, SYMBOL_WIDTH);
451
452 return width;
453}
454
455static int c2c_width(struct perf_hpp_fmt *fmt,
456 struct perf_hpp *hpp __maybe_unused,
457 struct hists *hists)
458{
459 struct c2c_fmt *c2c_fmt;
460 struct c2c_dimension *dim;
461
462 c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
463 dim = c2c_fmt->dim;
464
465 if (dim == &dim_symbol || dim == &dim_srcline)
466 return symbol_width(hists, dim->se);
467
468 return dim->se ? hists__col_len(hists, dim->se->se_width_idx) :
469 c2c_fmt->dim->width;
470}
471
472static int c2c_header(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
473 struct hists *hists, int line, int *span)
474{
475 struct perf_hpp_list *hpp_list = hists->hpp_list;
476 struct c2c_fmt *c2c_fmt;
477 struct c2c_dimension *dim;
478 const char *text = NULL;
479 int width = c2c_width(fmt, hpp, hists);
480
481 c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
482 dim = c2c_fmt->dim;
483
484 if (dim->se) {
485 text = dim->header.line[line].text;
486 /* Use the last line from sort_entry if not defined. */
487 if (!text && (line == hpp_list->nr_header_lines - 1))
488 text = dim->se->se_header;
489 } else {
490 text = dim->header.line[line].text;
491
492 if (*span) {
493 (*span)--;
494 return 0;
495 } else {
496 *span = dim->header.line[line].span;
497 }
498 }
499
500 if (text == NULL)
501 text = "";
502
503 return scnprintf(hpp->buf, hpp->size, "%*s", width, text);
504}
505
506#define HEX_STR(__s, __v) \
507({ \
508 scnprintf(__s, sizeof(__s), "0x%" PRIx64, __v); \
509 __s; \
510})
511
512static int64_t
513dcacheline_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
514 struct hist_entry *left, struct hist_entry *right)
515{
516 return sort__dcacheline_cmp(left, right);
517}
518
519static int dcacheline_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
520 struct hist_entry *he)
521{
522 uint64_t addr = 0;
523 int width = c2c_width(fmt, hpp, he->hists);
524 char buf[20];
525
526 if (he->mem_info)
527 addr = cl_address(he->mem_info->daddr.addr);
528
529 return scnprintf(hpp->buf, hpp->size, "%*s", width, HEX_STR(buf, addr));
530}
531
532static int
533dcacheline_node_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
534 struct hist_entry *he)
535{
536 struct c2c_hist_entry *c2c_he;
537 int width = c2c_width(fmt, hpp, he->hists);
538
539 c2c_he = container_of(he, struct c2c_hist_entry, he);
540 if (WARN_ON_ONCE(!c2c_he->nodestr))
541 return 0;
542
543 return scnprintf(hpp->buf, hpp->size, "%*s", width, c2c_he->nodestr);
544}
545
546static int
547dcacheline_node_count(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
548 struct hist_entry *he)
549{
550 struct c2c_hist_entry *c2c_he;
551 int width = c2c_width(fmt, hpp, he->hists);
552
553 c2c_he = container_of(he, struct c2c_hist_entry, he);
554 return scnprintf(hpp->buf, hpp->size, "%*lu", width, c2c_he->paddr_cnt);
555}
556
557static int offset_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
558 struct hist_entry *he)
559{
560 uint64_t addr = 0;
561 int width = c2c_width(fmt, hpp, he->hists);
562 char buf[20];
563
564 if (he->mem_info)
565 addr = cl_offset(he->mem_info->daddr.al_addr);
566
567 return scnprintf(hpp->buf, hpp->size, "%*s", width, HEX_STR(buf, addr));
568}
569
570static int64_t
571offset_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
572 struct hist_entry *left, struct hist_entry *right)
573{
574 uint64_t l = 0, r = 0;
575
576 if (left->mem_info)
577 l = cl_offset(left->mem_info->daddr.addr);
578 if (right->mem_info)
579 r = cl_offset(right->mem_info->daddr.addr);
580
581 return (int64_t)(r - l);
582}
583
584static int
585iaddr_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
586 struct hist_entry *he)
587{
588 uint64_t addr = 0;
589 int width = c2c_width(fmt, hpp, he->hists);
590 char buf[20];
591
592 if (he->mem_info)
593 addr = he->mem_info->iaddr.addr;
594
595 return scnprintf(hpp->buf, hpp->size, "%*s", width, HEX_STR(buf, addr));
596}
597
598static int64_t
599iaddr_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
600 struct hist_entry *left, struct hist_entry *right)
601{
602 return sort__iaddr_cmp(left, right);
603}
604
605static int
606tot_hitm_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
607 struct hist_entry *he)
608{
609 struct c2c_hist_entry *c2c_he;
610 int width = c2c_width(fmt, hpp, he->hists);
611 unsigned int tot_hitm;
612
613 c2c_he = container_of(he, struct c2c_hist_entry, he);
614 tot_hitm = c2c_he->stats.lcl_hitm + c2c_he->stats.rmt_hitm;
615
616 return scnprintf(hpp->buf, hpp->size, "%*u", width, tot_hitm);
617}
618
619static int64_t
620tot_hitm_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
621 struct hist_entry *left, struct hist_entry *right)
622{
623 struct c2c_hist_entry *c2c_left;
624 struct c2c_hist_entry *c2c_right;
625 uint64_t tot_hitm_left;
626 uint64_t tot_hitm_right;
627
628 c2c_left = container_of(left, struct c2c_hist_entry, he);
629 c2c_right = container_of(right, struct c2c_hist_entry, he);
630
631 tot_hitm_left = c2c_left->stats.lcl_hitm + c2c_left->stats.rmt_hitm;
632 tot_hitm_right = c2c_right->stats.lcl_hitm + c2c_right->stats.rmt_hitm;
633
634 return tot_hitm_left - tot_hitm_right;
635}
636
637#define STAT_FN_ENTRY(__f) \
638static int \
639__f ## _entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp, \
640 struct hist_entry *he) \
641{ \
642 struct c2c_hist_entry *c2c_he; \
643 int width = c2c_width(fmt, hpp, he->hists); \
644 \
645 c2c_he = container_of(he, struct c2c_hist_entry, he); \
646 return scnprintf(hpp->buf, hpp->size, "%*u", width, \
647 c2c_he->stats.__f); \
648}
649
650#define STAT_FN_CMP(__f) \
651static int64_t \
652__f ## _cmp(struct perf_hpp_fmt *fmt __maybe_unused, \
653 struct hist_entry *left, struct hist_entry *right) \
654{ \
655 struct c2c_hist_entry *c2c_left, *c2c_right; \
656 \
657 c2c_left = container_of(left, struct c2c_hist_entry, he); \
658 c2c_right = container_of(right, struct c2c_hist_entry, he); \
659 return (uint64_t) c2c_left->stats.__f - \
660 (uint64_t) c2c_right->stats.__f; \
661}
662
663#define STAT_FN(__f) \
664 STAT_FN_ENTRY(__f) \
665 STAT_FN_CMP(__f)
666
667STAT_FN(rmt_hitm)
668STAT_FN(lcl_hitm)
669STAT_FN(rmt_peer)
670STAT_FN(lcl_peer)
671STAT_FN(tot_peer)
672STAT_FN(store)
673STAT_FN(st_l1hit)
674STAT_FN(st_l1miss)
675STAT_FN(st_na)
676STAT_FN(ld_fbhit)
677STAT_FN(ld_l1hit)
678STAT_FN(ld_l2hit)
679STAT_FN(ld_llchit)
680STAT_FN(rmt_hit)
681
682static uint64_t get_load_llc_misses(struct c2c_stats *stats)
683{
684 return stats->lcl_dram +
685 stats->rmt_dram +
686 stats->rmt_hitm +
687 stats->rmt_hit;
688}
689
690static uint64_t get_load_cache_hits(struct c2c_stats *stats)
691{
692 return stats->ld_fbhit +
693 stats->ld_l1hit +
694 stats->ld_l2hit +
695 stats->ld_llchit +
696 stats->lcl_hitm;
697}
698
699static uint64_t get_stores(struct c2c_stats *stats)
700{
701 return stats->st_l1hit +
702 stats->st_l1miss +
703 stats->st_na;
704}
705
706static uint64_t total_records(struct c2c_stats *stats)
707{
708 return get_load_llc_misses(stats) +
709 get_load_cache_hits(stats) +
710 get_stores(stats);
711}
712
713static int
714tot_recs_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
715 struct hist_entry *he)
716{
717 struct c2c_hist_entry *c2c_he;
718 int width = c2c_width(fmt, hpp, he->hists);
719 uint64_t tot_recs;
720
721 c2c_he = container_of(he, struct c2c_hist_entry, he);
722 tot_recs = total_records(&c2c_he->stats);
723
724 return scnprintf(hpp->buf, hpp->size, "%*" PRIu64, width, tot_recs);
725}
726
727static int64_t
728tot_recs_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
729 struct hist_entry *left, struct hist_entry *right)
730{
731 struct c2c_hist_entry *c2c_left;
732 struct c2c_hist_entry *c2c_right;
733 uint64_t tot_recs_left;
734 uint64_t tot_recs_right;
735
736 c2c_left = container_of(left, struct c2c_hist_entry, he);
737 c2c_right = container_of(right, struct c2c_hist_entry, he);
738
739 tot_recs_left = total_records(&c2c_left->stats);
740 tot_recs_right = total_records(&c2c_right->stats);
741
742 return tot_recs_left - tot_recs_right;
743}
744
745static uint64_t total_loads(struct c2c_stats *stats)
746{
747 return get_load_llc_misses(stats) +
748 get_load_cache_hits(stats);
749}
750
751static int
752tot_loads_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
753 struct hist_entry *he)
754{
755 struct c2c_hist_entry *c2c_he;
756 int width = c2c_width(fmt, hpp, he->hists);
757 uint64_t tot_recs;
758
759 c2c_he = container_of(he, struct c2c_hist_entry, he);
760 tot_recs = total_loads(&c2c_he->stats);
761
762 return scnprintf(hpp->buf, hpp->size, "%*" PRIu64, width, tot_recs);
763}
764
765static int64_t
766tot_loads_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
767 struct hist_entry *left, struct hist_entry *right)
768{
769 struct c2c_hist_entry *c2c_left;
770 struct c2c_hist_entry *c2c_right;
771 uint64_t tot_recs_left;
772 uint64_t tot_recs_right;
773
774 c2c_left = container_of(left, struct c2c_hist_entry, he);
775 c2c_right = container_of(right, struct c2c_hist_entry, he);
776
777 tot_recs_left = total_loads(&c2c_left->stats);
778 tot_recs_right = total_loads(&c2c_right->stats);
779
780 return tot_recs_left - tot_recs_right;
781}
782
783typedef double (get_percent_cb)(struct c2c_hist_entry *);
784
785static int
786percent_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
787 struct hist_entry *he, get_percent_cb get_percent)
788{
789 struct c2c_hist_entry *c2c_he;
790 int width = c2c_width(fmt, hpp, he->hists);
791 double per;
792
793 c2c_he = container_of(he, struct c2c_hist_entry, he);
794 per = get_percent(c2c_he);
795
796#ifdef HAVE_SLANG_SUPPORT
797 if (use_browser)
798 return __hpp__slsmg_color_printf(hpp, "%*.2f%%", width - 1, per);
799#endif
800 return hpp_color_scnprintf(hpp, "%*.2f%%", width - 1, per);
801}
802
803static double percent_costly_snoop(struct c2c_hist_entry *c2c_he)
804{
805 struct c2c_hists *hists;
806 struct c2c_stats *stats;
807 struct c2c_stats *total;
808 int tot = 0, st = 0;
809 double p;
810
811 hists = container_of(c2c_he->he.hists, struct c2c_hists, hists);
812 stats = &c2c_he->stats;
813 total = &hists->stats;
814
815 switch (c2c.display) {
816 case DISPLAY_RMT_HITM:
817 st = stats->rmt_hitm;
818 tot = total->rmt_hitm;
819 break;
820 case DISPLAY_LCL_HITM:
821 st = stats->lcl_hitm;
822 tot = total->lcl_hitm;
823 break;
824 case DISPLAY_TOT_HITM:
825 st = stats->tot_hitm;
826 tot = total->tot_hitm;
827 break;
828 case DISPLAY_SNP_PEER:
829 st = stats->tot_peer;
830 tot = total->tot_peer;
831 break;
832 default:
833 break;
834 }
835
836 p = tot ? (double) st / tot : 0;
837
838 return 100 * p;
839}
840
841#define PERC_STR(__s, __v) \
842({ \
843 scnprintf(__s, sizeof(__s), "%.2F%%", __v); \
844 __s; \
845})
846
847static int
848percent_costly_snoop_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
849 struct hist_entry *he)
850{
851 struct c2c_hist_entry *c2c_he;
852 int width = c2c_width(fmt, hpp, he->hists);
853 char buf[10];
854 double per;
855
856 c2c_he = container_of(he, struct c2c_hist_entry, he);
857 per = percent_costly_snoop(c2c_he);
858 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
859}
860
861static int
862percent_costly_snoop_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
863 struct hist_entry *he)
864{
865 return percent_color(fmt, hpp, he, percent_costly_snoop);
866}
867
868static int64_t
869percent_costly_snoop_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
870 struct hist_entry *left, struct hist_entry *right)
871{
872 struct c2c_hist_entry *c2c_left;
873 struct c2c_hist_entry *c2c_right;
874 double per_left;
875 double per_right;
876
877 c2c_left = container_of(left, struct c2c_hist_entry, he);
878 c2c_right = container_of(right, struct c2c_hist_entry, he);
879
880 per_left = percent_costly_snoop(c2c_left);
881 per_right = percent_costly_snoop(c2c_right);
882
883 return per_left - per_right;
884}
885
886static struct c2c_stats *he_stats(struct hist_entry *he)
887{
888 struct c2c_hist_entry *c2c_he;
889
890 c2c_he = container_of(he, struct c2c_hist_entry, he);
891 return &c2c_he->stats;
892}
893
894static struct c2c_stats *total_stats(struct hist_entry *he)
895{
896 struct c2c_hists *hists;
897
898 hists = container_of(he->hists, struct c2c_hists, hists);
899 return &hists->stats;
900}
901
902static double percent(u32 st, u32 tot)
903{
904 return tot ? 100. * (double) st / (double) tot : 0;
905}
906
907#define PERCENT(__h, __f) percent(he_stats(__h)->__f, total_stats(__h)->__f)
908
909#define PERCENT_FN(__f) \
910static double percent_ ## __f(struct c2c_hist_entry *c2c_he) \
911{ \
912 struct c2c_hists *hists; \
913 \
914 hists = container_of(c2c_he->he.hists, struct c2c_hists, hists); \
915 return percent(c2c_he->stats.__f, hists->stats.__f); \
916}
917
918PERCENT_FN(rmt_hitm)
919PERCENT_FN(lcl_hitm)
920PERCENT_FN(rmt_peer)
921PERCENT_FN(lcl_peer)
922PERCENT_FN(st_l1hit)
923PERCENT_FN(st_l1miss)
924PERCENT_FN(st_na)
925
926static int
927percent_rmt_hitm_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
928 struct hist_entry *he)
929{
930 int width = c2c_width(fmt, hpp, he->hists);
931 double per = PERCENT(he, rmt_hitm);
932 char buf[10];
933
934 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
935}
936
937static int
938percent_rmt_hitm_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
939 struct hist_entry *he)
940{
941 return percent_color(fmt, hpp, he, percent_rmt_hitm);
942}
943
944static int64_t
945percent_rmt_hitm_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
946 struct hist_entry *left, struct hist_entry *right)
947{
948 double per_left;
949 double per_right;
950
951 per_left = PERCENT(left, rmt_hitm);
952 per_right = PERCENT(right, rmt_hitm);
953
954 return per_left - per_right;
955}
956
957static int
958percent_lcl_hitm_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
959 struct hist_entry *he)
960{
961 int width = c2c_width(fmt, hpp, he->hists);
962 double per = PERCENT(he, lcl_hitm);
963 char buf[10];
964
965 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
966}
967
968static int
969percent_lcl_hitm_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
970 struct hist_entry *he)
971{
972 return percent_color(fmt, hpp, he, percent_lcl_hitm);
973}
974
975static int64_t
976percent_lcl_hitm_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
977 struct hist_entry *left, struct hist_entry *right)
978{
979 double per_left;
980 double per_right;
981
982 per_left = PERCENT(left, lcl_hitm);
983 per_right = PERCENT(right, lcl_hitm);
984
985 return per_left - per_right;
986}
987
988static int
989percent_lcl_peer_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
990 struct hist_entry *he)
991{
992 int width = c2c_width(fmt, hpp, he->hists);
993 double per = PERCENT(he, lcl_peer);
994 char buf[10];
995
996 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
997}
998
999static int
1000percent_lcl_peer_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1001 struct hist_entry *he)
1002{
1003 return percent_color(fmt, hpp, he, percent_lcl_peer);
1004}
1005
1006static int64_t
1007percent_lcl_peer_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
1008 struct hist_entry *left, struct hist_entry *right)
1009{
1010 double per_left;
1011 double per_right;
1012
1013 per_left = PERCENT(left, lcl_peer);
1014 per_right = PERCENT(right, lcl_peer);
1015
1016 return per_left - per_right;
1017}
1018
1019static int
1020percent_rmt_peer_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1021 struct hist_entry *he)
1022{
1023 int width = c2c_width(fmt, hpp, he->hists);
1024 double per = PERCENT(he, rmt_peer);
1025 char buf[10];
1026
1027 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
1028}
1029
1030static int
1031percent_rmt_peer_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1032 struct hist_entry *he)
1033{
1034 return percent_color(fmt, hpp, he, percent_rmt_peer);
1035}
1036
1037static int64_t
1038percent_rmt_peer_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
1039 struct hist_entry *left, struct hist_entry *right)
1040{
1041 double per_left;
1042 double per_right;
1043
1044 per_left = PERCENT(left, rmt_peer);
1045 per_right = PERCENT(right, rmt_peer);
1046
1047 return per_left - per_right;
1048}
1049
1050static int
1051percent_stores_l1hit_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1052 struct hist_entry *he)
1053{
1054 int width = c2c_width(fmt, hpp, he->hists);
1055 double per = PERCENT(he, st_l1hit);
1056 char buf[10];
1057
1058 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
1059}
1060
1061static int
1062percent_stores_l1hit_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1063 struct hist_entry *he)
1064{
1065 return percent_color(fmt, hpp, he, percent_st_l1hit);
1066}
1067
1068static int64_t
1069percent_stores_l1hit_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
1070 struct hist_entry *left, struct hist_entry *right)
1071{
1072 double per_left;
1073 double per_right;
1074
1075 per_left = PERCENT(left, st_l1hit);
1076 per_right = PERCENT(right, st_l1hit);
1077
1078 return per_left - per_right;
1079}
1080
1081static int
1082percent_stores_l1miss_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1083 struct hist_entry *he)
1084{
1085 int width = c2c_width(fmt, hpp, he->hists);
1086 double per = PERCENT(he, st_l1miss);
1087 char buf[10];
1088
1089 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
1090}
1091
1092static int
1093percent_stores_l1miss_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1094 struct hist_entry *he)
1095{
1096 return percent_color(fmt, hpp, he, percent_st_l1miss);
1097}
1098
1099static int64_t
1100percent_stores_l1miss_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
1101 struct hist_entry *left, struct hist_entry *right)
1102{
1103 double per_left;
1104 double per_right;
1105
1106 per_left = PERCENT(left, st_l1miss);
1107 per_right = PERCENT(right, st_l1miss);
1108
1109 return per_left - per_right;
1110}
1111
1112static int
1113percent_stores_na_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1114 struct hist_entry *he)
1115{
1116 int width = c2c_width(fmt, hpp, he->hists);
1117 double per = PERCENT(he, st_na);
1118 char buf[10];
1119
1120 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
1121}
1122
1123static int
1124percent_stores_na_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1125 struct hist_entry *he)
1126{
1127 return percent_color(fmt, hpp, he, percent_st_na);
1128}
1129
1130static int64_t
1131percent_stores_na_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
1132 struct hist_entry *left, struct hist_entry *right)
1133{
1134 double per_left;
1135 double per_right;
1136
1137 per_left = PERCENT(left, st_na);
1138 per_right = PERCENT(right, st_na);
1139
1140 return per_left - per_right;
1141}
1142
1143STAT_FN(lcl_dram)
1144STAT_FN(rmt_dram)
1145
1146static int
1147pid_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1148 struct hist_entry *he)
1149{
1150 int width = c2c_width(fmt, hpp, he->hists);
1151
1152 return scnprintf(hpp->buf, hpp->size, "%*d", width, he->thread->pid_);
1153}
1154
1155static int64_t
1156pid_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
1157 struct hist_entry *left, struct hist_entry *right)
1158{
1159 return left->thread->pid_ - right->thread->pid_;
1160}
1161
1162static int64_t
1163empty_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
1164 struct hist_entry *left __maybe_unused,
1165 struct hist_entry *right __maybe_unused)
1166{
1167 return 0;
1168}
1169
1170static int display_metrics(struct perf_hpp *hpp, u32 val, u32 sum)
1171{
1172 int ret;
1173
1174 if (sum != 0)
1175 ret = scnprintf(hpp->buf, hpp->size, "%5.1f%% ",
1176 percent(val, sum));
1177 else
1178 ret = scnprintf(hpp->buf, hpp->size, "%6s ", "n/a");
1179
1180 return ret;
1181}
1182
1183static int
1184node_entry(struct perf_hpp_fmt *fmt __maybe_unused, struct perf_hpp *hpp,
1185 struct hist_entry *he)
1186{
1187 struct c2c_hist_entry *c2c_he;
1188 bool first = true;
1189 int node;
1190 int ret = 0;
1191
1192 c2c_he = container_of(he, struct c2c_hist_entry, he);
1193
1194 for (node = 0; node < c2c.nodes_cnt; node++) {
1195 DECLARE_BITMAP(set, c2c.cpus_cnt);
1196
1197 bitmap_zero(set, c2c.cpus_cnt);
1198 bitmap_and(set, c2c_he->cpuset, c2c.nodes[node], c2c.cpus_cnt);
1199
1200 if (bitmap_empty(set, c2c.cpus_cnt)) {
1201 if (c2c.node_info == 1) {
1202 ret = scnprintf(hpp->buf, hpp->size, "%21s", " ");
1203 advance_hpp(hpp, ret);
1204 }
1205 continue;
1206 }
1207
1208 if (!first) {
1209 ret = scnprintf(hpp->buf, hpp->size, " ");
1210 advance_hpp(hpp, ret);
1211 }
1212
1213 switch (c2c.node_info) {
1214 case 0:
1215 ret = scnprintf(hpp->buf, hpp->size, "%2d", node);
1216 advance_hpp(hpp, ret);
1217 break;
1218 case 1:
1219 {
1220 int num = bitmap_weight(set, c2c.cpus_cnt);
1221 struct c2c_stats *stats = &c2c_he->node_stats[node];
1222
1223 ret = scnprintf(hpp->buf, hpp->size, "%2d{%2d ", node, num);
1224 advance_hpp(hpp, ret);
1225
1226 switch (c2c.display) {
1227 case DISPLAY_RMT_HITM:
1228 ret = display_metrics(hpp, stats->rmt_hitm,
1229 c2c_he->stats.rmt_hitm);
1230 break;
1231 case DISPLAY_LCL_HITM:
1232 ret = display_metrics(hpp, stats->lcl_hitm,
1233 c2c_he->stats.lcl_hitm);
1234 break;
1235 case DISPLAY_TOT_HITM:
1236 ret = display_metrics(hpp, stats->tot_hitm,
1237 c2c_he->stats.tot_hitm);
1238 break;
1239 case DISPLAY_SNP_PEER:
1240 ret = display_metrics(hpp, stats->tot_peer,
1241 c2c_he->stats.tot_peer);
1242 break;
1243 default:
1244 break;
1245 }
1246
1247 advance_hpp(hpp, ret);
1248
1249 if (c2c_he->stats.store > 0) {
1250 ret = scnprintf(hpp->buf, hpp->size, "%5.1f%%}",
1251 percent(stats->store, c2c_he->stats.store));
1252 } else {
1253 ret = scnprintf(hpp->buf, hpp->size, "%6s}", "n/a");
1254 }
1255
1256 advance_hpp(hpp, ret);
1257 break;
1258 }
1259 case 2:
1260 ret = scnprintf(hpp->buf, hpp->size, "%2d{", node);
1261 advance_hpp(hpp, ret);
1262
1263 ret = bitmap_scnprintf(set, c2c.cpus_cnt, hpp->buf, hpp->size);
1264 advance_hpp(hpp, ret);
1265
1266 ret = scnprintf(hpp->buf, hpp->size, "}");
1267 advance_hpp(hpp, ret);
1268 break;
1269 default:
1270 break;
1271 }
1272
1273 first = false;
1274 }
1275
1276 return 0;
1277}
1278
1279static int
1280mean_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1281 struct hist_entry *he, double mean)
1282{
1283 int width = c2c_width(fmt, hpp, he->hists);
1284 char buf[10];
1285
1286 scnprintf(buf, 10, "%6.0f", mean);
1287 return scnprintf(hpp->buf, hpp->size, "%*s", width, buf);
1288}
1289
1290#define MEAN_ENTRY(__func, __val) \
1291static int \
1292__func(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp, struct hist_entry *he) \
1293{ \
1294 struct c2c_hist_entry *c2c_he; \
1295 c2c_he = container_of(he, struct c2c_hist_entry, he); \
1296 return mean_entry(fmt, hpp, he, avg_stats(&c2c_he->cstats.__val)); \
1297}
1298
1299MEAN_ENTRY(mean_rmt_entry, rmt_hitm);
1300MEAN_ENTRY(mean_lcl_entry, lcl_hitm);
1301MEAN_ENTRY(mean_load_entry, load);
1302MEAN_ENTRY(mean_rmt_peer_entry, rmt_peer);
1303MEAN_ENTRY(mean_lcl_peer_entry, lcl_peer);
1304
1305static int
1306cpucnt_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1307 struct hist_entry *he)
1308{
1309 struct c2c_hist_entry *c2c_he;
1310 int width = c2c_width(fmt, hpp, he->hists);
1311 char buf[10];
1312
1313 c2c_he = container_of(he, struct c2c_hist_entry, he);
1314
1315 scnprintf(buf, 10, "%d", bitmap_weight(c2c_he->cpuset, c2c.cpus_cnt));
1316 return scnprintf(hpp->buf, hpp->size, "%*s", width, buf);
1317}
1318
1319static int
1320cl_idx_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1321 struct hist_entry *he)
1322{
1323 struct c2c_hist_entry *c2c_he;
1324 int width = c2c_width(fmt, hpp, he->hists);
1325 char buf[10];
1326
1327 c2c_he = container_of(he, struct c2c_hist_entry, he);
1328
1329 scnprintf(buf, 10, "%u", c2c_he->cacheline_idx);
1330 return scnprintf(hpp->buf, hpp->size, "%*s", width, buf);
1331}
1332
1333static int
1334cl_idx_empty_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1335 struct hist_entry *he)
1336{
1337 int width = c2c_width(fmt, hpp, he->hists);
1338
1339 return scnprintf(hpp->buf, hpp->size, "%*s", width, "");
1340}
1341
1342#define HEADER_LOW(__h) \
1343 { \
1344 .line[1] = { \
1345 .text = __h, \
1346 }, \
1347 }
1348
1349#define HEADER_BOTH(__h0, __h1) \
1350 { \
1351 .line[0] = { \
1352 .text = __h0, \
1353 }, \
1354 .line[1] = { \
1355 .text = __h1, \
1356 }, \
1357 }
1358
1359#define HEADER_SPAN(__h0, __h1, __s) \
1360 { \
1361 .line[0] = { \
1362 .text = __h0, \
1363 .span = __s, \
1364 }, \
1365 .line[1] = { \
1366 .text = __h1, \
1367 }, \
1368 }
1369
1370#define HEADER_SPAN_LOW(__h) \
1371 { \
1372 .line[1] = { \
1373 .text = __h, \
1374 }, \
1375 }
1376
1377static struct c2c_dimension dim_dcacheline = {
1378 .header = HEADER_SPAN("--- Cacheline ----", "Address", 2),
1379 .name = "dcacheline",
1380 .cmp = dcacheline_cmp,
1381 .entry = dcacheline_entry,
1382 .width = 18,
1383};
1384
1385static struct c2c_dimension dim_dcacheline_node = {
1386 .header = HEADER_LOW("Node"),
1387 .name = "dcacheline_node",
1388 .cmp = empty_cmp,
1389 .entry = dcacheline_node_entry,
1390 .width = 4,
1391};
1392
1393static struct c2c_dimension dim_dcacheline_count = {
1394 .header = HEADER_LOW("PA cnt"),
1395 .name = "dcacheline_count",
1396 .cmp = empty_cmp,
1397 .entry = dcacheline_node_count,
1398 .width = 6,
1399};
1400
1401static struct c2c_header header_offset_tui = HEADER_SPAN("-----", "Off", 2);
1402
1403static struct c2c_dimension dim_offset = {
1404 .header = HEADER_SPAN("--- Data address -", "Offset", 2),
1405 .name = "offset",
1406 .cmp = offset_cmp,
1407 .entry = offset_entry,
1408 .width = 18,
1409};
1410
1411static struct c2c_dimension dim_offset_node = {
1412 .header = HEADER_LOW("Node"),
1413 .name = "offset_node",
1414 .cmp = empty_cmp,
1415 .entry = dcacheline_node_entry,
1416 .width = 4,
1417};
1418
1419static struct c2c_dimension dim_iaddr = {
1420 .header = HEADER_LOW("Code address"),
1421 .name = "iaddr",
1422 .cmp = iaddr_cmp,
1423 .entry = iaddr_entry,
1424 .width = 18,
1425};
1426
1427static struct c2c_dimension dim_tot_hitm = {
1428 .header = HEADER_SPAN("------- Load Hitm -------", "Total", 2),
1429 .name = "tot_hitm",
1430 .cmp = tot_hitm_cmp,
1431 .entry = tot_hitm_entry,
1432 .width = 7,
1433};
1434
1435static struct c2c_dimension dim_lcl_hitm = {
1436 .header = HEADER_SPAN_LOW("LclHitm"),
1437 .name = "lcl_hitm",
1438 .cmp = lcl_hitm_cmp,
1439 .entry = lcl_hitm_entry,
1440 .width = 7,
1441};
1442
1443static struct c2c_dimension dim_rmt_hitm = {
1444 .header = HEADER_SPAN_LOW("RmtHitm"),
1445 .name = "rmt_hitm",
1446 .cmp = rmt_hitm_cmp,
1447 .entry = rmt_hitm_entry,
1448 .width = 7,
1449};
1450
1451static struct c2c_dimension dim_tot_peer = {
1452 .header = HEADER_SPAN("------- Load Peer -------", "Total", 2),
1453 .name = "tot_peer",
1454 .cmp = tot_peer_cmp,
1455 .entry = tot_peer_entry,
1456 .width = 7,
1457};
1458
1459static struct c2c_dimension dim_lcl_peer = {
1460 .header = HEADER_SPAN_LOW("Local"),
1461 .name = "lcl_peer",
1462 .cmp = lcl_peer_cmp,
1463 .entry = lcl_peer_entry,
1464 .width = 7,
1465};
1466
1467static struct c2c_dimension dim_rmt_peer = {
1468 .header = HEADER_SPAN_LOW("Remote"),
1469 .name = "rmt_peer",
1470 .cmp = rmt_peer_cmp,
1471 .entry = rmt_peer_entry,
1472 .width = 7,
1473};
1474
1475static struct c2c_dimension dim_cl_rmt_hitm = {
1476 .header = HEADER_SPAN("----- HITM -----", "Rmt", 1),
1477 .name = "cl_rmt_hitm",
1478 .cmp = rmt_hitm_cmp,
1479 .entry = rmt_hitm_entry,
1480 .width = 7,
1481};
1482
1483static struct c2c_dimension dim_cl_lcl_hitm = {
1484 .header = HEADER_SPAN_LOW("Lcl"),
1485 .name = "cl_lcl_hitm",
1486 .cmp = lcl_hitm_cmp,
1487 .entry = lcl_hitm_entry,
1488 .width = 7,
1489};
1490
1491static struct c2c_dimension dim_cl_rmt_peer = {
1492 .header = HEADER_SPAN("----- Peer -----", "Rmt", 1),
1493 .name = "cl_rmt_peer",
1494 .cmp = rmt_peer_cmp,
1495 .entry = rmt_peer_entry,
1496 .width = 7,
1497};
1498
1499static struct c2c_dimension dim_cl_lcl_peer = {
1500 .header = HEADER_SPAN_LOW("Lcl"),
1501 .name = "cl_lcl_peer",
1502 .cmp = lcl_peer_cmp,
1503 .entry = lcl_peer_entry,
1504 .width = 7,
1505};
1506
1507static struct c2c_dimension dim_tot_stores = {
1508 .header = HEADER_BOTH("Total", "Stores"),
1509 .name = "tot_stores",
1510 .cmp = store_cmp,
1511 .entry = store_entry,
1512 .width = 7,
1513};
1514
1515static struct c2c_dimension dim_stores_l1hit = {
1516 .header = HEADER_SPAN("--------- Stores --------", "L1Hit", 2),
1517 .name = "stores_l1hit",
1518 .cmp = st_l1hit_cmp,
1519 .entry = st_l1hit_entry,
1520 .width = 7,
1521};
1522
1523static struct c2c_dimension dim_stores_l1miss = {
1524 .header = HEADER_SPAN_LOW("L1Miss"),
1525 .name = "stores_l1miss",
1526 .cmp = st_l1miss_cmp,
1527 .entry = st_l1miss_entry,
1528 .width = 7,
1529};
1530
1531static struct c2c_dimension dim_stores_na = {
1532 .header = HEADER_SPAN_LOW("N/A"),
1533 .name = "stores_na",
1534 .cmp = st_na_cmp,
1535 .entry = st_na_entry,
1536 .width = 7,
1537};
1538
1539static struct c2c_dimension dim_cl_stores_l1hit = {
1540 .header = HEADER_SPAN("------- Store Refs ------", "L1 Hit", 2),
1541 .name = "cl_stores_l1hit",
1542 .cmp = st_l1hit_cmp,
1543 .entry = st_l1hit_entry,
1544 .width = 7,
1545};
1546
1547static struct c2c_dimension dim_cl_stores_l1miss = {
1548 .header = HEADER_SPAN_LOW("L1 Miss"),
1549 .name = "cl_stores_l1miss",
1550 .cmp = st_l1miss_cmp,
1551 .entry = st_l1miss_entry,
1552 .width = 7,
1553};
1554
1555static struct c2c_dimension dim_cl_stores_na = {
1556 .header = HEADER_SPAN_LOW("N/A"),
1557 .name = "cl_stores_na",
1558 .cmp = st_na_cmp,
1559 .entry = st_na_entry,
1560 .width = 7,
1561};
1562
1563static struct c2c_dimension dim_ld_fbhit = {
1564 .header = HEADER_SPAN("----- Core Load Hit -----", "FB", 2),
1565 .name = "ld_fbhit",
1566 .cmp = ld_fbhit_cmp,
1567 .entry = ld_fbhit_entry,
1568 .width = 7,
1569};
1570
1571static struct c2c_dimension dim_ld_l1hit = {
1572 .header = HEADER_SPAN_LOW("L1"),
1573 .name = "ld_l1hit",
1574 .cmp = ld_l1hit_cmp,
1575 .entry = ld_l1hit_entry,
1576 .width = 7,
1577};
1578
1579static struct c2c_dimension dim_ld_l2hit = {
1580 .header = HEADER_SPAN_LOW("L2"),
1581 .name = "ld_l2hit",
1582 .cmp = ld_l2hit_cmp,
1583 .entry = ld_l2hit_entry,
1584 .width = 7,
1585};
1586
1587static struct c2c_dimension dim_ld_llchit = {
1588 .header = HEADER_SPAN("- LLC Load Hit --", "LclHit", 1),
1589 .name = "ld_lclhit",
1590 .cmp = ld_llchit_cmp,
1591 .entry = ld_llchit_entry,
1592 .width = 8,
1593};
1594
1595static struct c2c_dimension dim_ld_rmthit = {
1596 .header = HEADER_SPAN("- RMT Load Hit --", "RmtHit", 1),
1597 .name = "ld_rmthit",
1598 .cmp = rmt_hit_cmp,
1599 .entry = rmt_hit_entry,
1600 .width = 8,
1601};
1602
1603static struct c2c_dimension dim_tot_recs = {
1604 .header = HEADER_BOTH("Total", "records"),
1605 .name = "tot_recs",
1606 .cmp = tot_recs_cmp,
1607 .entry = tot_recs_entry,
1608 .width = 7,
1609};
1610
1611static struct c2c_dimension dim_tot_loads = {
1612 .header = HEADER_BOTH("Total", "Loads"),
1613 .name = "tot_loads",
1614 .cmp = tot_loads_cmp,
1615 .entry = tot_loads_entry,
1616 .width = 7,
1617};
1618
1619static struct c2c_header percent_costly_snoop_header[] = {
1620 [DISPLAY_LCL_HITM] = HEADER_BOTH("Lcl", "Hitm"),
1621 [DISPLAY_RMT_HITM] = HEADER_BOTH("Rmt", "Hitm"),
1622 [DISPLAY_TOT_HITM] = HEADER_BOTH("Tot", "Hitm"),
1623 [DISPLAY_SNP_PEER] = HEADER_BOTH("Peer", "Snoop"),
1624};
1625
1626static struct c2c_dimension dim_percent_costly_snoop = {
1627 .name = "percent_costly_snoop",
1628 .cmp = percent_costly_snoop_cmp,
1629 .entry = percent_costly_snoop_entry,
1630 .color = percent_costly_snoop_color,
1631 .width = 7,
1632};
1633
1634static struct c2c_dimension dim_percent_rmt_hitm = {
1635 .header = HEADER_SPAN("----- HITM -----", "RmtHitm", 1),
1636 .name = "percent_rmt_hitm",
1637 .cmp = percent_rmt_hitm_cmp,
1638 .entry = percent_rmt_hitm_entry,
1639 .color = percent_rmt_hitm_color,
1640 .width = 7,
1641};
1642
1643static struct c2c_dimension dim_percent_lcl_hitm = {
1644 .header = HEADER_SPAN_LOW("LclHitm"),
1645 .name = "percent_lcl_hitm",
1646 .cmp = percent_lcl_hitm_cmp,
1647 .entry = percent_lcl_hitm_entry,
1648 .color = percent_lcl_hitm_color,
1649 .width = 7,
1650};
1651
1652static struct c2c_dimension dim_percent_rmt_peer = {
1653 .header = HEADER_SPAN("-- Peer Snoop --", "Rmt", 1),
1654 .name = "percent_rmt_peer",
1655 .cmp = percent_rmt_peer_cmp,
1656 .entry = percent_rmt_peer_entry,
1657 .color = percent_rmt_peer_color,
1658 .width = 7,
1659};
1660
1661static struct c2c_dimension dim_percent_lcl_peer = {
1662 .header = HEADER_SPAN_LOW("Lcl"),
1663 .name = "percent_lcl_peer",
1664 .cmp = percent_lcl_peer_cmp,
1665 .entry = percent_lcl_peer_entry,
1666 .color = percent_lcl_peer_color,
1667 .width = 7,
1668};
1669
1670static struct c2c_dimension dim_percent_stores_l1hit = {
1671 .header = HEADER_SPAN("------- Store Refs ------", "L1 Hit", 2),
1672 .name = "percent_stores_l1hit",
1673 .cmp = percent_stores_l1hit_cmp,
1674 .entry = percent_stores_l1hit_entry,
1675 .color = percent_stores_l1hit_color,
1676 .width = 7,
1677};
1678
1679static struct c2c_dimension dim_percent_stores_l1miss = {
1680 .header = HEADER_SPAN_LOW("L1 Miss"),
1681 .name = "percent_stores_l1miss",
1682 .cmp = percent_stores_l1miss_cmp,
1683 .entry = percent_stores_l1miss_entry,
1684 .color = percent_stores_l1miss_color,
1685 .width = 7,
1686};
1687
1688static struct c2c_dimension dim_percent_stores_na = {
1689 .header = HEADER_SPAN_LOW("N/A"),
1690 .name = "percent_stores_na",
1691 .cmp = percent_stores_na_cmp,
1692 .entry = percent_stores_na_entry,
1693 .color = percent_stores_na_color,
1694 .width = 7,
1695};
1696
1697static struct c2c_dimension dim_dram_lcl = {
1698 .header = HEADER_SPAN("--- Load Dram ----", "Lcl", 1),
1699 .name = "dram_lcl",
1700 .cmp = lcl_dram_cmp,
1701 .entry = lcl_dram_entry,
1702 .width = 8,
1703};
1704
1705static struct c2c_dimension dim_dram_rmt = {
1706 .header = HEADER_SPAN_LOW("Rmt"),
1707 .name = "dram_rmt",
1708 .cmp = rmt_dram_cmp,
1709 .entry = rmt_dram_entry,
1710 .width = 8,
1711};
1712
1713static struct c2c_dimension dim_pid = {
1714 .header = HEADER_LOW("Pid"),
1715 .name = "pid",
1716 .cmp = pid_cmp,
1717 .entry = pid_entry,
1718 .width = 7,
1719};
1720
1721static struct c2c_dimension dim_tid = {
1722 .header = HEADER_LOW("Tid"),
1723 .name = "tid",
1724 .se = &sort_thread,
1725};
1726
1727static struct c2c_dimension dim_symbol = {
1728 .name = "symbol",
1729 .se = &sort_sym,
1730};
1731
1732static struct c2c_dimension dim_dso = {
1733 .header = HEADER_BOTH("Shared", "Object"),
1734 .name = "dso",
1735 .se = &sort_dso,
1736};
1737
1738static struct c2c_dimension dim_node = {
1739 .name = "node",
1740 .cmp = empty_cmp,
1741 .entry = node_entry,
1742 .width = 4,
1743};
1744
1745static struct c2c_dimension dim_mean_rmt = {
1746 .header = HEADER_SPAN("---------- cycles ----------", "rmt hitm", 2),
1747 .name = "mean_rmt",
1748 .cmp = empty_cmp,
1749 .entry = mean_rmt_entry,
1750 .width = 8,
1751};
1752
1753static struct c2c_dimension dim_mean_lcl = {
1754 .header = HEADER_SPAN_LOW("lcl hitm"),
1755 .name = "mean_lcl",
1756 .cmp = empty_cmp,
1757 .entry = mean_lcl_entry,
1758 .width = 8,
1759};
1760
1761static struct c2c_dimension dim_mean_load = {
1762 .header = HEADER_SPAN_LOW("load"),
1763 .name = "mean_load",
1764 .cmp = empty_cmp,
1765 .entry = mean_load_entry,
1766 .width = 8,
1767};
1768
1769static struct c2c_dimension dim_mean_rmt_peer = {
1770 .header = HEADER_SPAN("---------- cycles ----------", "rmt peer", 2),
1771 .name = "mean_rmt_peer",
1772 .cmp = empty_cmp,
1773 .entry = mean_rmt_peer_entry,
1774 .width = 8,
1775};
1776
1777static struct c2c_dimension dim_mean_lcl_peer = {
1778 .header = HEADER_SPAN_LOW("lcl peer"),
1779 .name = "mean_lcl_peer",
1780 .cmp = empty_cmp,
1781 .entry = mean_lcl_peer_entry,
1782 .width = 8,
1783};
1784
1785static struct c2c_dimension dim_cpucnt = {
1786 .header = HEADER_BOTH("cpu", "cnt"),
1787 .name = "cpucnt",
1788 .cmp = empty_cmp,
1789 .entry = cpucnt_entry,
1790 .width = 8,
1791};
1792
1793static struct c2c_dimension dim_srcline = {
1794 .name = "cl_srcline",
1795 .se = &sort_srcline,
1796};
1797
1798static struct c2c_dimension dim_dcacheline_idx = {
1799 .header = HEADER_LOW("Index"),
1800 .name = "cl_idx",
1801 .cmp = empty_cmp,
1802 .entry = cl_idx_entry,
1803 .width = 5,
1804};
1805
1806static struct c2c_dimension dim_dcacheline_num = {
1807 .header = HEADER_LOW("Num"),
1808 .name = "cl_num",
1809 .cmp = empty_cmp,
1810 .entry = cl_idx_entry,
1811 .width = 5,
1812};
1813
1814static struct c2c_dimension dim_dcacheline_num_empty = {
1815 .header = HEADER_LOW("Num"),
1816 .name = "cl_num_empty",
1817 .cmp = empty_cmp,
1818 .entry = cl_idx_empty_entry,
1819 .width = 5,
1820};
1821
1822static struct c2c_dimension *dimensions[] = {
1823 &dim_dcacheline,
1824 &dim_dcacheline_node,
1825 &dim_dcacheline_count,
1826 &dim_offset,
1827 &dim_offset_node,
1828 &dim_iaddr,
1829 &dim_tot_hitm,
1830 &dim_lcl_hitm,
1831 &dim_rmt_hitm,
1832 &dim_tot_peer,
1833 &dim_lcl_peer,
1834 &dim_rmt_peer,
1835 &dim_cl_lcl_hitm,
1836 &dim_cl_rmt_hitm,
1837 &dim_cl_lcl_peer,
1838 &dim_cl_rmt_peer,
1839 &dim_tot_stores,
1840 &dim_stores_l1hit,
1841 &dim_stores_l1miss,
1842 &dim_stores_na,
1843 &dim_cl_stores_l1hit,
1844 &dim_cl_stores_l1miss,
1845 &dim_cl_stores_na,
1846 &dim_ld_fbhit,
1847 &dim_ld_l1hit,
1848 &dim_ld_l2hit,
1849 &dim_ld_llchit,
1850 &dim_ld_rmthit,
1851 &dim_tot_recs,
1852 &dim_tot_loads,
1853 &dim_percent_costly_snoop,
1854 &dim_percent_rmt_hitm,
1855 &dim_percent_lcl_hitm,
1856 &dim_percent_rmt_peer,
1857 &dim_percent_lcl_peer,
1858 &dim_percent_stores_l1hit,
1859 &dim_percent_stores_l1miss,
1860 &dim_percent_stores_na,
1861 &dim_dram_lcl,
1862 &dim_dram_rmt,
1863 &dim_pid,
1864 &dim_tid,
1865 &dim_symbol,
1866 &dim_dso,
1867 &dim_node,
1868 &dim_mean_rmt,
1869 &dim_mean_lcl,
1870 &dim_mean_rmt_peer,
1871 &dim_mean_lcl_peer,
1872 &dim_mean_load,
1873 &dim_cpucnt,
1874 &dim_srcline,
1875 &dim_dcacheline_idx,
1876 &dim_dcacheline_num,
1877 &dim_dcacheline_num_empty,
1878 NULL,
1879};
1880
1881static void fmt_free(struct perf_hpp_fmt *fmt)
1882{
1883 struct c2c_fmt *c2c_fmt;
1884
1885 c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
1886 free(c2c_fmt);
1887}
1888
1889static bool fmt_equal(struct perf_hpp_fmt *a, struct perf_hpp_fmt *b)
1890{
1891 struct c2c_fmt *c2c_a = container_of(a, struct c2c_fmt, fmt);
1892 struct c2c_fmt *c2c_b = container_of(b, struct c2c_fmt, fmt);
1893
1894 return c2c_a->dim == c2c_b->dim;
1895}
1896
1897static struct c2c_dimension *get_dimension(const char *name)
1898{
1899 unsigned int i;
1900
1901 for (i = 0; dimensions[i]; i++) {
1902 struct c2c_dimension *dim = dimensions[i];
1903
1904 if (!strcmp(dim->name, name))
1905 return dim;
1906 }
1907
1908 return NULL;
1909}
1910
1911static int c2c_se_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1912 struct hist_entry *he)
1913{
1914 struct c2c_fmt *c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
1915 struct c2c_dimension *dim = c2c_fmt->dim;
1916 size_t len = fmt->user_len;
1917
1918 if (!len) {
1919 len = hists__col_len(he->hists, dim->se->se_width_idx);
1920
1921 if (dim == &dim_symbol || dim == &dim_srcline)
1922 len = symbol_width(he->hists, dim->se);
1923 }
1924
1925 return dim->se->se_snprintf(he, hpp->buf, hpp->size, len);
1926}
1927
1928static int64_t c2c_se_cmp(struct perf_hpp_fmt *fmt,
1929 struct hist_entry *a, struct hist_entry *b)
1930{
1931 struct c2c_fmt *c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
1932 struct c2c_dimension *dim = c2c_fmt->dim;
1933
1934 return dim->se->se_cmp(a, b);
1935}
1936
1937static int64_t c2c_se_collapse(struct perf_hpp_fmt *fmt,
1938 struct hist_entry *a, struct hist_entry *b)
1939{
1940 struct c2c_fmt *c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
1941 struct c2c_dimension *dim = c2c_fmt->dim;
1942 int64_t (*collapse_fn)(struct hist_entry *, struct hist_entry *);
1943
1944 collapse_fn = dim->se->se_collapse ?: dim->se->se_cmp;
1945 return collapse_fn(a, b);
1946}
1947
1948static struct c2c_fmt *get_format(const char *name)
1949{
1950 struct c2c_dimension *dim = get_dimension(name);
1951 struct c2c_fmt *c2c_fmt;
1952 struct perf_hpp_fmt *fmt;
1953
1954 if (!dim)
1955 return NULL;
1956
1957 c2c_fmt = zalloc(sizeof(*c2c_fmt));
1958 if (!c2c_fmt)
1959 return NULL;
1960
1961 c2c_fmt->dim = dim;
1962
1963 fmt = &c2c_fmt->fmt;
1964 INIT_LIST_HEAD(&fmt->list);
1965 INIT_LIST_HEAD(&fmt->sort_list);
1966
1967 fmt->cmp = dim->se ? c2c_se_cmp : dim->cmp;
1968 fmt->sort = dim->se ? c2c_se_cmp : dim->cmp;
1969 fmt->color = dim->se ? NULL : dim->color;
1970 fmt->entry = dim->se ? c2c_se_entry : dim->entry;
1971 fmt->header = c2c_header;
1972 fmt->width = c2c_width;
1973 fmt->collapse = dim->se ? c2c_se_collapse : dim->cmp;
1974 fmt->equal = fmt_equal;
1975 fmt->free = fmt_free;
1976
1977 return c2c_fmt;
1978}
1979
1980static int c2c_hists__init_output(struct perf_hpp_list *hpp_list, char *name)
1981{
1982 struct c2c_fmt *c2c_fmt = get_format(name);
1983
1984 if (!c2c_fmt) {
1985 reset_dimensions();
1986 return output_field_add(hpp_list, name);
1987 }
1988
1989 perf_hpp_list__column_register(hpp_list, &c2c_fmt->fmt);
1990 return 0;
1991}
1992
1993static int c2c_hists__init_sort(struct perf_hpp_list *hpp_list, char *name)
1994{
1995 struct c2c_fmt *c2c_fmt = get_format(name);
1996 struct c2c_dimension *dim;
1997
1998 if (!c2c_fmt) {
1999 reset_dimensions();
2000 return sort_dimension__add(hpp_list, name, NULL, 0);
2001 }
2002
2003 dim = c2c_fmt->dim;
2004 if (dim == &dim_dso)
2005 hpp_list->dso = 1;
2006
2007 perf_hpp_list__register_sort_field(hpp_list, &c2c_fmt->fmt);
2008 return 0;
2009}
2010
2011#define PARSE_LIST(_list, _fn) \
2012 do { \
2013 char *tmp, *tok; \
2014 ret = 0; \
2015 \
2016 if (!_list) \
2017 break; \
2018 \
2019 for (tok = strtok_r((char *)_list, ", ", &tmp); \
2020 tok; tok = strtok_r(NULL, ", ", &tmp)) { \
2021 ret = _fn(hpp_list, tok); \
2022 if (ret == -EINVAL) { \
2023 pr_err("Invalid --fields key: `%s'", tok); \
2024 break; \
2025 } else if (ret == -ESRCH) { \
2026 pr_err("Unknown --fields key: `%s'", tok); \
2027 break; \
2028 } \
2029 } \
2030 } while (0)
2031
2032static int hpp_list__parse(struct perf_hpp_list *hpp_list,
2033 const char *output_,
2034 const char *sort_)
2035{
2036 char *output = output_ ? strdup(output_) : NULL;
2037 char *sort = sort_ ? strdup(sort_) : NULL;
2038 int ret;
2039
2040 PARSE_LIST(output, c2c_hists__init_output);
2041 PARSE_LIST(sort, c2c_hists__init_sort);
2042
2043 /* copy sort keys to output fields */
2044 perf_hpp__setup_output_field(hpp_list);
2045
2046 /*
2047 * We dont need other sorting keys other than those
2048 * we already specified. It also really slows down
2049 * the processing a lot with big number of output
2050 * fields, so switching this off for c2c.
2051 */
2052
2053#if 0
2054 /* and then copy output fields to sort keys */
2055 perf_hpp__append_sort_keys(&hists->list);
2056#endif
2057
2058 free(output);
2059 free(sort);
2060 return ret;
2061}
2062
2063static int c2c_hists__init(struct c2c_hists *hists,
2064 const char *sort,
2065 int nr_header_lines)
2066{
2067 __hists__init(&hists->hists, &hists->list);
2068
2069 /*
2070 * Initialize only with sort fields, we need to resort
2071 * later anyway, and that's where we add output fields
2072 * as well.
2073 */
2074 perf_hpp_list__init(&hists->list);
2075
2076 /* Overload number of header lines.*/
2077 hists->list.nr_header_lines = nr_header_lines;
2078
2079 return hpp_list__parse(&hists->list, NULL, sort);
2080}
2081
2082static int c2c_hists__reinit(struct c2c_hists *c2c_hists,
2083 const char *output,
2084 const char *sort)
2085{
2086 perf_hpp__reset_output_field(&c2c_hists->list);
2087 return hpp_list__parse(&c2c_hists->list, output, sort);
2088}
2089
2090#define DISPLAY_LINE_LIMIT 0.001
2091
2092static u8 filter_display(u32 val, u32 sum)
2093{
2094 if (sum == 0 || ((double)val / sum) < DISPLAY_LINE_LIMIT)
2095 return HIST_FILTER__C2C;
2096
2097 return 0;
2098}
2099
2100static bool he__display(struct hist_entry *he, struct c2c_stats *stats)
2101{
2102 struct c2c_hist_entry *c2c_he;
2103
2104 if (c2c.show_all)
2105 return true;
2106
2107 c2c_he = container_of(he, struct c2c_hist_entry, he);
2108
2109 switch (c2c.display) {
2110 case DISPLAY_LCL_HITM:
2111 he->filtered = filter_display(c2c_he->stats.lcl_hitm,
2112 stats->lcl_hitm);
2113 break;
2114 case DISPLAY_RMT_HITM:
2115 he->filtered = filter_display(c2c_he->stats.rmt_hitm,
2116 stats->rmt_hitm);
2117 break;
2118 case DISPLAY_TOT_HITM:
2119 he->filtered = filter_display(c2c_he->stats.tot_hitm,
2120 stats->tot_hitm);
2121 break;
2122 case DISPLAY_SNP_PEER:
2123 he->filtered = filter_display(c2c_he->stats.tot_peer,
2124 stats->tot_peer);
2125 break;
2126 default:
2127 break;
2128 }
2129
2130 return he->filtered == 0;
2131}
2132
2133static inline bool is_valid_hist_entry(struct hist_entry *he)
2134{
2135 struct c2c_hist_entry *c2c_he;
2136 bool has_record = false;
2137
2138 c2c_he = container_of(he, struct c2c_hist_entry, he);
2139
2140 /* It's a valid entry if contains stores */
2141 if (c2c_he->stats.store)
2142 return true;
2143
2144 switch (c2c.display) {
2145 case DISPLAY_LCL_HITM:
2146 has_record = !!c2c_he->stats.lcl_hitm;
2147 break;
2148 case DISPLAY_RMT_HITM:
2149 has_record = !!c2c_he->stats.rmt_hitm;
2150 break;
2151 case DISPLAY_TOT_HITM:
2152 has_record = !!c2c_he->stats.tot_hitm;
2153 break;
2154 case DISPLAY_SNP_PEER:
2155 has_record = !!c2c_he->stats.tot_peer;
2156 default:
2157 break;
2158 }
2159
2160 return has_record;
2161}
2162
2163static void set_node_width(struct c2c_hist_entry *c2c_he, int len)
2164{
2165 struct c2c_dimension *dim;
2166
2167 dim = &c2c.hists == c2c_he->hists ?
2168 &dim_dcacheline_node : &dim_offset_node;
2169
2170 if (len > dim->width)
2171 dim->width = len;
2172}
2173
2174static int set_nodestr(struct c2c_hist_entry *c2c_he)
2175{
2176 char buf[30];
2177 int len;
2178
2179 if (c2c_he->nodestr)
2180 return 0;
2181
2182 if (!bitmap_empty(c2c_he->nodeset, c2c.nodes_cnt)) {
2183 len = bitmap_scnprintf(c2c_he->nodeset, c2c.nodes_cnt,
2184 buf, sizeof(buf));
2185 } else {
2186 len = scnprintf(buf, sizeof(buf), "N/A");
2187 }
2188
2189 set_node_width(c2c_he, len);
2190 c2c_he->nodestr = strdup(buf);
2191 return c2c_he->nodestr ? 0 : -ENOMEM;
2192}
2193
2194static void calc_width(struct c2c_hist_entry *c2c_he)
2195{
2196 struct c2c_hists *c2c_hists;
2197
2198 c2c_hists = container_of(c2c_he->he.hists, struct c2c_hists, hists);
2199 hists__calc_col_len(&c2c_hists->hists, &c2c_he->he);
2200 set_nodestr(c2c_he);
2201}
2202
2203static int filter_cb(struct hist_entry *he, void *arg __maybe_unused)
2204{
2205 struct c2c_hist_entry *c2c_he;
2206
2207 c2c_he = container_of(he, struct c2c_hist_entry, he);
2208
2209 if (c2c.show_src && !he->srcline)
2210 he->srcline = hist_entry__srcline(he);
2211
2212 calc_width(c2c_he);
2213
2214 if (!is_valid_hist_entry(he))
2215 he->filtered = HIST_FILTER__C2C;
2216
2217 return 0;
2218}
2219
2220static int resort_cl_cb(struct hist_entry *he, void *arg __maybe_unused)
2221{
2222 struct c2c_hist_entry *c2c_he;
2223 struct c2c_hists *c2c_hists;
2224 bool display = he__display(he, &c2c.shared_clines_stats);
2225
2226 c2c_he = container_of(he, struct c2c_hist_entry, he);
2227 c2c_hists = c2c_he->hists;
2228
2229 if (display && c2c_hists) {
2230 static unsigned int idx;
2231
2232 c2c_he->cacheline_idx = idx++;
2233 calc_width(c2c_he);
2234
2235 c2c_hists__reinit(c2c_hists, c2c.cl_output, c2c.cl_resort);
2236
2237 hists__collapse_resort(&c2c_hists->hists, NULL);
2238 hists__output_resort_cb(&c2c_hists->hists, NULL, filter_cb);
2239 }
2240
2241 return 0;
2242}
2243
2244static struct c2c_header header_node_0 = HEADER_LOW("Node");
2245static struct c2c_header header_node_1_hitms_stores =
2246 HEADER_LOW("Node{cpus %hitms %stores}");
2247static struct c2c_header header_node_1_peers_stores =
2248 HEADER_LOW("Node{cpus %peers %stores}");
2249static struct c2c_header header_node_2 = HEADER_LOW("Node{cpu list}");
2250
2251static void setup_nodes_header(void)
2252{
2253 switch (c2c.node_info) {
2254 case 0:
2255 dim_node.header = header_node_0;
2256 break;
2257 case 1:
2258 if (c2c.display == DISPLAY_SNP_PEER)
2259 dim_node.header = header_node_1_peers_stores;
2260 else
2261 dim_node.header = header_node_1_hitms_stores;
2262 break;
2263 case 2:
2264 dim_node.header = header_node_2;
2265 break;
2266 default:
2267 break;
2268 }
2269
2270 return;
2271}
2272
2273static int setup_nodes(struct perf_session *session)
2274{
2275 struct numa_node *n;
2276 unsigned long **nodes;
2277 int node, idx;
2278 struct perf_cpu cpu;
2279 int *cpu2node;
2280
2281 if (c2c.node_info > 2)
2282 c2c.node_info = 2;
2283
2284 c2c.nodes_cnt = session->header.env.nr_numa_nodes;
2285 c2c.cpus_cnt = session->header.env.nr_cpus_avail;
2286
2287 n = session->header.env.numa_nodes;
2288 if (!n)
2289 return -EINVAL;
2290
2291 nodes = zalloc(sizeof(unsigned long *) * c2c.nodes_cnt);
2292 if (!nodes)
2293 return -ENOMEM;
2294
2295 c2c.nodes = nodes;
2296
2297 cpu2node = zalloc(sizeof(int) * c2c.cpus_cnt);
2298 if (!cpu2node)
2299 return -ENOMEM;
2300
2301 for (idx = 0; idx < c2c.cpus_cnt; idx++)
2302 cpu2node[idx] = -1;
2303
2304 c2c.cpu2node = cpu2node;
2305
2306 for (node = 0; node < c2c.nodes_cnt; node++) {
2307 struct perf_cpu_map *map = n[node].map;
2308 unsigned long *set;
2309
2310 set = bitmap_zalloc(c2c.cpus_cnt);
2311 if (!set)
2312 return -ENOMEM;
2313
2314 nodes[node] = set;
2315
2316 /* empty node, skip */
2317 if (perf_cpu_map__empty(map))
2318 continue;
2319
2320 perf_cpu_map__for_each_cpu(cpu, idx, map) {
2321 __set_bit(cpu.cpu, set);
2322
2323 if (WARN_ONCE(cpu2node[cpu.cpu] != -1, "node/cpu topology bug"))
2324 return -EINVAL;
2325
2326 cpu2node[cpu.cpu] = node;
2327 }
2328 }
2329
2330 setup_nodes_header();
2331 return 0;
2332}
2333
2334#define HAS_HITMS(__h) ((__h)->stats.lcl_hitm || (__h)->stats.rmt_hitm)
2335#define HAS_PEER(__h) ((__h)->stats.lcl_peer || (__h)->stats.rmt_peer)
2336
2337static int resort_shared_cl_cb(struct hist_entry *he, void *arg __maybe_unused)
2338{
2339 struct c2c_hist_entry *c2c_he;
2340 c2c_he = container_of(he, struct c2c_hist_entry, he);
2341
2342 if (HAS_HITMS(c2c_he) || HAS_PEER(c2c_he)) {
2343 c2c.shared_clines++;
2344 c2c_add_stats(&c2c.shared_clines_stats, &c2c_he->stats);
2345 }
2346
2347 return 0;
2348}
2349
2350static int hists__iterate_cb(struct hists *hists, hists__resort_cb_t cb)
2351{
2352 struct rb_node *next = rb_first_cached(&hists->entries);
2353 int ret = 0;
2354
2355 while (next) {
2356 struct hist_entry *he;
2357
2358 he = rb_entry(next, struct hist_entry, rb_node);
2359 ret = cb(he, NULL);
2360 if (ret)
2361 break;
2362 next = rb_next(&he->rb_node);
2363 }
2364
2365 return ret;
2366}
2367
2368static void print_c2c__display_stats(FILE *out)
2369{
2370 int llc_misses;
2371 struct c2c_stats *stats = &c2c.hists.stats;
2372
2373 llc_misses = get_load_llc_misses(stats);
2374
2375 fprintf(out, "=================================================\n");
2376 fprintf(out, " Trace Event Information \n");
2377 fprintf(out, "=================================================\n");
2378 fprintf(out, " Total records : %10d\n", stats->nr_entries);
2379 fprintf(out, " Locked Load/Store Operations : %10d\n", stats->locks);
2380 fprintf(out, " Load Operations : %10d\n", stats->load);
2381 fprintf(out, " Loads - uncacheable : %10d\n", stats->ld_uncache);
2382 fprintf(out, " Loads - IO : %10d\n", stats->ld_io);
2383 fprintf(out, " Loads - Miss : %10d\n", stats->ld_miss);
2384 fprintf(out, " Loads - no mapping : %10d\n", stats->ld_noadrs);
2385 fprintf(out, " Load Fill Buffer Hit : %10d\n", stats->ld_fbhit);
2386 fprintf(out, " Load L1D hit : %10d\n", stats->ld_l1hit);
2387 fprintf(out, " Load L2D hit : %10d\n", stats->ld_l2hit);
2388 fprintf(out, " Load LLC hit : %10d\n", stats->ld_llchit + stats->lcl_hitm);
2389 fprintf(out, " Load Local HITM : %10d\n", stats->lcl_hitm);
2390 fprintf(out, " Load Remote HITM : %10d\n", stats->rmt_hitm);
2391 fprintf(out, " Load Remote HIT : %10d\n", stats->rmt_hit);
2392 fprintf(out, " Load Local DRAM : %10d\n", stats->lcl_dram);
2393 fprintf(out, " Load Remote DRAM : %10d\n", stats->rmt_dram);
2394 fprintf(out, " Load MESI State Exclusive : %10d\n", stats->ld_excl);
2395 fprintf(out, " Load MESI State Shared : %10d\n", stats->ld_shared);
2396 fprintf(out, " Load LLC Misses : %10d\n", llc_misses);
2397 fprintf(out, " Load access blocked by data : %10d\n", stats->blk_data);
2398 fprintf(out, " Load access blocked by address : %10d\n", stats->blk_addr);
2399 fprintf(out, " Load HIT Local Peer : %10d\n", stats->lcl_peer);
2400 fprintf(out, " Load HIT Remote Peer : %10d\n", stats->rmt_peer);
2401 fprintf(out, " LLC Misses to Local DRAM : %10.1f%%\n", ((double)stats->lcl_dram/(double)llc_misses) * 100.);
2402 fprintf(out, " LLC Misses to Remote DRAM : %10.1f%%\n", ((double)stats->rmt_dram/(double)llc_misses) * 100.);
2403 fprintf(out, " LLC Misses to Remote cache (HIT) : %10.1f%%\n", ((double)stats->rmt_hit /(double)llc_misses) * 100.);
2404 fprintf(out, " LLC Misses to Remote cache (HITM) : %10.1f%%\n", ((double)stats->rmt_hitm/(double)llc_misses) * 100.);
2405 fprintf(out, " Store Operations : %10d\n", stats->store);
2406 fprintf(out, " Store - uncacheable : %10d\n", stats->st_uncache);
2407 fprintf(out, " Store - no mapping : %10d\n", stats->st_noadrs);
2408 fprintf(out, " Store L1D Hit : %10d\n", stats->st_l1hit);
2409 fprintf(out, " Store L1D Miss : %10d\n", stats->st_l1miss);
2410 fprintf(out, " Store No available memory level : %10d\n", stats->st_na);
2411 fprintf(out, " No Page Map Rejects : %10d\n", stats->nomap);
2412 fprintf(out, " Unable to parse data source : %10d\n", stats->noparse);
2413}
2414
2415static void print_shared_cacheline_info(FILE *out)
2416{
2417 struct c2c_stats *stats = &c2c.shared_clines_stats;
2418 int hitm_cnt = stats->lcl_hitm + stats->rmt_hitm;
2419
2420 fprintf(out, "=================================================\n");
2421 fprintf(out, " Global Shared Cache Line Event Information \n");
2422 fprintf(out, "=================================================\n");
2423 fprintf(out, " Total Shared Cache Lines : %10d\n", c2c.shared_clines);
2424 fprintf(out, " Load HITs on shared lines : %10d\n", stats->load);
2425 fprintf(out, " Fill Buffer Hits on shared lines : %10d\n", stats->ld_fbhit);
2426 fprintf(out, " L1D hits on shared lines : %10d\n", stats->ld_l1hit);
2427 fprintf(out, " L2D hits on shared lines : %10d\n", stats->ld_l2hit);
2428 fprintf(out, " LLC hits on shared lines : %10d\n", stats->ld_llchit + stats->lcl_hitm);
2429 fprintf(out, " Load hits on peer cache or nodes : %10d\n", stats->lcl_peer + stats->rmt_peer);
2430 fprintf(out, " Locked Access on shared lines : %10d\n", stats->locks);
2431 fprintf(out, " Blocked Access on shared lines : %10d\n", stats->blk_data + stats->blk_addr);
2432 fprintf(out, " Store HITs on shared lines : %10d\n", stats->store);
2433 fprintf(out, " Store L1D hits on shared lines : %10d\n", stats->st_l1hit);
2434 fprintf(out, " Store No available memory level : %10d\n", stats->st_na);
2435 fprintf(out, " Total Merged records : %10d\n", hitm_cnt + stats->store);
2436}
2437
2438static void print_cacheline(struct c2c_hists *c2c_hists,
2439 struct hist_entry *he_cl,
2440 struct perf_hpp_list *hpp_list,
2441 FILE *out)
2442{
2443 char bf[1000];
2444 struct perf_hpp hpp = {
2445 .buf = bf,
2446 .size = 1000,
2447 };
2448 static bool once;
2449
2450 if (!once) {
2451 hists__fprintf_headers(&c2c_hists->hists, out);
2452 once = true;
2453 } else {
2454 fprintf(out, "\n");
2455 }
2456
2457 fprintf(out, " ----------------------------------------------------------------------\n");
2458 __hist_entry__snprintf(he_cl, &hpp, hpp_list);
2459 fprintf(out, "%s\n", bf);
2460 fprintf(out, " ----------------------------------------------------------------------\n");
2461
2462 hists__fprintf(&c2c_hists->hists, false, 0, 0, 0, out, false);
2463}
2464
2465static void print_pareto(FILE *out)
2466{
2467 struct perf_hpp_list hpp_list;
2468 struct rb_node *nd;
2469 int ret;
2470 const char *cl_output;
2471
2472 if (c2c.display != DISPLAY_SNP_PEER)
2473 cl_output = "cl_num,"
2474 "cl_rmt_hitm,"
2475 "cl_lcl_hitm,"
2476 "cl_stores_l1hit,"
2477 "cl_stores_l1miss,"
2478 "cl_stores_na,"
2479 "dcacheline";
2480 else
2481 cl_output = "cl_num,"
2482 "cl_rmt_peer,"
2483 "cl_lcl_peer,"
2484 "cl_stores_l1hit,"
2485 "cl_stores_l1miss,"
2486 "cl_stores_na,"
2487 "dcacheline";
2488
2489 perf_hpp_list__init(&hpp_list);
2490 ret = hpp_list__parse(&hpp_list, cl_output, NULL);
2491
2492 if (WARN_ONCE(ret, "failed to setup sort entries\n"))
2493 return;
2494
2495 nd = rb_first_cached(&c2c.hists.hists.entries);
2496
2497 for (; nd; nd = rb_next(nd)) {
2498 struct hist_entry *he = rb_entry(nd, struct hist_entry, rb_node);
2499 struct c2c_hist_entry *c2c_he;
2500
2501 if (he->filtered)
2502 continue;
2503
2504 c2c_he = container_of(he, struct c2c_hist_entry, he);
2505 print_cacheline(c2c_he->hists, he, &hpp_list, out);
2506 }
2507}
2508
2509static void print_c2c_info(FILE *out, struct perf_session *session)
2510{
2511 struct evlist *evlist = session->evlist;
2512 struct evsel *evsel;
2513 bool first = true;
2514
2515 fprintf(out, "=================================================\n");
2516 fprintf(out, " c2c details \n");
2517 fprintf(out, "=================================================\n");
2518
2519 evlist__for_each_entry(evlist, evsel) {
2520 fprintf(out, "%-36s: %s\n", first ? " Events" : "", evsel__name(evsel));
2521 first = false;
2522 }
2523 fprintf(out, " Cachelines sort on : %s\n",
2524 display_str[c2c.display]);
2525 fprintf(out, " Cacheline data grouping : %s\n", c2c.cl_sort);
2526}
2527
2528static void perf_c2c__hists_fprintf(FILE *out, struct perf_session *session)
2529{
2530 setup_pager();
2531
2532 print_c2c__display_stats(out);
2533 fprintf(out, "\n");
2534 print_shared_cacheline_info(out);
2535 fprintf(out, "\n");
2536 print_c2c_info(out, session);
2537
2538 if (c2c.stats_only)
2539 return;
2540
2541 fprintf(out, "\n");
2542 fprintf(out, "=================================================\n");
2543 fprintf(out, " Shared Data Cache Line Table \n");
2544 fprintf(out, "=================================================\n");
2545 fprintf(out, "#\n");
2546
2547 hists__fprintf(&c2c.hists.hists, true, 0, 0, 0, stdout, true);
2548
2549 fprintf(out, "\n");
2550 fprintf(out, "=================================================\n");
2551 fprintf(out, " Shared Cache Line Distribution Pareto \n");
2552 fprintf(out, "=================================================\n");
2553 fprintf(out, "#\n");
2554
2555 print_pareto(out);
2556}
2557
2558#ifdef HAVE_SLANG_SUPPORT
2559static void c2c_browser__update_nr_entries(struct hist_browser *hb)
2560{
2561 u64 nr_entries = 0;
2562 struct rb_node *nd = rb_first_cached(&hb->hists->entries);
2563
2564 while (nd) {
2565 struct hist_entry *he = rb_entry(nd, struct hist_entry, rb_node);
2566
2567 if (!he->filtered)
2568 nr_entries++;
2569
2570 nd = rb_next(nd);
2571 }
2572
2573 hb->nr_non_filtered_entries = nr_entries;
2574}
2575
2576struct c2c_cacheline_browser {
2577 struct hist_browser hb;
2578 struct hist_entry *he;
2579};
2580
2581static int
2582perf_c2c_cacheline_browser__title(struct hist_browser *browser,
2583 char *bf, size_t size)
2584{
2585 struct c2c_cacheline_browser *cl_browser;
2586 struct hist_entry *he;
2587 uint64_t addr = 0;
2588
2589 cl_browser = container_of(browser, struct c2c_cacheline_browser, hb);
2590 he = cl_browser->he;
2591
2592 if (he->mem_info)
2593 addr = cl_address(he->mem_info->daddr.addr);
2594
2595 scnprintf(bf, size, "Cacheline 0x%lx", addr);
2596 return 0;
2597}
2598
2599static struct c2c_cacheline_browser*
2600c2c_cacheline_browser__new(struct hists *hists, struct hist_entry *he)
2601{
2602 struct c2c_cacheline_browser *browser;
2603
2604 browser = zalloc(sizeof(*browser));
2605 if (browser) {
2606 hist_browser__init(&browser->hb, hists);
2607 browser->hb.c2c_filter = true;
2608 browser->hb.title = perf_c2c_cacheline_browser__title;
2609 browser->he = he;
2610 }
2611
2612 return browser;
2613}
2614
2615static int perf_c2c__browse_cacheline(struct hist_entry *he)
2616{
2617 struct c2c_hist_entry *c2c_he;
2618 struct c2c_hists *c2c_hists;
2619 struct c2c_cacheline_browser *cl_browser;
2620 struct hist_browser *browser;
2621 int key = -1;
2622 static const char help[] =
2623 " ENTER Toggle callchains (if present) \n"
2624 " n Toggle Node details info \n"
2625 " s Toggle full length of symbol and source line columns \n"
2626 " q Return back to cacheline list \n";
2627
2628 if (!he)
2629 return 0;
2630
2631 /* Display compact version first. */
2632 c2c.symbol_full = false;
2633
2634 c2c_he = container_of(he, struct c2c_hist_entry, he);
2635 c2c_hists = c2c_he->hists;
2636
2637 cl_browser = c2c_cacheline_browser__new(&c2c_hists->hists, he);
2638 if (cl_browser == NULL)
2639 return -1;
2640
2641 browser = &cl_browser->hb;
2642
2643 /* reset abort key so that it can get Ctrl-C as a key */
2644 SLang_reset_tty();
2645 SLang_init_tty(0, 0, 0);
2646
2647 c2c_browser__update_nr_entries(browser);
2648
2649 while (1) {
2650 key = hist_browser__run(browser, "? - help", true, 0);
2651
2652 switch (key) {
2653 case 's':
2654 c2c.symbol_full = !c2c.symbol_full;
2655 break;
2656 case 'n':
2657 c2c.node_info = (c2c.node_info + 1) % 3;
2658 setup_nodes_header();
2659 break;
2660 case 'q':
2661 goto out;
2662 case '?':
2663 ui_browser__help_window(&browser->b, help);
2664 break;
2665 default:
2666 break;
2667 }
2668 }
2669
2670out:
2671 free(cl_browser);
2672 return 0;
2673}
2674
2675static int perf_c2c_browser__title(struct hist_browser *browser,
2676 char *bf, size_t size)
2677{
2678 scnprintf(bf, size,
2679 "Shared Data Cache Line Table "
2680 "(%lu entries, sorted on %s)",
2681 browser->nr_non_filtered_entries,
2682 display_str[c2c.display]);
2683 return 0;
2684}
2685
2686static struct hist_browser*
2687perf_c2c_browser__new(struct hists *hists)
2688{
2689 struct hist_browser *browser = hist_browser__new(hists);
2690
2691 if (browser) {
2692 browser->title = perf_c2c_browser__title;
2693 browser->c2c_filter = true;
2694 }
2695
2696 return browser;
2697}
2698
2699static int perf_c2c__hists_browse(struct hists *hists)
2700{
2701 struct hist_browser *browser;
2702 int key = -1;
2703 static const char help[] =
2704 " d Display cacheline details \n"
2705 " ENTER Toggle callchains (if present) \n"
2706 " q Quit \n";
2707
2708 browser = perf_c2c_browser__new(hists);
2709 if (browser == NULL)
2710 return -1;
2711
2712 /* reset abort key so that it can get Ctrl-C as a key */
2713 SLang_reset_tty();
2714 SLang_init_tty(0, 0, 0);
2715
2716 c2c_browser__update_nr_entries(browser);
2717
2718 while (1) {
2719 key = hist_browser__run(browser, "? - help", true, 0);
2720
2721 switch (key) {
2722 case 'q':
2723 goto out;
2724 case 'd':
2725 perf_c2c__browse_cacheline(browser->he_selection);
2726 break;
2727 case '?':
2728 ui_browser__help_window(&browser->b, help);
2729 break;
2730 default:
2731 break;
2732 }
2733 }
2734
2735out:
2736 hist_browser__delete(browser);
2737 return 0;
2738}
2739
2740static void perf_c2c_display(struct perf_session *session)
2741{
2742 if (use_browser == 0)
2743 perf_c2c__hists_fprintf(stdout, session);
2744 else
2745 perf_c2c__hists_browse(&c2c.hists.hists);
2746}
2747#else
2748static void perf_c2c_display(struct perf_session *session)
2749{
2750 use_browser = 0;
2751 perf_c2c__hists_fprintf(stdout, session);
2752}
2753#endif /* HAVE_SLANG_SUPPORT */
2754
2755static char *fill_line(const char *orig, int len)
2756{
2757 int i, j, olen = strlen(orig);
2758 char *buf;
2759
2760 buf = zalloc(len + 1);
2761 if (!buf)
2762 return NULL;
2763
2764 j = len / 2 - olen / 2;
2765
2766 for (i = 0; i < j - 1; i++)
2767 buf[i] = '-';
2768
2769 buf[i++] = ' ';
2770
2771 strcpy(buf + i, orig);
2772
2773 i += olen;
2774
2775 buf[i++] = ' ';
2776
2777 for (; i < len; i++)
2778 buf[i] = '-';
2779
2780 return buf;
2781}
2782
2783static int ui_quirks(void)
2784{
2785 const char *nodestr = "Data address";
2786 char *buf;
2787
2788 if (!c2c.use_stdio) {
2789 dim_offset.width = 5;
2790 dim_offset.header = header_offset_tui;
2791 nodestr = "CL";
2792 }
2793
2794 dim_percent_costly_snoop.header = percent_costly_snoop_header[c2c.display];
2795
2796 /* Fix the zero line for dcacheline column. */
2797 buf = fill_line("Cacheline", dim_dcacheline.width +
2798 dim_dcacheline_node.width +
2799 dim_dcacheline_count.width + 4);
2800 if (!buf)
2801 return -ENOMEM;
2802
2803 dim_dcacheline.header.line[0].text = buf;
2804
2805 /* Fix the zero line for offset column. */
2806 buf = fill_line(nodestr, dim_offset.width +
2807 dim_offset_node.width +
2808 dim_dcacheline_count.width + 4);
2809 if (!buf)
2810 return -ENOMEM;
2811
2812 dim_offset.header.line[0].text = buf;
2813
2814 return 0;
2815}
2816
2817#define CALLCHAIN_DEFAULT_OPT "graph,0.5,caller,function,percent"
2818
2819const char callchain_help[] = "Display call graph (stack chain/backtrace):\n\n"
2820 CALLCHAIN_REPORT_HELP
2821 "\n\t\t\t\tDefault: " CALLCHAIN_DEFAULT_OPT;
2822
2823static int
2824parse_callchain_opt(const struct option *opt, const char *arg, int unset)
2825{
2826 struct callchain_param *callchain = opt->value;
2827
2828 callchain->enabled = !unset;
2829 /*
2830 * --no-call-graph
2831 */
2832 if (unset) {
2833 symbol_conf.use_callchain = false;
2834 callchain->mode = CHAIN_NONE;
2835 return 0;
2836 }
2837
2838 return parse_callchain_report_opt(arg);
2839}
2840
2841static int setup_callchain(struct evlist *evlist)
2842{
2843 u64 sample_type = evlist__combined_sample_type(evlist);
2844 enum perf_call_graph_mode mode = CALLCHAIN_NONE;
2845
2846 if ((sample_type & PERF_SAMPLE_REGS_USER) &&
2847 (sample_type & PERF_SAMPLE_STACK_USER)) {
2848 mode = CALLCHAIN_DWARF;
2849 dwarf_callchain_users = true;
2850 } else if (sample_type & PERF_SAMPLE_BRANCH_STACK)
2851 mode = CALLCHAIN_LBR;
2852 else if (sample_type & PERF_SAMPLE_CALLCHAIN)
2853 mode = CALLCHAIN_FP;
2854
2855 if (!callchain_param.enabled &&
2856 callchain_param.mode != CHAIN_NONE &&
2857 mode != CALLCHAIN_NONE) {
2858 symbol_conf.use_callchain = true;
2859 if (callchain_register_param(&callchain_param) < 0) {
2860 ui__error("Can't register callchain params.\n");
2861 return -EINVAL;
2862 }
2863 }
2864
2865 if (c2c.stitch_lbr && (mode != CALLCHAIN_LBR)) {
2866 ui__warning("Can't find LBR callchain. Switch off --stitch-lbr.\n"
2867 "Please apply --call-graph lbr when recording.\n");
2868 c2c.stitch_lbr = false;
2869 }
2870
2871 callchain_param.record_mode = mode;
2872 callchain_param.min_percent = 0;
2873 return 0;
2874}
2875
2876static int setup_display(const char *str)
2877{
2878 const char *display = str;
2879
2880 if (!strcmp(display, "tot"))
2881 c2c.display = DISPLAY_TOT_HITM;
2882 else if (!strcmp(display, "rmt"))
2883 c2c.display = DISPLAY_RMT_HITM;
2884 else if (!strcmp(display, "lcl"))
2885 c2c.display = DISPLAY_LCL_HITM;
2886 else if (!strcmp(display, "peer"))
2887 c2c.display = DISPLAY_SNP_PEER;
2888 else {
2889 pr_err("failed: unknown display type: %s\n", str);
2890 return -1;
2891 }
2892
2893 return 0;
2894}
2895
2896#define for_each_token(__tok, __buf, __sep, __tmp) \
2897 for (__tok = strtok_r(__buf, __sep, &__tmp); __tok; \
2898 __tok = strtok_r(NULL, __sep, &__tmp))
2899
2900static int build_cl_output(char *cl_sort, bool no_source)
2901{
2902 char *tok, *tmp, *buf = strdup(cl_sort);
2903 bool add_pid = false;
2904 bool add_tid = false;
2905 bool add_iaddr = false;
2906 bool add_sym = false;
2907 bool add_dso = false;
2908 bool add_src = false;
2909 int ret = 0;
2910
2911 if (!buf)
2912 return -ENOMEM;
2913
2914 for_each_token(tok, buf, ",", tmp) {
2915 if (!strcmp(tok, "tid")) {
2916 add_tid = true;
2917 } else if (!strcmp(tok, "pid")) {
2918 add_pid = true;
2919 } else if (!strcmp(tok, "iaddr")) {
2920 add_iaddr = true;
2921 add_sym = true;
2922 add_dso = true;
2923 add_src = no_source ? false : true;
2924 } else if (!strcmp(tok, "dso")) {
2925 add_dso = true;
2926 } else if (strcmp(tok, "offset")) {
2927 pr_err("unrecognized sort token: %s\n", tok);
2928 ret = -EINVAL;
2929 goto err;
2930 }
2931 }
2932
2933 if (asprintf(&c2c.cl_output,
2934 "%s%s%s%s%s%s%s%s%s%s%s%s",
2935 c2c.use_stdio ? "cl_num_empty," : "",
2936 c2c.display == DISPLAY_SNP_PEER ? "percent_rmt_peer,"
2937 "percent_lcl_peer," :
2938 "percent_rmt_hitm,"
2939 "percent_lcl_hitm,",
2940 "percent_stores_l1hit,"
2941 "percent_stores_l1miss,"
2942 "percent_stores_na,"
2943 "offset,offset_node,dcacheline_count,",
2944 add_pid ? "pid," : "",
2945 add_tid ? "tid," : "",
2946 add_iaddr ? "iaddr," : "",
2947 c2c.display == DISPLAY_SNP_PEER ? "mean_rmt_peer,"
2948 "mean_lcl_peer," :
2949 "mean_rmt,"
2950 "mean_lcl,",
2951 "mean_load,"
2952 "tot_recs,"
2953 "cpucnt,",
2954 add_sym ? "symbol," : "",
2955 add_dso ? "dso," : "",
2956 add_src ? "cl_srcline," : "",
2957 "node") < 0) {
2958 ret = -ENOMEM;
2959 goto err;
2960 }
2961
2962 c2c.show_src = add_src;
2963err:
2964 free(buf);
2965 return ret;
2966}
2967
2968static int setup_coalesce(const char *coalesce, bool no_source)
2969{
2970 const char *c = coalesce ?: coalesce_default;
2971 const char *sort_str = NULL;
2972
2973 if (asprintf(&c2c.cl_sort, "offset,%s", c) < 0)
2974 return -ENOMEM;
2975
2976 if (build_cl_output(c2c.cl_sort, no_source))
2977 return -1;
2978
2979 if (c2c.display == DISPLAY_TOT_HITM)
2980 sort_str = "tot_hitm";
2981 else if (c2c.display == DISPLAY_RMT_HITM)
2982 sort_str = "rmt_hitm,lcl_hitm";
2983 else if (c2c.display == DISPLAY_LCL_HITM)
2984 sort_str = "lcl_hitm,rmt_hitm";
2985 else if (c2c.display == DISPLAY_SNP_PEER)
2986 sort_str = "tot_peer";
2987
2988 if (asprintf(&c2c.cl_resort, "offset,%s", sort_str) < 0)
2989 return -ENOMEM;
2990
2991 pr_debug("coalesce sort fields: %s\n", c2c.cl_sort);
2992 pr_debug("coalesce resort fields: %s\n", c2c.cl_resort);
2993 pr_debug("coalesce output fields: %s\n", c2c.cl_output);
2994 return 0;
2995}
2996
2997static int perf_c2c__report(int argc, const char **argv)
2998{
2999 struct itrace_synth_opts itrace_synth_opts = {
3000 .set = true,
3001 .mem = true, /* Only enable memory event */
3002 .default_no_sample = true,
3003 };
3004
3005 struct perf_session *session;
3006 struct ui_progress prog;
3007 struct perf_data data = {
3008 .mode = PERF_DATA_MODE_READ,
3009 };
3010 char callchain_default_opt[] = CALLCHAIN_DEFAULT_OPT;
3011 const char *display = NULL;
3012 const char *coalesce = NULL;
3013 bool no_source = false;
3014 const struct option options[] = {
3015 OPT_STRING('k', "vmlinux", &symbol_conf.vmlinux_name,
3016 "file", "vmlinux pathname"),
3017 OPT_STRING('i', "input", &input_name, "file",
3018 "the input file to process"),
3019 OPT_INCR('N', "node-info", &c2c.node_info,
3020 "show extra node info in report (repeat for more info)"),
3021 OPT_BOOLEAN(0, "stdio", &c2c.use_stdio, "Use the stdio interface"),
3022 OPT_BOOLEAN(0, "stats", &c2c.stats_only,
3023 "Display only statistic tables (implies --stdio)"),
3024 OPT_BOOLEAN(0, "full-symbols", &c2c.symbol_full,
3025 "Display full length of symbols"),
3026 OPT_BOOLEAN(0, "no-source", &no_source,
3027 "Do not display Source Line column"),
3028 OPT_BOOLEAN(0, "show-all", &c2c.show_all,
3029 "Show all captured HITM lines."),
3030 OPT_CALLBACK_DEFAULT('g', "call-graph", &callchain_param,
3031 "print_type,threshold[,print_limit],order,sort_key[,branch],value",
3032 callchain_help, &parse_callchain_opt,
3033 callchain_default_opt),
3034 OPT_STRING('d', "display", &display, "Switch HITM output type", "tot,lcl,rmt,peer"),
3035 OPT_STRING('c', "coalesce", &coalesce, "coalesce fields",
3036 "coalesce fields: pid,tid,iaddr,dso"),
3037 OPT_BOOLEAN('f', "force", &symbol_conf.force, "don't complain, do it"),
3038 OPT_BOOLEAN(0, "stitch-lbr", &c2c.stitch_lbr,
3039 "Enable LBR callgraph stitching approach"),
3040 OPT_PARENT(c2c_options),
3041 OPT_END()
3042 };
3043 int err = 0;
3044 const char *output_str, *sort_str = NULL;
3045
3046 argc = parse_options(argc, argv, options, report_c2c_usage,
3047 PARSE_OPT_STOP_AT_NON_OPTION);
3048 if (argc)
3049 usage_with_options(report_c2c_usage, options);
3050
3051#ifndef HAVE_SLANG_SUPPORT
3052 c2c.use_stdio = true;
3053#endif
3054
3055 if (c2c.stats_only)
3056 c2c.use_stdio = true;
3057
3058 err = symbol__validate_sym_arguments();
3059 if (err)
3060 goto out;
3061
3062 if (!input_name || !strlen(input_name))
3063 input_name = "perf.data";
3064
3065 data.path = input_name;
3066 data.force = symbol_conf.force;
3067
3068 session = perf_session__new(&data, &c2c.tool);
3069 if (IS_ERR(session)) {
3070 err = PTR_ERR(session);
3071 pr_debug("Error creating perf session\n");
3072 goto out;
3073 }
3074
3075 /*
3076 * Use the 'tot' as default display type if user doesn't specify it;
3077 * since Arm64 platform doesn't support HITMs flag, use 'peer' as the
3078 * default display type.
3079 */
3080 if (!display) {
3081 if (!strcmp(perf_env__arch(&session->header.env), "arm64"))
3082 display = "peer";
3083 else
3084 display = "tot";
3085 }
3086
3087 err = setup_display(display);
3088 if (err)
3089 goto out_session;
3090
3091 err = setup_coalesce(coalesce, no_source);
3092 if (err) {
3093 pr_debug("Failed to initialize hists\n");
3094 goto out_session;
3095 }
3096
3097 err = c2c_hists__init(&c2c.hists, "dcacheline", 2);
3098 if (err) {
3099 pr_debug("Failed to initialize hists\n");
3100 goto out_session;
3101 }
3102
3103 session->itrace_synth_opts = &itrace_synth_opts;
3104
3105 err = setup_nodes(session);
3106 if (err) {
3107 pr_err("Failed setup nodes\n");
3108 goto out_session;
3109 }
3110
3111 err = mem2node__init(&c2c.mem2node, &session->header.env);
3112 if (err)
3113 goto out_session;
3114
3115 err = setup_callchain(session->evlist);
3116 if (err)
3117 goto out_mem2node;
3118
3119 if (symbol__init(&session->header.env) < 0)
3120 goto out_mem2node;
3121
3122 /* No pipe support at the moment. */
3123 if (perf_data__is_pipe(session->data)) {
3124 pr_debug("No pipe support at the moment.\n");
3125 goto out_mem2node;
3126 }
3127
3128 if (c2c.use_stdio)
3129 use_browser = 0;
3130 else
3131 use_browser = 1;
3132
3133 setup_browser(false);
3134
3135 err = perf_session__process_events(session);
3136 if (err) {
3137 pr_err("failed to process sample\n");
3138 goto out_mem2node;
3139 }
3140
3141 if (c2c.display != DISPLAY_SNP_PEER)
3142 output_str = "cl_idx,"
3143 "dcacheline,"
3144 "dcacheline_node,"
3145 "dcacheline_count,"
3146 "percent_costly_snoop,"
3147 "tot_hitm,lcl_hitm,rmt_hitm,"
3148 "tot_recs,"
3149 "tot_loads,"
3150 "tot_stores,"
3151 "stores_l1hit,stores_l1miss,stores_na,"
3152 "ld_fbhit,ld_l1hit,ld_l2hit,"
3153 "ld_lclhit,lcl_hitm,"
3154 "ld_rmthit,rmt_hitm,"
3155 "dram_lcl,dram_rmt";
3156 else
3157 output_str = "cl_idx,"
3158 "dcacheline,"
3159 "dcacheline_node,"
3160 "dcacheline_count,"
3161 "percent_costly_snoop,"
3162 "tot_peer,lcl_peer,rmt_peer,"
3163 "tot_recs,"
3164 "tot_loads,"
3165 "tot_stores,"
3166 "stores_l1hit,stores_l1miss,stores_na,"
3167 "ld_fbhit,ld_l1hit,ld_l2hit,"
3168 "ld_lclhit,lcl_hitm,"
3169 "ld_rmthit,rmt_hitm,"
3170 "dram_lcl,dram_rmt";
3171
3172 if (c2c.display == DISPLAY_TOT_HITM)
3173 sort_str = "tot_hitm";
3174 else if (c2c.display == DISPLAY_RMT_HITM)
3175 sort_str = "rmt_hitm";
3176 else if (c2c.display == DISPLAY_LCL_HITM)
3177 sort_str = "lcl_hitm";
3178 else if (c2c.display == DISPLAY_SNP_PEER)
3179 sort_str = "tot_peer";
3180
3181 c2c_hists__reinit(&c2c.hists, output_str, sort_str);
3182
3183 ui_progress__init(&prog, c2c.hists.hists.nr_entries, "Sorting...");
3184
3185 hists__collapse_resort(&c2c.hists.hists, NULL);
3186 hists__output_resort_cb(&c2c.hists.hists, &prog, resort_shared_cl_cb);
3187 hists__iterate_cb(&c2c.hists.hists, resort_cl_cb);
3188
3189 ui_progress__finish();
3190
3191 if (ui_quirks()) {
3192 pr_err("failed to setup UI\n");
3193 goto out_mem2node;
3194 }
3195
3196 perf_c2c_display(session);
3197
3198out_mem2node:
3199 mem2node__exit(&c2c.mem2node);
3200out_session:
3201 perf_session__delete(session);
3202out:
3203 return err;
3204}
3205
3206static int parse_record_events(const struct option *opt,
3207 const char *str, int unset __maybe_unused)
3208{
3209 bool *event_set = (bool *) opt->value;
3210
3211 if (!strcmp(str, "list")) {
3212 perf_mem_events__list();
3213 exit(0);
3214 }
3215 if (perf_mem_events__parse(str))
3216 exit(-1);
3217
3218 *event_set = true;
3219 return 0;
3220}
3221
3222
3223static const char * const __usage_record[] = {
3224 "perf c2c record [<options>] [<command>]",
3225 "perf c2c record [<options>] -- <command> [<options>]",
3226 NULL
3227};
3228
3229static const char * const *record_mem_usage = __usage_record;
3230
3231static int perf_c2c__record(int argc, const char **argv)
3232{
3233 int rec_argc, i = 0, j, rec_tmp_nr = 0;
3234 const char **rec_argv;
3235 char **rec_tmp;
3236 int ret;
3237 bool all_user = false, all_kernel = false;
3238 bool event_set = false;
3239 struct perf_mem_event *e;
3240 struct option options[] = {
3241 OPT_CALLBACK('e', "event", &event_set, "event",
3242 "event selector. Use 'perf c2c record -e list' to list available events",
3243 parse_record_events),
3244 OPT_BOOLEAN('u', "all-user", &all_user, "collect only user level data"),
3245 OPT_BOOLEAN('k', "all-kernel", &all_kernel, "collect only kernel level data"),
3246 OPT_UINTEGER('l', "ldlat", &perf_mem_events__loads_ldlat, "setup mem-loads latency"),
3247 OPT_PARENT(c2c_options),
3248 OPT_END()
3249 };
3250
3251 if (perf_mem_events__init()) {
3252 pr_err("failed: memory events not supported\n");
3253 return -1;
3254 }
3255
3256 argc = parse_options(argc, argv, options, record_mem_usage,
3257 PARSE_OPT_KEEP_UNKNOWN);
3258
3259 if (!perf_pmu__has_hybrid())
3260 rec_argc = argc + 11; /* max number of arguments */
3261 else
3262 rec_argc = argc + 11 * perf_pmu__hybrid_pmu_num();
3263
3264 rec_argv = calloc(rec_argc + 1, sizeof(char *));
3265 if (!rec_argv)
3266 return -1;
3267
3268 rec_tmp = calloc(rec_argc + 1, sizeof(char *));
3269 if (!rec_tmp) {
3270 free(rec_argv);
3271 return -1;
3272 }
3273
3274 rec_argv[i++] = "record";
3275
3276 if (!event_set) {
3277 e = perf_mem_events__ptr(PERF_MEM_EVENTS__LOAD_STORE);
3278 /*
3279 * The load and store operations are required, use the event
3280 * PERF_MEM_EVENTS__LOAD_STORE if it is supported.
3281 */
3282 if (e->tag) {
3283 e->record = true;
3284 rec_argv[i++] = "-W";
3285 } else {
3286 e = perf_mem_events__ptr(PERF_MEM_EVENTS__LOAD);
3287 e->record = true;
3288
3289 e = perf_mem_events__ptr(PERF_MEM_EVENTS__STORE);
3290 e->record = true;
3291 }
3292 }
3293
3294 e = perf_mem_events__ptr(PERF_MEM_EVENTS__LOAD);
3295 if (e->record)
3296 rec_argv[i++] = "-W";
3297
3298 rec_argv[i++] = "-d";
3299 rec_argv[i++] = "--phys-data";
3300 rec_argv[i++] = "--sample-cpu";
3301
3302 ret = perf_mem_events__record_args(rec_argv, &i, rec_tmp, &rec_tmp_nr);
3303 if (ret)
3304 goto out;
3305
3306 if (all_user)
3307 rec_argv[i++] = "--all-user";
3308
3309 if (all_kernel)
3310 rec_argv[i++] = "--all-kernel";
3311
3312 for (j = 0; j < argc; j++, i++)
3313 rec_argv[i] = argv[j];
3314
3315 if (verbose > 0) {
3316 pr_debug("calling: ");
3317
3318 j = 0;
3319
3320 while (rec_argv[j]) {
3321 pr_debug("%s ", rec_argv[j]);
3322 j++;
3323 }
3324 pr_debug("\n");
3325 }
3326
3327 ret = cmd_record(i, rec_argv);
3328out:
3329 for (i = 0; i < rec_tmp_nr; i++)
3330 free(rec_tmp[i]);
3331
3332 free(rec_tmp);
3333 free(rec_argv);
3334 return ret;
3335}
3336
3337int cmd_c2c(int argc, const char **argv)
3338{
3339 argc = parse_options(argc, argv, c2c_options, c2c_usage,
3340 PARSE_OPT_STOP_AT_NON_OPTION);
3341
3342 if (!argc)
3343 usage_with_options(c2c_usage, c2c_options);
3344
3345 if (strlen(argv[0]) > 2 && strstarts("record", argv[0])) {
3346 return perf_c2c__record(argc, argv);
3347 } else if (strlen(argv[0]) > 2 && strstarts("report", argv[0])) {
3348 return perf_c2c__report(argc, argv);
3349 } else {
3350 usage_with_options(c2c_usage, c2c_options);
3351 }
3352
3353 return 0;
3354}
1/*
2 * This is rewrite of original c2c tool introduced in here:
3 * http://lwn.net/Articles/588866/
4 *
5 * The original tool was changed to fit in current perf state.
6 *
7 * Original authors:
8 * Don Zickus <dzickus@redhat.com>
9 * Dick Fowles <fowles@inreach.com>
10 * Joe Mario <jmario@redhat.com>
11 */
12#include <linux/compiler.h>
13#include <linux/kernel.h>
14#include <linux/stringify.h>
15#include <asm/bug.h>
16#include "util.h"
17#include "debug.h"
18#include "builtin.h"
19#include <subcmd/parse-options.h>
20#include "mem-events.h"
21#include "session.h"
22#include "hist.h"
23#include "sort.h"
24#include "tool.h"
25#include "data.h"
26#include "sort.h"
27#include "evlist.h"
28#include "evsel.h"
29#include <asm/bug.h>
30#include "ui/browsers/hists.h"
31#include "evlist.h"
32
33struct c2c_hists {
34 struct hists hists;
35 struct perf_hpp_list list;
36 struct c2c_stats stats;
37};
38
39struct compute_stats {
40 struct stats lcl_hitm;
41 struct stats rmt_hitm;
42 struct stats load;
43};
44
45struct c2c_hist_entry {
46 struct c2c_hists *hists;
47 struct c2c_stats stats;
48 unsigned long *cpuset;
49 struct c2c_stats *node_stats;
50 unsigned int cacheline_idx;
51
52 struct compute_stats cstats;
53
54 /*
55 * must be at the end,
56 * because of its callchain dynamic entry
57 */
58 struct hist_entry he;
59};
60
61static char const *coalesce_default = "pid,tid,iaddr";
62
63struct perf_c2c {
64 struct perf_tool tool;
65 struct c2c_hists hists;
66
67 unsigned long **nodes;
68 int nodes_cnt;
69 int cpus_cnt;
70 int *cpu2node;
71 int node_info;
72
73 bool show_src;
74 bool show_all;
75 bool use_stdio;
76 bool stats_only;
77 bool symbol_full;
78
79 /* HITM shared clines stats */
80 struct c2c_stats hitm_stats;
81 int shared_clines;
82
83 int display;
84
85 const char *coalesce;
86 char *cl_sort;
87 char *cl_resort;
88 char *cl_output;
89};
90
91enum {
92 DISPLAY_LCL,
93 DISPLAY_RMT,
94 DISPLAY_TOT,
95 DISPLAY_MAX,
96};
97
98static const char *display_str[DISPLAY_MAX] = {
99 [DISPLAY_LCL] = "Local",
100 [DISPLAY_RMT] = "Remote",
101 [DISPLAY_TOT] = "Total",
102};
103
104static const struct option c2c_options[] = {
105 OPT_INCR('v', "verbose", &verbose, "be more verbose (show counter open errors, etc)"),
106 OPT_END()
107};
108
109static struct perf_c2c c2c;
110
111static void *c2c_he_zalloc(size_t size)
112{
113 struct c2c_hist_entry *c2c_he;
114
115 c2c_he = zalloc(size + sizeof(*c2c_he));
116 if (!c2c_he)
117 return NULL;
118
119 c2c_he->cpuset = bitmap_alloc(c2c.cpus_cnt);
120 if (!c2c_he->cpuset)
121 return NULL;
122
123 c2c_he->node_stats = zalloc(c2c.nodes_cnt * sizeof(*c2c_he->node_stats));
124 if (!c2c_he->node_stats)
125 return NULL;
126
127 init_stats(&c2c_he->cstats.lcl_hitm);
128 init_stats(&c2c_he->cstats.rmt_hitm);
129 init_stats(&c2c_he->cstats.load);
130
131 return &c2c_he->he;
132}
133
134static void c2c_he_free(void *he)
135{
136 struct c2c_hist_entry *c2c_he;
137
138 c2c_he = container_of(he, struct c2c_hist_entry, he);
139 if (c2c_he->hists) {
140 hists__delete_entries(&c2c_he->hists->hists);
141 free(c2c_he->hists);
142 }
143
144 free(c2c_he->cpuset);
145 free(c2c_he->node_stats);
146 free(c2c_he);
147}
148
149static struct hist_entry_ops c2c_entry_ops = {
150 .new = c2c_he_zalloc,
151 .free = c2c_he_free,
152};
153
154static int c2c_hists__init(struct c2c_hists *hists,
155 const char *sort,
156 int nr_header_lines);
157
158static struct c2c_hists*
159he__get_c2c_hists(struct hist_entry *he,
160 const char *sort,
161 int nr_header_lines)
162{
163 struct c2c_hist_entry *c2c_he;
164 struct c2c_hists *hists;
165 int ret;
166
167 c2c_he = container_of(he, struct c2c_hist_entry, he);
168 if (c2c_he->hists)
169 return c2c_he->hists;
170
171 hists = c2c_he->hists = zalloc(sizeof(*hists));
172 if (!hists)
173 return NULL;
174
175 ret = c2c_hists__init(hists, sort, nr_header_lines);
176 if (ret) {
177 free(hists);
178 return NULL;
179 }
180
181 return hists;
182}
183
184static void c2c_he__set_cpu(struct c2c_hist_entry *c2c_he,
185 struct perf_sample *sample)
186{
187 if (WARN_ONCE(sample->cpu == (unsigned int) -1,
188 "WARNING: no sample cpu value"))
189 return;
190
191 set_bit(sample->cpu, c2c_he->cpuset);
192}
193
194static void compute_stats(struct c2c_hist_entry *c2c_he,
195 struct c2c_stats *stats,
196 u64 weight)
197{
198 struct compute_stats *cstats = &c2c_he->cstats;
199
200 if (stats->rmt_hitm)
201 update_stats(&cstats->rmt_hitm, weight);
202 else if (stats->lcl_hitm)
203 update_stats(&cstats->lcl_hitm, weight);
204 else if (stats->load)
205 update_stats(&cstats->load, weight);
206}
207
208static int process_sample_event(struct perf_tool *tool __maybe_unused,
209 union perf_event *event,
210 struct perf_sample *sample,
211 struct perf_evsel *evsel,
212 struct machine *machine)
213{
214 struct c2c_hists *c2c_hists = &c2c.hists;
215 struct c2c_hist_entry *c2c_he;
216 struct c2c_stats stats = { .nr_entries = 0, };
217 struct hist_entry *he;
218 struct addr_location al;
219 struct mem_info *mi, *mi_dup;
220 int ret;
221
222 if (machine__resolve(machine, &al, sample) < 0) {
223 pr_debug("problem processing %d event, skipping it.\n",
224 event->header.type);
225 return -1;
226 }
227
228 ret = sample__resolve_callchain(sample, &callchain_cursor, NULL,
229 evsel, &al, sysctl_perf_event_max_stack);
230 if (ret)
231 goto out;
232
233 mi = sample__resolve_mem(sample, &al);
234 if (mi == NULL)
235 return -ENOMEM;
236
237 mi_dup = memdup(mi, sizeof(*mi));
238 if (!mi_dup)
239 goto free_mi;
240
241 c2c_decode_stats(&stats, mi);
242
243 he = hists__add_entry_ops(&c2c_hists->hists, &c2c_entry_ops,
244 &al, NULL, NULL, mi,
245 sample, true);
246 if (he == NULL)
247 goto free_mi_dup;
248
249 c2c_he = container_of(he, struct c2c_hist_entry, he);
250 c2c_add_stats(&c2c_he->stats, &stats);
251 c2c_add_stats(&c2c_hists->stats, &stats);
252
253 c2c_he__set_cpu(c2c_he, sample);
254
255 hists__inc_nr_samples(&c2c_hists->hists, he->filtered);
256 ret = hist_entry__append_callchain(he, sample);
257
258 if (!ret) {
259 /*
260 * There's already been warning about missing
261 * sample's cpu value. Let's account all to
262 * node 0 in this case, without any further
263 * warning.
264 *
265 * Doing node stats only for single callchain data.
266 */
267 int cpu = sample->cpu == (unsigned int) -1 ? 0 : sample->cpu;
268 int node = c2c.cpu2node[cpu];
269
270 mi = mi_dup;
271
272 mi_dup = memdup(mi, sizeof(*mi));
273 if (!mi_dup)
274 goto free_mi;
275
276 c2c_hists = he__get_c2c_hists(he, c2c.cl_sort, 2);
277 if (!c2c_hists)
278 goto free_mi_dup;
279
280 he = hists__add_entry_ops(&c2c_hists->hists, &c2c_entry_ops,
281 &al, NULL, NULL, mi,
282 sample, true);
283 if (he == NULL)
284 goto free_mi_dup;
285
286 c2c_he = container_of(he, struct c2c_hist_entry, he);
287 c2c_add_stats(&c2c_he->stats, &stats);
288 c2c_add_stats(&c2c_hists->stats, &stats);
289 c2c_add_stats(&c2c_he->node_stats[node], &stats);
290
291 compute_stats(c2c_he, &stats, sample->weight);
292
293 c2c_he__set_cpu(c2c_he, sample);
294
295 hists__inc_nr_samples(&c2c_hists->hists, he->filtered);
296 ret = hist_entry__append_callchain(he, sample);
297 }
298
299out:
300 addr_location__put(&al);
301 return ret;
302
303free_mi_dup:
304 free(mi_dup);
305free_mi:
306 free(mi);
307 ret = -ENOMEM;
308 goto out;
309}
310
311static struct perf_c2c c2c = {
312 .tool = {
313 .sample = process_sample_event,
314 .mmap = perf_event__process_mmap,
315 .mmap2 = perf_event__process_mmap2,
316 .comm = perf_event__process_comm,
317 .exit = perf_event__process_exit,
318 .fork = perf_event__process_fork,
319 .lost = perf_event__process_lost,
320 .ordered_events = true,
321 .ordering_requires_timestamps = true,
322 },
323};
324
325static const char * const c2c_usage[] = {
326 "perf c2c {record|report}",
327 NULL
328};
329
330static const char * const __usage_report[] = {
331 "perf c2c report",
332 NULL
333};
334
335static const char * const *report_c2c_usage = __usage_report;
336
337#define C2C_HEADER_MAX 2
338
339struct c2c_header {
340 struct {
341 const char *text;
342 int span;
343 } line[C2C_HEADER_MAX];
344};
345
346struct c2c_dimension {
347 struct c2c_header header;
348 const char *name;
349 int width;
350 struct sort_entry *se;
351
352 int64_t (*cmp)(struct perf_hpp_fmt *fmt,
353 struct hist_entry *, struct hist_entry *);
354 int (*entry)(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
355 struct hist_entry *he);
356 int (*color)(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
357 struct hist_entry *he);
358};
359
360struct c2c_fmt {
361 struct perf_hpp_fmt fmt;
362 struct c2c_dimension *dim;
363};
364
365#define SYMBOL_WIDTH 30
366
367static struct c2c_dimension dim_symbol;
368static struct c2c_dimension dim_srcline;
369
370static int symbol_width(struct hists *hists, struct sort_entry *se)
371{
372 int width = hists__col_len(hists, se->se_width_idx);
373
374 if (!c2c.symbol_full)
375 width = MIN(width, SYMBOL_WIDTH);
376
377 return width;
378}
379
380static int c2c_width(struct perf_hpp_fmt *fmt,
381 struct perf_hpp *hpp __maybe_unused,
382 struct hists *hists)
383{
384 struct c2c_fmt *c2c_fmt;
385 struct c2c_dimension *dim;
386
387 c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
388 dim = c2c_fmt->dim;
389
390 if (dim == &dim_symbol || dim == &dim_srcline)
391 return symbol_width(hists, dim->se);
392
393 return dim->se ? hists__col_len(hists, dim->se->se_width_idx) :
394 c2c_fmt->dim->width;
395}
396
397static int c2c_header(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
398 struct hists *hists, int line, int *span)
399{
400 struct perf_hpp_list *hpp_list = hists->hpp_list;
401 struct c2c_fmt *c2c_fmt;
402 struct c2c_dimension *dim;
403 const char *text = NULL;
404 int width = c2c_width(fmt, hpp, hists);
405
406 c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
407 dim = c2c_fmt->dim;
408
409 if (dim->se) {
410 text = dim->header.line[line].text;
411 /* Use the last line from sort_entry if not defined. */
412 if (!text && (line == hpp_list->nr_header_lines - 1))
413 text = dim->se->se_header;
414 } else {
415 text = dim->header.line[line].text;
416
417 if (*span) {
418 (*span)--;
419 return 0;
420 } else {
421 *span = dim->header.line[line].span;
422 }
423 }
424
425 if (text == NULL)
426 text = "";
427
428 return scnprintf(hpp->buf, hpp->size, "%*s", width, text);
429}
430
431#define HEX_STR(__s, __v) \
432({ \
433 scnprintf(__s, sizeof(__s), "0x%" PRIx64, __v); \
434 __s; \
435})
436
437static int64_t
438dcacheline_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
439 struct hist_entry *left, struct hist_entry *right)
440{
441 return sort__dcacheline_cmp(left, right);
442}
443
444static int dcacheline_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
445 struct hist_entry *he)
446{
447 uint64_t addr = 0;
448 int width = c2c_width(fmt, hpp, he->hists);
449 char buf[20];
450
451 if (he->mem_info)
452 addr = cl_address(he->mem_info->daddr.addr);
453
454 return scnprintf(hpp->buf, hpp->size, "%*s", width, HEX_STR(buf, addr));
455}
456
457static int offset_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
458 struct hist_entry *he)
459{
460 uint64_t addr = 0;
461 int width = c2c_width(fmt, hpp, he->hists);
462 char buf[20];
463
464 if (he->mem_info)
465 addr = cl_offset(he->mem_info->daddr.al_addr);
466
467 return scnprintf(hpp->buf, hpp->size, "%*s", width, HEX_STR(buf, addr));
468}
469
470static int64_t
471offset_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
472 struct hist_entry *left, struct hist_entry *right)
473{
474 uint64_t l = 0, r = 0;
475
476 if (left->mem_info)
477 l = cl_offset(left->mem_info->daddr.addr);
478 if (right->mem_info)
479 r = cl_offset(right->mem_info->daddr.addr);
480
481 return (int64_t)(r - l);
482}
483
484static int
485iaddr_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
486 struct hist_entry *he)
487{
488 uint64_t addr = 0;
489 int width = c2c_width(fmt, hpp, he->hists);
490 char buf[20];
491
492 if (he->mem_info)
493 addr = he->mem_info->iaddr.addr;
494
495 return scnprintf(hpp->buf, hpp->size, "%*s", width, HEX_STR(buf, addr));
496}
497
498static int64_t
499iaddr_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
500 struct hist_entry *left, struct hist_entry *right)
501{
502 return sort__iaddr_cmp(left, right);
503}
504
505static int
506tot_hitm_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
507 struct hist_entry *he)
508{
509 struct c2c_hist_entry *c2c_he;
510 int width = c2c_width(fmt, hpp, he->hists);
511 unsigned int tot_hitm;
512
513 c2c_he = container_of(he, struct c2c_hist_entry, he);
514 tot_hitm = c2c_he->stats.lcl_hitm + c2c_he->stats.rmt_hitm;
515
516 return scnprintf(hpp->buf, hpp->size, "%*u", width, tot_hitm);
517}
518
519static int64_t
520tot_hitm_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
521 struct hist_entry *left, struct hist_entry *right)
522{
523 struct c2c_hist_entry *c2c_left;
524 struct c2c_hist_entry *c2c_right;
525 unsigned int tot_hitm_left;
526 unsigned int tot_hitm_right;
527
528 c2c_left = container_of(left, struct c2c_hist_entry, he);
529 c2c_right = container_of(right, struct c2c_hist_entry, he);
530
531 tot_hitm_left = c2c_left->stats.lcl_hitm + c2c_left->stats.rmt_hitm;
532 tot_hitm_right = c2c_right->stats.lcl_hitm + c2c_right->stats.rmt_hitm;
533
534 return tot_hitm_left - tot_hitm_right;
535}
536
537#define STAT_FN_ENTRY(__f) \
538static int \
539__f ## _entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp, \
540 struct hist_entry *he) \
541{ \
542 struct c2c_hist_entry *c2c_he; \
543 int width = c2c_width(fmt, hpp, he->hists); \
544 \
545 c2c_he = container_of(he, struct c2c_hist_entry, he); \
546 return scnprintf(hpp->buf, hpp->size, "%*u", width, \
547 c2c_he->stats.__f); \
548}
549
550#define STAT_FN_CMP(__f) \
551static int64_t \
552__f ## _cmp(struct perf_hpp_fmt *fmt __maybe_unused, \
553 struct hist_entry *left, struct hist_entry *right) \
554{ \
555 struct c2c_hist_entry *c2c_left, *c2c_right; \
556 \
557 c2c_left = container_of(left, struct c2c_hist_entry, he); \
558 c2c_right = container_of(right, struct c2c_hist_entry, he); \
559 return c2c_left->stats.__f - c2c_right->stats.__f; \
560}
561
562#define STAT_FN(__f) \
563 STAT_FN_ENTRY(__f) \
564 STAT_FN_CMP(__f)
565
566STAT_FN(rmt_hitm)
567STAT_FN(lcl_hitm)
568STAT_FN(store)
569STAT_FN(st_l1hit)
570STAT_FN(st_l1miss)
571STAT_FN(ld_fbhit)
572STAT_FN(ld_l1hit)
573STAT_FN(ld_l2hit)
574STAT_FN(ld_llchit)
575STAT_FN(rmt_hit)
576
577static uint64_t llc_miss(struct c2c_stats *stats)
578{
579 uint64_t llcmiss;
580
581 llcmiss = stats->lcl_dram +
582 stats->rmt_dram +
583 stats->rmt_hitm +
584 stats->rmt_hit;
585
586 return llcmiss;
587}
588
589static int
590ld_llcmiss_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
591 struct hist_entry *he)
592{
593 struct c2c_hist_entry *c2c_he;
594 int width = c2c_width(fmt, hpp, he->hists);
595
596 c2c_he = container_of(he, struct c2c_hist_entry, he);
597
598 return scnprintf(hpp->buf, hpp->size, "%*lu", width,
599 llc_miss(&c2c_he->stats));
600}
601
602static int64_t
603ld_llcmiss_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
604 struct hist_entry *left, struct hist_entry *right)
605{
606 struct c2c_hist_entry *c2c_left;
607 struct c2c_hist_entry *c2c_right;
608
609 c2c_left = container_of(left, struct c2c_hist_entry, he);
610 c2c_right = container_of(right, struct c2c_hist_entry, he);
611
612 return llc_miss(&c2c_left->stats) - llc_miss(&c2c_right->stats);
613}
614
615static uint64_t total_records(struct c2c_stats *stats)
616{
617 uint64_t lclmiss, ldcnt, total;
618
619 lclmiss = stats->lcl_dram +
620 stats->rmt_dram +
621 stats->rmt_hitm +
622 stats->rmt_hit;
623
624 ldcnt = lclmiss +
625 stats->ld_fbhit +
626 stats->ld_l1hit +
627 stats->ld_l2hit +
628 stats->ld_llchit +
629 stats->lcl_hitm;
630
631 total = ldcnt +
632 stats->st_l1hit +
633 stats->st_l1miss;
634
635 return total;
636}
637
638static int
639tot_recs_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
640 struct hist_entry *he)
641{
642 struct c2c_hist_entry *c2c_he;
643 int width = c2c_width(fmt, hpp, he->hists);
644 uint64_t tot_recs;
645
646 c2c_he = container_of(he, struct c2c_hist_entry, he);
647 tot_recs = total_records(&c2c_he->stats);
648
649 return scnprintf(hpp->buf, hpp->size, "%*" PRIu64, width, tot_recs);
650}
651
652static int64_t
653tot_recs_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
654 struct hist_entry *left, struct hist_entry *right)
655{
656 struct c2c_hist_entry *c2c_left;
657 struct c2c_hist_entry *c2c_right;
658 uint64_t tot_recs_left;
659 uint64_t tot_recs_right;
660
661 c2c_left = container_of(left, struct c2c_hist_entry, he);
662 c2c_right = container_of(right, struct c2c_hist_entry, he);
663
664 tot_recs_left = total_records(&c2c_left->stats);
665 tot_recs_right = total_records(&c2c_right->stats);
666
667 return tot_recs_left - tot_recs_right;
668}
669
670static uint64_t total_loads(struct c2c_stats *stats)
671{
672 uint64_t lclmiss, ldcnt;
673
674 lclmiss = stats->lcl_dram +
675 stats->rmt_dram +
676 stats->rmt_hitm +
677 stats->rmt_hit;
678
679 ldcnt = lclmiss +
680 stats->ld_fbhit +
681 stats->ld_l1hit +
682 stats->ld_l2hit +
683 stats->ld_llchit +
684 stats->lcl_hitm;
685
686 return ldcnt;
687}
688
689static int
690tot_loads_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
691 struct hist_entry *he)
692{
693 struct c2c_hist_entry *c2c_he;
694 int width = c2c_width(fmt, hpp, he->hists);
695 uint64_t tot_recs;
696
697 c2c_he = container_of(he, struct c2c_hist_entry, he);
698 tot_recs = total_loads(&c2c_he->stats);
699
700 return scnprintf(hpp->buf, hpp->size, "%*" PRIu64, width, tot_recs);
701}
702
703static int64_t
704tot_loads_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
705 struct hist_entry *left, struct hist_entry *right)
706{
707 struct c2c_hist_entry *c2c_left;
708 struct c2c_hist_entry *c2c_right;
709 uint64_t tot_recs_left;
710 uint64_t tot_recs_right;
711
712 c2c_left = container_of(left, struct c2c_hist_entry, he);
713 c2c_right = container_of(right, struct c2c_hist_entry, he);
714
715 tot_recs_left = total_loads(&c2c_left->stats);
716 tot_recs_right = total_loads(&c2c_right->stats);
717
718 return tot_recs_left - tot_recs_right;
719}
720
721typedef double (get_percent_cb)(struct c2c_hist_entry *);
722
723static int
724percent_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
725 struct hist_entry *he, get_percent_cb get_percent)
726{
727 struct c2c_hist_entry *c2c_he;
728 int width = c2c_width(fmt, hpp, he->hists);
729 double per;
730
731 c2c_he = container_of(he, struct c2c_hist_entry, he);
732 per = get_percent(c2c_he);
733
734#ifdef HAVE_SLANG_SUPPORT
735 if (use_browser)
736 return __hpp__slsmg_color_printf(hpp, "%*.2f%%", width - 1, per);
737#endif
738 return hpp_color_scnprintf(hpp, "%*.2f%%", width - 1, per);
739}
740
741static double percent_hitm(struct c2c_hist_entry *c2c_he)
742{
743 struct c2c_hists *hists;
744 struct c2c_stats *stats;
745 struct c2c_stats *total;
746 int tot = 0, st = 0;
747 double p;
748
749 hists = container_of(c2c_he->he.hists, struct c2c_hists, hists);
750 stats = &c2c_he->stats;
751 total = &hists->stats;
752
753 switch (c2c.display) {
754 case DISPLAY_RMT:
755 st = stats->rmt_hitm;
756 tot = total->rmt_hitm;
757 break;
758 case DISPLAY_LCL:
759 st = stats->lcl_hitm;
760 tot = total->lcl_hitm;
761 break;
762 case DISPLAY_TOT:
763 st = stats->tot_hitm;
764 tot = total->tot_hitm;
765 default:
766 break;
767 }
768
769 p = tot ? (double) st / tot : 0;
770
771 return 100 * p;
772}
773
774#define PERC_STR(__s, __v) \
775({ \
776 scnprintf(__s, sizeof(__s), "%.2F%%", __v); \
777 __s; \
778})
779
780static int
781percent_hitm_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
782 struct hist_entry *he)
783{
784 struct c2c_hist_entry *c2c_he;
785 int width = c2c_width(fmt, hpp, he->hists);
786 char buf[10];
787 double per;
788
789 c2c_he = container_of(he, struct c2c_hist_entry, he);
790 per = percent_hitm(c2c_he);
791 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
792}
793
794static int
795percent_hitm_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
796 struct hist_entry *he)
797{
798 return percent_color(fmt, hpp, he, percent_hitm);
799}
800
801static int64_t
802percent_hitm_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
803 struct hist_entry *left, struct hist_entry *right)
804{
805 struct c2c_hist_entry *c2c_left;
806 struct c2c_hist_entry *c2c_right;
807 double per_left;
808 double per_right;
809
810 c2c_left = container_of(left, struct c2c_hist_entry, he);
811 c2c_right = container_of(right, struct c2c_hist_entry, he);
812
813 per_left = percent_hitm(c2c_left);
814 per_right = percent_hitm(c2c_right);
815
816 return per_left - per_right;
817}
818
819static struct c2c_stats *he_stats(struct hist_entry *he)
820{
821 struct c2c_hist_entry *c2c_he;
822
823 c2c_he = container_of(he, struct c2c_hist_entry, he);
824 return &c2c_he->stats;
825}
826
827static struct c2c_stats *total_stats(struct hist_entry *he)
828{
829 struct c2c_hists *hists;
830
831 hists = container_of(he->hists, struct c2c_hists, hists);
832 return &hists->stats;
833}
834
835static double percent(int st, int tot)
836{
837 return tot ? 100. * (double) st / (double) tot : 0;
838}
839
840#define PERCENT(__h, __f) percent(he_stats(__h)->__f, total_stats(__h)->__f)
841
842#define PERCENT_FN(__f) \
843static double percent_ ## __f(struct c2c_hist_entry *c2c_he) \
844{ \
845 struct c2c_hists *hists; \
846 \
847 hists = container_of(c2c_he->he.hists, struct c2c_hists, hists); \
848 return percent(c2c_he->stats.__f, hists->stats.__f); \
849}
850
851PERCENT_FN(rmt_hitm)
852PERCENT_FN(lcl_hitm)
853PERCENT_FN(st_l1hit)
854PERCENT_FN(st_l1miss)
855
856static int
857percent_rmt_hitm_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
858 struct hist_entry *he)
859{
860 int width = c2c_width(fmt, hpp, he->hists);
861 double per = PERCENT(he, rmt_hitm);
862 char buf[10];
863
864 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
865}
866
867static int
868percent_rmt_hitm_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
869 struct hist_entry *he)
870{
871 return percent_color(fmt, hpp, he, percent_rmt_hitm);
872}
873
874static int64_t
875percent_rmt_hitm_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
876 struct hist_entry *left, struct hist_entry *right)
877{
878 double per_left;
879 double per_right;
880
881 per_left = PERCENT(left, lcl_hitm);
882 per_right = PERCENT(right, lcl_hitm);
883
884 return per_left - per_right;
885}
886
887static int
888percent_lcl_hitm_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
889 struct hist_entry *he)
890{
891 int width = c2c_width(fmt, hpp, he->hists);
892 double per = PERCENT(he, lcl_hitm);
893 char buf[10];
894
895 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
896}
897
898static int
899percent_lcl_hitm_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
900 struct hist_entry *he)
901{
902 return percent_color(fmt, hpp, he, percent_lcl_hitm);
903}
904
905static int64_t
906percent_lcl_hitm_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
907 struct hist_entry *left, struct hist_entry *right)
908{
909 double per_left;
910 double per_right;
911
912 per_left = PERCENT(left, lcl_hitm);
913 per_right = PERCENT(right, lcl_hitm);
914
915 return per_left - per_right;
916}
917
918static int
919percent_stores_l1hit_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
920 struct hist_entry *he)
921{
922 int width = c2c_width(fmt, hpp, he->hists);
923 double per = PERCENT(he, st_l1hit);
924 char buf[10];
925
926 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
927}
928
929static int
930percent_stores_l1hit_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
931 struct hist_entry *he)
932{
933 return percent_color(fmt, hpp, he, percent_st_l1hit);
934}
935
936static int64_t
937percent_stores_l1hit_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
938 struct hist_entry *left, struct hist_entry *right)
939{
940 double per_left;
941 double per_right;
942
943 per_left = PERCENT(left, st_l1hit);
944 per_right = PERCENT(right, st_l1hit);
945
946 return per_left - per_right;
947}
948
949static int
950percent_stores_l1miss_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
951 struct hist_entry *he)
952{
953 int width = c2c_width(fmt, hpp, he->hists);
954 double per = PERCENT(he, st_l1miss);
955 char buf[10];
956
957 return scnprintf(hpp->buf, hpp->size, "%*s", width, PERC_STR(buf, per));
958}
959
960static int
961percent_stores_l1miss_color(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
962 struct hist_entry *he)
963{
964 return percent_color(fmt, hpp, he, percent_st_l1miss);
965}
966
967static int64_t
968percent_stores_l1miss_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
969 struct hist_entry *left, struct hist_entry *right)
970{
971 double per_left;
972 double per_right;
973
974 per_left = PERCENT(left, st_l1miss);
975 per_right = PERCENT(right, st_l1miss);
976
977 return per_left - per_right;
978}
979
980STAT_FN(lcl_dram)
981STAT_FN(rmt_dram)
982
983static int
984pid_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
985 struct hist_entry *he)
986{
987 int width = c2c_width(fmt, hpp, he->hists);
988
989 return scnprintf(hpp->buf, hpp->size, "%*d", width, he->thread->pid_);
990}
991
992static int64_t
993pid_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
994 struct hist_entry *left, struct hist_entry *right)
995{
996 return left->thread->pid_ - right->thread->pid_;
997}
998
999static int64_t
1000empty_cmp(struct perf_hpp_fmt *fmt __maybe_unused,
1001 struct hist_entry *left __maybe_unused,
1002 struct hist_entry *right __maybe_unused)
1003{
1004 return 0;
1005}
1006
1007static int
1008node_entry(struct perf_hpp_fmt *fmt __maybe_unused, struct perf_hpp *hpp,
1009 struct hist_entry *he)
1010{
1011 struct c2c_hist_entry *c2c_he;
1012 bool first = true;
1013 int node;
1014 int ret = 0;
1015
1016 c2c_he = container_of(he, struct c2c_hist_entry, he);
1017
1018 for (node = 0; node < c2c.nodes_cnt; node++) {
1019 DECLARE_BITMAP(set, c2c.cpus_cnt);
1020
1021 bitmap_zero(set, c2c.cpus_cnt);
1022 bitmap_and(set, c2c_he->cpuset, c2c.nodes[node], c2c.cpus_cnt);
1023
1024 if (!bitmap_weight(set, c2c.cpus_cnt)) {
1025 if (c2c.node_info == 1) {
1026 ret = scnprintf(hpp->buf, hpp->size, "%21s", " ");
1027 advance_hpp(hpp, ret);
1028 }
1029 continue;
1030 }
1031
1032 if (!first) {
1033 ret = scnprintf(hpp->buf, hpp->size, " ");
1034 advance_hpp(hpp, ret);
1035 }
1036
1037 switch (c2c.node_info) {
1038 case 0:
1039 ret = scnprintf(hpp->buf, hpp->size, "%2d", node);
1040 advance_hpp(hpp, ret);
1041 break;
1042 case 1:
1043 {
1044 int num = bitmap_weight(c2c_he->cpuset, c2c.cpus_cnt);
1045 struct c2c_stats *stats = &c2c_he->node_stats[node];
1046
1047 ret = scnprintf(hpp->buf, hpp->size, "%2d{%2d ", node, num);
1048 advance_hpp(hpp, ret);
1049
1050 #define DISPLAY_HITM(__h) \
1051 if (c2c_he->stats.__h> 0) { \
1052 ret = scnprintf(hpp->buf, hpp->size, "%5.1f%% ", \
1053 percent(stats->__h, c2c_he->stats.__h));\
1054 } else { \
1055 ret = scnprintf(hpp->buf, hpp->size, "%6s ", "n/a"); \
1056 }
1057
1058 switch (c2c.display) {
1059 case DISPLAY_RMT:
1060 DISPLAY_HITM(rmt_hitm);
1061 break;
1062 case DISPLAY_LCL:
1063 DISPLAY_HITM(lcl_hitm);
1064 break;
1065 case DISPLAY_TOT:
1066 DISPLAY_HITM(tot_hitm);
1067 default:
1068 break;
1069 }
1070
1071 #undef DISPLAY_HITM
1072
1073 advance_hpp(hpp, ret);
1074
1075 if (c2c_he->stats.store > 0) {
1076 ret = scnprintf(hpp->buf, hpp->size, "%5.1f%%}",
1077 percent(stats->store, c2c_he->stats.store));
1078 } else {
1079 ret = scnprintf(hpp->buf, hpp->size, "%6s}", "n/a");
1080 }
1081
1082 advance_hpp(hpp, ret);
1083 break;
1084 }
1085 case 2:
1086 ret = scnprintf(hpp->buf, hpp->size, "%2d{", node);
1087 advance_hpp(hpp, ret);
1088
1089 ret = bitmap_scnprintf(set, c2c.cpus_cnt, hpp->buf, hpp->size);
1090 advance_hpp(hpp, ret);
1091
1092 ret = scnprintf(hpp->buf, hpp->size, "}");
1093 advance_hpp(hpp, ret);
1094 break;
1095 default:
1096 break;
1097 }
1098
1099 first = false;
1100 }
1101
1102 return 0;
1103}
1104
1105static int
1106mean_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1107 struct hist_entry *he, double mean)
1108{
1109 int width = c2c_width(fmt, hpp, he->hists);
1110 char buf[10];
1111
1112 scnprintf(buf, 10, "%6.0f", mean);
1113 return scnprintf(hpp->buf, hpp->size, "%*s", width, buf);
1114}
1115
1116#define MEAN_ENTRY(__func, __val) \
1117static int \
1118__func(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp, struct hist_entry *he) \
1119{ \
1120 struct c2c_hist_entry *c2c_he; \
1121 c2c_he = container_of(he, struct c2c_hist_entry, he); \
1122 return mean_entry(fmt, hpp, he, avg_stats(&c2c_he->cstats.__val)); \
1123}
1124
1125MEAN_ENTRY(mean_rmt_entry, rmt_hitm);
1126MEAN_ENTRY(mean_lcl_entry, lcl_hitm);
1127MEAN_ENTRY(mean_load_entry, load);
1128
1129static int
1130cpucnt_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1131 struct hist_entry *he)
1132{
1133 struct c2c_hist_entry *c2c_he;
1134 int width = c2c_width(fmt, hpp, he->hists);
1135 char buf[10];
1136
1137 c2c_he = container_of(he, struct c2c_hist_entry, he);
1138
1139 scnprintf(buf, 10, "%d", bitmap_weight(c2c_he->cpuset, c2c.cpus_cnt));
1140 return scnprintf(hpp->buf, hpp->size, "%*s", width, buf);
1141}
1142
1143static int
1144cl_idx_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1145 struct hist_entry *he)
1146{
1147 struct c2c_hist_entry *c2c_he;
1148 int width = c2c_width(fmt, hpp, he->hists);
1149 char buf[10];
1150
1151 c2c_he = container_of(he, struct c2c_hist_entry, he);
1152
1153 scnprintf(buf, 10, "%u", c2c_he->cacheline_idx);
1154 return scnprintf(hpp->buf, hpp->size, "%*s", width, buf);
1155}
1156
1157static int
1158cl_idx_empty_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1159 struct hist_entry *he)
1160{
1161 int width = c2c_width(fmt, hpp, he->hists);
1162
1163 return scnprintf(hpp->buf, hpp->size, "%*s", width, "");
1164}
1165
1166#define HEADER_LOW(__h) \
1167 { \
1168 .line[1] = { \
1169 .text = __h, \
1170 }, \
1171 }
1172
1173#define HEADER_BOTH(__h0, __h1) \
1174 { \
1175 .line[0] = { \
1176 .text = __h0, \
1177 }, \
1178 .line[1] = { \
1179 .text = __h1, \
1180 }, \
1181 }
1182
1183#define HEADER_SPAN(__h0, __h1, __s) \
1184 { \
1185 .line[0] = { \
1186 .text = __h0, \
1187 .span = __s, \
1188 }, \
1189 .line[1] = { \
1190 .text = __h1, \
1191 }, \
1192 }
1193
1194#define HEADER_SPAN_LOW(__h) \
1195 { \
1196 .line[1] = { \
1197 .text = __h, \
1198 }, \
1199 }
1200
1201static struct c2c_dimension dim_dcacheline = {
1202 .header = HEADER_LOW("Cacheline"),
1203 .name = "dcacheline",
1204 .cmp = dcacheline_cmp,
1205 .entry = dcacheline_entry,
1206 .width = 18,
1207};
1208
1209static struct c2c_header header_offset_tui = HEADER_LOW("Off");
1210
1211static struct c2c_dimension dim_offset = {
1212 .header = HEADER_BOTH("Data address", "Offset"),
1213 .name = "offset",
1214 .cmp = offset_cmp,
1215 .entry = offset_entry,
1216 .width = 18,
1217};
1218
1219static struct c2c_dimension dim_iaddr = {
1220 .header = HEADER_LOW("Code address"),
1221 .name = "iaddr",
1222 .cmp = iaddr_cmp,
1223 .entry = iaddr_entry,
1224 .width = 18,
1225};
1226
1227static struct c2c_dimension dim_tot_hitm = {
1228 .header = HEADER_SPAN("----- LLC Load Hitm -----", "Total", 2),
1229 .name = "tot_hitm",
1230 .cmp = tot_hitm_cmp,
1231 .entry = tot_hitm_entry,
1232 .width = 7,
1233};
1234
1235static struct c2c_dimension dim_lcl_hitm = {
1236 .header = HEADER_SPAN_LOW("Lcl"),
1237 .name = "lcl_hitm",
1238 .cmp = lcl_hitm_cmp,
1239 .entry = lcl_hitm_entry,
1240 .width = 7,
1241};
1242
1243static struct c2c_dimension dim_rmt_hitm = {
1244 .header = HEADER_SPAN_LOW("Rmt"),
1245 .name = "rmt_hitm",
1246 .cmp = rmt_hitm_cmp,
1247 .entry = rmt_hitm_entry,
1248 .width = 7,
1249};
1250
1251static struct c2c_dimension dim_cl_rmt_hitm = {
1252 .header = HEADER_SPAN("----- HITM -----", "Rmt", 1),
1253 .name = "cl_rmt_hitm",
1254 .cmp = rmt_hitm_cmp,
1255 .entry = rmt_hitm_entry,
1256 .width = 7,
1257};
1258
1259static struct c2c_dimension dim_cl_lcl_hitm = {
1260 .header = HEADER_SPAN_LOW("Lcl"),
1261 .name = "cl_lcl_hitm",
1262 .cmp = lcl_hitm_cmp,
1263 .entry = lcl_hitm_entry,
1264 .width = 7,
1265};
1266
1267static struct c2c_dimension dim_stores = {
1268 .header = HEADER_SPAN("---- Store Reference ----", "Total", 2),
1269 .name = "stores",
1270 .cmp = store_cmp,
1271 .entry = store_entry,
1272 .width = 7,
1273};
1274
1275static struct c2c_dimension dim_stores_l1hit = {
1276 .header = HEADER_SPAN_LOW("L1Hit"),
1277 .name = "stores_l1hit",
1278 .cmp = st_l1hit_cmp,
1279 .entry = st_l1hit_entry,
1280 .width = 7,
1281};
1282
1283static struct c2c_dimension dim_stores_l1miss = {
1284 .header = HEADER_SPAN_LOW("L1Miss"),
1285 .name = "stores_l1miss",
1286 .cmp = st_l1miss_cmp,
1287 .entry = st_l1miss_entry,
1288 .width = 7,
1289};
1290
1291static struct c2c_dimension dim_cl_stores_l1hit = {
1292 .header = HEADER_SPAN("-- Store Refs --", "L1 Hit", 1),
1293 .name = "cl_stores_l1hit",
1294 .cmp = st_l1hit_cmp,
1295 .entry = st_l1hit_entry,
1296 .width = 7,
1297};
1298
1299static struct c2c_dimension dim_cl_stores_l1miss = {
1300 .header = HEADER_SPAN_LOW("L1 Miss"),
1301 .name = "cl_stores_l1miss",
1302 .cmp = st_l1miss_cmp,
1303 .entry = st_l1miss_entry,
1304 .width = 7,
1305};
1306
1307static struct c2c_dimension dim_ld_fbhit = {
1308 .header = HEADER_SPAN("----- Core Load Hit -----", "FB", 2),
1309 .name = "ld_fbhit",
1310 .cmp = ld_fbhit_cmp,
1311 .entry = ld_fbhit_entry,
1312 .width = 7,
1313};
1314
1315static struct c2c_dimension dim_ld_l1hit = {
1316 .header = HEADER_SPAN_LOW("L1"),
1317 .name = "ld_l1hit",
1318 .cmp = ld_l1hit_cmp,
1319 .entry = ld_l1hit_entry,
1320 .width = 7,
1321};
1322
1323static struct c2c_dimension dim_ld_l2hit = {
1324 .header = HEADER_SPAN_LOW("L2"),
1325 .name = "ld_l2hit",
1326 .cmp = ld_l2hit_cmp,
1327 .entry = ld_l2hit_entry,
1328 .width = 7,
1329};
1330
1331static struct c2c_dimension dim_ld_llchit = {
1332 .header = HEADER_SPAN("-- LLC Load Hit --", "Llc", 1),
1333 .name = "ld_lclhit",
1334 .cmp = ld_llchit_cmp,
1335 .entry = ld_llchit_entry,
1336 .width = 8,
1337};
1338
1339static struct c2c_dimension dim_ld_rmthit = {
1340 .header = HEADER_SPAN_LOW("Rmt"),
1341 .name = "ld_rmthit",
1342 .cmp = rmt_hit_cmp,
1343 .entry = rmt_hit_entry,
1344 .width = 8,
1345};
1346
1347static struct c2c_dimension dim_ld_llcmiss = {
1348 .header = HEADER_BOTH("LLC", "Ld Miss"),
1349 .name = "ld_llcmiss",
1350 .cmp = ld_llcmiss_cmp,
1351 .entry = ld_llcmiss_entry,
1352 .width = 7,
1353};
1354
1355static struct c2c_dimension dim_tot_recs = {
1356 .header = HEADER_BOTH("Total", "records"),
1357 .name = "tot_recs",
1358 .cmp = tot_recs_cmp,
1359 .entry = tot_recs_entry,
1360 .width = 7,
1361};
1362
1363static struct c2c_dimension dim_tot_loads = {
1364 .header = HEADER_BOTH("Total", "Loads"),
1365 .name = "tot_loads",
1366 .cmp = tot_loads_cmp,
1367 .entry = tot_loads_entry,
1368 .width = 7,
1369};
1370
1371static struct c2c_header percent_hitm_header[] = {
1372 [DISPLAY_LCL] = HEADER_BOTH("Lcl", "Hitm"),
1373 [DISPLAY_RMT] = HEADER_BOTH("Rmt", "Hitm"),
1374 [DISPLAY_TOT] = HEADER_BOTH("Tot", "Hitm"),
1375};
1376
1377static struct c2c_dimension dim_percent_hitm = {
1378 .name = "percent_hitm",
1379 .cmp = percent_hitm_cmp,
1380 .entry = percent_hitm_entry,
1381 .color = percent_hitm_color,
1382 .width = 7,
1383};
1384
1385static struct c2c_dimension dim_percent_rmt_hitm = {
1386 .header = HEADER_SPAN("----- HITM -----", "Rmt", 1),
1387 .name = "percent_rmt_hitm",
1388 .cmp = percent_rmt_hitm_cmp,
1389 .entry = percent_rmt_hitm_entry,
1390 .color = percent_rmt_hitm_color,
1391 .width = 7,
1392};
1393
1394static struct c2c_dimension dim_percent_lcl_hitm = {
1395 .header = HEADER_SPAN_LOW("Lcl"),
1396 .name = "percent_lcl_hitm",
1397 .cmp = percent_lcl_hitm_cmp,
1398 .entry = percent_lcl_hitm_entry,
1399 .color = percent_lcl_hitm_color,
1400 .width = 7,
1401};
1402
1403static struct c2c_dimension dim_percent_stores_l1hit = {
1404 .header = HEADER_SPAN("-- Store Refs --", "L1 Hit", 1),
1405 .name = "percent_stores_l1hit",
1406 .cmp = percent_stores_l1hit_cmp,
1407 .entry = percent_stores_l1hit_entry,
1408 .color = percent_stores_l1hit_color,
1409 .width = 7,
1410};
1411
1412static struct c2c_dimension dim_percent_stores_l1miss = {
1413 .header = HEADER_SPAN_LOW("L1 Miss"),
1414 .name = "percent_stores_l1miss",
1415 .cmp = percent_stores_l1miss_cmp,
1416 .entry = percent_stores_l1miss_entry,
1417 .color = percent_stores_l1miss_color,
1418 .width = 7,
1419};
1420
1421static struct c2c_dimension dim_dram_lcl = {
1422 .header = HEADER_SPAN("--- Load Dram ----", "Lcl", 1),
1423 .name = "dram_lcl",
1424 .cmp = lcl_dram_cmp,
1425 .entry = lcl_dram_entry,
1426 .width = 8,
1427};
1428
1429static struct c2c_dimension dim_dram_rmt = {
1430 .header = HEADER_SPAN_LOW("Rmt"),
1431 .name = "dram_rmt",
1432 .cmp = rmt_dram_cmp,
1433 .entry = rmt_dram_entry,
1434 .width = 8,
1435};
1436
1437static struct c2c_dimension dim_pid = {
1438 .header = HEADER_LOW("Pid"),
1439 .name = "pid",
1440 .cmp = pid_cmp,
1441 .entry = pid_entry,
1442 .width = 7,
1443};
1444
1445static struct c2c_dimension dim_tid = {
1446 .header = HEADER_LOW("Tid"),
1447 .name = "tid",
1448 .se = &sort_thread,
1449};
1450
1451static struct c2c_dimension dim_symbol = {
1452 .name = "symbol",
1453 .se = &sort_sym,
1454};
1455
1456static struct c2c_dimension dim_dso = {
1457 .header = HEADER_BOTH("Shared", "Object"),
1458 .name = "dso",
1459 .se = &sort_dso,
1460};
1461
1462static struct c2c_header header_node[3] = {
1463 HEADER_LOW("Node"),
1464 HEADER_LOW("Node{cpus %hitms %stores}"),
1465 HEADER_LOW("Node{cpu list}"),
1466};
1467
1468static struct c2c_dimension dim_node = {
1469 .name = "node",
1470 .cmp = empty_cmp,
1471 .entry = node_entry,
1472 .width = 4,
1473};
1474
1475static struct c2c_dimension dim_mean_rmt = {
1476 .header = HEADER_SPAN("---------- cycles ----------", "rmt hitm", 2),
1477 .name = "mean_rmt",
1478 .cmp = empty_cmp,
1479 .entry = mean_rmt_entry,
1480 .width = 8,
1481};
1482
1483static struct c2c_dimension dim_mean_lcl = {
1484 .header = HEADER_SPAN_LOW("lcl hitm"),
1485 .name = "mean_lcl",
1486 .cmp = empty_cmp,
1487 .entry = mean_lcl_entry,
1488 .width = 8,
1489};
1490
1491static struct c2c_dimension dim_mean_load = {
1492 .header = HEADER_SPAN_LOW("load"),
1493 .name = "mean_load",
1494 .cmp = empty_cmp,
1495 .entry = mean_load_entry,
1496 .width = 8,
1497};
1498
1499static struct c2c_dimension dim_cpucnt = {
1500 .header = HEADER_BOTH("cpu", "cnt"),
1501 .name = "cpucnt",
1502 .cmp = empty_cmp,
1503 .entry = cpucnt_entry,
1504 .width = 8,
1505};
1506
1507static struct c2c_dimension dim_srcline = {
1508 .name = "cl_srcline",
1509 .se = &sort_srcline,
1510};
1511
1512static struct c2c_dimension dim_dcacheline_idx = {
1513 .header = HEADER_LOW("Index"),
1514 .name = "cl_idx",
1515 .cmp = empty_cmp,
1516 .entry = cl_idx_entry,
1517 .width = 5,
1518};
1519
1520static struct c2c_dimension dim_dcacheline_num = {
1521 .header = HEADER_LOW("Num"),
1522 .name = "cl_num",
1523 .cmp = empty_cmp,
1524 .entry = cl_idx_entry,
1525 .width = 5,
1526};
1527
1528static struct c2c_dimension dim_dcacheline_num_empty = {
1529 .header = HEADER_LOW("Num"),
1530 .name = "cl_num_empty",
1531 .cmp = empty_cmp,
1532 .entry = cl_idx_empty_entry,
1533 .width = 5,
1534};
1535
1536static struct c2c_dimension *dimensions[] = {
1537 &dim_dcacheline,
1538 &dim_offset,
1539 &dim_iaddr,
1540 &dim_tot_hitm,
1541 &dim_lcl_hitm,
1542 &dim_rmt_hitm,
1543 &dim_cl_lcl_hitm,
1544 &dim_cl_rmt_hitm,
1545 &dim_stores,
1546 &dim_stores_l1hit,
1547 &dim_stores_l1miss,
1548 &dim_cl_stores_l1hit,
1549 &dim_cl_stores_l1miss,
1550 &dim_ld_fbhit,
1551 &dim_ld_l1hit,
1552 &dim_ld_l2hit,
1553 &dim_ld_llchit,
1554 &dim_ld_rmthit,
1555 &dim_ld_llcmiss,
1556 &dim_tot_recs,
1557 &dim_tot_loads,
1558 &dim_percent_hitm,
1559 &dim_percent_rmt_hitm,
1560 &dim_percent_lcl_hitm,
1561 &dim_percent_stores_l1hit,
1562 &dim_percent_stores_l1miss,
1563 &dim_dram_lcl,
1564 &dim_dram_rmt,
1565 &dim_pid,
1566 &dim_tid,
1567 &dim_symbol,
1568 &dim_dso,
1569 &dim_node,
1570 &dim_mean_rmt,
1571 &dim_mean_lcl,
1572 &dim_mean_load,
1573 &dim_cpucnt,
1574 &dim_srcline,
1575 &dim_dcacheline_idx,
1576 &dim_dcacheline_num,
1577 &dim_dcacheline_num_empty,
1578 NULL,
1579};
1580
1581static void fmt_free(struct perf_hpp_fmt *fmt)
1582{
1583 struct c2c_fmt *c2c_fmt;
1584
1585 c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
1586 free(c2c_fmt);
1587}
1588
1589static bool fmt_equal(struct perf_hpp_fmt *a, struct perf_hpp_fmt *b)
1590{
1591 struct c2c_fmt *c2c_a = container_of(a, struct c2c_fmt, fmt);
1592 struct c2c_fmt *c2c_b = container_of(b, struct c2c_fmt, fmt);
1593
1594 return c2c_a->dim == c2c_b->dim;
1595}
1596
1597static struct c2c_dimension *get_dimension(const char *name)
1598{
1599 unsigned int i;
1600
1601 for (i = 0; dimensions[i]; i++) {
1602 struct c2c_dimension *dim = dimensions[i];
1603
1604 if (!strcmp(dim->name, name))
1605 return dim;
1606 };
1607
1608 return NULL;
1609}
1610
1611static int c2c_se_entry(struct perf_hpp_fmt *fmt, struct perf_hpp *hpp,
1612 struct hist_entry *he)
1613{
1614 struct c2c_fmt *c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
1615 struct c2c_dimension *dim = c2c_fmt->dim;
1616 size_t len = fmt->user_len;
1617
1618 if (!len) {
1619 len = hists__col_len(he->hists, dim->se->se_width_idx);
1620
1621 if (dim == &dim_symbol || dim == &dim_srcline)
1622 len = symbol_width(he->hists, dim->se);
1623 }
1624
1625 return dim->se->se_snprintf(he, hpp->buf, hpp->size, len);
1626}
1627
1628static int64_t c2c_se_cmp(struct perf_hpp_fmt *fmt,
1629 struct hist_entry *a, struct hist_entry *b)
1630{
1631 struct c2c_fmt *c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
1632 struct c2c_dimension *dim = c2c_fmt->dim;
1633
1634 return dim->se->se_cmp(a, b);
1635}
1636
1637static int64_t c2c_se_collapse(struct perf_hpp_fmt *fmt,
1638 struct hist_entry *a, struct hist_entry *b)
1639{
1640 struct c2c_fmt *c2c_fmt = container_of(fmt, struct c2c_fmt, fmt);
1641 struct c2c_dimension *dim = c2c_fmt->dim;
1642 int64_t (*collapse_fn)(struct hist_entry *, struct hist_entry *);
1643
1644 collapse_fn = dim->se->se_collapse ?: dim->se->se_cmp;
1645 return collapse_fn(a, b);
1646}
1647
1648static struct c2c_fmt *get_format(const char *name)
1649{
1650 struct c2c_dimension *dim = get_dimension(name);
1651 struct c2c_fmt *c2c_fmt;
1652 struct perf_hpp_fmt *fmt;
1653
1654 if (!dim)
1655 return NULL;
1656
1657 c2c_fmt = zalloc(sizeof(*c2c_fmt));
1658 if (!c2c_fmt)
1659 return NULL;
1660
1661 c2c_fmt->dim = dim;
1662
1663 fmt = &c2c_fmt->fmt;
1664 INIT_LIST_HEAD(&fmt->list);
1665 INIT_LIST_HEAD(&fmt->sort_list);
1666
1667 fmt->cmp = dim->se ? c2c_se_cmp : dim->cmp;
1668 fmt->sort = dim->se ? c2c_se_cmp : dim->cmp;
1669 fmt->color = dim->se ? NULL : dim->color;
1670 fmt->entry = dim->se ? c2c_se_entry : dim->entry;
1671 fmt->header = c2c_header;
1672 fmt->width = c2c_width;
1673 fmt->collapse = dim->se ? c2c_se_collapse : dim->cmp;
1674 fmt->equal = fmt_equal;
1675 fmt->free = fmt_free;
1676
1677 return c2c_fmt;
1678}
1679
1680static int c2c_hists__init_output(struct perf_hpp_list *hpp_list, char *name)
1681{
1682 struct c2c_fmt *c2c_fmt = get_format(name);
1683
1684 if (!c2c_fmt) {
1685 reset_dimensions();
1686 return output_field_add(hpp_list, name);
1687 }
1688
1689 perf_hpp_list__column_register(hpp_list, &c2c_fmt->fmt);
1690 return 0;
1691}
1692
1693static int c2c_hists__init_sort(struct perf_hpp_list *hpp_list, char *name)
1694{
1695 struct c2c_fmt *c2c_fmt = get_format(name);
1696 struct c2c_dimension *dim;
1697
1698 if (!c2c_fmt) {
1699 reset_dimensions();
1700 return sort_dimension__add(hpp_list, name, NULL, 0);
1701 }
1702
1703 dim = c2c_fmt->dim;
1704 if (dim == &dim_dso)
1705 hpp_list->dso = 1;
1706
1707 perf_hpp_list__register_sort_field(hpp_list, &c2c_fmt->fmt);
1708 return 0;
1709}
1710
1711#define PARSE_LIST(_list, _fn) \
1712 do { \
1713 char *tmp, *tok; \
1714 ret = 0; \
1715 \
1716 if (!_list) \
1717 break; \
1718 \
1719 for (tok = strtok_r((char *)_list, ", ", &tmp); \
1720 tok; tok = strtok_r(NULL, ", ", &tmp)) { \
1721 ret = _fn(hpp_list, tok); \
1722 if (ret == -EINVAL) { \
1723 error("Invalid --fields key: `%s'", tok); \
1724 break; \
1725 } else if (ret == -ESRCH) { \
1726 error("Unknown --fields key: `%s'", tok); \
1727 break; \
1728 } \
1729 } \
1730 } while (0)
1731
1732static int hpp_list__parse(struct perf_hpp_list *hpp_list,
1733 const char *output_,
1734 const char *sort_)
1735{
1736 char *output = output_ ? strdup(output_) : NULL;
1737 char *sort = sort_ ? strdup(sort_) : NULL;
1738 int ret;
1739
1740 PARSE_LIST(output, c2c_hists__init_output);
1741 PARSE_LIST(sort, c2c_hists__init_sort);
1742
1743 /* copy sort keys to output fields */
1744 perf_hpp__setup_output_field(hpp_list);
1745
1746 /*
1747 * We dont need other sorting keys other than those
1748 * we already specified. It also really slows down
1749 * the processing a lot with big number of output
1750 * fields, so switching this off for c2c.
1751 */
1752
1753#if 0
1754 /* and then copy output fields to sort keys */
1755 perf_hpp__append_sort_keys(&hists->list);
1756#endif
1757
1758 free(output);
1759 free(sort);
1760 return ret;
1761}
1762
1763static int c2c_hists__init(struct c2c_hists *hists,
1764 const char *sort,
1765 int nr_header_lines)
1766{
1767 __hists__init(&hists->hists, &hists->list);
1768
1769 /*
1770 * Initialize only with sort fields, we need to resort
1771 * later anyway, and that's where we add output fields
1772 * as well.
1773 */
1774 perf_hpp_list__init(&hists->list);
1775
1776 /* Overload number of header lines.*/
1777 hists->list.nr_header_lines = nr_header_lines;
1778
1779 return hpp_list__parse(&hists->list, NULL, sort);
1780}
1781
1782static int c2c_hists__reinit(struct c2c_hists *c2c_hists,
1783 const char *output,
1784 const char *sort)
1785{
1786 perf_hpp__reset_output_field(&c2c_hists->list);
1787 return hpp_list__parse(&c2c_hists->list, output, sort);
1788}
1789
1790#define DISPLAY_LINE_LIMIT 0.0005
1791
1792static bool he__display(struct hist_entry *he, struct c2c_stats *stats)
1793{
1794 struct c2c_hist_entry *c2c_he;
1795 double ld_dist;
1796
1797 if (c2c.show_all)
1798 return true;
1799
1800 c2c_he = container_of(he, struct c2c_hist_entry, he);
1801
1802#define FILTER_HITM(__h) \
1803 if (stats->__h) { \
1804 ld_dist = ((double)c2c_he->stats.__h / stats->__h); \
1805 if (ld_dist < DISPLAY_LINE_LIMIT) \
1806 he->filtered = HIST_FILTER__C2C; \
1807 } else { \
1808 he->filtered = HIST_FILTER__C2C; \
1809 }
1810
1811 switch (c2c.display) {
1812 case DISPLAY_LCL:
1813 FILTER_HITM(lcl_hitm);
1814 break;
1815 case DISPLAY_RMT:
1816 FILTER_HITM(rmt_hitm);
1817 break;
1818 case DISPLAY_TOT:
1819 FILTER_HITM(tot_hitm);
1820 default:
1821 break;
1822 };
1823
1824#undef FILTER_HITM
1825
1826 return he->filtered == 0;
1827}
1828
1829static inline int valid_hitm_or_store(struct hist_entry *he)
1830{
1831 struct c2c_hist_entry *c2c_he;
1832 bool has_hitm;
1833
1834 c2c_he = container_of(he, struct c2c_hist_entry, he);
1835 has_hitm = c2c.display == DISPLAY_TOT ? c2c_he->stats.tot_hitm :
1836 c2c.display == DISPLAY_LCL ? c2c_he->stats.lcl_hitm :
1837 c2c_he->stats.rmt_hitm;
1838 return has_hitm || c2c_he->stats.store;
1839}
1840
1841static void calc_width(struct hist_entry *he)
1842{
1843 struct c2c_hists *c2c_hists;
1844
1845 c2c_hists = container_of(he->hists, struct c2c_hists, hists);
1846 hists__calc_col_len(&c2c_hists->hists, he);
1847}
1848
1849static int filter_cb(struct hist_entry *he)
1850{
1851 if (c2c.show_src && !he->srcline)
1852 he->srcline = hist_entry__get_srcline(he);
1853
1854 calc_width(he);
1855
1856 if (!valid_hitm_or_store(he))
1857 he->filtered = HIST_FILTER__C2C;
1858
1859 return 0;
1860}
1861
1862static int resort_cl_cb(struct hist_entry *he)
1863{
1864 struct c2c_hist_entry *c2c_he;
1865 struct c2c_hists *c2c_hists;
1866 bool display = he__display(he, &c2c.hitm_stats);
1867
1868 c2c_he = container_of(he, struct c2c_hist_entry, he);
1869 c2c_hists = c2c_he->hists;
1870
1871 calc_width(he);
1872
1873 if (display && c2c_hists) {
1874 static unsigned int idx;
1875
1876 c2c_he->cacheline_idx = idx++;
1877
1878 c2c_hists__reinit(c2c_hists, c2c.cl_output, c2c.cl_resort);
1879
1880 hists__collapse_resort(&c2c_hists->hists, NULL);
1881 hists__output_resort_cb(&c2c_hists->hists, NULL, filter_cb);
1882 }
1883
1884 return 0;
1885}
1886
1887static void setup_nodes_header(void)
1888{
1889 dim_node.header = header_node[c2c.node_info];
1890}
1891
1892static int setup_nodes(struct perf_session *session)
1893{
1894 struct numa_node *n;
1895 unsigned long **nodes;
1896 int node, cpu;
1897 int *cpu2node;
1898
1899 if (c2c.node_info > 2)
1900 c2c.node_info = 2;
1901
1902 c2c.nodes_cnt = session->header.env.nr_numa_nodes;
1903 c2c.cpus_cnt = session->header.env.nr_cpus_online;
1904
1905 n = session->header.env.numa_nodes;
1906 if (!n)
1907 return -EINVAL;
1908
1909 nodes = zalloc(sizeof(unsigned long *) * c2c.nodes_cnt);
1910 if (!nodes)
1911 return -ENOMEM;
1912
1913 c2c.nodes = nodes;
1914
1915 cpu2node = zalloc(sizeof(int) * c2c.cpus_cnt);
1916 if (!cpu2node)
1917 return -ENOMEM;
1918
1919 for (cpu = 0; cpu < c2c.cpus_cnt; cpu++)
1920 cpu2node[cpu] = -1;
1921
1922 c2c.cpu2node = cpu2node;
1923
1924 for (node = 0; node < c2c.nodes_cnt; node++) {
1925 struct cpu_map *map = n[node].map;
1926 unsigned long *set;
1927
1928 set = bitmap_alloc(c2c.cpus_cnt);
1929 if (!set)
1930 return -ENOMEM;
1931
1932 for (cpu = 0; cpu < map->nr; cpu++) {
1933 set_bit(map->map[cpu], set);
1934
1935 if (WARN_ONCE(cpu2node[map->map[cpu]] != -1, "node/cpu topology bug"))
1936 return -EINVAL;
1937
1938 cpu2node[map->map[cpu]] = node;
1939 }
1940
1941 nodes[node] = set;
1942 }
1943
1944 setup_nodes_header();
1945 return 0;
1946}
1947
1948#define HAS_HITMS(__h) ((__h)->stats.lcl_hitm || (__h)->stats.rmt_hitm)
1949
1950static int resort_hitm_cb(struct hist_entry *he)
1951{
1952 struct c2c_hist_entry *c2c_he;
1953 c2c_he = container_of(he, struct c2c_hist_entry, he);
1954
1955 if (HAS_HITMS(c2c_he)) {
1956 c2c.shared_clines++;
1957 c2c_add_stats(&c2c.hitm_stats, &c2c_he->stats);
1958 }
1959
1960 return 0;
1961}
1962
1963static int hists__iterate_cb(struct hists *hists, hists__resort_cb_t cb)
1964{
1965 struct rb_node *next = rb_first(&hists->entries);
1966 int ret = 0;
1967
1968 while (next) {
1969 struct hist_entry *he;
1970
1971 he = rb_entry(next, struct hist_entry, rb_node);
1972 ret = cb(he);
1973 if (ret)
1974 break;
1975 next = rb_next(&he->rb_node);
1976 }
1977
1978 return ret;
1979}
1980
1981static void print_c2c__display_stats(FILE *out)
1982{
1983 int llc_misses;
1984 struct c2c_stats *stats = &c2c.hists.stats;
1985
1986 llc_misses = stats->lcl_dram +
1987 stats->rmt_dram +
1988 stats->rmt_hit +
1989 stats->rmt_hitm;
1990
1991 fprintf(out, "=================================================\n");
1992 fprintf(out, " Trace Event Information \n");
1993 fprintf(out, "=================================================\n");
1994 fprintf(out, " Total records : %10d\n", stats->nr_entries);
1995 fprintf(out, " Locked Load/Store Operations : %10d\n", stats->locks);
1996 fprintf(out, " Load Operations : %10d\n", stats->load);
1997 fprintf(out, " Loads - uncacheable : %10d\n", stats->ld_uncache);
1998 fprintf(out, " Loads - IO : %10d\n", stats->ld_io);
1999 fprintf(out, " Loads - Miss : %10d\n", stats->ld_miss);
2000 fprintf(out, " Loads - no mapping : %10d\n", stats->ld_noadrs);
2001 fprintf(out, " Load Fill Buffer Hit : %10d\n", stats->ld_fbhit);
2002 fprintf(out, " Load L1D hit : %10d\n", stats->ld_l1hit);
2003 fprintf(out, " Load L2D hit : %10d\n", stats->ld_l2hit);
2004 fprintf(out, " Load LLC hit : %10d\n", stats->ld_llchit + stats->lcl_hitm);
2005 fprintf(out, " Load Local HITM : %10d\n", stats->lcl_hitm);
2006 fprintf(out, " Load Remote HITM : %10d\n", stats->rmt_hitm);
2007 fprintf(out, " Load Remote HIT : %10d\n", stats->rmt_hit);
2008 fprintf(out, " Load Local DRAM : %10d\n", stats->lcl_dram);
2009 fprintf(out, " Load Remote DRAM : %10d\n", stats->rmt_dram);
2010 fprintf(out, " Load MESI State Exclusive : %10d\n", stats->ld_excl);
2011 fprintf(out, " Load MESI State Shared : %10d\n", stats->ld_shared);
2012 fprintf(out, " Load LLC Misses : %10d\n", llc_misses);
2013 fprintf(out, " LLC Misses to Local DRAM : %10.1f%%\n", ((double)stats->lcl_dram/(double)llc_misses) * 100.);
2014 fprintf(out, " LLC Misses to Remote DRAM : %10.1f%%\n", ((double)stats->rmt_dram/(double)llc_misses) * 100.);
2015 fprintf(out, " LLC Misses to Remote cache (HIT) : %10.1f%%\n", ((double)stats->rmt_hit /(double)llc_misses) * 100.);
2016 fprintf(out, " LLC Misses to Remote cache (HITM) : %10.1f%%\n", ((double)stats->rmt_hitm/(double)llc_misses) * 100.);
2017 fprintf(out, " Store Operations : %10d\n", stats->store);
2018 fprintf(out, " Store - uncacheable : %10d\n", stats->st_uncache);
2019 fprintf(out, " Store - no mapping : %10d\n", stats->st_noadrs);
2020 fprintf(out, " Store L1D Hit : %10d\n", stats->st_l1hit);
2021 fprintf(out, " Store L1D Miss : %10d\n", stats->st_l1miss);
2022 fprintf(out, " No Page Map Rejects : %10d\n", stats->nomap);
2023 fprintf(out, " Unable to parse data source : %10d\n", stats->noparse);
2024}
2025
2026static void print_shared_cacheline_info(FILE *out)
2027{
2028 struct c2c_stats *stats = &c2c.hitm_stats;
2029 int hitm_cnt = stats->lcl_hitm + stats->rmt_hitm;
2030
2031 fprintf(out, "=================================================\n");
2032 fprintf(out, " Global Shared Cache Line Event Information \n");
2033 fprintf(out, "=================================================\n");
2034 fprintf(out, " Total Shared Cache Lines : %10d\n", c2c.shared_clines);
2035 fprintf(out, " Load HITs on shared lines : %10d\n", stats->load);
2036 fprintf(out, " Fill Buffer Hits on shared lines : %10d\n", stats->ld_fbhit);
2037 fprintf(out, " L1D hits on shared lines : %10d\n", stats->ld_l1hit);
2038 fprintf(out, " L2D hits on shared lines : %10d\n", stats->ld_l2hit);
2039 fprintf(out, " LLC hits on shared lines : %10d\n", stats->ld_llchit + stats->lcl_hitm);
2040 fprintf(out, " Locked Access on shared lines : %10d\n", stats->locks);
2041 fprintf(out, " Store HITs on shared lines : %10d\n", stats->store);
2042 fprintf(out, " Store L1D hits on shared lines : %10d\n", stats->st_l1hit);
2043 fprintf(out, " Total Merged records : %10d\n", hitm_cnt + stats->store);
2044}
2045
2046static void print_cacheline(struct c2c_hists *c2c_hists,
2047 struct hist_entry *he_cl,
2048 struct perf_hpp_list *hpp_list,
2049 FILE *out)
2050{
2051 char bf[1000];
2052 struct perf_hpp hpp = {
2053 .buf = bf,
2054 .size = 1000,
2055 };
2056 static bool once;
2057
2058 if (!once) {
2059 hists__fprintf_headers(&c2c_hists->hists, out);
2060 once = true;
2061 } else {
2062 fprintf(out, "\n");
2063 }
2064
2065 fprintf(out, " -------------------------------------------------------------\n");
2066 __hist_entry__snprintf(he_cl, &hpp, hpp_list);
2067 fprintf(out, "%s\n", bf);
2068 fprintf(out, " -------------------------------------------------------------\n");
2069
2070 hists__fprintf(&c2c_hists->hists, false, 0, 0, 0, out, true);
2071}
2072
2073static void print_pareto(FILE *out)
2074{
2075 struct perf_hpp_list hpp_list;
2076 struct rb_node *nd;
2077 int ret;
2078
2079 perf_hpp_list__init(&hpp_list);
2080 ret = hpp_list__parse(&hpp_list,
2081 "cl_num,"
2082 "cl_rmt_hitm,"
2083 "cl_lcl_hitm,"
2084 "cl_stores_l1hit,"
2085 "cl_stores_l1miss,"
2086 "dcacheline",
2087 NULL);
2088
2089 if (WARN_ONCE(ret, "failed to setup sort entries\n"))
2090 return;
2091
2092 nd = rb_first(&c2c.hists.hists.entries);
2093
2094 for (; nd; nd = rb_next(nd)) {
2095 struct hist_entry *he = rb_entry(nd, struct hist_entry, rb_node);
2096 struct c2c_hist_entry *c2c_he;
2097
2098 if (he->filtered)
2099 continue;
2100
2101 c2c_he = container_of(he, struct c2c_hist_entry, he);
2102 print_cacheline(c2c_he->hists, he, &hpp_list, out);
2103 }
2104}
2105
2106static void print_c2c_info(FILE *out, struct perf_session *session)
2107{
2108 struct perf_evlist *evlist = session->evlist;
2109 struct perf_evsel *evsel;
2110 bool first = true;
2111
2112 fprintf(out, "=================================================\n");
2113 fprintf(out, " c2c details \n");
2114 fprintf(out, "=================================================\n");
2115
2116 evlist__for_each_entry(evlist, evsel) {
2117 fprintf(out, "%-36s: %s\n", first ? " Events" : "",
2118 perf_evsel__name(evsel));
2119 first = false;
2120 }
2121 fprintf(out, " Cachelines sort on : %s HITMs\n",
2122 display_str[c2c.display]);
2123 fprintf(out, " Cacheline data grouping : %s\n", c2c.cl_sort);
2124}
2125
2126static void perf_c2c__hists_fprintf(FILE *out, struct perf_session *session)
2127{
2128 setup_pager();
2129
2130 print_c2c__display_stats(out);
2131 fprintf(out, "\n");
2132 print_shared_cacheline_info(out);
2133 fprintf(out, "\n");
2134 print_c2c_info(out, session);
2135
2136 if (c2c.stats_only)
2137 return;
2138
2139 fprintf(out, "\n");
2140 fprintf(out, "=================================================\n");
2141 fprintf(out, " Shared Data Cache Line Table \n");
2142 fprintf(out, "=================================================\n");
2143 fprintf(out, "#\n");
2144
2145 hists__fprintf(&c2c.hists.hists, true, 0, 0, 0, stdout, false);
2146
2147 fprintf(out, "\n");
2148 fprintf(out, "=================================================\n");
2149 fprintf(out, " Shared Cache Line Distribution Pareto \n");
2150 fprintf(out, "=================================================\n");
2151 fprintf(out, "#\n");
2152
2153 print_pareto(out);
2154}
2155
2156#ifdef HAVE_SLANG_SUPPORT
2157static void c2c_browser__update_nr_entries(struct hist_browser *hb)
2158{
2159 u64 nr_entries = 0;
2160 struct rb_node *nd = rb_first(&hb->hists->entries);
2161
2162 while (nd) {
2163 struct hist_entry *he = rb_entry(nd, struct hist_entry, rb_node);
2164
2165 if (!he->filtered)
2166 nr_entries++;
2167
2168 nd = rb_next(nd);
2169 }
2170
2171 hb->nr_non_filtered_entries = nr_entries;
2172}
2173
2174struct c2c_cacheline_browser {
2175 struct hist_browser hb;
2176 struct hist_entry *he;
2177};
2178
2179static int
2180perf_c2c_cacheline_browser__title(struct hist_browser *browser,
2181 char *bf, size_t size)
2182{
2183 struct c2c_cacheline_browser *cl_browser;
2184 struct hist_entry *he;
2185 uint64_t addr = 0;
2186
2187 cl_browser = container_of(browser, struct c2c_cacheline_browser, hb);
2188 he = cl_browser->he;
2189
2190 if (he->mem_info)
2191 addr = cl_address(he->mem_info->daddr.addr);
2192
2193 scnprintf(bf, size, "Cacheline 0x%lx", addr);
2194 return 0;
2195}
2196
2197static struct c2c_cacheline_browser*
2198c2c_cacheline_browser__new(struct hists *hists, struct hist_entry *he)
2199{
2200 struct c2c_cacheline_browser *browser;
2201
2202 browser = zalloc(sizeof(*browser));
2203 if (browser) {
2204 hist_browser__init(&browser->hb, hists);
2205 browser->hb.c2c_filter = true;
2206 browser->hb.title = perf_c2c_cacheline_browser__title;
2207 browser->he = he;
2208 }
2209
2210 return browser;
2211}
2212
2213static int perf_c2c__browse_cacheline(struct hist_entry *he)
2214{
2215 struct c2c_hist_entry *c2c_he;
2216 struct c2c_hists *c2c_hists;
2217 struct c2c_cacheline_browser *cl_browser;
2218 struct hist_browser *browser;
2219 int key = -1;
2220 const char help[] =
2221 " ENTER Togle callchains (if present) \n"
2222 " n Togle Node details info \n"
2223 " s Togle full lenght of symbol and source line columns \n"
2224 " q Return back to cacheline list \n";
2225
2226 /* Display compact version first. */
2227 c2c.symbol_full = false;
2228
2229 c2c_he = container_of(he, struct c2c_hist_entry, he);
2230 c2c_hists = c2c_he->hists;
2231
2232 cl_browser = c2c_cacheline_browser__new(&c2c_hists->hists, he);
2233 if (cl_browser == NULL)
2234 return -1;
2235
2236 browser = &cl_browser->hb;
2237
2238 /* reset abort key so that it can get Ctrl-C as a key */
2239 SLang_reset_tty();
2240 SLang_init_tty(0, 0, 0);
2241
2242 c2c_browser__update_nr_entries(browser);
2243
2244 while (1) {
2245 key = hist_browser__run(browser, "? - help");
2246
2247 switch (key) {
2248 case 's':
2249 c2c.symbol_full = !c2c.symbol_full;
2250 break;
2251 case 'n':
2252 c2c.node_info = (c2c.node_info + 1) % 3;
2253 setup_nodes_header();
2254 break;
2255 case 'q':
2256 goto out;
2257 case '?':
2258 ui_browser__help_window(&browser->b, help);
2259 break;
2260 default:
2261 break;
2262 }
2263 }
2264
2265out:
2266 free(cl_browser);
2267 return 0;
2268}
2269
2270static int perf_c2c_browser__title(struct hist_browser *browser,
2271 char *bf, size_t size)
2272{
2273 scnprintf(bf, size,
2274 "Shared Data Cache Line Table "
2275 "(%lu entries, sorted on %s HITMs)",
2276 browser->nr_non_filtered_entries,
2277 display_str[c2c.display]);
2278 return 0;
2279}
2280
2281static struct hist_browser*
2282perf_c2c_browser__new(struct hists *hists)
2283{
2284 struct hist_browser *browser = hist_browser__new(hists);
2285
2286 if (browser) {
2287 browser->title = perf_c2c_browser__title;
2288 browser->c2c_filter = true;
2289 }
2290
2291 return browser;
2292}
2293
2294static int perf_c2c__hists_browse(struct hists *hists)
2295{
2296 struct hist_browser *browser;
2297 int key = -1;
2298 const char help[] =
2299 " d Display cacheline details \n"
2300 " ENTER Togle callchains (if present) \n"
2301 " q Quit \n";
2302
2303 browser = perf_c2c_browser__new(hists);
2304 if (browser == NULL)
2305 return -1;
2306
2307 /* reset abort key so that it can get Ctrl-C as a key */
2308 SLang_reset_tty();
2309 SLang_init_tty(0, 0, 0);
2310
2311 c2c_browser__update_nr_entries(browser);
2312
2313 while (1) {
2314 key = hist_browser__run(browser, "? - help");
2315
2316 switch (key) {
2317 case 'q':
2318 goto out;
2319 case 'd':
2320 perf_c2c__browse_cacheline(browser->he_selection);
2321 break;
2322 case '?':
2323 ui_browser__help_window(&browser->b, help);
2324 break;
2325 default:
2326 break;
2327 }
2328 }
2329
2330out:
2331 hist_browser__delete(browser);
2332 return 0;
2333}
2334
2335static void perf_c2c_display(struct perf_session *session)
2336{
2337 if (c2c.use_stdio)
2338 perf_c2c__hists_fprintf(stdout, session);
2339 else
2340 perf_c2c__hists_browse(&c2c.hists.hists);
2341}
2342#else
2343static void perf_c2c_display(struct perf_session *session)
2344{
2345 use_browser = 0;
2346 perf_c2c__hists_fprintf(stdout, session);
2347}
2348#endif /* HAVE_SLANG_SUPPORT */
2349
2350static void ui_quirks(void)
2351{
2352 if (!c2c.use_stdio) {
2353 dim_offset.width = 5;
2354 dim_offset.header = header_offset_tui;
2355 }
2356
2357 dim_percent_hitm.header = percent_hitm_header[c2c.display];
2358}
2359
2360#define CALLCHAIN_DEFAULT_OPT "graph,0.5,caller,function,percent"
2361
2362const char callchain_help[] = "Display call graph (stack chain/backtrace):\n\n"
2363 CALLCHAIN_REPORT_HELP
2364 "\n\t\t\t\tDefault: " CALLCHAIN_DEFAULT_OPT;
2365
2366static int
2367parse_callchain_opt(const struct option *opt, const char *arg, int unset)
2368{
2369 struct callchain_param *callchain = opt->value;
2370
2371 callchain->enabled = !unset;
2372 /*
2373 * --no-call-graph
2374 */
2375 if (unset) {
2376 symbol_conf.use_callchain = false;
2377 callchain->mode = CHAIN_NONE;
2378 return 0;
2379 }
2380
2381 return parse_callchain_report_opt(arg);
2382}
2383
2384static int setup_callchain(struct perf_evlist *evlist)
2385{
2386 u64 sample_type = perf_evlist__combined_sample_type(evlist);
2387 enum perf_call_graph_mode mode = CALLCHAIN_NONE;
2388
2389 if ((sample_type & PERF_SAMPLE_REGS_USER) &&
2390 (sample_type & PERF_SAMPLE_STACK_USER))
2391 mode = CALLCHAIN_DWARF;
2392 else if (sample_type & PERF_SAMPLE_BRANCH_STACK)
2393 mode = CALLCHAIN_LBR;
2394 else if (sample_type & PERF_SAMPLE_CALLCHAIN)
2395 mode = CALLCHAIN_FP;
2396
2397 if (!callchain_param.enabled &&
2398 callchain_param.mode != CHAIN_NONE &&
2399 mode != CALLCHAIN_NONE) {
2400 symbol_conf.use_callchain = true;
2401 if (callchain_register_param(&callchain_param) < 0) {
2402 ui__error("Can't register callchain params.\n");
2403 return -EINVAL;
2404 }
2405 }
2406
2407 callchain_param.record_mode = mode;
2408 callchain_param.min_percent = 0;
2409 return 0;
2410}
2411
2412static int setup_display(const char *str)
2413{
2414 const char *display = str ?: "tot";
2415
2416 if (!strcmp(display, "tot"))
2417 c2c.display = DISPLAY_TOT;
2418 else if (!strcmp(display, "rmt"))
2419 c2c.display = DISPLAY_RMT;
2420 else if (!strcmp(display, "lcl"))
2421 c2c.display = DISPLAY_LCL;
2422 else {
2423 pr_err("failed: unknown display type: %s\n", str);
2424 return -1;
2425 }
2426
2427 return 0;
2428}
2429
2430#define for_each_token(__tok, __buf, __sep, __tmp) \
2431 for (__tok = strtok_r(__buf, __sep, &__tmp); __tok; \
2432 __tok = strtok_r(NULL, __sep, &__tmp))
2433
2434static int build_cl_output(char *cl_sort, bool no_source)
2435{
2436 char *tok, *tmp, *buf = strdup(cl_sort);
2437 bool add_pid = false;
2438 bool add_tid = false;
2439 bool add_iaddr = false;
2440 bool add_sym = false;
2441 bool add_dso = false;
2442 bool add_src = false;
2443
2444 if (!buf)
2445 return -ENOMEM;
2446
2447 for_each_token(tok, buf, ",", tmp) {
2448 if (!strcmp(tok, "tid")) {
2449 add_tid = true;
2450 } else if (!strcmp(tok, "pid")) {
2451 add_pid = true;
2452 } else if (!strcmp(tok, "iaddr")) {
2453 add_iaddr = true;
2454 add_sym = true;
2455 add_dso = true;
2456 add_src = no_source ? false : true;
2457 } else if (!strcmp(tok, "dso")) {
2458 add_dso = true;
2459 } else if (strcmp(tok, "offset")) {
2460 pr_err("unrecognized sort token: %s\n", tok);
2461 return -EINVAL;
2462 }
2463 }
2464
2465 if (asprintf(&c2c.cl_output,
2466 "%s%s%s%s%s%s%s%s%s%s",
2467 c2c.use_stdio ? "cl_num_empty," : "",
2468 "percent_rmt_hitm,"
2469 "percent_lcl_hitm,"
2470 "percent_stores_l1hit,"
2471 "percent_stores_l1miss,"
2472 "offset,",
2473 add_pid ? "pid," : "",
2474 add_tid ? "tid," : "",
2475 add_iaddr ? "iaddr," : "",
2476 "mean_rmt,"
2477 "mean_lcl,"
2478 "mean_load,"
2479 "cpucnt,",
2480 add_sym ? "symbol," : "",
2481 add_dso ? "dso," : "",
2482 add_src ? "cl_srcline," : "",
2483 "node") < 0)
2484 return -ENOMEM;
2485
2486 c2c.show_src = add_src;
2487
2488 free(buf);
2489 return 0;
2490}
2491
2492static int setup_coalesce(const char *coalesce, bool no_source)
2493{
2494 const char *c = coalesce ?: coalesce_default;
2495
2496 if (asprintf(&c2c.cl_sort, "offset,%s", c) < 0)
2497 return -ENOMEM;
2498
2499 if (build_cl_output(c2c.cl_sort, no_source))
2500 return -1;
2501
2502 if (asprintf(&c2c.cl_resort, "offset,%s",
2503 c2c.display == DISPLAY_TOT ?
2504 "tot_hitm" :
2505 c2c.display == DISPLAY_RMT ?
2506 "rmt_hitm,lcl_hitm" :
2507 "lcl_hitm,rmt_hitm") < 0)
2508 return -ENOMEM;
2509
2510 pr_debug("coalesce sort fields: %s\n", c2c.cl_sort);
2511 pr_debug("coalesce resort fields: %s\n", c2c.cl_resort);
2512 pr_debug("coalesce output fields: %s\n", c2c.cl_output);
2513 return 0;
2514}
2515
2516static int perf_c2c__report(int argc, const char **argv)
2517{
2518 struct perf_session *session;
2519 struct ui_progress prog;
2520 struct perf_data_file file = {
2521 .mode = PERF_DATA_MODE_READ,
2522 };
2523 char callchain_default_opt[] = CALLCHAIN_DEFAULT_OPT;
2524 const char *display = NULL;
2525 const char *coalesce = NULL;
2526 bool no_source = false;
2527 const struct option options[] = {
2528 OPT_STRING('k', "vmlinux", &symbol_conf.vmlinux_name,
2529 "file", "vmlinux pathname"),
2530 OPT_STRING('i', "input", &input_name, "file",
2531 "the input file to process"),
2532 OPT_INCR('N', "node-info", &c2c.node_info,
2533 "show extra node info in report (repeat for more info)"),
2534#ifdef HAVE_SLANG_SUPPORT
2535 OPT_BOOLEAN(0, "stdio", &c2c.use_stdio, "Use the stdio interface"),
2536#endif
2537 OPT_BOOLEAN(0, "stats", &c2c.stats_only,
2538 "Use the stdio interface"),
2539 OPT_BOOLEAN(0, "full-symbols", &c2c.symbol_full,
2540 "Display full length of symbols"),
2541 OPT_BOOLEAN(0, "no-source", &no_source,
2542 "Do not display Source Line column"),
2543 OPT_BOOLEAN(0, "show-all", &c2c.show_all,
2544 "Show all captured HITM lines."),
2545 OPT_CALLBACK_DEFAULT('g', "call-graph", &callchain_param,
2546 "print_type,threshold[,print_limit],order,sort_key[,branch],value",
2547 callchain_help, &parse_callchain_opt,
2548 callchain_default_opt),
2549 OPT_STRING('d', "display", &display, "Switch HITM output type", "lcl,rmt"),
2550 OPT_STRING('c', "coalesce", &coalesce, "coalesce fields",
2551 "coalesce fields: pid,tid,iaddr,dso"),
2552 OPT_BOOLEAN('f', "force", &symbol_conf.force, "don't complain, do it"),
2553 OPT_PARENT(c2c_options),
2554 OPT_END()
2555 };
2556 int err = 0;
2557
2558 argc = parse_options(argc, argv, options, report_c2c_usage,
2559 PARSE_OPT_STOP_AT_NON_OPTION);
2560 if (argc)
2561 usage_with_options(report_c2c_usage, options);
2562
2563 if (c2c.stats_only)
2564 c2c.use_stdio = true;
2565
2566 if (!input_name || !strlen(input_name))
2567 input_name = "perf.data";
2568
2569 file.path = input_name;
2570 file.force = symbol_conf.force;
2571
2572 err = setup_display(display);
2573 if (err)
2574 goto out;
2575
2576 err = setup_coalesce(coalesce, no_source);
2577 if (err) {
2578 pr_debug("Failed to initialize hists\n");
2579 goto out;
2580 }
2581
2582 err = c2c_hists__init(&c2c.hists, "dcacheline", 2);
2583 if (err) {
2584 pr_debug("Failed to initialize hists\n");
2585 goto out;
2586 }
2587
2588 session = perf_session__new(&file, 0, &c2c.tool);
2589 if (session == NULL) {
2590 pr_debug("No memory for session\n");
2591 goto out;
2592 }
2593
2594 err = setup_nodes(session);
2595 if (err) {
2596 pr_err("Failed setup nodes\n");
2597 goto out;
2598 }
2599
2600 err = setup_callchain(session->evlist);
2601 if (err)
2602 goto out_session;
2603
2604 if (symbol__init(&session->header.env) < 0)
2605 goto out_session;
2606
2607 /* No pipe support at the moment. */
2608 if (perf_data_file__is_pipe(session->file)) {
2609 pr_debug("No pipe support at the moment.\n");
2610 goto out_session;
2611 }
2612
2613 if (c2c.use_stdio)
2614 use_browser = 0;
2615 else
2616 use_browser = 1;
2617
2618 setup_browser(false);
2619
2620 err = perf_session__process_events(session);
2621 if (err) {
2622 pr_err("failed to process sample\n");
2623 goto out_session;
2624 }
2625
2626 c2c_hists__reinit(&c2c.hists,
2627 "cl_idx,"
2628 "dcacheline,"
2629 "tot_recs,"
2630 "percent_hitm,"
2631 "tot_hitm,lcl_hitm,rmt_hitm,"
2632 "stores,stores_l1hit,stores_l1miss,"
2633 "dram_lcl,dram_rmt,"
2634 "ld_llcmiss,"
2635 "tot_loads,"
2636 "ld_fbhit,ld_l1hit,ld_l2hit,"
2637 "ld_lclhit,ld_rmthit",
2638 c2c.display == DISPLAY_TOT ? "tot_hitm" :
2639 c2c.display == DISPLAY_LCL ? "lcl_hitm" : "rmt_hitm"
2640 );
2641
2642 ui_progress__init(&prog, c2c.hists.hists.nr_entries, "Sorting...");
2643
2644 hists__collapse_resort(&c2c.hists.hists, NULL);
2645 hists__output_resort_cb(&c2c.hists.hists, &prog, resort_hitm_cb);
2646 hists__iterate_cb(&c2c.hists.hists, resort_cl_cb);
2647
2648 ui_progress__finish();
2649
2650 ui_quirks();
2651
2652 perf_c2c_display(session);
2653
2654out_session:
2655 perf_session__delete(session);
2656out:
2657 return err;
2658}
2659
2660static int parse_record_events(const struct option *opt,
2661 const char *str, int unset __maybe_unused)
2662{
2663 bool *event_set = (bool *) opt->value;
2664
2665 *event_set = true;
2666 return perf_mem_events__parse(str);
2667}
2668
2669
2670static const char * const __usage_record[] = {
2671 "perf c2c record [<options>] [<command>]",
2672 "perf c2c record [<options>] -- <command> [<options>]",
2673 NULL
2674};
2675
2676static const char * const *record_mem_usage = __usage_record;
2677
2678static int perf_c2c__record(int argc, const char **argv)
2679{
2680 int rec_argc, i = 0, j;
2681 const char **rec_argv;
2682 int ret;
2683 bool all_user = false, all_kernel = false;
2684 bool event_set = false;
2685 struct option options[] = {
2686 OPT_CALLBACK('e', "event", &event_set, "event",
2687 "event selector. Use 'perf mem record -e list' to list available events",
2688 parse_record_events),
2689 OPT_BOOLEAN('u', "all-user", &all_user, "collect only user level data"),
2690 OPT_BOOLEAN('k', "all-kernel", &all_kernel, "collect only kernel level data"),
2691 OPT_UINTEGER('l', "ldlat", &perf_mem_events__loads_ldlat, "setup mem-loads latency"),
2692 OPT_PARENT(c2c_options),
2693 OPT_END()
2694 };
2695
2696 if (perf_mem_events__init()) {
2697 pr_err("failed: memory events not supported\n");
2698 return -1;
2699 }
2700
2701 argc = parse_options(argc, argv, options, record_mem_usage,
2702 PARSE_OPT_KEEP_UNKNOWN);
2703
2704 rec_argc = argc + 10; /* max number of arguments */
2705 rec_argv = calloc(rec_argc + 1, sizeof(char *));
2706 if (!rec_argv)
2707 return -1;
2708
2709 rec_argv[i++] = "record";
2710
2711 if (!event_set) {
2712 perf_mem_events[PERF_MEM_EVENTS__LOAD].record = true;
2713 perf_mem_events[PERF_MEM_EVENTS__STORE].record = true;
2714 }
2715
2716 if (perf_mem_events[PERF_MEM_EVENTS__LOAD].record)
2717 rec_argv[i++] = "-W";
2718
2719 rec_argv[i++] = "-d";
2720 rec_argv[i++] = "--sample-cpu";
2721
2722 for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) {
2723 if (!perf_mem_events[j].record)
2724 continue;
2725
2726 if (!perf_mem_events[j].supported) {
2727 pr_err("failed: event '%s' not supported\n",
2728 perf_mem_events[j].name);
2729 return -1;
2730 }
2731
2732 rec_argv[i++] = "-e";
2733 rec_argv[i++] = perf_mem_events__name(j);
2734 };
2735
2736 if (all_user)
2737 rec_argv[i++] = "--all-user";
2738
2739 if (all_kernel)
2740 rec_argv[i++] = "--all-kernel";
2741
2742 for (j = 0; j < argc; j++, i++)
2743 rec_argv[i] = argv[j];
2744
2745 if (verbose > 0) {
2746 pr_debug("calling: ");
2747
2748 j = 0;
2749
2750 while (rec_argv[j]) {
2751 pr_debug("%s ", rec_argv[j]);
2752 j++;
2753 }
2754 pr_debug("\n");
2755 }
2756
2757 ret = cmd_record(i, rec_argv, NULL);
2758 free(rec_argv);
2759 return ret;
2760}
2761
2762int cmd_c2c(int argc, const char **argv, const char *prefix __maybe_unused)
2763{
2764 argc = parse_options(argc, argv, c2c_options, c2c_usage,
2765 PARSE_OPT_STOP_AT_NON_OPTION);
2766
2767 if (!argc)
2768 usage_with_options(c2c_usage, c2c_options);
2769
2770 if (!strncmp(argv[0], "rec", 3)) {
2771 return perf_c2c__record(argc, argv);
2772 } else if (!strncmp(argv[0], "rep", 3)) {
2773 return perf_c2c__report(argc, argv);
2774 } else {
2775 usage_with_options(c2c_usage, c2c_options);
2776 }
2777
2778 return 0;
2779}