lib: assign a unique ID to each pre/postcond. and report it on failure
[babeltrace.git] / src / lib / trace-ir / field.c
1 /*
2 * SPDX-License-Identifier: MIT
3 *
4 * Copyright 2017-2018 Philippe Proulx <pproulx@efficios.com>
5 * Copyright 2013, 2014 Jérémie Galarneau <jeremie.galarneau@efficios.com>
6 */
7
8 #define BT_LOG_TAG "LIB/FIELD"
9 #include "lib/logging.h"
10
11 #include "lib/assert-cond.h"
12 #include <babeltrace2/trace-ir/field.h>
13 #include "lib/object.h"
14 #include "compat/compiler.h"
15 #include "compat/fcntl.h"
16 #include "common/align.h"
17 #include "common/assert.h"
18 #include <inttypes.h>
19 #include <stdbool.h>
20
21 #include "field.h"
22 #include "field-class.h"
23 #include "lib/func-status.h"
24
25 #define BT_ASSERT_PRE_DEV_FIELD_HOT(_field) \
26 BT_ASSERT_PRE_DEV_HOT("field", \
27 (const struct bt_field *) (_field), "Field", ": %!+f", (_field))
28
29 static
30 void reset_single_field(struct bt_field *field);
31
32 static
33 void reset_array_field(struct bt_field *field);
34
35 static
36 void reset_structure_field(struct bt_field *field);
37
38 static
39 void reset_option_field(struct bt_field *field);
40
41 static
42 void reset_variant_field(struct bt_field *field);
43
44 static
45 void set_single_field_is_frozen(struct bt_field *field, bool is_frozen);
46
47 static
48 void set_array_field_is_frozen(struct bt_field *field, bool is_frozen);
49
50 static
51 void set_structure_field_is_frozen(struct bt_field *field, bool is_frozen);
52
53 static
54 void set_option_field_is_frozen(struct bt_field *field, bool is_frozen);
55
56 static
57 void set_variant_field_is_frozen(struct bt_field *field, bool is_frozen);
58
59 static
60 bool single_field_is_set(const struct bt_field *field);
61
62 static
63 bool array_field_is_set(const struct bt_field *field);
64
65 static
66 bool structure_field_is_set(const struct bt_field *field);
67
68 static
69 bool option_field_is_set(const struct bt_field *field);
70
71 static
72 bool variant_field_is_set(const struct bt_field *field);
73
74 static
75 struct bt_field_methods bool_field_methods = {
76 .set_is_frozen = set_single_field_is_frozen,
77 .is_set = single_field_is_set,
78 .reset = reset_single_field,
79 };
80
81 static
82 struct bt_field_methods bit_array_field_methods = {
83 .set_is_frozen = set_single_field_is_frozen,
84 .is_set = single_field_is_set,
85 .reset = reset_single_field,
86 };
87
88 static
89 struct bt_field_methods integer_field_methods = {
90 .set_is_frozen = set_single_field_is_frozen,
91 .is_set = single_field_is_set,
92 .reset = reset_single_field,
93 };
94
95 static
96 struct bt_field_methods real_field_methods = {
97 .set_is_frozen = set_single_field_is_frozen,
98 .is_set = single_field_is_set,
99 .reset = reset_single_field,
100 };
101
102 static
103 struct bt_field_methods string_field_methods = {
104 .set_is_frozen = set_single_field_is_frozen,
105 .is_set = single_field_is_set,
106 .reset = reset_single_field,
107 };
108
109 static
110 struct bt_field_methods structure_field_methods = {
111 .set_is_frozen = set_structure_field_is_frozen,
112 .is_set = structure_field_is_set,
113 .reset = reset_structure_field,
114 };
115
116 static
117 struct bt_field_methods array_field_methods = {
118 .set_is_frozen = set_array_field_is_frozen,
119 .is_set = array_field_is_set,
120 .reset = reset_array_field,
121 };
122
123 static
124 struct bt_field_methods option_field_methods = {
125 .set_is_frozen = set_option_field_is_frozen,
126 .is_set = option_field_is_set,
127 .reset = reset_option_field,
128 };
129
130 static
131 struct bt_field_methods variant_field_methods = {
132 .set_is_frozen = set_variant_field_is_frozen,
133 .is_set = variant_field_is_set,
134 .reset = reset_variant_field,
135 };
136
137 static
138 struct bt_field *create_bool_field(struct bt_field_class *);
139
140 static
141 struct bt_field *create_bit_array_field(struct bt_field_class *);
142
143 static
144 struct bt_field *create_integer_field(struct bt_field_class *);
145
146 static
147 struct bt_field *create_real_field(struct bt_field_class *);
148
149 static
150 struct bt_field *create_string_field(struct bt_field_class *);
151
152 static
153 struct bt_field *create_structure_field(struct bt_field_class *);
154
155 static
156 struct bt_field *create_static_array_field(struct bt_field_class *);
157
158 static
159 struct bt_field *create_dynamic_array_field(struct bt_field_class *);
160
161 static
162 struct bt_field *create_option_field(struct bt_field_class *);
163
164 static
165 struct bt_field *create_variant_field(struct bt_field_class *);
166
167 static
168 void destroy_bool_field(struct bt_field *field);
169
170 static
171 void destroy_bit_array_field(struct bt_field *field);
172
173 static
174 void destroy_integer_field(struct bt_field *field);
175
176 static
177 void destroy_real_field(struct bt_field *field);
178
179 static
180 void destroy_string_field(struct bt_field *field);
181
182 static
183 void destroy_structure_field(struct bt_field *field);
184
185 static
186 void destroy_array_field(struct bt_field *field);
187
188 static
189 void destroy_option_field(struct bt_field *field);
190
191 static
192 void destroy_variant_field(struct bt_field *field);
193
194 struct bt_field_class *bt_field_borrow_class(struct bt_field *field)
195 {
196 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
197 return field->class;
198 }
199
200 const struct bt_field_class *bt_field_borrow_class_const(
201 const struct bt_field *field)
202 {
203 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
204 return field->class;
205 }
206
207 enum bt_field_class_type bt_field_get_class_type(const struct bt_field *field)
208 {
209 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
210 return field->class->type;
211 }
212
213 BT_HIDDEN
214 struct bt_field *bt_field_create(struct bt_field_class *fc)
215 {
216 struct bt_field *field = NULL;
217
218 BT_ASSERT(fc);
219
220 switch (fc->type) {
221 case BT_FIELD_CLASS_TYPE_BOOL:
222 field = create_bool_field(fc);
223 break;
224 case BT_FIELD_CLASS_TYPE_BIT_ARRAY:
225 field = create_bit_array_field(fc);
226 break;
227 case BT_FIELD_CLASS_TYPE_UNSIGNED_INTEGER:
228 case BT_FIELD_CLASS_TYPE_SIGNED_INTEGER:
229 case BT_FIELD_CLASS_TYPE_UNSIGNED_ENUMERATION:
230 case BT_FIELD_CLASS_TYPE_SIGNED_ENUMERATION:
231 field = create_integer_field(fc);
232 break;
233 case BT_FIELD_CLASS_TYPE_SINGLE_PRECISION_REAL:
234 case BT_FIELD_CLASS_TYPE_DOUBLE_PRECISION_REAL:
235 field = create_real_field(fc);
236 break;
237 case BT_FIELD_CLASS_TYPE_STRING:
238 field = create_string_field(fc);
239 break;
240 case BT_FIELD_CLASS_TYPE_STRUCTURE:
241 field = create_structure_field(fc);
242 break;
243 case BT_FIELD_CLASS_TYPE_STATIC_ARRAY:
244 field = create_static_array_field(fc);
245 break;
246 case BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY_WITHOUT_LENGTH_FIELD:
247 case BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY_WITH_LENGTH_FIELD:
248 field = create_dynamic_array_field(fc);
249 break;
250 case BT_FIELD_CLASS_TYPE_OPTION_WITHOUT_SELECTOR_FIELD:
251 case BT_FIELD_CLASS_TYPE_OPTION_WITH_BOOL_SELECTOR_FIELD:
252 case BT_FIELD_CLASS_TYPE_OPTION_WITH_UNSIGNED_INTEGER_SELECTOR_FIELD:
253 case BT_FIELD_CLASS_TYPE_OPTION_WITH_SIGNED_INTEGER_SELECTOR_FIELD:
254 field = create_option_field(fc);
255 break;
256 case BT_FIELD_CLASS_TYPE_VARIANT_WITHOUT_SELECTOR_FIELD:
257 case BT_FIELD_CLASS_TYPE_VARIANT_WITH_UNSIGNED_INTEGER_SELECTOR_FIELD:
258 case BT_FIELD_CLASS_TYPE_VARIANT_WITH_SIGNED_INTEGER_SELECTOR_FIELD:
259 field = create_variant_field(fc);
260 break;
261 default:
262 bt_common_abort();
263 }
264
265 if (!field) {
266 BT_LIB_LOGE_APPEND_CAUSE("Cannot create field object from field class: "
267 "%![fc-]+F", fc);
268 goto end;
269 }
270
271 end:
272 return field;
273 }
274
275 static inline
276 void init_field(struct bt_field *field, struct bt_field_class *fc,
277 struct bt_field_methods *methods)
278 {
279 BT_ASSERT(field);
280 BT_ASSERT(fc);
281 bt_object_init_unique(&field->base);
282 field->methods = methods;
283 field->class = fc;
284 bt_object_get_ref_no_null_check(fc);
285 }
286
287 static
288 struct bt_field *create_bool_field(struct bt_field_class *fc)
289 {
290 struct bt_field_bool *bool_field;
291
292 BT_LIB_LOGD("Creating boolean field object: %![fc-]+F", fc);
293 bool_field = g_new0(struct bt_field_bool, 1);
294 if (!bool_field) {
295 BT_LIB_LOGE_APPEND_CAUSE(
296 "Failed to allocate one boolean field.");
297 goto end;
298 }
299
300 init_field((void *) bool_field, fc, &bool_field_methods);
301 BT_LIB_LOGD("Created boolean field object: %!+f", bool_field);
302
303 end:
304 return (void *) bool_field;
305 }
306
307 static
308 struct bt_field *create_bit_array_field(struct bt_field_class *fc)
309 {
310 struct bt_field_bit_array *ba_field;
311
312 BT_LIB_LOGD("Creating bit array field object: %![fc-]+F", fc);
313 ba_field = g_new0(struct bt_field_bit_array, 1);
314 if (!ba_field) {
315 BT_LIB_LOGE_APPEND_CAUSE(
316 "Failed to allocate one bit array field.");
317 goto end;
318 }
319
320 init_field((void *) ba_field, fc, &bit_array_field_methods);
321 BT_LIB_LOGD("Created bit array field object: %!+f", ba_field);
322
323 end:
324 return (void *) ba_field;
325 }
326
327 static
328 struct bt_field *create_integer_field(struct bt_field_class *fc)
329 {
330 struct bt_field_integer *int_field;
331
332 BT_LIB_LOGD("Creating integer field object: %![fc-]+F", fc);
333 int_field = g_new0(struct bt_field_integer, 1);
334 if (!int_field) {
335 BT_LIB_LOGE_APPEND_CAUSE(
336 "Failed to allocate one integer field.");
337 goto end;
338 }
339
340 init_field((void *) int_field, fc, &integer_field_methods);
341 BT_LIB_LOGD("Created integer field object: %!+f", int_field);
342
343 end:
344 return (void *) int_field;
345 }
346
347 static
348 struct bt_field *create_real_field(struct bt_field_class *fc)
349 {
350 struct bt_field_real *real_field;
351
352 BT_LIB_LOGD("Creating real field object: %![fc-]+F", fc);
353 real_field = g_new0(struct bt_field_real, 1);
354 if (!real_field) {
355 BT_LIB_LOGE_APPEND_CAUSE("Failed to allocate one real field.");
356 goto end;
357 }
358
359 init_field((void *) real_field, fc, &real_field_methods);
360 BT_LIB_LOGD("Created real field object: %!+f", real_field);
361
362 end:
363 return (void *) real_field;
364 }
365
366 static
367 struct bt_field *create_string_field(struct bt_field_class *fc)
368 {
369 struct bt_field_string *string_field;
370
371 BT_LIB_LOGD("Creating string field object: %![fc-]+F", fc);
372 string_field = g_new0(struct bt_field_string, 1);
373 if (!string_field) {
374 BT_LIB_LOGE_APPEND_CAUSE(
375 "Failed to allocate one string field.");
376 goto end;
377 }
378
379 init_field((void *) string_field, fc, &string_field_methods);
380 string_field->buf = g_array_sized_new(FALSE, FALSE,
381 sizeof(char), 1);
382 if (!string_field->buf) {
383 BT_LIB_LOGE_APPEND_CAUSE("Failed to allocate a GArray.");
384 bt_field_destroy((void *) string_field);
385 string_field = NULL;
386 goto end;
387 }
388
389 g_array_index(string_field->buf, char, 0) = '\0';
390 BT_LIB_LOGD("Created string field object: %!+f", string_field);
391
392 end:
393 return (void *) string_field;
394 }
395
396 static inline
397 int create_fields_from_named_field_classes(
398 struct bt_field_class_named_field_class_container *fc,
399 GPtrArray **fields)
400 {
401 int ret = 0;
402 uint64_t i;
403
404 *fields = g_ptr_array_new_with_free_func(
405 (GDestroyNotify) bt_field_destroy);
406 if (!*fields) {
407 BT_LIB_LOGE_APPEND_CAUSE("Failed to allocate a GPtrArray.");
408 ret = -1;
409 goto end;
410 }
411
412 g_ptr_array_set_size(*fields, fc->named_fcs->len);
413
414 for (i = 0; i < fc->named_fcs->len; i++) {
415 struct bt_field *field;
416 struct bt_named_field_class *named_fc = fc->named_fcs->pdata[i];
417
418 field = bt_field_create(named_fc->fc);
419 if (!field) {
420 BT_LIB_LOGE_APPEND_CAUSE(
421 "Failed to create structure member or variant option field: "
422 "name=\"%s\", %![fc-]+F",
423 named_fc->name->str, named_fc->fc);
424 ret = -1;
425 goto end;
426 }
427
428 g_ptr_array_index(*fields, i) = field;
429 }
430
431 end:
432 return ret;
433 }
434
435 static
436 struct bt_field *create_structure_field(struct bt_field_class *fc)
437 {
438 struct bt_field_structure *struct_field;
439
440 BT_LIB_LOGD("Creating structure field object: %![fc-]+F", fc);
441 struct_field = g_new0(struct bt_field_structure, 1);
442 if (!struct_field) {
443 BT_LIB_LOGE_APPEND_CAUSE(
444 "Failed to allocate one structure field.");
445 goto end;
446 }
447
448 init_field((void *) struct_field, fc, &structure_field_methods);
449
450 if (create_fields_from_named_field_classes((void *) fc,
451 &struct_field->fields)) {
452 BT_LIB_LOGE_APPEND_CAUSE(
453 "Cannot create structure member fields: %![fc-]+F", fc);
454 bt_field_destroy((void *) struct_field);
455 struct_field = NULL;
456 goto end;
457 }
458
459 BT_LIB_LOGD("Created structure field object: %!+f", struct_field);
460
461 end:
462 return (void *) struct_field;
463 }
464
465 static
466 struct bt_field *create_option_field(struct bt_field_class *fc)
467 {
468 struct bt_field_option *opt_field;
469 struct bt_field_class_option *opt_fc = (void *) fc;
470
471 BT_LIB_LOGD("Creating option field object: %![fc-]+F", fc);
472 opt_field = g_new0(struct bt_field_option, 1);
473 if (!opt_field) {
474 BT_LIB_LOGE_APPEND_CAUSE(
475 "Failed to allocate one option field.");
476 goto end;
477 }
478
479 init_field((void *) opt_field, fc, &option_field_methods);
480 opt_field->content_field = bt_field_create(opt_fc->content_fc);
481 if (!opt_field->content_field) {
482 BT_LIB_LOGE_APPEND_CAUSE(
483 "Failed to create option field's content field: "
484 "%![opt-fc-]+F, %![content-fc-]+F",
485 opt_fc, opt_fc->content_fc);
486 bt_field_destroy((void *) opt_field);
487 opt_field = NULL;
488 goto end;
489 }
490
491 BT_LIB_LOGD("Created option field object: %!+f", opt_field);
492
493 end:
494 return (void *) opt_field;
495 }
496
497 static
498 struct bt_field *create_variant_field(struct bt_field_class *fc)
499 {
500 struct bt_field_variant *var_field;
501
502 BT_LIB_LOGD("Creating variant field object: %![fc-]+F", fc);
503 var_field = g_new0(struct bt_field_variant, 1);
504 if (!var_field) {
505 BT_LIB_LOGE_APPEND_CAUSE(
506 "Failed to allocate one variant field.");
507 goto end;
508 }
509
510 init_field((void *) var_field, fc, &variant_field_methods);
511
512 if (create_fields_from_named_field_classes((void *) fc,
513 &var_field->fields)) {
514 BT_LIB_LOGE_APPEND_CAUSE("Cannot create variant member fields: "
515 "%![fc-]+F", fc);
516 bt_field_destroy((void *) var_field);
517 var_field = NULL;
518 goto end;
519 }
520
521 BT_LIB_LOGD("Created variant field object: %!+f", var_field);
522
523 end:
524 return (void *) var_field;
525 }
526
527 static inline
528 int init_array_field_fields(struct bt_field_array *array_field)
529 {
530 int ret = 0;
531 uint64_t i;
532 struct bt_field_class_array *array_fc;
533
534 BT_ASSERT(array_field);
535 array_fc = (void *) array_field->common.class;
536 array_field->fields = g_ptr_array_sized_new(array_field->length);
537 if (!array_field->fields) {
538 BT_LIB_LOGE_APPEND_CAUSE("Failed to allocate a GPtrArray.");
539 ret = -1;
540 goto end;
541 }
542
543 g_ptr_array_set_free_func(array_field->fields,
544 (GDestroyNotify) bt_field_destroy);
545 g_ptr_array_set_size(array_field->fields, array_field->length);
546
547 for (i = 0; i < array_field->length; i++) {
548 array_field->fields->pdata[i] = bt_field_create(
549 array_fc->element_fc);
550 if (!array_field->fields->pdata[i]) {
551 BT_LIB_LOGE_APPEND_CAUSE(
552 "Cannot create array field's element field: "
553 "index=%" PRIu64 ", %![fc-]+F", i, array_fc);
554 ret = -1;
555 goto end;
556 }
557 }
558
559 end:
560 return ret;
561 }
562
563 static
564 struct bt_field *create_static_array_field(struct bt_field_class *fc)
565 {
566 struct bt_field_class_array_static *array_fc = (void *) fc;
567 struct bt_field_array *array_field;
568
569 BT_LIB_LOGD("Creating static array field object: %![fc-]+F", fc);
570 array_field = g_new0(struct bt_field_array, 1);
571 if (!array_field) {
572 BT_LIB_LOGE_APPEND_CAUSE(
573 "Failed to allocate one static array field.");
574 goto end;
575 }
576
577 init_field((void *) array_field, fc, &array_field_methods);
578 array_field->length = array_fc->length;
579
580 if (init_array_field_fields(array_field)) {
581 BT_LIB_LOGE_APPEND_CAUSE("Cannot create static array fields: "
582 "%![fc-]+F", fc);
583 bt_field_destroy((void *) array_field);
584 array_field = NULL;
585 goto end;
586 }
587
588 BT_LIB_LOGD("Created static array field object: %!+f", array_field);
589
590 end:
591 return (void *) array_field;
592 }
593
594 static
595 struct bt_field *create_dynamic_array_field(struct bt_field_class *fc)
596 {
597 struct bt_field_array *array_field;
598
599 BT_LIB_LOGD("Creating dynamic array field object: %![fc-]+F", fc);
600 array_field = g_new0(struct bt_field_array, 1);
601 if (!array_field) {
602 BT_LIB_LOGE_APPEND_CAUSE(
603 "Failed to allocate one dynamic array field.");
604 goto end;
605 }
606
607 init_field((void *) array_field, fc, &array_field_methods);
608
609 if (init_array_field_fields(array_field)) {
610 BT_LIB_LOGE_APPEND_CAUSE("Cannot create dynamic array fields: "
611 "%![fc-]+F", fc);
612 bt_field_destroy((void *) array_field);
613 array_field = NULL;
614 goto end;
615 }
616
617 BT_LIB_LOGD("Created dynamic array field object: %!+f", array_field);
618
619 end:
620 return (void *) array_field;
621 }
622
623 bt_bool bt_field_bool_get_value(const struct bt_field *field)
624 {
625 const struct bt_field_bool *bool_field = (const void *) field;
626
627 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
628 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
629 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
630 "boolean-field", BT_FIELD_CLASS_TYPE_BOOL, "Field");
631 return (bt_bool) bool_field->value;
632 }
633
634 void bt_field_bool_set_value(struct bt_field *field, bt_bool value)
635 {
636 struct bt_field_bool *bool_field = (void *) field;
637
638 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
639 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
640 "boolean-field", BT_FIELD_CLASS_TYPE_BOOL, "Field");
641 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
642 bool_field->value = (bool) value;
643 bt_field_set_single(field, true);
644 }
645
646 uint64_t bt_field_bit_array_get_value_as_integer(const struct bt_field *field)
647 {
648 const struct bt_field_bit_array *ba_field = (const void *) field;
649
650 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
651 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
652 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
653 "bit-array-field", BT_FIELD_CLASS_TYPE_BIT_ARRAY, "Field");
654 return ba_field->value_as_int;
655 }
656
657 void bt_field_bit_array_set_value_as_integer(struct bt_field *field,
658 uint64_t value)
659 {
660 struct bt_field_bit_array *ba_field = (void *) field;
661 struct bt_field_class_bit_array *ba_fc;
662
663 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
664 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
665 "bit-array-field", BT_FIELD_CLASS_TYPE_BIT_ARRAY, "Field");
666 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
667 ba_fc = (void *) field->class;
668 ba_field->value_as_int = value;
669
670 if (ba_fc->length < 64) {
671 /* Apply mask */
672 ba_field->value_as_int &= ((UINT64_C(1) << ba_fc->length) - 1);
673 }
674
675 bt_field_set_single(field, true);
676 }
677
678 int64_t bt_field_integer_signed_get_value(const struct bt_field *field)
679 {
680 const struct bt_field_integer *int_field = (const void *) field;
681
682 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
683 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
684 BT_ASSERT_PRE_DEV_FIELD_IS_SIGNED_INT("field", field, "Field");
685 return int_field->value.i;
686 }
687
688 void bt_field_integer_signed_set_value(struct bt_field *field, int64_t value)
689 {
690 struct bt_field_integer *int_field = (void *) field;
691
692 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
693 BT_ASSERT_PRE_DEV_FIELD_IS_SIGNED_INT("field", field, "Field");
694 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
695 BT_ASSERT_PRE_DEV("valid-value-for-field-class-field-value-range",
696 bt_util_value_is_in_range_signed(
697 ((struct bt_field_class_integer *) field->class)->range,
698 value),
699 "Value is out of bounds: value=%" PRId64 ", %![field-]+f, "
700 "%![fc-]+F", value, field, field->class);
701 int_field->value.i = value;
702 bt_field_set_single(field, true);
703 }
704
705 uint64_t bt_field_integer_unsigned_get_value(const struct bt_field *field)
706 {
707 const struct bt_field_integer *int_field = (const void *) field;
708
709 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
710 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
711 BT_ASSERT_PRE_DEV_FIELD_IS_UNSIGNED_INT("field", field, "Field");
712 return int_field->value.u;
713 }
714
715 void bt_field_integer_unsigned_set_value(struct bt_field *field, uint64_t value)
716 {
717 struct bt_field_integer *int_field = (void *) field;
718
719 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
720 BT_ASSERT_PRE_DEV_FIELD_IS_UNSIGNED_INT("field", field, "Field");
721 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
722 BT_ASSERT_PRE_DEV("valid-value-for-field-class-field-value-range",
723 bt_util_value_is_in_range_unsigned(
724 ((struct bt_field_class_integer *) field->class)->range,
725 value),
726 "Value is out of bounds: value=%" PRIu64 ", %![field-]+f, "
727 "%![fc-]+F", value, field, field->class);
728 int_field->value.u = value;
729 bt_field_set_single(field, true);
730 }
731
732 float bt_field_real_single_precision_get_value(const struct bt_field *field)
733 {
734 const struct bt_field_real *real_field = (const void *) field;
735
736 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
737 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
738 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
739 "single-precision-real-field",
740 BT_FIELD_CLASS_TYPE_SINGLE_PRECISION_REAL, "Field");
741 return (float) real_field->value;
742 }
743
744 double bt_field_real_double_precision_get_value(const struct bt_field *field)
745 {
746 const struct bt_field_real *real_field = (const void *) field;
747
748 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
749 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
750 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
751 "double-precision-real-field",
752 BT_FIELD_CLASS_TYPE_DOUBLE_PRECISION_REAL, "Field");
753 return real_field->value;
754 }
755
756 void bt_field_real_single_precision_set_value(struct bt_field *field,
757 float value)
758 {
759 struct bt_field_real *real_field = (void *) field;
760
761 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
762 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
763 "single-precision-real-field",
764 BT_FIELD_CLASS_TYPE_SINGLE_PRECISION_REAL, "Field");
765 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
766
767 real_field->value = (double) value;
768 bt_field_set_single(field, true);
769 }
770
771 void bt_field_real_double_precision_set_value(struct bt_field *field,
772 double value)
773 {
774 struct bt_field_real *real_field = (void *) field;
775
776 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
777 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
778 "double-precision-real-field",
779 BT_FIELD_CLASS_TYPE_DOUBLE_PRECISION_REAL, "Field");
780 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
781
782 real_field->value = value;
783 bt_field_set_single(field, true);
784 }
785
786 enum bt_field_enumeration_get_mapping_labels_status
787 bt_field_enumeration_unsigned_get_mapping_labels(
788 const struct bt_field *field,
789 bt_field_class_enumeration_mapping_label_array *label_array,
790 uint64_t *count)
791 {
792 const struct bt_field_integer *int_field = (const void *) field;
793
794 BT_ASSERT_PRE_DEV_NO_ERROR();
795 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
796 BT_ASSERT_PRE_DEV_NON_NULL("label-array-output", label_array,
797 "Label array (output)");
798 BT_ASSERT_PRE_DEV_NON_NULL("count-output", count, "Count (output)");
799 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
800 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
801 "unsigned-enumeration-field",
802 BT_FIELD_CLASS_TYPE_UNSIGNED_ENUMERATION, "Field");
803 return (int)
804 bt_field_class_enumeration_unsigned_get_mapping_labels_for_value(
805 field->class, int_field->value.u, label_array, count);
806 }
807
808 enum bt_field_enumeration_get_mapping_labels_status
809 bt_field_enumeration_signed_get_mapping_labels(
810 const struct bt_field *field,
811 bt_field_class_enumeration_mapping_label_array *label_array,
812 uint64_t *count)
813 {
814 const struct bt_field_integer *int_field = (const void *) field;
815
816 BT_ASSERT_PRE_DEV_NO_ERROR();
817 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
818 BT_ASSERT_PRE_DEV_NON_NULL("label-array-output", label_array,
819 "Label array (output)");
820 BT_ASSERT_PRE_DEV_NON_NULL("count-output", count, "Count (output)");
821 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
822 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
823 "signed-enumeration-field",
824 BT_FIELD_CLASS_TYPE_SIGNED_ENUMERATION, "Field");
825 return (int)
826 bt_field_class_enumeration_signed_get_mapping_labels_for_value(
827 field->class, int_field->value.i, label_array, count);
828 }
829
830 const char *bt_field_string_get_value(const struct bt_field *field)
831 {
832 const struct bt_field_string *string_field = (const void *) field;
833
834 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
835 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
836 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field, "string-field",
837 BT_FIELD_CLASS_TYPE_STRING, "Field");
838 return (const char *) string_field->buf->data;
839 }
840
841 uint64_t bt_field_string_get_length(const struct bt_field *field)
842 {
843 const struct bt_field_string *string_field = (const void *) field;
844
845 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
846 BT_ASSERT_PRE_DEV_FIELD_IS_SET("field", field);
847 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field, "string-field",
848 BT_FIELD_CLASS_TYPE_STRING, "Field");
849 return string_field->length;
850 }
851
852 static inline
853 void clear_string_field(struct bt_field *field)
854 {
855 struct bt_field_string *string_field = (void *) field;
856
857 BT_ASSERT_DBG(field);
858 string_field->length = 0;
859 bt_field_set_single(field, true);
860 }
861
862 enum bt_field_string_set_value_status bt_field_string_set_value(
863 struct bt_field *field, const char *value)
864 {
865 BT_ASSERT_PRE_DEV_NO_ERROR();
866 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
867 BT_ASSERT_PRE_DEV_NON_NULL("value", value, "Value");
868 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
869 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field, "string-field",
870 BT_FIELD_CLASS_TYPE_STRING, "Field");
871 clear_string_field(field);
872 return (int) bt_field_string_append_with_length(field, value,
873 (uint64_t) strlen(value));
874 }
875
876 #define BT_ASSERT_PRE_DEV_FOR_APPEND_TO_STRING_FIELD_WITH_LENGTH(_field, _value, _length) \
877 do { \
878 BT_ASSERT_PRE_DEV_NO_ERROR(); \
879 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(_field); \
880 BT_ASSERT_PRE_DEV_NON_NULL("value", (_value), "Value"); \
881 BT_ASSERT_PRE_DEV_FIELD_HOT(_field); \
882 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", \
883 (_field), "string-field", \
884 BT_FIELD_CLASS_TYPE_STRING, "Field"); \
885 BT_ASSERT_PRE_DEV("value-has-no-null-byte", \
886 !memchr((_value), '\0', (_length)), \
887 "String value to append contains a null character: " \
888 "partial-value=\"%.32s\", length=%" PRIu64, \
889 (_value), (_length)); \
890 } while (0)
891
892 static
893 enum bt_field_string_append_status append_to_string_field_with_length(
894 struct bt_field *field, const char *value, uint64_t length)
895 {
896 struct bt_field_string *string_field = (void *) field;
897 char *data;
898 uint64_t new_length;
899
900 BT_ASSERT_DBG(field);
901 BT_ASSERT_DBG(value);
902 new_length = length + string_field->length;
903
904 if (G_UNLIKELY(new_length + 1 > string_field->buf->len)) {
905 g_array_set_size(string_field->buf, new_length + 1);
906 }
907
908 data = string_field->buf->data;
909 memcpy(data + string_field->length, value, length);
910 ((char *) string_field->buf->data)[new_length] = '\0';
911 string_field->length = new_length;
912 bt_field_set_single(field, true);
913 return BT_FUNC_STATUS_OK;
914 }
915
916 enum bt_field_string_append_status bt_field_string_append_with_length(
917 struct bt_field *field, const char *value, uint64_t length)
918 {
919 BT_ASSERT_PRE_DEV_FOR_APPEND_TO_STRING_FIELD_WITH_LENGTH(field, value,
920 length);
921 return append_to_string_field_with_length(field, value, length);
922 }
923
924 enum bt_field_string_append_status bt_field_string_append(
925 struct bt_field *field, const char *value)
926 {
927 uint64_t length = (uint64_t) strlen(value);
928
929 BT_ASSERT_PRE_DEV_FOR_APPEND_TO_STRING_FIELD_WITH_LENGTH(field, value,
930 length);
931 return append_to_string_field_with_length(field, value, length);
932 }
933
934 void bt_field_string_clear(struct bt_field *field)
935 {
936 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
937 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
938 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field, "string-field",
939 BT_FIELD_CLASS_TYPE_STRING, "Field");
940 clear_string_field(field);
941 }
942
943 uint64_t bt_field_array_get_length(const struct bt_field *field)
944 {
945 const struct bt_field_array *array_field = (const void *) field;
946
947 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
948 BT_ASSERT_PRE_DEV_FIELD_IS_ARRAY("field", field, "Field");
949 return array_field->length;
950 }
951
952 enum bt_field_array_dynamic_set_length_status bt_field_array_dynamic_set_length(
953 struct bt_field *field, uint64_t length)
954 {
955 int ret = BT_FUNC_STATUS_OK;
956 struct bt_field_array *array_field = (void *) field;
957
958 BT_ASSERT_PRE_DEV_NO_ERROR();
959 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
960 BT_ASSERT_PRE_DEV_FIELD_IS_DYNAMIC_ARRAY("field", field, "Field");
961 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
962
963 if (G_UNLIKELY(length > array_field->fields->len)) {
964 /* Make more room */
965 struct bt_field_class_array *array_fc;
966 uint64_t cur_len = array_field->fields->len;
967 uint64_t i;
968
969 g_ptr_array_set_size(array_field->fields, length);
970 array_fc = (void *) field->class;
971
972 for (i = cur_len; i < array_field->fields->len; i++) {
973 struct bt_field *elem_field = bt_field_create(
974 array_fc->element_fc);
975
976 if (!elem_field) {
977 BT_LIB_LOGE_APPEND_CAUSE(
978 "Cannot create element field for "
979 "dynamic array field: "
980 "index=%" PRIu64 ", "
981 "%![array-field-]+f", i, field);
982 ret = BT_FUNC_STATUS_MEMORY_ERROR;
983 goto end;
984 }
985
986 BT_ASSERT_DBG(!array_field->fields->pdata[i]);
987 array_field->fields->pdata[i] = elem_field;
988 }
989 }
990
991 array_field->length = length;
992
993 end:
994 return ret;
995 }
996
997 static inline
998 struct bt_field *borrow_array_field_element_field_by_index(
999 struct bt_field *field, uint64_t index)
1000 {
1001 struct bt_field_array *array_field = (void *) field;
1002
1003 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1004 BT_ASSERT_PRE_DEV_FIELD_IS_ARRAY("field", field, "Field");
1005 BT_ASSERT_PRE_DEV_VALID_INDEX(index, array_field->length);
1006 return array_field->fields->pdata[index];
1007 }
1008
1009 struct bt_field *bt_field_array_borrow_element_field_by_index(
1010 struct bt_field *field, uint64_t index)
1011 {
1012 return borrow_array_field_element_field_by_index(field, index);
1013 }
1014
1015 const struct bt_field *
1016 bt_field_array_borrow_element_field_by_index_const(
1017 const struct bt_field *field, uint64_t index)
1018 {
1019 return borrow_array_field_element_field_by_index((void *) field, index);
1020 }
1021
1022 static inline
1023 struct bt_field *borrow_structure_field_member_field_by_index(
1024 struct bt_field *field, uint64_t index)
1025 {
1026 struct bt_field_structure *struct_field = (void *) field;
1027
1028 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1029 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
1030 "structure-field", BT_FIELD_CLASS_TYPE_STRUCTURE, "Field");
1031 BT_ASSERT_PRE_DEV_VALID_INDEX(index, struct_field->fields->len);
1032 return struct_field->fields->pdata[index];
1033 }
1034
1035 struct bt_field *bt_field_structure_borrow_member_field_by_index(
1036 struct bt_field *field, uint64_t index)
1037 {
1038 return borrow_structure_field_member_field_by_index(field,
1039 index);
1040 }
1041
1042 const struct bt_field *
1043 bt_field_structure_borrow_member_field_by_index_const(
1044 const struct bt_field *field, uint64_t index)
1045 {
1046 return borrow_structure_field_member_field_by_index(
1047 (void *) field, index);
1048 }
1049
1050 static inline
1051 struct bt_field *borrow_structure_field_member_field_by_name(
1052 struct bt_field *field, const char *name)
1053 {
1054 struct bt_field *ret_field = NULL;
1055 struct bt_field_class_structure *struct_fc;
1056 struct bt_field_structure *struct_field = (void *) field;
1057 gpointer orig_key;
1058 gpointer index;
1059
1060 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1061 BT_ASSERT_PRE_DEV_NON_NULL("member-name", name, "Member name");
1062 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
1063 "structure-field", BT_FIELD_CLASS_TYPE_STRUCTURE, "Field");
1064 struct_fc = (void *) field->class;
1065
1066 if (!g_hash_table_lookup_extended(struct_fc->common.name_to_index, name,
1067 &orig_key, &index)) {
1068 goto end;
1069 }
1070
1071 ret_field = struct_field->fields->pdata[GPOINTER_TO_UINT(index)];
1072 BT_ASSERT_DBG(ret_field);
1073
1074 end:
1075 return ret_field;
1076 }
1077
1078 struct bt_field *bt_field_structure_borrow_member_field_by_name(
1079 struct bt_field *field, const char *name)
1080 {
1081 return borrow_structure_field_member_field_by_name(field, name);
1082 }
1083
1084 const struct bt_field *bt_field_structure_borrow_member_field_by_name_const(
1085 const struct bt_field *field, const char *name)
1086 {
1087 return borrow_structure_field_member_field_by_name(
1088 (void *) field, name);
1089 }
1090
1091 void bt_field_option_set_has_field(struct bt_field *field, bt_bool has_field)
1092 {
1093 struct bt_field_option *opt_field = (void *) field;
1094
1095 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1096 BT_ASSERT_PRE_DEV_FIELD_IS_OPTION("field", field, "Field");
1097 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
1098
1099 if (has_field) {
1100 opt_field->selected_field = opt_field->content_field;
1101 } else {
1102 opt_field->selected_field = NULL;
1103 }
1104 }
1105
1106 struct bt_field *bt_field_option_borrow_field(struct bt_field *field)
1107 {
1108 struct bt_field_option *opt_field = (void *) field;
1109
1110 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1111 BT_ASSERT_PRE_DEV_FIELD_IS_OPTION("field", field, "Field");
1112 return opt_field->selected_field;
1113 }
1114
1115 const struct bt_field *bt_field_option_borrow_field_const(
1116 const struct bt_field *field)
1117 {
1118 return (const void *) bt_field_option_borrow_field((void *) field);
1119 }
1120
1121 #define BT_ASSERT_PRE_DEV_FOR_BORROW_VAR_FIELD_SEL_OPT_FIELD(_field) \
1122 do { \
1123 struct bt_field_variant *_var_field = (void *) field; \
1124 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(_field); \
1125 BT_ASSERT_PRE_DEV_FIELD_IS_VARIANT("field", (_field), \
1126 "Field"); \
1127 BT_ASSERT_PRE_DEV("has-selected-field", \
1128 _var_field->selected_field, \
1129 "Variant field has no selected field: %!+f", \
1130 field); \
1131 } while (0)
1132
1133 static inline
1134 struct bt_field *borrow_variant_field_selected_option_field(
1135 struct bt_field *field)
1136 {
1137 struct bt_field_variant *var_field = (void *) field;
1138
1139 BT_ASSERT_DBG(field);
1140 return var_field->selected_field;
1141 }
1142
1143 struct bt_field *bt_field_variant_borrow_selected_option_field(
1144 struct bt_field *field)
1145 {
1146 BT_ASSERT_PRE_DEV_FOR_BORROW_VAR_FIELD_SEL_OPT_FIELD(field);
1147 return borrow_variant_field_selected_option_field(field);
1148 }
1149
1150 const struct bt_field *bt_field_variant_borrow_selected_option_field_const(
1151 const struct bt_field *field)
1152 {
1153 BT_ASSERT_PRE_DEV_FOR_BORROW_VAR_FIELD_SEL_OPT_FIELD(field);
1154 return borrow_variant_field_selected_option_field((void *) field);
1155 }
1156
1157 #define BT_ASSERT_PRE_DEV_FOR_BORROW_VAR_FIELD_SEL_CLASS_OPT(_field) \
1158 do { \
1159 struct bt_field_variant *_var_field = (void *) field; \
1160 BT_ASSERT_PRE_DEV("has-selected-field", \
1161 _var_field->selected_field, \
1162 "Variant field has no selected field: %!+f", \
1163 (_field)); \
1164 } while (0)
1165
1166 static
1167 const struct bt_field_class_variant_option *
1168 borrow_variant_field_selected_class_option(const struct bt_field *field)
1169 {
1170 const struct bt_field_class_named_field_class_container *container_fc;
1171 const struct bt_field_variant *var_field = (const void *) field;
1172
1173 BT_ASSERT_DBG(field);
1174 container_fc = (const void *) field->class;
1175 return container_fc->named_fcs->pdata[var_field->selected_index];
1176 }
1177
1178 const struct bt_field_class_variant_option *
1179 bt_field_variant_borrow_selected_option_class_const(
1180 const struct bt_field *field)
1181 {
1182 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1183 BT_ASSERT_PRE_DEV_FIELD_IS_VARIANT("field", field, "Field");
1184 BT_ASSERT_PRE_DEV_FOR_BORROW_VAR_FIELD_SEL_CLASS_OPT(field);
1185 return borrow_variant_field_selected_class_option(field);
1186 }
1187
1188 const struct bt_field_class_variant_with_selector_field_integer_unsigned_option *
1189 bt_field_variant_with_selector_field_integer_unsigned_borrow_selected_option_class_const(
1190 const struct bt_field *field)
1191 {
1192 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1193 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
1194 "variant-field-with-unsigned-selector-field",
1195 BT_FIELD_CLASS_TYPE_VARIANT_WITH_UNSIGNED_INTEGER_SELECTOR_FIELD,
1196 "Field");
1197 BT_ASSERT_PRE_DEV_FOR_BORROW_VAR_FIELD_SEL_CLASS_OPT(field);
1198 return (const void *) borrow_variant_field_selected_class_option(field);
1199 }
1200
1201 const struct bt_field_class_variant_with_selector_field_integer_signed_option *
1202 bt_field_variant_with_selector_field_integer_signed_borrow_selected_option_class_const(
1203 const struct bt_field *field)
1204 {
1205 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1206 BT_ASSERT_PRE_DEV_FIELD_HAS_CLASS_TYPE("field", field,
1207 "variant-field-with-signed-selector-field",
1208 BT_FIELD_CLASS_TYPE_VARIANT_WITH_SIGNED_INTEGER_SELECTOR_FIELD,
1209 "Field");
1210 BT_ASSERT_PRE_DEV_FOR_BORROW_VAR_FIELD_SEL_CLASS_OPT(field);
1211 return (const void *) borrow_variant_field_selected_class_option(field);
1212 }
1213
1214 enum bt_field_variant_select_option_by_index_status
1215 bt_field_variant_select_option_by_index(
1216 struct bt_field *field, uint64_t index)
1217 {
1218 struct bt_field_variant *var_field = (void *) field;
1219
1220 BT_ASSERT_PRE_DEV_NO_ERROR();
1221 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1222 BT_ASSERT_PRE_DEV_FIELD_IS_VARIANT("field", field, "Field");
1223 BT_ASSERT_PRE_DEV_FIELD_HOT(field);
1224 BT_ASSERT_PRE_DEV_VALID_INDEX(index, var_field->fields->len);
1225 var_field->selected_field = var_field->fields->pdata[index];
1226 var_field->selected_index = index;
1227 return BT_FUNC_STATUS_OK;
1228 }
1229
1230 uint64_t bt_field_variant_get_selected_option_index(
1231 const struct bt_field *field)
1232 {
1233 const struct bt_field_variant *var_field = (const void *) field;
1234
1235 BT_ASSERT_PRE_DEV_FIELD_NON_NULL(field);
1236 BT_ASSERT_PRE_DEV_FIELD_IS_VARIANT("field", field, "Field");
1237 BT_ASSERT_PRE_DEV("has-selected-field", var_field->selected_field,
1238 "Variant field has no selected field: %!+f", field);
1239 return var_field->selected_index;
1240 }
1241
1242 static inline
1243 void bt_field_finalize(struct bt_field *field)
1244 {
1245 BT_ASSERT(field);
1246 BT_LOGD_STR("Putting field's class.");
1247 BT_OBJECT_PUT_REF_AND_RESET(field->class);
1248 }
1249
1250 static
1251 void destroy_bool_field(struct bt_field *field)
1252 {
1253 BT_ASSERT(field);
1254 BT_LIB_LOGD("Destroying boolean field object: %!+f", field);
1255 bt_field_finalize(field);
1256 g_free(field);
1257 }
1258
1259 static
1260 void destroy_bit_array_field(struct bt_field *field)
1261 {
1262 BT_ASSERT(field);
1263 BT_LIB_LOGD("Destroying bit array field object: %!+f", field);
1264 bt_field_finalize(field);
1265 g_free(field);
1266 }
1267
1268 static
1269 void destroy_integer_field(struct bt_field *field)
1270 {
1271 BT_ASSERT(field);
1272 BT_LIB_LOGD("Destroying integer field object: %!+f", field);
1273 bt_field_finalize(field);
1274 g_free(field);
1275 }
1276
1277 static
1278 void destroy_real_field(struct bt_field *field)
1279 {
1280 BT_ASSERT(field);
1281 BT_LIB_LOGD("Destroying real field object: %!+f", field);
1282 bt_field_finalize(field);
1283 g_free(field);
1284 }
1285
1286 static
1287 void destroy_structure_field(struct bt_field *field)
1288 {
1289 struct bt_field_structure *struct_field = (void *) field;
1290
1291 BT_ASSERT(field);
1292 BT_LIB_LOGD("Destroying structure field object: %!+f", field);
1293 bt_field_finalize(field);
1294
1295 if (struct_field->fields) {
1296 g_ptr_array_free(struct_field->fields, TRUE);
1297 struct_field->fields = NULL;
1298 }
1299
1300 g_free(field);
1301 }
1302
1303 static
1304 void destroy_option_field(struct bt_field *field)
1305 {
1306 struct bt_field_option *opt_field = (void *) field;
1307
1308 BT_ASSERT(field);
1309 BT_LIB_LOGD("Destroying option field object: %!+f", field);
1310 bt_field_finalize(field);
1311
1312 if (opt_field->content_field) {
1313 bt_field_destroy(opt_field->content_field);
1314 }
1315
1316 g_free(field);
1317 }
1318
1319 static
1320 void destroy_variant_field(struct bt_field *field)
1321 {
1322 struct bt_field_variant *var_field = (void *) field;
1323
1324 BT_ASSERT(field);
1325 BT_LIB_LOGD("Destroying variant field object: %!+f", field);
1326 bt_field_finalize(field);
1327
1328 if (var_field->fields) {
1329 g_ptr_array_free(var_field->fields, TRUE);
1330 var_field->fields = NULL;
1331 }
1332
1333 g_free(field);
1334 }
1335
1336 static
1337 void destroy_array_field(struct bt_field *field)
1338 {
1339 struct bt_field_array *array_field = (void *) field;
1340
1341 BT_ASSERT(field);
1342 BT_LIB_LOGD("Destroying array field object: %!+f", field);
1343 bt_field_finalize(field);
1344
1345 if (array_field->fields) {
1346 g_ptr_array_free(array_field->fields, TRUE);
1347 array_field->fields = NULL;
1348 }
1349
1350 g_free(field);
1351 }
1352
1353 static
1354 void destroy_string_field(struct bt_field *field)
1355 {
1356 struct bt_field_string *string_field = (void *) field;
1357
1358 BT_ASSERT(field);
1359 BT_LIB_LOGD("Destroying string field object: %!+f", field);
1360 bt_field_finalize(field);
1361
1362 if (string_field->buf) {
1363 g_array_free(string_field->buf, TRUE);
1364 string_field->buf = NULL;
1365 }
1366
1367 g_free(field);
1368 }
1369
1370 BT_HIDDEN
1371 void bt_field_destroy(struct bt_field *field)
1372 {
1373 BT_ASSERT(field);
1374
1375 switch (field->class->type) {
1376 case BT_FIELD_CLASS_TYPE_BOOL:
1377 destroy_bool_field(field);
1378 break;
1379 case BT_FIELD_CLASS_TYPE_BIT_ARRAY:
1380 destroy_bit_array_field(field);
1381 break;
1382 case BT_FIELD_CLASS_TYPE_UNSIGNED_INTEGER:
1383 case BT_FIELD_CLASS_TYPE_SIGNED_INTEGER:
1384 case BT_FIELD_CLASS_TYPE_UNSIGNED_ENUMERATION:
1385 case BT_FIELD_CLASS_TYPE_SIGNED_ENUMERATION:
1386 destroy_integer_field(field);
1387 break;
1388 case BT_FIELD_CLASS_TYPE_SINGLE_PRECISION_REAL:
1389 case BT_FIELD_CLASS_TYPE_DOUBLE_PRECISION_REAL:
1390 destroy_real_field(field);
1391 break;
1392 case BT_FIELD_CLASS_TYPE_STRING:
1393 destroy_string_field(field);
1394 break;
1395 case BT_FIELD_CLASS_TYPE_STRUCTURE:
1396 destroy_structure_field(field);
1397 break;
1398 case BT_FIELD_CLASS_TYPE_STATIC_ARRAY:
1399 case BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY_WITHOUT_LENGTH_FIELD:
1400 case BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY_WITH_LENGTH_FIELD:
1401 destroy_array_field(field);
1402 break;
1403 case BT_FIELD_CLASS_TYPE_OPTION_WITHOUT_SELECTOR_FIELD:
1404 case BT_FIELD_CLASS_TYPE_OPTION_WITH_BOOL_SELECTOR_FIELD:
1405 case BT_FIELD_CLASS_TYPE_OPTION_WITH_UNSIGNED_INTEGER_SELECTOR_FIELD:
1406 case BT_FIELD_CLASS_TYPE_OPTION_WITH_SIGNED_INTEGER_SELECTOR_FIELD:
1407 destroy_option_field(field);
1408 break;
1409 case BT_FIELD_CLASS_TYPE_VARIANT_WITHOUT_SELECTOR_FIELD:
1410 case BT_FIELD_CLASS_TYPE_VARIANT_WITH_UNSIGNED_INTEGER_SELECTOR_FIELD:
1411 case BT_FIELD_CLASS_TYPE_VARIANT_WITH_SIGNED_INTEGER_SELECTOR_FIELD:
1412 destroy_variant_field(field);
1413 break;
1414 default:
1415 bt_common_abort();
1416 }
1417 }
1418
1419 static
1420 void reset_single_field(struct bt_field *field)
1421 {
1422 BT_ASSERT_DBG(field);
1423 field->is_set = false;
1424 }
1425
1426 static
1427 void reset_structure_field(struct bt_field *field)
1428 {
1429 uint64_t i;
1430 struct bt_field_structure *struct_field = (void *) field;
1431
1432 BT_ASSERT_DBG(field);
1433
1434 for (i = 0; i < struct_field->fields->len; i++) {
1435 bt_field_reset(struct_field->fields->pdata[i]);
1436 }
1437 }
1438
1439 static
1440 void reset_option_field(struct bt_field *field)
1441 {
1442 struct bt_field_option *opt_field = (void *) field;
1443
1444 BT_ASSERT_DBG(opt_field);
1445 bt_field_reset(opt_field->content_field);
1446 opt_field->selected_field = NULL;
1447 }
1448
1449 static
1450 void reset_variant_field(struct bt_field *field)
1451 {
1452 uint64_t i;
1453 struct bt_field_variant *var_field = (void *) field;
1454
1455 BT_ASSERT_DBG(field);
1456
1457 for (i = 0; i < var_field->fields->len; i++) {
1458 bt_field_reset(var_field->fields->pdata[i]);
1459 }
1460 }
1461
1462 static
1463 void reset_array_field(struct bt_field *field)
1464 {
1465 uint64_t i;
1466 struct bt_field_array *array_field = (void *) field;
1467
1468 BT_ASSERT_DBG(field);
1469
1470 for (i = 0; i < array_field->fields->len; i++) {
1471 bt_field_reset(array_field->fields->pdata[i]);
1472 }
1473 }
1474
1475 static
1476 void set_single_field_is_frozen(struct bt_field *field, bool is_frozen)
1477 {
1478 field->frozen = is_frozen;
1479 }
1480
1481 static
1482 void set_structure_field_is_frozen(struct bt_field *field, bool is_frozen)
1483 {
1484 uint64_t i;
1485 struct bt_field_structure *struct_field = (void *) field;
1486
1487 BT_LIB_LOGD("Setting structure field's frozen state: "
1488 "%![field-]+f, is-frozen=%d", field, is_frozen);
1489
1490 for (i = 0; i < struct_field->fields->len; i++) {
1491 struct bt_field *member_field = struct_field->fields->pdata[i];
1492
1493 BT_LIB_LOGD("Setting structure field's member field's "
1494 "frozen state: %![field-]+f, index=%" PRIu64,
1495 member_field, i);
1496 _bt_field_set_is_frozen(member_field, is_frozen);
1497 }
1498
1499 set_single_field_is_frozen(field, is_frozen);
1500 }
1501
1502 static
1503 void set_option_field_is_frozen(struct bt_field *field, bool is_frozen)
1504 {
1505 struct bt_field_option *opt_field = (void *) field;
1506
1507 BT_LIB_LOGD("Setting option field's frozen state: "
1508 "%![field-]+f, is-frozen=%d", field, is_frozen);
1509 _bt_field_set_is_frozen(opt_field->content_field, is_frozen);
1510 set_single_field_is_frozen(field, is_frozen);
1511 }
1512
1513 static
1514 void set_variant_field_is_frozen(struct bt_field *field, bool is_frozen)
1515 {
1516 uint64_t i;
1517 struct bt_field_variant *var_field = (void *) field;
1518
1519 BT_LIB_LOGD("Setting variant field's frozen state: "
1520 "%![field-]+f, is-frozen=%d", field, is_frozen);
1521
1522 for (i = 0; i < var_field->fields->len; i++) {
1523 struct bt_field *option_field = var_field->fields->pdata[i];
1524
1525 BT_LIB_LOGD("Setting variant field's option field's "
1526 "frozen state: %![field-]+f, index=%" PRIu64,
1527 option_field, i);
1528 _bt_field_set_is_frozen(option_field, is_frozen);
1529 }
1530
1531 set_single_field_is_frozen(field, is_frozen);
1532 }
1533
1534 static
1535 void set_array_field_is_frozen(struct bt_field *field, bool is_frozen)
1536 {
1537 uint64_t i;
1538 struct bt_field_array *array_field = (void *) field;
1539
1540 BT_LIB_LOGD("Setting array field's frozen state: "
1541 "%![field-]+f, is-frozen=%d", field, is_frozen);
1542
1543 for (i = 0; i < array_field->fields->len; i++) {
1544 struct bt_field *elem_field = array_field->fields->pdata[i];
1545
1546 BT_LIB_LOGD("Setting array field's element field's "
1547 "frozen state: %![field-]+f, index=%" PRIu64,
1548 elem_field, i);
1549 _bt_field_set_is_frozen(elem_field, is_frozen);
1550 }
1551
1552 set_single_field_is_frozen(field, is_frozen);
1553 }
1554
1555 BT_HIDDEN
1556 void _bt_field_set_is_frozen(const struct bt_field *field,
1557 bool is_frozen)
1558 {
1559 BT_ASSERT_DBG(field);
1560 BT_LIB_LOGD("Setting field object's frozen state: %!+f, is-frozen=%d",
1561 field, is_frozen);
1562 BT_ASSERT_DBG(field->methods->set_is_frozen);
1563 field->methods->set_is_frozen((void *) field, is_frozen);
1564 }
1565
1566 static
1567 bool single_field_is_set(const struct bt_field *field)
1568 {
1569 BT_ASSERT_DBG(field);
1570 return field->is_set;
1571 }
1572
1573 static
1574 bool structure_field_is_set(const struct bt_field *field)
1575 {
1576 bool is_set = true;
1577 uint64_t i;
1578 const struct bt_field_structure *struct_field = (const void *) field;
1579
1580 BT_ASSERT_DBG(field);
1581
1582 for (i = 0; i < struct_field->fields->len; i++) {
1583 is_set = bt_field_is_set(struct_field->fields->pdata[i]);
1584 if (!is_set) {
1585 goto end;
1586 }
1587 }
1588
1589 end:
1590 return is_set;
1591 }
1592
1593 static
1594 bool option_field_is_set(const struct bt_field *field)
1595 {
1596 const struct bt_field_option *opt_field = (const void *) field;
1597 bool is_set = false;
1598
1599 BT_ASSERT_DBG(field);
1600
1601 if (opt_field->selected_field) {
1602 is_set = bt_field_is_set(opt_field->selected_field);
1603 }
1604
1605 return is_set;
1606 }
1607
1608 static
1609 bool variant_field_is_set(const struct bt_field *field)
1610 {
1611 const struct bt_field_variant *var_field = (const void *) field;
1612 bool is_set = false;
1613
1614 BT_ASSERT_DBG(field);
1615
1616 if (var_field->selected_field) {
1617 is_set = bt_field_is_set(var_field->selected_field);
1618 }
1619
1620 return is_set;
1621 }
1622
1623 static
1624 bool array_field_is_set(const struct bt_field *field)
1625 {
1626 bool is_set = true;
1627 uint64_t i;
1628 const struct bt_field_array *array_field = (const void *) field;
1629
1630 BT_ASSERT_DBG(field);
1631
1632 for (i = 0; i < array_field->length; i++) {
1633 is_set = bt_field_is_set(array_field->fields->pdata[i]);
1634 if (!is_set) {
1635 goto end;
1636 }
1637 }
1638
1639 end:
1640 return is_set;
1641 }
This page took 0.06508 seconds and 4 git commands to generate.