diff options
Diffstat (limited to 'modules/home-packages')
| -rw-r--r-- | modules/home-packages/firmware.scm | 25 | ||||
| -rw-r--r-- | modules/home-packages/virtualization.scm | 28 |
2 files changed, 53 insertions, 0 deletions
diff --git a/modules/home-packages/firmware.scm b/modules/home-packages/firmware.scm new file mode 100644 index 0000000..6e88992 --- /dev/null +++ b/modules/home-packages/firmware.scm @@ -0,0 +1,25 @@ +(define-module (home-packages firmware) + #:use-module (guix packages) + #:use-module (guix utils) + #:use-module (gnu packages) + #:use-module (gnu packages package-management) + #:use-module (gnu packages build-tools) + #:use-module (gnu packages virtualization) + #:use-module (gnu packages firmware) + #:use-module (guix gexp)) + +(define-public ovmf-new + (package + (inherit ovmf) + (name "ovmf-new") + (arguments + (substitute-keyword-arguments (package-arguments ovmf) + ((#:phases phases) + #~(modify-phases #$phases + (replace 'install + (lambda _ + (let ((fmw (string-append #$output "/share/firmware"))) + (mkdir-p fmw) + (copy-recursively "Build/OvmfX64/RELEASE_GCC49/FV" fmw) + ))) + )))))) diff --git a/modules/home-packages/virtualization.scm b/modules/home-packages/virtualization.scm new file mode 100644 index 0000000..d048c0d --- /dev/null +++ b/modules/home-packages/virtualization.scm @@ -0,0 +1,28 @@ +(define-module (home-packages virtualization) + #:use-module (guix packages) + #:use-module (guix utils) + #:use-module (gnu packages) + #:use-module (gnu packages package-management) + #:use-module (gnu packages build-tools) + #:use-module (gnu packages virtualization) + #:use-module (gnu packages firmware) + #:use-module (home-packages firmware) + #:use-module (guix gexp)) + +(define-public virt-manager-new + (package + (inherit virt-manager) + (name "virt-manager-new") + (arguments + (substitute-keyword-arguments (package-arguments virt-manager) + ((#:phases phases) + #~(modify-phases #$phases + (add-after 'install 'ovmf + (lambda _ + (let ((fmw (string-append #$output "/usr/share/OVMF"))) + (mkdir-p fmw) + (copy-recursively #$(file-append ovmf-new "/share/firmware") fmw) + (mkdir-p fmw) + (copy-recursively "Build/OvmfX64/RELEASE_GCC49/FV" fmw) + ))) + )))))) |