1 | /* |
2 | * Copyright 2019 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 | /* TODO: When ERR_STATE becomes opaque, this musts be removed */ |
11 | #define OSSL_FORCE_ERR_STATE |
12 | |
13 | #include <string.h> |
14 | #include <openssl/err.h> |
15 | #include "err_local.h" |
16 | |
17 | void ERR_new(void) |
18 | { |
19 | ERR_STATE *es; |
20 | |
21 | es = err_get_state_int(); |
22 | if (es == NULL) |
23 | return; |
24 | |
25 | /* Allocate a slot */ |
26 | err_get_slot(es); |
27 | err_clear(es, es->top, 0); |
28 | } |
29 | |
30 | void ERR_set_debug(const char *file, int line, const char *func) |
31 | { |
32 | ERR_STATE *es; |
33 | |
34 | es = err_get_state_int(); |
35 | if (es == NULL) |
36 | return; |
37 | |
38 | err_set_debug(es, es->top, file, line, func); |
39 | } |
40 | |
41 | void ERR_set_error(int lib, int reason, const char *fmt, ...) |
42 | { |
43 | va_list args; |
44 | |
45 | va_start(args, fmt); |
46 | ERR_vset_error(lib, reason, fmt, args); |
47 | va_end(args); |
48 | } |
49 | |
50 | void ERR_vset_error(int lib, int reason, const char *fmt, va_list args) |
51 | { |
52 | ERR_STATE *es; |
53 | char *buf = NULL; |
54 | size_t buf_size = 0; |
55 | unsigned long flags = 0; |
56 | size_t i; |
57 | |
58 | es = err_get_state_int(); |
59 | if (es == NULL) |
60 | return; |
61 | i = es->top; |
62 | |
63 | if (fmt != NULL) { |
64 | int printed_len = 0; |
65 | char *rbuf = NULL; |
66 | |
67 | buf = es->err_data[i]; |
68 | buf_size = es->err_data_size[i]; |
69 | |
70 | /* |
71 | * To protect the string we just grabbed from tampering by other |
72 | * functions we may call, or to protect them from freeing a pointer |
73 | * that may no longer be valid at that point, we clear away the |
74 | * data pointer and the flags. We will set them again at the end |
75 | * of this function. |
76 | */ |
77 | es->err_data[i] = NULL; |
78 | es->err_data_flags[i] = 0; |
79 | |
80 | /* |
81 | * Try to maximize the space available. If that fails, we use what |
82 | * we have. |
83 | */ |
84 | if (buf_size < ERR_MAX_DATA_SIZE |
85 | && (rbuf = OPENSSL_realloc(buf, ERR_MAX_DATA_SIZE)) != NULL) { |
86 | buf = rbuf; |
87 | buf_size = ERR_MAX_DATA_SIZE; |
88 | } |
89 | |
90 | if (buf != NULL) { |
91 | printed_len = BIO_vsnprintf(buf, buf_size, fmt, args); |
92 | } |
93 | if (printed_len < 0) |
94 | printed_len = 0; |
95 | buf[printed_len] = '\0'; |
96 | |
97 | /* |
98 | * Try to reduce the size, but only if we maximized above. If that |
99 | * fails, we keep what we have. |
100 | * (According to documentation, realloc leaves the old buffer untouched |
101 | * if it fails) |
102 | */ |
103 | if ((rbuf = OPENSSL_realloc(buf, printed_len + 1)) != NULL) { |
104 | buf = rbuf; |
105 | buf_size = printed_len + 1; |
106 | } |
107 | |
108 | if (buf != NULL) |
109 | flags = ERR_TXT_MALLOCED | ERR_TXT_STRING; |
110 | } |
111 | |
112 | err_clear_data(es, es->top, 0); |
113 | err_set_error(es, es->top, lib, reason); |
114 | if (fmt != NULL) |
115 | err_set_data(es, es->top, buf, buf_size, flags); |
116 | } |
117 | |