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