aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gnu/bootloader/u-boot.scm6
-rw-r--r--gnu/packages/bootloaders.scm3
-rw-r--r--gnu/system/install.scm17
3 files changed, 26 insertions, 0 deletions
diff --git a/gnu/bootloader/u-boot.scm b/gnu/bootloader/u-boot.scm
index 1e3178adfc..d45835c271 100644
--- a/gnu/bootloader/u-boot.scm
+++ b/gnu/bootloader/u-boot.scm
@@ -28,6 +28,7 @@
#:use-module (guix records)
#:use-module (guix utils)
#:export (u-boot-bootloader
+ u-boot-a20-olinuxino-lime2-bootloader
u-boot-banana-pi-m2-ultra-bootloader
u-boot-beaglebone-black-bootloader))
@@ -82,6 +83,11 @@
(inherit u-boot-bootloader)
(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
(bootloader
(inherit u-boot-allwinner-bootloader)
diff --git a/gnu/packages/bootloaders.scm b/gnu/packages/bootloaders.scm
index 4d1f784648..b0fa2b54af 100644
--- a/gnu/packages/bootloaders.scm
+++ b/gnu/packages/bootloaders.scm
@@ -428,6 +428,9 @@ also initializes the boards (RAM etc).")
(define-public u-boot-banana-pi-m2-ultra
(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
(package
(name "vboot-utils")
diff --git a/gnu/system/install.scm b/gnu/system/install.scm
index c7bfdb2595..22b297c736 100644
--- a/gnu/system/install.scm
+++ b/gnu/system/install.scm
@@ -44,6 +44,7 @@
#:use-module (ice-9 match)
#:use-module (srfi srfi-26)
#:export (installation-os
+ a20-olinuxino-lime2-emmc-installation-os
banana-pi-m2-ultra-installation-os
beaglebone-black-installation-os))
@@ -400,6 +401,22 @@ You have been warned. Thanks for being so brave.\x1b[0m
(tty "ttyO0"))))
(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
(operating-system
(inherit installation-os)