Coverage Report

Created: 2025-12-31 06:58

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