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 4354fbad54SJiri Olsa fprintf(stderr, "%-13s%-*s%s\n", 4454fbad54SJiri Olsa e->tag, 4554fbad54SJiri Olsa verbose ? 25 : 0, 462ba7ac58SJiri Olsa verbose ? perf_mem_events__name(j) : "", 4754fbad54SJiri Olsa e->supported ? ": available" : ""); 48ce1e22b0SJiri Olsa } 49ce1e22b0SJiri Olsa exit(0); 50ce1e22b0SJiri Olsa } 51ce1e22b0SJiri Olsa 52ce1e22b0SJiri Olsa static const char * const __usage[] = { 53ce1e22b0SJiri Olsa "perf mem record [<options>] [<command>]", 54ce1e22b0SJiri Olsa "perf mem record [<options>] -- <command> [<options>]", 55ce1e22b0SJiri Olsa NULL 56ce1e22b0SJiri Olsa }; 57ce1e22b0SJiri Olsa 58ce1e22b0SJiri Olsa static const char * const *record_mem_usage = __usage; 59ce1e22b0SJiri Olsa 6066024122SArnaldo Carvalho de Melo static int __cmd_record(int argc, const char **argv, struct perf_mem *mem) 61028f12eeSStephane Eranian { 62028f12eeSStephane Eranian int rec_argc, i = 0, j; 63028f12eeSStephane Eranian const char **rec_argv; 64028f12eeSStephane Eranian int ret; 65ce1e22b0SJiri Olsa struct option options[] = { 66ce1e22b0SJiri Olsa OPT_CALLBACK('e', "event", &mem, "event", 67ce1e22b0SJiri Olsa "event selector. use 'perf mem record -e list' to list available events", 68ce1e22b0SJiri Olsa parse_record_events), 69ce1e22b0SJiri Olsa OPT_INCR('v', "verbose", &verbose, 70ce1e22b0SJiri Olsa "be more verbose (show counter open errors, etc)"), 71ce1e22b0SJiri Olsa OPT_END() 72ce1e22b0SJiri Olsa }; 73ce1e22b0SJiri Olsa 74ce1e22b0SJiri Olsa argc = parse_options(argc, argv, options, record_mem_usage, 75ce1e22b0SJiri Olsa PARSE_OPT_STOP_AT_NON_OPTION); 76028f12eeSStephane Eranian 7767121f85SStephane Eranian rec_argc = argc + 7; /* max number of arguments */ 78028f12eeSStephane Eranian rec_argv = calloc(rec_argc + 1, sizeof(char *)); 79028f12eeSStephane Eranian if (!rec_argv) 80028f12eeSStephane Eranian return -1; 81028f12eeSStephane Eranian 8267121f85SStephane Eranian rec_argv[i++] = "record"; 83028f12eeSStephane Eranian 84ce1e22b0SJiri Olsa if (mem->operation & MEM_OPERATION_LOAD) 85acbe613eSJiri Olsa perf_mem_events[PERF_MEM_EVENTS__LOAD].record = true; 86ce1e22b0SJiri Olsa 87ce1e22b0SJiri Olsa if (perf_mem_events[PERF_MEM_EVENTS__LOAD].record) 8867121f85SStephane Eranian rec_argv[i++] = "-W"; 89028f12eeSStephane Eranian 9067121f85SStephane Eranian rec_argv[i++] = "-d"; 9167121f85SStephane Eranian 92acbe613eSJiri Olsa for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) { 93acbe613eSJiri Olsa if (!perf_mem_events[j].record) 94acbe613eSJiri Olsa continue; 9567121f85SStephane Eranian 9654fbad54SJiri Olsa if (!perf_mem_events[j].supported) { 9754fbad54SJiri Olsa pr_err("failed: event '%s' not supported\n", 982ba7ac58SJiri Olsa perf_mem_events__name(j)); 9954fbad54SJiri Olsa return -1; 10054fbad54SJiri Olsa } 10154fbad54SJiri Olsa 10267121f85SStephane Eranian rec_argv[i++] = "-e"; 1032ba7ac58SJiri Olsa rec_argv[i++] = perf_mem_events__name(j); 104acbe613eSJiri Olsa }; 10567121f85SStephane Eranian 106ce1e22b0SJiri Olsa for (j = 0; j < argc; j++, i++) 107028f12eeSStephane Eranian rec_argv[i] = argv[j]; 108028f12eeSStephane Eranian 109ce1e22b0SJiri Olsa if (verbose > 0) { 110ce1e22b0SJiri Olsa pr_debug("calling: record "); 111ce1e22b0SJiri Olsa 112ce1e22b0SJiri Olsa while (rec_argv[j]) { 113ce1e22b0SJiri Olsa pr_debug("%s ", rec_argv[j]); 114ce1e22b0SJiri Olsa j++; 115ce1e22b0SJiri Olsa } 116ce1e22b0SJiri Olsa pr_debug("\n"); 117ce1e22b0SJiri Olsa } 118ce1e22b0SJiri Olsa 119028f12eeSStephane Eranian ret = cmd_record(i, rec_argv, NULL); 120028f12eeSStephane Eranian free(rec_argv); 121028f12eeSStephane Eranian return ret; 122028f12eeSStephane Eranian } 123028f12eeSStephane Eranian 124028f12eeSStephane Eranian static int 125028f12eeSStephane Eranian dump_raw_samples(struct perf_tool *tool, 126028f12eeSStephane Eranian union perf_event *event, 127028f12eeSStephane Eranian struct perf_sample *sample, 128028f12eeSStephane Eranian struct machine *machine) 129028f12eeSStephane Eranian { 130028f12eeSStephane Eranian struct perf_mem *mem = container_of(tool, struct perf_mem, tool); 131028f12eeSStephane Eranian struct addr_location al; 132028f12eeSStephane Eranian const char *fmt; 133028f12eeSStephane Eranian 134e44baa3eSAdrian Hunter if (perf_event__preprocess_sample(event, machine, &al, sample) < 0) { 135028f12eeSStephane Eranian fprintf(stderr, "problem processing %d event, skipping it.\n", 136028f12eeSStephane Eranian event->header.type); 137028f12eeSStephane Eranian return -1; 138028f12eeSStephane Eranian } 139028f12eeSStephane Eranian 140028f12eeSStephane Eranian if (al.filtered || (mem->hide_unresolved && al.sym == NULL)) 141b91fc39fSArnaldo Carvalho de Melo goto out_put; 142028f12eeSStephane Eranian 143028f12eeSStephane Eranian if (al.map != NULL) 144028f12eeSStephane Eranian al.map->dso->hit = 1; 145028f12eeSStephane Eranian 146028f12eeSStephane Eranian if (symbol_conf.field_sep) { 147028f12eeSStephane Eranian fmt = "%d%s%d%s0x%"PRIx64"%s0x%"PRIx64"%s%"PRIu64 148028f12eeSStephane Eranian "%s0x%"PRIx64"%s%s:%s\n"; 149028f12eeSStephane Eranian } else { 150028f12eeSStephane Eranian fmt = "%5d%s%5d%s0x%016"PRIx64"%s0x016%"PRIx64 151028f12eeSStephane Eranian "%s%5"PRIu64"%s0x%06"PRIx64"%s%s:%s\n"; 152028f12eeSStephane Eranian symbol_conf.field_sep = " "; 153028f12eeSStephane Eranian } 154028f12eeSStephane Eranian 155028f12eeSStephane Eranian printf(fmt, 156028f12eeSStephane Eranian sample->pid, 157028f12eeSStephane Eranian symbol_conf.field_sep, 158028f12eeSStephane Eranian sample->tid, 159028f12eeSStephane Eranian symbol_conf.field_sep, 160ef89325fSAdrian Hunter sample->ip, 161028f12eeSStephane Eranian symbol_conf.field_sep, 162028f12eeSStephane Eranian sample->addr, 163028f12eeSStephane Eranian symbol_conf.field_sep, 164028f12eeSStephane Eranian sample->weight, 165028f12eeSStephane Eranian symbol_conf.field_sep, 166028f12eeSStephane Eranian sample->data_src, 167028f12eeSStephane Eranian symbol_conf.field_sep, 168028f12eeSStephane Eranian al.map ? (al.map->dso ? al.map->dso->long_name : "???") : "???", 169028f12eeSStephane Eranian al.sym ? al.sym->name : "???"); 170b91fc39fSArnaldo Carvalho de Melo out_put: 171b91fc39fSArnaldo Carvalho de Melo addr_location__put(&al); 172028f12eeSStephane Eranian return 0; 173028f12eeSStephane Eranian } 174028f12eeSStephane Eranian 175028f12eeSStephane Eranian static int process_sample_event(struct perf_tool *tool, 176028f12eeSStephane Eranian union perf_event *event, 177028f12eeSStephane Eranian struct perf_sample *sample, 1788b640cc4SArnaldo Carvalho de Melo struct perf_evsel *evsel __maybe_unused, 179028f12eeSStephane Eranian struct machine *machine) 180028f12eeSStephane Eranian { 1818b640cc4SArnaldo Carvalho de Melo return dump_raw_samples(tool, event, sample, machine); 182028f12eeSStephane Eranian } 183028f12eeSStephane Eranian 184028f12eeSStephane Eranian static int report_raw_events(struct perf_mem *mem) 185028f12eeSStephane Eranian { 186f5fc1412SJiri Olsa struct perf_data_file file = { 187f5fc1412SJiri Olsa .path = input_name, 188f5fc1412SJiri Olsa .mode = PERF_DATA_MODE_READ, 18962a1a63aSYunlong Song .force = mem->force, 190f5fc1412SJiri Olsa }; 191028f12eeSStephane Eranian int ret; 192f5fc1412SJiri Olsa struct perf_session *session = perf_session__new(&file, false, 193f5fc1412SJiri Olsa &mem->tool); 194028f12eeSStephane Eranian 195028f12eeSStephane Eranian if (session == NULL) 19652e02834STaeung Song return -1; 197028f12eeSStephane Eranian 198028f12eeSStephane Eranian if (mem->cpu_list) { 199028f12eeSStephane Eranian ret = perf_session__cpu_bitmap(session, mem->cpu_list, 200028f12eeSStephane Eranian mem->cpu_bitmap); 2011df9fadeSTaeung Song if (ret < 0) 202028f12eeSStephane Eranian goto out_delete; 203028f12eeSStephane Eranian } 204028f12eeSStephane Eranian 2051df9fadeSTaeung Song ret = symbol__init(&session->header.env); 2061df9fadeSTaeung Song if (ret < 0) 2071df9fadeSTaeung Song goto out_delete; 208028f12eeSStephane Eranian 209028f12eeSStephane Eranian printf("# PID, TID, IP, ADDR, LOCAL WEIGHT, DSRC, SYMBOL\n"); 210028f12eeSStephane Eranian 2111df9fadeSTaeung Song ret = perf_session__process_events(session); 212028f12eeSStephane Eranian 213028f12eeSStephane Eranian out_delete: 214028f12eeSStephane Eranian perf_session__delete(session); 2151df9fadeSTaeung Song return ret; 216028f12eeSStephane Eranian } 217028f12eeSStephane Eranian 218028f12eeSStephane Eranian static int report_events(int argc, const char **argv, struct perf_mem *mem) 219028f12eeSStephane Eranian { 220028f12eeSStephane Eranian const char **rep_argv; 221028f12eeSStephane Eranian int ret, i = 0, j, rep_argc; 222028f12eeSStephane Eranian 223028f12eeSStephane Eranian if (mem->dump_raw) 224028f12eeSStephane Eranian return report_raw_events(mem); 225028f12eeSStephane Eranian 226028f12eeSStephane Eranian rep_argc = argc + 3; 227028f12eeSStephane Eranian rep_argv = calloc(rep_argc + 1, sizeof(char *)); 228028f12eeSStephane Eranian if (!rep_argv) 229028f12eeSStephane Eranian return -1; 230028f12eeSStephane Eranian 23167121f85SStephane Eranian rep_argv[i++] = "report"; 23267121f85SStephane Eranian rep_argv[i++] = "--mem-mode"; 23367121f85SStephane Eranian rep_argv[i++] = "-n"; /* display number of samples */ 234028f12eeSStephane Eranian 235028f12eeSStephane Eranian /* 236028f12eeSStephane Eranian * there is no weight (cost) associated with stores, so don't print 237028f12eeSStephane Eranian * the column 238028f12eeSStephane Eranian */ 23966024122SArnaldo Carvalho de Melo if (!(mem->operation & MEM_OPERATION_LOAD)) 24067121f85SStephane Eranian rep_argv[i++] = "--sort=mem,sym,dso,symbol_daddr," 24167121f85SStephane Eranian "dso_daddr,tlb,locked"; 242028f12eeSStephane Eranian 243028f12eeSStephane Eranian for (j = 1; j < argc; j++, i++) 244028f12eeSStephane Eranian rep_argv[i] = argv[j]; 245028f12eeSStephane Eranian 246028f12eeSStephane Eranian ret = cmd_report(i, rep_argv, NULL); 247028f12eeSStephane Eranian free(rep_argv); 248028f12eeSStephane Eranian return ret; 249028f12eeSStephane Eranian } 250028f12eeSStephane Eranian 25167121f85SStephane Eranian struct mem_mode { 25267121f85SStephane Eranian const char *name; 25367121f85SStephane Eranian int mode; 25467121f85SStephane Eranian }; 25567121f85SStephane Eranian 25667121f85SStephane Eranian #define MEM_OPT(n, m) \ 25767121f85SStephane Eranian { .name = n, .mode = (m) } 25867121f85SStephane Eranian 25967121f85SStephane Eranian #define MEM_END { .name = NULL } 26067121f85SStephane Eranian 26167121f85SStephane Eranian static const struct mem_mode mem_modes[]={ 26267121f85SStephane Eranian MEM_OPT("load", MEM_OPERATION_LOAD), 26367121f85SStephane Eranian MEM_OPT("store", MEM_OPERATION_STORE), 26467121f85SStephane Eranian MEM_END 26567121f85SStephane Eranian }; 26667121f85SStephane Eranian 26767121f85SStephane Eranian static int 26867121f85SStephane Eranian parse_mem_ops(const struct option *opt, const char *str, int unset) 26967121f85SStephane Eranian { 27067121f85SStephane Eranian int *mode = (int *)opt->value; 27167121f85SStephane Eranian const struct mem_mode *m; 27267121f85SStephane Eranian char *s, *os = NULL, *p; 27367121f85SStephane Eranian int ret = -1; 27467121f85SStephane Eranian 27567121f85SStephane Eranian if (unset) 27667121f85SStephane Eranian return 0; 27767121f85SStephane Eranian 27867121f85SStephane Eranian /* str may be NULL in case no arg is passed to -t */ 27967121f85SStephane Eranian if (str) { 28067121f85SStephane Eranian /* because str is read-only */ 28167121f85SStephane Eranian s = os = strdup(str); 28267121f85SStephane Eranian if (!s) 28367121f85SStephane Eranian return -1; 28467121f85SStephane Eranian 28567121f85SStephane Eranian /* reset mode */ 28667121f85SStephane Eranian *mode = 0; 28767121f85SStephane Eranian 28867121f85SStephane Eranian for (;;) { 28967121f85SStephane Eranian p = strchr(s, ','); 29067121f85SStephane Eranian if (p) 29167121f85SStephane Eranian *p = '\0'; 29267121f85SStephane Eranian 29367121f85SStephane Eranian for (m = mem_modes; m->name; m++) { 29467121f85SStephane Eranian if (!strcasecmp(s, m->name)) 29567121f85SStephane Eranian break; 29667121f85SStephane Eranian } 29767121f85SStephane Eranian if (!m->name) { 29867121f85SStephane Eranian fprintf(stderr, "unknown sampling op %s," 29967121f85SStephane Eranian " check man page\n", s); 30067121f85SStephane Eranian goto error; 30167121f85SStephane Eranian } 30267121f85SStephane Eranian 30367121f85SStephane Eranian *mode |= m->mode; 30467121f85SStephane Eranian 30567121f85SStephane Eranian if (!p) 30667121f85SStephane Eranian break; 30767121f85SStephane Eranian 30867121f85SStephane Eranian s = p + 1; 30967121f85SStephane Eranian } 31067121f85SStephane Eranian } 31167121f85SStephane Eranian ret = 0; 31267121f85SStephane Eranian 31367121f85SStephane Eranian if (*mode == 0) 31467121f85SStephane Eranian *mode = MEM_OPERATION_LOAD; 31567121f85SStephane Eranian error: 31667121f85SStephane Eranian free(os); 31767121f85SStephane Eranian return ret; 31867121f85SStephane Eranian } 31967121f85SStephane Eranian 320028f12eeSStephane Eranian int cmd_mem(int argc, const char **argv, const char *prefix __maybe_unused) 321028f12eeSStephane Eranian { 322028f12eeSStephane Eranian struct stat st; 323028f12eeSStephane Eranian struct perf_mem mem = { 324028f12eeSStephane Eranian .tool = { 325028f12eeSStephane Eranian .sample = process_sample_event, 326028f12eeSStephane Eranian .mmap = perf_event__process_mmap, 3275c5e854bSStephane Eranian .mmap2 = perf_event__process_mmap2, 328028f12eeSStephane Eranian .comm = perf_event__process_comm, 329028f12eeSStephane Eranian .lost = perf_event__process_lost, 330028f12eeSStephane Eranian .fork = perf_event__process_fork, 331028f12eeSStephane Eranian .build_id = perf_event__process_build_id, 3320a8cb85cSJiri Olsa .ordered_events = true, 333028f12eeSStephane Eranian }, 334028f12eeSStephane Eranian .input_name = "perf.data", 33566024122SArnaldo Carvalho de Melo /* 33666024122SArnaldo Carvalho de Melo * default to both load an store sampling 33766024122SArnaldo Carvalho de Melo */ 33866024122SArnaldo Carvalho de Melo .operation = MEM_OPERATION_LOAD | MEM_OPERATION_STORE, 339028f12eeSStephane Eranian }; 340028f12eeSStephane Eranian const struct option mem_options[] = { 34166024122SArnaldo Carvalho de Melo OPT_CALLBACK('t', "type", &mem.operation, 34267121f85SStephane Eranian "type", "memory operations(load,store) Default load,store", 34367121f85SStephane Eranian parse_mem_ops), 344028f12eeSStephane Eranian OPT_BOOLEAN('D', "dump-raw-samples", &mem.dump_raw, 345028f12eeSStephane Eranian "dump raw samples in ASCII"), 346028f12eeSStephane Eranian OPT_BOOLEAN('U', "hide-unresolved", &mem.hide_unresolved, 347028f12eeSStephane Eranian "Only display entries resolved to a symbol"), 348028f12eeSStephane Eranian OPT_STRING('i', "input", &input_name, "file", 349028f12eeSStephane Eranian "input file name"), 350028f12eeSStephane Eranian OPT_STRING('C', "cpu", &mem.cpu_list, "cpu", 351028f12eeSStephane Eranian "list of cpus to profile"), 3528b8ca6e1SWang Nan OPT_STRING_NOEMPTY('x', "field-separator", &symbol_conf.field_sep, 353028f12eeSStephane Eranian "separator", 354028f12eeSStephane Eranian "separator for columns, no spaces will be added" 355028f12eeSStephane Eranian " between columns '.' is reserved."), 35662a1a63aSYunlong Song OPT_BOOLEAN('f', "force", &mem.force, "don't complain, do it"), 357028f12eeSStephane Eranian OPT_END() 358028f12eeSStephane Eranian }; 3598d2a2a1dSRamkumar Ramachandra const char *const mem_subcommands[] = { "record", "report", NULL }; 3608d2a2a1dSRamkumar Ramachandra const char *mem_usage[] = { 3618d2a2a1dSRamkumar Ramachandra NULL, 3628d2a2a1dSRamkumar Ramachandra NULL 3638d2a2a1dSRamkumar Ramachandra }; 364028f12eeSStephane Eranian 36554fbad54SJiri Olsa if (perf_mem_events__init()) { 36654fbad54SJiri Olsa pr_err("failed: memory events not supported\n"); 36754fbad54SJiri Olsa return -1; 36854fbad54SJiri Olsa } 36954fbad54SJiri Olsa 3708d2a2a1dSRamkumar Ramachandra argc = parse_options_subcommand(argc, argv, mem_options, mem_subcommands, 3718d2a2a1dSRamkumar Ramachandra mem_usage, PARSE_OPT_STOP_AT_NON_OPTION); 372028f12eeSStephane Eranian 37366024122SArnaldo Carvalho de Melo if (!argc || !(strncmp(argv[0], "rec", 3) || mem.operation)) 374028f12eeSStephane Eranian usage_with_options(mem_usage, mem_options); 375028f12eeSStephane Eranian 376028f12eeSStephane Eranian if (!mem.input_name || !strlen(mem.input_name)) { 377028f12eeSStephane Eranian if (!fstat(STDIN_FILENO, &st) && S_ISFIFO(st.st_mode)) 378028f12eeSStephane Eranian mem.input_name = "-"; 379028f12eeSStephane Eranian else 380028f12eeSStephane Eranian mem.input_name = "perf.data"; 381028f12eeSStephane Eranian } 382028f12eeSStephane Eranian 383028f12eeSStephane Eranian if (!strncmp(argv[0], "rec", 3)) 38466024122SArnaldo Carvalho de Melo return __cmd_record(argc, argv, &mem); 385028f12eeSStephane Eranian else if (!strncmp(argv[0], "rep", 3)) 386028f12eeSStephane Eranian return report_events(argc, argv, &mem); 387028f12eeSStephane Eranian else 388028f12eeSStephane Eranian usage_with_options(mem_usage, mem_options); 389028f12eeSStephane Eranian 390028f12eeSStephane Eranian return 0; 391028f12eeSStephane Eranian } 392