[sisyphus] граф rpm

[sisyphus] граф rpm

[Artem]

Понадобилось сделать граф зависимостей набора rpm-пакетов.
Искал в сизифе rpmgraph - не нашел. :-/ Что еще посоветуете?

-- 
Rgds, Artem.

Re: [sisyphus] граф rpm

[Dmitry V. Levin]

[-- Attachment #1: Type: text/plain, Size: 215 bytes --]

On Wed, Apr 19, 2006 at 10:22:31PM +0300, Artem wrote:
> Понадобилось сделать граф зависимостей набора rpm-пакетов.
> Искал в сизифе rpmgraph - не нашел. :-/ Что еще посоветуете?

apt-cache dotty


-- 
ldv

[-- Attachment #2: Type: application/pgp-signature, Size: 191 bytes --]

Re: [sisyphus] граф rpm

[Artem]

Dmitry V. Levin wrote:
> On Wed, Apr 19, 2006 at 10:22:31PM +0300, Artem wrote:
> 
>>Понадобилось сделать граф зависимостей набора rpm-пакетов.
>>Искал в сизифе rpmgraph - не нашел. :-/ Что еще посоветуете?
> 
> 
> apt-cache dotty
> 
>
Спасибо :-)

-- 
Rgds, Artem.

Re: [sisyphus] граф rpm

[Michael Shigorin]

[-- Attachment #1: Type: text/plain, Size: 285 bytes --]

On Wed, Apr 19, 2006 at 10:22:31PM +0300, Artem wrote:
> Понадобилось сделать граф зависимостей набора rpm-пакетов.
> Искал в сизифе rpmgraph - не нашел. :-/ Что еще посоветуете?

Аттач.

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

[-- Attachment #2: rpmdot --]
[-- Type: text/plain, Size: 619 bytes --]

#!/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 "}"