2 * Copyright (C) 2011 - Julien Desfossez <julien.desfossez@polymtl.ca>
3 * Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License, version 2 only,
7 * as published by the Free Software Foundation.
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 along
15 * with this program; if not, write to the Free Software Foundation, Inc.,
16 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
21 #include <lttng/ust-ctl.h>
27 #include <sys/socket.h>
29 #include <sys/types.h>
33 #include <common/common.h>
34 #include <common/sessiond-comm/sessiond-comm.h>
35 #include <common/relayd/relayd.h>
36 #include <common/compat/fcntl.h>
38 #include "ust-consumer.h"
40 extern struct lttng_consumer_global_data consumer_data
;
41 extern int consumer_poll_timeout
;
42 extern volatile int consumer_quit
;
45 * Wrapper over the mmap() read offset from ust-ctl library. Since this can be
46 * compiled out, we isolate it in this library.
48 int lttng_ustctl_get_mmap_read_offset(struct lttng_ust_shm_handle
*handle
,
49 struct lttng_ust_lib_ring_buffer
*buf
, unsigned long *off
)
51 return ustctl_get_mmap_read_offset(handle
, buf
, off
);
55 * Take a snapshot for a specific fd
57 * Returns 0 on success, < 0 on error
59 int lttng_ustconsumer_take_snapshot(struct lttng_consumer_local_data
*ctx
,
60 struct lttng_consumer_stream
*stream
)
64 ret
= ustctl_snapshot(stream
->chan
->handle
, stream
->buf
);
67 PERROR("Getting sub-buffer snapshot.");
74 * Get the produced position
76 * Returns 0 on success, < 0 on error
78 int lttng_ustconsumer_get_produced_snapshot(
79 struct lttng_consumer_local_data
*ctx
,
80 struct lttng_consumer_stream
*stream
,
85 ret
= ustctl_snapshot_get_produced(stream
->chan
->handle
,
89 PERROR("kernctl_snapshot_get_produced");
96 * Receive command from session daemon and process it.
98 * Return 1 on success else a negative value or 0.
100 int lttng_ustconsumer_recv_cmd(struct lttng_consumer_local_data
*ctx
,
101 int sock
, struct pollfd
*consumer_sockpoll
)
104 struct lttcomm_consumer_msg msg
;
106 ret
= lttcomm_recv_unix_sock(sock
, &msg
, sizeof(msg
));
107 if (ret
!= sizeof(msg
)) {
108 DBG("Consumer received unexpected message size %zd (expects %zu)",
110 lttng_consumer_send_error(ctx
, LTTCOMM_CONSUMERD_ERROR_RECV_FD
);
113 if (msg
.cmd_type
== LTTNG_CONSUMER_STOP
) {
117 /* relayd needs RCU read-side lock */
120 switch (msg
.cmd_type
) {
121 case LTTNG_CONSUMER_ADD_RELAYD_SOCKET
:
123 ret
= consumer_add_relayd_socket(msg
.u
.relayd_sock
.net_index
,
124 msg
.u
.relayd_sock
.type
, ctx
, sock
, consumer_sockpoll
,
125 &msg
.u
.relayd_sock
.sock
);
128 case LTTNG_CONSUMER_ADD_CHANNEL
:
130 struct lttng_consumer_channel
*new_channel
;
134 DBG("UST Consumer adding channel");
137 if (lttng_consumer_poll_socket(consumer_sockpoll
) < 0) {
141 ret
= lttcomm_recv_fds_unix_sock(sock
, fds
, nb_fd
);
142 if (ret
!= sizeof(fds
)) {
143 lttng_consumer_send_error(ctx
, LTTCOMM_CONSUMERD_ERROR_RECV_FD
);
148 DBG("consumer_add_channel %d", msg
.u
.channel
.channel_key
);
150 new_channel
= consumer_allocate_channel(msg
.u
.channel
.channel_key
,
152 msg
.u
.channel
.mmap_len
,
153 msg
.u
.channel
.max_sb_size
,
154 msg
.u
.channel
.nb_init_streams
);
155 if (new_channel
== NULL
) {
156 lttng_consumer_send_error(ctx
, LTTCOMM_CONSUMERD_OUTFD_ERROR
);
159 if (ctx
->on_recv_channel
!= NULL
) {
160 ret
= ctx
->on_recv_channel(new_channel
);
162 consumer_add_channel(new_channel
);
163 } else if (ret
< 0) {
167 consumer_add_channel(new_channel
);
171 case LTTNG_CONSUMER_ADD_STREAM
:
173 struct lttng_consumer_stream
*new_stream
;
176 struct consumer_relayd_sock_pair
*relayd
= NULL
;
179 DBG("UST Consumer adding stream");
182 if (lttng_consumer_poll_socket(consumer_sockpoll
) < 0) {
186 ret
= lttcomm_recv_fds_unix_sock(sock
, fds
, nb_fd
);
187 if (ret
!= sizeof(fds
)) {
188 lttng_consumer_send_error(ctx
, LTTCOMM_CONSUMERD_ERROR_RECV_FD
);
193 DBG("Consumer command ADD_STREAM chan %d stream %d",
194 msg
.u
.stream
.channel_key
, msg
.u
.stream
.stream_key
);
196 assert(msg
.u
.stream
.output
== LTTNG_EVENT_MMAP
);
197 new_stream
= consumer_allocate_stream(msg
.u
.stream
.channel_key
,
198 msg
.u
.stream
.stream_key
,
201 msg
.u
.stream
.mmap_len
,
203 msg
.u
.stream
.path_name
,
206 msg
.u
.stream
.net_index
,
207 msg
.u
.stream
.metadata_flag
,
209 if (new_stream
== NULL
) {
214 lttng_consumer_send_error(ctx
, LTTCOMM_CONSUMERD_OUTFD_ERROR
);
218 * We could not find the channel. Can happen if cpu hotplug
219 * happens while tearing down.
221 DBG3("Could not find channel");
227 /* The stream is not metadata. Get relayd reference if exists. */
228 relayd
= consumer_find_relayd(msg
.u
.stream
.net_index
);
229 if (relayd
!= NULL
) {
230 pthread_mutex_lock(&relayd
->ctrl_sock_mutex
);
231 /* Add stream on the relayd */
232 ret
= relayd_add_stream(&relayd
->control_sock
,
233 msg
.u
.stream
.name
, msg
.u
.stream
.path_name
,
234 &new_stream
->relayd_stream_id
);
235 pthread_mutex_unlock(&relayd
->ctrl_sock_mutex
);
237 consumer_del_stream(new_stream
, NULL
);
240 } else if (msg
.u
.stream
.net_index
!= -1) {
241 ERR("Network sequence index %d unknown. Not adding stream.",
242 msg
.u
.stream
.net_index
);
243 consumer_del_stream(new_stream
, NULL
);
247 /* Do actions once stream has been received. */
248 if (ctx
->on_recv_stream
) {
249 ret
= ctx
->on_recv_stream(new_stream
);
251 consumer_del_stream(new_stream
, NULL
);
256 /* Send stream to the metadata thread */
257 if (new_stream
->metadata_flag
) {
259 ret
= write(ctx
->consumer_metadata_pipe
[1], &new_stream
,
261 } while (ret
< 0 && errno
== EINTR
);
263 PERROR("write metadata pipe");
264 consumer_del_metadata_stream(new_stream
, NULL
);
269 ret
= write(ctx
->consumer_poll_pipe
[1], &new_stream
,
271 } while (ret
< 0 && errno
== EINTR
);
273 PERROR("write data pipe");
274 consumer_del_stream(new_stream
, NULL
);
279 DBG("UST consumer_add_stream %s (%d,%d) with relayd id %" PRIu64
,
280 msg
.u
.stream
.path_name
, fds
[0], fds
[1],
281 new_stream
->relayd_stream_id
);
284 case LTTNG_CONSUMER_DESTROY_RELAYD
:
286 uint64_t index
= msg
.u
.destroy_relayd
.net_seq_idx
;
287 struct consumer_relayd_sock_pair
*relayd
;
289 DBG("UST consumer destroying relayd %" PRIu64
, index
);
291 /* Get relayd reference if exists. */
292 relayd
= consumer_find_relayd(index
);
293 if (relayd
== NULL
) {
294 ERR("Unable to find relayd %" PRIu64
, index
);
299 * Each relayd socket pair has a refcount of stream attached to it
300 * which tells if the relayd is still active or not depending on the
303 * This will set the destroy flag of the relayd object and destroy it
304 * if the refcount reaches zero when called.
306 * The destroy can happen either here or when a stream fd hangs up.
308 consumer_flag_relayd_for_destroy(relayd
);
312 case LTTNG_CONSUMER_UPDATE_STREAM
:
317 if (ctx
->on_update_stream
!= NULL
) {
318 ret
= ctx
->on_update_stream(msg
.u
.stream
.stream_key
, msg
.u
.stream
.state
);
320 consumer_change_stream_state(msg
.u
.stream
.stream_key
, msg
.u
.stream
.state
);
321 } else if (ret
< 0) {
325 consumer_change_stream_state(msg
.u
.stream
.stream_key
,
339 * Return 1 to indicate success since the 0 value can be a socket
340 * shutdown during the recv() or send() call.
345 int lttng_ustconsumer_allocate_channel(struct lttng_consumer_channel
*chan
)
347 struct lttng_ust_object_data obj
;
350 obj
.shm_fd
= chan
->shm_fd
;
351 obj
.wait_fd
= chan
->wait_fd
;
352 obj
.memory_map_size
= chan
->mmap_len
;
353 chan
->handle
= ustctl_map_channel(&obj
);
357 chan
->wait_fd_is_copy
= 1;
363 void lttng_ustconsumer_on_stream_hangup(struct lttng_consumer_stream
*stream
)
365 ustctl_flush_buffer(stream
->chan
->handle
, stream
->buf
, 0);
366 stream
->hangup_flush_done
= 1;
369 void lttng_ustconsumer_del_channel(struct lttng_consumer_channel
*chan
)
371 ustctl_unmap_channel(chan
->handle
);
374 int lttng_ustconsumer_add_stream(struct lttng_consumer_stream
*stream
)
376 struct lttng_ust_object_data obj
;
380 obj
.shm_fd
= stream
->shm_fd
;
381 obj
.wait_fd
= stream
->wait_fd
;
382 obj
.memory_map_size
= stream
->mmap_len
;
383 ret
= ustctl_add_stream(stream
->chan
->handle
, &obj
);
385 ERR("UST ctl add_stream failed with ret %d", ret
);
389 stream
->buf
= ustctl_open_stream_read(stream
->chan
->handle
, stream
->cpu
);
391 ERR("UST ctl open_stream_read failed");
396 /* ustctl_open_stream_read has closed the shm fd. */
397 stream
->wait_fd_is_copy
= 1;
400 stream
->mmap_base
= ustctl_get_mmap_base(stream
->chan
->handle
, stream
->buf
);
401 if (!stream
->mmap_base
) {
402 ERR("UST ctl get_mmap_base failed");
410 ustctl_close_stream_read(stream
->chan
->handle
, stream
->buf
);
415 void lttng_ustconsumer_del_stream(struct lttng_consumer_stream
*stream
)
417 ustctl_close_stream_read(stream
->chan
->handle
, stream
->buf
);
421 int lttng_ustconsumer_read_subbuffer(struct lttng_consumer_stream
*stream
,
422 struct lttng_consumer_local_data
*ctx
)
424 unsigned long len
, subbuf_size
, padding
;
427 struct lttng_ust_shm_handle
*handle
;
428 struct lttng_ust_lib_ring_buffer
*buf
;
432 DBG("In read_subbuffer (wait_fd: %d, stream key: %d)",
433 stream
->wait_fd
, stream
->key
);
435 /* We can consume the 1 byte written into the wait_fd by UST */
436 if (!stream
->hangup_flush_done
) {
438 readlen
= read(stream
->wait_fd
, &dummy
, 1);
439 } while (readlen
== -1 && errno
== EINTR
);
447 handle
= stream
->chan
->handle
;
448 /* Get the next subbuffer */
449 err
= ustctl_get_next_subbuf(handle
, buf
);
451 ret
= err
; /* ustctl_get_next_subbuf returns negative, caller expect positive. */
453 * This is a debug message even for single-threaded consumer,
454 * because poll() have more relaxed criterions than get subbuf,
455 * so get_subbuf may fail for short race windows where poll()
456 * would issue wakeups.
458 DBG("Reserving sub buffer failed (everything is normal, "
459 "it is due to concurrency)");
462 assert(stream
->output
== LTTNG_EVENT_MMAP
);
463 /* Get the full padded subbuffer size */
464 err
= ustctl_get_padded_subbuf_size(handle
, buf
, &len
);
467 /* Get subbuffer data size (without padding) */
468 err
= ustctl_get_subbuf_size(handle
, buf
, &subbuf_size
);
471 /* Make sure we don't get a subbuffer size bigger than the padded */
472 assert(len
>= subbuf_size
);
474 padding
= len
- subbuf_size
;
475 /* write the subbuffer to the tracefile */
476 ret
= lttng_consumer_on_read_subbuffer_mmap(ctx
, stream
, subbuf_size
, padding
);
478 * The mmap operation should write subbuf_size amount of data when network
479 * streaming or the full padding (len) size when we are _not_ streaming.
481 if ((ret
!= subbuf_size
&& stream
->net_seq_idx
!= -1) ||
482 (ret
!= len
&& stream
->net_seq_idx
== -1)) {
484 * Display the error but continue processing to try to release the
487 ERR("Error writing to tracefile "
488 "(ret: %zd != len: %lu != subbuf_size: %lu)",
489 ret
, len
, subbuf_size
);
491 err
= ustctl_put_next_subbuf(handle
, buf
);
497 int lttng_ustconsumer_on_recv_stream(struct lttng_consumer_stream
*stream
)
501 /* Opening the tracefile in write mode */
502 if (stream
->path_name
!= NULL
&& stream
->net_seq_idx
== -1) {
503 ret
= run_as_open(stream
->path_name
,
504 O_WRONLY
|O_CREAT
|O_TRUNC
,
505 S_IRWXU
|S_IRWXG
|S_IRWXO
,
506 stream
->uid
, stream
->gid
);
508 ERR("Opening %s", stream
->path_name
);
512 stream
->out_fd
= ret
;
515 ret
= lttng_ustconsumer_add_stream(stream
);
517 consumer_del_stream(stream
, NULL
);
522 /* we return 0 to let the library handle the FD internally */