ssl/ssl_init.c

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