GNU bug report logs - #25850
[PATCH] services: Create /var/log upon activation

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 25850 in the body.
You can then email your comments to 25850 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Christopher Baines <mail <at> cbaines.net>
To: guix-patches <at> gnu.org
Subject: [PATCH] services: Create /var/log upon activation
Date: Thu, 23 Feb 2017 08:20:57 +0000

When launching a container created with guix system container, the
attempt to create /var/log/wtmp would fail, as /var/log did not exist.

* gnu/services.scm (activation-script): Create /var/log
---
 gnu/services.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/gnu/services.scm b/gnu/services.scm
index 6ac4f1322..15a0f2f89 100644
--- a/gnu/services.scm
+++ b/gnu/services.scm
@@ -345,6 +345,7 @@ ACTIVATION-SCRIPT-TYPE."
 
                       ;; Same for 'wtmp', which is populated by mingetty et
                       ;; al.
+                      (if (not (file-exists? "/var/log")) (mkdir "/var/log"))
                       (close-port (open-file "/var/log/wtmp" "a0"))
 
                       ;; Set up /run/current-system.  Among other things this
-- 
2.11.1

Message #10 received at 25850-done <at> debbugs.gnu.org (full text, mbox):

From: ludo <at> gnu.org (Ludovic Courtès)
To: Christopher Baines <mail <at> cbaines.net>
Cc: 25850-done <at> debbugs.gnu.org
Subject: Re: bug#25850: [PATCH] services: Create /var/log upon activation
Date: Fri, 10 Mar 2017 14:39:39 +0100

Christopher Baines <mail <at> cbaines.net> skribis:

> When launching a container created with guix system container, the
> attempt to create /var/log/wtmp would fail, as /var/log did not exist.
>
> * gnu/services.scm (activation-script): Create /var/log
> ---
>  gnu/services.scm | 1 +
>  1 file changed, 1 insertion(+)
>
> diff --git a/gnu/services.scm b/gnu/services.scm
> index 6ac4f1322..15a0f2f89 100644
> --- a/gnu/services.scm
> +++ b/gnu/services.scm
> @@ -345,6 +345,7 @@ ACTIVATION-SCRIPT-TYPE."
>  
>                        ;; Same for 'wtmp', which is populated by mingetty et
>                        ;; al.
> +                      (if (not (file-exists? "/var/log")) (mkdir "/var/log"))

I changed that to ‘mkdir-p’ and applied, thanks!

Ludo’.

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.