os/persistentdata/persistentstorage/sqlite3api/TEST/TCL/tcldistribution/unix/ldAix
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
     1 #!/bin/sh
     2 #
     3 # ldAix ldCmd ldArg ldArg ...
     4 #
     5 # This shell script provides a wrapper for ld under AIX in order to
     6 # create the .exp file required for linking.  Its arguments consist
     7 # of the name and arguments that would normally be provided to the
     8 # ld command.  This script extracts the names of the object files
     9 # from the argument list, creates a .exp file describing all of the
    10 # symbols exported by those files, and then invokes "ldCmd" to
    11 # perform the real link.
    12 #
    13 # RCS: @(#) $Id: ldAix,v 1.4 2002/09/27 01:28:26 hobbs Exp $
    14 
    15 # Extract from the arguments the names of all of the object files.
    16 
    17 args=$*
    18 ofiles=""
    19 for i do
    20     x=`echo $i | grep '[^.].o$'`
    21     if test "$x" != ""; then
    22 	ofiles="$ofiles $i"
    23     fi
    24 done
    25 
    26 # Extract the name of the object file that we're linking.
    27 outputFile=`echo $args | sed -e 's/.*-o \([^ ]*\).*/\1/'`
    28 
    29 # Create the export file from all of the object files, using nm followed
    30 # by sed editing.  Here are some tricky aspects of this:
    31 #
    32 # 1. Nm produces different output under AIX 4.1 than under AIX 3.2.5;
    33 #    the following statements handle both versions.
    34 # 2. Use the -g switch to nm instead of -e under 4.1 (this shows just
    35 #    externals, not statics;  -g isn't available under 3.2.5, though).
    36 # 3. Use the -X32_64 switch to nm on AIX-4+ to handle 32 or 64bit compiles.
    37 # 4. Eliminate lines that end in ":": these are the names of object
    38 #    files (relevant in 4.1 only).
    39 # 5. Eliminate entries with the "U" key letter;  these are undefined
    40 #    symbols (relevant in 4.1 only).
    41 # 6. Eliminate lines that contain the string "0|extern" preceded by space;
    42 #    in 3.2.5, these are undefined symbols (address 0).
    43 # 7. Eliminate lines containing the "unamex" symbol.  In 3.2.5, these
    44 #    are also undefined symbols.
    45 # 8. If a line starts with ".", delete the leading ".", since this will
    46 #    just cause confusion later.
    47 # 9. Eliminate everything after the first field in a line, so that we're
    48 #    left with just the symbol name.
    49 
    50 nmopts="-g -C"
    51 osver=`uname -v`
    52 if test $osver -eq 3; then
    53   nmopts="-e"
    54 fi
    55 if test $osver -gt 3; then
    56   nmopts="$nmopts -X32_64"
    57 fi
    58 rm -f lib.exp
    59 echo "#! $outputFile" >lib.exp
    60 /usr/ccs/bin/nm $nmopts -h $ofiles | sed -e '/:$/d' -e '/ U /d' -e '/[ 	]0|extern/d' -e '/unamex/d' -e 's/^\.//' -e 's/[ 	|].*//' | sort | uniq >>lib.exp
    61 
    62 # If we're linking a .a file, then link all the objects together into a 
    63 # single file "shr.o" and then put that into the archive.  Otherwise link 
    64 # the object files directly into the .a file.
    65 
    66 outputFile=`echo $args | sed -e 's/.*-o \([^ ]*\).*/\1/'`
    67 noDotA=`echo $outputFile | sed -e '/\.a$/d'`
    68 echo "noDotA=\"$noDotA\""
    69 if test "$noDotA" = "" ; then
    70     linkArgs=`echo $args | sed -e 's/-o .*\.a /-o shr.o /'`
    71     echo $linkArgs
    72     eval $linkArgs
    73     echo ar cr $outputFile shr.o
    74     ar cr $outputFile shr.o
    75     rm -f shr.o
    76 else
    77     eval $args
    78 fi