common/tools/analysis/parse_yarp_files.pl
author MattD <mattd@symbian.org>
Fri, 18 Sep 2009 14:03:50 +0100
changeset 468 eb9ba249e164
parent 206 62976b2583f7
permissions -rw-r--r--
Added test targets 'sf-test-smoketest' and 'sf-test-bc-check' for the test team. They populate the drive, run the tests and zip the output. Minor fix was needed in the post build for zipping: '${build.drive}/output/logs/releaseables' must exist


my @asYarpFiles = ();
open(FILE, $ARGV[0]);
while ( <FILE> )
{
	if ( m/^[^,]*,[^,]*,([^,]*)/ )
	{
		my $sFile = $1;
		chomp $sFile;
#		print "$sFile\n";
		push(@asYarpFiles, $sFile);
	}
}
close(FILE);
my $nYarpFiles = scalar(@asYarpFiles);
#print "Found $nYarpFiles files to parse\n";

my $nTotalRecipeErrors = 0;
for my $nYarpFile (@asYarpFiles)
{
	my $nRecipeErrors = 0;
#	print "Parsing file $nYarpFile...\n";
	open(FILE, $nYarpFile);
	while ( <FILE> )
	{
		if ( m/^Raptor recipe failures:\s+(\d+)$/ )
		{
#			print "Raptor recipe failures: $1\n";
			$nRecipeErrors = $1;
		}
	}
	close(FILE);
#	print "Recipe errors in $nYarpFile: $nRecipeErrors\n";
	$nTotalRecipeErrors += $nRecipeErrors;
}
#print "Total recipe errors across all files: $nTotalRecipeErrors\n";

print "$nTotalRecipeErrors";