From: ludo@gnu.org (Ludovic Courtès)
To: 31925@debbugs.gnu.org
Subject: bug#31925: 'guix substitutes' sometimes hangs on glibc 2.27
Date: Wed, 04 Jul 2018 09:03:53 +0200 [thread overview]
Message-ID: <874lhffpnq.fsf@gnu.org> (raw)
In-Reply-To: <87bmc4748n.fsf@gnu.org> ("Ludovic \=\?utf-8\?Q\?Court\=C3\=A8s\=22'\?\= \=\?utf-8\?Q\?s\?\= message of "Thu, 21 Jun 2018 13:45:12 +0200")
[-- Attachment #1: Type: text/plain, Size: 684 bytes --]
ludo@gnu.org (Ludovic Courtès) skribis:
> #0 0x00007fbb34bf794d in __GI___pthread_timedjoin_ex (threadid=140441961314048, thread_return=thread_return@entry=0x0, abstime=abstime@entry=0x0, block=block@entry=true)
> at pthread_join_common.c:89
> #1 0x00007fbb34bf773c in __pthread_join (threadid=<optimized out>, thread_return=thread_return@entry=0x0) at pthread_join.c:24
> #2 0x00007fbb350d7548 in stop_finalization_thread () at finalizers.c:265
> #3 0x00007fbb350d7759 in scm_i_finalizer_pre_fork () at finalizers.c:290
> #4 0x00007fbb3514f256 in scm_fork () at posix.c:1222
Here’s a reproducer that works quite well (it hangs within a couple of
minutes):
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: the code --]
[-- Type: text/x-scheme, Size: 915 bytes --]
(use-modules (guix utils)
(ice-9 ftw)
(ice-9 match)
(srfi srfi-1)
(srfi srfi-26)
(rnrs io ports))
(define infodir
(string-append (getenv "HOME")
"/.guix-profile/share/info/"))
(define files
(apply circular-list
(map (cut string-append infodir <>)
(scandir infodir (lambda (file)
(string-suffix? ".gz" file))))))
(sigaction SIGALRM
(lambda _
(alarm 1)))
(alarm 1)
(let loop ((files files)
(n 0))
(match files
((file . tail)
(call-with-input-file file
(lambda (port)
(call-with-decompressed-port 'gzip port
(lambda (port)
(let loop ()
(unless (eof-object? (get-bytevector-n port 777))
(loop)))))))
;; (pk 'loop n file)
(display ".")
(loop tail (+ n 1)))))
[-- Attachment #3: Type: text/plain, Size: 12 bytes --]
Ludo’.
next prev parent reply other threads:[~2018-07-04 7:05 UTC|newest]
Thread overview: 12+ messages / expand[flat|nested] mbox.gz Atom feed top
2018-06-21 11:45 bug#31925: 'guix substitutes' sometimes hangs on glibc 2.27 Ludovic Courtès
2018-06-21 14:10 ` Ricardo Wurmus
2018-07-04 7:03 ` Ludovic Courtès [this message]
2018-07-04 16:58 ` Ludovic Courtès
2018-07-05 3:33 ` Mark H Weaver
2018-07-05 8:00 ` Andy Wingo
2018-07-05 10:05 ` Mark H Weaver
2018-07-05 14:04 ` Andy Wingo
2018-07-05 12:27 ` Ludovic Courtès
2018-07-05 14:08 ` Andy Wingo
2018-07-06 15:35 ` Ludovic Courtès
2018-07-05 8:34 ` Ludovic Courtès
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=874lhffpnq.fsf@gnu.org \
--to=ludo@gnu.org \
--cc=31925@debbugs.gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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.