2 * Copyright (c) 1983, 1988, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 4. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 #if defined(LIBC_SCCS) && !defined(lint)
31 static char sccsid
[] = "@(#)syslog.c 8.4 (Berkeley) 3/18/94";
32 #endif /* LIBC_SCCS and not lint */
34 #include <sys/types.h>
35 #include <sys/socket.h>
36 #include <sys/syslog.h>
45 #include <stdio_ext.h>
50 #include <libc-lock.h>
56 #include <libio/libioP.h>
57 #include <math_ldbl_opt.h>
59 #include <kernel-features.h>
61 #define ftell(s) _IO_ftell (s)
63 static int LogType
= SOCK_DGRAM
; /* type of socket connection */
64 static int LogFile
= -1; /* fd for log */
65 static int connected
; /* have done connect */
66 static int LogStat
; /* status bits, set by openlog() */
67 static const char *LogTag
; /* string to tag the entry with */
68 static int LogFacility
= LOG_USER
; /* default facility code */
69 static int LogMask
= 0xff; /* mask of priorities to be logged */
70 extern char *__progname
; /* Program name, from crt0. */
72 /* Define the lock. */
73 __libc_lock_define_initialized (static, syslog_lock
)
75 static void openlog_internal(const char *, int, int);
76 static void closelog_internal(void);
78 static void sigpipe_handler (int);
88 struct sigaction
*oldaction
;
92 cancel_handler (void *ptr
)
94 /* Restore the old signal handler. */
95 struct cleanup_arg
*clarg
= (struct cleanup_arg
*) ptr
;
100 if (clarg
->oldaction
!= NULL
)
101 __sigaction (SIGPIPE
, clarg
->oldaction
, NULL
);
104 /* Free the memstream buffer, */
109 __libc_lock_unlock (syslog_lock
);
115 * print message on log file; output is intended for syslogd(8).
118 __syslog(int pri
, const char *fmt
, ...)
123 __vsyslog_internal(pri
, fmt
, ap
, 0);
126 ldbl_hidden_def (__syslog
, syslog
)
127 ldbl_strong_alias (__syslog
, syslog
)
130 __vsyslog(int pri
, const char *fmt
, va_list ap
)
132 __vsyslog_internal(pri
, fmt
, ap
, 0);
134 ldbl_weak_alias (__vsyslog
, vsyslog
)
137 __syslog_chk(int pri
, int flag
, const char *fmt
, ...)
142 __vsyslog_internal(pri
, fmt
, ap
, (flag
> 0) ? PRINTF_FORTIFY
: 0);
147 __vsyslog_chk(int pri
, int flag
, const char *fmt
, va_list ap
)
149 __vsyslog_internal(pri
, fmt
, ap
, (flag
> 0) ? PRINTF_FORTIFY
: 0);
153 __vsyslog_internal(int pri
, const char *fmt
, va_list ap
,
154 unsigned int mode_flags
)
164 struct sigaction action
, oldaction
;
167 int saved_errno
= errno
;
168 char failbuf
[3 * sizeof (pid_t
) + sizeof "out of memory []"];
170 #define INTERNALLOG LOG_ERR|LOG_CONS|LOG_PERROR|LOG_PID
171 /* Check for invalid bits. */
172 if (pri
& ~(LOG_PRIMASK
|LOG_FACMASK
)) {
174 "syslog: unknown facility/priority: %x", pri
);
175 pri
&= LOG_PRIMASK
|LOG_FACMASK
;
178 /* Prepare for multiple users. We have to take care: most
179 syscalls we are using are cancellation points. */
180 struct cleanup_arg clarg
;
182 clarg
.oldaction
= NULL
;
183 __libc_cleanup_push (cancel_handler
, &clarg
);
184 __libc_lock_lock (syslog_lock
);
186 /* Check priority against setlogmask values. */
187 if ((LOG_MASK (LOG_PRI (pri
)) & LogMask
) == 0)
190 /* Set default facility if none specified. */
191 if ((pri
& LOG_FACMASK
) == 0)
194 /* Build the message in a memory-buffer stream. */
195 f
= __open_memstream (&buf
, &bufsize
);
198 /* We cannot get a stream. There is not much we can do but
199 emitting an error messages. */
200 char numbuf
[3 * sizeof (pid_t
)];
202 char *endp
= __stpcpy (failbuf
, "out of memory [");
203 pid_t pid
= __getpid ();
205 nump
= numbuf
+ sizeof (numbuf
);
206 /* The PID can never be zero. */
208 *--nump
= '0' + pid
% 10;
209 while ((pid
/= 10) != 0);
211 endp
= __mempcpy (endp
, nump
, (numbuf
+ sizeof (numbuf
)) - nump
);
215 bufsize
= endp
- failbuf
;
220 __fsetlocking (f
, FSETLOCKING_BYCALLER
);
221 fprintf (f
, "<%d>", pri
);
223 f
->_IO_write_ptr
+= __strftime_l (f
->_IO_write_ptr
,
227 __localtime_r (&now
, &now_tm
),
233 __fputs_unlocked (LogTag
, f
);
234 if (LogStat
& LOG_PID
)
235 fprintf (f
, "[%d]", (int) __getpid ());
238 __putc_unlocked (':', f
);
239 __putc_unlocked (' ', f
);
242 /* Restore errno for %m format. */
243 __set_errno (saved_errno
);
245 /* We have the header. Print the user's format into the
247 __vfprintf_internal (f
, fmt
, ap
, mode_flags
);
249 /* Close the memory stream; this will finalize the data
250 into a malloc'd buffer in BUF. */
253 /* Tell the cancellation handler to free this buffer. */
257 /* Output to stderr if requested. */
258 if (LogStat
& LOG_PERROR
) {
260 struct iovec
*v
= iov
;
262 v
->iov_base
= buf
+ msgoff
;
263 v
->iov_len
= bufsize
- msgoff
;
264 /* Append a newline if necessary. */
265 if (buf
[bufsize
- 1] != '\n')
268 v
->iov_base
= (char *) "\n";
272 /* writev is a cancellation point. */
273 (void)__writev(STDERR_FILENO
, iov
, v
- iov
+ 1);
277 /* Prepare for a broken connection. */
278 memset (&action
, 0, sizeof (action
));
279 action
.sa_handler
= sigpipe_handler
;
280 sigemptyset (&action
.sa_mask
);
281 sigpipe
= __sigaction (SIGPIPE
, &action
, &oldaction
);
283 clarg
.oldaction
= &oldaction
;
286 /* Get connected, output the message to the local logger. */
288 openlog_internal(LogTag
, LogStat
| LOG_NDELAY
, 0);
290 /* If we have a SOCK_STREAM connection, also send ASCII NUL as
291 a record terminator. */
292 if (LogType
== SOCK_STREAM
)
295 if (!connected
|| __send(LogFile
, buf
, bufsize
, send_flags
) < 0)
299 /* Try to reopen the syslog connection. Maybe it went
301 closelog_internal ();
302 openlog_internal(LogTag
, LogStat
| LOG_NDELAY
, 0);
305 if (!connected
|| __send(LogFile
, buf
, bufsize
, send_flags
) < 0)
307 closelog_internal (); /* attempt re-open next time */
309 * Output the message to the console; don't worry
310 * about blocking, if console blocks everything will.
311 * Make sure the error reported is the one from the
314 if (LogStat
& LOG_CONS
&&
315 (fd
= __open(_PATH_CONSOLE
, O_WRONLY
|O_NOCTTY
, 0)) >= 0)
317 __dprintf (fd
, "%s\r\n", buf
+ msgoff
);
325 __sigaction (SIGPIPE
, &oldaction
, (struct sigaction
*) NULL
);
329 /* End of critical section. */
330 __libc_cleanup_pop (0);
331 __libc_lock_unlock (syslog_lock
);
337 static struct sockaddr_un SyslogAddr
; /* AF_UNIX address of local logger */
341 openlog_internal(const char *ident
, int logstat
, int logfac
)
346 if (logfac
!= 0 && (logfac
&~ LOG_FACMASK
) == 0)
347 LogFacility
= logfac
;
352 SyslogAddr
.sun_family
= AF_UNIX
;
353 (void)strncpy(SyslogAddr
.sun_path
, _PATH_LOG
,
354 sizeof(SyslogAddr
.sun_path
));
355 if (LogStat
& LOG_NDELAY
) {
356 LogFile
= __socket(AF_UNIX
, LogType
| SOCK_CLOEXEC
, 0);
361 if (LogFile
!= -1 && !connected
)
363 int old_errno
= errno
;
364 if (__connect(LogFile
, &SyslogAddr
, sizeof(SyslogAddr
))
367 int saved_errno
= errno
;
371 __set_errno (old_errno
);
372 if (saved_errno
== EPROTOTYPE
)
374 /* retry with the other type: */
375 LogType
= (LogType
== SOCK_DGRAM
376 ? SOCK_STREAM
: SOCK_DGRAM
);
388 openlog (const char *ident
, int logstat
, int logfac
)
390 /* Protect against multiple users and cancellation. */
391 __libc_cleanup_push (cancel_handler
, NULL
);
392 __libc_lock_lock (syslog_lock
);
394 openlog_internal (ident
, logstat
, logfac
);
396 __libc_cleanup_pop (1);
401 sigpipe_handler (int signo
)
403 closelog_internal ();
408 closelog_internal (void)
421 /* Protect against multiple users and cancellation. */
422 __libc_cleanup_push (cancel_handler
, NULL
);
423 __libc_lock_lock (syslog_lock
);
425 closelog_internal ();
427 LogType
= SOCK_DGRAM
; /* this is the default */
430 __libc_cleanup_pop (1);
433 /* setlogmask -- set the log mask level */
435 setlogmask (int pmask
)
439 /* Protect against multiple users. */
440 __libc_lock_lock (syslog_lock
);
446 __libc_lock_unlock (syslog_lock
);