[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
25/28: system: hurd: Populate services.
From: |
guix-commits |
Subject: |
25/28: system: hurd: Populate services. |
Date: |
Sat, 30 May 2020 11:20:19 -0400 (EDT) |
janneke pushed a commit to branch wip-hurd-vm
in repository guix.
commit f287c8992af72c487078962511a8c9d54907ebe1
Author: Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Wed May 6 10:07:08 2020 +0200
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.
---
gnu/system.scm | 14 +++++++++++++-
gnu/system/hurd.scm | 17 ++++++++++++++++-
2 files changed, 29 insertions(+), 2 deletions(-)
diff --git a/gnu/system.scm b/gnu/system.scm
index c4ae5af..41c551a 100644
--- a/gnu/system.scm
+++ b/gnu/system.scm
@@ -611,8 +611,20 @@ 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))
(hurd-etc-service os)
- (service profile-service-type '())))
+ (service profile-service-type
+ (operating-system-packages os))))
(define* (operating-system-services os)
"Return all the services of OS, including \"essential\" services."
diff --git a/gnu/system/hurd.scm b/gnu/system/hurd.scm
index 472eca8..2a99e64 100644
--- a/gnu/system/hurd.scm
+++ b/gnu/system/hurd.scm
@@ -57,7 +57,22 @@
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" "--no-offload"))))))
(define %hurd-default-operating-system
(operating-system
- 16/28: bootloader: grub: Add support for multiboot., (continued)
- 16/28: bootloader: grub: Add support for multiboot., guix-commits, 2020/05/30
- 23/28: services: Add `hurd-console-service-type'., guix-commits, 2020/05/30
- 26/28: system: hurd: Remove 'cross-hurd-image' hack., guix-commits, 2020/05/30
- 21/28: services: hurd: Use activation-service, hurd-etc-service., guix-commits, 2020/05/30
- 27/28: system: bare-hurd.tmpl: Add openssh client and service., guix-commits, 2020/05/30
- 24/28: services: Add `hurd-getty-service-type'., guix-commits, 2020/05/30
- 28/28: syscalls: set-thread-name, thread-name: Stub for the Hurd., guix-commits, 2020/05/30
- 19/28: services: hurd: Add `hurd-etc-service'., guix-commits, 2020/05/30
- 20/28: system: Add `hurd-activation'., guix-commits, 2020/05/30
- 22/28: gnu: hurd: Create minimal "runsystem" script to invoke "rc"., guix-commits, 2020/05/30
- 25/28: system: hurd: Populate services.,
guix-commits <=