mlot/alien
1
0
Fork 0
mirror of https://github.com/Project-OSS-Revival/alien.git synced 2026-04-24 14:00:17 +00:00
Code Issues Packages Projects Releases Wiki Activity

* Fixed problem with relocatable packages, and probably several other

Browse Source 
unrelated problems that were introduced last version.
This commit is contained in:
joey
1999-12-01 21:57:02 +00:00
parent a06b66ec0c
commit dafcd16174
5 changed files with 56 additions and 71 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
lib/Fromrpm.pm
View File

@@ -38,10 +38,6 @@ sub GetFields { my ($self,$file)=@_;
$fields{$fieldtrans{$field}}=$_ if $_ ne '(none)';
}
# DEFAULTPREFIX is special because it only exists in old versions of rpm.
$_=`rpm -qp $file --queryformat \%{PREFIXES} 2>/dev/null`;
$fields{PREFIXES}=$_ if $_ ne '' && $_ ne '(none)';
if ($main::scripts) {
# Fix up the scripts - they are always shell scripts, so make them so.
foreach $field ('PREINST','POSTINST','PRERM','POSTRM') {
@@ -116,20 +112,21 @@ sub GetFields { my ($self,$file)=@_;
}
# Unpack a rpm file.
sub Unpack { my ($self,$file,%fields)=@_;
sub Unpack { my ($self,$file,$nopatch,%fields)=@_;
Alien::SafeSystem("(cd ..;rpm2cpio $file) | cpio --extract --make-directories --no-absolute-filenames --preserve-modification-time",
"Error unpacking $file\n");
# If the package is relocatable. We'd like to move it to be under the
# PREFIXES directory. However, it's possible that that directory is in the
# package - it seems some rpm's are marked as relocatable and unpack already
# in the directory they can relocate to, while some are marked relocatable
# and the directory they can relocate to is removed from all filenames in the
# package. I suppose this is due to some change between versions of rpm, but
# none of this is adequatly documented, so we'll just muddle through.
# PREFIXES directory. However, it's possible that that directory is in
# the package - it seems some rpm's are marked as relocatable and
# unpack already in the directory they can relocate to, while some are
# marked relocatable and the directory they can relocate to is removed
# from all filenames in the package. I suppose this is due to some
# vchange between versions of rpm, but none of this is adequatly
# documented, so we'll just muddle through.
#
# Test to see if the package contains the PREFIXES directory already.
print "----$fields{PREFIXES}\n";
if ($fields{PREFIXES} ne undef && ! -e "./$fields{PREFIXES}") {
print "Moving unpacked files into $fields{PREFIXES}\n";