From a8cbe79c77836cc2466e3534157864abc98ef3ef Mon Sep 17 00:00:00 2001
From: Frederic Crozat <fcrozat@suse.com>
Date: Fri, 28 Jun 2013 17:54:41 +0200
Subject: [PATCH] insserv.conf generator

parse /etc/insserv.conf.dd content and /etc/insserv.conf and generate
systemd unit drop-in files to add dependencies
---
 Makefile.am                               |   9 +
 src/insserv-generator/Makefile            |  28 +++
 src/insserv-generator/insserv-generator.c | 309 ++++++++++++++++++++++++++++++
 3 files changed, 346 insertions(+)
 create mode 100644 src/insserv-generator/Makefile
 create mode 100644 src/insserv-generator/insserv-generator.c

Index: systemd-208/Makefile.am
===================================================================
--- systemd-208.orig/Makefile.am
+++ systemd-208/Makefile.am
@@ -322,6 +322,7 @@ rootlibexec_PROGRAMS = \
 	systemd-socket-proxyd
 
 systemgenerator_PROGRAMS = \
+	systemd-insserv-generator \
 	systemd-getty-generator \
 	systemd-fstab-generator \
 	systemd-system-update-generator
@@ -1658,6 +1659,14 @@ systemd_delta_LDADD = \
 	libsystemd-shared.la
 
 # ------------------------------------------------------------------------------
+systemd_insserv_generator_SOURCES = \
+	src/insserv-generator/insserv-generator.c
+
+systemd_insserv_generator_LDADD = \
+	libsystemd-label.la \
+	libsystemd-shared.la
+
+# ------------------------------------------------------------------------------
 systemd_getty_generator_SOURCES = \
 	src/getty-generator/getty-generator.c
 
