[linux-2.6-block.git] / tools / perf / perf.c

// SPDX-License-Identifier: GPL-2.0
/*
 * perf.c
 *
 * Performance analysis utility.
 *
 * This is the main hub from which the sub-commands (perf stat,
 * perf top, perf record, perf report, etc.) are started.
 */
#include "builtin.h"

#include "util/env.h"
#include <subcmd/exec-cmd.h>
#include "util/config.h"
#include <subcmd/run-command.h>
#include "util/parse-events.h"
#include <subcmd/parse-options.h>
#include "util/bpf-loader.h"
#include "util/debug.h"
#include "util/event.h"
#include <api/fs/fs.h>
#include <api/fs/tracing_path.h>
#include <errno.h>
#include <pthread.h>
#include <signal.h>
#include <stdlib.h>
#include <time.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include <linux/kernel.h>

const char perf_usage_string[] =
	"perf [--version] [--help] [OPTIONS] COMMAND [ARGS]";

const char perf_more_info_string[] =
	"See 'perf help COMMAND' for more information on a specific command.";

static int use_pager = -1;
const char *input_name;

struct cmd_struct {
	const char *cmd;
	int (*fn)(int, const char **);
	int option;
};

static struct cmd_struct commands[] = {
	{ "buildid-cache", cmd_buildid_cache, 0 },
	{ "buildid-list", cmd_buildid_list, 0 },
	{ "config",	cmd_config,	0 },
	{ "c2c",	cmd_c2c,	0 },
	{ "diff",	cmd_diff,	0 },
	{ "evlist",	cmd_evlist,	0 },
	{ "help",	cmd_help,	0 },
	{ "kallsyms",	cmd_kallsyms,	0 },
	{ "list",	cmd_list,	0 },
	{ "record",	cmd_record,	0 },
	{ "report",	cmd_report,	0 },
	{ "bench",	cmd_bench,	0 },
	{ "stat",	cmd_stat,	0 },
	{ "timechart",	cmd_timechart,	0 },
	{ "top",	cmd_top,	0 },
	{ "annotate",	cmd_annotate,	0 },
	{ "version",	cmd_version,	0 },
	{ "script",	cmd_script,	0 },
	{ "sched",	cmd_sched,	0 },
#ifdef HAVE_LIBELF_SUPPORT
	{ "probe",	cmd_probe,	0 },
#endif
	{ "kmem",	cmd_kmem,	0 },
	{ "lock",	cmd_lock,	0 },
	{ "kvm",	cmd_kvm,	0 },
	{ "test",	cmd_test,	0 },
#if defined(HAVE_LIBAUDIT_SUPPORT) || defined(HAVE_SYSCALL_TABLE_SUPPORT)
	{ "trace",	cmd_trace,	0 },
#endif
	{ "inject",	cmd_inject,	0 },
	{ "mem",	cmd_mem,	0 },
	{ "data",	cmd_data,	0 },
	{ "ftrace",	cmd_ftrace,	0 },
};

struct pager_config {
	const char *cmd;
	int val;
};

static int pager_command_config(const char *var, const char *value, void *data)
{
	struct pager_config *c = data;
	if (strstarts(var, "pager.") && !strcmp(var + 6, c->cmd))
		c->val = perf_config_bool(var, value);
	return 0;
}

/* returns 0 for "no pager", 1 for "use pager", and -1 for "not specified" */
static int check_pager_config(const char *cmd)
{
	int err;
	struct pager_config c;
	c.cmd = cmd;
	c.val = -1;
	err = perf_config(pager_command_config, &c);
	return err ?: c.val;
}

static int browser_command_config(const char *var, const char *value, void *data)
{
	struct pager_config *c = data;
	if (strstarts(var, "tui.") && !strcmp(var + 4, c->cmd))
		c->val = perf_config_bool(var, value);
	if (strstarts(var, "gtk.") && !strcmp(var + 4, c->cmd))
		c->val = perf_config_bool(var, value) ? 2 : 0;
	return 0;
}

/*
 * returns 0 for "no tui", 1 for "use tui", 2 for "use gtk",
 * and -1 for "not specified"
 */
static int check_browser_config(const char *cmd)
{
	int err;
	struct pager_config c;
	c.cmd = cmd;
	c.val = -1;
	err = perf_config(browser_command_config, &c);
	return err ?: c.val;
}

static void commit_pager_choice(void)
{
	switch (use_pager) {
	case 0:
		setenv(PERF_PAGER_ENVIRONMENT, "cat", 1);
		break;
	case 1:
		/* setup_pager(); */
		break;
	default:
		break;
	}
}

