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 Nick Mathewson <nickm@freehaven.net> 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 #ifdef HAVE_CONFIG_H 41 #include "config.h" 42 #endif 43 44 #ifdef WIN32 45 #define WIN32_LEAN_AND_MEAN 46 #include <windows.h> 47 #undef WIN32_LEAN_AND_MEAN 48 #include "misc.h" 49 #endif 50 #include <sys/types.h> 51 #include <sys/tree.h> 52 #ifdef HAVE_SYS_TIME_H 53 #include <sys/time.h> 54 #else 55 #include <sys/_time.h> 56 #endif 57 #include <stdio.h> 58 #include <stdlib.h> 59 #include <stdarg.h> 60 #include <string.h> 61 #include <errno.h> 62 #include "event.h" 63 64 #include "log.h" 65 66 static void _warn_helper(int severity, int log_errno, const char *fmt, 67 va_list ap); 68 static void event_log(int severity, const char *msg); 69 70 static int 71 event_vsnprintf(char *str, size_t size, const char *format, va_list args) 72 { 73 int r; 74 if (size == 0) 75 return -1; 76 #ifdef WIN32 77 r = _vsnprintf(str, size, format, args); 78 #else 79 r = vsnprintf(str, size, format, args); 80 #endif 81 str[size-1] = '\0'; 82 if (r < 0 || ((size_t)r) >= size) { 83 /* different platforms behave differently on overflow; 84 * handle both kinds. */ 85 return -1; 86 } 87 return r; 88 } 89 90 static int 91 event_snprintf(char *str, size_t size, const char *format, ...) 92 { 93 va_list ap; 94 int r; 95 va_start(ap, format); 96 r = event_vsnprintf(str, size, format, ap); 97 va_end(ap); 98 return r; 99 } 100 101 void 102 event_err(int eval, const char *fmt, ...) 103 { 104 va_list ap; 105 106 va_start(ap, fmt); 107 _warn_helper(_EVENT_LOG_ERR, errno, fmt, ap); 108 va_end(ap); 109 exit(eval); 110 } 111 112 void 113 event_warn(const char *fmt, ...) 114 { 115 va_list ap; 116 117 va_start(ap, fmt); 118 _warn_helper(_EVENT_LOG_WARN, errno, fmt, ap); 119 va_end(ap); 120 } 121 122 void 123 event_errx(int eval, const char *fmt, ...) 124 { 125 va_list ap; 126 127 va_start(ap, fmt); 128 _warn_helper(_EVENT_LOG_ERR, -1, fmt, ap); 129 va_end(ap); 130 exit(eval); 131 } 132 133 void 134 event_warnx(const char *fmt, ...) 135 { 136 va_list ap; 137 138 va_start(ap, fmt); 139 _warn_helper(_EVENT_LOG_WARN, -1, fmt, ap); 140 va_end(ap); 141 } 142 143 void 144 event_msgx(const char *fmt, ...) 145 { 146 va_list ap; 147 148 va_start(ap, fmt); 149 _warn_helper(_EVENT_LOG_MSG, -1, fmt, ap); 150 va_end(ap); 151 } 152 153 void 154 _event_debugx(const char *fmt, ...) 155 { 156 va_list ap; 157 158 va_start(ap, fmt); 159 _warn_helper(_EVENT_LOG_DEBUG, -1, fmt, ap); 160 va_end(ap); 161 } 162 163 static void 164 _warn_helper(int severity, int log_errno, const char *fmt, va_list ap) 165 { 166 char buf[1024]; 167 size_t len; 168 169 if (fmt != NULL) 170 event_vsnprintf(buf, sizeof(buf), fmt, ap); 171 else 172 buf[0] = '\0'; 173 174 if (log_errno >= 0) { 175 len = strlen(buf); 176 if (len < sizeof(buf) - 3) { 177 event_snprintf(buf + len, sizeof(buf) - len, ": %s", 178 strerror(log_errno)); 179 } 180 } 181 182 event_log(severity, buf); 183 } 184 185 static event_log_cb log_fn = NULL; 186 187 void 188 event_set_log_callback(event_log_cb cb) 189 { 190 log_fn = cb; 191 } 192 193 static void 194 event_log(int severity, const char *msg) 195 { 196 if (log_fn) 197 log_fn(severity, msg); 198 else { 199 const char *severity_str; 200 switch (severity) { 201 case _EVENT_LOG_DEBUG: 202 severity_str = "debug"; 203 break; 204 case _EVENT_LOG_MSG: 205 severity_str = "msg"; 206 break; 207 case _EVENT_LOG_WARN: 208 severity_str = "warn"; 209 break; 210 case _EVENT_LOG_ERR: 211 severity_str = "err"; 212 break; 213 default: 214 severity_str = "???"; 215 break; 216 } 217 (void)fprintf(stderr, "[%s] %s\n", severity_str, msg); 218 } 219 } 220