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
c13e6f6d
JG
44void bt_lttng_live_hook(void)
45{
46 /*
47 * Dummy function to prevent the linker from discarding this format as
48 * "unused" in static builds.
49 */
50}
51
8ace20bf
MD
52int lttng_live_should_quit(void)
53{
54 return should_quit;
55}
56
57static
58void sighandler(int sig)
59{
60 switch (sig) {
61 case SIGTERM:
62 case SIGINT:
63 should_quit = 1;
64 break;
65 default:
66 break;
67 }
68}
69
70/*
71 * TODO: Eventually, this signal handler setup should be done at the
72 * plugin manager level, rather than within this plugin. Beware, we are
73 * not cleaning up the signal handler after plugin execution.
74 */
75static
76int setup_sighandler(void)
77{
78 struct sigaction sa;
79 sigset_t sigset;
80 int ret;
81
82 if ((ret = sigemptyset(&sigset)) < 0) {
83 perror("sigemptyset");
84 return ret;
85 }
86 sa.sa_handler = sighandler;
87 sa.sa_mask = sigset;
88 sa.sa_flags = 0;
89 if ((ret = sigaction(SIGTERM, &sa, NULL)) < 0) {
90 perror("sigaction");
91 return ret;
92 }
93 if ((ret = sigaction(SIGINT, &sa, NULL)) < 0) {
94 perror("sigaction");
95 return ret;
96 }
97 return 0;
98}
99
e84d6f79 100/*
0206bb4a 101 * hostname parameter needs to hold MAXNAMLEN chars.
e84d6f79 102 */
b5a1fa45
JD
103static
104int parse_url(const char *path, struct lttng_live_ctx *ctx)
4a744367 105{
0206bb4a 106 char remain[3][MAXNAMLEN];
e84d6f79 107 int ret = -1, proto, proto_offset = 0;
5fe17d06 108 size_t path_len = strlen(path); /* not accounting \0 */
4a744367 109
e84d6f79
MD
110 /*
111 * Since sscanf API does not allow easily checking string length
112 * against a size defined by a macro. Test it beforehand on the
113 * input. We know the output is always <= than the input length.
114 */
0206bb4a 115 if (path_len >= MAXNAMLEN) {
e84d6f79
MD
116 goto end;
117 }
118 ret = sscanf(path, "net%d://", &proto);
119 if (ret < 1) {
4a744367
JD
120 proto = 4;
121 /* net:// */
122 proto_offset = strlen("net://");
123 } else {
124 /* net4:// or net6:// */
125 proto_offset = strlen("netX://");
126 }
e84d6f79
MD
127 if (proto_offset > path_len) {
128 goto end;
129 }
fdfb7392
JG
130 if (proto == 6) {
131 fprintf(stderr, "[error] IPv6 is currently unsupported by lttng-live\n");
132 goto end;
133 }
4a744367
JD
134 /* TODO : parse for IPv6 as well */
135 /* Parse the hostname or IP */
e84d6f79 136 ret = sscanf(&path[proto_offset], "%[a-zA-Z.0-9%-]%s",
b5a1fa45 137 ctx->relay_hostname, remain[0]);
4a744367
JD
138 if (ret == 2) {
139 /* Optional port number */
e84d6f79
MD
140 switch (remain[0][0]) {
141 case ':':
b5a1fa45 142 ret = sscanf(remain[0], ":%d%s", &ctx->port, remain[1]);
4a744367
JD
143 /* Optional session ID with port number */
144 if (ret == 2) {
2acdc547 145 ret = sscanf(remain[1], "/%s", remain[2]);
e84d6f79
MD
146 /* Accept 0 or 1 (optional) */
147 if (ret < 0) {
148 goto end;
149 }
9010d19c 150 } else if (ret == 0) {
2a6d197b
MD
151 fprintf(stderr, "[error] Missing port number after delimitor ':'\n");
152 ret = -1;
153 goto end;
4a744367 154 }
e84d6f79
MD
155 break;
156 case '/':
4a744367 157 /* Optional session ID */
2acdc547 158 ret = sscanf(remain[0], "/%s", remain[2]);
e84d6f79
MD
159 /* Accept 0 or 1 (optional) */
160 if (ret < 0) {
161 goto end;
162 }
163 break;
164 default:
4a744367 165 fprintf(stderr, "[error] wrong delimitor : %c\n",
e84d6f79 166 remain[0][0]);
4a744367
JD
167 ret = -1;
168 goto end;
169 }
170 }
171
49a4acef 172 if (ctx->port < 0) {
b5a1fa45 173 ctx->port = LTTNG_DEFAULT_NETWORK_VIEWER_PORT;
49a4acef 174 }
4a744367 175
2acdc547 176 if (strlen(remain[2]) == 0) {
4a744367
JD
177 printf_verbose("Connecting to hostname : %s, port : %d, "
178 "proto : IPv%d\n",
b5a1fa45 179 ctx->relay_hostname, ctx->port, proto);
2acdc547
JD
180 ret = 0;
181 goto end;
182 }
b5a1fa45
JD
183 ret = sscanf(remain[2], "host/%[a-zA-Z.0-9%-]/%s",
184 ctx->traced_hostname, ctx->session_name);
185 if (ret != 2) {
186 fprintf(stderr, "[error] Format : "
187 "net://<hostname>/host/<traced_hostname>/<session_name>\n");
188 goto end;
189 }
2acdc547
JD
190
191 printf_verbose("Connecting to hostname : %s, port : %d, "
b5a1fa45
JD
192 "traced hostname : %s, session name : %s, "
193 "proto : IPv%d\n",
194 ctx->relay_hostname, ctx->port, ctx->traced_hostname,
195 ctx->session_name, proto);
4a744367
JD
196 ret = 0;
197
198end:
199 return ret;
200}
201
37307240
MD
202static
203guint g_uint64p_hash(gconstpointer key)
204{
205 uint64_t v = *(uint64_t *) key;
206
207 if (sizeof(gconstpointer) == sizeof(uint64_t)) {
208 return g_direct_hash((gconstpointer) (unsigned long) v);
209 } else {
210 return g_direct_hash((gconstpointer) (unsigned long) (v >> 32))
211 ^ g_direct_hash((gconstpointer) (unsigned long) v);
212 }
213}
214
215static
216gboolean g_uint64p_equal(gconstpointer a, gconstpointer b)
217{
218 uint64_t va = *(uint64_t *) a;
219 uint64_t vb = *(uint64_t *) b;
220
221 if (va != vb)
222 return FALSE;
223 return TRUE;
224}
225
b5e7994d
MD
226static void free_session_streams(struct lttng_live_session *lsession)
227{
228 struct lttng_live_viewer_stream *lvstream, *tmp;
229
230 bt_list_for_each_entry_safe(lvstream, tmp, &lsession->stream_list,
231 stream_node) {
232 bt_list_del(&lvstream->stream_node);
233 g_free(lvstream);
234 }
235}
236
4a744367
JD
237static int lttng_live_open_trace_read(const char *path)
238{
4a744367 239 int ret = 0;
b5a1fa45 240 struct lttng_live_ctx *ctx;
4a744367 241
b5a1fa45
JD
242 ctx = g_new0(struct lttng_live_ctx, 1);
243 ctx->session = g_new0(struct lttng_live_session, 1);
3af4fc48 244
b5e7994d
MD
245 BT_INIT_LIST_HEAD(&ctx->session->stream_list);
246
4a744367 247 /* We need a pointer to the context from the packet_seek function. */
b5a1fa45 248 ctx->session->ctx = ctx;
4a744367
JD
249
250 /* HT to store the CTF traces. */
37307240
MD
251 ctx->session->ctf_traces = g_hash_table_new(g_uint64p_hash,
252 g_uint64p_equal);
b5a1fa45
JD
253 ctx->port = -1;
254 ctx->session_ids = g_array_new(FALSE, TRUE, sizeof(uint64_t));
4a744367 255
b5a1fa45 256 ret = parse_url(path, ctx);
4a744367
JD
257 if (ret < 0) {
258 goto end_free;
259 }
8ace20bf
MD
260 ret = setup_sighandler();
261 if (ret < 0) {
262 goto end_free;
263 }
b5a1fa45 264 ret = lttng_live_connect_viewer(ctx);
4a744367 265 if (ret < 0) {
4a744367
JD
266 goto end_free;
267 }
268 printf_verbose("LTTng-live connected to relayd\n");
269
b5a1fa45 270 ret = lttng_live_establish_connection(ctx);
4a744367
JD
271 if (ret < 0) {
272 goto end_free;
273 }
274
b5a1fa45
JD
275 printf_verbose("Listing sessions\n");
276 ret = lttng_live_list_sessions(ctx, path);
277 if (ret < 0) {
b5a1fa45 278 goto end_free;
4a744367
JD
279 }
280
49a4acef 281 if (ctx->session_ids->len > 0) {
28756729 282 ret = lttng_live_read(ctx);
49a4acef 283 }
b5a1fa45 284
4a744367 285end_free:
b5a1fa45 286 g_hash_table_destroy(ctx->session->ctf_traces);
b5e7994d 287 free_session_streams(ctx->session);
b5a1fa45 288 g_free(ctx->session);
b5a1fa45 289 g_free(ctx);
8ace20bf
MD
290
291 if (lttng_live_should_quit()) {
292 ret = 0;
293 }
4a744367
JD
294 return ret;
295}
296
297static
298struct bt_trace_descriptor *lttng_live_open_trace(const char *path, int flags,
299 void (*packet_seek)(struct bt_stream_pos *pos, size_t index,
300 int whence), FILE *metadata_fp)
301{
302 struct ctf_text_stream_pos *pos;
303
304 switch (flags & O_ACCMODE) {
305 case O_RDONLY:
306 /* OK */
307 break;
308 case O_RDWR:
309 fprintf(stderr, "[error] lttng live plugin cannot be used as output plugin.\n");
310 goto error;
311 default:
312 fprintf(stderr, "[error] Incorrect open flags.\n");
313 goto error;
314 }
315
316 pos = g_new0(struct ctf_text_stream_pos, 1);
317 pos->parent.rw_table = NULL;
318 pos->parent.event_cb = NULL;
319 pos->parent.trace = &pos->trace_descriptor;
857eaa68
MD
320 /*
321 * Since we do *everything* in this function, we are skipping
322 * the output plugin handling that is part of Babeltrace 1.x.
323 * Therefore, don't expect the --output cmd line option to work.
324 * This limits the output of lttng-live to stderr and stdout.
325 */
28756729
JG
326 if (lttng_live_open_trace_read(path) < 0) {
327 goto error;
328 }
4a744367
JD
329 return &pos->trace_descriptor;
330
331error:
332 return NULL;
333}
334
335static
336int lttng_live_close_trace(struct bt_trace_descriptor *td)
337{
338 struct ctf_text_stream_pos *pos =
339 container_of(td, struct ctf_text_stream_pos,
340 trace_descriptor);
9b6ae25b 341 g_free(pos);
4a744367
JD
342 return 0;
343}
344
345static
346struct bt_format lttng_live_format = {
347 .open_trace = lttng_live_open_trace,
348 .close_trace = lttng_live_close_trace,
349};
350
351static
352void __attribute__((constructor)) lttng_live_init(void)
353{
354 int ret;
355
356 lttng_live_format.name = g_quark_from_static_string("lttng-live");
357 ret = bt_register_format(&lttng_live_format);
358 assert(!ret);
359}
360
361static
362void __attribute__((destructor)) lttng_live_exit(void)
363{
364 bt_unregister_format(&lttng_live_format);
365}
This page took 0.040868 seconds and 4 git commands to generate.