ssl/ssl_init.c

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