Fix a gcc-8 warning -Wcast-function-type
[openssl.git] / ssl / ssl_init.c
1 /*
2  * Copyright 2016 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the OpenSSL license (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 "ssl_locl.h"
16 #include "internal/thread_once.h"
17
18 static int stopped;
19
20 static void ssl_library_stop(void);
21
22 static CRYPTO_ONCE ssl_base = CRYPTO_ONCE_STATIC_INIT;
23 static int ssl_base_inited = 0;
24 DEFINE_RUN_ONCE_STATIC(ossl_init_ssl_base)
25 {
26 #ifdef OPENSSL_INIT_DEBUG
27     fprintf(stderr, "OPENSSL_INIT: ossl_init_ssl_base: "
28             "Adding SSL ciphers and digests\n");
29 #endif
30 #ifndef OPENSSL_NO_DES
31     EVP_add_cipher(EVP_des_cbc());
32     EVP_add_cipher(EVP_des_ede3_cbc());
33 #endif
34 #ifndef OPENSSL_NO_IDEA
35     EVP_add_cipher(EVP_idea_cbc());
36 #endif
37 #ifndef OPENSSL_NO_RC4
38     EVP_add_cipher(EVP_rc4());
39 # ifndef OPENSSL_NO_MD5
40     EVP_add_cipher(EVP_rc4_hmac_md5());
41 # endif
42 #endif
43 #ifndef OPENSSL_NO_RC2
44     EVP_add_cipher(EVP_rc2_cbc());
45     /*
46      * Not actually used for SSL/TLS but this makes PKCS#12 work if an
47      * application only calls SSL_library_init().
48      */
49     EVP_add_cipher(EVP_rc2_40_cbc());
50 #endif
51     EVP_add_cipher(EVP_aes_128_cbc());
52     EVP_add_cipher(EVP_aes_192_cbc());
53     EVP_add_cipher(EVP_aes_256_cbc());
54     EVP_add_cipher(EVP_aes_128_gcm());
55     EVP_add_cipher(EVP_aes_256_gcm());
56     EVP_add_cipher(EVP_aes_128_ccm());
57     EVP_add_cipher(EVP_aes_256_ccm());
58     EVP_add_cipher(EVP_aes_128_cbc_hmac_sha1());
59     EVP_add_cipher(EVP_aes_256_cbc_hmac_sha1());
60     EVP_add_cipher(EVP_aes_128_cbc_hmac_sha256());
61     EVP_add_cipher(EVP_aes_256_cbc_hmac_sha256());
62 #ifndef OPENSSL_NO_ARIA
63     EVP_add_cipher(EVP_aria_128_gcm());
64     EVP_add_cipher(EVP_aria_256_gcm());
65 #endif
66 #ifndef OPENSSL_NO_CAMELLIA
67     EVP_add_cipher(EVP_camellia_128_cbc());
68     EVP_add_cipher(EVP_camellia_256_cbc());
69 #endif
70 #if !defined(OPENSSL_NO_CHACHA) && !defined(OPENSSL_NO_POLY1305)
71     EVP_add_cipher(EVP_chacha20_poly1305());
72 #endif
73
74 #ifndef OPENSSL_NO_SEED
75     EVP_add_cipher(EVP_seed_cbc());
76 #endif
77
78 #ifndef OPENSSL_NO_MD5
79     EVP_add_digest(EVP_md5());
80     EVP_add_digest_alias(SN_md5, "ssl3-md5");
81     EVP_add_digest(EVP_md5_sha1());
82 #endif
83     EVP_add_digest(EVP_sha1()); /* RSA with sha1 */
84     EVP_add_digest_alias(SN_sha1, "ssl3-sha1");
85     EVP_add_digest_alias(SN_sha1WithRSAEncryption, SN_sha1WithRSA);
86     EVP_add_digest(EVP_sha224());
87     EVP_add_digest(EVP_sha256());
88     EVP_add_digest(EVP_sha384());
89     EVP_add_digest(EVP_sha512());
90 #ifndef OPENSSL_NO_COMP
91 # ifdef OPENSSL_INIT_DEBUG
92     fprintf(stderr, "OPENSSL_INIT: ossl_init_ssl_base: "
93             "SSL_COMP_get_compression_methods()\n");
94 # endif
95     /*
96      * This will initialise the built-in compression algorithms. The value
97      * returned is a STACK_OF(SSL_COMP), but that can be discarded safely
98      */
99     SSL_COMP_get_compression_methods();
100 #endif
101     /* initialize cipher/digest methods table */
102     if (!ssl_load_ciphers())
103         return 0;
104
105 #ifdef OPENSSL_INIT_DEBUG
106     fprintf(stderr, "OPENSSL_INIT: ossl_init_ssl_base: "
107             "SSL_add_ssl_module()\n");
108 #endif
109     SSL_add_ssl_module();
110     /*
111      * We ignore an error return here. Not much we can do - but not that bad
112      * either. We can still safely continue.
113      */
114     OPENSSL_atexit(ssl_library_stop);
115     ssl_base_inited = 1;
116     return 1;
117 }
118
119 static CRYPTO_ONCE ssl_strings = CRYPTO_ONCE_STATIC_INIT;
120 static int ssl_strings_inited = 0;
121 DEFINE_RUN_ONCE_STATIC(ossl_init_load_ssl_strings)
122 {
123     /*
124      * OPENSSL_NO_AUTOERRINIT is provided here to prevent at compile time
125      * pulling in all the error strings during static linking
126      */
127 #if !defined(OPENSSL_NO_ERR) && !defined(OPENSSL_NO_AUTOERRINIT)
128 # ifdef OPENSSL_INIT_DEBUG
129     fprintf(stderr, "OPENSSL_INIT: ossl_init_load_ssl_strings: "
130             "ERR_load_SSL_strings()\n");
131 # endif
132     ERR_load_SSL_strings();
133 #endif
134     ssl_strings_inited = 1;
135     return 1;
136 }
137
138 DEFINE_RUN_ONCE_STATIC(ossl_init_no_load_ssl_strings)
139 {
140     /* Do nothing in this case */
141     return 1;
142 }
143
144 static void ssl_library_stop(void)
145 {
146     /* Might be explicitly called and also by atexit */
147     if (stopped)
148         return;
149     stopped = 1;
150
151     if (ssl_base_inited) {
152 #ifndef OPENSSL_NO_COMP
153 # ifdef OPENSSL_INIT_DEBUG
154         fprintf(stderr, "OPENSSL_INIT: ssl_library_stop: "
155                 "ssl_comp_free_compression_methods_int()\n");
156 # endif
157         ssl_comp_free_compression_methods_int();
158 #endif
159     }
160
161     if (ssl_strings_inited) {
162 #ifdef OPENSSL_INIT_DEBUG
163         fprintf(stderr, "OPENSSL_INIT: ssl_library_stop: "
164                 "err_free_strings_int()\n");
165 #endif
166         /*
167          * If both crypto and ssl error strings are inited we will end up
168          * calling err_free_strings_int() twice - but that's ok. The second
169          * time will be a no-op. It's easier to do that than to try and track
170          * between the two libraries whether they have both been inited.
171          */
172         err_free_strings_int();
173     }
174 }
175
176 /*
177  * If this function is called with a non NULL settings value then it must be
178  * called prior to any threads making calls to any OpenSSL functions,
179  * i.e. passing a non-null settings value is assumed to be single-threaded.
180  */
181 int OPENSSL_init_ssl(uint64_t opts, const OPENSSL_INIT_SETTINGS * settings)
182 {
183     static int stoperrset = 0;
184
185     if (stopped) {
186         if (!stoperrset) {
187             /*
188              * We only ever set this once to avoid getting into an infinite
189              * loop where the error system keeps trying to init and fails so
190              * sets an error etc
191              */
192             stoperrset = 1;
193             SSLerr(SSL_F_OPENSSL_INIT_SSL, ERR_R_INIT_FAIL);
194         }
195         return 0;
196     }
197
198     if (!RUN_ONCE(&ssl_base, ossl_init_ssl_base))
199         return 0;
200
201     if (!OPENSSL_init_crypto(opts | OPENSSL_INIT_ADD_ALL_CIPHERS
202                              | OPENSSL_INIT_ADD_ALL_DIGESTS, settings))
203         return 0;
204
205     if ((opts & OPENSSL_INIT_NO_LOAD_SSL_STRINGS)
206         && !RUN_ONCE(&ssl_strings, ossl_init_no_load_ssl_strings))
207         return 0;
208
209     if ((opts & OPENSSL_INIT_LOAD_SSL_STRINGS)
210         && !RUN_ONCE(&ssl_strings, ossl_init_load_ssl_strings))
211         return 0;
212
213     return 1;
214 }