| 1 | # Copyright 1999-2006 Gentoo Foundation |
1 | # Copyright 1999-2007 Gentoo Foundation |
| 2 | # Distributed under the terms of the GNU General Public License v2 |
2 | # Distributed under the terms of the GNU General Public License v2 |
| 3 | # $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.62 2006/09/24 12:23:22 vapier Exp $ |
3 | # $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.72 2007/07/22 19:56:37 vapier Exp $ |
| 4 | # |
4 | # |
| 5 | # Author: Toolchain Ninjas <toolchain@gentoo.org> |
5 | # Maintainer: Toolchain Ninjas <toolchain@gentoo.org> |
| 6 | # |
6 | # |
| 7 | # This eclass contains (or should) functions to get common info |
7 | # This eclass contains (or should) functions to get common info |
| 8 | # about the toolchain (libc/compiler/binutils/etc...) |
8 | # about the toolchain (libc/compiler/binutils/etc...) |
| 9 | |
9 | |
| 10 | inherit multilib |
10 | ___ECLASS_RECUR_TOOLCHAIN_FUNCS="yes" |
|
|
11 | [[ -z ${___ECLASS_RECUR_MULTILIB} ]] && inherit multilib |
| 11 | |
12 | |
| 12 | DESCRIPTION="Based on the ${ECLASS} eclass" |
13 | DESCRIPTION="Based on the ${ECLASS} eclass" |
| 13 | |
14 | |
| 14 | tc-getPROG() { |
15 | tc-getPROG() { |
| 15 | local var=$1 |
16 | local var=$1 |
| … | |
… | |
| 89 | # A simple way to see if we're using a cross-compiler ... |
90 | # A simple way to see if we're using a cross-compiler ... |
| 90 | tc-is-cross-compiler() { |
91 | tc-is-cross-compiler() { |
| 91 | return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]]) |
92 | return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]]) |
| 92 | } |
93 | } |
| 93 | |
94 | |
|
|
95 | # See if this toolchain is a softfloat based one. |
|
|
96 | # The possible return values: |
|
|
97 | # - only: the target is always softfloat (never had fpu) |
|
|
98 | # - yes: the target should support softfloat |
|
|
99 | # - no: the target should support hardfloat |
|
|
100 | # This allows us to react differently where packages accept |
|
|
101 | # softfloat flags in the case where support is optional, but |
|
|
102 | # rejects softfloat flags where the target always lacks an fpu. |
|
|
103 | tc-is-softfloat() { |
|
|
104 | case ${CTARGET} in |
|
|
105 | bfin*|h8300*) |
|
|
106 | echo "only" ;; |
|
|
107 | *) |
|
|
108 | [[ ${CTARGET//_/-} == *-softfloat-* ]] \ |
|
|
109 | && echo "yes" \ |
|
|
110 | || echo "no" |
|
|
111 | ;; |
|
|
112 | esac |
|
|
113 | } |
| 94 | |
114 | |
| 95 | # Parse information from CBUILD/CHOST/CTARGET rather than |
115 | # Parse information from CBUILD/CHOST/CTARGET rather than |
| 96 | # use external variables from the profile. |
116 | # use external variables from the profile. |
| 97 | tc-ninja_magic_to_arch() { |
117 | tc-ninja_magic_to_arch() { |
| 98 | ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; } |
118 | ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; } |
| … | |
… | |
| 102 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
122 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
| 103 | |
123 | |
| 104 | case ${host} in |
124 | case ${host} in |
| 105 | alpha*) echo alpha;; |
125 | alpha*) echo alpha;; |
| 106 | arm*) echo arm;; |
126 | arm*) echo arm;; |
|
|
127 | avr*) ninj avr32 avr;; |
| 107 | bfin*) ninj blackfin bfin;; |
128 | bfin*) ninj blackfin bfin;; |
| 108 | cris*) echo cris;; |
129 | cris*) echo cris;; |
| 109 | hppa*) ninj parisc hppa;; |
130 | hppa*) ninj parisc hppa;; |
| 110 | i?86*) ninj i386 x86;; |
131 | i?86*) ninj i386 x86;; |
| 111 | ia64*) echo ia64;; |
132 | ia64*) echo ia64;; |
| … | |
… | |
| 178 | esac |
199 | esac |
| 179 | } |
200 | } |
| 180 | |
201 | |
| 181 | # Returns the version as by `$CC -dumpversion` |
202 | # Returns the version as by `$CC -dumpversion` |
| 182 | gcc-fullversion() { |
203 | gcc-fullversion() { |
| 183 | echo "$($(tc-getCC) -dumpversion)" |
204 | $(tc-getCC "$@") -dumpversion |
| 184 | } |
205 | } |
| 185 | # Returns the version, but only the <major>.<minor> |
206 | # Returns the version, but only the <major>.<minor> |
| 186 | gcc-version() { |
207 | gcc-version() { |
| 187 | echo "$(gcc-fullversion | cut -f1,2 -d.)" |
208 | gcc-fullversion "$@" | cut -f1,2 -d. |
| 188 | } |
209 | } |
| 189 | # Returns the Major version |
210 | # Returns the Major version |
| 190 | gcc-major-version() { |
211 | gcc-major-version() { |
| 191 | echo "$(gcc-version | cut -f1 -d.)" |
212 | gcc-version "$@" | cut -f1 -d. |
| 192 | } |
213 | } |
| 193 | # Returns the Minor version |
214 | # Returns the Minor version |
| 194 | gcc-minor-version() { |
215 | gcc-minor-version() { |
| 195 | echo "$(gcc-version | cut -f2 -d.)" |
216 | gcc-version "$@" | cut -f2 -d. |
| 196 | } |
217 | } |
| 197 | # Returns the Micro version |
218 | # Returns the Micro version |
| 198 | gcc-micro-version() { |
219 | gcc-micro-version() { |
| 199 | echo "$(gcc-fullversion | cut -f3 -d. | cut -f1 -d-)" |
220 | gcc-fullversion "$@" | cut -f3 -d. | cut -f1 -d- |
| 200 | } |
221 | } |
|
|
222 | # Returns the installation directory - internal toolchain |
|
|
223 | # function for use by _gcc-specs-exists (for flag-o-matic). |
|
|
224 | _gcc-install-dir() { |
|
|
225 | echo "$($(tc-getCC) -print-search-dirs 2> /dev/null |\ |
|
|
226 | awk '$1=="install:" {print $2}')" |
|
|
227 | } |
|
|
228 | # Returns true if the indicated specs file exists - internal toolchain |
|
|
229 | # function for use by flag-o-matic. |
|
|
230 | _gcc-specs-exists() { |
|
|
231 | [[ -f $(_gcc-install-dir)/$1 ]] |
|
|
232 | } |
| 201 | |
233 | |
| 202 | # Returns requested gcc specs directive |
234 | # Returns requested gcc specs directive unprocessed - for used by |
|
|
235 | # gcc-specs-directive() |
| 203 | # Note; later specs normally overwrite earlier ones; however if a later |
236 | # Note; later specs normally overwrite earlier ones; however if a later |
| 204 | # spec starts with '+' then it appends. |
237 | # spec starts with '+' then it appends. |
| 205 | # gcc -dumpspecs is parsed first, followed by files listed by "gcc -v" |
238 | # gcc -dumpspecs is parsed first, followed by files listed by "gcc -v" |
| 206 | # as "Reading <file>", in order. |
239 | # as "Reading <file>", in order. Strictly speaking, if there's a |
|
|
240 | # $(gcc_install_dir)/specs, the built-in specs aren't read, however by |
|
|
241 | # the same token anything from 'gcc -dumpspecs' is overridden by |
|
|
242 | # the contents of $(gcc_install_dir)/specs so the result is the |
|
|
243 | # same either way. |
| 207 | gcc-specs-directive() { |
244 | _gcc-specs-directive_raw() { |
| 208 | local cc=$(tc-getCC) |
245 | local cc=$(tc-getCC) |
| 209 | local specfiles=$(LC_ALL=C ${cc} -v 2>&1 | awk '$1=="Reading" {print $NF}') |
246 | 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 \ |
247 | ${cc} -dumpspecs 2> /dev/null | cat - ${specfiles} | awk -v directive=$1 \ |
| 211 | 'BEGIN { pspec=""; spec=""; outside=1 } |
248 | 'BEGIN { pspec=""; spec=""; outside=1 } |
| 212 | $1=="*"directive":" { pspec=spec; spec=""; outside=0; next } |
249 | $1=="*"directive":" { pspec=spec; spec=""; outside=0; next } |
| … | |
… | |
| 215 | { spec=spec $0 } |
252 | { spec=spec $0 } |
| 216 | END { print spec }' |
253 | END { print spec }' |
| 217 | return 0 |
254 | return 0 |
| 218 | } |
255 | } |
| 219 | |
256 | |
|
|
257 | # Return the requested gcc specs directive, with all included |
|
|
258 | # specs expanded. |
|
|
259 | # Note, it does not check for inclusion loops, which cause it |
|
|
260 | # to never finish - but such loops are invalid for gcc and we're |
|
|
261 | # assuming gcc is operational. |
|
|
262 | gcc-specs-directive() { |
|
|
263 | local directive subdname subdirective |
|
|
264 | directive="$(_gcc-specs-directive_raw $1)" |
|
|
265 | while [[ ${directive} == *%\(*\)* ]]; do |
|
|
266 | subdname=${directive/*%\(} |
|
|
267 | subdname=${subdname/\)*} |
|
|
268 | subdirective="$(_gcc-specs-directive_raw ${subdname})" |
|
|
269 | directive="${directive//\%(${subdname})/${subdirective}}" |
|
|
270 | done |
|
|
271 | echo "${directive}" |
|
|
272 | return 0 |
|
|
273 | } |
|
|
274 | |
| 220 | # Returns true if gcc sets relro |
275 | # Returns true if gcc sets relro |
| 221 | gcc-specs-relro() { |
276 | gcc-specs-relro() { |
| 222 | local directive |
277 | local directive |
| 223 | directive=$(gcc-specs-directive link_command) |
278 | directive=$(gcc-specs-directive link_command) |
| 224 | return $([[ ${directive/\{!norelro:} != ${directive} ]]) |
279 | return $([[ ${directive/\{!norelro:} != ${directive} ]]) |
| … | |
… | |
| 262 | # gen_usr_ldscript libfoo.so |
317 | # gen_usr_ldscript libfoo.so |
| 263 | # |
318 | # |
| 264 | # Note that you should in general use the unversioned name of |
319 | # Note that you should in general use the unversioned name of |
| 265 | # the library, as ldconfig should usually update it correctly |
320 | # the library, as ldconfig should usually update it correctly |
| 266 | # to point to the latest version of the library present. |
321 | # to point to the latest version of the library present. |
| 267 | _tc_gen_usr_ldscript() { |
322 | gen_usr_ldscript() { |
| 268 | local lib libdir=$(get_libdir) output_format="" |
323 | local lib libdir=$(get_libdir) output_format="" |
| 269 | # Just make sure it exists |
324 | # Just make sure it exists |
| 270 | dodir /usr/${libdir} |
325 | dodir /usr/${libdir} |
| 271 | |
326 | |
| 272 | # OUTPUT_FORMAT gives hints to the linker as to what binary format |
327 | # OUTPUT_FORMAT gives hints to the linker as to what binary format |
| … | |
… | |
| 294 | END_LDSCRIPT |
349 | END_LDSCRIPT |
| 295 | fi |
350 | fi |
| 296 | fperms a+x "/usr/${libdir}/${lib}" || die "could not change perms on ${lib}" |
351 | fperms a+x "/usr/${libdir}/${lib}" || die "could not change perms on ${lib}" |
| 297 | done |
352 | done |
| 298 | } |
353 | } |
| 299 | gen_usr_ldscript() { _tc_gen_usr_ldscript "$@" ; } |
|
|