gentoo-x86/eclass/toolchain-funcs.eclass

# Copyright 1999-2006 Gentoo Foundation
# Distributed under the terms of the GNU General Public License v2
# $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.56 2006/02/17 22:18:20 swegener Exp $
#
# Author: Toolchain Ninjas <toolchain@gentoo.org>
#
# This eclass contains (or should) functions to get common info
# about the toolchain (libc/compiler/binutils/etc...)

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

# Returns the name of the archiver
tc-getAR() { tc-getPROG AR ar "$@"; }
# Returns the name of the assembler
tc-getAS() { tc-getPROG AS as "$@"; }
# Returns the name of the C compiler
tc-getCC() { tc-getPROG CC gcc "$@"; }
# Returns the name of the C++ compiler
tc-getCXX() { tc-getPROG CXX g++ "$@"; }
# Returns the name of the linker
tc-getLD() { tc-getPROG LD ld "$@"; }
# Returns the name of the symbol/object thingy
tc-getNM() { tc-getPROG NM nm "$@"; }
# Returns the name of the archiver indexer
tc-getRANLIB() { tc-getPROG RANLIB ranlib "$@"; }
# Returns the name of the fortran compiler
tc-getF77() { tc-getPROG F77 f77 "$@"; }
# Returns the name of the java compiler
tc-getGCJ() { tc-getPROG GCJ gcj "$@"; }

# Returns the name of the C compiler for build
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}"
}

# Quick way to export a bunch of vars at once
tc-export() {
        local var
        for var in "$@" ; do
                eval tc-get${var} > /dev/null
        done
}

# A simple way to see if we're using a cross-compiler ...
tc-is-cross-compiler() {
        return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]])
}


# 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;;
                bfin*)          ninj blackfin bfin;;
                cris*)          echo cris;;
                hppa*)          ninj parisc hppa;;
                i?86*)          ninj i386 x86;;
                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*)        ninj x86_64 amd64;;
                *)                      echo ${ARCH};;
        esac
}
tc-arch-kernel() {
        tc-ninja_magic_to_arch kern $@
}
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
}

# Returns the version as by `$CC -dumpversion`
gcc-fullversion() {
        echo "$($(tc-getCC) -dumpversion)"
}
# Returns the version, but only the <major>.<minor>
gcc-version() {
        echo "$(gcc-fullversion | cut -f1,2 -d.)"
}
# Returns the Major version
gcc-major-version() {
        echo "$(gcc-version | cut -f1 -d.)"
}
# Returns the Minor version
gcc-minor-version() {
        echo "$(gcc-version | cut -f2 -d.)"
}
# Returns the Micro version
gcc-micro-version() {
        echo "$(gcc-fullversion | cut -f3 -d. | cut -f1 -d-)"
}

# Returns requested 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.
gcc-specs-directive() {
        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
}

