Pārlūkot izejas kodu

add a menuconfig option for specifying a local download mirror

SVN-Revision: 6877
Felix Fietkau 18 gadi atpakaļ
vecāks
revīzija
35967a174c
2 mainītis faili ar 20 papildinājumiem un 6 dzēšanām
  1. 3 0
      Config.in
  2. 17 6
      scripts/download.pl

+ 3 - 0
Config.in

@@ -26,6 +26,9 @@ config BROKEN
 	bool "Show broken platforms / packages" if DEVEL
 	default n
 
+config LOCALMIRROR
+	string "Local mirror for source packages" if DEVEL
+
 menuconfig BUILDOPTS
 	bool "Build Options" if DEVEL
 

+ 17 - 6
scripts/download.pl

@@ -21,13 +21,24 @@ my $ok;
 @ARGV > 0 or die "Syntax: $0 <target dir> <filename> <md5sum> <mirror> [<mirror> ...]\n";
 
 sub localmirrors {
-
     my @mlist;
-    open LM, "$scriptdir/localmirrors" or return ();
-    while (<LM>) {
-        chomp $_;
-        push @mlist, $_;
-    }
+    open LM, "$scriptdir/localmirrors" and do {
+	    while (<LM>) {
+			chomp $_;
+			push @mlist, $_;
+		}
+		close LM;
+	};
+	open CONFIG, "<".$ENV{'TOPDIR'}."/.config" and do {
+		while (<CONFIG>) {
+			/^CONFIG_LOCALMIRROR="(.+)"/ and do {
+				chomp;
+				push @mlist, $1;
+			};
+		}
+		close CONFIG;
+	};
+	
 
     return @mlist;
 }