mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 05:48:07 -05:00
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.
This commit is contained in:
parent
7ccd471c71
commit
11e4200fee
2 changed files with 28 additions and 1 deletions
|
@ -603,6 +603,17 @@ (define (hurd-default-essential-services os)
|
|||
(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))))
|
||||
|
||||
|
|
|
@ -66,7 +66,23 @@ (define %base-packages/hurd
|
|||
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…
Reference in a new issue