struct option options[] = {
	OPT_ARGUMENT("help", "help"),
	OPT_ARGUMENT("version", "version"),
	OPT_ARGUMENT("exec-path", "exec-path"),
	OPT_ARGUMENT("html-path", "html-path"),
	OPT_ARGUMENT("paginate", "paginate"),
	OPT_ARGUMENT("no-pager", "no-pager"),
	OPT_ARGUMENT("debugfs-dir", "debugfs-dir"),
	OPT_ARGUMENT("buildid-dir", "buildid-dir"),
	OPT_ARGUMENT("list-cmds", "list-cmds"),
	OPT_ARGUMENT("list-opts", "list-opts"),
	OPT_ARGUMENT("debug", "debug"),
	OPT_END()
};

static int handle_options(const char ***argv, int *argc, int *envchanged)
{
	int handled = 0;

	while (*argc > 0) {
		const char *cmd = (*argv)[0];
		if (cmd[0] != '-')
			break;

		/*
		 * For legacy reasons, the "version" and "help"
		 * commands can be written with "--" prepended
		 * to make them look like flags.
		 */
		if (!strcmp(cmd, "--help") || !strcmp(cmd, "--version"))
			break;

		/*
		 * Shortcut for '-h' and '-v' options to invoke help
		 * and version command.
		 */
		if (!strcmp(cmd, "-h")) {
			(*argv)[0] = "--help";
			break;
		}

		if (!strcmp(cmd, "-v")) {
			(*argv)[0] = "--version";
			break;
		}

		if (!strcmp(cmd, "-vv")) {
			(*argv)[0] = "version";
			version_verbose = 1;
			break;
		}

		/*
		 * Check remaining flags.
		 */
		if (strstarts(cmd, CMD_EXEC_PATH)) {
			cmd += strlen(CMD_EXEC_PATH);
			if (*cmd == '=')
				set_argv_exec_path(cmd + 1);
			else {
				puts(get_argv_exec_path());
				exit(0);
			}
		} else if (!strcmp(cmd, "--html-path")) {
			puts(system_path(PERF_HTML_PATH));
			exit(0);
		} else if (!strcmp(cmd, "-p") || !strcmp(cmd, "--paginate")) {
			use_pager = 1;
		} else if (!strcmp(cmd, "--no-pager")) {
			use_pager = 0;
			if (envchanged)
				*envchanged = 1;
		} else if (!strcmp(cmd, "--debugfs-dir")) {
			if (*argc < 2) {
				fprintf(stderr, "No directory given for --debugfs-dir.\n");
				usage(perf_usage_string);
			}
			tracing_path_set((*argv)[1]);
			if (envchanged)
				*envchanged = 1;
			(*argv)++;
			(*argc)--;
		} else if (!strcmp(cmd, "--buildid-dir")) {
			if (*argc < 2) {
				fprintf(stderr, "No directory given for --buildid-dir.\n");
				usage(perf_usage_string);
			}
			set_buildid_dir((*argv)[1]);
			if (envchanged)
				*envchanged = 1;
			(*argv)++;
			(*argc)--;
		} else if (strstarts(cmd, CMD_DEBUGFS_DIR)) {
			tracing_path_set(cmd + strlen(CMD_DEBUGFS_DIR));
			fprintf(stderr, "dir: %s\n", tracing_path_mount());
			if (envchanged)
				*envchanged = 1;
		} else if (!strcmp(cmd, "--list-cmds")) {
			unsigned int i;

			for (i = 0; i < ARRAY_SIZE(commands); i++) {
				struct cmd_struct *p = commands+i;
				printf("%s ", p->cmd);
			}
			putchar('\n');
			exit(0);
		} else if (!strcmp(cmd, "--list-opts")) {
			unsigned int i;

			for (i = 0; i < ARRAY_SIZE(options)-1; i++) {
				struct option *p = options+i;
				printf("--%s ", p->long_name);
			}
			putchar('\n');
			exit(0);
		} else if (!strcmp(cmd, "--debug")) {
			if (*argc < 2) {
				fprintf(stderr, "No variable specified for --debug.\n");
				usage(perf_usage_string);
			}
			if (perf_debug_option((*argv)[1]))
				usage(perf_usage_string);

			(*argv)++;
			(*argc)--;
		} else {
			fprintf(stderr, "Unknown option: %s\n", cmd);
			usage(perf_usage_string);
		}

		(*argv)++;
		(*argc)--;
		handled++;
	}
	return handled;
}

#define RUN_SETUP	(1<<0)
#define USE_PAGER	(1<<1)

