| 1 | # Copyright 1999-2005 Gentoo Foundation |
1 | # Copyright 1999-2008 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/flag-o-matic.eclass,v 1.106 2006/02/19 23:18:30 vapier Exp $ |
3 | # $Header: /var/cvsroot/gentoo-x86/eclass/flag-o-matic.eclass,v 1.121 2008/02/16 22:43:04 vapier Exp $ |
| 4 | |
4 | |
|
|
5 | # @ECLASS: flag-o-matic.eclass |
|
|
6 | # @MAINTAINER: |
|
|
7 | # toolchain@gentoo.org |
|
|
8 | # @BLURB: common functions to manipulate and query toolchain flags |
|
|
9 | # @DESCRIPTION: |
|
|
10 | # This eclass contains a suite of functions to help developers sanely |
|
|
11 | # and safely manage toolchain flags in their builds. |
| 5 | |
12 | |
| 6 | # need access to emktemp() |
|
|
| 7 | inherit eutils toolchain-funcs multilib |
13 | inherit eutils toolchain-funcs multilib |
| 8 | |
14 | |
| 9 | # |
|
|
| 10 | #### filter-flags <flags> #### |
|
|
| 11 | # Remove particular flags from C[XX]FLAGS |
|
|
| 12 | # Matches only complete flags |
|
|
| 13 | # |
|
|
| 14 | #### append-flags <flags> #### |
|
|
| 15 | # Add extra flags to your current C[XX]FLAGS |
|
|
| 16 | # |
|
|
| 17 | #### replace-flags <orig.flag> <new.flag> ### |
|
|
| 18 | # Replace a flag by another one |
|
|
| 19 | # |
|
|
| 20 | #### replace-cpu-flags <old.cpus> <new.cpu> ### |
|
|
| 21 | # Replace march/mcpu flags that specify <old.cpus> |
|
|
| 22 | # with flags that specify <new.cpu> |
|
|
| 23 | # |
|
|
| 24 | #### is-flag[q] <flag> #### |
|
|
| 25 | # Returns "true" if flag is set in C[XX]FLAGS |
|
|
| 26 | # Matches only complete a flag |
|
|
| 27 | # q version sets return code but doesn't echo |
|
|
| 28 | # |
|
|
| 29 | #### is-ldflag[q] <flag> #### |
|
|
| 30 | # Returns "true" if flag is set in LDFLAGS |
|
|
| 31 | # Matches only complete a flag |
|
|
| 32 | # q version sets return code but doesn't echo |
|
|
| 33 | # |
|
|
| 34 | #### strip-flags #### |
|
|
| 35 | # Strip C[XX]FLAGS of everything except known |
|
|
| 36 | # good options. |
|
|
| 37 | # |
|
|
| 38 | #### strip-unsupported-flags #### |
|
|
| 39 | # Strip C[XX]FLAGS of any flags not supported by |
|
|
| 40 | # installed version of gcc |
|
|
| 41 | # |
|
|
| 42 | #### get-flag <flag> #### |
|
|
| 43 | # Find and echo the value for a particular flag |
|
|
| 44 | # |
|
|
| 45 | #### replace-sparc64-flags #### |
|
|
| 46 | # Sets mcpu to v8 and uses the original value |
|
|
| 47 | # as mtune if none specified. |
|
|
| 48 | # |
|
|
| 49 | #### filter-mfpmath <math types> #### |
|
|
| 50 | # Remove specified math types from the fpmath specification |
|
|
| 51 | # If the user has -mfpmath=sse,386, running `filter-mfpmath sse` |
|
|
| 52 | # will leave the user with -mfpmath=386 |
|
|
| 53 | # |
|
|
| 54 | #### append-ldflags #### |
|
|
| 55 | # Add extra flags to your current LDFLAGS |
|
|
| 56 | # |
|
|
| 57 | #### filter-ldflags <flags> #### |
|
|
| 58 | # Remove particular flags from LDFLAGS |
|
|
| 59 | # Matches only complete flags |
|
|
| 60 | # |
|
|
| 61 | #### bindnow-flags #### |
|
|
| 62 | # Returns the flags to enable "now" binding in the current selected linker. |
|
|
| 63 | # |
|
|
| 64 | ################ DEPRECATED functions ################ |
15 | ################ DEPRECATED functions ################ |
| 65 | # The following are still present to avoid breaking existing |
16 | # The following are still present to avoid breaking existing |
| 66 | # code more than necessary; however they are deprecated. Please |
17 | # code more than necessary; however they are deprecated. Please |
| 67 | # use gcc-specs-* from toolchain-funcs.eclass instead, if you |
18 | # use gcc-specs-* from toolchain-funcs.eclass instead, if you |
| 68 | # need to know which hardened techs are active in the compiler. |
19 | # need to know which hardened techs are active in the compiler. |
| 69 | # See bug #100974 |
20 | # See bug #100974 |
| 70 | # |
21 | # |
| 71 | #### has_hardened #### |
22 | # has_hardened |
| 72 | # Returns true if the compiler has 'Hardened' in its version string, |
23 | # has_pie |
| 73 | # (note; switched-spec vanilla compilers satisfy this condition) or |
24 | # has_pic |
| 74 | # the specs file name contains 'hardened'. |
|
|
| 75 | # |
|
|
| 76 | #### has_pie #### |
|
|
| 77 | # Returns true if the compiler by default or with current CFLAGS |
|
|
| 78 | # builds position-independent code. |
|
|
| 79 | # |
|
|
| 80 | #### has_pic #### |
|
|
| 81 | # Returns true if the compiler by default or with current CFLAGS |
|
|
| 82 | # builds position-independent code. |
|
|
| 83 | # |
|
|
| 84 | #### has_ssp_all #### |
25 | # has_ssp_all |
| 85 | # Returns true if the compiler by default or with current CFLAGS |
26 | # has_ssp |
| 86 | # generates stack smash protections for all functions |
27 | |
| 87 | # |
|
|
| 88 | #### has_ssp #### |
|
|
| 89 | # Returns true if the compiler by default or with current CFLAGS |
|
|
| 90 | # generates stack smash protections for most vulnerable functions |
|
|
| 91 | # |
|
|
| 92 | |
28 | |
| 93 | # C[XX]FLAGS that we allow in strip-flags |
29 | # C[XX]FLAGS that we allow in strip-flags |
|
|
30 | # Note: shell globs and character lists are allowed |
| 94 | setup-allowed-flags() { |
31 | setup-allowed-flags() { |
| 95 | if [[ -z ${ALLOWED_FLAGS} ]] ; then |
32 | if [[ -z ${ALLOWED_FLAGS} ]] ; then |
| 96 | export ALLOWED_FLAGS="-pipe" |
33 | export ALLOWED_FLAGS="-pipe" |
| 97 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -O -O0 -O1 -O2 -mcpu -march -mtune" |
34 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -O -O0 -O1 -O2 -mcpu -march -mtune" |
| 98 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -fstack-protector -fstack-protector-all" |
35 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -fstack-protector -fstack-protector-all" |
| 99 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -fbounds-checking -fno-bounds-checking" |
36 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -fbounds-checking" |
| 100 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -fno-PIE -fno-pie -fno-unit-at-a-time" |
37 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -fno-PIE -fno-pie -fno-unit-at-a-time" |
| 101 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -g -g0 -g1 -g2 -g3 -ggdb -ggdb0 -ggdb1 -ggdb2 -ggdb3" |
38 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -g -g[0-9] -ggdb -ggdb[0-9] -gstabs -gstabs+" |
|
|
39 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -fno-ident" |
|
|
40 | export ALLOWED_FLAGS="${ALLOWED_FLAGS} -W* -w" |
| 102 | fi |
41 | fi |
| 103 | # allow a bunch of flags that negate features / control ABI |
42 | # allow a bunch of flags that negate features / control ABI |
| 104 | ALLOWED_FLAGS="${ALLOWED_FLAGS} -fno-stack-protector -fno-stack-protector-all" |
43 | ALLOWED_FLAGS="${ALLOWED_FLAGS} -fno-stack-protector -fno-stack-protector-all \ |
|
|
44 | -fno-strict-aliasing -fno-bounds-checking" |
| 105 | ALLOWED_FLAGS="${ALLOWED_FLAGS} -mregparm -mno-app-regs -mapp-regs \ |
45 | ALLOWED_FLAGS="${ALLOWED_FLAGS} -mregparm -mno-app-regs -mapp-regs \ |
| 106 | -mno-mmx -mno-sse -mno-sse2 -mno-sse3 -mno-3dnow \ |
46 | -mno-mmx -mno-sse -mno-sse2 -mno-sse3 -mno-3dnow \ |
| 107 | -mips1 -mips2 -mips3 -mips4 -mips32 -mips64 -mips16 \ |
47 | -mips1 -mips2 -mips3 -mips4 -mips32 -mips64 -mips16 \ |
| 108 | -msoft-float -mno-soft-float -mhard-float -mno-hard-float -mfpu \ |
48 | -msoft-float -mno-soft-float -mhard-float -mno-hard-float -mfpu \ |
| 109 | -mieee -mieee-with-inexact \ |
49 | -mieee -mieee-with-inexact -mschedule \ |
| 110 | -mtls-direct-seg-refs -mno-tls-direct-seg-refs \ |
50 | -mtls-direct-seg-refs -mno-tls-direct-seg-refs \ |
| 111 | -mflat -mno-flat -mno-faster-structs -mfaster-structs \ |
51 | -mflat -mno-flat -mno-faster-structs -mfaster-structs \ |
| 112 | -m32 -m64 -mabi -mlittle-endian -mbig-endian -EL -EB -fPIC \ |
52 | -m32 -m64 -mabi -mlittle-endian -mbig-endian -EL -EB -fPIC \ |
| 113 | -mlive-g0 -mcmodel -mstack-bias -mno-stack-bias" |
53 | -mlive-g0 -mcmodel -mstack-bias -mno-stack-bias \ |
|
|
54 | -msecure-plt -D*" |
| 114 | |
55 | |
| 115 | # C[XX]FLAGS that we are think is ok, but needs testing |
56 | # C[XX]FLAGS that we are think is ok, but needs testing |
| 116 | # NOTE: currently -Os have issues with gcc3 and K6* arch's |
57 | # NOTE: currently -Os have issues with gcc3 and K6* arch's |
| 117 | export UNSTABLE_FLAGS="-Os -O3 -freorder-blocks" |
58 | export UNSTABLE_FLAGS="-Os -O3 -freorder-blocks" |
| 118 | return 0 |
59 | return 0 |
| … | |
… | |
| 158 | eval new\[\${\#new\[@]}]=\${f} |
99 | eval new\[\${\#new\[@]}]=\${f} |
| 159 | done |
100 | done |
| 160 | eval export ${VAR}=\${new\[*]} |
101 | eval export ${VAR}=\${new\[*]} |
| 161 | } |
102 | } |
| 162 | |
103 | |
|
|
104 | # @FUNCTION: filter-flags |
|
|
105 | # @USAGE: <flags> |
|
|
106 | # @DESCRIPTION: |
|
|
107 | # Remove particular <flags> from {C,CPP,CXX}FLAGS. Accepts shell globs. |
| 163 | filter-flags() { |
108 | filter-flags() { |
| 164 | _filter-hardened "$@" |
109 | _filter-hardened "$@" |
| 165 | _filter-var CFLAGS "$@" |
110 | _filter-var CFLAGS "$@" |
|
|
111 | _filter-var CPPFLAGS "$@" |
| 166 | _filter-var CXXFLAGS "$@" |
112 | _filter-var CXXFLAGS "$@" |
| 167 | return 0 |
113 | return 0 |
| 168 | } |
114 | } |
| 169 | |
115 | |
|
|
116 | # @FUNCTION: filter-lfs-flags |
|
|
117 | # @DESCRIPTION: |
|
|
118 | # Remove flags that enable Large File Support. |
| 170 | filter-lfs-flags() { |
119 | filter-lfs-flags() { |
| 171 | [[ -n $@ ]] && die "filter-lfs-flags takes no arguments" |
120 | [[ -n $@ ]] && die "filter-lfs-flags takes no arguments" |
| 172 | filter-flags -D_FILE_OFFSET_BITS=64 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE |
121 | filter-flags -D_FILE_OFFSET_BITS=64 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE |
| 173 | } |
122 | } |
| 174 | |
123 | |
|
|
124 | # @FUNCTION: append-cppflags |
|
|
125 | # @USAGE: <flags> |
|
|
126 | # @DESCRIPTION: |
|
|
127 | # Add extra <flags> to the current CPPFLAGS. |
|
|
128 | append-cppflags() { |
|
|
129 | [[ -z $* ]] && return 0 |
|
|
130 | export CPPFLAGS="${CPPFLAGS} $*" |
|
|
131 | return 0 |
|
|
132 | } |
|
|
133 | |
|
|
134 | # @FUNCTION: append-lfs-flags |
|
|
135 | # @DESCRIPTION: |
|
|
136 | # Add flags that enable Large File Support. |
| 175 | append-lfs-flags() { |
137 | append-lfs-flags() { |
| 176 | [[ -n $@ ]] && die "append-lfs-flags takes no arguments" |
138 | [[ -n $@ ]] && die "append-lfs-flags takes no arguments" |
| 177 | append-flags -D_FILE_OFFSET_BITS=64 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE |
139 | append-cppflags -D_FILE_OFFSET_BITS=64 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE |
| 178 | } |
140 | } |
| 179 | |
141 | |
|
|
142 | # @FUNCTION: append-flags |
|
|
143 | # @USAGE: <flags> |
|
|
144 | # @DESCRIPTION: |
|
|
145 | # Add extra <flags> to your current C[XX]FLAGS. |
| 180 | append-flags() { |
146 | append-flags() { |
| 181 | [[ -z $* ]] && return 0 |
147 | [[ -z $* ]] && return 0 |
| 182 | export CFLAGS="${CFLAGS} $*" |
148 | export CFLAGS="${CFLAGS} $*" |
| 183 | export CXXFLAGS="${CXXFLAGS} $*" |
149 | export CXXFLAGS="${CXXFLAGS} $*" |
| 184 | return 0 |
150 | return 0 |
| 185 | } |
151 | } |
| 186 | |
152 | |
|
|
153 | # @FUNCTION: replace-flags |
|
|
154 | # @USAGE: <old> <new> |
|
|
155 | # @DESCRIPTION: |
|
|
156 | # Replace the <old> flag with <new>. Accepts shell globs for <old>. |
| 187 | replace-flags() { |
157 | replace-flags() { |
| 188 | [[ $# != 2 ]] \ |
158 | [[ $# != 2 ]] \ |
| 189 | && echo && eerror "Usage: replace-flags <old flag> <new flag>" \ |
159 | && echo && eerror "Usage: replace-flags <old flag> <new flag>" \ |
| 190 | && die "replace-flags takes 2 arguments, not $#" |
160 | && die "replace-flags takes 2 arguments, not $#" |
| 191 | |
161 | |
| … | |
… | |
| 206 | done |
176 | done |
| 207 | |
177 | |
| 208 | return 0 |
178 | return 0 |
| 209 | } |
179 | } |
| 210 | |
180 | |
|
|
181 | # @FUNCTION: replace-cpu-flags |
|
|
182 | # @USAGE: <old> <new> |
|
|
183 | # @DESCRIPTION: |
|
|
184 | # Replace cpu flags (like -march/-mcpu/-mtune) that select the <old> cpu |
|
|
185 | # with flags that select the <new> cpu. Accepts shell globs for <old>. |
| 211 | replace-cpu-flags() { |
186 | replace-cpu-flags() { |
| 212 | local newcpu="$#" ; newcpu="${!newcpu}" |
187 | local newcpu="$#" ; newcpu="${!newcpu}" |
| 213 | while [ $# -gt 1 ] ; do |
188 | while [ $# -gt 1 ] ; do |
| 214 | # quote to make sure that no globbing is done (particularly on |
189 | # quote to make sure that no globbing is done (particularly on |
| 215 | # ${oldcpu} prior to calling replace-flags |
190 | # ${oldcpu}) prior to calling replace-flags |
| 216 | replace-flags "-march=${1}" "-march=${newcpu}" |
191 | replace-flags "-march=${1}" "-march=${newcpu}" |
| 217 | replace-flags "-mcpu=${1}" "-mcpu=${newcpu}" |
192 | replace-flags "-mcpu=${1}" "-mcpu=${newcpu}" |
| 218 | replace-flags "-mtune=${1}" "-mtune=${newcpu}" |
193 | replace-flags "-mtune=${1}" "-mtune=${newcpu}" |
| 219 | shift |
194 | shift |
| 220 | done |
195 | done |
| 221 | return 0 |
196 | return 0 |
| 222 | } |
197 | } |
| 223 | |
198 | |
|
|
199 | _is_flagq() { |
|
|
200 | local x |
|
|
201 | for x in ${!1} ; do |
|
|
202 | [[ ${x} == $2 ]] && return 0 |
|
|
203 | done |
|
|
204 | return 1 |
|
|
205 | } |
|
|
206 | |
|
|
207 | # @FUNCTION: is-flagq |
|
|
208 | # @USAGE: <flag> |
|
|
209 | # @DESCRIPTION: |
|
|
210 | # Returns shell true if <flag> is in C[XX]FLAGS, else returns shell false. Accepts shell globs. |
| 224 | is-flagq() { |
211 | is-flagq() { |
| 225 | local x |
212 | [[ -n $2 ]] && die "Usage: is-flag <flag>" |
| 226 | |
213 | _is_flagq CFLAGS $1 || _is_flagq CXXFLAGS $1 |
| 227 | for x in ${CFLAGS} ${CXXFLAGS} ; do |
|
|
| 228 | # Note this should work with globs like -mcpu=ultrasparc* |
|
|
| 229 | if [[ ${x} == ${1} ]]; then |
|
|
| 230 | return 0 |
|
|
| 231 | fi |
|
|
| 232 | done |
|
|
| 233 | return 1 |
|
|
| 234 | } |
214 | } |
| 235 | |
215 | |
|
|
216 | # @FUNCTION: is-flag |
|
|
217 | # @USAGE: <flag> |
|
|
218 | # @DESCRIPTION: |
|
|
219 | # Echo's "true" if flag is set in C[XX]FLAGS. Accepts shell globs. |
| 236 | is-flag() { |
220 | is-flag() { |
| 237 | if is-flagq ${1}; then |
221 | is-flagq "$@" && echo true |
| 238 | echo true |
|
|
| 239 | return 0 |
|
|
| 240 | fi |
|
|
| 241 | return 1 |
|
|
| 242 | } |
222 | } |
| 243 | |
223 | |
|
|
224 | # @FUNCTION: is-ldflagq |
|
|
225 | # @USAGE: <flag> |
|
|
226 | # @DESCRIPTION: |
|
|
227 | # Returns shell true if <flag> is in LDFLAGS, else returns shell false. Accepts shell globs. |
| 244 | is-ldflagq() { |
228 | is-ldflagq() { |
| 245 | local x |
229 | [[ -n $2 ]] && die "Usage: is-ldflag <flag>" |
| 246 | |
230 | _is_flagq LDFLAGS $1 |
| 247 | for x in ${LDFLAGS} ; do |
|
|
| 248 | # Note this should work with globs like -mcpu=ultrasparc* |
|
|
| 249 | if [[ ${x} == ${1} ]]; then |
|
|
| 250 | return 0 |
|
|
| 251 | fi |
|
|
| 252 | done |
|
|
| 253 | return 1 |
|
|
| 254 | } |
231 | } |
| 255 | |
232 | |
|
|
233 | # @FUNCTION: is-ldflag |
|
|
234 | # @USAGE: <flag> |
|
|
235 | # @DESCRIPTION: |
|
|
236 | # Echo's "true" if flag is set in LDFLAGS. Accepts shell globs. |
| 256 | is-ldflag() { |
237 | is-ldflag() { |
| 257 | if is-ldflagq ${1}; then |
238 | is-ldflagq "$@" && echo true |
| 258 | echo true |
|
|
| 259 | return 0 |
|
|
| 260 | fi |
|
|
| 261 | return 1 |
|
|
| 262 | } |
239 | } |
| 263 | |
240 | |
|
|
241 | # @FUNCTION: filter-mfpmath |
|
|
242 | # @USAGE: <math types> |
|
|
243 | # @DESCRIPTION: |
|
|
244 | # Remove specified math types from the fpmath flag. For example, if the user |
|
|
245 | # has -mfpmath=sse,386, running `filter-mfpmath sse` will leave the user with |
|
|
246 | # -mfpmath=386. |
| 264 | filter-mfpmath() { |
247 | filter-mfpmath() { |
| 265 | local orig_mfpmath new_math prune_math |
248 | local orig_mfpmath new_math prune_math |
| 266 | |
249 | |
| 267 | # save the original -mfpmath flag |
250 | # save the original -mfpmath flag |
| 268 | orig_mfpmath="`get-flag -mfpmath`" |
251 | orig_mfpmath=$(get-flag -mfpmath) |
| 269 | # get the value of the current -mfpmath flag |
252 | # get the value of the current -mfpmath flag |
| 270 | new_math=" `get-flag mfpmath | tr , ' '` " |
253 | new_math=$(get-flag mfpmath) |
|
|
254 | new_math=" ${new_math//,/ } " |
| 271 | # figure out which math values are to be removed |
255 | # figure out which math values are to be removed |
| 272 | prune_math="" |
256 | prune_math="" |
| 273 | for prune_math in "$@" ; do |
257 | for prune_math in "$@" ; do |
| 274 | new_math="${new_math/ ${prune_math} / }" |
258 | new_math=${new_math/ ${prune_math} / } |
| 275 | done |
259 | done |
| 276 | new_math="`echo ${new_math:1:${#new_math}-2} | tr ' ' ,`" |
260 | new_math=$(echo ${new_math}) |
|
|
261 | new_math=${new_math// /,} |
| 277 | |
262 | |
| 278 | if [ -z "${new_math}" ] ; then |
263 | if [[ -z ${new_math} ]] ; then |
| 279 | # if we're removing all user specified math values are |
264 | # if we're removing all user specified math values are |
| 280 | # slated for removal, then we just filter the flag |
265 | # slated for removal, then we just filter the flag |
| 281 | filter-flags ${orig_mfpmath} |
266 | filter-flags ${orig_mfpmath} |
| 282 | else |
267 | else |
| 283 | # if we only want to filter some of the user specified |
268 | # if we only want to filter some of the user specified |
| … | |
… | |
| 285 | replace-flags ${orig_mfpmath} -mfpmath=${new_math} |
270 | replace-flags ${orig_mfpmath} -mfpmath=${new_math} |
| 286 | fi |
271 | fi |
| 287 | return 0 |
272 | return 0 |
| 288 | } |
273 | } |
| 289 | |
274 | |
|
|
275 | # @FUNCTION: strip-flags |
|
|
276 | # @DESCRIPTION: |
|
|
277 | # Strip C[XX]FLAGS of everything except known good/safe flags. |
| 290 | strip-flags() { |
278 | strip-flags() { |
| 291 | local x y flag NEW_CFLAGS NEW_CXXFLAGS |
279 | local x y flag NEW_CFLAGS NEW_CXXFLAGS |
| 292 | |
280 | |
| 293 | setup-allowed-flags |
281 | setup-allowed-flags |
| 294 | |
282 | |
| … | |
… | |
| 347 | local PROG=$(tc-get${comp}) |
335 | local PROG=$(tc-get${comp}) |
| 348 | ${PROG} ${flags} -S -o /dev/null -xc /dev/null \ |
336 | ${PROG} ${flags} -S -o /dev/null -xc /dev/null \ |
| 349 | > /dev/null 2>&1 |
337 | > /dev/null 2>&1 |
| 350 | } |
338 | } |
| 351 | |
339 | |
| 352 | # Returns true if C compiler support given flag |
340 | # @FUNCTION: test-flag-CC |
|
|
341 | # @USAGE: <flag> |
|
|
342 | # @DESCRIPTION: |
|
|
343 | # Returns shell true if <flag> is supported by the C compiler, else returns shell false. |
| 353 | test-flag-CC() { test-flag-PROG "CC" "$1"; } |
344 | test-flag-CC() { test-flag-PROG "CC" "$1"; } |
| 354 | |
345 | |
| 355 | # Returns true if C++ compiler support given flag |
346 | # @FUNCTION: test-flag-CXX |
|
|
347 | # @USAGE: <flag> |
|
|
348 | # @DESCRIPTION: |
|
|
349 | # Returns shell true if <flag> is supported by the C++ compiler, else returns shell false. |
| 356 | test-flag-CXX() { test-flag-PROG "CXX" "$1"; } |
350 | test-flag-CXX() { test-flag-PROG "CXX" "$1"; } |
| 357 | |
351 | |
| 358 | test-flags-PROG() { |
352 | test-flags-PROG() { |
| 359 | local comp=$1 |
353 | local comp=$1 |
| 360 | local flags |
354 | local flags |
| 361 | local x |
355 | local x |
| 362 | |
356 | |
| 363 | shift |
357 | shift |
| 364 | |
358 | |
| 365 | [[ -z ${comp} ]] && \ |
359 | [[ -z ${comp} ]] && return 1 |
| 366 | return 1 |
|
|
| 367 | |
360 | |
|
|
361 | x="" |
| 368 | for x in "$@" ; do |
362 | for x in "$@" ; do |
| 369 | test-flag-${comp} "${x}" && flags="${flags} ${x}" |
363 | test-flag-${comp} "${x}" && flags="${flags}${flags:+ }${x}" |
| 370 | done |
364 | done |
| 371 | |
365 | |
| 372 | echo "${flags}" |
366 | echo "${flags}" |
| 373 | |
367 | |
| 374 | # Just bail if we dont have any flags |
368 | # Just bail if we dont have any flags |
| 375 | [[ -n ${flags} ]] |
369 | [[ -n ${flags} ]] |
| 376 | } |
370 | } |
| 377 | |
371 | |
| 378 | # Returns (echo's) the given flags supported by the C compiler |
372 | # @FUNCTION: test-flags-CC |
|
|
373 | # @USAGE: <flags> |
|
|
374 | # @DESCRIPTION: |
|
|
375 | # Returns shell true if <flags> are supported by the C compiler, else returns shell false. |
| 379 | test-flags-CC() { test-flags-PROG "CC" "$@"; } |
376 | test-flags-CC() { test-flags-PROG "CC" "$@"; } |
| 380 | |
377 | |
| 381 | # Returns (echo's) the given flags supported by the C++ compiler |
378 | # @FUNCTION: test-flags-CXX |
|
|
379 | # @USAGE: <flags> |
|
|
380 | # @DESCRIPTION: |
|
|
381 | # Returns shell true if <flags> are supported by the C++ compiler, else returns shell false. |
| 382 | test-flags-CXX() { test-flags-PROG "CXX" "$@"; } |
382 | test-flags-CXX() { test-flags-PROG "CXX" "$@"; } |
| 383 | |
383 | |
|
|
384 | # @FUNCTION: test-flags |
|
|
385 | # @USAGE: <flags> |
|
|
386 | # @DESCRIPTION: |
| 384 | # Short-hand that should hopefully work for both C and C++ compiler, but |
387 | # Short-hand that should hopefully work for both C and C++ compiler, but |
| 385 | # its really only present due to the append-flags() abomination. |
388 | # its really only present due to the append-flags() abomination. |
| 386 | test-flags() { test-flags-CC "$@"; } |
389 | test-flags() { test-flags-CC "$@"; } |
| 387 | |
390 | |
| 388 | # Depriciated, use test-flags() |
391 | # @FUNCTION: test_flag |
|
|
392 | # @DESCRIPTION: |
|
|
393 | # DEPRICIATED, use test-flags() |
| 389 | test_flag() { |
394 | test_flag() { |
| 390 | ewarn "test_flag: deprecated, please use test-flags()!" >&2 |
395 | ewarn "test_flag: deprecated, please use test-flags()!" >&2 |
| 391 | |
396 | |
| 392 | test-flags-CC "$@" |
397 | test-flags-CC "$@" |
| 393 | } |
398 | } |
| 394 | |
399 | |
|
|
400 | # @FUNCTION: test_version_info |
|
|
401 | # @USAGE: <version> |
|
|
402 | # @DESCRIPTION: |
|
|
403 | # Returns shell true if the current C compiler version matches <version>, else returns shell false. |
|
|
404 | # Accepts shell globs. |
| 395 | test_version_info() { |
405 | test_version_info() { |
| 396 | if [[ $($(tc-getCC) --version 2>&1) == *$1* ]]; then |
406 | if [[ $($(tc-getCC) --version 2>&1) == *$1* ]]; then |
| 397 | return 0 |
407 | return 0 |
| 398 | else |
408 | else |
| 399 | return 1 |
409 | return 1 |
| 400 | fi |
410 | fi |
| 401 | } |
411 | } |
| 402 | |
412 | |
|
|
413 | # @FUNCTION: strip-unsupported-flags |
|
|
414 | # @DESCRIPTION: |
|
|
415 | # Strip C[XX]FLAGS of any flags not supported by the active toolchain. |
| 403 | strip-unsupported-flags() { |
416 | strip-unsupported-flags() { |
| 404 | local x NEW_CFLAGS NEW_CXXFLAGS |
417 | export CFLAGS=$(test-flags-CC ${CFLAGS}) |
| 405 | |
418 | export CXXFLAGS=$(test-flags-CXX ${CXXFLAGS}) |
| 406 | for x in ${CFLAGS} ; do |
|
|
| 407 | NEW_CFLAGS="${NEW_CFLAGS} $(test-flags ${x})" |
|
|
| 408 | done |
|
|
| 409 | for x in ${CXXFLAGS} ; do |
|
|
| 410 | NEW_CXXFLAGS="${NEW_CXXFLAGS} $(test-flags ${x})" |
|
|
| 411 | done |
|
|
| 412 | |
|
|
| 413 | export CFLAGS=${NEW_CFLAGS} |
|
|
| 414 | export CXXFLAGS=${NEW_CXXFLAGS} |
|
|
| 415 | } |
419 | } |
| 416 | |
420 | |
|
|
421 | # @FUNCTION: get-flag |
|
|
422 | # @USAGE: <flag> |
|
|
423 | # @DESCRIPTION: |
|
|
424 | # Find and echo the value for a particular flag. Accepts shell globs. |
| 417 | get-flag() { |
425 | get-flag() { |
| 418 | local f findflag="$1" |
426 | local f findflag="$1" |
| 419 | |
427 | |
| 420 | # this code looks a little flaky but seems to work for |
428 | # this code looks a little flaky but seems to work for |
| 421 | # everything we want ... |
429 | # everything we want ... |
| … | |
… | |
| 429 | fi |
437 | fi |
| 430 | done |
438 | done |
| 431 | return 1 |
439 | return 1 |
| 432 | } |
440 | } |
| 433 | |
441 | |
|
|
442 | # @FUNCTION: has_hardened |
|
|
443 | # @DESCRIPTION: |
| 434 | # DEPRECATED - use gcc-specs-relro or gcc-specs-now from toolchain-funcs |
444 | # DEPRECATED - use gcc-specs-relro or gcc-specs-now from toolchain-funcs |
| 435 | has_hardened() { |
445 | has_hardened() { |
| 436 | ewarn "has_hardened: deprecated, please use gcc-specs-{relro,now}()!" >&2 |
446 | ewarn "has_hardened: deprecated, please use gcc-specs-{relro,now}()!" >&2 |
| 437 | |
447 | |
| 438 | test_version_info Hardened && return 0 |
448 | test_version_info Hardened && return 0 |
| 439 | # The specs file wont exist unless gcc has GCC_SPECS support |
449 | # The specs file wont exist unless gcc has GCC_SPECS support |
| 440 | [[ -f ${GCC_SPECS} && ${GCC_SPECS} != ${GCC_SPECS/hardened/} ]] |
450 | [[ -f ${GCC_SPECS} && ${GCC_SPECS} != ${GCC_SPECS/hardened/} ]] |
| 441 | } |
451 | } |
| 442 | |
452 | |
|
|
453 | # @FUNCTION: has_pic |
|
|
454 | # @DESCRIPTION: |
| 443 | # DEPRECATED - use gcc-specs-pie from toolchain-funcs |
455 | # DEPRECATED - use gcc-specs-pie from toolchain-funcs |
| 444 | # indicate whether PIC is set |
456 | # indicate whether PIC is set |
| 445 | has_pic() { |
457 | has_pic() { |
| 446 | ewarn "has_pic: deprecated, please use gcc-specs-pie()!" >&2 |
458 | ewarn "has_pic: deprecated, please use gcc-specs-pie()!" >&2 |
| 447 | |
459 | |
| 448 | [[ ${CFLAGS/-fPIC} != ${CFLAGS} || \ |
460 | [[ ${CFLAGS/-fPIC} != ${CFLAGS} || \ |
| 449 | ${CFLAGS/-fpic} != ${CFLAGS} ]] || \ |
461 | ${CFLAGS/-fpic} != ${CFLAGS} ]] || \ |
| 450 | gcc-specs-pie |
462 | gcc-specs-pie |
| 451 | } |
463 | } |
| 452 | |
464 | |
|
|
465 | # @FUNCTION: has_pie |
|
|
466 | # @DESCRIPTION: |
| 453 | # DEPRECATED - use gcc-specs-pie from toolchain-funcs |
467 | # DEPRECATED - use gcc-specs-pie from toolchain-funcs |
| 454 | # indicate whether PIE is set |
468 | # indicate whether PIE is set |
| 455 | has_pie() { |
469 | has_pie() { |
| 456 | ewarn "has_pie: deprecated, please use gcc-specs-pie()!" >&2 |
470 | ewarn "has_pie: deprecated, please use gcc-specs-pie()!" >&2 |
| 457 | |
471 | |
| 458 | [[ ${CFLAGS/-fPIE} != ${CFLAGS} || \ |
472 | [[ ${CFLAGS/-fPIE} != ${CFLAGS} || \ |
| 459 | ${CFLAGS/-fpie} != ${CFLAGS} ]] || \ |
473 | ${CFLAGS/-fpie} != ${CFLAGS} ]] || \ |
| 460 | gcc-specs-pie |
474 | gcc-specs-pie |
| 461 | } |
475 | } |
| 462 | |
476 | |
|
|
477 | # @FUNCTION: has_ssp_all |
|
|
478 | # @DESCRIPTION: |
| 463 | # DEPRECATED - use gcc-specs-ssp from toolchain-funcs |
479 | # DEPRECATED - use gcc-specs-ssp from toolchain-funcs |
| 464 | # indicate whether code for SSP is being generated for all functions |
480 | # indicate whether code for SSP is being generated for all functions |
| 465 | has_ssp_all() { |
481 | has_ssp_all() { |
| 466 | ewarn "has_ssp_all: deprecated, please use gcc-specs-ssp()!" >&2 |
482 | ewarn "has_ssp_all: deprecated, please use gcc-specs-ssp()!" >&2 |
| 467 | |
483 | |
| … | |
… | |
| 469 | [[ ${CFLAGS/-fstack-protector-all} != ${CFLAGS} || \ |
485 | [[ ${CFLAGS/-fstack-protector-all} != ${CFLAGS} || \ |
| 470 | -n $(echo | $(tc-getCC) ${CFLAGS} -E -dM - | grep __SSP_ALL__) ]] || \ |
486 | -n $(echo | $(tc-getCC) ${CFLAGS} -E -dM - | grep __SSP_ALL__) ]] || \ |
| 471 | gcc-specs-ssp-all |
487 | gcc-specs-ssp-all |
| 472 | } |
488 | } |
| 473 | |
489 | |
|
|
490 | # @FUNCTION: has_ssp |
|
|
491 | # @DESCRIPTION: |
| 474 | # DEPRECATED - use gcc-specs-ssp from toolchain-funcs |
492 | # DEPRECATED - use gcc-specs-ssp from toolchain-funcs |
| 475 | # indicate whether code for SSP is being generated |
493 | # indicate whether code for SSP is being generated |
| 476 | has_ssp() { |
494 | has_ssp() { |
| 477 | ewarn "has_ssp: deprecated, please use gcc-specs-ssp()!" >&2 |
495 | ewarn "has_ssp: deprecated, please use gcc-specs-ssp()!" >&2 |
| 478 | |
496 | |
| … | |
… | |
| 480 | [[ ${CFLAGS/-fstack-protector} != ${CFLAGS} || \ |
498 | [[ ${CFLAGS/-fstack-protector} != ${CFLAGS} || \ |
| 481 | -n $(echo | $(tc-getCC) ${CFLAGS} -E -dM - | grep __SSP__) ]] || \ |
499 | -n $(echo | $(tc-getCC) ${CFLAGS} -E -dM - | grep __SSP__) ]] || \ |
| 482 | gcc-specs-ssp |
500 | gcc-specs-ssp |
| 483 | } |
501 | } |
| 484 | |
502 | |
|
|
503 | # @FUNCTION: has_m64 |
|
|
504 | # @DESCRIPTION: |
|
|
505 | # This doesn't test if the flag is accepted, it tests if the flag actually |
|
|
506 | # WORKS. Non-multilib gcc will take both -m32 and -m64. If the flag works |
|
|
507 | # return code is 0, else the return code is 1. |
| 485 | has_m64() { |
508 | has_m64() { |
| 486 | # this doesnt test if the flag is accepted, it tests if the flag |
509 | # this doesnt test if the flag is accepted, it tests if the flag |
| 487 | # actually -WORKS-. non-multilib gcc will take both -m32 and -m64! |
510 | # actually -WORKS-. non-multilib gcc will take both -m32 and -m64! |
| 488 | # please dont replace this function with test_flag in some future |
511 | # please dont replace this function with test_flag in some future |
| 489 | # clean-up! |
512 | # clean-up! |
| … | |
… | |
| 496 | rm -f "${temp}".c |
519 | rm -f "${temp}".c |
| 497 | [[ ${ret} != 1 ]] && return 0 |
520 | [[ ${ret} != 1 ]] && return 0 |
| 498 | return 1 |
521 | return 1 |
| 499 | } |
522 | } |
| 500 | |
523 | |
|
|
524 | # @FUNCTION: has_m32 |
|
|
525 | # @DESCRIPTION: |
|
|
526 | # This doesn't test if the flag is accepted, it tests if the flag actually |
|
|
527 | # WORKS. Non-mulilib gcc will take both -m32 and -64. If the flag works return |
|
|
528 | # code is 0, else return code is 1. |
| 501 | has_m32() { |
529 | has_m32() { |
| 502 | # this doesnt test if the flag is accepted, it tests if the flag |
530 | # this doesnt test if the flag is accepted, it tests if the flag |
| 503 | # actually -WORKS-. non-multilib gcc will take both -m32 and -m64! |
531 | # actually -WORKS-. non-multilib gcc will take both -m32 and -m64! |
| 504 | # please dont replace this function with test_flag in some future |
532 | # please dont replace this function with test_flag in some future |
| 505 | # clean-up! |
533 | # clean-up! |
| … | |
… | |
| 514 | rm -f "${temp}".c |
542 | rm -f "${temp}".c |
| 515 | [[ ${ret} != 1 ]] && return 0 |
543 | [[ ${ret} != 1 ]] && return 0 |
| 516 | return 1 |
544 | return 1 |
| 517 | } |
545 | } |
| 518 | |
546 | |
|
|
547 | # @FUNCTION: replace-sparc64-flags |
|
|
548 | # @DESCRIPTION: |
|
|
549 | # Sets mcpu to v8 and uses the original value as mtune if none specified. |
| 519 | replace-sparc64-flags() { |
550 | replace-sparc64-flags() { |
| 520 | local SPARC64_CPUS="ultrasparc3 ultrasparc v9" |
551 | local SPARC64_CPUS="ultrasparc3 ultrasparc v9" |
| 521 | |
552 | |
| 522 | if [ "${CFLAGS/mtune}" != "${CFLAGS}" ]; then |
553 | if [ "${CFLAGS/mtune}" != "${CFLAGS}" ]; then |
| 523 | for x in ${SPARC64_CPUS}; do |
554 | for x in ${SPARC64_CPUS}; do |
| 524 | CFLAGS="${CFLAGS/-mcpu=${x}/-mcpu=v8}" |
555 | CFLAGS="${CFLAGS/-mcpu=${x}/-mcpu=v8}" |
| 525 | done |
556 | done |
| 526 | else |
557 | else |
| 527 | for x in ${SPARC64_CPUS}; do |
558 | for x in ${SPARC64_CPUS}; do |
| 528 | CFLAGS="${CFLAGS/-mcpu=${x}/-mcpu=v8 -mtune=${x}}" |
559 | CFLAGS="${CFLAGS/-mcpu=${x}/-mcpu=v8 -mtune=${x}}" |
| 529 | done |
560 | done |
| 530 | fi |
561 | fi |
| 531 | |
562 | |
| 532 | if [ "${CXXFLAGS/mtune}" != "${CXXFLAGS}" ]; then |
563 | if [ "${CXXFLAGS/mtune}" != "${CXXFLAGS}" ]; then |
| 533 | for x in ${SPARC64_CPUS}; do |
564 | for x in ${SPARC64_CPUS}; do |
| 534 | CXXFLAGS="${CXXFLAGS/-mcpu=${x}/-mcpu=v8}" |
565 | CXXFLAGS="${CXXFLAGS/-mcpu=${x}/-mcpu=v8}" |
| 535 | done |
566 | done |
| 536 | else |
567 | else |
| 537 | for x in ${SPARC64_CPUS}; do |
568 | for x in ${SPARC64_CPUS}; do |
| 538 | CXXFLAGS="${CXXFLAGS/-mcpu=${x}/-mcpu=v8 -mtune=${x}}" |
569 | CXXFLAGS="${CXXFLAGS/-mcpu=${x}/-mcpu=v8 -mtune=${x}}" |
| 539 | done |
570 | done |
| 540 | fi |
571 | fi |
| 541 | |
572 | |
| 542 | export CFLAGS CXXFLAGS |
573 | export CFLAGS CXXFLAGS |
| 543 | } |
574 | } |
| 544 | |
575 | |
|
|
576 | # @FUNCTION: append-ldflags |
|
|
577 | # @USAGE: <flags> |
|
|
578 | # @DESCRIPTION: |
|
|
579 | # Add extra <flags> to the current LDFLAGS. |
| 545 | append-ldflags() { |
580 | append-ldflags() { |
| 546 | [[ -z $* ]] && return 0 |
581 | [[ -z $* ]] && return 0 |
| 547 | export LDFLAGS="${LDFLAGS} $*" |
582 | export LDFLAGS="${LDFLAGS} $*" |
| 548 | return 0 |
583 | return 0 |
| 549 | } |
584 | } |
| 550 | |
585 | |
| 551 | # Remove flags from LDFLAGS - it's up to the ebuild to filter |
586 | # @FUNCTION: filter-ldflags |
| 552 | # CFLAGS and CXXFLAGS via filter-flags if they need to. |
587 | # @USAGE: <flags> |
|
|
588 | # @DESCRIPTION: |
|
|
589 | # Remove particular <flags> from LDFLAGS. Accepts shell globs. |
| 553 | filter-ldflags() { |
590 | filter-ldflags() { |
| 554 | _filter-var LDFLAGS "$@" |
591 | _filter-var LDFLAGS "$@" |
| 555 | return 0 |
592 | return 0 |
| 556 | } |
593 | } |
| 557 | |
594 | |
|
|
595 | # @FUNCTION: raw-ldflags |
|
|
596 | # @USAGE: <flags> |
|
|
597 | # @DESCRIPTION: |
| 558 | # Turn C style ldflags (-Wl,-foo) into straight ldflags - the results |
598 | # Turn C style ldflags (-Wl,-foo) into straight ldflags - the results |
| 559 | # are suitable for passing directly to 'ld'; note LDFLAGS is usually passed |
599 | # are suitable for passing directly to 'ld'; note LDFLAGS is usually passed |
| 560 | # to gcc where it needs the '-Wl,'. |
600 | # to gcc where it needs the '-Wl,'. |
| 561 | raw-ldflags() { |
601 | raw-ldflags() { |
| 562 | local x input="$@" |
602 | local x input="$@" |
| … | |
… | |
| 567 | set -- "$@" ${x//,/ } |
607 | set -- "$@" ${x//,/ } |
| 568 | done |
608 | done |
| 569 | echo "$@" |
609 | echo "$@" |
| 570 | } |
610 | } |
| 571 | |
611 | |
| 572 | # This is thanks to great work from Paul de Vrieze <gentoo-user@devrieze.net>, |
612 | # @FUNCTION: bindnow-flags |
| 573 | # bug #9016. Also thanks to Jukka Salmi <salmi@gmx.net> (bug #13907) for more |
613 | # @RETURN: Returns the flags to enable "now" binding in the current selected linker. |
| 574 | # fixes. |
614 | # @DESCRIPTION: |
| 575 | # |
|
|
| 576 | # Export CFLAGS and CXXFLAGS that are compadible with gcc-2.95.3 |
|
|
| 577 | gcc2-flags() { |
|
|
| 578 | if [[ $(tc-arch) == "x86" || $(tc-arch) == "amd64" ]] ; then |
|
|
| 579 | CFLAGS=${CFLAGS//-mtune=/-mcpu=} |
|
|
| 580 | CXXFLAGS=${CXXFLAGS//-mtune=/-mcpu=} |
|
|
| 581 | fi |
|
|
| 582 | |
|
|
| 583 | replace-cpu-flags k6-{2,3} k6 |
|
|
| 584 | replace-cpu-flags athlon{,-{tbird,4,xp,mp}} i686 |
|
|
| 585 | |
|
|
| 586 | replace-cpu-flags pentium-mmx i586 |
|
|
| 587 | replace-cpu-flags pentium{2,3,4} i686 |
|
|
| 588 | |
|
|
| 589 | replace-cpu-flags ev6{7,8} ev6 |
|
|
| 590 | |
|
|
| 591 | export CFLAGS CXXFLAGS |
|
|
| 592 | } |
|
|
| 593 | |
|
|
| 594 | # Gets the flags needed for "NOW" binding |
615 | # DEPRECATED - Gets the flags needed for "NOW" binding |
| 595 | bindnow-flags() { |
616 | bindnow-flags() { |
|
|
617 | ewarn "QA: stop using the bindnow-flags function ... simply drop it from your ebuild" |
|
|
618 | |
| 596 | case $($(tc-getLD) -v 2>&1 </dev/null) in |
619 | case $($(tc-getLD) -v 2>&1 </dev/null) in |
| 597 | *GNU* | *'with BFD'*) # GNU ld |
620 | *GNU* | *'with BFD'*) # GNU ld |
| 598 | echo "-Wl,-z,now" ;; |
621 | echo "-Wl,-z,now" ;; |
| 599 | *Apple*) # Darwin ld |
622 | *Apple*) # Darwin ld |
| 600 | echo "-bind_at_load" ;; |
623 | echo "-bind_at_load" ;; |
| … | |
… | |
| 605 | echo "-Wl,-z,now" ;; |
628 | echo "-Wl,-z,now" ;; |
| 606 | esac |
629 | esac |
| 607 | ;; |
630 | ;; |
| 608 | esac |
631 | esac |
| 609 | } |
632 | } |
|
|
633 | |
|
|
634 | |
|
|
635 | # Some tests for when we screw with things and want to make |
|
|
636 | # sure we didn't break anything |
|
|
637 | #TESTS() { |
|
|
638 | # CFLAGS="-a -b -c=1" |
|
|
639 | # CXXFLAGS="-x -y -z=2" |
|
|
640 | # LDFLAGS="-l -m -n=3" |
|
|
641 | # |
|
|
642 | # die() { exit 1; } |
|
|
643 | # (is-flag 1 2 3) && die |
|
|
644 | # (is-ldflag 1 2 3) && die |
|
|
645 | # |
|
|
646 | # is-flagq -l && die |
|
|
647 | # is-ldflagq -a && die |
|
|
648 | # is-flagq -a || die |
|
|
649 | # is-flagq -x || die |
|
|
650 | # is-ldflagq -n=* || die |
|
|
651 | # is-ldflagq -n && die |
|
|
652 | # |
|
|
653 | # strip-unsupported-flags |
|
|
654 | # [[ ${CFLAGS} == "-c=1" ]] || die |
|
|
655 | # [[ ${CXXFLAGS} == "-y -z=2" ]] || die |
|
|
656 | # |
|
|
657 | # echo "All tests pass" |
|
|
658 | #} |
|
|
659 | #TESTS |