GNU logs - #33238, boring messages

Message sent to bug-guix@HIDDEN:

Subject: bug#33238: Fail nicely when profile is not found
Resent-From: swedebugia <swedebugia@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-guix@HIDDEN
Resent-Date: Fri, 02 Nov 2018 07:56:02 +0000
Resent-Message-ID: <handler.33238.B.154114530219613 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
To: 33238 <at> debbugs.gnu.org
From: swedebugia <swedebugia@HIDDEN>
Message-ID: <3c9c7b9e-90ce-a70e-2850-b4e32d719f04@HIDDEN>
Date: Fri, 2 Nov 2018 09:00:17 +0100
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Language: sv-FI
Content-Transfer-Encoding: quoted-printable
Precedence: list
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>

Hi

I installed guix from AUR and ran into this:

$ guix pull -l
Backtrace:
 =C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0 8 (apply-sm=
ob/1 #<catch-closure 55dd9a29b6e0>)
In ice-9/boot-9.scm:
 =C2=A0=C2=A0=C2=A0 705:2=C2=A0 7 (call-with-prompt _ _ #<procedure defau=
lt-prompt-handle=E2=80=A6>)
In ice-9/eval.scm:
 =C2=A0=C2=A0=C2=A0 619:8=C2=A0 6 (_ #(#(#<directory (guile-user) 55dd9a3=
56140>)))
In guix/ui.scm:
 =C2=A0 1578:12=C2=A0 5 (run-guix-command _ . _)
