From mboxrd@z Thu Jan  1 00:00:00 1970
From: Paul Garlick <pgarlick@tourbillion-technology.com>
Subject: bug#25476: pivot-root test fails on Ubuntu 16.04
Date: Wed, 01 Feb 2017 15:33:51 +0000
Message-ID: <1485963231.29096.4.camel@tourbillion-technology.com>
References: <1484760171.3242.7.camel@tourbillion-technology.com>
	<87shofuihf.fsf@gnu.org>
	<1484954418.3990.19.camel@tourbillion-technology.com>
	<877f5ckwm2.fsf@gnu.org>
	<1485881327.12269.10.camel@tourbillion-technology.com>
	<87wpdaawjb.fsf@gnu.org>
Mime-Version: 1.0
Content-Type: multipart/alternative; boundary="=-8NT3uIGyoYNsQC3YN+fk"
Return-path: <bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:44412)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1cYwv8-0000SI-Qj
	for bug-guix@gnu.org; Wed, 01 Feb 2017 10:34:11 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1cYwv4-00070u-Sh
	for bug-guix@gnu.org; Wed, 01 Feb 2017 10:34:06 -0500
Received: from debbugs.gnu.org ([208.118.235.43]:55369)
	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 1cYwv4-00070o-PG
	for bug-guix@gnu.org; Wed, 01 Feb 2017 10:34:02 -0500
Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1cYwv4-0004Tb-Ft
	for bug-guix@gnu.org; Wed, 01 Feb 2017 10:34:02 -0500
Sender: "Debbugs-submit" <debbugs-submit-bounces@debbugs.gnu.org>
Resent-Message-ID: <handler.25476.B25476.148596324117200@debbugs.gnu.org>
In-Reply-To: <87wpdaawjb.fsf@gnu.org>
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: Ludovic =?UTF-8?Q?Court=C3=A8s?= <ludo@gnu.org>
Cc: 25476@debbugs.gnu.org


--=-8NT3uIGyoYNsQC3YN+fk
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: 8bit

Hi Ludo,

Here is the output from the guile session:

paul$ ./pre-inst-env guile
GNU Guile 2.0.13
Copyright (C) 1995-2016 Free Software Foundation, Inc.

Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c' for details.

Enter `,help' for help.
scheme@(guile-user)> ,use(guix build syscalls)
scheme@(guile-user)> (utmpx-entries)
$1 = (#<<utmpx-entry> type: 2 pid: 0 line: "~" id: (126 126 0 0) user:
"reboot" host: "4.4.0-59-generic" termination: 0 exit: 0 session: 0
time: #<time type: time-utc nanosecond: 627310000 second: 1485945677>
address: (0 0 0 0)> #<<utmpx-entry> type: 1 pid: 53 line: "~" id: (126
126 0 0) user: "runlevel" host: "4.4.0-59-generic" termination: 0 exit:
0 session: 0 time: #<time type: time-utc nanosecond: 441012000 second:
1485945740> address: (0 0 0 0)> #<<utmpx-entry> type: 6 pid: 1589 line:
"tty1" id: (116 116 121 49) user: "LOGIN" host: #f termination: 0 exit:
0 session: 1589 time: #<time type: time-utc nanosecond: 643444000
second: 1485945740> address: (0 0 0 0)> #<<utmpx-entry> type: 7 pid:
1908 line: "tty7" id: (58 48 0 0) user: "paul" host: ":0" termination:
0 exit: 0 session: 0 time: #<time type: time-utc nanosecond: 705038000
second: 1485945754> address: (0 0 0 0)> #<<utmpx-entry> type: 7 pid:
2486 line: "pts/11" id: (47 49 49 0) user: "paul" host: ":0.0"
termination: 0 exit: 0 session: 0 time: #<time type: time-utc
nanosecond: 115640000 second: 1485945809> address: (0 0 0 0)> #<<utmpx-
entry> type: 7 pid: 2486 line: "pts/2" id: (47 50 0 0) user: "paul"
host: ":0.0" termination: 0 exit: 0 session: 0 time: #<time type: time-
utc nanosecond: 916844000 second: 1485947271> address: (0 0 0 0)>)
scheme@(guile-user)> ,use(srfi srfi-1)
scheme@(guile-user)> (find (lambda (entry) (and (string? (utmpx-user 
entry))(zero? (utmpx-pid entry)))) (utmpx-entries))
$2 = #<<utmpx-entry> type: 2 pid: 0 line: "~" id: (126 126 0 0) user:
"reboot" host: "4.4.0-59-generic" termination: 0 exit: 0 session: 0
time: #<time type: time-utc nanosecond: 627310000 second: 1485945677>
address: (0 0 0 0)>

The $2 ##SELECTION_END##output is not false in this case.

Paul.
--=-8NT3uIGyoYNsQC3YN+fk
Content-Type: text/html; charset="utf-8"
Content-Transfer-Encoding: quoted-printable

<html><head></head><body><div>Hi Ludo,</div><div><br></div><div>Here is the=
 output from the guile session:</div><div><br></div><div>paul$ ./pre-inst-e=
nv guile</div><div>GNU Guile 2.0.13</div><div>Copyright (C) 1995-2016 Free =
Software Foundation, Inc.</div><div><br></div><div>Guile comes with ABSOLUT=
ELY NO WARRANTY; for details type `,show w'.</div><div>This program is free=
 software, and you are welcome to redistribute it</div><div>under certain c=
