blob: cb349c2875739622664ae7743ae5fbba4a9da2ed [file] [log] [blame]
Guido van Rossumb4ae6a31996-08-08 19:05:09 +00001#!/bin/sh
2#
3# ===========================================================================
4# FILE: makexp_aix
5# TYPE: standalone executable
6# SYSTEM: AIX 3.2.5 and AIX 4
7#
8# DESCRIPTION: This script creates an export list of ALL global symbols
9# from a list of object or archive files.
10#
11# USAGE: makexp_aix <OutputFile> "<FirstLine>" <InputFile> ...
12#
13# where:
14# <OutputFile> is the target export list filename.
15# <FirstLine> is the path/file string to be appended
16# after the "#!" symbols in the first line of the
17# export file. Passing "" means deferred resolution.
18# <InputFile> is an object (.o) or an archive file (.a).
19#
20# HISTORY:
Guido van Rossumc6a681a1998-04-09 21:46:02 +000021# 3-Apr-1998 -- remove C++ entries of the form Class::method
22# Vladimir Marangozov
23#
Guido van Rossumb4ae6a31996-08-08 19:05:09 +000024# 1-Jul-1996 -- added header information
25# Vladimir Marangozov
26#
27# 28-Jun-1996 -- initial code
28# Vladimir Marangozov (Vladimir.Marangozov@imag.fr)
29# ==========================================================================
30
31# Variables
32expFileName=$1
33toAppendStr=$2
34shift; shift;
35inputFiles=$*
36automsg="Generated automatically by makexp_aix"
37notemsg="NOTE: lists _all_ global symbols defined in the above file(s)."
38curwdir=`pwd`
39
40# Create the export file and setup the header info
41echo "#!"$toAppendStr > $expFileName
42echo "*" >> $expFileName
43echo "* $automsg (`date -u`)" >> $expFileName
44echo "*" >> $expFileName
45echo "* Base Directory: $curwdir" >> $expFileName
46echo "* Input File(s) : $inputFiles" >> $expFileName
47echo "*" >> $expFileName
48echo "* $notemsg" >> $expFileName
49echo "*" >> $expFileName
50
51# Extract the symbol list using 'nm' which produces quite
52# different output under AIX 4 than under AIX 3.2.5.
53# The following handles both versions by using a common flagset.
54# Here are some hidden tricks:
55# 1. Use /usr/ccs/bin/nm. Relevant to AIX 3.2.5 which has
56# another version under /usr/ucb/bin/nm.
57# 2. Use the -B flag to have a standard BSD representation
58# of the symbol list on both AIX 3.2.5 and AIX 4. The "-B"
59# flag is missing in the AIX 3.2.5 online usage help of 'nm'.
60# 3. Use the -x flag to have a hex representation of the symbol
61# values. This fills the leading whitespaces on AIX 4,
62# thus simplifying the sed statement.
63# 4. Eliminate all entries except those with either "B", "D"
64# or "T" key letters. We are interested only in the global
65# (extern) BSS, DATA and TEXT symbols. With the same statement
66# we eliminate object member lines relevant to AIX 4.
67# 5. Eliminate entries containing a dot. We can have a dot only
68# as a symbol prefix, but such symbols are undefined externs.
69# 6. Eliminate everything including the key letter, so that we're
70# left with just the symbol name.
Guido van Rossumc6a681a1998-04-09 21:46:02 +000071# 7. Eliminate all entries containing two colons, like Class::method
Guido van Rossumb4ae6a31996-08-08 19:05:09 +000072#
Guido van Rossum8ee3e5a2005-09-14 18:09:42 +000073
74# Use -X32_64 if it appears to be implemented in this version of 'nm'.
75NM=/usr/ccs/bin/nm
76xopt=-X32_64
77$NM -e $xopt $1 >/dev/null 2>&1 || xopt=""
78
79$NM -Bex $xopt $inputFiles \
Guido van Rossumc6a681a1998-04-09 21:46:02 +000080| sed -e '/ [^BDT] /d' -e '/\./d' -e 's/.* [BDT] //' -e '/::/d' \
Guido van Rossumb4ae6a31996-08-08 19:05:09 +000081| sort | uniq >> $expFileName