GNU bug report logs - #31926
reconfigure is broken

Previous Next

Full log

View this message in rfc822 format

From: help-debbugs <at> gnu.org (GNU bug Tracking System)
To: Clément Lassieur <clement <at> lassieur.org>
Subject: bug#31926: closed (Re: bug#31926: reconfigure is broken)
Date: Thu, 21 Jun 2018 14:57:02 +0000

[Message part 1 (text/plain, inline)]

Your bug report

#31926: reconfigure is broken

which was filed against the guix package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to 31926 <at> debbugs.gnu.org.

-- 
31926: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=31926
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems

[Message part 2 (message/rfc822, inline)]

From: Ricardo Wurmus <ricardo.wurmus <at> mdc-berlin.de>
To: Clément Lassieur <clement <at> lassieur.org>
Cc: ludo <at> gnu.org, 31926-done <at> debbugs.gnu.org
Subject: Re: bug#31926: reconfigure is broken
Date: Thu, 21 Jun 2018 16:56:14 +0200

Ricardo Wurmus <ricardo.wurmus <at> mdc-berlin.de> writes:

> Ricardo Wurmus <ricardo.wurmus <at> mdc-berlin.de> writes:
>
>> Clément Lassieur <clement <at> lassieur.org> writes:
>>
>>> I'm on commit 1a5b0dfe06ff3b97b6394232f143b95c616890b3, I can't
>>> reconfigure anymore.
>>
>> I can reproduce this.  Building the system with “guix system build
>> config.scm” works fine, but “reconfigure” produces an error that
>> closely resembles yours.
>>
>> I also ran “make clean-go && make”, but there’s no difference.
>
> Looks like commit 378daa8cb677121e1893f9173af1db060720d6e4 is
> responsible.

Fixed with commit 945449b40.

-- 
Ricardo

[Message part 3 (message/rfc822, inline)]

From: Clément Lassieur <clement <at> lassieur.org>
To: bug-guix <at> gnu.org
Subject: reconfigure is broken
Date: Thu, 21 Jun 2018 14:37:19 +0200

I'm on commit 1a5b0dfe06ff3b97b6394232f143b95c616890b3, I can't
reconfigure anymore.

--8<---------------cut here---------------start------------->8---
guix system: warning: Consider running 'guix pull' followed by
'guix system reconfigure' to get up-to-date packages and security updates.

