bug#35175: Cannot reconfigure

bug#35175: Cannot reconfigure

[Luther Thompson]

[-- Attachment #1: Type: text/plain, Size: 2004 bytes --]

`sudo guix system reconfigure config.scm` fails on Guix commit 177bc62.
I'm attaching my config.scm. Here is my backtrace:

---BEGIN---
/home/luther/config.scm:40:4: warning: 'title' field is deprecated
Backtrace:
In gnu/services.scm:
   778:26 19 (loop #<<service> type: #<service-type account 1f9fa00>…>)
In srfi/srfi-1.scm:
   592:29 18 (map1 (#<<service> type: #<service-type guix 27edc80…> …))
   592:29 17 (map1 (#<<service> type: #<service-type ntp 27ed5a0>…> …))
   592:17 16 (map1 (#<<service> type: #<service-type dbus 27ed9b0…> …))
In gnu/services.scm:
   778:26 15 (loop #<<service> type: #<service-type dbus 27ed9b0> va…>)
In srfi/srfi-1.scm:
   592:29 14 (map1 (#<<service> type: #<service-type elogind 27ed…> …))
   592:17 13 (map1 (#<<service> type: #<service-type polkit 27ed9…> …))
In gnu/services.scm:
   778:26 12 (loop #<<service> type: #<service-type polkit 27ed960> …>)
In srfi/srfi-1.scm:
   592:29 11 (map1 (#<<service> type: #<service-type elogind 27ed…> …))
   592:29 10 (map1 (#<<service> type: #<service-type colord 27ed0…> …))
   592:29  9 (map1 (#<<service> type: #<service-type cups-pk-help…> …))
   592:29  8 (map1 (#<<service> type: #<service-type accountsserv…> …))
   592:29  7 (map1 (#<<service> type: #<service-type udisks 27ed0…> …))
   592:29  6 (map1 (#<<service> type: #<service-type network-mana…> …))
   592:29  5 (map1 (#<<service> type: #<service-type gnome-deskto…> …))
   592:17  4 (map1 (#<<service> type: #<service-type localed 27ed82…>))
In gnu/services.scm:
   778:26  3 (loop #<<service> type: #<service-type localed 27ed820>…>)
In srfi/srfi-1.scm:
   592:17  2 (map1 (#<<service> type: #<service-type gdm 27ed730> v…>))
In gnu/services.scm:
   787:37  1 (loop #<<service> type: #<service-type gdm 27ed730> val…>)
In unknown file:
           0 (car ())

ERROR: In procedure car:
In procedure car: Wrong type (expecting pair): ()
---END---

Luther

[-- Attachment #2: config.scm --]
[-- Type: text/x-scheme, Size: 3179 bytes --]

(use-modules ((gnu) #:select (use-package-modules use-service-modules))
	     ((gnu bootloader) #:select (bootloader-configuration))
	     ((gnu bootloader grub) #:select (grub-bootloader))
	     ((gnu packages base) #:select (coreutils))
	     ((gnu packages android) #:select (android-udev-rules))
	     ((gnu services base)
	      #:select
	      (guix-configuration
	       guix-service-type
	       udev-configuration
	       udev-configuration-rules
	       udev-service-type))
	     ((gnu services xorg)
	      #:select
	      (gdm-configuration
	       gdm-service-type
	       ;;slim-configuration
	       ;;slim-service-type
	       xorg-configuration))
	     ((gnu system file-systems)
	      #:select (file-system %base-file-systems))
	     ((gnu system keyboard) #:select (keyboard-layout))
	     ((gnu system nss) #:select (%mdns-host-lookup-nss))
	     ((guix gexp) #:select (file-append)))
(use-service-modules desktop)
(use-package-modules certs gnome)

(operating-system
  (host-name "targaryen")
  (timezone "America/New_York")

  (keyboard-layout (keyboard-layout "us" "dvorak"))

  (bootloader
   (bootloader-configuration (bootloader grub-bootloader)
			     (target "/dev/sda")
			     (keyboard-layout keyboard-layout)))

  (file-systems
   (cons
    (file-system (device "my-root")
		 (mount-point "/")
		 (type "ext4")
		 (title 'label))
    %base-file-systems))

  ;; Needed to connect to a phone.
  (groups (cons (user-group (name "adbusers") (system? #t)) %base-groups))

  (users
   (cons
    (user-account (name "luther")
		  (comment "Luther Thompson")
		  (group "users")
		  (supplementary-groups
		   '("wheel" "netdev" "audio" "video" "cdrom" "adbusers"))
		  (home-directory "/home/luther"))
    %base-user-accounts))

  ;; This is where we specify system-wide packages.
  (packages (cons* nss-certs         ;for HTTPS access
                   gvfs              ;for user mounts
                   %base-packages))

  (services
   (cons* (service gnome-desktop-service-type)
	  (extra-special-file "/usr/bin/env" (file-append coreutils "/bin/env"))
	  (modify-services %desktop-services
	    (udev-service-type config =>
			       (udev-configuration (inherit config)
						   (rules
						    (cons*
						     android-udev-rules
						     (udev-configuration-rules
						      config)))))
	    (gdm-service-type config =>
			      (gdm-configuration
			       (xorg-configuration
				(xorg-configuration
				 (keyboard-layout
				  keyboard-layout)
				 (extra-config
				  '(
"Section \"InputClass\"
	Identifier \"Touchpads\"
	Driver \"libinput\"
	MatchIsTouchpad \"on\"
	Option \"DisableWhileTyping\" \"on\"
	Option \"HorizontalScrolling\" \"off\"
	Option \"Tapping\" \"on\"
EndSection"))))))
	    (guix-service-type config =>
			       (guix-configuration
				(inherit config)
				(substitute-urls
				 '("https://ci.guix.info"
				   "https://berlin.guixsd.org"
				   "https://mirror.hydra.gnu.org"
				   "https://hydra.gnu.org")))))))

  ;; Allow resolution of '.local' host names with mDNS.
  (name-service-switch %mdns-host-lookup-nss)

  (swap-devices '("/swapfile")))


;; Local Variables:
;; eval: (guix-devel-mode 1)
;; End:

bug#35175: Cannot reconfigure

[znavko]

This is not a bug, but your config is wrong here:

  (file-systems
   (cons
    (file-system (device "my-root")
		 (mount-point "/")
		 (type "ext4")
		 (title 'label))
    %base-file-systems))

Delete string  `(title 'label)` and leave like this:

  (file-systems
   (cons
    (file-system (device "my-root")
		 (mount-point "/")
		 (type "ext4"))
    %base-file-systems))

And then try to reconfigure.

April 6, 2019 7:35 PM, "Luther Thompson" <lutheroto@gmail.com> wrote:

> `sudo guix system reconfigure config.scm` fails on Guix commit 177bc62.
> I'm attaching my config.scm. Here is my backtrace:
> 
> ---BEGIN---
> /home/luther/config.scm:40:4: warning: 'title' field is deprecated
> Backtrace:
> In gnu/services.scm:
> 778:26 19 (loop #<<service> type: #<service-type account 1f9fa00>…>)
> In srfi/srfi-1.scm:
> 592:29 18 (map1 (#<<service> type: #<service-type guix 27edc80…> …))
> 592:29 17 (map1 (#<<service> type: #<service-type ntp 27ed5a0>…> …))
> 592:17 16 (map1 (#<<service> type: #<service-type dbus 27ed9b0…> …))
> In gnu/services.scm:
> 778:26 15 (loop #<<service> type: #<service-type dbus 27ed9b0> va…>)
> In srfi/srfi-1.scm:
> 592:29 14 (map1 (#<<service> type: #<service-type elogind 27ed…> …))
> 592:17 13 (map1 (#<<service> type: #<service-type polkit 27ed9…> …))
> In gnu/services.scm:
> 778:26 12 (loop #<<service> type: #<service-type polkit 27ed960> …>)
> In srfi/srfi-1.scm:
> 592:29 11 (map1 (#<<service> type: #<service-type elogind 27ed…> …))
> 592:29 10 (map1 (#<<service> type: #<service-type colord 27ed0…> …))
> 592:29 9 (map1 (#<<service> type: #<service-type cups-pk-help…> …))
> 592:29 8 (map1 (#<<service> type: #<service-type accountsserv…> …))
> 592:29 7 (map1 (#<<service> type: #<service-type udisks 27ed0…> …))
> 592:29 6 (map1 (#<<service> type: #<service-type network-mana…> …))
> 592:29 5 (map1 (#<<service> type: #<service-type gnome-deskto…> …))
> 592:17 4 (map1 (#<<service> type: #<service-type localed 27ed82…>))
> In gnu/services.scm:
> 778:26 3 (loop #<<service> type: #<service-type localed 27ed820>…>)
> In srfi/srfi-1.scm:
> 592:17 2 (map1 (#<<service> type: #<service-type gdm 27ed730> v…>))
> In gnu/services.scm:
> 787:37 1 (loop #<<service> type: #<service-type gdm 27ed730> val…>)
> In unknown file:
> 0 (car ())
> 
> ERROR: In procedure car:
> In procedure car: Wrong type (expecting pair): ()
> ---END---
> 
> Luther

bug#35175: Cannot reconfigure

[Luther Thompson]

On Sat, 06 Apr 2019 20:44:45 +0000
znavko@disroot.org wrote:

> This is not a bug, but your config is wrong here:
> 
>   (file-systems
>    (cons
>     (file-system (device "my-root")
> 		 (mount-point "/")
> 		 (type "ext4")
> 		 (title 'label))
>     %base-file-systems))
> 
> Delete string  `(title 'label)` and leave like this:
> 
>   (file-systems
>    (cons
>     (file-system (device "my-root")
> 		 (mount-point "/")
> 		 (type "ext4"))
>     %base-file-systems))
> 
> And then try to reconfigure.

I'm still getting the same error. The backtrace says the error happens
"In unknown file", so I suspect the problem is in an eval or macro
somewhere.

Luther

bug#35175: Cannot reconfigure

[znavko]

[-- Attachment #1: Type: text/plain, Size: 1176 bytes --]

I think your guix files are old but your config needs new version.
Have you performed `guix pull && guix package -u` first?
If this line causes the errors too, try this way:
http://lists.gnu.org/archive/html/bug-guix/2018-09/msg00153.html
It helped me: just boot with another (may be the oldest) kernel and make updates with `guix pull && guix package -u`
And then try again. If not, post `guix describe` if it will be renewed.

April 6, 2019 9:26 PM, "Luther Thompson" <lutheroto@gmail.com (mailto:lutheroto@gmail.com)> wrote:
 On Sat, 06 Apr 2019 20:44:45 +0000
znavko@disroot.org (mailto:znavko@disroot.org) wrote:
 This is not a bug, but your config is wrong here:

(file-systems
(cons
(file-system (device "my-root")
(mount-point "/")
(type "ext4")
(title 'label))
%base-file-systems))

Delete string `(title 'label)` and leave like this:

(file-systems
(cons
(file-system (device "my-root")
(mount-point "/")
(type "ext4"))
%base-file-systems))

And then try to reconfigure. 

I'm still getting the same error. The backtrace says the error happens
"In unknown file", so I suspect the problem is in an eval or macro
somewhere.

Luther

[-- Attachment #2: Type: text/html, Size: 1655 bytes --]

bug#35175: Cannot reconfigure

[Luther Thompson]

On Sun, 07 Apr 2019 08:15:53 +0000
znavko@disroot.org wrote:

> I think your guix files are old but your config needs new version.
> Have you performed `guix pull && guix package -u` first?

I run `sudo guix pull` every day that I reconfigure, and it works.

I don't think it makes sense to run `guix package -u` as root, because
reconfiguring takes care of all that. Root should not need any packages
that aren't in the OS configuration.

> It helped me: just boot with another (may be the oldest) kernel and
> make updates with `guix pull && guix package -u` And then try again.

I'm hoping I won't have to use an older system generation or an older
Guix commit, because as long as `sudo guix pull` works, I should be
able to reconfigure as soon as someone fixes this bug (assuming my
backtrace is enough for someone to locate the bug).

> If not, post `guix describe` if it will be renewed.

Current output of `sudo guix describe`:

  guix 32c055f
    repository URL: https://git.savannah.gnu.org/git/guix.git
    branch: master
    commit: 32c055fd32059cbe0ab6f94eb3ef3a8c7e49dc92

So there's been further commits since I first encountered the problem.
Other than that, there's not much info here.

For what it's worth, I'm able to update my user profile without any
issue.

Luther

bug#35175: Cannot reconfigure

[Ludovic Courtès]

Hi Luther,

Luther Thompson <lutheroto@gmail.com> skribis:

> In gnu/services.scm:
>    787:37  1 (loop #<<service> type: #<service-type gdm 27ed730> val…>)
> In unknown file:
>            0 (car ())
>
> ERROR: In procedure car:
> In procedure car: Wrong type (expecting pair): ()

This was a mistake of mine, fixed in
0cf981a6066711f6e830a3f1d40f7c265b0bac94 a couple of days ago.

Could you try to ‘guix pull’ and then reconfigure?

Thanks, and apologies for the breakage!

Ludo’.

bug#35175: Cannot reconfigure

[Luther Thompson]

On Sun, 07 Apr 2019 18:25:58 +0200
Ludovic Courtès <ludo@gnu.org> wrote:

> Hi Luther,
> 
> Luther Thompson <lutheroto@gmail.com> skribis:
> 
> > In gnu/services.scm:
> >    787:37  1 (loop #<<service> type: #<service-type gdm 27ed730>
> > val…>) In unknown file:
> >            0 (car ())
> >
> > ERROR: In procedure car:
> > In procedure car: Wrong type (expecting pair): ()  
> 
> This was a mistake of mine, fixed in
> 0cf981a6066711f6e830a3f1d40f7c265b0bac94 a couple of days ago.
> 
> Could you try to ‘guix pull’ and then reconfigure?

I haven't rebooted yet, but the reconfigure did work. Thank you!

Luther

bug#35175: Cannot reconfigure

[Danny Milosavljevic]

[-- Attachment #1: Type: text/plain, Size: 2401 bytes --]

On Sat, 06 Apr 2019 20:44:45 +0000
znavko@disroot.org wrote:

> This is not a bug, but your config is wrong here:
> 
>   (file-systems
>    (cons
>     (file-system (device "my-root")
> 		 (mount-point "/")
> 		 (type "ext4")
> 		 (title 'label))
>     %base-file-systems))
> 
> Delete string  `(title 'label)` and leave like this:
> 
>   (file-systems
>    (cons
>     (file-system (device "my-root")
> 		 (mount-point "/")
> 		 (type "ext4"))
>     %base-file-systems))

... why?

I use (title 'label) for more than a year and it works fine.

The reason for the error Luther encountered is because something is up with the gdm service.

And that's because of

                      (extend params (compose extensions)))

And I guess the extension/composition mechanism of gdm is broken.

There was a commit

commit 0cf981a6066711f6e830a3f1d40f7c265b0bac94
Author: Ludovic Courtès <ludo@gnu.org>
Date:   Fri Apr 5 17:40:01 2019 +0200

    services: gdm: Properly handle empty extensions lists.

recently.

The change is:

diff --git a/gnu/services/xorg.scm b/gnu/services/xorg.scm
index 26ca0d4f1f..ede8bc7304 100644
--- a/gnu/services/xorg.scm
+++ b/gnu/services/xorg.scm
@@ -879,11 +879,16 @@ the GNOME desktop environment.")
                 ;; For convenience, this service can be extended with an
                 ;; <xorg-configuration> record.  Take the first one that
                 ;; comes.
-                (compose first)
+                (compose (lambda (extensions)
+                           (match extensions
+                             (() #f)
+                             ((config . _) config))))
                 (extend (lambda (config xorg-configuration)
-                          (gdm-configuration
-                           (inherit config)
-                           (xorg-configuration xorg-configuration))))
+                          (if xorg-configuration
+                              (gdm-configuration
+                               (inherit config)
+                               (xorg-configuration xorg-configuration))
+                              config)))
 
                 (default-value (gdm-configuration))
                 (description

@Luther: Could you try with the commit right before that change?

  guix pull --commit=37aaf9a8c7d64ae69c4670a12f481dfc0aac53ae


[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 488 bytes --]

bug#35175: Cannot reconfigure

[Ludovic Courtès]

Danny Milosavljevic <dannym@scratchpost.org> skribis:

> On Sat, 06 Apr 2019 20:44:45 +0000
> znavko@disroot.org wrote:
>
>> This is not a bug, but your config is wrong here:
>> 
>>   (file-systems
>>    (cons
>>     (file-system (device "my-root")
>> 		 (mount-point "/")
>> 		 (type "ext4")
>> 		 (title 'label))
>>     %base-file-systems))
>> 
>> Delete string  `(title 'label)` and leave like this:
>> 
>>   (file-systems
>>    (cons
>>     (file-system (device "my-root")
>> 		 (mount-point "/")
>> 		 (type "ext4"))
>>     %base-file-systems))
>
> ... why?
>
> I use (title 'label) for more than a year and it works fine.

As a side note, ‘title’ has been deprecated for a year or so.  You
should now write:

  (file-system
    (device (file-system-label "my-root"))
    (mount-point "/")
    (type "ext4"))

See <https://gnu.org/s/guix/manual/en/html_node/File-Systems.html>.

Ludo’.

bug#35175: Cannot reconfigure

[Luther Thompson]

On Mon, 8 Apr 2019 12:54:14 +0200
Danny Milosavljevic <dannym@scratchpost.org> wrote:

> The reason for the error Luther encountered is because something is
> up with the gdm service.
> 
> And that's because of
> 
>                       (extend params (compose extensions)))
> 
> And I guess the extension/composition mechanism of gdm is broken.
> 
> There was a commit
> 
> commit 0cf981a6066711f6e830a3f1d40f7c265b0bac94
> Author: Ludovic Courtès <ludo@gnu.org>
> Date:   Fri Apr 5 17:40:01 2019 +0200
> 
>     services: gdm: Properly handle empty extensions lists.
> 
> recently.
> 
> @Luther: Could you try with the commit right before that change?

I think that's the commit that *fixed* the problem. It didn't work for
me until 2 days later, which may be due to the fact that `guix system
reconfigure` actually installs a system from a couple of `guix pull`s
ago. I know that by seeing the Linux versions in GRUB.

Luther