123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156 |
- /*
- * Copyright 2023 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
- */
- #define OSSL_FORCE_ERR_STATE
- #include <openssl/err.h>
- #include "err_local.h"
- /*
- * Save and restore error state.
- * We are using CRYPTO_zalloc(.., NULL, 0) instead of OPENSSL_malloc() in
- * these functions to prevent mem alloc error loop.
- */
- ERR_STATE *OSSL_ERR_STATE_new(void)
- {
- return CRYPTO_zalloc(sizeof(ERR_STATE), NULL, 0);
- }
- void OSSL_ERR_STATE_save(ERR_STATE *es)
- {
- size_t i;
- ERR_STATE *thread_es;
- if (es == NULL)
- return;
- for (i = 0; i < ERR_NUM_ERRORS; i++)
- err_clear(es, i, 1);
- thread_es = ossl_err_get_state_int();
- if (thread_es == NULL)
- return;
- memcpy(es, thread_es, sizeof(*es));
- /* Taking over the pointers, just clear the thread state. */
- memset(thread_es, 0, sizeof(*thread_es));
- }
- void OSSL_ERR_STATE_save_to_mark(ERR_STATE *es)
- {
- size_t i, j, count;
- int top;
- ERR_STATE *thread_es;
- if (es == NULL)
- return;
- thread_es = ossl_err_get_state_int();
- if (thread_es == NULL) {
- for (i = 0; i < ERR_NUM_ERRORS; ++i)
- err_clear(es, i, 1);
- es->top = es->bottom = 0;
- return;
- }
- /* Determine number of errors we are going to move. */
- for (count = 0, top = thread_es->top;
- thread_es->bottom != top
- && thread_es->err_marks[top] == 0;
- ++count)
- top = top > 0 ? top - 1 : ERR_NUM_ERRORS - 1;
- /* Move the errors, preserving order. */
- for (i = 0, j = top; i < count; ++i) {
- j = (j + 1) % ERR_NUM_ERRORS;
- err_clear(es, i, 1);
- /* Move the error entry to the given ERR_STATE. */
- es->err_flags[i] = thread_es->err_flags[j];
- es->err_marks[i] = 0;
- es->err_buffer[i] = thread_es->err_buffer[j];
- es->err_data[i] = thread_es->err_data[j];
- es->err_data_size[i] = thread_es->err_data_size[j];
- es->err_data_flags[i] = thread_es->err_data_flags[j];
- es->err_file[i] = thread_es->err_file[j];
- es->err_line[i] = thread_es->err_line[j];
- es->err_func[i] = thread_es->err_func[j];
- thread_es->err_flags[j] = 0;
- thread_es->err_buffer[j] = 0;
- thread_es->err_data[j] = NULL;
- thread_es->err_data_size[j] = 0;
- thread_es->err_data_flags[j] = 0;
- thread_es->err_file[j] = NULL;
- thread_es->err_line[j] = 0;
- thread_es->err_func[j] = NULL;
- }
- if (i > 0) {
- thread_es->top = top;
- /* If we moved anything, es's stack always starts at [0]. */
- es->top = i - 1;
- es->bottom = ERR_NUM_ERRORS - 1;
- } else {
- /* Didn't move anything - empty stack */
- es->top = es->bottom = 0;
- }
- /* Erase extra space as a precaution. */
- for (; i < ERR_NUM_ERRORS; ++i)
- err_clear(es, i, 1);
- }
- void OSSL_ERR_STATE_restore(const ERR_STATE *es)
- {
- size_t i;
- ERR_STATE *thread_es;
- if (es == NULL || es->bottom == es->top)
- return;
- thread_es = ossl_err_get_state_int();
- if (thread_es == NULL)
- return;
- for (i = (size_t)es->bottom; i != (size_t)es->top;) {
- size_t top;
- i = (i + 1) % ERR_NUM_ERRORS;
- if ((es->err_flags[i] & ERR_FLAG_CLEAR) != 0)
- continue;
- err_get_slot(thread_es);
- top = thread_es->top;
- err_clear(thread_es, top, 0);
- thread_es->err_flags[top] = es->err_flags[i];
- thread_es->err_buffer[top] = es->err_buffer[i];
- err_set_debug(thread_es, top, es->err_file[i], es->err_line[i],
- es->err_func[i]);
- if (es->err_data[i] != NULL && es->err_data_size[i] != 0) {
- void *data;
- size_t data_sz = es->err_data_size[i];
- data = CRYPTO_malloc(data_sz, NULL, 0);
- if (data != NULL) {
- memcpy(data, es->err_data[i], data_sz);
- err_set_data(thread_es, top, data, data_sz,
- es->err_data_flags[i] | ERR_TXT_MALLOCED);
- }
- } else {
- err_clear_data(thread_es, top, 0);
- }
- }
- }
|