infra/nonguix
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

nongnu: Add u-boot-rk3399-pinephone-pro.

Browse Source 
* nongnu/packages/bootloaders.scm (u-boot-rk3399-pinephone-pro): New variable.
This commit is contained in:
Petr Hodina 2022-12-29 08:34:29 +01:00
parent 02e8212530
commit 054671ef41
1 changed files with 20 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
nongnu/packages/bootloaders.scm
View File

@ -34,6 +34,7 @@
#:use-module ((nonguix licenses)
#:prefix license:)
#:export (u-boot-quartz64a-rk3566-bootloader
u-boot-pinephone-pro-rk3399-bootloader
u-boot-pinenote-rk3566-bootloader))
(define %u-boot-quartz64-nvme-configs
@ -45,6 +46,9 @@
"CONFIG_PHY=y"
"CONFIG_PHY_ROCKCHIP_PCIE=y"))
(define-public u-boot-pinephone-pro-rk3399
(make-u-boot-package "pinephone-pro-rk3399" "aarch64-linux-gnu"))
(define (u-boot-rk3566 board configs)
(let ((commit "ca383958b387a768c1a64f8a952eeb5e534d0766")
(revision "1")
@ -206,6 +210,15 @@
(write-file-on-device u-boot (stat:size (stat u-boot))
image (* 16384 512)))))
(define install-pinephone-pro-rk3399-u-boot
#~(lambda (bootloader root-index image)
(let ((idb (string-append bootloader "/libexec/idbloader.img"))
(u-boot (string-append bootloader "/libexec/u-boot.itb")))
(write-file-on-device idb (stat:size (stat idb))
image (* 64 512))
(write-file-on-device u-boot (stat:size (stat u-boot))
image (* 16384 512)))))
(define u-boot-bootloader
(bootloader
(inherit extlinux-bootloader)
@ -214,6 +227,13 @@
(installer #f)
(disk-image-installer install-u-boot)))
(define u-boot-pinephone-pro-rk3399-bootloader
;; SD and eMMC use the same format
(bootloader
(inherit u-boot-bootloader)
(package u-boot-pinephone-pro-rk3399)
(disk-image-installer install-pinephone-pro-rk3399-u-boot)))
(define u-boot-quartz64a-rk3566-bootloader
;; SD and eMMC use the same format
(bootloader