summaryrefslogtreecommitdiff
path: root/modules/home-services/virtualization.scm
blob: 0f3084a9a4fd4f3ca6d67665a17de84cf5adb500 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
(define-module (home-services virtualization)
               #:use-module (guix packages)
               #:use-module (gnu packages)
               #:use-module (gnu packages virtualization)
               #:use-module (gnu services)
               #:use-module (gnu services configuration)
               #:use-module (gnu services virtualization)
               #:use-module (gnu home services)
               #:use-module (home-packages firmware)
               #:use-module (guix gexp))

(define libvirt-new
  (package
    (inherit libvirt)
    (inputs
      (modify-inputs (package-inputs libvirt)
                     (append ovmf-new)))))

(define-public libvirt-service-type-new
  (service-type 
    (name 'libvirt-new)
    (extensions
      (list
        (service-extension libvirt-service-type
                           (lambda (config)
                           (libvirt-configuration
                             (unix-sock-group "libvirt")))
                           )
    (default-value #f)
    (description "Libvirt with OVMF")))