1 /*-*- Mode: C; c-basic-offset: 8 -*-*/
4 This file is part of systemd.
6 Copyright 2010 Lennart Poettering
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.
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.
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/>.
29 #include "load-fragment.h"
30 #include "load-dropin.h"
34 #define COMMENTS "#;\n"
35 #define NEWLINES "\n\r"
38 static const char * const rcnd_table
[] = {
39 "/rc0.d", SPECIAL_RUNLEVEL0_TARGET
,
40 "/rc1.d", SPECIAL_RUNLEVEL1_TARGET
,
41 "/rc2.d", SPECIAL_RUNLEVEL2_TARGET
,
42 "/rc3.d", SPECIAL_RUNLEVEL3_TARGET
,
43 "/rc4.d", SPECIAL_RUNLEVEL4_TARGET
,
44 "/rc5.d", SPECIAL_RUNLEVEL5_TARGET
,
45 "/rc6.d", SPECIAL_RUNLEVEL6_TARGET
,
46 "/boot.d", SPECIAL_BASIC_TARGET
49 static const UnitActiveState state_translation_table
[_SERVICE_STATE_MAX
] = {
50 [SERVICE_DEAD
] = UNIT_INACTIVE
,
51 [SERVICE_START_PRE
] = UNIT_ACTIVATING
,
52 [SERVICE_START
] = UNIT_ACTIVATING
,
53 [SERVICE_START_POST
] = UNIT_ACTIVATING
,
54 [SERVICE_RUNNING
] = UNIT_ACTIVE
,
55 [SERVICE_RELOAD
] = UNIT_ACTIVE_RELOADING
,
56 [SERVICE_STOP
] = UNIT_DEACTIVATING
,
57 [SERVICE_STOP_SIGTERM
] = UNIT_DEACTIVATING
,
58 [SERVICE_STOP_SIGKILL
] = UNIT_DEACTIVATING
,
59 [SERVICE_STOP_POST
] = UNIT_DEACTIVATING
,
60 [SERVICE_FINAL_SIGTERM
] = UNIT_DEACTIVATING
,
61 [SERVICE_FINAL_SIGKILL
] = UNIT_DEACTIVATING
,
62 [SERVICE_MAINTAINANCE
] = UNIT_INACTIVE
,
63 [SERVICE_AUTO_RESTART
] = UNIT_ACTIVATING
,
66 static void service_done(Unit
*u
) {
67 Service
*s
= SERVICE(u
);
77 free(s
->sysv_runlevels
);
78 s
->sysv_runlevels
= NULL
;
80 exec_context_done(&s
->exec_context
);
81 exec_command_free_array(s
->exec_command
, _SERVICE_EXEC_MAX
);
82 s
->control_command
= NULL
;
84 /* This will leak a process, but at least no memory or any of
86 if (s
->main_pid
> 0) {
87 unit_unwatch_pid(u
, s
->main_pid
);
91 if (s
->control_pid
> 0) {
92 unit_unwatch_pid(u
, s
->control_pid
);
96 unit_unwatch_timer(u
, &s
->timer_watch
);
99 static int sysv_translate_name(const char *name
, char **_r
) {
101 static const char * const table
[] = {
102 "$local_fs", SPECIAL_LOCAL_FS_TARGET
,
103 "$network", SPECIAL_NETWORK_TARGET
,
104 "$named", SPECIAL_NSS_LOOKUP_TARGET
,
105 "$portmap", SPECIAL_RPCBIND_TARGET
,
106 "$remote_fs", SPECIAL_REMOTE_FS_TARGET
,
107 "$syslog", SPECIAL_SYSLOG_TARGET
,
108 "$time", SPECIAL_RTC_SET_TARGET
114 for (i
= 0; i
< ELEMENTSOF(table
); i
+= 2)
115 if (streq(table
[i
], name
)) {
116 if (!(r
= strdup(table
[i
+1])))
125 if (asprintf(&r
, "%s.service", name
) < 0)
136 static int sysv_chkconfig_order(Service
*s
) {
142 if (s
->sysv_start_priority
< 0)
145 /* For each pair of services where at least one lacks a LSB
146 * header, we use the start priority value to order things. */
148 LIST_FOREACH(units_per_type
, other
, UNIT(s
)->meta
.manager
->units_per_type
[UNIT_SERVICE
]) {
152 t
= (Service
*) other
;
157 if (t
->sysv_start_priority
< 0)
160 /* If both units have modern headers we don't care
161 * about the priorities */
162 if ((!s
->sysv_path
|| s
->sysv_has_lsb
) &&
163 (!t
->sysv_path
|| t
->sysv_has_lsb
))
166 if (t
->sysv_start_priority
< s
->sysv_start_priority
)
168 else if (t
->sysv_start_priority
> s
->sysv_start_priority
)
173 /* FIXME: Maybe we should compare the name here lexicographically? */
175 if (!(r
= unit_add_dependency(UNIT(s
), d
, UNIT(t
))) < 0)
182 static ExecCommand
*exec_command_new(const char *path
, const char *arg1
) {
185 if (!(c
= new0(ExecCommand
, 1)))
188 if (!(c
->path
= strdup(path
))) {
193 if (!(c
->argv
= strv_new(path
, arg1
, NULL
))) {
202 static int sysv_exec_commands(Service
*s
) {
206 assert(s
->sysv_path
);
208 if (!(c
= exec_command_new(s
->sysv_path
, "start")))
210 exec_command_append_list(s
->exec_command
+SERVICE_EXEC_START
, c
);
212 if (!(c
= exec_command_new(s
->sysv_path
, "stop")))
214 exec_command_append_list(s
->exec_command
+SERVICE_EXEC_STOP
, c
);
216 if (!(c
= exec_command_new(s
->sysv_path
, "reload")))
218 exec_command_append_list(s
->exec_command
+SERVICE_EXEC_RELOAD
, c
);
223 static int priority_from_rcd(Service
*s
, const char *init_script
) {
227 STRV_FOREACH(p
, UNIT(s
)->meta
.manager
->sysvrcnd_path
)
228 for (i
= 0; i
< ELEMENTSOF(rcnd_table
); i
+= 2) {
233 if (asprintf(&path
, "%s/%s", *p
, rcnd_table
[i
]) < 0)
241 log_warning("opendir() failed on %s: %s", path
, strerror(errno
));
246 while ((de
= readdir(d
))) {
249 if (ignore_file(de
->d_name
))
252 if (de
->d_name
[0] != 'S')
255 if (strlen(de
->d_name
) < 4)
258 if (!streq(de
->d_name
+ 3, init_script
))
261 /* Yay, we found it! Now decode the priority */
263 a
= undecchar(de
->d_name
[1]);
264 b
= undecchar(de
->d_name
[2]);
269 s
->sysv_start_priority
= a
*10 + b
;
271 log_debug("Determined priority %i from link farm for %s", s
->sysv_start_priority
, unit_id(UNIT(s
)));
283 static int service_load_sysv_path(Service
*s
, const char *path
, UnitLoadState
*new_state
) {
301 if (!(f
= fopen(path
, "re"))) {
302 r
= errno
== ENOENT
? 0 : -errno
;
306 s
->type
= SERVICE_FORKING
;
307 s
->restart
= SERVICE_ONCE
;
310 if (!(s
->sysv_path
= strdup(path
))) {
316 char l
[LINE_MAX
], *t
;
318 if (!fgets(l
, sizeof(l
), f
)) {
323 log_error("Failed to read configuration file '%s': %s", path
, strerror(-r
));
333 if (state
== NORMAL
&& streq(t
, "### BEGIN INIT INFO")) {
335 s
->sysv_has_lsb
= true;
339 if ((state
== LSB_DESCRIPTION
|| state
== LSB
) && streq(t
, "### END INIT INFO")) {
345 t
+= strspn(t
, WHITESPACE
);
347 if (state
== NORMAL
) {
349 /* Try to parse Red Hat style chkconfig headers */
351 if (startswith(t
, "chkconfig:")) {
353 char runlevels
[16], *k
;
357 if (sscanf(t
+10, "%15s %i %*i",
359 &start_priority
) != 2) {
361 log_warning("[%s:%u] Failed to parse chkconfig line. Ignoring.", path
, line
);
365 if (start_priority
< 0 || start_priority
> 99)
366 log_warning("[%s:%u] Start priority out of range. Ignoring.", path
, line
);
368 s
->sysv_start_priority
= start_priority
;
370 char_array_0(runlevels
);
371 k
= delete_chars(runlevels
, WHITESPACE
"-");
376 if (!(d
= strdup(k
))) {
381 free(s
->sysv_runlevels
);
382 s
->sysv_runlevels
= d
;
386 } else if (startswith(t
, "description:")) {
388 size_t k
= strlen(t
);
391 if (t
[k
-1] == '\\') {
396 if (!(d
= strdup(strstrip(t
+12)))) {
401 free(u
->meta
.description
);
402 u
->meta
.description
= d
;
404 } else if (startswith(t
, "pidfile:")) {
411 if (!path_is_absolute(fn
)) {
412 log_warning("[%s:%u] PID file not absolute. Ignoring.", path
, line
);
416 if (!(fn
= strdup(fn
))) {
425 } else if (state
== DESCRIPTION
) {
427 /* Try to parse Red Hat style description
430 size_t k
= strlen(t
);
438 assert(u
->meta
.description
);
439 if (asprintf(&d
, "%s %s", u
->meta
.description
, strstrip(t
)) < 0) {
444 free(u
->meta
.description
);
445 u
->meta
.description
= d
;
447 } else if (state
== LSB
|| state
== LSB_DESCRIPTION
) {
449 if (startswith(t
, "Provides:")) {
455 FOREACH_WORD(w
, z
, t
+9, i
) {
458 if (!(n
= strndup(w
, z
))) {
463 r
= sysv_translate_name(n
, &m
);
472 if (unit_name_to_type(m
) == UNIT_SERVICE
)
473 r
= unit_add_name(u
, m
);
475 if ((r
= unit_add_dependency_by_name_inverse(u
, UNIT_REQUIRES
, m
)) >= 0)
476 r
= unit_add_dependency_by_name(u
, UNIT_BEFORE
, m
);
485 } else if (startswith(t
, "Required-Start:") ||
486 startswith(t
, "Should-Start:")) {
492 FOREACH_WORD(w
, z
, strchr(t
, ':')+1, i
) {
495 if (!(n
= strndup(w
, z
))) {
500 r
= sysv_translate_name(n
, &m
);
509 r
= unit_add_dependency_by_name(u
, UNIT_AFTER
, m
);
515 } else if (startswith(t
, "Default-Start:")) {
520 k
= delete_chars(t
+14, WHITESPACE
"-");
523 if (!(d
= strdup(k
))) {
528 free(s
->sysv_runlevels
);
529 s
->sysv_runlevels
= d
;
532 } else if (startswith(t
, "Description:")) {
535 state
= LSB_DESCRIPTION
;
537 if (!(d
= strdup(strstrip(t
+12)))) {
542 free(u
->meta
.description
);
543 u
->meta
.description
= d
;
545 } else if (startswith(t
, "Short-Description:") &&
546 !u
->meta
.description
) {
549 /* We use the short description only
550 * if no long description is set. */
554 if (!(d
= strdup(strstrip(t
+18)))) {
559 u
->meta
.description
= d
;
561 } else if (state
== LSB_DESCRIPTION
) {
563 if (startswith(l
, "#\t") || startswith(l
, "# ")) {
566 assert(u
->meta
.description
);
567 if (asprintf(&d
, "%s %s", u
->meta
.description
, t
) < 0) {
572 free(u
->meta
.description
);
573 u
->meta
.description
= d
;
580 /* If init scripts have no LSB header, then we enforce the
581 * ordering via the chkconfig priorities. We try to determine
582 * a priority for *all* init scripts here, since they are
583 * needed as soon as at least one non-LSB script is used. */
585 if (s
->sysv_start_priority
< 0) {
586 log_debug("%s has no chkconfig header, trying to determine SysV priority from link farm.", unit_id(u
));
588 if ((r
= priority_from_rcd(s
, file_name_from_path(path
))) < 0)
591 if (s
->sysv_start_priority
< 0)
592 log_warning("%s has neither a chkconfig header nor a directory link, cannot order unit!", unit_id(u
));
595 if ((r
= sysv_exec_commands(s
)) < 0)
598 if (!s
->sysv_runlevels
|| chars_intersect("12345", s
->sysv_runlevels
)) {
599 /* If there a runlevels configured for this service
600 * but none of the standard ones, then we assume this
601 * is some special kind of service (which might be
602 * needed for early boot) and don't create any links
605 if ((r
= unit_add_dependency_by_name(u
, UNIT_REQUIRES
, SPECIAL_BASIC_TARGET
)) < 0 ||
606 (r
= unit_add_dependency_by_name(u
, UNIT_AFTER
, SPECIAL_BASIC_TARGET
)) < 0)
610 *new_state
= UNIT_LOADED
;
621 static int service_load_sysv_name(Service
*s
, const char *name
, UnitLoadState
*new_state
) {
627 STRV_FOREACH(p
, UNIT(s
)->meta
.manager
->sysvinit_path
) {
631 if (asprintf(&path
, "%s/%s", *p
, name
) < 0)
634 assert(endswith(path
, ".service"));
635 path
[strlen(path
)-8] = 0;
637 r
= service_load_sysv_path(s
, path
, new_state
);
643 if (*new_state
!= UNIT_STUB
)
650 static int service_load_sysv(Service
*s
, UnitLoadState
*new_state
) {
658 /* Load service data from SysV init scripts, preferably with
661 if (strv_isempty(UNIT(s
)->meta
.manager
->sysvinit_path
))
664 if ((t
= unit_id(UNIT(s
))))
665 if ((r
= service_load_sysv_name(s
, t
, new_state
)) < 0)
668 if (*new_state
== UNIT_STUB
)
669 SET_FOREACH(t
, UNIT(s
)->meta
.names
, i
) {
670 if ((r
== service_load_sysv_name(s
, t
, new_state
)) < 0)
673 if (*new_state
!= UNIT_STUB
)
680 static int service_init(Unit
*u
, UnitLoadState
*new_state
) {
682 Service
*s
= SERVICE(u
);
686 assert(*new_state
== UNIT_STUB
);
688 /* First, reset everything to the defaults, in case this is a
694 s
->timeout_usec
= DEFAULT_TIMEOUT_USEC
;
695 s
->restart_usec
= DEFAULT_RESTART_USEC
;
697 exec_context_init(&s
->exec_context
);
699 s
->timer_watch
.type
= WATCH_INVALID
;
701 s
->state
= SERVICE_DEAD
;
703 s
->sysv_start_priority
= -1;
704 s
->permissions_start_only
= false;
705 s
->root_directory_start_only
= false;
706 s
->valid_no_process
= false;
708 s
->sysv_has_lsb
= false;
709 s
->main_pid
= s
->control_pid
= 0;
710 s
->main_pid_known
= false;
713 RATELIMIT_INIT(s
->ratelimit
, 10*USEC_PER_SEC
, 5);
715 /* Load a .service file */
716 if ((r
= unit_load_fragment(u
, new_state
)) < 0)
719 /* Load a classic init script as a fallback, if we couldn't find anything */
720 if (*new_state
== UNIT_STUB
)
721 if ((r
= service_load_sysv(s
, new_state
)) < 0)
724 /* Still nothing found? Then let's give up */
725 if (*new_state
== UNIT_STUB
)
728 /* We were able to load something, then let's add in the
729 * dropin directories. */
730 if ((r
= unit_load_dropin(unit_follow_merge(u
))) < 0)
733 /* This is a new unit? Then let's add in some extras */
734 if (*new_state
== UNIT_LOADED
) {
735 if ((r
= unit_add_exec_dependencies(u
, &s
->exec_context
)) < 0)
738 if ((r
= unit_add_default_cgroup(u
)) < 0)
741 if ((r
= sysv_chkconfig_order(s
)) < 0)
748 static void service_dump(Unit
*u
, FILE *f
, const char *prefix
) {
750 ServiceExecCommand c
;
751 Service
*s
= SERVICE(u
);
757 p2
= strappend(prefix
, "\t");
758 prefix2
= p2
? p2
: prefix
;
761 "%sService State: %s\n"
762 "%sPermissionsStartOnly: %s\n"
763 "%sRootDirectoryStartOnly: %s\n"
764 "%sValidNoProcess: %s\n"
767 prefix
, service_state_to_string(s
->state
),
768 prefix
, yes_no(s
->permissions_start_only
),
769 prefix
, yes_no(s
->root_directory_start_only
),
770 prefix
, yes_no(s
->valid_no_process
),
771 prefix
, kill_mode_to_string(s
->kill_mode
),
772 prefix
, service_type_to_string(s
->type
));
774 if (s
->control_pid
> 0)
776 "%sControl PID: %llu\n",
777 prefix
, (unsigned long long) s
->control_pid
);
781 "%sMain PID: %llu\n",
782 prefix
, (unsigned long long) s
->main_pid
);
787 prefix
, s
->pid_file
);
789 exec_context_dump(&s
->exec_context
, f
, prefix
);
791 for (c
= 0; c
< _SERVICE_EXEC_MAX
; c
++) {
793 if (!s
->exec_command
[c
])
796 fprintf(f
, "%s→ %s:\n",
797 prefix
, service_exec_command_to_string(c
));
799 exec_command_dump_list(s
->exec_command
[c
], f
, prefix2
);
804 "%sSysV Init Script Path: %s\n"
805 "%sSysV Init Script has LSB Header: %s\n",
806 prefix
, s
->sysv_path
,
807 prefix
, yes_no(s
->sysv_has_lsb
));
809 if (s
->sysv_start_priority
>= 0)
811 "%sSysVStartPriority: %i\n",
812 prefix
, s
->sysv_start_priority
);
814 if (s
->sysv_runlevels
)
815 fprintf(f
, "%sSysVRunLevels: %s\n",
816 prefix
, s
->sysv_runlevels
);
821 static int service_load_pid_file(Service
*s
) {
828 if (s
->main_pid_known
)
834 if ((r
= read_one_line_file(s
->pid_file
, &k
)) < 0)
837 if ((r
= safe_atolu(k
, &p
)) < 0) {
842 if ((unsigned long) (pid_t
) p
!= p
)
845 if (kill((pid_t
) p
, 0) < 0 && errno
!= EPERM
) {
846 log_warning("PID %llu read from file %s does not exist. Your service or init script might be broken.",
847 (unsigned long long) p
, s
->pid_file
);
851 if ((r
= unit_watch_pid(UNIT(s
), (pid_t
) p
)) < 0)
852 /* FIXME: we need to do something here */
855 s
->main_pid
= (pid_t
) p
;
856 s
->main_pid_known
= true;
861 static int service_get_sockets(Service
*s
, Set
**_set
) {
870 /* Collects all Socket objects that belong to this
871 * service. Note that a service might have multiple sockets
872 * via multiple names. */
874 if (!(set
= set_new(NULL
, NULL
)))
877 SET_FOREACH(t
, UNIT(s
)->meta
.names
, i
) {
881 /* Look for all socket objects that go by any of our
882 * units and collect their fds */
884 if (!(k
= unit_name_change_suffix(t
, ".socket"))) {
889 p
= manager_get_unit(UNIT(s
)->meta
.manager
, k
);
894 if ((r
= set_put(set
, p
)) < 0)
907 static int service_notify_sockets(Service
*s
) {
915 /* Notifies all our sockets when we die */
917 if ((r
= service_get_sockets(s
, &set
)) < 0)
920 SET_FOREACH(sock
, set
, i
)
921 socket_notify_service_dead(sock
);
928 static void service_set_state(Service
*s
, ServiceState state
) {
929 ServiceState old_state
;
932 old_state
= s
->state
;
935 if (state
!= SERVICE_START_PRE
&&
936 state
!= SERVICE_START
&&
937 state
!= SERVICE_START_POST
&&
938 state
!= SERVICE_RELOAD
&&
939 state
!= SERVICE_STOP
&&
940 state
!= SERVICE_STOP_SIGTERM
&&
941 state
!= SERVICE_STOP_SIGKILL
&&
942 state
!= SERVICE_STOP_POST
&&
943 state
!= SERVICE_FINAL_SIGTERM
&&
944 state
!= SERVICE_FINAL_SIGKILL
&&
945 state
!= SERVICE_AUTO_RESTART
)
946 unit_unwatch_timer(UNIT(s
), &s
->timer_watch
);
948 if (state
!= SERVICE_START
&&
949 state
!= SERVICE_START_POST
&&
950 state
!= SERVICE_RUNNING
&&
951 state
!= SERVICE_RELOAD
&&
952 state
!= SERVICE_STOP
&&
953 state
!= SERVICE_STOP_SIGTERM
&&
954 state
!= SERVICE_STOP_SIGKILL
)
955 if (s
->main_pid
> 0) {
956 unit_unwatch_pid(UNIT(s
), s
->main_pid
);
960 if (state
!= SERVICE_START_PRE
&&
961 state
!= SERVICE_START
&&
962 state
!= SERVICE_START_POST
&&
963 state
!= SERVICE_RELOAD
&&
964 state
!= SERVICE_STOP
&&
965 state
!= SERVICE_STOP_SIGTERM
&&
966 state
!= SERVICE_STOP_SIGKILL
&&
967 state
!= SERVICE_STOP_POST
&&
968 state
!= SERVICE_FINAL_SIGTERM
&&
969 state
!= SERVICE_FINAL_SIGKILL
)
970 if (s
->control_pid
> 0) {
971 unit_unwatch_pid(UNIT(s
), s
->control_pid
);
975 if (state
!= SERVICE_START_PRE
&&
976 state
!= SERVICE_START
&&
977 state
!= SERVICE_START_POST
&&
978 state
!= SERVICE_RELOAD
&&
979 state
!= SERVICE_STOP
&&
980 state
!= SERVICE_STOP_POST
)
981 s
->control_command
= NULL
;
983 if (state
== SERVICE_DEAD
||
984 state
== SERVICE_STOP
||
985 state
== SERVICE_STOP_SIGTERM
||
986 state
== SERVICE_STOP_SIGKILL
||
987 state
== SERVICE_STOP_POST
||
988 state
== SERVICE_FINAL_SIGTERM
||
989 state
== SERVICE_FINAL_SIGKILL
||
990 state
== SERVICE_MAINTAINANCE
||
991 state
== SERVICE_AUTO_RESTART
)
992 service_notify_sockets(s
);
994 if (old_state
== state
)
997 log_debug("%s changed %s → %s", unit_id(UNIT(s
)), service_state_to_string(old_state
), service_state_to_string(state
));
999 unit_notify(UNIT(s
), state_translation_table
[old_state
], state_translation_table
[state
]);
1002 static int service_collect_fds(Service
*s
, int **fds
, unsigned *n_fds
) {
1006 unsigned rn_fds
= 0;
1014 if ((r
= service_get_sockets(s
, &set
)) < 0)
1017 SET_FOREACH(sock
, set
, i
) {
1021 if ((r
= socket_collect_fds(sock
, &cfds
, &cn_fds
)) < 0)
1033 if (!(t
= new(int, rn_fds
+cn_fds
))) {
1039 memcpy(t
, rfds
, rn_fds
);
1040 memcpy(t
+rn_fds
, cfds
, cn_fds
);
1045 rn_fds
= rn_fds
+cn_fds
;
1063 static int service_spawn(
1068 bool apply_permissions
,
1082 if ((r
= service_collect_fds(s
, &fds
, &n_fds
)) < 0)
1086 if ((r
= unit_watch_timer(UNIT(s
), s
->timeout_usec
, &s
->timer_watch
)) < 0)
1089 unit_unwatch_timer(UNIT(s
), &s
->timer_watch
);
1091 if ((r
= exec_spawn(c
,
1096 UNIT(s
)->meta
.cgroup_bondings
,
1100 if ((r
= unit_watch_pid(UNIT(s
), pid
)) < 0)
1101 /* FIXME: we need to do something here */
1113 unit_unwatch_timer(UNIT(s
), &s
->timer_watch
);
1118 static void service_enter_dead(Service
*s
, bool success
, bool allow_restart
) {
1125 if (allow_restart
&&
1126 (s
->restart
== SERVICE_RESTART_ALWAYS
||
1127 (s
->restart
== SERVICE_RESTART_ON_SUCCESS
&& !s
->failure
))) {
1129 if ((r
= unit_watch_timer(UNIT(s
), s
->restart_usec
, &s
->timer_watch
)) < 0)
1132 service_set_state(s
, SERVICE_AUTO_RESTART
);
1134 service_set_state(s
, s
->failure
? SERVICE_MAINTAINANCE
: SERVICE_DEAD
);
1139 log_warning("%s failed to run install restart timer: %s", unit_id(UNIT(s
)), strerror(-r
));
1140 service_enter_dead(s
, false, false);
1143 static void service_enter_signal(Service
*s
, ServiceState state
, bool success
);
1145 static void service_enter_stop_post(Service
*s
, bool success
) {
1152 if ((s
->control_command
= s
->exec_command
[SERVICE_EXEC_STOP_POST
]))
1153 if ((r
= service_spawn(s
,
1157 !s
->permissions_start_only
,
1158 !s
->root_directory_start_only
,
1159 &s
->control_pid
)) < 0)
1163 service_set_state(s
, SERVICE_STOP_POST
);
1165 if (!s
->control_command
)
1166 service_enter_dead(s
, true, true);
1171 log_warning("%s failed to run stop executable: %s", unit_id(UNIT(s
)), strerror(-r
));
1172 service_enter_signal(s
, SERVICE_FINAL_SIGTERM
, false);
1175 static void service_enter_signal(Service
*s
, ServiceState state
, bool success
) {
1184 if (s
->main_pid
> 0 || s
->control_pid
> 0) {
1187 sig
= (state
== SERVICE_STOP_SIGTERM
|| state
== SERVICE_FINAL_SIGTERM
) ? SIGTERM
: SIGKILL
;
1189 if (s
->kill_mode
== KILL_CONTROL_GROUP
) {
1191 if ((r
= cgroup_bonding_kill_list(UNIT(s
)->meta
.cgroup_bondings
, sig
)) < 0) {
1192 if (r
!= -EAGAIN
&& r
!= -ESRCH
)
1200 if (s
->main_pid
> 0) {
1201 if (kill(s
->kill_mode
== KILL_PROCESS
? s
->main_pid
: -s
->main_pid
, sig
) < 0 && errno
!= ESRCH
)
1207 if (s
->control_pid
> 0) {
1208 if (kill(s
->kill_mode
== KILL_PROCESS
? s
->control_pid
: -s
->control_pid
, sig
) < 0 && errno
!= ESRCH
)
1219 service_set_state(s
, state
);
1221 if (s
->main_pid
<= 0 && s
->control_pid
<= 0)
1222 service_enter_dead(s
, true, true);
1227 log_warning("%s failed to kill processes: %s", unit_id(UNIT(s
)), strerror(-r
));
1231 service_set_state(s
, state
);
1232 } else if (state
== SERVICE_STOP_SIGTERM
|| state
== SERVICE_STOP_SIGKILL
)
1233 service_enter_stop_post(s
, false);
1235 service_enter_dead(s
, false, true);
1238 static void service_enter_stop(Service
*s
, bool success
) {
1245 if ((s
->control_command
= s
->exec_command
[SERVICE_EXEC_STOP
]))
1246 if ((r
= service_spawn(s
,
1250 !s
->permissions_start_only
,
1251 !s
->root_directory_start_only
,
1252 &s
->control_pid
)) < 0)
1255 service_set_state(s
, SERVICE_STOP
);
1257 if (!s
->control_command
)
1258 service_enter_signal(s
, SERVICE_STOP_SIGTERM
, true);
1263 log_warning("%s failed to run stop executable: %s", unit_id(UNIT(s
)), strerror(-r
));
1264 service_enter_signal(s
, SERVICE_STOP_SIGTERM
, false);
1267 static void service_enter_start_post(Service
*s
) {
1271 if ((s
->control_command
= s
->exec_command
[SERVICE_EXEC_START_POST
]))
1272 if ((r
= service_spawn(s
,
1276 !s
->permissions_start_only
,
1277 !s
->root_directory_start_only
,
1278 &s
->control_pid
)) < 0)
1282 service_set_state(s
, SERVICE_START_POST
);
1284 if (!s
->control_command
)
1285 service_set_state(s
, SERVICE_RUNNING
);
1290 log_warning("%s failed to run start-post executable: %s", unit_id(UNIT(s
)), strerror(-r
));
1291 service_enter_stop(s
, false);
1294 static void service_enter_start(Service
*s
) {
1300 assert(s
->exec_command
[SERVICE_EXEC_START
]);
1301 assert(!s
->exec_command
[SERVICE_EXEC_START
]->command_next
);
1303 if ((r
= service_spawn(s
,
1304 s
->exec_command
[SERVICE_EXEC_START
],
1305 s
->type
== SERVICE_FORKING
,
1312 service_set_state(s
, SERVICE_START
);
1314 if (s
->type
== SERVICE_SIMPLE
) {
1315 /* For simple services we immediately start
1316 * the START_POST binaries. */
1319 s
->main_pid_known
= true;
1320 service_enter_start_post(s
);
1322 } else if (s
->type
== SERVICE_FORKING
) {
1324 /* For forking services we wait until the start
1325 * process exited. */
1327 s
->control_pid
= pid
;
1328 s
->control_command
= s
->exec_command
[SERVICE_EXEC_START
];
1329 } else if (s
->type
== SERVICE_FINISH
) {
1331 /* For finishing services we wait until the start
1332 * process exited, too, but it is our main process. */
1335 s
->control_command
= s
->exec_command
[SERVICE_EXEC_START
];
1337 assert_not_reached("Unknown service type");
1342 log_warning("%s failed to run start exectuable: %s", unit_id(UNIT(s
)), strerror(-r
));
1343 service_enter_stop(s
, false);
1346 static void service_enter_start_pre(Service
*s
) {
1351 if ((s
->control_command
= s
->exec_command
[SERVICE_EXEC_START_PRE
]))
1352 if ((r
= service_spawn(s
,
1356 !s
->permissions_start_only
,
1357 !s
->root_directory_start_only
,
1358 &s
->control_pid
)) < 0)
1361 service_set_state(s
, SERVICE_START_PRE
);
1363 if (!s
->control_command
)
1364 service_enter_start(s
);
1369 log_warning("%s failed to run start-pre executable: %s", unit_id(UNIT(s
)), strerror(-r
));
1370 service_enter_dead(s
, false, true);
1373 static void service_enter_restart(Service
*s
) {
1377 if ((r
= manager_add_job(UNIT(s
)->meta
.manager
, JOB_START
, UNIT(s
), JOB_FAIL
, false, NULL
)) < 0)
1380 log_debug("%s scheduled restart job.", unit_id(UNIT(s
)));
1381 service_enter_dead(s
, true, false);
1386 log_warning("%s failed to schedule restart job: %s", unit_id(UNIT(s
)), strerror(-r
));
1387 service_enter_dead(s
, false, false);
1390 static void service_enter_reload(Service
*s
) {
1395 if ((s
->control_command
= s
->exec_command
[SERVICE_EXEC_RELOAD
]))
1396 if ((r
= service_spawn(s
,
1400 !s
->permissions_start_only
,
1401 !s
->root_directory_start_only
,
1402 &s
->control_pid
)) < 0)
1405 service_set_state(s
, SERVICE_RELOAD
);
1407 if (!s
->control_command
)
1408 service_set_state(s
, SERVICE_RUNNING
);
1413 log_warning("%s failed to run reload executable: %s", unit_id(UNIT(s
)), strerror(-r
));
1414 service_enter_stop(s
, false);
1417 static void service_run_next(Service
*s
, bool success
) {
1421 assert(s
->control_command
);
1422 assert(s
->control_command
->command_next
);
1427 s
->control_command
= s
->control_command
->command_next
;
1429 if ((r
= service_spawn(s
,
1433 !s
->permissions_start_only
,
1434 !s
->root_directory_start_only
,
1435 &s
->control_pid
)) < 0)
1441 log_warning("%s failed to run spawn next executable: %s", unit_id(UNIT(s
)), strerror(-r
));
1443 if (s
->state
== SERVICE_STOP
)
1444 service_enter_stop_post(s
, false);
1445 else if (s
->state
== SERVICE_STOP_POST
)
1446 service_enter_dead(s
, false, true);
1448 service_enter_stop(s
, false);
1451 static int service_start(Unit
*u
) {
1452 Service
*s
= SERVICE(u
);
1456 /* We cannot fulfill this request right now, try again later
1458 if (s
->state
== SERVICE_STOP
||
1459 s
->state
== SERVICE_STOP_SIGTERM
||
1460 s
->state
== SERVICE_STOP_SIGKILL
||
1461 s
->state
== SERVICE_STOP_POST
||
1462 s
->state
== SERVICE_FINAL_SIGTERM
||
1463 s
->state
== SERVICE_FINAL_SIGKILL
)
1466 /* Already on it! */
1467 if (s
->state
== SERVICE_START_PRE
||
1468 s
->state
== SERVICE_START
||
1469 s
->state
== SERVICE_START_POST
)
1472 assert(s
->state
== SERVICE_DEAD
|| s
->state
== SERVICE_MAINTAINANCE
|| s
->state
== SERVICE_AUTO_RESTART
);
1474 /* Make sure we don't enter a busy loop of some kind. */
1475 if (!ratelimit_test(&s
->ratelimit
)) {
1476 log_warning("%s start request repeated too quickly, refusing to start.", unit_id(u
));
1481 s
->main_pid_known
= false;
1483 service_enter_start_pre(s
);
1487 static int service_stop(Unit
*u
) {
1488 Service
*s
= SERVICE(u
);
1492 if (s
->state
== SERVICE_START_PRE
||
1493 s
->state
== SERVICE_START
||
1494 s
->state
== SERVICE_START_POST
||
1495 s
->state
== SERVICE_RELOAD
)
1498 if (s
->state
== SERVICE_AUTO_RESTART
) {
1499 service_set_state(s
, SERVICE_DEAD
);
1503 assert(s
->state
== SERVICE_RUNNING
);
1505 service_enter_stop(s
, true);
1509 static int service_reload(Unit
*u
) {
1510 Service
*s
= SERVICE(u
);
1514 assert(s
->state
== SERVICE_RUNNING
);
1516 service_enter_reload(s
);
1520 static bool service_can_reload(Unit
*u
) {
1521 Service
*s
= SERVICE(u
);
1525 return !!s
->exec_command
[SERVICE_EXEC_RELOAD
];
1528 static UnitActiveState
service_active_state(Unit
*u
) {
1531 return state_translation_table
[SERVICE(u
)->state
];
1534 static int main_pid_good(Service
*s
) {
1537 /* Returns 0 if the pid is dead, 1 if it is good, -1 if we
1540 /* If we know the pid file, then lets just check if it is
1542 if (s
->main_pid_known
)
1543 return s
->main_pid
> 0;
1545 /* We don't know the pid */
1549 static bool control_pid_good(Service
*s
) {
1552 return s
->control_pid
> 0;
1555 static int cgroup_good(Service
*s
) {
1558 if (s
->valid_no_process
)
1561 return cgroup_bonding_is_empty_list(UNIT(s
)->meta
.cgroup_bondings
);
1564 static void service_sigchld_event(Unit
*u
, pid_t pid
, int code
, int status
) {
1565 Service
*s
= SERVICE(u
);
1571 success
= code
== CLD_EXITED
&& status
== 0;
1572 s
->failure
= s
->failure
|| !success
;
1574 if (s
->main_pid
== pid
) {
1576 exec_status_fill(&s
->main_exec_status
, pid
, code
, status
);
1579 if (s
->type
== SERVICE_SIMPLE
|| s
->type
== SERVICE_FINISH
) {
1580 assert(s
->exec_command
[SERVICE_EXEC_START
]);
1581 s
->exec_command
[SERVICE_EXEC_START
]->exec_status
= s
->main_exec_status
;
1584 log_debug("%s: main process exited, code=%s, status=%i", unit_id(u
), sigchld_code_to_string(code
), status
);
1586 /* The service exited, so the service is officially
1591 case SERVICE_START_POST
:
1592 case SERVICE_RELOAD
:
1594 /* Need to wait until the operation is
1599 assert(s
->type
== SERVICE_FINISH
);
1601 /* This was our main goal, so let's go on */
1603 service_enter_start_post(s
);
1605 service_enter_stop(s
, false);
1608 case SERVICE_RUNNING
:
1609 service_enter_stop(s
, success
);
1612 case SERVICE_STOP_SIGTERM
:
1613 case SERVICE_STOP_SIGKILL
:
1615 if (!control_pid_good(s
))
1616 service_enter_stop_post(s
, success
);
1618 /* If there is still a control process, wait for that first */
1622 assert_not_reached("Uh, main process died at wrong time.");
1625 } else if (s
->control_pid
== pid
) {
1626 assert(s
->control_command
);
1628 exec_status_fill(&s
->control_command
->exec_status
, pid
, code
, status
);
1631 log_debug("%s: control process exited, code=%s status=%i", unit_id(u
), sigchld_code_to_string(code
), status
);
1633 /* If we are shutting things down anyway we
1634 * don't care about failing commands. */
1636 if (s
->control_command
->command_next
&&
1637 (success
|| (s
->state
== SERVICE_STOP
|| s
->state
== SERVICE_STOP_POST
)))
1639 /* There is another command to *
1640 * execute, so let's do that. */
1642 service_run_next(s
, success
);
1645 /* No further commands for this step, so let's
1646 * figure out what to do next */
1648 log_debug("%s got final SIGCHLD for state %s", unit_id(u
), service_state_to_string(s
->state
));
1652 case SERVICE_START_PRE
:
1654 service_enter_start(s
);
1656 service_enter_stop(s
, false);
1660 assert(s
->type
== SERVICE_FORKING
);
1662 /* Let's try to load the pid
1663 * file here if we can. We
1664 * ignore the return value,
1665 * since the PID file might
1666 * actually be created by a
1667 * START_POST script */
1671 service_load_pid_file(s
);
1673 service_enter_start_post(s
);
1675 service_enter_stop(s
, false);
1679 case SERVICE_START_POST
:
1680 if (success
&& s
->pid_file
&& !s
->main_pid_known
) {
1683 /* Hmm, let's see if we can
1684 * load the pid now after the
1685 * start-post scripts got
1688 if ((r
= service_load_pid_file(s
)) < 0)
1689 log_warning("%s: failed to load PID file %s: %s", unit_id(UNIT(s
)), s
->pid_file
, strerror(-r
));
1694 case SERVICE_RELOAD
:
1696 if (main_pid_good(s
) != 0 && cgroup_good(s
) != 0)
1697 service_set_state(s
, SERVICE_RUNNING
);
1699 service_enter_stop(s
, true);
1701 service_enter_stop(s
, false);
1706 if (main_pid_good(s
) > 0)
1707 /* Still not dead and we know the PID? Let's go hunting. */
1708 service_enter_signal(s
, SERVICE_STOP_SIGTERM
, success
);
1710 service_enter_stop_post(s
, success
);
1713 case SERVICE_STOP_SIGTERM
:
1714 case SERVICE_STOP_SIGKILL
:
1715 if (main_pid_good(s
) <= 0)
1716 service_enter_stop_post(s
, success
);
1718 /* If there is still a service
1719 * process around, wait until
1720 * that one quit, too */
1723 case SERVICE_STOP_POST
:
1724 case SERVICE_FINAL_SIGTERM
:
1725 case SERVICE_FINAL_SIGKILL
:
1726 service_enter_dead(s
, success
, true);
1730 assert_not_reached("Uh, control process died at wrong time.");
1734 assert_not_reached("Got SIGCHLD for unkown PID");
1737 static void service_timer_event(Unit
*u
, uint64_t elapsed
, Watch
* w
) {
1738 Service
*s
= SERVICE(u
);
1741 assert(elapsed
== 1);
1743 assert(w
== &s
->timer_watch
);
1747 case SERVICE_START_PRE
:
1749 case SERVICE_START_POST
:
1750 case SERVICE_RELOAD
:
1751 log_warning("%s operation timed out. Stopping.", unit_id(u
));
1752 service_enter_stop(s
, false);
1756 log_warning("%s stopping timed out. Terminating.", unit_id(u
));
1757 service_enter_signal(s
, SERVICE_STOP_SIGTERM
, false);
1760 case SERVICE_STOP_SIGTERM
:
1761 log_warning("%s stopping timed out. Killing.", unit_id(u
));
1762 service_enter_signal(s
, SERVICE_STOP_SIGKILL
, false);
1765 case SERVICE_STOP_SIGKILL
:
1766 /* Uh, wie sent a SIGKILL and it is still not gone?
1767 * Must be something we cannot kill, so let's just be
1768 * weirded out and continue */
1770 log_warning("%s still around after SIGKILL. Ignoring.", unit_id(u
));
1771 service_enter_stop_post(s
, false);
1774 case SERVICE_STOP_POST
:
1775 log_warning("%s stopping timed out (2). Terminating.", unit_id(u
));
1776 service_enter_signal(s
, SERVICE_FINAL_SIGTERM
, false);
1779 case SERVICE_FINAL_SIGTERM
:
1780 log_warning("%s stopping timed out (2). Killing.", unit_id(u
));
1781 service_enter_signal(s
, SERVICE_FINAL_SIGKILL
, false);
1784 case SERVICE_FINAL_SIGKILL
:
1785 log_warning("%s still around after SIGKILL (2). Entering maintainance mode.", unit_id(u
));
1786 service_enter_dead(s
, false, true);
1789 case SERVICE_AUTO_RESTART
:
1790 log_debug("%s holdoff time over, scheduling restart.", unit_id(u
));
1791 service_enter_restart(s
);
1795 assert_not_reached("Timeout at wrong time.");
1799 static void service_cgroup_notify_event(Unit
*u
) {
1800 Service
*s
= SERVICE(u
);
1804 log_debug("%s: cgroup is empty", unit_id(u
));
1808 /* Waiting for SIGCHLD is usually more interesting,
1809 * because it includes return codes/signals. Which is
1810 * why we ignore the cgroup events for most cases,
1811 * except when we don't know pid which to expect the
1814 case SERVICE_RUNNING
:
1816 if (!s
->valid_no_process
&& main_pid_good(s
) <= 0)
1817 service_enter_stop(s
, true);
1826 static int service_enumerate(Manager
*m
) {
1830 char *path
= NULL
, *fpath
= NULL
, *name
= NULL
;
1835 STRV_FOREACH(p
, m
->sysvrcnd_path
)
1836 for (i
= 0; i
< ELEMENTSOF(rcnd_table
); i
+= 2) {
1841 if (asprintf(&path
, "%s/%s", *p
, rcnd_table
[i
]) < 0) {
1849 if (!(d
= opendir(path
))) {
1850 if (errno
!= ENOENT
)
1851 log_warning("opendir() failed on %s: %s", path
, strerror(errno
));
1856 while ((de
= readdir(d
))) {
1857 Unit
*runlevel
, *service
;
1859 if (ignore_file(de
->d_name
))
1862 if (de
->d_name
[0] != 'S' && de
->d_name
[0] != 'K')
1865 if (strlen(de
->d_name
) < 4)
1870 if (asprintf(&fpath
, "%s/%s/%s", *p
, rcnd_table
[i
], de
->d_name
) < 0) {
1875 if (access(fpath
, X_OK
) < 0) {
1877 if (errno
!= ENOENT
)
1878 log_warning("access() failed on %s: %s", fpath
, strerror(errno
));
1885 if (asprintf(&name
, "%s.service", de
->d_name
+3) < 0) {
1890 if ((r
= manager_load_unit(m
, name
, &service
)) < 0)
1893 if ((r
= manager_load_unit(m
, rcnd_table
[i
+1], &runlevel
)) < 0)
1896 if (de
->d_name
[0] == 'S') {
1897 if ((r
= unit_add_dependency(runlevel
, UNIT_WANTS
, service
)) < 0)
1900 if ((r
= unit_add_dependency(runlevel
, UNIT_AFTER
, service
)) < 0)
1903 } else if (de
->d_name
[0] == 'K' &&
1904 (streq(rcnd_table
[i
+1], SPECIAL_RUNLEVEL0_TARGET
) ||
1905 streq(rcnd_table
[i
+1], SPECIAL_RUNLEVEL6_TARGET
))) {
1907 /* We honour K links only for
1908 * halt/reboot. For the normal
1909 * runlevels we assume the
1911 * implicitly added by the
1914 if ((r
= unit_add_dependency(runlevel
, UNIT_CONFLICTS
, service
)) < 0)
1917 if ((r
= unit_add_dependency(runlevel
, UNIT_BEFORE
, service
)) < 0)
1934 static const char* const service_state_table
[_SERVICE_STATE_MAX
] = {
1935 [SERVICE_DEAD
] = "dead",
1936 [SERVICE_START_PRE
] = "start-pre",
1937 [SERVICE_START
] = "start",
1938 [SERVICE_START_POST
] = "start-post",
1939 [SERVICE_RUNNING
] = "running",
1940 [SERVICE_RELOAD
] = "reload",
1941 [SERVICE_STOP
] = "stop",
1942 [SERVICE_STOP_SIGTERM
] = "stop-sigterm",
1943 [SERVICE_STOP_SIGKILL
] = "stop-sigkill",
1944 [SERVICE_STOP_POST
] = "stop-post",
1945 [SERVICE_FINAL_SIGTERM
] = "final-sigterm",
1946 [SERVICE_FINAL_SIGKILL
] = "final-sigkill",
1947 [SERVICE_MAINTAINANCE
] = "maintainance",
1948 [SERVICE_AUTO_RESTART
] = "auto-restart",
1951 DEFINE_STRING_TABLE_LOOKUP(service_state
, ServiceState
);
1953 static const char* const service_restart_table
[_SERVICE_RESTART_MAX
] = {
1954 [SERVICE_ONCE
] = "once",
1955 [SERVICE_RESTART_ON_SUCCESS
] = "restart-on-success",
1956 [SERVICE_RESTART_ALWAYS
] = "restart-on-failure",
1959 DEFINE_STRING_TABLE_LOOKUP(service_restart
, ServiceRestart
);
1961 static const char* const service_type_table
[_SERVICE_TYPE_MAX
] = {
1962 [SERVICE_FORKING
] = "forking",
1963 [SERVICE_SIMPLE
] = "simple",
1964 [SERVICE_FINISH
] = "finish"
1967 DEFINE_STRING_TABLE_LOOKUP(service_type
, ServiceType
);
1969 static const char* const service_exec_command_table
[_SERVICE_EXEC_MAX
] = {
1970 [SERVICE_EXEC_START_PRE
] = "ExecStartPre",
1971 [SERVICE_EXEC_START
] = "ExecStart",
1972 [SERVICE_EXEC_START_POST
] = "ExecStartPost",
1973 [SERVICE_EXEC_RELOAD
] = "ExecReload",
1974 [SERVICE_EXEC_STOP
] = "ExecStop",
1975 [SERVICE_EXEC_STOP_POST
] = "ExecStopPost",
1978 DEFINE_STRING_TABLE_LOOKUP(service_exec_command
, ServiceExecCommand
);
1980 const UnitVTable service_vtable
= {
1981 .suffix
= ".service",
1983 .init
= service_init
,
1984 .done
= service_done
,
1986 .dump
= service_dump
,
1988 .start
= service_start
,
1989 .stop
= service_stop
,
1990 .reload
= service_reload
,
1992 .can_reload
= service_can_reload
,
1994 .active_state
= service_active_state
,
1996 .sigchld_event
= service_sigchld_event
,
1997 .timer_event
= service_timer_event
,
1999 .cgroup_notify_empty
= service_cgroup_notify_event
,
2001 .enumerate
= service_enumerate