]> rtime.felk.cvut.cz Git - l4.git/blob - l4/pkg/l4re-core/libstdc++-v3/contrib/libstdc++-v3-4.9/scripts/extract_symvers.in
Update
[l4.git] / l4 / pkg / l4re-core / libstdc++-v3 / contrib / libstdc++-v3-4.9 / scripts / extract_symvers.in
1 #!/bin/sh
2
3 # Copyright (C) 2002-2014 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
21 if test ${#} -lt 2 || test $1 = '--help'; then
22   echo "Usage:  extract_symvers  shared_lib output_file" 1>&2
23   exit 1
24 fi
25
26 lib=$1
27 output=$2
28
29 # This avoids weird sorting problems later.
30 LC_ALL=C
31 export LC_ALL
32 LANG=C
33 export LANG
34
35 tmp=extract.$$
36
37 case `uname -s` in
38 SunOS)
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   ;;
69 esac
70
71 # I think we'll be doing some more with this file, but for now, dump.
72 mv $tmp $output
73
74 exit 0