hurd-vm-service-type into /etc/config.scm

[address@hidden]

Hello guix!

My goal is to insert the hurd-vm-service-type service into my
"/etc/config.scm"

I tried inserting it into %desktop-services

Then I thought it would be a good idea to add the virtualization
module after the (use-service-modules, at the top.

Into %base-user-accounts)) I added "kvm" in the supplementary-groups

My /etc/config.scm

'''

(use-modules (gnu))

(use-service-modules cups desktop networking virtualization ssh xorg)
;; virtualization added here

(operating-system

  (locale "fr_FR.utf8")

  (timezone "Europe/Paris")

  (keyboard-layout (keyboard-layout "fr"))

  (host-name "gnu")

  (users (cons* (user-account

                  (name "hubert")

                  (comment "Hubert")

                  (group "users")

                  (home-directory "/home/hubert")

                  (supplementary-groups '("wheel"
"netdev" "audio" "video" "kvm" "lp"))) ;; "kvm" added here

                    %base-user-accounts))

  (packages (append (list (specification->package "nss-certs"))

                    %base-packages))

  (services

   (append (list (service gnome-desktop-service-type)

                 (service cups-service-type)

                 (set-xorg-configuration

                  (xorg-configuration
(keyboard-layout keyboard-layout))))

                 (service bluetooth-service-type

                  (bluetooth-configuration

                   (auto-enable? #t)))

                   (service hurd-vm-service-type

                    (hurd-vm-configuration

                     (disk-size (* 10000 (expt 2
20))) ;; 10G

                     (memory-size
1024)))              ;; 1024MiB

                      %desktop-services))

                     

               (bootloader (bootloader-configuration

                (bootloader grub-efi-bootloader)

                (targets (list "/boot/efi"))

                (keyboard-layout keyboard-layout)))

                (swap-devices (list (swap-space

                             (target (uuid

                                   
"527ab16b-d20c-4269-bc6f-8910ef3f8c5e")))))

  (file-systems (cons* (file-system

                         (mount-point
"/boot/efi")

                         (device (uuid
"1C82-1420"

                                      
'fat32))

                         (type "vfat"))

                       (file-system

                         (mount-point "/")

                         (device (uuid

                                 
"e4fb3e05-b455-40db-bc59-4d4d011e1e01"

                                 
'ext4))

                         (type "ext4"))
%base-file-systems)))

'''

However, trying to reconfigure gives me this error message:

'''

hubert@gnu ~$ sudo guix system reconfigure /etc/config.scm

Backtrace:

          18 (primitive-load
"/home/hubert/.config/guix/current/bin/…")

In guix/ui.scm:

   2324:7 17 (run-guix . _)

  2287:10 16 (run-guix-command _ . _)

In ice-9/boot-9.scm:

  1752:10 15 (with-exception-handler _ _ #:unwind? _ # _)

In guix/status.scm:

    859:3 14 (_)

    839:4 13 (call-with-status-report _ _)

In guix/scripts/system.scm:

   1305:4 12 (_)

In ice-9/boot-9.scm:

  1752:10 11 (with-exception-handler _ _ #:unwind? _ # _)

In guix/store.scm:

   661:37 10 (thunk)

   1300:8  9 (call-with-build-handler #<procedure 7ff6fe4294b0 at
g…> …)

  2180:25  8 (run-with-store #<store-connection 256.99 7ff6e61ed2d0>
…)

In guix/scripts/system.scm:

    847:2  7 (_ _)

    721:8  6 (_ #<store-connection 256.99 7ff6e61ed2d0>)

In gnu/system.scm:

  1299:19  5 (operating-system-derivation _)

   836:11  4 (operating-system-services #<<operating-system>
kernel:…>)

   870:20  3 (services _)

In unknown file:

           2 (append (#<<service> type: #<service-type
gnome-des…> …) …)

In ice-9/boot-9.scm:

  1685:16  1 (raise-exception _ #:continuable? _)

  1685:16  0 (raise-exception _ #:continuable? _)

ice-9/boot-9.scm:1685:16: In procedure raise-exception:

In procedure append: Wrong type argument in position 2 (expecting
empty list): #<<service> type: #<service-type bluetooth 7ff6e99a0c00>
value: #<<bluetooth-configuration> bluez: #<package bluez@5.66
gnu/packages/linux.scm:5954 7ff6ea5f0370> name: "BlueZ" class: 0
discoverable-timeout: 180 always-pairable?: #f pairable-timeout: 0
device-id: #f reverse-service-discovery?: #t name-resolving?: #t
debug-keys?: #f controller-mode: dual multi-profile: off
fast-connectable?: #f privacy: off just-works-repairing: never
temporary-timeout: 30 refresh-discovery?: #t experimental: #f
remote-name-request-retry-delay: 300 page-scan-type: #f
page-scan-interval: #f page-scan-window: #f inquiry-scan-type: #f
inquiry-scan-interval: #f inquiry-scan-window: #f
link-supervision-timeout: #f page-timeout: #f min-sniff-interval: #f
max-sniff-interval: #f min-advertisement-interval: #f
max-advertisement-interval: #f multi-advertisement-rotation-interval:
#f scan-interval-auto-connect: #f scan-window-auto-connect: #f
scan-interval-suspend: #f scan-window-suspend: #f
scan-interval-discovery: #f scan-window-discovery: #f
scan-interval-adv-monitor: #f scan-window-adv-monitor: #f
scan-interval-connect: #f scan-window-connect: #f
min-connection-interval: #f max-connection-interval: #f
connection-latency: #f connection-supervision-timeout: #f
autoconnect-timeout: #f adv-mon-allowlist-scan-duration: 300
adv-mon-no-filter-scan-duration: 500 enable-adv-mon-interleave-scan?:
#t cache: always key-size: 0 exchange-mtu: 517 att-channels: 3
session-mode: basic stream-mode: basic reconnect-uuids: ()
reconnect-attempts: 7 reconnect-intervals: (1 2 4 8 16 32 64)
auto-enable?: #t resume-delay: 2 rssi-sampling-period: 255>>

'''

I tried to decipher all of this, but without any success. (Bluetooth
and Wi-Fi don't work but that's another topic;) In fact, I don't
really see how/where to direct my research... Thanks in advance if you
can enlighten me!

Kind regards,

Hubert

Envoyé depuis Infomaniak [https://www.infomaniak.com], email gratuit
et respectueux de la vie privée