bug#21280: test failures: nar, syscalls, containers

[Leo Famulari <leo@famulari.name>]

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

I applied the patch on a clean checkout of
8a0263f17b9c754f6de7ee0b869249e87bfb7e3f (gnu: tk: Build with Xft
support.). No luck.

On Wed, Aug 19, 2015, at 19:14, Ludovic Courtès wrote:
> Leo Famulari <leo@famulari.name> skribis:
> 
> > On Tue, Aug 18, 2015, at 17:54, Ludovic Courtès wrote:
> >> What is the file system of /home/leo/work/guix (see the output of the
> >> ‘mount’ command)?
> >
> > $ mount
> > [...]
> > /dev/mapper/hostname--vg-home on /home type btrfs (rw,relatime,space_cache)
> > [...]
> 
> OK.
> 
> >> and then run “make check TESTS=tests/nar.scm” from the top-level build
> >> directory, and post both the top-level ‘nar.log’ file and
> >> ‘tests/nar.log’?
> >
> > The logs are attached. I renamed tests/nar.log to tests-nar.log.
> 
> Hmm the output of ‘find’ in tests/nar.log suggests that the files are
> indeed identical, so maybe it’s ‘file-tree-equal?’ that’s not working as
> expected.
> 
> Could you try this patch and send tests/nar.log again?
> 
> 
> Thanks in advance,
> Ludo’.
> Email had 1 attachment:
> + Attachment2
>   1k (text/x-patch)

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: nar.log --]
[-- Type: text/x-log; name="nar.log", Size: 5807 bytes --]