Index: systemd-208/src/insserv-generator/Makefile
===================================================================
--- /dev/null
+++ systemd-208/src/insserv-generator/Makefile
@@ -0,0 +1,28 @@
+#  This file is part of systemd.
+#
+#  Copyright 2010 Lennart Poettering
+#
+#  systemd is free software; you can redistribute it and/or modify it
+#  under the terms of the GNU Lesser General Public License as published by
+#  the Free Software Foundation; either version 2.1 of the License, or
+#  (at your option) any later version.
+#
+#  systemd is distributed in the hope that it will be useful, but
+#  WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+#  Lesser General Public License for more details.
+#
+#  You should have received a copy of the GNU Lesser General Public License
+#  along with systemd; If not, see <http://www.gnu.org/licenses/>.
+
+# This file is a dirty trick to simplify compilation from within
+# emacs. This file is not intended to be distributed. So, don't touch
+# it, even better ignore it!
+
+all:
+	$(MAKE) -C ..
+
+clean:
+	$(MAKE) -C .. clean
+
+.PHONY: all clean
Index: systemd-208/src/insserv-generator/insserv-generator.c
===================================================================
--- /dev/null
+++ systemd-208/src/insserv-generator/insserv-generator.c
@@ -0,0 +1,312 @@
+/*-*- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil -*-*/
+
+/***
+  This file is part of systemd.
+
+  Copyright 2012 Lennart Poettering
+
+  systemd is free software; you can redistribute it and/or modify it
+  under the terms of the GNU Lesser General Public License as published by
+  the Free Software Foundation; either version 2.1 of the License, or
+  (at your option) any later version.
+
+  systemd is distributed in the hope that it will be useful, but
+  WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+  Lesser General Public License for more details.
+
+  You should have received a copy of the GNU Lesser General Public License
+  along with systemd; If not, see <http://www.gnu.org/licenses/>.
+ ***/
+
+#include <stdio.h>
+#include <errno.h>
+#include <string.h>
+#include <sys/stat.h>
+
+#include "mkdir.h"
+#include "log.h"
+#include "fileio.h"
+#include "unit-name.h"
+#include "special.h"
+#include "path-util.h"
+#include "util.h"
+#include "strv.h"
+
+static const char *arg_dest = "/tmp";
+
+static char *sysv_translate_name(const char *name) {
+        char *r;
+
+        r = new(char, strlen(name) + sizeof(".service"));
+        if (!r)
+                return NULL;
+
+        if (endswith(name, ".sh"))
+                /* Drop .sh suffix */
+                strcpy(stpcpy(r, name) - 3, ".service");
+        if (startswith(name, "boot."))
+                /* Drop SuSE-style boot. prefix */
+                strcpy(stpcpy(r, name + 5), ".service");
+        else
+                /* Normal init script name */
+                strcpy(stpcpy(r, name), ".service");
+
+        return r;
+}
+
+static int sysv_translate_facility(const char *name, const char *filename, char **_r) {
+
+        /* We silently ignore the $ prefix here. According to the LSB
+         * spec it simply indicates whether something is a
+         * standardized name or a distribution-specific one. Since we
+         * just follow what already exists and do not introduce new
+         * uses or names we don't care who introduced a new name. */
+
+        static const char * const table[] = {
+                /* LSB defined facilities */
+                "local_fs",             NULL,
+                "network",              SPECIAL_NETWORK_TARGET,
+                "named",                SPECIAL_NSS_LOOKUP_TARGET,
+                "portmap",              SPECIAL_RPCBIND_TARGET,
+                "remote_fs",            SPECIAL_REMOTE_FS_TARGET,
+                "syslog",               NULL,
+                "time",                 SPECIAL_TIME_SYNC_TARGET,
+        };
+
+        unsigned i;
+        char *r;
+        const char *n;
+
+        assert(name);
+        assert(_r);
+
+        n = *name == '$' ? name + 1 : name;
+
+        for (i = 0; i < ELEMENTSOF(table); i += 2) {
+
+                if (!streq(table[i], n))
+                        continue;
+
+                if (!table[i+1])
+                        return 0;
+
+                r = strdup(table[i+1]);
+                if (!r)
+                        return log_oom();
+
+                goto finish;
+        }
+
+        /* If we don't know this name, fallback heuristics to figure
+         * out whether something is a target or a service alias. */
+
+        if (*name == '$') {
+                if (!unit_prefix_is_valid(n))
+                        return -EINVAL;
+
+                /* Facilities starting with $ are most likely targets */
+                r = unit_name_build(n, NULL, ".target");
+        } else if (filename && streq(name, filename))
+                /* Names equaling the file name of the services are redundant */
+                return 0;
+        else
+                /* Everything else we assume to be normal service names */
+                r = sysv_translate_name(n);
+
+        if (!r)
+                return -ENOMEM;
+
+finish:
+        *_r = r;
+
+        return 1;
+}
+
+
+
+static int parse_insserv_conf(const char* filename) {
+        _cleanup_fclose_ FILE *f = NULL;
+        int r;
+
+        if (!(f = fopen(filename, "re"))) {
+                log_debug("Failed to open file %s", filename);
+                r = errno == ENOENT ? 0 : -errno;
+                return r;
+        }
+
+        while (!feof(f)) {
+                char l[LINE_MAX], *t;
+                _cleanup_strv_free_ char **parsed = NULL;
+
+                if (!fgets(l, sizeof(l), f)) {
+                        if (feof(f))
+                                break;
+
+                        r = -errno;
+                        log_error("Failed to read configuration file '%s': %s", filename, strerror(-r));
+                        return -r;
+                }
+
+                t = strstrip(l);
+                if (*t != '$' && *t != '<')
+                        continue;
+
+                parsed = strv_split(t,WHITESPACE);
+                /* we ignore <interactive>, not used, equivalent to X-Interactive */
+                if (parsed && !startswith_no_case (parsed[0], "<interactive>")) {
+                        _cleanup_free_ char *facility = NULL;
+                        if (sysv_translate_facility(parsed[0], NULL, &facility) < 0 || !facility)
+                                continue;
+                        if (streq(facility, SPECIAL_REMOTE_FS_TARGET)) {
+                                _cleanup_free_ char *unit = NULL;
+                                /* insert also a Wants dependency from remote-fs-pre on remote-fs */
+                                unit = strjoin(arg_dest, "/remote-fs.target.d/50-",basename(filename),".conf", NULL);
+                                if (!unit)
+                                        return log_oom();
+
+                                mkdir_parents_label(unit, 0755);
+
+                                r = write_string_file(unit,
+                                                "# Automatically generated by systemd-insserv-generator\n\n"
+                                                "[Unit]\n"
+                                                "Wants=remote-fs-pre.target\n");
+                                if (r)
+                                        return r;
+                                free (facility);
+                                facility=strdup(SPECIAL_REMOTE_FS_PRE_TARGET);
+                        }
+                        if (facility && endswith(facility, ".target")) {
+                                char *name, **j;
+                                FILE *file = NULL;
+
+                                STRV_FOREACH (j, parsed+1) {
+                                        _cleanup_free_ char *unit = NULL;
+                                        _cleanup_free_ char *dep = NULL;
+
+                                        if (*j[0] == '+')
+                                                name = *j+1;
+                                        else
+                                                name = *j;
+                                        if (streq(name, "boot.localfs") ||
+                                                        streq(name, "boot.crypto"))
+                                                continue;
+                                        if ((sysv_translate_facility(name, NULL, &dep) < 0) || !dep)
+                                                continue;
+
+                                        unit = strjoin(arg_dest, "/", dep, ".d/50-",basename(filename),"-",parsed[0],".conf", NULL);
+                                        if (!unit)
+                                                return log_oom();
+
+                                        mkdir_parents_label(unit, 0755);
+
+                                        file = fopen(unit, "wxe");
+                                        if (!file) {
+                                                if (errno == EEXIST)
+                                                        log_error("Failed to create drop-in file %s", unit);
+                                                else
+                                                        log_error("Failed to create drop-in file %s: %m", unit);
+                                                return -errno;
+                                        }
+
+                                        fprintf(file,
+                                                        "# Automatically generated by systemd-insserv-generator\n\n"
+                                                        "[Unit]\n"
+                                                        "Wants=%s\n"
+                                                        "Before=%s\n",
+                                                        facility, facility);
+
+                                        fflush(file);
+                                        if (ferror(file)) {
+                                                log_error("Failed to write unit file %s: %m", unit);
+                                                return -errno;
+                                        }
+                                        fclose(file);
+
+                                        if (*j[0] != '+') {
+                                                free (unit);
+                                                unit = strjoin(arg_dest, "/", facility, ".d/50-hard-dependency-",basename(filename),"-",parsed[0],".conf", NULL);
+                                                if (!unit)
+                                                        return log_oom();
+
+                                                mkdir_parents_label(unit, 0755);
+
+                                                file = fopen(unit, "wxe");
+                                                if (!file) {
+                                                        if (errno == EEXIST)
+                                                                log_error("Failed to create drop-in file %s, as it already exists", unit);
+                                                        else
+                                                                log_error("Failed to create drop-in file %s: %m", unit);
+                                                        return -errno;
+                                                }
+
+
+                                                fprintf(file,
+                                                                "# Automatically generated by systemd-insserv-generator\n\n"
+                                                                "[Unit]\n"
+                                                                "SourcePath=%s\n"
+                                                                "Requires=%s\n",
+                                                                filename, dep);
+                                                fflush(file);
+                                                if (ferror(file)) {
+                                                        log_error("Failed to write unit file %s: %m", unit);
+                                                        return -errno;
+                                                }
+                                                fclose(file);
+                                        }
+                                }
+                        }
+                }
+        }
+        return r;
+}
+
+static int parse_insserv(void) {
+        DIR *d = NULL;
+        struct dirent *de;
+        int r = 0;
+
+        if (!(d = opendir("/etc/insserv.conf.d/"))) {
+                if (errno != ENOENT) {
+                        log_debug("opendir() failed on /etc/insserv.conf.d/ %s", strerror(errno));
+                }
+        } else {
+
+                while ((de = readdir(d))) {
+                        char *path = NULL;
+                        if (ignore_file(de->d_name))
+                                continue;
+
+                        path = strjoin("/etc/insserv.conf.d/", de->d_name, NULL);
+                        parse_insserv_conf(path);
+                        free(path);
+                }
+                closedir (d);
+        }
+
+        r = parse_insserv_conf("/etc/insserv.conf");
+
+        return r;
+}
+
+int main(int argc, char *argv[]) {
+        int r = 0;
+
+        if (argc > 1 && argc != 4) {
+                log_error("This program takes three or no arguments.");
+                return EXIT_FAILURE;
+        }
+
+        if (argc > 1)
+                arg_dest = argv[1];
+
+        log_set_target(LOG_TARGET_SAFE);
+        log_parse_environment();
+        log_open();
+
+        umask(0022);
+
+        r = parse_insserv();
+
+        return (r < 0) ? EXIT_FAILURE : EXIT_SUCCESS;
+}