tinderbox should not load all of scrape.dat into memory b=388164 r=cls

This commit is contained in:
rhelmer%mozilla.com 2007-07-15 04:14:08 +00:00
Родитель 8a59b4e577
Коммит d994a56024
1 изменённых файлов: 7 добавлений и 0 удалений

Просмотреть файл

@ -929,6 +929,9 @@ sub load_scrape {
my $treedata = $_[0];
local $_;
my $mindate = $treedata->{mindate};
my $maxdate = $treedata->{maxdate};
my $scrape = {};
open(SCRAPELOG, "<", "$treedata->{name}/scrape.dat");
@ -936,6 +939,10 @@ sub load_scrape {
chomp;
my @list = split /\|/;
my $logfile = @list[0];
my ($buildtime, $processtime, $pid, $extension) = split(/\./, $logfile);
if (($buildtime < $mindate) || ($buildtime > $maxdate)) {
next;
}
shift(@list);
$scrape->{$logfile} = [ @list ];