Lines 1-124
Link Here
|
1 |
--- abi-compliance-checker.pl.orig 2009-08-18 14:29:08.000000000 -0400 |
|
|
2 |
+++ abi-compliance-checker.pl 2009-08-23 05:20:10.000000000 -0400 |
3 |
@@ -276,7 +276,7 @@ |
4 |
my $LibVersion = $_[0]; |
5 |
if(not -e $Descriptor{$LibVersion}{'Path'}) |
6 |
{ |
7 |
- print "descriptor d$LibVersion does not exists, incorrect file path $Descriptor{$LibVersion}{'Path'}\n"; |
8 |
+ print "descriptor d$LibVersion does not exist: incorrect file path $Descriptor{$LibVersion}{'Path'}\n"; |
9 |
exit(0); |
10 |
} |
11 |
my $Descriptor_File = `cat $Descriptor{$LibVersion}{'Path'}`; |
12 |
@@ -2470,7 +2470,7 @@ |
13 |
system("g++ >header_compile_errors/$TargetLibraryName/$Descriptor{$Version}{'Version'} 2>&1 -fdump-translation-unit temp/$Lib_VersionName.h $CompilerOptions{$Version} $AddOpt"); |
14 |
if($?) |
15 |
{ |
16 |
- print "WARNING: some errors have occured while headers compilation\nyou can see compilation errors in the file header_compile_errors/$TargetLibraryName/$Descriptor{$Version}{'Version'}\n"; |
17 |
+ print "WARNING: some errors have occured while compiling header(s)\nyou can see compilation errors in the file header_compile_errors/$TargetLibraryName/$Descriptor{$Version}{'Version'}\n"; |
18 |
} |
19 |
`mv -f $Lib_VersionName.h*.tu temp/`; |
20 |
return (split("\n", `find temp -maxdepth 1 -name "$Lib_VersionName\.h*\.tu"`))[0]; |
21 |
@@ -2565,13 +2565,13 @@ |
22 |
sub parseHeaders_AllInOne($) |
23 |
{ |
24 |
$Version = $_[0]; |
25 |
- print "headers checking v$Descriptor{$Version}{'Version'} ...\n"; |
26 |
+ print "checking header(s) v$Descriptor{$Version}{'Version'} ...\n"; |
27 |
`mkdir -p header_compile_errors/$TargetLibraryName/`; |
28 |
`rm -fr header_compile_errors/$TargetLibraryName/$Descriptor{$Version}{'Version'}`; |
29 |
my $DumpPath = getDump_AllInOne(); |
30 |
if(not $DumpPath) |
31 |
{ |
32 |
- print "\nERROR: can't create gcc syntax tree for headers\nyou can see compilation errors in the file header_compile_errors/$TargetLibraryName/$Descriptor{$Version}{'Version'}\n"; |
33 |
+ print "\nERROR: can't create gcc syntax tree for header(s)\nyou can see compilation errors in the file header_compile_errors/$TargetLibraryName/$Descriptor{$Version}{'Version'}\n"; |
34 |
exit(1); |
35 |
} |
36 |
getInfo($DumpPath); |
37 |
@@ -4306,7 +4306,7 @@ |
38 |
|
39 |
sub testSystem_cpp() |
40 |
{ |
41 |
- print "testing on C++ library changes\n"; |
42 |
+ print "testing for C++ library changes\n"; |
43 |
my @DataDefs_v1 = (); |
44 |
my @Sources_v1 = (); |
45 |
my @DataDefs_v2 = (); |
46 |
@@ -4690,7 +4690,7 @@ |
47 |
|
48 |
sub testSystem_c() |
49 |
{ |
50 |
- print "\ntesting on C library changes\n"; |
51 |
+ print "\ntesting for C library changes\n"; |
52 |
my @DataDefs_v1 = (); |
53 |
my @Sources_v1 = (); |
54 |
my @DataDefs_v2 = (); |
55 |
@@ -5448,27 +5448,27 @@ |
56 |
elsif($Kind eq "Return_Type_And_Size") |
57 |
{ |
58 |
$Incompatibility = "Type of return value has been changed from <span style='white-space:nowrap;'><b>$Old_Value</b> (<b>$Old_Size</b> bytes)</span> to <span style='white-space:nowrap;'><b>$New_Value</b> (<b>$New_Size</b> bytes)</span>\n"; |
59 |
- $Effect = "Applications will have got different return value and it's execution may change"; |
60 |
+ $Effect = "Applications will get a different return value and execution may change"; |
61 |
} |
62 |
elsif($Kind eq "Return_Type") |
63 |
{ |
64 |
$Incompatibility = "Type of return value has been changed from <span style='white-space:nowrap;'><b>$Old_Value</b></span> to <span style='white-space:nowrap;'><b>$New_Value</b></span>\n"; |
65 |
- $Effect = "Applications will have got different return value and it's execution may change"; |
66 |
+ $Effect = "Applications will get a different return value and execution may change"; |
67 |
} |
68 |
elsif($Kind eq "Return_BaseType") |
69 |
{ |
70 |
$Incompatibility = "Base type of return value has been changed from <span style='white-space:nowrap;'><b>$Old_Value</b> (<b>$Old_Size</b> bytes)</span> to <span style='white-space:nowrap;'><b>$New_Value</b> (<b>$New_Size</b> bytes)</span>\n"; |
71 |
- $Effect = "Applications will have got different return value and it's execution may change"; |
72 |
+ $Effect = "Applications will get a different return value and execution may change"; |
73 |
} |
74 |
elsif($Kind eq "Return_PointerLevel_And_Size") |
75 |
{ |
76 |
$Incompatibility = "Type pointer level of return value has been changed from <b>$Old_Value</b> to <b>$New_Value</b> and size of type has been changed from <b>$Old_Size</b> bytes to <b>$New_Size</b> bytes\n"; |
77 |
- $Effect = "Applications will have got different return value and it's execution may change"; |
78 |
+ $Effect = "Applications will get a different return value and execution may change"; |
79 |
} |
80 |
elsif($Kind eq "Return_PointerLevel") |
81 |
{ |
82 |
$Incompatibility = "Type pointer level of return value has been changed from <b>$Old_Value</b> to <b>$New_Value</b>\n"; |
83 |
- $Effect = "Applications will have got different return value and it's execution may change"; |
84 |
+ $Effect = "Applications will get a different return value and execution may change"; |
85 |
} |
86 |
if($Incompatibility) |
87 |
{ |
88 |
@@ -6056,7 +6056,7 @@ |
89 |
my @SoLibPaths = getSoPaths($LibVersion); |
90 |
if($#SoLibPaths eq -1) |
91 |
{ |
92 |
- print "ERROR: there are no any shared objects in specified paths in library descriptor d$LibVersion\n"; |
93 |
+ print "ERROR: there are no shared objects in the paths specified in library descriptor d$LibVersion\n"; |
94 |
exit(1); |
95 |
} |
96 |
foreach my $SoLibPath (@SoLibPaths) |
97 |
@@ -6436,7 +6436,7 @@ |
98 |
system("cd $InfoDump_FilePath/ && tar -cf $InfoDump_FileName".".tar $InfoDump_FileName"); |
99 |
system("cd $InfoDump_FilePath/ && gzip $InfoDump_FileName".".tar --best"); |
100 |
`rm -f $InfoDump_FilePath/$InfoDump_FileName`; |
101 |
- print "see library info dump in $InfoDump_FilePath/$InfoDump_FileName.tar.gz and use it instead of library version descriptor on other machine\n"; |
102 |
+ print "see library info dump in $InfoDump_FilePath/$InfoDump_FileName.tar.gz: use it instead of library version descriptor on other machine\n"; |
103 |
exit(0); |
104 |
} |
105 |
|
106 |
@@ -6487,15 +6487,15 @@ |
107 |
parseHeaders_AllInOne(2); |
108 |
} |
109 |
|
110 |
- print "headers comparison ...\n"; |
111 |
+ print "comparing headers ...\n"; |
112 |
mergeHeaders(); |
113 |
} |
114 |
|
115 |
#LIBS MERGING |
116 |
- print "shared objects comparison ...\n"; |
117 |
+ print "comparing shared objects ...\n"; |
118 |
mergeLibs(); |
119 |
|
120 |
- print "ABI compliance report drawing ...\n"; |
121 |
+ print "creating ABI compliance report ...\n"; |
122 |
create_HtmlReport(); |
123 |
|
124 |
if($HeaderCheckingMode_Separately) |