projects / babeltrace.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
lib: metadata: transform fast path precond. checks to BT_ASSERT_PRE()
[babeltrace.git] / tests / lib / test_ctf_writer.c
1 /*
2 * test_ctf_writer.c
3 *
4 * CTF Writer test
5 *
6 * Copyright 2013 - 2017 - Jérémie Galarneau <jeremie.galarneau@efficios.com>
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; under version 2 of the License.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License along
18 * with this program; if not, write to the Free Software Foundation, Inc.,
19 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20 */
21
22 #include <babeltrace/ctf-writer/writer.h>
23 #include <babeltrace/ctf-writer/clock.h>
24 #include <babeltrace/ctf-writer/stream.h>
25 #include <babeltrace/ctf-writer/event.h>
26 #include <babeltrace/ctf-writer/event-types.h>
27 #include <babeltrace/ctf-writer/event-fields.h>
28 #include <babeltrace/ctf-writer/stream-class.h>
29 #include <babeltrace/ctf-ir/packet.h>
30 #include <babeltrace/ctf-ir/clock-class.h>
31 #include <babeltrace/ctf-ir/trace.h>
32 #include <babeltrace/ref.h>
33 #include <babeltrace/ctf/events.h>
34 #include <babeltrace/values.h>
35 #include <glib.h>
36 #include <unistd.h>
37 #include <babeltrace/compat/stdlib-internal.h>
38 #include <stdio.h>
39 #include <babeltrace/compat/limits-internal.h>
40 #include <babeltrace/compat/stdio-internal.h>
41 #include <string.h>
42 #include <assert.h>
43 #include <fcntl.h>
44 #include "tap/tap.h"
45 #include <math.h>
46 #include <float.h>
47 #include "common.h"
48
49 #define METADATA_LINE_SIZE 512
50 #define SEQUENCE_TEST_LENGTH 10
51 #define ARRAY_TEST_LENGTH 5
52 #define PACKET_RESIZE_TEST_DEF_LENGTH 100000
53
54 #define DEFAULT_CLOCK_FREQ 1000000000
55 #define DEFAULT_CLOCK_PRECISION 1
56 #define DEFAULT_CLOCK_OFFSET 0
57 #define DEFAULT_CLOCK_OFFSET_S 0
58 #define DEFAULT_CLOCK_IS_ABSOLUTE 0
59 #define DEFAULT_CLOCK_TIME 0
60 #define DEFAULT_CLOCK_VALUE 0
61
62 #define NR_TESTS 476
63
64 struct bt_utsname {
65 char sysname[BABELTRACE_HOST_NAME_MAX];
66 char nodename[BABELTRACE_HOST_NAME_MAX];
67 char release[BABELTRACE_HOST_NAME_MAX];
68 char version[BABELTRACE_HOST_NAME_MAX];
69 char machine[BABELTRACE_HOST_NAME_MAX];
70 };
71
72 static int64_t current_time = 42;
73 static unsigned int packet_resize_test_length = PACKET_RESIZE_TEST_DEF_LENGTH;
74
75 /* Return 1 if uuids match, zero if different. */
76 static
77 int uuid_match(const unsigned char *uuid_a, const unsigned char *uuid_b)
78 {
79 int ret = 0;
80 int i;
81
82 if (!uuid_a || !uuid_b) {
83 goto end;
84 }
85
86 for (i = 0; i < 16; i++) {
87 if (uuid_a[i] != uuid_b[i]) {
88 goto end;
89 }
90 }
91
92 ret = 1;
93 end:
94 return ret;
95 }
96
97 static
98 void validate_trace(char *parser_path, char *trace_path)
99 {
100 int ret = 0;
101 gchar *standard_error = NULL;
102 gint exit_status;
103 char *argv[] = {parser_path, trace_path, "-o", "dummy", NULL};
104
105 if (!parser_path || !trace_path) {
106 ret = -1;
107 goto result;
108 }
109
110 if (!g_spawn_sync(NULL,
111 argv,
112 NULL,
113 G_SPAWN_STDOUT_TO_DEV_NULL,
114 NULL,
115 NULL,
116 NULL,
117 &standard_error,
118 &exit_status,
119 NULL)) {
120 diag("Failed to spawn babeltrace.");
121 ret = -1;
122 goto result;
123 }
124
125 /* Replace by g_spawn_check_exit_status when we require glib >= 2.34 */
126 #ifdef G_OS_UNIX
127 ret = WIFEXITED(exit_status) ? WEXITSTATUS(exit_status) : -1;
128 #else
129 ret = exit_status;
130 #endif
131
132 if (ret != 0) {
133 diag("Babeltrace returned an error.");
134 diag_multiline(standard_error);
135 goto result;
136 }
137
138 result:
139 ok(ret == 0, "Babeltrace could read the resulting trace");
140 g_free(standard_error);
141 }
142
143 static
144 void append_simple_event(struct bt_stream_class *stream_class,
145 struct bt_stream *stream, struct bt_ctf_clock *clock)
146 {
147 /* Create and add a simple event class */
148 struct bt_event_class *simple_event_class =
149 bt_event_class_create("Simple Event");
150 struct bt_field_type *uint_12_type =
151 bt_field_type_integer_create(12);
152 struct bt_field_type *int_64_type =
153 bt_field_type_integer_create(64);
154 struct bt_field_type *float_type =
155 bt_field_type_floating_point_create();
156 struct bt_field_type *enum_type;
157 struct bt_field_type *enum_type_unsigned =
158 bt_field_type_enumeration_create(uint_12_type);
159 struct bt_field_type *event_context_type =
160 bt_field_type_structure_create();
161 struct bt_field_type *event_payload_type = NULL;
162 struct bt_field_type *returned_type;
163 struct bt_event *simple_event;
164 struct bt_field *integer_field;
165 struct bt_field *float_field;
166 struct bt_field *enum_field;
167 struct bt_field *enum_field_unsigned;
168 struct bt_field *enum_container_field;
169 const char *mapping_name_test = "truie";
170 const double double_test_value = 3.1415;
171 struct bt_field *enum_container_field_unsigned;
172 const char *mapping_name_negative_test = "negative_value";
173 const char *ret_char;
174 double ret_double;
175 int64_t ret_range_start_int64_t, ret_range_end_int64_t;
176 uint64_t ret_range_start_uint64_t, ret_range_end_uint64_t;
177 struct bt_event_class *ret_event_class;
178 struct bt_field *packet_context;
179 struct bt_field *packet_context_field;
180 struct bt_field *stream_event_context;
181 struct bt_field *stream_event_context_field;
182 struct bt_field *event_context;
183 struct bt_field *event_context_field;
184 struct bt_field_type *ep_integer_field_type = NULL;
185 struct bt_field_type *ep_enum_field_type = NULL;
186 struct bt_field_type *ep_enum_field_unsigned_type = NULL;
187 struct bt_field_type_enumeration_mapping_iterator *iter = NULL;
188 int ret;
189
190 ok(uint_12_type, "Create an unsigned integer type");
191
192 ok(!bt_ctf_field_type_integer_set_signed(int_64_type, 1),
193 "Set signed 64 bit integer signedness to true");
194 ok(int_64_type, "Create a signed integer type");
195 enum_type = bt_field_type_enumeration_create(int_64_type);
196
197 returned_type = bt_field_type_enumeration_get_container_type(enum_type);
198 ok(returned_type == int_64_type, "bt_field_type_enumeration_get_container_type returns the right type");
199 ok(!bt_field_type_enumeration_create(enum_type),
200 "bt_field_enumeration_type_create rejects non-integer container field types");
201 bt_put(returned_type);
202
203 bt_field_type_set_alignment(float_type, 32);
204 ok(bt_field_type_get_alignment(float_type) == 32,
205 "bt_field_type_get_alignment returns a correct value");
206
207 ok(bt_field_type_floating_point_set_exponent_digits(float_type, 11) == 0,
208 "Set a floating point type's exponent digit count");
209 ok(bt_field_type_floating_point_set_mantissa_digits(float_type, 53) == 0,
210 "Set a floating point type's mantissa digit count");
211
212 ok(bt_field_type_floating_point_get_exponent_digits(float_type) == 11,
213 "bt_field_type_floating_point_get_exponent_digits returns the correct value");
214 ok(bt_field_type_floating_point_get_mantissa_digits(float_type) == 53,
215 "bt_field_type_floating_point_get_mantissa_digits returns the correct value");
216
217 ok(bt_ctf_field_type_enumeration_add_mapping(enum_type,
218 mapping_name_negative_test, -12345, 0) == 0,
219 "bt_field_type_enumeration_add_mapping accepts negative enumeration mappings");
220 ok(bt_ctf_field_type_enumeration_add_mapping(enum_type,
221 "escaping; \"test\"", 1, 1) == 0,
222 "bt_field_type_enumeration_add_mapping accepts enumeration mapping strings containing quotes");
223 ok(bt_ctf_field_type_enumeration_add_mapping(enum_type,
224 "\tanother \'escaping\'\n test\"", 2, 4) == 0,
225 "bt_field_type_enumeration_add_mapping accepts enumeration mapping strings containing special characters");
226 ok(bt_ctf_field_type_enumeration_add_mapping(enum_type,
227 "event clock int float", 5, 22) == 0,
228 "Accept enumeration mapping strings containing reserved keywords");
229 bt_ctf_field_type_enumeration_add_mapping(enum_type, mapping_name_test,
230 42, 42);
231 ok(bt_ctf_field_type_enumeration_add_mapping(enum_type, mapping_name_test,
232 43, 51) == 0, "bt_field_type_enumeration_add_mapping accepts duplicate mapping names");
233 ok(bt_ctf_field_type_enumeration_add_mapping(enum_type, "something",
234 -500, -400) == 0, "bt_field_type_enumeration_add_mapping accepts overlapping enum entries");
235 ok(bt_ctf_field_type_enumeration_add_mapping(enum_type, mapping_name_test,
236 -54, -55), "bt_field_type_enumeration_add_mapping rejects mapping where end < start");
237 bt_ctf_field_type_enumeration_add_mapping(enum_type, "another entry", -42000, -13000);
238
239 iter = bt_field_type_enumeration_find_mappings_by_signed_value(enum_type, -4200000);
240 ret = bt_field_type_enumeration_mapping_iterator_next(iter);
241 ok(iter && ret, "bt_field_type_enumeration_find_mappings_by_signed_value rejects non-mapped values");
242 BT_PUT(iter);
243
244 iter = bt_field_type_enumeration_find_mappings_by_signed_value(enum_type, 3);
245 ok(iter != NULL, "bt_field_type_enumeration_find_mappings_by_signed_value succeeds with mapped value");
246 ret = bt_field_type_enumeration_mapping_iterator_next(iter);
247 ok(!ret && bt_field_type_enumeration_mapping_iterator_get_signed(iter, NULL, NULL, NULL) == 0,
248 "bt_field_type_enumeration_mapping_iterator_get_signed handles mapped values correctly");
249 BT_PUT(iter);
250
251 ok(bt_event_class_add_field(simple_event_class, enum_type,
252 "enum_field") == 0, "Add signed enumeration field to event");
253
254 ok(bt_field_type_enumeration_get_mapping_signed(enum_type, 0, NULL,
255 &ret_range_start_int64_t, &ret_range_end_int64_t) == 0,
256 "bt_field_type_enumeration_get_mapping_signed handles a NULL string correctly");
257 ok(bt_field_type_enumeration_get_mapping_signed(enum_type, 0, &ret_char,
258 NULL, &ret_range_end_int64_t) == 0,
259 "bt_field_type_enumeration_get_mapping_signed handles a NULL start correctly");
260 ok(bt_field_type_enumeration_get_mapping_signed(enum_type, 0, &ret_char,
261 &ret_range_start_int64_t, NULL) == 0,
262 "bt_field_type_enumeration_get_mapping_signed handles a NULL end correctly");
263 /* Assumes entries are sorted by range_start values. */
264 ok(bt_field_type_enumeration_get_mapping_signed(enum_type, 6, &ret_char,
265 &ret_range_start_int64_t, &ret_range_end_int64_t) == 0,
266 "bt_field_type_enumeration_get_mapping_signed returns a value");
267 ok(!strcmp(ret_char, mapping_name_test),
268 "bt_field_type_enumeration_get_mapping_signed returns a correct mapping name");
269 ok(ret_range_start_int64_t == 42,
270 "bt_field_type_enumeration_get_mapping_signed returns a correct mapping start");
271 ok(ret_range_end_int64_t == 42,
272 "bt_field_type_enumeration_get_mapping_signed returns a correct mapping end");
273
274 ok(bt_field_type_enumeration_add_mapping_unsigned(enum_type_unsigned,
275 "escaping; \"test\"", 0, 0) == 0,
276 "bt_field_type_enumeration_add_mapping_unsigned accepts enumeration mapping strings containing quotes");
277 ok(bt_field_type_enumeration_add_mapping_unsigned(enum_type_unsigned,
278 "\tanother \'escaping\'\n test\"", 1, 4) == 0,
279 "bt_field_type_enumeration_add_mapping_unsigned accepts enumeration mapping strings containing special characters");
280 ok(bt_field_type_enumeration_add_mapping_unsigned(enum_type_unsigned,
281 "event clock int float", 5, 22) == 0,
282 "bt_field_type_enumeration_add_mapping_unsigned accepts enumeration mapping strings containing reserved keywords");
283 ok(bt_field_type_enumeration_add_mapping_unsigned(enum_type_unsigned, mapping_name_test,
284 42, 42) == 0, "bt_field_type_enumeration_add_mapping_unsigned accepts single-value ranges");
285 ok(bt_field_type_enumeration_add_mapping_unsigned(enum_type_unsigned, mapping_name_test,
286 43, 51) == 0, "bt_field_type_enumeration_add_mapping_unsigned accepts duplicate mapping names");
287 ok(bt_field_type_enumeration_add_mapping_unsigned(enum_type_unsigned, "something",
288 7, 8) == 0, "bt_field_type_enumeration_add_mapping_unsigned accepts overlapping enum entries");
289 ok(bt_field_type_enumeration_add_mapping_unsigned(enum_type_unsigned, mapping_name_test,
290 55, 54), "bt_field_type_enumeration_add_mapping_unsigned rejects mapping where end < start");
291 ok(bt_event_class_add_field(simple_event_class, enum_type_unsigned,
292 "enum_field_unsigned") == 0, "Add unsigned enumeration field to event");
293
294 ok(bt_field_type_enumeration_get_mapping_count(enum_type_unsigned) == 6,
295 "bt_field_type_enumeration_get_mapping_count returns the correct value");
296
297 ok(bt_field_type_enumeration_get_mapping_unsigned(enum_type_unsigned, 0, NULL,
298 &ret_range_start_uint64_t, &ret_range_end_uint64_t) == 0,
299 "bt_field_type_enumeration_get_mapping_unsigned handles a NULL string correctly");
300 ok(bt_field_type_enumeration_get_mapping_unsigned(enum_type_unsigned, 0, &ret_char,
301 NULL, &ret_range_end_uint64_t) == 0,
302 "bt_field_type_enumeration_get_mapping_unsigned handles a NULL start correctly");
303 ok(bt_field_type_enumeration_get_mapping_unsigned(enum_type_unsigned, 0, &ret_char,
304 &ret_range_start_uint64_t, NULL) == 0,
305 "bt_field_type_enumeration_get_mapping_unsigned handles a NULL end correctly");
306 ok(bt_field_type_enumeration_get_mapping_unsigned(enum_type_unsigned, 4, &ret_char,
307 &ret_range_start_uint64_t, &ret_range_end_uint64_t) == 0,
308 "bt_field_type_enumeration_get_mapping_unsigned returns a value");
309 ok(!strcmp(ret_char, mapping_name_test),
310 "bt_field_type_enumeration_get_mapping_unsigned returns a correct mapping name");
311 ok(ret_range_start_uint64_t == 42,
312 "bt_field_type_enumeration_get_mapping_unsigned returns a correct mapping start");
313 ok(ret_range_end_uint64_t == 42,
314 "bt_field_type_enumeration_get_mapping_unsigned returns a correct mapping end");
315
316 bt_event_class_add_field(simple_event_class, uint_12_type,
317 "integer_field");
318 bt_event_class_add_field(simple_event_class, float_type,
319 "float_field");
320
321 assert(!bt_event_class_set_id(simple_event_class, 13));
322
323 /* Set an event context type which will contain a single integer. */
324 ok(!bt_field_type_structure_add_field(event_context_type, uint_12_type,
325 "event_specific_context"),
326 "Add event specific context field");
327
328 ok(bt_event_class_set_context_type(NULL, event_context_type) < 0,
329 "bt_event_class_set_context_type handles a NULL event class correctly");
330 ok(!bt_event_class_set_context_type(simple_event_class, event_context_type),
331 "Set an event class' context type successfully");
332 returned_type = bt_event_class_get_context_type(simple_event_class);
333 ok(returned_type == event_context_type,
334 "bt_event_class_get_context_type returns the appropriate type");
335 bt_put(returned_type);
336
337 ok(!bt_stream_class_add_event_class(stream_class, simple_event_class),
338 "Adding simple event class to stream class");
339
340 /*
341 * bt_stream_class_add_event_class() copies the field types
342 * of simple_event_class, so we retrieve the new ones to create
343 * the appropriate fields.
344 */
345 BT_PUT(event_context_type);
346 BT_PUT(event_payload_type);
347 event_payload_type = bt_event_class_get_payload_type(
348 simple_event_class);
349 assert(event_payload_type);
350 event_context_type = bt_event_class_get_context_type(
351 simple_event_class);
352 assert(event_context_type);
353 ep_integer_field_type =
354 bt_field_type_structure_get_field_type_by_name(
355 event_payload_type, "integer_field");
356 assert(ep_integer_field_type);
357 ep_enum_field_type =
358 bt_field_type_structure_get_field_type_by_name(
359 event_payload_type, "enum_field");
360 assert(ep_enum_field_type);
361 ep_enum_field_unsigned_type =
362 bt_field_type_structure_get_field_type_by_name(
363 event_payload_type, "enum_field_unsigned");
364 assert(ep_enum_field_unsigned_type);
365
366 ok(bt_stream_class_get_event_class_count(stream_class) == 1,
367 "bt_stream_class_get_event_class_count returns a correct number of event classes");
368 ret_event_class = bt_stream_class_get_event_class_by_index(stream_class, 0);
369 ok(ret_event_class == simple_event_class,
370 "bt_stream_class_get_event_class returns the correct event class");
371 bt_put(ret_event_class);
372 ok(!bt_stream_class_get_event_class_by_id(stream_class, 2),
373 "bt_stream_class_get_event_class_by_id returns NULL when the requested ID doesn't exist");
374 ret_event_class =
375 bt_stream_class_get_event_class_by_id(stream_class, 13);
376 ok(ret_event_class == simple_event_class,
377 "bt_stream_class_get_event_class_by_id returns a correct event class");
378 bt_put(ret_event_class);
379
380 simple_event = bt_event_create(simple_event_class);
381 ok(simple_event,
382 "Instantiate an event containing a single integer field");
383
384 integer_field = bt_field_create(ep_integer_field_type);
385 bt_field_unsigned_integer_set_value(integer_field, 42);
386 ok(bt_event_set_payload(simple_event, "integer_field",
387 integer_field) == 0, "Use bt_event_set_payload to set a manually allocated field");
388
389 float_field = bt_event_get_payload(simple_event, "float_field");
390 bt_field_floating_point_set_value(float_field, double_test_value);
391 ok(!bt_field_floating_point_get_value(float_field, &ret_double),
392 "bt_field_floating_point_get_value returns a double value");
393 ok(fabs(ret_double - double_test_value) <= DBL_EPSILON,
394 "bt_field_floating_point_get_value returns a correct value");
395
396 enum_field = bt_field_create(ep_enum_field_type);
397 assert(enum_field);
398
399 enum_container_field = bt_field_enumeration_get_container(enum_field);
400 ok(bt_field_signed_integer_set_value(
401 enum_container_field, -42) == 0,
402 "Set signed enumeration container value");
403 iter = bt_field_enumeration_get_mappings(enum_field);
404 ok(iter, "bt_field_enumeration_get_mappings returns an iterator to matching mappings");
405 ret = bt_field_type_enumeration_mapping_iterator_next(iter);
406 ok(!ret, "bt_field_enumeration_get_mappings returned a non-empty match");
407 ret = bt_field_type_enumeration_mapping_iterator_get_signed(iter, &ret_char, NULL, NULL);
408 ok(!ret && ret_char, "bt_field_type_enumeration_mapping_iterator_get_signed return a mapping name");
409 assert(ret_char);
410 ok(!strcmp(ret_char, mapping_name_negative_test),
411 "bt_field_enumeration_get_single_mapping_name returns the correct mapping name with an signed container");
412 ret = bt_event_set_payload(simple_event, "enum_field", enum_field);
413 assert(!ret);
414 BT_PUT(iter);
415
416 enum_field_unsigned = bt_field_create(ep_enum_field_unsigned_type);
417 assert(enum_field_unsigned);
418 enum_container_field_unsigned = bt_field_enumeration_get_container(
419 enum_field_unsigned);
420 ok(bt_field_unsigned_integer_set_value(
421 enum_container_field_unsigned, 42) == 0,
422 "Set unsigned enumeration container value");
423 ret = bt_event_set_payload(simple_event, "enum_field_unsigned",
424 enum_field_unsigned);
425 assert(!ret);
426 iter = bt_field_enumeration_get_mappings(enum_field_unsigned);
427 assert(iter);
428 ret = bt_field_type_enumeration_mapping_iterator_next(iter);
429 assert(!ret);
430 (void) bt_field_type_enumeration_mapping_iterator_get_unsigned(iter, &ret_char, NULL, NULL);
431 ok(ret_char && !strcmp(ret_char, mapping_name_test),
432 "bt_field_type_enumeration_mapping_iterator_get_unsigned returns the correct mapping name with an unsigned container");
433
434 ok(bt_ctf_clock_set_time(clock, current_time) == 0, "Set clock time");
435
436 /* Populate stream event context */
437 stream_event_context =
438 bt_event_get_stream_event_context(simple_event);
439 assert(stream_event_context);
440 stream_event_context_field = bt_field_structure_get_field_by_name(
441 stream_event_context, "common_event_context");
442 bt_field_unsigned_integer_set_value(stream_event_context_field, 42);
443
444 /* Populate the event's context */
445 event_context = bt_event_get_event_context(simple_event);
446 ok(event_context,
447 "bt_event_get_event_context returns a field");
448 returned_type = bt_field_get_type(event_context);
449 ok(returned_type == event_context_type,
450 "bt_event_get_event_context returns a field of the appropriate type");
451 event_context_field = bt_field_structure_get_field_by_name(event_context,
452 "event_specific_context");
453 ok(!bt_field_unsigned_integer_set_value(event_context_field, 1234),
454 "Successfully set an event context's value");
455 ok(!bt_event_set_event_context(simple_event, event_context),
456 "Set an event context successfully");
457
458 ok(bt_stream_append_event(stream, simple_event) == 0,
459 "Append simple event to trace stream");
460
461 packet_context = bt_stream_get_packet_context(stream);
462 ok(packet_context,
463 "bt_stream_get_packet_context returns a packet context");
464
465 packet_context_field = bt_field_structure_get_field_by_name(packet_context,
466 "packet_size");
467 ok(packet_context_field,
468 "Packet context contains the default packet_size field.");
469 bt_put(packet_context_field);
470 packet_context_field = bt_field_structure_get_field_by_name(packet_context,
471 "custom_packet_context_field");
472 ok(bt_field_unsigned_integer_set_value(packet_context_field, 8) == 0,
473 "Custom packet context field value successfully set.");
474
475 ok(bt_stream_set_packet_context(stream, packet_context) == 0,
476 "Successfully set a stream's packet context");
477
478 ok(bt_stream_flush(stream) == 0,
479 "Flush trace stream with one event");
480
481 bt_put(simple_event_class);
482 bt_put(simple_event);
483 bt_put(uint_12_type);
484 bt_put(int_64_type);
485 bt_put(float_type);
486 bt_put(enum_type);
487 bt_put(enum_type_unsigned);
488 bt_put(returned_type);
489 bt_put(event_context_type);
490 bt_put(integer_field);
491 bt_put(float_field);
492 bt_put(enum_field);
493 bt_put(enum_field_unsigned);
494 bt_put(enum_container_field);
495 bt_put(enum_container_field_unsigned);
496 bt_put(packet_context);
497 bt_put(packet_context_field);
498 bt_put(stream_event_context);
499 bt_put(stream_event_context_field);
500 bt_put(event_context);
501 bt_put(event_context_field);
502 bt_put(event_payload_type);
503 bt_put(ep_integer_field_type);
504 bt_put(ep_enum_field_type);
505 bt_put(ep_enum_field_unsigned_type);
506 bt_put(iter);
507 }
508
509 static
510 void append_complex_event(struct bt_stream_class *stream_class,
511 struct bt_stream *stream, struct bt_ctf_clock *clock)
512 {
513 int i, ret;
514 struct event_class_attrs_counts ;
515 const char *complex_test_event_string = "Complex Test Event";
516 const char *test_string_1 = "Test ";
517 const char *test_string_2 = "string ";
518 const char *test_string_3 = "abcdefghi";
519 const char *test_string_4 = "abcd\0efg\0hi";
520 const char *test_string_cat = "Test string abcdeefg";
521 struct bt_field_type *uint_35_type =
522 bt_field_type_integer_create(35);
523 struct bt_field_type *int_16_type =
524 bt_field_type_integer_create(16);
525 struct bt_field_type *uint_3_type =
526 bt_field_type_integer_create(3);
527 struct bt_field_type *enum_variant_type =
528 bt_field_type_enumeration_create(uint_3_type);
529 struct bt_field_type *variant_type =
530 bt_field_type_variant_create(enum_variant_type,
531 "variant_selector");
532 struct bt_field_type *string_type =
533 bt_field_type_string_create();
534 struct bt_field_type *sequence_type;
535 struct bt_field_type *array_type;
536 struct bt_field_type *inner_structure_type =
537 bt_field_type_structure_create();
538 struct bt_field_type *complex_structure_type =
539 bt_field_type_structure_create();
540 struct bt_field_type *ret_field_type;
541 struct bt_event_class *event_class;
542 struct bt_event *event;
543 struct bt_field *uint_35_field, *int_16_field, *a_string_field,
544 *inner_structure_field, *complex_structure_field,
545 *a_sequence_field, *enum_variant_field, *enum_container_field,
546 *variant_field, *an_array_field, *stream_event_ctx_field,
547 *stream_event_ctx_int_field, *ret_field;
548 uint64_t ret_unsigned_int;
549 int64_t ret_signed_int;
550 const char *ret_string;
551 struct bt_stream_class *ret_stream_class;
552 struct bt_event_class *ret_event_class;
553 struct bt_field *packet_context, *packet_context_field;
554 struct bt_field_type_enumeration_mapping_iterator *iter = NULL;
555
556 ok(bt_field_type_set_alignment(int_16_type, 0),
557 "bt_field_type_set_alignment handles 0-alignment correctly");
558 ok(bt_field_type_set_alignment(int_16_type, 3),
559 "bt_field_type_set_alignment handles wrong alignment correctly (3)");
560 ok(bt_field_type_set_alignment(int_16_type, 24),
561 "bt_field_type_set_alignment handles wrong alignment correctly (24)");
562 ok(!bt_field_type_set_alignment(int_16_type, 4),
563 "bt_field_type_set_alignment handles correct alignment correctly (4)");
564 ok(!bt_field_type_set_alignment(int_16_type, 32),
565 "Set alignment of signed 16 bit integer to 32");
566 ok(!bt_ctf_field_type_integer_set_signed(int_16_type, 1),
567 "Set integer signedness to true");
568 ok(!bt_field_type_integer_set_base(uint_35_type,
569 BT_INTEGER_BASE_HEXADECIMAL),
570 "Set signed 16 bit integer base to hexadecimal");
571
572 array_type = bt_field_type_array_create(int_16_type, ARRAY_TEST_LENGTH);
573 sequence_type = bt_field_type_sequence_create(int_16_type,
574 "seq_len");
575
576 ret_field_type = bt_field_type_array_get_element_type(
577 array_type);
578 ok(ret_field_type == int_16_type,
579 "bt_field_type_array_get_element_type returns the correct type");
580 bt_put(ret_field_type);
581
582 ok(bt_field_type_array_get_length(array_type) == ARRAY_TEST_LENGTH,
583 "bt_field_type_array_get_length returns the correct length");
584
585 ok(bt_field_type_structure_add_field(inner_structure_type,
586 inner_structure_type, "yes"), "Cannot add self to structure");
587 ok(!bt_field_type_structure_add_field(inner_structure_type,
588 uint_35_type, "seq_len"), "Add seq_len field to inner structure");
589 ok(!bt_field_type_structure_add_field(inner_structure_type,
590 sequence_type, "a_sequence"), "Add a_sequence field to inner structure");
591 ok(!bt_field_type_structure_add_field(inner_structure_type,
592 array_type, "an_array"), "Add an_array field to inner structure");
593
594 bt_ctf_field_type_enumeration_add_mapping(enum_variant_type,
595 "UINT3_TYPE", 0, 0);
596 bt_ctf_field_type_enumeration_add_mapping(enum_variant_type,
597 "INT16_TYPE", 1, 1);
598 bt_ctf_field_type_enumeration_add_mapping(enum_variant_type,
599 "UINT35_TYPE", 2, 7);
600
601 iter = bt_field_type_enumeration_find_mappings_by_name(enum_variant_type, "INT16_TYPE");
602 ok(iter != NULL, "bt_field_type_enumeration_find_mappings_by_name returns a non-NULL iterator");
603 ret = bt_field_type_enumeration_mapping_iterator_next(iter);
604 ok(!ret, "bt_field_type_enumeration_find_mappings_by_name handles an existing mapping correctly");
605 ok(bt_field_type_enumeration_mapping_iterator_get_unsigned(iter, NULL, NULL, NULL) == 0,
606 "bt_field_type_enumeration_mapping_iterator_get_unsigned handles mapped values correctly");
607 BT_PUT(iter);
608
609 iter = bt_field_type_enumeration_find_mappings_by_unsigned_value(enum_variant_type, -42);
610 ret = bt_field_type_enumeration_mapping_iterator_next(iter);
611 ok(iter && ret, "bt_field_type_enumeration_find_mappings_by_unsigned_value handles invalid values correctly");
612 BT_PUT(iter);
613
614 iter = bt_field_type_enumeration_find_mappings_by_unsigned_value(enum_variant_type, 5);
615 ret = bt_field_type_enumeration_mapping_iterator_next(iter);
616 ok(iter != NULL && !ret, "bt_field_type_enumeration_find_mappings_by_unsigned_value handles valid values correctly");
617 BT_PUT(iter);
618
619 ok(bt_field_type_variant_add_field(variant_type, uint_3_type,
620 "An unknown entry"), "Reject a variant field based on an unknown tag value");
621 ok(bt_field_type_variant_add_field(variant_type, uint_3_type,
622 "UINT3_TYPE") == 0, "Add a field to a variant");
623 ok(!bt_field_type_variant_add_field(variant_type, int_16_type,
624 "INT16_TYPE"), "Add INT16_TYPE field to variant");
625 ok(!bt_field_type_variant_add_field(variant_type, uint_35_type,
626 "UINT35_TYPE"), "Add UINT35_TYPE field to variant");
627
628 ret_field_type = bt_field_type_variant_get_tag_type(variant_type);
629 ok(ret_field_type == enum_variant_type,
630 "bt_field_type_variant_get_tag_type returns a correct tag type");
631 bt_put(ret_field_type);
632
633 ret_string = bt_field_type_variant_get_tag_name(variant_type);
634 ok(ret_string ? !strcmp(ret_string, "variant_selector") : 0,
635 "bt_field_type_variant_get_tag_name returns the correct variant tag name");
636 ret_field_type = bt_field_type_variant_get_field_type_by_name(
637 variant_type, "INT16_TYPE");
638 ok(ret_field_type == int_16_type,
639 "bt_field_type_variant_get_field_type_by_name returns a correct field type");
640 bt_put(ret_field_type);
641
642 ok(bt_field_type_variant_get_field_count(variant_type) == 3,
643 "bt_field_type_variant_get_field_count returns the correct count");
644
645 ok(bt_field_type_variant_get_field_by_index(variant_type, NULL, &ret_field_type, 0) == 0,
646 "bt_field_type_variant_get_field handles a NULL field name correctly");
647 bt_put(ret_field_type);
648 ok(bt_field_type_variant_get_field_by_index(variant_type, &ret_string, NULL, 0) == 0,
649 "bt_field_type_variant_get_field handles a NULL field type correctly");
650 ok(bt_field_type_variant_get_field_by_index(variant_type, &ret_string, &ret_field_type, 1) == 0,
651 "bt_field_type_variant_get_field returns a field");
652 ok(!strcmp("INT16_TYPE", ret_string),
653 "bt_field_type_variant_get_field returns a correct field name");
654 ok(ret_field_type == int_16_type,
655 "bt_field_type_variant_get_field returns a correct field type");
656 bt_put(ret_field_type);
657
658 ok(!bt_field_type_structure_add_field(complex_structure_type,
659 enum_variant_type, "variant_selector"),
660 "Add variant_selector field to complex structure");
661 ok(!bt_field_type_structure_add_field(complex_structure_type,
662 string_type, "string"), "Add `string` field to complex structure");
663 ok(!bt_field_type_structure_add_field(complex_structure_type,
664 variant_type, "variant_value"),
665 "Add variant_value field to complex structure");
666 ok(!bt_field_type_structure_add_field(complex_structure_type,
667 inner_structure_type, "inner_structure"),
668 "Add inner_structure field to complex structure");
669
670 event_class = bt_event_class_create(complex_test_event_string);
671 ok(event_class, "Create an event class");
672 ok(bt_event_class_add_field(event_class, uint_35_type, ""),
673 "Reject addition of a field with an empty name to an event");
674 ok(bt_event_class_add_field(event_class, NULL, "an_integer"),
675 "Reject addition of a field with a NULL type to an event");
676 ok(bt_event_class_add_field(event_class, uint_35_type,
677 "int"),
678 "Reject addition of a type with an illegal name to an event");
679 ok(bt_event_class_add_field(event_class, uint_35_type,
680 "uint_35") == 0,
681 "Add field of type unsigned integer to an event");
682 ok(bt_event_class_add_field(event_class, int_16_type,
683 "int_16") == 0, "Add field of type signed integer to an event");
684 ok(bt_event_class_add_field(event_class, complex_structure_type,
685 "complex_structure") == 0,
686 "Add composite structure to an event");
687
688 ret_string = bt_event_class_get_name(event_class);
689 ok(!strcmp(ret_string, complex_test_event_string),
690 "bt_event_class_get_name returns a correct name");
691 ok(bt_event_class_get_id(event_class) < 0,
692 "bt_event_class_get_id returns a negative value when not set");
693 ok(bt_event_class_set_id(NULL, 42) < 0,
694 "bt_event_class_set_id handles NULL correctly");
695 ok(bt_event_class_set_id(event_class, 42) == 0,
696 "Set an event class' id");
697 ok(bt_event_class_get_id(event_class) == 42,
698 "bt_event_class_get_id returns the correct value");
699
700 /* Test event class attributes */
701 ok(bt_event_class_get_log_level(event_class) == BT_EVENT_CLASS_LOG_LEVEL_UNSPECIFIED,
702 "event class has the expected initial log level");
703 ok(!bt_event_class_get_emf_uri(event_class),
704 "as expected, event class has no initial EMF URI");
705 ok(bt_event_class_set_log_level(NULL, BT_EVENT_CLASS_LOG_LEVEL_INFO),
706 "bt_event_class_set_log_level handles a NULL event class correctly");
707 ok(bt_event_class_set_log_level(event_class, BT_EVENT_CLASS_LOG_LEVEL_UNKNOWN),
708 "bt_event_class_set_log_level handles an unknown log level correctly");
709 ok(!bt_event_class_set_log_level(event_class, BT_EVENT_CLASS_LOG_LEVEL_INFO),
710 "bt_event_class_set_log_level succeeds with a valid log level");
711 ok(bt_event_class_get_log_level(event_class) == BT_EVENT_CLASS_LOG_LEVEL_INFO,
712 "bt_event_class_get_log_level returns the expected log level");
713 ok(bt_event_class_set_emf_uri(NULL, "http://diamon.org/babeltrace/"),
714 "bt_event_class_set_emf_uri handles a NULL event class correctly");
715 ok(!bt_event_class_set_emf_uri(event_class, "http://diamon.org/babeltrace/"),
716 "bt_event_class_set_emf_uri succeeds with a valid EMF URI");
717 ok(strcmp(bt_event_class_get_emf_uri(event_class), "http://diamon.org/babeltrace/") == 0,
718 "bt_event_class_get_emf_uri returns the expected EMF URI");
719 ok(!bt_event_class_set_emf_uri(event_class, NULL),
720 "bt_event_class_set_emf_uri succeeds with NULL (to reset)");
721 ok(!bt_event_class_get_emf_uri(event_class),
722 "as expected, event class has no EMF URI after reset");
723
724 /* Add event class to the stream class */
725 ok(bt_stream_class_add_event_class(stream_class, NULL),
726 "Reject addition of NULL event class to a stream class");
727 ok(bt_stream_class_add_event_class(stream_class,
728 event_class) == 0, "Add an event class to stream class");
729
730 ret_stream_class = bt_event_class_get_stream_class(event_class);
731 ok(ret_stream_class == stream_class,
732 "bt_event_class_get_stream_class returns the correct stream class");
733 bt_put(ret_stream_class);
734
735 ok(bt_event_class_get_payload_type_field_count(event_class) == 3,
736 "bt_event_class_get_field_count returns a correct value");
737
738 ok(bt_event_class_get_payload_type_field_by_index(event_class, &ret_string,
739 NULL, 0) == 0,
740 "bt_event_class_get_field handles a NULL field type correctly");
741 ok(bt_event_class_get_payload_type_field_by_index(event_class, &ret_string,
742 &ret_field_type, 0) == 0,
743 "bt_event_class_get_field returns a field");
744 ok(bt_field_type_compare(ret_field_type, uint_35_type) == 0,
745 "bt_event_class_get_field returns a correct field type");
746 bt_put(ret_field_type);
747 ok(!strcmp(ret_string, "uint_35"),
748 "bt_event_class_get_field returns a correct field name");
749 ok(bt_ctf_event_class_get_field_by_name(event_class, "truie") == NULL,
750 "bt_event_class_get_field_by_name handles an invalid field name correctly");
751 ret_field_type = bt_ctf_event_class_get_field_by_name(event_class,
752 "complex_structure");
753 ok(bt_field_type_compare(ret_field_type, complex_structure_type) == 0,
754 "bt_event_class_get_field_by_name returns a correct field type");
755 bt_put(ret_field_type);
756
757 event = bt_event_create(event_class);
758 ok(event, "Instanciate a complex event");
759
760 ret_event_class = bt_event_get_class(event);
761 ok(ret_event_class == event_class,
762 "bt_event_get_class returns the correct event class");
763 bt_put(ret_event_class);
764
765 uint_35_field = bt_event_get_payload(event, "uint_35");
766 ok(uint_35_field, "Use bt_event_get_payload to get a field instance ");
767 bt_field_unsigned_integer_set_value(uint_35_field, 0x0DDF00D);
768 ok(bt_field_unsigned_integer_get_value(uint_35_field,
769 &ret_unsigned_int) == 0,
770 "bt_field_unsigned_integer_get_value succeeds after setting a value");
771 ok(ret_unsigned_int == 0x0DDF00D,
772 "bt_field_unsigned_integer_get_value returns the correct value");
773 bt_put(uint_35_field);
774
775 int_16_field = bt_event_get_payload(event, "int_16");
776 bt_field_signed_integer_set_value(int_16_field, -12345);
777 ok(bt_field_signed_integer_get_value(int_16_field,
778 &ret_signed_int) == 0,
779 "bt_field_signed_integer_get_value succeeds after setting a value");
780 ok(ret_signed_int == -12345,
781 "bt_field_signed_integer_get_value returns the correct value");
782 bt_put(int_16_field);
783
784 complex_structure_field = bt_event_get_payload(event,
785 "complex_structure");
786
787 inner_structure_field = bt_field_structure_get_field_by_index(
788 complex_structure_field, 3);
789 ret_field_type = bt_field_get_type(inner_structure_field);
790 bt_put(inner_structure_field);
791 ok(bt_field_type_compare(ret_field_type, inner_structure_type) == 0,
792 "bt_field_structure_get_field_by_index returns a correct field");
793 bt_put(ret_field_type);
794
795 inner_structure_field = bt_field_structure_get_field_by_name(
796 complex_structure_field, "inner_structure");
797 a_string_field = bt_field_structure_get_field_by_name(
798 complex_structure_field, "string");
799 enum_variant_field = bt_field_structure_get_field_by_name(
800 complex_structure_field, "variant_selector");
801 variant_field = bt_field_structure_get_field_by_name(
802 complex_structure_field, "variant_value");
803 uint_35_field = bt_field_structure_get_field_by_name(
804 inner_structure_field, "seq_len");
805 a_sequence_field = bt_field_structure_get_field_by_name(
806 inner_structure_field, "a_sequence");
807 an_array_field = bt_field_structure_get_field_by_name(
808 inner_structure_field, "an_array");
809
810 enum_container_field = bt_field_enumeration_get_container(
811 enum_variant_field);
812 bt_field_unsigned_integer_set_value(enum_container_field, 1);
813 int_16_field = bt_field_variant_get_field(variant_field,
814 enum_variant_field);
815 bt_field_signed_integer_set_value(int_16_field, -200);
816 bt_put(int_16_field);
817 bt_field_string_set_value(a_string_field,
818 test_string_1);
819 ok(!bt_field_string_append(a_string_field, test_string_2),
820 "bt_field_string_append succeeds");
821 ok(!bt_field_string_append_len(a_string_field, test_string_3, 5),
822 "bt_field_string_append_len succeeds (append 5 characters)");
823 ok(!bt_field_string_append_len(a_string_field, &test_string_4[5], 3),
824 "bt_field_string_append_len succeeds (append 0 characters)");
825 ok(!bt_field_string_append_len(a_string_field, test_string_3, 0),
826 "bt_field_string_append_len succeeds (append 0 characters)");
827
828 ret_string = bt_field_string_get_value(a_string_field);
829 ok(ret_string, "bt_field_string_get_value returns a string");
830 ok(ret_string ? !strcmp(ret_string, test_string_cat) : 0,
831 "bt_field_string_get_value returns a correct value");
832 bt_field_unsigned_integer_set_value(uint_35_field,
833 SEQUENCE_TEST_LENGTH);
834
835 ret_field_type = bt_field_type_variant_get_field_type_from_tag(
836 variant_type, enum_variant_field);
837 ok(ret_field_type == int_16_type,
838 "bt_field_type_variant_get_field_type_from_tag returns the correct field type");
839
840 ok(bt_field_sequence_set_length(a_sequence_field,
841 uint_35_field) == 0, "Set a sequence field's length");
842 ret_field = bt_field_sequence_get_length(a_sequence_field);
843 ok(ret_field == uint_35_field,
844 "bt_field_sequence_get_length returns the correct length field");
845
846 for (i = 0; i < SEQUENCE_TEST_LENGTH; i++) {
847 int_16_field = bt_field_sequence_get_field(
848 a_sequence_field, i);
849 bt_field_signed_integer_set_value(int_16_field, 4 - i);
850 bt_put(int_16_field);
851 }
852
853 for (i = 0; i < ARRAY_TEST_LENGTH; i++) {
854 int_16_field = bt_field_array_get_field(
855 an_array_field, i);
856 bt_field_signed_integer_set_value(int_16_field, i);
857 bt_put(int_16_field);
858 }
859
860 stream_event_ctx_field = bt_event_get_stream_event_context(event);
861 assert(stream_event_ctx_field);
862 stream_event_ctx_int_field = bt_field_structure_get_field_by_name(
863 stream_event_ctx_field, "common_event_context");
864 BT_PUT(stream_event_ctx_field);
865 bt_field_unsigned_integer_set_value(stream_event_ctx_int_field, 17);
866 BT_PUT(stream_event_ctx_int_field);
867
868 bt_ctf_clock_set_time(clock, ++current_time);
869 ok(bt_stream_append_event(stream, event) == 0,
870 "Append a complex event to a stream");
871
872 /*
873 * Populate the custom packet context field with a dummy value
874 * otherwise flush will fail.
875 */
876 packet_context = bt_stream_get_packet_context(stream);
877 packet_context_field = bt_field_structure_get_field_by_name(packet_context,
878 "custom_packet_context_field");
879 bt_field_unsigned_integer_set_value(packet_context_field, 1);
880
881 ok(bt_stream_flush(stream) == 0,
882 "Flush a stream containing a complex event");
883
884 bt_put(uint_35_field);
885 bt_put(a_string_field);
886 bt_put(inner_structure_field);
887 bt_put(complex_structure_field);
888 bt_put(a_sequence_field);
889 bt_put(an_array_field);
890 bt_put(enum_variant_field);
891 bt_put(enum_container_field);
892 bt_put(variant_field);
893 bt_put(ret_field);
894 bt_put(packet_context_field);
895 bt_put(packet_context);
896 bt_put(uint_35_type);
897 bt_put(int_16_type);
898 bt_put(string_type);
899 bt_put(sequence_type);
900 bt_put(array_type);
901 bt_put(inner_structure_type);
902 bt_put(complex_structure_type);
903 bt_put(uint_3_type);
904 bt_put(enum_variant_type);
905 bt_put(variant_type);
906 bt_put(ret_field_type);
907 bt_put(event_class);
908 bt_put(event);
909 }
910
911 static
912 void field_copy_tests_validate_same_type(struct bt_field *field,
913 struct bt_field_type *expected_type, const char *name)
914 {
915 struct bt_field_type *copy_type;
916
917 copy_type = bt_field_get_type(field);
918 ok(copy_type == expected_type,
919 "bt_field_copy does not copy the type (%s)", name);
920 bt_put(copy_type);
921 }
922
923 static
924 void field_copy_tests_validate_diff_ptrs(struct bt_field *field_a,
925 struct bt_field *field_b, const char *name)
926 {
927 ok(field_a != field_b,
928 "bt_field_copy creates different pointers (%s)", name);
929 }
930
931 static
932 void field_copy_tests()
933 {
934 struct bt_field_type *len_type = NULL;
935 struct bt_field_type *fp_type = NULL;
936 struct bt_field_type *s_type = NULL;
937 struct bt_field_type *e_int_type = NULL;
938 struct bt_field_type *e_type = NULL;
939 struct bt_field_type *v_type = NULL;
940 struct bt_field_type *v_label1_type = NULL;
941 struct bt_field_type *v_label1_array_type = NULL;
942 struct bt_field_type *v_label2_type = NULL;
943 struct bt_field_type *v_label2_seq_type = NULL;
944 struct bt_field_type *strct_type = NULL;
945 struct bt_field *len = NULL;
946 struct bt_field *fp = NULL;
947 struct bt_field *s = NULL;
948 struct bt_field *e_int = NULL;
949 struct bt_field *e = NULL;
950 struct bt_field *v = NULL;
951 struct bt_field *v_selected = NULL;
952 struct bt_field *v_selected_cur = NULL;
953 struct bt_field *v_selected_0 = NULL;
954 struct bt_field *v_selected_1 = NULL;
955 struct bt_field *v_selected_2 = NULL;
956 struct bt_field *v_selected_3 = NULL;
957 struct bt_field *v_selected_4 = NULL;
958 struct bt_field *v_selected_5 = NULL;
959 struct bt_field *v_selected_6 = NULL;
960 struct bt_field *a = NULL;
961 struct bt_field *a_0 = NULL;
962 struct bt_field *a_1 = NULL;
963 struct bt_field *a_2 = NULL;
964 struct bt_field *a_3 = NULL;
965 struct bt_field *a_4 = NULL;
966 struct bt_field *strct = NULL;
967 struct bt_field *len_copy = NULL;
968 struct bt_field *fp_copy = NULL;
969 struct bt_field *s_copy = NULL;
970 struct bt_field *e_int_copy = NULL;
971 struct bt_field *e_copy = NULL;
972 struct bt_field *v_copy = NULL;
973 struct bt_field *v_selected_copy = NULL;
974 struct bt_field *v_selected_copy_len = NULL;
975 struct bt_field *v_selected_0_copy = NULL;
976 struct bt_field *v_selected_1_copy = NULL;
977 struct bt_field *v_selected_2_copy = NULL;
978 struct bt_field *v_selected_3_copy = NULL;
979 struct bt_field *v_selected_4_copy = NULL;
980 struct bt_field *v_selected_5_copy = NULL;
981 struct bt_field *v_selected_6_copy = NULL;
982 struct bt_field *a_copy = NULL;
983 struct bt_field *a_0_copy = NULL;
984 struct bt_field *a_1_copy = NULL;
985 struct bt_field *a_2_copy = NULL;
986 struct bt_field *a_3_copy = NULL;
987 struct bt_field *a_4_copy = NULL;
988 struct bt_field *strct_copy = NULL;
989 struct bt_field_type_enumeration_mapping_iterator *e_iter = NULL;
990 uint64_t uint64_t_val;
991 const char *str_val;
992 double double_val;
993 int ret;
994
995 /* create len type */
996 len_type = bt_field_type_integer_create(32);
997 assert(len_type);
998
999 /* create fp type */
1000 fp_type = bt_field_type_floating_point_create();
1001 assert(fp_type);
1002
1003 /* create s type */
1004 s_type = bt_field_type_string_create();
1005 assert(s_type);
1006
1007 /* create e_int type */
1008 e_int_type = bt_field_type_integer_create(8);
1009 assert(e_int_type);
1010
1011 /* create e type */
1012 e_type = bt_field_type_enumeration_create(e_int_type);
1013 assert(e_type);
1014 ret = bt_ctf_field_type_enumeration_add_mapping(e_type, "LABEL1",
1015 10, 15);
1016 assert(!ret);
1017 ret = bt_ctf_field_type_enumeration_add_mapping(e_type, "LABEL2",
1018 23, 23);
1019 assert(!ret);
1020
1021 /* create v_label1 type */
1022 v_label1_type = bt_field_type_string_create();
1023 assert(v_label1_type);
1024
1025 /* create v_label1_array type */
1026 v_label1_array_type = bt_field_type_array_create(v_label1_type, 5);
1027 assert(v_label1_array_type);
1028
1029 /* create v_label2 type */
1030 v_label2_type = bt_field_type_integer_create(16);
1031 assert(v_label2_type);
1032
1033 /* create v_label2_seq type */
1034 v_label2_seq_type = bt_field_type_sequence_create(v_label2_type,
1035 "len");
1036 assert(v_label2_seq_type);
1037
1038 /* create v type */
1039 v_type = bt_field_type_variant_create(e_type, "e");
1040 assert(v_type);
1041 ret = bt_field_type_variant_add_field(v_type, v_label1_array_type,
1042 "LABEL1");
1043 assert(!ret);
1044 ret = bt_field_type_variant_add_field(v_type, v_label2_seq_type,
1045 "LABEL2");
1046 assert(!ret);
1047
1048 /* create strct type */
1049 strct_type = bt_field_type_structure_create();
1050 assert(strct_type);
1051 ret = bt_field_type_structure_add_field(strct_type, len_type,
1052 "len");
1053 assert(!ret);
1054 ret = bt_field_type_structure_add_field(strct_type, fp_type, "fp");
1055 assert(!ret);
1056 ret = bt_field_type_structure_add_field(strct_type, s_type, "s");
1057 assert(!ret);
1058 ret = bt_field_type_structure_add_field(strct_type, e_type, "e");
1059 assert(!ret);
1060 ret = bt_field_type_structure_add_field(strct_type, v_type, "v");
1061 assert(!ret);
1062 ret = bt_field_type_structure_add_field(strct_type,
1063 v_label1_array_type, "a");
1064 assert(!ret);
1065
1066 /* create strct */
1067 strct = bt_field_create(strct_type);
1068 assert(strct);
1069
1070 /* get len field */
1071 len = bt_field_structure_get_field_by_name(strct, "len");
1072 assert(len);
1073
1074 /* get fp field */
1075 fp = bt_field_structure_get_field_by_name(strct, "fp");
1076 assert(fp);
1077
1078 /* get s field */
1079 s = bt_field_structure_get_field_by_name(strct, "s");
1080 assert(s);
1081
1082 /* get e field */
1083 e = bt_field_structure_get_field_by_name(strct, "e");
1084 assert(e);
1085
1086 /* get e_int (underlying integer) */
1087 e_int = bt_field_enumeration_get_container(e);
1088 assert(e_int);
1089
1090 /* get v field */
1091 v = bt_field_structure_get_field_by_name(strct, "v");
1092 assert(v);
1093
1094 /* get a field */
1095 a = bt_field_structure_get_field_by_name(strct, "a");
1096 assert(a);
1097
1098 /* set len field */
1099 ret = bt_field_unsigned_integer_set_value(len, 7);
1100 assert(!ret);
1101
1102 /* set fp field */
1103 ret = bt_field_floating_point_set_value(fp, 3.14);
1104 assert(!ret);
1105
1106 /* set s field */
1107 ret = bt_field_string_set_value(s, "btbt");
1108 assert(!ret);
1109
1110 /* set e field (LABEL2) */
1111 ret = bt_field_unsigned_integer_set_value(e_int, 23);
1112 assert(!ret);
1113
1114 /* set v field */
1115 v_selected = bt_field_variant_get_field(v, e);
1116 assert(v_selected);
1117 v_selected_cur = bt_field_variant_get_current_field(v);
1118 ok(v_selected_cur == v_selected,
1119 "bt_field_variant_get_current_field returns the current field");
1120 bt_put(v_selected_cur);
1121
1122 /* set selected v field */
1123 ret = bt_field_sequence_set_length(v_selected, len);
1124 assert(!ret);
1125 v_selected_0 = bt_field_sequence_get_field(v_selected, 0);
1126 assert(v_selected_0);
1127 ret = bt_field_unsigned_integer_set_value(v_selected_0, 7);
1128 assert(!ret);
1129 v_selected_1 = bt_field_sequence_get_field(v_selected, 1);
1130 assert(v_selected_1);
1131 ret = bt_field_unsigned_integer_set_value(v_selected_1, 6);
1132 assert(!ret);
1133 v_selected_2 = bt_field_sequence_get_field(v_selected, 2);
1134 assert(v_selected_2);
1135 ret = bt_field_unsigned_integer_set_value(v_selected_2, 5);
1136 assert(!ret);
1137 v_selected_3 = bt_field_sequence_get_field(v_selected, 3);
1138 assert(v_selected_3);
1139 ret = bt_field_unsigned_integer_set_value(v_selected_3, 4);
1140 assert(!ret);
1141 v_selected_4 = bt_field_sequence_get_field(v_selected, 4);
1142 assert(v_selected_4);
1143 ret = bt_field_unsigned_integer_set_value(v_selected_4, 3);
1144 assert(!ret);
1145 v_selected_5 = bt_field_sequence_get_field(v_selected, 5);
1146 assert(v_selected_5);
1147 ret = bt_field_unsigned_integer_set_value(v_selected_5, 2);
1148 assert(!ret);
1149 v_selected_6 = bt_field_sequence_get_field(v_selected, 6);
1150 assert(v_selected_6);
1151 ret = bt_field_unsigned_integer_set_value(v_selected_6, 1);
1152 assert(!ret);
1153
1154 /* set a field */
1155 a_0 = bt_field_array_get_field(a, 0);
1156 assert(a_0);
1157 ret = bt_field_string_set_value(a_0, "a_0");
1158 assert(!ret);
1159 a_1 = bt_field_array_get_field(a, 1);
1160 assert(a_1);
1161 ret = bt_field_string_set_value(a_1, "a_1");
1162 assert(!ret);
1163 a_2 = bt_field_array_get_field(a, 2);
1164 assert(a_2);
1165 ret = bt_field_string_set_value(a_2, "a_2");
1166 assert(!ret);
1167 a_3 = bt_field_array_get_field(a, 3);
1168 assert(a_3);
1169 ret = bt_field_string_set_value(a_3, "a_3");
1170 assert(!ret);
1171 a_4 = bt_field_array_get_field(a, 4);
1172 assert(a_4);
1173 ret = bt_field_string_set_value(a_4, "a_4");
1174 assert(!ret);
1175
1176 /* create copy of strct */
1177 strct_copy = bt_field_copy(strct);
1178 ok(strct_copy,
1179 "bt_field_copy returns a valid pointer");
1180
1181 /* get all copied fields */
1182 len_copy = bt_field_structure_get_field_by_name(strct_copy, "len");
1183 assert(len_copy);
1184 fp_copy = bt_field_structure_get_field_by_name(strct_copy, "fp");
1185 assert(fp_copy);
1186 s_copy = bt_field_structure_get_field_by_name(strct_copy, "s");
1187 assert(s_copy);
1188 e_copy = bt_field_structure_get_field_by_name(strct_copy, "e");
1189 assert(e_copy);
1190 e_int_copy = bt_field_enumeration_get_container(e_copy);
1191 assert(e_int_copy);
1192 v_copy = bt_field_structure_get_field_by_name(strct_copy, "v");
1193 assert(v_copy);
1194 v_selected_copy = bt_field_variant_get_field(v_copy, e_copy);
1195 assert(v_selected_copy);
1196 v_selected_0_copy = bt_field_sequence_get_field(v_selected_copy, 0);
1197 assert(v_selected_0_copy);
1198 v_selected_1_copy = bt_field_sequence_get_field(v_selected_copy, 1);
1199 assert(v_selected_1_copy);
1200 v_selected_2_copy = bt_field_sequence_get_field(v_selected_copy, 2);
1201 assert(v_selected_2_copy);
1202 v_selected_3_copy = bt_field_sequence_get_field(v_selected_copy, 3);
1203 assert(v_selected_3_copy);
1204 v_selected_4_copy = bt_field_sequence_get_field(v_selected_copy, 4);
1205 assert(v_selected_4_copy);
1206 v_selected_5_copy = bt_field_sequence_get_field(v_selected_copy, 5);
1207 assert(v_selected_5_copy);
1208 v_selected_6_copy = bt_field_sequence_get_field(v_selected_copy, 6);
1209 assert(v_selected_6_copy);
1210 a_copy = bt_field_structure_get_field_by_name(strct_copy, "a");
1211 assert(a_copy);
1212 a_0_copy = bt_field_array_get_field(a_copy, 0);
1213 assert(a_0_copy);
1214 a_1_copy = bt_field_array_get_field(a_copy, 1);
1215 assert(a_1_copy);
1216 a_2_copy = bt_field_array_get_field(a_copy, 2);
1217 assert(a_2_copy);
1218 a_3_copy = bt_field_array_get_field(a_copy, 3);
1219 assert(a_3_copy);
1220 a_4_copy = bt_field_array_get_field(a_copy, 4);
1221 assert(a_4_copy);
1222
1223 /* make sure copied fields are different pointers */
1224 field_copy_tests_validate_diff_ptrs(strct_copy, strct, "strct");
1225 field_copy_tests_validate_diff_ptrs(len_copy, len, "len");
1226 field_copy_tests_validate_diff_ptrs(fp_copy, fp, "fp");
1227 field_copy_tests_validate_diff_ptrs(s_copy, s, "s");
1228 field_copy_tests_validate_diff_ptrs(e_int_copy, e_int, "e_int");
1229 field_copy_tests_validate_diff_ptrs(e_copy, e, "e");
1230 field_copy_tests_validate_diff_ptrs(v_copy, v, "v");
1231 field_copy_tests_validate_diff_ptrs(v_selected_copy, v_selected,
1232 "v_selected");
1233 field_copy_tests_validate_diff_ptrs(v_selected_0_copy, v_selected_0,
1234 "v_selected_0");
1235 field_copy_tests_validate_diff_ptrs(v_selected_1_copy, v_selected_1,
1236 "v_selected_1");
1237 field_copy_tests_validate_diff_ptrs(v_selected_2_copy, v_selected_2,
1238 "v_selected_2");
1239 field_copy_tests_validate_diff_ptrs(v_selected_3_copy, v_selected_3,
1240 "v_selected_3");
1241 field_copy_tests_validate_diff_ptrs(v_selected_4_copy, v_selected_4,
1242 "v_selected_4");
1243 field_copy_tests_validate_diff_ptrs(v_selected_5_copy, v_selected_5,
1244 "v_selected_5");
1245 field_copy_tests_validate_diff_ptrs(v_selected_6_copy, v_selected_6,
1246 "v_selected_6");
1247 field_copy_tests_validate_diff_ptrs(a_copy, a, "a");
1248 field_copy_tests_validate_diff_ptrs(a_0_copy, a_0, "a_0");
1249 field_copy_tests_validate_diff_ptrs(a_1_copy, a_1, "a_1");
1250 field_copy_tests_validate_diff_ptrs(a_2_copy, a_2, "a_2");
1251 field_copy_tests_validate_diff_ptrs(a_3_copy, a_3, "a_3");
1252 field_copy_tests_validate_diff_ptrs(a_4_copy, a_4, "a_4");
1253
1254 /* make sure copied fields share the same types */
1255 field_copy_tests_validate_same_type(strct_copy, strct_type, "strct");
1256 field_copy_tests_validate_same_type(len_copy, len_type, "len");
1257 field_copy_tests_validate_same_type(fp_copy, fp_type, "fp");
1258 field_copy_tests_validate_same_type(e_int_copy, e_int_type, "e_int");
1259 field_copy_tests_validate_same_type(e_copy, e_type, "e");
1260 field_copy_tests_validate_same_type(v_copy, v_type, "v");
1261 field_copy_tests_validate_same_type(v_selected_copy, v_label2_seq_type,
1262 "v_selected");
1263 field_copy_tests_validate_same_type(v_selected_0_copy, v_label2_type,
1264 "v_selected_0");
1265 field_copy_tests_validate_same_type(v_selected_1_copy, v_label2_type,
1266 "v_selected_1");
1267 field_copy_tests_validate_same_type(v_selected_2_copy, v_label2_type,
1268 "v_selected_2");
1269 field_copy_tests_validate_same_type(v_selected_3_copy, v_label2_type,
1270 "v_selected_3");
1271 field_copy_tests_validate_same_type(v_selected_4_copy, v_label2_type,
1272 "v_selected_4");
1273 field_copy_tests_validate_same_type(v_selected_5_copy, v_label2_type,
1274 "v_selected_5");
1275 field_copy_tests_validate_same_type(v_selected_6_copy, v_label2_type,
1276 "v_selected_6");
1277 field_copy_tests_validate_same_type(a_copy, v_label1_array_type, "a");
1278 field_copy_tests_validate_same_type(a_0_copy, v_label1_type, "a_0");
1279 field_copy_tests_validate_same_type(a_1_copy, v_label1_type, "a_1");
1280 field_copy_tests_validate_same_type(a_2_copy, v_label1_type, "a_2");
1281 field_copy_tests_validate_same_type(a_3_copy, v_label1_type, "a_3");
1282 field_copy_tests_validate_same_type(a_4_copy, v_label1_type, "a_4");
1283
1284 /* validate len copy */
1285 ret = bt_field_unsigned_integer_get_value(len_copy, &uint64_t_val);
1286 assert(!ret);
1287 ok(uint64_t_val == 7,
1288 "bt_field_copy creates a valid integer field copy");
1289
1290 /* validate fp copy */
1291 ret = bt_field_floating_point_get_value(fp_copy, &double_val);
1292 assert(!ret);
1293 ok(double_val == 3.14,
1294 "bt_field_copy creates a valid floating point number field copy");
1295
1296 /* validate s copy */
1297 str_val = bt_field_string_get_value(s_copy);
1298 ok(str_val && !strcmp(str_val, "btbt"),
1299 "bt_field_copy creates a valid string field copy");
1300
1301 /* validate e_int copy */
1302 ret = bt_field_unsigned_integer_get_value(e_int_copy,
1303 &uint64_t_val);
1304 assert(!ret);
1305 ok(uint64_t_val == 23,
1306 "bt_field_copy creates a valid enum's integer field copy");
1307
1308 /* validate e copy */
1309 e_iter = bt_field_enumeration_get_mappings(e_copy);
1310 (void) bt_field_type_enumeration_mapping_iterator_next(e_iter);
1311 (void) bt_field_type_enumeration_mapping_iterator_get_signed(e_iter,
1312 &str_val, NULL, NULL);
1313 ok(str_val && !strcmp(str_val, "LABEL2"),
1314 "bt_field_copy creates a valid enum field copy");
1315
1316 /* validate v_selected copy */
1317 v_selected_copy_len = bt_field_sequence_get_length(v_selected);
1318 assert(v_selected_copy_len);
1319 ret = bt_field_unsigned_integer_get_value(v_selected_copy_len,
1320 &uint64_t_val);
1321 assert(!ret);
1322 ok(uint64_t_val == 7,
1323 "bt_field_copy creates a sequence field copy with the proper length");
1324 bt_put(v_selected_copy_len);
1325 v_selected_copy_len = NULL;
1326
1327 /* validate v_selected copy fields */
1328 ret = bt_field_unsigned_integer_get_value(v_selected_0_copy,
1329 &uint64_t_val);
1330 assert(!ret);
1331 ok(uint64_t_val == 7,
1332 "bt_field_copy creates a valid sequence field element copy (v_selected_0)");
1333 ret = bt_field_unsigned_integer_get_value(v_selected_1_copy,
1334 &uint64_t_val);
1335 assert(!ret);
1336 ok(uint64_t_val == 6,
1337 "bt_field_copy creates a valid sequence field element copy (v_selected_1)");
1338 ret = bt_field_unsigned_integer_get_value(v_selected_2_copy,
1339 &uint64_t_val);
1340 assert(!ret);
1341 ok(uint64_t_val == 5,
1342 "bt_field_copy creates a valid sequence field element copy (v_selected_2)");
1343 ret = bt_field_unsigned_integer_get_value(v_selected_3_copy,
1344 &uint64_t_val);
1345 assert(!ret);
1346 ok(uint64_t_val == 4,
1347 "bt_field_copy creates a valid sequence field element copy (v_selected_3)");
1348 ret = bt_field_unsigned_integer_get_value(v_selected_4_copy,
1349 &uint64_t_val);
1350 assert(!ret);
1351 ok(uint64_t_val == 3,
1352 "bt_field_copy creates a valid sequence field element copy (v_selected_4)");
1353 ret = bt_field_unsigned_integer_get_value(v_selected_5_copy,
1354 &uint64_t_val);
1355 assert(!ret);
1356 ok(uint64_t_val == 2,
1357 "bt_field_copy creates a valid sequence field element copy (v_selected_5)");
1358 ret = bt_field_unsigned_integer_get_value(v_selected_6_copy,
1359 &uint64_t_val);
1360 assert(!ret);
1361 ok(uint64_t_val == 1,
1362 "bt_field_copy creates a valid sequence field element copy (v_selected_6)");
1363
1364 /* validate a copy fields */
1365 str_val = bt_field_string_get_value(a_0_copy);
1366 ok(str_val && !strcmp(str_val, "a_0"),
1367 "bt_field_copy creates a valid array field element copy (a_0)");
1368 str_val = bt_field_string_get_value(a_1_copy);
1369 ok(str_val && !strcmp(str_val, "a_1"),
1370 "bt_field_copy creates a valid array field element copy (a_1)");
1371 str_val = bt_field_string_get_value(a_2_copy);
1372 ok(str_val && !strcmp(str_val, "a_2"),
1373 "bt_field_copy creates a valid array field element copy (a_2)");
1374 str_val = bt_field_string_get_value(a_3_copy);
1375 ok(str_val && !strcmp(str_val, "a_3"),
1376 "bt_field_copy creates a valid array field element copy (a_3)");
1377 str_val = bt_field_string_get_value(a_4_copy);
1378 ok(str_val && !strcmp(str_val, "a_4"),
1379 "bt_field_copy creates a valid array field element copy (a_4)");
1380
1381 /* put everything */
1382 bt_put(len_type);
1383 bt_put(fp_type);
1384 bt_put(s_type);
1385 bt_put(e_int_type);
1386 bt_put(e_type);
1387 bt_put(v_type);
1388 bt_put(v_label1_type);
1389 bt_put(v_label1_array_type);
1390 bt_put(v_label2_type);
1391 bt_put(v_label2_seq_type);
1392 bt_put(strct_type);
1393 bt_put(len);
1394 bt_put(fp);
1395 bt_put(s);
1396 bt_put(e_int);
1397 bt_put(e);
1398 bt_put(v);
1399 bt_put(v_selected);
1400 bt_put(v_selected_0);
1401 bt_put(v_selected_1);
1402 bt_put(v_selected_2);
1403 bt_put(v_selected_3);
1404 bt_put(v_selected_4);
1405 bt_put(v_selected_5);
1406 bt_put(v_selected_6);
1407 bt_put(a);
1408 bt_put(a_0);
1409 bt_put(a_1);
1410 bt_put(a_2);
1411 bt_put(a_3);
1412 bt_put(a_4);
1413 bt_put(strct);
1414 bt_put(len_copy);
1415 bt_put(fp_copy);
1416 bt_put(s_copy);
1417 bt_put(e_int_copy);
1418 bt_put(e_copy);
1419 bt_put(v_copy);
1420 bt_put(v_selected_copy);
1421 bt_put(v_selected_0_copy);
1422 bt_put(v_selected_1_copy);
1423 bt_put(v_selected_2_copy);
1424 bt_put(v_selected_3_copy);
1425 bt_put(v_selected_4_copy);
1426 bt_put(v_selected_5_copy);
1427 bt_put(v_selected_6_copy);
1428 bt_put(a_copy);
1429 bt_put(a_0_copy);
1430 bt_put(a_1_copy);
1431 bt_put(a_2_copy);
1432 bt_put(a_3_copy);
1433 bt_put(a_4_copy);
1434 bt_put(strct_copy);
1435 bt_put(e_iter);
1436 }
1437
1438 static
1439 void type_field_tests()
1440 {
1441 struct bt_field *uint_12;
1442 struct bt_field *int_16;
1443 struct bt_field *string;
1444 struct bt_field_type *composite_structure_type;
1445 struct bt_field_type *structure_seq_type;
1446 struct bt_field_type *string_type;
1447 struct bt_field_type *sequence_type;
1448 struct bt_field_type *uint_8_type;
1449 struct bt_field_type *int_16_type;
1450 struct bt_field_type *uint_12_type =
1451 bt_field_type_integer_create(12);
1452 struct bt_field_type *enumeration_type;
1453 struct bt_field_type *returned_type;
1454 const char *ret_string;
1455
1456 ok(uint_12_type, "Create an unsigned integer type");
1457 ok(bt_field_type_integer_set_base(uint_12_type,
1458 BT_INTEGER_BASE_BINARY) == 0,
1459 "Set integer type's base as binary");
1460 ok(bt_field_type_integer_set_base(uint_12_type,
1461 BT_INTEGER_BASE_DECIMAL) == 0,
1462 "Set integer type's base as decimal");
1463 ok(bt_field_type_integer_set_base(uint_12_type,
1464 BT_INTEGER_BASE_UNKNOWN),
1465 "Reject integer type's base set as unknown");
1466 ok(bt_field_type_integer_set_base(uint_12_type,
1467 BT_INTEGER_BASE_OCTAL) == 0,
1468 "Set integer type's base as octal");
1469 ok(bt_field_type_integer_set_base(uint_12_type,
1470 BT_INTEGER_BASE_HEXADECIMAL) == 0,
1471 "Set integer type's base as hexadecimal");
1472 ok(bt_field_type_integer_set_base(uint_12_type, 457417),
1473 "Reject unknown integer base value");
1474 ok(bt_ctf_field_type_integer_set_signed(uint_12_type, 952835) == 0,
1475 "Set integer type signedness to signed");
1476 ok(bt_ctf_field_type_integer_set_signed(uint_12_type, 0) == 0,
1477 "Set integer type signedness to unsigned");
1478 ok(bt_field_type_integer_get_size(uint_12_type) == 12,
1479 "bt_field_type_integer_get_size returns a correct value");
1480 ok(bt_ctf_field_type_integer_get_signed(uint_12_type) == 0,
1481 "bt_field_type_integer_get_signed returns a correct value for unsigned types");
1482
1483 ok(bt_field_type_set_byte_order(NULL,
1484 BT_BYTE_ORDER_LITTLE_ENDIAN) < 0,
1485 "bt_field_type_set_byte_order handles NULL correctly");
1486 ok(bt_field_type_set_byte_order(uint_12_type,
1487 (enum bt_byte_order) 42) < 0,
1488 "bt_field_type_set_byte_order rejects invalid values");
1489 ok(bt_field_type_set_byte_order(uint_12_type,
1490 BT_BYTE_ORDER_LITTLE_ENDIAN) == 0,
1491 "Set an integer's byte order to little endian");
1492 ok(bt_field_type_set_byte_order(uint_12_type,
1493 BT_BYTE_ORDER_BIG_ENDIAN) == 0,
1494 "Set an integer's byte order to big endian");
1495 ok(bt_field_type_get_byte_order(uint_12_type) ==
1496 BT_BYTE_ORDER_BIG_ENDIAN,
1497 "bt_field_type_get_byte_order returns a correct value");
1498
1499 ok(bt_field_type_get_type_id(uint_12_type) ==
1500 BT_FIELD_TYPE_ID_INTEGER,
1501 "bt_field_type_get_type_id returns a correct value with an integer type");
1502
1503 ok(bt_field_type_integer_get_base(uint_12_type) ==
1504 BT_INTEGER_BASE_HEXADECIMAL,
1505 "bt_field_type_integer_get_base returns a correct value");
1506
1507 ok(bt_field_type_integer_set_encoding(NULL,
1508 BT_STRING_ENCODING_ASCII) < 0,
1509 "bt_field_type_integer_set_encoding handles NULL correctly");
1510 ok(bt_field_type_integer_set_encoding(uint_12_type,
1511 (enum bt_string_encoding) 123) < 0,
1512 "bt_field_type_integer_set_encoding handles invalid encodings correctly");
1513 ok(bt_field_type_integer_set_encoding(uint_12_type,
1514 BT_STRING_ENCODING_UTF8) == 0,
1515 "Set integer type encoding to UTF8");
1516 ok(bt_field_type_integer_get_encoding(uint_12_type) ==
1517 BT_STRING_ENCODING_UTF8,
1518 "bt_field_type_integer_get_encoding returns a correct value");
1519
1520 int_16_type = bt_field_type_integer_create(16);
1521 assert(int_16_type);
1522 ok(!bt_ctf_field_type_integer_set_signed(int_16_type, 1),
1523 "Set signedness of 16 bit integer to true");
1524 ok(bt_ctf_field_type_integer_get_signed(int_16_type) == 1,
1525 "bt_field_type_integer_get_signed returns a correct value for signed types");
1526 uint_8_type = bt_field_type_integer_create(8);
1527 sequence_type =
1528 bt_field_type_sequence_create(int_16_type, "seq_len");
1529 ok(sequence_type, "Create a sequence of int16_t type");
1530 ok(bt_field_type_get_type_id(sequence_type) ==
1531 BT_FIELD_TYPE_ID_SEQUENCE,
1532 "bt_field_type_get_type_id returns a correct value with a sequence type");
1533
1534 ret_string = bt_field_type_sequence_get_length_field_name(
1535 sequence_type);
1536 ok(!strcmp(ret_string, "seq_len"),
1537 "bt_field_type_sequence_get_length_field_name returns the correct value");
1538 returned_type = bt_field_type_sequence_get_element_type(
1539 sequence_type);
1540 ok(returned_type == int_16_type,
1541 "bt_field_type_sequence_get_element_type returns the correct type");
1542 bt_put(returned_type);
1543
1544 string_type = bt_field_type_string_create();
1545 ok(string_type, "Create a string type");
1546 ok(bt_field_type_string_set_encoding(string_type,
1547 BT_STRING_ENCODING_NONE),
1548 "Reject invalid \"None\" string encoding");
1549 ok(bt_field_type_string_set_encoding(string_type,
1550 42),
1551 "Reject invalid string encoding");
1552 ok(bt_field_type_string_set_encoding(string_type,
1553 BT_STRING_ENCODING_ASCII) == 0,
1554 "Set string encoding to ASCII");
1555
1556 ok(bt_field_type_string_get_encoding(string_type) ==
1557 BT_STRING_ENCODING_ASCII,
1558 "bt_field_type_string_get_encoding returns the correct value");
1559
1560 structure_seq_type = bt_field_type_structure_create();
1561 ok(bt_field_type_get_type_id(structure_seq_type) ==
1562 BT_FIELD_TYPE_ID_STRUCT,
1563 "bt_field_type_get_type_id returns a correct value with a structure type");
1564 ok(structure_seq_type, "Create a structure type");
1565 ok(bt_field_type_structure_add_field(structure_seq_type,
1566 uint_8_type, "seq_len") == 0,
1567 "Add a uint8_t type to a structure");
1568 ok(bt_field_type_structure_add_field(structure_seq_type,
1569 sequence_type, "a_sequence") == 0,
1570 "Add a sequence type to a structure");
1571
1572 ok(bt_field_type_structure_get_field_count(structure_seq_type) == 2,
1573 "bt_field_type_structure_get_field_count returns a correct value");
1574
1575 ok(bt_ctf_field_type_structure_get_field(structure_seq_type,
1576 NULL, &returned_type, 1) == 0,
1577 "bt_field_type_structure_get_field handles a NULL name correctly");
1578 bt_put(returned_type);
1579 ok(bt_ctf_field_type_structure_get_field(structure_seq_type,
1580 &ret_string, NULL, 1) == 0,
1581 "bt_field_type_structure_get_field handles a NULL return type correctly");
1582 ok(bt_ctf_field_type_structure_get_field(structure_seq_type,
1583 &ret_string, &returned_type, 1) == 0,
1584 "bt_field_type_structure_get_field returns a field");
1585 ok(!strcmp(ret_string, "a_sequence"),
1586 "bt_field_type_structure_get_field returns a correct field name");
1587 ok(returned_type == sequence_type,
1588 "bt_field_type_structure_get_field returns a correct field type");
1589 bt_put(returned_type);
1590
1591 returned_type = bt_field_type_structure_get_field_type_by_name(
1592 structure_seq_type, "a_sequence");
1593 ok(returned_type == sequence_type,
1594 "bt_field_type_structure_get_field_type_by_name returns the correct field type");
1595 bt_put(returned_type);
1596
1597 composite_structure_type = bt_field_type_structure_create();
1598 ok(bt_field_type_structure_add_field(composite_structure_type,
1599 string_type, "a_string") == 0,
1600 "Add a string type to a structure");
1601 ok(bt_field_type_structure_add_field(composite_structure_type,
1602 structure_seq_type, "inner_structure") == 0,
1603 "Add a structure type to a structure");
1604
1605 returned_type = bt_field_type_structure_get_field_type_by_name(
1606 structure_seq_type, "a_sequence");
1607 ok(returned_type == sequence_type,
1608 "bt_field_type_structure_get_field_type_by_name returns a correct type");
1609 bt_put(returned_type);
1610
1611 int_16 = bt_field_create(int_16_type);
1612 ok(int_16, "Instanciate a signed 16-bit integer");
1613 uint_12 = bt_field_create(uint_12_type);
1614 ok(uint_12, "Instanciate an unsigned 12-bit integer");
1615 returned_type = bt_field_get_type(int_16);
1616 ok(returned_type == int_16_type,
1617 "bt_field_get_type returns the correct type");
1618
1619 /* Can't modify types after instanciating them */
1620 ok(bt_field_type_integer_set_base(uint_12_type,
1621 BT_INTEGER_BASE_DECIMAL),
1622 "Check an integer type' base can't be modified after instanciation");
1623 ok(bt_ctf_field_type_integer_set_signed(uint_12_type, 0),
1624 "Check an integer type's signedness can't be modified after instanciation");
1625
1626 /* Check overflows are properly tested for */
1627 ok(bt_field_signed_integer_set_value(int_16, -32768) == 0,
1628 "Check -32768 is allowed for a signed 16-bit integer");
1629 ok(bt_field_signed_integer_set_value(int_16, 32767) == 0,
1630 "Check 32767 is allowed for a signed 16-bit integer");
1631 ok(bt_field_signed_integer_set_value(int_16, -42) == 0,
1632 "Check -42 is allowed for a signed 16-bit integer");
1633
1634 ok(bt_field_unsigned_integer_set_value(uint_12, 4095) == 0,
1635 "Check 4095 is allowed for an unsigned 12-bit integer");
1636 ok(bt_field_unsigned_integer_set_value(uint_12, 0) == 0,
1637 "Check 0 is allowed for an unsigned 12-bit integer");
1638
1639 string = bt_field_create(string_type);
1640 ok(string, "Instanciate a string field");
1641 ok(bt_field_string_set_value(string, "A value") == 0,
1642 "Set a string's value");
1643
1644 enumeration_type = bt_field_type_enumeration_create(uint_12_type);
1645 ok(enumeration_type,
1646 "Create an enumeration type with an unsigned 12-bit integer as container");
1647
1648 bt_put(string);
1649 bt_put(uint_12);
1650 bt_put(int_16);
1651 bt_put(composite_structure_type);
1652 bt_put(structure_seq_type);
1653 bt_put(string_type);
1654 bt_put(sequence_type);
1655 bt_put(uint_8_type);
1656 bt_put(int_16_type);
1657 bt_put(uint_12_type);
1658 bt_put(enumeration_type);
1659 bt_put(returned_type);
1660 }
1661
1662 static
1663 void packet_resize_test(struct bt_stream_class *stream_class,
1664 struct bt_stream *stream, struct bt_ctf_clock *clock)
1665 {
1666 /*
1667 * Append enough events to force the underlying packet to be resized.
1668 * Also tests that a new event can be declared after a stream has been
1669 * instantiated and used/flushed.
1670 */
1671 int ret = 0;
1672 int i;
1673 struct bt_event_class *event_class = bt_event_class_create(
1674 "Spammy_Event");
1675 struct bt_field_type *integer_type =
1676 bt_field_type_integer_create(17);
1677 struct bt_field_type *string_type =
1678 bt_field_type_string_create();
1679 struct bt_event *event = NULL;
1680 struct bt_field *ret_field = NULL;
1681 struct bt_field_type *ret_field_type = NULL;
1682 uint64_t ret_uint64;
1683 int events_appended = 0;
1684 struct bt_field *packet_context = NULL,
1685 *packet_context_field = NULL, *stream_event_context = NULL;
1686 struct bt_field_type *ep_field_1_type = NULL;
1687 struct bt_field_type *ep_a_string_type = NULL;
1688 struct bt_field_type *ep_type = NULL;
1689
1690 ret |= bt_event_class_add_field(event_class, integer_type,
1691 "field_1");
1692 ret |= bt_event_class_add_field(event_class, string_type,
1693 "a_string");
1694 ret |= bt_stream_class_add_event_class(stream_class, event_class);
1695 ok(ret == 0, "Add a new event class to a stream class after writing an event");
1696 if (ret) {
1697 goto end;
1698 }
1699
1700 /*
1701 * bt_stream_class_add_event_class() copies the field types
1702 * of event_class, so we retrieve the new ones to create the
1703 * appropriate fields.
1704 */
1705 ep_type = bt_event_class_get_payload_type(event_class);
1706 assert(ep_type);
1707 ep_field_1_type = bt_field_type_structure_get_field_type_by_name(
1708 ep_type, "field_1");
1709 assert(ep_field_1_type);
1710 ep_a_string_type = bt_field_type_structure_get_field_type_by_name(
1711 ep_type, "a_string");
1712 assert(ep_a_string_type);
1713
1714 event = bt_event_create(event_class);
1715 ret_field = bt_event_get_payload_by_index(event, 0);
1716 ret_field_type = bt_field_get_type(ret_field);
1717 ok(bt_field_type_compare(ret_field_type, integer_type) == 0,
1718 "bt_event_get_payload_by_index returns a correct field");
1719 bt_put(ret_field_type);
1720 bt_put(ret_field);
1721 bt_put(event);
1722
1723 for (i = 0; i < packet_resize_test_length; i++) {
1724 event = bt_event_create(event_class);
1725 struct bt_field *integer =
1726 bt_field_create(ep_field_1_type);
1727 struct bt_field *string =
1728 bt_field_create(ep_a_string_type);
1729
1730 ret |= bt_ctf_clock_set_time(clock, ++current_time);
1731 ret |= bt_field_unsigned_integer_set_value(integer, i);
1732 ret |= bt_event_set_payload(event, "field_1",
1733 integer);
1734 bt_put(integer);
1735 ret |= bt_field_string_set_value(string, "This is a test");
1736 ret |= bt_event_set_payload(event, "a_string",
1737 string);
1738 bt_put(string);
1739
1740 /* Populate stream event context */
1741 stream_event_context =
1742 bt_event_get_stream_event_context(event);
1743 integer = bt_field_structure_get_field_by_name(stream_event_context,
1744 "common_event_context");
1745 BT_PUT(stream_event_context);
1746 ret |= bt_field_unsigned_integer_set_value(integer,
1747 i % 42);
1748 bt_put(integer);
1749
1750 ret |= bt_stream_append_event(stream, event);
1751 bt_put(event);
1752
1753 if (ret) {
1754 break;
1755 }
1756 }
1757
1758 events_appended = !!(i == packet_resize_test_length);
1759 ret = bt_stream_get_discarded_events_count(stream, &ret_uint64);
1760 ok(ret == 0 && ret_uint64 == 0,
1761 "bt_stream_get_discarded_events_count returns a correct number of discarded events when none were discarded");
1762 bt_stream_append_discarded_events(stream, 1000);
1763 ret = bt_stream_get_discarded_events_count(stream, &ret_uint64);
1764 ok(ret == 0 && ret_uint64 == 1000,
1765 "bt_stream_get_discarded_events_count returns a correct number of discarded events when some were discarded");
1766
1767 end:
1768 ok(events_appended, "Append 100 000 events to a stream");
1769
1770 /*
1771 * Populate the custom packet context field with a dummy value
1772 * otherwise flush will fail.
1773 */
1774 packet_context = bt_stream_get_packet_context(stream);
1775 packet_context_field = bt_field_structure_get_field_by_name(packet_context,
1776 "custom_packet_context_field");
1777 bt_field_unsigned_integer_set_value(packet_context_field, 2);
1778
1779 ok(bt_stream_flush(stream) == 0,
1780 "Flush a stream that forces a packet resize");
1781 ret = bt_stream_get_discarded_events_count(stream, &ret_uint64);
1782 ok(ret == 0 && ret_uint64 == 1000,
1783 "bt_stream_get_discarded_events_count returns a correct number of discarded events after a flush");
1784 bt_put(integer_type);
1785 bt_put(string_type);
1786 bt_put(packet_context);
1787 bt_put(packet_context_field);
1788 bt_put(stream_event_context);
1789 bt_put(event_class);
1790 bt_put(ep_field_1_type);
1791 bt_put(ep_a_string_type);
1792 bt_put(ep_type);
1793 }
1794
1795 static
1796 void test_empty_stream(struct bt_ctf_writer *writer)
1797 {
1798 int ret = 0;
1799 struct bt_trace *trace = NULL, *ret_trace = NULL;
1800 struct bt_stream_class *stream_class = NULL;
1801 struct bt_stream *stream = NULL;
1802
1803 trace = bt_ctf_writer_get_trace(writer);
1804 if (!trace) {
1805 diag("Failed to get trace from writer");
1806 ret = -1;
1807 goto end;
1808 }
1809
1810 stream_class = bt_stream_class_create("empty_stream");
1811 if (!stream_class) {
1812 diag("Failed to create stream class");
1813 ret = -1;
1814 goto end;
1815 }
1816
1817 ret = bt_stream_class_set_packet_context_type(stream_class, NULL);
1818 assert(ret == 0);
1819 ret = bt_stream_class_set_event_header_type(stream_class, NULL);
1820 assert(ret == 0);
1821
1822 ok(bt_stream_class_get_trace(stream_class) == NULL,
1823 "bt_stream_class_get_trace returns NULL when stream class is orphaned");
1824
1825 stream = bt_ctf_writer_create_stream(writer, stream_class);
1826 if (!stream) {
1827 diag("Failed to create writer stream");
1828 ret = -1;
1829 goto end;
1830 }
1831
1832 ret_trace = bt_stream_class_get_trace(stream_class);
1833 ok(ret_trace == trace,
1834 "bt_stream_class_get_trace returns the correct trace after a stream has been created");
1835 end:
1836 ok(ret == 0,
1837 "Created a stream class with default attributes and an empty stream");
1838 bt_put(trace);
1839 bt_put(ret_trace);
1840 bt_put(stream);
1841 bt_put(stream_class);
1842 }
1843
1844 static
1845 void test_custom_event_header_stream(struct bt_ctf_writer *writer,
1846 struct bt_ctf_clock *clock)
1847 {
1848 int i, ret;
1849 struct bt_stream_class *stream_class = NULL;
1850 struct bt_stream *stream = NULL;
1851 struct bt_field_type *integer_type = NULL,
1852 *sequence_type = NULL, *event_header_type = NULL;
1853 struct bt_field *integer = NULL, *sequence = NULL,
1854 *event_header = NULL, *packet_header = NULL;
1855 struct bt_event_class *event_class = NULL;
1856 struct bt_event *event = NULL;
1857
1858 stream_class = bt_stream_class_create("custom_event_header_stream");
1859 if (!stream_class) {
1860 fail("Failed to create stream class");
1861 goto end;
1862 }
1863
1864 ret = bt_stream_class_set_clock(stream_class, clock);
1865 if (ret) {
1866 fail("Failed to set stream class clock");
1867 goto end;
1868 }
1869
1870 /*
1871 * Customize event header to add an "seq_len" integer member
1872 * which will be used as the length of a sequence in an event of this
1873 * stream.
1874 */
1875 event_header_type = bt_stream_class_get_event_header_type(
1876 stream_class);
1877 if (!event_header_type) {
1878 fail("Failed to get event header type");
1879 goto end;
1880 }
1881
1882 integer_type = bt_field_type_integer_create(13);
1883 if (!integer_type) {
1884 fail("Failed to create length integer type");
1885 goto end;
1886 }
1887
1888 ret = bt_field_type_structure_add_field(event_header_type,
1889 integer_type, "seq_len");
1890 if (ret) {
1891 fail("Failed to add a new field to stream event header");
1892 goto end;
1893 }
1894
1895 event_class = bt_event_class_create("sequence_event");
1896 if (!event_class) {
1897 fail("Failed to create event class");
1898 goto end;
1899 }
1900
1901 /*
1902 * This event's payload will contain a sequence which references
1903 * stream.event.header.seq_len as its length field.
1904 */
1905 sequence_type = bt_field_type_sequence_create(integer_type,
1906 "stream.event.header.seq_len");
1907 if (!sequence_type) {
1908 fail("Failed to create a sequence");
1909 goto end;
1910 }
1911
1912 ret = bt_event_class_add_field(event_class, sequence_type,
1913 "some_sequence");
1914 if (ret) {
1915 fail("Failed to add a sequence to an event class");
1916 goto end;
1917 }
1918
1919 ret = bt_stream_class_add_event_class(stream_class, event_class);
1920 if (ret) {
1921 fail("Failed to add event class to stream class");
1922 goto end;
1923 }
1924
1925 stream = bt_ctf_writer_create_stream(writer, stream_class);
1926 if (!stream) {
1927 fail("Failed to create stream")
1928 goto end;
1929 }
1930
1931 /*
1932 * We have defined a custom packet header field. We have to populate it
1933 * explicitly.
1934 */
1935 packet_header = bt_stream_get_packet_header(stream);
1936 if (!packet_header) {
1937 fail("Failed to get stream packet header");
1938 goto end;
1939 }
1940
1941 integer = bt_field_structure_get_field_by_name(packet_header,
1942 "custom_trace_packet_header_field");
1943 if (!integer) {
1944 fail("Failed to retrieve custom_trace_packet_header_field");
1945 goto end;
1946 }
1947
1948 ret = bt_field_unsigned_integer_set_value(integer, 3487);
1949 if (ret) {
1950 fail("Failed to set custom_trace_packet_header_field value");
1951 goto end;
1952 }
1953 bt_put(integer);
1954
1955 event = bt_event_create(event_class);
1956 if (!event) {
1957 fail("Failed to create event");
1958 goto end;
1959 }
1960
1961 event_header = bt_event_get_header(event);
1962 if (!event_header) {
1963 fail("Failed to get event header");
1964 goto end;
1965 }
1966
1967 integer = bt_field_structure_get_field_by_name(event_header,
1968 "seq_len");
1969 if (!integer) {
1970 fail("Failed to get seq_len field from event header");
1971 goto end;
1972 }
1973
1974 ret = bt_field_unsigned_integer_set_value(integer, 2);
1975 if (ret) {
1976 fail("Failed to set seq_len value in event header");
1977 goto end;
1978 }
1979
1980 /* Populate both sequence integer fields */
1981 sequence = bt_event_get_payload(event, "some_sequence");
1982 if (!sequence) {
1983 fail("Failed to retrieve sequence from event");
1984 goto end;
1985 }
1986
1987 ret = bt_field_sequence_set_length(sequence, integer);
1988 if (ret) {
1989 fail("Failed to set sequence length");
1990 goto end;
1991 }
1992 bt_put(integer);
1993
1994 for (i = 0; i < 2; i++) {
1995 integer = bt_field_sequence_get_field(sequence, i);
1996 if (ret) {
1997 fail("Failed to retrieve sequence element");
1998 goto end;
1999 }
2000
2001 ret = bt_field_unsigned_integer_set_value(integer, i);
2002 if (ret) {
2003 fail("Failed to set sequence element value");
2004 goto end;
2005 }
2006
2007 bt_put(integer);
2008 integer = NULL;
2009 }
2010
2011 ret = bt_stream_append_event(stream, event);
2012 if (ret) {
2013 fail("Failed to append event to stream");
2014 goto end;
2015 }
2016
2017 ret = bt_stream_flush(stream);
2018 if (ret) {
2019 fail("Failed to flush custom_event_header stream");
2020 }
2021 end:
2022 bt_put(stream);
2023 bt_put(stream_class);
2024 bt_put(event_class);
2025 bt_put(event);
2026 bt_put(integer);
2027 bt_put(sequence);
2028 bt_put(event_header);
2029 bt_put(packet_header);
2030 bt_put(sequence_type);
2031 bt_put(integer_type);
2032 bt_put(event_header_type);
2033 }
2034
2035 static
2036 void test_instanciate_event_before_stream(struct bt_ctf_writer *writer,
2037 struct bt_ctf_clock *clock)
2038 {
2039 int ret = 0;
2040 struct bt_stream_class *stream_class = NULL;
2041 struct bt_stream *stream = NULL,
2042 *ret_stream = NULL;
2043 struct bt_event_class *event_class = NULL;
2044 struct bt_event *event = NULL;
2045 struct bt_field_type *integer_type = NULL;
2046 struct bt_field *integer = NULL;
2047
2048 stream_class = bt_stream_class_create("event_before_stream_test");
2049 if (!stream_class) {
2050 diag("Failed to create stream class");
2051 ret = -1;
2052 goto end;
2053 }
2054
2055 ret = bt_stream_class_set_clock(stream_class, clock);
2056 if (ret) {
2057 diag("Failed to set stream class clock");
2058 goto end;
2059 }
2060
2061 event_class = bt_event_class_create("some_event_class_name");
2062 integer_type = bt_field_type_integer_create(32);
2063 if (!integer_type) {
2064 diag("Failed to create integer field type");
2065 ret = -1;
2066 goto end;
2067 }
2068
2069 ret = bt_event_class_add_field(event_class, integer_type,
2070 "integer_field");
2071 if (ret) {
2072 diag("Failed to add field to event class");
2073 goto end;
2074 }
2075
2076 ret = bt_stream_class_add_event_class(stream_class,
2077 event_class);
2078 if (ret) {
2079 diag("Failed to add event class to stream class");
2080 }
2081
2082 event = bt_event_create(event_class);
2083 if (!event) {
2084 diag("Failed to create event");
2085 ret = -1;
2086 goto end;
2087 }
2088
2089 integer = bt_event_get_payload_by_index(event, 0);
2090 if (!integer) {
2091 diag("Failed to get integer field payload from event");
2092 ret = -1;
2093 goto end;
2094 }
2095
2096 ret = bt_field_unsigned_integer_set_value(integer, 1234);
2097 if (ret) {
2098 diag("Failed to set integer field value");
2099 goto end;
2100 }
2101
2102 stream = bt_ctf_writer_create_stream(writer, stream_class);
2103 if (!stream) {
2104 diag("Failed to create writer stream");
2105 ret = -1;
2106 goto end;
2107 }
2108
2109 ret = bt_stream_append_event(stream, event);
2110 if (ret) {
2111 diag("Failed to append event to stream");
2112 goto end;
2113 }
2114
2115 ret_stream = bt_event_get_stream(event);
2116 ok(ret_stream == stream,
2117 "bt_event_get_stream returns an event's stream after it has been appended");
2118 end:
2119 ok(ret == 0,
2120 "Create an event before instanciating its associated stream");
2121 bt_put(stream);
2122 bt_put(ret_stream);
2123 bt_put(stream_class);
2124 bt_put(event_class);
2125 bt_put(event);
2126 bt_put(integer_type);
2127 bt_put(integer);
2128 }
2129
2130 static
2131 void append_existing_event_class(struct bt_stream_class *stream_class)
2132 {
2133 struct bt_event_class *event_class;
2134
2135 event_class = bt_event_class_create("Simple Event");
2136 assert(event_class);
2137 ok(bt_stream_class_add_event_class(stream_class, event_class) == 0,
2138 "two event classes with the same name may cohabit within the same stream class");
2139 bt_put(event_class);
2140
2141 event_class = bt_event_class_create("different name, ok");
2142 assert(event_class);
2143 assert(!bt_event_class_set_id(event_class, 13));
2144 ok(bt_stream_class_add_event_class(stream_class, event_class),
2145 "two event classes with the same ID cannot cohabit within the same stream class");
2146 bt_put(event_class);
2147 }
2148
2149 static
2150 struct bt_event_class *create_minimal_event_class(void)
2151 {
2152 struct bt_event_class *ec = NULL;
2153 struct bt_field_type *int_ft = NULL;
2154 int ret;
2155
2156 int_ft = bt_field_type_integer_create(23);
2157 assert(int_ft);
2158 ec = bt_event_class_create("minimal");
2159 assert(ec);
2160 ret = bt_event_class_add_field(ec, int_ft, "field");
2161 assert(!ret);
2162 BT_PUT(int_ft);
2163
2164 return ec;
2165 }
2166
2167 static
2168 void test_create_writer_vs_non_writer_mode(void)
2169 {
2170 int ret;
2171 gchar *trace_path;
2172 const char *writer_stream_name = "writer stream instance";
2173 struct bt_ctf_writer *writer = NULL;
2174 struct bt_trace *writer_trace = NULL;
2175 struct bt_stream_class *writer_sc = NULL;
2176 struct bt_stream *writer_stream = NULL;
2177 struct bt_stream *writer_stream2 = NULL;
2178 struct bt_stream *packet_stream = NULL;
2179 struct bt_trace *non_writer_trace = NULL;
2180 struct bt_stream_class *non_writer_sc = NULL;
2181 struct bt_stream *non_writer_stream = NULL;
2182 struct bt_stream *non_writer_stream2 = NULL;
2183 struct bt_event_class *writer_ec = NULL;
2184 struct bt_event_class *non_writer_ec = NULL;
2185 struct bt_event *event = NULL;
2186 struct bt_event *event2 = NULL;
2187 struct bt_field_type *empty_struct_ft = NULL;
2188 struct bt_field *int_field = NULL;
2189 struct bt_ctf_clock *writer_clock = NULL;
2190 struct bt_clock_class *non_writer_clock_class = NULL;
2191 struct bt_packet *packet = NULL;
2192 struct bt_packet *packet2 = NULL;
2193
2194 trace_path = g_build_filename(g_get_tmp_dir(), "ctfwriter_XXXXXX", NULL);
2195 if (!bt_mkdtemp(trace_path)) {
2196 perror("# perror");
2197 }
2198
2199 /* Create empty structure field type (event header) */
2200 empty_struct_ft = bt_field_type_structure_create();
2201 assert(empty_struct_ft);
2202
2203 /* Create writer, writer stream class, stream, and clock */
2204 writer = bt_ctf_writer_create(trace_path);
2205 assert(writer);
2206 writer_clock = bt_ctf_clock_create("writer_clock");
2207 assert(writer_clock);
2208 ret = bt_ctf_writer_add_clock(writer, writer_clock);
2209 assert(!ret);
2210 ret = bt_ctf_writer_set_byte_order(writer, BT_BYTE_ORDER_LITTLE_ENDIAN);
2211 assert(!ret);
2212 writer_trace = bt_ctf_writer_get_trace(writer);
2213 ok(writer_trace, "bt_ctf_writer_get_trace() returns a trace");
2214 writer_sc = bt_stream_class_create("writer_sc");
2215 assert(writer_sc);
2216 ret = bt_stream_class_set_event_header_type(writer_sc,
2217 empty_struct_ft);
2218 assert(!ret);
2219 ret = bt_stream_class_set_clock(writer_sc, writer_clock);
2220 assert(!ret);
2221 ret = bt_trace_add_stream_class(writer_trace, writer_sc);
2222 assert(!ret);
2223 writer_stream = bt_stream_create(writer_sc, writer_stream_name);
2224 assert(writer_stream);
2225 ok(!strcmp(bt_stream_get_name(writer_stream), writer_stream_name),
2226 "bt_stream_get_name() returns the stream's name");
2227
2228 /* Create non-writer trace, stream class, stream, and clock */
2229 non_writer_trace = bt_trace_create();
2230 assert(non_writer_trace);
2231 non_writer_sc = bt_stream_class_create("nonwriter_sc");
2232 assert(non_writer_sc);
2233 ret = bt_stream_class_set_event_header_type(non_writer_sc,
2234 empty_struct_ft);
2235 assert(!ret);
2236 ret = bt_stream_class_set_packet_context_type(non_writer_sc, NULL);
2237 assert(!ret);
2238 ret = bt_trace_add_stream_class(non_writer_trace, non_writer_sc);
2239 assert(!ret);
2240 non_writer_stream = bt_stream_create(non_writer_sc, NULL);
2241 assert(non_writer_stream);
2242 non_writer_clock_class =
2243 bt_clock_class_create("non_writer_clock_class",
2244 1000000000);
2245 assert(non_writer_clock_class);
2246 ret = bt_trace_add_clock_class(non_writer_trace,
2247 non_writer_clock_class);
2248 assert(!ret);
2249
2250 /* Create event class and event */
2251 writer_ec = create_minimal_event_class();
2252 assert(writer_ec);
2253 ret = bt_stream_class_add_event_class(writer_sc, writer_ec);
2254 assert(!ret);
2255 event = bt_event_create(writer_ec);
2256 assert(event);
2257 int_field = bt_event_get_payload_by_index(event, 0);
2258 assert(int_field);
2259 bt_field_unsigned_integer_set_value(int_field, 17);
2260
2261 /*
2262 * Verify non-writer stream: it should be impossible to append
2263 * an event to it.
2264 */
2265 ok(bt_stream_append_event(non_writer_stream, event),
2266 "bt_stream_append_event() fails with a non-writer stream");
2267
2268 /*
2269 * Verify writer stream: it should be possible to append an
2270 * event to it.
2271 */
2272 ok(!bt_stream_append_event(writer_stream, event),
2273 "bt_stream_append_event() succeeds with a writer stream");
2274
2275 /*
2276 * It should be possible to create a packet from a non-writer
2277 * stream, but not from a writer stream.
2278 */
2279 packet = bt_packet_create(non_writer_stream);
2280 ok(packet, "bt_packet_create() succeeds with a non-writer stream");
2281 packet_stream = bt_packet_get_stream(packet);
2282 ok(packet_stream == non_writer_stream,
2283 "bt_packet_get_stream() returns the correct stream");
2284
2285 /*
2286 * It should not be possible to append an event associated to
2287 * a stream to a different stream.
2288 */
2289 writer_stream2 = bt_stream_create(writer_sc, "zoo");
2290 assert(writer_stream2);
2291
2292 /*
2293 * It should be possible to set the packet of a fresh event, as
2294 * long as the originating stream classes are the same.
2295 */
2296 event2 = bt_event_create(writer_ec);
2297 assert(event2);
2298 non_writer_ec = create_minimal_event_class();
2299 assert(non_writer_ec);
2300 ret = bt_stream_class_add_event_class(non_writer_sc, non_writer_ec);
2301 assert(!ret);
2302 BT_PUT(event2);
2303 event2 = bt_event_create(non_writer_ec);
2304 assert(event2);
2305 ok(!bt_event_set_packet(event2, packet),
2306 "bt_event_set_packet() succeeds when the event's and the packet's stream class are the same");
2307
2308 /*
2309 * It should be possible to set a packet created from the same
2310 * stream to an event with an existing packet.
2311 */
2312 packet2 = bt_packet_create(non_writer_stream);
2313 assert(packet2);
2314 ok(!bt_event_set_packet(event2, packet2),
2315 "bt_event_set_packet() succeeds when the event's current packet has the same stream");
2316 BT_PUT(packet2);
2317
2318 /*
2319 * It should not be possible to set a packet created from a
2320 * different stream to an event with an existing packet.
2321 */
2322 non_writer_stream2 = bt_stream_create(non_writer_sc, "rj45");
2323 assert(non_writer_stream2);
2324 packet2 = bt_packet_create(non_writer_stream);
2325 assert(packet2);
2326
2327 bt_put(writer);
2328 bt_put(writer_trace);
2329 bt_put(writer_sc);
2330 bt_put(writer_stream);
2331 bt_put(writer_stream2);
2332 bt_put(non_writer_trace);
2333 bt_put(non_writer_sc);
2334 bt_put(non_writer_stream);
2335 bt_put(non_writer_stream2);
2336 bt_put(packet_stream);
2337 bt_put(writer_ec);
2338 bt_put(non_writer_ec);
2339 bt_put(event);
2340 bt_put(event2);
2341 bt_put(int_field);
2342 bt_put(empty_struct_ft);
2343 bt_put(writer_clock);
2344 bt_put(non_writer_clock_class);
2345 bt_put(packet);
2346 bt_put(packet2);
2347 recursive_rmdir(trace_path);
2348 g_free(trace_path);
2349 }
2350
2351 static
2352 void test_clock_utils(void)
2353 {
2354 int ret;
2355 struct bt_ctf_clock *clock = NULL;
2356
2357 clock = bt_ctf_clock_create("water");
2358 assert(clock);
2359 ret = bt_ctf_clock_set_offset_s(clock, 1234);
2360 assert(!ret);
2361 ret = bt_ctf_clock_set_offset(clock, 1000);
2362 assert(!ret);
2363 ret = bt_ctf_clock_set_frequency(clock, 1000000000);
2364 assert(!ret);
2365 ret = bt_ctf_clock_set_frequency(clock, 1534);
2366 assert(!ret);
2367
2368 BT_PUT(clock);
2369 }
2370
2371 void test_set_clock_non_writer_stream_class(void)
2372 {
2373 struct bt_ctf_clock *clock;
2374 struct bt_trace *trace;
2375 struct bt_stream_class *sc;
2376 int ret;
2377
2378 clock = bt_ctf_clock_create("the_clock");
2379 assert(clock);
2380
2381 trace = bt_trace_create();
2382 assert(trace);
2383
2384 sc = bt_stream_class_create(NULL);
2385 assert(sc);
2386
2387 ret = bt_stream_class_set_clock(sc, clock);
2388 assert(ret == 0);
2389
2390 ret = bt_trace_add_stream_class(trace, sc);
2391 ok(ret < 0,
2392 "bt_trace_add_stream_class() fails with a stream class with a registered clock");
2393
2394 bt_put(clock);
2395 bt_put(trace);
2396 bt_put(sc);
2397 }
2398
2399 static
2400 void test_static_trace(void)
2401 {
2402 struct bt_trace *trace;
2403 struct bt_stream_class *stream_class;
2404 struct bt_stream_class *stream_class2;
2405 struct bt_stream *stream;
2406 struct bt_clock_class *clock_class;
2407 int ret;
2408
2409 trace = bt_trace_create();
2410 assert(trace);
2411 stream_class = bt_stream_class_create(NULL);
2412 assert(stream_class);
2413 ret = bt_stream_class_set_packet_context_type(stream_class, NULL);
2414 assert(ret == 0);
2415 ret = bt_trace_add_stream_class(trace, stream_class);
2416 assert(ret == 0);
2417 stream = bt_stream_create(stream_class, "hello");
2418 ok(stream, "bt_stream_create() succeeds with a non-static trace");
2419 bt_put(stream);
2420 ok(!bt_trace_is_static(trace),
2421 "bt_trace_is_static() returns the expected value");
2422 ok(bt_trace_set_is_static(trace) == 0,
2423 "bt_trace_set_is_static() succeeds");
2424 ok(bt_trace_is_static(trace),
2425 "bt_trace_is_static() returns the expected value");
2426 clock_class = bt_clock_class_create("yes", 1000000000);
2427 assert(clock_class);
2428 stream_class2 = bt_stream_class_create(NULL);
2429 assert(stream_class2);
2430 ok(bt_trace_add_stream_class(trace, stream_class2),
2431 "bt_trace_add_stream_class() fails with a static trace");
2432 ok(bt_trace_add_clock_class(trace, clock_class),
2433 "bt_trace_add_clock_class() fails with a static trace");
2434 ok(!bt_stream_create(stream_class, "hello2"),
2435 "bt_stream_create() fails with a static trace");
2436
2437 bt_put(trace);
2438 bt_put(stream_class);
2439 bt_put(stream_class2);
2440 bt_put(clock_class);
2441 }
2442
2443 static
2444 void trace_is_static_listener(struct bt_trace *trace, void *data)
2445 {
2446 *((int *) data) |= 1;
2447 }
2448
2449 static
2450 void trace_listener_removed(struct bt_trace *trace, void *data)
2451 {
2452 *((int *) data) |= 2;
2453 }
2454
2455 static
2456 void test_trace_is_static_listener(void)
2457 {
2458 struct bt_trace *trace;
2459 int ret;
2460 int called1 = 0;
2461 int called2 = 0;
2462 int called3 = 0;
2463 int called4 = 0;
2464 int listener1_id;
2465 int listener2_id;
2466 int listener3_id;
2467 int listener4_id;
2468
2469 trace = bt_trace_create();
2470 assert(trace);
2471 ret = bt_trace_add_is_static_listener(NULL,
2472 trace_is_static_listener, trace_listener_removed, &called1);
2473 ok(ret < 0, "bt_trace_add_is_static_listener() handles NULL (trace)");
2474 ret = bt_trace_add_is_static_listener(trace, NULL,
2475 trace_listener_removed, &called1);
2476 ok(ret < 0, "bt_trace_add_is_static_listener() handles NULL (listener)");
2477 listener1_id = bt_trace_add_is_static_listener(trace,
2478 trace_is_static_listener, trace_listener_removed, &called1);
2479 ok(listener1_id >= 0, "bt_trace_add_is_static_listener() succeeds (1)");
2480 listener2_id = bt_trace_add_is_static_listener(trace,
2481 trace_is_static_listener, trace_listener_removed, &called2);
2482 ok(listener2_id >= 0, "bt_trace_add_is_static_listener() succeeds (2)");
2483 listener3_id = bt_trace_add_is_static_listener(trace,
2484 trace_is_static_listener, trace_listener_removed, &called3);
2485 ok(listener3_id >= 0, "bt_trace_add_is_static_listener() succeeds (3)");
2486 ret = bt_trace_remove_is_static_listener(NULL, 0);
2487 ok(ret < 0, "bt_trace_remove_is_static_listener() handles NULL (trace)");
2488 ret = bt_trace_remove_is_static_listener(trace, -2);
2489 ok(ret < 0, "bt_trace_remove_is_static_listener() handles invalid ID (negative)");
2490 ret = bt_trace_remove_is_static_listener(trace, 77);
2491 ok(ret < 0, "bt_trace_remove_is_static_listener() handles invalid ID (non existing)");
2492 ret = bt_trace_remove_is_static_listener(trace, listener2_id);
2493 ok(ret == 0, "bt_trace_remove_is_static_listener() succeeds");
2494 ok(called2 == 2, "bt_trace_remove_is_static_listener() calls the remove listener");
2495 listener4_id = bt_trace_add_is_static_listener(trace,
2496 trace_is_static_listener, NULL, &called4);
2497 ok(listener4_id >= 0, "bt_trace_add_is_static_listener() succeeds (4)");
2498 ok(called1 == 0, "\"trace is static\" listener not called before the trace is made static (1)");
2499 ok(called2 == 2, "\"trace is static\" listener not called before the trace is made static (2)");
2500 ok(called3 == 0, "\"trace is static\" listener not called before the trace is made static (3)");
2501 ok(called4 == 0, "\"trace is static\" listener not called before the trace is made static (4)");
2502 ret = bt_trace_set_is_static(trace);
2503 assert(ret == 0);
2504 ret = bt_trace_add_is_static_listener(trace,
2505 trace_is_static_listener, trace_listener_removed, &called1);
2506 ok(ret < 0,
2507 "bt_trace_add_is_static_listener() fails when the trace is static");
2508 ok(called1 == 1, "\"trace is static\" listener called when the trace is made static (1)");
2509 ok(called2 == 2, "\"trace is static\" listener not called when the trace is made static (2)");
2510 ok(called3 == 1, "\"trace is static\" listener called when the trace is made static (3)");
2511 ok(called4 == 1, "\"trace is static\" listener called when the trace is made static (4)");
2512 called1 = 0;
2513 called2 = 0;
2514 called3 = 0;
2515 called4 = 0;
2516 bt_put(trace);
2517 ok(called1 == 2, "\"trace is static\" listener not called after the trace is put (1)");
2518 ok(called2 == 0, "\"trace is static\" listener not called after the trace is put (2)");
2519 ok(called3 == 2, "\"trace is static\" listener not called after the trace is put (3)");
2520 ok(called4 == 0, "\"trace is static\" listener not called after the trace is put (4)");
2521 }
2522
2523 static
2524 void test_trace_uuid(void)
2525 {
2526 struct bt_trace *trace;
2527 const unsigned char uuid[] = {
2528 0x35, 0x92, 0x63, 0xab, 0xb4, 0xbe, 0x40, 0xb4,
2529 0xb2, 0x60, 0xd3, 0xf1, 0x3b, 0xb0, 0xd8, 0x59,
2530 };
2531 const unsigned char *ret_uuid;
2532
2533 trace = bt_trace_create();
2534 assert(trace);
2535 ok(!bt_trace_get_uuid(trace),
2536 "bt_trace_get_uuid() returns NULL initially");
2537 ok(bt_trace_set_uuid(NULL, uuid),
2538 "bt_trace_set_uuid() handles NULL (trace)");
2539 ok(bt_trace_set_uuid(trace, NULL),
2540 "bt_trace_set_uuid() handles NULL (UUID)");
2541 ok(bt_trace_set_uuid(trace, uuid) == 0,
2542 "bt_trace_set_uuid() succeeds with a valid UUID");
2543 ret_uuid = bt_trace_get_uuid(trace);
2544 ok(ret_uuid, "bt_trace_get_uuid() returns a UUID");
2545 assert(ret_uuid);
2546 ok(memcmp(uuid, ret_uuid, 16) == 0,
2547 "bt_trace_get_uuid() returns the expected UUID");
2548
2549 bt_put(trace);
2550 }
2551
2552 int main(int argc, char **argv)
2553 {
2554 const char *env_resize_length;
2555 gchar *trace_path;
2556 gchar *metadata_path;
2557 const char *clock_name = "test_clock";
2558 const char *clock_description = "This is a test clock";
2559 const char *returned_clock_name;
2560 const char *returned_clock_description;
2561 const uint64_t frequency = 1123456789;
2562 const int64_t offset_s = 13515309;
2563 const int64_t offset = 1234567;
2564 int64_t get_offset_s,
2565 get_offset;
2566 const uint64_t precision = 10;
2567 const int is_absolute = 0xFF;
2568 char *metadata_string;
2569 struct bt_ctf_writer *writer;
2570 struct bt_utsname name = {"GNU/Linux", "testhost", "4.4.0-87-generic",
2571 "#110-Ubuntu SMP Tue Jul 18 12:55:35 UTC 2017", "x86_64"};
2572 struct bt_ctf_clock *clock, *ret_clock;
2573 struct bt_clock_class *ret_clock_class;
2574 struct bt_stream_class *stream_class, *ret_stream_class;
2575 struct bt_stream *stream1;
2576 struct bt_stream *stream;
2577 const char *ret_string;
2578 const unsigned char *ret_uuid;
2579 unsigned char tmp_uuid[16] = { 0 };
2580 struct bt_field_type *packet_context_type,
2581 *packet_context_field_type,
2582 *packet_header_type,
2583 *packet_header_field_type,
2584 *integer_type,
2585 *stream_event_context_type,
2586 *ret_field_type,
2587 *event_header_field_type;
2588 struct bt_field *packet_header, *packet_header_field;
2589 struct bt_trace *trace;
2590 int ret;
2591 int64_t ret_int64_t;
2592 struct bt_value *obj;
2593
2594 if (argc < 2) {
2595 printf("Usage: tests-ctf-writer path_to_babeltrace\n");
2596 return -1;
2597 }
2598
2599 env_resize_length = getenv("PACKET_RESIZE_TEST_LENGTH");
2600 if (env_resize_length) {
2601 packet_resize_test_length =
2602 (unsigned int) atoi(env_resize_length);
2603 }
2604
2605 plan_tests(NR_TESTS);
2606
2607 trace_path = g_build_filename(g_get_tmp_dir(), "ctfwriter_XXXXXX", NULL);
2608 if (!bt_mkdtemp(trace_path)) {
2609 perror("# perror");
2610 }
2611
2612 metadata_path = g_build_filename(trace_path, "metadata", NULL);
2613
2614 writer = bt_ctf_writer_create(trace_path);
2615 ok(writer, "bt_create succeeds in creating trace with path");
2616
2617 ok(!bt_ctf_writer_get_trace(NULL),
2618 "bt_ctf_writer_get_trace correctly handles NULL");
2619 trace = bt_ctf_writer_get_trace(writer);
2620 ok(bt_trace_set_native_byte_order(trace, BT_BYTE_ORDER_NATIVE),
2621 "Cannot set a trace's byte order to BT_BYTE_ORDER_NATIVE");
2622 ok(bt_trace_set_native_byte_order(trace, BT_BYTE_ORDER_UNSPECIFIED),
2623 "Cannot set a trace's byte order to BT_BYTE_ORDER_UNSPECIFIED");
2624 ok(trace,
2625 "bt_ctf_writer_get_trace returns a bt_trace object");
2626 ok(bt_trace_set_native_byte_order(trace, BT_BYTE_ORDER_BIG_ENDIAN) == 0,
2627 "Set a trace's byte order to big endian");
2628 ok(bt_trace_get_native_byte_order(trace) == BT_BYTE_ORDER_BIG_ENDIAN,
2629 "bt_trace_get_native_byte_order returns a correct endianness");
2630
2631 /* Add environment context to the trace */
2632 ok(bt_ctf_writer_add_environment_field(writer, "host", name.nodename) == 0,
2633 "Add host (%s) environment field to writer instance",
2634 name.nodename);
2635 ok(bt_ctf_writer_add_environment_field(NULL, "test_field",
2636 "test_value"),
2637 "bt_ctf_writer_add_environment_field error with NULL writer");
2638 ok(bt_ctf_writer_add_environment_field(writer, NULL,
2639 "test_value"),
2640 "bt_ctf_writer_add_environment_field error with NULL field name");
2641 ok(bt_ctf_writer_add_environment_field(writer, "test_field",
2642 NULL),
2643 "bt_ctf_writer_add_environment_field error with NULL field value");
2644
2645 /* Test bt_trace_set_environment_field with an integer object */
2646 obj = bt_value_integer_create_init(23);
2647 assert(obj);
2648 ok(bt_trace_set_environment_field(NULL, "test_env_int_obj", obj),
2649 "bt_trace_set_environment_field handles a NULL trace correctly");
2650 ok(bt_trace_set_environment_field(trace, NULL, obj),
2651 "bt_trace_set_environment_field handles a NULL name correctly");
2652 ok(bt_trace_set_environment_field(trace, "test_env_int_obj", NULL),
2653 "bt_trace_set_environment_field handles a NULL value correctly");
2654 ok(!bt_trace_set_environment_field(trace, "test_env_int_obj", obj),
2655 "bt_trace_set_environment_field succeeds in adding an integer object");
2656 BT_PUT(obj);
2657
2658 /* Test bt_trace_set_environment_field with a string object */
2659 obj = bt_value_string_create_init("the value");
2660 assert(obj);
2661 ok(!bt_trace_set_environment_field(trace, "test_env_str_obj", obj),
2662 "bt_trace_set_environment_field succeeds in adding a string object");
2663 BT_PUT(obj);
2664
2665 /* Test bt_trace_set_environment_field_integer */
2666 ok(bt_trace_set_environment_field_integer(NULL, "test_env_int",
2667 -194875),
2668 "bt_trace_set_environment_field_integer handles a NULL trace correctly");
2669 ok(bt_trace_set_environment_field_integer(trace, NULL, -194875),
2670 "bt_trace_set_environment_field_integer handles a NULL name correctly");
2671 ok(!bt_trace_set_environment_field_integer(trace, "test_env_int",
2672 -164973),
2673 "bt_trace_set_environment_field_integer succeeds");
2674
2675 /* Test bt_trace_set_environment_field_string */
2676 ok(bt_trace_set_environment_field_string(NULL, "test_env_str",
2677 "yeah"),
2678 "bt_trace_set_environment_field_string handles a NULL trace correctly");
2679 ok(bt_trace_set_environment_field_string(trace, NULL, "yeah"),
2680 "bt_trace_set_environment_field_string handles a NULL name correctly");
2681 ok(bt_trace_set_environment_field_string(trace, "test_env_str",
2682 NULL),
2683 "bt_trace_set_environment_field_string handles a NULL value correctly");
2684 ok(!bt_trace_set_environment_field_string(trace, "test_env_str",
2685 "oh yeah"),
2686 "bt_trace_set_environment_field_string succeeds");
2687
2688 /* Test bt_trace_get_environment_field_count */
2689 ok(bt_trace_get_environment_field_count(trace) == 5,
2690 "bt_trace_get_environment_field_count returns a correct number of environment fields");
2691
2692 /* Test bt_trace_get_environment_field_name */
2693 ret_string = bt_trace_get_environment_field_name_by_index(trace, 0);
2694 ok(ret_string && !strcmp(ret_string, "host"),
2695 "bt_trace_get_environment_field_name returns a correct field name");
2696 ret_string = bt_trace_get_environment_field_name_by_index(trace, 1);
2697 ok(ret_string && !strcmp(ret_string, "test_env_int_obj"),
2698 "bt_trace_get_environment_field_name returns a correct field name");
2699 ret_string = bt_trace_get_environment_field_name_by_index(trace, 2);
2700 ok(ret_string && !strcmp(ret_string, "test_env_str_obj"),
2701 "bt_trace_get_environment_field_name returns a correct field name");
2702 ret_string = bt_trace_get_environment_field_name_by_index(trace, 3);
2703 ok(ret_string && !strcmp(ret_string, "test_env_int"),
2704 "bt_trace_get_environment_field_name returns a correct field name");
2705 ret_string = bt_trace_get_environment_field_name_by_index(trace, 4);
2706 ok(ret_string && !strcmp(ret_string, "test_env_str"),
2707 "bt_trace_get_environment_field_name returns a correct field name");
2708
2709 /* Test bt_trace_get_environment_field_value */
2710 obj = bt_trace_get_environment_field_value_by_index(trace, 1);
2711 ret = bt_value_integer_get(obj, &ret_int64_t);
2712 ok(!ret && ret_int64_t == 23,
2713 "bt_trace_get_environment_field_value succeeds in getting an integer value");
2714 BT_PUT(obj);
2715 obj = bt_trace_get_environment_field_value_by_index(trace, 2);
2716 ret = bt_value_string_get(obj, &ret_string);
2717 ok(!ret && ret_string && !strcmp(ret_string, "the value"),
2718 "bt_trace_get_environment_field_value succeeds in getting a string value");
2719 BT_PUT(obj);
2720
2721 /* Test bt_trace_get_environment_field_value_by_name */
2722 ok(!bt_trace_get_environment_field_value_by_name(trace, "oh oh"),
2723 "bt_trace_get_environment_field_value_by_name returns NULL or an unknown field name");
2724 obj = bt_trace_get_environment_field_value_by_name(trace,
2725 "test_env_str");
2726 ret = bt_value_string_get(obj, &ret_string);
2727 ok(!ret && ret_string && !strcmp(ret_string, "oh yeah"),
2728 "bt_trace_get_environment_field_value_by_name succeeds in getting an existing field");
2729 BT_PUT(obj);
2730
2731 /* Test environment field replacement */
2732 ok(!bt_trace_set_environment_field_integer(trace, "test_env_int",
2733 654321),
2734 "bt_trace_set_environment_field_integer succeeds with an existing name");
2735 ok(bt_trace_get_environment_field_count(trace) == 5,
2736 "bt_trace_set_environment_field_integer with an existing key does not increase the environment size");
2737 obj = bt_trace_get_environment_field_value_by_index(trace, 3);
2738 ret = bt_value_integer_get(obj, &ret_int64_t);
2739 ok(!ret && ret_int64_t == 654321,
2740 "bt_trace_get_environment_field_value successfully replaces an existing field");
2741 BT_PUT(obj);
2742
2743 ok(bt_ctf_writer_add_environment_field(writer, "sysname", name.sysname)
2744 == 0, "Add sysname (%s) environment field to writer instance",
2745 name.sysname);
2746 ok(bt_ctf_writer_add_environment_field(writer, "nodename",
2747 name.nodename) == 0,
2748 "Add nodename (%s) environment field to writer instance",
2749 name.nodename);
2750 ok(bt_ctf_writer_add_environment_field(writer, "release", name.release)
2751 == 0, "Add release (%s) environment field to writer instance",
2752 name.release);
2753 ok(bt_ctf_writer_add_environment_field(writer, "version", name.version)
2754 == 0, "Add version (%s) environment field to writer instance",
2755 name.version);
2756 ok(bt_ctf_writer_add_environment_field(writer, "machine", name.machine)
2757 == 0, "Add machine (%s) environment field to writer istance",
2758 name.machine);
2759
2760 /* Define a clock and add it to the trace */
2761 ok(bt_ctf_clock_create("signed") == NULL,
2762 "Illegal clock name rejected");
2763 clock = bt_ctf_clock_create(clock_name);
2764 ok(clock, "Clock created sucessfully");
2765 returned_clock_name = bt_ctf_clock_get_name(clock);
2766 ok(returned_clock_name, "bt_ctf_clock_get_name returns a clock name");
2767 ok(returned_clock_name ? !strcmp(returned_clock_name, clock_name) : 0,
2768 "Returned clock name is valid");
2769
2770 returned_clock_description = bt_ctf_clock_get_description(clock);
2771 ok(!returned_clock_description, "bt_ctf_clock_get_description returns NULL on an unset description");
2772 ok(bt_ctf_clock_set_description(clock, clock_description) == 0,
2773 "Clock description set successfully");
2774
2775 returned_clock_description = bt_ctf_clock_get_description(clock);
2776 ok(returned_clock_description,
2777 "bt_ctf_clock_get_description returns a description.");
2778 ok(returned_clock_description ?
2779 !strcmp(returned_clock_description, clock_description) : 0,
2780 "Returned clock description is valid");
2781
2782 ok(bt_ctf_clock_get_frequency(clock) == DEFAULT_CLOCK_FREQ,
2783 "bt_ctf_clock_get_frequency returns the correct default frequency");
2784 ok(bt_ctf_clock_set_frequency(clock, frequency) == 0,
2785 "Set clock frequency");
2786 ok(bt_ctf_clock_get_frequency(clock) == frequency,
2787 "bt_ctf_clock_get_frequency returns the correct frequency once it is set");
2788
2789 ok(bt_ctf_clock_get_offset_s(clock, &get_offset_s) == 0,
2790 "bt_ctf_clock_get_offset_s succeeds");
2791 ok(get_offset_s == DEFAULT_CLOCK_OFFSET_S,
2792 "bt_ctf_clock_get_offset_s returns the correct default offset (in seconds)");
2793 ok(bt_ctf_clock_set_offset_s(clock, offset_s) == 0,
2794 "Set clock offset (seconds)");
2795 ok(bt_ctf_clock_get_offset_s(clock, &get_offset_s) == 0,
2796 "bt_ctf_clock_get_offset_s succeeds");
2797 ok(get_offset_s == offset_s,
2798 "bt_ctf_clock_get_offset_s returns the correct default offset (in seconds) once it is set");
2799
2800 ok(bt_ctf_clock_get_offset(clock, &get_offset) == 0,
2801 "bt_ctf_clock_get_offset succeeds");
2802 ok(get_offset == DEFAULT_CLOCK_OFFSET,
2803 "bt_ctf_clock_get_offset returns the correct default offset (in ticks)");
2804 ok(bt_ctf_clock_set_offset(clock, offset) == 0, "Set clock offset");
2805 ok(bt_ctf_clock_get_offset(clock, &get_offset) == 0,
2806 "bt_ctf_clock_get_offset succeeds");
2807 ok(get_offset == offset,
2808 "bt_ctf_clock_get_offset returns the correct default offset (in ticks) once it is set");
2809
2810 ok(bt_ctf_clock_get_precision(clock) == DEFAULT_CLOCK_PRECISION,
2811 "bt_ctf_clock_get_precision returns the correct default precision");
2812 ok(bt_ctf_clock_set_precision(clock, precision) == 0,
2813 "Set clock precision");
2814 ok(bt_ctf_clock_get_precision(clock) == precision,
2815 "bt_ctf_clock_get_precision returns the correct precision once it is set");
2816
2817 ok(bt_ctf_clock_get_is_absolute(clock) == DEFAULT_CLOCK_IS_ABSOLUTE,
2818 "bt_ctf_clock_get_precision returns the correct default is_absolute attribute");
2819 ok(bt_ctf_clock_set_is_absolute(clock, is_absolute) == 0,
2820 "Set clock absolute property");
2821 ok(bt_ctf_clock_get_is_absolute(clock) == !!is_absolute,
2822 "bt_ctf_clock_get_precision returns the correct is_absolute attribute once it is set");
2823
2824 ok(bt_ctf_clock_set_time(clock, current_time) == 0,
2825 "Set clock time");
2826
2827 ret_uuid = bt_ctf_clock_get_uuid(clock);
2828 ok(ret_uuid,
2829 "bt_ctf_clock_get_uuid returns a UUID");
2830 if (ret_uuid) {
2831 memcpy(tmp_uuid, ret_uuid, sizeof(tmp_uuid));
2832 /* Slightly modify UUID */
2833 tmp_uuid[sizeof(tmp_uuid) - 1]++;
2834 }
2835
2836 ok(bt_ctf_clock_set_uuid(clock, tmp_uuid) == 0,
2837 "bt_ctf_clock_set_uuid sets a new uuid successfully");
2838 ret_uuid = bt_ctf_clock_get_uuid(clock);
2839 ok(ret_uuid,
2840 "bt_ctf_clock_get_uuid returns a UUID after setting a new one");
2841 ok(uuid_match(ret_uuid, tmp_uuid),
2842 "bt_ctf_clock_get_uuid returns the correct UUID after setting a new one");
2843
2844 /* Define a stream class */
2845 stream_class = bt_stream_class_create("test_stream");
2846
2847 ret_string = bt_stream_class_get_name(stream_class);
2848 ok(ret_string && !strcmp(ret_string, "test_stream"),
2849 "bt_stream_class_get_name returns a correct stream class name");
2850
2851 ok(bt_stream_class_get_clock(stream_class) == NULL,
2852 "bt_stream_class_get_clock returns NULL when a clock was not set");
2853 ok(bt_stream_class_get_clock(NULL) == NULL,
2854 "bt_stream_class_get_clock handles NULL correctly");
2855
2856 ok(stream_class, "Create stream class");
2857 ok(bt_stream_class_set_clock(stream_class, clock) == 0,
2858 "Set a stream class' clock");
2859 ret_clock = bt_stream_class_get_clock(stream_class);
2860 ok(ret_clock == clock,
2861 "bt_stream_class_get_clock returns a correct clock");
2862 bt_put(ret_clock);
2863
2864 /* Test the event fields and event types APIs */
2865 type_field_tests();
2866
2867 /* Test fields copying */
2868 field_copy_tests();
2869
2870 ok(bt_stream_class_get_id(stream_class) < 0,
2871 "bt_stream_class_get_id returns an error when no id is set");
2872 ok(bt_stream_class_set_id(NULL, 123) < 0,
2873 "bt_stream_class_set_id handles NULL correctly");
2874 ok(bt_stream_class_set_id(stream_class, 123) == 0,
2875 "Set an stream class' id");
2876 ok(bt_stream_class_get_id(stream_class) == 123,
2877 "bt_stream_class_get_id returns the correct value");
2878
2879 /* Validate default event header fields */
2880 ret_field_type = bt_stream_class_get_event_header_type(
2881 stream_class);
2882 ok(ret_field_type,
2883 "bt_stream_class_get_event_header_type returns an event header type");
2884 ok(bt_field_type_get_type_id(ret_field_type) == BT_FIELD_TYPE_ID_STRUCT,
2885 "Default event header type is a structure");
2886 event_header_field_type =
2887 bt_field_type_structure_get_field_type_by_name(
2888 ret_field_type, "id");
2889 ok(event_header_field_type,
2890 "Default event header type contains an \"id\" field");
2891 ok(bt_field_type_get_type_id(
2892 event_header_field_type) == BT_FIELD_TYPE_ID_INTEGER,
2893 "Default event header \"id\" field is an integer");
2894 bt_put(event_header_field_type);
2895 event_header_field_type =
2896 bt_field_type_structure_get_field_type_by_name(
2897 ret_field_type, "timestamp");
2898 ok(event_header_field_type,
2899 "Default event header type contains a \"timestamp\" field");
2900 ok(bt_field_type_get_type_id(
2901 event_header_field_type) == BT_FIELD_TYPE_ID_INTEGER,
2902 "Default event header \"timestamp\" field is an integer");
2903 bt_put(event_header_field_type);
2904 bt_put(ret_field_type);
2905
2906 /* Add a custom trace packet header field */
2907 packet_header_type = bt_trace_get_packet_header_type(trace);
2908 ok(packet_header_type,
2909 "bt_trace_get_packet_header_type returns a packet header");
2910 ok(bt_field_type_get_type_id(packet_header_type) == BT_FIELD_TYPE_ID_STRUCT,
2911 "bt_trace_get_packet_header_type returns a packet header of type struct");
2912 ret_field_type = bt_field_type_structure_get_field_type_by_name(
2913 packet_header_type, "magic");
2914 ok(ret_field_type, "Default packet header type contains a \"magic\" field");
2915 bt_put(ret_field_type);
2916 ret_field_type = bt_field_type_structure_get_field_type_by_name(
2917 packet_header_type, "uuid");
2918 ok(ret_field_type, "Default packet header type contains a \"uuid\" field");
2919 bt_put(ret_field_type);
2920 ret_field_type = bt_field_type_structure_get_field_type_by_name(
2921 packet_header_type, "stream_id");
2922 ok(ret_field_type, "Default packet header type contains a \"stream_id\" field");
2923 bt_put(ret_field_type);
2924
2925 packet_header_field_type = bt_field_type_integer_create(22);
2926 ok(!bt_field_type_structure_add_field(packet_header_type,
2927 packet_header_field_type, "custom_trace_packet_header_field"),
2928 "Added a custom trace packet header field successfully");
2929
2930 ok(bt_trace_set_packet_header_type(NULL, packet_header_type) < 0,
2931 "bt_trace_set_packet_header_type handles a NULL trace correctly");
2932 ok(!bt_trace_set_packet_header_type(trace, packet_header_type),
2933 "Set a trace packet_header_type successfully");
2934
2935 /* Add a custom field to the stream class' packet context */
2936 packet_context_type = bt_stream_class_get_packet_context_type(stream_class);
2937 ok(packet_context_type,
2938 "bt_stream_class_get_packet_context_type returns a packet context type.");
2939 ok(bt_field_type_get_type_id(packet_context_type) == BT_FIELD_TYPE_ID_STRUCT,
2940 "Packet context is a structure");
2941
2942 ok(bt_stream_class_set_packet_context_type(NULL, packet_context_type),
2943 "bt_stream_class_set_packet_context_type handles a NULL stream class correctly");
2944
2945 integer_type = bt_field_type_integer_create(32);
2946 ok(bt_stream_class_set_packet_context_type(stream_class,
2947 integer_type) < 0,
2948 "bt_stream_class_set_packet_context_type rejects a packet context that is not a structure");
2949 /* Create a "uint5_t" equivalent custom packet context field */
2950 packet_context_field_type = bt_field_type_integer_create(5);
2951
2952 ret = bt_field_type_structure_add_field(packet_context_type,
2953 packet_context_field_type, "custom_packet_context_field");
2954 ok(ret == 0, "Packet context field added successfully");
2955
2956 /* Define a stream event context containing a my_integer field. */
2957 stream_event_context_type = bt_field_type_structure_create();
2958 bt_field_type_structure_add_field(stream_event_context_type,
2959 integer_type, "common_event_context");
2960
2961 ok(bt_stream_class_set_event_context_type(NULL,
2962 stream_event_context_type) < 0,
2963 "bt_stream_class_set_event_context_type handles a NULL stream_class correctly");
2964 ok(bt_stream_class_set_event_context_type(stream_class,
2965 integer_type) < 0,
2966 "bt_stream_class_set_event_context_type validates that the event context os a structure");
2967
2968 ok(bt_stream_class_set_event_context_type(
2969 stream_class, stream_event_context_type) == 0,
2970 "Set a new stream event context type");
2971 ret_field_type = bt_stream_class_get_event_context_type(
2972 stream_class);
2973 ok(ret_field_type == stream_event_context_type,
2974 "bt_stream_class_get_event_context_type returns the correct field type.");
2975 bt_put(ret_field_type);
2976
2977 /* Instantiate a stream and append events */
2978 ret = bt_ctf_writer_add_clock(writer, clock);
2979 assert(ret == 0);
2980 ok(bt_trace_get_stream_count(trace) == 0,
2981 "bt_trace_get_stream_count() succeeds and returns the correct value (0)");
2982 stream1 = bt_ctf_writer_create_stream(writer, stream_class);
2983 ok(stream1, "Instanciate a stream class from writer");
2984 ok(bt_trace_get_stream_count(trace) == 1,
2985 "bt_trace_get_stream_count() succeeds and returns the correct value (1)");
2986 stream = bt_trace_get_stream_by_index(trace, 0);
2987 ok(stream == stream1,
2988 "bt_trace_get_stream_by_index() succeeds and returns the correct value");
2989 BT_PUT(stream);
2990
2991 /*
2992 * Creating a stream through a writer adds the given stream
2993 * class to the writer's trace, thus registering the stream
2994 * class's clock to the trace.
2995 */
2996 ok(bt_trace_get_clock_class_count(trace) == 1,
2997 "bt_trace_get_clock_class_count returns the correct number of clocks");
2998 ret_clock_class = bt_trace_get_clock_class_by_index(trace, 0);
2999 ok(strcmp(bt_clock_class_get_name(ret_clock_class),
3000 bt_ctf_clock_get_name(clock)) == 0,
3001 "bt_trace_get_clock_class returns the right clock instance");
3002 bt_put(ret_clock_class);
3003 ret_clock_class = bt_trace_get_clock_class_by_name(trace, clock_name);
3004 ok(strcmp(bt_clock_class_get_name(ret_clock_class),
3005 bt_ctf_clock_get_name(clock)) == 0,
3006 "bt_trace_get_clock_class returns the right clock instance");
3007 bt_put(ret_clock_class);
3008 ok(!bt_trace_get_clock_class_by_name(trace, "random"),
3009 "bt_trace_get_clock_by_name fails when the requested clock doesn't exist");
3010
3011 ret_stream_class = bt_stream_get_class(stream1);
3012 ok(ret_stream_class,
3013 "bt_stream_get_class returns a stream class");
3014 ok(ret_stream_class == stream_class,
3015 "Returned stream class is of the correct type");
3016
3017 /*
3018 * Packet header, packet context, event header, and stream
3019 * event context types were copied for the resolving
3020 * process
3021 */
3022 BT_PUT(packet_header_type);
3023 BT_PUT(packet_context_type);
3024 BT_PUT(stream_event_context_type);
3025 packet_header_type = bt_trace_get_packet_header_type(trace);
3026 assert(packet_header_type);
3027 packet_context_type =
3028 bt_stream_class_get_packet_context_type(stream_class);
3029 assert(packet_context_type);
3030 stream_event_context_type =
3031 bt_stream_class_get_event_context_type(stream_class);
3032 assert(stream_event_context_type);
3033
3034 /*
3035 * Try to modify the packet context type after a stream has been
3036 * created.
3037 */
3038 ret = bt_field_type_structure_add_field(packet_header_type,
3039 packet_header_field_type, "should_fail");
3040 ok(ret < 0,
3041 "Trace packet header type can't be modified once a stream has been instanciated");
3042
3043 /*
3044 * Try to modify the packet context type after a stream has been
3045 * created.
3046 */
3047 ret = bt_field_type_structure_add_field(packet_context_type,
3048 packet_context_field_type, "should_fail");
3049 ok(ret < 0,
3050 "Packet context type can't be modified once a stream has been instanciated");
3051
3052 /*
3053 * Try to modify the stream event context type after a stream has been
3054 * created.
3055 */
3056 ret = bt_field_type_structure_add_field(stream_event_context_type,
3057 integer_type, "should_fail");
3058 ok(ret < 0,
3059 "Stream event context type can't be modified once a stream has been instanciated");
3060
3061 /* Should fail after instanciating a stream (frozen) */
3062 ok(bt_stream_class_set_clock(stream_class, clock),
3063 "Changes to a stream class that was already instantiated fail");
3064
3065 /* Populate the custom packet header field only once for all tests */
3066 ok(bt_stream_get_packet_header(NULL) == NULL,
3067 "bt_stream_get_packet_header handles NULL correctly");
3068 packet_header = bt_stream_get_packet_header(stream1);
3069 ok(packet_header,
3070 "bt_stream_get_packet_header returns a packet header");
3071 ret_field_type = bt_field_get_type(packet_header);
3072 ok(ret_field_type == packet_header_type,
3073 "Stream returns a packet header of the appropriate type");
3074 bt_put(ret_field_type);
3075 packet_header_field = bt_field_structure_get_field_by_name(packet_header,
3076 "custom_trace_packet_header_field");
3077 ok(packet_header_field,
3078 "Packet header structure contains a custom field with the appropriate name");
3079 ret_field_type = bt_field_get_type(packet_header_field);
3080 ok(bt_field_type_compare(ret_field_type, packet_header_field_type) == 0,
3081 "Custom packet header field is of the expected type");
3082 ok(!bt_field_unsigned_integer_set_value(packet_header_field,
3083 54321), "Set custom packet header value successfully");
3084 ok(bt_stream_set_packet_header(stream1, NULL) < 0,
3085 "bt_stream_set_packet_header handles a NULL packet header correctly");
3086 ok(bt_stream_set_packet_header(NULL, packet_header) < 0,
3087 "bt_stream_set_packet_header handles a NULL stream correctly");
3088 ok(bt_stream_set_packet_header(stream1, packet_header_field) < 0,
3089 "bt_stream_set_packet_header rejects a packet header of the wrong type");
3090 ok(!bt_stream_set_packet_header(stream1, packet_header),
3091 "Successfully set a stream's packet header");
3092
3093 ok(bt_ctf_writer_add_environment_field(writer, "new_field", "test") == 0,
3094 "Add environment field to writer after stream creation");
3095
3096 test_clock_utils();
3097
3098 test_create_writer_vs_non_writer_mode();
3099
3100 test_set_clock_non_writer_stream_class();
3101
3102 test_instanciate_event_before_stream(writer, clock);
3103
3104 append_simple_event(stream_class, stream1, clock);
3105
3106 packet_resize_test(stream_class, stream1, clock);
3107
3108 append_complex_event(stream_class, stream1, clock);
3109
3110 append_existing_event_class(stream_class);
3111
3112 test_empty_stream(writer);
3113
3114 test_custom_event_header_stream(writer, clock);
3115
3116 test_static_trace();
3117
3118 test_trace_is_static_listener();
3119
3120 test_trace_uuid();
3121
3122 metadata_string = bt_ctf_writer_get_metadata_string(writer);
3123 ok(metadata_string, "Get metadata string");
3124
3125 bt_ctf_writer_flush_metadata(writer);
3126
3127 bt_put(clock);
3128 bt_put(ret_stream_class);
3129 bt_put(writer);
3130 bt_put(stream1);
3131 bt_put(packet_context_type);
3132 bt_put(packet_context_field_type);
3133 bt_put(integer_type);
3134 bt_put(stream_event_context_type);
3135 bt_put(ret_field_type);
3136 bt_put(packet_header_type);
3137 bt_put(packet_header_field_type);
3138 bt_put(packet_header);
3139 bt_put(packet_header_field);
3140 bt_put(trace);
3141 free(metadata_string);
3142 bt_put(stream_class);
3143
3144 validate_trace(argv[1], trace_path);
3145
3146 //recursive_rmdir(trace_path);
3147 g_free(trace_path);
3148 g_free(metadata_path);
3149
3150 return 0;
3151 }
BabelTrace - Trace Format Babel Tower
This page took 0.228335 seconds and 5 git commands to generate.