1028f12eeSStephane Eranian #include "builtin.h" 2028f12eeSStephane Eranian #include "perf.h" 3028f12eeSStephane Eranian 44b6ab94eSJosh Poimboeuf #include <subcmd/parse-options.h> 5028f12eeSStephane Eranian #include "util/trace-event.h" 6028f12eeSStephane Eranian #include "util/tool.h" 7028f12eeSStephane Eranian #include "util/session.h" 8f5fc1412SJiri Olsa #include "util/data.h" 9acbe613eSJiri Olsa #include "util/mem-events.h" 10ce1e22b0SJiri Olsa #include "util/debug.h" 11028f12eeSStephane Eranian 1267121f85SStephane Eranian #define MEM_OPERATION_LOAD 0x1 1367121f85SStephane Eranian #define MEM_OPERATION_STORE 0x2 14028f12eeSStephane Eranian 15028f12eeSStephane Eranian struct perf_mem { 16028f12eeSStephane Eranian struct perf_tool tool; 17028f12eeSStephane Eranian char const *input_name; 18028f12eeSStephane Eranian bool hide_unresolved; 19028f12eeSStephane Eranian bool dump_raw; 2062a1a63aSYunlong Song bool force; 2166024122SArnaldo Carvalho de Melo int operation; 22028f12eeSStephane Eranian const char *cpu_list; 23028f12eeSStephane Eranian DECLARE_BITMAP(cpu_bitmap, MAX_NR_CPUS); 24028f12eeSStephane Eranian }; 25028f12eeSStephane Eranian 26ce1e22b0SJiri Olsa static int parse_record_events(const struct option *opt, 27ce1e22b0SJiri Olsa const char *str, int unset __maybe_unused) 28ce1e22b0SJiri Olsa { 29ce1e22b0SJiri Olsa struct perf_mem *mem = *(struct perf_mem **)opt->value; 30ce1e22b0SJiri Olsa int j; 31ce1e22b0SJiri Olsa 32ce1e22b0SJiri Olsa if (strcmp(str, "list")) { 33ce1e22b0SJiri Olsa if (!perf_mem_events__parse(str)) { 34ce1e22b0SJiri Olsa mem->operation = 0; 35ce1e22b0SJiri Olsa return 0; 36ce1e22b0SJiri Olsa } 37ce1e22b0SJiri Olsa exit(-1); 38ce1e22b0SJiri Olsa } 39ce1e22b0SJiri Olsa 40ce1e22b0SJiri Olsa for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) { 41ce1e22b0SJiri Olsa struct perf_mem_event *e = &perf_mem_events[j]; 42ce1e22b0SJiri Olsa 43ce1e22b0SJiri Olsa fprintf(stderr, "%-20s%s", 44ce1e22b0SJiri Olsa e->tag, verbose ? "" : "\n"); 45ce1e22b0SJiri Olsa if (verbose) 46ce1e22b0SJiri Olsa fprintf(stderr, " [%s]\n", e->name); 47ce1e22b0SJiri Olsa } 48ce1e22b0SJiri Olsa exit(0); 49ce1e22b0SJiri Olsa } 50ce1e22b0SJiri Olsa 51ce1e22b0SJiri Olsa static const char * const __usage[] = { 52ce1e22b0SJiri Olsa "perf mem record [<options>] [<command>]", 53ce1e22b0SJiri Olsa "perf mem record [<options>] -- <command> [<options>]", 54ce1e22b0SJiri Olsa NULL 55ce1e22b0SJiri Olsa }; 56ce1e22b0SJiri Olsa 57ce1e22b0SJiri Olsa static const char * const *record_mem_usage = __usage; 58ce1e22b0SJiri Olsa 5966024122SArnaldo Carvalho de Melo static int __cmd_record(int argc, const char **argv, struct perf_mem *mem) 60028f12eeSStephane Eranian { 61028f12eeSStephane Eranian int rec_argc, i = 0, j; 62028f12eeSStephane Eranian const char **rec_argv; 63028f12eeSStephane Eranian int ret; 64ce1e22b0SJiri Olsa struct option options[] = { 65ce1e22b0SJiri Olsa OPT_CALLBACK('e', "event", &mem, "event", 66ce1e22b0SJiri Olsa "event selector. use 'perf mem record -e list' to list available events", 67ce1e22b0SJiri Olsa parse_record_events), 68ce1e22b0SJiri Olsa OPT_INCR('v', "verbose", &verbose, 69ce1e22b0SJiri Olsa "be more verbose (show counter open errors, etc)"), 70ce1e22b0SJiri Olsa OPT_END() 71ce1e22b0SJiri Olsa }; 72ce1e22b0SJiri Olsa 73ce1e22b0SJiri Olsa argc = parse_options(argc, argv, options, record_mem_usage, 74ce1e22b0SJiri Olsa PARSE_OPT_STOP_AT_NON_OPTION); 75028f12eeSStephane Eranian 7667121f85SStephane Eranian rec_argc = argc + 7; /* max number of arguments */ 77028f12eeSStephane Eranian rec_argv = calloc(rec_argc + 1, sizeof(char *)); 78028f12eeSStephane Eranian if (!rec_argv) 79028f12eeSStephane Eranian return -1; 80028f12eeSStephane Eranian 8167121f85SStephane Eranian rec_argv[i++] = "record"; 82028f12eeSStephane Eranian 83ce1e22b0SJiri Olsa if (mem->operation & MEM_OPERATION_LOAD) 84acbe613eSJiri Olsa perf_mem_events[PERF_MEM_EVENTS__LOAD].record = true; 85ce1e22b0SJiri Olsa 86ce1e22b0SJiri Olsa if (perf_mem_events[PERF_MEM_EVENTS__LOAD].record) 8767121f85SStephane Eranian rec_argv[i++] = "-W"; 88028f12eeSStephane Eranian 8967121f85SStephane Eranian rec_argv[i++] = "-d"; 9067121f85SStephane Eranian 91acbe613eSJiri Olsa for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) { 92acbe613eSJiri Olsa if (!perf_mem_events[j].record) 93acbe613eSJiri Olsa continue; 9467121f85SStephane Eranian 9567121f85SStephane Eranian rec_argv[i++] = "-e"; 96acbe613eSJiri Olsa rec_argv[i++] = perf_mem_events[j].name; 97acbe613eSJiri Olsa }; 9867121f85SStephane Eranian 99ce1e22b0SJiri Olsa for (j = 0; j < argc; j++, i++) 100028f12eeSStephane Eranian rec_argv[i] = argv[j]; 101028f12eeSStephane Eranian 102ce1e22b0SJiri Olsa if (verbose > 0) { 103ce1e22b0SJiri Olsa pr_debug("calling: record "); 104ce1e22b0SJiri Olsa 105ce1e22b0SJiri Olsa while (rec_argv[j]) { 106ce1e22b0SJiri Olsa pr_debug("%s ", rec_argv[j]); 107ce1e22b0SJiri Olsa j++; 108ce1e22b0SJiri Olsa } 109ce1e22b0SJiri Olsa pr_debug("\n"); 110ce1e22b0SJiri Olsa } 111ce1e22b0SJiri Olsa 112028f12eeSStephane Eranian ret = cmd_record(i, rec_argv, NULL); 113028f12eeSStephane Eranian free(rec_argv); 114028f12eeSStephane Eranian return ret; 115028f12eeSStephane Eranian } 116028f12eeSStephane Eranian 117028f12eeSStephane Eranian static int 118028f12eeSStephane Eranian dump_raw_samples(struct perf_tool *tool, 119028f12eeSStephane Eranian union perf_event *event, 120028f12eeSStephane Eranian struct perf_sample *sample, 121028f12eeSStephane Eranian struct machine *machine) 122028f12eeSStephane Eranian { 123028f12eeSStephane Eranian struct perf_mem *mem = container_of(tool, struct perf_mem, tool); 124028f12eeSStephane Eranian struct addr_location al; 125028f12eeSStephane Eranian const char *fmt; 126028f12eeSStephane Eranian 127e44baa3eSAdrian Hunter if (perf_event__preprocess_sample(event, machine, &al, sample) < 0) { 128028f12eeSStephane Eranian fprintf(stderr, "problem processing %d event, skipping it.\n", 129028f12eeSStephane Eranian event->header.type); 130028f12eeSStephane Eranian return -1; 131028f12eeSStephane Eranian } 132028f12eeSStephane Eranian 133028f12eeSStephane Eranian if (al.filtered || (mem->hide_unresolved && al.sym == NULL)) 134b91fc39fSArnaldo Carvalho de Melo goto out_put; 135028f12eeSStephane Eranian 136028f12eeSStephane Eranian if (al.map != NULL) 137028f12eeSStephane Eranian al.map->dso->hit = 1; 138028f12eeSStephane Eranian 139028f12eeSStephane Eranian if (symbol_conf.field_sep) { 140028f12eeSStephane Eranian fmt = "%d%s%d%s0x%"PRIx64"%s0x%"PRIx64"%s%"PRIu64 141028f12eeSStephane Eranian "%s0x%"PRIx64"%s%s:%s\n"; 142028f12eeSStephane Eranian } else { 143028f12eeSStephane Eranian fmt = "%5d%s%5d%s0x%016"PRIx64"%s0x016%"PRIx64 144028f12eeSStephane Eranian "%s%5"PRIu64"%s0x%06"PRIx64"%s%s:%s\n"; 145028f12eeSStephane Eranian symbol_conf.field_sep = " "; 146028f12eeSStephane Eranian } 147028f12eeSStephane Eranian 148028f12eeSStephane Eranian printf(fmt, 149028f12eeSStephane Eranian sample->pid, 150028f12eeSStephane Eranian symbol_conf.field_sep, 151028f12eeSStephane Eranian sample->tid, 152028f12eeSStephane Eranian symbol_conf.field_sep, 153ef89325fSAdrian Hunter sample->ip, 154028f12eeSStephane Eranian symbol_conf.field_sep, 155028f12eeSStephane Eranian sample->addr, 156028f12eeSStephane Eranian symbol_conf.field_sep, 157028f12eeSStephane Eranian sample->weight, 158028f12eeSStephane Eranian symbol_conf.field_sep, 159028f12eeSStephane Eranian sample->data_src, 160028f12eeSStephane Eranian symbol_conf.field_sep, 161028f12eeSStephane Eranian al.map ? (al.map->dso ? al.map->dso->long_name : "???") : "???", 162028f12eeSStephane Eranian al.sym ? al.sym->name : "???"); 163b91fc39fSArnaldo Carvalho de Melo out_put: 164b91fc39fSArnaldo Carvalho de Melo addr_location__put(&al); 165028f12eeSStephane Eranian return 0; 166028f12eeSStephane Eranian } 167028f12eeSStephane Eranian 168028f12eeSStephane Eranian static int process_sample_event(struct perf_tool *tool, 169028f12eeSStephane Eranian union perf_event *event, 170028f12eeSStephane Eranian struct perf_sample *sample, 1718b640cc4SArnaldo Carvalho de Melo struct perf_evsel *evsel __maybe_unused, 172028f12eeSStephane Eranian struct machine *machine) 173028f12eeSStephane Eranian { 1748b640cc4SArnaldo Carvalho de Melo return dump_raw_samples(tool, event, sample, machine); 175028f12eeSStephane Eranian } 176028f12eeSStephane Eranian 177028f12eeSStephane Eranian static int report_raw_events(struct perf_mem *mem) 178028f12eeSStephane Eranian { 179f5fc1412SJiri Olsa struct perf_data_file file = { 180f5fc1412SJiri Olsa .path = input_name, 181f5fc1412SJiri Olsa .mode = PERF_DATA_MODE_READ, 18262a1a63aSYunlong Song .force = mem->force, 183f5fc1412SJiri Olsa }; 184028f12eeSStephane Eranian int ret; 185f5fc1412SJiri Olsa struct perf_session *session = perf_session__new(&file, false, 186f5fc1412SJiri Olsa &mem->tool); 187028f12eeSStephane Eranian 188028f12eeSStephane Eranian if (session == NULL) 18952e02834STaeung Song return -1; 190028f12eeSStephane Eranian 191028f12eeSStephane Eranian if (mem->cpu_list) { 192028f12eeSStephane Eranian ret = perf_session__cpu_bitmap(session, mem->cpu_list, 193028f12eeSStephane Eranian mem->cpu_bitmap); 1941df9fadeSTaeung Song if (ret < 0) 195028f12eeSStephane Eranian goto out_delete; 196028f12eeSStephane Eranian } 197028f12eeSStephane Eranian 1981df9fadeSTaeung Song ret = symbol__init(&session->header.env); 1991df9fadeSTaeung Song if (ret < 0) 2001df9fadeSTaeung Song goto out_delete; 201028f12eeSStephane Eranian 202028f12eeSStephane Eranian printf("# PID, TID, IP, ADDR, LOCAL WEIGHT, DSRC, SYMBOL\n"); 203028f12eeSStephane Eranian 2041df9fadeSTaeung Song ret = perf_session__process_events(session); 205028f12eeSStephane Eranian 206028f12eeSStephane Eranian out_delete: 207028f12eeSStephane Eranian perf_session__delete(session); 2081df9fadeSTaeung Song return ret; 209028f12eeSStephane Eranian } 210028f12eeSStephane Eranian 211028f12eeSStephane Eranian static int report_events(int argc, const char **argv, struct perf_mem *mem) 212028f12eeSStephane Eranian { 213028f12eeSStephane Eranian const char **rep_argv; 214028f12eeSStephane Eranian int ret, i = 0, j, rep_argc; 215028f12eeSStephane Eranian 216028f12eeSStephane Eranian if (mem->dump_raw) 217028f12eeSStephane Eranian return report_raw_events(mem); 218028f12eeSStephane Eranian 219028f12eeSStephane Eranian rep_argc = argc + 3; 220028f12eeSStephane Eranian rep_argv = calloc(rep_argc + 1, sizeof(char *)); 221028f12eeSStephane Eranian if (!rep_argv) 222028f12eeSStephane Eranian return -1; 223028f12eeSStephane Eranian 22467121f85SStephane Eranian rep_argv[i++] = "report"; 22567121f85SStephane Eranian rep_argv[i++] = "--mem-mode"; 22667121f85SStephane Eranian rep_argv[i++] = "-n"; /* display number of samples */ 227028f12eeSStephane Eranian 228028f12eeSStephane Eranian /* 229028f12eeSStephane Eranian * there is no weight (cost) associated with stores, so don't print 230028f12eeSStephane Eranian * the column 231028f12eeSStephane Eranian */ 23266024122SArnaldo Carvalho de Melo if (!(mem->operation & MEM_OPERATION_LOAD)) 23367121f85SStephane Eranian rep_argv[i++] = "--sort=mem,sym,dso,symbol_daddr," 23467121f85SStephane Eranian "dso_daddr,tlb,locked"; 235028f12eeSStephane Eranian 236028f12eeSStephane Eranian for (j = 1; j < argc; j++, i++) 237028f12eeSStephane Eranian rep_argv[i] = argv[j]; 238028f12eeSStephane Eranian 239028f12eeSStephane Eranian ret = cmd_report(i, rep_argv, NULL); 240028f12eeSStephane Eranian free(rep_argv); 241028f12eeSStephane Eranian return ret; 242028f12eeSStephane Eranian } 243028f12eeSStephane Eranian 24467121f85SStephane Eranian struct mem_mode { 24567121f85SStephane Eranian const char *name; 24667121f85SStephane Eranian int mode; 24767121f85SStephane Eranian }; 24867121f85SStephane Eranian 24967121f85SStephane Eranian #define MEM_OPT(n, m) \ 25067121f85SStephane Eranian { .name = n, .mode = (m) } 25167121f85SStephane Eranian 25267121f85SStephane Eranian #define MEM_END { .name = NULL } 25367121f85SStephane Eranian 25467121f85SStephane Eranian static const struct mem_mode mem_modes[]={ 25567121f85SStephane Eranian MEM_OPT("load", MEM_OPERATION_LOAD), 25667121f85SStephane Eranian MEM_OPT("store", MEM_OPERATION_STORE), 25767121f85SStephane Eranian MEM_END 25867121f85SStephane Eranian }; 25967121f85SStephane Eranian 26067121f85SStephane Eranian static int 26167121f85SStephane Eranian parse_mem_ops(const struct option *opt, const char *str, int unset) 26267121f85SStephane Eranian { 26367121f85SStephane Eranian int *mode = (int *)opt->value; 26467121f85SStephane Eranian const struct mem_mode *m; 26567121f85SStephane Eranian char *s, *os = NULL, *p; 26667121f85SStephane Eranian int ret = -1; 26767121f85SStephane Eranian 26867121f85SStephane Eranian if (unset) 26967121f85SStephane Eranian return 0; 27067121f85SStephane Eranian 27167121f85SStephane Eranian /* str may be NULL in case no arg is passed to -t */ 27267121f85SStephane Eranian if (str) { 27367121f85SStephane Eranian /* because str is read-only */ 27467121f85SStephane Eranian s = os = strdup(str); 27567121f85SStephane Eranian if (!s) 27667121f85SStephane Eranian return -1; 27767121f85SStephane Eranian 27867121f85SStephane Eranian /* reset mode */ 27967121f85SStephane Eranian *mode = 0; 28067121f85SStephane Eranian 28167121f85SStephane Eranian for (;;) { 28267121f85SStephane Eranian p = strchr(s, ','); 28367121f85SStephane Eranian if (p) 28467121f85SStephane Eranian *p = '\0'; 28567121f85SStephane Eranian 28667121f85SStephane Eranian for (m = mem_modes; m->name; m++) { 28767121f85SStephane Eranian if (!strcasecmp(s, m->name)) 28867121f85SStephane Eranian break; 28967121f85SStephane Eranian } 29067121f85SStephane Eranian if (!m->name) { 29167121f85SStephane Eranian fprintf(stderr, "unknown sampling op %s," 29267121f85SStephane Eranian " check man page\n", s); 29367121f85SStephane Eranian goto error; 29467121f85SStephane Eranian } 29567121f85SStephane Eranian 29667121f85SStephane Eranian *mode |= m->mode; 29767121f85SStephane Eranian 29867121f85SStephane Eranian if (!p) 29967121f85SStephane Eranian break; 30067121f85SStephane Eranian 30167121f85SStephane Eranian s = p + 1; 30267121f85SStephane Eranian } 30367121f85SStephane Eranian } 30467121f85SStephane Eranian ret = 0; 30567121f85SStephane Eranian 30667121f85SStephane Eranian if (*mode == 0) 30767121f85SStephane Eranian *mode = MEM_OPERATION_LOAD; 30867121f85SStephane Eranian error: 30967121f85SStephane Eranian free(os); 31067121f85SStephane Eranian return ret; 31167121f85SStephane Eranian } 31267121f85SStephane Eranian 313028f12eeSStephane Eranian int cmd_mem(int argc, const char **argv, const char *prefix __maybe_unused) 314028f12eeSStephane Eranian { 315028f12eeSStephane Eranian struct stat st; 316028f12eeSStephane Eranian struct perf_mem mem = { 317028f12eeSStephane Eranian .tool = { 318028f12eeSStephane Eranian .sample = process_sample_event, 319028f12eeSStephane Eranian .mmap = perf_event__process_mmap, 3205c5e854bSStephane Eranian .mmap2 = perf_event__process_mmap2, 321028f12eeSStephane Eranian .comm = perf_event__process_comm, 322028f12eeSStephane Eranian .lost = perf_event__process_lost, 323028f12eeSStephane Eranian .fork = perf_event__process_fork, 324028f12eeSStephane Eranian .build_id = perf_event__process_build_id, 3250a8cb85cSJiri Olsa .ordered_events = true, 326028f12eeSStephane Eranian }, 327028f12eeSStephane Eranian .input_name = "perf.data", 32866024122SArnaldo Carvalho de Melo /* 32966024122SArnaldo Carvalho de Melo * default to both load an store sampling 33066024122SArnaldo Carvalho de Melo */ 33166024122SArnaldo Carvalho de Melo .operation = MEM_OPERATION_LOAD | MEM_OPERATION_STORE, 332028f12eeSStephane Eranian }; 333028f12eeSStephane Eranian const struct option mem_options[] = { 33466024122SArnaldo Carvalho de Melo OPT_CALLBACK('t', "type", &mem.operation, 33567121f85SStephane Eranian "type", "memory operations(load,store) Default load,store", 33667121f85SStephane Eranian parse_mem_ops), 337028f12eeSStephane Eranian OPT_BOOLEAN('D', "dump-raw-samples", &mem.dump_raw, 338028f12eeSStephane Eranian "dump raw samples in ASCII"), 339028f12eeSStephane Eranian OPT_BOOLEAN('U', "hide-unresolved", &mem.hide_unresolved, 340028f12eeSStephane Eranian "Only display entries resolved to a symbol"), 341028f12eeSStephane Eranian OPT_STRING('i', "input", &input_name, "file", 342028f12eeSStephane Eranian "input file name"), 343028f12eeSStephane Eranian OPT_STRING('C', "cpu", &mem.cpu_list, "cpu", 344028f12eeSStephane Eranian "list of cpus to profile"), 3458b8ca6e1SWang Nan OPT_STRING_NOEMPTY('x', "field-separator", &symbol_conf.field_sep, 346028f12eeSStephane Eranian "separator", 347028f12eeSStephane Eranian "separator for columns, no spaces will be added" 348028f12eeSStephane Eranian " between columns '.' is reserved."), 34962a1a63aSYunlong Song OPT_BOOLEAN('f', "force", &mem.force, "don't complain, do it"), 350028f12eeSStephane Eranian OPT_END() 351028f12eeSStephane Eranian }; 3528d2a2a1dSRamkumar Ramachandra const char *const mem_subcommands[] = { "record", "report", NULL }; 3538d2a2a1dSRamkumar Ramachandra const char *mem_usage[] = { 3548d2a2a1dSRamkumar Ramachandra NULL, 3558d2a2a1dSRamkumar Ramachandra NULL 3568d2a2a1dSRamkumar Ramachandra }; 357028f12eeSStephane Eranian 3588d2a2a1dSRamkumar Ramachandra argc = parse_options_subcommand(argc, argv, mem_options, mem_subcommands, 3598d2a2a1dSRamkumar Ramachandra mem_usage, PARSE_OPT_STOP_AT_NON_OPTION); 360028f12eeSStephane Eranian 36166024122SArnaldo Carvalho de Melo if (!argc || !(strncmp(argv[0], "rec", 3) || mem.operation)) 362028f12eeSStephane Eranian usage_with_options(mem_usage, mem_options); 363028f12eeSStephane Eranian 364028f12eeSStephane Eranian if (!mem.input_name || !strlen(mem.input_name)) { 365028f12eeSStephane Eranian if (!fstat(STDIN_FILENO, &st) && S_ISFIFO(st.st_mode)) 366028f12eeSStephane Eranian mem.input_name = "-"; 367028f12eeSStephane Eranian else 368028f12eeSStephane Eranian mem.input_name = "perf.data"; 369028f12eeSStephane Eranian } 370028f12eeSStephane Eranian 371028f12eeSStephane Eranian if (!strncmp(argv[0], "rec", 3)) 37266024122SArnaldo Carvalho de Melo return __cmd_record(argc, argv, &mem); 373028f12eeSStephane Eranian else if (!strncmp(argv[0], "rep", 3)) 374028f12eeSStephane Eranian return report_events(argc, argv, &mem); 375028f12eeSStephane Eranian else 376028f12eeSStephane Eranian usage_with_options(mem_usage, mem_options); 377028f12eeSStephane Eranian 378028f12eeSStephane Eranian return 0; 379028f12eeSStephane Eranian } 380