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