installer « gnu - guix - Wojtek's customized Guix

about summary refs log tree commit diff

path: root/gnu/installer

Mode	Name	Size
d---------	aux-files	36	log plain
-rw-r--r--	connman.scm	14539	log plain about
-rw-r--r--	final.scm	8632	log plain about
-rw-r--r--	hostname.scm	957	log plain about
-rw-r--r--	keymap.scm	6697	log plain about
-rw-r--r--	locale.scm	7359	log plain about
-rw-r--r--	newt.scm	3858	log plain about
d---------	newt	573	log plain
-rw-r--r--	parted.scm	54625	log plain about
-rw-r--r--	record.scm	2884	log plain about
-rw-r--r--	services.scm	6090	log plain about
-rw-r--r--	steps.scm	10685	log plain about
-rw-r--r--	tests.scm	12743	log plain about
-rw-r--r--	timezone.scm	4450	log plain about
-rw-r--r--	user.scm	2135	log plain about
-rw-r--r--	utils.scm	7147	log plain about

(zero? (channel-get-exit-status channel)))))) ;; Connect to the guest over SSH. Make sure we can run commands ;; from the user profile. (test-equal "run executable from user profile" #t (call-with-connected-session/auth (lambda (session) (let ((channel (make-channel session))) (channel-open-session channel) (channel-request-exec channel "path-witness") (zero? (channel-get-exit-status channel)))))) (test-end))))) (gexp->derivation name test)) (define %test-openssh (system-test (name "openssh") (description "Connect to a running OpenSSH daemon.") (value (run-ssh-test name ;; Allow root logins with an empty password to ;; simplify testing. (service openssh-service-type (openssh-configuration (permit-root-login #t) (allow-empty-passwords? #t))) #f ;inetd-style, no PID file #:sftp? #t)))) (define %test-dropbear (system-test (name "dropbear") (description "Connect to a running Dropbear SSH daemon.") (value (run-ssh-test name (service dropbear-service-type (dropbear-configuration (root-login? #t) (allow-empty-passwords? #t))) "/var/run/dropbear.pid" ;; XXX: Our Dropbear is not built with PAM support. ;; Even when it is, it seems to ignore the PAM ;; 'session' requirements. #:test-getlogin? #f))))