Daniel Barlow
4e51977ae0
properties are similar to outputs, but are different in that they are fixed values (do not change) and are present even when the service is down if the attribute is present and an attrset, this will write the equivalent recursive directory structure to $out/.properties/
145 lines
3.2 KiB
Nix
145 lines
3.2 KiB
Nix
{
|
|
stdenvNoCC,
|
|
s6,
|
|
lib,
|
|
writeScript,
|
|
serviceFns,
|
|
}:
|
|
let
|
|
prefix = "/run/services/outputs";
|
|
output = service: name: "${prefix}/${service.name}/${name}";
|
|
inherit (lib.attrsets) mapAttrsRecursive collect;
|
|
inherit (lib.strings) concatStringsSep;
|
|
serviceScript = commands: ''
|
|
#!/bin/sh
|
|
exec 2>&1
|
|
. ${serviceFns}
|
|
${commands}
|
|
'';
|
|
cleanupScript = name: cmds: ''
|
|
#!/bin/sh
|
|
${if cmds != null then cmds else ""}
|
|
if test -d ${prefix}/${name} ; then rm -rf ${prefix}/${name} ; fi
|
|
'';
|
|
service =
|
|
{
|
|
name,
|
|
serviceType,
|
|
run ? null,
|
|
up ? null,
|
|
down ? null,
|
|
finish ? null,
|
|
notification-fd ? null,
|
|
producer-for ? null,
|
|
consumer-for ? null,
|
|
pipeline-name ? null,
|
|
timeout-up ? 30000, # milliseconds
|
|
timeout-down ? 0,
|
|
dependencies ? [ ],
|
|
contents ? [ ],
|
|
buildInputs ? [ ],
|
|
restart-on-upgrade ? false,
|
|
controller ? null,
|
|
properties ? {}
|
|
}:
|
|
stdenvNoCC.mkDerivation {
|
|
# we use stdenvNoCC to avoid generating derivations with names
|
|
# like foo.service-mips-linux-musl
|
|
inherit
|
|
name
|
|
serviceType
|
|
up
|
|
down
|
|
run
|
|
finish
|
|
notification-fd
|
|
producer-for
|
|
consumer-for
|
|
pipeline-name
|
|
timeout-up
|
|
timeout-down
|
|
restart-on-upgrade
|
|
;
|
|
propertiesText =
|
|
let a = mapAttrsRecursive
|
|
(path: value: "writepath ${concatStringsSep "/" path} ${builtins.toString value}\n")
|
|
properties;
|
|
in collect builtins.isString a;
|
|
|
|
buildInputs =
|
|
buildInputs ++ dependencies ++ contents ++ lib.optional (controller != null) controller;
|
|
inherit controller dependencies contents;
|
|
builder = ./builder.sh;
|
|
};
|
|
|
|
longrun =
|
|
{
|
|
name,
|
|
run,
|
|
finish ? null,
|
|
notification-fd ? null,
|
|
buildInputs ? [ ],
|
|
producer-for ? null,
|
|
...
|
|
}@args:
|
|
let
|
|
logger = service {
|
|
serviceType = "longrun";
|
|
name = "${name}-log";
|
|
run = serviceScript "${s6}/bin/s6-log -d 10 -- p${name} 1";
|
|
notification-fd = 10;
|
|
consumer-for = name;
|
|
pipeline-name = "${name}-pipeline";
|
|
};
|
|
in
|
|
service (
|
|
args
|
|
// {
|
|
buildInputs = buildInputs ++ lib.optional (producer-for == null) logger;
|
|
serviceType = "longrun";
|
|
run = serviceScript run;
|
|
finish = cleanupScript name finish;
|
|
producer-for = if producer-for != null then producer-for else "${name}-log";
|
|
}
|
|
);
|
|
|
|
oneshot =
|
|
{
|
|
name,
|
|
up,
|
|
down ? "",
|
|
...
|
|
}@args:
|
|
service (
|
|
args
|
|
// {
|
|
serviceType = "oneshot";
|
|
up = writeScript "${name}-up" (serviceScript up);
|
|
down = writeScript "${name}-down" "${serviceScript down}\n${cleanupScript name null}";
|
|
}
|
|
);
|
|
bundle =
|
|
{
|
|
contents ? [ ],
|
|
dependencies ? [ ],
|
|
...
|
|
}@args:
|
|
service (
|
|
args
|
|
// {
|
|
serviceType = "bundle";
|
|
inherit contents dependencies;
|
|
}
|
|
);
|
|
target = bundle;
|
|
in
|
|
{
|
|
inherit
|
|
target
|
|
bundle
|
|
oneshot
|
|
output
|
|
;
|
|
longrun = lib.makeOverridable longrun;
|
|
}
|