me/guix
Archived
1
0
Fork 0
Code Activity

gnu: Add opensbi-qemu.

Browse source 
* gnu/packages/firmware.scm (opensbi-qemu): New variable.
This commit is contained in:
Marius Bakke 2022-12-25 13:41:13 +01:00
parent 699aef4bc6
commit c8e836991d
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 24 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
gnu/packages/firmware.scm
View file

@ -34,6 +34,7 @@
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system meson) #:use-module (guix build-system meson)
#:use-module (guix build-system trivial)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages admin) #:use-module (gnu packages admin)
#:use-module (gnu packages autotools) #:use-module (gnu packages autotools)
@ -476,6 +477,29 @@ executing in M-mode.")
(define-public opensbi-generic (define-public opensbi-generic
(make-opensbi-package "generic" "opensbi-generic")) (make-opensbi-package "generic" "opensbi-generic"))
(define-public opensbi-qemu
(package
(inherit opensbi-generic)
(name "opensbi-qemu")
(native-inputs '())
(inputs (list opensbi-generic))
(build-system trivial-build-system)
(arguments
(list #:modules '((guix build utils))
#:builder
#~(begin
(use-modules ((guix build utils)))
(let ((opensbi-riscv64 (search-input-file %build-inputs
"fw_dynamic.bin"))
(out (string-append #$output "/share/qemu")))
(mkdir-p out)
(symlink opensbi-riscv64
(string-append
out "/opensbi-riscv64-generic-fw_dynamic.bin"))))))
(synopsis "OpenSBI firmware files for QEMU")
(description
"This package contains OpenSBI firmware files for use with QEMU.")))
(define-public seabios (define-public seabios
(package (package
(name "seabios") (name "seabios")