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