mirror/openssl
2
0
Fork 0
mirror of https://github.com/openssl/openssl.git synced 2025-02-23 14:42:15 +08:00
Code Issues Packages Projects Releases Wiki Activity

test/recipes/01-test_symbol_presence.t: Treat common symbols specially

Browse Source 
Common symbols (type 'C' in the 'nm' output) are allowed to be defined more
than once.  This makes test/recipes/01-test_symbol_presence.t reflect that.

Fixes #22869 (partially)
Fixes #22837

Reviewed-by: Matt Caswell <matt@openssl.org>
Reviewed-by: Tomas Mraz <tomas@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/22880)
This commit is contained in:
Richard Levitte 2023-11-30 09:02:25 +01:00
parent 6c63b7e861
commit 4ff5137ff5
1 changed files with 26 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
test/recipes/01-test_symbol_presence.t
View File

@ -114,23 +114,34 @@ foreach (sort keys %stlibname) {
my @arrays = ( \@stlib_lines );
push @arrays, \@shlib_lines unless disabled('shared');
foreach (@arrays) {
my %commons;
foreach (@$_) {
if (m|^(.*) C .*|) {
$commons{$1}++;
}
}
foreach (sort keys %commons) {
note "Common symbol: $_";
}
@$_ =
sort
map {
# Drop the first space and everything following it
s| .*||;
# Drop OpenSSL dynamic version information if there is any
s|\@\@.+$||;
# Return the result
$_
}
# Drop any symbol starting with a double underscore, they
# are reserved for the compiler / system ABI and are none
# of our business
grep !m|^__|,
# Only look at external definitions
grep m|.* [BCDST] .*|,
@$_ ),
( map {
# Drop the first space and everything following it
s| .*||;
# Drop OpenSSL dynamic version information if there is any
s|\@\@.+$||;
# Return the result
$_
}
# Drop any symbol starting with a double underscore, they
# are reserved for the compiler / system ABI and are none
# of our business
grep !m|^__|,
# Only look at external definitions
grep m|.* [BDST] .*|,
@$_ ),
keys %commons;
}
# Massage the mkdef.pl output to only contain global symbols