2 * Copyright (C) 2011 - David Goulet <david.goulet@polymtl.ca>
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License, version 2 only,
6 * as published by the Free Software Foundation.
8 * This program is distributed in the hope that it will be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 * GNU General Public License for more details.
13 * You should have received a copy of the GNU General Public License along
14 * with this program; if not, write to the Free Software Foundation, Inc.,
15 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
24 #include <sys/types.h>
28 #include <common/mi-lttng.h>
30 #include "../command.h"
32 static char *opt_event_list
;
33 static int opt_kernel
;
34 static char *opt_channel_name
;
35 static char *opt_session_name
;
36 static int opt_userspace
;
37 static int opt_disable_all
;
40 static int opt_event_type
;
42 /* Not implemented yet */
43 static char *opt_cmd_name
;
54 static struct lttng_handle
*handle
;
55 static struct mi_writer
*writer
;
57 static struct poptOption long_options
[] = {
58 /* longName, shortName, argInfo, argPtr, value, descrip, argDesc */
59 {"help", 'h', POPT_ARG_NONE
, 0, OPT_HELP
, 0, 0},
60 {"session", 's', POPT_ARG_STRING
, &opt_session_name
, 0, 0, 0},
61 {"all-events", 'a', POPT_ARG_VAL
, &opt_disable_all
, 1, 0, 0},
62 {"channel", 'c', POPT_ARG_STRING
, &opt_channel_name
, 0, 0, 0},
63 {"jul", 'j', POPT_ARG_VAL
, &opt_jul
, 1, 0, 0},
64 {"log4j", 'l', POPT_ARG_VAL
, &opt_log4j
, 1, 0, 0},
65 {"kernel", 'k', POPT_ARG_VAL
, &opt_kernel
, 1, 0, 0},
66 {"syscall", 0, POPT_ARG_NONE
, 0, OPT_SYSCALL
, 0, 0},
68 /* Not implemented yet */
69 {"userspace", 'u', POPT_ARG_STRING
| POPT_ARGFLAG_OPTIONAL
, &opt_cmd_name
, OPT_USERSPACE
, 0, 0},
70 {"pid", 'p', POPT_ARG_INT
, &opt_pid
, 0, 0, 0},
72 {"userspace", 'u', POPT_ARG_NONE
, 0, OPT_USERSPACE
, 0, 0},
74 {"list-options", 0, POPT_ARG_NONE
, NULL
, OPT_LIST_OPTIONS
, NULL
, NULL
},
81 static void usage(FILE *ofp
)
83 fprintf(ofp
, "usage: lttng disable-event NAME[,NAME2,...] (-k | -u) [OPTIONS]\n");
85 fprintf(ofp
, "Options:\n");
86 fprintf(ofp
, " -h, --help Show this help\n");
87 fprintf(ofp
, " --list-options Simple listing of options\n");
88 fprintf(ofp
, " -s, --session NAME Apply to session name\n");
89 fprintf(ofp
, " -c, --channel NAME Apply to this channel\n");
90 fprintf(ofp
, " -a, --all-events Disable all tracepoints\n");
91 fprintf(ofp
, " -k, --kernel Apply for the kernel tracer\n");
92 fprintf(ofp
, " -u, --userspace Apply to the user-space tracer\n");
93 fprintf(ofp
, " -j, --jul Apply for Java application using JUL\n");
94 fprintf(ofp
, " -l, --log4j Apply to Java application using LOG4j\n");
96 fprintf(ofp
, "Event options:\n");
97 fprintf(ofp
, " --syscall System call event\n");
102 const char *print_channel_name(const char *name
)
104 return name
? : DEFAULT_CHANNEL_NAME
;
108 const char *print_raw_channel_name(const char *name
)
110 return name
? : "<default>";
113 /* Mi print a partial event.
117 static int mi_print_event(char *event_name
, int enabled
, int success
)
124 /* Open event element */
125 ret
= mi_lttng_writer_open_element(writer
, config_element_event
);
130 /* Print the name of event */
131 ret
= mi_lttng_writer_write_element_string(writer
,
132 config_element_name
, event_name
);
137 /* Print enabled ? */
138 ret
= mi_lttng_writer_write_element_bool(writer
,
139 config_element_enabled
, enabled
);
145 ret
= mi_lttng_writer_write_element_bool(writer
,
146 mi_lttng_element_command_success
, success
);
151 /* Close event element */
152 ret
= mi_lttng_writer_close_element(writer
);
160 * Disabling event using the lttng API.
162 static int disable_events(char *session_name
)
164 int ret
= CMD_SUCCESS
, warn
= 0, command_ret
= CMD_SUCCESS
;
165 int enabled
= 1, success
= 1;
166 char *event_name
, *channel_name
= NULL
;
167 struct lttng_domain dom
;
168 struct lttng_event event
;
170 memset(&dom
, 0, sizeof(dom
));
172 /* Create lttng domain */
174 dom
.type
= LTTNG_DOMAIN_KERNEL
;
175 } else if (opt_userspace
) {
176 dom
.type
= LTTNG_DOMAIN_UST
;
177 } else if (opt_jul
) {
178 dom
.type
= LTTNG_DOMAIN_JUL
;
179 } else if (opt_log4j
) {
180 dom
.type
= LTTNG_DOMAIN_LOG4J
;
182 print_missing_domain();
187 channel_name
= opt_channel_name
;
189 handle
= lttng_create_handle(session_name
, &dom
);
190 if (handle
== NULL
) {
195 /* Mi print the channel and open the events element */
197 ret
= mi_lttng_writer_open_element(writer
, config_element_channel
);
203 ret
= mi_lttng_writer_write_element_string(writer
,
204 config_element_name
, print_channel_name(channel_name
));
210 /* Open events element */
211 ret
= mi_lttng_writer_open_element(writer
, config_element_events
);
218 memset(&event
, 0, sizeof(event
));
219 /* Set default loglevel to any/unknown */
222 switch (opt_event_type
) {
223 case LTTNG_EVENT_SYSCALL
:
224 event
.type
= LTTNG_EVENT_SYSCALL
;
227 event
.type
= LTTNG_EVENT_ALL
;
231 if (opt_disable_all
) {
232 command_ret
= lttng_disable_event_ext(handle
, &event
, channel_name
, NULL
);
233 if (command_ret
< 0) {
234 ERR("%s", lttng_strerror(command_ret
));
241 MSG("All %s %s are disabled in channel %s",
242 get_domain_str(dom
.type
),
243 opt_event_type
== LTTNG_EVENT_SYSCALL
? "system calls" : "events",
244 print_channel_name(channel_name
));
248 ret
= mi_print_event("*", enabled
, success
);
255 /* Strip event list */
256 event_name
= strtok(opt_event_list
, ",");
257 while (event_name
!= NULL
) {
258 DBG("Disabling event %s", event_name
);
260 strncpy(event
.name
, event_name
, sizeof(event
.name
));
261 event
.name
[sizeof(event
.name
) - 1] = '\0';
262 command_ret
= lttng_disable_event_ext(handle
, &event
, channel_name
, NULL
);
263 if (command_ret
< 0) {
264 ERR("%s %s: %s (channel %s, session %s)",
265 opt_event_type
== LTTNG_EVENT_SYSCALL
? "System call" : "Event",
267 lttng_strerror(command_ret
),
268 command_ret
== -LTTNG_ERR_NEED_CHANNEL_NAME
269 ? print_raw_channel_name(channel_name
)
270 : print_channel_name(channel_name
),
275 * If an error occurred we assume that the event is still
280 MSG("%s %s %s disabled in channel %s for session %s",
281 get_domain_str(dom
.type
),
282 opt_event_type
== LTTNG_EVENT_SYSCALL
? "system call" : "event",
284 print_channel_name(channel_name
),
291 ret
= mi_print_event(event_name
, enabled
, success
);
299 event_name
= strtok(NULL
, ",");
305 /* Close events element and channel element */
306 ret
= mi_lttng_close_multi_element(writer
, 2);
312 /* if there is already an error preserve it */
317 /* Overwrite ret if an error occurred */
318 ret
= command_ret
? command_ret
: ret
;
320 lttng_destroy_handle(handle
);
327 * Disable event to trace session
329 int cmd_disable_events(int argc
, const char **argv
)
331 int opt
, ret
= CMD_SUCCESS
, command_ret
= CMD_SUCCESS
, success
= 1;
332 static poptContext pc
;
333 char *session_name
= NULL
;
336 pc
= poptGetContext(NULL
, argc
, argv
, long_options
, 0);
337 poptReadDefaultConfig(pc
, 0);
339 /* Default event type */
340 opt_event_type
= LTTNG_EVENT_ALL
;
342 while ((opt
= poptGetNextOpt(pc
)) != -1) {
351 opt_event_type
= LTTNG_EVENT_SYSCALL
;
353 case OPT_LIST_OPTIONS
:
354 list_cmd_options(stdout
, long_options
);
362 /* Validate event type. Multiple event type are not supported. */
363 if (event_type
== -1) {
364 event_type
= opt_event_type
;
366 if (event_type
!= opt_event_type
) {
367 ERR("Multiple event type not supported.");
374 opt_event_list
= (char*) poptGetArg(pc
);
375 if (opt_event_list
== NULL
&& opt_disable_all
== 0) {
376 ERR("Missing event name(s).\n");
382 if (!opt_session_name
) {
383 session_name
= get_session_name();
384 if (session_name
== NULL
) {
389 session_name
= opt_session_name
;
394 writer
= mi_lttng_writer_create(fileno(stdout
), lttng_opt_mi
);
396 ret
= -LTTNG_ERR_NOMEM
;
400 /* Open command element */
401 ret
= mi_lttng_writer_command_open(writer
,
402 mi_lttng_element_command_disable_event
);
408 /* Open output element */
409 ret
= mi_lttng_writer_open_element(writer
,
410 mi_lttng_element_command_output
);
417 command_ret
= disable_events(session_name
);
424 /* Close output element */
425 ret
= mi_lttng_writer_close_element(writer
);
431 ret
= mi_lttng_writer_write_element_bool(writer
,
432 mi_lttng_element_command_success
, success
);
438 /* Command element close */
439 ret
= mi_lttng_writer_command_close(writer
);
447 if (!opt_session_name
&& session_name
) {
452 if (writer
&& mi_lttng_writer_destroy(writer
)) {
453 /* Preserve original error code */
454 ret
= ret
? ret
: LTTNG_ERR_MI_IO_FAIL
;
457 /* Overwrite ret if an error occured in disable_events */
458 ret
= command_ret
? command_ret
: ret
;