From mboxrd@z Thu Jan 1 00:00:00 1970 From: Mark H Weaver Subject: bug#23132: Grafted system retains references to original store items Date: Mon, 28 Mar 2016 13:55:09 -0400 Message-ID: <87wpomwkqq.fsf@netris.org> References: <877fgnuv7l.fsf@netris.org> <87h9fqr1po.fsf@gnu.org> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:58301) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1akbOX-0005gm-6W for bug-guix@gnu.org; Mon, 28 Mar 2016 13:56:06 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1akbOT-0002W4-Vi for bug-guix@gnu.org; Mon, 28 Mar 2016 13:56:05 -0400 Received: from debbugs.gnu.org ([208.118.235.43]:45213) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1akbOT-0002Vv-SS for bug-guix@gnu.org; Mon, 28 Mar 2016 13:56:01 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1akbOT-0003Xb-NO for bug-guix@gnu.org; Mon, 28 Mar 2016 13:56:01 -0400 Sender: "Debbugs-submit" Resent-Message-ID: In-Reply-To: <87h9fqr1po.fsf@gnu.org> ("Ludovic \=\?utf-8\?Q\?Court\=C3\=A8s\=22'\?\= \=\?utf-8\?Q\?s\?\= message of "Mon, 28 Mar 2016 18:45:07 +0200") List-Id: Bug reports for GNU Guix List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org Sender: bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org To: Ludovic =?UTF-8?Q?Court=C3=A8s?= Cc: 23132@debbugs.gnu.org ludo@gnu.org (Ludovic Court=C3=A8s) writes: > Mark H Weaver skribis: > >> The gnome-session store item above was created by a grafting derivation, >> and all of the ones that follow (starting with glib-2.46.1-bin) are >> ungrafted derivations. The grafting derivation for gnome-session failed >> to include a mapping for glib-2.46.1-bin. > > I suppose this is on a private branch, right? Yes, but see where I reproduce the same problem from commit ffc13e753b on the master branch. From now on, I will use that commit during the investigation of this bug. > What does =E2=80=9Cguix build glib=E2=80=9D produce? Is the =E2=80=9Cbin= =E2=80=9D output of =E2=80=9Cglib=E2=80=9D > correctly grafted? It produces: /gnu/store/1my476c628x9kxa6pf2jlw8mhdlvr8xr-glib-2.46.1 /gnu/store/yw2yjlc1mgb4ga6m28nazxwjfh1d2p1n-glib-2.46.1-bin /gnu/store/mm05frzzxa55kl062c4qp44qli00jnm4-glib-2.46.1-doc which do not contain any references to the original openssl. I think that glib-2.46.1-bin might refer to the old perl, though. In any case, the grafted 'glib-2.46.1-bin' above is not the one that gnome-session refers to, and the mapping in gnome-session's guile-builder does not include any replacement for glib:bin. > Could you send > /gnu/store/60a5vinj56nhxzszfyayjjy61b303c8r-gnome-session-3.18.1.2-guile-= builder? Instead, I'll send the builder for gnome-session for i686-linux from commit ffc13e753b, which is: /gnu/store/sivy5ycg2pgncahyikrqfk60cvfg0vam-gnome-session-3.18.1.2, produced by: /gnu/store/99pcj42dc8w1pvv7xngm1ns1yf896ckk-gnome-session-3.18.1.2.drv with builder: /gnu/store/1rl6yiapmir0fsiw7ncpna3bjdqhj4pk-gnome-session-3.18.1.2-guile-= builder which contains: (begin (use-modules (guix build graft) (guix build utils) (ice-9 match)) (d= efine %output (getenv "out")) (define %outputs (map (lambda (o) (cons o (ge= tenv o))) (quote ("out")))) (define %build-inputs (quote (("x" . "/gnu/stor= e/2f25m1jyy7lvkjqgilza6bafbnv3k044-gnome-session-3.18.1.2") ("x" . "/gnu/st= ore/xd6qk8kad1466v9z74nmikhapz64cszp-graphite2-1.3.5") ("x" . "/gnu/store/b= 8sicbpsjabfhfszsajpfvjw8ynx97iw-perl-5.22.1") ("x" . "/gnu/store/dgyc74zakg= 110dxj67z3mj9g1vk8l4xp-openssl-1.0.2f") ("x" . "/gnu/store/1146ja893l132cs1= dn4jkmb047pw6rsk-perl-5.22.1") ("x" . "/gnu/store/6zsdzk0w99d5xmpw50mgqj9nf= iwazpyx-gnome-desktop-3.18.1") ("x" . "/gnu/store/8s3k25609kj6cqfd737vd1y9w= qfr0zzl-harfbuzz-1.0.6") ("x" . "/gnu/store/h3vpr7k7c2h3n7ixddyvr22sbzy98vh= z-gtk+-3.18.2") ("x" . "/gnu/store/lhhgw9psfnf7c8sjax68sin7nqm3d2k0-cups-2.= 1.0") ("x" . "/gnu/store/bk3bplyp1cr6jv2hgv9d8cxlad3griqb-cups-filters-1.4.= 0") ("x" . "/gnu/store/2symxhixbs2rrhh59il0i8mlndl3x2d8-qpdf-5.1.3") ("x" .= "/gnu/store/sxxqvvrf3f679m939yps51ddz327q0dr-pango-1.38.1") ("x" . "/gnu/s= tore/zsaklr7zimhdnvb8z5yqld8jgqf31v9r-librsvg-2.40.13") ("x" . "/gnu/store/= 45j3scjfgz9ahlvn5lfqj2s0m2gkpdrk-graphite2-1.3.5") ("x" . "/gnu/store/h6bzc= v3a0r9zm37gsi62visvc8kwg02a-perl-5.22.1") ("x" . "/gnu/store/fbmkb0xiwnr182= 3053dxal87m45bpy60-openssl-1.0.2f") ("x" . "/gnu/store/iam2djqw4s2bcpff8nhb= sbkg7z73f3v3-perl-5.22.1") ("x" . "/gnu/store/m98ff01sc2bxz4lv3pc2yqc6hsljd= 4cv-gnome-desktop-3.18.1") ("x" . "/gnu/store/0wsn1h22xdnzplaajxhx59957xkwx= 103-harfbuzz-1.0.6") ("x" . "/gnu/store/w1h49ha77kgicf5i8yrbr3y1ijb2aqis-gt= k+-3.18.2") ("x" . "/gnu/store/87sjyxzjg22rbi7a234l828kns63mzsf-cups-2.1.0"= ) ("x" . "/gnu/store/rikq7ra0xfs4qx1kv1jx9azk1prmk0n2-cups-filters-1.4.0") = ("x" . "/gnu/store/qkh0m7ims01i3j57bkxyqq5m6q3zngy4-qpdf-5.1.3") ("x" . "/g= nu/store/xzfhlic6876skj953xa8phh1rhfmwi9i-pango-1.38.1") ("x" . "/gnu/store= /yyvjbdagvzzdy56fip7qsfwwij364fh4-librsvg-2.40.13")))) (unsetenv "GUILE_LOA= D_COMPILED_PATH") (unsetenv "LD_LIBRARY_PATH"))(exit (begin (let* ((old-out= puts (quote (("out" . "/gnu/store/2f25m1jyy7lvkjqgilza6bafbnv3k044-gnome-se= ssion-3.18.1.2")))) (mapping (append (quote (("/gnu/store/xd6qk8kad1466v9z7= 4nmikhapz64cszp-graphite2-1.3.5" . "/gnu/store/45j3scjfgz9ahlvn5lfqj2s0m2gk= pdrk-graphite2-1.3.5") ("/gnu/store/b8sicbpsjabfhfszsajpfvjw8ynx97iw-perl-5= .22.1" . "/gnu/store/h6bzcv3a0r9zm37gsi62visvc8kwg02a-perl-5.22.1") ("/gnu/= store/dgyc74zakg110dxj67z3mj9g1vk8l4xp-openssl-1.0.2f" . "/gnu/store/fbmkb0= xiwnr1823053dxal87m45bpy60-openssl-1.0.2f") ("/gnu/store/1146ja893l132cs1dn= 4jkmb047pw6rsk-perl-5.22.1" . "/gnu/store/iam2djqw4s2bcpff8nhbsbkg7z73f3v3-= perl-5.22.1") ("/gnu/store/6zsdzk0w99d5xmpw50mgqj9nfiwazpyx-gnome-desktop-3= .18.1" . "/gnu/store/m98ff01sc2bxz4lv3pc2yqc6hsljd4cv-gnome-desktop-3.18.1"= ) ("/gnu/store/8s3k25609kj6cqfd737vd1y9wqfr0zzl-harfbuzz-1.0.6" . "/gnu/sto= re/0wsn1h22xdnzplaajxhx59957xkwx103-harfbuzz-1.0.6") ("/gnu/store/h3vpr7k7c= 2h3n7ixddyvr22sbzy98vhz-gtk+-3.18.2" . "/gnu/store/w1h49ha77kgicf5i8yrbr3y1= ijb2aqis-gtk+-3.18.2") ("/gnu/store/lhhgw9psfnf7c8sjax68sin7nqm3d2k0-cups-2= .1.0" . "/gnu/store/87sjyxzjg22rbi7a234l828kns63mzsf-cups-2.1.0") ("/gnu/st= ore/bk3bplyp1cr6jv2hgv9d8cxlad3griqb-cups-filters-1.4.0" . "/gnu/store/rikq= 7ra0xfs4qx1kv1jx9azk1prmk0n2-cups-filters-1.4.0") ("/gnu/store/2symxhixbs2r= rhh59il0i8mlndl3x2d8-qpdf-5.1.3" . "/gnu/store/qkh0m7ims01i3j57bkxyqq5m6q3z= ngy4-qpdf-5.1.3") ("/gnu/store/sxxqvvrf3f679m939yps51ddz327q0dr-pango-1.38.= 1" . "/gnu/store/xzfhlic6876skj953xa8phh1rhfmwi9i-pango-1.38.1") ("/gnu/sto= re/zsaklr7zimhdnvb8z5yqld8jgqf31v9r-librsvg-2.40.13" . "/gnu/store/yyvjbdag= vzzdy56fip7qsfwwij364fh4-librsvg-2.40.13"))) (map (match-lambda ((name . fi= le) (cons (assoc-ref old-outputs name) file))) %outputs)))) (for-each (lamb= da (input output) (format #t "grafting '~a' -> '~a'...~%" input output) (fo= rce-output) (rewrite-directory input output mapping)) (match old-outputs ((= (names . files) ...) files)) (match %outputs (((names . files) ...) files))= )))) Mark