onditions; type `,show c' for details.</div><div><br></div><div>Enter `,hel=
p' for help.</div><div>scheme@(guile-user)&gt; ,use(guix build syscalls)</d=
iv><div>scheme@(guile-user)&gt; (utmpx-entries)</div><div>$1 =3D (#&lt;&lt;=
utmpx-entry&gt; type: 2 pid: 0 line: "~" id: (126 126 0 0) user: "reboot" h=
ost: "4.4.0-59-generic" termination: 0 exit: 0 session: 0 time: #&lt;time t=
ype: time-utc nanosecond: 627310000 second: 1485945677&gt; address: (0 0 0 =
0)&gt; #&lt;&lt;utmpx-entry&gt; type: 1 pid: 53 line: "~" id: (126 126 0 0)=
 user: "runlevel" host: "4.4.0-59-generic" termination: 0 exit: 0 session: =
0 time: #&lt;time type: time-utc nanosecond: 441012000 second: 1485945740&g=
t; address: (0 0 0 0)&gt; #&lt;&lt;utmpx-entry&gt; type: 6 pid: 1589 line: =
"tty1" id: (116 116 121 49) user: "LOGIN" host: #f termination: 0 exit: 0 s=
ession: 1589 time: #&lt;time type: time-utc nanosecond: 643444000 second: 1=
485945740&gt; address: (0 0 0 0)&gt; #&lt;&lt;utmpx-entry&gt; type: 7 pid: =
1908 line: "tty7" id: (58 48 0 0) user: "paul" host: ":0" termination: 0 ex=
it: 0 session: 0 time: #&lt;time type: time-utc nanosecond: 705038000 secon=
d: 1485945754&gt; address: (0 0 0 0)&gt; #&lt;&lt;utmpx-entry&gt; type: 7 p=
id: 2486 line: "pts/11" id: (47 49 49 0) user: "paul" host: ":0.0" terminat=
ion: 0 exit: 0 session: 0 time: #&lt;time type: time-utc nanosecond: 115640=
000 second: 1485945809&gt; address: (0 0 0 0)&gt; #&lt;&lt;utmpx-entry&gt; =
type: 7 pid: 2486 line: "pts/2" id: (47 50 0 0) user: "paul" host: ":0.0" t=
ermination: 0 exit: 0 session: 0 time: #&lt;time type: time-utc nanosecond:=
 916844000 second: 1485947271&gt; address: (0 0 0 0)&gt;)</div><div>scheme@=
(guile-user)&gt; ,use(srfi srfi-1)</div><div>scheme@(guile-user)&gt; (find =
(lambda (entry) (and (string? (utmpx-user&nbsp;</div><div>entry))(zero? (ut=
mpx-pid entry)))) (utmpx-entries))</div><div>$2 =3D #&lt;&lt;utmpx-entry&gt=
; type: 2 pid: 0 line: "~" id: (126 126 0 0) user: "reboot" host: "4.4.0-59=
-generic" termination: 0 exit: 0 session: 0 time: #&lt;time type: time-utc =
nanosecond: 627310000 second: 1485945677&gt; address: (0 0 0 0)&gt;</div><d=
iv><br></div><div>The $2 output is not false in this case.</div><div><br></=
div><div>Paul.</div></body></html>
--=-8NT3uIGyoYNsQC3YN+fk--