projects / babeltrace.git / blob
? search:


a1c95bbc31238504e82186e522aae14d0244749c
[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 trace->streams = g_ptr_array_new();
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 stream->ctf_trace = trace;
402 g_ptr_array_add(trace->streams, stream);
403
404 return ret;
405 }
406
407 static
408 int open_metadata_fp_write(struct lttng_live_viewer_stream *stream,
409 char **metadata_buf, size_t *size)
410 {
411 int ret = 0;
412
413 stream->metadata_fp_write =
414 babeltrace_open_memstream(metadata_buf, size);
415 if (!stream->metadata_fp_write) {
416 perror("Metadata open_memstream");
417 ret = -1;
418 }
419
420 return ret;
421 }
422
423 int lttng_live_attach_session(struct lttng_live_ctx *ctx, uint64_t id)
424 {
425 struct lttng_viewer_cmd cmd;
426 struct lttng_viewer_attach_session_request rq;
427 struct lttng_viewer_attach_session_response rp;
428 struct lttng_viewer_stream stream;
429 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
430 char cmd_buf[cmd_buf_len];
431 int ret, i;
432 ssize_t ret_len;
433
434 if (lttng_live_should_quit()) {
435 ret = -1;
436 goto end;
437 }
438
439 cmd.cmd = htobe32(LTTNG_VIEWER_ATTACH_SESSION);
440 cmd.data_size = htobe64((uint64_t) sizeof(rq));
441 cmd.cmd_version = htobe32(0);
442
443 memset(&rq, 0, sizeof(rq));
444 rq.session_id = htobe64(id);
445 // TODO: add cmd line parameter to select seek beginning
446 // rq.seek = htobe32(LTTNG_VIEWER_SEEK_BEGINNING);
447 rq.seek = htobe32(LTTNG_VIEWER_SEEK_LAST);
448
449 /*
450 * Merge the cmd and connection request to prevent a write-write
451 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
452 * second write to be performed quickly in presence of Nagle's algorithm.
453 */
454 memcpy(cmd_buf, &cmd, sizeof(cmd));
455 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
456
457 ret_len = lttng_live_send(ctx->control_sock, cmd_buf, cmd_buf_len);
458 if (ret_len < 0) {
459 perror("[error] Error sending attach command and request");
460 goto error;
461 }
462 assert(ret_len == cmd_buf_len);
463
464 ret_len = lttng_live_recv(ctx->control_sock, &rp, sizeof(rp));
465 if (ret_len == 0) {
466 fprintf(stderr, "[error] Remote side has closed connection\n");
467 goto error;
468 }
469 if (ret_len < 0) {
470 perror("[error] Error receiving attach response");
471 goto error;
472 }
473 assert(ret_len == sizeof(rp));
474
475 switch(be32toh(rp.status)) {
476 case LTTNG_VIEWER_ATTACH_OK:
477 break;
478 case LTTNG_VIEWER_ATTACH_UNK:
479 ret = -LTTNG_VIEWER_ATTACH_UNK;
480 goto end;
481 case LTTNG_VIEWER_ATTACH_ALREADY:
482 fprintf(stderr, "[error] There is already a viewer attached to this session\n");
483 goto error;
484 case LTTNG_VIEWER_ATTACH_NOT_LIVE:
485 fprintf(stderr, "[error] Not a live session\n");
486 goto error;
487 case LTTNG_VIEWER_ATTACH_SEEK_ERR:
488 fprintf(stderr, "[error] Wrong seek parameter\n");
489 goto error;
490 default:
491 fprintf(stderr, "[error] Unknown attach return code %u\n",
492 be32toh(rp.status));
493 goto error;
494 }
495 if (be32toh(rp.status) != LTTNG_VIEWER_ATTACH_OK) {
496 goto error;
497 }
498
499 ctx->session->stream_count += be32toh(rp.streams_count);
500 /*
501 * When the session is created but not started, we do an active wait
502 * until it starts. It allows the viewer to start processing the trace
503 * as soon as the session starts.
504 */
505 if (ctx->session->stream_count == 0) {
506 ret = 0;
507 goto end;
508 }
509 printf_verbose("Waiting for %" PRIu64 " streams:\n",
510 ctx->session->stream_count);
511 ctx->session->streams = g_new0(struct lttng_live_viewer_stream,
512 ctx->session->stream_count);
513 for (i = 0; i < be32toh(rp.streams_count); i++) {
514 ret_len = lttng_live_recv(ctx->control_sock, &stream, sizeof(stream));
515 if (ret_len == 0) {
516 fprintf(stderr, "[error] Remote side has closed connection\n");
517 goto error;
518 }
519 if (ret_len < 0) {
520 perror("[error] Error receiving stream");
521 goto error;
522 }
523 assert(ret_len == sizeof(stream));
524 stream.path_name[LTTNG_VIEWER_PATH_MAX - 1] = '\0';
525 stream.channel_name[LTTNG_VIEWER_NAME_MAX - 1] = '\0';
526
527 printf_verbose(" stream %" PRIu64 " : %s/%s\n",
528 be64toh(stream.id), stream.path_name,
529 stream.channel_name);
530 ctx->session->streams[i].id = be64toh(stream.id);
531 ctx->session->streams[i].session = ctx->session;
532
533 ctx->session->streams[i].mmap_size = 0;
534 ctx->session->streams[i].ctf_stream_id = -1ULL;
535
536 if (be32toh(stream.metadata_flag)) {
537 ctx->session->streams[i].metadata_flag = 1;
538 }
539 ret = lttng_live_ctf_trace_assign(&ctx->session->streams[i],
540 be64toh(stream.ctf_trace_id));
541 if (ret < 0) {
542 goto error;
543 }
544
545 }
546 ret = 0;
547 end:
548 return ret;
549
550 error:
551 return -1;
552 }
553
554 /*
555 * Ask the relay for new streams.
556 *
557 * Returns the number of new streams received or a negative value on error.
558 */
559 static
560 int ask_new_streams(struct lttng_live_ctx *ctx)
561 {
562 int i, ret = 0, nb_streams = 0;
563 uint64_t id;
564
565 restart:
566 for (i = 0; i < ctx->session_ids->len; i++) {
567 id = g_array_index(ctx->session_ids, uint64_t, i);
568 ret = lttng_live_get_new_streams(ctx, id);
569 printf_verbose("Asking for new streams returns %d\n", ret);
570 if (ret < 0) {
571 if (lttng_live_should_quit()) {
572 goto end;
573 }
574 if (ret == -LTTNG_VIEWER_NEW_STREAMS_HUP) {
575 printf_verbose("Session %" PRIu64 " closed\n",
576 id);
577 /*
578 * The streams have already been closed during
579 * the reading, so we only need to get rid of
580 * the trace in our internal table of sessions.
581 */
582 g_array_remove_index(ctx->session_ids, i);
583 /*
584 * We can't continue iterating on the g_array
585 * after a remove, we have to start again.
586 */
587 goto restart;
588 } else {
589 ret = -1;
590 goto end;
591 }
592 } else {
593 nb_streams += ret;
594 }
595 }
596 ret = nb_streams;
597
598 end:
599 return ret;
600 }
601
602 static
603 int append_metadata(struct lttng_live_ctx *ctx,
604 struct lttng_live_viewer_stream *viewer_stream)
605 {
606 int ret;
607 struct lttng_live_viewer_stream *metadata;
608 char *metadata_buf = NULL;
609
610 printf_verbose("get_next_index: new metadata needed\n");
611 ret = get_new_metadata(ctx, viewer_stream, &metadata_buf);
612 if (ret < 0) {
613 free(metadata_buf);
614 goto error;
615 }
616
617 metadata = viewer_stream->ctf_trace->metadata_stream;
618 metadata->ctf_trace->metadata_fp =
619 babeltrace_fmemopen(metadata_buf,
620 metadata->metadata_len, "rb");
621 if (!metadata->ctf_trace->metadata_fp) {
622 perror("Metadata fmemopen");
623 free(metadata_buf);
624 ret = -1;
625 goto error;
626 }
627 ret = ctf_append_trace_metadata(
628 viewer_stream->ctf_trace->handle->td,
629 metadata->ctf_trace->metadata_fp);
630 /* We accept empty metadata packets */
631 if (ret != 0 && ret != -ENOENT) {
632 fprintf(stderr, "[error] Appending metadata\n");
633 goto error;
634 }
635 ret = 0;
636
637 error:
638 return ret;
639 }
640
641 static
642 int get_data_packet(struct lttng_live_ctx *ctx,
643 struct ctf_stream_pos *pos,
644 struct lttng_live_viewer_stream *stream, uint64_t offset,
645 uint64_t len)
646 {
647 struct lttng_viewer_cmd cmd;
648 struct lttng_viewer_get_packet rq;
649 struct lttng_viewer_trace_packet rp;
650 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
651 char cmd_buf[cmd_buf_len];
652 ssize_t ret_len;
653 int ret;
654
655 retry:
656 if (lttng_live_should_quit()) {
657 ret = -1;
658 goto end;
659 }
660
661 cmd.cmd = htobe32(LTTNG_VIEWER_GET_PACKET);
662 cmd.data_size = htobe64((uint64_t) sizeof(rq));
663 cmd.cmd_version = htobe32(0);
664
665 memset(&rq, 0, sizeof(rq));
666 rq.stream_id = htobe64(stream->id);
667 rq.offset = htobe64(offset);
668 rq.len = htobe32(len);
669
670 /*
671 * Merge the cmd and connection request to prevent a write-write
672 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
673 * second write to be performed quickly in presence of Nagle's algorithm.
674 */
675 memcpy(cmd_buf, &cmd, sizeof(cmd));
676 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
677
678 ret_len = lttng_live_send(ctx->control_sock, cmd_buf, cmd_buf_len);
679 if (ret_len < 0) {
680 perror("[error] Error sending get_data_packet cmd and request");
681 goto error;
682 }
683 assert(ret_len == cmd_buf_len);
684
685 ret_len = lttng_live_recv(ctx->control_sock, &rp, sizeof(rp));
686 if (ret_len == 0) {
687 fprintf(stderr, "[error] Remote side has closed connection\n");
688 goto error;
689 }
690 if (ret_len < 0) {
691 perror("[error] Error receiving data response");
692 goto error;
693 }
694 if (ret_len != sizeof(rp)) {
695 fprintf(stderr, "[error] get_data_packet: expected %zu"
696 ", received %zd\n", sizeof(rp),
697 ret_len);
698 goto error;
699 }
700
701 rp.flags = be32toh(rp.flags);
702
703 switch (be32toh(rp.status)) {
704 case LTTNG_VIEWER_GET_PACKET_OK:
705 len = be32toh(rp.len);
706 printf_verbose("get_data_packet: Ok, packet size : %" PRIu64
707 "\n", len);
708 break;
709 case LTTNG_VIEWER_GET_PACKET_RETRY:
710 /* Unimplemented by relay daemon */
711 printf_verbose("get_data_packet: retry\n");
712 goto error;
713 case LTTNG_VIEWER_GET_PACKET_ERR:
714 if (rp.flags & LTTNG_VIEWER_FLAG_NEW_METADATA) {
715 printf_verbose("get_data_packet: new metadata needed\n");
716 ret = append_metadata(ctx, stream);
717 if (ret)
718 goto error;
719 }
720 if (rp.flags & LTTNG_VIEWER_FLAG_NEW_STREAM) {
721 printf_verbose("get_data_packet: new streams needed\n");
722 ret = ask_new_streams(ctx);
723 if (ret < 0) {
724 goto error;
725 } else if (ret > 0) {
726 ret = add_traces(ctx);
727 if (ret < 0) {
728 goto error;
729 }
730 }
731 }
732 if (rp.flags & (LTTNG_VIEWER_FLAG_NEW_METADATA
733 | LTTNG_VIEWER_FLAG_NEW_STREAM)) {
734 goto retry;
735 }
736 fprintf(stderr, "[error] get_data_packet: error\n");
737 goto error;
738 case LTTNG_VIEWER_GET_PACKET_EOF:
739 ret = -2;
740 goto end;
741 default:
742 printf_verbose("get_data_packet: unknown\n");
743 goto error;
744 }
745
746 if (len == 0) {
747 goto error;
748 }
749
750 if (len > stream->mmap_size) {
751 uint64_t new_size;
752
753 new_size = max_t(uint64_t, len, stream->mmap_size << 1);
754 if (pos->base_mma) {
755 /* unmap old base */
756 ret = munmap_align(pos->base_mma);
757 if (ret) {
758 perror("[error] Unable to unmap old base");
759 goto error;
760 }
761 pos->base_mma = NULL;
762 }
763 pos->base_mma = mmap_align(new_size,
764 PROT_READ | PROT_WRITE,
765 MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);
766 if (pos->base_mma == MAP_FAILED) {
767 perror("[error] mmap error");
768 pos->base_mma = NULL;
769 goto error;
770 }
771
772 stream->mmap_size = new_size;
773 printf_verbose("Expanding stream mmap size to %" PRIu64 " bytes\n",
774 stream->mmap_size);
775 }
776
777 ret_len = lttng_live_recv(ctx->control_sock,
778 mmap_align_addr(pos->base_mma), len);
779 if (ret_len == 0) {
780 fprintf(stderr, "[error] Remote side has closed connection\n");
781 goto error;
782 }
783 if (ret_len < 0) {
784 perror("[error] Error receiving trace packet");
785 goto error;
786 }
787 assert(ret_len == len);
788 ret = 0;
789 end:
790 return ret;
791
792 error:
793 return -1;
794 }
795
796 static
797 int get_one_metadata_packet(struct lttng_live_ctx *ctx,
798 struct lttng_live_viewer_stream *metadata_stream)
799 {
800 uint64_t len = 0;
801 int ret;
802 struct lttng_viewer_cmd cmd;
803 struct lttng_viewer_get_metadata rq;
804 struct lttng_viewer_metadata_packet rp;
805 char *data = NULL;
806 ssize_t ret_len;
807 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
808 char cmd_buf[cmd_buf_len];
809
810 if (lttng_live_should_quit()) {
811 ret = -1;
812 goto end;
813 }
814
815 rq.stream_id = htobe64(metadata_stream->id);
816 cmd.cmd = htobe32(LTTNG_VIEWER_GET_METADATA);
817 cmd.data_size = htobe64((uint64_t) sizeof(rq));
818 cmd.cmd_version = htobe32(0);
819
820 /*
821 * Merge the cmd and connection request to prevent a write-write
822 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
823 * second write to be performed quickly in presence of Nagle's algorithm.
824 */
825 memcpy(cmd_buf, &cmd, sizeof(cmd));
826 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
827
828 ret_len = lttng_live_send(ctx->control_sock, cmd_buf, cmd_buf_len);
829 if (ret_len < 0) {
830 perror("[error] Error sending get_metadata cmd and request");
831 goto error;
832 }
833 assert(ret_len == cmd_buf_len);
834
835 ret_len = lttng_live_recv(ctx->control_sock, &rp, sizeof(rp));
836 if (ret_len == 0) {
837 fprintf(stderr, "[error] Remote side has closed connection\n");
838 goto error;
839 }
840 if (ret_len < 0) {
841 perror("[error] Error receiving metadata response");
842 goto error;
843 }
844 assert(ret_len == sizeof(rp));
845
846 switch (be32toh(rp.status)) {
847 case LTTNG_VIEWER_METADATA_OK:
848 printf_verbose("get_metadata : OK\n");
849 break;
850 case LTTNG_VIEWER_NO_NEW_METADATA:
851 printf_verbose("get_metadata : NO NEW\n");
852 ret = 0;
853 goto end;
854 case LTTNG_VIEWER_METADATA_ERR:
855 printf_verbose("get_metadata : ERR\n");
856 goto error;
857 default:
858 printf_verbose("get_metadata : UNKNOWN\n");
859 goto error;
860 }
861
862 len = be64toh(rp.len);
863 printf_verbose("Writing %" PRIu64" bytes to metadata\n", len);
864 if (len <= 0) {
865 goto error;
866 }
867
868 data = zmalloc(len);
869 if (!data) {
870 perror("relay data zmalloc");
871 goto error;
872 }
873 ret_len = lttng_live_recv(ctx->control_sock, data, len);
874 if (ret_len == 0) {
875 fprintf(stderr, "[error] Remote side has closed connection\n");
876 goto error_free_data;
877 }
878 if (ret_len < 0) {
879 perror("[error] Error receiving trace packet");
880 goto error_free_data;
881 }
882 assert(ret_len == len);
883
884 do {
885 ret_len = fwrite(data, 1, len,
886 metadata_stream->metadata_fp_write);
887 } while (ret_len < 0 && errno == EINTR);
888 if (ret_len < 0) {
889 fprintf(stderr, "[error] Writing in the metadata fp\n");
890 goto error_free_data;
891 }
892 assert(ret_len == len);
893 metadata_stream->metadata_len += len;
894 free(data);
895 ret = len;
896 end:
897 return ret;
898
899 error_free_data:
900 free(data);
901 error:
902 return -1;
903 }
904
905 /*
906 * Return 0 on success, a negative value on error.
907 */
908 static
909 int get_new_metadata(struct lttng_live_ctx *ctx,
910 struct lttng_live_viewer_stream *viewer_stream,
911 char **metadata_buf)
912 {
913 int ret = 0;
914 struct lttng_live_viewer_stream *metadata_stream;
915 size_t size, len_read = 0;
916
917 metadata_stream = viewer_stream->ctf_trace->metadata_stream;
918 if (!metadata_stream) {
919 fprintf(stderr, "[error] No metadata stream\n");
920 ret = -1;
921 goto error;
922 }
923 metadata_stream->metadata_len = 0;
924 ret = open_metadata_fp_write(metadata_stream, metadata_buf, &size);
925 if (ret < 0) {
926 goto error;
927 }
928
929 do {
930 if (lttng_live_should_quit()) {
931 ret = -1;
932 goto error;
933 }
934 /*
935 * get_one_metadata_packet returns the number of bytes
936 * received, 0 when we have received everything, a
937 * negative value on error.
938 */
939 ret = get_one_metadata_packet(ctx, metadata_stream);
940 if (ret > 0) {
941 len_read += ret;
942 }
943 if (!len_read) {
944 (void) poll(NULL, 0, ACTIVE_POLL_DELAY);
945 }
946 } while (ret > 0 || !len_read);
947
948 if (babeltrace_close_memstream(metadata_buf, &size,
949 metadata_stream->metadata_fp_write)) {
950 perror("babeltrace_close_memstream");
951 }
952 metadata_stream->metadata_fp_write = NULL;
953
954 error:
955 return ret;
956 }
957
958 /*
959 * Assign the fields from a lttng_viewer_index to a packet_index.
960 */
961 static
962 void lttng_index_to_packet_index(struct lttng_viewer_index *lindex,
963 struct packet_index *pindex)
964 {
965 assert(lindex);
966 assert(pindex);
967
968 pindex->offset = be64toh(lindex->offset);
969 pindex->packet_size = be64toh(lindex->packet_size);
970 pindex->content_size = be64toh(lindex->content_size);
971 pindex->ts_cycles.timestamp_begin = be64toh(lindex->timestamp_begin);
972 pindex->ts_cycles.timestamp_end = be64toh(lindex->timestamp_end);
973 pindex->events_discarded = be64toh(lindex->events_discarded);
974 }
975
976 /*
977 * Get one index for a stream.
978 *
979 * Returns 0 on success or a negative value on error.
980 */
981 static
982 int get_next_index(struct lttng_live_ctx *ctx,
983 struct lttng_live_viewer_stream *viewer_stream,
984 struct packet_index *index, uint64_t *stream_id)
985 {
986 struct lttng_viewer_cmd cmd;
987 struct lttng_viewer_get_next_index rq;
988 int ret;
989 ssize_t ret_len;
990 struct lttng_viewer_index *rp = &viewer_stream->current_index;
991 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
992 char cmd_buf[cmd_buf_len];
993
994 cmd.cmd = htobe32(LTTNG_VIEWER_GET_NEXT_INDEX);
995 cmd.data_size = htobe64((uint64_t) sizeof(rq));
996 cmd.cmd_version = htobe32(0);
997
998 memset(&rq, 0, sizeof(rq));
999 rq.stream_id = htobe64(viewer_stream->id);
1000
1001 /*
1002 * Merge the cmd and connection request to prevent a write-write
1003 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
1004 * second write to be performed quickly in presence of Nagle's algorithm.
1005 */
1006 memcpy(cmd_buf, &cmd, sizeof(cmd));
1007 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
1008 retry:
1009 if (lttng_live_should_quit()) {
1010 ret = -1;
1011 goto end;
1012 }
1013 ret_len = lttng_live_send(ctx->control_sock, &cmd_buf, cmd_buf_len);
1014 if (ret_len < 0) {
1015 perror("[error] Error sending get_next_index cmd and request");
1016 goto error;
1017 }
1018 assert(ret_len == cmd_buf_len);
1019
1020 ret_len = lttng_live_recv(ctx->control_sock, rp, sizeof(*rp));
1021 if (ret_len == 0) {
1022 fprintf(stderr, "[error] Remote side has closed connection\n");
1023 goto error;
1024 }
1025 if (ret_len < 0) {
1026 perror("[error] Error receiving index response");
1027 goto error;
1028 }
1029 assert(ret_len == sizeof(*rp));
1030
1031 rp->flags = be32toh(rp->flags);
1032
1033 switch (be32toh(rp->status)) {
1034 case LTTNG_VIEWER_INDEX_INACTIVE:
1035 printf_verbose("get_next_index: inactive\n");
1036
1037 if (index->ts_cycles.timestamp_end ==
1038 be64toh(rp->timestamp_end)) {
1039 /* Already seen this timestamp. */
1040 (void) poll(NULL, 0, ACTIVE_POLL_DELAY);
1041 }
1042
1043 memset(index, 0, sizeof(struct packet_index));
1044 index->ts_cycles.timestamp_end = be64toh(rp->timestamp_end);
1045 *stream_id = be64toh(rp->stream_id);
1046 break;
1047 case LTTNG_VIEWER_INDEX_OK:
1048 printf_verbose("get_next_index: Ok, need metadata update : %u\n",
1049 rp->flags & LTTNG_VIEWER_FLAG_NEW_METADATA);
1050 lttng_index_to_packet_index(rp, index);
1051 *stream_id = be64toh(rp->stream_id);
1052 viewer_stream->data_pending = 1;
1053
1054 if (rp->flags & LTTNG_VIEWER_FLAG_NEW_METADATA) {
1055 ret = append_metadata(ctx, viewer_stream);
1056 if (ret)
1057 goto error;
1058 }
1059 if (rp->flags & LTTNG_VIEWER_FLAG_NEW_STREAM) {
1060 printf_verbose("get_next_index: need new streams\n");
1061 ret = ask_new_streams(ctx);
1062 if (ret < 0) {
1063 goto error;
1064 } else if (ret > 0) {
1065 ret = add_traces(ctx);
1066 if (ret < 0) {
1067 goto error;
1068 }
1069 }
1070 }
1071 break;
1072 case LTTNG_VIEWER_INDEX_RETRY:
1073 printf_verbose("get_next_index: retry\n");
1074 (void) poll(NULL, 0, ACTIVE_POLL_DELAY);
1075 goto retry;
1076 case LTTNG_VIEWER_INDEX_HUP:
1077 printf_verbose("get_next_index: stream hung up\n");
1078 viewer_stream->id = -1ULL;
1079 index->offset = EOF;
1080 ctx->session->stream_count--;
1081 break;
1082 case LTTNG_VIEWER_INDEX_ERR:
1083 fprintf(stderr, "[error] get_next_index: error\n");
1084 goto error;
1085 default:
1086 fprintf(stderr, "[error] get_next_index: unkwown value\n");
1087 goto error;
1088 }
1089 ret = 0;
1090 end:
1091 return ret;
1092
1093 error:
1094 return -1;
1095 }
1096
1097 static
1098 void read_packet_header(struct ctf_stream_pos *pos,
1099 struct ctf_file_stream *file_stream)
1100 {
1101 int ret;
1102
1103 /* update trace_packet_header and stream_packet_context */
1104 if (!(pos->prot & PROT_WRITE) &&
1105 file_stream->parent.trace_packet_header) {
1106 /* Read packet header */
1107 ret = generic_rw(&pos->parent,
1108 &file_stream->parent.trace_packet_header->p);
1109 if (ret) {
1110 pos->offset = EOF;
1111 fprintf(stderr, "[error] trace packet "
1112 "header read failed\n");
1113 goto end;
1114 }
1115 }
1116 if (!(pos->prot & PROT_WRITE) &&
1117 file_stream->parent.stream_packet_context) {
1118 /* Read packet context */
1119 ret = generic_rw(&pos->parent,
1120 &file_stream->parent.stream_packet_context->p);
1121 if (ret) {
1122 pos->offset = EOF;
1123 fprintf(stderr, "[error] stream packet "
1124 "context read failed\n");
1125 goto end;
1126 }
1127 }
1128 pos->data_offset = pos->offset;
1129
1130 end:
1131 return;
1132 }
1133
1134 /*
1135 * Handle the seek parameters.
1136 * Returns 0 if the packet_seek can continue, a positive value to
1137 * cleanly exit the packet_seek, a negative value on error.
1138 */
1139 static
1140 int handle_seek_position(size_t index, int whence,
1141 struct lttng_live_viewer_stream *viewer_stream,
1142 struct ctf_stream_pos *pos,
1143 struct ctf_file_stream *file_stream)
1144 {
1145 int ret = 0;
1146
1147 switch (whence) {
1148 case SEEK_CUR:
1149 ret = 0;
1150 goto end;
1151 case SEEK_SET:
1152 /*
1153 * We only allow to seek to 0.
1154 */
1155 if (index != 0) {
1156 fprintf(stderr, "[error] Arbitrary seek in lttng-live "
1157 "trace not supported\n");
1158 pos->offset = EOF;
1159 ret = -1;
1160 goto end;
1161 }
1162
1163 ret = 0;
1164 goto end;
1165
1166 default:
1167 fprintf(stderr, "[error] Invalid seek parameter\n");
1168 assert(0);
1169 }
1170
1171 end:
1172 return ret;
1173 }
1174
1175 static
1176 void ctf_live_packet_seek(struct bt_stream_pos *stream_pos, size_t index,
1177 int whence)
1178 {
1179 struct ctf_stream_pos *pos;
1180 struct ctf_file_stream *file_stream;
1181 struct packet_index *prev_index = NULL, *cur_index;
1182 struct lttng_live_viewer_stream *viewer_stream;
1183 struct lttng_live_session *session;
1184 uint64_t stream_id = -1ULL;
1185 int ret;
1186
1187 pos = ctf_pos(stream_pos);
1188 file_stream = container_of(pos, struct ctf_file_stream, pos);
1189 viewer_stream = (struct lttng_live_viewer_stream *) pos->priv;
1190 session = viewer_stream->session;
1191
1192 ret = handle_seek_position(index, whence, viewer_stream, pos,
1193 file_stream);
1194 if (ret != 0) {
1195 return;
1196 }
1197
1198 retry:
1199 switch (pos->packet_index->len) {
1200 case 0:
1201 g_array_set_size(pos->packet_index, 1);
1202 cur_index = &g_array_index(pos->packet_index,
1203 struct packet_index, 0);
1204 break;
1205 case 1:
1206 g_array_set_size(pos->packet_index, 2);
1207 prev_index = &g_array_index(pos->packet_index,
1208 struct packet_index, 0);
1209 cur_index = &g_array_index(pos->packet_index,
1210 struct packet_index, 1);
1211 break;
1212 case 2:
1213 g_array_index(pos->packet_index,
1214 struct packet_index, 0) =
1215 g_array_index(pos->packet_index,
1216 struct packet_index, 1);
1217 prev_index = &g_array_index(pos->packet_index,
1218 struct packet_index, 0);
1219 cur_index = &g_array_index(pos->packet_index,
1220 struct packet_index, 1);
1221 break;
1222 default:
1223 abort();
1224 break;
1225 }
1226
1227 if (viewer_stream->data_pending) {
1228 lttng_index_to_packet_index(&viewer_stream->current_index, cur_index);
1229 } else {
1230 printf_verbose("get_next_index for stream %" PRIu64 "\n", viewer_stream->id);
1231 ret = get_next_index(session->ctx, viewer_stream, cur_index, &stream_id);
1232 if (ret < 0) {
1233 pos->offset = EOF;
1234 if (!lttng_live_should_quit()) {
1235 fprintf(stderr, "[error] get_next_index failed\n");
1236 }
1237 return;
1238 }
1239 printf_verbose("Index received : packet_size : %" PRIu64
1240 ", offset %" PRIu64 ", content_size %" PRIu64
1241 ", timestamp_end : %" PRIu64 "\n",
1242 cur_index->packet_size, cur_index->offset,
1243 cur_index->content_size,
1244 cur_index->ts_cycles.timestamp_end);
1245
1246 }
1247
1248 /*
1249 * On the first time we receive an index, the stream_id needs to
1250 * be set for the stream in order to use it, we don't want any
1251 * data at this stage.
1252 */
1253 if (file_stream->parent.stream_id == -1ULL) {
1254 /*
1255 * Warning: with lttng-tools < 2.4.2, the beacon does not
1256 * contain the real stream ID, it is memset to 0, so this
1257 * might create a problem when a session has multiple
1258 * channels. We can't detect it at this stage, lttng-tools
1259 * has to be upgraded to fix this problem.
1260 */
1261 printf_verbose("Assigning stream_id %" PRIu64 "\n",
1262 stream_id);
1263 file_stream->parent.stream_id = stream_id;
1264 viewer_stream->ctf_stream_id = stream_id;
1265
1266 return;
1267 }
1268
1269 pos->packet_size = cur_index->packet_size;
1270 pos->content_size = cur_index->content_size;
1271 pos->mmap_base_offset = 0;
1272 if (cur_index->offset == EOF) {
1273 pos->offset = EOF;
1274 } else {
1275 pos->offset = 0;
1276 }
1277
1278 if (cur_index->content_size == 0) {
1279 if (file_stream->parent.stream_class) {
1280 file_stream->parent.cycles_timestamp =
1281 cur_index->ts_cycles.timestamp_end;
1282 file_stream->parent.real_timestamp = ctf_get_real_timestamp(
1283 &file_stream->parent,
1284 cur_index->ts_cycles.timestamp_end);
1285 }
1286 } else {
1287 if (file_stream->parent.stream_class) {
1288 /* Convert the timestamps and append to the real_index. */
1289 cur_index->ts_real.timestamp_begin = ctf_get_real_timestamp(
1290 &file_stream->parent,
1291 cur_index->ts_cycles.timestamp_begin);
1292 cur_index->ts_real.timestamp_end = ctf_get_real_timestamp(
1293 &file_stream->parent,
1294 cur_index->ts_cycles.timestamp_end);
1295 }
1296
1297 ctf_update_current_packet_index(&file_stream->parent,
1298 prev_index, cur_index);
1299
1300 file_stream->parent.cycles_timestamp =
1301 cur_index->ts_cycles.timestamp_begin;
1302 file_stream->parent.real_timestamp =
1303 cur_index->ts_real.timestamp_begin;
1304 }
1305
1306 /*
1307 * Flush the output between attempts to grab a packet, thus
1308 * ensuring we flush at least at the periodical timer period.
1309 * This ensures the output remains reactive for interactive users and
1310 * that the output is flushed when redirected to a file by the shell.
1311 */
1312 if (fflush(LTTNG_LIVE_OUTPUT_FP) < 0) {
1313 perror("fflush");
1314 goto end;
1315 }
1316
1317 if (pos->packet_size == 0 || pos->offset == EOF) {
1318 goto end;
1319 }
1320
1321 printf_verbose("get_data_packet for stream %" PRIu64 "\n",
1322 viewer_stream->id);
1323 ret = get_data_packet(session->ctx, pos, viewer_stream,
1324 cur_index->offset,
1325 cur_index->packet_size / CHAR_BIT);
1326 if (ret == -2) {
1327 goto retry;
1328 } else if (ret < 0) {
1329 pos->offset = EOF;
1330 if (!lttng_live_should_quit()) {
1331 fprintf(stderr, "[error] get_data_packet failed\n");
1332 }
1333 return;
1334 }
1335 viewer_stream->data_pending = 0;
1336
1337 read_packet_header(pos, file_stream);
1338
1339 end:
1340 return;
1341 }
1342
1343 int lttng_live_create_viewer_session(struct lttng_live_ctx *ctx)
1344 {
1345 struct lttng_viewer_cmd cmd;
1346 struct lttng_viewer_create_session_response resp;
1347 int ret;
1348 ssize_t ret_len;
1349
1350 if (lttng_live_should_quit()) {
1351 ret = -1;
1352 goto end;
1353 }
1354
1355 cmd.cmd = htobe32(LTTNG_VIEWER_CREATE_SESSION);
1356 cmd.data_size = htobe64((uint64_t) 0);
1357 cmd.cmd_version = htobe32(0);
1358
1359 ret_len = lttng_live_send(ctx->control_sock, &cmd, sizeof(cmd));
1360 if (ret_len < 0) {
1361 perror("[error] Error sending cmd");
1362 goto error;
1363 }
1364 assert(ret_len == sizeof(cmd));
1365
1366 ret_len = lttng_live_recv(ctx->control_sock, &resp, sizeof(resp));
1367 if (ret_len == 0) {
1368 fprintf(stderr, "[error] Remote side has closed connection\n");
1369 goto error;
1370 }
1371 if (ret_len < 0) {
1372 perror("[error] Error receiving create session reply");
1373 goto error;
1374 }
1375 assert(ret_len == sizeof(resp));
1376
1377 if (be32toh(resp.status) != LTTNG_VIEWER_CREATE_SESSION_OK) {
1378 fprintf(stderr, "[error] Error creating viewer session\n");
1379 goto error;
1380 }
1381 ret = 0;
1382 end:
1383 return ret;
1384
1385 error:
1386 return -1;
1387 }
1388
1389 static
1390 int del_traces(gpointer key, gpointer value, gpointer user_data)
1391 {
1392 struct bt_context *bt_ctx = user_data;
1393 struct lttng_live_ctf_trace *trace = value;
1394 int ret;
1395
1396 ret = bt_context_remove_trace(bt_ctx, trace->trace_id);
1397 if (ret < 0)
1398 fprintf(stderr, "[error] removing trace from context\n");
1399
1400 /* remove the key/value pair from the HT. */
1401 return 1;
1402 }
1403
1404 static
1405 int add_one_trace(struct lttng_live_ctx *ctx,
1406 struct lttng_live_ctf_trace *trace)
1407 {
1408 int i, ret;
1409 struct bt_context *bt_ctx = ctx->bt_ctx;
1410 struct lttng_live_viewer_stream *stream;
1411 struct bt_mmap_stream *new_mmap_stream;
1412 struct bt_mmap_stream_list mmap_list;
1413 struct bt_trace_descriptor *td;
1414 struct bt_trace_handle *handle;
1415
1416 /*
1417 * We don't know how many streams we will receive for a trace, so
1418 * once we are done receiving the traces, we add all the traces
1419 * received to the bt_context.
1420 * We can receive streams during the attach command or the
1421 * get_new_streams, so we have to make sure not to add multiple
1422 * times the same traces.
1423 * If a trace is already in the context, we just skip this function.
1424 */
1425 if (trace->in_use) {
1426 ret = 0;
1427 goto end;
1428 }
1429
1430 BT_INIT_LIST_HEAD(&mmap_list.head);
1431
1432 for (i = 0; i < trace->streams->len; i++) {
1433 stream = g_ptr_array_index(trace->streams, i);
1434
1435 if (!stream->metadata_flag) {
1436 new_mmap_stream = zmalloc(sizeof(struct bt_mmap_stream));
1437 new_mmap_stream->priv = (void *) stream;
1438 new_mmap_stream->fd = -1;
1439 bt_list_add(&new_mmap_stream->list, &mmap_list.head);
1440 } else {
1441 char *metadata_buf = NULL;
1442
1443 /* Get all possible metadata before starting */
1444 ret = get_new_metadata(ctx, stream, &metadata_buf);
1445 if (ret) {
1446 free(metadata_buf);
1447 goto end_free;
1448 }
1449 if (!stream->metadata_len) {
1450 fprintf(stderr, "[error] empty metadata\n");
1451 ret = -1;
1452 free(metadata_buf);
1453 goto end_free;
1454 }
1455
1456 trace->metadata_fp = babeltrace_fmemopen(metadata_buf,
1457 stream->metadata_len, "rb");
1458 if (!trace->metadata_fp) {
1459 perror("Metadata fmemopen");
1460 ret = -1;
1461 free(metadata_buf);
1462 goto end_free;
1463 }
1464 }
1465 }
1466
1467 if (!trace->metadata_fp) {
1468 fprintf(stderr, "[error] No metadata stream opened\n");
1469 ret = -1;
1470 goto end_free;
1471 }
1472
1473 ret = bt_context_add_trace(bt_ctx, NULL, "ctf",
1474 ctf_live_packet_seek, &mmap_list, trace->metadata_fp);
1475 if (ret < 0) {
1476 fprintf(stderr, "[error] Error adding trace\n");
1477 ret = -1;
1478 goto end_free;
1479 }
1480 trace->metadata_stream->metadata_len = 0;
1481
1482 handle = (struct bt_trace_handle *) g_hash_table_lookup(
1483 bt_ctx->trace_handles,
1484 (gpointer) (unsigned long) ret);
1485 td = handle->td;
1486 trace->handle = handle;
1487 if (bt_ctx->current_iterator) {
1488 bt_iter_add_trace(bt_ctx->current_iterator, td);
1489 }
1490
1491 trace->trace_id = ret;
1492 trace->in_use = 1;
1493
1494 goto end;
1495
1496 end_free:
1497 bt_context_put(bt_ctx);
1498 end:
1499 return ret;
1500 }
1501
1502 static
1503 int add_traces(struct lttng_live_ctx *ctx)
1504 {
1505 int ret;
1506 struct lttng_live_ctf_trace *trace;
1507 GHashTableIter it;
1508 gpointer key;
1509 gpointer value;
1510
1511 g_hash_table_iter_init(&it, ctx->session->ctf_traces);
1512 while (g_hash_table_iter_next(&it, &key, &value)) {
1513 trace = (struct lttng_live_ctf_trace *) value;
1514 ret = add_one_trace(ctx, trace);
1515 if (ret < 0) {
1516 goto end;
1517 }
1518 }
1519
1520 ret = 0;
1521
1522 end:
1523 return ret;
1524 }
1525
1526 /*
1527 * Request new streams for a session.
1528 * Returns the number of streams received or a negative value on error.
1529 */
1530 int lttng_live_get_new_streams(struct lttng_live_ctx *ctx, uint64_t id)
1531 {
1532 struct lttng_viewer_cmd cmd;
1533 struct lttng_viewer_new_streams_request rq;
1534 struct lttng_viewer_new_streams_response rp;
1535 struct lttng_viewer_stream stream;
1536 int ret, i, nb_streams = 0;
1537 ssize_t ret_len;
1538 uint32_t stream_count;
1539 const size_t cmd_buf_len = sizeof(cmd) + sizeof(rq);
1540 char cmd_buf[cmd_buf_len];
1541
1542 if (lttng_live_should_quit()) {
1543 ret = -1;
1544 goto end;
1545 }
1546
1547 cmd.cmd = htobe32(LTTNG_VIEWER_GET_NEW_STREAMS);
1548 cmd.data_size = htobe64((uint64_t) sizeof(rq));
1549 cmd.cmd_version = htobe32(0);
1550
1551 memset(&rq, 0, sizeof(rq));
1552 rq.session_id = htobe64(id);
1553
1554 /*
1555 * Merge the cmd and connection request to prevent a write-write
1556 * sequence on the TCP socket. Otherwise, a delayed ACK will prevent the
1557 * second write to be performed quickly in presence of Nagle's algorithm.
1558 */
1559 memcpy(cmd_buf, &cmd, sizeof(cmd));
1560 memcpy(cmd_buf + sizeof(cmd), &rq, sizeof(rq));
1561
1562 ret_len = lttng_live_send(ctx->control_sock, cmd_buf, cmd_buf_len);
1563 if (ret_len < 0) {
1564 perror("[error] Error sending get_new_streams cmd and request");
1565 goto error;
1566 }
1567 assert(ret_len == cmd_buf_len);
1568
1569 ret_len = lttng_live_recv(ctx->control_sock, &rp, sizeof(rp));
1570 if (ret_len == 0) {
1571 fprintf(stderr, "[error] Remote side has closed connection\n");
1572 goto error;
1573 }
1574 if (ret_len < 0) {
1575 perror("[error] Error receiving get_new_streams response");
1576 goto error;
1577 }
1578 assert(ret_len == sizeof(rp));
1579
1580 switch(be32toh(rp.status)) {
1581 case LTTNG_VIEWER_NEW_STREAMS_OK:
1582 break;
1583 case LTTNG_VIEWER_NEW_STREAMS_NO_NEW:
1584 ret = 0;
1585 goto end;
1586 case LTTNG_VIEWER_NEW_STREAMS_HUP:
1587 ret = -LTTNG_VIEWER_NEW_STREAMS_HUP;
1588 goto end;
1589 case LTTNG_VIEWER_NEW_STREAMS_ERR:
1590 fprintf(stderr, "[error] get_new_streams error\n");
1591 goto error;
1592 default:
1593 fprintf(stderr, "[error] Unknown return code %u\n",
1594 be32toh(rp.status));
1595 goto error;
1596 }
1597
1598 stream_count = be32toh(rp.streams_count);
1599 ctx->session->stream_count += stream_count;
1600 /*
1601 * When the session is created but not started, we do an active wait
1602 * until it starts. It allows the viewer to start processing the trace
1603 * as soon as the session starts.
1604 */
1605 if (ctx->session->stream_count == 0) {
1606 ret = 0;
1607 goto end;
1608 }
1609 printf_verbose("Waiting for %" PRIu64 " streams:\n",
1610 ctx->session->stream_count);
1611 ctx->session->streams = g_new0(struct lttng_live_viewer_stream,
1612 ctx->session->stream_count);
1613 for (i = 0; i < stream_count; i++) {
1614 ret_len = lttng_live_recv(ctx->control_sock, &stream, sizeof(stream));
1615 if (ret_len == 0) {
1616 fprintf(stderr, "[error] Remote side has closed connection\n");
1617 goto error;
1618 }
1619 if (ret_len < 0) {
1620 perror("[error] Error receiving stream");
1621 goto error;
1622 }
1623 assert(ret_len == sizeof(stream));
1624 stream.path_name[LTTNG_VIEWER_PATH_MAX - 1] = '\0';
1625 stream.channel_name[LTTNG_VIEWER_NAME_MAX - 1] = '\0';
1626
1627 printf_verbose(" stream %" PRIu64 " : %s/%s\n",
1628 be64toh(stream.id), stream.path_name,
1629 stream.channel_name);
1630 ctx->session->streams[i].id = be64toh(stream.id);
1631 ctx->session->streams[i].session = ctx->session;
1632
1633 ctx->session->streams[i].mmap_size = 0;
1634 ctx->session->streams[i].ctf_stream_id = -1ULL;
1635
1636 if (be32toh(stream.metadata_flag)) {
1637 ctx->session->streams[i].metadata_flag = 1;
1638 }
1639 ret = lttng_live_ctf_trace_assign(&ctx->session->streams[i],
1640 be64toh(stream.ctf_trace_id));
1641 if (ret < 0) {
1642 goto error;
1643 }
1644 nb_streams++;
1645
1646 }
1647 ret = nb_streams;
1648 end:
1649 return ret;
1650
1651 error:
1652 return -1;
1653 }
1654
1655 int lttng_live_read(struct lttng_live_ctx *ctx)
1656 {
1657 int ret = -1;
1658 int i;
1659 struct bt_ctf_iter *iter;
1660 const struct bt_ctf_event *event;
1661 struct bt_iter_pos begin_pos;
1662 struct bt_trace_descriptor *td_write;
1663 struct bt_format *fmt_write;
1664 struct ctf_text_stream_pos *sout;
1665 uint64_t id;
1666
1667 ctx->bt_ctx = bt_context_create();
1668 if (!ctx->bt_ctx) {
1669 fprintf(stderr, "[error] bt_context_create allocation\n");
1670 goto end;
1671 }
1672
1673 fmt_write = bt_lookup_format(g_quark_from_static_string("text"));
1674 if (!fmt_write) {
1675 fprintf(stderr, "[error] ctf-text error\n");
1676 goto end;
1677 }
1678
1679 td_write = fmt_write->open_trace(NULL, O_RDWR, NULL, NULL);
1680 if (!td_write) {
1681 fprintf(stderr, "[error] Error opening output trace\n");
1682 goto end_free;
1683 }
1684
1685 sout = container_of(td_write, struct ctf_text_stream_pos,
1686 trace_descriptor);
1687 if (!sout->parent.event_cb) {
1688 goto end_free;
1689 }
1690
1691 ret = lttng_live_create_viewer_session(ctx);
1692 if (ret < 0) {
1693 goto end_free;
1694 }
1695
1696 for (i = 0; i < ctx->session_ids->len; i++) {
1697 id = g_array_index(ctx->session_ids, uint64_t, i);
1698 printf_verbose("Attaching to session %" PRIu64 "\n", id);
1699 ret = lttng_live_attach_session(ctx, id);
1700 printf_verbose("Attaching session returns %d\n", ret);
1701 if (ret < 0) {
1702 if (ret == -LTTNG_VIEWER_ATTACH_UNK) {
1703 fprintf(stderr, "[error] Unknown session ID\n");
1704 }
1705 goto end_free;
1706 }
1707 }
1708
1709 /*
1710 * As long as the session is active, we try to get new streams.
1711 */
1712 for (;;) {
1713 int flags;
1714
1715 if (lttng_live_should_quit()) {
1716 ret = 0;
1717 goto end_free;
1718 }
1719
1720 while (!ctx->session->stream_count) {
1721 if (lttng_live_should_quit()
1722 || ctx->session_ids->len == 0) {
1723 ret = 0;
1724 goto end_free;
1725 }
1726 ret = ask_new_streams(ctx);
1727 if (ret < 0) {
1728 goto end_free;
1729 }
1730 if (!ctx->session->stream_count) {
1731 (void) poll(NULL, 0, ACTIVE_POLL_DELAY);
1732 }
1733 }
1734
1735 ret = add_traces(ctx);
1736 if (ret < 0) {
1737 goto end_free;
1738 }
1739
1740 begin_pos.type = BT_SEEK_BEGIN;
1741 iter = bt_ctf_iter_create(ctx->bt_ctx, &begin_pos, NULL);
1742 if (!iter) {
1743 if (lttng_live_should_quit()) {
1744 ret = 0;
1745 goto end;
1746 }
1747 fprintf(stderr, "[error] Iterator creation error\n");
1748 goto end;
1749 }
1750 for (;;) {
1751 if (lttng_live_should_quit()) {
1752 ret = 0;
1753 goto end_free;
1754 }
1755 event = bt_ctf_iter_read_event_flags(iter, &flags);
1756 if (!(flags & BT_ITER_FLAG_RETRY)) {
1757 if (!event) {
1758 /* End of trace */
1759 break;
1760 }
1761 ret = sout->parent.event_cb(&sout->parent,
1762 event->parent->stream);
1763 if (ret) {
1764 fprintf(stderr, "[error] Writing "
1765 "event failed.\n");
1766 goto end_free;
1767 }
1768 }
1769 ret = bt_iter_next(bt_ctf_get_iter(iter));
1770 if (ret < 0) {
1771 goto end_free;
1772 }
1773 }
1774 bt_ctf_iter_destroy(iter);
1775 g_hash_table_foreach_remove(ctx->session->ctf_traces,
1776 del_traces, ctx->bt_ctx);
1777 ctx->session->stream_count = 0;
1778 }
1779
1780 end_free:
1781 bt_context_put(ctx->bt_ctx);
1782 end:
1783 if (lttng_live_should_quit()) {
1784 ret = 0;
1785 }
1786 return ret;
1787 }
BabelTrace - Trace Format Babel Tower
This page took 0.116614 seconds and 3 git commands to generate.