static int run_builtin(struct cmd_struct *p, int argc, const char **argv)
{
	int status;
	struct stat st;
	char sbuf[STRERR_BUFSIZE];

	if (use_browser == -1)
		use_browser = check_browser_config(p->cmd);

	if (use_pager == -1 && p->option & RUN_SETUP)
		use_pager = check_pager_config(p->cmd);
	if (use_pager == -1 && p->option & USE_PAGER)
		use_pager = 1;
	commit_pager_choice();

	perf_env__set_cmdline(&perf_env, argc, argv);
	status = p->fn(argc, argv);
	perf_config__exit();
	exit_browser(status);
	perf_env__exit(&perf_env);
	bpf__clear();

	if (status)
		return status & 0xff;

	/* Somebody closed stdout? */
	if (fstat(fileno(stdout), &st))
		return 0;
	/* Ignore write errors for pipes and sockets.. */
	if (S_ISFIFO(st.st_mode) || S_ISSOCK(st.st_mode))
		return 0;

	status = 1;
	/* Check for ENOSPC and EIO errors.. */
	if (fflush(stdout)) {
		fprintf(stderr, "write failure on standard output: %s",
			str_error_r(errno, sbuf, sizeof(sbuf)));
		goto out;
	}
	if (ferror(stdout)) {
		fprintf(stderr, "unknown write failure on standard output");
		goto out;
	}
	if (fclose(stdout)) {
		fprintf(stderr, "close failed on standard output: %s",
			str_error_r(errno, sbuf, sizeof(sbuf)));
		goto out;
	}
	status = 0;
out:
	return status;
}

static void handle_internal_command(int argc, const char **argv)
{
	const char *cmd = argv[0];
	unsigned int i;

	/* Turn "perf cmd --help" into "perf help cmd" */
	if (argc > 1 && !strcmp(argv[1], "--help")) {
		argv[1] = argv[0];
		argv[0] = cmd = "help";
	}

	for (i = 0; i < ARRAY_SIZE(commands); i++) {
		struct cmd_struct *p = commands+i;
		if (strcmp(p->cmd, cmd))
			continue;
		exit(run_builtin(p, argc, argv));
	}
}

static void execv_dashed_external(const char **argv)
{
	char *cmd;
	const char *tmp;
	int status;

	if (asprintf(&cmd, "perf-%s", argv[0]) < 0)
		goto do_die;

	/*
	 * argv[0] must be the perf command, but the argv array
	 * belongs to the caller, and may be reused in
	 * subsequent loop iterations. Save argv[0] and
	 * restore it on error.
	 */
	tmp = argv[0];
	argv[0] = cmd;

	/*
	 * if we fail because the command is not found, it is
	 * OK to return. Otherwise, we just pass along the status code.
	 */
	status = run_command_v_opt(argv, 0);
	if (status != -ERR_RUN_COMMAND_EXEC) {
		if (IS_RUN_COMMAND_ERR(status)) {
do_die:
			pr_err("FATAL: unable to run '%s'", argv[0]);
			status = -128;
		}
		exit(-status);
	}
	errno = ENOENT; /* as if we called execvp */

	argv[0] = tmp;
	zfree(&cmd);
}

static int run_argv(int *argcp, const char ***argv)
{
	/* See if it's an internal command */
	handle_internal_command(*argcp, *argv);

	/* .. then try the external ones */
	execv_dashed_external(*argv);
	return 0;
}

static void pthread__block_sigwinch(void)
{
	sigset_t set;

	sigemptyset(&set);
	sigaddset(&set, SIGWINCH);
	pthread_sigmask(SIG_BLOCK, &set, NULL);
}

void pthread__unblock_sigwinch(void)
{
	sigset_t set;

	sigemptyset(&set);
	sigaddset(&set, SIGWINCH);
	pthread_sigmask(SIG_UNBLOCK, &set, NULL);
}

