1 /* $NetBSD: log.c,v 1.6 2021/04/07 03:36:48 christos Exp $ */
2 /* $OpenBSD: err.c,v 1.2 2002/06/25 15:50:15 mickey Exp $ */
3
4 /*
5 * log.c
6 *
7 * Based on err.c, which was adapted from OpenBSD libc *err* *warn* code.
8 *
9 * Copyright (c) 2005-2012 Niels Provos and Nick Mathewson
10 *
11 * Copyright (c) 2000 Dug Song <dugsong@monkey.org>
12 *
13 * Copyright (c) 1993
14 * The Regents of the University of California. All rights reserved.
15 *
16 * Redistribution and use in source and binary forms, with or without
17 * modification, are permitted provided that the following conditions
18 * are met:
19 * 1. Redistributions of source code must retain the above copyright
20 * notice, this list of conditions and the following disclaimer.
21 * 2. Redistributions in binary form must reproduce the above copyright
22 * notice, this list of conditions and the following disclaimer in the
23 * documentation and/or other materials provided with the distribution.
24 * 3. Neither the name of the University nor the names of its contributors
25 * may be used to endorse or promote products derived from this software
26 * without specific prior written permission.
27 *
28 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 * SUCH DAMAGE.
39 */
40
41 #include "event2/event-config.h"
42 #include <sys/cdefs.h>
43 __RCSID("$NetBSD: log.c,v 1.6 2021/04/07 03:36:48 christos Exp $");
44 #include "evconfig-private.h"
45
46 #ifdef _WIN32
47 #include <winsock2.h>
48 #define WIN32_LEAN_AND_MEAN
49 #include <windows.h>
50 #undef WIN32_LEAN_AND_MEAN
51 #endif
52 #include <sys/types.h>
53 #include <stdio.h>
54 #include <stdlib.h>
55 #include <stdarg.h>
56 #include <string.h>
57 #include <errno.h>
58 #include "event2/event.h"
59 #include "event2/util.h"
60
61 #include "log-internal.h"
62
63 static void event_log(int severity, const char *msg);
64 static void event_exit(int errcode) EV_NORETURN;
65
66 static event_fatal_cb fatal_fn = NULL;
67
68 #ifdef EVENT_DEBUG_LOGGING_ENABLED
69 #ifdef USE_DEBUG
70 #define DEFAULT_MASK EVENT_DBG_ALL
71 #else
72 #define DEFAULT_MASK 0
73 #endif
74
75 EVENT2_EXPORT_SYMBOL ev_uint32_t event_debug_logging_mask_ = DEFAULT_MASK;
76 #endif /* EVENT_DEBUG_LOGGING_ENABLED */
77
78 void
event_enable_debug_logging(ev_uint32_t which)79 event_enable_debug_logging(ev_uint32_t which)
80 {
81 #ifdef EVENT_DEBUG_LOGGING_ENABLED
82 event_debug_logging_mask_ = which;
83 #endif
84 }
85
86 void
event_set_fatal_callback(event_fatal_cb cb)87 event_set_fatal_callback(event_fatal_cb cb)
88 {
89 fatal_fn = cb;
90 }
91
92 static void
event_exit(int errcode)93 event_exit(int errcode)
94 {
95 if (fatal_fn) {
96 fatal_fn(errcode);
97 exit(errcode); /* should never be reached */
98 } else if (errcode == EVENT_ERR_ABORT_)
99 abort();
100 else
101 exit(errcode);
102 }
103
104 void
event_err(int eval,const char * fmt,...)105 event_err(int eval, const char *fmt, ...)
106 {
107 va_list ap;
108
109 va_start(ap, fmt);
110 event_logv_(EVENT_LOG_ERR, strerror(errno), fmt, ap);
111 va_end(ap);
112 event_exit(eval);
113 }
114
115 void
event_warn(const char * fmt,...)116 event_warn(const char *fmt, ...)
117 {
118 va_list ap;
119
120 va_start(ap, fmt);
121 event_logv_(EVENT_LOG_WARN, strerror(errno), fmt, ap);
122 va_end(ap);
123 }
124
125 void
event_sock_err(int eval,evutil_socket_t sock,const char * fmt,...)126 event_sock_err(int eval, evutil_socket_t sock, const char *fmt, ...)
127 {
128 va_list ap;
129 int err = evutil_socket_geterror(sock);
130
131 va_start(ap, fmt);
132 event_logv_(EVENT_LOG_ERR, evutil_socket_error_to_string(err), fmt, ap);
133 va_end(ap);
134 event_exit(eval);
135 }
136
137 void
event_sock_warn(evutil_socket_t sock,const char * fmt,...)138 event_sock_warn(evutil_socket_t sock, const char *fmt, ...)
139 {
140 va_list ap;
141 int err = evutil_socket_geterror(sock);
142
143 va_start(ap, fmt);
144 event_logv_(EVENT_LOG_WARN, evutil_socket_error_to_string(err), fmt, ap);
145 va_end(ap);
146 }
147
148 void
event_errx(int eval,const char * fmt,...)149 event_errx(int eval, const char *fmt, ...)
150 {
151 va_list ap;
152
153 va_start(ap, fmt);
154 event_logv_(EVENT_LOG_ERR, NULL, fmt, ap);
155 va_end(ap);
156 event_exit(eval);
157 }
158
159 void
event_warnx(const char * fmt,...)160 event_warnx(const char *fmt, ...)
161 {
162 va_list ap;
163
164 va_start(ap, fmt);
165 event_logv_(EVENT_LOG_WARN, NULL, fmt, ap);
166 va_end(ap);
167 }
168
169 void
event_msgx(const char * fmt,...)170 event_msgx(const char *fmt, ...)
171 {
172 va_list ap;
173
174 va_start(ap, fmt);
175 event_logv_(EVENT_LOG_MSG, NULL, fmt, ap);
176 va_end(ap);
177 }
178
179 void
event_debugx_(const char * fmt,...)180 event_debugx_(const char *fmt, ...)
181 {
182 va_list ap;
183
184 va_start(ap, fmt);
185 event_logv_(EVENT_LOG_DEBUG, NULL, fmt, ap);
186 va_end(ap);
187 }
188
189 void
event_logv_(int severity,const char * errstr,const char * fmt,va_list ap)190 event_logv_(int severity, const char *errstr, const char *fmt, va_list ap)
191 {
192 char buf[1024];
193 size_t len;
194
195 if (severity == EVENT_LOG_DEBUG && !event_debug_get_logging_mask_())
196 return;
197
198 if (fmt != NULL)
199 evutil_vsnprintf(buf, sizeof(buf), fmt, ap);
200 else
201 buf[0] = '\0';
202
203 if (errstr) {
204 len = strlen(buf);
205 if (len < sizeof(buf) - 3) {
206 evutil_snprintf(buf + len, sizeof(buf) - len, ": %s", errstr);
207 }
208 }
209
210 event_log(severity, buf);
211 }
212
213 static event_log_cb log_fn = NULL;
214
215 void
event_set_log_callback(event_log_cb cb)216 event_set_log_callback(event_log_cb cb)
217 {
218 log_fn = cb;
219 }
220
221 static void
event_log(int severity,const char * msg)222 event_log(int severity, const char *msg)
223 {
224 if (log_fn)
225 log_fn(severity, msg);
226 else {
227 const char *severity_str;
228 switch (severity) {
229 case EVENT_LOG_DEBUG:
230 severity_str = "debug";
231 break;
232 case EVENT_LOG_MSG:
233 severity_str = "msg";
234 break;
235 case EVENT_LOG_WARN:
236 severity_str = "warn";
237 break;
238 case EVENT_LOG_ERR:
239 severity_str = "err";
240 break;
241 default:
242 severity_str = "???";
243 break;
244 }
245 (void)fprintf(stderr, "[%s] %s\n", severity_str, msg);
246 }
247 }
248