# 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} ]])
}
1	vapier	1.50	# Copyright 1999-2006 Gentoo Foundation
2	vapier	1.1	# Distributed under the terms of the GNU General Public License v2
3	kevquinn	1.57	# $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.56 2006/02/17 22:18:20 swegener Exp $
4	vapier	1.1	#
5	vapier	1.47	# Author: Toolchain Ninjas <toolchain@gentoo.org>
6	vapier	1.1	#
7	swegener	1.40	# This eclass contains (or should) functions to get common info
8	vapier	1.1	# about the toolchain (libc/compiler/binutils/etc...)
9
10	eradicator	1.34	inherit multilib
11
12	vapier	1.1	DESCRIPTION="Based on the ${ECLASS} eclass"
13
14			tc-getPROG() {
15	vapier	1.33	local var=$1
16			local prog=$2
17	vapier	1.1
18	vapier	1.17	if [[ -n ${!var} ]] ; then
19	vapier	1.1	echo "${!var}"
20			return 0
21			fi
22
23	eradicator	1.35	local search=
24			[[ -n $3 ]] && search=$(type -p "$3-${prog}")
25			[[ -z ${search} && -n ${CHOST} ]] && search=$(type -p "${CHOST}-${prog}")
26			[[ -n ${search} ]] && prog=${search##*/}
27	vapier	1.1
28	vapier	1.17	export ${var}=${prog}
29	vapier	1.1	echo "${!var}"
30			}
31
32			# Returns the name of the archiver
33	vapier	1.33	tc-getAR() { tc-getPROG AR ar "$@"; }
34	vapier	1.1	# Returns the name of the assembler
35	vapier	1.33	tc-getAS() { tc-getPROG AS as "$@"; }
36	vapier	1.1	# Returns the name of the C compiler
37	vapier	1.33	tc-getCC() { tc-getPROG CC gcc "$@"; }
38	vapier	1.1	# Returns the name of the C++ compiler
39	vapier	1.33	tc-getCXX() { tc-getPROG CXX g++ "$@"; }
40	vapier	1.1	# Returns the name of the linker
41	vapier	1.33	tc-getLD() { tc-getPROG LD ld "$@"; }
42	vapier	1.1	# Returns the name of the symbol/object thingy
43	vapier	1.33	tc-getNM() { tc-getPROG NM nm "$@"; }
44	vapier	1.1	# Returns the name of the archiver indexer
45	vapier	1.33	tc-getRANLIB() { tc-getPROG RANLIB ranlib "$@"; }
46	vapier	1.7	# Returns the name of the fortran compiler
47	vapier	1.33	tc-getF77() { tc-getPROG F77 f77 "$@"; }
48	vapier	1.8	# Returns the name of the java compiler
49	vapier	1.33	tc-getGCJ() { tc-getPROG GCJ gcj "$@"; }
50	vapier	1.1
51	vapier	1.4	# Returns the name of the C compiler for build
52			tc-getBUILD_CC() {
53	vapier	1.43	local v
54			for v in CC_FOR_BUILD BUILD_CC HOSTCC ; do
55			if [[ -n ${!v} ]] ; then
56			export BUILD_CC=${!v}
57			echo "${!v}"
58			return 0
59			fi
60			done
61	vapier	1.4
62	vapier	1.9	local search=
63	vapier	1.17	if [[ -n ${CBUILD} ]] ; then
64	vapier	1.21	search=$(type -p ${CBUILD}-gcc)
65	vapier	1.17	search=${search##*/}
66	vapier	1.9	fi
67	vapier	1.45	search=${search:-gcc}
68	vapier	1.11
69	vapier	1.17	export BUILD_CC=${search}
70	vapier	1.11	echo "${search}"
71	vapier	1.4	}
72	vapier	1.1
73	vapier	1.10	# Quick way to export a bunch of vars at once
74			tc-export() {
75			local var
76			for var in "$@" ; do
77	vapier	1.36	eval tc-get${var} > /dev/null
78	vapier	1.10	done
79			}
80
81	vapier	1.12	# A simple way to see if we're using a cross-compiler ...
82			tc-is-cross-compiler() {
83	vapier	1.43	return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]])
84	vapier	1.12	}
85
86	vapier	1.1
87	swegener	1.40	# Parse information from CBUILD/CHOST/CTARGET rather than
88	vapier	1.20	# use external variables from the profile.
89			tc-ninja_magic_to_arch() {
90	vapier	1.21	ninj() { [[ ${type} == "kern" ]] && echo $1 \|\| echo $2 ; }
91	vapier	1.19
92			local type=$1
93			local host=$2
94	eradicator	1.25	[[ -z ${host} ]] && host=${CTARGET:-${CHOST}}
95	vapier	1.19
96			case ${host} in
97			alpha*) echo alpha;;
98			arm*) echo arm;;
99	vapier	1.53	bfin*) ninj blackfin bfin;;
100	vapier	1.47	cris*) echo cris;;
101	vapier	1.19	hppa*) ninj parisc hppa;;
102	vapier	1.47	i?86*) ninj i386 x86;;
103	vapier	1.19	ia64*) echo ia64;;
104	vapier	1.23	m68*) echo m68k;;
105	vapier	1.19	mips*) echo mips;;
106	vapier	1.52	nios2*) echo nios2;;
107			nios*) echo nios;;
108	vapier	1.49	powerpc*)
109			# Starting with linux-2.6.15, the 'ppc' and 'ppc64' trees
110	josejx	1.54	# have been unified into simply 'powerpc', but until 2.6.16,
111			# ppc32 is still using ARCH="ppc" as default
112			if [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.16) ]] && [[ ${type} == "kern" ]] ; then
113	vapier	1.49	echo powerpc
114	josejx	1.54	elif [[ $(KV_to_int ${KV}) -eq $(KV_to_int 2.6.15) ]] && [[ ${type} == "kern" ]] ; then
115	dostrow	1.55	if [[ ${host} == powerpc64* ]] \|\| [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
116	josejx	1.54	echo powerpc
117			else
118			echo ppc
119	swegener	1.56	fi
120	vapier	1.49	elif [[ ${host} == powerpc64* ]] ; then
121			echo ppc64
122	dostrow	1.51	elif [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
123			ninj ppc64 ppc
124	vapier	1.49	else
125			echo ppc
126			fi
127	dostrow	1.37	;;
128	vapier	1.47	s390*) echo s390;;
129			sh64*) ninj sh64 sh;;
130			sh*) echo sh;;
131	vapier	1.19	sparc64*) ninj sparc64 sparc;;
132	vapier	1.28	sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \
133			&& ninj sparc64 sparc \
134			\|\| echo sparc
135			;;
136	vapier	1.47	vax*) echo vax;;
137			x86_64*) ninj x86_64 amd64;;
138	vapier	1.28	*) echo ${ARCH};;
139	vapier	1.19	esac
140			}
141	vapier	1.20	tc-arch-kernel() {
142			tc-ninja_magic_to_arch kern $@
143	vapier	1.19	}
144	vapier	1.20	tc-arch() {
145			tc-ninja_magic_to_arch portage $@
146	vapier	1.19	}
147	vapier	1.20	tc-endian() {
148			local host=$1
149	vapier	1.29	[[ -z ${host} ]] && host=${CTARGET:-${CHOST}}
150	vapier	1.31	host=${host%%-*}
151	vapier	1.19
152	vapier	1.20	case ${host} in
153			alpha*) echo big;;
154	vapier	1.31	armb) echo big;;
155	vapier	1.20	arm*) echo little;;
156	vapier	1.47	cris*) echo little;;
157	vapier	1.20	hppa*) echo big;;
158	vapier	1.47	i?86*) echo little;;
159	vapier	1.20	ia64*) echo little;;
160	vapier	1.23	m68*) echo big;;
161	vapier	1.31	mipsl) echo little;;
162	vapier	1.20	mips*) echo big;;
163			powerpc*) echo big;;
164			s390*) echo big;;
165	vapier	1.31	shb) echo big;;
166			sh*) echo little;;
167	vapier	1.47	sparc*) echo big;;
168			x86_64*) echo little;;
169	vapier	1.20	*) echo wtf;;
170			esac
171			}
172	vapier	1.19
173	vapier	1.1	# Returns the version as by `$CC -dumpversion`
174			gcc-fullversion() {
175			echo "$($(tc-getCC) -dumpversion)"
176			}
177			# Returns the version, but only the <major>.<minor>
178			gcc-version() {
179	vapier	1.2	echo "$(gcc-fullversion \| cut -f1,2 -d.)"
180	vapier	1.1	}
181			# Returns the Major version
182			gcc-major-version() {
183	vapier	1.2	echo "$(gcc-version \| cut -f1 -d.)"
184	vapier	1.1	}
185			# Returns the Minor version
186			gcc-minor-version() {
187	vapier	1.2	echo "$(gcc-version \| cut -f2 -d.)"
188	vapier	1.1	}
189			# Returns the Micro version
190			gcc-micro-version() {
191	eradicator	1.30	echo "$(gcc-fullversion \| cut -f3 -d. \| cut -f1 -d-)"
192	vapier	1.1	}
193	kevquinn	1.41
194			# Returns requested gcc specs directive
195	kevquinn	1.46	# Note; later specs normally overwrite earlier ones; however if a later
196			# spec starts with '+' then it appends.
197			# gcc -dumpspecs is parsed first, followed by files listed by "gcc -v"
198			# as "Reading <file>", in order.
199	kevquinn	1.41	gcc-specs-directive() {
200	kevquinn	1.57	local cc=$(tc-getCC)
201			local specfiles=$(LC_ALL=C ${cc} -v 2>&1 \| awk '$1=="Reading" {print $NF}')
202			${cc} -dumpspecs 2> /dev/null \| cat - ${specfiles} \| awk -v directive=$1 \
203	kevquinn	1.46	'BEGIN { pspec=""; spec=""; outside=1 }
204			$1=="*"directive":" { pspec=spec; spec=""; outside=0; next }
205	kevquinn	1.41	outside \|\| NF==0 \|\| ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next }
206	kevquinn	1.46	spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next }
207			{ spec=spec $0 }
208			END { print spec }'
209			return 0
210	kevquinn	1.41	}
211
212			# Returns true if gcc sets relro
213			gcc-specs-relro() {
214			local directive
215			directive=$(gcc-specs-directive link_command)
216			return $([[ ${directive/\{!norelro:} != ${directive} ]])
217			}
218			# Returns true if gcc sets now
219			gcc-specs-now() {
220			local directive
221			directive=$(gcc-specs-directive link_command)
222			return $([[ ${directive/\{!nonow:} != ${directive} ]])
223			}
224			# Returns true if gcc builds PIEs
225			gcc-specs-pie() {
226			local directive
227			directive=$(gcc-specs-directive cc1)
228			return $([[ ${directive/\{!nopie:} != ${directive} ]])
229			}
230			# Returns true if gcc builds with the stack protector
231			gcc-specs-ssp() {
232			local directive
233			directive=$(gcc-specs-directive cc1)
234			return $([[ ${directive/\{!fno-stack-protector:} != ${directive} ]])
235			}
236	kevquinn	1.46	# Returns true if gcc upgrades fstack-protector to fstack-protector-all
237			gcc-specs-ssp-to-all() {
238			local directive
239			directive=$(gcc-specs-directive cc1)
240			return $([[ ${directive/\{!fno-stack-protector-all:} != ${directive} ]])
241			}