| 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.1.1.1 2005/11/30 09:59:25 chriswhite Exp $ |
3 | # $Header: /var/cvsroot/gentoo-x86/eclass/toolchain-funcs.eclass,v 1.31 2005/03/02 19:07:07 vapier Exp $ |
| 4 | # |
4 | # |
| 5 | # Author: Toolchain Ninjas <toolchain@gentoo.org> |
5 | # Author: Toolchain Ninjas <ninjas@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 | ECLASS=toolchain-funcs |
|
|
11 | INHERITED="$INHERITED $ECLASS" |
| 11 | |
12 | |
| 12 | DESCRIPTION="Based on the ${ECLASS} eclass" |
13 | DESCRIPTION="Based on the ${ECLASS} eclass" |
| 13 | |
14 | |
| 14 | tc-getPROG() { |
15 | tc-getPROG() { |
| 15 | local var=$1 |
16 | local var=$1 |
| … | |
… | |
| 18 | if [[ -n ${!var} ]] ; then |
19 | if [[ -n ${!var} ]] ; then |
| 19 | echo "${!var}" |
20 | echo "${!var}" |
| 20 | return 0 |
21 | return 0 |
| 21 | fi |
22 | fi |
| 22 | |
23 | |
| 23 | local search= |
24 | if [[ -n ${CHOST} ]] ; then |
| 24 | [[ -n $3 ]] && search=$(type -p "$3-${prog}") |
25 | local search=$(type -p "${CHOST}-${prog}") |
| 25 | [[ -z ${search} && -n ${CHOST} ]] && search=$(type -p "${CHOST}-${prog}") |
|
|
| 26 | [[ -n ${search} ]] && prog=${search##*/} |
26 | [[ -n ${search} ]] && prog=${search##*/} |
|
|
27 | fi |
| 27 | |
28 | |
| 28 | export ${var}=${prog} |
29 | export ${var}=${prog} |
| 29 | echo "${!var}" |
30 | echo "${!var}" |
| 30 | } |
31 | } |
| 31 | |
32 | |
| 32 | # Returns the name of the archiver |
33 | # Returns the name of the archiver |
| 33 | tc-getAR() { tc-getPROG AR ar "$@"; } |
34 | tc-getAR() { tc-getPROG AR ar; } |
| 34 | # Returns the name of the assembler |
35 | # Returns the name of the assembler |
| 35 | tc-getAS() { tc-getPROG AS as "$@"; } |
36 | tc-getAS() { tc-getPROG AS as; } |
| 36 | # Returns the name of the C compiler |
37 | # Returns the name of the C compiler |
| 37 | tc-getCC() { tc-getPROG CC gcc "$@"; } |
38 | tc-getCC() { tc-getPROG CC gcc; } |
| 38 | # Returns the name of the C++ compiler |
39 | # Returns the name of the C++ compiler |
| 39 | tc-getCXX() { tc-getPROG CXX g++ "$@"; } |
40 | tc-getCXX() { tc-getPROG CXX g++; } |
| 40 | # Returns the name of the linker |
41 | # Returns the name of the linker |
| 41 | tc-getLD() { tc-getPROG LD ld "$@"; } |
42 | tc-getLD() { tc-getPROG LD ld; } |
| 42 | # Returns the name of the symbol/object thingy |
43 | # Returns the name of the symbol/object thingy |
| 43 | tc-getNM() { tc-getPROG NM nm "$@"; } |
44 | tc-getNM() { tc-getPROG NM nm; } |
| 44 | # Returns the name of the archiver indexer |
45 | # Returns the name of the archiver indexer |
| 45 | tc-getRANLIB() { tc-getPROG RANLIB ranlib "$@"; } |
46 | tc-getRANLIB() { tc-getPROG RANLIB ranlib; } |
| 46 | # Returns the name of the fortran compiler |
47 | # Returns the name of the fortran compiler |
| 47 | tc-getF77() { tc-getPROG F77 f77 "$@"; } |
48 | tc-getF77() { tc-getPROG F77 f77; } |
| 48 | # Returns the name of the java compiler |
49 | # Returns the name of the java compiler |
| 49 | tc-getGCJ() { tc-getPROG GCJ gcj "$@"; } |
50 | tc-getGCJ() { tc-getPROG GCJ gcj; } |
| 50 | |
51 | |
| 51 | # Returns the name of the C compiler for build |
52 | # Returns the name of the C compiler for build |
| 52 | tc-getBUILD_CC() { |
53 | tc-getBUILD_CC() { |
| 53 | local v |
|
|
| 54 | for v in CC_FOR_BUILD BUILD_CC HOSTCC ; do |
|
|
| 55 | if [[ -n ${!v} ]] ; then |
54 | if [[ -n ${CC_FOR_BUILD} ]] ; then |
| 56 | export BUILD_CC=${!v} |
55 | export BUILD_CC=${CC_FOR_BUILD} |
| 57 | echo "${!v}" |
56 | echo "${CC_FOR_BUILD}" |
| 58 | return 0 |
57 | return 0 |
| 59 | fi |
58 | fi |
| 60 | done |
|
|
| 61 | |
59 | |
| 62 | local search= |
60 | local search= |
| 63 | if [[ -n ${CBUILD} ]] ; then |
61 | if [[ -n ${CBUILD} ]] ; then |
| 64 | search=$(type -p ${CBUILD}-gcc) |
62 | search=$(type -p ${CBUILD}-gcc) |
| 65 | search=${search##*/} |
63 | search=${search##*/} |
|
|
64 | else |
|
|
65 | search=gcc |
| 66 | fi |
66 | fi |
| 67 | search=${search:-gcc} |
|
|
| 68 | |
67 | |
| 69 | export BUILD_CC=${search} |
68 | export BUILD_CC=${search} |
| 70 | echo "${search}" |
69 | echo "${search}" |
| 71 | } |
70 | } |
| 72 | |
71 | |
| 73 | # Quick way to export a bunch of vars at once |
72 | # Quick way to export a bunch of vars at once |
| 74 | tc-export() { |
73 | tc-export() { |
| 75 | local var |
74 | local var |
| 76 | for var in "$@" ; do |
75 | for var in "$@" ; do |
| 77 | eval tc-get${var} > /dev/null |
76 | eval tc-get${var} |
| 78 | done |
77 | done |
| 79 | } |
78 | } |
| 80 | |
79 | |
| 81 | # A simple way to see if we're using a cross-compiler ... |
80 | # A simple way to see if we're using a cross-compiler ... |
| 82 | tc-is-cross-compiler() { |
81 | tc-is-cross-compiler() { |
|
|
82 | if [[ -n ${CBUILD} ]] ; then |
| 83 | return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]]) |
83 | return $([[ ${CBUILD} != ${CHOST} ]]) |
|
|
84 | fi |
|
|
85 | return 1 |
| 84 | } |
86 | } |
| 85 | |
87 | |
| 86 | |
88 | |
| 87 | # Parse information from CBUILD/CHOST/CTARGET rather than |
89 | # Parse information from CBUILD/CHOST/CTARGET rather than |
| 88 | # use external variables from the profile. |
90 | # use external variables from the profile. |
| 89 | tc-ninja_magic_to_arch() { |
91 | tc-ninja_magic_to_arch() { |
| 90 | ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; } |
92 | ninj() { [[ ${type} == "kern" ]] && echo $1 || echo $2 ; } |
| 91 | |
93 | |
| 92 | local type=$1 |
94 | local type=$1 |
| 93 | local host=$2 |
95 | local host=$2 |
| 94 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
96 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
| 95 | |
97 | |
| 96 | case ${host} in |
98 | case ${host} in |
| 97 | alpha*) echo alpha;; |
99 | alpha*) echo alpha;; |
|
|
100 | x86_64*) ninj x86_64 amd64;; |
| 98 | arm*) echo arm;; |
101 | arm*) echo arm;; |
| 99 | cris*) echo cris;; |
|
|
| 100 | hppa*) ninj parisc hppa;; |
102 | hppa*) ninj parisc hppa;; |
| 101 | i?86*) ninj i386 x86;; |
|
|
| 102 | ia64*) echo ia64;; |
103 | ia64*) echo ia64;; |
| 103 | m68*) echo m68k;; |
104 | m68*) echo m68k;; |
| 104 | mips*) echo mips;; |
105 | mips*) echo mips;; |
| 105 | powerpc64*) echo ppc64;; |
106 | powerpc64*) echo ppc64;; |
| 106 | powerpc*) [[ ${PROFILE_ARCH} == "ppc64" ]] \ |
107 | powerpc*) echo ppc;; |
| 107 | && ninj ppc64 ppc \ |
|
|
| 108 | || echo ppc |
|
|
| 109 | ;; |
|
|
| 110 | s390*) echo s390;; |
|
|
| 111 | sh64*) ninj sh64 sh;; |
|
|
| 112 | sh*) echo sh;; |
|
|
| 113 | sparc64*) ninj sparc64 sparc;; |
108 | sparc64*) ninj sparc64 sparc;; |
| 114 | sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \ |
109 | sparc*) [[ ${PROFILE_ARCH} == "sparc64" ]] \ |
| 115 | && ninj sparc64 sparc \ |
110 | && ninj sparc64 sparc \ |
| 116 | || echo sparc |
111 | || echo sparc |
| 117 | ;; |
112 | ;; |
| 118 | vax*) echo vax;; |
113 | s390*) echo s390;; |
| 119 | x86_64*) ninj x86_64 amd64;; |
114 | sh64*) ninj sh64 sh;; |
|
|
115 | sh*) echo sh;; |
|
|
116 | i?86*) ninj i386 x86;; |
| 120 | *) echo ${ARCH};; |
117 | *) echo ${ARCH};; |
| 121 | esac |
118 | esac |
| 122 | } |
119 | } |
| 123 | tc-arch-kernel() { |
120 | tc-arch-kernel() { |
| 124 | tc-ninja_magic_to_arch kern $@ |
121 | tc-ninja_magic_to_arch kern $@ |
| … | |
… | |
| 131 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
128 | [[ -z ${host} ]] && host=${CTARGET:-${CHOST}} |
| 132 | host=${host%%-*} |
129 | host=${host%%-*} |
| 133 | |
130 | |
| 134 | case ${host} in |
131 | case ${host} in |
| 135 | alpha*) echo big;; |
132 | alpha*) echo big;; |
|
|
133 | x86_64*) echo little;; |
| 136 | arm*b*) echo big;; |
134 | arm*b*) echo big;; |
| 137 | arm*) echo little;; |
135 | arm*) echo little;; |
| 138 | cris*) echo little;; |
|
|
| 139 | hppa*) echo big;; |
136 | hppa*) echo big;; |
| 140 | i?86*) echo little;; |
|
|
| 141 | ia64*) echo little;; |
137 | ia64*) echo little;; |
| 142 | m68*) echo big;; |
138 | m68*) echo big;; |
| 143 | mips*l*) echo little;; |
139 | mips*l*) echo little;; |
| 144 | mips*) echo big;; |
140 | mips*) echo big;; |
| 145 | powerpc*) echo big;; |
141 | powerpc*) echo big;; |
|
|
142 | sparc*) echo big;; |
| 146 | s390*) echo big;; |
143 | s390*) echo big;; |
| 147 | sh*b*) echo big;; |
144 | sh*b*) echo big;; |
| 148 | sh*) echo little;; |
145 | sh*) echo little;; |
| 149 | sparc*) echo big;; |
|
|
| 150 | x86_64*) echo little;; |
146 | i?86*) echo little;; |
| 151 | *) echo wtf;; |
147 | *) echo wtf;; |
| 152 | esac |
148 | esac |
| 153 | } |
149 | } |
| 154 | |
150 | |
| 155 | # Returns the version as by `$CC -dumpversion` |
151 | # Returns the version as by `$CC -dumpversion` |
| … | |
… | |
| 170 | } |
166 | } |
| 171 | # Returns the Micro version |
167 | # Returns the Micro version |
| 172 | gcc-micro-version() { |
168 | gcc-micro-version() { |
| 173 | echo "$(gcc-fullversion | cut -f3 -d. | cut -f1 -d-)" |
169 | echo "$(gcc-fullversion | cut -f3 -d. | cut -f1 -d-)" |
| 174 | } |
170 | } |
| 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 | } |
|
|