int main(int argc, const char **argv)
{
	int err;
	const char *cmd;
	char sbuf[STRERR_BUFSIZE];

	/* libsubcmd init */
	exec_cmd_init("perf", PREFIX, PERF_EXEC_PATH, EXEC_PATH_ENVIRONMENT);
	pager_init(PERF_PAGER_ENVIRONMENT);

	/* The page_size is placed in util object. */
	page_size = sysconf(_SC_PAGE_SIZE);

	cmd = extract_argv0_path(argv[0]);
	if (!cmd)
		cmd = "perf-help";

	srandom(time(NULL));

	err = perf_config(perf_default_config, NULL);
	if (err)
		return err;
	set_buildid_dir(NULL);

	/*
	 * "perf-xxxx" is the same as "perf xxxx", but we obviously:
	 *
	 *  - cannot take flags in between the "perf" and the "xxxx".
	 *  - cannot execute it externally (since it would just do
	 *    the same thing over again)
	 *
	 * So we just directly call the internal command handler. If that one
	 * fails to handle this, then maybe we just run a renamed perf binary
	 * that contains a dash in its name. To handle this scenario, we just
	 * fall through and ignore the "xxxx" part of the command string.
	 */
	if (strstarts(cmd, "perf-")) {
		cmd += 5;
		argv[0] = cmd;
		handle_internal_command(argc, argv);
		/*
		 * If the command is handled, the above function does not
		 * return undo changes and fall through in such a case.
		 */
		cmd -= 5;
		argv[0] = cmd;
	}
	if (strstarts(cmd, "trace")) {
#if defined(HAVE_LIBAUDIT_SUPPORT) || defined(HAVE_SYSCALL_TABLE_SUPPORT)
		setup_path();
		argv[0] = "trace";
		return cmd_trace(argc, argv);
#else
		fprintf(stderr,
			"trace command not available: missing audit-libs devel package at build time.\n");
		goto out;
#endif
	}
	/* Look for flags.. */
	argv++;
	argc--;
	handle_options(&argv, &argc, NULL);
	commit_pager_choice();

	if (argc > 0) {
		if (strstarts(argv[0], "--"))
			argv[0] += 2;
	} else {
		/* The user didn't specify a command; give them help */
		printf("\n usage: %s\n\n", perf_usage_string);
		list_common_cmds_help();
		printf("\n %s\n\n", perf_more_info_string);
		goto out;
	}
	cmd = argv[0];

	test_attr__init();

	/*
	 * We use PATH to find perf commands, but we prepend some higher
	 * precedence paths: the "--exec-path" option, the PERF_EXEC_PATH
	 * environment, and the $(perfexecdir) from the Makefile at build
	 * time.
	 */
	setup_path();
	/*
	 * Block SIGWINCH notifications so that the thread that wants it can
	 * unblock and get syscalls like select interrupted instead of waiting
	 * forever while the signal goes to some other non interested thread.
	 */
	pthread__block_sigwinch();

	perf_debug_setup();

	while (1) {
		static int done_help;

		run_argv(&argc, &argv);

		if (errno != ENOENT)
			break;

		if (!done_help) {
			cmd = argv[0] = help_unknown_cmd(cmd);
			done_help = 1;
		} else
			break;
	}

	fprintf(stderr, "Failed to run command '%s': %s\n",
		cmd, str_error_r(errno, sbuf, sizeof(sbuf)));
out:
	return 1;
}
Commit	Line	Data
b2441318	1	// SPDX-License-Identifier: GPL-2.0
bf9e1876 IM	2	/*
	3	* perf.c
	4	*
	5	* Performance analysis utility.
	6	*
	7	* This is the main hub from which the sub-commands (perf stat,
	8	* perf top, perf record, perf report, etc.) are started.
	9	*/
07800601	10	#include "builtin.h"
bf9e1876	11
aa36ddd7	12	#include "util/env.h"
4b6ab94e	13	#include <subcmd/exec-cmd.h>
41840d21	14	#include "util/config.h"
4b6ab94e	15	#include <subcmd/run-command.h>
5beeded1	16	#include "util/parse-events.h"
4b6ab94e	17	#include <subcmd/parse-options.h>
84c86ca1	18	#include "util/bpf-loader.h"
bbb2cea7	19	#include "util/debug.h"
5ab8c689	20	#include "util/event.h"
4cb93446	21	#include <api/fs/fs.h>
592d5a6b	22	#include <api/fs/tracing_path.h>
a43783ae	23	#include <errno.h>
27683dc5	24	#include <pthread.h>
9607ad3a	25	#include <signal.h>
14cbfbeb NK	26	#include <stdlib.h>
14cbfbeb NK	27	#include <time.h>
7a8ef4c4 ACM	28	#include <sys/types.h>
	29	#include <sys/stat.h>
	30	#include <unistd.h>
877a7a11	31	#include <linux/kernel.h>
07800601 IM	32
07800601 IM	33	const char perf_usage_string[] =
78a1b503	34	"perf [--version] [--help] [OPTIONS] COMMAND [ARGS]";
07800601 IM	35
	36	const char perf_more_info_string[] =
	37	"See 'perf help COMMAND' for more information on a specific command.";
	38
	39	static int use_pager = -1;
70cb4e96	40	const char *input_name;
5d06e691	41
98a4179c FW	42	struct cmd_struct {
98a4179c FW	43	const char *cmd;
b0ad8ea6	44	int (fn)(int, const char *);
98a4179c FW	45	int option;
	46	};
	47
	48	static struct cmd_struct commands[] = {
	49	{ "buildid-cache", cmd_buildid_cache, 0 },
	50	{ "buildid-list", cmd_buildid_list, 0 },
30862f2c	51	{ "config", cmd_config, 0 },
7aef3bf3	52	{ "c2c", cmd_c2c, 0 },
98a4179c FW	53	{ "diff", cmd_diff, 0 },
	54	{ "evlist", cmd_evlist, 0 },
	55	{ "help", cmd_help, 0 },
35563771	56	{ "kallsyms", cmd_kallsyms, 0 },
98a4179c FW	57	{ "list", cmd_list, 0 },
	58	{ "record", cmd_record, 0 },
	59	{ "report", cmd_report, 0 },
	60	{ "bench", cmd_bench, 0 },
	61	{ "stat", cmd_stat, 0 },
	62	{ "timechart", cmd_timechart, 0 },
	63	{ "top", cmd_top, 0 },
	64	{ "annotate", cmd_annotate, 0 },
	65	{ "version", cmd_version, 0 },
	66	{ "script", cmd_script, 0 },
	67	{ "sched", cmd_sched, 0 },
89fe808a	68	#ifdef HAVE_LIBELF_SUPPORT
98a4179c	69	{ "probe", cmd_probe, 0 },
393be2e3	70	#endif
98a4179c FW	71	{ "kmem", cmd_kmem, 0 },
	72	{ "lock", cmd_lock, 0 },
	73	{ "kvm", cmd_kvm, 0 },
	74	{ "test", cmd_test, 0 },
22e9af4e	75	#if defined(HAVE_LIBAUDIT_SUPPORT) \|\| defined(HAVE_SYSCALL_TABLE_SUPPORT)
514f1c67	76	{ "trace", cmd_trace, 0 },
4d29089c	77	#endif
98a4179c	78	{ "inject", cmd_inject, 0 },
028f12ee	79	{ "mem", cmd_mem, 0 },
2245bf14	80	{ "data", cmd_data, 0 },
d01f4e8d	81	{ "ftrace", cmd_ftrace, 0 },
98a4179c FW	82	};
98a4179c FW	83
07800601 IM	84	struct pager_config {
	85	const char *cmd;
	86	int val;
	87	};
	88
	89	static int pager_command_config(const char var, const char value, void *data)
	90	{
	91	struct pager_config *c = data;
8e99b6d4	92	if (strstarts(var, "pager.") && !strcmp(var + 6, c->cmd))
07800601 IM	93	c->val = perf_config_bool(var, value);
	94	return 0;
	95	}
	96
	97	/* returns 0 for "no pager", 1 for "use pager", and -1 for "not specified" */
