/
ddsi_plist.c
4090 lines (3836 loc) · 161 KB
/
ddsi_plist.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
// Copyright(c) 2006 to 2022 ZettaScale Technology and others
//
// This program and the accompanying materials are made available under the
// terms of the Eclipse Public License v. 2.0 which is available at
// http://www.eclipse.org/legal/epl-2.0, or the Eclipse Distribution License
// v. 1.0 which is available at
// http://www.eclipse.org/org/documents/edl-v10.php.
//
// SPDX-License-Identifier: EPL-2.0 OR BSD-3-Clause
#include <stddef.h>
#include <stdlib.h>
#include <string.h>
#include <assert.h>
#include <ctype.h>
#include "dds/features.h"
#include "dds/ddsrt/align.h"
#include "dds/ddsrt/log.h"
#include "dds/ddsrt/heap.h"
#include "dds/ddsrt/string.h"
#include "dds/ddsrt/static_assert.h"
#include "dds/ddsrt/avl.h"
#include "dds/ddsi/ddsi_log.h"
#include "dds/ddsi/ddsi_unused.h"
#include "dds/ddsi/ddsi_domaingv.h"
#include "dds/ddsi/ddsi_typelib.h"
#include "ddsi__plist.h"
#include "ddsi__time.h"
#include "ddsi__xmsg.h"
#include "ddsi__vendor.h"
#include "ddsi__udp.h" /* ddsi_mc4gen_address_t */
#include "ddsi__protocol.h"
#include "ddsi__radmin.h" /* for ddsi_plist_quickscan */
#include "ddsi__plist_generic.h"
#include "ddsi__security_omg.h"
#include "ddsi__tran.h"
#include "ddsi__xqos.h"
#include "dds/cdr/dds_cdrstream.h"
/* I am tempted to change LENGTH_UNLIMITED to 0 in the API (with -1
supported for backwards compatibility) ... on the wire however
it must be -1 */
DDSRT_STATIC_ASSERT(DDS_LENGTH_UNLIMITED == -1);
/* It turns out there are some platforms where the alignment of a
field m in the following:
struct {
...;
T m;
}
may be different from _Alignof(T) ... So far I have only seen
this on some embedded platform, and I furthermore suppose one
should expect this to happen if one were to use "#pragma pack"
or any of the analogous things, but that is not something we
have in our code.
Still, it means some of the parameter list code fails in nasty
ways. From the current set of observations, the problem
disappears if we use this alternative form. */
#define plist_alignof(ty_) (offsetof(struct {char c_; ty_ t;}, t))
/* These are internal to the parameter list processing. We never
generate them, and we never want to do see them anywhere outside
the actual parsing of an incoming parameter list. (There are
entries in ddsi_plist, but they are never to be inspected and
the bits corresponding to them must be 0 except while processing an
incoming parameter list.) */
#define PPTMP_MULTICAST_IPADDRESS (1 << 0)
#define PPTMP_DEFAULT_UNICAST_IPADDRESS (1 << 1)
#define PPTMP_DEFAULT_UNICAST_PORT (1 << 2)
#define PPTMP_METATRAFFIC_UNICAST_IPADDRESS (1 << 3)
#define PPTMP_METATRAFFIC_UNICAST_PORT (1 << 4)
#define PPTMP_METATRAFFIC_MULTICAST_IPADDRESS (1 << 5)
#define PPTMP_METATRAFFIC_MULTICAST_PORT (1 << 6)
typedef struct ddsi_ipaddress_params_tmp {
uint32_t present;
ddsi_ipv4address_t multicast_ipaddress;
ddsi_ipv4address_t default_unicast_ipaddress;
ddsi_port_t default_unicast_port;
ddsi_ipv4address_t metatraffic_unicast_ipaddress;
ddsi_port_t metatraffic_unicast_port;
ddsi_ipv4address_t metatraffic_multicast_ipaddress;
ddsi_port_t metatraffic_multicast_port;
} ddsi_ipaddress_params_tmp_t;
struct dd {
const unsigned char *buf;
size_t bufsz;
unsigned bswap: 1;
ddsi_protocol_version_t protocol_version;
ddsi_vendorid_t vendorid;
enum ddsi_plist_context_kind context_kind;
};
#define PDF_QOS 1 /* part of dds_qos_t */
#define PDF_FUNCTION 2 /* use special functions */
#define PDF_ALLOWMULTI 4 /* allow multiple copies -- do not use with Z or memory will leak */
struct flagset {
uint64_t *present;
uint64_t *aliased;
uint64_t wanted;
};
struct piddesc {
ddsi_parameterid_t pid; /* parameter id or DDSI_PID_PAD if strictly local */
uint16_t flags; /* see PDF_xxx flags */
uint64_t present_flag; /* flag in plist.present / plist.qos.present */
const char *name; /* name for reporting invalid input */
size_t plist_offset; /* offset from start of ddsi_plist_t */
size_t size; /* in-memory size for copying */
union {
/* descriptor for generic code: 12 is enough for the current set of
parameters, compiler will warn if one ever tries to use more than
will fit */
const enum ddsi_pserop desc[12];
struct {
dds_return_t (*deser) (void * __restrict dst, struct flagset *flagset, uint64_t flag, const struct dd * __restrict dd, struct ddsi_domaingv const * const gv);
dds_return_t (*ser) (struct ddsi_xmsg *xmsg, ddsi_parameterid_t pid, const void *src, size_t srcoff, enum ddsrt_byte_order_selector bo, enum ddsi_plist_context_kind context_kind);
dds_return_t (*unalias) (void * __restrict dst, size_t * __restrict dstoff, bool gen_seq_aliased);
dds_return_t (*fini) (void * __restrict dst, size_t * __restrict dstoff, struct flagset *flagset, uint64_t flag);
dds_return_t (*valid) (const void *src, size_t srcoff);
bool (*equal) (const void *srcx, const void *srcy, size_t srcoff);
bool (*print) (char * __restrict *buf, size_t * __restrict bufsize, const void *src, size_t srcoff);
} f;
} op;
dds_return_t (*deser_validate_xform) (void * __restrict dst, const struct dd * __restrict dd);
};
enum do_locator_result {
DOLOC_ACCEPTED,
DOLOC_IGNORED,
DOLOC_INVALID
};
static dds_return_t validate_history_qospolicy (const dds_history_qospolicy_t *q);
static dds_return_t validate_resource_limits_qospolicy (const dds_resource_limits_qospolicy_t *q);
static dds_return_t validate_history_and_resource_limits (const dds_history_qospolicy_t *qh, const dds_resource_limits_qospolicy_t *qr);
static dds_return_t validate_external_duration (const ddsi_duration_t *d);
static dds_return_t validate_durability_service_qospolicy_acceptzero (const dds_durability_service_qospolicy_t *q, bool acceptzero);
static enum do_locator_result do_locator (ddsi_locators_t *ls, uint64_t present, uint64_t wanted, uint64_t fl, const struct dd *dd, struct ddsi_domaingv const * const gv);
static dds_return_t final_validation_qos (const dds_qos_t *dest, ddsi_protocol_version_t protocol_version, ddsi_vendorid_t vendorid, bool *dursvc_accepted_allzero, bool strict);
static int partitions_equal (const void *srca, const void *srcb, size_t off);
static dds_return_t ddsi_xqos_valid_strictness (const struct ddsrt_log_cfg *logcfg, const dds_qos_t *xqos, bool strict);
static dds_return_t unalias_generic (void * __restrict dst, size_t * __restrict dstoff, bool gen_seq_aliased, const enum ddsi_pserop * __restrict desc);
static dds_return_t deser_generic (void * __restrict dst, struct flagset *flagset, uint64_t flag, const struct dd * __restrict dd, const enum ddsi_pserop * __restrict desc);
static dds_return_t ser_generic (struct ddsi_xmsg *xmsg, ddsi_parameterid_t pid, const void *src, size_t srcoff, const enum ddsi_pserop * __restrict desc, enum ddsrt_byte_order_selector bo);
static bool equal_generic (const void *srcx, const void *srcy, size_t srcoff, const enum ddsi_pserop * __restrict desc);
static dds_return_t fini_generic (void * __restrict dst, size_t * __restrict dstoff, struct flagset *flagset, uint64_t flag, const enum ddsi_pserop * __restrict desc);
static dds_return_t valid_generic (const void *src, size_t srcoff, const enum ddsi_pserop * __restrict desc);
static bool print_generic (char * __restrict *buf, size_t * __restrict bufsize, const void *src, size_t srcoff, const enum ddsi_pserop * __restrict desc);
static size_t pserop_seralign(enum ddsi_pserop op)
{
switch(op)
{
case XSTOP:
case XbPROP:
case Xopt:
/* NB: XbPROP is never serialized, so its alignment is irrelevant. If ever there
is a need to allow calling this function when op = XbPROP, it needs to be changed
to taking the address of the pserop, and in that case inspect the following
operator */
assert(false);
return 1;
case Xo: case Xox2:
case Xb: case Xbx2: case Xbx3: case Xbx4: case Xbx5:
case XbCOND:
case XG:
case XK:
return 1;
case Xs:
return 2;
case XO:
case XS:
case XE1: case XE2: case XE3:
case Xi: case Xix2: case Xix3: case Xix4:
case Xu: case Xux2: case Xux3: case Xux4: case Xux5:
case XD: case XDx2:
case XQ:
return 4;
case Xl:
return 8;
}
assert(false);
return 1;
}
static size_t alignN(const size_t off, const size_t align)
{
return (off + align - 1) & ~(align - 1);
}
static size_t align2(const size_t off)
{
return alignN(off, 2);
}
static size_t align4(const size_t off)
{
return alignN(off, 4);
}
static size_t align8(const size_t off)
{
return alignN(off, 8);
}
static void *deser_generic_dst (void * __restrict dst, size_t *dstoff, const size_t align)
{
*dstoff = alignN(*dstoff, align);
return (char *) dst + *dstoff;
}
static const void *deser_generic_src (const void * __restrict src, size_t *srcoff, const size_t align)
{
*srcoff = alignN(*srcoff, align);
return (const char *) src + *srcoff;
}
static void *ser_generic_aligned (char * __restrict p, size_t * __restrict off, const size_t align)
{
const size_t off1 = alignN(*off, align);
size_t pad = off1 - *off;
char *dst = p + *off;
*off = off1;
while (pad--)
*dst++ = 0;
return dst;
}
static void *ser_generic_align2(char * __restrict p, size_t * __restrict off)
{
return ser_generic_aligned(p, off, 2);
}
static void *ser_generic_align4(char * __restrict p, size_t * __restrict off)
{
return ser_generic_aligned(p, off, 4);
}
static void *ser_generic_align8(char * __restrict p, size_t * __restrict off)
{
return ser_generic_aligned(p, off, 8);
}
static dds_return_t deser_uint16 (uint16_t *dst, const struct dd * __restrict dd, size_t * __restrict off)
{
size_t off1 = (*off + 1) & ~(size_t)1;
uint16_t tmp;
if (off1 + 2 > dd->bufsz)
return DDS_RETCODE_BAD_PARAMETER;
tmp = *((uint16_t *) (dd->buf + off1));
if (dd->bswap)
tmp = ddsrt_bswap2u (tmp);
*dst = tmp;
*off = off1 + 2;
return 0;
}
static dds_return_t deser_uint32 (uint32_t *dst, const struct dd * __restrict dd, size_t * __restrict off)
{
size_t off1 = (*off + 3) & ~(size_t)3;
uint32_t tmp;
if (off1 + 4 > dd->bufsz)
return DDS_RETCODE_BAD_PARAMETER;
tmp = *((uint32_t *) (dd->buf + off1));
if (dd->bswap)
tmp = ddsrt_bswap4u (tmp);
*dst = tmp;
*off = off1 + 4;
return 0;
}
static dds_return_t deser_int16 (int16_t *dst, const struct dd * __restrict dd, size_t * __restrict off)
{
size_t off1 = (*off + 1) & ~(size_t)1;
int16_t tmp;
if (off1 + 2 > dd->bufsz)
return DDS_RETCODE_BAD_PARAMETER;
tmp = *((int16_t *) (dd->buf + off1));
if (dd->bswap)
tmp = ddsrt_bswap2 (tmp);
*dst = tmp;
*off = off1 + 2;
return 0;
}
static dds_return_t deser_int64 (int64_t *dst, const struct dd * __restrict dd, size_t * __restrict off)
{
size_t off1 = (*off + 7) & ~(size_t)7;
int64_t tmp;
if (off1 + 8 > dd->bufsz)
return DDS_RETCODE_BAD_PARAMETER;
tmp = *((int64_t *) (dd->buf + off1));
if (dd->bswap)
tmp = ddsrt_bswap8 (tmp);
*dst = tmp;
*off = off1 + 8;
return 0;
}
/* Returns true if buffer not yet exhausted, false otherwise */
static bool prtf (char * __restrict *buf, size_t * __restrict bufsize, const char *fmt, ...)
ddsrt_attribute_format_printf(3, 4);
static bool prtf (char * __restrict *buf, size_t * __restrict bufsize, const char *fmt, ...)
{
va_list ap;
if (*bufsize == 0)
return false;
va_start (ap, fmt);
int n = vsnprintf (*buf, *bufsize, fmt, ap);
va_end (ap);
if (n < 0)
{
**buf = 0;
return false;
}
else if ((size_t) n <= *bufsize)
{
*buf += (size_t) n;
*bufsize -= (size_t) n;
return (*bufsize > 0);
}
else
{
*buf += *bufsize;
*bufsize = 0;
return false;
}
}
static dds_return_t deser_reliability (void * __restrict dst, struct flagset *flagset, uint64_t flag, const struct dd * __restrict dd, struct ddsi_domaingv const * const gv)
{
DDSRT_STATIC_ASSERT (DDS_EXTERNAL_RELIABILITY_BEST_EFFORT == 1 && DDS_EXTERNAL_RELIABILITY_RELIABLE == 2 &&
DDS_RELIABILITY_BEST_EFFORT == 0 && DDS_RELIABILITY_RELIABLE == 1);
size_t srcoff = 0, dstoff = 0;
dds_reliability_qospolicy_t * const x = deser_generic_dst (dst, &dstoff, plist_alignof (dds_reliability_qospolicy_t));
uint32_t kind, mbtsec, mbtfrac;
ddsi_duration_t mbt;
(void) gv;
if (deser_uint32 (&kind, dd, &srcoff) < 0 || deser_uint32 (&mbtsec, dd, &srcoff) < 0 || deser_uint32 (&mbtfrac, dd, &srcoff) < 0)
return DDS_RETCODE_BAD_PARAMETER;
if (kind < 1 || kind > 2)
return DDS_RETCODE_BAD_PARAMETER;
mbt.seconds = (int32_t) mbtsec;
mbt.fraction = mbtfrac;
if (validate_external_duration (&mbt) < 0)
return DDS_RETCODE_BAD_PARAMETER;
x->kind = (enum dds_reliability_kind) (kind - 1);
x->max_blocking_time = ddsi_duration_to_dds (mbt);
*flagset->present |= flag;
return 0;
}
static dds_return_t ser_reliability (struct ddsi_xmsg *xmsg, ddsi_parameterid_t pid, const void *src, size_t srcoff, enum ddsrt_byte_order_selector bo, enum ddsi_plist_context_kind context_kind)
{
(void) context_kind;
DDSRT_STATIC_ASSERT (DDS_EXTERNAL_RELIABILITY_BEST_EFFORT == 1 && DDS_EXTERNAL_RELIABILITY_RELIABLE == 2 &&
DDS_RELIABILITY_BEST_EFFORT == 0 && DDS_RELIABILITY_RELIABLE == 1);
dds_reliability_qospolicy_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (dds_reliability_qospolicy_t));
ddsi_duration_t mbt = ddsi_duration_from_dds (x->max_blocking_time);
uint32_t * const p = ddsi_xmsg_addpar_bo (xmsg, pid, 3 * sizeof (uint32_t), bo);
p[0] = ddsrt_toBO4u(bo, 1 + (uint32_t) x->kind);
p[1] = ddsrt_toBO4u(bo, (uint32_t) mbt.seconds);
p[2] = ddsrt_toBO4u(bo, mbt.fraction);
return 0;
}
static dds_return_t valid_reliability (const void *src, size_t srcoff)
{
dds_reliability_qospolicy_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (dds_reliability_qospolicy_t));
if ((x->kind == DDS_RELIABILITY_BEST_EFFORT || x->kind == DDS_RELIABILITY_RELIABLE) && x->max_blocking_time >= 0)
return 0;
else
return DDS_RETCODE_BAD_PARAMETER;
}
static bool equal_reliability (const void *srcx, const void *srcy, size_t srcoff)
{
dds_reliability_qospolicy_t const * const x = deser_generic_src (srcx, &srcoff, plist_alignof (dds_reliability_qospolicy_t));
dds_reliability_qospolicy_t const * const y = deser_generic_src (srcy, &srcoff, plist_alignof (dds_reliability_qospolicy_t));
return x->kind == y->kind && x->max_blocking_time == y->max_blocking_time;
}
static bool print_reliability (char * __restrict *buf, size_t * __restrict bufsize, const void *src, size_t srcoff)
{
dds_reliability_qospolicy_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (dds_reliability_qospolicy_t));
return prtf (buf, bufsize, "%d:%"PRId64, (int) x->kind, x->max_blocking_time);
}
static dds_return_t deser_statusinfo (void * __restrict dst, struct flagset *flagset, uint64_t flag, const struct dd * __restrict dd, struct ddsi_domaingv const * const gv)
{
size_t srcoff = 0, dstoff = 0;
uint32_t * const x = deser_generic_dst (dst, &dstoff, plist_alignof (dds_reliability_qospolicy_t));
size_t srcoff1 = (srcoff + 3) & ~(size_t)3;
(void) gv;
if (srcoff1 + 4 > dd->bufsz)
return DDS_RETCODE_BAD_PARAMETER;
/* status info is always in BE format (it is an array of 4 octets according to the spec) --
fortunately we have 4 byte alignment anyway -- and can have bits set we don't grok
(which we discard) */
*x = ddsrt_fromBE4u (*((uint32_t *) (dd->buf + srcoff1))) & DDSI_STATUSINFO_STANDARDIZED;
*flagset->present |= flag;
return 0;
}
static dds_return_t ser_statusinfo (struct ddsi_xmsg *xmsg, ddsi_parameterid_t pid, const void *src, size_t srcoff, enum ddsrt_byte_order_selector bo, enum ddsi_plist_context_kind context_kind)
{
(void) context_kind;
uint32_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (uint32_t));
uint32_t * const p = ddsi_xmsg_addpar_bo (xmsg, pid, sizeof (uint32_t), bo);
*p = ddsrt_toBE4u (*x);
return 0;
}
static bool print_statusinfo (char * __restrict *buf, size_t * __restrict bufsize, const void *src, size_t srcoff)
{
uint32_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (uint32_t));
return prtf (buf, bufsize, "%"PRIx32, *x);
}
static dds_return_t deser_locator (void * __restrict dst, struct flagset *flagset, uint64_t flag, const struct dd * __restrict dd, struct ddsi_domaingv const * const gv)
{
size_t srcoff = 0, dstoff = 0;
ddsi_locators_t * const x = deser_generic_dst (dst, &dstoff, plist_alignof (ddsi_locators_t));
/* FIXME: don't want to modify do_locator just yet, and don't want to require that a
locator is the only thing in the descriptor string (even though it actually always is),
so do alignment explicitly, fake a temporary input buffer and advance the source buffer */
srcoff = (srcoff + 3) & ~(size_t)3;
if (srcoff > dd->bufsz || dd->bufsz - srcoff < 24)
return DDS_RETCODE_BAD_PARAMETER;
struct dd tmpdd = *dd;
tmpdd.buf += srcoff;
tmpdd.bufsz -= srcoff;
switch (do_locator (x, *flagset->present, flagset->wanted, flag, &tmpdd, gv))
{
case DOLOC_INVALID:
return DDS_RETCODE_BAD_PARAMETER;
case DOLOC_IGNORED:
break;
case DOLOC_ACCEPTED:
*flagset->present |= flag;
break;
}
return 0;
}
static dds_return_t ser_locator (struct ddsi_xmsg *xmsg, ddsi_parameterid_t pid, const void *src, size_t srcoff, enum ddsrt_byte_order_selector bo, enum ddsi_plist_context_kind context_kind)
{
(void) context_kind;
ddsi_locators_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (ddsi_locators_t));
for (const struct ddsi_locators_one *l = x->first; l != NULL; l = l->next)
{
char * const p = ddsi_xmsg_addpar_bo (xmsg, pid, 24, bo);
const int32_t kind = ddsrt_toBO4 (bo, l->loc.kind);
const uint32_t port = ddsrt_toBO4u (bo, l->loc.port);
memcpy (p, &kind, 4);
memcpy (p + 4, &port, 4);
memcpy (p + 8, l->loc.address, 16);
}
return 0;
}
static dds_return_t unalias_locator (void * __restrict dst, size_t * __restrict dstoff, bool gen_seq_aliased)
{
ddsi_locators_t * const x = deser_generic_dst (dst, dstoff, plist_alignof (ddsi_locators_t));
ddsi_locators_t newlocs = { .n = x->n, .first = NULL, .last = NULL };
struct ddsi_locators_one **pnext = &newlocs.first;
(void) gen_seq_aliased;
for (const struct ddsi_locators_one *lold = x->first; lold != NULL; lold = lold->next)
{
struct ddsi_locators_one *n = ddsrt_memdup (lold, sizeof (*n));
*pnext = n;
pnext = &n->next;
}
newlocs.last = *pnext;
*pnext = NULL;
*x = newlocs;
*dstoff += sizeof (*x);
return 0;
}
static dds_return_t fini_locator (void * __restrict dst, size_t * __restrict dstoff, struct flagset *flagset, uint64_t flag)
{
ddsi_locators_t * const x = deser_generic_dst (dst, dstoff, plist_alignof (ddsi_locators_t));
if (!(*flagset->aliased & flag))
{
while (x->first)
{
struct ddsi_locators_one *l = x->first;
x->first = l->next;
ddsrt_free (l);
}
}
return 0;
}
static const enum ddsi_pserop* pserop_advance (const enum ddsi_pserop * __restrict desc)
{
/* Should not start on an end. */
assert(*desc != XSTOP);
/* If not a sequence, return next. */
if (*desc != XQ) return (desc + 1);
/* Jump over this sequence (ignoring nested ones). */
int scope = 1;
do
{
desc++;
if (*desc == XQ) scope++;
if (*desc == XSTOP) scope--;
}
while (scope != 0);
/* We're on the stop, return next. */
return (desc + 1);
}
static bool print_locator (char * __restrict *buf, size_t * __restrict bufsize, const void *src, size_t srcoff)
{
ddsi_locators_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (ddsi_locators_t));
const char *sep = "";
prtf (buf, bufsize, "{");
for (const struct ddsi_locators_one *l = x->first; l != NULL; l = l->next)
{
char tmp[DDSI_LOCSTRLEN];
ddsi_locator_to_string (tmp, sizeof (tmp), &l->loc);
prtf (buf, bufsize, "%s%s", sep, tmp);
sep = ",";
}
return prtf (buf, bufsize, "}");
}
static dds_return_t deser_type_consistency (void * __restrict dst, struct flagset *flagset, uint64_t flag, const struct dd * __restrict dd, struct ddsi_domaingv const * const gv)
{
DDSRT_STATIC_ASSERT (DDS_TYPE_CONSISTENCY_DISALLOW_TYPE_COERCION == 0 && DDS_TYPE_CONSISTENCY_ALLOW_TYPE_COERCION == 1);
size_t srcoff = 0, dstoff = 0;
dds_type_consistency_enforcement_qospolicy_t * const x = deser_generic_dst (dst, &dstoff, plist_alignof (dds_type_consistency_enforcement_qospolicy_t));
const uint32_t option_count = 5;
uint16_t kind;
(void) gv;
if (deser_uint16 (&kind, dd, &srcoff) < 0)
return DDS_RETCODE_BAD_PARAMETER;
if (kind > DDS_TYPE_CONSISTENCY_ALLOW_TYPE_COERCION)
return DDS_RETCODE_BAD_PARAMETER;
x->kind = kind;
if (dd->bufsz - srcoff < option_count)
{
/* set defaults as described in clause 7.6.3.4.1 of the xtypes spec */
x->ignore_sequence_bounds = x->kind != DDS_TYPE_CONSISTENCY_DISALLOW_TYPE_COERCION;
x->ignore_string_bounds = x->kind != DDS_TYPE_CONSISTENCY_DISALLOW_TYPE_COERCION;
x->ignore_member_names = false;
x->prevent_type_widening = x->kind == DDS_TYPE_CONSISTENCY_DISALLOW_TYPE_COERCION;
x->force_type_validation = false;
}
else
{
for (uint32_t i = 0; i < option_count; i++)
if (dd->buf[srcoff + i] > 1)
return DDS_RETCODE_BAD_PARAMETER;
x->force_type_validation = (bool) dd->buf[srcoff + 4];
if (x->kind == DDS_TYPE_CONSISTENCY_DISALLOW_TYPE_COERCION)
{
/* set values for options that do not apply (xtypes spec 7.6.3.4.1) */
x->ignore_sequence_bounds = false;
x->ignore_string_bounds = false;
x->ignore_member_names = false;
x->prevent_type_widening = true;
}
else
{
x->ignore_sequence_bounds = (bool) dd->buf[srcoff + 0];
x->ignore_string_bounds = (bool) dd->buf[srcoff + 1];
x->ignore_member_names = (bool) dd->buf[srcoff + 2];
x->prevent_type_widening = (bool) dd->buf[srcoff + 3];
}
}
*flagset->present |= flag;
return 0;
}
static dds_return_t ser_type_consistency (struct ddsi_xmsg *xmsg, ddsi_parameterid_t pid, const void *src, size_t srcoff, enum ddsrt_byte_order_selector bo, enum ddsi_plist_context_kind context_kind)
{
(void) context_kind;
dds_type_consistency_enforcement_qospolicy_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (dds_type_consistency_enforcement_qospolicy_t));
char * const p = ddsi_xmsg_addpar_bo (xmsg, pid, 8, bo);
const uint16_t kind = ddsrt_toBO2u (bo, (uint16_t) x->kind);
memcpy (p, &kind, 2);
size_t offs = sizeof (kind);
p[offs + 0] = x->ignore_sequence_bounds;
p[offs + 1] = x->ignore_string_bounds;
p[offs + 2] = x->ignore_member_names;
p[offs + 3] = x->prevent_type_widening;
p[offs + 4] = x->force_type_validation;
return 0;
}
static dds_return_t valid_type_consistency (const void *src, size_t srcoff)
{
DDSRT_STATIC_ASSERT (DDS_TYPE_CONSISTENCY_DISALLOW_TYPE_COERCION == 0 && DDS_TYPE_CONSISTENCY_ALLOW_TYPE_COERCION == 1);
dds_type_consistency_enforcement_qospolicy_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (dds_type_consistency_enforcement_qospolicy_t));
if (x->kind > DDS_TYPE_CONSISTENCY_ALLOW_TYPE_COERCION)
return DDS_RETCODE_BAD_PARAMETER;
return 0;
}
static bool equal_type_consistency (const void *srcx, const void *srcy, size_t srcoff)
{
dds_type_consistency_enforcement_qospolicy_t const * const x = deser_generic_src (srcx, &srcoff, plist_alignof (dds_type_consistency_enforcement_qospolicy_t));
dds_type_consistency_enforcement_qospolicy_t const * const y = deser_generic_src (srcy, &srcoff, plist_alignof (dds_type_consistency_enforcement_qospolicy_t));
return x->kind == y->kind
&& x->ignore_sequence_bounds == y->ignore_sequence_bounds
&& x->ignore_string_bounds== y->ignore_string_bounds
&& x->ignore_member_names == y->ignore_member_names
&& x->prevent_type_widening == y->prevent_type_widening
&& x->force_type_validation == y->force_type_validation;
}
static bool print_type_consistency (char * __restrict *buf, size_t * __restrict bufsize, const void *src, size_t srcoff)
{
dds_type_consistency_enforcement_qospolicy_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (dds_type_consistency_enforcement_qospolicy_t));
return prtf (buf, bufsize, "%d:%d%d%d%d%d", (int) x->kind, x->ignore_sequence_bounds, x->ignore_string_bounds, x->ignore_member_names, x->prevent_type_widening, x->force_type_validation);
}
static const enum ddsi_pserop desc_liveliness[] = { XE2, XD, XSTOP };
static dds_return_t validate_liveliness_kind (uint32_t kind)
{
switch (kind)
{
case DDS_LIVELINESS_AUTOMATIC:
case DDS_LIVELINESS_MANUAL_BY_PARTICIPANT:
case DDS_LIVELINESS_MANUAL_BY_TOPIC:
return 0;
}
return DDS_RETCODE_BAD_PARAMETER;
}
static dds_return_t deser_liveliness (void * __restrict dst, struct flagset *flagset, uint64_t flag, const struct dd * __restrict dd, struct ddsi_domaingv const * const gv)
{
(void) flag; (void) gv;
size_t srcoff = 0, dstoff = 0;
dds_liveliness_qospolicy_t * const x = deser_generic_dst (dst, &dstoff, plist_alignof (dds_liveliness_qospolicy_t));
switch (dd->context_kind)
{
case DDSI_PLIST_CONTEXT_PARTICIPANT: {
x->kind = DDS_LIVELINESS_AUTOMATIC;
break;
}
case DDSI_PLIST_CONTEXT_ENDPOINT:
case DDSI_PLIST_CONTEXT_TOPIC:
case DDSI_PLIST_CONTEXT_INLINE_QOS: {
uint32_t kind;
if (deser_uint32 (&kind, dd, &srcoff) < 0 || validate_liveliness_kind (kind) != 0)
return DDS_RETCODE_BAD_PARAMETER;
x->kind = (dds_liveliness_kind_t) kind;
break;
}
case DDSI_PLIST_CONTEXT_QOS_DISALLOWED: {
return DDS_RETCODE_BAD_PARAMETER;
}
}
ddsi_duration_t tmp;
if (deser_uint32 ((uint32_t *) &tmp.seconds, dd, &srcoff) < 0 ||
deser_uint32 (&tmp.fraction, dd, &srcoff) < 0 ||
validate_external_duration (&tmp) != 0)
return DDS_RETCODE_BAD_PARAMETER;
x->lease_duration = ddsi_duration_to_dds (tmp);
*flagset->present |= DDSI_QP_LIVELINESS;
return 0;
}
static dds_return_t ser_liveliness (struct ddsi_xmsg *xmsg, ddsi_parameterid_t pid, const void *src, size_t srcoff, enum ddsrt_byte_order_selector bo, enum ddsi_plist_context_kind context_kind)
{
(void) pid;
dds_liveliness_qospolicy_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (dds_liveliness_qospolicy_t));
switch (context_kind)
{
case DDSI_PLIST_CONTEXT_PARTICIPANT: {
uint32_t * const p = ddsi_xmsg_addpar_bo (xmsg, DDSI_PID_PARTICIPANT_LEASE_DURATION, sizeof (ddsi_duration_t), bo);
const ddsi_duration_t tmp = ddsi_duration_from_dds (x->lease_duration);
assert (x->kind == DDS_LIVELINESS_AUTOMATIC);
p[0] = ddsrt_toBO4u(bo, (uint32_t) tmp.seconds);
p[1] = ddsrt_toBO4u(bo, tmp.fraction);
break;
}
case DDSI_PLIST_CONTEXT_ENDPOINT:
case DDSI_PLIST_CONTEXT_TOPIC:
case DDSI_PLIST_CONTEXT_INLINE_QOS: {
uint32_t * const p = ddsi_xmsg_addpar_bo (xmsg, DDSI_PID_LIVELINESS, sizeof (uint32_t) + sizeof (ddsi_duration_t), bo);
const ddsi_duration_t tmp = ddsi_duration_from_dds (x->lease_duration);
p[0] = ddsrt_toBO4u(bo, (uint32_t) x->kind);
p[1] = ddsrt_toBO4u(bo, (uint32_t) tmp.seconds);
p[2] = ddsrt_toBO4u(bo, tmp.fraction);
break;
}
case DDSI_PLIST_CONTEXT_QOS_DISALLOWED: {
return DDS_RETCODE_BAD_PARAMETER;
}
}
return 0;
}
static dds_return_t valid_liveliness (const void *src, size_t srcoff)
{
return valid_generic (src, srcoff, desc_liveliness);
}
static bool equal_liveliness (const void *srcx, const void *srcy, size_t srcoff)
{
return equal_generic (srcx, srcy, srcoff, desc_liveliness);
}
static bool print_liveliness (char * __restrict *buf, size_t * __restrict bufsize, const void *src, size_t srcoff)
{
return print_generic (buf, bufsize, src, srcoff, desc_liveliness);
}
static const enum ddsi_pserop desc_data_representation[] = { XQ, Xs, XSTOP, XSTOP };
static dds_return_t deser_data_representation (void * __restrict dst, struct flagset *flagset, uint64_t flag, const struct dd * __restrict dd, struct ddsi_domaingv const * const gv)
{
size_t srcoff = 0, dstoff = 0;
dds_data_representation_qospolicy_t * const x = deser_generic_dst (dst, &dstoff, plist_alignof (dds_data_representation_qospolicy_t));
uint32_t cnt;
int16_t v;
(void) gv;
if (deser_uint32 (&cnt, dd, &srcoff) < 0 || cnt > (dd->bufsz - srcoff) / sizeof (int16_t))
return DDS_RETCODE_BAD_PARAMETER;
/* Consider an empty list as if the parameter is not set, the resulting qos will get default
data representation when the default qos for the entity is merged in. */
if (cnt == 0)
return 0;
x->value.n = cnt;
x->value.ids = ddsrt_malloc (cnt * sizeof (*x->value.ids));
/* coverity[tainted_data: FALSE] */
for (uint32_t n = 0; n < cnt; n++)
{
if (deser_int16 (&v, dd, &srcoff) < 0)
return DDS_RETCODE_BAD_PARAMETER;
for (uint32_t n2 = 0; n2 < n; n2++)
if (x->value.ids[n2] == v)
continue;
x->value.ids[n] = v;
}
*flagset->present |= flag;
return 0;
}
static dds_return_t ser_data_representation (struct ddsi_xmsg *xmsg, ddsi_parameterid_t pid, const void *src, size_t srcoff, enum ddsrt_byte_order_selector bo, enum ddsi_plist_context_kind context_kind)
{
(void) context_kind;
return ser_generic (xmsg, pid, src, srcoff, desc_data_representation, bo);
}
static dds_return_t valid_data_representation (const void *src, size_t srcoff)
{
return valid_generic (src, srcoff, desc_data_representation);
}
static bool equal_data_representation (const void *srcx, const void *srcy, size_t srcoff)
{
return equal_generic (srcx, srcy, srcoff, desc_data_representation);
}
static dds_return_t unalias_data_representation (void * __restrict dst, size_t * __restrict dstoff, bool gen_seq_aliased)
{
return unalias_generic (dst, dstoff, gen_seq_aliased, desc_data_representation);
}
static dds_return_t fini_data_representation (void * __restrict dst, size_t * __restrict dstoff, struct flagset *flagset, uint64_t flag)
{
return fini_generic (dst, dstoff, flagset, flag, desc_data_representation);
}
static bool print_data_representation (char * __restrict *buf, size_t * __restrict bufsize, const void *src, size_t srcoff)
{
dds_data_representation_qospolicy_t const * const x = deser_generic_src (src, &srcoff, plist_alignof (dds_data_representation_qospolicy_t));
prtf (buf, bufsize, "%"PRIu32"(", x->value.n);
const char *sep = "";
for (uint32_t n = 0; n < x->value.n; n++)
{
prtf (buf, bufsize, "%s%i", sep, x->value.ids[n]);
sep = ",";
}
return prtf (buf, bufsize, ")");
}
#ifdef DDS_HAS_TYPELIB
static dds_return_t deser_type_information (void * __restrict dst, struct flagset *flagset, uint64_t flag, const struct dd * __restrict dd, struct ddsi_domaingv const * const gv)
{
(void) gv;
size_t dstoff = 0;
uint32_t srcoff = 0;
unsigned char *buf;
dds_return_t ret = 0;
if (dd->bswap)
buf = ddsrt_memdup (dd->buf, dd->bufsz);
else
buf = (unsigned char *) dd->buf;
if (!dds_stream_normalize_data ((char *) buf, &srcoff, (uint32_t) dd->bufsz, dd->bswap, DDSI_RTPS_CDR_ENC_VERSION_2, DDS_XTypes_TypeInformation_desc.m_ops))
{
ret = DDS_RETCODE_BAD_PARAMETER;
goto err_normalize;
}
dds_istream_t is = { .m_buffer = buf, .m_index = 0, .m_size = (uint32_t) dd->bufsz, .m_xcdr_version = DDSI_RTPS_CDR_ENC_VERSION_2 };
ddsi_typeinfo_t const ** x = deser_generic_dst (dst, &dstoff, plist_alignof (ddsi_typeinfo_t *));
*x = ddsrt_calloc (1, DDS_XTypes_TypeInformation_desc.m_size);
dds_stream_read (&is, (void *) *x, &dds_cdrstream_default_allocator, DDS_XTypes_TypeInformation_desc.m_ops);
*flagset->present |= flag;
err_normalize:
if (dd->bswap)
ddsrt_free (buf);
return ret;
}
static dds_return_t ser_type_information (struct ddsi_xmsg *xmsg, ddsi_parameterid_t pid, const void *src, size_t srcoff, enum ddsrt_byte_order_selector bo, enum ddsi_plist_context_kind context_kind)
{
(void) context_kind;
ddsi_typeinfo_t const * const * x = deser_generic_src (src, &srcoff, plist_alignof (ddsi_typeinfo_t *));
dds_ostream_t os = { .m_buffer = NULL, .m_index = 0, .m_size = 0, .m_xcdr_version = DDSI_RTPS_CDR_ENC_VERSION_2 };
(void) dds_stream_write_with_byte_order (&os, &dds_cdrstream_default_allocator, (const void *) *x, DDS_XTypes_TypeInformation_desc.m_ops, bo);
char * const p = ddsi_xmsg_addpar_bo (xmsg, pid, os.m_index, bo);
memcpy (p, os.m_buffer, os.m_index);
dds_ostream_fini (&os, &dds_cdrstream_default_allocator);
return 0;
}
static dds_return_t valid_type_information (const void *src, size_t srcoff)
{
ddsi_typeinfo_t const * const * x = deser_generic_src (src, &srcoff, plist_alignof (ddsi_typeinfo_t *));
return (*x != NULL && ddsi_typeinfo_valid (*x)) ? DDS_RETCODE_OK : DDS_RETCODE_BAD_PARAMETER;
}
static bool equal_type_information (const void *srcx, const void *srcy, size_t srcoff)
{
ddsi_typeinfo_t const * const * x = deser_generic_src (srcx, &srcoff, plist_alignof (ddsi_typeinfo_t *));
ddsi_typeinfo_t const * const * y = deser_generic_src (srcy, &srcoff, plist_alignof (ddsi_typeinfo_t *));
return ddsi_typeinfo_equal (*x, *y, DDSI_TYPE_INCLUDE_DEPS);
}
static dds_return_t unalias_type_information (void * __restrict dst, size_t * __restrict dstoff, bool gen_seq_aliased)
{
ddsi_typeinfo_t const * * x = deser_generic_dst (dst, dstoff, plist_alignof (ddsi_typeinfo_t *));
ddsi_typeinfo_t * new_type_info = ddsi_typeinfo_dup (*x);
(void) gen_seq_aliased;
*x = new_type_info;
*dstoff += sizeof (*x);
return 0;
}
static dds_return_t fini_type_information (void * __restrict dst, size_t * __restrict dstoff, struct flagset *flagset, uint64_t flag)
{
ddsi_typeinfo_t const * const * x = deser_generic_src (dst, dstoff, plist_alignof (ddsi_typeinfo_t *));
if ((*flagset->present & flag) && !(*flagset->aliased & flag))
{
ddsi_typeinfo_fini ((ddsi_typeinfo_t *) *x);
ddsrt_free ((ddsi_typeinfo_t *) *x);
}
return 0;
}
static bool print_type_information (char * __restrict *buf, size_t * __restrict bufsize, const void *src, size_t srcoff)
{
ddsi_typeinfo_t const * const * x = deser_generic_src (src, &srcoff, plist_alignof (ddsi_typeinfo_t *));
struct ddsi_typeid_str tpstrm, tpstrc;
return prtf (buf, bufsize, "%s/%s",
ddsi_make_typeid_str (&tpstrm, ddsi_typeinfo_minimal_typeid (*x)),
ddsi_make_typeid_str (&tpstrc, ddsi_typeinfo_complete_typeid (*x)));
}
#endif /* DDS_HAS_TYPELIB */
// The XE1 .. XE3 codes are the only ones dealing with an enumerated type and are
// assumed to map to the same type, which would traditionally be an "int", but in
// gcc with the -fshort-enums option enabled, it is a char. That happens quite a
// bit on embedded platforms, judging by a few tickets.
//
// This enum definition is used only in the serialisation/deserialisation code to
// stand in for the actual type.
enum xe3_prototype { XE3_PROTO_0, XE3_PROTO_1, XE3_PROTO_2, XE3_PROTO_3 };
static size_t ser_generic_srcsize (const enum ddsi_pserop * __restrict desc)
{
size_t srcoff = 0, srcalign = 0;
#define SIMPLE(basecase_, type_) do { \
const uint32_t cnt = 1 + (uint32_t) (*desc - (basecase_)); \
const size_t align = plist_alignof (type_); \
srcalign = (align > srcalign) ? align : srcalign; \
srcoff = (srcoff + align - 1) & ~(align - 1); \
srcoff += cnt * sizeof (type_); \
} while (0)
while (true)
{
switch (*desc)
{
case XSTOP: return (srcoff + srcalign - 1) & ~(srcalign - 1);
case XO: SIMPLE (XO, ddsi_octetseq_t); break;
case XS: SIMPLE (XS, const char *); break;
case XE1: case XE2: case XE3: SIMPLE (*desc, enum xe3_prototype); break;
case Xs: SIMPLE (Xs, int16_t); break;
case Xi: case Xix2: case Xix3: case Xix4: SIMPLE (Xi, int32_t); break;
case Xu: case Xux2: case Xux3: case Xux4: case Xux5: SIMPLE (Xu, uint32_t); break;
case Xl: SIMPLE (Xl, int64_t); break;
case XD: case XDx2: SIMPLE (XD, dds_duration_t); break;
case Xo: case Xox2: SIMPLE (Xo, unsigned char); break;
case Xb: case Xbx2: case Xbx3: case Xbx4: case Xbx5: SIMPLE (Xb, unsigned char); break;
case XbCOND: SIMPLE (XbCOND, unsigned char); break;
case XG: SIMPLE (XG, ddsi_guid_t); break;
case XK: SIMPLE (XK, ddsi_keyhash_t); break;
case XbPROP: SIMPLE (XbPROP, unsigned char); break;
case XQ: SIMPLE (XQ, ddsi_octetseq_t); break;
case Xopt: break;
}
desc = pserop_advance(desc);
}
#undef SIMPLE
}
size_t ddsi_plist_memsize_generic (const enum ddsi_pserop * __restrict desc)
{
return ser_generic_srcsize (desc);
}
static bool fini_generic_embeddable (void * __restrict dst, size_t * __restrict dstoff, const enum ddsi_pserop *desc, const enum ddsi_pserop * const desc_end, bool aliased)
{
bool freed = false;
#define COMPLEX(basecase_, type_, cleanup_unaliased_, cleanup_always_) do { \
type_ *x = deser_generic_dst (dst, dstoff, plist_alignof (type_)); \
const uint32_t cnt = 1 + (uint32_t) (*desc - (basecase_)); \
for (uint32_t xi = 0; xi < cnt; xi++, x++) { \
if (!aliased) do { cleanup_unaliased_; } while (0); \
do { cleanup_always_; } while (0); \
} \
*dstoff += cnt * sizeof (*x); \
} while (0)
#define SIMPLE(basecase_, type_) COMPLEX (basecase_, type_, (void) 0, (void) 0)
while ((desc_end == NULL) || (desc < desc_end))
{
switch (*desc)
{
case XSTOP: return freed;
case XO: COMPLEX (XO, ddsi_octetseq_t, { ddsrt_free (x->value); freed = true; }, (void) 0); break;
case XS: COMPLEX (XS, char *, { ddsrt_free (*x); freed = true; }, (void) 0); break;
case XE1: case XE2: case XE3: COMPLEX (*desc, enum xe3_prototype, (void) 0, (void) 0); break;
case Xs: SIMPLE (Xs, int16_t); break;
case Xi: case Xix2: case Xix3: case Xix4: SIMPLE (Xi, int32_t); break;
case Xu: case Xux2: case Xux3: case Xux4: case Xux5: SIMPLE (Xu, uint32_t); break;
case Xl: SIMPLE (Xl, int64_t); break;
case XD: case XDx2: SIMPLE (XD, dds_duration_t); break;
case Xo: case Xox2: SIMPLE (Xo, unsigned char); break;
case Xb: case Xbx2: case Xbx3: case Xbx4: case Xbx5: SIMPLE (Xb, unsigned char); break;
case XbCOND: SIMPLE (XbCOND, unsigned char); break;
case XG: SIMPLE (XG, ddsi_guid_t); break;
case XK: SIMPLE (XK, ddsi_keyhash_t); break;
case XbPROP: SIMPLE (XbPROP, unsigned char); break;
case XQ:
{
ddsi_octetseq_t *x = deser_generic_dst (dst, dstoff, plist_alignof (ddsi_octetseq_t));
const size_t elem_size = ser_generic_srcsize (desc + 1);
bool elem_freed = true;
for (uint32_t i = 0; (i < x->length) && elem_freed; i++)
{
size_t elem_off = i * elem_size;
elem_freed = fini_generic_embeddable (x->value, &elem_off, desc + 1, desc_end, aliased);
}
ddsrt_free (x->value);
freed = true;
*dstoff += sizeof (ddsi_octetseq_t);
}
break;
case Xopt: break;
}
desc = pserop_advance(desc);
}
#undef SIMPLE
#undef COMPLEX
return freed;
}
static size_t pserop_memalign (enum ddsi_pserop op)
{
switch (op)
{
case XO: case XQ: return plist_alignof (ddsi_octetseq_t);
case XS: return plist_alignof (char *);
case XG: return plist_alignof (ddsi_guid_t);
case XK: return plist_alignof (ddsi_keyhash_t);