1
1

Ticket #1920: Issues with deba and debd VFS

Currently, deba and debd VFS contains fake directories a-la "14:21
DEBIAN", "14:21 CONTENTS". Items from DEBIAN directory (conffiles,
md5sums, ...) not accessible.

The patch fixes this issues.

Thanks to Serhiy Storchaka for the patch.
Этот коммит содержится в:
Serhiy Storchaka 2009-12-29 15:19:45 +01:00 коммит произвёл Yury V. Zaytsev
родитель ae2b21f547
Коммит fc9c24c6f9
2 изменённых файлов: 4 добавлений и 4 удалений

Просмотреть файл

@ -16,7 +16,7 @@ sub list
{
my($qarchive)=@_;
$qarchive = quote($qarchive);
chop($date=`LC_ALL=C date "+%b %d %Y %H:%M"`);
chop($date=`LC_ALL=C date "+%m-%d-%Y %H:%M"`);
chop($info_size=`apt-cache show $qarchive | wc -c`);
$install_size=length($pressinstall);
$upgrade_size=length($pressupgrade);

Просмотреть файл

@ -109,7 +109,7 @@ sub list
{
my($archive)=@_;
my $qarchive = quote($archive);
chop($date=`LC_ALL=C date "+%b %d %Y %H:%M"`);
chop($date=`LC_ALL=C date "+%m-%d-%Y %H:%M"`);
chop($info_size=`dpkg -s $qarchive | wc -c`);
$repack_size=length($pressrepack);
$reinstall_size=length($pressreinstall);
@ -183,7 +183,7 @@ sub copyout
system("chmod a+x $qdestfile");
}
} elsif($filename =~ /^DEBIAN/) {
$filename=~s!^DEBIAN/!!;
$qfilename=~s!^DEBIAN/!!;
system("cat /var/lib/dpkg/info/$qarchive.$qfilename > $qdestfile");
} elsif($filename eq "DPKG-REMOVE" || $filename eq "APT-REMOVE") {
if ( open(FILEOUT,">$destfile") ) {
@ -251,7 +251,7 @@ sub run
} elsif($filename eq "DPKG-RECONFIGURE") {
system("dpkg-reconfigure $qarchive");
} elsif($filename=~/^DEBIAN/) {
$filename=~s!^DEBIAN!!;
$qfilename=~s!^DEBIAN!!;
system("/var/lib/dpkg/info/$qarchive.$qfilename");
} else {
$qfilename=~s!^CONTENTS!!;