[thirdparty/linux.git] / tools / perf / builtin-mem.c

// SPDX-License-Identifier: GPL-2.0
#include <inttypes.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include "builtin.h"
#include "perf.h"

#include <subcmd/parse-options.h>
#include "util/trace-event.h"
#include "util/tool.h"
#include "util/session.h"
#include "util/data.h"
#include "util/mem-events.h"
#include "util/debug.h"
#include "util/map.h"
#include "util/symbol.h"

#define MEM_OPERATION_LOAD	0x1
#define MEM_OPERATION_STORE	0x2

struct perf_mem {
	struct perf_tool	tool;
	char const		*input_name;
	bool			hide_unresolved;
	bool			dump_raw;
	bool			force;
	bool			phys_addr;
	int			operation;
	const char		*cpu_list;
	DECLARE_BITMAP(cpu_bitmap, MAX_NR_CPUS);
};

static int parse_record_events(const struct option *opt,
			       const char *str, int unset __maybe_unused)
{
	struct perf_mem *mem = *(struct perf_mem **)opt->value;
	int j;

	if (strcmp(str, "list")) {
		if (!perf_mem_events__parse(str)) {
			mem->operation = 0;
			return 0;
		}
		exit(-1);
	}

	for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) {
		struct perf_mem_event *e = &perf_mem_events[j];

		fprintf(stderr, "%-13s%-*s%s\n",
			e->tag,
			verbose > 0 ? 25 : 0,
			verbose > 0 ? perf_mem_events__name(j) : "",
			e->supported ? ": available" : "");
	}
	exit(0);
}

static const char * const __usage[] = {
	"perf mem record [<options>] [<command>]",
	"perf mem record [<options>] -- <command> [<options>]",
	NULL
};

static const char * const *record_mem_usage = __usage;

static int __cmd_record(int argc, const char **argv, struct perf_mem *mem)
{
	int rec_argc, i = 0, j;
	const char **rec_argv;
	int ret;
	bool all_user = false, all_kernel = false;
	struct option options[] = {
	OPT_CALLBACK('e', "event", &mem, "event",
		     "event selector. use 'perf mem record -e list' to list available events",
		     parse_record_events),
	OPT_UINTEGER(0, "ldlat", &perf_mem_events__loads_ldlat, "mem-loads latency"),
	OPT_INCR('v', "verbose", &verbose,
		 "be more verbose (show counter open errors, etc)"),
	OPT_BOOLEAN('U', "all-user", &all_user, "collect only user level data"),
	OPT_BOOLEAN('K', "all-kernel", &all_kernel, "collect only kernel level data"),
	OPT_END()
	};

	argc = parse_options(argc, argv, options, record_mem_usage,
			     PARSE_OPT_KEEP_UNKNOWN);

	rec_argc = argc + 9; /* max number of arguments */
	rec_argv = calloc(rec_argc + 1, sizeof(char *));
	if (!rec_argv)
		return -1;

	rec_argv[i++] = "record";

	if (mem->operation & MEM_OPERATION_LOAD)
		perf_mem_events[PERF_MEM_EVENTS__LOAD].record = true;

	if (mem->operation & MEM_OPERATION_STORE)
		perf_mem_events[PERF_MEM_EVENTS__STORE].record = true;

	if (perf_mem_events[PERF_MEM_EVENTS__LOAD].record)
		rec_argv[i++] = "-W";

	rec_argv[i++] = "-d";

	if (mem->phys_addr)
		rec_argv[i++] = "--phys-data";

	for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) {
		if (!perf_mem_events[j].record)
			continue;

		if (!perf_mem_events[j].supported) {
			pr_err("failed: event '%s' not supported\n",
			       perf_mem_events__name(j));
			free(rec_argv);
			return -1;
		}

		rec_argv[i++] = "-e";
		rec_argv[i++] = perf_mem_events__name(j);
	};

	if (all_user)
		rec_argv[i++] = "--all-user";

	if (all_kernel)
		rec_argv[i++] = "--all-kernel";

	for (j = 0; j < argc; j++, i++)
		rec_argv[i] = argv[j];

	if (verbose > 0) {
		pr_debug("calling: record ");

		while (rec_argv[j]) {
			pr_debug("%s ", rec_argv[j]);
			j++;
		}
		pr_debug("\n");
	}

	ret = cmd_record(i, rec_argv);
	free(rec_argv);
	return ret;
}

