perf stat: Remove use of die/exit and handle errors
[platform/kernel/linux-rpi.git] / tools / perf / builtin-stat.c
1 /*
2  * builtin-stat.c
3  *
4  * Builtin stat command: Give a precise performance counters summary
5  * overview about any workload, CPU or specific PID.
6  *
7  * Sample output:
8
9    $ perf stat ./hackbench 10
10
11   Time: 0.118
12
13   Performance counter stats for './hackbench 10':
14
15        1708.761321 task-clock                #   11.037 CPUs utilized
16             41,190 context-switches          #    0.024 M/sec
17              6,735 CPU-migrations            #    0.004 M/sec
18             17,318 page-faults               #    0.010 M/sec
19      5,205,202,243 cycles                    #    3.046 GHz
20      3,856,436,920 stalled-cycles-frontend   #   74.09% frontend cycles idle
21      1,600,790,871 stalled-cycles-backend    #   30.75% backend  cycles idle
22      2,603,501,247 instructions              #    0.50  insns per cycle
23                                              #    1.48  stalled cycles per insn
24        484,357,498 branches                  #  283.455 M/sec
25          6,388,934 branch-misses             #    1.32% of all branches
26
27         0.154822978  seconds time elapsed
28
29  *
30  * Copyright (C) 2008-2011, Red Hat Inc, Ingo Molnar <mingo@redhat.com>
31  *
32  * Improvements and fixes by:
33  *
34  *   Arjan van de Ven <arjan@linux.intel.com>
35  *   Yanmin Zhang <yanmin.zhang@intel.com>
36  *   Wu Fengguang <fengguang.wu@intel.com>
37  *   Mike Galbraith <efault@gmx.de>
38  *   Paul Mackerras <paulus@samba.org>
39  *   Jaswinder Singh Rajput <jaswinder@kernel.org>
40  *
41  * Released under the GPL v2. (and only v2, not any later version)
42  */
43
44 #include "perf.h"
45 #include "builtin.h"
46 #include "util/util.h"
47 #include "util/parse-options.h"
48 #include "util/parse-events.h"
49 #include "util/event.h"
50 #include "util/evlist.h"
51 #include "util/evsel.h"
52 #include "util/debug.h"
53 #include "util/color.h"
54 #include "util/header.h"
55 #include "util/cpumap.h"
56 #include "util/thread.h"
57 #include "util/thread_map.h"
58
59 #include <sys/prctl.h>
60 #include <math.h>
61 #include <locale.h>
62
63 #define DEFAULT_SEPARATOR       " "
64 #define CNTR_NOT_SUPPORTED      "<not supported>"
65 #define CNTR_NOT_COUNTED        "<not counted>"
66
67 static struct perf_event_attr default_attrs[] = {
68
69   { .type = PERF_TYPE_SOFTWARE, .config = PERF_COUNT_SW_TASK_CLOCK              },
70   { .type = PERF_TYPE_SOFTWARE, .config = PERF_COUNT_SW_CONTEXT_SWITCHES        },
71   { .type = PERF_TYPE_SOFTWARE, .config = PERF_COUNT_SW_CPU_MIGRATIONS          },
72   { .type = PERF_TYPE_SOFTWARE, .config = PERF_COUNT_SW_PAGE_FAULTS             },
73
74   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_CPU_CYCLES              },
75   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_STALLED_CYCLES_FRONTEND },
76   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_STALLED_CYCLES_BACKEND  },
77   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_INSTRUCTIONS            },
78   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_BRANCH_INSTRUCTIONS     },
79   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_BRANCH_MISSES           },
80
81 };
82
83 /*
84  * Detailed stats (-d), covering the L1 and last level data caches:
85  */
86 static struct perf_event_attr detailed_attrs[] = {
87
88   { .type = PERF_TYPE_HW_CACHE,
89     .config =
90          PERF_COUNT_HW_CACHE_L1D                <<  0  |
91         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
92         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
93
94   { .type = PERF_TYPE_HW_CACHE,
95     .config =
96          PERF_COUNT_HW_CACHE_L1D                <<  0  |
97         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
98         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
99
100   { .type = PERF_TYPE_HW_CACHE,
101     .config =
102          PERF_COUNT_HW_CACHE_LL                 <<  0  |
103         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
104         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
105
106   { .type = PERF_TYPE_HW_CACHE,
107     .config =
108          PERF_COUNT_HW_CACHE_LL                 <<  0  |
109         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
110         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
111 };
112
113 /*
114  * Very detailed stats (-d -d), covering the instruction cache and the TLB caches:
115  */
116 static struct perf_event_attr very_detailed_attrs[] = {
117
118   { .type = PERF_TYPE_HW_CACHE,
119     .config =
120          PERF_COUNT_HW_CACHE_L1I                <<  0  |
121         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
122         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
123
124   { .type = PERF_TYPE_HW_CACHE,
125     .config =
126          PERF_COUNT_HW_CACHE_L1I                <<  0  |
127         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
128         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
129
130   { .type = PERF_TYPE_HW_CACHE,
131     .config =
132          PERF_COUNT_HW_CACHE_DTLB               <<  0  |
133         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
134         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
135
136   { .type = PERF_TYPE_HW_CACHE,
137     .config =
138          PERF_COUNT_HW_CACHE_DTLB               <<  0  |
139         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
140         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
141
142   { .type = PERF_TYPE_HW_CACHE,
143     .config =
144          PERF_COUNT_HW_CACHE_ITLB               <<  0  |
145         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
146         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
147
148   { .type = PERF_TYPE_HW_CACHE,
149     .config =
150          PERF_COUNT_HW_CACHE_ITLB               <<  0  |
151         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
152         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
153
154 };
155
156 /*
157  * Very, very detailed stats (-d -d -d), adding prefetch events:
158  */
159 static struct perf_event_attr very_very_detailed_attrs[] = {
160
161   { .type = PERF_TYPE_HW_CACHE,
162     .config =
163          PERF_COUNT_HW_CACHE_L1D                <<  0  |
164         (PERF_COUNT_HW_CACHE_OP_PREFETCH        <<  8) |
165         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
166
167   { .type = PERF_TYPE_HW_CACHE,
168     .config =
169          PERF_COUNT_HW_CACHE_L1D                <<  0  |
170         (PERF_COUNT_HW_CACHE_OP_PREFETCH        <<  8) |
171         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
172 };
173
174
175
176 static struct perf_evlist       *evsel_list;
177
178 static struct perf_target       target = {
179         .uid    = UINT_MAX,
180 };
181
182 static int                      run_idx                         =  0;
183 static int                      run_count                       =  1;
184 static bool                     no_inherit                      = false;
185 static bool                     scale                           =  true;
186 static bool                     no_aggr                         = false;
187 static pid_t                    child_pid                       = -1;
188 static bool                     null_run                        =  false;
189 static int                      detailed_run                    =  0;
190 static bool                     sync_run                        =  false;
191 static bool                     big_num                         =  true;
192 static int                      big_num_opt                     =  -1;
193 static const char               *csv_sep                        = NULL;
194 static bool                     csv_output                      = false;
195 static bool                     group                           = false;
196 static const char               *output_name                    = NULL;
197 static FILE                     *output                         = NULL;
198 static int                      output_fd;
199
200 static volatile int done = 0;
201
202 struct stats
203 {
204         double n, mean, M2;
205 };
206
207 struct perf_stat {
208         struct stats      res_stats[3];
209 };
210
211 static int perf_evsel__alloc_stat_priv(struct perf_evsel *evsel)
212 {
213         evsel->priv = zalloc(sizeof(struct perf_stat));
214         return evsel->priv == NULL ? -ENOMEM : 0;
215 }
216
217 static void perf_evsel__free_stat_priv(struct perf_evsel *evsel)
218 {
219         free(evsel->priv);
220         evsel->priv = NULL;
221 }
222
223 static void update_stats(struct stats *stats, u64 val)
224 {
225         double delta;
226
227         stats->n++;
228         delta = val - stats->mean;
229         stats->mean += delta / stats->n;
230         stats->M2 += delta*(val - stats->mean);
231 }
232
233 static double avg_stats(struct stats *stats)
234 {
235         return stats->mean;
236 }
237
238 /*
239  * http://en.wikipedia.org/wiki/Algorithms_for_calculating_variance
240  *
241  *       (\Sum n_i^2) - ((\Sum n_i)^2)/n
242  * s^2 = -------------------------------
243  *                  n - 1
244  *
245  * http://en.wikipedia.org/wiki/Stddev
246  *
247  * The std dev of the mean is related to the std dev by:
248  *
249  *             s
250  * s_mean = -------
251  *          sqrt(n)
252  *
253  */
254 static double stddev_stats(struct stats *stats)
255 {
256         double variance, variance_mean;
257
258         if (!stats->n)
259                 return 0.0;
260
261         variance = stats->M2 / (stats->n - 1);
262         variance_mean = variance / stats->n;
263
264         return sqrt(variance_mean);
265 }
266
267 static struct stats runtime_nsecs_stats[MAX_NR_CPUS];
268 static struct stats runtime_cycles_stats[MAX_NR_CPUS];
269 static struct stats runtime_stalled_cycles_front_stats[MAX_NR_CPUS];
270 static struct stats runtime_stalled_cycles_back_stats[MAX_NR_CPUS];
271 static struct stats runtime_branches_stats[MAX_NR_CPUS];
272 static struct stats runtime_cacherefs_stats[MAX_NR_CPUS];
273 static struct stats runtime_l1_dcache_stats[MAX_NR_CPUS];
274 static struct stats runtime_l1_icache_stats[MAX_NR_CPUS];
275 static struct stats runtime_ll_cache_stats[MAX_NR_CPUS];
276 static struct stats runtime_itlb_cache_stats[MAX_NR_CPUS];
277 static struct stats runtime_dtlb_cache_stats[MAX_NR_CPUS];
278 static struct stats walltime_nsecs_stats;
279
280 static int create_perf_stat_counter(struct perf_evsel *evsel,
281                                     struct perf_evsel *first)
282 {
283         struct perf_event_attr *attr = &evsel->attr;
284         bool exclude_guest_missing = false;
285         int ret;
286
287         if (scale)
288                 attr->read_format = PERF_FORMAT_TOTAL_TIME_ENABLED |
289                                     PERF_FORMAT_TOTAL_TIME_RUNNING;
290
291         attr->inherit = !no_inherit;
292
293 retry:
294         if (exclude_guest_missing)
295                 evsel->attr.exclude_guest = evsel->attr.exclude_host = 0;
296
297         if (perf_target__has_cpu(&target)) {
298                 ret = perf_evsel__open_per_cpu(evsel, evsel_list->cpus);
299                 if (ret)
300                         goto check_ret;
301                 return 0;
302         }
303
304         if (!perf_target__has_task(&target) && (!group || evsel == first)) {
305                 attr->disabled = 1;
306                 attr->enable_on_exec = 1;
307         }
308
309         ret = perf_evsel__open_per_thread(evsel, evsel_list->threads);
310         if (!ret)
311                 return 0;
312         /* fall through */
313 check_ret:
314         if (ret && errno == EINVAL) {
315                 if (!exclude_guest_missing &&
316                     (evsel->attr.exclude_guest || evsel->attr.exclude_host)) {
317                         pr_debug("Old kernel, cannot exclude "
318                                  "guest or host samples.\n");
319                         exclude_guest_missing = true;
320                         goto retry;
321                 }
322         }
323         return ret;
324 }
325
326 /*
327  * Does the counter have nsecs as a unit?
328  */
329 static inline int nsec_counter(struct perf_evsel *evsel)
330 {
331         if (perf_evsel__match(evsel, SOFTWARE, SW_CPU_CLOCK) ||
332             perf_evsel__match(evsel, SOFTWARE, SW_TASK_CLOCK))
333                 return 1;
334
335         return 0;
336 }
337
338 /*
339  * Update various tracking values we maintain to print
340  * more semantic information such as miss/hit ratios,
341  * instruction rates, etc:
342  */
343 static void update_shadow_stats(struct perf_evsel *counter, u64 *count)
344 {
345         if (perf_evsel__match(counter, SOFTWARE, SW_TASK_CLOCK))
346                 update_stats(&runtime_nsecs_stats[0], count[0]);
347         else if (perf_evsel__match(counter, HARDWARE, HW_CPU_CYCLES))
348                 update_stats(&runtime_cycles_stats[0], count[0]);
349         else if (perf_evsel__match(counter, HARDWARE, HW_STALLED_CYCLES_FRONTEND))
350                 update_stats(&runtime_stalled_cycles_front_stats[0], count[0]);
351         else if (perf_evsel__match(counter, HARDWARE, HW_STALLED_CYCLES_BACKEND))
352                 update_stats(&runtime_stalled_cycles_back_stats[0], count[0]);
353         else if (perf_evsel__match(counter, HARDWARE, HW_BRANCH_INSTRUCTIONS))
354                 update_stats(&runtime_branches_stats[0], count[0]);
355         else if (perf_evsel__match(counter, HARDWARE, HW_CACHE_REFERENCES))
356                 update_stats(&runtime_cacherefs_stats[0], count[0]);
357         else if (perf_evsel__match(counter, HW_CACHE, HW_CACHE_L1D))
358                 update_stats(&runtime_l1_dcache_stats[0], count[0]);
359         else if (perf_evsel__match(counter, HW_CACHE, HW_CACHE_L1I))
360                 update_stats(&runtime_l1_icache_stats[0], count[0]);
361         else if (perf_evsel__match(counter, HW_CACHE, HW_CACHE_LL))
362                 update_stats(&runtime_ll_cache_stats[0], count[0]);
363         else if (perf_evsel__match(counter, HW_CACHE, HW_CACHE_DTLB))
364                 update_stats(&runtime_dtlb_cache_stats[0], count[0]);
365         else if (perf_evsel__match(counter, HW_CACHE, HW_CACHE_ITLB))
366                 update_stats(&runtime_itlb_cache_stats[0], count[0]);
367 }
368
369 /*
370  * Read out the results of a single counter:
371  * aggregate counts across CPUs in system-wide mode
372  */
373 static int read_counter_aggr(struct perf_evsel *counter)
374 {
375         struct perf_stat *ps = counter->priv;
376         u64 *count = counter->counts->aggr.values;
377         int i;
378
379         if (__perf_evsel__read(counter, evsel_list->cpus->nr,
380                                evsel_list->threads->nr, scale) < 0)
381                 return -1;
382
383         for (i = 0; i < 3; i++)
384                 update_stats(&ps->res_stats[i], count[i]);
385
386         if (verbose) {
387                 fprintf(output, "%s: %" PRIu64 " %" PRIu64 " %" PRIu64 "\n",
388                         perf_evsel__name(counter), count[0], count[1], count[2]);
389         }
390
391         /*
392          * Save the full runtime - to allow normalization during printout:
393          */
394         update_shadow_stats(counter, count);
395
396         return 0;
397 }
398
399 /*
400  * Read out the results of a single counter:
401  * do not aggregate counts across CPUs in system-wide mode
402  */
403 static int read_counter(struct perf_evsel *counter)
404 {
405         u64 *count;
406         int cpu;
407
408         for (cpu = 0; cpu < evsel_list->cpus->nr; cpu++) {
409                 if (__perf_evsel__read_on_cpu(counter, cpu, 0, scale) < 0)
410                         return -1;
411
412                 count = counter->counts->cpu[cpu].values;
413
414                 update_shadow_stats(counter, count);
415         }
416
417         return 0;
418 }
419
420 static int run_perf_stat(int argc __used, const char **argv)
421 {
422         unsigned long long t0, t1;
423         struct perf_evsel *counter, *first;
424         int status = 0;
425         int child_ready_pipe[2], go_pipe[2];
426         const bool forks = (argc > 0);
427         char buf;
428
429         if (forks && (pipe(child_ready_pipe) < 0 || pipe(go_pipe) < 0)) {
430                 perror("failed to create pipes");
431                 return -1;
432         }
433
434         if (forks) {
435                 if ((child_pid = fork()) < 0)
436                         perror("failed to fork");
437
438                 if (!child_pid) {
439                         close(child_ready_pipe[0]);
440                         close(go_pipe[1]);
441                         fcntl(go_pipe[0], F_SETFD, FD_CLOEXEC);
442
443                         /*
444                          * Do a dummy execvp to get the PLT entry resolved,
445                          * so we avoid the resolver overhead on the real
446                          * execvp call.
447                          */
448                         execvp("", (char **)argv);
449
450                         /*
451                          * Tell the parent we're ready to go
452                          */
453                         close(child_ready_pipe[1]);
454
455                         /*
456                          * Wait until the parent tells us to go.
457                          */
458                         if (read(go_pipe[0], &buf, 1) == -1)
459                                 perror("unable to read pipe");
460
461                         execvp(argv[0], (char **)argv);
462
463                         perror(argv[0]);
464                         exit(-1);
465                 }
466
467                 if (perf_target__none(&target))
468                         evsel_list->threads->map[0] = child_pid;
469
470                 /*
471                  * Wait for the child to be ready to exec.
472                  */
473                 close(child_ready_pipe[1]);
474                 close(go_pipe[0]);
475                 if (read(child_ready_pipe[0], &buf, 1) == -1)
476                         perror("unable to read pipe");
477                 close(child_ready_pipe[0]);
478         }
479
480         if (group)
481                 perf_evlist__set_leader(evsel_list);
482
483         first = perf_evlist__first(evsel_list);
484
485         list_for_each_entry(counter, &evsel_list->entries, node) {
486                 if (create_perf_stat_counter(counter, first) < 0) {
487                         /*
488                          * PPC returns ENXIO for HW counters until 2.6.37
489                          * (behavior changed with commit b0a873e).
490                          */
491                         if (errno == EINVAL || errno == ENOSYS ||
492                             errno == ENOENT || errno == EOPNOTSUPP ||
493                             errno == ENXIO) {
494                                 if (verbose)
495                                         ui__warning("%s event is not supported by the kernel.\n",
496                                                     perf_evsel__name(counter));
497                                 counter->supported = false;
498                                 continue;
499                         }
500
501                         if (errno == EPERM || errno == EACCES) {
502                                 error("You may not have permission to collect %sstats.\n"
503                                       "\t Consider tweaking"
504                                       " /proc/sys/kernel/perf_event_paranoid or running as root.",
505                                       target.system_wide ? "system-wide " : "");
506                         } else {
507                                 error("open_counter returned with %d (%s). "
508                                       "/bin/dmesg may provide additional information.\n",
509                                        errno, strerror(errno));
510                         }
511                         if (child_pid != -1)
512                                 kill(child_pid, SIGTERM);
513
514                         pr_err("Not all events could be opened.\n");
515                         return -1;
516                 }
517                 counter->supported = true;
518         }
519
520         if (perf_evlist__set_filters(evsel_list)) {
521                 error("failed to set filter with %d (%s)\n", errno,
522                         strerror(errno));
523                 return -1;
524         }
525
526         /*
527          * Enable counters and exec the command:
528          */
529         t0 = rdclock();
530
531         if (forks) {
532                 close(go_pipe[1]);
533                 wait(&status);
534                 if (WIFSIGNALED(status))
535                         psignal(WTERMSIG(status), argv[0]);
536         } else {
537                 while(!done) sleep(1);
538         }
539
540         t1 = rdclock();
541
542         update_stats(&walltime_nsecs_stats, t1 - t0);
543
544         if (no_aggr) {
545                 list_for_each_entry(counter, &evsel_list->entries, node) {
546                         read_counter(counter);
547                         perf_evsel__close_fd(counter, evsel_list->cpus->nr, 1);
548                 }
549         } else {
550                 list_for_each_entry(counter, &evsel_list->entries, node) {
551                         read_counter_aggr(counter);
552                         perf_evsel__close_fd(counter, evsel_list->cpus->nr,
553                                              evsel_list->threads->nr);
554                 }
555         }
556
557         return WEXITSTATUS(status);
558 }
559
560 static void print_noise_pct(double total, double avg)
561 {
562         double pct = 0.0;
563
564         if (avg)
565                 pct = 100.0*total/avg;
566
567         if (csv_output)
568                 fprintf(output, "%s%.2f%%", csv_sep, pct);
569         else if (pct)
570                 fprintf(output, "  ( +-%6.2f%% )", pct);
571 }
572
573 static void print_noise(struct perf_evsel *evsel, double avg)
574 {
575         struct perf_stat *ps;
576
577         if (run_count == 1)
578                 return;
579
580         ps = evsel->priv;
581         print_noise_pct(stddev_stats(&ps->res_stats[0]), avg);
582 }
583
584 static void nsec_printout(int cpu, struct perf_evsel *evsel, double avg)
585 {
586         double msecs = avg / 1e6;
587         char cpustr[16] = { '\0', };
588         const char *fmt = csv_output ? "%s%.6f%s%s" : "%s%18.6f%s%-25s";
589
590         if (no_aggr)
591                 sprintf(cpustr, "CPU%*d%s",
592                         csv_output ? 0 : -4,
593                         evsel_list->cpus->map[cpu], csv_sep);
594
595         fprintf(output, fmt, cpustr, msecs, csv_sep, perf_evsel__name(evsel));
596
597         if (evsel->cgrp)
598                 fprintf(output, "%s%s", csv_sep, evsel->cgrp->name);
599
600         if (csv_output)
601                 return;
602
603         if (perf_evsel__match(evsel, SOFTWARE, SW_TASK_CLOCK))
604                 fprintf(output, " # %8.3f CPUs utilized          ",
605                         avg / avg_stats(&walltime_nsecs_stats));
606         else
607                 fprintf(output, "                                   ");
608 }
609
610 /* used for get_ratio_color() */
611 enum grc_type {
612         GRC_STALLED_CYCLES_FE,
613         GRC_STALLED_CYCLES_BE,
614         GRC_CACHE_MISSES,
615         GRC_MAX_NR
616 };
617
618 static const char *get_ratio_color(enum grc_type type, double ratio)
619 {
620         static const double grc_table[GRC_MAX_NR][3] = {
621                 [GRC_STALLED_CYCLES_FE] = { 50.0, 30.0, 10.0 },
622                 [GRC_STALLED_CYCLES_BE] = { 75.0, 50.0, 20.0 },
623                 [GRC_CACHE_MISSES]      = { 20.0, 10.0, 5.0 },
624         };
625         const char *color = PERF_COLOR_NORMAL;
626
627         if (ratio > grc_table[type][0])
628                 color = PERF_COLOR_RED;
629         else if (ratio > grc_table[type][1])
630                 color = PERF_COLOR_MAGENTA;
631         else if (ratio > grc_table[type][2])
632                 color = PERF_COLOR_YELLOW;
633
634         return color;
635 }
636
637 static void print_stalled_cycles_frontend(int cpu, struct perf_evsel *evsel __used, double avg)
638 {
639         double total, ratio = 0.0;
640         const char *color;
641
642         total = avg_stats(&runtime_cycles_stats[cpu]);
643
644         if (total)
645                 ratio = avg / total * 100.0;
646
647         color = get_ratio_color(GRC_STALLED_CYCLES_FE, ratio);
648
649         fprintf(output, " #  ");
650         color_fprintf(output, color, "%6.2f%%", ratio);
651         fprintf(output, " frontend cycles idle   ");
652 }
653
654 static void print_stalled_cycles_backend(int cpu, struct perf_evsel *evsel __used, double avg)
655 {
656         double total, ratio = 0.0;
657         const char *color;
658
659         total = avg_stats(&runtime_cycles_stats[cpu]);
660
661         if (total)
662                 ratio = avg / total * 100.0;
663
664         color = get_ratio_color(GRC_STALLED_CYCLES_BE, ratio);
665
666         fprintf(output, " #  ");
667         color_fprintf(output, color, "%6.2f%%", ratio);
668         fprintf(output, " backend  cycles idle   ");
669 }
670
671 static void print_branch_misses(int cpu, struct perf_evsel *evsel __used, double avg)
672 {
673         double total, ratio = 0.0;
674         const char *color;
675
676         total = avg_stats(&runtime_branches_stats[cpu]);
677
678         if (total)
679                 ratio = avg / total * 100.0;
680
681         color = get_ratio_color(GRC_CACHE_MISSES, ratio);
682
683         fprintf(output, " #  ");
684         color_fprintf(output, color, "%6.2f%%", ratio);
685         fprintf(output, " of all branches        ");
686 }
687
688 static void print_l1_dcache_misses(int cpu, struct perf_evsel *evsel __used, double avg)
689 {
690         double total, ratio = 0.0;
691         const char *color;
692
693         total = avg_stats(&runtime_l1_dcache_stats[cpu]);
694
695         if (total)
696                 ratio = avg / total * 100.0;
697
698         color = get_ratio_color(GRC_CACHE_MISSES, ratio);
699
700         fprintf(output, " #  ");
701         color_fprintf(output, color, "%6.2f%%", ratio);
702         fprintf(output, " of all L1-dcache hits  ");
703 }
704
705 static void print_l1_icache_misses(int cpu, struct perf_evsel *evsel __used, double avg)
706 {
707         double total, ratio = 0.0;
708         const char *color;
709
710         total = avg_stats(&runtime_l1_icache_stats[cpu]);
711
712         if (total)
713                 ratio = avg / total * 100.0;
714
715         color = get_ratio_color(GRC_CACHE_MISSES, ratio);
716
717         fprintf(output, " #  ");
718         color_fprintf(output, color, "%6.2f%%", ratio);
719         fprintf(output, " of all L1-icache hits  ");
720 }
721
722 static void print_dtlb_cache_misses(int cpu, struct perf_evsel *evsel __used, double avg)
723 {
724         double total, ratio = 0.0;
725         const char *color;
726
727         total = avg_stats(&runtime_dtlb_cache_stats[cpu]);
728
729         if (total)
730                 ratio = avg / total * 100.0;
731
732         color = get_ratio_color(GRC_CACHE_MISSES, ratio);
733
734         fprintf(output, " #  ");
735         color_fprintf(output, color, "%6.2f%%", ratio);
736         fprintf(output, " of all dTLB cache hits ");
737 }
738
739 static void print_itlb_cache_misses(int cpu, struct perf_evsel *evsel __used, double avg)
740 {
741         double total, ratio = 0.0;
742         const char *color;
743
744         total = avg_stats(&runtime_itlb_cache_stats[cpu]);
745
746         if (total)
747                 ratio = avg / total * 100.0;
748
749         color = get_ratio_color(GRC_CACHE_MISSES, ratio);
750
751         fprintf(output, " #  ");
752         color_fprintf(output, color, "%6.2f%%", ratio);
753         fprintf(output, " of all iTLB cache hits ");
754 }
755
756 static void print_ll_cache_misses(int cpu, struct perf_evsel *evsel __used, double avg)
757 {
758         double total, ratio = 0.0;
759         const char *color;
760
761         total = avg_stats(&runtime_ll_cache_stats[cpu]);
762
763         if (total)
764                 ratio = avg / total * 100.0;
765
766         color = get_ratio_color(GRC_CACHE_MISSES, ratio);
767
768         fprintf(output, " #  ");
769         color_fprintf(output, color, "%6.2f%%", ratio);
770         fprintf(output, " of all LL-cache hits   ");
771 }
772
773 static void abs_printout(int cpu, struct perf_evsel *evsel, double avg)
774 {
775         double total, ratio = 0.0;
776         char cpustr[16] = { '\0', };
777         const char *fmt;
778
779         if (csv_output)
780                 fmt = "%s%.0f%s%s";
781         else if (big_num)
782                 fmt = "%s%'18.0f%s%-25s";
783         else
784                 fmt = "%s%18.0f%s%-25s";
785
786         if (no_aggr)
787                 sprintf(cpustr, "CPU%*d%s",
788                         csv_output ? 0 : -4,
789                         evsel_list->cpus->map[cpu], csv_sep);
790         else
791                 cpu = 0;
792
793         fprintf(output, fmt, cpustr, avg, csv_sep, perf_evsel__name(evsel));
794
795         if (evsel->cgrp)
796                 fprintf(output, "%s%s", csv_sep, evsel->cgrp->name);
797
798         if (csv_output)
799                 return;
800
801         if (perf_evsel__match(evsel, HARDWARE, HW_INSTRUCTIONS)) {
802                 total = avg_stats(&runtime_cycles_stats[cpu]);
803
804                 if (total)
805                         ratio = avg / total;
806
807                 fprintf(output, " #   %5.2f  insns per cycle        ", ratio);
808
809                 total = avg_stats(&runtime_stalled_cycles_front_stats[cpu]);
810                 total = max(total, avg_stats(&runtime_stalled_cycles_back_stats[cpu]));
811
812                 if (total && avg) {
813                         ratio = total / avg;
814                         fprintf(output, "\n                                             #   %5.2f  stalled cycles per insn", ratio);
815                 }
816
817         } else if (perf_evsel__match(evsel, HARDWARE, HW_BRANCH_MISSES) &&
818                         runtime_branches_stats[cpu].n != 0) {
819                 print_branch_misses(cpu, evsel, avg);
820         } else if (
821                 evsel->attr.type == PERF_TYPE_HW_CACHE &&
822                 evsel->attr.config ==  ( PERF_COUNT_HW_CACHE_L1D |
823                                         ((PERF_COUNT_HW_CACHE_OP_READ) << 8) |
824                                         ((PERF_COUNT_HW_CACHE_RESULT_MISS) << 16)) &&
825                         runtime_l1_dcache_stats[cpu].n != 0) {
826                 print_l1_dcache_misses(cpu, evsel, avg);
827         } else if (
828                 evsel->attr.type == PERF_TYPE_HW_CACHE &&
829                 evsel->attr.config ==  ( PERF_COUNT_HW_CACHE_L1I |
830                                         ((PERF_COUNT_HW_CACHE_OP_READ) << 8) |
831                                         ((PERF_COUNT_HW_CACHE_RESULT_MISS) << 16)) &&
832                         runtime_l1_icache_stats[cpu].n != 0) {
833                 print_l1_icache_misses(cpu, evsel, avg);
834         } else if (
835                 evsel->attr.type == PERF_TYPE_HW_CACHE &&
836                 evsel->attr.config ==  ( PERF_COUNT_HW_CACHE_DTLB |
837                                         ((PERF_COUNT_HW_CACHE_OP_READ) << 8) |
838                                         ((PERF_COUNT_HW_CACHE_RESULT_MISS) << 16)) &&
839                         runtime_dtlb_cache_stats[cpu].n != 0) {
840                 print_dtlb_cache_misses(cpu, evsel, avg);
841         } else if (
842                 evsel->attr.type == PERF_TYPE_HW_CACHE &&
843                 evsel->attr.config ==  ( PERF_COUNT_HW_CACHE_ITLB |
844                                         ((PERF_COUNT_HW_CACHE_OP_READ) << 8) |
845                                         ((PERF_COUNT_HW_CACHE_RESULT_MISS) << 16)) &&
846                         runtime_itlb_cache_stats[cpu].n != 0) {
847                 print_itlb_cache_misses(cpu, evsel, avg);
848         } else if (
849                 evsel->attr.type == PERF_TYPE_HW_CACHE &&
850                 evsel->attr.config ==  ( PERF_COUNT_HW_CACHE_LL |
851                                         ((PERF_COUNT_HW_CACHE_OP_READ) << 8) |
852                                         ((PERF_COUNT_HW_CACHE_RESULT_MISS) << 16)) &&
853                         runtime_ll_cache_stats[cpu].n != 0) {
854                 print_ll_cache_misses(cpu, evsel, avg);
855         } else if (perf_evsel__match(evsel, HARDWARE, HW_CACHE_MISSES) &&
856                         runtime_cacherefs_stats[cpu].n != 0) {
857                 total = avg_stats(&runtime_cacherefs_stats[cpu]);
858
859                 if (total)
860                         ratio = avg * 100 / total;
861
862                 fprintf(output, " # %8.3f %% of all cache refs    ", ratio);
863
864         } else if (perf_evsel__match(evsel, HARDWARE, HW_STALLED_CYCLES_FRONTEND)) {
865                 print_stalled_cycles_frontend(cpu, evsel, avg);
866         } else if (perf_evsel__match(evsel, HARDWARE, HW_STALLED_CYCLES_BACKEND)) {
867                 print_stalled_cycles_backend(cpu, evsel, avg);
868         } else if (perf_evsel__match(evsel, HARDWARE, HW_CPU_CYCLES)) {
869                 total = avg_stats(&runtime_nsecs_stats[cpu]);
870
871                 if (total)
872                         ratio = 1.0 * avg / total;
873
874                 fprintf(output, " # %8.3f GHz                    ", ratio);
875         } else if (runtime_nsecs_stats[cpu].n != 0) {
876                 char unit = 'M';
877
878                 total = avg_stats(&runtime_nsecs_stats[cpu]);
879
880                 if (total)
881                         ratio = 1000.0 * avg / total;
882                 if (ratio < 0.001) {
883                         ratio *= 1000;
884                         unit = 'K';
885                 }
886
887                 fprintf(output, " # %8.3f %c/sec                  ", ratio, unit);
888         } else {
889                 fprintf(output, "                                   ");
890         }
891 }
892
893 /*
894  * Print out the results of a single counter:
895  * aggregated counts in system-wide mode
896  */
897 static void print_counter_aggr(struct perf_evsel *counter)
898 {
899         struct perf_stat *ps = counter->priv;
900         double avg = avg_stats(&ps->res_stats[0]);
901         int scaled = counter->counts->scaled;
902
903         if (scaled == -1) {
904                 fprintf(output, "%*s%s%*s",
905                         csv_output ? 0 : 18,
906                         counter->supported ? CNTR_NOT_COUNTED : CNTR_NOT_SUPPORTED,
907                         csv_sep,
908                         csv_output ? 0 : -24,
909                         perf_evsel__name(counter));
910
911                 if (counter->cgrp)
912                         fprintf(output, "%s%s", csv_sep, counter->cgrp->name);
913
914                 fputc('\n', output);
915                 return;
916         }
917
918         if (nsec_counter(counter))
919                 nsec_printout(-1, counter, avg);
920         else
921                 abs_printout(-1, counter, avg);
922
923         print_noise(counter, avg);
924
925         if (csv_output) {
926                 fputc('\n', output);
927                 return;
928         }
929
930         if (scaled) {
931                 double avg_enabled, avg_running;
932
933                 avg_enabled = avg_stats(&ps->res_stats[1]);
934                 avg_running = avg_stats(&ps->res_stats[2]);
935
936                 fprintf(output, " [%5.2f%%]", 100 * avg_running / avg_enabled);
937         }
938         fprintf(output, "\n");
939 }
940
941 /*
942  * Print out the results of a single counter:
943  * does not use aggregated count in system-wide
944  */
945 static void print_counter(struct perf_evsel *counter)
946 {
947         u64 ena, run, val;
948         int cpu;
949
950         for (cpu = 0; cpu < evsel_list->cpus->nr; cpu++) {
951                 val = counter->counts->cpu[cpu].val;
952                 ena = counter->counts->cpu[cpu].ena;
953                 run = counter->counts->cpu[cpu].run;
954                 if (run == 0 || ena == 0) {
955                         fprintf(output, "CPU%*d%s%*s%s%*s",
956                                 csv_output ? 0 : -4,
957                                 evsel_list->cpus->map[cpu], csv_sep,
958                                 csv_output ? 0 : 18,
959                                 counter->supported ? CNTR_NOT_COUNTED : CNTR_NOT_SUPPORTED,
960                                 csv_sep,
961                                 csv_output ? 0 : -24,
962                                 perf_evsel__name(counter));
963
964                         if (counter->cgrp)
965                                 fprintf(output, "%s%s",
966                                         csv_sep, counter->cgrp->name);
967
968                         fputc('\n', output);
969                         continue;
970                 }
971
972                 if (nsec_counter(counter))
973                         nsec_printout(cpu, counter, val);
974                 else
975                         abs_printout(cpu, counter, val);
976
977                 if (!csv_output) {
978                         print_noise(counter, 1.0);
979
980                         if (run != ena)
981                                 fprintf(output, "  (%.2f%%)",
982                                         100.0 * run / ena);
983                 }
984                 fputc('\n', output);
985         }
986 }
987
988 static void print_stat(int argc, const char **argv)
989 {
990         struct perf_evsel *counter;
991         int i;
992
993         fflush(stdout);
994
995         if (!csv_output) {
996                 fprintf(output, "\n");
997                 fprintf(output, " Performance counter stats for ");
998                 if (!perf_target__has_task(&target)) {
999                         fprintf(output, "\'%s", argv[0]);
1000                         for (i = 1; i < argc; i++)
1001                                 fprintf(output, " %s", argv[i]);
1002                 } else if (target.pid)
1003                         fprintf(output, "process id \'%s", target.pid);
1004                 else
1005                         fprintf(output, "thread id \'%s", target.tid);
1006
1007                 fprintf(output, "\'");
1008                 if (run_count > 1)
1009                         fprintf(output, " (%d runs)", run_count);
1010                 fprintf(output, ":\n\n");
1011         }
1012
1013         if (no_aggr) {
1014                 list_for_each_entry(counter, &evsel_list->entries, node)
1015                         print_counter(counter);
1016         } else {
1017                 list_for_each_entry(counter, &evsel_list->entries, node)
1018                         print_counter_aggr(counter);
1019         }
1020
1021         if (!csv_output) {
1022                 if (!null_run)
1023                         fprintf(output, "\n");
1024                 fprintf(output, " %17.9f seconds time elapsed",
1025                                 avg_stats(&walltime_nsecs_stats)/1e9);
1026                 if (run_count > 1) {
1027                         fprintf(output, "                                        ");
1028                         print_noise_pct(stddev_stats(&walltime_nsecs_stats),
1029                                         avg_stats(&walltime_nsecs_stats));
1030                 }
1031                 fprintf(output, "\n\n");
1032         }
1033 }
1034
1035 static volatile int signr = -1;
1036
1037 static void skip_signal(int signo)
1038 {
1039         if(child_pid == -1)
1040                 done = 1;
1041
1042         signr = signo;
1043 }
1044
1045 static void sig_atexit(void)
1046 {
1047         if (child_pid != -1)
1048                 kill(child_pid, SIGTERM);
1049
1050         if (signr == -1)
1051                 return;
1052
1053         signal(signr, SIG_DFL);
1054         kill(getpid(), signr);
1055 }
1056
1057 static const char * const stat_usage[] = {
1058         "perf stat [<options>] [<command>]",
1059         NULL
1060 };
1061
1062 static int stat__set_big_num(const struct option *opt __used,
1063                              const char *s __used, int unset)
1064 {
1065         big_num_opt = unset ? 0 : 1;
1066         return 0;
1067 }
1068
1069 static bool append_file;
1070
1071 static const struct option options[] = {
1072         OPT_CALLBACK('e', "event", &evsel_list, "event",
1073                      "event selector. use 'perf list' to list available events",
1074                      parse_events_option),
1075         OPT_CALLBACK(0, "filter", &evsel_list, "filter",
1076                      "event filter", parse_filter),
1077         OPT_BOOLEAN('i', "no-inherit", &no_inherit,
1078                     "child tasks do not inherit counters"),
1079         OPT_STRING('p', "pid", &target.pid, "pid",
1080                    "stat events on existing process id"),
1081         OPT_STRING('t', "tid", &target.tid, "tid",
1082                    "stat events on existing thread id"),
1083         OPT_BOOLEAN('a', "all-cpus", &target.system_wide,
1084                     "system-wide collection from all CPUs"),
1085         OPT_BOOLEAN('g', "group", &group,
1086                     "put the counters into a counter group"),
1087         OPT_BOOLEAN('c', "scale", &scale,
1088                     "scale/normalize counters"),
1089         OPT_INCR('v', "verbose", &verbose,
1090                     "be more verbose (show counter open errors, etc)"),
1091         OPT_INTEGER('r', "repeat", &run_count,
1092                     "repeat command and print average + stddev (max: 100)"),
1093         OPT_BOOLEAN('n', "null", &null_run,
1094                     "null run - dont start any counters"),
1095         OPT_INCR('d', "detailed", &detailed_run,
1096                     "detailed run - start a lot of events"),
1097         OPT_BOOLEAN('S', "sync", &sync_run,
1098                     "call sync() before starting a run"),
1099         OPT_CALLBACK_NOOPT('B', "big-num", NULL, NULL, 
1100                            "print large numbers with thousands\' separators",
1101                            stat__set_big_num),
1102         OPT_STRING('C', "cpu", &target.cpu_list, "cpu",
1103                     "list of cpus to monitor in system-wide"),
1104         OPT_BOOLEAN('A', "no-aggr", &no_aggr,
1105                     "disable CPU count aggregation"),
1106         OPT_STRING('x', "field-separator", &csv_sep, "separator",
1107                    "print counts with custom separator"),
1108         OPT_CALLBACK('G', "cgroup", &evsel_list, "name",
1109                      "monitor event in cgroup name only",
1110                      parse_cgroups),
1111         OPT_STRING('o', "output", &output_name, "file",
1112                     "output file name"),
1113         OPT_BOOLEAN(0, "append", &append_file, "append to the output file"),
1114         OPT_INTEGER(0, "log-fd", &output_fd,
1115                     "log output to fd, instead of stderr"),
1116         OPT_END()
1117 };
1118
1119 /*
1120  * Add default attributes, if there were no attributes specified or
1121  * if -d/--detailed, -d -d or -d -d -d is used:
1122  */
1123 static int add_default_attributes(void)
1124 {
1125         /* Set attrs if no event is selected and !null_run: */
1126         if (null_run)
1127                 return 0;
1128
1129         if (!evsel_list->nr_entries) {
1130                 if (perf_evlist__add_default_attrs(evsel_list, default_attrs) < 0)
1131                         return -1;
1132         }
1133
1134         /* Detailed events get appended to the event list: */
1135
1136         if (detailed_run <  1)
1137                 return 0;
1138
1139         /* Append detailed run extra attributes: */
1140         if (perf_evlist__add_default_attrs(evsel_list, detailed_attrs) < 0)
1141                 return -1;
1142
1143         if (detailed_run < 2)
1144                 return 0;
1145
1146         /* Append very detailed run extra attributes: */
1147         if (perf_evlist__add_default_attrs(evsel_list, very_detailed_attrs) < 0)
1148                 return -1;
1149
1150         if (detailed_run < 3)
1151                 return 0;
1152
1153         /* Append very, very detailed run extra attributes: */
1154         return perf_evlist__add_default_attrs(evsel_list, very_very_detailed_attrs);
1155 }
1156
1157 int cmd_stat(int argc, const char **argv, const char *prefix __used)
1158 {
1159         struct perf_evsel *pos;
1160         int status = -ENOMEM;
1161         const char *mode;
1162
1163         setlocale(LC_ALL, "");
1164
1165         evsel_list = perf_evlist__new(NULL, NULL);
1166         if (evsel_list == NULL)
1167                 return -ENOMEM;
1168
1169         argc = parse_options(argc, argv, options, stat_usage,
1170                 PARSE_OPT_STOP_AT_NON_OPTION);
1171
1172         output = stderr;
1173         if (output_name && strcmp(output_name, "-"))
1174                 output = NULL;
1175
1176         if (output_name && output_fd) {
1177                 fprintf(stderr, "cannot use both --output and --log-fd\n");
1178                 usage_with_options(stat_usage, options);
1179         }
1180
1181         if (output_fd < 0) {
1182                 fprintf(stderr, "argument to --log-fd must be a > 0\n");
1183                 usage_with_options(stat_usage, options);
1184         }
1185
1186         if (!output) {
1187                 struct timespec tm;
1188                 mode = append_file ? "a" : "w";
1189
1190                 output = fopen(output_name, mode);
1191                 if (!output) {
1192                         perror("failed to create output file");
1193                         return -1;
1194                 }
1195                 clock_gettime(CLOCK_REALTIME, &tm);
1196                 fprintf(output, "# started on %s\n", ctime(&tm.tv_sec));
1197         } else if (output_fd > 0) {
1198                 mode = append_file ? "a" : "w";
1199                 output = fdopen(output_fd, mode);
1200                 if (!output) {
1201                         perror("Failed opening logfd");
1202                         return -errno;
1203                 }
1204         }
1205
1206         if (csv_sep) {
1207                 csv_output = true;
1208                 if (!strcmp(csv_sep, "\\t"))
1209                         csv_sep = "\t";
1210         } else
1211                 csv_sep = DEFAULT_SEPARATOR;
1212
1213         /*
1214          * let the spreadsheet do the pretty-printing
1215          */
1216         if (csv_output) {
1217                 /* User explicitly passed -B? */
1218                 if (big_num_opt == 1) {
1219                         fprintf(stderr, "-B option not supported with -x\n");
1220                         usage_with_options(stat_usage, options);
1221                 } else /* Nope, so disable big number formatting */
1222                         big_num = false;
1223         } else if (big_num_opt == 0) /* User passed --no-big-num */
1224                 big_num = false;
1225
1226         if (!argc && !perf_target__has_task(&target))
1227                 usage_with_options(stat_usage, options);
1228         if (run_count <= 0)
1229                 usage_with_options(stat_usage, options);
1230
1231         /* no_aggr, cgroup are for system-wide only */
1232         if ((no_aggr || nr_cgroups) && !perf_target__has_cpu(&target)) {
1233                 fprintf(stderr, "both cgroup and no-aggregation "
1234                         "modes only available in system-wide mode\n");
1235
1236                 usage_with_options(stat_usage, options);
1237         }
1238
1239         if (add_default_attributes())
1240                 goto out;
1241
1242         perf_target__validate(&target);
1243
1244         if (perf_evlist__create_maps(evsel_list, &target) < 0) {
1245                 if (perf_target__has_task(&target))
1246                         pr_err("Problems finding threads of monitor\n");
1247                 if (perf_target__has_cpu(&target))
1248                         perror("failed to parse CPUs map");
1249
1250                 usage_with_options(stat_usage, options);
1251                 return -1;
1252         }
1253
1254         list_for_each_entry(pos, &evsel_list->entries, node) {
1255                 if (perf_evsel__alloc_stat_priv(pos) < 0 ||
1256                     perf_evsel__alloc_counts(pos, evsel_list->cpus->nr) < 0)
1257                         goto out_free_fd;
1258         }
1259
1260         /*
1261          * We dont want to block the signals - that would cause
1262          * child tasks to inherit that and Ctrl-C would not work.
1263          * What we want is for Ctrl-C to work in the exec()-ed
1264          * task, but being ignored by perf stat itself:
1265          */
1266         atexit(sig_atexit);
1267         signal(SIGINT,  skip_signal);
1268         signal(SIGALRM, skip_signal);
1269         signal(SIGABRT, skip_signal);
1270
1271         status = 0;
1272         for (run_idx = 0; run_idx < run_count; run_idx++) {
1273                 if (run_count != 1 && verbose)
1274                         fprintf(output, "[ perf stat: executing run #%d ... ]\n",
1275                                 run_idx + 1);
1276
1277                 if (sync_run)
1278                         sync();
1279
1280                 status = run_perf_stat(argc, argv);
1281         }
1282
1283         if (status != -1)
1284                 print_stat(argc, argv);
1285 out_free_fd:
1286         list_for_each_entry(pos, &evsel_list->entries, node)
1287                 perf_evsel__free_stat_priv(pos);
1288         perf_evlist__delete_maps(evsel_list);
1289 out:
1290         perf_evlist__delete(evsel_list);
1291         return status;
1292 }