]>
Commit | Line | Data |
---|---|---|
0f113f3e | 1 | /* |
b1322259 | 2 | * Copyright 2004-2016 The OpenSSL Project Authors. All Rights Reserved. |
5d7c222d | 3 | * |
b1322259 RS |
4 | * Licensed under the OpenSSL license (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 | |
5d7c222d DSH |
8 | */ |
9 | ||
10 | #include <stdio.h> | |
11 | ||
b39fc560 | 12 | #include "internal/cryptlib.h" |
5d7c222d DSH |
13 | #include <openssl/crypto.h> |
14 | #include <openssl/lhash.h> | |
15 | #include <openssl/buffer.h> | |
16 | #include <openssl/x509.h> | |
17 | #include <openssl/x509v3.h> | |
6670d55a | 18 | #include "internal/x509_int.h" |
5d7c222d | 19 | |
6c21b860 | 20 | #include "x509_lcl.h" |
4a253652 | 21 | |
5d7c222d DSH |
22 | /* X509_VERIFY_PARAM functions */ |
23 | ||
8abffa4a VD |
24 | #define SET_HOST 0 |
25 | #define ADD_HOST 1 | |
26 | ||
0f113f3e MC |
27 | static char *str_copy(const char *s) |
28 | { | |
29 | return OPENSSL_strdup(s); | |
30 | } | |
31 | ||
32 | static void str_free(char *s) | |
33 | { | |
34 | OPENSSL_free(s); | |
35 | } | |
8abffa4a | 36 | |
9689a6ae | 37 | static int int_x509_param_set_hosts(X509_VERIFY_PARAM *vpm, int mode, |
0f113f3e MC |
38 | const char *name, size_t namelen) |
39 | { | |
40 | char *copy; | |
41 | ||
42 | /* | |
43 | * Refuse names with embedded NUL bytes, except perhaps as final byte. | |
44 | * XXX: Do we need to push an error onto the error stack? | |
45 | */ | |
0982ecaa | 46 | if (namelen == 0 || name == NULL) |
0f113f3e MC |
47 | namelen = name ? strlen(name) : 0; |
48 | else if (name && memchr(name, '\0', namelen > 1 ? namelen - 1 : namelen)) | |
49 | return 0; | |
0982ecaa | 50 | if (namelen > 0 && name[namelen - 1] == '\0') |
0f113f3e MC |
51 | --namelen; |
52 | ||
25aaa98a | 53 | if (mode == SET_HOST) { |
9689a6ae DSH |
54 | sk_OPENSSL_STRING_pop_free(vpm->hosts, str_free); |
55 | vpm->hosts = NULL; | |
0f113f3e MC |
56 | } |
57 | if (name == NULL || namelen == 0) | |
58 | return 1; | |
59 | ||
7644a9ae | 60 | copy = OPENSSL_strndup(name, namelen); |
0f113f3e MC |
61 | if (copy == NULL) |
62 | return 0; | |
63 | ||
9689a6ae DSH |
64 | if (vpm->hosts == NULL && |
65 | (vpm->hosts = sk_OPENSSL_STRING_new_null()) == NULL) { | |
0f113f3e MC |
66 | OPENSSL_free(copy); |
67 | return 0; | |
68 | } | |
69 | ||
9689a6ae | 70 | if (!sk_OPENSSL_STRING_push(vpm->hosts, copy)) { |
0f113f3e | 71 | OPENSSL_free(copy); |
9689a6ae DSH |
72 | if (sk_OPENSSL_STRING_num(vpm->hosts) == 0) { |
73 | sk_OPENSSL_STRING_free(vpm->hosts); | |
74 | vpm->hosts = NULL; | |
0f113f3e MC |
75 | } |
76 | return 0; | |
77 | } | |
78 | ||
79 | return 1; | |
80 | } | |
8abffa4a | 81 | |
5d7c222d DSH |
82 | |
83 | X509_VERIFY_PARAM *X509_VERIFY_PARAM_new(void) | |
0f113f3e MC |
84 | { |
85 | X509_VERIFY_PARAM *param; | |
222561fe | 86 | |
b51bce94 | 87 | param = OPENSSL_zalloc(sizeof(*param)); |
90945fa3 | 88 | if (param == NULL) |
0f113f3e | 89 | return NULL; |
234b8af4 F |
90 | param->trust = X509_TRUST_DEFAULT; |
91 | /* | |
92 | * param->inh_flags = X509_VP_FLAG_DEFAULT; | |
93 | */ | |
94 | param->inh_flags = 0; | |
95 | param->depth = -1; | |
96 | param->auth_level = -1; /* -1 means unset, 0 is explicit */ | |
0f113f3e MC |
97 | return param; |
98 | } | |
5d7c222d DSH |
99 | |
100 | void X509_VERIFY_PARAM_free(X509_VERIFY_PARAM *param) | |
0f113f3e | 101 | { |
234b8af4 | 102 | if (param == NULL) |
f49baeff | 103 | return; |
234b8af4 F |
104 | sk_ASN1_OBJECT_pop_free(param->policies, ASN1_OBJECT_free); |
105 | sk_OPENSSL_STRING_pop_free(param->hosts, str_free); | |
106 | OPENSSL_free(param->peername); | |
107 | OPENSSL_free(param->email); | |
108 | OPENSSL_free(param->ip); | |
0f113f3e MC |
109 | OPENSSL_free(param); |
110 | } | |
5d7c222d | 111 | |
1d97c843 TH |
112 | /*- |
113 | * This function determines how parameters are "inherited" from one structure | |
5d7c222d DSH |
114 | * to another. There are several different ways this can happen. |
115 | * | |
116 | * 1. If a child structure needs to have its values initialized from a parent | |
117 | * they are simply copied across. For example SSL_CTX copied to SSL. | |
118 | * 2. If the structure should take on values only if they are currently unset. | |
119 | * For example the values in an SSL structure will take appropriate value | |
120 | * for SSL servers or clients but only if the application has not set new | |
121 | * ones. | |
122 | * | |
0f113f3e | 123 | * The "inh_flags" field determines how this function behaves. |
5d7c222d DSH |
124 | * |
125 | * Normally any values which are set in the default are not copied from the | |
126 | * destination and verify flags are ORed together. | |
127 | * | |
128 | * If X509_VP_FLAG_DEFAULT is set then anything set in the source is copied | |
129 | * to the destination. Effectively the values in "to" become default values | |
130 | * which will be used only if nothing new is set in "from". | |
131 | * | |
132 | * If X509_VP_FLAG_OVERWRITE is set then all value are copied across whether | |
133 | * they are set or not. Flags is still Ored though. | |
134 | * | |
135 | * If X509_VP_FLAG_RESET_FLAGS is set then the flags value is copied instead | |
136 | * of ORed. | |
137 | * | |
138 | * If X509_VP_FLAG_LOCKED is set then no values are copied. | |
139 | * | |
140 | * If X509_VP_FLAG_ONCE is set then the current inh_flags setting is zeroed | |
141 | * after the next call. | |
142 | */ | |
143 | ||
144 | /* Macro to test if a field should be copied from src to dest */ | |
145 | ||
146 | #define test_x509_verify_param_copy(field, def) \ | |
0f113f3e MC |
147 | (to_overwrite || \ |
148 | ((src->field != def) && (to_default || (dest->field == def)))) | |
5d7c222d DSH |
149 | |
150 | /* Macro to test and copy a field if necessary */ | |
151 | ||
152 | #define x509_verify_param_copy(field, def) \ | |
0f113f3e MC |
153 | if (test_x509_verify_param_copy(field, def)) \ |
154 | dest->field = src->field | |
5d7c222d DSH |
155 | |
156 | int X509_VERIFY_PARAM_inherit(X509_VERIFY_PARAM *dest, | |
0f113f3e MC |
157 | const X509_VERIFY_PARAM *src) |
158 | { | |
159 | unsigned long inh_flags; | |
160 | int to_default, to_overwrite; | |
0f113f3e MC |
161 | if (!src) |
162 | return 1; | |
0f113f3e MC |
163 | inh_flags = dest->inh_flags | src->inh_flags; |
164 | ||
165 | if (inh_flags & X509_VP_FLAG_ONCE) | |
166 | dest->inh_flags = 0; | |
167 | ||
168 | if (inh_flags & X509_VP_FLAG_LOCKED) | |
169 | return 1; | |
170 | ||
171 | if (inh_flags & X509_VP_FLAG_DEFAULT) | |
172 | to_default = 1; | |
173 | else | |
174 | to_default = 0; | |
175 | ||
176 | if (inh_flags & X509_VP_FLAG_OVERWRITE) | |
177 | to_overwrite = 1; | |
178 | else | |
179 | to_overwrite = 0; | |
180 | ||
181 | x509_verify_param_copy(purpose, 0); | |
0daccd4d | 182 | x509_verify_param_copy(trust, X509_TRUST_DEFAULT); |
0f113f3e | 183 | x509_verify_param_copy(depth, -1); |
fbb82a60 | 184 | x509_verify_param_copy(auth_level, -1); |
0f113f3e MC |
185 | |
186 | /* If overwrite or check time not set, copy across */ | |
187 | ||
188 | if (to_overwrite || !(dest->flags & X509_V_FLAG_USE_CHECK_TIME)) { | |
189 | dest->check_time = src->check_time; | |
190 | dest->flags &= ~X509_V_FLAG_USE_CHECK_TIME; | |
191 | /* Don't need to copy flag: that is done below */ | |
192 | } | |
193 | ||
194 | if (inh_flags & X509_VP_FLAG_RESET_FLAGS) | |
195 | dest->flags = 0; | |
196 | ||
197 | dest->flags |= src->flags; | |
198 | ||
199 | if (test_x509_verify_param_copy(policies, NULL)) { | |
200 | if (!X509_VERIFY_PARAM_set1_policies(dest, src->policies)) | |
201 | return 0; | |
202 | } | |
203 | ||
204 | /* Copy the host flags if and only if we're copying the host list */ | |
9689a6ae DSH |
205 | if (test_x509_verify_param_copy(hosts, NULL)) { |
206 | sk_OPENSSL_STRING_pop_free(dest->hosts, str_free); | |
207 | dest->hosts = NULL; | |
208 | if (src->hosts) { | |
209 | dest->hosts = | |
210 | sk_OPENSSL_STRING_deep_copy(src->hosts, str_copy, str_free); | |
211 | if (dest->hosts == NULL) | |
0f113f3e | 212 | return 0; |
9689a6ae | 213 | dest->hostflags = src->hostflags; |
0f113f3e MC |
214 | } |
215 | } | |
216 | ||
9689a6ae DSH |
217 | if (test_x509_verify_param_copy(email, NULL)) { |
218 | if (!X509_VERIFY_PARAM_set1_email(dest, src->email, src->emaillen)) | |
0f113f3e MC |
219 | return 0; |
220 | } | |
221 | ||
9689a6ae DSH |
222 | if (test_x509_verify_param_copy(ip, NULL)) { |
223 | if (!X509_VERIFY_PARAM_set1_ip(dest, src->ip, src->iplen)) | |
0f113f3e MC |
224 | return 0; |
225 | } | |
226 | ||
227 | return 1; | |
228 | } | |
5d7c222d DSH |
229 | |
230 | int X509_VERIFY_PARAM_set1(X509_VERIFY_PARAM *to, | |
0f113f3e MC |
231 | const X509_VERIFY_PARAM *from) |
232 | { | |
233 | unsigned long save_flags = to->inh_flags; | |
234 | int ret; | |
235 | to->inh_flags |= X509_VP_FLAG_DEFAULT; | |
236 | ret = X509_VERIFY_PARAM_inherit(to, from); | |
237 | to->inh_flags = save_flags; | |
238 | return ret; | |
239 | } | |
5d7c222d | 240 | |
297c67fc | 241 | static int int_x509_param_set1(char **pdest, size_t *pdestlen, |
0f113f3e MC |
242 | const char *src, size_t srclen) |
243 | { | |
244 | void *tmp; | |
245 | if (src) { | |
01d0e241 | 246 | if (srclen == 0) |
0f113f3e | 247 | srclen = strlen(src); |
01d0e241 KC |
248 | |
249 | tmp = OPENSSL_memdup(src, srclen); | |
250 | if (tmp == NULL) | |
0f113f3e MC |
251 | return 0; |
252 | } else { | |
253 | tmp = NULL; | |
254 | srclen = 0; | |
255 | } | |
b548a1f1 | 256 | OPENSSL_free(*pdest); |
0f113f3e | 257 | *pdest = tmp; |
01d0e241 | 258 | if (pdestlen != NULL) |
0f113f3e MC |
259 | *pdestlen = srclen; |
260 | return 1; | |
261 | } | |
3bf15e29 | 262 | |
5d7c222d | 263 | int X509_VERIFY_PARAM_set1_name(X509_VERIFY_PARAM *param, const char *name) |
0f113f3e | 264 | { |
b548a1f1 | 265 | OPENSSL_free(param->name); |
7644a9ae | 266 | param->name = OPENSSL_strdup(name); |
0f113f3e MC |
267 | if (param->name) |
268 | return 1; | |
269 | return 0; | |
270 | } | |
5d7c222d DSH |
271 | |
272 | int X509_VERIFY_PARAM_set_flags(X509_VERIFY_PARAM *param, unsigned long flags) | |
0f113f3e MC |
273 | { |
274 | param->flags |= flags; | |
275 | if (flags & X509_V_FLAG_POLICY_MASK) | |
276 | param->flags |= X509_V_FLAG_POLICY_CHECK; | |
277 | return 1; | |
278 | } | |
279 | ||
280 | int X509_VERIFY_PARAM_clear_flags(X509_VERIFY_PARAM *param, | |
281 | unsigned long flags) | |
282 | { | |
283 | param->flags &= ~flags; | |
284 | return 1; | |
285 | } | |
f022c177 | 286 | |
4588cb44 | 287 | unsigned long X509_VERIFY_PARAM_get_flags(X509_VERIFY_PARAM *param) |
0f113f3e MC |
288 | { |
289 | return param->flags; | |
290 | } | |
f022c177 | 291 | |
a47bc283 RS |
292 | uint32_t X509_VERIFY_PARAM_get_inh_flags(const X509_VERIFY_PARAM *param) |
293 | { | |
294 | return param->inh_flags; | |
295 | } | |
296 | ||
297 | int X509_VERIFY_PARAM_set_inh_flags(X509_VERIFY_PARAM *param, uint32_t flags) | |
298 | { | |
299 | param->inh_flags = flags; | |
300 | return 1; | |
301 | } | |
302 | ||
5d7c222d | 303 | int X509_VERIFY_PARAM_set_purpose(X509_VERIFY_PARAM *param, int purpose) |
0f113f3e MC |
304 | { |
305 | return X509_PURPOSE_set(¶m->purpose, purpose); | |
306 | } | |
5d7c222d DSH |
307 | |
308 | int X509_VERIFY_PARAM_set_trust(X509_VERIFY_PARAM *param, int trust) | |
0f113f3e MC |
309 | { |
310 | return X509_TRUST_set(¶m->trust, trust); | |
311 | } | |
5d7c222d DSH |
312 | |
313 | void X509_VERIFY_PARAM_set_depth(X509_VERIFY_PARAM *param, int depth) | |
0f113f3e MC |
314 | { |
315 | param->depth = depth; | |
316 | } | |
5d7c222d | 317 | |
fbb82a60 VD |
318 | void X509_VERIFY_PARAM_set_auth_level(X509_VERIFY_PARAM *param, int auth_level) |
319 | { | |
320 | param->auth_level = auth_level; | |
321 | } | |
322 | ||
329f2f4a RS |
323 | time_t X509_VERIFY_PARAM_get_time(const X509_VERIFY_PARAM *param) |
324 | { | |
325 | return param->check_time; | |
326 | } | |
327 | ||
5d7c222d | 328 | void X509_VERIFY_PARAM_set_time(X509_VERIFY_PARAM *param, time_t t) |
0f113f3e MC |
329 | { |
330 | param->check_time = t; | |
331 | param->flags |= X509_V_FLAG_USE_CHECK_TIME; | |
332 | } | |
333 | ||
334 | int X509_VERIFY_PARAM_add0_policy(X509_VERIFY_PARAM *param, | |
335 | ASN1_OBJECT *policy) | |
336 | { | |
337 | if (!param->policies) { | |
338 | param->policies = sk_ASN1_OBJECT_new_null(); | |
339 | if (!param->policies) | |
340 | return 0; | |
341 | } | |
342 | if (!sk_ASN1_OBJECT_push(param->policies, policy)) | |
343 | return 0; | |
344 | return 1; | |
345 | } | |
346 | ||
347 | int X509_VERIFY_PARAM_set1_policies(X509_VERIFY_PARAM *param, | |
348 | STACK_OF(ASN1_OBJECT) *policies) | |
349 | { | |
350 | int i; | |
351 | ASN1_OBJECT *oid, *doid; | |
2ace7450 | 352 | |
0f113f3e MC |
353 | if (!param) |
354 | return 0; | |
2ace7450 | 355 | sk_ASN1_OBJECT_pop_free(param->policies, ASN1_OBJECT_free); |
0f113f3e MC |
356 | |
357 | if (!policies) { | |
358 | param->policies = NULL; | |
359 | return 1; | |
360 | } | |
361 | ||
362 | param->policies = sk_ASN1_OBJECT_new_null(); | |
363 | if (!param->policies) | |
364 | return 0; | |
365 | ||
366 | for (i = 0; i < sk_ASN1_OBJECT_num(policies); i++) { | |
367 | oid = sk_ASN1_OBJECT_value(policies, i); | |
368 | doid = OBJ_dup(oid); | |
369 | if (!doid) | |
370 | return 0; | |
371 | if (!sk_ASN1_OBJECT_push(param->policies, doid)) { | |
372 | ASN1_OBJECT_free(doid); | |
373 | return 0; | |
374 | } | |
375 | } | |
376 | param->flags |= X509_V_FLAG_POLICY_CHECK; | |
377 | return 1; | |
378 | } | |
5d7c222d | 379 | |
3bf15e29 | 380 | int X509_VERIFY_PARAM_set1_host(X509_VERIFY_PARAM *param, |
0f113f3e MC |
381 | const char *name, size_t namelen) |
382 | { | |
9689a6ae | 383 | return int_x509_param_set_hosts(param, SET_HOST, name, namelen); |
0f113f3e | 384 | } |
8abffa4a VD |
385 | |
386 | int X509_VERIFY_PARAM_add1_host(X509_VERIFY_PARAM *param, | |
0f113f3e MC |
387 | const char *name, size_t namelen) |
388 | { | |
9689a6ae | 389 | return int_x509_param_set_hosts(param, ADD_HOST, name, namelen); |
0f113f3e | 390 | } |
3bf15e29 | 391 | |
397a8e74 | 392 | void X509_VERIFY_PARAM_set_hostflags(X509_VERIFY_PARAM *param, |
0f113f3e MC |
393 | unsigned int flags) |
394 | { | |
9689a6ae | 395 | param->hostflags = flags; |
0f113f3e | 396 | } |
397a8e74 | 397 | |
4588cb44 | 398 | char *X509_VERIFY_PARAM_get0_peername(X509_VERIFY_PARAM *param) |
0f113f3e | 399 | { |
9689a6ae | 400 | return param->peername; |
0f113f3e | 401 | } |
6e661d45 | 402 | |
919ba009 VD |
403 | /* |
404 | * Move peername from one param structure to another, freeing any name present | |
405 | * at the target. If the source is a NULL parameter structure, free and zero | |
406 | * the target peername. | |
407 | */ | |
408 | void X509_VERIFY_PARAM_move_peername(X509_VERIFY_PARAM *to, | |
409 | X509_VERIFY_PARAM *from) | |
410 | { | |
411 | char *peername = (from != NULL) ? from->peername : NULL; | |
412 | ||
413 | if (to->peername != peername) { | |
414 | OPENSSL_free(to->peername); | |
415 | to->peername = peername; | |
416 | } | |
417 | if (from) | |
418 | from->peername = NULL; | |
419 | } | |
420 | ||
3bf15e29 | 421 | int X509_VERIFY_PARAM_set1_email(X509_VERIFY_PARAM *param, |
0f113f3e MC |
422 | const char *email, size_t emaillen) |
423 | { | |
9689a6ae | 424 | return int_x509_param_set1(¶m->email, ¶m->emaillen, |
0f113f3e MC |
425 | email, emaillen); |
426 | } | |
3bf15e29 DSH |
427 | |
428 | int X509_VERIFY_PARAM_set1_ip(X509_VERIFY_PARAM *param, | |
0f113f3e MC |
429 | const unsigned char *ip, size_t iplen) |
430 | { | |
431 | if (iplen != 0 && iplen != 4 && iplen != 16) | |
432 | return 0; | |
9689a6ae | 433 | return int_x509_param_set1((char **)¶m->ip, ¶m->iplen, |
0f113f3e MC |
434 | (char *)ip, iplen); |
435 | } | |
3bf15e29 DSH |
436 | |
437 | int X509_VERIFY_PARAM_set1_ip_asc(X509_VERIFY_PARAM *param, const char *ipasc) | |
0f113f3e MC |
438 | { |
439 | unsigned char ipout[16]; | |
440 | size_t iplen; | |
297c67fc | 441 | |
0f113f3e MC |
442 | iplen = (size_t)a2i_ipadd(ipout, ipasc); |
443 | if (iplen == 0) | |
444 | return 0; | |
445 | return X509_VERIFY_PARAM_set1_ip(param, ipout, iplen); | |
446 | } | |
3bf15e29 | 447 | |
5d7c222d | 448 | int X509_VERIFY_PARAM_get_depth(const X509_VERIFY_PARAM *param) |
0f113f3e MC |
449 | { |
450 | return param->depth; | |
451 | } | |
5d7c222d | 452 | |
fbb82a60 VD |
453 | int X509_VERIFY_PARAM_get_auth_level(const X509_VERIFY_PARAM *param) |
454 | { | |
455 | return param->auth_level; | |
456 | } | |
457 | ||
9b3d7570 | 458 | const char *X509_VERIFY_PARAM_get0_name(const X509_VERIFY_PARAM *param) |
0f113f3e MC |
459 | { |
460 | return param->name; | |
461 | } | |
9b3d7570 | 462 | |
9689a6ae | 463 | #define vpm_empty_id NULL, 0U, NULL, NULL, 0, NULL, 0 |
4a253652 | 464 | |
0f113f3e MC |
465 | /* |
466 | * Default verify parameters: these are used for various applications and can | |
467 | * be overridden by the user specified table. NB: the 'name' field *must* be | |
468 | * in alphabetical order because it will be searched using OBJ_search. | |
5d7c222d DSH |
469 | */ |
470 | ||
471 | static const X509_VERIFY_PARAM default_table[] = { | |
0f113f3e MC |
472 | { |
473 | "default", /* X509 default parameters */ | |
474 | 0, /* Check time */ | |
475 | 0, /* internal flags */ | |
0daccd4d | 476 | X509_V_FLAG_TRUSTED_FIRST, /* flags */ |
0f113f3e MC |
477 | 0, /* purpose */ |
478 | 0, /* trust */ | |
479 | 100, /* depth */ | |
fbb82a60 | 480 | -1, /* auth_level */ |
0f113f3e MC |
481 | NULL, /* policies */ |
482 | vpm_empty_id}, | |
483 | { | |
484 | "pkcs7", /* S/MIME sign parameters */ | |
485 | 0, /* Check time */ | |
486 | 0, /* internal flags */ | |
487 | 0, /* flags */ | |
488 | X509_PURPOSE_SMIME_SIGN, /* purpose */ | |
489 | X509_TRUST_EMAIL, /* trust */ | |
490 | -1, /* depth */ | |
fbb82a60 | 491 | -1, /* auth_level */ |
0f113f3e MC |
492 | NULL, /* policies */ |
493 | vpm_empty_id}, | |
494 | { | |
495 | "smime_sign", /* S/MIME sign parameters */ | |
496 | 0, /* Check time */ | |
497 | 0, /* internal flags */ | |
498 | 0, /* flags */ | |
499 | X509_PURPOSE_SMIME_SIGN, /* purpose */ | |
500 | X509_TRUST_EMAIL, /* trust */ | |
501 | -1, /* depth */ | |
fbb82a60 | 502 | -1, /* auth_level */ |
0f113f3e MC |
503 | NULL, /* policies */ |
504 | vpm_empty_id}, | |
505 | { | |
506 | "ssl_client", /* SSL/TLS client parameters */ | |
507 | 0, /* Check time */ | |
508 | 0, /* internal flags */ | |
509 | 0, /* flags */ | |
510 | X509_PURPOSE_SSL_CLIENT, /* purpose */ | |
511 | X509_TRUST_SSL_CLIENT, /* trust */ | |
512 | -1, /* depth */ | |
fbb82a60 | 513 | -1, /* auth_level */ |
0f113f3e MC |
514 | NULL, /* policies */ |
515 | vpm_empty_id}, | |
516 | { | |
517 | "ssl_server", /* SSL/TLS server parameters */ | |
518 | 0, /* Check time */ | |
519 | 0, /* internal flags */ | |
520 | 0, /* flags */ | |
521 | X509_PURPOSE_SSL_SERVER, /* purpose */ | |
522 | X509_TRUST_SSL_SERVER, /* trust */ | |
523 | -1, /* depth */ | |
fbb82a60 | 524 | -1, /* auth_level */ |
0f113f3e MC |
525 | NULL, /* policies */ |
526 | vpm_empty_id} | |
527 | }; | |
5d7c222d DSH |
528 | |
529 | static STACK_OF(X509_VERIFY_PARAM) *param_table = NULL; | |
530 | ||
babb3798 | 531 | static int table_cmp(const X509_VERIFY_PARAM *a, const X509_VERIFY_PARAM *b) |
0f113f3e MC |
532 | { |
533 | return strcmp(a->name, b->name); | |
534 | } | |
babb3798 | 535 | |
0f113f3e MC |
536 | DECLARE_OBJ_BSEARCH_CMP_FN(X509_VERIFY_PARAM, X509_VERIFY_PARAM, table); |
537 | IMPLEMENT_OBJ_BSEARCH_CMP_FN(X509_VERIFY_PARAM, X509_VERIFY_PARAM, table); | |
babb3798 | 538 | |
0f113f3e MC |
539 | static int param_cmp(const X509_VERIFY_PARAM *const *a, |
540 | const X509_VERIFY_PARAM *const *b) | |
541 | { | |
542 | return strcmp((*a)->name, (*b)->name); | |
543 | } | |
5d7c222d DSH |
544 | |
545 | int X509_VERIFY_PARAM_add0_table(X509_VERIFY_PARAM *param) | |
0f113f3e MC |
546 | { |
547 | int idx; | |
548 | X509_VERIFY_PARAM *ptmp; | |
90945fa3 | 549 | if (param_table == NULL) { |
0f113f3e | 550 | param_table = sk_X509_VERIFY_PARAM_new(param_cmp); |
90945fa3 | 551 | if (param_table == NULL) |
0f113f3e MC |
552 | return 0; |
553 | } else { | |
554 | idx = sk_X509_VERIFY_PARAM_find(param_table, param); | |
555 | if (idx != -1) { | |
556 | ptmp = sk_X509_VERIFY_PARAM_value(param_table, idx); | |
557 | X509_VERIFY_PARAM_free(ptmp); | |
558 | (void)sk_X509_VERIFY_PARAM_delete(param_table, idx); | |
559 | } | |
560 | } | |
561 | if (!sk_X509_VERIFY_PARAM_push(param_table, param)) | |
562 | return 0; | |
563 | return 1; | |
564 | } | |
5d7c222d | 565 | |
9b3d7570 | 566 | int X509_VERIFY_PARAM_get_count(void) |
0f113f3e | 567 | { |
b6eb9827 | 568 | int num = OSSL_NELEM(default_table); |
0f113f3e MC |
569 | if (param_table) |
570 | num += sk_X509_VERIFY_PARAM_num(param_table); | |
571 | return num; | |
572 | } | |
9b3d7570 DSH |
573 | |
574 | const X509_VERIFY_PARAM *X509_VERIFY_PARAM_get0(int id) | |
0f113f3e | 575 | { |
b6eb9827 | 576 | int num = OSSL_NELEM(default_table); |
0f113f3e MC |
577 | if (id < num) |
578 | return default_table + id; | |
579 | return sk_X509_VERIFY_PARAM_value(param_table, id - num); | |
580 | } | |
9b3d7570 | 581 | |
5d7c222d | 582 | const X509_VERIFY_PARAM *X509_VERIFY_PARAM_lookup(const char *name) |
0f113f3e MC |
583 | { |
584 | int idx; | |
585 | X509_VERIFY_PARAM pm; | |
586 | ||
587 | pm.name = (char *)name; | |
588 | if (param_table) { | |
589 | idx = sk_X509_VERIFY_PARAM_find(param_table, &pm); | |
590 | if (idx != -1) | |
591 | return sk_X509_VERIFY_PARAM_value(param_table, idx); | |
592 | } | |
b6eb9827 | 593 | return OBJ_bsearch_table(&pm, default_table, OSSL_NELEM(default_table)); |
0f113f3e | 594 | } |
5d7c222d DSH |
595 | |
596 | void X509_VERIFY_PARAM_table_cleanup(void) | |
0f113f3e | 597 | { |
222561fe | 598 | sk_X509_VERIFY_PARAM_pop_free(param_table, X509_VERIFY_PARAM_free); |
0f113f3e MC |
599 | param_table = NULL; |
600 | } |