/[gentoo-x86]/eclass/toolchain-funcs.eclass
Gentoo

Contents of /eclass/toolchain-funcs.eclass

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.78 - (show annotations) (download)
Thu Jul 3 05:26:47 2008 UTC (6 years, 1 month ago) by dberkholz
Branch: MAIN
Changes since 1.77: +3 -7 lines
[Fortran] Do a little reworking, since these functions remain unused by anything. Rename tc-getF90() to tc-getFC() for consistency with autotools, fortran.eclass, etc. Drop tc-getFORTRAN() -- people should use the appropriate function.

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

  ViewVC Help
Powered by ViewVC 1.1.20