gentoo-x86/eclass/toolchain-funcs.eclass

# Copyright 1999-2014 Gentoo Foundation
# Distributed under the terms of the GNU General Public License v2
# $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.123 2013/10/12 21:31:01 vapier Exp $

# @ECLASS: toolchain-funcs.eclass
# @MAINTAINER:
# Toolchain Ninjas <toolchain@gentoo.org>
# @BLURB: functions to query common info about the toolchain
# @DESCRIPTION:
# The toolchain-funcs aims to provide a complete suite of functions
# for gleaning useful information about the toolchain and to simplify
# ugly things like cross-compiling and multilib.  All of this is done
# in such a way that you can rely on the function always returning
# something sane.

if [[ ${___ECLASS_ONCE_TOOLCHAIN_FUNCS} != "recur -_+^+_- spank" ]] ; then
___ECLASS_ONCE_TOOLCHAIN_FUNCS="recur -_+^+_- spank"

inherit multilib

# tc-getPROG <VAR [search vars]> <default> [tuple]
_tc-getPROG() {
        local tuple=$1
        local v var vars=$2
        local prog=$3

        var=${vars%% *}
        for v in ${vars} ; do
                if [[ -n ${!v} ]] ; then
                        export ${var}="${!v}"
                        echo "${!v}"
                        return 0
                fi
        done

        local search=
        [[ -n $4 ]] && search=$(type -p "$4-${prog}")
        [[ -z ${search} && -n ${!tuple} ]] && search=$(type -p "${!tuple}-${prog}")
        [[ -n ${search} ]] && prog=${search##*/}

        export ${var}=${prog}
        echo "${!var}"
}
tc-getBUILD_PROG() { _tc-getPROG CBUILD "BUILD_$1 $1_FOR_BUILD HOST$1" "${@:2}"; }
tc-getPROG() { _tc-getPROG CHOST "$@"; }

# @FUNCTION: tc-getAR
# @USAGE: [toolchain prefix]
# @RETURN: name of the archiver
tc-getAR() { tc-getPROG AR ar "$@"; }
# @FUNCTION: tc-getAS
# @USAGE: [toolchain prefix]
# @RETURN: name of the assembler
tc-getAS() { tc-getPROG AS as "$@"; }
# @FUNCTION: tc-getCC
# @USAGE: [toolchain prefix]
# @RETURN: name of the C compiler
tc-getCC() { tc-getPROG CC gcc "$@"; }
# @FUNCTION: tc-getCPP
# @USAGE: [toolchain prefix]
# @RETURN: name of the C preprocessor
tc-getCPP() { tc-getPROG CPP cpp "$@"; }
# @FUNCTION: tc-getCXX
# @USAGE: [toolchain prefix]
# @RETURN: name of the C++ compiler
tc-getCXX() { tc-getPROG CXX g++ "$@"; }
# @FUNCTION: tc-getLD
# @USAGE: [toolchain prefix]
# @RETURN: name of the linker
tc-getLD() { tc-getPROG LD ld "$@"; }
# @FUNCTION: tc-getSTRIP
# @USAGE: [toolchain prefix]
# @RETURN: name of the strip program
tc-getSTRIP() { tc-getPROG STRIP strip "$@"; }
# @FUNCTION: tc-getNM
# @USAGE: [toolchain prefix]
# @RETURN: name of the symbol/object thingy
tc-getNM() { tc-getPROG NM nm "$@"; }
# @FUNCTION: tc-getRANLIB
# @USAGE: [toolchain prefix]
# @RETURN: name of the archiver indexer
tc-getRANLIB() { tc-getPROG RANLIB ranlib "$@"; }
# @FUNCTION: tc-getOBJCOPY
# @USAGE: [toolchain prefix]
# @RETURN: name of the object copier
tc-getOBJCOPY() { tc-getPROG OBJCOPY objcopy "$@"; }
# @FUNCTION: tc-getF77
# @USAGE: [toolchain prefix]
# @RETURN: name of the Fortran 77 compiler
tc-getF77() { tc-getPROG F77 gfortran "$@"; }
# @FUNCTION: tc-getFC
# @USAGE: [toolchain prefix]
# @RETURN: name of the Fortran 90 compiler
tc-getFC() { tc-getPROG FC gfortran "$@"; }
# @FUNCTION: tc-getGCJ
# @USAGE: [toolchain prefix]
# @RETURN: name of the java compiler
tc-getGCJ() { tc-getPROG GCJ gcj "$@"; }
# @FUNCTION: tc-getPKG_CONFIG
# @USAGE: [toolchain prefix]
# @RETURN: name of the pkg-config tool
tc-getPKG_CONFIG() { tc-getPROG PKG_CONFIG pkg-config "$@"; }
# @FUNCTION: tc-getRC
# @USAGE: [toolchain prefix]
# @RETURN: name of the Windows resource compiler
tc-getRC() { tc-getPROG RC windres "$@"; }
# @FUNCTION: tc-getDLLWRAP
# @USAGE: [toolchain prefix]
# @RETURN: name of the Windows dllwrap utility
tc-getDLLWRAP() { tc-getPROG DLLWRAP dllwrap "$@"; }

# @FUNCTION: tc-getBUILD_AR
# @USAGE: [toolchain prefix]
# @RETURN: name of the archiver for building binaries to run on the build machine
tc-getBUILD_AR() { tc-getBUILD_PROG AR ar "$@"; }
# @FUNCTION: tc-getBUILD_AS
# @USAGE: [toolchain prefix]
# @RETURN: name of the assembler for building binaries to run on the build machine
tc-getBUILD_AS() { tc-getBUILD_PROG AS as "$@"; }
# @FUNCTION: tc-getBUILD_CC
# @USAGE: [toolchain prefix]
# @RETURN: name of the C compiler for building binaries to run on the build machine
tc-getBUILD_CC() { tc-getBUILD_PROG CC gcc "$@"; }
# @FUNCTION: tc-getBUILD_CPP
# @USAGE: [toolchain prefix]
# @RETURN: name of the C preprocessor for building binaries to run on the build machine
tc-getBUILD_CPP() { tc-getBUILD_PROG CPP cpp "$@"; }
# @FUNCTION: tc-getBUILD_CXX
# @USAGE: [toolchain prefix]
# @RETURN: name of the C++ compiler for building binaries to run on the build machine
tc-getBUILD_CXX() { tc-getBUILD_PROG CXX g++ "$@"; }
# @FUNCTION: tc-getBUILD_LD
# @USAGE: [toolchain prefix]
# @RETURN: name of the linker for building binaries to run on the build machine
tc-getBUILD_LD() { tc-getBUILD_PROG LD ld "$@"; }
# @FUNCTION: tc-getBUILD_STRIP
# @USAGE: [toolchain prefix]
# @RETURN: name of the strip program for building binaries to run on the build machine
tc-getBUILD_STRIP() { tc-getBUILD_PROG STRIP strip "$@"; }
# @FUNCTION: tc-getBUILD_NM
# @USAGE: [toolchain prefix]
# @RETURN: name of the symbol/object thingy for building binaries to run on the build machine
tc-getBUILD_NM() { tc-getBUILD_PROG NM nm "$@"; }
# @FUNCTION: tc-getBUILD_RANLIB
# @USAGE: [toolchain prefix]
# @RETURN: name of the archiver indexer for building binaries to run on the build machine
tc-getBUILD_RANLIB() { tc-getBUILD_PROG RANLIB ranlib "$@"; }
# @FUNCTION: tc-getBUILD_OBJCOPY
# @USAGE: [toolchain prefix]
# @RETURN: name of the object copier for building binaries to run on the build machine
tc-getBUILD_OBJCOPY() { tc-getBUILD_PROG OBJCOPY objcopy "$@"; }
# @FUNCTION: tc-getBUILD_PKG_CONFIG
# @USAGE: [toolchain prefix]
# @RETURN: name of the pkg-config tool for building binaries to run on the build machine
tc-getBUILD_PKG_CONFIG() { tc-getBUILD_PROG PKG_CONFIG pkg-config "$@"; }

# @FUNCTION: tc-export
# @USAGE: <list of toolchain variables>
# @DESCRIPTION:
# Quick way to export a bunch of compiler vars at once.
tc-export() {
        local var
        for var in "$@" ; do
                [[ $(type -t tc-get${var}) != "function" ]] && die "tc-export: invalid export variable '${var}'"
                eval tc-get${var} > /dev/null
        done
}

# @FUNCTION: tc-is-cross-compiler
# @RETURN: Shell true if we are using a cross-compiler, shell false otherwise
tc-is-cross-compiler() {
        return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]])
}

