[tools] fix segfault when using the maxlen argument (#4359)

[openwrt.git] / scripts / feeds

diff --git a/scripts/feeds b/scripts/feeds
index e51b17c..d6a6355 100755 (executable)
--- a/scripts/feeds
+++ b/scripts/feeds
@@ -179,6 +179,7 @@ sub search_feed {
                my $substr;
                my $pkgmatch = 1;
 
                my $substr;
                my $pkgmatch = 1;
 

+               next if $pkg->{vdepends};

                foreach my $substr (@substr) {
                        my $match;
                        foreach my $key (qw(name title description src)) {
                foreach my $substr (@substr) {
                        my $match;
                        foreach my $key (qw(name title description src)) {


@@ -212,6 +213,7 @@ sub list_feed {
        get_feed($feed);
        foreach my $name (sort { lc($a) cmp lc($b) } keys %package) {
                my $pkg = $package{$name};
        get_feed($feed);
        foreach my $name (sort { lc($a) cmp lc($b) } keys %package) {
                my $pkg = $package{$name};

+               next if $pkg->{vdepends};

                if($pkg->{name}) {
                        printf "\%-32s\t\%s\n", $pkg->{name}, $pkg->{title};
                }
                if($pkg->{name}) {
                        printf "\%-32s\t\%s\n", $pkg->{name}, $pkg->{title};
                }


@@ -384,6 +386,7 @@ sub install {
                                get_feed($f->[1]);
                                foreach my $name (sort { lc($a) cmp lc($b) } keys %package) {
                                        my $p = $package{$name};
                                get_feed($f->[1]);
                                foreach my $name (sort { lc($a) cmp lc($b) } keys %package) {
                                        my $p = $package{$name};

+                                       next if $p->{vdepends};

                                        if( $p->{name} ) {
                                                install_package($feed, $p->{name}) == 0 or $ret = 1;
                                        }
                                        if( $p->{name} ) {
                                                install_package($feed, $p->{name}) == 0 or $ret = 1;
                                        }