static int
dump_raw_samples(struct perf_tool *tool,
		 union perf_event *event,
		 struct perf_sample *sample,
		 struct machine *machine)
{
	struct perf_mem *mem = container_of(tool, struct perf_mem, tool);
	struct addr_location al;
	const char *fmt;

	if (machine__resolve(machine, &al, sample) < 0) {
		fprintf(stderr, "problem processing %d event, skipping it.\n",
				event->header.type);
		return -1;
	}

	if (al.filtered || (mem->hide_unresolved && al.sym == NULL))
		goto out_put;

	if (al.map != NULL)
		al.map->dso->hit = 1;

	if (mem->phys_addr) {
		if (symbol_conf.field_sep) {
			fmt = "%d%s%d%s0x%"PRIx64"%s0x%"PRIx64"%s0x%016"PRIx64
			      "%s%"PRIu64"%s0x%"PRIx64"%s%s:%s\n";
		} else {
			fmt = "%5d%s%5d%s0x%016"PRIx64"%s0x016%"PRIx64
			      "%s0x%016"PRIx64"%s%5"PRIu64"%s0x%06"PRIx64
			      "%s%s:%s\n";
			symbol_conf.field_sep = " ";
		}

		printf(fmt,
			sample->pid,
			symbol_conf.field_sep,
			sample->tid,
			symbol_conf.field_sep,
			sample->ip,
			symbol_conf.field_sep,
			sample->addr,
			symbol_conf.field_sep,
			sample->phys_addr,
			symbol_conf.field_sep,
			sample->weight,
			symbol_conf.field_sep,
			sample->data_src,
			symbol_conf.field_sep,
			al.map ? (al.map->dso ? al.map->dso->long_name : "???") : "???",
			al.sym ? al.sym->name : "???");
	} else {
		if (symbol_conf.field_sep) {
			fmt = "%d%s%d%s0x%"PRIx64"%s0x%"PRIx64"%s%"PRIu64
			      "%s0x%"PRIx64"%s%s:%s\n";
		} else {
			fmt = "%5d%s%5d%s0x%016"PRIx64"%s0x016%"PRIx64
			      "%s%5"PRIu64"%s0x%06"PRIx64"%s%s:%s\n";
			symbol_conf.field_sep = " ";
		}

		printf(fmt,
			sample->pid,
			symbol_conf.field_sep,
			sample->tid,
			symbol_conf.field_sep,
			sample->ip,
			symbol_conf.field_sep,
			sample->addr,
			symbol_conf.field_sep,
			sample->weight,
			symbol_conf.field_sep,
			sample->data_src,
			symbol_conf.field_sep,
			al.map ? (al.map->dso ? al.map->dso->long_name : "???") : "???",
			al.sym ? al.sym->name : "???");
	}
out_put:
	addr_location__put(&al);
	return 0;
}

static int process_sample_event(struct perf_tool *tool,
				union perf_event *event,
				struct perf_sample *sample,
				struct perf_evsel *evsel __maybe_unused,
				struct machine *machine)
{
	return dump_raw_samples(tool, event, sample, machine);
}

static int report_raw_events(struct perf_mem *mem)
{
	struct perf_data data = {
		.path  = input_name,
		.mode  = PERF_DATA_MODE_READ,
		.force = mem->force,
	};
	int ret;
	struct perf_session *session = perf_session__new(&data, false,
							 &mem->tool);

	if (session == NULL)
		return -1;

	if (mem->cpu_list) {
		ret = perf_session__cpu_bitmap(session, mem->cpu_list,
					       mem->cpu_bitmap);
		if (ret < 0)
			goto out_delete;
	}

	ret = symbol__init(&session->header.env);
	if (ret < 0)
		goto out_delete;

	if (mem->phys_addr)
		printf("# PID, TID, IP, ADDR, PHYS ADDR, LOCAL WEIGHT, DSRC, SYMBOL\n");
	else
		printf("# PID, TID, IP, ADDR, LOCAL WEIGHT, DSRC, SYMBOL\n");

	ret = perf_session__process_events(session);

out_delete:
	perf_session__delete(session);
	return ret;
}

