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

Contents of /eclass/toolchain-funcs.eclass

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.78 - (hide annotations) (download)
Thu Jul 3 05:26:47 2008 UTC (6 years 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 vapier 1.67 # Copyright 1999-2007 Gentoo Foundation
2 vapier 1.1 # Distributed under the terms of the GNU General Public License v2
3 dberkholz 1.78 # $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.77 2008/06/01 08:56:56 aballier 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.36 eval tc-get${var} > /dev/null
120 vapier 1.10 done
121     }
122    
123 vapier 1.74 # @FUNCTION: tc-is-cross-compiler
124     # @RETURN: Shell true if we are using a cross-compiler, shell false otherwise
125 vapier 1.12 tc-is-cross-compiler() {
126 vapier 1.43 return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]])
127 vapier 1.12 }
128    
129 vapier 1.74 # @FUNCTION: tc-is-softfloat
130     # @DESCRIPTION:
131 vapier 1.65 # See if this toolchain is a softfloat based one.
132 vapier 1.74 # @CODE
133 vapier 1.65 # 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 vapier 1.74 # @CODE
138 vapier 1.65 # 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 vapier 1.66 bfin*|h8300*)
144 vapier 1.65 echo "only" ;;
145     *)
146     [[ ${CTARGET//_/-} == *-softfloat-* ]] \
147     && echo "yes" \
148     || echo "no"
149     ;;
150     esac
151     }
152 vapier 1.1
153 swegener 1.40 # Parse information from CBUILD/CHOST/CTARGET rather than
154 vapier 1.20 # use external variables from the profile.
155     tc-ninja_magic_to_arch() {
156 vapier 1.21 ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; }
157 vapier 1.19
158     local type=$1
159     local host=$2
160 eradicator 1.25 [[ -z ${host} ]] && host=${CTARGET:-${CHOST}}
161 vapier 1.19
162     case ${host} in
163     alpha*) echo alpha;;
164     arm*) echo arm;;
165 vapier 1.72 avr*) ninj avr32 avr;;
166 vapier 1.53 bfin*) ninj blackfin bfin;;
167 vapier 1.47 cris*) echo cris;;
168 vapier 1.19 hppa*) ninj parisc hppa;;
169 vapier 1.75 i?86*)
170     # Starting with linux-2.6.24, the 'x86_64' and 'i386'
171     # trees have been unified into 'x86'.
172 aballier 1.77 # FreeBSD still uses i386
173     if [[ ${type} == "kern" ]] && [[ $(KV_to_int ${KV}) -lt $(KV_to_int 2.6.24) || ${host} == *freebsd* ]] ; then
174 vapier 1.75 echo i386
175     else
176     echo x86
177     fi
178     ;;
179 vapier 1.19 ia64*) echo ia64;;
180 vapier 1.23 m68*) echo m68k;;
181 vapier 1.19 mips*) echo mips;;
182 vapier 1.52 nios2*) echo nios2;;
183     nios*) echo nios;;
184 vapier 1.49 powerpc*)
185     # Starting with linux-2.6.15, the 'ppc' and 'ppc64' trees
186 josejx 1.54 # 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 vapier 1.49 echo powerpc
190 josejx 1.54 elif [[ $(KV_to_int ${KV}) -eq $(KV_to_int 2.6.15) ]] && [[ ${type} == "kern" ]] ; then
191 dostrow 1.55 if [[ ${host} == powerpc64* ]] || [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
192 josejx 1.54 echo powerpc
193     else
194     echo ppc
195 swegener 1.56 fi
196 vapier 1.49 elif [[ ${host} == powerpc64* ]] ; then
197     echo ppc64
198 dostrow 1.51 elif [[ ${PROFILE_ARCH} == "ppc64" ]] ; then
199     ninj ppc64 ppc
200 vapier 1.49 else
201     echo ppc
202     fi
203 dostrow 1.37 ;;
204 vapier 1.47 s390*) echo s390;;
205     sh64*) ninj sh64 sh;;
206     sh*) echo sh;;
207 vapier 1.19 sparc64*) ninj sparc64 sparc;;
208 vapier 1.28 sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \
209     && ninj sparc64 sparc \
210     || echo sparc
211     ;;
212 vapier 1.47 vax*) echo vax;;
213 vapier 1.75 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 vapier 1.73
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 vapier 1.19 esac
228     }
229 vapier 1.74 # @FUNCTION: tc-arch-kernel
230     # @USAGE: [toolchain prefix]
231     # @RETURN: name of the kernel arch according to the compiler target
232 vapier 1.20 tc-arch-kernel() {
233 vapier 1.74 tc-ninja_magic_to_arch kern "$@"
234 vapier 1.19 }
235 vapier 1.74 # @FUNCTION: tc-arch
236     # @USAGE: [toolchain prefix]
237     # @RETURN: name of the portage arch according to the compiler target
238 vapier 1.20 tc-arch() {
239 vapier 1.74 tc-ninja_magic_to_arch portage "$@"
240 vapier 1.19 }
241 vapier 1.74
242 robbat2 1.71 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 vapier 1.19
268 vapier 1.74 # @FUNCTION: gcc-fullversion
269     # @RETURN: compiler version (major.minor.micro: [3.4.6])
270 vapier 1.1 gcc-fullversion() {
271 vapier 1.63 $(tc-getCC "$@") -dumpversion
272 vapier 1.1 }
273 vapier 1.74 # @FUNCTION: gcc-version
274     # @RETURN: compiler version (major.minor: [3.4].6)
275 vapier 1.1 gcc-version() {
276 vapier 1.63 gcc-fullversion "$@" | cut -f1,2 -d.
277 vapier 1.1 }
278 vapier 1.74 # @FUNCTION: gcc-major-version
279     # @RETURN: major compiler version (major: [3].4.6)
280 vapier 1.1 gcc-major-version() {
281 vapier 1.63 gcc-version "$@" | cut -f1 -d.
282 vapier 1.1 }
283 vapier 1.74 # @FUNCTION: gcc-minor-version
284     # @RETURN: minor compiler version (minor: 3.[4].6)
285 vapier 1.1 gcc-minor-version() {
286 vapier 1.63 gcc-version "$@" | cut -f2 -d.
287 vapier 1.1 }
288 vapier 1.74 # @FUNCTION: gcc-micro-version
289     # @RETURN: micro compiler version (micro: 3.4.[6])
290 vapier 1.1 gcc-micro-version() {
291 vapier 1.63 gcc-fullversion "$@" | cut -f3 -d. | cut -f1 -d-
292 vapier 1.1 }
293 vapier 1.74
294 kevquinn 1.68 # Returns the installation directory - internal toolchain
295     # function for use by _gcc-specs-exists (for flag-o-matic).
296     _gcc-install-dir() {
297 vapier 1.76 echo "$(LC_ALL=C $(tc-getCC) -print-search-dirs 2> /dev/null |\
298 kevquinn 1.68 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 kevquinn 1.41
306 kevquinn 1.68 # Returns requested gcc specs directive unprocessed - for used by
307     # gcc-specs-directive()
308 kevquinn 1.46 # 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 kevquinn 1.68 # 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 kevquinn 1.57 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 kevquinn 1.46 'BEGIN { pspec=""; spec=""; outside=1 }
321     $1=="*"directive":" { pspec=spec; spec=""; outside=0; next }
322 kevquinn 1.41 outside || NF==0 || ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next }
323 kevquinn 1.46 spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next }
324     { spec=spec $0 }
325     END { print spec }'
326     return 0
327 kevquinn 1.41 }
328    
329 kevquinn 1.68 # 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 kevquinn 1.41 # 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 kevquinn 1.46 # 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 vapier 1.60
378    
379 vapier 1.74 # @FUNCTION: gen_usr_ldscript
380     # @USAGE: <list of libs to create linker scripts for>
381     # @DESCRIPTION:
382 vapier 1.60 # 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 vapier 1.74 # library search path. This causes many builds to fail.
388 vapier 1.60 # See bug #4411 for more info.
389     #
390     # Note that you should in general use the unversioned name of
391 vapier 1.74 # the library (libfoo.so), as ldconfig should usually update it
392     # correctly to point to the latest version of the library present.
393 vapier 1.70 gen_usr_ldscript() {
394 vapier 1.60 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 vapier 1.62 if [[ ${USERLAND} == "Darwin" ]] ; then
405     ewarn "Not creating fake dynamic library for $lib on Darwin;"
406 grobian 1.61 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 vapier 1.60 fperms a+x "/usr/${libdir}/${lib}" || die "could not change perms on ${lib}"
423     done
424     }

  ViewVC Help
Powered by ViewVC 1.1.20