83a82981dc
A previous change in BoringSSL renamed ERR_print_errors_fp to BIO_print_errors_fp as part of refactoring the code to improve the layering of modules within BoringSSL. Rename it back for better compatibility with code that was using the function under the original name. Move its definition back to crypto/err using an implementation that avoids depending on crypto/bio. Change-Id: Iee7703bb1eb4a3d640aff6485712bea71d7c1052 Reviewed-on: https://boringssl-review.googlesource.com/4310 Reviewed-by: Adam Langley <agl@google.com>
793 lines
24 KiB
C
793 lines
24 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 <stdarg.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#if defined(OPENSSL_WINDOWS)
|
|
#pragma warning(push, 3)
|
|
#include <windows.h>
|
|
#pragma warning(pop)
|
|
#endif
|
|
|
|
#include <openssl/lhash.h>
|
|
#include <openssl/mem.h>
|
|
#include <openssl/thread.h>
|
|
|
|
#include "../internal.h"
|
|
|
|
|
|
extern const uint32_t kOpenSSLFunctionValues[];
|
|
extern const size_t kOpenSSLFunctionValuesLen;
|
|
extern const char kOpenSSLFunctionStringData[];
|
|
|
|
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->data != NULL && (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;
|
|
|
|
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]);
|
|
}
|
|
if (state->to_free) {
|
|
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) {
|
|
if (state->to_free) {
|
|
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, 0, NULL, NULL, NULL, NULL);
|
|
}
|
|
|
|
uint32_t ERR_get_error_line(const char **file, int *line) {
|
|
return get_error_values(1, 0, 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, 0, file, line, data, flags);
|
|
}
|
|
|
|
uint32_t ERR_peek_error(void) {
|
|
return get_error_values(0, 0, NULL, NULL, NULL, NULL);
|
|
}
|
|
|
|
uint32_t ERR_peek_error_line(const char **file, int *line) {
|
|
return get_error_values(0, 0, 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, 0, file, line, data, flags);
|
|
}
|
|
|
|
uint32_t ERR_peek_last_error(void) {
|
|
return get_error_values(0, 1, NULL, NULL, NULL, NULL);
|
|
}
|
|
|
|
uint32_t ERR_peek_last_error_line(const char **file, int *line) {
|
|
return get_error_values(0, 1, 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, 1, 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]);
|
|
}
|
|
if (state->to_free) {
|
|
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_w_lock(CRYPTO_LOCK_ERR);
|
|
ret = global_next_library++;
|
|
CRYPTO_w_unlock(CRYPTO_LOCK_ERR);
|
|
|
|
return ret;
|
|
}
|
|
|
|
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], func_buf[64], reason_buf[64];
|
|
const char *lib_str, *func_str, *reason_str;
|
|
unsigned lib, func, reason;
|
|
|
|
if (len == 0) {
|
|
return;
|
|
}
|
|
|
|
lib = ERR_GET_LIB(packed_error);
|
|
func = ERR_GET_FUNC(packed_error);
|
|
reason = ERR_GET_REASON(packed_error);
|
|
|
|
lib_str = ERR_lib_error_string(packed_error);
|
|
func_str = ERR_func_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 (func_str == NULL) {
|
|
BIO_snprintf(func_buf, sizeof(func_buf), "func(%u)", func);
|
|
func_str = func_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:%s:%s",
|
|
packed_error, lib_str, func_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 either a function or 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 */
|
|
"User defined functions", /* ERR_LIB_USER */
|
|
"HKDF functions", /* ERR_LIB_HKDF */
|
|
};
|
|
|
|
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) {
|
|
const uint32_t lib = ERR_GET_LIB(packed_error);
|
|
const uint32_t func = ERR_GET_FUNC(packed_error);
|
|
|
|
if (lib == ERR_LIB_SYS) {
|
|
switch (func) {
|
|
case SYS_F_fopen:
|
|
return "fopen";
|
|
case SYS_F_fclose:
|
|
return "fclose";
|
|
case SYS_F_fread:
|
|
return "fread";
|
|
case SYS_F_fwrite:
|
|
return "fwrite";
|
|
case SYS_F_socket:
|
|
return "socket";
|
|
case SYS_F_setsockopt:
|
|
return "setsockopt";
|
|
case SYS_F_connect:
|
|
return "connect";
|
|
case SYS_F_getaddrinfo:
|
|
return "getaddrinfo";
|
|
default:
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
return err_string_lookup(ERR_GET_LIB(packed_error),
|
|
ERR_GET_FUNC(packed_error), kOpenSSLFunctionValues,
|
|
kOpenSSLFunctionValuesLen,
|
|
kOpenSSLFunctionStringData);
|
|
}
|
|
|
|
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 func, 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(WIN32)
|
|
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, func, 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) {}
|