chiark / gitweb /
fileio: imply /tmp as directory if passed as NULL to open_tmpfile_unlinkable()
[elogind.git] / src / basic / log.c
1 /***
2   This file is part of systemd.
3
4   Copyright 2010 Lennart Poettering
5
6   systemd is free software; you can redistribute it and/or modify it
7   under the terms of the GNU Lesser General Public License as published by
8   the Free Software Foundation; either version 2.1 of the License, or
9   (at your option) any later version.
10
11   systemd is distributed in the hope that it will be useful, but
12   WITHOUT ANY WARRANTY; without even the implied warranty of
13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14   Lesser General Public License for more details.
15
16   You should have received a copy of the GNU Lesser General Public License
17   along with systemd; If not, see <http://www.gnu.org/licenses/>.
18 ***/
19
20 #include <errno.h>
21 #include <fcntl.h>
22 #include <inttypes.h>
23 #include <limits.h>
24 #include <stdarg.h>
25 #include <stddef.h>
26 #include <stdio.h>
27 #include <string.h>
28 #include <sys/signalfd.h>
29 #include <sys/socket.h>
30 #include <sys/time.h>
31 #include <sys/uio.h>
32 #include <sys/un.h>
33 #include <time.h>
34 #include <unistd.h>
35
36 #include "sd-messages.h"
37
38 #include "alloc-util.h"
39 #include "fd-util.h"
40 #include "formats-util.h"
41 #include "io-util.h"
42 #include "log.h"
43 #include "macro.h"
44 #include "missing.h"
45 #include "parse-util.h"
46 #include "proc-cmdline.h"
47 #include "process-util.h"
48 #include "signal-util.h"
49 #include "socket-util.h"
50 #include "stdio-util.h"
51 #include "string-table.h"
52 #include "string-util.h"
53 #include "syslog-util.h"
54 #include "terminal-util.h"
55 #include "time-util.h"
56 #include "util.h"
57
58 #define SNDBUF_SIZE (8*1024*1024)
59
60 static LogTarget log_target = LOG_TARGET_CONSOLE;
61 static int log_max_level = LOG_INFO;
62 static int log_facility = LOG_DAEMON;
63
64 static int console_fd = STDERR_FILENO;
65 static int syslog_fd = -1;
66 static int kmsg_fd = -1;
67 static int journal_fd = -1;
68
69 static bool syslog_is_stream = false;
70
71 static bool show_color = false;
72 static bool show_location = false;
73
74 #if 0 /// UNNEEDED by elogind
75 static bool upgrade_syslog_to_journal = false;
76 #endif // 0
77
78 /* Akin to glibc's __abort_msg; which is private and we hence cannot
79  * use here. */
80 static char *log_abort_msg = NULL;
81
82 void log_close_console(void) {
83
84         if (console_fd < 0)
85                 return;
86
87         if (getpid() == 1) {
88                 if (console_fd >= 3)
89                         safe_close(console_fd);
90
91                 console_fd = -1;
92         }
93 }
94
95 static int log_open_console(void) {
96
97         if (console_fd >= 0)
98                 return 0;
99
100         if (getpid() == 1) {
101                 console_fd = open_terminal("/dev/console", O_WRONLY|O_NOCTTY|O_CLOEXEC);
102                 if (console_fd < 0)
103                         return console_fd;
104         } else
105                 console_fd = STDERR_FILENO;
106
107         return 0;
108 }
109
110 void log_close_kmsg(void) {
111         kmsg_fd = safe_close(kmsg_fd);
112 }
113
114 static int log_open_kmsg(void) {
115
116         if (kmsg_fd >= 0)
117                 return 0;
118
119         kmsg_fd = open("/dev/kmsg", O_WRONLY|O_NOCTTY|O_CLOEXEC);
120         if (kmsg_fd < 0)
121                 return -errno;
122
123         return 0;
124 }
125
126 void log_close_syslog(void) {
127         syslog_fd = safe_close(syslog_fd);
128 }
129
130 static int create_log_socket(int type) {
131         struct timeval tv;
132         int fd;
133
134         fd = socket(AF_UNIX, type|SOCK_CLOEXEC, 0);
135         if (fd < 0)
136                 return -errno;
137
138         fd_inc_sndbuf(fd, SNDBUF_SIZE);
139
140         /* We need a blocking fd here since we'd otherwise lose
141         messages way too early. However, let's not hang forever in the
142         unlikely case of a deadlock. */
143         if (getpid() == 1)
144                 timeval_store(&tv, 10 * USEC_PER_MSEC);
145         else
146                 timeval_store(&tv, 10 * USEC_PER_SEC);
147         (void) setsockopt(fd, SOL_SOCKET, SO_SNDTIMEO, &tv, sizeof(tv));
148
149         return fd;
150 }
151
152 static int log_open_syslog(void) {
153
154         static const union sockaddr_union sa = {
155                 .un.sun_family = AF_UNIX,
156                 .un.sun_path = "/dev/log",
157         };
158
159         int r;
160
161         if (syslog_fd >= 0)
162                 return 0;
163
164         syslog_fd = create_log_socket(SOCK_DGRAM);
165         if (syslog_fd < 0) {
166                 r = syslog_fd;
167                 goto fail;
168         }
169
170         if (connect(syslog_fd, &sa.sa, SOCKADDR_UN_LEN(sa.un)) < 0) {
171                 safe_close(syslog_fd);
172
173                 /* Some legacy syslog systems still use stream
174                  * sockets. They really shouldn't. But what can we
175                  * do... */
176                 syslog_fd = create_log_socket(SOCK_STREAM);
177                 if (syslog_fd < 0) {
178                         r = syslog_fd;
179                         goto fail;
180                 }
181
182                 if (connect(syslog_fd, &sa.sa, SOCKADDR_UN_LEN(sa.un)) < 0) {
183                         r = -errno;
184                         goto fail;
185                 }
186
187                 syslog_is_stream = true;
188         } else
189                 syslog_is_stream = false;
190
191         return 0;
192
193 fail:
194         log_close_syslog();
195         return r;
196 }
197
198 void log_close_journal(void) {
199 #if 0 /// elogind does not support journald
200         journal_fd = safe_close(journal_fd);
201 #endif // 0
202 }
203
204 #if 0 /// UNNEEDED by elogind
205 static int log_open_journal(void) {
206
207         static const union sockaddr_union sa = {
208                 .un.sun_family = AF_UNIX,
209                 .un.sun_path = "/run/systemd/journal/socket",
210         };
211
212         int r;
213
214         if (journal_fd >= 0)
215                 return 0;
216
217         journal_fd = create_log_socket(SOCK_DGRAM);
218         if (journal_fd < 0) {
219                 r = journal_fd;
220                 goto fail;
221         }
222
223         if (connect(journal_fd, &sa.sa, SOCKADDR_UN_LEN(sa.un)) < 0) {
224                 r = -errno;
225                 goto fail;
226         }
227
228         return 0;
229
230 fail:
231         log_close_journal();
232         return r;
233 }
234 #endif // 0
235
236 int log_open(void) {
237         int r;
238
239         /* If we don't use the console we close it here, to not get
240          * killed by SAK. If we don't use syslog we close it here so
241          * that we are not confused by somebody deleting the socket in
242          * the fs. If we don't use /dev/kmsg we still keep it open,
243          * because there is no reason to close it. */
244
245         if (log_target == LOG_TARGET_NULL) {
246                 log_close_journal();
247                 log_close_syslog();
248                 log_close_console();
249                 return 0;
250         }
251
252         if ((log_target != LOG_TARGET_AUTO && log_target != LOG_TARGET_SAFE) ||
253             getpid() == 1 ||
254             isatty(STDERR_FILENO) <= 0) {
255
256 #if 0 /// elogind does not support logging to systemd-journald
257                 if (log_target == LOG_TARGET_AUTO ||
258                     log_target == LOG_TARGET_JOURNAL_OR_KMSG ||
259                     log_target == LOG_TARGET_JOURNAL) {
260                         r = log_open_journal();
261                         if (r >= 0) {
262                                 log_close_syslog();
263                                 log_close_console();
264                                 return r;
265                         }
266                 }
267 #endif // 0
268
269                 if (log_target == LOG_TARGET_SYSLOG_OR_KMSG ||
270                     log_target == LOG_TARGET_SYSLOG) {
271                         r = log_open_syslog();
272                         if (r >= 0) {
273                                 log_close_journal();
274                                 log_close_console();
275                                 return r;
276                         }
277                 }
278
279                 if (log_target == LOG_TARGET_AUTO ||
280                     log_target == LOG_TARGET_SAFE ||
281                     log_target == LOG_TARGET_JOURNAL_OR_KMSG ||
282                     log_target == LOG_TARGET_SYSLOG_OR_KMSG ||
283                     log_target == LOG_TARGET_KMSG) {
284                         r = log_open_kmsg();
285                         if (r >= 0) {
286                                 log_close_journal();
287                                 log_close_syslog();
288                                 log_close_console();
289                                 return r;
290                         }
291                 }
292         }
293
294         log_close_journal();
295         log_close_syslog();
296
297         return log_open_console();
298 }
299
300 void log_set_target(LogTarget target) {
301         assert(target >= 0);
302         assert(target < _LOG_TARGET_MAX);
303
304 #if 0 /// elogind does not support logging to systemd-journald
305         if (upgrade_syslog_to_journal) {
306                 if (target == LOG_TARGET_SYSLOG)
307                         target = LOG_TARGET_JOURNAL;
308                 else if (target == LOG_TARGET_SYSLOG_OR_KMSG)
309                         target = LOG_TARGET_JOURNAL_OR_KMSG;
310         }
311 #endif // 0
312
313         log_target = target;
314 }
315
316 void log_close(void) {
317         log_close_journal();
318         log_close_syslog();
319         log_close_kmsg();
320         log_close_console();
321 }
322
323 #if 0 /// UNNEEDED by elogind
324 void log_forget_fds(void) {
325         console_fd = kmsg_fd = syslog_fd = journal_fd = -1;
326 }
327 #endif // 0
328
329 void log_set_max_level(int level) {
330         assert((level & LOG_PRIMASK) == level);
331
332         log_max_level = level;
333 }
334
335 void log_set_facility(int facility) {
336         log_facility = facility;
337 }
338
339 static int write_to_console(
340                 int level,
341                 int error,
342                 const char *file,
343                 int line,
344                 const char *func,
345                 const char *object_field,
346                 const char *object,
347                 const char *buffer) {
348
349         char location[256], prefix[1 + DECIMAL_STR_MAX(int) + 2];
350         struct iovec iovec[6] = {};
351         unsigned n = 0;
352         bool highlight;
353
354         if (console_fd < 0)
355                 return 0;
356
357         if (log_target == LOG_TARGET_CONSOLE_PREFIXED) {
358                 sprintf(prefix, "<%i>", level);
359                 IOVEC_SET_STRING(iovec[n++], prefix);
360         }
361
362         highlight = LOG_PRI(level) <= LOG_ERR && show_color;
363
364         if (show_location) {
365                 snprintf(location, sizeof(location), "(%s:%i) ", file, line);
366                 IOVEC_SET_STRING(iovec[n++], location);
367         }
368
369         if (highlight)
370                 IOVEC_SET_STRING(iovec[n++], ANSI_HIGHLIGHT_RED);
371         IOVEC_SET_STRING(iovec[n++], buffer);
372         if (highlight)
373                 IOVEC_SET_STRING(iovec[n++], ANSI_NORMAL);
374         IOVEC_SET_STRING(iovec[n++], "\n");
375
376         if (writev(console_fd, iovec, n) < 0) {
377
378                 if (errno == EIO && getpid() == 1) {
379
380                         /* If somebody tried to kick us from our
381                          * console tty (via vhangup() or suchlike),
382                          * try to reconnect */
383
384                         log_close_console();
385                         log_open_console();
386
387                         if (console_fd < 0)
388                                 return 0;
389
390                         if (writev(console_fd, iovec, n) < 0)
391                                 return -errno;
392                 } else
393                         return -errno;
394         }
395
396         return 1;
397 }
398
399 static int write_to_syslog(
400                 int level,
401                 int error,
402                 const char *file,
403                 int line,
404                 const char *func,
405                 const char *object_field,
406                 const char *object,
407                 const char *buffer) {
408
409         char header_priority[2 + DECIMAL_STR_MAX(int) + 1],
410              header_time[64],
411              header_pid[4 + DECIMAL_STR_MAX(pid_t) + 1];
412         struct iovec iovec[5] = {};
413         struct msghdr msghdr = {
414                 .msg_iov = iovec,
415                 .msg_iovlen = ELEMENTSOF(iovec),
416         };
417         time_t t;
418         struct tm *tm;
419
420         if (syslog_fd < 0)
421                 return 0;
422
423         xsprintf(header_priority, "<%i>", level);
424
425         t = (time_t) (now(CLOCK_REALTIME) / USEC_PER_SEC);
426         tm = localtime(&t);
427         if (!tm)
428                 return -EINVAL;
429
430         if (strftime(header_time, sizeof(header_time), "%h %e %T ", tm) <= 0)
431                 return -EINVAL;
432
433         xsprintf(header_pid, "["PID_FMT"]: ", getpid());
434
435         IOVEC_SET_STRING(iovec[0], header_priority);
436         IOVEC_SET_STRING(iovec[1], header_time);
437         IOVEC_SET_STRING(iovec[2], program_invocation_short_name);
438         IOVEC_SET_STRING(iovec[3], header_pid);
439         IOVEC_SET_STRING(iovec[4], buffer);
440
441         /* When using syslog via SOCK_STREAM separate the messages by NUL chars */
442         if (syslog_is_stream)
443                 iovec[4].iov_len++;
444
445         for (;;) {
446                 ssize_t n;
447
448                 n = sendmsg(syslog_fd, &msghdr, MSG_NOSIGNAL);
449                 if (n < 0)
450                         return -errno;
451
452                 if (!syslog_is_stream ||
453                     (size_t) n >= IOVEC_TOTAL_SIZE(iovec, ELEMENTSOF(iovec)))
454                         break;
455
456                 IOVEC_INCREMENT(iovec, ELEMENTSOF(iovec), n);
457         }
458
459         return 1;
460 }
461
462 static int write_to_kmsg(
463                 int level,
464                 int error,
465                 const char *file,
466                 int line,
467                 const char *func,
468                 const char *object_field,
469                 const char *object,
470                 const char *buffer) {
471
472         char header_priority[2 + DECIMAL_STR_MAX(int) + 1],
473              header_pid[4 + DECIMAL_STR_MAX(pid_t) + 1];
474         struct iovec iovec[5] = {};
475
476         if (kmsg_fd < 0)
477                 return 0;
478
479         xsprintf(header_priority, "<%i>", level);
480         xsprintf(header_pid, "["PID_FMT"]: ", getpid());
481
482         IOVEC_SET_STRING(iovec[0], header_priority);
483         IOVEC_SET_STRING(iovec[1], program_invocation_short_name);
484         IOVEC_SET_STRING(iovec[2], header_pid);
485         IOVEC_SET_STRING(iovec[3], buffer);
486         IOVEC_SET_STRING(iovec[4], "\n");
487
488         if (writev(kmsg_fd, iovec, ELEMENTSOF(iovec)) < 0)
489                 return -errno;
490
491         return 1;
492 }
493
494 #if 0 /// UNNEEDED by elogind
495 static int log_do_header(
496                 char *header,
497                 size_t size,
498                 int level,
499                 int error,
500                 const char *file, int line, const char *func,
501                 const char *object_field, const char *object) {
502
503         snprintf(header, size,
504                  "PRIORITY=%i\n"
505                  "SYSLOG_FACILITY=%i\n"
506                  "%s%s%s"
507                  "%s%.*i%s"
508                  "%s%s%s"
509                  "%s%.*i%s"
510                  "%s%s%s"
511                  "SYSLOG_IDENTIFIER=%s\n",
512                  LOG_PRI(level),
513                  LOG_FAC(level),
514                  isempty(file) ? "" : "CODE_FILE=",
515                  isempty(file) ? "" : file,
516                  isempty(file) ? "" : "\n",
517                  line ? "CODE_LINE=" : "",
518                  line ? 1 : 0, line, /* %.0d means no output too, special case for 0 */
519                  line ? "\n" : "",
520                  isempty(func) ? "" : "CODE_FUNCTION=",
521                  isempty(func) ? "" : func,
522                  isempty(func) ? "" : "\n",
523                  error ? "ERRNO=" : "",
524                  error ? 1 : 0, error,
525                  error ? "\n" : "",
526                  isempty(object) ? "" : object_field,
527                  isempty(object) ? "" : object,
528                  isempty(object) ? "" : "\n",
529                  program_invocation_short_name);
530
531         return 0;
532 }
533
534 static int write_to_journal(
535                 int level,
536                 int error,
537                 const char *file,
538                 int line,
539                 const char *func,
540                 const char *object_field,
541                 const char *object,
542                 const char *buffer) {
543
544         char header[LINE_MAX];
545         struct iovec iovec[4] = {};
546         struct msghdr mh = {};
547
548         if (journal_fd < 0)
549                 return 0;
550
551         log_do_header(header, sizeof(header), level, error, file, line, func, object_field, object);
552
553         IOVEC_SET_STRING(iovec[0], header);
554         IOVEC_SET_STRING(iovec[1], "MESSAGE=");
555         IOVEC_SET_STRING(iovec[2], buffer);
556         IOVEC_SET_STRING(iovec[3], "\n");
557
558         mh.msg_iov = iovec;
559         mh.msg_iovlen = ELEMENTSOF(iovec);
560
561         if (sendmsg(journal_fd, &mh, MSG_NOSIGNAL) < 0)
562                 return -errno;
563
564         return 1;
565 }
566 #endif // 0
567
568 static int log_dispatch(
569                 int level,
570                 int error,
571                 const char *file,
572                 int line,
573                 const char *func,
574                 const char *object_field,
575                 const char *object,
576                 char *buffer) {
577
578         assert(buffer);
579
580         if (log_target == LOG_TARGET_NULL)
581                 return -error;
582
583         /* Patch in LOG_DAEMON facility if necessary */
584         if ((level & LOG_FACMASK) == 0)
585                 level = log_facility | LOG_PRI(level);
586
587         if (error < 0)
588                 error = -error;
589
590         do {
591                 char *e;
592                 int k = 0;
593
594                 buffer += strspn(buffer, NEWLINE);
595
596                 if (buffer[0] == 0)
597                         break;
598
599                 if ((e = strpbrk(buffer, NEWLINE)))
600                         *(e++) = 0;
601
602 #if 0 /// elogind does not support logging to systemd-journald
603                 if (log_target == LOG_TARGET_AUTO ||
604                     log_target == LOG_TARGET_JOURNAL_OR_KMSG ||
605                     log_target == LOG_TARGET_JOURNAL) {
606
607                         k = write_to_journal(level, error, file, line, func, object_field, object, buffer);
608                         if (k < 0) {
609                                 if (k != -EAGAIN)
610                                         log_close_journal();
611                                 log_open_kmsg();
612                         }
613                 }
614 #endif // 0
615
616                 if (log_target == LOG_TARGET_SYSLOG_OR_KMSG ||
617                     log_target == LOG_TARGET_SYSLOG) {
618
619                         k = write_to_syslog(level, error, file, line, func, object_field, object, buffer);
620                         if (k < 0) {
621                                 if (k != -EAGAIN)
622                                         log_close_syslog();
623                                 log_open_kmsg();
624                         }
625                 }
626
627                 if (k <= 0 &&
628                     (log_target == LOG_TARGET_AUTO ||
629                      log_target == LOG_TARGET_SAFE ||
630                      log_target == LOG_TARGET_SYSLOG_OR_KMSG ||
631                      log_target == LOG_TARGET_JOURNAL_OR_KMSG ||
632                      log_target == LOG_TARGET_KMSG)) {
633
634                         k = write_to_kmsg(level, error, file, line, func, object_field, object, buffer);
635                         if (k < 0) {
636                                 log_close_kmsg();
637                                 log_open_console();
638                         }
639                 }
640
641                 if (k <= 0)
642                         (void) write_to_console(level, error, file, line, func, object_field, object, buffer);
643
644                 buffer = e;
645         } while (buffer);
646
647         return -error;
648 }
649
650 int log_dump_internal(
651         int level,
652         int error,
653         const char *file,
654         int line,
655         const char *func,
656         char *buffer) {
657
658         PROTECT_ERRNO;
659
660         /* This modifies the buffer... */
661
662         if (error < 0)
663                 error = -error;
664
665         if (_likely_(LOG_PRI(level) > log_max_level))
666                 return -error;
667
668         return log_dispatch(level, error, file, line, func, NULL, NULL, buffer);
669 }
670
671 int log_internalv(
672                 int level,
673                 int error,
674                 const char *file,
675                 int line,
676                 const char *func,
677                 const char *format,
678                 va_list ap) {
679
680         PROTECT_ERRNO;
681         char buffer[LINE_MAX];
682
683         if (error < 0)
684                 error = -error;
685
686         if (_likely_(LOG_PRI(level) > log_max_level))
687                 return -error;
688
689         /* Make sure that %m maps to the specified error */
690         if (error != 0)
691                 errno = error;
692
693         vsnprintf(buffer, sizeof(buffer), format, ap);
694
695         return log_dispatch(level, error, file, line, func, NULL, NULL, buffer);
696 }
697
698 int log_internal(
699                 int level,
700                 int error,
701                 const char *file,
702                 int line,
703                 const char *func,
704                 const char *format, ...) {
705
706         va_list ap;
707         int r;
708
709         va_start(ap, format);
710         r = log_internalv(level, error, file, line, func, format, ap);
711         va_end(ap);
712
713         return r;
714 }
715
716 int log_object_internalv(
717                 int level,
718                 int error,
719                 const char *file,
720                 int line,
721                 const char *func,
722                 const char *object_field,
723                 const char *object,
724                 const char *format,
725                 va_list ap) {
726
727         PROTECT_ERRNO;
728         char *buffer, *b;
729         size_t l;
730
731         if (error < 0)
732                 error = -error;
733
734         if (_likely_(LOG_PRI(level) > log_max_level))
735                 return -error;
736
737         /* Make sure that %m maps to the specified error */
738         if (error != 0)
739                 errno = error;
740
741         /* Prepend the object name before the message */
742         if (object) {
743                 size_t n;
744
745                 n = strlen(object);
746                 l = n + 2 + LINE_MAX;
747
748                 buffer = newa(char, l);
749                 b = stpcpy(stpcpy(buffer, object), ": ");
750         } else {
751                 l = LINE_MAX;
752                 b = buffer = newa(char, l);
753         }
754
755         vsnprintf(b, l, format, ap);
756
757         return log_dispatch(level, error, file, line, func, object_field, object, buffer);
758 }
759
760 int log_object_internal(
761                 int level,
762                 int error,
763                 const char *file,
764                 int line,
765                 const char *func,
766                 const char *object_field,
767                 const char *object,
768                 const char *format, ...) {
769
770         va_list ap;
771         int r;
772
773         va_start(ap, format);
774         r = log_object_internalv(level, error, file, line, func, object_field, object, format, ap);
775         va_end(ap);
776
777         return r;
778 }
779
780 static void log_assert(
781                 int level,
782                 const char *text,
783                 const char *file,
784                 int line,
785                 const char *func,
786                 const char *format) {
787
788         static char buffer[LINE_MAX];
789
790         if (_likely_(LOG_PRI(level) > log_max_level))
791                 return;
792
793         DISABLE_WARNING_FORMAT_NONLITERAL;
794         xsprintf(buffer, format, text, file, line, func);
795         REENABLE_WARNING;
796
797         log_abort_msg = buffer;
798
799         log_dispatch(level, 0, file, line, func, NULL, NULL, buffer);
800 }
801
802 noreturn void log_assert_failed(const char *text, const char *file, int line, const char *func) {
803         log_assert(LOG_CRIT, text, file, line, func, "Assertion '%s' failed at %s:%u, function %s(). Aborting.");
804         abort();
805 }
806
807 noreturn void log_assert_failed_unreachable(const char *text, const char *file, int line, const char *func) {
808         log_assert(LOG_CRIT, text, file, line, func, "Code should not be reached '%s' at %s:%u, function %s(). Aborting.");
809         abort();
810 }
811
812 void log_assert_failed_return(const char *text, const char *file, int line, const char *func) {
813         PROTECT_ERRNO;
814         log_assert(LOG_DEBUG, text, file, line, func, "Assertion '%s' failed at %s:%u, function %s(). Ignoring.");
815 }
816
817 int log_oom_internal(const char *file, int line, const char *func) {
818         log_internal(LOG_ERR, ENOMEM, file, line, func, "Out of memory.");
819         return -ENOMEM;
820 }
821
822 int log_format_iovec(
823                 struct iovec *iovec,
824                 unsigned iovec_len,
825                 unsigned *n,
826                 bool newline_separator,
827                 int error,
828                 const char *format,
829                 va_list ap) {
830
831         static const char nl = '\n';
832
833         while (format && *n + 1 < iovec_len) {
834                 va_list aq;
835                 char *m;
836                 int r;
837
838                 /* We need to copy the va_list structure,
839                  * since vasprintf() leaves it afterwards at
840                  * an undefined location */
841
842                 if (error != 0)
843                         errno = error;
844
845                 va_copy(aq, ap);
846                 r = vasprintf(&m, format, aq);
847                 va_end(aq);
848                 if (r < 0)
849                         return -EINVAL;
850
851                 /* Now, jump enough ahead, so that we point to
852                  * the next format string */
853                 VA_FORMAT_ADVANCE(format, ap);
854
855                 IOVEC_SET_STRING(iovec[(*n)++], m);
856
857                 if (newline_separator) {
858                         iovec[*n].iov_base = (char*) &nl;
859                         iovec[*n].iov_len = 1;
860                         (*n)++;
861                 }
862
863                 format = va_arg(ap, char *);
864         }
865         return 0;
866 }
867
868 int log_struct_internal(
869                 int level,
870                 int error,
871                 const char *file,
872                 int line,
873                 const char *func,
874                 const char *format, ...) {
875
876         char buf[LINE_MAX];
877         bool found = false;
878         PROTECT_ERRNO;
879         va_list ap;
880
881         if (error < 0)
882                 error = -error;
883
884         if (_likely_(LOG_PRI(level) > log_max_level))
885                 return -error;
886
887         if (log_target == LOG_TARGET_NULL)
888                 return -error;
889
890         if ((level & LOG_FACMASK) == 0)
891                 level = log_facility | LOG_PRI(level);
892
893 #if 0 /// elogind does not support logging to systemd-journald
894         if ((log_target == LOG_TARGET_AUTO ||
895              log_target == LOG_TARGET_JOURNAL_OR_KMSG ||
896              log_target == LOG_TARGET_JOURNAL) &&
897             journal_fd >= 0) {
898                 char header[LINE_MAX];
899                 struct iovec iovec[17] = {};
900                 unsigned n = 0, i;
901                 int r;
902                 struct msghdr mh = {
903                         .msg_iov = iovec,
904                 };
905                 bool fallback = false;
906
907                 /* If the journal is available do structured logging */
908                 log_do_header(header, sizeof(header), level, error, file, line, func, NULL, NULL);
909                 IOVEC_SET_STRING(iovec[n++], header);
910
911                 va_start(ap, format);
912                 r = log_format_iovec(iovec, ELEMENTSOF(iovec), &n, true, error, format, ap);
913                 if (r < 0)
914                         fallback = true;
915                 else {
916                         mh.msg_iovlen = n;
917                         (void) sendmsg(journal_fd, &mh, MSG_NOSIGNAL);
918                 }
919
920                 va_end(ap);
921                 for (i = 1; i < n; i += 2)
922                         free(iovec[i].iov_base);
923
924                 if (!fallback)
925                         return -error;
926         }
927 #endif // 0
928
929         /* Fallback if journal logging is not available or didn't work. */
930
931         va_start(ap, format);
932         while (format) {
933                 va_list aq;
934
935                 if (error != 0)
936                         errno = error;
937
938                 va_copy(aq, ap);
939                 vsnprintf(buf, sizeof(buf), format, aq);
940                 va_end(aq);
941
942                 if (startswith(buf, "MESSAGE=")) {
943                         found = true;
944                         break;
945                 }
946
947                 VA_FORMAT_ADVANCE(format, ap);
948
949                 format = va_arg(ap, char *);
950         }
951         va_end(ap);
952
953         if (!found)
954                 return -error;
955
956         return log_dispatch(level, error, file, line, func, NULL, NULL, buf + 8);
957 }
958
959 int log_set_target_from_string(const char *e) {
960         LogTarget t;
961
962         t = log_target_from_string(e);
963         if (t < 0)
964                 return -EINVAL;
965
966         log_set_target(t);
967         return 0;
968 }
969
970 int log_set_max_level_from_string(const char *e) {
971         int t;
972
973         t = log_level_from_string(e);
974         if (t < 0)
975                 return -EINVAL;
976
977         log_set_max_level(t);
978         return 0;
979 }
980
981 static int parse_proc_cmdline_item(const char *key, const char *value) {
982
983         /*
984          * The systemd.log_xyz= settings are parsed by all tools, and
985          * so is "debug".
986          *
987          * However, "quiet" is only parsed by PID 1, and only turns of
988          * status output to /dev/console, but does not alter the log
989          * level.
990          */
991
992         if (streq(key, "debug") && !value)
993                 log_set_max_level(LOG_DEBUG);
994
995         else if (streq(key, "systemd.log_target") && value) {
996
997                 if (log_set_target_from_string(value) < 0)
998                         log_warning("Failed to parse log target '%s'. Ignoring.", value);
999
1000         } else if (streq(key, "systemd.log_level") && value) {
1001
1002                 if (log_set_max_level_from_string(value) < 0)
1003                         log_warning("Failed to parse log level '%s'. Ignoring.", value);
1004
1005         } else if (streq(key, "systemd.log_color") && value) {
1006
1007                 if (log_show_color_from_string(value) < 0)
1008                         log_warning("Failed to parse log color setting '%s'. Ignoring.", value);
1009
1010         } else if (streq(key, "systemd.log_location") && value) {
1011
1012                 if (log_show_location_from_string(value) < 0)
1013                         log_warning("Failed to parse log location setting '%s'. Ignoring.", value);
1014         }
1015
1016         return 0;
1017 }
1018
1019 void log_parse_environment(void) {
1020         const char *e;
1021
1022         if (get_ctty_devnr(0, NULL) < 0)
1023                 /* Only try to read the command line in daemons.
1024                    We assume that anything that has a controlling
1025                    tty is user stuff. */
1026                 (void) parse_proc_cmdline(parse_proc_cmdline_item);
1027
1028         e = secure_getenv("SYSTEMD_LOG_TARGET");
1029         if (e && log_set_target_from_string(e) < 0)
1030                 log_warning("Failed to parse log target '%s'. Ignoring.", e);
1031
1032         e = secure_getenv("SYSTEMD_LOG_LEVEL");
1033         if (e && log_set_max_level_from_string(e) < 0)
1034                 log_warning("Failed to parse log level '%s'. Ignoring.", e);
1035
1036         e = secure_getenv("SYSTEMD_LOG_COLOR");
1037         if (e && log_show_color_from_string(e) < 0)
1038                 log_warning("Failed to parse bool '%s'. Ignoring.", e);
1039
1040         e = secure_getenv("SYSTEMD_LOG_LOCATION");
1041         if (e && log_show_location_from_string(e) < 0)
1042                 log_warning("Failed to parse bool '%s'. Ignoring.", e);
1043 }
1044
1045 LogTarget log_get_target(void) {
1046         return log_target;
1047 }
1048
1049 int log_get_max_level(void) {
1050         return log_max_level;
1051 }
1052
1053 void log_show_color(bool b) {
1054         show_color = b;
1055 }
1056
1057 bool log_get_show_color(void) {
1058         return show_color;
1059 }
1060
1061 void log_show_location(bool b) {
1062         show_location = b;
1063 }
1064
1065 bool log_get_show_location(void) {
1066         return show_location;
1067 }
1068
1069 int log_show_color_from_string(const char *e) {
1070         int t;
1071
1072         t = parse_boolean(e);
1073         if (t < 0)
1074                 return t;
1075
1076         log_show_color(t);
1077         return 0;
1078 }
1079
1080 int log_show_location_from_string(const char *e) {
1081         int t;
1082
1083         t = parse_boolean(e);
1084         if (t < 0)
1085                 return t;
1086
1087         log_show_location(t);
1088         return 0;
1089 }
1090
1091 bool log_on_console(void) {
1092         if (log_target == LOG_TARGET_CONSOLE ||
1093             log_target == LOG_TARGET_CONSOLE_PREFIXED)
1094                 return true;
1095
1096         return syslog_fd < 0 && kmsg_fd < 0 && journal_fd < 0;
1097 }
1098
1099 static const char *const log_target_table[_LOG_TARGET_MAX] = {
1100         [LOG_TARGET_CONSOLE] = "console",
1101         [LOG_TARGET_CONSOLE_PREFIXED] = "console-prefixed",
1102         [LOG_TARGET_KMSG] = "kmsg",
1103 #if 0 /// elogind does not support logging to systemd-journald
1104         [LOG_TARGET_JOURNAL] = "journal",
1105         [LOG_TARGET_JOURNAL_OR_KMSG] = "journal-or-kmsg",
1106 #endif // 0
1107         [LOG_TARGET_SYSLOG] = "syslog",
1108         [LOG_TARGET_SYSLOG_OR_KMSG] = "syslog-or-kmsg",
1109         [LOG_TARGET_AUTO] = "auto",
1110         [LOG_TARGET_SAFE] = "safe",
1111         [LOG_TARGET_NULL] = "null"
1112 };
1113
1114 DEFINE_STRING_TABLE_LOOKUP(log_target, LogTarget);
1115
1116 #if 0 /// UNNEEDED by elogind
1117 void log_received_signal(int level, const struct signalfd_siginfo *si) {
1118         if (si->ssi_pid > 0) {
1119                 _cleanup_free_ char *p = NULL;
1120
1121                 get_process_comm(si->ssi_pid, &p);
1122
1123                 log_full(level,
1124                          "Received SIG%s from PID %"PRIu32" (%s).",
1125                          signal_to_string(si->ssi_signo),
1126                          si->ssi_pid, strna(p));
1127         } else
1128                 log_full(level,
1129                          "Received SIG%s.",
1130                          signal_to_string(si->ssi_signo));
1131
1132 }
1133
1134 void log_set_upgrade_syslog_to_journal(bool b) {
1135         upgrade_syslog_to_journal = b;
1136 }
1137 #endif // 0
1138
1139 int log_syntax_internal(
1140                 const char *unit,
1141                 int level,
1142                 const char *config_file,
1143                 unsigned config_line,
1144                 int error,
1145                 const char *file,
1146                 int line,
1147                 const char *func,
1148                 const char *format, ...) {
1149
1150         PROTECT_ERRNO;
1151         char buffer[LINE_MAX];
1152         int r;
1153         va_list ap;
1154
1155         if (error < 0)
1156                 error = -error;
1157
1158         if (_likely_(LOG_PRI(level) > log_max_level))
1159                 return -error;
1160
1161         if (log_target == LOG_TARGET_NULL)
1162                 return -error;
1163
1164         if (error != 0)
1165                 errno = error;
1166
1167         va_start(ap, format);
1168         vsnprintf(buffer, sizeof(buffer), format, ap);
1169         va_end(ap);
1170
1171         if (unit)
1172                 r = log_struct_internal(
1173                                 level, error,
1174                                 file, line, func,
1175                                 getpid() == 1 ? "UNIT=%s" : "USER_UNIT=%s", unit,
1176                                 LOG_MESSAGE_ID(SD_MESSAGE_INVALID_CONFIGURATION),
1177                                 "CONFIG_FILE=%s", config_file,
1178                                 "CONFIG_LINE=%u", config_line,
1179                                 LOG_MESSAGE("[%s:%u] %s", config_file, config_line, buffer),
1180                                 NULL);
1181         else
1182                 r = log_struct_internal(
1183                                 level, error,
1184                                 file, line, func,
1185                                 LOG_MESSAGE_ID(SD_MESSAGE_INVALID_CONFIGURATION),
1186                                 "CONFIG_FILE=%s", config_file,
1187                                 "CONFIG_LINE=%u", config_line,
1188                                 LOG_MESSAGE("[%s:%u] %s", config_file, config_line, buffer),
1189                                 NULL);
1190
1191         return r;
1192 }