Fix no-ocsp on Windows (and probably VMS)
[openssl.git] / ssl / ssl_init.c
1 /*
2  * Written by Matt Caswell for the OpenSSL project.
3  */
4 /* ====================================================================
5  * Copyright (c) 2016 The OpenSSL Project.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  *
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  *
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
17  *    distribution.
18  *
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/)"
23  *
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.
28  *
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.
32  *
33  * 6. Redistributions of any form whatsoever must retain the following
34  *    acknowledgment:
35  *    "This product includes software developed by the OpenSSL Project
36  *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"
37  *
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  * ====================================================================
51  *
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).
55  *
56  */
57
58 #include "e_os.h"
59
60 #include "internal/threads.h"
61 #include "internal/err.h"
62 #include <openssl/crypto.h>
63 #include <openssl/evp.h>
64 #include <assert.h>
65 #include "ssl_locl.h"
66
67 static int stopped;
68
69 static void ssl_library_stop(void);
70
71 static CRYPTO_ONCE ssl_base = CRYPTO_ONCE_STATIC_INIT;
72 static int ssl_base_inited = 0;
73 static void ossl_init_ssl_base(void)
74 {
75 #ifdef OPENSSL_INIT_DEBUG
76     fprintf(stderr, "OPENSSL_INIT: ossl_init_ssl_base: "
77                     "Adding SSL ciphers and digests\n");
78 #endif
79 #ifndef OPENSSL_NO_DES
80     EVP_add_cipher(EVP_des_cbc());
81     EVP_add_cipher(EVP_des_ede3_cbc());
82 #endif
83 #ifndef OPENSSL_NO_IDEA
84     EVP_add_cipher(EVP_idea_cbc());
85 #endif
86 #ifndef OPENSSL_NO_RC4
87     EVP_add_cipher(EVP_rc4());
88 # ifndef OPENSSL_NO_MD5
89     EVP_add_cipher(EVP_rc4_hmac_md5());
90 # endif
91 #endif
92 #ifndef OPENSSL_NO_RC2
93     EVP_add_cipher(EVP_rc2_cbc());
94     /*
95      * Not actually used for SSL/TLS but this makes PKCS#12 work if an
96      * application only calls SSL_library_init().
97      */
98     EVP_add_cipher(EVP_rc2_40_cbc());
99 #endif
100     EVP_add_cipher(EVP_aes_128_cbc());
101     EVP_add_cipher(EVP_aes_192_cbc());
102     EVP_add_cipher(EVP_aes_256_cbc());
103     EVP_add_cipher(EVP_aes_128_gcm());
104     EVP_add_cipher(EVP_aes_256_gcm());
105     EVP_add_cipher(EVP_aes_128_ccm());
106     EVP_add_cipher(EVP_aes_256_ccm());
107     EVP_add_cipher(EVP_aes_128_cbc_hmac_sha1());
108     EVP_add_cipher(EVP_aes_256_cbc_hmac_sha1());
109     EVP_add_cipher(EVP_aes_128_cbc_hmac_sha256());
110     EVP_add_cipher(EVP_aes_256_cbc_hmac_sha256());
111 #ifndef OPENSSL_NO_CAMELLIA
112     EVP_add_cipher(EVP_camellia_128_cbc());
113     EVP_add_cipher(EVP_camellia_256_cbc());
114 #endif
115 #if !defined(OPENSSL_NO_CHACHA) && !defined(OPENSSL_NO_POLY1305)
116     EVP_add_cipher(EVP_chacha20_poly1305());
117 #endif
118
119 #ifndef OPENSSL_NO_SEED
120     EVP_add_cipher(EVP_seed_cbc());
121 #endif
122
123 #ifndef OPENSSL_NO_MD5
124     EVP_add_digest(EVP_md5());
125     EVP_add_digest_alias(SN_md5, "ssl3-md5");
126     EVP_add_digest(EVP_md5_sha1());
127 #endif
128     EVP_add_digest(EVP_sha1()); /* RSA with sha1 */
129     EVP_add_digest_alias(SN_sha1, "ssl3-sha1");
130     EVP_add_digest_alias(SN_sha1WithRSAEncryption, SN_sha1WithRSA);
131     EVP_add_digest(EVP_sha224());
132     EVP_add_digest(EVP_sha256());
133     EVP_add_digest(EVP_sha384());
134     EVP_add_digest(EVP_sha512());
135 #ifndef OPENSSL_NO_COMP
136 #ifdef OPENSSL_INIT_DEBUG
137     fprintf(stderr, "OPENSSL_INIT: ossl_init_ssl_base: "
138                     "SSL_COMP_get_compression_methods()\n");
139 #endif
140     /*
141      * This will initialise the built-in compression algorithms. The value
142      * returned is a STACK_OF(SSL_COMP), but that can be discarded safely
143      */
144     SSL_COMP_get_compression_methods();
145 #endif
146     /* initialize cipher/digest methods table */
147     ssl_load_ciphers();
148
149 #ifdef OPENSSL_INIT_DEBUG
150     fprintf(stderr, "OPENSSL_INIT: ossl_init_ssl_base: "
151                     "SSL_add_ssl_module()\n");
152 #endif
153     SSL_add_ssl_module();
154     /*
155      * We ignore an error return here. Not much we can do - but not that bad
156      * either. We can still safely continue.
157      */
158     OPENSSL_atexit(ssl_library_stop);
159     ssl_base_inited = 1;
160 }
161
162 static CRYPTO_ONCE ssl_strings = CRYPTO_ONCE_STATIC_INIT;
163 static int ssl_strings_inited = 0;
164 static void ossl_init_load_ssl_strings(void)
165 {
166     /*
167      * OPENSSL_NO_AUTOERRINIT is provided here to prevent at compile time
168      * pulling in all the error strings during static linking
169      */
170 #if !defined(OPENSSL_NO_ERR) && !defined(OPENSSL_NO_AUTOERRINIT)
171 # ifdef OPENSSL_INIT_DEBUG
172         fprintf(stderr, "OPENSSL_INIT: ossl_init_load_ssl_strings: "
173                         "ERR_load_SSL_strings()\n");
174 # endif
175     ERR_load_SSL_strings();
176 #endif
177     ssl_strings_inited = 1;
178 }
179
180 static void ossl_init_no_load_ssl_strings(void)
181 {
182     /* Do nothing in this case */
183     return;
184 }
185
186 static void ssl_library_stop(void)
187 {
188     /* Might be explicitly called and also by atexit */
189     if (stopped)
190         return;
191     stopped = 1;
192
193     if (ssl_base_inited) {
194 #ifndef OPENSSL_NO_COMP
195 #ifdef OPENSSL_INIT_DEBUG
196         fprintf(stderr, "OPENSSL_INIT: ssl_library_stop: "
197                         "ssl_comp_free_compression_methods_int()\n");
198 #endif
199         ssl_comp_free_compression_methods_int();
200 #endif
201     }
202
203     if (ssl_strings_inited) {
204 #ifdef OPENSSL_INIT_DEBUG
205         fprintf(stderr, "OPENSSL_INIT: ssl_library_stop: "
206                         "err_free_strings_int()\n");
207 #endif
208         /*
209          * If both crypto and ssl error strings are inited we will end up
210          * calling err_free_strings_int() twice - but that's ok. The second
211          * time will be a no-op. It's easier to do that than to try and track
212          * between the two libraries whether they have both been inited.
213          */
214         err_free_strings_int();
215     }
216 }
217
218
219 /*
220  * If this function is called with a non NULL settings value then it must be
221  * called prior to any threads making calls to any OpenSSL functions,
222  * i.e. passing a non-null settings value is assumed to be single-threaded.
223  */
224 int OPENSSL_init_ssl(uint64_t opts, const OPENSSL_INIT_SETTINGS *settings)
225 {
226     static int stoperrset = 0;
227
228     if (stopped) {
229         if (!stoperrset) {
230             /*
231              * We only ever set this once to avoid getting into an infinite
232              * loop where the error system keeps trying to init and fails so
233              * sets an error etc
234              */
235             stoperrset = 1;
236             SSLerr(SSL_F_OPENSSL_INIT_SSL, ERR_R_INIT_FAIL);
237         }
238         return 0;
239     }
240
241     if (!OPENSSL_init_crypto(opts | OPENSSL_INIT_ADD_ALL_CIPHERS
242                              | OPENSSL_INIT_ADD_ALL_DIGESTS, settings))
243         return 0;
244
245     if (!CRYPTO_THREAD_run_once(&ssl_base, ossl_init_ssl_base))
246         return 0;
247
248     if ((opts & OPENSSL_INIT_NO_LOAD_SSL_STRINGS)
249             && !CRYPTO_THREAD_run_once(&ssl_strings,
250                                        ossl_init_no_load_ssl_strings))
251         return 0;
252
253     if ((opts & OPENSSL_INIT_LOAD_SSL_STRINGS)
254             && !CRYPTO_THREAD_run_once(&ssl_strings,
255                                        ossl_init_load_ssl_strings))
256         return 0;
257
258     return 1;
259 }
260