From mboxrd@z Thu Jan  1 00:00:00 1970
From: ludo@gnu.org (Ludovic =?UTF-8?Q?Court=C3=A8s?=)
Subject: bug#25476: pivot-root test fails on Ubuntu 16.04
Date: Mon, 30 Jan 2017 23:32:05 +0100
Message-ID: <877f5ckwm2.fsf@gnu.org>
References: <1484760171.3242.7.camel@tourbillion-technology.com>
	<87shofuihf.fsf@gnu.org>
	<1484954418.3990.19.camel@tourbillion-technology.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
Return-path: <bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:49069)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1cYKVV-0000lC-Hh
	for bug-guix@gnu.org; Mon, 30 Jan 2017 17:33:06 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1cYKVS-0003Cs-DW
	for bug-guix@gnu.org; Mon, 30 Jan 2017 17:33:05 -0500
Received: from debbugs.gnu.org ([208.118.235.43]:53242)
	by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16)
	(Exim 4.71) (envelope-from <Debian-debbugs@debbugs.gnu.org>)
	id 1cYKVS-0003CP-9O
	for bug-guix@gnu.org; Mon, 30 Jan 2017 17:33:02 -0500
Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1cYKVS-0005IJ-0A
	for bug-guix@gnu.org; Mon, 30 Jan 2017 17:33:02 -0500
Sender: "Debbugs-submit" <debbugs-submit-bounces@debbugs.gnu.org>
Resent-Message-ID: <handler.25476.B25476.148581553719940@debbugs.gnu.org>
In-Reply-To: <1484954418.3990.19.camel@tourbillion-technology.com> (Paul
	Garlick's message of "Fri, 20 Jan 2017 23:20:18 +0000")
List-Id: Bug reports for GNU Guix <bug-guix.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/bug-guix>,
	<mailto:bug-guix-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/bug-guix/>
List-Post: <mailto:bug-guix@gnu.org>
List-Help: <mailto:bug-guix-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/bug-guix>,
	<mailto:bug-guix-request@gnu.org?subject=subscribe>
Errors-To: bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org
Sender: "bug-Guix" <bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org>
To: Paul Garlick <pgarlick@tourbillion-technology.com>
Cc: 25476@debbugs.gnu.org

Paul Garlick <pgarlick@tourbillion-technology.com> skribis:

> test-name: pivot-root
> location: /data/paul/sourceCode/guix/tests/syscalls.scm:154
> source:
> + (test-equal
> +   "pivot-root"
> +   #t
> +   (match (pipe)
> +          ((in . out)
> +           (match (clone (logior CLONE_NEWUSER CLONE_NEWNS SIGCHLD))
> +                  (0
> +                   (dynamic-wind
> +                     (const #t)
> +                     (lambda ()
> +                       (close in)
> +                       (call-with-temporary-directory
> +                         (lambda (root)
> +                           (let ((put-old (string-append root "/real-roo=
t")))
> +                             (mount "none" root "tmpfs")
> +                             (mkdir put-old)
> +                             (call-with-output-file
> +                               (string-append root "/test")
> +                               (lambda (port) (display "testing\n" port)=
))
> +                             (pivot-root root put-old)
> +                             (write (file-exists? "/test") out)
> +                             (close out)))))
> +                     (lambda () (primitive-exit 0))))
> +                  (pid (close out)
> +                       (let ((result (read in)))
> +                         (close in)
> +                         (and (zero? (match (waitpid pid)
> +                                            ((_ . status)
> +                                             (status:exit-val status))))
> +                              (eq? #t result))))))))
> expected-value: #t
> actual-value: #f
> result: FAIL

Hmm, not sure why this is failing.  Most likely (file-exists? "/test")
returns #f.

Could you change =E2=80=9C(eq? #t result)=E2=80=9D to =E2=80=9Cresult=E2=80=
=9D, rerun the test, and send
syscalls.log?

Thanks,
Ludo=E2=80=99.