Browse Source

handle pubkey entries in rpm output

master
Michael van Elst 23 years ago committed by Ralf S. Engelschall
parent
commit
07d315e987
  1. 6
      openpkg-tool/openpkg-build.pl
  2. 4
      openpkg-tool/openpkg-tool.spec

6
openpkg-tool/openpkg-build.pl

@ -300,7 +300,7 @@ sub parse_provides ($) {
my($s) = @_;
my($nam,$val,$pre,$with,$pxy,$ver,$rel);
($nam,$val) = $s =~ /^(\S+)\s*(?:=\s*(\S*?))?$/;
($nam,$val) = $s =~ /^([^\s\(]+(?:\([^\)]*\))?)\s*(?:=\s*(\S*?))?$/;
#
# build options are encoded as a Requirement
@ -429,6 +429,7 @@ sub get_installed () {
@list = ();
foreach (@l) {
next unless $p = parse_provides($_);
next if $p->{name} =~ /^gpg\(/;
# is this an option ?
if (defined $p->{with}) {
@ -491,10 +492,11 @@ sub get_installed () {
@list = ();
foreach (@l) {
($name,$version,$release,$req) = /^(\S+)\s+(\S+)\s+(\S+)\s*(.*?)\s*$/;
next if $name eq 'gpg-pubkey';
$release =~ s/\+PROXY$//;
while ($req =~ /\.(\S+)\s+\.(\S*)\s+\.(\S*)/g) {
$p = parse_depends("$1 $2 $3");
next if $p->{name} =~ /^rpmlib\(/;
next if $p->{name} =~ /^(rpmlib|gpg)\(/;
$vs = vs({ version => $version, release => $release});
$p = { cond => '', value => $p };

4
openpkg-tool/openpkg-tool.spec

@ -32,8 +32,8 @@ Packager: The OpenPKG Project
Distribution: OpenPKG [PLUS]
Group: Bootstrapping
License: GPL
Version: 20030816
Release: 20030816
Version: 20030826
Release: 20030826
# list of sources
Source0: openpkg.sh

Loading…
Cancel
Save