20/62: system: hurd: Add "/etc/shadow".

[guix-commits]

janneke pushed a commit to branch wip-hurd-vm
in repository guix.

commit a87c7326877d82b5bfffa2e9b59d97c5ea6cfcaa
Author: Jan (janneke) Nieuwenhuizen <jann...@gnu.org>
AuthorDate: Sun Apr 5 19:06:28 2020 +0200

    system: hurd: Add "/etc/shadow".
    
    Try:
    
        login root RET RET
    
    * gnu/system/hurd.scm (cross-hurd-image): Generate hard coded /etc/shadow.
    Allows root log-in.
---
 gnu/system/hurd.scm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/gnu/system/hurd.scm b/gnu/system/hurd.scm
index d1c22a7..65f62d3 100644
--- a/gnu/system/hurd.scm
+++ b/gnu/system/hurd.scm
@@ -87,6 +87,12 @@ menuentry \"GNU\" {
 "
 ))
 
+  (define shadow
+    (plain-file "shadow"
+"root::0:0:0:0:::
+"
+))
+
   (define hurd-directives
     `((directory "/servers")
       ,@(map (lambda (server)
@@ -112,6 +118,7 @@ menuentry \"GNU\" {
                                 "/hurd"))
       ("/etc/fstab" -> ,fstab)
       ("/etc/passwd" -> ,passwd)
+      ("/etc/shadow" -> ,shadow)
       ;; XXX can we instead, harmlessly set _PATH_TTYS (from glibc) in 
runttys.c?
       ("/etc/ttys" -> ,(file-append (with-parameters ((%current-target-system
                                                    "i586-pc-gnu"))
@@ -127,7 +134,8 @@ menuentry \"GNU\" {
               #:inputs `(("system" ,hurd-os)
                          ("grub.cfg" ,grub.cfg)
                          ("fstab" ,fstab)
-                         ("passwd" ,passwd))
+                         ("passwd" ,passwd)
+                         ("shadow" ,shadow))
               #:copy-inputs? #t
               #:os hurd-os
               #:bootcfg-drv grub.cfg