a3b70b3b	98	static int check_pager_config(const char *cmd)
07800601	99	{
ecc4c561	100	int err;
07800601 IM	101	struct pager_config c;
	102	c.cmd = cmd;
	103	c.val = -1;
ecc4c561 ACM	104	err = perf_config(pager_command_config, &c);
ecc4c561 ACM	105	return err ?: c.val;
07800601 IM	106	}
07800601 IM	107
0020ce23	108	static int browser_command_config(const char var, const char value, void *data)
5d06e691 ACM	109	{
5d06e691 ACM	110	struct pager_config *c = data;
8e99b6d4	111	if (strstarts(var, "tui.") && !strcmp(var + 4, c->cmd))
5d06e691	112	c->val = perf_config_bool(var, value);
8e99b6d4	113	if (strstarts(var, "gtk.") && !strcmp(var + 4, c->cmd))
0020ce23	114	c->val = perf_config_bool(var, value) ? 2 : 0;
5d06e691 ACM	115	return 0;
	116	}
	117
0020ce23 NK	118	/*
	119	* returns 0 for "no tui", 1 for "use tui", 2 for "use gtk",
	120	* and -1 for "not specified"
	121	*/
	122	static int check_browser_config(const char *cmd)
5d06e691	123	{
ecc4c561	124	int err;
5d06e691 ACM	125	struct pager_config c;
	126	c.cmd = cmd;
	127	c.val = -1;
ecc4c561 ACM	128	err = perf_config(browser_command_config, &c);
ecc4c561 ACM	129	return err ?: c.val;
5d06e691 ACM	130	}
5d06e691 ACM	131
4c574159 TF	132	static void commit_pager_choice(void)
4c574159 TF	133	{
07800601 IM	134	switch (use_pager) {
07800601 IM	135	case 0:
096d3558	136	setenv(PERF_PAGER_ENVIRONMENT, "cat", 1);
07800601 IM	137	break;
	138	case 1:
	139	/* setup_pager(); */
	140	break;
	141	default:
	142	break;
	143	}
	144	}
	145
7335399a YS	146	struct option options[] = {
	147	OPT_ARGUMENT("help", "help"),
	148	OPT_ARGUMENT("version", "version"),
	149	OPT_ARGUMENT("exec-path", "exec-path"),
	150	OPT_ARGUMENT("html-path", "html-path"),
	151	OPT_ARGUMENT("paginate", "paginate"),
	152	OPT_ARGUMENT("no-pager", "no-pager"),
7335399a YS	153	OPT_ARGUMENT("debugfs-dir", "debugfs-dir"),
	154	OPT_ARGUMENT("buildid-dir", "buildid-dir"),
	155	OPT_ARGUMENT("list-cmds", "list-cmds"),
	156	OPT_ARGUMENT("list-opts", "list-opts"),
	157	OPT_ARGUMENT("debug", "debug"),
	158	OPT_END()
	159	};
	160
