2 * Copyright (C) 2012 - David Goulet <dgoulet@efficios.com>
4 * This program is free software; you can redistribute it and/or modify it
5 * under the terms of the GNU General Public License, version 2 only, as
6 * published by the Free Software Foundation.
8 * This program is distributed in the hope that it will be useful, but WITHOUT
9 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
10 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
13 * You should have received a copy of the GNU General Public License along with
14 * this program; if not, write to the Free Software Foundation, Inc., 51
15 * Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23 #include <urcu/list.h>
24 #include <urcu/uatomic.h>
26 #include <common/defaults.h>
27 #include <common/common.h>
28 #include <common/sessiond-comm/sessiond-comm.h>
29 #include <common/relayd/relayd.h>
30 #include <common/utils.h>
35 #include "health-sessiond.h"
37 #include "kernel-consumer.h"
38 #include "lttng-sessiond.h"
46 * Used to keep a unique index for each relayd socket created where this value
47 * is associated with streams on the consumer so it can match the right relayd
48 * to send to. It must be accessed with the relayd_net_seq_idx_lock
51 static pthread_mutex_t relayd_net_seq_idx_lock
= PTHREAD_MUTEX_INITIALIZER
;
52 static uint64_t relayd_net_seq_idx
;
54 static int validate_event_name(const char *);
55 static int validate_ust_event_name(const char *);
56 static int cmd_enable_event_internal(struct ltt_session
*session
,
57 struct lttng_domain
*domain
,
58 char *channel_name
, struct lttng_event
*event
,
59 char *filter_expression
,
60 struct lttng_filter_bytecode
*filter
,
61 struct lttng_event_exclusion
*exclusion
,
65 * Create a session path used by list_lttng_sessions for the case that the
66 * session consumer is on the network.
68 static int build_network_session_path(char *dst
, size_t size
,
69 struct ltt_session
*session
)
71 int ret
, kdata_port
, udata_port
;
72 struct lttng_uri
*kuri
= NULL
, *uuri
= NULL
, *uri
= NULL
;
73 char tmp_uurl
[PATH_MAX
], tmp_urls
[PATH_MAX
];
78 memset(tmp_urls
, 0, sizeof(tmp_urls
));
79 memset(tmp_uurl
, 0, sizeof(tmp_uurl
));
81 kdata_port
= udata_port
= DEFAULT_NETWORK_DATA_PORT
;
83 if (session
->kernel_session
&& session
->kernel_session
->consumer
) {
84 kuri
= &session
->kernel_session
->consumer
->dst
.net
.control
;
85 kdata_port
= session
->kernel_session
->consumer
->dst
.net
.data
.port
;
88 if (session
->ust_session
&& session
->ust_session
->consumer
) {
89 uuri
= &session
->ust_session
->consumer
->dst
.net
.control
;
90 udata_port
= session
->ust_session
->consumer
->dst
.net
.data
.port
;
93 if (uuri
== NULL
&& kuri
== NULL
) {
94 uri
= &session
->consumer
->dst
.net
.control
;
95 kdata_port
= session
->consumer
->dst
.net
.data
.port
;
96 } else if (kuri
&& uuri
) {
97 ret
= uri_compare(kuri
, uuri
);
101 /* Build uuri URL string */
102 ret
= uri_to_str_url(uuri
, tmp_uurl
, sizeof(tmp_uurl
));
109 } else if (kuri
&& uuri
== NULL
) {
111 } else if (uuri
&& kuri
== NULL
) {
115 ret
= uri_to_str_url(uri
, tmp_urls
, sizeof(tmp_urls
));
121 * Do we have a UST url set. If yes, this means we have both kernel and UST
124 if (*tmp_uurl
!= '\0') {
125 ret
= snprintf(dst
, size
, "[K]: %s [data: %d] -- [U]: %s [data: %d]",
126 tmp_urls
, kdata_port
, tmp_uurl
, udata_port
);
129 if (kuri
|| (!kuri
&& !uuri
)) {
132 /* No kernel URI, use the UST port. */
135 ret
= snprintf(dst
, size
, "%s [data: %d]", tmp_urls
, dport
);
143 * Fill lttng_channel array of all channels.
145 static void list_lttng_channels(enum lttng_domain_type domain
,
146 struct ltt_session
*session
, struct lttng_channel
*channels
)
149 struct ltt_kernel_channel
*kchan
;
151 DBG("Listing channels for session %s", session
->name
);
154 case LTTNG_DOMAIN_KERNEL
:
155 /* Kernel channels */
156 if (session
->kernel_session
!= NULL
) {
157 cds_list_for_each_entry(kchan
,
158 &session
->kernel_session
->channel_list
.head
, list
) {
159 /* Copy lttng_channel struct to array */
160 memcpy(&channels
[i
], kchan
->channel
, sizeof(struct lttng_channel
));
161 channels
[i
].enabled
= kchan
->enabled
;
166 case LTTNG_DOMAIN_UST
:
168 struct lttng_ht_iter iter
;
169 struct ltt_ust_channel
*uchan
;
172 cds_lfht_for_each_entry(session
->ust_session
->domain_global
.channels
->ht
,
173 &iter
.iter
, uchan
, node
.node
) {
174 strncpy(channels
[i
].name
, uchan
->name
, LTTNG_SYMBOL_NAME_LEN
);
175 channels
[i
].attr
.overwrite
= uchan
->attr
.overwrite
;
176 channels
[i
].attr
.subbuf_size
= uchan
->attr
.subbuf_size
;
177 channels
[i
].attr
.num_subbuf
= uchan
->attr
.num_subbuf
;
178 channels
[i
].attr
.switch_timer_interval
=
179 uchan
->attr
.switch_timer_interval
;
180 channels
[i
].attr
.read_timer_interval
=
181 uchan
->attr
.read_timer_interval
;
182 channels
[i
].enabled
= uchan
->enabled
;
183 channels
[i
].attr
.tracefile_size
= uchan
->tracefile_size
;
184 channels
[i
].attr
.tracefile_count
= uchan
->tracefile_count
;
185 switch (uchan
->attr
.output
) {
188 channels
[i
].attr
.output
= LTTNG_EVENT_MMAP
;
202 * Create a list of agent domain events.
204 * Return number of events in list on success or else a negative value.
206 static int list_lttng_agent_events(struct agent
*agt
,
207 struct lttng_event
**events
)
210 unsigned int nb_event
= 0;
211 struct agent_event
*event
;
212 struct lttng_event
*tmp_events
;
213 struct lttng_ht_iter iter
;
218 DBG3("Listing agent events");
221 nb_event
= lttng_ht_get_count(agt
->events
);
228 tmp_events
= zmalloc(nb_event
* sizeof(*tmp_events
));
230 PERROR("zmalloc agent events session");
231 ret
= -LTTNG_ERR_FATAL
;
236 cds_lfht_for_each_entry(agt
->events
->ht
, &iter
.iter
, event
, node
.node
) {
237 strncpy(tmp_events
[i
].name
, event
->name
, sizeof(tmp_events
[i
].name
));
238 tmp_events
[i
].name
[sizeof(tmp_events
[i
].name
) - 1] = '\0';
239 tmp_events
[i
].enabled
= event
->enabled
;
240 tmp_events
[i
].loglevel
= event
->loglevel_value
;
241 tmp_events
[i
].loglevel_type
= event
->loglevel_type
;
246 *events
= tmp_events
;
250 assert(nb_event
== i
);
255 * Create a list of ust global domain events.
257 static int list_lttng_ust_global_events(char *channel_name
,
258 struct ltt_ust_domain_global
*ust_global
, struct lttng_event
**events
)
261 unsigned int nb_event
= 0;
262 struct lttng_ht_iter iter
;
263 struct lttng_ht_node_str
*node
;
264 struct ltt_ust_channel
*uchan
;
265 struct ltt_ust_event
*uevent
;
266 struct lttng_event
*tmp
;
268 DBG("Listing UST global events for channel %s", channel_name
);
272 lttng_ht_lookup(ust_global
->channels
, (void *)channel_name
, &iter
);
273 node
= lttng_ht_iter_get_node_str(&iter
);
275 ret
= LTTNG_ERR_UST_CHAN_NOT_FOUND
;
279 uchan
= caa_container_of(&node
->node
, struct ltt_ust_channel
, node
.node
);
281 nb_event
= lttng_ht_get_count(uchan
->events
);
287 DBG3("Listing UST global %d events", nb_event
);
289 tmp
= zmalloc(nb_event
* sizeof(struct lttng_event
));
291 ret
= LTTNG_ERR_FATAL
;
295 cds_lfht_for_each_entry(uchan
->events
->ht
, &iter
.iter
, uevent
, node
.node
) {
296 if (uevent
->internal
) {
297 /* This event should remain hidden from clients */
301 strncpy(tmp
[i
].name
, uevent
->attr
.name
, LTTNG_SYMBOL_NAME_LEN
);
302 tmp
[i
].name
[LTTNG_SYMBOL_NAME_LEN
- 1] = '\0';
303 tmp
[i
].enabled
= uevent
->enabled
;
305 switch (uevent
->attr
.instrumentation
) {
306 case LTTNG_UST_TRACEPOINT
:
307 tmp
[i
].type
= LTTNG_EVENT_TRACEPOINT
;
309 case LTTNG_UST_PROBE
:
310 tmp
[i
].type
= LTTNG_EVENT_PROBE
;
312 case LTTNG_UST_FUNCTION
:
313 tmp
[i
].type
= LTTNG_EVENT_FUNCTION
;
317 tmp
[i
].loglevel
= uevent
->attr
.loglevel
;
318 switch (uevent
->attr
.loglevel_type
) {
319 case LTTNG_UST_LOGLEVEL_ALL
:
320 tmp
[i
].loglevel_type
= LTTNG_EVENT_LOGLEVEL_ALL
;
322 case LTTNG_UST_LOGLEVEL_RANGE
:
323 tmp
[i
].loglevel_type
= LTTNG_EVENT_LOGLEVEL_RANGE
;
325 case LTTNG_UST_LOGLEVEL_SINGLE
:
326 tmp
[i
].loglevel_type
= LTTNG_EVENT_LOGLEVEL_SINGLE
;
329 if (uevent
->filter
) {
332 if (uevent
->exclusion
) {
333 tmp
[i
].exclusion
= 1;
347 * Fill lttng_event array of all kernel events in the channel.
349 static int list_lttng_kernel_events(char *channel_name
,
350 struct ltt_kernel_session
*kernel_session
, struct lttng_event
**events
)
353 unsigned int nb_event
;
354 struct ltt_kernel_event
*event
;
355 struct ltt_kernel_channel
*kchan
;
357 kchan
= trace_kernel_get_channel_by_name(channel_name
, kernel_session
);
359 ret
= LTTNG_ERR_KERN_CHAN_NOT_FOUND
;
363 nb_event
= kchan
->event_count
;
365 DBG("Listing events for channel %s", kchan
->channel
->name
);
372 *events
= zmalloc(nb_event
* sizeof(struct lttng_event
));
373 if (*events
== NULL
) {
374 ret
= LTTNG_ERR_FATAL
;
378 /* Kernel channels */
379 cds_list_for_each_entry(event
, &kchan
->events_list
.head
, list
) {
380 strncpy((*events
)[i
].name
, event
->event
->name
, LTTNG_SYMBOL_NAME_LEN
);
381 (*events
)[i
].name
[LTTNG_SYMBOL_NAME_LEN
- 1] = '\0';
382 (*events
)[i
].enabled
= event
->enabled
;
383 (*events
)[i
].filter
=
384 (unsigned char) !!event
->filter_expression
;
386 switch (event
->event
->instrumentation
) {
387 case LTTNG_KERNEL_TRACEPOINT
:
388 (*events
)[i
].type
= LTTNG_EVENT_TRACEPOINT
;
390 case LTTNG_KERNEL_KRETPROBE
:
391 (*events
)[i
].type
= LTTNG_EVENT_FUNCTION
;
392 memcpy(&(*events
)[i
].attr
.probe
, &event
->event
->u
.kprobe
,
393 sizeof(struct lttng_kernel_kprobe
));
395 case LTTNG_KERNEL_KPROBE
:
396 (*events
)[i
].type
= LTTNG_EVENT_PROBE
;
397 memcpy(&(*events
)[i
].attr
.probe
, &event
->event
->u
.kprobe
,
398 sizeof(struct lttng_kernel_kprobe
));
400 case LTTNG_KERNEL_FUNCTION
:
401 (*events
)[i
].type
= LTTNG_EVENT_FUNCTION
;
402 memcpy(&((*events
)[i
].attr
.ftrace
), &event
->event
->u
.ftrace
,
403 sizeof(struct lttng_kernel_function
));
405 case LTTNG_KERNEL_NOOP
:
406 (*events
)[i
].type
= LTTNG_EVENT_NOOP
;
408 case LTTNG_KERNEL_SYSCALL
:
409 (*events
)[i
].type
= LTTNG_EVENT_SYSCALL
;
411 case LTTNG_KERNEL_ALL
:
422 new_size
= syscall_list_channel(kchan
, events
, nb_event
);
434 /* Negate the error code to differentiate the size from an error */
439 * Add URI so the consumer output object. Set the correct path depending on the
440 * domain adding the default trace directory.
442 static int add_uri_to_consumer(struct consumer_output
*consumer
,
443 struct lttng_uri
*uri
, enum lttng_domain_type domain
,
444 const char *session_name
)
447 const char *default_trace_dir
;
451 if (consumer
== NULL
) {
452 DBG("No consumer detected. Don't add URI. Stopping.");
453 ret
= LTTNG_ERR_NO_CONSUMER
;
458 case LTTNG_DOMAIN_KERNEL
:
459 default_trace_dir
= DEFAULT_KERNEL_TRACE_DIR
;
461 case LTTNG_DOMAIN_UST
:
462 default_trace_dir
= DEFAULT_UST_TRACE_DIR
;
466 * This case is possible is we try to add the URI to the global tracing
467 * session consumer object which in this case there is no subdir.
469 default_trace_dir
= "";
472 switch (uri
->dtype
) {
475 DBG2("Setting network URI to consumer");
477 if (consumer
->type
== CONSUMER_DST_NET
) {
478 if ((uri
->stype
== LTTNG_STREAM_CONTROL
&&
479 consumer
->dst
.net
.control_isset
) ||
480 (uri
->stype
== LTTNG_STREAM_DATA
&&
481 consumer
->dst
.net
.data_isset
)) {
482 ret
= LTTNG_ERR_URL_EXIST
;
486 memset(&consumer
->dst
.net
, 0, sizeof(consumer
->dst
.net
));
489 consumer
->type
= CONSUMER_DST_NET
;
491 /* Set URI into consumer output object */
492 ret
= consumer_set_network_uri(consumer
, uri
);
496 } else if (ret
== 1) {
498 * URI was the same in the consumer so we do not append the subdir
499 * again so to not duplicate output dir.
505 if (uri
->stype
== LTTNG_STREAM_CONTROL
&& strlen(uri
->subdir
) == 0) {
506 ret
= consumer_set_subdir(consumer
, session_name
);
508 ret
= LTTNG_ERR_FATAL
;
513 if (uri
->stype
== LTTNG_STREAM_CONTROL
) {
514 /* On a new subdir, reappend the default trace dir. */
515 strncat(consumer
->subdir
, default_trace_dir
,
516 sizeof(consumer
->subdir
) - strlen(consumer
->subdir
) - 1);
517 DBG3("Append domain trace name to subdir %s", consumer
->subdir
);
522 DBG2("Setting trace directory path from URI to %s", uri
->dst
.path
);
523 memset(consumer
->dst
.trace_path
, 0,
524 sizeof(consumer
->dst
.trace_path
));
525 strncpy(consumer
->dst
.trace_path
, uri
->dst
.path
,
526 sizeof(consumer
->dst
.trace_path
));
527 /* Append default trace dir */
528 strncat(consumer
->dst
.trace_path
, default_trace_dir
,
529 sizeof(consumer
->dst
.trace_path
) -
530 strlen(consumer
->dst
.trace_path
) - 1);
531 /* Flag consumer as local. */
532 consumer
->type
= CONSUMER_DST_LOCAL
;
543 * Init tracing by creating trace directory and sending fds kernel consumer.
545 static int init_kernel_tracing(struct ltt_kernel_session
*session
)
548 struct lttng_ht_iter iter
;
549 struct consumer_socket
*socket
;
555 if (session
->consumer_fds_sent
== 0 && session
->consumer
!= NULL
) {
556 cds_lfht_for_each_entry(session
->consumer
->socks
->ht
, &iter
.iter
,
558 pthread_mutex_lock(socket
->lock
);
559 ret
= kernel_consumer_send_session(socket
, session
);
560 pthread_mutex_unlock(socket
->lock
);
562 ret
= LTTNG_ERR_KERN_CONSUMER_FAIL
;
574 * Create a socket to the relayd using the URI.
576 * On success, the relayd_sock pointer is set to the created socket.
577 * Else, it's stays untouched and a lttcomm error code is returned.
579 static int create_connect_relayd(struct lttng_uri
*uri
,
580 struct lttcomm_relayd_sock
**relayd_sock
)
583 struct lttcomm_relayd_sock
*rsock
;
585 rsock
= lttcomm_alloc_relayd_sock(uri
, RELAYD_VERSION_COMM_MAJOR
,
586 RELAYD_VERSION_COMM_MINOR
);
588 ret
= LTTNG_ERR_FATAL
;
593 * Connect to relayd so we can proceed with a session creation. This call
594 * can possibly block for an arbitrary amount of time to set the health
595 * state to be in poll execution.
598 ret
= relayd_connect(rsock
);
601 ERR("Unable to reach lttng-relayd");
602 ret
= LTTNG_ERR_RELAYD_CONNECT_FAIL
;
606 /* Create socket for control stream. */
607 if (uri
->stype
== LTTNG_STREAM_CONTROL
) {
608 DBG3("Creating relayd stream socket from URI");
610 /* Check relayd version */
611 ret
= relayd_version_check(rsock
);
613 ret
= LTTNG_ERR_RELAYD_VERSION_FAIL
;
616 } else if (uri
->stype
== LTTNG_STREAM_DATA
) {
617 DBG3("Creating relayd data socket from URI");
619 /* Command is not valid */
620 ERR("Relayd invalid stream type: %d", uri
->stype
);
621 ret
= LTTNG_ERR_INVALID
;
625 *relayd_sock
= rsock
;
630 /* The returned value is not useful since we are on an error path. */
631 (void) relayd_close(rsock
);
639 * Connect to the relayd using URI and send the socket to the right consumer.
641 static int send_consumer_relayd_socket(enum lttng_domain_type domain
,
642 unsigned int session_id
, struct lttng_uri
*relayd_uri
,
643 struct consumer_output
*consumer
,
644 struct consumer_socket
*consumer_sock
,
645 char *session_name
, char *hostname
, int session_live_timer
)
648 struct lttcomm_relayd_sock
*rsock
= NULL
;
650 /* Connect to relayd and make version check if uri is the control. */
651 ret
= create_connect_relayd(relayd_uri
, &rsock
);
652 if (ret
!= LTTNG_OK
) {
657 /* Set the network sequence index if not set. */
658 if (consumer
->net_seq_index
== (uint64_t) -1ULL) {
659 pthread_mutex_lock(&relayd_net_seq_idx_lock
);
661 * Increment net_seq_idx because we are about to transfer the
662 * new relayd socket to the consumer.
663 * Assign unique key so the consumer can match streams.
665 consumer
->net_seq_index
= ++relayd_net_seq_idx
;
666 pthread_mutex_unlock(&relayd_net_seq_idx_lock
);
669 /* Send relayd socket to consumer. */
670 ret
= consumer_send_relayd_socket(consumer_sock
, rsock
, consumer
,
671 relayd_uri
->stype
, session_id
,
672 session_name
, hostname
, session_live_timer
);
674 ret
= LTTNG_ERR_ENABLE_CONSUMER_FAIL
;
678 /* Flag that the corresponding socket was sent. */
679 if (relayd_uri
->stype
== LTTNG_STREAM_CONTROL
) {
680 consumer_sock
->control_sock_sent
= 1;
681 } else if (relayd_uri
->stype
== LTTNG_STREAM_DATA
) {
682 consumer_sock
->data_sock_sent
= 1;
688 * Close socket which was dup on the consumer side. The session daemon does
689 * NOT keep track of the relayd socket(s) once transfer to the consumer.
693 (void) relayd_close(rsock
);
697 if (ret
!= LTTNG_OK
) {
699 * The consumer output for this session should not be used anymore
700 * since the relayd connection failed thus making any tracing or/and
701 * streaming not usable.
703 consumer
->enabled
= 0;
709 * Send both relayd sockets to a specific consumer and domain. This is a
710 * helper function to facilitate sending the information to the consumer for a
713 static int send_consumer_relayd_sockets(enum lttng_domain_type domain
,
714 unsigned int session_id
, struct consumer_output
*consumer
,
715 struct consumer_socket
*sock
, char *session_name
,
716 char *hostname
, int session_live_timer
)
723 /* Sending control relayd socket. */
724 if (!sock
->control_sock_sent
) {
725 ret
= send_consumer_relayd_socket(domain
, session_id
,
726 &consumer
->dst
.net
.control
, consumer
, sock
,
727 session_name
, hostname
, session_live_timer
);
728 if (ret
!= LTTNG_OK
) {
733 /* Sending data relayd socket. */
734 if (!sock
->data_sock_sent
) {
735 ret
= send_consumer_relayd_socket(domain
, session_id
,
736 &consumer
->dst
.net
.data
, consumer
, sock
,
737 session_name
, hostname
, session_live_timer
);
738 if (ret
!= LTTNG_OK
) {
748 * Setup relayd connections for a tracing session. First creates the socket to
749 * the relayd and send them to the right domain consumer. Consumer type MUST be
752 int cmd_setup_relayd(struct ltt_session
*session
)
755 struct ltt_ust_session
*usess
;
756 struct ltt_kernel_session
*ksess
;
757 struct consumer_socket
*socket
;
758 struct lttng_ht_iter iter
;
762 usess
= session
->ust_session
;
763 ksess
= session
->kernel_session
;
765 DBG("Setting relayd for session %s", session
->name
);
769 if (usess
&& usess
->consumer
&& usess
->consumer
->type
== CONSUMER_DST_NET
770 && usess
->consumer
->enabled
) {
771 /* For each consumer socket, send relayd sockets */
772 cds_lfht_for_each_entry(usess
->consumer
->socks
->ht
, &iter
.iter
,
774 pthread_mutex_lock(socket
->lock
);
775 ret
= send_consumer_relayd_sockets(LTTNG_DOMAIN_UST
, session
->id
,
776 usess
->consumer
, socket
,
777 session
->name
, session
->hostname
,
778 session
->live_timer
);
779 pthread_mutex_unlock(socket
->lock
);
780 if (ret
!= LTTNG_OK
) {
783 /* Session is now ready for network streaming. */
784 session
->net_handle
= 1;
788 if (ksess
&& ksess
->consumer
&& ksess
->consumer
->type
== CONSUMER_DST_NET
789 && ksess
->consumer
->enabled
) {
790 cds_lfht_for_each_entry(ksess
->consumer
->socks
->ht
, &iter
.iter
,
792 pthread_mutex_lock(socket
->lock
);
793 ret
= send_consumer_relayd_sockets(LTTNG_DOMAIN_KERNEL
, session
->id
,
794 ksess
->consumer
, socket
,
795 session
->name
, session
->hostname
,
796 session
->live_timer
);
797 pthread_mutex_unlock(socket
->lock
);
798 if (ret
!= LTTNG_OK
) {
801 /* Session is now ready for network streaming. */
802 session
->net_handle
= 1;
812 * Start a kernel session by opening all necessary streams.
814 static int start_kernel_session(struct ltt_kernel_session
*ksess
, int wpipe
)
817 struct ltt_kernel_channel
*kchan
;
819 /* Open kernel metadata */
820 if (ksess
->metadata
== NULL
&& ksess
->output_traces
) {
821 ret
= kernel_open_metadata(ksess
);
823 ret
= LTTNG_ERR_KERN_META_FAIL
;
828 /* Open kernel metadata stream */
829 if (ksess
->metadata
&& ksess
->metadata_stream_fd
< 0) {
830 ret
= kernel_open_metadata_stream(ksess
);
832 ERR("Kernel create metadata stream failed");
833 ret
= LTTNG_ERR_KERN_STREAM_FAIL
;
838 /* For each channel */
839 cds_list_for_each_entry(kchan
, &ksess
->channel_list
.head
, list
) {
840 if (kchan
->stream_count
== 0) {
841 ret
= kernel_open_channel_stream(kchan
);
843 ret
= LTTNG_ERR_KERN_STREAM_FAIL
;
846 /* Update the stream global counter */
847 ksess
->stream_count_global
+= ret
;
851 /* Setup kernel consumer socket and send fds to it */
852 ret
= init_kernel_tracing(ksess
);
854 ret
= LTTNG_ERR_KERN_START_FAIL
;
858 /* This start the kernel tracing */
859 ret
= kernel_start_session(ksess
);
861 ret
= LTTNG_ERR_KERN_START_FAIL
;
865 /* Quiescent wait after starting trace */
866 kernel_wait_quiescent(kernel_tracer_fd
);
877 * Command LTTNG_DISABLE_CHANNEL processed by the client thread.
879 int cmd_disable_channel(struct ltt_session
*session
,
880 enum lttng_domain_type domain
, char *channel_name
)
883 struct ltt_ust_session
*usess
;
885 usess
= session
->ust_session
;
890 case LTTNG_DOMAIN_KERNEL
:
892 ret
= channel_kernel_disable(session
->kernel_session
,
894 if (ret
!= LTTNG_OK
) {
898 kernel_wait_quiescent(kernel_tracer_fd
);
901 case LTTNG_DOMAIN_UST
:
903 struct ltt_ust_channel
*uchan
;
904 struct lttng_ht
*chan_ht
;
906 chan_ht
= usess
->domain_global
.channels
;
908 uchan
= trace_ust_find_channel_by_name(chan_ht
, channel_name
);
910 ret
= LTTNG_ERR_UST_CHAN_NOT_FOUND
;
914 ret
= channel_ust_disable(usess
, uchan
);
915 if (ret
!= LTTNG_OK
) {
921 ret
= LTTNG_ERR_UNKNOWN_DOMAIN
;
933 * Command LTTNG_TRACK_PID processed by the client thread.
935 * Called with session lock held.
937 int cmd_track_pid(struct ltt_session
*session
, enum lttng_domain_type domain
,
945 case LTTNG_DOMAIN_KERNEL
:
947 struct ltt_kernel_session
*ksess
;
949 ksess
= session
->kernel_session
;
951 ret
= kernel_track_pid(ksess
, pid
);
952 if (ret
!= LTTNG_OK
) {
956 kernel_wait_quiescent(kernel_tracer_fd
);
959 case LTTNG_DOMAIN_UST
:
961 struct ltt_ust_session
*usess
;
963 usess
= session
->ust_session
;
965 ret
= trace_ust_track_pid(usess
, pid
);
966 if (ret
!= LTTNG_OK
) {
972 ret
= LTTNG_ERR_UNKNOWN_DOMAIN
;
984 * Command LTTNG_UNTRACK_PID processed by the client thread.
986 * Called with session lock held.
988 int cmd_untrack_pid(struct ltt_session
*session
, enum lttng_domain_type domain
,
996 case LTTNG_DOMAIN_KERNEL
:
998 struct ltt_kernel_session
*ksess
;
1000 ksess
= session
->kernel_session
;
1002 ret
= kernel_untrack_pid(ksess
, pid
);
1003 if (ret
!= LTTNG_OK
) {
1007 kernel_wait_quiescent(kernel_tracer_fd
);
1010 case LTTNG_DOMAIN_UST
:
1012 struct ltt_ust_session
*usess
;
1014 usess
= session
->ust_session
;
1016 ret
= trace_ust_untrack_pid(usess
, pid
);
1017 if (ret
!= LTTNG_OK
) {
1023 ret
= LTTNG_ERR_UNKNOWN_DOMAIN
;
1035 * Command LTTNG_ENABLE_CHANNEL processed by the client thread.
1037 * The wpipe arguments is used as a notifier for the kernel thread.
1039 int cmd_enable_channel(struct ltt_session
*session
,
1040 struct lttng_domain
*domain
, struct lttng_channel
*attr
, int wpipe
)
1043 struct ltt_ust_session
*usess
= session
->ust_session
;
1044 struct lttng_ht
*chan_ht
;
1051 len
= strnlen(attr
->name
, sizeof(attr
->name
));
1053 /* Validate channel name */
1054 if (attr
->name
[0] == '.' ||
1055 memchr(attr
->name
, '/', len
) != NULL
) {
1056 ret
= LTTNG_ERR_INVALID_CHANNEL_NAME
;
1060 DBG("Enabling channel %s for session %s", attr
->name
, session
->name
);
1065 * Don't try to enable a channel if the session has been started at
1066 * some point in time before. The tracer does not allow it.
1068 if (session
->has_been_started
) {
1069 ret
= LTTNG_ERR_TRACE_ALREADY_STARTED
;
1074 * If the session is a live session, remove the switch timer, the
1075 * live timer does the same thing but sends also synchronisation
1076 * beacons for inactive streams.
1078 if (session
->live_timer
> 0) {
1079 attr
->attr
.live_timer_interval
= session
->live_timer
;
1080 attr
->attr
.switch_timer_interval
= 0;
1084 * The ringbuffer (both in user space and kernel) behave badly in overwrite
1085 * mode and with less than 2 subbuf so block it right away and send back an
1086 * invalid attribute error.
1088 if (attr
->attr
.overwrite
&& attr
->attr
.num_subbuf
< 2) {
1089 ret
= LTTNG_ERR_INVALID
;
1093 switch (domain
->type
) {
1094 case LTTNG_DOMAIN_KERNEL
:
1096 struct ltt_kernel_channel
*kchan
;
1098 kchan
= trace_kernel_get_channel_by_name(attr
->name
,
1099 session
->kernel_session
);
1100 if (kchan
== NULL
) {
1101 ret
= channel_kernel_create(session
->kernel_session
, attr
, wpipe
);
1102 if (attr
->name
[0] != '\0') {
1103 session
->kernel_session
->has_non_default_channel
= 1;
1106 ret
= channel_kernel_enable(session
->kernel_session
, kchan
);
1109 if (ret
!= LTTNG_OK
) {
1113 kernel_wait_quiescent(kernel_tracer_fd
);
1116 case LTTNG_DOMAIN_UST
:
1117 case LTTNG_DOMAIN_JUL
:
1118 case LTTNG_DOMAIN_LOG4J
:
1119 case LTTNG_DOMAIN_PYTHON
:
1121 struct ltt_ust_channel
*uchan
;
1126 * Current agent implementation limitations force us to allow
1127 * only one channel at once in "agent" subdomains. Each
1128 * subdomain has a default channel name which must be strictly
1131 if (domain
->type
== LTTNG_DOMAIN_JUL
) {
1132 if (strncmp(attr
->name
, DEFAULT_JUL_CHANNEL_NAME
,
1133 LTTNG_SYMBOL_NAME_LEN
)) {
1134 ret
= LTTNG_ERR_INVALID_CHANNEL_NAME
;
1137 } else if (domain
->type
== LTTNG_DOMAIN_LOG4J
) {
1138 if (strncmp(attr
->name
, DEFAULT_LOG4J_CHANNEL_NAME
,
1139 LTTNG_SYMBOL_NAME_LEN
)) {
1140 ret
= LTTNG_ERR_INVALID_CHANNEL_NAME
;
1143 } else if (domain
->type
== LTTNG_DOMAIN_PYTHON
) {
1144 if (strncmp(attr
->name
, DEFAULT_PYTHON_CHANNEL_NAME
,
1145 LTTNG_SYMBOL_NAME_LEN
)) {
1146 ret
= LTTNG_ERR_INVALID_CHANNEL_NAME
;
1151 chan_ht
= usess
->domain_global
.channels
;
1153 uchan
= trace_ust_find_channel_by_name(chan_ht
, attr
->name
);
1154 if (uchan
== NULL
) {
1155 ret
= channel_ust_create(usess
, attr
, domain
->buf_type
);
1156 if (attr
->name
[0] != '\0') {
1157 usess
->has_non_default_channel
= 1;
1160 ret
= channel_ust_enable(usess
, uchan
);
1165 ret
= LTTNG_ERR_UNKNOWN_DOMAIN
;
1176 * Command LTTNG_DISABLE_EVENT processed by the client thread.
1178 int cmd_disable_event(struct ltt_session
*session
,
1179 enum lttng_domain_type domain
, char *channel_name
,
1180 struct lttng_event
*event
)
1185 DBG("Disable event command for event \'%s\'", event
->name
);
1187 event_name
= event
->name
;
1188 if (validate_event_name(event_name
)) {
1189 ret
= LTTNG_ERR_INVALID_EVENT_NAME
;
1193 /* Error out on unhandled search criteria */
1194 if (event
->loglevel_type
|| event
->loglevel
!= -1 || event
->enabled
1195 || event
->pid
|| event
->filter
|| event
->exclusion
) {
1196 ret
= LTTNG_ERR_UNK
;
1203 case LTTNG_DOMAIN_KERNEL
:
1205 struct ltt_kernel_channel
*kchan
;
1206 struct ltt_kernel_session
*ksess
;
1208 ksess
= session
->kernel_session
;
1211 * If a non-default channel has been created in the
1212 * session, explicitely require that -c chan_name needs
1215 if (ksess
->has_non_default_channel
&& channel_name
[0] == '\0') {
1216 ret
= LTTNG_ERR_NEED_CHANNEL_NAME
;
1220 kchan
= trace_kernel_get_channel_by_name(channel_name
, ksess
);
1221 if (kchan
== NULL
) {
1222 ret
= LTTNG_ERR_KERN_CHAN_NOT_FOUND
;
1226 switch (event
->type
) {
1227 case LTTNG_EVENT_ALL
:
1228 case LTTNG_EVENT_TRACEPOINT
:
1229 case LTTNG_EVENT_SYSCALL
:
1230 case LTTNG_EVENT_PROBE
:
1231 case LTTNG_EVENT_FUNCTION
:
1232 case LTTNG_EVENT_FUNCTION_ENTRY
:/* fall-through */
1233 if (event_name
[0] == '\0') {
1234 ret
= event_kernel_disable_event(kchan
,
1237 ret
= event_kernel_disable_event(kchan
,
1238 event_name
, event
->type
);
1240 if (ret
!= LTTNG_OK
) {
1245 ret
= LTTNG_ERR_UNK
;
1249 kernel_wait_quiescent(kernel_tracer_fd
);
1252 case LTTNG_DOMAIN_UST
:
1254 struct ltt_ust_channel
*uchan
;
1255 struct ltt_ust_session
*usess
;
1257 usess
= session
->ust_session
;
1259 if (validate_ust_event_name(event_name
)) {
1260 ret
= LTTNG_ERR_INVALID_EVENT_NAME
;
1265 * If a non-default channel has been created in the
1266 * session, explicitly require that -c chan_name needs
1269 if (usess
->has_non_default_channel
&& channel_name
[0] == '\0') {
1270 ret
= LTTNG_ERR_NEED_CHANNEL_NAME
;
1274 uchan
= trace_ust_find_channel_by_name(usess
->domain_global
.channels
,
1276 if (uchan
== NULL
) {
1277 ret
= LTTNG_ERR_UST_CHAN_NOT_FOUND
;
1281 switch (event
->type
) {
1282 case LTTNG_EVENT_ALL
:
1284 * An empty event name means that everything
1285 * should be disabled.
1287 if (event
->name
[0] == '\0') {
1288 ret
= event_ust_disable_all_tracepoints(usess
, uchan
);
1290 ret
= event_ust_disable_tracepoint(usess
, uchan
,
1293 if (ret
!= LTTNG_OK
) {
1298 ret
= LTTNG_ERR_UNK
;
1302 DBG3("Disable UST event %s in channel %s completed", event_name
,
1306 case LTTNG_DOMAIN_LOG4J
:
1307 case LTTNG_DOMAIN_JUL
:
1308 case LTTNG_DOMAIN_PYTHON
:
1311 struct ltt_ust_session
*usess
= session
->ust_session
;
1315 switch (event
->type
) {
1316 case LTTNG_EVENT_ALL
:
1319 ret
= LTTNG_ERR_UNK
;
1323 agt
= trace_ust_find_agent(usess
, domain
);
1325 ret
= -LTTNG_ERR_UST_EVENT_NOT_FOUND
;
1329 * An empty event name means that everything
1330 * should be disabled.
1332 if (event
->name
[0] == '\0') {
1333 ret
= event_agent_disable_all(usess
, agt
);
1335 ret
= event_agent_disable(usess
, agt
, event_name
);
1337 if (ret
!= LTTNG_OK
) {
1344 ret
= LTTNG_ERR_UND
;
1357 * Command LTTNG_ADD_CONTEXT processed by the client thread.
1359 int cmd_add_context(struct ltt_session
*session
, enum lttng_domain_type domain
,
1360 char *channel_name
, struct lttng_event_context
*ctx
, int kwpipe
)
1362 int ret
, chan_kern_created
= 0, chan_ust_created
= 0;
1365 case LTTNG_DOMAIN_KERNEL
:
1366 assert(session
->kernel_session
);
1368 if (session
->kernel_session
->channel_count
== 0) {
1369 /* Create default channel */
1370 ret
= channel_kernel_create(session
->kernel_session
, NULL
, kwpipe
);
1371 if (ret
!= LTTNG_OK
) {
1374 chan_kern_created
= 1;
1376 /* Add kernel context to kernel tracer */
1377 ret
= context_kernel_add(session
->kernel_session
, ctx
, channel_name
);
1378 if (ret
!= LTTNG_OK
) {
1382 case LTTNG_DOMAIN_UST
:
1384 struct ltt_ust_session
*usess
= session
->ust_session
;
1385 unsigned int chan_count
;
1389 chan_count
= lttng_ht_get_count(usess
->domain_global
.channels
);
1390 if (chan_count
== 0) {
1391 struct lttng_channel
*attr
;
1392 /* Create default channel */
1393 attr
= channel_new_default_attr(domain
, usess
->buffer_type
);
1395 ret
= LTTNG_ERR_FATAL
;
1399 ret
= channel_ust_create(usess
, attr
, usess
->buffer_type
);
1400 if (ret
!= LTTNG_OK
) {
1405 chan_ust_created
= 1;
1408 ret
= context_ust_add(usess
, domain
, ctx
, channel_name
);
1409 if (ret
!= LTTNG_OK
) {
1415 ret
= LTTNG_ERR_UND
;
1422 if (chan_kern_created
) {
1423 struct ltt_kernel_channel
*kchan
=
1424 trace_kernel_get_channel_by_name(DEFAULT_CHANNEL_NAME
,
1425 session
->kernel_session
);
1426 /* Created previously, this should NOT fail. */
1428 kernel_destroy_channel(kchan
);
1431 if (chan_ust_created
) {
1432 struct ltt_ust_channel
*uchan
=
1433 trace_ust_find_channel_by_name(
1434 session
->ust_session
->domain_global
.channels
,
1435 DEFAULT_CHANNEL_NAME
);
1436 /* Created previously, this should NOT fail. */
1438 /* Remove from the channel list of the session. */
1439 trace_ust_delete_channel(session
->ust_session
->domain_global
.channels
,
1441 trace_ust_destroy_channel(uchan
);
1446 static int validate_event_name(const char *name
)
1449 const char *c
= name
;
1450 const char *event_name_end
= c
+ LTTNG_SYMBOL_NAME_LEN
;
1451 bool null_terminated
= false;
1454 * Make sure that unescaped wildcards are only used as the last
1455 * character of the event name.
1457 while (c
< event_name_end
) {
1460 null_terminated
= true;
1466 if ((c
+ 1) < event_name_end
&& *(c
+ 1)) {
1467 /* Wildcard is not the last character */
1468 ret
= LTTNG_ERR_INVALID_EVENT_NAME
;
1477 if (!ret
&& !null_terminated
) {
1478 ret
= LTTNG_ERR_INVALID_EVENT_NAME
;
1483 static inline bool name_starts_with(const char *name
, const char *prefix
)
1485 const size_t max_cmp_len
= min(strlen(prefix
), LTTNG_SYMBOL_NAME_LEN
);
1487 return !strncmp(name
, prefix
, max_cmp_len
);
1490 /* Perform userspace-specific event name validation */
1491 static int validate_ust_event_name(const char *name
)
1501 * Check name against all internal UST event component namespaces used
1504 if (name_starts_with(name
, DEFAULT_JUL_EVENT_COMPONENT
) ||
1505 name_starts_with(name
, DEFAULT_LOG4J_EVENT_COMPONENT
) ||
1506 name_starts_with(name
, DEFAULT_PYTHON_EVENT_COMPONENT
)) {
1515 * Internal version of cmd_enable_event() with a supplemental
1516 * "internal_event" flag which is used to enable internal events which should
1517 * be hidden from clients. Such events are used in the agent implementation to
1518 * enable the events through which all "agent" events are funeled.
1520 static int _cmd_enable_event(struct ltt_session
*session
,
1521 struct lttng_domain
*domain
,
1522 char *channel_name
, struct lttng_event
*event
,
1523 char *filter_expression
,
1524 struct lttng_filter_bytecode
*filter
,
1525 struct lttng_event_exclusion
*exclusion
,
1526 int wpipe
, bool internal_event
)
1528 int ret
, channel_created
= 0;
1529 struct lttng_channel
*attr
;
1533 assert(channel_name
);
1535 /* If we have a filter, we must have its filter expression */
1536 assert(!(!!filter_expression
^ !!filter
));
1538 DBG("Enable event command for event \'%s\'", event
->name
);
1542 ret
= validate_event_name(event
->name
);
1547 switch (domain
->type
) {
1548 case LTTNG_DOMAIN_KERNEL
:
1550 struct ltt_kernel_channel
*kchan
;
1553 * If a non-default channel has been created in the
1554 * session, explicitely require that -c chan_name needs
1557 if (session
->kernel_session
->has_non_default_channel
1558 && channel_name
[0] == '\0') {
1559 ret
= LTTNG_ERR_NEED_CHANNEL_NAME
;
1563 kchan
= trace_kernel_get_channel_by_name(channel_name
,
1564 session
->kernel_session
);
1565 if (kchan
== NULL
) {
1566 attr
= channel_new_default_attr(LTTNG_DOMAIN_KERNEL
,
1567 LTTNG_BUFFER_GLOBAL
);
1569 ret
= LTTNG_ERR_FATAL
;
1572 strncpy(attr
->name
, channel_name
, sizeof(attr
->name
));
1574 ret
= cmd_enable_channel(session
, domain
, attr
, wpipe
);
1575 if (ret
!= LTTNG_OK
) {
1581 channel_created
= 1;
1584 /* Get the newly created kernel channel pointer */
1585 kchan
= trace_kernel_get_channel_by_name(channel_name
,
1586 session
->kernel_session
);
1587 if (kchan
== NULL
) {
1588 /* This sould not happen... */
1589 ret
= LTTNG_ERR_FATAL
;
1593 switch (event
->type
) {
1594 case LTTNG_EVENT_ALL
:
1596 char *filter_expression_a
= NULL
;
1597 struct lttng_filter_bytecode
*filter_a
= NULL
;
1600 * We need to duplicate filter_expression and filter,
1601 * because ownership is passed to first enable
1604 if (filter_expression
) {
1605 filter_expression_a
= strdup(filter_expression
);
1606 if (!filter_expression_a
) {
1607 ret
= LTTNG_ERR_FATAL
;
1612 filter_a
= zmalloc(sizeof(*filter_a
) + filter
->len
);
1614 free(filter_expression_a
);
1615 ret
= LTTNG_ERR_FATAL
;
1618 memcpy(filter_a
, filter
, sizeof(*filter_a
) + filter
->len
);
1620 event
->type
= LTTNG_EVENT_TRACEPOINT
; /* Hack */
1621 ret
= event_kernel_enable_event(kchan
, event
,
1622 filter_expression
, filter
);
1623 /* We have passed ownership */
1624 filter_expression
= NULL
;
1626 if (ret
!= LTTNG_OK
) {
1627 if (channel_created
) {
1628 /* Let's not leak a useless channel. */
1629 kernel_destroy_channel(kchan
);
1631 free(filter_expression_a
);
1635 event
->type
= LTTNG_EVENT_SYSCALL
; /* Hack */
1636 ret
= event_kernel_enable_event(kchan
, event
,
1637 filter_expression_a
, filter_a
);
1638 /* We have passed ownership */
1639 filter_expression_a
= NULL
;
1641 if (ret
!= LTTNG_OK
) {
1646 case LTTNG_EVENT_PROBE
:
1647 case LTTNG_EVENT_FUNCTION
:
1648 case LTTNG_EVENT_FUNCTION_ENTRY
:
1649 case LTTNG_EVENT_TRACEPOINT
:
1650 ret
= event_kernel_enable_event(kchan
, event
,
1651 filter_expression
, filter
);
1652 /* We have passed ownership */
1653 filter_expression
= NULL
;
1655 if (ret
!= LTTNG_OK
) {
1656 if (channel_created
) {
1657 /* Let's not leak a useless channel. */
1658 kernel_destroy_channel(kchan
);
1663 case LTTNG_EVENT_SYSCALL
:
1664 ret
= event_kernel_enable_event(kchan
, event
,
1665 filter_expression
, filter
);
1666 /* We have passed ownership */
1667 filter_expression
= NULL
;
1669 if (ret
!= LTTNG_OK
) {
1674 ret
= LTTNG_ERR_UNK
;
1678 kernel_wait_quiescent(kernel_tracer_fd
);
1681 case LTTNG_DOMAIN_UST
:
1683 struct ltt_ust_channel
*uchan
;
1684 struct ltt_ust_session
*usess
= session
->ust_session
;
1689 * If a non-default channel has been created in the
1690 * session, explicitely require that -c chan_name needs
1693 if (usess
->has_non_default_channel
&& channel_name
[0] == '\0') {
1694 ret
= LTTNG_ERR_NEED_CHANNEL_NAME
;
1698 /* Get channel from global UST domain */
1699 uchan
= trace_ust_find_channel_by_name(usess
->domain_global
.channels
,
1701 if (uchan
== NULL
) {
1702 /* Create default channel */
1703 attr
= channel_new_default_attr(LTTNG_DOMAIN_UST
,
1704 usess
->buffer_type
);
1706 ret
= LTTNG_ERR_FATAL
;
1709 strncpy(attr
->name
, channel_name
, sizeof(attr
->name
));
1711 ret
= cmd_enable_channel(session
, domain
, attr
, wpipe
);
1712 if (ret
!= LTTNG_OK
) {
1718 /* Get the newly created channel reference back */
1719 uchan
= trace_ust_find_channel_by_name(
1720 usess
->domain_global
.channels
, channel_name
);
1724 if (uchan
->domain
!= LTTNG_DOMAIN_UST
&& !internal_event
) {
1726 * Don't allow users to add UST events to channels which
1727 * are assigned to a userspace subdomain (JUL, Log4J,
1730 ret
= LTTNG_ERR_INVALID_CHANNEL_DOMAIN
;
1734 if (!internal_event
) {
1736 * Ensure the event name is not reserved for internal
1739 ret
= validate_ust_event_name(event
->name
);
1741 WARN("Userspace event name %s failed validation.",
1743 event
->name
: "NULL");
1744 ret
= LTTNG_ERR_INVALID_EVENT_NAME
;
1749 /* At this point, the session and channel exist on the tracer */
1750 ret
= event_ust_enable_tracepoint(usess
, uchan
, event
,
1751 filter_expression
, filter
, exclusion
,
1753 /* We have passed ownership */
1754 filter_expression
= NULL
;
1757 if (ret
!= LTTNG_OK
) {
1762 case LTTNG_DOMAIN_LOG4J
:
1763 case LTTNG_DOMAIN_JUL
:
1764 case LTTNG_DOMAIN_PYTHON
:
1766 const char *default_event_name
, *default_chan_name
;
1768 struct lttng_event uevent
;
1769 struct lttng_domain tmp_dom
;
1770 struct ltt_ust_session
*usess
= session
->ust_session
;
1774 agt
= trace_ust_find_agent(usess
, domain
->type
);
1776 agt
= agent_create(domain
->type
);
1778 ret
= LTTNG_ERR_NOMEM
;
1781 agent_add(agt
, usess
->agents
);
1784 /* Create the default tracepoint. */
1785 memset(&uevent
, 0, sizeof(uevent
));
1786 uevent
.type
= LTTNG_EVENT_TRACEPOINT
;
1787 uevent
.loglevel_type
= LTTNG_EVENT_LOGLEVEL_ALL
;
1788 default_event_name
= event_get_default_agent_ust_name(
1790 if (!default_event_name
) {
1791 ret
= LTTNG_ERR_FATAL
;
1794 strncpy(uevent
.name
, default_event_name
, sizeof(uevent
.name
));
1795 uevent
.name
[sizeof(uevent
.name
) - 1] = '\0';
1798 * The domain type is changed because we are about to enable the
1799 * default channel and event for the JUL domain that are hardcoded.
1800 * This happens in the UST domain.
1802 memcpy(&tmp_dom
, domain
, sizeof(tmp_dom
));
1803 tmp_dom
.type
= LTTNG_DOMAIN_UST
;
1805 switch (domain
->type
) {
1806 case LTTNG_DOMAIN_LOG4J
:
1807 default_chan_name
= DEFAULT_LOG4J_CHANNEL_NAME
;
1809 case LTTNG_DOMAIN_JUL
:
1810 default_chan_name
= DEFAULT_JUL_CHANNEL_NAME
;
1812 case LTTNG_DOMAIN_PYTHON
:
1813 default_chan_name
= DEFAULT_PYTHON_CHANNEL_NAME
;
1816 /* The switch/case we are in makes this impossible */
1821 char *filter_expression_copy
= NULL
;
1822 struct lttng_filter_bytecode
*filter_copy
= NULL
;
1825 const size_t filter_size
= sizeof(
1826 struct lttng_filter_bytecode
)
1829 filter_copy
= zmalloc(filter_size
);
1831 ret
= LTTNG_ERR_NOMEM
;
1834 memcpy(filter_copy
, filter
, filter_size
);
1836 filter_expression_copy
=
1837 strdup(filter_expression
);
1838 if (!filter_expression
) {
1839 ret
= LTTNG_ERR_NOMEM
;
1842 if (!filter_expression_copy
|| !filter_copy
) {
1843 free(filter_expression_copy
);
1849 ret
= cmd_enable_event_internal(session
, &tmp_dom
,
1850 (char *) default_chan_name
,
1851 &uevent
, filter_expression_copy
,
1852 filter_copy
, NULL
, wpipe
);
1855 if (ret
!= LTTNG_OK
&& ret
!= LTTNG_ERR_UST_EVENT_ENABLED
) {
1859 /* The wild card * means that everything should be enabled. */
1860 if (strncmp(event
->name
, "*", 1) == 0 && strlen(event
->name
) == 1) {
1861 ret
= event_agent_enable_all(usess
, agt
, event
, filter
,
1864 ret
= event_agent_enable(usess
, agt
, event
, filter
,
1868 filter_expression
= NULL
;
1869 if (ret
!= LTTNG_OK
) {
1876 ret
= LTTNG_ERR_UND
;
1883 free(filter_expression
);
1891 * Command LTTNG_ENABLE_EVENT processed by the client thread.
1892 * We own filter, exclusion, and filter_expression.
1894 int cmd_enable_event(struct ltt_session
*session
, struct lttng_domain
*domain
,
1895 char *channel_name
, struct lttng_event
*event
,
1896 char *filter_expression
,
1897 struct lttng_filter_bytecode
*filter
,
1898 struct lttng_event_exclusion
*exclusion
,
1901 return _cmd_enable_event(session
, domain
, channel_name
, event
,
1902 filter_expression
, filter
, exclusion
, wpipe
, false);
1906 * Enable an event which is internal to LTTng. An internal should
1907 * never be made visible to clients and are immune to checks such as
1910 static int cmd_enable_event_internal(struct ltt_session
*session
,
1911 struct lttng_domain
*domain
,
1912 char *channel_name
, struct lttng_event
*event
,
1913 char *filter_expression
,
1914 struct lttng_filter_bytecode
*filter
,
1915 struct lttng_event_exclusion
*exclusion
,
1918 return _cmd_enable_event(session
, domain
, channel_name
, event
,
1919 filter_expression
, filter
, exclusion
, wpipe
, true);
1923 * Command LTTNG_LIST_TRACEPOINTS processed by the client thread.
1925 ssize_t
cmd_list_tracepoints(enum lttng_domain_type domain
,
1926 struct lttng_event
**events
)
1929 ssize_t nb_events
= 0;
1932 case LTTNG_DOMAIN_KERNEL
:
1933 nb_events
= kernel_list_events(kernel_tracer_fd
, events
);
1934 if (nb_events
< 0) {
1935 ret
= LTTNG_ERR_KERN_LIST_FAIL
;
1939 case LTTNG_DOMAIN_UST
:
1940 nb_events
= ust_app_list_events(events
);
1941 if (nb_events
< 0) {
1942 ret
= LTTNG_ERR_UST_LIST_FAIL
;
1946 case LTTNG_DOMAIN_LOG4J
:
1947 case LTTNG_DOMAIN_JUL
:
1948 case LTTNG_DOMAIN_PYTHON
:
1949 nb_events
= agent_list_events(events
, domain
);
1950 if (nb_events
< 0) {
1951 ret
= LTTNG_ERR_UST_LIST_FAIL
;
1956 ret
= LTTNG_ERR_UND
;
1963 /* Return negative value to differentiate return code */
1968 * Command LTTNG_LIST_TRACEPOINT_FIELDS processed by the client thread.
1970 ssize_t
cmd_list_tracepoint_fields(enum lttng_domain_type domain
,
1971 struct lttng_event_field
**fields
)
1974 ssize_t nb_fields
= 0;
1977 case LTTNG_DOMAIN_UST
:
1978 nb_fields
= ust_app_list_event_fields(fields
);
1979 if (nb_fields
< 0) {
1980 ret
= LTTNG_ERR_UST_LIST_FAIL
;
1984 case LTTNG_DOMAIN_KERNEL
:
1985 default: /* fall-through */
1986 ret
= LTTNG_ERR_UND
;
1993 /* Return negative value to differentiate return code */
1997 ssize_t
cmd_list_syscalls(struct lttng_event
**events
)
1999 return syscall_table_list(events
);
2003 * Command LTTNG_LIST_TRACKER_PIDS processed by the client thread.
2005 * Called with session lock held.
2007 ssize_t
cmd_list_tracker_pids(struct ltt_session
*session
,
2008 enum lttng_domain_type domain
, int32_t **pids
)
2011 ssize_t nr_pids
= 0;
2014 case LTTNG_DOMAIN_KERNEL
:
2016 struct ltt_kernel_session
*ksess
;
2018 ksess
= session
->kernel_session
;
2019 nr_pids
= kernel_list_tracker_pids(ksess
, pids
);
2021 ret
= LTTNG_ERR_KERN_LIST_FAIL
;
2026 case LTTNG_DOMAIN_UST
:
2028 struct ltt_ust_session
*usess
;
2030 usess
= session
->ust_session
;
2031 nr_pids
= trace_ust_list_tracker_pids(usess
, pids
);
2033 ret
= LTTNG_ERR_UST_LIST_FAIL
;
2038 case LTTNG_DOMAIN_LOG4J
:
2039 case LTTNG_DOMAIN_JUL
:
2040 case LTTNG_DOMAIN_PYTHON
:
2042 ret
= LTTNG_ERR_UND
;
2049 /* Return negative value to differentiate return code */
2054 * Command LTTNG_START_TRACE processed by the client thread.
2056 * Called with session mutex held.
2058 int cmd_start_trace(struct ltt_session
*session
)
2061 unsigned long nb_chan
= 0;
2062 struct ltt_kernel_session
*ksession
;
2063 struct ltt_ust_session
*usess
;
2067 /* Ease our life a bit ;) */
2068 ksession
= session
->kernel_session
;
2069 usess
= session
->ust_session
;
2071 /* Is the session already started? */
2072 if (session
->active
) {
2073 ret
= LTTNG_ERR_TRACE_ALREADY_STARTED
;
2078 * Starting a session without channel is useless since after that it's not
2079 * possible to enable channel thus inform the client.
2081 if (usess
&& usess
->domain_global
.channels
) {
2082 nb_chan
+= lttng_ht_get_count(usess
->domain_global
.channels
);
2085 nb_chan
+= ksession
->channel_count
;
2088 ret
= LTTNG_ERR_NO_CHANNEL
;
2092 /* Kernel tracing */
2093 if (ksession
!= NULL
) {
2094 ret
= start_kernel_session(ksession
, kernel_tracer_fd
);
2095 if (ret
!= LTTNG_OK
) {
2100 /* Flag session that trace should start automatically */
2103 * Even though the start trace might fail, flag this session active so
2104 * other application coming in are started by default.
2108 ret
= ust_app_start_trace_all(usess
);
2110 ret
= LTTNG_ERR_UST_START_FAIL
;
2115 /* Flag this after a successful start. */
2116 session
->has_been_started
= 1;
2117 session
->active
= 1;
2126 * Command LTTNG_STOP_TRACE processed by the client thread.
2128 int cmd_stop_trace(struct ltt_session
*session
)
2131 struct ltt_kernel_channel
*kchan
;
2132 struct ltt_kernel_session
*ksession
;
2133 struct ltt_ust_session
*usess
;
2138 ksession
= session
->kernel_session
;
2139 usess
= session
->ust_session
;
2141 /* Session is not active. Skip everythong and inform the client. */
2142 if (!session
->active
) {
2143 ret
= LTTNG_ERR_TRACE_ALREADY_STOPPED
;
2148 if (ksession
&& ksession
->active
) {
2149 DBG("Stop kernel tracing");
2151 /* Flush metadata if exist */
2152 if (ksession
->metadata_stream_fd
>= 0) {
2153 ret
= kernel_metadata_flush_buffer(ksession
->metadata_stream_fd
);
2155 ERR("Kernel metadata flush failed");
2159 /* Flush all buffers before stopping */
2160 cds_list_for_each_entry(kchan
, &ksession
->channel_list
.head
, list
) {
2161 ret
= kernel_flush_buffer(kchan
);
2163 ERR("Kernel flush buffer error");
2167 ret
= kernel_stop_session(ksession
);
2169 ret
= LTTNG_ERR_KERN_STOP_FAIL
;
2173 kernel_wait_quiescent(kernel_tracer_fd
);
2175 ksession
->active
= 0;
2178 if (usess
&& usess
->active
) {
2180 * Even though the stop trace might fail, flag this session inactive so
2181 * other application coming in are not started by default.
2185 ret
= ust_app_stop_trace_all(usess
);
2187 ret
= LTTNG_ERR_UST_STOP_FAIL
;
2192 /* Flag inactive after a successful stop. */
2193 session
->active
= 0;
2201 * Command LTTNG_SET_CONSUMER_URI processed by the client thread.
2203 int cmd_set_consumer_uri(struct ltt_session
*session
, size_t nb_uri
,
2204 struct lttng_uri
*uris
)
2207 struct ltt_kernel_session
*ksess
= session
->kernel_session
;
2208 struct ltt_ust_session
*usess
= session
->ust_session
;
2214 /* Can't set consumer URI if the session is active. */
2215 if (session
->active
) {
2216 ret
= LTTNG_ERR_TRACE_ALREADY_STARTED
;
2220 /* Set the "global" consumer URIs */
2221 for (i
= 0; i
< nb_uri
; i
++) {
2222 ret
= add_uri_to_consumer(session
->consumer
,
2223 &uris
[i
], 0, session
->name
);
2224 if (ret
!= LTTNG_OK
) {
2229 /* Set UST session URIs */
2230 if (session
->ust_session
) {
2231 for (i
= 0; i
< nb_uri
; i
++) {
2232 ret
= add_uri_to_consumer(
2233 session
->ust_session
->consumer
,
2234 &uris
[i
], LTTNG_DOMAIN_UST
,
2236 if (ret
!= LTTNG_OK
) {
2242 /* Set kernel session URIs */
2243 if (session
->kernel_session
) {
2244 for (i
= 0; i
< nb_uri
; i
++) {
2245 ret
= add_uri_to_consumer(
2246 session
->kernel_session
->consumer
,
2247 &uris
[i
], LTTNG_DOMAIN_KERNEL
,
2249 if (ret
!= LTTNG_OK
) {
2256 * Make sure to set the session in output mode after we set URI since a
2257 * session can be created without URL (thus flagged in no output mode).
2259 session
->output_traces
= 1;
2261 ksess
->output_traces
= 1;
2265 usess
->output_traces
= 1;
2276 * Command LTTNG_CREATE_SESSION processed by the client thread.
2278 int cmd_create_session_uri(char *name
, struct lttng_uri
*uris
,
2279 size_t nb_uri
, lttng_sock_cred
*creds
, unsigned int live_timer
)
2282 struct ltt_session
*session
;
2288 * Verify if the session already exist
2290 * XXX: There is no need for the session lock list here since the caller
2291 * (process_client_msg) is holding it. We might want to change that so a
2292 * single command does not lock the entire session list.
2294 session
= session_find_by_name(name
);
2295 if (session
!= NULL
) {
2296 ret
= LTTNG_ERR_EXIST_SESS
;
2300 /* Create tracing session in the registry */
2301 ret
= session_create(name
, LTTNG_SOCK_GET_UID_CRED(creds
),
2302 LTTNG_SOCK_GET_GID_CRED(creds
));
2303 if (ret
!= LTTNG_OK
) {
2308 * Get the newly created session pointer back
2310 * XXX: There is no need for the session lock list here since the caller
2311 * (process_client_msg) is holding it. We might want to change that so a
2312 * single command does not lock the entire session list.
2314 session
= session_find_by_name(name
);
2317 session
->live_timer
= live_timer
;
2318 /* Create default consumer output for the session not yet created. */
2319 session
->consumer
= consumer_create_output(CONSUMER_DST_LOCAL
);
2320 if (session
->consumer
== NULL
) {
2321 ret
= LTTNG_ERR_FATAL
;
2322 goto consumer_error
;
2326 ret
= cmd_set_consumer_uri(session
, nb_uri
, uris
);
2327 if (ret
!= LTTNG_OK
) {
2328 goto consumer_error
;
2330 session
->output_traces
= 1;
2332 session
->output_traces
= 0;
2333 DBG2("Session %s created with no output", session
->name
);
2336 session
->consumer
->enabled
= 1;
2341 session_destroy(session
);
2348 * Command LTTNG_CREATE_SESSION_SNAPSHOT processed by the client thread.
2350 int cmd_create_session_snapshot(char *name
, struct lttng_uri
*uris
,
2351 size_t nb_uri
, lttng_sock_cred
*creds
)
2354 struct ltt_session
*session
;
2355 struct snapshot_output
*new_output
= NULL
;
2361 * Create session in no output mode with URIs set to NULL. The uris we've
2362 * received are for a default snapshot output if one.
2364 ret
= cmd_create_session_uri(name
, NULL
, 0, creds
, 0);
2365 if (ret
!= LTTNG_OK
) {
2369 /* Get the newly created session pointer back. This should NEVER fail. */
2370 session
= session_find_by_name(name
);
2373 /* Flag session for snapshot mode. */
2374 session
->snapshot_mode
= 1;
2376 /* Skip snapshot output creation if no URI is given. */
2381 new_output
= snapshot_output_alloc();
2383 ret
= LTTNG_ERR_NOMEM
;
2384 goto error_snapshot_alloc
;
2387 ret
= snapshot_output_init_with_uri(DEFAULT_SNAPSHOT_MAX_SIZE
, NULL
,
2388 uris
, nb_uri
, session
->consumer
, new_output
, &session
->snapshot
);
2390 if (ret
== -ENOMEM
) {
2391 ret
= LTTNG_ERR_NOMEM
;
2393 ret
= LTTNG_ERR_INVALID
;
2395 goto error_snapshot
;
2399 snapshot_add_output(&session
->snapshot
, new_output
);
2406 snapshot_output_destroy(new_output
);
2407 error_snapshot_alloc
:
2408 session_destroy(session
);
2414 * Command LTTNG_DESTROY_SESSION processed by the client thread.
2416 * Called with session lock held.
2418 int cmd_destroy_session(struct ltt_session
*session
, int wpipe
)
2421 struct ltt_ust_session
*usess
;
2422 struct ltt_kernel_session
*ksess
;
2427 usess
= session
->ust_session
;
2428 ksess
= session
->kernel_session
;
2430 /* Clean kernel session teardown */
2431 kernel_destroy_session(ksess
);
2433 /* UST session teardown */
2435 /* Close any relayd session */
2436 consumer_output_send_destroy_relayd(usess
->consumer
);
2438 /* Destroy every UST application related to this session. */
2439 ret
= ust_app_destroy_trace_all(usess
);
2441 ERR("Error in ust_app_destroy_trace_all");
2444 /* Clean up the rest. */
2445 trace_ust_destroy_session(usess
);
2449 * Must notify the kernel thread here to update it's poll set in order to
2450 * remove the channel(s)' fd just destroyed.
2452 ret
= notify_thread_pipe(wpipe
);
2454 PERROR("write kernel poll pipe");
2457 ret
= session_destroy(session
);
2463 * Command LTTNG_CALIBRATE processed by the client thread.
2465 int cmd_calibrate(enum lttng_domain_type domain
,
2466 struct lttng_calibrate
*calibrate
)
2471 case LTTNG_DOMAIN_KERNEL
:
2473 struct lttng_kernel_calibrate kcalibrate
;
2475 switch (calibrate
->type
) {
2476 case LTTNG_CALIBRATE_FUNCTION
:
2478 /* Default and only possible calibrate option. */
2479 kcalibrate
.type
= LTTNG_KERNEL_CALIBRATE_KRETPROBE
;
2483 ret
= kernel_calibrate(kernel_tracer_fd
, &kcalibrate
);
2485 ret
= LTTNG_ERR_KERN_ENABLE_FAIL
;
2490 case LTTNG_DOMAIN_UST
:
2492 struct lttng_ust_calibrate ucalibrate
;
2494 switch (calibrate
->type
) {
2495 case LTTNG_CALIBRATE_FUNCTION
:
2497 /* Default and only possible calibrate option. */
2498 ucalibrate
.type
= LTTNG_UST_CALIBRATE_TRACEPOINT
;
2502 ret
= ust_app_calibrate_glb(&ucalibrate
);
2504 ret
= LTTNG_ERR_UST_CALIBRATE_FAIL
;
2510 ret
= LTTNG_ERR_UND
;
2521 * Command LTTNG_REGISTER_CONSUMER processed by the client thread.
2523 int cmd_register_consumer(struct ltt_session
*session
,
2524 enum lttng_domain_type domain
, const char *sock_path
,
2525 struct consumer_data
*cdata
)
2528 struct consumer_socket
*socket
= NULL
;
2535 case LTTNG_DOMAIN_KERNEL
:
2537 struct ltt_kernel_session
*ksess
= session
->kernel_session
;
2541 /* Can't register a consumer if there is already one */
2542 if (ksess
->consumer_fds_sent
!= 0) {
2543 ret
= LTTNG_ERR_KERN_CONSUMER_FAIL
;
2547 sock
= lttcomm_connect_unix_sock(sock_path
);
2549 ret
= LTTNG_ERR_CONNECT_FAIL
;
2552 cdata
->cmd_sock
= sock
;
2554 socket
= consumer_allocate_socket(&cdata
->cmd_sock
);
2555 if (socket
== NULL
) {
2558 PERROR("close register consumer");
2560 cdata
->cmd_sock
= -1;
2561 ret
= LTTNG_ERR_FATAL
;
2565 socket
->lock
= zmalloc(sizeof(pthread_mutex_t
));
2566 if (socket
->lock
== NULL
) {
2567 PERROR("zmalloc pthread mutex");
2568 ret
= LTTNG_ERR_FATAL
;
2571 pthread_mutex_init(socket
->lock
, NULL
);
2572 socket
->registered
= 1;
2575 consumer_add_socket(socket
, ksess
->consumer
);
2578 pthread_mutex_lock(&cdata
->pid_mutex
);
2580 pthread_mutex_unlock(&cdata
->pid_mutex
);
2585 /* TODO: Userspace tracing */
2586 ret
= LTTNG_ERR_UND
;
2594 consumer_destroy_socket(socket
);
2600 * Command LTTNG_LIST_DOMAINS processed by the client thread.
2602 ssize_t
cmd_list_domains(struct ltt_session
*session
,
2603 struct lttng_domain
**domains
)
2608 struct lttng_ht_iter iter
;
2610 if (session
->kernel_session
!= NULL
) {
2611 DBG3("Listing domains found kernel domain");
2615 if (session
->ust_session
!= NULL
) {
2616 DBG3("Listing domains found UST global domain");
2620 cds_lfht_for_each_entry(session
->ust_session
->agents
->ht
, &iter
.iter
,
2622 if (agt
->being_used
) {
2633 *domains
= zmalloc(nb_dom
* sizeof(struct lttng_domain
));
2634 if (*domains
== NULL
) {
2635 ret
= LTTNG_ERR_FATAL
;
2639 if (session
->kernel_session
!= NULL
) {
2640 (*domains
)[index
].type
= LTTNG_DOMAIN_KERNEL
;
2642 /* Kernel session buffer type is always GLOBAL */
2643 (*domains
)[index
].buf_type
= LTTNG_BUFFER_GLOBAL
;
2648 if (session
->ust_session
!= NULL
) {
2649 (*domains
)[index
].type
= LTTNG_DOMAIN_UST
;
2650 (*domains
)[index
].buf_type
= session
->ust_session
->buffer_type
;
2654 cds_lfht_for_each_entry(session
->ust_session
->agents
->ht
, &iter
.iter
,
2656 if (agt
->being_used
) {
2657 (*domains
)[index
].type
= agt
->domain
;
2658 (*domains
)[index
].buf_type
= session
->ust_session
->buffer_type
;
2668 /* Return negative value to differentiate return code */
2674 * Command LTTNG_LIST_CHANNELS processed by the client thread.
2676 ssize_t
cmd_list_channels(enum lttng_domain_type domain
,
2677 struct ltt_session
*session
, struct lttng_channel
**channels
)
2680 ssize_t nb_chan
= 0;
2683 case LTTNG_DOMAIN_KERNEL
:
2684 if (session
->kernel_session
!= NULL
) {
2685 nb_chan
= session
->kernel_session
->channel_count
;
2687 DBG3("Number of kernel channels %zd", nb_chan
);
2689 ret
= LTTNG_ERR_KERN_CHAN_NOT_FOUND
;
2692 case LTTNG_DOMAIN_UST
:
2693 if (session
->ust_session
!= NULL
) {
2695 nb_chan
= lttng_ht_get_count(
2696 session
->ust_session
->domain_global
.channels
);
2699 DBG3("Number of UST global channels %zd", nb_chan
);
2701 ret
= LTTNG_ERR_UST_CHAN_NOT_FOUND
;
2706 ret
= LTTNG_ERR_UND
;
2711 *channels
= zmalloc(nb_chan
* sizeof(struct lttng_channel
));
2712 if (*channels
== NULL
) {
2713 ret
= LTTNG_ERR_FATAL
;
2717 list_lttng_channels(domain
, session
, *channels
);
2723 /* Return negative value to differentiate return code */
2728 * Command LTTNG_LIST_EVENTS processed by the client thread.
2730 ssize_t
cmd_list_events(enum lttng_domain_type domain
,
2731 struct ltt_session
*session
, char *channel_name
,
2732 struct lttng_event
**events
)
2735 ssize_t nb_event
= 0;
2738 case LTTNG_DOMAIN_KERNEL
:
2739 if (session
->kernel_session
!= NULL
) {
2740 nb_event
= list_lttng_kernel_events(channel_name
,
2741 session
->kernel_session
, events
);
2744 case LTTNG_DOMAIN_UST
:
2746 if (session
->ust_session
!= NULL
) {
2747 nb_event
= list_lttng_ust_global_events(channel_name
,
2748 &session
->ust_session
->domain_global
, events
);
2752 case LTTNG_DOMAIN_LOG4J
:
2753 case LTTNG_DOMAIN_JUL
:
2754 case LTTNG_DOMAIN_PYTHON
:
2755 if (session
->ust_session
) {
2756 struct lttng_ht_iter iter
;
2760 cds_lfht_for_each_entry(session
->ust_session
->agents
->ht
,
2761 &iter
.iter
, agt
, node
.node
) {
2762 if (agt
->domain
== domain
) {
2763 nb_event
= list_lttng_agent_events(
2772 ret
= LTTNG_ERR_UND
;
2779 /* Return negative value to differentiate return code */
2784 * Using the session list, filled a lttng_session array to send back to the
2785 * client for session listing.
2787 * The session list lock MUST be acquired before calling this function. Use
2788 * session_lock_list() and session_unlock_list().
2790 void cmd_list_lttng_sessions(struct lttng_session
*sessions
, uid_t uid
,
2795 struct ltt_session
*session
;
2796 struct ltt_session_list
*list
= session_get_list();
2798 DBG("Getting all available session for UID %d GID %d",
2801 * Iterate over session list and append data after the control struct in
2804 cds_list_for_each_entry(session
, &list
->head
, list
) {
2806 * Only list the sessions the user can control.
2808 if (!session_access_ok(session
, uid
, gid
)) {
2812 struct ltt_kernel_session
*ksess
= session
->kernel_session
;
2813 struct ltt_ust_session
*usess
= session
->ust_session
;
2815 if (session
->consumer
->type
== CONSUMER_DST_NET
||
2816 (ksess
&& ksess
->consumer
->type
== CONSUMER_DST_NET
) ||
2817 (usess
&& usess
->consumer
->type
== CONSUMER_DST_NET
)) {
2818 ret
= build_network_session_path(sessions
[i
].path
,
2819 sizeof(sessions
[i
].path
), session
);
2821 ret
= snprintf(sessions
[i
].path
, sizeof(sessions
[i
].path
), "%s",
2822 session
->consumer
->dst
.trace_path
);
2825 PERROR("snprintf session path");
2829 strncpy(sessions
[i
].name
, session
->name
, NAME_MAX
);
2830 sessions
[i
].name
[NAME_MAX
- 1] = '\0';
2831 sessions
[i
].enabled
= session
->active
;
2832 sessions
[i
].snapshot_mode
= session
->snapshot_mode
;
2833 sessions
[i
].live_timer_interval
= session
->live_timer
;
2839 * Command LTTNG_DATA_PENDING returning 0 if the data is NOT pending meaning
2840 * ready for trace analysis (or any kind of reader) or else 1 for pending data.
2842 int cmd_data_pending(struct ltt_session
*session
)
2845 struct ltt_kernel_session
*ksess
= session
->kernel_session
;
2846 struct ltt_ust_session
*usess
= session
->ust_session
;
2850 /* Session MUST be stopped to ask for data availability. */
2851 if (session
->active
) {
2852 ret
= LTTNG_ERR_SESSION_STARTED
;
2856 * If stopped, just make sure we've started before else the above call
2857 * will always send that there is data pending.
2859 * The consumer assumes that when the data pending command is received,
2860 * the trace has been started before or else no output data is written
2861 * by the streams which is a condition for data pending. So, this is
2862 * *VERY* important that we don't ask the consumer before a start
2865 if (!session
->has_been_started
) {
2871 if (ksess
&& ksess
->consumer
) {
2872 ret
= consumer_is_data_pending(ksess
->id
, ksess
->consumer
);
2874 /* Data is still being extracted for the kernel. */
2879 if (usess
&& usess
->consumer
) {
2880 ret
= consumer_is_data_pending(usess
->id
, usess
->consumer
);
2882 /* Data is still being extracted for the kernel. */
2887 /* Data is ready to be read by a viewer */
2895 * Command LTTNG_SNAPSHOT_ADD_OUTPUT from the lttng ctl library.
2897 * Return LTTNG_OK on success or else a LTTNG_ERR code.
2899 int cmd_snapshot_add_output(struct ltt_session
*session
,
2900 struct lttng_snapshot_output
*output
, uint32_t *id
)
2903 struct snapshot_output
*new_output
;
2908 DBG("Cmd snapshot add output for session %s", session
->name
);
2911 * Permission denied to create an output if the session is not
2912 * set in no output mode.
2914 if (session
->output_traces
) {
2915 ret
= LTTNG_ERR_EPERM
;
2919 /* Only one output is allowed until we have the "tee" feature. */
2920 if (session
->snapshot
.nb_output
== 1) {
2921 ret
= LTTNG_ERR_SNAPSHOT_OUTPUT_EXIST
;
2925 new_output
= snapshot_output_alloc();
2927 ret
= LTTNG_ERR_NOMEM
;
2931 ret
= snapshot_output_init(output
->max_size
, output
->name
,
2932 output
->ctrl_url
, output
->data_url
, session
->consumer
, new_output
,
2933 &session
->snapshot
);
2935 if (ret
== -ENOMEM
) {
2936 ret
= LTTNG_ERR_NOMEM
;
2938 ret
= LTTNG_ERR_INVALID
;
2944 snapshot_add_output(&session
->snapshot
, new_output
);
2946 *id
= new_output
->id
;
2953 snapshot_output_destroy(new_output
);
2959 * Command LTTNG_SNAPSHOT_DEL_OUTPUT from lib lttng ctl.
2961 * Return LTTNG_OK on success or else a LTTNG_ERR code.
2963 int cmd_snapshot_del_output(struct ltt_session
*session
,
2964 struct lttng_snapshot_output
*output
)
2967 struct snapshot_output
*sout
= NULL
;
2975 * Permission denied to create an output if the session is not
2976 * set in no output mode.
2978 if (session
->output_traces
) {
2979 ret
= LTTNG_ERR_EPERM
;
2984 DBG("Cmd snapshot del output id %" PRIu32
" for session %s", output
->id
,
2986 sout
= snapshot_find_output_by_id(output
->id
, &session
->snapshot
);
2987 } else if (*output
->name
!= '\0') {
2988 DBG("Cmd snapshot del output name %s for session %s", output
->name
,
2990 sout
= snapshot_find_output_by_name(output
->name
, &session
->snapshot
);
2993 ret
= LTTNG_ERR_INVALID
;
2997 snapshot_delete_output(&session
->snapshot
, sout
);
2998 snapshot_output_destroy(sout
);
3007 * Command LTTNG_SNAPSHOT_LIST_OUTPUT from lib lttng ctl.
3009 * If no output is available, outputs is untouched and 0 is returned.
3011 * Return the size of the newly allocated outputs or a negative LTTNG_ERR code.
3013 ssize_t
cmd_snapshot_list_outputs(struct ltt_session
*session
,
3014 struct lttng_snapshot_output
**outputs
)
3017 struct lttng_snapshot_output
*list
= NULL
;
3018 struct lttng_ht_iter iter
;
3019 struct snapshot_output
*output
;
3024 DBG("Cmd snapshot list outputs for session %s", session
->name
);
3027 * Permission denied to create an output if the session is not
3028 * set in no output mode.
3030 if (session
->output_traces
) {
3031 ret
= -LTTNG_ERR_EPERM
;
3035 if (session
->snapshot
.nb_output
== 0) {
3040 list
= zmalloc(session
->snapshot
.nb_output
* sizeof(*list
));
3042 ret
= -LTTNG_ERR_NOMEM
;
3046 /* Copy list from session to the new list object. */
3048 cds_lfht_for_each_entry(session
->snapshot
.output_ht
->ht
, &iter
.iter
,
3049 output
, node
.node
) {
3050 assert(output
->consumer
);
3051 list
[idx
].id
= output
->id
;
3052 list
[idx
].max_size
= output
->max_size
;
3053 strncpy(list
[idx
].name
, output
->name
, sizeof(list
[idx
].name
));
3054 if (output
->consumer
->type
== CONSUMER_DST_LOCAL
) {
3055 strncpy(list
[idx
].ctrl_url
, output
->consumer
->dst
.trace_path
,
3056 sizeof(list
[idx
].ctrl_url
));
3059 ret
= uri_to_str_url(&output
->consumer
->dst
.net
.control
,
3060 list
[idx
].ctrl_url
, sizeof(list
[idx
].ctrl_url
));
3062 ret
= -LTTNG_ERR_NOMEM
;
3067 ret
= uri_to_str_url(&output
->consumer
->dst
.net
.data
,
3068 list
[idx
].data_url
, sizeof(list
[idx
].data_url
));
3070 ret
= -LTTNG_ERR_NOMEM
;
3079 ret
= session
->snapshot
.nb_output
;
3087 * Send relayd sockets from snapshot output to consumer. Ignore request if the
3088 * snapshot output is *not* set with a remote destination.
3090 * Return 0 on success or a LTTNG_ERR code.
3092 static int set_relayd_for_snapshot(struct consumer_output
*consumer
,
3093 struct snapshot_output
*snap_output
, struct ltt_session
*session
)
3096 struct lttng_ht_iter iter
;
3097 struct consumer_socket
*socket
;
3100 assert(snap_output
);
3103 DBG2("Set relayd object from snapshot output");
3105 /* Ignore if snapshot consumer output is not network. */
3106 if (snap_output
->consumer
->type
!= CONSUMER_DST_NET
) {
3111 * For each consumer socket, create and send the relayd object of the
3115 cds_lfht_for_each_entry(snap_output
->consumer
->socks
->ht
, &iter
.iter
,
3116 socket
, node
.node
) {
3117 ret
= send_consumer_relayd_sockets(0, session
->id
,
3118 snap_output
->consumer
, socket
,
3119 session
->name
, session
->hostname
,
3120 session
->live_timer
);
3121 if (ret
!= LTTNG_OK
) {
3133 * Record a kernel snapshot.
3135 * Return LTTNG_OK on success or a LTTNG_ERR code.
3137 static int record_kernel_snapshot(struct ltt_kernel_session
*ksess
,
3138 struct snapshot_output
*output
, struct ltt_session
*session
,
3139 int wait
, uint64_t nb_packets_per_stream
)
3147 /* Get the datetime for the snapshot output directory. */
3148 ret
= utils_get_current_time_str("%Y%m%d-%H%M%S", output
->datetime
,
3149 sizeof(output
->datetime
));
3151 ret
= LTTNG_ERR_INVALID
;
3156 * Copy kernel session sockets so we can communicate with the right
3157 * consumer for the snapshot record command.
3159 ret
= consumer_copy_sockets(output
->consumer
, ksess
->consumer
);
3161 ret
= LTTNG_ERR_NOMEM
;
3165 ret
= set_relayd_for_snapshot(ksess
->consumer
, output
, session
);
3166 if (ret
!= LTTNG_OK
) {
3167 goto error_snapshot
;
3170 ret
= kernel_snapshot_record(ksess
, output
, wait
, nb_packets_per_stream
);
3171 if (ret
!= LTTNG_OK
) {
3172 goto error_snapshot
;
3179 /* Clean up copied sockets so this output can use some other later on. */
3180 consumer_destroy_output_sockets(output
->consumer
);
3187 * Record a UST snapshot.
3189 * Return 0 on success or a LTTNG_ERR error code.
3191 static int record_ust_snapshot(struct ltt_ust_session
*usess
,
3192 struct snapshot_output
*output
, struct ltt_session
*session
,
3193 int wait
, uint64_t nb_packets_per_stream
)
3201 /* Get the datetime for the snapshot output directory. */
3202 ret
= utils_get_current_time_str("%Y%m%d-%H%M%S", output
->datetime
,
3203 sizeof(output
->datetime
));
3205 ret
= LTTNG_ERR_INVALID
;
3210 * Copy UST session sockets so we can communicate with the right
3211 * consumer for the snapshot record command.
3213 ret
= consumer_copy_sockets(output
->consumer
, usess
->consumer
);
3215 ret
= LTTNG_ERR_NOMEM
;
3219 ret
= set_relayd_for_snapshot(usess
->consumer
, output
, session
);
3220 if (ret
!= LTTNG_OK
) {
3221 goto error_snapshot
;
3224 ret
= ust_app_snapshot_record(usess
, output
, wait
, nb_packets_per_stream
);
3228 ret
= LTTNG_ERR_INVALID
;
3231 ret
= LTTNG_ERR_SNAPSHOT_NODATA
;
3234 ret
= LTTNG_ERR_SNAPSHOT_FAIL
;
3237 goto error_snapshot
;
3243 /* Clean up copied sockets so this output can use some other later on. */
3244 consumer_destroy_output_sockets(output
->consumer
);
3250 uint64_t get_session_size_one_more_packet_per_stream(struct ltt_session
*session
,
3251 uint64_t cur_nr_packets
)
3253 uint64_t tot_size
= 0;
3255 if (session
->kernel_session
) {
3256 struct ltt_kernel_channel
*chan
;
3257 struct ltt_kernel_session
*ksess
= session
->kernel_session
;
3259 cds_list_for_each_entry(chan
, &ksess
->channel_list
.head
, list
) {
3260 if (cur_nr_packets
>= chan
->channel
->attr
.num_subbuf
) {
3262 * Don't take channel into account if we
3263 * already grab all its packets.
3267 tot_size
+= chan
->channel
->attr
.subbuf_size
3268 * chan
->stream_count
;
3272 if (session
->ust_session
) {
3273 struct ltt_ust_session
*usess
= session
->ust_session
;
3275 tot_size
+= ust_app_get_size_one_more_packet_per_stream(usess
,
3283 * Calculate the number of packets we can grab from each stream that
3284 * fits within the overall snapshot max size.
3286 * Returns -1 on error, 0 means infinite number of packets, else > 0 is
3287 * the number of packets per stream.
3289 * TODO: this approach is not perfect: we consider the worse case
3290 * (packet filling the sub-buffers) as an upper bound, but we could do
3291 * better if we do this calculation while we actually grab the packet
3292 * content: we would know how much padding we don't actually store into
3295 * This algorithm is currently bounded by the number of packets per
3298 * Since we call this algorithm before actually grabbing the data, it's
3299 * an approximation: for instance, applications could appear/disappear
3300 * in between this call and actually grabbing data.
3303 int64_t get_session_nb_packets_per_stream(struct ltt_session
*session
, uint64_t max_size
)
3306 uint64_t cur_nb_packets
= 0;
3309 return 0; /* Infinite */
3312 size_left
= max_size
;
3314 uint64_t one_more_packet_tot_size
;
3316 one_more_packet_tot_size
= get_session_size_one_more_packet_per_stream(session
,
3318 if (!one_more_packet_tot_size
) {
3319 /* We are already grabbing all packets. */
3322 size_left
-= one_more_packet_tot_size
;
3323 if (size_left
< 0) {
3328 if (!cur_nb_packets
) {
3329 /* Not enough room to grab one packet of each stream, error. */
3332 return cur_nb_packets
;
3336 * Command LTTNG_SNAPSHOT_RECORD from lib lttng ctl.
3338 * The wait parameter is ignored so this call always wait for the snapshot to
3339 * complete before returning.
3341 * Return LTTNG_OK on success or else a LTTNG_ERR code.
3343 int cmd_snapshot_record(struct ltt_session
*session
,
3344 struct lttng_snapshot_output
*output
, int wait
)
3347 unsigned int use_tmp_output
= 0;
3348 struct snapshot_output tmp_output
;
3349 unsigned int snapshot_success
= 0;
3354 DBG("Cmd snapshot record for session %s", session
->name
);
3357 * Permission denied to create an output if the session is not
3358 * set in no output mode.
3360 if (session
->output_traces
) {
3361 ret
= LTTNG_ERR_EPERM
;
3365 /* The session needs to be started at least once. */
3366 if (!session
->has_been_started
) {
3367 ret
= LTTNG_ERR_START_SESSION_ONCE
;
3371 /* Use temporary output for the session. */
3372 if (*output
->ctrl_url
!= '\0') {
3373 ret
= snapshot_output_init(output
->max_size
, output
->name
,
3374 output
->ctrl_url
, output
->data_url
, session
->consumer
,
3377 if (ret
== -ENOMEM
) {
3378 ret
= LTTNG_ERR_NOMEM
;
3380 ret
= LTTNG_ERR_INVALID
;
3384 /* Use the global session count for the temporary snapshot. */
3385 tmp_output
.nb_snapshot
= session
->snapshot
.nb_snapshot
;
3389 if (session
->kernel_session
) {
3390 struct ltt_kernel_session
*ksess
= session
->kernel_session
;
3392 if (use_tmp_output
) {
3393 int64_t nb_packets_per_stream
;
3395 nb_packets_per_stream
= get_session_nb_packets_per_stream(session
,
3396 tmp_output
.max_size
);
3397 if (nb_packets_per_stream
< 0) {
3398 ret
= LTTNG_ERR_MAX_SIZE_INVALID
;
3401 ret
= record_kernel_snapshot(ksess
, &tmp_output
, session
,
3402 wait
, nb_packets_per_stream
);
3403 if (ret
!= LTTNG_OK
) {
3406 snapshot_success
= 1;
3408 struct snapshot_output
*sout
;
3409 struct lttng_ht_iter iter
;
3412 cds_lfht_for_each_entry(session
->snapshot
.output_ht
->ht
,
3413 &iter
.iter
, sout
, node
.node
) {
3414 int64_t nb_packets_per_stream
;
3417 * Make a local copy of the output and assign the possible
3418 * temporary value given by the caller.
3420 memset(&tmp_output
, 0, sizeof(tmp_output
));
3421 memcpy(&tmp_output
, sout
, sizeof(tmp_output
));
3423 if (output
->max_size
!= (uint64_t) -1ULL) {
3424 tmp_output
.max_size
= output
->max_size
;
3427 nb_packets_per_stream
= get_session_nb_packets_per_stream(session
,
3428 tmp_output
.max_size
);
3429 if (nb_packets_per_stream
< 0) {
3430 ret
= LTTNG_ERR_MAX_SIZE_INVALID
;
3434 /* Use temporary name. */
3435 if (*output
->name
!= '\0') {
3436 strncpy(tmp_output
.name
, output
->name
,
3437 sizeof(tmp_output
.name
));
3440 tmp_output
.nb_snapshot
= session
->snapshot
.nb_snapshot
;
3442 ret
= record_kernel_snapshot(ksess
, &tmp_output
,
3443 session
, wait
, nb_packets_per_stream
);
3444 if (ret
!= LTTNG_OK
) {
3448 snapshot_success
= 1;
3454 if (session
->ust_session
) {
3455 struct ltt_ust_session
*usess
= session
->ust_session
;
3457 if (use_tmp_output
) {
3458 int64_t nb_packets_per_stream
;
3460 nb_packets_per_stream
= get_session_nb_packets_per_stream(session
,
3461 tmp_output
.max_size
);
3462 if (nb_packets_per_stream
< 0) {
3463 ret
= LTTNG_ERR_MAX_SIZE_INVALID
;
3466 ret
= record_ust_snapshot(usess
, &tmp_output
, session
,
3467 wait
, nb_packets_per_stream
);
3468 if (ret
!= LTTNG_OK
) {
3471 snapshot_success
= 1;
3473 struct snapshot_output
*sout
;
3474 struct lttng_ht_iter iter
;
3477 cds_lfht_for_each_entry(session
->snapshot
.output_ht
->ht
,
3478 &iter
.iter
, sout
, node
.node
) {
3479 int64_t nb_packets_per_stream
;
3482 * Make a local copy of the output and assign the possible
3483 * temporary value given by the caller.
3485 memset(&tmp_output
, 0, sizeof(tmp_output
));
3486 memcpy(&tmp_output
, sout
, sizeof(tmp_output
));
3488 if (output
->max_size
!= (uint64_t) -1ULL) {
3489 tmp_output
.max_size
= output
->max_size
;
3492 nb_packets_per_stream
= get_session_nb_packets_per_stream(session
,
3493 tmp_output
.max_size
);
3494 if (nb_packets_per_stream
< 0) {
3495 ret
= LTTNG_ERR_MAX_SIZE_INVALID
;
3500 /* Use temporary name. */
3501 if (*output
->name
!= '\0') {
3502 strncpy(tmp_output
.name
, output
->name
,
3503 sizeof(tmp_output
.name
));
3506 tmp_output
.nb_snapshot
= session
->snapshot
.nb_snapshot
;
3508 ret
= record_ust_snapshot(usess
, &tmp_output
, session
,
3509 wait
, nb_packets_per_stream
);
3510 if (ret
!= LTTNG_OK
) {
3514 snapshot_success
= 1;
3520 if (snapshot_success
) {
3521 session
->snapshot
.nb_snapshot
++;
3523 ret
= LTTNG_ERR_SNAPSHOT_FAIL
;
3531 * Command LTTNG_SET_SESSION_SHM_PATH processed by the client thread.
3533 int cmd_set_session_shm_path(struct ltt_session
*session
,
3534 const char *shm_path
)
3540 * Can only set shm path before session is started.
3542 if (session
->has_been_started
) {
3543 return LTTNG_ERR_SESSION_STARTED
;
3546 strncpy(session
->shm_path
, shm_path
,
3547 sizeof(session
->shm_path
));
3548 session
->shm_path
[sizeof(session
->shm_path
) - 1] = '\0';
3554 * Init command subsystem.
3559 * Set network sequence index to 1 for streams to match a relayd
3560 * socket on the consumer side.
3562 pthread_mutex_lock(&relayd_net_seq_idx_lock
);
3563 relayd_net_seq_idx
= 1;
3564 pthread_mutex_unlock(&relayd_net_seq_idx_lock
);
3566 DBG("Command subsystem initialized");