X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/d5ee9e974615a1c7f82bf9f86c5c71e00b8e61f4..eea304df3c19822739670c90d53cb890702ce897:/checkall diff --git a/checkall b/checkall index 4512f3e325..8243eacab0 100755 --- a/checkall +++ b/checkall @@ -14,7 +14,21 @@ my $dir; open LOG,(">checkall.log") || die "Cannot open log file: $!"; my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time); -print LOG "Build started on $hour:$min:$sec $mon/$mday/$year\n\n"; +print LOG "Build started on $hour:$min:$sec $mon/$mday/$year\n"; +print LOG "Current svn version is: ".qx(svnversion)."\n\n"; + +print LOG "\nXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX\n"; +print LOG "XXX Include config.log since it contains valuable information XXX\n"; +print LOG "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX\n"; +open CFG,") { + print LOG "$_"; +} +close CFG; + +print LOG "\nXXXXXXXXXXXXXXXX\n"; +print LOG "XXX Run make XXX\n"; +print LOG "XXXXXXXXXXXXXXXX\n"; open MAKE,("make 2>&1 |") || die "Cannot fork a make: $!"; while () { print $_; @@ -30,6 +44,9 @@ if (!close MAKE) { exit 1; } +print LOG "\nXXXXXXXXXXXXXXXXXXXXXX\n"; +print LOG "XXX Run make check XXX\n"; +print LOG "XXXXXXXXXXXXXXXXXXXXXX\n"; open CHECK,("make -k check 2>&1 |") || die "Cannot fork a make check: $!"; while () { print $_; @@ -63,10 +80,14 @@ if (scalar @fail == 0) { } $banner = "# $banner #"; my $dashes = $banner; -$dashes =~ s/./#/g; +$dashes =~ s/./X/g; print LOG "\n$dashes\n$banner\n$dashes\n\n"; print "\n$dashes\n$banner (full logs in checkall.log)\n$dashes\n\n"; +if (scalar @pass) { + print LOG "* ".(scalar @pass)." passed tests:\n"; + map {print LOG " $_\n"} @pass; +} if (scalar @skip) { print LOG "* ".(scalar @skip)." skipped tests:\n"; print "* ".(scalar @skip)." skipped tests:\n";