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.61 2006/09/24 07:20:33 grobian 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 preprocessor
tc-getCPP() { tc-getPROG CPP cpp "$@"; }
# 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 strip prog
tc-getSTRIP() { tc-getPROG STRIP strip "$@"; }
# 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 77 compiler
tc-getF77() { tc-getPROG F77 f77 "$@"; }
# Returns the name of the fortran 90 compiler
tc-getF90() { tc-getPROG F90 gfortran "$@"; }
# Returns the name of the fortran compiler
tc-getFORTRAN() { tc-getPROG FORTRAN gfortran "$@"; }
# 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} ]])
}


# 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 cause many builds to fail.
# See bug #4411 for more info.
#
# To use, simply call:
#
#   gen_usr_ldscript libfoo.so
#
# Note that you should in general use the unversioned name of
# the library, as ldconfig should usually update it correctly
# to point to the latest version of the library present.
_tc_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
}
gen_usr_ldscript() { _tc_gen_usr_ldscript "$@" ; }
1	# Copyright 1999-2006 Gentoo Foundation
2	# Distributed under the terms of the GNU General Public License v2
3	# $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.61 2006/09/24 07:20:33 grobian Exp $
4	#
5	# Author: Toolchain Ninjas <toolchain@gentoo.org>
6	#
7	# This eclass contains (or should) functions to get common info
8	# about the toolchain (libc/compiler/binutils/etc...)
9
10	inherit multilib
11
12	DESCRIPTION="Based on the ${ECLASS} eclass"
13
14	tc-getPROG() {
15	local var=$1
16	local prog=$2
17
18	if [[ -n ${!var} ]] ; then
19	echo "${!var}"
20	return 0
21	fi
22
23	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
28	export ${var}=${prog}
29	echo "${!var}"
30	}
31
32	# Returns the name of the archiver
33	tc-getAR() { tc-getPROG AR ar "$@"; }
34	# Returns the name of the assembler
35	tc-getAS() { tc-getPROG AS as "$@"; }
36	# Returns the name of the C compiler
37	tc-getCC() { tc-getPROG CC gcc "$@"; }
38	# Returns the name of the C preprocessor
39	tc-getCPP() { tc-getPROG CPP cpp "$@"; }
40	# Returns the name of the C++ compiler
41	tc-getCXX() { tc-getPROG CXX g++ "$@"; }
42	# Returns the name of the linker
43	tc-getLD() { tc-getPROG LD ld "$@"; }
44	# Returns the name of the strip prog
45	tc-getSTRIP() { tc-getPROG STRIP strip "$@"; }
46	# Returns the name of the symbol/object thingy
47	tc-getNM() { tc-getPROG NM nm "$@"; }
48	# Returns the name of the archiver indexer
49	tc-getRANLIB() { tc-getPROG RANLIB ranlib "$@"; }
50	# Returns the name of the fortran 77 compiler
51	tc-getF77() { tc-getPROG F77 f77 "$@"; }
52	# Returns the name of the fortran 90 compiler
53	tc-getF90() { tc-getPROG F90 gfortran "$@"; }
54	# Returns the name of the fortran compiler
55	tc-getFORTRAN() { tc-getPROG FORTRAN gfortran "$@"; }
56	# Returns the name of the java compiler
57	tc-getGCJ() { tc-getPROG GCJ gcj "$@"; }
58
59	# Returns the name of the C compiler for build
60	tc-getBUILD_CC() {
61	local v
62	for v in CC_FOR_BUILD BUILD_CC HOSTCC ; do
63	if [[ -n ${!v} ]] ; then
64	export BUILD_CC=${!v}
65	echo "${!v}"
66	return 0
67	fi
68	done
69
70	local search=
71	if [[ -n ${CBUILD} ]] ; then
72	search=$(type -p ${CBUILD}-gcc)
73	search=${search##*/}
74	fi
75	search=${search:-gcc}
76
77	export BUILD_CC=${search}
78	echo "${search}"
79	}
80
81	# Quick way to export a bunch of vars at once
82	tc-export() {
83	local var
84	for var in "$@" ; do
85	eval tc-get${var} > /dev/null
86	done
87	}
88
89	# A simple way to see if we're using a cross-compiler ...
90	tc-is-cross-compiler() {
91	return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]])
92	}
93
94
95	# Parse information from CBUILD/CHOST/CTARGET rather than
96	# use external variables from the profile.
97	tc-ninja_magic_to_arch() {
98	ninj() { [[ ${type} == "kern" ]] && echo $1 \|\| echo $2 ; }
99
100	local type=$1
101	local host=$2
102	[[ -z ${host} ]] && host=${CTARGET:-${CHOST}}
103
104	case ${host} in
105	alpha*) echo alpha;;
106	arm*) echo arm;;
107	bfin*) ninj blackfin bfin;;
108	cris*) echo cris;;
109	hppa*) ninj parisc hppa;;
110	i?86*) ninj i386 x86;;
111	ia64*) echo ia64;;
112	m68*) echo m68k;;
113	mips*) echo mips;;
114	nios2*) echo nios2;;
115	nios*) echo nios;;
116	powerpc*)
117	# Starting with linux-2.6.15, the 'ppc' and 'ppc64' trees
118	# have been unified into simply 'powerpc', but until 2.6.16,
119	# ppc32 is still using ARCH="ppc" as default
120	if [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.16) ]] && [[ ${type} == "kern" ]] ; then
121	echo powerpc
122	elif [[ $(KV_to_int ${KV}) -eq $(KV_to_int 2.6.15) ]] && [[ ${type} == "kern" ]] ; then
123	if [[ ${host} == powerpc64* ]] \|\| [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
124	echo powerpc
125	else
126	echo ppc
127	fi
128	elif [[ ${host} == powerpc64* ]] ; then
129	echo ppc64
130	elif [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
131	ninj ppc64 ppc
132	else
133	echo ppc
134	fi
135	;;
136	s390*) echo s390;;
137	sh64*) ninj sh64 sh;;
138	sh*) echo sh;;
139	sparc64*) ninj sparc64 sparc;;
140	sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \
141	&& ninj sparc64 sparc \
142	\|\| echo sparc
143	;;
144	vax*) echo vax;;
145	x86_64*) ninj x86_64 amd64;;
146	*) echo ${ARCH};;
147	esac
148	}
149	tc-arch-kernel() {
150	tc-ninja_magic_to_arch kern $@
151	}
152	tc-arch() {
153	tc-ninja_magic_to_arch portage $@
154	}
155	tc-endian() {
156	local host=$1
157	[[ -z ${host} ]] && host=${CTARGET:-${CHOST}}
158	host=${host%%-*}
159
160	case ${host} in
161	alpha*) echo big;;
162	armb) echo big;;
163	arm*) echo little;;
164	cris*) echo little;;
165	hppa*) echo big;;
166	i?86*) echo little;;
167	ia64*) echo little;;
168	m68*) echo big;;
169	mipsl) echo little;;
170	mips*) echo big;;
171	powerpc*) echo big;;
172	s390*) echo big;;
173	shb) echo big;;
174	sh*) echo little;;
175	sparc*) echo big;;
176	x86_64*) echo little;;
177	*) echo wtf;;
178	esac
179	}
180
181	# Returns the version as by `$CC -dumpversion`
182	gcc-fullversion() {
183	echo "$($(tc-getCC) -dumpversion)"
184	}
185	# Returns the version, but only the <major>.<minor>
186	gcc-version() {
187	echo "$(gcc-fullversion \| cut -f1,2 -d.)"
188	}
189	# Returns the Major version
190	gcc-major-version() {
191	echo "$(gcc-version \| cut -f1 -d.)"
192	}
193	# Returns the Minor version
194	gcc-minor-version() {
195	echo "$(gcc-version \| cut -f2 -d.)"
196	}
197	# Returns the Micro version
198	gcc-micro-version() {
199	echo "$(gcc-fullversion \| cut -f3 -d. \| cut -f1 -d-)"
200	}
201
202	# Returns requested gcc specs directive
203	# Note; later specs normally overwrite earlier ones; however if a later
204	# spec starts with '+' then it appends.
205	# gcc -dumpspecs is parsed first, followed by files listed by "gcc -v"
206	# as "Reading <file>", in order.
207	gcc-specs-directive() {
208	local cc=$(tc-getCC)
209	local specfiles=$(LC_ALL=C ${cc} -v 2>&1 \| awk '$1=="Reading" {print $NF}')
210	${cc} -dumpspecs 2> /dev/null \| cat - ${specfiles} \| awk -v directive=$1 \
211	'BEGIN { pspec=""; spec=""; outside=1 }
212	$1=="*"directive":" { pspec=spec; spec=""; outside=0; next }
213	outside \|\| NF==0 \|\| ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next }
214	spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next }
215	{ spec=spec $0 }
216	END { print spec }'
217	return 0
218	}
219
220	# Returns true if gcc sets relro
221	gcc-specs-relro() {
222	local directive
223	directive=$(gcc-specs-directive link_command)
224	return $([[ ${directive/\{!norelro:} != ${directive} ]])
225	}
226	# Returns true if gcc sets now
227	gcc-specs-now() {
228	local directive
229	directive=$(gcc-specs-directive link_command)
230	return $([[ ${directive/\{!nonow:} != ${directive} ]])
231	}
232	# Returns true if gcc builds PIEs
233	gcc-specs-pie() {
234	local directive
235	directive=$(gcc-specs-directive cc1)
236	return $([[ ${directive/\{!nopie:} != ${directive} ]])
237	}
238	# Returns true if gcc builds with the stack protector
239	gcc-specs-ssp() {
240	local directive
241	directive=$(gcc-specs-directive cc1)
242	return $([[ ${directive/\{!fno-stack-protector:} != ${directive} ]])
243	}
244	# Returns true if gcc upgrades fstack-protector to fstack-protector-all
245	gcc-specs-ssp-to-all() {
246	local directive
247	directive=$(gcc-specs-directive cc1)
248	return $([[ ${directive/\{!fno-stack-protector-all:} != ${directive} ]])
249	}
250
251
252	# This function generate linker scripts in /usr/lib for dynamic
253	# libs in /lib. This is to fix linking problems when you have
254	# the .so in /lib, and the .a in /usr/lib. What happens is that
255	# in some cases when linking dynamic, the .a in /usr/lib is used
256	# instead of the .so in /lib due to gcc/libtool tweaking ld's
257	# library search path. This cause many builds to fail.
258	# See bug #4411 for more info.
259	#
260	# To use, simply call:
261	#
262	# gen_usr_ldscript libfoo.so
263	#
264	# Note that you should in general use the unversioned name of
265	# the library, as ldconfig should usually update it correctly
266	# to point to the latest version of the library present.
267	_tc_gen_usr_ldscript() {
268	local lib libdir=$(get_libdir) output_format=""
269	# Just make sure it exists
270	dodir /usr/${libdir}
271
272	# OUTPUT_FORMAT gives hints to the linker as to what binary format
273	# is referenced ... makes multilib saner
274	output_format=$($(tc-getCC) ${CFLAGS} ${LDFLAGS} -Wl,--verbose 2>&1 \| sed -n 's/^OUTPUT_FORMAT("\([^"]\)",./\1/p')
275	[[ -n ${output_format} ]] && output_format="OUTPUT_FORMAT ( ${output_format} )"
276
277	for lib in "$@" ; do
278	if [[ ${USERLAND} == "Darwin" ]] ; then
279	ewarn "Not creating fake dynamic library for $lib on Darwin;"
280	ewarn "making a symlink instead."
281	dosym "/${libdir}/${lib}" "/usr/${libdir}/${lib}"
282	else
283	cat > "${D}/usr/${libdir}/${lib}" <<-END_LDSCRIPT
284	/* GNU ld script
285	Since Gentoo has critical dynamic libraries
286	in /lib, and the static versions in /usr/lib,
287	we need to have a "fake" dynamic lib in /usr/lib,
288	otherwise we run into linking problems.
289
290	See bug http://bugs.gentoo.org/4411 for more info.
291	*/
292	${output_format}
293	GROUP ( /${libdir}/${lib} )
294	END_LDSCRIPT
295	fi
296	fperms a+x "/usr/${libdir}/${lib}" \|\| die "could not change perms on ${lib}"
297	done
298	}
299	gen_usr_ldscript() { _tc_gen_usr_ldscript "$@" ; }