GNU bug report logs - #22612
guix make check failure for syscalls: "FAIL network-interfaces returns one or more interfaces"

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 22612 in the body.
You can then email your comments to 22612 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Danny Milosavljevic <dannym <at> scratchpost.org>
To: submit <at> debbugs.gnu.org
Subject: guix make check failure for syscalls: "FAIL network-interfaces
 returns one or more interfaces"
Date: Tue, 9 Feb 2016 23:59:34 +0100

Package: guix
Version: git from an hour ago

When I bootstrap guix using
  git clone, `guix environment guix`, ./bootstrap && ./configure --localstatedir=/var && make check
starting from GuixSD, then I get at the make check:

...
FAIL: tests/syscalls.scm
...
# TOTAL: 59
# PASS:  58
# SKIP:  0
# XFAIL: 0
# FAIL:  1
# XPASS: 0
# ERROR: 0

File "tests/syscalls.log" contains:

%%%% Starting test syscalls  (Writing full log to "syscalls.log")
;;; note: source file ./srfi/srfi-64.scm
;;;       newer than compiled /gnu/store/b44k6wx7nxn0kh2kchlazgas2ybc576v-guile-2.0.11/lib/guile/2.0/ccache/srfi/srfi-64.go
%%%% Starting test syscalls  (Writing full log to "syscalls.log")
;;; note: source file ./srfi/srfi-64.scm
;;;       newer than compiled /gnu/store/b44k6wx7nxn0kh2kchlazgas2ybc576v-guile-2.0.11/lib/guile/2.0/ccache/srfi/srfi-64.go
%%%% Starting test syscalls  (Writing full log to "syscalls.log")
;;; note: source file ./srfi/srfi-64.scm
;;;       newer than compiled /gnu/store/b44k6wx7nxn0kh2kchlazgas2ybc576v-guile-2.0.11/lib/guile/2.0/ccache/srfi/srfi-64.go
%%%% Starting test syscalls  (Writing full log to "syscalls.log")
;;; note: source file ./srfi/srfi-64.scm
;;;       newer than compiled /gnu/store/b44k6wx7nxn0kh2kchlazgas2ybc576v-guile-2.0.11/lib/guile/2.0/ccache/srfi/srfi-64.go
%%%% Starting test syscalls  (Writing full log to "syscalls.log")
tests/syscalls.scm:220: FAIL network-interfaces returns one or more interfaces
# of expected passes      17
# of unexpected failures  1
;;; note: source file ./srfi/srfi-64.scm
;;;       newer than compiled /gnu/store/b44k6wx7nxn0kh2kchlazgas2ybc576v-guile-2.0.11/lib/guile/2.0/ccache/srfi/srfi-64.go
./test-env: line 1:  4319 Terminated              "/home/dannym/src/guix/pre-inst-env" "/home/dannym/src/guix/guix-daemon" --disable-chroot --substitute-urls="$GUIX_BINARY_SUBSTITUTE_URL"
FAIL tests/syscalls.scm (exit status: 1)

Message #8 received at 22612 <at> debbugs.gnu.org (full text, mbox):

From: ludo <at> gnu.org (Ludovic Courtès)
To: Danny Milosavljevic <dannym <at> scratchpost.org>
Cc: 22612 <at> debbugs.gnu.org
Subject: Re: bug#22612: guix make check failure for syscalls: "FAIL
 network-interfaces returns one or more interfaces"
Date: Wed, 10 Feb 2016 21:59:26 +0100

Danny Milosavljevic <dannym <at> scratchpost.org> skribis:

>   git clone, `guix environment guix`, ./bootstrap && ./configure --localstatedir=/var && make check

When running the tests, were you using the --container option of ‘guix
environment guix’?

> tests/syscalls.scm:220: FAIL network-interfaces returns one or more interfaces

Could you send the output of:

  ./pre-inst-env guile -c '(use-modules (guix build syscalls)) (write (network-interfaces))'

Thanks,
Ludo’.

Message #13 received at 22612 <at> debbugs.gnu.org (full text, mbox):

From: ludo <at> gnu.org (Ludovic Courtès)
To: Danny Milosavljevic <dannym <at> scratchpost.org>
Cc: 22612 <at> debbugs.gnu.org
Subject: Re: bug#22612: guix make check failure for syscalls: "FAIL
 network-interfaces returns one or more interfaces"
