include/internal/cryptlib.h - third_party/openssl - Git at Google

 /*
  * Copyright 1995-2020 The OpenSSL Project Authors. All Rights Reserved.
  *
  * Licensed under the Apache License 2.0 (the "License").  You may not use
  * this file except in compliance with the License.  You can obtain a copy
  * in the file LICENSE in the source distribution or at
  * https://www.openssl.org/source/license.html
  */

 #ifndef OSSL_INTERNAL_CRYPTLIB_H
 # define OSSL_INTERNAL_CRYPTLIB_H

 # include <stdlib.h>
 # include <string.h>

 # ifdef OPENSSL_USE_APPLINK
 #  define BIO_FLAGS_UPLINK_INTERNAL 0x8000
 #  include "ms/uplink.h"
 # else
 #  define BIO_FLAGS_UPLINK_INTERNAL 0
 # endif

 # include <openssl/crypto.h>
 # include <openssl/buffer.h>
 # include <openssl/bio.h>
 # include <openssl/asn1.h>
 # include <openssl/err.h>
 # include "internal/nelem.h"

 #ifdef NDEBUG
 # define ossl_assert(x) ((x) != 0)
 #else
 __owur static ossl_inline int ossl_assert_int(int expr, const char *exprstr,
                                               const char *file, int line)
 {
     if (!expr)
         OPENSSL_die(exprstr, file, line);

     return expr;
 }

 # define ossl_assert(x) ossl_assert_int((x) != 0, "Assertion failed: "#x, \
                                          __FILE__, __LINE__)

 #endif

 /*
  * Use this inside a union with the field that needs to be aligned to a
  * reasonable boundary for the platform.  The most pessimistic alignment
  * of the listed types will be used by the compiler.
  */
 # define OSSL_UNION_ALIGN       \
     double align;               \
     ossl_uintmax_t align_int;   \
     void *align_ptr

 typedef struct ex_callback_st EX_CALLBACK;
 DEFINE_STACK_OF(EX_CALLBACK)

 typedef struct mem_st MEM;
 DEFINE_LHASH_OF(MEM);

 # define OPENSSL_CONF             "openssl.cnf"

 # ifndef OPENSSL_SYS_VMS
 #  define X509_CERT_AREA          OPENSSLDIR
 #  define X509_CERT_DIR           OPENSSLDIR "/certs"
 #  define X509_CERT_FILE          OPENSSLDIR "/cert.pem"
 #  define X509_PRIVATE_DIR        OPENSSLDIR "/private"
 #  define CTLOG_FILE              OPENSSLDIR "/ct_log_list.cnf"
 # else
 #  define X509_CERT_AREA          "OSSL$DATAROOT:[000000]"
 #  define X509_CERT_DIR           "OSSL$DATAROOT:[CERTS]"
 #  define X509_CERT_FILE          "OSSL$DATAROOT:[000000]cert.pem"
 #  define X509_PRIVATE_DIR        "OSSL$DATAROOT:[PRIVATE]"
 #  define CTLOG_FILE              "OSSL$DATAROOT:[000000]ct_log_list.cnf"
 # endif

 # define X509_CERT_DIR_EVP        "SSL_CERT_DIR"
 # define X509_CERT_FILE_EVP       "SSL_CERT_FILE"
 # define CTLOG_FILE_EVP           "CTLOG_FILE"

 /* size of string representations */
 # define DECIMAL_SIZE(type)      ((sizeof(type)*8+2)/3+1)
 # define HEX_SIZE(type)          (sizeof(type)*2)

 void OPENSSL_cpuid_setup(void);
 #if defined(__i386)   || defined(__i386__)   || defined(_M_IX86) || \
     defined(__x86_64) || defined(__x86_64__) || \
     defined(_M_AMD64) || defined(_M_X64)
 extern unsigned int OPENSSL_ia32cap_P[];
 #endif
 void OPENSSL_showfatal(const char *fmta, ...);
 int do_ex_data_init(OPENSSL_CTX *ctx);
 void crypto_cleanup_all_ex_data_int(OPENSSL_CTX *ctx);
 int openssl_init_fork_handlers(void);
 int openssl_get_fork_id(void);

 char *ossl_safe_getenv(const char *name);

 extern CRYPTO_RWLOCK *memdbg_lock;
 int openssl_strerror_r(int errnum, char *buf, size_t buflen);
 # if !defined(OPENSSL_NO_STDIO)
 FILE *openssl_fopen(const char *filename, const char *mode);
 # else
 void *openssl_fopen(const char *filename, const char *mode);
 # endif

 uint32_t OPENSSL_rdtsc(void);
 size_t OPENSSL_instrument_bus(unsigned int *, size_t);
 size_t OPENSSL_instrument_bus2(unsigned int *, size_t, size_t);

 /* ex_data structures */

 /*
  * Each structure type (sometimes called a class), that supports
  * exdata has a stack of callbacks for each instance.
  */
 struct ex_callback_st {
     long argl;                  /* Arbitrary long */
     void *argp;                 /* Arbitrary void * */
     CRYPTO_EX_new *new_func;
     CRYPTO_EX_free *free_func;
     CRYPTO_EX_dup *dup_func;
 };

 /*
  * The state for each class.  This could just be a typedef, but
  * a structure allows future changes.
  */
 typedef struct ex_callbacks_st {
     STACK_OF(EX_CALLBACK) *meth;
 } EX_CALLBACKS;

 typedef struct ossl_ex_data_global_st {
     CRYPTO_RWLOCK *ex_data_lock;
     EX_CALLBACKS ex_data[CRYPTO_EX_INDEX__COUNT];
 } OSSL_EX_DATA_GLOBAL;


 /* OPENSSL_CTX */

 # define OPENSSL_CTX_PROVIDER_STORE_RUN_ONCE_INDEX          0
 # define OPENSSL_CTX_DEFAULT_METHOD_STORE_RUN_ONCE_INDEX    1
 # define OPENSSL_CTX_METHOD_STORE_RUN_ONCE_INDEX            2
 # define OPENSSL_CTX_MAX_RUN_ONCE                           3

 # define OPENSSL_CTX_EVP_METHOD_STORE_INDEX         0
 # define OPENSSL_CTX_PROVIDER_STORE_INDEX           1
 # define OPENSSL_CTX_PROPERTY_DEFN_INDEX            2
 # define OPENSSL_CTX_PROPERTY_STRING_INDEX          3
 # define OPENSSL_CTX_NAMEMAP_INDEX                  4
 # define OPENSSL_CTX_DRBG_INDEX                     5
 # define OPENSSL_CTX_DRBG_NONCE_INDEX               6
 # define OPENSSL_CTX_RAND_CRNGT_INDEX               7
 # define OPENSSL_CTX_THREAD_EVENT_HANDLER_INDEX     8
 # define OPENSSL_CTX_FIPS_PROV_INDEX                9
 # define OPENSSL_CTX_ENCODER_STORE_INDEX        10
 # define OPENSSL_CTX_DECODER_STORE_INDEX      11
 # define OPENSSL_CTX_SELF_TEST_CB_INDEX            12
 # define OPENSSL_CTX_BIO_PROV_INDEX                13
 # define OPENSSL_CTX_GLOBAL_PROPERTIES             14
 # define OPENSSL_CTX_STORE_LOADER_STORE_INDEX      15
 # define OPENSSL_CTX_MAX_INDEXES                   16

 typedef struct openssl_ctx_method {
     void *(*new_func)(OPENSSL_CTX *ctx);
     void (*free_func)(void *);
 } OPENSSL_CTX_METHOD;

 OPENSSL_CTX *openssl_ctx_get_concrete(OPENSSL_CTX *ctx);
 int openssl_ctx_is_default(OPENSSL_CTX *ctx);
 int openssl_ctx_is_global_default(OPENSSL_CTX *ctx);

 /* Functions to retrieve pointers to data by index */
 void *openssl_ctx_get_data(OPENSSL_CTX *, int /* index */,
                            const OPENSSL_CTX_METHOD * ctx);

 void openssl_ctx_default_deinit(void);
 OSSL_EX_DATA_GLOBAL *openssl_ctx_get_ex_data_global(OPENSSL_CTX *ctx);
 typedef int (openssl_ctx_run_once_fn)(OPENSSL_CTX *ctx);
 typedef void (openssl_ctx_onfree_fn)(OPENSSL_CTX *ctx);

 int openssl_ctx_run_once(OPENSSL_CTX *ctx, unsigned int idx,
                          openssl_ctx_run_once_fn run_once_fn);
 int openssl_ctx_onfree(OPENSSL_CTX *ctx, openssl_ctx_onfree_fn onfreefn);

 OPENSSL_CTX *crypto_ex_data_get_openssl_ctx(const CRYPTO_EX_DATA *ad);
 int crypto_new_ex_data_ex(OPENSSL_CTX *ctx, int class_index, void *obj,
                           CRYPTO_EX_DATA *ad);
 int crypto_get_ex_new_index_ex(OPENSSL_CTX *ctx, int class_index,
                                long argl, void *argp,
                                CRYPTO_EX_new *new_func,
                                CRYPTO_EX_dup *dup_func,
                                CRYPTO_EX_free *free_func);
 int crypto_free_ex_index_ex(OPENSSL_CTX *ctx, int class_index, int idx);

 /* Function for simple binary search */

 /* Flags */
 # define OSSL_BSEARCH_VALUE_ON_NOMATCH            0x01
 # define OSSL_BSEARCH_FIRST_VALUE_ON_MATCH        0x02

 const void *ossl_bsearch(const void *key, const void *base, int num,
                          int size, int (*cmp) (const void *, const void *),
                          int flags);

 /* system-specific variants defining ossl_sleep() */
 #ifdef OPENSSL_SYS_UNIX
 # include <unistd.h>
 static ossl_inline void ossl_sleep(unsigned long millis)
 {
 # ifdef OPENSSL_SYS_VXWORKS
     struct timespec ts;
     ts.tv_sec = (long int) (millis / 1000);
     ts.tv_nsec = (long int) (millis % 1000) * 1000000ul;
     nanosleep(&ts, NULL);
 # elif defined(__TANDEM) && !defined(_REENTRANT)
 #  include <cextdecs.h(PROCESS_DELAY_)>
     /* HPNS does not support usleep for non threaded apps */
     PROCESS_DELAY_(millis * 1000);
 # else
     usleep(millis * 1000);
 # endif
 }
 #elif defined(_WIN32)
 # include <windows.h>
 static ossl_inline void ossl_sleep(unsigned long millis)
 {
     Sleep(millis);
 }
 #else
 /* Fallback to a busy wait */
 static ossl_inline void ossl_sleep(unsigned long millis)
 {
     struct timeval start, now;
     unsigned long elapsedms;

     gettimeofday(&start, NULL);
     do {
         gettimeofday(&now, NULL);
         elapsedms = (((now.tv_sec - start.tv_sec) * 1000000)
                      + now.tv_usec - start.tv_usec) / 1000;
     } while (elapsedms < millis);
 }
 #endif /* defined OPENSSL_SYS_UNIX */

 char *sk_ASN1_UTF8STRING2text(STACK_OF(ASN1_UTF8STRING) *text, const char *sep,
                               size_t max_len);
 char *ipaddr_to_asc(unsigned char *p, int len);

 char *openssl_buf2hexstr_sep(const unsigned char *buf, long buflen, char sep);
 unsigned char *openssl_hexstr2buf_sep(const char *str, long *buflen,
                                       const char sep);

 #endif
	/*
	* Copyright 1995-2020 The OpenSSL Project Authors. All Rights Reserved.
	*
	* Licensed under the Apache License 2.0 (the "License"). You may not use
	* this file except in compliance with the License. You can obtain a copy
	* in the file LICENSE in the source distribution or at
	* https://www.openssl.org/source/license.html
	*/

	#ifndef OSSL_INTERNAL_CRYPTLIB_H
	# define OSSL_INTERNAL_CRYPTLIB_H

	# include <stdlib.h>
	# include <string.h>

	# ifdef OPENSSL_USE_APPLINK
	# define BIO_FLAGS_UPLINK_INTERNAL 0x8000
	# include "ms/uplink.h"
	# else
	# define BIO_FLAGS_UPLINK_INTERNAL 0
	# endif

	# include <openssl/crypto.h>
	# include <openssl/buffer.h>
	# include <openssl/bio.h>
	# include <openssl/asn1.h>
	# include <openssl/err.h>
	# include "internal/nelem.h"

	#ifdef NDEBUG
	# define ossl_assert(x) ((x) != 0)
	#else
	__owur static ossl_inline int ossl_assert_int(int expr, const char *exprstr,
	const char *file, int line)
	{
	if (!expr)
	OPENSSL_die(exprstr, file, line);

	return expr;
	}

	# define ossl_assert(x) ossl_assert_int((x) != 0, "Assertion failed: "#x, \
	__FILE__, __LINE__)

	#endif

	/*
	* Use this inside a union with the field that needs to be aligned to a
	* reasonable boundary for the platform. The most pessimistic alignment
	* of the listed types will be used by the compiler.
	*/
	# define OSSL_UNION_ALIGN \
	double align; \
	ossl_uintmax_t align_int; \
	void *align_ptr

	typedef struct ex_callback_st EX_CALLBACK;
	DEFINE_STACK_OF(EX_CALLBACK)

	typedef struct mem_st MEM;
	DEFINE_LHASH_OF(MEM);

	# define OPENSSL_CONF "openssl.cnf"

	# ifndef OPENSSL_SYS_VMS
	# define X509_CERT_AREA OPENSSLDIR
	# define X509_CERT_DIR OPENSSLDIR "/certs"
	# define X509_CERT_FILE OPENSSLDIR "/cert.pem"
	# define X509_PRIVATE_DIR OPENSSLDIR "/private"
	# define CTLOG_FILE OPENSSLDIR "/ct_log_list.cnf"
	# else
	# define X509_CERT_AREA "OSSL$DATAROOT:[000000]"
	# define X509_CERT_DIR "OSSL$DATAROOT:[CERTS]"
	# define X509_CERT_FILE "OSSL$DATAROOT:[000000]cert.pem"
	# define X509_PRIVATE_DIR "OSSL$DATAROOT:[PRIVATE]"
	# define CTLOG_FILE "OSSL$DATAROOT:[000000]ct_log_list.cnf"
	# endif

	# define X509_CERT_DIR_EVP "SSL_CERT_DIR"
	# define X509_CERT_FILE_EVP "SSL_CERT_FILE"
	# define CTLOG_FILE_EVP "CTLOG_FILE"

	/* size of string representations */
	# define DECIMAL_SIZE(type) ((sizeof(type)*8+2)/3+1)
	# define HEX_SIZE(type) (sizeof(type)*2)

	void OPENSSL_cpuid_setup(void);
	#if defined(__i386) \|\| defined(__i386__) \|\| defined(_M_IX86) \|\| \
	defined(__x86_64) \|\| defined(__x86_64__) \|\| \
	defined(_M_AMD64) \|\| defined(_M_X64)
	extern unsigned int OPENSSL_ia32cap_P[];
	#endif
	void OPENSSL_showfatal(const char *fmta, ...);
	int do_ex_data_init(OPENSSL_CTX *ctx);
	void crypto_cleanup_all_ex_data_int(OPENSSL_CTX *ctx);
	int openssl_init_fork_handlers(void);
	int openssl_get_fork_id(void);

	char ossl_safe_getenv(const char name);

	extern CRYPTO_RWLOCK *memdbg_lock;
	int openssl_strerror_r(int errnum, char *buf, size_t buflen);
	# if !defined(OPENSSL_NO_STDIO)
	FILE openssl_fopen(const char filename, const char *mode);
	# else
	void openssl_fopen(const char filename, const char *mode);
	# endif

	uint32_t OPENSSL_rdtsc(void);
	size_t OPENSSL_instrument_bus(unsigned int *, size_t);
	size_t OPENSSL_instrument_bus2(unsigned int *, size_t, size_t);

	/* ex_data structures */

	/*
	* Each structure type (sometimes called a class), that supports
	* exdata has a stack of callbacks for each instance.
	*/
	struct ex_callback_st {
	long argl; /* Arbitrary long */
	void argp; / Arbitrary void * */
	CRYPTO_EX_new *new_func;
	CRYPTO_EX_free *free_func;
	CRYPTO_EX_dup *dup_func;
	};

	/*
	* The state for each class. This could just be a typedef, but
	* a structure allows future changes.
	*/
	typedef struct ex_callbacks_st {
	STACK_OF(EX_CALLBACK) *meth;
	} EX_CALLBACKS;

	typedef struct ossl_ex_data_global_st {
	CRYPTO_RWLOCK *ex_data_lock;
	EX_CALLBACKS ex_data[CRYPTO_EX_INDEX__COUNT];
	} OSSL_EX_DATA_GLOBAL;


	/* OPENSSL_CTX */

	# define OPENSSL_CTX_PROVIDER_STORE_RUN_ONCE_INDEX 0
	# define OPENSSL_CTX_DEFAULT_METHOD_STORE_RUN_ONCE_INDEX 1
	# define OPENSSL_CTX_METHOD_STORE_RUN_ONCE_INDEX 2
	# define OPENSSL_CTX_MAX_RUN_ONCE 3

	# define OPENSSL_CTX_EVP_METHOD_STORE_INDEX 0
	# define OPENSSL_CTX_PROVIDER_STORE_INDEX 1
	# define OPENSSL_CTX_PROPERTY_DEFN_INDEX 2
	# define OPENSSL_CTX_PROPERTY_STRING_INDEX 3
	# define OPENSSL_CTX_NAMEMAP_INDEX 4
	# define OPENSSL_CTX_DRBG_INDEX 5
	# define OPENSSL_CTX_DRBG_NONCE_INDEX 6
	# define OPENSSL_CTX_RAND_CRNGT_INDEX 7
	# define OPENSSL_CTX_THREAD_EVENT_HANDLER_INDEX 8
	# define OPENSSL_CTX_FIPS_PROV_INDEX 9
	# define OPENSSL_CTX_ENCODER_STORE_INDEX 10
	# define OPENSSL_CTX_DECODER_STORE_INDEX 11
	# define OPENSSL_CTX_SELF_TEST_CB_INDEX 12
	# define OPENSSL_CTX_BIO_PROV_INDEX 13
	# define OPENSSL_CTX_GLOBAL_PROPERTIES 14
	# define OPENSSL_CTX_STORE_LOADER_STORE_INDEX 15
	# define OPENSSL_CTX_MAX_INDEXES 16

	typedef struct openssl_ctx_method {
	void (new_func)(OPENSSL_CTX *ctx);
	void (free_func)(void );
	} OPENSSL_CTX_METHOD;

	OPENSSL_CTX openssl_ctx_get_concrete(OPENSSL_CTX ctx);
	int openssl_ctx_is_default(OPENSSL_CTX *ctx);
	int openssl_ctx_is_global_default(OPENSSL_CTX *ctx);

	/* Functions to retrieve pointers to data by index */
	void openssl_ctx_get_data(OPENSSL_CTX , int /* index */,
	const OPENSSL_CTX_METHOD * ctx);

	void openssl_ctx_default_deinit(void);
	OSSL_EX_DATA_GLOBAL openssl_ctx_get_ex_data_global(OPENSSL_CTX ctx);
	typedef int (openssl_ctx_run_once_fn)(OPENSSL_CTX *ctx);
	typedef void (openssl_ctx_onfree_fn)(OPENSSL_CTX *ctx);

	int openssl_ctx_run_once(OPENSSL_CTX *ctx, unsigned int idx,
	openssl_ctx_run_once_fn run_once_fn);
	int openssl_ctx_onfree(OPENSSL_CTX *ctx, openssl_ctx_onfree_fn onfreefn);

	OPENSSL_CTX crypto_ex_data_get_openssl_ctx(const CRYPTO_EX_DATA ad);
	int crypto_new_ex_data_ex(OPENSSL_CTX ctx, int class_index, void obj,
	CRYPTO_EX_DATA *ad);
	int crypto_get_ex_new_index_ex(OPENSSL_CTX *ctx, int class_index,
	long argl, void *argp,
	CRYPTO_EX_new *new_func,
	CRYPTO_EX_dup *dup_func,
	CRYPTO_EX_free *free_func);
	int crypto_free_ex_index_ex(OPENSSL_CTX *ctx, int class_index, int idx);

	/* Function for simple binary search */

	/* Flags */
	# define OSSL_BSEARCH_VALUE_ON_NOMATCH 0x01
	# define OSSL_BSEARCH_FIRST_VALUE_ON_MATCH 0x02

	const void ossl_bsearch(const void key, const void *base, int num,
	int size, int (cmp) (const void , const void *),
	int flags);

	/* system-specific variants defining ossl_sleep() */
	#ifdef OPENSSL_SYS_UNIX
	# include <unistd.h>
	static ossl_inline void ossl_sleep(unsigned long millis)
	{
	# ifdef OPENSSL_SYS_VXWORKS
	struct timespec ts;
	ts.tv_sec = (long int) (millis / 1000);
	ts.tv_nsec = (long int) (millis % 1000) * 1000000ul;
	nanosleep(&ts, NULL);
	# elif defined(__TANDEM) && !defined(_REENTRANT)
	# include <cextdecs.h(PROCESS_DELAY_)>
	/* HPNS does not support usleep for non threaded apps */
	PROCESS_DELAY_(millis * 1000);
	# else
	usleep(millis * 1000);
	# endif
	}
	#elif defined(_WIN32)
	# include <windows.h>
	static ossl_inline void ossl_sleep(unsigned long millis)
	{
	Sleep(millis);
	}
	#else
	/* Fallback to a busy wait */
	static ossl_inline void ossl_sleep(unsigned long millis)
	{
	struct timeval start, now;
	unsigned long elapsedms;

	gettimeofday(&start, NULL);
	do {
	gettimeofday(&now, NULL);
	elapsedms = (((now.tv_sec - start.tv_sec) * 1000000)
	+ now.tv_usec - start.tv_usec) / 1000;
	} while (elapsedms < millis);
	}
	#endif /* defined OPENSSL_SYS_UNIX */

	char sk_ASN1_UTF8STRING2text(STACK_OF(ASN1_UTF8STRING) text, const char *sep,
	size_t max_len);
	char ipaddr_to_asc(unsigned char p, int len);

	char openssl_buf2hexstr_sep(const unsigned char buf, long buflen, char sep);
	unsigned char openssl_hexstr2buf_sep(const char str, long *buflen,
	const char sep);

	#endif