static int report_events(int argc, const char **argv, struct perf_mem *mem)
{
	const char **rep_argv;
	int ret, i = 0, j, rep_argc;

	if (mem->dump_raw)
		return report_raw_events(mem);

	rep_argc = argc + 3;
	rep_argv = calloc(rep_argc + 1, sizeof(char *));
	if (!rep_argv)
		return -1;

	rep_argv[i++] = "report";
	rep_argv[i++] = "--mem-mode";
	rep_argv[i++] = "-n"; /* display number of samples */

	/*
	 * there is no weight (cost) associated with stores, so don't print
	 * the column
	 */
	if (!(mem->operation & MEM_OPERATION_LOAD)) {
		if (mem->phys_addr)
			rep_argv[i++] = "--sort=mem,sym,dso,symbol_daddr,"
					"dso_daddr,tlb,locked,phys_daddr";
		else
			rep_argv[i++] = "--sort=mem,sym,dso,symbol_daddr,"
					"dso_daddr,tlb,locked";
	} else if (mem->phys_addr)
		rep_argv[i++] = "--sort=local_weight,mem,sym,dso,symbol_daddr,"
				"dso_daddr,snoop,tlb,locked,phys_daddr";

	for (j = 1; j < argc; j++, i++)
		rep_argv[i] = argv[j];

	ret = cmd_report(i, rep_argv);
	free(rep_argv);
	return ret;
}

struct mem_mode {
	const char *name;
	int mode;
};

#define MEM_OPT(n, m) \
	{ .name = n, .mode = (m) }

#define MEM_END { .name = NULL }

static const struct mem_mode mem_modes[]={
	MEM_OPT("load", MEM_OPERATION_LOAD),
	MEM_OPT("store", MEM_OPERATION_STORE),
	MEM_END
};

static int
parse_mem_ops(const struct option *opt, const char *str, int unset)
{
	int *mode = (int *)opt->value;
	const struct mem_mode *m;
	char *s, *os = NULL, *p;
	int ret = -1;

	if (unset)
		return 0;

	/* str may be NULL in case no arg is passed to -t */
	if (str) {
		/* because str is read-only */
		s = os = strdup(str);
		if (!s)
			return -1;

		/* reset mode */
		*mode = 0;

		for (;;) {
			p = strchr(s, ',');
			if (p)
				*p = '\0';

			for (m = mem_modes; m->name; m++) {
				if (!strcasecmp(s, m->name))
					break;
			}
			if (!m->name) {
				fprintf(stderr, "unknown sampling op %s,"
					    " check man page\n", s);
				goto error;
			}

			*mode |= m->mode;

			if (!p)
				break;

			s = p + 1;
		}
	}
	ret = 0;

	if (*mode == 0)
		*mode = MEM_OPERATION_LOAD;
error:
	free(os);
	return ret;
}

