initial check-in, version 0.5.0
[musl] / src / misc / syslog.c
1 #include <stdarg.h>
2 #include <sys/socket.h>
3 #include <stdio.h>
4 #include <fcntl.h>
5 #include <unistd.h>
6 #include <syslog.h>
7 #include <time.h>
8 #include <signal.h>
9 #include <string.h>
10 #include "libc.h"
11
12 static int lock;
13 static const char *log_ident;
14 static int log_opt;
15 static int log_facility = LOG_USER;
16 static int log_mask = 0xff;
17 static FILE *log_f;
18
19 int setlogmask(int maskpri)
20 {
21         int old = log_mask;
22         if (maskpri) log_mask = maskpri;
23         return old;
24 }
25
26 static const struct {
27         short sun_family;
28         char sun_path[9];
29 } log_addr = {
30         AF_UNIX,
31         "/dev/log"
32 };
33
34 void closelog(void)
35 {
36         LOCK(&lock);
37         if (log_f) fclose(log_f);
38         log_f = NULL;
39         UNLOCK(&lock);
40 }
41
42 static void __openlog(const char *ident, int opt, int facility)
43 {
44         int fd;
45
46         log_ident = ident;
47         log_opt = opt;
48         log_facility = facility;
49
50         if (!(opt & LOG_NDELAY) || log_f) return;
51
52         fd = socket(AF_UNIX, SOCK_STREAM, 0);
53         fcntl(fd, F_SETFD, FD_CLOEXEC);
54         if (connect(fd, (void *)&log_addr, sizeof(short) + sizeof "/dev/log") < 0)
55                 close(fd);
56         else log_f = fdopen(fd, "wb");
57 }
58
59 void openlog(const char *ident, int opt, int facility)
60 {
61         LOCK(&lock);
62         __openlog(ident, opt, facility);
63         UNLOCK(&lock);
64 }
65
66 void syslog(int priority, const char *message, ...)
67 {
68         struct sigaction sa;
69         va_list ap;
70         char timebuf[16];
71         time_t now;
72         struct tm tm;
73         //const char *fmt, *ident, *sep;
74         //int i;
75
76         if (!(log_mask & LOG_MASK(priority&7)) || (priority&~0x3ff)) return;
77
78         LOCK(&lock);
79
80         if (!log_f) __openlog(log_ident, log_opt | LOG_NDELAY, log_facility);
81         if (!log_f) {
82                 UNLOCK(&lock);
83                 return;
84         }
85
86         memset(&sa, 0, sizeof sa);
87         sa.sa_handler = SIG_IGN;
88         if (sigaction(SIGPIPE, &sa, &sa) < 0) {
89                 // we must abandon logging or we might cause SIGPIPE
90                 UNLOCK(&lock);
91                 return;
92         }
93
94         now = time(NULL);
95         gmtime_r(&now, &tm);
96         strftime(timebuf, sizeof timebuf, "%b %e %T", &tm);
97
98         fprintf(log_f, "<%d>%s ", priority, timebuf);
99         if (log_ident) fprintf(log_f, "%s", log_ident);
100         if (log_opt & LOG_PID) fprintf(log_f, "[%d]", getpid());
101         if (log_ident) fprintf(log_f, ": ");
102
103         va_start(ap, message);
104         vfprintf(log_f, message, ap);
105         va_end(ap);
106         fputc(0, log_f);
107         fflush(log_f);
108
109         // Note: LOG_CONS is not supported because it is annoying!!
110         // syslogd will send messages to console if it deems them appropriate!
111
112         sigaction(SIGPIPE, &sa, NULL);
113
114         UNLOCK(&lock);
115 }