1#!/bin/sh
2
3# Copyright (C) 2002-2019 Free Software Foundation, Inc.
4#
5# This file is part of the GNU ISO C++ Library.  This library is free
6# software; you can redistribute it and/or modify it under the
7# terms of the GNU General Public License as published by the
8# Free Software Foundation; either version 3, or (at your option)
9# any later version.
10#
11# This library is distributed in the hope that it will be useful,
12# but WITHOUT ANY WARRANTY; without even the implied warranty of
13# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14# GNU General Public License for more details.
15#
16# You should have received a copy of the GNU General Public License along
17# with this library; see the file COPYING3.  If not see
18# <http://www.gnu.org/licenses/>.
19
20
21if test ${#} -lt 2 || test $1 = '--help'; then
22  echo "Usage:  extract_symvers  shared_lib output_file" 1>&2
23  exit 1
24fi
25
26lib=$1
27output=$2
28
29# This avoids weird sorting problems later.
30LC_ALL=C
31export LC_ALL
32LANG=C
33export LANG
34
35tmp=extract.$$
36
37case `uname -s` in
38SunOS)
39  # Ensure that output on Solaris 2 matches readelf below without requiring
40  # GNU binutils to be installed.  This requires a combination of pvs and
41  # elfdump, which is easier handled in a perl script.
42  perl @glibcxx_srcdir@/scripts/extract_symvers.pl ${lib} > $tmp 2>&1
43  ;;
44*)
45  # GNU binutils, somewhere after version 2.11.2, requires -W/--wide to
46  # avoid default line truncation.  -W is not supported and truncation did
47  # not occur by default before that point.
48  readelf="readelf --symbols"
49  if readelf --help | grep -- --wide > /dev/null; then
50    readelf="$readelf --wide"
51  fi
52  # Omit _DYNAMIC etc. for consistency with extract_symvers.pl, only
53  # present on Solaris.
54  ${readelf} ${lib} |\
55  sed -e 's/ \[<other>: [A-Fa-f0-9]*\] //' -e '/\.dynsym/,/^$/p;d' |\
56  sed -e 's/ \[<localentry>: [0-9]*\] //' |\
57  egrep -v ' (LOCAL|UND) ' |\
58  egrep -v ' (_DYNAMIC|_GLOBAL_OFFSET_TABLE_|_PROCEDURE_LINKAGE_TABLE_|_edata|_end|_etext)$' |\
59  sed -e 's/ <processor specific>: / <processor_specific>:_/g' |\
60  sed -e 's/ <OS specific>: / <OS_specific>:_/g' |\
61  sed -e 's/ <unknown>: / <unknown>:_/g' |\
62  awk '{ if ($4 == "FUNC" || $4 == "NOTYPE")
63           printf "%s:%s\n", $4, $8;
64         else if ($4 == "OBJECT" || $4 == "TLS")
65           printf "%s:%s:%s\n", $4, $3, $8;
66       }' | sort | uniq > $tmp 2>&1
67#        else printf "Huh?  What is %s?\n", $8;
68  ;;
69esac
70
71# I think we'll be doing some more with this file, but for now, dump.
72mv $tmp $output
73
74exit 0
75