Commit | Line | Data |
---|---|---|
fc93b2bd MD |
1 | /* |
2 | * BabelTrace - Common Trace Format (CTF) | |
3 | * | |
4 | * Format registration. | |
5 | * | |
64fa3fec MD |
6 | * Copyright 2010-2011 EfficiOS Inc. and Linux Foundation |
7 | * | |
8 | * Author: Mathieu Desnoyers <mathieu.desnoyers@efficios.com> | |
fc93b2bd | 9 | * |
ccd7e1c8 MD |
10 | * Permission is hereby granted, free of charge, to any person obtaining a copy |
11 | * of this software and associated documentation files (the "Software"), to deal | |
12 | * in the Software without restriction, including without limitation the rights | |
13 | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | |
14 | * copies of the Software, and to permit persons to whom the Software is | |
15 | * furnished to do so, subject to the following conditions: | |
fc93b2bd | 16 | * |
ccd7e1c8 MD |
17 | * The above copyright notice and this permission notice shall be included in |
18 | * all copies or substantial portions of the Software. | |
fc93b2bd MD |
19 | */ |
20 | ||
21 | #include <babeltrace/format.h> | |
22 | #include <babeltrace/ctf/types.h> | |
bbefb8dd | 23 | #include <babeltrace/ctf/metadata.h> |
65102a8c | 24 | #include <babeltrace/babeltrace.h> |
0f980a35 | 25 | #include <inttypes.h> |
b4c19c1e | 26 | #include <stdio.h> |
0f980a35 MD |
27 | #include <uuid/uuid.h> |
28 | #include <sys/mman.h> | |
bbefb8dd | 29 | #include <errno.h> |
b4c19c1e | 30 | #include <endian.h> |
bbefb8dd | 31 | #include <sys/types.h> |
65102a8c | 32 | #include <sys/stat.h> |
bbefb8dd | 33 | #include <fcntl.h> |
65102a8c | 34 | #include <dirent.h> |
bbefb8dd | 35 | #include <glib.h> |
65102a8c MD |
36 | #include <unistd.h> |
37 | #include <stdlib.h> | |
38 | ||
65102a8c MD |
39 | #include "metadata/ctf-scanner.h" |
40 | #include "metadata/ctf-parser.h" | |
41 | #include "metadata/ctf-ast.h" | |
42 | ||
0f980a35 MD |
43 | /* |
44 | * We currently simply map a page to read the packet header and packet | |
8c572eba | 45 | * context to get the packet length and content length. (in bits) |
0f980a35 | 46 | */ |
8c572eba MD |
47 | #define MAX_PACKET_HEADER_LEN (getpagesize() * CHAR_BIT) |
48 | #define WRITE_PACKET_LEN (getpagesize() * 8 * CHAR_BIT) | |
0f980a35 MD |
49 | #define UUID_LEN 16 /* uuid by value len */ |
50 | ||
a0fe7d97 MD |
51 | #ifndef min |
52 | #define min(a, b) (((a) < (b)) ? (a) : (b)) | |
53 | #endif | |
54 | ||
65102a8c | 55 | extern int yydebug; |
bbefb8dd | 56 | |
e9378815 | 57 | static |
bbefb8dd | 58 | struct trace_descriptor *ctf_open_trace(const char *path, int flags); |
e9378815 | 59 | static |
bbefb8dd | 60 | void ctf_close_trace(struct trace_descriptor *descriptor); |
fc93b2bd | 61 | |
1ae19169 MD |
62 | static |
63 | rw_dispatch read_dispatch_table[] = { | |
d11e9c49 MD |
64 | [ CTF_TYPE_INTEGER ] = ctf_integer_read, |
65 | [ CTF_TYPE_FLOAT ] = ctf_float_read, | |
66 | [ CTF_TYPE_ENUM ] = ctf_enum_read, | |
67 | [ CTF_TYPE_STRING ] = ctf_string_read, | |
68 | [ CTF_TYPE_STRUCT ] = ctf_struct_rw, | |
69 | [ CTF_TYPE_VARIANT ] = ctf_variant_rw, | |
81dee1bb MD |
70 | [ CTF_TYPE_ARRAY ] = ctf_array_read, |
71 | [ CTF_TYPE_SEQUENCE ] = ctf_sequence_read, | |
d11e9c49 MD |
72 | }; |
73 | ||
1ae19169 MD |
74 | static |
75 | rw_dispatch write_dispatch_table[] = { | |
d11e9c49 MD |
76 | [ CTF_TYPE_INTEGER ] = ctf_integer_write, |
77 | [ CTF_TYPE_FLOAT ] = ctf_float_write, | |
78 | [ CTF_TYPE_ENUM ] = ctf_enum_write, | |
79 | [ CTF_TYPE_STRING ] = ctf_string_write, | |
80 | [ CTF_TYPE_STRUCT ] = ctf_struct_rw, | |
81 | [ CTF_TYPE_VARIANT ] = ctf_variant_rw, | |
81dee1bb MD |
82 | [ CTF_TYPE_ARRAY ] = ctf_array_write, |
83 | [ CTF_TYPE_SEQUENCE ] = ctf_sequence_write, | |
d11e9c49 MD |
84 | }; |
85 | ||
1ae19169 | 86 | static |
d11e9c49 | 87 | struct format ctf_format = { |
bbefb8dd MD |
88 | .open_trace = ctf_open_trace, |
89 | .close_trace = ctf_close_trace, | |
fc93b2bd MD |
90 | }; |
91 | ||
2b9a764d MD |
92 | static |
93 | void ctf_update_timestamp(struct ctf_stream *stream, | |
94 | struct definition_integer *integer_definition) | |
95 | { | |
96 | struct declaration_integer *integer_declaration = | |
97 | integer_definition->declaration; | |
98 | uint64_t oldval, newval, updateval; | |
99 | ||
100 | if (integer_declaration->len == 64) { | |
101 | stream->timestamp = integer_definition->value._unsigned; | |
102 | return; | |
103 | } | |
104 | /* keep low bits */ | |
105 | oldval = stream->timestamp; | |
106 | oldval &= (1ULL << integer_declaration->len) - 1; | |
107 | newval = integer_definition->value._unsigned; | |
108 | /* Test for overflow by comparing low bits */ | |
109 | if (newval < oldval) | |
110 | newval += 1ULL << integer_declaration->len; | |
111 | /* updateval contains old high bits, and new low bits (sum) */ | |
112 | updateval = stream->timestamp; | |
113 | updateval &= ~((1ULL << integer_declaration->len) - 1); | |
114 | updateval += newval; | |
115 | stream->timestamp = updateval; | |
116 | } | |
117 | ||
31262354 | 118 | static |
764af3f4 | 119 | int ctf_read_event(struct stream_pos *ppos, struct ctf_stream *stream) |
31262354 MD |
120 | { |
121 | struct ctf_stream_pos *pos = | |
122 | container_of(ppos, struct ctf_stream_pos, parent); | |
764af3f4 | 123 | struct ctf_stream_class *stream_class = stream->stream_class; |
42dc00b7 | 124 | struct ctf_stream_event *event; |
31262354 | 125 | uint64_t id = 0; |
31262354 MD |
126 | int ret; |
127 | ||
128 | if (pos->offset == EOF) | |
129 | return EOF; | |
130 | ||
131 | /* Read event header */ | |
e28d4618 | 132 | if (stream->stream_event_header) { |
a35173fe | 133 | struct definition_integer *integer_definition; |
ccdb988e | 134 | struct definition *variant; |
a35173fe | 135 | |
e28d4618 | 136 | ret = generic_rw(ppos, &stream->stream_event_header->p); |
31262354 MD |
137 | if (ret) |
138 | goto error; | |
139 | /* lookup event id */ | |
e28d4618 | 140 | integer_definition = lookup_integer(&stream->stream_event_header->p, "id", FALSE); |
a35173fe MD |
141 | if (integer_definition) { |
142 | id = integer_definition->value._unsigned; | |
143 | } else { | |
144 | struct definition_enum *enum_definition; | |
145 | ||
e28d4618 | 146 | enum_definition = lookup_enum(&stream->stream_event_header->p, "id", FALSE); |
a35173fe MD |
147 | if (enum_definition) { |
148 | id = enum_definition->integer->value._unsigned; | |
149 | } | |
31262354 | 150 | } |
764af3f4 | 151 | |
e28d4618 | 152 | variant = lookup_variant(&stream->stream_event_header->p, "v"); |
ccdb988e MD |
153 | if (variant) { |
154 | integer_definition = lookup_integer(variant, "id", FALSE); | |
155 | if (integer_definition) { | |
156 | id = integer_definition->value._unsigned; | |
157 | } | |
158 | } | |
159 | ||
764af3f4 | 160 | /* lookup timestamp */ |
5e2eb0ae | 161 | stream->has_timestamp = 0; |
e28d4618 | 162 | integer_definition = lookup_integer(&stream->stream_event_header->p, "timestamp", FALSE); |
a35173fe | 163 | if (integer_definition) { |
2b9a764d | 164 | ctf_update_timestamp(stream, integer_definition); |
5e2eb0ae | 165 | stream->has_timestamp = 1; |
a35173fe | 166 | } else { |
ccdb988e MD |
167 | if (variant) { |
168 | integer_definition = lookup_integer(variant, "timestamp", FALSE); | |
a35173fe | 169 | if (integer_definition) { |
2b9a764d | 170 | ctf_update_timestamp(stream, integer_definition); |
5e2eb0ae | 171 | stream->has_timestamp = 1; |
a35173fe MD |
172 | } |
173 | } | |
764af3f4 | 174 | } |
31262354 MD |
175 | } |
176 | ||
177 | /* Read stream-declared event context */ | |
e28d4618 MD |
178 | if (stream->stream_event_context) { |
179 | ret = generic_rw(ppos, &stream->stream_event_context->p); | |
31262354 MD |
180 | if (ret) |
181 | goto error; | |
182 | } | |
183 | ||
184 | if (id >= stream_class->events_by_id->len) { | |
185 | fprintf(stdout, "[error] Event id %" PRIu64 " is outside range.\n", id); | |
186 | return -EINVAL; | |
187 | } | |
e28d4618 MD |
188 | event = g_ptr_array_index(stream->events_by_id, id); |
189 | if (!event) { | |
31262354 MD |
190 | fprintf(stdout, "[error] Event id %" PRIu64 " is unknown.\n", id); |
191 | return -EINVAL; | |
192 | } | |
193 | ||
194 | /* Read event-declared event context */ | |
e28d4618 MD |
195 | if (event->event_context) { |
196 | ret = generic_rw(ppos, &event->event_context->p); | |
31262354 MD |
197 | if (ret) |
198 | goto error; | |
199 | } | |
200 | ||
201 | /* Read event payload */ | |
e28d4618 MD |
202 | if (event->event_fields) { |
203 | ret = generic_rw(ppos, &event->event_fields->p); | |
31262354 MD |
204 | if (ret) |
205 | goto error; | |
206 | } | |
207 | ||
208 | return 0; | |
209 | ||
210 | error: | |
211 | fprintf(stdout, "[error] Unexpected end of stream. Either the trace data stream is corrupted or metadata description does not match data layout.\n"); | |
212 | return ret; | |
213 | } | |
214 | ||
215 | static | |
764af3f4 | 216 | int ctf_write_event(struct stream_pos *pos, struct ctf_stream *stream) |
31262354 | 217 | { |
764af3f4 | 218 | struct ctf_stream_class *stream_class = stream->stream_class; |
42dc00b7 | 219 | struct ctf_stream_event *event; |
31262354 | 220 | uint64_t id = 0; |
31262354 MD |
221 | int ret; |
222 | ||
223 | /* print event header */ | |
e28d4618 | 224 | if (stream->stream_event_header) { |
ccdb988e MD |
225 | struct definition_integer *integer_definition; |
226 | struct definition *variant; | |
227 | ||
31262354 | 228 | /* lookup event id */ |
e28d4618 | 229 | integer_definition = lookup_integer(&stream->stream_event_header->p, "id", FALSE); |
ccdb988e MD |
230 | if (integer_definition) { |
231 | id = integer_definition->value._unsigned; | |
232 | } else { | |
233 | struct definition_enum *enum_definition; | |
234 | ||
e28d4618 | 235 | enum_definition = lookup_enum(&stream->stream_event_header->p, "id", FALSE); |
ccdb988e MD |
236 | if (enum_definition) { |
237 | id = enum_definition->integer->value._unsigned; | |
238 | } | |
239 | } | |
240 | ||
e28d4618 | 241 | variant = lookup_variant(&stream->stream_event_header->p, "v"); |
ccdb988e MD |
242 | if (variant) { |
243 | integer_definition = lookup_integer(variant, "id", FALSE); | |
244 | if (integer_definition) { | |
245 | id = integer_definition->value._unsigned; | |
246 | } | |
31262354 MD |
247 | } |
248 | ||
e28d4618 | 249 | ret = generic_rw(pos, &stream->stream_event_header->p); |
31262354 MD |
250 | if (ret) |
251 | goto error; | |
252 | } | |
253 | ||
254 | /* print stream-declared event context */ | |
e28d4618 MD |
255 | if (stream->stream_event_context) { |
256 | ret = generic_rw(pos, &stream->stream_event_context->p); | |
31262354 MD |
257 | if (ret) |
258 | goto error; | |
259 | } | |
260 | ||
261 | if (id >= stream_class->events_by_id->len) { | |
262 | fprintf(stdout, "[error] Event id %" PRIu64 " is outside range.\n", id); | |
263 | return -EINVAL; | |
264 | } | |
e28d4618 MD |
265 | event = g_ptr_array_index(stream->events_by_id, id); |
266 | if (!event) { | |
31262354 MD |
267 | fprintf(stdout, "[error] Event id %" PRIu64 " is unknown.\n", id); |
268 | return -EINVAL; | |
269 | } | |
270 | ||
271 | /* print event-declared event context */ | |
e28d4618 MD |
272 | if (event->event_context) { |
273 | ret = generic_rw(pos, &event->event_context->p); | |
31262354 MD |
274 | if (ret) |
275 | goto error; | |
276 | } | |
277 | ||
278 | /* Read and print event payload */ | |
e28d4618 MD |
279 | if (event->event_fields) { |
280 | ret = generic_rw(pos, &event->event_fields->p); | |
31262354 MD |
281 | if (ret) |
282 | goto error; | |
283 | } | |
284 | ||
285 | return 0; | |
286 | ||
287 | error: | |
288 | fprintf(stdout, "[error] Unexpected end of stream. Either the trace data stream is corrupted or metadata description does not match data layout.\n"); | |
289 | return ret; | |
290 | } | |
291 | ||
8563e754 | 292 | void ctf_init_pos(struct ctf_stream_pos *pos, int fd, int open_flags) |
8c572eba MD |
293 | { |
294 | pos->fd = fd; | |
295 | pos->mmap_offset = 0; | |
296 | pos->packet_size = 0; | |
297 | pos->content_size = 0; | |
298 | pos->content_size_loc = NULL; | |
299 | pos->base = NULL; | |
300 | pos->offset = 0; | |
301 | pos->dummy = false; | |
8c572eba | 302 | pos->cur_index = 0; |
8563e754 MD |
303 | if (fd >= 0) |
304 | pos->packet_index = g_array_new(FALSE, TRUE, | |
305 | sizeof(struct packet_index)); | |
306 | else | |
307 | pos->packet_index = NULL; | |
8563e754 MD |
308 | switch (open_flags & O_ACCMODE) { |
309 | case O_RDONLY: | |
310 | pos->prot = PROT_READ; | |
311 | pos->flags = MAP_PRIVATE; | |
312 | pos->parent.rw_table = read_dispatch_table; | |
31262354 | 313 | pos->parent.event_cb = ctf_read_event; |
8563e754 | 314 | break; |
8563e754 MD |
315 | case O_RDWR: |
316 | pos->prot = PROT_WRITE; /* Write has priority */ | |
317 | pos->flags = MAP_SHARED; | |
318 | pos->parent.rw_table = write_dispatch_table; | |
31262354 | 319 | pos->parent.event_cb = ctf_write_event; |
8563e754 | 320 | if (fd >= 0) |
847bf71a | 321 | ctf_move_pos_slow(pos, 0, SEEK_SET); /* position for write */ |
8563e754 MD |
322 | break; |
323 | default: | |
324 | assert(0); | |
8c572eba MD |
325 | } |
326 | } | |
327 | ||
46322b33 | 328 | void ctf_fini_pos(struct ctf_stream_pos *pos) |
8c572eba MD |
329 | { |
330 | int ret; | |
331 | ||
332 | if (pos->prot == PROT_WRITE && pos->content_size_loc) | |
333 | *pos->content_size_loc = pos->offset; | |
334 | if (pos->base) { | |
335 | /* unmap old base */ | |
336 | ret = munmap(pos->base, pos->packet_size / CHAR_BIT); | |
337 | if (ret) { | |
46322b33 | 338 | fprintf(stdout, "[error] Unable to unmap old base: %s.\n", |
8c572eba MD |
339 | strerror(errno)); |
340 | assert(0); | |
341 | } | |
342 | } | |
343 | (void) g_array_free(pos->packet_index, TRUE); | |
344 | } | |
345 | ||
847bf71a | 346 | void ctf_move_pos_slow(struct ctf_stream_pos *pos, size_t offset, int whence) |
0f980a35 | 347 | { |
75cc2c35 MD |
348 | struct ctf_file_stream *file_stream = |
349 | container_of(pos, struct ctf_file_stream, pos); | |
0f980a35 | 350 | int ret; |
8c572eba MD |
351 | off_t off; |
352 | struct packet_index *index; | |
0f980a35 | 353 | |
8c572eba MD |
354 | if (pos->prot == PROT_WRITE && pos->content_size_loc) |
355 | *pos->content_size_loc = pos->offset; | |
0f980a35 MD |
356 | |
357 | if (pos->base) { | |
358 | /* unmap old base */ | |
8c572eba | 359 | ret = munmap(pos->base, pos->packet_size / CHAR_BIT); |
0f980a35 | 360 | if (ret) { |
46322b33 | 361 | fprintf(stdout, "[error] Unable to unmap old base: %s.\n", |
0f980a35 MD |
362 | strerror(errno)); |
363 | assert(0); | |
364 | } | |
847bf71a | 365 | pos->base = NULL; |
0f980a35 MD |
366 | } |
367 | ||
8c572eba | 368 | /* |
46322b33 | 369 | * The caller should never ask for ctf_move_pos across packets, |
8c572eba MD |
370 | * except to get exactly at the beginning of the next packet. |
371 | */ | |
372 | if (pos->prot == PROT_WRITE) { | |
989c73bc MD |
373 | switch (whence) { |
374 | case SEEK_CUR: | |
375 | /* The writer will add padding */ | |
376 | assert(pos->offset + offset == pos->packet_size); | |
8c572eba | 377 | pos->mmap_offset += WRITE_PACKET_LEN / CHAR_BIT; |
989c73bc MD |
378 | break; |
379 | case SEEK_SET: | |
380 | assert(offset == 0); /* only seek supported for now */ | |
381 | pos->cur_index = 0; | |
382 | break; | |
383 | default: | |
384 | assert(0); | |
385 | } | |
8c572eba MD |
386 | pos->content_size = -1U; /* Unknown at this point */ |
387 | pos->packet_size = WRITE_PACKET_LEN; | |
989c73bc MD |
388 | off = posix_fallocate(pos->fd, pos->mmap_offset, |
389 | pos->packet_size / CHAR_BIT); | |
8c572eba | 390 | assert(off >= 0); |
847bf71a | 391 | pos->offset = 0; |
8c572eba | 392 | } else { |
847bf71a MD |
393 | switch (whence) { |
394 | case SEEK_CUR: | |
395 | /* The reader will expect us to skip padding */ | |
396 | assert(pos->offset + offset == pos->content_size); | |
8c572eba | 397 | ++pos->cur_index; |
847bf71a MD |
398 | break; |
399 | case SEEK_SET: | |
400 | assert(offset == 0); /* only seek supported for now */ | |
401 | pos->cur_index = 0; | |
402 | break; | |
403 | default: | |
404 | assert(0); | |
405 | } | |
406 | if (pos->cur_index >= pos->packet_index->len) { | |
670977d3 | 407 | pos->offset = EOF; |
847bf71a MD |
408 | return; |
409 | } | |
8c572eba MD |
410 | index = &g_array_index(pos->packet_index, struct packet_index, |
411 | pos->cur_index); | |
412 | pos->mmap_offset = index->offset; | |
413 | ||
414 | /* Lookup context/packet size in index */ | |
2d0bea29 | 415 | file_stream->parent.timestamp = index->timestamp_begin; |
8c572eba MD |
416 | pos->content_size = index->content_size; |
417 | pos->packet_size = index->packet_size; | |
7eda6fc7 | 418 | if (index->data_offset <= index->content_size) { |
75cc2c35 | 419 | pos->offset = 0; /* will read headers */ |
7eda6fc7 | 420 | } else { |
2b9a764d MD |
421 | pos->offset = EOF; |
422 | return; | |
423 | } | |
8c572eba | 424 | } |
0f980a35 | 425 | /* map new base. Need mapping length from header. */ |
8c572eba MD |
426 | pos->base = mmap(NULL, pos->packet_size / CHAR_BIT, pos->prot, |
427 | pos->flags, pos->fd, pos->mmap_offset); | |
847bf71a MD |
428 | if (pos->base == MAP_FAILED) { |
429 | fprintf(stdout, "[error] mmap error %s.\n", | |
430 | strerror(errno)); | |
431 | assert(0); | |
432 | } | |
75cc2c35 MD |
433 | |
434 | /* update trace_packet_header and stream_packet_context */ | |
2d0bea29 | 435 | if (pos->prot != PROT_WRITE && file_stream->parent.trace_packet_header) { |
75cc2c35 | 436 | /* Read packet header */ |
2d0bea29 | 437 | ret = generic_rw(&pos->parent, &file_stream->parent.trace_packet_header->p); |
75cc2c35 MD |
438 | assert(!ret); |
439 | } | |
2d0bea29 | 440 | if (pos->prot != PROT_WRITE && file_stream->parent.stream_packet_context) { |
75cc2c35 | 441 | /* Read packet context */ |
2d0bea29 | 442 | ret = generic_rw(&pos->parent, &file_stream->parent.stream_packet_context->p); |
75cc2c35 MD |
443 | assert(!ret); |
444 | } | |
0f980a35 MD |
445 | } |
446 | ||
b4c19c1e MD |
447 | static |
448 | int packet_metadata(struct ctf_trace *td, FILE *fp) | |
449 | { | |
450 | uint32_t magic; | |
451 | size_t len; | |
452 | int ret = 0; | |
453 | ||
454 | len = fread(&magic, sizeof(magic), 1, fp); | |
a0fe7d97 | 455 | if (len != 1) { |
b4c19c1e MD |
456 | goto end; |
457 | } | |
458 | if (magic == TSDL_MAGIC) { | |
459 | ret = 1; | |
460 | td->byte_order = BYTE_ORDER; | |
0d336fdf | 461 | CTF_TRACE_SET_FIELD(td, byte_order); |
b4c19c1e MD |
462 | } else if (magic == GUINT32_SWAP_LE_BE(TSDL_MAGIC)) { |
463 | ret = 1; | |
464 | td->byte_order = (BYTE_ORDER == BIG_ENDIAN) ? | |
465 | LITTLE_ENDIAN : BIG_ENDIAN; | |
0d336fdf | 466 | CTF_TRACE_SET_FIELD(td, byte_order); |
b4c19c1e MD |
467 | } |
468 | end: | |
469 | rewind(fp); | |
470 | return ret; | |
471 | } | |
472 | ||
473 | static | |
474 | int ctf_open_trace_metadata_packet_read(struct ctf_trace *td, FILE *in, | |
475 | FILE *out) | |
476 | { | |
477 | struct metadata_packet_header header; | |
a0fe7d97 | 478 | size_t readlen, writelen, toread; |
f8254867 | 479 | char buf[4096 + 1]; /* + 1 for debug-mode \0 */ |
b4c19c1e MD |
480 | int ret = 0; |
481 | ||
a91a962e | 482 | readlen = fread(&header, header_sizeof(header), 1, in); |
a0fe7d97 | 483 | if (readlen < 1) |
b4c19c1e MD |
484 | return -EINVAL; |
485 | ||
486 | if (td->byte_order != BYTE_ORDER) { | |
487 | header.magic = GUINT32_SWAP_LE_BE(header.magic); | |
488 | header.checksum = GUINT32_SWAP_LE_BE(header.checksum); | |
489 | header.content_size = GUINT32_SWAP_LE_BE(header.content_size); | |
490 | header.packet_size = GUINT32_SWAP_LE_BE(header.packet_size); | |
491 | } | |
492 | if (header.checksum) | |
493 | fprintf(stdout, "[warning] checksum verification not supported yet.\n"); | |
494 | if (header.compression_scheme) { | |
495 | fprintf(stdout, "[error] compression (%u) not supported yet.\n", | |
496 | header.compression_scheme); | |
497 | return -EINVAL; | |
498 | } | |
499 | if (header.encryption_scheme) { | |
500 | fprintf(stdout, "[error] encryption (%u) not supported yet.\n", | |
501 | header.encryption_scheme); | |
502 | return -EINVAL; | |
503 | } | |
504 | if (header.checksum_scheme) { | |
505 | fprintf(stdout, "[error] checksum (%u) not supported yet.\n", | |
506 | header.checksum_scheme); | |
507 | return -EINVAL; | |
508 | } | |
509 | if (!CTF_TRACE_FIELD_IS_SET(td, uuid)) { | |
510 | memcpy(td->uuid, header.uuid, sizeof(header.uuid)); | |
511 | CTF_TRACE_SET_FIELD(td, uuid); | |
512 | } else { | |
513 | if (uuid_compare(header.uuid, td->uuid)) | |
514 | return -EINVAL; | |
515 | } | |
516 | ||
255b2138 | 517 | toread = (header.content_size / CHAR_BIT) - header_sizeof(header); |
a0fe7d97 MD |
518 | |
519 | for (;;) { | |
f8254867 | 520 | readlen = fread(buf, sizeof(char), min(sizeof(buf) - 1, toread), in); |
b4c19c1e MD |
521 | if (ferror(in)) { |
522 | ret = -EINVAL; | |
523 | break; | |
524 | } | |
4152822b | 525 | if (babeltrace_debug) { |
f8254867 | 526 | buf[readlen] = '\0'; |
4152822b MD |
527 | fprintf(stdout, "[debug] metadata packet read: %s\n", |
528 | buf); | |
529 | } | |
530 | ||
b4c19c1e MD |
531 | writelen = fwrite(buf, sizeof(char), readlen, out); |
532 | if (writelen < readlen) { | |
533 | ret = -EIO; | |
534 | break; | |
535 | } | |
536 | if (ferror(out)) { | |
537 | ret = -EINVAL; | |
538 | break; | |
539 | } | |
a0fe7d97 MD |
540 | toread -= readlen; |
541 | if (!toread) { | |
7f4b5c4d | 542 | ret = 0; /* continue reading next packet */ |
a0fe7d97 MD |
543 | break; |
544 | } | |
b4c19c1e MD |
545 | } |
546 | return ret; | |
547 | } | |
548 | ||
549 | static | |
550 | int ctf_open_trace_metadata_stream_read(struct ctf_trace *td, FILE **fp, | |
551 | char **buf) | |
552 | { | |
553 | FILE *in, *out; | |
554 | size_t size; | |
555 | int ret; | |
556 | ||
557 | in = *fp; | |
c4f5487e MD |
558 | /* |
559 | * Using strlen on *buf instead of size of open_memstream | |
560 | * because its size includes garbage at the end (after final | |
561 | * \0). This is the allocated size, not the actual string size. | |
562 | */ | |
b4c19c1e MD |
563 | out = open_memstream(buf, &size); |
564 | if (out == NULL) | |
565 | return -errno; | |
566 | ||
567 | for (;;) { | |
568 | ret = ctf_open_trace_metadata_packet_read(td, in, out); | |
7f4b5c4d | 569 | if (ret) { |
b4c19c1e | 570 | break; |
7f4b5c4d MD |
571 | } |
572 | if (feof(in)) { | |
573 | ret = 0; | |
b4c19c1e MD |
574 | break; |
575 | } | |
576 | } | |
577 | fclose(out); /* flush the buffer */ | |
578 | fclose(in); | |
579 | /* open for reading */ | |
c4f5487e | 580 | *fp = fmemopen(*buf, strlen(*buf), "rb"); |
b4c19c1e MD |
581 | return 0; |
582 | } | |
583 | ||
65102a8c | 584 | static |
46322b33 | 585 | int ctf_open_trace_metadata_read(struct ctf_trace *td) |
65102a8c MD |
586 | { |
587 | struct ctf_scanner *scanner; | |
2d0bea29 | 588 | struct ctf_file_stream *metadata_stream; |
65102a8c | 589 | FILE *fp; |
b4c19c1e | 590 | char *buf = NULL; |
65102a8c MD |
591 | int ret = 0; |
592 | ||
2d0bea29 MD |
593 | metadata_stream = g_new0(struct ctf_file_stream, 1); |
594 | td->metadata = &metadata_stream->parent; | |
595 | metadata_stream->pos.fd = openat(td->dirfd, "metadata", O_RDONLY); | |
596 | if (metadata_stream->pos.fd < 0) { | |
65102a8c | 597 | fprintf(stdout, "Unable to open metadata.\n"); |
2d0bea29 | 598 | return metadata_stream->pos.fd; |
65102a8c MD |
599 | } |
600 | ||
601 | if (babeltrace_debug) | |
602 | yydebug = 1; | |
603 | ||
2d0bea29 | 604 | fp = fdopen(metadata_stream->pos.fd, "r"); |
65102a8c | 605 | if (!fp) { |
46322b33 | 606 | fprintf(stdout, "[error] Unable to open metadata stream.\n"); |
65102a8c MD |
607 | ret = -errno; |
608 | goto end_stream; | |
609 | } | |
610 | ||
b4c19c1e MD |
611 | if (packet_metadata(td, fp)) { |
612 | ret = ctf_open_trace_metadata_stream_read(td, &fp, &buf); | |
613 | if (ret) | |
614 | goto end_packet_read; | |
da75b0f7 | 615 | } else { |
8c2df3f5 MD |
616 | char buf[sizeof("/* TSDL")]; /* Includes \0 */ |
617 | ssize_t readlen; | |
618 | ||
da75b0f7 | 619 | td->byte_order = BYTE_ORDER; |
8c2df3f5 MD |
620 | |
621 | /* Check text-only metadata header */ | |
622 | buf[sizeof("/* TSDL") - 1] = '\0'; | |
623 | readlen = fread(buf, sizeof("/* TSDL") - 1, 1, fp); | |
624 | if (readlen < 1 || strcmp(buf, "/* TSDL") != 0) | |
625 | fprintf(stdout, "[warning] Missing \"/* TSDL\" header for text-only metadata.\n"); | |
626 | rewind(fp); | |
b4c19c1e MD |
627 | } |
628 | ||
65102a8c MD |
629 | scanner = ctf_scanner_alloc(fp); |
630 | if (!scanner) { | |
46322b33 | 631 | fprintf(stdout, "[error] Error allocating scanner\n"); |
65102a8c MD |
632 | ret = -ENOMEM; |
633 | goto end_scanner_alloc; | |
634 | } | |
635 | ret = ctf_scanner_append_ast(scanner); | |
636 | if (ret) { | |
46322b33 | 637 | fprintf(stdout, "[error] Error creating AST\n"); |
65102a8c MD |
638 | goto end; |
639 | } | |
640 | ||
641 | if (babeltrace_debug) { | |
642 | ret = ctf_visitor_print_xml(stdout, 0, &scanner->ast->root); | |
643 | if (ret) { | |
46322b33 | 644 | fprintf(stdout, "[error] Error visiting AST for XML output\n"); |
65102a8c MD |
645 | goto end; |
646 | } | |
647 | } | |
648 | ||
649 | ret = ctf_visitor_semantic_check(stdout, 0, &scanner->ast->root); | |
650 | if (ret) { | |
46322b33 | 651 | fprintf(stdout, "[error] Error in CTF semantic validation %d\n", ret); |
65102a8c MD |
652 | goto end; |
653 | } | |
654 | ret = ctf_visitor_construct_metadata(stdout, 0, &scanner->ast->root, | |
ac5c6ca0 | 655 | td, td->byte_order); |
65102a8c | 656 | if (ret) { |
46322b33 | 657 | fprintf(stdout, "[error] Error in CTF metadata constructor %d\n", ret); |
65102a8c MD |
658 | goto end; |
659 | } | |
660 | end: | |
661 | ctf_scanner_free(scanner); | |
662 | end_scanner_alloc: | |
b4c19c1e | 663 | end_packet_read: |
65102a8c | 664 | fclose(fp); |
b4c19c1e | 665 | free(buf); |
65102a8c | 666 | end_stream: |
2d0bea29 MD |
667 | close(metadata_stream->pos.fd); |
668 | if (ret) | |
669 | g_free(metadata_stream); | |
0f980a35 MD |
670 | return ret; |
671 | } | |
672 | ||
e28d4618 | 673 | static |
42dc00b7 MD |
674 | struct ctf_stream_event *create_event_definitions(struct ctf_trace *td, |
675 | struct ctf_stream *stream, | |
676 | struct ctf_event *event) | |
e28d4618 | 677 | { |
42dc00b7 | 678 | struct ctf_stream_event *stream_event = g_new0(struct ctf_stream_event, 1); |
e28d4618 MD |
679 | |
680 | if (event->context_decl) { | |
681 | struct definition *definition = | |
682 | event->context_decl->p.definition_new(&event->context_decl->p, | |
683 | stream->parent_def_scope, 0, 0, "event.context"); | |
684 | if (!definition) { | |
685 | goto error; | |
686 | } | |
42dc00b7 | 687 | stream_event->event_context = container_of(definition, |
e28d4618 | 688 | struct definition_struct, p); |
42dc00b7 | 689 | stream->parent_def_scope = stream_event->event_context->p.scope; |
e28d4618 MD |
690 | } |
691 | if (event->fields_decl) { | |
692 | struct definition *definition = | |
693 | event->fields_decl->p.definition_new(&event->fields_decl->p, | |
694 | stream->parent_def_scope, 0, 0, "event.fields"); | |
695 | if (!definition) { | |
696 | goto error; | |
697 | } | |
42dc00b7 | 698 | stream_event->event_fields = container_of(definition, |
e28d4618 | 699 | struct definition_struct, p); |
42dc00b7 | 700 | stream->parent_def_scope = stream_event->event_fields->p.scope; |
e28d4618 | 701 | } |
42dc00b7 | 702 | return stream_event; |
e28d4618 MD |
703 | |
704 | error: | |
42dc00b7 MD |
705 | if (stream_event->event_fields) |
706 | definition_unref(&stream_event->event_fields->p); | |
707 | if (stream_event->event_context) | |
708 | definition_unref(&stream_event->event_context->p); | |
e28d4618 MD |
709 | return NULL; |
710 | } | |
711 | ||
712 | static | |
713 | int create_stream_definitions(struct ctf_trace *td, struct ctf_stream *stream) | |
714 | { | |
715 | struct ctf_stream_class *stream_class; | |
716 | int ret; | |
717 | int i; | |
718 | ||
719 | if (stream->stream_definitions_created) | |
720 | return 0; | |
721 | ||
722 | stream_class = stream->stream_class; | |
723 | ||
724 | if (stream_class->packet_context_decl) { | |
725 | struct definition *definition = | |
726 | stream_class->packet_context_decl->p.definition_new(&stream_class->packet_context_decl->p, | |
727 | stream->parent_def_scope, 0, 0, "stream.packet.context"); | |
728 | if (!definition) { | |
729 | ret = -EINVAL; | |
730 | goto error; | |
731 | } | |
732 | stream->stream_packet_context = container_of(definition, | |
733 | struct definition_struct, p); | |
734 | stream->parent_def_scope = stream->stream_packet_context->p.scope; | |
735 | } | |
736 | if (stream_class->event_header_decl) { | |
737 | struct definition *definition = | |
738 | stream_class->event_header_decl->p.definition_new(&stream_class->event_header_decl->p, | |
739 | stream->parent_def_scope, 0, 0, "stream.event.header"); | |
740 | if (!definition) { | |
741 | ret = -EINVAL; | |
742 | goto error; | |
743 | } | |
744 | stream->stream_event_header = | |
745 | container_of(definition, struct definition_struct, p); | |
746 | stream->parent_def_scope = stream->stream_event_header->p.scope; | |
747 | } | |
748 | if (stream_class->event_context_decl) { | |
749 | struct definition *definition = | |
750 | stream_class->event_context_decl->p.definition_new(&stream_class->event_context_decl->p, | |
751 | stream->parent_def_scope, 0, 0, "stream.event.context"); | |
752 | if (!definition) { | |
753 | ret = -EINVAL; | |
754 | goto error; | |
755 | } | |
756 | stream->stream_event_context = | |
757 | container_of(definition, struct definition_struct, p); | |
758 | stream->parent_def_scope = stream->stream_event_context->p.scope; | |
759 | } | |
760 | stream->events_by_id = g_ptr_array_new(); | |
761 | g_ptr_array_set_size(stream->events_by_id, stream_class->events_by_id->len); | |
762 | for (i = 0; i < stream->events_by_id->len; i++) { | |
763 | struct ctf_event *event = g_ptr_array_index(stream_class->events_by_id, i); | |
42dc00b7 | 764 | struct ctf_stream_event *stream_event; |
e28d4618 MD |
765 | |
766 | if (!event) | |
767 | continue; | |
42dc00b7 MD |
768 | stream_event = create_event_definitions(td, stream, event); |
769 | if (!stream_event) | |
e28d4618 | 770 | goto error_event; |
42dc00b7 | 771 | g_ptr_array_index(stream->events_by_id, i) = stream_event; |
e28d4618 MD |
772 | } |
773 | return 0; | |
774 | ||
775 | error_event: | |
776 | for (i = 0; i < stream->events_by_id->len; i++) { | |
42dc00b7 MD |
777 | struct ctf_stream_event *stream_event = g_ptr_array_index(stream->events_by_id, i); |
778 | if (stream_event) | |
779 | g_free(stream_event); | |
e28d4618 MD |
780 | } |
781 | g_ptr_array_free(stream->events_by_id, TRUE); | |
782 | error: | |
783 | if (stream->stream_event_context) | |
784 | definition_unref(&stream->stream_event_context->p); | |
785 | if (stream->stream_event_header) | |
786 | definition_unref(&stream->stream_event_header->p); | |
787 | if (stream->stream_packet_context) | |
788 | definition_unref(&stream->stream_packet_context->p); | |
789 | return ret; | |
790 | } | |
791 | ||
0f980a35 MD |
792 | |
793 | static | |
46322b33 | 794 | int create_stream_packet_index(struct ctf_trace *td, |
0f980a35 MD |
795 | struct ctf_file_stream *file_stream) |
796 | { | |
aa6bffae | 797 | struct ctf_stream_class *stream; |
0f980a35 | 798 | int len_index; |
46322b33 | 799 | struct ctf_stream_pos *pos; |
0f980a35 MD |
800 | struct stat filestats; |
801 | struct packet_index packet_index; | |
802 | int first_packet = 1; | |
803 | int ret; | |
804 | ||
805 | pos = &file_stream->pos; | |
806 | ||
807 | ret = fstat(pos->fd, &filestats); | |
808 | if (ret < 0) | |
809 | return ret; | |
810 | ||
8895362d MD |
811 | if (filestats.st_size < MAX_PACKET_HEADER_LEN / CHAR_BIT) |
812 | return -EINVAL; | |
813 | ||
0f980a35 MD |
814 | for (pos->mmap_offset = 0; pos->mmap_offset < filestats.st_size; ) { |
815 | uint64_t stream_id = 0; | |
816 | ||
817 | if (pos->base) { | |
818 | /* unmap old base */ | |
8c572eba | 819 | ret = munmap(pos->base, pos->packet_size / CHAR_BIT); |
0f980a35 | 820 | if (ret) { |
46322b33 | 821 | fprintf(stdout, "[error] Unable to unmap old base: %s.\n", |
0f980a35 MD |
822 | strerror(errno)); |
823 | return ret; | |
824 | } | |
8c572eba | 825 | pos->base = NULL; |
0f980a35 MD |
826 | } |
827 | /* map new base. Need mapping length from header. */ | |
8c572eba | 828 | pos->base = mmap(NULL, MAX_PACKET_HEADER_LEN / CHAR_BIT, PROT_READ, |
0f980a35 | 829 | MAP_PRIVATE, pos->fd, pos->mmap_offset); |
dc48ecad MD |
830 | pos->content_size = MAX_PACKET_HEADER_LEN; /* Unknown at this point */ |
831 | pos->packet_size = MAX_PACKET_HEADER_LEN; /* Unknown at this point */ | |
0f980a35 MD |
832 | pos->offset = 0; /* Position of the packet header */ |
833 | ||
8c572eba MD |
834 | packet_index.offset = pos->mmap_offset; |
835 | packet_index.content_size = 0; | |
836 | packet_index.packet_size = 0; | |
75cc2c35 MD |
837 | packet_index.timestamp_begin = 0; |
838 | packet_index.timestamp_end = 0; | |
8c572eba | 839 | |
0f980a35 | 840 | /* read and check header, set stream id (and check) */ |
2d0bea29 | 841 | if (file_stream->parent.trace_packet_header) { |
0f980a35 | 842 | /* Read packet header */ |
2d0bea29 | 843 | ret = generic_rw(&pos->parent, &file_stream->parent.trace_packet_header->p); |
c5e74408 MD |
844 | if (ret) |
845 | return ret; | |
2d0bea29 | 846 | len_index = struct_declaration_lookup_field_index(file_stream->parent.trace_packet_header->declaration, g_quark_from_static_string("magic")); |
0f980a35 MD |
847 | if (len_index >= 0) { |
848 | struct definition_integer *defint; | |
b1a2f580 | 849 | struct definition *field; |
0f980a35 | 850 | |
2d0bea29 | 851 | field = struct_definition_get_field_from_index(file_stream->parent.trace_packet_header, len_index); |
b1a2f580 MD |
852 | assert(field->declaration->id == CTF_TYPE_INTEGER); |
853 | defint = container_of(field, struct definition_integer, p); | |
0f980a35 MD |
854 | assert(defint->declaration->signedness == FALSE); |
855 | if (defint->value._unsigned != CTF_MAGIC) { | |
d8ea2d29 | 856 | fprintf(stdout, "[error] Invalid magic number 0x%" PRIX64 " at packet %u (file offset %zd).\n", |
8c572eba MD |
857 | defint->value._unsigned, |
858 | file_stream->pos.packet_index->len, | |
859 | (ssize_t) pos->mmap_offset); | |
0f980a35 MD |
860 | return -EINVAL; |
861 | } | |
862 | } | |
863 | ||
864 | /* check uuid */ | |
2d0bea29 | 865 | len_index = struct_declaration_lookup_field_index(file_stream->parent.trace_packet_header->declaration, g_quark_from_static_string("uuid")); |
0f980a35 MD |
866 | if (len_index >= 0) { |
867 | struct definition_array *defarray; | |
b1a2f580 | 868 | struct definition *field; |
0f980a35 MD |
869 | uint64_t i; |
870 | uint8_t uuidval[UUID_LEN]; | |
871 | ||
2d0bea29 | 872 | field = struct_definition_get_field_from_index(file_stream->parent.trace_packet_header, len_index); |
b1a2f580 MD |
873 | assert(field->declaration->id == CTF_TYPE_ARRAY); |
874 | defarray = container_of(field, struct definition_array, p); | |
3838df27 | 875 | assert(array_len(defarray) == UUID_LEN); |
0f980a35 MD |
876 | assert(defarray->declaration->elem->id == CTF_TYPE_INTEGER); |
877 | ||
878 | for (i = 0; i < UUID_LEN; i++) { | |
879 | struct definition *elem; | |
880 | struct definition_integer *defint; | |
881 | ||
882 | elem = array_index(defarray, i); | |
883 | assert(elem); | |
884 | defint = container_of(elem, struct definition_integer, p); | |
885 | uuidval[i] = defint->value._unsigned; | |
886 | } | |
46322b33 | 887 | ret = uuid_compare(td->uuid, uuidval); |
0f980a35 MD |
888 | if (ret) { |
889 | fprintf(stdout, "[error] Unique Universal Identifiers do not match.\n"); | |
890 | return -EINVAL; | |
891 | } | |
892 | } | |
893 | ||
894 | ||
2d0bea29 | 895 | len_index = struct_declaration_lookup_field_index(file_stream->parent.trace_packet_header->declaration, g_quark_from_static_string("stream_id")); |
0f980a35 MD |
896 | if (len_index >= 0) { |
897 | struct definition_integer *defint; | |
b1a2f580 | 898 | struct definition *field; |
0f980a35 | 899 | |
2d0bea29 | 900 | field = struct_definition_get_field_from_index(file_stream->parent.trace_packet_header, len_index); |
b1a2f580 MD |
901 | assert(field->declaration->id == CTF_TYPE_INTEGER); |
902 | defint = container_of(field, struct definition_integer, p); | |
0f980a35 MD |
903 | assert(defint->declaration->signedness == FALSE); |
904 | stream_id = defint->value._unsigned; | |
905 | } | |
906 | } | |
907 | ||
2d0bea29 | 908 | if (!first_packet && file_stream->parent.stream_id != stream_id) { |
0f980a35 MD |
909 | fprintf(stdout, "[error] Stream ID is changing within a stream.\n"); |
910 | return -EINVAL; | |
911 | } | |
912 | if (first_packet) { | |
2d0bea29 | 913 | file_stream->parent.stream_id = stream_id; |
46322b33 | 914 | if (stream_id >= td->streams->len) { |
0f980a35 MD |
915 | fprintf(stdout, "[error] Stream %" PRIu64 " is not declared in metadata.\n", stream_id); |
916 | return -EINVAL; | |
917 | } | |
46322b33 | 918 | stream = g_ptr_array_index(td->streams, stream_id); |
0f980a35 MD |
919 | if (!stream) { |
920 | fprintf(stdout, "[error] Stream %" PRIu64 " is not declared in metadata.\n", stream_id); | |
921 | return -EINVAL; | |
922 | } | |
2d0bea29 | 923 | file_stream->parent.stream_class = stream; |
01c76b24 | 924 | ret = create_stream_definitions(td, &file_stream->parent); |
862434ec MD |
925 | if (ret) |
926 | return ret; | |
0f980a35 MD |
927 | } |
928 | first_packet = 0; | |
929 | ||
2d0bea29 | 930 | if (file_stream->parent.stream_packet_context) { |
dc48ecad | 931 | /* Read packet context */ |
2d0bea29 | 932 | ret = generic_rw(&pos->parent, &file_stream->parent.stream_packet_context->p); |
c5e74408 MD |
933 | if (ret) |
934 | return ret; | |
dc48ecad | 935 | /* read content size from header */ |
2d0bea29 | 936 | len_index = struct_declaration_lookup_field_index(file_stream->parent.stream_packet_context->declaration, g_quark_from_static_string("content_size")); |
dc48ecad MD |
937 | if (len_index >= 0) { |
938 | struct definition_integer *defint; | |
b1a2f580 | 939 | struct definition *field; |
dc48ecad | 940 | |
2d0bea29 | 941 | field = struct_definition_get_field_from_index(file_stream->parent.stream_packet_context, len_index); |
b1a2f580 MD |
942 | assert(field->declaration->id == CTF_TYPE_INTEGER); |
943 | defint = container_of(field, struct definition_integer, p); | |
dc48ecad | 944 | assert(defint->declaration->signedness == FALSE); |
8c572eba | 945 | packet_index.content_size = defint->value._unsigned; |
dc48ecad MD |
946 | } else { |
947 | /* Use file size for packet size */ | |
8c572eba | 948 | packet_index.content_size = filestats.st_size * CHAR_BIT; |
dc48ecad MD |
949 | } |
950 | ||
951 | /* read packet size from header */ | |
2d0bea29 | 952 | len_index = struct_declaration_lookup_field_index(file_stream->parent.stream_packet_context->declaration, g_quark_from_static_string("packet_size")); |
dc48ecad MD |
953 | if (len_index >= 0) { |
954 | struct definition_integer *defint; | |
b1a2f580 | 955 | struct definition *field; |
dc48ecad | 956 | |
2d0bea29 | 957 | field = struct_definition_get_field_from_index(file_stream->parent.stream_packet_context, len_index); |
b1a2f580 MD |
958 | assert(field->declaration->id == CTF_TYPE_INTEGER); |
959 | defint = container_of(field, struct definition_integer, p); | |
dc48ecad | 960 | assert(defint->declaration->signedness == FALSE); |
8c572eba | 961 | packet_index.packet_size = defint->value._unsigned; |
dc48ecad MD |
962 | } else { |
963 | /* Use content size if non-zero, else file size */ | |
8c572eba | 964 | packet_index.packet_size = packet_index.content_size ? : filestats.st_size * CHAR_BIT; |
dc48ecad | 965 | } |
75cc2c35 MD |
966 | |
967 | /* read timestamp begin from header */ | |
2d0bea29 | 968 | len_index = struct_declaration_lookup_field_index(file_stream->parent.stream_packet_context->declaration, g_quark_from_static_string("timestamp_begin")); |
75cc2c35 MD |
969 | if (len_index >= 0) { |
970 | struct definition_integer *defint; | |
971 | struct definition *field; | |
972 | ||
2d0bea29 | 973 | field = struct_definition_get_field_from_index(file_stream->parent.stream_packet_context, len_index); |
75cc2c35 MD |
974 | assert(field->declaration->id == CTF_TYPE_INTEGER); |
975 | defint = container_of(field, struct definition_integer, p); | |
976 | assert(defint->declaration->signedness == FALSE); | |
977 | packet_index.timestamp_begin = defint->value._unsigned; | |
978 | } | |
979 | ||
980 | /* read timestamp end from header */ | |
2d0bea29 | 981 | len_index = struct_declaration_lookup_field_index(file_stream->parent.stream_packet_context->declaration, g_quark_from_static_string("timestamp_end")); |
75cc2c35 MD |
982 | if (len_index >= 0) { |
983 | struct definition_integer *defint; | |
984 | struct definition *field; | |
985 | ||
2d0bea29 | 986 | field = struct_definition_get_field_from_index(file_stream->parent.stream_packet_context, len_index); |
75cc2c35 MD |
987 | assert(field->declaration->id == CTF_TYPE_INTEGER); |
988 | defint = container_of(field, struct definition_integer, p); | |
989 | assert(defint->declaration->signedness == FALSE); | |
990 | packet_index.timestamp_end = defint->value._unsigned; | |
991 | } | |
0f980a35 MD |
992 | } else { |
993 | /* Use file size for packet size */ | |
8c572eba | 994 | packet_index.content_size = filestats.st_size * CHAR_BIT; |
0f980a35 | 995 | /* Use content size if non-zero, else file size */ |
8c572eba | 996 | packet_index.packet_size = packet_index.content_size ? : filestats.st_size * CHAR_BIT; |
0f980a35 | 997 | } |
546293fa MD |
998 | |
999 | /* Validate content size and packet size values */ | |
1000 | if (packet_index.content_size > packet_index.packet_size) { | |
1001 | fprintf(stdout, "[error] Content size (%zu bits) is larger than packet size (%zu bits).\n", | |
1002 | packet_index.content_size, packet_index.packet_size); | |
1003 | return -EINVAL; | |
1004 | } | |
1005 | ||
58b0b883 MD |
1006 | if (packet_index.packet_size > (filestats.st_size - packet_index.offset) * CHAR_BIT) { |
1007 | fprintf(stdout, "[error] Packet size (%zu bits) is larger than remaining file size (%zu bits).\n", | |
5aebb2ee | 1008 | packet_index.content_size, (size_t) (filestats.st_size - packet_index.offset) * CHAR_BIT); |
546293fa MD |
1009 | return -EINVAL; |
1010 | } | |
1011 | ||
847bf71a MD |
1012 | /* Save position after header and context */ |
1013 | packet_index.data_offset = pos->offset; | |
0f980a35 | 1014 | |
0f980a35 MD |
1015 | /* add index to packet array */ |
1016 | g_array_append_val(file_stream->pos.packet_index, packet_index); | |
1017 | ||
8c572eba | 1018 | pos->mmap_offset += packet_index.packet_size / CHAR_BIT; |
0f980a35 MD |
1019 | } |
1020 | ||
847bf71a MD |
1021 | /* Move pos back to beginning of file */ |
1022 | ctf_move_pos_slow(pos, 0, SEEK_SET); /* position for write */ | |
1023 | ||
0f980a35 MD |
1024 | return 0; |
1025 | } | |
1026 | ||
e28d4618 MD |
1027 | static |
1028 | int create_trace_definitions(struct ctf_trace *td, struct ctf_stream *stream) | |
1029 | { | |
1030 | int ret; | |
1031 | ||
1032 | if (td->packet_header_decl) { | |
1033 | struct definition *definition = | |
1034 | td->packet_header_decl->p.definition_new(&td->packet_header_decl->p, | |
1035 | stream->parent_def_scope, 0, 0, "trace.packet.header"); | |
1036 | if (!definition) { | |
1037 | ret = -EINVAL; | |
1038 | goto error; | |
1039 | } | |
1040 | stream->trace_packet_header = | |
1041 | container_of(definition, struct definition_struct, p); | |
1042 | stream->parent_def_scope = stream->trace_packet_header->p.scope; | |
1043 | } | |
1044 | ||
1045 | return 0; | |
1046 | ||
1047 | error: | |
1048 | return ret; | |
1049 | } | |
1050 | ||
0f980a35 MD |
1051 | /* |
1052 | * Note: many file streams can inherit from the same stream class | |
1053 | * description (metadata). | |
1054 | */ | |
1055 | static | |
46322b33 | 1056 | int ctf_open_file_stream_read(struct ctf_trace *td, const char *path, int flags) |
0f980a35 MD |
1057 | { |
1058 | int ret; | |
1059 | struct ctf_file_stream *file_stream; | |
1060 | ||
46322b33 | 1061 | ret = openat(td->dirfd, path, flags); |
0f980a35 MD |
1062 | if (ret < 0) |
1063 | goto error; | |
1064 | file_stream = g_new0(struct ctf_file_stream, 1); | |
8563e754 | 1065 | ctf_init_pos(&file_stream->pos, ret, flags); |
2d0bea29 | 1066 | ret = create_trace_definitions(td, &file_stream->parent); |
e28d4618 MD |
1067 | if (ret) |
1068 | goto error_def; | |
0f980a35 MD |
1069 | ret = create_stream_packet_index(td, file_stream); |
1070 | if (ret) | |
1071 | goto error_index; | |
1072 | /* Add stream file to stream class */ | |
2d0bea29 MD |
1073 | g_ptr_array_add(file_stream->parent.stream_class->streams, |
1074 | &file_stream->parent); | |
0f980a35 MD |
1075 | return 0; |
1076 | ||
1077 | error_index: | |
2d0bea29 MD |
1078 | if (file_stream->parent.trace_packet_header) |
1079 | definition_unref(&file_stream->parent.trace_packet_header->p); | |
e28d4618 | 1080 | error_def: |
46322b33 | 1081 | ctf_fini_pos(&file_stream->pos); |
0f980a35 MD |
1082 | close(file_stream->pos.fd); |
1083 | g_free(file_stream); | |
1084 | error: | |
65102a8c MD |
1085 | return ret; |
1086 | } | |
1087 | ||
bbefb8dd | 1088 | static |
46322b33 | 1089 | int ctf_open_trace_read(struct ctf_trace *td, const char *path, int flags) |
bbefb8dd MD |
1090 | { |
1091 | int ret; | |
65102a8c MD |
1092 | struct dirent *dirent; |
1093 | struct dirent *diriter; | |
1094 | size_t dirent_len; | |
bbefb8dd | 1095 | |
46322b33 | 1096 | td->flags = flags; |
bbefb8dd MD |
1097 | |
1098 | /* Open trace directory */ | |
46322b33 MD |
1099 | td->dir = opendir(path); |
1100 | if (!td->dir) { | |
dc48ecad | 1101 | fprintf(stdout, "[error] Unable to open trace directory.\n"); |
bbefb8dd MD |
1102 | ret = -ENOENT; |
1103 | goto error; | |
1104 | } | |
1105 | ||
46322b33 MD |
1106 | td->dirfd = open(path, 0); |
1107 | if (td->dirfd < 0) { | |
dc48ecad | 1108 | fprintf(stdout, "[error] Unable to open trace directory file descriptor.\n"); |
65102a8c MD |
1109 | ret = -ENOENT; |
1110 | goto error_dirfd; | |
1111 | } | |
0f980a35 | 1112 | |
65102a8c MD |
1113 | /* |
1114 | * Keep the metadata file separate. | |
1115 | */ | |
bbefb8dd | 1116 | |
65102a8c MD |
1117 | ret = ctf_open_trace_metadata_read(td); |
1118 | if (ret) { | |
1119 | goto error_metadata; | |
1120 | } | |
bbefb8dd MD |
1121 | |
1122 | /* | |
1123 | * Open each stream: for each file, try to open, check magic | |
1124 | * number, and get the stream ID to add to the right location in | |
1125 | * the stream array. | |
bbefb8dd MD |
1126 | */ |
1127 | ||
65102a8c | 1128 | dirent_len = offsetof(struct dirent, d_name) + |
46322b33 | 1129 | fpathconf(td->dirfd, _PC_NAME_MAX) + 1; |
bbefb8dd | 1130 | |
65102a8c | 1131 | dirent = malloc(dirent_len); |
bbefb8dd | 1132 | |
65102a8c | 1133 | for (;;) { |
46322b33 | 1134 | ret = readdir_r(td->dir, dirent, &diriter); |
65102a8c | 1135 | if (ret) { |
dc48ecad | 1136 | fprintf(stdout, "[error] Readdir error.\n"); |
65102a8c | 1137 | goto readdir_error; |
65102a8c MD |
1138 | } |
1139 | if (!diriter) | |
1140 | break; | |
d8ea2d29 MD |
1141 | /* Ignore hidden files, ., .. and metadata. */ |
1142 | if (!strncmp(diriter->d_name, ".", 1) | |
65102a8c MD |
1143 | || !strcmp(diriter->d_name, "..") |
1144 | || !strcmp(diriter->d_name, "metadata")) | |
1145 | continue; | |
dc48ecad MD |
1146 | ret = ctf_open_file_stream_read(td, diriter->d_name, flags); |
1147 | if (ret) { | |
1148 | fprintf(stdout, "[error] Open file stream error.\n"); | |
1149 | goto readdir_error; | |
1150 | } | |
65102a8c | 1151 | } |
bbefb8dd | 1152 | |
65102a8c | 1153 | free(dirent); |
bbefb8dd | 1154 | return 0; |
65102a8c MD |
1155 | |
1156 | readdir_error: | |
1157 | free(dirent); | |
1158 | error_metadata: | |
46322b33 | 1159 | close(td->dirfd); |
65102a8c | 1160 | error_dirfd: |
46322b33 | 1161 | closedir(td->dir); |
bbefb8dd MD |
1162 | error: |
1163 | return ret; | |
1164 | } | |
1165 | ||
e9378815 | 1166 | static |
bbefb8dd MD |
1167 | struct trace_descriptor *ctf_open_trace(const char *path, int flags) |
1168 | { | |
46322b33 | 1169 | struct ctf_trace *td; |
bbefb8dd MD |
1170 | int ret; |
1171 | ||
46322b33 | 1172 | td = g_new0(struct ctf_trace, 1); |
bbefb8dd | 1173 | |
8c572eba | 1174 | switch (flags & O_ACCMODE) { |
bbefb8dd | 1175 | case O_RDONLY: |
b61922b5 MD |
1176 | if (!path) { |
1177 | fprintf(stdout, "[error] Path missing for input CTF trace.\n"); | |
1178 | goto error; | |
1179 | } | |
bbefb8dd MD |
1180 | ret = ctf_open_trace_read(td, path, flags); |
1181 | if (ret) | |
1182 | goto error; | |
1183 | break; | |
989c73bc | 1184 | case O_RDWR: |
46322b33 MD |
1185 | fprintf(stdout, "[error] Opening CTF traces for output is not supported yet.\n"); |
1186 | goto error; | |
bbefb8dd | 1187 | default: |
46322b33 | 1188 | fprintf(stdout, "[error] Incorrect open flags.\n"); |
bbefb8dd MD |
1189 | goto error; |
1190 | } | |
1191 | ||
46322b33 | 1192 | return &td->parent; |
bbefb8dd MD |
1193 | error: |
1194 | g_free(td); | |
1195 | return NULL; | |
1196 | } | |
1197 | ||
0f980a35 MD |
1198 | static |
1199 | void ctf_close_file_stream(struct ctf_file_stream *file_stream) | |
1200 | { | |
46322b33 | 1201 | ctf_fini_pos(&file_stream->pos); |
0f980a35 MD |
1202 | close(file_stream->pos.fd); |
1203 | } | |
1204 | ||
e9378815 | 1205 | static |
46322b33 | 1206 | void ctf_close_trace(struct trace_descriptor *tdp) |
bbefb8dd | 1207 | { |
46322b33 | 1208 | struct ctf_trace *td = container_of(tdp, struct ctf_trace, parent); |
0f980a35 MD |
1209 | int i; |
1210 | ||
46322b33 MD |
1211 | if (td->streams) { |
1212 | for (i = 0; i < td->streams->len; i++) { | |
aa6bffae | 1213 | struct ctf_stream_class *stream; |
0f980a35 | 1214 | int j; |
e9378815 | 1215 | |
46322b33 | 1216 | stream = g_ptr_array_index(td->streams, i); |
e9378815 MD |
1217 | if (!stream) |
1218 | continue; | |
2d0bea29 | 1219 | for (j = 0; j < stream->streams->len; j++) { |
0f980a35 | 1220 | struct ctf_file_stream *file_stream; |
2d0bea29 | 1221 | file_stream = container_of(g_ptr_array_index(stream->streams, j), struct ctf_file_stream, parent); |
0f980a35 MD |
1222 | ctf_close_file_stream(file_stream); |
1223 | } | |
1224 | ||
1225 | } | |
46322b33 | 1226 | g_ptr_array_free(td->streams, TRUE); |
0f980a35 | 1227 | } |
46322b33 | 1228 | closedir(td->dir); |
bbefb8dd MD |
1229 | g_free(td); |
1230 | } | |
1231 | ||
7fb21036 | 1232 | void __attribute__((constructor)) ctf_init(void) |
fc93b2bd MD |
1233 | { |
1234 | int ret; | |
1235 | ||
4c8bfb7e | 1236 | ctf_format.name = g_quark_from_static_string("ctf"); |
fc93b2bd MD |
1237 | ret = bt_register_format(&ctf_format); |
1238 | assert(!ret); | |
1239 | } | |
698f0fe4 MD |
1240 | |
1241 | /* TODO: finalize */ |