[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[shepherd] 01/02: service: Create log files as non-world-readable.
From: |
Ludovic Courtès |
Subject: |
[shepherd] 01/02: service: Create log files as non-world-readable. |
Date: |
Sun, 19 Apr 2020 10:26:44 -0400 (EDT) |
civodul pushed a commit to branch master
in repository shepherd.
commit 23b1fcbf20044aad3b766b39e6b465da480ec5a5
Author: Diego Nicola Barbato <address@hidden>
AuthorDate: Tue Apr 7 13:58:28 2020 +0200
service: Create log files as non-world-readable.
* modules/shepherd/service.scm (exec-command): Create log-file with file
permissions #o640.
Signed-off-by: Ludovic Courtès <address@hidden>
---
modules/shepherd/service.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/modules/shepherd/service.scm b/modules/shepherd/service.scm
index 620b14d..f284249 100644
--- a/modules/shepherd/service.scm
+++ b/modules/shepherd/service.scm
@@ -814,7 +814,7 @@ false."
;; Redirect stout and stderr to use LOG-FILE.
(catch-system-error (close-fdes 1))
(catch-system-error (close-fdes 2))
- (dup2 (open-fdes log-file (logior O_CREAT O_WRONLY O_APPEND)) 1)
+ (dup2 (open-fdes log-file (logior O_CREAT O_WRONLY O_APPEND)
#o640) 1)
(dup2 1 2))
(lambda (key . args)
(format (current-error-port)