diff options
Diffstat (limited to 'gnu/packages')
| -rw-r--r-- | gnu/packages/firmware.scm | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/gnu/packages/firmware.scm b/gnu/packages/firmware.scm index 24e1fc83627..74f68927354 100644 --- a/gnu/packages/firmware.scm +++ b/gnu/packages/firmware.scm @@ -1253,11 +1253,15 @@ Virtual Machines. OVMF contains a sample UEFI firmware for QEMU and KVM.") #~(modify-phases #$phases (replace 'install (lambda _ - (let ((fmw (string-append #$output "/share/firmware"))) + (let ((fmw (string-append #$output "/share/firmware")) + (build-dir "Build/ArmVirtQemu-AARCH64/RELEASE_GCC/FV")) (mkdir-p fmw) - (copy-file (string-append "Build/ArmVirtQemu-AARCH64/" - "RELEASE_GCC/FV/QEMU_EFI.fd") - (string-append fmw "/ovmf_aarch64.bin")))))))))))) + ;; QEMU's virt machine requires 64 MiB pflash devices on + ;; AArch64. Pad the firmware files to match. + (copy-file (string-append build-dir "/QEMU_EFI.fd") + (string-append fmw "/ovmf_aarch64.bin")) + (truncate-file (string-append fmw "/ovmf_aarch64.bin") + (* 64 1024 1024)))))))))))) (define-public ovmf-arm (let ((base (make-ovmf-firmware "armhf"))) |