xref: /openssl/ssl/ssl_conf.c (revision 38b051a1)
1 /*
2  * Copyright 2012-2022 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 
10 #include <stdio.h>
11 #include "ssl_local.h"
12 #include <openssl/conf.h>
13 #include <openssl/objects.h>
14 #include <openssl/decoder.h>
15 #include <openssl/core_dispatch.h>
16 #include "internal/nelem.h"
17 
18 /*
19  * structure holding name tables. This is used for permitted elements in lists
20  * such as TLSv1.
21  */
22 
23 typedef struct {
24     const char *name;
25     int namelen;
26     unsigned int name_flags;
27     uint64_t option_value;
28 } ssl_flag_tbl;
29 
30 /* Switch table: use for single command line switches like no_tls2 */
31 typedef struct {
32     uint64_t option_value;
33     unsigned int name_flags;
34 } ssl_switch_tbl;
35 
36 /* Sense of name is inverted e.g. "TLSv1" will clear SSL_OP_NO_TLSv1 */
37 #define SSL_TFLAG_INV   0x1
38 /* Mask for type of flag referred to */
39 #define SSL_TFLAG_TYPE_MASK 0xf00
40 /* Flag is for options */
41 #define SSL_TFLAG_OPTION    0x000
42 /* Flag is for cert_flags */
43 #define SSL_TFLAG_CERT      0x100
44 /* Flag is for verify mode */
45 #define SSL_TFLAG_VFY       0x200
46 /* Option can only be used for clients */
47 #define SSL_TFLAG_CLIENT SSL_CONF_FLAG_CLIENT
48 /* Option can only be used for servers */
49 #define SSL_TFLAG_SERVER SSL_CONF_FLAG_SERVER
50 #define SSL_TFLAG_BOTH (SSL_TFLAG_CLIENT|SSL_TFLAG_SERVER)
51 
52 #define SSL_FLAG_TBL(str, flag) \
53         {str, (int)(sizeof(str) - 1), SSL_TFLAG_BOTH, flag}
54 #define SSL_FLAG_TBL_SRV(str, flag) \
55         {str, (int)(sizeof(str) - 1), SSL_TFLAG_SERVER, flag}
56 #define SSL_FLAG_TBL_CLI(str, flag) \
57         {str, (int)(sizeof(str) - 1), SSL_TFLAG_CLIENT, flag}
58 #define SSL_FLAG_TBL_INV(str, flag) \
59         {str, (int)(sizeof(str) - 1), SSL_TFLAG_INV|SSL_TFLAG_BOTH, flag}
60 #define SSL_FLAG_TBL_SRV_INV(str, flag) \
61         {str, (int)(sizeof(str) - 1), SSL_TFLAG_INV|SSL_TFLAG_SERVER, flag}
62 #define SSL_FLAG_TBL_CERT(str, flag) \
63         {str, (int)(sizeof(str) - 1), SSL_TFLAG_CERT|SSL_TFLAG_BOTH, flag}
64 
65 #define SSL_FLAG_VFY_CLI(str, flag) \
66         {str, (int)(sizeof(str) - 1), SSL_TFLAG_VFY | SSL_TFLAG_CLIENT, flag}
67 #define SSL_FLAG_VFY_SRV(str, flag) \
68         {str, (int)(sizeof(str) - 1), SSL_TFLAG_VFY | SSL_TFLAG_SERVER, flag}
69 
70 /*
71  * Opaque structure containing SSL configuration context.
72  */
73 
74 struct ssl_conf_ctx_st {
75     /*
76      * Various flags indicating (among other things) which options we will
77      * recognise.
78      */
79     unsigned int flags;
80     /* Prefix and length of commands */
81     char *prefix;
82     size_t prefixlen;
83     /* SSL_CTX or SSL structure to perform operations on */
84     SSL_CTX *ctx;
85     SSL *ssl;
86     /* Pointer to SSL or SSL_CTX options field or NULL if none */
87     uint64_t *poptions;
88     /* Certificate filenames for each type */
89     char *cert_filename[SSL_PKEY_NUM];
90     /* Pointer to SSL or SSL_CTX cert_flags or NULL if none */
91     uint32_t *pcert_flags;
92     /* Pointer to SSL or SSL_CTX verify_mode or NULL if none */
93     uint32_t *pvfy_flags;
94     /* Pointer to SSL or SSL_CTX min_version field or NULL if none */
95     int *min_version;
96     /* Pointer to SSL or SSL_CTX max_version field or NULL if none */
97     int *max_version;
98     /* Current flag table being worked on */
99     const ssl_flag_tbl *tbl;
100     /* Size of table */
101     size_t ntbl;
102     /* Client CA names */
103     STACK_OF(X509_NAME) *canames;
104 };
105 
ssl_set_option(SSL_CONF_CTX * cctx,unsigned int name_flags,uint64_t option_value,int onoff)106 static void ssl_set_option(SSL_CONF_CTX *cctx, unsigned int name_flags,
107                            uint64_t option_value, int onoff)
108 {
109     uint32_t *pflags;
110 
111     if (cctx->poptions == NULL)
112         return;
113     if (name_flags & SSL_TFLAG_INV)
114         onoff ^= 1;
115     switch (name_flags & SSL_TFLAG_TYPE_MASK) {
116 
117     case SSL_TFLAG_CERT:
118         pflags = cctx->pcert_flags;
119         break;
120 
121     case SSL_TFLAG_VFY:
122         pflags = cctx->pvfy_flags;
123         break;
124 
125     case SSL_TFLAG_OPTION:
126         if (onoff)
127             *cctx->poptions |= option_value;
128         else
129             *cctx->poptions &= ~option_value;
130         return;
131 
132     default:
133         return;
134 
135     }
136     if (onoff)
137         *pflags |= option_value;
138     else
139         *pflags &= ~option_value;
140 }
141 
ssl_match_option(SSL_CONF_CTX * cctx,const ssl_flag_tbl * tbl,const char * name,int namelen,int onoff)142 static int ssl_match_option(SSL_CONF_CTX *cctx, const ssl_flag_tbl *tbl,
143                             const char *name, int namelen, int onoff)
144 {
145     /* If name not relevant for context skip */
146     if (!(cctx->flags & tbl->name_flags & SSL_TFLAG_BOTH))
147         return 0;
148     if (namelen == -1) {
149         if (strcmp(tbl->name, name))
150             return 0;
151     } else if (tbl->namelen != namelen
152                || OPENSSL_strncasecmp(tbl->name, name, namelen))
153         return 0;
154     ssl_set_option(cctx, tbl->name_flags, tbl->option_value, onoff);
155     return 1;
156 }
157 
ssl_set_option_list(const char * elem,int len,void * usr)158 static int ssl_set_option_list(const char *elem, int len, void *usr)
159 {
160     SSL_CONF_CTX *cctx = usr;
161     size_t i;
162     const ssl_flag_tbl *tbl;
163     int onoff = 1;
164     /*
165      * len == -1 indicates not being called in list context, just for single
166      * command line switches, so don't allow +, -.
167      */
168     if (elem == NULL)
169         return 0;
170     if (len != -1) {
171         if (*elem == '+') {
172             elem++;
173             len--;
174             onoff = 1;
175         } else if (*elem == '-') {
176             elem++;
177             len--;
178             onoff = 0;
179         }
180     }
181     for (i = 0, tbl = cctx->tbl; i < cctx->ntbl; i++, tbl++) {
182         if (ssl_match_option(cctx, tbl, elem, len, onoff))
183             return 1;
184     }
185     return 0;
186 }
187 
188 /* Set supported signature algorithms */
cmd_SignatureAlgorithms(SSL_CONF_CTX * cctx,const char * value)189 static int cmd_SignatureAlgorithms(SSL_CONF_CTX *cctx, const char *value)
190 {
191     int rv;
192     if (cctx->ssl)
193         rv = SSL_set1_sigalgs_list(cctx->ssl, value);
194     /* NB: ctx == NULL performs syntax checking only */
195     else
196         rv = SSL_CTX_set1_sigalgs_list(cctx->ctx, value);
197     return rv > 0;
198 }
199 
200 /* Set supported client signature algorithms */
cmd_ClientSignatureAlgorithms(SSL_CONF_CTX * cctx,const char * value)201 static int cmd_ClientSignatureAlgorithms(SSL_CONF_CTX *cctx, const char *value)
202 {
203     int rv;
204     if (cctx->ssl)
205         rv = SSL_set1_client_sigalgs_list(cctx->ssl, value);
206     /* NB: ctx == NULL performs syntax checking only */
207     else
208         rv = SSL_CTX_set1_client_sigalgs_list(cctx->ctx, value);
209     return rv > 0;
210 }
211 
cmd_Groups(SSL_CONF_CTX * cctx,const char * value)212 static int cmd_Groups(SSL_CONF_CTX *cctx, const char *value)
213 {
214     int rv;
215     if (cctx->ssl)
216         rv = SSL_set1_groups_list(cctx->ssl, value);
217     /* NB: ctx == NULL performs syntax checking only */
218     else
219         rv = SSL_CTX_set1_groups_list(cctx->ctx, value);
220     return rv > 0;
221 }
222 
223 /* This is the old name for cmd_Groups - retained for backwards compatibility */
cmd_Curves(SSL_CONF_CTX * cctx,const char * value)224 static int cmd_Curves(SSL_CONF_CTX *cctx, const char *value)
225 {
226     return cmd_Groups(cctx, value);
227 }
228 
229 /* ECDH temporary parameters */
cmd_ECDHParameters(SSL_CONF_CTX * cctx,const char * value)230 static int cmd_ECDHParameters(SSL_CONF_CTX *cctx, const char *value)
231 {
232     int rv = 1;
233 
234     /* Ignore values supported by 1.0.2 for the automatic selection */
235     if ((cctx->flags & SSL_CONF_FLAG_FILE)
236             && (OPENSSL_strcasecmp(value, "+automatic") == 0
237                 || OPENSSL_strcasecmp(value, "automatic") == 0))
238         return 1;
239     if ((cctx->flags & SSL_CONF_FLAG_CMDLINE) &&
240         strcmp(value, "auto") == 0)
241         return 1;
242 
243     /* ECDHParameters accepts a single group name */
244     if (strstr(value, ":") != NULL)
245         return 0;
246 
247     if (cctx->ctx)
248         rv = SSL_CTX_set1_groups_list(cctx->ctx, value);
249     else if (cctx->ssl)
250         rv = SSL_set1_groups_list(cctx->ssl, value);
251 
252     return rv > 0;
253 }
254 
cmd_CipherString(SSL_CONF_CTX * cctx,const char * value)255 static int cmd_CipherString(SSL_CONF_CTX *cctx, const char *value)
256 {
257     int rv = 1;
258 
259     if (cctx->ctx)
260         rv = SSL_CTX_set_cipher_list(cctx->ctx, value);
261     if (cctx->ssl)
262         rv = SSL_set_cipher_list(cctx->ssl, value);
263     return rv > 0;
264 }
265 
cmd_Ciphersuites(SSL_CONF_CTX * cctx,const char * value)266 static int cmd_Ciphersuites(SSL_CONF_CTX *cctx, const char *value)
267 {
268     int rv = 1;
269 
270     if (cctx->ctx)
271         rv = SSL_CTX_set_ciphersuites(cctx->ctx, value);
272     if (cctx->ssl)
273         rv = SSL_set_ciphersuites(cctx->ssl, value);
274     return rv > 0;
275 }
276 
cmd_Protocol(SSL_CONF_CTX * cctx,const char * value)277 static int cmd_Protocol(SSL_CONF_CTX *cctx, const char *value)
278 {
279     static const ssl_flag_tbl ssl_protocol_list[] = {
280         SSL_FLAG_TBL_INV("ALL", SSL_OP_NO_SSL_MASK),
281         SSL_FLAG_TBL_INV("SSLv2", SSL_OP_NO_SSLv2),
282         SSL_FLAG_TBL_INV("SSLv3", SSL_OP_NO_SSLv3),
283         SSL_FLAG_TBL_INV("TLSv1", SSL_OP_NO_TLSv1),
284         SSL_FLAG_TBL_INV("TLSv1.1", SSL_OP_NO_TLSv1_1),
285         SSL_FLAG_TBL_INV("TLSv1.2", SSL_OP_NO_TLSv1_2),
286         SSL_FLAG_TBL_INV("TLSv1.3", SSL_OP_NO_TLSv1_3),
287         SSL_FLAG_TBL_INV("DTLSv1", SSL_OP_NO_DTLSv1),
288         SSL_FLAG_TBL_INV("DTLSv1.2", SSL_OP_NO_DTLSv1_2)
289     };
290     cctx->tbl = ssl_protocol_list;
291     cctx->ntbl = OSSL_NELEM(ssl_protocol_list);
292     return CONF_parse_list(value, ',', 1, ssl_set_option_list, cctx);
293 }
294 
295 /*
296  * protocol_from_string - converts a protocol version string to a number
297  *
298  * Returns -1 on failure or the version on success
299  */
protocol_from_string(const char * value)300 static int protocol_from_string(const char *value)
301 {
302     struct protocol_versions {
303         const char *name;
304         int version;
305     };
306     /*
307      * Note: To avoid breaking previously valid configurations, we must retain
308      * legacy entries in this table even if the underlying protocol is no
309      * longer supported.  This also means that the constants SSL3_VERSION, ...
310      * need to be retained indefinitely.  This table can only grow, never
311      * shrink.
312      */
313     static const struct protocol_versions versions[] = {
314         {"None", 0},
315         {"SSLv3", SSL3_VERSION},
316         {"TLSv1", TLS1_VERSION},
317         {"TLSv1.1", TLS1_1_VERSION},
318         {"TLSv1.2", TLS1_2_VERSION},
319         {"TLSv1.3", TLS1_3_VERSION},
320         {"DTLSv1", DTLS1_VERSION},
321         {"DTLSv1.2", DTLS1_2_VERSION}
322     };
323     size_t i;
324     size_t n = OSSL_NELEM(versions);
325 
326     for (i = 0; i < n; i++)
327         if (strcmp(versions[i].name, value) == 0)
328             return versions[i].version;
329     return -1;
330 }
331 
min_max_proto(SSL_CONF_CTX * cctx,const char * value,int * bound)332 static int min_max_proto(SSL_CONF_CTX *cctx, const char *value, int *bound)
333 {
334     int method_version;
335     int new_version;
336 
337     if (cctx->ctx != NULL)
338         method_version = cctx->ctx->method->version;
339     else if (cctx->ssl != NULL)
340         method_version = cctx->ssl->ctx->method->version;
341     else
342         return 0;
343     if ((new_version = protocol_from_string(value)) < 0)
344         return 0;
345     return ssl_set_version_bound(method_version, new_version, bound);
346 }
347 
348 /*
349  * cmd_MinProtocol - Set min protocol version
350  * @cctx: config structure to save settings in
351  * @value: The min protocol version in string form
352  *
353  * Returns 1 on success and 0 on failure.
354  */
cmd_MinProtocol(SSL_CONF_CTX * cctx,const char * value)355 static int cmd_MinProtocol(SSL_CONF_CTX *cctx, const char *value)
356 {
357     return min_max_proto(cctx, value, cctx->min_version);
358 }
359 
360 /*
361  * cmd_MaxProtocol - Set max protocol version
362  * @cctx: config structure to save settings in
363  * @value: The max protocol version in string form
364  *
365  * Returns 1 on success and 0 on failure.
366  */
cmd_MaxProtocol(SSL_CONF_CTX * cctx,const char * value)367 static int cmd_MaxProtocol(SSL_CONF_CTX *cctx, const char *value)
368 {
369     return min_max_proto(cctx, value, cctx->max_version);
370 }
371 
cmd_Options(SSL_CONF_CTX * cctx,const char * value)372 static int cmd_Options(SSL_CONF_CTX *cctx, const char *value)
373 {
374     static const ssl_flag_tbl ssl_option_list[] = {
375         SSL_FLAG_TBL_INV("SessionTicket", SSL_OP_NO_TICKET),
376         SSL_FLAG_TBL_INV("EmptyFragments",
377                          SSL_OP_DONT_INSERT_EMPTY_FRAGMENTS),
378         SSL_FLAG_TBL("Bugs", SSL_OP_ALL),
379         SSL_FLAG_TBL_INV("Compression", SSL_OP_NO_COMPRESSION),
380         SSL_FLAG_TBL_SRV("ServerPreference", SSL_OP_CIPHER_SERVER_PREFERENCE),
381         SSL_FLAG_TBL_SRV("NoResumptionOnRenegotiation",
382                          SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION),
383         SSL_FLAG_TBL_SRV("DHSingle", SSL_OP_SINGLE_DH_USE),
384         SSL_FLAG_TBL_SRV("ECDHSingle", SSL_OP_SINGLE_ECDH_USE),
385         SSL_FLAG_TBL("UnsafeLegacyRenegotiation",
386                      SSL_OP_ALLOW_UNSAFE_LEGACY_RENEGOTIATION),
387         SSL_FLAG_TBL("UnsafeLegacyServerConnect",
388                      SSL_OP_LEGACY_SERVER_CONNECT),
389         SSL_FLAG_TBL("ClientRenegotiation",
390                      SSL_OP_ALLOW_CLIENT_RENEGOTIATION),
391         SSL_FLAG_TBL_INV("EncryptThenMac", SSL_OP_NO_ENCRYPT_THEN_MAC),
392         SSL_FLAG_TBL("NoRenegotiation", SSL_OP_NO_RENEGOTIATION),
393         SSL_FLAG_TBL("AllowNoDHEKEX", SSL_OP_ALLOW_NO_DHE_KEX),
394         SSL_FLAG_TBL("PrioritizeChaCha", SSL_OP_PRIORITIZE_CHACHA),
395         SSL_FLAG_TBL("MiddleboxCompat", SSL_OP_ENABLE_MIDDLEBOX_COMPAT),
396         SSL_FLAG_TBL_INV("AntiReplay", SSL_OP_NO_ANTI_REPLAY),
397         SSL_FLAG_TBL_INV("ExtendedMasterSecret", SSL_OP_NO_EXTENDED_MASTER_SECRET),
398         SSL_FLAG_TBL_INV("CANames", SSL_OP_DISABLE_TLSEXT_CA_NAMES),
399         SSL_FLAG_TBL("KTLS", SSL_OP_ENABLE_KTLS),
400         SSL_FLAG_TBL_CERT("StrictCertCheck", SSL_CERT_FLAG_TLS_STRICT)
401     };
402     if (value == NULL)
403         return -3;
404     cctx->tbl = ssl_option_list;
405     cctx->ntbl = OSSL_NELEM(ssl_option_list);
406     return CONF_parse_list(value, ',', 1, ssl_set_option_list, cctx);
407 }
408 
cmd_VerifyMode(SSL_CONF_CTX * cctx,const char * value)409 static int cmd_VerifyMode(SSL_CONF_CTX *cctx, const char *value)
410 {
411     static const ssl_flag_tbl ssl_vfy_list[] = {
412         SSL_FLAG_VFY_CLI("Peer", SSL_VERIFY_PEER),
413         SSL_FLAG_VFY_SRV("Request", SSL_VERIFY_PEER),
414         SSL_FLAG_VFY_SRV("Require",
415                          SSL_VERIFY_PEER | SSL_VERIFY_FAIL_IF_NO_PEER_CERT),
416         SSL_FLAG_VFY_SRV("Once", SSL_VERIFY_PEER | SSL_VERIFY_CLIENT_ONCE),
417         SSL_FLAG_VFY_SRV("RequestPostHandshake",
418                          SSL_VERIFY_PEER | SSL_VERIFY_POST_HANDSHAKE),
419         SSL_FLAG_VFY_SRV("RequirePostHandshake",
420                          SSL_VERIFY_PEER | SSL_VERIFY_POST_HANDSHAKE |
421                          SSL_VERIFY_FAIL_IF_NO_PEER_CERT),
422     };
423     if (value == NULL)
424         return -3;
425     cctx->tbl = ssl_vfy_list;
426     cctx->ntbl = OSSL_NELEM(ssl_vfy_list);
427     return CONF_parse_list(value, ',', 1, ssl_set_option_list, cctx);
428 }
429 
cmd_Certificate(SSL_CONF_CTX * cctx,const char * value)430 static int cmd_Certificate(SSL_CONF_CTX *cctx, const char *value)
431 {
432     int rv = 1;
433     CERT *c = NULL;
434     if (cctx->ctx != NULL) {
435         rv = SSL_CTX_use_certificate_chain_file(cctx->ctx, value);
436         c = cctx->ctx->cert;
437     }
438     if (cctx->ssl != NULL) {
439         SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL(cctx->ssl);
440 
441         if (sc != NULL) {
442             rv = SSL_use_certificate_chain_file(cctx->ssl, value);
443             c = sc->cert;
444         } else {
445             rv = 0;
446         }
447     }
448     if (rv > 0 && c != NULL && cctx->flags & SSL_CONF_FLAG_REQUIRE_PRIVATE) {
449         char **pfilename = &cctx->cert_filename[c->key - c->pkeys];
450 
451         OPENSSL_free(*pfilename);
452         *pfilename = OPENSSL_strdup(value);
453         if (*pfilename == NULL)
454             rv = 0;
455     }
456 
457     return rv > 0;
458 }
459 
cmd_PrivateKey(SSL_CONF_CTX * cctx,const char * value)460 static int cmd_PrivateKey(SSL_CONF_CTX *cctx, const char *value)
461 {
462     int rv = 1;
463     if (!(cctx->flags & SSL_CONF_FLAG_CERTIFICATE))
464         return -2;
465     if (cctx->ctx)
466         rv = SSL_CTX_use_PrivateKey_file(cctx->ctx, value, SSL_FILETYPE_PEM);
467     if (cctx->ssl)
468         rv = SSL_use_PrivateKey_file(cctx->ssl, value, SSL_FILETYPE_PEM);
469     return rv > 0;
470 }
471 
cmd_ServerInfoFile(SSL_CONF_CTX * cctx,const char * value)472 static int cmd_ServerInfoFile(SSL_CONF_CTX *cctx, const char *value)
473 {
474     int rv = 1;
475     if (cctx->ctx)
476         rv = SSL_CTX_use_serverinfo_file(cctx->ctx, value);
477     return rv > 0;
478 }
479 
do_store(SSL_CONF_CTX * cctx,const char * CAfile,const char * CApath,const char * CAstore,int verify_store)480 static int do_store(SSL_CONF_CTX *cctx,
481                     const char *CAfile, const char *CApath, const char *CAstore,
482                     int verify_store)
483 {
484     CERT *cert;
485     X509_STORE **st;
486     SSL_CTX *ctx;
487     OSSL_LIB_CTX *libctx = NULL;
488     const char *propq = NULL;
489 
490     if (cctx->ctx != NULL) {
491         cert = cctx->ctx->cert;
492         ctx = cctx->ctx;
493     } else if (cctx->ssl != NULL) {
494         SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL(cctx->ssl);
495 
496         if (sc == NULL)
497             return 0;
498 
499         cert = sc->cert;
500         ctx = cctx->ssl->ctx;
501     } else {
502         return 1;
503     }
504     if (ctx != NULL) {
505         libctx = ctx->libctx;
506         propq = ctx->propq;
507     }
508     st = verify_store ? &cert->verify_store : &cert->chain_store;
509     if (*st == NULL) {
510         *st = X509_STORE_new();
511         if (*st == NULL)
512             return 0;
513     }
514 
515     if (CAfile != NULL && !X509_STORE_load_file_ex(*st, CAfile, libctx, propq))
516         return 0;
517     if (CApath != NULL && !X509_STORE_load_path(*st, CApath))
518         return 0;
519     if (CAstore != NULL && !X509_STORE_load_store_ex(*st, CAstore, libctx,
520                                                      propq))
521         return 0;
522     return 1;
523 }
524 
cmd_ChainCAPath(SSL_CONF_CTX * cctx,const char * value)525 static int cmd_ChainCAPath(SSL_CONF_CTX *cctx, const char *value)
526 {
527     return do_store(cctx, NULL, value, NULL, 0);
528 }
529 
cmd_ChainCAFile(SSL_CONF_CTX * cctx,const char * value)530 static int cmd_ChainCAFile(SSL_CONF_CTX *cctx, const char *value)
531 {
532     return do_store(cctx, value, NULL, NULL, 0);
533 }
534 
cmd_ChainCAStore(SSL_CONF_CTX * cctx,const char * value)535 static int cmd_ChainCAStore(SSL_CONF_CTX *cctx, const char *value)
536 {
537     return do_store(cctx, NULL, NULL, value, 0);
538 }
539 
cmd_VerifyCAPath(SSL_CONF_CTX * cctx,const char * value)540 static int cmd_VerifyCAPath(SSL_CONF_CTX *cctx, const char *value)
541 {
542     return do_store(cctx, NULL, value, NULL, 1);
543 }
544 
cmd_VerifyCAFile(SSL_CONF_CTX * cctx,const char * value)545 static int cmd_VerifyCAFile(SSL_CONF_CTX *cctx, const char *value)
546 {
547     return do_store(cctx, value, NULL, NULL, 1);
548 }
549 
cmd_VerifyCAStore(SSL_CONF_CTX * cctx,const char * value)550 static int cmd_VerifyCAStore(SSL_CONF_CTX *cctx, const char *value)
551 {
552     return do_store(cctx, NULL, NULL, value, 1);
553 }
554 
cmd_RequestCAFile(SSL_CONF_CTX * cctx,const char * value)555 static int cmd_RequestCAFile(SSL_CONF_CTX *cctx, const char *value)
556 {
557     if (cctx->canames == NULL)
558         cctx->canames = sk_X509_NAME_new_null();
559     if (cctx->canames == NULL)
560         return 0;
561     return SSL_add_file_cert_subjects_to_stack(cctx->canames, value);
562 }
563 
cmd_ClientCAFile(SSL_CONF_CTX * cctx,const char * value)564 static int cmd_ClientCAFile(SSL_CONF_CTX *cctx, const char *value)
565 {
566     return cmd_RequestCAFile(cctx, value);
567 }
568 
cmd_RequestCAPath(SSL_CONF_CTX * cctx,const char * value)569 static int cmd_RequestCAPath(SSL_CONF_CTX *cctx, const char *value)
570 {
571     if (cctx->canames == NULL)
572         cctx->canames = sk_X509_NAME_new_null();
573     if (cctx->canames == NULL)
574         return 0;
575     return SSL_add_dir_cert_subjects_to_stack(cctx->canames, value);
576 }
577 
cmd_ClientCAPath(SSL_CONF_CTX * cctx,const char * value)578 static int cmd_ClientCAPath(SSL_CONF_CTX *cctx, const char *value)
579 {
580     return cmd_RequestCAPath(cctx, value);
581 }
582 
cmd_RequestCAStore(SSL_CONF_CTX * cctx,const char * value)583 static int cmd_RequestCAStore(SSL_CONF_CTX *cctx, const char *value)
584 {
585     if (cctx->canames == NULL)
586         cctx->canames = sk_X509_NAME_new_null();
587     if (cctx->canames == NULL)
588         return 0;
589     return SSL_add_store_cert_subjects_to_stack(cctx->canames, value);
590 }
591 
cmd_ClientCAStore(SSL_CONF_CTX * cctx,const char * value)592 static int cmd_ClientCAStore(SSL_CONF_CTX *cctx, const char *value)
593 {
594     return cmd_RequestCAStore(cctx, value);
595 }
596 
cmd_DHParameters(SSL_CONF_CTX * cctx,const char * value)597 static int cmd_DHParameters(SSL_CONF_CTX *cctx, const char *value)
598 {
599     int rv = 0;
600     EVP_PKEY *dhpkey = NULL;
601     BIO *in = NULL;
602     SSL_CTX *sslctx = (cctx->ssl != NULL) ? cctx->ssl->ctx : cctx->ctx;
603     OSSL_DECODER_CTX *decoderctx = NULL;
604 
605     if (cctx->ctx != NULL || cctx->ssl != NULL) {
606         in = BIO_new(BIO_s_file());
607         if (in == NULL)
608             goto end;
609         if (BIO_read_filename(in, value) <= 0)
610             goto end;
611 
612         decoderctx
613             = OSSL_DECODER_CTX_new_for_pkey(&dhpkey, "PEM", NULL, "DH",
614                                             OSSL_KEYMGMT_SELECT_DOMAIN_PARAMETERS,
615                                             sslctx->libctx, sslctx->propq);
616         if (decoderctx == NULL)
617             goto end;
618         ERR_set_mark();
619         while (!OSSL_DECODER_from_bio(decoderctx, in)
620                && dhpkey == NULL
621                && !BIO_eof(in));
622         OSSL_DECODER_CTX_free(decoderctx);
623 
624         if (dhpkey == NULL) {
625             ERR_clear_last_mark();
626             goto end;
627         }
628         ERR_pop_to_mark();
629     } else {
630         return 1;
631     }
632 
633     if (cctx->ctx != NULL) {
634         if ((rv = SSL_CTX_set0_tmp_dh_pkey(cctx->ctx, dhpkey)) > 0)
635             dhpkey = NULL;
636     }
637     if (cctx->ssl != NULL) {
638         if ((rv = SSL_set0_tmp_dh_pkey(cctx->ssl, dhpkey)) > 0)
639             dhpkey = NULL;
640     }
641  end:
642     EVP_PKEY_free(dhpkey);
643     BIO_free(in);
644     return rv > 0;
645 }
646 
cmd_RecordPadding(SSL_CONF_CTX * cctx,const char * value)647 static int cmd_RecordPadding(SSL_CONF_CTX *cctx, const char *value)
648 {
649     int rv = 0;
650     int block_size = atoi(value);
651 
652     /*
653      * All we care about is a non-negative value,
654      * the setters check the range
655      */
656     if (block_size >= 0) {
657         if (cctx->ctx)
658             rv = SSL_CTX_set_block_padding(cctx->ctx, block_size);
659         if (cctx->ssl)
660             rv = SSL_set_block_padding(cctx->ssl, block_size);
661     }
662     return rv;
663 }
664 
665 
cmd_NumTickets(SSL_CONF_CTX * cctx,const char * value)666 static int cmd_NumTickets(SSL_CONF_CTX *cctx, const char *value)
667 {
668     int rv = 0;
669     int num_tickets = atoi(value);
670 
671     if (num_tickets >= 0) {
672         if (cctx->ctx)
673             rv = SSL_CTX_set_num_tickets(cctx->ctx, num_tickets);
674         if (cctx->ssl)
675             rv = SSL_set_num_tickets(cctx->ssl, num_tickets);
676     }
677     return rv;
678 }
679 
680 typedef struct {
681     int (*cmd) (SSL_CONF_CTX *cctx, const char *value);
682     const char *str_file;
683     const char *str_cmdline;
684     unsigned short flags;
685     unsigned short value_type;
686 } ssl_conf_cmd_tbl;
687 
688 /* Table of supported parameters */
689 
690 #define SSL_CONF_CMD(name, cmdopt, flags, type) \
691         {cmd_##name, #name, cmdopt, flags, type}
692 
693 #define SSL_CONF_CMD_STRING(name, cmdopt, flags) \
694         SSL_CONF_CMD(name, cmdopt, flags, SSL_CONF_TYPE_STRING)
695 
696 #define SSL_CONF_CMD_SWITCH(name, flags) \
697         {0, NULL, name, flags, SSL_CONF_TYPE_NONE}
698 
699 /* See apps/include/opt.h if you change this table. */
700 /* The SSL_CONF_CMD_SWITCH should be the same order as ssl_cmd_switches */
701 static const ssl_conf_cmd_tbl ssl_conf_cmds[] = {
702     SSL_CONF_CMD_SWITCH("no_ssl3", 0),
703     SSL_CONF_CMD_SWITCH("no_tls1", 0),
704     SSL_CONF_CMD_SWITCH("no_tls1_1", 0),
705     SSL_CONF_CMD_SWITCH("no_tls1_2", 0),
706     SSL_CONF_CMD_SWITCH("no_tls1_3", 0),
707     SSL_CONF_CMD_SWITCH("bugs", 0),
708     SSL_CONF_CMD_SWITCH("no_comp", 0),
709     SSL_CONF_CMD_SWITCH("comp", 0),
710     SSL_CONF_CMD_SWITCH("ecdh_single", SSL_CONF_FLAG_SERVER),
711     SSL_CONF_CMD_SWITCH("no_ticket", 0),
712     SSL_CONF_CMD_SWITCH("serverpref", SSL_CONF_FLAG_SERVER),
713     SSL_CONF_CMD_SWITCH("legacy_renegotiation", 0),
714     SSL_CONF_CMD_SWITCH("client_renegotiation", SSL_CONF_FLAG_SERVER),
715     SSL_CONF_CMD_SWITCH("legacy_server_connect", SSL_CONF_FLAG_CLIENT),
716     SSL_CONF_CMD_SWITCH("no_renegotiation", 0),
717     SSL_CONF_CMD_SWITCH("no_resumption_on_reneg", SSL_CONF_FLAG_SERVER),
718     SSL_CONF_CMD_SWITCH("no_legacy_server_connect", SSL_CONF_FLAG_CLIENT),
719     SSL_CONF_CMD_SWITCH("allow_no_dhe_kex", 0),
720     SSL_CONF_CMD_SWITCH("prioritize_chacha", SSL_CONF_FLAG_SERVER),
721     SSL_CONF_CMD_SWITCH("strict", 0),
722     SSL_CONF_CMD_SWITCH("no_middlebox", 0),
723     SSL_CONF_CMD_SWITCH("anti_replay", SSL_CONF_FLAG_SERVER),
724     SSL_CONF_CMD_SWITCH("no_anti_replay", SSL_CONF_FLAG_SERVER),
725     SSL_CONF_CMD_SWITCH("no_etm", 0),
726     SSL_CONF_CMD_SWITCH("no_ems", 0),
727     SSL_CONF_CMD_STRING(SignatureAlgorithms, "sigalgs", 0),
728     SSL_CONF_CMD_STRING(ClientSignatureAlgorithms, "client_sigalgs", 0),
729     SSL_CONF_CMD_STRING(Curves, "curves", 0),
730     SSL_CONF_CMD_STRING(Groups, "groups", 0),
731     SSL_CONF_CMD_STRING(ECDHParameters, "named_curve", SSL_CONF_FLAG_SERVER),
732     SSL_CONF_CMD_STRING(CipherString, "cipher", 0),
733     SSL_CONF_CMD_STRING(Ciphersuites, "ciphersuites", 0),
734     SSL_CONF_CMD_STRING(Protocol, NULL, 0),
735     SSL_CONF_CMD_STRING(MinProtocol, "min_protocol", 0),
736     SSL_CONF_CMD_STRING(MaxProtocol, "max_protocol", 0),
737     SSL_CONF_CMD_STRING(Options, NULL, 0),
738     SSL_CONF_CMD_STRING(VerifyMode, NULL, 0),
739     SSL_CONF_CMD(Certificate, "cert", SSL_CONF_FLAG_CERTIFICATE,
740                  SSL_CONF_TYPE_FILE),
741     SSL_CONF_CMD(PrivateKey, "key", SSL_CONF_FLAG_CERTIFICATE,
742                  SSL_CONF_TYPE_FILE),
743     SSL_CONF_CMD(ServerInfoFile, NULL,
744                  SSL_CONF_FLAG_SERVER | SSL_CONF_FLAG_CERTIFICATE,
745                  SSL_CONF_TYPE_FILE),
746     SSL_CONF_CMD(ChainCAPath, "chainCApath", SSL_CONF_FLAG_CERTIFICATE,
747                  SSL_CONF_TYPE_DIR),
748     SSL_CONF_CMD(ChainCAFile, "chainCAfile", SSL_CONF_FLAG_CERTIFICATE,
749                  SSL_CONF_TYPE_FILE),
750     SSL_CONF_CMD(ChainCAStore, "chainCAstore", SSL_CONF_FLAG_CERTIFICATE,
751                  SSL_CONF_TYPE_STORE),
752     SSL_CONF_CMD(VerifyCAPath, "verifyCApath", SSL_CONF_FLAG_CERTIFICATE,
753                  SSL_CONF_TYPE_DIR),
754     SSL_CONF_CMD(VerifyCAFile, "verifyCAfile", SSL_CONF_FLAG_CERTIFICATE,
755                  SSL_CONF_TYPE_FILE),
756     SSL_CONF_CMD(VerifyCAStore, "verifyCAstore", SSL_CONF_FLAG_CERTIFICATE,
757                  SSL_CONF_TYPE_STORE),
758     SSL_CONF_CMD(RequestCAFile, "requestCAFile", SSL_CONF_FLAG_CERTIFICATE,
759                  SSL_CONF_TYPE_FILE),
760     SSL_CONF_CMD(ClientCAFile, NULL,
761                  SSL_CONF_FLAG_SERVER | SSL_CONF_FLAG_CERTIFICATE,
762                  SSL_CONF_TYPE_FILE),
763     SSL_CONF_CMD(RequestCAPath, NULL, SSL_CONF_FLAG_CERTIFICATE,
764                  SSL_CONF_TYPE_DIR),
765     SSL_CONF_CMD(ClientCAPath, NULL,
766                  SSL_CONF_FLAG_SERVER | SSL_CONF_FLAG_CERTIFICATE,
767                  SSL_CONF_TYPE_DIR),
768     SSL_CONF_CMD(RequestCAStore, "requestCAStore", SSL_CONF_FLAG_CERTIFICATE,
769                  SSL_CONF_TYPE_STORE),
770     SSL_CONF_CMD(ClientCAStore, NULL,
771                  SSL_CONF_FLAG_SERVER | SSL_CONF_FLAG_CERTIFICATE,
772                  SSL_CONF_TYPE_STORE),
773     SSL_CONF_CMD(DHParameters, "dhparam",
774                  SSL_CONF_FLAG_SERVER | SSL_CONF_FLAG_CERTIFICATE,
775                  SSL_CONF_TYPE_FILE),
776     SSL_CONF_CMD_STRING(RecordPadding, "record_padding", 0),
777     SSL_CONF_CMD_STRING(NumTickets, "num_tickets", SSL_CONF_FLAG_SERVER),
778 };
779 
780 /* Supported switches: must match order of switches in ssl_conf_cmds */
781 static const ssl_switch_tbl ssl_cmd_switches[] = {
782     {SSL_OP_NO_SSLv3, 0},       /* no_ssl3 */
783     {SSL_OP_NO_TLSv1, 0},       /* no_tls1 */
784     {SSL_OP_NO_TLSv1_1, 0},     /* no_tls1_1 */
785     {SSL_OP_NO_TLSv1_2, 0},     /* no_tls1_2 */
786     {SSL_OP_NO_TLSv1_3, 0},     /* no_tls1_3 */
787     {SSL_OP_ALL, 0},            /* bugs */
788     {SSL_OP_NO_COMPRESSION, 0}, /* no_comp */
789     {SSL_OP_NO_COMPRESSION, SSL_TFLAG_INV}, /* comp */
790     {SSL_OP_SINGLE_ECDH_USE, 0}, /* ecdh_single */
791     {SSL_OP_NO_TICKET, 0},      /* no_ticket */
792     {SSL_OP_CIPHER_SERVER_PREFERENCE, 0}, /* serverpref */
793     /* legacy_renegotiation */
794     {SSL_OP_ALLOW_UNSAFE_LEGACY_RENEGOTIATION, 0},
795     /* Allow client renegotiation */
796     {SSL_OP_ALLOW_CLIENT_RENEGOTIATION, 0},
797     /* legacy_server_connect */
798     {SSL_OP_LEGACY_SERVER_CONNECT, 0},
799     /* no_renegotiation */
800     {SSL_OP_NO_RENEGOTIATION, 0},
801     /* no_resumption_on_reneg */
802     {SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION, 0},
803     /* no_legacy_server_connect */
804     {SSL_OP_LEGACY_SERVER_CONNECT, SSL_TFLAG_INV},
805     /* allow_no_dhe_kex */
806     {SSL_OP_ALLOW_NO_DHE_KEX, 0},
807     /* chacha reprioritization */
808     {SSL_OP_PRIORITIZE_CHACHA, 0},
809     {SSL_CERT_FLAG_TLS_STRICT, SSL_TFLAG_CERT}, /* strict */
810     /* no_middlebox */
811     {SSL_OP_ENABLE_MIDDLEBOX_COMPAT, SSL_TFLAG_INV},
812     /* anti_replay */
813     {SSL_OP_NO_ANTI_REPLAY, SSL_TFLAG_INV},
814     /* no_anti_replay */
815     {SSL_OP_NO_ANTI_REPLAY, 0},
816     /* no Encrypt-then-Mac */
817     {SSL_OP_NO_ENCRYPT_THEN_MAC, 0},
818     /* no Extended master secret */
819     {SSL_OP_NO_EXTENDED_MASTER_SECRET, 0},
820 };
821 
ssl_conf_cmd_skip_prefix(SSL_CONF_CTX * cctx,const char ** pcmd)822 static int ssl_conf_cmd_skip_prefix(SSL_CONF_CTX *cctx, const char **pcmd)
823 {
824     if (pcmd == NULL || *pcmd == NULL)
825         return 0;
826     /* If a prefix is set, check and skip */
827     if (cctx->prefix) {
828         if (strlen(*pcmd) <= cctx->prefixlen)
829             return 0;
830         if (cctx->flags & SSL_CONF_FLAG_CMDLINE &&
831             strncmp(*pcmd, cctx->prefix, cctx->prefixlen))
832             return 0;
833         if (cctx->flags & SSL_CONF_FLAG_FILE &&
834             OPENSSL_strncasecmp(*pcmd, cctx->prefix, cctx->prefixlen))
835             return 0;
836         *pcmd += cctx->prefixlen;
837     } else if (cctx->flags & SSL_CONF_FLAG_CMDLINE) {
838         if (**pcmd != '-' || !(*pcmd)[1])
839             return 0;
840         *pcmd += 1;
841     }
842     return 1;
843 }
844 
845 /* Determine if a command is allowed according to cctx flags */
ssl_conf_cmd_allowed(SSL_CONF_CTX * cctx,const ssl_conf_cmd_tbl * t)846 static int ssl_conf_cmd_allowed(SSL_CONF_CTX *cctx, const ssl_conf_cmd_tbl * t)
847 {
848     unsigned int tfl = t->flags;
849     unsigned int cfl = cctx->flags;
850     if ((tfl & SSL_CONF_FLAG_SERVER) && !(cfl & SSL_CONF_FLAG_SERVER))
851         return 0;
852     if ((tfl & SSL_CONF_FLAG_CLIENT) && !(cfl & SSL_CONF_FLAG_CLIENT))
853         return 0;
854     if ((tfl & SSL_CONF_FLAG_CERTIFICATE)
855         && !(cfl & SSL_CONF_FLAG_CERTIFICATE))
856         return 0;
857     return 1;
858 }
859 
ssl_conf_cmd_lookup(SSL_CONF_CTX * cctx,const char * cmd)860 static const ssl_conf_cmd_tbl *ssl_conf_cmd_lookup(SSL_CONF_CTX *cctx,
861                                                    const char *cmd)
862 {
863     const ssl_conf_cmd_tbl *t;
864     size_t i;
865     if (cmd == NULL)
866         return NULL;
867 
868     /* Look for matching parameter name in table */
869     for (i = 0, t = ssl_conf_cmds; i < OSSL_NELEM(ssl_conf_cmds); i++, t++) {
870         if (ssl_conf_cmd_allowed(cctx, t)) {
871             if (cctx->flags & SSL_CONF_FLAG_CMDLINE) {
872                 if (t->str_cmdline && strcmp(t->str_cmdline, cmd) == 0)
873                     return t;
874             }
875             if (cctx->flags & SSL_CONF_FLAG_FILE) {
876                 if (t->str_file && OPENSSL_strcasecmp(t->str_file, cmd) == 0)
877                     return t;
878             }
879         }
880     }
881     return NULL;
882 }
883 
ctrl_switch_option(SSL_CONF_CTX * cctx,const ssl_conf_cmd_tbl * cmd)884 static int ctrl_switch_option(SSL_CONF_CTX *cctx, const ssl_conf_cmd_tbl * cmd)
885 {
886     /* Find index of command in table */
887     size_t idx = cmd - ssl_conf_cmds;
888     const ssl_switch_tbl *scmd;
889     /* Sanity check index */
890     if (idx >= OSSL_NELEM(ssl_cmd_switches))
891         return 0;
892     /* Obtain switches entry with same index */
893     scmd = ssl_cmd_switches + idx;
894     ssl_set_option(cctx, scmd->name_flags, scmd->option_value, 1);
895     return 1;
896 }
897 
SSL_CONF_cmd(SSL_CONF_CTX * cctx,const char * cmd,const char * value)898 int SSL_CONF_cmd(SSL_CONF_CTX *cctx, const char *cmd, const char *value)
899 {
900     const ssl_conf_cmd_tbl *runcmd;
901     if (cmd == NULL) {
902         ERR_raise(ERR_LIB_SSL, SSL_R_INVALID_NULL_CMD_NAME);
903         return 0;
904     }
905 
906     if (!ssl_conf_cmd_skip_prefix(cctx, &cmd))
907         return -2;
908 
909     runcmd = ssl_conf_cmd_lookup(cctx, cmd);
910 
911     if (runcmd) {
912         int rv;
913         if (runcmd->value_type == SSL_CONF_TYPE_NONE) {
914             return ctrl_switch_option(cctx, runcmd);
915         }
916         if (value == NULL)
917             return -3;
918         rv = runcmd->cmd(cctx, value);
919         if (rv > 0)
920             return 2;
921         if (rv == -2)
922             return -2;
923         if (cctx->flags & SSL_CONF_FLAG_SHOW_ERRORS)
924             ERR_raise_data(ERR_LIB_SSL, SSL_R_BAD_VALUE,
925                            "cmd=%s, value=%s", cmd, value);
926         return 0;
927     }
928 
929     if (cctx->flags & SSL_CONF_FLAG_SHOW_ERRORS)
930         ERR_raise_data(ERR_LIB_SSL, SSL_R_UNKNOWN_CMD_NAME, "cmd=%s", cmd);
931 
932     return -2;
933 }
934 
SSL_CONF_cmd_argv(SSL_CONF_CTX * cctx,int * pargc,char *** pargv)935 int SSL_CONF_cmd_argv(SSL_CONF_CTX *cctx, int *pargc, char ***pargv)
936 {
937     int rv;
938     const char *arg = NULL, *argn;
939 
940     if (pargc != NULL && *pargc == 0)
941         return 0;
942     if (pargc == NULL || *pargc > 0)
943         arg = **pargv;
944     if (arg == NULL)
945         return 0;
946     if (pargc == NULL || *pargc > 1)
947         argn = (*pargv)[1];
948     else
949         argn = NULL;
950     cctx->flags &= ~SSL_CONF_FLAG_FILE;
951     cctx->flags |= SSL_CONF_FLAG_CMDLINE;
952     rv = SSL_CONF_cmd(cctx, arg, argn);
953     if (rv > 0) {
954         /* Success: update pargc, pargv */
955         (*pargv) += rv;
956         if (pargc)
957             (*pargc) -= rv;
958         return rv;
959     }
960     /* Unknown switch: indicate no arguments processed */
961     if (rv == -2)
962         return 0;
963     /* Some error occurred processing command, return fatal error */
964     if (rv == 0)
965         return -1;
966     return rv;
967 }
968 
SSL_CONF_cmd_value_type(SSL_CONF_CTX * cctx,const char * cmd)969 int SSL_CONF_cmd_value_type(SSL_CONF_CTX *cctx, const char *cmd)
970 {
971     if (ssl_conf_cmd_skip_prefix(cctx, &cmd)) {
972         const ssl_conf_cmd_tbl *runcmd;
973         runcmd = ssl_conf_cmd_lookup(cctx, cmd);
974         if (runcmd)
975             return runcmd->value_type;
976     }
977     return SSL_CONF_TYPE_UNKNOWN;
978 }
979 
SSL_CONF_CTX_new(void)980 SSL_CONF_CTX *SSL_CONF_CTX_new(void)
981 {
982     SSL_CONF_CTX *ret = OPENSSL_zalloc(sizeof(*ret));
983 
984     return ret;
985 }
986 
SSL_CONF_CTX_finish(SSL_CONF_CTX * cctx)987 int SSL_CONF_CTX_finish(SSL_CONF_CTX *cctx)
988 {
989     /* See if any certificates are missing private keys */
990     size_t i;
991     CERT *c = NULL;
992 
993     if (cctx->ctx != NULL) {
994         c = cctx->ctx->cert;
995     } else if (cctx->ssl != NULL) {
996         SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL(cctx->ssl);
997 
998         if (sc != NULL)
999             c = sc->cert;
1000     }
1001     if (c != NULL && cctx->flags & SSL_CONF_FLAG_REQUIRE_PRIVATE) {
1002         for (i = 0; i < SSL_PKEY_NUM; i++) {
1003             const char *p = cctx->cert_filename[i];
1004             /*
1005              * If missing private key try to load one from certificate file
1006              */
1007             if (p && !c->pkeys[i].privatekey) {
1008                 if (!cmd_PrivateKey(cctx, p))
1009                     return 0;
1010             }
1011         }
1012     }
1013     if (cctx->canames) {
1014         if (cctx->ssl)
1015             SSL_set0_CA_list(cctx->ssl, cctx->canames);
1016         else if (cctx->ctx)
1017             SSL_CTX_set0_CA_list(cctx->ctx, cctx->canames);
1018         else
1019             sk_X509_NAME_pop_free(cctx->canames, X509_NAME_free);
1020         cctx->canames = NULL;
1021     }
1022     return 1;
1023 }
1024 
SSL_CONF_CTX_free(SSL_CONF_CTX * cctx)1025 void SSL_CONF_CTX_free(SSL_CONF_CTX *cctx)
1026 {
1027     if (cctx) {
1028         size_t i;
1029         for (i = 0; i < SSL_PKEY_NUM; i++)
1030             OPENSSL_free(cctx->cert_filename[i]);
1031         OPENSSL_free(cctx->prefix);
1032         sk_X509_NAME_pop_free(cctx->canames, X509_NAME_free);
1033         OPENSSL_free(cctx);
1034     }
1035 }
1036 
SSL_CONF_CTX_set_flags(SSL_CONF_CTX * cctx,unsigned int flags)1037 unsigned int SSL_CONF_CTX_set_flags(SSL_CONF_CTX *cctx, unsigned int flags)
1038 {
1039     cctx->flags |= flags;
1040     return cctx->flags;
1041 }
1042 
SSL_CONF_CTX_clear_flags(SSL_CONF_CTX * cctx,unsigned int flags)1043 unsigned int SSL_CONF_CTX_clear_flags(SSL_CONF_CTX *cctx, unsigned int flags)
1044 {
1045     cctx->flags &= ~flags;
1046     return cctx->flags;
1047 }
1048 
SSL_CONF_CTX_set1_prefix(SSL_CONF_CTX * cctx,const char * pre)1049 int SSL_CONF_CTX_set1_prefix(SSL_CONF_CTX *cctx, const char *pre)
1050 {
1051     char *tmp = NULL;
1052     if (pre) {
1053         tmp = OPENSSL_strdup(pre);
1054         if (tmp == NULL)
1055             return 0;
1056     }
1057     OPENSSL_free(cctx->prefix);
1058     cctx->prefix = tmp;
1059     if (tmp)
1060         cctx->prefixlen = strlen(tmp);
1061     else
1062         cctx->prefixlen = 0;
1063     return 1;
1064 }
1065 
SSL_CONF_CTX_set_ssl(SSL_CONF_CTX * cctx,SSL * ssl)1066 void SSL_CONF_CTX_set_ssl(SSL_CONF_CTX *cctx, SSL *ssl)
1067 {
1068     cctx->ssl = ssl;
1069     cctx->ctx = NULL;
1070     if (ssl != NULL) {
1071         SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL(ssl);
1072 
1073         if (sc == NULL)
1074             return;
1075         cctx->poptions = &sc->options;
1076         cctx->min_version = &sc->min_proto_version;
1077         cctx->max_version = &sc->max_proto_version;
1078         cctx->pcert_flags = &sc->cert->cert_flags;
1079         cctx->pvfy_flags = &sc->verify_mode;
1080     } else {
1081         cctx->poptions = NULL;
1082         cctx->min_version = NULL;
1083         cctx->max_version = NULL;
1084         cctx->pcert_flags = NULL;
1085         cctx->pvfy_flags = NULL;
1086     }
1087 }
1088 
SSL_CONF_CTX_set_ssl_ctx(SSL_CONF_CTX * cctx,SSL_CTX * ctx)1089 void SSL_CONF_CTX_set_ssl_ctx(SSL_CONF_CTX *cctx, SSL_CTX *ctx)
1090 {
1091     cctx->ctx = ctx;
1092     cctx->ssl = NULL;
1093     if (ctx) {
1094         cctx->poptions = &ctx->options;
1095         cctx->min_version = &ctx->min_proto_version;
1096         cctx->max_version = &ctx->max_proto_version;
1097         cctx->pcert_flags = &ctx->cert->cert_flags;
1098         cctx->pvfy_flags = &ctx->verify_mode;
1099     } else {
1100         cctx->poptions = NULL;
1101         cctx->min_version = NULL;
1102         cctx->max_version = NULL;
1103         cctx->pcert_flags = NULL;
1104         cctx->pvfy_flags = NULL;
1105     }
1106 }
1107