[scripts] download.pl: remove ftp.geo.kernel.org mirror, it does not resolve
[openwrt/svn-archive/archive.git] / scripts / download.pl
index 633a4f6f7dbbb83f4fd6c970c73f4f17f95e6e84..042b1cce7d79371fc6f8f30f7fe908e0464e626c 100755 (executable)
@@ -24,7 +24,7 @@ sub localmirrors {
        open LM, "$scriptdir/localmirrors" and do {
            while (<LM>) {
                        chomp $_;
-                       push @mlist, $_;
+                       push @mlist, $_ if $_;
                }
                close LM;
        };
@@ -135,14 +135,20 @@ foreach my $mirror (@ARGV) {
                push @mirrors, "ftp://ftp.leo.org/pub/comp/os/unix/gnu/$1";
                push @mirrors, "ftp://ftp.digex.net/pub/gnu/$1";
        } elsif ($mirror =~ /^\@KERNEL\/(.+)$/) {
-               push @mirrors, "ftp://ftp.geo.kernel.org/pub/$1";
-               push @mirrors, "http://ftp.geo.kernel.org/pub/$1";
-               push @mirrors, "ftp://ftp.all.kernel.org/pub/$1";
-               push @mirrors, "http://ftp.all.kernel.org/pub/$1";
-               push @mirrors, "ftp://ftp.de.kernel.org/pub/$1";
-               push @mirrors, "http://ftp.de.kernel.org/pub/$1";
-               push @mirrors, "ftp://ftp.fr.kernel.org/pub/$1";
-               push @mirrors, "http://ftp.fr.kernel.org/pub/$1";
+               my @extra = ( $1 );
+               if ($filename =~ /linux-\d+\.\d+(?:\.\d+)?-rc/) {
+                       push @extra, "$extra[0]/testing";
+               } elsif ($filename =~ /linux-(\d+\.\d+(?:\.\d+)?)/) {
+                       push @extra, "$extra[0]/longterm/v$1";
+               }               
+               foreach my $dir (@extra) {
+                       push @mirrors, "ftp://ftp.all.kernel.org/pub/$dir";
+                       push @mirrors, "http://ftp.all.kernel.org/pub/$dir";
+                       push @mirrors, "ftp://ftp.de.kernel.org/pub/$dir";
+                       push @mirrors, "http://ftp.de.kernel.org/pub/$dir";
+                       push @mirrors, "ftp://ftp.fr.kernel.org/pub/$dir";
+                       push @mirrors, "http://ftp.fr.kernel.org/pub/$dir";
+               }
     } elsif ($mirror =~ /^\@GNOME\/(.+)$/) {
                push @mirrors, "http://ftp.gnome.org/pub/GNOME/sources/$1";
                push @mirrors, "http://ftp.unina.it/pub/linux/GNOME/sources/$1";