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 20static int stopped; 21 22static void ssl_library_stop(void); 23 24static CRYPTO_ONCE ssl_base = CRYPTO_ONCE_STATIC_INIT; 25static int ssl_base_inited = 0; 26DEFINE_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 48static CRYPTO_ONCE ssl_strings = CRYPTO_ONCE_STATIC_INIT; 49 50DEFINE_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 63DEFINE_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 70static 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 */ 91int 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