;; Based on Guix's beaglebone-black.scm (use-modules (gnu) (gnu bootloader u-boot)) (use-service-modules networking ssh) (use-package-modules bootloaders screen ssh) (operating-system (host-name "lime2") (timezone "Europe/Paris") (locale "en_US.utf8") ;; We use a microSD (bootloader (bootloader-configuration (bootloader u-boot-a20-olinuxino-lime2-bootloader) (target "/dev/mmcblk0"))) (kernel-arguments '("console=ttyS0,115200" "ignore_loglevel")) ;; This module is required to mount the SD card. (initrd-modules (cons "sunxi-mmc" %base-initrd-modules)) (file-systems (cons (file-system (device (file-system-label "my-root")) (mount-point "/") (type "ext4")) %base-file-systems)) (users (cons (user-account (name "gnutoo") (group "users") (supplementary-groups '("wheel" "audio" "video"))) %base-user-accounts)) (packages (append (list screen openssh) %base-packages)) (services (append (list (static-networking-service "eth0" "192.168.10.5" #:gateway "192.168.10.1" #:netmask "255.255.255.0" #:name-servers '("192.168.10.1")) (service openssh-service-type (openssh-configuration (port-number 222) (permit-root-login #t) (password-authentication? #f) (challenge-response-authentication? #f) (authorized-keys `(("root", (local-file "id_ed25519.pub")) ("gnutoo", (local-file "id_ed25519.pub")))))) (agetty-service (agetty-configuration (extra-options '("-L")) (baud-rate "115200") (term "vt100") (tty "ttyS0")))) %base-services)))