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