Fix a tar bug: tar removed leading '/'s for symlink targets.
[oweals/busybox.git] / syslogd.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini syslogd implementation for busybox
4  *
5  * Copyright (C) 1999,2000 by Lineo, inc.
6  * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16  * General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21  *
22  */
23
24 #include "internal.h"
25 #include <ctype.h>
26 #include <errno.h>
27 #include <fcntl.h>
28 #include <netdb.h>
29 #include <paths.h>
30 #include <signal.h>
31 #include <stdarg.h>
32 #include <stdio.h>
33 #include <sys/klog.h>
34 #include <sys/socket.h>
35 #include <sys/stat.h>
36 #include <sys/types.h>
37 #include <sys/un.h>
38 #include <time.h>
39 #include <unistd.h>
40
41 #define ksyslog klogctl
42 extern int ksyslog(int type, char *buf, int len);
43
44
45 /* SYSLOG_NAMES defined to pull some extra junk from syslog.h */
46 #define SYSLOG_NAMES
47 #include <sys/syslog.h>
48
49 /* Path for the file where all log messages are written */
50 #define __LOG_FILE "/var/log/messages"
51
52 /* Path to the unix socket */
53 char lfile[PATH_MAX] = "";
54
55 static char *logFilePath = __LOG_FILE;
56
57 /* interval between marks in seconds */
58 static int MarkInterval = 20 * 60;
59
60 /* localhost's name */
61 static char LocalHostName[32];
62
63 static const char syslogd_usage[] =
64         "syslogd [OPTION]...\n\n"
65         "Linux system and kernel (provides klogd) logging utility.\n"
66         "Note that this version of syslogd/klogd ignores /etc/syslog.conf.\n\n"
67         "Options:\n"
68         "\t-m\tChange the mark timestamp interval. default=20min. 0=off\n"
69         "\t-n\tDo not fork into the background (for when run by init)\n"
70 #ifdef BB_KLOGD
71         "\t-K\tDo not start up the klogd process (by default syslogd spawns klogd).\n"
72 #endif
73         "\t-O\tSpecify an alternate log file.  default=/var/log/messages\n";
74
75 /* Note: There is also a function called "message()" in init.c */
76 /* Print a message to the log file. */
77 static void message(char *fmt, ...)
78         __attribute__ ((format (printf, 1, 2)));
79 static void message(char *fmt, ...)
80 {
81         int fd;
82         va_list arguments;
83
84         if ( (fd = device_open(logFilePath,
85                                  O_WRONLY | O_CREAT | O_NOCTTY | O_APPEND |
86                                  O_NONBLOCK)) >= 0) {
87                 va_start(arguments, fmt);
88                 vdprintf(fd, fmt, arguments);
89                 va_end(arguments);
90                 close(fd);
91         } else {
92                 /* Always send console messages to /dev/console so people will see them. */
93                 if ( (fd = device_open(_PATH_CONSOLE,
94                                          O_WRONLY | O_NOCTTY | O_NONBLOCK)) >= 0) {
95                         va_start(arguments, fmt);
96                         vdprintf(fd, fmt, arguments);
97                         va_end(arguments);
98                         close(fd);
99                 } else {
100                         fprintf(stderr, "Bummer, can't print: ");
101                         va_start(arguments, fmt);
102                         vfprintf(stderr, fmt, arguments);
103                         fflush(stderr);
104                         va_end(arguments);
105                 }
106         }
107 }
108
109 static void logMessage(int pri, char *msg)
110 {
111         time_t now;
112         char *timestamp;
113         static char res[20] = "";
114         CODE *c_pri, *c_fac;
115
116         if (pri != 0) {
117                 for (c_fac = facilitynames;
118                          c_fac->c_name && !(c_fac->c_val == LOG_FAC(pri) << 3); c_fac++);
119                 for (c_pri = prioritynames;
120                          c_pri->c_name && !(c_pri->c_val == LOG_PRI(pri)); c_pri++);
121                 if (*c_fac->c_name == '\0' || *c_pri->c_name == '\0')
122                         snprintf(res, sizeof(res), "<%d>", pri);
123                 else
124                         snprintf(res, sizeof(res), "%s.%s", c_fac->c_name, c_pri->c_name);
125         }
126
127         if (strlen(msg) < 16 || msg[3] != ' ' || msg[6] != ' ' ||
128                 msg[9] != ':' || msg[12] != ':' || msg[15] != ' ') {
129                 time(&now);
130                 timestamp = ctime(&now) + 4;
131                 timestamp[15] = '\0';
132         } else {
133                 timestamp = msg;
134                 timestamp[15] = '\0';
135                 msg += 16;
136         }
137
138         /* todo: supress duplicates */
139
140         /* now spew out the message to wherever it is supposed to go */
141         message("%s %s %s %s\n", timestamp, LocalHostName, res, msg);
142 }
143
144 static void quit_signal(int sig)
145 {
146         logMessage(0, "System log daemon exiting.");
147         unlink(lfile);
148         exit(TRUE);
149 }
150
151 static void domark(int sig)
152 {
153         if (MarkInterval > 0) {
154                 logMessage(LOG_SYSLOG | LOG_INFO, "-- MARK --");
155                 alarm(MarkInterval);
156         }
157 }
158
159 static void doSyslogd (void) __attribute__ ((noreturn));
160 static void doSyslogd (void)
161 {
162         struct sockaddr_un sunx;
163         size_t addrLength;
164         int sock_fd;
165         fd_set readfds;
166         char lfile[PATH_MAX];
167
168         /* Set up sig handlers */
169         signal (SIGINT,  quit_signal);
170         signal (SIGTERM, quit_signal);
171         signal (SIGQUIT, quit_signal);
172         signal (SIGHUP,  SIG_IGN);
173         signal (SIGALRM, domark);
174         alarm (MarkInterval);
175
176         /* create the syslog file so realpath() can work */ 
177         close(open(_PATH_LOG, O_RDWR | O_CREAT, 0644));
178         if (realpath(_PATH_LOG, lfile) == NULL) {
179                 fatalError("Could not resolv path to " _PATH_LOG);
180         }
181
182         unlink (lfile);
183
184         memset (&sunx, 0, sizeof(sunx));
185
186         sunx.sun_family = AF_UNIX;
187         strncpy (sunx.sun_path, lfile, sizeof(sunx.sun_path));
188         if ((sock_fd = socket(AF_UNIX, SOCK_STREAM, 0)) < 0) {
189                 fatalError ("Couldn't obtain descriptor for socket " _PATH_LOG);
190         }
191
192         addrLength = sizeof (sunx.sun_family) + strlen (sunx.sun_path);
193         if ((bind (sock_fd, (struct sockaddr *) &sunx, addrLength)) ||
194                 (listen (sock_fd, 5))) {
195                 fatalError ("Could not connect to socket " _PATH_LOG);
196         }
197
198         if (chmod (lfile, 0666) < 0) {
199                 fatalError ("Could not set permission on " _PATH_LOG);
200         }
201
202         FD_ZERO (&readfds);
203         FD_SET (sock_fd, &readfds);
204
205         logMessage (0, "syslogd started: BusyBox v" BB_VER " (" BB_BT ")");
206
207         for (;;) {
208                 int n_ready;
209                 int fd;
210
211                 if ((n_ready = select (FD_SETSIZE, &readfds, NULL, NULL, NULL)) < 0) {
212                         if (errno == EINTR) continue; /* alarm may have happened. */
213                         fatalError( "select error: %s\n", strerror(errno));
214                 }
215
216                 /* Skip stdin, stdout, stderr */
217                 for (fd = 3; fd < FD_SETSIZE; fd++) {
218                         if (FD_ISSET (fd, &readfds)) {
219                                 if (fd == sock_fd) {
220                                         int conn;
221                                         if ((conn = accept(sock_fd, (struct sockaddr *) &sunx,
222                                                                            &addrLength)) < 0) {
223                                                 fatalError( "accept error: %s\n", strerror(errno));
224                                         }
225                                         FD_SET (conn, &readfds);
226                                 }
227                                 else {
228 #define                   BUFSIZE 1024 + 1
229                                         char buf[BUFSIZE];
230                                         char *q, *p;
231                                         int n_read;
232                                         char line[BUFSIZE];
233                                         unsigned char c;
234
235                                         /* Keep reading stuff till there is nothing else to read */
236                                         while( (n_read = read (fd, buf, BUFSIZE)) > 0 && errno != EOF) {
237                                                 int pri = (LOG_USER | LOG_NOTICE);
238
239                                                 memset (line, 0, sizeof(line));
240                                                 p = buf;
241                                                 q = line;
242                                                 while (p && (c = *p) && q < &line[sizeof(line) - 1]) {
243                                                         if (c == '<') {
244                                                                 /* Parse the magic priority number */
245                                                                 pri = 0;
246                                                                 while (isdigit(*(++p))) {
247                                                                         pri = 10 * pri + (*p - '0');
248                                                                 }
249                                                                 if (pri & ~(LOG_FACMASK | LOG_PRIMASK))
250                                                                         pri = (LOG_USER | LOG_NOTICE);
251                                                         } else if (c == '\n') {
252                                                                 *q++ = ' ';
253                                                         } else if (iscntrl(c) && (c < 0177)) {
254                                                                 *q++ = '^';
255                                                                 *q++ = c ^ 0100;
256                                                         } else {
257                                                                 *q++ = c;
258                                                         }
259                                                         p++;
260                                                 }
261                                                 *q = '\0';
262
263                                                 /* Now log it */
264                                                 logMessage(pri, line);
265                                         }
266                                         close (fd);
267                                         FD_CLR (fd, &readfds);
268                                 }
269                         }
270                 }
271         }
272 }
273
274 #ifdef BB_KLOGD
275
276 static void klogd_signal(int sig)
277 {
278         ksyslog(7, NULL, 0);
279         ksyslog(0, 0, 0);
280         logMessage(0, "Kernel log daemon exiting.");
281         exit(TRUE);
282 }
283
284 static void doKlogd (void) __attribute__ ((noreturn));
285 static void doKlogd (void)
286 {
287         int priority = LOG_INFO;
288         char log_buffer[4096];
289         char *logp;
290
291         /* Set up sig handlers */
292         signal(SIGINT, klogd_signal);
293         signal(SIGKILL, klogd_signal);
294         signal(SIGTERM, klogd_signal);
295         signal(SIGHUP, SIG_IGN);
296         logMessage(0, "klogd started: "
297                            "BusyBox v" BB_VER " (" BB_BT ")");
298
299         ksyslog(1, NULL, 0);
300
301         while (1) {
302                 /* Use kernel syscalls */
303                 memset(log_buffer, '\0', sizeof(log_buffer));
304                 if (ksyslog(2, log_buffer, sizeof(log_buffer)) < 0) {
305                         char message[80];
306
307                         if (errno == EINTR)
308                                 continue;
309                         snprintf(message, 79, "klogd: Error return from sys_sycall: " \
310                                          "%d - %s.\n", errno, strerror(errno));
311                         logMessage(LOG_SYSLOG | LOG_ERR, message);
312                         exit(1);
313                 }
314                 logp = log_buffer;
315                 if (*log_buffer == '<') {
316                         switch (*(log_buffer + 1)) {
317                         case '0':
318                                 priority = LOG_EMERG;
319                                 break;
320                         case '1':
321                                 priority = LOG_ALERT;
322                                 break;
323                         case '2':
324                                 priority = LOG_CRIT;
325                                 break;
326                         case '3':
327                                 priority = LOG_ERR;
328                                 break;
329                         case '4':
330                                 priority = LOG_WARNING;
331                                 break;
332                         case '5':
333                                 priority = LOG_NOTICE;
334                                 break;
335                         case '6':
336                                 priority = LOG_INFO;
337                                 break;
338                         case '7':
339                         default:
340                                 priority = LOG_DEBUG;
341                         }
342                         logp += 3;
343                 }
344                 logMessage(LOG_KERN | priority, logp);
345         }
346
347 }
348
349 #endif
350
351 static void daemon_init (char **argv, char *dz, void fn (void)) __attribute__ ((noreturn));
352 static void daemon_init (char **argv, char *dz, void fn (void))
353 {
354         setsid();
355         chdir ("/");
356         strncpy(argv[0], dz, strlen(argv[0]));
357         fn();
358         exit(0);
359 }
360
361 extern int syslogd_main(int argc, char **argv)
362 {
363         int pid, klogd_pid;
364         int doFork = TRUE;
365
366 #ifdef BB_KLOGD
367         int startKlogd = TRUE;
368 #endif
369         int stopDoingThat = FALSE;
370         char *p;
371         char **argv1 = argv;
372
373         while (--argc > 0 && **(++argv1) == '-') {
374                 stopDoingThat = FALSE;
375                 while (stopDoingThat == FALSE && *(++(*argv1))) {
376                         switch (**argv1) {
377                         case 'm':
378                                 if (--argc == 0) {
379                                         usage(syslogd_usage);
380                                 }
381                                 MarkInterval = atoi(*(++argv1)) * 60;
382                                 break;
383                         case 'n':
384                                 doFork = FALSE;
385                                 break;
386 #ifdef BB_KLOGD
387                         case 'K':
388                                 startKlogd = FALSE;
389                                 break;
390 #endif
391                         case 'O':
392                                 if (--argc == 0) {
393                                         usage(syslogd_usage);
394                                 }
395                                 logFilePath = *(++argv1);
396                                 stopDoingThat = TRUE;
397                                 break;
398                         default:
399                                 usage(syslogd_usage);
400                         }
401                 }
402         }
403
404         /* Store away localhost's name before the fork */
405         gethostname(LocalHostName, sizeof(LocalHostName));
406         if ((p = strchr(LocalHostName, '.'))) {
407                 *p++ = '\0';
408         }
409
410         umask(0);
411
412 #ifdef BB_KLOGD
413         /* Start up the klogd process */
414         if (startKlogd == TRUE) {
415                 klogd_pid = fork();
416                 if (klogd_pid == 0) {
417                         daemon_init (argv, "klogd", doKlogd);
418                 }
419         }
420 #endif
421
422         if (doFork == TRUE) {
423                 pid = fork();
424                 if (pid < 0)
425                         exit(pid);
426                 else if (pid == 0) {
427                         daemon_init (argv, "syslogd", doSyslogd);
428                 }
429         } else {
430                 doSyslogd();
431         }
432
433         exit(TRUE);
434 }
435
436 /*
437  * Local Variables
438  * c-file-style: "linux"
439  * c-basic-offset: 4
440  * tab-width: 4
441  * End:
442  */