3 // Copyright (C) 2004-2017 Free Software Foundation, Inc.
5 // This library is free software; you can redistribute it and/or
6 // modify it under the terms of the GNU General Public License as
7 // published by the Free Software Foundation; either version 3, or (at
8 // your option) any later version.
10 // This library is distributed in the hope that it will be useful, but
11 // WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 // General Public License for more details.
15 // You should have received a copy of the GNU General Public License
16 // along with this library; see the file COPYING3. If not see
17 // <http://www.gnu.org/licenses/>.
20 // Benjamin Kosnik <bkoz@redhat.com>
22 #include "testsuite_abi.h"
33 symbol::init(string
& data
)
35 const char delim
= ':';
36 const char version_delim
= '@';
37 const string::size_type npos
= string::npos
;
38 string::size_type n
= 0;
41 if (data
.find("FUNC") == 0)
42 type
= symbol::function
;
43 else if (data
.find("OBJECT") == 0)
44 type
= symbol::object
;
45 else if (data
.find("TLS") == 0)
48 n
= data
.find_first_of(delim
);
50 data
.erase(data
.begin(), data
.begin() + n
+ 1);
52 // Iff object or TLS, get size info.
53 if (type
== symbol::object
|| type
== symbol::tls
)
55 n
= data
.find_first_of(delim
);
58 string
objectsize(data
.begin(), data
.begin() + n
);
59 istringstream
iss(objectsize
);
64 data
.erase(data
.begin(), data
.begin() + n
+ 1);
68 // Set the name and raw_name.
69 raw_name
= string(data
.begin(), data
.end());
70 n
= data
.find_first_of(version_delim
);
73 // Found version string.
74 name
= string(data
.begin(), data
.begin() + n
);
75 n
= data
.find_last_of(version_delim
);
76 data
.erase(data
.begin(), data
.begin() + n
+ 1);
83 // No versioning info.
84 name
= string(data
.begin(), data
.end());
85 version_status
= symbol::none
;
88 // Set the demangled name.
89 demangled_name
= demangle(name
);
95 const char tab
= '\t';
98 if (demangled_name
!= name
)
99 cout
<< demangled_name
<< endl
;
102 switch (version_status
)
111 vers
= "incompatible";
114 vers
= "unversioned";
119 cout
<< "version status: " << vers
<< endl
;
121 if (version_name
.size()
122 && (version_status
== compatible
|| version_status
== incompatible
))
123 cout
<< version_name
<< endl
;
129 type_string
= "function";
132 type_string
= "object";
138 type_string
= "uncategorized";
141 type_string
= "<default>";
143 cout
<< "type: " << type_string
<< endl
;
145 if (type
== object
|| type
== tls
)
146 cout
<< "type size: " << size
<< endl
;
148 string status_string
;
152 status_string
= "added";
155 status_string
= "subtracted";
158 status_string
= "undesignated";
161 status_string
= "<default>";
163 cout
<< "status: " << status_string
<< endl
;
170 check_version(symbol
& test
, bool added
)
172 // Construct list of compatible versions.
173 typedef std::vector
<std::string
> compat_list
;
174 static compat_list known_versions
;
175 if (known_versions
.empty())
177 // NB: First version here must be the default version for this
178 // version of DT_SONAME.
179 known_versions
.push_back("GLIBCXX_3.4");
180 known_versions
.push_back("GLIBCXX_LDBL_3.4");
181 known_versions
.push_back("GLIBCXX_3.4.1");
182 known_versions
.push_back("GLIBCXX_3.4.2");
183 known_versions
.push_back("GLIBCXX_3.4.3");
184 known_versions
.push_back("GLIBCXX_3.4.4");
185 known_versions
.push_back("GLIBCXX_3.4.5");
186 known_versions
.push_back("GLIBCXX_3.4.6");
187 known_versions
.push_back("GLIBCXX_3.4.7");
188 known_versions
.push_back("GLIBCXX_LDBL_3.4.7");
189 known_versions
.push_back("GLIBCXX_3.4.8");
190 known_versions
.push_back("GLIBCXX_3.4.9");
191 known_versions
.push_back("GLIBCXX_3.4.10");
192 known_versions
.push_back("GLIBCXX_LDBL_3.4.10");
193 known_versions
.push_back("GLIBCXX_3.4.11");
194 known_versions
.push_back("GLIBCXX_3.4.12");
195 known_versions
.push_back("GLIBCXX_3.4.13");
196 known_versions
.push_back("GLIBCXX_3.4.14");
197 known_versions
.push_back("GLIBCXX_3.4.15");
198 known_versions
.push_back("GLIBCXX_3.4.16");
199 known_versions
.push_back("GLIBCXX_3.4.17");
200 known_versions
.push_back("GLIBCXX_3.4.18");
201 known_versions
.push_back("GLIBCXX_3.4.19");
202 known_versions
.push_back("GLIBCXX_3.4.20");
203 known_versions
.push_back("GLIBCXX_3.4.21");
204 known_versions
.push_back("GLIBCXX_LDBL_3.4.21");
205 known_versions
.push_back("GLIBCXX_3.4.22");
206 known_versions
.push_back("GLIBCXX_3.4.23");
207 known_versions
.push_back("GLIBCXX_3.4.24");
208 known_versions
.push_back("GLIBCXX_3.4.25");
209 known_versions
.push_back("CXXABI_1.3");
210 known_versions
.push_back("CXXABI_LDBL_1.3");
211 known_versions
.push_back("CXXABI_1.3.1");
212 known_versions
.push_back("CXXABI_1.3.2");
213 known_versions
.push_back("CXXABI_1.3.3");
214 known_versions
.push_back("CXXABI_1.3.4");
215 known_versions
.push_back("CXXABI_1.3.5");
216 known_versions
.push_back("CXXABI_1.3.6");
217 known_versions
.push_back("CXXABI_1.3.7");
218 known_versions
.push_back("CXXABI_1.3.8");
219 known_versions
.push_back("CXXABI_1.3.9");
220 known_versions
.push_back("CXXABI_1.3.10");
221 known_versions
.push_back("CXXABI_1.3.11");
222 known_versions
.push_back("CXXABI_TM_1");
223 known_versions
.push_back("CXXABI_FLOAT128");
225 compat_list::iterator begin
= known_versions
.begin();
226 compat_list::iterator end
= known_versions
.end();
228 // Check for compatible version.
229 if (test
.version_name
.size())
231 compat_list::iterator it1
= find(begin
, end
, test
.version_name
);
232 compat_list::iterator it2
= find(begin
, end
, test
.name
);
234 test
.version_status
= symbol::compatible
;
236 test
.version_status
= symbol::incompatible
;
238 // Check that added symbols are added in the latest pre-release version.
239 bool latestp
= (test
.version_name
== "GLIBCXX_3.4.25"
240 || test
.version_name
== "CXXABI_1.3.11"
241 || test
.version_name
== "CXXABI_FLOAT128"
242 || test
.version_name
== "CXXABI_TM_1");
243 if (added
&& !latestp
)
244 test
.version_status
= symbol::incompatible
;
246 // Check that long double compatibility symbols demangled as
247 // __float128 and regular __float128 symbols are put into some _LDBL_
248 // or _FLOAT128 version name.
249 if (added
&& test
.demangled_name
.find("__float128") != std::string::npos
250 && test
.demangled_name
.find("std::__cxx11::") != 0)
252 if (test
.version_name
.find("_LDBL_") == std::string::npos
253 && test
.version_name
.find("_FLOAT128") == std::string::npos
)
254 test
.version_status
= symbol::incompatible
;
257 // Check for weak label.
258 if (it1
== end
&& it2
== end
)
259 test
.version_status
= symbol::incompatible
;
264 // version as compatible
271 // New version labels are ok. The rest are not.
272 compat_list::iterator it2
= find(begin
, end
, test
.name
);
274 test
.version_status
= symbol::compatible
;
276 test
.version_status
= symbol::incompatible
;
279 return test
.version_status
== symbol::compatible
;
283 check_compatible(symbol
& lhs
, symbol
& rhs
, bool verbose
)
286 const char tab
= '\t';
288 // Check to see if symbol_objects are compatible.
289 if (lhs
.type
!= rhs
.type
)
293 cout
<< tab
<< "incompatible types" << endl
;
296 if (lhs
.name
!= rhs
.name
)
300 cout
<< tab
<< "incompatible names" << endl
;
303 if (lhs
.size
!= rhs
.size
)
308 cout
<< tab
<< "incompatible sizes" << endl
;
309 cout
<< tab
<< lhs
.size
<< endl
;
310 cout
<< tab
<< rhs
.size
<< endl
;
314 if (lhs
.version_name
!= rhs
.version_name
315 && !check_version(lhs
) && !check_version(rhs
))
320 cout
<< tab
<< "incompatible versions" << endl
;
321 cout
<< tab
<< lhs
.version_name
<< endl
;
322 cout
<< tab
<< rhs
.version_name
<< endl
;
334 has_symbol(const string
& name
, const symbols
& s
) throw()
335 { return s
.find(name
) != s
.end(); }
338 get_symbol(const string
& name
, const symbols
& s
)
340 symbols::const_iterator i
= s
.find(name
);
348 os
<< "get_symbol failed for symbol " << name
;
349 __throw_logic_error(os
.str().c_str());
354 examine_symbol(const char* name
, const char* file
)
358 symbols s
= create_symbols(file
);
359 const symbol
& sym
= get_symbol(name
, s
);
363 { __throw_exception_again
; }
367 compare_symbols(const char* baseline_file
, const char* test_file
,
370 // Input both lists of symbols into container.
371 symbols baseline
= create_symbols(baseline_file
);
372 symbols test
= create_symbols(test_file
);
374 // Sanity check results.
375 if (!baseline
.size() || !test
.size())
377 cerr
<< "Problems parsing the list of exported symbols." << endl
;
381 // Check to see if any long double compatibility symbols are produced.
382 bool ld_version_found(false);
383 symbols::iterator
li(test
.begin());
384 while (!ld_version_found
&& li
!= test
.end())
386 if (li
->second
.version_name
.find("_LDBL_") != std::string::npos
)
387 ld_version_found
= true;
392 // Assuming all baseline names and test names are both unique w/ no
395 // The names added to missing_names are baseline names not found in
397 // -> symbols that have been deleted.
399 // The names added to added_names are test names not in
401 // -> symbols that have been added.
402 typedef std::vector
<std::string
> symbol_names
;
403 symbol_names shared_names
;
404 symbol_names missing_names
;
405 symbol_names added_names
;
406 for (li
= test
.begin(); li
!= test
.end(); ++li
)
407 added_names
.push_back(li
->first
);
409 for (symbols::iterator i
= baseline
.begin(); i
!= baseline
.end(); ++i
)
411 string
name(i
->first
);
412 symbol_names::iterator end
= added_names
.end();
413 symbol_names::iterator it
= find(added_names
.begin(), end
, name
);
417 shared_names
.push_back(name
);
418 added_names
.erase(it
);
422 // Iff no test long double compatibility symbols at all and the symbol
423 // missing is a baseline long double compatibility symbol, skip.
424 string
version_name(i
->second
.version_name
);
425 bool base_ld(version_name
.find("_LDBL_") != std::string::npos
);
426 if (!base_ld
|| base_ld
&& ld_version_found
)
427 missing_names
.push_back(name
);
431 // Fill out list of incompatible symbols.
432 typedef pair
<symbol
, symbol
> symbol_pair
;
433 vector
<symbol_pair
> incompatible
;
435 // Fill out list of undesignated symbols.
436 vector
<symbol
> undesignated
;
438 // Check missing names for compatibility.
439 for (size_t j
= 0; j
< missing_names
.size(); ++j
)
441 symbol
& sbase
= baseline
[missing_names
[j
]];
442 sbase
.status
= symbol::subtracted
;
443 incompatible
.push_back(symbol_pair(sbase
, sbase
));
446 // Check shared names for compatibility.
447 const symbol_names::size_type shared_size
= shared_names
.size();
448 for (size_t k
= 0; k
< shared_size
; ++k
)
450 symbol
& sbase
= baseline
[shared_names
[k
]];
451 symbol
& stest
= test
[shared_names
[k
]];
452 stest
.status
= symbol::existing
;
453 if (!check_compatible(sbase
, stest
))
454 incompatible
.push_back(symbol_pair(sbase
, stest
));
457 // Check added names for compatibility.
458 const symbol_names::size_type added_size
= added_names
.size();
459 for (size_t l
= 0; l
< added_size
; ++l
)
461 symbol
& stest
= test
[added_names
[l
]];
463 // Mark TLS as undesignated, remove from added.
464 if (stest
.type
== symbol::tls
)
466 stest
.status
= symbol::undesignated
;
467 if (!check_version(stest
, false))
468 incompatible
.push_back(symbol_pair(stest
, stest
));
470 undesignated
.push_back(stest
);
474 stest
.status
= symbol::added
;
475 if (!check_version(stest
, true))
476 incompatible
.push_back(symbol_pair(stest
, stest
));
480 // Normalize added names and undesignated names.
481 const size_t undesignated_size
= undesignated
.size();
482 for (size_t l
= 0; l
< undesignated_size
; ++l
)
484 symbol
& sundes
= undesignated
[l
];
485 symbol_names::iterator end
= added_names
.end();
486 symbol_names::iterator it
= find(added_names
.begin(), end
, sundes
.name
);
490 added_names
.erase(it
);
493 __throw_runtime_error(sundes
.name
.c_str());
498 if (verbose
&& added_names
.size())
500 cout
<< endl
<< added_names
.size() << " added symbols " << endl
;
501 for (size_t j
= 0; j
< added_names
.size() ; ++j
)
504 test
[added_names
[j
]].print();
508 if (verbose
&& missing_names
.size())
510 cout
<< endl
<< missing_names
.size() << " missing symbols " << endl
;
511 for (size_t j
= 0; j
< missing_names
.size() ; ++j
)
514 baseline
[missing_names
[j
]].print();
518 if (verbose
&& undesignated
.size())
520 cout
<< endl
<< undesignated
.size() << " undesignated symbols " << endl
;
521 for (size_t j
= 0; j
< undesignated
.size() ; ++j
)
523 // First, print index.
526 // Second, report name.
527 symbol
& s
= undesignated
[j
];
532 if (verbose
&& incompatible
.size())
534 cout
<< endl
<< incompatible
.size() << " incompatible symbols " << endl
;
535 for (size_t j
= 0; j
< incompatible
.size() ; ++j
)
537 // First, print index.
540 // Second, report name.
541 symbol
& sbase
= incompatible
[j
].first
;
542 symbol
& stest
= incompatible
[j
].second
;
545 // Third, report reason or reasons incompatible.
546 check_compatible(sbase
, stest
, true);
550 cout
<< "\n\t\t==== libstdc++-v3 check-abi Summary ====" << endl
;
552 cout
<< "# of added symbols:\t\t " << added_names
.size() << endl
;
553 cout
<< "# of missing symbols:\t\t " << missing_names
.size() << endl
;
554 cout
<< "# of undesignated symbols:\t " << undesignated
.size() << endl
;
555 cout
<< "# of incompatible symbols:\t " << incompatible
.size() << endl
;
557 cout
<< "using: " << baseline_file
<< endl
;
559 return !(missing_names
.size() || incompatible
.size());
564 create_symbols(const char* file
)
570 // Organize file data into an associated container (symbols) of symbol
571 // objects mapped to mangled names without versioning
575 while (getline(ifs
, line
).good())
586 os
<< "create_symbols failed for file " << file
;
587 __throw_runtime_error(os
.str().c_str());
594 demangle(const std::string
& mangled
)
597 if (mangled
[0] != '_' || mangled
[1] != 'Z')
599 // This is not a mangled symbol, thus has "C" linkage.
604 // Use __cxa_demangle to demangle.
606 char* ptr
= abi::__cxa_demangle(mangled
.c_str(), 0, 0, &status
);
617 name
= "error code = 0: success";
620 name
= "error code = -1: memory allocation failure";
623 name
= "error code = -2: invalid mangled name";
626 name
= "error code = -3: invalid arguments";
629 name
= "error code unknown - who knows what happened";