projects / babeltrace.git / blob
? search:


065af49fb06f5f1be0d02f8a39e9919ddafef50b
[babeltrace.git] / formats / lttng-live / lttng-live-comm.c
1 /*
2 * Copyright (C) 2013 - Julien Desfossez <jdesfossez@efficios.com>
3 * Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
4 *
5 * Permission is hereby granted, free of charge, to any person obtaining a copy
6 * of this software and associated documentation files (the "Software"), to deal
7 * in the Software without restriction, including without limitation the rights
8 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
9 * copies of the Software, and to permit persons to whom the Software is
10 * furnished to do so, subject to the following conditions:
11 *
12 * The above copyright notice and this permission notice shall be included in
13 * all copies or substantial portions of the Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
21 * SOFTWARE.
22 */
23
24 #include <sys/socket.h>
25 #include <sys/types.h>
26 #include <netinet/in.h>
27 #include <netdb.h>
28 #include <stdio.h>
29 #include <stdlib.h>
30 #include <unistd.h>
31 #include <errno.h>
32 #include <inttypes.h>
33 #include <fcntl.h>
34 #include <poll.h>
35
36 #include <babeltrace/ctf/ctf-index.h>
37
38 #include <babeltrace/babeltrace.h>
39 #include <babeltrace/endian.h>
40 #include <babeltrace/ctf/events.h>
41 #include <babeltrace/ctf/callbacks.h>
42 #include <babeltrace/ctf/iterator.h>
43
44 /* for packet_index */
45 #include <babeltrace/ctf/types.h>
46
47 #include <babeltrace/ctf/metadata.h>
48 #include <babeltrace/ctf-text/types.h>
49 #include <babeltrace/ctf/events-internal.h>
50 #include <formats/ctf/events-private.h>
51
52 #include <babeltrace/compat/memstream.h>
53 #include <babeltrace/compat/send.h>
54 #include <babeltrace/compat/string.h>
55 #include <babeltrace/compat/mman.h>
56
57 #include "lttng-live.h"
58 #include "lttng-viewer-abi.h"
59
60 #define ACTIVE_POLL_DELAY 100 /* ms */
61
62 /*
63 * Memory allocation zeroed
64 */
65 #define zmalloc(x) calloc(1, x)
66
67 #ifndef max_t
68 #define max_t(type, a, b) \
69 ((type) (a) > (type) (b) ? (type) (a) : (type) (b))
70 #endif
71
72 static void ctf_live_packet_seek(struct bt_stream_pos *stream_pos,
73 size_t index, int whence);
74 static int add_traces(struct lttng_live_ctx *ctx);
75 static int del_traces(gpointer key, gpointer value, gpointer user_data);
76 static int get_new_metadata(struct lttng_live_ctx *ctx,
77 struct lttng_live_viewer_stream *viewer_stream,
78 char **metadata_buf);
79
80 static
81 ssize_t lttng_live_recv(int fd, void *buf, size_t len)
82 {
83 ssize_t ret;
84 size_t copied = 0, to_copy = len;
85
86 do {
87 ret = recv(fd, buf + copied, to_copy, 0);
88 if (ret > 0) {
89 assert(ret <= to_copy);
90 copied += ret;
91 to_copy -= ret;
92 }
93 } while ((ret > 0 && to_copy > 0)
94 || (ret < 0 && errno == EINTR));
95 if (ret > 0)
96 ret = copied;
97 /* ret = 0 means orderly shutdown, ret < 0 is error. */
98 return ret;
99 }
100
101 static
102 ssize_t lttng_live_send(int fd, const void *buf, size_t len)
103 {
104 ssize_t ret;
105
106 do {
107 ret = bt_send_nosigpipe(fd, buf, len);
108 } while (ret < 0 && errno == EINTR);
109 return ret;
110 }
111
112 int lttng_live_connect_viewer(struct lttng_live_ctx *ctx)
113 {
114 struct hostent *host;
115 struct sockaddr_in server_addr;
116 int ret;
117
118 if (lttng_live_should_quit()) {
119 ret = -1;
120 goto end;
121 }
122
123 host = gethostbyname(ctx->relay_hostname);
124 if (!host) {
125 fprintf(stderr, "[error] Cannot lookup hostname %s\n",
126 ctx->relay_hostname);
127 goto error;
128 }
129
130 if ((ctx->control_sock = socket(AF_INET, SOCK_STREAM, 0)) == -1) {
131 perror("Socket");
132 goto error;
133 }
134
135 server_addr.sin_family = AF_INET;
136 server_addr.sin_port = htons(ctx->port);
137 server_addr.sin_addr = *((struct in_addr *) host->h_addr);
138 memset(&(server_addr.sin_zero), 0, 8);
139
140 if (connect(ctx->control_sock, (struct sockaddr *) &server_addr,
141 sizeof(struct sockaddr)) == -1) {
142 perror("Connect");
143 goto error;
144 }
145
146 ret = 0;
147
148 end:
149 return ret;
150
151 error:
152 fprintf(stderr, "[error] Connection failed\n");
153 return -1;
154 }
155
156 int lttng_live_establish_connection(struct lttng_live_ctx *ctx)
157 {
158 struct lttng_viewer_cmd cmd;
159 struct lttng_viewer_connect connect;
160 const size_t cmd_buf_len = sizeof(cmd) + sizeof(connect);
161 char cmd_buf[cmd_buf_len];
162 int ret;
163 ssize_t ret_len;
164
165 if (lttng_live_should_quit()) {
166 ret = -1;
167 goto end;
168 }
169
170 cmd.cmd = htobe32(LTTNG_VIEWER_CONNECT);
171 cmd.data_size = htobe64((uint64_t) sizeof(connect));
172 cmd.cmd_version = htobe32(0);
173
174 connect.viewer_session_id = -1ULL; /* will be set on recv */
175 connect.major = htobe32(LTTNG_LIVE_MAJOR);
176 connect.minor = htobe32(LTTNG_LIVE_MINOR);
177 connect.type = htobe32(LTTNG_VIEWER_CLIENT_COMMAND);
178
179 /*
180 * Merge the cmd and connection request to prevent a write-write
181 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
182 * second write to be performed quickly in presence of Nagle's algorithm.
183 */
184 memcpy(cmd_buf, &cmd, sizeof(cmd));
185 memcpy(cmd_buf + sizeof(cmd), &connect, sizeof(connect));
186
187 ret_len = lttng_live_send(ctx->control_sock, cmd_buf, cmd_buf_len);
188 if (ret_len < 0) {
189 perror("[error] Error sending cmd for establishing session");
190 goto error;
191 }
192 assert(ret_len == cmd_buf_len);
193
194 ret_len = lttng_live_recv(ctx->control_sock, &connect, sizeof(connect));
195 if (ret_len == 0) {
196 fprintf(stderr, "[error] Remote side has closed connection\n");
197 goto error;
198 }
199 if (ret_len < 0) {
200 perror("[error] Error receiving version");
201 goto error;
202 }
203 assert(ret_len == sizeof(connect));
204
205 printf_verbose("Received viewer session ID : %" PRIu64 "\n",
206 be64toh(connect.viewer_session_id));
207 printf_verbose("Relayd version : %u.%u\n", be32toh(connect.major),
208 be32toh(connect.minor));
209
210 if (LTTNG_LIVE_MAJOR != be32toh(connect.major)) {
211 fprintf(stderr, "[error] Incompatible lttng-relayd protocol\n");
212 goto error;
213 }
214 /* Use the smallest protocol version implemented. */
215 if (LTTNG_LIVE_MINOR > be32toh(connect.minor)) {
216 ctx->minor = be32toh(connect.minor);
217 } else {
218 ctx->minor = LTTNG_LIVE_MINOR;
219 }
220 ctx->major = LTTNG_LIVE_MAJOR;
221 ret = 0;
222 end:
223 return ret;
224
225 error:
226 fprintf(stderr, "[error] Unable to establish connection\n");
227 return -1;
228 }
229
230 static
231 void free_session_list(GPtrArray *session_list)
232 {
233 int i;
234 struct lttng_live_relay_session *relay_session;
235
236 for (i = 0; i < session_list->len; i++) {
237 relay_session = g_ptr_array_index(session_list, i);
238 free(relay_session->name);
239 free(relay_session->hostname);
240 }
241 g_ptr_array_free(session_list, TRUE);
242 }
243
244 static
245 void print_session_list(GPtrArray *session_list, const char *path)
246 {
247 int i;
248 struct lttng_live_relay_session *relay_session;
249
250 for (i = 0; i < session_list->len; i++) {
251 relay_session = g_ptr_array_index(session_list, i);
252 fprintf(LTTNG_LIVE_OUTPUT_FP, "%s/host/%s/%s (timer = %u, "
253 "%u stream(s), %u client(s) connected)\n",
254 path, relay_session->hostname,
255 relay_session->name, relay_session->timer,
256 relay_session->streams, relay_session->clients);
257 }
258 }
259
260 static
261 void update_session_list(GPtrArray *session_list, char *hostname,
262 char *session_name, uint32_t streams, uint32_t clients,
263 uint32_t timer)
264 {
265 int i, found = 0;
266 struct lttng_live_relay_session *relay_session;
267
268 for (i = 0; i < session_list->len; i++) {
269 relay_session = g_ptr_array_index(session_list, i);
270 if ((strncmp(relay_session->hostname, hostname, MAXNAMLEN) == 0) &&
271 strncmp(relay_session->name,
272 session_name, MAXNAMLEN) == 0) {
273 relay_session->streams += streams;
274 if (relay_session->clients < clients)
275 relay_session->clients = clients;
276 found = 1;
277 break;
278 }
279 }
280 if (found)
281 return;
282
283 relay_session = g_new0(struct lttng_live_relay_session, 1);
284 relay_session->hostname = bt_strndup(hostname, MAXNAMLEN);
285 relay_session->name = bt_strndup(session_name, MAXNAMLEN);
286 relay_session->clients = clients;
287 relay_session->streams = streams;
288 relay_session->timer = timer;
289 g_ptr_array_add(session_list, relay_session);
290 }
291
292 int lttng_live_list_sessions(struct lttng_live_ctx *ctx, const char *path)
293 {
294 struct lttng_viewer_cmd cmd;
295 struct lttng_viewer_list_sessions list;
296 struct lttng_viewer_session lsession;
297 int i, ret, sessions_count, print_list = 0;
298 ssize_t ret_len;
299 uint64_t session_id;
300 GPtrArray *session_list = NULL;
301
302 if (lttng_live_should_quit()) {
303 ret = -1;
304 goto end;
305 }
306
307 if (strlen(ctx->session_name) == 0) {
308 print_list = 1;
309 session_list = g_ptr_array_new();
310 }
311
312 cmd.cmd = htobe32(LTTNG_VIEWER_LIST_SESSIONS);
313 cmd.data_size = htobe64((uint64_t) 0);
314 cmd.cmd_version = htobe32(0);
315
316 ret_len = lttng_live_send(ctx->control_sock, &cmd, sizeof(cmd));
317 if (ret_len < 0) {
318 perror("[error] Error sending cmd");
319 goto error;
320 }
321 assert(ret_len == sizeof(cmd));
322
323 ret_len = lttng_live_recv(ctx->control_sock, &list, sizeof(list));
324 if (ret_len == 0) {
325 fprintf(stderr, "[error] Remote side has closed connection\n");
326 goto error;
327 }
328 if (ret_len < 0) {
329 perror("[error] Error receiving session list");
330 goto error;
331 }
332 assert(ret_len == sizeof(list));
333
334 sessions_count = be32toh(list.sessions_count);
335 for (i = 0; i < sessions_count; i++) {
336 ret_len = lttng_live_recv(ctx->control_sock, &lsession, sizeof(lsession));
337 if (ret_len == 0) {
338 fprintf(stderr, "[error] Remote side has closed connection\n");
339 goto error;
340 }
341 if (ret_len < 0) {
342 perror("[error] Error receiving session");
343 goto error;
344 }
345 assert(ret_len == sizeof(lsession));
346 lsession.hostname[LTTNG_VIEWER_HOST_NAME_MAX - 1] = '\0';
347 lsession.session_name[LTTNG_VIEWER_NAME_MAX - 1] = '\0';
348 session_id = be64toh(lsession.id);
349
350 if (print_list) {
351 update_session_list(session_list,
352 lsession.hostname,
353 lsession.session_name,
354 be32toh(lsession.streams),
355 be32toh(lsession.clients),
356 be32toh(lsession.live_timer));
357 } else {
358 if ((strncmp(lsession.session_name, ctx->session_name,
359 MAXNAMLEN) == 0) && (strncmp(lsession.hostname,
360 ctx->traced_hostname, MAXNAMLEN) == 0)) {
361 printf_verbose("Reading from session %" PRIu64 "\n",
362 session_id);
363 g_array_append_val(ctx->session_ids,
364 session_id);
365 }
366 }
367 }
368
369 if (print_list) {
370 print_session_list(session_list, path);
371 free_session_list(session_list);
372 }
373 ret = 0;
374 end:
375 return ret;
376
377 error:
378 fprintf(stderr, "[error] Unable to list sessions\n");
379 return -1;
380 }
381
382 int lttng_live_ctf_trace_assign(struct lttng_live_viewer_stream *stream,
383 uint64_t ctf_trace_id)
384 {
385 struct lttng_live_ctf_trace *trace;
386 int ret = 0;
387
388 trace = g_hash_table_lookup(stream->session->ctf_traces,
389 &ctf_trace_id);
390 if (!trace) {
391 trace = g_new0(struct lttng_live_ctf_trace, 1);
392 trace->ctf_trace_id = ctf_trace_id;
393 BT_INIT_LIST_HEAD(&trace->stream_list);
394 g_hash_table_insert(stream->session->ctf_traces,
395 &trace->ctf_trace_id,
396 trace);
397 }
398 if (stream->metadata_flag)
399 trace->metadata_stream = stream;
400
401 assert(!stream->in_trace);
402 stream->in_trace = 1;
403 stream->ctf_trace = trace;
404 bt_list_add(&stream->trace_stream_node, &trace->stream_list);
405
406 return ret;
407 }
408
409 static
410 int open_metadata_fp_write(struct lttng_live_viewer_stream *stream,
411 char **metadata_buf, size_t *size)
412 {
413 int ret = 0;
414
415 stream->metadata_fp_write =
416 babeltrace_open_memstream(metadata_buf, size);
417 if (!stream->metadata_fp_write) {
418 perror("Metadata open_memstream");
419 ret = -1;
420 }
421
422 return ret;
423 }
424
425 int lttng_live_attach_session(struct lttng_live_ctx *ctx, uint64_t id)
426 {
427 struct lttng_viewer_cmd cmd;
428 struct lttng_viewer_attach_session_request rq;
429 struct lttng_viewer_attach_session_response rp;
430 struct lttng_viewer_stream stream;
431 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
432 char cmd_buf[cmd_buf_len];
433 int ret, i;
434 ssize_t ret_len;
435
436 if (lttng_live_should_quit()) {
437 ret = -1;
438 goto end;
439 }
440
441 cmd.cmd = htobe32(LTTNG_VIEWER_ATTACH_SESSION);
442 cmd.data_size = htobe64((uint64_t) sizeof(rq));
443 cmd.cmd_version = htobe32(0);
444
445 memset(&rq, 0, sizeof(rq));
446 rq.session_id = htobe64(id);
447 // TODO: add cmd line parameter to select seek beginning
448 // rq.seek = htobe32(LTTNG_VIEWER_SEEK_BEGINNING);
449 rq.seek = htobe32(LTTNG_VIEWER_SEEK_LAST);
450
451 /*
452 * Merge the cmd and connection request to prevent a write-write
453 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
454 * second write to be performed quickly in presence of Nagle's algorithm.
455 */
456 memcpy(cmd_buf, &cmd, sizeof(cmd));
457 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
458
459 ret_len = lttng_live_send(ctx->control_sock, cmd_buf, cmd_buf_len);
460 if (ret_len < 0) {
461 perror("[error] Error sending attach command and request");
462 goto error;
463 }
464 assert(ret_len == cmd_buf_len);
465
466 ret_len = lttng_live_recv(ctx->control_sock, &rp, sizeof(rp));
467 if (ret_len == 0) {
468 fprintf(stderr, "[error] Remote side has closed connection\n");
469 goto error;
470 }
471 if (ret_len < 0) {
472 perror("[error] Error receiving attach response");
473 goto error;
474 }
475 assert(ret_len == sizeof(rp));
476
477 switch(be32toh(rp.status)) {
478 case LTTNG_VIEWER_ATTACH_OK:
479 break;
480 case LTTNG_VIEWER_ATTACH_UNK:
481 ret = -LTTNG_VIEWER_ATTACH_UNK;
482 goto end;
483 case LTTNG_VIEWER_ATTACH_ALREADY:
484 fprintf(stderr, "[error] There is already a viewer attached to this session\n");
485 goto error;
486 case LTTNG_VIEWER_ATTACH_NOT_LIVE:
487 fprintf(stderr, "[error] Not a live session\n");
488 goto error;
489 case LTTNG_VIEWER_ATTACH_SEEK_ERR:
490 fprintf(stderr, "[error] Wrong seek parameter\n");
491 goto error;
492 default:
493 fprintf(stderr, "[error] Unknown attach return code %u\n",
494 be32toh(rp.status));
495 goto error;
496 }
497 if (be32toh(rp.status) != LTTNG_VIEWER_ATTACH_OK) {
498 goto error;
499 }
500
501 ctx->session->stream_count += be32toh(rp.streams_count);
502 /*
503 * When the session is created but not started, we do an active wait
504 * until it starts. It allows the viewer to start processing the trace
505 * as soon as the session starts.
506 */
507 if (ctx->session->stream_count == 0) {
508 ret = 0;
509 goto end;
510 }
511 printf_verbose("Waiting for %d streams:\n",
512 be32toh(rp.streams_count));
513 for (i = 0; i < be32toh(rp.streams_count); i++) {
514 struct lttng_live_viewer_stream *lvstream;
515
516 lvstream = g_new0(struct lttng_live_viewer_stream, 1);
517 ret_len = lttng_live_recv(ctx->control_sock, &stream,
518 sizeof(stream));
519 if (ret_len == 0) {
520 fprintf(stderr, "[error] Remote side has closed connection\n");
521 g_free(lvstream);
522 goto error;
523 }
524 if (ret_len < 0) {
525 perror("[error] Error receiving stream");
526 g_free(lvstream);
527 goto error;
528 }
529 assert(ret_len == sizeof(stream));
530 stream.path_name[LTTNG_VIEWER_PATH_MAX - 1] = '\0';
531 stream.channel_name[LTTNG_VIEWER_NAME_MAX - 1] = '\0';
532
533 printf_verbose(" stream %" PRIu64 " : %s/%s\n",
534 be64toh(stream.id), stream.path_name,
535 stream.channel_name);
536 lvstream->id = be64toh(stream.id);
537 lvstream->session = ctx->session;
538
539 lvstream->mmap_size = 0;
540 lvstream->ctf_stream_id = -1ULL;
541
542 if (be32toh(stream.metadata_flag)) {
543 lvstream->metadata_flag = 1;
544 }
545 ret = lttng_live_ctf_trace_assign(lvstream,
546 be64toh(stream.ctf_trace_id));
547 if (ret < 0) {
548 g_free(lvstream);
549 goto error;
550 }
551 bt_list_add(&lvstream->session_stream_node,
552 &ctx->session->stream_list);
553 }
554 ret = 0;
555 end:
556 return ret;
557
558 error:
559 return -1;
560 }
561
562 /*
563 * Ask the relay for new streams.
564 *
565 * Returns the number of new streams received or a negative value on error.
566 */
567 static
568 int ask_new_streams(struct lttng_live_ctx *ctx)
569 {
570 int i, ret = 0, nb_streams = 0;
571 uint64_t id;
572
573 restart:
574 for (i = 0; i < ctx->session_ids->len; i++) {
575 id = g_array_index(ctx->session_ids, uint64_t, i);
576 ret = lttng_live_get_new_streams(ctx, id);
577 printf_verbose("Asking for new streams returns %d\n", ret);
578 if (lttng_live_should_quit()) {
579 ret = -1;
580 goto end;
581 }
582 if (ret < 0) {
583 if (ret == -LTTNG_VIEWER_NEW_STREAMS_HUP) {
584 printf_verbose("Session %" PRIu64 " closed\n",
585 id);
586 /*
587 * The streams have already been closed during
588 * the reading, so we only need to get rid of
589 * the trace in our internal table of sessions.
590 */
591 g_array_remove_index(ctx->session_ids, i);
592 /*
593 * We can't continue iterating on the g_array
594 * after a remove, we have to start again.
595 */
596 goto restart;
597 } else {
598 ret = -1;
599 goto end;
600 }
601 } else {
602 nb_streams += ret;
603 }
604 }
605 if (ctx->session_ids->len == 0) {
606 /* All sessions are closed. */
607 ret = -1;
608 } else {
609 ret = nb_streams;
610 }
611
612 end:
613 return ret;
614 }
615
616 static
617 int append_metadata(struct lttng_live_ctx *ctx,
618 struct lttng_live_viewer_stream *viewer_stream)
619 {
620 int ret;
621 struct lttng_live_viewer_stream *metadata;
622 char *metadata_buf = NULL;
623
624 if (!viewer_stream->ctf_trace->handle) {
625 printf_verbose("append_metadata: trace handle not ready yet.\n");
626 return 0;
627 }
628
629 printf_verbose("get_next_index: new metadata needed\n");
630 ret = get_new_metadata(ctx, viewer_stream, &metadata_buf);
631 if (ret < 0) {
632 free(metadata_buf);
633 goto error;
634 }
635
636 metadata = viewer_stream->ctf_trace->metadata_stream;
637 metadata->ctf_trace->metadata_fp =
638 babeltrace_fmemopen(metadata_buf,
639 metadata->metadata_len, "rb");
640 if (!metadata->ctf_trace->metadata_fp) {
641 perror("Metadata fmemopen");
642 free(metadata_buf);
643 ret = -1;
644 goto error;
645 }
646 ret = ctf_append_trace_metadata(
647 viewer_stream->ctf_trace->handle->td,
648 metadata->ctf_trace->metadata_fp);
649 /* We accept empty metadata packets */
650 if (ret != 0 && ret != -ENOENT) {
651 fprintf(stderr, "[error] Appending metadata\n");
652 goto error;
653 }
654 ret = 0;
655
656 error:
657 return ret;
658 }
659
660 static
661 int get_data_packet(struct lttng_live_ctx *ctx,
662 struct ctf_stream_pos *pos,
663 struct lttng_live_viewer_stream *stream, uint64_t offset,
664 uint64_t len)
665 {
666 struct lttng_viewer_cmd cmd;
667 struct lttng_viewer_get_packet rq;
668 struct lttng_viewer_trace_packet rp;
669 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
670 char cmd_buf[cmd_buf_len];
671 ssize_t ret_len;
672 int ret;
673
674 retry:
675 if (lttng_live_should_quit()) {
676 ret = -1;
677 goto end;
678 }
679
680 cmd.cmd = htobe32(LTTNG_VIEWER_GET_PACKET);
681 cmd.data_size = htobe64((uint64_t) sizeof(rq));
682 cmd.cmd_version = htobe32(0);
683
684 memset(&rq, 0, sizeof(rq));
685 rq.stream_id = htobe64(stream->id);
686 rq.offset = htobe64(offset);
687 rq.len = htobe32(len);
688
689 /*
690 * Merge the cmd and connection request to prevent a write-write
691 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
692 * second write to be performed quickly in presence of Nagle's algorithm.
693 */
694 memcpy(cmd_buf, &cmd, sizeof(cmd));
695 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
696
697 ret_len = lttng_live_send(ctx->control_sock, cmd_buf, cmd_buf_len);
698 if (ret_len < 0) {
699 perror("[error] Error sending get_data_packet cmd and request");
700 goto error;
701 }
702 assert(ret_len == cmd_buf_len);
703
704 ret_len = lttng_live_recv(ctx->control_sock, &rp, sizeof(rp));
705 if (ret_len == 0) {
706 fprintf(stderr, "[error] Remote side has closed connection\n");
707 goto error;
708 }
709 if (ret_len < 0) {
710 perror("[error] Error receiving data response");
711 goto error;
712 }
713 if (ret_len != sizeof(rp)) {
714 fprintf(stderr, "[error] get_data_packet: expected %zu"
715 ", received %zd\n", sizeof(rp),
716 ret_len);
717 goto error;
718 }
719
720 rp.flags = be32toh(rp.flags);
721
722 switch (be32toh(rp.status)) {
723 case LTTNG_VIEWER_GET_PACKET_OK:
724 len = be32toh(rp.len);
725 printf_verbose("get_data_packet: Ok, packet size : %" PRIu64
726 "\n", len);
727 break;
728 case LTTNG_VIEWER_GET_PACKET_RETRY:
729 /* Unimplemented by relay daemon */
730 printf_verbose("get_data_packet: retry\n");
731 goto error;
732 case LTTNG_VIEWER_GET_PACKET_ERR:
733 if (rp.flags & LTTNG_VIEWER_FLAG_NEW_METADATA) {
734 printf_verbose("get_data_packet: new metadata needed\n");
735 ret = append_metadata(ctx, stream);
736 if (ret)
737 goto error;
738 }
739 if (rp.flags & LTTNG_VIEWER_FLAG_NEW_STREAM) {
740 printf_verbose("get_data_packet: new streams needed\n");
741 ret = ask_new_streams(ctx);
742 if (ret < 0) {
743 goto error;
744 } else if (ret > 0) {
745 ret = add_traces(ctx);
746 if (ret < 0) {
747 goto error;
748 }
749 }
750 }
751 if (rp.flags & (LTTNG_VIEWER_FLAG_NEW_METADATA
752 | LTTNG_VIEWER_FLAG_NEW_STREAM)) {
753 goto retry;
754 }
755 fprintf(stderr, "[error] get_data_packet: error\n");
756 goto error;
757 case LTTNG_VIEWER_GET_PACKET_EOF:
758 ret = -2;
759 goto end;
760 default:
761 printf_verbose("get_data_packet: unknown\n");
762 goto error;
763 }
764
765 if (len == 0) {
766 goto error;
767 }
768
769 if (len > stream->mmap_size) {
770 uint64_t new_size;
771
772 new_size = max_t(uint64_t, len, stream->mmap_size << 1);
773 if (pos->base_mma) {
774 /* unmap old base */
775 ret = munmap_align(pos->base_mma);
776 if (ret) {
777 perror("[error] Unable to unmap old base");
778 goto error;
779 }
780 pos->base_mma = NULL;
781 }
782 pos->base_mma = mmap_align(new_size,
783 PROT_READ | PROT_WRITE,
784 MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);
785 if (pos->base_mma == MAP_FAILED) {
786 perror("[error] mmap error");
787 pos->base_mma = NULL;
788 goto error;
789 }
790
791 stream->mmap_size = new_size;
792 printf_verbose("Expanding stream mmap size to %" PRIu64 " bytes\n",
793 stream->mmap_size);
794 }
795
796 ret_len = lttng_live_recv(ctx->control_sock,
797 mmap_align_addr(pos->base_mma), len);
798 if (ret_len == 0) {
799 fprintf(stderr, "[error] Remote side has closed connection\n");
800 goto error;
801 }
802 if (ret_len < 0) {
803 perror("[error] Error receiving trace packet");
804 goto error;
805 }
806 assert(ret_len == len);
807 ret = 0;
808 end:
809 return ret;
810
811 error:
812 return -1;
813 }
814
815 static
816 int get_one_metadata_packet(struct lttng_live_ctx *ctx,
817 struct lttng_live_viewer_stream *metadata_stream)
818 {
819 uint64_t len = 0;
820 int ret;
821 struct lttng_viewer_cmd cmd;
822 struct lttng_viewer_get_metadata rq;
823 struct lttng_viewer_metadata_packet rp;
824 char *data = NULL;
825 ssize_t ret_len;
826 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
827 char cmd_buf[cmd_buf_len];
828
829 if (lttng_live_should_quit()) {
830 ret = -1;
831 goto end;
832 }
833
834 rq.stream_id = htobe64(metadata_stream->id);
835 cmd.cmd = htobe32(LTTNG_VIEWER_GET_METADATA);
836 cmd.data_size = htobe64((uint64_t) sizeof(rq));
837 cmd.cmd_version = htobe32(0);
838
839 /*
840 * Merge the cmd and connection request to prevent a write-write
841 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
842 * second write to be performed quickly in presence of Nagle's algorithm.
843 */
844 memcpy(cmd_buf, &cmd, sizeof(cmd));
845 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
846
847 ret_len = lttng_live_send(ctx->control_sock, cmd_buf, cmd_buf_len);
848 if (ret_len < 0) {
849 perror("[error] Error sending get_metadata cmd and request");
850 goto error;
851 }
852 assert(ret_len == cmd_buf_len);
853
854 ret_len = lttng_live_recv(ctx->control_sock, &rp, sizeof(rp));
855 if (ret_len == 0) {
856 fprintf(stderr, "[error] Remote side has closed connection\n");
857 goto error;
858 }
859 if (ret_len < 0) {
860 perror("[error] Error receiving metadata response");
861 goto error;
862 }
863 assert(ret_len == sizeof(rp));
864
865 switch (be32toh(rp.status)) {
866 case LTTNG_VIEWER_METADATA_OK:
867 printf_verbose("get_metadata : OK\n");
868 break;
869 case LTTNG_VIEWER_NO_NEW_METADATA:
870 printf_verbose("get_metadata : NO NEW\n");
871 ret = 0;
872 goto end;
873 case LTTNG_VIEWER_METADATA_ERR:
874 printf_verbose("get_metadata : ERR\n");
875 goto error;
876 default:
877 printf_verbose("get_metadata : UNKNOWN\n");
878 goto error;
879 }
880
881 len = be64toh(rp.len);
882 printf_verbose("Writing %" PRIu64" bytes to metadata\n", len);
883 if (len <= 0) {
884 goto error;
885 }
886
887 data = zmalloc(len);
888 if (!data) {
889 perror("relay data zmalloc");
890 goto error;
891 }
892 ret_len = lttng_live_recv(ctx->control_sock, data, len);
893 if (ret_len == 0) {
894 fprintf(stderr, "[error] Remote side has closed connection\n");
895 goto error_free_data;
896 }
897 if (ret_len < 0) {
898 perror("[error] Error receiving trace packet");
899 goto error_free_data;
900 }
901 assert(ret_len == len);
902
903 do {
904 ret_len = fwrite(data, 1, len,
905 metadata_stream->metadata_fp_write);
906 } while (ret_len < 0 && errno == EINTR);
907 if (ret_len < 0) {
908 fprintf(stderr, "[error] Writing in the metadata fp\n");
909 goto error_free_data;
910 }
911 assert(ret_len == len);
912 metadata_stream->metadata_len += len;
913 free(data);
914 ret = len;
915 end:
916 return ret;
917
918 error_free_data:
919 free(data);
920 error:
921 return -1;
922 }
923
924 /*
925 * Return 0 on success, a negative value on error.
926 */
927 static
928 int get_new_metadata(struct lttng_live_ctx *ctx,
929 struct lttng_live_viewer_stream *viewer_stream,
930 char **metadata_buf)
931 {
932 int ret = 0;
933 struct lttng_live_viewer_stream *metadata_stream;
934 size_t size, len_read = 0;
935
936 metadata_stream = viewer_stream->ctf_trace->metadata_stream;
937 if (!metadata_stream) {
938 fprintf(stderr, "[error] No metadata stream\n");
939 ret = -1;
940 goto error;
941 }
942 metadata_stream->metadata_len = 0;
943 ret = open_metadata_fp_write(metadata_stream, metadata_buf, &size);
944 if (ret < 0) {
945 goto error;
946 }
947
948 do {
949 if (lttng_live_should_quit()) {
950 ret = -1;
951 goto error;
952 }
953 /*
954 * get_one_metadata_packet returns the number of bytes
955 * received, 0 when we have received everything, a
956 * negative value on error.
957 */
958 ret = get_one_metadata_packet(ctx, metadata_stream);
959 if (ret > 0) {
960 len_read += ret;
961 }
962 if (!len_read) {
963 (void) poll(NULL, 0, ACTIVE_POLL_DELAY);
964 }
965 if (ret < 0) {
966 break; /* Stop on error. */
967 }
968 } while (ret > 0 || !len_read);
969
970 if (babeltrace_close_memstream(metadata_buf, &size,
971 metadata_stream->metadata_fp_write)) {
972 perror("babeltrace_close_memstream");
973 }
974 metadata_stream->metadata_fp_write = NULL;
975
976 error:
977 return ret;
978 }
979
980 /*
981 * Assign the fields from a lttng_viewer_index to a packet_index.
982 */
983 static
984 void lttng_index_to_packet_index(struct lttng_viewer_index *lindex,
985 struct packet_index *pindex)
986 {
987 assert(lindex);
988 assert(pindex);
989
990 pindex->offset = be64toh(lindex->offset);
991 pindex->packet_size = be64toh(lindex->packet_size);
992 pindex->content_size = be64toh(lindex->content_size);
993 pindex->ts_cycles.timestamp_begin = be64toh(lindex->timestamp_begin);
994 pindex->ts_cycles.timestamp_end = be64toh(lindex->timestamp_end);
995 pindex->events_discarded = be64toh(lindex->events_discarded);
996 }
997
998 /*
999 * Get one index for a stream.
1000 *
1001 * Returns 0 on success or a negative value on error.
1002 */
1003 static
1004 int get_next_index(struct lttng_live_ctx *ctx,
1005 struct lttng_live_viewer_stream *viewer_stream,
1006 struct packet_index *index, uint64_t *stream_id)
1007 {
1008 struct lttng_viewer_cmd cmd;
1009 struct lttng_viewer_get_next_index rq;
1010 int ret;
1011 ssize_t ret_len;
1012 struct lttng_viewer_index *rp = &viewer_stream->current_index;
1013 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
1014 char cmd_buf[cmd_buf_len];
1015
1016 cmd.cmd = htobe32(LTTNG_VIEWER_GET_NEXT_INDEX);
1017 cmd.data_size = htobe64((uint64_t) sizeof(rq));
1018 cmd.cmd_version = htobe32(0);
1019
1020 memset(&rq, 0, sizeof(rq));
1021 rq.stream_id = htobe64(viewer_stream->id);
1022
1023 /*
1024 * Merge the cmd and connection request to prevent a write-write
1025 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
1026 * second write to be performed quickly in presence of Nagle's algorithm.
1027 */
1028 memcpy(cmd_buf, &cmd, sizeof(cmd));
1029 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
1030 retry:
1031 if (lttng_live_should_quit()) {
1032 ret = -1;
1033 goto end;
1034 }
1035 ret_len = lttng_live_send(ctx->control_sock, &cmd_buf, cmd_buf_len);
1036 if (ret_len < 0) {
1037 perror("[error] Error sending get_next_index cmd and request");
1038 goto error;
1039 }
1040 assert(ret_len == cmd_buf_len);
1041
1042 ret_len = lttng_live_recv(ctx->control_sock, rp, sizeof(*rp));
1043 if (ret_len == 0) {
1044 fprintf(stderr, "[error] Remote side has closed connection\n");
1045 goto error;
1046 }
1047 if (ret_len < 0) {
1048 perror("[error] Error receiving index response");
1049 goto error;
1050 }
1051 assert(ret_len == sizeof(*rp));
1052
1053 rp->flags = be32toh(rp->flags);
1054
1055 switch (be32toh(rp->status)) {
1056 case LTTNG_VIEWER_INDEX_INACTIVE:
1057 printf_verbose("get_next_index: inactive\n");
1058
1059 if (index->ts_cycles.timestamp_end ==
1060 be64toh(rp->timestamp_end)) {
1061 /* Already seen this timestamp. */
1062 (void) poll(NULL, 0, ACTIVE_POLL_DELAY);
1063 }
1064
1065 memset(index, 0, sizeof(struct packet_index));
1066 index->ts_cycles.timestamp_end = be64toh(rp->timestamp_end);
1067 *stream_id = be64toh(rp->stream_id);
1068 break;
1069 case LTTNG_VIEWER_INDEX_OK:
1070 printf_verbose("get_next_index: Ok, need metadata update : %u\n",
1071 rp->flags & LTTNG_VIEWER_FLAG_NEW_METADATA);
1072 lttng_index_to_packet_index(rp, index);
1073 *stream_id = be64toh(rp->stream_id);
1074 viewer_stream->data_pending = 1;
1075
1076 if (rp->flags & LTTNG_VIEWER_FLAG_NEW_METADATA) {
1077 ret = append_metadata(ctx, viewer_stream);
1078 if (ret)
1079 goto error;
1080 }
1081 if (rp->flags & LTTNG_VIEWER_FLAG_NEW_STREAM) {
1082 printf_verbose("get_next_index: need new streams\n");
1083 ret = ask_new_streams(ctx);
1084 if (ret < 0) {
1085 goto error;
1086 } else if (ret > 0) {
1087 ret = add_traces(ctx);
1088 if (ret < 0) {
1089 goto error;
1090 }
1091 }
1092 }
1093 break;
1094 case LTTNG_VIEWER_INDEX_RETRY:
1095 printf_verbose("get_next_index: retry\n");
1096 (void) poll(NULL, 0, ACTIVE_POLL_DELAY);
1097 goto retry;
1098 case LTTNG_VIEWER_INDEX_HUP:
1099 printf_verbose("get_next_index: stream hung up\n");
1100 viewer_stream->id = -1ULL;
1101 index->offset = EOF;
1102 ctx->session->stream_count--;
1103 viewer_stream->in_trace = 0;
1104 bt_list_del(&viewer_stream->trace_stream_node);
1105 bt_list_del(&viewer_stream->session_stream_node);
1106 g_free(viewer_stream);
1107 *stream_id = be64toh(rp->stream_id);
1108 break;
1109 case LTTNG_VIEWER_INDEX_ERR:
1110 fprintf(stderr, "[error] get_next_index: error\n");
1111 goto error;
1112 default:
1113 fprintf(stderr, "[error] get_next_index: unkwown value\n");
1114 goto error;
1115 }
1116 ret = 0;
1117 end:
1118 return ret;
1119
1120 error:
1121 return -1;
1122 }
1123
1124 static
1125 void read_packet_header(struct ctf_stream_pos *pos,
1126 struct ctf_file_stream *file_stream)
1127 {
1128 int ret;
1129
1130 /* update trace_packet_header and stream_packet_context */
1131 if (!(pos->prot & PROT_WRITE) &&
1132 file_stream->parent.trace_packet_header) {
1133 /* Read packet header */
1134 ret = generic_rw(&pos->parent,
1135 &file_stream->parent.trace_packet_header->p);
1136 if (ret) {
1137 pos->offset = EOF;
1138 fprintf(stderr, "[error] trace packet "
1139 "header read failed\n");
1140 goto end;
1141 }
1142 }
1143 if (!(pos->prot & PROT_WRITE) &&
1144 file_stream->parent.stream_packet_context) {
1145 /* Read packet context */
1146 ret = generic_rw(&pos->parent,
1147 &file_stream->parent.stream_packet_context->p);
1148 if (ret) {
1149 pos->offset = EOF;
1150 fprintf(stderr, "[error] stream packet "
1151 "context read failed\n");
1152 goto end;
1153 }
1154 }
1155 pos->data_offset = pos->offset;
1156
1157 end:
1158 return;
1159 }
1160
1161 /*
1162 * Handle the seek parameters.
1163 * Returns 0 if the packet_seek can continue, a positive value to
1164 * cleanly exit the packet_seek, a negative value on error.
1165 */
1166 static
1167 int handle_seek_position(size_t index, int whence,
1168 struct lttng_live_viewer_stream *viewer_stream,
1169 struct ctf_stream_pos *pos,
1170 struct ctf_file_stream *file_stream)
1171 {
1172 int ret = 0;
1173
1174 switch (whence) {
1175 case SEEK_CUR:
1176 ret = 0;
1177 goto end;
1178 case SEEK_SET:
1179 /*
1180 * We only allow to seek to 0.
1181 */
1182 if (index != 0) {
1183 fprintf(stderr, "[error] Arbitrary seek in lttng-live "
1184 "trace not supported\n");
1185 pos->offset = EOF;
1186 ret = -1;
1187 goto end;
1188 }
1189
1190 ret = 0;
1191 goto end;
1192
1193 default:
1194 fprintf(stderr, "[error] Invalid seek parameter\n");
1195 assert(0);
1196 }
1197
1198 end:
1199 return ret;
1200 }
1201
1202 static
1203 void ctf_live_packet_seek(struct bt_stream_pos *stream_pos, size_t index,
1204 int whence)
1205 {
1206 struct ctf_stream_pos *pos;
1207 struct ctf_file_stream *file_stream;
1208 struct packet_index *prev_index = NULL, *cur_index;
1209 struct lttng_live_viewer_stream *viewer_stream;
1210 struct lttng_live_session *session;
1211 uint64_t stream_id = -1ULL;
1212 int ret;
1213
1214 pos = ctf_pos(stream_pos);
1215 file_stream = container_of(pos, struct ctf_file_stream, pos);
1216 viewer_stream = (struct lttng_live_viewer_stream *) pos->priv;
1217 session = viewer_stream->session;
1218
1219 ret = handle_seek_position(index, whence, viewer_stream, pos,
1220 file_stream);
1221 if (ret != 0) {
1222 return;
1223 }
1224
1225 retry:
1226 switch (pos->packet_index->len) {
1227 case 0:
1228 g_array_set_size(pos->packet_index, 1);
1229 cur_index = &g_array_index(pos->packet_index,
1230 struct packet_index, 0);
1231 break;
1232 case 1:
1233 g_array_set_size(pos->packet_index, 2);
1234 prev_index = &g_array_index(pos->packet_index,
1235 struct packet_index, 0);
1236 cur_index = &g_array_index(pos->packet_index,
1237 struct packet_index, 1);
1238 break;
1239 case 2:
1240 g_array_index(pos->packet_index,
1241 struct packet_index, 0) =
1242 g_array_index(pos->packet_index,
1243 struct packet_index, 1);
1244 prev_index = &g_array_index(pos->packet_index,
1245 struct packet_index, 0);
1246 cur_index = &g_array_index(pos->packet_index,
1247 struct packet_index, 1);
1248 break;
1249 default:
1250 abort();
1251 break;
1252 }
1253
1254 if (viewer_stream->data_pending) {
1255 lttng_index_to_packet_index(&viewer_stream->current_index, cur_index);
1256 } else {
1257 printf_verbose("get_next_index for stream %" PRIu64 "\n", viewer_stream->id);
1258 ret = get_next_index(session->ctx, viewer_stream, cur_index, &stream_id);
1259 if (ret < 0) {
1260 pos->offset = EOF;
1261 if (!lttng_live_should_quit()) {
1262 fprintf(stderr, "[error] get_next_index failed\n");
1263 }
1264 return;
1265 }
1266 printf_verbose("Index received : packet_size : %" PRIu64
1267 ", offset %" PRIu64 ", content_size %" PRIu64
1268 ", timestamp_end : %" PRIu64 "\n",
1269 cur_index->packet_size, cur_index->offset,
1270 cur_index->content_size,
1271 cur_index->ts_cycles.timestamp_end);
1272
1273 }
1274
1275 /*
1276 * On the first time we receive an index, the stream_id needs to
1277 * be set for the stream in order to use it, we don't want any
1278 * data at this stage.
1279 */
1280 if (file_stream->parent.stream_id == -1ULL) {
1281 /*
1282 * Warning: with lttng-tools < 2.4.2, the beacon does not
1283 * contain the real stream ID, it is memset to 0, so this
1284 * might create a problem when a session has multiple
1285 * channels. We can't detect it at this stage, lttng-tools
1286 * has to be upgraded to fix this problem.
1287 */
1288 printf_verbose("Assigning stream_id %" PRIu64 "\n",
1289 stream_id);
1290 file_stream->parent.stream_id = stream_id;
1291 viewer_stream->ctf_stream_id = stream_id;
1292
1293 return;
1294 }
1295
1296 pos->packet_size = cur_index->packet_size;
1297 pos->content_size = cur_index->content_size;
1298 pos->mmap_base_offset = 0;
1299 if (cur_index->offset == EOF) {
1300 pos->offset = EOF;
1301 } else {
1302 pos->offset = 0;
1303 }
1304
1305 if (cur_index->content_size == 0) {
1306 /* Beacon packet index */
1307 if (file_stream->parent.stream_class) {
1308 file_stream->parent.cycles_timestamp =
1309 cur_index->ts_cycles.timestamp_end;
1310 file_stream->parent.real_timestamp = ctf_get_real_timestamp(
1311 &file_stream->parent,
1312 cur_index->ts_cycles.timestamp_end);
1313
1314 /*
1315 * Duplicate the data from the previous index, because
1316 * the one we just received is only a beacon with no
1317 * relevant information except the timestamp_end. We
1318 * don't need to keep this timestamp_end because we already
1319 * updated the file_stream timestamps, so we only need
1320 * to keep the last real index data as prev_index. That
1321 * way, we keep the original prev timestamps and
1322 * discarded events counter. This is the same behaviour
1323 * as if we were reading a local trace, we would not
1324 * have fake indexes between real indexes.
1325 */
1326 memcpy(cur_index, prev_index, sizeof(struct packet_index));
1327 }
1328 } else {
1329 /* Real packet index */
1330 if (file_stream->parent.stream_class) {
1331 /* Convert the timestamps and append to the real_index. */
1332 cur_index->ts_real.timestamp_begin = ctf_get_real_timestamp(
1333 &file_stream->parent,
1334 cur_index->ts_cycles.timestamp_begin);
1335 cur_index->ts_real.timestamp_end = ctf_get_real_timestamp(
1336 &file_stream->parent,
1337 cur_index->ts_cycles.timestamp_end);
1338 }
1339
1340 ctf_update_current_packet_index(&file_stream->parent,
1341 prev_index, cur_index);
1342
1343 /*
1344 * We need to check if we are in trace read or called
1345 * from packet indexing. In this last case, the
1346 * collection is not there, so we cannot print the
1347 * timestamps.
1348 */
1349 if ((&file_stream->parent)->stream_class->trace->parent.collection) {
1350 ctf_print_discarded_lost(stderr, &file_stream->parent);
1351 }
1352
1353 file_stream->parent.cycles_timestamp =
1354 cur_index->ts_cycles.timestamp_begin;
1355 file_stream->parent.real_timestamp =
1356 cur_index->ts_real.timestamp_begin;
1357 }
1358
1359 /*
1360 * Flush the output between attempts to grab a packet, thus
1361 * ensuring we flush at least at the periodical timer period.
1362 * This ensures the output remains reactive for interactive users and
1363 * that the output is flushed when redirected to a file by the shell.
1364 */
1365 if (fflush(LTTNG_LIVE_OUTPUT_FP) < 0) {
1366 perror("fflush");
1367 goto end;
1368 }
1369
1370 if (pos->packet_size == 0 || pos->offset == EOF) {
1371 goto end;
1372 }
1373
1374 printf_verbose("get_data_packet for stream %" PRIu64 "\n",
1375 viewer_stream->id);
1376 ret = get_data_packet(session->ctx, pos, viewer_stream,
1377 cur_index->offset,
1378 cur_index->packet_size / CHAR_BIT);
1379 if (ret == -2) {
1380 goto retry;
1381 } else if (ret < 0) {
1382 pos->offset = EOF;
1383 if (!lttng_live_should_quit()) {
1384 fprintf(stderr, "[error] get_data_packet failed\n");
1385 }
1386 return;
1387 }
1388 viewer_stream->data_pending = 0;
1389
1390 read_packet_header(pos, file_stream);
1391
1392 end:
1393 return;
1394 }
1395
1396 int lttng_live_create_viewer_session(struct lttng_live_ctx *ctx)
1397 {
1398 struct lttng_viewer_cmd cmd;
1399 struct lttng_viewer_create_session_response resp;
1400 int ret;
1401 ssize_t ret_len;
1402
1403 if (lttng_live_should_quit()) {
1404 ret = -1;
1405 goto end;
1406 }
1407
1408 cmd.cmd = htobe32(LTTNG_VIEWER_CREATE_SESSION);
1409 cmd.data_size = htobe64((uint64_t) 0);
1410 cmd.cmd_version = htobe32(0);
1411
1412 ret_len = lttng_live_send(ctx->control_sock, &cmd, sizeof(cmd));
1413 if (ret_len < 0) {
1414 perror("[error] Error sending cmd");
1415 goto error;
1416 }
1417 assert(ret_len == sizeof(cmd));
1418
1419 ret_len = lttng_live_recv(ctx->control_sock, &resp, sizeof(resp));
1420 if (ret_len == 0) {
1421 fprintf(stderr, "[error] Remote side has closed connection\n");
1422 goto error;
1423 }
1424 if (ret_len < 0) {
1425 perror("[error] Error receiving create session reply");
1426 goto error;
1427 }
1428 assert(ret_len == sizeof(resp));
1429
1430 if (be32toh(resp.status) != LTTNG_VIEWER_CREATE_SESSION_OK) {
1431 fprintf(stderr, "[error] Error creating viewer session\n");
1432 goto error;
1433 }
1434 ret = 0;
1435 end:
1436 return ret;
1437
1438 error:
1439 return -1;
1440 }
1441
1442 static
1443 int del_traces(gpointer key, gpointer value, gpointer user_data)
1444 {
1445 struct bt_context *bt_ctx = user_data;
1446 struct lttng_live_ctf_trace *trace = value;
1447 int ret;
1448 struct lttng_live_viewer_stream *lvstream, *tmp;
1449
1450 /*
1451 * We don't have ownership of the live viewer stream, just
1452 * remove them from our list.
1453 */
1454 bt_list_for_each_entry_safe(lvstream, tmp, &trace->stream_list,
1455 trace_stream_node) {
1456 lvstream->in_trace = 0;
1457 bt_list_del(&lvstream->trace_stream_node);
1458 }
1459 if (trace->in_use) {
1460 ret = bt_context_remove_trace(bt_ctx, trace->trace_id);
1461 if (ret < 0)
1462 fprintf(stderr, "[error] removing trace from context\n");
1463 }
1464
1465 /* remove the key/value pair from the HT. */
1466 return 1;
1467 }
1468
1469 static
1470 int add_one_trace(struct lttng_live_ctx *ctx,
1471 struct lttng_live_ctf_trace *trace)
1472 {
1473 int ret;
1474 struct bt_context *bt_ctx = ctx->bt_ctx;
1475 struct lttng_live_viewer_stream *stream;
1476 struct bt_mmap_stream *new_mmap_stream;
1477 struct bt_mmap_stream_list mmap_list;
1478 struct bt_trace_descriptor *td;
1479 struct bt_trace_handle *handle;
1480
1481 /*
1482 * We don't know how many streams we will receive for a trace, so
1483 * once we are done receiving the traces, we add all the traces
1484 * received to the bt_context.
1485 * We can receive streams during the attach command or the
1486 * get_new_streams, so we have to make sure not to add multiple
1487 * times the same traces.
1488 * If a trace is already in the context, we just skip this function.
1489 */
1490 if (trace->in_use) {
1491 ret = 0;
1492 goto end;
1493 }
1494
1495 BT_INIT_LIST_HEAD(&mmap_list.head);
1496
1497 bt_list_for_each_entry(stream, &trace->stream_list, trace_stream_node) {
1498 if (!stream->metadata_flag) {
1499 new_mmap_stream = zmalloc(sizeof(struct bt_mmap_stream));
1500 new_mmap_stream->priv = (void *) stream;
1501 new_mmap_stream->fd = -1;
1502 bt_list_add(&new_mmap_stream->list, &mmap_list.head);
1503 } else {
1504 char *metadata_buf = NULL;
1505
1506 /* Get all possible metadata before starting */
1507 ret = get_new_metadata(ctx, stream, &metadata_buf);
1508 if (ret) {
1509 free(metadata_buf);
1510 goto end_free;
1511 }
1512 if (!stream->metadata_len) {
1513 fprintf(stderr, "[error] empty metadata\n");
1514 ret = -1;
1515 free(metadata_buf);
1516 goto end_free;
1517 }
1518
1519 trace->metadata_fp = babeltrace_fmemopen(metadata_buf,
1520 stream->metadata_len, "rb");
1521 if (!trace->metadata_fp) {
1522 perror("Metadata fmemopen");
1523 ret = -1;
1524 free(metadata_buf);
1525 goto end_free;
1526 }
1527 }
1528 }
1529
1530 if (!trace->metadata_fp) {
1531 fprintf(stderr, "[error] No metadata stream opened\n");
1532 ret = -1;
1533 goto end_free;
1534 }
1535
1536 ret = bt_context_add_trace(bt_ctx, NULL, "ctf",
1537 ctf_live_packet_seek, &mmap_list, trace->metadata_fp);
1538 if (ret < 0) {
1539 fprintf(stderr, "[error] Error adding trace\n");
1540 ret = -1;
1541 goto end_free;
1542 }
1543 trace->metadata_stream->metadata_len = 0;
1544
1545 handle = (struct bt_trace_handle *) g_hash_table_lookup(
1546 bt_ctx->trace_handles,
1547 (gpointer) (unsigned long) ret);
1548 td = handle->td;
1549 trace->handle = handle;
1550 if (bt_ctx->current_iterator) {
1551 bt_iter_add_trace(bt_ctx->current_iterator, td);
1552 }
1553
1554 trace->trace_id = ret;
1555 trace->in_use = 1;
1556
1557 goto end;
1558
1559 end_free:
1560 bt_context_put(bt_ctx);
1561 end:
1562 return ret;
1563 }
1564
1565 static
1566 int add_traces(struct lttng_live_ctx *ctx)
1567 {
1568 int ret;
1569 struct lttng_live_ctf_trace *trace;
1570 GHashTableIter it;
1571 gpointer key;
1572 gpointer value;
1573
1574 g_hash_table_iter_init(&it, ctx->session->ctf_traces);
1575 while (g_hash_table_iter_next(&it, &key, &value)) {
1576 trace = (struct lttng_live_ctf_trace *) value;
1577 ret = add_one_trace(ctx, trace);
1578 if (ret < 0) {
1579 goto end;
1580 }
1581 }
1582
1583 ret = 0;
1584
1585 end:
1586 return ret;
1587 }
1588
1589 /*
1590 * Request new streams for a session.
1591 * Returns the number of streams received or a negative value on error.
1592 */
1593 int lttng_live_get_new_streams(struct lttng_live_ctx *ctx, uint64_t id)
1594 {
1595 struct lttng_viewer_cmd cmd;
1596 struct lttng_viewer_new_streams_request rq;
1597 struct lttng_viewer_new_streams_response rp;
1598 struct lttng_viewer_stream stream;
1599 int ret, i, nb_streams = 0;
1600 ssize_t ret_len;
1601 uint32_t stream_count;
1602 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
1603 char cmd_buf[cmd_buf_len];
1604
1605 if (lttng_live_should_quit()) {
1606 ret = -1;
1607 goto end;
1608 }
1609
1610 cmd.cmd = htobe32(LTTNG_VIEWER_GET_NEW_STREAMS);
1611 cmd.data_size = htobe64((uint64_t) sizeof(rq));
1612 cmd.cmd_version = htobe32(0);
1613
1614 memset(&rq, 0, sizeof(rq));
1615 rq.session_id = htobe64(id);
1616
1617 /*
1618 * Merge the cmd and connection request to prevent a write-write
1619 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
1620 * second write to be performed quickly in presence of Nagle's algorithm.
1621 */
1622 memcpy(cmd_buf, &cmd, sizeof(cmd));
1623 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
1624
1625 ret_len = lttng_live_send(ctx->control_sock, cmd_buf, cmd_buf_len);
1626 if (ret_len < 0) {
1627 perror("[error] Error sending get_new_streams cmd and request");
1628 goto error;
1629 }
1630 assert(ret_len == cmd_buf_len);
1631
1632 ret_len = lttng_live_recv(ctx->control_sock, &rp, sizeof(rp));
1633 if (ret_len == 0) {
1634 fprintf(stderr, "[error] Remote side has closed connection\n");
1635 goto error;
1636 }
1637 if (ret_len < 0) {
1638 perror("[error] Error receiving get_new_streams response");
1639 goto error;
1640 }
1641 assert(ret_len == sizeof(rp));
1642
1643 switch(be32toh(rp.status)) {
1644 case LTTNG_VIEWER_NEW_STREAMS_OK:
1645 break;
1646 case LTTNG_VIEWER_NEW_STREAMS_NO_NEW:
1647 ret = 0;
1648 goto end;
1649 case LTTNG_VIEWER_NEW_STREAMS_HUP:
1650 ret = -LTTNG_VIEWER_NEW_STREAMS_HUP;
1651 goto end;
1652 case LTTNG_VIEWER_NEW_STREAMS_ERR:
1653 fprintf(stderr, "[error] get_new_streams error\n");
1654 goto error;
1655 default:
1656 fprintf(stderr, "[error] Unknown return code %u\n",
1657 be32toh(rp.status));
1658 goto error;
1659 }
1660
1661 stream_count = be32toh(rp.streams_count);
1662 ctx->session->stream_count += stream_count;
1663 /*
1664 * When the session is created but not started, we do an active wait
1665 * until it starts. It allows the viewer to start processing the trace
1666 * as soon as the session starts.
1667 */
1668 if (ctx->session->stream_count == 0) {
1669 ret = 0;
1670 goto end;
1671 }
1672 printf_verbose("Waiting for %d streams:\n", stream_count);
1673
1674 for (i = 0; i < stream_count; i++) {
1675 struct lttng_live_viewer_stream *lvstream;
1676
1677 lvstream = g_new0(struct lttng_live_viewer_stream, 1);
1678 ret_len = lttng_live_recv(ctx->control_sock, &stream,
1679 sizeof(stream));
1680 if (ret_len == 0) {
1681 fprintf(stderr, "[error] Remote side has closed connection\n");
1682 g_free(lvstream);
1683 goto error;
1684 }
1685 if (ret_len < 0) {
1686 perror("[error] Error receiving stream");
1687 g_free(lvstream);
1688 goto error;
1689 }
1690 assert(ret_len == sizeof(stream));
1691 stream.path_name[LTTNG_VIEWER_PATH_MAX - 1] = '\0';
1692 stream.channel_name[LTTNG_VIEWER_NAME_MAX - 1] = '\0';
1693
1694 printf_verbose(" stream %" PRIu64 " : %s/%s\n",
1695 be64toh(stream.id), stream.path_name,
1696 stream.channel_name);
1697 lvstream->id = be64toh(stream.id);
1698 lvstream->session = ctx->session;
1699
1700 lvstream->mmap_size = 0;
1701 lvstream->ctf_stream_id = -1ULL;
1702
1703 if (be32toh(stream.metadata_flag)) {
1704 lvstream->metadata_flag = 1;
1705 }
1706 ret = lttng_live_ctf_trace_assign(lvstream,
1707 be64toh(stream.ctf_trace_id));
1708 if (ret < 0) {
1709 g_free(lvstream);
1710 goto error;
1711 }
1712 nb_streams++;
1713 bt_list_add(&lvstream->session_stream_node,
1714 &ctx->session->stream_list);
1715 }
1716 ret = nb_streams;
1717 end:
1718 return ret;
1719
1720 error:
1721 return -1;
1722 }
1723
1724 int lttng_live_read(struct lttng_live_ctx *ctx)
1725 {
1726 int ret = -1;
1727 int i;
1728 struct bt_ctf_iter *iter;
1729 const struct bt_ctf_event *event;
1730 struct bt_iter_pos begin_pos;
1731 struct bt_trace_descriptor *td_write;
1732 struct bt_format *fmt_write;
1733 struct ctf_text_stream_pos *sout;
1734 uint64_t id;
1735
1736 ctx->bt_ctx = bt_context_create();
1737 if (!ctx->bt_ctx) {
1738 fprintf(stderr, "[error] bt_context_create allocation\n");
1739 goto end;
1740 }
1741
1742 fmt_write = bt_lookup_format(g_quark_from_static_string("text"));
1743 if (!fmt_write) {
1744 fprintf(stderr, "[error] ctf-text error\n");
1745 goto end_free;
1746 }
1747
1748 td_write = fmt_write->open_trace(NULL, O_RDWR, NULL, NULL);
1749 if (!td_write) {
1750 fprintf(stderr, "[error] Error opening output trace\n");
1751 goto end_free;
1752 }
1753
1754 sout = container_of(td_write, struct ctf_text_stream_pos,
1755 trace_descriptor);
1756 if (!sout->parent.event_cb) {
1757 goto end_free;
1758 }
1759
1760 ret = lttng_live_create_viewer_session(ctx);
1761 if (ret < 0) {
1762 goto end_free;
1763 }
1764
1765 for (i = 0; i < ctx->session_ids->len; i++) {
1766 id = g_array_index(ctx->session_ids, uint64_t, i);
1767 printf_verbose("Attaching to session %" PRIu64 "\n", id);
1768 ret = lttng_live_attach_session(ctx, id);
1769 printf_verbose("Attaching session returns %d\n", ret);
1770 if (ret < 0) {
1771 if (ret == -LTTNG_VIEWER_ATTACH_UNK) {
1772 fprintf(stderr, "[error] Unknown session ID\n");
1773 }
1774 goto end_free;
1775 }
1776 }
1777
1778 /*
1779 * As long as the session is active, we try to get new streams.
1780 */
1781 for (;;) {
1782 int flags;
1783
1784 if (lttng_live_should_quit()) {
1785 ret = 0;
1786 goto end_free;
1787 }
1788
1789 while (!ctx->session->stream_count) {
1790 if (lttng_live_should_quit()
1791 || ctx->session_ids->len == 0) {
1792 ret = 0;
1793 goto end_free;
1794 }
1795 ret = ask_new_streams(ctx);
1796 if (ret < 0) {
1797 ret = 0;
1798 goto end_free;
1799 }
1800 if (!ctx->session->stream_count) {
1801 (void) poll(NULL, 0, ACTIVE_POLL_DELAY);
1802 }
1803 }
1804
1805 ret = add_traces(ctx);
1806 if (ret < 0) {
1807 goto end_free;
1808 }
1809
1810 begin_pos.type = BT_SEEK_BEGIN;
1811 iter = bt_ctf_iter_create(ctx->bt_ctx, &begin_pos, NULL);
1812 if (!iter) {
1813 if (lttng_live_should_quit()) {
1814 ret = 0;
1815 goto end_free;
1816 }
1817 fprintf(stderr, "[error] Iterator creation error\n");
1818 goto end_free;
1819 }
1820 for (;;) {
1821 if (lttng_live_should_quit()) {
1822 ret = 0;
1823 goto end_free;
1824 }
1825 event = bt_ctf_iter_read_event_flags(iter, &flags);
1826 if (!(flags & BT_ITER_FLAG_RETRY)) {
1827 if (!event) {
1828 /* End of trace */
1829 break;
1830 }
1831 ret = sout->parent.event_cb(&sout->parent,
1832 event->parent->stream);
1833 if (ret) {
1834 fprintf(stderr, "[error] Writing "
1835 "event failed.\n");
1836 goto end_free;
1837 }
1838 }
1839 ret = bt_iter_next(bt_ctf_get_iter(iter));
1840 if (ret < 0) {
1841 goto end_free;
1842 }
1843 }
1844 bt_ctf_iter_destroy(iter);
1845 g_hash_table_foreach_remove(ctx->session->ctf_traces,
1846 del_traces, ctx->bt_ctx);
1847 ctx->session->stream_count = 0;
1848 }
1849
1850 end_free:
1851 g_hash_table_foreach_remove(ctx->session->ctf_traces,
1852 del_traces, ctx->bt_ctx);
1853 bt_context_put(ctx->bt_ctx);
1854 end:
1855 if (lttng_live_should_quit()) {
1856 ret = 0;
1857 }
1858 return ret;
1859 }
BabelTrace - Trace Format Babel Tower
This page took 0.123983 seconds and 3 git commands to generate.