1e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "builtin.h"
2e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
3e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "perf.h"
4e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/cache.h"
5e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/debug.h"
6e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/exec_cmd.h"
7e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/header.h"
8e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/parse-options.h"
9e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/session.h"
10e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/tool.h"
11e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/symbol.h"
12e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/thread.h"
13e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/trace-event.h"
14e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/util.h"
15e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/evlist.h"
16e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/evsel.h"
17e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include "util/sort.h"
18e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#include <linux/bitmap.h>
19e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
20e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic char const		*script_name;
21e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic char const		*generate_script_lang;
22e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic bool			debug_mode;
23e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic u64			last_timestamp;
24e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic u64			nr_unordered;
25e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengextern const struct option	record_options[];
26e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic bool			no_callchain;
27e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic bool			latency_format;
28e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic bool			system_wide;
29e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic const char		*cpu_list;
30e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic DECLARE_BITMAP(cpu_bitmap, MAX_NR_CPUS);
31e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
32e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengenum perf_output_field {
33e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_COMM            = 1U << 0,
34e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_TID             = 1U << 1,
35e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_PID             = 1U << 2,
36e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_TIME            = 1U << 3,
37e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_CPU             = 1U << 4,
38e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_EVNAME          = 1U << 5,
39e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_TRACE           = 1U << 6,
40e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_IP              = 1U << 7,
41e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_SYM             = 1U << 8,
42e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_DSO             = 1U << 9,
43e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_ADDR            = 1U << 10,
44e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	PERF_OUTPUT_SYMOFFSET       = 1U << 11,
45e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng};
46e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
47e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstruct output_option {
48e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	const char *str;
49e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	enum perf_output_field field;
50e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng} all_output_options[] = {
51e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "comm",  .field = PERF_OUTPUT_COMM},
52e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "tid",   .field = PERF_OUTPUT_TID},
53e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "pid",   .field = PERF_OUTPUT_PID},
54e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "time",  .field = PERF_OUTPUT_TIME},
55e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "cpu",   .field = PERF_OUTPUT_CPU},
56e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "event", .field = PERF_OUTPUT_EVNAME},
57e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "trace", .field = PERF_OUTPUT_TRACE},
58e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "ip",    .field = PERF_OUTPUT_IP},
59e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "sym",   .field = PERF_OUTPUT_SYM},
60e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "dso",   .field = PERF_OUTPUT_DSO},
61e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "addr",  .field = PERF_OUTPUT_ADDR},
62e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	{.str = "symoff", .field = PERF_OUTPUT_SYMOFFSET},
63e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng};
64e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
65e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng/* default set to maintain compatibility with current format */
66e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct {
67e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	bool user_set;
68e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	bool wildcard_set;
69e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	unsigned int print_ip_opts;
70e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	u64 fields;
71e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	u64 invalid_fields;
72e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng} output[PERF_TYPE_MAX] = {
73e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
74e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	[PERF_TYPE_HARDWARE] = {
75e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.user_set = false,
76e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
77e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.fields = PERF_OUTPUT_COMM | PERF_OUTPUT_TID |
78e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			      PERF_OUTPUT_CPU | PERF_OUTPUT_TIME |
79e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			      PERF_OUTPUT_EVNAME | PERF_OUTPUT_IP |
80e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				  PERF_OUTPUT_SYM | PERF_OUTPUT_DSO,
81e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
82e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.invalid_fields = PERF_OUTPUT_TRACE,
83e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	},
84e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
85e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	[PERF_TYPE_SOFTWARE] = {
86e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.user_set = false,
87e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
88e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.fields = PERF_OUTPUT_COMM | PERF_OUTPUT_TID |
89e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			      PERF_OUTPUT_CPU | PERF_OUTPUT_TIME |
90e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			      PERF_OUTPUT_EVNAME | PERF_OUTPUT_IP |
91e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				  PERF_OUTPUT_SYM | PERF_OUTPUT_DSO,
92e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
93e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.invalid_fields = PERF_OUTPUT_TRACE,
94e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	},
95e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
96e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	[PERF_TYPE_TRACEPOINT] = {
97e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.user_set = false,
98e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
99e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.fields = PERF_OUTPUT_COMM | PERF_OUTPUT_TID |
100e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				  PERF_OUTPUT_CPU | PERF_OUTPUT_TIME |
101e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				  PERF_OUTPUT_EVNAME | PERF_OUTPUT_TRACE,
102e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	},
103e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
104e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	[PERF_TYPE_RAW] = {
105e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.user_set = false,
106e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
107e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.fields = PERF_OUTPUT_COMM | PERF_OUTPUT_TID |
108e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			      PERF_OUTPUT_CPU | PERF_OUTPUT_TIME |
109e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			      PERF_OUTPUT_EVNAME | PERF_OUTPUT_IP |
110e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				  PERF_OUTPUT_SYM | PERF_OUTPUT_DSO,
111e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
112e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		.invalid_fields = PERF_OUTPUT_TRACE,
113e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	},
114e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng};
115e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
116e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic bool output_set_by_user(void)
117e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
118e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int j;
119e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	for (j = 0; j < PERF_TYPE_MAX; ++j) {
120e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (output[j].user_set)
121e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return true;
122e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
123e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return false;
124e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
125e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
126e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic const char *output_field2str(enum perf_output_field field)
127e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
128e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int i, imax = ARRAY_SIZE(all_output_options);
129e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	const char *str = "";
130e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
131e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	for (i = 0; i < imax; ++i) {
132e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (all_output_options[i].field == field) {
133e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			str = all_output_options[i].str;
134e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			break;
135e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
136e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
137e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return str;
138e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
139e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
140e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#define PRINT_FIELD(x)  (output[attr->type].fields & PERF_OUTPUT_##x)
141e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
142e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int perf_evsel__check_stype(struct perf_evsel *evsel,
143e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				   u64 sample_type, const char *sample_msg,
144e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				   enum perf_output_field field)
145e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
146e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_event_attr *attr = &evsel->attr;
147e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int type = attr->type;
148e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	const char *evname;
149e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
150e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (attr->sample_type & sample_type)
151e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return 0;
152e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
153e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (output[type].user_set) {
154e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		evname = perf_evsel__name(evsel);
155e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pr_err("Samples for '%s' event do not have %s attribute set. "
156e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		       "Cannot print '%s' field.\n",
157e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		       evname, sample_msg, output_field2str(field));
158e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
159e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
160e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
161e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	/* user did not ask for it explicitly so remove from the default list */
162e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	output[type].fields &= ~field;
163e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	evname = perf_evsel__name(evsel);
164e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	pr_debug("Samples for '%s' event do not have %s attribute set. "
165e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		 "Skipping '%s' field.\n",
166e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		 evname, sample_msg, output_field2str(field));
167e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
168e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
169e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
170e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
171e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int perf_evsel__check_attr(struct perf_evsel *evsel,
172e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				  struct perf_session *session)
173e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
174e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_event_attr *attr = &evsel->attr;
175e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
176e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(TRACE) &&
177e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		!perf_session__has_traces(session, "record -R"))
178e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -EINVAL;
179e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
180e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(IP)) {
181e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (perf_evsel__check_stype(evsel, PERF_SAMPLE_IP, "IP",
182e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					    PERF_OUTPUT_IP))
183e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -EINVAL;
184e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
185e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!no_callchain &&
186e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    !(attr->sample_type & PERF_SAMPLE_CALLCHAIN))
187e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			symbol_conf.use_callchain = false;
188e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
189e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
190e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(ADDR) &&
191e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		perf_evsel__check_stype(evsel, PERF_SAMPLE_ADDR, "ADDR",
192e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					PERF_OUTPUT_ADDR))
193e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -EINVAL;
194e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
195e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(SYM) && !PRINT_FIELD(IP) && !PRINT_FIELD(ADDR)) {
196e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pr_err("Display of symbols requested but neither sample IP nor "
197e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			   "sample address\nis selected. Hence, no addresses to convert "
198e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		       "to symbols.\n");
199e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -EINVAL;
200e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
201e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(SYMOFFSET) && !PRINT_FIELD(SYM)) {
202e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pr_err("Display of offsets requested but symbol is not"
203e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		       "selected.\n");
204e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -EINVAL;
205e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
206e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(DSO) && !PRINT_FIELD(IP) && !PRINT_FIELD(ADDR)) {
207e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pr_err("Display of DSO requested but neither sample IP nor "
208e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			   "sample address\nis selected. Hence, no addresses to convert "
209e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		       "to DSO.\n");
210e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -EINVAL;
211e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
212e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
213e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if ((PRINT_FIELD(PID) || PRINT_FIELD(TID)) &&
214e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		perf_evsel__check_stype(evsel, PERF_SAMPLE_TID, "TID",
215e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					PERF_OUTPUT_TID|PERF_OUTPUT_PID))
216e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -EINVAL;
217e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
218e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(TIME) &&
219e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		perf_evsel__check_stype(evsel, PERF_SAMPLE_TIME, "TIME",
220e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					PERF_OUTPUT_TIME))
221e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -EINVAL;
222e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
223e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(CPU) &&
224e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		perf_evsel__check_stype(evsel, PERF_SAMPLE_CPU, "CPU",
225e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					PERF_OUTPUT_CPU))
226e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -EINVAL;
227e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
228e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
229e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
230e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
231e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng/*
232e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * verify all user requested events exist and the samples
233e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * have the expected data
234e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng */
235e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int perf_session__check_output_opt(struct perf_session *session)
236e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
237e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int j;
238e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_evsel *evsel;
239e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_event_attr *attr;
240e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
241e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	for (j = 0; j < PERF_TYPE_MAX; ++j) {
242e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		evsel = perf_session__find_first_evtype(session, j);
243e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
244e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		/*
245e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		 * even if fields is set to 0 (ie., show nothing) event must
246e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		 * exist if user explicitly includes it on the command line
247e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		 */
248e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!evsel && output[j].user_set && !output[j].wildcard_set) {
249e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			pr_err("%s events do not exist. "
250e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			       "Remove corresponding -f option to proceed.\n",
251e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			       event_type(j));
252e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
253e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
254e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
255e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (evsel && output[j].fields &&
256e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			perf_evsel__check_attr(evsel, session))
257e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
258e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
259e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (evsel == NULL)
260e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
261e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
262e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		attr = &evsel->attr;
263e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
264e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		output[j].print_ip_opts = 0;
265e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (PRINT_FIELD(IP))
266e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			output[j].print_ip_opts |= PRINT_IP_OPT_IP;
267e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
268e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (PRINT_FIELD(SYM))
269e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			output[j].print_ip_opts |= PRINT_IP_OPT_SYM;
270e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
271e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (PRINT_FIELD(DSO))
272e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			output[j].print_ip_opts |= PRINT_IP_OPT_DSO;
273e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
274e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (PRINT_FIELD(SYMOFFSET))
275e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			output[j].print_ip_opts |= PRINT_IP_OPT_SYMOFFSET;
276e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
277e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
278e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
279e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
280e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
281e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void print_sample_start(struct perf_sample *sample,
282e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			       struct thread *thread,
283e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			       struct perf_evsel *evsel)
284e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
285e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_event_attr *attr = &evsel->attr;
286e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	const char *evname = NULL;
287e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	unsigned long secs;
288e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	unsigned long usecs;
289e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	unsigned long long nsecs;
290e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
291e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(COMM)) {
292e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (latency_format)
293e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			printf("%8.8s ", thread->comm);
294e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else if (PRINT_FIELD(IP) && symbol_conf.use_callchain)
295e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			printf("%s ", thread->comm);
296e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else
297e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			printf("%16s ", thread->comm);
298e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
299e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
300e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(PID) && PRINT_FIELD(TID))
301e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		printf("%5d/%-5d ", sample->pid, sample->tid);
302e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	else if (PRINT_FIELD(PID))
303e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		printf("%5d ", sample->pid);
304e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	else if (PRINT_FIELD(TID))
305e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		printf("%5d ", sample->tid);
306e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
307e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(CPU)) {
308e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (latency_format)
309e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			printf("%3d ", sample->cpu);
310e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else
311e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			printf("[%03d] ", sample->cpu);
312e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
313e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
314e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(TIME)) {
315e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		nsecs = sample->time;
316e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		secs = nsecs / NSECS_PER_SEC;
317e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		nsecs -= secs * NSECS_PER_SEC;
318e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		usecs = nsecs / NSECS_PER_USEC;
319e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		printf("%5lu.%06lu: ", secs, usecs);
320e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
321e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
322e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(EVNAME)) {
323e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		evname = perf_evsel__name(evsel);
324e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		printf("%s: ", evname ? evname : "[unknown]");
325e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
326e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
327e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
328e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic bool is_bts_event(struct perf_event_attr *attr)
329e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
330e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return ((attr->type == PERF_TYPE_HARDWARE) &&
331e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		(attr->config & PERF_COUNT_HW_BRANCH_INSTRUCTIONS) &&
332e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		(attr->sample_period == 1));
333e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
334e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
335e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic bool sample_addr_correlates_sym(struct perf_event_attr *attr)
336e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
337e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if ((attr->type == PERF_TYPE_SOFTWARE) &&
338e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	    ((attr->config == PERF_COUNT_SW_PAGE_FAULTS) ||
339e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	     (attr->config == PERF_COUNT_SW_PAGE_FAULTS_MIN) ||
340e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	     (attr->config == PERF_COUNT_SW_PAGE_FAULTS_MAJ)))
341e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return true;
342e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
343e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (is_bts_event(attr))
344e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return true;
345e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
346e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return false;
347e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
348e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
349e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void print_sample_addr(union perf_event *event,
350e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			  struct perf_sample *sample,
351e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			  struct machine *machine,
352e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			  struct thread *thread,
353e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			  struct perf_event_attr *attr)
354e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
355e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct addr_location al;
356e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	u8 cpumode = event->header.misc & PERF_RECORD_MISC_CPUMODE_MASK;
357e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
358e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	printf("%16" PRIx64, sample->addr);
359e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
360e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!sample_addr_correlates_sym(attr))
361e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return;
362e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
363e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	thread__find_addr_map(thread, machine, cpumode, MAP__FUNCTION,
364e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			      sample->addr, &al);
365e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!al.map)
366e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		thread__find_addr_map(thread, machine, cpumode, MAP__VARIABLE,
367e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				      sample->addr, &al);
368e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
369e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	al.cpu = sample->cpu;
370e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	al.sym = NULL;
371e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
372e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (al.map)
373e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		al.sym = map__find_symbol(al.map, al.addr, NULL);
374e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
375e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(SYM)) {
376e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		printf(" ");
377e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (PRINT_FIELD(SYMOFFSET))
378e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			symbol__fprintf_symname_offs(al.sym, &al, stdout);
379e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else
380e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			symbol__fprintf_symname(al.sym, stdout);
381e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
382e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
383e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(DSO)) {
384e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		printf(" (");
385e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		map__fprintf_dsoname(al.map, stdout);
386e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		printf(")");
387e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
388e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
389e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
390e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void print_sample_bts(union perf_event *event,
391e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			     struct perf_sample *sample,
392e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			     struct perf_evsel *evsel,
393e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			     struct machine *machine,
394e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			     struct thread *thread)
395e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
396e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_event_attr *attr = &evsel->attr;
397e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
398e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	/* print branch_from information */
399e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(IP)) {
400e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!symbol_conf.use_callchain)
401e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			printf(" ");
402e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else
403e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			printf("\n");
404e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		perf_evsel__print_ip(evsel, event, sample, machine,
405e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				     output[attr->type].print_ip_opts,
406e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				     PERF_MAX_STACK_DEPTH);
407e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
408e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
409e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	printf(" => ");
410e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
411e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	/* print branch_to information */
412e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(ADDR))
413e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		print_sample_addr(event, sample, machine, thread, attr);
414e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
415e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	printf("\n");
416e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
417e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
418e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void process_event(union perf_event *event, struct perf_sample *sample,
419e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			  struct perf_evsel *evsel, struct machine *machine,
420e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			  struct thread *thread,
421e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			  struct addr_location *al __maybe_unused)
422e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
423e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_event_attr *attr = &evsel->attr;
424e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
425e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (output[attr->type].fields == 0)
426e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return;
427e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
428e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	print_sample_start(sample, thread, evsel);
429e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
430e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (is_bts_event(attr)) {
431e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		print_sample_bts(event, sample, evsel, machine, thread);
432e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return;
433e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
434e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
435e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(TRACE))
436e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		event_format__print(evsel->tp_format, sample->cpu,
437e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				    sample->raw_data, sample->raw_size);
438e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(ADDR))
439e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		print_sample_addr(event, sample, machine, thread, attr);
440e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
441e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (PRINT_FIELD(IP)) {
442e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!symbol_conf.use_callchain)
443e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			printf(" ");
444e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else
445e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			printf("\n");
446e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
447e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		perf_evsel__print_ip(evsel, event, sample, machine,
448e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				     output[attr->type].print_ip_opts,
449e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				     PERF_MAX_STACK_DEPTH);
450e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
451e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
452e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	printf("\n");
453e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
454e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
455e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int default_start_script(const char *script __maybe_unused,
456e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				int argc __maybe_unused,
457e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				const char **argv __maybe_unused)
458e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
459e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
460e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
461e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
462e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int default_stop_script(void)
463e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
464e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
465e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
466e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
467e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int default_generate_script(struct pevent *pevent __maybe_unused,
468e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				   const char *outfile __maybe_unused)
469e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
470e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
471e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
472e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
473e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct scripting_ops default_scripting_ops = {
474e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.start_script		= default_start_script,
475e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.stop_script		= default_stop_script,
476e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.process_event		= process_event,
477e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.generate_script	= default_generate_script,
478e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng};
479e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
480e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct scripting_ops	*scripting_ops;
481e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
482e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void setup_scripting(void)
483e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
484e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	setup_perl_scripting();
485e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	setup_python_scripting();
486e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
487e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	scripting_ops = &default_scripting_ops;
488e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
489e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
490e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int cleanup_scripting(void)
491e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
492e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	pr_debug("\nperf script stopped\n");
493e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
494e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return scripting_ops->stop_script();
495e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
496e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
497e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int process_sample_event(struct perf_tool *tool __maybe_unused,
498e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				union perf_event *event,
499e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				struct perf_sample *sample,
500e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				struct perf_evsel *evsel,
501e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				struct machine *machine)
502e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
503e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct addr_location al;
504e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct thread *thread = machine__findnew_thread(machine, sample->pid,
505e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng							sample->tid);
506e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
507e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (thread == NULL) {
508e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pr_debug("problem processing %d event, skipping it.\n",
509e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			 event->header.type);
510e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
511e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
512e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
513e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (debug_mode) {
514e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (sample->time < last_timestamp) {
515e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			pr_err("Samples misordered, previous: %" PRIu64
516e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				" this: %" PRIu64 "\n", last_timestamp,
517e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				sample->time);
518e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			nr_unordered++;
519e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
520e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		last_timestamp = sample->time;
521e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return 0;
522e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
523e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
524e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (perf_event__preprocess_sample(event, machine, &al, sample) < 0) {
525e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pr_err("problem processing %d event, skipping it.\n",
526e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		       event->header.type);
527e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
528e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
529e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
530e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (al.filtered)
531e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return 0;
532e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
533e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (cpu_list && !test_bit(sample->cpu, cpu_bitmap))
534e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return 0;
535e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
536e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	scripting_ops->process_event(event, sample, evsel, machine, thread, &al);
537e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
538e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	evsel->hists.stats.total_period += sample->period;
539e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
540e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
541e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
542e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct perf_tool perf_script = {
543e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.sample		 = process_sample_event,
544e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.mmap		 = perf_event__process_mmap,
545e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.mmap2		 = perf_event__process_mmap2,
546e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.comm		 = perf_event__process_comm,
547e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.exit		 = perf_event__process_exit,
548e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.fork		 = perf_event__process_fork,
549e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.attr		 = perf_event__process_attr,
550e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.tracing_data	 = perf_event__process_tracing_data,
551e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.build_id	 = perf_event__process_build_id,
552e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.ordered_samples = true,
553e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	.ordering_requires_timestamps = true,
554e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng};
555e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
556e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void sig_handler(int sig __maybe_unused)
557e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
558e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	session_done = 1;
559e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
560e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
561e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int __cmd_script(struct perf_session *session)
562e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
563e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int ret;
564e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
565e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	signal(SIGINT, sig_handler);
566e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
567e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	ret = perf_session__process_events(session, &perf_script);
568e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
569e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (debug_mode)
570e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pr_err("Misordered timestamps: %" PRIu64 "\n", nr_unordered);
571e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
572e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return ret;
573e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
574e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
575e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstruct script_spec {
576e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct list_head	node;
577e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct scripting_ops	*ops;
578e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char			spec[0];
579e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng};
580e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
581e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic LIST_HEAD(script_specs);
582e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
583e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct script_spec *script_spec__new(const char *spec,
584e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					    struct scripting_ops *ops)
585e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
586e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_spec *s = malloc(sizeof(*s) + strlen(spec) + 1);
587e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
588e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (s != NULL) {
589e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		strcpy(s->spec, spec);
590e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		s->ops = ops;
591e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
592e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
593e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return s;
594e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
595e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
596e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void script_spec__add(struct script_spec *s)
597e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
598e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	list_add_tail(&s->node, &script_specs);
599e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
600e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
601e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct script_spec *script_spec__find(const char *spec)
602e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
603e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_spec *s;
604e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
605e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	list_for_each_entry(s, &script_specs, node)
606e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (strcasecmp(s->spec, spec) == 0)
607e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return s;
608e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return NULL;
609e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
610e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
611e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct script_spec *script_spec__findnew(const char *spec,
612e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng						struct scripting_ops *ops)
613e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
614e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_spec *s = script_spec__find(spec);
615e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
616e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (s)
617e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return s;
618e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
619e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	s = script_spec__new(spec, ops);
620e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!s)
621e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return NULL;
622e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
623e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	script_spec__add(s);
624e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
625e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return s;
626e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
627e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
628e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengint script_spec_register(const char *spec, struct scripting_ops *ops)
629e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
630e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_spec *s;
631e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
632e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	s = script_spec__find(spec);
633e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (s)
634e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
635e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
636e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	s = script_spec__findnew(spec, ops);
637e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!s)
638e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
639e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
640e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
641e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
642e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
643e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct scripting_ops *script_spec__lookup(const char *spec)
644e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
645e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_spec *s = script_spec__find(spec);
646e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!s)
647e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return NULL;
648e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
649e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return s->ops;
650e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
651e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
652e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void list_available_languages(void)
653e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
654e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_spec *s;
655e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
656e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	fprintf(stderr, "\n");
657e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	fprintf(stderr, "Scripting language extensions (used in "
658e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		"perf script -s [spec:]script.[spec]):\n\n");
659e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
660e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	list_for_each_entry(s, &script_specs, node)
661e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		fprintf(stderr, "  %-42s [%s]\n", s->spec, s->ops->name);
662e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
663e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	fprintf(stderr, "\n");
664e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
665e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
666e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int parse_scriptname(const struct option *opt __maybe_unused,
667e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			    const char *str, int unset __maybe_unused)
668e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
669e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char spec[PATH_MAX];
670e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	const char *script, *ext;
671e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int len;
672e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
673e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (strcmp(str, "lang") == 0) {
674e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		list_available_languages();
675e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		exit(0);
676e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
677e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
678e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	script = strchr(str, ':');
679e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (script) {
680e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		len = script - str;
681e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (len >= PATH_MAX) {
682e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr, "invalid language specifier");
683e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
684e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
685e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		strncpy(spec, str, len);
686e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		spec[len] = '\0';
687e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		scripting_ops = script_spec__lookup(spec);
688e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!scripting_ops) {
689e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr, "invalid language specifier");
690e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
691e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
692e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		script++;
693e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	} else {
694e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		script = str;
695e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		ext = strrchr(script, '.');
696e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!ext) {
697e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr, "invalid script extension");
698e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
699e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
700e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		scripting_ops = script_spec__lookup(++ext);
701e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!scripting_ops) {
702e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr, "invalid script extension");
703e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
704e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
705e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
706e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
707e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	script_name = strdup(script);
708e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
709e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
710e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
711e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
712e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int parse_output_fields(const struct option *opt __maybe_unused,
713e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			    const char *arg, int unset __maybe_unused)
714e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
715e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *tok;
716e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int i, imax = ARRAY_SIZE(all_output_options);
717e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int j;
718e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int rc = 0;
719e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *str = strdup(arg);
720e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int type = -1;
721e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
722e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!str)
723e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -ENOMEM;
724e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
725e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	/* first word can state for which event type the user is specifying
726e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	 * the fields. If no type exists, the specified fields apply to all
727e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	 * event types found in the file minus the invalid fields for a type.
728e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	 */
729e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	tok = strchr(str, ':');
730e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (tok) {
731e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		*tok = '\0';
732e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		tok++;
733e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!strcmp(str, "hw"))
734e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			type = PERF_TYPE_HARDWARE;
735e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else if (!strcmp(str, "sw"))
736e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			type = PERF_TYPE_SOFTWARE;
737e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else if (!strcmp(str, "trace"))
738e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			type = PERF_TYPE_TRACEPOINT;
739e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else if (!strcmp(str, "raw"))
740e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			type = PERF_TYPE_RAW;
741e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else {
742e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr, "Invalid event type in field string.\n");
743e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			rc = -EINVAL;
744e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			goto out;
745e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
746e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
747e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (output[type].user_set)
748e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			pr_warning("Overriding previous field request for %s events.\n",
749e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				   event_type(type));
750e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
751e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		output[type].fields = 0;
752e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		output[type].user_set = true;
753e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		output[type].wildcard_set = false;
754e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
755e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	} else {
756e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		tok = str;
757e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (strlen(str) == 0) {
758e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr,
759e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				"Cannot set fields to 'none' for all event types.\n");
760e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			rc = -EINVAL;
761e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			goto out;
762e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
763e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
764e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (output_set_by_user())
765e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			pr_warning("Overriding previous field request for all events.\n");
766e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
767e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		for (j = 0; j < PERF_TYPE_MAX; ++j) {
768e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			output[j].fields = 0;
769e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			output[j].user_set = true;
770e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			output[j].wildcard_set = true;
771e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
772e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
773e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
774e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	tok = strtok(tok, ",");
775e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	while (tok) {
776e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		for (i = 0; i < imax; ++i) {
777e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (strcmp(tok, all_output_options[i].str) == 0)
778e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				break;
779e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
780e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (i == imax) {
781e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr, "Invalid field requested.\n");
782e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			rc = -EINVAL;
783e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			goto out;
784e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
785e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
786e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (type == -1) {
787e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			/* add user option to all events types for
788e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			 * which it is valid
789e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			 */
790e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			for (j = 0; j < PERF_TYPE_MAX; ++j) {
791e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				if (output[j].invalid_fields & all_output_options[i].field) {
792e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					pr_warning("\'%s\' not valid for %s events. Ignoring.\n",
793e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng						   all_output_options[i].str, event_type(j));
794e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				} else
795e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					output[j].fields |= all_output_options[i].field;
796e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
797e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		} else {
798e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (output[type].invalid_fields & all_output_options[i].field) {
799e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				fprintf(stderr, "\'%s\' not valid for %s events.\n",
800e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					 all_output_options[i].str, event_type(type));
801e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
802e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				rc = -EINVAL;
803e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				goto out;
804e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
805e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			output[type].fields |= all_output_options[i].field;
806e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
807e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
808e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		tok = strtok(NULL, ",");
809e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
810e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
811e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (type >= 0) {
812e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (output[type].fields == 0) {
813e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			pr_debug("No fields requested for %s type. "
814e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				 "Events will not be displayed.\n", event_type(type));
815e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
816e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
817e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
818e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengout:
819e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	free(str);
820e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return rc;
821e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
822e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
823e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng/* Helper function for filesystems that return a dent->d_type DT_UNKNOWN */
824e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int is_directory(const char *base_path, const struct dirent *dent)
825e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
826e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char path[PATH_MAX];
827e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct stat st;
828e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
829e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	sprintf(path, "%s/%s", base_path, dent->d_name);
830e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (stat(path, &st))
831e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return 0;
832e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
833e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return S_ISDIR(st.st_mode);
834e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
835e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
836e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#define for_each_lang(scripts_path, scripts_dir, lang_dirent, lang_next)\
837e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	while (!readdir_r(scripts_dir, &lang_dirent, &lang_next) &&	\
838e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	       lang_next)						\
839e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if ((lang_dirent.d_type == DT_DIR ||			\
840e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		     (lang_dirent.d_type == DT_UNKNOWN &&		\
841e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		      is_directory(scripts_path, &lang_dirent))) &&	\
842e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    (strcmp(lang_dirent.d_name, ".")) &&		\
843e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    (strcmp(lang_dirent.d_name, "..")))
844e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
845e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#define for_each_script(lang_path, lang_dir, script_dirent, script_next)\
846e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	while (!readdir_r(lang_dir, &script_dirent, &script_next) &&	\
847e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	       script_next)						\
848e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (script_dirent.d_type != DT_DIR &&			\
849e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    (script_dirent.d_type != DT_UNKNOWN ||		\
850e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		     !is_directory(lang_path, &script_dirent)))
851e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
852e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
853e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#define RECORD_SUFFIX			"-record"
854e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#define REPORT_SUFFIX			"-report"
855e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
856e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstruct script_desc {
857e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct list_head	node;
858e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char			*name;
859e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char			*half_liner;
860e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char			*args;
861e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng};
862e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
863e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic LIST_HEAD(script_descs);
864e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
865e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct script_desc *script_desc__new(const char *name)
866e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
867e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_desc *s = zalloc(sizeof(*s));
868e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
869e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (s != NULL && name)
870e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		s->name = strdup(name);
871e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
872e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return s;
873e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
874e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
875e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void script_desc__delete(struct script_desc *s)
876e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
877e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	free(s->name);
878e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	free(s->half_liner);
879e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	free(s->args);
880e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	free(s);
881e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
882e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
883e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic void script_desc__add(struct script_desc *s)
884e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
885e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	list_add_tail(&s->node, &script_descs);
886e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
887e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
888e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct script_desc *script_desc__find(const char *name)
889e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
890e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_desc *s;
891e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
892e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	list_for_each_entry(s, &script_descs, node)
893e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (strcasecmp(s->name, name) == 0)
894e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return s;
895e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return NULL;
896e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
897e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
898e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic struct script_desc *script_desc__findnew(const char *name)
899e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
900e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_desc *s = script_desc__find(name);
901e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
902e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (s)
903e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return s;
904e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
905e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	s = script_desc__new(name);
906e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!s)
907e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		goto out_delete_desc;
908e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
909e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	script_desc__add(s);
910e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
911e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return s;
912e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
913e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengout_delete_desc:
914e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	script_desc__delete(s);
915e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
916e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return NULL;
917e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
918e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
919e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic const char *ends_with(const char *str, const char *suffix)
920e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
921e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	size_t suffix_len = strlen(suffix);
922e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	const char *p = str;
923e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
924e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (strlen(str) > suffix_len) {
925e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		p = str + strlen(str) - suffix_len;
926e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!strncmp(p, suffix, suffix_len))
927e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return p;
928e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
929e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
930e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return NULL;
931e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
932e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
933e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int read_script_info(struct script_desc *desc, const char *filename)
934e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
935e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char line[BUFSIZ], *p;
936e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	FILE *fp;
937e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
938e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	fp = fopen(filename, "r");
939e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!fp)
940e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
941e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
942e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	while (fgets(line, sizeof(line), fp)) {
943e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		p = ltrim(line);
944e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (strlen(p) == 0)
945e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
946e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (*p != '#')
947e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
948e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		p++;
949e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (strlen(p) && *p == '!')
950e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
951e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
952e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		p = ltrim(p);
953e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (strlen(p) && p[strlen(p) - 1] == '\n')
954e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			p[strlen(p) - 1] = '\0';
955e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
956e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!strncmp(p, "description:", strlen("description:"))) {
957e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			p += strlen("description:");
958e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			desc->half_liner = strdup(ltrim(p));
959e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
960e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
961e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
962e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!strncmp(p, "args:", strlen("args:"))) {
963e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			p += strlen("args:");
964e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			desc->args = strdup(ltrim(p));
965e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
966e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
967e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
968e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
969e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	fclose(fp);
970e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
971e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
972e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
973e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
974e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic char *get_script_root(struct dirent *script_dirent, const char *suffix)
975e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
976e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *script_root, *str;
977e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
978e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	script_root = strdup(script_dirent->d_name);
979e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!script_root)
980e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return NULL;
981e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
982e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	str = (char *)ends_with(script_root, suffix);
983e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!str) {
984e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		free(script_root);
985e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return NULL;
986e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
987e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
988e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	*str = '\0';
989e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return script_root;
990e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
991e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
992e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int list_available_scripts(const struct option *opt __maybe_unused,
993e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				  const char *s __maybe_unused,
994e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				  int unset __maybe_unused)
995e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
996e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct dirent *script_next, *lang_next, script_dirent, lang_dirent;
997e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char scripts_path[MAXPATHLEN];
998e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	DIR *scripts_dir, *lang_dir;
999e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char script_path[MAXPATHLEN];
1000e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char lang_path[MAXPATHLEN];
1001e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_desc *desc;
1002e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char first_half[BUFSIZ];
1003e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *script_root;
1004e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1005e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	snprintf(scripts_path, MAXPATHLEN, "%s/scripts", perf_exec_path());
1006e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1007e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	scripts_dir = opendir(scripts_path);
1008e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!scripts_dir)
1009e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
1010e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1011e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	for_each_lang(scripts_path, scripts_dir, lang_dirent, lang_next) {
1012e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		snprintf(lang_path, MAXPATHLEN, "%s/%s/bin", scripts_path,
1013e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			 lang_dirent.d_name);
1014e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		lang_dir = opendir(lang_path);
1015e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!lang_dir)
1016e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
1017e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1018e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		for_each_script(lang_path, lang_dir, script_dirent, script_next) {
1019e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			script_root = get_script_root(&script_dirent, REPORT_SUFFIX);
1020e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (script_root) {
1021e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				desc = script_desc__findnew(script_root);
1022e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				snprintf(script_path, MAXPATHLEN, "%s/%s",
1023e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					 lang_path, script_dirent.d_name);
1024e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				read_script_info(desc, script_path);
1025e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				free(script_root);
1026e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
1027e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1028e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1029e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1030e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	fprintf(stdout, "List of available trace scripts:\n");
1031e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	list_for_each_entry(desc, &script_descs, node) {
1032e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		sprintf(first_half, "%s %s", desc->name,
1033e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			desc->args ? desc->args : "");
1034e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		fprintf(stdout, "  %-36s %s\n", first_half,
1035e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			desc->half_liner ? desc->half_liner : "");
1036e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1037e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1038e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	exit(0);
1039e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
1040e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1041e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng/*
1042e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * Some scripts specify the required events in their "xxx-record" file,
1043e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * this function will check if the events in perf.data match those
1044e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * mentioned in the "xxx-record".
1045e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng *
1046e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * Fixme: All existing "xxx-record" are all in good formats "-e event ",
1047e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * which is covered well now. And new parsing code should be added to
1048e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * cover the future complexing formats like event groups etc.
1049e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng */
1050e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int check_ev_match(char *dir_name, char *scriptname,
1051e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			struct perf_session *session)
1052e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
1053e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char filename[MAXPATHLEN], evname[128];
1054e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char line[BUFSIZ], *p;
1055e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_evsel *pos;
1056e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int match, len;
1057e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	FILE *fp;
1058e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1059e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	sprintf(filename, "%s/bin/%s-record", dir_name, scriptname);
1060e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1061e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	fp = fopen(filename, "r");
1062e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!fp)
1063e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
1064e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1065e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	while (fgets(line, sizeof(line), fp)) {
1066e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		p = ltrim(line);
1067e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (*p == '#')
1068e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
1069e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1070e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		while (strlen(p)) {
1071e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			p = strstr(p, "-e");
1072e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (!p)
1073e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				break;
1074e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1075e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			p += 2;
1076e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			p = ltrim(p);
1077e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			len = strcspn(p, " \t");
1078e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (!len)
1079e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				break;
1080e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1081e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			snprintf(evname, len + 1, "%s", p);
1082e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1083e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			match = 0;
1084e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			list_for_each_entry(pos,
1085e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					&session->evlist->entries, node) {
1086e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				if (!strcmp(perf_evsel__name(pos), evname)) {
1087e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					match = 1;
1088e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					break;
1089e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				}
1090e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
1091e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1092e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (!match) {
1093e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				fclose(fp);
1094e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				return -1;
1095e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
1096e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1097e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1098e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1099e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	fclose(fp);
1100e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
1101e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
1102e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1103e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng/*
1104e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * Return -1 if none is found, otherwise the actual scripts number.
1105e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng *
1106e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * Currently the only user of this function is the script browser, which
1107e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * will list all statically runnable scripts, select one, execute it and
1108e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng * show the output in a perf browser.
1109e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng */
1110e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengint find_scripts(char **scripts_array, char **scripts_path_array)
1111e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
1112e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct dirent *script_next, *lang_next, script_dirent, lang_dirent;
1113e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char scripts_path[MAXPATHLEN], lang_path[MAXPATHLEN];
1114e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	DIR *scripts_dir, *lang_dir;
1115e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_session *session;
1116e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *temp;
1117e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int i = 0;
1118e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1119e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	session = perf_session__new(input_name, O_RDONLY, 0, false, NULL);
1120e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!session)
1121e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
1122e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1123e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	snprintf(scripts_path, MAXPATHLEN, "%s/scripts", perf_exec_path());
1124e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1125e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	scripts_dir = opendir(scripts_path);
1126e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!scripts_dir) {
1127e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		perf_session__delete(session);
1128e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
1129e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1130e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1131e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	for_each_lang(scripts_path, scripts_dir, lang_dirent, lang_next) {
1132e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		snprintf(lang_path, MAXPATHLEN, "%s/%s", scripts_path,
1133e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			 lang_dirent.d_name);
1134e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#ifdef NO_LIBPERL
1135e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (strstr(lang_path, "perl"))
1136e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
1137e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#endif
1138e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#ifdef NO_LIBPYTHON
1139e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (strstr(lang_path, "python"))
1140e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
1141e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng#endif
1142e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1143e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		lang_dir = opendir(lang_path);
1144e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!lang_dir)
1145e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
1146e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1147e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		for_each_script(lang_path, lang_dir, script_dirent, script_next) {
1148e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			/* Skip those real time scripts: xxxtop.p[yl] */
1149e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (strstr(script_dirent.d_name, "top."))
1150e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				continue;
1151e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			sprintf(scripts_path_array[i], "%s/%s", lang_path,
1152e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				script_dirent.d_name);
1153e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			temp = strchr(script_dirent.d_name, '.');
1154e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			snprintf(scripts_array[i],
1155e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				(temp - script_dirent.d_name) + 1,
1156e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				"%s", script_dirent.d_name);
1157e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1158e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (check_ev_match(lang_path,
1159e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					scripts_array[i], session))
1160e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				continue;
1161e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1162e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			i++;
1163e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1164e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		closedir(lang_dir);
1165e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1166e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1167e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	closedir(scripts_dir);
1168e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	perf_session__delete(session);
1169e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return i;
1170e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
1171e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1172e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic char *get_script_path(const char *script_root, const char *suffix)
1173e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
1174e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct dirent *script_next, *lang_next, script_dirent, lang_dirent;
1175e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char scripts_path[MAXPATHLEN];
1176e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char script_path[MAXPATHLEN];
1177e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	DIR *scripts_dir, *lang_dir;
1178e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char lang_path[MAXPATHLEN];
1179e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *__script_root;
1180e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1181e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	snprintf(scripts_path, MAXPATHLEN, "%s/scripts", perf_exec_path());
1182e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1183e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	scripts_dir = opendir(scripts_path);
1184e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!scripts_dir)
1185e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return NULL;
1186e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1187e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	for_each_lang(scripts_path, scripts_dir, lang_dirent, lang_next) {
1188e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		snprintf(lang_path, MAXPATHLEN, "%s/%s/bin", scripts_path,
1189e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			 lang_dirent.d_name);
1190e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		lang_dir = opendir(lang_path);
1191e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!lang_dir)
1192e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			continue;
1193e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1194e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		for_each_script(lang_path, lang_dir, script_dirent, script_next) {
1195e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__script_root = get_script_root(&script_dirent, suffix);
1196e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (__script_root && !strcmp(script_root, __script_root)) {
1197e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				free(__script_root);
1198e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				closedir(lang_dir);
1199e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				closedir(scripts_dir);
1200e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				snprintf(script_path, MAXPATHLEN, "%s/%s",
1201e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					 lang_path, script_dirent.d_name);
1202e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				return strdup(script_path);
1203e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
1204e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			free(__script_root);
1205e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1206e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		closedir(lang_dir);
1207e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1208e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	closedir(scripts_dir);
1209e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1210e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return NULL;
1211e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
1212e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1213e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic bool is_top_script(const char *script_path)
1214e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
1215e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return ends_with(script_path, "top") == NULL ? false : true;
1216e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
1217e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1218e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int has_required_arg(char *script_path)
1219e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
1220e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct script_desc *desc;
1221e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int n_args = 0;
1222e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *p;
1223e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1224e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	desc = script_desc__new(NULL);
1225e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1226e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (read_script_info(desc, script_path))
1227e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		goto out;
1228e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1229e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!desc->args)
1230e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		goto out;
1231e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1232e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	for (p = desc->args; *p; p++)
1233e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (*p == '<')
1234e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			n_args++;
1235e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengout:
1236e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	script_desc__delete(desc);
1237e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1238e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return n_args;
1239e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
1240e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1241e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengstatic int have_cmd(int argc, const char **argv)
1242e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
1243e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char **__argv = malloc(sizeof(const char *) * argc);
1244e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1245e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!__argv) {
1246e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pr_err("malloc failed\n");
1247e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
1248e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1249e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1250e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	memcpy(__argv, argv, sizeof(const char *) * argc);
1251e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	argc = parse_options(argc, (const char **)__argv, record_options,
1252e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			     NULL, PARSE_OPT_STOP_AT_NON_OPTION);
1253e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	free(__argv);
1254e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1255e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	system_wide = (argc == 0);
1256e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1257e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return 0;
1258e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
1259e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1260e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengint cmd_script(int argc, const char **argv, const char *prefix __maybe_unused)
1261e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng{
1262e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	bool show_full_info = false;
1263e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *rec_script_path = NULL;
1264e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *rep_script_path = NULL;
1265e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	struct perf_session *session;
1266e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	char *script_path = NULL;
1267e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	const char **__argv;
1268e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	int i, j, err;
1269e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	const struct option options[] = {
1270e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_BOOLEAN('D', "dump-raw-trace", &dump_trace,
1271e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    "dump raw trace in ASCII"),
1272e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_INCR('v', "verbose", &verbose,
1273e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		 "be more verbose (show symbol address, etc)"),
1274e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_BOOLEAN('L', "Latency", &latency_format,
1275e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    "show latency attributes (irqs/preemption disabled, etc)"),
1276e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_CALLBACK_NOOPT('l', "list", NULL, NULL, "list available scripts",
1277e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			   list_available_scripts),
1278e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_CALLBACK('s', "script", NULL, "name",
1279e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		     "script file name (lang:script name, script name, or *)",
1280e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		     parse_scriptname),
1281e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_STRING('g', "gen-script", &generate_script_lang, "lang",
1282e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		   "generate perf-script.xx script in specified language"),
1283e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_STRING('i', "input", &input_name, "file", "input file name"),
1284e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_BOOLEAN('d', "debug-mode", &debug_mode,
1285e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		   "do various checks like samples ordering and lost events"),
1286e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_STRING('k', "vmlinux", &symbol_conf.vmlinux_name,
1287e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		   "file", "vmlinux pathname"),
1288e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_STRING(0, "kallsyms", &symbol_conf.kallsyms_name,
1289e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		   "file", "kallsyms pathname"),
1290e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_BOOLEAN('G', "hide-call-graph", &no_callchain,
1291e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    "When printing symbols do not display call chain"),
1292e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_STRING(0, "symfs", &symbol_conf.symfs, "directory",
1293e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    "Look for files with symbols relative to this directory"),
1294e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_CALLBACK('f', "fields", NULL, "str",
1295e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		     "comma separated output fields prepend with 'type:'. "
1296e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		     "Valid types: hw,sw,trace,raw. "
1297e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		     "Fields: comm,tid,pid,time,cpu,event,trace,ip,sym,dso,"
1298e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		     "addr,symoff", parse_output_fields),
1299e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_BOOLEAN('a', "all-cpus", &system_wide,
1300e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    "system-wide collection from all CPUs"),
1301e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_STRING('S', "symbols", &symbol_conf.sym_list_str, "symbol[,symbol...]",
1302e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		   "only consider these symbols"),
1303e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_STRING('C', "cpu", &cpu_list, "cpu", "list of cpus to profile"),
1304e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_STRING('c', "comms", &symbol_conf.comm_list_str, "comm[,comm...]",
1305e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		   "only display events for these comms"),
1306e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_BOOLEAN('I', "show-info", &show_full_info,
1307e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    "display extended information from perf.data file"),
1308e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_BOOLEAN('\0', "show-kernel-path", &symbol_conf.show_kernel_path,
1309e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		    "Show the path of [kernel.kallsyms]"),
1310e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	OPT_END()
1311e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	};
1312e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	const char * const script_usage[] = {
1313e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		"perf script [<options>]",
1314e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		"perf script [<options>] record <script> [<record-options>] <command>",
1315e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		"perf script [<options>] report <script> [script-args]",
1316e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		"perf script [<options>] <script> [<record-options>] <command>",
1317e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		"perf script [<options>] <top-script> [script-args]",
1318e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		NULL
1319e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	};
1320e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1321e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	setup_scripting();
1322e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1323e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	argc = parse_options(argc, argv, options, script_usage,
1324e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			     PARSE_OPT_STOP_AT_NON_OPTION);
1325e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1326e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (argc > 1 && !strncmp(argv[0], "rec", strlen("rec"))) {
1327e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		rec_script_path = get_script_path(argv[1], RECORD_SUFFIX);
1328e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!rec_script_path)
1329e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return cmd_record(argc, argv, NULL);
1330e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1331e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1332e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (argc > 1 && !strncmp(argv[0], "rep", strlen("rep"))) {
1333e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		rep_script_path = get_script_path(argv[1], REPORT_SUFFIX);
1334e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!rep_script_path) {
1335e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr,
1336e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				"Please specify a valid report script"
1337e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				"(see 'perf script -l' for listing)\n");
1338e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
1339e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1340e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1341e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1342e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	/* make sure PERF_EXEC_PATH is set for scripts */
1343e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	perf_set_argv_exec_path(perf_exec_path());
1344e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1345e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (argc && !script_name && !rec_script_path && !rep_script_path) {
1346e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		int live_pipe[2];
1347e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		int rep_args;
1348e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pid_t pid;
1349e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1350e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		rec_script_path = get_script_path(argv[0], RECORD_SUFFIX);
1351e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		rep_script_path = get_script_path(argv[0], REPORT_SUFFIX);
1352e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1353e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!rec_script_path && !rep_script_path) {
1354e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr, " Couldn't find script %s\n\n See perf"
1355e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				" script -l for available scripts.\n", argv[0]);
1356e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			usage_with_options(script_usage, options);
1357e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1358e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1359e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (is_top_script(argv[0])) {
1360e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			rep_args = argc - 1;
1361e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		} else {
1362e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			int rec_args;
1363e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1364e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			rep_args = has_required_arg(rep_script_path);
1365e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			rec_args = (argc - 1) - rep_args;
1366e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (rec_args < 0) {
1367e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				fprintf(stderr, " %s script requires options."
1368e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					"\n\n See perf script -l for available "
1369e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					"scripts and options.\n", argv[0]);
1370e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				usage_with_options(script_usage, options);
1371e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
1372e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1373e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1374e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (pipe(live_pipe) < 0) {
1375e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			perror("failed to create pipe");
1376e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
1377e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1378e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1379e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pid = fork();
1380e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (pid < 0) {
1381e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			perror("failed to fork");
1382e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
1383e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1384e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1385e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!pid) {
1386e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			j = 0;
1387e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1388e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			dup2(live_pipe[1], 1);
1389e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			close(live_pipe[0]);
1390e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1391e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (is_top_script(argv[0])) {
1392e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				system_wide = true;
1393e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			} else if (!system_wide) {
1394e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				if (have_cmd(argc - rep_args, &argv[rep_args]) != 0) {
1395e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					err = -1;
1396e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng					goto out;
1397e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				}
1398e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
1399e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1400e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv = malloc((argc + 6) * sizeof(const char *));
1401e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (!__argv) {
1402e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				pr_err("malloc failed\n");
1403e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				err = -ENOMEM;
1404e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				goto out;
1405e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
1406e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1407e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv[j++] = "/bin/sh";
1408e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv[j++] = rec_script_path;
1409e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (system_wide)
1410e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				__argv[j++] = "-a";
1411e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv[j++] = "-q";
1412e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv[j++] = "-o";
1413e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv[j++] = "-";
1414e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			for (i = rep_args + 1; i < argc; i++)
1415e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				__argv[j++] = argv[i];
1416e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv[j++] = NULL;
1417e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1418e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			execvp("/bin/sh", (char **)__argv);
1419e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			free(__argv);
1420e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			exit(-1);
1421e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1422e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1423e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		dup2(live_pipe[0], 0);
1424e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		close(live_pipe[1]);
1425e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1426e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv = malloc((argc + 4) * sizeof(const char *));
1427e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!__argv) {
1428e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			pr_err("malloc failed\n");
1429e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			err = -ENOMEM;
1430e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			goto out;
1431e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1432e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1433e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		j = 0;
1434e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv[j++] = "/bin/sh";
1435e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv[j++] = rep_script_path;
1436e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		for (i = 1; i < rep_args + 1; i++)
1437e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv[j++] = argv[i];
1438e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv[j++] = "-i";
1439e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv[j++] = "-";
1440e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv[j++] = NULL;
1441e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1442e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		execvp("/bin/sh", (char **)__argv);
1443e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		free(__argv);
1444e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		exit(-1);
1445e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1446e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1447e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (rec_script_path)
1448e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		script_path = rec_script_path;
1449e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (rep_script_path)
1450e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		script_path = rep_script_path;
1451e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1452e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (script_path) {
1453e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		j = 0;
1454e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1455e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!rec_script_path)
1456e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			system_wide = false;
1457e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		else if (!system_wide) {
1458e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			if (have_cmd(argc - 1, &argv[1]) != 0) {
1459e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				err = -1;
1460e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				goto out;
1461e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			}
1462e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1463e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1464e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv = malloc((argc + 2) * sizeof(const char *));
1465e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!__argv) {
1466e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			pr_err("malloc failed\n");
1467e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			err = -ENOMEM;
1468e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			goto out;
1469e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1470e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1471e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv[j++] = "/bin/sh";
1472e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv[j++] = script_path;
1473e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (system_wide)
1474e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv[j++] = "-a";
1475e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		for (i = 2; i < argc; i++)
1476e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			__argv[j++] = argv[i];
1477e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		__argv[j++] = NULL;
1478e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1479e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		execvp("/bin/sh", (char **)__argv);
1480e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		free(__argv);
1481e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		exit(-1);
1482e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1483e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1484e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (symbol__init() < 0)
1485e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -1;
1486e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!script_name)
1487e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		setup_pager();
1488e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1489e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	session = perf_session__new(input_name, O_RDONLY, 0, false,
1490e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				    &perf_script);
1491e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (session == NULL)
1492e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		return -ENOMEM;
1493e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1494e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (cpu_list) {
1495e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (perf_session__cpu_bitmap(session, cpu_list, cpu_bitmap))
1496e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
1497e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1498e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1499e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!script_name && !generate_script_lang)
1500e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		perf_session__fprintf_info(session, stdout, show_full_info);
1501e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1502e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (!no_callchain)
1503e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		symbol_conf.use_callchain = true;
1504e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	else
1505e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		symbol_conf.use_callchain = false;
1506e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1507e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (generate_script_lang) {
1508e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		struct stat perf_stat;
1509e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		int input;
1510e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1511e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (output_set_by_user()) {
1512e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr,
1513e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng				"custom fields not supported for generated scripts");
1514e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
1515e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1516e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1517e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		input = open(session->filename, O_RDONLY);	/* input_name */
1518e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (input < 0) {
1519e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			perror("failed to open file");
1520e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
1521e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1522e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1523e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		err = fstat(input, &perf_stat);
1524e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (err < 0) {
1525e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			perror("failed to stat file");
1526e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
1527e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1528e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1529e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!perf_stat.st_size) {
1530e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr, "zero-sized file, nothing to do!\n");
1531e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return 0;
1532e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1533e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1534e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		scripting_ops = script_spec__lookup(generate_script_lang);
1535e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (!scripting_ops) {
1536e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			fprintf(stderr, "invalid language specifier");
1537e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			return -1;
1538e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		}
1539e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1540e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		err = scripting_ops->generate_script(session->pevent,
1541e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng						     "perf-script");
1542e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		goto out;
1543e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1544e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1545e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (script_name) {
1546e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		err = scripting_ops->start_script(script_name, argc, argv);
1547e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		if (err)
1548e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng			goto out;
1549e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		pr_debug("perf script started with script %s\n\n", script_name);
1550e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	}
1551e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1552e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1553e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	err = perf_session__check_output_opt(session);
1554e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	if (err < 0)
1555e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng		goto out;
1556e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1557e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	err = __cmd_script(session);
1558e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng
1559e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	perf_session__delete(session);
1560e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	cleanup_scripting();
1561e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Chengout:
1562e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng	return err;
1563e6e8a0bd7cffcc9ae2e0e75546fb12a19213d4aeBen Cheng}
1564