gentoo-x86/eclass/toolchain-funcs.eclass

# Copyright 1999-2007 Gentoo Foundation
# Distributed under the terms of the GNU General Public License v2
# $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.78 2008/07/03 05:26:47 dberkholz 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.

___ECLASS_RECUR_TOOLCHAIN_FUNCS="yes"
[[ -z ${___ECLASS_RECUR_MULTILIB} ]] && inherit multilib

DESCRIPTION="Based on the ${ECLASS} eclass"

tc-getPROG() {
        local var=$1
        local prog=$2

        if [[ -n ${!var} ]] ; then
                echo "${!var}"
                return 0
        fi

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

        export ${var}=${prog}
        echo "${!var}"
}

# @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-getF77
# @USAGE: [toolchain prefix]
# @RETURN: name of the Fortran 77 compiler
tc-getF77() { tc-getPROG F77 f77 "$@"; }
# @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-getBUILD_CC
# @USAGE: [toolchain prefix]
# @RETURN: name of the C compiler for building binaries to run on the build machine
tc-getBUILD_CC() {
        local v
        for v in CC_FOR_BUILD BUILD_CC HOSTCC ; do
                if [[ -n ${!v} ]] ; then
                        export BUILD_CC=${!v}
                        echo "${!v}"
                        return 0
                fi
        done

        local search=
        if [[ -n ${CBUILD} ]] ; then
                search=$(type -p ${CBUILD}-gcc)
                search=${search##*/}
        fi
        search=${search:-gcc}

        export BUILD_CC=${search}
        echo "${search}"
}

# @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
#  - no:   the target should support hardfloat
# @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() {
        case ${CTARGET} in
                bfin*|h8300*)
                        echo "only" ;;
                *)
                        [[ ${CTARGET//_/-} == *-softfloat-* ]] \
                                && echo "yes" \
                                || echo "no"
                        ;;
        esac
}

# 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}}

        case ${host} in
                alpha*)         echo alpha;;
                arm*)           echo arm;;
                avr*)           ninj avr32 avr;;
                bfin*)          ninj blackfin bfin;;
                cris*)          echo cris;;
                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;;
                mips*)          echo mips;;
                nios2*)         echo nios2;;
                nios*)          echo nios;;
                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 [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.16) ]] && [[ ${type} == "kern" ]] ; then
                                                echo powerpc
                                        elif [[ $(KV_to_int ${KV}) -eq $(KV_to_int 2.6.15) ]] && [[ ${type} == "kern" ]] ; 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;;
                sh64*)          ninj sh64 sh;;
                sh*)            echo sh;;
                sparc64*)       ninj sparc64 sparc;;
                sparc*)         [[ ${PROFILE_ARCH} == "sparc64" ]] \
                                                && ninj sparc64 sparc \
                                                || echo sparc
                                        ;;
                vax*)           echo vax;;
                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
                        ;;

                # 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
                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
}

# @FUNCTION: gcc-fullversion
# @RETURN: compiler version (major.minor.micro: [3.4.6])
gcc-fullversion() {
        $(tc-getCC "$@") -dumpversion
}
# @FUNCTION: gcc-version
# @RETURN: compiler version (major.minor: [3.4].6)
gcc-version() {
        gcc-fullversion "$@" | cut -f1,2 -d.
}
# @FUNCTION: gcc-major-version
# @RETURN: major compiler version (major: [3].4.6)
gcc-major-version() {
        gcc-version "$@" | cut -f1 -d.
}
# @FUNCTION: gcc-minor-version
# @RETURN: minor compiler version (minor: 3.[4].6)
gcc-minor-version() {
        gcc-version "$@" | cut -f2 -d.
}
# @FUNCTION: gcc-micro-version
# @RETURN: micro compiler version (micro: 3.4.[6])
gcc-micro-version() {
        gcc-fullversion "$@" | cut -f3 -d. | cut -f1 -d-
}

# 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} ]])
}


