opendir* missing

opendir* missing

[Ricardo Wurmus]

Hi,

since commit fa73c1937364872560c509f02b3d7648a5bed006 and/or
d27cc3bfaafe6b5b0831e88afb1c46311d382a0b I cannot use “guix build” or
“guix package” any more.

They both fail to find “opendir*” and exit without a backtrace.  Running
“make clean-go && make” did not help.

--
Ricardo

GPG: BCA6 89B6 3655 3801 C3C6  2150 197A 5888 235F ACAC
https://elephly.net

Re: opendir* missing

[Marius Bakke]

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

Ricardo Wurmus <rekado@elephly.net> writes:

> Hi,
>
> since commit fa73c1937364872560c509f02b3d7648a5bed006 and/or
> d27cc3bfaafe6b5b0831e88afb1c46311d382a0b I cannot use “guix build” or
> “guix package” any more.
>
> They both fail to find “opendir*” and exit without a backtrace.  Running
> “make clean-go && make” did not help.

--8<---------------cut here---------------start------------->8---
$ guix refresh -l libbluray
Backtrace:                                                             
          10 (primitive-load "/gnu/store/js4ml3w20ysh4znp9wl0da0ljji…")
In guix/ui.scm:                      
  1324:12  9 (run-guix-command _ . _)
In guix/scripts/refresh.scm:   
    358:7  8 (guix-refresh . _)
In unknown file:
           7 (force #<promise #<procedure 7ff2824c81d0 at guix/scrip…>)
In guix/scripts/refresh.scm:
   179:39  6 (_)
    168:8  5 (importer-modules)
In srfi/srfi-1.scm:
   466:18  4 (fold #<procedure 330cc00 at guix/discovery.scm:102:8 …> …)
In guix/discovery.scm:
   108:19  3 (_ _ (#<interface (guix import utils) 3344640> #<int…> …))
    95:14  2 (scheme-modules _ _)
    70:14  1 (scheme-files "/gnu/store/l2paa4ka8lglar0b778qzl7a6h2v5…")
In guix/build/syscalls.scm:
   929:19  0 (scandir* "/gnu/store/l2paa4ka8lglar0b778qzl7a6h2v5dzn…" …)

guix/build/syscalls.scm:929:19: In procedure scandir*:
guix/build/syscalls.scm:929:19: In procedure opendir*: opendir*: No such file or directory
--8<---------------cut here---------------end--------------->8---

opendir* is defined as:


[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 487 bytes --]

Re: opendir* missing

[Marius Bakke]

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

Marius Bakke <mbakke@fastmail.com> writes:

> opendir* is defined as:

Oops, fat fingers. guix/build/syscalls.scm:866:

--8<---------------cut here---------------start------------->8---
(define opendir*
  (let ((proc (syscall->procedure '* "opendir" '(*))))
    (lambda* (name #:optional (string->pointer string->pointer/utf-8))
      (let-values (((ptr err)
                    (proc (string->pointer name))))
        (if (null-pointer? ptr)
            (throw 'system-error "opendir*"
                   "opendir*: ~A"
                   (list (strerror err))
                   (list err))
            ptr)))))
--8<---------------cut here---------------end--------------->8---

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 487 bytes --]

Re: opendir* missing

[Ricardo Wurmus]

Marius Bakke <mbakke@fastmail.com> writes:

> Marius Bakke <mbakke@fastmail.com> writes:
>
>> opendir* is defined as:
>
> Oops, fat fingers. guix/build/syscalls.scm:866:
>
> --8<---------------cut here---------------start------------->8---
> (define opendir*
>   (let ((proc (syscall->procedure '* "opendir" '(*))))
>     (lambda* (name #:optional (string->pointer string->pointer/utf-8))
>       (let-values (((ptr err)
>                     (proc (string->pointer name))))
>         (if (null-pointer? ptr)
>             (throw 'system-error "opendir*"
>                    "opendir*: ~A"
>                    (list (strerror err))
>                    (list err))
>             ptr)))))
> --8<---------------cut here---------------end--------------->8---

Well, I suppose the error actually means that whatever directory is
supposed to be opened does not exist.  It would be great if the error
included the directory it tried to open.

-- 
Ricardo

GPG: BCA6 89B6 3655 3801 C3C6  2150 197A 5888 235F ACAC
https://elephly.net

Re: opendir* missing

[Ricardo Wurmus]

I cannot reproduce this on my GuixSD machine; I see the error only on my
workstation with Guix on top of Fedora.

-- 
Ricardo

GPG: BCA6 89B6 3655 3801 C3C6  2150 197A 5888 235F ACAC
https://elephly.net

Re: opendir* missing

[Ludovic Courtès]

Heya,

Marius Bakke <mbakke@fastmail.com> skribis:

> Ricardo Wurmus <rekado@elephly.net> writes:
>
>> Hi,
>>
>> since commit fa73c1937364872560c509f02b3d7648a5bed006 and/or
>> d27cc3bfaafe6b5b0831e88afb1c46311d382a0b I cannot use “guix build” or
>> “guix package” any more.
>>
>> They both fail to find “opendir*” and exit without a backtrace.  Running
>> “make clean-go && make” did not help.
>
> $ guix refresh -l libbluray
> Backtrace:                                                             
>           10 (primitive-load "/gnu/store/js4ml3w20ysh4znp9wl0da0ljji…")
> In guix/ui.scm:                      
>   1324:12  9 (run-guix-command _ . _)
> In guix/scripts/refresh.scm:   
>     358:7  8 (guix-refresh . _)
> In unknown file:
>            7 (force #<promise #<procedure 7ff2824c81d0 at guix/scrip…>)
> In guix/scripts/refresh.scm:
>    179:39  6 (_)
>     168:8  5 (importer-modules)
> In srfi/srfi-1.scm:
>    466:18  4 (fold #<procedure 330cc00 at guix/discovery.scm:102:8 …> …)
> In guix/discovery.scm:
>    108:19  3 (_ _ (#<interface (guix import utils) 3344640> #<int…> …))
>     95:14  2 (scheme-modules _ _)
>     70:14  1 (scheme-files "/gnu/store/l2paa4ka8lglar0b778qzl7a6h2v5…")
> In guix/build/syscalls.scm:
>    929:19  0 (scandir* "/gnu/store/l2paa4ka8lglar0b778qzl7a6h2v5dzn…" …)
>
> guix/build/syscalls.scm:929:19: In procedure scandir*:
> guix/build/syscalls.scm:929:19: In procedure opendir*: opendir*: No such file or directory

Oops, my bad.  Fixed in commit d46c4423f46278bd2f96770ceb0667431414349e.
(For me ‘guix package’ and ‘guix build’ worked fine, but that depends on
‘GUIX_PACKAGE_PATH’; ‘guix refresh’ was failing as show above.)

Thanks for reporting it!

Ludo’.