guix system: warning: /home/clement/.config/guix/current not found: 'guix pull' was never run
guix system: warning: Consider running 'guix pull' before 'reconfigure'.
guix system: warning: Failing to do that may downgrade your system!
/gnu/store/dr4risay18kxb07z8nq3xngr42jf1nh2-system
/gnu/store/wjqf90rcp0rizycslnsynim9bkx3z5cj-grub.cfg
/gnu/store/26m7zjprd11qrhsqxml6882r516ikyzx-grub-2.02
/gnu/store/1mjx721h83hixvsw6lmhg074cmbi6nmy-bootloader-installer
Backtrace:
          11 (apply-smob/1 #<catch-closure c94120>)
In ice-9/boot-9.scm:
    705:2 10 (call-with-prompt _ _ #<procedure default-prompt-handle…>)
In ice-9/eval.scm:
    619:8  9 (_ #(#(#<directory (guile-user) d4c140>)))
In guix/ui.scm:
  1557:12  8 (run-guix-command _ . _)
In ice-9/boot-9.scm:
    829:9  7 (catch _ _ #<procedure 7f3c7c96e980 at guix/ui.scm:593…> …)
    829:9  6 (catch _ _ #<procedure 7f3c7c96e998 at guix/ui.scm:711…> …)
In guix/scripts/system.scm:
   1240:8  5 (_)
   1110:6  4 (process-action _ _ _)
In guix/store.scm:
  1414:24  3 (run-with-store _ _ #:guile-for-build _ #:system _ # _)
In guix/scripts/system.scm:
   873:13  2 (_ _)
    355:2  1 (_ _)
In unknown file:
           0 (_ #<build-daemon 256.97 3864f00>)

ERROR: Wrong type to apply: #<<scheme-file> name: "activate" gexp: #<gexp (begin (use-modules (gnu build activation) (guix build utils)) (close-port (open-file "/var/run/utmpx" "a0")) (mkdir-p "/var/log") (close-port (open-file "/var/log/wtmp" "a0")) (activate-current-system) (for-each primitive-load (quote #<gexp-input (#<<scheme-file> name: "activate-service" gexp: #<gexp (activate-firmware (string-append #<gexp-input #<<computed-file> name: "firmware" gexp: #<gexp (begin (use-modules (guix build union) (srfi srfi-1)) (union-build #<gexp-output out> (quote #<gexp-input (#<package ath9k-htc-firmware <at> 1.4.0 gnu/packages/firmware.scm:43 1e45a80> #<package openfwwf-firmware <at> 5.2 gnu/packages/firmware.scm:156 1e45900>):out>) #:log-port #<gexp-input #<gexp (current-error-port) 4563630>:out> #:symlink #<gexp-input #<gexp symlink 4563660>:out> #:resolve-collision #<gexp-input warn-about-collision:out>)) 4563540> guile: #f options: (#:local-build? #t)>:out> "/lib/firmware")) 45634b0> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp (begin (activate-modprobe #<gexp-input #<<program-file> name: "modprobe" gexp: #<gexp (begin (setenv "LINUX_MODULE_DIRECTORY" "/run/booted-system/kernel/lib/modules") (apply execl #<gexp-input "/run/current-system/profile/bin/modprobe":out> (cons #<gexp-input "/run/current-system/profile/bin/modprobe":out> (cdr (command-line))))) 1304a20> guile: #f path: ("/home/clement/.packages" "/home/clement/.guix" "/home/clement/.guix" "/home/clement/.guix-profile/share/guile/site/2.2" "/run/current-system/profile/share/guile/site/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/site/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/site" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile")>:out>) (activate-ptrace-attach)) 1304990> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp  4563450> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp (activate-etc #<gexp-input #<<computed-file> name: "etc" gexp: #<gexp  45747e0> guile: #f options: (#:local-build? #t)>:out>) 4574750> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp  45c02d0> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp (activate-special-files (quote #<gexp-input (("/bin/sh" #<<file-append> base: #<package bash <at> 4.4.19 gnu/packages/bash.scm:119 2227300> suffix: ("/bin/sh")>)):out>)) 45c0240> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp  45d5db0> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp (begin (use-modules (guix build utils)) (define (touch file-name) (call-with-output-file file-name (const #t))) (mkdir-p "/etc/ssh") (chmod "/etc/ssh" 493) (mkdir-p (dirname #<gexp-input "/var/run/sshd.pid":out>)) (catch (quote system-error) (lambda () (delete-file-recursively "/etc/authorized_keys.d")) (lambda args (unless (= ENOENT (system-error-errno args)) (apply throw args)))) (copy-recursively #<gexp-input #<<computed-file> name: "openssh-authorized-keys" gexp: #<gexp (begin (use-modules (ice-9 match) (srfi srfi-26) (guix build utils)) (mkdir #<gexp-output out>) (for-each (match-lambda ((user keys ...) (let ((file (string-append #<gexp-output out> "/" user))) (call-with-output-file file (lambda (port) (for-each (lambda (key) (call-with-input-file key (cut dump-port <> port))) keys)))))) (quote #<gexp-input (("clement" #<<plain-file> name: "clement" content: "ssh-rsa AAAAB3NzaC1yc2EAAAADAQABAAABAQC4yLOWrukPll9QbgSEeN8+E6cyr/TaPb7U1vcq0rU5zoOs2p38tqEUac5U/dyHgDW03iV+LLAq7CZX0IrJlQ8QZ4zPORpMQE3KcJOopKHtFUK7gCyA90a/8bZNm0riumGmbypimTbOTZkFqczMYlPaVTiVfwREbGgVNRgkf5B50M4VEgDXGDpmG0puex+cF+/W4S+3YJh07mGUOwhx2qSefJ2rNvMTQrP01kZpYquaB9nIS1k4zN1ftJH3Y/OIAQIbV1VaonVCv9Oxriy0PStxvCWkf2HhXhpoV/R2qCIstkb9YCZ4k5a2eANEsdw+iQware2N6GQjVX3a4bIRBHCf clement <at> rodion\nssh-rsa AAAAB3NzaC1yc2EAAAADAQABAAABAQCXBYINeXwJR3g4s0dr/AjqylUE2lSOdYt499ZxNcQmZlGtpnvB9CRojL2w/XOH+pvVpg0F2lG2HphPfeJRSjIrfXj34BDl6Ql4X4TD+n41EvUd1QfY/MZtkHiYp/BhyPHOixT4VZo4lM/NagSUU/JFHA9D5sEXeLrbQwB0972Fj0x+183mkdaiFTlkMrrMJ9/zj+hnSTGLmSpoxhS6ZR+DBaRWrcG2DPk9ISAn7BV54UQLFA9Gh8ksuUQFQGMc+AaC+NKs7OdT55WP2E4JHewe0cQtsa6jVCnMsNL1kB1w7bpn07LB5t/ydeClGlRRZXWgV4qnOYF2/m+gCust2Iwv clement <at> newt\n" references: ()>)):out>))) 45d5c90> guile: #f options: (#:local-build? #t)>:out> "/etc/ssh/authorized_keys.d") (chmod "/etc/ssh/authorized_keys.d" 365) (let ((lastlog "/var/log/lastlog")) (when #<gexp-input #t:out> (unless (file-exists? lastlog) (touch lastlog)))) (system* (string-append #<gexp-input #<package openssh <at> 7.7p1 gnu/packages/ssh.scm:149 18d5240>:out> "/bin/ssh-keygen") "-A")) 45d5ba0> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp (activate-special-files (quote #<gexp-input (("/bin/sh" #<<file-append> base: #<package bash <at> 4.4.19 gnu/packages/bash.scm:119 2227300> suffix: ("/bin/sh")>) ("/bin/bash" #<<file-append> base: #<package bash <at> 4.4.19 gnu/packages/bash.scm:119 2227300> suffix: ("/bin/bash")>) ("/usr/bin/perl" #<<file-append> base: #<package perl <at> 5.26.1 gnu/packages/perl.scm:63 226fcc0> suffix: ("/bin/perl")>) ("/usr/bin/env" #<<file-append> base: #<package coreutils <at> 8.29 gnu/packages/base.scm:327 224fd80> suffix: ("/bin/env")>)):out>)) 45d5b40> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp (begin (use-modules (guix build utils)) (define %user (getpw "ntpd")) (let ((directory "/var/run/ntpd")) (mkdir-p directory) (chown directory (passwd:uid %user) (passwd:gid %user)))) 45d5b10> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #<gexp (begin (use-modules (guix build utils)) (mkdir-p #<gexp-input "/var/cache/cuirass":out>) (mkdir-p #<gexp-input "/var/run/cuirass":out>) (let ((uid (passwd:uid (getpw #<gexp-input "cuirass":out>))) (gid (group:gid (getgr #<gexp-input "cuirass":out>)))) (chown #<gexp-input "/var/cache/cuirass":out> uid gid) (chown #<gexp-input "/var/run/cuirass":out> uid gid))) 45d59f0> splice?: #f> #<<scheme-file> name: "activate-service" gexp: #t splice?: #f>):out>))) 45d5360> splice?: #f>
--8<---------------cut here---------------end--------------->8---

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.