4c574159	161	static int handle_options(const char **argv, int argc, int *envchanged)
07800601 IM	162	{
	163	int handled = 0;
	164
	165	while (*argc > 0) {
	166	const char cmd = (argv)[0];
	167	if (cmd[0] != '-')
	168	break;
	169
	170	/*
	171	* For legacy reasons, the "version" and "help"
	172	* commands can be written with "--" prepended
	173	* to make them look like flags.
	174	*/
	175	if (!strcmp(cmd, "--help") \|\| !strcmp(cmd, "--version"))
	176	break;
	177
a1853e2c JO	178	/*
	179	* Shortcut for '-h' and '-v' options to invoke help
	180	* and version command.
	181	*/
	182	if (!strcmp(cmd, "-h")) {
	183	(*argv)[0] = "--help";
	184	break;
	185	}
	186
	187	if (!strcmp(cmd, "-v")) {
	188	(*argv)[0] = "--version";
	189	break;
	190	}
	191
3aa94b10 JY	192	if (!strcmp(cmd, "-vv")) {
	193	(*argv)[0] = "version";
	194	version_verbose = 1;
	195	break;
	196	}
	197
07800601 IM	198	/*
	199	* Check remaining flags.
	200	*/
8e99b6d4	201	if (strstarts(cmd, CMD_EXEC_PATH)) {
cfed95a6	202	cmd += strlen(CMD_EXEC_PATH);
07800601	203	if (*cmd == '=')
46113a54	204	set_argv_exec_path(cmd + 1);
07800601	205	else {
46113a54	206	puts(get_argv_exec_path());
07800601 IM	207	exit(0);
	208	}
	209	} else if (!strcmp(cmd, "--html-path")) {
	210	puts(system_path(PERF_HTML_PATH));
	211	exit(0);
	212	} else if (!strcmp(cmd, "-p") \|\| !strcmp(cmd, "--paginate")) {
	213	use_pager = 1;
	214	} else if (!strcmp(cmd, "--no-pager")) {
	215	use_pager = 0;
	216	if (envchanged)
	217	*envchanged = 1;
5beeded1 JB	218	} else if (!strcmp(cmd, "--debugfs-dir")) {
	219	if (*argc < 2) {
	220	fprintf(stderr, "No directory given for --debugfs-dir.\n");
	221	usage(perf_usage_string);
	222	}
65d4b265	223	tracing_path_set((*argv)[1]);
5beeded1 JB	224	if (envchanged)
	225	*envchanged = 1;
	226	(*argv)++;
	227	(*argc)--;
99ce8e9f JO	228	} else if (!strcmp(cmd, "--buildid-dir")) {
	229	if (*argc < 2) {
	230	fprintf(stderr, "No directory given for --buildid-dir.\n");
	231	usage(perf_usage_string);
	232	}
	233	set_buildid_dir((*argv)[1]);
	234	if (envchanged)
	235	*envchanged = 1;
	236	(*argv)++;
	237	(*argc)--;
8e99b6d4	238	} else if (strstarts(cmd, CMD_DEBUGFS_DIR)) {
65d4b265	239	tracing_path_set(cmd + strlen(CMD_DEBUGFS_DIR));
17c257e8	240	fprintf(stderr, "dir: %s\n", tracing_path_mount());
5beeded1 JB	241	if (envchanged)
5beeded1 JB	242	*envchanged = 1;
98a4179c FW	243	} else if (!strcmp(cmd, "--list-cmds")) {
	244	unsigned int i;
	245
	246	for (i = 0; i < ARRAY_SIZE(commands); i++) {
	247	struct cmd_struct *p = commands+i;
	248	printf("%s ", p->cmd);
	249	}
ed457520	250	putchar('\n');
98a4179c	251	exit(0);
7335399a YS	252	} else if (!strcmp(cmd, "--list-opts")) {
	253	unsigned int i;
	254
	255	for (i = 0; i < ARRAY_SIZE(options)-1; i++) {
	256	struct option *p = options+i;
	257	printf("--%s ", p->long_name);
	258	}
	259	putchar('\n');
	260	exit(0);
bbb2cea7 JO	261	} else if (!strcmp(cmd, "--debug")) {
	262	if (*argc < 2) {
	263	fprintf(stderr, "No variable specified for --debug.\n");
	264	usage(perf_usage_string);
	265	}
	266	if (perf_debug_option((*argv)[1]))
	267	usage(perf_usage_string);
	268
	269	(*argv)++;
	270	(*argc)--;
07800601 IM	271	} else {
	272	fprintf(stderr, "Unknown option: %s\n", cmd);
	273	usage(perf_usage_string);
	274	}
	275
	276	(*argv)++;
	277	(*argc)--;
	278	handled++;
	279	}
	280	return handled;
	281	}
	282
