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 #include <openssl/err.h> 11 #include <openssl/e_os2.h> 12 err_get_slot(ERR_STATE * es)13 static ossl_inline void err_get_slot(ERR_STATE *es) 14 { 15 es->top = (es->top + 1) % ERR_NUM_ERRORS; 16 if (es->top == es->bottom) 17 es->bottom = (es->bottom + 1) % ERR_NUM_ERRORS; 18 } 19 err_clear_data(ERR_STATE * es,size_t i,int deall)20 static ossl_inline void err_clear_data(ERR_STATE *es, size_t i, int deall) 21 { 22 if (es->err_data_flags[i] & ERR_TXT_MALLOCED) { 23 if (deall) { 24 OPENSSL_free(es->err_data[i]); 25 es->err_data[i] = NULL; 26 es->err_data_size[i] = 0; 27 es->err_data_flags[i] = 0; 28 } else if (es->err_data[i] != NULL) { 29 es->err_data[i][0] = '\0'; 30 es->err_data_flags[i] = ERR_TXT_MALLOCED; 31 } 32 } else { 33 es->err_data[i] = NULL; 34 es->err_data_size[i] = 0; 35 es->err_data_flags[i] = 0; 36 } 37 } 38 err_set_error(ERR_STATE * es,size_t i,int lib,int reason)39 static ossl_inline void err_set_error(ERR_STATE *es, size_t i, 40 int lib, int reason) 41 { 42 es->err_buffer[i] = 43 lib == ERR_LIB_SYS 44 ? (unsigned int)(ERR_SYSTEM_FLAG | reason) 45 : ERR_PACK(lib, 0, reason); 46 } 47 err_set_debug(ERR_STATE * es,size_t i,const char * file,int line,const char * fn)48 static ossl_inline void err_set_debug(ERR_STATE *es, size_t i, 49 const char *file, int line, 50 const char *fn) 51 { 52 /* 53 * We dup the file and fn strings because they may be provider owned. If the 54 * provider gets unloaded, they may not be valid anymore. 55 */ 56 OPENSSL_free(es->err_file[i]); 57 if (file == NULL || file[0] == '\0') 58 es->err_file[i] = NULL; 59 else 60 es->err_file[i] = OPENSSL_strdup(file); 61 es->err_line[i] = line; 62 OPENSSL_free(es->err_func[i]); 63 if (fn == NULL || fn[0] == '\0') 64 es->err_func[i] = NULL; 65 else 66 es->err_func[i] = OPENSSL_strdup(fn); 67 } 68 err_set_data(ERR_STATE * es,size_t i,void * data,size_t datasz,int flags)69 static ossl_inline void err_set_data(ERR_STATE *es, size_t i, 70 void *data, size_t datasz, int flags) 71 { 72 if ((es->err_data_flags[i] & ERR_TXT_MALLOCED) != 0) 73 OPENSSL_free(es->err_data[i]); 74 es->err_data[i] = data; 75 es->err_data_size[i] = datasz; 76 es->err_data_flags[i] = flags; 77 } 78 err_clear(ERR_STATE * es,size_t i,int deall)79 static ossl_inline void err_clear(ERR_STATE *es, size_t i, int deall) 80 { 81 err_clear_data(es, i, (deall)); 82 es->err_marks[i] = 0; 83 es->err_flags[i] = 0; 84 es->err_buffer[i] = 0; 85 es->err_line[i] = -1; 86 OPENSSL_free(es->err_file[i]); 87 es->err_file[i] = NULL; 88 OPENSSL_free(es->err_func[i]); 89 es->err_func[i] = NULL; 90 } 91 92 ERR_STATE *ossl_err_get_state_int(void); 93 void ossl_err_string_int(unsigned long e, const char *func, 94 char *buf, size_t len); 95