52 lines
1.5 KiB
Bash
Executable File
52 lines
1.5 KiB
Bash
Executable File
#!/bin/bash
|
|
|
|
#########################################################################
|
|
# #
|
|
# OCaml #
|
|
# #
|
|
# Damien Doligez, projet Cristal, INRIA Rocquencourt #
|
|
# #
|
|
# Copyright 2005 Institut National de Recherche en Informatique et #
|
|
# en Automatique. All rights reserved. This file is distributed #
|
|
# under the terms of the Q Public License version 1.0. #
|
|
# #
|
|
#########################################################################
|
|
|
|
TMP="${TMPDIR=/tmp}"
|
|
TEMP="${TMP}"/ocaml-objcopy-$$.o
|
|
UNDEF="${TMP}"/ocaml-objcopy-$$.sym
|
|
|
|
usage () {
|
|
echo "usage: objcopy {--redefine-sym <old>=<new>} file.o" >&2
|
|
exit 2
|
|
}
|
|
|
|
: > "$UNDEF"
|
|
|
|
while : ; do
|
|
case $# in
|
|
0) break;;
|
|
*) case $1 in
|
|
--redefine-sym)
|
|
case $2 in
|
|
*=*) ALIAS="$ALIAS -i${2#*=}:${2%%=*}"
|
|
echo ${2%%=*} >>"$UNDEF"
|
|
;;
|
|
*) usage;;
|
|
esac
|
|
shift 2
|
|
;;
|
|
-*) usage;;
|
|
*) case $FILE in
|
|
"") FILE=$1; shift;;
|
|
*) usage;;
|
|
esac;;
|
|
esac;;
|
|
esac
|
|
done
|
|
|
|
ld -o "$TEMP" -r $ALIAS "$FILE"
|
|
ld -o "$FILE" -r -unexported_symbols_list "$UNDEF" "$TEMP"
|
|
|
|
rm -f "$TEMP" "$UNDEF"
|