| 1 | # Copyright 1999-2005 Gentoo Foundation |
1 | # Copyright 1999-2005 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.36 2005/05/02 22:42:59 vapier Exp $ |
3 | # $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.48 2005/11/03 10:10:48 eradicator 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 | inherit multilib |
10 | inherit multilib |
| 11 | |
|
|
| 12 | ECLASS=toolchain-funcs |
|
|
| 13 | INHERITED="$INHERITED $ECLASS" |
|
|
| 14 | |
11 | |
| 15 | DESCRIPTION="Based on the ${ECLASS} eclass" |
12 | DESCRIPTION="Based on the ${ECLASS} eclass" |
| 16 | |
13 | |
| 17 | tc-getPROG() { |
14 | tc-getPROG() { |
| 18 | local var=$1 |
15 | local var=$1 |
| … | |
… | |
| 23 | return 0 |
20 | return 0 |
| 24 | fi |
21 | fi |
| 25 | |
22 | |
| 26 | local search= |
23 | local search= |
| 27 | [[ -n $3 ]] && search=$(type -p "$3-${prog}") |
24 | [[ -n $3 ]] && search=$(type -p "$3-${prog}") |
| 28 | [[ -z ${search} && -n $(get_abi_CHOST) ]] && search=$(type -p "$(get_abi_CHOST)-${prog}") |
|
|
| 29 | [[ -z ${search} && -n ${CHOST} ]] && search=$(type -p "${CHOST}-${prog}") |
25 | [[ -z ${search} && -n ${CHOST} ]] && search=$(type -p "${CHOST}-${prog}") |
| 30 | [[ -n ${search} ]] && prog=${search##*/} |
26 | [[ -n ${search} ]] && prog=${search##*/} |
| 31 | |
27 | |
| 32 | export ${var}=${prog} |
28 | export ${var}=${prog} |
| 33 | echo "${!var}" |
29 | echo "${!var}" |
| … | |
… | |
| 52 | # Returns the name of the java compiler |
48 | # Returns the name of the java compiler |
| 53 | tc-getGCJ() { tc-getPROG GCJ gcj "$@"; } |
49 | tc-getGCJ() { tc-getPROG GCJ gcj "$@"; } |
| 54 | |
50 | |
| 55 | # Returns the name of the C compiler for build |
51 | # Returns the name of the C compiler for build |
| 56 | tc-getBUILD_CC() { |
52 | tc-getBUILD_CC() { |
|
|
53 | local v |
|
|
54 | for v in CC_FOR_BUILD BUILD_CC HOSTCC ; do |
| 57 | if [[ -n ${CC_FOR_BUILD} ]] ; then |
55 | if [[ -n ${!v} ]] ; then |
| 58 | export BUILD_CC=${CC_FOR_BUILD} |
56 | export BUILD_CC=${!v} |
| 59 | echo "${CC_FOR_BUILD}" |
57 | echo "${!v}" |
| 60 | return 0 |
58 | return 0 |
| 61 | fi |
59 | fi |
|
|
60 | done |
| 62 | |
61 | |
| 63 | local search= |
62 | local search= |
| 64 | if [[ -n ${CBUILD} ]] ; then |
63 | if [[ -n ${CBUILD} ]] ; then |
| 65 | search=$(type -p ${CBUILD}-gcc) |
64 | search=$(type -p ${CBUILD}-gcc) |
| 66 | search=${search##*/} |
65 | search=${search##*/} |
| 67 | else |
|
|
| 68 | search=gcc |
|
|
| 69 | fi |
66 | fi |
|
|
67 | search=${search:-gcc} |
| 70 | |
68 | |
| 71 | export BUILD_CC=${search} |
69 | export BUILD_CC=${search} |
| 72 | echo "${search}" |
70 | echo "${search}" |
| 73 | } |
71 | } |
| 74 | |
72 | |
| … | |
… | |
| 80 | done |
78 | done |
| 81 | } |
79 | } |
| 82 | |
80 | |
| 83 | # A simple way to see if we're using a cross-compiler ... |
81 | # A simple way to see if we're using a cross-compiler ... |
| 84 | tc-is-cross-compiler() { |
82 | tc-is-cross-compiler() { |
| 85 | if [[ -n ${CBUILD} ]] ; then |
|
|
| 86 | return $([[ ${CBUILD} != ${CHOST} ]]) |
83 | return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]]) |
| 87 | fi |
|
|
| 88 | return 1 |
|
|
| 89 | } |
84 | } |
| 90 | |
85 | |
| 91 | |
86 | |
| 92 | # Parse information from CBUILD/CHOST/CTARGET rather than |
87 | # Parse information from CBUILD/CHOST/CTARGET rather than |
| 93 | # use external variables from the profile. |
88 | # use external variables from the profile. |
| 94 | tc-ninja_magic_to_arch() { |
89 | tc-ninja_magic_to_arch() { |
| 95 | ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; } |
90 | ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; } |
| 96 | |
91 | |
| 97 | local type=$1 |
92 | local type=$1 |
| 98 | local host=$2 |
93 | local host=$2 |
| 99 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
94 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
| 100 | |
95 | |
| 101 | case ${host} in |
96 | case ${host} in |
| 102 | alpha*) echo alpha;; |
97 | alpha*) echo alpha;; |
| 103 | x86_64*) ninj x86_64 amd64;; |
|
|
| 104 | arm*) echo arm;; |
98 | arm*) echo arm;; |
|
|
99 | cris*) echo cris;; |
| 105 | hppa*) ninj parisc hppa;; |
100 | hppa*) ninj parisc hppa;; |
|
|
101 | i?86*) ninj i386 x86;; |
| 106 | ia64*) echo ia64;; |
102 | ia64*) echo ia64;; |
| 107 | m68*) echo m68k;; |
103 | m68*) echo m68k;; |
| 108 | mips*) echo mips;; |
104 | mips*) echo mips;; |
| 109 | powerpc64*) echo ppc64;; |
105 | powerpc64*) echo ppc64;; |
| 110 | powerpc*) echo ppc;; |
106 | powerpc*) [[ ${PROFILE_ARCH} == "ppc64" ]] \ |
|
|
107 | && ninj ppc64 ppc \ |
|
|
108 | || echo ppc |
|
|
109 | ;; |
|
|
110 | s390*) echo s390;; |
|
|
111 | sh64*) ninj sh64 sh;; |
|
|
112 | sh*) echo sh;; |
| 111 | sparc64*) ninj sparc64 sparc;; |
113 | sparc64*) ninj sparc64 sparc;; |
| 112 | sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \ |
114 | sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \ |
| 113 | && ninj sparc64 sparc \ |
115 | && ninj sparc64 sparc \ |
| 114 | || echo sparc |
116 | || echo sparc |
| 115 | ;; |
117 | ;; |
| 116 | s390*) echo s390;; |
118 | vax*) echo vax;; |
| 117 | sh64*) ninj sh64 sh;; |
119 | x86_64*) ninj x86_64 amd64;; |
| 118 | sh*) echo sh;; |
|
|
| 119 | i?86*) ninj i386 x86;; |
|
|
| 120 | *) echo ${ARCH};; |
120 | *) echo ${ARCH};; |
| 121 | esac |
121 | esac |
| 122 | } |
122 | } |
| 123 | tc-arch-kernel() { |
123 | tc-arch-kernel() { |
| 124 | tc-ninja_magic_to_arch kern $@ |
124 | tc-ninja_magic_to_arch kern $@ |
| … | |
… | |
| 131 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
131 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
| 132 | host=${host%%-*} |
132 | host=${host%%-*} |
| 133 | |
133 | |
| 134 | case ${host} in |
134 | case ${host} in |
| 135 | alpha*) echo big;; |
135 | alpha*) echo big;; |
| 136 | x86_64*) echo little;; |
|
|
| 137 | arm*b*) echo big;; |
136 | arm*b*) echo big;; |
| 138 | arm*) echo little;; |
137 | arm*) echo little;; |
|
|
138 | cris*) echo little;; |
| 139 | hppa*) echo big;; |
139 | hppa*) echo big;; |
|
|
140 | i?86*) echo little;; |
| 140 | ia64*) echo little;; |
141 | ia64*) echo little;; |
| 141 | m68*) echo big;; |
142 | m68*) echo big;; |
| 142 | mips*l*) echo little;; |
143 | mips*l*) echo little;; |
| 143 | mips*) echo big;; |
144 | mips*) echo big;; |
| 144 | powerpc*) echo big;; |
145 | powerpc*) echo big;; |
| 145 | sparc*) echo big;; |
|
|
| 146 | s390*) echo big;; |
146 | s390*) echo big;; |
| 147 | sh*b*) echo big;; |
147 | sh*b*) echo big;; |
| 148 | sh*) echo little;; |
148 | sh*) echo little;; |
|
|
149 | sparc*) echo big;; |
| 149 | i?86*) echo little;; |
150 | x86_64*) echo little;; |
| 150 | *) echo wtf;; |
151 | *) echo wtf;; |
| 151 | esac |
152 | esac |
| 152 | } |
153 | } |
| 153 | |
154 | |
| 154 | # Returns the version as by `$CC -dumpversion` |
155 | # Returns the version as by `$CC -dumpversion` |
| … | |
… | |
| 169 | } |
170 | } |
| 170 | # Returns the Micro version |
171 | # Returns the Micro version |
| 171 | gcc-micro-version() { |
172 | gcc-micro-version() { |
| 172 | echo "$(gcc-fullversion | cut -f3 -d. | cut -f1 -d-)" |
173 | echo "$(gcc-fullversion | cut -f3 -d. | cut -f1 -d-)" |
| 173 | } |
174 | } |
|
|
175 | |
|
|
176 | # Returns requested gcc specs directive |
|
|
177 | # Note; later specs normally overwrite earlier ones; however if a later |
|
|
178 | # spec starts with '+' then it appends. |
|
|
179 | # gcc -dumpspecs is parsed first, followed by files listed by "gcc -v" |
|
|
180 | # as "Reading <file>", in order. |
|
|
181 | gcc-specs-directive() { |
|
|
182 | local specfiles=$($(tc-getCC) -v 2>&1 | awk '$1=="Reading" {print $NF}') |
|
|
183 | $(tc-getCC) -dumpspecs 2> /dev/null | cat - ${specfiles} | awk -v directive=$1 \ |
|
|
184 | 'BEGIN { pspec=""; spec=""; outside=1 } |
|
|
185 | $1=="*"directive":" { pspec=spec; spec=""; outside=0; next } |
|
|
186 | outside || NF==0 || ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next } |
|
|
187 | spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next } |
|
|
188 | { spec=spec $0 } |
|
|
189 | END { print spec }' |
|
|
190 | return 0 |
|
|
191 | } |
|
|
192 | |
|
|
193 | # Returns true if gcc sets relro |
|
|
194 | gcc-specs-relro() { |
|
|
195 | local directive |
|
|
196 | directive=$(gcc-specs-directive link_command) |
|
|
197 | return $([[ ${directive/\{!norelro:} != ${directive} ]]) |
|
|
198 | } |
|
|
199 | # Returns true if gcc sets now |
|
|
200 | gcc-specs-now() { |
|
|
201 | local directive |
|
|
202 | directive=$(gcc-specs-directive link_command) |
|
|
203 | return $([[ ${directive/\{!nonow:} != ${directive} ]]) |
|
|
204 | } |
|
|
205 | # Returns true if gcc builds PIEs |
|
|
206 | gcc-specs-pie() { |
|
|
207 | local directive |
|
|
208 | directive=$(gcc-specs-directive cc1) |
|
|
209 | return $([[ ${directive/\{!nopie:} != ${directive} ]]) |
|
|
210 | } |
|
|
211 | # Returns true if gcc builds with the stack protector |
|
|
212 | gcc-specs-ssp() { |
|
|
213 | local directive |
|
|
214 | directive=$(gcc-specs-directive cc1) |
|
|
215 | return $([[ ${directive/\{!fno-stack-protector:} != ${directive} ]]) |
|
|
216 | } |
|
|
217 | # Returns true if gcc upgrades fstack-protector to fstack-protector-all |
|
|
218 | gcc-specs-ssp-to-all() { |
|
|
219 | local directive |
|
|
220 | directive=$(gcc-specs-directive cc1) |
|
|
221 | return $([[ ${directive/\{!fno-stack-protector-all:} != ${directive} ]]) |
|
|
222 | } |