1 /* $NetBSD: syslog.c,v 1.58 2017/01/12 18:16:52 christos Exp $ */
2
3 /*
4 * Copyright (c) 1983, 1988, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 #if defined(LIBC_SCCS) && !defined(lint)
34 #if 0
35 static char sccsid[] = "@(#)syslog.c 8.5 (Berkeley) 4/29/95";
36 #else
37 __RCSID("$NetBSD: syslog.c,v 1.58 2017/01/12 18:16:52 christos Exp $");
38 #endif
39 #endif /* LIBC_SCCS and not lint */
40
41 #include "namespace.h"
42 #include <sys/types.h>
43 #include <sys/param.h>
44 #include <sys/socket.h>
45 #include <sys/syslog.h>
46 #include <sys/uio.h>
47 #include <sys/un.h>
48 #include <netdb.h>
49
50 #include <errno.h>
51 #include <stdio.h>
52 #include <fcntl.h>
53 #include <paths.h>
54 #include <stdarg.h>
55 #include <stdio.h>
56 #include <stdlib.h>
57 #include <string.h>
58 #include <time.h>
59 #include <unistd.h>
60
61 #include "syslog_private.h"
62 #include "reentrant.h"
63 #include "extern.h"
64
65 #ifdef __weak_alias
66 __weak_alias(syslog,_syslog)
67 __weak_alias(vsyslog,_vsyslog)
68 __weak_alias(syslogp,_syslogp)
69 __weak_alias(vsyslogp,_vsyslogp)
70 __weak_alias(closelog,_closelog)
71 __weak_alias(openlog,_openlog)
72 __weak_alias(setlogmask,_setlogmask)
73 #endif
74
75 static struct syslog_data _syslog_data = SYSLOG_DATA_INIT;
76
77 #ifdef _REENTRANT
78 static mutex_t syslog_mutex = MUTEX_INITIALIZER;
79 #endif
80
81 static size_t
timefun(char * p,size_t tbuf_left)82 timefun(char *p, size_t tbuf_left)
83 {
84 struct timeval tv;
85 time_t now;
86 struct tm tmnow;
87 size_t prlen;
88 char *op = p;
89
90 if (gettimeofday(&tv, NULL) == -1)
91 return snprintf_ss(p, tbuf_left, "-");
92
93 /* strftime() implies tzset(), localtime_r() doesn't. */
94 tzset();
95 now = (time_t) tv.tv_sec;
96 localtime_r(&now, &tmnow);
97
98 prlen = strftime(p, tbuf_left, "%FT%T", &tmnow);
99 DEC();
100 prlen = snprintf(p, tbuf_left, ".%06ld", (long)tv.tv_usec);
101 DEC();
102 prlen = strftime(p, tbuf_left-1, "%z", &tmnow);
103 /* strftime gives eg. "+0200", but we need "+02:00" */
104 if (prlen == 5) {
105 p[prlen+1] = p[prlen];
106 p[prlen] = p[prlen-1];
107 p[prlen-1] = p[prlen-2];
108 p[prlen-2] = ':';
109 prlen += 1;
110 }
111 DEC();
112 return (size_t)(p - op);
113 }
114
115 static int
lock(const struct syslog_data * data)116 lock(const struct syslog_data *data)
117 {
118 int rv = data == &_syslog_data;
119 if (rv)
120 mutex_lock(&syslog_mutex);
121 return rv;
122 }
123
124 static int
unlock(const struct syslog_data * data)125 unlock(const struct syslog_data *data)
126 {
127 int rv = data == &_syslog_data;
128 if (rv)
129 mutex_unlock(&syslog_mutex);
130 return rv;
131 }
132
133 static struct syslog_fun _syslog_fun = {
134 timefun,
135 strerror_r,
136 vsnprintf,
137 lock,
138 unlock,
139 };
140
141 void
openlog(const char * ident,int logstat,int logfac)142 openlog(const char *ident, int logstat, int logfac)
143 {
144 openlog_r(ident, logstat, logfac, &_syslog_data);
145 }
146
147 void
closelog(void)148 closelog(void)
149 {
150 closelog_r(&_syslog_data);
151 }
152
153 /* setlogmask -- set the log mask level */
154 int
setlogmask(int pmask)155 setlogmask(int pmask)
156 {
157 return setlogmask_r(pmask, &_syslog_data);
158 }
159
160 void
openlog_r(const char * ident,int logstat,int logfac,struct syslog_data * data)161 openlog_r(const char *ident, int logstat, int logfac, struct syslog_data *data)
162 {
163 lock(data);
164 _openlog_unlocked_r(ident, logstat, logfac, data);
165 unlock(data);
166 }
167
168 void
closelog_r(struct syslog_data * data)169 closelog_r(struct syslog_data *data)
170 {
171 lock(data);
172 _closelog_unlocked_r(data);
173 data->log_tag = NULL;
174 unlock(data);
175 }
176
177 /*
178 * syslog, vsyslog --
179 * print message on log file; output is intended for syslogd(8).
180 */
181 void
syslog(int pri,const char * fmt,...)182 syslog(int pri, const char *fmt, ...)
183 {
184 va_list ap;
185
186 va_start(ap, fmt);
187 _vxsyslogp_r(pri, &_syslog_fun, &_syslog_data, NULL, NULL, fmt, ap);
188 va_end(ap);
189 }
190
191 void
vsyslog(int pri,const char * fmt,va_list ap)192 vsyslog(int pri, const char *fmt, va_list ap)
193 {
194 _vxsyslogp_r(pri, &_syslog_fun, &_syslog_data, NULL, NULL, fmt, ap);
195 }
196
197 /*
198 * syslogp, vsyslogp --
199 * like syslog but take additional arguments for MSGID and SD
200 */
201 void
syslogp(int pri,const char * msgid,const char * sdfmt,const char * msgfmt,...)202 syslogp(int pri, const char *msgid, const char *sdfmt, const char *msgfmt, ...)
203 {
204 va_list ap;
205
206 va_start(ap, msgfmt);
207 _vxsyslogp_r(pri, &_syslog_fun, &_syslog_data,
208 msgid, sdfmt, msgfmt, ap);
209 va_end(ap);
210 }
211
212 void
vsyslogp(int pri,const char * msgid,const char * sdfmt,const char * msgfmt,va_list ap)213 vsyslogp(int pri, const char *msgid, const char *sdfmt, const char *msgfmt,
214 va_list ap)
215 {
216 _vxsyslogp_r(pri, &_syslog_fun, &_syslog_data,
217 msgid, sdfmt, msgfmt, ap);
218 }
219
220 void
vsyslogp_r(int pri,struct syslog_data * data,const char * msgid,const char * sdfmt,const char * msgfmt,va_list ap)221 vsyslogp_r(int pri, struct syslog_data *data, const char *msgid,
222 const char *sdfmt, const char *msgfmt, va_list ap)
223 {
224 _vxsyslogp_r(pri, &_syslog_fun, data, msgid, sdfmt, msgfmt, ap);
225 }
226
227 void
syslog_r(int pri,struct syslog_data * data,const char * fmt,...)228 syslog_r(int pri, struct syslog_data *data, const char *fmt, ...)
229 {
230 va_list ap;
231
232 va_start(ap, fmt);
233 _vxsyslogp_r(pri, &_syslog_fun, data, NULL, NULL, fmt, ap);
234 va_end(ap);
235 }
236
237 void
syslogp_r(int pri,struct syslog_data * data,const char * msgid,const char * sdfmt,const char * msgfmt,...)238 syslogp_r(int pri, struct syslog_data *data, const char *msgid,
239 const char *sdfmt, const char *msgfmt, ...)
240 {
241 va_list ap;
242
243 va_start(ap, msgfmt);
244 _vxsyslogp_r(pri, &_syslog_fun, data, msgid, sdfmt, msgfmt, ap);
245 va_end(ap);
246 }
247
248 void
vsyslog_r(int pri,struct syslog_data * data,const char * fmt,va_list ap)249 vsyslog_r(int pri, struct syslog_data *data, const char *fmt, va_list ap)
250 {
251 _vxsyslogp_r(pri, &_syslog_fun, data, NULL, NULL, fmt, ap);
252 }
253