* hurd-vm-service-type into /etc/config.scm
@ 2024-03-12 18:33 hubert.lombard@ik.me via
2024-03-16 15:07 ` Richard Sent
0 siblings, 1 reply; 11+ messages in thread
From: hubert.lombard@ik.me via @ 2024-03-12 18:33 UTC (permalink / raw)
To: help-guix
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
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
2024-03-12 18:33 hurd-vm-service-type into /etc/config.scm hubert.lombard@ik.me via
@ 2024-03-16 15:07 ` Richard Sent
2024-03-18 14:52 ` hubert.lombard@ik.me via
0 siblings, 1 reply; 11+ messages in thread
From: Richard Sent @ 2024-03-16 15:07 UTC (permalink / raw)
To: hubert.lombard@ik.me via; +Cc: hubert.lombard@ik.me
Hubert,
Your issue is in your operating-system services field. In the backtrace:
--8<---------------cut here---------------start------------->8---
In procedure append: Wrong type argument in position 2 (expecting
empty list) #<<service> type: #<service-type bluetooth ...
--8<---------------cut here---------------end--------------->8---
You have several services outside of the (list) call, so you're
basically running
--8<---------------cut here---------------start------------->8---
(append (list (service-1 service-2) service-3 service-4
%desktop-services))
--8<---------------cut here---------------end--------------->8---
Append only takes lists as arguments. %desktop-services is a list, but
bluetooth service and hurd-vm service are not.
--
Take it easy,
Richard Sent
Making my computer weirder one commit at a time.
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
2024-03-16 15:07 ` Richard Sent
@ 2024-03-18 14:52 ` hubert.lombard@ik.me via
2024-03-19 7:37 ` Saku Laesvuori
0 siblings, 1 reply; 11+ messages in thread
From: hubert.lombard@ik.me via @ 2024-03-18 14:52 UTC (permalink / raw)
To: Richard Sent; +Cc: hubert.lombard@ik.me" via
Hi Richard !
Le 2024-03-16T16:07:29.000+01:00, Richard Sent
<richard@freakingpenguin.com> a écrit :
> Hubert,
> Your issue is in your operating-system services field. In the backtrace:
>
> --8<---------------cut here---------------start------------->8---
>
> In procedure append: Wrong type argument in position 2 (expecting
>
> empty list) #<<service> type: #<service-type bluetooth ...
>
> --8<---------------cut here---------------end--------------->8---
>
> You have several services outside of the (list) call, so you're
>
> basically running
>
> --8<---------------cut here---------------start------------->8---
>
> (append (list (service-1 service-2) service-3 service-4
>
> %desktop-services))
>
> --8<---------------cut here---------------end--------------->8---
>
> Append only takes lists as arguments. %desktop-services is a list, but
>
> bluetooth service and hurd-vm service are not.
>
> --
>
> Take it easy,
>
> Richard Sent
>
> Making my computer weirder one commit at a time.
Thank you :) while/after reading your answer, I have tried to change
my config file
by adding %base-services like it :
/etc/config.scm
--8<---------------cut here---------------start------------->8---
(services
(append (list (service gnome-desktop-service-type)
(service cups-service-type)
(set-xorg-configuration
(xorg-configuration
(keyboard-layout keyboard-layout))))
;; Voici la liste des services par
défaut à laquelle nous
;; ajoutons nos propres services.
%desktop-services))
(services (cons* (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
%base-services))
--8<---------------cut here---------------end--------------->8---
But I get error "invalid field specifier"
$ sudo guix system reconfigure /etc/config.scm
Mot de passe :
/etc/config.scm:59:3: erreur : (services (cons* (service
bluetooth-service-type) (bluetooth-configuration (auto-enable? #t)))
(service hurd-vm-service-type (hurd-vm-configuration (disk-size (*
10000 (expt 2 20))) (memory-size 1024))) %base-services) : invalid
field specifier
Instead of putting the Hurd in %base-services (arbitrarily inserted by
myself), maybe I should create a service like %define-my-service, or
use (modify-services.
These are 2 possibilities that I should be able to implement... To
this end, I do research and the tests that go with it.
It should come back to me, because I had already managed to modify
effectively the configuration file on an old computer some time ago...
If only I had kept a copy:)
o/
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
2024-03-18 14:52 ` hubert.lombard@ik.me via
@ 2024-03-19 7:37 ` Saku Laesvuori
2024-03-20 9:55 ` hubert.lombard@ik.me via
0 siblings, 1 reply; 11+ messages in thread
From: Saku Laesvuori @ 2024-03-19 7:37 UTC (permalink / raw)
To: hubert.lombard@ik.me; +Cc: Richard Sent, hubert.lombard@ik.me" via
[-- Attachment #1: Type: text/plain, Size: 3862 bytes --]
On Mon, Mar 18, 2024 at 03:52:44PM +0100, hubert.lombard@ik.me via wrote:
> Hi Richard !
>
> Le 2024-03-16T16:07:29.000+01:00, Richard Sent
> <richard@freakingpenguin.com> a écrit :
>
> > Hubert,
> >
> > Your issue is in your operating-system services field. In the backtrace:
> >
> > --8<---------------cut here---------------start------------->8---
> > In procedure append: Wrong type argument in position 2 (expecting
> > empty list) #<<service> type: #<service-type bluetooth ...
> > --8<---------------cut here---------------end--------------->8---
> >
> > You have several services outside of the (list) call, so you're
> > basically running
> >
> > --8<---------------cut here---------------start------------->8---
> > (append (list (service-1 service-2) service-3 service-4
> > %desktop-services))
> > --8<---------------cut here---------------end--------------->8---
> >
> > Append only takes lists as arguments. %desktop-services is a list, but
> > bluetooth service and hurd-vm service are not.
>
> Thank you :) while/after reading your answer, I have tried to change
> my config file
>
> by adding %base-services like it :
>
> /etc/config.scm
>
> --8<---------------cut here---------------start------------->8---
> (services
> (append (list (service gnome-desktop-service-type)
> (service cups-service-type)
> (set-xorg-configuration
> (xorg-configuration
> (keyboard-layout keyboard-layout))))
> ;; Voici la liste des services par défaut à laquelle nous
> ;; ajoutons nos propres services.
> %desktop-services))
>
> (services (cons* (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
> %base-services))
> --8<---------------cut here---------------end--------------->8---
(Indentation modified to show the actual structure more clearly)
The S-exp structure is wrong here. A service declaration is of form
```
(service xxx-service-type
(xxx-configuration
(field-name value)
(another-field another-value)))
```
and the `services` field must be a list of such service declarations. In
your configuration snippet the first definition of `services` is valid
but the second one is three separate elements (not a list). The first
element is a pair (not a list) with elements `(service bluetooth-service-type)`
and `(bluetooth-configuration (auto-enable? #t))`, the second element is
a single valid service declaration and the third is a list of service
declarations.
Also, you are defining the `services` field twice which will not give
expected results even if it passes the compiler (hopefully it doesn't).
You have to combine the lists and set the `services` field to that.
I think %base-services is a subset of %desktop-services, so you should
not need both in the same `operating-system` declaration.
> Instead of putting the Hurd in %base-services (arbitrarily inserted by
> myself), maybe I should create a service like %define-my-service, or
> use (modify-services.
In Guix one doesn't "put services into %base-services" but instead
creates a new list of services which contains the services in
%base-services and some additional services.
- Saku
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 833 bytes --]
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
2024-03-19 7:37 ` Saku Laesvuori
@ 2024-03-20 9:55 ` hubert.lombard@ik.me via
2024-03-27 10:21 ` hubert.lombard@ik.me via
0 siblings, 1 reply; 11+ messages in thread
From: hubert.lombard@ik.me via @ 2024-03-20 9:55 UTC (permalink / raw)
To: Saku Laesvuori; +Cc: Richard Sent, hubert.lombard@ik.me" via
Hi, Saku!
Le 2024-03-19T08:37:47.000+01:00, Saku Laesvuori <saku@laesvuori.fi> a
écrit :
> On Mon, Mar 18, 2024 at 03:52:44PM +0100, hubert.lombard@ik.me via wrote:
>> Hi Richard !
>>
>> Le 2024-03-16T16:07:29.000+01:00, Richard Sent
>>
>> <richard@freakingpenguin.com> a écrit :
>>
>>> Hubert,
>>>
>>> Your issue is in your operating-system services field. In the
>>> backtrace:
>>>
>>> --8<---------------cut
>>> here---------------start------------->8---
>>>
>>> In procedure append: Wrong type argument in position 2
>>> (expecting
>>>
>>> empty list) #<<service> type: #<service-type bluetooth ...
>>>
>>> --8<---------------cut
>>> here---------------end--------------->8---
>>>
>>> You have several services outside of the (list) call, so you're
>>>
>>> basically running
>>>
>>> --8<---------------cut
>>> here---------------start------------->8---
>>>
>>> (append (list (service-1 service-2) service-3 service-4
>>>
>>> %desktop-services))
>>>
>>> --8<---------------cut
>>> here---------------end--------------->8---
>>>
>>> Append only takes lists as arguments. %desktop-services is a
>>> list, but
>>>
>>> bluetooth service and hurd-vm service are not.
>>
>> Thank you :) while/after reading your answer, I have tried to
>> change
>>
>> my config file
>>
>> by adding %base-services like it :
>>
>> /etc/config.scm
>>
>> --8<---------------cut here---------------start------------->8---
>>
>> (services
>>
>> (append (list (service gnome-desktop-service-type)
>>
>> (service cups-service-type)
>>
>> (set-xorg-configuration
>>
>> (xorg-configuration
>>
>> (keyboard-layout keyboard-layout))))
>>
>> ;; Voici la liste des services par défaut à laquelle nous
>>
>> ;; ajoutons nos propres services.
>>
>> %desktop-services))
>>
>> (services (cons* (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
>>
>> %base-services))
>>
>> --8<---------------cut here---------------end--------------->8---
>
> (Indentation modified to show the actual structure more clearly)
Nice :)
> The S-exp structure is wrong here. A service declaration is of form
>
> ```
>
> (service xxx-service-type
>
> (xxx-configuration
>
> (field-name value)
>
> (another-field another-value)))
Ok
> ```
>
> and the `services` field must be a list of such service declarations. In
>
> your configuration snippet the first definition of `services` is valid
>
> but the second one is three separate elements (not a list). The first
>
> element is a pair (not a list) with elements `(service bluetooth-service-type)`
>
> and `(bluetooth-configuration (auto-enable? #t))`, the second element is
>
> a single valid service declaration and the third is a list of service
>
> declarations.
Ah... I can see indeed.
> Also, you are defining the `services` field twice which will not give
>
> expected results even if it passes the compiler (hopefully it doesn't).
>
> You have to combine the lists and set the `services` field to that.
Again, I understand better now. In this case, the reconfiguration
hasn't even begun.
> I think %base-services is a subset of %desktop-services, so you should
>
> not need both in the same `operating-system` declaration.
Got it.
>> Instead of putting the Hurd in %base-services (arbitrarily
>> inserted by
>>
>> myself), maybe I should create a service like %define-my-service,
>> or
>>
>> use (modify-services.
>
> In Guix one doesn't "put services into %base-services" but instead
>
> creates a new list of services which contains the services in
>
> %base-services and some additional services.
This is what I tried to understand to implement yesterday by studying:
(define %my-services
(modify-services %xxxx-services
(..........
But I admit that it's still a bit fuzzy for me...
A good thing is that by studying all of this a little bit yesterday, I
was able to make it work Bluetooth :)
--8<---------------cut here---------------start------------->8---
(use-modules (gnu) (gnu services base))
(use-service-modules cups desktop networking ssh xorg audio sound dbus
virtualization)
(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")))
%base-user-accounts))
(packages (append (list (specification->package "nss-certs"))
%base-packages))
(services
(append (list (service gnome-desktop-service-type)
(service bluetooth-service-type
(bluetooth-configuration
(auto-enable? #t)))
(service cups-service-type)
(set-xorg-configuration
(xorg-configuration
(keyboard-layout keyboard-layout))))
%desktop-services))
........
--8<---------------cut here---------------end--------------->8---
I think I'll be able to insert (service hurd-vm-service-type in a
definition of services :
(define %my-services
(modify-services %xxxx-services
(..........
I'm still studying... Thank you Saku for your reply o/
Hubert
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
2024-03-20 9:55 ` hubert.lombard@ik.me via
@ 2024-03-27 10:21 ` hubert.lombard@ik.me via
2024-03-28 6:58 ` Saku Laesvuori
0 siblings, 1 reply; 11+ messages in thread
From: hubert.lombard@ik.me via @ 2024-03-27 10:21 UTC (permalink / raw)
To: Saku Laesvuori; +Cc: hubert.lombard@ik.me" via, Richard Sent
Hello o/
Further investigations to insert
the hurd-vm in /etc/config.scm
In my attempt at config.scm, inspired both by my own file
and from examples found on the Internet, I've
tried to use (define %my-gnome as well and
(modify-services %desktop-services, knowing that I'm missing
at least 1 module related to the package list. I've
tried several, but I can't figure out which one (or
which...)
$ sudo guix system reconfigure /etc/config.scm
--8<---------------cut here---------------start------------->8---
ce-9/eval.scm:223:20: In procedure proc:
erreur : packages : variable non liée
conseil : Auriez-vous oublié un `use-modules' ?
--8<---------------cut here---------------end--------------->8---
As I only use Guix System, I'm aware that I'd better build myself a
a virtual machine to test this kind of configuration.
Secondly, I'm also aware that even if my
(use-modules) field was satisfied, there might still be other
problems...
Here's the failing test, what do you think?
/etc/config.scm
--8<---------------cut here---------------start------------->8---
(use-modules (gnu) (gnu services) (gnu services base)
(gnu packages gnome) (gnu packages) (gnu packages base)
(gnu system nss) (guix utils) (gnu services cups)
(gnu packages certs)) ;;Maybe some modules not relevant here ?...
(use-service-modules desktop networking ssh xorg cups
virtualization sound)
(use-package-modules bootloaders certs cups gnome xorg linux vim
scanner screen ssh wm audio)
(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"
"cdrom" "scanner")))
%base-user-accounts))
(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)))
(packages
(append
(list
nss-certs ;for HTTPS access
vim ;some tools expect it to be there
gvfs ;for user mounts
openssh
cups
foomatic-filters
hplip
sane-backends
ijs
ghostscript)
%base-packages))
(define %my-gnome
(package
(inherit gnome)
(name "my-gnome")
(propagated-inputs
(modify-inputs (package-propagated-inputs gnome)
(delete "epiphany")
(delete "evolution")
(delete "gnome-weather")
(delete "simple-scan")
(delete "gnome-maps")
(delete "gnome-boxes")
(delete "gnome-console")
(delete "gnome-contacts")
(append gnome-terminal))))
%my-gnome)
;; default settings
(services (append
(list
(service hurd-vm-service-type
(hurd-vm-configuration
(disk-size (* 5000 (expt
2 20)))
(memory-size
1024)))
(service gnome-desktop-service-type
(gnome-configuration
(gnome my-gnome)))
(service bluetooth-service-type
(bluetooth-configuration
(auto-enable? #t)))
(cups-configuration
(web-interface? #t)
(extensions
(list cups-filters
hplip)))
(set-xorg-configuration
(xorg-configuration ;set keyboard-layout for
Xorg
(keyboard-layout keyboard-layout)))
(modify-services %desktop-services
(service
cups-service-type
(cups-configuration
(web-interface? #t)
(extensions
(list cups-filters
hplip)))))
%default-settings)))
--8<---------------cut here---------------end--------------->8---
Thank you in advance if you can point me to a way :)
Best regards
Hubert
Le 2024-03-20T10:55:45.000+01:00, "hubert.lombard@ik.me" via
<help-guix@gnu.org> a écrit :
> Hi, Saku!
>
> Le 2024-03-19T08:37:47.000+01:00, Saku Laesvuori <saku@laesvuori.fi> a
>
> écrit :
>
>> On Mon, Mar 18, 2024 at 03:52:44PM +0100, hubert.lombard@ik.me
>> via wrote:
>>
>>> Hi Richard !
>>>
>>> Le 2024-03-16T16:07:29.000+01:00, Richard Sent
>>>
>>> <richard@freakingpenguin.com> a écrit :
>>>
>>>> Hubert,
>>>>
>>>> Your issue is in your operating-system services field. In the
>>>>
>>>> backtrace:
>>>>
>>>> --8<---------------cut
>>>>
>>>> here---------------start------------->8---
>>>>
>>>> In procedure append: Wrong type argument in position 2
>>>>
>>>> (expecting
>>>>
>>>> empty list) #<<service> type: #<service-type bluetooth ...
>>>>
>>>> --8<---------------cut
>>>>
>>>> here---------------end--------------->8---
>>>>
>>>> You have several services outside of the (list) call, so
>>>> you're
>>>>
>>>> basically running
>>>>
>>>> --8<---------------cut
>>>>
>>>> here---------------start------------->8---
>>>>
>>>> (append (list (service-1 service-2) service-3 service-4
>>>>
>>>> %desktop-services))
>>>>
>>>> --8<---------------cut
>>>>
>>>> here---------------end--------------->8---
>>>>
>>>> Append only takes lists as arguments. %desktop-services is a
>>>>
>>>> list, but
>>>>
>>>> bluetooth service and hurd-vm service are not.
>>>
>>> Thank you :) while/after reading your answer, I have tried to
>>>
>>> change
>>>
>>> my config file
>>>
>>> by adding %base-services like it :
>>>
>>> /etc/config.scm
>>>
>>> --8<---------------cut
>>> here---------------start------------->8---
>>>
>>> (services
>>>
>>> (append (list (service gnome-desktop-service-type)
>>>
>>> (service cups-service-type)
>>>
>>> (set-xorg-configuration
>>>
>>> (xorg-configuration
>>>
>>> (keyboard-layout keyboard-layout))))
>>>
>>> ;; Voici la liste des services par défaut à laquelle nous
>>>
>>> ;; ajoutons nos propres services.
>>>
>>> %desktop-services))
>>>
>>> (services (cons* (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
>>>
>>> %base-services))
>>>
>>> --8<---------------cut
>>> here---------------end--------------->8---
>>
>> (Indentation modified to show the actual structure more clearly)
>
> Nice :)
>
>> The S-exp structure is wrong here. A service declaration is of
>> form
>>
>> ```
>>
>> (service xxx-service-type
>>
>> (xxx-configuration
>>
>> (field-name value)
>>
>> (another-field another-value)))
>
> Ok
>
>> ```
>>
>> and the `services` field must be a list of such service
>> declarations. In
>>
>> your configuration snippet the first definition of `services` is
>> valid
>>
>> but the second one is three separate elements (not a list). The
>> first
>>
>> element is a pair (not a list) with elements `(service
>> bluetooth-service-type)`
>>
>> and `(bluetooth-configuration (auto-enable? #t))`, the second
>> element is
>>
>> a single valid service declaration and the third is a list of
>> service
>>
>> declarations.
>
> Ah... I can see indeed.
>
>> Also, you are defining the `services` field twice which will not
>> give
>>
>> expected results even if it passes the compiler (hopefully it
>> doesn't).
>>
>> You have to combine the lists and set the `services` field to
>> that.
>
> Again, I understand better now. In this case, the reconfiguration
>
> hasn't even begun.
>
>> I think %base-services is a subset of %desktop-services, so you
>> should
>>
>> not need both in the same `operating-system` declaration.
>
> Got it.
>
>>> Instead of putting the Hurd in %base-services (arbitrarily
>>>
>>> inserted by
>>>
>>> myself), maybe I should create a service like
>>> %define-my-service,
>>>
>>> or
>>>
>>> use (modify-services.
>>
>> In Guix one doesn't "put services into %base-services" but
>> instead
>>
>> creates a new list of services which contains the services in
>>
>> %base-services and some additional services.
>
> This is what I tried to understand to implement yesterday by
> studying:
>
> (define %my-services
>
> (modify-services %xxxx-services
>
> (..........
>
>
>
> But I admit that it's still a bit fuzzy for me...
>
> A good thing is that by studying all of this a little bit yesterday,
> I
>
> was able to make it work Bluetooth :)
>
> --8<---------------cut here---------------start------------->8---
>
> (use-modules (gnu) (gnu services base))
>
> (use-service-modules cups desktop networking ssh xorg audio sound
> dbus
>
> virtualization)
>
> (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")))
>
> %base-user-accounts))
>
> (packages (append (list (specification->package "nss-certs"))
>
> %base-packages))
>
> (services
>
> (append (list (service gnome-desktop-service-type)
>
> (service bluetooth-service-type
>
> (bluetooth-configuration
>
> (auto-enable? #t)))
>
> (service cups-service-type)
>
> (set-xorg-configuration
>
> (xorg-configuration
>
> (keyboard-layout keyboard-layout))))
>
> %desktop-services))
>
> ........
>
> --8<---------------cut here---------------end--------------->8---
>
> I think I'll be able to insert (service hurd-vm-service-type in a
>
> definition of services :
>
> (define %my-services
>
> (modify-services %xxxx-services
>
> (..........
>
>
>
> I'm still studying... Thank you Saku for your reply o/
>
> Hubert
Envoyé depuis Infomaniak [https://www.infomaniak.com], email gratuit
et respectueux de la vie privée
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
2024-03-27 10:21 ` hubert.lombard@ik.me via
@ 2024-03-28 6:58 ` Saku Laesvuori
[not found] ` <10aacff482f8f87b3cbff2b645758e9c@mail.infomaniak.com>
0 siblings, 1 reply; 11+ messages in thread
From: Saku Laesvuori @ 2024-03-28 6:58 UTC (permalink / raw)
To: hubert.lombard@ik.me; +Cc: hubert.lombard@ik.me" via, Richard Sent
[-- Attachment #1: Type: text/plain, Size: 4801 bytes --]
On Wed, Mar 27, 2024 at 11:21:11AM +0100, hubert.lombard@ik.me wrote:
> Hello o/
>
> Further investigations to insert the hurd-vm in /etc/config.scm In my
> attempt at config.scm, inspired both by my own file and from examples
> found on the Internet, I've tried to use (define %my-gnome as well and
> (modify-services %desktop-services, knowing that I'm missing at least
> 1 module related to the package list. I've tried several, but I can't
> figure out which one (or which...)
>
> $ sudo guix system reconfigure /etc/config.scm
>
> --8<---------------cut here---------------start------------->8---
> ce-9/eval.scm:223:20: In procedure proc:
> erreur : packages : variable non liée
> conseil : Auriez-vous oublié un `use-modules' ?
> --8<---------------cut here---------------end--------------->8---
>
> As I only use Guix System, I'm aware that I'd better build myself a a
> virtual machine to test this kind of configuration. Secondly, I'm also
> aware that even if my (use-modules) field was satisfied, there might
> still be other problems...
>
> Here's the failing test, what do you think?
>
> /etc/config.scm
>
> --8<---------------cut here---------------start------------->8---
> (use-modules
> (gnu)
> (gnu services)
> (gnu services base)
> (gnu packages gnome)
> (gnu packages)
> (gnu packages base)
> (gnu system nss)
> (guix utils)
> (gnu services cups)
> (gnu packages certs)) ;;Maybe some modules not relevant here ?...
>
> (use-service-modules desktop networking ssh xorg cups virtualization sound)
>
> (use-package-modules bootloaders certs cups gnome xorg linux vim scanner screen ssh wm audio)
>
> (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" "cdrom" "scanner")))
> %base-user-accounts))
> (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)))
> (packages
> (append
> (list nss-certs ;for HTTPS access
> vim ;some tools expect it to be there
> gvfs ;for user mounts
> openssh
> cups
> foomatic-filters
> hplip
> sane-backends
> ijs
> ghostscript)
> %base-packages))
>
> (define %my-gnome
> (package
> (inherit gnome)
> (name "my-gnome")
> (propagated-inputs
> (modify-inputs (package-propagated-inputs gnome)
> (delete "epiphany")
> (delete "evolution")
> (delete "gnome-weather")
> (delete "simple-scan")
> (delete "gnome-maps")
> (delete "gnome-boxes")
> (delete "gnome-console")
> (delete "gnome-contacts")
> (append gnome-terminal))))
> %my-gnome)
I suspect this define here. Firstly, it should be outside the
operating-system record. Here it means a field named 'define' which is
clearly not intended. The %my-gnome at the end will also cause problems
later as now %my-gnome is defined as a package record (that is not
stored anywhere) and as %my-gnome, which will cause nonterminating and
useless recursion. You might also have to import (guix packages) to
construct package records.
- Saku
PS. Your email client adds empty rows between every row of text, which
makes it hard to read. If there is a setting to control that or to omit
the HTML part completely (I'm assuming the problem is caused by
converting HTML-first emails to text form), you could try to turn it
off.
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 833 bytes --]
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
[not found] ` <10aacff482f8f87b3cbff2b645758e9c@mail.infomaniak.com>
@ 2024-03-30 20:25 ` hubert.lombard@ik.me via
2024-04-09 9:01 ` Saku Laesvuori
0 siblings, 1 reply; 11+ messages in thread
From: hubert.lombard@ik.me via @ 2024-03-30 20:25 UTC (permalink / raw)
To: Help Guix, Richard Sent, Saku Laesvuori
Hi Saku, thanks a lot for your answer,
Have tried to modify some settings about my e-mail client...
> Le 2024-03-28T07:58:43.000+01:00, Saku Laesvuori <saku@laesvuori.fi>
> a écrit :
>
>>
>
>> On Wed, Mar 27, 2024 at 11:21:11AM +0100, hubert.lombard@ik.me wrote:
>>> Hello o/
>>>
>>> Further investigations to insert the hurd-vm in /etc/config.scm
>>> In my
>>>
>>> attempt at config.scm, inspired both by my own file and from
>>> examples
>>>
>>> found on the Internet, I've tried to use (define %my-gnome as
>>> well and
>>>
>>> (modify-services %desktop-services, knowing that I'm missing at
>>> least
>>>
>>> 1 module related to the package list. I've tried several, but I
>>> can't
>>>
>>> figure out which one (or which...)
>>>
>>> $ sudo guix system reconfigure /etc/config.scm
>>>
>>> --8<---------------cut
>>> here---------------start------------->8---
>>>
>>> ce-9/eval.scm:223:20: In procedure proc:
>>>
>>> erreur : packages : variable non liée
>>>
>>> conseil : Auriez-vous oublié un `use-modules' ?
>>>
>>> --8<---------------cut
>>> here---------------end--------------->8---
>>>
>>> As I only use Guix System, I'm aware that I'd better build
>>> myself a a
>>>
>>> virtual machine to test this kind of configuration. Secondly,
>>> I'm also
>>>
>>> aware that even if my (use-modules) field was satisfied, there
>>> might
>>>
>>> still be other problems...
>>>
>>> Here's the failing test, what do you think?
>>>
>>> /etc/config.scm
>>>
>>> --8<---------------cut
>>> here---------------start------------->8---
>>>
>>> (use-modules
>>>
>>> (gnu)
>>>
>>> (gnu services)
>>>
>>> (gnu services base)
>>>
>>> (gnu packages gnome)
>>>
>>> (gnu packages)
>>>
>>> (gnu packages base)
>>>
>>> (gnu system nss)
>>>
>>> (guix utils)
>>>
>>> (gnu services cups)
>>>
>>> (gnu packages certs)) ;;Maybe some modules not relevant here
>>> ?...
>>>
>>> (use-service-modules desktop networking ssh xorg cups
>>> virtualization sound)
>>>
>>> (use-package-modules bootloaders certs cups gnome xorg linux
>>> vim scanner screen ssh wm audio)
>>>
>>> (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" "cdrom"
>>> "scanner")))
>>>
>>> %base-user-accounts))
>>>
>>> (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)))
>>>
>>> (packages
>>>
>>> (append
>>>
>>> (list nss-certs ;for HTTPS access
>>>
>>> vim ;some tools expect it to be there
>>>
>>> gvfs ;for user mounts
>>>
>>> openssh
>>>
>>> cups
>>>
>>> foomatic-filters
>>>
>>> hplip
>>>
>>> sane-backends
>>>
>>> ijs
>>>
>>> ghostscript)
>>>
>>> %base-packages))
>>>
>>> (define %my-gnome
>>>
>>> (package
>>>
>>> (inherit gnome)
>>>
>>> (name "my-gnome")
>>>
>>> (propagated-inputs
>>>
>>> (modify-inputs (package-propagated-inputs gnome)
>>>
>>> (delete "epiphany")
>>>
>>> (delete "evolution")
>>>
>>> (delete "gnome-weather")
>>>
>>> (delete "simple-scan")
>>>
>>> (delete "gnome-maps")
>>>
>>> (delete "gnome-boxes")
>>>
>>> (delete "gnome-console")
>>>
>>> (delete "gnome-contacts")
>>>
>>> (append gnome-terminal))))
>>>
>>> %my-gnome)
>>
>> I suspect this define here. Firstly, it should be outside the
>>
>> operating-system record. Here it means a field named 'define'
>> which is
>>
>> clearly not intended.
>>
>>
>>
>>
>>
>>
>> Yes, on rereading my file, I understand that this
>> "define" field
>>
>> is out of place.
>>
>>
>>
>>
>>
>>
>> The %my-gnome at the end will also
>> cause problems
>>
>> later as now %my-gnome is defined as a package record (that is not
>>
>> stored anywhere) and as %my-gnome, which will cause nonterminating
>> and
>>
>> useless recursion. You might also have to import (guix packages)
>> to
>>
>> construct package records.
>>
>>
>>
>>
>>
>>
>> Good to know. I've put back my original
>> "/etc/config.scm", I'm
>>
>> more at peace that way. It's the one
>> from the graphic installation of
>>
>> Guix System 1.4
>
> It's a fairly minimal file.I think there must be a way of inserting
> the
>
> "(service hurd-vm-service-type" service without too much difficulty.
>
> My attempt was too risky :) All suggestions will be studied...
>
> my current /etc/config.scm
>
> --8<---------------cut here---------------start------------->8---
>
> (use-modules (gnu) (gnu services base))
>
> (use-service-modules cups desktop networking ssh xorg audio sound
> dbus virtualization)
>
> (operating-system
>
> (locale "fr_FR.utf8")
>
> (timezone "Europe/Paris")
>
> (keyboard-layout (keyboard-layout "fr"))
>
> (host-name "gnu")
>
> ;; La liste des comptes utilisateurs (« root » est implicite).
>
> (users (cons* (user-account
>
> (name "hubert")
>
> (comment "Hubert")
>
> (group "users")
>
> (home-directory "/home/hubert")
>
> (supplementary-groups '("wheel"
> "netdev" "audio" "video" "kvm" "lp")))
>
> %base-user-accounts))
>
> ;; Paquets installés pour tout le système. Les utilisateurs et
> utilisatrices peuvent aussi installer des paquets
>
> ;; sous leur propre compte : utilisez « guix search MOT-CLÉ »
> pour chercher
>
> ;; des paquets et « guix install PAQUET » pour installer un
> paquet.
>
> (packages (append (list (specification->package "nss-certs"))
>
> %base-packages))
>
> ;; Voici la liste des services du système. Pour trouver les
> services disponibles,
>
> ;; lancez « guix system search MOT-CLÉ » dans un terminal.
>
> (services
>
> (append (list (service gnome-desktop-service-type)
>
> (service bluetooth-service-type
>
> (bluetooth-configuration
>
> (auto-enable? #t)))
>
> (service cups-service-type)
>
> (set-xorg-configuration
>
> (xorg-configuration
> (keyboard-layout keyboard-layout))))
>
> ;; Voici la liste des services par
> défaut à laquelle nous
>
> ;; ajoutons nos propres services.
>
> %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")))))
>
> ;; La liste des systèmes de fichiers qui seront « montés ».
> Les identifiants
>
> ;; de systèmes de fichiers uniques (« UUIDs ») qui se trouvent
> ici s'obtiennent
>
> ;; en exécutant « blkid » dans un terminal.
>
> (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)))
>
> --8<---------------cut here---------------end--------------->8---
>
> Thanks again Saku, thanks for all, Guix
>
> o/
Hubert
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
2024-03-30 20:25 ` hubert.lombard@ik.me via
@ 2024-04-09 9:01 ` Saku Laesvuori
2024-04-10 21:08 ` hubert.lombard
0 siblings, 1 reply; 11+ messages in thread
From: Saku Laesvuori @ 2024-04-09 9:01 UTC (permalink / raw)
To: hubert.lombard@ik.me; +Cc: Help Guix, Richard Sent
[-- Attachment #1: Type: text/plain, Size: 14350 bytes --]
On Sat, Mar 30, 2024 at 09:25:32PM +0100, hubert.lombard@ik.me wrote:
> Hi Saku, thanks a lot for your answer,
>
> Have tried to modify some settings about my e-mail client...
Unfortunately that seems to not have fixed the problem. I am still
seeing blank lines between every line of text. This time also the
quotation levels ('>' characters at the beginning of the line) are also
off: some new text you wrote is multiple quotations in. I won't fix them
in this message so you can see more clearly what I'm talking about.
>> Le 2024-03-28T07:58:43.000+01:00, Saku Laesvuori <saku@laesvuori.fi>
>> a écrit :
>>> On Wed, Mar 27, 2024 at 11:21:11AM +0100, hubert.lombard@ik.me wrote:
>>>> Hello o/
>>>>
>>>> Further investigations to insert the hurd-vm in /etc/config.scm
>>>> In my attempt at config.scm, inspired both by my own file and from
>>>> examples found on the Internet, I've tried to use (define %my-gnome as
>>>> well and (modify-services %desktop-services, knowing that I'm missing at
>>>> least 1 module related to the package list. I've tried several, but I
>>>> can't
>>>>
>>>> figure out which one (or which...)
>>>>
>>>> $ sudo guix system reconfigure /etc/config.scm
>>>>
>>>> --8<---------------cut
>>>> here---------------start------------->8---
>>>>
>>>> ce-9/eval.scm:223:20: In procedure proc:
>>>>
>>>> erreur : packages : variable non liée
>>>>
>>>> conseil : Auriez-vous oublié un `use-modules' ?
>>>>
>>>> --8<---------------cut
>>>> here---------------end--------------->8---
>>>>
>>>> As I only use Guix System, I'm aware that I'd better build
>>>> myself a a
>>>>
>>>> virtual machine to test this kind of configuration. Secondly,
>>>> I'm also
>>>>
>>>> aware that even if my (use-modules) field was satisfied, there
>>>> might
>>>>
>>>> still be other problems...
>>>>
>>>> Here's the failing test, what do you think?
>>>>
>>>> /etc/config.scm
>>>>
>>>> --8<---------------cut
>>>> here---------------start------------->8---
>>>>
>>>> (use-modules
>>>>
>>>> (gnu)
>>>>
>>>> (gnu services)
>>>>
>>>> (gnu services base)
>>>>
>>>> (gnu packages gnome)
>>>>
>>>> (gnu packages)
>>>>
>>>> (gnu packages base)
>>>>
>>>> (gnu system nss)
>>>>
>>>> (guix utils)
>>>>
>>>> (gnu services cups)
>>>>
>>>> (gnu packages certs)) ;;Maybe some modules not relevant here
>>>> ?...
>>>>
>>>> (use-service-modules desktop networking ssh xorg cups
>>>> virtualization sound)
>>>>
>>>> (use-package-modules bootloaders certs cups gnome xorg linux
>>>> vim scanner screen ssh wm audio)
>>>>
>>>> (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" "cdrom"
>>>> "scanner")))
>>>>
>>>> %base-user-accounts))
>>>>
>>>> (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)))
>>>>
>>>> (packages
>>>>
>>>> (append
>>>>
>>>> (list nss-certs ;for HTTPS access
>>>>
>>>> vim ;some tools expect it to be there
>>>>
>>>> gvfs ;for user mounts
>>>>
>>>> openssh
>>>>
>>>> cups
>>>>
>>>> foomatic-filters
>>>>
>>>> hplip
>>>>
>>>> sane-backends
>>>>
>>>> ijs
>>>>
>>>> ghostscript)
>>>>
>>>> %base-packages))
>>>>
>>>> (define %my-gnome
>>>>
>>>> (package
>>>>
>>>> (inherit gnome)
>>>>
>>>> (name "my-gnome")
>>>>
>>>> (propagated-inputs
>>>>
>>>> (modify-inputs (package-propagated-inputs gnome)
>>>>
>>>> (delete "epiphany")
>>>>
>>>> (delete "evolution")
>>>>
>>>> (delete "gnome-weather")
>>>>
>>>> (delete "simple-scan")
>>>>
>>>> (delete "gnome-maps")
>>>>
>>>> (delete "gnome-boxes")
>>>>
>>>> (delete "gnome-console")
>>>>
>>>> (delete "gnome-contacts")
>>>>
>>>> (append gnome-terminal))))
>>>>
>>>> %my-gnome)
>>>
>>> I suspect this define here. Firstly, it should be outside the
>>>
>>> operating-system record. Here it means a field named 'define'
>>> which is
>>>
>>> clearly not intended.
>>>
>>>
>>>
>>>
>>>
>>>
>>> Yes, on rereading my file, I understand that this
>>> "define" field
>>>
>>> is out of place.
>>>
>>>
>>>
>>>
>>>
>>>
>>> The %my-gnome at the end will also
>>> cause problems
>>>
>>> later as now %my-gnome is defined as a package record (that is not
>>>
>>> stored anywhere) and as %my-gnome, which will cause nonterminating
>>> and
>>>
>>> useless recursion. You might also have to import (guix packages)
>>> to
>>>
>>> construct package records.
>>>
>>>
>>>
>>>
>>>
>>>
>>> Good to know. I've put back my original
>>> "/etc/config.scm", I'm
>>>
>>> more at peace that way. It's the one
>>> from the graphic installation of
>>>
>>> Guix System 1.4
>>
>> It's a fairly minimal file.I think there must be a way of inserting
>> the
>>
>> "(service hurd-vm-service-type" service without too much difficulty.
>>
>> My attempt was too risky :) All suggestions will be studied...
Luckily Guix is a great operating system for risky attempts due to
atomic updates and full system roll back.
I haven't tried this myself, but it should be possible by just adding the
following block (copied from the manual and increased the sizes to be
more useful) after the line with `(service cups-service-type)` (for
example, that line isn't special in any other way except that it is
inside the service list):
```
(service hurd-vm-service-type
(hurd-vm-configuration
(disk-size (* 10 (expt 2 30))) ; 10 GiB
(memory-size 2048))) ; 2048 MiB
```
>> my current /etc/config.scm
>>
>> --8<---------------cut here---------------start------------->8---
>>
>> (use-modules (gnu) (gnu services base))
>>
>> (use-service-modules cups desktop networking ssh xorg audio sound
>> dbus virtualization)
>>
>> (operating-system
>>
>> (locale "fr_FR.utf8")
>>
>> (timezone "Europe/Paris")
>>
>> (keyboard-layout (keyboard-layout "fr"))
>>
>> (host-name "gnu")
>>
>> ;; La liste des comptes utilisateurs (« root » est implicite).
>>
>> (users (cons* (user-account
>>
>> (name "hubert")
>>
>> (comment "Hubert")
>>
>> (group "users")
>>
>> (home-directory "/home/hubert")
>>
>> (supplementary-groups '("wheel"
>> "netdev" "audio" "video" "kvm" "lp")))
>>
>> %base-user-accounts))
>>
>> ;; Paquets installés pour tout le système. Les utilisateurs et
>> utilisatrices peuvent aussi installer des paquets
>>
>> ;; sous leur propre compte : utilisez « guix search MOT-CLÉ »
>> pour chercher
>>
>> ;; des paquets et « guix install PAQUET » pour installer un
>> paquet.
>>
>> (packages (append (list (specification->package "nss-certs"))
>>
>> %base-packages))
>>
>> ;; Voici la liste des services du système. Pour trouver les
>> services disponibles,
>>
>> ;; lancez « guix system search MOT-CLÉ » dans un terminal.
>>
>> (services
>>
>> (append (list (service gnome-desktop-service-type)
>>
>> (service bluetooth-service-type
>>
>> (bluetooth-configuration
>>
>> (auto-enable? #t)))
>>
>> (service cups-service-type)
>>
>> (set-xorg-configuration
>>
>> (xorg-configuration
>> (keyboard-layout keyboard-layout))))
>>
>> ;; Voici la liste des services par
>> défaut à laquelle nous
>>
>> ;; ajoutons nos propres services.
>>
>> %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")))))
>>
>> ;; La liste des systèmes de fichiers qui seront « montés ».
>> Les identifiants
>>
>> ;; de systèmes de fichiers uniques (« UUIDs ») qui se trouvent
>> ici s'obtiennent
>>
>> ;; en exécutant « blkid » dans un terminal.
>>
>> (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)))
>>
>> --8<---------------cut here---------------end--------------->8---
>>
>> Thanks again Saku, thanks for all, Guix
>>
>> o/
>
>Hubert
>
>
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 833 bytes --]
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
2024-04-09 9:01 ` Saku Laesvuori
@ 2024-04-10 21:08 ` hubert.lombard
2024-04-11 5:50 ` Saku Laesvuori
0 siblings, 1 reply; 11+ messages in thread
From: hubert.lombard @ 2024-04-10 21:08 UTC (permalink / raw)
To: Saku Laesvuori; +Cc: Help Guix, Richard Sent
Hi Saku o/
Thanks a lot, it works !
I'm in late for the plain text instead html, I think it's ok now.
Have inserted your lines after the (service cups-service-type)
While reconfiguring, I can see several 'hurd' packages arriving ☺️
A great thank you for your help!
Hubert
Here's my /etc/config.scm with the hurd vm :
--8<---------------cut here---------------start------------->8---
(use-modules (gnu) (gnu services base))
(use-service-modules cups desktop networking ssh xorg audio sound dbus virtualization)
(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")))
%base-user-accounts))
(packages (append (list (specification->package "nss-certs"))
%base-packages))
(services
(append (list (service gnome-desktop-service-type)
(service bluetooth-service-type
(bluetooth-configuration
(auto-enable? #t)))
(service cups-service-type)
(service hurd-vm-service-type
(hurd-vm-configuration
(disk-size (* 10 (expt 2 30))) ; 10 GiB
(memory-size 2048))) ; 2048 MiB
(set-xorg-configuration
(xorg-configuration (keyboard-layout keyboard-layout))))
%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)))
--8<---------------cut here---------------end--------------->8---
\o/
Le 2024-04-09T11:01:54.000+02:00, Saku Laesvuori <saku@laesvuori.fi> a écrit :
> On Sat, Mar 30, 2024 at 09:25:32PM +0100, hubert.lombard@ik.me wrote:
>
> > Hi Saku, thanks a lot for your answer,
> >
> > Have tried to modify some settings about my e-mail client...
>
> Unfortunately that seems to not have fixed the problem. I am still
> seeing blank lines between every line of text. This time also the
> quotation levels ('>' characters at the beginning of the line) are also
> off: some new text you wrote is multiple quotations in. I won't fix them
> in this message so you can see more clearly what I'm talking about.
>
>
> >
> > > Le 2024-03-28T07:58:43.000+01:00, Saku Laesvuori <saku@laesvuori.fi>
> > > a écrit :
> > >
> > > > On Wed, Mar 27, 2024 at 11:21:11AM +0100, hubert.lombard@ik.me wrote:
> > > >
> > > > > Hello o/
> > > > >
> > > > > Further investigations to insert the hurd-vm in /etc/config.scm
> > > > > In my attempt at config.scm, inspired both by my own file and from
> > > > > examples found on the Internet, I've tried to use (define %my-gnome as
> > > > > well and (modify-services %desktop-services, knowing that I'm missing at
> > > > > least 1 module related to the package list. I've tried several, but I
> > > > > can't
> > > > >
> > > > > figure out which one (or which...)
> > > > >
> > > > > $ sudo guix system reconfigure /etc/config.scm
> > > > >
> > > > > --8<---------------cut
> > > > >
> > > > > > here---------------start------------->8---
> > > > >
> > > > > ce-9/eval.scm:223:20: In procedure proc:
> > > > >
> > > > > erreur : packages : variable non liée
> > > > >
> > > > > conseil : Auriez-vous oublié un `use-modules' ?
> > > > >
> > > > > --8<---------------cut
> > > > >
> > > > > > here---------------end--------------->8---
> > > > >
> > > > > As I only use Guix System, I'm aware that I'd better build
> > > > > myself a a
> > > > >
> > > > > virtual machine to test this kind of configuration. Secondly,
> > > > > I'm also
> > > > >
> > > > > aware that even if my (use-modules) field was satisfied, there
> > > > > might
> > > > >
> > > > > still be other problems...
> > > > >
> > > > > Here's the failing test, what do you think?
> > > > >
> > > > > /etc/config.scm
> > > > >
> > > > > --8<---------------cut
> > > > >
> > > > > > here---------------start------------->8---
> > > > >
> > > > > (use-modules
> > > > >
> > > > > (gnu)
> > > > >
> > > > > (gnu services)
> > > > >
> > > > > (gnu services base)
> > > > >
> > > > > (gnu packages gnome)
> > > > >
> > > > > (gnu packages)
> > > > >
> > > > > (gnu packages base)
> > > > >
> > > > > (gnu system nss)
> > > > >
> > > > > (guix utils)
> > > > >
> > > > > (gnu services cups)
> > > > >
> > > > > (gnu packages certs)) ;;Maybe some modules not relevant here
> > > > > ?...
> > > > >
> > > > > (use-service-modules desktop networking ssh xorg cups
> > > > > virtualization sound)
> > > > >
> > > > > (use-package-modules bootloaders certs cups gnome xorg linux
> > > > > vim scanner screen ssh wm audio)
> > > > >
> > > > > (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" "cdrom"
> > > > > "scanner")))
> > > > >
> > > > > %base-user-accounts))
> > > > >
> > > > > (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)))
> > > > >
> > > > > (packages
> > > > >
> > > > > (append
> > > > >
> > > > > (list nss-certs ;for HTTPS access
> > > > >
> > > > > vim ;some tools expect it to be there
> > > > >
> > > > > gvfs ;for user mounts
> > > > >
> > > > > openssh
> > > > >
> > > > > cups
> > > > >
> > > > > foomatic-filters
> > > > >
> > > > > hplip
> > > > >
> > > > > sane-backends
> > > > >
> > > > > ijs
> > > > >
> > > > > ghostscript)
> > > > >
> > > > > %base-packages))
> > > > >
> > > > > (define %my-gnome
> > > > >
> > > > > (package
> > > > >
> > > > > (inherit gnome)
> > > > >
> > > > > (name "my-gnome")
> > > > >
> > > > > (propagated-inputs
> > > > >
> > > > > (modify-inputs (package-propagated-inputs gnome)
> > > > >
> > > > > (delete "epiphany")
> > > > >
> > > > > (delete "evolution")
> > > > >
> > > > > (delete "gnome-weather")
> > > > >
> > > > > (delete "simple-scan")
> > > > >
> > > > > (delete "gnome-maps")
> > > > >
> > > > > (delete "gnome-boxes")
> > > > >
> > > > > (delete "gnome-console")
> > > > >
> > > > > (delete "gnome-contacts")
> > > > >
> > > > > (append gnome-terminal))))
> > > > >
> > > > > %my-gnome)
> > > >
> > > > I suspect this define here. Firstly, it should be outside the
> > > >
> > > > operating-system record. Here it means a field named 'define'
> > > > which is
> > > >
> > > > clearly not intended.
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > > Yes, on rereading my file, I understand that this
> > > > "define" field
> > > >
> > > > is out of place.
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > > The %my-gnome at the end will also
> > > > cause problems
> > > >
> > > > later as now %my-gnome is defined as a package record (that is not
> > > >
> > > > stored anywhere) and as %my-gnome, which will cause nonterminating
> > > > and
> > > >
> > > > useless recursion. You might also have to import (guix packages)
> > > > to
> > > >
> > > > construct package records.
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > > Good to know. I've put back my original
> > > > "/etc/config.scm", I'm
> > > >
> > > > more at peace that way. It's the one
> > > > from the graphic installation of
> > > >
> > > > Guix System 1.4
> > >
> > > It's a fairly minimal file.I think there must be a way of inserting
> > > the
> > >
> > > "(service hurd-vm-service-type" service without too much difficulty.
> > >
> > > My attempt was too risky :) All suggestions will be studied...
> >
> > Luckily Guix is a great operating system for risky attempts due to
> > atomic updates and full system roll back.
> >
> > I haven't tried this myself, but it should be possible by just adding the
> > following block (copied from the manual and increased the sizes to be
> > more useful) after the line with `(service cups-service-type)` (for
> > example, that line isn't special in any other way except that it is
> > inside the service list):
> >
> > ```
> > (service hurd-vm-service-type
> > (hurd-vm-configuration
> > (disk-size (* 10 (expt 2 30))) ; 10 GiB
> > (memory-size 2048))) ; 2048 MiB
> > ```
> >
> >
> > >
> > > > my current /etc/config.scm
> > > >
> > > > --8<---------------cut here---------------start------------->8---
> > > >
> > > > (use-modules (gnu) (gnu services base))
> > > >
> > > > (use-service-modules cups desktop networking ssh xorg audio sound
> > > > dbus virtualization)
> > > >
> > > > (operating-system
> > > >
> > > > (locale "fr_FR.utf8")
> > > >
> > > > (timezone "Europe/Paris")
> > > >
> > > > (keyboard-layout (keyboard-layout "fr"))
> > > >
> > > > (host-name "gnu")
> > > >
> > > > ;; La liste des comptes utilisateurs (« root » est implicite).
> > > >
> > > > (users (cons* (user-account
> > > >
> > > > (name "hubert")
> > > >
> > > > (comment "Hubert")
> > > >
> > > > (group "users")
> > > >
> > > > (home-directory "/home/hubert")
> > > >
> > > > (supplementary-groups '("wheel"
> > > > "netdev" "audio" "video" "kvm" "lp")))
> > > >
> > > > %base-user-accounts))
> > > >
> > > > ;; Paquets installés pour tout le système. Les utilisateurs et
> > > > utilisatrices peuvent aussi installer des paquets
> > > >
> > > > ;; sous leur propre compte : utilisez « guix search MOT-CLÉ »
> > > > pour chercher
> > > >
> > > > ;; des paquets et « guix install PAQUET » pour installer un
> > > > paquet.
> > > >
> > > > (packages (append (list (specification->package "nss-certs"))
> > > >
> > > > %base-packages))
> > > >
> > > > ;; Voici la liste des services du système. Pour trouver les
> > > > services disponibles,
> > > >
> > > > ;; lancez « guix system search MOT-CLÉ » dans un terminal.
> > > >
> > > > (services
> > > >
> > > > (append (list (service gnome-desktop-service-type)
> > > >
> > > > (service bluetooth-service-type
> > > >
> > > > (bluetooth-configuration
> > > >
> > > > (auto-enable? #t)))
> > > >
> > > > (service cups-service-type)
> > > >
> > > > (set-xorg-configuration
> > > >
> > > > (xorg-configuration
> > > > (keyboard-layout keyboard-layout))))
> > > >
> > > > ;; Voici la liste des services par
> > > > défaut à laquelle nous
> > > >
> > > > ;; ajoutons nos propres services.
> > > >
> > > > %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")))))
> > > >
> > > > ;; La liste des systèmes de fichiers qui seront « montés ».
> > > > Les identifiants
> > > >
> > > > ;; de systèmes de fichiers uniques (« UUIDs ») qui se trouvent
> > > > ici s'obtiennent
> > > >
> > > > ;; en exécutant « blkid » dans un terminal.
> > > >
> > > > (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)))
> > > >
> > > > --8<---------------cut here---------------end--------------->8---
> > > >
> > > > Thanks again Saku, thanks for all, Guix
> > > >
> > > > o/
> > >
> > > Hubert
> > >
> >
> >
> >
^ permalink raw reply [flat|nested] 11+ messages in thread
* Re: hurd-vm-service-type into /etc/config.scm
2024-04-10 21:08 ` hubert.lombard
@ 2024-04-11 5:50 ` Saku Laesvuori
0 siblings, 0 replies; 11+ messages in thread
From: Saku Laesvuori @ 2024-04-11 5:50 UTC (permalink / raw)
To: hubert.lombard@ik.me; +Cc: Help Guix, Richard Sent
[-- Attachment #1: Type: text/plain, Size: 163 bytes --]
> Hi Saku o/
>
> Thanks a lot, it works !
>
> I'm in late for the plain text instead html, I think it's ok now.
Yes, now the email looks good!
- Saku
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 833 bytes --]
^ permalink raw reply [flat|nested] 11+ messages in thread
end of thread, other threads:[~2024-04-11 5:51 UTC | newest]
Thread overview: 11+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2024-03-12 18:33 hurd-vm-service-type into /etc/config.scm hubert.lombard@ik.me via
2024-03-16 15:07 ` Richard Sent
2024-03-18 14:52 ` hubert.lombard@ik.me via
2024-03-19 7:37 ` Saku Laesvuori
2024-03-20 9:55 ` hubert.lombard@ik.me via
2024-03-27 10:21 ` hubert.lombard@ik.me via
2024-03-28 6:58 ` Saku Laesvuori
[not found] ` <10aacff482f8f87b3cbff2b645758e9c@mail.infomaniak.com>
2024-03-30 20:25 ` hubert.lombard@ik.me via
2024-04-09 9:01 ` Saku Laesvuori
2024-04-10 21:08 ` hubert.lombard
2024-04-11 5:50 ` Saku Laesvuori
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/guix.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.