From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <mike@fly.osdn.org.ua>
Date: Fri, 20 Jan 2006 11:16:11 +0200
From: Michael Shigorin <mike@osdn.org.ua>
To: Genix <genix@list.ru>
Subject: Re: [devel] =?koi8-r?B?x9LBxiDzydrJxg==?=
Message-ID: <20060120091611.GU20937@osdn.org.ua>
Mail-Followup-To: Genix <genix@list.ru>, devel@lists.altlinux.org
References: <20060107131554.GA9219@basalt.office.altlinux.org>
	<200601101611.01842.zerg@altlinux.org>
	<200601101620.07046.shrek@freesource.info>
	<20060114071756.GI20937@osdn.org.ua>
	<20060114103525.GD17113@mithraen.dimline.ru>
	<20060114141550.GB3805@basalt.office.altlinux.org>
	<20060116093452.GA9525@mithraen.dimline.ru>
	<20060119185409.GZ11208@osdn.org.ua> <43D07904.8030803@list.ru>
Mime-Version: 1.0
Content-Type: multipart/mixed; boundary="dPW7zu3hTOhZvCDO"
Content-Disposition: inline
Content-Transfer-Encoding: 8bit
In-Reply-To: <43D07904.8030803@list.ru>
User-Agent: Mutt/1.4.2.1i
Cc: devel@lists.altlinux.org
X-BeenThere: devel@lists.altlinux.org
X-Mailman-Version: 2.1.5
Precedence: list
Reply-To: ALT Devel discussion list <devel@lists.altlinux.org>
List-Id: ALT Devel discussion list <devel.lists.altlinux.org>
List-Unsubscribe: <https://lists.altlinux.org/mailman/listinfo/devel>,
	<mailto:devel-request@lists.altlinux.org?subject=unsubscribe>
List-Archive: <http://lists.altlinux.org/pipermail/devel>
List-Post: <mailto:devel@lists.altlinux.org>
List-Help: <mailto:devel-request@lists.altlinux.org?subject=help>
List-Subscribe: <https://lists.altlinux.org/mailman/listinfo/devel>,
	<mailto:devel-request@lists.altlinux.org?subject=subscribe>
X-List-Received-Date: Fri, 20 Jan 2006 09:16:56 -0000
Archived-At: <http://lore.altlinux.org/devel/20060120091611.GU20937@osdn.org.ua/>
List-Archive: <http://lore.altlinux.org/devel/>
List-Post: <mailto:devel@altlinux.org>


--dPW7zu3hTOhZvCDO
Content-Type: text/plain; charset=koi8-r
Content-Disposition: inline
Content-Transfer-Encoding: 8bit

On Fri, Jan 20, 2006 at 08:45:40AM +0300, Genix wrote:
> >Скриптик для построения по установленным прилагаю, 
> где? :)

Ты знал, ты знал :)  Исправляюсь.

-- 
 ---- WBR, Michael Shigorin <mike@altlinux.ru>
  ------ Linux.Kiev http://www.linux.kiev.ua/

--dPW7zu3hTOhZvCDO
Content-Type: text/plain; charset=us-ascii
Content-Disposition: attachment; filename=rpmdot

#!/bin/sh
echo "digraph RPM {
size=\"40,22\"
page=\"8,12\"
ratio=fill
"
rpmlist=$(rpm -qa --qf='[%{name}\n]')
for i in $rpmlist ; do 
rpmdeplist=`(rpm -q --qf='[%{requirename}\n]' "$i"|
grep -ve 'rpmlib\(.*\)'|
xargs rpm -q --whatprovides |sort -u |
xargs rpm -q --qf='%{name}\n'|
while read package ; do
	if test "$i" != "$package" ; then
		rpm -q --qf='%{name}\n' "$package"
	fi
done| sed -e 's/, $//') 2>/dev/null`
    iescape=$(echo "$i"|tr '/-' '__')
    echo "$iescape [fontsize=12, label=\"$i\"]"
	for j in $rpmdeplist ; do
	jescape=$(echo "$j"|tr '/-' '__')
	echo "$iescape -> $jescape;"
    done
done
echo "}"

--dPW7zu3hTOhZvCDO--