summaryrefslogtreecommitdiff
path: root/gnu/services/cuirass.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/services/cuirass.scm')
-rw-r--r--gnu/services/cuirass.scm22
1 files changed, 13 insertions, 9 deletions
diff --git a/gnu/services/cuirass.scm b/gnu/services/cuirass.scm
index fcbd5e08a5..bcdbffa2f3 100644
--- a/gnu/services/cuirass.scm
+++ b/gnu/services/cuirass.scm
@@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org>
-;;; Copyright © 2016-2023 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2016-2024 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2017, 2020 Mathieu Othacehe <m.othacehe@gmail.com>
;;; Copyright © 2017 Jan Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2018, 2019 Ricardo Wurmus <rekado@elephly.net>
@@ -136,7 +136,9 @@
(database (cuirass-configuration-database config))
(port (cuirass-configuration-port config))
(host (cuirass-configuration-host config))
- (specs (cuirass-configuration-specifications config))
+ (config-file (scheme-file
+ "cuirass-specs.scm"
+ (cuirass-configuration-specifications config)))
(use-substitutes? (cuirass-configuration-use-substitutes? config))
(one-shot? (cuirass-configuration-one-shot? config))
(fallback? (cuirass-configuration-fallback? config))
@@ -144,13 +146,14 @@
`(,(shepherd-service
(documentation "Run Cuirass.")
(provision '(cuirass))
- (requirement '(guix-daemon postgres postgres-roles networking))
+ (requirement '(user-processes
+ guix-daemon
+ postgres postgres-roles networking))
(start #~(make-forkexec-constructor
(list (string-append #$cuirass "/bin/cuirass")
"register"
"--cache-directory" #$cache-directory
- "--specifications"
- #$(scheme-file "cuirass-specs.scm" specs)
+ "--specifications" #$config-file
"--database" #$database
"--interval" #$(number->string interval)
#$@(if parameters
@@ -172,11 +175,12 @@
#:user #$user
#:group #$group
#:log-file #$main-log-file))
- (stop #~(make-kill-destructor)))
+ (stop #~(make-kill-destructor))
+ (actions (list (shepherd-configuration-action config-file))))
,(shepherd-service
(documentation "Run Cuirass web interface.")
(provision '(cuirass-web))
- (requirement '(cuirass))
+ (requirement '(user-processes cuirass))
(start #~(make-forkexec-constructor
(list (string-append #$cuirass "/bin/cuirass")
"web"
@@ -202,7 +206,7 @@
(shepherd-service
(documentation "Run Cuirass remote build server.")
(provision '(cuirass-remote-server))
- (requirement '(avahi-daemon cuirass))
+ (requirement '(user-processes avahi-daemon cuirass))
(start #~(make-forkexec-constructor
(list (string-append #$cuirass "/bin/cuirass")
"remote-server"
@@ -373,7 +377,7 @@ CONFIG."
(list (shepherd-service
(documentation "Run Cuirass remote build worker.")
(provision '(cuirass-remote-worker))
- (requirement '(avahi-daemon guix-daemon networking))
+ (requirement '(user-processes avahi-daemon guix-daemon networking))
(start #~(make-forkexec-constructor
(list (string-append #$cuirass "/bin/cuirass")
"remote-worker"