summaryrefslogtreecommitdiff
path: root/src/instance
diff options
context:
space:
mode:
Diffstat (limited to 'src/instance')
-rw-r--r--src/instance/deps-exe/s6-instance-maker2
-rw-r--r--src/instance/s6-instance-maker.c181
2 files changed, 183 insertions, 0 deletions
diff --git a/src/instance/deps-exe/s6-instance-maker b/src/instance/deps-exe/s6-instance-maker
new file mode 100644
index 0000000..750e758
--- /dev/null
+++ b/src/instance/deps-exe/s6-instance-maker
@@ -0,0 +1,2 @@
+libs6auto.a.xyzzy
+-lskarnet
diff --git a/src/instance/s6-instance-maker.c b/src/instance/s6-instance-maker.c
new file mode 100644
index 0000000..20f557f
--- /dev/null
+++ b/src/instance/s6-instance-maker.c
@@ -0,0 +1,181 @@
+/* ISC license. */
+
+#include <errno.h>
+#include <string.h>
+#include <sys/stat.h>
+#include <sys/uio.h>
+
+#include <skalibs/uint64.h>
+#include <skalibs/types.h>
+#include <skalibs/buffer.h>
+#include <skalibs/strerr.h>
+#include <skalibs/sgetopt.h>
+#include <skalibs/stralloc.h>
+#include <skalibs/djbunix.h>
+#include <skalibs/skamisc.h>
+
+#include <execline/config.h>
+
+#include <s6/config.h>
+#include <s6/auto.h>
+
+#define USAGE "s6-instance-maker [ -c max ] [ -u user ] [ -l loguser ] [ -L logdir ] [ -t stamptype ] [ -n nfiles ] [ -s filesize ] [ -S maxsize ] [ -P prefix ] [ -r service[/logger[/pipeline]] ] template dir"
+#define dieusage() strerr_dieusage(100, USAGE)
+
+typedef struct svinfo_s svinfo, *svinfo_ref ;
+struct svinfo_s
+{
+ char const *user ;
+ unsigned int maxinstances ;
+} ;
+
+static stralloc sa = STRALLOC_ZERO ;
+
+static int write_run (buffer *b, void *data)
+{
+ svinfo *t = data ;
+ size_t l ;
+ char fmt[UINT_FMT] ;
+ l = uint_fmt(fmt, t->maxinstances) ;
+ if (buffer_puts(b, EXECLINE_EXTBINPREFIX "execlineb -S1\n\n"
+ EXECLINE_EXTBINPREFIX "fdmove -c 2 1\n") < 0) return 0 ;
+ if (t->user)
+ {
+ if (!string_quote(&sa, t->user, strlen(t->user))) return 0 ;
+ if (buffer_puts(b, S6_EXTBINPREFIX "s6-setuidgid ") < 0
+ || buffer_put(b, sa.s, sa.len) < 0
+ || buffer_put(b, "\n", 1) < 0) goto err ;
+ sa.len = 0 ;
+ }
+ if (buffer_puts(b, S6_EXTBINPREFIX "s6-svscan -d3 -c") < 0
+ || buffer_put(b, fmt, l) < 0
+ || buffer_putsflush(b, " -- instance\n") < 0) return 0 ;
+ return 1 ;
+
+err:
+ sa.len = 0 ;
+ return 0 ;
+}
+
+static void write_service (char const *dir, char const *template, char const *user, unsigned int maxinstances, char const *logger)
+{
+ svinfo data = { .user = user, .maxinstances = maxinstances } ;
+ size_t dirlen = strlen(dir) ;
+ mode_t m = umask(0) ;
+ char fn[dirlen + 21] ;
+ memcpy(fn, dir, dirlen) ;
+ memcpy(fn + dirlen, "/instance", 10) ;
+ m = umask(0) ;
+ if (mkdir(fn, 0755) == -1) strerr_diefu2sys(111, "mkdir ", fn) ;
+ memcpy(fn + dirlen + 9, "s", 2) ;
+ if (mkdir(fn, 0755) == -1) strerr_diefu2sys(111, "mkdir ", fn) ;
+ umask(m) ;
+ memcpy(fn + dirlen + 10, "/.template", 11) ;
+ if (!hiercopy_tmp(template, fn, &sa))
+ strerr_diefu4sys(111, "copy file hierarchy from ", template, " to ", fn) ;
+ s6_auto_write_service(dir, 3, &write_run, &data, logger) ;
+}
+
+int main (int argc, char const *const *argv)
+{
+ char const *user = "" ;
+ char const *loguser = 0 ;
+ char const *logdir = 0 ;
+ unsigned int maxinstances = 500 ;
+ unsigned int stamptype = 1 ;
+ unsigned int nfiles = 10 ;
+ uint64_t filesize = 1000000 ;
+ uint64_t maxsize = 0 ;
+ char const *prefix = 0 ;
+ char *rcinfo[3] = { 0, 0, 0 } ;
+ size_t dirlen ;
+ PROG = "s6-instance-maker" ;
+ {
+ subgetopt l = SUBGETOPT_ZERO ;
+ for (;;)
+ {
+ int opt = subgetopt_r(argc, argv, "u:l:L:c:t:n:s:S:P:r:", &l) ;
+ if (opt == -1) break ;
+ switch (opt)
+ {
+ case 'u' : user = l.arg ; break ;
+ case 'l' : loguser = l.arg ; break ;
+ case 'L' : logdir = l.arg ; break ;
+ case 'c' : if (!uint0_scan(l.arg, &maxinstances)) dieusage() ; break ;
+ case 't' : if (!uint0_scan(l.arg, &stamptype)) dieusage() ; break ;
+ case 'n' : if (!uint0_scan(l.arg, &nfiles)) dieusage() ; break ;
+ case 's' : if (!uint640_scan(l.arg, &filesize)) dieusage() ; break ;
+ case 'S' : if (!uint640_scan(l.arg, &maxsize)) dieusage() ; break ;
+ case 'P' : prefix = l.arg ; break ;
+ case 'r' : rcinfo[0] = (char *)l.arg ; break ;
+ default : dieusage() ;
+ }
+ }
+ argc -= l.ind ; argv += l.ind ;
+ }
+
+ if (argc < 2) dieusage() ;
+ if (logdir && logdir[0] != '/')
+ strerr_dief1x(100, "logdir must be absolute") ;
+ if (stamptype > 3) strerr_dief1x(100, "stamptype must be 0, 1, 2 or 3") ;
+ if (strchr(user, ' ') || strchr(user, '\t') || strchr(user, '\n'))
+ strerr_dief1x(100, "invalid user") ;
+ if (maxinstances < 1) maxinstances = 1 ;
+ if (maxinstances > 90000) maxinstances = 90000 ;
+ if (rcinfo[0])
+ {
+ if (strchr(rcinfo[0], '\n'))
+ strerr_dief2x(100, "newlines", " are forbidden in s6-rc names") ;
+ if (rcinfo[0][0] == '/')
+ strerr_dief2x(100, "service", " name cannot be empty") ;
+ rcinfo[1] = strchr(rcinfo[0], '/') ;
+ if (rcinfo[1])
+ {
+ *rcinfo[1]++ = 0 ;
+ if (!rcinfo[1][0]) strerr_dief1x(100, "argument to -r must be: service or service/logger or service/logger/pipeline") ;
+ if (rcinfo[1][0] == '/')
+ strerr_dief2x(100, "logger", " name cannot be empty") ;
+ if (!logdir) strerr_dief1x(100, "logger specifiec (-r) but logdir not specified (-L)") ;
+ rcinfo[2] = strchr(rcinfo[1], '/') ;
+ if (rcinfo[2])
+ {
+ *rcinfo[2]++ = 0 ;
+ if (!rcinfo[2][0]) strerr_dief2x(100, "pipeline", " name cannot be empty") ;
+ if (strchr(rcinfo[2], '/')) strerr_dief2x(100, "slashes", " are forbidden in s6-rc names") ;
+ }
+ }
+ else if (logdir)
+ strerr_dief1x(100, "logdir specified (-L) but logger name not specified (-r)") ;
+ }
+
+ dirlen = strlen(argv[1]) ;
+ if (rcinfo[0])
+ {
+ size_t svclen = strlen(rcinfo[0]) ;
+ size_t loglen = rcinfo[1] ? strlen(rcinfo[1]) : 0 ;
+ char dir[dirlen + 2 + (svclen > loglen ? svclen : loglen)] ;
+ memcpy(dir, argv[1], dirlen) ;
+ dir[dirlen] = '/' ;
+ if (mkdir(argv[1], 0755) < 0 && errno != EEXIST)
+ strerr_diefu2sys(111, "mkdir ", argv[2]) ;
+ memcpy(dir + dirlen + 1, rcinfo[0], svclen + 1) ;
+ write_service(dir, user, argv[0], maxinstances, rcinfo[1] ? rcinfo[1] : "") ;
+ if (rcinfo[1])
+ {
+ memcpy(dir + dirlen + 1, rcinfo[1], loglen + 1) ;
+ s6_auto_write_logger_tmp(dir, loguser, logdir, stamptype, nfiles, filesize, maxsize, prefix, rcinfo[0], rcinfo[2], &sa) ;
+ }
+ }
+ else
+ {
+ write_service(argv[1], user, argv[0], maxinstances, 0) ;
+ if (logdir)
+ {
+ char dir[dirlen + 5] ;
+ memcpy(dir, argv[1], dirlen) ;
+ memcpy(dir + dirlen, "/log", 5) ;
+ s6_auto_write_logger_tmp(dir, loguser, logdir, stamptype, nfiles, filesize, maxsize, prefix, 0, 0, &sa) ;
+ }
+ }
+ return 0 ;
+}