system: Add A20 OLinuXino LIME2 installer.
* gnu/bootloader/u-boot.scm (u-boot-a20-olinuxino-lime2-bootloader): New exported variable. * gnu/packages/bootloaders.scm (u-boot-a20-olinuxino-lime2): New exported variable. * gnu/system/install.scm (a20-olinuxino-lime2-emmc-installation-os): New exported variable.
This commit is contained in:
parent
e81c906647
commit
4b9e9abb36
|
@ -28,6 +28,7 @@
|
||||||
#:use-module (guix records)
|
#:use-module (guix records)
|
||||||
#:use-module (guix utils)
|
#:use-module (guix utils)
|
||||||
#:export (u-boot-bootloader
|
#:export (u-boot-bootloader
|
||||||
|
u-boot-a20-olinuxino-lime2-bootloader
|
||||||
u-boot-banana-pi-m2-ultra-bootloader
|
u-boot-banana-pi-m2-ultra-bootloader
|
||||||
u-boot-beaglebone-black-bootloader))
|
u-boot-beaglebone-black-bootloader))
|
||||||
|
|
||||||
|
@ -82,6 +83,11 @@
|
||||||
(inherit u-boot-bootloader)
|
(inherit u-boot-bootloader)
|
||||||
(installer install-allwinner-u-boot)))
|
(installer install-allwinner-u-boot)))
|
||||||
|
|
||||||
|
(define u-boot-a20-olinuxino-lime2-bootloader
|
||||||
|
(bootloader
|
||||||
|
(inherit u-boot-allwinner-bootloader)
|
||||||
|
(package u-boot-a20-olinuxino-lime2)))
|
||||||
|
|
||||||
(define u-boot-banana-pi-m2-ultra-bootloader
|
(define u-boot-banana-pi-m2-ultra-bootloader
|
||||||
(bootloader
|
(bootloader
|
||||||
(inherit u-boot-allwinner-bootloader)
|
(inherit u-boot-allwinner-bootloader)
|
||||||
|
|
|
@ -428,6 +428,9 @@ also initializes the boards (RAM etc).")
|
||||||
(define-public u-boot-banana-pi-m2-ultra
|
(define-public u-boot-banana-pi-m2-ultra
|
||||||
(make-u-boot-package "Bananapi_M2_Ultra" "arm-linux-gnueabihf"))
|
(make-u-boot-package "Bananapi_M2_Ultra" "arm-linux-gnueabihf"))
|
||||||
|
|
||||||
|
(define-public u-boot-a20-olinuxino-lime2
|
||||||
|
(make-u-boot-package "A20-OLinuXino-Lime2" "arm-linux-gnueabihf"))
|
||||||
|
|
||||||
(define-public vboot-utils
|
(define-public vboot-utils
|
||||||
(package
|
(package
|
||||||
(name "vboot-utils")
|
(name "vboot-utils")
|
||||||
|
|
|
@ -44,6 +44,7 @@
|
||||||
#:use-module (ice-9 match)
|
#:use-module (ice-9 match)
|
||||||
#:use-module (srfi srfi-26)
|
#:use-module (srfi srfi-26)
|
||||||
#:export (installation-os
|
#:export (installation-os
|
||||||
|
a20-olinuxino-lime2-emmc-installation-os
|
||||||
banana-pi-m2-ultra-installation-os
|
banana-pi-m2-ultra-installation-os
|
||||||
beaglebone-black-installation-os))
|
beaglebone-black-installation-os))
|
||||||
|
|
||||||
|
@ -400,6 +401,22 @@ You have been warned. Thanks for being so brave.\x1b[0m
|
||||||
(tty "ttyO0"))))
|
(tty "ttyO0"))))
|
||||||
(operating-system-user-services installation-os)))))
|
(operating-system-user-services installation-os)))))
|
||||||
|
|
||||||
|
(define a20-olinuxino-lime2-emmc-installation-os
|
||||||
|
(operating-system
|
||||||
|
(inherit installation-os)
|
||||||
|
(bootloader (bootloader-configuration
|
||||||
|
(bootloader u-boot-a20-olinuxino-lime2-bootloader)
|
||||||
|
(target "/dev/mmcblk1"))) ; eMMC storage
|
||||||
|
(kernel linux-libre)
|
||||||
|
(services (append
|
||||||
|
(list (agetty-service
|
||||||
|
(agetty-configuration
|
||||||
|
(extra-options '("-L"))
|
||||||
|
(baud-rate "115200")
|
||||||
|
(term "vt100")
|
||||||
|
(tty "ttyS0"))))
|
||||||
|
(operating-system-user-services installation-os)))))
|
||||||
|
|
||||||
(define banana-pi-m2-ultra-installation-os
|
(define banana-pi-m2-ultra-installation-os
|
||||||
(operating-system
|
(operating-system
|
||||||
(inherit installation-os)
|
(inherit installation-os)
|
||||||
|
|
Loading…
Reference in New Issue