Commit | Line | Data |
---|---|---|
273b65be JG |
1 | /* |
2 | * stream.c | |
3 | * | |
d2dc44b6 | 4 | * Babeltrace CTF IR - Stream |
273b65be | 5 | * |
de9dd397 | 6 | * Copyright 2013, 2014 Jérémie Galarneau <jeremie.galarneau@efficios.com> |
273b65be JG |
7 | * |
8 | * Author: Jérémie Galarneau <jeremie.galarneau@efficios.com> | |
9 | * | |
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: | |
16 | * | |
17 | * The above copyright notice and this permission notice shall be included in | |
18 | * all copies or substantial portions of the Software. | |
19 | * | |
20 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |
21 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |
22 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE | |
23 | * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER | |
24 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, | |
25 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE | |
26 | * SOFTWARE. | |
27 | */ | |
28 | ||
19abc2c6 PP |
29 | #define BT_LOG_TAG "STREAM" |
30 | #include <babeltrace/lib-logging-internal.h> | |
31 | ||
ac0c6bdd PP |
32 | #include <babeltrace/ctf-ir/clock-class.h> |
33 | #include <babeltrace/ctf-writer/clock.h> | |
34 | #include <babeltrace/ctf-writer/clock-internal.h> | |
273b65be | 35 | #include <babeltrace/ctf-writer/event.h> |
adc315b8 | 36 | #include <babeltrace/ctf-ir/event-internal.h> |
2e33ac5a PP |
37 | #include <babeltrace/ctf-ir/field-types-internal.h> |
38 | #include <babeltrace/ctf-ir/fields-internal.h> | |
3f043b05 JG |
39 | #include <babeltrace/ctf-ir/stream.h> |
40 | #include <babeltrace/ctf-ir/stream-internal.h> | |
adc315b8 | 41 | #include <babeltrace/ctf-ir/stream-class-internal.h> |
5acf2ae6 | 42 | #include <babeltrace/ctf-ir/trace.h> |
319fd969 PP |
43 | #include <babeltrace/ctf-ir/trace-internal.h> |
44 | #include <babeltrace/ctf-writer/writer-internal.h> | |
3230ee6b | 45 | #include <babeltrace/graph/component-internal.h> |
83509119 | 46 | #include <babeltrace/ref.h> |
273b65be | 47 | #include <babeltrace/ctf-writer/functor-internal.h> |
3d9990ac PP |
48 | #include <babeltrace/compiler-internal.h> |
49 | #include <babeltrace/align-internal.h> | |
dc3fffef | 50 | #include <inttypes.h> |
95076212 | 51 | #include <unistd.h> |
273b65be JG |
52 | |
53 | static | |
83509119 | 54 | void bt_ctf_stream_destroy(struct bt_object *obj); |
273b65be | 55 | static |
af9296f3 | 56 | int try_set_structure_field_integer(struct bt_ctf_field *, char *, uint64_t); |
273b65be | 57 | |
ac0c6bdd PP |
58 | static |
59 | int set_integer_field_value(struct bt_ctf_field* field, uint64_t value) | |
60 | { | |
61 | int ret = 0; | |
62 | struct bt_ctf_field_type *field_type = NULL; | |
63 | ||
64 | if (!field) { | |
19abc2c6 | 65 | BT_LOGW_STR("Invalid parameter: field is NULL."); |
ac0c6bdd PP |
66 | ret = -1; |
67 | goto end; | |
68 | } | |
69 | ||
70 | field_type = bt_ctf_field_get_type(field); | |
71 | assert(field_type); | |
72 | ||
73 | if (bt_ctf_field_type_get_type_id(field_type) != | |
1487a16a | 74 | BT_CTF_FIELD_TYPE_ID_INTEGER) { |
ac0c6bdd | 75 | /* Not an integer and the value is unset, error. */ |
19abc2c6 PP |
76 | BT_LOGW("Invalid parameter: field's type is not an integer field type: " |
77 | "field-addr=%p, ft-addr=%p, ft-id=%s", | |
78 | field, field_type, | |
79 | bt_ctf_field_type_id_string(field_type->id)); | |
ac0c6bdd PP |
80 | ret = -1; |
81 | goto end; | |
82 | } | |
83 | ||
84 | if (bt_ctf_field_type_integer_get_signed(field_type)) { | |
85 | ret = bt_ctf_field_signed_integer_set_value(field, (int64_t) value); | |
86 | if (ret) { | |
87 | /* Value is out of range, error. */ | |
19abc2c6 PP |
88 | BT_LOGW("Cannot set signed integer field's value: " |
89 | "addr=%p, value=%" PRId64, | |
90 | field, (int64_t) value); | |
ac0c6bdd PP |
91 | goto end; |
92 | } | |
93 | } else { | |
94 | ret = bt_ctf_field_unsigned_integer_set_value(field, value); | |
95 | if (ret) { | |
96 | /* Value is out of range, error. */ | |
19abc2c6 PP |
97 | BT_LOGW("Cannot set unsigned integer field's value: " |
98 | "addr=%p, value=%" PRIu64, | |
99 | field, value); | |
ac0c6bdd PP |
100 | goto end; |
101 | } | |
102 | } | |
103 | end: | |
104 | bt_put(field_type); | |
105 | return ret; | |
106 | } | |
107 | ||
d246b111 JG |
108 | static |
109 | int set_packet_header_magic(struct bt_ctf_stream *stream) | |
110 | { | |
111 | int ret = 0; | |
d246b111 JG |
112 | struct bt_ctf_field *magic_field = bt_ctf_field_structure_get_field( |
113 | stream->packet_header, "magic"); | |
19abc2c6 PP |
114 | const uint32_t magic_value = 0xc1fc1fc1; |
115 | ||
116 | assert(stream); | |
d246b111 JG |
117 | |
118 | if (!magic_field) { | |
119 | /* No magic field found. Not an error, skip. */ | |
19abc2c6 PP |
120 | BT_LOGV("No field named `magic` in packet header: skipping: " |
121 | "stream-addr=%p, stream-name=\"%s\"", | |
122 | stream, bt_ctf_stream_get_name(stream)); | |
d246b111 JG |
123 | goto end; |
124 | } | |
125 | ||
b3376dd9 PP |
126 | ret = bt_ctf_field_unsigned_integer_set_value(magic_field, |
127 | (uint64_t) magic_value); | |
d246b111 | 128 | |
d246b111 | 129 | if (ret) { |
b3376dd9 PP |
130 | BT_LOGW("Cannot set packet header field's `magic` integer field's value: " |
131 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, | |
19abc2c6 PP |
132 | stream, bt_ctf_stream_get_name(stream), |
133 | magic_field, (uint64_t) magic_value); | |
134 | } else { | |
135 | BT_LOGV("Set packet header field's `magic` field's value: " | |
b3376dd9 | 136 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, |
19abc2c6 PP |
137 | stream, bt_ctf_stream_get_name(stream), |
138 | magic_field, (uint64_t) magic_value); | |
d246b111 JG |
139 | } |
140 | end: | |
83509119 | 141 | bt_put(magic_field); |
d246b111 JG |
142 | return ret; |
143 | } | |
144 | ||
145 | static | |
146 | int set_packet_header_uuid(struct bt_ctf_stream *stream) | |
147 | { | |
19abc2c6 PP |
148 | int ret = 0; |
149 | int64_t i; | |
e6a8e8e4 | 150 | struct bt_ctf_trace *trace = NULL; |
d246b111 JG |
151 | struct bt_ctf_field *uuid_field = bt_ctf_field_structure_get_field( |
152 | stream->packet_header, "uuid"); | |
153 | ||
19abc2c6 PP |
154 | assert(stream); |
155 | ||
d246b111 JG |
156 | if (!uuid_field) { |
157 | /* No uuid field found. Not an error, skip. */ | |
19abc2c6 PP |
158 | BT_LOGV("No field named `uuid` in packet header: skipping: " |
159 | "stream-addr=%p, stream-name=\"%s\"", | |
160 | stream, bt_ctf_stream_get_name(stream)); | |
d246b111 JG |
161 | goto end; |
162 | } | |
163 | ||
e6a8e8e4 | 164 | trace = (struct bt_ctf_trace *) bt_object_get_parent(stream); |
d246b111 JG |
165 | for (i = 0; i < 16; i++) { |
166 | struct bt_ctf_field *uuid_element = | |
167 | bt_ctf_field_array_get_field(uuid_field, i); | |
168 | ||
b3376dd9 PP |
169 | ret = bt_ctf_field_unsigned_integer_set_value( |
170 | uuid_element, (uint64_t) trace->uuid[i]); | |
83509119 | 171 | bt_put(uuid_element); |
d246b111 | 172 | if (ret) { |
19abc2c6 PP |
173 | BT_LOGW("Cannot set integer field's value (for `uuid` packet header field): " |
174 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, " | |
b3376dd9 | 175 | "value=%" PRIu64 ", index=%" PRId64, |
19abc2c6 PP |
176 | stream, bt_ctf_stream_get_name(stream), |
177 | uuid_element, (uint64_t) trace->uuid[i], i); | |
d246b111 JG |
178 | goto end; |
179 | } | |
180 | } | |
181 | ||
19abc2c6 PP |
182 | BT_LOGV("Set packet header field's `uuid` field's value: " |
183 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p", | |
184 | stream, bt_ctf_stream_get_name(stream), uuid_field); | |
185 | ||
d246b111 | 186 | end: |
83509119 | 187 | bt_put(uuid_field); |
e6a8e8e4 | 188 | BT_PUT(trace); |
d246b111 JG |
189 | return ret; |
190 | } | |
191 | static | |
192 | int set_packet_header_stream_id(struct bt_ctf_stream *stream) | |
193 | { | |
194 | int ret = 0; | |
195 | uint32_t stream_id; | |
d246b111 JG |
196 | struct bt_ctf_field *stream_id_field = bt_ctf_field_structure_get_field( |
197 | stream->packet_header, "stream_id"); | |
198 | ||
199 | if (!stream_id_field) { | |
200 | /* No stream_id field found. Not an error, skip. */ | |
19abc2c6 PP |
201 | BT_LOGV("No field named `stream_id` in packet header: skipping: " |
202 | "stream-addr=%p, stream-name=\"%s\"", | |
203 | stream, bt_ctf_stream_get_name(stream)); | |
d246b111 JG |
204 | goto end; |
205 | } | |
206 | ||
b3376dd9 PP |
207 | stream_id = stream->stream_class->id; |
208 | ret = bt_ctf_field_unsigned_integer_set_value(stream_id_field, | |
209 | (uint64_t) stream_id); | |
210 | if (ret) { | |
211 | BT_LOGW("Cannot set packet header field's `stream_id` integer field's value: " | |
212 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, | |
213 | stream, bt_ctf_stream_get_name(stream), | |
214 | stream_id_field, (uint64_t) stream_id); | |
215 | } else { | |
216 | BT_LOGV("Set packet header field's `stream_id` field's value: " | |
217 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, | |
218 | stream, bt_ctf_stream_get_name(stream), | |
219 | stream_id_field, (uint64_t) stream_id); | |
220 | } | |
221 | ||
222 | end: | |
223 | bt_put(stream_id_field); | |
224 | return ret; | |
225 | } | |
226 | ||
227 | static | |
228 | int auto_populate_packet_header(struct bt_ctf_stream *stream) | |
229 | { | |
230 | int ret = 0; | |
231 | ||
232 | if (!stream->packet_header) { | |
233 | goto end; | |
234 | } | |
235 | ||
236 | ret = set_packet_header_magic(stream); | |
237 | if (ret) { | |
238 | BT_LOGW("Cannot set packet header's magic number field: " | |
239 | "stream-addr=%p, stream-name=\"%s\"", | |
240 | stream, bt_ctf_stream_get_name(stream)); | |
241 | goto end; | |
242 | } | |
243 | ||
244 | ret = set_packet_header_uuid(stream); | |
245 | if (ret) { | |
246 | BT_LOGW("Cannot set packet header's UUID field: " | |
19abc2c6 PP |
247 | "stream-addr=%p, stream-name=\"%s\"", |
248 | stream, bt_ctf_stream_get_name(stream)); | |
d246b111 JG |
249 | goto end; |
250 | } | |
251 | ||
b3376dd9 PP |
252 | ret = set_packet_header_stream_id(stream); |
253 | if (ret) { | |
254 | BT_LOGW("Cannot set packet header's stream class ID field: " | |
255 | "stream-addr=%p, stream-name=\"%s\"", | |
256 | stream, bt_ctf_stream_get_name(stream)); | |
d246b111 JG |
257 | goto end; |
258 | } | |
259 | ||
b3376dd9 PP |
260 | BT_LOGV("Automatically populated stream's packet header's known fields: " |
261 | "stream-addr=%p, stream-name=\"%s\"", | |
262 | stream, bt_ctf_stream_get_name(stream)); | |
263 | ||
264 | end: | |
265 | return ret; | |
266 | } | |
267 | ||
268 | static | |
269 | int set_packet_context_packet_size(struct bt_ctf_stream *stream) | |
270 | { | |
271 | int ret = 0; | |
272 | struct bt_ctf_field *field = bt_ctf_field_structure_get_field( | |
273 | stream->packet_context, "packet_size"); | |
274 | ||
275 | assert(stream); | |
276 | ||
277 | if (!field) { | |
278 | /* No packet size field found. Not an error, skip. */ | |
279 | BT_LOGV("No field named `packet_size` in packet context: skipping: " | |
280 | "stream-addr=%p, stream-name=\"%s\"", | |
281 | stream, bt_ctf_stream_get_name(stream)); | |
282 | goto end; | |
283 | } | |
284 | ||
285 | ret = bt_ctf_field_unsigned_integer_set_value(field, | |
286 | stream->pos.packet_size); | |
d246b111 | 287 | if (ret) { |
b3376dd9 PP |
288 | BT_LOGW("Cannot set packet context field's `packet_size` integer field's value: " |
289 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, | |
290 | stream, bt_ctf_stream_get_name(stream), | |
291 | field, stream->pos.packet_size); | |
d246b111 | 292 | } else { |
b3376dd9 PP |
293 | BT_LOGV("Set packet context field's `packet_size` field's value: " |
294 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, | |
295 | stream, bt_ctf_stream_get_name(stream), | |
296 | field, stream->pos.packet_size); | |
d246b111 | 297 | } |
19abc2c6 | 298 | |
b3376dd9 PP |
299 | end: |
300 | bt_put(field); | |
301 | return ret; | |
302 | } | |
303 | ||
304 | static | |
305 | int set_packet_context_content_size(struct bt_ctf_stream *stream) | |
306 | { | |
307 | int ret = 0; | |
308 | struct bt_ctf_field *field = bt_ctf_field_structure_get_field( | |
309 | stream->packet_context, "content_size"); | |
310 | ||
311 | assert(stream); | |
312 | ||
313 | if (!field) { | |
314 | /* No content size field found. Not an error, skip. */ | |
315 | BT_LOGV("No field named `content_size` in packet context: skipping: " | |
316 | "stream-addr=%p, stream-name=\"%s\"", | |
317 | stream, bt_ctf_stream_get_name(stream)); | |
318 | goto end; | |
319 | } | |
320 | ||
321 | ret = bt_ctf_field_unsigned_integer_set_value(field, | |
322 | stream->pos.offset); | |
19abc2c6 | 323 | if (ret) { |
b3376dd9 PP |
324 | BT_LOGW("Cannot set packet context field's `content_size` integer field's value: " |
325 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRId64, | |
19abc2c6 | 326 | stream, bt_ctf_stream_get_name(stream), |
b3376dd9 | 327 | field, stream->pos.offset); |
19abc2c6 | 328 | } else { |
b3376dd9 PP |
329 | BT_LOGV("Set packet context field's `content_size` field's value: " |
330 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRId64, | |
19abc2c6 | 331 | stream, bt_ctf_stream_get_name(stream), |
b3376dd9 | 332 | field, stream->pos.offset); |
19abc2c6 PP |
333 | } |
334 | ||
d246b111 | 335 | end: |
b3376dd9 | 336 | bt_put(field); |
d246b111 JG |
337 | return ret; |
338 | } | |
339 | ||
340 | static | |
b3376dd9 | 341 | int set_packet_context_events_discarded(struct bt_ctf_stream *stream) |
d246b111 | 342 | { |
b3376dd9 PP |
343 | int ret = 0; |
344 | struct bt_ctf_field *field = bt_ctf_field_structure_get_field( | |
345 | stream->packet_context, "events_discarded"); | |
d246b111 | 346 | |
b3376dd9 PP |
347 | assert(stream); |
348 | ||
349 | if (!field) { | |
350 | /* No discarded events count field found. Not an error, skip. */ | |
351 | BT_LOGV("No field named `events_discarded` in packet context: skipping: " | |
352 | "stream-addr=%p, stream-name=\"%s\"", | |
353 | stream, bt_ctf_stream_get_name(stream)); | |
354 | goto end; | |
355 | } | |
356 | ||
59a09b0e PP |
357 | /* |
358 | * If the field is set by the user, make sure that the value is | |
359 | * greater than or equal to the stream's current count of | |
360 | * discarded events. We do not allow wrapping here. If it's | |
361 | * valid, update the stream's current count. | |
362 | */ | |
363 | if (bt_ctf_field_is_set(field)) { | |
364 | uint64_t user_val; | |
365 | ||
366 | ret = bt_ctf_field_unsigned_integer_get_value(field, | |
367 | &user_val); | |
368 | if (ret) { | |
369 | BT_LOGW("Cannot get packet context `events_discarded` field's unsigned value: " | |
370 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p", | |
371 | stream, bt_ctf_stream_get_name(stream), field); | |
372 | goto end; | |
373 | } | |
374 | ||
375 | if (user_val < stream->discarded_events) { | |
376 | BT_LOGW("Invalid packet context `events_discarded` field's unsigned value: " | |
377 | "value is lesser than the stream's current discarded events count: " | |
378 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, " | |
379 | "value=%" PRIu64 ", " | |
380 | "stream-discarded-events-count=%" PRIu64, | |
381 | stream, bt_ctf_stream_get_name(stream), field, | |
382 | user_val, stream->discarded_events); | |
383 | goto end; | |
384 | } | |
385 | ||
386 | stream->discarded_events = user_val; | |
b3376dd9 | 387 | } else { |
59a09b0e PP |
388 | ret = bt_ctf_field_unsigned_integer_set_value(field, |
389 | stream->discarded_events); | |
390 | if (ret) { | |
391 | BT_LOGW("Cannot set packet context field's `events_discarded` integer field's value: " | |
392 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, | |
393 | stream, bt_ctf_stream_get_name(stream), | |
394 | field, stream->discarded_events); | |
395 | } else { | |
396 | BT_LOGV("Set packet context field's `events_discarded` field's value: " | |
397 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, | |
398 | stream, bt_ctf_stream_get_name(stream), | |
399 | field, stream->discarded_events); | |
400 | } | |
b3376dd9 PP |
401 | } |
402 | ||
403 | end: | |
404 | bt_put(field); | |
405 | return ret; | |
406 | } | |
407 | ||
408 | static | |
409 | int get_event_header_timestamp(struct bt_ctf_stream *stream, | |
410 | struct bt_ctf_field *event_header, uint64_t *timestamp) | |
411 | { | |
412 | int ret = 0; | |
413 | struct bt_ctf_field *timestamp_field = NULL; | |
414 | struct bt_ctf_clock_class *ts_field_mapped_clock_class = NULL; | |
415 | ||
416 | *timestamp = 0; | |
417 | ||
418 | if (!event_header) { | |
419 | BT_LOGV_STR("Event header does not exist."); | |
420 | goto end; | |
421 | } | |
422 | ||
423 | timestamp_field = bt_ctf_field_structure_get_field(event_header, | |
424 | "timestamp"); | |
425 | if (!timestamp_field) { | |
426 | BT_LOGV("Cannot get event header's `timestamp` field: " | |
427 | "event-header-field-addr=%p", event_header); | |
428 | goto end; | |
429 | } | |
430 | ||
431 | if (!bt_ctf_field_type_is_integer(timestamp_field->type)) { | |
432 | BT_LOGV("Event header's `timestamp` field's type is not an integer field type: " | |
433 | "event-header-field-addr=%p", event_header); | |
434 | goto end; | |
435 | } | |
436 | ||
437 | ts_field_mapped_clock_class = | |
438 | bt_ctf_field_type_integer_get_mapped_clock_class( | |
439 | timestamp_field->type); | |
440 | if (!ts_field_mapped_clock_class) { | |
441 | BT_LOGV("Event header's `timestamp` field's type is not mapped to a clock class: " | |
442 | "event-header-field-addr=%p", event_header); | |
443 | goto end; | |
444 | } | |
445 | ||
446 | if (ts_field_mapped_clock_class != | |
447 | stream->stream_class->clock->clock_class) { | |
448 | BT_LOGV("Event header's `timestamp` field's type is not mapped to the stream's clock's class: " | |
449 | "event-header-field-addr=%p", event_header); | |
450 | goto end; | |
451 | } | |
452 | ||
453 | ret = bt_ctf_field_unsigned_integer_get_value(timestamp_field, | |
454 | timestamp); | |
455 | if (ret) { | |
456 | BT_LOGW("Cannot get unsigned integer field's value: " | |
457 | "event-header-field-addr=%p, " | |
458 | "timestamp-field-addr=%p", | |
459 | event_header, timestamp_field); | |
460 | goto end; | |
461 | } | |
462 | ||
463 | end: | |
464 | bt_put(timestamp_field); | |
465 | bt_put(ts_field_mapped_clock_class); | |
466 | return ret; | |
467 | } | |
468 | ||
469 | static | |
470 | int set_packet_context_timestamp_field(struct bt_ctf_stream *stream, | |
471 | const char *field_name, struct bt_ctf_event *event) | |
472 | { | |
473 | int ret = 0; | |
474 | struct bt_ctf_field *field = bt_ctf_field_structure_get_field( | |
475 | stream->packet_context, field_name); | |
476 | struct bt_ctf_clock_class *field_mapped_clock_class = NULL; | |
477 | uint64_t ts; | |
478 | ||
479 | assert(stream); | |
480 | ||
481 | if (!field) { | |
482 | /* No beginning timestamp field found. Not an error, skip. */ | |
483 | BT_LOGV("No field named `%s` in packet context: skipping: " | |
484 | "stream-addr=%p, stream-name=\"%s\"", field_name, | |
485 | stream, bt_ctf_stream_get_name(stream)); | |
486 | goto end; | |
487 | } | |
488 | ||
489 | if (!stream->stream_class->clock) { | |
490 | BT_LOGV("Stream has no clock: skipping: " | |
19abc2c6 PP |
491 | "stream-addr=%p, stream-name=\"%s\"", |
492 | stream, bt_ctf_stream_get_name(stream)); | |
d246b111 JG |
493 | goto end; |
494 | } | |
495 | ||
b3376dd9 PP |
496 | field_mapped_clock_class = |
497 | bt_ctf_field_type_integer_get_mapped_clock_class(field->type); | |
498 | if (!field_mapped_clock_class) { | |
499 | BT_LOGV("Packet context's `%s` field's type is not mapped to a clock class: skipping: " | |
500 | "stream-addr=%p, stream-name=\"%s\", " | |
501 | "field-addr=%p, ft-addr=%p", field_name, | |
502 | stream, bt_ctf_stream_get_name(stream), | |
503 | field, field->type); | |
504 | goto end; | |
505 | } | |
506 | ||
507 | if (field_mapped_clock_class != | |
508 | stream->stream_class->clock->clock_class) { | |
509 | BT_LOGV("Packet context's `%s` field's type is not mapped to the stream's clock's class: skipping: " | |
510 | "stream-addr=%p, stream-name=\"%s\", " | |
511 | "field-addr=%p, ft-addr=%p, " | |
512 | "ft-mapped-clock-class-addr=%p, " | |
513 | "ft-mapped-clock-class-name=\"%s\", " | |
514 | "stream-clock-class-addr=%p, " | |
515 | "stream-clock-class-name=\"%s\"", | |
516 | field_name, | |
517 | stream, bt_ctf_stream_get_name(stream), | |
518 | field, field->type, | |
519 | field_mapped_clock_class, | |
520 | bt_ctf_clock_class_get_name(field_mapped_clock_class), | |
521 | stream->stream_class->clock->clock_class, | |
522 | bt_ctf_clock_class_get_name( | |
523 | stream->stream_class->clock->clock_class)); | |
524 | goto end; | |
525 | } | |
526 | ||
527 | if (get_event_header_timestamp(stream, event->event_header, &ts)) { | |
528 | BT_LOGW("Cannot get event's timestamp: " | |
529 | "event-header-field-addr=%p", | |
530 | event->event_header); | |
531 | ret = -1; | |
532 | goto end; | |
533 | } | |
534 | ||
535 | ret = bt_ctf_field_unsigned_integer_set_value(field, ts); | |
d246b111 | 536 | if (ret) { |
b3376dd9 PP |
537 | BT_LOGW("Cannot set packet context field's `%s` integer field's value: " |
538 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, | |
539 | field_name, stream, bt_ctf_stream_get_name(stream), | |
540 | field, stream->discarded_events); | |
541 | } else { | |
542 | BT_LOGV("Set packet context field's `%s` field's value: " | |
543 | "stream-addr=%p, stream-name=\"%s\", field-addr=%p, value=%" PRIu64, | |
544 | field_name, stream, bt_ctf_stream_get_name(stream), | |
545 | field, stream->discarded_events); | |
546 | } | |
547 | ||
548 | end: | |
549 | bt_put(field); | |
550 | bt_put(field_mapped_clock_class); | |
551 | return ret; | |
552 | } | |
553 | ||
554 | static | |
555 | int set_packet_context_timestamp_begin(struct bt_ctf_stream *stream) | |
556 | { | |
557 | int ret = 0; | |
558 | ||
559 | if (stream->events->len == 0) { | |
560 | BT_LOGV("Current packet contains no events: skipping: " | |
19abc2c6 PP |
561 | "stream-addr=%p, stream-name=\"%s\"", |
562 | stream, bt_ctf_stream_get_name(stream)); | |
d246b111 JG |
563 | goto end; |
564 | } | |
565 | ||
b3376dd9 PP |
566 | ret = set_packet_context_timestamp_field(stream, "timestamp_begin", |
567 | g_ptr_array_index(stream->events, 0)); | |
568 | ||
569 | end: | |
570 | return ret; | |
571 | } | |
572 | ||
573 | static | |
574 | int set_packet_context_timestamp_end(struct bt_ctf_stream *stream) | |
575 | { | |
576 | int ret = 0; | |
577 | ||
578 | if (stream->events->len == 0) { | |
579 | BT_LOGV("Current packet contains no events: skipping: " | |
580 | "stream-addr=%p, stream-name=\"%s\"", | |
581 | stream, bt_ctf_stream_get_name(stream)); | |
582 | goto end; | |
583 | } | |
584 | ||
585 | ret = set_packet_context_timestamp_field(stream, "timestamp_end", | |
586 | g_ptr_array_index(stream->events, stream->events->len - 1)); | |
587 | ||
588 | end: | |
589 | return ret; | |
590 | } | |
591 | ||
592 | static | |
593 | int auto_populate_packet_context(struct bt_ctf_stream *stream) | |
594 | { | |
595 | int ret = 0; | |
596 | ||
597 | if (!stream->packet_context) { | |
598 | goto end; | |
599 | } | |
600 | ||
601 | ret = set_packet_context_packet_size(stream); | |
d246b111 | 602 | if (ret) { |
b3376dd9 PP |
603 | BT_LOGW("Cannot set packet context's packet size field: " |
604 | "stream-addr=%p, stream-name=\"%s\"", | |
605 | stream, bt_ctf_stream_get_name(stream)); | |
606 | goto end; | |
607 | } | |
608 | ||
609 | ret = set_packet_context_content_size(stream); | |
610 | if (ret) { | |
611 | BT_LOGW("Cannot set packet context's content size field: " | |
19abc2c6 PP |
612 | "stream-addr=%p, stream-name=\"%s\"", |
613 | stream, bt_ctf_stream_get_name(stream)); | |
d246b111 JG |
614 | goto end; |
615 | } | |
19abc2c6 | 616 | |
b3376dd9 PP |
617 | ret = set_packet_context_timestamp_begin(stream); |
618 | if (ret) { | |
619 | BT_LOGW("Cannot set packet context's beginning timestamp field: " | |
620 | "stream-addr=%p, stream-name=\"%s\"", | |
621 | stream, bt_ctf_stream_get_name(stream)); | |
622 | goto end; | |
623 | } | |
624 | ||
625 | ret = set_packet_context_timestamp_end(stream); | |
626 | if (ret) { | |
627 | BT_LOGW("Cannot set packet context's end timestamp field: " | |
628 | "stream-addr=%p, stream-name=\"%s\"", | |
629 | stream, bt_ctf_stream_get_name(stream)); | |
630 | goto end; | |
631 | } | |
632 | ||
633 | ret = set_packet_context_events_discarded(stream); | |
634 | if (ret) { | |
635 | BT_LOGW("Cannot set packet context's discarded events count field: " | |
636 | "stream-addr=%p, stream-name=\"%s\"", | |
637 | stream, bt_ctf_stream_get_name(stream)); | |
638 | goto end; | |
639 | } | |
640 | ||
641 | BT_LOGV("Automatically populated stream's packet context's known fields: " | |
19abc2c6 PP |
642 | "stream-addr=%p, stream-name=\"%s\"", |
643 | stream, bt_ctf_stream_get_name(stream)); | |
644 | ||
d246b111 JG |
645 | end: |
646 | return ret; | |
647 | } | |
648 | ||
123fbdec | 649 | static |
e6a8e8e4 | 650 | void release_event(struct bt_ctf_event *event) |
123fbdec | 651 | { |
e6a8e8e4 JG |
652 | if (bt_object_get_ref_count(event)) { |
653 | /* | |
654 | * The event is being orphaned, but it must guarantee the | |
655 | * existence of its event class for the duration of its | |
656 | * lifetime. | |
657 | */ | |
658 | bt_get(event->event_class); | |
659 | BT_PUT(event->base.parent); | |
660 | } else { | |
661 | bt_object_release(event); | |
662 | } | |
123fbdec JG |
663 | } |
664 | ||
319fd969 PP |
665 | static |
666 | int create_stream_file(struct bt_ctf_writer *writer, | |
667 | struct bt_ctf_stream *stream) | |
668 | { | |
669 | int fd; | |
ab22d18f PP |
670 | GString *filename = g_string_new(NULL); |
671 | int64_t stream_class_id; | |
672 | char *file_path = NULL; | |
319fd969 | 673 | |
19abc2c6 PP |
674 | BT_LOGD("Creating stream file: writer-addr=%p, stream-addr=%p, " |
675 | "stream-name=\"%s\", stream-class-addr=%p, stream-class-name=\"%s\"", | |
676 | writer, stream, bt_ctf_stream_get_name(stream), | |
677 | stream->stream_class, stream->stream_class->name->str); | |
678 | ||
ab22d18f PP |
679 | if (stream->name && stream->name->len > 0) { |
680 | /* Use stream name's base name as prefix */ | |
681 | gchar *basename = g_path_get_basename(stream->name->str); | |
682 | ||
683 | assert(basename); | |
684 | ||
685 | if (strcmp(basename, G_DIR_SEPARATOR_S) == 0) { | |
686 | g_string_assign(filename, "stream"); | |
687 | } else { | |
688 | g_string_assign(filename, basename); | |
689 | } | |
690 | ||
691 | g_free(basename); | |
692 | goto append_ids; | |
693 | } | |
694 | ||
695 | if (stream->stream_class->name && | |
696 | stream->stream_class->name->len > 0) { | |
697 | /* Use stream class name's base name as prefix */ | |
698 | gchar *basename = | |
699 | g_path_get_basename(stream->stream_class->name->str); | |
700 | ||
701 | assert(basename); | |
702 | ||
703 | if (strcmp(basename, G_DIR_SEPARATOR_S) == 0) { | |
704 | g_string_assign(filename, "stream"); | |
705 | } else { | |
706 | g_string_assign(filename, basename); | |
319fd969 PP |
707 | } |
708 | ||
ab22d18f PP |
709 | g_free(basename); |
710 | goto append_ids; | |
319fd969 PP |
711 | } |
712 | ||
ab22d18f PP |
713 | /* Default to using `stream-` as prefix */ |
714 | g_string_assign(filename, "stream"); | |
715 | ||
716 | append_ids: | |
717 | stream_class_id = bt_ctf_stream_class_get_id(stream->stream_class); | |
718 | assert(stream_class_id >= 0); | |
719 | assert(stream->id >= 0); | |
720 | g_string_append_printf(filename, "-%" PRId64 "-%" PRId64, | |
721 | stream_class_id, stream->id); | |
722 | ||
ebd04048 MJ |
723 | file_path = g_build_filename(writer->path->str, filename->str, NULL); |
724 | if (file_path == NULL) { | |
725 | fd = -1; | |
726 | goto end; | |
727 | } | |
ab22d18f | 728 | |
ebd04048 | 729 | fd = open(file_path, |
319fd969 PP |
730 | O_RDWR | O_CREAT | O_TRUNC, |
731 | S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP); | |
ebd04048 | 732 | g_free(file_path); |
19abc2c6 | 733 | if (fd < 0) { |
c606e638 PP |
734 | BT_LOGW_ERRNO("Failed to open stream file for writing", |
735 | ": file_path=\"%s\", filename=\"%s\", ret=%d", | |
736 | file_path, filename->str, fd); | |
19abc2c6 PP |
737 | goto end; |
738 | } | |
739 | ||
740 | BT_LOGD("Created stream file for writing: " | |
ebd04048 | 741 | "stream-addr=%p, stream-name=\"%s\", " |
19abc2c6 | 742 | "filename=\"%s\", fd=%d", stream, bt_ctf_stream_get_name(stream), |
ebd04048 | 743 | filename->str, fd); |
19abc2c6 PP |
744 | |
745 | end: | |
319fd969 PP |
746 | g_string_free(filename, TRUE); |
747 | return fd; | |
748 | } | |
749 | ||
750 | static | |
19abc2c6 | 751 | void set_stream_fd(struct bt_ctf_stream *stream, int fd) |
319fd969 | 752 | { |
dc3fffef | 753 | (void) bt_ctf_stream_pos_init(&stream->pos, fd, O_RDWR); |
319fd969 | 754 | stream->pos.fd = fd; |
319fd969 PP |
755 | } |
756 | ||
3230ee6b PP |
757 | static |
758 | void component_destroy_listener(struct bt_component *component, void *data) | |
759 | { | |
760 | struct bt_ctf_stream *stream = data; | |
761 | ||
19abc2c6 PP |
762 | BT_LOGD("Component is being destroyed, stream is notified: " |
763 | "comp-addr=%p, stream-addr=%p", component, stream); | |
3230ee6b PP |
764 | g_hash_table_remove(stream->comp_cur_port, component); |
765 | } | |
766 | ||
cfe11c58 PP |
767 | static |
768 | struct bt_ctf_stream *bt_ctf_stream_create_with_id_no_check( | |
b71d7298 | 769 | struct bt_ctf_stream_class *stream_class, |
cfe11c58 | 770 | const char *name, uint64_t id) |
273b65be | 771 | { |
12c8a1a3 | 772 | int ret; |
273b65be | 773 | struct bt_ctf_stream *stream = NULL; |
319fd969 PP |
774 | struct bt_ctf_trace *trace = NULL; |
775 | struct bt_ctf_writer *writer = NULL; | |
273b65be | 776 | |
319fd969 | 777 | if (!stream_class) { |
19abc2c6 | 778 | BT_LOGW_STR("Invalid parameter: stream class is NULL."); |
b71d7298 | 779 | goto error; |
319fd969 PP |
780 | } |
781 | ||
19abc2c6 | 782 | BT_LOGD("Creating stream object: stream-class-addr=%p, " |
cfe11c58 PP |
783 | "stream-class-name=\"%s\", stream-name=\"%s\", " |
784 | "stream-id=%" PRIu64, | |
19abc2c6 | 785 | stream_class, bt_ctf_stream_class_get_name(stream_class), |
cfe11c58 PP |
786 | name, id); |
787 | trace = bt_ctf_stream_class_borrow_trace(stream_class); | |
319fd969 | 788 | if (!trace) { |
19abc2c6 | 789 | BT_LOGW("Invalid parameter: cannot create stream from a stream class which is not part of trace: " |
b3376dd9 PP |
790 | "stream-class-addr=%p, stream-class-name=\"%s\", " |
791 | "stream-name=\"%s\"", | |
19abc2c6 PP |
792 | stream_class, bt_ctf_stream_class_get_name(stream_class), |
793 | name); | |
b71d7298 | 794 | goto error; |
273b65be JG |
795 | } |
796 | ||
5acf2ae6 PP |
797 | if (bt_ctf_trace_is_static(trace)) { |
798 | /* | |
799 | * A static trace has the property that all its stream | |
800 | * classes, clock classes, and streams are definitive: | |
801 | * no more can be added, and each object is also frozen. | |
802 | */ | |
19abc2c6 | 803 | BT_LOGW("Invalid parameter: cannot create stream from a stream class which is part of a static trace: " |
b3376dd9 PP |
804 | "stream-class-addr=%p, stream-class-name=\"%s\", " |
805 | "stream-name=\"%s\", trace-addr=%p", | |
19abc2c6 | 806 | stream_class, bt_ctf_stream_class_get_name(stream_class), |
b3376dd9 | 807 | name, trace); |
5acf2ae6 PP |
808 | goto error; |
809 | } | |
810 | ||
cfe11c58 PP |
811 | if (id != -1ULL) { |
812 | /* | |
813 | * Validate that the given ID is unique amongst all the | |
814 | * existing trace's streams created from the same stream | |
815 | * class. | |
816 | */ | |
817 | size_t i; | |
818 | ||
819 | for (i = 0; i < trace->streams->len; i++) { | |
820 | struct bt_ctf_stream *trace_stream = | |
821 | g_ptr_array_index(trace->streams, i); | |
822 | ||
823 | if (trace_stream->stream_class != stream_class) { | |
824 | continue; | |
825 | } | |
826 | ||
827 | if (trace_stream->id == id) { | |
828 | BT_LOGW_STR("Invalid parameter: another stream in the same trace already has this ID."); | |
829 | goto error; | |
830 | } | |
831 | } | |
832 | } | |
833 | ||
273b65be JG |
834 | stream = g_new0(struct bt_ctf_stream, 1); |
835 | if (!stream) { | |
19abc2c6 | 836 | BT_LOGE_STR("Failed to allocate one stream."); |
b71d7298 | 837 | goto error; |
273b65be JG |
838 | } |
839 | ||
83509119 | 840 | bt_object_init(stream, bt_ctf_stream_destroy); |
e6a8e8e4 JG |
841 | /* |
842 | * Acquire reference to parent since stream will become publicly | |
843 | * reachable; it needs its parent to remain valid. | |
844 | */ | |
845 | bt_object_set_parent(stream, trace); | |
273b65be | 846 | stream->stream_class = stream_class; |
319fd969 | 847 | stream->pos.fd = -1; |
cfe11c58 | 848 | stream->id = (int64_t) id; |
d246b111 | 849 | |
3230ee6b PP |
850 | stream->destroy_listeners = g_array_new(FALSE, TRUE, |
851 | sizeof(struct bt_ctf_stream_destroy_listener)); | |
852 | if (!stream->destroy_listeners) { | |
19abc2c6 | 853 | BT_LOGE_STR("Failed to allocate a GArray."); |
3230ee6b PP |
854 | goto error; |
855 | } | |
856 | ||
b71d7298 PP |
857 | if (name) { |
858 | stream->name = g_string_new(name); | |
859 | if (!stream->name) { | |
19abc2c6 | 860 | BT_LOGE_STR("Failed to allocate a GString."); |
b71d7298 PP |
861 | goto error; |
862 | } | |
863 | } | |
864 | ||
19abc2c6 PP |
865 | BT_LOGD("Set stream's trace parent: trace-addr=%p", trace); |
866 | ||
319fd969 PP |
867 | if (trace->is_created_by_writer) { |
868 | int fd; | |
cfe11c58 PP |
869 | writer = (struct bt_ctf_writer *) bt_object_get_parent(trace); |
870 | stream->id = (int64_t) stream_class->next_stream_id++; | |
319fd969 | 871 | |
19abc2c6 PP |
872 | BT_LOGD("Stream object belongs to a writer's trace: " |
873 | "writer-addr=%p", writer); | |
319fd969 | 874 | assert(writer); |
b3376dd9 | 875 | |
98edd02c | 876 | if (stream_class->packet_context_type) { |
19abc2c6 PP |
877 | BT_LOGD("Creating stream's packet context field: " |
878 | "ft-addr=%p", stream_class->packet_context_type); | |
98edd02c JG |
879 | stream->packet_context = bt_ctf_field_create( |
880 | stream_class->packet_context_type); | |
881 | if (!stream->packet_context) { | |
19abc2c6 | 882 | BT_LOGW_STR("Cannot create stream's packet context field."); |
98edd02c JG |
883 | goto error; |
884 | } | |
319fd969 | 885 | |
98edd02c | 886 | /* Initialize events_discarded */ |
af9296f3 | 887 | ret = try_set_structure_field_integer( |
19abc2c6 | 888 | stream->packet_context, "events_discarded", 0); |
7ee636df | 889 | if (ret < 0) { |
19abc2c6 PP |
890 | BT_LOGW("Cannot set `events_discarded` field in packet context: " |
891 | "ret=%d, packet-context-field-addr=%p", | |
892 | ret, stream->packet_context); | |
98edd02c JG |
893 | goto error; |
894 | } | |
319fd969 PP |
895 | } |
896 | ||
897 | stream->events = g_ptr_array_new_with_free_func( | |
898 | (GDestroyNotify) release_event); | |
899 | if (!stream->events) { | |
19abc2c6 | 900 | BT_LOGE_STR("Failed to allocate a GPtrArray."); |
319fd969 PP |
901 | goto error; |
902 | } | |
903 | ||
b3376dd9 PP |
904 | if (trace->packet_header_type) { |
905 | BT_LOGD("Creating stream's packet header field: " | |
906 | "ft-addr=%p", trace->packet_header_type); | |
907 | stream->packet_header = | |
908 | bt_ctf_field_create(trace->packet_header_type); | |
909 | if (!stream->packet_header) { | |
910 | BT_LOGW_STR("Cannot create stream's packet header field."); | |
911 | goto error; | |
912 | } | |
319fd969 PP |
913 | } |
914 | ||
915 | /* | |
916 | * Attempt to populate the default trace packet header fields | |
917 | * (magic, uuid and stream_id). This will _not_ fail shall the | |
918 | * fields not be found or be of an incompatible type; they will | |
919 | * simply not be populated automatically. The user will have to | |
920 | * make sure to set the trace packet header fields himself | |
921 | * before flushing. | |
922 | */ | |
b3376dd9 | 923 | ret = auto_populate_packet_header(stream); |
319fd969 | 924 | if (ret) { |
b3376dd9 | 925 | BT_LOGW_STR("Cannot automatically populate the stream's packet header."); |
319fd969 PP |
926 | goto error; |
927 | } | |
928 | ||
929 | /* Create file associated with this stream */ | |
930 | fd = create_stream_file(writer, stream); | |
931 | if (fd < 0) { | |
19abc2c6 | 932 | BT_LOGW_STR("Cannot create stream file."); |
319fd969 PP |
933 | goto error; |
934 | } | |
935 | ||
19abc2c6 | 936 | set_stream_fd(stream, fd); |
319fd969 PP |
937 | |
938 | /* Freeze the writer */ | |
19abc2c6 | 939 | BT_LOGD_STR("Freezing stream's CTF writer."); |
319fd969 PP |
940 | bt_ctf_writer_freeze(writer); |
941 | } else { | |
942 | /* Non-writer stream indicated by a negative FD */ | |
19abc2c6 | 943 | set_stream_fd(stream, -1); |
3230ee6b PP |
944 | stream->comp_cur_port = g_hash_table_new(g_direct_hash, |
945 | g_direct_equal); | |
946 | if (!stream->comp_cur_port) { | |
19abc2c6 | 947 | BT_LOGE_STR("Failed to allocate a GHashTable."); |
3230ee6b PP |
948 | goto error; |
949 | } | |
d246b111 | 950 | } |
319fd969 PP |
951 | |
952 | /* Add this stream to the trace's streams */ | |
953 | g_ptr_array_add(trace->streams, stream); | |
19abc2c6 | 954 | BT_LOGD("Created stream object: addr=%p", stream); |
cfe11c58 PP |
955 | goto end; |
956 | ||
83509119 JG |
957 | error: |
958 | BT_PUT(stream); | |
cfe11c58 PP |
959 | |
960 | end: | |
961 | bt_put(writer); | |
962 | return stream; | |
963 | } | |
964 | ||
965 | struct bt_ctf_stream *bt_ctf_stream_create_with_id( | |
966 | struct bt_ctf_stream_class *stream_class, | |
967 | const char *name, uint64_t id_param) | |
968 | { | |
969 | struct bt_ctf_trace *trace; | |
970 | struct bt_ctf_stream *stream = NULL; | |
971 | int64_t id = (int64_t) id_param; | |
972 | ||
973 | if (!stream_class) { | |
974 | BT_LOGW_STR("Invalid parameter: stream class is NULL."); | |
975 | goto end; | |
976 | } | |
977 | ||
978 | if (id < 0) { | |
979 | BT_LOGW("Invalid parameter: invalid stream's ID: " | |
980 | "name=\"%s\", id=%" PRIu64, | |
981 | name, id_param); | |
982 | goto end; | |
983 | } | |
984 | ||
985 | trace = bt_ctf_stream_class_borrow_trace(stream_class); | |
986 | if (!trace) { | |
987 | BT_LOGW("Invalid parameter: cannot create stream from a stream class which is not part of trace: " | |
988 | "stream-class-addr=%p, stream-class-name=\"%s\", " | |
989 | "stream-name=\"%s\", stream-id=%" PRIu64, | |
990 | stream_class, bt_ctf_stream_class_get_name(stream_class), | |
991 | name, id_param); | |
992 | goto end; | |
993 | } | |
994 | ||
995 | if (trace->is_created_by_writer) { | |
996 | BT_LOGW("Invalid parameter: cannot create a CTF writer stream with this function; use bt_ctf_stream_create(): " | |
997 | "stream-class-addr=%p, stream-class-name=\"%s\", " | |
998 | "stream-name=\"%s\", stream-id=%" PRIu64, | |
999 | stream_class, bt_ctf_stream_class_get_name(stream_class), | |
1000 | name, id_param); | |
1001 | goto end; | |
1002 | } | |
1003 | ||
1004 | stream = bt_ctf_stream_create_with_id_no_check(stream_class, | |
1005 | name, id_param); | |
1006 | ||
1007 | end: | |
83509119 | 1008 | return stream; |
273b65be JG |
1009 | } |
1010 | ||
cfe11c58 PP |
1011 | struct bt_ctf_stream *bt_ctf_stream_create( |
1012 | struct bt_ctf_stream_class *stream_class, | |
1013 | const char *name) | |
1014 | { | |
1015 | return bt_ctf_stream_create_with_id_no_check(stream_class, | |
1016 | name, -1ULL); | |
1017 | } | |
1018 | ||
3baf0856 JG |
1019 | struct bt_ctf_stream_class *bt_ctf_stream_get_class( |
1020 | struct bt_ctf_stream *stream) | |
1021 | { | |
1022 | struct bt_ctf_stream_class *stream_class = NULL; | |
1023 | ||
1024 | if (!stream) { | |
19abc2c6 | 1025 | BT_LOGW_STR("Invalid parameter: stream is NULL."); |
3baf0856 JG |
1026 | goto end; |
1027 | } | |
1028 | ||
1029 | stream_class = stream->stream_class; | |
83509119 | 1030 | bt_get(stream_class); |
3baf0856 JG |
1031 | end: |
1032 | return stream_class; | |
1033 | } | |
1034 | ||
37949e9e | 1035 | int bt_ctf_stream_get_discarded_events_count( |
a78a2e25 JG |
1036 | struct bt_ctf_stream *stream, uint64_t *count) |
1037 | { | |
37949e9e | 1038 | int ret = 0; |
a78a2e25 | 1039 | |
19abc2c6 PP |
1040 | if (!stream) { |
1041 | BT_LOGW_STR("Invalid parameter: stream is NULL."); | |
37949e9e | 1042 | ret = -1; |
19abc2c6 PP |
1043 | goto end; |
1044 | } | |
1045 | ||
1046 | if (!count) { | |
1047 | BT_LOGW_STR("Invalid parameter: count is NULL."); | |
37949e9e | 1048 | ret = -1; |
19abc2c6 PP |
1049 | goto end; |
1050 | } | |
1051 | ||
b3376dd9 PP |
1052 | if (stream->pos.fd < 0) { |
1053 | BT_LOGW("Invalid parameter: stream is not a CTF writer stream: " | |
19abc2c6 PP |
1054 | "stream-addr=%p, stream-name=\"%s\"", |
1055 | stream, bt_ctf_stream_get_name(stream)); | |
37949e9e | 1056 | ret = -1; |
19abc2c6 PP |
1057 | goto end; |
1058 | } | |
1059 | ||
b3376dd9 PP |
1060 | *count = (uint64_t) stream->discarded_events; |
1061 | ||
1062 | end: | |
1063 | return ret; | |
1064 | } | |
1065 | ||
1066 | static | |
1067 | int set_packet_context_events_discarded_field(struct bt_ctf_stream *stream, | |
1068 | uint64_t count) | |
1069 | { | |
1070 | int ret = 0; | |
1071 | struct bt_ctf_field *events_discarded_field = NULL; | |
1072 | ||
1073 | if (!stream->packet_context) { | |
a78a2e25 JG |
1074 | goto end; |
1075 | } | |
1076 | ||
12c8a1a3 JG |
1077 | events_discarded_field = bt_ctf_field_structure_get_field( |
1078 | stream->packet_context, "events_discarded"); | |
1079 | if (!events_discarded_field) { | |
12c8a1a3 JG |
1080 | goto end; |
1081 | } | |
1082 | ||
b3376dd9 PP |
1083 | ret = bt_ctf_field_unsigned_integer_set_value( |
1084 | events_discarded_field, count); | |
1085 | if (ret) { | |
1086 | BT_LOGW("Cannot set packet context's `events_discarded` field: " | |
1087 | "field-addr=%p, value=%" PRIu64, | |
12c8a1a3 | 1088 | events_discarded_field, count); |
b3376dd9 | 1089 | goto end; |
12c8a1a3 | 1090 | } |
b3376dd9 | 1091 | |
a78a2e25 | 1092 | end: |
83509119 | 1093 | bt_put(events_discarded_field); |
a78a2e25 JG |
1094 | return ret; |
1095 | } | |
1096 | ||
273b65be JG |
1097 | void bt_ctf_stream_append_discarded_events(struct bt_ctf_stream *stream, |
1098 | uint64_t event_count) | |
1099 | { | |
12c8a1a3 | 1100 | int ret; |
12c8a1a3 JG |
1101 | uint64_t new_count; |
1102 | struct bt_ctf_field *events_discarded_field = NULL; | |
12c8a1a3 | 1103 | |
19abc2c6 PP |
1104 | if (!stream) { |
1105 | BT_LOGW_STR("Invalid parameter: stream is NULL."); | |
1106 | goto end; | |
1107 | } | |
1108 | ||
1109 | BT_LOGV("Appending discarded events to stream: " | |
1110 | "stream-addr=%p, stream-name=\"%s\", append-count=%" PRIu64, | |
1111 | stream, bt_ctf_stream_get_name(stream), event_count); | |
1112 | ||
1113 | if (!stream->packet_context) { | |
1114 | BT_LOGW_STR("Invalid parameter: stream has no packet context field."); | |
1115 | goto end; | |
1116 | } | |
1117 | ||
1118 | if (stream->pos.fd < 0) { | |
1119 | BT_LOGW_STR("Invalid parameter: stream is not a CTF writer stream."); | |
12c8a1a3 JG |
1120 | goto end; |
1121 | } | |
1122 | ||
12c8a1a3 JG |
1123 | events_discarded_field = bt_ctf_field_structure_get_field( |
1124 | stream->packet_context, "events_discarded"); | |
1125 | if (!events_discarded_field) { | |
b3376dd9 | 1126 | BT_LOGW_STR("No field named `events_discarded` in stream's packet context."); |
12c8a1a3 JG |
1127 | goto end; |
1128 | } | |
1129 | ||
b3376dd9 PP |
1130 | new_count = stream->discarded_events + event_count; |
1131 | if (new_count < stream->discarded_events) { | |
1132 | BT_LOGW("New discarded events count is less than the stream's current discarded events count: " | |
1133 | "cur-count=%" PRIu64 ", new-count=%" PRIu64, | |
1134 | stream->discarded_events, new_count); | |
1135 | goto end; | |
1136 | } | |
1137 | ||
1138 | ret = set_packet_context_events_discarded_field(stream, new_count); | |
1139 | if (ret) { | |
1140 | /* set_packet_context_events_discarded_field() logs errors */ | |
1141 | goto end; | |
12c8a1a3 JG |
1142 | } |
1143 | ||
b3376dd9 | 1144 | stream->discarded_events = new_count; |
19abc2c6 PP |
1145 | BT_LOGV("Appended discarded events to stream: " |
1146 | "stream-addr=%p, stream-name=\"%s\", append-count=%" PRIu64, | |
1147 | stream, bt_ctf_stream_get_name(stream), event_count); | |
1148 | ||
12c8a1a3 | 1149 | end: |
83509119 | 1150 | bt_put(events_discarded_field); |
273b65be JG |
1151 | } |
1152 | ||
ac0c6bdd PP |
1153 | static int auto_populate_event_header(struct bt_ctf_stream *stream, |
1154 | struct bt_ctf_event *event) | |
1155 | { | |
1156 | int ret = 0; | |
1157 | struct bt_ctf_field *id_field = NULL, *timestamp_field = NULL; | |
1158 | struct bt_ctf_clock_class *mapped_clock_class = NULL; | |
19abc2c6 | 1159 | uint64_t event_class_id; |
ac0c6bdd | 1160 | |
19abc2c6 PP |
1161 | assert(event); |
1162 | ||
06b019a7 JD |
1163 | if (!event->event_header) { |
1164 | goto end; | |
1165 | } | |
1166 | ||
19abc2c6 PP |
1167 | if (event->frozen) { |
1168 | BT_LOGW_STR("Cannot populate event header field: event is frozen."); | |
ac0c6bdd PP |
1169 | ret = -1; |
1170 | goto end; | |
1171 | } | |
1172 | ||
b3376dd9 | 1173 | BT_LOGV("Automatically populating event's header field: " |
19abc2c6 PP |
1174 | "stream-addr=%p, stream-name=\"%s\", event-addr=%p", |
1175 | stream, bt_ctf_stream_get_name(stream), event); | |
1176 | ||
ac0c6bdd | 1177 | id_field = bt_ctf_field_structure_get_field(event->event_header, "id"); |
19abc2c6 PP |
1178 | event_class_id = (uint64_t) bt_ctf_event_class_get_id(event->event_class); |
1179 | assert(event_class_id >= 0); | |
b3376dd9 | 1180 | if (id_field && bt_ctf_field_type_is_integer(id_field->type)) { |
19abc2c6 | 1181 | ret = set_integer_field_value(id_field, event_class_id); |
ac0c6bdd | 1182 | if (ret) { |
19abc2c6 PP |
1183 | BT_LOGW("Cannot set event header's `id` field's value: " |
1184 | "addr=%p, value=%" PRIu64, id_field, | |
1185 | event_class_id); | |
ac0c6bdd PP |
1186 | goto end; |
1187 | } | |
1188 | } | |
1189 | ||
1190 | /* | |
1191 | * The conditions to automatically set the timestamp are: | |
1192 | * | |
1193 | * 1. The event header field "timestamp" exists and is an | |
1194 | * integer field. | |
1195 | * 2. This stream's class has a registered clock (set with | |
1196 | * bt_ctf_stream_class_set_clock()). | |
1197 | * 3. The event header field "timestamp" has its type mapped to | |
1198 | * a clock class which is also the clock class of this | |
1199 | * stream's class's registered clock. | |
ac0c6bdd PP |
1200 | */ |
1201 | timestamp_field = bt_ctf_field_structure_get_field(event->event_header, | |
1202 | "timestamp"); | |
b3376dd9 PP |
1203 | if (timestamp_field && stream->stream_class->clock && |
1204 | bt_ctf_field_type_is_integer(timestamp_field->type)) { | |
ac0c6bdd PP |
1205 | struct bt_ctf_clock_class *stream_class_clock_class = |
1206 | stream->stream_class->clock->clock_class; | |
ac0c6bdd | 1207 | |
ac0c6bdd PP |
1208 | mapped_clock_class = |
1209 | bt_ctf_field_type_integer_get_mapped_clock_class( | |
b3376dd9 | 1210 | timestamp_field->type); |
ac0c6bdd PP |
1211 | if (mapped_clock_class == stream_class_clock_class) { |
1212 | uint64_t timestamp; | |
1213 | ||
1214 | ret = bt_ctf_clock_get_value( | |
1215 | stream->stream_class->clock, | |
1216 | ×tamp); | |
19abc2c6 | 1217 | assert(ret == 0); |
ac0c6bdd PP |
1218 | ret = set_integer_field_value(timestamp_field, |
1219 | timestamp); | |
1220 | if (ret) { | |
19abc2c6 PP |
1221 | BT_LOGW("Cannot set event header's `timestamp` field's value: " |
1222 | "addr=%p, value=%" PRIu64, | |
1223 | timestamp_field, timestamp); | |
ac0c6bdd PP |
1224 | goto end; |
1225 | } | |
1226 | } | |
1227 | } | |
1228 | ||
b3376dd9 | 1229 | BT_LOGV("Automatically populated event's header field: " |
19abc2c6 PP |
1230 | "stream-addr=%p, stream-name=\"%s\", event-addr=%p", |
1231 | stream, bt_ctf_stream_get_name(stream), event); | |
1232 | ||
ac0c6bdd PP |
1233 | end: |
1234 | bt_put(id_field); | |
1235 | bt_put(timestamp_field); | |
1236 | bt_put(mapped_clock_class); | |
1237 | return ret; | |
1238 | } | |
1239 | ||
273b65be JG |
1240 | int bt_ctf_stream_append_event(struct bt_ctf_stream *stream, |
1241 | struct bt_ctf_event *event) | |
1242 | { | |
1243 | int ret = 0; | |
273b65be | 1244 | |
19abc2c6 PP |
1245 | if (!stream) { |
1246 | BT_LOGW_STR("Invalid parameter: stream is NULL."); | |
1247 | ret = -1; | |
1248 | goto end; | |
1249 | } | |
1250 | ||
1251 | if (!event) { | |
1252 | BT_LOGW_STR("Invalid parameter: event is NULL."); | |
1253 | ret = -1; | |
1254 | goto end; | |
1255 | } | |
1256 | ||
1257 | if (stream->pos.fd < 0) { | |
1258 | BT_LOGW_STR("Invalid parameter: stream is not a CTF writer stream."); | |
273b65be JG |
1259 | ret = -1; |
1260 | goto end; | |
1261 | } | |
1262 | ||
19abc2c6 PP |
1263 | BT_LOGV("Appending event to stream: " |
1264 | "stream-addr=%p, stream-name=\"%s\", event-addr=%p, " | |
1265 | "event-class-name=\"%s\", event-class-id=%" PRId64, | |
1266 | stream, bt_ctf_stream_get_name(stream), event, | |
1267 | bt_ctf_event_class_get_name(bt_ctf_event_borrow_event_class(event)), | |
1268 | bt_ctf_event_class_get_id(bt_ctf_event_borrow_event_class(event))); | |
1269 | ||
fa29ba83 PP |
1270 | /* |
1271 | * The event is not supposed to have a parent stream at this | |
1272 | * point. The only other way an event can have a parent stream | |
1273 | * is if it was assigned when setting a packet to the event, | |
1274 | * in which case the packet's stream is not a writer stream, | |
1275 | * and thus the user is trying to append an event which belongs | |
1276 | * to another stream. | |
1277 | */ | |
1278 | if (event->base.parent) { | |
1279 | ret = -1; | |
1280 | goto end; | |
1281 | } | |
1282 | ||
e6a8e8e4 | 1283 | bt_object_set_parent(event, stream); |
19abc2c6 | 1284 | BT_LOGV_STR("Automatically populating the header of the event to append."); |
ac0c6bdd | 1285 | ret = auto_populate_event_header(stream, event); |
662e778c | 1286 | if (ret) { |
19abc2c6 | 1287 | /* auto_populate_event_header() reports errors */ |
37f30168 | 1288 | goto error; |
662e778c JG |
1289 | } |
1290 | ||
5fd2e9fd | 1291 | /* Make sure the various scopes of the event are set */ |
19abc2c6 | 1292 | BT_LOGV_STR("Validating event to append."); |
273b65be JG |
1293 | ret = bt_ctf_event_validate(event); |
1294 | if (ret) { | |
37f30168 | 1295 | goto error; |
273b65be JG |
1296 | } |
1297 | ||
0d688c15 | 1298 | /* Save the new event and freeze it */ |
19abc2c6 | 1299 | BT_LOGV_STR("Freezing the event to append."); |
0d688c15 | 1300 | bt_ctf_event_freeze(event); |
273b65be | 1301 | g_ptr_array_add(stream->events, event); |
5fd2e9fd | 1302 | |
e6a8e8e4 JG |
1303 | /* |
1304 | * Event had to hold a reference to its event class as long as it wasn't | |
1305 | * part of the same trace hierarchy. From now on, the event and its | |
1306 | * class share the same lifetime guarantees and the reference is no | |
1307 | * longer needed. | |
1308 | */ | |
19abc2c6 | 1309 | BT_LOGV_STR("Putting the event's class."); |
e6a8e8e4 | 1310 | bt_put(event->event_class); |
19abc2c6 PP |
1311 | BT_LOGV("Appended event to stream: " |
1312 | "stream-addr=%p, stream-name=\"%s\", event-addr=%p, " | |
1313 | "event-class-name=\"%s\", event-class-id=%" PRId64, | |
1314 | stream, bt_ctf_stream_get_name(stream), event, | |
1315 | bt_ctf_event_class_get_name(bt_ctf_event_borrow_event_class(event)), | |
1316 | bt_ctf_event_class_get_id(bt_ctf_event_borrow_event_class(event))); | |
37f30168 | 1317 | |
273b65be | 1318 | end: |
37f30168 PP |
1319 | return ret; |
1320 | ||
1321 | error: | |
1322 | /* | |
1323 | * Orphan the event; we were not successful in associating it to | |
1324 | * a stream. | |
1325 | */ | |
1326 | bt_object_set_parent(event, NULL); | |
1327 | ||
273b65be JG |
1328 | return ret; |
1329 | } | |
1330 | ||
12c8a1a3 JG |
1331 | struct bt_ctf_field *bt_ctf_stream_get_packet_context( |
1332 | struct bt_ctf_stream *stream) | |
1333 | { | |
1334 | struct bt_ctf_field *packet_context = NULL; | |
1335 | ||
19abc2c6 PP |
1336 | if (!stream) { |
1337 | BT_LOGW_STR("Invalid parameter: stream is NULL."); | |
1338 | goto end; | |
1339 | } | |
1340 | ||
1341 | if (stream->pos.fd < 0) { | |
1342 | BT_LOGW("Invalid parameter: stream is not a CTF writer stream: " | |
1343 | "stream-addr=%p, stream-name=\"%s\"", stream, | |
1344 | bt_ctf_stream_get_name(stream)); | |
12c8a1a3 JG |
1345 | goto end; |
1346 | } | |
1347 | ||
1348 | packet_context = stream->packet_context; | |
12c8a1a3 | 1349 | if (packet_context) { |
83509119 | 1350 | bt_get(packet_context); |
12c8a1a3 | 1351 | } |
34629a55 | 1352 | end: |
12c8a1a3 JG |
1353 | return packet_context; |
1354 | } | |
1355 | ||
1356 | int bt_ctf_stream_set_packet_context(struct bt_ctf_stream *stream, | |
1357 | struct bt_ctf_field *field) | |
1358 | { | |
1359 | int ret = 0; | |
1360 | struct bt_ctf_field_type *field_type; | |
1361 | ||
19abc2c6 PP |
1362 | if (!stream) { |
1363 | BT_LOGW_STR("Invalid parameter: stream is NULL."); | |
1364 | ret = -1; | |
1365 | goto end; | |
1366 | } | |
1367 | ||
1368 | if (stream->pos.fd < 0) { | |
1369 | BT_LOGW_STR("Invalid parameter: stream is not a CTF writer stream."); | |
12c8a1a3 JG |
1370 | ret = -1; |
1371 | goto end; | |
1372 | } | |
1373 | ||
1374 | field_type = bt_ctf_field_get_type(field); | |
09840de5 PP |
1375 | if (bt_ctf_field_type_compare(field_type, |
1376 | stream->stream_class->packet_context_type)) { | |
19abc2c6 PP |
1377 | BT_LOGW("Invalid parameter: packet context's field type is different from the stream's packet context field type: " |
1378 | "stream-addr=%p, stream-name=\"%s\", " | |
1379 | "packet-context-field-addr=%p, " | |
1380 | "packet-context-ft-addr=%p", | |
1381 | stream, bt_ctf_stream_get_name(stream), | |
1382 | field, field_type); | |
12c8a1a3 JG |
1383 | ret = -1; |
1384 | goto end; | |
1385 | } | |
1386 | ||
83509119 | 1387 | bt_put(field_type); |
83509119 | 1388 | bt_put(stream->packet_context); |
835b2d10 | 1389 | stream->packet_context = bt_get(field); |
19abc2c6 PP |
1390 | BT_LOGV("Set stream's packet context field: " |
1391 | "stream-addr=%p, stream-name=\"%s\", " | |
1392 | "packet-context-field-addr=%p", | |
1393 | stream, bt_ctf_stream_get_name(stream), field); | |
12c8a1a3 JG |
1394 | end: |
1395 | return ret; | |
1396 | } | |
1397 | ||
263a7df5 JG |
1398 | struct bt_ctf_field *bt_ctf_stream_get_packet_header( |
1399 | struct bt_ctf_stream *stream) | |
1400 | { | |
1401 | struct bt_ctf_field *packet_header = NULL; | |
1402 | ||
19abc2c6 PP |
1403 | if (!stream) { |
1404 | BT_LOGW_STR("Invalid parameter: stream is NULL."); | |
1405 | goto end; | |
1406 | } | |
1407 | ||
1408 | if (stream->pos.fd < 0) { | |
1409 | BT_LOGW("Invalid parameter: stream is not a CTF writer stream: " | |
1410 | "stream-addr=%p, stream-name=\"%s\"", stream, | |
1411 | bt_ctf_stream_get_name(stream)); | |
263a7df5 JG |
1412 | goto end; |
1413 | } | |
1414 | ||
1415 | packet_header = stream->packet_header; | |
1416 | if (packet_header) { | |
83509119 | 1417 | bt_get(packet_header); |
263a7df5 JG |
1418 | } |
1419 | end: | |
1420 | return packet_header; | |
1421 | } | |
1422 | ||
1423 | int bt_ctf_stream_set_packet_header(struct bt_ctf_stream *stream, | |
1424 | struct bt_ctf_field *field) | |
1425 | { | |
1426 | int ret = 0; | |
e6a8e8e4 | 1427 | struct bt_ctf_trace *trace = NULL; |
263a7df5 JG |
1428 | struct bt_ctf_field_type *field_type = NULL; |
1429 | ||
19abc2c6 PP |
1430 | if (!stream) { |
1431 | BT_LOGW_STR("Invalid parameter: stream is NULL."); | |
1432 | ret = -1; | |
1433 | goto end; | |
1434 | } | |
1435 | ||
1436 | if (stream->pos.fd < 0) { | |
1437 | BT_LOGW_STR("Invalid parameter: stream is not a CTF writer stream."); | |
263a7df5 JG |
1438 | ret = -1; |
1439 | goto end; | |
1440 | } | |
1441 | ||
e6a8e8e4 | 1442 | trace = (struct bt_ctf_trace *) bt_object_get_parent(stream); |
b3376dd9 PP |
1443 | |
1444 | if (!field) { | |
1445 | if (trace->packet_header_type) { | |
1446 | BT_LOGW("Invalid parameter: setting no packet header but packet header field type is not NULL: " | |
1447 | "stream-addr=%p, stream-name=\"%s\", " | |
1448 | "packet-header-field-addr=%p, " | |
1449 | "expected-ft-addr=%p", | |
1450 | stream, bt_ctf_stream_get_name(stream), | |
1451 | field, trace->packet_header_type); | |
1452 | ret = -1; | |
1453 | goto end; | |
1454 | } | |
1455 | ||
1456 | goto skip_validation; | |
1457 | } | |
1458 | ||
263a7df5 | 1459 | field_type = bt_ctf_field_get_type(field); |
b3376dd9 PP |
1460 | assert(field_type); |
1461 | ||
09840de5 | 1462 | if (bt_ctf_field_type_compare(field_type, trace->packet_header_type)) { |
19abc2c6 PP |
1463 | BT_LOGW("Invalid parameter: packet header's field type is different from the stream's packet header field type: " |
1464 | "stream-addr=%p, stream-name=\"%s\", " | |
1465 | "packet-header-field-addr=%p, " | |
1466 | "packet-header-ft-addr=%p", | |
1467 | stream, bt_ctf_stream_get_name(stream), | |
1468 | field, field_type); | |
263a7df5 JG |
1469 | ret = -1; |
1470 | goto end; | |
1471 | } | |
1472 | ||
b3376dd9 | 1473 | skip_validation: |
83509119 | 1474 | bt_put(stream->packet_header); |
835b2d10 | 1475 | stream->packet_header = bt_get(field); |
19abc2c6 PP |
1476 | BT_LOGV("Set stream's packet header field: " |
1477 | "stream-addr=%p, stream-name=\"%s\", " | |
1478 | "packet-header-field-addr=%p", | |
1479 | stream, bt_ctf_stream_get_name(stream), field); | |
263a7df5 | 1480 | end: |
e6a8e8e4 | 1481 | BT_PUT(trace); |
83509119 | 1482 | bt_put(field_type); |
263a7df5 JG |
1483 | return ret; |
1484 | } | |
1485 | ||
c9af50d1 JG |
1486 | static |
1487 | void reset_structure_field(struct bt_ctf_field *structure, const char *name) | |
1488 | { | |
1489 | struct bt_ctf_field *member; | |
1490 | ||
1491 | member = bt_ctf_field_structure_get_field(structure, name); | |
db1af8cc JD |
1492 | if (member) { |
1493 | (void) bt_ctf_field_reset(member); | |
1494 | bt_put(member); | |
1495 | } | |
c9af50d1 JG |
1496 | } |
1497 | ||
273b65be JG |
1498 | int bt_ctf_stream_flush(struct bt_ctf_stream *stream) |
1499 | { | |
1500 | int ret = 0; | |
1501 | size_t i; | |
dc3fffef PP |
1502 | struct bt_ctf_stream_pos packet_context_pos; |
1503 | struct bt_ctf_trace *trace; | |
1504 | enum bt_ctf_byte_order native_byte_order; | |
1c1d572f | 1505 | bool has_packet_size = false; |
273b65be | 1506 | |
19abc2c6 PP |
1507 | if (!stream) { |
1508 | BT_LOGW_STR("Invalid parameter: stream is NULL."); | |
1509 | ret = -1; | |
1510 | goto end; | |
1511 | } | |
1512 | ||
1513 | if (stream->pos.fd < 0) { | |
1514 | BT_LOGW_STR("Invalid parameter: stream is not a CTF writer stream."); | |
273b65be JG |
1515 | ret = -1; |
1516 | goto end; | |
1517 | } | |
1518 | ||
1c1d572f | 1519 | if (stream->packet_context) { |
b3376dd9 PP |
1520 | struct bt_ctf_field *packet_size_field; |
1521 | ||
1c1d572f JD |
1522 | packet_size_field = bt_ctf_field_structure_get_field( |
1523 | stream->packet_context, "packet_size"); | |
1524 | has_packet_size = (packet_size_field != NULL); | |
1525 | bt_put(packet_size_field); | |
1526 | } | |
1527 | ||
1528 | if (stream->flushed_packet_count == 1) { | |
b3376dd9 PP |
1529 | if (!stream->packet_context) { |
1530 | BT_LOGW_STR("Cannot flush a stream which has no packet context field more than once."); | |
1531 | ret = -1; | |
1532 | goto end; | |
1533 | } | |
1534 | ||
1c1d572f | 1535 | if (!has_packet_size) { |
b3376dd9 PP |
1536 | BT_LOGW_STR("Cannot flush a stream which has no packet context's `packet_size` field more than once."); |
1537 | ret = -1; | |
1538 | goto end; | |
1539 | } | |
664f50c8 JG |
1540 | } |
1541 | ||
19abc2c6 PP |
1542 | BT_LOGV("Flushing stream's current packet: stream-addr=%p, " |
1543 | "stream-name=\"%s\", packet-index=%u", stream, | |
1544 | bt_ctf_stream_get_name(stream), stream->flushed_packet_count); | |
dc3fffef PP |
1545 | trace = bt_ctf_stream_class_borrow_trace(stream->stream_class); |
1546 | assert(trace); | |
8a716c8d | 1547 | native_byte_order = bt_ctf_trace_get_native_byte_order(trace); |
d246b111 | 1548 | |
b3376dd9 | 1549 | ret = auto_populate_packet_header(stream); |
d246b111 | 1550 | if (ret) { |
b3376dd9 PP |
1551 | BT_LOGW_STR("Cannot automatically populate the stream's packet header field."); |
1552 | ret = -1; | |
d246b111 | 1553 | goto end; |
273b65be JG |
1554 | } |
1555 | ||
b3376dd9 PP |
1556 | ret = auto_populate_packet_context(stream); |
1557 | if (ret) { | |
1558 | BT_LOGW_STR("Cannot automatically populate the stream's packet context field."); | |
1559 | ret = -1; | |
1560 | goto end; | |
1561 | } | |
98edd02c | 1562 | |
b3376dd9 PP |
1563 | /* mmap the next packet */ |
1564 | BT_LOGV("Seeking to the next packet: pos-offset=%" PRId64, | |
1565 | stream->pos.offset); | |
1566 | bt_ctf_stream_pos_packet_seek(&stream->pos, 0, SEEK_CUR); | |
1567 | assert(stream->pos.packet_size % 8 == 0); | |
273b65be | 1568 | |
b3376dd9 PP |
1569 | if (stream->packet_header) { |
1570 | BT_LOGV_STR("Serializing packet header field."); | |
1571 | ret = bt_ctf_field_serialize(stream->packet_header, &stream->pos, | |
1572 | native_byte_order); | |
1573 | if (ret) { | |
1574 | BT_LOGW("Cannot serialize stream's packet header field: " | |
1575 | "field-addr=%p", stream->packet_header); | |
98edd02c JG |
1576 | goto end; |
1577 | } | |
b3376dd9 | 1578 | } |
12c8a1a3 | 1579 | |
b3376dd9 | 1580 | if (stream->packet_context) { |
10cb7b41 JG |
1581 | /* Write packet context */ |
1582 | memcpy(&packet_context_pos, &stream->pos, | |
dc3fffef | 1583 | sizeof(packet_context_pos)); |
19abc2c6 | 1584 | BT_LOGV_STR("Serializing packet context field."); |
10cb7b41 | 1585 | ret = bt_ctf_field_serialize(stream->packet_context, |
dc3fffef | 1586 | &stream->pos, native_byte_order); |
98edd02c | 1587 | if (ret) { |
b3376dd9 | 1588 | BT_LOGW("Cannot serialize stream's packet context field: " |
19abc2c6 | 1589 | "field-addr=%p", stream->packet_context); |
98edd02c JG |
1590 | goto end; |
1591 | } | |
12c8a1a3 JG |
1592 | } |
1593 | ||
19abc2c6 PP |
1594 | BT_LOGV("Serializing events: count=%u", stream->events->len); |
1595 | ||
273b65be JG |
1596 | for (i = 0; i < stream->events->len; i++) { |
1597 | struct bt_ctf_event *event = g_ptr_array_index( | |
1598 | stream->events, i); | |
19abc2c6 PP |
1599 | struct bt_ctf_event_class *event_class = |
1600 | bt_ctf_event_borrow_event_class(event); | |
1601 | ||
b3376dd9 | 1602 | BT_LOGV("Serializing event: index=%zu, event-addr=%p, " |
19abc2c6 PP |
1603 | "event-class-name=\"%s\", event-class-id=%" PRId64 ", " |
1604 | "pos-offset=%" PRId64 ", packet-size=%" PRIu64, | |
1605 | i, event, bt_ctf_event_class_get_name(event_class), | |
1606 | bt_ctf_event_class_get_id(event_class), | |
1607 | stream->pos.offset, stream->pos.packet_size); | |
273b65be | 1608 | |
273b65be | 1609 | /* Write event header */ |
06b019a7 JD |
1610 | if (event->event_header) { |
1611 | BT_LOGV_STR("Serializing event's header field."); | |
1612 | ret = bt_ctf_field_serialize(event->event_header, | |
1613 | &stream->pos, native_byte_order); | |
1614 | if (ret) { | |
1615 | BT_LOGW("Cannot serialize event's header field: " | |
1616 | "field-addr=%p", event->event_header); | |
1617 | goto end; | |
1618 | } | |
273b65be JG |
1619 | } |
1620 | ||
8bfa3f9c | 1621 | /* Write stream event context */ |
5fd2e9fd | 1622 | if (event->stream_event_context) { |
19abc2c6 | 1623 | BT_LOGV_STR("Serializing event's stream event context field."); |
8bfa3f9c | 1624 | ret = bt_ctf_field_serialize( |
dc3fffef PP |
1625 | event->stream_event_context, &stream->pos, |
1626 | native_byte_order); | |
8bfa3f9c | 1627 | if (ret) { |
b3376dd9 | 1628 | BT_LOGW("Cannot serialize event's stream event context field: " |
19abc2c6 | 1629 | "field-addr=%p", event->stream_event_context); |
8bfa3f9c JG |
1630 | goto end; |
1631 | } | |
1632 | } | |
1633 | ||
273b65be | 1634 | /* Write event content */ |
dc3fffef PP |
1635 | ret = bt_ctf_event_serialize(event, &stream->pos, |
1636 | native_byte_order); | |
273b65be | 1637 | if (ret) { |
19abc2c6 | 1638 | /* bt_ctf_event_serialize() logs errors */ |
273b65be JG |
1639 | goto end; |
1640 | } | |
1641 | } | |
1642 | ||
1c1d572f JD |
1643 | if (!has_packet_size && stream->pos.offset % 8 != 0) { |
1644 | BT_LOGW("Stream's packet context field type has no `packet_size` field, " | |
1645 | "but current content size is not a multiple of 8 bits: " | |
1646 | "content-size=%" PRId64 ", " | |
1647 | "packet-size=%" PRIu64, | |
1648 | stream->pos.offset, | |
1649 | stream->pos.packet_size); | |
1650 | ret = -1; | |
1651 | goto end; | |
1652 | } | |
1653 | ||
b3376dd9 | 1654 | assert(stream->pos.packet_size % 8 == 0); |
0686ef94 | 1655 | |
1c1d572f JD |
1656 | /* |
1657 | * Remove extra padding bytes. | |
1658 | */ | |
1659 | stream->pos.packet_size = (stream->pos.offset + 7) & ~7; | |
1660 | ||
98edd02c JG |
1661 | if (stream->packet_context) { |
1662 | /* | |
b3376dd9 PP |
1663 | * The whole packet is serialized at this point. Make sure that, |
1664 | * if `packet_size` is missing, the current content size is | |
1665 | * equal to the current packet size. | |
98edd02c | 1666 | */ |
b3376dd9 PP |
1667 | struct bt_ctf_field *field = bt_ctf_field_structure_get_field( |
1668 | stream->packet_context, "content_size"); | |
1669 | ||
1670 | bt_put(field); | |
1671 | if (!field) { | |
1672 | if (stream->pos.offset != stream->pos.packet_size) { | |
1673 | BT_LOGW("Stream's packet context's `content_size` field is missing, " | |
1674 | "but current packet's content size is not equal to its packet size: " | |
1675 | "content-size=%" PRId64 ", " | |
1676 | "packet-size=%" PRIu64, | |
1677 | stream->pos.offset, | |
1678 | stream->pos.packet_size); | |
1679 | ret = -1; | |
c9af50d1 JG |
1680 | goto end; |
1681 | } | |
98edd02c | 1682 | } |
273b65be | 1683 | |
b3376dd9 PP |
1684 | /* |
1685 | * Overwrite the packet context now that the stream | |
1686 | * position's packet and content sizes have the correct | |
1687 | * values. | |
1688 | * | |
1689 | * Copy base_mma as the packet may have been remapped | |
1690 | * (e.g. when a packet is resized). | |
1691 | */ | |
1692 | packet_context_pos.base_mma = stream->pos.base_mma; | |
1693 | ret = auto_populate_packet_context(stream); | |
1694 | if (ret) { | |
1695 | BT_LOGW_STR("Cannot automatically populate the stream's packet context field."); | |
1696 | ret = -1; | |
1697 | goto end; | |
98edd02c | 1698 | } |
273b65be | 1699 | |
19abc2c6 | 1700 | BT_LOGV("Rewriting (serializing) packet context field."); |
98edd02c | 1701 | ret = bt_ctf_field_serialize(stream->packet_context, |
dc3fffef | 1702 | &packet_context_pos, native_byte_order); |
98edd02c | 1703 | if (ret) { |
b3376dd9 | 1704 | BT_LOGW("Cannot serialize stream's packet context field: " |
19abc2c6 | 1705 | "field-addr=%p", stream->packet_context); |
98edd02c JG |
1706 | goto end; |
1707 | } | |
273b65be JG |
1708 | } |
1709 | ||
1710 | g_ptr_array_set_size(stream->events, 0); | |
1711 | stream->flushed_packet_count++; | |
b3376dd9 | 1712 | stream->size += stream->pos.packet_size / CHAR_BIT; |
1c1d572f JD |
1713 | |
1714 | do { | |
1715 | ret = ftruncate(stream->pos.fd, stream->size); | |
1716 | } while (ret == -1 && errno == EINTR); | |
1717 | if (ret == -1) { | |
0290b3c5 PP |
1718 | BT_LOGE_ERRNO("Cannot truncate stream file to new size", |
1719 | ": size=%" PRIu64 ", stream-addr=%p, " | |
1720 | "stream-name=\"%s\"", | |
1721 | stream->size, stream, | |
1722 | bt_ctf_stream_get_name(stream)); | |
1c1d572f JD |
1723 | } |
1724 | ||
273b65be | 1725 | end: |
c9af50d1 | 1726 | /* Reset automatically-set fields. */ |
1c1d572f JD |
1727 | if (stream->packet_context) { |
1728 | reset_structure_field(stream->packet_context, "timestamp_begin"); | |
1729 | reset_structure_field(stream->packet_context, "timestamp_end"); | |
1730 | reset_structure_field(stream->packet_context, "packet_size"); | |
1731 | reset_structure_field(stream->packet_context, "content_size"); | |
1732 | reset_structure_field(stream->packet_context, "events_discarded"); | |
1733 | } | |
cd7d8fb7 JG |
1734 | |
1735 | if (ret < 0) { | |
1736 | /* | |
1737 | * We failed to write the packet. Its size is therefore set to 0 | |
1738 | * to ensure the next mapping is done in the same place rather | |
1739 | * than advancing by "stream->pos.packet_size", which would | |
1740 | * leave a corrupted packet in the trace. | |
1741 | */ | |
1742 | stream->pos.packet_size = 0; | |
19abc2c6 | 1743 | } else { |
b3376dd9 PP |
1744 | BT_LOGV("Flushed stream's current packet: content-size=%" PRId64 ", " |
1745 | "packet-size=%" PRIu64, | |
1746 | stream->pos.offset, stream->pos.packet_size); | |
cd7d8fb7 | 1747 | } |
273b65be JG |
1748 | return ret; |
1749 | } | |
1750 | ||
19abc2c6 | 1751 | /* Pre-2.0 CTF writer backward compatibility */ |
273b65be JG |
1752 | void bt_ctf_stream_get(struct bt_ctf_stream *stream) |
1753 | { | |
83509119 | 1754 | bt_get(stream); |
273b65be JG |
1755 | } |
1756 | ||
19abc2c6 | 1757 | /* Pre-2.0 CTF writer backward compatibility */ |
273b65be JG |
1758 | void bt_ctf_stream_put(struct bt_ctf_stream *stream) |
1759 | { | |
83509119 | 1760 | bt_put(stream); |
273b65be JG |
1761 | } |
1762 | ||
1763 | static | |
83509119 | 1764 | void bt_ctf_stream_destroy(struct bt_object *obj) |
273b65be JG |
1765 | { |
1766 | struct bt_ctf_stream *stream; | |
3230ee6b | 1767 | int i; |
273b65be | 1768 | |
83509119 | 1769 | stream = container_of(obj, struct bt_ctf_stream, base); |
19abc2c6 PP |
1770 | BT_LOGD("Destroying stream object: addr=%p, name=\"%s\"", |
1771 | stream, bt_ctf_stream_get_name(stream)); | |
3230ee6b PP |
1772 | |
1773 | /* Call destroy listeners in reverse registration order */ | |
1774 | for (i = stream->destroy_listeners->len - 1; i >= 0; i--) { | |
1775 | struct bt_ctf_stream_destroy_listener *listener = | |
1776 | &g_array_index(stream->destroy_listeners, | |
1777 | struct bt_ctf_stream_destroy_listener, i); | |
1778 | ||
19abc2c6 PP |
1779 | BT_LOGD("Calling destroy listener: func=%p, data=%p, index=%d", |
1780 | listener->func, listener->data, i); | |
3230ee6b PP |
1781 | listener->func(stream, listener->data); |
1782 | } | |
1783 | ||
dc3fffef | 1784 | (void) bt_ctf_stream_pos_fini(&stream->pos); |
0686ef94 JG |
1785 | if (stream->pos.fd >= 0) { |
1786 | int ret; | |
1787 | ||
1788 | /* | |
1789 | * Truncate the file's size to the minimum required to fit the | |
1790 | * last packet as we might have grown it too much on the last | |
1791 | * mmap. | |
1792 | */ | |
1793 | do { | |
1794 | ret = ftruncate(stream->pos.fd, stream->size); | |
1795 | } while (ret == -1 && errno == EINTR); | |
1796 | if (ret) { | |
c606e638 PP |
1797 | BT_LOGE_ERRNO("Failed to truncate stream file", |
1798 | ": ret=%d, size=%" PRIu64, | |
1799 | ret, (uint64_t) stream->size); | |
0686ef94 JG |
1800 | } |
1801 | ||
1802 | if (close(stream->pos.fd)) { | |
c606e638 PP |
1803 | BT_LOGE_ERRNO("Failed to close stream file", |
1804 | ": ret=%d", ret); | |
0686ef94 | 1805 | } |
9f56e450 | 1806 | } |
12c8a1a3 | 1807 | |
12c8a1a3 | 1808 | if (stream->events) { |
19abc2c6 | 1809 | BT_LOGD_STR("Putting events."); |
12c8a1a3 JG |
1810 | g_ptr_array_free(stream->events, TRUE); |
1811 | } | |
b71d7298 PP |
1812 | |
1813 | if (stream->name) { | |
1814 | g_string_free(stream->name, TRUE); | |
1815 | } | |
41ac640a | 1816 | |
3230ee6b PP |
1817 | if (stream->comp_cur_port) { |
1818 | GHashTableIter ht_iter; | |
1819 | gpointer comp_gptr, port_gptr; | |
1820 | ||
1821 | /* | |
1822 | * Since we're destroying the stream, remove the destroy | |
1823 | * listeners that it registered for each component in | |
1824 | * its component-port mapping hash table. Otherwise they | |
1825 | * would be called and the stream would be accessed once | |
1826 | * it's freed or another stream would be accessed. | |
1827 | */ | |
1828 | g_hash_table_iter_init(&ht_iter, stream->comp_cur_port); | |
1829 | ||
1830 | while (g_hash_table_iter_next(&ht_iter, &comp_gptr, &port_gptr)) { | |
1831 | assert(comp_gptr); | |
1832 | bt_component_remove_destroy_listener((void *) comp_gptr, | |
1833 | component_destroy_listener, stream); | |
1834 | } | |
1835 | ||
1836 | g_hash_table_destroy(stream->comp_cur_port); | |
1837 | } | |
1838 | ||
1839 | if (stream->destroy_listeners) { | |
1840 | g_array_free(stream->destroy_listeners, TRUE); | |
1841 | } | |
1842 | ||
19abc2c6 | 1843 | BT_LOGD_STR("Putting packet header field."); |
83509119 | 1844 | bt_put(stream->packet_header); |
19abc2c6 | 1845 | BT_LOGD_STR("Putting packet context field."); |
83509119 | 1846 | bt_put(stream->packet_context); |
273b65be JG |
1847 | g_free(stream); |
1848 | } | |
1849 | ||
273b65be | 1850 | static |
af9296f3 | 1851 | int _set_structure_field_integer(struct bt_ctf_field *structure, char *name, |
c55a9f58 | 1852 | uint64_t value, bt_bool force) |
273b65be JG |
1853 | { |
1854 | int ret = 0; | |
d7b1ea66 | 1855 | struct bt_ctf_field_type *field_type = NULL; |
19abc2c6 | 1856 | struct bt_ctf_field *integer; |
12c8a1a3 | 1857 | |
19abc2c6 PP |
1858 | assert(structure); |
1859 | assert(name); | |
273b65be | 1860 | |
19abc2c6 | 1861 | integer = bt_ctf_field_structure_get_field(structure, name); |
12c8a1a3 JG |
1862 | if (!integer) { |
1863 | /* Field not found, not an error. */ | |
19abc2c6 PP |
1864 | BT_LOGV("Field not found: struct-field-addr=%p, " |
1865 | "name=\"%s\", force=%d", structure, name, force); | |
12c8a1a3 JG |
1866 | goto end; |
1867 | } | |
1868 | ||
1869 | /* Make sure the payload has not already been set. */ | |
af9296f3 | 1870 | if (!force && bt_ctf_field_is_set(integer)) { |
12c8a1a3 | 1871 | /* Payload already set, not an error */ |
19abc2c6 PP |
1872 | BT_LOGV("Field's payload is already set: struct-field-addr=%p, " |
1873 | "name=\"%s\", force=%d", structure, name, force); | |
12c8a1a3 JG |
1874 | goto end; |
1875 | } | |
1876 | ||
d7b1ea66 | 1877 | field_type = bt_ctf_field_get_type(integer); |
d7b1ea66 | 1878 | assert(field_type); |
1487a16a | 1879 | if (bt_ctf_field_type_get_type_id(field_type) != BT_CTF_FIELD_TYPE_ID_INTEGER) { |
d7b1ea66 JG |
1880 | /* |
1881 | * The user most likely meant for us to populate this field | |
1882 | * automatically. However, we can only do this if the field | |
1883 | * is an integer. Return an error. | |
1884 | */ | |
19abc2c6 PP |
1885 | BT_LOGW("Invalid parameter: field's type is not an integer field type: " |
1886 | "field-addr=%p, ft-addr=%p, ft-id=%s", | |
1887 | integer, field_type, | |
1888 | bt_ctf_field_type_id_string(field_type->id)); | |
d7b1ea66 JG |
1889 | ret = -1; |
1890 | goto end; | |
1891 | } | |
1892 | ||
1893 | if (bt_ctf_field_type_integer_get_signed(field_type)) { | |
1894 | ret = bt_ctf_field_signed_integer_set_value(integer, | |
1895 | (int64_t) value); | |
1896 | } else { | |
1897 | ret = bt_ctf_field_unsigned_integer_set_value(integer, value); | |
1898 | } | |
af9296f3 | 1899 | ret = !ret ? 1 : ret; |
273b65be | 1900 | end: |
83509119 JG |
1901 | bt_put(integer); |
1902 | bt_put(field_type); | |
273b65be JG |
1903 | return ret; |
1904 | } | |
b71d7298 | 1905 | |
af9296f3 JG |
1906 | /* |
1907 | * Returns the following codes: | |
1908 | * 1 if the field was found and set, | |
1909 | * 0 if nothing was done (field not found, or was already set), | |
1910 | * <0 if an error was encoutered | |
1911 | */ | |
1912 | static | |
1913 | int try_set_structure_field_integer(struct bt_ctf_field *structure, char *name, | |
1914 | uint64_t value) | |
1915 | { | |
c55a9f58 | 1916 | return _set_structure_field_integer(structure, name, value, BT_FALSE); |
af9296f3 JG |
1917 | } |
1918 | ||
b71d7298 PP |
1919 | const char *bt_ctf_stream_get_name(struct bt_ctf_stream *stream) |
1920 | { | |
1921 | const char *name = NULL; | |
1922 | ||
1923 | if (!stream) { | |
19abc2c6 | 1924 | BT_LOGW_STR("Invalid parameter: stream is NULL."); |
b71d7298 PP |
1925 | goto end; |
1926 | } | |
1927 | ||
1928 | name = stream->name ? stream->name->str : NULL; | |
1929 | ||
1930 | end: | |
1931 | return name; | |
1932 | } | |
98a4cbef PP |
1933 | |
1934 | int bt_ctf_stream_is_writer(struct bt_ctf_stream *stream) | |
1935 | { | |
1936 | int ret = -1; | |
1937 | ||
1938 | if (!stream) { | |
19abc2c6 | 1939 | BT_LOGW_STR("Invalid parameter: stream is NULL."); |
98a4cbef PP |
1940 | goto end; |
1941 | } | |
1942 | ||
1943 | ret = (stream->pos.fd >= 0); | |
1944 | ||
1945 | end: | |
1946 | return ret; | |
1947 | } | |
3230ee6b PP |
1948 | |
1949 | BT_HIDDEN | |
1950 | void bt_ctf_stream_map_component_to_port(struct bt_ctf_stream *stream, | |
1951 | struct bt_component *comp, | |
1952 | struct bt_port *port) | |
1953 | { | |
1954 | assert(stream); | |
1955 | assert(comp); | |
1956 | assert(port); | |
1957 | assert(stream->comp_cur_port); | |
1958 | ||
1959 | /* | |
1960 | * Do not take a reference to the component here because we | |
1961 | * don't want the component to exist as long as this stream | |
1962 | * exists. Instead, keep a weak reference, but add a destroy | |
1963 | * listener so that we remove this hash table entry when we know | |
1964 | * the component is destroyed. | |
1965 | */ | |
a2136eca PP |
1966 | BT_LOGV("Adding component's destroy listener for stream: " |
1967 | "stream-addr=%p, stream-name=\"%s\", comp-addr=%p, " | |
1968 | "comp-name=\"%s\", port-addr=%p, port-name=\"%s\"", | |
19abc2c6 PP |
1969 | stream, bt_ctf_stream_get_name(stream), |
1970 | comp, bt_component_get_name(comp), port, | |
1971 | bt_port_get_name(port)); | |
a2136eca PP |
1972 | bt_component_add_destroy_listener(comp, component_destroy_listener, |
1973 | stream); | |
1974 | g_hash_table_insert(stream->comp_cur_port, comp, port); | |
1975 | BT_LOGV_STR("Mapped component to port for stream."); | |
3230ee6b PP |
1976 | } |
1977 | ||
1978 | BT_HIDDEN | |
1979 | struct bt_port *bt_ctf_stream_port_for_component(struct bt_ctf_stream *stream, | |
1980 | struct bt_component *comp) | |
1981 | { | |
1982 | assert(stream); | |
1983 | assert(comp); | |
1984 | assert(stream->comp_cur_port); | |
1985 | return g_hash_table_lookup(stream->comp_cur_port, comp); | |
1986 | } | |
1987 | ||
1988 | BT_HIDDEN | |
1989 | void bt_ctf_stream_add_destroy_listener(struct bt_ctf_stream *stream, | |
1990 | bt_ctf_stream_destroy_listener_func func, void *data) | |
1991 | { | |
1992 | struct bt_ctf_stream_destroy_listener listener; | |
1993 | ||
1994 | assert(stream); | |
1995 | assert(func); | |
1996 | listener.func = func; | |
1997 | listener.data = data; | |
1998 | g_array_append_val(stream->destroy_listeners, listener); | |
19abc2c6 PP |
1999 | BT_LOGV("Added stream destroy listener: stream-addr=%p, " |
2000 | "stream-name=\"%s\", func=%p, data=%p", | |
2001 | stream, bt_ctf_stream_get_name(stream), func, data); | |
3230ee6b PP |
2002 | } |
2003 | ||
2004 | BT_HIDDEN | |
2005 | void bt_ctf_stream_remove_destroy_listener(struct bt_ctf_stream *stream, | |
2006 | bt_ctf_stream_destroy_listener_func func, void *data) | |
2007 | { | |
2008 | size_t i; | |
2009 | ||
2010 | assert(stream); | |
2011 | assert(func); | |
2012 | ||
2013 | for (i = 0; i < stream->destroy_listeners->len; i++) { | |
2014 | struct bt_ctf_stream_destroy_listener *listener = | |
2015 | &g_array_index(stream->destroy_listeners, | |
2016 | struct bt_ctf_stream_destroy_listener, i); | |
2017 | ||
2018 | if (listener->func == func && listener->data == data) { | |
2019 | g_array_remove_index(stream->destroy_listeners, i); | |
2020 | i--; | |
19abc2c6 PP |
2021 | BT_LOGV("Removed stream destroy listener: stream-addr=%p, " |
2022 | "stream-name=\"%s\", func=%p, data=%p", | |
2023 | stream, bt_ctf_stream_get_name(stream), | |
2024 | func, data); | |
3230ee6b PP |
2025 | } |
2026 | } | |
2027 | } | |
cfe11c58 PP |
2028 | |
2029 | int64_t bt_ctf_stream_get_id(struct bt_ctf_stream *stream) | |
2030 | { | |
2031 | int64_t ret; | |
2032 | ||
2033 | if (!stream) { | |
2034 | BT_LOGW_STR("Invalid parameter: stream is NULL."); | |
2035 | ret = (int64_t) -1; | |
2036 | goto end; | |
2037 | } | |
2038 | ||
2039 | ret = stream->id; | |
2040 | if (ret < 0) { | |
2041 | BT_LOGV("Stream's ID is not set: addr=%p, name=\"%s\"", | |
2042 | stream, bt_ctf_stream_get_name(stream)); | |
2043 | } | |
2044 | ||
2045 | end: | |
2046 | return ret; | |
2047 | } |