Some checks failed
Periodic Merges (6h) / master → staging-nixos (push) Failing after 12m50s
Periodic Merges (6h) / master → staging-next (push) Failing after 12m54s
Periodic Merges (24h) / merge-base(master,staging) → haskell-updates (push) Failing after 11m54s
Periodic Merges (6h) / staging-next → staging (push) Failing after 12m13s
Periodic Merges (24h) / staging-next-25.05 → staging-25.05 (push) Failing after 13m24s
Periodic Merges (24h) / release-25.05 → staging-next-25.05 (push) Failing after 14m28s
31 lines
718 B
Nix
31 lines
718 B
Nix
lib:
|
|
|
|
{
|
|
cert,
|
|
groups,
|
|
services,
|
|
}:
|
|
let
|
|
catSep = builtins.concatStringsSep;
|
|
|
|
svcUser = svc: svc.serviceConfig.User or "root";
|
|
svcGroups =
|
|
svc:
|
|
(lib.optional (svc.serviceConfig ? Group) svc.serviceConfig.Group)
|
|
++ lib.toList (svc.serviceConfig.SupplementaryGroups or [ ]);
|
|
in
|
|
{
|
|
assertion = builtins.all (
|
|
svc:
|
|
svcUser svc == "root"
|
|
|| builtins.elem (svcUser svc) groups.${cert.group}.members
|
|
|| builtins.elem cert.group (svcGroups svc)
|
|
) services;
|
|
|
|
message = "Certificate ${cert.domain} (group=${cert.group}) must be readable by service(s) ${
|
|
catSep ", " (
|
|
map (svc: "${svc.name} (user=${svcUser svc} groups=${catSep "," (svcGroups svc)})") services
|
|
)
|
|
}";
|
|
}
|