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>
48 #include <bits/libc-lock.h>
58 # include <libio/iolibio.h>
59 # define ftell(s) _IO_ftell (s)
62 static int LogType
= SOCK_DGRAM
; /* type of socket connection */
63 static int LogFile
= -1; /* fd for log */
64 static int connected
; /* have done connect */
65 static int LogStat
; /* status bits, set by openlog() */
66 static const char *LogTag
; /* string to tag the entry with */
67 static int LogFacility
= LOG_USER
; /* default facility code */
68 static int LogMask
= 0xff; /* mask of priorities to be logged */
69 extern char *__progname
; /* Program name, from crt0. */
71 /* Define the lock. */
72 __libc_lock_define_initialized (static, syslog_lock
)
74 static void openlog_internal(const char *, int, int) internal_function
;
75 static void closelog_internal(void);
76 static void sigpipe_handler (int);
77 #ifdef _LIBC_REENTRANT
78 static void cancel_handler (void *);
83 * print message on log file; output is intended for syslogd(8).
87 syslog(int pri
, const char *fmt
, ...)
89 syslog(pri
, fmt
, va_alist
)
102 vsyslog(pri
, fmt
, ap
);
107 vsyslog(pri
, fmt
, ap
)
109 register const char *fmt
;
118 size_t prioff
, msgoff
;
119 struct sigaction action
, oldaction
;
120 struct sigaction
*oldaction_ptr
= NULL
;
122 int saved_errno
= errno
;
123 char failbuf
[3 * sizeof (pid_t
) + sizeof "out of memory []"];
125 #define INTERNALLOG LOG_ERR|LOG_CONS|LOG_PERROR|LOG_PID
126 /* Check for invalid bits. */
127 if (pri
& ~(LOG_PRIMASK
|LOG_FACMASK
)) {
129 "syslog: unknown facility/priority: %x", pri
);
130 pri
&= LOG_PRIMASK
|LOG_FACMASK
;
133 /* Check priority against setlogmask values. */
134 if ((LOG_MASK (LOG_PRI (pri
)) & LogMask
) == 0)
137 /* Set default facility if none specified. */
138 if ((pri
& LOG_FACMASK
) == 0)
141 /* Build the message in a memory-buffer stream. */
142 f
= open_memstream (&buf
, &bufsize
);
145 /* We cannot get a stream. There is not much we can do but
146 emitting an error messages. */
147 char numbuf
[3 * sizeof (pid_t
)];
149 char *endp
= __stpcpy (failbuf
, "out of memory [");
150 pid_t pid
= __getpid ();
152 nump
= numbuf
+ sizeof (numbuf
);
153 /* The PID can never be zero. */
155 *--nump
= '0' + pid
% 10;
156 while ((pid
/= 10) != 0);
158 endp
= __mempcpy (endp
, nump
, (nump
+ sizeof (numbuf
)) - nump
);
162 bufsize
= endp
- failbuf
;
166 prioff
= fprintf (f
, "<%d>", pri
);
169 f
->_IO_write_ptr
+= strftime (f
->_IO_write_ptr
,
170 f
->_IO_write_end
- f
->_IO_write_ptr
,
172 __localtime_r (&now
, &now_tm
));
174 f
->__bufp
+= strftime (f
->__bufp
, f
->__put_limit
- f
->__bufp
,
175 "%h %e %T ", __localtime_r (&now
, &now_tm
));
181 fputs_unlocked (LogTag
, f
);
182 if (LogStat
& LOG_PID
)
183 fprintf (f
, "[%d]", __getpid ());
185 putc_unlocked (':', f
), putc_unlocked (' ', f
);
187 /* Restore errno for %m format. */
188 __set_errno (saved_errno
);
190 /* We have the header. Print the user's format into the
192 vfprintf (f
, fmt
, ap
);
194 /* Close the memory stream; this will finalize the data
195 into a malloc'd buffer in BUF. */
199 /* Output to stderr if requested. */
200 if (LogStat
& LOG_PERROR
) {
202 register struct iovec
*v
= iov
;
204 v
->iov_base
= buf
+ msgoff
;
205 v
->iov_len
= bufsize
- msgoff
;
206 /* Append a newline if necessary. */
207 if (buf
[bufsize
- 1] != '\n')
210 v
->iov_base
= (char *) "\n";
213 (void)__writev(STDERR_FILENO
, iov
, v
- iov
+ 1);
216 /* Prepare for multiple users. We have to take care: open and
217 write are cancellation points. */
218 __libc_cleanup_region_start ((void (*) (void *)) cancel_handler
,
220 __libc_lock_lock (syslog_lock
);
222 /* Prepare for a broken connection. */
223 memset (&action
, 0, sizeof (action
));
224 action
.sa_handler
= sigpipe_handler
;
225 sigemptyset (&action
.sa_mask
);
226 sigpipe
= __sigaction (SIGPIPE
, &action
, &oldaction
);
228 oldaction_ptr
= &oldaction
;
230 /* Get connected, output the message to the local logger. */
232 openlog_internal(LogTag
, LogStat
| LOG_NDELAY
, 0);
234 /* If we have a SOCK_STREAM connection, also send ASCII NUL as
235 a record terminator. */
236 if (LogType
== SOCK_STREAM
)
239 if (!connected
|| __send(LogFile
, buf
, bufsize
, 0) < 0)
241 closelog_internal (); /* attempt re-open next time */
243 * Output the message to the console; don't worry about blocking,
244 * if console blocks everything will. Make sure the error reported
245 * is the one from the syslogd failure.
247 if (LogStat
& LOG_CONS
&&
248 (fd
= __open(_PATH_CONSOLE
, O_WRONLY
|O_NOCTTY
, 0)) >= 0)
250 dprintf (fd
, "%s\r\n", buf
+ msgoff
);
256 __sigaction (SIGPIPE
, &oldaction
, (struct sigaction
*) NULL
);
258 /* End of critical section. */
259 __libc_cleanup_region_end (0);
260 __libc_lock_unlock (syslog_lock
);
265 static struct sockaddr SyslogAddr
; /* AF_UNIX address of local logger */
269 openlog_internal(const char *ident
, int logstat
, int logfac
)
274 if (logfac
!= 0 && (logfac
&~ LOG_FACMASK
) == 0)
275 LogFacility
= logfac
;
279 SyslogAddr
.sa_family
= AF_UNIX
;
280 (void)strncpy(SyslogAddr
.sa_data
, _PATH_LOG
,
281 sizeof(SyslogAddr
.sa_data
));
282 if (LogStat
& LOG_NDELAY
) {
283 if ((LogFile
= __socket(AF_UNIX
, LogType
, 0))
286 (void)__fcntl(LogFile
, F_SETFD
, 1);
289 if (LogFile
!= -1 && !connected
)
291 int old_errno
= errno
;
292 if (__connect(LogFile
, &SyslogAddr
, sizeof(SyslogAddr
))
295 int saved_errno
= errno
;
296 (void)__close(LogFile
);
298 if (LogType
== SOCK_DGRAM
299 && saved_errno
== EPROTOTYPE
)
301 /* retry with next SOCK_STREAM: */
302 LogType
= SOCK_STREAM
;
303 __set_errno (old_errno
);
314 openlog (const char *ident
, int logstat
, int logfac
)
316 /* Protect against multiple users. */
317 __libc_cleanup_region_start ((void (*) __P ((void *))) __libc_mutex_unlock
,
319 __libc_lock_lock (syslog_lock
);
321 openlog_internal (ident
, logstat
, logfac
);
324 __libc_cleanup_region_end (1);
328 sigpipe_handler (int signo
)
330 closelog_internal ();
347 /* Protect against multiple users. */
348 __libc_cleanup_region_start ((void (*) __P ((void *))) __libc_mutex_unlock
,
350 __libc_lock_lock (syslog_lock
);
352 closelog_internal ();
354 LogType
= SOCK_DGRAM
; /* this is the default */
357 __libc_cleanup_region_end (1);
360 #ifdef _LIBC_REENTRANT
362 cancel_handler (void *ptr
)
364 /* Restore the old signal handler. */
365 struct sigaction
*oldaction
= *((struct sigaction
**) ptr
);
367 if (oldaction
!= (struct sigaction
*) NULL
)
368 __sigaction (SIGPIPE
, oldaction
, (struct sigaction
*) NULL
);
371 __libc_lock_unlock (syslog_lock
);
375 /* setlogmask -- set the log mask level */