int cmd_mem(int argc, const char **argv)
{
	struct stat st;
	struct perf_mem mem = {
		.tool = {
			.sample		= process_sample_event,
			.mmap		= perf_event__process_mmap,
			.mmap2		= perf_event__process_mmap2,
			.comm		= perf_event__process_comm,
			.lost		= perf_event__process_lost,
			.fork		= perf_event__process_fork,
			.build_id	= perf_event__process_build_id,
			.namespaces	= perf_event__process_namespaces,
			.ordered_events	= true,
		},
		.input_name		 = "perf.data",
		/*
		 * default to both load an store sampling
		 */
		.operation		 = MEM_OPERATION_LOAD | MEM_OPERATION_STORE,
	};
	const struct option mem_options[] = {
	OPT_CALLBACK('t', "type", &mem.operation,
		   "type", "memory operations(load,store) Default load,store",
		    parse_mem_ops),
	OPT_BOOLEAN('D', "dump-raw-samples", &mem.dump_raw,
		    "dump raw samples in ASCII"),
	OPT_BOOLEAN('U', "hide-unresolved", &mem.hide_unresolved,
		    "Only display entries resolved to a symbol"),
	OPT_STRING('i', "input", &input_name, "file",
		   "input file name"),
	OPT_STRING('C', "cpu", &mem.cpu_list, "cpu",
		   "list of cpus to profile"),
	OPT_STRING_NOEMPTY('x', "field-separator", &symbol_conf.field_sep,
		   "separator",
		   "separator for columns, no spaces will be added"
		   " between columns '.' is reserved."),
	OPT_BOOLEAN('f', "force", &mem.force, "don't complain, do it"),
	OPT_BOOLEAN('p', "phys-data", &mem.phys_addr, "Record/Report sample physical addresses"),
	OPT_END()
	};
	const char *const mem_subcommands[] = { "record", "report", NULL };
	const char *mem_usage[] = {
		NULL,
		NULL
	};

	if (perf_mem_events__init()) {
		pr_err("failed: memory events not supported\n");
		return -1;
	}

	argc = parse_options_subcommand(argc, argv, mem_options, mem_subcommands,
					mem_usage, PARSE_OPT_KEEP_UNKNOWN);

	if (!argc || !(strncmp(argv[0], "rec", 3) || mem.operation))
		usage_with_options(mem_usage, mem_options);

	if (!mem.input_name || !strlen(mem.input_name)) {
		if (!fstat(STDIN_FILENO, &st) && S_ISFIFO(st.st_mode))
			mem.input_name = "-";
		else
			mem.input_name = "perf.data";
	}

	if (!strncmp(argv[0], "rec", 3))
		return __cmd_record(argc, argv, &mem);
	else if (!strncmp(argv[0], "rep", 3))
		return report_events(argc, argv, &mem);
	else
		usage_with_options(mem_usage, mem_options);

	return 0;
}
Commit	Line	Data
b2441318	1	// SPDX-License-Identifier: GPL-2.0
fd20e811	2	#include <inttypes.h>
7a8ef4c4 ACM	3	#include <sys/types.h>
	4	#include <sys/stat.h>
	5	#include <unistd.h>
028f12ee SE	6	#include "builtin.h"
	7	#include "perf.h"
	8
4b6ab94e	9	#include <subcmd/parse-options.h>
028f12ee SE	10	#include "util/trace-event.h"
	11	#include "util/tool.h"
	12	#include "util/session.h"
f5fc1412	13	#include "util/data.h"
acbe613e	14	#include "util/mem-events.h"
ce1e22b0	15	#include "util/debug.h"
1101f69a	16	#include "util/map.h"
e7ff8920	17	#include "util/symbol.h"
028f12ee	18
67121f85 SE	19	#define MEM_OPERATION_LOAD 0x1
67121f85 SE	20	#define MEM_OPERATION_STORE 0x2
028f12ee	21
028f12ee SE	22	struct perf_mem {
	23	struct perf_tool tool;
	24	char const *input_name;
028f12ee SE	25	bool hide_unresolved;
028f12ee SE	26	bool dump_raw;
62a1a63a	27	bool force;
c35aeb9d	28	bool phys_addr;
66024122	29	int operation;
028f12ee SE	30	const char *cpu_list;
	31	DECLARE_BITMAP(cpu_bitmap, MAX_NR_CPUS);
	32	};
	33
ce1e22b0 JO	34	static int parse_record_events(const struct option *opt,
	35	const char *str, int unset __maybe_unused)
	36	{
	37	struct perf_mem mem = (struct perf_mem **)opt->value;
	38	int j;
	39
	40	if (strcmp(str, "list")) {
	41	if (!perf_mem_events__parse(str)) {
	42	mem->operation = 0;
	43	return 0;
	44	}
	45	exit(-1);
	46	}
	47
	48	for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) {
	49	struct perf_mem_event *e = &perf_mem_events[j];
	50
54fbad54 JO	51	fprintf(stderr, "%-13s%-*s%s\n",
54fbad54 JO	52	e->tag,
bb963e16 NK	53	verbose > 0 ? 25 : 0,
bb963e16 NK	54	verbose > 0 ? perf_mem_events__name(j) : "",
54fbad54	55	e->supported ? ": available" : "");
ce1e22b0 JO	56	}
	57	exit(0);
	58	}
	59
	60	static const char * const __usage[] = {
	61	"perf mem record [<options>] [<command>]",
	62	"perf mem record [<options>] -- <command> [<options>]",
	63	NULL
	64	};
	65
	66	static const char * const *record_mem_usage = __usage;
	67