# @FUNCTION: tc-is-softfloat
# @DESCRIPTION:
# See if this toolchain is a softfloat based one.
# @CODE
# The possible return values:
#  - only:   the target is always softfloat (never had fpu)
#  - yes:    the target should support softfloat
#  - softfp: (arm specific) the target should use hardfloat insns, but softfloat calling convention
#  - no:     the target doesn't support softfloat
# @CODE
# This allows us to react differently where packages accept
# softfloat flags in the case where support is optional, but
# rejects softfloat flags where the target always lacks an fpu.
tc-is-softfloat() {
        local CTARGET=${CTARGET:-${CHOST}}
        case ${CTARGET} in
                bfin*|h8300*)
                        echo "only" ;;
                *)
                        if [[ ${CTARGET//_/-} == *-softfloat-* ]] ; then
                                echo "yes"
                        elif [[ ${CTARGET//_/-} == *-softfp-* ]] ; then
                                echo "softfp"
                        else
                                echo "no"
                        fi
                        ;;
        esac
}

# @FUNCTION: tc-is-static-only
# @DESCRIPTION:
# Return shell true if the target does not support shared libs, shell false
# otherwise.
tc-is-static-only() {
        local host=${CTARGET:-${CHOST}}

        # *MiNT doesn't have shared libraries, only platform so far
        return $([[ ${host} == *-mint* ]])
}

# @FUNCTION: tc-export_build_env
# @USAGE: [compiler variables]
# @DESCRIPTION:
# Export common build related compiler settings.
tc-export_build_env() {
        tc-export "$@"
        : ${BUILD_CFLAGS:=-O1 -pipe}
        : ${BUILD_CXXFLAGS:=-O1 -pipe}
        : ${BUILD_CPPFLAGS:=}
        : ${BUILD_LDFLAGS:=}
        export BUILD_{C,CXX,CPP,LD}FLAGS

        # Some packages use XXX_FOR_BUILD.
        local v
        for v in BUILD_{C,CXX,CPP,LD}FLAGS ; do
                export ${v#BUILD_}_FOR_BUILD="${!v}"
        done
}

# @FUNCTION: tc-env_build
# @USAGE: <command> [command args]
# @INTERNAL
# @DESCRIPTION:
# Setup the compile environment to the build tools and then execute the
# specified command.  We use tc-getBUILD_XX here so that we work with
# all of the semi-[non-]standard env vars like $BUILD_CC which often
# the target build system does not check.
tc-env_build() {
        tc-export_build_env
        CFLAGS=${BUILD_CFLAGS} \
        CXXFLAGS=${BUILD_CXXFLAGS} \
        CPPFLAGS=${BUILD_CPPFLAGS} \
        LDFLAGS=${BUILD_LDFLAGS} \
        AR=$(tc-getBUILD_AR) \
        AS=$(tc-getBUILD_AS) \
        CC=$(tc-getBUILD_CC) \
        CPP=$(tc-getBUILD_CPP) \
        CXX=$(tc-getBUILD_CXX) \
        LD=$(tc-getBUILD_LD) \
        NM=$(tc-getBUILD_NM) \
        PKG_CONFIG=$(tc-getBUILD_PKG_CONFIG) \
        RANLIB=$(tc-getBUILD_RANLIB) \
        "$@"
}

# @FUNCTION: econf_build
# @USAGE: [econf flags]
# @DESCRIPTION:
# Sometimes we need to locally build up some tools to run on CBUILD because
# the package has helper utils which are compiled+executed when compiling.
# This won't work when cross-compiling as the CHOST is set to a target which
# we cannot natively execute.
#
# For example, the python package will build up a local python binary using
# a portable build system (configure+make), but then use that binary to run
# local python scripts to build up other components of the overall python.
# We cannot rely on the python binary in $PATH as that often times will be
# a different version, or not even installed in the first place.  Instead,
# we compile the code in a different directory to run on CBUILD, and then
# use that binary when compiling the main package to run on CHOST.
#
# For example, with newer EAPIs, you'd do something like:
# @CODE
# src_configure() {
#       ECONF_SOURCE=${S}
#       if tc-is-cross-compiler ; then
#               mkdir "${WORKDIR}"/${CBUILD}
#               pushd "${WORKDIR}"/${CBUILD} >/dev/null
#               econf_build --disable-some-unused-stuff
#               popd >/dev/null
#       fi
#       ... normal build paths ...
# }
# src_compile() {
#       if tc-is-cross-compiler ; then
#               pushd "${WORKDIR}"/${CBUILD} >/dev/null
#               emake one-or-two-build-tools
#               ln/mv build-tools to normal build paths in ${S}/
#               popd >/dev/null
#       fi
#       ... normal build paths ...
# }
# @CODE
econf_build() {
        tc-env_build econf --build=${CBUILD:-${CHOST}} "$@"
}

# @FUNCTION: tc-has-openmp
# @USAGE: [toolchain prefix]
# @DESCRIPTION:
# See if the toolchain supports OpenMP.
tc-has-openmp() {
        local base="${T}/test-tc-openmp"
        cat <<-EOF > "${base}.c"
        #include <omp.h>
        int main() {
                int nthreads, tid, ret = 0;
                #pragma omp parallel private(nthreads, tid)
                {
                tid = omp_get_thread_num();
                nthreads = omp_get_num_threads(); ret += tid + nthreads;
                }
                return ret;
        }
        EOF
        $(tc-getCC "$@") -fopenmp "${base}.c" -o "${base}" >&/dev/null
        local ret=$?
        rm -f "${base}"*
        return ${ret}
}

# @FUNCTION: tc-has-tls
# @USAGE: [-s|-c|-l] [toolchain prefix]
# @DESCRIPTION:
# See if the toolchain supports thread local storage (TLS).  Use -s to test the
# compiler, -c to also test the assembler, and -l to also test the C library
# (the default).
tc-has-tls() {
        local base="${T}/test-tc-tls"
        cat <<-EOF > "${base}.c"
        int foo(int *i) {
                static __thread int j = 0;
                return *i ? j : *i;
        }
        EOF
        local flags
        case $1 in
                -s) flags="-S";;
                -c) flags="-c";;
                -l) ;;
                -*) die "Usage: tc-has-tls [-c|-l] [toolchain prefix]";;
        esac
        : ${flags:=-fPIC -shared -Wl,-z,defs}
        [[ $1 == -* ]] && shift
        $(tc-getCC "$@") ${flags} "${base}.c" -o "${base}" >&/dev/null
        local ret=$?
        rm -f "${base}"*
        return ${ret}
}


# Parse information from CBUILD/CHOST/CTARGET rather than
# use external variables from the profile.
tc-ninja_magic_to_arch() {
ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; }

        local type=$1
        local host=$2
        [[ -z ${host} ]] && host=${CTARGET:-${CHOST}}

        local KV=${KV:-${KV_FULL}}
        [[ ${type} == "kern" ]] && [[ -z ${KV} ]] && \
        ewarn "QA: Kernel version could not be determined, please inherit kernel-2 or linux-info"

        case ${host} in
                aarch64*)       ninj arm64 aarch64;;
                alpha*)         echo alpha;;
                arm*)           echo arm;;
                avr*)           ninj avr32 avr;;
                bfin*)          ninj blackfin bfin;;
                c6x)            echo c6x;;
                cris*)          echo cris;;
                frv)            echo frv;;
                hexagon)        echo hexagon;;
                hppa*)          ninj parisc hppa;;
                i?86*)
                        # Starting with linux-2.6.24, the 'x86_64' and 'i386'
                        # trees have been unified into 'x86'.
                        # FreeBSD still uses i386
                        if [[ ${type} == "kern" ]] && [[ $(KV_to_int ${KV}) -lt $(KV_to_int 2.6.24) || ${host} == *freebsd* ]] ; then
                                echo i386
                        else
                                echo x86
                        fi
                        ;;
                ia64*)          echo ia64;;
                m68*)           echo m68k;;
                metag)          echo metag;;
                mips*)          echo mips;;
                nios2*)         echo nios2;;
                nios*)          echo nios;;
                or32)           echo openrisc;;
                powerpc*)
                        # Starting with linux-2.6.15, the 'ppc' and 'ppc64' trees
                        # have been unified into simply 'powerpc', but until 2.6.16,
                        # ppc32 is still using ARCH="ppc" as default
                        if [[ ${type} == "kern" ]] && [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.16) ]] ; then
                                echo powerpc
                        elif [[ ${type} == "kern" ]] && [[ $(KV_to_int ${KV}) -eq $(KV_to_int 2.6.15) ]] ; then
                                if [[ ${host} == powerpc64* ]] || [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
                                        echo powerpc
                                else
                                        echo ppc
                                fi
                        elif [[ ${host} == powerpc64* ]] ; then
                                echo ppc64
                        elif [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
                                ninj ppc64 ppc
                        else
                                echo ppc
                        fi
                        ;;
                s390*)          echo s390;;
                score)          echo score;;
                sh64*)          ninj sh64 sh;;
                sh*)            echo sh;;
                sparc64*)       ninj sparc64 sparc;;
                sparc*)         [[ ${PROFILE_ARCH} == "sparc64" ]] \
                                                && ninj sparc64 sparc \
                                                || echo sparc
                                        ;;
                tile*)          echo tile;;
                vax*)           echo vax;;
                x86_64*freebsd*) echo amd64;;
                x86_64*)
                        # Starting with linux-2.6.24, the 'x86_64' and 'i386'
                        # trees have been unified into 'x86'.
                        if [[ ${type} == "kern" ]] && [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.24) ]] ; then
                                echo x86
                        else
                                ninj x86_64 amd64
                        fi
                        ;;
                xtensa*)        echo xtensa;;

                # since our usage of tc-arch is largely concerned with
                # normalizing inputs for testing ${CTARGET}, let's filter
                # other cross targets (mingw and such) into the unknown.
                *)                      echo unknown;;
        esac
}
# @FUNCTION: tc-arch-kernel
# @USAGE: [toolchain prefix]
# @RETURN: name of the kernel arch according to the compiler target
tc-arch-kernel() {
        tc-ninja_magic_to_arch kern "$@"
}
# @FUNCTION: tc-arch
# @USAGE: [toolchain prefix]
# @RETURN: name of the portage arch according to the compiler target
tc-arch() {
        tc-ninja_magic_to_arch portage "$@"
}

