| 1 | /*
|
|---|
| 2 | * Copyright 1995-2021 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 | #ifndef OSSL_INTERNAL_CRYPTLIB_H
|
|---|
| 11 | # define OSSL_INTERNAL_CRYPTLIB_H
|
|---|
| 12 | # ifndef RT_WITHOUT_PRAGMA_ONCE /* VBOX */
|
|---|
| 13 | # pragma once
|
|---|
| 14 | # endif /* VBOX */
|
|---|
| 15 |
|
|---|
| 16 | # include <stdlib.h>
|
|---|
| 17 | # include <string.h>
|
|---|
| 18 |
|
|---|
| 19 | # ifdef OPENSSL_USE_APPLINK
|
|---|
| 20 | # define BIO_FLAGS_UPLINK_INTERNAL 0x8000
|
|---|
| 21 | # include "ms/uplink.h"
|
|---|
| 22 | # else
|
|---|
| 23 | # define BIO_FLAGS_UPLINK_INTERNAL 0
|
|---|
| 24 | # endif
|
|---|
| 25 |
|
|---|
| 26 | # include <openssl/crypto.h>
|
|---|
| 27 | # include <openssl/buffer.h>
|
|---|
| 28 | # include <openssl/bio.h>
|
|---|
| 29 | # include <openssl/asn1.h>
|
|---|
| 30 | # include <openssl/err.h>
|
|---|
| 31 | # include "internal/nelem.h"
|
|---|
| 32 |
|
|---|
| 33 | #ifdef NDEBUG
|
|---|
| 34 | # define ossl_assert(x) ((x) != 0)
|
|---|
| 35 | #else
|
|---|
| 36 | __owur static ossl_inline int ossl_assert_int(int expr, const char *exprstr,
|
|---|
| 37 | const char *file, int line)
|
|---|
| 38 | {
|
|---|
| 39 | if (!expr)
|
|---|
| 40 | OPENSSL_die(exprstr, file, line);
|
|---|
| 41 |
|
|---|
| 42 | return expr;
|
|---|
| 43 | }
|
|---|
| 44 |
|
|---|
| 45 | # define ossl_assert(x) ossl_assert_int((x) != 0, "Assertion failed: "#x, \
|
|---|
| 46 | __FILE__, __LINE__)
|
|---|
| 47 |
|
|---|
| 48 | #endif
|
|---|
| 49 |
|
|---|
| 50 | /*
|
|---|
| 51 | * Use this inside a union with the field that needs to be aligned to a
|
|---|
| 52 | * reasonable boundary for the platform. The most pessimistic alignment
|
|---|
| 53 | * of the listed types will be used by the compiler.
|
|---|
| 54 | */
|
|---|
| 55 | # define OSSL_UNION_ALIGN \
|
|---|
| 56 | double align; \
|
|---|
| 57 | ossl_uintmax_t align_int; \
|
|---|
| 58 | void *align_ptr
|
|---|
| 59 |
|
|---|
| 60 | typedef struct ex_callback_st EX_CALLBACK;
|
|---|
| 61 | DEFINE_STACK_OF(EX_CALLBACK)
|
|---|
| 62 |
|
|---|
| 63 | typedef struct mem_st MEM;
|
|---|
| 64 | DEFINE_LHASH_OF(MEM);
|
|---|
| 65 |
|
|---|
| 66 | #define OPENSSLDIR "/usr/local/ssl"
|
|---|
| 67 |
|
|---|
| 68 | # define OPENSSL_CONF "openssl.cnf"
|
|---|
| 69 |
|
|---|
| 70 | # ifndef OPENSSL_SYS_VMS
|
|---|
| 71 | # define X509_CERT_AREA OPENSSLDIR
|
|---|
| 72 | # define X509_CERT_DIR OPENSSLDIR "/certs"
|
|---|
| 73 | # define X509_CERT_FILE OPENSSLDIR "/cert.pem"
|
|---|
| 74 | # define X509_PRIVATE_DIR OPENSSLDIR "/private"
|
|---|
| 75 | # define CTLOG_FILE OPENSSLDIR "/ct_log_list.cnf"
|
|---|
| 76 | # else
|
|---|
| 77 | # define X509_CERT_AREA "OSSL$DATAROOT:[000000]"
|
|---|
| 78 | # define X509_CERT_DIR "OSSL$DATAROOT:[CERTS]"
|
|---|
| 79 | # define X509_CERT_FILE "OSSL$DATAROOT:[000000]cert.pem"
|
|---|
| 80 | # define X509_PRIVATE_DIR "OSSL$DATAROOT:[PRIVATE]"
|
|---|
| 81 | # define CTLOG_FILE "OSSL$DATAROOT:[000000]ct_log_list.cnf"
|
|---|
| 82 | # endif
|
|---|
| 83 |
|
|---|
| 84 | # define X509_CERT_DIR_EVP "SSL_CERT_DIR"
|
|---|
| 85 | # define X509_CERT_FILE_EVP "SSL_CERT_FILE"
|
|---|
| 86 | # define CTLOG_FILE_EVP "CTLOG_FILE"
|
|---|
| 87 |
|
|---|
| 88 | /* size of string representations */
|
|---|
| 89 | # define DECIMAL_SIZE(type) ((sizeof(type)*8+2)/3+1)
|
|---|
| 90 | # define HEX_SIZE(type) (sizeof(type)*2)
|
|---|
| 91 |
|
|---|
| 92 | void OPENSSL_cpuid_setup(void);
|
|---|
| 93 | #if defined(__i386) || defined(__i386__) || defined(_M_IX86) || \
|
|---|
| 94 | defined(__x86_64) || defined(__x86_64__) || \
|
|---|
| 95 | defined(_M_AMD64) || defined(_M_X64)
|
|---|
| 96 | extern unsigned int OPENSSL_ia32cap_P[];
|
|---|
| 97 | #endif
|
|---|
| 98 | void OPENSSL_showfatal(const char *fmta, ...);
|
|---|
| 99 | int ossl_do_ex_data_init(OSSL_LIB_CTX *ctx);
|
|---|
| 100 | void ossl_crypto_cleanup_all_ex_data_int(OSSL_LIB_CTX *ctx);
|
|---|
| 101 | int openssl_init_fork_handlers(void);
|
|---|
| 102 | int openssl_get_fork_id(void);
|
|---|
| 103 |
|
|---|
| 104 | char *ossl_safe_getenv(const char *name);
|
|---|
| 105 |
|
|---|
| 106 | extern CRYPTO_RWLOCK *memdbg_lock;
|
|---|
| 107 | int openssl_strerror_r(int errnum, char *buf, size_t buflen);
|
|---|
| 108 | # if !defined(OPENSSL_NO_STDIO)
|
|---|
| 109 | FILE *openssl_fopen(const char *filename, const char *mode);
|
|---|
| 110 | # else
|
|---|
| 111 | void *openssl_fopen(const char *filename, const char *mode);
|
|---|
| 112 | # endif
|
|---|
| 113 |
|
|---|
| 114 | uint32_t OPENSSL_rdtsc(void);
|
|---|
| 115 | size_t OPENSSL_instrument_bus(unsigned int *, size_t);
|
|---|
| 116 | size_t OPENSSL_instrument_bus2(unsigned int *, size_t, size_t);
|
|---|
| 117 |
|
|---|
| 118 | /* ex_data structures */
|
|---|
| 119 |
|
|---|
| 120 | /*
|
|---|
| 121 | * Each structure type (sometimes called a class), that supports
|
|---|
| 122 | * exdata has a stack of callbacks for each instance.
|
|---|
| 123 | */
|
|---|
| 124 | struct ex_callback_st {
|
|---|
| 125 | long argl; /* Arbitrary long */
|
|---|
| 126 | void *argp; /* Arbitrary void * */
|
|---|
| 127 | int priority; /* Priority ordering for freeing */
|
|---|
| 128 | CRYPTO_EX_new *new_func;
|
|---|
| 129 | CRYPTO_EX_free *free_func;
|
|---|
| 130 | CRYPTO_EX_dup *dup_func;
|
|---|
| 131 | };
|
|---|
| 132 |
|
|---|
| 133 | /*
|
|---|
| 134 | * The state for each class. This could just be a typedef, but
|
|---|
| 135 | * a structure allows future changes.
|
|---|
| 136 | */
|
|---|
| 137 | typedef struct ex_callbacks_st {
|
|---|
| 138 | STACK_OF(EX_CALLBACK) *meth;
|
|---|
| 139 | } EX_CALLBACKS;
|
|---|
| 140 |
|
|---|
| 141 | typedef struct ossl_ex_data_global_st {
|
|---|
| 142 | CRYPTO_RWLOCK *ex_data_lock;
|
|---|
| 143 | EX_CALLBACKS ex_data[CRYPTO_EX_INDEX__COUNT];
|
|---|
| 144 | } OSSL_EX_DATA_GLOBAL;
|
|---|
| 145 |
|
|---|
| 146 |
|
|---|
| 147 | /* OSSL_LIB_CTX */
|
|---|
| 148 |
|
|---|
| 149 | # define OSSL_LIB_CTX_PROVIDER_STORE_RUN_ONCE_INDEX 0
|
|---|
| 150 | # define OSSL_LIB_CTX_DEFAULT_METHOD_STORE_RUN_ONCE_INDEX 1
|
|---|
| 151 | # define OSSL_LIB_CTX_METHOD_STORE_RUN_ONCE_INDEX 2
|
|---|
| 152 | # define OSSL_LIB_CTX_MAX_RUN_ONCE 3
|
|---|
| 153 |
|
|---|
| 154 | # define OSSL_LIB_CTX_EVP_METHOD_STORE_INDEX 0
|
|---|
| 155 | # define OSSL_LIB_CTX_PROVIDER_STORE_INDEX 1
|
|---|
| 156 | # define OSSL_LIB_CTX_PROPERTY_DEFN_INDEX 2
|
|---|
| 157 | # define OSSL_LIB_CTX_PROPERTY_STRING_INDEX 3
|
|---|
| 158 | # define OSSL_LIB_CTX_NAMEMAP_INDEX 4
|
|---|
| 159 | # define OSSL_LIB_CTX_DRBG_INDEX 5
|
|---|
| 160 | # define OSSL_LIB_CTX_DRBG_NONCE_INDEX 6
|
|---|
| 161 | # define OSSL_LIB_CTX_RAND_CRNGT_INDEX 7
|
|---|
| 162 | # ifdef FIPS_MODULE
|
|---|
| 163 | # define OSSL_LIB_CTX_THREAD_EVENT_HANDLER_INDEX 8
|
|---|
| 164 | # endif
|
|---|
| 165 | # define OSSL_LIB_CTX_FIPS_PROV_INDEX 9
|
|---|
| 166 | # define OSSL_LIB_CTX_ENCODER_STORE_INDEX 10
|
|---|
| 167 | # define OSSL_LIB_CTX_DECODER_STORE_INDEX 11
|
|---|
| 168 | # define OSSL_LIB_CTX_SELF_TEST_CB_INDEX 12
|
|---|
| 169 | # define OSSL_LIB_CTX_BIO_PROV_INDEX 13
|
|---|
| 170 | # define OSSL_LIB_CTX_GLOBAL_PROPERTIES 14
|
|---|
| 171 | # define OSSL_LIB_CTX_STORE_LOADER_STORE_INDEX 15
|
|---|
| 172 | # define OSSL_LIB_CTX_PROVIDER_CONF_INDEX 16
|
|---|
| 173 | # define OSSL_LIB_CTX_BIO_CORE_INDEX 17
|
|---|
| 174 | # define OSSL_LIB_CTX_CHILD_PROVIDER_INDEX 18
|
|---|
| 175 | # define OSSL_LIB_CTX_MAX_INDEXES 19
|
|---|
| 176 |
|
|---|
| 177 | # define OSSL_LIB_CTX_METHOD_LOW_PRIORITY -1
|
|---|
| 178 | # define OSSL_LIB_CTX_METHOD_DEFAULT_PRIORITY 0
|
|---|
| 179 | # define OSSL_LIB_CTX_METHOD_PRIORITY_1 1
|
|---|
| 180 | # define OSSL_LIB_CTX_METHOD_PRIORITY_2 2
|
|---|
| 181 |
|
|---|
| 182 | typedef struct ossl_lib_ctx_method {
|
|---|
| 183 | int priority;
|
|---|
| 184 | void *(*new_func)(OSSL_LIB_CTX *ctx);
|
|---|
| 185 | void (*free_func)(void *);
|
|---|
| 186 | } OSSL_LIB_CTX_METHOD;
|
|---|
| 187 |
|
|---|
| 188 | OSSL_LIB_CTX *ossl_lib_ctx_get_concrete(OSSL_LIB_CTX *ctx);
|
|---|
| 189 | int ossl_lib_ctx_is_default(OSSL_LIB_CTX *ctx);
|
|---|
| 190 | int ossl_lib_ctx_is_global_default(OSSL_LIB_CTX *ctx);
|
|---|
| 191 |
|
|---|
| 192 | /* Functions to retrieve pointers to data by index */
|
|---|
| 193 | void *ossl_lib_ctx_get_data(OSSL_LIB_CTX *, int /* index */,
|
|---|
| 194 | const OSSL_LIB_CTX_METHOD * ctx);
|
|---|
| 195 |
|
|---|
| 196 | void ossl_lib_ctx_default_deinit(void);
|
|---|
| 197 | OSSL_EX_DATA_GLOBAL *ossl_lib_ctx_get_ex_data_global(OSSL_LIB_CTX *ctx);
|
|---|
| 198 | typedef int (ossl_lib_ctx_run_once_fn)(OSSL_LIB_CTX *ctx);
|
|---|
| 199 | typedef void (ossl_lib_ctx_onfree_fn)(OSSL_LIB_CTX *ctx);
|
|---|
| 200 |
|
|---|
| 201 | int ossl_lib_ctx_run_once(OSSL_LIB_CTX *ctx, unsigned int idx,
|
|---|
| 202 | ossl_lib_ctx_run_once_fn run_once_fn);
|
|---|
| 203 | int ossl_lib_ctx_onfree(OSSL_LIB_CTX *ctx, ossl_lib_ctx_onfree_fn onfreefn);
|
|---|
| 204 | const char *ossl_lib_ctx_get_descriptor(OSSL_LIB_CTX *libctx);
|
|---|
| 205 |
|
|---|
| 206 | OSSL_LIB_CTX *ossl_crypto_ex_data_get_ossl_lib_ctx(const CRYPTO_EX_DATA *ad);
|
|---|
| 207 | int ossl_crypto_new_ex_data_ex(OSSL_LIB_CTX *ctx, int class_index, void *obj,
|
|---|
| 208 | CRYPTO_EX_DATA *ad);
|
|---|
| 209 | int ossl_crypto_get_ex_new_index_ex(OSSL_LIB_CTX *ctx, int class_index,
|
|---|
| 210 | long argl, void *argp,
|
|---|
| 211 | CRYPTO_EX_new *new_func,
|
|---|
| 212 | CRYPTO_EX_dup *dup_func,
|
|---|
| 213 | CRYPTO_EX_free *free_func,
|
|---|
| 214 | int priority);
|
|---|
| 215 | int ossl_crypto_free_ex_index_ex(OSSL_LIB_CTX *ctx, int class_index, int idx);
|
|---|
| 216 |
|
|---|
| 217 | /* Function for simple binary search */
|
|---|
| 218 |
|
|---|
| 219 | /* Flags */
|
|---|
| 220 | # define OSSL_BSEARCH_VALUE_ON_NOMATCH 0x01
|
|---|
| 221 | # define OSSL_BSEARCH_FIRST_VALUE_ON_MATCH 0x02
|
|---|
| 222 |
|
|---|
| 223 | const void *ossl_bsearch(const void *key, const void *base, int num,
|
|---|
| 224 | int size, int (*cmp) (const void *, const void *),
|
|---|
| 225 | int flags);
|
|---|
| 226 |
|
|---|
| 227 | char *ossl_sk_ASN1_UTF8STRING2text(STACK_OF(ASN1_UTF8STRING) *text,
|
|---|
| 228 | const char *sep, size_t max_len);
|
|---|
| 229 | char *ossl_ipaddr_to_asc(unsigned char *p, int len);
|
|---|
| 230 |
|
|---|
| 231 | char *ossl_buf2hexstr_sep(const unsigned char *buf, long buflen, char sep);
|
|---|
| 232 | unsigned char *ossl_hexstr2buf_sep(const char *str, long *buflen,
|
|---|
| 233 | const char sep);
|
|---|
| 234 |
|
|---|
| 235 | static ossl_inline int ossl_ends_with_dirsep(const char *path)
|
|---|
| 236 | {
|
|---|
| 237 | if (*path != '\0')
|
|---|
| 238 | path += strlen(path) - 1;
|
|---|
| 239 | # if defined __VMS
|
|---|
| 240 | if (*path == ']' || *path == '>' || *path == ':')
|
|---|
| 241 | return 1;
|
|---|
| 242 | # elif defined _WIN32
|
|---|
| 243 | if (*path == '\\')
|
|---|
| 244 | return 1;
|
|---|
| 245 | # endif
|
|---|
| 246 | return *path == '/';
|
|---|
| 247 | }
|
|---|
| 248 |
|
|---|
| 249 | static ossl_inline int ossl_is_absolute_path(const char *path)
|
|---|
| 250 | {
|
|---|
| 251 | # if defined __VMS
|
|---|
| 252 | if (strchr(path, ':') != NULL
|
|---|
| 253 | || ((path[0] == '[' || path[0] == '<')
|
|---|
| 254 | && path[1] != '.' && path[1] != '-'
|
|---|
| 255 | && path[1] != ']' && path[1] != '>'))
|
|---|
| 256 | return 1;
|
|---|
| 257 | # elif defined _WIN32
|
|---|
| 258 | if (path[0] == '\\'
|
|---|
| 259 | || (path[0] != '\0' && path[1] == ':'))
|
|---|
| 260 | return 1;
|
|---|
| 261 | # endif
|
|---|
| 262 | return path[0] == '/';
|
|---|
| 263 | }
|
|---|
| 264 |
|
|---|
| 265 | #endif
|
|---|
