diff options
author | Vagrant Cascadian <vagrant@debian.org> | 2018-05-07 14:32:02 +0000 |
---|---|---|
committer | Danny Milosavljevic <dannym@scratchpost.org> | 2018-05-11 12:25:25 +0200 |
commit | 07ca90458f34e425416f37bc7fcd5b178ab6734a (patch) | |
tree | 5c79cd79eed5d2403930950952aa09f2c90c5733 /gnu/bootloader | |
parent | 907356115e705ea7292b9104119ae986284ed626 (diff) | |
download | gnu-guix-07ca90458f34e425416f37bc7fcd5b178ab6734a.tar gnu-guix-07ca90458f34e425416f37bc7fcd5b178ab6734a.tar.gz |
system: Add mx6cuboxi installer.
* gnu/bootloader/u-boot.scm (u-boot-mx6cuboxi-bootloader):
New exported variable.
* gnu/system/install.scm (mx6cuboxi-installation-os):
New exported variable.
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 21d0aecce2..58ee528a21 100644 --- a/gnu/bootloader/u-boot.scm +++ b/gnu/bootloader/u-boot.scm @@ -33,6 +33,7 @@ u-boot-a20-olinuxino-micro-bootloader u-boot-banana-pi-m2-ultra-bootloader u-boot-beaglebone-black-bootloader + u-boot-mx6cuboxi-bootloader u-boot-nintendo-nes-classic-edition-bootloader)) (define install-u-boot @@ -62,6 +63,15 @@ (write-file-on-device u-boot (stat:size (stat u-boot)) device (* 8 1024))))) +(define install-imx-u-boot + #~(lambda (bootloader device mount-point) + (let ((spl (string-append bootloader "/libexec/SPL")) + (u-boot (string-append bootloader "/libexec/u-boot.img"))) + (write-file-on-device spl (stat:size (stat spl)) + device (* 1 1024)) + (write-file-on-device u-boot (stat:size (stat u-boot)) + device (* 69 1024))))) + ;;; @@ -86,6 +96,11 @@ (inherit u-boot-bootloader) (installer install-allwinner-u-boot))) +(define u-boot-imx-bootloader + (bootloader + (inherit u-boot-bootloader) + (installer install-imx-u-boot))) + (define u-boot-nintendo-nes-classic-edition-bootloader (bootloader (inherit u-boot-allwinner-bootloader) @@ -110,3 +125,8 @@ (bootloader (inherit u-boot-allwinner-bootloader) (package u-boot-banana-pi-m2-ultra))) + +(define u-boot-mx6cuboxi-bootloader + (bootloader + (inherit u-boot-imx-bootloader) + (package u-boot-mx6cuboxi))) |