1 /*	$OpenBSD: log.c,v 1.1 2018/07/10 16:39:54 florian Exp $	*/
2 
3 /*
4  * Copyright (c) 2003, 2004 Henning Brauer <henning@openbsd.org>
5  *
6  * Permission to use, copy, modify, and distribute this software for any
7  * purpose with or without fee is hereby granted, provided that the above
8  * copyright notice and this permission notice appear in all copies.
9  *
10  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17  */
18 
19 #include <stdio.h>
20 #include <stdlib.h>
21 #include <stdarg.h>
22 #include <string.h>
23 #include <syslog.h>
24 #include <errno.h>
25 #include <time.h>
26 
27 #include "log.h"
28 
29 static int		 debug;
30 static int		 verbose;
31 static const char	*log_procname;
32 
33 void
34 log_init(int n_debug, int facility)
35 {
36 	debug = n_debug;
37 	verbose = n_debug;
38 	log_procinit(getprogname());
39 
40 	if (!debug)
41 		openlog(getprogname(), LOG_PID | LOG_NDELAY, facility);
42 
43 	tzset();
44 }
45 
46 void
47 log_procinit(const char *procname)
48 {
49 	if (procname != NULL)
50 		log_procname = procname;
51 }
52 
53 void
54 log_setverbose(int v)
55 {
56 	verbose = v;
57 }
58 
59 int
60 log_getverbose(void)
61 {
62 	return (verbose);
63 }
64 
65 void
66 logit(int pri, const char *fmt, ...)
67 {
68 	va_list	ap;
69 
70 	va_start(ap, fmt);
71 	vlog(pri, fmt, ap);
72 	va_end(ap);
73 }
74 
75 void
76 vlog(int pri, const char *fmt, va_list ap)
77 {
78 	char	*nfmt;
79 	int	 saved_errno = errno;
80 
81 	if (debug) {
82 		/* best effort in out of mem situations */
83 		if (asprintf(&nfmt, "%s\n", fmt) == -1) {
84 			vfprintf(stderr, fmt, ap);
85 			fprintf(stderr, "\n");
86 		} else {
87 			vfprintf(stderr, nfmt, ap);
88 			free(nfmt);
89 		}
90 		fflush(stderr);
91 	} else
92 		vsyslog(pri, fmt, ap);
93 
94 	errno = saved_errno;
95 }
96 
97 void
98 log_warn(const char *emsg, ...)
99 {
100 	char		*nfmt;
101 	va_list		 ap;
102 	int		 saved_errno = errno;
103 
104 	/* best effort to even work in out of memory situations */
105 	if (emsg == NULL)
106 		logit(LOG_ERR, "%s", strerror(saved_errno));
107 	else {
108 		va_start(ap, emsg);
109 
110 		if (asprintf(&nfmt, "%s: %s", emsg,
111 		    strerror(saved_errno)) == -1) {
112 			/* we tried it... */
113 			vlog(LOG_ERR, emsg, ap);
114 			logit(LOG_ERR, "%s", strerror(saved_errno));
115 		} else {
116 			vlog(LOG_ERR, nfmt, ap);
117 			free(nfmt);
118 		}
119 		va_end(ap);
120 	}
121 
122 	errno = saved_errno;
123 }
124 
125 void
126 log_warnx(const char *emsg, ...)
127 {
128 	va_list	 ap;
129 
130 	va_start(ap, emsg);
131 	vlog(LOG_ERR, emsg, ap);
132 	va_end(ap);
133 }
134 
135 void
136 log_info(const char *emsg, ...)
137 {
138 	va_list	 ap;
139 
140 	va_start(ap, emsg);
141 	vlog(LOG_INFO, emsg, ap);
142 	va_end(ap);
143 }
144 
145 void
146 log_debug(const char *emsg, ...)
147 {
148 	va_list	 ap;
149 
150 	if (verbose) {
151 		va_start(ap, emsg);
152 		vlog(LOG_DEBUG, emsg, ap);
153 		va_end(ap);
154 	}
155 }
156 
157 static void
158 vfatalc(int code, const char *emsg, va_list ap)
159 {
160 	static char	s[BUFSIZ];
161 	const char	*sep;
162 
163 	if (emsg != NULL) {
164 		(void)vsnprintf(s, sizeof(s), emsg, ap);
165 		sep = ": ";
166 	} else {
167 		s[0] = '\0';
168 		sep = "";
169 	}
170 	if (code)
171 		logit(LOG_CRIT, "fatal in %s: %s%s%s",
172 		    log_procname, s, sep, strerror(code));
173 	else
174 		logit(LOG_CRIT, "fatal in %s%s%s", log_procname, sep, s);
175 }
176 
177 void
178 fatal(const char *emsg, ...)
179 {
180 	va_list	ap;
181 
182 	va_start(ap, emsg);
183 	vfatalc(errno, emsg, ap);
184 	va_end(ap);
185 	exit(1);
186 }
187 
188 void
189 fatalx(const char *emsg, ...)
190 {
191 	va_list	ap;
192 
193 	va_start(ap, emsg);
194 	vfatalc(0, emsg, ap);
195 	va_end(ap);
196 	exit(1);
197 }