# @FUNCTION: gen_usr_ldscript
# @USAGE: <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=""
        # Just make sure it exists
        dodir /usr/${libdir}

        # OUTPUT_FORMAT gives hints to the linker as to what binary format
        # is referenced ... makes multilib saner
        output_format=$($(tc-getCC) ${CFLAGS} ${LDFLAGS} -Wl,--verbose 2>&1 | sed -n 's/^OUTPUT_FORMAT("\([^"]*\)",.*/\1/p')
        [[ -n ${output_format} ]] && output_format="OUTPUT_FORMAT ( ${output_format} )"

        for lib in "$@" ; do
                if [[ ${USERLAND} == "Darwin" ]] ; then
                        ewarn "Not creating fake dynamic library for $lib on Darwin;"
                        ewarn "making a symlink instead."
                        dosym "/${libdir}/${lib}" "/usr/${libdir}/${lib}"
                else
                        cat > "${D}/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.

                           See bug http://bugs.gentoo.org/4411 for more info.
                         */
                        ${output_format}
                        GROUP ( /${libdir}/${lib} )
                        END_LDSCRIPT
                fi
                fperms a+x "/usr/${libdir}/${lib}" || die "could not change perms on ${lib}"
        done
}
1	vapier	1.67	# Copyright 1999-2007 Gentoo Foundation
2	vapier	1.1	# Distributed under the terms of the GNU General Public License v2
3	vapier	1.79	# $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.78 2008/07/03 05:26:47 dberkholz Exp $
4	vapier	1.74
5			# @ECLASS: toolchain-funcs.eclass
6			# @MAINTAINER:
7			# Toolchain Ninjas <toolchain@gentoo.org>
8			# @BLURB: functions to query common info about the toolchain
9			# @DESCRIPTION:
10			# The toolchain-funcs aims to provide a complete suite of functions
11			# for gleaning useful information about the toolchain and to simplify
12			# ugly things like cross-compiling and multilib. All of this is done
13			# in such a way that you can rely on the function always returning
14			# something sane.
15	vapier	1.1
16	vapier	1.69	___ECLASS_RECUR_TOOLCHAIN_FUNCS="yes"
17			[[ -z ${___ECLASS_RECUR_MULTILIB} ]] && inherit multilib
18	eradicator	1.34
19	vapier	1.1	DESCRIPTION="Based on the ${ECLASS} eclass"
20
21			tc-getPROG() {
22	vapier	1.33	local var=$1
23			local prog=$2
24	vapier	1.1
25	vapier	1.17	if [[ -n ${!var} ]] ; then
26	vapier	1.1	echo "${!var}"
27			return 0
28			fi
29
30	eradicator	1.35	local search=
31			[[ -n $3 ]] && search=$(type -p "$3-${prog}")
32			[[ -z ${search} && -n ${CHOST} ]] && search=$(type -p "${CHOST}-${prog}")
33			[[ -n ${search} ]] && prog=${search##*/}
34	vapier	1.1
35	vapier	1.17	export ${var}=${prog}
36	vapier	1.1	echo "${!var}"
37			}
38
39	vapier	1.74	# @FUNCTION: tc-getAR
40			# @USAGE: [toolchain prefix]
41			# @RETURN: name of the archiver
42	vapier	1.33	tc-getAR() { tc-getPROG AR ar "$@"; }
43	vapier	1.74	# @FUNCTION: tc-getAS
44			# @USAGE: [toolchain prefix]
45			# @RETURN: name of the assembler
46	vapier	1.33	tc-getAS() { tc-getPROG AS as "$@"; }
47	vapier	1.74	# @FUNCTION: tc-getCC
48			# @USAGE: [toolchain prefix]
49			# @RETURN: name of the C compiler
50	vapier	1.33	tc-getCC() { tc-getPROG CC gcc "$@"; }
51	vapier	1.74	# @FUNCTION: tc-getCPP
52			# @USAGE: [toolchain prefix]
53			# @RETURN: name of the C preprocessor
54	robbat2	1.58	tc-getCPP() { tc-getPROG CPP cpp "$@"; }
55	vapier	1.74	# @FUNCTION: tc-getCXX
56			# @USAGE: [toolchain prefix]
57			# @RETURN: name of the C++ compiler
58	vapier	1.33	tc-getCXX() { tc-getPROG CXX g++ "$@"; }
59	vapier	1.74	# @FUNCTION: tc-getLD
60			# @USAGE: [toolchain prefix]
61			# @RETURN: name of the linker
62	vapier	1.33	tc-getLD() { tc-getPROG LD ld "$@"; }
63	vapier	1.74	# @FUNCTION: tc-getSTRIP
64			# @USAGE: [toolchain prefix]
65			# @RETURN: name of the strip program
66	kanaka	1.59	tc-getSTRIP() { tc-getPROG STRIP strip "$@"; }
67	vapier	1.74	# @FUNCTION: tc-getNM
68			# @USAGE: [toolchain prefix]
69			# @RETURN: name of the symbol/object thingy
70	vapier	1.33	tc-getNM() { tc-getPROG NM nm "$@"; }
71	vapier	1.74	# @FUNCTION: tc-getRANLIB
72			# @USAGE: [toolchain prefix]
73			# @RETURN: name of the archiver indexer
74	vapier	1.33	tc-getRANLIB() { tc-getPROG RANLIB ranlib "$@"; }
75	vapier	1.74	# @FUNCTION: tc-getF77
76			# @USAGE: [toolchain prefix]
77			# @RETURN: name of the Fortran 77 compiler
78	kanaka	1.59	tc-getF77() { tc-getPROG F77 f77 "$@"; }
79	dberkholz	1.78	# @FUNCTION: tc-getFC
80	vapier	1.74	# @USAGE: [toolchain prefix]
81			# @RETURN: name of the Fortran 90 compiler
82	dberkholz	1.78	tc-getFC() { tc-getPROG FC gfortran "$@"; }
83	vapier	1.74	# @FUNCTION: tc-getGCJ
84			# @USAGE: [toolchain prefix]
85			# @RETURN: name of the java compiler
86	vapier	1.33	tc-getGCJ() { tc-getPROG GCJ gcj "$@"; }
87	vapier	1.1
88	vapier	1.74	# @FUNCTION: tc-getBUILD_CC
89			# @USAGE: [toolchain prefix]
90			# @RETURN: name of the C compiler for building binaries to run on the build machine
91	vapier	1.4	tc-getBUILD_CC() {
92	vapier	1.43	local v
93			for v in CC_FOR_BUILD BUILD_CC HOSTCC ; do
94			if [[ -n ${!v} ]] ; then
95			export BUILD_CC=${!v}
96			echo "${!v}"
97			return 0
98			fi
99			done
100	vapier	1.4
101	vapier	1.9	local search=
102	vapier	1.17	if [[ -n ${CBUILD} ]] ; then
103	vapier	1.21	search=$(type -p ${CBUILD}-gcc)
104	vapier	1.17	search=${search##*/}
105	vapier	1.9	fi
106	vapier	1.45	search=${search:-gcc}
107	vapier	1.11
108	vapier	1.17	export BUILD_CC=${search}
109	vapier	1.11	echo "${search}"
110	vapier	1.4	}
111	vapier	1.1
112	vapier	1.74	# @FUNCTION: tc-export
113			# @USAGE: <list of toolchain variables>
114			# @DESCRIPTION:
115			# Quick way to export a bunch of compiler vars at once.
116	vapier	1.10	tc-export() {
117			local var
118			for var in "$@" ; do
119	vapier	1.79	[[ $(type -t tc-get${var}) != "function" ]] && die "tc-export: invalid export variable '${var}'"
120	vapier	1.36	eval tc-get${var} > /dev/null
121	vapier	1.10	done
122			}
123
124	vapier	1.74	# @FUNCTION: tc-is-cross-compiler
125			# @RETURN: Shell true if we are using a cross-compiler, shell false otherwise
126	vapier	1.12	tc-is-cross-compiler() {
127	vapier	1.43	return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]])
128	vapier	1.12	}
129
130	vapier	1.74	# @FUNCTION: tc-is-softfloat
131			# @DESCRIPTION:
132	vapier	1.65	# See if this toolchain is a softfloat based one.
133	vapier	1.74	# @CODE
134	vapier	1.65	# The possible return values:
135			# - only: the target is always softfloat (never had fpu)
136			# - yes: the target should support softfloat
137			# - no: the target should support hardfloat
138	vapier	1.74	# @CODE
139	vapier	1.65	# This allows us to react differently where packages accept
140			# softfloat flags in the case where support is optional, but
141			# rejects softfloat flags where the target always lacks an fpu.
142			tc-is-softfloat() {
143			case ${CTARGET} in
144	vapier	1.66	bfin\|h8300)
145	vapier	1.65	echo "only" ;;
146			*)
147			[[ ${CTARGET//_/-} == -softfloat- ]] \
148			&& echo "yes" \
149			\|\| echo "no"
150			;;
151			esac
152			}
153	vapier	1.1
154	swegener	1.40	# Parse information from CBUILD/CHOST/CTARGET rather than
155	vapier	1.20	# use external variables from the profile.
156			tc-ninja_magic_to_arch() {
157	vapier	1.21	ninj() { [[ ${type} == "kern" ]] && echo $1 \|\| echo $2 ; }
158	vapier	1.19
159			local type=$1
160			local host=$2
161	eradicator	1.25	[[ -z ${host} ]] && host=${CTARGET:-${CHOST}}
162	vapier	1.19
163			case ${host} in
164			alpha*) echo alpha;;
165			arm*) echo arm;;
166	vapier	1.72	avr*) ninj avr32 avr;;
167	vapier	1.53	bfin*) ninj blackfin bfin;;
168	vapier	1.47	cris*) echo cris;;
169	vapier	1.19	hppa*) ninj parisc hppa;;
170	vapier	1.75	i?86*)
171			# Starting with linux-2.6.24, the 'x86_64' and 'i386'
172			# trees have been unified into 'x86'.
173	aballier	1.77	# FreeBSD still uses i386
174			if [[ ${type} == "kern" ]] && [[ $(KV_to_int ${KV}) -lt $(KV_to_int 2.6.24) \|\| ${host} == freebsd ]] ; then
175	vapier	1.75	echo i386
176			else
177			echo x86
178			fi
179			;;
180	vapier	1.19	ia64*) echo ia64;;
181	vapier	1.23	m68*) echo m68k;;
182	vapier	1.19	mips*) echo mips;;
183	vapier	1.52	nios2*) echo nios2;;
184			nios*) echo nios;;
185	vapier	1.49	powerpc*)
186			# Starting with linux-2.6.15, the 'ppc' and 'ppc64' trees
187	josejx	1.54	# have been unified into simply 'powerpc', but until 2.6.16,
188			# ppc32 is still using ARCH="ppc" as default
189			if [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.16) ]] && [[ ${type} == "kern" ]] ; then
190	vapier	1.49	echo powerpc
191	josejx	1.54	elif [[ $(KV_to_int ${KV}) -eq $(KV_to_int 2.6.15) ]] && [[ ${type} == "kern" ]] ; then
192	dostrow	1.55	if [[ ${host} == powerpc64* ]] \|\| [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
193	josejx	1.54	echo powerpc
194			else
195			echo ppc
196	swegener	1.56	fi
197	vapier	1.49	elif [[ ${host} == powerpc64* ]] ; then
198			echo ppc64
199	dostrow	1.51	elif [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
200			ninj ppc64 ppc
201	vapier	1.49	else
202			echo ppc
203			fi
204	dostrow	1.37	;;
205	vapier	1.47	s390*) echo s390;;
206			sh64*) ninj sh64 sh;;
207			sh*) echo sh;;
208	vapier	1.19	sparc64*) ninj sparc64 sparc;;
209	vapier	1.28	sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \
210			&& ninj sparc64 sparc \
211			\|\| echo sparc
212			;;
213	vapier	1.47	vax*) echo vax;;
214	vapier	1.75	x86_64*)
215			# Starting with linux-2.6.24, the 'x86_64' and 'i386'
216			# trees have been unified into 'x86'.
217			if [[ ${type} == "kern" ]] && [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.24) ]] ; then
218			echo x86
219			else
220			ninj x86_64 amd64
221			fi
222			;;
223	vapier	1.73
224			# since our usage of tc-arch is largely concerned with
225			# normalizing inputs for testing ${CTARGET}, let's filter
226			# other cross targets (mingw and such) into the unknown.
227			*) echo unknown;;
228	vapier	1.19	esac
229			}
230	vapier	1.74	# @FUNCTION: tc-arch-kernel
231			# @USAGE: [toolchain prefix]
232			# @RETURN: name of the kernel arch according to the compiler target
233	vapier	1.20	tc-arch-kernel() {
234	vapier	1.74	tc-ninja_magic_to_arch kern "$@"
235	vapier	1.19	}
236	vapier	1.74	# @FUNCTION: tc-arch
237			# @USAGE: [toolchain prefix]
238			# @RETURN: name of the portage arch according to the compiler target
239	vapier	1.20	tc-arch() {
240	vapier	1.74	tc-ninja_magic_to_arch portage "$@"
241	vapier	1.19	}
242	vapier	1.74
243	robbat2	1.71	tc-endian() {
244			local host=$1
245			[[ -z ${host} ]] && host=${CTARGET:-${CHOST}}
246			host=${host%%-*}
247
248			case ${host} in
249			alpha*) echo big;;
250			armb) echo big;;
251			arm*) echo little;;
252			cris*) echo little;;
253			hppa*) echo big;;
254			i?86*) echo little;;
255			ia64*) echo little;;
256			m68*) echo big;;
257			mipsl) echo little;;
258			mips*) echo big;;
259			powerpc*) echo big;;
260			s390*) echo big;;
261			shb) echo big;;
262			sh*) echo little;;
263			sparc*) echo big;;
264			x86_64*) echo little;;
265			*) echo wtf;;
266			esac
267			}
268	vapier	1.19
269	vapier	1.74	# @FUNCTION: gcc-fullversion
270			# @RETURN: compiler version (major.minor.micro: [3.4.6])
271	vapier	1.1	gcc-fullversion() {
272	vapier	1.63	$(tc-getCC "$@") -dumpversion
273	vapier	1.1	}
274	vapier	1.74	# @FUNCTION: gcc-version
275			# @RETURN: compiler version (major.minor: [3.4].6)
276	vapier	1.1	gcc-version() {
277	vapier	1.63	gcc-fullversion "$@" \| cut -f1,2 -d.
278	vapier	1.1	}
279	vapier	1.74	# @FUNCTION: gcc-major-version
280			# @RETURN: major compiler version (major: [3].4.6)
281	vapier	1.1	gcc-major-version() {
282	vapier	1.63	gcc-version "$@" \| cut -f1 -d.
283	vapier	1.1	}
284	vapier	1.74	# @FUNCTION: gcc-minor-version
285			# @RETURN: minor compiler version (minor: 3.[4].6)
286	vapier	1.1	gcc-minor-version() {
287	vapier	1.63	gcc-version "$@" \| cut -f2 -d.
288	vapier	1.1	}
289	vapier	1.74	# @FUNCTION: gcc-micro-version
290			# @RETURN: micro compiler version (micro: 3.4.[6])
291	vapier	1.1	gcc-micro-version() {
292	vapier	1.63	gcc-fullversion "$@" \| cut -f3 -d. \| cut -f1 -d-
293	vapier	1.1	}
294	vapier	1.74
295	kevquinn	1.68	# Returns the installation directory - internal toolchain
296			# function for use by _gcc-specs-exists (for flag-o-matic).
297			_gcc-install-dir() {
298	vapier	1.76	echo "$(LC_ALL=C $(tc-getCC) -print-search-dirs 2> /dev/null \|\
299	kevquinn	1.68	awk '$1=="install:" {print $2}')"
300			}
301			# Returns true if the indicated specs file exists - internal toolchain
302			# function for use by flag-o-matic.
303			_gcc-specs-exists() {
304			[[ -f $(_gcc-install-dir)/$1 ]]
305			}
306	kevquinn	1.41
307	kevquinn	1.68	# Returns requested gcc specs directive unprocessed - for used by
308			# gcc-specs-directive()
309	kevquinn	1.46	# Note; later specs normally overwrite earlier ones; however if a later
310			# spec starts with '+' then it appends.
311			# gcc -dumpspecs is parsed first, followed by files listed by "gcc -v"
312	kevquinn	1.68	# as "Reading <file>", in order. Strictly speaking, if there's a
313			# $(gcc_install_dir)/specs, the built-in specs aren't read, however by
314			# the same token anything from 'gcc -dumpspecs' is overridden by
315			# the contents of $(gcc_install_dir)/specs so the result is the
316			# same either way.
317			_gcc-specs-directive_raw() {
318	kevquinn	1.57	local cc=$(tc-getCC)
319			local specfiles=$(LC_ALL=C ${cc} -v 2>&1 \| awk '$1=="Reading" {print $NF}')
320			${cc} -dumpspecs 2> /dev/null \| cat - ${specfiles} \| awk -v directive=$1 \
321	kevquinn	1.46	'BEGIN { pspec=""; spec=""; outside=1 }
322			$1=="*"directive":" { pspec=spec; spec=""; outside=0; next }
323	kevquinn	1.41	outside \|\| NF==0 \|\| ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next }
324	kevquinn	1.46	spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next }
325			{ spec=spec $0 }
326			END { print spec }'
327			return 0
328	kevquinn	1.41	}
329
330	kevquinn	1.68	# Return the requested gcc specs directive, with all included
331			# specs expanded.
332			# Note, it does not check for inclusion loops, which cause it
333			# to never finish - but such loops are invalid for gcc and we're
334			# assuming gcc is operational.
335			gcc-specs-directive() {
336			local directive subdname subdirective
337			directive="$(_gcc-specs-directive_raw $1)"
338			while [[ ${directive} == %\(\)* ]]; do
339			subdname=${directive/*%\(}
340			subdname=${subdname/\)*}
341			subdirective="$(_gcc-specs-directive_raw ${subdname})"
342			directive="${directive//\%(${subdname})/${subdirective}}"
343			done
344			echo "${directive}"
345			return 0
346			}
347
348	kevquinn	1.41	# Returns true if gcc sets relro
349			gcc-specs-relro() {
350			local directive
351			directive=$(gcc-specs-directive link_command)
352			return $([[ ${directive/\{!norelro:} != ${directive} ]])
353			}
354			# Returns true if gcc sets now
355			gcc-specs-now() {
356			local directive
357			directive=$(gcc-specs-directive link_command)
358			return $([[ ${directive/\{!nonow:} != ${directive} ]])
359			}
360			# Returns true if gcc builds PIEs
361			gcc-specs-pie() {
362			local directive
363			directive=$(gcc-specs-directive cc1)
364			return $([[ ${directive/\{!nopie:} != ${directive} ]])
365			}
366			# Returns true if gcc builds with the stack protector
367			gcc-specs-ssp() {
368			local directive
369			directive=$(gcc-specs-directive cc1)
370			return $([[ ${directive/\{!fno-stack-protector:} != ${directive} ]])
371			}
372	kevquinn	1.46	# Returns true if gcc upgrades fstack-protector to fstack-protector-all
373			gcc-specs-ssp-to-all() {
374			local directive
375			directive=$(gcc-specs-directive cc1)
376			return $([[ ${directive/\{!fno-stack-protector-all:} != ${directive} ]])
377			}
378	vapier	1.60
379
380	vapier	1.74	# @FUNCTION: gen_usr_ldscript
381			# @USAGE: <list of libs to create linker scripts for>
382			# @DESCRIPTION:
383	vapier	1.60	# This function generate linker scripts in /usr/lib for dynamic
384			# libs in /lib. This is to fix linking problems when you have
385			# the .so in /lib, and the .a in /usr/lib. What happens is that
386			# in some cases when linking dynamic, the .a in /usr/lib is used
387			# instead of the .so in /lib due to gcc/libtool tweaking ld's
388	vapier	1.74	# library search path. This causes many builds to fail.
389	vapier	1.60	# See bug #4411 for more info.
390			#
391			# Note that you should in general use the unversioned name of
392	vapier	1.74	# the library (libfoo.so), as ldconfig should usually update it
393			# correctly to point to the latest version of the library present.
394	vapier	1.70	gen_usr_ldscript() {
395	vapier	1.60	local lib libdir=$(get_libdir) output_format=""
396			# Just make sure it exists
397			dodir /usr/${libdir}
398
399			# OUTPUT_FORMAT gives hints to the linker as to what binary format
400			# is referenced ... makes multilib saner
401			output_format=$($(tc-getCC) ${CFLAGS} ${LDFLAGS} -Wl,--verbose 2>&1 \| sed -n 's/^OUTPUT_FORMAT("\([^"]\)",./\1/p')
402			[[ -n ${output_format} ]] && output_format="OUTPUT_FORMAT ( ${output_format} )"
403
404			for lib in "$@" ; do
405	vapier	1.62	if [[ ${USERLAND} == "Darwin" ]] ; then
406			ewarn "Not creating fake dynamic library for $lib on Darwin;"
407	grobian	1.61	ewarn "making a symlink instead."
408			dosym "/${libdir}/${lib}" "/usr/${libdir}/${lib}"
409			else
410			cat > "${D}/usr/${libdir}/${lib}" <<-END_LDSCRIPT
411			/* GNU ld script
412			Since Gentoo has critical dynamic libraries
413			in /lib, and the static versions in /usr/lib,
414			we need to have a "fake" dynamic lib in /usr/lib,
415			otherwise we run into linking problems.
416
417			See bug http://bugs.gentoo.org/4411 for more info.
418			*/
419			${output_format}
420			GROUP ( /${libdir}/${lib} )
421			END_LDSCRIPT
422			fi
423	vapier	1.60	fperms a+x "/usr/${libdir}/${lib}" \|\| die "could not change perms on ${lib}"
424			done
425			}