VirtualBox

source: vbox/trunk/include/iprt/asn1-generator-pass.h@ 63687

Last change on this file since 63687 was 62583, checked in by vboxsync, 8 years ago

Unusued parameter warnings.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 73.3 KB
Line 
1/** @file
2 * IPRT - ASN.1 Code Generator, One Pass.
3 */
4
5/*
6 * Copyright (C) 2006-2016 Oracle Corporation
7 *
8 * This file is part of VirtualBox Open Source Edition (OSE), as
9 * available from http://www.virtualbox.org. This file is free software;
10 * you can redistribute it and/or modify it under the terms of the GNU
11 * General Public License (GPL) as published by the Free Software
12 * Foundation, in version 2 as it comes in the "COPYING" file of the
13 * VirtualBox OSE distribution. VirtualBox OSE is distributed in the
14 * hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
15 *
16 * The contents of this file may alternatively be used under the terms
17 * of the Common Development and Distribution License Version 1.0
18 * (CDDL) only, as it comes in the "COPYING.CDDL" file of the
19 * VirtualBox OSE distribution, in which case the provisions of the
20 * CDDL are applicable instead of those of the GPL.
21 *
22 * You may elect to license modified versions of this file under the
23 * terms and conditions of either the GPL or the CDDL or both.
24 */
25
26
27#ifndef ___iprt_asn1_generator_pass_h
28#define ___iprt_asn1_generator_pass_h
29
30#include <iprt/formats/asn1.h>
31
32
33/** @def RTASN1TMPL_MEMBER_OPT_ANY
34 * Used for optional entries without any specific type at the end of a
35 * structure.
36 *
37 * For example PolicyQualifierInfo's qualifier member which is defined as:
38 * ANY DEFINED BY policyQualifierId
39 *
40 * Defaults to RTASN1TMPL_MEMBER_EX.
41 */
42
43/** @def RTASN1TMPL_MEMBER_OPT_ITAG_EX
44 * Optional member with implict tag, extended version.
45 *
46 * This is what all the other RTASN1TMPL_MEMBER_OPT_ITAG* macros defere to.
47 */
48/** @def RTASN1TMPL_MEMBER_OPT_ITAG_CP
49 * Optional member of a typical primitive type with an implicit context tag.
50 *
51 * Examples of this can be found in AuthorityKeyIdentifier where the first and
52 * last member are primitive types (normally anyways).:
53 * keyIdentifier [1] OCTET STRING OPTIONAL,
54 * authorityCertSerialNumber [3] INTEGER OPTIONAL
55 */
56/** @def RTASN1TMPL_MEMBER_OPT_ITAG_UC
57 * Optional member of a constructed type from the universal tag class.
58 */
59/** @def RTASN1TMPL_MEMBER_OPT_ITAG_UP
60 * Optional member of a primitive type from the universal tag class.
61 */
62
63
64/** @name Expansion Passes (RTASN1TMPL_PASS values)
65 * @{ */
66#define RTASN1TMPL_PASS_INTERNAL_HEADER 1
67
68#define RTASN1TMPL_PASS_XTAG 2
69#define RTASN1TMPL_PASS_VTABLE 3
70#define RTASN1TMPL_PASS_ENUM 4
71#define RTASN1TMPL_PASS_DELETE 5
72#define RTASN1TMPL_PASS_COMPARE 6
73
74#define RTASN1TMPL_PASS_CHECK_SANITY 8
75
76#define RTASN1TMPL_PASS_INIT 16
77#define RTASN1TMPL_PASS_CLONE 17
78#define RTASN1TMPL_PASS_SETTERS_1 18
79#define RTASN1TMPL_PASS_SETTERS_2 19
80
81#define RTASN1TMPL_PASS_DECODE 24
82/** @} */
83
84/** @name ITAG clues
85 * @{ */
86#define RTASN1TMPL_ITAG_F_CC 1 /**< context, constructed. */
87#define RTASN1TMPL_ITAG_F_CP 2 /**< context, probably primary. (w/ numeric value) */
88#define RTASN1TMPL_ITAG_F_UP 3 /**< universal, probably primary. (w/ ASN1_TAG_XXX value) */
89#define RTASN1TMPL_ITAG_F_UC 4 /**< universal, constructed. (w/ ASN1_TAG_XXX value) */
90/** @} */
91/** Expands the ITAG clues into tag flag and tag class. */
92#define RTASN1TMPL_ITAG_F_EXPAND(a_fClue) \
93 ( a_fClue == RTASN1TMPL_ITAG_F_CC ? (ASN1_TAGCLASS_CONTEXT | ASN1_TAGFLAG_CONSTRUCTED ) \
94 : a_fClue == RTASN1TMPL_ITAG_F_CP ? (ASN1_TAGCLASS_CONTEXT | ASN1_TAGFLAG_PRIMITIVE) \
95 : a_fClue == RTASN1TMPL_ITAG_F_UP ? (ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_PRIMITIVE) \
96 : a_fClue == RTASN1TMPL_ITAG_F_UC ? (ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_CONSTRUCTED) \
97 : 0 )
98
99#define RTASN1TMPL_SEMICOLON_DUMMY() typedef unsigned RTASN1TMPLSEMICOLONDUMMY
100
101#endif /* !___iprt_asn1_generator_pass_h */
102
103
104#if RTASN1TMPL_PASS == RTASN1TMPL_PASS_INTERNAL_HEADER
105/*
106 *
107 * Internal header file.
108 *
109 */
110# define RTASN1TMPL_BEGIN_COMMON() extern DECLHIDDEN(RTASN1COREVTABLE const) RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable)
111
112# define RTASN1TMPL_BEGIN_SEQCORE() RTASN1TMPL_BEGIN_COMMON()
113# define RTASN1TMPL_BEGIN_SETCORE() RTASN1TMPL_BEGIN_COMMON()
114# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) RTASN1TMPL_SEMICOLON_DUMMY()
115# define RTASN1TMPL_MEMBER_OPT_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, a_Constraints) \
116 extern "C" DECLHIDDEN(RTASN1COREVTABLE const) RT_CONCAT5(g_,RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Vtable)
117
118# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
119# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
120# define RTASN1TMPL_END_SEQCORE() RTASN1TMPL_SEMICOLON_DUMMY()
121# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_SEMICOLON_DUMMY()
122
123
124# define RTASN1TMPL_BEGIN_PCHOICE() RTASN1TMPL_BEGIN_COMMON()
125# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
126 RTASN1TMPL_SEMICOLON_DUMMY()
127# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
128 extern "C" DECLHIDDEN(RTASN1COREVTABLE const) RT_CONCAT5(g_,RTASN1TMPL_INT_NAME,_PCHOICE_XTAG_,a_Name,_Vtable)
129
130# define RTASN1TMPL_END_PCHOICE() RTASN1TMPL_SEMICOLON_DUMMY()
131
132
133# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_BEGIN_COMMON()
134# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_BEGIN_COMMON()
135
136
137
138#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_XTAG
139/*
140 *
141 * Generate a vtable and associated methods for explicitly tagged items (XTAG).
142 *
143 * These turned out to be a little problematic during encoding since there are
144 * two tags, the first encapsulating the second, thus the enumeration has to be
145 * nested or we cannot calculate the size of the first tag.
146 *
147 *
148 */
149# define RTASN1TMPL_BEGIN_COMMON() RTASN1TMPL_SEMICOLON_DUMMY()
150# define RTASN1TMPL_BEGIN_SEQCORE() RTASN1TMPL_SEMICOLON_DUMMY()
151# define RTASN1TMPL_BEGIN_SETCORE() RTASN1TMPL_SEMICOLON_DUMMY()
152# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) RTASN1TMPL_SEMICOLON_DUMMY()
153# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
154# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
155# define RTASN1TMPL_MEMBER_OPT_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, a_Constraints) \
156 /* This is the method we need to make it work. */ \
157 static DECLCALLBACK(int) RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Enum)(PRTASN1CORE pThisCore, \
158 PFNRTASN1ENUMCALLBACK pfnCallback, \
159 uint32_t uDepth, void *pvUser) \
160 { \
161 RTASN1TMPL_TYPE *pThis = RT_FROM_MEMBER(pThisCore, RTASN1TMPL_TYPE, a_TnNm.a_CtxTagN); \
162 if (RTASN1CORE_IS_PRESENT(&pThis->a_TnNm.a_CtxTagN.Asn1Core)) \
163 return pfnCallback(RT_CONCAT(a_Api,_GetAsn1Core)(&pThis->a_TnNm.a_Name), #a_TnNm "." #a_Name, uDepth + 1, pvUser); \
164 return VINF_SUCCESS; \
165 } \
166 /* The reminder of the methods shouldn't normally be needed, just stub them. */ \
167 static DECLCALLBACK(void) RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Delete)(PRTASN1CORE pThisCore) \
168 { AssertFailed(); RT_NOREF_PV(pThisCore); } \
169 static DECLCALLBACK(int) RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Clone)(PRTASN1CORE pThisCore, PCRTASN1CORE pSrcCore, \
170 PCRTASN1ALLOCATORVTABLE pAllocator) \
171 { AssertFailed(); RT_NOREF_PV(pThisCore); RT_NOREF_PV(pSrcCore); RT_NOREF_PV(pAllocator); return VERR_INTERNAL_ERROR_2; } \
172 static DECLCALLBACK(int) RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Compare)(PCRTASN1CORE pLeftCore, \
173 PCRTASN1CORE pRightCore) \
174 { AssertFailed(); RT_NOREF_PV(pLeftCore); RT_NOREF_PV(pRightCore); return VERR_INTERNAL_ERROR_2; } \
175 static DECLCALLBACK(int) RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_CheckSanity)(PCRTASN1CORE pThisCore, uint32_t fFlags, \
176 PRTERRINFO pErrInfo, const char *pszErrorTag) \
177 { AssertFailed(); RT_NOREF_PV(pThisCore); RT_NOREF_PV(fFlags); RT_NOREF_PV(pErrInfo); RT_NOREF_PV(pszErrorTag); \
178 return VERR_INTERNAL_ERROR_2; } \
179 DECL_HIDDEN_CONST(RTASN1COREVTABLE const) RT_CONCAT5(g_,RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Vtable) = \
180 { \
181 /* When the Asn1Core is at the start of the structure, we can reuse the _Delete and _Enum APIs here. */ \
182 /* .pszName = */ RT_XSTR(RTASN1TMPL_INT_NAME) "_XTAG_" RT_XSTR(a_Name), \
183 /* .cb = */ RT_SIZEOFMEMB(RTASN1TMPL_TYPE, a_TnNm), \
184 /* .uDefaultTag = */ a_uTag, \
185 /* .fDefaultClass = */ ASN1_TAGCLASS_CONTEXT, \
186 /* .uReserved = */ 0, \
187 RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Delete), \
188 RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Enum), \
189 RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Clone), \
190 RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Compare), \
191 RT_CONCAT4(RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_CheckSanity), \
192 /*.pfnEncodePrep */ NULL, \
193 /*.pfnEncodeWrite */ NULL \
194 }
195
196
197# define RTASN1TMPL_END_SEQCORE() RTASN1TMPL_SEMICOLON_DUMMY()
198# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_SEMICOLON_DUMMY()
199# define RTASN1TMPL_BEGIN_PCHOICE() RTASN1TMPL_SEMICOLON_DUMMY()
200# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
201 RTASN1TMPL_SEMICOLON_DUMMY()
202# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
203 /* This is the method we need to make it work. */ \
204 static DECLCALLBACK(int) RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_Enum)(PRTASN1CORE pThisCore, \
205 PFNRTASN1ENUMCALLBACK pfnCallback, \
206 uint32_t uDepth, void *pvUser) \
207 { \
208 if (RTASN1CORE_IS_PRESENT(pThisCore)) \
209 { \
210 /** @todo optimize this one day, possibly change the PCHOICE+XTAG representation. */ \
211 RTASN1TMPL_TYPE Tmp; \
212 *(PRTASN1CORE *)&Tmp.a_PtrTnNm = pThisCore; \
213 Assert(&Tmp.a_PtrTnNm->a_CtxTagN.Asn1Core == pThisCore); \
214 return pfnCallback(RT_CONCAT(a_Api,_GetAsn1Core)(&Tmp.a_PtrTnNm->a_Name), "T" #a_uTag "." #a_Name, uDepth + 1, pvUser); \
215 } \
216 return VINF_SUCCESS; \
217 } \
218 /* The reminder of the methods shouldn't normally be needed, just stub them. */ \
219 static DECLCALLBACK(void) RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_Delete)(PRTASN1CORE pThisCore) \
220 { AssertFailed(); RT_NOREF_PV(pThisCore); } \
221 static DECLCALLBACK(int) RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_Clone)(PRTASN1CORE pThisCore, PCRTASN1CORE pSrcCore, \
222 PCRTASN1ALLOCATORVTABLE pAllocator) \
223 { AssertFailed(); RT_NOREF_PV(pThisCore); RT_NOREF_PV(pSrcCore); RT_NOREF_PV(pAllocator); return VERR_INTERNAL_ERROR_3; } \
224 static DECLCALLBACK(int) RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_Compare)(PCRTASN1CORE pLeftCore, \
225 PCRTASN1CORE pRightCore) \
226 { AssertFailed(); RT_NOREF_PV(pLeftCore); RT_NOREF_PV(pRightCore); return VERR_INTERNAL_ERROR_3; } \
227 static DECLCALLBACK(int) RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_CheckSanity)(PCRTASN1CORE pThisCore, uint32_t fFlags, \
228 PRTERRINFO pErrInfo, const char *pszErrorTag) \
229 { AssertFailed(); RT_NOREF_PV(pThisCore); RT_NOREF_PV(fFlags); RT_NOREF_PV(pErrInfo); RT_NOREF_PV(pszErrorTag); \
230 return VERR_INTERNAL_ERROR_3; } \
231 DECL_HIDDEN_CONST(RTASN1COREVTABLE const) RT_CONCAT5(g_,RTASN1TMPL_INT_NAME,_PCHOICE_XTAG_,a_Name,_Vtable) = \
232 { \
233 /* When the Asn1Core is at the start of the structure, we can reuse the _Delete and _Enum APIs here. */ \
234 /* .pszName = */ RT_XSTR(RTASN1TMPL_INT_NAME) "_PCHOICE_XTAG_" RT_XSTR(a_Name), \
235 /* .cb = */ sizeof(*((RTASN1TMPL_TYPE *)(void *)0)->a_PtrTnNm), \
236 /* .uDefaultTag = */ a_uTag, \
237 /* .fDefaultClass = */ ASN1_TAGCLASS_CONTEXT, \
238 /* .uReserved = */ 0, \
239 RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_Delete), \
240 RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_Enum), \
241 RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_Clone), \
242 RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_Compare), \
243 RT_CONCAT4(RTASN1TMPL_INT_NAME,_PC_XTAG_,a_Name,_CheckSanity), \
244 /*.pfnEncodePrep */ NULL, \
245 /*.pfnEncodeWrite */ NULL \
246 }
247
248
249
250# define RTASN1TMPL_END_PCHOICE() RTASN1TMPL_SEMICOLON_DUMMY()
251# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SEMICOLON_DUMMY()
252# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SEMICOLON_DUMMY()
253
254
255
256#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_VTABLE
257/*
258 *
259 * Internal header file.
260 *
261 */
262# ifndef RTASN1TMPL_VTABLE_FN_ENCODE_PREP
263# define RTASN1TMPL_VTABLE_FN_ENCODE_PREP NULL
264# endif
265# ifndef RTASN1TMPL_VTABLE_FN_ENCODE_WRITE
266# define RTASN1TMPL_VTABLE_FN_ENCODE_WRITE NULL
267# endif
268# define RTASN1TMPL_BEGIN_COMMON(a_uDefaultTag, a_fDefaultClass) \
269 DECL_HIDDEN_CONST(RTASN1COREVTABLE const) RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable) = \
270 { \
271 /* When the Asn1Core is at the start of the structure, we can reuse the _Delete and _Enum APIs here. */ \
272 /* .pszName = */ RT_XSTR(RTASN1TMPL_EXT_NAME), \
273 /* .cb = */ sizeof(RTASN1TMPL_TYPE), \
274 /* .uDefaultTag = */ a_uDefaultTag, \
275 /* .fDefaultClass = */ a_fDefaultClass, \
276 /* .uReserved = */ 0, \
277 (PFNRTASN1COREVTDTOR)RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete), \
278 (PFNRTASN1COREVTENUM)RT_CONCAT(RTASN1TMPL_EXT_NAME,_Enum), \
279 (PFNRTASN1COREVTCLONE)RT_CONCAT(RTASN1TMPL_EXT_NAME,_Clone), \
280 (PFNRTASN1COREVTCOMPARE)RT_CONCAT(RTASN1TMPL_EXT_NAME,_Compare), \
281 (PFNRTASN1COREVTCHECKSANITY)RT_CONCAT(RTASN1TMPL_EXT_NAME,_CheckSanity), \
282 RTASN1TMPL_VTABLE_FN_ENCODE_PREP, \
283 RTASN1TMPL_VTABLE_FN_ENCODE_WRITE \
284 }
285
286# define RTASN1TMPL_BEGIN_SEQCORE() \
287 AssertCompileMemberOffset(RTASN1TMPL_TYPE, SeqCore, 0); \
288 RTASN1TMPL_BEGIN_COMMON(ASN1_TAG_SEQUENCE, ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_CONSTRUCTED)
289# define RTASN1TMPL_BEGIN_SETCORE() \
290 AssertCompileMemberOffset(RTASN1TMPL_TYPE, SetCore, 0); \
291 RTASN1TMPL_BEGIN_COMMON(ASN1_TAG_SET, ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_CONSTRUCTED)
292# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) RTASN1TMPL_SEMICOLON_DUMMY()
293# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
294# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
295# define RTASN1TMPL_END_SEQCORE() RTASN1TMPL_SEMICOLON_DUMMY()
296# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_SEMICOLON_DUMMY()
297
298# define RTASN1TMPL_BEGIN_PCHOICE() \
299 AssertCompileMemberOffset(RTASN1TMPL_TYPE, Dummy, 0); \
300 RTASN1TMPL_BEGIN_COMMON(UINT8_MAX, UINT8_MAX)
301# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
302 RTASN1TMPL_SEMICOLON_DUMMY()
303# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
304 RTASN1TMPL_SEMICOLON_DUMMY()
305# define RTASN1TMPL_END_PCHOICE() RTASN1TMPL_SEMICOLON_DUMMY()
306
307# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) \
308 AssertCompileMemberOffset(RTASN1TMPL_TYPE, SeqCore, 0); \
309 RTASN1TMPL_BEGIN_COMMON(ASN1_TAG_SEQUENCE, ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_CONSTRUCTED)
310# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) \
311 AssertCompileMemberOffset(RTASN1TMPL_TYPE, SetCore, 0); \
312 RTASN1TMPL_BEGIN_COMMON(ASN1_TAG_SET, ASN1_TAGCLASS_UNIVERSAL | ASN1_TAGFLAG_CONSTRUCTED)
313
314
315
316#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_INIT
317/*
318 *
319 * Initialization to standard / default values.
320 *
321 */
322# define RTASN1TMPL_BEGIN_COMMON() \
323RTASN1TMPL_DECL(int) RT_CONCAT(RTASN1TMPL_EXT_NAME,_Init)(RT_CONCAT(P,RTASN1TMPL_TYPE) pThis, PCRTASN1ALLOCATORVTABLE pAllocator) \
324{ \
325 RT_NOREF_PV(pAllocator); \
326 RT_ZERO(*pThis)
327# define RTASN1TMPL_END_COMMON() \
328 return rc; \
329} RTASN1TMPL_SEMICOLON_DUMMY()
330
331# define RTASN1TMPL_BEGIN_SEQCORE() \
332 RTASN1TMPL_BEGIN_COMMON(); \
333 int rc = RTAsn1SequenceCore_Init(&pThis->SeqCore, &RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable))
334# define RTASN1TMPL_BEGIN_SETCORE() \
335 RTASN1TMPL_BEGIN_COMMON(); \
336 int rc = RTAsn1SetCore_Init(&pThis->SetCore, &RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable))
337# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) \
338 if (RT_SUCCESS(rc)) \
339 rc = RT_CONCAT(a_Api,_Init)(&pThis->a_Name, pAllocator)
340
341# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) \
342 RTAsn1MemInitAllocation(&pThis->Allocation, pAllocator); \
343 pThis->a_enmMembNm = RT_CONCAT(a_enmType,_NOT_PRESENT)
344# define RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, a_IfStmt) \
345 do { } while (0)
346# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) do { } while (0)
347
348# define RTASN1TMPL_MEMBER_DEF_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, a_fClue, a_DefVal, a_Constraints) \
349 if (RT_SUCCESS(rc)) \
350 { \
351 rc = RT_CONCAT(a_Api,_InitDefault)(&pThis->a_Name, a_DefVal, pAllocator); \
352 if (RT_SUCCESS(rc)) \
353 rc = RTAsn1Core_SetTagAndFlags(RT_CONCAT(a_Api,_GetAsn1Core)(&pThis->a_Name), \
354 a_uTag, RTASN1TMPL_ITAG_F_EXPAND(a_fClue)); \
355 }
356# define RTASN1TMPL_MEMBER_OPT_EX(a_Name, a_Type, a_Api, a_Constraints) do { } while (0) /* All optional members are left as not-present. */
357# define RTASN1TMPL_END_SEQCORE() \
358 if (RT_FAILURE(rc)) \
359 RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(pThis); \
360 RTASN1TMPL_END_COMMON()
361# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_END_SEQCORE()
362
363/* No choice, just an empty, non-present structure. */
364# define RTASN1TMPL_BEGIN_PCHOICE() RTASN1TMPL_BEGIN_COMMON(); int rc = VINF_SUCCESS
365# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
366 do { } while (0)
367# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
368 do { } while (0)
369# define RTASN1TMPL_END_PCHOICE() RTASN1TMPL_END_COMMON()
370
371
372# define RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi, a_OfApi, a_OfMember) \
373 RTASN1TMPL_BEGIN_COMMON(); \
374 RTAsn1MemInitAllocation(&pThis->Allocation, pAllocator); \
375 int rc = RT_CONCAT(a_OfApi,_Init)(&pThis->a_OfMember, &RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable)); \
376 if (RT_FAILURE(rc)) \
377 RT_ZERO(*pThis); \
378 RTASN1TMPL_END_COMMON()
379# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi, RTAsn1SeqOfCore, SeqCore)
380# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi, RTAsn1SetOfCore, SetCore)
381
382
383
384#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_DECODE
385/*
386 *
387 * Decode ASN.1.
388 *
389 */
390# define RTASN1TMPL_BEGIN_COMMON() \
391RTASN1TMPL_DECL(int) RT_CONCAT(RTASN1TMPL_EXT_NAME,_DecodeAsn1)(PRTASN1CURSOR pCursor, uint32_t fFlags, \
392 RT_CONCAT(P,RTASN1TMPL_TYPE) pThis, const char *pszErrorTag) \
393{ \
394 RT_ZERO(*pThis);
395
396# define RTASN1TMPL_END_COMMON() \
397 return rc; \
398} RTASN1TMPL_SEMICOLON_DUMMY()
399
400
401# define RTASN1TMPL_BEGIN_SEQCORE() \
402 RTASN1TMPL_BEGIN_COMMON(); \
403 RTASN1CURSOR ThisCursor; \
404 int rc = RTAsn1CursorGetSequenceCursor(pCursor, fFlags, &pThis->SeqCore, &ThisCursor, pszErrorTag); \
405 if (RT_FAILURE(rc)) \
406 return rc; \
407 pCursor = &ThisCursor; \
408 pThis->SeqCore.Asn1Core.pOps = &RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable)
409# define RTASN1TMPL_BEGIN_SETCORE() \
410 RTASN1TMPL_BEGIN_COMMON(); \
411 RTASN1CURSOR ThisCursor; \
412 int rc = RTAsn1CursorGetSetCursor(pCursor, fFlags, &pThis->SetCore, &ThisCursor, pszErrorTag); \
413 if (RT_FAILURE(rc)) \
414 return rc; \
415 pCursor = &ThisCursor; \
416 pThis->SetCore.Asn1Core.pOps = &RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable)
417
418# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) \
419 if (RT_SUCCESS(rc)) \
420 rc = RT_CONCAT(a_Api,_DecodeAsn1)(pCursor, 0, &pThis->a_Name, #a_Name)
421
422# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) \
423 if (RT_SUCCESS(rc)) \
424 { \
425 int rc2; /* not initialized! */ \
426 RTAsn1CursorInitAllocation(pCursor, &pThis->a_Allocation); \
427 pThis->a_enmMembNm = RT_CONCAT(a_enmType, _INVALID); \
428 if (false) do { /*nothing*/ } while (0)
429# define RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, a_IfStmt) \
430 else a_IfStmt \
431 do { \
432 rc2 = RTAsn1MemAllocZ(&pThis->a_Allocation, (void **)&pThis->a_UnionNm.a_PtrName, \
433 sizeof(*pThis->a_UnionNm.a_PtrName)); \
434 if (RT_SUCCESS(rc2)) \
435 { \
436 pThis->a_enmMembNm = a_enmValue; \
437 rc2 = RT_CONCAT(a_Api,_DecodeAsn1)(pCursor, 0, pThis->a_UnionNm.a_PtrName, #a_UnionNm "." #a_PtrName); \
438 } \
439 } while (0)
440# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) \
441 rc = rc2; /* Should trigger warning if a _DEFAULT is missing. */ \
442 }
443
444# define RTASN1TMPL_MEMBER_OPT_EX(a_Name, a_Type, a_Api, a_Constraints) \
445 Error_Missing_Specific_Macro_In_Decode_Pass()
446
447# define RTASN1TMPL_MEMBER_DEF_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, a_fClue, a_DefVal, a_Constraints) \
448 if (RT_SUCCESS(rc)) \
449 { \
450 if (RTAsn1CursorIsNextEx(pCursor, a_uTag, RTASN1TMPL_ITAG_F_EXPAND(a_fClue))) \
451 rc = RT_CONCAT(a_Api,_DecodeAsn1)(pCursor, 0, &pThis->a_Name, #a_Name); \
452 else \
453 rc = RT_CONCAT(a_Api,_InitDefault)(&pThis->a_Name, a_DefVal, pCursor->pPrimary->pAllocator); \
454 if (RT_SUCCESS(rc)) \
455 rc = RTAsn1Core_SetTagAndFlags(RT_CONCAT(a_Api,_GetAsn1Core)(&pThis->a_Name), \
456 a_uTag, RTASN1TMPL_ITAG_F_EXPAND(a_fClue)); \
457 } do {} while (0)
458
459# define RTASN1TMPL_MEMBER_OPT_UTF8_STRING_EX(a_Name, a_Constraints) \
460 if (RT_SUCCESS(rc) && RTAsn1CursorIsNextEx(pCursor, ASN1_TAG_UTF8_STRING, ASN1_TAGCLASS_CONTEXT | ASN1_TAGFLAG_PRIMITIVE)) \
461 rc = RTAsn1CursorGetUtf8String(pCursor, 0, &pThis->a_Name, #a_Name)
462
463# define RTASN1TMPL_MEMBER_OPT_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, a_fClue, a_Constraints) \
464 if (RT_SUCCESS(rc) && RTAsn1CursorIsNextEx(pCursor, a_uTag, RTASN1TMPL_ITAG_F_EXPAND(a_fClue)) /** @todo || CER */) \
465 rc = RT_CONCAT(a_Api,_DecodeAsn1)(pCursor, RTASN1CURSOR_GET_F_IMPLICIT, &pThis->a_Name, #a_Name)
466
467# define RTASN1TMPL_MEMBER_OPT_ITAG_BITSTRING(a_Name, a_cMaxBits, a_uTag) \
468 if (RT_SUCCESS(rc) && RTAsn1CursorIsNextEx(pCursor, a_uTag, ASN1_TAGCLASS_CONTEXT | ASN1_TAGFLAG_CONSTRUCTED)) \
469 rc = RTAsn1CursorGetBitStringEx(pCursor, RTASN1CURSOR_GET_F_IMPLICIT, a_cMaxBits, &pThis->a_Name, #a_Name)
470
471# define RTASN1TMPL_MEMBER_OPT_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, a_Constraints) \
472 if (RT_SUCCESS(rc) && RTAsn1CursorIsNextEx(pCursor, a_uTag, ASN1_TAGCLASS_CONTEXT | ASN1_TAGFLAG_CONSTRUCTED)) \
473 { \
474 RTASN1CURSOR CtxCursor; \
475 rc = RT_CONCAT3(RTAsn1CursorGetContextTag,a_uTag,Cursor)(pCursor, 0, \
476 &RT_CONCAT5(g_,RTASN1TMPL_INT_NAME,_XTAG_,a_Name,_Vtable), \
477 &pThis->a_TnNm.a_CtxTagN, &CtxCursor, #a_TnNm); \
478 if (RT_SUCCESS(rc)) \
479 { \
480 rc = RT_CONCAT(a_Api,_DecodeAsn1)(&CtxCursor, 0, &pThis->a_TnNm.a_Name, #a_Name); \
481 if (RT_SUCCESS(rc)) \
482 rc = RTAsn1CursorCheckEnd(&CtxCursor); \
483 } \
484 } do { } while (0)
485
486# define RTASN1TMPL_MEMBER_OPT_ANY(a_Name, a_Type, a_Api) \
487 if (RT_SUCCESS(rc) && pCursor->cbLeft > 0) \
488 RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, RT_NOTHING)
489
490# define RTASN1TMPL_END_SEQCORE() \
491 if (RT_SUCCESS(rc)) \
492 rc = RTAsn1CursorCheckEnd(&ThisCursor); \
493 if (RT_SUCCESS(rc)) \
494 return VINF_SUCCESS; \
495 RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(pThis); \
496 RTASN1TMPL_END_COMMON()
497# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_END_SEQCORE()
498
499
500# define RTASN1TMPL_BEGIN_PCHOICE() \
501 RTASN1TMPL_BEGIN_COMMON(); \
502 RT_NOREF_PV(fFlags); \
503 RTAsn1Dummy_InitEx(&pThis->Dummy); \
504 pThis->Dummy.Asn1Core.pOps = &RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable); \
505 RTAsn1CursorInitAllocation(pCursor, &pThis->Allocation); \
506 RTASN1CORE Asn1Peek; \
507 int rc = RTAsn1CursorPeek(pCursor, &Asn1Peek); \
508 if (RT_SUCCESS(rc)) \
509 { \
510 if (false) do {} while (0)
511# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
512 else if ( Asn1Peek.uTag == (a_uTag) \
513 && (Asn1Peek.fClass == RTASN1TMPL_ITAG_F_EXPAND(a_fClue) /** @todo || CER */ ) ) \
514 do { \
515 pThis->enmChoice = a_enmChoice; \
516 rc = RTAsn1MemAllocZ(&pThis->Allocation, (void **)&pThis->a_PtrName, sizeof(*pThis->a_PtrName)); \
517 if (RT_SUCCESS(rc)) \
518 rc = RT_CONCAT(a_Api,_DecodeAsn1)(pCursor, RTASN1CURSOR_GET_F_IMPLICIT, pThis->a_PtrName, #a_PtrName); \
519 } while (0)
520# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
521 else if (Asn1Peek.uTag == (a_uTag) && Asn1Peek.fClass == (ASN1_TAGCLASS_CONTEXT | ASN1_TAGFLAG_CONSTRUCTED)) \
522 do { \
523 pThis->enmChoice = a_enmChoice; \
524 rc = RTAsn1MemAllocZ(&pThis->Allocation, (void **)&pThis->a_PtrTnNm, sizeof(*pThis->a_PtrTnNm)); \
525 if (RT_SUCCESS(rc)) \
526 { \
527 RTASN1CURSOR CtxCursor; \
528 rc = RT_CONCAT3(RTAsn1CursorGetContextTag,a_uTag,Cursor)(pCursor, 0, \
529 &RT_CONCAT5(g_,RTASN1TMPL_INT_NAME,_PCHOICE_XTAG_,a_Name,_Vtable), \
530 &pThis->a_PtrTnNm->a_CtxTagN, &CtxCursor, "T" #a_uTag); \
531 if (RT_SUCCESS(rc)) \
532 rc = RT_CONCAT(a_Api,_DecodeAsn1)(&CtxCursor, RTASN1CURSOR_GET_F_IMPLICIT, \
533 &pThis->a_PtrTnNm->a_Name, #a_Name); \
534 if (RT_SUCCESS(rc)) \
535 rc = RTAsn1CursorCheckEnd(&CtxCursor); \
536 } \
537 } while (0)
538#define RTASN1TMPL_END_PCHOICE() \
539 else \
540 rc = RTAsn1CursorSetInfo(pCursor, VERR_GENERAL_FAILURE, "%s: Unknown choice: tag=%#x fClass=%#x", \
541 pszErrorTag, Asn1Peek.uTag, Asn1Peek.fClass); \
542 if (RT_SUCCESS(rc)) \
543 return VINF_SUCCESS; \
544 } \
545 RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(pThis); \
546 RTASN1TMPL_END_COMMON()
547
548
549# define RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi, a_OfApi, a_OfMember, a_fnGetCursor) \
550 RTASN1TMPL_BEGIN_COMMON(); \
551 RTASN1CURSOR ThisCursor; \
552 int rc = a_fnGetCursor(pCursor, fFlags, &pThis->a_OfMember, &ThisCursor, pszErrorTag); \
553 if (RT_SUCCESS(rc)) \
554 { \
555 pCursor = &ThisCursor; \
556 pThis->a_OfMember.Asn1Core.pOps = &RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable); \
557 RTAsn1CursorInitAllocation(pCursor, &pThis->Allocation); \
558 \
559 uint32_t i = 0; \
560 while ( pCursor->cbLeft > 0 \
561 && RT_SUCCESS(rc)) \
562 { \
563 rc = RTAsn1MemGrowArray(&pThis->Allocation, \
564 (void **)&pThis->paItems, \
565 sizeof(pThis->paItems[0]), \
566 i, \
567 i + 1); \
568 if (RT_SUCCESS(rc)) \
569 { \
570 rc = RT_CONCAT(a_ItemApi,_DecodeAsn1)(pCursor, 0, &pThis->paItems[i], "paItems[#]"); \
571 if (RT_SUCCESS(rc)) \
572 { \
573 i++; \
574 pThis->cItems = i; \
575 continue; \
576 } \
577 } \
578 break; \
579 } \
580 if (RT_SUCCESS(rc)) \
581 { \
582 rc = RTAsn1CursorCheckEnd(pCursor); \
583 if (RT_SUCCESS(rc)) \
584 return VINF_SUCCESS; \
585 } \
586 RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(pThis); \
587 } \
588 RTASN1TMPL_END_COMMON()
589# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) \
590 RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi, RTAsn1SeqOfCore, SeqCore, RTAsn1CursorGetSequenceCursor)
591# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) \
592 RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi, RTAsn1SetOfCore, SetCore, RTAsn1CursorGetSetCursor)
593
594
595# define RTASN1TMPL_EXEC_DECODE(a_Expr) if (RT_SUCCESS(rc)) { a_Expr; }
596
597
598
599#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_ENUM
600/*
601 *
602 * Enumeration.
603 *
604 */
605# define RTASN1TMPL_BEGIN_COMMON() \
606RTASN1TMPL_DECL(int) RT_CONCAT(RTASN1TMPL_EXT_NAME,_Enum)(RT_CONCAT(P,RTASN1TMPL_TYPE) pThis, \
607 PFNRTASN1ENUMCALLBACK pfnCallback, \
608 uint32_t uDepth, void *pvUser) \
609{ \
610 if (!RT_CONCAT(RTASN1TMPL_EXT_NAME,_IsPresent)(pThis)) \
611 return VINF_SUCCESS; \
612 uDepth++; \
613 int rc = VINF_SUCCESS
614
615# define RTASN1TMPL_END_COMMON() \
616 return rc; \
617} RTASN1TMPL_SEMICOLON_DUMMY()
618
619# define RTASN1TMPL_BEGIN_SEQCORE() RTASN1TMPL_BEGIN_COMMON()
620# define RTASN1TMPL_BEGIN_SETCORE() RTASN1TMPL_BEGIN_COMMON()
621# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) \
622 if (rc == VINF_SUCCESS) \
623 rc = pfnCallback(RT_CONCAT(a_Api,_GetAsn1Core)(&pThis->a_Name), #a_Name, uDepth, pvUser)
624# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) \
625 if (rc == VINF_SUCCESS) \
626 switch (pThis->a_enmMembNm) \
627 { \
628 default: rc = VERR_INTERNAL_ERROR_3; break
629# define RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, a_IfStmt) \
630 case a_enmValue: \
631 rc = pfnCallback(RT_CONCAT(a_Api,_GetAsn1Core)(pThis->a_UnionNm.a_PtrName), #a_UnionNm "." #a_PtrName, \
632 uDepth, pvUser); \
633 break
634# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) \
635 case RT_CONCAT(a_enmType,_NOT_PRESENT): break; \
636 }
637# define RTASN1TMPL_MEMBER_OPT_EX(a_Name, a_Type, a_Api, a_Constraints) \
638 if (rc == VINF_SUCCESS && RT_CONCAT(a_Api,_IsPresent)(&pThis->a_Name)) \
639 rc = pfnCallback(RT_CONCAT(a_Api,_GetAsn1Core)(&pThis->a_Name), #a_Name, uDepth, pvUser)
640# define RTASN1TMPL_MEMBER_OPT_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, a_Constraints) \
641 if (rc == VINF_SUCCESS && RTASN1CORE_IS_PRESENT(&pThis->a_TnNm.a_CtxTagN.Asn1Core)) \
642 { \
643 rc = pfnCallback(&pThis->a_TnNm.a_CtxTagN.Asn1Core, #a_Name, uDepth, pvUser); \
644 } do {} while (0)
645# define RTASN1TMPL_END_SEQCORE() RTASN1TMPL_END_COMMON()
646# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_END_COMMON()
647
648
649# define RTASN1TMPL_BEGIN_PCHOICE() \
650 RTASN1TMPL_BEGIN_COMMON(); \
651 switch (pThis->enmChoice) \
652 { \
653 default: rc = VERR_INTERNAL_ERROR_3; break
654# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
655 case a_enmChoice: rc = pfnCallback(RT_CONCAT(a_Api,_GetAsn1Core)(pThis->a_PtrName), #a_PtrName, uDepth, pvUser); break
656# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
657 case a_enmChoice: rc = pfnCallback(&pThis->a_PtrTnNm->a_CtxTagN.Asn1Core, "T" #a_uTag "." #a_CtxTagN, uDepth, pvUser); break
658#define RTASN1TMPL_END_PCHOICE() \
659 } \
660 RTASN1TMPL_END_COMMON()
661
662# define RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi) \
663 RTASN1TMPL_BEGIN_COMMON(); \
664 for (uint32_t i = 0; i < pThis->cItems && rc == VINF_SUCCESS; i++) \
665 rc = pfnCallback(RT_CONCAT(a_ItemApi,_GetAsn1Core)(&pThis->paItems[i]), "paItems[#]", uDepth, pvUser); \
666 RTASN1TMPL_END_COMMON()
667# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi)
668# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi)
669
670
671
672#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_CLONE
673/*
674 *
675 * Clone another instance of the type.
676 *
677 */
678# define RTASN1TMPL_BEGIN_COMMON() \
679RTASN1TMPL_DECL(int) RT_CONCAT(RTASN1TMPL_EXT_NAME,_Clone)(RT_CONCAT(P,RTASN1TMPL_TYPE) pThis, \
680 RT_CONCAT(PC,RTASN1TMPL_TYPE) pSrc, \
681 PCRTASN1ALLOCATORVTABLE pAllocator) \
682{ \
683 RT_ZERO(*pThis); \
684 if (!RT_CONCAT(RTASN1TMPL_EXT_NAME,_IsPresent)(pSrc)) \
685 return VINF_SUCCESS; \
686
687# define RTASN1TMPL_END_COMMON() \
688 return rc; \
689} RTASN1TMPL_SEMICOLON_DUMMY()
690
691# define RTASN1TMPL_BEGIN_SEQCORE() \
692 RTASN1TMPL_BEGIN_COMMON(); \
693 int rc = RTAsn1SequenceCore_Clone(&pThis->SeqCore, &RT_CONCAT3(g_, RTASN1TMPL_INT_NAME, _Vtable), &pSrc->SeqCore)
694# define RTASN1TMPL_BEGIN_SETCORE() \
695 RTASN1TMPL_BEGIN_COMMON(); \
696 int rc = RTAsn1SetCore_Clone(&pThis->SetCore, &RT_CONCAT3(g_, RTASN1TMPL_INT_NAME, _Vtable), &pSrc->SetCore)
697
698# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) \
699 if (RT_SUCCESS(rc)) \
700 rc = RT_CONCAT(a_Api,_Clone)(&pThis->a_Name, &pSrc->a_Name, pAllocator); \
701
702# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) \
703 if (RT_SUCCESS(rc)) \
704 { \
705 RTAsn1MemInitAllocation(&pThis->Allocation, pAllocator); \
706 pThis->a_enmMembNm = pSrc->a_enmMembNm; \
707 switch (pSrc->a_enmMembNm) \
708 { \
709 default: rc = VERR_INTERNAL_ERROR_3; break
710# define RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, a_IfStmt) \
711 case a_enmValue: \
712 rc = RTAsn1MemAllocZ(&pThis->a_Allocation, (void **)&pThis->a_UnionNm.a_PtrName, \
713 sizeof(*pThis->a_UnionNm.a_PtrName)); \
714 if (RT_SUCCESS(rc)) \
715 rc = RT_CONCAT(a_Api,_Clone)(pThis->a_UnionNm.a_PtrName, pSrc->a_UnionNm.a_PtrName, pAllocator); \
716 break
717# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) \
718 case RT_CONCAT(a_enmType,_NOT_PRESENT): break; \
719 } \
720 }
721
722/* Optional members and members with defaults are the same as a normal member when cloning. */
723# define RTASN1TMPL_MEMBER_OPT_UTF8_STRING_EX(a_Name, a_Constraints) \
724 RTASN1TMPL_MEMBER_OPT_EX(a_Name, RTASN1STRING, RTAsn1Utf8String, a_Constraints RT_NOTHING)
725# define RTASN1TMPL_MEMBER_OPT_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, a_Constraints) \
726 if (RTASN1CORE_IS_PRESENT(&pSrc->a_TnNm.a_CtxTagN.Asn1Core) && RT_SUCCESS(rc)) \
727 { \
728 rc = RT_CONCAT3(RTAsn1ContextTag,a_uTag,_Clone)(&pThis->a_TnNm.a_CtxTagN, &pSrc->a_TnNm.a_CtxTagN); \
729 if (RT_SUCCESS(rc)) \
730 rc = RT_CONCAT(a_Api,_Clone)(&pThis->a_TnNm.a_Name, &pSrc->a_TnNm.a_Name, pAllocator); \
731 } do { } while (0)
732
733# define RTASN1TMPL_END_SEQCORE() \
734 if (RT_FAILURE(rc)) \
735 RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(pThis); \
736 RTASN1TMPL_END_COMMON()
737# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_END_SEQCORE()
738
739
740# define RTASN1TMPL_BEGIN_PCHOICE() \
741 RTASN1TMPL_BEGIN_COMMON(); \
742 RTAsn1Dummy_InitEx(&pThis->Dummy); \
743 RTAsn1MemInitAllocation(&pThis->Allocation, pAllocator); \
744 int rc; \
745 pThis->enmChoice = pSrc->enmChoice; \
746 switch (pSrc->enmChoice) \
747 { \
748 default: rc = VERR_INTERNAL_ERROR_3; break
749# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
750 case a_enmChoice: \
751 rc = RTAsn1MemAllocZ(&pThis->Allocation, (void **)&pThis->a_PtrName, sizeof(*pThis->a_PtrName)); \
752 if (RT_SUCCESS(rc)) \
753 rc = RT_CONCAT(a_Api,_Clone)(pThis->a_PtrName, pSrc->a_PtrName, pAllocator); break
754# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
755 case a_enmChoice: /* A bit of presence paranoia here, but better safe than sorry... */ \
756 rc = RTAsn1MemAllocZ(&pThis->Allocation, (void **)&pThis->a_PtrTnNm, sizeof(*pThis->a_PtrTnNm)); \
757 if (RT_SUCCESS(rc) && RTASN1CORE_IS_PRESENT(&pSrc->a_PtrTnNm->a_CtxTagN.Asn1Core)) \
758 { \
759 RT_CONCAT3(RTAsn1ContextTag,a_uTag,_Clone)(&pThis->a_PtrTnNm->a_CtxTagN, &pSrc->a_PtrTnNm->a_CtxTagN); \
760 rc = RT_CONCAT(a_Api,_Clone)(&pThis->a_PtrTnNm->a_Name, &pSrc->a_PtrTnNm->a_Name, pAllocator); \
761 } \
762 break
763#define RTASN1TMPL_END_PCHOICE() \
764 } \
765 if (RT_FAILURE(rc)) \
766 RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(pThis); \
767 RTASN1TMPL_END_COMMON()
768
769
770# define RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi, a_OfApi, a_OfMember) \
771 RTASN1TMPL_BEGIN_COMMON(); \
772 int rc = RT_CONCAT(a_OfApi,_Clone)(&pThis->a_OfMember, &RT_CONCAT3(g_,RTASN1TMPL_INT_NAME,_Vtable), &pSrc->a_OfMember); \
773 if (RT_SUCCESS(rc)) \
774 { \
775 RTAsn1MemInitAllocation(&pThis->Allocation, pAllocator); \
776 uint32_t const cItems = pSrc->cItems; \
777 if (cItems > 0) \
778 { \
779 rc = RTAsn1MemGrowArray(&pThis->Allocation, (void **)&pThis->paItems, sizeof(pThis->paItems[0]), 0, cItems); \
780 if (RT_SUCCESS(rc)) \
781 { \
782 uint32_t i = 0; \
783 while (i < cItems) \
784 { \
785 rc = RT_CONCAT(a_ItemApi,_Clone)(&pThis->paItems[i], &pSrc->paItems[i], pAllocator); \
786 if (RT_SUCCESS(rc)) \
787 pThis->cItems = ++i; \
788 else \
789 { \
790 pThis->cItems = i; \
791 RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(pThis); \
792 return rc; \
793 } \
794 } \
795 } \
796 else \
797 RT_ZERO(*pThis); \
798 } \
799 } \
800 RTASN1TMPL_END_COMMON()
801# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi, RTAsn1SeqOfCore, SeqCore)
802# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi, RTAsn1SetOfCore, SetCore)
803
804# define RTASN1TMPL_EXEC_CLONE(a_Expr) if (RT_SUCCESS(rc)) { a_Expr; }
805
806
807
808#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_SETTERS_1
809/*
810 *
811 * Member setter helpers.
812 *
813 */
814# define RTASN1TMPL_BEGIN_SEQCORE() RTASN1TMPL_SEMICOLON_DUMMY()
815# define RTASN1TMPL_BEGIN_SETCORE() RTASN1TMPL_SEMICOLON_DUMMY()
816#if 1 /** @todo later */
817# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) RTASN1TMPL_SEMICOLON_DUMMY()
818#else
819# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) \
820 RTDECL(int) RT_CONCAT3(RTASN1TMPL_EXT_NAME,_Set,a_Name)(RTASN1TMPL_TYPE *pThis, a_Type const *pValue, \
821 PCRTASN1ALLOCATORVTABLE pAllocator) \
822 { \
823 if (RT_CONCAT(a_Api,_IsPresent)(&pThis->a_Name)) \
824 RT_CONCAT(a_Api,_Delete)(&pThis->a_Name); \
825 return RT_CONCAT(a_Api,_Clone)(&pThis->a_Name, pValue, pAllocator, true /* fResetImplicit */); \
826 } RTASN1TMPL_SEMICOLON_DUMMY()
827#endif
828
829# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
830# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
831# define RTASN1TMPL_END_SEQCORE() RTASN1TMPL_SEMICOLON_DUMMY()
832# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_SEMICOLON_DUMMY()
833
834
835# define RTASN1TMPL_BEGIN_PCHOICE() RTASN1TMPL_SEMICOLON_DUMMY()
836# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) RTASN1TMPL_SEMICOLON_DUMMY()
837# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) RTASN1TMPL_SEMICOLON_DUMMY()
838# define RTASN1TMPL_END_PCHOICE() RTASN1TMPL_SEMICOLON_DUMMY()
839
840
841# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SEMICOLON_DUMMY()
842# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SEMICOLON_DUMMY()
843
844
845
846#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_SETTERS_2
847/*
848 *
849 * Member setters.
850 *
851 */
852# define RTASN1TMPL_BEGIN_SEQCORE() RTASN1TMPL_SEMICOLON_DUMMY()
853# define RTASN1TMPL_BEGIN_SETCORE() RTASN1TMPL_SEMICOLON_DUMMY()
854# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) RTASN1TMPL_SEMICOLON_DUMMY()
855# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
856# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) RTASN1TMPL_SEMICOLON_DUMMY()
857# define RTASN1TMPL_END_SEQCORE() RTASN1TMPL_SEMICOLON_DUMMY()
858# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_SEMICOLON_DUMMY()
859
860
861# define RTASN1TMPL_BEGIN_PCHOICE() RTASN1TMPL_SEMICOLON_DUMMY()
862
863# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
864RTASN1TMPL_DECL(int) RT_CONCAT3(RTASN1TMPL_EXT_NAME,_Set,a_Name)(RT_CONCAT(P,RTASN1TMPL_TYPE) pThis, RT_CONCAT(PC,a_Type) pSrc,\
865 PCRTASN1ALLOCATORVTABLE pAllocator) \
866{ \
867 AssertPtr(pSrc); AssertPtr(pThis); \
868 RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(pThis); /* See _Init. */ \
869 RTAsn1Dummy_InitEx(&pThis->Dummy); \
870 RTAsn1MemInitAllocation(&pThis->Allocation, pAllocator); \
871 pThis->enmChoice = a_enmChoice; \
872 int rc = RTAsn1MemAllocZ(&pThis->Allocation, (void **)&pThis->a_PtrName, sizeof(*pThis->a_PtrName)); \
873 if (RT_SUCCESS(rc)) \
874 { \
875 rc = RT_CONCAT(a_Api,_Clone)(pThis->a_PtrName, pSrc, pAllocator); \
876 if (RT_SUCCESS(rc)) \
877 { \
878 RTAsn1Core_ResetImplict(RT_CONCAT(a_Api,_GetAsn1Core)(pThis->a_PtrName)); \
879 rc = RTAsn1Core_SetTagAndFlags(RT_CONCAT(a_Api,_GetAsn1Core)(pThis->a_PtrName), \
880 a_uTag, RTASN1TMPL_ITAG_F_EXPAND(a_fClue)); \
881 } \
882 } \
883 return rc; \
884} RTASN1TMPL_SEMICOLON_DUMMY()
885
886# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
887RTASN1TMPL_DECL(int) RT_CONCAT3(RTASN1TMPL_EXT_NAME,_Set,a_Name)(RT_CONCAT(P,RTASN1TMPL_TYPE) pThis, RT_CONCAT(PC,a_Type) pSrc,\
888 PCRTASN1ALLOCATORVTABLE pAllocator) \
889{ \
890 AssertPtr(pThis); AssertPtr(pSrc); Assert(RT_CONCAT(a_Api,_IsPresent)(pSrc)); \
891 RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(pThis); /* See _Init. */ \
892 RTAsn1Dummy_InitEx(&pThis->Dummy); \
893 RTAsn1MemInitAllocation(&pThis->Allocation, pAllocator); \
894 pThis->enmChoice = a_enmChoice; \
895 int rc = RTAsn1MemAllocZ(&pThis->Allocation, (void **)&pThis->a_PtrTnNm, sizeof(*pThis->a_PtrTnNm)); \
896 if (RT_SUCCESS(rc)) \
897 { \
898 rc = RT_CONCAT3(RTAsn1ContextTag,a_uTag,_Init)(&pThis->a_PtrTnNm->a_CtxTagN, \
899 &RT_CONCAT5(g_,RTASN1TMPL_INT_NAME,_PCHOICE_XTAG_,a_Name,_Vtable), \
900 pAllocator); \
901 if (RT_SUCCESS(rc)) \
902 { \
903 rc = RT_CONCAT(a_Api,_Clone)(&pThis->a_PtrTnNm->a_Name, pSrc, pAllocator); \
904 if (RT_SUCCESS(rc)) \
905 RTAsn1Core_ResetImplict(RT_CONCAT(a_Api,_GetAsn1Core)(&pThis->a_PtrTnNm->a_Name)); \
906 } \
907 } \
908 return rc; \
909} RTASN1TMPL_SEMICOLON_DUMMY()
910
911#define RTASN1TMPL_END_PCHOICE() RTASN1TMPL_SEMICOLON_DUMMY()
912
913
914# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SEMICOLON_DUMMY()
915# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SEMICOLON_DUMMY()
916
917
918#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_COMPARE
919/*
920 *
921 * Compare two instances of the type.
922 *
923 */
924# define RTASN1TMPL_BEGIN_COMMON() \
925RTASN1TMPL_DECL(int) RT_CONCAT(RTASN1TMPL_EXT_NAME,_Compare)(RT_CONCAT(PC,RTASN1TMPL_TYPE) pLeft, \
926 RT_CONCAT(PC,RTASN1TMPL_TYPE) pRight) \
927{ \
928 if (!RT_CONCAT(RTASN1TMPL_EXT_NAME,_IsPresent)(pLeft)) \
929 return 0 - (int)RT_CONCAT(RTASN1TMPL_EXT_NAME,_IsPresent)(pRight); \
930 if (!RT_CONCAT(RTASN1TMPL_EXT_NAME,_IsPresent)(pRight)) \
931 return -1; \
932 int iDiff = 0
933
934# define RTASN1TMPL_END_COMMON() \
935 return iDiff; \
936} RTASN1TMPL_SEMICOLON_DUMMY()
937
938# define RTASN1TMPL_BEGIN_SEQCORE() RTASN1TMPL_BEGIN_COMMON()
939# define RTASN1TMPL_BEGIN_SETCORE() RTASN1TMPL_BEGIN_COMMON()
940# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) \
941 if (!iDiff) \
942 iDiff = RT_CONCAT(a_Api,_Compare)(&pLeft->a_Name, &pRight->a_Name)
943# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) \
944 if (!iDiff && pLeft->a_enmMembNm != pRight->a_enmMembNm) \
945 iDiff = pLeft->a_enmMembNm < pRight->a_enmMembNm ? -1 : 1; \
946 else if (!iDiff) \
947 switch (pLeft->a_enmMembNm) \
948 { \
949 default: break
950# define RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, a_IfStmt) \
951 case a_enmValue: iDiff = RT_CONCAT(a_Api,_Compare)(pLeft->a_UnionNm.a_PtrName, pRight->a_UnionNm.a_PtrName); break
952# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) \
953 case RT_CONCAT(a_enmType,_NOT_PRESENT): break; \
954 }
955# define RTASN1TMPL_MEMBER_OPT_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, a_Constraints) \
956 if (!iDiff) \
957 { \
958 if (RTASN1CORE_IS_PRESENT(&pLeft->a_TnNm.a_CtxTagN.Asn1Core)) \
959 { \
960 if (RTASN1CORE_IS_PRESENT(&pRight->a_TnNm.a_CtxTagN.Asn1Core)) \
961 iDiff = RT_CONCAT(a_Api,_Compare)(&pLeft->a_TnNm.a_Name, &pRight->a_TnNm.a_Name); \
962 else \
963 iDiff = -1; \
964 } \
965 else \
966 iDiff = 0 - (int)RTASN1CORE_IS_PRESENT(&pRight->a_TnNm.a_CtxTagN.Asn1Core); \
967 } do { } while (0)
968# define RTASN1TMPL_END_SEQCORE() RTASN1TMPL_END_COMMON()
969# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_END_COMMON()
970
971# define RTASN1TMPL_BEGIN_PCHOICE() \
972 RTASN1TMPL_BEGIN_COMMON(); \
973 if (pLeft->enmChoice != pRight->enmChoice) \
974 return pLeft->enmChoice < pRight->enmChoice ? -1 : 1; \
975 switch (pLeft->enmChoice) \
976 { \
977 default: break
978# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
979 case a_enmChoice: iDiff = RT_CONCAT(a_Api,_Compare)(pLeft->a_PtrName, pRight->a_PtrName); break
980# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
981 case a_enmChoice: iDiff = RT_CONCAT(a_Api,_Compare)(&pLeft->a_PtrTnNm->a_Name, &pRight->a_PtrTnNm->a_Name); break
982#define RTASN1TMPL_END_PCHOICE() \
983 } \
984 RTASN1TMPL_END_COMMON()
985
986
987# define RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi) \
988 RTASN1TMPL_BEGIN_COMMON(); \
989 uint32_t cItems = pLeft->cItems; \
990 if (cItems == pRight->cItems) \
991 for (uint32_t i = 0; iDiff == 0 && i < cItems; i++) \
992 iDiff = RT_CONCAT(a_ItemApi,_Compare)(&pLeft->paItems[i], &pRight->paItems[i]); \
993 else \
994 iDiff = cItems < pRight->cItems ? -1 : 1; \
995 RTASN1TMPL_END_COMMON()
996# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi)
997# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi)
998
999
1000
1001#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_CHECK_SANITY
1002/*
1003 *
1004 * Checks the sanity of the type.
1005 *
1006 */
1007# ifndef RTASN1TMPL_SANITY_CHECK_EXPR
1008# define RTASN1TMPL_SANITY_CHECK_EXPR() VINF_SUCCESS
1009# endif
1010# define RTASN1TMPL_BEGIN_COMMON() \
1011RTASN1TMPL_DECL(int) RT_CONCAT(RTASN1TMPL_EXT_NAME,_CheckSanity)(RT_CONCAT(PC,RTASN1TMPL_TYPE) pThis, uint32_t fFlags, \
1012 PRTERRINFO pErrInfo, const char *pszErrorTag) \
1013{ \
1014 if (RT_LIKELY(RT_CONCAT(RTASN1TMPL_EXT_NAME,_IsPresent)(pThis))) \
1015 { /* likely */ } \
1016 else \
1017 return RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, "%s: Missing (%s).", pszErrorTag, RT_XSTR(RTASN1TMPL_TYPE)); \
1018 int rc = VINF_SUCCESS
1019
1020# define RTASN1TMPL_END_COMMON() \
1021 if (RT_SUCCESS(rc)) \
1022 rc = (RTASN1TMPL_SANITY_CHECK_EXPR()); \
1023 return rc; \
1024} RTASN1TMPL_SEMICOLON_DUMMY()
1025
1026# define RTASN1TMPL_BEGIN_SEQCORE() RTASN1TMPL_BEGIN_COMMON()
1027# define RTASN1TMPL_BEGIN_SETCORE() RTASN1TMPL_BEGIN_COMMON()
1028# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) \
1029 if (RT_SUCCESS(rc)) \
1030 { \
1031 if (RT_LIKELY(RT_CONCAT(a_Api,_IsPresent)(&pThis->a_Name))) \
1032 { \
1033 rc = RT_CONCAT(a_Api,_CheckSanity)(&pThis->a_Name, fFlags & RTASN1_CHECK_SANITY_F_COMMON_MASK, \
1034 pErrInfo, RT_XSTR(RTASN1TMPL_TYPE) "::" #a_Name); \
1035 { a_Constraints } \
1036 } \
1037 else \
1038 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, "%s: Missing member %s (%s).", \
1039 pszErrorTag, #a_Name, RT_XSTR(RTASN1TMPL_TYPE)); \
1040 } do {} while (0)
1041# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) \
1042 if (RT_SUCCESS(rc)) \
1043 switch (pThis->a_enmMembNm) \
1044 { \
1045 default: \
1046 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, \
1047 "%s: Invalid " #a_enmMembNm " value: %d", pszErrorTag, pThis->a_enmMembNm); \
1048 break
1049# define RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, a_IfStmt) \
1050 case a_enmValue: \
1051 rc = RT_CONCAT(a_Api,_CheckSanity)(pThis->a_UnionNm.a_PtrName, fFlags & RTASN1_CHECK_SANITY_F_COMMON_MASK, \
1052 pErrInfo, RT_XSTR(RTASN1TMPL_TYPE) "::" #a_UnionNm "." #a_PtrName); \
1053 break
1054# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) \
1055 case RT_CONCAT(a_enmType,_NOT_PRESENT): \
1056 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, \
1057 "%s: Invalid " #a_enmMembNm " value: " #a_enmType "_NOT_PRESENT", pszErrorTag); \
1058 break; \
1059 }
1060# define RTASN1TMPL_MEMBER_OPT_EX(a_Name, a_Type, a_Api, a_Constraints) \
1061 if (RT_SUCCESS(rc) && RT_CONCAT(a_Api,_IsPresent)(&pThis->a_Name)) \
1062 { \
1063 rc = RT_CONCAT(a_Api,_CheckSanity)(&pThis->a_Name, fFlags & RTASN1_CHECK_SANITY_F_COMMON_MASK, \
1064 pErrInfo, RT_XSTR(RTASN1TMPL_TYPE) "::" #a_Name); \
1065 { a_Constraints } \
1066 }
1067# define RTASN1TMPL_MEMBER_OPT_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, a_Constraints) \
1068 if (RT_SUCCESS(rc)) \
1069 { \
1070 bool const fOuterPresent = RTASN1CORE_IS_PRESENT(&pThis->a_TnNm.a_CtxTagN.Asn1Core); \
1071 bool const fInnerPresent = RT_CONCAT(a_Api,_IsPresent)(&pThis->a_TnNm.a_Name); \
1072 if (fOuterPresent && fInnerPresent) \
1073 { \
1074 rc = RT_CONCAT(a_Api,_CheckSanity)(&pThis->a_TnNm.a_Name, fFlags & RTASN1_CHECK_SANITY_F_COMMON_MASK, \
1075 pErrInfo, RT_XSTR(RTASN1TMPL_TYPE) "::" #a_Name); \
1076 { a_Constraints } \
1077 } \
1078 else if (RT_LIKELY(RTASN1CORE_IS_PRESENT(&pThis->a_TnNm.a_CtxTagN.Asn1Core) == fInnerPresent)) \
1079 { /* likely */ } \
1080 else \
1081 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, \
1082 "%s::" #a_TnNm "." #a_Name ": Explict tag precense mixup; " #a_CtxTagN "=%d " #a_Name "=%d.", \
1083 pszErrorTag, fOuterPresent, fInnerPresent); \
1084 } do { } while (0)
1085# define RTASN1TMPL_END_SEQCORE() RTASN1TMPL_END_COMMON()
1086# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_END_COMMON()
1087
1088
1089# define RTASN1TMPL_BEGIN_PCHOICE() \
1090 RTASN1TMPL_BEGIN_COMMON(); \
1091 switch (pThis->enmChoice) \
1092 { \
1093 default: \
1094 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, \
1095 "%s: Invalid enmChoice value: %d", pszErrorTag, pThis->enmChoice); \
1096 break
1097# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
1098 case a_enmChoice: \
1099 if (pThis->a_PtrName && RT_CONCAT(a_Api,_IsPresent)(pThis->a_PtrName)) \
1100 { \
1101 PCRTASN1CORE pCore = RT_CONCAT(a_Api,_GetAsn1Core)(pThis->a_PtrName); \
1102 if (pCore->uTag == a_uTag && pCore->fClass == RTASN1TMPL_ITAG_F_EXPAND(a_fClue)) \
1103 { \
1104 rc = RT_CONCAT(a_Api,_CheckSanity)(pThis->a_PtrName, fFlags & RTASN1_CHECK_SANITY_F_COMMON_MASK, \
1105 pErrInfo, RT_XSTR(RTASN1TMPL_TYPE) "::" #a_Name); \
1106 { a_Constraints } \
1107 } \
1108 else \
1109 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, \
1110 "%s::" #a_Name ": Tag/class mismatch: expected %#x/%#x, actual %#x/%x.", \
1111 pszErrorTag, a_uTag, RTASN1TMPL_ITAG_F_EXPAND(a_fClue), pCore->uTag, pCore->fClass); \
1112 } \
1113 else \
1114 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, "%s::" #a_Name ": Not present.", pszErrorTag); \
1115 break
1116# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
1117 case a_enmChoice: \
1118 if ( pThis->a_PtrTnNm \
1119 && RTASN1CORE_IS_PRESENT(&(pThis->a_PtrTnNm->a_CtxTagN.Asn1Core)) \
1120 && RT_CONCAT(a_Api,_IsPresent)(&pThis->a_PtrTnNm->a_Name) ) \
1121 { \
1122 rc = RT_CONCAT(a_Api,_CheckSanity)(&pThis->a_PtrTnNm->a_Name, fFlags & RTASN1_CHECK_SANITY_F_COMMON_MASK, \
1123 pErrInfo, RT_XSTR(RTASN1TMPL_TYPE) "::" #a_Name); \
1124 { a_Constraints } \
1125 } \
1126 else \
1127 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, "%s::" #a_Name ": Not present.", pszErrorTag); \
1128 break
1129#define RTASN1TMPL_END_PCHOICE() \
1130 } \
1131 RTASN1TMPL_END_COMMON()
1132
1133
1134# define RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi) \
1135 RTASN1TMPL_BEGIN_COMMON(); \
1136 for (uint32_t i = 0; RT_SUCCESS(rc) && i < pThis->cItems; i++) \
1137 rc = RT_CONCAT(a_ItemApi,_CheckSanity)(&pThis->paItems[i], fFlags & RTASN1_CHECK_SANITY_F_COMMON_MASK, \
1138 pErrInfo, RT_XSTR(RTASN1TMPL_TYPE) "::paItems[#]"); \
1139 if (RT_SUCCESS(rc)) { RTASN1TMPL_SET_SEQ_EXEC_CHECK_SANITY(); } \
1140 RTASN1TMPL_END_COMMON()
1141# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi)
1142# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi)
1143
1144/* The constraints. */
1145# define RTASN1TMPL_MEMBER_CONSTR_MIN_MAX(a_Name, a_Type, a_Api, cbMin, cbMax, a_MoreConstraints) \
1146 if (RT_SUCCESS(rc) && ((cbMin) != 0 || (cbMax) != UINT32_MAX)) \
1147 { \
1148 PCRTASN1CORE pCore = RT_CONCAT(a_Api,_GetAsn1Core)(&pThis->a_Name); \
1149 if (RT_LIKELY(pCore->cb >= (cbMin) && pCore->cb <= (cbMax))) \
1150 { /* likely */ } \
1151 else \
1152 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, \
1153 "%s::" #a_Name ": Content size is out of range: %#x not in {%#x..%#x}", \
1154 pszErrorTag, pCore->cb, cbMin, cbMax); \
1155 } \
1156 { a_MoreConstraints }
1157
1158# define RTASN1TMPL_MEMBER_CONSTR_BITSTRING_MIN_MAX(a_Name, cMinBits, cMaxBits, a_MoreConstraints) \
1159 if (RT_SUCCESS(rc) && ((cMinBits) != 0 || (cMaxBits) != UINT32_MAX)) \
1160 { \
1161 if (RT_LIKELY( ((cMinBits) == 0 ? true : pThis->a_Name.cBits + 1U >= (cMinBits) + 1U /* warning avoiding */) \
1162 && ((cMaxBits) == UINT32_MAX ? true : pThis->a_Name.cBits + 1U <= (cMaxBits) + 1U /* ditto */) ) ) \
1163 { /* likely */ } \
1164 else \
1165 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, \
1166 "%s::" #a_Name ": Bit size is out of range: %#x not in {%#x..%#x}", \
1167 pszErrorTag, pThis->a_Name.cBits, cMinBits, cMaxBits); \
1168 } \
1169 { a_MoreConstraints }
1170
1171# define RTASN1TMPL_MEMBER_CONSTR_U64_MIN_MAX(a_Name, uMin, uMax, a_MoreConstraints) \
1172 if (RT_SUCCESS(rc)) \
1173 { \
1174 if (RT_LIKELY( RTAsn1Integer_UnsignedCompareWithU64(&pThis->a_Name, uMin) >= 0 \
1175 && RTAsn1Integer_UnsignedCompareWithU64(&pThis->a_Name, uMax) <= 0) ) \
1176 { /* likely */ } \
1177 else \
1178 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, \
1179 "%s::" #a_Name ": Out of range: %#x not in {%#llx..%#llx}", \
1180 pszErrorTag, pThis->a_Name.Asn1Core.cb > 8 ? UINT64_MAX : pThis->a_Name.uValue.u, \
1181 (uint64_t)(uMin), (uint64_t)(uMax)); \
1182 } \
1183 { a_MoreConstraints }
1184
1185# define RTASN1TMPL_MEMBER_CONSTR_PRESENT(a_Name, a_Api, a_MoreConstraints) \
1186 if (RT_SUCCESS(rc)) \
1187 { \
1188 if (RT_LIKELY(RT_CONCAT(a_Api,_IsPresent)(&pThis->a_Name))) \
1189 { /* likely */ } \
1190 else \
1191 rc = RTErrInfoSetF(pErrInfo, VERR_GENERAL_FAILURE, "%s::" #a_Name ": Missing.", pszErrorTag); \
1192 } \
1193 { a_MoreConstraints }
1194
1195
1196
1197# define RTASN1TMPL_EXEC_CHECK_SANITY(a_Expr) if (RT_SUCCESS(rc)) { a_Expr; }
1198
1199
1200#elif RTASN1TMPL_PASS == RTASN1TMPL_PASS_DELETE
1201/*
1202 *
1203 * Delete wrappers.
1204 *
1205 */
1206# define RTASN1TMPL_BEGIN_COMMON() \
1207RTASN1TMPL_DECL(void) RT_CONCAT(RTASN1TMPL_EXT_NAME,_Delete)(RT_CONCAT(P,RTASN1TMPL_TYPE) pThis) \
1208{ \
1209 if (RT_CONCAT(RTASN1TMPL_EXT_NAME,_IsPresent)(pThis)) \
1210 { do { } while (0)
1211
1212# define RTASN1TMPL_END_COMMON() \
1213 } \
1214 RT_ZERO(*pThis); \
1215} RTASN1TMPL_SEMICOLON_DUMMY()
1216
1217# define RTASN1TMPL_BEGIN_SEQCORE() RTASN1TMPL_BEGIN_COMMON()
1218# define RTASN1TMPL_BEGIN_SETCORE() RTASN1TMPL_BEGIN_COMMON()
1219# define RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints) RT_CONCAT(a_Api,_Delete)(&pThis->a_Name)
1220# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) \
1221 switch (pThis->a_enmMembNm) \
1222 { \
1223 default: break
1224# define RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, a_IfStmt) \
1225 case a_enmValue: \
1226 if (pThis->a_UnionNm.a_PtrName) \
1227 { \
1228 RT_CONCAT(a_Api,_Delete)(pThis->a_UnionNm.a_PtrName); \
1229 RTAsn1MemFree(&pThis->Allocation, pThis->a_UnionNm.a_PtrName); \
1230 pThis->a_UnionNm.a_PtrName = NULL; \
1231 } \
1232 break
1233# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) \
1234 }
1235# define RTASN1TMPL_END_SEQCORE() RTASN1TMPL_END_COMMON()
1236# define RTASN1TMPL_END_SETCORE() RTASN1TMPL_END_COMMON()
1237
1238
1239# define RTASN1TMPL_BEGIN_PCHOICE() \
1240 RTASN1TMPL_BEGIN_COMMON(); \
1241 switch (pThis->enmChoice) \
1242 { \
1243 default: break
1244# define RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, a_fClue, a_Constraints) \
1245 case a_enmChoice: \
1246 if (pThis->a_PtrName) \
1247 { \
1248 RT_CONCAT(a_Api,_Delete)(pThis->a_PtrName); \
1249 RTAsn1MemFree(&pThis->Allocation, pThis->a_PtrName); \
1250 pThis->a_PtrName = NULL; \
1251 } \
1252 break
1253# define RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_Constraints) \
1254 case a_enmChoice: \
1255 if (pThis->a_PtrTnNm) \
1256 { \
1257 RT_CONCAT(a_Api,_Delete)(&pThis->a_PtrTnNm->a_Name); \
1258 RTAsn1MemFree(&pThis->Allocation, pThis->a_PtrTnNm); \
1259 pThis->a_PtrTnNm = NULL; \
1260 } \
1261 break
1262# define RTASN1TMPL_END_PCHOICE() \
1263 } \
1264 RTASN1TMPL_END_COMMON()
1265
1266
1267# define RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi) \
1268 RTASN1TMPL_BEGIN_COMMON(); \
1269 uint32_t i = pThis->cItems; \
1270 while (i-- > 0) \
1271 RT_CONCAT(a_ItemApi,_Delete)(&pThis->paItems[i]); \
1272 RTAsn1MemFree(&pThis->Allocation, pThis->paItems); \
1273 pThis->paItems = NULL; \
1274 RTASN1TMPL_END_COMMON()
1275# define RTASN1TMPL_SEQ_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi)
1276# define RTASN1TMPL_SET_OF(a_ItemType, a_ItemApi) RTASN1TMPL_SET_SEQ_OF_COMMON(a_ItemType, a_ItemApi)
1277
1278
1279#else
1280# error "Invalid/missing RTASN1TMPL_PASS value."
1281#endif
1282
1283
1284
1285/*
1286 * Default aliases for simplified versions of macros if no specialization
1287 * was required above.
1288 */
1289/* Non-optional members. */
1290#ifndef RTASN1TMPL_MEMBER
1291# define RTASN1TMPL_MEMBER(a_Name, a_Type, a_Api) \
1292 RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, RT_NOTHING)
1293#endif
1294
1295#ifndef RTASN1TMPL_MEMBER_UTF8_STRING_MIN_MAX
1296# define RTASN1TMPL_MEMBER_UTF8_STRING_MIN_MAX(a_Name) \
1297 RTASN1TMPL_MEMBER(a_Name, RTASN1STRING, RTAsn1String)
1298#endif
1299#ifndef RTASN1TMPL_MEMBER_UTF8_STRING
1300# define RTASN1TMPL_MEMBER_UTF8_STRING(a_Name) \
1301 RTASN1TMPL_MEMBER_UTF8_STRING_MIN_MAX(a_Name, 0, UINT32_MAX)
1302#endif
1303
1304#ifndef RTASN1TMPL_MEMBER_STRING_MIN_MAX
1305# define RTASN1TMPL_MEMBER_STRING_MIN_MAX(a_Name, a_cbMin, a_cbMax) \
1306 RTASN1TMPL_MEMBER(a_Name, RTASN1STRING, RTAsn1String)
1307#endif
1308#ifndef RTASN1TMPL_MEMBER_STRING
1309# define RTASN1TMPL_MEMBER_STRING(a_Name) \
1310 RTASN1TMPL_MEMBER_STRING_MIN_MAX(a_Name, 0, UINT32_MAX)
1311#endif
1312#ifndef RTASN1TMPL_MEMBER_XTAG_EX
1313# define RTASN1TMPL_MEMBER_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, a_Constraints) \
1314 RTASN1TMPL_MEMBER_EX(a_TnNm.a_Name, a_Type, a_Api, a_Constraints RT_NOTHING)
1315#endif
1316
1317/* Any/dynamic members. */
1318#ifndef RTASN1TMPL_MEMBER_DYN_BEGIN
1319# define RTASN1TMPL_MEMBER_DYN_BEGIN(a_enmType, a_enmMembNm, a_Allocation) do { } while (0)
1320#endif
1321#ifndef RTASN1TMPL_MEMBER_DYN_END
1322# define RTASN1TMPL_MEMBER_DYN_END(a_enmType, a_enmMembNm, a_Allocation) do { } while (0)
1323#endif
1324#ifndef RTASN1TMPL_MEMBER_DYN_COMMON
1325# define RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, a_IfStmt) \
1326 RTASN1TMPL_MEMBER(a_UnionNm.a_PtrName, a_Type, a_Api)
1327#endif
1328#ifndef RTASN1TMPL_MEMBER_DYN
1329# define RTASN1TMPL_MEMBER_DYN(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, a_WhenExpr) \
1330 RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, if (a_WhenExpr))
1331#endif
1332#ifndef RTASN1TMPL_MEMBER_DYN_DEFAULT
1333# define RTASN1TMPL_MEMBER_DYN_DEFAULT(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue) \
1334 RTASN1TMPL_MEMBER_DYN_COMMON(a_UnionNm, a_PtrName, a_Type, a_Api, a_Allocation, a_enmMembNm, a_enmValue, RT_NOTHING)
1335#endif
1336
1337/* Optional members. */
1338#ifndef RTASN1TMPL_MEMBER_OPT_EX
1339# define RTASN1TMPL_MEMBER_OPT_EX(a_Name, a_Type, a_Api, a_Constraints) \
1340 RTASN1TMPL_MEMBER_EX(a_Name, a_Type, a_Api, a_Constraints RT_NOTHING)
1341#endif
1342#ifndef RTASN1TMPL_MEMBER_OPT
1343# define RTASN1TMPL_MEMBER_OPT(a_Name, a_Type, a_Api) \
1344 RTASN1TMPL_MEMBER_OPT_EX(a_Name, a_Type, a_Api, RT_NOTHING)
1345#endif
1346
1347#ifndef RTASN1TMPL_MEMBER_OPT_XTAG_EX
1348# define RTASN1TMPL_MEMBER_OPT_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, a_Constraints) \
1349 RTASN1TMPL_MEMBER_OPT_EX(a_TnNm.a_Name, a_Type, a_Api, a_Constraints RT_NOTHING)
1350#endif
1351#ifndef RTASN1TMPL_MEMBER_OPT_XTAG
1352# define RTASN1TMPL_MEMBER_OPT_XTAG(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag) \
1353 RTASN1TMPL_MEMBER_OPT_XTAG_EX(a_TnNm, a_CtxTagN, a_Name, a_Type, a_Api, a_uTag, RT_NOTHING)
1354#endif
1355
1356#ifndef RTASN1TMPL_MEMBER_OPT_ITAG_EX
1357# define RTASN1TMPL_MEMBER_OPT_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, a_fClue, a_Constraints) \
1358 RTASN1TMPL_MEMBER_OPT_EX(a_Name, a_Type, a_Api, a_Constraints RT_NOTHING)
1359#endif
1360#ifndef RTASN1TMPL_MEMBER_OPT_ITAG_UP
1361# define RTASN1TMPL_MEMBER_OPT_ITAG_UP(a_Name, a_Type, a_Api, a_uTag) \
1362 RTASN1TMPL_MEMBER_OPT_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, RTASN1TMPL_ITAG_F_UP, RT_NOTHING)
1363#endif
1364#ifndef RTASN1TMPL_MEMBER_OPT_ITAG_UC
1365# define RTASN1TMPL_MEMBER_OPT_ITAG_UC(a_Name, a_Type, a_Api, a_uTag) \
1366 RTASN1TMPL_MEMBER_OPT_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, RTASN1TMPL_ITAG_F_UC, RT_NOTHING)
1367#endif
1368#ifndef RTASN1TMPL_MEMBER_OPT_ITAG_CP
1369# define RTASN1TMPL_MEMBER_OPT_ITAG_CP(a_Name, a_Type, a_Api, a_uTag) \
1370 RTASN1TMPL_MEMBER_OPT_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, RTASN1TMPL_ITAG_F_CP, RT_NOTHING)
1371#endif
1372#ifndef RTASN1TMPL_MEMBER_OPT_ITAG
1373# define RTASN1TMPL_MEMBER_OPT_ITAG(a_Name, a_Type, a_Api, a_uTag) \
1374 RTASN1TMPL_MEMBER_OPT_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, RTASN1TMPL_ITAG_F_CC, RT_NOTHING)
1375#endif
1376#ifndef RTASN1TMPL_MEMBER_OPT_ANY
1377# define RTASN1TMPL_MEMBER_OPT_ANY(a_Name, a_Type, a_Api) \
1378 RTASN1TMPL_MEMBER_OPT_EX(a_Name, a_Type, a_Api, RT_NOTHING)
1379#endif
1380
1381#ifndef RTASN1TMPL_MEMBER_DEF_ITAG_EX
1382# define RTASN1TMPL_MEMBER_DEF_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, a_fClue, a_DefVal, a_Constraints) \
1383 RTASN1TMPL_MEMBER_OPT_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, a_fClue, a_Constraints RT_NOTHING)
1384#endif
1385#ifndef RTASN1TMPL_MEMBER_DEF_ITAG_UP
1386# define RTASN1TMPL_MEMBER_DEF_ITAG_UP(a_Name, a_Type, a_Api, a_uTag, a_DefVal) \
1387 RTASN1TMPL_MEMBER_DEF_ITAG_EX(a_Name, a_Type, a_Api, a_uTag, RTASN1TMPL_ITAG_F_UP, a_DefVal, RT_NOTHING)
1388#endif
1389
1390#ifndef RTASN1TMPL_MEMBER_OPT_ITAG_BITSTRING
1391# define RTASN1TMPL_MEMBER_OPT_ITAG_BITSTRING(a_Name, a_cMaxBits, a_uTag) \
1392 RTASN1TMPL_MEMBER_OPT_ITAG_EX(a_Name, RTASN1BITSTRING, RTAsn1BitString, a_uTag, RTASN1TMPL_ITAG_F_CP, \
1393 RTASN1TMPL_MEMBER_CONSTR_BITSTRING_MIN_MAX(a_Name, 0, a_cMaxBits, RT_NOTHING))
1394#endif
1395
1396#ifndef RTASN1TMPL_MEMBER_OPT_UTF8_STRING_EX
1397# define RTASN1TMPL_MEMBER_OPT_UTF8_STRING_EX(a_Name, a_Constraints) \
1398 RTASN1TMPL_MEMBER_OPT_EX(a_Name, RTASN1STRING, RTAsn1String, a_Constraints RT_NOTHING)
1399#endif
1400#ifndef RTASN1TMPL_MEMBER_OPT_UTF8_STRING
1401# define RTASN1TMPL_MEMBER_OPT_UTF8_STRING(a_Name) \
1402 RTASN1TMPL_MEMBER_OPT_UTF8_STRING_EX(a_Name, RT_NOTHING)
1403#endif
1404
1405#ifndef RTASN1TMPL_MEMBER_OPT_STRING_EX
1406# define RTASN1TMPL_MEMBER_OPT_STRING_EX(a_Name, a_Constraints) \
1407 RTASN1TMPL_MEMBER_OPT_EX(a_Name, RTASN1STRING, RTAsn1String, a_Constraints RT_NOTHING)
1408#endif
1409#ifndef RTASN1TMPL_MEMBER_OPT_STRING
1410# define RTASN1TMPL_MEMBER_OPT_STRING(a_Name) \
1411 RTASN1TMPL_MEMBER_OPT_STRING_EX(a_Name, RT_NOTHING)
1412#endif
1413
1414/* Pointer choices. */
1415#ifndef RTASN1TMPL_PCHOICE_ITAG_UP
1416# define RTASN1TMPL_PCHOICE_ITAG_UP(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api) \
1417 RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, RTASN1TMPL_ITAG_F_UP, RT_NOTHING)
1418#endif
1419#ifndef RTASN1TMPL_PCHOICE_ITAG_UC
1420# define RTASN1TMPL_PCHOICE_ITAG_UC(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api) \
1421 RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, RTASN1TMPL_ITAG_F_UC, RT_NOTHING)
1422#endif
1423#ifndef RTASN1TMPL_PCHOICE_ITAG_CP
1424# define RTASN1TMPL_PCHOICE_ITAG_CP(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api) \
1425 RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, RTASN1TMPL_ITAG_F_CP, RT_NOTHING)
1426#endif
1427#ifndef RTASN1TMPL_PCHOICE_ITAG
1428# define RTASN1TMPL_PCHOICE_ITAG(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api) \
1429 RTASN1TMPL_PCHOICE_ITAG_EX(a_uTag, a_enmChoice, a_PtrName, a_Name, a_Type, a_Api, RTASN1TMPL_ITAG_F_CC, RT_NOTHING)
1430#endif
1431
1432#ifndef RTASN1TMPL_PCHOICE_XTAG
1433# define RTASN1TMPL_PCHOICE_XTAG(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api) \
1434 RTASN1TMPL_PCHOICE_XTAG_EX(a_uTag, a_enmChoice, a_PtrTnNm, a_CtxTagN, a_Name, a_Type, a_Api, RT_NOTHING)
1435#endif
1436
1437
1438/*
1439 * Constraints are only used in the sanity check pass, so provide subs for the
1440 * others passes.
1441 */
1442#ifndef RTASN1TMPL_MEMBER_CONSTR_MIN_MAX
1443# define RTASN1TMPL_MEMBER_CONSTR_MIN_MAX(a_Name, a_Type, a_Api, cbMin, cbMax, a_MoreConstraints)
1444#endif
1445#ifndef RTASN1TMPL_MEMBER_CONSTR_BITSTRING_MIN_MAX
1446# define RTASN1TMPL_MEMBER_CONSTR_BITSTRING_MIN_MAX(a_Name, cMinBits, cMaxBits, a_MoreConstraints)
1447#endif
1448#ifndef RTASN1TMPL_MEMBER_CONSTR_U64_MIN_MAX
1449# define RTASN1TMPL_MEMBER_CONSTR_U64_MIN_MAX(a_Name, uMin, uMax, a_MoreConstraints)
1450#endif
1451#ifndef RTASN1TMPL_MEMBER_CONSTR_PRESENT
1452# define RTASN1TMPL_MEMBER_CONSTR_PRESENT(a_Name, a_Api, a_MoreConstraints)
1453#endif
1454
1455
1456/*
1457 * Stub exec hacks.
1458 */
1459#ifndef RTASN1TMPL_EXEC_DECODE
1460# define RTASN1TMPL_EXEC_DECODE(a_Expr) /* no semi colon allowed after this */
1461#endif
1462#ifndef RTASN1TMPL_EXEC_CLONE
1463# define RTASN1TMPL_EXEC_CLONE(a_Expr) /* no semi colon allowed after this */
1464#endif
1465#ifndef RTASN1TMPL_EXEC_CHECK_SANITY
1466# define RTASN1TMPL_EXEC_CHECK_SANITY(a_Expr) /* no semi colon allowed after this */
1467#endif
1468
1469#define RTASN1TMPL_SET_SEQ_EXEC_CHECK_SANITY() do { } while (0)
1470
1471
1472/*
1473 * Generate the requested code.
1474 */
1475#ifndef RTASN1TMPL_TEMPLATE_FILE
1476# error "No template file (RTASN1TMPL_TEMPLATE_FILE) is specified."
1477#endif
1478#include RTASN1TMPL_TEMPLATE_FILE
1479
1480
1481
1482/*
1483 * Undo all the macros.
1484 */
1485#undef RTASN1TMPL_DECL
1486#undef RTASN1TMPL_TYPE
1487#undef RTASN1TMPL_EXT_NAME
1488#undef RTASN1TMPL_INT_NAME
1489
1490#undef RTASN1TMPL_PASS
1491
1492#undef RTASN1TMPL_BEGIN_COMMON
1493#undef RTASN1TMPL_END_COMMON
1494#undef RTASN1TMPL_BEGIN_SEQCORE
1495#undef RTASN1TMPL_BEGIN_SETCORE
1496#undef RTASN1TMPL_MEMBER
1497#undef RTASN1TMPL_MEMBER_EX
1498#undef RTASN1TMPL_MEMBER_DYN_BEGIN
1499#undef RTASN1TMPL_MEMBER_DYN
1500#undef RTASN1TMPL_MEMBER_DYN_DEFAULT
1501#undef RTASN1TMPL_MEMBER_DYN_COMMON
1502#undef RTASN1TMPL_MEMBER_DYN_END
1503#undef RTASN1TMPL_MEMBER_OPT
1504#undef RTASN1TMPL_MEMBER_OPT_EX
1505#undef RTASN1TMPL_MEMBER_OPT_ITAG
1506#undef RTASN1TMPL_MEMBER_OPT_ITAG_EX
1507#undef RTASN1TMPL_MEMBER_OPT_ITAG_CP
1508#undef RTASN1TMPL_MEMBER_OPT_ITAG_UC
1509#undef RTASN1TMPL_MEMBER_OPT_ITAG_UP
1510#undef RTASN1TMPL_MEMBER_OPT_ITAG_BITSTRING
1511#undef RTASN1TMPL_MEMBER_OPT_UTF8_STRING
1512#undef RTASN1TMPL_MEMBER_OPT_UTF8_STRING_EX
1513#undef RTASN1TMPL_MEMBER_OPT_XTAG
1514#undef RTASN1TMPL_MEMBER_OPT_XTAG_EX
1515#undef RTASN1TMPL_MEMBER_OPT_ANY
1516#undef RTASN1TMPL_MEMBER_DEF_ITAG_UP
1517#undef RTASN1TMPL_MEMBER_DEF_ITAG_EX
1518#undef RTASN1TMPL_END_SEQCORE
1519#undef RTASN1TMPL_END_SETCORE
1520
1521#undef RTASN1TMPL_BEGIN_PCHOICE
1522#undef RTASN1TMPL_PCHOICE_ITAG
1523#undef RTASN1TMPL_PCHOICE_ITAG_UP
1524#undef RTASN1TMPL_PCHOICE_ITAG_CP
1525#undef RTASN1TMPL_PCHOICE_ITAG_EX
1526#undef RTASN1TMPL_PCHOICE_XTAG
1527#undef RTASN1TMPL_PCHOICE_XTAG_EX
1528#undef RTASN1TMPL_END_PCHOICE
1529
1530#undef RTASN1TMPL_SET_SEQ_OF_COMMON
1531#undef RTASN1TMPL_SEQ_OF
1532#undef RTASN1TMPL_SET_OF
1533
1534#undef RTASN1TMPL_VTABLE_FN_ENCODE_PREP
1535#undef RTASN1TMPL_VTABLE_FN_ENCODE_WRITE
1536
1537#undef RTASN1TMPL_MEMBER_CONSTR_MIN_MAX
1538#undef RTASN1TMPL_MEMBER_CONSTR_BITSTRING_MIN_MAX
1539#undef RTASN1TMPL_MEMBER_CONSTR_U64_MIN_MAX
1540#undef RTASN1TMPL_MEMBER_CONSTR_PRESENT
1541
1542#undef RTASN1TMPL_SANITY_CHECK_EXPR
1543
1544#undef RTASN1TMPL_EXEC_DECODE
1545#undef RTASN1TMPL_EXEC_CLONE
1546#undef RTASN1TMPL_EXEC_CHECK_SANITY
1547
1548#undef RTASN1TMPL_SET_SEQ_EXEC_CHECK_SANITY
1549
Note: See TracBrowser for help on using the repository browser.

© 2024 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette