updating qemu and libvirt

This commit is contained in:
Jean-François GUILLAUME 2024-02-17 13:16:31 +01:00
parent 272285b54b
commit 705830f742
GPG key ID: 38751DAE145EFB5A

View file

@ -1,51 +1,60 @@
(define-module (glicid packages virtualization) (define-module (glicid packages virtualization)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix gexp) #:use-module (guix gexp)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (guix utils) #:use-module (guix utils)
#:use-module (gnu packages virtualization) #:use-module (gnu packages virtualization)
#:use-module (gnu packages storage) #:use-module (gnu packages storage)
#:use-module (guix download) #:use-module (guix download)
#:use-module (glicid utils)) #:use-module (glicid utils))
(define-public qemu-latest (define-public qemu-latest
qemu) qemu)
(define-public qemu-minimal-latest (define-public qemu-minimal-latest
qemu-minimal) qemu-minimal)
(define-public qemu-with-rbd (define-public qemu-with-rbd
(package (package
(inherit qemu-latest) (inherit qemu-latest)
(name "qemu-with-rbd") (version "8.2.1")
(arguments (name "qemu-with-rbd")
(substitute-keyword-arguments (package-arguments qemu) (arguments
((#:tests? _ #f) (substitute-keyword-arguments (package-arguments qemu)
#f))) ((#:tests? _ #f)
(inputs `(("ceph:lib" ,ceph "lib") #f)))
,@(package-inputs qemu))))) (inputs `(("ceph:lib" ,ceph "lib")
,@(package-inputs qemu)))))
(define-public qemu-minimal-with-rbd (define-public qemu-minimal-with-rbd
(package (package
(inherit qemu-minimal-latest) (inherit qemu-minimal-latest)
(name "qemu-minimal-with-rbd") (version "8.2.1")
(arguments (name "qemu-minimal-with-rbd")
(substitute-keyword-arguments `(#:tests? #f (arguments
,@(package-arguments qemu-minimal)) (substitute-keyword-arguments `(#:tests? #f
)) ,@(package-arguments qemu-minimal))
(inputs `(("ceph:lib" ,ceph "lib") ))
,@(package-inputs qemu-minimal))))) (inputs `(("ceph:lib" ,ceph "lib")
,@(package-inputs qemu-minimal)))))
(define-public libvirt-8.5 (define-public libvirt-8.5
(package (package
(inherit libvirt) (inherit libvirt)
(name "libvirt") (name "libvirt")
(version "8.5.0") (version "8.5.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "https://libvirt.org/sources/libvirt-" (uri (string-append "https://libvirt.org/sources/libvirt-"
version ".tar.xz")) version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0qnvjy7k4l52bb5xylvhm21blkgbhld0jzilhsdf6gdqw6srj7j0")) "0qnvjy7k4l52bb5xylvhm21blkgbhld0jzilhsdf6gdqw6srj7j0"))
(patches (search-patches (patches (search-patches
"glicid/packages/patches/glicid-libvirt-add-install-prefix.patch")))))) "glicid/packages/patches/glicid-libvirt-add-install-prefix.patch"))))))
(define-public libvirt-10.0
(package
(inherit libvirt)
(name "libvirt")
(version "10.0.0")
))