services: SSH services: Provide 'ssh' and 'sshd' Shepherd services.

* gnu/services/ssh.scm (lsh-shepherd-service, dropbear-shepherd-service,
openssh-sheperd-service): Add 'ssh' and 'sshd' to provision.
This commit is contained in:
Leo Famulari 2019-12-02 19:31:15 -05:00
parent 34369f3103
commit 1a7633c239
No known key found for this signature in database
GPG key ID: 2646FA30BACA7F08

View file

@ -173,7 +173,7 @@ (define requires
(list (shepherd-service (list (shepherd-service
(documentation "GNU lsh SSH server") (documentation "GNU lsh SSH server")
(provision '(ssh-daemon)) (provision '(ssh-daemon ssh sshd))
(requirement requires) (requirement requires)
(start #~(make-forkexec-constructor (list #$@lsh-command))) (start #~(make-forkexec-constructor (list #$@lsh-command)))
(stop #~(make-kill-destructor))))) (stop #~(make-kill-destructor)))))
@ -497,7 +497,7 @@ (define openssh-command
(list (shepherd-service (list (shepherd-service
(documentation "OpenSSH server.") (documentation "OpenSSH server.")
(requirement '(syslogd loopback)) (requirement '(syslogd loopback))
(provision '(ssh-daemon)) (provision '(ssh-daemon ssh sshd))
(start #~(make-forkexec-constructor #$openssh-command (start #~(make-forkexec-constructor #$openssh-command
#:pid-file #$pid-file)) #:pid-file #$pid-file))
(stop #~(make-kill-destructor)) (stop #~(make-kill-destructor))
@ -606,7 +606,7 @@ (define requires
(list (shepherd-service (list (shepherd-service
(documentation "Dropbear SSH server.") (documentation "Dropbear SSH server.")
(requirement requires) (requirement requires)
(provision '(ssh-daemon)) (provision '(ssh-daemon ssh sshd))
(start #~(make-forkexec-constructor #$dropbear-command (start #~(make-forkexec-constructor #$dropbear-command
#:pid-file #$pid-file)) #:pid-file #$pid-file))
(stop #~(make-kill-destructor))))) (stop #~(make-kill-destructor)))))