michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-06-23 04:20:32 +01:00
Code Issues Actions 3 Packages Projects Releases Wiki Activity

Add support for package_info to also consider dependencies

Browse Source
This commit is contained in:
Ilia Ross
2025-02-04 14:21:18 +02:00
parent 7ecf0b38a7
commit fc0ddace80
1 changed files with 14 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
software/rpm-lib.pl
View File

@@ -51,8 +51,20 @@ local $n = $_[1] ? "$_[0]-$_[1]" : $_[0];
@tmp = <RPM>;
chop(@tmp);
local $ex = close(RPM);
if (!@tmp || $tmp[0] =~ /not\s+installed/) { return (); }
&open_execute_command(RPM, "rpm -q $n --queryformat \"%{DESCRIPTION}\"", 1, 1);
local $whatprovides = "";
if (!@tmp || $tmp[0] =~ /not\s+installed/) {
&open_execute_command(RPM, "rpm -q --whatprovides $n --queryformat \"%{NAME}\\n%{GROUP}\\n%{ARCH}\\n%{VERSION}-%{RELEASE}\\n%{VENDOR}\\n%{INSTALLTIME}\\n\" 2>/dev/null", 1, 1);
@tmp = <RPM>;
chop(@tmp);
close(RPM);
if (!@tmp || $tmp[0] =~ /no\s+package\s+provides/) {
return () ;
}
else {
$whatprovides = " --whatprovides";
}
}
&open_execute_command(RPM, "rpm -q$whatprovides $n --queryformat \"%{DESCRIPTION}\"", 1, 1);
while(<RPM>) { $d .= $_; }
close(RPM);
return ($tmp[0], $tmp[1], $d, $tmp[2], $tmp[3], $tmp[4], &make_date($tmp[5]));