1 |
# Copyright 1999-2006 Gentoo Foundation |
2 |
# Distributed under the terms of the GNU General Public License v2 |
3 |
# $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.54 2006/01/24 20:12:53 josejx Exp $ |
4 |
# |
5 |
# Author: Toolchain Ninjas <toolchain@gentoo.org> |
6 |
# |
7 |
# This eclass contains (or should) functions to get common info |
8 |
# about the toolchain (libc/compiler/binutils/etc...) |
9 |
|
10 |
inherit multilib |
11 |
|
12 |
DESCRIPTION="Based on the ${ECLASS} eclass" |
13 |
|
14 |
tc-getPROG() { |
15 |
local var=$1 |
16 |
local prog=$2 |
17 |
|
18 |
if [[ -n ${!var} ]] ; then |
19 |
echo "${!var}" |
20 |
return 0 |
21 |
fi |
22 |
|
23 |
local search= |
24 |
[[ -n $3 ]] && search=$(type -p "$3-${prog}") |
25 |
[[ -z ${search} && -n ${CHOST} ]] && search=$(type -p "${CHOST}-${prog}") |
26 |
[[ -n ${search} ]] && prog=${search##*/} |
27 |
|
28 |
export ${var}=${prog} |
29 |
echo "${!var}" |
30 |
} |
31 |
|
32 |
# Returns the name of the archiver |
33 |
tc-getAR() { tc-getPROG AR ar "$@"; } |
34 |
# Returns the name of the assembler |
35 |
tc-getAS() { tc-getPROG AS as "$@"; } |
36 |
# Returns the name of the C compiler |
37 |
tc-getCC() { tc-getPROG CC gcc "$@"; } |
38 |
# Returns the name of the C++ compiler |
39 |
tc-getCXX() { tc-getPROG CXX g++ "$@"; } |
40 |
# Returns the name of the linker |
41 |
tc-getLD() { tc-getPROG LD ld "$@"; } |
42 |
# Returns the name of the symbol/object thingy |
43 |
tc-getNM() { tc-getPROG NM nm "$@"; } |
44 |
# Returns the name of the archiver indexer |
45 |
tc-getRANLIB() { tc-getPROG RANLIB ranlib "$@"; } |
46 |
# Returns the name of the fortran compiler |
47 |
tc-getF77() { tc-getPROG F77 f77 "$@"; } |
48 |
# Returns the name of the java compiler |
49 |
tc-getGCJ() { tc-getPROG GCJ gcj "$@"; } |
50 |
|
51 |
# Returns the name of the C compiler for build |
52 |
tc-getBUILD_CC() { |
53 |
local v |
54 |
for v in CC_FOR_BUILD BUILD_CC HOSTCC ; do |
55 |
if [[ -n ${!v} ]] ; then |
56 |
export BUILD_CC=${!v} |
57 |
echo "${!v}" |
58 |
return 0 |
59 |
fi |
60 |
done |
61 |
|
62 |
local search= |
63 |
if [[ -n ${CBUILD} ]] ; then |
64 |
search=$(type -p ${CBUILD}-gcc) |
65 |
search=${search##*/} |
66 |
fi |
67 |
search=${search:-gcc} |
68 |
|
69 |
export BUILD_CC=${search} |
70 |
echo "${search}" |
71 |
} |
72 |
|
73 |
# Quick way to export a bunch of vars at once |
74 |
tc-export() { |
75 |
local var |
76 |
for var in "$@" ; do |
77 |
eval tc-get${var} > /dev/null |
78 |
done |
79 |
} |
80 |
|
81 |
# A simple way to see if we're using a cross-compiler ... |
82 |
tc-is-cross-compiler() { |
83 |
return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]]) |
84 |
} |
85 |
|
86 |
|
87 |
# Parse information from CBUILD/CHOST/CTARGET rather than |
88 |
# use external variables from the profile. |
89 |
tc-ninja_magic_to_arch() { |
90 |
ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; } |
91 |
|
92 |
local type=$1 |
93 |
local host=$2 |
94 |
[[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
95 |
|
96 |
case ${host} in |
97 |
alpha*) echo alpha;; |
98 |
arm*) echo arm;; |
99 |
bfin*) ninj blackfin bfin;; |
100 |
cris*) echo cris;; |
101 |
hppa*) ninj parisc hppa;; |
102 |
i?86*) ninj i386 x86;; |
103 |
ia64*) echo ia64;; |
104 |
m68*) echo m68k;; |
105 |
mips*) echo mips;; |
106 |
nios2*) echo nios2;; |
107 |
nios*) echo nios;; |
108 |
powerpc*) |
109 |
# Starting with linux-2.6.15, the 'ppc' and 'ppc64' trees |
110 |
# have been unified into simply 'powerpc', but until 2.6.16, |
111 |
# ppc32 is still using ARCH="ppc" as default |
112 |
if [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.16) ]] && [[ ${type} == "kern" ]] ; then |
113 |
echo powerpc |
114 |
elif [[ $(KV_to_int ${KV}) -eq $(KV_to_int 2.6.15) ]] && [[ ${type} == "kern" ]] ; then |
115 |
if [[ ${host} == powerpc64* ]] || [[ ${PROFILE_ARCH} == "ppc64" ]] ; then |
116 |
echo powerpc |
117 |
else |
118 |
echo ppc |
119 |
fi |
120 |
elif [[ ${host} == powerpc64* ]] ; then |
121 |
echo ppc64 |
122 |
elif [[ ${PROFILE_ARCH} == "ppc64" ]] ; then |
123 |
ninj ppc64 ppc |
124 |
else |
125 |
echo ppc |
126 |
fi |
127 |
;; |
128 |
s390*) echo s390;; |
129 |
sh64*) ninj sh64 sh;; |
130 |
sh*) echo sh;; |
131 |
sparc64*) ninj sparc64 sparc;; |
132 |
sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \ |
133 |
&& ninj sparc64 sparc \ |
134 |
|| echo sparc |
135 |
;; |
136 |
vax*) echo vax;; |
137 |
x86_64*) ninj x86_64 amd64;; |
138 |
*) echo ${ARCH};; |
139 |
esac |
140 |
} |
141 |
tc-arch-kernel() { |
142 |
tc-ninja_magic_to_arch kern $@ |
143 |
} |
144 |
tc-arch() { |
145 |
tc-ninja_magic_to_arch portage $@ |
146 |
} |
147 |
tc-endian() { |
148 |
local host=$1 |
149 |
[[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
150 |
host=${host%%-*} |
151 |
|
152 |
case ${host} in |
153 |
alpha*) echo big;; |
154 |
arm*b*) echo big;; |
155 |
arm*) echo little;; |
156 |
cris*) echo little;; |
157 |
hppa*) echo big;; |
158 |
i?86*) echo little;; |
159 |
ia64*) echo little;; |
160 |
m68*) echo big;; |
161 |
mips*l*) echo little;; |
162 |
mips*) echo big;; |
163 |
powerpc*) echo big;; |
164 |
s390*) echo big;; |
165 |
sh*b*) echo big;; |
166 |
sh*) echo little;; |
167 |
sparc*) echo big;; |
168 |
x86_64*) echo little;; |
169 |
*) echo wtf;; |
170 |
esac |
171 |
} |
172 |
|
173 |
# Returns the version as by `$CC -dumpversion` |
174 |
gcc-fullversion() { |
175 |
echo "$($(tc-getCC) -dumpversion)" |
176 |
} |
177 |
# Returns the version, but only the <major>.<minor> |
178 |
gcc-version() { |
179 |
echo "$(gcc-fullversion | cut -f1,2 -d.)" |
180 |
} |
181 |
# Returns the Major version |
182 |
gcc-major-version() { |
183 |
echo "$(gcc-version | cut -f1 -d.)" |
184 |
} |
185 |
# Returns the Minor version |
186 |
gcc-minor-version() { |
187 |
echo "$(gcc-version | cut -f2 -d.)" |
188 |
} |
189 |
# Returns the Micro version |
190 |
gcc-micro-version() { |
191 |
echo "$(gcc-fullversion | cut -f3 -d. | cut -f1 -d-)" |
192 |
} |
193 |
|
194 |
# Returns requested gcc specs directive |
195 |
# Note; later specs normally overwrite earlier ones; however if a later |
196 |
# spec starts with '+' then it appends. |
197 |
# gcc -dumpspecs is parsed first, followed by files listed by "gcc -v" |
198 |
# as "Reading <file>", in order. |
199 |
gcc-specs-directive() { |
200 |
local specfiles=$($(tc-getCC) -v 2>&1 | awk '$1=="Reading" {print $NF}') |
201 |
$(tc-getCC) -dumpspecs 2> /dev/null | cat - ${specfiles} | awk -v directive=$1 \ |
202 |
'BEGIN { pspec=""; spec=""; outside=1 } |
203 |
$1=="*"directive":" { pspec=spec; spec=""; outside=0; next } |
204 |
outside || NF==0 || ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next } |
205 |
spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next } |
206 |
{ spec=spec $0 } |
207 |
END { print spec }' |
208 |
return 0 |
209 |
} |
210 |
|
211 |
# Returns true if gcc sets relro |
212 |
gcc-specs-relro() { |
213 |
local directive |
214 |
directive=$(gcc-specs-directive link_command) |
215 |
return $([[ ${directive/\{!norelro:} != ${directive} ]]) |
216 |
} |
217 |
# Returns true if gcc sets now |
218 |
gcc-specs-now() { |
219 |
local directive |
220 |
directive=$(gcc-specs-directive link_command) |
221 |
return $([[ ${directive/\{!nonow:} != ${directive} ]]) |
222 |
} |
223 |
# Returns true if gcc builds PIEs |
224 |
gcc-specs-pie() { |
225 |
local directive |
226 |
directive=$(gcc-specs-directive cc1) |
227 |
return $([[ ${directive/\{!nopie:} != ${directive} ]]) |
228 |
} |
229 |
# Returns true if gcc builds with the stack protector |
230 |
gcc-specs-ssp() { |
231 |
local directive |
232 |
directive=$(gcc-specs-directive cc1) |
233 |
return $([[ ${directive/\{!fno-stack-protector:} != ${directive} ]]) |
234 |
} |
235 |
# Returns true if gcc upgrades fstack-protector to fstack-protector-all |
236 |
gcc-specs-ssp-to-all() { |
237 |
local directive |
238 |
directive=$(gcc-specs-directive cc1) |
239 |
return $([[ ${directive/\{!fno-stack-protector-all:} != ${directive} ]]) |
240 |
} |