| 1 | # Copyright 1999-2005 Gentoo Foundation |
1 | # Copyright 1999-2006 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.26 2005/01/16 10:31:59 vapier Exp $ |
3 | # $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.64 2007/01/07 11:39:08 vapier Exp $ |
| 4 | # |
4 | # |
| 5 | # Author: Toolchain Ninjas <ninjas@gentoo.org> |
5 | # Author: 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 | ECLASS=toolchain-funcs |
10 | inherit multilib |
| 11 | INHERITED="$INHERITED $ECLASS" |
|
|
| 12 | |
11 | |
| 13 | DESCRIPTION="Based on the ${ECLASS} eclass" |
12 | DESCRIPTION="Based on the ${ECLASS} eclass" |
| 14 | |
13 | |
| 15 | tc-getPROG() { |
14 | tc-getPROG() { |
| 16 | local var=$1 |
15 | local var=$1 |
| … | |
… | |
| 19 | if [[ -n ${!var} ]] ; then |
18 | if [[ -n ${!var} ]] ; then |
| 20 | echo "${!var}" |
19 | echo "${!var}" |
| 21 | return 0 |
20 | return 0 |
| 22 | fi |
21 | fi |
| 23 | |
22 | |
| 24 | if [[ -n ${CHOST} ]] ; then |
23 | local search= |
| 25 | local search=$(type -p "${CHOST}-${prog}") |
24 | [[ -n $3 ]] && search=$(type -p "$3-${prog}") |
|
|
25 | [[ -z ${search} && -n ${CHOST} ]] && search=$(type -p "${CHOST}-${prog}") |
| 26 | [[ -n ${search} ]] && prog=${search##*/} |
26 | [[ -n ${search} ]] && prog=${search##*/} |
| 27 | fi |
|
|
| 28 | |
27 | |
| 29 | export ${var}=${prog} |
28 | export ${var}=${prog} |
| 30 | echo "${!var}" |
29 | echo "${!var}" |
| 31 | } |
30 | } |
| 32 | |
31 | |
| 33 | # Returns the name of the archiver |
32 | # Returns the name of the archiver |
| 34 | tc-getAR() { tc-getPROG AR ar; } |
33 | tc-getAR() { tc-getPROG AR ar "$@"; } |
| 35 | # Returns the name of the assembler |
34 | # Returns the name of the assembler |
| 36 | tc-getAS() { tc-getPROG AS as; } |
35 | tc-getAS() { tc-getPROG AS as "$@"; } |
| 37 | # Returns the name of the C compiler |
36 | # Returns the name of the C compiler |
| 38 | tc-getCC() { tc-getPROG CC gcc; } |
37 | tc-getCC() { tc-getPROG CC gcc "$@"; } |
|
|
38 | # Returns the name of the C preprocessor |
|
|
39 | tc-getCPP() { tc-getPROG CPP cpp "$@"; } |
| 39 | # Returns the name of the C++ compiler |
40 | # Returns the name of the C++ compiler |
| 40 | tc-getCXX() { tc-getPROG CXX g++; } |
41 | tc-getCXX() { tc-getPROG CXX g++ "$@"; } |
| 41 | # Returns the name of the linker |
42 | # Returns the name of the linker |
| 42 | tc-getLD() { tc-getPROG LD ld; } |
43 | tc-getLD() { tc-getPROG LD ld "$@"; } |
|
|
44 | # Returns the name of the strip prog |
|
|
45 | tc-getSTRIP() { tc-getPROG STRIP strip "$@"; } |
| 43 | # Returns the name of the symbol/object thingy |
46 | # Returns the name of the symbol/object thingy |
| 44 | tc-getNM() { tc-getPROG NM nm; } |
47 | tc-getNM() { tc-getPROG NM nm "$@"; } |
| 45 | # Returns the name of the archiver indexer |
48 | # Returns the name of the archiver indexer |
| 46 | tc-getRANLIB() { tc-getPROG RANLIB ranlib; } |
49 | tc-getRANLIB() { tc-getPROG RANLIB ranlib "$@"; } |
|
|
50 | # Returns the name of the fortran 77 compiler |
|
|
51 | tc-getF77() { tc-getPROG F77 f77 "$@"; } |
|
|
52 | # Returns the name of the fortran 90 compiler |
|
|
53 | tc-getF90() { tc-getPROG F90 gfortran "$@"; } |
| 47 | # Returns the name of the fortran compiler |
54 | # Returns the name of the fortran compiler |
| 48 | tc-getF77() { tc-getPROG F77 f77; } |
55 | tc-getFORTRAN() { tc-getPROG FORTRAN gfortran "$@"; } |
| 49 | # Returns the name of the java compiler |
56 | # Returns the name of the java compiler |
| 50 | tc-getGCJ() { tc-getPROG GCJ gcj; } |
57 | tc-getGCJ() { tc-getPROG GCJ gcj "$@"; } |
| 51 | |
58 | |
| 52 | # Returns the name of the C compiler for build |
59 | # Returns the name of the C compiler for build |
| 53 | tc-getBUILD_CC() { |
60 | tc-getBUILD_CC() { |
|
|
61 | local v |
|
|
62 | for v in CC_FOR_BUILD BUILD_CC HOSTCC ; do |
| 54 | if [[ -n ${CC_FOR_BUILD} ]] ; then |
63 | if [[ -n ${!v} ]] ; then |
| 55 | export BUILD_CC=${CC_FOR_BUILD} |
64 | export BUILD_CC=${!v} |
| 56 | echo "${CC_FOR_BUILD}" |
65 | echo "${!v}" |
| 57 | return 0 |
66 | return 0 |
| 58 | fi |
67 | fi |
|
|
68 | done |
| 59 | |
69 | |
| 60 | local search= |
70 | local search= |
| 61 | if [[ -n ${CBUILD} ]] ; then |
71 | if [[ -n ${CBUILD} ]] ; then |
| 62 | search=$(type -p ${CBUILD}-gcc) |
72 | search=$(type -p ${CBUILD}-gcc) |
| 63 | search=${search##*/} |
73 | search=${search##*/} |
| 64 | else |
|
|
| 65 | search=gcc |
|
|
| 66 | fi |
74 | fi |
|
|
75 | search=${search:-gcc} |
| 67 | |
76 | |
| 68 | export BUILD_CC=${search} |
77 | export BUILD_CC=${search} |
| 69 | echo "${search}" |
78 | echo "${search}" |
| 70 | } |
79 | } |
| 71 | |
80 | |
| 72 | # Quick way to export a bunch of vars at once |
81 | # Quick way to export a bunch of vars at once |
| 73 | tc-export() { |
82 | tc-export() { |
| 74 | local var |
83 | local var |
| 75 | for var in "$@" ; do |
84 | for var in "$@" ; do |
| 76 | eval tc-get${var} |
85 | eval tc-get${var} > /dev/null |
| 77 | done |
86 | done |
| 78 | } |
87 | } |
| 79 | |
88 | |
| 80 | # A simple way to see if we're using a cross-compiler ... |
89 | # A simple way to see if we're using a cross-compiler ... |
| 81 | tc-is-cross-compiler() { |
90 | tc-is-cross-compiler() { |
| 82 | if [[ -n ${CBUILD} ]] ; then |
|
|
| 83 | return $([[ ${CBUILD} != ${CHOST} ]]) |
91 | return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]]) |
| 84 | fi |
|
|
| 85 | return 1 |
|
|
| 86 | } |
92 | } |
| 87 | |
93 | |
| 88 | |
94 | |
| 89 | # Parse information from CBUILD/CHOST/CTARGET rather than |
95 | # Parse information from CBUILD/CHOST/CTARGET rather than |
| 90 | # use external variables from the profile. |
96 | # use external variables from the profile. |
| 91 | tc-ninja_magic_to_arch() { |
97 | tc-ninja_magic_to_arch() { |
| 92 | ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; } |
98 | ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; } |
| 93 | |
99 | |
| 94 | local type=$1 |
100 | local type=$1 |
| 95 | local host=$2 |
101 | local host=$2 |
| 96 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
102 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
| 97 | |
103 | |
| 98 | case ${host} in |
104 | case ${host} in |
| 99 | alpha*) echo alpha;; |
105 | alpha*) echo alpha;; |
| 100 | x86_64*) ninj x86_64 amd64;; |
|
|
| 101 | arm*) echo arm;; |
106 | arm*) echo arm;; |
|
|
107 | bfin*) ninj blackfin bfin;; |
|
|
108 | cris*) echo cris;; |
| 102 | hppa*) ninj parisc hppa;; |
109 | hppa*) ninj parisc hppa;; |
|
|
110 | i?86*) ninj i386 x86;; |
| 103 | ia64*) echo ia64;; |
111 | ia64*) echo ia64;; |
| 104 | m68*) echo m68k;; |
112 | m68*) echo m68k;; |
| 105 | mips*) echo mips;; |
113 | mips*) echo mips;; |
| 106 | powerpc64*) echo ppc64;; |
114 | nios2*) echo nios2;; |
| 107 | powerpc*) echo ppc;; |
115 | nios*) echo nios;; |
| 108 | sparc64*) ninj sparc64 sparc;; |
116 | powerpc*) |
| 109 | sparc*) echo sparc;; |
117 | # Starting with linux-2.6.15, the 'ppc' and 'ppc64' trees |
|
|
118 | # have been unified into simply 'powerpc', but until 2.6.16, |
|
|
119 | # ppc32 is still using ARCH="ppc" as default |
|
|
120 | if [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.16) ]] && [[ ${type} == "kern" ]] ; then |
|
|
121 | echo powerpc |
|
|
122 | elif [[ $(KV_to_int ${KV}) -eq $(KV_to_int 2.6.15) ]] && [[ ${type} == "kern" ]] ; then |
|
|
123 | if [[ ${host} == powerpc64* ]] || [[ ${PROFILE_ARCH} == "ppc64" ]] ; then |
|
|
124 | echo powerpc |
|
|
125 | else |
|
|
126 | echo ppc |
|
|
127 | fi |
|
|
128 | elif [[ ${host} == powerpc64* ]] ; then |
|
|
129 | echo ppc64 |
|
|
130 | elif [[ ${PROFILE_ARCH} == "ppc64" ]] ; then |
|
|
131 | ninj ppc64 ppc |
|
|
132 | else |
|
|
133 | echo ppc |
|
|
134 | fi |
|
|
135 | ;; |
| 110 | s390*) echo s390;; |
136 | s390*) echo s390;; |
| 111 | sh64*) ninj sh64 sh;; |
137 | sh64*) ninj sh64 sh;; |
| 112 | sh*) echo sh;; |
138 | sh*) echo sh;; |
| 113 | i?86*) ninj i386 x86;; |
139 | sparc64*) ninj sparc64 sparc;; |
| 114 | *) echo wtf;; |
140 | sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \ |
|
|
141 | && ninj sparc64 sparc \ |
|
|
142 | || echo sparc |
|
|
143 | ;; |
|
|
144 | vax*) echo vax;; |
|
|
145 | x86_64*) ninj x86_64 amd64;; |
|
|
146 | *) echo ${ARCH};; |
| 115 | esac |
147 | esac |
| 116 | } |
148 | } |
| 117 | tc-arch-kernel() { |
149 | tc-arch-kernel() { |
| 118 | tc-ninja_magic_to_arch kern $@ |
150 | tc-ninja_magic_to_arch kern $@ |
| 119 | } |
151 | } |
| 120 | tc-arch() { |
152 | tc-arch() { |
| 121 | tc-ninja_magic_to_arch portage $@ |
153 | tc-ninja_magic_to_arch portage $@ |
| 122 | } |
154 | } |
| 123 | tc-endian() { |
|
|
| 124 | local host=$1 |
|
|
| 125 | [[ -z ${host} ]] && host=${CHOST} |
|
|
| 126 | |
|
|
| 127 | case ${host} in |
|
|
| 128 | alpha*) echo big;; |
|
|
| 129 | x86_64*) echo little;; |
|
|
| 130 | arm*eb-*) echo big;; |
|
|
| 131 | arm*) echo little;; |
|
|
| 132 | hppa*) echo big;; |
|
|
| 133 | ia64*) echo little;; |
|
|
| 134 | m68*) echo big;; |
|
|
| 135 | mips*el-*) echo little;; |
|
|
| 136 | mips*) echo big;; |
|
|
| 137 | powerpc*) echo big;; |
|
|
| 138 | sparc*) echo big;; |
|
|
| 139 | s390*) echo big;; |
|
|
| 140 | sh*el-) echo little;; |
|
|
| 141 | sh*) echo big;; |
|
|
| 142 | i?86*) echo little;; |
|
|
| 143 | *) echo wtf;; |
|
|
| 144 | esac |
|
|
| 145 | } |
|
|
| 146 | |
155 | |
| 147 | # Returns the version as by `$CC -dumpversion` |
156 | # Returns the version as by `$CC -dumpversion` |
| 148 | gcc-fullversion() { |
157 | gcc-fullversion() { |
| 149 | echo "$($(tc-getCC) -dumpversion)" |
158 | $(tc-getCC "$@") -dumpversion |
| 150 | } |
159 | } |
| 151 | # Returns the version, but only the <major>.<minor> |
160 | # Returns the version, but only the <major>.<minor> |
| 152 | gcc-version() { |
161 | gcc-version() { |
| 153 | echo "$(gcc-fullversion | cut -f1,2 -d.)" |
162 | gcc-fullversion "$@" | cut -f1,2 -d. |
| 154 | } |
163 | } |
| 155 | # Returns the Major version |
164 | # Returns the Major version |
| 156 | gcc-major-version() { |
165 | gcc-major-version() { |
| 157 | echo "$(gcc-version | cut -f1 -d.)" |
166 | gcc-version "$@" | cut -f1 -d. |
| 158 | } |
167 | } |
| 159 | # Returns the Minor version |
168 | # Returns the Minor version |
| 160 | gcc-minor-version() { |
169 | gcc-minor-version() { |
| 161 | echo "$(gcc-version | cut -f2 -d.)" |
170 | gcc-version "$@" | cut -f2 -d. |
| 162 | } |
171 | } |
| 163 | # Returns the Micro version |
172 | # Returns the Micro version |
| 164 | gcc-micro-version() { |
173 | gcc-micro-version() { |
| 165 | echo "$(gcc-fullversion | cut -f3 -d.)" |
174 | gcc-fullversion "$@" | cut -f3 -d. | cut -f1 -d- |
| 166 | } |
175 | } |
|
|
176 | |
|
|
177 | # Returns requested gcc specs directive |
|
|
178 | # Note; later specs normally overwrite earlier ones; however if a later |
|
|
179 | # spec starts with '+' then it appends. |
|
|
180 | # gcc -dumpspecs is parsed first, followed by files listed by "gcc -v" |
|
|
181 | # as "Reading <file>", in order. |
|
|
182 | gcc-specs-directive() { |
|
|
183 | local cc=$(tc-getCC) |
|
|
184 | local specfiles=$(LC_ALL=C ${cc} -v 2>&1 | awk '$1=="Reading" {print $NF}') |
|
|
185 | ${cc} -dumpspecs 2> /dev/null | cat - ${specfiles} | awk -v directive=$1 \ |
|
|
186 | 'BEGIN { pspec=""; spec=""; outside=1 } |
|
|
187 | $1=="*"directive":" { pspec=spec; spec=""; outside=0; next } |
|
|
188 | outside || NF==0 || ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next } |
|
|
189 | spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next } |
|
|
190 | { spec=spec $0 } |
|
|
191 | END { print spec }' |
|
|
192 | return 0 |
|
|
193 | } |
|
|
194 | |
|
|
195 | # Returns true if gcc sets relro |
|
|
196 | gcc-specs-relro() { |
|
|
197 | local directive |
|
|
198 | directive=$(gcc-specs-directive link_command) |
|
|
199 | return $([[ ${directive/\{!norelro:} != ${directive} ]]) |
|
|
200 | } |
|
|
201 | # Returns true if gcc sets now |
|
|
202 | gcc-specs-now() { |
|
|
203 | local directive |
|
|
204 | directive=$(gcc-specs-directive link_command) |
|
|
205 | return $([[ ${directive/\{!nonow:} != ${directive} ]]) |
|
|
206 | } |
|
|
207 | # Returns true if gcc builds PIEs |
|
|
208 | gcc-specs-pie() { |
|
|
209 | local directive |
|
|
210 | directive=$(gcc-specs-directive cc1) |
|
|
211 | return $([[ ${directive/\{!nopie:} != ${directive} ]]) |
|
|
212 | } |
|
|
213 | # Returns true if gcc builds with the stack protector |
|
|
214 | gcc-specs-ssp() { |
|
|
215 | local directive |
|
|
216 | directive=$(gcc-specs-directive cc1) |
|
|
217 | return $([[ ${directive/\{!fno-stack-protector:} != ${directive} ]]) |
|
|
218 | } |
|
|
219 | # Returns true if gcc upgrades fstack-protector to fstack-protector-all |
|
|
220 | gcc-specs-ssp-to-all() { |
|
|
221 | local directive |
|
|
222 | directive=$(gcc-specs-directive cc1) |
|
|
223 | return $([[ ${directive/\{!fno-stack-protector-all:} != ${directive} ]]) |
|
|
224 | } |
|
|
225 | |
|
|
226 | |
|
|
227 | # This function generate linker scripts in /usr/lib for dynamic |
|
|
228 | # libs in /lib. This is to fix linking problems when you have |
|
|
229 | # the .so in /lib, and the .a in /usr/lib. What happens is that |
|
|
230 | # in some cases when linking dynamic, the .a in /usr/lib is used |
|
|
231 | # instead of the .so in /lib due to gcc/libtool tweaking ld's |
|
|
232 | # library search path. This cause many builds to fail. |
|
|
233 | # See bug #4411 for more info. |
|
|
234 | # |
|
|
235 | # To use, simply call: |
|
|
236 | # |
|
|
237 | # gen_usr_ldscript libfoo.so |
|
|
238 | # |
|
|
239 | # Note that you should in general use the unversioned name of |
|
|
240 | # the library, as ldconfig should usually update it correctly |
|
|
241 | # to point to the latest version of the library present. |
|
|
242 | _tc_gen_usr_ldscript() { |
|
|
243 | local lib libdir=$(get_libdir) output_format="" |
|
|
244 | # Just make sure it exists |
|
|
245 | dodir /usr/${libdir} |
|
|
246 | |
|
|
247 | # OUTPUT_FORMAT gives hints to the linker as to what binary format |
|
|
248 | # is referenced ... makes multilib saner |
|
|
249 | output_format=$($(tc-getCC) ${CFLAGS} ${LDFLAGS} -Wl,--verbose 2>&1 | sed -n 's/^OUTPUT_FORMAT("\([^"]*\)",.*/\1/p') |
|
|
250 | [[ -n ${output_format} ]] && output_format="OUTPUT_FORMAT ( ${output_format} )" |
|
|
251 | |
|
|
252 | for lib in "$@" ; do |
|
|
253 | if [[ ${USERLAND} == "Darwin" ]] ; then |
|
|
254 | ewarn "Not creating fake dynamic library for $lib on Darwin;" |
|
|
255 | ewarn "making a symlink instead." |
|
|
256 | dosym "/${libdir}/${lib}" "/usr/${libdir}/${lib}" |
|
|
257 | else |
|
|
258 | cat > "${D}/usr/${libdir}/${lib}" <<-END_LDSCRIPT |
|
|
259 | /* GNU ld script |
|
|
260 | Since Gentoo has critical dynamic libraries |
|
|
261 | in /lib, and the static versions in /usr/lib, |
|
|
262 | we need to have a "fake" dynamic lib in /usr/lib, |
|
|
263 | otherwise we run into linking problems. |
|
|
264 | |
|
|
265 | See bug http://bugs.gentoo.org/4411 for more info. |
|
|
266 | */ |
|
|
267 | ${output_format} |
|
|
268 | GROUP ( /${libdir}/${lib} ) |
|
|
269 | END_LDSCRIPT |
|
|
270 | fi |
|
|
271 | fperms a+x "/usr/${libdir}/${lib}" || die "could not change perms on ${lib}" |
|
|
272 | done |
|
|
273 | } |
|
|
274 | gen_usr_ldscript() { _tc_gen_usr_ldscript "$@" ; } |