07800601 IM	283	#define RUN_SETUP (1<<0)
07800601 IM	284	#define USE_PAGER (1<<1)
07800601	285
07800601 IM	286	static int run_builtin(struct cmd_struct p, int argc, const char *argv)
	287	{
	288	int status;
	289	struct stat st;
b2348e1d	290	char sbuf[STRERR_BUFSIZE];
07800601	291
5d06e691	292	if (use_browser == -1)
0020ce23	293	use_browser = check_browser_config(p->cmd);
5d06e691	294
07800601 IM	295	if (use_pager == -1 && p->option & RUN_SETUP)
	296	use_pager = check_pager_config(p->cmd);
	297	if (use_pager == -1 && p->option & USE_PAGER)
	298	use_pager = 1;
	299	commit_pager_choice();
	300
2bdb2c27	301	perf_env__set_cmdline(&perf_env, argc, argv);
b0ad8ea6	302	status = p->fn(argc, argv);
8a0a9c7e	303	perf_config__exit();
f3a1f0ea	304	exit_browser(status);
aa36ddd7	305	perf_env__exit(&perf_env);
84c86ca1	306	bpf__clear();
f3a1f0ea	307
07800601 IM	308	if (status)
	309	return status & 0xff;
	310
	311	/* Somebody closed stdout? */
	312	if (fstat(fileno(stdout), &st))
	313	return 0;
	314	/* Ignore write errors for pipes and sockets.. */
	315	if (S_ISFIFO(st.st_mode) \|\| S_ISSOCK(st.st_mode))
	316	return 0;
	317
2a16bf8c	318	status = 1;
07800601	319	/* Check for ENOSPC and EIO errors.. */
2a16bf8c	320	if (fflush(stdout)) {
b2348e1d	321	fprintf(stderr, "write failure on standard output: %s",
c8b5f2c9	322	str_error_r(errno, sbuf, sizeof(sbuf)));
2a16bf8c ACM	323	goto out;
	324	}
	325	if (ferror(stdout)) {
	326	fprintf(stderr, "unknown write failure on standard output");
	327	goto out;
	328	}
	329	if (fclose(stdout)) {
b2348e1d	330	fprintf(stderr, "close failed on standard output: %s",
c8b5f2c9	331	str_error_r(errno, sbuf, sizeof(sbuf)));
2a16bf8c ACM	332	goto out;
	333	}
	334	status = 0;
	335	out:
	336	return status;
07800601 IM	337	}
	338
	339	static void handle_internal_command(int argc, const char **argv)
	340	{
	341	const char *cmd = argv[0];
f37a291c	342	unsigned int i;
07800601 IM	343
	344	/* Turn "perf cmd --help" into "perf help cmd" */
	345	if (argc > 1 && !strcmp(argv[1], "--help")) {
	346	argv[1] = argv[0];
	347	argv[0] = cmd = "help";
	348	}
	349
	350	for (i = 0; i < ARRAY_SIZE(commands); i++) {
	351	struct cmd_struct *p = commands+i;
	352	if (strcmp(p->cmd, cmd))
	353	continue;
	354	exit(run_builtin(p, argc, argv));
	355	}
	356	}
	357
	358	static void execv_dashed_external(const char **argv)
	359	{
5104ffb2	360	char *cmd;
07800601 IM	361	const char *tmp;
	362	int status;
	363
5104ffb2 ACM	364	if (asprintf(&cmd, "perf-%s", argv[0]) < 0)
5104ffb2 ACM	365	goto do_die;
07800601 IM	366
	367	/*
	368	* argv[0] must be the perf command, but the argv array
	369	* belongs to the caller, and may be reused in
	370	* subsequent loop iterations. Save argv[0] and
	371	* restore it on error.
	372	*/
	373	tmp = argv[0];
5104ffb2	374	argv[0] = cmd;
07800601 IM	375
	376	/*
	377	* if we fail because the command is not found, it is
	378	* OK to return. Otherwise, we just pass along the status code.
	379	*/
	380	status = run_command_v_opt(argv, 0);
	381	if (status != -ERR_RUN_COMMAND_EXEC) {
5104ffb2 ACM	382	if (IS_RUN_COMMAND_ERR(status)) {
5104ffb2 ACM	383	do_die:
42774806 ACM	384	pr_err("FATAL: unable to run '%s'", argv[0]);
42774806 ACM	385	status = -128;
5104ffb2	386	}
07800601 IM	387	exit(-status);
	388	}
	389	errno = ENOENT; /* as if we called execvp */
	390
	391	argv[0] = tmp;
5104ffb2	392	zfree(&cmd);
07800601 IM	393	}
	394
	395	static int run_argv(int argcp, const char **argv)
	396	{
c6867701 ACM	397	/* See if it's an internal command */
c6867701 ACM	398	handle_internal_command(argcp, argv);
07800601	399
c6867701 ACM	400	/* .. then try the external ones */
	401	execv_dashed_external(*argv);
	402	return 0;
07800601 IM	403	}
07800601 IM	404
3af6e338 ACM	405	static void pthread__block_sigwinch(void)
	406	{
	407	sigset_t set;
	408
	409	sigemptyset(&set);
	410	sigaddset(&set, SIGWINCH);
	411	pthread_sigmask(SIG_BLOCK, &set, NULL);
	412	}
	413
	414	void pthread__unblock_sigwinch(void)
	415	{
	416	sigset_t set;
	417
	418	sigemptyset(&set);
	419	sigaddset(&set, SIGWINCH);
	420	pthread_sigmask(SIG_UNBLOCK, &set, NULL);
	421	}
	422