66024122	68	static int __cmd_record(int argc, const char *argv, struct perf_mem mem)
028f12ee SE	69	{
	70	int rec_argc, i = 0, j;
	71	const char **rec_argv;
028f12ee	72	int ret;
ad16511b	73	bool all_user = false, all_kernel = false;
ce1e22b0 JO	74	struct option options[] = {
	75	OPT_CALLBACK('e', "event", &mem, "event",
	76	"event selector. use 'perf mem record -e list' to list available events",
	77	parse_record_events),
b0d745b3	78	OPT_UINTEGER(0, "ldlat", &perf_mem_events__loads_ldlat, "mem-loads latency"),
ce1e22b0 JO	79	OPT_INCR('v', "verbose", &verbose,
ce1e22b0 JO	80	"be more verbose (show counter open errors, etc)"),
631ac41b JO	81	OPT_BOOLEAN('U', "all-user", &all_user, "collect only user level data"),
631ac41b JO	82	OPT_BOOLEAN('K', "all-kernel", &all_kernel, "collect only kernel level data"),
ce1e22b0 JO	83	OPT_END()
	84	};
	85
	86	argc = parse_options(argc, argv, options, record_mem_usage,
a7e9eab3	87	PARSE_OPT_KEEP_UNKNOWN);
028f12ee	88
ad16511b	89	rec_argc = argc + 9; /* max number of arguments */
028f12ee SE	90	rec_argv = calloc(rec_argc + 1, sizeof(char *));
	91	if (!rec_argv)
	92	return -1;
	93
67121f85	94	rec_argv[i++] = "record";
028f12ee	95
ce1e22b0	96	if (mem->operation & MEM_OPERATION_LOAD)
acbe613e	97	perf_mem_events[PERF_MEM_EVENTS__LOAD].record = true;
ce1e22b0	98
33da54fa JO	99	if (mem->operation & MEM_OPERATION_STORE)
	100	perf_mem_events[PERF_MEM_EVENTS__STORE].record = true;
	101
ce1e22b0	102	if (perf_mem_events[PERF_MEM_EVENTS__LOAD].record)
67121f85 SE	103	rec_argv[i++] = "-W";
	104
	105	rec_argv[i++] = "-d";
	106
c35aeb9d KL	107	if (mem->phys_addr)
	108	rec_argv[i++] = "--phys-data";
	109
acbe613e JO	110	for (j = 0; j < PERF_MEM_EVENTS__MAX; j++) {
	111	if (!perf_mem_events[j].record)
	112	continue;
67121f85	113
54fbad54 JO	114	if (!perf_mem_events[j].supported) {
54fbad54 JO	115	pr_err("failed: event '%s' not supported\n",
2ba7ac58	116	perf_mem_events__name(j));
c896f85a	117	free(rec_argv);
54fbad54 JO	118	return -1;
	119	}
	120
67121f85	121	rec_argv[i++] = "-e";
2ba7ac58	122	rec_argv[i++] = perf_mem_events__name(j);
acbe613e	123	};
028f12ee	124
ad16511b JO	125	if (all_user)
	126	rec_argv[i++] = "--all-user";
	127
	128	if (all_kernel)
	129	rec_argv[i++] = "--all-kernel";
	130
ce1e22b0	131	for (j = 0; j < argc; j++, i++)
028f12ee SE	132	rec_argv[i] = argv[j];
028f12ee SE	133
ce1e22b0 JO	134	if (verbose > 0) {
	135	pr_debug("calling: record ");
	136
	137	while (rec_argv[j]) {
	138	pr_debug("%s ", rec_argv[j]);
	139	j++;
	140	}
	141	pr_debug("\n");
	142	}
	143
b0ad8ea6	144	ret = cmd_record(i, rec_argv);
028f12ee SE	145	free(rec_argv);
	146	return ret;
	147	}
	148
	149	static int
	150	dump_raw_samples(struct perf_tool *tool,
	151	union perf_event *event,
	152	struct perf_sample *sample,
028f12ee SE	153	struct machine *machine)
	154	{
	155	struct perf_mem *mem = container_of(tool, struct perf_mem, tool);
	156	struct addr_location al;
	157	const char *fmt;
	158
bb3eb566	159	if (machine__resolve(machine, &al, sample) < 0) {
028f12ee SE	160	fprintf(stderr, "problem processing %d event, skipping it.\n",
	161	event->header.type);
	162	return -1;
	163	}
	164
	165	if (al.filtered \|\| (mem->hide_unresolved && al.sym == NULL))
b91fc39f	166	goto out_put;
028f12ee SE	167
	168	if (al.map != NULL)
	169	al.map->dso->hit = 1;
	170
c35aeb9d KL	171	if (mem->phys_addr) {
	172	if (symbol_conf.field_sep) {
	173	fmt = "%d%s%d%s0x%"PRIx64"%s0x%"PRIx64"%s0x%016"PRIx64
	174	"%s%"PRIu64"%s0x%"PRIx64"%s%s:%s\n";
	175	} else {
	176	fmt = "%5d%s%5d%s0x%016"PRIx64"%s0x016%"PRIx64
	177	"%s0x%016"PRIx64"%s%5"PRIu64"%s0x%06"PRIx64
	178	"%s%s:%s\n";
	179	symbol_conf.field_sep = " ";
	180	}
	181
	182	printf(fmt,
	183	sample->pid,
	184	symbol_conf.field_sep,
	185	sample->tid,
	186	symbol_conf.field_sep,
	187	sample->ip,
	188	symbol_conf.field_sep,
	189	sample->addr,
	190	symbol_conf.field_sep,
	191	sample->phys_addr,
	192	symbol_conf.field_sep,
	193	sample->weight,
	194	symbol_conf.field_sep,
	195	sample->data_src,
	196	symbol_conf.field_sep,
	197	al.map ? (al.map->dso ? al.map->dso->long_name : "???") : "???",
	198	al.sym ? al.sym->name : "???");
028f12ee	199	} else {
c35aeb9d KL	200	if (symbol_conf.field_sep) {
	201	fmt = "%d%s%d%s0x%"PRIx64"%s0x%"PRIx64"%s%"PRIu64
	202	"%s0x%"PRIx64"%s%s:%s\n";
	203	} else {
	204	fmt = "%5d%s%5d%s0x%016"PRIx64"%s0x016%"PRIx64
	205	"%s%5"PRIu64"%s0x%06"PRIx64"%s%s:%s\n";
	206	symbol_conf.field_sep = " ";
	207	}
028f12ee	208
c35aeb9d KL	209	printf(fmt,
	210	sample->pid,
	211	symbol_conf.field_sep,
	212	sample->tid,
	213	symbol_conf.field_sep,
	214	sample->ip,
	215	symbol_conf.field_sep,
	216	sample->addr,
	217	symbol_conf.field_sep,
	218	sample->weight,
	219	symbol_conf.field_sep,
	220	sample->data_src,
	221	symbol_conf.field_sep,
	222	al.map ? (al.map->dso ? al.map->dso->long_name : "???") : "???",
	223	al.sym ? al.sym->name : "???");
	224	}
b91fc39f ACM	225	out_put:
b91fc39f ACM	226	addr_location__put(&al);
028f12ee SE	227	return 0;
	228	}
	229
	230	static int process_sample_event(struct perf_tool *tool,
	231	union perf_event *event,
	232	struct perf_sample *sample,
8b640cc4	233	struct perf_evsel *evsel __maybe_unused,
028f12ee SE	234	struct machine *machine)
028f12ee SE	235	{
8b640cc4	236	return dump_raw_samples(tool, event, sample, machine);
028f12ee SE	237	}
	238
	239	static int report_raw_events(struct perf_mem *mem)
	240	{
8ceb41d7	241	struct perf_data data = {
2d4f2799 JO	242	.path = input_name,
	243	.mode = PERF_DATA_MODE_READ,
	244	.force = mem->force,
f5fc1412	245	};
028f12ee	246	int ret;
8ceb41d7	247	struct perf_session *session = perf_session__new(&data, false,
f5fc1412	248	&mem->tool);
028f12ee SE	249
028f12ee SE	250	if (session == NULL)
52e02834	251	return -1;
028f12ee SE	252
	253	if (mem->cpu_list) {
	254	ret = perf_session__cpu_bitmap(session, mem->cpu_list,
	255	mem->cpu_bitmap);
1df9fade	256	if (ret < 0)
028f12ee SE	257	goto out_delete;
	258	}
	259
1df9fade TS	260	ret = symbol__init(&session->header.env);
	261	if (ret < 0)
	262	goto out_delete;
028f12ee	263
c35aeb9d KL	264	if (mem->phys_addr)
	265	printf("# PID, TID, IP, ADDR, PHYS ADDR, LOCAL WEIGHT, DSRC, SYMBOL\n");
	266	else
	267	printf("# PID, TID, IP, ADDR, LOCAL WEIGHT, DSRC, SYMBOL\n");
028f12ee	268
1df9fade	269	ret = perf_session__process_events(session);
028f12ee SE	270
	271	out_delete:
	272	perf_session__delete(session);
1df9fade	273	return ret;
028f12ee SE	274	}
	275
	276	static int report_events(int argc, const char *argv, struct perf_mem mem)
	277	{
	278	const char **rep_argv;
	279	int ret, i = 0, j, rep_argc;
	280
	281	if (mem->dump_raw)
	282	return report_raw_events(mem);
	283
	284	rep_argc = argc + 3;
	285	rep_argv = calloc(rep_argc + 1, sizeof(char *));
	286	if (!rep_argv)
	287	return -1;
	288
67121f85 SE	289	rep_argv[i++] = "report";
	290	rep_argv[i++] = "--mem-mode";
	291	rep_argv[i++] = "-n"; /* display number of samples */
028f12ee SE	292
	293	/*
	294	* there is no weight (cost) associated with stores, so don't print
	295	* the column
	296	*/
c35aeb9d KL	297	if (!(mem->operation & MEM_OPERATION_LOAD)) {
	298	if (mem->phys_addr)
	299	rep_argv[i++] = "--sort=mem,sym,dso,symbol_daddr,"
	300	"dso_daddr,tlb,locked,phys_daddr";
	301	else
	302	rep_argv[i++] = "--sort=mem,sym,dso,symbol_daddr,"
	303	"dso_daddr,tlb,locked";
	304	} else if (mem->phys_addr)
	305	rep_argv[i++] = "--sort=local_weight,mem,sym,dso,symbol_daddr,"
	306	"dso_daddr,snoop,tlb,locked,phys_daddr";
028f12ee SE	307
	308	for (j = 1; j < argc; j++, i++)
	309	rep_argv[i] = argv[j];
	310
b0ad8ea6	311	ret = cmd_report(i, rep_argv);
028f12ee SE	312	free(rep_argv);
	313	return ret;
	314	}
	315
