diff options
author | Vagrant Cascadian <vagrant@debian.org> | 2018-05-17 15:16:09 -0700 |
---|---|---|
committer | Danny Milosavljevic <dannym@scratchpost.org> | 2018-05-18 20:21:30 +0200 |
commit | 9f7d66656646fac3746c52216ad6061c9c0adc27 (patch) | |
tree | b44230319366ca2ab6c6e54540a82951e4bec51c /gnu/bootloader | |
parent | 6ee3f3dec72f87187226bc11ff190f030169e55a (diff) | |
download | guix-9f7d66656646fac3746c52216ad6061c9c0adc27.tar guix-9f7d66656646fac3746c52216ad6061c9c0adc27.tar.gz |
system: Add u-boot-pine64-plus installer.
* gnu/bootloader/u-boot.scm (u-boot-pine64-plus-bootloader):
New exported variable.
* gnu/system/install.scm (pine64-plus-installation-os):
New exported variable.
Signed-off-by: Danny Milosavljevic <dannym@scratchpost.org>
Diffstat (limited to 'gnu/bootloader')
-rw-r--r-- | gnu/bootloader/u-boot.scm | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/gnu/bootloader/u-boot.scm b/gnu/bootloader/u-boot.scm index bc8f98f32f..ea0f67b3cd 100644 --- a/gnu/bootloader/u-boot.scm +++ b/gnu/bootloader/u-boot.scm @@ -36,6 +36,7 @@ u-boot-mx6cuboxi-bootloader u-boot-nintendo-nes-classic-edition-bootloader u-boot-novena-bootloader + u-boot-pine64-plus-bootloader u-boot-wandboard-bootloader)) (define install-u-boot @@ -65,6 +66,15 @@ (write-file-on-device u-boot (stat:size (stat u-boot)) device (* 8 1024))))) +(define install-allwinner64-u-boot + #~(lambda (bootloader device mount-point) + (let ((spl (string-append bootloader "/libexec/spl/sunxi-spl.bin")) + (u-boot (string-append bootloader "/libexec/u-boot.itb"))) + (write-file-on-device spl (stat:size (stat spl)) + device (* 8 1024)) + (write-file-on-device u-boot (stat:size (stat u-boot)) + device (* 40 1024))))) + (define install-imx-u-boot #~(lambda (bootloader device mount-point) (let ((spl (string-append bootloader "/libexec/SPL")) @@ -98,6 +108,11 @@ (inherit u-boot-bootloader) (installer install-allwinner-u-boot))) +(define u-boot-allwinner64-bootloader + (bootloader + (inherit u-boot-bootloader) + (installer install-allwinner64-u-boot))) + (define u-boot-imx-bootloader (bootloader (inherit u-boot-bootloader) @@ -142,3 +157,8 @@ (bootloader (inherit u-boot-imx-bootloader) (package u-boot-novena))) + +(define u-boot-pine64-plus-bootloader + (bootloader + (inherit u-boot-allwinner64-bootloader) + (package u-boot-pine64-plus))) |