author | Simon Howkins <simonh@symbian.org> |
Fri, 02 Oct 2009 15:22:22 +0100 | |
changeset 572 | 974b8ee5b70e |
parent 100 | c222f4b27ad7 |
permissions | -rw-r--r-- |
97
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
1 |
#!/usr/bin/perl |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
2 |
use strict; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
3 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
4 |
#listdir_platform_MCL.PDK-3.5_baseline.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
5 |
#listdir_platform_MCL.PDK-3.5_post-clean.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
6 |
#listdir_platform_MCL.PDK-3.5_post-clean_delta.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
7 |
#listdir_platform_MCL.PDK-3.5_post-build-tools2.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
8 |
#listdir_platform_MCL.PDK-3.5_post-build-tools.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
9 |
#listdir_platform_MCL.PDK-3.5_post-build-main.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
10 |
#listdir_platform_MCL.PDK-3.5_s60-baseline.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
11 |
#listdir_platform_MCL.PDK-3.5_post-s60-clean.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
12 |
#listdir_platform_MCL.PDK-3.5_post-s60-clean_delta.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
13 |
#listdir_platform_MCL.PDK-3.5_post-s60-build-tools.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
14 |
#listdir_platform_MCL.PDK-3.5_post-s60-build-main.log |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
15 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
16 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
17 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
18 |
my $lowercase = 1; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
19 |
my $useoutputfiles = 1; |
100
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
20 |
my $path = shift @ARGV; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
21 |
my $outputpath = shift @ARGV; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
22 |
|
97
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
23 |
main(); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
24 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
25 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
26 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
27 |
sub main() |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
28 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
29 |
if($lowercase) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
30 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
31 |
print "Running in lower case mode!\n"; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
32 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
33 |
my @listfiles = glob($path."listdir*"); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
34 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
35 |
my $gt_base; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
36 |
my $gt_clean; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
37 |
my $gt_main; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
38 |
my $s60_base; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
39 |
my $s60_clean; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
40 |
my $s60_main; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
41 |
foreach my $file (@listfiles) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
42 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
43 |
if($file =~ m/s60/) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
44 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
45 |
if($file =~ m/baseline/) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
46 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
47 |
$s60_base = parsefile($file); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
48 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
49 |
elsif($file =~ m/clean.log/) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
50 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
51 |
$s60_clean = parsefile($file); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
52 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
53 |
elsif($file =~ m/main.log/) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
54 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
55 |
$s60_main = parsefile($file); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
56 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
57 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
58 |
else |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
59 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
60 |
if($file =~ m/baseline/) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
61 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
62 |
$gt_base = parsefile($file); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
63 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
64 |
elsif($file =~ m/clean.log/) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
65 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
66 |
$gt_clean = parsefile($file); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
67 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
68 |
elsif($file =~ m/main.log/) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
69 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
70 |
$gt_main = parsefile($file); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
71 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
72 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
73 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
74 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
75 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
76 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
77 |
my $gt_try = diff($gt_base, $gt_clean); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
78 |
my $gt_fail = diff($gt_base, $gt_main); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
79 |
my $gt_built = diff($gt_try, $gt_fail); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
80 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
81 |
# printgroup($gt_fail,'fail'); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
82 |
# printgroup($gt_built,'built'); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
83 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
84 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
85 |
my $s60_try = diff($s60_base, $s60_clean); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
86 |
my $s60_fail = diff($s60_base, $s60_main); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
87 |
my $s60_built = diff($s60_try, $s60_fail); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
88 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
89 |
my $s60_add = diff($s60_main,$s60_base); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
90 |
my $gt_add = diff($gt_main,$gt_base); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
91 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
92 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
93 |
my $try = union($gt_try,$s60_try); # All the stuff we try to build |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
94 |
my $untouched = diff($gt_base,$try); # all the stuff we didn't try. |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
95 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
96 |
#printgroup($try,"try"); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
97 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
98 |
my $uptodate = finduptodate($path); # this is a bit dicey, 'cos it might get deleted/rebuilt by another part... |
100
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
99 |
my $exported = findexported($path); |
97
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
100 |
|
100
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
101 |
printgroup($exported,'exported'); |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
102 |
$untouched = diff($untouched,union($exported,$uptodate)); |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
103 |
printgroup($untouched,"untouched"); # 'clean' doesn't remove headers if they are 'uptodate' |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
104 |
|
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
105 |
#here's where the fun begins... |
97
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
106 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
107 |
my $rebuildfail = intersect(union($gt_built,$gt_add), $s60_fail); #everything built in GT, minus stuff that failed in S60 |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
108 |
my $rebuilt = intersect($gt_built, $s60_built); # everything built in both |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
109 |
my $built = diff(diff(union($gt_built, $s60_built),$rebuilt),$rebuildfail); # everything built, minus rebuilt, minus rebuildfail |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
110 |
my $fail = diff(union($gt_fail,$s60_fail),$rebuildfail); #everyhting that failed, minus the rebuild failures |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
111 |
|
100
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
112 |
my $added = diff(diff(union($gt_add,$s60_add),$exported),$rebuildfail); #all the stuff that got added, minus the stuff that filaed to rebuild |
97
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
113 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
114 |
printgroup($built,"built"); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
115 |
printgroup($rebuilt,'rebuilt'); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
116 |
printgroup($rebuildfail,'rebuildfail'); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
117 |
printgroup($added,"added"); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
118 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
119 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
120 |
printgroup($fail,"failed"); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
121 |
|
100
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
122 |
$uptodate = diff($uptodate,union(union($added,$built),$exported)); #remove all stuff in other categories...'uptodate' was added late in the program |
97
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
123 |
printgroup($uptodate,"uptodate"); # uptodate list isn't that good at the moment...put it last. |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
124 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
125 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
126 |
sub printgroup($$) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
127 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
128 |
my $group = shift; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
129 |
my $label = shift; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
130 |
foreach my $key (sort keys %$group) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
131 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
132 |
print $label." : ".$key."\t".$group->{$key}."\n"; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
133 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
134 |
if($useoutputfiles) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
135 |
{ |
100
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
136 |
my $filename = $outputpath."results_$label.log"; |
97
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
137 |
open(FILE,">$filename") or die "Couldn't open $filename\n"; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
138 |
foreach my $key (sort keys %$group) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
139 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
140 |
print FILE $key."\n"; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
141 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
142 |
close FILE; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
143 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
144 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
145 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
146 |
sub diff($s1,$s2) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
147 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
148 |
my $s1 = shift; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
149 |
my $s2 = shift; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
150 |
my %r; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
151 |
foreach my $key (keys %$s1) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
152 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
153 |
if(!defined $s2->{$key}) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
154 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
155 |
$r{$key} = $s1->{$key}; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
156 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
157 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
158 |
return \%r; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
159 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
160 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
161 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
162 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
163 |
sub intersect($s1,$s2) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
164 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
165 |
my $s1 = shift; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
166 |
my $s2 = shift; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
167 |
my %r; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
168 |
foreach my $key (keys %$s1) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
169 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
170 |
if(defined $s2->{$key}) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
171 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
172 |
$r{$key} = $s2->{$key}; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
173 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
174 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
175 |
return \%r; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
176 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
177 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
178 |
sub union($s1,$s2) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
179 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
180 |
my $s1 = shift; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
181 |
my $s2 = shift; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
182 |
my %r; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
183 |
foreach my $key (keys %$s1) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
184 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
185 |
$r{$key} = $s1->{$key}; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
186 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
187 |
foreach my $key (keys %$s2) #lazy |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
188 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
189 |
$r{$key} = $s2->{$key}; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
190 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
191 |
return \%r; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
192 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
193 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
194 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
195 |
sub finduptodate($path) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
196 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
197 |
my $path = shift; |
100
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
198 |
my @files = glob($path."*compile.log"); |
97
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
199 |
my %results; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
200 |
foreach my $file (@files) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
201 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
202 |
print "Reading $file\n"; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
203 |
open(FILE,"<$file") or die "Cannot open $file\n"; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
204 |
while( my $line = <FILE>) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
205 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
206 |
if($line =~ m/<info>Up-to-date:\s+(.+)<\/info>/) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
207 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
208 |
my $str = $1; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
209 |
$str =~ s/^\S:\///; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
210 |
if($lowercase) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
211 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
212 |
$str = lc($str); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
213 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
214 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
215 |
$results{$str} = ""; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
216 |
# print $str; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
217 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
218 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
219 |
close FILE; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
220 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
221 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
222 |
return \%results; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
223 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
224 |
|
100
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
225 |
sub findexported($) |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
226 |
{ |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
227 |
my $path = shift; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
228 |
my @files = glob($path."*compile.log"); |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
229 |
my %results; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
230 |
foreach my $file (@files) |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
231 |
{ |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
232 |
print "Reading $file\n"; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
233 |
open(FILE,"<$file") or die "Cannot open $file\n"; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
234 |
while( my $line = <FILE>) |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
235 |
{ |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
236 |
#<info>Copied u:/sf/app/conntools/emulatorlan/data/s60_32_default_snaps.xml to u:/epoc32/winscw/c/s60_32_default_snaps.xml</info> |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
237 |
if($line =~ m/<info>Copied\s+(\S+)\s+to\s+(\S+)<\/info>/) |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
238 |
{ |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
239 |
|
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
240 |
my $str = $2; #we want the destination, not the source... |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
241 |
$str =~ s/^\S:\///; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
242 |
if($lowercase) |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
243 |
{ |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
244 |
$str = lc($str); |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
245 |
} |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
246 |
$results{$str} = ""; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
247 |
} |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
248 |
} |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
249 |
close FILE; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
250 |
} |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
251 |
return \%results; |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
252 |
} |
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
253 |
|
c222f4b27ad7
parselistdirs.pl - fixed export scanning and added output path for logs.
Matt Davies <mattd@symbian.org>
parents:
97
diff
changeset
|
254 |
|
97
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
255 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
256 |
sub parsefile($file) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
257 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
258 |
my $file = shift; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
259 |
# my @results; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
260 |
my %results; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
261 |
print "Reading $file\n"; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
262 |
open(FILE,"<$file") or die "Couldn't open $file\n"; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
263 |
while(my $line = <FILE>) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
264 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
265 |
$line =~ s/\n//; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
266 |
if($line =~ m/\S+/) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
267 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
268 |
if( $line !~/^epoc32/ ) #latest lists sometimes don't have this... |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
269 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
270 |
$line = "epoc32/".$line; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
271 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
272 |
if( $line !~/epoc32\/build\// ) #ignore epoc32/build |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
273 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
274 |
if($lowercase) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
275 |
{ |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
276 |
$line = lc($line); |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
277 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
278 |
$results{$line} = ""; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
279 |
# $results{$line} = $file; #debugging |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
280 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
281 |
|
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
282 |
# push(@results,$line) |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
283 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
284 |
} |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
285 |
close FILE; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
286 |
# return \@results; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
287 |
return \%results; |
4f54ca96b7e8
Add build analysis tools to <sf-run-analysis> target. All output generated in <logs>\analysis dir.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
288 |
} |