execute.c

   1 /*-*- Mode: C; c-basic-offset: 8 -*-*/
   2
   3 /***
   4   This file is part of systemd.
   5
   6   Copyright 2010 Lennart Poettering
   7
   8   systemd is free software; you can redistribute it and/or modify it
   9   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   systemd is distributed in the hope that it will be useful, but
  14   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 systemd; If not, see <http://www.gnu.org/licenses/>.
  20 ***/
  21
  22 #include <assert.h>
  23 #include <dirent.h>
  24 #include <errno.h>
  25 #include <fcntl.h>
  26 #include <unistd.h>
  27 #include <string.h>
  28 #include <signal.h>
  29 #include <sys/socket.h>
  30 #include <sys/un.h>
  31 #include <sys/prctl.h>
  32 #include <linux/sched.h>
  33 #include <sys/types.h>
  34 #include <sys/stat.h>
  35 #include <grp.h>
  36 #include <pwd.h>
  37
  38 #include "execute.h"
  39 #include "strv.h"
  40 #include "macro.h"
  41 #include "util.h"
  42 #include "log.h"
  43 #include "ioprio.h"
  44 #include "securebits.h"
  45 #include "cgroup.h"
  46
  47 static int shift_fds(int fds[], unsigned n_fds) {
  48         int start, restart_from;
  49
  50         if (n_fds <= 0)
  51                 return 0;
  52
  53         /* Modifies the fds array! (sorts it) */
  54
  55         assert(fds);
  56
  57         start = 0;
  58         for (;;) {
  59                 int i;
  60
  61                 restart_from = -1;
  62
  63                 for (i = start; i < (int) n_fds; i++) {
  64                         int nfd;
  65
  66                         /* Already at right index? */
  67                         if (fds[i] == i+3)
  68                                 continue;
  69
  70                         if ((nfd = fcntl(fds[i], F_DUPFD, i+3)) < 0)
  71                                 return -errno;
  72
  73                         assert_se(close_nointr(fds[i]) == 0);
  74                         fds[i] = nfd;
  75
  76                         /* Hmm, the fd we wanted isn't free? Then
  77                          * let's remember that and try again from here*/
  78                         if (nfd != i+3 && restart_from < 0)
  79                                 restart_from = i;
  80                 }
  81
  82                 if (restart_from < 0)
  83                         break;
  84
  85                 start = restart_from;
  86         }
  87
  88         return 0;
  89 }
  90
  91 static int flags_fds(int fds[], unsigned n_fds, bool nonblock) {
  92         unsigned i;
  93         int r;
  94
  95         if (n_fds <= 0)
  96                 return 0;
  97
  98         assert(fds);
  99
 100         /* Drops/Sets O_NONBLOCK and FD_CLOEXEC from the file flags */
 101
 102         for (i = 0; i < n_fds; i++) {
 103
 104                 if ((r = fd_nonblock(fds[i], nonblock)) < 0)
 105                         return r;
 106
 107                 /* We unconditionally drop FD_CLOEXEC from the fds,
 108                  * since after all we want to pass these fds to our
 109                  * children */
 110
 111                 if ((r = fd_cloexec(fds[i], false)) < 0)
 112                         return r;
 113         }
 114
 115         return 0;
 116 }
 117
 118 static int replace_null_fd(int fd, int flags) {
 119         int nfd;
 120         assert(fd >= 0);
 121
 122         close_nointr(fd);
 123
 124         if ((nfd = open("/dev/null", flags|O_NOCTTY)) < 0)
 125                 return -errno;
 126
 127         if (nfd != fd) {
 128                 close_nointr_nofail(nfd);
 129                 return -EIO;
 130         }
 131
 132         return 0;
 133 }
 134
 135 static int setup_output(const ExecContext *context, const char *ident) {
 136         int r;
 137
 138         assert(context);
 139
 140         switch (context->output) {
 141
 142         case EXEC_OUTPUT_CONSOLE:
 143                 return 0;
 144
 145         case EXEC_OUTPUT_NULL:
 146
 147                 if ((r = replace_null_fd(STDOUT_FILENO, O_WRONLY)) < 0 ||
 148                     (r = replace_null_fd(STDERR_FILENO, O_WRONLY)) < 0)
 149                         return r;
 150
 151                 return 0;
 152
 153         case EXEC_OUTPUT_KERNEL:
 154         case EXEC_OUTPUT_SYSLOG: {
 155
 156                 int fd;
 157                 union {
 158                         struct sockaddr sa;
 159                         struct sockaddr_un un;
 160                 } sa;
 161
 162                 close_nointr(STDOUT_FILENO);
 163                 close_nointr(STDERR_FILENO);
 164
 165                 if ((fd = socket(AF_UNIX, SOCK_STREAM, 0)) < 0)
 166                         return -errno;
 167
 168                 if (fd != STDOUT_FILENO) {
 169                         close_nointr_nofail(fd);
 170                         return -EIO;
 171                 }
 172
 173                 zero(sa);
 174                 sa.sa.sa_family = AF_UNIX;
 175                 strncpy(sa.un.sun_path+1, LOGGER_SOCKET, sizeof(sa.un.sun_path)-1);
 176
 177                 if (connect(fd, &sa.sa, sizeof(sa)) < 0) {
 178                         close_nointr_nofail(fd);
 179                         return -errno;
 180                 }
 181
 182                 if (shutdown(fd, SHUT_RD) < 0) {
 183                         close_nointr_nofail(fd);
 184                         return -errno;
 185                 }
 186
 187                 if ((fd = dup(fd)) < 0) {
 188                         close_nointr_nofail(fd);
 189                         return -errno;
 190                 }
 191
 192                 if (fd != STDERR_FILENO) {
 193                         close_nointr_nofail(fd);
 194                         return -EIO;
 195                 }
 196
 197                 /* We speak a very simple protocol between log server
 198                  * and client: one line for the log destination (kmsg
 199                  * or syslog), followed by the priority field,
 200                  * followed by the process name. Since we replaced
 201                  * stdin/stderr we simple use stdio to write to
 202                  * it. Note that we use stderr, to minimize buffer
 203                  * flushing issues. */
 204
 205                 fprintf(stderr,
 206                         "%s\n"
 207                         "%i\n"
 208                         "%s\n",
 209                         context->output == EXEC_OUTPUT_KERNEL ? "kmsg" : "syslog",
 210                         context->syslog_priority,
 211                         context->syslog_identifier ? context->syslog_identifier : ident);
 212
 213                 return 0;
 214         }
 215
 216         default:
 217                 assert_not_reached("Unknown output type");
 218         }
 219 }
 220
 221 static int setup_input(const ExecContext *context) {
 222         int r;
 223
 224         assert(context);
 225
 226         switch (context->input) {
 227
 228         case EXEC_INPUT_CONSOLE:
 229                 return 0;
 230
 231         case EXEC_INPUT_NULL:
 232                 if ((r = replace_null_fd(STDIN_FILENO, O_RDONLY)) < 0)
 233                         return r;
 234
 235                 return 0;
 236
 237         default:
 238                 assert_not_reached("Unknown input type");
 239         }
 240 }
 241
 242 static int get_group_creds(const char *groupname, gid_t *gid) {
 243         struct group *g;
 244         unsigned long lu;
 245
 246         assert(groupname);
 247         assert(gid);
 248
 249         /* We enforce some special rules for gid=0: in order to avoid
 250          * NSS lookups for root we hardcode its data. */
 251
 252         if (streq(groupname, "root") || streq(groupname, "0")) {
 253                 *gid = 0;
 254                 return 0;
 255         }
 256
 257         if (safe_atolu(groupname, &lu) >= 0) {
 258                 errno = 0;
 259                 g = getgrgid((gid_t) lu);
 260         } else {
 261                 errno = 0;
 262                 g = getgrnam(groupname);
 263         }
 264
 265         if (!g)
 266                 return errno != 0 ? -errno : -ESRCH;
 267
 268         *gid = g->gr_gid;
 269         return 0;
 270 }
 271
 272 static int get_user_creds(const char **username, uid_t *uid, gid_t *gid, const char **home) {
 273         struct passwd *p;
 274         unsigned long lu;
 275
 276         assert(username);
 277         assert(*username);
 278         assert(uid);
 279         assert(gid);
 280         assert(home);
 281
 282         /* We enforce some special rules for uid=0: in order to avoid
 283          * NSS lookups for root we hardcode its data. */
 284
 285         if (streq(*username, "root") || streq(*username, "0")) {
 286                 *username = "root";
 287                 *uid = 0;
 288                 *gid = 0;
 289                 *home = "/root";
 290                 return 0;
 291         }
 292
 293         if (safe_atolu(*username, &lu) >= 0) {
 294                 errno = 0;
 295                 p = getpwuid((uid_t) lu);
 296
 297                 /* If there are multiple users with the same id, make
 298                  * sure to leave $USER to the configured value instead
 299                  * of the first occurence in the database. However if
 300                  * the uid was configured by a numeric uid, then let's
 301                  * pick the real username from /etc/passwd. */
 302                 if (*username && p)
 303                         *username = p->pw_name;
 304         } else {
 305                 errno = 0;
 306                 p = getpwnam(*username);
 307         }
 308
 309         if (!p)
 310                 return errno != 0 ? -errno : -ESRCH;
 311
 312         *uid = p->pw_uid;
 313         *gid = p->pw_gid;
 314         *home = p->pw_dir;
 315         return 0;
 316 }
 317
 318 static int enforce_groups(const ExecContext *context, const char *username, gid_t gid) {
 319         bool keep_groups = false;
 320         int r;
 321
 322         assert(context);
 323
 324         /* Lookup and ser GID and supplementary group list. Here too
 325          * we avoid NSS lookups for gid=0. */
 326
 327         if (context->group || username) {
 328
 329                 if (context->group)
 330                         if ((r = get_group_creds(context->group, &gid)) < 0)
 331                                 return r;
 332
 333                 /* First step, initialize groups from /etc/groups */
 334                 if (username && gid != 0) {
 335                         if (initgroups(username, gid) < 0)
 336                                 return -errno;
 337
 338                         keep_groups = true;
 339                 }
 340
 341                 /* Second step, set our gids */
 342                 if (setresgid(gid, gid, gid) < 0)
 343                         return -errno;
 344         }
 345
 346         if (context->supplementary_groups) {
 347                 int ngroups_max, k;
 348                 gid_t *gids;
 349                 char **i;
 350
 351                 /* Final step, initialize any manually set supplementary groups */
 352                 ngroups_max = (int) sysconf(_SC_NGROUPS_MAX);
 353
 354                 if (!(gids = new(gid_t, ngroups_max)))
 355                         return -ENOMEM;
 356
 357                 if (keep_groups) {
 358                         if ((k = getgroups(ngroups_max, gids)) < 0) {
 359                                 free(gids);
 360                                 return -errno;
 361                         }
 362                 } else
 363                         k = 0;
 364
 365                 STRV_FOREACH(i, context->supplementary_groups) {
 366
 367                         if (k >= ngroups_max) {
 368                                 free(gids);
 369                                 return -E2BIG;
 370                         }
 371
 372                         if ((r = get_group_creds(*i, gids+k)) < 0) {
 373                                 free(gids);
 374                                 return r;
 375                         }
 376
 377                         k++;
 378                 }
 379
 380                 if (setgroups(k, gids) < 0) {
 381                         free(gids);
 382                         return -errno;
 383                 }
 384
 385                 free(gids);
 386         }
 387
 388         return 0;
 389 }
 390
 391 static int enforce_user(const ExecContext *context, uid_t uid) {
 392         int r;
 393         assert(context);
 394
 395         /* Sets (but doesn't lookup) the uid and make sure we keep the
 396          * capabilities while doing so. */
 397
 398         if (context->capabilities) {
 399                 cap_t d;
 400                 static const cap_value_t bits[] = {
 401                         CAP_SETUID,   /* Necessary so that we can run setresuid() below */
 402                         CAP_SETPCAP   /* Necessary so that we can set PR_SET_SECUREBITS later on */
 403                 };
 404
 405                 /* First step: If we need to keep capabilities but
 406                  * drop privileges we need to make sure we keep our
 407                  * caps, whiel we drop priviliges. */
 408                 if (uid != 0) {
 409                         int sb = context->secure_bits|SECURE_KEEP_CAPS;
 410
 411                         if (prctl(PR_GET_SECUREBITS) != sb)
 412                                 if (prctl(PR_SET_SECUREBITS, sb) < 0)
 413                                         return -errno;
 414                 }
 415
 416                 /* Second step: set the capabilites. This will reduce
 417                  * the capabilities to the minimum we need. */
 418
 419                 if (!(d = cap_dup(context->capabilities)))
 420                         return -errno;
 421
 422                 if (cap_set_flag(d, CAP_EFFECTIVE, ELEMENTSOF(bits), bits, CAP_SET) < 0 ||
 423                     cap_set_flag(d, CAP_PERMITTED, ELEMENTSOF(bits), bits, CAP_SET) < 0) {
 424                         r = -errno;
 425                         cap_free(d);
 426                         return r;
 427                 }
 428
 429                 if (cap_set_proc(d) < 0) {
 430                         r = -errno;
 431                         cap_free(d);
 432                         return r;
 433                 }
 434
 435                 cap_free(d);
 436         }
 437
 438         /* Third step: actually set the uids */
 439         if (setresuid(uid, uid, uid) < 0)
 440                 return -errno;
 441
 442         /* At this point we should have all necessary capabilities but
 443            are otherwise a normal user. However, the caps might got
 444            corrupted due to the setresuid() so we need clean them up
 445            later. This is done outside of this call. */
 446
 447         return 0;
 448 }
 449
 450 int exec_spawn(ExecCommand *command,
 451                const ExecContext *context,
 452                int *fds, unsigned n_fds,
 453                bool apply_permissions,
 454                bool apply_chroot,
 455                CGroupBonding *cgroup_bondings,
 456                pid_t *ret) {
 457
 458         pid_t pid;
 459         int r;
 460
 461         assert(command);
 462         assert(context);
 463         assert(ret);
 464         assert(fds || n_fds <= 0);
 465
 466         log_debug("About to execute %s", command->path);
 467
 468         if (cgroup_bondings)
 469                 if ((r = cgroup_bonding_realize_list(cgroup_bondings)))
 470                         return r;
 471
 472         if ((pid = fork()) < 0)
 473                 return -errno;
 474
 475         if (pid == 0) {
 476                 int i;
 477                 sigset_t ss;
 478                 const char *username = NULL, *home = NULL;
 479                 uid_t uid = (uid_t) -1;
 480                 gid_t gid = (gid_t) -1;
 481                 char **our_env = NULL, **final_env = NULL;
 482                 unsigned n_env = 0;
 483
 484                 /* child */
 485
 486                 if (sigemptyset(&ss) < 0 ||
 487                     sigprocmask(SIG_SETMASK, &ss, NULL) < 0) {
 488                         r = EXIT_SIGNAL_MASK;
 489                         goto fail;
 490                 }
 491
 492                 if (context->new_session) {
 493                         if (setsid() < 0) {
 494                                 r = EXIT_SETSID;
 495                                 goto fail;
 496                         }
 497                 } else {
 498                         if (setpgid(0, 0) < 0) {
 499                                 r = EXIT_PGID;
 500                                 goto fail;
 501                         }
 502                 }
 503
 504                 umask(context->umask);
 505
 506                 if (setup_input(context) < 0) {
 507                         r = EXIT_INPUT;
 508                         goto fail;
 509                 }
 510
 511                 if (setup_output(context, file_name_from_path(command->path)) < 0) {
 512                         r = EXIT_OUTPUT;
 513                         goto fail;
 514                 }
 515
 516                 if (cgroup_bondings)
 517                         if ((r = cgroup_bonding_install_list(cgroup_bondings, 0)) < 0) {
 518                                 r = EXIT_CGROUP;
 519                                 goto fail;
 520                         }
 521
 522                 if (context->oom_adjust_set) {
 523                         char t[16];
 524
 525                         snprintf(t, sizeof(t), "%i", context->oom_adjust);
 526                         char_array_0(t);
 527
 528                         if (write_one_line_file("/proc/self/oom_adj", t) < 0) {
 529                                 r = EXIT_OOM_ADJUST;
 530                                 goto fail;
 531                         }
 532                 }
 533
 534                 if (context->nice_set)
 535                         if (setpriority(PRIO_PROCESS, 0, context->nice) < 0) {
 536                                 r = EXIT_NICE;
 537                                 goto fail;
 538                         }
 539
 540                 if (context->cpu_sched_set) {
 541                         struct sched_param param;
 542
 543                         zero(param);
 544                         param.sched_priority = context->cpu_sched_priority;
 545
 546                         if (sched_setscheduler(0, context->cpu_sched_policy |
 547                                                (context->cpu_sched_reset_on_fork ? SCHED_RESET_ON_FORK : 0), &param) < 0) {
 548                                 r = EXIT_SETSCHEDULER;
 549                                 goto fail;
 550                         }
 551                 }
 552
 553                 if (context->cpu_affinity_set)
 554                         if (sched_setaffinity(0, sizeof(context->cpu_affinity), &context->cpu_affinity) < 0) {
 555                                 r = EXIT_CPUAFFINITY;
 556                                 goto fail;
 557                         }
 558
 559                 if (context->ioprio_set)
 560                         if (ioprio_set(IOPRIO_WHO_PROCESS, 0, context->ioprio) < 0) {
 561                                 r = EXIT_IOPRIO;
 562                                 goto fail;
 563                         }
 564
 565                 if (context->timer_slack_ns_set)
 566                         if (prctl(PR_SET_TIMERSLACK, context->timer_slack_ns_set) < 0) {
 567                                 r = EXIT_TIMERSLACK;
 568                                 goto fail;
 569                         }
 570
 571                 if (context->user) {
 572                         username = context->user;
 573                         if (get_user_creds(&username, &uid, &gid, &home) < 0) {
 574                                 r = EXIT_USER;
 575                                 goto fail;
 576                         }
 577                 }
 578
 579                 if (apply_permissions)
 580                         if (enforce_groups(context, username, uid) < 0) {
 581                                 r = EXIT_GROUP;
 582                                 goto fail;
 583                         }
 584
 585                 if (apply_chroot) {
 586                         if (context->root_directory)
 587                                 if (chroot(context->root_directory) < 0) {
 588                                         r = EXIT_CHROOT;
 589                                         goto fail;
 590                                 }
 591
 592                         if (chdir(context->working_directory ? context->working_directory : "/") < 0) {
 593                                 r = EXIT_CHDIR;
 594                                 goto fail;
 595                         }
 596                 } else {
 597
 598                         char *d;
 599
 600                         if (asprintf(&d, "%s/%s",
 601                                      context->root_directory ? context->root_directory : "",
 602                                      context->working_directory ? context->working_directory : "") < 0) {
 603                                 r = EXIT_MEMORY;
 604                                 goto fail;
 605                         }
 606
 607                         if (chdir(d) < 0) {
 608                                 free(d);
 609                                 r = EXIT_CHDIR;
 610                                 goto fail;
 611                         }
 612
 613                         free(d);
 614                 }
 615
 616                 if (close_all_fds(fds, n_fds) < 0 ||
 617                     shift_fds(fds, n_fds) < 0 ||
 618                     flags_fds(fds, n_fds, context->non_blocking) < 0) {
 619                         r = EXIT_FDS;
 620                         goto fail;
 621                 }
 622
 623                 if (apply_permissions) {
 624
 625                         for (i = 0; i < RLIMIT_NLIMITS; i++) {
 626                                 if (!context->rlimit[i])
 627                                         continue;
 628
 629                                 if (setrlimit(i, context->rlimit[i]) < 0) {
 630                                         r = EXIT_LIMITS;
 631                                         goto fail;
 632                                 }
 633                         }
 634
 635                         if (context->user)
 636                                 if (enforce_user(context, uid) < 0) {
 637                                         r = EXIT_USER;
 638                                         goto fail;
 639                                 }
 640
 641                         /* PR_GET_SECUREBITS is not priviliged, while
 642                          * PR_SET_SECUREBITS is. So to suppress
 643                          * potential EPERMs we'll try not to call
 644                          * PR_SET_SECUREBITS unless necessary. */
 645                         if (prctl(PR_GET_SECUREBITS) != context->secure_bits)
 646                                 if (prctl(PR_SET_SECUREBITS, context->secure_bits) < 0) {
 647                                         r = EXIT_SECUREBITS;
 648                                         goto fail;
 649                                 }
 650
 651                         if (context->capabilities)
 652                                 if (cap_set_proc(context->capabilities) < 0) {
 653                                         r = EXIT_CAPABILITIES;
 654                                         goto fail;
 655                                 }
 656                 }
 657
 658                 if (!(our_env = new0(char*, 6))) {
 659                         r = EXIT_MEMORY;
 660                         goto fail;
 661                 }
 662
 663                 if (n_fds > 0)
 664                         if (asprintf(our_env + n_env++, "LISTEN_PID=%llu", (unsigned long long) getpid()) < 0 ||
 665                             asprintf(our_env + n_env++, "LISTEN_FDS=%u", n_fds) < 0) {
 666                                 r = EXIT_MEMORY;
 667                                 goto fail;
 668                         }
 669
 670                 if (home)
 671                         if (asprintf(our_env + n_env++, "HOME=%s", home) < 0) {
 672                                 r = EXIT_MEMORY;
 673                                 goto fail;
 674                         }
 675
 676                 if (username)
 677                         if (asprintf(our_env + n_env++, "LOGNAME=%s", username) < 0 ||
 678                             asprintf(our_env + n_env++, "USER=%s", username) < 0) {
 679                                 r = EXIT_MEMORY;
 680                                 goto fail;
 681                         }
 682
 683                 if (!(final_env = strv_env_merge(environ, our_env, context->environment, NULL))) {
 684                         r = EXIT_MEMORY;
 685                         goto fail;
 686                 }
 687
 688                 execve(command->path, command->argv, final_env);
 689                 r = EXIT_EXEC;
 690
 691         fail:
 692                 strv_free(our_env);
 693                 strv_free(final_env);
 694
 695                 _exit(r);
 696         }
 697
 698
 699         log_debug("Forked %s as %llu", command->path, (unsigned long long) pid);
 700
 701         command->exec_status.pid = pid;
 702         command->exec_status.start_timestamp = now(CLOCK_REALTIME);
 703
 704         *ret = pid;
 705         return 0;
 706 }
 707
 708 void exec_context_init(ExecContext *c) {
 709         assert(c);
 710
 711         c->umask = 0002;
 712         c->oom_adjust = 0;
 713         c->oom_adjust_set = false;
 714         c->nice = 0;
 715         c->nice_set = false;
 716         c->ioprio = IOPRIO_PRIO_VALUE(IOPRIO_CLASS_BE, 0);
 717         c->ioprio_set = false;
 718         c->cpu_sched_policy = SCHED_OTHER;
 719         c->cpu_sched_priority = 0;
 720         c->cpu_sched_set = false;
 721         CPU_ZERO(&c->cpu_affinity);
 722         c->cpu_affinity_set = false;
 723         c->timer_slack_ns = 0;
 724         c->timer_slack_ns_set = false;
 725
 726         c->cpu_sched_reset_on_fork = false;
 727         c->non_blocking = false;
 728         c->new_session = false;
 729
 730         c->input = 0;
 731         c->output = 0;
 732         c->syslog_priority = LOG_DAEMON|LOG_INFO;
 733
 734         c->secure_bits = 0;
 735         c->capability_bounding_set_drop = 0;
 736 }
 737
 738 void exec_context_done(ExecContext *c) {
 739         unsigned l;
 740
 741         assert(c);
 742
 743         strv_free(c->environment);
 744         c->environment = NULL;
 745
 746         for (l = 0; l < ELEMENTSOF(c->rlimit); l++) {
 747                 free(c->rlimit[l]);
 748                 c->rlimit[l] = NULL;
 749         }
 750
 751         free(c->working_directory);
 752         c->working_directory = NULL;
 753         free(c->root_directory);
 754         c->root_directory = NULL;
 755
 756         free(c->syslog_identifier);
 757         c->syslog_identifier = NULL;
 758
 759         free(c->user);
 760         c->user = NULL;
 761
 762         free(c->group);
 763         c->group = NULL;
 764
 765         strv_free(c->supplementary_groups);
 766         c->supplementary_groups = NULL;
 767
 768         if (c->capabilities) {
 769                 cap_free(c->capabilities);
 770                 c->capabilities = NULL;
 771         }
 772 }
 773
 774 void exec_command_free_list(ExecCommand *c) {
 775         ExecCommand *i;
 776
 777         while ((i = c)) {
 778                 LIST_REMOVE(ExecCommand, command, c, i);
 779
 780                 free(i->path);
 781                 strv_free(i->argv);
 782                 free(i);
 783         }
 784 }
 785
 786 void exec_command_free_array(ExecCommand **c, unsigned n) {
 787         unsigned i;
 788
 789         for (i = 0; i < n; i++) {
 790                 exec_command_free_list(c[i]);
 791                 c[i] = NULL;
 792         }
 793 }
 794
 795 void exec_context_dump(ExecContext *c, FILE* f, const char *prefix) {
 796         char ** e;
 797         unsigned i;
 798
 799         assert(c);
 800         assert(f);
 801
 802         if (!prefix)
 803                 prefix = "";
 804
 805         fprintf(f,
 806                 "%sUMask: %04o\n"
 807                 "%sWorkingDirectory: %s\n"
 808                 "%sRootDirectory: %s\n"
 809                 "%sNonBlocking: %s\n"
 810                 "%sNewSession: %s\n",
 811                 prefix, c->umask,
 812                 prefix, c->working_directory ? c->working_directory : "/",
 813                 prefix, c->root_directory ? c->root_directory : "/",
 814                 prefix, yes_no(c->non_blocking),
 815                 prefix, yes_no(c->new_session));
 816
 817         if (c->environment)
 818                 for (e = c->environment; *e; e++)
 819                         fprintf(f, "%sEnvironment: %s\n", prefix, *e);
 820
 821         if (c->nice_set)
 822                 fprintf(f,
 823                         "%sNice: %i\n",
 824                         prefix, c->nice);
 825
 826         if (c->oom_adjust_set)
 827                 fprintf(f,
 828                         "%sOOMAdjust: %i\n",
 829                         prefix, c->oom_adjust);
 830
 831         for (i = 0; i < RLIM_NLIMITS; i++)
 832                 if (c->rlimit[i])
 833                         fprintf(f, "%s%s: %llu\n", prefix, rlimit_to_string(i), (unsigned long long) c->rlimit[i]->rlim_max);
 834
 835         if (c->ioprio_set)
 836                 fprintf(f,
 837                         "%sIOSchedulingClass: %s\n"
 838                         "%sIOPriority: %i\n",
 839                         prefix, ioprio_class_to_string(IOPRIO_PRIO_CLASS(c->ioprio)),
 840                         prefix, (int) IOPRIO_PRIO_DATA(c->ioprio));
 841
 842         if (c->cpu_sched_set)
 843                 fprintf(f,
 844                         "%sCPUSchedulingPolicy: %s\n"
 845                         "%sCPUSchedulingPriority: %i\n"
 846                         "%sCPUSchedulingResetOnFork: %s\n",
 847                         prefix, sched_policy_to_string(c->cpu_sched_policy),
 848                         prefix, c->cpu_sched_priority,
 849                         prefix, yes_no(c->cpu_sched_reset_on_fork));
 850
 851         if (c->cpu_affinity_set) {
 852                 fprintf(f, "%sCPUAffinity:", prefix);
 853                 for (i = 0; i < CPU_SETSIZE; i++)
 854                         if (CPU_ISSET(i, &c->cpu_affinity))
 855                                 fprintf(f, " %i", i);
 856                 fputs("\n", f);
 857         }
 858
 859         if (c->timer_slack_ns_set)
 860                 fprintf(f, "%sTimerSlackNS: %lu\n", prefix, c->timer_slack_ns);
 861
 862         fprintf(f,
 863                 "%sInput: %s\n"
 864                 "%sOutput: %s\n",
 865                 prefix, exec_input_to_string(c->input),
 866                 prefix, exec_output_to_string(c->output));
 867
 868         if (c->output == EXEC_OUTPUT_SYSLOG || c->output == EXEC_OUTPUT_KERNEL)
 869                 fprintf(f,
 870                         "%sSyslogFacility: %s\n"
 871                         "%sSyslogLevel: %s\n",
 872                         prefix, log_facility_to_string(LOG_FAC(c->syslog_priority)),
 873                         prefix, log_level_to_string(LOG_PRI(c->syslog_priority)));
 874
 875         if (c->capabilities) {
 876                 char *t;
 877                 if ((t = cap_to_text(c->capabilities, NULL))) {
 878                         fprintf(f, "%sCapabilities: %s\n",
 879                                 prefix, t);
 880                         cap_free(t);
 881                 }
 882         }
 883
 884         if (c->secure_bits)
 885                 fprintf(f, "%sSecure Bits:%s%s%s%s%s%s\n",
 886                         prefix,
 887                         (c->secure_bits & SECURE_KEEP_CAPS) ? " keep-caps" : "",
 888                         (c->secure_bits & SECURE_KEEP_CAPS_LOCKED) ? " keep-caps-locked" : "",
 889                         (c->secure_bits & SECURE_NO_SETUID_FIXUP) ? " no-setuid-fixup" : "",
 890                         (c->secure_bits & SECURE_NO_SETUID_FIXUP_LOCKED) ? " no-setuid-fixup-locked" : "",
 891                         (c->secure_bits & SECURE_NOROOT) ? " noroot" : "",
 892                         (c->secure_bits & SECURE_NOROOT_LOCKED) ? "noroot-locked" : "");
 893
 894         if (c->capability_bounding_set_drop) {
 895                 fprintf(f, "%sCapabilityBoundingSetDrop:", prefix);
 896
 897                 for (i = 0; i <= CAP_LAST_CAP; i++)
 898                         if (c->capability_bounding_set_drop & (1 << i)) {
 899                                 char *t;
 900
 901                                 if ((t = cap_to_name(i))) {
 902                                         fprintf(f, " %s", t);
 903                                         free(t);
 904                                 }
 905                         }
 906
 907                 fputs("\n", f);
 908         }
 909
 910         if (c->user)
 911                 fprintf(f, "%sUser: %s", prefix, c->user);
 912         if (c->group)
 913                 fprintf(f, "%sGroup: %s", prefix, c->group);
 914
 915         if (c->supplementary_groups) {
 916                 char **g;
 917
 918                 fprintf(f, "%sSupplementaryGroups:", prefix);
 919
 920                 STRV_FOREACH(g, c->supplementary_groups)
 921                         fprintf(f, " %s", *g);
 922
 923                 fputs("\n", f);
 924         }
 925 }
 926
 927 void exec_status_fill(ExecStatus *s, pid_t pid, int code, int status) {
 928         assert(s);
 929
 930         s->pid = pid;
 931         s->exit_timestamp = now(CLOCK_REALTIME);
 932
 933         s->code = code;
 934         s->status = status;
 935 }
 936
 937 void exec_status_dump(ExecStatus *s, FILE *f, const char *prefix) {
 938         char buf[FORMAT_TIMESTAMP_MAX];
 939
 940         assert(s);
 941         assert(f);
 942
 943         if (!prefix)
 944                 prefix = "";
 945
 946         if (s->pid <= 0)
 947                 return;
 948
 949         fprintf(f,
 950                 "%sPID: %llu\n",
 951                 prefix, (unsigned long long) s->pid);
 952
 953         if (s->start_timestamp > 0)
 954                 fprintf(f,
 955                         "%sStart Timestamp: %s\n",
 956                         prefix, format_timestamp(buf, sizeof(buf), s->start_timestamp));
 957
 958         if (s->exit_timestamp > 0)
 959                 fprintf(f,
 960                         "%sExit Timestamp: %s\n"
 961                         "%sExit Code: %s\n"
 962                         "%sExit Status: %i\n",
 963                         prefix, format_timestamp(buf, sizeof(buf), s->exit_timestamp),
 964                         prefix, sigchld_code_to_string(s->code),
 965                         prefix, s->status);
 966 }
 967
 968 char *exec_command_line(ExecCommand *c) {
 969         size_t k;
 970         char *n, *p, **a;
 971         bool first = true;
 972
 973         assert(c);
 974         assert(c->argv);
 975
 976         k = 1;
 977         STRV_FOREACH(a, c->argv)
 978                 k += strlen(*a)+3;
 979
 980         if (!(n = new(char, k)))
 981                 return NULL;
 982
 983         p = n;
 984         STRV_FOREACH(a, c->argv) {
 985
 986                 if (!first)
 987                         *(p++) = ' ';
 988                 else
 989                         first = false;
 990
 991                 if (strpbrk(*a, WHITESPACE)) {
 992                         *(p++) = '\'';
 993                         p = stpcpy(p, *a);
 994                         *(p++) = '\'';
 995                 } else
 996                         p = stpcpy(p, *a);
 997
 998         }
 999
1000         *p = 0;
1001
1002         /* FIXME: this doesn't really handle arguments that have
1003          * spaces and ticks in them */
1004
1005         return n;
1006 }
1007
1008 void exec_command_dump(ExecCommand *c, FILE *f, const char *prefix) {
1009         char *p2;
1010         const char *prefix2;
1011
1012         char *cmd;
1013
1014         assert(c);
1015         assert(f);
1016
1017         if (!prefix)
1018                 prefix = "";
1019         p2 = strappend(prefix, "\t");
1020         prefix2 = p2 ? p2 : prefix;
1021
1022         cmd = exec_command_line(c);
1023
1024         fprintf(f,
1025                 "%sCommand Line: %s\n",
1026                 prefix, cmd ? cmd : strerror(ENOMEM));
1027
1028         free(cmd);
1029
1030         exec_status_dump(&c->exec_status, f, prefix2);
1031
1032         free(p2);
1033 }
1034
1035 void exec_command_dump_list(ExecCommand *c, FILE *f, const char *prefix) {
1036         assert(f);
1037
1038         if (!prefix)
1039                 prefix = "";
1040
1041         LIST_FOREACH(command, c, c)
1042                 exec_command_dump(c, f, prefix);
1043 }
1044
1045 void exec_command_append_list(ExecCommand **l, ExecCommand *e) {
1046         ExecCommand *end;
1047
1048         assert(l);
1049         assert(e);
1050
1051         if (*l) {
1052                 /* It's kinda important that we keep the order here */
1053                 LIST_FIND_TAIL(ExecCommand, command, *l, end);
1054                 LIST_INSERT_AFTER(ExecCommand, command, *l, end, e);
1055         } else
1056               *l = e;
1057 }
1058
1059 static const char* const exec_output_table[_EXEC_OUTPUT_MAX] = {
1060         [EXEC_OUTPUT_CONSOLE] = "console",
1061         [EXEC_OUTPUT_NULL] = "null",
1062         [EXEC_OUTPUT_SYSLOG] = "syslog",
1063         [EXEC_OUTPUT_KERNEL] = "kernel"
1064 };
1065
1066 DEFINE_STRING_TABLE_LOOKUP(exec_output, ExecOutput);
1067
1068 static const char* const exec_input_table[_EXEC_INPUT_MAX] = {
1069         [EXEC_INPUT_NULL] = "null",
1070         [EXEC_INPUT_CONSOLE] = "console"
1071 };
1072
1073 DEFINE_STRING_TABLE_LOOKUP(exec_input, ExecInput);