2 * Written by Matt Caswell for the OpenSSL project.
4 /* ====================================================================
5 * Copyright (c) 2016 The OpenSSL Project. All rights reserved.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
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
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/)"
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.
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.
33 * 6. Redistributions of any form whatsoever must retain the following
35 * "This product includes software developed by the OpenSSL Project
36 * for use in the OpenSSL Toolkit (http://www.openssl.org/)"
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 * ====================================================================
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).
58 #include <openssl/e_os2.h>
60 #if defined(OPENSSL_SYS_WINDOWS) && !defined(_WIN32_WINNT)
62 * We default to requiring Windows Vista, Windows Server 2008 or later. We can
63 * support lower versions if _WIN32_WINNT is explicity defined to something
66 # define _WIN32_WINNT 0x0600
69 #include <openssl/crypto.h>
70 #include <openssl/evp.h>
73 /* Implement "once" functionality */
74 #if !defined(OPENSSL_THREADS)
75 typedef int OPENSSL_INIT_ONCE;
76 # define OPENSSL_INIT_ONCE_STATIC_INIT 0
77 # define OPENSSL_INIT_ONCE_DYNAMIC_INIT(once) (*(once) = 0)
79 static void ossl_init_once_run(OPENSSL_INIT_ONCE *once, void (*init)(void))
81 if (*once == OPENSSL_INIT_ONCE_STATIC_INIT) {
86 #elif defined(OPENSSL_SYS_WINDOWS)
89 # if _WIN32_WINNT < 0x0600
92 * Versions before 0x0600 (Windows Vista, Windows Server 2008 or later) do not
93 * have InitOnceExecuteOnce, so we fall back to using a spinlock instead.
95 typedef LONG OPENSSL_INIT_ONCE;
96 # define OPENSSL_INIT_ONCE_STATIC_INIT 0
97 # define OPENSSL_INIT_ONCE_DYNAMIC_INIT(once) (*(once) = 0)
99 # define ONCE_UNINITED 0
100 # define ONCE_ININIT 1
103 static void ossl_init_once_run(OPENSSL_INIT_ONCE *once, void (*init)(void))
105 LONG volatile *lock = (LONG *)once;
108 if (*lock == ONCE_DONE)
112 result = InterlockedCompareExchange(lock, ONCE_ININIT, ONCE_UNINITED);
113 if (result == ONCE_UNINITED) {
118 } while (result == ONCE_ININIT);
123 typedef INIT_ONCE OPENSSL_INIT_ONCE;
124 # define OPENSSL_INIT_ONCE_STATIC_INIT INIT_ONCE_STATIC_INIT
125 # define OPENSSL_INIT_ONCE_DYNAMIC_INIT(once) \
126 InitOnceInitialize((PINIT_ONCE)(once))
128 static BOOL CALLBACK once_cb(PINIT_ONCE once, PVOID initfp, PVOID *unused)
130 void (*init)(void) = initfp;
137 static void ossl_init_once_run(OPENSSL_INIT_ONCE *once, void (*init)(void))
139 InitOnceExecuteOnce((INIT_ONCE *)once, once_cb, init, NULL);
143 # include <pthread.h>
145 typedef pthread_once_t OPENSSL_INIT_ONCE;
146 # define OPENSSL_INIT_ONCE_STATIC_INIT PTHREAD_ONCE_INIT
147 # define OPENSSL_INIT_ONCE_DYNAMIC_INIT(once) (*(once) = PTHREAD_ONCE_INIT)
149 static void ossl_init_once_run(OPENSSL_INIT_ONCE *once, void (*init)(void))
151 pthread_once(once, init);
155 static void ssl_library_stop(void);
157 static OPENSSL_INIT_ONCE ssl_base = OPENSSL_INIT_ONCE_STATIC_INIT;
158 static int ssl_base_inited = 0;
159 static void ossl_init_ssl_base(void)
161 #ifdef OPENSSL_INIT_DEBUG
162 fprintf(stderr, "OPENSSL_INIT: ossl_init_ssl_base: "
163 "Adding SSL ciphers and digests\n");
165 #ifndef OPENSSL_NO_DES
166 EVP_add_cipher(EVP_des_cbc());
167 EVP_add_cipher(EVP_des_ede3_cbc());
169 #ifndef OPENSSL_NO_IDEA
170 EVP_add_cipher(EVP_idea_cbc());
172 #ifndef OPENSSL_NO_RC4
173 EVP_add_cipher(EVP_rc4());
174 # ifndef OPENSSL_NO_MD5
175 EVP_add_cipher(EVP_rc4_hmac_md5());
178 #ifndef OPENSSL_NO_RC2
179 EVP_add_cipher(EVP_rc2_cbc());
181 * Not actually used for SSL/TLS but this makes PKCS#12 work if an
182 * application only calls SSL_library_init().
184 EVP_add_cipher(EVP_rc2_40_cbc());
186 #ifndef OPENSSL_NO_AES
187 EVP_add_cipher(EVP_aes_128_cbc());
188 EVP_add_cipher(EVP_aes_192_cbc());
189 EVP_add_cipher(EVP_aes_256_cbc());
190 EVP_add_cipher(EVP_aes_128_gcm());
191 EVP_add_cipher(EVP_aes_256_gcm());
192 EVP_add_cipher(EVP_aes_128_ccm());
193 EVP_add_cipher(EVP_aes_256_ccm());
194 EVP_add_cipher(EVP_aes_128_cbc_hmac_sha1());
195 EVP_add_cipher(EVP_aes_256_cbc_hmac_sha1());
196 EVP_add_cipher(EVP_aes_128_cbc_hmac_sha256());
197 EVP_add_cipher(EVP_aes_256_cbc_hmac_sha256());
199 #ifndef OPENSSL_NO_CAMELLIA
200 EVP_add_cipher(EVP_camellia_128_cbc());
201 EVP_add_cipher(EVP_camellia_256_cbc());
203 #if !defined(OPENSSL_NO_CHACHA) && !defined(OPENSSL_NO_POLY1305)
204 EVP_add_cipher(EVP_chacha20_poly1305());
207 #ifndef OPENSSL_NO_SEED
208 EVP_add_cipher(EVP_seed_cbc());
211 #ifndef OPENSSL_NO_MD5
212 EVP_add_digest(EVP_md5());
213 EVP_add_digest_alias(SN_md5, "ssl3-md5");
214 # ifndef OPENSSL_NO_SHA
215 EVP_add_digest(EVP_md5_sha1());
218 EVP_add_digest(EVP_sha1()); /* RSA with sha1 */
219 EVP_add_digest_alias(SN_sha1, "ssl3-sha1");
220 EVP_add_digest_alias(SN_sha1WithRSAEncryption, SN_sha1WithRSA);
221 EVP_add_digest(EVP_sha224());
222 EVP_add_digest(EVP_sha256());
223 EVP_add_digest(EVP_sha384());
224 EVP_add_digest(EVP_sha512());
225 #ifndef OPENSSL_NO_COMP
226 #ifdef OPENSSL_INIT_DEBUG
227 fprintf(stderr, "OPENSSL_INIT: ossl_init_ssl_base: "
228 "SSL_COMP_get_compression_methods()\n");
231 * This will initialise the built-in compression algorithms. The value
232 * returned is a STACK_OF(SSL_COMP), but that can be discarded safely
234 SSL_COMP_get_compression_methods();
236 /* initialize cipher/digest methods table */
239 #ifdef OPENSSL_INIT_DEBUG
240 fprintf(stderr, "OPENSSL_INIT: ossl_init_ssl_base: "
241 "SSL_add_ssl_module()\n");
243 SSL_add_ssl_module();
245 * We ignore an error return here. Not much we can do - but not that bad
246 * either. We can still safely continue.
248 OPENSSL_INIT_register_stop_handler(ssl_library_stop);
252 static OPENSSL_INIT_ONCE ssl_strings = OPENSSL_INIT_ONCE_STATIC_INIT;
253 static int ssl_strings_inited = 0;
254 static void ossl_init_load_ssl_strings(void)
257 * OPENSSL_NO_AUTOERRINIT is provided here to prevent at compile time
258 * pulling in all the error strings during static linking
260 #if !defined(OPENSSL_NO_ERR) && !defined(OPENSSL_NO_AUTOERRINIT)
261 # ifdef OPENSSL_INIT_DEBUG
262 fprintf(stderr, "OPENSSL_INIT: ossl_init_load_ssl_strings: "
263 "ERR_load_SSL_strings()\n");
265 ERR_load_SSL_strings();
267 ssl_strings_inited = 1;
270 static void ossl_init_no_load_ssl_strings(void)
272 /* Do nothing in this case */
276 static void ssl_library_stop(void)
278 if (ssl_base_inited) {
279 #ifndef OPENSSL_NO_COMP
280 #ifdef OPENSSL_INIT_DEBUG
281 fprintf(stderr, "OPENSSL_INIT: ssl_library_stop: "
282 "SSL_COMP_free_compression_methods()\n");
284 SSL_COMP_free_compression_methods();
286 OPENSSL_INIT_ONCE_DYNAMIC_INIT(&ssl_base);
290 if (ssl_strings_inited) {
291 #ifdef OPENSSL_INIT_DEBUG
292 fprintf(stderr, "OPENSSL_INIT: ssl_library_stop: "
293 "ERR_free_strings()\n");
296 * If both crypto and ssl error strings are inited we will end up
297 * calling ERR_free_strings() twice - but that's ok. The second time
298 * will be a no-op. It's easier to do that than to try and track
299 * between the two libraries whether they have both been inited.
302 ssl_strings_inited = 0;
303 OPENSSL_INIT_ONCE_DYNAMIC_INIT(&ssl_strings);
308 * If this function is called with a non NULL settings value then it must be
309 * called prior to any threads making calls to any OpenSSL functions,
310 * i.e. passing a non-null settings value is assumed to be single-threaded.
312 void OPENSSL_INIT_ssl_library_start(uint64_t opts,
313 const OPENSSL_INIT_SETTINGS *settings)
315 OPENSSL_INIT_crypto_library_start(opts | OPENSSL_INIT_ADD_ALL_CIPHERS
316 | OPENSSL_INIT_ADD_ALL_DIGESTS, settings);
318 ossl_init_once_run(&ssl_base, ossl_init_ssl_base);
320 if (opts & OPENSSL_INIT_NO_LOAD_SSL_STRINGS)
321 ossl_init_once_run(&ssl_strings, ossl_init_no_load_ssl_strings);
323 if (opts & OPENSSL_INIT_LOAD_SSL_STRINGS)
324 ossl_init_once_run(&ssl_strings, ossl_init_load_ssl_strings);