1/*
2 * Copyright 2017-2018 The OpenSSL Project Authors. All Rights Reserved.
3 *
4 * Licensed under the Apache License 2.0 (the "License"). You may not use
5 * this file except in compliance with the License. You can obtain a copy
6 * in the file LICENSE in the source distribution or at
7 * https://www.openssl.org/source/license.html
8 */
9#include <stdio.h>
10#include "internal/cryptlib.h"
11#include <openssl/conf.h>
12#include <openssl/types.h>
13#include <openssl/asn1.h>
14#include <openssl/asn1t.h>
15
16#include <openssl/x509v3.h>
17
18#include <openssl/safestack.h>
19
20#include "v3_admis.h"
21#include "ext_dat.h"
22
23
24ASN1_SEQUENCE(NAMING_AUTHORITY) = {
25 ASN1_OPT(NAMING_AUTHORITY, namingAuthorityId, ASN1_OBJECT),
26 ASN1_OPT(NAMING_AUTHORITY, namingAuthorityUrl, ASN1_IA5STRING),
27 ASN1_OPT(NAMING_AUTHORITY, namingAuthorityText, DIRECTORYSTRING),
28} ASN1_SEQUENCE_END(NAMING_AUTHORITY)
29
30ASN1_SEQUENCE(PROFESSION_INFO) = {
31 ASN1_EXP_OPT(PROFESSION_INFO, namingAuthority, NAMING_AUTHORITY, 0),
32 ASN1_SEQUENCE_OF(PROFESSION_INFO, professionItems, DIRECTORYSTRING),
33 ASN1_SEQUENCE_OF_OPT(PROFESSION_INFO, professionOIDs, ASN1_OBJECT),
34 ASN1_OPT(PROFESSION_INFO, registrationNumber, ASN1_PRINTABLESTRING),
35 ASN1_OPT(PROFESSION_INFO, addProfessionInfo, ASN1_OCTET_STRING),
36} ASN1_SEQUENCE_END(PROFESSION_INFO)
37
38ASN1_SEQUENCE(ADMISSIONS) = {
39 ASN1_EXP_OPT(ADMISSIONS, admissionAuthority, GENERAL_NAME, 0),
40 ASN1_EXP_OPT(ADMISSIONS, namingAuthority, NAMING_AUTHORITY, 1),
41 ASN1_SEQUENCE_OF(ADMISSIONS, professionInfos, PROFESSION_INFO),
42} ASN1_SEQUENCE_END(ADMISSIONS)
43
44ASN1_SEQUENCE(ADMISSION_SYNTAX) = {
45 ASN1_OPT(ADMISSION_SYNTAX, admissionAuthority, GENERAL_NAME),
46 ASN1_SEQUENCE_OF(ADMISSION_SYNTAX, contentsOfAdmissions, ADMISSIONS),
47} ASN1_SEQUENCE_END(ADMISSION_SYNTAX)
48
49IMPLEMENT_ASN1_FUNCTIONS(NAMING_AUTHORITY)
50IMPLEMENT_ASN1_FUNCTIONS(PROFESSION_INFO)
51IMPLEMENT_ASN1_FUNCTIONS(ADMISSIONS)
52IMPLEMENT_ASN1_FUNCTIONS(ADMISSION_SYNTAX)
53
54static int i2r_ADMISSION_SYNTAX(const struct v3_ext_method *method, void *in,
55 BIO *bp, int ind);
56
57const X509V3_EXT_METHOD v3_ext_admission = {
58 NID_x509ExtAdmission, /* .ext_nid = */
59 0, /* .ext_flags = */
60 ASN1_ITEM_ref(ADMISSION_SYNTAX), /* .it = */
61 NULL, NULL, NULL, NULL,
62 NULL, /* .i2s = */
63 NULL, /* .s2i = */
64 NULL, /* .i2v = */
65 NULL, /* .v2i = */
66 &i2r_ADMISSION_SYNTAX, /* .i2r = */
67 NULL, /* .r2i = */
68 NULL /* extension-specific data */
69};
70
71
72static int i2r_NAMING_AUTHORITY(const struct v3_ext_method *method, void *in,
73 BIO *bp, int ind)
74{
75 NAMING_AUTHORITY * namingAuthority = (NAMING_AUTHORITY*) in;
76
77 if (namingAuthority == NULL)
78 return 0;
79
80 if (namingAuthority->namingAuthorityId == NULL
81 && namingAuthority->namingAuthorityText == NULL
82 && namingAuthority->namingAuthorityUrl == NULL)
83 return 0;
84
85 if (BIO_printf(bp, "%*snamingAuthority: ", ind, "") <= 0)
86 goto err;
87
88 if (namingAuthority->namingAuthorityId != NULL) {
89 char objbuf[128];
90 const char *ln = OBJ_nid2ln(OBJ_obj2nid(namingAuthority->namingAuthorityId));
91
92 if (BIO_printf(bp, "%*s admissionAuthorityId: ", ind, "") <= 0)
93 goto err;
94
95 OBJ_obj2txt(objbuf, sizeof(objbuf), namingAuthority->namingAuthorityId, 1);
96
97 if (BIO_printf(bp, "%s%s%s%s\n", ln ? ln : "",
98 ln ? " (" : "", objbuf, ln ? ")" : "") <= 0)
99 goto err;
100 }
101 if (namingAuthority->namingAuthorityText != NULL) {
102 if (BIO_printf(bp, "%*s namingAuthorityText: ", ind, "") <= 0
103 || ASN1_STRING_print(bp, namingAuthority->namingAuthorityText) <= 0
104 || BIO_printf(bp, "\n") <= 0)
105 goto err;
106 }
107 if (namingAuthority->namingAuthorityUrl != NULL ) {
108 if (BIO_printf(bp, "%*s namingAuthorityUrl: ", ind, "") <= 0
109 || ASN1_STRING_print(bp, namingAuthority->namingAuthorityUrl) <= 0
110 || BIO_printf(bp, "\n") <= 0)
111 goto err;
112 }
113 return 1;
114
115err:
116 return 0;
117}
118
119static int i2r_ADMISSION_SYNTAX(const struct v3_ext_method *method, void *in,
120 BIO *bp, int ind)
121{
122 ADMISSION_SYNTAX * admission = (ADMISSION_SYNTAX *)in;
123 int i, j, k;
124
125 if (admission->admissionAuthority != NULL) {
126 if (BIO_printf(bp, "%*sadmissionAuthority:\n", ind, "") <= 0
127 || BIO_printf(bp, "%*s ", ind, "") <= 0
128 || GENERAL_NAME_print(bp, admission->admissionAuthority) <= 0
129 || BIO_printf(bp, "\n") <= 0)
130 goto err;
131 }
132
133 for (i = 0; i < sk_ADMISSIONS_num(admission->contentsOfAdmissions); i++) {
134 ADMISSIONS* entry = sk_ADMISSIONS_value(admission->contentsOfAdmissions, i);
135
136 if (BIO_printf(bp, "%*sEntry %0d:\n", ind, "", 1 + i) <= 0) goto err;
137
138 if (entry->admissionAuthority != NULL) {
139 if (BIO_printf(bp, "%*s admissionAuthority:\n", ind, "") <= 0
140 || BIO_printf(bp, "%*s ", ind, "") <= 0
141 || GENERAL_NAME_print(bp, entry->admissionAuthority) <= 0
142 || BIO_printf(bp, "\n") <= 0)
143 goto err;
144 }
145
146 if (entry->namingAuthority != NULL) {
147 if (i2r_NAMING_AUTHORITY(method, entry->namingAuthority, bp, ind) <= 0)
148 goto err;
149 }
150
151 for (j = 0; j < sk_PROFESSION_INFO_num(entry->professionInfos); j++) {
152 PROFESSION_INFO* pinfo = sk_PROFESSION_INFO_value(entry->professionInfos, j);
153
154 if (BIO_printf(bp, "%*s Profession Info Entry %0d:\n", ind, "", 1 + j) <= 0)
155 goto err;
156
157 if (pinfo->registrationNumber != NULL) {
158 if (BIO_printf(bp, "%*s registrationNumber: ", ind, "") <= 0
159 || ASN1_STRING_print(bp, pinfo->registrationNumber) <= 0
160 || BIO_printf(bp, "\n") <= 0)
161 goto err;
162 }
163
164 if (pinfo->namingAuthority != NULL) {
165 if (i2r_NAMING_AUTHORITY(method, pinfo->namingAuthority, bp, ind + 2) <= 0)
166 goto err;
167 }
168
169 if (pinfo->professionItems != NULL) {
170
171 if (BIO_printf(bp, "%*s Info Entries:\n", ind, "") <= 0)
172 goto err;
173 for (k = 0; k < sk_ASN1_STRING_num(pinfo->professionItems); k++) {
174 ASN1_STRING* val = sk_ASN1_STRING_value(pinfo->professionItems, k);
175
176 if (BIO_printf(bp, "%*s ", ind, "") <= 0
177 || ASN1_STRING_print(bp, val) <= 0
178 || BIO_printf(bp, "\n") <= 0)
179 goto err;
180 }
181 }
182
183 if (pinfo->professionOIDs != NULL) {
184 if (BIO_printf(bp, "%*s Profession OIDs:\n", ind, "") <= 0)
185 goto err;
186 for (k = 0; k < sk_ASN1_OBJECT_num(pinfo->professionOIDs); k++) {
187 ASN1_OBJECT* obj = sk_ASN1_OBJECT_value(pinfo->professionOIDs, k);
188 const char *ln = OBJ_nid2ln(OBJ_obj2nid(obj));
189 char objbuf[128];
190
191 OBJ_obj2txt(objbuf, sizeof(objbuf), obj, 1);
192 if (BIO_printf(bp, "%*s %s%s%s%s\n", ind, "",
193 ln ? ln : "", ln ? " (" : "",
194 objbuf, ln ? ")" : "") <= 0)
195 goto err;
196 }
197 }
198 }
199 }
200 return 1;
201
202err:
203 return -1;
204}
205
206const ASN1_OBJECT *NAMING_AUTHORITY_get0_authorityId(const NAMING_AUTHORITY *n)
207{
208 return n->namingAuthorityId;
209}
210
211void NAMING_AUTHORITY_set0_authorityId(NAMING_AUTHORITY *n, ASN1_OBJECT* id)
212{
213 ASN1_OBJECT_free(n->namingAuthorityId);
214 n->namingAuthorityId = id;
215}
216
217const ASN1_IA5STRING *NAMING_AUTHORITY_get0_authorityURL(
218 const NAMING_AUTHORITY *n)
219{
220 return n->namingAuthorityUrl;
221}
222
223void NAMING_AUTHORITY_set0_authorityURL(NAMING_AUTHORITY *n, ASN1_IA5STRING* u)
224{
225 ASN1_IA5STRING_free(n->namingAuthorityUrl);
226 n->namingAuthorityUrl = u;
227}
228
229const ASN1_STRING *NAMING_AUTHORITY_get0_authorityText(
230 const NAMING_AUTHORITY *n)
231{
232 return n->namingAuthorityText;
233}
234
235void NAMING_AUTHORITY_set0_authorityText(NAMING_AUTHORITY *n, ASN1_STRING* t)
236{
237 ASN1_IA5STRING_free(n->namingAuthorityText);
238 n->namingAuthorityText = t;
239}
240
241const GENERAL_NAME *ADMISSION_SYNTAX_get0_admissionAuthority(const ADMISSION_SYNTAX *as)
242{
243 return as->admissionAuthority;
244}
245
246void ADMISSION_SYNTAX_set0_admissionAuthority(ADMISSION_SYNTAX *as,
247 GENERAL_NAME *aa)
248{
249 GENERAL_NAME_free(as->admissionAuthority);
250 as->admissionAuthority = aa;
251}
252
253const STACK_OF(ADMISSIONS) *ADMISSION_SYNTAX_get0_contentsOfAdmissions(const ADMISSION_SYNTAX *as)
254{
255 return as->contentsOfAdmissions;
256}
257
258void ADMISSION_SYNTAX_set0_contentsOfAdmissions(ADMISSION_SYNTAX *as,
259 STACK_OF(ADMISSIONS) *a)
260{
261 sk_ADMISSIONS_pop_free(as->contentsOfAdmissions, ADMISSIONS_free);
262 as->contentsOfAdmissions = a;
263}
264
265const GENERAL_NAME *ADMISSIONS_get0_admissionAuthority(const ADMISSIONS *a)
266{
267 return a->admissionAuthority;
268}
269
270void ADMISSIONS_set0_admissionAuthority(ADMISSIONS *a, GENERAL_NAME *aa)
271{
272 GENERAL_NAME_free(a->admissionAuthority);
273 a->admissionAuthority = aa;
274}
275
276const NAMING_AUTHORITY *ADMISSIONS_get0_namingAuthority(const ADMISSIONS *a)
277{
278 return a->namingAuthority;
279}
280
281void ADMISSIONS_set0_namingAuthority(ADMISSIONS *a, NAMING_AUTHORITY *na)
282{
283 NAMING_AUTHORITY_free(a->namingAuthority);
284 a->namingAuthority = na;
285}
286
287const PROFESSION_INFOS *ADMISSIONS_get0_professionInfos(const ADMISSIONS *a)
288{
289 return a->professionInfos;
290}
291
292void ADMISSIONS_set0_professionInfos(ADMISSIONS *a, PROFESSION_INFOS *pi)
293{
294 sk_PROFESSION_INFO_pop_free(a->professionInfos, PROFESSION_INFO_free);
295 a->professionInfos = pi;
296}
297
298const ASN1_OCTET_STRING *PROFESSION_INFO_get0_addProfessionInfo(const PROFESSION_INFO *pi)
299{
300 return pi->addProfessionInfo;
301}
302
303void PROFESSION_INFO_set0_addProfessionInfo(PROFESSION_INFO *pi,
304 ASN1_OCTET_STRING *aos)
305{
306 ASN1_OCTET_STRING_free(pi->addProfessionInfo);
307 pi->addProfessionInfo = aos;
308}
309
310const NAMING_AUTHORITY *PROFESSION_INFO_get0_namingAuthority(const PROFESSION_INFO *pi)
311{
312 return pi->namingAuthority;
313}
314
315void PROFESSION_INFO_set0_namingAuthority(PROFESSION_INFO *pi,
316 NAMING_AUTHORITY *na)
317{
318 NAMING_AUTHORITY_free(pi->namingAuthority);
319 pi->namingAuthority = na;
320}
321
322const STACK_OF(ASN1_STRING) *PROFESSION_INFO_get0_professionItems(const PROFESSION_INFO *pi)
323{
324 return pi->professionItems;
325}
326
327void PROFESSION_INFO_set0_professionItems(PROFESSION_INFO *pi,
328 STACK_OF(ASN1_STRING) *as)
329{
330 sk_ASN1_STRING_pop_free(pi->professionItems, ASN1_STRING_free);
331 pi->professionItems = as;
332}
333
334const STACK_OF(ASN1_OBJECT) *PROFESSION_INFO_get0_professionOIDs(const PROFESSION_INFO *pi)
335{
336 return pi->professionOIDs;
337}
338
339void PROFESSION_INFO_set0_professionOIDs(PROFESSION_INFO *pi,
340 STACK_OF(ASN1_OBJECT) *po)
341{
342 sk_ASN1_OBJECT_pop_free(pi->professionOIDs, ASN1_OBJECT_free);
343 pi->professionOIDs = po;
344}
345
346const ASN1_PRINTABLESTRING *PROFESSION_INFO_get0_registrationNumber(const PROFESSION_INFO *pi)
347{
348 return pi->registrationNumber;
349}
350
351void PROFESSION_INFO_set0_registrationNumber(PROFESSION_INFO *pi,
352 ASN1_PRINTABLESTRING *rn)
353{
354 ASN1_PRINTABLESTRING_free(pi->registrationNumber);
355 pi->registrationNumber = rn;
356}
357