In ice-9/boot-9.scm:
 =C2=A0=C2=A0=C2=A0 829:9=C2=A0 4 (catch srfi-34 #<procedure 55dd9b57f7e0=
 at guix/ui.scm=E2=80=A6> =E2=80=A6)
 =C2=A0=C2=A0=C2=A0 829:9=C2=A0 3 (catch system-error #<procedure 55dd9b5=
7f880 at guix/s=E2=80=A6> =E2=80=A6)
 =C2=A0=C2=A0=C2=A0 829:9=C2=A0 2 (catch git-error #<procedure 55dd9b57f6=
40 at guix/scri=E2=80=A6> =E2=80=A6)
 =C2=A0=C2=A0=C2=A0 829:9=C2=A0 1 (catch system-error #<procedure 55dd9ac=
ab900 at guix/s=E2=80=A6> =E2=80=A6)
In unknown file:
 =C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0 0 (raise #<=
condition &profile-not-found-error [profile: "=E2=80=A6>)

ERROR: In procedure raise:
Wrong type (expecting exact integer): #<condition=20
&profile-not-found-error [profile: "/home/egil/.config/guix/current"]=20
55dd9ac9a240>

The install went fine but guix is not working :/ so I will do a manual=20
binary install instead.

I could try crafting a patch testing if the directory exist if somebody=20
is willing to point me to the right file (and perhaps an example of a=20
procedure that can check this)

Cheers
Swedebugia

$ guix --version
guix (GNU Guix) 0.15.0
Copyright (C) 2018 the Guix authors
License GPLv3+: GNU GPL version 3 or later=20
<http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.

Message sent:

Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
MIME-Version: 1.0
X-Mailer: MIME-tools 5.505 (Entity 5.505)
Content-Type: text/plain; charset=utf-8
X-Loop: help-debbugs@HIDDEN
From: help-debbugs@HIDDEN (GNU bug Tracking System)
To: swedebugia <swedebugia@HIDDEN>
Subject: bug#33238: Acknowledgement (Fail nicely when profile is not found)
Message-ID: <handler.33238.B.154114530219613.ack <at> debbugs.gnu.org>
References: <3c9c7b9e-90ce-a70e-2850-b4e32d719f04@HIDDEN>
X-Gnu-PR-Message: ack 33238
X-Gnu-PR-Package: guix
Reply-To: 33238 <at> debbugs.gnu.org
Date: Fri, 02 Nov 2018 07:56:02 +0000

Thank you for filing a new bug report with debbugs.gnu.org.

This is an automatically generated reply to let you know your message
has been received.

Your message is being forwarded to the package maintainers and other
interested parties for their attention; they will reply in due course.

Your message has been sent to the package maintainer(s):
 bug-guix@HIDDEN

If you wish to submit further information on this problem, please
send it to 33238 <at> debbugs.gnu.org.

Please do not send mail to help-debbugs@HIDDEN unless you wish
to report a problem with the Bug-tracking system.

--=20
33238: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D33238
GNU Bug Tracking System
Contact help-debbugs@HIDDEN with problems

Message sent to bug-guix@HIDDEN:

Subject: bug#33238: Fail nicely when profile is not found
Resent-From: swedebugia@HIDDEN
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-guix@HIDDEN
Resent-Date: Mon, 17 Dec 2018 11:05:02 +0000
Resent-Message-ID: <handler.33238.B33238.154504465025253 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
To: 33238 <at> debbugs.gnu.org
Cc: bug-Guix <bug-guix-bounces+swedebugia=riseup.net@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Date: Mon, 17 Dec 2018 03:04:04 -0800
From: swedebugia@HIDDEN
In-Reply-To: <3c9c7b9e-90ce-a70e-2850-b4e32d719f04@HIDDEN>
References: <3c9c7b9e-90ce-a70e-2850-b4e32d719f04@HIDDEN>
Message-ID: <8eb75951106df8ab37ad625d05dfc365@HIDDEN>
Precedence: list
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>

On 2018-11-02 09:00, swedebugia wrote:
> Hi
> 
> I installed guix from AUR and ran into this:
> 
> $ guix pull -l
> Backtrace:
>            8 (apply-smob/1 #<catch-closure 55dd9a29b6e0>)
> In ice-9/boot-9.scm:
>     705:2  7 (call-with-prompt _ _ #<procedure default-prompt-handle…>)
> In ice-9/eval.scm:
>     619:8  6 (_ #(#(#<directory (guile-user) 55dd9a356140>)))
> In guix/ui.scm:
>   1578:12  5 (run-guix-command _ . _)
> In ice-9/boot-9.scm:
>     829:9  4 (catch srfi-34 #<procedure 55dd9b57f7e0 at guix/ui.scm…> …)
>     829:9  3 (catch system-error #<procedure 55dd9b57f880 at guix/s…> …)
>     829:9  2 (catch git-error #<procedure 55dd9b57f640 at guix/scri…> …)
>     829:9  1 (catch system-error #<procedure 55dd9acab900 at guix/s…> …)
> In unknown file:
>            0 (raise #<condition &profile-not-found-error [profile: "…>)
> 
> ERROR: In procedure raise:
> Wrong type (expecting exact integer): #<condition
> &profile-not-found-error [profile: "/home/egil/.config/guix/current"]
> 55dd9ac9a240>
> 
> The install went fine but guix is not working :/ so I will do a manual
> binary install instead.
> 
> I could try crafting a patch testing if the directory exist if
> somebody is willing to point me to the right file (and perhaps an
> example of a procedure that can check this)
> 
> Cheers
> Swedebugia
> 
> $ guix --version
> guix (GNU Guix) 0.15.0
> Copyright (C) 2018 the Guix authors
> License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
> This is free software: you are free to change and redistribute it.
> There is NO WARRANTY, to the extent permitted by law.

This is still present:

sdb@antelope ~/src/guix$ ./pre-inst-env guix describe
Git checkout:
  repository: /home/sdb/src/guix
  branch: HEAD
  commit: c4cc1b9d20212369d485a7b3788160117926ea3b


sdb@antelope ~/src/guix$ ./pre-inst-env guix pull -l
Backtrace:
           8 (apply-smob/1 #<catch-closure 9e6d4c0>)
In ice-9/boot-9.scm:
    705:2  7 (call-with-prompt _ _ #<procedure default-prompt-handle…>)
In ice-9/eval.scm:
    619:8  6 (_ #(#(#<directory (guile-user) 9e5e910>)))
In guix/ui.scm:
  1603:12  5 (run-guix-command _ . _)
In ice-9/boot-9.scm:
    829:9  4 (catch srfi-34 #<procedure aa39860 at guix/ui.scm:615:…> …)
    829:9  3 (catch system-error #<procedure aa398b0 at guix/script…> …)
    829:9  2 (catch git-error #<procedure aa39810 at guix/scripts/p…> …)
    829:9  1 (catch system-error #<procedure aa39030 at guix/script…> …)
In unknown file:
           0 (raise #<condition &profile-not-found-error [profile: "…>)

ERROR: In procedure raise:
Wrong type (expecting exact integer): #<condition
&profile-not-found-error [profile:
"/var/guix/profiles/per-user/sdb/current-guix"] aa10550>

The relevant code from pull.scm is this:
(define (process-query opts profile)
  "Process any query on PROFILE specified by OPTS."
  (match (assoc-ref opts 'query)
    (('list-generations pattern)
     (define (list-generations profile numbers)
       (match numbers
         ((first rest ...)
          (display-profile-content profile first)
          (let loop ((numbers numbers))
            (match numbers
              ((first second rest ...)
               (display-profile-content-diff profile
                                             first second)
               (loop (cons second rest)))
              ((_) #t)
              (()  #t))))))

     (leave-on-EPIPE
      (cond ((not (file-exists? profile))         ; XXX: race condition 
                                                                        
                                       
             (raise (condition (&profile-not-found-error
                                (profile profile)))))
            ((string-null? pattern)
             (list-generations profile (profile-generations profile)))
            ((matching-generations pattern profile)
             =>
             (match-lambda
               (()
                (exit 1))
               ((numbers ...)
                (list-generations profile numbers)))))))))

-- 
Cheers 
Swedebugia

Last modified: Mon, 25 Nov 2019 12:00:02 UTC

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