X-Git-Url: https://git.rohieb.name/openwrt.git/blobdiff_plain/f6e91c760feea53aa3f59c7055cff4e5fd6bee6f..f50d46ab20931062981bd7a4179b17bcdab7d8be:/scripts/feeds diff --git a/scripts/feeds b/scripts/feeds index 3c6c05064..099468a8f 100755 --- a/scripts/feeds +++ b/scripts/feeds @@ -11,6 +11,10 @@ use Cwd 'abs_path'; chdir "$FindBin::Bin/.."; $ENV{TOPDIR}=getcwd(); +my $mk=`which gmake`; # select the right 'make' program +chomp($mk); # trim trailing newline +$mk or $mk = "make"; # default to 'make' + my @feeds; my %build_packages; my %installed; @@ -19,7 +23,9 @@ sub parse_config() { my $line = 0; my %name; - open FEEDS, "feeds.conf"; + open FEEDS, "feeds.conf" or + open FEEDS, "feeds.conf.default" or + die "Unable to open feeds configuration"; while () { chomp; s/#.+$//; @@ -48,8 +54,8 @@ sub update_index($) -d "./feeds/$name.tmp" or mkdir "./feeds/$name.tmp" or return 1; -d "./feeds/$name.tmp/info" or mkdir "./feeds/$name.tmp/info" or return 1; - system("make -s prepare-mk TMP_DIR=\"$ENV{TOPDIR}/feeds/$name.tmp\""); - system("make -s -f include/scan.mk IS_TTY=1 SCAN_TARGET=\"packageinfo\" SCAN_DIR=\"feeds/$name\" SCAN_NAME=\"package\" SCAN_DEPS=\"$ENV{TOPDIR}/include/package*.mk\" SCAN_DEPTH=4 SCAN_EXTRA=\"\" TMP_DIR=\"$ENV{TOPDIR}/feeds/$name.tmp\""); + system("$mk -s prepare-mk TMP_DIR=\"$ENV{TOPDIR}/feeds/$name.tmp\""); + system("$mk -s -f include/scan.mk IS_TTY=1 SCAN_TARGET=\"packageinfo\" SCAN_DIR=\"feeds/$name\" SCAN_NAME=\"package\" SCAN_DEPS=\"$ENV{TOPDIR}/include/package*.mk\" SCAN_DEPTH=4 SCAN_EXTRA=\"\" TMP_DIR=\"$ENV{TOPDIR}/feeds/$name.tmp\""); system("ln -sf $name.tmp/.packageinfo ./feeds/$name.index"); return 0; @@ -83,7 +89,7 @@ sub update_link($$) { my $name = shift; my $src = abs_path(shift); - system("ln -sf $src ./feeds/$name"); + system("rm -f ./feeds/$name; ln -s $src ./feeds/$name"); return 0; } @@ -96,7 +102,7 @@ sub update_git($$) { system("GIT_DIR=./feeds/$name/.git git pull") == 0 or return 1; } else { system("rm -rf \"./feeds/$name\""); - system("git-clone --depth 1 $src ./feeds/$name") == 0 or return 1; + system("git clone --depth 1 $src ./feeds/$name") == 0 or return 1; } return 0; @@ -104,14 +110,20 @@ sub update_git($$) { sub get_feed($) { my $feed = shift; + my $file = "./feeds/$feed.index"; clear_packages(); - parse_package_metadata("./feeds/$feed.index") or return; + + -f $file or do { + print "Ignoring feed '$feed' - index missing\n"; + return; + }; + parse_package_metadata($file) or return; return { %package }; } sub get_installed() { - system("make -s prepare-tmpinfo"); + system("$mk -s prepare-tmpinfo"); clear_packages(); parse_package_metadata("./tmp/.packageinfo"); %installed = %package; @@ -238,15 +250,17 @@ sub install_package { $feed = lookup_package($feed, $name); $feed or do { $installed{$name} and return 0; - warn "WARNING: No feed for package '$name' found.\n"; - return 1; + # TODO: check if it's already installed within ./package directory + $srcpackage{$name} or -d "./package/$name" or warn "WARNING: No feed for package '$name' found, maybe it's already part of the standard packages?\n"; + return 0; }; my $pkg = $feed{$feed->[1]}->{$name} or return 1; $pkg->{name} or do { $installed{$name} and return 0; + # TODO: check if this is an alias package, maybe it's known by another name warn "WARNING: Package '$name' is not available in feed $feed->[1].\n"; - return 1; + return 0; }; my $src = $pkg->{src}; my $type = $feed->[0]; @@ -256,13 +270,6 @@ sub install_package { # newly installed packages set the source package $installed{$src} and return 0; - # install all dependencies - foreach my $dep (@{$pkg->{depends}}) { - next if $dep =~ /@/; - $dep =~ s/^\+//; - install_package($feed, $dep) == 0 or $ret = 1; - } - # check previously installed packages $installed{$name} and return 0; $installed{$src} = 1; @@ -278,6 +285,15 @@ sub install_package { return 1; }; + # install all dependencies + foreach my $vpkg (@{$srcpackage{$src}}, $pkg) { + foreach my $dep (@{$vpkg->{depends}}, @{$vpkg->{builddepends}}) { + next if $dep =~ /@/; + $dep =~ s/^\+//; + install_package($feed, $dep) == 0 or $ret = 1; + } + } + return $ret; } @@ -289,9 +305,9 @@ sub refresh_config { # refresh the config if ($default) { - system("make oldconfig CONFDEFAULT=\"$default\" Config.in >/dev/null 2>/dev/null"); + system("$mk oldconfig CONFDEFAULT=\"$default\" Config.in >/dev/null 2>/dev/null"); } else { - system("make defconfig Config.in >/dev/null 2>/dev/null"); + system("$mk defconfig Config.in >/dev/null 2>/dev/null"); } } @@ -327,8 +343,6 @@ sub install { my $p = $package{$name}; if( $p->{name} ) { install_package($feed, $p->{name}) == 0 or $ret = 1; - } else { - warn "WARNING: Package '$name' is not available\n"; } } }