Browse Source

system: hurd: Populate services.

* gnu/system/hurd.scm (%base-services/hurd): Add hurd-console-service,
hurd-getty-services, guix-service.  Also add sylog and loopback, needed for
...
* gnu/system.scm (hurd-default-essential-services): ... add
%shepherd-root-service with dependencies: %boot-service, %activation-service,
user-processes, root-file-system-service, file-system-service,
pam-root-service.
gn-latest-20200725
Jan (janneke) Nieuwenhuizen 1 year ago
committed by Jan Nieuwenhuizen
parent
commit
11e4200fee
No known key found for this signature in database GPG Key ID: F3C1A0D9C1D65273
  1. 11
      gnu/system.scm
  2. 18
      gnu/system/hurd.scm

11
gnu/system.scm

@ -603,6 +603,17 @@ bookkeeping."
(list (service system-service-type '())
%boot-service
%activation-service
%shepherd-root-service
(service user-processes-service-type)
(account-service (append (operating-system-accounts os)
(operating-system-groups os))
(operating-system-skeletons os))
(root-file-system-service)
(service file-system-service-type '())
(service fstab-service-type
(filter file-system-needed-for-boot?
(operating-system-file-systems os)))
(pam-root-service (operating-system-pam-services os))
(operating-system-etc-service os)
(service profile-service-type (operating-system-packages os))))

18
gnu/system/hurd.scm

@ -66,7 +66,23 @@
net-base inetutils less shepherd which))
(define %base-services/hurd
'())
(list (service hurd-console-service-type
(hurd-console-configuration (hurd hurd)))
(service hurd-getty-service-type (hurd-getty-configuration
(tty "tty1")))
(service hurd-getty-service-type (hurd-getty-configuration
(tty "tty2")))
(service static-networking-service-type
(list (static-networking (interface "lo")
(ip "127.0.0.1")
(requirement '())
(provision '(loopback))
(name-servers '("10.0.2.3")))))
(syslog-service)
(service guix-service-type
(guix-configuration
(extra-options '("--disable-chroot"
"--disable-deduplication"))))))
(define %hurd-default-operating-system
(operating-system

Loading…
Cancel
Save