]>
Commit | Line | Data |
---|---|---|
0f113f3e MC |
1 | /* |
2 | * ! \file ssl/ssl_conf.c \brief SSL configuration functions | |
3db935a9 DSH |
3 | */ |
4 | /* ==================================================================== | |
5 | * Copyright (c) 2012 The OpenSSL Project. All rights reserved. | |
6 | * | |
7 | * Redistribution and use in source and binary forms, with or without | |
8 | * modification, are permitted provided that the following conditions | |
9 | * are met: | |
10 | * | |
11 | * 1. Redistributions of source code must retain the above copyright | |
0f113f3e | 12 | * notice, this list of conditions and the following disclaimer. |
3db935a9 DSH |
13 | * |
14 | * 2. Redistributions in binary form must reproduce the above copyright | |
15 | * notice, this list of conditions and the following disclaimer in | |
16 | * the documentation and/or other materials provided with the | |
17 | * distribution. | |
18 | * | |
19 | * 3. All advertising materials mentioning features or use of this | |
20 | * software must display the following acknowledgment: | |
21 | * "This product includes software developed by the OpenSSL Project | |
22 | * for use in the OpenSSL Toolkit. (http://www.openssl.org/)" | |
23 | * | |
24 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | |
25 | * endorse or promote products derived from this software without | |
26 | * prior written permission. For written permission, please contact | |
27 | * openssl-core@openssl.org. | |
28 | * | |
29 | * 5. Products derived from this software may not be called "OpenSSL" | |
30 | * nor may "OpenSSL" appear in their names without prior written | |
31 | * permission of the OpenSSL Project. | |
32 | * | |
33 | * 6. Redistributions of any form whatsoever must retain the following | |
34 | * acknowledgment: | |
35 | * "This product includes software developed by the OpenSSL Project | |
36 | * for use in the OpenSSL Toolkit (http://www.openssl.org/)" | |
37 | * | |
38 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | |
39 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
40 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | |
41 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | |
42 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | |
43 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | |
44 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | |
45 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
46 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | |
47 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | |
48 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | |
49 | * OF THE POSSIBILITY OF SUCH DAMAGE. | |
50 | * ==================================================================== | |
51 | * | |
52 | * This product includes cryptographic software written by Eric Young | |
53 | * (eay@cryptsoft.com). This product includes software written by Tim | |
54 | * Hudson (tjh@cryptsoft.com). | |
55 | * | |
56 | */ | |
57 | ||
58 | #ifdef REF_CHECK | |
0f113f3e | 59 | # include <assert.h> |
3db935a9 DSH |
60 | #endif |
61 | #include <stdio.h> | |
62 | #include "ssl_locl.h" | |
63 | #include <openssl/conf.h> | |
64 | #include <openssl/objects.h> | |
96e16bdd | 65 | #ifndef OPENSSL_NO_DH |
0f113f3e | 66 | # include <openssl/dh.h> |
96e16bdd | 67 | #endif |
3db935a9 | 68 | |
0f113f3e MC |
69 | /* |
70 | * structure holding name tables. This is used for pemitted elements in lists | |
656b2605 | 71 | * such as TLSv1. |
3db935a9 DSH |
72 | */ |
73 | ||
0f113f3e MC |
74 | typedef struct { |
75 | const char *name; | |
76 | int namelen; | |
77 | unsigned int name_flags; | |
78 | unsigned long option_value; | |
79 | } ssl_flag_tbl; | |
3db935a9 | 80 | |
656b2605 DSH |
81 | /* Switch table: use for single command line switches like no_tls2 */ |
82 | typedef struct { | |
83 | unsigned long option_value; | |
84 | unsigned int name_flags; | |
85 | } ssl_switch_tbl; | |
86 | ||
3db935a9 | 87 | /* Sense of name is inverted e.g. "TLSv1" will clear SSL_OP_NO_TLSv1 */ |
0f113f3e | 88 | #define SSL_TFLAG_INV 0x1 |
429261d0 DSH |
89 | /* Mask for type of flag referred to */ |
90 | #define SSL_TFLAG_TYPE_MASK 0xf00 | |
91 | /* Flag is for options */ | |
92 | #define SSL_TFLAG_OPTION 0x000 | |
93 | /* Flag is for cert_flags */ | |
94 | #define SSL_TFLAG_CERT 0x100 | |
95 | /* Flag is for verify mode */ | |
96 | #define SSL_TFLAG_VFY 0x200 | |
3db935a9 DSH |
97 | /* Option can only be used for clients */ |
98 | #define SSL_TFLAG_CLIENT SSL_CONF_FLAG_CLIENT | |
99 | /* Option can only be used for servers */ | |
100 | #define SSL_TFLAG_SERVER SSL_CONF_FLAG_SERVER | |
101 | #define SSL_TFLAG_BOTH (SSL_TFLAG_CLIENT|SSL_TFLAG_SERVER) | |
102 | ||
103 | #define SSL_FLAG_TBL(str, flag) \ | |
0f113f3e | 104 | {str, (int)(sizeof(str) - 1), SSL_TFLAG_BOTH, flag} |
3db935a9 | 105 | #define SSL_FLAG_TBL_SRV(str, flag) \ |
0f113f3e | 106 | {str, (int)(sizeof(str) - 1), SSL_TFLAG_SERVER, flag} |
3db935a9 | 107 | #define SSL_FLAG_TBL_CLI(str, flag) \ |
0f113f3e | 108 | {str, (int)(sizeof(str) - 1), SSL_TFLAG_CLIENT, flag} |
3db935a9 | 109 | #define SSL_FLAG_TBL_INV(str, flag) \ |
0f113f3e | 110 | {str, (int)(sizeof(str) - 1), SSL_TFLAG_INV|SSL_TFLAG_BOTH, flag} |
3db935a9 | 111 | #define SSL_FLAG_TBL_SRV_INV(str, flag) \ |
0f113f3e | 112 | {str, (int)(sizeof(str) - 1), SSL_TFLAG_INV|SSL_TFLAG_SERVER, flag} |
3db935a9 | 113 | #define SSL_FLAG_TBL_CERT(str, flag) \ |
0f113f3e | 114 | {str, (int)(sizeof(str) - 1), SSL_TFLAG_CERT|SSL_TFLAG_BOTH, flag} |
3db935a9 | 115 | |
429261d0 DSH |
116 | #define SSL_FLAG_VFY_CLI(str, flag) \ |
117 | {str, (int)(sizeof(str) - 1), SSL_TFLAG_VFY | SSL_TFLAG_CLIENT, flag} | |
118 | #define SSL_FLAG_VFY_SRV(str, flag) \ | |
119 | {str, (int)(sizeof(str) - 1), SSL_TFLAG_VFY | SSL_TFLAG_SERVER, flag} | |
120 | ||
0f113f3e MC |
121 | /* |
122 | * Opaque structure containing SSL configuration context. | |
3db935a9 DSH |
123 | */ |
124 | ||
0f113f3e MC |
125 | struct ssl_conf_ctx_st { |
126 | /* | |
127 | * Various flags indicating (among other things) which options we will | |
128 | * recognise. | |
129 | */ | |
130 | unsigned int flags; | |
131 | /* Prefix and length of commands */ | |
132 | char *prefix; | |
133 | size_t prefixlen; | |
134 | /* SSL_CTX or SSL structure to perform operations on */ | |
135 | SSL_CTX *ctx; | |
136 | SSL *ssl; | |
137 | /* Pointer to SSL or SSL_CTX options field or NULL if none */ | |
f7d53487 | 138 | uint32_t *poptions; |
2011b169 DSH |
139 | /* Certificate filenames for each type */ |
140 | char *cert_filename[SSL_PKEY_NUM]; | |
0f113f3e | 141 | /* Pointer to SSL or SSL_CTX cert_flags or NULL if none */ |
f7d53487 | 142 | uint32_t *pcert_flags; |
429261d0 DSH |
143 | /* Pointer to SSL or SSL_CTX verify_mode or NULL if none */ |
144 | uint32_t *pvfy_flags; | |
0f113f3e MC |
145 | /* Current flag table being worked on */ |
146 | const ssl_flag_tbl *tbl; | |
147 | /* Size of table */ | |
148 | size_t ntbl; | |
429261d0 DSH |
149 | /* Client CA names */ |
150 | STACK_OF(X509_NAME) *canames; | |
0f113f3e | 151 | }; |
3db935a9 | 152 | |
656b2605 DSH |
153 | static void ssl_set_option(SSL_CONF_CTX *cctx, unsigned int name_flags, |
154 | unsigned long option_value, int onoff) | |
155 | { | |
4fdf17a0 | 156 | uint32_t *pflags; |
656b2605 DSH |
157 | if (cctx->poptions == NULL) |
158 | return; | |
159 | if (name_flags & SSL_TFLAG_INV) | |
160 | onoff ^= 1; | |
429261d0 DSH |
161 | switch (name_flags & SSL_TFLAG_TYPE_MASK) { |
162 | ||
163 | case SSL_TFLAG_CERT: | |
164 | pflags = cctx->pcert_flags; | |
165 | break; | |
166 | ||
167 | case SSL_TFLAG_VFY: | |
168 | pflags = cctx->pvfy_flags; | |
169 | break; | |
170 | ||
171 | case SSL_TFLAG_OPTION: | |
172 | pflags = cctx->poptions; | |
173 | break; | |
174 | ||
175 | default: | |
176 | return; | |
177 | ||
656b2605 | 178 | } |
429261d0 DSH |
179 | if (onoff) |
180 | *pflags |= option_value; | |
181 | else | |
182 | *pflags &= ~option_value; | |
656b2605 DSH |
183 | } |
184 | ||
3db935a9 | 185 | static int ssl_match_option(SSL_CONF_CTX *cctx, const ssl_flag_tbl *tbl, |
0f113f3e MC |
186 | const char *name, int namelen, int onoff) |
187 | { | |
188 | /* If name not relevant for context skip */ | |
189 | if (!(cctx->flags & tbl->name_flags & SSL_TFLAG_BOTH)) | |
190 | return 0; | |
191 | if (namelen == -1) { | |
192 | if (strcmp(tbl->name, name)) | |
193 | return 0; | |
194 | } else if (tbl->namelen != namelen | |
195 | || strncasecmp(tbl->name, name, namelen)) | |
196 | return 0; | |
656b2605 | 197 | ssl_set_option(cctx, tbl->name_flags, tbl->option_value, onoff); |
0f113f3e MC |
198 | return 1; |
199 | } | |
3db935a9 DSH |
200 | |
201 | static int ssl_set_option_list(const char *elem, int len, void *usr) | |
0f113f3e MC |
202 | { |
203 | SSL_CONF_CTX *cctx = usr; | |
204 | size_t i; | |
205 | const ssl_flag_tbl *tbl; | |
206 | int onoff = 1; | |
207 | /* | |
208 | * len == -1 indicates not being called in list context, just for single | |
209 | * command line switches, so don't allow +, -. | |
210 | */ | |
2747d73c KR |
211 | if (elem == NULL) |
212 | return 0; | |
0f113f3e MC |
213 | if (len != -1) { |
214 | if (*elem == '+') { | |
215 | elem++; | |
216 | len--; | |
217 | onoff = 1; | |
218 | } else if (*elem == '-') { | |
219 | elem++; | |
220 | len--; | |
221 | onoff = 0; | |
222 | } | |
223 | } | |
224 | for (i = 0, tbl = cctx->tbl; i < cctx->ntbl; i++, tbl++) { | |
225 | if (ssl_match_option(cctx, tbl, elem, len, onoff)) | |
226 | return 1; | |
227 | } | |
228 | return 0; | |
229 | } | |
3db935a9 | 230 | |
3db935a9 | 231 | /* Set supported signature algorithms */ |
ec2f7e56 | 232 | static int cmd_SignatureAlgorithms(SSL_CONF_CTX *cctx, const char *value) |
0f113f3e MC |
233 | { |
234 | int rv; | |
235 | if (cctx->ssl) | |
236 | rv = SSL_set1_sigalgs_list(cctx->ssl, value); | |
237 | /* NB: ctx == NULL performs syntax checking only */ | |
238 | else | |
239 | rv = SSL_CTX_set1_sigalgs_list(cctx->ctx, value); | |
240 | return rv > 0; | |
241 | } | |
242 | ||
3db935a9 | 243 | /* Set supported client signature algorithms */ |
0f113f3e MC |
244 | static int cmd_ClientSignatureAlgorithms(SSL_CONF_CTX *cctx, |
245 | const char *value) | |
246 | { | |
247 | int rv; | |
248 | if (cctx->ssl) | |
249 | rv = SSL_set1_client_sigalgs_list(cctx->ssl, value); | |
250 | /* NB: ctx == NULL performs syntax checking only */ | |
251 | else | |
252 | rv = SSL_CTX_set1_client_sigalgs_list(cctx->ctx, value); | |
253 | return rv > 0; | |
254 | } | |
3db935a9 | 255 | |
ec2f7e56 | 256 | static int cmd_Curves(SSL_CONF_CTX *cctx, const char *value) |
0f113f3e MC |
257 | { |
258 | int rv; | |
259 | if (cctx->ssl) | |
260 | rv = SSL_set1_curves_list(cctx->ssl, value); | |
261 | /* NB: ctx == NULL performs syntax checking only */ | |
262 | else | |
263 | rv = SSL_CTX_set1_curves_list(cctx->ctx, value); | |
264 | return rv > 0; | |
265 | } | |
266 | ||
10bf4fc2 | 267 | #ifndef OPENSSL_NO_EC |
3db935a9 | 268 | /* ECDH temporary parameters */ |
ec2f7e56 | 269 | static int cmd_ECDHParameters(SSL_CONF_CTX *cctx, const char *value) |
0f113f3e | 270 | { |
fe6ef247 KR |
271 | int rv = 1; |
272 | EC_KEY *ecdh; | |
273 | int nid; | |
0f113f3e | 274 | |
fe6ef247 KR |
275 | nid = EC_curve_nist2nid(value); |
276 | if (nid == NID_undef) | |
277 | nid = OBJ_sn2nid(value); | |
278 | if (nid == 0) | |
279 | return 0; | |
280 | ecdh = EC_KEY_new_by_curve_name(nid); | |
281 | if (!ecdh) | |
282 | return 0; | |
283 | if (cctx->ctx) | |
284 | rv = SSL_CTX_set_tmp_ecdh(cctx->ctx, ecdh); | |
285 | else if (cctx->ssl) | |
286 | rv = SSL_set_tmp_ecdh(cctx->ssl, ecdh); | |
287 | EC_KEY_free(ecdh); | |
0f113f3e MC |
288 | |
289 | return rv > 0; | |
290 | } | |
14536c8c | 291 | #endif |
ec2f7e56 | 292 | static int cmd_CipherString(SSL_CONF_CTX *cctx, const char *value) |
0f113f3e MC |
293 | { |
294 | int rv = 1; | |
295 | if (cctx->ctx) | |
296 | rv = SSL_CTX_set_cipher_list(cctx->ctx, value); | |
297 | if (cctx->ssl) | |
298 | rv = SSL_set_cipher_list(cctx->ssl, value); | |
299 | return rv > 0; | |
300 | } | |
3db935a9 | 301 | |
ec2f7e56 | 302 | static int cmd_Protocol(SSL_CONF_CTX *cctx, const char *value) |
0f113f3e MC |
303 | { |
304 | static const ssl_flag_tbl ssl_protocol_list[] = { | |
305 | SSL_FLAG_TBL_INV("ALL", SSL_OP_NO_SSL_MASK), | |
306 | SSL_FLAG_TBL_INV("SSLv2", SSL_OP_NO_SSLv2), | |
307 | SSL_FLAG_TBL_INV("SSLv3", SSL_OP_NO_SSLv3), | |
308 | SSL_FLAG_TBL_INV("TLSv1", SSL_OP_NO_TLSv1), | |
309 | SSL_FLAG_TBL_INV("TLSv1.1", SSL_OP_NO_TLSv1_1), | |
310 | SSL_FLAG_TBL_INV("TLSv1.2", SSL_OP_NO_TLSv1_2) | |
311 | }; | |
0f113f3e | 312 | cctx->tbl = ssl_protocol_list; |
b6eb9827 | 313 | cctx->ntbl = OSSL_NELEM(ssl_protocol_list); |
0f113f3e MC |
314 | return CONF_parse_list(value, ',', 1, ssl_set_option_list, cctx); |
315 | } | |
3db935a9 | 316 | |
ec2f7e56 | 317 | static int cmd_Options(SSL_CONF_CTX *cctx, const char *value) |
0f113f3e MC |
318 | { |
319 | static const ssl_flag_tbl ssl_option_list[] = { | |
320 | SSL_FLAG_TBL_INV("SessionTicket", SSL_OP_NO_TICKET), | |
321 | SSL_FLAG_TBL_INV("EmptyFragments", | |
322 | SSL_OP_DONT_INSERT_EMPTY_FRAGMENTS), | |
323 | SSL_FLAG_TBL("Bugs", SSL_OP_ALL), | |
324 | SSL_FLAG_TBL_INV("Compression", SSL_OP_NO_COMPRESSION), | |
325 | SSL_FLAG_TBL_SRV("ServerPreference", SSL_OP_CIPHER_SERVER_PREFERENCE), | |
326 | SSL_FLAG_TBL_SRV("NoResumptionOnRenegotiation", | |
327 | SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION), | |
328 | SSL_FLAG_TBL_SRV("DHSingle", SSL_OP_SINGLE_DH_USE), | |
329 | SSL_FLAG_TBL_SRV("ECDHSingle", SSL_OP_SINGLE_ECDH_USE), | |
330 | SSL_FLAG_TBL("UnsafeLegacyRenegotiation", | |
331 | SSL_OP_ALLOW_UNSAFE_LEGACY_RENEGOTIATION), | |
332 | }; | |
0f113f3e MC |
333 | if (value == NULL) |
334 | return -3; | |
335 | cctx->tbl = ssl_option_list; | |
b6eb9827 | 336 | cctx->ntbl = OSSL_NELEM(ssl_option_list); |
0f113f3e MC |
337 | return CONF_parse_list(value, ',', 1, ssl_set_option_list, cctx); |
338 | } | |
3db935a9 | 339 | |
429261d0 DSH |
340 | static int cmd_VerifyMode(SSL_CONF_CTX *cctx, const char *value) |
341 | { | |
342 | static const ssl_flag_tbl ssl_vfy_list[] = { | |
343 | SSL_FLAG_VFY_CLI("Peer", SSL_VERIFY_PEER), | |
344 | SSL_FLAG_VFY_SRV("Request", SSL_VERIFY_PEER), | |
345 | SSL_FLAG_VFY_SRV("Require", | |
346 | SSL_VERIFY_PEER | SSL_VERIFY_FAIL_IF_NO_PEER_CERT), | |
347 | SSL_FLAG_VFY_SRV("Once", SSL_VERIFY_PEER | SSL_VERIFY_CLIENT_ONCE) | |
348 | }; | |
349 | if (value == NULL) | |
350 | return -3; | |
351 | cctx->tbl = ssl_vfy_list; | |
352 | cctx->ntbl = OSSL_NELEM(ssl_vfy_list); | |
353 | return CONF_parse_list(value, ',', 1, ssl_set_option_list, cctx); | |
354 | } | |
355 | ||
ec2f7e56 | 356 | static int cmd_Certificate(SSL_CONF_CTX *cctx, const char *value) |
0f113f3e MC |
357 | { |
358 | int rv = 1; | |
2011b169 | 359 | CERT *c = NULL; |
2011b169 | 360 | if (cctx->ctx) { |
0f113f3e | 361 | rv = SSL_CTX_use_certificate_chain_file(cctx->ctx, value); |
2011b169 DSH |
362 | c = cctx->ctx->cert; |
363 | } | |
364 | if (cctx->ssl) { | |
fae4772c | 365 | rv = SSL_use_certificate_chain_file(cctx->ssl, value); |
2011b169 DSH |
366 | c = cctx->ssl->cert; |
367 | } | |
368 | if (rv > 0 && c && cctx->flags & SSL_CONF_FLAG_REQUIRE_PRIVATE) { | |
369 | char **pfilename = &cctx->cert_filename[c->key - c->pkeys]; | |
b548a1f1 | 370 | OPENSSL_free(*pfilename); |
7644a9ae | 371 | *pfilename = OPENSSL_strdup(value); |
2011b169 DSH |
372 | if (!*pfilename) |
373 | rv = 0; | |
374 | } | |
375 | ||
0f113f3e MC |
376 | return rv > 0; |
377 | } | |
ec2f7e56 DSH |
378 | |
379 | static int cmd_PrivateKey(SSL_CONF_CTX *cctx, const char *value) | |
0f113f3e MC |
380 | { |
381 | int rv = 1; | |
382 | if (!(cctx->flags & SSL_CONF_FLAG_CERTIFICATE)) | |
383 | return -2; | |
384 | if (cctx->ctx) | |
385 | rv = SSL_CTX_use_PrivateKey_file(cctx->ctx, value, SSL_FILETYPE_PEM); | |
386 | if (cctx->ssl) | |
387 | rv = SSL_use_PrivateKey_file(cctx->ssl, value, SSL_FILETYPE_PEM); | |
388 | return rv > 0; | |
389 | } | |
5b7f36e8 DSH |
390 | |
391 | static int cmd_ServerInfoFile(SSL_CONF_CTX *cctx, const char *value) | |
0f113f3e MC |
392 | { |
393 | int rv = 1; | |
0f113f3e MC |
394 | if (cctx->ctx) |
395 | rv = SSL_CTX_use_serverinfo_file(cctx->ctx, value); | |
396 | return rv > 0; | |
397 | } | |
5b7f36e8 | 398 | |
429261d0 DSH |
399 | static int do_store(SSL_CONF_CTX *cctx, |
400 | const char *CAfile, const char *CApath, int verify_store) | |
401 | { | |
402 | CERT *cert; | |
403 | X509_STORE **st; | |
404 | if (cctx->ctx) | |
405 | cert = cctx->ctx->cert; | |
406 | else if (cctx->ssl) | |
407 | cert = cctx->ssl->cert; | |
408 | else | |
409 | return 1; | |
410 | st = verify_store ? &cert->verify_store : &cert->chain_store; | |
411 | if (*st == NULL) { | |
412 | *st = X509_STORE_new(); | |
413 | if (*st == NULL) | |
414 | return 0; | |
415 | } | |
416 | return X509_STORE_load_locations(*st, CAfile, CApath) > 0; | |
417 | } | |
418 | ||
419 | static int cmd_ChainCAPath(SSL_CONF_CTX *cctx, const char *value) | |
420 | { | |
421 | return do_store(cctx, NULL, value, 0); | |
422 | } | |
423 | ||
424 | static int cmd_ChainCAFile(SSL_CONF_CTX *cctx, const char *value) | |
425 | { | |
426 | return do_store(cctx, value, NULL, 0); | |
427 | } | |
428 | ||
429 | static int cmd_VerifyCAPath(SSL_CONF_CTX *cctx, const char *value) | |
430 | { | |
431 | return do_store(cctx, NULL, value, 1); | |
432 | } | |
433 | ||
434 | static int cmd_VerifyCAFile(SSL_CONF_CTX *cctx, const char *value) | |
435 | { | |
436 | return do_store(cctx, value, NULL, 1); | |
437 | } | |
438 | ||
439 | static int cmd_ClientCAFile(SSL_CONF_CTX *cctx, const char *value) | |
440 | { | |
441 | if (cctx->canames == NULL) | |
442 | cctx->canames = sk_X509_NAME_new_null(); | |
443 | if (cctx->canames == NULL) | |
444 | return 0; | |
445 | return SSL_add_file_cert_subjects_to_stack(cctx->canames, value); | |
446 | } | |
447 | ||
448 | static int cmd_ClientCAPath(SSL_CONF_CTX *cctx, const char *value) | |
449 | { | |
450 | if (cctx->canames == NULL) | |
451 | cctx->canames = sk_X509_NAME_new_null(); | |
452 | if (cctx->canames == NULL) | |
453 | return 0; | |
454 | return SSL_add_dir_cert_subjects_to_stack(cctx->canames, value); | |
455 | } | |
456 | ||
c557f921 DSH |
457 | #ifndef OPENSSL_NO_DH |
458 | static int cmd_DHParameters(SSL_CONF_CTX *cctx, const char *value) | |
0f113f3e MC |
459 | { |
460 | int rv = 0; | |
461 | DH *dh = NULL; | |
462 | BIO *in = NULL; | |
0f113f3e | 463 | if (cctx->ctx || cctx->ssl) { |
9982cbbb | 464 | in = BIO_new(BIO_s_file()); |
a71edf3b | 465 | if (in == NULL) |
0f113f3e MC |
466 | goto end; |
467 | if (BIO_read_filename(in, value) <= 0) | |
468 | goto end; | |
469 | dh = PEM_read_bio_DHparams(in, NULL, NULL, NULL); | |
a71edf3b | 470 | if (dh == NULL) |
0f113f3e MC |
471 | goto end; |
472 | } else | |
473 | return 1; | |
474 | if (cctx->ctx) | |
475 | rv = SSL_CTX_set_tmp_dh(cctx->ctx, dh); | |
476 | if (cctx->ssl) | |
477 | rv = SSL_set_tmp_dh(cctx->ssl, dh); | |
478 | end: | |
d6407083 | 479 | DH_free(dh); |
ca3a82c3 | 480 | BIO_free(in); |
0f113f3e MC |
481 | return rv > 0; |
482 | } | |
c557f921 | 483 | #endif |
0f113f3e MC |
484 | typedef struct { |
485 | int (*cmd) (SSL_CONF_CTX *cctx, const char *value); | |
486 | const char *str_file; | |
487 | const char *str_cmdline; | |
656b2605 DSH |
488 | unsigned short flags; |
489 | unsigned short value_type; | |
0f113f3e | 490 | } ssl_conf_cmd_tbl; |
3db935a9 | 491 | |
ec2f7e56 DSH |
492 | /* Table of supported parameters */ |
493 | ||
656b2605 DSH |
494 | #define SSL_CONF_CMD(name, cmdopt, flags, type) \ |
495 | {cmd_##name, #name, cmdopt, flags, type} | |
496 | ||
497 | #define SSL_CONF_CMD_STRING(name, cmdopt, flags) \ | |
498 | SSL_CONF_CMD(name, cmdopt, flags, SSL_CONF_TYPE_STRING) | |
ec2f7e56 | 499 | |
656b2605 DSH |
500 | #define SSL_CONF_CMD_SWITCH(name, flags) \ |
501 | {0, NULL, name, flags, SSL_CONF_TYPE_NONE} | |
3db935a9 | 502 | |
7e1b7485 | 503 | /* See apps/apps.h if you change this table. */ |
27f3b65f | 504 | static const ssl_conf_cmd_tbl ssl_conf_cmds[] = { |
656b2605 DSH |
505 | SSL_CONF_CMD_SWITCH("no_ssl3", 0), |
506 | SSL_CONF_CMD_SWITCH("no_tls1", 0), | |
507 | SSL_CONF_CMD_SWITCH("no_tls1_1", 0), | |
508 | SSL_CONF_CMD_SWITCH("no_tls1_2", 0), | |
509 | SSL_CONF_CMD_SWITCH("bugs", 0), | |
510 | SSL_CONF_CMD_SWITCH("no_comp", 0), | |
511 | SSL_CONF_CMD_SWITCH("ecdh_single", SSL_CONF_FLAG_SERVER), | |
656b2605 | 512 | SSL_CONF_CMD_SWITCH("no_ticket", 0), |
656b2605 DSH |
513 | SSL_CONF_CMD_SWITCH("serverpref", SSL_CONF_FLAG_SERVER), |
514 | SSL_CONF_CMD_SWITCH("legacy_renegotiation", 0), | |
515 | SSL_CONF_CMD_SWITCH("legacy_server_connect", SSL_CONF_FLAG_SERVER), | |
516 | SSL_CONF_CMD_SWITCH("no_resumption_on_reneg", SSL_CONF_FLAG_SERVER), | |
517 | SSL_CONF_CMD_SWITCH("no_legacy_server_connect", SSL_CONF_FLAG_SERVER), | |
518 | SSL_CONF_CMD_SWITCH("strict", 0), | |
519 | #ifdef OPENSSL_SSL_DEBUG_BROKEN_PROTOCOL | |
520 | SSL_CONF_CMD_SWITCH("debug_broken_protocol", 0), | |
521 | #endif | |
522 | SSL_CONF_CMD_STRING(SignatureAlgorithms, "sigalgs", 0), | |
523 | SSL_CONF_CMD_STRING(ClientSignatureAlgorithms, "client_sigalgs", 0), | |
524 | SSL_CONF_CMD_STRING(Curves, "curves", 0), | |
10bf4fc2 | 525 | #ifndef OPENSSL_NO_EC |
656b2605 | 526 | SSL_CONF_CMD_STRING(ECDHParameters, "named_curve", SSL_CONF_FLAG_SERVER), |
14536c8c | 527 | #endif |
656b2605 DSH |
528 | SSL_CONF_CMD_STRING(CipherString, "cipher", 0), |
529 | SSL_CONF_CMD_STRING(Protocol, NULL, 0), | |
530 | SSL_CONF_CMD_STRING(Options, NULL, 0), | |
429261d0 | 531 | SSL_CONF_CMD_STRING(VerifyMode, NULL, 0), |
656b2605 DSH |
532 | SSL_CONF_CMD(Certificate, "cert", SSL_CONF_FLAG_CERTIFICATE, |
533 | SSL_CONF_TYPE_FILE), | |
534 | SSL_CONF_CMD(PrivateKey, "key", SSL_CONF_FLAG_CERTIFICATE, | |
535 | SSL_CONF_TYPE_FILE), | |
536 | SSL_CONF_CMD(ServerInfoFile, NULL, | |
537 | SSL_CONF_FLAG_SERVER | SSL_CONF_FLAG_CERTIFICATE, | |
538 | SSL_CONF_TYPE_FILE), | |
429261d0 DSH |
539 | SSL_CONF_CMD(ChainCAPath, "chainCApath", SSL_CONF_FLAG_CERTIFICATE, |
540 | SSL_CONF_TYPE_DIR), | |
541 | SSL_CONF_CMD(ChainCAFile, "chainCAfile", SSL_CONF_FLAG_CERTIFICATE, | |
542 | SSL_CONF_TYPE_FILE), | |
543 | SSL_CONF_CMD(VerifyCAPath, "verifyCApath", SSL_CONF_FLAG_CERTIFICATE, | |
544 | SSL_CONF_TYPE_DIR), | |
545 | SSL_CONF_CMD(VerifyCAFile, "verifyCAfile", SSL_CONF_FLAG_CERTIFICATE, | |
546 | SSL_CONF_TYPE_FILE), | |
547 | SSL_CONF_CMD(ClientCAFile, NULL, | |
548 | SSL_CONF_FLAG_SERVER | SSL_CONF_FLAG_CERTIFICATE, | |
549 | SSL_CONF_TYPE_FILE), | |
550 | SSL_CONF_CMD(ClientCAPath, NULL, | |
551 | SSL_CONF_FLAG_SERVER | SSL_CONF_FLAG_CERTIFICATE, | |
552 | SSL_CONF_TYPE_DIR), | |
c557f921 | 553 | #ifndef OPENSSL_NO_DH |
656b2605 DSH |
554 | SSL_CONF_CMD(DHParameters, "dhparam", |
555 | SSL_CONF_FLAG_SERVER | SSL_CONF_FLAG_CERTIFICATE, | |
556 | SSL_CONF_TYPE_FILE) | |
557 | #endif | |
558 | }; | |
559 | ||
560 | /* Supported switches: must match order of switches in ssl_conf_cmds */ | |
561 | static const ssl_switch_tbl ssl_cmd_switches[] = { | |
562 | {SSL_OP_NO_SSLv3, 0}, /* no_ssl3 */ | |
563 | {SSL_OP_NO_TLSv1, 0}, /* no_tls1 */ | |
564 | {SSL_OP_NO_TLSv1_1, 0}, /* no_tls1_1 */ | |
565 | {SSL_OP_NO_TLSv1_2, 0}, /* no_tls1_2 */ | |
566 | {SSL_OP_ALL, 0}, /* bugs */ | |
567 | {SSL_OP_NO_COMPRESSION, 0}, /* no_comp */ | |
568 | {SSL_OP_SINGLE_ECDH_USE, 0}, /* ecdh_single */ | |
656b2605 | 569 | {SSL_OP_NO_TICKET, 0}, /* no_ticket */ |
656b2605 DSH |
570 | {SSL_OP_CIPHER_SERVER_PREFERENCE, 0}, /* serverpref */ |
571 | /* legacy_renegotiation */ | |
572 | {SSL_OP_ALLOW_UNSAFE_LEGACY_RENEGOTIATION, 0}, | |
573 | /* legacy_server_connect */ | |
574 | {SSL_OP_LEGACY_SERVER_CONNECT, 0}, | |
575 | /* no_resumption_on_reneg */ | |
576 | {SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION, 0}, | |
577 | /* no_legacy_server_connect */ | |
578 | {SSL_OP_LEGACY_SERVER_CONNECT, SSL_TFLAG_INV}, | |
579 | {SSL_CERT_FLAG_TLS_STRICT, SSL_TFLAG_CERT}, /* strict */ | |
580 | #ifdef OPENSSL_SSL_DEBUG_BROKEN_PROTOCOL | |
581 | {SSL_CERT_FLAG_BROKEN_PROTOCOL, SSL_TFLAG_CERT} /* debug_broken_protocol */ | |
c557f921 | 582 | #endif |
3db935a9 DSH |
583 | }; |
584 | ||
ec2f7e56 | 585 | static int ssl_conf_cmd_skip_prefix(SSL_CONF_CTX *cctx, const char **pcmd) |
0f113f3e MC |
586 | { |
587 | if (!pcmd || !*pcmd) | |
588 | return 0; | |
589 | /* If a prefix is set, check and skip */ | |
590 | if (cctx->prefix) { | |
591 | if (strlen(*pcmd) <= cctx->prefixlen) | |
592 | return 0; | |
593 | if (cctx->flags & SSL_CONF_FLAG_CMDLINE && | |
594 | strncmp(*pcmd, cctx->prefix, cctx->prefixlen)) | |
595 | return 0; | |
596 | if (cctx->flags & SSL_CONF_FLAG_FILE && | |
597 | strncasecmp(*pcmd, cctx->prefix, cctx->prefixlen)) | |
598 | return 0; | |
599 | *pcmd += cctx->prefixlen; | |
600 | } else if (cctx->flags & SSL_CONF_FLAG_CMDLINE) { | |
601 | if (**pcmd != '-' || !(*pcmd)[1]) | |
602 | return 0; | |
603 | *pcmd += 1; | |
604 | } | |
605 | return 1; | |
606 | } | |
607 | ||
656b2605 DSH |
608 | /* Determine if a command is allowed according to cctx flags */ |
609 | static int ssl_conf_cmd_allowed(SSL_CONF_CTX *cctx, | |
610 | const ssl_conf_cmd_tbl * t) | |
611 | { | |
612 | unsigned int tfl = t->flags; | |
613 | unsigned int cfl = cctx->flags; | |
614 | if ((tfl & SSL_CONF_FLAG_SERVER) && !(cfl & SSL_CONF_FLAG_SERVER)) | |
615 | return 0; | |
616 | if ((tfl & SSL_CONF_FLAG_CLIENT) && !(cfl & SSL_CONF_FLAG_CLIENT)) | |
617 | return 0; | |
618 | if ((tfl & SSL_CONF_FLAG_CERTIFICATE) | |
619 | && !(cfl & SSL_CONF_FLAG_CERTIFICATE)) | |
620 | return 0; | |
621 | return 1; | |
622 | } | |
623 | ||
0f113f3e MC |
624 | static const ssl_conf_cmd_tbl *ssl_conf_cmd_lookup(SSL_CONF_CTX *cctx, |
625 | const char *cmd) | |
626 | { | |
627 | const ssl_conf_cmd_tbl *t; | |
628 | size_t i; | |
629 | if (cmd == NULL) | |
630 | return NULL; | |
631 | ||
632 | /* Look for matching parameter name in table */ | |
b6eb9827 | 633 | for (i = 0, t = ssl_conf_cmds; i < OSSL_NELEM(ssl_conf_cmds); i++, t++) { |
656b2605 DSH |
634 | if (ssl_conf_cmd_allowed(cctx, t)) { |
635 | if (cctx->flags & SSL_CONF_FLAG_CMDLINE) { | |
86885c28 | 636 | if (t->str_cmdline && strcmp(t->str_cmdline, cmd) == 0) |
656b2605 DSH |
637 | return t; |
638 | } | |
639 | if (cctx->flags & SSL_CONF_FLAG_FILE) { | |
86885c28 | 640 | if (t->str_file && strcasecmp(t->str_file, cmd) == 0) |
656b2605 DSH |
641 | return t; |
642 | } | |
0f113f3e MC |
643 | } |
644 | } | |
645 | return NULL; | |
646 | } | |
ec2f7e56 | 647 | |
656b2605 DSH |
648 | static int ctrl_switch_option(SSL_CONF_CTX *cctx, |
649 | const ssl_conf_cmd_tbl * cmd) | |
650 | { | |
651 | /* Find index of command in table */ | |
652 | size_t idx = cmd - ssl_conf_cmds; | |
653 | const ssl_switch_tbl *scmd; | |
654 | /* Sanity check index */ | |
655 | if (idx >= OSSL_NELEM(ssl_cmd_switches)) | |
656 | return 0; | |
657 | /* Obtain switches entry with same index */ | |
658 | scmd = ssl_cmd_switches + idx; | |
659 | ssl_set_option(cctx, scmd->name_flags, scmd->option_value, 1); | |
660 | return 1; | |
661 | } | |
662 | ||
ec2f7e56 | 663 | int SSL_CONF_cmd(SSL_CONF_CTX *cctx, const char *cmd, const char *value) |
0f113f3e MC |
664 | { |
665 | const ssl_conf_cmd_tbl *runcmd; | |
666 | if (cmd == NULL) { | |
667 | SSLerr(SSL_F_SSL_CONF_CMD, SSL_R_INVALID_NULL_CMD_NAME); | |
668 | return 0; | |
669 | } | |
670 | ||
671 | if (!ssl_conf_cmd_skip_prefix(cctx, &cmd)) | |
672 | return -2; | |
673 | ||
674 | runcmd = ssl_conf_cmd_lookup(cctx, cmd); | |
675 | ||
676 | if (runcmd) { | |
677 | int rv; | |
656b2605 DSH |
678 | if (runcmd->value_type == SSL_CONF_TYPE_NONE) { |
679 | return ctrl_switch_option(cctx, runcmd); | |
680 | } | |
0f113f3e MC |
681 | if (value == NULL) |
682 | return -3; | |
683 | rv = runcmd->cmd(cctx, value); | |
684 | if (rv > 0) | |
685 | return 2; | |
686 | if (rv == -2) | |
687 | return -2; | |
688 | if (cctx->flags & SSL_CONF_FLAG_SHOW_ERRORS) { | |
689 | SSLerr(SSL_F_SSL_CONF_CMD, SSL_R_BAD_VALUE); | |
690 | ERR_add_error_data(4, "cmd=", cmd, ", value=", value); | |
691 | } | |
692 | return 0; | |
693 | } | |
694 | ||
0f113f3e MC |
695 | if (cctx->flags & SSL_CONF_FLAG_SHOW_ERRORS) { |
696 | SSLerr(SSL_F_SSL_CONF_CMD, SSL_R_UNKNOWN_CMD_NAME); | |
697 | ERR_add_error_data(2, "cmd=", cmd); | |
698 | } | |
699 | ||
700 | return -2; | |
701 | } | |
3db935a9 DSH |
702 | |
703 | int SSL_CONF_cmd_argv(SSL_CONF_CTX *cctx, int *pargc, char ***pargv) | |
0f113f3e MC |
704 | { |
705 | int rv; | |
706 | const char *arg = NULL, *argn; | |
707 | if (pargc && *pargc == 0) | |
708 | return 0; | |
709 | if (!pargc || *pargc > 0) | |
710 | arg = **pargv; | |
711 | if (arg == NULL) | |
712 | return 0; | |
713 | if (!pargc || *pargc > 1) | |
714 | argn = (*pargv)[1]; | |
715 | else | |
716 | argn = NULL; | |
717 | cctx->flags &= ~SSL_CONF_FLAG_FILE; | |
718 | cctx->flags |= SSL_CONF_FLAG_CMDLINE; | |
719 | rv = SSL_CONF_cmd(cctx, arg, argn); | |
720 | if (rv > 0) { | |
721 | /* Success: update pargc, pargv */ | |
722 | (*pargv) += rv; | |
723 | if (pargc) | |
724 | (*pargc) -= rv; | |
725 | return rv; | |
726 | } | |
727 | /* Unknown switch: indicate no arguments processed */ | |
728 | if (rv == -2) | |
729 | return 0; | |
730 | /* Some error occurred processing command, return fatal error */ | |
731 | if (rv == 0) | |
732 | return -1; | |
733 | return rv; | |
734 | } | |
3db935a9 | 735 | |
ec2f7e56 | 736 | int SSL_CONF_cmd_value_type(SSL_CONF_CTX *cctx, const char *cmd) |
0f113f3e MC |
737 | { |
738 | if (ssl_conf_cmd_skip_prefix(cctx, &cmd)) { | |
739 | const ssl_conf_cmd_tbl *runcmd; | |
740 | runcmd = ssl_conf_cmd_lookup(cctx, cmd); | |
741 | if (runcmd) | |
742 | return runcmd->value_type; | |
743 | } | |
744 | return SSL_CONF_TYPE_UNKNOWN; | |
745 | } | |
ec2f7e56 | 746 | |
3db935a9 | 747 | SSL_CONF_CTX *SSL_CONF_CTX_new(void) |
0f113f3e | 748 | { |
64b25758 | 749 | SSL_CONF_CTX *ret = OPENSSL_zalloc(sizeof(*ret)); |
b4faea50 | 750 | |
0f113f3e MC |
751 | return ret; |
752 | } | |
3db935a9 | 753 | |
ec2f7e56 | 754 | int SSL_CONF_CTX_finish(SSL_CONF_CTX *cctx) |
0f113f3e | 755 | { |
2011b169 DSH |
756 | /* See if any certificates are missing private keys */ |
757 | size_t i; | |
758 | CERT *c = NULL; | |
759 | if (cctx->ctx) | |
760 | c = cctx->ctx->cert; | |
761 | else if (cctx->ssl) | |
762 | c = cctx->ssl->cert; | |
763 | if (c && cctx->flags & SSL_CONF_FLAG_REQUIRE_PRIVATE) { | |
764 | for (i = 0; i < SSL_PKEY_NUM; i++) { | |
765 | const char *p = cctx->cert_filename[i]; | |
766 | /* | |
767 | * If missing private key try to load one from certificate file | |
768 | */ | |
769 | if (p && !c->pkeys[i].privatekey) { | |
770 | if (!cmd_PrivateKey(cctx, p)) | |
771 | return 0; | |
772 | } | |
773 | } | |
774 | } | |
429261d0 DSH |
775 | if (cctx->canames) { |
776 | if (cctx->ssl) | |
777 | SSL_set_client_CA_list(cctx->ssl, cctx->canames); | |
778 | else if (cctx->ctx) | |
779 | SSL_CTX_set_client_CA_list(cctx->ctx, cctx->canames); | |
780 | else | |
781 | sk_X509_NAME_pop_free(cctx->canames, X509_NAME_free); | |
782 | cctx->canames = NULL; | |
783 | } | |
0f113f3e MC |
784 | return 1; |
785 | } | |
ec2f7e56 | 786 | |
3db935a9 | 787 | void SSL_CONF_CTX_free(SSL_CONF_CTX *cctx) |
0f113f3e MC |
788 | { |
789 | if (cctx) { | |
2011b169 | 790 | size_t i; |
656b2605 | 791 | for (i = 0; i < SSL_PKEY_NUM; i++) |
b548a1f1 | 792 | OPENSSL_free(cctx->cert_filename[i]); |
b548a1f1 | 793 | OPENSSL_free(cctx->prefix); |
429261d0 | 794 | sk_X509_NAME_pop_free(cctx->canames, X509_NAME_free); |
4445704f | 795 | OPENSSL_free(cctx); |
0f113f3e MC |
796 | } |
797 | } | |
3db935a9 DSH |
798 | |
799 | unsigned int SSL_CONF_CTX_set_flags(SSL_CONF_CTX *cctx, unsigned int flags) | |
0f113f3e MC |
800 | { |
801 | cctx->flags |= flags; | |
802 | return cctx->flags; | |
803 | } | |
3db935a9 DSH |
804 | |
805 | unsigned int SSL_CONF_CTX_clear_flags(SSL_CONF_CTX *cctx, unsigned int flags) | |
0f113f3e MC |
806 | { |
807 | cctx->flags &= ~flags; | |
808 | return cctx->flags; | |
809 | } | |
3db935a9 DSH |
810 | |
811 | int SSL_CONF_CTX_set1_prefix(SSL_CONF_CTX *cctx, const char *pre) | |
0f113f3e MC |
812 | { |
813 | char *tmp = NULL; | |
814 | if (pre) { | |
7644a9ae | 815 | tmp = OPENSSL_strdup(pre); |
0f113f3e MC |
816 | if (tmp == NULL) |
817 | return 0; | |
818 | } | |
b548a1f1 | 819 | OPENSSL_free(cctx->prefix); |
0f113f3e MC |
820 | cctx->prefix = tmp; |
821 | if (tmp) | |
822 | cctx->prefixlen = strlen(tmp); | |
823 | else | |
824 | cctx->prefixlen = 0; | |
825 | return 1; | |
826 | } | |
3db935a9 DSH |
827 | |
828 | void SSL_CONF_CTX_set_ssl(SSL_CONF_CTX *cctx, SSL *ssl) | |
0f113f3e MC |
829 | { |
830 | cctx->ssl = ssl; | |
831 | cctx->ctx = NULL; | |
832 | if (ssl) { | |
833 | cctx->poptions = &ssl->options; | |
834 | cctx->pcert_flags = &ssl->cert->cert_flags; | |
429261d0 | 835 | cctx->pvfy_flags = &ssl->verify_mode; |
0f113f3e MC |
836 | } else { |
837 | cctx->poptions = NULL; | |
838 | cctx->pcert_flags = NULL; | |
429261d0 | 839 | cctx->pvfy_flags = NULL; |
0f113f3e MC |
840 | } |
841 | } | |
3db935a9 DSH |
842 | |
843 | void SSL_CONF_CTX_set_ssl_ctx(SSL_CONF_CTX *cctx, SSL_CTX *ctx) | |
0f113f3e MC |
844 | { |
845 | cctx->ctx = ctx; | |
846 | cctx->ssl = NULL; | |
847 | if (ctx) { | |
848 | cctx->poptions = &ctx->options; | |
849 | cctx->pcert_flags = &ctx->cert->cert_flags; | |
429261d0 | 850 | cctx->pvfy_flags = &ctx->verify_mode; |
0f113f3e MC |
851 | } else { |
852 | cctx->poptions = NULL; | |
853 | cctx->pcert_flags = NULL; | |
429261d0 | 854 | cctx->pvfy_flags = NULL; |
0f113f3e MC |
855 | } |
856 | } |