X-Git-Url: https://git.rohieb.name/openwrt.git/blobdiff_plain/2ad098c840f9e110fa30bd63093349bb26cb0b89..5bd73a12052f8e9182ac1f51372cf6d0323f9dad:/scripts/gen_menuconfig.pl diff --git a/scripts/gen_menuconfig.pl b/scripts/gen_menuconfig.pl index e304f1881..c1510b0d5 100755 --- a/scripts/gen_menuconfig.pl +++ b/scripts/gen_menuconfig.pl @@ -5,6 +5,7 @@ my $src; my $makefile; my $pkg; my %category; +my $cur_menu; sub print_category($) { my $cat = shift; @@ -15,6 +16,16 @@ sub print_category($) { my %spkg = %{$category{$cat}}; foreach my $spkg (sort {uc($a) cmp uc($b)} keys %spkg) { foreach my $pkg (@{$spkg{$spkg}}) { + if ($cur_menu ne $pkg->{submenu}) { + if ($cur_menu) { + print "endmenu\n"; + undef $cur_menu; + } + if ($pkg->{submenu}) { + $cur_menu = $pkg->{submenu}; + print "menu \"$cur_menu\"\n"; + } + } my $title = $pkg->{name}; my $c = (72 - length($pkg->{name}) - length($pkg->{title})); if ($c > 0) { @@ -24,12 +35,16 @@ sub print_category($) { $pkg->{menu} and print "menu"; print "config PACKAGE_".$pkg->{name}."\n"; print "\t\ttristate \"$title\"\n"; - print "\t\tdefault ".$pkg->{default}."\n"; - foreach my $depend (@{$pkg->{depends}}) { - print "\t\tdepends PACKAGE_$depend\n"; + foreach my $default (split /\s*,\s*/, $pkg->{default}) { + print "\t\tdefault $default\n"; } - foreach my $need (@{$pkg->{needs}}) { - print "\t\tselect PACKAGE_$need\n"; + foreach my $depend (@{$pkg->{depends}}) { + my $m = "depends"; + $depend =~ s/^([@\+]+)//; + my $flags = $1; + $flags =~ /@/ or $depend = "PACKAGE_$depend"; + $flags =~ /\+/ and $m = "select"; + print "\t\t$m $depend\n"; } print "\t\thelp\n"; print $pkg->{description}; @@ -61,15 +76,12 @@ while ($line = <>) { $line =~ /^Version: \s*(.+)\s*$/ and $pkg->{version} = $1; $line =~ /^Title: \s*(.+)\s*$/ and $pkg->{title} = $1; $line =~ /^Menu: \s*(.+)\s*$/ and $pkg->{menu} = $1; + $line =~ /^Submenu: \s*(.+)\s*$/ and $pkg->{submenu} = $1; $line =~ /^Default: \s*(.+)\s*$/ and $pkg->{default} = $1; $line =~ /^Depends: \s*(.+)\s*$/ and do { - my @dep = split /,\s*/, $1; + my @dep = split /\s+/, $1; $pkg->{depends} = \@dep; }; - $line =~ /^Needs: \s*(.+)\s*$/ and do { - my @need = split /,\s*/, $1; - $pkg->{needs} = \@need; - }; $line =~ /^Category: \s*(.+)\s*$/ and do { $pkg->{category} = $1; defined $category{$1} or $category{$1} = {};