unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
From: Vagrant Cascadian <vagrant@debian.org>
To: Herman Rimm <herman@rimm.ee>, 67261@debbugs.gnu.org
Cc: Efraim Flashner <efraim@flashner.co.il>
Subject: [bug#67261] [PATCH 2/3] gnu: bootloader: Add orangepi-r1-plus-lts-rk3328 bootloader.
Date: Fri, 01 Dec 2023 11:50:23 -0800	[thread overview]
Message-ID: <8734wlln28.fsf@wireframe> (raw)
In-Reply-To: <2e6ef3942e41a389e78e438941e2b52495dc530f.1700321434.git.herman@rimm.ee>

[-- Attachment #1: Type: text/plain, Size: 3929 bytes --]

On 2023-11-18, Herman Rimm wrote:
> * gnu/bootloader/u-boot.scm (install-orangepi-r1-plus-lts-rk3328-u-boot,
>   u-boot-orangepi-r1-plus-lts-rk3328-bootloader): New variables.
> * gnu/packages/bootloaders.scm (u-boot-orangepi-r1-plus-lts-rk3328): New
>   variable.

Looks fine to me. Does this target depend on u-boot version 2023.10?


live well,
  vagrant
  
>  gnu/bootloader/u-boot.scm    | 17 +++++++++++++++++
>  gnu/packages/bootloaders.scm | 15 +++++++++++++++
>  2 files changed, 32 insertions(+)
>
> diff --git a/gnu/bootloader/u-boot.scm b/gnu/bootloader/u-boot.scm
> index 712db15b02..d20aabd538 100644
> --- a/gnu/bootloader/u-boot.scm
> +++ b/gnu/bootloader/u-boot.scm
> @@ -5,6 +5,7 @@
>  ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
>  ;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
>  ;;; Copyright © 2023 Efraim Flashner <efraim@flashner.co.il>
> +;;; Copyright © 2023 Herman Rimm <herman_rimm@protonmail.com>
>  ;;;
>  ;;; This file is part of GNU Guix.
>  ;;;
> @@ -37,6 +38,7 @@ (define-module (gnu bootloader u-boot)
>              u-boot-mx6cuboxi-bootloader
>              u-boot-nintendo-nes-classic-edition-bootloader
>              u-boot-novena-bootloader
> +            u-boot-orangepi-r1-plus-lts-rk3328-bootloader
>              u-boot-pine64-plus-bootloader
>              u-boot-pine64-lts-bootloader
>              u-boot-pinebook-bootloader
> @@ -93,6 +95,15 @@ (define install-imx-u-boot
>          (write-file-on-device u-boot (stat:size (stat u-boot))
>                                image (* 69 1024)))))
>  
> +(define install-orangepi-r1-plus-lts-rk3328-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 install-puma-rk3399-u-boot
>    #~(lambda (bootloader root-index image)
>        (let ((spl (string-append bootloader "/libexec/idbloader.img"))
> @@ -233,6 +244,12 @@ (define u-boot-novena-bootloader
>     (inherit u-boot-imx-bootloader)
>     (package u-boot-novena)))
>  
> +(define u-boot-orangepi-r1-plus-lts-rk3328-bootloader
> +  (bootloader
> +   (inherit u-boot-bootloader)
> +   (package u-boot-orangepi-r1-plus-lts-rk3328)
> +   (disk-image-installer install-orangepi-r1-plus-lts-rk3328-u-boot)))
> +
>  (define u-boot-pine64-plus-bootloader
>    (bootloader
>     (inherit u-boot-allwinner64-bootloader)
> diff --git a/gnu/packages/bootloaders.scm b/gnu/packages/bootloaders.scm
> index 5da696388a..e88abe2dec 100644
> --- a/gnu/packages/bootloaders.scm
> +++ b/gnu/packages/bootloaders.scm
> @@ -1128,6 +1128,21 @@ (define-public u-boot-novena
>  version, contrary to Novena upstream, does not load u-boot.img from the first
>  partition."))
>  
> +(define-public u-boot-orangepi-r1-plus-lts-rk3328
> +  (let ((base (make-u-boot-package "orangepi-r1-plus-lts-rk3328" "aarch64-linux-gnu")))
> +    (package
> +      (inherit base)
> +      (arguments
> +       (substitute-keyword-arguments (package-arguments base)
> +         ((#:phases phases)
> +          #~(modify-phases #$phases
> +              (add-after 'unpack 'set-environment
> +                (lambda* (#:key native-inputs inputs #:allow-other-keys)
> +                  (setenv "BL31" (search-input-file inputs "bl31.elf"))))))))
> +      (inputs
> +       (modify-inputs (package-inputs base)
> +         (append arm-trusted-firmware-rk3328))))))
> +
>  (define-public u-boot-cubieboard
>    (make-u-boot-package "Cubieboard" "arm-linux-gnueabihf"))
>  
> -- 
> 2.41.0

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 227 bytes --]

  reply	other threads:[~2023-12-01 19:51 UTC|newest]

Thread overview: 11+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2023-11-18 15:38 [bug#67261] [PATCH 0/3] Update u-boot to 2023.10 Herman Rimm via Guix-patches via
2023-11-18 16:01 ` [bug#67261] [PATCH 1/3] gnu: u-boot: Update " Herman Rimm via Guix-patches via
2023-11-24 21:23   ` Vagrant Cascadian
2023-11-18 16:01 ` [bug#67261] [PATCH 2/3] gnu: bootloader: Add orangepi-r1-plus-lts-rk3328 bootloader Herman Rimm via Guix-patches via
2023-12-01 19:50   ` Vagrant Cascadian [this message]
2023-11-18 16:01 ` [bug#67261] [PATCH 3/3] images: Add orangepi-r1-plus-lts image Herman Rimm via Guix-patches via
     [not found]   ` <87zfytk83i.fsf@wireframe>
2023-12-03 10:22     ` Efraim Flashner
2023-11-27  8:33 ` [bug#67261] [PATCH v2] gnu: u-boot: Update to 2023.10 Herman Rimm via Guix-patches via
2023-12-01 19:48   ` Vagrant Cascadian
2023-12-02  7:11     ` Lars-Dominik Braun
2023-12-23  0:19 ` bug#67261: [PATCH 0/3] Update u-boot " Vagrant Cascadian

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://guix.gnu.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=8734wlln28.fsf@wireframe \
    --to=vagrant@debian.org \
    --cc=67261@debbugs.gnu.org \
    --cc=efraim@flashner.co.il \
    --cc=herman@rimm.ee \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).