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