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/cgroup.h"
  47 #include "util/util.h"
  48 #include <subcmd/parse-options.h>
  49 #include "util/parse-events.h"
  50 #include "util/pmu.h"
  51 #include "util/event.h"
  52 #include "util/evlist.h"
  53 #include "util/evsel.h"
  54 #include "util/debug.h"
  55 #include "util/color.h"
  56 #include "util/stat.h"
  57 #include "util/header.h"
  58 #include "util/cpumap.h"
  59 #include "util/thread.h"
  60 #include "util/thread_map.h"
  61 #include "util/counts.h"
  62 #include "util/session.h"
  63 #include "util/tool.h"
  64 #include "asm/bug.h"
  65
  66 #include <stdlib.h>
  67 #include <sys/prctl.h>
  68 #include <locale.h>
  69
  70 #define DEFAULT_SEPARATOR       " "
  71 #define CNTR_NOT_SUPPORTED      "<not supported>"
  72 #define CNTR_NOT_COUNTED        "<not counted>"
  73
  74 static void print_counters(struct timespec *ts, int argc, const char **argv);
  75
  76 /* Default events used for perf stat -T */
  77 static const char *transaction_attrs = {
  78         "task-clock,"
  79         "{"
  80         "instructions,"
  81         "cycles,"
  82         "cpu/cycles-t/,"
  83         "cpu/tx-start/,"
  84         "cpu/el-start/,"
  85         "cpu/cycles-ct/"
  86         "}"
  87 };
  88
  89 /* More limited version when the CPU does not have all events. */
  90 static const char * transaction_limited_attrs = {
  91         "task-clock,"
  92         "{"
  93         "instructions,"
  94         "cycles,"
  95         "cpu/cycles-t/,"
  96         "cpu/tx-start/"
  97         "}"
  98 };
  99
 100 static struct perf_evlist       *evsel_list;
 101
 102 static struct target target = {
 103         .uid    = UINT_MAX,
 104 };
 105
 106 typedef int (*aggr_get_id_t)(struct cpu_map *m, int cpu);
 107
 108 static int                      run_count                       =  1;
 109 static bool                     no_inherit                      = false;
 110 static volatile pid_t           child_pid                       = -1;
 111 static bool                     null_run                        =  false;
 112 static int                      detailed_run                    =  0;
 113 static bool                     transaction_run;
 114 static bool                     big_num                         =  true;
 115 static int                      big_num_opt                     =  -1;
 116 static const char               *csv_sep                        = NULL;
 117 static bool                     csv_output                      = false;
 118 static bool                     group                           = false;
 119 static const char               *pre_cmd                        = NULL;
 120 static const char               *post_cmd                       = NULL;
 121 static bool                     sync_run                        = false;
 122 static unsigned int             initial_delay                   = 0;
 123 static unsigned int             unit_width                      = 4; /* strlen("unit") */
 124 static bool                     forever                         = false;
 125 static bool                     metric_only                     = false;
 126 static struct timespec          ref_time;
 127 static struct cpu_map           *aggr_map;
 128 static aggr_get_id_t            aggr_get_id;
 129 static bool                     append_file;
 130 static const char               *output_name;
 131 static int                      output_fd;
 132
 133 struct perf_stat {
 134         bool                     record;
 135         struct perf_data_file    file;
 136         struct perf_session     *session;
 137         u64                      bytes_written;
 138         struct perf_tool         tool;
 139         bool                     maps_allocated;
 140         struct cpu_map          *cpus;
 141         struct thread_map       *threads;
 142         enum aggr_mode           aggr_mode;
 143 };
 144
 145 static struct perf_stat         perf_stat;
 146 #define STAT_RECORD             perf_stat.record
 147
 148 static volatile int done = 0;
 149
 150 static struct perf_stat_config stat_config = {
 151         .aggr_mode      = AGGR_GLOBAL,
 152         .scale          = true,
 153 };
 154
 155 static inline void diff_timespec(struct timespec *r, struct timespec *a,
 156                                  struct timespec *b)
 157 {
 158         r->tv_sec = a->tv_sec - b->tv_sec;
 159         if (a->tv_nsec < b->tv_nsec) {
 160                 r->tv_nsec = a->tv_nsec + 1000000000L - b->tv_nsec;
 161                 r->tv_sec--;
 162         } else {
 163                 r->tv_nsec = a->tv_nsec - b->tv_nsec ;
 164         }
 165 }
 166
 167 static void perf_stat__reset_stats(void)
 168 {
 169         perf_evlist__reset_stats(evsel_list);
 170         perf_stat__reset_shadow_stats();
 171 }
 172
 173 static int create_perf_stat_counter(struct perf_evsel *evsel)
 174 {
 175         struct perf_event_attr *attr = &evsel->attr;
 176
 177         if (stat_config.scale)
 178                 attr->read_format = PERF_FORMAT_TOTAL_TIME_ENABLED |
 179                                     PERF_FORMAT_TOTAL_TIME_RUNNING;
 180
 181         attr->inherit = !no_inherit;
 182
 183         /*
 184          * Some events get initialized with sample_(period/type) set,
 185          * like tracepoints. Clear it up for counting.
 186          */
 187         attr->sample_period = 0;
 188
 189         /*
 190          * But set sample_type to PERF_SAMPLE_IDENTIFIER, which should be harmless
 191          * while avoiding that older tools show confusing messages.
 192          *
 193          * However for pipe sessions we need to keep it zero,
 194          * because script's perf_evsel__check_attr is triggered
 195          * by attr->sample_type != 0, and we can't run it on
 196          * stat sessions.
 197          */
 198         if (!(STAT_RECORD && perf_stat.file.is_pipe))
 199                 attr->sample_type = PERF_SAMPLE_IDENTIFIER;
 200
 201         /*
 202          * Disabling all counters initially, they will be enabled
 203          * either manually by us or by kernel via enable_on_exec
 204          * set later.
 205          */
 206         if (perf_evsel__is_group_leader(evsel)) {
 207                 attr->disabled = 1;
 208
 209                 /*
 210                  * In case of initial_delay we enable tracee
 211                  * events manually.
 212                  */
 213                 if (target__none(&target) && !initial_delay)
 214                         attr->enable_on_exec = 1;
 215         }
 216
 217         if (target__has_cpu(&target))
 218                 return perf_evsel__open_per_cpu(evsel, perf_evsel__cpus(evsel));
 219
 220         return perf_evsel__open_per_thread(evsel, evsel_list->threads);
 221 }
 222
 223 /*
 224  * Does the counter have nsecs as a unit?
 225  */
 226 static inline int nsec_counter(struct perf_evsel *evsel)
 227 {
 228         if (perf_evsel__match(evsel, SOFTWARE, SW_CPU_CLOCK) ||
 229             perf_evsel__match(evsel, SOFTWARE, SW_TASK_CLOCK))
 230                 return 1;
 231
 232         return 0;
 233 }
 234
 235 static int process_synthesized_event(struct perf_tool *tool __maybe_unused,
 236                                      union perf_event *event,
 237                                      struct perf_sample *sample __maybe_unused,
 238                                      struct machine *machine __maybe_unused)
 239 {
 240         if (perf_data_file__write(&perf_stat.file, event, event->header.size) < 0) {
 241                 pr_err("failed to write perf data, error: %m\n");
 242                 return -1;
 243         }
 244
 245         perf_stat.bytes_written += event->header.size;
 246         return 0;
 247 }
 248
 249 static int write_stat_round_event(u64 tm, u64 type)
 250 {
 251         return perf_event__synthesize_stat_round(NULL, tm, type,
 252                                                  process_synthesized_event,
 253                                                  NULL);
 254 }
 255
 256 #define WRITE_STAT_ROUND_EVENT(time, interval) \
 257         write_stat_round_event(time, PERF_STAT_ROUND_TYPE__ ## interval)
 258
 259 #define SID(e, x, y) xyarray__entry(e->sample_id, x, y)
 260
 261 static int
 262 perf_evsel__write_stat_event(struct perf_evsel *counter, u32 cpu, u32 thread,
 263                              struct perf_counts_values *count)
 264 {
 265         struct perf_sample_id *sid = SID(counter, cpu, thread);
 266
 267         return perf_event__synthesize_stat(NULL, cpu, thread, sid->id, count,
 268                                            process_synthesized_event, NULL);
 269 }
 270
 271 /*
 272  * Read out the results of a single counter:
 273  * do not aggregate counts across CPUs in system-wide mode
 274  */
 275 static int read_counter(struct perf_evsel *counter)
 276 {
 277         int nthreads = thread_map__nr(evsel_list->threads);
 278         int ncpus = perf_evsel__nr_cpus(counter);
 279         int cpu, thread;
 280
 281         if (!counter->supported)
 282                 return -ENOENT;
 283
 284         if (counter->system_wide)
 285                 nthreads = 1;
 286
 287         for (thread = 0; thread < nthreads; thread++) {
 288                 for (cpu = 0; cpu < ncpus; cpu++) {
 289                         struct perf_counts_values *count;
 290
 291                         count = perf_counts(counter->counts, cpu, thread);
 292                         if (perf_evsel__read(counter, cpu, thread, count))
 293                                 return -1;
 294
 295                         if (STAT_RECORD) {
 296                                 if (perf_evsel__write_stat_event(counter, cpu, thread, count)) {
 297                                         pr_err("failed to write stat event\n");
 298                                         return -1;
 299                                 }
 300                         }
 301                 }
 302         }
 303
 304         return 0;
 305 }
 306
 307 static void read_counters(bool close_counters)
 308 {
 309         struct perf_evsel *counter;
 310
 311         evlist__for_each(evsel_list, counter) {
 312                 if (read_counter(counter))
 313                         pr_debug("failed to read counter %s\n", counter->name);
 314
 315                 if (perf_stat_process_counter(&stat_config, counter))
 316                         pr_warning("failed to process counter %s\n", counter->name);
 317
 318                 if (close_counters) {
 319                         perf_evsel__close_fd(counter, perf_evsel__nr_cpus(counter),
 320                                              thread_map__nr(evsel_list->threads));
 321                 }
 322         }
 323 }
 324
 325 static void process_interval(void)
 326 {
 327         struct timespec ts, rs;
 328
 329         read_counters(false);
 330
 331         clock_gettime(CLOCK_MONOTONIC, &ts);
 332         diff_timespec(&rs, &ts, &ref_time);
 333
 334         if (STAT_RECORD) {
 335                 if (WRITE_STAT_ROUND_EVENT(rs.tv_sec * NSECS_PER_SEC + rs.tv_nsec, INTERVAL))
 336                         pr_err("failed to write stat round event\n");
 337         }
 338
 339         print_counters(&rs, 0, NULL);
 340 }
 341
 342 static void enable_counters(void)
 343 {
 344         if (initial_delay)
 345                 usleep(initial_delay * 1000);
 346
 347         /*
 348          * We need to enable counters only if:
 349          * - we don't have tracee (attaching to task or cpu)
 350          * - we have initial delay configured
 351          */
 352         if (!target__none(&target) || initial_delay)
 353                 perf_evlist__enable(evsel_list);
 354 }
 355
 356 static volatile int workload_exec_errno;
 357
 358 /*
 359  * perf_evlist__prepare_workload will send a SIGUSR1
 360  * if the fork fails, since we asked by setting its
 361  * want_signal to true.
 362  */
 363 static void workload_exec_failed_signal(int signo __maybe_unused, siginfo_t *info,
 364                                         void *ucontext __maybe_unused)
 365 {
 366         workload_exec_errno = info->si_value.sival_int;
 367 }
 368
 369 static bool has_unit(struct perf_evsel *counter)
 370 {
 371         return counter->unit && *counter->unit;
 372 }
 373
 374 static bool has_scale(struct perf_evsel *counter)
 375 {
 376         return counter->scale != 1;
 377 }
 378
 379 static int perf_stat_synthesize_config(bool is_pipe)
 380 {
 381         struct perf_evsel *counter;
 382         int err;
 383
 384         if (is_pipe) {
 385                 err = perf_event__synthesize_attrs(NULL, perf_stat.session,
 386                                                    process_synthesized_event);
 387                 if (err < 0) {
 388                         pr_err("Couldn't synthesize attrs.\n");
 389                         return err;
 390                 }
 391         }
 392
 393         /*
 394          * Synthesize other events stuff not carried within
 395          * attr event - unit, scale, name
 396          */
 397         evlist__for_each(evsel_list, counter) {
 398                 if (!counter->supported)
 399                         continue;
 400
 401                 /*
 402                  * Synthesize unit and scale only if it's defined.
 403                  */
 404                 if (has_unit(counter)) {
 405                         err = perf_event__synthesize_event_update_unit(NULL, counter, process_synthesized_event);
 406                         if (err < 0) {
 407                                 pr_err("Couldn't synthesize evsel unit.\n");
 408                                 return err;
 409                         }
 410                 }
 411
 412                 if (has_scale(counter)) {
 413                         err = perf_event__synthesize_event_update_scale(NULL, counter, process_synthesized_event);
 414                         if (err < 0) {
 415                                 pr_err("Couldn't synthesize evsel scale.\n");
 416                                 return err;
 417                         }
 418                 }
 419
 420                 if (counter->own_cpus) {
 421                         err = perf_event__synthesize_event_update_cpus(NULL, counter, process_synthesized_event);
 422                         if (err < 0) {
 423                                 pr_err("Couldn't synthesize evsel scale.\n");
 424                                 return err;
 425                         }
 426                 }
 427
 428                 /*
 429                  * Name is needed only for pipe output,
 430                  * perf.data carries event names.
 431                  */
 432                 if (is_pipe) {
 433                         err = perf_event__synthesize_event_update_name(NULL, counter, process_synthesized_event);
 434                         if (err < 0) {
 435                                 pr_err("Couldn't synthesize evsel name.\n");
 436                                 return err;
 437                         }
 438                 }
 439         }
 440
 441         err = perf_event__synthesize_thread_map2(NULL, evsel_list->threads,
 442                                                 process_synthesized_event,
 443                                                 NULL);
 444         if (err < 0) {
 445                 pr_err("Couldn't synthesize thread map.\n");
 446                 return err;
 447         }
 448
 449         err = perf_event__synthesize_cpu_map(NULL, evsel_list->cpus,
 450                                              process_synthesized_event, NULL);
 451         if (err < 0) {
 452                 pr_err("Couldn't synthesize thread map.\n");
 453                 return err;
 454         }
 455
 456         err = perf_event__synthesize_stat_config(NULL, &stat_config,
 457                                                  process_synthesized_event, NULL);
 458         if (err < 0) {
 459                 pr_err("Couldn't synthesize config.\n");
 460                 return err;
 461         }
 462
 463         return 0;
 464 }
 465
 466 #define FD(e, x, y) (*(int *)xyarray__entry(e->fd, x, y))
 467
 468 static int __store_counter_ids(struct perf_evsel *counter,
 469                                struct cpu_map *cpus,
 470                                struct thread_map *threads)
 471 {
 472         int cpu, thread;
 473
 474         for (cpu = 0; cpu < cpus->nr; cpu++) {
 475                 for (thread = 0; thread < threads->nr; thread++) {
 476                         int fd = FD(counter, cpu, thread);
 477
 478                         if (perf_evlist__id_add_fd(evsel_list, counter,
 479                                                    cpu, thread, fd) < 0)
 480                                 return -1;
 481                 }
 482         }
 483
 484         return 0;
 485 }
 486
 487 static int store_counter_ids(struct perf_evsel *counter)
 488 {
 489         struct cpu_map *cpus = counter->cpus;
 490         struct thread_map *threads = counter->threads;
 491
 492         if (perf_evsel__alloc_id(counter, cpus->nr, threads->nr))
 493                 return -ENOMEM;
 494
 495         return __store_counter_ids(counter, cpus, threads);
 496 }
 497
 498 static int __run_perf_stat(int argc, const char **argv)
 499 {
 500         int interval = stat_config.interval;
 501         char msg[512];
 502         unsigned long long t0, t1;
 503         struct perf_evsel *counter;
 504         struct timespec ts;
 505         size_t l;
 506         int status = 0;
 507         const bool forks = (argc > 0);
 508         bool is_pipe = STAT_RECORD ? perf_stat.file.is_pipe : false;
 509
 510         if (interval) {
 511                 ts.tv_sec  = interval / 1000;
 512                 ts.tv_nsec = (interval % 1000) * 1000000;
 513         } else {
 514                 ts.tv_sec  = 1;
 515                 ts.tv_nsec = 0;
 516         }
 517
 518         if (forks) {
 519                 if (perf_evlist__prepare_workload(evsel_list, &target, argv, is_pipe,
 520                                                   workload_exec_failed_signal) < 0) {
 521                         perror("failed to prepare workload");
 522                         return -1;
 523                 }
 524                 child_pid = evsel_list->workload.pid;
 525         }
 526
 527         if (group)
 528                 perf_evlist__set_leader(evsel_list);
 529
 530         evlist__for_each(evsel_list, counter) {
 531 try_again:
 532                 if (create_perf_stat_counter(counter) < 0) {
 533                         /*
 534                          * PPC returns ENXIO for HW counters until 2.6.37
 535                          * (behavior changed with commit b0a873e).
 536                          */
 537                         if (errno == EINVAL || errno == ENOSYS ||
 538                             errno == ENOENT || errno == EOPNOTSUPP ||
 539                             errno == ENXIO) {
 540                                 if (verbose)
 541                                         ui__warning("%s event is not supported by the kernel.\n",
 542                                                     perf_evsel__name(counter));
 543                                 counter->supported = false;
 544
 545                                 if ((counter->leader != counter) ||
 546                                     !(counter->leader->nr_members > 1))
 547                                         continue;
 548                         } else if (perf_evsel__fallback(counter, errno, msg, sizeof(msg))) {
 549                                 if (verbose)
 550                                         ui__warning("%s\n", msg);
 551                                 goto try_again;
 552                         }
 553
 554                         perf_evsel__open_strerror(counter, &target,
 555                                                   errno, msg, sizeof(msg));
 556                         ui__error("%s\n", msg);
 557
 558                         if (child_pid != -1)
 559                                 kill(child_pid, SIGTERM);
 560
 561                         return -1;
 562                 }
 563                 counter->supported = true;
 564
 565                 l = strlen(counter->unit);
 566                 if (l > unit_width)
 567                         unit_width = l;
 568
 569                 if (STAT_RECORD && store_counter_ids(counter))
 570                         return -1;
 571         }
 572
 573         if (perf_evlist__apply_filters(evsel_list, &counter)) {
 574                 error("failed to set filter \"%s\" on event %s with %d (%s)\n",
 575                         counter->filter, perf_evsel__name(counter), errno,
 576                         strerror_r(errno, msg, sizeof(msg)));
 577                 return -1;
 578         }
 579
 580         if (STAT_RECORD) {
 581                 int err, fd = perf_data_file__fd(&perf_stat.file);
 582
 583                 if (is_pipe) {
 584                         err = perf_header__write_pipe(perf_data_file__fd(&perf_stat.file));
 585                 } else {
 586                         err = perf_session__write_header(perf_stat.session, evsel_list,
 587                                                          fd, false);
 588                 }
 589
 590                 if (err < 0)
 591                         return err;
 592
 593                 err = perf_stat_synthesize_config(is_pipe);
 594                 if (err < 0)
 595                         return err;
 596         }
 597
 598         /*
 599          * Enable counters and exec the command:
 600          */
 601         t0 = rdclock();
 602         clock_gettime(CLOCK_MONOTONIC, &ref_time);
 603
 604         if (forks) {
 605                 perf_evlist__start_workload(evsel_list);
 606                 enable_counters();
 607
 608                 if (interval) {
 609                         while (!waitpid(child_pid, &status, WNOHANG)) {
 610                                 nanosleep(&ts, NULL);
 611                                 process_interval();
 612                         }
 613                 }
 614                 wait(&status);
 615
 616                 if (workload_exec_errno) {
 617                         const char *emsg = strerror_r(workload_exec_errno, msg, sizeof(msg));
 618                         pr_err("Workload failed: %s\n", emsg);
 619                         return -1;
 620                 }
 621
 622                 if (WIFSIGNALED(status))
 623                         psignal(WTERMSIG(status), argv[0]);
 624         } else {
 625                 enable_counters();
 626                 while (!done) {
 627                         nanosleep(&ts, NULL);
 628                         if (interval)
 629                                 process_interval();
 630                 }
 631         }
 632
 633         t1 = rdclock();
 634
 635         update_stats(&walltime_nsecs_stats, t1 - t0);
 636
 637         read_counters(true);
 638
 639         return WEXITSTATUS(status);
 640 }
 641
 642 static int run_perf_stat(int argc, const char **argv)
 643 {
 644         int ret;
 645
 646         if (pre_cmd) {
 647                 ret = system(pre_cmd);
 648                 if (ret)
 649                         return ret;
 650         }
 651
 652         if (sync_run)
 653                 sync();
 654
 655         ret = __run_perf_stat(argc, argv);
 656         if (ret)
 657                 return ret;
 658
 659         if (post_cmd) {
 660                 ret = system(post_cmd);
 661                 if (ret)
 662                         return ret;
 663         }
 664
 665         return ret;
 666 }
 667
 668 static void print_running(u64 run, u64 ena)
 669 {
 670         if (csv_output) {
 671                 fprintf(stat_config.output, "%s%" PRIu64 "%s%.2f",
 672                                         csv_sep,
 673                                         run,
 674                                         csv_sep,
 675                                         ena ? 100.0 * run / ena : 100.0);
 676         } else if (run != ena) {
 677                 fprintf(stat_config.output, "  (%.2f%%)", 100.0 * run / ena);
 678         }
 679 }
 680
 681 static void print_noise_pct(double total, double avg)
 682 {
 683         double pct = rel_stddev_stats(total, avg);
 684
 685         if (csv_output)
 686                 fprintf(stat_config.output, "%s%.2f%%", csv_sep, pct);
 687         else if (pct)
 688                 fprintf(stat_config.output, "  ( +-%6.2f%% )", pct);
 689 }
 690
 691 static void print_noise(struct perf_evsel *evsel, double avg)
 692 {
 693         struct perf_stat_evsel *ps;
 694
 695         if (run_count == 1)
 696                 return;
 697
 698         ps = evsel->priv;
 699         print_noise_pct(stddev_stats(&ps->res_stats[0]), avg);
 700 }
 701
 702 static void aggr_printout(struct perf_evsel *evsel, int id, int nr)
 703 {
 704         switch (stat_config.aggr_mode) {
 705         case AGGR_CORE:
 706                 fprintf(stat_config.output, "S%d-C%*d%s%*d%s",
 707                         cpu_map__id_to_socket(id),
 708                         csv_output ? 0 : -8,
 709                         cpu_map__id_to_cpu(id),
 710                         csv_sep,
 711                         csv_output ? 0 : 4,
 712                         nr,
 713                         csv_sep);
 714                 break;
 715         case AGGR_SOCKET:
 716                 fprintf(stat_config.output, "S%*d%s%*d%s",
 717                         csv_output ? 0 : -5,
 718                         id,
 719                         csv_sep,
 720                         csv_output ? 0 : 4,
 721                         nr,
 722                         csv_sep);
 723                         break;
 724         case AGGR_NONE:
 725                 fprintf(stat_config.output, "CPU%*d%s",
 726                         csv_output ? 0 : -4,
 727                         perf_evsel__cpus(evsel)->map[id], csv_sep);
 728                 break;
 729         case AGGR_THREAD:
 730                 fprintf(stat_config.output, "%*s-%*d%s",
 731                         csv_output ? 0 : 16,
 732                         thread_map__comm(evsel->threads, id),
 733                         csv_output ? 0 : -8,
 734                         thread_map__pid(evsel->threads, id),
 735                         csv_sep);
 736                 break;
 737         case AGGR_GLOBAL:
 738         case AGGR_UNSET:
 739         default:
 740                 break;
 741         }
 742 }
 743
 744 struct outstate {
 745         FILE *fh;
 746         bool newline;
 747         const char *prefix;
 748         int  nfields;
 749         int  id, nr;
 750         struct perf_evsel *evsel;
 751 };
 752
 753 #define METRIC_LEN  35
 754
 755 static void new_line_std(void *ctx)
 756 {
 757         struct outstate *os = ctx;
 758
 759         os->newline = true;
 760 }
 761
 762 static void do_new_line_std(struct outstate *os)
 763 {
 764         fputc('\n', os->fh);
 765         fputs(os->prefix, os->fh);
 766         aggr_printout(os->evsel, os->id, os->nr);
 767         if (stat_config.aggr_mode == AGGR_NONE)
 768                 fprintf(os->fh, "        ");
 769         fprintf(os->fh, "                                                 ");
 770 }
 771
 772 static void print_metric_std(void *ctx, const char *color, const char *fmt,
 773                              const char *unit, double val)
 774 {
 775         struct outstate *os = ctx;
 776         FILE *out = os->fh;
 777         int n;
 778         bool newline = os->newline;
 779
 780         os->newline = false;
 781
 782         if (unit == NULL || fmt == NULL) {
 783                 fprintf(out, "%-*s", METRIC_LEN, "");
 784                 return;
 785         }
 786
 787         if (newline)
 788                 do_new_line_std(os);
 789
 790         n = fprintf(out, " # ");
 791         if (color)
 792                 n += color_fprintf(out, color, fmt, val);
 793         else
 794                 n += fprintf(out, fmt, val);
 795         fprintf(out, " %-*s", METRIC_LEN - n - 1, unit);
 796 }
 797
 798 static void new_line_csv(void *ctx)
 799 {
 800         struct outstate *os = ctx;
 801         int i;
 802
 803         fputc('\n', os->fh);
 804         if (os->prefix)
 805                 fprintf(os->fh, "%s%s", os->prefix, csv_sep);
 806         aggr_printout(os->evsel, os->id, os->nr);
 807         for (i = 0; i < os->nfields; i++)
 808                 fputs(csv_sep, os->fh);
 809 }
 810
 811 static void print_metric_csv(void *ctx,
 812                              const char *color __maybe_unused,
 813                              const char *fmt, const char *unit, double val)
 814 {
 815         struct outstate *os = ctx;
 816         FILE *out = os->fh;
 817         char buf[64], *vals, *ends;
 818
 819         if (unit == NULL || fmt == NULL) {
 820                 fprintf(out, "%s%s%s%s", csv_sep, csv_sep, csv_sep, csv_sep);
 821                 return;
 822         }
 823         snprintf(buf, sizeof(buf), fmt, val);
 824         vals = buf;
 825         while (isspace(*vals))
 826                 vals++;
 827         ends = vals;
 828         while (isdigit(*ends) || *ends == '.')
 829                 ends++;
 830         *ends = 0;
 831         while (isspace(*unit))
 832                 unit++;
 833         fprintf(out, "%s%s%s%s", csv_sep, vals, csv_sep, unit);
 834 }
 835
 836 #define METRIC_ONLY_LEN 20
 837
 838 /* Filter out some columns that don't work well in metrics only mode */
 839
 840 static bool valid_only_metric(const char *unit)
 841 {
 842         if (!unit)
 843                 return false;
 844         if (strstr(unit, "/sec") ||
 845             strstr(unit, "hz") ||
 846             strstr(unit, "Hz") ||
 847             strstr(unit, "CPUs utilized"))
 848                 return false;
 849         return true;
 850 }
 851
 852 static const char *fixunit(char *buf, struct perf_evsel *evsel,
 853                            const char *unit)
 854 {
 855         if (!strncmp(unit, "of all", 6)) {
 856                 snprintf(buf, 1024, "%s %s", perf_evsel__name(evsel),
 857                          unit);
 858                 return buf;
 859         }
 860         return unit;
 861 }
 862
 863 static void print_metric_only(void *ctx, const char *color, const char *fmt,
 864                               const char *unit, double val)
 865 {
 866         struct outstate *os = ctx;
 867         FILE *out = os->fh;
 868         int n;
 869         char buf[1024];
 870         unsigned mlen = METRIC_ONLY_LEN;
 871
 872         if (!valid_only_metric(unit))
 873                 return;
 874         unit = fixunit(buf, os->evsel, unit);
 875         if (color)
 876                 n = color_fprintf(out, color, fmt, val);
 877         else
 878                 n = fprintf(out, fmt, val);
 879         if (n > METRIC_ONLY_LEN)
 880                 n = METRIC_ONLY_LEN;
 881         if (mlen < strlen(unit))
 882                 mlen = strlen(unit) + 1;
 883         fprintf(out, "%*s", mlen - n, "");
 884 }
 885
 886 static void print_metric_only_csv(void *ctx, const char *color __maybe_unused,
 887                                   const char *fmt,
 888                                   const char *unit, double val)
 889 {
 890         struct outstate *os = ctx;
 891         FILE *out = os->fh;
 892         char buf[64], *vals, *ends;
 893         char tbuf[1024];
 894
 895         if (!valid_only_metric(unit))
 896                 return;
 897         unit = fixunit(tbuf, os->evsel, unit);
 898         snprintf(buf, sizeof buf, fmt, val);
 899         vals = buf;
 900         while (isspace(*vals))
 901                 vals++;
 902         ends = vals;
 903         while (isdigit(*ends) || *ends == '.')
 904                 ends++;
 905         *ends = 0;
 906         fprintf(out, "%s%s", vals, csv_sep);
 907 }
 908
 909 static void new_line_metric(void *ctx __maybe_unused)
 910 {
 911 }
 912
 913 static void print_metric_header(void *ctx, const char *color __maybe_unused,
 914                                 const char *fmt __maybe_unused,
 915                                 const char *unit, double val __maybe_unused)
 916 {
 917         struct outstate *os = ctx;
 918         char tbuf[1024];
 919
 920         if (!valid_only_metric(unit))
 921                 return;
 922         unit = fixunit(tbuf, os->evsel, unit);
 923         if (csv_output)
 924                 fprintf(os->fh, "%s%s", unit, csv_sep);
 925         else
 926                 fprintf(os->fh, "%-*s ", METRIC_ONLY_LEN, unit);
 927 }
 928
 929 static void nsec_printout(int id, int nr, struct perf_evsel *evsel, double avg)
 930 {
 931         FILE *output = stat_config.output;
 932         double msecs = avg / 1e6;
 933         const char *fmt_v, *fmt_n;
 934         char name[25];
 935
 936         fmt_v = csv_output ? "%.6f%s" : "%18.6f%s";
 937         fmt_n = csv_output ? "%s" : "%-25s";
 938
 939         aggr_printout(evsel, id, nr);
 940
 941         scnprintf(name, sizeof(name), "%s%s",
 942                   perf_evsel__name(evsel), csv_output ? "" : " (msec)");
 943
 944         fprintf(output, fmt_v, msecs, csv_sep);
 945
 946         if (csv_output)
 947                 fprintf(output, "%s%s", evsel->unit, csv_sep);
 948         else
 949                 fprintf(output, "%-*s%s", unit_width, evsel->unit, csv_sep);
 950
 951         fprintf(output, fmt_n, name);
 952
 953         if (evsel->cgrp)
 954                 fprintf(output, "%s%s", csv_sep, evsel->cgrp->name);
 955 }
 956
 957 static int first_shadow_cpu(struct perf_evsel *evsel, int id)
 958 {
 959         int i;
 960
 961         if (!aggr_get_id)
 962                 return 0;
 963
 964         if (stat_config.aggr_mode == AGGR_NONE)
 965                 return id;
 966
 967         if (stat_config.aggr_mode == AGGR_GLOBAL)
 968                 return 0;
 969
 970         for (i = 0; i < perf_evsel__nr_cpus(evsel); i++) {
 971                 int cpu2 = perf_evsel__cpus(evsel)->map[i];
 972
 973                 if (aggr_get_id(evsel_list->cpus, cpu2) == id)
 974                         return cpu2;
 975         }
 976         return 0;
 977 }
 978
 979 static void abs_printout(int id, int nr, struct perf_evsel *evsel, double avg)
 980 {
 981         FILE *output = stat_config.output;
 982         double sc =  evsel->scale;
 983         const char *fmt;
 984
 985         if (csv_output) {
 986                 fmt = sc != 1.0 ?  "%.2f%s" : "%.0f%s";
 987         } else {
 988                 if (big_num)
 989                         fmt = sc != 1.0 ? "%'18.2f%s" : "%'18.0f%s";
 990                 else
 991                         fmt = sc != 1.0 ? "%18.2f%s" : "%18.0f%s";
 992         }
 993
 994         aggr_printout(evsel, id, nr);
 995
 996         fprintf(output, fmt, avg, csv_sep);
 997
 998         if (evsel->unit)
 999                 fprintf(output, "%-*s%s",
1000                         csv_output ? 0 : unit_width,
1001                         evsel->unit, csv_sep);
1002
1003         fprintf(output, "%-*s", csv_output ? 0 : 25, perf_evsel__name(evsel));
1004
1005         if (evsel->cgrp)
1006                 fprintf(output, "%s%s", csv_sep, evsel->cgrp->name);
1007 }
1008
1009 static void printout(int id, int nr, struct perf_evsel *counter, double uval,
1010                      char *prefix, u64 run, u64 ena, double noise)
1011 {
1012         struct perf_stat_output_ctx out;
1013         struct outstate os = {
1014                 .fh = stat_config.output,
1015                 .prefix = prefix ? prefix : "",
1016                 .id = id,
1017                 .nr = nr,
1018                 .evsel = counter,
1019         };
1020         print_metric_t pm = print_metric_std;
1021         void (*nl)(void *);
1022
1023         if (metric_only) {
1024                 nl = new_line_metric;
1025                 if (csv_output)
1026                         pm = print_metric_only_csv;
1027                 else
1028                         pm = print_metric_only;
1029         } else
1030                 nl = new_line_std;
1031
1032         if (csv_output && !metric_only) {
1033                 static int aggr_fields[] = {
1034                         [AGGR_GLOBAL] = 0,
1035                         [AGGR_THREAD] = 1,
1036                         [AGGR_NONE] = 1,
1037                         [AGGR_SOCKET] = 2,
1038                         [AGGR_CORE] = 2,
1039                 };
1040
1041                 pm = print_metric_csv;
1042                 nl = new_line_csv;
1043                 os.nfields = 3;
1044                 os.nfields += aggr_fields[stat_config.aggr_mode];
1045                 if (counter->cgrp)
1046                         os.nfields++;
1047         }
1048         if (run == 0 || ena == 0 || counter->counts->scaled == -1) {
1049                 if (metric_only) {
1050                         pm(&os, NULL, "", "", 0);
1051                         return;
1052                 }
1053                 aggr_printout(counter, id, nr);
1054
1055                 fprintf(stat_config.output, "%*s%s",
1056                         csv_output ? 0 : 18,
1057                         counter->supported ? CNTR_NOT_COUNTED : CNTR_NOT_SUPPORTED,
1058                         csv_sep);
1059
1060                 fprintf(stat_config.output, "%-*s%s",
1061                         csv_output ? 0 : unit_width,
1062                         counter->unit, csv_sep);
1063
1064                 fprintf(stat_config.output, "%*s",
1065                         csv_output ? 0 : -25,
1066                         perf_evsel__name(counter));
1067
1068                 if (counter->cgrp)
1069                         fprintf(stat_config.output, "%s%s",
1070                                 csv_sep, counter->cgrp->name);
1071
1072                 if (!csv_output)
1073                         pm(&os, NULL, NULL, "", 0);
1074                 print_noise(counter, noise);
1075                 print_running(run, ena);
1076                 if (csv_output)
1077                         pm(&os, NULL, NULL, "", 0);
1078                 return;
1079         }
1080
1081         if (metric_only)
1082                 /* nothing */;
1083         else if (nsec_counter(counter))
1084                 nsec_printout(id, nr, counter, uval);
1085         else
1086                 abs_printout(id, nr, counter, uval);
1087
1088         out.print_metric = pm;
1089         out.new_line = nl;
1090         out.ctx = &os;
1091
1092         if (csv_output && !metric_only) {
1093                 print_noise(counter, noise);
1094                 print_running(run, ena);
1095         }
1096
1097         perf_stat__print_shadow_stats(counter, uval,
1098                                 first_shadow_cpu(counter, id),
1099                                 &out);
1100         if (!csv_output && !metric_only) {
1101                 print_noise(counter, noise);
1102                 print_running(run, ena);
1103         }
1104 }
1105
1106 static void aggr_update_shadow(void)
1107 {
1108         int cpu, s2, id, s;
1109         u64 val;
1110         struct perf_evsel *counter;
1111
1112         for (s = 0; s < aggr_map->nr; s++) {
1113                 id = aggr_map->map[s];
1114                 evlist__for_each(evsel_list, counter) {
1115                         val = 0;
1116                         for (cpu = 0; cpu < perf_evsel__nr_cpus(counter); cpu++) {
1117                                 s2 = aggr_get_id(evsel_list->cpus, cpu);
1118                                 if (s2 != id)
1119                                         continue;
1120                                 val += perf_counts(counter->counts, cpu, 0)->val;
1121                         }
1122                         val = val * counter->scale;
1123                         perf_stat__update_shadow_stats(counter, &val,
1124                                                        first_shadow_cpu(counter, id));
1125                 }
1126         }
1127 }
1128
1129 static void print_aggr(char *prefix)
1130 {
1131         FILE *output = stat_config.output;
1132         struct perf_evsel *counter;
1133         int cpu, s, s2, id, nr;
1134         double uval;
1135         u64 ena, run, val;
1136         bool first;
1137
1138         if (!(aggr_map || aggr_get_id))
1139                 return;
1140
1141         aggr_update_shadow();
1142
1143         /*
1144          * With metric_only everything is on a single line.
1145          * Without each counter has its own line.
1146          */
1147         for (s = 0; s < aggr_map->nr; s++) {
1148                 if (prefix && metric_only)
1149                         fprintf(output, "%s", prefix);
1150
1151                 id = aggr_map->map[s];
1152                 first = true;
1153                 evlist__for_each(evsel_list, counter) {
1154                         val = ena = run = 0;
1155                         nr = 0;
1156                         for (cpu = 0; cpu < perf_evsel__nr_cpus(counter); cpu++) {
1157                                 s2 = aggr_get_id(perf_evsel__cpus(counter), cpu);
1158                                 if (s2 != id)
1159                                         continue;
1160                                 val += perf_counts(counter->counts, cpu, 0)->val;
1161                                 ena += perf_counts(counter->counts, cpu, 0)->ena;
1162                                 run += perf_counts(counter->counts, cpu, 0)->run;
1163                                 nr++;
1164                         }
1165                         if (first && metric_only) {
1166                                 first = false;
1167                                 aggr_printout(counter, id, nr);
1168                         }
1169                         if (prefix && !metric_only)
1170                                 fprintf(output, "%s", prefix);
1171
1172                         uval = val * counter->scale;
1173                         printout(id, nr, counter, uval, prefix, run, ena, 1.0);
1174                         if (!metric_only)
1175                                 fputc('\n', output);
1176                 }
1177                 if (metric_only)
1178                         fputc('\n', output);
1179         }
1180 }
1181
1182 static void print_aggr_thread(struct perf_evsel *counter, char *prefix)
1183 {
1184         FILE *output = stat_config.output;
1185         int nthreads = thread_map__nr(counter->threads);
1186         int ncpus = cpu_map__nr(counter->cpus);
1187         int cpu, thread;
1188         double uval;
1189
1190         for (thread = 0; thread < nthreads; thread++) {
1191                 u64 ena = 0, run = 0, val = 0;
1192
1193                 for (cpu = 0; cpu < ncpus; cpu++) {
1194                         val += perf_counts(counter->counts, cpu, thread)->val;
1195                         ena += perf_counts(counter->counts, cpu, thread)->ena;
1196                         run += perf_counts(counter->counts, cpu, thread)->run;
1197                 }
1198
1199                 if (prefix)
1200                         fprintf(output, "%s", prefix);
1201
1202                 uval = val * counter->scale;
1203                 printout(thread, 0, counter, uval, prefix, run, ena, 1.0);
1204                 fputc('\n', output);
1205         }
1206 }
1207
1208 /*
1209  * Print out the results of a single counter:
1210  * aggregated counts in system-wide mode
1211  */
1212 static void print_counter_aggr(struct perf_evsel *counter, char *prefix)
1213 {
1214         FILE *output = stat_config.output;
1215         struct perf_stat_evsel *ps = counter->priv;
1216         double avg = avg_stats(&ps->res_stats[0]);
1217         double uval;
1218         double avg_enabled, avg_running;
1219
1220         avg_enabled = avg_stats(&ps->res_stats[1]);
1221         avg_running = avg_stats(&ps->res_stats[2]);
1222
1223         if (prefix && !metric_only)
1224                 fprintf(output, "%s", prefix);
1225
1226         uval = avg * counter->scale;
1227         printout(-1, 0, counter, uval, prefix, avg_running, avg_enabled, avg);
1228         if (!metric_only)
1229                 fprintf(output, "\n");
1230 }
1231
1232 /*
1233  * Print out the results of a single counter:
1234  * does not use aggregated count in system-wide
1235  */
1236 static void print_counter(struct perf_evsel *counter, char *prefix)
1237 {
1238         FILE *output = stat_config.output;
1239         u64 ena, run, val;
1240         double uval;
1241         int cpu;
1242
1243         for (cpu = 0; cpu < perf_evsel__nr_cpus(counter); cpu++) {
1244                 val = perf_counts(counter->counts, cpu, 0)->val;
1245                 ena = perf_counts(counter->counts, cpu, 0)->ena;
1246                 run = perf_counts(counter->counts, cpu, 0)->run;
1247
1248                 if (prefix)
1249                         fprintf(output, "%s", prefix);
1250
1251                 uval = val * counter->scale;
1252                 printout(cpu, 0, counter, uval, prefix, run, ena, 1.0);
1253
1254                 fputc('\n', output);
1255         }
1256 }
1257
1258 static void print_no_aggr_metric(char *prefix)
1259 {
1260         int cpu;
1261         int nrcpus = 0;
1262         struct perf_evsel *counter;
1263         u64 ena, run, val;
1264         double uval;
1265
1266         nrcpus = evsel_list->cpus->nr;
1267         for (cpu = 0; cpu < nrcpus; cpu++) {
1268                 bool first = true;
1269
1270                 if (prefix)
1271                         fputs(prefix, stat_config.output);
1272                 evlist__for_each(evsel_list, counter) {
1273                         if (first) {
1274                                 aggr_printout(counter, cpu, 0);
1275                                 first = false;
1276                         }
1277                         val = perf_counts(counter->counts, cpu, 0)->val;
1278                         ena = perf_counts(counter->counts, cpu, 0)->ena;
1279                         run = perf_counts(counter->counts, cpu, 0)->run;
1280
1281                         uval = val * counter->scale;
1282                         printout(cpu, 0, counter, uval, prefix, run, ena, 1.0);
1283                 }
1284                 fputc('\n', stat_config.output);
1285         }
1286 }
1287
1288 static int aggr_header_lens[] = {
1289         [AGGR_CORE] = 18,
1290         [AGGR_SOCKET] = 12,
1291         [AGGR_NONE] = 6,
1292         [AGGR_THREAD] = 24,
1293         [AGGR_GLOBAL] = 0,
1294 };
1295
1296 static void print_metric_headers(char *prefix)
1297 {
1298         struct perf_stat_output_ctx out;
1299         struct perf_evsel *counter;
1300         struct outstate os = {
1301                 .fh = stat_config.output
1302         };
1303
1304         if (prefix)
1305                 fprintf(stat_config.output, "%s", prefix);
1306
1307         if (!csv_output)
1308                 fprintf(stat_config.output, "%*s",
1309                         aggr_header_lens[stat_config.aggr_mode], "");
1310
1311         /* Print metrics headers only */
1312         evlist__for_each(evsel_list, counter) {
1313                 os.evsel = counter;
1314                 out.ctx = &os;
1315                 out.print_metric = print_metric_header;
1316                 out.new_line = new_line_metric;
1317                 os.evsel = counter;
1318                 perf_stat__print_shadow_stats(counter, 0,
1319                                               0,
1320                                               &out);
1321         }
1322         fputc('\n', stat_config.output);
1323 }
1324
1325 static void print_interval(char *prefix, struct timespec *ts)
1326 {
1327         FILE *output = stat_config.output;
1328         static int num_print_interval;
1329
1330         sprintf(prefix, "%6lu.%09lu%s", ts->tv_sec, ts->tv_nsec, csv_sep);
1331
1332         if (num_print_interval == 0 && !csv_output && !metric_only) {
1333                 switch (stat_config.aggr_mode) {
1334                 case AGGR_SOCKET:
1335                         fprintf(output, "#           time socket cpus             counts %*s events\n", unit_width, "unit");
1336                         break;
1337                 case AGGR_CORE:
1338                         fprintf(output, "#           time core         cpus             counts %*s events\n", unit_width, "unit");
1339                         break;
1340                 case AGGR_NONE:
1341                         fprintf(output, "#           time CPU                counts %*s events\n", unit_width, "unit");
1342                         break;
1343                 case AGGR_THREAD:
1344                         fprintf(output, "#           time             comm-pid                  counts %*s events\n", unit_width, "unit");
1345                         break;
1346                 case AGGR_GLOBAL:
1347                 default:
1348                         fprintf(output, "#           time             counts %*s events\n", unit_width, "unit");
1349                 case AGGR_UNSET:
1350                         break;
1351                 }
1352         }
1353
1354         if (++num_print_interval == 25)
1355                 num_print_interval = 0;
1356 }
1357
1358 static void print_header(int argc, const char **argv)
1359 {
1360         FILE *output = stat_config.output;
1361         int i;
1362
1363         fflush(stdout);
1364
1365         if (!csv_output) {
1366                 fprintf(output, "\n");
1367                 fprintf(output, " Performance counter stats for ");
1368                 if (target.system_wide)
1369                         fprintf(output, "\'system wide");
1370                 else if (target.cpu_list)
1371                         fprintf(output, "\'CPU(s) %s", target.cpu_list);
1372                 else if (!target__has_task(&target)) {
1373                         fprintf(output, "\'%s", argv ? argv[0] : "pipe");
1374                         for (i = 1; argv && (i < argc); i++)
1375                                 fprintf(output, " %s", argv[i]);
1376                 } else if (target.pid)
1377                         fprintf(output, "process id \'%s", target.pid);
1378                 else
1379                         fprintf(output, "thread id \'%s", target.tid);
1380
1381                 fprintf(output, "\'");
1382                 if (run_count > 1)
1383                         fprintf(output, " (%d runs)", run_count);
1384                 fprintf(output, ":\n\n");
1385         }
1386 }
1387
1388 static void print_footer(void)
1389 {
1390         FILE *output = stat_config.output;
1391
1392         if (!null_run)
1393                 fprintf(output, "\n");
1394         fprintf(output, " %17.9f seconds time elapsed",
1395                         avg_stats(&walltime_nsecs_stats)/1e9);
1396         if (run_count > 1) {
1397                 fprintf(output, "                                        ");
1398                 print_noise_pct(stddev_stats(&walltime_nsecs_stats),
1399                                 avg_stats(&walltime_nsecs_stats));
1400         }
1401         fprintf(output, "\n\n");
1402 }
1403
1404 static void print_counters(struct timespec *ts, int argc, const char **argv)
1405 {
1406         int interval = stat_config.interval;
1407         struct perf_evsel *counter;
1408         char buf[64], *prefix = NULL;
1409
1410         /* Do not print anything if we record to the pipe. */
1411         if (STAT_RECORD && perf_stat.file.is_pipe)
1412                 return;
1413
1414         if (interval)
1415                 print_interval(prefix = buf, ts);
1416         else
1417                 print_header(argc, argv);
1418
1419         if (metric_only) {
1420                 static int num_print_iv;
1421
1422                 if (num_print_iv == 0)
1423                         print_metric_headers(prefix);
1424                 if (num_print_iv++ == 25)
1425                         num_print_iv = 0;
1426                 if (stat_config.aggr_mode == AGGR_GLOBAL && prefix)
1427                         fprintf(stat_config.output, "%s", prefix);
1428         }
1429
1430         switch (stat_config.aggr_mode) {
1431         case AGGR_CORE:
1432         case AGGR_SOCKET:
1433                 print_aggr(prefix);
1434                 break;
1435         case AGGR_THREAD:
1436                 evlist__for_each(evsel_list, counter)
1437                         print_aggr_thread(counter, prefix);
1438                 break;
1439         case AGGR_GLOBAL:
1440                 evlist__for_each(evsel_list, counter)
1441                         print_counter_aggr(counter, prefix);
1442                 if (metric_only)
1443                         fputc('\n', stat_config.output);
1444                 break;
1445         case AGGR_NONE:
1446                 if (metric_only)
1447                         print_no_aggr_metric(prefix);
1448                 else {
1449                         evlist__for_each(evsel_list, counter)
1450                                 print_counter(counter, prefix);
1451                 }
1452                 break;
1453         case AGGR_UNSET:
1454         default:
1455                 break;
1456         }
1457
1458         if (!interval && !csv_output)
1459                 print_footer();
1460
1461         fflush(stat_config.output);
1462 }
1463
1464 static volatile int signr = -1;
1465
1466 static void skip_signal(int signo)
1467 {
1468         if ((child_pid == -1) || stat_config.interval)
1469                 done = 1;
1470
1471         signr = signo;
1472         /*
1473          * render child_pid harmless
1474          * won't send SIGTERM to a random
1475          * process in case of race condition
1476          * and fast PID recycling
1477          */
1478         child_pid = -1;
1479 }
1480
1481 static void sig_atexit(void)
1482 {
1483         sigset_t set, oset;
1484
1485         /*
1486          * avoid race condition with SIGCHLD handler
1487          * in skip_signal() which is modifying child_pid
1488          * goal is to avoid send SIGTERM to a random
1489          * process
1490          */
1491         sigemptyset(&set);
1492         sigaddset(&set, SIGCHLD);
1493         sigprocmask(SIG_BLOCK, &set, &oset);
1494
1495         if (child_pid != -1)
1496                 kill(child_pid, SIGTERM);
1497
1498         sigprocmask(SIG_SETMASK, &oset, NULL);
1499
1500         if (signr == -1)
1501                 return;
1502
1503         signal(signr, SIG_DFL);
1504         kill(getpid(), signr);
1505 }
1506
1507 static int stat__set_big_num(const struct option *opt __maybe_unused,
1508                              const char *s __maybe_unused, int unset)
1509 {
1510         big_num_opt = unset ? 0 : 1;
1511         return 0;
1512 }
1513
1514 static const struct option stat_options[] = {
1515         OPT_BOOLEAN('T', "transaction", &transaction_run,
1516                     "hardware transaction statistics"),
1517         OPT_CALLBACK('e', "event", &evsel_list, "event",
1518                      "event selector. use 'perf list' to list available events",
1519                      parse_events_option),
1520         OPT_CALLBACK(0, "filter", &evsel_list, "filter",
1521                      "event filter", parse_filter),
1522         OPT_BOOLEAN('i', "no-inherit", &no_inherit,
1523                     "child tasks do not inherit counters"),
1524         OPT_STRING('p', "pid", &target.pid, "pid",
1525                    "stat events on existing process id"),
1526         OPT_STRING('t', "tid", &target.tid, "tid",
1527                    "stat events on existing thread id"),
1528         OPT_BOOLEAN('a', "all-cpus", &target.system_wide,
1529                     "system-wide collection from all CPUs"),
1530         OPT_BOOLEAN('g', "group", &group,
1531                     "put the counters into a counter group"),
1532         OPT_BOOLEAN('c', "scale", &stat_config.scale, "scale/normalize counters"),
1533         OPT_INCR('v', "verbose", &verbose,
1534                     "be more verbose (show counter open errors, etc)"),
1535         OPT_INTEGER('r', "repeat", &run_count,
1536                     "repeat command and print average + stddev (max: 100, forever: 0)"),
1537         OPT_BOOLEAN('n', "null", &null_run,
1538                     "null run - dont start any counters"),
1539         OPT_INCR('d', "detailed", &detailed_run,
1540                     "detailed run - start a lot of events"),
1541         OPT_BOOLEAN('S', "sync", &sync_run,
1542                     "call sync() before starting a run"),
1543         OPT_CALLBACK_NOOPT('B', "big-num", NULL, NULL,
1544                            "print large numbers with thousands\' separators",
1545                            stat__set_big_num),
1546         OPT_STRING('C', "cpu", &target.cpu_list, "cpu",
1547                     "list of cpus to monitor in system-wide"),
1548         OPT_SET_UINT('A', "no-aggr", &stat_config.aggr_mode,
1549                     "disable CPU count aggregation", AGGR_NONE),
1550         OPT_STRING('x', "field-separator", &csv_sep, "separator",
1551                    "print counts with custom separator"),
1552         OPT_CALLBACK('G', "cgroup", &evsel_list, "name",
1553                      "monitor event in cgroup name only", parse_cgroups),
1554         OPT_STRING('o', "output", &output_name, "file", "output file name"),
1555         OPT_BOOLEAN(0, "append", &append_file, "append to the output file"),
1556         OPT_INTEGER(0, "log-fd", &output_fd,
1557                     "log output to fd, instead of stderr"),
1558         OPT_STRING(0, "pre", &pre_cmd, "command",
1559                         "command to run prior to the measured command"),
1560         OPT_STRING(0, "post", &post_cmd, "command",
1561                         "command to run after to the measured command"),
1562         OPT_UINTEGER('I', "interval-print", &stat_config.interval,
1563                     "print counts at regular interval in ms (>= 10)"),
1564         OPT_SET_UINT(0, "per-socket", &stat_config.aggr_mode,
1565                      "aggregate counts per processor socket", AGGR_SOCKET),
1566         OPT_SET_UINT(0, "per-core", &stat_config.aggr_mode,
1567                      "aggregate counts per physical processor core", AGGR_CORE),
1568         OPT_SET_UINT(0, "per-thread", &stat_config.aggr_mode,
1569                      "aggregate counts per thread", AGGR_THREAD),
1570         OPT_UINTEGER('D', "delay", &initial_delay,
1571                      "ms to wait before starting measurement after program start"),
1572         OPT_BOOLEAN(0, "metric-only", &metric_only,
1573                         "Only print computed metrics. No raw values"),
1574         OPT_END()
1575 };
1576
1577 static int perf_stat__get_socket(struct cpu_map *map, int cpu)
1578 {
1579         return cpu_map__get_socket(map, cpu, NULL);
1580 }
1581
1582 static int perf_stat__get_core(struct cpu_map *map, int cpu)
1583 {
1584         return cpu_map__get_core(map, cpu, NULL);
1585 }
1586
1587 static int cpu_map__get_max(struct cpu_map *map)
1588 {
1589         int i, max = -1;
1590
1591         for (i = 0; i < map->nr; i++) {
1592                 if (map->map[i] > max)
1593                         max = map->map[i];
1594         }
1595
1596         return max;
1597 }
1598
1599 static struct cpu_map *cpus_aggr_map;
1600
1601 static int perf_stat__get_aggr(aggr_get_id_t get_id, struct cpu_map *map, int idx)
1602 {
1603         int cpu;
1604
1605         if (idx >= map->nr)
1606                 return -1;
1607
1608         cpu = map->map[idx];
1609
1610         if (cpus_aggr_map->map[cpu] == -1)
1611                 cpus_aggr_map->map[cpu] = get_id(map, idx);
1612
1613         return cpus_aggr_map->map[cpu];
1614 }
1615
1616 static int perf_stat__get_socket_cached(struct cpu_map *map, int idx)
1617 {
1618         return perf_stat__get_aggr(perf_stat__get_socket, map, idx);
1619 }
1620
1621 static int perf_stat__get_core_cached(struct cpu_map *map, int idx)
1622 {
1623         return perf_stat__get_aggr(perf_stat__get_core, map, idx);
1624 }
1625
1626 static int perf_stat_init_aggr_mode(void)
1627 {
1628         int nr;
1629
1630         switch (stat_config.aggr_mode) {
1631         case AGGR_SOCKET:
1632                 if (cpu_map__build_socket_map(evsel_list->cpus, &aggr_map)) {
1633                         perror("cannot build socket map");
1634                         return -1;
1635                 }
1636                 aggr_get_id = perf_stat__get_socket_cached;
1637                 break;
1638         case AGGR_CORE:
1639                 if (cpu_map__build_core_map(evsel_list->cpus, &aggr_map)) {
1640                         perror("cannot build core map");
1641                         return -1;
1642                 }
1643                 aggr_get_id = perf_stat__get_core_cached;
1644                 break;
1645         case AGGR_NONE:
1646         case AGGR_GLOBAL:
1647         case AGGR_THREAD:
1648         case AGGR_UNSET:
1649         default:
1650                 break;
1651         }
1652
1653         /*
1654          * The evsel_list->cpus is the base we operate on,
1655          * taking the highest cpu number to be the size of
1656          * the aggregation translate cpumap.
1657          */
1658         nr = cpu_map__get_max(evsel_list->cpus);
1659         cpus_aggr_map = cpu_map__empty_new(nr + 1);
1660         return cpus_aggr_map ? 0 : -ENOMEM;
1661 }
1662
1663 static void perf_stat__exit_aggr_mode(void)
1664 {
1665         cpu_map__put(aggr_map);
1666         cpu_map__put(cpus_aggr_map);
1667         aggr_map = NULL;
1668         cpus_aggr_map = NULL;
1669 }
1670
1671 static inline int perf_env__get_cpu(struct perf_env *env, struct cpu_map *map, int idx)
1672 {
1673         int cpu;
1674
1675         if (idx > map->nr)
1676                 return -1;
1677
1678         cpu = map->map[idx];
1679
1680         if (cpu >= env->nr_cpus_online)
1681                 return -1;
1682
1683         return cpu;
1684 }
1685
1686 static int perf_env__get_socket(struct cpu_map *map, int idx, void *data)
1687 {
1688         struct perf_env *env = data;
1689         int cpu = perf_env__get_cpu(env, map, idx);
1690
1691         return cpu == -1 ? -1 : env->cpu[cpu].socket_id;
1692 }
1693
1694 static int perf_env__get_core(struct cpu_map *map, int idx, void *data)
1695 {
1696         struct perf_env *env = data;
1697         int core = -1, cpu = perf_env__get_cpu(env, map, idx);
1698
1699         if (cpu != -1) {
1700                 int socket_id = env->cpu[cpu].socket_id;
1701
1702                 /*
1703                  * Encode socket in upper 16 bits
1704                  * core_id is relative to socket, and
1705                  * we need a global id. So we combine
1706                  * socket + core id.
1707                  */
1708                 core = (socket_id << 16) | (env->cpu[cpu].core_id & 0xffff);
1709         }
1710
1711         return core;
1712 }
1713
1714 static int perf_env__build_socket_map(struct perf_env *env, struct cpu_map *cpus,
1715                                       struct cpu_map **sockp)
1716 {
1717         return cpu_map__build_map(cpus, sockp, perf_env__get_socket, env);
1718 }
1719
1720 static int perf_env__build_core_map(struct perf_env *env, struct cpu_map *cpus,
1721                                     struct cpu_map **corep)
1722 {
1723         return cpu_map__build_map(cpus, corep, perf_env__get_core, env);
1724 }
1725
1726 static int perf_stat__get_socket_file(struct cpu_map *map, int idx)
1727 {
1728         return perf_env__get_socket(map, idx, &perf_stat.session->header.env);
1729 }
1730
1731 static int perf_stat__get_core_file(struct cpu_map *map, int idx)
1732 {
1733         return perf_env__get_core(map, idx, &perf_stat.session->header.env);
1734 }
1735
1736 static int perf_stat_init_aggr_mode_file(struct perf_stat *st)
1737 {
1738         struct perf_env *env = &st->session->header.env;
1739
1740         switch (stat_config.aggr_mode) {
1741         case AGGR_SOCKET:
1742                 if (perf_env__build_socket_map(env, evsel_list->cpus, &aggr_map)) {
1743                         perror("cannot build socket map");
1744                         return -1;
1745                 }
1746                 aggr_get_id = perf_stat__get_socket_file;
1747                 break;
1748         case AGGR_CORE:
1749                 if (perf_env__build_core_map(env, evsel_list->cpus, &aggr_map)) {
1750                         perror("cannot build core map");
1751                         return -1;
1752                 }
1753                 aggr_get_id = perf_stat__get_core_file;
1754                 break;
1755         case AGGR_NONE:
1756         case AGGR_GLOBAL:
1757         case AGGR_THREAD:
1758         case AGGR_UNSET:
1759         default:
1760                 break;
1761         }
1762
1763         return 0;
1764 }
1765
1766 /*
1767  * Add default attributes, if there were no attributes specified or
1768  * if -d/--detailed, -d -d or -d -d -d is used:
1769  */
1770 static int add_default_attributes(void)
1771 {
1772         struct perf_event_attr default_attrs0[] = {
1773
1774   { .type = PERF_TYPE_SOFTWARE, .config = PERF_COUNT_SW_TASK_CLOCK              },
1775   { .type = PERF_TYPE_SOFTWARE, .config = PERF_COUNT_SW_CONTEXT_SWITCHES        },
1776   { .type = PERF_TYPE_SOFTWARE, .config = PERF_COUNT_SW_CPU_MIGRATIONS          },
1777   { .type = PERF_TYPE_SOFTWARE, .config = PERF_COUNT_SW_PAGE_FAULTS             },
1778
1779   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_CPU_CYCLES              },
1780 };
1781         struct perf_event_attr frontend_attrs[] = {
1782   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_STALLED_CYCLES_FRONTEND },
1783 };
1784         struct perf_event_attr backend_attrs[] = {
1785   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_STALLED_CYCLES_BACKEND  },
1786 };
1787         struct perf_event_attr default_attrs1[] = {
1788   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_INSTRUCTIONS            },
1789   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_BRANCH_INSTRUCTIONS     },
1790   { .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_BRANCH_MISSES           },
1791
1792 };
1793
1794 /*
1795  * Detailed stats (-d), covering the L1 and last level data caches:
1796  */
1797         struct perf_event_attr detailed_attrs[] = {
1798
1799   { .type = PERF_TYPE_HW_CACHE,
1800     .config =
1801          PERF_COUNT_HW_CACHE_L1D                <<  0  |
1802         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1803         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
1804
1805   { .type = PERF_TYPE_HW_CACHE,
1806     .config =
1807          PERF_COUNT_HW_CACHE_L1D                <<  0  |
1808         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1809         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
1810
1811   { .type = PERF_TYPE_HW_CACHE,
1812     .config =
1813          PERF_COUNT_HW_CACHE_LL                 <<  0  |
1814         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1815         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
1816
1817   { .type = PERF_TYPE_HW_CACHE,
1818     .config =
1819          PERF_COUNT_HW_CACHE_LL                 <<  0  |
1820         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1821         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
1822 };
1823
1824 /*
1825  * Very detailed stats (-d -d), covering the instruction cache and the TLB caches:
1826  */
1827         struct perf_event_attr very_detailed_attrs[] = {
1828
1829   { .type = PERF_TYPE_HW_CACHE,
1830     .config =
1831          PERF_COUNT_HW_CACHE_L1I                <<  0  |
1832         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1833         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
1834
1835   { .type = PERF_TYPE_HW_CACHE,
1836     .config =
1837          PERF_COUNT_HW_CACHE_L1I                <<  0  |
1838         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1839         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
1840
1841   { .type = PERF_TYPE_HW_CACHE,
1842     .config =
1843          PERF_COUNT_HW_CACHE_DTLB               <<  0  |
1844         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1845         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
1846
1847   { .type = PERF_TYPE_HW_CACHE,
1848     .config =
1849          PERF_COUNT_HW_CACHE_DTLB               <<  0  |
1850         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1851         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
1852
1853   { .type = PERF_TYPE_HW_CACHE,
1854     .config =
1855          PERF_COUNT_HW_CACHE_ITLB               <<  0  |
1856         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1857         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
1858
1859   { .type = PERF_TYPE_HW_CACHE,
1860     .config =
1861          PERF_COUNT_HW_CACHE_ITLB               <<  0  |
1862         (PERF_COUNT_HW_CACHE_OP_READ            <<  8) |
1863         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
1864
1865 };
1866
1867 /*
1868  * Very, very detailed stats (-d -d -d), adding prefetch events:
1869  */
1870         struct perf_event_attr very_very_detailed_attrs[] = {
1871
1872   { .type = PERF_TYPE_HW_CACHE,
1873     .config =
1874          PERF_COUNT_HW_CACHE_L1D                <<  0  |
1875         (PERF_COUNT_HW_CACHE_OP_PREFETCH        <<  8) |
1876         (PERF_COUNT_HW_CACHE_RESULT_ACCESS      << 16)                          },
1877
1878   { .type = PERF_TYPE_HW_CACHE,
1879     .config =
1880          PERF_COUNT_HW_CACHE_L1D                <<  0  |
1881         (PERF_COUNT_HW_CACHE_OP_PREFETCH        <<  8) |
1882         (PERF_COUNT_HW_CACHE_RESULT_MISS        << 16)                          },
1883 };
1884
1885         /* Set attrs if no event is selected and !null_run: */
1886         if (null_run)
1887                 return 0;
1888
1889         if (transaction_run) {
1890                 int err;
1891                 if (pmu_have_event("cpu", "cycles-ct") &&
1892                     pmu_have_event("cpu", "el-start"))
1893                         err = parse_events(evsel_list, transaction_attrs, NULL);
1894                 else
1895                         err = parse_events(evsel_list, transaction_limited_attrs, NULL);
1896                 if (err) {
1897                         fprintf(stderr, "Cannot set up transaction events\n");
1898                         return -1;
1899                 }
1900                 return 0;
1901         }
1902
1903         if (!evsel_list->nr_entries) {
1904                 if (perf_evlist__add_default_attrs(evsel_list, default_attrs0) < 0)
1905                         return -1;
1906                 if (pmu_have_event("cpu", "stalled-cycles-frontend")) {
1907                         if (perf_evlist__add_default_attrs(evsel_list,
1908                                                 frontend_attrs) < 0)
1909                                 return -1;
1910                 }
1911                 if (pmu_have_event("cpu", "stalled-cycles-backend")) {
1912                         if (perf_evlist__add_default_attrs(evsel_list,
1913                                                 backend_attrs) < 0)
1914                                 return -1;
1915                 }
1916                 if (perf_evlist__add_default_attrs(evsel_list, default_attrs1) < 0)
1917                         return -1;
1918         }
1919
1920         /* Detailed events get appended to the event list: */
1921
1922         if (detailed_run <  1)
1923                 return 0;
1924
1925         /* Append detailed run extra attributes: */
1926         if (perf_evlist__add_default_attrs(evsel_list, detailed_attrs) < 0)
1927                 return -1;
1928
1929         if (detailed_run < 2)
1930                 return 0;
1931
1932         /* Append very detailed run extra attributes: */
1933         if (perf_evlist__add_default_attrs(evsel_list, very_detailed_attrs) < 0)
1934                 return -1;
1935
1936         if (detailed_run < 3)
1937                 return 0;
1938
1939         /* Append very, very detailed run extra attributes: */
1940         return perf_evlist__add_default_attrs(evsel_list, very_very_detailed_attrs);
1941 }
1942
1943 static const char * const stat_record_usage[] = {
1944         "perf stat record [<options>]",
1945         NULL,
1946 };
1947
1948 static void init_features(struct perf_session *session)
1949 {
1950         int feat;
1951
1952         for (feat = HEADER_FIRST_FEATURE; feat < HEADER_LAST_FEATURE; feat++)
1953                 perf_header__set_feat(&session->header, feat);
1954
1955         perf_header__clear_feat(&session->header, HEADER_BUILD_ID);
1956         perf_header__clear_feat(&session->header, HEADER_TRACING_DATA);
1957         perf_header__clear_feat(&session->header, HEADER_BRANCH_STACK);
1958         perf_header__clear_feat(&session->header, HEADER_AUXTRACE);
1959 }
1960
1961 static int __cmd_record(int argc, const char **argv)
1962 {
1963         struct perf_session *session;
1964         struct perf_data_file *file = &perf_stat.file;
1965
1966         argc = parse_options(argc, argv, stat_options, stat_record_usage,
1967                              PARSE_OPT_STOP_AT_NON_OPTION);
1968
1969         if (output_name)
1970                 file->path = output_name;
1971
1972         if (run_count != 1 || forever) {
1973                 pr_err("Cannot use -r option with perf stat record.\n");
1974                 return -1;
1975         }
1976
1977         session = perf_session__new(file, false, NULL);
1978         if (session == NULL) {
1979                 pr_err("Perf session creation failed.\n");
1980                 return -1;
1981         }
1982
1983         init_features(session);
1984
1985         session->evlist   = evsel_list;
1986         perf_stat.session = session;
1987         perf_stat.record  = true;
1988         return argc;
1989 }
1990
1991 static int process_stat_round_event(struct perf_tool *tool __maybe_unused,
1992                                     union perf_event *event,
1993                                     struct perf_session *session)
1994 {
1995         struct stat_round_event *round = &event->stat_round;
1996         struct perf_evsel *counter;
1997         struct timespec tsh, *ts = NULL;
1998         const char **argv = session->header.env.cmdline_argv;
1999         int argc = session->header.env.nr_cmdline;
2000
2001         evlist__for_each(evsel_list, counter)
2002                 perf_stat_process_counter(&stat_config, counter);
2003
2004         if (round->type == PERF_STAT_ROUND_TYPE__FINAL)
2005                 update_stats(&walltime_nsecs_stats, round->time);
2006
2007         if (stat_config.interval && round->time) {
2008                 tsh.tv_sec  = round->time / NSECS_PER_SEC;
2009                 tsh.tv_nsec = round->time % NSECS_PER_SEC;
2010                 ts = &tsh;
2011         }
2012
2013         print_counters(ts, argc, argv);
2014         return 0;
2015 }
2016
2017 static
2018 int process_stat_config_event(struct perf_tool *tool __maybe_unused,
2019                               union perf_event *event,
2020                               struct perf_session *session __maybe_unused)
2021 {
2022         struct perf_stat *st = container_of(tool, struct perf_stat, tool);
2023
2024         perf_event__read_stat_config(&stat_config, &event->stat_config);
2025
2026         if (cpu_map__empty(st->cpus)) {
2027                 if (st->aggr_mode != AGGR_UNSET)
2028                         pr_warning("warning: processing task data, aggregation mode not set\n");
2029                 return 0;
2030         }
2031
2032         if (st->aggr_mode != AGGR_UNSET)
2033                 stat_config.aggr_mode = st->aggr_mode;
2034
2035         if (perf_stat.file.is_pipe)
2036                 perf_stat_init_aggr_mode();
2037         else
2038                 perf_stat_init_aggr_mode_file(st);
2039
2040         return 0;
2041 }
2042
2043 static int set_maps(struct perf_stat *st)
2044 {
2045         if (!st->cpus || !st->threads)
2046                 return 0;
2047
2048         if (WARN_ONCE(st->maps_allocated, "stats double allocation\n"))
2049                 return -EINVAL;
2050
2051         perf_evlist__set_maps(evsel_list, st->cpus, st->threads);
2052
2053         if (perf_evlist__alloc_stats(evsel_list, true))
2054                 return -ENOMEM;
2055
2056         st->maps_allocated = true;
2057         return 0;
2058 }
2059
2060 static
2061 int process_thread_map_event(struct perf_tool *tool __maybe_unused,
2062                              union perf_event *event,
2063                              struct perf_session *session __maybe_unused)
2064 {
2065         struct perf_stat *st = container_of(tool, struct perf_stat, tool);
2066
2067         if (st->threads) {
2068                 pr_warning("Extra thread map event, ignoring.\n");
2069                 return 0;
2070         }
2071
2072         st->threads = thread_map__new_event(&event->thread_map);
2073         if (!st->threads)
2074                 return -ENOMEM;
2075
2076         return set_maps(st);
2077 }
2078
2079 static
2080 int process_cpu_map_event(struct perf_tool *tool __maybe_unused,
2081                           union perf_event *event,
2082                           struct perf_session *session __maybe_unused)
2083 {
2084         struct perf_stat *st = container_of(tool, struct perf_stat, tool);
2085         struct cpu_map *cpus;
2086
2087         if (st->cpus) {
2088                 pr_warning("Extra cpu map event, ignoring.\n");
2089                 return 0;
2090         }
2091
2092         cpus = cpu_map__new_data(&event->cpu_map.data);
2093         if (!cpus)
2094                 return -ENOMEM;
2095
2096         st->cpus = cpus;
2097         return set_maps(st);
2098 }
2099
2100 static const char * const stat_report_usage[] = {
2101         "perf stat report [<options>]",
2102         NULL,
2103 };
2104
2105 static struct perf_stat perf_stat = {
2106         .tool = {
2107                 .attr           = perf_event__process_attr,
2108                 .event_update   = perf_event__process_event_update,
2109                 .thread_map     = process_thread_map_event,
2110                 .cpu_map        = process_cpu_map_event,
2111                 .stat_config    = process_stat_config_event,
2112                 .stat           = perf_event__process_stat_event,
2113                 .stat_round     = process_stat_round_event,
2114         },
2115         .aggr_mode = AGGR_UNSET,
2116 };
2117
2118 static int __cmd_report(int argc, const char **argv)
2119 {
2120         struct perf_session *session;
2121         const struct option options[] = {
2122         OPT_STRING('i', "input", &input_name, "file", "input file name"),
2123         OPT_SET_UINT(0, "per-socket", &perf_stat.aggr_mode,
2124                      "aggregate counts per processor socket", AGGR_SOCKET),
2125         OPT_SET_UINT(0, "per-core", &perf_stat.aggr_mode,
2126                      "aggregate counts per physical processor core", AGGR_CORE),
2127         OPT_SET_UINT('A', "no-aggr", &perf_stat.aggr_mode,
2128                      "disable CPU count aggregation", AGGR_NONE),
2129         OPT_END()
2130         };
2131         struct stat st;
2132         int ret;
2133
2134         argc = parse_options(argc, argv, options, stat_report_usage, 0);
2135
2136         if (!input_name || !strlen(input_name)) {
2137                 if (!fstat(STDIN_FILENO, &st) && S_ISFIFO(st.st_mode))
2138                         input_name = "-";
2139                 else
2140                         input_name = "perf.data";
2141         }
2142
2143         perf_stat.file.path = input_name;
2144         perf_stat.file.mode = PERF_DATA_MODE_READ;
2145
2146         session = perf_session__new(&perf_stat.file, false, &perf_stat.tool);
2147         if (session == NULL)
2148                 return -1;
2149
2150         perf_stat.session  = session;
2151         stat_config.output = stderr;
2152         evsel_list         = session->evlist;
2153
2154         ret = perf_session__process_events(session);
2155         if (ret)
2156                 return ret;
2157
2158         perf_session__delete(session);
2159         return 0;
2160 }
2161
2162 int cmd_stat(int argc, const char **argv, const char *prefix __maybe_unused)
2163 {
2164         const char * const stat_usage[] = {
2165                 "perf stat [<options>] [<command>]",
2166                 NULL
2167         };
2168         int status = -EINVAL, run_idx;
2169         const char *mode;
2170         FILE *output = stderr;
2171         unsigned int interval;
2172         const char * const stat_subcommands[] = { "record", "report" };
2173
2174         setlocale(LC_ALL, "");
2175
2176         evsel_list = perf_evlist__new();
2177         if (evsel_list == NULL)
2178                 return -ENOMEM;
2179
2180         parse_events__shrink_config_terms();
2181         argc = parse_options_subcommand(argc, argv, stat_options, stat_subcommands,
2182                                         (const char **) stat_usage,
2183                                         PARSE_OPT_STOP_AT_NON_OPTION);
2184         perf_stat__init_shadow_stats();
2185
2186         if (csv_sep) {
2187                 csv_output = true;
2188                 if (!strcmp(csv_sep, "\\t"))
2189                         csv_sep = "\t";
2190         } else
2191                 csv_sep = DEFAULT_SEPARATOR;
2192
2193         if (argc && !strncmp(argv[0], "rec", 3)) {
2194                 argc = __cmd_record(argc, argv);
2195                 if (argc < 0)
2196                         return -1;
2197         } else if (argc && !strncmp(argv[0], "rep", 3))
2198                 return __cmd_report(argc, argv);
2199
2200         interval = stat_config.interval;
2201
2202         /*
2203          * For record command the -o is already taken care of.
2204          */
2205         if (!STAT_RECORD && output_name && strcmp(output_name, "-"))
2206                 output = NULL;
2207
2208         if (output_name && output_fd) {
2209                 fprintf(stderr, "cannot use both --output and --log-fd\n");
2210                 parse_options_usage(stat_usage, stat_options, "o", 1);
2211                 parse_options_usage(NULL, stat_options, "log-fd", 0);
2212                 goto out;
2213         }
2214
2215         if (metric_only && stat_config.aggr_mode == AGGR_THREAD) {
2216                 fprintf(stderr, "--metric-only is not supported with --per-thread\n");
2217                 goto out;
2218         }
2219
2220         if (metric_only && run_count > 1) {
2221                 fprintf(stderr, "--metric-only is not supported with -r\n");
2222                 goto out;
2223         }
2224
2225         if (output_fd < 0) {
2226                 fprintf(stderr, "argument to --log-fd must be a > 0\n");
2227                 parse_options_usage(stat_usage, stat_options, "log-fd", 0);
2228                 goto out;
2229         }
2230
2231         if (!output) {
2232                 struct timespec tm;
2233                 mode = append_file ? "a" : "w";
2234
2235                 output = fopen(output_name, mode);
2236                 if (!output) {
2237                         perror("failed to create output file");
2238                         return -1;
2239                 }
2240                 clock_gettime(CLOCK_REALTIME, &tm);
2241                 fprintf(output, "# started on %s\n", ctime(&tm.tv_sec));
2242         } else if (output_fd > 0) {
2243                 mode = append_file ? "a" : "w";
2244                 output = fdopen(output_fd, mode);
2245                 if (!output) {
2246                         perror("Failed opening logfd");
2247                         return -errno;
2248                 }
2249         }
2250
2251         stat_config.output = output;
2252
2253         /*
2254          * let the spreadsheet do the pretty-printing
2255          */
2256         if (csv_output) {
2257                 /* User explicitly passed -B? */
2258                 if (big_num_opt == 1) {
2259                         fprintf(stderr, "-B option not supported with -x\n");
2260                         parse_options_usage(stat_usage, stat_options, "B", 1);
2261                         parse_options_usage(NULL, stat_options, "x", 1);
2262                         goto out;
2263                 } else /* Nope, so disable big number formatting */
2264                         big_num = false;
2265         } else if (big_num_opt == 0) /* User passed --no-big-num */
2266                 big_num = false;
2267
2268         if (!argc && target__none(&target))
2269                 usage_with_options(stat_usage, stat_options);
2270
2271         if (run_count < 0) {
2272                 pr_err("Run count must be a positive number\n");
2273                 parse_options_usage(stat_usage, stat_options, "r", 1);
2274                 goto out;
2275         } else if (run_count == 0) {
2276                 forever = true;
2277                 run_count = 1;
2278         }
2279
2280         if ((stat_config.aggr_mode == AGGR_THREAD) && !target__has_task(&target)) {
2281                 fprintf(stderr, "The --per-thread option is only available "
2282                         "when monitoring via -p -t options.\n");
2283                 parse_options_usage(NULL, stat_options, "p", 1);
2284                 parse_options_usage(NULL, stat_options, "t", 1);
2285                 goto out;
2286         }
2287
2288         /*
2289          * no_aggr, cgroup are for system-wide only
2290          * --per-thread is aggregated per thread, we dont mix it with cpu mode
2291          */
2292         if (((stat_config.aggr_mode != AGGR_GLOBAL &&
2293               stat_config.aggr_mode != AGGR_THREAD) || nr_cgroups) &&
2294             !target__has_cpu(&target)) {
2295                 fprintf(stderr, "both cgroup and no-aggregation "
2296                         "modes only available in system-wide mode\n");
2297
2298                 parse_options_usage(stat_usage, stat_options, "G", 1);
2299                 parse_options_usage(NULL, stat_options, "A", 1);
2300                 parse_options_usage(NULL, stat_options, "a", 1);
2301                 goto out;
2302         }
2303
2304         if (add_default_attributes())
2305                 goto out;
2306
2307         target__validate(&target);
2308
2309         if (perf_evlist__create_maps(evsel_list, &target) < 0) {
2310                 if (target__has_task(&target)) {
2311                         pr_err("Problems finding threads of monitor\n");
2312                         parse_options_usage(stat_usage, stat_options, "p", 1);
2313                         parse_options_usage(NULL, stat_options, "t", 1);
2314                 } else if (target__has_cpu(&target)) {
2315                         perror("failed to parse CPUs map");
2316                         parse_options_usage(stat_usage, stat_options, "C", 1);
2317                         parse_options_usage(NULL, stat_options, "a", 1);
2318                 }
2319                 goto out;
2320         }
2321
2322         /*
2323          * Initialize thread_map with comm names,
2324          * so we could print it out on output.
2325          */
2326         if (stat_config.aggr_mode == AGGR_THREAD)
2327                 thread_map__read_comms(evsel_list->threads);
2328
2329         if (interval && interval < 100) {
2330                 if (interval < 10) {
2331                         pr_err("print interval must be >= 10ms\n");
2332                         parse_options_usage(stat_usage, stat_options, "I", 1);
2333                         goto out;
2334                 } else
2335                         pr_warning("print interval < 100ms. "
2336                                    "The overhead percentage could be high in some cases. "
2337                                    "Please proceed with caution.\n");
2338         }
2339
2340         if (perf_evlist__alloc_stats(evsel_list, interval))
2341                 goto out;
2342
2343         if (perf_stat_init_aggr_mode())
2344                 goto out;
2345
2346         /*
2347          * We dont want to block the signals - that would cause
2348          * child tasks to inherit that and Ctrl-C would not work.
2349          * What we want is for Ctrl-C to work in the exec()-ed
2350          * task, but being ignored by perf stat itself:
2351          */
2352         atexit(sig_atexit);
2353         if (!forever)
2354                 signal(SIGINT,  skip_signal);
2355         signal(SIGCHLD, skip_signal);
2356         signal(SIGALRM, skip_signal);
2357         signal(SIGABRT, skip_signal);
2358
2359         status = 0;
2360         for (run_idx = 0; forever || run_idx < run_count; run_idx++) {
2361                 if (run_count != 1 && verbose)
2362                         fprintf(output, "[ perf stat: executing run #%d ... ]\n",
2363                                 run_idx + 1);
2364
2365                 status = run_perf_stat(argc, argv);
2366                 if (forever && status != -1) {
2367                         print_counters(NULL, argc, argv);
2368                         perf_stat__reset_stats();
2369                 }
2370         }
2371
2372         if (!forever && status != -1 && !interval)
2373                 print_counters(NULL, argc, argv);
2374
2375         if (STAT_RECORD) {
2376                 /*
2377                  * We synthesize the kernel mmap record just so that older tools
2378                  * don't emit warnings about not being able to resolve symbols
2379                  * due to /proc/sys/kernel/kptr_restrict settings and instear provide
2380                  * a saner message about no samples being in the perf.data file.
2381                  *
2382                  * This also serves to suppress a warning about f_header.data.size == 0
2383                  * in header.c at the moment 'perf stat record' gets introduced, which
2384                  * is not really needed once we start adding the stat specific PERF_RECORD_
2385                  * records, but the need to suppress the kptr_restrict messages in older
2386                  * tools remain  -acme
2387                  */
2388                 int fd = perf_data_file__fd(&perf_stat.file);
2389                 int err = perf_event__synthesize_kernel_mmap((void *)&perf_stat,
2390                                                              process_synthesized_event,
2391                                                              &perf_stat.session->machines.host);
2392                 if (err) {
2393                         pr_warning("Couldn't synthesize the kernel mmap record, harmless, "
2394                                    "older tools may produce warnings about this file\n.");
2395                 }
2396
2397                 if (!interval) {
2398                         if (WRITE_STAT_ROUND_EVENT(walltime_nsecs_stats.max, FINAL))
2399                                 pr_err("failed to write stat round event\n");
2400                 }
2401
2402                 if (!perf_stat.file.is_pipe) {
2403                         perf_stat.session->header.data_size += perf_stat.bytes_written;
2404                         perf_session__write_header(perf_stat.session, evsel_list, fd, true);
2405                 }
2406
2407                 perf_session__delete(perf_stat.session);
2408         }
2409
2410         perf_stat__exit_aggr_mode();
2411         perf_evlist__free_stats(evsel_list);
2412 out:
2413         perf_evlist__delete(evsel_list);
2414         return status;
2415 }