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 }