~ruther/guix-local: gnu: ovmf: Add OVMF_CODE and OVMF_VARS files.

1c9908fad5a9a9a3127c98148697bc5888af1cfc — spacecadet@purge.sh 2 years ago 57aaaf2

gnu: ovmf: Add OVMF_CODE and OVMF_VARS files.

* gnu/packages/firmware.scm (ovmf)[arguments]: Add OVMF_CODE.fd and
OVMF_VARS.fs to outputs as ovmf_code_arch.bin and ovmf_vars_arch.bin,
respectively, for both ia32 and x64 architectures.

Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
Change-Id: Ie329f3f3515e7d015d9fbad01b8c2b82dc7da76e

patch browse .tar.gz

1 files changed, 13 insertions(+), 8 deletions(-)

M gnu/packages/firmware.scm

M gnu/packages/firmware.scm => gnu/packages/firmware.scm +13 -8

@@ 954,14 954,19 @@ Executables included are:
               (lambda _
                 (let ((fmw (string-append #$output "/share/firmware")))
                   (mkdir-p fmw)
-                  (copy-file (string-append "Build/OvmfIa32/RELEASE_"
-                                            #$toolchain-ver "/FV/OVMF.fd")
-                             (string-append fmw "/ovmf_ia32.bin"))
-                  #$@(if (string=? "x86_64-linux" (%current-system))
-                       #~((copy-file (string-append "Build/OvmfX64/RELEASE_"
-                                                    #$toolchain-ver "/FV/OVMF.fd")
-                                     (string-append fmw "/ovmf_x64.bin")))
-                       #~())))))))
+                  (for-each
+                    (lambda (file)
+                      (copy-file (string-append "Build/OvmfIa32/RELEASE_"
+                                                #$toolchain-ver "/FV/" file ".fd")
+                                 (string-append fmw "/" (string-downcase file) "_ia32.bin"))
+                      #$@(if (string=? "x86_64-linux" (%current-system))
+                           #~((copy-file (string-append "Build/OvmfX64/RELEASE_"
+                                                        #$toolchain-ver "/FV/" file ".fd")
+                                         (string-append fmw "/" (string-downcase file) "_x64.bin")))
+                           #~()))
+                    (list "OVMF"
+                          "OVMF_CODE"
+                          "OVMF_VARS"))))))))
       (native-inputs
        `(("acpica" ,acpica)
          ("gcc@5" ,gcc-5)