1 /*
2 * Copyright 2016-2024 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 "internal/err.h"
13 #include <openssl/crypto.h>
14 #include <openssl/evp.h>
15 #include <openssl/trace.h>
16 #include "ssl_local.h"
17 #include "sslerr.h"
18 #include "internal/thread_once.h"
19
20 static int stopped;
21
22 static CRYPTO_ONCE ssl_base = CRYPTO_ONCE_STATIC_INIT;
23 static int ssl_base_inited = 0;
DEFINE_RUN_ONCE_STATIC(ossl_init_ssl_base)24 DEFINE_RUN_ONCE_STATIC(ossl_init_ssl_base)
25 {
26 #ifndef OPENSSL_NO_COMP
27 OSSL_TRACE(INIT, "ossl_init_ssl_base: "
28 "SSL_COMP_get_compression_methods()\n");
29 /*
30 * This will initialise the built-in compression algorithms. The value
31 * returned is a STACK_OF(SSL_COMP), but that can be discarded safely
32 */
33 SSL_COMP_get_compression_methods();
34 #endif
35 ssl_sort_cipher_list();
36 OSSL_TRACE(INIT, "ossl_init_ssl_base: SSL_add_ssl_module()\n");
37 ssl_base_inited = 1;
38 return 1;
39 }
40
41 static CRYPTO_ONCE ssl_strings = CRYPTO_ONCE_STATIC_INIT;
42
DEFINE_RUN_ONCE_STATIC(ossl_init_load_ssl_strings)43 DEFINE_RUN_ONCE_STATIC(ossl_init_load_ssl_strings)
44 {
45 /*
46 * OPENSSL_NO_AUTOERRINIT is provided here to prevent at compile time
47 * pulling in all the error strings during static linking
48 */
49 #if !defined(OPENSSL_NO_ERR) && !defined(OPENSSL_NO_AUTOERRINIT)
50 OSSL_TRACE(INIT, "ossl_init_load_ssl_strings: ossl_err_load_SSL_strings()\n");
51 ossl_err_load_SSL_strings();
52 #endif
53 return 1;
54 }
55
DEFINE_RUN_ONCE_STATIC_ALT(ossl_init_no_load_ssl_strings,ossl_init_load_ssl_strings)56 DEFINE_RUN_ONCE_STATIC_ALT(ossl_init_no_load_ssl_strings,
57 ossl_init_load_ssl_strings)
58 {
59 /* Do nothing in this case */
60 return 1;
61 }
62
63 /*
64 * If this function is called with a non NULL settings value then it must be
65 * called prior to any threads making calls to any OpenSSL functions,
66 * i.e. passing a non-null settings value is assumed to be single-threaded.
67 */
OPENSSL_init_ssl(uint64_t opts,const OPENSSL_INIT_SETTINGS * settings)68 int OPENSSL_init_ssl(uint64_t opts, const OPENSSL_INIT_SETTINGS *settings)
69 {
70 static int stoperrset = 0;
71
72 if (stopped) {
73 if (!stoperrset) {
74 /*
75 * We only ever set this once to avoid getting into an infinite
76 * loop where the error system keeps trying to init and fails so
77 * sets an error etc
78 */
79 stoperrset = 1;
80 ERR_raise(ERR_LIB_SSL, ERR_R_INIT_FAIL);
81 }
82 return 0;
83 }
84
85 opts |= OPENSSL_INIT_ADD_ALL_CIPHERS
86 | OPENSSL_INIT_ADD_ALL_DIGESTS;
87 #ifndef OPENSSL_NO_AUTOLOAD_CONFIG
88 if ((opts & OPENSSL_INIT_NO_LOAD_CONFIG) == 0)
89 opts |= OPENSSL_INIT_LOAD_CONFIG;
90 #endif
91
92 if (!OPENSSL_init_crypto(opts, settings))
93 return 0;
94
95 if (!RUN_ONCE(&ssl_base, ossl_init_ssl_base))
96 return 0;
97
98 if ((opts & OPENSSL_INIT_NO_LOAD_SSL_STRINGS)
99 && !RUN_ONCE_ALT(&ssl_strings, ossl_init_no_load_ssl_strings,
100 ossl_init_load_ssl_strings))
101 return 0;
102
103 if ((opts & OPENSSL_INIT_LOAD_SSL_STRINGS)
104 && !RUN_ONCE(&ssl_strings, ossl_init_load_ssl_strings))
105 return 0;
106
107 return 1;
108 }
109