guile-bootstrap@2.2 segfault?

Efraim Flashner wrote on 11 Feb 2019 10:11

Recipients:(address . bug-guix@gnu.org)

Message-ID:20190211091136.GA3284@macbook41

I'm testing %bootstrap-guile from bootstrap.scm and I'm getting asegfault when runing guile --version. I've attached an strace of theprocess.

-- Efraim Flashner <efraim@flashner.co.il> אפרים פלשנרGPG key = A28B F40C 3E55 1372 662D 14F7 41AA E7DC CA3D 8351Confidentiality cannot be guaranteed on emails sent or received unencrypted

16301 execve("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/bin/guile", ["/gnu/store/m7xa9rd869yrd88x6x7ri"..., "--version"], 0xbf8fd040 /* 27 vars */) = 016301 brk(NULL)                         = 0x106cc00016301 brk(0x106ccd4c)                   = 0x106ccd4c16301 uname({sysname="Linux", nodename="g4", ...}) = 016301 set_tid_address(0x106cc068)       = 1630116301 set_robust_list(0x106cc070, 12)   = 016301 rt_sigaction(SIGRTMIN, {sa_handler=0x100f0748, sa_mask=[], sa_flags=SA_SIGINFO}, NULL, 8) = 016301 rt_sigaction(SIGRT_1, {sa_handler=0x100f0828, sa_mask=[], sa_flags=SA_RESTART|SA_SIGINFO}, NULL, 8) = 016301 rt_sigprocmask(SIG_UNBLOCK, [RTMIN RT_1], NULL, 8) = 016301 ugetrlimit(RLIMIT_STACK, {rlim_cur=8192*1024, rlim_max=RLIM_INFINITY}) = 016301 readlink("/proc/self/exe", "/gnu/store/m7xa9rd869yrd88x6x7ri"..., 4096) = 7316301 brk(0x106edd4c)                   = 0x106edd4c16301 brk(0x106ee000)                   = 0x106ee00016301 openat(AT_FDCWD, "/run/current-system/locale/2.28/locale-archive", O_RDONLY|O_LARGEFILE|O_CLOEXEC) = -1 ENOENT (No such file or directory)16301 openat(AT_FDCWD, "/gnu/store/eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee-glibc-cross-powerpc-linux-gnu-2.28/share/locale/locale.alias", O_RDONLY|O_CLOEXEC) = -1 ENOENT (No such file or directory)16301 openat(AT_FDCWD, "/run/current-system/locale/2.28/en_IL/LC_IDENTIFICATION", O_RDONLY|O_CLOEXEC) = -1 ENOENT (No such file or directory)16301 openat(AT_FDCWD, "/run/current-system/locale/2.28/en/LC_IDENTIFICATION", O_RDONLY|O_CLOEXEC) = -1 ENOENT (No such file or directory)16301 write(2, "guile: warning: failed to instal"..., 41) = 4116301 futex(0x1036dd44, FUTEX_WAKE_PRIVATE, 2147483647) = 016301 openat(AT_FDCWD, "/proc/self/maps", O_RDONLY|O_CLOEXEC) = 316301 ugetrlimit(RLIMIT_STACK, {rlim_cur=8192*1024, rlim_max=RLIM_INFINITY}) = 016301 fstat64(3, {st_mode=S_IFREG|0444, st_size=0, ...}) = 016301 read(3, "00100000-00103000 r-xp 00000000 "..., 1024) = 45616301 close(3)                          = 016301 sched_getaffinity(16301, 32, [0]) = 416301 brk(0x106fe000)                   = 0x106fe00016301 brk(0x1070e000)                   = 0x1070e00016301 brk(0x1071e000)                   = 0x1071e00016301 brk(0x1072e000)                   = 0x1072e00016301 brk(0x1073e000)                   = 0x1073e00016301 rt_sigaction(SIGPWR, {sa_handler=0x100e1514, sa_mask=~[INT QUIT ABRT TERM RTMIN RT_1], sa_flags=SA_RESTART|SA_SIGINFO}, NULL, 8) = 016301 rt_sigaction(SIGXCPU, {sa_handler=0x100e1200, sa_mask=~[INT QUIT ABRT TERM RTMIN RT_1], sa_flags=SA_RESTART}, NULL, 8) = 016301 rt_sigprocmask(SIG_UNBLOCK, [XCPU PWR], NULL, 8) = 016301 openat(AT_FDCWD, "/proc/stat", O_RDONLY) = 316301 read(3, "cpu  79046 1474 32444 6400729 91"..., 4096) = 130816301 close(3)                          = 016301 swapcontext(0xbfd68968, 0)        = 016301 brk(0x107be000)                   = 0x107be00016301 pipe2([3, 4], O_CLOEXEC)          = 016301 futex(0x1036dc98, FUTEX_WAKE_PRIVATE, 2147483647) = 016301 clock_gettime(CLOCK_REALTIME, {tv_sec=1549875824, tv_nsec=168848026}) = 016301 clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {tv_sec=0, tv_nsec=7758656}) = 016301 openat(AT_FDCWD, "/gnu/store/eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee-glibc-cross-powerpc-linux-gnu-2.28/lib/gconv/gconv-modules.cache", O_RDONLY) = -1 ENOENT (No such file or directory)16301 openat(AT_FDCWD, "/gnu/store/eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee-glibc-cross-powerpc-linux-gnu-2.28/lib/gconv/gconv-modules", O_RDONLY|O_CLOEXEC) = -1 ENOENT (No such file or directory)16301 futex(0x10380884, FUTEX_WAKE_PRIVATE, 2147483647) = 016301 openat(AT_FDCWD, "/dev/urandom", O_RDONLY|O_LARGEFILE) = 516301 fstat64(5, {st_mode=S_IFCHR|0666, st_rdev=makedev(0x1, 0x9), ...}) = 016301 ioctl(5, TCGETS, 0xbfd68ec8)      = -1 EINVAL (Invalid argument)16301 read(5, "U\254.\237\4u\321\354\272\36e\316\7%\262\230\31A\2373\372p\313V7Le\325s\32\351\225"..., 4096) = 409616301 close(5)                          = 016301 brk(0x107ce000)                   = 0x107ce00016301 ioctl(0, TCGETS, {B38400 opost isig icanon echo ...}) = 016301 mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7b6e00016301 fcntl64(0, F_GETFL)               = 0x2 (flags O_RDWR)16301 _llseek(0, 0, 0xbfd68a38, SEEK_CUR) = -1 ESPIPE (Illegal seek)16301 ioctl(1, TCGETS, {B38400 opost isig icanon echo ...}) = 016301 fcntl64(1, F_GETFL)               = 0x2 (flags O_RDWR)16301 _llseek(1, 0, 0xbfd68a38, SEEK_CUR) = -1 ESPIPE (Illegal seek)16301 ioctl(2, TCGETS, {B38400 opost isig icanon echo ...}) = 016301 fcntl64(2, F_GETFL)               = 0x2 (flags O_RDWR)16301 _llseek(2, 0, 0xbfd68a38, SEEK_CUR) = -1 ESPIPE (Illegal seek)16301 readlink("/proc/self/exe", "/gnu/store/m7xa9rd869yrd88x6x7ri"..., 256) = 7316301 lstat64("/gnu", {st_mode=S_IFDIR|0755, st_size=4096, ...}) = 016301 lstat64("/gnu/store", {st_mode=S_IFDIR|S_ISVTX|0775, st_size=73728, ...}) = 016301 lstat64("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0", {st_mode=S_IFDIR|0555, st_size=4096, ...}) = 016301 lstat64("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/bin", {st_mode=S_IFDIR|0555, st_size=4096, ...}) = 016301 stat64("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/share/guile/2.2/ice-9/eval.scm", {st_mode=S_IFREG|0444, st_size=25718, ...}) = 016301 stat64("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/lib/guile/2.2/ccache/ice-9/eval.go", {st_mode=S_IFREG|0444, st_size=87205, ...}) = 016301 openat(AT_FDCWD, "/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/lib/guile/2.2/ccache/ice-9/eval.go", O_RDONLY|O_LARGEFILE|O_CLOEXEC) = 516301 _llseek(5, 0, [87205], SEEK_END)  = 016301 mmap2(NULL, 87205, PROT_READ, MAP_PRIVATE, 5, 0) = 0xb7b5800016301 close(5)                          = 016301 mprotect(0xb7b68000, 1892, PROT_READ|PROT_WRITE) = 016301 prlimit64(0, RLIMIT_STACK, NULL, {rlim_cur=8192*1024, rlim_max=RLIM64_INFINITY}) = 016301 stat64("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/share/guile/2.2/init.scm", 0xbfd69048) = -1 ENOENT (No such file or directory)16301 stat64("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/share/guile/2.2/ice-9/boot-9.scm", {st_mode=S_IFREG|0444, st_size=147360, ...}) = 016301 stat64("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/lib/guile/2.2/ccache/ice-9/boot-9.go", {st_mode=S_IFREG|0444, st_size=516373, ...}) = 016301 openat(AT_FDCWD, "/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/lib/guile/2.2/ccache/ice-9/boot-9.go", O_RDONLY|O_LARGEFILE|O_CLOEXEC) = 516301 _llseek(5, 0, [516373], SEEK_END) = 016301 mmap2(NULL, 516373, PROT_READ, MAP_PRIVATE, 5, 0) = 0xb7ad900016301 close(5)                          = 016301 mprotect(0xb7b29000, 73344, PROT_READ|PROT_WRITE) = 016301 stat64("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/share/guile/2.2/ice-9/psyntax-pp.scm", {st_mode=S_IFREG|0444, st_size=185011, ...}) = 016301 stat64("/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/lib/guile/2.2/ccache/ice-9/psyntax-pp.go", {st_mode=S_IFREG|0444, st_size=472229, ...}) = 016301 openat(AT_FDCWD, "/gnu/store/m7xa9rd869yrd88x6x7ri6wnan4f7yl4-guile-bootstrap-2.0/lib/guile/2.2/ccache/ice-9/psyntax-pp.go", O_RDONLY|O_LARGEFILE|O_CLOEXEC) = 516301 _llseek(5, 0, [472229], SEEK_END) = 016301 mmap2(NULL, 472229, PROT_READ, MAP_PRIVATE, 5, 0) = 0xb7a6500016301 close(5)                          = 016301 mprotect(0xb7ab5000, 34496, PROT_READ|PROT_WRITE) = 016301 --- SIGSEGV {si_signo=SIGSEGV, si_code=SEGV_MAPERR, si_addr=0x31dbc378} ---16301 +++ killed by SIGSEGV +++

