diff options
author | Mark H Weaver <mhw@netris.org> | 2018-05-21 13:22:32 -0400 |
---|---|---|
committer | Mark H Weaver <mhw@netris.org> | 2018-05-21 13:22:32 -0400 |
commit | 0661758e133c0384d20043d3526b5ebc794e1f04 (patch) | |
tree | 46fb6d731fd0e562379ecfffba499deb17847a23 /gnu/bootloader/u-boot.scm | |
parent | 539bf8f2c071b53834829259bb3fabf0390c5dc6 (diff) | |
parent | c036959b1a61c37c9b7d72e655e1441f2feefb6e (diff) | |
download | guix-0661758e133c0384d20043d3526b5ebc794e1f04.tar guix-0661758e133c0384d20043d3526b5ebc794e1f04.tar.gz |
Merge branch 'master' into core-updates
Diffstat (limited to 'gnu/bootloader/u-boot.scm')
-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))) |