xref: /netbsd-src/external/bsd/ntp/dist/sntp/libevent/log.c (revision 6a493d6bc668897c91594964a732d38505b70cbb)
1 /*	$NetBSD: log.c,v 1.1.1.1 2013/12/27 23:31: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 warn_helper_(int severity, const char *errstr, const char *fmt,
63     va_list ap);
64 static void event_log(int severity, const char *msg);
65 static void event_exit(int errcode) EV_NORETURN;
66 
67 static event_fatal_cb fatal_fn = NULL;
68 
69 #ifdef EVENT_DEBUG_LOGGING_ENABLED
70 #ifdef USE_DEBUG
71 #define DEFAULT_MASK EVENT_DBG_ALL
72 #else
73 #define DEFAULT_MASK 0
74 #endif
75 
76 #ifdef USE_GLOBAL_FOR_DEBUG_LOGGING
77 ev_uint32_t event_debug_logging_mask_ = DEFAULT_MASK;
78 #else
79 static ev_uint32_t event_debug_logging_mask_ = DEFAULT_MASK;
80 ev_uint32_t
81 event_debug_get_logging_mask_(void)
82 {
83 	return event_debug_logging_mask_;
84 }
85 #endif
86 #endif /* EVENT_DEBUG_LOGGING_ENABLED */
87 
88 void
89 event_enable_debug_logging(ev_uint32_t which)
90 {
91 #ifdef EVENT_DEBUG_LOGGING_ENABLED
92 	event_debug_logging_mask_ = which;
93 #endif
94 }
95 
96 void
97 event_set_fatal_callback(event_fatal_cb cb)
98 {
99 	fatal_fn = cb;
100 }
101 
102 static void
103 event_exit(int errcode)
104 {
105 	if (fatal_fn) {
106 		fatal_fn(errcode);
107 		exit(errcode); /* should never be reached */
108 	} else if (errcode == EVENT_ERR_ABORT_)
109 		abort();
110 	else
111 		exit(errcode);
112 }
113 
114 void
115 event_err(int eval, const char *fmt, ...)
116 {
117 	va_list ap;
118 
119 	va_start(ap, fmt);
120 	warn_helper_(EVENT_LOG_ERR, strerror(errno), fmt, ap);
121 	va_end(ap);
122 	event_exit(eval);
123 }
124 
125 void
126 event_warn(const char *fmt, ...)
127 {
128 	va_list ap;
129 
130 	va_start(ap, fmt);
131 	warn_helper_(EVENT_LOG_WARN, strerror(errno), fmt, ap);
132 	va_end(ap);
133 }
134 
135 void
136 event_sock_err(int eval, evutil_socket_t sock, const char *fmt, ...)
137 {
138 	va_list ap;
139 	int err = evutil_socket_geterror(sock);
140 
141 	va_start(ap, fmt);
142 	warn_helper_(EVENT_LOG_ERR, evutil_socket_error_to_string(err), fmt, ap);
143 	va_end(ap);
144 	event_exit(eval);
145 }
146 
147 void
148 event_sock_warn(evutil_socket_t sock, const char *fmt, ...)
149 {
150 	va_list ap;
151 	int err = evutil_socket_geterror(sock);
152 
153 	va_start(ap, fmt);
154 	warn_helper_(EVENT_LOG_WARN, evutil_socket_error_to_string(err), fmt, ap);
155 	va_end(ap);
156 }
157 
158 void
159 event_errx(int eval, const char *fmt, ...)
160 {
161 	va_list ap;
162 
163 	va_start(ap, fmt);
164 	warn_helper_(EVENT_LOG_ERR, NULL, fmt, ap);
165 	va_end(ap);
166 	event_exit(eval);
167 }
168 
169 void
170 event_warnx(const char *fmt, ...)
171 {
172 	va_list ap;
173 
174 	va_start(ap, fmt);
175 	warn_helper_(EVENT_LOG_WARN, NULL, fmt, ap);
176 	va_end(ap);
177 }
178 
179 void
180 event_msgx(const char *fmt, ...)
181 {
182 	va_list ap;
183 
184 	va_start(ap, fmt);
185 	warn_helper_(EVENT_LOG_MSG, NULL, fmt, ap);
186 	va_end(ap);
187 }
188 
189 void
190 event_debugx_(const char *fmt, ...)
191 {
192 	va_list ap;
193 
194 	va_start(ap, fmt);
195 	warn_helper_(EVENT_LOG_DEBUG, NULL, fmt, ap);
196 	va_end(ap);
197 }
198 
199 static void
200 warn_helper_(int severity, const char *errstr, const char *fmt, va_list ap)
201 {
202 	char buf[1024];
203 	size_t len;
204 
205 	if (fmt != NULL)
206 		evutil_vsnprintf(buf, sizeof(buf), fmt, ap);
207 	else
208 		buf[0] = '\0';
209 
210 	if (errstr) {
211 		len = strlen(buf);
212 		if (len < sizeof(buf) - 3) {
213 			evutil_snprintf(buf + len, sizeof(buf) - len, ": %s", errstr);
214 		}
215 	}
216 
217 	event_log(severity, buf);
218 }
219 
220 static event_log_cb log_fn = NULL;
221 
222 void
223 event_set_log_callback(event_log_cb cb)
224 {
225 	log_fn = cb;
226 }
227 
228 static void
229 event_log(int severity, const char *msg)
230 {
231 	if (log_fn)
232 		log_fn(severity, msg);
233 	else {
234 		const char *severity_str;
235 		switch (severity) {
236 		case EVENT_LOG_DEBUG:
237 			severity_str = "debug";
238 			break;
239 		case EVENT_LOG_MSG:
240 			severity_str = "msg";
241 			break;
242 		case EVENT_LOG_WARN:
243 			severity_str = "warn";
244 			break;
245 		case EVENT_LOG_ERR:
246 			severity_str = "err";
247 			break;
248 		default:
249 			severity_str = "???";
250 			break;
251 		}
252 		(void)fprintf(stderr, "[%s] %s\n", severity_str, msg);
253 	}
254 }
255