67121f85 SE	316	struct mem_mode {
	317	const char *name;
	318	int mode;
	319	};
	320
	321	#define MEM_OPT(n, m) \
	322	{ .name = n, .mode = (m) }
	323
	324	#define MEM_END { .name = NULL }
	325
	326	static const struct mem_mode mem_modes[]={
	327	MEM_OPT("load", MEM_OPERATION_LOAD),
	328	MEM_OPT("store", MEM_OPERATION_STORE),
	329	MEM_END
	330	};
	331
	332	static int
	333	parse_mem_ops(const struct option opt, const char str, int unset)
	334	{
	335	int mode = (int )opt->value;
	336	const struct mem_mode *m;
	337	char s, os = NULL, *p;
	338	int ret = -1;
	339
	340	if (unset)
	341	return 0;
	342
	343	/* str may be NULL in case no arg is passed to -t */
	344	if (str) {
	345	/* because str is read-only */
	346	s = os = strdup(str);
	347	if (!s)
	348	return -1;
	349
	350	/* reset mode */
	351	*mode = 0;
	352
	353	for (;;) {
	354	p = strchr(s, ',');
	355	if (p)
	356	*p = '\0';
	357
	358	for (m = mem_modes; m->name; m++) {
	359	if (!strcasecmp(s, m->name))
	360	break;
	361	}
	362	if (!m->name) {
	363	fprintf(stderr, "unknown sampling op %s,"
	364	" check man page\n", s);
	365	goto error;
	366	}
	367
	368	*mode \|= m->mode;
	369
	370	if (!p)
	371	break;
	372
	373	s = p + 1;
	374	}
	375	}
	376	ret = 0;
	377
	378	if (*mode == 0)
	379	*mode = MEM_OPERATION_LOAD;
380	error:
381	free(os);
382	return ret;
383	}
384
b0ad8ea6	385	int cmd_mem(int argc, const char **argv)
028f12ee SE	386	{
	387	struct stat st;
	388	struct perf_mem mem = {
	389	.tool = {
	390	.sample = process_sample_event,
	391	.mmap = perf_event__process_mmap,
5c5e854b	392	.mmap2 = perf_event__process_mmap2,
028f12ee SE	393	.comm = perf_event__process_comm,
	394	.lost = perf_event__process_lost,
	395	.fork = perf_event__process_fork,
	396	.build_id = perf_event__process_build_id,
f3b3614a	397	.namespaces = perf_event__process_namespaces,
0a8cb85c	398	.ordered_events = true,
028f12ee SE	399	},
028f12ee SE	400	.input_name = "perf.data",
66024122 ACM	401	/*
	402	* default to both load an store sampling
	403	*/
	404	.operation = MEM_OPERATION_LOAD \| MEM_OPERATION_STORE,
028f12ee SE	405	};
028f12ee SE	406	const struct option mem_options[] = {
66024122	407	OPT_CALLBACK('t', "type", &mem.operation,
67121f85 SE	408	"type", "memory operations(load,store) Default load,store",
67121f85 SE	409	parse_mem_ops),
028f12ee SE	410	OPT_BOOLEAN('D', "dump-raw-samples", &mem.dump_raw,
	411	"dump raw samples in ASCII"),
	412	OPT_BOOLEAN('U', "hide-unresolved", &mem.hide_unresolved,
	413	"Only display entries resolved to a symbol"),
	414	OPT_STRING('i', "input", &input_name, "file",
	415	"input file name"),
	416	OPT_STRING('C', "cpu", &mem.cpu_list, "cpu",
	417	"list of cpus to profile"),
8b8ca6e1	418	OPT_STRING_NOEMPTY('x', "field-separator", &symbol_conf.field_sep,
028f12ee SE	419	"separator",
	420	"separator for columns, no spaces will be added"
	421	" between columns '.' is reserved."),
62a1a63a	422	OPT_BOOLEAN('f', "force", &mem.force, "don't complain, do it"),
c35aeb9d	423	OPT_BOOLEAN('p', "phys-data", &mem.phys_addr, "Record/Report sample physical addresses"),
028f12ee SE	424	OPT_END()
028f12ee SE	425	};
8d2a2a1d RR	426	const char *const mem_subcommands[] = { "record", "report", NULL };
	427	const char *mem_usage[] = {
	428	NULL,
	429	NULL
	430	};
	431
54fbad54 JO	432	if (perf_mem_events__init()) {
	433	pr_err("failed: memory events not supported\n");
	434	return -1;
	435	}
	436
8d2a2a1d	437	argc = parse_options_subcommand(argc, argv, mem_options, mem_subcommands,
a7e9eab3	438	mem_usage, PARSE_OPT_KEEP_UNKNOWN);
028f12ee	439
66024122	440	if (!argc \|\| !(strncmp(argv[0], "rec", 3) \|\| mem.operation))
028f12ee SE	441	usage_with_options(mem_usage, mem_options);
	442
	443	if (!mem.input_name \|\| !strlen(mem.input_name)) {
	444	if (!fstat(STDIN_FILENO, &st) && S_ISFIFO(st.st_mode))
	445	mem.input_name = "-";
	446	else
	447	mem.input_name = "perf.data";
	448	}
	449
	450	if (!strncmp(argv[0], "rec", 3))
66024122	451	return __cmd_record(argc, argv, &mem);
028f12ee SE	452	else if (!strncmp(argv[0], "rep", 3))
	453	return report_events(argc, argv, &mem);
	454	else
	455	usage_with_options(mem_usage, mem_options);
	456
	457	return 0;
	458	}