| author | Kristian H?gsberg <krh@redhat.com> |
| Wed Sep 12 06:52:26 2007 -0400 (2007-09-12) | |
| changeset 20 | 0aa6cf605ea0 |
| parent 2 | 08c5b27e1952 |
| permissions | -rwxr-xr-x |
| krh@0 | 1 |
#!/bin/sh |
| krh@0 | 2 |
|
| krh@0 | 3 |
import_rpm() {
|
| krh@2 | 4 |
echo "<package name=\"$1\" version=\"$2\" build=\"$3\">" |
| krh@0 | 5 |
echo " <properties>" |
| krh@0 | 6 |
|
| krh@0 | 7 |
rpm -q --provides $p | sort -u | while read name ignore version; do |
| krh@11 | 8 |
if test -z $version; then |
| krh@11 | 9 |
echo " <provides name=\"$name\"/>" |
| krh@11 | 10 |
else |
| krh@11 | 11 |
echo " <provides name=\"$name\" version=\"$version\"/>" |
| krh@11 | 12 |
fi |
| krh@0 | 13 |
done |
| krh@0 | 14 |
|
| krh@0 | 15 |
rpm -q --requires $p | sort -u | while read name ignore version; do |
| krh@11 | 16 |
if test -z $version; then |
| krh@11 | 17 |
echo " <requires name=\"$name\"/>" |
| krh@11 | 18 |
else |
| krh@11 | 19 |
echo " <requires name=\"$name\" version=\"$version\"/>" |
| krh@11 | 20 |
fi |
| krh@0 | 21 |
done |
| krh@0 | 22 |
|
| krh@0 | 23 |
echo " </properties>" |
| krh@0 | 24 |
echo "</package>" |
| krh@0 | 25 |
} |
| krh@0 | 26 |
|
| krh@2 | 27 |
mkdir -p pkgs |
| krh@0 | 28 |
rpm -qa | while read p; do |
| krh@2 | 29 |
name=${p%-*-*}
|
| krh@2 | 30 |
vr=${p#$name-}
|
| krh@2 | 31 |
version=${vr%-*}
|
| krh@2 | 32 |
release=${vr#*-}
|
| krh@2 | 33 |
|
| krh@2 | 34 |
echo $name - $version - $release |
| krh@2 | 35 |
import_rpm $name $version $release > pkgs/$name.rzr |
| krh@0 | 36 |
done |