[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