tc-endian() {
        local host=$1
        [[ -z ${host} ]] && host=${CTARGET:-${CHOST}}
        host=${host%%-*}

        case ${host} in
                aarch64*be)     echo big;;
                aarch64)        echo little;;
                alpha*)         echo big;;
                arm*b*)         echo big;;
                arm*)           echo little;;
                cris*)          echo little;;
                hppa*)          echo big;;
                i?86*)          echo little;;
                ia64*)          echo little;;
                m68*)           echo big;;
                mips*l*)        echo little;;
                mips*)          echo big;;
                powerpc*)       echo big;;
                s390*)          echo big;;
                sh*b*)          echo big;;
                sh*)            echo little;;
                sparc*)         echo big;;
                x86_64*)        echo little;;
                *)                      echo wtf;;
        esac
}

# Internal func.  The first argument is the version info to expand.
# Query the preprocessor to improve compatibility across different
# compilers rather than maintaining a --version flag matrix. #335943
_gcc_fullversion() {
        local ver="$1"; shift
        set -- `$(tc-getCPP "$@") -E -P - <<<"__GNUC__ __GNUC_MINOR__ __GNUC_PATCHLEVEL__"`
        eval echo "$ver"
}

# @FUNCTION: gcc-fullversion
# @RETURN: compiler version (major.minor.micro: [3.4.6])
gcc-fullversion() {
        _gcc_fullversion '$1.$2.$3' "$@"
}
# @FUNCTION: gcc-version
# @RETURN: compiler version (major.minor: [3.4].6)
gcc-version() {
        _gcc_fullversion '$1.$2' "$@"
}
# @FUNCTION: gcc-major-version
# @RETURN: major compiler version (major: [3].4.6)
gcc-major-version() {
        _gcc_fullversion '$1' "$@"
}
# @FUNCTION: gcc-minor-version
# @RETURN: minor compiler version (minor: 3.[4].6)
gcc-minor-version() {
        _gcc_fullversion '$2' "$@"
}
# @FUNCTION: gcc-micro-version
# @RETURN: micro compiler version (micro: 3.4.[6])
gcc-micro-version() {
        _gcc_fullversion '$3' "$@"
}

