# HG changeset patch # User William Roberts # Date 1271234787 -3600 # Node ID 2618a0f10e3e283c658d3eedd1f741d98cf43f74 # Parent 29cf076edbda3dfcfbd5becf575ff9275bf5ceb9 Collate the RVCT "cannot open source input file" errors to list the missing files diff -r 29cf076edbda -r 2618a0f10e3e tools/summarise_rvct_errors.pl --- a/tools/summarise_rvct_errors.pl Mon Apr 12 16:01:06 2010 +0100 +++ b/tools/summarise_rvct_errors.pl Wed Apr 14 09:46:27 2010 +0100 @@ -63,6 +63,7 @@ my $next_message_id = 1; my %packages_by_file; my %package_count_by_file; +my %missing_files; my $linktarget = ""; my %visibility_problems; @@ -79,6 +80,17 @@ next; } + # Error: #5: cannot open source input file "lbs/epos_cposprivacynotifier.h": + + if ($line =~ /cannot open source input file (\"|")(.*)(\"|")/) + { + my $missing_file = $2; + my $count = $missing_files{$missing_file}; + $count = 0 if (!defined $count); + $missing_files{$missing_file} = $count + 1; + + # and fall through to the rest of the processing... + } # ... '--soname=glxgridviewplugin{000a0000}[20000a03].dll&x39; ... if ($line =~ /--soname=(\S+)(.000a0000.)?(\S+)[&']/) @@ -292,3 +304,9 @@ { print "$problem\n"; } + +print "\n\n====Missing files\n"; +foreach my $file ( sort {$missing_files{$b} <=> $missing_files{$a}} keys %missing_files) + { + printf "%-6d\t%s\n",$missing_files{$file}, $file; + }