1 files changed, 102 insertions, 6 deletions

diff --git a/urunlevel/runlevel/remove_initd.c b/urunlevel/runlevel/remove_initd.c
index 1224b03..1adda10 100644
--- a/urunlevel/runlevel/remove_initd.c
+++ b/urunlevel/runlevel/remove_initd.c
@@ -3,6 +3,9 @@
  *
  * Copyright (C) 2005 by David Seikel won_fang@yahoo.com.au
  *
+ * Clean room implementation of LSB init.d specs.
+ * I didn't steal any of this, honest B-).
+ *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
  * the Free Software Foundation; either version 2 of the License, or
@@ -20,6 +23,7 @@
  *
  */
 
+#include <string.h>
 #include <unistd.h>
 
 #include "busybox.h"
@@ -28,11 +32,103 @@
 
 int remove_initd_main(int argc, char **argv)
 {
-    llist_t *sorted = NULL;
-    llist_t *unsorted = get_scripts();
+    int result = EXIT_FAILURE;
+
+    argv += optind;
+    if (!*argv)
+        bb_show_usage();
+    else {
+        int in_init = 0;
+        llist_t *current = NULL;
+        llist_t *previous = NULL;
+        llist_t *unsorted = get_scripts();
+        init_d_info_t *info = NULL;
+        char *info_text = NULL;
+        char *pathname = NULL;
+        RESERVE_CONFIG_BUFFER(resolved_path, PATH_MAX);
+
+        bb_xasprintf(&pathname, "%s", *argv);
+        if ((*argv)[0] != '/') {
+            char *cwd = xgetcwd(NULL);
+            
+            if (cwd) {
+                free(pathname);
+                bb_xasprintf(&pathname, "%s/%s", cwd, *argv);
+            }
+        }
+
+        if (realpath(pathname, resolved_path) != NULL) {
+            if (strncmp("/etc/init.d/", resolved_path, 12) == 0)
+                in_init = 1;
+        } else {
+            bb_perror_msg("%s", pathname);
+        }
+
+        info_text = get_init_info(pathname);
+        info = parse_init_info(info_text, bb_get_last_path_component(pathname));
+
+        current = unsorted;
+        while (current) {
+            init_d_info_t *this_one = (init_d_info_t *) current->data;
+
+            if (strcmp(this_one->path, info->path) == 0) {
+                current = llist_delete(&unsorted, previous, current);
+                break;
+            }
+            previous = current;
+            current = current->link;
+        }
+
+        sort_scripts(unsorted, NULL);
+        result = EXIT_SUCCESS;
+        current = unsorted;
+        while (current) {
+            int k;
+            init_d_info_t *this_one = (init_d_info_t *) current->data;
+
+            if (this_one) {
+                for (k = 0; k < info->sizes[0]; k++) {
+                    int i;
+
+                    for (i = 0; i < this_one->sizes[1]; i++) {
+                        if (strcmp(this_one->reqstart[i], info->provides[k]) == 0) {
+                            result = EXIT_FAILURE;
+                            bb_error_msg("%s is required by %s.", pathname, this_one->path);
+                            break;
+                        }
+                    }
+                    if (result == EXIT_FAILURE)
+                        break;
+                }
+            }
+
+            current = current->link;
+        }
+
+        /* This is not LSB compliant, the LSB package manager is supposed to remove it, but...
+         * We may have created it, so we should remove it.
+         * LSB says that init.d scripts are "configuration files", I disagree, they are executables.
+         * LSB further says that config files are left behind after package removal.  This is a
+         * contradiction with "package manager is supposed to remove it".
+         *
+         * Safest thing to do is zap it.
+         */
+        if ((in_init) && (result == EXIT_SUCCESS)) {
+            free(info_text);
+            bb_xasprintf(&info_text, "/etc/init.d/%s", bb_get_last_path_component(pathname));
+            remove_file(info_text, FILEUTILS_FORCE);
+        }
+
+    if (result == EXIT_FAILURE)
+        bb_error_msg("Unable to remove the %s init.d script.", pathname);
+
+#ifdef CONFIG_FEATURE_CLEAN_UP
+        RELEASE_CONFIG_BUFFER(resolved_path);
+#endif
+        free(info);
+        free(pathname);
+        free(info_text);
+    }
 
-// Should remove this script from unsorted.
-    sorted = sort_scripts(unsorted);
-// Should return 1 if there are unsatisfied dependencies if this is removed.
-    return EXIT_SUCCESS;
+    return result;
 }