# Returns the installation directory - internal toolchain
# function for use by _gcc-specs-exists (for flag-o-matic).
_gcc-install-dir() {
        echo "$(LC_ALL=C $(tc-getCC) -print-search-dirs 2> /dev/null |\
                awk '$1=="install:" {print $2}')"
}
# Returns true if the indicated specs file exists - internal toolchain
# function for use by flag-o-matic.
_gcc-specs-exists() {
        [[ -f $(_gcc-install-dir)/$1 ]]
}

# Returns requested gcc specs directive unprocessed - for used by
# gcc-specs-directive()
# Note; later specs normally overwrite earlier ones; however if a later
# spec starts with '+' then it appends.
# gcc -dumpspecs is parsed first, followed by files listed by "gcc -v"
# as "Reading <file>", in order.  Strictly speaking, if there's a
# $(gcc_install_dir)/specs, the built-in specs aren't read, however by
# the same token anything from 'gcc -dumpspecs' is overridden by
# the contents of $(gcc_install_dir)/specs so the result is the
# same either way.
_gcc-specs-directive_raw() {
        local cc=$(tc-getCC)
        local specfiles=$(LC_ALL=C ${cc} -v 2>&1 | awk '$1=="Reading" {print $NF}')
        ${cc} -dumpspecs 2> /dev/null | cat - ${specfiles} | awk -v directive=$1 \
'BEGIN  { pspec=""; spec=""; outside=1 }
$1=="*"directive":"  { pspec=spec; spec=""; outside=0; next }
        outside || NF==0 || ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next }
        spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next }
        { spec=spec $0 }