Date: Fri, 25 Mar 2016 09:46:23 +0100

ludo <at> gnu.org (Ludovic Courtès) skribis:

> Danny Milosavljevic <dannym <at> scratchpost.org> skribis:
>
>>   git clone, `guix environment guix`, ./bootstrap && ./configure --localstatedir=/var && make check
>
> When running the tests, were you using the --container option of ‘guix
> environment guix’?
>
>> tests/syscalls.scm:220: FAIL network-interfaces returns one or more interfaces
>
> Could you send the output of:
>
>   ./pre-inst-env guile -c '(use-modules (guix build syscalls)) (write (network-interfaces))'

Ping!  :)

http://bugs.gnu.org/22612

Ludo'.

Message #16 received at 22612 <at> debbugs.gnu.org (full text, mbox):

From: Danny Milosavljevic <dannym <at> scratchpost.org>
To: ludo <at> gnu.org (Ludovic Courtès)
Cc: 22612 <at> debbugs.gnu.org
Subject: Re: bug#22612: guix make check failure for syscalls: "FAIL
 network-interfaces returns one or more interfaces"
Date: Fri, 25 Mar 2016 15:17:07 +0100

On Fri, 25 Mar 2016 09:46:23 +0100
ludo <at> gnu.org (Ludovic Courtès) wrote:

> ludo <at> gnu.org (Ludovic Courtès) skribis:
> 
> > Danny Milosavljevic <dannym <at> scratchpost.org> skribis:
> >  
> >>   git clone, `guix environment guix`, ./bootstrap && ./configure --localstatedir=/var && make check  
> >
> > When running the tests, were you using the --container option of ‘guix
> > environment guix’?
> >  
> >> tests/syscalls.scm:220: FAIL network-interfaces returns one or more interfaces  
> >
> > Could you send the output of:
> >
> >   ./pre-inst-env guile -c '(use-modules (guix build syscalls)) (write (network-interfaces))'  
> 
> Ping!  :)
> 
> http://bugs.gnu.org/22612
> 
> Ludo'.

