abbith/guix/yaddith.scm

71 lines
2.1 KiB
Scheme

(use-modules (gnu)
(guix)
(guix packages)
(guix git))
(use-service-modules admin base cuirass networking shepherd web ssh)
(use-packages-modules admin ci linux ssh tls package-management web wget)
(define %cuirass-specs
#~list `((#:name . "guix")
(#:url . "git://git.savannah.gnu.org/guix.git")
(#:branch . "master")
(#:no-compile? #t)
(#:load-path . ".")
(#:proc . drv-list)
(#:file . #$(local-file "/home/steve/conf/guix/cuirass/guix-drv.scm"))))
(operating-system
(host-name "yaddith")
(timezone "America/New_York")
(locale "en_US.utf8")
(bootloader (bootloader-configuration
(bootloader grub-efi-bootloader)
(target "/boot")))
(file-systems (cons*
(file-system
(device (file-system-label "guixsd"))
(mount-point "/")
(type "ext4"))
(file-system
(device (uuid "074D-884c" 'fat))
(mount-point "/boot")
(type "vfat"))
%base-file-systems))
(users (cons (user-account
(name "steve")
(comments "Steve")
(group "users")
(supplementary-groups '("wheel" "netdev" "audio" "video"))
(home-directory "/home/steve"))))
(packages (cons*
nss-certs
%base-packages))
(services
(cons*
(service dhcp-client-service-type)
(services ntp-service-type)
(service openssh-service-type
(openssh-configuration
(password-authentication? #f)
(authorized-keys
`(("steve" ,(local-file "/home/steve/.ssh/id_rsa.pub"))))))
(services cuirass-service-type
(cuirass-configuration
(interval 30)
(use-substitutes? #f)
(port 8082)
(load-path '("/home/steve/Source/bbbsd"))
(specifications &cuirass-specs)))
(service guix-publish-service-type
(guix-publish-configuration
(host "0.0.0.0")))
%base-services))
(name-service-switch %mdns-host-lookup-nss))