1 /* Copyright (C) 1988-2019 Free Software Foundation, Inc.
3 This file is part of GCC.
5 GCC is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3, or (at your option)
10 GCC is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with GCC; see the file COPYING3. If not see
17 <http://www.gnu.org/licenses/>. */
19 #define IN_TARGET_CODE 1
23 #include "coretypes.h"
33 #include "stringpool.h"
40 #include "diagnostic.h"
43 #include "fold-const.h"
46 #include "stor-layout.h"
49 #include "insn-attr.h"
55 #include "common/common-target.h"
56 #include "langhooks.h"
60 #include "tm-constrs.h"
63 #include "sched-int.h"
65 #include "tree-pass.h"
67 #include "pass_manager.h"
68 #include "target-globals.h"
69 #include "gimple-iterator.h"
70 #include "tree-vectorizer.h"
71 #include "shrink-wrap.h"
74 #include "tree-iterator.h"
76 #include "case-cfn-macros.h"
78 #include "fold-const-call.h"
80 #include "tree-ssanames.h"
82 #include "selftest-rtl.h"
83 #include "print-rtl.h"
86 #include "symbol-summary.h"
88 #include "ipa-fnsummary.h"
89 #include "wide-int-bitmask.h"
90 #include "tree-vector-builder.h"
92 #include "dwarf2out.h"
93 #include "i386-options.h"
95 #include "x86-tune-costs.h"
97 #ifndef SUBTARGET32_DEFAULT_CPU
98 #define SUBTARGET32_DEFAULT_CPU "i386"
101 /* Processor feature/optimization bitmasks. */
102 #define m_386 (HOST_WIDE_INT_1U<<PROCESSOR_I386)
103 #define m_486 (HOST_WIDE_INT_1U<<PROCESSOR_I486)
104 #define m_PENT (HOST_WIDE_INT_1U<<PROCESSOR_PENTIUM)
105 #define m_LAKEMONT (HOST_WIDE_INT_1U<<PROCESSOR_LAKEMONT)
106 #define m_PPRO (HOST_WIDE_INT_1U<<PROCESSOR_PENTIUMPRO)
107 #define m_PENT4 (HOST_WIDE_INT_1U<<PROCESSOR_PENTIUM4)
108 #define m_NOCONA (HOST_WIDE_INT_1U<<PROCESSOR_NOCONA)
109 #define m_P4_NOCONA (m_PENT4 | m_NOCONA)
110 #define m_CORE2 (HOST_WIDE_INT_1U<<PROCESSOR_CORE2)
111 #define m_NEHALEM (HOST_WIDE_INT_1U<<PROCESSOR_NEHALEM)
112 #define m_SANDYBRIDGE (HOST_WIDE_INT_1U<<PROCESSOR_SANDYBRIDGE)
113 #define m_HASWELL (HOST_WIDE_INT_1U<<PROCESSOR_HASWELL)
114 #define m_BONNELL (HOST_WIDE_INT_1U<<PROCESSOR_BONNELL)
115 #define m_SILVERMONT (HOST_WIDE_INT_1U<<PROCESSOR_SILVERMONT)
116 #define m_KNL (HOST_WIDE_INT_1U<<PROCESSOR_KNL)
117 #define m_KNM (HOST_WIDE_INT_1U<<PROCESSOR_KNM)
118 #define m_SKYLAKE (HOST_WIDE_INT_1U<<PROCESSOR_SKYLAKE)
119 #define m_SKYLAKE_AVX512 (HOST_WIDE_INT_1U<<PROCESSOR_SKYLAKE_AVX512)
120 #define m_CANNONLAKE (HOST_WIDE_INT_1U<<PROCESSOR_CANNONLAKE)
121 #define m_ICELAKE_CLIENT (HOST_WIDE_INT_1U<<PROCESSOR_ICELAKE_CLIENT)
122 #define m_ICELAKE_SERVER (HOST_WIDE_INT_1U<<PROCESSOR_ICELAKE_SERVER)
123 #define m_CASCADELAKE (HOST_WIDE_INT_1U<<PROCESSOR_CASCADELAKE)
124 #define m_CORE_AVX512 (m_SKYLAKE_AVX512 | m_CANNONLAKE \
125 | m_ICELAKE_CLIENT | m_ICELAKE_SERVER | m_CASCADELAKE)
126 #define m_CORE_AVX2 (m_HASWELL | m_SKYLAKE | m_CORE_AVX512)
127 #define m_CORE_ALL (m_CORE2 | m_NEHALEM | m_SANDYBRIDGE | m_CORE_AVX2)
128 #define m_GOLDMONT (HOST_WIDE_INT_1U<<PROCESSOR_GOLDMONT)
129 #define m_GOLDMONT_PLUS (HOST_WIDE_INT_1U<<PROCESSOR_GOLDMONT_PLUS)
130 #define m_TREMONT (HOST_WIDE_INT_1U<<PROCESSOR_TREMONT)
131 #define m_INTEL (HOST_WIDE_INT_1U<<PROCESSOR_INTEL)
133 #define m_GEODE (HOST_WIDE_INT_1U<<PROCESSOR_GEODE)
134 #define m_K6 (HOST_WIDE_INT_1U<<PROCESSOR_K6)
135 #define m_K6_GEODE (m_K6 | m_GEODE)
136 #define m_K8 (HOST_WIDE_INT_1U<<PROCESSOR_K8)
137 #define m_ATHLON (HOST_WIDE_INT_1U<<PROCESSOR_ATHLON)
138 #define m_ATHLON_K8 (m_K8 | m_ATHLON)
139 #define m_AMDFAM10 (HOST_WIDE_INT_1U<<PROCESSOR_AMDFAM10)
140 #define m_BDVER1 (HOST_WIDE_INT_1U<<PROCESSOR_BDVER1)
141 #define m_BDVER2 (HOST_WIDE_INT_1U<<PROCESSOR_BDVER2)
142 #define m_BDVER3 (HOST_WIDE_INT_1U<<PROCESSOR_BDVER3)
143 #define m_BDVER4 (HOST_WIDE_INT_1U<<PROCESSOR_BDVER4)
144 #define m_ZNVER1 (HOST_WIDE_INT_1U<<PROCESSOR_ZNVER1)
145 #define m_ZNVER2 (HOST_WIDE_INT_1U<<PROCESSOR_ZNVER2)
146 #define m_BTVER1 (HOST_WIDE_INT_1U<<PROCESSOR_BTVER1)
147 #define m_BTVER2 (HOST_WIDE_INT_1U<<PROCESSOR_BTVER2)
148 #define m_BDVER (m_BDVER1 | m_BDVER2 | m_BDVER3 | m_BDVER4)
149 #define m_BTVER (m_BTVER1 | m_BTVER2)
150 #define m_ZNVER (m_ZNVER1 | m_ZNVER2)
151 #define m_AMD_MULTIPLE (m_ATHLON_K8 | m_AMDFAM10 | m_BDVER | m_BTVER \
154 #define m_GENERIC (HOST_WIDE_INT_1U<<PROCESSOR_GENERIC)
156 const char* ix86_tune_feature_names
[X86_TUNE_LAST
] = {
158 #define DEF_TUNE(tune, name, selector) name,
159 #include "x86-tune.def"
163 /* Feature tests against the various tunings. */
164 unsigned char ix86_tune_features
[X86_TUNE_LAST
];
166 /* Feature tests against the various tunings used to create ix86_tune_features
167 based on the processor mask. */
168 static unsigned HOST_WIDE_INT initial_ix86_tune_features
[X86_TUNE_LAST
] = {
170 #define DEF_TUNE(tune, name, selector) selector,
171 #include "x86-tune.def"
175 /* Feature tests against the various architecture variations. */
176 unsigned char ix86_arch_features
[X86_ARCH_LAST
];
178 /* Return a string that documents the current -m options. The caller is
179 responsible for freeing the string. */
182 ix86_target_string (HOST_WIDE_INT isa
, HOST_WIDE_INT isa2
,
183 int flags
, int flags2
,
184 const char *arch
, const char *tune
,
185 enum fpmath_unit fpmath
, bool add_nl_p
, bool add_abi_p
)
187 struct ix86_target_opts
189 const char *option
; /* option string */
190 HOST_WIDE_INT mask
; /* isa mask options */
193 /* This table is ordered so that options like -msse4.2 that imply other
194 ISAs come first. Target string will be displayed in the same order. */
195 static struct ix86_target_opts isa2_opts
[] =
197 { "-mcx16", OPTION_MASK_ISA_CX16
},
198 { "-mvaes", OPTION_MASK_ISA_VAES
},
199 { "-mrdpid", OPTION_MASK_ISA_RDPID
},
200 { "-mpconfig", OPTION_MASK_ISA_PCONFIG
},
201 { "-mwbnoinvd", OPTION_MASK_ISA_WBNOINVD
},
202 { "-msgx", OPTION_MASK_ISA_SGX
},
203 { "-mavx5124vnniw", OPTION_MASK_ISA_AVX5124VNNIW
},
204 { "-mavx5124fmaps", OPTION_MASK_ISA_AVX5124FMAPS
},
205 { "-mhle", OPTION_MASK_ISA_HLE
},
206 { "-mmovbe", OPTION_MASK_ISA_MOVBE
},
207 { "-mclzero", OPTION_MASK_ISA_CLZERO
},
208 { "-mmwaitx", OPTION_MASK_ISA_MWAITX
},
209 { "-mmovdir64b", OPTION_MASK_ISA_MOVDIR64B
},
210 { "-mwaitpkg", OPTION_MASK_ISA_WAITPKG
},
211 { "-mcldemote", OPTION_MASK_ISA_CLDEMOTE
},
212 { "-mptwrite", OPTION_MASK_ISA_PTWRITE
},
213 { "-mavx512bf16", OPTION_MASK_ISA_AVX512BF16
}
215 static struct ix86_target_opts isa_opts
[] =
217 { "-mavx512vpopcntdq", OPTION_MASK_ISA_AVX512VPOPCNTDQ
},
218 { "-mavx512bitalg", OPTION_MASK_ISA_AVX512BITALG
},
219 { "-mvpclmulqdq", OPTION_MASK_ISA_VPCLMULQDQ
},
220 { "-mgfni", OPTION_MASK_ISA_GFNI
},
221 { "-mavx512vnni", OPTION_MASK_ISA_AVX512VNNI
},
222 { "-mavx512vbmi2", OPTION_MASK_ISA_AVX512VBMI2
},
223 { "-mavx512vbmi", OPTION_MASK_ISA_AVX512VBMI
},
224 { "-mavx512ifma", OPTION_MASK_ISA_AVX512IFMA
},
225 { "-mavx512vl", OPTION_MASK_ISA_AVX512VL
},
226 { "-mavx512bw", OPTION_MASK_ISA_AVX512BW
},
227 { "-mavx512dq", OPTION_MASK_ISA_AVX512DQ
},
228 { "-mavx512er", OPTION_MASK_ISA_AVX512ER
},
229 { "-mavx512pf", OPTION_MASK_ISA_AVX512PF
},
230 { "-mavx512cd", OPTION_MASK_ISA_AVX512CD
},
231 { "-mavx512f", OPTION_MASK_ISA_AVX512F
},
232 { "-mavx2", OPTION_MASK_ISA_AVX2
},
233 { "-mfma", OPTION_MASK_ISA_FMA
},
234 { "-mxop", OPTION_MASK_ISA_XOP
},
235 { "-mfma4", OPTION_MASK_ISA_FMA4
},
236 { "-mf16c", OPTION_MASK_ISA_F16C
},
237 { "-mavx", OPTION_MASK_ISA_AVX
},
238 /* { "-msse4" OPTION_MASK_ISA_SSE4 }, */
239 { "-msse4.2", OPTION_MASK_ISA_SSE4_2
},
240 { "-msse4.1", OPTION_MASK_ISA_SSE4_1
},
241 { "-msse4a", OPTION_MASK_ISA_SSE4A
},
242 { "-mssse3", OPTION_MASK_ISA_SSSE3
},
243 { "-msse3", OPTION_MASK_ISA_SSE3
},
244 { "-maes", OPTION_MASK_ISA_AES
},
245 { "-msha", OPTION_MASK_ISA_SHA
},
246 { "-mpclmul", OPTION_MASK_ISA_PCLMUL
},
247 { "-msse2", OPTION_MASK_ISA_SSE2
},
248 { "-msse", OPTION_MASK_ISA_SSE
},
249 { "-m3dnowa", OPTION_MASK_ISA_3DNOW_A
},
250 { "-m3dnow", OPTION_MASK_ISA_3DNOW
},
251 { "-mmmx", OPTION_MASK_ISA_MMX
},
252 { "-mrtm", OPTION_MASK_ISA_RTM
},
253 { "-mprfchw", OPTION_MASK_ISA_PRFCHW
},
254 { "-mrdseed", OPTION_MASK_ISA_RDSEED
},
255 { "-madx", OPTION_MASK_ISA_ADX
},
256 { "-mprefetchwt1", OPTION_MASK_ISA_PREFETCHWT1
},
257 { "-mclflushopt", OPTION_MASK_ISA_CLFLUSHOPT
},
258 { "-mxsaves", OPTION_MASK_ISA_XSAVES
},
259 { "-mxsavec", OPTION_MASK_ISA_XSAVEC
},
260 { "-mxsaveopt", OPTION_MASK_ISA_XSAVEOPT
},
261 { "-mxsave", OPTION_MASK_ISA_XSAVE
},
262 { "-mabm", OPTION_MASK_ISA_ABM
},
263 { "-mbmi", OPTION_MASK_ISA_BMI
},
264 { "-mbmi2", OPTION_MASK_ISA_BMI2
},
265 { "-mlzcnt", OPTION_MASK_ISA_LZCNT
},
266 { "-mtbm", OPTION_MASK_ISA_TBM
},
267 { "-mpopcnt", OPTION_MASK_ISA_POPCNT
},
268 { "-msahf", OPTION_MASK_ISA_SAHF
},
269 { "-mcrc32", OPTION_MASK_ISA_CRC32
},
270 { "-mfsgsbase", OPTION_MASK_ISA_FSGSBASE
},
271 { "-mrdrnd", OPTION_MASK_ISA_RDRND
},
272 { "-mpku", OPTION_MASK_ISA_PKU
},
273 { "-mlwp", OPTION_MASK_ISA_LWP
},
274 { "-mfxsr", OPTION_MASK_ISA_FXSR
},
275 { "-mclwb", OPTION_MASK_ISA_CLWB
},
276 { "-mshstk", OPTION_MASK_ISA_SHSTK
},
277 { "-mmovdiri", OPTION_MASK_ISA_MOVDIRI
}
281 static struct ix86_target_opts flag_opts
[] =
283 { "-m128bit-long-double", MASK_128BIT_LONG_DOUBLE
},
284 { "-mlong-double-128", MASK_LONG_DOUBLE_128
},
285 { "-mlong-double-64", MASK_LONG_DOUBLE_64
},
286 { "-m80387", MASK_80387
},
287 { "-maccumulate-outgoing-args", MASK_ACCUMULATE_OUTGOING_ARGS
},
288 { "-malign-double", MASK_ALIGN_DOUBLE
},
289 { "-mcld", MASK_CLD
},
290 { "-mfp-ret-in-387", MASK_FLOAT_RETURNS
},
291 { "-mieee-fp", MASK_IEEE_FP
},
292 { "-minline-all-stringops", MASK_INLINE_ALL_STRINGOPS
},
293 { "-minline-stringops-dynamically", MASK_INLINE_STRINGOPS_DYNAMICALLY
},
294 { "-mms-bitfields", MASK_MS_BITFIELD_LAYOUT
},
295 { "-mno-align-stringops", MASK_NO_ALIGN_STRINGOPS
},
296 { "-mno-fancy-math-387", MASK_NO_FANCY_MATH_387
},
297 { "-mno-push-args", MASK_NO_PUSH_ARGS
},
298 { "-mno-red-zone", MASK_NO_RED_ZONE
},
299 { "-momit-leaf-frame-pointer", MASK_OMIT_LEAF_FRAME_POINTER
},
300 { "-mrecip", MASK_RECIP
},
301 { "-mrtd", MASK_RTD
},
302 { "-msseregparm", MASK_SSEREGPARM
},
303 { "-mstack-arg-probe", MASK_STACK_PROBE
},
304 { "-mtls-direct-seg-refs", MASK_TLS_DIRECT_SEG_REFS
},
305 { "-mvect8-ret-in-mem", MASK_VECT8_RETURNS
},
306 { "-m8bit-idiv", MASK_USE_8BIT_IDIV
},
307 { "-mvzeroupper", MASK_VZEROUPPER
},
308 { "-mstv", MASK_STV
},
309 { "-mavx256-split-unaligned-load", MASK_AVX256_SPLIT_UNALIGNED_LOAD
},
310 { "-mavx256-split-unaligned-store", MASK_AVX256_SPLIT_UNALIGNED_STORE
},
311 { "-mcall-ms2sysv-xlogues", MASK_CALL_MS2SYSV_XLOGUES
}
314 /* Additional flag options. */
315 static struct ix86_target_opts flag2_opts
[] =
317 { "-mgeneral-regs-only", OPTION_MASK_GENERAL_REGS_ONLY
}
320 const char *opts
[ARRAY_SIZE (isa_opts
) + ARRAY_SIZE (isa2_opts
)
321 + ARRAY_SIZE (flag_opts
) + ARRAY_SIZE (flag2_opts
) + 6][2];
325 char flags_other
[40];
326 char flags2_other
[40];
336 memset (opts
, '\0', sizeof (opts
));
338 /* Add -march= option. */
341 opts
[num
][0] = "-march=";
342 opts
[num
++][1] = arch
;
345 /* Add -mtune= option. */
348 opts
[num
][0] = "-mtune=";
349 opts
[num
++][1] = tune
;
352 /* Add -m32/-m64/-mx32. */
355 if ((isa
& OPTION_MASK_ISA_64BIT
) != 0)
357 if ((isa
& OPTION_MASK_ABI_64
) != 0)
364 opts
[num
++][0] = abi
;
366 isa
&= ~(OPTION_MASK_ISA_64BIT
| OPTION_MASK_ABI_64
| OPTION_MASK_ABI_X32
);
368 /* Pick out the options in isa2 options. */
369 for (i
= 0; i
< ARRAY_SIZE (isa2_opts
); i
++)
371 if ((isa2
& isa2_opts
[i
].mask
) != 0)
373 opts
[num
++][0] = isa2_opts
[i
].option
;
374 isa2
&= ~ isa2_opts
[i
].mask
;
378 if (isa2
&& add_nl_p
)
380 opts
[num
++][0] = isa2_other
;
381 sprintf (isa2_other
, "(other isa2: %#" HOST_WIDE_INT_PRINT
"x)", isa2
);
384 /* Pick out the options in isa options. */
385 for (i
= 0; i
< ARRAY_SIZE (isa_opts
); i
++)
387 if ((isa
& isa_opts
[i
].mask
) != 0)
389 opts
[num
++][0] = isa_opts
[i
].option
;
390 isa
&= ~ isa_opts
[i
].mask
;
396 opts
[num
++][0] = isa_other
;
397 sprintf (isa_other
, "(other isa: %#" HOST_WIDE_INT_PRINT
"x)", isa
);
400 /* Add flag options. */
401 for (i
= 0; i
< ARRAY_SIZE (flag_opts
); i
++)
403 if ((flags
& flag_opts
[i
].mask
) != 0)
405 opts
[num
++][0] = flag_opts
[i
].option
;
406 flags
&= ~ flag_opts
[i
].mask
;
410 if (flags
&& add_nl_p
)
412 opts
[num
++][0] = flags_other
;
413 sprintf (flags_other
, "(other flags: %#x)", flags
);
416 /* Add additional flag options. */
417 for (i
= 0; i
< ARRAY_SIZE (flag2_opts
); i
++)
419 if ((flags2
& flag2_opts
[i
].mask
) != 0)
421 opts
[num
++][0] = flag2_opts
[i
].option
;
422 flags2
&= ~ flag2_opts
[i
].mask
;
426 if (flags2
&& add_nl_p
)
428 opts
[num
++][0] = flags2_other
;
429 sprintf (flags2_other
, "(other flags2: %#x)", flags2
);
432 /* Add -fpmath= option. */
435 opts
[num
][0] = "-mfpmath=";
436 switch ((int) fpmath
)
439 opts
[num
++][1] = "387";
443 opts
[num
++][1] = "sse";
446 case FPMATH_387
| FPMATH_SSE
:
447 opts
[num
++][1] = "sse+387";
459 gcc_assert (num
< ARRAY_SIZE (opts
));
461 /* Size the string. */
463 sep_len
= (add_nl_p
) ? 3 : 1;
464 for (i
= 0; i
< num
; i
++)
467 for (j
= 0; j
< 2; j
++)
469 len
+= strlen (opts
[i
][j
]);
472 /* Build the string. */
473 ret
= ptr
= (char *) xmalloc (len
);
476 for (i
= 0; i
< num
; i
++)
480 for (j
= 0; j
< 2; j
++)
481 len2
[j
] = (opts
[i
][j
]) ? strlen (opts
[i
][j
]) : 0;
488 if (add_nl_p
&& line_len
+ len2
[0] + len2
[1] > 70)
496 for (j
= 0; j
< 2; j
++)
499 memcpy (ptr
, opts
[i
][j
], len2
[j
]);
506 gcc_assert (ret
+ len
>= ptr
);
511 /* Function that is callable from the debugger to print the current
513 void ATTRIBUTE_UNUSED
514 ix86_debug_options (void)
516 char *opts
= ix86_target_string (ix86_isa_flags
, ix86_isa_flags2
,
517 target_flags
, ix86_target_flags
,
518 ix86_arch_string
,ix86_tune_string
,
519 ix86_fpmath
, true, true);
523 fprintf (stderr
, "%s\n\n", opts
);
527 fputs ("<no options>\n\n", stderr
);
532 /* Save the current options */
535 ix86_function_specific_save (struct cl_target_option
*ptr
,
536 struct gcc_options
*opts
)
538 ptr
->arch
= ix86_arch
;
539 ptr
->schedule
= ix86_schedule
;
540 ptr
->prefetch_sse
= x86_prefetch_sse
;
541 ptr
->tune
= ix86_tune
;
542 ptr
->branch_cost
= ix86_branch_cost
;
543 ptr
->tune_defaulted
= ix86_tune_defaulted
;
544 ptr
->arch_specified
= ix86_arch_specified
;
545 ptr
->x_ix86_isa_flags_explicit
= opts
->x_ix86_isa_flags_explicit
;
546 ptr
->x_ix86_isa_flags2_explicit
= opts
->x_ix86_isa_flags2_explicit
;
547 ptr
->x_recip_mask_explicit
= opts
->x_recip_mask_explicit
;
548 ptr
->x_ix86_arch_string
= opts
->x_ix86_arch_string
;
549 ptr
->x_ix86_tune_string
= opts
->x_ix86_tune_string
;
550 ptr
->x_ix86_cmodel
= opts
->x_ix86_cmodel
;
551 ptr
->x_ix86_abi
= opts
->x_ix86_abi
;
552 ptr
->x_ix86_asm_dialect
= opts
->x_ix86_asm_dialect
;
553 ptr
->x_ix86_branch_cost
= opts
->x_ix86_branch_cost
;
554 ptr
->x_ix86_dump_tunes
= opts
->x_ix86_dump_tunes
;
555 ptr
->x_ix86_force_align_arg_pointer
= opts
->x_ix86_force_align_arg_pointer
;
556 ptr
->x_ix86_force_drap
= opts
->x_ix86_force_drap
;
557 ptr
->x_ix86_incoming_stack_boundary_arg
= opts
->x_ix86_incoming_stack_boundary_arg
;
558 ptr
->x_ix86_pmode
= opts
->x_ix86_pmode
;
559 ptr
->x_ix86_preferred_stack_boundary_arg
= opts
->x_ix86_preferred_stack_boundary_arg
;
560 ptr
->x_ix86_recip_name
= opts
->x_ix86_recip_name
;
561 ptr
->x_ix86_regparm
= opts
->x_ix86_regparm
;
562 ptr
->x_ix86_section_threshold
= opts
->x_ix86_section_threshold
;
563 ptr
->x_ix86_sse2avx
= opts
->x_ix86_sse2avx
;
564 ptr
->x_ix86_stack_protector_guard
= opts
->x_ix86_stack_protector_guard
;
565 ptr
->x_ix86_stringop_alg
= opts
->x_ix86_stringop_alg
;
566 ptr
->x_ix86_tls_dialect
= opts
->x_ix86_tls_dialect
;
567 ptr
->x_ix86_tune_ctrl_string
= opts
->x_ix86_tune_ctrl_string
;
568 ptr
->x_ix86_tune_memcpy_strategy
= opts
->x_ix86_tune_memcpy_strategy
;
569 ptr
->x_ix86_tune_memset_strategy
= opts
->x_ix86_tune_memset_strategy
;
570 ptr
->x_ix86_tune_no_default
= opts
->x_ix86_tune_no_default
;
571 ptr
->x_ix86_veclibabi_type
= opts
->x_ix86_veclibabi_type
;
573 /* The fields are char but the variables are not; make sure the
574 values fit in the fields. */
575 gcc_assert (ptr
->arch
== ix86_arch
);
576 gcc_assert (ptr
->schedule
== ix86_schedule
);
577 gcc_assert (ptr
->tune
== ix86_tune
);
578 gcc_assert (ptr
->branch_cost
== ix86_branch_cost
);
581 /* Feature tests against the various architecture variations, used to create
582 ix86_arch_features based on the processor mask. */
583 static unsigned HOST_WIDE_INT initial_ix86_arch_features
[X86_ARCH_LAST
] = {
584 /* X86_ARCH_CMOV: Conditional move was added for pentiumpro. */
585 ~(m_386
| m_486
| m_PENT
| m_LAKEMONT
| m_K6
),
587 /* X86_ARCH_CMPXCHG: Compare and exchange was added for 80486. */
590 /* X86_ARCH_CMPXCHG8B: Compare and exchange 8 bytes was added for pentium. */
593 /* X86_ARCH_XADD: Exchange and add was added for 80486. */
596 /* X86_ARCH_BSWAP: Byteswap was added for 80486. */
600 /* This table must be in sync with enum processor_type in i386.h. */
601 static const struct processor_costs
*processor_cost_table
[] =
644 /* Guarantee that the array is aligned with enum processor_type. */
645 STATIC_ASSERT (ARRAY_SIZE (processor_cost_table
) == PROCESSOR_max
);
648 ix86_option_override_internal (bool main_args_p
,
649 struct gcc_options
*opts
,
650 struct gcc_options
*opts_set
);
652 set_ix86_tune_features (enum processor_type ix86_tune
, bool dump
);
654 /* Restore the current options */
657 ix86_function_specific_restore (struct gcc_options
*opts
,
658 struct cl_target_option
*ptr
)
660 enum processor_type old_tune
= ix86_tune
;
661 enum processor_type old_arch
= ix86_arch
;
662 unsigned HOST_WIDE_INT ix86_arch_mask
;
665 /* We don't change -fPIC. */
666 opts
->x_flag_pic
= flag_pic
;
668 ix86_arch
= (enum processor_type
) ptr
->arch
;
669 ix86_schedule
= (enum attr_cpu
) ptr
->schedule
;
670 ix86_tune
= (enum processor_type
) ptr
->tune
;
671 x86_prefetch_sse
= ptr
->prefetch_sse
;
672 opts
->x_ix86_branch_cost
= ptr
->branch_cost
;
673 ix86_tune_defaulted
= ptr
->tune_defaulted
;
674 ix86_arch_specified
= ptr
->arch_specified
;
675 opts
->x_ix86_isa_flags_explicit
= ptr
->x_ix86_isa_flags_explicit
;
676 opts
->x_ix86_isa_flags2_explicit
= ptr
->x_ix86_isa_flags2_explicit
;
677 opts
->x_recip_mask_explicit
= ptr
->x_recip_mask_explicit
;
678 opts
->x_ix86_arch_string
= ptr
->x_ix86_arch_string
;
679 opts
->x_ix86_tune_string
= ptr
->x_ix86_tune_string
;
680 opts
->x_ix86_cmodel
= ptr
->x_ix86_cmodel
;
681 opts
->x_ix86_abi
= ptr
->x_ix86_abi
;
682 opts
->x_ix86_asm_dialect
= ptr
->x_ix86_asm_dialect
;
683 opts
->x_ix86_branch_cost
= ptr
->x_ix86_branch_cost
;
684 opts
->x_ix86_dump_tunes
= ptr
->x_ix86_dump_tunes
;
685 opts
->x_ix86_force_align_arg_pointer
= ptr
->x_ix86_force_align_arg_pointer
;
686 opts
->x_ix86_force_drap
= ptr
->x_ix86_force_drap
;
687 opts
->x_ix86_incoming_stack_boundary_arg
= ptr
->x_ix86_incoming_stack_boundary_arg
;
688 opts
->x_ix86_pmode
= ptr
->x_ix86_pmode
;
689 opts
->x_ix86_preferred_stack_boundary_arg
= ptr
->x_ix86_preferred_stack_boundary_arg
;
690 opts
->x_ix86_recip_name
= ptr
->x_ix86_recip_name
;
691 opts
->x_ix86_regparm
= ptr
->x_ix86_regparm
;
692 opts
->x_ix86_section_threshold
= ptr
->x_ix86_section_threshold
;
693 opts
->x_ix86_sse2avx
= ptr
->x_ix86_sse2avx
;
694 opts
->x_ix86_stack_protector_guard
= ptr
->x_ix86_stack_protector_guard
;
695 opts
->x_ix86_stringop_alg
= ptr
->x_ix86_stringop_alg
;
696 opts
->x_ix86_tls_dialect
= ptr
->x_ix86_tls_dialect
;
697 opts
->x_ix86_tune_ctrl_string
= ptr
->x_ix86_tune_ctrl_string
;
698 opts
->x_ix86_tune_memcpy_strategy
= ptr
->x_ix86_tune_memcpy_strategy
;
699 opts
->x_ix86_tune_memset_strategy
= ptr
->x_ix86_tune_memset_strategy
;
700 opts
->x_ix86_tune_no_default
= ptr
->x_ix86_tune_no_default
;
701 opts
->x_ix86_veclibabi_type
= ptr
->x_ix86_veclibabi_type
;
702 ix86_tune_cost
= processor_cost_table
[ix86_tune
];
703 /* TODO: ix86_cost should be chosen at instruction or function granuality
704 so for cold code we use size_cost even in !optimize_size compilation. */
705 if (opts
->x_optimize_size
)
706 ix86_cost
= &ix86_size_cost
;
708 ix86_cost
= ix86_tune_cost
;
710 /* Recreate the arch feature tests if the arch changed */
711 if (old_arch
!= ix86_arch
)
713 ix86_arch_mask
= HOST_WIDE_INT_1U
<< ix86_arch
;
714 for (i
= 0; i
< X86_ARCH_LAST
; ++i
)
715 ix86_arch_features
[i
]
716 = !!(initial_ix86_arch_features
[i
] & ix86_arch_mask
);
719 /* Recreate the tune optimization tests */
720 if (old_tune
!= ix86_tune
)
721 set_ix86_tune_features (ix86_tune
, false);
724 /* Adjust target options after streaming them in. This is mainly about
725 reconciling them with global options. */
728 ix86_function_specific_post_stream_in (struct cl_target_option
*ptr
)
730 /* flag_pic is a global option, but ix86_cmodel is target saved option
731 partly computed from flag_pic. If flag_pic is on, adjust x_ix86_cmodel
732 for PIC, or error out. */
734 switch (ptr
->x_ix86_cmodel
)
737 ptr
->x_ix86_cmodel
= CM_SMALL_PIC
;
741 ptr
->x_ix86_cmodel
= CM_MEDIUM_PIC
;
745 ptr
->x_ix86_cmodel
= CM_LARGE_PIC
;
749 error ("code model %s does not support PIC mode", "kernel");
756 switch (ptr
->x_ix86_cmodel
)
759 ptr
->x_ix86_cmodel
= CM_SMALL
;
763 ptr
->x_ix86_cmodel
= CM_MEDIUM
;
767 ptr
->x_ix86_cmodel
= CM_LARGE
;
775 /* Print the current options */
778 ix86_function_specific_print (FILE *file
, int indent
,
779 struct cl_target_option
*ptr
)
782 = ix86_target_string (ptr
->x_ix86_isa_flags
, ptr
->x_ix86_isa_flags2
,
783 ptr
->x_target_flags
, ptr
->x_ix86_target_flags
,
784 NULL
, NULL
, ptr
->x_ix86_fpmath
, false, true);
786 gcc_assert (ptr
->arch
< PROCESSOR_max
);
787 fprintf (file
, "%*sarch = %d (%s)\n",
789 ptr
->arch
, processor_names
[ptr
->arch
]);
791 gcc_assert (ptr
->tune
< PROCESSOR_max
);
792 fprintf (file
, "%*stune = %d (%s)\n",
794 ptr
->tune
, processor_names
[ptr
->tune
]);
796 fprintf (file
, "%*sbranch_cost = %d\n", indent
, "", ptr
->branch_cost
);
800 fprintf (file
, "%*s%s\n", indent
, "", target_string
);
801 free (target_string
);
806 /* Inner function to process the attribute((target(...))), take an argument and
807 set the current options from the argument. If we have a list, recursively go
811 ix86_valid_target_attribute_inner_p (tree fndecl
, tree args
, char *p_strings
[],
812 struct gcc_options
*opts
,
813 struct gcc_options
*opts_set
,
814 struct gcc_options
*enum_opts_set
,
815 bool target_clone_attr
)
820 #define IX86_ATTR_ISA(S,O) { S, sizeof (S)-1, ix86_opt_isa, O, 0 }
821 #define IX86_ATTR_STR(S,O) { S, sizeof (S)-1, ix86_opt_str, O, 0 }
822 #define IX86_ATTR_ENUM(S,O) { S, sizeof (S)-1, ix86_opt_enum, O, 0 }
823 #define IX86_ATTR_YES(S,O,M) { S, sizeof (S)-1, ix86_opt_yes, O, M }
824 #define IX86_ATTR_NO(S,O,M) { S, sizeof (S)-1, ix86_opt_no, O, M }
840 enum ix86_opt_type type
;
845 IX86_ATTR_ISA ("pconfig", OPT_mpconfig
),
846 IX86_ATTR_ISA ("wbnoinvd", OPT_mwbnoinvd
),
847 IX86_ATTR_ISA ("sgx", OPT_msgx
),
848 IX86_ATTR_ISA ("avx5124fmaps", OPT_mavx5124fmaps
),
849 IX86_ATTR_ISA ("avx5124vnniw", OPT_mavx5124vnniw
),
850 IX86_ATTR_ISA ("avx512vpopcntdq", OPT_mavx512vpopcntdq
),
851 IX86_ATTR_ISA ("avx512vbmi2", OPT_mavx512vbmi2
),
852 IX86_ATTR_ISA ("avx512vnni", OPT_mavx512vnni
),
853 IX86_ATTR_ISA ("avx512bitalg", OPT_mavx512bitalg
),
855 IX86_ATTR_ISA ("avx512vbmi", OPT_mavx512vbmi
),
856 IX86_ATTR_ISA ("avx512ifma", OPT_mavx512ifma
),
857 IX86_ATTR_ISA ("avx512vl", OPT_mavx512vl
),
858 IX86_ATTR_ISA ("avx512bw", OPT_mavx512bw
),
859 IX86_ATTR_ISA ("avx512dq", OPT_mavx512dq
),
860 IX86_ATTR_ISA ("avx512er", OPT_mavx512er
),
861 IX86_ATTR_ISA ("avx512pf", OPT_mavx512pf
),
862 IX86_ATTR_ISA ("avx512cd", OPT_mavx512cd
),
863 IX86_ATTR_ISA ("avx512f", OPT_mavx512f
),
864 IX86_ATTR_ISA ("avx2", OPT_mavx2
),
865 IX86_ATTR_ISA ("fma", OPT_mfma
),
866 IX86_ATTR_ISA ("xop", OPT_mxop
),
867 IX86_ATTR_ISA ("fma4", OPT_mfma4
),
868 IX86_ATTR_ISA ("f16c", OPT_mf16c
),
869 IX86_ATTR_ISA ("avx", OPT_mavx
),
870 IX86_ATTR_ISA ("sse4", OPT_msse4
),
871 IX86_ATTR_ISA ("sse4.2", OPT_msse4_2
),
872 IX86_ATTR_ISA ("sse4.1", OPT_msse4_1
),
873 IX86_ATTR_ISA ("sse4a", OPT_msse4a
),
874 IX86_ATTR_ISA ("ssse3", OPT_mssse3
),
875 IX86_ATTR_ISA ("sse3", OPT_msse3
),
876 IX86_ATTR_ISA ("aes", OPT_maes
),
877 IX86_ATTR_ISA ("sha", OPT_msha
),
878 IX86_ATTR_ISA ("pclmul", OPT_mpclmul
),
879 IX86_ATTR_ISA ("sse2", OPT_msse2
),
880 IX86_ATTR_ISA ("sse", OPT_msse
),
881 IX86_ATTR_ISA ("3dnowa", OPT_m3dnowa
),
882 IX86_ATTR_ISA ("3dnow", OPT_m3dnow
),
883 IX86_ATTR_ISA ("mmx", OPT_mmmx
),
884 IX86_ATTR_ISA ("rtm", OPT_mrtm
),
885 IX86_ATTR_ISA ("prfchw", OPT_mprfchw
),
886 IX86_ATTR_ISA ("rdseed", OPT_mrdseed
),
887 IX86_ATTR_ISA ("adx", OPT_madx
),
888 IX86_ATTR_ISA ("prefetchwt1", OPT_mprefetchwt1
),
889 IX86_ATTR_ISA ("clflushopt", OPT_mclflushopt
),
890 IX86_ATTR_ISA ("xsaves", OPT_mxsaves
),
891 IX86_ATTR_ISA ("xsavec", OPT_mxsavec
),
892 IX86_ATTR_ISA ("xsaveopt", OPT_mxsaveopt
),
893 IX86_ATTR_ISA ("xsave", OPT_mxsave
),
894 IX86_ATTR_ISA ("abm", OPT_mabm
),
895 IX86_ATTR_ISA ("bmi", OPT_mbmi
),
896 IX86_ATTR_ISA ("bmi2", OPT_mbmi2
),
897 IX86_ATTR_ISA ("lzcnt", OPT_mlzcnt
),
898 IX86_ATTR_ISA ("tbm", OPT_mtbm
),
899 IX86_ATTR_ISA ("popcnt", OPT_mpopcnt
),
900 IX86_ATTR_ISA ("cx16", OPT_mcx16
),
901 IX86_ATTR_ISA ("sahf", OPT_msahf
),
902 IX86_ATTR_ISA ("movbe", OPT_mmovbe
),
903 IX86_ATTR_ISA ("crc32", OPT_mcrc32
),
904 IX86_ATTR_ISA ("fsgsbase", OPT_mfsgsbase
),
905 IX86_ATTR_ISA ("rdrnd", OPT_mrdrnd
),
906 IX86_ATTR_ISA ("mwaitx", OPT_mmwaitx
),
907 IX86_ATTR_ISA ("clzero", OPT_mclzero
),
908 IX86_ATTR_ISA ("pku", OPT_mpku
),
909 IX86_ATTR_ISA ("lwp", OPT_mlwp
),
910 IX86_ATTR_ISA ("hle", OPT_mhle
),
911 IX86_ATTR_ISA ("fxsr", OPT_mfxsr
),
912 IX86_ATTR_ISA ("clwb", OPT_mclwb
),
913 IX86_ATTR_ISA ("rdpid", OPT_mrdpid
),
914 IX86_ATTR_ISA ("gfni", OPT_mgfni
),
915 IX86_ATTR_ISA ("shstk", OPT_mshstk
),
916 IX86_ATTR_ISA ("vaes", OPT_mvaes
),
917 IX86_ATTR_ISA ("vpclmulqdq", OPT_mvpclmulqdq
),
918 IX86_ATTR_ISA ("movdiri", OPT_mmovdiri
),
919 IX86_ATTR_ISA ("movdir64b", OPT_mmovdir64b
),
920 IX86_ATTR_ISA ("waitpkg", OPT_mwaitpkg
),
921 IX86_ATTR_ISA ("cldemote", OPT_mcldemote
),
922 IX86_ATTR_ISA ("ptwrite", OPT_mptwrite
),
923 IX86_ATTR_ISA ("avx512bf16", OPT_mavx512bf16
),
926 IX86_ATTR_ENUM ("fpmath=", OPT_mfpmath_
),
929 IX86_ATTR_STR ("arch=", IX86_FUNCTION_SPECIFIC_ARCH
),
930 IX86_ATTR_STR ("tune=", IX86_FUNCTION_SPECIFIC_TUNE
),
933 IX86_ATTR_YES ("cld",
937 IX86_ATTR_NO ("fancy-math-387",
939 MASK_NO_FANCY_MATH_387
),
941 IX86_ATTR_YES ("ieee-fp",
945 IX86_ATTR_YES ("inline-all-stringops",
946 OPT_minline_all_stringops
,
947 MASK_INLINE_ALL_STRINGOPS
),
949 IX86_ATTR_YES ("inline-stringops-dynamically",
950 OPT_minline_stringops_dynamically
,
951 MASK_INLINE_STRINGOPS_DYNAMICALLY
),
953 IX86_ATTR_NO ("align-stringops",
954 OPT_mno_align_stringops
,
955 MASK_NO_ALIGN_STRINGOPS
),
957 IX86_ATTR_YES ("recip",
963 = fndecl
== NULL
? UNKNOWN_LOCATION
: DECL_SOURCE_LOCATION (fndecl
);
964 const char *attr_name
= target_clone_attr
? "target_clone" : "target";
966 /* If this is a list, recurse to get the options. */
967 if (TREE_CODE (args
) == TREE_LIST
)
971 for (; args
; args
= TREE_CHAIN (args
))
972 if (TREE_VALUE (args
)
973 && !ix86_valid_target_attribute_inner_p (fndecl
, TREE_VALUE (args
),
974 p_strings
, opts
, opts_set
,
982 else if (TREE_CODE (args
) != STRING_CST
)
984 error_at (loc
, "attribute %qs argument is not a string", attr_name
);
988 /* Handle multiple arguments separated by commas. */
989 next_optstr
= ASTRDUP (TREE_STRING_POINTER (args
));
991 while (next_optstr
&& *next_optstr
!= '\0')
993 char *p
= next_optstr
;
995 char *comma
= strchr (next_optstr
, ',');
1001 enum ix86_opt_type type
= ix86_opt_unknown
;
1007 len
= comma
- next_optstr
;
1008 next_optstr
= comma
+ 1;
1016 /* Recognize no-xxx. */
1017 if (len
> 3 && p
[0] == 'n' && p
[1] == 'o' && p
[2] == '-')
1026 /* Find the option. */
1029 for (i
= 0; i
< ARRAY_SIZE (attrs
); i
++)
1031 type
= attrs
[i
].type
;
1032 opt_len
= attrs
[i
].len
;
1033 if (ch
== attrs
[i
].string
[0]
1034 && ((type
!= ix86_opt_str
&& type
!= ix86_opt_enum
)
1037 && memcmp (p
, attrs
[i
].string
, opt_len
) == 0)
1040 mask
= attrs
[i
].mask
;
1045 /* Process the option. */
1048 error_at (loc
, "attribute %qs argument %qs is unknown",
1053 else if (type
== ix86_opt_isa
)
1055 struct cl_decoded_option decoded
;
1057 generate_option (opt
, NULL
, opt_set_p
, CL_TARGET
, &decoded
);
1058 ix86_handle_option (opts
, opts_set
,
1059 &decoded
, input_location
);
1062 else if (type
== ix86_opt_yes
|| type
== ix86_opt_no
)
1064 if (type
== ix86_opt_no
)
1065 opt_set_p
= !opt_set_p
;
1068 opts
->x_target_flags
|= mask
;
1070 opts
->x_target_flags
&= ~mask
;
1073 else if (type
== ix86_opt_str
)
1077 error_at (loc
, "attribute value %qs was already specified "
1078 "in %qs attribute", orig_p
, attr_name
);
1082 p_strings
[opt
] = xstrdup (p
+ opt_len
);
1085 else if (type
== ix86_opt_enum
)
1090 arg_ok
= opt_enum_arg_to_value (opt
, p
+ opt_len
, &value
, CL_TARGET
);
1092 set_option (opts
, enum_opts_set
, opt
, value
,
1093 p
+ opt_len
, DK_UNSPECIFIED
, input_location
,
1097 error_at (loc
, "attribute value %qs is unknown in %qs attribute",
1110 /* Release allocated strings. */
1112 release_options_strings (char **option_strings
)
1114 /* Free up memory allocated to hold the strings */
1115 for (unsigned i
= 0; i
< IX86_FUNCTION_SPECIFIC_MAX
; i
++)
1116 free (option_strings
[i
]);
1119 /* Return a TARGET_OPTION_NODE tree of the target options listed or NULL. */
1122 ix86_valid_target_attribute_tree (tree fndecl
, tree args
,
1123 struct gcc_options
*opts
,
1124 struct gcc_options
*opts_set
,
1125 bool target_clone_attr
)
1127 const char *orig_arch_string
= opts
->x_ix86_arch_string
;
1128 const char *orig_tune_string
= opts
->x_ix86_tune_string
;
1129 enum fpmath_unit orig_fpmath_set
= opts_set
->x_ix86_fpmath
;
1130 int orig_tune_defaulted
= ix86_tune_defaulted
;
1131 int orig_arch_specified
= ix86_arch_specified
;
1132 char *option_strings
[IX86_FUNCTION_SPECIFIC_MAX
] = { NULL
, NULL
};
1134 struct cl_target_option
*def
1135 = TREE_TARGET_OPTION (target_option_default_node
);
1136 struct gcc_options enum_opts_set
;
1138 memset (&enum_opts_set
, 0, sizeof (enum_opts_set
));
1140 /* Process each of the options on the chain. */
1141 if (!ix86_valid_target_attribute_inner_p (fndecl
, args
, option_strings
, opts
,
1142 opts_set
, &enum_opts_set
,
1144 return error_mark_node
;
1146 /* If the changed options are different from the default, rerun
1147 ix86_option_override_internal, and then save the options away.
1148 The string options are attribute options, and will be undone
1149 when we copy the save structure. */
1150 if (opts
->x_ix86_isa_flags
!= def
->x_ix86_isa_flags
1151 || opts
->x_ix86_isa_flags2
!= def
->x_ix86_isa_flags2
1152 || opts
->x_target_flags
!= def
->x_target_flags
1153 || option_strings
[IX86_FUNCTION_SPECIFIC_ARCH
]
1154 || option_strings
[IX86_FUNCTION_SPECIFIC_TUNE
]
1155 || enum_opts_set
.x_ix86_fpmath
)
1157 /* If we are using the default tune= or arch=, undo the string assigned,
1158 and use the default. */
1159 if (option_strings
[IX86_FUNCTION_SPECIFIC_ARCH
])
1161 opts
->x_ix86_arch_string
1162 = ggc_strdup (option_strings
[IX86_FUNCTION_SPECIFIC_ARCH
]);
1164 /* If arch= is set, clear all bits in x_ix86_isa_flags,
1165 except for ISA_64BIT, ABI_64, ABI_X32, and CODE16. */
1166 opts
->x_ix86_isa_flags
&= (OPTION_MASK_ISA_64BIT
1167 | OPTION_MASK_ABI_64
1168 | OPTION_MASK_ABI_X32
1169 | OPTION_MASK_CODE16
);
1170 opts
->x_ix86_isa_flags2
= 0;
1172 else if (!orig_arch_specified
)
1173 opts
->x_ix86_arch_string
= NULL
;
1175 if (option_strings
[IX86_FUNCTION_SPECIFIC_TUNE
])
1176 opts
->x_ix86_tune_string
1177 = ggc_strdup (option_strings
[IX86_FUNCTION_SPECIFIC_TUNE
]);
1178 else if (orig_tune_defaulted
)
1179 opts
->x_ix86_tune_string
= NULL
;
1181 /* If fpmath= is not set, and we now have sse2 on 32-bit, use it. */
1182 if (enum_opts_set
.x_ix86_fpmath
)
1183 opts_set
->x_ix86_fpmath
= (enum fpmath_unit
) 1;
1185 /* Do any overrides, such as arch=xxx, or tune=xxx support. */
1186 bool r
= ix86_option_override_internal (false, opts
, opts_set
);
1189 release_options_strings (option_strings
);
1190 return error_mark_node
;
1193 /* Add any builtin functions with the new isa if any. */
1194 ix86_add_new_builtins (opts
->x_ix86_isa_flags
, opts
->x_ix86_isa_flags2
);
1196 /* Save the current options unless we are validating options for
1198 t
= build_target_option_node (opts
);
1200 opts
->x_ix86_arch_string
= orig_arch_string
;
1201 opts
->x_ix86_tune_string
= orig_tune_string
;
1202 opts_set
->x_ix86_fpmath
= orig_fpmath_set
;
1204 release_options_strings (option_strings
);
1210 /* Hook to validate attribute((target("string"))). */
1213 ix86_valid_target_attribute_p (tree fndecl
,
1214 tree
ARG_UNUSED (name
),
1218 struct gcc_options func_options
;
1219 tree new_target
, new_optimize
;
1222 /* attribute((target("default"))) does nothing, beyond
1223 affecting multi-versioning. */
1224 if (TREE_VALUE (args
)
1225 && TREE_CODE (TREE_VALUE (args
)) == STRING_CST
1226 && TREE_CHAIN (args
) == NULL_TREE
1227 && strcmp (TREE_STRING_POINTER (TREE_VALUE (args
)), "default") == 0)
1230 tree old_optimize
= build_optimization_node (&global_options
);
1232 /* Get the optimization options of the current function. */
1233 tree func_optimize
= DECL_FUNCTION_SPECIFIC_OPTIMIZATION (fndecl
);
1236 func_optimize
= old_optimize
;
1238 /* Init func_options. */
1239 memset (&func_options
, 0, sizeof (func_options
));
1240 init_options_struct (&func_options
, NULL
);
1241 lang_hooks
.init_options_struct (&func_options
);
1243 cl_optimization_restore (&func_options
,
1244 TREE_OPTIMIZATION (func_optimize
));
1246 /* Initialize func_options to the default before its target options can
1248 cl_target_option_restore (&func_options
,
1249 TREE_TARGET_OPTION (target_option_default_node
));
1251 /* FLAGS == 1 is used for target_clones attribute. */
1253 = ix86_valid_target_attribute_tree (fndecl
, args
, &func_options
,
1254 &global_options_set
, flags
== 1);
1256 new_optimize
= build_optimization_node (&func_options
);
1258 if (new_target
== error_mark_node
)
1261 else if (fndecl
&& new_target
)
1263 DECL_FUNCTION_SPECIFIC_TARGET (fndecl
) = new_target
;
1265 if (old_optimize
!= new_optimize
)
1266 DECL_FUNCTION_SPECIFIC_OPTIMIZATION (fndecl
) = new_optimize
;
1269 finalize_options_struct (&func_options
);
1274 const char *stringop_alg_names
[] = {
1276 #define DEF_ALG(alg, name) #name,
1277 #include "stringop.def"
1282 /* Parse parameter string passed to -mmemcpy-strategy= or -mmemset-strategy=.
1283 The string is of the following form (or comma separated list of it):
1285 strategy_alg:max_size:[align|noalign]
1287 where the full size range for the strategy is either [0, max_size] or
1288 [min_size, max_size], in which min_size is the max_size + 1 of the
1289 preceding range. The last size range must have max_size == -1.
1294 -mmemcpy-strategy=libcall:-1:noalign
1296 this is equivalent to (for known size memcpy) -mstringop-strategy=libcall
1300 -mmemset-strategy=rep_8byte:16:noalign,vector_loop:2048:align,libcall:-1:noalign
1302 This is to tell the compiler to use the following strategy for memset
1303 1) when the expected size is between [1, 16], use rep_8byte strategy;
1304 2) when the size is between [17, 2048], use vector_loop;
1305 3) when the size is > 2048, use libcall. */
1307 struct stringop_size_range
1315 ix86_parse_stringop_strategy_string (char *strategy_str
, bool is_memset
)
1317 const struct stringop_algs
*default_algs
;
1318 stringop_size_range input_ranges
[MAX_STRINGOP_ALGS
];
1319 char *curr_range_str
, *next_range_str
;
1320 const char *opt
= is_memset
? "-mmemset_strategy=" : "-mmemcpy_strategy=";
1324 default_algs
= &ix86_cost
->memset
[TARGET_64BIT
!= 0];
1326 default_algs
= &ix86_cost
->memcpy
[TARGET_64BIT
!= 0];
1328 curr_range_str
= strategy_str
;
1335 next_range_str
= strchr (curr_range_str
, ',');
1337 *next_range_str
++ = '\0';
1339 if (sscanf (curr_range_str
, "%20[^:]:%d:%10s", alg_name
, &maxs
,
1342 error ("wrong argument %qs to option %qs", curr_range_str
, opt
);
1346 if (n
> 0 && (maxs
< (input_ranges
[n
- 1].max
+ 1) && maxs
!= -1))
1348 error ("size ranges of option %qs should be increasing", opt
);
1352 for (i
= 0; i
< last_alg
; i
++)
1353 if (!strcmp (alg_name
, stringop_alg_names
[i
]))
1358 error ("wrong strategy name %qs specified for option %qs",
1361 auto_vec
<const char *> candidates
;
1362 for (i
= 0; i
< last_alg
; i
++)
1363 if ((stringop_alg
) i
!= rep_prefix_8_byte
|| TARGET_64BIT
)
1364 candidates
.safe_push (stringop_alg_names
[i
]);
1368 = candidates_list_and_hint (alg_name
, s
, candidates
);
1370 inform (input_location
,
1371 "valid arguments to %qs are: %s; did you mean %qs?",
1374 inform (input_location
, "valid arguments to %qs are: %s",
1380 if ((stringop_alg
) i
== rep_prefix_8_byte
1383 /* rep; movq isn't available in 32-bit code. */
1384 error ("strategy name %qs specified for option %qs "
1385 "not supported for 32-bit code", alg_name
, opt
);
1389 input_ranges
[n
].max
= maxs
;
1390 input_ranges
[n
].alg
= (stringop_alg
) i
;
1391 if (!strcmp (align
, "align"))
1392 input_ranges
[n
].noalign
= false;
1393 else if (!strcmp (align
, "noalign"))
1394 input_ranges
[n
].noalign
= true;
1397 error ("unknown alignment %qs specified for option %qs", align
, opt
);
1401 curr_range_str
= next_range_str
;
1403 while (curr_range_str
);
1405 if (input_ranges
[n
- 1].max
!= -1)
1407 error ("the max value for the last size range should be -1"
1408 " for option %qs", opt
);
1412 if (n
> MAX_STRINGOP_ALGS
)
1414 error ("too many size ranges specified in option %qs", opt
);
1418 /* Now override the default algs array. */
1419 for (i
= 0; i
< n
; i
++)
1421 *const_cast<int *>(&default_algs
->size
[i
].max
) = input_ranges
[i
].max
;
1422 *const_cast<stringop_alg
*>(&default_algs
->size
[i
].alg
)
1423 = input_ranges
[i
].alg
;
1424 *const_cast<int *>(&default_algs
->size
[i
].noalign
)
1425 = input_ranges
[i
].noalign
;
1430 /* parse -mtune-ctrl= option. When DUMP is true,
1431 print the features that are explicitly set. */
1434 parse_mtune_ctrl_str (bool dump
)
1436 if (!ix86_tune_ctrl_string
)
1439 char *next_feature_string
= NULL
;
1440 char *curr_feature_string
= xstrdup (ix86_tune_ctrl_string
);
1441 char *orig
= curr_feature_string
;
1447 next_feature_string
= strchr (curr_feature_string
, ',');
1448 if (next_feature_string
)
1449 *next_feature_string
++ = '\0';
1450 if (*curr_feature_string
== '^')
1452 curr_feature_string
++;
1455 for (i
= 0; i
< X86_TUNE_LAST
; i
++)
1457 if (!strcmp (curr_feature_string
, ix86_tune_feature_names
[i
]))
1459 ix86_tune_features
[i
] = !clear
;
1461 fprintf (stderr
, "Explicitly %s feature %s\n",
1462 clear
? "clear" : "set", ix86_tune_feature_names
[i
]);
1466 if (i
== X86_TUNE_LAST
)
1467 error ("unknown parameter to option %<-mtune-ctrl%>: %s",
1468 clear
? curr_feature_string
- 1 : curr_feature_string
);
1469 curr_feature_string
= next_feature_string
;
1471 while (curr_feature_string
);
1475 /* Helper function to set ix86_tune_features. IX86_TUNE is the
1479 set_ix86_tune_features (enum processor_type ix86_tune
, bool dump
)
1481 unsigned HOST_WIDE_INT ix86_tune_mask
= HOST_WIDE_INT_1U
<< ix86_tune
;
1484 for (i
= 0; i
< X86_TUNE_LAST
; ++i
)
1486 if (ix86_tune_no_default
)
1487 ix86_tune_features
[i
] = 0;
1489 ix86_tune_features
[i
]
1490 = !!(initial_ix86_tune_features
[i
] & ix86_tune_mask
);
1495 fprintf (stderr
, "List of x86 specific tuning parameter names:\n");
1496 for (i
= 0; i
< X86_TUNE_LAST
; i
++)
1497 fprintf (stderr
, "%s : %s\n", ix86_tune_feature_names
[i
],
1498 ix86_tune_features
[i
] ? "on" : "off");
1501 parse_mtune_ctrl_str (dump
);
1505 /* Default align_* from the processor table. */
1508 ix86_default_align (struct gcc_options
*opts
)
1510 /* -falign-foo without argument: supply one. */
1511 if (opts
->x_flag_align_loops
&& !opts
->x_str_align_loops
)
1512 opts
->x_str_align_loops
= processor_cost_table
[ix86_tune
]->align_loop
;
1513 if (opts
->x_flag_align_jumps
&& !opts
->x_str_align_jumps
)
1514 opts
->x_str_align_jumps
= processor_cost_table
[ix86_tune
]->align_jump
;
1515 if (opts
->x_flag_align_labels
&& !opts
->x_str_align_labels
)
1516 opts
->x_str_align_labels
= processor_cost_table
[ix86_tune
]->align_label
;
1517 if (opts
->x_flag_align_functions
&& !opts
->x_str_align_functions
)
1518 opts
->x_str_align_functions
= processor_cost_table
[ix86_tune
]->align_func
;
1521 /* Implement TARGET_OVERRIDE_OPTIONS_AFTER_CHANGE hook. */
1524 ix86_override_options_after_change (void)
1526 ix86_default_align (&global_options
);
1529 /* Clear stack slot assignments remembered from previous functions.
1530 This is called from INIT_EXPANDERS once before RTL is emitted for each
1533 static struct machine_function
*
1534 ix86_init_machine_status (void)
1536 struct machine_function
*f
;
1538 f
= ggc_cleared_alloc
<machine_function
> ();
1539 f
->call_abi
= ix86_abi
;
1544 /* Override various settings based on options. If MAIN_ARGS_P, the
1545 options are from the command line, otherwise they are from
1546 attributes. Return true if there's an error related to march
1550 ix86_option_override_internal (bool main_args_p
,
1551 struct gcc_options
*opts
,
1552 struct gcc_options
*opts_set
)
1555 unsigned HOST_WIDE_INT ix86_arch_mask
;
1556 const bool ix86_tune_specified
= (opts
->x_ix86_tune_string
!= NULL
);
1558 /* -mrecip options. */
1561 const char *string
; /* option name */
1562 unsigned int mask
; /* mask bits to set */
1564 const recip_options
[] =
1566 { "all", RECIP_MASK_ALL
},
1567 { "none", RECIP_MASK_NONE
},
1568 { "div", RECIP_MASK_DIV
},
1569 { "sqrt", RECIP_MASK_SQRT
},
1570 { "vec-div", RECIP_MASK_VEC_DIV
},
1571 { "vec-sqrt", RECIP_MASK_VEC_SQRT
},
1575 /* Turn off both OPTION_MASK_ABI_64 and OPTION_MASK_ABI_X32 if
1576 TARGET_64BIT_DEFAULT is true and TARGET_64BIT is false. */
1577 if (TARGET_64BIT_DEFAULT
&& !TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
1578 opts
->x_ix86_isa_flags
&= ~(OPTION_MASK_ABI_64
| OPTION_MASK_ABI_X32
);
1579 #ifdef TARGET_BI_ARCH
1582 #if TARGET_BI_ARCH == 1
1583 /* When TARGET_BI_ARCH == 1, by default, OPTION_MASK_ABI_64
1584 is on and OPTION_MASK_ABI_X32 is off. We turn off
1585 OPTION_MASK_ABI_64 if OPTION_MASK_ABI_X32 is turned on by
1587 if (TARGET_X32_P (opts
->x_ix86_isa_flags
))
1588 opts
->x_ix86_isa_flags
&= ~OPTION_MASK_ABI_64
;
1590 /* When TARGET_BI_ARCH == 2, by default, OPTION_MASK_ABI_X32 is
1591 on and OPTION_MASK_ABI_64 is off. We turn off
1592 OPTION_MASK_ABI_X32 if OPTION_MASK_ABI_64 is turned on by
1593 -m64 or OPTION_MASK_CODE16 is turned on by -m16. */
1594 if (TARGET_LP64_P (opts
->x_ix86_isa_flags
)
1595 || TARGET_16BIT_P (opts
->x_ix86_isa_flags
))
1596 opts
->x_ix86_isa_flags
&= ~OPTION_MASK_ABI_X32
;
1598 if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
)
1599 && TARGET_IAMCU_P (opts
->x_target_flags
))
1600 sorry ("Intel MCU psABI isn%'t supported in %s mode",
1601 TARGET_X32_P (opts
->x_ix86_isa_flags
) ? "x32" : "64-bit");
1605 if (TARGET_X32_P (opts
->x_ix86_isa_flags
))
1607 /* Always turn on OPTION_MASK_ISA_64BIT and turn off
1608 OPTION_MASK_ABI_64 for TARGET_X32. */
1609 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_64BIT
;
1610 opts
->x_ix86_isa_flags
&= ~OPTION_MASK_ABI_64
;
1612 else if (TARGET_16BIT_P (opts
->x_ix86_isa_flags
))
1613 opts
->x_ix86_isa_flags
&= ~(OPTION_MASK_ISA_64BIT
1614 | OPTION_MASK_ABI_X32
1615 | OPTION_MASK_ABI_64
);
1616 else if (TARGET_LP64_P (opts
->x_ix86_isa_flags
))
1618 /* Always turn on OPTION_MASK_ISA_64BIT and turn off
1619 OPTION_MASK_ABI_X32 for TARGET_LP64. */
1620 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_64BIT
;
1621 opts
->x_ix86_isa_flags
&= ~OPTION_MASK_ABI_X32
;
1624 #ifdef SUBTARGET_OVERRIDE_OPTIONS
1625 SUBTARGET_OVERRIDE_OPTIONS
;
1628 #ifdef SUBSUBTARGET_OVERRIDE_OPTIONS
1629 SUBSUBTARGET_OVERRIDE_OPTIONS
;
1632 /* -fPIC is the default for x86_64. */
1633 if (TARGET_MACHO
&& TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
1634 opts
->x_flag_pic
= 2;
1636 /* Need to check -mtune=generic first. */
1637 if (opts
->x_ix86_tune_string
)
1639 /* As special support for cross compilers we read -mtune=native
1640 as -mtune=generic. With native compilers we won't see the
1641 -mtune=native, as it was changed by the driver. */
1642 if (!strcmp (opts
->x_ix86_tune_string
, "native"))
1644 opts
->x_ix86_tune_string
= "generic";
1646 else if (!strcmp (opts
->x_ix86_tune_string
, "x86-64"))
1647 warning (OPT_Wdeprecated
,
1649 ? G_("%<-mtune=x86-64%> is deprecated; use %<-mtune=k8%> "
1650 "or %<-mtune=generic%> instead as appropriate")
1651 : G_("%<target(\"tune=x86-64\")%> is deprecated; use "
1652 "%<target(\"tune=k8\")%> or %<target(\"tune=generic\")%>"
1653 " instead as appropriate"));
1657 if (opts
->x_ix86_arch_string
)
1658 opts
->x_ix86_tune_string
= opts
->x_ix86_arch_string
;
1659 if (!opts
->x_ix86_tune_string
)
1661 opts
->x_ix86_tune_string
= processor_names
[TARGET_CPU_DEFAULT
];
1662 ix86_tune_defaulted
= 1;
1665 /* opts->x_ix86_tune_string is set to opts->x_ix86_arch_string
1666 or defaulted. We need to use a sensible tune option. */
1667 if (!strcmp (opts
->x_ix86_tune_string
, "x86-64"))
1669 opts
->x_ix86_tune_string
= "generic";
1673 if (opts
->x_ix86_stringop_alg
== rep_prefix_8_byte
1674 && !TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
1676 /* rep; movq isn't available in 32-bit code. */
1677 error ("%<-mstringop-strategy=rep_8byte%> not supported for 32-bit code");
1678 opts
->x_ix86_stringop_alg
= no_stringop
;
1681 if (!opts
->x_ix86_arch_string
)
1682 opts
->x_ix86_arch_string
1683 = TARGET_64BIT_P (opts
->x_ix86_isa_flags
)
1684 ? "x86-64" : SUBTARGET32_DEFAULT_CPU
;
1686 ix86_arch_specified
= 1;
1688 if (opts_set
->x_ix86_pmode
)
1690 if ((TARGET_LP64_P (opts
->x_ix86_isa_flags
)
1691 && opts
->x_ix86_pmode
== PMODE_SI
)
1692 || (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
)
1693 && opts
->x_ix86_pmode
== PMODE_DI
))
1694 error ("address mode %qs not supported in the %s bit mode",
1695 TARGET_64BIT_P (opts
->x_ix86_isa_flags
) ? "short" : "long",
1696 TARGET_64BIT_P (opts
->x_ix86_isa_flags
) ? "64" : "32");
1699 opts
->x_ix86_pmode
= TARGET_LP64_P (opts
->x_ix86_isa_flags
)
1700 ? PMODE_DI
: PMODE_SI
;
1702 if (!opts_set
->x_ix86_abi
)
1703 opts
->x_ix86_abi
= DEFAULT_ABI
;
1705 if (opts
->x_ix86_abi
== MS_ABI
&& TARGET_X32_P (opts
->x_ix86_isa_flags
))
1706 error ("%<-mabi=ms%> not supported with X32 ABI");
1707 gcc_assert (opts
->x_ix86_abi
== SYSV_ABI
|| opts
->x_ix86_abi
== MS_ABI
);
1709 const char *abi_name
= opts
->x_ix86_abi
== MS_ABI
? "ms" : "sysv";
1710 if ((opts
->x_flag_sanitize
& SANITIZE_USER_ADDRESS
)
1711 && opts
->x_ix86_abi
!= DEFAULT_ABI
)
1712 error ("%<-mabi=%s%> not supported with %<-fsanitize=address%>", abi_name
);
1713 if ((opts
->x_flag_sanitize
& SANITIZE_KERNEL_ADDRESS
)
1714 && opts
->x_ix86_abi
!= DEFAULT_ABI
)
1715 error ("%<-mabi=%s%> not supported with %<-fsanitize=kernel-address%>",
1717 if ((opts
->x_flag_sanitize
& SANITIZE_THREAD
)
1718 && opts
->x_ix86_abi
!= DEFAULT_ABI
)
1719 error ("%<-mabi=%s%> not supported with %<-fsanitize=thread%>", abi_name
);
1721 /* For targets using ms ABI enable ms-extensions, if not
1722 explicit turned off. For non-ms ABI we turn off this
1724 if (!opts_set
->x_flag_ms_extensions
)
1725 opts
->x_flag_ms_extensions
= (MS_ABI
== DEFAULT_ABI
);
1727 if (opts_set
->x_ix86_cmodel
)
1729 switch (opts
->x_ix86_cmodel
)
1733 if (opts
->x_flag_pic
)
1734 opts
->x_ix86_cmodel
= CM_SMALL_PIC
;
1735 if (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
1736 error ("code model %qs not supported in the %s bit mode",
1742 if (opts
->x_flag_pic
)
1743 opts
->x_ix86_cmodel
= CM_MEDIUM_PIC
;
1744 if (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
1745 error ("code model %qs not supported in the %s bit mode",
1747 else if (TARGET_X32_P (opts
->x_ix86_isa_flags
))
1748 error ("code model %qs not supported in x32 mode",
1754 if (opts
->x_flag_pic
)
1755 opts
->x_ix86_cmodel
= CM_LARGE_PIC
;
1756 if (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
1757 error ("code model %qs not supported in the %s bit mode",
1759 else if (TARGET_X32_P (opts
->x_ix86_isa_flags
))
1760 error ("code model %qs not supported in x32 mode",
1765 if (opts
->x_flag_pic
)
1766 error ("code model %s does not support PIC mode", "32");
1767 if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
1768 error ("code model %qs not supported in the %s bit mode",
1773 if (opts
->x_flag_pic
)
1775 error ("code model %s does not support PIC mode", "kernel");
1776 opts
->x_ix86_cmodel
= CM_32
;
1778 if (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
1779 error ("code model %qs not supported in the %s bit mode",
1789 /* For TARGET_64BIT and MS_ABI, force pic on, in order to enable the
1790 use of rip-relative addressing. This eliminates fixups that
1791 would otherwise be needed if this object is to be placed in a
1792 DLL, and is essentially just as efficient as direct addressing. */
1793 if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
)
1794 && (TARGET_RDOS
|| TARGET_PECOFF
))
1795 opts
->x_ix86_cmodel
= CM_MEDIUM_PIC
, opts
->x_flag_pic
= 1;
1796 else if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
1797 opts
->x_ix86_cmodel
= opts
->x_flag_pic
? CM_SMALL_PIC
: CM_SMALL
;
1799 opts
->x_ix86_cmodel
= CM_32
;
1801 if (TARGET_MACHO
&& opts
->x_ix86_asm_dialect
== ASM_INTEL
)
1803 error ("%<-masm=intel%> not supported in this configuration");
1804 opts
->x_ix86_asm_dialect
= ASM_ATT
;
1806 if ((TARGET_64BIT_P (opts
->x_ix86_isa_flags
) != 0)
1807 != ((opts
->x_ix86_isa_flags
& OPTION_MASK_ISA_64BIT
) != 0))
1808 sorry ("%i-bit mode not compiled in",
1809 (opts
->x_ix86_isa_flags
& OPTION_MASK_ISA_64BIT
) ? 64 : 32);
1811 for (i
= 0; i
< pta_size
; i
++)
1812 if (! strcmp (opts
->x_ix86_arch_string
, processor_alias_table
[i
].name
))
1814 if (!strcmp (opts
->x_ix86_arch_string
, "generic"))
1817 ? G_("%<generic%> CPU can be used only for %<-mtune=%> "
1819 : G_("%<generic%> CPU can be used only for "
1820 "%<target(\"tune=\")%> attribute"));
1823 else if (!strcmp (opts
->x_ix86_arch_string
, "intel"))
1826 ? G_("%<intel%> CPU can be used only for %<-mtune=%> "
1828 : G_("%<intel%> CPU can be used only for "
1829 "%<target(\"tune=\")%> attribute"));
1833 if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
)
1834 && !((processor_alias_table
[i
].flags
& PTA_64BIT
) != 0))
1836 error ("CPU you selected does not support x86-64 "
1841 ix86_schedule
= processor_alias_table
[i
].schedule
;
1842 ix86_arch
= processor_alias_table
[i
].processor
;
1843 /* Default cpu tuning to the architecture. */
1844 ix86_tune
= ix86_arch
;
1846 if (((processor_alias_table
[i
].flags
& PTA_MMX
) != 0)
1847 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_MMX
))
1848 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_MMX
;
1849 if (((processor_alias_table
[i
].flags
& PTA_3DNOW
) != 0)
1850 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_3DNOW
))
1851 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_3DNOW
;
1852 if (((processor_alias_table
[i
].flags
& PTA_3DNOW_A
) != 0)
1853 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_3DNOW_A
))
1854 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_3DNOW_A
;
1855 if (((processor_alias_table
[i
].flags
& PTA_SSE
) != 0)
1856 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_SSE
))
1857 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_SSE
;
1858 if (((processor_alias_table
[i
].flags
& PTA_SSE2
) != 0)
1859 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_SSE2
))
1860 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_SSE2
;
1861 if (((processor_alias_table
[i
].flags
& PTA_SSE3
) != 0)
1862 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_SSE3
))
1863 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_SSE3
;
1864 if (((processor_alias_table
[i
].flags
& PTA_SSSE3
) != 0)
1865 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_SSSE3
))
1866 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_SSSE3
;
1867 if (((processor_alias_table
[i
].flags
& PTA_SSE4_1
) != 0)
1868 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_SSE4_1
))
1869 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_SSE4_1
;
1870 if (((processor_alias_table
[i
].flags
& PTA_SSE4_2
) != 0)
1871 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_SSE4_2
))
1872 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_SSE4_2
;
1873 if (((processor_alias_table
[i
].flags
& PTA_AVX
) != 0)
1874 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX
))
1875 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX
;
1876 if (((processor_alias_table
[i
].flags
& PTA_AVX2
) != 0)
1877 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX2
))
1878 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX2
;
1879 if (((processor_alias_table
[i
].flags
& PTA_FMA
) != 0)
1880 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_FMA
))
1881 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_FMA
;
1882 if (((processor_alias_table
[i
].flags
& PTA_SSE4A
) != 0)
1883 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_SSE4A
))
1884 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_SSE4A
;
1885 if (((processor_alias_table
[i
].flags
& PTA_FMA4
) != 0)
1886 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_FMA4
))
1887 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_FMA4
;
1888 if (((processor_alias_table
[i
].flags
& PTA_XOP
) != 0)
1889 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_XOP
))
1890 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_XOP
;
1891 if (((processor_alias_table
[i
].flags
& PTA_LWP
) != 0)
1892 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_LWP
))
1893 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_LWP
;
1894 if (((processor_alias_table
[i
].flags
& PTA_ABM
) != 0)
1895 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_ABM
))
1896 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_ABM
;
1897 if (((processor_alias_table
[i
].flags
& PTA_BMI
) != 0)
1898 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_BMI
))
1899 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_BMI
;
1900 if (((processor_alias_table
[i
].flags
& (PTA_LZCNT
| PTA_ABM
)) != 0)
1901 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_LZCNT
))
1902 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_LZCNT
;
1903 if (((processor_alias_table
[i
].flags
& PTA_TBM
) != 0)
1904 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_TBM
))
1905 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_TBM
;
1906 if (((processor_alias_table
[i
].flags
& PTA_BMI2
) != 0)
1907 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_BMI2
))
1908 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_BMI2
;
1909 if (((processor_alias_table
[i
].flags
& PTA_CX16
) != 0)
1910 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_CX16
))
1911 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_CX16
;
1912 if (((processor_alias_table
[i
].flags
& (PTA_POPCNT
| PTA_ABM
)) != 0)
1913 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_POPCNT
))
1914 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_POPCNT
;
1915 if (!(TARGET_64BIT_P (opts
->x_ix86_isa_flags
)
1916 && ((processor_alias_table
[i
].flags
& PTA_NO_SAHF
) != 0))
1917 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_SAHF
))
1918 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_SAHF
;
1919 if (((processor_alias_table
[i
].flags
& PTA_MOVBE
) != 0)
1920 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_MOVBE
))
1921 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_MOVBE
;
1922 if (((processor_alias_table
[i
].flags
& PTA_AES
) != 0)
1923 && !(ix86_isa_flags_explicit
& OPTION_MASK_ISA_AES
))
1924 ix86_isa_flags
|= OPTION_MASK_ISA_AES
;
1925 if (((processor_alias_table
[i
].flags
& PTA_SHA
) != 0)
1926 && !(ix86_isa_flags_explicit
& OPTION_MASK_ISA_SHA
))
1927 ix86_isa_flags
|= OPTION_MASK_ISA_SHA
;
1928 if (((processor_alias_table
[i
].flags
& PTA_PCLMUL
) != 0)
1929 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_PCLMUL
))
1930 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_PCLMUL
;
1931 if (((processor_alias_table
[i
].flags
& PTA_FSGSBASE
) != 0)
1932 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_FSGSBASE
))
1933 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_FSGSBASE
;
1934 if (((processor_alias_table
[i
].flags
& PTA_RDRND
) != 0)
1935 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_RDRND
))
1936 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_RDRND
;
1937 if (((processor_alias_table
[i
].flags
& PTA_F16C
) != 0)
1938 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_F16C
))
1939 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_F16C
;
1940 if (((processor_alias_table
[i
].flags
& PTA_RTM
) != 0)
1941 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_RTM
))
1942 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_RTM
;
1943 if (((processor_alias_table
[i
].flags
& PTA_HLE
) != 0)
1944 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_HLE
))
1945 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_HLE
;
1946 if (((processor_alias_table
[i
].flags
& PTA_PRFCHW
) != 0)
1947 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_PRFCHW
))
1948 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_PRFCHW
;
1949 if (((processor_alias_table
[i
].flags
& PTA_RDSEED
) != 0)
1950 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_RDSEED
))
1951 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_RDSEED
;
1952 if (((processor_alias_table
[i
].flags
& PTA_ADX
) != 0)
1953 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_ADX
))
1954 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_ADX
;
1955 if (((processor_alias_table
[i
].flags
& PTA_FXSR
) != 0)
1956 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_FXSR
))
1957 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_FXSR
;
1958 if (((processor_alias_table
[i
].flags
& PTA_XSAVE
) != 0)
1959 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_XSAVE
))
1960 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_XSAVE
;
1961 if (((processor_alias_table
[i
].flags
& PTA_XSAVEOPT
) != 0)
1962 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_XSAVEOPT
))
1963 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_XSAVEOPT
;
1964 if (((processor_alias_table
[i
].flags
& PTA_AVX512F
) != 0)
1965 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512F
))
1966 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512F
;
1967 if (((processor_alias_table
[i
].flags
& PTA_AVX512ER
) != 0)
1968 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512ER
))
1969 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512ER
;
1970 if (((processor_alias_table
[i
].flags
& PTA_AVX512PF
) != 0)
1971 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512PF
))
1972 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512PF
;
1973 if (((processor_alias_table
[i
].flags
& PTA_AVX512CD
) != 0)
1974 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512CD
))
1975 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512CD
;
1976 if (((processor_alias_table
[i
].flags
& PTA_PREFETCHWT1
) != 0)
1977 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_PREFETCHWT1
))
1978 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_PREFETCHWT1
;
1979 if (((processor_alias_table
[i
].flags
& PTA_CLWB
) != 0)
1980 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_CLWB
))
1981 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_CLWB
;
1982 if (((processor_alias_table
[i
].flags
& PTA_CLFLUSHOPT
) != 0)
1983 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_CLFLUSHOPT
))
1984 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_CLFLUSHOPT
;
1985 if (((processor_alias_table
[i
].flags
& PTA_CLZERO
) != 0)
1986 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_CLZERO
))
1987 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_CLZERO
;
1988 if (((processor_alias_table
[i
].flags
& PTA_XSAVEC
) != 0)
1989 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_XSAVEC
))
1990 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_XSAVEC
;
1991 if (((processor_alias_table
[i
].flags
& PTA_XSAVES
) != 0)
1992 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_XSAVES
))
1993 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_XSAVES
;
1994 if (((processor_alias_table
[i
].flags
& PTA_AVX512DQ
) != 0)
1995 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512DQ
))
1996 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512DQ
;
1997 if (((processor_alias_table
[i
].flags
& PTA_AVX512BW
) != 0)
1998 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512BW
))
1999 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512BW
;
2000 if (((processor_alias_table
[i
].flags
& PTA_AVX512VL
) != 0)
2001 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512VL
))
2002 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512VL
;
2003 if (((processor_alias_table
[i
].flags
& PTA_AVX512VBMI
) != 0)
2004 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512VBMI
))
2005 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512VBMI
;
2006 if (((processor_alias_table
[i
].flags
& PTA_AVX512IFMA
) != 0)
2007 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512IFMA
))
2008 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512IFMA
;
2009 if (((processor_alias_table
[i
].flags
& PTA_AVX512VNNI
) != 0)
2010 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_AVX512VNNI
))
2011 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512VNNI
;
2012 if (((processor_alias_table
[i
].flags
& PTA_GFNI
) != 0)
2013 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_GFNI
))
2014 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_GFNI
;
2015 if (((processor_alias_table
[i
].flags
& PTA_AVX512VBMI2
) != 0)
2016 && !(opts
->x_ix86_isa_flags_explicit
2017 & OPTION_MASK_ISA_AVX512VBMI2
))
2018 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512VBMI2
;
2019 if (((processor_alias_table
[i
].flags
& PTA_VPCLMULQDQ
) != 0)
2020 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_VPCLMULQDQ
))
2021 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_VPCLMULQDQ
;
2022 if (((processor_alias_table
[i
].flags
& PTA_AVX512BITALG
) != 0)
2023 && !(opts
->x_ix86_isa_flags_explicit
2024 & OPTION_MASK_ISA_AVX512BITALG
))
2025 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512BITALG
;
2027 if (((processor_alias_table
[i
].flags
& PTA_AVX5124VNNIW
) != 0)
2028 && !(opts
->x_ix86_isa_flags2_explicit
2029 & OPTION_MASK_ISA_AVX5124VNNIW
))
2030 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_AVX5124VNNIW
;
2031 if (((processor_alias_table
[i
].flags
& PTA_AVX5124FMAPS
) != 0)
2032 && !(opts
->x_ix86_isa_flags2_explicit
2033 & OPTION_MASK_ISA_AVX5124FMAPS
))
2034 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_AVX5124FMAPS
;
2035 if (((processor_alias_table
[i
].flags
& PTA_AVX512VPOPCNTDQ
) != 0)
2036 && !(opts
->x_ix86_isa_flags_explicit
2037 & OPTION_MASK_ISA_AVX512VPOPCNTDQ
))
2038 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_AVX512VPOPCNTDQ
;
2039 if (((processor_alias_table
[i
].flags
& PTA_AVX512BF16
) != 0)
2040 && !(opts
->x_ix86_isa_flags2_explicit
2041 & OPTION_MASK_ISA_AVX512BF16
))
2042 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_AVX512BF16
;
2043 if (((processor_alias_table
[i
].flags
& PTA_SGX
) != 0)
2044 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_SGX
))
2045 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_SGX
;
2046 if (((processor_alias_table
[i
].flags
& PTA_VAES
) != 0)
2047 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_VAES
))
2048 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_VAES
;
2049 if (((processor_alias_table
[i
].flags
& PTA_RDPID
) != 0)
2050 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_RDPID
))
2051 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_RDPID
;
2052 if (((processor_alias_table
[i
].flags
& PTA_PCONFIG
) != 0)
2053 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_PCONFIG
))
2054 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_PCONFIG
;
2055 if (((processor_alias_table
[i
].flags
& PTA_WBNOINVD
) != 0)
2056 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_WBNOINVD
))
2057 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_WBNOINVD
;
2058 if (((processor_alias_table
[i
].flags
& PTA_PTWRITE
) != 0)
2059 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_PTWRITE
))
2060 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_PTWRITE
;
2062 if ((processor_alias_table
[i
].flags
2063 & (PTA_PREFETCH_SSE
| PTA_SSE
)) != 0)
2064 x86_prefetch_sse
= true;
2065 if (((processor_alias_table
[i
].flags
& PTA_MWAITX
) != 0)
2066 && !(opts
->x_ix86_isa_flags2_explicit
& OPTION_MASK_ISA_MWAITX
))
2067 opts
->x_ix86_isa_flags2
|= OPTION_MASK_ISA_MWAITX
;
2068 if (((processor_alias_table
[i
].flags
& PTA_PKU
) != 0)
2069 && !(opts
->x_ix86_isa_flags_explicit
& OPTION_MASK_ISA_PKU
))
2070 opts
->x_ix86_isa_flags
|= OPTION_MASK_ISA_PKU
;
2072 /* Don't enable x87 instructions if only
2073 general registers are allowed. */
2074 if (!(opts_set
->x_ix86_target_flags
& OPTION_MASK_GENERAL_REGS_ONLY
)
2075 && !(opts_set
->x_target_flags
& MASK_80387
))
2077 if (((processor_alias_table
[i
].flags
& PTA_NO_80387
) != 0))
2078 opts
->x_target_flags
&= ~MASK_80387
;
2080 opts
->x_target_flags
|= MASK_80387
;
2088 ? G_("bad value (%qs) for %<-march=%> switch")
2089 : G_("bad value (%qs) for %<target(\"arch=\")%> attribute"),
2090 opts
->x_ix86_arch_string
);
2092 auto_vec
<const char *> candidates
;
2093 for (i
= 0; i
< pta_size
; i
++)
2094 if (strcmp (processor_alias_table
[i
].name
, "generic")
2095 && strcmp (processor_alias_table
[i
].name
, "intel")
2096 && (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
)
2097 || ((processor_alias_table
[i
].flags
& PTA_64BIT
) != 0)))
2098 candidates
.safe_push (processor_alias_table
[i
].name
);
2100 #ifdef HAVE_LOCAL_CPU_DETECT
2101 /* Add also "native" as possible value. */
2102 candidates
.safe_push ("native");
2107 = candidates_list_and_hint (opts
->x_ix86_arch_string
, s
, candidates
);
2109 inform (input_location
,
2111 ? G_("valid arguments to %<-march=%> switch are: "
2112 "%s; did you mean %qs?")
2113 : G_("valid arguments to %<target(\"arch=\")%> attribute are: "
2114 "%s; did you mean %qs?"), s
, hint
);
2116 inform (input_location
,
2118 ? G_("valid arguments to %<-march=%> switch are: %s")
2119 : G_("valid arguments to %<target(\"arch=\")%> attribute "
2124 ix86_arch_mask
= HOST_WIDE_INT_1U
<< ix86_arch
;
2125 for (i
= 0; i
< X86_ARCH_LAST
; ++i
)
2126 ix86_arch_features
[i
] = !!(initial_ix86_arch_features
[i
] & ix86_arch_mask
);
2128 for (i
= 0; i
< pta_size
; i
++)
2129 if (! strcmp (opts
->x_ix86_tune_string
, processor_alias_table
[i
].name
))
2131 ix86_schedule
= processor_alias_table
[i
].schedule
;
2132 ix86_tune
= processor_alias_table
[i
].processor
;
2133 if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
2135 if (!((processor_alias_table
[i
].flags
& PTA_64BIT
) != 0))
2137 if (ix86_tune_defaulted
)
2139 opts
->x_ix86_tune_string
= "x86-64";
2140 for (i
= 0; i
< pta_size
; i
++)
2141 if (! strcmp (opts
->x_ix86_tune_string
,
2142 processor_alias_table
[i
].name
))
2144 ix86_schedule
= processor_alias_table
[i
].schedule
;
2145 ix86_tune
= processor_alias_table
[i
].processor
;
2148 error ("CPU you selected does not support x86-64 "
2152 /* Intel CPUs have always interpreted SSE prefetch instructions as
2153 NOPs; so, we can enable SSE prefetch instructions even when
2154 -mtune (rather than -march) points us to a processor that has them.
2155 However, the VIA C3 gives a SIGILL, so we only do that for i686 and
2156 higher processors. */
2158 && ((processor_alias_table
[i
].flags
2159 & (PTA_PREFETCH_SSE
| PTA_SSE
)) != 0))
2160 x86_prefetch_sse
= true;
2164 if (ix86_tune_specified
&& i
== pta_size
)
2167 ? G_("bad value (%qs) for %<-mtune=%> switch")
2168 : G_("bad value (%qs) for %<target(\"tune=\")%> attribute"),
2169 opts
->x_ix86_tune_string
);
2171 auto_vec
<const char *> candidates
;
2172 for (i
= 0; i
< pta_size
; i
++)
2173 if (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
)
2174 || ((processor_alias_table
[i
].flags
& PTA_64BIT
) != 0))
2175 candidates
.safe_push (processor_alias_table
[i
].name
);
2177 #ifdef HAVE_LOCAL_CPU_DETECT
2178 /* Add also "native" as possible value. */
2179 candidates
.safe_push ("native");
2184 = candidates_list_and_hint (opts
->x_ix86_tune_string
, s
, candidates
);
2186 inform (input_location
,
2188 ? G_("valid arguments to %<-mtune=%> switch are: "
2189 "%s; did you mean %qs?")
2190 : G_("valid arguments to %<target(\"tune=\")%> attribute are: "
2191 "%s; did you mean %qs?"), s
, hint
);
2193 inform (input_location
,
2195 ? G_("valid arguments to %<-mtune=%> switch are: %s")
2196 : G_("valid arguments to %<target(\"tune=\")%> attribute "
2201 set_ix86_tune_features (ix86_tune
, opts
->x_ix86_dump_tunes
);
2203 #ifndef USE_IX86_FRAME_POINTER
2204 #define USE_IX86_FRAME_POINTER 0
2207 /* Set the default values for switches whose default depends on TARGET_64BIT
2208 in case they weren't overwritten by command line options. */
2209 if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
2211 if (opts
->x_optimize
>= 1 && !opts_set
->x_flag_omit_frame_pointer
)
2212 opts
->x_flag_omit_frame_pointer
= !USE_IX86_FRAME_POINTER
;
2213 if (opts
->x_flag_asynchronous_unwind_tables
2214 && !opts_set
->x_flag_unwind_tables
2215 && TARGET_64BIT_MS_ABI
)
2216 opts
->x_flag_unwind_tables
= 1;
2217 if (opts
->x_flag_asynchronous_unwind_tables
== 2)
2218 opts
->x_flag_unwind_tables
2219 = opts
->x_flag_asynchronous_unwind_tables
= 1;
2220 if (opts
->x_flag_pcc_struct_return
== 2)
2221 opts
->x_flag_pcc_struct_return
= 0;
2225 if (opts
->x_optimize
>= 1 && !opts_set
->x_flag_omit_frame_pointer
)
2226 opts
->x_flag_omit_frame_pointer
2227 = !(USE_IX86_FRAME_POINTER
|| opts
->x_optimize_size
);
2228 if (opts
->x_flag_asynchronous_unwind_tables
== 2)
2229 opts
->x_flag_asynchronous_unwind_tables
= !USE_IX86_FRAME_POINTER
;
2230 if (opts
->x_flag_pcc_struct_return
== 2)
2232 /* Intel MCU psABI specifies that -freg-struct-return should
2233 be on. Instead of setting DEFAULT_PCC_STRUCT_RETURN to 1,
2234 we check -miamcu so that -freg-struct-return is always
2235 turned on if -miamcu is used. */
2236 if (TARGET_IAMCU_P (opts
->x_target_flags
))
2237 opts
->x_flag_pcc_struct_return
= 0;
2239 opts
->x_flag_pcc_struct_return
= DEFAULT_PCC_STRUCT_RETURN
;
2243 ix86_tune_cost
= processor_cost_table
[ix86_tune
];
2244 /* TODO: ix86_cost should be chosen at instruction or function granuality
2245 so for cold code we use size_cost even in !optimize_size compilation. */
2246 if (opts
->x_optimize_size
)
2247 ix86_cost
= &ix86_size_cost
;
2249 ix86_cost
= ix86_tune_cost
;
2251 /* Arrange to set up i386_stack_locals for all functions. */
2252 init_machine_status
= ix86_init_machine_status
;
2254 /* Validate -mregparm= value. */
2255 if (opts_set
->x_ix86_regparm
)
2257 if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
2258 warning (0, "%<-mregparm%> is ignored in 64-bit mode");
2259 else if (TARGET_IAMCU_P (opts
->x_target_flags
))
2260 warning (0, "%<-mregparm%> is ignored for Intel MCU psABI");
2261 if (opts
->x_ix86_regparm
> REGPARM_MAX
)
2263 error ("%<-mregparm=%d%> is not between 0 and %d",
2264 opts
->x_ix86_regparm
, REGPARM_MAX
);
2265 opts
->x_ix86_regparm
= 0;
2268 if (TARGET_IAMCU_P (opts
->x_target_flags
)
2269 || TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
2270 opts
->x_ix86_regparm
= REGPARM_MAX
;
2272 /* Default align_* from the processor table. */
2273 ix86_default_align (opts
);
2275 /* Provide default for -mbranch-cost= value. */
2276 if (!opts_set
->x_ix86_branch_cost
)
2277 opts
->x_ix86_branch_cost
= ix86_tune_cost
->branch_cost
;
2279 if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
2281 opts
->x_target_flags
2282 |= TARGET_SUBTARGET64_DEFAULT
& ~opts_set
->x_target_flags
;
2284 if (!ix86_arch_specified
)
2285 opts
->x_ix86_isa_flags
2286 |= TARGET_SUBTARGET64_ISA_DEFAULT
& ~opts
->x_ix86_isa_flags_explicit
;
2288 if (TARGET_RTD_P (opts
->x_target_flags
))
2291 ? G_("%<-mrtd%> is ignored in 64bit mode")
2292 : G_("%<target(\"rtd\")%> is ignored in 64bit mode"));
2296 opts
->x_target_flags
2297 |= TARGET_SUBTARGET32_DEFAULT
& ~opts_set
->x_target_flags
;
2299 if (!ix86_arch_specified
)
2300 opts
->x_ix86_isa_flags
2301 |= TARGET_SUBTARGET32_ISA_DEFAULT
& ~opts
->x_ix86_isa_flags_explicit
;
2303 /* i386 ABI does not specify red zone. It still makes sense to use it
2304 when programmer takes care to stack from being destroyed. */
2305 if (!(opts_set
->x_target_flags
& MASK_NO_RED_ZONE
))
2306 opts
->x_target_flags
|= MASK_NO_RED_ZONE
;
2309 /* Keep nonleaf frame pointers. */
2310 if (opts
->x_flag_omit_frame_pointer
)
2311 opts
->x_target_flags
&= ~MASK_OMIT_LEAF_FRAME_POINTER
;
2312 else if (TARGET_OMIT_LEAF_FRAME_POINTER_P (opts
->x_target_flags
))
2313 opts
->x_flag_omit_frame_pointer
= 1;
2315 /* If we're doing fast math, we don't care about comparison order
2316 wrt NaNs. This lets us use a shorter comparison sequence. */
2317 if (opts
->x_flag_finite_math_only
)
2318 opts
->x_target_flags
&= ~MASK_IEEE_FP
;
2320 /* If the architecture always has an FPU, turn off NO_FANCY_MATH_387,
2321 since the insns won't need emulation. */
2322 if (ix86_tune_features
[X86_TUNE_ALWAYS_FANCY_MATH_387
])
2323 opts
->x_target_flags
&= ~MASK_NO_FANCY_MATH_387
;
2325 /* Likewise, if the target doesn't have a 387, or we've specified
2326 software floating point, don't use 387 inline intrinsics. */
2327 if (!TARGET_80387_P (opts
->x_target_flags
))
2328 opts
->x_target_flags
|= MASK_NO_FANCY_MATH_387
;
2330 /* Turn on MMX builtins for -msse. */
2331 if (TARGET_SSE_P (opts
->x_ix86_isa_flags
))
2332 opts
->x_ix86_isa_flags
2333 |= OPTION_MASK_ISA_MMX
& ~opts
->x_ix86_isa_flags_explicit
;
2335 /* Enable SSE prefetch. */
2336 if (TARGET_SSE_P (opts
->x_ix86_isa_flags
)
2337 || (TARGET_PRFCHW_P (opts
->x_ix86_isa_flags
)
2338 && !TARGET_3DNOW_P (opts
->x_ix86_isa_flags
))
2339 || TARGET_PREFETCHWT1_P (opts
->x_ix86_isa_flags
))
2340 x86_prefetch_sse
= true;
2342 /* Enable popcnt instruction for -msse4.2 or -mabm. */
2343 if (TARGET_SSE4_2_P (opts
->x_ix86_isa_flags
)
2344 || TARGET_ABM_P (opts
->x_ix86_isa_flags
))
2345 opts
->x_ix86_isa_flags
2346 |= OPTION_MASK_ISA_POPCNT
& ~opts
->x_ix86_isa_flags_explicit
;
2348 /* Enable lzcnt instruction for -mabm. */
2349 if (TARGET_ABM_P(opts
->x_ix86_isa_flags
))
2350 opts
->x_ix86_isa_flags
2351 |= OPTION_MASK_ISA_LZCNT
& ~opts
->x_ix86_isa_flags_explicit
;
2353 /* Disable BMI, BMI2 and TBM instructions for -m16. */
2354 if (TARGET_16BIT_P(opts
->x_ix86_isa_flags
))
2355 opts
->x_ix86_isa_flags
2356 &= ~((OPTION_MASK_ISA_BMI
| OPTION_MASK_ISA_BMI2
| OPTION_MASK_ISA_TBM
)
2357 & ~opts
->x_ix86_isa_flags_explicit
);
2359 /* Validate -mpreferred-stack-boundary= value or default it to
2360 PREFERRED_STACK_BOUNDARY_DEFAULT. */
2361 ix86_preferred_stack_boundary
= PREFERRED_STACK_BOUNDARY_DEFAULT
;
2362 if (opts_set
->x_ix86_preferred_stack_boundary_arg
)
2364 int min
= TARGET_64BIT_P (opts
->x_ix86_isa_flags
)? 3 : 2;
2365 int max
= TARGET_SEH
? 4 : 12;
2367 if (opts
->x_ix86_preferred_stack_boundary_arg
< min
2368 || opts
->x_ix86_preferred_stack_boundary_arg
> max
)
2371 error ("%<-mpreferred-stack-boundary%> is not supported "
2374 error ("%<-mpreferred-stack-boundary=%d%> is not between %d and %d",
2375 opts
->x_ix86_preferred_stack_boundary_arg
, min
, max
);
2378 ix86_preferred_stack_boundary
2379 = (1 << opts
->x_ix86_preferred_stack_boundary_arg
) * BITS_PER_UNIT
;
2382 /* Set the default value for -mstackrealign. */
2383 if (!opts_set
->x_ix86_force_align_arg_pointer
)
2384 opts
->x_ix86_force_align_arg_pointer
= STACK_REALIGN_DEFAULT
;
2386 ix86_default_incoming_stack_boundary
= PREFERRED_STACK_BOUNDARY
;
2388 /* Validate -mincoming-stack-boundary= value or default it to
2389 MIN_STACK_BOUNDARY/PREFERRED_STACK_BOUNDARY. */
2390 ix86_incoming_stack_boundary
= ix86_default_incoming_stack_boundary
;
2391 if (opts_set
->x_ix86_incoming_stack_boundary_arg
)
2393 int min
= TARGET_64BIT_P (opts
->x_ix86_isa_flags
) ? 3 : 2;
2395 if (opts
->x_ix86_incoming_stack_boundary_arg
< min
2396 || opts
->x_ix86_incoming_stack_boundary_arg
> 12)
2397 error ("%<-mincoming-stack-boundary=%d%> is not between %d and 12",
2398 opts
->x_ix86_incoming_stack_boundary_arg
, min
);
2401 ix86_user_incoming_stack_boundary
2402 = (1 << opts
->x_ix86_incoming_stack_boundary_arg
) * BITS_PER_UNIT
;
2403 ix86_incoming_stack_boundary
2404 = ix86_user_incoming_stack_boundary
;
2408 #ifndef NO_PROFILE_COUNTERS
2409 if (flag_nop_mcount
)
2410 error ("%<-mnop-mcount%> is not compatible with this target");
2412 if (flag_nop_mcount
&& flag_pic
)
2413 error ("%<-mnop-mcount%> is not implemented for %<-fPIC%>");
2415 /* Accept -msseregparm only if at least SSE support is enabled. */
2416 if (TARGET_SSEREGPARM_P (opts
->x_target_flags
)
2417 && ! TARGET_SSE_P (opts
->x_ix86_isa_flags
))
2419 ? G_("%<-msseregparm%> used without SSE enabled")
2420 : G_("%<target(\"sseregparm\")%> used without SSE enabled"));
2422 if (opts_set
->x_ix86_fpmath
)
2424 if (opts
->x_ix86_fpmath
& FPMATH_SSE
)
2426 if (!TARGET_SSE_P (opts
->x_ix86_isa_flags
))
2428 if (TARGET_80387_P (opts
->x_target_flags
))
2430 warning (0, "SSE instruction set disabled, using 387 arithmetics");
2431 opts
->x_ix86_fpmath
= FPMATH_387
;
2434 else if ((opts
->x_ix86_fpmath
& FPMATH_387
)
2435 && !TARGET_80387_P (opts
->x_target_flags
))
2437 warning (0, "387 instruction set disabled, using SSE arithmetics");
2438 opts
->x_ix86_fpmath
= FPMATH_SSE
;
2442 /* For all chips supporting SSE2, -mfpmath=sse performs better than
2443 fpmath=387. The second is however default at many targets since the
2444 extra 80bit precision of temporaries is considered to be part of ABI.
2445 Overwrite the default at least for -ffast-math.
2446 TODO: -mfpmath=both seems to produce same performing code with bit
2447 smaller binaries. It is however not clear if register allocation is
2448 ready for this setting.
2449 Also -mfpmath=387 is overall a lot more compact (bout 4-5%) than SSE
2450 codegen. We may switch to 387 with -ffast-math for size optimized
2452 else if (fast_math_flags_set_p (&global_options
)
2453 && TARGET_SSE2_P (opts
->x_ix86_isa_flags
))
2454 opts
->x_ix86_fpmath
= FPMATH_SSE
;
2456 opts
->x_ix86_fpmath
= TARGET_FPMATH_DEFAULT_P (opts
->x_ix86_isa_flags
);
2458 /* Use external vectorized library in vectorizing intrinsics. */
2459 if (opts_set
->x_ix86_veclibabi_type
)
2460 switch (opts
->x_ix86_veclibabi_type
)
2462 case ix86_veclibabi_type_svml
:
2463 ix86_veclib_handler
= &ix86_veclibabi_svml
;
2466 case ix86_veclibabi_type_acml
:
2467 ix86_veclib_handler
= &ix86_veclibabi_acml
;
2474 if (ix86_tune_features
[X86_TUNE_ACCUMULATE_OUTGOING_ARGS
]
2475 && !(opts_set
->x_target_flags
& MASK_ACCUMULATE_OUTGOING_ARGS
))
2476 opts
->x_target_flags
|= MASK_ACCUMULATE_OUTGOING_ARGS
;
2478 /* If stack probes are required, the space used for large function
2479 arguments on the stack must also be probed, so enable
2480 -maccumulate-outgoing-args so this happens in the prologue. */
2481 if (TARGET_STACK_PROBE_P (opts
->x_target_flags
)
2482 && !(opts
->x_target_flags
& MASK_ACCUMULATE_OUTGOING_ARGS
))
2484 if (opts_set
->x_target_flags
& MASK_ACCUMULATE_OUTGOING_ARGS
)
2487 ? G_("stack probing requires %<-maccumulate-outgoing-args%> "
2489 : G_("stack probing requires "
2490 "%<target(\"accumulate-outgoing-args\")%> for "
2492 opts
->x_target_flags
|= MASK_ACCUMULATE_OUTGOING_ARGS
;
2495 /* Stack realignment without -maccumulate-outgoing-args requires %ebp,
2496 so enable -maccumulate-outgoing-args when %ebp is fixed. */
2497 if (fixed_regs
[BP_REG
]
2498 && !(opts
->x_target_flags
& MASK_ACCUMULATE_OUTGOING_ARGS
))
2500 if (opts_set
->x_target_flags
& MASK_ACCUMULATE_OUTGOING_ARGS
)
2503 ? G_("fixed ebp register requires "
2504 "%<-maccumulate-outgoing-args%>")
2505 : G_("fixed ebp register requires "
2506 "%<target(\"accumulate-outgoing-args\")%>"));
2507 opts
->x_target_flags
|= MASK_ACCUMULATE_OUTGOING_ARGS
;
2510 /* Figure out what ASM_GENERATE_INTERNAL_LABEL builds as a prefix. */
2513 ASM_GENERATE_INTERNAL_LABEL (internal_label_prefix
, "LX", 0);
2514 p
= strchr (internal_label_prefix
, 'X');
2515 internal_label_prefix_len
= p
- internal_label_prefix
;
2519 /* When scheduling description is not available, disable scheduler pass
2520 so it won't slow down the compilation and make x87 code slower. */
2521 if (!TARGET_SCHEDULE
)
2522 opts
->x_flag_schedule_insns_after_reload
= opts
->x_flag_schedule_insns
= 0;
2524 maybe_set_param_value (PARAM_SIMULTANEOUS_PREFETCHES
,
2525 ix86_tune_cost
->simultaneous_prefetches
,
2526 opts
->x_param_values
,
2527 opts_set
->x_param_values
);
2528 maybe_set_param_value (PARAM_L1_CACHE_LINE_SIZE
,
2529 ix86_tune_cost
->prefetch_block
,
2530 opts
->x_param_values
,
2531 opts_set
->x_param_values
);
2532 maybe_set_param_value (PARAM_L1_CACHE_SIZE
,
2533 ix86_tune_cost
->l1_cache_size
,
2534 opts
->x_param_values
,
2535 opts_set
->x_param_values
);
2536 maybe_set_param_value (PARAM_L2_CACHE_SIZE
,
2537 ix86_tune_cost
->l2_cache_size
,
2538 opts
->x_param_values
,
2539 opts_set
->x_param_values
);
2541 /* Enable sw prefetching at -O3 for CPUS that prefetching is helpful. */
2542 if (opts
->x_flag_prefetch_loop_arrays
< 0
2544 && (opts
->x_optimize
>= 3 || opts
->x_flag_profile_use
)
2545 && !opts
->x_optimize_size
2546 && TARGET_SOFTWARE_PREFETCHING_BENEFICIAL
)
2547 opts
->x_flag_prefetch_loop_arrays
= 1;
2549 /* If using typedef char *va_list, signal that __builtin_va_start (&ap, 0)
2550 can be opts->x_optimized to ap = __builtin_next_arg (0). */
2551 if (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
) && !opts
->x_flag_split_stack
)
2552 targetm
.expand_builtin_va_start
= NULL
;
2554 if (TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
2556 ix86_gen_leave
= gen_leave_rex64
;
2557 if (Pmode
== DImode
)
2559 ix86_gen_tls_global_dynamic_64
= gen_tls_global_dynamic_64_di
;
2560 ix86_gen_tls_local_dynamic_base_64
2561 = gen_tls_local_dynamic_base_64_di
;
2565 ix86_gen_tls_global_dynamic_64
= gen_tls_global_dynamic_64_si
;
2566 ix86_gen_tls_local_dynamic_base_64
2567 = gen_tls_local_dynamic_base_64_si
;
2571 ix86_gen_leave
= gen_leave
;
2573 if (Pmode
== DImode
)
2575 ix86_gen_add3
= gen_adddi3
;
2576 ix86_gen_sub3
= gen_subdi3
;
2577 ix86_gen_sub3_carry
= gen_subdi3_carry
;
2578 ix86_gen_one_cmpl2
= gen_one_cmpldi2
;
2579 ix86_gen_andsp
= gen_anddi3
;
2580 ix86_gen_allocate_stack_worker
= gen_allocate_stack_worker_probe_di
;
2581 ix86_gen_adjust_stack_and_probe
= gen_adjust_stack_and_probedi
;
2582 ix86_gen_probe_stack_range
= gen_probe_stack_rangedi
;
2583 ix86_gen_monitor
= gen_sse3_monitor_di
;
2584 ix86_gen_monitorx
= gen_monitorx_di
;
2585 ix86_gen_clzero
= gen_clzero_di
;
2589 ix86_gen_add3
= gen_addsi3
;
2590 ix86_gen_sub3
= gen_subsi3
;
2591 ix86_gen_sub3_carry
= gen_subsi3_carry
;
2592 ix86_gen_one_cmpl2
= gen_one_cmplsi2
;
2593 ix86_gen_andsp
= gen_andsi3
;
2594 ix86_gen_allocate_stack_worker
= gen_allocate_stack_worker_probe_si
;
2595 ix86_gen_adjust_stack_and_probe
= gen_adjust_stack_and_probesi
;
2596 ix86_gen_probe_stack_range
= gen_probe_stack_rangesi
;
2597 ix86_gen_monitor
= gen_sse3_monitor_si
;
2598 ix86_gen_monitorx
= gen_monitorx_si
;
2599 ix86_gen_clzero
= gen_clzero_si
;
2603 /* Use -mcld by default for 32-bit code if configured with --enable-cld. */
2604 if (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
))
2605 opts
->x_target_flags
|= MASK_CLD
& ~opts_set
->x_target_flags
;
2608 /* Set the default value for -mfentry. */
2609 if (!opts_set
->x_flag_fentry
)
2610 opts
->x_flag_fentry
= TARGET_SEH
;
2613 if (!TARGET_64BIT_P (opts
->x_ix86_isa_flags
) && opts
->x_flag_pic
2614 && opts
->x_flag_fentry
)
2615 sorry ("%<-mfentry%> isn%'t supported for 32-bit in combination "
2617 else if (TARGET_SEH
&& !opts
->x_flag_fentry
)
2618 sorry ("%<-mno-fentry%> isn%'t compatible with SEH");
2621 if (TARGET_SEH
&& TARGET_CALL_MS2SYSV_XLOGUES
)
2622 sorry ("%<-mcall-ms2sysv-xlogues%> isn%'t currently supported with SEH");
2624 if (!(opts_set
->x_target_flags
& MASK_VZEROUPPER
)
2625 && TARGET_EMIT_VZEROUPPER
)
2626 opts
->x_target_flags
|= MASK_VZEROUPPER
;
2627 if (!(opts_set
->x_target_flags
& MASK_STV
))
2628 opts
->x_target_flags
|= MASK_STV
;
2629 /* Disable STV if -mpreferred-stack-boundary={2,3} or
2630 -mincoming-stack-boundary={2,3} or -mstackrealign - the needed
2631 stack realignment will be extra cost the pass doesn't take into
2632 account and the pass can't realign the stack. */
2633 if (ix86_preferred_stack_boundary
< 128
2634 || ix86_incoming_stack_boundary
< 128
2635 || opts
->x_ix86_force_align_arg_pointer
)
2636 opts
->x_target_flags
&= ~MASK_STV
;
2637 if (!ix86_tune_features
[X86_TUNE_AVX256_UNALIGNED_LOAD_OPTIMAL
]
2638 && !(opts_set
->x_target_flags
& MASK_AVX256_SPLIT_UNALIGNED_LOAD
))
2639 opts
->x_target_flags
|= MASK_AVX256_SPLIT_UNALIGNED_LOAD
;
2640 if (!ix86_tune_features
[X86_TUNE_AVX256_UNALIGNED_STORE_OPTIMAL
]
2641 && !(opts_set
->x_target_flags
& MASK_AVX256_SPLIT_UNALIGNED_STORE
))
2642 opts
->x_target_flags
|= MASK_AVX256_SPLIT_UNALIGNED_STORE
;
2644 /* Enable 128-bit AVX instruction generation
2645 for the auto-vectorizer. */
2646 if (TARGET_AVX128_OPTIMAL
2647 && (opts_set
->x_prefer_vector_width_type
== PVW_NONE
))
2648 opts
->x_prefer_vector_width_type
= PVW_AVX128
;
2650 /* Use 256-bit AVX instruction generation
2651 in the auto-vectorizer. */
2652 if (ix86_tune_features
[X86_TUNE_AVX256_OPTIMAL
]
2653 && (opts_set
->x_prefer_vector_width_type
== PVW_NONE
))
2654 opts
->x_prefer_vector_width_type
= PVW_AVX256
;
2656 if (opts
->x_ix86_recip_name
)
2658 char *p
= ASTRDUP (opts
->x_ix86_recip_name
);
2660 unsigned int mask
, i
;
2663 while ((q
= strtok (p
, ",")) != NULL
)
2674 if (!strcmp (q
, "default"))
2675 mask
= RECIP_MASK_ALL
;
2678 for (i
= 0; i
< ARRAY_SIZE (recip_options
); i
++)
2679 if (!strcmp (q
, recip_options
[i
].string
))
2681 mask
= recip_options
[i
].mask
;
2685 if (i
== ARRAY_SIZE (recip_options
))
2687 error ("unknown option for %<-mrecip=%s%>", q
);
2689 mask
= RECIP_MASK_NONE
;
2693 opts
->x_recip_mask_explicit
|= mask
;
2695 opts
->x_recip_mask
&= ~mask
;
2697 opts
->x_recip_mask
|= mask
;
2701 if (TARGET_RECIP_P (opts
->x_target_flags
))
2702 opts
->x_recip_mask
|= RECIP_MASK_ALL
& ~opts
->x_recip_mask_explicit
;
2703 else if (opts_set
->x_target_flags
& MASK_RECIP
)
2704 opts
->x_recip_mask
&= ~(RECIP_MASK_ALL
& ~opts
->x_recip_mask_explicit
);
2706 /* Default long double to 64-bit for 32-bit Bionic and to __float128
2707 for 64-bit Bionic. Also default long double to 64-bit for Intel
2709 if ((TARGET_HAS_BIONIC
|| TARGET_IAMCU
)
2710 && !(opts_set
->x_target_flags
2711 & (MASK_LONG_DOUBLE_64
| MASK_LONG_DOUBLE_128
)))
2712 opts
->x_target_flags
|= (TARGET_64BIT
2713 ? MASK_LONG_DOUBLE_128
2714 : MASK_LONG_DOUBLE_64
);
2716 /* Only one of them can be active. */
2717 gcc_assert ((opts
->x_target_flags
& MASK_LONG_DOUBLE_64
) == 0
2718 || (opts
->x_target_flags
& MASK_LONG_DOUBLE_128
) == 0);
2720 /* Handle stack protector */
2721 if (!opts_set
->x_ix86_stack_protector_guard
)
2723 #ifdef TARGET_THREAD_SSP_OFFSET
2724 if (!TARGET_HAS_BIONIC
)
2725 opts
->x_ix86_stack_protector_guard
= SSP_TLS
;
2728 opts
->x_ix86_stack_protector_guard
= SSP_GLOBAL
;
2731 if (opts_set
->x_ix86_stack_protector_guard_offset_str
)
2734 const char *str
= opts
->x_ix86_stack_protector_guard_offset_str
;
2739 #if defined(INT64_T_IS_LONG)
2740 offset
= strtol (str
, &endp
, 0);
2742 offset
= strtoll (str
, &endp
, 0);
2745 if (!*str
|| *endp
|| errno
)
2746 error ("%qs is not a valid number "
2747 "in %<-mstack-protector-guard-offset=%>", str
);
2749 if (!IN_RANGE (offset
, HOST_WIDE_INT_C (-0x80000000),
2750 HOST_WIDE_INT_C (0x7fffffff)))
2751 error ("%qs is not a valid offset "
2752 "in %<-mstack-protector-guard-offset=%>", str
);
2754 opts
->x_ix86_stack_protector_guard_offset
= offset
;
2756 #ifdef TARGET_THREAD_SSP_OFFSET
2758 opts
->x_ix86_stack_protector_guard_offset
= TARGET_THREAD_SSP_OFFSET
;
2761 if (opts_set
->x_ix86_stack_protector_guard_reg_str
)
2763 const char *str
= opts
->x_ix86_stack_protector_guard_reg_str
;
2764 addr_space_t seg
= ADDR_SPACE_GENERIC
;
2766 /* Discard optional register prefix. */
2770 if (strlen (str
) == 2 && str
[1] == 's')
2773 seg
= ADDR_SPACE_SEG_FS
;
2774 else if (str
[0] == 'g')
2775 seg
= ADDR_SPACE_SEG_GS
;
2778 if (seg
== ADDR_SPACE_GENERIC
)
2779 error ("%qs is not a valid base register "
2780 "in %<-mstack-protector-guard-reg=%>",
2781 opts
->x_ix86_stack_protector_guard_reg_str
);
2783 opts
->x_ix86_stack_protector_guard_reg
= seg
;
2787 opts
->x_ix86_stack_protector_guard_reg
= DEFAULT_TLS_SEG_REG
;
2789 /* The kernel uses a different segment register for performance
2790 reasons; a system call would not have to trash the userspace
2791 segment register, which would be expensive. */
2792 if (opts
->x_ix86_cmodel
== CM_KERNEL
)
2793 opts
->x_ix86_stack_protector_guard_reg
= ADDR_SPACE_SEG_GS
;
2796 /* Handle -mmemcpy-strategy= and -mmemset-strategy= */
2797 if (opts
->x_ix86_tune_memcpy_strategy
)
2799 char *str
= xstrdup (opts
->x_ix86_tune_memcpy_strategy
);
2800 ix86_parse_stringop_strategy_string (str
, false);
2804 if (opts
->x_ix86_tune_memset_strategy
)
2806 char *str
= xstrdup (opts
->x_ix86_tune_memset_strategy
);
2807 ix86_parse_stringop_strategy_string (str
, true);
2811 /* Save the initial options in case the user does function specific
2814 target_option_default_node
= target_option_current_node
2815 = build_target_option_node (opts
);
2817 if (opts
->x_flag_cf_protection
!= CF_NONE
)
2818 opts
->x_flag_cf_protection
2819 = (cf_protection_level
) (opts
->x_flag_cf_protection
| CF_SET
);
2821 if (ix86_tune_features
[X86_TUNE_AVOID_128FMA_CHAINS
])
2822 maybe_set_param_value (PARAM_AVOID_FMA_MAX_BITS
, 128,
2823 opts
->x_param_values
,
2824 opts_set
->x_param_values
);
2826 /* PR86952: jump table usage with retpolines is slow.
2827 The PR provides some numbers about the slowness. */
2828 if (ix86_indirect_branch
!= indirect_branch_keep
2829 && !opts_set
->x_flag_jump_tables
)
2830 opts
->x_flag_jump_tables
= 0;
2835 /* Implement the TARGET_OPTION_OVERRIDE hook. */
2838 ix86_option_override (void)
2840 ix86_option_override_internal (true, &global_options
, &global_options_set
);
2843 /* Remember the last target of ix86_set_current_function. */
2844 static GTY(()) tree ix86_previous_fndecl
;
2846 /* Set targets globals to the default (or current #pragma GCC target
2847 if active). Invalidate ix86_previous_fndecl cache. */
2850 ix86_reset_previous_fndecl (void)
2852 tree new_tree
= target_option_current_node
;
2853 cl_target_option_restore (&global_options
, TREE_TARGET_OPTION (new_tree
));
2854 if (TREE_TARGET_GLOBALS (new_tree
))
2855 restore_target_globals (TREE_TARGET_GLOBALS (new_tree
));
2856 else if (new_tree
== target_option_default_node
)
2857 restore_target_globals (&default_target_globals
);
2859 TREE_TARGET_GLOBALS (new_tree
) = save_target_globals_default_opts ();
2860 ix86_previous_fndecl
= NULL_TREE
;
2863 /* Add target attribute to SIMD clone NODE if needed. */
2866 ix86_simd_clone_adjust (struct cgraph_node
*node
)
2868 const char *str
= NULL
;
2870 /* Attributes need to be adjusted for definitions, not declarations. */
2871 if (!node
->definition
)
2874 gcc_assert (node
->decl
== cfun
->decl
);
2875 switch (node
->simdclone
->vecsize_mangle
)
2890 if (!TARGET_AVX512F
)
2899 tree args
= build_tree_list (NULL_TREE
, build_string (strlen (str
), str
));
2900 bool ok
= ix86_valid_target_attribute_p (node
->decl
, NULL
, args
, 0);
2903 ix86_reset_previous_fndecl ();
2904 ix86_set_current_function (node
->decl
);
2909 /* Set the func_type field from the function FNDECL. */
2912 ix86_set_func_type (tree fndecl
)
2914 if (cfun
->machine
->func_type
== TYPE_UNKNOWN
)
2916 if (lookup_attribute ("interrupt",
2917 TYPE_ATTRIBUTES (TREE_TYPE (fndecl
))))
2919 if (ix86_function_naked (fndecl
))
2920 error_at (DECL_SOURCE_LOCATION (fndecl
),
2921 "interrupt and naked attributes are not compatible");
2924 for (tree arg
= DECL_ARGUMENTS (fndecl
);
2926 arg
= TREE_CHAIN (arg
))
2928 cfun
->machine
->no_caller_saved_registers
= true;
2929 cfun
->machine
->func_type
2930 = nargs
== 2 ? TYPE_EXCEPTION
: TYPE_INTERRUPT
;
2932 ix86_optimize_mode_switching
[X86_DIRFLAG
] = 1;
2934 /* Only dwarf2out.c can handle -WORD(AP) as a pointer argument. */
2935 if (write_symbols
!= NO_DEBUG
&& write_symbols
!= DWARF2_DEBUG
)
2936 sorry ("only DWARF debug format is supported for interrupt "
2941 cfun
->machine
->func_type
= TYPE_NORMAL
;
2942 if (lookup_attribute ("no_caller_saved_registers",
2943 TYPE_ATTRIBUTES (TREE_TYPE (fndecl
))))
2944 cfun
->machine
->no_caller_saved_registers
= true;
2949 /* Set the indirect_branch_type field from the function FNDECL. */
2952 ix86_set_indirect_branch_type (tree fndecl
)
2954 if (cfun
->machine
->indirect_branch_type
== indirect_branch_unset
)
2956 tree attr
= lookup_attribute ("indirect_branch",
2957 DECL_ATTRIBUTES (fndecl
));
2960 tree args
= TREE_VALUE (attr
);
2963 tree cst
= TREE_VALUE (args
);
2964 if (strcmp (TREE_STRING_POINTER (cst
), "keep") == 0)
2965 cfun
->machine
->indirect_branch_type
= indirect_branch_keep
;
2966 else if (strcmp (TREE_STRING_POINTER (cst
), "thunk") == 0)
2967 cfun
->machine
->indirect_branch_type
= indirect_branch_thunk
;
2968 else if (strcmp (TREE_STRING_POINTER (cst
), "thunk-inline") == 0)
2969 cfun
->machine
->indirect_branch_type
= indirect_branch_thunk_inline
;
2970 else if (strcmp (TREE_STRING_POINTER (cst
), "thunk-extern") == 0)
2971 cfun
->machine
->indirect_branch_type
= indirect_branch_thunk_extern
;
2976 cfun
->machine
->indirect_branch_type
= ix86_indirect_branch
;
2978 /* -mcmodel=large is not compatible with -mindirect-branch=thunk
2979 nor -mindirect-branch=thunk-extern. */
2980 if ((ix86_cmodel
== CM_LARGE
|| ix86_cmodel
== CM_LARGE_PIC
)
2981 && ((cfun
->machine
->indirect_branch_type
2982 == indirect_branch_thunk_extern
)
2983 || (cfun
->machine
->indirect_branch_type
2984 == indirect_branch_thunk
)))
2985 error ("%<-mindirect-branch=%s%> and %<-mcmodel=large%> are not "
2987 ((cfun
->machine
->indirect_branch_type
2988 == indirect_branch_thunk_extern
)
2989 ? "thunk-extern" : "thunk"));
2991 if (cfun
->machine
->indirect_branch_type
!= indirect_branch_keep
2992 && (flag_cf_protection
& CF_RETURN
))
2993 error ("%<-mindirect-branch%> and %<-fcf-protection%> are not "
2997 if (cfun
->machine
->function_return_type
== indirect_branch_unset
)
2999 tree attr
= lookup_attribute ("function_return",
3000 DECL_ATTRIBUTES (fndecl
));
3003 tree args
= TREE_VALUE (attr
);
3006 tree cst
= TREE_VALUE (args
);
3007 if (strcmp (TREE_STRING_POINTER (cst
), "keep") == 0)
3008 cfun
->machine
->function_return_type
= indirect_branch_keep
;
3009 else if (strcmp (TREE_STRING_POINTER (cst
), "thunk") == 0)
3010 cfun
->machine
->function_return_type
= indirect_branch_thunk
;
3011 else if (strcmp (TREE_STRING_POINTER (cst
), "thunk-inline") == 0)
3012 cfun
->machine
->function_return_type
= indirect_branch_thunk_inline
;
3013 else if (strcmp (TREE_STRING_POINTER (cst
), "thunk-extern") == 0)
3014 cfun
->machine
->function_return_type
= indirect_branch_thunk_extern
;
3019 cfun
->machine
->function_return_type
= ix86_function_return
;
3021 /* -mcmodel=large is not compatible with -mfunction-return=thunk
3022 nor -mfunction-return=thunk-extern. */
3023 if ((ix86_cmodel
== CM_LARGE
|| ix86_cmodel
== CM_LARGE_PIC
)
3024 && ((cfun
->machine
->function_return_type
3025 == indirect_branch_thunk_extern
)
3026 || (cfun
->machine
->function_return_type
3027 == indirect_branch_thunk
)))
3028 error ("%<-mfunction-return=%s%> and %<-mcmodel=large%> are not "
3030 ((cfun
->machine
->function_return_type
3031 == indirect_branch_thunk_extern
)
3032 ? "thunk-extern" : "thunk"));
3034 if (cfun
->machine
->function_return_type
!= indirect_branch_keep
3035 && (flag_cf_protection
& CF_RETURN
))
3036 error ("%<-mfunction-return%> and %<-fcf-protection%> are not "
3041 /* Establish appropriate back-end context for processing the function
3042 FNDECL. The argument might be NULL to indicate processing at top
3043 level, outside of any function scope. */
3045 ix86_set_current_function (tree fndecl
)
3047 /* Only change the context if the function changes. This hook is called
3048 several times in the course of compiling a function, and we don't want to
3049 slow things down too much or call target_reinit when it isn't safe. */
3050 if (fndecl
== ix86_previous_fndecl
)
3052 /* There may be 2 function bodies for the same function FNDECL,
3053 one is extern inline and one isn't. Call ix86_set_func_type
3054 to set the func_type field. */
3055 if (fndecl
!= NULL_TREE
)
3057 ix86_set_func_type (fndecl
);
3058 ix86_set_indirect_branch_type (fndecl
);
3064 if (ix86_previous_fndecl
== NULL_TREE
)
3065 old_tree
= target_option_current_node
;
3066 else if (DECL_FUNCTION_SPECIFIC_TARGET (ix86_previous_fndecl
))
3067 old_tree
= DECL_FUNCTION_SPECIFIC_TARGET (ix86_previous_fndecl
);
3069 old_tree
= target_option_default_node
;
3071 if (fndecl
== NULL_TREE
)
3073 if (old_tree
!= target_option_current_node
)
3074 ix86_reset_previous_fndecl ();
3078 ix86_set_func_type (fndecl
);
3079 ix86_set_indirect_branch_type (fndecl
);
3081 tree new_tree
= DECL_FUNCTION_SPECIFIC_TARGET (fndecl
);
3082 if (new_tree
== NULL_TREE
)
3083 new_tree
= target_option_default_node
;
3085 if (old_tree
!= new_tree
)
3087 cl_target_option_restore (&global_options
, TREE_TARGET_OPTION (new_tree
));
3088 if (TREE_TARGET_GLOBALS (new_tree
))
3089 restore_target_globals (TREE_TARGET_GLOBALS (new_tree
));
3090 else if (new_tree
== target_option_default_node
)
3091 restore_target_globals (&default_target_globals
);
3093 TREE_TARGET_GLOBALS (new_tree
) = save_target_globals_default_opts ();
3095 ix86_previous_fndecl
= fndecl
;
3097 static bool prev_no_caller_saved_registers
;
3099 /* 64-bit MS and SYSV ABI have different set of call used registers.
3100 Avoid expensive re-initialization of init_regs each time we switch
3101 function context. */
3103 && (call_used_regs
[SI_REG
]
3104 == (cfun
->machine
->call_abi
== MS_ABI
)))
3106 /* Need to re-initialize init_regs if caller-saved registers are
3108 else if (prev_no_caller_saved_registers
3109 != cfun
->machine
->no_caller_saved_registers
)
3112 if (cfun
->machine
->func_type
!= TYPE_NORMAL
3113 || cfun
->machine
->no_caller_saved_registers
)
3115 /* Don't allow SSE, MMX nor x87 instructions since they
3116 may change processor state. */
3120 else if (TARGET_MMX
)
3122 else if (TARGET_80387
)
3128 if (cfun
->machine
->func_type
!= TYPE_NORMAL
)
3129 sorry (cfun
->machine
->func_type
== TYPE_EXCEPTION
3130 ? G_("%s instructions aren%'t allowed in an"
3131 " exception service routine")
3132 : G_("%s instructions aren%'t allowed in an"
3133 " interrupt service routine"),
3136 sorry ("%s instructions aren%'t allowed in a function with "
3137 "the %<no_caller_saved_registers%> attribute", isa
);
3138 /* Don't issue the same error twice. */
3139 cfun
->machine
->func_type
= TYPE_NORMAL
;
3140 cfun
->machine
->no_caller_saved_registers
= false;
3144 prev_no_caller_saved_registers
3145 = cfun
->machine
->no_caller_saved_registers
;
3148 /* Implement the TARGET_OFFLOAD_OPTIONS hook. */
3150 ix86_offload_options (void)
3153 return xstrdup ("-foffload-abi=lp64");
3154 return xstrdup ("-foffload-abi=ilp32");
3157 /* Handle "cdecl", "stdcall", "fastcall", "regparm", "thiscall",
3158 and "sseregparm" calling convention attributes;
3159 arguments as in struct attribute_spec.handler. */
3162 ix86_handle_cconv_attribute (tree
*node
, tree name
, tree args
, int,
3165 if (TREE_CODE (*node
) != FUNCTION_TYPE
3166 && TREE_CODE (*node
) != METHOD_TYPE
3167 && TREE_CODE (*node
) != FIELD_DECL
3168 && TREE_CODE (*node
) != TYPE_DECL
)
3170 warning (OPT_Wattributes
, "%qE attribute only applies to functions",
3172 *no_add_attrs
= true;
3176 /* Can combine regparm with all attributes but fastcall, and thiscall. */
3177 if (is_attribute_p ("regparm", name
))
3181 if (lookup_attribute ("fastcall", TYPE_ATTRIBUTES (*node
)))
3183 error ("fastcall and regparm attributes are not compatible");
3186 if (lookup_attribute ("thiscall", TYPE_ATTRIBUTES (*node
)))
3188 error ("regparam and thiscall attributes are not compatible");
3191 cst
= TREE_VALUE (args
);
3192 if (TREE_CODE (cst
) != INTEGER_CST
)
3194 warning (OPT_Wattributes
,
3195 "%qE attribute requires an integer constant argument",
3197 *no_add_attrs
= true;
3199 else if (compare_tree_int (cst
, REGPARM_MAX
) > 0)
3201 warning (OPT_Wattributes
, "argument to %qE attribute larger than %d",
3203 *no_add_attrs
= true;
3211 /* Do not warn when emulating the MS ABI. */
3212 if ((TREE_CODE (*node
) != FUNCTION_TYPE
3213 && TREE_CODE (*node
) != METHOD_TYPE
)
3214 || ix86_function_type_abi (*node
) != MS_ABI
)
3215 warning (OPT_Wattributes
, "%qE attribute ignored",
3217 *no_add_attrs
= true;
3221 /* Can combine fastcall with stdcall (redundant) and sseregparm. */
3222 if (is_attribute_p ("fastcall", name
))
3224 if (lookup_attribute ("cdecl", TYPE_ATTRIBUTES (*node
)))
3226 error ("fastcall and cdecl attributes are not compatible");
3228 if (lookup_attribute ("stdcall", TYPE_ATTRIBUTES (*node
)))
3230 error ("fastcall and stdcall attributes are not compatible");
3232 if (lookup_attribute ("regparm", TYPE_ATTRIBUTES (*node
)))
3234 error ("fastcall and regparm attributes are not compatible");
3236 if (lookup_attribute ("thiscall", TYPE_ATTRIBUTES (*node
)))
3238 error ("fastcall and thiscall attributes are not compatible");
3242 /* Can combine stdcall with fastcall (redundant), regparm and
3244 else if (is_attribute_p ("stdcall", name
))
3246 if (lookup_attribute ("cdecl", TYPE_ATTRIBUTES (*node
)))
3248 error ("stdcall and cdecl attributes are not compatible");
3250 if (lookup_attribute ("fastcall", TYPE_ATTRIBUTES (*node
)))
3252 error ("stdcall and fastcall attributes are not compatible");
3254 if (lookup_attribute ("thiscall", TYPE_ATTRIBUTES (*node
)))
3256 error ("stdcall and thiscall attributes are not compatible");
3260 /* Can combine cdecl with regparm and sseregparm. */
3261 else if (is_attribute_p ("cdecl", name
))
3263 if (lookup_attribute ("stdcall", TYPE_ATTRIBUTES (*node
)))
3265 error ("stdcall and cdecl attributes are not compatible");
3267 if (lookup_attribute ("fastcall", TYPE_ATTRIBUTES (*node
)))
3269 error ("fastcall and cdecl attributes are not compatible");
3271 if (lookup_attribute ("thiscall", TYPE_ATTRIBUTES (*node
)))
3273 error ("cdecl and thiscall attributes are not compatible");
3276 else if (is_attribute_p ("thiscall", name
))
3278 if (TREE_CODE (*node
) != METHOD_TYPE
&& pedantic
)
3279 warning (OPT_Wattributes
, "%qE attribute is used for non-class method",
3281 if (lookup_attribute ("stdcall", TYPE_ATTRIBUTES (*node
)))
3283 error ("stdcall and thiscall attributes are not compatible");
3285 if (lookup_attribute ("fastcall", TYPE_ATTRIBUTES (*node
)))
3287 error ("fastcall and thiscall attributes are not compatible");
3289 if (lookup_attribute ("cdecl", TYPE_ATTRIBUTES (*node
)))
3291 error ("cdecl and thiscall attributes are not compatible");
3295 /* Can combine sseregparm with all attributes. */
3300 #ifndef CHECK_STACK_LIMIT
3301 #define CHECK_STACK_LIMIT (-1)
3304 /* The transactional memory builtins are implicitly regparm or fastcall
3305 depending on the ABI. Override the generic do-nothing attribute that
3306 these builtins were declared with, and replace it with one of the two
3307 attributes that we expect elsewhere. */
3310 ix86_handle_tm_regparm_attribute (tree
*node
, tree
, tree
,
3311 int flags
, bool *no_add_attrs
)
3315 /* In no case do we want to add the placeholder attribute. */
3316 *no_add_attrs
= true;
3318 /* The 64-bit ABI is unchanged for transactional memory. */
3322 /* ??? Is there a better way to validate 32-bit windows? We have
3323 cfun->machine->call_abi, but that seems to be set only for 64-bit. */
3324 if (CHECK_STACK_LIMIT
> 0)
3325 alt
= tree_cons (get_identifier ("fastcall"), NULL
, NULL
);
3328 alt
= tree_cons (NULL
, build_int_cst (NULL
, 2), NULL
);
3329 alt
= tree_cons (get_identifier ("regparm"), alt
, NULL
);
3331 decl_attributes (node
, alt
, flags
);
3336 /* Handle a "force_align_arg_pointer" attribute. */
3339 ix86_handle_force_align_arg_pointer_attribute (tree
*node
, tree name
,
3340 tree
, int, bool *no_add_attrs
)
3342 if (TREE_CODE (*node
) != FUNCTION_TYPE
3343 && TREE_CODE (*node
) != METHOD_TYPE
3344 && TREE_CODE (*node
) != FIELD_DECL
3345 && TREE_CODE (*node
) != TYPE_DECL
)
3347 warning (OPT_Wattributes
, "%qE attribute only applies to functions",
3349 *no_add_attrs
= true;
3355 /* Handle a "ms_struct" or "gcc_struct" attribute; arguments as in
3356 struct attribute_spec.handler. */
3359 ix86_handle_struct_attribute (tree
*node
, tree name
, tree
, int,
3365 if (TREE_CODE (*node
) == TYPE_DECL
)
3366 type
= &TREE_TYPE (*node
);
3371 if (!(type
&& RECORD_OR_UNION_TYPE_P (*type
)))
3373 warning (OPT_Wattributes
, "%qE attribute ignored",
3375 *no_add_attrs
= true;
3378 else if ((is_attribute_p ("ms_struct", name
)
3379 && lookup_attribute ("gcc_struct", TYPE_ATTRIBUTES (*type
)))
3380 || ((is_attribute_p ("gcc_struct", name
)
3381 && lookup_attribute ("ms_struct", TYPE_ATTRIBUTES (*type
)))))
3383 warning (OPT_Wattributes
, "%qE incompatible attribute ignored",
3385 *no_add_attrs
= true;
3391 /* Handle a "callee_pop_aggregate_return" attribute; arguments as
3392 in struct attribute_spec handler. */
3395 ix86_handle_callee_pop_aggregate_return (tree
*node
, tree name
, tree args
, int,
3398 if (TREE_CODE (*node
) != FUNCTION_TYPE
3399 && TREE_CODE (*node
) != METHOD_TYPE
3400 && TREE_CODE (*node
) != FIELD_DECL
3401 && TREE_CODE (*node
) != TYPE_DECL
)
3403 warning (OPT_Wattributes
, "%qE attribute only applies to functions",
3405 *no_add_attrs
= true;
3410 warning (OPT_Wattributes
, "%qE attribute only available for 32-bit",
3412 *no_add_attrs
= true;
3415 if (is_attribute_p ("callee_pop_aggregate_return", name
))
3419 cst
= TREE_VALUE (args
);
3420 if (TREE_CODE (cst
) != INTEGER_CST
)
3422 warning (OPT_Wattributes
,
3423 "%qE attribute requires an integer constant argument",
3425 *no_add_attrs
= true;
3427 else if (compare_tree_int (cst
, 0) != 0
3428 && compare_tree_int (cst
, 1) != 0)
3430 warning (OPT_Wattributes
,
3431 "argument to %qE attribute is neither zero, nor one",
3433 *no_add_attrs
= true;
3442 /* Handle a "ms_abi" or "sysv" attribute; arguments as in
3443 struct attribute_spec.handler. */
3446 ix86_handle_abi_attribute (tree
*node
, tree name
, tree
, int,
3449 if (TREE_CODE (*node
) != FUNCTION_TYPE
3450 && TREE_CODE (*node
) != METHOD_TYPE
3451 && TREE_CODE (*node
) != FIELD_DECL
3452 && TREE_CODE (*node
) != TYPE_DECL
)
3454 warning (OPT_Wattributes
, "%qE attribute only applies to functions",
3456 *no_add_attrs
= true;
3460 /* Can combine regparm with all attributes but fastcall. */
3461 if (is_attribute_p ("ms_abi", name
))
3463 if (lookup_attribute ("sysv_abi", TYPE_ATTRIBUTES (*node
)))
3465 error ("ms_abi and sysv_abi attributes are not compatible");
3470 else if (is_attribute_p ("sysv_abi", name
))
3472 if (lookup_attribute ("ms_abi", TYPE_ATTRIBUTES (*node
)))
3474 error ("ms_abi and sysv_abi attributes are not compatible");
3484 ix86_handle_fndecl_attribute (tree
*node
, tree name
, tree args
, int,
3487 if (TREE_CODE (*node
) != FUNCTION_DECL
)
3489 warning (OPT_Wattributes
, "%qE attribute only applies to functions",
3491 *no_add_attrs
= true;
3494 if (is_attribute_p ("indirect_branch", name
))
3496 tree cst
= TREE_VALUE (args
);
3497 if (TREE_CODE (cst
) != STRING_CST
)
3499 warning (OPT_Wattributes
,
3500 "%qE attribute requires a string constant argument",
3502 *no_add_attrs
= true;
3504 else if (strcmp (TREE_STRING_POINTER (cst
), "keep") != 0
3505 && strcmp (TREE_STRING_POINTER (cst
), "thunk") != 0
3506 && strcmp (TREE_STRING_POINTER (cst
), "thunk-inline") != 0
3507 && strcmp (TREE_STRING_POINTER (cst
), "thunk-extern") != 0)
3509 warning (OPT_Wattributes
,
3510 "argument to %qE attribute is not "
3511 "(keep|thunk|thunk-inline|thunk-extern)", name
);
3512 *no_add_attrs
= true;
3516 if (is_attribute_p ("function_return", name
))
3518 tree cst
= TREE_VALUE (args
);
3519 if (TREE_CODE (cst
) != STRING_CST
)
3521 warning (OPT_Wattributes
,
3522 "%qE attribute requires a string constant argument",
3524 *no_add_attrs
= true;
3526 else if (strcmp (TREE_STRING_POINTER (cst
), "keep") != 0
3527 && strcmp (TREE_STRING_POINTER (cst
), "thunk") != 0
3528 && strcmp (TREE_STRING_POINTER (cst
), "thunk-inline") != 0
3529 && strcmp (TREE_STRING_POINTER (cst
), "thunk-extern") != 0)
3531 warning (OPT_Wattributes
,
3532 "argument to %qE attribute is not "
3533 "(keep|thunk|thunk-inline|thunk-extern)", name
);
3534 *no_add_attrs
= true;
3542 ix86_handle_no_caller_saved_registers_attribute (tree
*, tree
, tree
,
3549 ix86_handle_interrupt_attribute (tree
*node
, tree
, tree
, int, bool *)
3551 /* DECL_RESULT and DECL_ARGUMENTS do not exist there yet,
3552 but the function type contains args and return type data. */
3553 tree func_type
= *node
;
3554 tree return_type
= TREE_TYPE (func_type
);
3557 tree current_arg_type
= TYPE_ARG_TYPES (func_type
);
3558 while (current_arg_type
3559 && ! VOID_TYPE_P (TREE_VALUE (current_arg_type
)))
3563 if (! POINTER_TYPE_P (TREE_VALUE (current_arg_type
)))
3564 error ("interrupt service routine should have a pointer "
3565 "as the first argument");
3567 else if (nargs
== 1)
3569 if (TREE_CODE (TREE_VALUE (current_arg_type
)) != INTEGER_TYPE
3570 || TYPE_MODE (TREE_VALUE (current_arg_type
)) != word_mode
)
3571 error ("interrupt service routine should have %qs "
3572 "as the second argument",
3574 ? (TARGET_X32
? "unsigned long long int"
3575 : "unsigned long int")
3579 current_arg_type
= TREE_CHAIN (current_arg_type
);
3581 if (!nargs
|| nargs
> 2)
3582 error ("interrupt service routine can only have a pointer argument "
3583 "and an optional integer argument");
3584 if (! VOID_TYPE_P (return_type
))
3585 error ("interrupt service routine can%'t have non-void return value");
3590 /* Handle fentry_name / fentry_section attribute. */
3593 ix86_handle_fentry_name (tree
*node
, tree name
, tree args
,
3594 int, bool *no_add_attrs
)
3596 if (TREE_CODE (*node
) == FUNCTION_DECL
3597 && TREE_CODE (TREE_VALUE (args
)) == STRING_CST
)
3598 /* Do nothing else, just set the attribute. We'll get at
3599 it later with lookup_attribute. */
3603 warning (OPT_Wattributes
, "%qE attribute ignored", name
);
3604 *no_add_attrs
= true;
3610 /* Table of valid machine attributes. */
3611 const struct attribute_spec ix86_attribute_table
[] =
3613 /* { name, min_len, max_len, decl_req, type_req, fn_type_req,
3614 affects_type_identity, handler, exclude } */
3615 /* Stdcall attribute says callee is responsible for popping arguments
3616 if they are not variable. */
3617 { "stdcall", 0, 0, false, true, true, true, ix86_handle_cconv_attribute
,
3619 /* Fastcall attribute says callee is responsible for popping arguments
3620 if they are not variable. */
3621 { "fastcall", 0, 0, false, true, true, true, ix86_handle_cconv_attribute
,
3623 /* Thiscall attribute says callee is responsible for popping arguments
3624 if they are not variable. */
3625 { "thiscall", 0, 0, false, true, true, true, ix86_handle_cconv_attribute
,
3627 /* Cdecl attribute says the callee is a normal C declaration */
3628 { "cdecl", 0, 0, false, true, true, true, ix86_handle_cconv_attribute
,
3630 /* Regparm attribute specifies how many integer arguments are to be
3631 passed in registers. */
3632 { "regparm", 1, 1, false, true, true, true, ix86_handle_cconv_attribute
,
3634 /* Sseregparm attribute says we are using x86_64 calling conventions
3635 for FP arguments. */
3636 { "sseregparm", 0, 0, false, true, true, true, ix86_handle_cconv_attribute
,
3638 /* The transactional memory builtins are implicitly regparm or fastcall
3639 depending on the ABI. Override the generic do-nothing attribute that
3640 these builtins were declared with. */
3641 { "*tm regparm", 0, 0, false, true, true, true,
3642 ix86_handle_tm_regparm_attribute
, NULL
},
3643 /* force_align_arg_pointer says this function realigns the stack at entry. */
3644 { "force_align_arg_pointer", 0, 0,
3645 false, true, true, false, ix86_handle_force_align_arg_pointer_attribute
,
3647 #if TARGET_DLLIMPORT_DECL_ATTRIBUTES
3648 { "dllimport", 0, 0, false, false, false, false, handle_dll_attribute
,
3650 { "dllexport", 0, 0, false, false, false, false, handle_dll_attribute
,
3652 { "shared", 0, 0, true, false, false, false,
3653 ix86_handle_shared_attribute
, NULL
},
3655 { "ms_struct", 0, 0, false, false, false, false,
3656 ix86_handle_struct_attribute
, NULL
},
3657 { "gcc_struct", 0, 0, false, false, false, false,
3658 ix86_handle_struct_attribute
, NULL
},
3659 #ifdef SUBTARGET_ATTRIBUTE_TABLE
3660 SUBTARGET_ATTRIBUTE_TABLE
,
3662 /* ms_abi and sysv_abi calling convention function attributes. */
3663 { "ms_abi", 0, 0, false, true, true, true, ix86_handle_abi_attribute
, NULL
},
3664 { "sysv_abi", 0, 0, false, true, true, true, ix86_handle_abi_attribute
,
3666 { "ms_abi va_list", 0, 0, false, false, false, false, NULL
, NULL
},
3667 { "sysv_abi va_list", 0, 0, false, false, false, false, NULL
, NULL
},
3668 { "ms_hook_prologue", 0, 0, true, false, false, false,
3669 ix86_handle_fndecl_attribute
, NULL
},
3670 { "callee_pop_aggregate_return", 1, 1, false, true, true, true,
3671 ix86_handle_callee_pop_aggregate_return
, NULL
},
3672 { "interrupt", 0, 0, false, true, true, false,
3673 ix86_handle_interrupt_attribute
, NULL
},
3674 { "no_caller_saved_registers", 0, 0, false, true, true, false,
3675 ix86_handle_no_caller_saved_registers_attribute
, NULL
},
3676 { "naked", 0, 0, true, false, false, false,
3677 ix86_handle_fndecl_attribute
, NULL
},
3678 { "indirect_branch", 1, 1, true, false, false, false,
3679 ix86_handle_fndecl_attribute
, NULL
},
3680 { "function_return", 1, 1, true, false, false, false,
3681 ix86_handle_fndecl_attribute
, NULL
},
3682 { "indirect_return", 0, 0, false, true, true, false,
3684 { "fentry_name", 1, 1, true, false, false, false,
3685 ix86_handle_fentry_name
, NULL
},
3686 { "fentry_section", 1, 1, true, false, false, false,
3687 ix86_handle_fentry_name
, NULL
},
3688 { "cf_check", 0, 0, true, false, false, false,
3689 ix86_handle_fndecl_attribute
, NULL
},
3692 { NULL
, 0, 0, false, false, false, false, NULL
, NULL
}
3695 #include "gt-i386-options.h"