build: propagate override information to .config file
authorJohn Crispin <john@openwrt.org>
Mon, 9 Feb 2015 12:09:43 +0000 (12:09 +0000)
committerJohn Crispin <john@openwrt.org>
Mon, 9 Feb 2015 12:09:43 +0000 (12:09 +0000)
With this change, override information is now parsed from the metadata
and put in the %packages hash. A new hash - %overrides - is created and
exported, to be used during the .config-package.in generation.

If an override is detected, a new option CONFIG_OVERRIDE_PKGS will be
created in the .config, and will contain a space-separated list of all
the overridden packages.

Signed-off-by: Mathieu Olivari <mathieu@qca.qualcomm.com>
SVN-Revision: 44336

scripts/metadata.pl
scripts/metadata.pm

index ea437f526866a43062b2dc62e568b70a5f3414e4..abf8248d35622b8658a3c6392c04ba4ca0e41bcb 100755 (executable)
@@ -679,6 +679,13 @@ EOF
        print "endmenu\n\n";
 }
 
+sub print_package_overrides() {
+       keys %overrides > 0 or return;
+       print "\tconfig OVERRIDE_PKGS\n";
+       print "\t\tstring\n";
+       print "\t\tdefault \"".join(" ", keys %overrides)."\"\n\n";
+}
+
 sub gen_package_config() {
        parse_package_metadata($ARGV[0]) or exit 1;
        print "menuconfig IMAGEOPT\n\tbool \"Image configuration\"\n\tdefault n\n";
@@ -704,6 +711,7 @@ EOF
        foreach my $cat (sort {uc($a) cmp uc($b)} keys %category) {
                print_package_config_category $cat;
        }
+       print_package_overrides();
 }
 
 sub get_conditional_dep($$) {
index fc8657322e145c15fecebda4bfc309074286a88d..4bf70bbbde7ebe738f983cb3d3b8ca3f82071c15 100644 (file)
@@ -2,7 +2,7 @@ package metadata;
 use base 'Exporter';
 use strict;
 use warnings;
-our @EXPORT = qw(%package %srcpackage %category %subdir %preconfig %features clear_packages parse_package_metadata get_multiline);
+our @EXPORT = qw(%package %srcpackage %category %subdir %preconfig %features %overrides clear_packages parse_package_metadata get_multiline);
 
 our %package;
 our %preconfig;
@@ -10,6 +10,7 @@ our %srcpackage;
 our %category;
 our %subdir;
 our %features;
+our %overrides;
 
 sub get_multiline {
        my $fh = shift;
@@ -30,6 +31,7 @@ sub clear_packages() {
        %srcpackage = ();
        %category = ();
        %features = ();
+       %overrides = ();
 }
 
 sub parse_package_metadata($) {
@@ -40,6 +42,7 @@ sub parse_package_metadata($) {
        my $preconfig;
        my $subdir;
        my $src;
+       my $override;
 
        open FILE, "<$file" or do {
                warn "Cannot open '$file': $!\n";
@@ -54,8 +57,13 @@ sub parse_package_metadata($) {
                        $subdir =~ s/^package\///;
                        $subdir{$src} = $subdir;
                        $srcpackage{$src} = [];
+                       $override = "";
                        undef $pkg;
                };
+               /^Override: \s*(.+?)\s*$/ and do {
+                       $override = $1;
+                       $overrides{$src} = 1;
+               };
                next unless $src;
                /^Package:\s*(.+?)\s*$/ and do {
                        undef $feature;
@@ -70,6 +78,7 @@ sub parse_package_metadata($) {
                        $pkg->{buildtypes} = [];
                        $pkg->{subdir} = $subdir;
                        $pkg->{tristate} = 1;
+                       $pkg->{override} = $override;
                        $package{$1} = $pkg;
                        push @{$srcpackage{$src}}, $pkg;
                };