a353cdb671
There's a __pragma expression which allows this. Android builds us Windows with MinGW for some reason, so we actually do have to tolerate non-MSVC-compatible Windows compilers. (Clang for Windows is much more sensible than MinGW and intentionally mimicks MSVC.) MinGW doesn't understand MSVC's pragmas and warns a lot. #pragma warning is safe to suppress, so wrap those to shush them. This also lets us do away with a few ifdefs. Change-Id: I1f5a8bec4940d4b2d947c4c1cc9341bc15ec4972 Reviewed-on: https://boringssl-review.googlesource.com/8236 Reviewed-by: Adam Langley <agl@google.com>
757 lines
23 KiB
C
757 lines
23 KiB
C
/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
|
|
* All rights reserved.
|
|
*
|
|
* This package is an SSL implementation written
|
|
* by Eric Young (eay@cryptsoft.com).
|
|
* The implementation was written so as to conform with Netscapes SSL.
|
|
*
|
|
* This library is free for commercial and non-commercial use as long as
|
|
* the following conditions are aheared to. The following conditions
|
|
* apply to all code found in this distribution, be it the RC4, RSA,
|
|
* lhash, DES, etc., code; not just the SSL code. The SSL documentation
|
|
* included with this distribution is covered by the same copyright terms
|
|
* except that the holder is Tim Hudson (tjh@cryptsoft.com).
|
|
*
|
|
* Copyright remains Eric Young's, and as such any Copyright notices in
|
|
* the code are not to be removed.
|
|
* If this package is used in a product, Eric Young should be given attribution
|
|
* as the author of the parts of the library used.
|
|
* This can be in the form of a textual message at program startup or
|
|
* in documentation (online or textual) provided with the package.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* "This product includes cryptographic software written by
|
|
* Eric Young (eay@cryptsoft.com)"
|
|
* The word 'cryptographic' can be left out if the rouines from the library
|
|
* being used are not cryptographic related :-).
|
|
* 4. If you include any Windows specific code (or a derivative thereof) from
|
|
* the apps directory (application code) you must include an acknowledgement:
|
|
* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*
|
|
* The licence and distribution terms for any publically available version or
|
|
* derivative of this code cannot be changed. i.e. this code cannot simply be
|
|
* copied and put under another distribution licence
|
|
* [including the GNU Public Licence.]
|
|
*/
|
|
/* ====================================================================
|
|
* Copyright (c) 1998-2006 The OpenSSL Project. All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
*
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
*
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in
|
|
* the documentation and/or other materials provided with the
|
|
* distribution.
|
|
*
|
|
* 3. All advertising materials mentioning features or use of this
|
|
* software must display the following acknowledgment:
|
|
* "This product includes software developed by the OpenSSL Project
|
|
* for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
|
|
*
|
|
* 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
|
|
* endorse or promote products derived from this software without
|
|
* prior written permission. For written permission, please contact
|
|
* openssl-core@openssl.org.
|
|
*
|
|
* 5. Products derived from this software may not be called "OpenSSL"
|
|
* nor may "OpenSSL" appear in their names without prior written
|
|
* permission of the OpenSSL Project.
|
|
*
|
|
* 6. Redistributions of any form whatsoever must retain the following
|
|
* acknowledgment:
|
|
* "This product includes software developed by the OpenSSL Project
|
|
* for use in the OpenSSL Toolkit (http://www.openssl.org/)"
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
|
|
* EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
|
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
|
|
* ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
|
|
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
|
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
|
|
* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
|
|
* OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
* ====================================================================
|
|
*
|
|
* This product includes cryptographic software written by Eric Young
|
|
* (eay@cryptsoft.com). This product includes software written by Tim
|
|
* Hudson (tjh@cryptsoft.com). */
|
|
|
|
#include <openssl/err.h>
|
|
|
|
#include <assert.h>
|
|
#include <errno.h>
|
|
#include <inttypes.h>
|
|
#include <string.h>
|
|
|
|
#if defined(OPENSSL_WINDOWS)
|
|
OPENSSL_MSVC_PRAGMA(warning(push, 3))
|
|
#include <windows.h>
|
|
OPENSSL_MSVC_PRAGMA(warning(pop))
|
|
#endif
|
|
|
|
#include <openssl/mem.h>
|
|
#include <openssl/thread.h>
|
|
|
|
#include "../internal.h"
|
|
|
|
|
|
extern const uint32_t kOpenSSLReasonValues[];
|
|
extern const size_t kOpenSSLReasonValuesLen;
|
|
extern const char kOpenSSLReasonStringData[];
|
|
|
|
/* err_clear_data frees the optional |data| member of the given error. */
|
|
static void err_clear_data(struct err_error_st *error) {
|
|
if ((error->flags & ERR_FLAG_MALLOCED) != 0) {
|
|
OPENSSL_free(error->data);
|
|
}
|
|
error->data = NULL;
|
|
error->flags &= ~ERR_FLAG_MALLOCED;
|
|
}
|
|
|
|
/* err_clear clears the given queued error. */
|
|
static void err_clear(struct err_error_st *error) {
|
|
err_clear_data(error);
|
|
memset(error, 0, sizeof(struct err_error_st));
|
|
}
|
|
|
|
/* global_next_library contains the next custom library value to return. */
|
|
static int global_next_library = ERR_NUM_LIBS;
|
|
|
|
/* global_next_library_mutex protects |global_next_library| from concurrent
|
|
* updates. */
|
|
static struct CRYPTO_STATIC_MUTEX global_next_library_mutex =
|
|
CRYPTO_STATIC_MUTEX_INIT;
|
|
|
|
static void err_state_free(void *statep) {
|
|
ERR_STATE *state = statep;
|
|
|
|
if (state == NULL) {
|
|
return;
|
|
}
|
|
|
|
unsigned i;
|
|
for (i = 0; i < ERR_NUM_ERRORS; i++) {
|
|
err_clear(&state->errors[i]);
|
|
}
|
|
OPENSSL_free(state->to_free);
|
|
OPENSSL_free(state);
|
|
}
|
|
|
|
/* err_get_state gets the ERR_STATE object for the current thread. */
|
|
static ERR_STATE *err_get_state(void) {
|
|
ERR_STATE *state = CRYPTO_get_thread_local(OPENSSL_THREAD_LOCAL_ERR);
|
|
if (state == NULL) {
|
|
state = OPENSSL_malloc(sizeof(ERR_STATE));
|
|
if (state == NULL) {
|
|
return NULL;
|
|
}
|
|
memset(state, 0, sizeof(ERR_STATE));
|
|
if (!CRYPTO_set_thread_local(OPENSSL_THREAD_LOCAL_ERR, state,
|
|
err_state_free)) {
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
return state;
|
|
}
|
|
|
|
static uint32_t get_error_values(int inc, int top, const char **file, int *line,
|
|
const char **data, int *flags) {
|
|
unsigned i = 0;
|
|
ERR_STATE *state;
|
|
struct err_error_st *error;
|
|
uint32_t ret;
|
|
|
|
state = err_get_state();
|
|
if (state == NULL || state->bottom == state->top) {
|
|
return 0;
|
|
}
|
|
|
|
if (top) {
|
|
assert(!inc);
|
|
/* last error */
|
|
i = state->top;
|
|
} else {
|
|
i = (state->bottom + 1) % ERR_NUM_ERRORS;
|
|
}
|
|
|
|
error = &state->errors[i];
|
|
ret = error->packed;
|
|
|
|
if (file != NULL && line != NULL) {
|
|
if (error->file == NULL) {
|
|
*file = "NA";
|
|
*line = 0;
|
|
} else {
|
|
*file = error->file;
|
|
*line = error->line;
|
|
}
|
|
}
|
|
|
|
if (data != NULL) {
|
|
if (error->data == NULL) {
|
|
*data = "";
|
|
if (flags != NULL) {
|
|
*flags = 0;
|
|
}
|
|
} else {
|
|
*data = error->data;
|
|
if (flags != NULL) {
|
|
*flags = error->flags & ERR_FLAG_PUBLIC_MASK;
|
|
}
|
|
/* If this error is being removed, take ownership of data from
|
|
* the error. The semantics are such that the caller doesn't
|
|
* take ownership either. Instead the error system takes
|
|
* ownership and retains it until the next call that affects the
|
|
* error queue. */
|
|
if (inc) {
|
|
if (error->flags & ERR_FLAG_MALLOCED) {
|
|
OPENSSL_free(state->to_free);
|
|
state->to_free = error->data;
|
|
}
|
|
error->data = NULL;
|
|
error->flags = 0;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (inc) {
|
|
assert(!top);
|
|
err_clear(error);
|
|
state->bottom = i;
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
uint32_t ERR_get_error(void) {
|
|
return get_error_values(1 /* inc */, 0 /* bottom */, NULL, NULL, NULL, NULL);
|
|
}
|
|
|
|
uint32_t ERR_get_error_line(const char **file, int *line) {
|
|
return get_error_values(1 /* inc */, 0 /* bottom */, file, line, NULL, NULL);
|
|
}
|
|
|
|
uint32_t ERR_get_error_line_data(const char **file, int *line,
|
|
const char **data, int *flags) {
|
|
return get_error_values(1 /* inc */, 0 /* bottom */, file, line, data, flags);
|
|
}
|
|
|
|
uint32_t ERR_peek_error(void) {
|
|
return get_error_values(0 /* peek */, 0 /* bottom */, NULL, NULL, NULL, NULL);
|
|
}
|
|
|
|
uint32_t ERR_peek_error_line(const char **file, int *line) {
|
|
return get_error_values(0 /* peek */, 0 /* bottom */, file, line, NULL, NULL);
|
|
}
|
|
|
|
uint32_t ERR_peek_error_line_data(const char **file, int *line,
|
|
const char **data, int *flags) {
|
|
return get_error_values(0 /* peek */, 0 /* bottom */, file, line, data,
|
|
flags);
|
|
}
|
|
|
|
uint32_t ERR_peek_last_error(void) {
|
|
return get_error_values(0 /* peek */, 1 /* top */, NULL, NULL, NULL, NULL);
|
|
}
|
|
|
|
uint32_t ERR_peek_last_error_line(const char **file, int *line) {
|
|
return get_error_values(0 /* peek */, 1 /* top */, file, line, NULL, NULL);
|
|
}
|
|
|
|
uint32_t ERR_peek_last_error_line_data(const char **file, int *line,
|
|
const char **data, int *flags) {
|
|
return get_error_values(0 /* peek */, 1 /* top */, file, line, data, flags);
|
|
}
|
|
|
|
void ERR_clear_error(void) {
|
|
ERR_STATE *const state = err_get_state();
|
|
unsigned i;
|
|
|
|
if (state == NULL) {
|
|
return;
|
|
}
|
|
|
|
for (i = 0; i < ERR_NUM_ERRORS; i++) {
|
|
err_clear(&state->errors[i]);
|
|
}
|
|
OPENSSL_free(state->to_free);
|
|
state->to_free = NULL;
|
|
|
|
state->top = state->bottom = 0;
|
|
}
|
|
|
|
void ERR_remove_thread_state(const CRYPTO_THREADID *tid) {
|
|
if (tid != NULL) {
|
|
assert(0);
|
|
return;
|
|
}
|
|
|
|
ERR_clear_error();
|
|
}
|
|
|
|
int ERR_get_next_error_library(void) {
|
|
int ret;
|
|
|
|
CRYPTO_STATIC_MUTEX_lock_write(&global_next_library_mutex);
|
|
ret = global_next_library++;
|
|
CRYPTO_STATIC_MUTEX_unlock_write(&global_next_library_mutex);
|
|
|
|
return ret;
|
|
}
|
|
|
|
void ERR_remove_state(unsigned long pid) {
|
|
ERR_clear_error();
|
|
}
|
|
|
|
void ERR_clear_system_error(void) {
|
|
errno = 0;
|
|
}
|
|
|
|
char *ERR_error_string(uint32_t packed_error, char *ret) {
|
|
static char buf[ERR_ERROR_STRING_BUF_LEN];
|
|
|
|
if (ret == NULL) {
|
|
/* TODO(fork): remove this. */
|
|
ret = buf;
|
|
}
|
|
|
|
#if !defined(NDEBUG)
|
|
/* This is aimed to help catch callers who don't provide
|
|
* |ERR_ERROR_STRING_BUF_LEN| bytes of space. */
|
|
memset(ret, 0, ERR_ERROR_STRING_BUF_LEN);
|
|
#endif
|
|
|
|
ERR_error_string_n(packed_error, ret, ERR_ERROR_STRING_BUF_LEN);
|
|
|
|
return ret;
|
|
}
|
|
|
|
void ERR_error_string_n(uint32_t packed_error, char *buf, size_t len) {
|
|
char lib_buf[64], reason_buf[64];
|
|
const char *lib_str, *reason_str;
|
|
unsigned lib, reason;
|
|
|
|
if (len == 0) {
|
|
return;
|
|
}
|
|
|
|
lib = ERR_GET_LIB(packed_error);
|
|
reason = ERR_GET_REASON(packed_error);
|
|
|
|
lib_str = ERR_lib_error_string(packed_error);
|
|
reason_str = ERR_reason_error_string(packed_error);
|
|
|
|
if (lib_str == NULL) {
|
|
BIO_snprintf(lib_buf, sizeof(lib_buf), "lib(%u)", lib);
|
|
lib_str = lib_buf;
|
|
}
|
|
|
|
if (reason_str == NULL) {
|
|
BIO_snprintf(reason_buf, sizeof(reason_buf), "reason(%u)", reason);
|
|
reason_str = reason_buf;
|
|
}
|
|
|
|
BIO_snprintf(buf, len, "error:%08" PRIx32 ":%s:OPENSSL_internal:%s",
|
|
packed_error, lib_str, reason_str);
|
|
|
|
if (strlen(buf) == len - 1) {
|
|
/* output may be truncated; make sure we always have 5 colon-separated
|
|
* fields, i.e. 4 colons. */
|
|
static const unsigned num_colons = 4;
|
|
unsigned i;
|
|
char *s = buf;
|
|
|
|
if (len <= num_colons) {
|
|
/* In this situation it's not possible to ensure that the correct number
|
|
* of colons are included in the output. */
|
|
return;
|
|
}
|
|
|
|
for (i = 0; i < num_colons; i++) {
|
|
char *colon = strchr(s, ':');
|
|
char *last_pos = &buf[len - 1] - num_colons + i;
|
|
|
|
if (colon == NULL || colon > last_pos) {
|
|
/* set colon |i| at last possible position (buf[len-1] is the
|
|
* terminating 0). If we're setting this colon, then all whole of the
|
|
* rest of the string must be colons in order to have the correct
|
|
* number. */
|
|
memset(last_pos, ':', num_colons - i);
|
|
break;
|
|
}
|
|
|
|
s = colon + 1;
|
|
}
|
|
}
|
|
}
|
|
|
|
// err_string_cmp is a compare function for searching error values with
|
|
// |bsearch| in |err_string_lookup|.
|
|
static int err_string_cmp(const void *a, const void *b) {
|
|
const uint32_t a_key = *((const uint32_t*) a) >> 15;
|
|
const uint32_t b_key = *((const uint32_t*) b) >> 15;
|
|
|
|
if (a_key < b_key) {
|
|
return -1;
|
|
} else if (a_key > b_key) {
|
|
return 1;
|
|
} else {
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
/* err_string_lookup looks up the string associated with |lib| and |key| in
|
|
* |values| and |string_data|. It returns the string or NULL if not found. */
|
|
static const char *err_string_lookup(uint32_t lib, uint32_t key,
|
|
const uint32_t *values,
|
|
size_t num_values,
|
|
const char *string_data) {
|
|
/* |values| points to data in err_data.h, which is generated by
|
|
* err_data_generate.go. It's an array of uint32_t values. Each value has the
|
|
* following structure:
|
|
* | lib | key | offset |
|
|
* |6 bits| 11 bits | 15 bits |
|
|
*
|
|
* The |lib| value is a library identifier: one of the |ERR_LIB_*| values.
|
|
* The |key| is a reason code, depending on the context.
|
|
* The |offset| is the number of bytes from the start of |string_data| where
|
|
* the (NUL terminated) string for this value can be found.
|
|
*
|
|
* Values are sorted based on treating the |lib| and |key| part as an
|
|
* unsigned integer. */
|
|
if (lib >= (1 << 6) || key >= (1 << 11)) {
|
|
return NULL;
|
|
}
|
|
uint32_t search_key = lib << 26 | key << 15;
|
|
const uint32_t *result = bsearch(&search_key, values, num_values,
|
|
sizeof(uint32_t), err_string_cmp);
|
|
if (result == NULL) {
|
|
return NULL;
|
|
}
|
|
|
|
return &string_data[(*result) & 0x7fff];
|
|
}
|
|
|
|
static const char *const kLibraryNames[ERR_NUM_LIBS] = {
|
|
"invalid library (0)",
|
|
"unknown library", /* ERR_LIB_NONE */
|
|
"system library", /* ERR_LIB_SYS */
|
|
"bignum routines", /* ERR_LIB_BN */
|
|
"RSA routines", /* ERR_LIB_RSA */
|
|
"Diffie-Hellman routines", /* ERR_LIB_DH */
|
|
"public key routines", /* ERR_LIB_EVP */
|
|
"memory buffer routines", /* ERR_LIB_BUF */
|
|
"object identifier routines", /* ERR_LIB_OBJ */
|
|
"PEM routines", /* ERR_LIB_PEM */
|
|
"DSA routines", /* ERR_LIB_DSA */
|
|
"X.509 certificate routines", /* ERR_LIB_X509 */
|
|
"ASN.1 encoding routines", /* ERR_LIB_ASN1 */
|
|
"configuration file routines", /* ERR_LIB_CONF */
|
|
"common libcrypto routines", /* ERR_LIB_CRYPTO */
|
|
"elliptic curve routines", /* ERR_LIB_EC */
|
|
"SSL routines", /* ERR_LIB_SSL */
|
|
"BIO routines", /* ERR_LIB_BIO */
|
|
"PKCS7 routines", /* ERR_LIB_PKCS7 */
|
|
"PKCS8 routines", /* ERR_LIB_PKCS8 */
|
|
"X509 V3 routines", /* ERR_LIB_X509V3 */
|
|
"random number generator", /* ERR_LIB_RAND */
|
|
"ENGINE routines", /* ERR_LIB_ENGINE */
|
|
"OCSP routines", /* ERR_LIB_OCSP */
|
|
"UI routines", /* ERR_LIB_UI */
|
|
"COMP routines", /* ERR_LIB_COMP */
|
|
"ECDSA routines", /* ERR_LIB_ECDSA */
|
|
"ECDH routines", /* ERR_LIB_ECDH */
|
|
"HMAC routines", /* ERR_LIB_HMAC */
|
|
"Digest functions", /* ERR_LIB_DIGEST */
|
|
"Cipher functions", /* ERR_LIB_CIPHER */
|
|
"HKDF functions", /* ERR_LIB_HKDF */
|
|
"User defined functions", /* ERR_LIB_USER */
|
|
};
|
|
|
|
const char *ERR_lib_error_string(uint32_t packed_error) {
|
|
const uint32_t lib = ERR_GET_LIB(packed_error);
|
|
|
|
if (lib >= ERR_NUM_LIBS) {
|
|
return NULL;
|
|
}
|
|
return kLibraryNames[lib];
|
|
}
|
|
|
|
const char *ERR_func_error_string(uint32_t packed_error) {
|
|
return "OPENSSL_internal";
|
|
}
|
|
|
|
const char *ERR_reason_error_string(uint32_t packed_error) {
|
|
const uint32_t lib = ERR_GET_LIB(packed_error);
|
|
const uint32_t reason = ERR_GET_REASON(packed_error);
|
|
|
|
if (lib == ERR_LIB_SYS) {
|
|
if (reason < 127) {
|
|
return strerror(reason);
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
if (reason < ERR_NUM_LIBS) {
|
|
return kLibraryNames[reason];
|
|
}
|
|
|
|
if (reason < 100) {
|
|
switch (reason) {
|
|
case ERR_R_MALLOC_FAILURE:
|
|
return "malloc failure";
|
|
case ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED:
|
|
return "function should not have been called";
|
|
case ERR_R_PASSED_NULL_PARAMETER:
|
|
return "passed a null parameter";
|
|
case ERR_R_INTERNAL_ERROR:
|
|
return "internal error";
|
|
case ERR_R_OVERFLOW:
|
|
return "overflow";
|
|
default:
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
return err_string_lookup(lib, reason, kOpenSSLReasonValues,
|
|
kOpenSSLReasonValuesLen, kOpenSSLReasonStringData);
|
|
}
|
|
|
|
void ERR_print_errors_cb(ERR_print_errors_callback_t callback, void *ctx) {
|
|
char buf[ERR_ERROR_STRING_BUF_LEN];
|
|
char buf2[1024];
|
|
const char *file, *data;
|
|
int line, flags;
|
|
uint32_t packed_error;
|
|
|
|
/* thread_hash is the least-significant bits of the |ERR_STATE| pointer value
|
|
* for this thread. */
|
|
const unsigned long thread_hash = (uintptr_t) err_get_state();
|
|
|
|
for (;;) {
|
|
packed_error = ERR_get_error_line_data(&file, &line, &data, &flags);
|
|
if (packed_error == 0) {
|
|
break;
|
|
}
|
|
|
|
ERR_error_string_n(packed_error, buf, sizeof(buf));
|
|
BIO_snprintf(buf2, sizeof(buf2), "%lu:%s:%s:%d:%s\n", thread_hash, buf,
|
|
file, line, (flags & ERR_FLAG_STRING) ? data : "");
|
|
if (callback(buf2, strlen(buf2), ctx) <= 0) {
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
static int print_errors_to_file(const char* msg, size_t msg_len, void* ctx) {
|
|
assert(msg[msg_len] == '\0');
|
|
FILE* fp = ctx;
|
|
int res = fputs(msg, fp);
|
|
return res < 0 ? 0 : 1;
|
|
}
|
|
|
|
void ERR_print_errors_fp(FILE *file) {
|
|
ERR_print_errors_cb(print_errors_to_file, file);
|
|
}
|
|
|
|
/* err_set_error_data sets the data on the most recent error. The |flags|
|
|
* argument is a combination of the |ERR_FLAG_*| values. */
|
|
static void err_set_error_data(char *data, int flags) {
|
|
ERR_STATE *const state = err_get_state();
|
|
struct err_error_st *error;
|
|
|
|
if (state == NULL || state->top == state->bottom) {
|
|
if (flags & ERR_FLAG_MALLOCED) {
|
|
OPENSSL_free(data);
|
|
}
|
|
return;
|
|
}
|
|
|
|
error = &state->errors[state->top];
|
|
|
|
err_clear_data(error);
|
|
error->data = data;
|
|
error->flags = flags;
|
|
}
|
|
|
|
void ERR_put_error(int library, int unused, int reason, const char *file,
|
|
unsigned line) {
|
|
ERR_STATE *const state = err_get_state();
|
|
struct err_error_st *error;
|
|
|
|
if (state == NULL) {
|
|
return;
|
|
}
|
|
|
|
if (library == ERR_LIB_SYS && reason == 0) {
|
|
#if defined(OPENSSL_WINDOWS)
|
|
reason = GetLastError();
|
|
#else
|
|
reason = errno;
|
|
#endif
|
|
}
|
|
|
|
state->top = (state->top + 1) % ERR_NUM_ERRORS;
|
|
if (state->top == state->bottom) {
|
|
state->bottom = (state->bottom + 1) % ERR_NUM_ERRORS;
|
|
}
|
|
|
|
error = &state->errors[state->top];
|
|
err_clear(error);
|
|
error->file = file;
|
|
error->line = line;
|
|
error->packed = ERR_PACK(library, reason);
|
|
}
|
|
|
|
/* ERR_add_error_data_vdata takes a variable number of const char* pointers,
|
|
* concatenates them and sets the result as the data on the most recent
|
|
* error. */
|
|
static void err_add_error_vdata(unsigned num, va_list args) {
|
|
size_t alloced, new_len, len = 0, substr_len;
|
|
char *buf;
|
|
const char *substr;
|
|
unsigned i;
|
|
|
|
alloced = 80;
|
|
buf = OPENSSL_malloc(alloced + 1);
|
|
if (buf == NULL) {
|
|
return;
|
|
}
|
|
|
|
for (i = 0; i < num; i++) {
|
|
substr = va_arg(args, const char *);
|
|
if (substr == NULL) {
|
|
continue;
|
|
}
|
|
|
|
substr_len = strlen(substr);
|
|
new_len = len + substr_len;
|
|
if (new_len > alloced) {
|
|
char *new_buf;
|
|
|
|
if (alloced + 20 + 1 < alloced) {
|
|
/* overflow. */
|
|
OPENSSL_free(buf);
|
|
return;
|
|
}
|
|
|
|
alloced = new_len + 20;
|
|
new_buf = OPENSSL_realloc(buf, alloced + 1);
|
|
if (new_buf == NULL) {
|
|
OPENSSL_free(buf);
|
|
return;
|
|
}
|
|
buf = new_buf;
|
|
}
|
|
|
|
memcpy(buf + len, substr, substr_len);
|
|
len = new_len;
|
|
}
|
|
|
|
buf[len] = 0;
|
|
err_set_error_data(buf, ERR_FLAG_MALLOCED | ERR_FLAG_STRING);
|
|
}
|
|
|
|
void ERR_add_error_data(unsigned count, ...) {
|
|
va_list args;
|
|
va_start(args, count);
|
|
err_add_error_vdata(count, args);
|
|
va_end(args);
|
|
}
|
|
|
|
void ERR_add_error_dataf(const char *format, ...) {
|
|
va_list ap;
|
|
char *buf;
|
|
static const unsigned buf_len = 256;
|
|
|
|
/* A fixed-size buffer is used because va_copy (which would be needed in
|
|
* order to call vsnprintf twice and measure the buffer) wasn't defined until
|
|
* C99. */
|
|
buf = OPENSSL_malloc(buf_len + 1);
|
|
if (buf == NULL) {
|
|
return;
|
|
}
|
|
|
|
va_start(ap, format);
|
|
BIO_vsnprintf(buf, buf_len, format, ap);
|
|
buf[buf_len] = 0;
|
|
va_end(ap);
|
|
|
|
err_set_error_data(buf, ERR_FLAG_MALLOCED | ERR_FLAG_STRING);
|
|
}
|
|
|
|
int ERR_set_mark(void) {
|
|
ERR_STATE *const state = err_get_state();
|
|
|
|
if (state == NULL || state->bottom == state->top) {
|
|
return 0;
|
|
}
|
|
state->errors[state->top].flags |= ERR_FLAG_MARK;
|
|
return 1;
|
|
}
|
|
|
|
int ERR_pop_to_mark(void) {
|
|
ERR_STATE *const state = err_get_state();
|
|
|
|
if (state == NULL) {
|
|
return 0;
|
|
}
|
|
|
|
while (state->bottom != state->top) {
|
|
struct err_error_st *error = &state->errors[state->top];
|
|
|
|
if ((error->flags & ERR_FLAG_MARK) != 0) {
|
|
error->flags &= ~ERR_FLAG_MARK;
|
|
return 1;
|
|
}
|
|
|
|
err_clear(error);
|
|
if (state->top == 0) {
|
|
state->top = ERR_NUM_ERRORS - 1;
|
|
} else {
|
|
state->top--;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
void ERR_load_crypto_strings(void) {}
|
|
|
|
void ERR_free_strings(void) {}
|
|
|
|
void ERR_load_BIO_strings(void) {}
|
|
|
|
void ERR_load_ERR_strings(void) {}
|