1 /* $OpenBSD: syslog_r.c,v 1.19 2017/08/08 14:23:23 bluhm Exp $ */
2 /*
3 * Copyright (c) 1983, 1988, 1993
4 * The Regents of the University of California. All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. Neither the name of the University nor the names of its contributors
15 * may be used to endorse or promote products derived from this software
16 * without specific prior written permission.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 * SUCH DAMAGE.
29 */
30
31 #include <sys/types.h>
32 #include <sys/uio.h>
33 #include <netdb.h>
34
35 #include <errno.h>
36 #include <fcntl.h>
37 #include <paths.h>
38 #include <stdio.h>
39 #include <stdlib.h>
40 #include <string.h>
41 #include <syslog.h>
42 #include <time.h>
43 #include <unistd.h>
44 #include <limits.h>
45 #include <stdarg.h>
46
47 /* Reentrant version of syslog, i.e. syslog_r() */
48 void
syslog_r(int pri,struct syslog_data * data,const char * fmt,...)49 syslog_r(int pri, struct syslog_data *data, const char *fmt, ...)
50 {
51 va_list ap;
52
53 va_start(ap, fmt);
54 vsyslog_r(pri, data, fmt, ap);
55 va_end(ap);
56 }
57 DEF_WEAK(syslog_r);
58
59 void
vsyslog_r(int pri,struct syslog_data * data,const char * fmt,va_list ap)60 vsyslog_r(int pri, struct syslog_data *data, const char *fmt, va_list ap)
61 {
62 __vsyslog_r(pri, data, 1, fmt, ap);
63 }
64 DEF_WEAK(vsyslog_r);
65
66 /*
67 * This is used by both syslog_r and syslog.
68 */
69 void
__vsyslog_r(int pri,struct syslog_data * data,int reentrant,const char * fmt,va_list ap)70 __vsyslog_r(int pri, struct syslog_data *data,
71 int reentrant, const char *fmt, va_list ap)
72 {
73 int cnt;
74 char ch, *p, *t;
75 int saved_errno;
76 #define TBUF_SIZE (LOG_MAXLINE+1)
77 #define FMT_SIZE (1024+1)
78 char *stdp = NULL, tbuf[TBUF_SIZE], fmt_cpy[FMT_SIZE];
79 int tbuf_left, fmt_left, prlen;
80
81 #define INTERNALLOG LOG_ERR|LOG_CONS|LOG_PERROR|LOG_PID
82 /* Check for invalid bits. */
83 if (pri & ~(LOG_PRIMASK|LOG_FACMASK)) {
84 syslog_r(INTERNALLOG, data,
85 "syslog%s: unknown facility/priority: %x",
86 reentrant ? "_r" : "", pri);
87 pri &= LOG_PRIMASK|LOG_FACMASK;
88 }
89
90 /* Check priority against setlogmask values. */
91 if (!(LOG_MASK(LOG_PRI(pri)) & data->log_mask))
92 return;
93
94 saved_errno = errno;
95
96 /* Set default facility if none specified. */
97 if ((pri & LOG_FACMASK) == 0)
98 pri |= data->log_fac;
99
100 p = tbuf;
101 tbuf_left = TBUF_SIZE;
102
103 #define DEC() \
104 do { \
105 if (prlen < 0) \
106 prlen = 0; \
107 if (prlen >= tbuf_left) \
108 prlen = tbuf_left - 1; \
109 p += prlen; \
110 tbuf_left -= prlen; \
111 } while (0)
112
113 prlen = snprintf(p, tbuf_left, "<%d>", pri);
114 DEC();
115
116 if (data->log_stat & LOG_PERROR)
117 stdp = p;
118 if (data->log_tag == NULL)
119 data->log_tag = __progname;
120 if (data->log_tag != NULL) {
121 prlen = snprintf(p, tbuf_left, "%.*s", NAME_MAX, data->log_tag);
122 DEC();
123 }
124 if (data->log_stat & LOG_PID) {
125 prlen = snprintf(p, tbuf_left, "[%ld]", (long)getpid());
126 DEC();
127 }
128 if (data->log_tag != NULL) {
129 if (tbuf_left > 1) {
130 *p++ = ':';
131 tbuf_left--;
132 }
133 if (tbuf_left > 1) {
134 *p++ = ' ';
135 tbuf_left--;
136 }
137 }
138
139 for (t = fmt_cpy, fmt_left = FMT_SIZE;
140 (ch = *fmt) != '\0' && fmt_left > 1;
141 ++fmt) {
142 if (ch == '%' && fmt[1] == 'm') {
143 char ebuf[NL_TEXTMAX];
144
145 ++fmt;
146 (void)strerror_r(saved_errno, ebuf, sizeof(ebuf));
147 prlen = snprintf(t, fmt_left, "%s", ebuf);
148 if (prlen < 0)
149 prlen = 0;
150 if (prlen >= fmt_left)
151 prlen = fmt_left - 1;
152 t += prlen;
153 fmt_left -= prlen;
154 } else if (ch == '%' && fmt[1] == '%' && fmt_left > 2) {
155 ++fmt;
156 *t++ = '%';
157 *t++ = '%';
158 fmt_left -= 2;
159 } else {
160 *t++ = ch;
161 fmt_left--;
162 }
163 }
164 *t = '\0';
165
166 prlen = vsnprintf(p, tbuf_left, fmt_cpy, ap);
167 DEC();
168 cnt = p - tbuf;
169 while (cnt > 0 && p[-1] == '\n') {
170 *(--p) = '\0';
171 --cnt;
172 }
173
174 /* Output to stderr if requested. */
175 if (data->log_stat & LOG_PERROR) {
176 struct iovec iov[2];
177
178 iov[0].iov_base = stdp;
179 iov[0].iov_len = cnt > stdp - tbuf ? cnt - (stdp - tbuf) : 0;
180 iov[1].iov_base = "\n";
181 iov[1].iov_len = 1;
182 (void)writev(STDERR_FILENO, iov, 2);
183 }
184
185 /*
186 * If the sendsyslog() fails, it means that syslogd
187 * is not running or the kernel ran out of buffers.
188 */
189 sendsyslog(tbuf, cnt, data->log_stat & LOG_CONS);
190 }
191
192 void
openlog_r(const char * ident,int logstat,int logfac,struct syslog_data * data)193 openlog_r(const char *ident, int logstat, int logfac, struct syslog_data *data)
194 {
195 if (ident != NULL)
196 data->log_tag = ident;
197 data->log_stat = logstat;
198 if (logfac != 0 && (logfac &~ LOG_FACMASK) == 0)
199 data->log_fac = logfac;
200 }
201 DEF_WEAK(openlog_r);
202
203 void
closelog_r(struct syslog_data * data)204 closelog_r(struct syslog_data *data)
205 {
206 data->log_tag = NULL;
207 }
208 DEF_WEAK(closelog_r);
209