pkgsrc/mk/wrapper/logic
jlam bd720de98f Allow the wrapper-specific transform scripts to replace one arg with
several args by setting split_arg="yes" as part of the transformation.
2004-12-05 03:43:18 +00:00

287 lines
9.1 KiB
Text

# $NetBSD: logic,v 1.7 2004/12/05 03:43:18 jlam Exp $
#
# Copyright (c) 2004 The NetBSD Foundation, Inc.
# All rights reserved.
#
# This code is derived from software contributed to The NetBSD Foundation
# by Johnny C. Lam.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions
# are met:
# 1. Redistributions of source code must retain the above copyright
# notice, this list of conditions and the following disclaimer.
# 2. Redistributions in binary form must reproduce the above copyright
# notice, this list of conditions and the following disclaimer in the
# documentation and/or other materials provided with the distribution.
# 3. All advertising materials mentioning features or use of this software
# must display the following acknowledgement:
# This product includes software developed by the NetBSD
# Foundation, Inc. and its contributors.
# 4. Neither the name of The NetBSD Foundation nor the names of its
# contributors may be used to endorse or promote products derived
# from this software without specific prior written permission.
#
# THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
# ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
# TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
# BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
# Empty out the argument buffer and fill up the command buffer.
skipargs=0
while ! queue_is_empty argbuf; do
#
# Grab the next argument from the head of the argument buffer
# and return it in $arg.
#
argok=no
while $test "$argok" = "no"; do
if queue_is_empty argbuf; then
argok=yes
continue
fi
pop_queue argbuf arg
$debug_log $wrapperlog " (logic) pop: $arg"
#
# Toggle whether we want to transform $arg or if we
# want to pass it unmodified into the command buffer.
#
if $test $skipargs -eq 0; then
do_transform=yes
else
skipargs=`$expr $skipargs - 1`
do_transform=no
argok=yes
continue
fi
case $arg in
######################################################
# Split direct paths to shared libraries into the
# "-Ldir -llib" equivalent
######################################################
/*/lib*.so|/*/lib*.so.[0-9]*)
dir="${arg%/lib*}"
lib="${arg#$dir/lib}"
case $lib in
*/*) argok=yes; continue ;;
*.so) lib="${lib%.so}" ;;
*.so.[0-9]*) lib="${lib%.so.[0-9]*}" ;;
esac
prepend_queue argbuf "-l$lib"
$debug_log $wrapperlog " (logic) pre: -l$lib"
prepend_queue argbuf "-L$dir"
$debug_log $wrapperlog " (logic) pre: -L$dir"
;;
/*/lib*.dylib) # Darwin
dir="${arg%/lib*.dylib}"
lib="${arg#$dir/lib}"
case $lib in
*/*) argok=yes; continue ;;
*.dylib) lib="${lib%.dylib}" ;;
esac
prepend_queue argbuf "-l$lib"
$debug_log $wrapperlog " (logic) pre: -l$lib"
prepend_queue argbuf "-L$dir"
$debug_log $wrapperlog " (logic) pre: -L$dir"
;;
######################################################
# Remove extraneous comma in "-Wl,-R,/dir" and in
# "-Wl,-L,/dir".
######################################################
-Wl,-L,*)
arg="-Wl,-L${arg#-Wl,-L,}"
$debug_log $wrapperlog " (logic) pre: $arg"
prepend_queue argbuf "$arg"
;;
-Wl,-R,*)
arg="-Wl,-R${arg#-Wl,-R,}"
$debug_log $wrapperlog " (logic) pre: $arg"
prepend_queue argbuf "$arg"
;;
######################################################
# Merge "-Wl,-R -Wl,/dir" into a single "-Wl,-R/dir".
# Same for -Wl,-L, -Wl,-rpath and -Wl,-rpath-link.
######################################################
-Wl,-[LR])
pop_queue argbuf nextarg
$debug_log $wrapperlog " (logic) pop: $nextarg"
shquote "${nextarg#-Wl,}"; nextarg="$shquoted"
$debug_log $wrapperlog " (logic) pre: $arg$nextarg"
prepend_queue argbuf "$arg$nextarg"
;;
-Wl,-rpath|-Wl,-rpath-link|-Wl,--rpath)
pop_queue argbuf nextarg
$debug_log $wrapperlog " (logic) pop: $nextarg"
shquote "${nextarg#-Wl,}"; nextarg="$shquoted"
$debug_log $wrapperlog " (logic) pre: $arg,$nextarg"
prepend_queue argbuf "$arg,$nextarg"
;;
######################################################
# Remove rpath options that try to add relative paths
# to the runtime library search path. This basically
# cleans up after lazy programmers who can't write
# Makefiles.
######################################################
-R[!/]*|-Wl,-R[!/]*|\
-Wl,-rpath,[!/]*|-Wl,-rpath-link,[!/]*|-Wl,--rpath,[!/]*)
$debug_log $wrapperlog " (logic) drop: $arg"
;;
######################################################
# Remove consecutive, repeated library options.
######################################################
-l*)
head_queue argbuf nextarg
while $test "$nextarg" = "$arg"; do
pop_queue argbuf nextarg
$debug_log $wrapperlog " (logic) drop: $nextarg"
if queue_is_empty argbuf; then
break
else
head_queue argbuf nextarg
fi
done
argok=yes
;;
######################################################
# The -o option takes an extra argument that should
# be passed unmodified.
#######################################################
-o)
skipargs=1
argok=yes
;;
######################################################
# GNU ld uses "--dynamic-linker /path/to/shared/object"
# to set the dynamic linker code for ELF executables.
######################################################
--dynamic-linker)
skipargs=1
argok=yes
;;
######################################################
# Darwin's linker uses:
#
# -dylib_file /path/shlib:/path2/shlib
# -dylib_install_name /path/shlib
# -install_name /path/shlib
#
# to pass the installed locations for the shared
# libraries to the linker, and we need to pass the extra
# argument unmodified. The purpose of
# -seg_addr_table_filename is more obscure, but Darwin's
# imake rules use it.
######################################################
-dylib_file|-dylib_install_name|-install_name|\
-seg_addr_table_filename)
skipargs=1
argok=yes
;;
######################################################
# Leave all else untouched.
######################################################
*)
argok=yes
esac
done
# Try to look up the transformed $arg in the cache, but if
# not there, then apply the transformations and save the result
# in the cache.
#
case $do_transform in
yes)
. $cache
case $cachehit in
yes)
# The cache was hit and $arg is set.
$debug_log $wrapperlog " (logic) to: $arg [cached]"
;;
*)
# Apply transformations to $arg.
addtocache=no
split_arg=no
case $skip_transform in
yes)
$debug_log $wrapperlog " (logic) to: $arg [untransformed]"
;;
*)
shquote "$arg"; cachearg="$shquoted"
case $arg in
-*|/*)
arg=`$echo "X$arg" | $Xsed $transform_sed`
$debug_log $wrapperlog " (logic) to: $arg"
addtocache=yes
;;
*)
$debug_log $wrapperlog " (logic) to: $arg [untransformed]"
;;
esac
# Apply wrapper-specific transformations
# to $arg.
#
. $transform
;;
esac
##############################################
# Split all -l options along whitespace. This
# disallows library names with whitespace, but it
# allows us to handle transformations that look
# like, e.g. "-lreadline" -> "-ledit -ltermcap".
##############################################
case $arg in
-l*) split_arg=yes ;;
esac
# Re-create the cache file if we're adding to it.
case $updatecache,$addtocache in
yes,yes)
shquote "$arg"; cachedarg="$shquoted"
$cat >> $cache_body << EOF
$cachearg) arg=$cachedarg; split_arg=$split_arg; cachehit=yes ;;
EOF
$cat $cache_header \
$cache_body \
$cache_footer > $cache
;;
esac
;;
esac
case $split_arg in
######################################################
# Split some options along whitespace. This disallows
# options that contain whitespace, but it allows us to
# handle transformations that transform one arg into
# several.
######################################################
yes)
for i in $arg; do
append_queue cmdbuf "$i"
$debug_log $wrapperlog " (logic) push: $i"
done
;;
######################################################
# Everything else goes into the command buffer unchanged.
######################################################
no)
append_queue cmdbuf "$arg"
$debug_log $wrapperlog " (logic) push: $arg"
;;
esac
;;
*)
append_queue cmdbuf "$arg"
$debug_log $wrapperlog " (logic) push: $arg"
;;
esac
done