xref: /freebsd/crypto/openssl/ssl/ssl_init.c (revision b077aed33b7b6aefca7b17ddb250cf521f938613)
1e71b7053SJung-uk Kim /*
234252e89SJung-uk Kim  * Copyright 2016-2022 The OpenSSL Project Authors. All Rights Reserved.
3e71b7053SJung-uk Kim  *
4*b077aed3SPierre Pronchery  * Licensed under the Apache License 2.0 (the "License").  You may not use
5e71b7053SJung-uk Kim  * this file except in compliance with the License.  You can obtain a copy
6e71b7053SJung-uk Kim  * in the file LICENSE in the source distribution or at
7e71b7053SJung-uk Kim  * https://www.openssl.org/source/license.html
8e71b7053SJung-uk Kim  */
9e71b7053SJung-uk Kim 
10e71b7053SJung-uk Kim #include "e_os.h"
11e71b7053SJung-uk Kim 
12e71b7053SJung-uk Kim #include "internal/err.h"
13e71b7053SJung-uk Kim #include <openssl/crypto.h>
14e71b7053SJung-uk Kim #include <openssl/evp.h>
15*b077aed3SPierre Pronchery #include <openssl/trace.h>
1617f01e99SJung-uk Kim #include "ssl_local.h"
17*b077aed3SPierre Pronchery #include "sslerr.h"
18e71b7053SJung-uk Kim #include "internal/thread_once.h"
19e71b7053SJung-uk Kim 
20e71b7053SJung-uk Kim static int stopped;
21e71b7053SJung-uk Kim 
22e71b7053SJung-uk Kim static void ssl_library_stop(void);
23e71b7053SJung-uk Kim 
24e71b7053SJung-uk Kim static CRYPTO_ONCE ssl_base = CRYPTO_ONCE_STATIC_INIT;
25e71b7053SJung-uk Kim static int ssl_base_inited = 0;
DEFINE_RUN_ONCE_STATIC(ossl_init_ssl_base)26e71b7053SJung-uk Kim DEFINE_RUN_ONCE_STATIC(ossl_init_ssl_base)
27e71b7053SJung-uk Kim {
28e71b7053SJung-uk Kim #ifndef OPENSSL_NO_COMP
29*b077aed3SPierre Pronchery     OSSL_TRACE(INIT, "ossl_init_ssl_base: "
30e71b7053SJung-uk Kim                "SSL_COMP_get_compression_methods()\n");
31e71b7053SJung-uk Kim     /*
32e71b7053SJung-uk Kim      * This will initialise the built-in compression algorithms. The value
33e71b7053SJung-uk Kim      * returned is a STACK_OF(SSL_COMP), but that can be discarded safely
34e71b7053SJung-uk Kim      */
35e71b7053SJung-uk Kim     SSL_COMP_get_compression_methods();
36e71b7053SJung-uk Kim #endif
37*b077aed3SPierre Pronchery     ssl_sort_cipher_list();
38*b077aed3SPierre Pronchery     OSSL_TRACE(INIT,"ossl_init_ssl_base: SSL_add_ssl_module()\n");
39e71b7053SJung-uk Kim     /*
40e71b7053SJung-uk Kim      * We ignore an error return here. Not much we can do - but not that bad
41e71b7053SJung-uk Kim      * either. We can still safely continue.
42e71b7053SJung-uk Kim      */
43e71b7053SJung-uk Kim     OPENSSL_atexit(ssl_library_stop);
44e71b7053SJung-uk Kim     ssl_base_inited = 1;
45e71b7053SJung-uk Kim     return 1;
46e71b7053SJung-uk Kim }
47e71b7053SJung-uk Kim 
48e71b7053SJung-uk Kim static CRYPTO_ONCE ssl_strings = CRYPTO_ONCE_STATIC_INIT;
4934252e89SJung-uk Kim 
DEFINE_RUN_ONCE_STATIC(ossl_init_load_ssl_strings)50e71b7053SJung-uk Kim DEFINE_RUN_ONCE_STATIC(ossl_init_load_ssl_strings)
51e71b7053SJung-uk Kim {
52e71b7053SJung-uk Kim     /*
53e71b7053SJung-uk Kim      * OPENSSL_NO_AUTOERRINIT is provided here to prevent at compile time
54e71b7053SJung-uk Kim      * pulling in all the error strings during static linking
55e71b7053SJung-uk Kim      */
56e71b7053SJung-uk Kim #if !defined(OPENSSL_NO_ERR) && !defined(OPENSSL_NO_AUTOERRINIT)
57*b077aed3SPierre Pronchery     OSSL_TRACE(INIT, "ossl_init_load_ssl_strings: ossl_err_load_SSL_strings()\n");
58*b077aed3SPierre Pronchery     ossl_err_load_SSL_strings();
59e71b7053SJung-uk Kim #endif
60e71b7053SJung-uk Kim     return 1;
61e71b7053SJung-uk Kim }
62e71b7053SJung-uk Kim 
DEFINE_RUN_ONCE_STATIC_ALT(ossl_init_no_load_ssl_strings,ossl_init_load_ssl_strings)636935a639SJung-uk Kim DEFINE_RUN_ONCE_STATIC_ALT(ossl_init_no_load_ssl_strings,
646935a639SJung-uk Kim                            ossl_init_load_ssl_strings)
65e71b7053SJung-uk Kim {
66e71b7053SJung-uk Kim     /* Do nothing in this case */
67e71b7053SJung-uk Kim     return 1;
68e71b7053SJung-uk Kim }
69e71b7053SJung-uk Kim 
ssl_library_stop(void)70e71b7053SJung-uk Kim static void ssl_library_stop(void)
71e71b7053SJung-uk Kim {
72e71b7053SJung-uk Kim     /* Might be explicitly called and also by atexit */
73e71b7053SJung-uk Kim     if (stopped)
74e71b7053SJung-uk Kim         return;
75e71b7053SJung-uk Kim     stopped = 1;
76e71b7053SJung-uk Kim 
77e71b7053SJung-uk Kim     if (ssl_base_inited) {
78e71b7053SJung-uk Kim #ifndef OPENSSL_NO_COMP
79*b077aed3SPierre Pronchery         OSSL_TRACE(INIT, "ssl_library_stop: "
80e71b7053SJung-uk Kim                    "ssl_comp_free_compression_methods_int()\n");
81e71b7053SJung-uk Kim         ssl_comp_free_compression_methods_int();
82e71b7053SJung-uk Kim #endif
83e71b7053SJung-uk Kim     }
84e71b7053SJung-uk Kim }
85e71b7053SJung-uk Kim 
86e71b7053SJung-uk Kim /*
87e71b7053SJung-uk Kim  * If this function is called with a non NULL settings value then it must be
88e71b7053SJung-uk Kim  * called prior to any threads making calls to any OpenSSL functions,
89e71b7053SJung-uk Kim  * i.e. passing a non-null settings value is assumed to be single-threaded.
90e71b7053SJung-uk Kim  */
OPENSSL_init_ssl(uint64_t opts,const OPENSSL_INIT_SETTINGS * settings)91e71b7053SJung-uk Kim int OPENSSL_init_ssl(uint64_t opts, const OPENSSL_INIT_SETTINGS * settings)
92e71b7053SJung-uk Kim {
93e71b7053SJung-uk Kim     static int stoperrset = 0;
94e71b7053SJung-uk Kim 
95e71b7053SJung-uk Kim     if (stopped) {
96e71b7053SJung-uk Kim         if (!stoperrset) {
97e71b7053SJung-uk Kim             /*
98e71b7053SJung-uk Kim              * We only ever set this once to avoid getting into an infinite
99e71b7053SJung-uk Kim              * loop where the error system keeps trying to init and fails so
100e71b7053SJung-uk Kim              * sets an error etc
101e71b7053SJung-uk Kim              */
102e71b7053SJung-uk Kim             stoperrset = 1;
103*b077aed3SPierre Pronchery             ERR_raise(ERR_LIB_SSL, ERR_R_INIT_FAIL);
104e71b7053SJung-uk Kim         }
105e71b7053SJung-uk Kim         return 0;
106e71b7053SJung-uk Kim     }
107e71b7053SJung-uk Kim 
1086935a639SJung-uk Kim     opts |= OPENSSL_INIT_ADD_ALL_CIPHERS
1096935a639SJung-uk Kim          |  OPENSSL_INIT_ADD_ALL_DIGESTS;
110e71b7053SJung-uk Kim #ifndef OPENSSL_NO_AUTOLOAD_CONFIG
1116935a639SJung-uk Kim     if ((opts & OPENSSL_INIT_NO_LOAD_CONFIG) == 0)
1126935a639SJung-uk Kim         opts |= OPENSSL_INIT_LOAD_CONFIG;
113e71b7053SJung-uk Kim #endif
1146935a639SJung-uk Kim 
1156935a639SJung-uk Kim     if (!OPENSSL_init_crypto(opts, settings))
116e71b7053SJung-uk Kim         return 0;
117e71b7053SJung-uk Kim 
118e71b7053SJung-uk Kim     if (!RUN_ONCE(&ssl_base, ossl_init_ssl_base))
119e71b7053SJung-uk Kim         return 0;
120e71b7053SJung-uk Kim 
121e71b7053SJung-uk Kim     if ((opts & OPENSSL_INIT_NO_LOAD_SSL_STRINGS)
1226935a639SJung-uk Kim         && !RUN_ONCE_ALT(&ssl_strings, ossl_init_no_load_ssl_strings,
1236935a639SJung-uk Kim                          ossl_init_load_ssl_strings))
124e71b7053SJung-uk Kim         return 0;
125e71b7053SJung-uk Kim 
126e71b7053SJung-uk Kim     if ((opts & OPENSSL_INIT_LOAD_SSL_STRINGS)
127e71b7053SJung-uk Kim         && !RUN_ONCE(&ssl_strings, ossl_init_load_ssl_strings))
128e71b7053SJung-uk Kim         return 0;
129e71b7053SJung-uk Kim 
130e71b7053SJung-uk Kim     return 1;
131e71b7053SJung-uk Kim }
132