Efraim Flashner wrote on 12 Feb 2019 10:17

[PATCH] build guile-static with guile-2.0

Recipients:(address . guix-patches@gnu.org)(address . 34427@debbugs.gnu.org)

Message-ID:20190212091740.GB3284@macbook41

When experimenting I found that using guile@2.0 as a base forguile-static, the resulting guile-static didn't segfault on the targetarchitecture.

-- Efraim Flashner <efraim@flashner.co.il> אפרים פלשנרGPG key = A28B F40C 3E55 1372 662D 14F7 41AA E7DC CA3D 8351Confidentiality cannot be guaranteed on emails sent or received unencrypted

From 18035c4ec2c698f01e6324bc013a536fc036cc0a Mon Sep 17 00:00:00 2001
%guile-static@2.2 currently segfaults when run.
* gnu/packages/make-bootstrap.scm (%guile-static): Rewrite package touse guile@2.0 as a base.--- gnu/packages/make-bootstrap.scm | 34 ++++++++++++++++----------------- 1 file changed, 17 insertions(+), 17 deletions(-)

Toggle diff (82 lines)diff --git a/gnu/packages/make-bootstrap.scm b/gnu/packages/make-bootstrap.scmindex c6002eb63a..836f24debf 100644--- a/gnu/packages/make-bootstrap.scm+++ b/gnu/packages/make-bootstrap.scm@@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2012, 2013, 2014, 2015, 2016, 2017, 2018 Ludovic Courtès <ludo@gnu.org>-;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il>+;;; Copyright © 2017, 2019 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018 Mark H Weaver <mhw@netris.org> ;;;@@ -518,29 +518,29 @@ for `sh' in $PATH, and without nscd, and with static NSS modules."   ;; .scm and .go files relative to its installation directory, rather   ;; than in hard-coded configure-time paths.   (let* ((patches (cons* (search-patch "guile-relocatable.patch")-                         (search-patch "guile-2.2-default-utf8.patch")+                         (search-patch "guile-default-utf8.patch")                          (search-patch "guile-linux-syscalls.patch")-                         (origin-patches (package-source guile-2.2))))-         (source  (origin (inherit (package-source guile-2.2))+                         (origin-patches (package-source guile-2.0))))+         (source  (origin (inherit (package-source guile-2.0))                     (patches patches)))-         (guile (package (inherit guile-2.2)-                  (name (string-append (package-name guile-2.2) "-static"))+         (guile (package (inherit guile-2.0)+                  (name (string-append (package-name guile-2.0) "-static"))                   (source source)                   (synopsis "Statically-linked and relocatable Guile")                    ;; Remove the 'debug' output (see above for the reason.)-                  (outputs (delete "debug" (package-outputs guile-2.2)))+                  (outputs (delete "debug" (package-outputs guile-2.0)))                    (inputs                    `(("libunistring:static" ,libunistring "static")-                     ,@(package-inputs guile-2.2)))+                     ,@(package-inputs guile-2.0)))                    (propagated-inputs                    `(("bdw-gc" ,libgc)                      ,@(alist-delete "bdw-gc"-                                     (package-propagated-inputs guile-2.2))))+                                     (package-propagated-inputs guile-2.0))))                   (arguments-                   (substitute-keyword-arguments (package-arguments guile-2.2)+                   (substitute-keyword-arguments (package-arguments guile-2.0)                      ((#:configure-flags flags '())                       ;; When `configure' checks for ltdl availability, it                       ;; doesn't try to link using libtool, and thus fails@@ -563,7 +563,7 @@ for `sh' in $PATH, and without nscd, and with static NSS modules."                                (("^guile_LDFLAGS =")                                 "guile_LDFLAGS = -all-static") -                               ;; Add `-ldl' *after* libguile-2.2.la.+                               ;; Add `-ldl' *after* libguile-2.0.la.                                (("^guile_LDADD =(.*)$" _ ldadd)                                 (string-append "guile_LDADD = "                                                (string-trim-right ldadd)@@ -591,13 +591,13 @@ for `sh' in $PATH, and without nscd, and with static NSS modules."                 (out    (assoc-ref %outputs "out"))                 (guile1 (string-append in "/bin/guile"))                 (guile2 (string-append out "/bin/guile")))-           (mkdir-p (string-append out "/share/guile/2.2"))-           (copy-recursively (string-append in "/share/guile/2.2")-                             (string-append out "/share/guile/2.2"))+           (mkdir-p (string-append out "/share/guile/2.0"))+           (copy-recursively (string-append in "/share/guile/2.0")+                             (string-append out "/share/guile/2.0")) -           (mkdir-p (string-append out "/lib/guile/2.2/ccache"))-           (copy-recursively (string-append in "/lib/guile/2.2/ccache")-                             (string-append out "/lib/guile/2.2/ccache"))+           (mkdir-p (string-append out "/lib/guile/2.0/ccache"))+           (copy-recursively (string-append in "/lib/guile/2.0/ccache")+                             (string-append out "/lib/guile/2.0/ccache"))             (mkdir (string-append out "/bin"))            (copy-file guile1 guile2)-- 2.20.1

Ludovic Courtès wrote on 12 Feb 2019 15:27

Re: bug#34427: guile-bootstrap@2.2 segfault?

Recipients:(name . Efraim Flashner)(address . efraim@flashner.co.il)(address . 34427@debbugs.gnu.org)

Message-ID:87y36ljd46.fsf@gnu.org

Hello Efraim,
Efraim Flashner <efraim@flashner.co.il> skribis:

Toggle quote (4 lines)

> I'm testing %bootstrap-guile from bootstrap.scm and I'm getting a> segfault when runing guile --version. I've attached an strace of the> process.

To be clear, I believe this is for a *cross-compiled* Guile, right?
The natively-built binary on x86_64-linux works fine:

Toggle snippet (20 lines)$ unshare -mrf chroot $(guix build guile-static-stripped) ./bin/guile --versionguile: warning: failed to install localeGC Warning: pthread_getattr_np or pthread_attr_getstack failed for main threadGC Warning: Couldn't read /proc/statguile (GNU Guile) 2.2.4Copyright (C) 2018 Free Software Foundation, Inc.
License LGPLv3+: GNU LGPL 3 or later <http://gnu.org/licenses/lgpl.html>.This is free software: you are free to change and redistribute it.There is NO WARRANTY, to the extent permitted by law.$ guix describeGeneracio 61	Feb 12 2019 11:14:38	(nuna)  guix c86b5f1    repository URL: https://git.savannah.gnu.org/git/guix.git    branch: master    commit: c86b5f1b9bdfdd478ba15804f9343feb8d9c019b$ uname -mx86_64

Since I saw a build failure similar to the one you mention whencross-building for GNU/Hurd, I’m tempted to think this has to do withcross-compilation.
Thanks,Ludo’.

Efraim Flashner wrote on 12 Feb 2019 16:44

Recipients:(name . Ludovic Courtès)(address . ludo@gnu.org)(address . 34427@debbugs.gnu.org)

Message-ID:20190212154434.GD3284@macbook41

On Tue, Feb 12, 2019 at 03:27:37PM +0100, Ludovic Courtès wrote:

Toggle quote (10 lines)> Hello Efraim,> > Efraim Flashner <efraim@flashner.co.il> skribis:> > > I'm testing %bootstrap-guile from bootstrap.scm and I'm getting a> > segfault when runing guile --version. I've attached an strace of the> > process.> > To be clear, I believe this is for a *cross-compiled* Guile, right?

That's right, %bootstrap-guile is extracted from $(guix build--target=powerpc-linux-gnu bootstrap-tarballs)

Toggle quote (31 lines)> > The natively-built binary on x86_64-linux works fine:> > --8<---------------cut here---------------start------------->8---> $ unshare -mrf chroot $(guix build guile-static-stripped) ./bin/guile --version> guile: warning: failed to install locale> GC Warning: pthread_getattr_np or pthread_attr_getstack failed for main thread> GC Warning: Couldn't read /proc/stat> guile (GNU Guile) 2.2.4> Copyright (C) 2018 Free Software Foundation, Inc.> > License LGPLv3+: GNU LGPL 3 or later <http://gnu.org/licenses/lgpl.html>.> This is free software: you are free to change and redistribute it.> There is NO WARRANTY, to the extent permitted by law.> $ guix describe> Generacio 61	Feb 12 2019 11:14:38	(nuna)>   guix c86b5f1>     repository URL: https://git.savannah.gnu.org/git/guix.git>     branch: master>     commit: c86b5f1b9bdfdd478ba15804f9343feb8d9c019b> $ uname -m> x86_64> --8<---------------cut here---------------end--------------->8---> > Since I saw a build failure similar to the one you mention when> cross-building for GNU/Hurd, I’m tempted to think this has to do with> cross-compilation.> > Thanks,> Ludo’.

I saw you mentioned that on IRC.
-- Efraim Flashner   <efraim@flashner.co.il>   אפרים פלשנרGPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351Confidentiality cannot be guaranteed on emails sent or received unencrypted

Ludovic Courtès wrote on 16 Feb 2019 17:06

Re: [bug#34453] [PATCH] build guile-static with guile-2.0

Recipients:(name . Efraim Flashner)(address . efraim@flashner.co.il)

Message-ID:87mumvhg5u.fsf@gnu.org

Hi Efraim,
Efraim Flashner <efraim@flashner.co.il> skribis:

Toggle quote (4 lines)

> When experimenting I found that using guile@2.0 as a base for> guile-static, the resulting guile-static didn't segfault on the target> architecture.

As discussed in https://issues.guix.info/issue/34427, I would ratherfix the segfault in 2.2 than move back to 2.0 and effectively delay theproblem.
Ludo’.

Ludovic Courtès wrote on 6 Mar 2019 22:32

control message for bug #34427

Recipients:(address . control@debbugs.gnu.org)

Message-ID:87imwveliz.fsf@gnu.org

severity 34427 important

is:open	open issues
is:done	closed issues
submitter:<who>	search issue submitter
author:<who>	search by message author
date:yesterday..now	search by issue date
mdate:3m..2d	search by message date