netifd: update to the latest version, adds multicast-to-unicast fixes
[openwrt/openwrt.git] / scripts / download.pl
index f17500f3c18bb768b6fbfb1434cdc34939b5bcb6..cd68a7bcd0cf4ade9caf82cf305e43ed155539d5 100755 (executable)
@@ -40,6 +40,9 @@ sub localmirrors {
                close CONFIG;
        };
 
+       my $mirror = $ENV{'DOWNLOAD_MIRROR'};
+       $mirror and push @mlist, split(/;/, $mirror);
+
        return @mlist;
 }
 
@@ -152,11 +155,16 @@ foreach my $mirror (@ARGV) {
                        push @mirrors, "http://downloads.sourceforge.net/$1";
                }
        } elsif ($mirror =~ /^\@GNU\/(.+)$/) {
-               push @mirrors, "http://ftp.gnu.org/pub/gnu/$1";
                push @mirrors, "http://ftpmirror.gnu.org/$1";
+               push @mirrors, "http://ftp.gnu.org/pub/gnu/$1";
                push @mirrors, "ftp://ftp.belnet.be/mirror/ftp.gnu.org/gnu/$1";
                push @mirrors, "ftp://ftp.mirror.nl/pub/mirror/gnu/$1";
                push @mirrors, "http://mirror.switch.ch/ftp/mirror/gnu/$1";
+       } elsif ($mirror =~ /^\@SAVANNAH\/(.+)$/) {
+               push @mirrors, "http://download.savannah.gnu.org/releases/$1";
+               push @mirrors, "http://nongnu.uib.no/$1";
+               push @mirrors, "http://ftp.igh.cnrs.fr/pub/nongnu/$1";
+               push @mirrors, "http://download-mirror.savannah.gnu.org/releases/$1";
        } elsif ($mirror =~ /^\@KERNEL\/(.+)$/) {
                my @extra = ( $1 );
                if ($filename =~ /linux-\d+\.\d+(?:\.\d+)?-rc/) {