%%%% Starting test nar
Group begin: nar
Test begin:
  test-name: "write-file supports non-file output ports"
  source-file: "tests/nar.scm"
  source-line: 166
  source-form: (test-assert "write-file supports non-file output ports" (let ((input (string-append (dirname (search-path %load-path "guix.scm")) "/guix")) (output (%make-void-port "w"))) (write-file input output) #t))
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "write-file puts file in C locale collation order"
  source-file: "tests/nar.scm"
  source-line: 173
  source-form: (test-equal "write-file puts file in C locale collation order" (base32 "0sfn5r63k88w9ls4hivnvscg82bqg8a0w7955l6xlk4g96jnb2z3") (let ((input (string-append %test-dir ".input"))) (dynamic-wind (lambda () (define (touch file) (call-with-output-file (string-append input "/" file) (const #t))) (mkdir input) (touch "B") (touch "Z") (touch "a") (symlink "B" (string-append input "/z"))) (lambda () (let-values (((port get-hash) (open-sha256-port))) (write-file input port) (get-hash))) (lambda () (rm-rf input)))))
Test end:
  result-kind: pass
  actual-value: #vu8(227 139 101 165 73 143 76 218 13 45 37 29 14 20 122 120 9 244 152 222 118 71 72 52 77 28 161 57 76 46 214 105)
  expected-value: #vu8(227 139 101 165 73 143 76 218 13 45 37 29 14 20 122 120 9 244 152 222 118 71 72 52 77 28 161 57 76 46 214 105)
Test begin:
  test-name: "restore-file with incomplete input"
  source-file: "tests/nar.scm"
  source-line: 194
  source-form: (test-equal "restore-file with incomplete input" (string-append %test-dir "/foo") (let ((port (open-bytevector-input-port #vu8(1 2 3)))) (guard (c ((nar-error? c) (and (eq? port (nar-error-port c)) (nar-error-file c)))) (restore-file port (string-append %test-dir "/foo")) #f)))
Test end:
  result-kind: pass
  actual-value: "./test-nar-9241/foo"
  expected-value: "./test-nar-9241/foo"
Test begin:
  test-name: "write-file + restore-file"
  source-file: "tests/nar.scm"
  source-line: 203
  source-form: (test-assert "write-file + restore-file" (let* ((input (string-append (dirname (search-path %load-path "guix.scm")) "/guix")) (output %test-dir) (nar (string-append output ".nar"))) (dynamic-wind (lambda () #t) (lambda () (call-with-output-file nar (cut write-file input <>)) (call-with-input-file nar (cut restore-file <> output)) (file-tree-equal? input output)) (lambda () (false-if-exception (delete-file nar)) (false-if-exception (rm-rf output))))))
Test end:
  result-kind: fail
  actual-value: #f
Test begin:
  test-name: "write-file + restore-file with symlinks"
  source-file: "tests/nar.scm"
  source-line: 220
  source-form: (test-assert "write-file + restore-file with symlinks" (let ((input (string-append %test-dir ".input"))) (mkdir input) (dynamic-wind (const #t) (lambda () (with-file-tree input (directory "root" (("reg") ("exe" 511) ("sym" -> "reg"))) (let* ((output %test-dir) (nar (string-append output ".nar"))) (dynamic-wind (lambda () #t) (lambda () (call-with-output-file nar (cut write-file input <>)) (call-with-input-file nar (cut restore-file <> output)) (file-tree-equal? input output)) (lambda () (false-if-exception (delete-file nar)) (false-if-exception (rm-rf output))))))) (lambda () (rmdir input)))))
Test end:
  result-kind: fail
  actual-value: #f
Test begin:
  test-name: "restore-file-set (signed, valid)"
  source-file: "tests/nar.scm"
  source-line: 252
  source-form: (test-assert "restore-file-set (signed, valid)" (with-store store (let* ((texts (unfold (cut >= <> 10) (lambda _ (random-text)) #{1+}# 0)) (files (map (cut add-text-to-store store "text" <>) texts)) (dump (call-with-bytevector-output-port (cut export-paths store files <>)))) (delete-paths store files) (and (every (negate file-exists?) files) (let* ((source (open-bytevector-input-port dump)) (imported (restore-file-set source))) (and (equal? imported files) (every (lambda (file) (and (file-exists? file) (valid-path? store file))) files) (equal? texts (map (lambda (file) (call-with-input-file file get-string-all)) files))))))))
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "restore-file-set (missing signature)"
  source-file: "tests/nar.scm"
  source-line: 276
  source-form: (test-assert "restore-file-set (missing signature)" (let/ec return (with-store store (let* ((file (add-text-to-store store "foo" (random-text))) (dump (call-with-bytevector-output-port (cute export-paths store (list file) <> #:sign? #f)))) (delete-paths store (list file)) (and (not (file-exists? file)) (let ((source (open-bytevector-input-port dump))) (guard (c ((nar-signature-error? c) (let ((message (condition-message c)) (port (nar-error-port c))) (return (and (string-match "lacks.*signature" message) (string=? file (nar-error-file c)) (eq? source port)))))) (restore-file-set source)) #f))))))
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "restore-file-set (corrupt)"
  source-file: "tests/nar.scm"
  source-line: 296
  source-form: (test-assert "restore-file-set (corrupt)" (let/ec return (with-store store (let* ((file (add-text-to-store store "foo" (random-text))) (dump (call-with-bytevector-output-port (cute export-paths store (list file) <>)))) (delete-paths store (list file)) (let* ((index 120) (byte (bytevector-u8-ref dump index))) (bytevector-u8-set! dump index (logxor 255 byte))) (and (not (file-exists? file)) (let ((source (open-bytevector-input-port dump))) (guard (c ((nar-invalid-hash-error? c) (let ((message (condition-message c)) (port (nar-error-port c))) (return (and (string-contains message "hash") (string=? file (nar-error-file c)) (eq? source port)))))) (restore-file-set source)) #f))))))
Test end:
  result-kind: pass
  actual-value: #t
Group end: nar
# of expected passes      6
# of unexpected failures  2

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #3: tests-nar.log --]
[-- Type: text/x-log; name="tests-nar.log", Size: 7017 bytes --]

accepted connection from pid 9241, user leo
random seed for tests: 1440052338
;;; note: source file ./srfi/srfi-64.scm
;;;       newer than compiled /gnu/store/4xqmz0zzkv1n09fqqckql2p8xv30hn1k-guile-2.0.11/lib/guile/2.0/ccache/srfi/srfi-64.go
exporting path `/home/leo/work/guix/test-tmp/store/w01rkdiflkhgmdypxjrhfhsl6a5zfbrg-text'
exporting path `/home/leo/work/guix/test-tmp/store/1ayns837ggrnhhkiak5h56bjvmyifnix-text'
exporting path `/home/leo/work/guix/test-tmp/store/bacw6kb6yjk419w0bylzm708hb3jg2nl-text'
exporting path `/home/leo/work/guix/test-tmp/store/5bxmx8amvvraf6nbdpc7gd74sb2w2qpv-text'
exporting path `/home/leo/work/guix/test-tmp/store/93zpbafmccdw1p7kv365k3a39ss79yw0-text'
exporting path `/home/leo/work/guix/test-tmp/store/zmk176hzqyrlsy8vis38w0f51f5pxbn1-text'
exporting path `/home/leo/work/guix/test-tmp/store/i10l3ng7d2rb702l0ccmb5wfka1kc6nf-text'
exporting path `/home/leo/work/guix/test-tmp/store/phi07kjvhlpqhgch8g1xqjfqh71mvggc-text'
exporting path `/home/leo/work/guix/test-tmp/store/2l2kkrghb0iwi8c35hyl1ziikvnmgr8g-text'
exporting path `/home/leo/work/guix/test-tmp/store/hf8ghc3qj5whndiy2w307lylgp4wi5lp-text'
finding garbage collector roots...
;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;;       or pass the --no-auto-compile argument to disable.
;;; compiling /home/leo/work/guix/nix/scripts/list-runtime-roots
;;; compiled /home/leo/work/guix/test-tmp/var/9232/cache-9232/guile/ccache/2.0-LE-8-2.0/home/leo/work/guix/nix/scripts/list-runtime-roots.go
removing stale temporary roots file `/home/leo/work/guix/test-tmp/var/9232/temproots/9249'
deleting `/home/leo/work/guix/test-tmp/store/1ayns837ggrnhhkiak5h56bjvmyifnix-text'
deleting `/home/leo/work/guix/test-tmp/store/2l2kkrghb0iwi8c35hyl1ziikvnmgr8g-text'
deleting `/home/leo/work/guix/test-tmp/store/5bxmx8amvvraf6nbdpc7gd74sb2w2qpv-text'
deleting `/home/leo/work/guix/test-tmp/store/93zpbafmccdw1p7kv365k3a39ss79yw0-text'
deleting `/home/leo/work/guix/test-tmp/store/bacw6kb6yjk419w0bylzm708hb3jg2nl-text'
deleting `/home/leo/work/guix/test-tmp/store/hf8ghc3qj5whndiy2w307lylgp4wi5lp-text'
deleting `/home/leo/work/guix/test-tmp/store/i10l3ng7d2rb702l0ccmb5wfka1kc6nf-text'
deleting `/home/leo/work/guix/test-tmp/store/phi07kjvhlpqhgch8g1xqjfqh71mvggc-text'
deleting `/home/leo/work/guix/test-tmp/store/w01rkdiflkhgmdypxjrhfhsl6a5zfbrg-text'
deleting `/home/leo/work/guix/test-tmp/store/zmk176hzqyrlsy8vis38w0f51f5pxbn1-text'
deleting `/home/leo/work/guix/test-tmp/store/trash'
deleting unused links...
note: currently hard linking saves 20.39 MiB
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
spurious SIGPOLL
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
importing file or directory '/home/leo/work/guix/test-tmp/store/w01rkdiflkhgmdypxjrhfhsl6a5zfbrg-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/w01rkdiflkhgmdypxjrhfhsl6a5zfbrg-text'
importing file or directory '/home/leo/work/guix/test-tmp/store/1ayns837ggrnhhkiak5h56bjvmyifnix-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/1ayns837ggrnhhkiak5h56bjvmyifnix-text'
importing file or directory '/home/leo/work/guix/test-tmp/store/bacw6kb6yjk419w0bylzm708hb3jg2nl-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/bacw6kb6yjk419w0bylzm708hb3jg2nl-text'
importing file or directory '/home/leo/work/guix/test-tmp/store/5bxmx8amvvraf6nbdpc7gd74sb2w2qpv-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/5bxmx8amvvraf6nbdpc7gd74sb2w2qpv-text'
importing file or directory '/home/leo/work/guix/test-tmp/store/93zpbafmccdw1p7kv365k3a39ss79yw0-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/93zpbafmccdw1p7kv365k3a39ss79yw0-text'
importing file or directory '/home/leo/work/guix/test-tmp/store/zmk176hzqyrlsy8vis38w0f51f5pxbn1-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/zmk176hzqyrlsy8vis38w0f51f5pxbn1-text'
importing file or directory '/home/leo/work/guix/test-tmp/store/i10l3ng7d2rb702l0ccmb5wfka1kc6nf-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/i10l3ng7d2rb702l0ccmb5wfka1kc6nf-text'
importing file or directory '/home/leo/work/guix/test-tmp/store/phi07kjvhlpqhgch8g1xqjfqh71mvggc-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/phi07kjvhlpqhgch8g1xqjfqh71mvggc-text'
importing file or directory '/home/leo/work/guix/test-tmp/store/2l2kkrghb0iwi8c35hyl1ziikvnmgr8g-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/2l2kkrghb0iwi8c35hyl1ziikvnmgr8g-text'
importing file or directory '/home/leo/work/guix/test-tmp/store/hf8ghc3qj5whndiy2w307lylgp4wi5lp-text'...
found valid signature for '/home/leo/work/guix/test-tmp/store/hf8ghc3qj5whndiy2w307lylgp4wi5lp-text'
exporting path `/home/leo/work/guix/test-tmp/store/2m7svhs0d8jnmqkfnibm5b6f8d3f4sk4-foo'
finding garbage collector roots...
removing stale temporary roots file `/home/leo/work/guix/test-tmp/var/9232/temproots/9343'
deleting `/home/leo/work/guix/test-tmp/store/2m7svhs0d8jnmqkfnibm5b6f8d3f4sk4-foo'
deleting `/home/leo/work/guix/test-tmp/store/trash'
deleting unused links...
note: currently hard linking saves 20.39 MiB
accepted connection from pid 9241, user leo
accepted connection from pid 9241, user leo
importing file or directory '/home/leo/work/guix/test-tmp/store/2m7svhs0d8jnmqkfnibm5b6f8d3f4sk4-foo'...
exporting path `/home/leo/work/guix/test-tmp/store/mpfh5a0zjsjn6fyz94isvn113jx3rrjg-foo'
finding garbage collector roots...
removing stale temporary roots file `/home/leo/work/guix/test-tmp/var/9232/temproots/9351'
deleting `/home/leo/work/guix/test-tmp/store/mpfh5a0zjsjn6fyz94isvn113jx3rrjg-foo'
deleting `/home/leo/work/guix/test-tmp/store/trash'
deleting unused links...
note: currently hard linking saves 20.39 MiB
accepted connection from pid 9241, user leo
%%%% Starting test nar  (Writing full log to "nar.log")
tests/nar.scm:203: FAIL write-file + restore-file
tests/nar.scm:220: FAIL write-file + restore-file with symlinks
# of expected passes      6
# of unexpected failures  2
importing file or directory '/home/leo/work/guix/test-tmp/store/mpfh5a0zjsjn6fyz94isvn113jx3rrjg-foo'...
FAIL tests/nar.scm (exit status: 1)