Don't get the date of the build from the mail header. It is

often off-by one. Instead extract it from the message body,
namely, when the build was kicked off.


git-svn-id: svn://svn.valgrind.org/valgrind/trunk@12247
This commit is contained in:
Florian Krohm 2011-10-28 02:45:15 +00:00
parent b84e215343
commit 7938607bae

View File

@ -103,24 +103,13 @@ sub get_raw_data {
my %hash = ();
# 1) Get the date from the mail header. This comes first
for ($i = 0; $i < $n; ++$i) {
$line = $lines[$i];
if ($line =~ /^Date:/) {
$date = (split(/ /, $line))[1];
last;
}
}
die "no date found in message $msgno" if ($i == $n);
# 2) Locate the section with the info about the environment of this nightly run
# 1) Locate the section with the info about the environment of this nightly run
for ($i = $i + 1; $i < $n; ++$i) {
last if ($lines[$i] =~ /^valgrind revision:/);
}
die "no info block in message $msgno" if ($i == $n);
# 3) Read the info about the build: compiler, valgrind revision etc.
# 2) Read the info about the build: compiler, valgrind revision etc.
# and put it into a hash.
for ( ; $i < $n; ++$i) {
$line = $lines[$i];
@ -137,6 +126,19 @@ sub get_raw_data {
}
}
# 3) Get the date from when the build was kicked off.
for ( ; $i < $n; ++$i) {
$line = $lines[$i];
if ($line =~ /^Started at[ ]+([^ ]+)/) {
$date = $1;
print "DATE = $date\n";
last;
}
}
die "no date found in message $msgno" if ($i == $n);
# 4) Find out if the regression run failed or passed
$hash{"failures"} = [];
for ($i = $i + 1; $i < $n; ++$i) {