dannym <at> dayas ~/src/guix$ ./pre-inst-env guile -c '(use-modules (guix build syscalls)) (write (network-interfaces))'  
(#<interface "lo" up family:17 195c200> #<interface "enp0s25" up family:17 195c1c0> #<interface "wlp2s0" up family:17 195c180> #<interface "vpn0" Backtrace:
In ice-9/boot-9.scm:
 157: 9 [catch #t #<catch-closure 181a660> ...]
In unknown file:
   ?: 8 [apply-smob/1 #<catch-closure 181a660>]
In ice-9/boot-9.scm:
  63: 7 [call-with-prompt prompt0 ...]
In ice-9/eval.scm:
 432: 6 [eval # #]
In unknown file:
   ?: 5 [call-with-input-string "(use-modules (guix build syscalls)) (write (network-interfaces))" ...]
In ice-9/command-line.scm:
 180: 4 [#<procedure 182b200 at ice-9/command-line.scm:175:6 (port)> #<input: string 15c8680>]
In unknown file:
   ?: 3 [eval (write (network-interfaces)) #<directory (guile-user) 180ec60>]
   ?: 2 Exception thrown while printing backtrace:
ERROR: In procedure vector-ref: Wrong type argument in position 1 (expecting vector): #f

ice-9/networking.scm:82:27: In procedure sockaddr:fam:
ice-9/networking.scm:82:27: In procedure vector-ref: Wrong type argument in position 1 (expecting vector): #f
dannym <at> dayas ~/src/guix$ ./pre-inst-env guile -c '(use-modules (guix build syscalls)) (write (network-interfaces))'  

dannym <at> dayas /etc$ cat config.scm
;; This is an operating system configuration template for a "desktop" setup with X11.

(use-modules (ice-9 match)
             (gnu)
             (gnu services)
             (gnu services shepherd)
             (gnu services networking)
             (gnu services printing)
             ;(gnu services syslog)
             (gnu services xorg)
             (gnu services web)
             (guix records)
             (gnu system nss))
(use-service-modules desktop databases)
(use-package-modules xfce ratpoison certs wm enlightenment databases bdw-gc java lua gprolog vpn scheme freedesktop suckless djvu mail cdrom ocr lsof ntp gnome libreoffice admin emacs gcc gnupg guile haskell hugs linux pulseaudio video version-control qemu texlive ssh gnuzilla curl messaging screen ldc guile-wm stalonetray xorg fonts webkit autotools gdb web syslog cups)

(define-record-type* <vpn-tunnel>
  vpn-tunnel make-vpn-tunnel
  vpn-tunnel?
  (interface-name vpn-tunnel-interface-name)
  (user-name vpn-tunnel-user-name))

;(define nginx-config
;        (nginx-configuration (nginx nginx)
;                             ;(log-directory "/var/log/nginx")
;                             ;(run-directory "/var/run/nginx")
;                             (file "/etc/nginx.conf")))

;(define cups-service-type
;  (shepherd-service-type
;     'cups-service (match-lambda (($ <
;     ))

;(define (cups-service a-listening-port b-listening-port c-bind-address

(define vpn-tunnel-service-type
  (shepherd-service-type
     'vpn-tunnel (match-lambda (($ <vpn-tunnel> interface user)
                   (let ((ip #~(string-append #$iproute "/sbin/ip")))
                         (shepherd-service
                         (documentation "Create tunnel interface.")
                         (provision '(vpn-tunnel))
                         (requirement '(networking))
                         (start
                           #~(lambda _
                              ;; Return #t if successfully started.
                                     (zero? (system* #$ip "tuntap" "add" #$interface "mode" "tun" "user" #$user))))
                         (respawn? #f)))))))

(define (vpn-tunnel-service interface-name user-name)
  "Return a service that ..."
  (service vpn-tunnel-service-type
           (vpn-tunnel (interface-name interface-name)
                                       (user-name user-name))))
(operating-system
  ; TODO GRUB_CMDLINE_LINUX_DEFAULT="cryptdevice=/dev/sda2:main"
  (kernel-arguments '("crashkernel=256M" "modprobe.blacklist=pcspkr,snd_pcsp" "intel_iommu=off" "intremap=off" "quiet" "acpi_sleep=s3_bios" "acpi_osi=Linux" "clocksource=acpi_pm"))
  (host-name "dayas")
  (timezone "Europe/Vienna")
  (locale "en_US.UTF-8")

  (bootloader (grub-configuration (device "/dev/sda")))
  ;(mapped-devices (list (mapped-device
  ;                       (source "/dev/sda5")
  ;                       (target "dayas-sys")
  ;                       (type luks-device-mapping))))

  (file-systems (cons* (file-system
                        (device "/dev/sda1")
                        (title 'dayas:/)
                        (mount-point "/")
                        (type "ext4")
                        (needed-for-boot? #t))
                       ;(file-system
                       ; (device "/dev/mapper/dayas-sys")
                       ; (title 'dayas:/x)
                       ; (mount-point "/x")
                       ; (type "btrfs")
                       ; (needed-for-boot? #f))
                       %base-file-systems))

  (users (cons (user-account
                (name "dannym")
                (uid 27481)
                (comment "Danny")
                (group "users")
                (supplementary-groups '("wheel" "netdev" "audio" "video" "lp")) ; FIXME remove "lp" again.
                (home-directory (string-append "/home/" name)))
               %base-user-accounts))
  ; TODO lxde
  (packages (cons* ratpoison enlightenment stalonetray fluxbox ; TODO xfce ;desktop environments
                   nss-certs         ;for HTTPS access
                   postgresql bdb gdbm unixodbc ; DBMSes
                   nginx
                   wayland elogind udisks python-pyxdg python2-pyxdg
                   dwm dmenu slock st ; suckless
                   djvulibre
                   libgc
                   ant ; java
                   luajit
                   gprolog
                   openvpn
                   esmtp
                   cdparanoia abcde
                   tesseract-ocr ocrad
                   lsof
                   ntp
                   brasero eog totem evince upower goffice gnumeric devhelp ;libreoffice
                   cups cups-filters hplip
                   gcc-5 gdb
                   gnupg
                   dmidecode sudo tcpdump testdisk smartmontools fdupes wpa-supplicant
                   ;;guile-emacs guile-for-guile-emacs
                   ; TODO ghc hugs
                   procps usbutils e2fsprogs e2fsck/static extundelete strace ltrace alsa-lib alsa-utils net-tools iw powertop iotop fuse unionfs-fuse sshfs-fuse inotify-tools wireless-tools i2c-tools hdparm rfkill acpid sysfsutils cpufrequtils 
                   ffmpeg vlc mplayer mpv youtube-dl libdvdcss xvid 
                   webkitgtk
                   git git-manpages mercurial subversion cvs diffstat
                   ; TODO texlive
                   ; TODO sane-backends
                   pavucontrol
                   openssh curl
                   qemu
                   gnome-terminal
                   icecat claws-mail pidgin pidgin-otr
                   screen
                   ldc
                   guile-wm
                   icedtea ; 7
                   font-adobe100dpi font-adobe75dpi font-bitstream-vera font-dejavu font-gnu-freefont-ttf font-gnu-unifont font-liberation font-ubuntu 
                   xkbcomp
                   automake autoconf
                   binutils
                   rsyslog
                   %base-packages))
  ; (dhcp-client-service)
  ; (lsh-service #:port-number 2222 #:password-authentication? #f)
  (services (cons* (postgresql-service) ; #:config-file "/etc/postgresql.conf")
                   (vpn-tunnel-service "vpn0" "dannym")
                   ;(rsyslog-service)
                   ;(nginx-service-type nginx-config)
                   (cups-service #:printers '())
                   (modify-services %desktop-services
                     (slim-service-type config =>
                       (slim-configuration (inherit config)
                                           (auto-login? #t)
                                           (auto-login-session #~(string-append #$fluxbox "/bin/startfluxbox"))
                                           (default-user "dannym")))
                   )))
; TODO nginx service

  ;; Allow resolution of '.local' host names with mDNS.
  (name-service-switch %mdns-host-lookup-nss)
  (hosts-file (plain-file "hosts"
                          (string-append (local-host-aliases host-name)
                                         "192.168.1.103 daya20\n"
                                         %facebook-host-aliases)))
  )

Message #21 received at 22612-done <at> debbugs.gnu.org (full text, mbox):

From: ludo <at> gnu.org (Ludovic Courtès)
To: Danny Milosavljevic <dannym <at> scratchpost.org>
Cc: 22612-done <at> debbugs.gnu.org
Subject: Re: bug#22612: guix make check failure for syscalls: "FAIL
 network-interfaces returns one or more interfaces"
Date: Fri, 25 Mar 2016 17:32:41 +0100

Danny Milosavljevic <dannym <at> scratchpost.org> skribis:

> dannym <at> dayas ~/src/guix$ ./pre-inst-env guile -c '(use-modules (guix build syscalls)) (write (network-interfaces))'  
> (#<interface "lo" up family:17 195c200> #<interface "enp0s25" up family:17 195c1c0> #<interface "wlp2s0" up family:17 195c180> #<interface "vpn0" Backtrace:
> In ice-9/boot-9.scm:
>  157: 9 [catch #t #<catch-closure 181a660> ...]
> In unknown file:
>    ?: 8 [apply-smob/1 #<catch-closure 181a660>]
> In ice-9/boot-9.scm:
>   63: 7 [call-with-prompt prompt0 ...]
> In ice-9/eval.scm:
>  432: 6 [eval # #]
> In unknown file:
>    ?: 5 [call-with-input-string "(use-modules (guix build syscalls)) (write (network-interfaces))" ...]
> In ice-9/command-line.scm:
>  180: 4 [#<procedure 182b200 at ice-9/command-line.scm:175:6 (port)> #<input: string 15c8680>]
> In unknown file:
>    ?: 3 [eval (write (network-interfaces)) #<directory (guile-user) 180ec60>]
>    ?: 2 Exception thrown while printing backtrace:
> ERROR: In procedure vector-ref: Wrong type argument in position 1 (expecting vector): #f
>
> ice-9/networking.scm:82:27: In procedure sockaddr:fam:
> ice-9/networking.scm:82:27: In procedure vector-ref: Wrong type argument in position 1 (expecting vector): #f

Oh I see.

This printer error is fixed by 001dae0d7431719655f525a94dc900cc078cca99,
while the initial test failure is fixed by
7adbe85e60fce61d0082a9c46604a26d651cb87a.

Let me know if I got it wrong!

Thanks,
Ludo’.

Previous Next

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