config.scm bananapi

(use-modules (gnu) (gnu bootloader extlinux)
         (gnu packages bootloaders)
         (gnu packages bash)
         (gnu packages linux)
         (gnu packages gnupg)
         (gnu packages compression)
         )

(define u-boot-bananapi-m1
 (make-u-boot-package "Bananapi-M1" "arm-linux-gnueabihf"))

(define u-boot-allwinner-bootloader
 (@@ (gnu bootloader u-boot) u-boot-allwinner-bootloader))

(define u-boot-bananapi-m1-bootloader
 (bootloader
  (inherit u-boot-allwinner-bootloader)
  (package u-boot-bananapi-m1)))

(use-service-modules networking ssh)

(use-package-modules certs wget screen ssh)

(operating-system
 (host-name "GuixARM")
 (timezone "Europe/Moscow")
 (locale "en_US.utf8")

 (file-systems
  (cons* (file-system
      (device "/dev/mmcblk0p1")
          (mount-point "/")
          (type "ext4"))
         %base-file-systems))

 (bootloader (bootloader-configuration
              (bootloader u-boot-bananapi-m1-bootloader)
              (target "/dev/mmcblk0")))

 (initrd-modules (cons* "sd_mod"
            "ahci_sunxi"
            "sunxi-mmc"
         %base-initrd-modules))

 (users (cons (user-account
           (name "user")
           (comment "Hacker")
           (group "users")
           (supplementary-groups '("wheel" "netdev" "users" "audio" "video"))
           (home-directory "/home/user"))
              %base-user-accounts))

 (packages (cons* nss-certs         ;for HTTPS access
          bash
          openssh
          lm-sensors
          gnupg
          wget
          unzip
       %base-packages))

 (name-service-switch %mdns-host-lookup-nss))