guix-patches
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[bug#70913] [PATCH 05/11] gnu: ovmf-aarch64: Update to 202402.


From: Efraim Flashner
Subject: [bug#70913] [PATCH 05/11] gnu: ovmf-aarch64: Update to 202402.
Date: Mon, 13 May 2024 11:21:54 +0300

* gnu/packages/firmware.scm (ovmf-aarch64): Update to 202402.  Build
using make-ovmf-firmware.

Change-Id: I270bd8fa79f2df3d73bdf8d5685d27a3cc0cef6a
---
 gnu/packages/firmware.scm | 51 ++++++++++++---------------------------
 1 file changed, 16 insertions(+), 35 deletions(-)

diff --git a/gnu/packages/firmware.scm b/gnu/packages/firmware.scm
index ab39f8d0d2..ae11c82d1a 100644
--- a/gnu/packages/firmware.scm
+++ b/gnu/packages/firmware.scm
@@ -1024,6 +1024,22 @@ (define-public ovmf-i686
                              "OVMF_CODE"
                              "OVMF_VARS"))))))))))))
 
+(define-public ovmf-aarch64
+  (let ((base (make-ovmf-firmware "aarch64")))
+    (package
+      (inherit base)
+      (arguments
+        (substitute-keyword-arguments (package-arguments base)
+          ((#:phases phases)
+           #~(modify-phases #$phases
+               (replace 'install
+                 (lambda _
+                   (let ((fmw (string-append #$output "/share/firmware")))
+                    (mkdir-p fmw)
+                    (copy-file (string-append "Build/ArmVirtQemu-AARCH64/"
+                                              "RELEASE_GCC/FV/QEMU_EFI.fd")
+                               (string-append fmw 
"/ovmf_aarch64.bin"))))))))))))
+
 (define-public ovmf
   (let ((toolchain-ver "GCC5"))
     (package
@@ -1124,41 +1140,6 @@ (define-public ovmf
       (license (list license:expat
                      license:bsd-2 license:bsd-3 license:bsd-4)))))
 
-(define-public ovmf-aarch64
-  (let ((toolchain-ver "GCC5"))
-    (package
-      (inherit ovmf)
-      (name "ovmf-aarch64")
-      (native-inputs
-       (append (package-native-inputs ovmf)
-               (if (not (string-prefix? "aarch64" (%current-system)))
-                   `(("cross-gcc" ,(cross-gcc "aarch64-linux-gnu"))
-                     ("cross-binutils" ,(cross-binutils "aarch64-linux-gnu")))
-                   '())))
-      (arguments
-       (substitute-keyword-arguments (package-arguments ovmf)
-         ((#:phases phases)
-          #~(modify-phases #$phases
-              #$@(if (string-prefix? "aarch64" (%current-system))
-                     '()
-                     #~((add-before 'configure 'set-env
-                          (lambda _
-                            (setenv (string-append #$toolchain-ver 
"_AARCH64_PREFIX")
-                                    "aarch64-linux-gnu-")))))
-              (replace 'build
-                (lambda _
-                  (invoke "build" "-a" "AARCH64" "-t" #$toolchain-ver
-                          "-p" "ArmVirtPkg/ArmVirtQemu.dsc")))
-              (delete 'build-x64)
-              (replace 'install
-                (lambda _
-                  (let ((fmw (string-append #$output "/share/firmware")))
-                    (mkdir-p fmw)
-                    (copy-file (string-append 
"Build/ArmVirtQemu-AARCH64/RELEASE_"
-                                              #$toolchain-ver 
"/FV/QEMU_EFI.fd")
-                               (string-append fmw "/ovmf_aarch64.bin")))))))))
-      (supported-systems %supported-systems))))
-
 (define-public ovmf-arm
   (let ((toolchain-ver "GCC5"))
     (package
-- 
Efraim Flashner   <efraim@flashner.co.il>   רנשלפ םירפא
GPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted






reply via email to

[Prev in Thread] Current Thread [Next in Thread]