2010-01-16 23:09:27 +00:00
|
|
|
#! @shell@ -e
|
2016-01-25 08:54:10 +00:00
|
|
|
path_backup="$PATH"
|
2015-12-17 22:02:40 +00:00
|
|
|
if [ -n "@coreutils@" ]; then
|
|
|
|
PATH="@coreutils@/bin"
|
|
|
|
fi
|
2010-01-16 23:09:27 +00:00
|
|
|
|
2014-10-10 12:25:23 +00:00
|
|
|
if [ -n "$NIX_GNAT_WRAPPER_START_HOOK" ]; then
|
2010-01-16 23:09:27 +00:00
|
|
|
source "$NIX_GNAT_WRAPPER_START_HOOK"
|
|
|
|
fi
|
|
|
|
|
2014-10-10 12:25:23 +00:00
|
|
|
if [ -z "$NIX_GNAT_WRAPPER_FLAGS_SET" ]; then
|
2010-01-16 23:09:27 +00:00
|
|
|
source @out@/nix-support/add-flags.sh
|
|
|
|
fi
|
|
|
|
|
|
|
|
source @out@/nix-support/utils.sh
|
|
|
|
|
|
|
|
|
|
|
|
# Figure out if linker flags should be passed. GCC prints annoying
|
|
|
|
# warnings when they are not needed.
|
|
|
|
dontLink=0
|
|
|
|
getVersion=0
|
|
|
|
nonFlagArgs=0
|
|
|
|
|
|
|
|
for i in "$@"; do
|
2014-10-10 12:25:23 +00:00
|
|
|
if [ "$i" = -c ]; then
|
2010-01-16 23:09:27 +00:00
|
|
|
dontLink=1
|
2014-10-10 12:25:23 +00:00
|
|
|
elif [ "$i" = -M ]; then
|
2010-01-16 23:09:27 +00:00
|
|
|
dontLink=1
|
2014-10-10 12:25:23 +00:00
|
|
|
elif [ "${i:0:1}" != - ]; then
|
2010-01-16 23:09:27 +00:00
|
|
|
nonFlagArgs=1
|
2014-10-10 12:25:23 +00:00
|
|
|
elif [ "$i" = -m32 ]; then
|
|
|
|
if [ -e @out@/nix-support/dynamic-linker-m32 ]; then
|
2010-01-16 23:09:27 +00:00
|
|
|
NIX_LDFLAGS="$NIX_LDFLAGS -dynamic-linker $(cat @out@/nix-support/dynamic-linker-m32)"
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
|
|
|
|
# If we pass a flag like -Wl, then gcc will call the linker unless it
|
|
|
|
# can figure out that it has to do something else (e.g., because of a
|
|
|
|
# "-c" flag). So if no non-flag arguments are given, don't pass any
|
|
|
|
# linker flags. This catches cases like "gcc" (should just print
|
|
|
|
# "gcc: no input files") and "gcc -v" (should print the version).
|
2014-10-10 12:25:23 +00:00
|
|
|
if [ "$nonFlagArgs" = 0 ]; then
|
2010-01-16 23:09:27 +00:00
|
|
|
dontLink=1
|
|
|
|
fi
|
|
|
|
|
|
|
|
|
|
|
|
# Optionally filter out paths not refering to the store.
|
|
|
|
params=("$@")
|
2014-10-10 12:25:23 +00:00
|
|
|
if [ "$NIX_ENFORCE_PURITY" = 1 -a -n "$NIX_STORE" ]; then
|
2010-01-16 23:09:27 +00:00
|
|
|
rest=()
|
|
|
|
n=0
|
2014-10-10 12:25:23 +00:00
|
|
|
while [ $n -lt ${#params[*]} ]; do
|
2010-01-16 23:09:27 +00:00
|
|
|
p=${params[n]}
|
|
|
|
p2=${params[$((n+1))]}
|
2014-10-10 12:25:23 +00:00
|
|
|
if [ "${p:0:3}" = -L/ ] && badPath "${p:2}"; then
|
2010-01-16 23:09:27 +00:00
|
|
|
skip $p
|
2014-10-10 12:25:23 +00:00
|
|
|
elif [ "${p:0:3}" = -I/ ] && badPath "${p:2}"; then
|
2010-01-16 23:09:27 +00:00
|
|
|
skip $p
|
2014-10-10 12:25:23 +00:00
|
|
|
elif [ "${p:0:4}" = -aI/ ] && badPath "${p:3}"; then
|
2010-01-16 23:09:27 +00:00
|
|
|
skip $p
|
2014-10-10 12:25:23 +00:00
|
|
|
elif [ "${p:0:4}" = -aO/ ] && badPath "${p:3}"; then
|
2010-01-16 23:09:27 +00:00
|
|
|
skip $p
|
|
|
|
else
|
|
|
|
rest=("${rest[@]}" "$p")
|
|
|
|
fi
|
|
|
|
n=$((n + 1))
|
|
|
|
done
|
|
|
|
params=("${rest[@]}")
|
|
|
|
fi
|
|
|
|
|
|
|
|
|
|
|
|
# Add the flags for the GNAT compiler proper.
|
|
|
|
extraAfter=($NIX_GNATFLAGS_COMPILE)
|
|
|
|
extraBefore=()
|
|
|
|
|
|
|
|
if [ "`basename $0`x" = "gnatmakex" ]; then
|
|
|
|
extraBefore=("--GNATBIND=@out@/bin/gnatbind --GNATLINK=@out@/bin/gnatlink ")
|
|
|
|
fi
|
|
|
|
|
|
|
|
# Add the flags that should be passed to the linker (and prevent
|
|
|
|
# `ld-wrapper' from adding NIX_LDFLAGS again).
|
|
|
|
#for i in $NIX_LDFLAGS_BEFORE; do
|
|
|
|
# extraBefore=(${extraBefore[@]} "-largs $i")
|
|
|
|
#done
|
|
|
|
|
|
|
|
# Optionally print debug info.
|
2014-10-10 12:25:23 +00:00
|
|
|
if [ -n "$NIX_DEBUG" ]; then
|
2014-10-10 11:49:26 +00:00
|
|
|
echo "original flags to @prog@:" >&2
|
2010-01-16 23:09:27 +00:00
|
|
|
for i in "${params[@]}"; do
|
|
|
|
echo " $i" >&2
|
|
|
|
done
|
2014-10-10 11:49:26 +00:00
|
|
|
echo "extraBefore flags to @prog@:" >&2
|
2010-01-16 23:09:27 +00:00
|
|
|
for i in ${extraBefore[@]}; do
|
|
|
|
echo " $i" >&2
|
|
|
|
done
|
2014-10-10 11:49:26 +00:00
|
|
|
echo "extraAfter flags to @prog@:" >&2
|
2010-01-16 23:09:27 +00:00
|
|
|
for i in ${extraAfter[@]}; do
|
|
|
|
echo " $i" >&2
|
|
|
|
done
|
|
|
|
fi
|
|
|
|
|
2014-10-10 12:25:23 +00:00
|
|
|
if [ -n "$NIX_GNAT_WRAPPER_EXEC_HOOK" ]; then
|
2010-01-16 23:09:27 +00:00
|
|
|
source "$NIX_GNAT_WRAPPER_EXEC_HOOK"
|
|
|
|
fi
|
|
|
|
|
2016-01-25 08:54:10 +00:00
|
|
|
PATH="$path_backup"
|
2014-10-10 11:49:26 +00:00
|
|
|
exec @prog@ ${extraBefore[@]} "${params[@]}" ${extraAfter[@]}
|