07800601 IM	423	int main(int argc, const char **argv)
07800601 IM	424	{
ecc4c561	425	int err;
07800601	426	const char *cmd;
b2348e1d	427	char sbuf[STRERR_BUFSIZE];
07800601	428
096d3558 JP	429	/* libsubcmd init */
	430	exec_cmd_init("perf", PREFIX, PERF_EXEC_PATH, EXEC_PATH_ENVIRONMENT);
	431	pager_init(PERF_PAGER_ENVIRONMENT);
	432
918512b4	433	/* The page_size is placed in util object. */
0c1fe6b2 ACM	434	page_size = sysconf(_SC_PAGE_SIZE);
0c1fe6b2 ACM	435
46113a54	436	cmd = extract_argv0_path(argv[0]);
07800601 IM	437	if (!cmd)
07800601 IM	438	cmd = "perf-help";
65d4b265	439
14cbfbeb NK	440	srandom(time(NULL));
14cbfbeb NK	441
ecc4c561 ACM	442	err = perf_config(perf_default_config, NULL);
	443	if (err)
	444	return err;
58cb9d65	445	set_buildid_dir(NULL);
b8cbb349	446
07800601 IM	447	/*
	448	* "perf-xxxx" is the same as "perf xxxx", but we obviously:
	449	*
	450	* - cannot take flags in between the "perf" and the "xxxx".
	451	* - cannot execute it externally (since it would just do
	452	* the same thing over again)
	453	*
3192f1ed MW	454	* So we just directly call the internal command handler. If that one
	455	* fails to handle this, then maybe we just run a renamed perf binary
	456	* that contains a dash in its name. To handle this scenario, we just
	457	* fall through and ignore the "xxxx" part of the command string.
07800601	458	*/
8e99b6d4	459	if (strstarts(cmd, "perf-")) {
266dfb0b	460	cmd += 5;
07800601 IM	461	argv[0] = cmd;
07800601 IM	462	handle_internal_command(argc, argv);
3192f1ed MW	463	/*
	464	* If the command is handled, the above function does not
	465	* return undo changes and fall through in such a case.
	466	*/
	467	cmd -= 5;
	468	argv[0] = cmd;
07800601	469	}
8e99b6d4	470	if (strstarts(cmd, "trace")) {
22e9af4e	471	#if defined(HAVE_LIBAUDIT_SUPPORT) \|\| defined(HAVE_SYSCALL_TABLE_SUPPORT)
b52bc234 ACM	472	setup_path();
b52bc234 ACM	473	argv[0] = "trace";
b0ad8ea6	474	return cmd_trace(argc, argv);
1b572622 ACM	475	#else
	476	fprintf(stderr,
	477	"trace command not available: missing audit-libs devel package at build time.\n");
	478	goto out;
b52bc234	479	#endif
1b572622	480	}
07800601 IM	481	/* Look for flags.. */
	482	argv++;
	483	argc--;
	484	handle_options(&argv, &argc, NULL);
	485	commit_pager_choice();
45de34bb	486
07800601	487	if (argc > 0) {
8e99b6d4	488	if (strstarts(argv[0], "--"))
07800601 IM	489	argv[0] += 2;
	490	} else {
	491	/* The user didn't specify a command; give them help */
502fc5c7	492	printf("\n usage: %s\n\n", perf_usage_string);
07800601	493	list_common_cmds_help();
502fc5c7	494	printf("\n %s\n\n", perf_more_info_string);
2a16bf8c	495	goto out;
07800601 IM	496	}
	497	cmd = argv[0];
	498
52502bf2 JO	499	test_attr__init();
52502bf2 JO	500
07800601 IM	501	/*
07800601 IM	502	* We use PATH to find perf commands, but we prepend some higher
659431fc	503	* precedence paths: the "--exec-path" option, the PERF_EXEC_PATH
07800601 IM	504	* environment, and the $(perfexecdir) from the Makefile at build
	505	* time.
	506	*/
	507	setup_path();
3af6e338 ACM	508	/*
	509	* Block SIGWINCH notifications so that the thread that wants it can
	510	* unblock and get syscalls like select interrupted instead of waiting
	511	* forever while the signal goes to some other non interested thread.
	512	*/
	513	pthread__block_sigwinch();
07800601	514
dd629cc0 JO	515	perf_debug_setup();
dd629cc0 JO	516
07800601	517	while (1) {
4c574159	518	static int done_help;
c6867701 ACM	519
c6867701 ACM	520	run_argv(&argc, &argv);
8035e428	521
07800601 IM	522	if (errno != ENOENT)
07800601 IM	523	break;
8035e428	524
07800601 IM	525	if (!done_help) {
	526	cmd = argv[0] = help_unknown_cmd(cmd);
	527	done_help = 1;
	528	} else
	529	break;
	530	}
	531
	532	fprintf(stderr, "Failed to run command '%s': %s\n",
c8b5f2c9	533	cmd, str_error_r(errno, sbuf, sizeof(sbuf)));
2a16bf8c	534	out:
07800601 IM	535	return 1;
07800601 IM	536	}