[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
13/36: system: hurd: Add openssh service.
From: |
guix-commits |
Subject: |
13/36: system: hurd: Add openssh service. |
Date: |
Fri, 1 May 2020 11:53:58 -0400 (EDT) |
janneke pushed a commit to branch wip-hurd-vm
in repository guix.
commit b03afc2410f4fb7c7261a6e20929d1c1b8a7574d
Author: Jan (janneke) Nieuwenhuizen <address@hidden>
AuthorDate: Sun Apr 19 13:15:06 2020 +0200
system: hurd: Add openssh service.
* gnu/system/hurd.scm (%base-packages/hurd): Add openssh.
(%hurd-os): Add openssh-service.
(cross-hurd-image): Generate sshd_config. Add sshd user.
---
gnu/system/hurd.scm | 24 ++++++++++++++++++++----
1 file changed, 20 insertions(+), 4 deletions(-)
diff --git a/gnu/system/hurd.scm b/gnu/system/hurd.scm
index 04fb083..ad66c7c 100644
--- a/gnu/system/hurd.scm
+++ b/gnu/system/hurd.scm
@@ -32,11 +32,14 @@
#:use-module (gnu packages guile-xyz)
#:use-module (gnu packages hurd)
#:use-module (gnu packages less)
+ #:use-module (gnu packages ssh)
#:use-module (gnu services)
#:use-module (gnu services base)
#:use-module (gnu services hurd)
#:use-module (gnu services shepherd)
+ #:use-module (gnu services ssh)
#:use-module (gnu system)
+ #:use-module (gnu system pam)
#:use-module (gnu system shadow)
#:use-module (gnu system vm)
#:export (cross-hurd-image))
@@ -65,14 +68,16 @@
(define %base-packages/hurd
(list hurd bash coreutils file findutils grep sed
guile-3.0 guile-colorized guile-readline
- net-base inetutils less shepherd which))
+ net-base inetutils less openssh shepherd which))
(define %base-services/hurd
(list (service user-processes-service-type)
(service hurd-console-service-type
(hurd-console-configuration (hurd hurd)))
(service hurd-ttys-service-type
- (hurd-ttys-configuration (hurd hurd)))))
+ (hurd-ttys-configuration (hurd hurd)))
+ (service hurd-loopback-service-type)
+ (syslog-service)))
(define %hurd-os
(operating-system
@@ -85,7 +90,15 @@
(timezone "GNUrope")
(name-service-switch #f)
(essential-services (hurd-essential-services this-operating-system))
- (services %base-services/hurd)
+ (services (cons (service openssh-service-type
+ (openssh-configuration
+ (use-pam? #f)
+ (openssh openssh)
+ (port-number 2222)
+ (permit-root-login #t)
+ (allow-empty-passwords? #t)
+ (password-authentication? #t)))
+ %base-services/hurd))
(pam-services '())
(setuid-programs '())))
@@ -127,6 +140,7 @@ fi\n")))
(account-service (append (operating-system-accounts os)
(operating-system-groups os))
(operating-system-skeletons os))
+ (pam-root-service (operating-system-pam-services os))
(hurd-etc-service os)
(service profile-service-type
(operating-system-packages os))))
@@ -190,6 +204,7 @@ menuentry \"GNU\" {
(plain-file "passwd"
"root:x:0:0:root:/root:/bin/sh
guixbuilder:x:1:1:guixbuilder:/var/empty:/bin/no-sh
+sshd:x:2:2:sshd:/var/empty:/bin/no-sh
"))
(define group
@@ -199,7 +214,7 @@ guixbuilder:x:1:1:guixbuilder:/var/empty:/bin/no-sh
(define shadow
(plain-file "shadow"
- "root::0:0:0:0:::
+ "root::17873::::::
"))
;; XXX Ideally...almost...
@@ -290,6 +305,7 @@ guixbuilder:x:1:1:guixbuilder:/var/empty:/bin/no-sh
"i586-pc-gnu"))
hurd)
"/etc/ttys"))
+ (directory "/etc/ssh")
("/etc/shepherd.conf" -> ,shepherd.conf)
("/bin/sh" -> ,(file-append (with-parameters ((%current-target-system
"i586-pc-gnu"))
- branch wip-hurd-vm created (now 3c8947d), guix-commits, 2020/05/01
- 02/36: DRAFT services: Add hurd-console-service-type., guix-commits, 2020/05/01
- 04/36: HACK services: Add user-processes-service as a Hurd service., guix-commits, 2020/05/01
- 03/36: DRAFT services: Add hurd-ttys-service-type., guix-commits, 2020/05/01
- 09/36: Revert "squash! Use static-networking for loopback", guix-commits, 2020/05/01
- 10/36: HACK services: Add openssh-service as a Hurd service., guix-commits, 2020/05/01
- 12/36: system: gnu: Populate "/etc" from "/boot/activation"., guix-commits, 2020/05/01
- 14/36: DRAFT: hurd: use static-networking instead of dummy loopback hack., guix-commits, 2020/05/01
- 01/36: services: Add hurd., guix-commits, 2020/05/01
- 13/36: system: hurd: Add openssh service.,
guix-commits <=
- 15/36: Revert "DRAFT: hurd: use static-networking instead of dummy loopback hack.", guix-commits, 2020/05/01
- 05/36: HACK services: Add guix-daemon-service as a Hurd service., guix-commits, 2020/05/01
- 07/36: HACK services: hurd: Add dummy loopback., guix-commits, 2020/05/01
- 16/36: system: hurd: Create system profile for guix development., guix-commits, 2020/05/01
- 17/36: system: gnu: Add %bootstrap-{gcc, binutils, glibc} for devel profile., guix-commits, 2020/05/01
- 08/36: squash! Use static-networking for loopback, guix-commits, 2020/05/01
- 24/36: services: hurd: Use hurd-file-systems-service., guix-commits, 2020/05/01
- 23/36: system: hurd: Export system variables., guix-commits, 2020/05/01
- 06/36: HACK services: hurd: Add dummy syslog., guix-commits, 2020/05/01
- 11/36: DRAFT system: hurd: Add the Shepherd., guix-commits, 2020/05/01