From mboxrd@z Thu Jan  1 00:00:00 1970
From: Jone <yeger9@gmail.com>
Subject: Re: Unexpected results with Guix.
Date: Thu, 07 Nov 2019 03:18:52 +0000
Message-ID: <5dc362db.1c69fb81.593bc.05d7@mx.google.com>
References: <20191103063254.q2j5xq7nbnmyfhop@pelzflorian.localdomain>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
Return-path: <help-guix-bounces+gcggh-help-guix=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:470:142:3::10]:55010)
 by lists.gnu.org with esmtp (Exim 4.90_1)
 (envelope-from <yeger9@gmail.com>) id 1iSVVY-0004Mv-Dt
 for help-guix@gnu.org; Wed, 06 Nov 2019 19:18:41 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <yeger9@gmail.com>) id 1iSVVX-00081G-Gp
 for help-guix@gnu.org; Wed, 06 Nov 2019 19:18:40 -0500
Received: from mail-lf1-x12a.google.com ([2a00:1450:4864:20::12a]:37227)
 by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16)
 (Exim 4.71) (envelope-from <yeger9@gmail.com>) id 1iSVVX-0007xP-7V
 for help-guix@gnu.org; Wed, 06 Nov 2019 19:18:39 -0500
Received: by mail-lf1-x12a.google.com with SMTP id b20so122594lfp.4
 for <help-guix@gnu.org>; Wed, 06 Nov 2019 16:18:38 -0800 (PST)
In-Reply-To: <20191103063254.q2j5xq7nbnmyfhop@pelzflorian.localdomain>
List-Id: <help-guix.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/help-guix>,
 <mailto:help-guix-request@gnu.org?subject=unsubscribe>
List-Archive: <https://lists.gnu.org/archive/html/help-guix>
List-Post: <mailto:help-guix@gnu.org>
List-Help: <mailto:help-guix-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/help-guix>,
 <mailto:help-guix-request@gnu.org?subject=subscribe>
Errors-To: help-guix-bounces+gcggh-help-guix=m.gmane.org@gnu.org
Sender: "Help-Guix" <help-guix-bounces+gcggh-help-guix=m.gmane.org@gnu.org>
To: "pelzflorian (Florian Pelz)" <pelzflorian@pelzflorian.de>
Cc: help-guix@gnu.org, yeger9@gmail.com


> Please also try `guix gc --referrers`.

That's right. I wrote a simple script, which shows it:

#!/bin/sh
if [ -z "$1" ]
then exit 1
fi
cprof=3D$(readlink -f ~/.guix-profile)
init=3D/gnu/store/*-$1*/
rtest=3D"$(eval echo $init)"   # trick!
if [ "$rtest" =3D "$init" ]
then init=3D$1
fi
for f in $init
do
	f=3D${f%/}
	ref=3D"$(guix gc --referrers $f | grep -v $f)"=20
	if echo "$ref" | grep -q $cprof
	then
		echo $f in CURRENT profile!
		exit
	else
		echo =E2=97=8F $f 1>&2
		if ((${#ref} > 10))
		then echo "$ref" | grep --color -e ".*-system" -e "^"
		else echo NO REFERRERS 1>&2
		fi
		echo
	fi
	## and recursively
	for j in $(echo "$ref" | grep -E 'profile$')
	do eval $0 $j
	done
done
exit

- Results for 'icecat':
~/Desktop> guix-gc-refcount.sh icecat
=E2=97=8F /gnu/store/50530hgnzkxgkqciip68dn7v23cslw1c-icecat-60.8.0-guix1
/gnu/store/8x0ipsgl2dhdi7n1psrh8dssv8dh39dd-xdg-desktop-database
/gnu/store/njwpq4ywz17rgvvbdds20cndrgwsrcxs-gtk-icon-themes
/gnu/store/zxqr8afp3rpd2r3g9x41sqg5mx525355-profile

=E2=97=8F /gnu/store/zxqr8afp3rpd2r3g9x41sqg5mx525355-profile
NO REFERRERS

- Results for my own package 'wdfs':
guix-gc-refcount.sh wdfs
/gnu/store/7j1zhlwqjmhyvr7mg8il02xvqvd9yfmz-wdfs-1.4.2 in CURRENT profile!

Incomprehensibly..=20