| 1 | # Copyright 1999-2007 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.67 2007/03/04 21:03:58 vapier Exp $ |
3 | # $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.68 2007/03/15 15:55:59 kevquinn Exp $ |
| 4 | # |
4 | # |
| 5 | # Maintainer: 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...) |
| … | |
… | |
| 190 | } |
190 | } |
| 191 | # Returns the Micro version |
191 | # Returns the Micro version |
| 192 | gcc-micro-version() { |
192 | gcc-micro-version() { |
| 193 | gcc-fullversion "$@" | cut -f3 -d. | cut -f1 -d- |
193 | gcc-fullversion "$@" | cut -f3 -d. | cut -f1 -d- |
| 194 | } |
194 | } |
|
|
195 | # Returns the installation directory - internal toolchain |
|
|
196 | # function for use by _gcc-specs-exists (for flag-o-matic). |
|
|
197 | _gcc-install-dir() { |
|
|
198 | echo "$($(tc-getCC) -print-search-dirs 2> /dev/null |\ |
|
|
199 | awk '$1=="install:" {print $2}')" |
|
|
200 | } |
|
|
201 | # Returns true if the indicated specs file exists - internal toolchain |
|
|
202 | # function for use by flag-o-matic. |
|
|
203 | _gcc-specs-exists() { |
|
|
204 | [[ -f $(_gcc-install-dir)/$1 ]] |
|
|
205 | } |
| 195 | |
206 | |
| 196 | # Returns requested gcc specs directive |
207 | # Returns requested gcc specs directive unprocessed - for used by |
|
|
208 | # gcc-specs-directive() |
| 197 | # Note; later specs normally overwrite earlier ones; however if a later |
209 | # Note; later specs normally overwrite earlier ones; however if a later |
| 198 | # spec starts with '+' then it appends. |
210 | # spec starts with '+' then it appends. |
| 199 | # gcc -dumpspecs is parsed first, followed by files listed by "gcc -v" |
211 | # gcc -dumpspecs is parsed first, followed by files listed by "gcc -v" |
| 200 | # as "Reading <file>", in order. |
212 | # as "Reading <file>", in order. Strictly speaking, if there's a |
|
|
213 | # $(gcc_install_dir)/specs, the built-in specs aren't read, however by |
|
|
214 | # the same token anything from 'gcc -dumpspecs' is overridden by |
|
|
215 | # the contents of $(gcc_install_dir)/specs so the result is the |
|
|
216 | # same either way. |
| 201 | gcc-specs-directive() { |
217 | _gcc-specs-directive_raw() { |
| 202 | local cc=$(tc-getCC) |
218 | local cc=$(tc-getCC) |
| 203 | local specfiles=$(LC_ALL=C ${cc} -v 2>&1 | awk '$1=="Reading" {print $NF}') |
219 | local specfiles=$(LC_ALL=C ${cc} -v 2>&1 | awk '$1=="Reading" {print $NF}') |
| 204 | ${cc} -dumpspecs 2> /dev/null | cat - ${specfiles} | awk -v directive=$1 \ |
220 | ${cc} -dumpspecs 2> /dev/null | cat - ${specfiles} | awk -v directive=$1 \ |
| 205 | 'BEGIN { pspec=""; spec=""; outside=1 } |
221 | 'BEGIN { pspec=""; spec=""; outside=1 } |
| 206 | $1=="*"directive":" { pspec=spec; spec=""; outside=0; next } |
222 | $1=="*"directive":" { pspec=spec; spec=""; outside=0; next } |
| 207 | outside || NF==0 || ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next } |
223 | outside || NF==0 || ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next } |
| 208 | spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next } |
224 | spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next } |
| 209 | { spec=spec $0 } |
225 | { spec=spec $0 } |
| 210 | END { print spec }' |
226 | END { print spec }' |
|
|
227 | return 0 |
|
|
228 | } |
|
|
229 | |
|
|
230 | # Return the requested gcc specs directive, with all included |
|
|
231 | # specs expanded. |
|
|
232 | # Note, it does not check for inclusion loops, which cause it |
|
|
233 | # to never finish - but such loops are invalid for gcc and we're |
|
|
234 | # assuming gcc is operational. |
|
|
235 | gcc-specs-directive() { |
|
|
236 | local directive subdname subdirective |
|
|
237 | directive="$(_gcc-specs-directive_raw $1)" |
|
|
238 | while [[ ${directive} == *%\(*\)* ]]; do |
|
|
239 | subdname=${directive/*%\(} |
|
|
240 | subdname=${subdname/\)*} |
|
|
241 | subdirective="$(_gcc-specs-directive_raw ${subdname})" |
|
|
242 | directive="${directive//\%(${subdname})/${subdirective}}" |
|
|
243 | done |
|
|
244 | echo "${directive}" |
| 211 | return 0 |
245 | return 0 |
| 212 | } |
246 | } |
| 213 | |
247 | |
| 214 | # Returns true if gcc sets relro |
248 | # Returns true if gcc sets relro |
| 215 | gcc-specs-relro() { |
249 | gcc-specs-relro() { |