From 61a9aa7fbe8291600710524c9dfbd0960fd580df Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Mon, 24 Feb 2025 10:56:18 +0100
Subject: [PATCH] =?UTF-8?q?services:=20cuirass:=20Respawn=20=E2=80=98cuira?=
 =?UTF-8?q?ss-web=E2=80=99=20more=20slowly.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

* gnu/services/cuirass.scm (cuirass-shepherd-service): Add
‘respawn-delay’ and ‘respawn-limit’ fields for ‘cuirass-web’.

Change-Id: I38c65d3a13fb3abc7c8f14784de3c93f5d7603f7
---
 gnu/services/cuirass.scm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/gnu/services/cuirass.scm b/gnu/services/cuirass.scm
index 08a146f9803..d7501b7b665 100644
--- a/gnu/services/cuirass.scm
+++ b/gnu/services/cuirass.scm
@@ -207,6 +207,13 @@
         (documentation "Run Cuirass web interface.")
         (provision '(cuirass-web))
         (requirement '(user-processes cuirass))
+
+        ;; XXX: Respawn slowly to work around the fact that 'cuirass' is not
+        ;; ready yet (not listening to the bridge) when it gets in 'started'
+        ;; state.
+        (respawn-delay 1)
+        (respawn-limit #~'(10 . 15))
+
         (start #~(make-forkexec-constructor
                   (list (string-append #$cuirass "/bin/cuirass")
                         "web"