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