2009-06-03 04:37:05 +07:00
|
|
|
/*
|
|
|
|
* 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.
|
|
|
|
*/
|
2009-04-20 20:00:56 +07:00
|
|
|
#include "builtin.h"
|
2009-06-03 04:37:05 +07:00
|
|
|
|
2009-04-27 13:02:14 +07:00
|
|
|
#include "util/exec_cmd.h"
|
|
|
|
#include "util/cache.h"
|
|
|
|
#include "util/quote.h"
|
|
|
|
#include "util/run-command.h"
|
2009-07-22 01:16:29 +07:00
|
|
|
#include "util/parse-events.h"
|
2009-11-08 22:03:07 +07:00
|
|
|
#include "util/debugfs.h"
|
2009-04-20 20:00:56 +07:00
|
|
|
|
|
|
|
const char perf_usage_string[] =
|
2009-04-20 21:01:30 +07:00
|
|
|
"perf [--version] [--help] COMMAND [ARGS]";
|
2009-04-20 20:00:56 +07:00
|
|
|
|
|
|
|
const char perf_more_info_string[] =
|
|
|
|
"See 'perf help COMMAND' for more information on a specific command.";
|
|
|
|
|
perf tui: Allow disabling the TUI on a per command basis in ~/.perfconfig
Using the same scheme as for git's/perf's pager setup, i.e. if one
doesn't want to, on a newt enabled perf binary, to disable the TUI for
'perf report', its just a matter of doing:
[root@doppio linux-2.6-tip]# printf "[tui]\n\nreport = off\n" >
/root/.perfconfig
[root@doppio linux-2.6-tip]# cat /root/.perfconfig
[tui]
report = off
[root@doppio linux-2.6-tip]#
System wide settings are also possible, by editing /etc/perfconfig, etc,
i.e. the git machinery for config files applies to perf as well, so when
in doubt where to put your settings, consult the git documentation, if
it fails, please let us know.
Suggested-by: Ingo Molnar <mingo@elte.hu>
Discussed-with: Stephane Eranian <eranian@google.com>
Cc: Frédéric Weisbecker <fweisbec@gmail.com>
Cc: Mike Galbraith <efault@gmx.de>
Cc: Paul Mackerras <paulus@samba.org>
Cc: Peter Zijlstra <a.p.zijlstra@chello.nl>
Cc: Stephane Eranian <eranian@google.com>
Cc: Tom Zanussi <tzanussi@gmail.com>
LKML-Reference: <new-submission>
Signed-off-by: Arnaldo Carvalho de Melo <acme@redhat.com>
2010-05-21 08:01:10 +07:00
|
|
|
int use_browser = -1;
|
2009-04-20 20:00:56 +07:00
|
|
|
static int use_pager = -1;
|
perf tui: Allow disabling the TUI on a per command basis in ~/.perfconfig
Using the same scheme as for git's/perf's pager setup, i.e. if one
doesn't want to, on a newt enabled perf binary, to disable the TUI for
'perf report', its just a matter of doing:
[root@doppio linux-2.6-tip]# printf "[tui]\n\nreport = off\n" >
/root/.perfconfig
[root@doppio linux-2.6-tip]# cat /root/.perfconfig
[tui]
report = off
[root@doppio linux-2.6-tip]#
System wide settings are also possible, by editing /etc/perfconfig, etc,
i.e. the git machinery for config files applies to perf as well, so when
in doubt where to put your settings, consult the git documentation, if
it fails, please let us know.
Suggested-by: Ingo Molnar <mingo@elte.hu>
Discussed-with: Stephane Eranian <eranian@google.com>
Cc: Frédéric Weisbecker <fweisbec@gmail.com>
Cc: Mike Galbraith <efault@gmx.de>
Cc: Paul Mackerras <paulus@samba.org>
Cc: Peter Zijlstra <a.p.zijlstra@chello.nl>
Cc: Stephane Eranian <eranian@google.com>
Cc: Tom Zanussi <tzanussi@gmail.com>
LKML-Reference: <new-submission>
Signed-off-by: Arnaldo Carvalho de Melo <acme@redhat.com>
2010-05-21 08:01:10 +07:00
|
|
|
|
2009-04-20 20:00:56 +07:00
|
|
|
struct pager_config {
|
|
|
|
const char *cmd;
|
|
|
|
int val;
|
|
|
|
};
|
|
|
|
|
2009-07-22 01:16:29 +07:00
|
|
|
static char debugfs_mntpt[MAXPATHLEN];
|
|
|
|
|
2009-04-20 20:00:56 +07:00
|
|
|
static int pager_command_config(const char *var, const char *value, void *data)
|
|
|
|
{
|
|
|
|
struct pager_config *c = data;
|
|
|
|
if (!prefixcmp(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" */
|
|
|
|
int check_pager_config(const char *cmd)
|
|
|
|
{
|
|
|
|
struct pager_config c;
|
|
|
|
c.cmd = cmd;
|
|
|
|
c.val = -1;
|
|
|
|
perf_config(pager_command_config, &c);
|
|
|
|
return c.val;
|
|
|
|
}
|
|
|
|
|
perf tui: Allow disabling the TUI on a per command basis in ~/.perfconfig
Using the same scheme as for git's/perf's pager setup, i.e. if one
doesn't want to, on a newt enabled perf binary, to disable the TUI for
'perf report', its just a matter of doing:
[root@doppio linux-2.6-tip]# printf "[tui]\n\nreport = off\n" >
/root/.perfconfig
[root@doppio linux-2.6-tip]# cat /root/.perfconfig
[tui]
report = off
[root@doppio linux-2.6-tip]#
System wide settings are also possible, by editing /etc/perfconfig, etc,
i.e. the git machinery for config files applies to perf as well, so when
in doubt where to put your settings, consult the git documentation, if
it fails, please let us know.
Suggested-by: Ingo Molnar <mingo@elte.hu>
Discussed-with: Stephane Eranian <eranian@google.com>
Cc: Frédéric Weisbecker <fweisbec@gmail.com>
Cc: Mike Galbraith <efault@gmx.de>
Cc: Paul Mackerras <paulus@samba.org>
Cc: Peter Zijlstra <a.p.zijlstra@chello.nl>
Cc: Stephane Eranian <eranian@google.com>
Cc: Tom Zanussi <tzanussi@gmail.com>
LKML-Reference: <new-submission>
Signed-off-by: Arnaldo Carvalho de Melo <acme@redhat.com>
2010-05-21 08:01:10 +07:00
|
|
|
static int tui_command_config(const char *var, const char *value, void *data)
|
|
|
|
{
|
|
|
|
struct pager_config *c = data;
|
|
|
|
if (!prefixcmp(var, "tui.") && !strcmp(var + 4, c->cmd))
|
|
|
|
c->val = perf_config_bool(var, value);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* returns 0 for "no tui", 1 for "use tui", and -1 for "not specified" */
|
|
|
|
static int check_tui_config(const char *cmd)
|
|
|
|
{
|
|
|
|
struct pager_config c;
|
|
|
|
c.cmd = cmd;
|
|
|
|
c.val = -1;
|
|
|
|
perf_config(tui_command_config, &c);
|
|
|
|
return c.val;
|
|
|
|
}
|
|
|
|
|
2010-01-28 06:05:55 +07:00
|
|
|
static void commit_pager_choice(void)
|
|
|
|
{
|
2009-04-20 20:00:56 +07:00
|
|
|
switch (use_pager) {
|
|
|
|
case 0:
|
|
|
|
setenv("PERF_PAGER", "cat", 1);
|
|
|
|
break;
|
|
|
|
case 1:
|
|
|
|
/* setup_pager(); */
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-07-22 01:16:29 +07:00
|
|
|
static void set_debugfs_path(void)
|
|
|
|
{
|
|
|
|
char *path;
|
|
|
|
|
|
|
|
path = getenv(PERF_DEBUGFS_ENVIRONMENT);
|
|
|
|
snprintf(debugfs_path, MAXPATHLEN, "%s/%s", path ?: debugfs_mntpt,
|
|
|
|
"tracing/events");
|
|
|
|
}
|
|
|
|
|
2010-01-28 06:05:55 +07:00
|
|
|
static int handle_options(const char ***argv, int *argc, int *envchanged)
|
2009-04-20 20:00:56 +07:00
|
|
|
{
|
|
|
|
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;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Check remaining flags.
|
|
|
|
*/
|
2009-10-13 15:18:16 +07:00
|
|
|
if (!prefixcmp(cmd, CMD_EXEC_PATH)) {
|
|
|
|
cmd += strlen(CMD_EXEC_PATH);
|
2009-04-20 20:00:56 +07:00
|
|
|
if (*cmd == '=')
|
|
|
|
perf_set_argv_exec_path(cmd + 1);
|
|
|
|
else {
|
|
|
|
puts(perf_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, "--perf-dir")) {
|
|
|
|
if (*argc < 2) {
|
2010-01-28 06:05:55 +07:00
|
|
|
fprintf(stderr, "No directory given for --perf-dir.\n");
|
2009-04-20 20:00:56 +07:00
|
|
|
usage(perf_usage_string);
|
|
|
|
}
|
|
|
|
setenv(PERF_DIR_ENVIRONMENT, (*argv)[1], 1);
|
|
|
|
if (envchanged)
|
|
|
|
*envchanged = 1;
|
|
|
|
(*argv)++;
|
|
|
|
(*argc)--;
|
|
|
|
handled++;
|
2009-10-13 15:18:16 +07:00
|
|
|
} else if (!prefixcmp(cmd, CMD_PERF_DIR)) {
|
|
|
|
setenv(PERF_DIR_ENVIRONMENT, cmd + strlen(CMD_PERF_DIR), 1);
|
2009-04-20 20:00:56 +07:00
|
|
|
if (envchanged)
|
|
|
|
*envchanged = 1;
|
|
|
|
} else if (!strcmp(cmd, "--work-tree")) {
|
|
|
|
if (*argc < 2) {
|
2010-01-28 06:05:55 +07:00
|
|
|
fprintf(stderr, "No directory given for --work-tree.\n");
|
2009-04-20 20:00:56 +07:00
|
|
|
usage(perf_usage_string);
|
|
|
|
}
|
|
|
|
setenv(PERF_WORK_TREE_ENVIRONMENT, (*argv)[1], 1);
|
|
|
|
if (envchanged)
|
|
|
|
*envchanged = 1;
|
|
|
|
(*argv)++;
|
|
|
|
(*argc)--;
|
2009-10-13 15:18:16 +07:00
|
|
|
} else if (!prefixcmp(cmd, CMD_WORK_TREE)) {
|
|
|
|
setenv(PERF_WORK_TREE_ENVIRONMENT, cmd + strlen(CMD_WORK_TREE), 1);
|
2009-04-20 20:00:56 +07:00
|
|
|
if (envchanged)
|
|
|
|
*envchanged = 1;
|
2009-07-22 01:16:29 +07:00
|
|
|
} else if (!strcmp(cmd, "--debugfs-dir")) {
|
|
|
|
if (*argc < 2) {
|
|
|
|
fprintf(stderr, "No directory given for --debugfs-dir.\n");
|
|
|
|
usage(perf_usage_string);
|
|
|
|
}
|
|
|
|
strncpy(debugfs_mntpt, (*argv)[1], MAXPATHLEN);
|
|
|
|
debugfs_mntpt[MAXPATHLEN - 1] = '\0';
|
|
|
|
if (envchanged)
|
|
|
|
*envchanged = 1;
|
|
|
|
(*argv)++;
|
|
|
|
(*argc)--;
|
2009-10-13 15:18:16 +07:00
|
|
|
} else if (!prefixcmp(cmd, CMD_DEBUGFS_DIR)) {
|
|
|
|
strncpy(debugfs_mntpt, cmd + strlen(CMD_DEBUGFS_DIR), MAXPATHLEN);
|
2009-07-22 01:16:29 +07:00
|
|
|
debugfs_mntpt[MAXPATHLEN - 1] = '\0';
|
|
|
|
if (envchanged)
|
|
|
|
*envchanged = 1;
|
2009-04-20 20:00:56 +07:00
|
|
|
} else {
|
|
|
|
fprintf(stderr, "Unknown option: %s\n", cmd);
|
|
|
|
usage(perf_usage_string);
|
|
|
|
}
|
|
|
|
|
|
|
|
(*argv)++;
|
|
|
|
(*argc)--;
|
|
|
|
handled++;
|
|
|
|
}
|
|
|
|
return handled;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int handle_alias(int *argcp, const char ***argv)
|
|
|
|
{
|
|
|
|
int envchanged = 0, ret = 0, saved_errno = errno;
|
|
|
|
int count, option_count;
|
2010-01-28 06:05:55 +07:00
|
|
|
const char **new_argv;
|
2009-04-20 20:00:56 +07:00
|
|
|
const char *alias_command;
|
|
|
|
char *alias_string;
|
|
|
|
|
|
|
|
alias_command = (*argv)[0];
|
|
|
|
alias_string = alias_lookup(alias_command);
|
|
|
|
if (alias_string) {
|
|
|
|
if (alias_string[0] == '!') {
|
|
|
|
if (*argcp > 1) {
|
|
|
|
struct strbuf buf;
|
|
|
|
|
|
|
|
strbuf_init(&buf, PATH_MAX);
|
|
|
|
strbuf_addstr(&buf, alias_string);
|
|
|
|
sq_quote_argv(&buf, (*argv) + 1, PATH_MAX);
|
|
|
|
free(alias_string);
|
|
|
|
alias_string = buf.buf;
|
|
|
|
}
|
|
|
|
ret = system(alias_string + 1);
|
|
|
|
if (ret >= 0 && WIFEXITED(ret) &&
|
|
|
|
WEXITSTATUS(ret) != 127)
|
|
|
|
exit(WEXITSTATUS(ret));
|
|
|
|
die("Failed to run '%s' when expanding alias '%s'",
|
|
|
|
alias_string + 1, alias_command);
|
|
|
|
}
|
|
|
|
count = split_cmdline(alias_string, &new_argv);
|
|
|
|
if (count < 0)
|
|
|
|
die("Bad alias.%s string", alias_command);
|
|
|
|
option_count = handle_options(&new_argv, &count, &envchanged);
|
|
|
|
if (envchanged)
|
|
|
|
die("alias '%s' changes environment variables\n"
|
|
|
|
"You can use '!perf' in the alias to do this.",
|
|
|
|
alias_command);
|
|
|
|
memmove(new_argv - option_count, new_argv,
|
|
|
|
count * sizeof(char *));
|
|
|
|
new_argv -= option_count;
|
|
|
|
|
|
|
|
if (count < 1)
|
|
|
|
die("empty alias for %s", alias_command);
|
|
|
|
|
|
|
|
if (!strcmp(alias_command, new_argv[0]))
|
|
|
|
die("recursive alias: %s", alias_command);
|
|
|
|
|
2010-01-28 06:05:55 +07:00
|
|
|
new_argv = realloc(new_argv, sizeof(char *) *
|
2009-04-20 20:00:56 +07:00
|
|
|
(count + *argcp + 1));
|
|
|
|
/* insert after command name */
|
2010-01-28 06:05:55 +07:00
|
|
|
memcpy(new_argv + count, *argv + 1, sizeof(char *) * *argcp);
|
|
|
|
new_argv[count + *argcp] = NULL;
|
2009-04-20 20:00:56 +07:00
|
|
|
|
|
|
|
*argv = new_argv;
|
|
|
|
*argcp += count - 1;
|
|
|
|
|
|
|
|
ret = 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
errno = saved_errno;
|
|
|
|
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
|
|
|
const char perf_version_string[] = PERF_VERSION;
|
|
|
|
|
|
|
|
#define RUN_SETUP (1<<0)
|
|
|
|
#define USE_PAGER (1<<1)
|
|
|
|
/*
|
|
|
|
* require working tree to be present -- anything uses this needs
|
|
|
|
* RUN_SETUP for reading from the configuration file.
|
|
|
|
*/
|
|
|
|
#define NEED_WORK_TREE (1<<2)
|
|
|
|
|
|
|
|
struct cmd_struct {
|
|
|
|
const char *cmd;
|
|
|
|
int (*fn)(int, const char **, const char *);
|
|
|
|
int option;
|
|
|
|
};
|
|
|
|
|
|
|
|
static int run_builtin(struct cmd_struct *p, int argc, const char **argv)
|
|
|
|
{
|
|
|
|
int status;
|
|
|
|
struct stat st;
|
|
|
|
const char *prefix;
|
|
|
|
|
|
|
|
prefix = NULL;
|
|
|
|
if (p->option & RUN_SETUP)
|
|
|
|
prefix = NULL; /* setup_perf_directory(); */
|
|
|
|
|
perf tui: Allow disabling the TUI on a per command basis in ~/.perfconfig
Using the same scheme as for git's/perf's pager setup, i.e. if one
doesn't want to, on a newt enabled perf binary, to disable the TUI for
'perf report', its just a matter of doing:
[root@doppio linux-2.6-tip]# printf "[tui]\n\nreport = off\n" >
/root/.perfconfig
[root@doppio linux-2.6-tip]# cat /root/.perfconfig
[tui]
report = off
[root@doppio linux-2.6-tip]#
System wide settings are also possible, by editing /etc/perfconfig, etc,
i.e. the git machinery for config files applies to perf as well, so when
in doubt where to put your settings, consult the git documentation, if
it fails, please let us know.
Suggested-by: Ingo Molnar <mingo@elte.hu>
Discussed-with: Stephane Eranian <eranian@google.com>
Cc: Frédéric Weisbecker <fweisbec@gmail.com>
Cc: Mike Galbraith <efault@gmx.de>
Cc: Paul Mackerras <paulus@samba.org>
Cc: Peter Zijlstra <a.p.zijlstra@chello.nl>
Cc: Stephane Eranian <eranian@google.com>
Cc: Tom Zanussi <tzanussi@gmail.com>
LKML-Reference: <new-submission>
Signed-off-by: Arnaldo Carvalho de Melo <acme@redhat.com>
2010-05-21 08:01:10 +07:00
|
|
|
if (use_browser == -1)
|
|
|
|
use_browser = check_tui_config(p->cmd);
|
|
|
|
|
2009-04-20 20:00:56 +07:00
|
|
|
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();
|
2009-07-22 01:16:29 +07:00
|
|
|
set_debugfs_path();
|
2009-04-20 20:00:56 +07:00
|
|
|
|
|
|
|
status = p->fn(argc, argv, prefix);
|
2010-03-22 23:10:25 +07:00
|
|
|
exit_browser(status);
|
|
|
|
|
2009-04-20 20:00:56 +07:00
|
|
|
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;
|
|
|
|
|
|
|
|
/* Check for ENOSPC and EIO errors.. */
|
|
|
|
if (fflush(stdout))
|
|
|
|
die("write failure on standard output: %s", strerror(errno));
|
|
|
|
if (ferror(stdout))
|
|
|
|
die("unknown write failure on standard output");
|
|
|
|
if (fclose(stdout))
|
|
|
|
die("close failed on standard output: %s", strerror(errno));
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static void handle_internal_command(int argc, const char **argv)
|
|
|
|
{
|
|
|
|
const char *cmd = argv[0];
|
|
|
|
static struct cmd_struct commands[] = {
|
2010-01-21 00:28:45 +07:00
|
|
|
{ "buildid-cache", cmd_buildid_cache, 0 },
|
2009-11-17 01:32:45 +07:00
|
|
|
{ "buildid-list", cmd_buildid_list, 0 },
|
2009-12-15 05:09:31 +07:00
|
|
|
{ "diff", cmd_diff, 0 },
|
2009-11-20 14:53:25 +07:00
|
|
|
{ "help", cmd_help, 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 },
|
|
|
|
{ "trace", cmd_trace, 0 },
|
|
|
|
{ "sched", cmd_sched, 0 },
|
|
|
|
{ "probe", cmd_probe, 0 },
|
|
|
|
{ "kmem", cmd_kmem, 0 },
|
2010-01-30 18:43:33 +07:00
|
|
|
{ "lock", cmd_lock, 0 },
|
2010-04-19 12:32:50 +07:00
|
|
|
{ "kvm", cmd_kvm, 0 },
|
perf test: Initial regression testing command
First an example with the first internal test:
[acme@doppio linux-2.6-tip]$ perf test
1: vmlinux symtab matches kallsyms: Ok
So it run just one test, that is "vmlinux symtab matches kallsyms", and it was
successful.
If we run it in verbose mode, we'll see details about errors and extra warnings
for non-fatal problems:
[acme@doppio linux-2.6-tip]$ perf test -v
1: vmlinux symtab matches kallsyms:
--- start ---
Looking at the vmlinux_path (5 entries long)
No build_id in vmlinux, ignoring it
No build_id in /boot/vmlinux, ignoring it
No build_id in /boot/vmlinux-2.6.34-rc4-tip+, ignoring it
Using /lib/modules/2.6.34-rc4-tip+/build/vmlinux for symbols
Maps only in vmlinux:
ffffffff81cb81b1-ffffffff81e1149b 0 [kernel].init.text
ffffffff81e1149c-ffffffff9fffffff 0 [kernel].exit.text
ffffffffff600000-ffffffffff6000ff 0 [kernel].vsyscall_0
ffffffffff600100-ffffffffff6003ff 0 [kernel].vsyscall_fn
ffffffffff600400-ffffffffff6007ff 0 [kernel].vsyscall_1
ffffffffff600800-ffffffffffffffff 0 [kernel].vsyscall_2
Maps in vmlinux with a different name in kallsyms:
ffffffffff600000-ffffffffff6000ff 0 [kernel].vsyscall_0 in kallsyms as [kernel].0
ffffffffff600100-ffffffffff6003ff 0 [kernel].vsyscall_fn in kallsyms as:
*ffffffffff600100-ffffffffff60012f 0 [kernel].2
ffffffffff600400-ffffffffff6007ff 0 [kernel].vsyscall_1 in kallsyms as [kernel].6
ffffffffff600800-ffffffffffffffff 0 [kernel].vsyscall_2 in kallsyms as [kernel].8
Maps only in kallsyms:
ffffffffff600130-ffffffffff6003ff 0 [kernel].4
---- end ----
vmlinux symtab matches kallsyms: Ok
[acme@doppio linux-2.6-tip]$
In the above case we only know the name of the non contiguous kernel ranges in
the address space when reading the symbol information from the ELF symtab in
vmlinux.
The /proc/kallsyms file lack this, we only notice they are separate because
there are modules after the kernel and after that more kernel functions, so we
need to have a module rbtree backed by the module .ko path to get symtabs in
the vmlinux case.
The tool uses it to match by address to emit appropriate warning, but don't
considers this fatal.
The .init.text and .exit.text ines, of course, aren't in kallsyms, so I left
these cases just as extra info in verbose mode.
The end of the sections also aren't in kallsyms, so we the symbols layer does
another pass and sets the end addresses as the next map start minus one, which
sometimes pads, causing harmless mismatches.
But at least the symbols match, tested it by copying /proc/kallsyms to
/tmp/kallsyms and doing changes to see if they were detected.
This first test also should serve as a first stab at documenting the
symbol library by providing a self contained example that exercises it
together with comments about what is being done.
More tests to check if actions done on a monitored app, like doing mmaps, etc,
makes the kernel generate the expected events should be added next.
Cc: Frédéric Weisbecker <fweisbec@gmail.com>
Cc: Mike Galbraith <efault@gmx.de>
Cc: Paul Mackerras <paulus@samba.org>
Cc: Peter Zijlstra <a.p.zijlstra@chello.nl>
LKML-Reference: <new-submission>
Signed-off-by: Arnaldo Carvalho de Melo <acme@redhat.com>
2010-04-30 04:58:32 +07:00
|
|
|
{ "test", cmd_test, 0 },
|
2010-05-01 13:41:20 +07:00
|
|
|
{ "inject", cmd_inject, 0 },
|
2009-04-20 20:00:56 +07:00
|
|
|
};
|
2009-07-01 17:37:06 +07:00
|
|
|
unsigned int i;
|
2009-04-20 20:00:56 +07:00
|
|
|
static const char ext[] = STRIP_EXTENSION;
|
|
|
|
|
|
|
|
if (sizeof(ext) > 1) {
|
|
|
|
i = strlen(argv[0]) - strlen(ext);
|
|
|
|
if (i > 0 && !strcmp(argv[0] + i, ext)) {
|
|
|
|
char *argv0 = strdup(argv[0]);
|
|
|
|
argv[0] = cmd = argv0;
|
|
|
|
argv0[i] = '\0';
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* 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)
|
|
|
|
{
|
|
|
|
struct strbuf cmd = STRBUF_INIT;
|
|
|
|
const char *tmp;
|
|
|
|
int status;
|
|
|
|
|
|
|
|
strbuf_addf(&cmd, "perf-%s", argv[0]);
|
|
|
|
|
|
|
|
/*
|
|
|
|
* 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.buf;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* 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))
|
|
|
|
die("unable to run '%s'", argv[0]);
|
|
|
|
exit(-status);
|
|
|
|
}
|
|
|
|
errno = ENOENT; /* as if we called execvp */
|
|
|
|
|
|
|
|
argv[0] = tmp;
|
|
|
|
|
|
|
|
strbuf_release(&cmd);
|
|
|
|
}
|
|
|
|
|
|
|
|
static int run_argv(int *argcp, const char ***argv)
|
|
|
|
{
|
|
|
|
int done_alias = 0;
|
|
|
|
|
|
|
|
while (1) {
|
|
|
|
/* See if it's an internal command */
|
|
|
|
handle_internal_command(*argcp, *argv);
|
|
|
|
|
|
|
|
/* .. then try the external ones */
|
|
|
|
execv_dashed_external(*argv);
|
|
|
|
|
|
|
|
/* It could be an alias -- this works around the insanity
|
|
|
|
* of overriding "perf log" with "perf show" by having
|
|
|
|
* alias.log = show
|
|
|
|
*/
|
|
|
|
if (done_alias || !handle_alias(argcp, argv))
|
|
|
|
break;
|
|
|
|
done_alias = 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
return done_alias;
|
|
|
|
}
|
|
|
|
|
2009-07-22 01:16:29 +07:00
|
|
|
/* mini /proc/mounts parser: searching for "^blah /mount/point debugfs" */
|
|
|
|
static void get_debugfs_mntpt(void)
|
|
|
|
{
|
2009-12-28 15:47:12 +07:00
|
|
|
const char *path = debugfs_mount(NULL);
|
2009-07-22 01:16:29 +07:00
|
|
|
|
2009-11-08 22:03:07 +07:00
|
|
|
if (path)
|
|
|
|
strncpy(debugfs_mntpt, path, sizeof(debugfs_mntpt));
|
|
|
|
else
|
|
|
|
debugfs_mntpt[0] = '\0';
|
2009-07-22 01:16:29 +07:00
|
|
|
}
|
2009-04-20 20:00:56 +07:00
|
|
|
|
|
|
|
int main(int argc, const char **argv)
|
|
|
|
{
|
|
|
|
const char *cmd;
|
|
|
|
|
|
|
|
cmd = perf_extract_argv0_path(argv[0]);
|
|
|
|
if (!cmd)
|
|
|
|
cmd = "perf-help";
|
2009-07-22 01:16:29 +07:00
|
|
|
/* get debugfs mount point from /proc/mounts */
|
|
|
|
get_debugfs_mntpt();
|
2009-04-20 20:00:56 +07:00
|
|
|
/*
|
|
|
|
* "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, and
|
|
|
|
* die if that one cannot handle it.
|
|
|
|
*/
|
|
|
|
if (!prefixcmp(cmd, "perf-")) {
|
2009-05-25 19:45:24 +07:00
|
|
|
cmd += 5;
|
2009-04-20 20:00:56 +07:00
|
|
|
argv[0] = cmd;
|
|
|
|
handle_internal_command(argc, argv);
|
|
|
|
die("cannot handle %s internally", cmd);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Look for flags.. */
|
|
|
|
argv++;
|
|
|
|
argc--;
|
|
|
|
handle_options(&argv, &argc, NULL);
|
|
|
|
commit_pager_choice();
|
2009-07-22 01:16:29 +07:00
|
|
|
set_debugfs_path();
|
2009-04-20 20:00:56 +07:00
|
|
|
if (argc > 0) {
|
|
|
|
if (!prefixcmp(argv[0], "--"))
|
|
|
|
argv[0] += 2;
|
|
|
|
} else {
|
|
|
|
/* The user didn't specify a command; give them help */
|
2009-03-13 09:20:49 +07:00
|
|
|
printf("\n usage: %s\n\n", perf_usage_string);
|
2009-04-20 20:00:56 +07:00
|
|
|
list_common_cmds_help();
|
2009-03-13 09:20:49 +07:00
|
|
|
printf("\n %s\n\n", perf_more_info_string);
|
2009-04-20 20:00:56 +07:00
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
cmd = argv[0];
|
|
|
|
|
|
|
|
/*
|
|
|
|
* We use PATH to find perf commands, but we prepend some higher
|
2010-01-18 22:02:48 +07:00
|
|
|
* precedence paths: the "--exec-path" option, the PERF_EXEC_PATH
|
2009-04-20 20:00:56 +07:00
|
|
|
* environment, and the $(perfexecdir) from the Makefile at build
|
|
|
|
* time.
|
|
|
|
*/
|
|
|
|
setup_path();
|
|
|
|
|
|
|
|
while (1) {
|
2010-01-28 06:05:55 +07:00
|
|
|
static int done_help;
|
|
|
|
static int was_alias;
|
2009-06-06 20:19:13 +07:00
|
|
|
|
2009-04-20 20:00:56 +07:00
|
|
|
was_alias = run_argv(&argc, &argv);
|
|
|
|
if (errno != ENOENT)
|
|
|
|
break;
|
2009-06-06 20:19:13 +07:00
|
|
|
|
2009-04-20 20:00:56 +07:00
|
|
|
if (was_alias) {
|
|
|
|
fprintf(stderr, "Expansion of alias '%s' failed; "
|
|
|
|
"'%s' is not a perf-command\n",
|
|
|
|
cmd, argv[0]);
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
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, strerror(errno));
|
|
|
|
|
|
|
|
return 1;
|
|
|
|
}
|