src/service.c

   1 /*-*- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil -*-*/
   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 <errno.h>
  23 #include <signal.h>
  24 #include <dirent.h>
  25 #include <unistd.h>
  26
  27 #include "unit.h"
  28 #include "service.h"
  29 #include "load-fragment.h"
  30 #include "load-dropin.h"
  31 #include "log.h"
  32 #include "strv.h"
  33 #include "unit-name.h"
  34 #include "dbus-service.h"
  35 #include "special.h"
  36 #include "bus-errors.h"
  37 #include "exit-status.h"
  38 #include "def.h"
  39 #include "util.h"
  40
  41 #ifdef HAVE_SYSV_COMPAT
  42
  43 #define DEFAULT_SYSV_TIMEOUT_USEC (5*USEC_PER_MINUTE)
  44
  45 typedef enum RunlevelType {
  46         RUNLEVEL_UP,
  47         RUNLEVEL_DOWN,
  48         RUNLEVEL_SYSINIT
  49 } RunlevelType;
  50
  51 static const struct {
  52         const char *path;
  53         const char *target;
  54         const RunlevelType type;
  55 } rcnd_table[] = {
  56         /* Standard SysV runlevels for start-up */
  57         { "rc1.d",  SPECIAL_RESCUE_TARGET,    RUNLEVEL_UP },
  58         { "rc2.d",  SPECIAL_RUNLEVEL2_TARGET, RUNLEVEL_UP },
  59         { "rc3.d",  SPECIAL_RUNLEVEL3_TARGET, RUNLEVEL_UP },
  60         { "rc4.d",  SPECIAL_RUNLEVEL4_TARGET, RUNLEVEL_UP },
  61         { "rc5.d",  SPECIAL_RUNLEVEL5_TARGET, RUNLEVEL_UP },
  62
  63 #ifdef TARGET_SUSE
  64         /* SUSE style boot.d */
  65         { "boot.d", SPECIAL_SYSINIT_TARGET,   RUNLEVEL_SYSINIT },
  66 #endif
  67
  68 #if defined(TARGET_DEBIAN) || defined(TARGET_UBUNTU) || defined(TARGET_FRUGALWARE) || defined(TARGET_ANGSTROM)
  69         /* Debian style rcS.d */
  70         { "rcS.d",  SPECIAL_SYSINIT_TARGET,   RUNLEVEL_SYSINIT },
  71 #endif
  72
  73         /* Standard SysV runlevels for shutdown */
  74         { "rc0.d",  SPECIAL_POWEROFF_TARGET,  RUNLEVEL_DOWN },
  75         { "rc6.d",  SPECIAL_REBOOT_TARGET,    RUNLEVEL_DOWN }
  76
  77         /* Note that the order here matters, as we read the
  78            directories in this order, and we want to make sure that
  79            sysv_start_priority is known when we first load the
  80            unit. And that value we only know from S links. Hence
  81            UP/SYSINIT must be read before DOWN */
  82 };
  83
  84 #define RUNLEVELS_UP "12345"
  85 /* #define RUNLEVELS_DOWN "06" */
  86 /* #define RUNLEVELS_BOOT "bBsS" */
  87 #endif
  88
  89 static const UnitActiveState state_translation_table[_SERVICE_STATE_MAX] = {
  90         [SERVICE_DEAD] = UNIT_INACTIVE,
  91         [SERVICE_START_PRE] = UNIT_ACTIVATING,
  92         [SERVICE_START] = UNIT_ACTIVATING,
  93         [SERVICE_START_POST] = UNIT_ACTIVATING,
  94         [SERVICE_RUNNING] = UNIT_ACTIVE,
  95         [SERVICE_EXITED] = UNIT_ACTIVE,
  96         [SERVICE_RELOAD] = UNIT_RELOADING,
  97         [SERVICE_STOP] = UNIT_DEACTIVATING,
  98         [SERVICE_STOP_SIGTERM] = UNIT_DEACTIVATING,
  99         [SERVICE_STOP_SIGKILL] = UNIT_DEACTIVATING,
 100         [SERVICE_STOP_POST] = UNIT_DEACTIVATING,
 101         [SERVICE_FINAL_SIGTERM] = UNIT_DEACTIVATING,
 102         [SERVICE_FINAL_SIGKILL] = UNIT_DEACTIVATING,
 103         [SERVICE_FAILED] = UNIT_FAILED,
 104         [SERVICE_AUTO_RESTART] = UNIT_ACTIVATING
 105 };
 106
 107 static void service_init(Unit *u) {
 108         Service *s = SERVICE(u);
 109
 110         assert(u);
 111         assert(u->meta.load_state == UNIT_STUB);
 112
 113         s->timeout_usec = DEFAULT_TIMEOUT_USEC;
 114         s->restart_usec = DEFAULT_RESTART_USEC;
 115         s->timer_watch.type = WATCH_INVALID;
 116 #ifdef HAVE_SYSV_COMPAT
 117         s->sysv_start_priority = -1;
 118         s->sysv_start_priority_from_rcnd = -1;
 119 #endif
 120         s->socket_fd = -1;
 121         s->guess_main_pid = true;
 122
 123         exec_context_init(&s->exec_context);
 124         s->exec_context.std_output = u->meta.manager->default_std_output;
 125         s->exec_context.std_error = u->meta.manager->default_std_error;
 126
 127         RATELIMIT_INIT(s->ratelimit, 10*USEC_PER_SEC, 5);
 128
 129         s->control_command_id = _SERVICE_EXEC_COMMAND_INVALID;
 130 }
 131
 132 static void service_unwatch_control_pid(Service *s) {
 133         assert(s);
 134
 135         if (s->control_pid <= 0)
 136                 return;
 137
 138         unit_unwatch_pid(UNIT(s), s->control_pid);
 139         s->control_pid = 0;
 140 }
 141
 142 static void service_unwatch_main_pid(Service *s) {
 143         assert(s);
 144
 145         if (s->main_pid <= 0)
 146                 return;
 147
 148         unit_unwatch_pid(UNIT(s), s->main_pid);
 149         s->main_pid = 0;
 150 }
 151
 152 static int service_set_main_pid(Service *s, pid_t pid) {
 153         pid_t ppid;
 154
 155         assert(s);
 156
 157         if (pid <= 1)
 158                 return -EINVAL;
 159
 160         if (pid == getpid())
 161                 return -EINVAL;
 162
 163         s->main_pid = pid;
 164         s->main_pid_known = true;
 165
 166         if (get_parent_of_pid(pid, &ppid) >= 0 && ppid != getpid()) {
 167                 log_warning("%s: Supervising process %lu which is not our child. We'll most likely not notice when it exits.",
 168                             s->meta.id, (unsigned long) pid);
 169
 170                 s->main_pid_alien = true;
 171         } else
 172                 s->main_pid_alien = false;
 173
 174         exec_status_start(&s->main_exec_status, pid);
 175
 176         return 0;
 177 }
 178
 179 static void service_close_socket_fd(Service *s) {
 180         assert(s);
 181
 182         if (s->socket_fd < 0)
 183                 return;
 184
 185         close_nointr_nofail(s->socket_fd);
 186         s->socket_fd = -1;
 187 }
 188
 189 static void service_connection_unref(Service *s) {
 190         assert(s);
 191
 192         if (!s->accept_socket)
 193                 return;
 194
 195         socket_connection_unref(s->accept_socket);
 196         s->accept_socket = NULL;
 197 }
 198
 199 static void service_done(Unit *u) {
 200         Service *s = SERVICE(u);
 201
 202         assert(s);
 203
 204         free(s->pid_file);
 205         s->pid_file = NULL;
 206
 207 #ifdef HAVE_SYSV_COMPAT
 208         free(s->sysv_path);
 209         s->sysv_path = NULL;
 210
 211         free(s->sysv_runlevels);
 212         s->sysv_runlevels = NULL;
 213 #endif
 214
 215         free(s->status_text);
 216         s->status_text = NULL;
 217
 218         exec_context_done(&s->exec_context);
 219         exec_command_free_array(s->exec_command, _SERVICE_EXEC_COMMAND_MAX);
 220         s->control_command = NULL;
 221         s->main_command = NULL;
 222
 223         /* This will leak a process, but at least no memory or any of
 224          * our resources */
 225         service_unwatch_main_pid(s);
 226         service_unwatch_control_pid(s);
 227
 228         if (s->bus_name)  {
 229                 unit_unwatch_bus_name(UNIT(u), s->bus_name);
 230                 free(s->bus_name);
 231                 s->bus_name = NULL;
 232         }
 233
 234         service_close_socket_fd(s);
 235         service_connection_unref(s);
 236
 237         set_free(s->configured_sockets);
 238
 239         unit_unwatch_timer(u, &s->timer_watch);
 240 }
 241
 242 #ifdef HAVE_SYSV_COMPAT
 243 static char *sysv_translate_name(const char *name) {
 244         char *r;
 245
 246         if (!(r = new(char, strlen(name) + sizeof(".service"))))
 247                 return NULL;
 248
 249 #if defined(TARGET_DEBIAN) || defined(TARGET_UBUNTU) || defined(TARGET_ANGSTROM)
 250         if (endswith(name, ".sh"))
 251                 /* Drop Debian-style .sh suffix */
 252                 strcpy(stpcpy(r, name) - 3, ".service");
 253 #endif
 254 #ifdef TARGET_SUSE
 255         if (startswith(name, "boot."))
 256                 /* Drop SuSE-style boot. prefix */
 257                 strcpy(stpcpy(r, name + 5), ".service");
 258 #endif
 259 #ifdef TARGET_FRUGALWARE
 260         if (startswith(name, "rc."))
 261                 /* Drop Frugalware-style rc. prefix */
 262                 strcpy(stpcpy(r, name + 3), ".service");
 263 #endif
 264         else
 265                 /* Normal init scripts */
 266                 strcpy(stpcpy(r, name), ".service");
 267
 268         return r;
 269 }
 270
 271 static int sysv_translate_facility(const char *name, const char *filename, char **_r) {
 272
 273         /* We silently ignore the $ prefix here. According to the LSB
 274          * spec it simply indicates whether something is a
 275          * standardized name or a distribution-specific one. Since we
 276          * just follow what already exists and do not introduce new
 277          * uses or names we don't care who introduced a new name. */
 278
 279         static const char * const table[] = {
 280                 /* LSB defined facilities */
 281                 "local_fs",             SPECIAL_LOCAL_FS_TARGET,
 282 #ifndef TARGET_MANDRIVA
 283                 /* Due to unfortunate name selection in Mandriva,
 284                  * $network is provided by network-up which is ordered
 285                  * after network which actually starts interfaces.
 286                  * To break the loop, just ignore it */
 287                 "network",              SPECIAL_NETWORK_TARGET,
 288 #endif
 289                 "named",                SPECIAL_NSS_LOOKUP_TARGET,
 290                 "portmap",              SPECIAL_RPCBIND_TARGET,
 291                 "remote_fs",            SPECIAL_REMOTE_FS_TARGET,
 292                 "syslog",               SPECIAL_SYSLOG_TARGET,
 293                 "time",                 SPECIAL_TIME_SYNC_TARGET,
 294
 295                 /* common extensions */
 296                 "mail-transfer-agent",  SPECIAL_MAIL_TRANSFER_AGENT_TARGET,
 297                 "x-display-manager",    SPECIAL_DISPLAY_MANAGER_SERVICE,
 298                 "null",                 NULL,
 299
 300 #if defined(TARGET_DEBIAN) || defined(TARGET_UBUNTU) || defined(TARGET_ANGSTROM)
 301                 "mail-transport-agent", SPECIAL_MAIL_TRANSFER_AGENT_TARGET,
 302 #endif
 303
 304 #ifdef TARGET_FEDORA
 305                 "MTA",                  SPECIAL_MAIL_TRANSFER_AGENT_TARGET,
 306                 "smtpdaemon",           SPECIAL_MAIL_TRANSFER_AGENT_TARGET,
 307                 "httpd",                SPECIAL_HTTP_DAEMON_TARGET,
 308 #endif
 309
 310 #ifdef TARGET_SUSE
 311                 "smtp",                 SPECIAL_MAIL_TRANSFER_AGENT_TARGET,
 312 #endif
 313         };
 314
 315         unsigned i;
 316         char *r;
 317         const char *n;
 318
 319         assert(name);
 320         assert(_r);
 321
 322         n = *name == '$' ? name + 1 : name;
 323
 324         for (i = 0; i < ELEMENTSOF(table); i += 2) {
 325
 326                 if (!streq(table[i], n))
 327                         continue;
 328
 329                 if (!table[i+1])
 330                         return 0;
 331
 332                 if (!(r = strdup(table[i+1])))
 333                         return -ENOMEM;
 334
 335                 goto finish;
 336         }
 337
 338         /* If we don't know this name, fallback heuristics to figure
 339          * out whether something is a target or a service alias. */
 340
 341         if (*name == '$') {
 342                 if (!unit_prefix_is_valid(n))
 343                         return -EINVAL;
 344
 345                 /* Facilities starting with $ are most likely targets */
 346                 r = unit_name_build(n, NULL, ".target");
 347         } else if (filename && streq(name, filename))
 348                 /* Names equaling the file name of the services are redundant */
 349                 return 0;
 350         else
 351                 /* Everything else we assume to be normal service names */
 352                 r = sysv_translate_name(n);
 353
 354         if (!r)
 355                 return -ENOMEM;
 356
 357 finish:
 358         *_r = r;
 359
 360         return 1;
 361 }
 362
 363 static int sysv_fix_order(Service *s) {
 364         Meta *other;
 365         int r;
 366
 367         assert(s);
 368
 369         if (s->sysv_start_priority < 0)
 370                 return 0;
 371
 372         /* For each pair of services where at least one lacks a LSB
 373          * header, we use the start priority value to order things. */
 374
 375         LIST_FOREACH(units_by_type, other, s->meta.manager->units_by_type[UNIT_SERVICE]) {
 376                 Service *t;
 377                 UnitDependency d;
 378                 bool special_s, special_t;
 379
 380                 t = (Service*) other;
 381
 382                 if (s == t)
 383                         continue;
 384
 385                 if (t->meta.load_state != UNIT_LOADED)
 386                         continue;
 387
 388                 if (t->sysv_start_priority < 0)
 389                         continue;
 390
 391                 /* If both units have modern headers we don't care
 392                  * about the priorities */
 393                 if ((s->meta.fragment_path || s->sysv_has_lsb) &&
 394                     (t->meta.fragment_path || t->sysv_has_lsb))
 395                         continue;
 396
 397                 special_s = s->sysv_runlevels && !chars_intersect(RUNLEVELS_UP, s->sysv_runlevels);
 398                 special_t = t->sysv_runlevels && !chars_intersect(RUNLEVELS_UP, t->sysv_runlevels);
 399
 400                 if (special_t && !special_s)
 401                         d = UNIT_AFTER;
 402                 else if (special_s && !special_t)
 403                         d = UNIT_BEFORE;
 404                 else if (t->sysv_start_priority < s->sysv_start_priority)
 405                         d = UNIT_AFTER;
 406                 else if (t->sysv_start_priority > s->sysv_start_priority)
 407                         d = UNIT_BEFORE;
 408                 else
 409                         continue;
 410
 411                 /* FIXME: Maybe we should compare the name here lexicographically? */
 412
 413                 if ((r = unit_add_dependency(UNIT(s), d, UNIT(t), true)) < 0)
 414                         return r;
 415         }
 416
 417         return 0;
 418 }
 419
 420 static ExecCommand *exec_command_new(const char *path, const char *arg1) {
 421         ExecCommand *c;
 422
 423         if (!(c = new0(ExecCommand, 1)))
 424                 return NULL;
 425
 426         if (!(c->path = strdup(path))) {
 427                 free(c);
 428                 return NULL;
 429         }
 430
 431         if (!(c->argv = strv_new(path, arg1, NULL))) {
 432                 free(c->path);
 433                 free(c);
 434                 return NULL;
 435         }
 436
 437         return c;
 438 }
 439
 440 static int sysv_exec_commands(Service *s) {
 441         ExecCommand *c;
 442
 443         assert(s);
 444         assert(s->sysv_path);
 445
 446         if (!(c = exec_command_new(s->sysv_path, "start")))
 447                 return -ENOMEM;
 448         exec_command_append_list(s->exec_command+SERVICE_EXEC_START, c);
 449
 450         if (!(c = exec_command_new(s->sysv_path, "stop")))
 451                 return -ENOMEM;
 452         exec_command_append_list(s->exec_command+SERVICE_EXEC_STOP, c);
 453
 454         if (!(c = exec_command_new(s->sysv_path, "reload")))
 455                 return -ENOMEM;
 456         exec_command_append_list(s->exec_command+SERVICE_EXEC_RELOAD, c);
 457
 458         return 0;
 459 }
 460
 461 static int service_load_sysv_path(Service *s, const char *path) {
 462         FILE *f;
 463         Unit *u;
 464         unsigned line = 0;
 465         int r;
 466         enum {
 467                 NORMAL,
 468                 DESCRIPTION,
 469                 LSB,
 470                 LSB_DESCRIPTION
 471         } state = NORMAL;
 472         char *short_description = NULL, *long_description = NULL, *chkconfig_description = NULL, *description;
 473         struct stat st;
 474
 475         assert(s);
 476         assert(path);
 477
 478         u = UNIT(s);
 479
 480         if (!(f = fopen(path, "re"))) {
 481                 r = errno == ENOENT ? 0 : -errno;
 482                 goto finish;
 483         }
 484
 485         zero(st);
 486         if (fstat(fileno(f), &st) < 0) {
 487                 r = -errno;
 488                 goto finish;
 489         }
 490
 491         free(s->sysv_path);
 492         if (!(s->sysv_path = strdup(path))) {
 493                 r = -ENOMEM;
 494                 goto finish;
 495         }
 496
 497         s->sysv_mtime = timespec_load(&st.st_mtim);
 498
 499         if (null_or_empty(&st)) {
 500                 u->meta.load_state = UNIT_MASKED;
 501                 r = 0;
 502                 goto finish;
 503         }
 504
 505         while (!feof(f)) {
 506                 char l[LINE_MAX], *t;
 507
 508                 if (!fgets(l, sizeof(l), f)) {
 509                         if (feof(f))
 510                                 break;
 511
 512                         r = -errno;
 513                         log_error("Failed to read configuration file '%s': %s", path, strerror(-r));
 514                         goto finish;
 515                 }
 516
 517                 line++;
 518
 519                 t = strstrip(l);
 520                 if (*t != '#')
 521                         continue;
 522
 523                 if (state == NORMAL && streq(t, "### BEGIN INIT INFO")) {
 524                         state = LSB;
 525                         s->sysv_has_lsb = true;
 526                         continue;
 527                 }
 528
 529                 if ((state == LSB_DESCRIPTION || state == LSB) && streq(t, "### END INIT INFO")) {
 530                         state = NORMAL;
 531                         continue;
 532                 }
 533
 534                 t++;
 535                 t += strspn(t, WHITESPACE);
 536
 537                 if (state == NORMAL) {
 538
 539                         /* Try to parse Red Hat style chkconfig headers */
 540
 541                         if (startswith_no_case(t, "chkconfig:")) {
 542                                 int start_priority;
 543                                 char runlevels[16], *k;
 544
 545                                 state = NORMAL;
 546
 547                                 if (sscanf(t+10, "%15s %i %*i",
 548                                            runlevels,
 549                                            &start_priority) != 2) {
 550
 551                                         log_warning("[%s:%u] Failed to parse chkconfig line. Ignoring.", path, line);
 552                                         continue;
 553                                 }
 554
 555                                 /* A start priority gathered from the
 556                                  * symlink farms is preferred over the
 557                                  * data from the LSB header. */
 558                                 if (start_priority < 0 || start_priority > 99)
 559                                         log_warning("[%s:%u] Start priority out of range. Ignoring.", path, line);
 560                                 else
 561                                         s->sysv_start_priority = start_priority;
 562
 563                                 char_array_0(runlevels);
 564                                 k = delete_chars(runlevels, WHITESPACE "-");
 565
 566                                 if (k[0]) {
 567                                         char *d;
 568
 569                                         if (!(d = strdup(k))) {
 570                                                 r = -ENOMEM;
 571                                                 goto finish;
 572                                         }
 573
 574                                         free(s->sysv_runlevels);
 575                                         s->sysv_runlevels = d;
 576                                 }
 577
 578                         } else if (startswith_no_case(t, "description:")) {
 579
 580                                 size_t k = strlen(t);
 581                                 char *d;
 582                                 const char *j;
 583
 584                                 if (t[k-1] == '\\') {
 585                                         state = DESCRIPTION;
 586                                         t[k-1] = 0;
 587                                 }
 588
 589                                 if ((j = strstrip(t+12)) && *j) {
 590                                         if (!(d = strdup(j))) {
 591                                                 r = -ENOMEM;
 592                                                 goto finish;
 593                                         }
 594                                 } else
 595                                         d = NULL;
 596
 597                                 free(chkconfig_description);
 598                                 chkconfig_description = d;
 599
 600                         } else if (startswith_no_case(t, "pidfile:")) {
 601
 602                                 char *fn;
 603
 604                                 state = NORMAL;
 605
 606                                 fn = strstrip(t+8);
 607                                 if (!path_is_absolute(fn)) {
 608                                         log_warning("[%s:%u] PID file not absolute. Ignoring.", path, line);
 609                                         continue;
 610                                 }
 611
 612                                 if (!(fn = strdup(fn))) {
 613                                         r = -ENOMEM;
 614                                         goto finish;
 615                                 }
 616
 617                                 free(s->pid_file);
 618                                 s->pid_file = fn;
 619                         }
 620
 621                 } else if (state == DESCRIPTION) {
 622
 623                         /* Try to parse Red Hat style description
 624                          * continuation */
 625
 626                         size_t k = strlen(t);
 627                         char *j;
 628
 629                         if (t[k-1] == '\\')
 630                                 t[k-1] = 0;
 631                         else
 632                                 state = NORMAL;
 633
 634                         if ((j = strstrip(t)) && *j) {
 635                                 char *d = NULL;
 636
 637                                 if (chkconfig_description)
 638                                         d = join(chkconfig_description, " ", j, NULL);
 639                                 else
 640                                         d = strdup(j);
 641
 642                                 if (!d) {
 643                                         r = -ENOMEM;
 644                                         goto finish;
 645                                 }
 646
 647                                 free(chkconfig_description);
 648                                 chkconfig_description = d;
 649                         }
 650
 651                 } else if (state == LSB || state == LSB_DESCRIPTION) {
 652
 653                         if (startswith_no_case(t, "Provides:")) {
 654                                 char *i, *w;
 655                                 size_t z;
 656
 657                                 state = LSB;
 658
 659                                 FOREACH_WORD_QUOTED(w, z, t+9, i) {
 660                                         char *n, *m;
 661
 662                                         if (!(n = strndup(w, z))) {
 663                                                 r = -ENOMEM;
 664                                                 goto finish;
 665                                         }
 666
 667                                         r = sysv_translate_facility(n, file_name_from_path(path), &m);
 668                                         free(n);
 669
 670                                         if (r < 0)
 671                                                 goto finish;
 672
 673                                         if (r == 0)
 674                                                 continue;
 675
 676                                         if (unit_name_to_type(m) == UNIT_SERVICE)
 677                                                 r = unit_add_name(u, m);
 678                                         else
 679                                                 /* NB: SysV targets
 680                                                  * which are provided
 681                                                  * by a service are
 682                                                  * pulled in by the
 683                                                  * services, as an
 684                                                  * indication that the
 685                                                  * generic service is
 686                                                  * now available. This
 687                                                  * is strictly
 688                                                  * one-way. The
 689                                                  * targets do NOT pull
 690                                                  * in the SysV
 691                                                  * services! */
 692                                                 r = unit_add_two_dependencies_by_name(u, UNIT_BEFORE, UNIT_WANTS, m, NULL, true);
 693
 694                                         if (r < 0)
 695                                                 log_error("[%s:%u] Failed to add LSB Provides name %s, ignoring: %s", path, line, m, strerror(-r));
 696
 697                                         free(m);
 698                                 }
 699
 700                         } else if (startswith_no_case(t, "Required-Start:") ||
 701                                    startswith_no_case(t, "Should-Start:") ||
 702                                    startswith_no_case(t, "X-Start-Before:") ||
 703                                    startswith_no_case(t, "X-Start-After:")) {
 704                                 char *i, *w;
 705                                 size_t z;
 706
 707                                 state = LSB;
 708
 709                                 FOREACH_WORD_QUOTED(w, z, strchr(t, ':')+1, i) {
 710                                         char *n, *m;
 711
 712                                         if (!(n = strndup(w, z))) {
 713                                                 r = -ENOMEM;
 714                                                 goto finish;
 715                                         }
 716
 717                                         r = sysv_translate_facility(n, file_name_from_path(path), &m);
 718
 719                                         if (r < 0) {
 720                                                 log_error("[%s:%u] Failed to translate LSB dependency %s, ignoring: %s", path, line, n, strerror(-r));
 721                                                 free(n);
 722                                                 continue;
 723                                         }
 724
 725                                         free(n);
 726
 727                                         if (r == 0)
 728                                                 continue;
 729
 730                                         r = unit_add_dependency_by_name(u, startswith_no_case(t, "X-Start-Before:") ? UNIT_BEFORE : UNIT_AFTER, m, NULL, true);
 731
 732                                         if (r < 0)
 733                                                 log_error("[%s:%u] Failed to add dependency on %s, ignoring: %s", path, line, m, strerror(-r));
 734
 735                                         free(m);
 736                                 }
 737                         } else if (startswith_no_case(t, "Default-Start:")) {
 738                                 char *k, *d;
 739
 740                                 state = LSB;
 741
 742                                 k = delete_chars(t+14, WHITESPACE "-");
 743
 744                                 if (k[0] != 0) {
 745                                         if (!(d = strdup(k))) {
 746                                                 r = -ENOMEM;
 747                                                 goto finish;
 748                                         }
 749
 750                                         free(s->sysv_runlevels);
 751                                         s->sysv_runlevels = d;
 752                                 }
 753
 754                         } else if (startswith_no_case(t, "Description:")) {
 755                                 char *d, *j;
 756
 757                                 state = LSB_DESCRIPTION;
 758
 759                                 if ((j = strstrip(t+12)) && *j) {
 760                                         if (!(d = strdup(j))) {
 761                                                 r = -ENOMEM;
 762                                                 goto finish;
 763                                         }
 764                                 } else
 765                                         d = NULL;
 766
 767                                 free(long_description);
 768                                 long_description = d;
 769
 770                         } else if (startswith_no_case(t, "Short-Description:")) {
 771                                 char *d, *j;
 772
 773                                 state = LSB;
 774
 775                                 if ((j = strstrip(t+18)) && *j) {
 776                                         if (!(d = strdup(j))) {
 777                                                 r = -ENOMEM;
 778                                                 goto finish;
 779                                         }
 780                                 } else
 781                                         d = NULL;
 782
 783                                 free(short_description);
 784                                 short_description = d;
 785
 786                         } else if (startswith_no_case(t, "X-Interactive:")) {
 787                                 int b;
 788
 789                                 if ((b = parse_boolean(strstrip(t+14))) < 0) {
 790                                         log_warning("[%s:%u] Couldn't parse interactive flag. Ignoring.", path, line);
 791                                         continue;
 792                                 }
 793
 794                                 if (b)
 795                                         s->exec_context.std_input = EXEC_INPUT_TTY;
 796                                 else
 797                                         s->exec_context.std_input = EXEC_INPUT_NULL;
 798
 799                         } else if (state == LSB_DESCRIPTION) {
 800
 801                                 if (startswith(l, "#\t") || startswith(l, "#  ")) {
 802                                         char *j;
 803
 804                                         if ((j = strstrip(t)) && *j) {
 805                                                 char *d = NULL;
 806
 807                                                 if (long_description)
 808                                                         d = join(long_description, " ", t, NULL);
 809                                                 else
 810                                                         d = strdup(j);
 811
 812                                                 if (!d) {
 813                                                         r = -ENOMEM;
 814                                                         goto finish;
 815                                                 }
 816
 817                                                 free(long_description);
 818                                                 long_description = d;
 819                                         }
 820
 821                                 } else
 822                                         state = LSB;
 823                         }
 824                 }
 825         }
 826
 827         if ((r = sysv_exec_commands(s)) < 0)
 828                 goto finish;
 829
 830         if (s->sysv_runlevels && !chars_intersect(RUNLEVELS_UP, s->sysv_runlevels)) {
 831                 /* If there a runlevels configured for this service
 832                  * but none of the standard ones, then we assume this
 833                  * is some special kind of service (which might be
 834                  * needed for early boot) and don't create any links
 835                  * to it. */
 836
 837                 s->meta.default_dependencies = false;
 838
 839                 /* Don't timeout special services during boot (like fsck) */
 840                 s->timeout_usec = 0;
 841         } else
 842                 s->timeout_usec = DEFAULT_SYSV_TIMEOUT_USEC;
 843
 844         /* Special setting for all SysV services */
 845         s->type = SERVICE_FORKING;
 846         s->remain_after_exit = !s->pid_file;
 847         s->restart = SERVICE_RESTART_NO;
 848         s->exec_context.std_output =
 849                 (s->meta.manager->sysv_console || s->exec_context.std_input == EXEC_INPUT_TTY)
 850                 ? EXEC_OUTPUT_TTY : s->meta.manager->default_std_output;
 851         s->exec_context.kill_mode = KILL_PROCESS;
 852
 853         /* We use the long description only if
 854          * no short description is set. */
 855
 856         if (short_description)
 857                 description = short_description;
 858         else if (chkconfig_description)
 859                 description = chkconfig_description;
 860         else if (long_description)
 861                 description = long_description;
 862         else
 863                 description = NULL;
 864
 865         if (description) {
 866                 char *d;
 867
 868                 if (!(d = strappend(s->sysv_has_lsb ? "LSB: " : "SYSV: ", description))) {
 869                         r = -ENOMEM;
 870                         goto finish;
 871                 }
 872
 873                 u->meta.description = d;
 874         }
 875
 876         /* The priority that has been set in /etc/rcN.d/ hierarchies
 877          * takes precedence over what is stored as default in the LSB
 878          * header */
 879         if (s->sysv_start_priority_from_rcnd >= 0)
 880                 s->sysv_start_priority = s->sysv_start_priority_from_rcnd;
 881
 882         u->meta.load_state = UNIT_LOADED;
 883         r = 0;
 884
 885 finish:
 886
 887         if (f)
 888                 fclose(f);
 889
 890         free(short_description);
 891         free(long_description);
 892         free(chkconfig_description);
 893
 894         return r;
 895 }
 896
 897 static int service_load_sysv_name(Service *s, const char *name) {
 898         char **p;
 899
 900         assert(s);
 901         assert(name);
 902
 903         /* For SysV services we strip the boot.*, rc.* and *.sh
 904          * prefixes/suffixes. */
 905 #if defined(TARGET_DEBIAN) || defined(TARGET_UBUNTU) || defined(TARGET_ANGSTROM)
 906         if (endswith(name, ".sh.service"))
 907                 return -ENOENT;
 908 #endif
 909
 910 #ifdef TARGET_SUSE
 911         if (startswith(name, "boot."))
 912                 return -ENOENT;
 913 #endif
 914
 915 #ifdef TARGET_FRUGALWARE
 916         if (startswith(name, "rc."))
 917                 return -ENOENT;
 918 #endif
 919
 920         STRV_FOREACH(p, s->meta.manager->lookup_paths.sysvinit_path) {
 921                 char *path;
 922                 int r;
 923
 924                 path = join(*p, "/", name, NULL);
 925                 if (!path)
 926                         return -ENOMEM;
 927
 928                 assert(endswith(path, ".service"));
 929                 path[strlen(path)-8] = 0;
 930
 931                 r = service_load_sysv_path(s, path);
 932
 933 #if defined(TARGET_DEBIAN) || defined(TARGET_UBUNTU) || defined(TARGET_ANGSTROM)
 934                 if (r >= 0 && s->meta.load_state == UNIT_STUB) {
 935                         /* Try Debian style *.sh source'able init scripts */
 936                         strcat(path, ".sh");
 937                         r = service_load_sysv_path(s, path);
 938                 }
 939 #endif
 940                 free(path);
 941
 942 #ifdef TARGET_SUSE
 943                 if (r >= 0 && s->meta.load_state == UNIT_STUB) {
 944                         /* Try SUSE style boot.* init scripts */
 945
 946                         path = join(*p, "/boot.", name, NULL);
 947                         if (!path)
 948                                 return -ENOMEM;
 949
 950                         /* Drop .service suffix */
 951                         path[strlen(path)-8] = 0;
 952                         r = service_load_sysv_path(s, path);
 953                         free(path);
 954                 }
 955 #endif
 956
 957 #ifdef TARGET_FRUGALWARE
 958                 if (r >= 0 && s->meta.load_state == UNIT_STUB) {
 959                         /* Try Frugalware style rc.* init scripts */
 960
 961                         path = join(*p, "/rc.", name, NULL);
 962                         if (!path)
 963                                 return -ENOMEM;
 964
 965                         /* Drop .service suffix */
 966                         path[strlen(path)-8] = 0;
 967                         r = service_load_sysv_path(s, path);
 968                         free(path);
 969                 }
 970 #endif
 971
 972                 if (r < 0)
 973                         return r;
 974
 975                 if ((s->meta.load_state != UNIT_STUB))
 976                         break;
 977         }
 978
 979         return 0;
 980 }
 981
 982 static int service_load_sysv(Service *s) {
 983         const char *t;
 984         Iterator i;
 985         int r;
 986
 987         assert(s);
 988
 989         /* Load service data from SysV init scripts, preferably with
 990          * LSB headers ... */
 991
 992         if (strv_isempty(s->meta.manager->lookup_paths.sysvinit_path))
 993                 return 0;
 994
 995         if ((t = s->meta.id))
 996                 if ((r = service_load_sysv_name(s, t)) < 0)
 997                         return r;
 998
 999         if (s->meta.load_state == UNIT_STUB)
1000                 SET_FOREACH(t, s->meta.names, i) {
1001                         if (t == s->meta.id)
1002                                 continue;
1003
1004                         if ((r = service_load_sysv_name(s, t)) < 0)
1005                                 return r;
1006
1007                         if (s->meta.load_state != UNIT_STUB)
1008                                 break;
1009                 }
1010
1011         return 0;
1012 }
1013 #endif
1014
1015 static int fsck_fix_order(Service *s) {
1016         Meta *other;
1017         int r;
1018
1019         assert(s);
1020
1021         if (s->fsck_passno <= 0)
1022                 return 0;
1023
1024         /* For each pair of services where both have an fsck priority
1025          * we order things based on it. */
1026
1027         LIST_FOREACH(units_by_type, other, s->meta.manager->units_by_type[UNIT_SERVICE]) {
1028                 Service *t;
1029                 UnitDependency d;
1030
1031                 t = (Service*) other;
1032
1033                 if (s == t)
1034                         continue;
1035
1036                 if (t->meta.load_state != UNIT_LOADED)
1037                         continue;
1038
1039                 if (t->fsck_passno <= 0)
1040                         continue;
1041
1042                 if (t->fsck_passno < s->fsck_passno)
1043                         d = UNIT_AFTER;
1044                 else if (t->fsck_passno > s->fsck_passno)
1045                         d = UNIT_BEFORE;
1046                 else
1047                         continue;
1048
1049                 if ((r = unit_add_dependency(UNIT(s), d, UNIT(t), true)) < 0)
1050                         return r;
1051         }
1052
1053         return 0;
1054 }
1055
1056 static int service_verify(Service *s) {
1057         assert(s);
1058
1059         if (s->meta.load_state != UNIT_LOADED)
1060                 return 0;
1061
1062         if (!s->exec_command[SERVICE_EXEC_START]) {
1063                 log_error("%s lacks ExecStart setting. Refusing.", s->meta.id);
1064                 return -EINVAL;
1065         }
1066
1067         if (s->type != SERVICE_ONESHOT &&
1068             s->exec_command[SERVICE_EXEC_START]->command_next) {
1069                 log_error("%s has more than one ExecStart setting, which is only allowed for Type=oneshot services. Refusing.", s->meta.id);
1070                 return -EINVAL;
1071         }
1072
1073         if (s->type == SERVICE_ONESHOT &&
1074             s->exec_command[SERVICE_EXEC_RELOAD]) {
1075                 log_error("%s has an ExecReload setting, which is not allowed for Type=oneshot services. Refusing.", s->meta.id);
1076                 return -EINVAL;
1077         }
1078
1079         if (s->type == SERVICE_DBUS && !s->bus_name) {
1080                 log_error("%s is of type D-Bus but no D-Bus service name has been specified. Refusing.", s->meta.id);
1081                 return -EINVAL;
1082         }
1083
1084         if (s->exec_context.pam_name && s->exec_context.kill_mode != KILL_CONTROL_GROUP) {
1085                 log_error("%s has PAM enabled. Kill mode must be set to 'control-group'. Refusing.", s->meta.id);
1086                 return -EINVAL;
1087         }
1088
1089         return 0;
1090 }
1091
1092 static int service_add_default_dependencies(Service *s) {
1093         int r;
1094
1095         assert(s);
1096
1097         /* Add a number of automatic dependencies useful for the
1098          * majority of services. */
1099
1100         /* First, pull in base system */
1101         if (s->meta.manager->running_as == MANAGER_SYSTEM) {
1102
1103                 if ((r = unit_add_two_dependencies_by_name(UNIT(s), UNIT_AFTER, UNIT_REQUIRES, SPECIAL_BASIC_TARGET, NULL, true)) < 0)
1104                         return r;
1105
1106         } else if (s->meta.manager->running_as == MANAGER_USER) {
1107
1108                 if ((r = unit_add_two_dependencies_by_name(UNIT(s), UNIT_AFTER, UNIT_REQUIRES, SPECIAL_SOCKETS_TARGET, NULL, true)) < 0)
1109                         return r;
1110         }
1111
1112         /* Second, activate normal shutdown */
1113         return unit_add_two_dependencies_by_name(UNIT(s), UNIT_BEFORE, UNIT_CONFLICTS, SPECIAL_SHUTDOWN_TARGET, NULL, true);
1114 }
1115
1116 static int service_load(Unit *u) {
1117         int r;
1118         Service *s = SERVICE(u);
1119
1120         assert(s);
1121
1122         /* Load a .service file */
1123         if ((r = unit_load_fragment(u)) < 0)
1124                 return r;
1125
1126 #ifdef HAVE_SYSV_COMPAT
1127         /* Load a classic init script as a fallback, if we couldn't find anything */
1128         if (u->meta.load_state == UNIT_STUB)
1129                 if ((r = service_load_sysv(s)) < 0)
1130                         return r;
1131 #endif
1132
1133         /* Still nothing found? Then let's give up */
1134         if (u->meta.load_state == UNIT_STUB)
1135                 return -ENOENT;
1136
1137         /* We were able to load something, then let's add in the
1138          * dropin directories. */
1139         if ((r = unit_load_dropin(unit_follow_merge(u))) < 0)
1140                 return r;
1141
1142         /* This is a new unit? Then let's add in some extras */
1143         if (u->meta.load_state == UNIT_LOADED) {
1144                 if ((r = unit_add_exec_dependencies(u, &s->exec_context)) < 0)
1145                         return r;
1146
1147                 if ((r = unit_add_default_cgroups(u)) < 0)
1148                         return r;
1149
1150 #ifdef HAVE_SYSV_COMPAT
1151                 if ((r = sysv_fix_order(s)) < 0)
1152                         return r;
1153 #endif
1154
1155                 if ((r = fsck_fix_order(s)) < 0)
1156                         return r;
1157
1158                 if (s->bus_name)
1159                         if ((r = unit_watch_bus_name(u, s->bus_name)) < 0)
1160                                 return r;
1161
1162                 if (s->type == SERVICE_NOTIFY && s->notify_access == NOTIFY_NONE)
1163                         s->notify_access = NOTIFY_MAIN;
1164
1165                 if (s->type == SERVICE_DBUS || s->bus_name)
1166                         if ((r = unit_add_two_dependencies_by_name(u, UNIT_AFTER, UNIT_REQUIRES, SPECIAL_DBUS_SOCKET, NULL, true)) < 0)
1167                                 return r;
1168
1169                 if (s->meta.default_dependencies)
1170                         if ((r = service_add_default_dependencies(s)) < 0)
1171                                 return r;
1172         }
1173
1174         return service_verify(s);
1175 }
1176
1177 static void service_dump(Unit *u, FILE *f, const char *prefix) {
1178
1179         ServiceExecCommand c;
1180         Service *s = SERVICE(u);
1181         const char *prefix2;
1182         char *p2;
1183
1184         assert(s);
1185
1186         p2 = strappend(prefix, "\t");
1187         prefix2 = p2 ? p2 : prefix;
1188
1189         fprintf(f,
1190                 "%sService State: %s\n"
1191                 "%sPermissionsStartOnly: %s\n"
1192                 "%sRootDirectoryStartOnly: %s\n"
1193                 "%sRemainAfterExit: %s\n"
1194                 "%sGuessMainPID: %s\n"
1195                 "%sType: %s\n"
1196                 "%sRestart: %s\n"
1197                 "%sNotifyAccess: %s\n",
1198                 prefix, service_state_to_string(s->state),
1199                 prefix, yes_no(s->permissions_start_only),
1200                 prefix, yes_no(s->root_directory_start_only),
1201                 prefix, yes_no(s->remain_after_exit),
1202                 prefix, yes_no(s->guess_main_pid),
1203                 prefix, service_type_to_string(s->type),
1204                 prefix, service_restart_to_string(s->restart),
1205                 prefix, notify_access_to_string(s->notify_access));
1206
1207         if (s->control_pid > 0)
1208                 fprintf(f,
1209                         "%sControl PID: %lu\n",
1210                         prefix, (unsigned long) s->control_pid);
1211
1212         if (s->main_pid > 0)
1213                 fprintf(f,
1214                         "%sMain PID: %lu\n"
1215                         "%sMain PID Known: %s\n"
1216                         "%sMain PID Alien: %s\n",
1217                         prefix, (unsigned long) s->main_pid,
1218                         prefix, yes_no(s->main_pid_known),
1219                         prefix, yes_no(s->main_pid_alien));
1220
1221         if (s->pid_file)
1222                 fprintf(f,
1223                         "%sPIDFile: %s\n",
1224                         prefix, s->pid_file);
1225
1226         if (s->bus_name)
1227                 fprintf(f,
1228                         "%sBusName: %s\n"
1229                         "%sBus Name Good: %s\n",
1230                         prefix, s->bus_name,
1231                         prefix, yes_no(s->bus_name_good));
1232
1233         exec_context_dump(&s->exec_context, f, prefix);
1234
1235         for (c = 0; c < _SERVICE_EXEC_COMMAND_MAX; c++) {
1236
1237                 if (!s->exec_command[c])
1238                         continue;
1239
1240                 fprintf(f, "%s-> %s:\n",
1241                         prefix, service_exec_command_to_string(c));
1242
1243                 exec_command_dump_list(s->exec_command[c], f, prefix2);
1244         }
1245
1246 #ifdef HAVE_SYSV_COMPAT
1247         if (s->sysv_path)
1248                 fprintf(f,
1249                         "%sSysV Init Script Path: %s\n"
1250                         "%sSysV Init Script has LSB Header: %s\n"
1251                         "%sSysVEnabled: %s\n",
1252                         prefix, s->sysv_path,
1253                         prefix, yes_no(s->sysv_has_lsb),
1254                         prefix, yes_no(s->sysv_enabled));
1255
1256         if (s->sysv_start_priority >= 0)
1257                 fprintf(f,
1258                         "%sSysVStartPriority: %i\n",
1259                         prefix, s->sysv_start_priority);
1260
1261         if (s->sysv_runlevels)
1262                 fprintf(f, "%sSysVRunLevels: %s\n",
1263                         prefix, s->sysv_runlevels);
1264 #endif
1265
1266         if (s->fsck_passno > 0)
1267                 fprintf(f,
1268                         "%sFsckPassNo: %i\n",
1269                         prefix, s->fsck_passno);
1270
1271         if (s->status_text)
1272                 fprintf(f, "%sStatus Text: %s\n",
1273                         prefix, s->status_text);
1274
1275         free(p2);
1276 }
1277
1278 static int service_load_pid_file(Service *s) {
1279         char *k;
1280         int r;
1281         pid_t pid;
1282
1283         assert(s);
1284
1285         if (s->main_pid_known)
1286                 return 0;
1287
1288         if (!s->pid_file)
1289                 return 0;
1290
1291         if ((r = read_one_line_file(s->pid_file, &k)) < 0)
1292                 return r;
1293
1294         r = parse_pid(k, &pid);
1295         free(k);
1296
1297         if (r < 0)
1298                 return r;
1299
1300         if (kill(pid, 0) < 0 && errno != EPERM) {
1301                 log_warning("PID %lu read from file %s does not exist. Your service or init script might be broken.",
1302                             (unsigned long) pid, s->pid_file);
1303                 return -ESRCH;
1304         }
1305
1306         if ((r = service_set_main_pid(s, pid)) < 0)
1307                 return r;
1308
1309         if ((r = unit_watch_pid(UNIT(s), pid)) < 0)
1310                 /* FIXME: we need to do something here */
1311                 return r;
1312
1313         return 0;
1314 }
1315
1316 static int service_search_main_pid(Service *s) {
1317         pid_t pid;
1318         int r;
1319
1320         assert(s);
1321
1322         /* If we know it anyway, don't ever fallback to unreliable
1323          * heuristics */
1324         if (s->main_pid_known)
1325                 return 0;
1326
1327         if (!s->guess_main_pid)
1328                 return 0;
1329
1330         assert(s->main_pid <= 0);
1331
1332         if ((pid = cgroup_bonding_search_main_pid_list(s->meta.cgroup_bondings)) <= 0)
1333                 return -ENOENT;
1334
1335         if ((r = service_set_main_pid(s, pid)) < 0)
1336                 return r;
1337
1338         if ((r = unit_watch_pid(UNIT(s), pid)) < 0)
1339                 /* FIXME: we need to do something here */
1340                 return r;
1341
1342         return 0;
1343 }
1344
1345 static int service_get_sockets(Service *s, Set **_set) {
1346         Set *set;
1347         Iterator i;
1348         char *t;
1349         int r;
1350
1351         assert(s);
1352         assert(_set);
1353
1354         if (s->socket_fd >= 0)
1355                 return 0;
1356
1357         if (!set_isempty(s->configured_sockets))
1358                 return 0;
1359
1360         /* Collects all Socket objects that belong to this
1361          * service. Note that a service might have multiple sockets
1362          * via multiple names. */
1363
1364         if (!(set = set_new(NULL, NULL)))
1365                 return -ENOMEM;
1366
1367         SET_FOREACH(t, s->meta.names, i) {
1368                 char *k;
1369                 Unit *p;
1370
1371                 /* Look for all socket objects that go by any of our
1372                  * units and collect their fds */
1373
1374                 if (!(k = unit_name_change_suffix(t, ".socket"))) {
1375                         r = -ENOMEM;
1376                         goto fail;
1377                 }
1378
1379                 p = manager_get_unit(s->meta.manager, k);
1380                 free(k);
1381
1382                 if (!p)
1383                         continue;
1384
1385                 if ((r = set_put(set, p)) < 0)
1386                         goto fail;
1387         }
1388
1389         *_set = set;
1390         return 0;
1391
1392 fail:
1393         set_free(set);
1394         return r;
1395 }
1396
1397 static int service_notify_sockets_dead(Service *s) {
1398         Iterator i;
1399         Set *set, *free_set = NULL;
1400         Socket *sock;
1401         int r;
1402
1403         assert(s);
1404
1405         /* Notifies all our sockets when we die */
1406
1407         if (s->socket_fd >= 0)
1408                 return 0;
1409
1410         if (!set_isempty(s->configured_sockets))
1411                 set = s->configured_sockets;
1412         else {
1413                 if ((r = service_get_sockets(s, &free_set)) < 0)
1414                         return r;
1415
1416                 set = free_set;
1417         }
1418
1419         SET_FOREACH(sock, set, i)
1420                 socket_notify_service_dead(sock);
1421
1422         set_free(free_set);
1423
1424         return 0;
1425 }
1426
1427 static void service_set_state(Service *s, ServiceState state) {
1428         ServiceState old_state;
1429         assert(s);
1430
1431         old_state = s->state;
1432         s->state = state;
1433
1434         if (state != SERVICE_START_PRE &&
1435             state != SERVICE_START &&
1436             state != SERVICE_START_POST &&
1437             state != SERVICE_RELOAD &&
1438             state != SERVICE_STOP &&
1439             state != SERVICE_STOP_SIGTERM &&
1440             state != SERVICE_STOP_SIGKILL &&
1441             state != SERVICE_STOP_POST &&
1442             state != SERVICE_FINAL_SIGTERM &&
1443             state != SERVICE_FINAL_SIGKILL &&
1444             state != SERVICE_AUTO_RESTART)
1445                 unit_unwatch_timer(UNIT(s), &s->timer_watch);
1446
1447         if (state != SERVICE_START &&
1448             state != SERVICE_START_POST &&
1449             state != SERVICE_RUNNING &&
1450             state != SERVICE_RELOAD &&
1451             state != SERVICE_STOP &&
1452             state != SERVICE_STOP_SIGTERM &&
1453             state != SERVICE_STOP_SIGKILL) {
1454                 service_unwatch_main_pid(s);
1455                 s->main_command = NULL;
1456         }
1457
1458         if (state != SERVICE_START_PRE &&
1459             state != SERVICE_START &&
1460             state != SERVICE_START_POST &&
1461             state != SERVICE_RELOAD &&
1462             state != SERVICE_STOP &&
1463             state != SERVICE_STOP_SIGTERM &&
1464             state != SERVICE_STOP_SIGKILL &&
1465             state != SERVICE_STOP_POST &&
1466             state != SERVICE_FINAL_SIGTERM &&
1467             state != SERVICE_FINAL_SIGKILL) {
1468                 service_unwatch_control_pid(s);
1469                 s->control_command = NULL;
1470                 s->control_command_id = _SERVICE_EXEC_COMMAND_INVALID;
1471         }
1472
1473         if (state == SERVICE_DEAD ||
1474             state == SERVICE_STOP ||
1475             state == SERVICE_STOP_SIGTERM ||
1476             state == SERVICE_STOP_SIGKILL ||
1477             state == SERVICE_STOP_POST ||
1478             state == SERVICE_FINAL_SIGTERM ||
1479             state == SERVICE_FINAL_SIGKILL ||
1480             state == SERVICE_FAILED ||
1481             state == SERVICE_AUTO_RESTART)
1482                 service_notify_sockets_dead(s);
1483
1484         if (state != SERVICE_START_PRE &&
1485             state != SERVICE_START &&
1486             state != SERVICE_START_POST &&
1487             state != SERVICE_RUNNING &&
1488             state != SERVICE_RELOAD &&
1489             state != SERVICE_STOP &&
1490             state != SERVICE_STOP_SIGTERM &&
1491             state != SERVICE_STOP_SIGKILL &&
1492             state != SERVICE_STOP_POST &&
1493             state != SERVICE_FINAL_SIGTERM &&
1494             state != SERVICE_FINAL_SIGKILL &&
1495             !(state == SERVICE_DEAD && s->meta.job)) {
1496                 service_close_socket_fd(s);
1497                 service_connection_unref(s);
1498         }
1499
1500         /* For the inactive states unit_notify() will trim the cgroup,
1501          * but for exit we have to do that ourselves... */
1502         if (state == SERVICE_EXITED && s->meta.manager->n_reloading <= 0)
1503                 cgroup_bonding_trim_list(s->meta.cgroup_bondings, true);
1504
1505         if (old_state != state)
1506                 log_debug("%s changed %s -> %s", s->meta.id, service_state_to_string(old_state), service_state_to_string(state));
1507
1508         unit_notify(UNIT(s), state_translation_table[old_state], state_translation_table[state], !s->reload_failure);
1509         s->reload_failure = false;
1510 }
1511
1512 static int service_coldplug(Unit *u) {
1513         Service *s = SERVICE(u);
1514         int r;
1515
1516         assert(s);
1517         assert(s->state == SERVICE_DEAD);
1518
1519         if (s->deserialized_state != s->state) {
1520
1521                 if (s->deserialized_state == SERVICE_START_PRE ||
1522                     s->deserialized_state == SERVICE_START ||
1523                     s->deserialized_state == SERVICE_START_POST ||
1524                     s->deserialized_state == SERVICE_RELOAD ||
1525                     s->deserialized_state == SERVICE_STOP ||
1526                     s->deserialized_state == SERVICE_STOP_SIGTERM ||
1527                     s->deserialized_state == SERVICE_STOP_SIGKILL ||
1528                     s->deserialized_state == SERVICE_STOP_POST ||
1529                     s->deserialized_state == SERVICE_FINAL_SIGTERM ||
1530                     s->deserialized_state == SERVICE_FINAL_SIGKILL ||
1531                     s->deserialized_state == SERVICE_AUTO_RESTART) {
1532
1533                         if (s->deserialized_state == SERVICE_AUTO_RESTART || s->timeout_usec > 0) {
1534                                 usec_t k;
1535
1536                                 k = s->deserialized_state == SERVICE_AUTO_RESTART ? s->restart_usec : s->timeout_usec;
1537
1538                                 if ((r = unit_watch_timer(UNIT(s), k, &s->timer_watch)) < 0)
1539                                         return r;
1540                         }
1541                 }
1542
1543                 if ((s->deserialized_state == SERVICE_START &&
1544                      (s->type == SERVICE_FORKING ||
1545                       s->type == SERVICE_DBUS ||
1546                       s->type == SERVICE_ONESHOT ||
1547                       s->type == SERVICE_NOTIFY)) ||
1548                     s->deserialized_state == SERVICE_START_POST ||
1549                     s->deserialized_state == SERVICE_RUNNING ||
1550                     s->deserialized_state == SERVICE_RELOAD ||
1551                     s->deserialized_state == SERVICE_STOP ||
1552                     s->deserialized_state == SERVICE_STOP_SIGTERM ||
1553                     s->deserialized_state == SERVICE_STOP_SIGKILL)
1554                         if (s->main_pid > 0)
1555                                 if ((r = unit_watch_pid(UNIT(s), s->main_pid)) < 0)
1556                                         return r;
1557
1558                 if (s->deserialized_state == SERVICE_START_PRE ||
1559                     s->deserialized_state == SERVICE_START ||
1560                     s->deserialized_state == SERVICE_START_POST ||
1561                     s->deserialized_state == SERVICE_RELOAD ||
1562                     s->deserialized_state == SERVICE_STOP ||
1563                     s->deserialized_state == SERVICE_STOP_SIGTERM ||
1564                     s->deserialized_state == SERVICE_STOP_SIGKILL ||
1565                     s->deserialized_state == SERVICE_STOP_POST ||
1566                     s->deserialized_state == SERVICE_FINAL_SIGTERM ||
1567                     s->deserialized_state == SERVICE_FINAL_SIGKILL)
1568                         if (s->control_pid > 0)
1569                                 if ((r = unit_watch_pid(UNIT(s), s->control_pid)) < 0)
1570                                         return r;
1571
1572                 service_set_state(s, s->deserialized_state);
1573         }
1574
1575         return 0;
1576 }
1577
1578 static int service_collect_fds(Service *s, int **fds, unsigned *n_fds) {
1579         Iterator i;
1580         int r;
1581         int *rfds = NULL;
1582         unsigned rn_fds = 0;
1583         Set *set, *free_set = NULL;
1584         Socket *sock;
1585
1586         assert(s);
1587         assert(fds);
1588         assert(n_fds);
1589
1590         if (s->socket_fd >= 0)
1591                 return 0;
1592
1593         if (!set_isempty(s->configured_sockets))
1594                 set = s->configured_sockets;
1595         else {
1596                 if ((r = service_get_sockets(s, &free_set)) < 0)
1597                         return r;
1598
1599                 set = free_set;
1600         }
1601
1602         SET_FOREACH(sock, set, i) {
1603                 int *cfds;
1604                 unsigned cn_fds;
1605
1606                 if ((r = socket_collect_fds(sock, &cfds, &cn_fds)) < 0)
1607                         goto fail;
1608
1609                 if (!cfds)
1610                         continue;
1611
1612                 if (!rfds) {
1613                         rfds = cfds;
1614                         rn_fds = cn_fds;
1615                 } else {
1616                         int *t;
1617
1618                         if (!(t = new(int, rn_fds+cn_fds))) {
1619                                 free(cfds);
1620                                 r = -ENOMEM;
1621                                 goto fail;
1622                         }
1623
1624                         memcpy(t, rfds, rn_fds * sizeof(int));
1625                         memcpy(t+rn_fds, cfds, cn_fds * sizeof(int));
1626                         free(rfds);
1627                         free(cfds);
1628
1629                         rfds = t;
1630                         rn_fds = rn_fds+cn_fds;
1631                 }
1632         }
1633
1634         *fds = rfds;
1635         *n_fds = rn_fds;
1636
1637         set_free(free_set);
1638
1639         return 0;
1640
1641 fail:
1642         set_free(set);
1643         free(rfds);
1644
1645         return r;
1646 }
1647
1648 static int service_spawn(
1649                 Service *s,
1650                 ExecCommand *c,
1651                 bool timeout,
1652                 bool pass_fds,
1653                 bool apply_permissions,
1654                 bool apply_chroot,
1655                 bool apply_tty_stdin,
1656                 bool set_notify_socket,
1657                 pid_t *_pid) {
1658
1659         pid_t pid;
1660         int r;
1661         int *fds = NULL, *fdsbuf = NULL;
1662         unsigned n_fds = 0, n_env = 0;
1663         char **argv = NULL, **final_env = NULL, **our_env = NULL;
1664
1665         assert(s);
1666         assert(c);
1667         assert(_pid);
1668
1669         if (pass_fds ||
1670             s->exec_context.std_input == EXEC_INPUT_SOCKET ||
1671             s->exec_context.std_output == EXEC_OUTPUT_SOCKET ||
1672             s->exec_context.std_error == EXEC_OUTPUT_SOCKET) {
1673
1674                 if (s->socket_fd >= 0) {
1675                         fds = &s->socket_fd;
1676                         n_fds = 1;
1677                 } else {
1678                         if ((r = service_collect_fds(s, &fdsbuf, &n_fds)) < 0)
1679                                 goto fail;
1680
1681                         fds = fdsbuf;
1682                 }
1683         }
1684
1685         if (timeout && s->timeout_usec) {
1686                 if ((r = unit_watch_timer(UNIT(s), s->timeout_usec, &s->timer_watch)) < 0)
1687                         goto fail;
1688         } else
1689                 unit_unwatch_timer(UNIT(s), &s->timer_watch);
1690
1691         if (!(argv = unit_full_printf_strv(UNIT(s), c->argv))) {
1692                 r = -ENOMEM;
1693                 goto fail;
1694         }
1695
1696         if (!(our_env = new0(char*, 4))) {
1697                 r = -ENOMEM;
1698                 goto fail;
1699         }
1700
1701         if (set_notify_socket)
1702                 if (asprintf(our_env + n_env++, "NOTIFY_SOCKET=%s", s->meta.manager->notify_socket) < 0) {
1703                         r = -ENOMEM;
1704                         goto fail;
1705                 }
1706
1707         if (s->main_pid > 0)
1708                 if (asprintf(our_env + n_env++, "MAINPID=%lu", (unsigned long) s->main_pid) < 0) {
1709                         r = -ENOMEM;
1710                         goto fail;
1711                 }
1712
1713         if (!(final_env = strv_env_merge(2,
1714                                          s->meta.manager->environment,
1715                                          our_env,
1716                                          NULL))) {
1717                 r = -ENOMEM;
1718                 goto fail;
1719         }
1720
1721         r = exec_spawn(c,
1722                        argv,
1723                        &s->exec_context,
1724                        fds, n_fds,
1725                        final_env,
1726                        apply_permissions,
1727                        apply_chroot,
1728                        apply_tty_stdin,
1729                        s->meta.manager->confirm_spawn,
1730                        s->meta.cgroup_bondings,
1731                        &pid);
1732
1733         if (r < 0)
1734                 goto fail;
1735
1736
1737         if ((r = unit_watch_pid(UNIT(s), pid)) < 0)
1738                 /* FIXME: we need to do something here */
1739                 goto fail;
1740
1741         free(fdsbuf);
1742         strv_free(argv);
1743         strv_free(our_env);
1744         strv_free(final_env);
1745
1746         *_pid = pid;
1747
1748         return 0;
1749
1750 fail:
1751         free(fdsbuf);
1752         strv_free(argv);
1753         strv_free(our_env);
1754         strv_free(final_env);
1755
1756         if (timeout)
1757                 unit_unwatch_timer(UNIT(s), &s->timer_watch);
1758
1759         return r;
1760 }
1761
1762 static int main_pid_good(Service *s) {
1763         assert(s);
1764
1765         /* Returns 0 if the pid is dead, 1 if it is good, -1 if we
1766          * don't know */
1767
1768         /* If we know the pid file, then lets just check if it is
1769          * still valid */
1770         if (s->main_pid_known) {
1771
1772                 /* If it's an alien child let's check if it is still
1773                  * alive ... */
1774                 if (s->main_pid_alien)
1775                         return kill(s->main_pid, 0) >= 0 || errno != ESRCH;
1776
1777                 /* .. otherwise assume we'll get a SIGCHLD for it,
1778                  * which we really should wait for to collect exit
1779                  * status and code */
1780                 return s->main_pid > 0;
1781         }
1782
1783         /* We don't know the pid */
1784         return -EAGAIN;
1785 }
1786
1787 static int control_pid_good(Service *s) {
1788         assert(s);
1789
1790         return s->control_pid > 0;
1791 }
1792
1793 static int cgroup_good(Service *s) {
1794         int r;
1795
1796         assert(s);
1797
1798         if ((r = cgroup_bonding_is_empty_list(s->meta.cgroup_bondings)) < 0)
1799                 return r;
1800
1801         return !r;
1802 }
1803
1804 static void service_enter_dead(Service *s, bool success, bool allow_restart) {
1805         int r;
1806         assert(s);
1807
1808         if (!success)
1809                 s->failure = true;
1810
1811         if (allow_restart &&
1812             !s->forbid_restart &&
1813             (s->restart == SERVICE_RESTART_ALWAYS ||
1814              (s->restart == SERVICE_RESTART_ON_SUCCESS && !s->failure) ||
1815              (s->restart == SERVICE_RESTART_ON_FAILURE && s->failure) ||
1816              (s->restart == SERVICE_RESTART_ON_ABORT && s->failure &&
1817               (s->main_exec_status.code == CLD_KILLED ||
1818                s->main_exec_status.code == CLD_DUMPED)))) {
1819
1820                 if ((r = unit_watch_timer(UNIT(s), s->restart_usec, &s->timer_watch)) < 0)
1821                         goto fail;
1822
1823                 service_set_state(s, SERVICE_AUTO_RESTART);
1824         } else
1825                 service_set_state(s, s->failure ? SERVICE_FAILED : SERVICE_DEAD);
1826
1827         s->forbid_restart = false;
1828
1829         return;
1830
1831 fail:
1832         log_warning("%s failed to run install restart timer: %s", s->meta.id, strerror(-r));
1833         service_enter_dead(s, false, false);
1834 }
1835
1836 static void service_enter_signal(Service *s, ServiceState state, bool success);
1837
1838 static void service_enter_stop_post(Service *s, bool success) {
1839         int r;
1840         assert(s);
1841
1842         if (!success)
1843                 s->failure = true;
1844
1845         service_unwatch_control_pid(s);
1846
1847         if ((s->control_command = s->exec_command[SERVICE_EXEC_STOP_POST])) {
1848                 s->control_command_id = SERVICE_EXEC_STOP_POST;
1849
1850                 if ((r = service_spawn(s,
1851                                        s->control_command,
1852                                        true,
1853                                        false,
1854                                        !s->permissions_start_only,
1855                                        !s->root_directory_start_only,
1856                                        true,
1857                                        false,
1858                                        &s->control_pid)) < 0)
1859                         goto fail;
1860
1861
1862                 service_set_state(s, SERVICE_STOP_POST);
1863         } else
1864                 service_enter_signal(s, SERVICE_FINAL_SIGTERM, true);
1865
1866         return;
1867
1868 fail:
1869         log_warning("%s failed to run 'stop-post' task: %s", s->meta.id, strerror(-r));
1870         service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
1871 }
1872
1873 static void service_enter_signal(Service *s, ServiceState state, bool success) {
1874         int r;
1875         Set *pid_set = NULL;
1876         bool wait_for_exit = false;
1877
1878         assert(s);
1879
1880         if (!success)
1881                 s->failure = true;
1882
1883         if (s->exec_context.kill_mode != KILL_NONE) {
1884                 int sig = (state == SERVICE_STOP_SIGTERM || state == SERVICE_FINAL_SIGTERM) ? s->exec_context.kill_signal : SIGKILL;
1885
1886                 if (s->main_pid > 0) {
1887                         if (kill_and_sigcont(s->main_pid, sig) < 0 && errno != ESRCH)
1888                                 log_warning("Failed to kill main process %li: %m", (long) s->main_pid);
1889                         else
1890                                 wait_for_exit = !s->main_pid_alien;
1891                 }
1892
1893                 if (s->control_pid > 0) {
1894                         if (kill_and_sigcont(s->control_pid, sig) < 0 && errno != ESRCH)
1895                                 log_warning("Failed to kill control process %li: %m", (long) s->control_pid);
1896                         else
1897                                 wait_for_exit = true;
1898                 }
1899
1900                 if (s->exec_context.kill_mode == KILL_CONTROL_GROUP) {
1901
1902                         if (!(pid_set = set_new(trivial_hash_func, trivial_compare_func))) {
1903                                 r = -ENOMEM;
1904                                 goto fail;
1905                         }
1906
1907                         /* Exclude the main/control pids from being killed via the cgroup */
1908                         if (s->main_pid > 0)
1909                                 if ((r = set_put(pid_set, LONG_TO_PTR(s->main_pid))) < 0)
1910                                         goto fail;
1911
1912                         if (s->control_pid > 0)
1913                                 if ((r = set_put(pid_set, LONG_TO_PTR(s->control_pid))) < 0)
1914                                         goto fail;
1915
1916                         if ((r = cgroup_bonding_kill_list(s->meta.cgroup_bondings, sig, true, pid_set)) < 0) {
1917                                 if (r != -EAGAIN && r != -ESRCH && r != -ENOENT)
1918                                         log_warning("Failed to kill control group: %s", strerror(-r));
1919                         } else if (r > 0)
1920                                 wait_for_exit = true;
1921
1922                         set_free(pid_set);
1923                         pid_set = NULL;
1924                 }
1925         }
1926
1927         if (wait_for_exit) {
1928                 if (s->timeout_usec > 0)
1929                         if ((r = unit_watch_timer(UNIT(s), s->timeout_usec, &s->timer_watch)) < 0)
1930                                 goto fail;
1931
1932                 service_set_state(s, state);
1933         } else if (state == SERVICE_STOP_SIGTERM || state == SERVICE_STOP_SIGKILL)
1934                 service_enter_stop_post(s, true);
1935         else
1936                 service_enter_dead(s, true, true);
1937
1938         return;
1939
1940 fail:
1941         log_warning("%s failed to kill processes: %s", s->meta.id, strerror(-r));
1942
1943         if (state == SERVICE_STOP_SIGTERM || state == SERVICE_STOP_SIGKILL)
1944                 service_enter_stop_post(s, false);
1945         else
1946                 service_enter_dead(s, false, true);
1947
1948         if (pid_set)
1949                 set_free(pid_set);
1950 }
1951
1952 static void service_enter_stop(Service *s, bool success) {
1953         int r;
1954
1955         assert(s);
1956
1957         if (!success)
1958                 s->failure = true;
1959
1960         service_unwatch_control_pid(s);
1961
1962         if ((s->control_command = s->exec_command[SERVICE_EXEC_STOP])) {
1963                 s->control_command_id = SERVICE_EXEC_STOP;
1964
1965                 if ((r = service_spawn(s,
1966                                        s->control_command,
1967                                        true,
1968                                        false,
1969                                        !s->permissions_start_only,
1970                                        !s->root_directory_start_only,
1971                                        false,
1972                                        false,
1973                                        &s->control_pid)) < 0)
1974                         goto fail;
1975
1976                 service_set_state(s, SERVICE_STOP);
1977         } else
1978                 service_enter_signal(s, SERVICE_STOP_SIGTERM, true);
1979
1980         return;
1981
1982 fail:
1983         log_warning("%s failed to run 'stop' task: %s", s->meta.id, strerror(-r));
1984         service_enter_signal(s, SERVICE_STOP_SIGTERM, false);
1985 }
1986
1987 static void service_enter_running(Service *s, bool success) {
1988         int main_pid_ok, cgroup_ok;
1989         assert(s);
1990
1991         if (!success)
1992                 s->failure = true;
1993
1994         main_pid_ok = main_pid_good(s);
1995         cgroup_ok = cgroup_good(s);
1996
1997         if ((main_pid_ok > 0 || (main_pid_ok < 0 && cgroup_ok != 0)) &&
1998             (s->bus_name_good || s->type != SERVICE_DBUS))
1999                 service_set_state(s, SERVICE_RUNNING);
2000         else if (s->remain_after_exit)
2001                 service_set_state(s, SERVICE_EXITED);
2002         else
2003                 service_enter_stop(s, true);
2004 }
2005
2006 static void service_enter_start_post(Service *s) {
2007         int r;
2008         assert(s);
2009
2010         service_unwatch_control_pid(s);
2011
2012         if ((s->control_command = s->exec_command[SERVICE_EXEC_START_POST])) {
2013                 s->control_command_id = SERVICE_EXEC_START_POST;
2014
2015                 if ((r = service_spawn(s,
2016                                        s->control_command,
2017                                        true,
2018                                        false,
2019                                        !s->permissions_start_only,
2020                                        !s->root_directory_start_only,
2021                                        false,
2022                                        false,
2023                                        &s->control_pid)) < 0)
2024                         goto fail;
2025
2026                 service_set_state(s, SERVICE_START_POST);
2027         } else
2028                 service_enter_running(s, true);
2029
2030         return;
2031
2032 fail:
2033         log_warning("%s failed to run 'start-post' task: %s", s->meta.id, strerror(-r));
2034         service_enter_stop(s, false);
2035 }
2036
2037 static void service_enter_start(Service *s) {
2038         pid_t pid;
2039         int r;
2040         ExecCommand *c;
2041
2042         assert(s);
2043
2044         assert(s->exec_command[SERVICE_EXEC_START]);
2045         assert(!s->exec_command[SERVICE_EXEC_START]->command_next || s->type == SERVICE_ONESHOT);
2046
2047         if (s->type == SERVICE_FORKING)
2048                 service_unwatch_control_pid(s);
2049         else
2050                 service_unwatch_main_pid(s);
2051
2052         if (s->type == SERVICE_FORKING) {
2053                 s->control_command_id = SERVICE_EXEC_START;
2054                 c = s->control_command = s->exec_command[SERVICE_EXEC_START];
2055
2056                 s->main_command = NULL;
2057         } else {
2058                 s->control_command_id = _SERVICE_EXEC_COMMAND_INVALID;
2059                 s->control_command = NULL;
2060
2061                 c = s->main_command = s->exec_command[SERVICE_EXEC_START];
2062         }
2063
2064         if ((r = service_spawn(s,
2065                                c,
2066                                s->type == SERVICE_FORKING || s->type == SERVICE_DBUS || s->type == SERVICE_NOTIFY,
2067                                true,
2068                                true,
2069                                true,
2070                                true,
2071                                s->notify_access != NOTIFY_NONE,
2072                                &pid)) < 0)
2073                 goto fail;
2074
2075         if (s->type == SERVICE_SIMPLE) {
2076                 /* For simple services we immediately start
2077                  * the START_POST binaries. */
2078
2079                 service_set_main_pid(s, pid);
2080                 service_enter_start_post(s);
2081
2082         } else  if (s->type == SERVICE_FORKING) {
2083
2084                 /* For forking services we wait until the start
2085                  * process exited. */
2086
2087                 s->control_pid = pid;
2088                 service_set_state(s, SERVICE_START);
2089
2090         } else if (s->type == SERVICE_ONESHOT ||
2091                    s->type == SERVICE_DBUS ||
2092                    s->type == SERVICE_NOTIFY) {
2093
2094                 /* For oneshot services we wait until the start
2095                  * process exited, too, but it is our main process. */
2096
2097                 /* For D-Bus services we know the main pid right away,
2098                  * but wait for the bus name to appear on the
2099                  * bus. Notify services are similar. */
2100
2101                 service_set_main_pid(s, pid);
2102                 service_set_state(s, SERVICE_START);
2103         } else
2104                 assert_not_reached("Unknown service type");
2105
2106         return;
2107
2108 fail:
2109         log_warning("%s failed to run 'start' task: %s", s->meta.id, strerror(-r));
2110         service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
2111 }
2112
2113 static void service_enter_start_pre(Service *s) {
2114         int r;
2115
2116         assert(s);
2117
2118         service_unwatch_control_pid(s);
2119
2120         if ((s->control_command = s->exec_command[SERVICE_EXEC_START_PRE])) {
2121                 s->control_command_id = SERVICE_EXEC_START_PRE;
2122
2123                 if ((r = service_spawn(s,
2124                                        s->control_command,
2125                                        true,
2126                                        false,
2127                                        !s->permissions_start_only,
2128                                        !s->root_directory_start_only,
2129                                        true,
2130                                        false,
2131                                        &s->control_pid)) < 0)
2132                         goto fail;
2133
2134                 service_set_state(s, SERVICE_START_PRE);
2135         } else
2136                 service_enter_start(s);
2137
2138         return;
2139
2140 fail:
2141         log_warning("%s failed to run 'start-pre' task: %s", s->meta.id, strerror(-r));
2142         service_enter_dead(s, false, true);
2143 }
2144
2145 static void service_enter_restart(Service *s) {
2146         int r;
2147         DBusError error;
2148
2149         assert(s);
2150         dbus_error_init(&error);
2151
2152         if (s->meta.job) {
2153                 log_info("Job pending for unit, delaying automatic restart.");
2154
2155                 if ((r = unit_watch_timer(UNIT(s), s->restart_usec, &s->timer_watch)) < 0)
2156                         goto fail;
2157         }
2158
2159         service_enter_dead(s, true, false);
2160
2161         if ((r = manager_add_job(s->meta.manager, JOB_START, UNIT(s), JOB_FAIL, false, &error, NULL)) < 0)
2162                 goto fail;
2163
2164         log_debug("%s scheduled restart job.", s->meta.id);
2165         return;
2166
2167 fail:
2168         log_warning("%s failed to schedule restart job: %s", s->meta.id, bus_error(&error, -r));
2169         service_enter_dead(s, false, false);
2170
2171         dbus_error_free(&error);
2172 }
2173
2174 static void service_enter_reload(Service *s) {
2175         int r;
2176
2177         assert(s);
2178
2179         service_unwatch_control_pid(s);
2180
2181         if ((s->control_command = s->exec_command[SERVICE_EXEC_RELOAD])) {
2182                 s->control_command_id = SERVICE_EXEC_RELOAD;
2183
2184                 if ((r = service_spawn(s,
2185                                        s->control_command,
2186                                        true,
2187                                        false,
2188                                        !s->permissions_start_only,
2189                                        !s->root_directory_start_only,
2190                                        false,
2191                                        false,
2192                                        &s->control_pid)) < 0)
2193                         goto fail;
2194
2195                 service_set_state(s, SERVICE_RELOAD);
2196         } else
2197                 service_enter_running(s, true);
2198
2199         return;
2200
2201 fail:
2202         log_warning("%s failed to run 'reload' task: %s", s->meta.id, strerror(-r));
2203         s->reload_failure = true;
2204         service_enter_running(s, true);
2205 }
2206
2207 static void service_run_next_control(Service *s, bool success) {
2208         int r;
2209
2210         assert(s);
2211         assert(s->control_command);
2212         assert(s->control_command->command_next);
2213
2214         if (!success)
2215                 s->failure = true;
2216
2217         assert(s->control_command_id != SERVICE_EXEC_START);
2218
2219         s->control_command = s->control_command->command_next;
2220         service_unwatch_control_pid(s);
2221
2222         if ((r = service_spawn(s,
2223                                s->control_command,
2224                                true,
2225                                false,
2226                                !s->permissions_start_only,
2227                                !s->root_directory_start_only,
2228                                s->control_command_id == SERVICE_EXEC_START_PRE ||
2229                                s->control_command_id == SERVICE_EXEC_STOP_POST,
2230                                false,
2231                                &s->control_pid)) < 0)
2232                 goto fail;
2233
2234         return;
2235
2236 fail:
2237         log_warning("%s failed to run next control task: %s", s->meta.id, strerror(-r));
2238
2239         if (s->state == SERVICE_START_PRE)
2240                 service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
2241         else if (s->state == SERVICE_STOP)
2242                 service_enter_signal(s, SERVICE_STOP_SIGTERM, false);
2243         else if (s->state == SERVICE_STOP_POST)
2244                 service_enter_dead(s, false, true);
2245         else if (s->state == SERVICE_RELOAD) {
2246                 s->reload_failure = true;
2247                 service_enter_running(s, true);
2248         } else
2249                 service_enter_stop(s, false);
2250 }
2251
2252 static void service_run_next_main(Service *s, bool success) {
2253         pid_t pid;
2254         int r;
2255
2256         assert(s);
2257         assert(s->main_command);
2258         assert(s->main_command->command_next);
2259         assert(s->type == SERVICE_ONESHOT);
2260
2261         if (!success)
2262                 s->failure = true;
2263
2264         s->main_command = s->main_command->command_next;
2265         service_unwatch_main_pid(s);
2266
2267         if ((r = service_spawn(s,
2268                                s->main_command,
2269                                false,
2270                                true,
2271                                true,
2272                                true,
2273                                true,
2274                                s->notify_access != NOTIFY_NONE,
2275                                &pid)) < 0)
2276                 goto fail;
2277
2278         service_set_main_pid(s, pid);
2279
2280         return;
2281
2282 fail:
2283         log_warning("%s failed to run next main task: %s", s->meta.id, strerror(-r));
2284         service_enter_stop(s, false);
2285 }
2286
2287 static int service_start(Unit *u) {
2288         Service *s = SERVICE(u);
2289
2290         assert(s);
2291
2292         /* We cannot fulfill this request right now, try again later
2293          * please! */
2294         if (s->state == SERVICE_STOP ||
2295             s->state == SERVICE_STOP_SIGTERM ||
2296             s->state == SERVICE_STOP_SIGKILL ||
2297             s->state == SERVICE_STOP_POST ||
2298             s->state == SERVICE_FINAL_SIGTERM ||
2299             s->state == SERVICE_FINAL_SIGKILL)
2300                 return -EAGAIN;
2301
2302         /* Already on it! */
2303         if (s->state == SERVICE_START_PRE ||
2304             s->state == SERVICE_START ||
2305             s->state == SERVICE_START_POST)
2306                 return 0;
2307
2308         assert(s->state == SERVICE_DEAD || s->state == SERVICE_FAILED || s->state == SERVICE_AUTO_RESTART);
2309
2310         /* Make sure we don't enter a busy loop of some kind. */
2311         if (!ratelimit_test(&s->ratelimit)) {
2312                 log_warning("%s start request repeated too quickly, refusing to start.", u->meta.id);
2313                 return -ECANCELED;
2314         }
2315
2316         s->failure = false;
2317         s->main_pid_known = false;
2318         s->main_pid_alien = false;
2319         s->forbid_restart = false;
2320
2321         service_enter_start_pre(s);
2322         return 0;
2323 }
2324
2325 static int service_stop(Unit *u) {
2326         Service *s = SERVICE(u);
2327
2328         assert(s);
2329
2330         /* This is a user request, so don't do restarts on this
2331          * shutdown. */
2332         s->forbid_restart = true;
2333
2334         /* Already on it */
2335         if (s->state == SERVICE_STOP ||
2336             s->state == SERVICE_STOP_SIGTERM ||
2337             s->state == SERVICE_STOP_SIGKILL ||
2338             s->state == SERVICE_STOP_POST ||
2339             s->state == SERVICE_FINAL_SIGTERM ||
2340             s->state == SERVICE_FINAL_SIGKILL)
2341                 return 0;
2342
2343         /* Don't allow a restart */
2344         if (s->state == SERVICE_AUTO_RESTART) {
2345                 service_set_state(s, SERVICE_DEAD);
2346                 return 0;
2347         }
2348
2349         /* If there's already something running we go directly into
2350          * kill mode. */
2351         if (s->state == SERVICE_START_PRE ||
2352             s->state == SERVICE_START ||
2353             s->state == SERVICE_START_POST ||
2354             s->state == SERVICE_RELOAD) {
2355                 service_enter_signal(s, SERVICE_STOP_SIGTERM, true);
2356                 return 0;
2357         }
2358
2359         assert(s->state == SERVICE_RUNNING ||
2360                s->state == SERVICE_EXITED);
2361
2362         service_enter_stop(s, true);
2363         return 0;
2364 }
2365
2366 static int service_reload(Unit *u) {
2367         Service *s = SERVICE(u);
2368
2369         assert(s);
2370
2371         assert(s->state == SERVICE_RUNNING || s->state == SERVICE_EXITED);
2372
2373         service_enter_reload(s);
2374         return 0;
2375 }
2376
2377 static bool service_can_reload(Unit *u) {
2378         Service *s = SERVICE(u);
2379
2380         assert(s);
2381
2382         return !!s->exec_command[SERVICE_EXEC_RELOAD];
2383 }
2384
2385 static int service_serialize(Unit *u, FILE *f, FDSet *fds) {
2386         Service *s = SERVICE(u);
2387
2388         assert(u);
2389         assert(f);
2390         assert(fds);
2391
2392         unit_serialize_item(u, f, "state", service_state_to_string(s->state));
2393         unit_serialize_item(u, f, "failure", yes_no(s->failure));
2394
2395         if (s->control_pid > 0)
2396                 unit_serialize_item_format(u, f, "control-pid", "%lu", (unsigned long) s->control_pid);
2397
2398         if (s->main_pid_known && s->main_pid > 0)
2399                 unit_serialize_item_format(u, f, "main-pid", "%lu", (unsigned long) s->main_pid);
2400
2401         unit_serialize_item(u, f, "main-pid-known", yes_no(s->main_pid_known));
2402
2403         if (s->status_text)
2404                 unit_serialize_item(u, f, "status-text", s->status_text);
2405
2406         /* There's a minor uncleanliness here: if there are multiple
2407          * commands attached here, we will start from the first one
2408          * again */
2409         if (s->control_command_id >= 0)
2410                 unit_serialize_item(u, f, "control-command", service_exec_command_to_string(s->control_command_id));
2411
2412         if (s->socket_fd >= 0) {
2413                 int copy;
2414
2415                 if ((copy = fdset_put_dup(fds, s->socket_fd)) < 0)
2416                         return copy;
2417
2418                 unit_serialize_item_format(u, f, "socket-fd", "%i", copy);
2419         }
2420
2421         if (s->main_exec_status.pid > 0) {
2422                 unit_serialize_item_format(u, f, "main-exec-status-pid", "%lu", (unsigned long) s->main_exec_status.pid);
2423                 dual_timestamp_serialize(f, "main-exec-status-start", &s->main_exec_status.start_timestamp);
2424                 dual_timestamp_serialize(f, "main-exec-status-exit", &s->main_exec_status.exit_timestamp);
2425
2426                 if (dual_timestamp_is_set(&s->main_exec_status.exit_timestamp)) {
2427                         unit_serialize_item_format(u, f, "main-exec-status-code", "%i", s->main_exec_status.code);
2428                         unit_serialize_item_format(u, f, "main-exec-status-status", "%i", s->main_exec_status.status);
2429                 }
2430         }
2431
2432         return 0;
2433 }
2434
2435 static int service_deserialize_item(Unit *u, const char *key, const char *value, FDSet *fds) {
2436         Service *s = SERVICE(u);
2437
2438         assert(u);
2439         assert(key);
2440         assert(value);
2441         assert(fds);
2442
2443         if (streq(key, "state")) {
2444                 ServiceState state;
2445
2446                 if ((state = service_state_from_string(value)) < 0)
2447                         log_debug("Failed to parse state value %s", value);
2448                 else
2449                         s->deserialized_state = state;
2450         } else if (streq(key, "failure")) {
2451                 int b;
2452
2453                 if ((b = parse_boolean(value)) < 0)
2454                         log_debug("Failed to parse failure value %s", value);
2455                 else
2456                         s->failure = b || s->failure;
2457         } else if (streq(key, "control-pid")) {
2458                 pid_t pid;
2459
2460                 if (parse_pid(value, &pid) < 0)
2461                         log_debug("Failed to parse control-pid value %s", value);
2462                 else
2463                         s->control_pid = pid;
2464         } else if (streq(key, "main-pid")) {
2465                 pid_t pid;
2466
2467                 if (parse_pid(value, &pid) < 0)
2468                         log_debug("Failed to parse main-pid value %s", value);
2469                 else
2470                         service_set_main_pid(s, (pid_t) pid);
2471         } else if (streq(key, "main-pid-known")) {
2472                 int b;
2473
2474                 if ((b = parse_boolean(value)) < 0)
2475                         log_debug("Failed to parse main-pid-known value %s", value);
2476                 else
2477                         s->main_pid_known = b;
2478         } else if (streq(key, "status-text")) {
2479                 char *t;
2480
2481                 if ((t = strdup(value))) {
2482                         free(s->status_text);
2483                         s->status_text = t;
2484                 }
2485
2486         } else if (streq(key, "control-command")) {
2487                 ServiceExecCommand id;
2488
2489                 if ((id = service_exec_command_from_string(value)) < 0)
2490                         log_debug("Failed to parse exec-command value %s", value);
2491                 else {
2492                         s->control_command_id = id;
2493                         s->control_command = s->exec_command[id];
2494                 }
2495         } else if (streq(key, "socket-fd")) {
2496                 int fd;
2497
2498                 if (safe_atoi(value, &fd) < 0 || fd < 0 || !fdset_contains(fds, fd))
2499                         log_debug("Failed to parse socket-fd value %s", value);
2500                 else {
2501
2502                         if (s->socket_fd >= 0)
2503                                 close_nointr_nofail(s->socket_fd);
2504                         s->socket_fd = fdset_remove(fds, fd);
2505                 }
2506         } else if (streq(key, "main-exec-status-pid")) {
2507                 pid_t pid;
2508
2509                 if (parse_pid(value, &pid) < 0)
2510                         log_debug("Failed to parse main-exec-status-pid value %s", value);
2511                 else
2512                         s->main_exec_status.pid = pid;
2513         } else if (streq(key, "main-exec-status-code")) {
2514                 int i;
2515
2516                 if (safe_atoi(value, &i) < 0)
2517                         log_debug("Failed to parse main-exec-status-code value %s", value);
2518                 else
2519                         s->main_exec_status.code = i;
2520         } else if (streq(key, "main-exec-status-status")) {
2521                 int i;
2522
2523                 if (safe_atoi(value, &i) < 0)
2524                         log_debug("Failed to parse main-exec-status-status value %s", value);
2525                 else
2526                         s->main_exec_status.status = i;
2527         } else if (streq(key, "main-exec-status-start"))
2528                 dual_timestamp_deserialize(value, &s->main_exec_status.start_timestamp);
2529         else if (streq(key, "main-exec-status-exit"))
2530                 dual_timestamp_deserialize(value, &s->main_exec_status.exit_timestamp);
2531         else
2532                 log_debug("Unknown serialization key '%s'", key);
2533
2534         return 0;
2535 }
2536
2537 static UnitActiveState service_active_state(Unit *u) {
2538         assert(u);
2539
2540         return state_translation_table[SERVICE(u)->state];
2541 }
2542
2543 static const char *service_sub_state_to_string(Unit *u) {
2544         assert(u);
2545
2546         return service_state_to_string(SERVICE(u)->state);
2547 }
2548
2549 static bool service_check_gc(Unit *u) {
2550         Service *s = SERVICE(u);
2551
2552         assert(s);
2553
2554         /* Never clean up services that still have a process around,
2555          * even if the service is formally dead. */
2556         if (cgroup_good(s) > 0 ||
2557             main_pid_good(s) > 0 ||
2558             control_pid_good(s) > 0)
2559                 return true;
2560
2561 #ifdef HAVE_SYSV_COMPAT
2562         if (s->sysv_path)
2563                 return true;
2564 #endif
2565
2566         return false;
2567 }
2568
2569 static bool service_check_snapshot(Unit *u) {
2570         Service *s = SERVICE(u);
2571
2572         assert(s);
2573
2574         return !s->got_socket_fd;
2575 }
2576
2577 static void service_sigchld_event(Unit *u, pid_t pid, int code, int status) {
2578         Service *s = SERVICE(u);
2579         bool success;
2580
2581         assert(s);
2582         assert(pid >= 0);
2583
2584         if (!s->meta.fragment_path)
2585                 success = is_clean_exit_lsb(code, status);
2586         else
2587                 success = is_clean_exit(code, status);
2588
2589         if (s->main_pid == pid) {
2590
2591                 s->main_pid = 0;
2592                 exec_status_exit(&s->main_exec_status, &s->exec_context, pid, code, status);
2593
2594                 /* If this is not a forking service than the main
2595                  * process got started and hence we copy the exit
2596                  * status so that it is recorded both as main and as
2597                  * control process exit status */
2598                 if (s->main_command) {
2599                         s->main_command->exec_status = s->main_exec_status;
2600
2601                         if (s->main_command->ignore)
2602                                 success = true;
2603                 }
2604
2605                 log_full(success ? LOG_DEBUG : LOG_NOTICE,
2606                          "%s: main process exited, code=%s, status=%i", u->meta.id, sigchld_code_to_string(code), status);
2607                 s->failure = s->failure || !success;
2608
2609                 if (s->main_command &&
2610                     s->main_command->command_next &&
2611                     success) {
2612
2613                         /* There is another command to *
2614                          * execute, so let's do that. */
2615
2616                         log_debug("%s running next main command for state %s", u->meta.id, service_state_to_string(s->state));
2617                         service_run_next_main(s, success);
2618
2619                 } else {
2620
2621                         /* The service exited, so the service is officially
2622                          * gone. */
2623                         s->main_command = NULL;
2624
2625                         switch (s->state) {
2626
2627                         case SERVICE_START_POST:
2628                         case SERVICE_RELOAD:
2629                         case SERVICE_STOP:
2630                                 /* Need to wait until the operation is
2631                                  * done */
2632                                 break;
2633
2634                         case SERVICE_START:
2635                                 if (s->type == SERVICE_ONESHOT) {
2636                                         /* This was our main goal, so let's go on */
2637                                         if (success)
2638                                                 service_enter_start_post(s);
2639                                         else
2640                                                 service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
2641                                         break;
2642                                 } else {
2643                                         assert(s->type == SERVICE_DBUS || s->type == SERVICE_NOTIFY);
2644
2645                                         /* Fall through */
2646                                 }
2647
2648                         case SERVICE_RUNNING:
2649                                 service_enter_running(s, success);
2650                                 break;
2651
2652                         case SERVICE_STOP_SIGTERM:
2653                         case SERVICE_STOP_SIGKILL:
2654
2655                                 if (!control_pid_good(s))
2656                                         service_enter_stop_post(s, success);
2657
2658                                 /* If there is still a control process, wait for that first */
2659                                 break;
2660
2661                         default:
2662                                 assert_not_reached("Uh, main process died at wrong time.");
2663                         }
2664                 }
2665
2666         } else if (s->control_pid == pid) {
2667
2668                 s->control_pid = 0;
2669
2670                 if (s->control_command) {
2671                         exec_status_exit(&s->control_command->exec_status, &s->exec_context, pid, code, status);
2672
2673                         if (s->control_command->ignore)
2674                                 success = true;
2675                 }
2676
2677                log_full(success ? LOG_DEBUG : LOG_NOTICE,
2678                          "%s: control process exited, code=%s status=%i", u->meta.id, sigchld_code_to_string(code), status);
2679                 s->failure = s->failure || !success;
2680
2681                 if (s->control_command &&
2682                     s->control_command->command_next &&
2683                     success) {
2684
2685                         /* There is another command to *
2686                          * execute, so let's do that. */
2687
2688                         log_debug("%s running next control command for state %s", u->meta.id, service_state_to_string(s->state));
2689                         service_run_next_control(s, success);
2690
2691                 } else {
2692                         /* No further commands for this step, so let's
2693                          * figure out what to do next */
2694
2695                         s->control_command = NULL;
2696                         s->control_command_id = _SERVICE_EXEC_COMMAND_INVALID;
2697
2698                         log_debug("%s got final SIGCHLD for state %s", u->meta.id, service_state_to_string(s->state));
2699
2700                         switch (s->state) {
2701
2702                         case SERVICE_START_PRE:
2703                                 if (success)
2704                                         service_enter_start(s);
2705                                 else
2706                                         service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
2707                                 break;
2708
2709                         case SERVICE_START:
2710                                 assert(s->type == SERVICE_FORKING);
2711
2712                                 /* Let's try to load the pid
2713                                  * file here if we can. We
2714                                  * ignore the return value,
2715                                  * since the PID file might
2716                                  * actually be created by a
2717                                  * START_POST script */
2718
2719                                 if (success) {
2720                                         service_load_pid_file(s);
2721                                         service_search_main_pid(s);
2722
2723                                         service_enter_start_post(s);
2724                                 } else
2725                                         service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
2726
2727                                 break;
2728
2729                         case SERVICE_START_POST:
2730                                 if (success) {
2731                                         service_load_pid_file(s);
2732                                         service_search_main_pid(s);
2733                                 }
2734
2735                                 s->reload_failure = !success;
2736                                 service_enter_running(s, true);
2737                                 break;
2738
2739                         case SERVICE_RELOAD:
2740                                 if (success) {
2741                                         service_load_pid_file(s);
2742                                         service_search_main_pid(s);
2743                                 }
2744
2745                                 s->reload_failure = !success;
2746                                 service_enter_running(s, true);
2747                                 break;
2748
2749                         case SERVICE_STOP:
2750                                 service_enter_signal(s, SERVICE_STOP_SIGTERM, success);
2751                                 break;
2752
2753                         case SERVICE_STOP_SIGTERM:
2754                         case SERVICE_STOP_SIGKILL:
2755                                 if (main_pid_good(s) <= 0)
2756                                         service_enter_stop_post(s, success);
2757
2758                                 /* If there is still a service
2759                                  * process around, wait until
2760                                  * that one quit, too */
2761                                 break;
2762
2763                         case SERVICE_STOP_POST:
2764                         case SERVICE_FINAL_SIGTERM:
2765                         case SERVICE_FINAL_SIGKILL:
2766                                 service_enter_dead(s, success, true);
2767                                 break;
2768
2769                         default:
2770                                 assert_not_reached("Uh, control process died at wrong time.");
2771                         }
2772                 }
2773         }
2774
2775         /* Notify clients about changed exit status */
2776         unit_add_to_dbus_queue(u);
2777 }
2778
2779 static void service_timer_event(Unit *u, uint64_t elapsed, Watch* w) {
2780         Service *s = SERVICE(u);
2781
2782         assert(s);
2783         assert(elapsed == 1);
2784
2785         assert(w == &s->timer_watch);
2786
2787         switch (s->state) {
2788
2789         case SERVICE_START_PRE:
2790         case SERVICE_START:
2791                 log_warning("%s operation timed out. Terminating.", u->meta.id);
2792                 service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
2793                 break;
2794
2795         case SERVICE_START_POST:
2796                 log_warning("%s operation timed out. Stopping.", u->meta.id);
2797                 service_enter_stop(s, false);
2798                 break;
2799
2800         case SERVICE_RELOAD:
2801                 log_warning("%s operation timed out. Stopping.", u->meta.id);
2802                 s->reload_failure = true;
2803                 service_enter_running(s, true);
2804                 break;
2805
2806         case SERVICE_STOP:
2807                 log_warning("%s stopping timed out. Terminating.", u->meta.id);
2808                 service_enter_signal(s, SERVICE_STOP_SIGTERM, false);
2809                 break;
2810
2811         case SERVICE_STOP_SIGTERM:
2812                 if (s->exec_context.send_sigkill) {
2813                         log_warning("%s stopping timed out. Killing.", u->meta.id);
2814                         service_enter_signal(s, SERVICE_STOP_SIGKILL, false);
2815                 } else {
2816                         log_warning("%s stopping timed out. Skipping SIGKILL.", u->meta.id);
2817                         service_enter_stop_post(s, false);
2818                 }
2819
2820                 break;
2821
2822         case SERVICE_STOP_SIGKILL:
2823                 /* Uh, we sent a SIGKILL and it is still not gone?
2824                  * Must be something we cannot kill, so let's just be
2825                  * weirded out and continue */
2826
2827                 log_warning("%s still around after SIGKILL. Ignoring.", u->meta.id);
2828                 service_enter_stop_post(s, false);
2829                 break;
2830
2831         case SERVICE_STOP_POST:
2832                 log_warning("%s stopping timed out (2). Terminating.", u->meta.id);
2833                 service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
2834                 break;
2835
2836         case SERVICE_FINAL_SIGTERM:
2837                 if (s->exec_context.send_sigkill) {
2838                         log_warning("%s stopping timed out (2). Killing.", u->meta.id);
2839                         service_enter_signal(s, SERVICE_FINAL_SIGKILL, false);
2840                 } else {
2841                         log_warning("%s stopping timed out (2). Skipping SIGKILL. Entering failed mode.", u->meta.id);
2842                         service_enter_dead(s, false, true);
2843                 }
2844
2845                 break;
2846
2847         case SERVICE_FINAL_SIGKILL:
2848                 log_warning("%s still around after SIGKILL (2). Entering failed mode.", u->meta.id);
2849                 service_enter_dead(s, false, true);
2850                 break;
2851
2852         case SERVICE_AUTO_RESTART:
2853                 log_info("%s holdoff time over, scheduling restart.", u->meta.id);
2854                 service_enter_restart(s);
2855                 break;
2856
2857         default:
2858                 assert_not_reached("Timeout at wrong time.");
2859         }
2860 }
2861
2862 static void service_cgroup_notify_event(Unit *u) {
2863         Service *s = SERVICE(u);
2864
2865         assert(u);
2866
2867         log_debug("%s: cgroup is empty", u->meta.id);
2868
2869         switch (s->state) {
2870
2871                 /* Waiting for SIGCHLD is usually more interesting,
2872                  * because it includes return codes/signals. Which is
2873                  * why we ignore the cgroup events for most cases,
2874                  * except when we don't know pid which to expect the
2875                  * SIGCHLD for. */
2876
2877         case SERVICE_RUNNING:
2878                 service_enter_running(s, true);
2879                 break;
2880
2881         case SERVICE_STOP_SIGTERM:
2882         case SERVICE_STOP_SIGKILL:
2883
2884                 if (main_pid_good(s) <= 0 && !control_pid_good(s))
2885                         service_enter_stop_post(s, true);
2886
2887                 break;
2888
2889         case SERVICE_FINAL_SIGTERM:
2890         case SERVICE_FINAL_SIGKILL:
2891                 if (main_pid_good(s) <= 0 && !control_pid_good(s))
2892                         service_enter_dead(s, true, true);
2893
2894                 break;
2895
2896         default:
2897                 ;
2898         }
2899 }
2900
2901 static void service_notify_message(Unit *u, pid_t pid, char **tags) {
2902         Service *s = SERVICE(u);
2903         const char *e;
2904
2905         assert(u);
2906
2907         if (s->notify_access == NOTIFY_NONE) {
2908                 log_warning("%s: Got notification message from PID %lu, but reception is disabled.",
2909                             u->meta.id, (unsigned long) pid);
2910                 return;
2911         }
2912
2913         if (s->notify_access == NOTIFY_MAIN && pid != s->main_pid) {
2914                 log_warning("%s: Got notification message from PID %lu, but reception only permitted for PID %lu",
2915                             u->meta.id, (unsigned long) pid, (unsigned long) s->main_pid);
2916                 return;
2917         }
2918
2919         log_debug("%s: Got message", u->meta.id);
2920
2921         /* Interpret MAINPID= */
2922         if ((e = strv_find_prefix(tags, "MAINPID=")) &&
2923             (s->state == SERVICE_START ||
2924              s->state == SERVICE_START_POST ||
2925              s->state == SERVICE_RUNNING ||
2926              s->state == SERVICE_RELOAD)) {
2927
2928                 if (parse_pid(e + 8, &pid) < 0)
2929                         log_warning("Failed to parse notification message %s", e);
2930                 else {
2931                         log_debug("%s: got %s", u->meta.id, e);
2932                         service_set_main_pid(s, pid);
2933                 }
2934         }
2935
2936         /* Interpret READY= */
2937         if (s->type == SERVICE_NOTIFY &&
2938             s->state == SERVICE_START &&
2939             strv_find(tags, "READY=1")) {
2940                 log_debug("%s: got READY=1", u->meta.id);
2941
2942                 service_enter_start_post(s);
2943         }
2944
2945         /* Interpret STATUS= */
2946         if ((e = strv_find_prefix(tags, "STATUS="))) {
2947                 char *t;
2948
2949                 if (e[7]) {
2950                         if (!(t = strdup(e+7))) {
2951                                 log_error("Failed to allocate string.");
2952                                 return;
2953                         }
2954
2955                         log_debug("%s: got %s", u->meta.id, e);
2956
2957                         free(s->status_text);
2958                         s->status_text = t;
2959                 } else {
2960                         free(s->status_text);
2961                         s->status_text = NULL;
2962                 }
2963
2964         }
2965
2966         /* Notify clients about changed status or main pid */
2967         unit_add_to_dbus_queue(u);
2968 }
2969
2970 #ifdef HAVE_SYSV_COMPAT
2971 static int service_enumerate(Manager *m) {
2972         char **p;
2973         unsigned i;
2974         DIR *d = NULL;
2975         char *path = NULL, *fpath = NULL, *name = NULL;
2976         Set *runlevel_services[ELEMENTSOF(rcnd_table)], *shutdown_services = NULL;
2977         Unit *service;
2978         Iterator j;
2979         int r;
2980
2981         assert(m);
2982
2983         if (m->running_as != MANAGER_SYSTEM)
2984                 return 0;
2985
2986         zero(runlevel_services);
2987
2988         STRV_FOREACH(p, m->lookup_paths.sysvrcnd_path)
2989                 for (i = 0; i < ELEMENTSOF(rcnd_table); i ++) {
2990                         struct dirent *de;
2991
2992                         free(path);
2993                         path = join(*p, "/", rcnd_table[i].path, NULL);
2994                         if (!path) {
2995                                 r = -ENOMEM;
2996                                 goto finish;
2997                         }
2998
2999                         if (d)
3000                                 closedir(d);
3001
3002                         if (!(d = opendir(path))) {
3003                                 if (errno != ENOENT)
3004                                         log_warning("opendir() failed on %s: %s", path, strerror(errno));
3005
3006                                 continue;
3007                         }
3008
3009                         while ((de = readdir(d))) {
3010                                 int a, b;
3011
3012                                 if (ignore_file(de->d_name))
3013                                         continue;
3014
3015                                 if (de->d_name[0] != 'S' && de->d_name[0] != 'K')
3016                                         continue;
3017
3018                                 if (strlen(de->d_name) < 4)
3019                                         continue;
3020
3021                                 a = undecchar(de->d_name[1]);
3022                                 b = undecchar(de->d_name[2]);
3023
3024                                 if (a < 0 || b < 0)
3025                                         continue;
3026
3027                                 free(fpath);
3028                                 fpath = join(path, "/", de->d_name, NULL);
3029                                 if (!path) {
3030                                         r = -ENOMEM;
3031                                         goto finish;
3032                                 }
3033
3034                                 if (access(fpath, X_OK) < 0) {
3035
3036                                         if (errno != ENOENT)
3037                                                 log_warning("access() failed on %s: %s", fpath, strerror(errno));
3038
3039                                         continue;
3040                                 }
3041
3042                                 free(name);
3043                                 if (!(name = sysv_translate_name(de->d_name + 3))) {
3044                                         r = -ENOMEM;
3045                                         goto finish;
3046                                 }
3047
3048                                 if ((r = manager_load_unit_prepare(m, name, NULL, NULL, &service)) < 0) {
3049                                         log_warning("Failed to prepare unit %s: %s", name, strerror(-r));
3050                                         continue;
3051                                 }
3052
3053                                 if (de->d_name[0] == 'S')  {
3054
3055                                         if (rcnd_table[i].type == RUNLEVEL_UP || rcnd_table[i].type == RUNLEVEL_SYSINIT) {
3056                                                 SERVICE(service)->sysv_start_priority_from_rcnd =
3057                                                         MAX(a*10 + b, SERVICE(service)->sysv_start_priority_from_rcnd);
3058
3059                                                 SERVICE(service)->sysv_enabled = true;
3060                                         }
3061
3062                                         if ((r = set_ensure_allocated(&runlevel_services[i], trivial_hash_func, trivial_compare_func)) < 0)
3063                                                 goto finish;
3064
3065                                         if ((r = set_put(runlevel_services[i], service)) < 0)
3066                                                 goto finish;
3067
3068                                 } else if (de->d_name[0] == 'K' &&
3069                                            (rcnd_table[i].type == RUNLEVEL_DOWN ||
3070                                             rcnd_table[i].type == RUNLEVEL_SYSINIT)) {
3071
3072                                         if ((r = set_ensure_allocated(&shutdown_services, trivial_hash_func, trivial_compare_func)) < 0)
3073                                                 goto finish;
3074
3075                                         if ((r = set_put(shutdown_services, service)) < 0)
3076                                                 goto finish;
3077                                 }
3078                         }
3079                 }
3080
3081         /* Now we loaded all stubs and are aware of the lowest
3082         start-up priority for all services, not let's actually load
3083         the services, this will also tell us which services are
3084         actually native now */
3085         manager_dispatch_load_queue(m);
3086
3087         /* If this is a native service, rely on native ways to pull in
3088          * a service, don't pull it in via sysv rcN.d links. */
3089         for (i = 0; i < ELEMENTSOF(rcnd_table); i ++)
3090                 SET_FOREACH(service, runlevel_services[i], j) {
3091                         service = unit_follow_merge(service);
3092
3093                         if (service->meta.fragment_path)
3094                                 continue;
3095
3096                         if ((r = unit_add_two_dependencies_by_name_inverse(service, UNIT_AFTER, UNIT_WANTS, rcnd_table[i].target, NULL, true)) < 0)
3097                                 goto finish;
3098                 }
3099
3100         /* We honour K links only for halt/reboot. For the normal
3101          * runlevels we assume the stop jobs will be implicitly added
3102          * by the core logic. Also, we don't really distinguish here
3103          * between the runlevels 0 and 6 and just add them to the
3104          * special shutdown target. On SUSE the boot.d/ runlevel is
3105          * also used for shutdown, so we add links for that too to the
3106          * shutdown target.*/
3107         SET_FOREACH(service, shutdown_services, j) {
3108                 service = unit_follow_merge(service);
3109
3110                 if (service->meta.fragment_path)
3111                         continue;
3112
3113                 if ((r = unit_add_two_dependencies_by_name(service, UNIT_BEFORE, UNIT_CONFLICTS, SPECIAL_SHUTDOWN_TARGET, NULL, true)) < 0)
3114                         goto finish;
3115         }
3116
3117         r = 0;
3118
3119 finish:
3120         free(path);
3121         free(fpath);
3122         free(name);
3123
3124         for (i = 0; i < ELEMENTSOF(rcnd_table); i++)
3125                 set_free(runlevel_services[i]);
3126         set_free(shutdown_services);
3127
3128         if (d)
3129                 closedir(d);
3130
3131         return r;
3132 }
3133 #endif
3134
3135 static void service_bus_name_owner_change(
3136                 Unit *u,
3137                 const char *name,
3138                 const char *old_owner,
3139                 const char *new_owner) {
3140
3141         Service *s = SERVICE(u);
3142
3143         assert(s);
3144         assert(name);
3145
3146         assert(streq(s->bus_name, name));
3147         assert(old_owner || new_owner);
3148
3149         if (old_owner && new_owner)
3150                 log_debug("%s's D-Bus name %s changed owner from %s to %s", u->meta.id, name, old_owner, new_owner);
3151         else if (old_owner)
3152                 log_debug("%s's D-Bus name %s no longer registered by %s", u->meta.id, name, old_owner);
3153         else
3154                 log_debug("%s's D-Bus name %s now registered by %s", u->meta.id, name, new_owner);
3155
3156         s->bus_name_good = !!new_owner;
3157
3158         if (s->type == SERVICE_DBUS) {
3159
3160                 /* service_enter_running() will figure out what to
3161                  * do */
3162                 if (s->state == SERVICE_RUNNING)
3163                         service_enter_running(s, true);
3164                 else if (s->state == SERVICE_START && new_owner)
3165                         service_enter_start_post(s);
3166
3167         } else if (new_owner &&
3168                    s->main_pid <= 0 &&
3169                    (s->state == SERVICE_START ||
3170                     s->state == SERVICE_START_POST ||
3171                     s->state == SERVICE_RUNNING ||
3172                     s->state == SERVICE_RELOAD)) {
3173
3174                 /* Try to acquire PID from bus service */
3175                 log_debug("Trying to acquire PID from D-Bus name...");
3176
3177                 bus_query_pid(u->meta.manager, name);
3178         }
3179 }
3180
3181 static void service_bus_query_pid_done(
3182                 Unit *u,
3183                 const char *name,
3184                 pid_t pid) {
3185
3186         Service *s = SERVICE(u);
3187
3188         assert(s);
3189         assert(name);
3190
3191         log_debug("%s's D-Bus name %s is now owned by process %u", u->meta.id, name, (unsigned) pid);
3192
3193         if (s->main_pid <= 0 &&
3194             (s->state == SERVICE_START ||
3195              s->state == SERVICE_START_POST ||
3196              s->state == SERVICE_RUNNING ||
3197              s->state == SERVICE_RELOAD))
3198                 service_set_main_pid(s, pid);
3199 }
3200
3201 int service_set_socket_fd(Service *s, int fd, Socket *sock) {
3202         assert(s);
3203         assert(fd >= 0);
3204
3205         /* This is called by the socket code when instantiating a new
3206          * service for a stream socket and the socket needs to be
3207          * configured. */
3208
3209         if (s->meta.load_state != UNIT_LOADED)
3210                 return -EINVAL;
3211
3212         if (s->socket_fd >= 0)
3213                 return -EBUSY;
3214
3215         if (s->state != SERVICE_DEAD)
3216                 return -EAGAIN;
3217
3218         s->socket_fd = fd;
3219         s->got_socket_fd = true;
3220         s->accept_socket = sock;
3221
3222         return 0;
3223 }
3224
3225 static void service_reset_failed(Unit *u) {
3226         Service *s = SERVICE(u);
3227
3228         assert(s);
3229
3230         if (s->state == SERVICE_FAILED)
3231                 service_set_state(s, SERVICE_DEAD);
3232
3233         s->failure = false;
3234 }
3235
3236 static bool service_need_daemon_reload(Unit *u) {
3237         Service *s = SERVICE(u);
3238
3239         assert(s);
3240
3241 #ifdef HAVE_SYSV_COMPAT
3242         if (s->sysv_path) {
3243                 struct stat st;
3244
3245                 zero(st);
3246                 if (stat(s->sysv_path, &st) < 0)
3247                         /* What, cannot access this anymore? */
3248                         return true;
3249
3250                 if (s->sysv_mtime > 0 &&
3251                     timespec_load(&st.st_mtim) != s->sysv_mtime)
3252                         return true;
3253         }
3254 #endif
3255
3256         return false;
3257 }
3258
3259 static int service_kill(Unit *u, KillWho who, KillMode mode, int signo, DBusError *error) {
3260         Service *s = SERVICE(u);
3261         int r = 0;
3262         Set *pid_set = NULL;
3263
3264         assert(s);
3265
3266         if (s->main_pid <= 0 && who == KILL_MAIN) {
3267                 dbus_set_error(error, BUS_ERROR_NO_SUCH_PROCESS, "No main process to kill");
3268                 return -ESRCH;
3269         }
3270
3271         if (s->control_pid <= 0 && who == KILL_CONTROL) {
3272                 dbus_set_error(error, BUS_ERROR_NO_SUCH_PROCESS, "No control process to kill");
3273                 return -ESRCH;
3274         }
3275
3276         if (who == KILL_CONTROL || who == KILL_ALL)
3277                 if (s->control_pid > 0)
3278                         if (kill(s->control_pid, signo) < 0)
3279                                 r = -errno;
3280
3281         if (who == KILL_MAIN || who == KILL_ALL)
3282                 if (s->main_pid > 0)
3283                         if (kill(s->main_pid, signo) < 0)
3284                                 r = -errno;
3285
3286         if (who == KILL_ALL && mode == KILL_CONTROL_GROUP) {
3287                 int q;
3288
3289                 if (!(pid_set = set_new(trivial_hash_func, trivial_compare_func)))
3290                         return -ENOMEM;
3291
3292                 /* Exclude the control/main pid from being killed via the cgroup */
3293                 if (s->control_pid > 0)
3294                         if ((q = set_put(pid_set, LONG_TO_PTR(s->control_pid))) < 0) {
3295                                 r = q;
3296                                 goto finish;
3297                         }
3298
3299                 if (s->main_pid > 0)
3300                         if ((q = set_put(pid_set, LONG_TO_PTR(s->main_pid))) < 0) {
3301                                 r = q;
3302                                 goto finish;
3303                         }
3304
3305                 if ((q = cgroup_bonding_kill_list(s->meta.cgroup_bondings, signo, false, pid_set)) < 0)
3306                         if (q != -EAGAIN && q != -ESRCH && q != -ENOENT)
3307                                 r = q;
3308         }
3309
3310 finish:
3311         if (pid_set)
3312                 set_free(pid_set);
3313
3314         return r;
3315 }
3316
3317 static const char* const service_state_table[_SERVICE_STATE_MAX] = {
3318         [SERVICE_DEAD] = "dead",
3319         [SERVICE_START_PRE] = "start-pre",
3320         [SERVICE_START] = "start",
3321         [SERVICE_START_POST] = "start-post",
3322         [SERVICE_RUNNING] = "running",
3323         [SERVICE_EXITED] = "exited",
3324         [SERVICE_RELOAD] = "reload",
3325         [SERVICE_STOP] = "stop",
3326         [SERVICE_STOP_SIGTERM] = "stop-sigterm",
3327         [SERVICE_STOP_SIGKILL] = "stop-sigkill",
3328         [SERVICE_STOP_POST] = "stop-post",
3329         [SERVICE_FINAL_SIGTERM] = "final-sigterm",
3330         [SERVICE_FINAL_SIGKILL] = "final-sigkill",
3331         [SERVICE_FAILED] = "failed",
3332         [SERVICE_AUTO_RESTART] = "auto-restart",
3333 };
3334
3335 DEFINE_STRING_TABLE_LOOKUP(service_state, ServiceState);
3336
3337 static const char* const service_restart_table[_SERVICE_RESTART_MAX] = {
3338         [SERVICE_RESTART_NO] = "no",
3339         [SERVICE_RESTART_ON_SUCCESS] = "on-success",
3340         [SERVICE_RESTART_ON_FAILURE] = "on-failure",
3341         [SERVICE_RESTART_ON_ABORT] = "on-abort",
3342         [SERVICE_RESTART_ALWAYS] = "always"
3343 };
3344
3345 DEFINE_STRING_TABLE_LOOKUP(service_restart, ServiceRestart);
3346
3347 static const char* const service_type_table[_SERVICE_TYPE_MAX] = {
3348         [SERVICE_SIMPLE] = "simple",
3349         [SERVICE_FORKING] = "forking",
3350         [SERVICE_ONESHOT] = "oneshot",
3351         [SERVICE_DBUS] = "dbus",
3352         [SERVICE_NOTIFY] = "notify"
3353 };
3354
3355 DEFINE_STRING_TABLE_LOOKUP(service_type, ServiceType);
3356
3357 static const char* const service_exec_command_table[_SERVICE_EXEC_COMMAND_MAX] = {
3358         [SERVICE_EXEC_START_PRE] = "ExecStartPre",
3359         [SERVICE_EXEC_START] = "ExecStart",
3360         [SERVICE_EXEC_START_POST] = "ExecStartPost",
3361         [SERVICE_EXEC_RELOAD] = "ExecReload",
3362         [SERVICE_EXEC_STOP] = "ExecStop",
3363         [SERVICE_EXEC_STOP_POST] = "ExecStopPost",
3364 };
3365
3366 DEFINE_STRING_TABLE_LOOKUP(service_exec_command, ServiceExecCommand);
3367
3368 static const char* const notify_access_table[_NOTIFY_ACCESS_MAX] = {
3369         [NOTIFY_NONE] = "none",
3370         [NOTIFY_MAIN] = "main",
3371         [NOTIFY_ALL] = "all"
3372 };
3373
3374 DEFINE_STRING_TABLE_LOOKUP(notify_access, NotifyAccess);
3375
3376 const UnitVTable service_vtable = {
3377         .suffix = ".service",
3378         .sections =
3379                 "Unit\0"
3380                 "Service\0"
3381                 "Install\0",
3382         .show_status = true,
3383
3384         .init = service_init,
3385         .done = service_done,
3386         .load = service_load,
3387
3388         .coldplug = service_coldplug,
3389
3390         .dump = service_dump,
3391
3392         .start = service_start,
3393         .stop = service_stop,
3394         .reload = service_reload,
3395
3396         .can_reload = service_can_reload,
3397
3398         .kill = service_kill,
3399
3400         .serialize = service_serialize,
3401         .deserialize_item = service_deserialize_item,
3402
3403         .active_state = service_active_state,
3404         .sub_state_to_string = service_sub_state_to_string,
3405
3406         .check_gc = service_check_gc,
3407         .check_snapshot = service_check_snapshot,
3408
3409         .sigchld_event = service_sigchld_event,
3410         .timer_event = service_timer_event,
3411
3412         .reset_failed = service_reset_failed,
3413
3414         .need_daemon_reload = service_need_daemon_reload,
3415
3416         .cgroup_notify_empty = service_cgroup_notify_event,
3417         .notify_message = service_notify_message,
3418
3419         .bus_name_owner_change = service_bus_name_owner_change,
3420         .bus_query_pid_done = service_bus_query_pid_done,
3421
3422         .bus_interface = "org.freedesktop.systemd1.Service",
3423         .bus_message_handler = bus_service_message_handler,
3424         .bus_invalidating_properties =  bus_service_invalidating_properties,
3425
3426 #ifdef HAVE_SYSV_COMPAT
3427         .enumerate = service_enumerate
3428 #endif
3429 };