chiark / gitweb /
service: handle forking services that move to a new PID
[elogind.git] / 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_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 (state == LSB_DESCRIPTION) {
787
788                                 if (startswith(l, "#\t") || startswith(l, "#  ")) {
789                                         char *j;
790
791                                         if ((j = strstrip(t)) && *j) {
792                                                 char *d = NULL;
793
794                                                 if (long_description)
795                                                         d = join(long_description, " ", t, NULL);
796                                                 else
797                                                         d = strdup(j);
798
799                                                 if (!d) {
800                                                         r = -ENOMEM;
801                                                         goto finish;
802                                                 }
803
804                                                 free(long_description);
805                                                 long_description = d;
806                                         }
807
808                                 } else
809                                         state = LSB;
810                         }
811                 }
812         }
813
814         if ((r = sysv_exec_commands(s)) < 0)
815                 goto finish;
816
817         if (s->sysv_runlevels && !chars_intersect(RUNLEVELS_UP, s->sysv_runlevels)) {
818                 /* If there a runlevels configured for this service
819                  * but none of the standard ones, then we assume this
820                  * is some special kind of service (which might be
821                  * needed for early boot) and don't create any links
822                  * to it. */
823
824                 s->meta.default_dependencies = false;
825
826                 /* Don't timeout special services during boot (like fsck) */
827                 s->timeout_usec = 0;
828         } else
829                 s->timeout_usec = DEFAULT_SYSV_TIMEOUT_USEC;
830
831         /* Special setting for all SysV services */
832         s->type = SERVICE_FORKING;
833         s->remain_after_exit = !s->pid_file;
834         s->restart = SERVICE_RESTART_NO;
835         s->exec_context.std_output =
836                 (s->meta.manager->sysv_console || s->exec_context.std_input == EXEC_INPUT_TTY)
837                 ? EXEC_OUTPUT_TTY : s->meta.manager->default_std_output;
838         s->exec_context.kill_mode = KILL_PROCESS;
839
840         /* We use the long description only if
841          * no short description is set. */
842
843         if (short_description)
844                 description = short_description;
845         else if (chkconfig_description)
846                 description = chkconfig_description;
847         else if (long_description)
848                 description = long_description;
849         else
850                 description = NULL;
851
852         if (description) {
853                 char *d;
854
855                 if (!(d = strappend(s->sysv_has_lsb ? "LSB: " : "SYSV: ", description))) {
856                         r = -ENOMEM;
857                         goto finish;
858                 }
859
860                 u->meta.description = d;
861         }
862
863         /* The priority that has been set in /etc/rcN.d/ hierarchies
864          * takes precedence over what is stored as default in the LSB
865          * header */
866         if (s->sysv_start_priority_from_rcnd >= 0)
867                 s->sysv_start_priority = s->sysv_start_priority_from_rcnd;
868
869         u->meta.load_state = UNIT_LOADED;
870         r = 0;
871
872 finish:
873
874         if (f)
875                 fclose(f);
876
877         free(short_description);
878         free(long_description);
879         free(chkconfig_description);
880
881         return r;
882 }
883
884 static int service_load_sysv_name(Service *s, const char *name) {
885         char **p;
886
887         assert(s);
888         assert(name);
889
890         /* For SysV services we strip the boot.*, rc.* and *.sh
891          * prefixes/suffixes. */
892 #if defined(TARGET_DEBIAN) || defined(TARGET_UBUNTU) || defined(TARGET_ANGSTROM)
893         if (endswith(name, ".sh.service"))
894                 return -ENOENT;
895 #endif
896
897 #ifdef TARGET_SUSE
898         if (startswith(name, "boot."))
899                 return -ENOENT;
900 #endif
901
902 #ifdef TARGET_FRUGALWARE
903         if (startswith(name, "rc."))
904                 return -ENOENT;
905 #endif
906
907         STRV_FOREACH(p, s->meta.manager->lookup_paths.sysvinit_path) {
908                 char *path;
909                 int r;
910
911                 path = join(*p, "/", name, NULL);
912                 if (!path)
913                         return -ENOMEM;
914
915                 assert(endswith(path, ".service"));
916                 path[strlen(path)-8] = 0;
917
918                 r = service_load_sysv_path(s, path);
919
920 #if defined(TARGET_DEBIAN) || defined(TARGET_UBUNTU) || defined(TARGET_ANGSTROM)
921                 if (r >= 0 && s->meta.load_state == UNIT_STUB) {
922                         /* Try Debian style *.sh source'able init scripts */
923                         strcat(path, ".sh");
924                         r = service_load_sysv_path(s, path);
925                 }
926 #endif
927                 free(path);
928
929 #ifdef TARGET_SUSE
930                 if (r >= 0 && s->meta.load_state == UNIT_STUB) {
931                         /* Try SUSE style boot.* init scripts */
932
933                         path = join(*p, "/boot.", name, NULL);
934                         if (!path)
935                                 return -ENOMEM;
936
937                         /* Drop .service suffix */
938                         path[strlen(path)-8] = 0;
939                         r = service_load_sysv_path(s, path);
940                         free(path);
941                 }
942 #endif
943
944 #ifdef TARGET_FRUGALWARE
945                 if (r >= 0 && s->meta.load_state == UNIT_STUB) {
946                         /* Try Frugalware style rc.* init scripts */
947
948                         path = join(*p, "/rc.", name, NULL);
949                         if (!path)
950                                 return -ENOMEM;
951
952                         /* Drop .service suffix */
953                         path[strlen(path)-8] = 0;
954                         r = service_load_sysv_path(s, path);
955                         free(path);
956                 }
957 #endif
958
959                 if (r < 0)
960                         return r;
961
962                 if ((s->meta.load_state != UNIT_STUB))
963                         break;
964         }
965
966         return 0;
967 }
968
969 static int service_load_sysv(Service *s) {
970         const char *t;
971         Iterator i;
972         int r;
973
974         assert(s);
975
976         /* Load service data from SysV init scripts, preferably with
977          * LSB headers ... */
978
979         if (strv_isempty(s->meta.manager->lookup_paths.sysvinit_path))
980                 return 0;
981
982         if ((t = s->meta.id))
983                 if ((r = service_load_sysv_name(s, t)) < 0)
984                         return r;
985
986         if (s->meta.load_state == UNIT_STUB)
987                 SET_FOREACH(t, s->meta.names, i) {
988                         if (t == s->meta.id)
989                                 continue;
990
991                         if ((r = service_load_sysv_name(s, t)) < 0)
992                                 return r;
993
994                         if (s->meta.load_state != UNIT_STUB)
995                                 break;
996                 }
997
998         return 0;
999 }
1000 #endif
1001
1002 static int fsck_fix_order(Service *s) {
1003         Meta *other;
1004         int r;
1005
1006         assert(s);
1007
1008         if (s->fsck_passno <= 0)
1009                 return 0;
1010
1011         /* For each pair of services where both have an fsck priority
1012          * we order things based on it. */
1013
1014         LIST_FOREACH(units_by_type, other, s->meta.manager->units_by_type[UNIT_SERVICE]) {
1015                 Service *t;
1016                 UnitDependency d;
1017
1018                 t = (Service*) other;
1019
1020                 if (s == t)
1021                         continue;
1022
1023                 if (t->meta.load_state != UNIT_LOADED)
1024                         continue;
1025
1026                 if (t->fsck_passno <= 0)
1027                         continue;
1028
1029                 if (t->fsck_passno < s->fsck_passno)
1030                         d = UNIT_AFTER;
1031                 else if (t->fsck_passno > s->fsck_passno)
1032                         d = UNIT_BEFORE;
1033                 else
1034                         continue;
1035
1036                 if ((r = unit_add_dependency(UNIT(s), d, UNIT(t), true)) < 0)
1037                         return r;
1038         }
1039
1040         return 0;
1041 }
1042
1043 static int service_verify(Service *s) {
1044         assert(s);
1045
1046         if (s->meta.load_state != UNIT_LOADED)
1047                 return 0;
1048
1049         if (!s->exec_command[SERVICE_EXEC_START]) {
1050                 log_error("%s lacks ExecStart setting. Refusing.", s->meta.id);
1051                 return -EINVAL;
1052         }
1053
1054         if (s->type != SERVICE_ONESHOT &&
1055             s->exec_command[SERVICE_EXEC_START]->command_next) {
1056                 log_error("%s has more than one ExecStart setting, which is only allowed for Type=oneshot services. Refusing.", s->meta.id);
1057                 return -EINVAL;
1058         }
1059
1060         if (s->type == SERVICE_ONESHOT &&
1061             s->exec_command[SERVICE_EXEC_RELOAD]) {
1062                 log_error("%s has an ExecReload setting, which is not allowed for Type=oneshot services. Refusing.", s->meta.id);
1063                 return -EINVAL;
1064         }
1065
1066         if (s->type == SERVICE_DBUS && !s->bus_name) {
1067                 log_error("%s is of type D-Bus but no D-Bus service name has been specified. Refusing.", s->meta.id);
1068                 return -EINVAL;
1069         }
1070
1071         if (s->exec_context.pam_name && s->exec_context.kill_mode != KILL_CONTROL_GROUP) {
1072                 log_error("%s has PAM enabled. Kill mode must be set to 'control-group'. Refusing.", s->meta.id);
1073                 return -EINVAL;
1074         }
1075
1076         return 0;
1077 }
1078
1079 static int service_add_default_dependencies(Service *s) {
1080         int r;
1081
1082         assert(s);
1083
1084         /* Add a number of automatic dependencies useful for the
1085          * majority of services. */
1086
1087         /* First, pull in base system */
1088         if (s->meta.manager->running_as == MANAGER_SYSTEM) {
1089
1090                 if ((r = unit_add_two_dependencies_by_name(UNIT(s), UNIT_AFTER, UNIT_REQUIRES, SPECIAL_BASIC_TARGET, NULL, true)) < 0)
1091                         return r;
1092
1093         } else if (s->meta.manager->running_as == MANAGER_USER) {
1094
1095                 if ((r = unit_add_two_dependencies_by_name(UNIT(s), UNIT_AFTER, UNIT_REQUIRES, SPECIAL_SOCKETS_TARGET, NULL, true)) < 0)
1096                         return r;
1097         }
1098
1099         /* Second, activate normal shutdown */
1100         return unit_add_two_dependencies_by_name(UNIT(s), UNIT_BEFORE, UNIT_CONFLICTS, SPECIAL_SHUTDOWN_TARGET, NULL, true);
1101 }
1102
1103 static int service_load(Unit *u) {
1104         int r;
1105         Service *s = SERVICE(u);
1106
1107         assert(s);
1108
1109         /* Load a .service file */
1110         if ((r = unit_load_fragment(u)) < 0)
1111                 return r;
1112
1113 #ifdef HAVE_SYSV_COMPAT
1114         /* Load a classic init script as a fallback, if we couldn't find anything */
1115         if (u->meta.load_state == UNIT_STUB)
1116                 if ((r = service_load_sysv(s)) < 0)
1117                         return r;
1118 #endif
1119
1120         /* Still nothing found? Then let's give up */
1121         if (u->meta.load_state == UNIT_STUB)
1122                 return -ENOENT;
1123
1124         /* We were able to load something, then let's add in the
1125          * dropin directories. */
1126         if ((r = unit_load_dropin(unit_follow_merge(u))) < 0)
1127                 return r;
1128
1129         /* This is a new unit? Then let's add in some extras */
1130         if (u->meta.load_state == UNIT_LOADED) {
1131                 if ((r = unit_add_exec_dependencies(u, &s->exec_context)) < 0)
1132                         return r;
1133
1134                 if ((r = unit_add_default_cgroups(u)) < 0)
1135                         return r;
1136
1137 #ifdef HAVE_SYSV_COMPAT
1138                 if ((r = sysv_fix_order(s)) < 0)
1139                         return r;
1140 #endif
1141
1142                 if ((r = fsck_fix_order(s)) < 0)
1143                         return r;
1144
1145                 if (s->bus_name)
1146                         if ((r = unit_watch_bus_name(u, s->bus_name)) < 0)
1147                                 return r;
1148
1149                 if (s->type == SERVICE_NOTIFY && s->notify_access == NOTIFY_NONE)
1150                         s->notify_access = NOTIFY_MAIN;
1151
1152                 if (s->type == SERVICE_DBUS || s->bus_name)
1153                         if ((r = unit_add_two_dependencies_by_name(u, UNIT_AFTER, UNIT_REQUIRES, SPECIAL_DBUS_SOCKET, NULL, true)) < 0)
1154                                 return r;
1155
1156                 if (s->meta.default_dependencies)
1157                         if ((r = service_add_default_dependencies(s)) < 0)
1158                                 return r;
1159         }
1160
1161         return service_verify(s);
1162 }
1163
1164 static void service_dump(Unit *u, FILE *f, const char *prefix) {
1165
1166         ServiceExecCommand c;
1167         Service *s = SERVICE(u);
1168         const char *prefix2;
1169         char *p2;
1170
1171         assert(s);
1172
1173         p2 = strappend(prefix, "\t");
1174         prefix2 = p2 ? p2 : prefix;
1175
1176         fprintf(f,
1177                 "%sService State: %s\n"
1178                 "%sPermissionsStartOnly: %s\n"
1179                 "%sRootDirectoryStartOnly: %s\n"
1180                 "%sRemainAfterExit: %s\n"
1181                 "%sGuessMainPID: %s\n"
1182                 "%sType: %s\n"
1183                 "%sRestart: %s\n"
1184                 "%sNotifyAccess: %s\n",
1185                 prefix, service_state_to_string(s->state),
1186                 prefix, yes_no(s->permissions_start_only),
1187                 prefix, yes_no(s->root_directory_start_only),
1188                 prefix, yes_no(s->remain_after_exit),
1189                 prefix, yes_no(s->guess_main_pid),
1190                 prefix, service_type_to_string(s->type),
1191                 prefix, service_restart_to_string(s->restart),
1192                 prefix, notify_access_to_string(s->notify_access));
1193
1194         if (s->control_pid > 0)
1195                 fprintf(f,
1196                         "%sControl PID: %lu\n",
1197                         prefix, (unsigned long) s->control_pid);
1198
1199         if (s->main_pid > 0)
1200                 fprintf(f,
1201                         "%sMain PID: %lu\n"
1202                         "%sMain PID Known: %s\n"
1203                         "%sMain PID Alien: %s\n",
1204                         prefix, (unsigned long) s->main_pid,
1205                         prefix, yes_no(s->main_pid_known),
1206                         prefix, yes_no(s->main_pid_alien));
1207
1208         if (s->pid_file)
1209                 fprintf(f,
1210                         "%sPIDFile: %s\n",
1211                         prefix, s->pid_file);
1212
1213         if (s->bus_name)
1214                 fprintf(f,
1215                         "%sBusName: %s\n"
1216                         "%sBus Name Good: %s\n",
1217                         prefix, s->bus_name,
1218                         prefix, yes_no(s->bus_name_good));
1219
1220         exec_context_dump(&s->exec_context, f, prefix);
1221
1222         for (c = 0; c < _SERVICE_EXEC_COMMAND_MAX; c++) {
1223
1224                 if (!s->exec_command[c])
1225                         continue;
1226
1227                 fprintf(f, "%s-> %s:\n",
1228                         prefix, service_exec_command_to_string(c));
1229
1230                 exec_command_dump_list(s->exec_command[c], f, prefix2);
1231         }
1232
1233 #ifdef HAVE_SYSV_COMPAT
1234         if (s->sysv_path)
1235                 fprintf(f,
1236                         "%sSysV Init Script Path: %s\n"
1237                         "%sSysV Init Script has LSB Header: %s\n"
1238                         "%sSysVEnabled: %s\n",
1239                         prefix, s->sysv_path,
1240                         prefix, yes_no(s->sysv_has_lsb),
1241                         prefix, yes_no(s->sysv_enabled));
1242
1243         if (s->sysv_start_priority >= 0)
1244                 fprintf(f,
1245                         "%sSysVStartPriority: %i\n",
1246                         prefix, s->sysv_start_priority);
1247
1248         if (s->sysv_runlevels)
1249                 fprintf(f, "%sSysVRunLevels: %s\n",
1250                         prefix, s->sysv_runlevels);
1251 #endif
1252
1253         if (s->fsck_passno > 0)
1254                 fprintf(f,
1255                         "%sFsckPassNo: %i\n",
1256                         prefix, s->fsck_passno);
1257
1258         if (s->status_text)
1259                 fprintf(f, "%sStatus Text: %s\n",
1260                         prefix, s->status_text);
1261
1262         free(p2);
1263 }
1264
1265 static int service_load_pid_file(Service *s) {
1266         char *k;
1267         int r;
1268         pid_t pid;
1269
1270         assert(s);
1271
1272         if (!s->pid_file)
1273                 return 0;
1274
1275         if ((r = read_one_line_file(s->pid_file, &k)) < 0)
1276                 return r;
1277
1278         r = parse_pid(k, &pid);
1279         free(k);
1280
1281         if (r < 0)
1282                 return r;
1283
1284         if (kill(pid, 0) < 0 && errno != EPERM) {
1285                 log_warning("PID %lu read from file %s does not exist. Your service or init script might be broken.",
1286                             (unsigned long) pid, s->pid_file);
1287                 return -ESRCH;
1288         }
1289
1290         if (s->main_pid_known) {
1291                 if (pid == s->main_pid)
1292                         return 0;
1293
1294                 log_debug("Main PID changing: %lu -> %lu",
1295                           (unsigned long) s->main_pid, (unsigned long) pid);
1296                 service_unwatch_main_pid(s);
1297                 s->main_pid_known = false;
1298         }
1299
1300         if ((r = service_set_main_pid(s, pid)) < 0)
1301                 return r;
1302
1303         if ((r = unit_watch_pid(UNIT(s), pid)) < 0)
1304                 /* FIXME: we need to do something here */
1305                 return r;
1306
1307         return 0;
1308 }
1309
1310 static int service_search_main_pid(Service *s) {
1311         pid_t pid;
1312         int r;
1313
1314         assert(s);
1315
1316         /* If we know it anyway, don't ever fallback to unreliable
1317          * heuristics */
1318         if (s->main_pid_known)
1319                 return 0;
1320
1321         if (!s->guess_main_pid)
1322                 return 0;
1323
1324         assert(s->main_pid <= 0);
1325
1326         if ((pid = cgroup_bonding_search_main_pid_list(s->meta.cgroup_bondings)) <= 0)
1327                 return -ENOENT;
1328
1329         if ((r = service_set_main_pid(s, pid)) < 0)
1330                 return r;
1331
1332         if ((r = unit_watch_pid(UNIT(s), pid)) < 0)
1333                 /* FIXME: we need to do something here */
1334                 return r;
1335
1336         return 0;
1337 }
1338
1339 static int service_get_sockets(Service *s, Set **_set) {
1340         Set *set;
1341         Iterator i;
1342         char *t;
1343         int r;
1344
1345         assert(s);
1346         assert(_set);
1347
1348         if (s->socket_fd >= 0)
1349                 return 0;
1350
1351         if (!set_isempty(s->configured_sockets))
1352                 return 0;
1353
1354         /* Collects all Socket objects that belong to this
1355          * service. Note that a service might have multiple sockets
1356          * via multiple names. */
1357
1358         if (!(set = set_new(NULL, NULL)))
1359                 return -ENOMEM;
1360
1361         SET_FOREACH(t, s->meta.names, i) {
1362                 char *k;
1363                 Unit *p;
1364
1365                 /* Look for all socket objects that go by any of our
1366                  * units and collect their fds */
1367
1368                 if (!(k = unit_name_change_suffix(t, ".socket"))) {
1369                         r = -ENOMEM;
1370                         goto fail;
1371                 }
1372
1373                 p = manager_get_unit(s->meta.manager, k);
1374                 free(k);
1375
1376                 if (!p)
1377                         continue;
1378
1379                 if ((r = set_put(set, p)) < 0)
1380                         goto fail;
1381         }
1382
1383         *_set = set;
1384         return 0;
1385
1386 fail:
1387         set_free(set);
1388         return r;
1389 }
1390
1391 static int service_notify_sockets_dead(Service *s) {
1392         Iterator i;
1393         Set *set, *free_set = NULL;
1394         Socket *sock;
1395         int r;
1396
1397         assert(s);
1398
1399         /* Notifies all our sockets when we die */
1400
1401         if (s->socket_fd >= 0)
1402                 return 0;
1403
1404         if (!set_isempty(s->configured_sockets))
1405                 set = s->configured_sockets;
1406         else {
1407                 if ((r = service_get_sockets(s, &free_set)) < 0)
1408                         return r;
1409
1410                 set = free_set;
1411         }
1412
1413         SET_FOREACH(sock, set, i)
1414                 socket_notify_service_dead(sock);
1415
1416         set_free(free_set);
1417
1418         return 0;
1419 }
1420
1421 static void service_set_state(Service *s, ServiceState state) {
1422         ServiceState old_state;
1423         assert(s);
1424
1425         old_state = s->state;
1426         s->state = state;
1427
1428         if (state != SERVICE_START_PRE &&
1429             state != SERVICE_START &&
1430             state != SERVICE_START_POST &&
1431             state != SERVICE_RELOAD &&
1432             state != SERVICE_STOP &&
1433             state != SERVICE_STOP_SIGTERM &&
1434             state != SERVICE_STOP_SIGKILL &&
1435             state != SERVICE_STOP_POST &&
1436             state != SERVICE_FINAL_SIGTERM &&
1437             state != SERVICE_FINAL_SIGKILL &&
1438             state != SERVICE_AUTO_RESTART)
1439                 unit_unwatch_timer(UNIT(s), &s->timer_watch);
1440
1441         if (state != SERVICE_START &&
1442             state != SERVICE_START_POST &&
1443             state != SERVICE_RUNNING &&
1444             state != SERVICE_RELOAD &&
1445             state != SERVICE_STOP &&
1446             state != SERVICE_STOP_SIGTERM &&
1447             state != SERVICE_STOP_SIGKILL) {
1448                 service_unwatch_main_pid(s);
1449                 s->main_command = NULL;
1450         }
1451
1452         if (state != SERVICE_START_PRE &&
1453             state != SERVICE_START &&
1454             state != SERVICE_START_POST &&
1455             state != SERVICE_RELOAD &&
1456             state != SERVICE_STOP &&
1457             state != SERVICE_STOP_SIGTERM &&
1458             state != SERVICE_STOP_SIGKILL &&
1459             state != SERVICE_STOP_POST &&
1460             state != SERVICE_FINAL_SIGTERM &&
1461             state != SERVICE_FINAL_SIGKILL) {
1462                 service_unwatch_control_pid(s);
1463                 s->control_command = NULL;
1464                 s->control_command_id = _SERVICE_EXEC_COMMAND_INVALID;
1465         }
1466
1467         if (state == SERVICE_DEAD ||
1468             state == SERVICE_STOP ||
1469             state == SERVICE_STOP_SIGTERM ||
1470             state == SERVICE_STOP_SIGKILL ||
1471             state == SERVICE_STOP_POST ||
1472             state == SERVICE_FINAL_SIGTERM ||
1473             state == SERVICE_FINAL_SIGKILL ||
1474             state == SERVICE_FAILED ||
1475             state == SERVICE_AUTO_RESTART)
1476                 service_notify_sockets_dead(s);
1477
1478         if (state != SERVICE_START_PRE &&
1479             state != SERVICE_START &&
1480             state != SERVICE_START_POST &&
1481             state != SERVICE_RUNNING &&
1482             state != SERVICE_RELOAD &&
1483             state != SERVICE_STOP &&
1484             state != SERVICE_STOP_SIGTERM &&
1485             state != SERVICE_STOP_SIGKILL &&
1486             state != SERVICE_STOP_POST &&
1487             state != SERVICE_FINAL_SIGTERM &&
1488             state != SERVICE_FINAL_SIGKILL &&
1489             !(state == SERVICE_DEAD && s->meta.job)) {
1490                 service_close_socket_fd(s);
1491                 service_connection_unref(s);
1492         }
1493
1494         /* For the inactive states unit_notify() will trim the cgroup,
1495          * but for exit we have to do that ourselves... */
1496         if (state == SERVICE_EXITED && s->meta.manager->n_reloading <= 0)
1497                 cgroup_bonding_trim_list(s->meta.cgroup_bondings, true);
1498
1499         if (old_state != state)
1500                 log_debug("%s changed %s -> %s", s->meta.id, service_state_to_string(old_state), service_state_to_string(state));
1501
1502         unit_notify(UNIT(s), state_translation_table[old_state], state_translation_table[state], !s->reload_failure);
1503         s->reload_failure = false;
1504 }
1505
1506 static int service_coldplug(Unit *u) {
1507         Service *s = SERVICE(u);
1508         int r;
1509
1510         assert(s);
1511         assert(s->state == SERVICE_DEAD);
1512
1513         if (s->deserialized_state != s->state) {
1514
1515                 if (s->deserialized_state == SERVICE_START_PRE ||
1516                     s->deserialized_state == SERVICE_START ||
1517                     s->deserialized_state == SERVICE_START_POST ||
1518                     s->deserialized_state == SERVICE_RELOAD ||
1519                     s->deserialized_state == SERVICE_STOP ||
1520                     s->deserialized_state == SERVICE_STOP_SIGTERM ||
1521                     s->deserialized_state == SERVICE_STOP_SIGKILL ||
1522                     s->deserialized_state == SERVICE_STOP_POST ||
1523                     s->deserialized_state == SERVICE_FINAL_SIGTERM ||
1524                     s->deserialized_state == SERVICE_FINAL_SIGKILL ||
1525                     s->deserialized_state == SERVICE_AUTO_RESTART) {
1526
1527                         if (s->deserialized_state == SERVICE_AUTO_RESTART || s->timeout_usec > 0) {
1528                                 usec_t k;
1529
1530                                 k = s->deserialized_state == SERVICE_AUTO_RESTART ? s->restart_usec : s->timeout_usec;
1531
1532                                 if ((r = unit_watch_timer(UNIT(s), k, &s->timer_watch)) < 0)
1533                                         return r;
1534                         }
1535                 }
1536
1537                 if ((s->deserialized_state == SERVICE_START &&
1538                      (s->type == SERVICE_FORKING ||
1539                       s->type == SERVICE_DBUS ||
1540                       s->type == SERVICE_ONESHOT ||
1541                       s->type == SERVICE_NOTIFY)) ||
1542                     s->deserialized_state == SERVICE_START_POST ||
1543                     s->deserialized_state == SERVICE_RUNNING ||
1544                     s->deserialized_state == SERVICE_RELOAD ||
1545                     s->deserialized_state == SERVICE_STOP ||
1546                     s->deserialized_state == SERVICE_STOP_SIGTERM ||
1547                     s->deserialized_state == SERVICE_STOP_SIGKILL)
1548                         if (s->main_pid > 0)
1549                                 if ((r = unit_watch_pid(UNIT(s), s->main_pid)) < 0)
1550                                         return r;
1551
1552                 if (s->deserialized_state == SERVICE_START_PRE ||
1553                     s->deserialized_state == SERVICE_START ||
1554                     s->deserialized_state == SERVICE_START_POST ||
1555                     s->deserialized_state == SERVICE_RELOAD ||
1556                     s->deserialized_state == SERVICE_STOP ||
1557                     s->deserialized_state == SERVICE_STOP_SIGTERM ||
1558                     s->deserialized_state == SERVICE_STOP_SIGKILL ||
1559                     s->deserialized_state == SERVICE_STOP_POST ||
1560                     s->deserialized_state == SERVICE_FINAL_SIGTERM ||
1561                     s->deserialized_state == SERVICE_FINAL_SIGKILL)
1562                         if (s->control_pid > 0)
1563                                 if ((r = unit_watch_pid(UNIT(s), s->control_pid)) < 0)
1564                                         return r;
1565
1566                 service_set_state(s, s->deserialized_state);
1567         }
1568
1569         return 0;
1570 }
1571
1572 static int service_collect_fds(Service *s, int **fds, unsigned *n_fds) {
1573         Iterator i;
1574         int r;
1575         int *rfds = NULL;
1576         unsigned rn_fds = 0;
1577         Set *set, *free_set = NULL;
1578         Socket *sock;
1579
1580         assert(s);
1581         assert(fds);
1582         assert(n_fds);
1583
1584         if (s->socket_fd >= 0)
1585                 return 0;
1586
1587         if (!set_isempty(s->configured_sockets))
1588                 set = s->configured_sockets;
1589         else {
1590                 if ((r = service_get_sockets(s, &free_set)) < 0)
1591                         return r;
1592
1593                 set = free_set;
1594         }
1595
1596         SET_FOREACH(sock, set, i) {
1597                 int *cfds;
1598                 unsigned cn_fds;
1599
1600                 if ((r = socket_collect_fds(sock, &cfds, &cn_fds)) < 0)
1601                         goto fail;
1602
1603                 if (!cfds)
1604                         continue;
1605
1606                 if (!rfds) {
1607                         rfds = cfds;
1608                         rn_fds = cn_fds;
1609                 } else {
1610                         int *t;
1611
1612                         if (!(t = new(int, rn_fds+cn_fds))) {
1613                                 free(cfds);
1614                                 r = -ENOMEM;
1615                                 goto fail;
1616                         }
1617
1618                         memcpy(t, rfds, rn_fds * sizeof(int));
1619                         memcpy(t+rn_fds, cfds, cn_fds * sizeof(int));
1620                         free(rfds);
1621                         free(cfds);
1622
1623                         rfds = t;
1624                         rn_fds = rn_fds+cn_fds;
1625                 }
1626         }
1627
1628         *fds = rfds;
1629         *n_fds = rn_fds;
1630
1631         set_free(free_set);
1632
1633         return 0;
1634
1635 fail:
1636         set_free(set);
1637         free(rfds);
1638
1639         return r;
1640 }
1641
1642 static int service_spawn(
1643                 Service *s,
1644                 ExecCommand *c,
1645                 bool timeout,
1646                 bool pass_fds,
1647                 bool apply_permissions,
1648                 bool apply_chroot,
1649                 bool apply_tty_stdin,
1650                 bool set_notify_socket,
1651                 pid_t *_pid) {
1652
1653         pid_t pid;
1654         int r;
1655         int *fds = NULL, *fdsbuf = NULL;
1656         unsigned n_fds = 0, n_env = 0;
1657         char **argv = NULL, **final_env = NULL, **our_env = NULL;
1658
1659         assert(s);
1660         assert(c);
1661         assert(_pid);
1662
1663         if (pass_fds ||
1664             s->exec_context.std_input == EXEC_INPUT_SOCKET ||
1665             s->exec_context.std_output == EXEC_OUTPUT_SOCKET ||
1666             s->exec_context.std_error == EXEC_OUTPUT_SOCKET) {
1667
1668                 if (s->socket_fd >= 0) {
1669                         fds = &s->socket_fd;
1670                         n_fds = 1;
1671                 } else {
1672                         if ((r = service_collect_fds(s, &fdsbuf, &n_fds)) < 0)
1673                                 goto fail;
1674
1675                         fds = fdsbuf;
1676                 }
1677         }
1678
1679         if (timeout && s->timeout_usec) {
1680                 if ((r = unit_watch_timer(UNIT(s), s->timeout_usec, &s->timer_watch)) < 0)
1681                         goto fail;
1682         } else
1683                 unit_unwatch_timer(UNIT(s), &s->timer_watch);
1684
1685         if (!(argv = unit_full_printf_strv(UNIT(s), c->argv))) {
1686                 r = -ENOMEM;
1687                 goto fail;
1688         }
1689
1690         if (!(our_env = new0(char*, 4))) {
1691                 r = -ENOMEM;
1692                 goto fail;
1693         }
1694
1695         if (set_notify_socket)
1696                 if (asprintf(our_env + n_env++, "NOTIFY_SOCKET=%s", s->meta.manager->notify_socket) < 0) {
1697                         r = -ENOMEM;
1698                         goto fail;
1699                 }
1700
1701         if (s->main_pid > 0)
1702                 if (asprintf(our_env + n_env++, "MAINPID=%lu", (unsigned long) s->main_pid) < 0) {
1703                         r = -ENOMEM;
1704                         goto fail;
1705                 }
1706
1707         if (!(final_env = strv_env_merge(2,
1708                                          s->meta.manager->environment,
1709                                          our_env,
1710                                          NULL))) {
1711                 r = -ENOMEM;
1712                 goto fail;
1713         }
1714
1715         r = exec_spawn(c,
1716                        argv,
1717                        &s->exec_context,
1718                        fds, n_fds,
1719                        final_env,
1720                        apply_permissions,
1721                        apply_chroot,
1722                        apply_tty_stdin,
1723                        s->meta.manager->confirm_spawn,
1724                        s->meta.cgroup_bondings,
1725                        s->meta.cgroup_attributes,
1726                        &pid);
1727
1728         if (r < 0)
1729                 goto fail;
1730
1731
1732         if ((r = unit_watch_pid(UNIT(s), pid)) < 0)
1733                 /* FIXME: we need to do something here */
1734                 goto fail;
1735
1736         free(fdsbuf);
1737         strv_free(argv);
1738         strv_free(our_env);
1739         strv_free(final_env);
1740
1741         *_pid = pid;
1742
1743         return 0;
1744
1745 fail:
1746         free(fdsbuf);
1747         strv_free(argv);
1748         strv_free(our_env);
1749         strv_free(final_env);
1750
1751         if (timeout)
1752                 unit_unwatch_timer(UNIT(s), &s->timer_watch);
1753
1754         return r;
1755 }
1756
1757 static int main_pid_good(Service *s) {
1758         assert(s);
1759
1760         /* Returns 0 if the pid is dead, 1 if it is good, -1 if we
1761          * don't know */
1762
1763         /* If we know the pid file, then lets just check if it is
1764          * still valid */
1765         if (s->main_pid_known) {
1766
1767                 /* If it's an alien child let's check if it is still
1768                  * alive ... */
1769                 if (s->main_pid_alien)
1770                         return kill(s->main_pid, 0) >= 0 || errno != ESRCH;
1771
1772                 /* .. otherwise assume we'll get a SIGCHLD for it,
1773                  * which we really should wait for to collect exit
1774                  * status and code */
1775                 return s->main_pid > 0;
1776         }
1777
1778         /* We don't know the pid */
1779         return -EAGAIN;
1780 }
1781
1782 static int control_pid_good(Service *s) {
1783         assert(s);
1784
1785         return s->control_pid > 0;
1786 }
1787
1788 static int cgroup_good(Service *s) {
1789         int r;
1790
1791         assert(s);
1792
1793         if ((r = cgroup_bonding_is_empty_list(s->meta.cgroup_bondings)) < 0)
1794                 return r;
1795
1796         return !r;
1797 }
1798
1799 static void service_enter_dead(Service *s, bool success, bool allow_restart) {
1800         int r;
1801         assert(s);
1802
1803         if (!success)
1804                 s->failure = true;
1805
1806         if (allow_restart &&
1807             !s->forbid_restart &&
1808             (s->restart == SERVICE_RESTART_ALWAYS ||
1809              (s->restart == SERVICE_RESTART_ON_SUCCESS && !s->failure) ||
1810              (s->restart == SERVICE_RESTART_ON_FAILURE && s->failure) ||
1811              (s->restart == SERVICE_RESTART_ON_ABORT && s->failure &&
1812               (s->main_exec_status.code == CLD_KILLED ||
1813                s->main_exec_status.code == CLD_DUMPED)))) {
1814
1815                 if ((r = unit_watch_timer(UNIT(s), s->restart_usec, &s->timer_watch)) < 0)
1816                         goto fail;
1817
1818                 service_set_state(s, SERVICE_AUTO_RESTART);
1819         } else
1820                 service_set_state(s, s->failure ? SERVICE_FAILED : SERVICE_DEAD);
1821
1822         s->forbid_restart = false;
1823
1824         return;
1825
1826 fail:
1827         log_warning("%s failed to run install restart timer: %s", s->meta.id, strerror(-r));
1828         service_enter_dead(s, false, false);
1829 }
1830
1831 static void service_enter_signal(Service *s, ServiceState state, bool success);
1832
1833 static void service_enter_stop_post(Service *s, bool success) {
1834         int r;
1835         assert(s);
1836
1837         if (!success)
1838                 s->failure = true;
1839
1840         service_unwatch_control_pid(s);
1841
1842         if ((s->control_command = s->exec_command[SERVICE_EXEC_STOP_POST])) {
1843                 s->control_command_id = SERVICE_EXEC_STOP_POST;
1844
1845                 if ((r = service_spawn(s,
1846                                        s->control_command,
1847                                        true,
1848                                        false,
1849                                        !s->permissions_start_only,
1850                                        !s->root_directory_start_only,
1851                                        true,
1852                                        false,
1853                                        &s->control_pid)) < 0)
1854                         goto fail;
1855
1856
1857                 service_set_state(s, SERVICE_STOP_POST);
1858         } else
1859                 service_enter_signal(s, SERVICE_FINAL_SIGTERM, true);
1860
1861         return;
1862
1863 fail:
1864         log_warning("%s failed to run 'stop-post' task: %s", s->meta.id, strerror(-r));
1865         service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
1866 }
1867
1868 static void service_enter_signal(Service *s, ServiceState state, bool success) {
1869         int r;
1870         Set *pid_set = NULL;
1871         bool wait_for_exit = false;
1872
1873         assert(s);
1874
1875         if (!success)
1876                 s->failure = true;
1877
1878         if (s->exec_context.kill_mode != KILL_NONE) {
1879                 int sig = (state == SERVICE_STOP_SIGTERM || state == SERVICE_FINAL_SIGTERM) ? s->exec_context.kill_signal : SIGKILL;
1880
1881                 if (s->main_pid > 0) {
1882                         if (kill_and_sigcont(s->main_pid, sig) < 0 && errno != ESRCH)
1883                                 log_warning("Failed to kill main process %li: %m", (long) s->main_pid);
1884                         else
1885                                 wait_for_exit = !s->main_pid_alien;
1886                 }
1887
1888                 if (s->control_pid > 0) {
1889                         if (kill_and_sigcont(s->control_pid, sig) < 0 && errno != ESRCH)
1890                                 log_warning("Failed to kill control process %li: %m", (long) s->control_pid);
1891                         else
1892                                 wait_for_exit = true;
1893                 }
1894
1895                 if (s->exec_context.kill_mode == KILL_CONTROL_GROUP) {
1896
1897                         if (!(pid_set = set_new(trivial_hash_func, trivial_compare_func))) {
1898                                 r = -ENOMEM;
1899                                 goto fail;
1900                         }
1901
1902                         /* Exclude the main/control pids from being killed via the cgroup */
1903                         if (s->main_pid > 0)
1904                                 if ((r = set_put(pid_set, LONG_TO_PTR(s->main_pid))) < 0)
1905                                         goto fail;
1906
1907                         if (s->control_pid > 0)
1908                                 if ((r = set_put(pid_set, LONG_TO_PTR(s->control_pid))) < 0)
1909                                         goto fail;
1910
1911                         if ((r = cgroup_bonding_kill_list(s->meta.cgroup_bondings, sig, true, pid_set)) < 0) {
1912                                 if (r != -EAGAIN && r != -ESRCH && r != -ENOENT)
1913                                         log_warning("Failed to kill control group: %s", strerror(-r));
1914                         } else if (r > 0)
1915                                 wait_for_exit = true;
1916
1917                         set_free(pid_set);
1918                         pid_set = NULL;
1919                 }
1920         }
1921
1922         if (wait_for_exit) {
1923                 if (s->timeout_usec > 0)
1924                         if ((r = unit_watch_timer(UNIT(s), s->timeout_usec, &s->timer_watch)) < 0)
1925                                 goto fail;
1926
1927                 service_set_state(s, state);
1928         } else if (state == SERVICE_STOP_SIGTERM || state == SERVICE_STOP_SIGKILL)
1929                 service_enter_stop_post(s, true);
1930         else
1931                 service_enter_dead(s, true, true);
1932
1933         return;
1934
1935 fail:
1936         log_warning("%s failed to kill processes: %s", s->meta.id, strerror(-r));
1937
1938         if (state == SERVICE_STOP_SIGTERM || state == SERVICE_STOP_SIGKILL)
1939                 service_enter_stop_post(s, false);
1940         else
1941                 service_enter_dead(s, false, true);
1942
1943         if (pid_set)
1944                 set_free(pid_set);
1945 }
1946
1947 static void service_enter_stop(Service *s, bool success) {
1948         int r;
1949
1950         assert(s);
1951
1952         if (!success)
1953                 s->failure = true;
1954
1955         service_unwatch_control_pid(s);
1956
1957         if ((s->control_command = s->exec_command[SERVICE_EXEC_STOP])) {
1958                 s->control_command_id = SERVICE_EXEC_STOP;
1959
1960                 if ((r = service_spawn(s,
1961                                        s->control_command,
1962                                        true,
1963                                        false,
1964                                        !s->permissions_start_only,
1965                                        !s->root_directory_start_only,
1966                                        false,
1967                                        false,
1968                                        &s->control_pid)) < 0)
1969                         goto fail;
1970
1971                 service_set_state(s, SERVICE_STOP);
1972         } else
1973                 service_enter_signal(s, SERVICE_STOP_SIGTERM, true);
1974
1975         return;
1976
1977 fail:
1978         log_warning("%s failed to run 'stop' task: %s", s->meta.id, strerror(-r));
1979         service_enter_signal(s, SERVICE_STOP_SIGTERM, false);
1980 }
1981
1982 static void service_enter_running(Service *s, bool success) {
1983         int main_pid_ok, cgroup_ok;
1984         assert(s);
1985
1986         if (!success)
1987                 s->failure = true;
1988
1989         main_pid_ok = main_pid_good(s);
1990         cgroup_ok = cgroup_good(s);
1991
1992         if ((main_pid_ok > 0 || (main_pid_ok < 0 && cgroup_ok != 0)) &&
1993             (s->bus_name_good || s->type != SERVICE_DBUS))
1994                 service_set_state(s, SERVICE_RUNNING);
1995         else if (s->remain_after_exit)
1996                 service_set_state(s, SERVICE_EXITED);
1997         else
1998                 service_enter_stop(s, true);
1999 }
2000
2001 static void service_enter_start_post(Service *s) {
2002         int r;
2003         assert(s);
2004
2005         service_unwatch_control_pid(s);
2006
2007         if ((s->control_command = s->exec_command[SERVICE_EXEC_START_POST])) {
2008                 s->control_command_id = SERVICE_EXEC_START_POST;
2009
2010                 if ((r = service_spawn(s,
2011                                        s->control_command,
2012                                        true,
2013                                        false,
2014                                        !s->permissions_start_only,
2015                                        !s->root_directory_start_only,
2016                                        false,
2017                                        false,
2018                                        &s->control_pid)) < 0)
2019                         goto fail;
2020
2021                 service_set_state(s, SERVICE_START_POST);
2022         } else
2023                 service_enter_running(s, true);
2024
2025         return;
2026
2027 fail:
2028         log_warning("%s failed to run 'start-post' task: %s", s->meta.id, strerror(-r));
2029         service_enter_stop(s, false);
2030 }
2031
2032 static void service_enter_start(Service *s) {
2033         pid_t pid;
2034         int r;
2035         ExecCommand *c;
2036
2037         assert(s);
2038
2039         assert(s->exec_command[SERVICE_EXEC_START]);
2040         assert(!s->exec_command[SERVICE_EXEC_START]->command_next || s->type == SERVICE_ONESHOT);
2041
2042         if (s->type == SERVICE_FORKING)
2043                 service_unwatch_control_pid(s);
2044         else
2045                 service_unwatch_main_pid(s);
2046
2047         if (s->type == SERVICE_FORKING) {
2048                 s->control_command_id = SERVICE_EXEC_START;
2049                 c = s->control_command = s->exec_command[SERVICE_EXEC_START];
2050
2051                 s->main_command = NULL;
2052         } else {
2053                 s->control_command_id = _SERVICE_EXEC_COMMAND_INVALID;
2054                 s->control_command = NULL;
2055
2056                 c = s->main_command = s->exec_command[SERVICE_EXEC_START];
2057         }
2058
2059         if ((r = service_spawn(s,
2060                                c,
2061                                s->type == SERVICE_FORKING || s->type == SERVICE_DBUS || s->type == SERVICE_NOTIFY,
2062                                true,
2063                                true,
2064                                true,
2065                                true,
2066                                s->notify_access != NOTIFY_NONE,
2067                                &pid)) < 0)
2068                 goto fail;
2069
2070         if (s->type == SERVICE_SIMPLE) {
2071                 /* For simple services we immediately start
2072                  * the START_POST binaries. */
2073
2074                 service_set_main_pid(s, pid);
2075                 service_enter_start_post(s);
2076
2077         } else  if (s->type == SERVICE_FORKING) {
2078
2079                 /* For forking services we wait until the start
2080                  * process exited. */
2081
2082                 s->control_pid = pid;
2083                 service_set_state(s, SERVICE_START);
2084
2085         } else if (s->type == SERVICE_ONESHOT ||
2086                    s->type == SERVICE_DBUS ||
2087                    s->type == SERVICE_NOTIFY) {
2088
2089                 /* For oneshot services we wait until the start
2090                  * process exited, too, but it is our main process. */
2091
2092                 /* For D-Bus services we know the main pid right away,
2093                  * but wait for the bus name to appear on the
2094                  * bus. Notify services are similar. */
2095
2096                 service_set_main_pid(s, pid);
2097                 service_set_state(s, SERVICE_START);
2098         } else
2099                 assert_not_reached("Unknown service type");
2100
2101         return;
2102
2103 fail:
2104         log_warning("%s failed to run 'start' task: %s", s->meta.id, strerror(-r));
2105         service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
2106 }
2107
2108 static void service_enter_start_pre(Service *s) {
2109         int r;
2110
2111         assert(s);
2112
2113         service_unwatch_control_pid(s);
2114
2115         if ((s->control_command = s->exec_command[SERVICE_EXEC_START_PRE])) {
2116                 s->control_command_id = SERVICE_EXEC_START_PRE;
2117
2118                 if ((r = service_spawn(s,
2119                                        s->control_command,
2120                                        true,
2121                                        false,
2122                                        !s->permissions_start_only,
2123                                        !s->root_directory_start_only,
2124                                        true,
2125                                        false,
2126                                        &s->control_pid)) < 0)
2127                         goto fail;
2128
2129                 service_set_state(s, SERVICE_START_PRE);
2130         } else
2131                 service_enter_start(s);
2132
2133         return;
2134
2135 fail:
2136         log_warning("%s failed to run 'start-pre' task: %s", s->meta.id, strerror(-r));
2137         service_enter_dead(s, false, true);
2138 }
2139
2140 static void service_enter_restart(Service *s) {
2141         int r;
2142         DBusError error;
2143
2144         assert(s);
2145         dbus_error_init(&error);
2146
2147         if (s->meta.job) {
2148                 log_info("Job pending for unit, delaying automatic restart.");
2149
2150                 if ((r = unit_watch_timer(UNIT(s), s->restart_usec, &s->timer_watch)) < 0)
2151                         goto fail;
2152         }
2153
2154         service_enter_dead(s, true, false);
2155
2156         if ((r = manager_add_job(s->meta.manager, JOB_START, UNIT(s), JOB_FAIL, false, &error, NULL)) < 0)
2157                 goto fail;
2158
2159         log_debug("%s scheduled restart job.", s->meta.id);
2160         return;
2161
2162 fail:
2163         log_warning("%s failed to schedule restart job: %s", s->meta.id, bus_error(&error, -r));
2164         service_enter_dead(s, false, false);
2165
2166         dbus_error_free(&error);
2167 }
2168
2169 static void service_enter_reload(Service *s) {
2170         int r;
2171
2172         assert(s);
2173
2174         service_unwatch_control_pid(s);
2175
2176         if ((s->control_command = s->exec_command[SERVICE_EXEC_RELOAD])) {
2177                 s->control_command_id = SERVICE_EXEC_RELOAD;
2178
2179                 if ((r = service_spawn(s,
2180                                        s->control_command,
2181                                        true,
2182                                        false,
2183                                        !s->permissions_start_only,
2184                                        !s->root_directory_start_only,
2185                                        false,
2186                                        false,
2187                                        &s->control_pid)) < 0)
2188                         goto fail;
2189
2190                 service_set_state(s, SERVICE_RELOAD);
2191         } else
2192                 service_enter_running(s, true);
2193
2194         return;
2195
2196 fail:
2197         log_warning("%s failed to run 'reload' task: %s", s->meta.id, strerror(-r));
2198         s->reload_failure = true;
2199         service_enter_running(s, true);
2200 }
2201
2202 static void service_run_next_control(Service *s, bool success) {
2203         int r;
2204
2205         assert(s);
2206         assert(s->control_command);
2207         assert(s->control_command->command_next);
2208
2209         if (!success)
2210                 s->failure = true;
2211
2212         assert(s->control_command_id != SERVICE_EXEC_START);
2213
2214         s->control_command = s->control_command->command_next;
2215         service_unwatch_control_pid(s);
2216
2217         if ((r = service_spawn(s,
2218                                s->control_command,
2219                                true,
2220                                false,
2221                                !s->permissions_start_only,
2222                                !s->root_directory_start_only,
2223                                s->control_command_id == SERVICE_EXEC_START_PRE ||
2224                                s->control_command_id == SERVICE_EXEC_STOP_POST,
2225                                false,
2226                                &s->control_pid)) < 0)
2227                 goto fail;
2228
2229         return;
2230
2231 fail:
2232         log_warning("%s failed to run next control task: %s", s->meta.id, strerror(-r));
2233
2234         if (s->state == SERVICE_START_PRE)
2235                 service_enter_signal(s, SERVICE_FINAL_SIGTERM, false);
2236         else if (s->state == SERVICE_STOP)
2237                 service_enter_signal(s, SERVICE_STOP_SIGTERM, false);
2238         else if (s->state == SERVICE_STOP_POST)
2239                 service_enter_dead(s, false, true);
2240         else if (s->state == SERVICE_RELOAD) {
2241                 s->reload_failure = true;
2242                 service_enter_running(s, true);
2243         } else
2244                 service_enter_stop(s, false);
2245 }
2246
2247 static void service_run_next_main(Service *s, bool success) {
2248         pid_t pid;
2249         int r;
2250
2251         assert(s);
2252         assert(s->main_command);
2253         assert(s->main_command->command_next);
2254         assert(s->type == SERVICE_ONESHOT);
2255
2256         if (!success)
2257                 s->failure = true;
2258
2259         s->main_command = s->main_command->command_next;
2260         service_unwatch_main_pid(s);
2261
2262         if ((r = service_spawn(s,
2263                                s->main_command,
2264                                false,
2265                                true,
2266                                true,
2267                                true,
2268                                true,
2269                                s->notify_access != NOTIFY_NONE,
2270                                &pid)) < 0)
2271                 goto fail;
2272
2273         service_set_main_pid(s, pid);
2274
2275         return;
2276
2277 fail:
2278         log_warning("%s failed to run next main task: %s", s->meta.id, strerror(-r));
2279         service_enter_stop(s, false);
2280 }
2281
2282 static int service_start(Unit *u) {
2283         Service *s = SERVICE(u);
2284
2285         assert(s);
2286
2287         /* We cannot fulfill this request right now, try again later
2288          * please! */
2289         if (s->state == SERVICE_STOP ||
2290             s->state == SERVICE_STOP_SIGTERM ||
2291             s->state == SERVICE_STOP_SIGKILL ||
2292             s->state == SERVICE_STOP_POST ||
2293             s->state == SERVICE_FINAL_SIGTERM ||
2294             s->state == SERVICE_FINAL_SIGKILL)
2295                 return -EAGAIN;
2296
2297         /* Already on it! */
2298         if (s->state == SERVICE_START_PRE ||
2299             s->state == SERVICE_START ||
2300             s->state == SERVICE_START_POST)
2301                 return 0;
2302
2303         assert(s->state == SERVICE_DEAD || s->state == SERVICE_FAILED || s->state == SERVICE_AUTO_RESTART);
2304
2305         /* Make sure we don't enter a busy loop of some kind. */
2306         if (!ratelimit_test(&s->ratelimit)) {
2307                 log_warning("%s start request repeated too quickly, refusing to start.", u->meta.id);
2308                 return -ECANCELED;
2309         }
2310
2311         s->failure = false;
2312         s->main_pid_known = false;
2313         s->main_pid_alien = false;
2314         s->forbid_restart = false;
2315
2316         service_enter_start_pre(s);
2317         return 0;
2318 }
2319
2320 static int service_stop(Unit *u) {
2321         Service *s = SERVICE(u);
2322
2323         assert(s);
2324
2325         /* This is a user request, so don't do restarts on this
2326          * shutdown. */
2327         s->forbid_restart = true;
2328
2329         /* Already on it */
2330         if (s->state == SERVICE_STOP ||
2331             s->state == SERVICE_STOP_SIGTERM ||
2332             s->state == SERVICE_STOP_SIGKILL ||
2333             s->state == SERVICE_STOP_POST ||
2334             s->state == SERVICE_FINAL_SIGTERM ||
2335             s->state == SERVICE_FINAL_SIGKILL)
2336                 return 0;
2337
2338         /* Don't allow a restart */
2339         if (s->state == SERVICE_AUTO_RESTART) {
2340                 service_set_state(s, SERVICE_DEAD);
2341                 return 0;
2342         }
2343
2344         /* If there's already something running we go directly into
2345          * kill mode. */
2346         if (s->state == SERVICE_START_PRE ||
2347             s->state == SERVICE_START ||
2348             s->state == SERVICE_START_POST ||
2349             s->state == SERVICE_RELOAD) {
2350                 service_enter_signal(s, SERVICE_STOP_SIGTERM, true);
2351                 return 0;
2352         }
2353
2354         assert(s->state == SERVICE_RUNNING ||
2355                s->state == SERVICE_EXITED);
2356
2357         service_enter_stop(s, true);
2358         return 0;
2359 }
2360
2361 static int service_reload(Unit *u) {
2362         Service *s = SERVICE(u);
2363
2364         assert(s);
2365
2366         assert(s->state == SERVICE_RUNNING || s->state == SERVICE_EXITED);
2367
2368         service_enter_reload(s);
2369         return 0;
2370 }
2371
2372 static bool service_can_reload(Unit *u) {
2373         Service *s = SERVICE(u);
2374
2375         assert(s);
2376
2377         return !!s->exec_command[SERVICE_EXEC_RELOAD];
2378 }
2379
2380 static int service_serialize(Unit *u, FILE *f, FDSet *fds) {
2381         Service *s = SERVICE(u);
2382
2383         assert(u);
2384         assert(f);
2385         assert(fds);
2386
2387         unit_serialize_item(u, f, "state", service_state_to_string(s->state));
2388         unit_serialize_item(u, f, "failure", yes_no(s->failure));
2389
2390         if (s->control_pid > 0)
2391                 unit_serialize_item_format(u, f, "control-pid", "%lu", (unsigned long) s->control_pid);
2392
2393         if (s->main_pid_known && s->main_pid > 0)
2394                 unit_serialize_item_format(u, f, "main-pid", "%lu", (unsigned long) s->main_pid);
2395
2396         unit_serialize_item(u, f, "main-pid-known", yes_no(s->main_pid_known));
2397
2398         if (s->status_text)
2399                 unit_serialize_item(u, f, "status-text", s->status_text);
2400
2401         /* There's a minor uncleanliness here: if there are multiple
2402          * commands attached here, we will start from the first one
2403          * again */
2404         if (s->control_command_id >= 0)
2405                 unit_serialize_item(u, f, "control-command", service_exec_command_to_string(s->control_command_id));
2406
2407         if (s->socket_fd >= 0) {
2408                 int copy;
2409
2410                 if ((copy = fdset_put_dup(fds, s->socket_fd)) < 0)
2411                         return copy;
2412
2413                 unit_serialize_item_format(u, f, "socket-fd", "%i", copy);
2414         }
2415
2416         if (s->main_exec_status.pid > 0) {
2417                 unit_serialize_item_format(u, f, "main-exec-status-pid", "%lu", (unsigned long) s->main_exec_status.pid);
2418                 dual_timestamp_serialize(f, "main-exec-status-start", &s->main_exec_status.start_timestamp);
2419                 dual_timestamp_serialize(f, "main-exec-status-exit", &s->main_exec_status.exit_timestamp);
2420
2421                 if (dual_timestamp_is_set(&s->main_exec_status.exit_timestamp)) {
2422                         unit_serialize_item_format(u, f, "main-exec-status-code", "%i", s->main_exec_status.code);
2423                         unit_serialize_item_format(u, f, "main-exec-status-status", "%i", s->main_exec_status.status);
2424                 }
2425         }
2426
2427         return 0;
2428 }
2429
2430 static int service_deserialize_item(Unit *u, const char *key, const char *value, FDSet *fds) {
2431         Service *s = SERVICE(u);
2432
2433         assert(u);
2434         assert(key);
2435         assert(value);
2436         assert(fds);
2437
2438         if (streq(key, "state")) {
2439                 ServiceState state;
2440
2441                 if ((state = service_state_from_string(value)) < 0)
2442                         log_debug("Failed to parse state value %s", value);
2443                 else
2444                         s->deserialized_state = state;
2445         } else if (streq(key, "failure")) {
2446                 int b;
2447
2448                 if ((b = parse_boolean(value)) < 0)
2449                         log_debug("Failed to parse failure value %s", value);
2450                 else
2451                         s->failure = b || s->failure;
2452         } else if (streq(key, "control-pid")) {
2453                 pid_t pid;
2454
2455                 if (parse_pid(value, &pid) < 0)
2456                         log_debug("Failed to parse control-pid value %s", value);
2457                 else
2458                         s->control_pid = pid;
2459         } else if (streq(key, "main-pid")) {
2460                 pid_t pid;
2461
2462                 if (parse_pid(value, &pid) < 0)
2463                         log_debug("Failed to parse main-pid value %s", value);
2464                 else
2465                         service_set_main_pid(s, (pid_t) pid);
2466         } else if (streq(key, "main-pid-known")) {
2467                 int b;
2468
2469                 if ((b = parse_boolean(value)) < 0)
2470                         log_debug("Failed to parse main-pid-known value %s", value);
2471                 else
2472                         s->main_pid_known = b;
2473         } else if (streq(key, "status-text")) {
2474                 char *t;
2475
2476                 if ((t = strdup(value))) {
2477                         free(s->status_text);
2478                         s->status_text = t;
2479                 }
2480
2481         } else if (streq(key, "control-command")) {
2482                 ServiceExecCommand id;
2483
2484                 if ((id = service_exec_command_from_string(value)) < 0)
2485                         log_debug("Failed to parse exec-command value %s", value);
2486                 else {
2487                         s->control_command_id = id;
2488                         s->control_command = s->exec_command[id];
2489                 }
2490         } else if (streq(key, "socket-fd")) {
2491                 int fd;
2492
2493                 if (safe_atoi(value, &fd) < 0 || fd < 0 || !fdset_contains(fds, fd))
2494                         log_debug("Failed to parse socket-fd value %s", value);
2495                 else {
2496
2497                         if (s->socket_fd >= 0)
2498                                 close_nointr_nofail(s->socket_fd);
2499                         s->socket_fd = fdset_remove(fds, fd);
2500                 }
2501         } else if (streq(key, "main-exec-status-pid")) {
2502                 pid_t pid;
2503
2504                 if (parse_pid(value, &pid) < 0)
2505                         log_debug("Failed to parse main-exec-status-pid value %s", value);
2506                 else
2507                         s->main_exec_status.pid = pid;
2508         } else if (streq(key, "main-exec-status-code")) {
2509                 int i;
2510
2511                 if (safe_atoi(value, &i) < 0)
2512                         log_debug("Failed to parse main-exec-status-code value %s", value);
2513                 else
2514                         s->main_exec_status.code = i;
2515         } else if (streq(key, "main-exec-status-status")) {
2516                 int i;
2517
2518                 if (safe_atoi(value, &i) < 0)
2519                         log_debug("Failed to parse main-exec-status-status value %s", value);
2520                 else
2521                         s->main_exec_status.status = i;
2522         } else if (streq(key, "main-exec-status-start"))
2523                 dual_timestamp_deserialize(value, &s->main_exec_status.start_timestamp);
2524         else if (streq(key, "main-exec-status-exit"))
2525                 dual_timestamp_deserialize(value, &s->main_exec_status.exit_timestamp);
2526         else
2527                 log_debug("Unknown serialization key '%s'", key);
2528
2529         return 0;
2530 }
2531
2532 static UnitActiveState service_active_state(Unit *u) {
2533         assert(u);
2534
2535         return state_translation_table[SERVICE(u)->state];
2536 }
2537
2538 static const char *service_sub_state_to_string(Unit *u) {
2539         assert(u);
2540
2541         return service_state_to_string(SERVICE(u)->state);
2542 }
2543
2544 static bool service_check_gc(Unit *u) {
2545         Service *s = SERVICE(u);
2546
2547         assert(s);
2548
2549         /* Never clean up services that still have a process around,
2550          * even if the service is formally dead. */
2551         if (cgroup_good(s) > 0 ||
2552             main_pid_good(s) > 0 ||
2553             control_pid_good(s) > 0)
2554                 return true;
2555
2556 #ifdef HAVE_SYSV_COMPAT
2557         if (s->sysv_path)
2558                 return true;
2559 #endif
2560
2561         return false;
2562 }
2563
2564 static bool service_check_snapshot(Unit *u) {
2565         Service *s = SERVICE(u);
2566
2567         assert(s);
2568
2569         return !s->got_socket_fd;
2570 }
2571
2572 static void service_sigchld_event(Unit *u, pid_t pid, int code, int status) {
2573         Service *s = SERVICE(u);
2574         bool success;
2575
2576         assert(s);
2577         assert(pid >= 0);
2578
2579         if (!s->meta.fragment_path)
2580                 success = is_clean_exit_lsb(code, status);
2581         else
2582                 success = is_clean_exit(code, status);
2583
2584         if (s->main_pid == pid) {
2585                 /* Forking services may occasionally move to a new PID.
2586                  * As long as they update the PID file before exiting the old
2587                  * PID, they're fine. */
2588                 if (s->pid_file && service_load_pid_file(s) == 0)
2589                         return;
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
2972 #ifdef TARGET_SUSE
2973 static void sysv_facility_in_insserv_conf(Manager *mgr) {
2974         FILE *f=NULL;
2975         int r;
2976
2977         if (!(f = fopen("/etc/insserv.conf", "re"))) {
2978                 r = errno == ENOENT ? 0 : -errno;
2979                 goto finish;
2980         }
2981
2982         while (!feof(f)) {
2983                 char l[LINE_MAX], *t;
2984                 char **parsed = NULL;
2985
2986                 if (!fgets(l, sizeof(l), f)) {
2987                         if (feof(f))
2988                                 break;
2989
2990                         r = -errno;
2991                         log_error("Failed to read configuration file '/etc/insserv.conf': %s", strerror(-r));
2992                         goto finish;
2993                 }
2994
2995                 t = strstrip(l);
2996                 if (*t != '$' && *t != '<')
2997                         continue;
2998
2999                 parsed = strv_split(t,WHITESPACE);
3000                 /* we ignore <interactive>, not used, equivalent to X-Interactive */
3001                 if (parsed && !startswith_no_case (parsed[0], "<interactive>")) {
3002                         char *facility;
3003                         Unit *u;
3004                         if (sysv_translate_facility(parsed[0], NULL, &facility) < 0)
3005                                 continue;
3006                         if ((u = manager_get_unit(mgr, facility)) && (u->meta.type == UNIT_TARGET)) {
3007                                 UnitDependency e;
3008                                 char *dep = NULL, *name, **j;
3009
3010                                 STRV_FOREACH (j, parsed+1) {
3011                                         if (*j[0]=='+') {
3012                                                 e = UNIT_WANTS;
3013                                                 name = *j+1;
3014                                         }
3015                                         else {
3016                                                 e = UNIT_REQUIRES;
3017                                                 name = *j;
3018                                         }
3019                                         if (sysv_translate_facility(name, NULL, &dep) < 0)
3020                                                 continue;
3021
3022                                         r = unit_add_two_dependencies_by_name(u, UNIT_BEFORE, e, dep, NULL, true);
3023                                         free(dep);
3024                                 }
3025                         }
3026                         free(facility);
3027                 }
3028                 strv_free(parsed);
3029         }
3030 finish:
3031         if (f)
3032                 fclose(f);
3033
3034 }
3035 #endif
3036
3037 static int service_enumerate(Manager *m) {
3038         char **p;
3039         unsigned i;
3040         DIR *d = NULL;
3041         char *path = NULL, *fpath = NULL, *name = NULL;
3042         Set *runlevel_services[ELEMENTSOF(rcnd_table)], *shutdown_services = NULL;
3043         Unit *service;
3044         Iterator j;
3045         int r;
3046
3047         assert(m);
3048
3049         if (m->running_as != MANAGER_SYSTEM)
3050                 return 0;
3051
3052         zero(runlevel_services);
3053
3054         STRV_FOREACH(p, m->lookup_paths.sysvrcnd_path)
3055                 for (i = 0; i < ELEMENTSOF(rcnd_table); i ++) {
3056                         struct dirent *de;
3057
3058                         free(path);
3059                         path = join(*p, "/", rcnd_table[i].path, NULL);
3060                         if (!path) {
3061                                 r = -ENOMEM;
3062                                 goto finish;
3063                         }
3064
3065                         if (d)
3066                                 closedir(d);
3067
3068                         if (!(d = opendir(path))) {
3069                                 if (errno != ENOENT)
3070                                         log_warning("opendir() failed on %s: %s", path, strerror(errno));
3071
3072                                 continue;
3073                         }
3074
3075                         while ((de = readdir(d))) {
3076                                 int a, b;
3077
3078                                 if (ignore_file(de->d_name))
3079                                         continue;
3080
3081                                 if (de->d_name[0] != 'S' && de->d_name[0] != 'K')
3082                                         continue;
3083
3084                                 if (strlen(de->d_name) < 4)
3085                                         continue;
3086
3087                                 a = undecchar(de->d_name[1]);
3088                                 b = undecchar(de->d_name[2]);
3089
3090                                 if (a < 0 || b < 0)
3091                                         continue;
3092
3093                                 free(fpath);
3094                                 fpath = join(path, "/", de->d_name, NULL);
3095                                 if (!path) {
3096                                         r = -ENOMEM;
3097                                         goto finish;
3098                                 }
3099
3100                                 if (access(fpath, X_OK) < 0) {
3101
3102                                         if (errno != ENOENT)
3103                                                 log_warning("access() failed on %s: %s", fpath, strerror(errno));
3104
3105                                         continue;
3106                                 }
3107
3108                                 free(name);
3109                                 if (!(name = sysv_translate_name(de->d_name + 3))) {
3110                                         r = -ENOMEM;
3111                                         goto finish;
3112                                 }
3113
3114                                 if ((r = manager_load_unit_prepare(m, name, NULL, NULL, &service)) < 0) {
3115                                         log_warning("Failed to prepare unit %s: %s", name, strerror(-r));
3116                                         continue;
3117                                 }
3118
3119                                 if (de->d_name[0] == 'S')  {
3120
3121                                         if (rcnd_table[i].type == RUNLEVEL_UP || rcnd_table[i].type == RUNLEVEL_SYSINIT) {
3122                                                 SERVICE(service)->sysv_start_priority_from_rcnd =
3123                                                         MAX(a*10 + b, SERVICE(service)->sysv_start_priority_from_rcnd);
3124
3125                                                 SERVICE(service)->sysv_enabled = true;
3126                                         }
3127
3128                                         if ((r = set_ensure_allocated(&runlevel_services[i], trivial_hash_func, trivial_compare_func)) < 0)
3129                                                 goto finish;
3130
3131                                         if ((r = set_put(runlevel_services[i], service)) < 0)
3132                                                 goto finish;
3133
3134                                 } else if (de->d_name[0] == 'K' &&
3135                                            (rcnd_table[i].type == RUNLEVEL_DOWN ||
3136                                             rcnd_table[i].type == RUNLEVEL_SYSINIT)) {
3137
3138                                         if ((r = set_ensure_allocated(&shutdown_services, trivial_hash_func, trivial_compare_func)) < 0)
3139                                                 goto finish;
3140
3141                                         if ((r = set_put(shutdown_services, service)) < 0)
3142                                                 goto finish;
3143                                 }
3144                         }
3145                 }
3146
3147         /* Now we loaded all stubs and are aware of the lowest
3148         start-up priority for all services, not let's actually load
3149         the services, this will also tell us which services are
3150         actually native now */
3151         manager_dispatch_load_queue(m);
3152
3153         /* If this is a native service, rely on native ways to pull in
3154          * a service, don't pull it in via sysv rcN.d links. */
3155         for (i = 0; i < ELEMENTSOF(rcnd_table); i ++)
3156                 SET_FOREACH(service, runlevel_services[i], j) {
3157                         service = unit_follow_merge(service);
3158
3159                         if (service->meta.fragment_path)
3160                                 continue;
3161
3162                         if ((r = unit_add_two_dependencies_by_name_inverse(service, UNIT_AFTER, UNIT_WANTS, rcnd_table[i].target, NULL, true)) < 0)
3163                                 goto finish;
3164                 }
3165
3166         /* We honour K links only for halt/reboot. For the normal
3167          * runlevels we assume the stop jobs will be implicitly added
3168          * by the core logic. Also, we don't really distinguish here
3169          * between the runlevels 0 and 6 and just add them to the
3170          * special shutdown target. On SUSE the boot.d/ runlevel is
3171          * also used for shutdown, so we add links for that too to the
3172          * shutdown target.*/
3173         SET_FOREACH(service, shutdown_services, j) {
3174                 service = unit_follow_merge(service);
3175
3176                 if (service->meta.fragment_path)
3177                         continue;
3178
3179                 if ((r = unit_add_two_dependencies_by_name(service, UNIT_BEFORE, UNIT_CONFLICTS, SPECIAL_SHUTDOWN_TARGET, NULL, true)) < 0)
3180                         goto finish;
3181         }
3182
3183         r = 0;
3184
3185 #ifdef TARGET_SUSE
3186         sysv_facility_in_insserv_conf (m);
3187 #endif
3188
3189 finish:
3190         free(path);