mirror of
git://projects.qi-hardware.com/openwrt-xburst.git
synced 2024-11-27 19:37:10 +02:00
generate package dependancies
git-svn-id: svn://svn.openwrt.org/openwrt/branches/buildroot-ng/openwrt@3774 3c298f89-4303-0410-b956-a3cf2f4a3e73
This commit is contained in:
parent
739f48b3ce
commit
53df1c6112
34
scripts/gen_deps.pl
Executable file
34
scripts/gen_deps.pl
Executable file
@ -0,0 +1,34 @@
|
||||
#!/usr/bin/perl
|
||||
use strict;
|
||||
|
||||
my $name;
|
||||
my $src;
|
||||
my $makefile;
|
||||
my %pkg;
|
||||
|
||||
my $line;
|
||||
while ($line = <>) {
|
||||
chomp $line;
|
||||
$line =~ /^Source-Makefile: \s*(.+\/([^\/]+)\/Makefile)\s*$/ and do {
|
||||
$makefile = $1;
|
||||
$src = $2;
|
||||
};
|
||||
$line =~ /^Package: \s*(.+)\s*$/ and do {
|
||||
$name = $1;
|
||||
defined $pkg{$name} or $pkg{$name} = {};
|
||||
$pkg{$name}->{src} = $src;
|
||||
};
|
||||
$line =~ /^Depends: \s*(.+)\s*$/ and do {
|
||||
my @dep = split /,\s*/, $1;
|
||||
$pkg{$name}->{depends} = \@dep;
|
||||
};
|
||||
}
|
||||
|
||||
foreach $name (sort {uc($a) cmp uc($b)} keys %pkg) {
|
||||
print "$name: ";
|
||||
foreach my $dep (@{$pkg{$name}->{depends}}) {
|
||||
print "$dep ";
|
||||
}
|
||||
print "\n\tmake -C ".$pkg{$name}->{src}."\n";
|
||||
print "\n";
|
||||
}
|
Loading…
Reference in New Issue
Block a user