2 * Copyright (C) 2011 - David Goulet <david.goulet@polymtl.ca>
4 * This program is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU General Public License
6 * as published by the Free Software Foundation; only version 2
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
25 #include <sys/types.h>
34 static char *opt_event_list
;
35 static int opt_event_type
;
36 static int opt_kernel
;
37 static char *opt_session_name
;
38 static int opt_userspace
;
39 static char *opt_cmd_name
;
40 static int opt_enable_all
;
42 static char *opt_probe
;
43 static char *opt_function
;
44 static char *opt_function_entry_symbol
;
45 static char *opt_channel_name
;
55 OPT_TRACEPOINT_LOGLEVEL
,
58 static struct lttng_handle
*handle
;
60 static struct poptOption long_options
[] = {
61 /* longName, shortName, argInfo, argPtr, value, descrip, argDesc */
62 {"help", 'h', POPT_ARG_NONE
, 0, OPT_HELP
, 0, 0},
63 {"session", 's', POPT_ARG_STRING
, &opt_session_name
, 0, 0, 0},
64 {"all", 'a', POPT_ARG_VAL
, &opt_enable_all
, 1, 0, 0},
65 {"channel", 'c', POPT_ARG_STRING
, &opt_channel_name
, 0, 0, 0},
66 {"kernel", 'k', POPT_ARG_VAL
, &opt_kernel
, 1, 0, 0},
67 {"userspace", 'u', POPT_ARG_STRING
| POPT_ARGFLAG_OPTIONAL
, &opt_cmd_name
, OPT_USERSPACE
, 0, 0},
68 {"pid", 'p', POPT_ARG_INT
, &opt_pid
, 0, 0, 0},
69 {"tracepoint", 0, POPT_ARG_NONE
, 0, OPT_TRACEPOINT
, 0, 0},
70 {"probe", 0, POPT_ARG_STRING
, &opt_probe
, OPT_PROBE
, 0, 0},
71 {"function", 0, POPT_ARG_STRING
, &opt_function
, OPT_FUNCTION
, 0, 0},
74 * Currently removed from lttng kernel tracer. Removed from
75 * lttng UI to discourage its use.
77 {"function:entry", 0, POPT_ARG_STRING
, &opt_function_entry_symbol
, OPT_FUNCTION_ENTRY
, 0, 0},
79 {"syscall", 0, POPT_ARG_NONE
, 0, OPT_SYSCALL
, 0, 0},
80 {"loglevel", 0, POPT_ARG_NONE
, 0, OPT_TRACEPOINT_LOGLEVEL
, 0, 0},
87 static void usage(FILE *ofp
)
89 fprintf(ofp
, "usage: lttng enable-event NAME[,NAME2,...] [options] [event_options]\n");
91 fprintf(ofp
, " -h, --help Show this help\n");
92 fprintf(ofp
, " -s, --session Apply on session name\n");
93 fprintf(ofp
, " -c, --channel Apply on this channel\n");
94 fprintf(ofp
, " -a, --all Enable all tracepoints\n");
95 fprintf(ofp
, " -k, --kernel Apply for the kernel tracer\n");
96 fprintf(ofp
, " -u, --userspace [CMD] Apply for the user-space tracer\n");
97 fprintf(ofp
, " If no CMD, the domain used is UST global\n");
98 fprintf(ofp
, " or else the domain is UST EXEC_NAME\n");
99 fprintf(ofp
, " -p, --pid PID If -u, apply to specific PID (domain: UST PID)\n");
101 fprintf(ofp
, "Event options:\n");
102 fprintf(ofp
, " --tracepoint Tracepoint event (default)\n");
103 fprintf(ofp
, " - userspace tracer supports wildcards at end of string.\n");
104 fprintf(ofp
, " Don't forget to quote to deal with bash expansion.\n");
105 fprintf(ofp
, " e.g.:\n");
106 fprintf(ofp
, " \"*\"\n");
107 fprintf(ofp
, " \"app_component:na*\"\n");
108 fprintf(ofp
, " --loglevel Tracepoint loglevel\n");
109 fprintf(ofp
, " --probe [addr | symbol | symbol+offset]\n");
110 fprintf(ofp
, " Dynamic probe.\n");
111 fprintf(ofp
, " Addr and offset can be octal (0NNN...),\n");
112 fprintf(ofp
, " decimal (NNN...) or hexadecimal (0xNNN...)\n");
113 fprintf(ofp
, " --function [addr | symbol | symbol+offset]\n");
114 fprintf(ofp
, " Dynamic function entry/return probe.\n");
115 fprintf(ofp
, " Addr and offset can be octal (0NNN...),\n");
116 fprintf(ofp
, " decimal (NNN...) or hexadecimal (0xNNN...)\n");
118 fprintf(ofp
, " --function:entry symbol\n");
119 fprintf(ofp
, " Function tracer event\n");
121 fprintf(ofp
, " --syscall System call event\n");
126 * Parse probe options.
128 static int parse_probe_opts(struct lttng_event
*ev
, char *opt
)
132 char name
[LTTNG_SYMBOL_NAME_LEN
];
139 /* Check for symbol+offset */
140 ret
= sscanf(opt
, "%[^'+']+%s", name
, s_hex
);
142 strncpy(ev
->attr
.probe
.symbol_name
, name
, LTTNG_SYMBOL_NAME_LEN
);
143 ev
->attr
.probe
.symbol_name
[LTTNG_SYMBOL_NAME_LEN
- 1] = '\0';
144 DBG("probe symbol %s", ev
->attr
.probe
.symbol_name
);
145 if (strlen(s_hex
) == 0) {
146 ERR("Invalid probe offset %s", s_hex
);
150 ev
->attr
.probe
.offset
= strtoul(s_hex
, NULL
, 0);
151 DBG("probe offset %" PRIu64
, ev
->attr
.probe
.offset
);
152 ev
->attr
.probe
.addr
= 0;
156 /* Check for symbol */
157 if (isalpha(name
[0])) {
158 ret
= sscanf(opt
, "%s", name
);
160 strncpy(ev
->attr
.probe
.symbol_name
, name
, LTTNG_SYMBOL_NAME_LEN
);
161 ev
->attr
.probe
.symbol_name
[LTTNG_SYMBOL_NAME_LEN
- 1] = '\0';
162 DBG("probe symbol %s", ev
->attr
.probe
.symbol_name
);
163 ev
->attr
.probe
.offset
= 0;
164 DBG("probe offset %" PRIu64
, ev
->attr
.probe
.offset
);
165 ev
->attr
.probe
.addr
= 0;
170 /* Check for address */
171 ret
= sscanf(opt
, "%s", s_hex
);
173 if (strlen(s_hex
) == 0) {
174 ERR("Invalid probe address %s", s_hex
);
178 ev
->attr
.probe
.addr
= strtoul(s_hex
, NULL
, 0);
179 DBG("probe addr %" PRIu64
, ev
->attr
.probe
.addr
);
180 ev
->attr
.probe
.offset
= 0;
181 memset(ev
->attr
.probe
.symbol_name
, 0, LTTNG_SYMBOL_NAME_LEN
);
193 * Enabling event using the lttng API.
195 static int enable_events(char *session_name
)
197 int err
, ret
= CMD_SUCCESS
;
198 char *event_name
, *channel_name
= NULL
;
199 struct lttng_event ev
;
200 struct lttng_domain dom
;
202 if (opt_channel_name
== NULL
) {
203 err
= asprintf(&channel_name
, DEFAULT_CHANNEL_NAME
);
209 channel_name
= opt_channel_name
;
212 if (opt_kernel
&& opt_userspace
) {
213 ERR("Can't use -k/--kernel and -u/--userspace together");
218 /* Create lttng domain */
220 dom
.type
= LTTNG_DOMAIN_KERNEL
;
221 } else if (opt_pid
!= 0) {
222 dom
.type
= LTTNG_DOMAIN_UST_PID
;
223 dom
.attr
.pid
= opt_pid
;
224 DBG("PID %d set to lttng handle", opt_pid
);
225 } else if (opt_userspace
&& opt_cmd_name
== NULL
) {
226 dom
.type
= LTTNG_DOMAIN_UST
;
227 } else if (opt_userspace
&& opt_cmd_name
!= NULL
) {
228 dom
.type
= LTTNG_DOMAIN_UST_EXEC_NAME
;
229 strncpy(dom
.attr
.exec_name
, opt_cmd_name
, NAME_MAX
);
231 ERR("Please specify a tracer (-k/--kernel or -u/--userspace)");
232 ret
= CMD_NOT_IMPLEMENTED
;
236 handle
= lttng_create_handle(session_name
, &dom
);
237 if (handle
== NULL
) {
242 if (opt_enable_all
) {
243 /* Default setup for enable all */
245 ev
.type
= opt_event_type
;
247 ret
= lttng_enable_event(handle
, &ev
, channel_name
);
252 switch (opt_event_type
) {
253 case LTTNG_EVENT_TRACEPOINT
:
254 MSG("All %s tracepoints are enabled in channel %s",
255 opt_kernel
? "kernel" : "UST", channel_name
);
257 case LTTNG_EVENT_SYSCALL
:
259 MSG("All kernel system calls are enabled in channel %s",
263 case LTTNG_EVENT_ALL
:
264 MSG("All %s events are enabled in channel %s",
265 opt_kernel
? "kernel" : "UST", channel_name
);
269 * We should not be here since lttng_enable_event should have
270 * failed on the event type.
277 /* Strip event list */
278 event_name
= strtok(opt_event_list
, ",");
279 while (event_name
!= NULL
) {
280 /* Copy name and type of the event */
281 strncpy(ev
.name
, event_name
, LTTNG_SYMBOL_NAME_LEN
);
282 ev
.name
[LTTNG_SYMBOL_NAME_LEN
- 1] = '\0';
283 ev
.type
= opt_event_type
;
285 /* Kernel tracer action */
287 DBG("Enabling kernel event %s for channel %s",
288 event_name
, channel_name
);
290 switch (opt_event_type
) {
291 case LTTNG_EVENT_ALL
: /* Default behavior is tracepoint */
292 ev
.type
= LTTNG_EVENT_TRACEPOINT
;
294 case LTTNG_EVENT_TRACEPOINT
:
296 case LTTNG_EVENT_PROBE
:
297 ret
= parse_probe_opts(&ev
, opt_probe
);
299 ERR("Unable to parse probe options");
304 case LTTNG_EVENT_FUNCTION
:
305 ret
= parse_probe_opts(&ev
, opt_function
);
307 ERR("Unable to parse function probe options");
312 case LTTNG_EVENT_FUNCTION_ENTRY
:
313 strncpy(ev
.attr
.ftrace
.symbol_name
, opt_function_entry_symbol
,
314 LTTNG_SYMBOL_NAME_LEN
);
315 ev
.attr
.ftrace
.symbol_name
[LTTNG_SYMBOL_NAME_LEN
- 1] = '\0';
317 case LTTNG_EVENT_SYSCALL
:
318 MSG("per-syscall selection not supported yet. Use \"-a\" "
319 "for all syscalls.");
321 ret
= CMD_NOT_IMPLEMENTED
;
324 } else if (opt_userspace
) { /* User-space tracer action */
325 if (opt_cmd_name
!= NULL
|| opt_pid
) {
326 MSG("Only supporting tracing all UST processes (-u) for now.");
327 ret
= CMD_NOT_IMPLEMENTED
;
331 DBG("Enabling UST event %s for channel %s", event_name
,
334 switch (opt_event_type
) {
335 case LTTNG_EVENT_ALL
: /* Default behavior is tracepoint */
337 case LTTNG_EVENT_TRACEPOINT
:
338 /* Copy name and type of the event */
339 ev
.type
= LTTNG_EVENT_TRACEPOINT
;
340 strncpy(ev
.name
, event_name
, LTTNG_SYMBOL_NAME_LEN
);
341 ev
.name
[LTTNG_SYMBOL_NAME_LEN
- 1] = '\0';
343 case LTTNG_EVENT_TRACEPOINT_LOGLEVEL
:
344 /* Copy name and type of the event */
345 ev
.type
= LTTNG_EVENT_TRACEPOINT_LOGLEVEL
;
346 strncpy(ev
.name
, event_name
, LTTNG_SYMBOL_NAME_LEN
);
347 ev
.name
[LTTNG_SYMBOL_NAME_LEN
- 1] = '\0';
349 case LTTNG_EVENT_PROBE
:
350 case LTTNG_EVENT_FUNCTION
:
351 case LTTNG_EVENT_FUNCTION_ENTRY
:
352 case LTTNG_EVENT_SYSCALL
:
354 ret
= CMD_NOT_IMPLEMENTED
;
358 ERR("Please specify a tracer (-k/--kernel or -u/--userspace)");
362 ret
= lttng_enable_event(handle
, &ev
, channel_name
);
364 MSG("%s event %s created in channel %s",
365 opt_kernel
? "kernel": "UST", event_name
, channel_name
);
369 event_name
= strtok(NULL
, ",");
374 if (opt_channel_name
== NULL
) {
377 lttng_destroy_handle(handle
);
383 * Add event to trace session
385 int cmd_enable_events(int argc
, const char **argv
)
388 static poptContext pc
;
389 char *session_name
= NULL
;
391 pc
= poptGetContext(NULL
, argc
, argv
, long_options
, 0);
392 poptReadDefaultConfig(pc
, 0);
394 /* Default event type */
395 opt_event_type
= LTTNG_EVENT_ALL
;
397 while ((opt
= poptGetNextOpt(pc
)) != -1) {
404 opt_event_type
= LTTNG_EVENT_TRACEPOINT
;
407 opt_event_type
= LTTNG_EVENT_PROBE
;
410 opt_event_type
= LTTNG_EVENT_FUNCTION
;
412 case OPT_FUNCTION_ENTRY
:
413 opt_event_type
= LTTNG_EVENT_FUNCTION_ENTRY
;
416 opt_event_type
= LTTNG_EVENT_SYSCALL
;
421 case OPT_TRACEPOINT_LOGLEVEL
:
422 opt_event_type
= LTTNG_EVENT_TRACEPOINT_LOGLEVEL
;
431 opt_event_list
= (char*) poptGetArg(pc
);
432 if (opt_event_list
== NULL
&& opt_enable_all
== 0) {
433 ERR("Missing event name(s).\n");
439 if (!opt_session_name
) {
440 session_name
= get_session_name();
441 if (session_name
== NULL
) {
446 session_name
= opt_session_name
;
449 ret
= enable_events(session_name
);
452 if (opt_session_name
== NULL
) {