1 /* 2 * Copyright 2016-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 "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 void ssl_library_stop(void); 23 24 static CRYPTO_ONCE ssl_base = CRYPTO_ONCE_STATIC_INIT; 25 static int ssl_base_inited = 0; 26 DEFINE_RUN_ONCE_STATIC(ossl_init_ssl_base) 27 { 28 #ifndef OPENSSL_NO_COMP 29 OSSL_TRACE(INIT, "ossl_init_ssl_base: " 30 "SSL_COMP_get_compression_methods()\n"); 31 /* 32 * This will initialise the built-in compression algorithms. The value 33 * returned is a STACK_OF(SSL_COMP), but that can be discarded safely 34 */ 35 SSL_COMP_get_compression_methods(); 36 #endif 37 ssl_sort_cipher_list(); 38 OSSL_TRACE(INIT,"ossl_init_ssl_base: SSL_add_ssl_module()\n"); 39 /* 40 * We ignore an error return here. Not much we can do - but not that bad 41 * either. We can still safely continue. 42 */ 43 OPENSSL_atexit(ssl_library_stop); 44 ssl_base_inited = 1; 45 return 1; 46 } 47 48 static CRYPTO_ONCE ssl_strings = CRYPTO_ONCE_STATIC_INIT; 49 50 DEFINE_RUN_ONCE_STATIC(ossl_init_load_ssl_strings) 51 { 52 /* 53 * OPENSSL_NO_AUTOERRINIT is provided here to prevent at compile time 54 * pulling in all the error strings during static linking 55 */ 56 #if !defined(OPENSSL_NO_ERR) && !defined(OPENSSL_NO_AUTOERRINIT) 57 OSSL_TRACE(INIT, "ossl_init_load_ssl_strings: ossl_err_load_SSL_strings()\n"); 58 ossl_err_load_SSL_strings(); 59 #endif 60 return 1; 61 } 62 63 DEFINE_RUN_ONCE_STATIC_ALT(ossl_init_no_load_ssl_strings, 64 ossl_init_load_ssl_strings) 65 { 66 /* Do nothing in this case */ 67 return 1; 68 } 69 70 static void ssl_library_stop(void) 71 { 72 /* Might be explicitly called and also by atexit */ 73 if (stopped) 74 return; 75 stopped = 1; 76 77 if (ssl_base_inited) { 78 #ifndef OPENSSL_NO_COMP 79 OSSL_TRACE(INIT, "ssl_library_stop: " 80 "ssl_comp_free_compression_methods_int()\n"); 81 ssl_comp_free_compression_methods_int(); 82 #endif 83 } 84 } 85 86 /* 87 * If this function is called with a non NULL settings value then it must be 88 * called prior to any threads making calls to any OpenSSL functions, 89 * i.e. passing a non-null settings value is assumed to be single-threaded. 90 */ 91 int OPENSSL_init_ssl(uint64_t opts, const OPENSSL_INIT_SETTINGS * settings) 92 { 93 static int stoperrset = 0; 94 95 if (stopped) { 96 if (!stoperrset) { 97 /* 98 * We only ever set this once to avoid getting into an infinite 99 * loop where the error system keeps trying to init and fails so 100 * sets an error etc 101 */ 102 stoperrset = 1; 103 ERR_raise(ERR_LIB_SSL, ERR_R_INIT_FAIL); 104 } 105 return 0; 106 } 107 108 opts |= OPENSSL_INIT_ADD_ALL_CIPHERS 109 | OPENSSL_INIT_ADD_ALL_DIGESTS; 110 #ifndef OPENSSL_NO_AUTOLOAD_CONFIG 111 if ((opts & OPENSSL_INIT_NO_LOAD_CONFIG) == 0) 112 opts |= OPENSSL_INIT_LOAD_CONFIG; 113 #endif 114 115 if (!OPENSSL_init_crypto(opts, settings)) 116 return 0; 117 118 if (!RUN_ONCE(&ssl_base, ossl_init_ssl_base)) 119 return 0; 120 121 if ((opts & OPENSSL_INIT_NO_LOAD_SSL_STRINGS) 122 && !RUN_ONCE_ALT(&ssl_strings, ossl_init_no_load_ssl_strings, 123 ossl_init_load_ssl_strings)) 124 return 0; 125 126 if ((opts & OPENSSL_INIT_LOAD_SSL_STRINGS) 127 && !RUN_ONCE(&ssl_strings, ossl_init_load_ssl_strings)) 128 return 0; 129 130 return 1; 131 } 132