Fix: leak of streams
[babeltrace.git] / formats / lttng-live / lttng-live-plugin.c
CommitLineData
4a744367
JD
1/*
2 * BabelTrace - LTTng live Output
3 *
4 * Copyright 2013 Julien Desfossez <jdesfossez@efficios.com>
5 * Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
6 *
7 * Permission is hereby granted, free of charge, to any person obtaining a copy
8 * of this software and associated documentation files (the "Software"), to deal
9 * in the Software without restriction, including without limitation the rights
10 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
11 * copies of the Software, and to permit persons to whom the Software is
12 * furnished to do so, subject to the following conditions:
13 *
14 * The above copyright notice and this permission notice shall be included in
15 * all copies or substantial portions of the Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
20 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
23 * SOFTWARE.
24 */
25
26#include <babeltrace/ctf-text/types.h>
27#include <babeltrace/format.h>
28#include <babeltrace/babeltrace-internal.h>
29#include <inttypes.h>
30#include <sys/mman.h>
31#include <errno.h>
32#include <sys/types.h>
33#include <sys/stat.h>
34#include <fcntl.h>
35#include <dirent.h>
36#include <glib.h>
37#include <unistd.h>
38#include <stdlib.h>
8ace20bf 39#include <signal.h>
c98627ca 40#include "lttng-live.h"
4a744367 41
8ace20bf
MD
42static volatile int should_quit;
43
44int lttng_live_should_quit(void)
45{
46 return should_quit;
47}
48
49static
50void sighandler(int sig)
51{
52 switch (sig) {
53 case SIGTERM:
54 case SIGINT:
55 should_quit = 1;
56 break;
57 default:
58 break;
59 }
60}
61
62/*
63 * TODO: Eventually, this signal handler setup should be done at the
64 * plugin manager level, rather than within this plugin. Beware, we are
65 * not cleaning up the signal handler after plugin execution.
66 */
67static
68int setup_sighandler(void)
69{
70 struct sigaction sa;
71 sigset_t sigset;
72 int ret;
73
74 if ((ret = sigemptyset(&sigset)) < 0) {
75 perror("sigemptyset");
76 return ret;
77 }
78 sa.sa_handler = sighandler;
79 sa.sa_mask = sigset;
80 sa.sa_flags = 0;
81 if ((ret = sigaction(SIGTERM, &sa, NULL)) < 0) {
82 perror("sigaction");
83 return ret;
84 }
85 if ((ret = sigaction(SIGINT, &sa, NULL)) < 0) {
86 perror("sigaction");
87 return ret;
88 }
89 return 0;
90}
91
e84d6f79 92/*
0206bb4a 93 * hostname parameter needs to hold MAXNAMLEN chars.
e84d6f79 94 */
b5a1fa45
JD
95static
96int parse_url(const char *path, struct lttng_live_ctx *ctx)
4a744367 97{
0206bb4a 98 char remain[3][MAXNAMLEN];
e84d6f79 99 int ret = -1, proto, proto_offset = 0;
5fe17d06 100 size_t path_len = strlen(path); /* not accounting \0 */
4a744367 101
e84d6f79
MD
102 /*
103 * Since sscanf API does not allow easily checking string length
104 * against a size defined by a macro. Test it beforehand on the
105 * input. We know the output is always <= than the input length.
106 */
0206bb4a 107 if (path_len >= MAXNAMLEN) {
e84d6f79
MD
108 goto end;
109 }
110 ret = sscanf(path, "net%d://", &proto);
111 if (ret < 1) {
4a744367
JD
112 proto = 4;
113 /* net:// */
114 proto_offset = strlen("net://");
115 } else {
116 /* net4:// or net6:// */
117 proto_offset = strlen("netX://");
118 }
e84d6f79
MD
119 if (proto_offset > path_len) {
120 goto end;
121 }
fdfb7392
JG
122 if (proto == 6) {
123 fprintf(stderr, "[error] IPv6 is currently unsupported by lttng-live\n");
124 goto end;
125 }
4a744367
JD
126 /* TODO : parse for IPv6 as well */
127 /* Parse the hostname or IP */
e84d6f79 128 ret = sscanf(&path[proto_offset], "%[a-zA-Z.0-9%-]%s",
b5a1fa45 129 ctx->relay_hostname, remain[0]);
4a744367
JD
130 if (ret == 2) {
131 /* Optional port number */
e84d6f79
MD
132 switch (remain[0][0]) {
133 case ':':
b5a1fa45 134 ret = sscanf(remain[0], ":%d%s", &ctx->port, remain[1]);
4a744367
JD
135 /* Optional session ID with port number */
136 if (ret == 2) {
2acdc547 137 ret = sscanf(remain[1], "/%s", remain[2]);
e84d6f79
MD
138 /* Accept 0 or 1 (optional) */
139 if (ret < 0) {
140 goto end;
141 }
9010d19c 142 } else if (ret == 0) {
2a6d197b
MD
143 fprintf(stderr, "[error] Missing port number after delimitor ':'\n");
144 ret = -1;
145 goto end;
4a744367 146 }
e84d6f79
MD
147 break;
148 case '/':
4a744367 149 /* Optional session ID */
2acdc547 150 ret = sscanf(remain[0], "/%s", remain[2]);
e84d6f79
MD
151 /* Accept 0 or 1 (optional) */
152 if (ret < 0) {
153 goto end;
154 }
155 break;
156 default:
4a744367 157 fprintf(stderr, "[error] wrong delimitor : %c\n",
e84d6f79 158 remain[0][0]);
4a744367
JD
159 ret = -1;
160 goto end;
161 }
162 }
163
49a4acef 164 if (ctx->port < 0) {
b5a1fa45 165 ctx->port = LTTNG_DEFAULT_NETWORK_VIEWER_PORT;
49a4acef 166 }
4a744367 167
2acdc547 168 if (strlen(remain[2]) == 0) {
4a744367
JD
169 printf_verbose("Connecting to hostname : %s, port : %d, "
170 "proto : IPv%d\n",
b5a1fa45 171 ctx->relay_hostname, ctx->port, proto);
2acdc547
JD
172 ret = 0;
173 goto end;
174 }
b5a1fa45
JD
175 ret = sscanf(remain[2], "host/%[a-zA-Z.0-9%-]/%s",
176 ctx->traced_hostname, ctx->session_name);
177 if (ret != 2) {
178 fprintf(stderr, "[error] Format : "
179 "net://<hostname>/host/<traced_hostname>/<session_name>\n");
180 goto end;
181 }
2acdc547
JD
182
183 printf_verbose("Connecting to hostname : %s, port : %d, "
b5a1fa45
JD
184 "traced hostname : %s, session name : %s, "
185 "proto : IPv%d\n",
186 ctx->relay_hostname, ctx->port, ctx->traced_hostname,
187 ctx->session_name, proto);
4a744367
JD
188 ret = 0;
189
190end:
191 return ret;
192}
193
37307240
MD
194static
195guint g_uint64p_hash(gconstpointer key)
196{
197 uint64_t v = *(uint64_t *) key;
198
199 if (sizeof(gconstpointer) == sizeof(uint64_t)) {
200 return g_direct_hash((gconstpointer) (unsigned long) v);
201 } else {
202 return g_direct_hash((gconstpointer) (unsigned long) (v >> 32))
203 ^ g_direct_hash((gconstpointer) (unsigned long) v);
204 }
205}
206
207static
208gboolean g_uint64p_equal(gconstpointer a, gconstpointer b)
209{
210 uint64_t va = *(uint64_t *) a;
211 uint64_t vb = *(uint64_t *) b;
212
213 if (va != vb)
214 return FALSE;
215 return TRUE;
216}
217
21fe3eb3
MD
218static void free_session_streams(struct lttng_live_session *lsession)
219{
220 struct lttng_live_viewer_stream *lvstream, *tmp;
221
222 bt_list_for_each_entry_safe(lvstream, tmp, &lsession->stream_list,
223 stream_node) {
224 bt_list_del(&lvstream->stream_node);
225 g_free(lvstream);
226 }
227}
228
4a744367
JD
229static int lttng_live_open_trace_read(const char *path)
230{
4a744367 231 int ret = 0;
b5a1fa45 232 struct lttng_live_ctx *ctx;
4a744367 233
b5a1fa45
JD
234 ctx = g_new0(struct lttng_live_ctx, 1);
235 ctx->session = g_new0(struct lttng_live_session, 1);
3af4fc48 236
21fe3eb3
MD
237 BT_INIT_LIST_HEAD(&ctx->session->stream_list);
238
4a744367 239 /* We need a pointer to the context from the packet_seek function. */
b5a1fa45 240 ctx->session->ctx = ctx;
4a744367
JD
241
242 /* HT to store the CTF traces. */
37307240
MD
243 ctx->session->ctf_traces = g_hash_table_new(g_uint64p_hash,
244 g_uint64p_equal);
b5a1fa45
JD
245 ctx->port = -1;
246 ctx->session_ids = g_array_new(FALSE, TRUE, sizeof(uint64_t));
4a744367 247
b5a1fa45 248 ret = parse_url(path, ctx);
4a744367
JD
249 if (ret < 0) {
250 goto end_free;
251 }
8ace20bf
MD
252 ret = setup_sighandler();
253 if (ret < 0) {
254 goto end_free;
255 }
b5a1fa45 256 ret = lttng_live_connect_viewer(ctx);
4a744367 257 if (ret < 0) {
4a744367
JD
258 goto end_free;
259 }
260 printf_verbose("LTTng-live connected to relayd\n");
261
b5a1fa45 262 ret = lttng_live_establish_connection(ctx);
4a744367
JD
263 if (ret < 0) {
264 goto end_free;
265 }
266
b5a1fa45
JD
267 printf_verbose("Listing sessions\n");
268 ret = lttng_live_list_sessions(ctx, path);
269 if (ret < 0) {
b5a1fa45 270 goto end_free;
4a744367
JD
271 }
272
49a4acef 273 if (ctx->session_ids->len > 0) {
28756729 274 ret = lttng_live_read(ctx);
49a4acef 275 }
b5a1fa45 276
4a744367 277end_free:
b5a1fa45 278 g_hash_table_destroy(ctx->session->ctf_traces);
21fe3eb3 279 free_session_streams(ctx->session);
b5a1fa45 280 g_free(ctx->session);
b5a1fa45 281 g_free(ctx);
8ace20bf
MD
282
283 if (lttng_live_should_quit()) {
284 ret = 0;
285 }
4a744367
JD
286 return ret;
287}
288
289static
290struct bt_trace_descriptor *lttng_live_open_trace(const char *path, int flags,
291 void (*packet_seek)(struct bt_stream_pos *pos, size_t index,
292 int whence), FILE *metadata_fp)
293{
294 struct ctf_text_stream_pos *pos;
295
296 switch (flags & O_ACCMODE) {
297 case O_RDONLY:
298 /* OK */
299 break;
300 case O_RDWR:
301 fprintf(stderr, "[error] lttng live plugin cannot be used as output plugin.\n");
302 goto error;
303 default:
304 fprintf(stderr, "[error] Incorrect open flags.\n");
305 goto error;
306 }
307
308 pos = g_new0(struct ctf_text_stream_pos, 1);
309 pos->parent.rw_table = NULL;
310 pos->parent.event_cb = NULL;
311 pos->parent.trace = &pos->trace_descriptor;
857eaa68
MD
312 /*
313 * Since we do *everything* in this function, we are skipping
314 * the output plugin handling that is part of Babeltrace 1.x.
315 * Therefore, don't expect the --output cmd line option to work.
316 * This limits the output of lttng-live to stderr and stdout.
317 */
28756729
JG
318 if (lttng_live_open_trace_read(path) < 0) {
319 goto error;
320 }
4a744367
JD
321 return &pos->trace_descriptor;
322
323error:
324 return NULL;
325}
326
327static
328int lttng_live_close_trace(struct bt_trace_descriptor *td)
329{
330 struct ctf_text_stream_pos *pos =
331 container_of(td, struct ctf_text_stream_pos,
332 trace_descriptor);
9b6ae25b 333 g_free(pos);
4a744367
JD
334 return 0;
335}
336
337static
338struct bt_format lttng_live_format = {
339 .open_trace = lttng_live_open_trace,
340 .close_trace = lttng_live_close_trace,
341};
342
343static
344void __attribute__((constructor)) lttng_live_init(void)
345{
346 int ret;
347
348 lttng_live_format.name = g_quark_from_static_string("lttng-live");
349 ret = bt_register_format(&lttng_live_format);
350 assert(!ret);
351}
352
353static
354void __attribute__((destructor)) lttng_live_exit(void)
355{
356 bt_unregister_format(&lttng_live_format);
357}
This page took 0.03982 seconds and 4 git commands to generate.