hscript: Allow svcenable to create new runlevels

This is going to be useful in general for some advanced use cases, but
most importantly, it will allow us to define runlevels for live media.

Ref: #346

1 files changed, 19 insertions, 0 deletions

diff --git a/hscript/script_e.cc b/hscript/script_e.cc
index 3cdc78f..8f0f4b4 100644
--- a/hscript/script_e.cc
+++ b/hscript/script_e.cc
@@ -677,6 +677,25 @@ bool Script::execute() const {
     for(const auto &svc : internal->svcs_enable) {
         EXECUTE_OR_FAIL("svcenable", svc)
     }
+#ifdef HAS_INSTALL_ENV
+    if(!opts.test(Simulate)) {
+	const std::set<std::string> def_runlevels{
+            "boot", "default", "empty", "nonetwork", "shutdown", "sysinit"
+        };
+	const auto rl_dir{targ_etc + "/runlevels"};
+        for(auto &&file : fs::directory_iterator(rl_dir)) {
+            const auto runlevel{file.path().filename().string()};
+	    if(def_runlevels.find(runlevel) == def_runlevels.end()) {
+                fs::create_symlink("../default",
+                                   rl_dir + "/" + runlevel + "/default", ec);
+                if(ec) {
+                    output_error("internal", "could not stack runlevel " +
+                                 runlevel, ec.message());
+                }
+            }
+        }
+    }
+#endif
 
     if(internal->boot) {
         EXECUTE_OR_FAIL("bootloader", internal->boot)