END     { print spec }'
        return 0
}

# Return the requested gcc specs directive, with all included
# specs expanded.
# Note, it does not check for inclusion loops, which cause it
# to never finish - but such loops are invalid for gcc and we're
# assuming gcc is operational.
gcc-specs-directive() {
        local directive subdname subdirective
        directive="$(_gcc-specs-directive_raw $1)"
        while [[ ${directive} == *%\(*\)* ]]; do
                subdname=${directive/*%\(}
                subdname=${subdname/\)*}
                subdirective="$(_gcc-specs-directive_raw ${subdname})"
                directive="${directive//\%(${subdname})/${subdirective}}"
        done
        echo "${directive}"
        return 0
}

# Returns true if gcc sets relro
gcc-specs-relro() {
        local directive
        directive=$(gcc-specs-directive link_command)
        return $([[ "${directive/\{!norelro:}" != "${directive}" ]])
}
# Returns true if gcc sets now
gcc-specs-now() {
        local directive
        directive=$(gcc-specs-directive link_command)
        return $([[ "${directive/\{!nonow:}" != "${directive}" ]])
}
# Returns true if gcc builds PIEs
gcc-specs-pie() {
        local directive
        directive=$(gcc-specs-directive cc1)
        return $([[ "${directive/\{!nopie:}" != "${directive}" ]])
}
# Returns true if gcc builds with the stack protector
gcc-specs-ssp() {
        local directive
        directive=$(gcc-specs-directive cc1)
        return $([[ "${directive/\{!fno-stack-protector:}" != "${directive}" ]])
}
# Returns true if gcc upgrades fstack-protector to fstack-protector-all
gcc-specs-ssp-to-all() {
        local directive
        directive=$(gcc-specs-directive cc1)
        return $([[ "${directive/\{!fno-stack-protector-all:}" != "${directive}" ]])
}
# Returns true if gcc builds with fno-strict-overflow
gcc-specs-nostrict() {
        local directive
        directive=$(gcc-specs-directive cc1)
        return $([[ "${directive/\{!fstrict-overflow:}" != "${directive}" ]])
}


# @FUNCTION: gen_usr_ldscript
# @USAGE: [-a] <list of libs to create linker scripts for>
# @DESCRIPTION:
# This function generate linker scripts in /usr/lib for dynamic
# libs in /lib.  This is to fix linking problems when you have
# the .so in /lib, and the .a in /usr/lib.  What happens is that
# in some cases when linking dynamic, the .a in /usr/lib is used
# instead of the .so in /lib due to gcc/libtool tweaking ld's
# library search path.  This causes many builds to fail.
# See bug #4411 for more info.
#
# Note that you should in general use the unversioned name of
# the library (libfoo.so), as ldconfig should usually update it
# correctly to point to the latest version of the library present.
gen_usr_ldscript() {
        local lib libdir=$(get_libdir) output_format="" auto=false suffix=$(get_libname)
        [[ -z ${ED+set} ]] && local ED=${D%/}${EPREFIX}/

        tc-is-static-only && return

        # Eventually we'd like to get rid of this func completely #417451
        case ${CTARGET:-${CHOST}} in
        *-darwin*) ;;
        *linux*|*-freebsd*|*-openbsd*|*-netbsd*)
                use prefix && return 0 ;;
        *) return 0 ;;
        esac

        # Just make sure it exists
        dodir /usr/${libdir}

        if [[ $1 == "-a" ]] ; then
                auto=true
                shift
                dodir /${libdir}
        fi

        # OUTPUT_FORMAT gives hints to the linker as to what binary format
        # is referenced ... makes multilib saner
        local flags=( ${CFLAGS} ${LDFLAGS} -Wl,--verbose )
        if $(tc-getLD) --version | grep -q 'GNU gold' ; then
                # If they're using gold, manually invoke the old bfd. #487696
                local d="${T}/bfd-linker"
                mkdir -p "${d}"
                ln -sf $(which ${CHOST}-ld.bfd) "${d}"/ld
                flags+=( -B"${d}" )
        fi
        output_format=$($(tc-getCC) "${flags[@]}" 2>&1 | sed -n 's/^OUTPUT_FORMAT("\([^"]*\)",.*/\1/p')
        [[ -n ${output_format} ]] && output_format="OUTPUT_FORMAT ( ${output_format} )"

        for lib in "$@" ; do
                local tlib
                if ${auto} ; then
                        lib="lib${lib}${suffix}"
                else
                        # Ensure /lib/${lib} exists to avoid dangling scripts/symlinks.
                        # This especially is for AIX where $(get_libname) can return ".a",
                        # so /lib/${lib} might be moved to /usr/lib/${lib} (by accident).
                        [[ -r ${ED}/${libdir}/${lib} ]] || continue
                        #TODO: better die here?
                fi

                case ${CTARGET:-${CHOST}} in
                *-darwin*)
                        if ${auto} ; then
                                tlib=$(scanmacho -qF'%S#F' "${ED}"/usr/${libdir}/${lib})
                        else
                                tlib=$(scanmacho -qF'%S#F' "${ED}"/${libdir}/${lib})
                        fi
                        [[ -z ${tlib} ]] && die "unable to read install_name from ${lib}"
                        tlib=${tlib##*/}

                        if ${auto} ; then
                                mv "${ED}"/usr/${libdir}/${lib%${suffix}}.*${suffix#.} "${ED}"/${libdir}/ || die
                                # some install_names are funky: they encode a version
                                if [[ ${tlib} != ${lib%${suffix}}.*${suffix#.} ]] ; then
                                        mv "${ED}"/usr/${libdir}/${tlib%${suffix}}.*${suffix#.} "${ED}"/${libdir}/ || die
                                fi
                                rm -f "${ED}"/${libdir}/${lib}
                        fi

                        # Mach-O files have an id, which is like a soname, it tells how
                        # another object linking against this lib should reference it.
                        # Since we moved the lib from usr/lib into lib this reference is
                        # wrong.  Hence, we update it here.  We don't configure with
                        # libdir=/lib because that messes up libtool files.
                        # Make sure we don't lose the specific version, so just modify the
                        # existing install_name
                        if [[ ! -w "${ED}/${libdir}/${tlib}" ]] ; then
                                chmod u+w "${ED}${libdir}/${tlib}" # needed to write to it
                                local nowrite=yes
                        fi
                        install_name_tool \
                                -id "${EPREFIX}"/${libdir}/${tlib} \
                                "${ED}"/${libdir}/${tlib} || die "install_name_tool failed"
                        [[ -n ${nowrite} ]] && chmod u-w "${ED}${libdir}/${tlib}"
                        # Now as we don't use GNU binutils and our linker doesn't
                        # understand linker scripts, just create a symlink.
                        pushd "${ED}/usr/${libdir}" > /dev/null
                        ln -snf "../../${libdir}/${tlib}" "${lib}"
                        popd > /dev/null
                        ;;
                *)
                        if ${auto} ; then
                                tlib=$(scanelf -qF'%S#F' "${ED}"/usr/${libdir}/${lib})
                                [[ -z ${tlib} ]] && die "unable to read SONAME from ${lib}"
                                mv "${ED}"/usr/${libdir}/${lib}* "${ED}"/${libdir}/ || die
                                # some SONAMEs are funky: they encode a version before the .so
                                if [[ ${tlib} != ${lib}* ]] ; then
                                        mv "${ED}"/usr/${libdir}/${tlib}* "${ED}"/${libdir}/ || die
                                fi
                                rm -f "${ED}"/${libdir}/${lib}
                        else
                                tlib=${lib}
                        fi
                        cat > "${ED}/usr/${libdir}/${lib}" <<-END_LDSCRIPT
                        /* GNU ld script
                           Since Gentoo has critical dynamic libraries in /lib, and the static versions
                           in /usr/lib, we need to have a "fake" dynamic lib in /usr/lib, otherwise we
                           run into linking problems.  This "fake" dynamic lib is a linker script that
                           redirects the linker to the real lib.  And yes, this works in the cross-
                           compiling scenario as the sysroot-ed linker will prepend the real path.

                           See bug http://bugs.gentoo.org/4411 for more info.
                         */
                        ${output_format}
                        GROUP ( ${EPREFIX}/${libdir}/${tlib} )
                        END_LDSCRIPT
                        ;;
                esac
                fperms a+x "/usr/${libdir}/${lib}" || die "could not change perms on ${lib}"
        done
}

fi