syslog.c
上传用户:weiyuanprp
上传日期:2020-05-20
资源大小:1169k
文件大小:6k
- #include "port.h"
- /*
- * Copyright (c) 1983, 1988 Regents of the University of California.
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
- * may be used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- */
- #if defined(LIBC_SCCS) && !defined(lint)
- static char sccsid[] = "@(#)syslog.c 5.34 (Berkeley) 6/26/91";
- #endif /* LIBC_SCCS and not lint */
- #include <sys/types.h>
- #include <sys/socket.h>
- #include <fcntl.h>
- #include <netinet/in.h>
- #include <sys/file.h>
- #include <syslog.h>
- #include <sys/uio.h>
- #include <errno.h>
- #include <netdb.h>
- #include <string.h>
- #include <stdarg.h>
- #include <time.h>
- #include <unistd.h>
- #include <stdio.h>
- #ifndef _PATH_LOG
- #define _PATH_LOG "/dev/log"
- #endif
- #ifndef _PATH_CONSOLE
- #define _PATH_CONSOLE "/dev/console"
- #endif
- #define PORT_SYSLOG 514 /* default port */
- char* index(const char*, int);
- static int LogFile = -1; /* fd for log */
- static int connected; /* have done connect */
- static int LogStat = 0; /* status bits, set by openlog() */
- static const char *LogTag = "syslog"; /* string to tag the entry with */
- static int LogFacility = LOG_USER; /* default facility code */
- static int LogMask = 0xff; /* mask of priorities to be logged */
- /*
- * syslog, vsyslog --
- * print message on log file; output is intended for syslogd(8).
- */
- void
- syslog(int pri, const char *fmt, ...)
- {
- va_list ap;
- va_start(ap, fmt);
- vsyslog(pri, fmt, ap);
- va_end(ap);
- }
- void
- vsyslog(int pri, register const char* fmt, va_list ap)
- {
- register int cnt;
- register char *p;
- time_t now, time();
- int fd, saved_errno;
- char tbuf[2048], fmt_cpy[1024], *stdp, *ctime();
- /* check for invalid bits or no priority set */
- if (!LOG_PRI(pri) || (pri &~ (LOG_PRIMASK|LOG_FACMASK)) ||
- !(LOG_MASK(LOG_PRI(pri)) & LogMask))
- return;
- saved_errno = errno;
- /* set default facility if none specified */
- if ((pri & LOG_FACMASK) == 0)
- pri |= LogFacility;
- /* build the message */
- (void)time(&now);
- (void)snprintf(tbuf, sizeof(tbuf), "<%d>%.15s ", pri, ctime(&now) + 4);
- for (p = tbuf; *p; ++p);
- if (LogStat & LOG_PERROR)
- stdp = p;
- if (LogTag) {
- (void)strcpy(p, LogTag);
- for (; *p; ++p);
- }
- if (LogStat & LOG_PID) {
- (void)snprintf(p, tbuf + sizeof(tbuf) - p, "[%d]", getpid());
- for (; *p; ++p);
- }
- if (LogTag) {
- *p++ = ':';
- *p++ = ' ';
- }
- /* substitute error message for %m */
- {
- register char ch, *t1, *t2;
- char *strerror();
- for (t1 = fmt_cpy; ch = *fmt; ++fmt)
- if (ch == '%' && fmt[1] == 'm') {
- ++fmt;
- for (t2 = strerror(saved_errno);
- *t1 = *t2++; ++t1);
- }
- else
- *t1++ = ch;
- *t1 = ' ';
- }
- (void)vsnprintf(p, tbuf + sizeof(tbuf) - p, fmt_cpy, ap);
- cnt = strlen(tbuf);
- /* output to stderr if requested */
- if (LogStat & LOG_PERROR) {
- struct iovec iov[2];
- register struct iovec *v = iov;
- v->iov_base = stdp;
- v->iov_len = cnt - (stdp - tbuf);
- ++v;
- v->iov_base = "n";
- v->iov_len = 1;
- (void)writev(STDERR_FILENO, iov, 2);
- }
- /* get connected, output the message to the local logger */
- if (!connected)
- openlog(LogTag, LogStat | LOG_NDELAY, 0);
- if (send(LogFile, tbuf, cnt, 0) >= 0)
- return;
- /* see if should attempt the console */
- if (!(LogStat&LOG_CONS))
- return;
- /*
- * Output the message to the console; don't worry about blocking,
- * if console blocks everything will. Make sure the error reported
- * is the one from the syslogd failure.
- */
- if ((fd = open(_PATH_CONSOLE, O_WRONLY, 0)) >= 0) {
- (void)strcat(tbuf, "rn");
- cnt += 2;
- p = index(tbuf, '>') + 1;
- (void)write(fd, p, cnt - (p - tbuf));
- (void)close(fd);
- }
- }
- static struct sockaddr SyslogAddr; /* address of local logger */
- void
- openlog(const char* ident, int logstat, int logfac)
- {
- if (ident != NULL)
- LogTag = ident;
- LogStat = logstat;
- if (logfac != 0 && (logfac &~ LOG_FACMASK) == 0)
- LogFacility = logfac;
- if (LogFile == -1) {
- if (LogStat & LOG_NDELAY) {
- #ifdef AF_UNIX
- if (LogFile == -1) {
- SyslogAddr.sa_family = AF_UNIX;
- (void) strncpy(SyslogAddr.sa_data, _PATH_LOG,
- sizeof(SyslogAddr.sa_data));
- LogFile = socket(AF_UNIX, SOCK_DGRAM, 0);
- }
- #endif
- #ifdef AF_INET
- if (LogFile == -1) {
- struct servent* sp =
- getservbyname("syslog", "udp");
- struct sockaddr_in* sin =
- (struct sockaddr_in*) &SyslogAddr;
- sin->sin_family = AF_INET;
- if (sp)
- sin->sin_port = sp->s_port;
- else
- sin->sin_port = htons(PORT_SYSLOG);
- sin->sin_addr.s_addr = htonl(INADDR_ANY);
- LogFile = socket(AF_INET, SOCK_DGRAM, 0);
- }
- #endif
- if (LogFile == -1)
- return;
- (void) fcntl(LogFile, F_SETFD, 1);
- }
- }
- if (LogFile != -1 && !connected)
- if (connect(LogFile, &SyslogAddr, sizeof(SyslogAddr)) == -1) {
- (void)close(LogFile);
- LogFile = -1;
- } else
- connected = 1;
- }
- void
- closelog()
- {
- (void)close(LogFile);
- LogFile = -1;
- connected = 0;
- }
- /* setlogmask -- set the log mask level */
- int
- setlogmask(int pmask)
- {
- int omask;
- omask = LogMask;
- if (pmask != 0)
- LogMask = pmask;
- return (omask);
- }