guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

02/02: hydra: bayfront: Rotate more NGinx logs.


From: Christopher Baines
Subject: 02/02: hydra: bayfront: Rotate more NGinx logs.
Date: Mon, 10 Jun 2024 09:08:49 -0400 (EDT)

cbaines pushed a commit to branch master
in repository maintenance.

commit 4998862c1738d86010700121fc6fe08ef2db42c8
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Mon Jun 10 14:08:09 2024 +0100

    hydra: bayfront: Rotate more NGinx logs.
    
    * hydra/bayfront.scm (%nginx-log-rotation): Rotate more NGinx logs.
---
 hydra/bayfront.scm | 31 +++++++++++++++++++------------
 1 file changed, 19 insertions(+), 12 deletions(-)

diff --git a/hydra/bayfront.scm b/hydra/bayfront.scm
index dda19041..ad25b2a3 100644
--- a/hydra/bayfront.scm
+++ b/hydra/bayfront.scm
@@ -1070,18 +1070,25 @@ add_header Content-Type text/plain;")))
           (list "return 308 https://$host$request_uri;";)))))
 
 (define %nginx-log-rotation
-  (simple-service
-   'nginx-log-rotation
-   rottlog-service-type
-   (list (log-rotation
-          (files (list "/var/log/nginx/bordeaux.access.log.gz"))
-          (options
-           '("storefile @FILENAME"
-             "nocompress"
-             "notifempty"))
-          (post-rotate #~(let ((pid (call-with-input-file "/var/run/nginx/pid"
-                                      read)))
-                           (kill pid SIGUSR1)))))))
+  (let ((nginx-SIGUSR1
+         #~(let ((pid (call-with-input-file "/var/run/nginx/pid"
+                        read)))
+             (kill pid SIGUSR1))))
+    (simple-service
+     'nginx-log-rotation
+     rottlog-service-type
+     (list (log-rotation
+            (files (list "/var/log/nginx/bordeaux.access.log.gz"))
+            (options
+             '("storefile @FILENAME"
+               "nocompress"
+               "notifempty"))
+            (post-rotate nginx-SIGUSR1))
+           (log-rotation
+            (files (list "/var/log/nginx/guix-gnu-org.https.access.log"
+                         "/var/log/nginx/https.access.log"
+                         "/var/log/nginx/coordinator.access.log"))
+            (post-rotate nginx-SIGUSR1))))))
 
 
 (define %guix-build-coordinator-configuration



reply via email to

[Prev in Thread] Current Thread [Next in Thread]