1 /* Default target hook functions.
2 Copyright (C) 2003, 2004, 2005, 2007, 2008, 2009, 2010, 2011
3 Free Software Foundation, Inc.
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 3, or (at your option) any later
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING3. If not see
19 <http://www.gnu.org/licenses/>. */
21 /* The migration of target macros to target hooks works as follows:
23 1. Create a target hook that uses the existing target macros to
24 implement the same functionality.
26 2. Convert all the MI files to use the hook instead of the macro.
28 3. Repeat for a majority of the remaining target macros. This will
31 4. Tell target maintainers to start migrating.
33 5. Eventually convert the backends to override the hook instead of
34 defining the macros. This will take some time too.
36 6. TBD when, poison the macros. Unmigrated targets will break at
39 Note that we expect steps 1-3 to be done by the people that
40 understand what the MI does with each macro, and step 5 to be done
41 by the target maintainers for their respective targets.
43 Note that steps 1 and 2 don't have to be done together, but no
44 target can override the new hook until step 2 is complete for it.
46 Once the macros are poisoned, we will revert to the old migration
47 rules - migrate the macro, callers, and targets all at once. This
48 comment can thus be removed at that point. */
52 #include "coretypes.h"
59 #include "diagnostic-core.h"
63 #include "target-def.h"
65 #include "hard-reg-set.h"
72 #include "tree-flow.h"
73 #include "tree-ssa-alias.h"
77 default_legitimate_address_p (enum machine_mode mode ATTRIBUTE_UNUSED
,
78 rtx addr ATTRIBUTE_UNUSED
,
79 bool strict ATTRIBUTE_UNUSED
)
81 #ifdef GO_IF_LEGITIMATE_ADDRESS
82 /* Defer to the old implementation using a goto. */
84 return strict_memory_address_p (mode
, addr
);
86 return memory_address_p (mode
, addr
);
93 default_external_libcall (rtx fun ATTRIBUTE_UNUSED
)
95 #ifdef ASM_OUTPUT_EXTERNAL_LIBCALL
96 ASM_OUTPUT_EXTERNAL_LIBCALL(asm_out_file
, fun
);
101 default_unspec_may_trap_p (const_rtx x
, unsigned flags
)
105 /* Any floating arithmetic may trap. */
106 if ((SCALAR_FLOAT_MODE_P (GET_MODE (x
)) && flag_trapping_math
))
109 for (i
= 0; i
< XVECLEN (x
, 0); ++i
)
111 if (may_trap_p_1 (XVECEXP (x
, 0, i
), flags
))
119 default_promote_function_mode (const_tree type ATTRIBUTE_UNUSED
,
120 enum machine_mode mode
,
121 int *punsignedp ATTRIBUTE_UNUSED
,
122 const_tree funtype ATTRIBUTE_UNUSED
,
123 int for_return ATTRIBUTE_UNUSED
)
125 if (type
!= NULL_TREE
&& for_return
== 2)
126 return promote_mode (type
, mode
, punsignedp
);
131 default_promote_function_mode_always_promote (const_tree type
,
132 enum machine_mode mode
,
134 const_tree funtype ATTRIBUTE_UNUSED
,
135 int for_return ATTRIBUTE_UNUSED
)
137 return promote_mode (type
, mode
, punsignedp
);
142 default_cc_modes_compatible (enum machine_mode m1
, enum machine_mode m2
)
150 default_return_in_memory (const_tree type
,
151 const_tree fntype ATTRIBUTE_UNUSED
)
153 return (TYPE_MODE (type
) == BLKmode
);
157 default_legitimize_address (rtx x
, rtx orig_x ATTRIBUTE_UNUSED
,
158 enum machine_mode mode ATTRIBUTE_UNUSED
)
164 default_expand_builtin_saveregs (void)
166 error ("__builtin_saveregs not supported by this target");
171 default_setup_incoming_varargs (cumulative_args_t ca ATTRIBUTE_UNUSED
,
172 enum machine_mode mode ATTRIBUTE_UNUSED
,
173 tree type ATTRIBUTE_UNUSED
,
174 int *pretend_arg_size ATTRIBUTE_UNUSED
,
175 int second_time ATTRIBUTE_UNUSED
)
179 /* The default implementation of TARGET_BUILTIN_SETJMP_FRAME_VALUE. */
182 default_builtin_setjmp_frame_value (void)
184 return virtual_stack_vars_rtx
;
187 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns false. */
190 hook_bool_CUMULATIVE_ARGS_false (cumulative_args_t ca ATTRIBUTE_UNUSED
)
196 default_pretend_outgoing_varargs_named (cumulative_args_t ca ATTRIBUTE_UNUSED
)
198 return (targetm
.calls
.setup_incoming_varargs
199 != default_setup_incoming_varargs
);
203 default_eh_return_filter_mode (void)
205 return targetm
.unwind_word_mode ();
209 default_libgcc_cmp_return_mode (void)
215 default_libgcc_shift_count_mode (void)
221 default_unwind_word_mode (void)
226 /* The default implementation of TARGET_SHIFT_TRUNCATION_MASK. */
228 unsigned HOST_WIDE_INT
229 default_shift_truncation_mask (enum machine_mode mode
)
231 return SHIFT_COUNT_TRUNCATED
? GET_MODE_BITSIZE (mode
) - 1 : 0;
234 /* The default implementation of TARGET_MIN_DIVISIONS_FOR_RECIP_MUL. */
237 default_min_divisions_for_recip_mul (enum machine_mode mode ATTRIBUTE_UNUSED
)
239 return have_insn_for (DIV
, mode
) ? 3 : 2;
242 /* The default implementation of TARGET_MODE_REP_EXTENDED. */
245 default_mode_rep_extended (enum machine_mode mode ATTRIBUTE_UNUSED
,
246 enum machine_mode mode_rep ATTRIBUTE_UNUSED
)
251 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns true. */
254 hook_bool_CUMULATIVE_ARGS_true (cumulative_args_t a ATTRIBUTE_UNUSED
)
259 /* Return machine mode for non-standard suffix
260 or VOIDmode if non-standard suffixes are unsupported. */
262 default_mode_for_suffix (char suffix ATTRIBUTE_UNUSED
)
267 /* The generic C++ ABI specifies this is a 64-bit value. */
269 default_cxx_guard_type (void)
271 return long_long_integer_type_node
;
275 /* Returns the size of the cookie to use when allocating an array
276 whose elements have the indicated TYPE. Assumes that it is already
277 known that a cookie is needed. */
280 default_cxx_get_cookie_size (tree type
)
284 /* We need to allocate an additional max (sizeof (size_t), alignof
285 (true_type)) bytes. */
289 sizetype_size
= size_in_bytes (sizetype
);
290 type_align
= size_int (TYPE_ALIGN_UNIT (type
));
291 if (INT_CST_LT_UNSIGNED (type_align
, sizetype_size
))
292 cookie_size
= sizetype_size
;
294 cookie_size
= type_align
;
299 /* Return true if a parameter must be passed by reference. This version
300 of the TARGET_PASS_BY_REFERENCE hook uses just MUST_PASS_IN_STACK. */
303 hook_pass_by_reference_must_pass_in_stack (cumulative_args_t c ATTRIBUTE_UNUSED
,
304 enum machine_mode mode ATTRIBUTE_UNUSED
, const_tree type ATTRIBUTE_UNUSED
,
305 bool named_arg ATTRIBUTE_UNUSED
)
307 return targetm
.calls
.must_pass_in_stack (mode
, type
);
310 /* Return true if a parameter follows callee copies conventions. This
311 version of the hook is true for all named arguments. */
314 hook_callee_copies_named (cumulative_args_t ca ATTRIBUTE_UNUSED
,
315 enum machine_mode mode ATTRIBUTE_UNUSED
,
316 const_tree type ATTRIBUTE_UNUSED
, bool named
)
321 /* Emit to STREAM the assembler syntax for insn operand X. */
324 default_print_operand (FILE *stream ATTRIBUTE_UNUSED
, rtx x ATTRIBUTE_UNUSED
,
325 int code ATTRIBUTE_UNUSED
)
328 PRINT_OPERAND (stream
, x
, code
);
334 /* Emit to STREAM the assembler syntax for an insn operand whose memory
338 default_print_operand_address (FILE *stream ATTRIBUTE_UNUSED
,
339 rtx x ATTRIBUTE_UNUSED
)
341 #ifdef PRINT_OPERAND_ADDRESS
342 PRINT_OPERAND_ADDRESS (stream
, x
);
348 /* Return true if CODE is a valid punctuation character for the
349 `print_operand' hook. */
352 default_print_operand_punct_valid_p (unsigned char code ATTRIBUTE_UNUSED
)
354 #ifdef PRINT_OPERAND_PUNCT_VALID_P
355 return PRINT_OPERAND_PUNCT_VALID_P (code
);
361 /* The default implementation of TARGET_MANGLE_ASSEMBLER_NAME. */
363 default_mangle_assembler_name (const char *name ATTRIBUTE_UNUSED
)
365 const char *skipped
= name
+ (*name
== '*' ? 1 : 0);
366 const char *stripped
= targetm
.strip_name_encoding (skipped
);
367 if (*name
!= '*' && user_label_prefix
[0])
368 stripped
= ACONCAT ((user_label_prefix
, stripped
, NULL
));
369 return get_identifier (stripped
);
372 /* True if MODE is valid for the target. By "valid", we mean able to
373 be manipulated in non-trivial ways. In particular, this means all
374 the arithmetic is supported.
376 By default we guess this means that any C type is supported. If
377 we can't map the mode back to a type that would be available in C,
378 then reject it. Special case, here, is the double-word arithmetic
379 supported by optabs.c. */
382 default_scalar_mode_supported_p (enum machine_mode mode
)
384 int precision
= GET_MODE_PRECISION (mode
);
386 switch (GET_MODE_CLASS (mode
))
388 case MODE_PARTIAL_INT
:
390 if (precision
== CHAR_TYPE_SIZE
)
392 if (precision
== SHORT_TYPE_SIZE
)
394 if (precision
== INT_TYPE_SIZE
)
396 if (precision
== LONG_TYPE_SIZE
)
398 if (precision
== LONG_LONG_TYPE_SIZE
)
400 if (precision
== 2 * BITS_PER_WORD
)
405 if (precision
== FLOAT_TYPE_SIZE
)
407 if (precision
== DOUBLE_TYPE_SIZE
)
409 if (precision
== LONG_DOUBLE_TYPE_SIZE
)
413 case MODE_DECIMAL_FLOAT
:
425 /* Make some target macros useable by target-independent code. */
427 targhook_words_big_endian (void)
429 return !!WORDS_BIG_ENDIAN
;
433 targhook_float_words_big_endian (void)
435 return !!FLOAT_WORDS_BIG_ENDIAN
;
438 /* True if the target supports decimal floating point. */
441 default_decimal_float_supported_p (void)
443 return ENABLE_DECIMAL_FLOAT
;
446 /* True if the target supports fixed-point arithmetic. */
449 default_fixed_point_supported_p (void)
451 return ENABLE_FIXED_POINT
;
454 /* NULL if INSN insn is valid within a low-overhead loop, otherwise returns
457 This function checks whether a given INSN is valid within a low-overhead
458 loop. If INSN is invalid it returns the reason for that, otherwise it
459 returns NULL. A called function may clobber any special registers required
460 for low-overhead looping. Additionally, some targets (eg, PPC) use the count
461 register for branch on table instructions. We reject the doloop pattern in
465 default_invalid_within_doloop (const_rtx insn
)
468 return "Function call in loop.";
470 if (JUMP_TABLE_DATA_P (insn
))
471 return "Computed branch in the loop.";
476 /* Mapping of builtin functions to vectorized variants. */
479 default_builtin_vectorized_function (tree fndecl ATTRIBUTE_UNUSED
,
480 tree type_out ATTRIBUTE_UNUSED
,
481 tree type_in ATTRIBUTE_UNUSED
)
486 /* Vectorized conversion. */
489 default_builtin_vectorized_conversion (unsigned int code ATTRIBUTE_UNUSED
,
490 tree dest_type ATTRIBUTE_UNUSED
,
491 tree src_type ATTRIBUTE_UNUSED
)
496 /* Default vectorizer cost model values. */
499 default_builtin_vectorization_cost (enum vect_cost_for_stmt type_of_cost
,
501 int misalign ATTRIBUTE_UNUSED
)
505 switch (type_of_cost
)
515 case cond_branch_not_taken
:
517 case vec_promote_demote
:
521 case unaligned_store
:
524 case cond_branch_taken
:
528 elements
= TYPE_VECTOR_SUBPARTS (vectype
);
529 return elements
/ 2 + 1;
539 default_builtin_reciprocal (unsigned int fn ATTRIBUTE_UNUSED
,
540 bool md_fn ATTRIBUTE_UNUSED
,
541 bool sqrt ATTRIBUTE_UNUSED
)
547 hook_bool_CUMULATIVE_ARGS_mode_tree_bool_false (
548 cumulative_args_t ca ATTRIBUTE_UNUSED
,
549 enum machine_mode mode ATTRIBUTE_UNUSED
,
550 const_tree type ATTRIBUTE_UNUSED
, bool named ATTRIBUTE_UNUSED
)
556 hook_bool_CUMULATIVE_ARGS_mode_tree_bool_true (
557 cumulative_args_t ca ATTRIBUTE_UNUSED
,
558 enum machine_mode mode ATTRIBUTE_UNUSED
,
559 const_tree type ATTRIBUTE_UNUSED
, bool named ATTRIBUTE_UNUSED
)
565 hook_int_CUMULATIVE_ARGS_mode_tree_bool_0 (
566 cumulative_args_t ca ATTRIBUTE_UNUSED
,
567 enum machine_mode mode ATTRIBUTE_UNUSED
,
568 tree type ATTRIBUTE_UNUSED
, bool named ATTRIBUTE_UNUSED
)
574 default_function_arg_advance (cumulative_args_t ca ATTRIBUTE_UNUSED
,
575 enum machine_mode mode ATTRIBUTE_UNUSED
,
576 const_tree type ATTRIBUTE_UNUSED
,
577 bool named ATTRIBUTE_UNUSED
)
583 default_function_arg (cumulative_args_t ca ATTRIBUTE_UNUSED
,
584 enum machine_mode mode ATTRIBUTE_UNUSED
,
585 const_tree type ATTRIBUTE_UNUSED
,
586 bool named ATTRIBUTE_UNUSED
)
592 default_function_incoming_arg (cumulative_args_t ca ATTRIBUTE_UNUSED
,
593 enum machine_mode mode ATTRIBUTE_UNUSED
,
594 const_tree type ATTRIBUTE_UNUSED
,
595 bool named ATTRIBUTE_UNUSED
)
601 default_function_arg_boundary (enum machine_mode mode ATTRIBUTE_UNUSED
,
602 const_tree type ATTRIBUTE_UNUSED
)
604 return PARM_BOUNDARY
;
608 default_function_arg_round_boundary (enum machine_mode mode ATTRIBUTE_UNUSED
,
609 const_tree type ATTRIBUTE_UNUSED
)
611 return PARM_BOUNDARY
;
615 hook_void_bitmap (bitmap regs ATTRIBUTE_UNUSED
)
620 hook_invalid_arg_for_unprototyped_fn (
621 const_tree typelist ATTRIBUTE_UNUSED
,
622 const_tree funcdecl ATTRIBUTE_UNUSED
,
623 const_tree val ATTRIBUTE_UNUSED
)
628 /* Initialize the stack protection decls. */
630 /* Stack protection related decls living in libgcc. */
631 static GTY(()) tree stack_chk_guard_decl
;
634 default_stack_protect_guard (void)
636 tree t
= stack_chk_guard_decl
;
642 t
= build_decl (UNKNOWN_LOCATION
,
643 VAR_DECL
, get_identifier ("__stack_chk_guard"),
647 DECL_EXTERNAL (t
) = 1;
649 TREE_THIS_VOLATILE (t
) = 1;
650 DECL_ARTIFICIAL (t
) = 1;
651 DECL_IGNORED_P (t
) = 1;
653 /* Do not share RTL as the declaration is visible outside of
656 RTX_FLAG (x
, used
) = 1;
658 stack_chk_guard_decl
= t
;
664 static GTY(()) tree stack_chk_fail_decl
;
667 default_external_stack_protect_fail (void)
669 tree t
= stack_chk_fail_decl
;
673 t
= build_function_type_list (void_type_node
, NULL_TREE
);
674 t
= build_decl (UNKNOWN_LOCATION
,
675 FUNCTION_DECL
, get_identifier ("__stack_chk_fail"), t
);
678 DECL_EXTERNAL (t
) = 1;
680 TREE_THIS_VOLATILE (t
) = 1;
681 TREE_NOTHROW (t
) = 1;
682 DECL_ARTIFICIAL (t
) = 1;
683 DECL_IGNORED_P (t
) = 1;
684 DECL_VISIBILITY (t
) = VISIBILITY_DEFAULT
;
685 DECL_VISIBILITY_SPECIFIED (t
) = 1;
687 stack_chk_fail_decl
= t
;
690 return build_call_expr (t
, 0);
694 default_hidden_stack_protect_fail (void)
696 #ifndef HAVE_GAS_HIDDEN
697 return default_external_stack_protect_fail ();
699 tree t
= stack_chk_fail_decl
;
702 return default_external_stack_protect_fail ();
706 t
= build_function_type_list (void_type_node
, NULL_TREE
);
707 t
= build_decl (UNKNOWN_LOCATION
, FUNCTION_DECL
,
708 get_identifier ("__stack_chk_fail_local"), t
);
711 DECL_EXTERNAL (t
) = 1;
713 TREE_THIS_VOLATILE (t
) = 1;
714 TREE_NOTHROW (t
) = 1;
715 DECL_ARTIFICIAL (t
) = 1;
716 DECL_IGNORED_P (t
) = 1;
717 DECL_VISIBILITY_SPECIFIED (t
) = 1;
718 DECL_VISIBILITY (t
) = VISIBILITY_HIDDEN
;
720 stack_chk_fail_decl
= t
;
723 return build_call_expr (t
, 0);
728 hook_bool_const_rtx_commutative_p (const_rtx x
,
729 int outer_code ATTRIBUTE_UNUSED
)
731 return COMMUTATIVE_P (x
);
735 default_function_value (const_tree ret_type ATTRIBUTE_UNUSED
,
736 const_tree fn_decl_or_type
,
737 bool outgoing ATTRIBUTE_UNUSED
)
739 /* The old interface doesn't handle receiving the function type. */
741 && !DECL_P (fn_decl_or_type
))
742 fn_decl_or_type
= NULL
;
744 #ifdef FUNCTION_VALUE
745 return FUNCTION_VALUE (ret_type
, fn_decl_or_type
);
752 default_libcall_value (enum machine_mode mode ATTRIBUTE_UNUSED
,
753 const_rtx fun ATTRIBUTE_UNUSED
)
756 return LIBCALL_VALUE (mode
);
762 /* The default hook for TARGET_FUNCTION_VALUE_REGNO_P. */
765 default_function_value_regno_p (const unsigned int regno ATTRIBUTE_UNUSED
)
767 #ifdef FUNCTION_VALUE_REGNO_P
768 return FUNCTION_VALUE_REGNO_P (regno
);
775 default_internal_arg_pointer (void)
777 /* If the reg that the virtual arg pointer will be translated into is
778 not a fixed reg or is the stack pointer, make a copy of the virtual
779 arg pointer, and address parms via the copy. The frame pointer is
780 considered fixed even though it is not marked as such. */
781 if ((ARG_POINTER_REGNUM
== STACK_POINTER_REGNUM
782 || ! (fixed_regs
[ARG_POINTER_REGNUM
]
783 || ARG_POINTER_REGNUM
== FRAME_POINTER_REGNUM
)))
784 return copy_to_reg (virtual_incoming_args_rtx
);
786 return virtual_incoming_args_rtx
;
790 default_static_chain (const_tree fndecl
, bool incoming_p
)
792 if (!DECL_STATIC_CHAIN (fndecl
))
797 #ifdef STATIC_CHAIN_INCOMING_REGNUM
798 return gen_rtx_REG (Pmode
, STATIC_CHAIN_INCOMING_REGNUM
);
802 #ifdef STATIC_CHAIN_REGNUM
803 return gen_rtx_REG (Pmode
, STATIC_CHAIN_REGNUM
);
807 static bool issued_error
;
811 sorry ("nested functions not supported on this target");
814 /* It really doesn't matter what we return here, so long at it
815 doesn't cause the rest of the compiler to crash. */
816 return gen_rtx_MEM (Pmode
, stack_pointer_rtx
);
821 default_trampoline_init (rtx
ARG_UNUSED (m_tramp
), tree
ARG_UNUSED (t_func
),
822 rtx
ARG_UNUSED (r_chain
))
824 sorry ("nested function trampolines not supported on this target");
828 default_return_pops_args (tree fundecl ATTRIBUTE_UNUSED
,
829 tree funtype ATTRIBUTE_UNUSED
,
830 int size ATTRIBUTE_UNUSED
)
836 default_branch_target_register_class (void)
848 default_register_priority (int hard_regno ATTRIBUTE_UNUSED
)
854 default_different_addr_displacement_p (void)
860 default_secondary_reload (bool in_p ATTRIBUTE_UNUSED
, rtx x ATTRIBUTE_UNUSED
,
861 reg_class_t reload_class_i ATTRIBUTE_UNUSED
,
862 enum machine_mode reload_mode ATTRIBUTE_UNUSED
,
863 secondary_reload_info
*sri
)
865 enum reg_class rclass
= NO_REGS
;
866 enum reg_class reload_class
= (enum reg_class
) reload_class_i
;
868 if (sri
->prev_sri
&& sri
->prev_sri
->t_icode
!= CODE_FOR_nothing
)
870 sri
->icode
= sri
->prev_sri
->t_icode
;
873 #ifdef SECONDARY_INPUT_RELOAD_CLASS
875 rclass
= SECONDARY_INPUT_RELOAD_CLASS (reload_class
, reload_mode
, x
);
877 #ifdef SECONDARY_OUTPUT_RELOAD_CLASS
879 rclass
= SECONDARY_OUTPUT_RELOAD_CLASS (reload_class
, reload_mode
, x
);
881 if (rclass
!= NO_REGS
)
884 = direct_optab_handler (in_p
? reload_in_optab
: reload_out_optab
,
887 if (icode
!= CODE_FOR_nothing
888 && !insn_operand_matches (icode
, in_p
, x
))
889 icode
= CODE_FOR_nothing
;
890 else if (icode
!= CODE_FOR_nothing
)
892 const char *insn_constraint
, *scratch_constraint
;
893 char insn_letter
, scratch_letter
;
894 enum reg_class insn_class
, scratch_class
;
896 gcc_assert (insn_data
[(int) icode
].n_operands
== 3);
897 insn_constraint
= insn_data
[(int) icode
].operand
[!in_p
].constraint
;
898 if (!*insn_constraint
)
899 insn_class
= ALL_REGS
;
904 gcc_assert (*insn_constraint
== '=');
907 insn_letter
= *insn_constraint
;
909 = (insn_letter
== 'r' ? GENERAL_REGS
910 : REG_CLASS_FROM_CONSTRAINT ((unsigned char) insn_letter
,
912 gcc_assert (insn_class
!= NO_REGS
);
915 scratch_constraint
= insn_data
[(int) icode
].operand
[2].constraint
;
916 /* The scratch register's constraint must start with "=&",
917 except for an input reload, where only "=" is necessary,
918 and where it might be beneficial to re-use registers from
920 gcc_assert (scratch_constraint
[0] == '='
921 && (in_p
|| scratch_constraint
[1] == '&'));
922 scratch_constraint
++;
923 if (*scratch_constraint
== '&')
924 scratch_constraint
++;
925 scratch_letter
= *scratch_constraint
;
927 = (scratch_letter
== 'r' ? GENERAL_REGS
928 : REG_CLASS_FROM_CONSTRAINT ((unsigned char) scratch_letter
,
929 scratch_constraint
));
931 if (reg_class_subset_p (reload_class
, insn_class
))
933 gcc_assert (scratch_class
== rclass
);
940 if (rclass
== NO_REGS
)
943 sri
->t_icode
= icode
;
948 /* By default, if flag_pic is true, then neither local nor global relocs
949 should be placed in readonly memory. */
952 default_reloc_rw_mask (void)
954 return flag_pic
? 3 : 0;
957 /* By default, do no modification. */
958 tree
default_mangle_decl_assembler_name (tree decl ATTRIBUTE_UNUSED
,
964 /* Default to natural alignment for vector types. */
966 default_vector_alignment (const_tree type
)
968 return tree_low_cst (TYPE_SIZE (type
), 0);
972 default_builtin_vector_alignment_reachable (const_tree type
, bool is_packed
)
977 /* Assuming that types whose size is > pointer-size are not guaranteed to be
978 naturally aligned. */
979 if (tree_int_cst_compare (TYPE_SIZE (type
), bitsize_int (POINTER_SIZE
)) > 0)
982 /* Assuming that types whose size is <= pointer-size
983 are naturally aligned. */
987 /* By default, assume that a target supports any factor of misalignment
988 memory access if it supports movmisalign patten.
989 is_packed is true if the memory access is defined in a packed struct. */
991 default_builtin_support_vector_misalignment (enum machine_mode mode
,
999 if (optab_handler (movmisalign_optab
, mode
) != CODE_FOR_nothing
)
1004 /* By default, only attempt to parallelize bitwise operations, and
1005 possibly adds/subtracts using bit-twiddling. */
1008 default_preferred_simd_mode (enum machine_mode mode ATTRIBUTE_UNUSED
)
1013 /* By default only the size derived from the preferred vector mode
1017 default_autovectorize_vector_sizes (void)
1022 /* By default, the cost model accumulates three separate costs (prologue,
1023 loop body, and epilogue) for a vectorized loop or block. So allocate an
1024 array of three unsigned ints, set it to zero, and return its address. */
1027 default_init_cost (struct loop
*loop_info ATTRIBUTE_UNUSED
)
1029 unsigned *cost
= XNEWVEC (unsigned, 3);
1030 cost
[vect_prologue
] = cost
[vect_body
] = cost
[vect_epilogue
] = 0;
1034 /* By default, the cost model looks up the cost of the given statement
1035 kind and mode, multiplies it by the occurrence count, accumulates
1036 it into the cost specified by WHERE, and returns the cost added. */
1039 default_add_stmt_cost (void *data
, int count
, enum vect_cost_for_stmt kind
,
1040 struct _stmt_vec_info
*stmt_info
, int misalign
,
1041 enum vect_cost_model_location where
)
1043 unsigned *cost
= (unsigned *) data
;
1044 unsigned retval
= 0;
1046 if (flag_vect_cost_model
)
1048 tree vectype
= stmt_info
? stmt_vectype (stmt_info
) : NULL_TREE
;
1049 int stmt_cost
= default_builtin_vectorization_cost (kind
, vectype
,
1051 /* Statements in an inner loop relative to the loop being
1052 vectorized are weighted more heavily. The value here is
1053 arbitrary and could potentially be improved with analysis. */
1054 if (where
== vect_body
&& stmt_info
&& stmt_in_inner_loop_p (stmt_info
))
1055 count
*= 50; /* FIXME. */
1057 retval
= (unsigned) (count
* stmt_cost
);
1058 cost
[where
] += retval
;
1064 /* By default, the cost model just returns the accumulated costs. */
1067 default_finish_cost (void *data
, unsigned *prologue_cost
,
1068 unsigned *body_cost
, unsigned *epilogue_cost
)
1070 unsigned *cost
= (unsigned *) data
;
1071 *prologue_cost
= cost
[vect_prologue
];
1072 *body_cost
= cost
[vect_body
];
1073 *epilogue_cost
= cost
[vect_epilogue
];
1076 /* Free the cost data. */
1079 default_destroy_cost_data (void *data
)
1084 /* Determine whether or not a pointer mode is valid. Assume defaults
1085 of ptr_mode or Pmode - can be overridden. */
1087 default_valid_pointer_mode (enum machine_mode mode
)
1089 return (mode
== ptr_mode
|| mode
== Pmode
);
1092 /* Determine whether the memory reference specified by REF may alias
1093 the C libraries errno location. */
1095 default_ref_may_alias_errno (ao_ref
*ref
)
1097 tree base
= ao_ref_base (ref
);
1098 /* The default implementation assumes the errno location is
1099 a declaration of type int or is always accessed via a
1100 pointer to int. We assume that accesses to errno are
1101 not deliberately obfuscated (even in conforming ways). */
1102 if (TYPE_UNSIGNED (TREE_TYPE (base
))
1103 || TYPE_MODE (TREE_TYPE (base
)) != TYPE_MODE (integer_type_node
))
1105 /* The default implementation assumes an errno location
1106 declaration is never defined in the current compilation unit. */
1108 && !TREE_STATIC (base
))
1110 else if (TREE_CODE (base
) == MEM_REF
1111 && TREE_CODE (TREE_OPERAND (base
, 0)) == SSA_NAME
)
1113 struct ptr_info_def
*pi
= SSA_NAME_PTR_INFO (TREE_OPERAND (base
, 0));
1114 return !pi
|| pi
->pt
.anything
|| pi
->pt
.nonlocal
;
1119 /* Return the mode for a pointer to a given ADDRSPACE, defaulting to ptr_mode
1120 for the generic address space only. */
1123 default_addr_space_pointer_mode (addr_space_t addrspace ATTRIBUTE_UNUSED
)
1125 gcc_assert (ADDR_SPACE_GENERIC_P (addrspace
));
1129 /* Return the mode for an address in a given ADDRSPACE, defaulting to Pmode
1130 for the generic address space only. */
1133 default_addr_space_address_mode (addr_space_t addrspace ATTRIBUTE_UNUSED
)
1135 gcc_assert (ADDR_SPACE_GENERIC_P (addrspace
));
1139 /* Named address space version of valid_pointer_mode. */
1142 default_addr_space_valid_pointer_mode (enum machine_mode mode
, addr_space_t as
)
1144 if (!ADDR_SPACE_GENERIC_P (as
))
1145 return (mode
== targetm
.addr_space
.pointer_mode (as
)
1146 || mode
== targetm
.addr_space
.address_mode (as
));
1148 return targetm
.valid_pointer_mode (mode
);
1151 /* Some places still assume that all pointer or address modes are the
1152 standard Pmode and ptr_mode. These optimizations become invalid if
1153 the target actually supports multiple different modes. For now,
1154 we disable such optimizations on such targets, using this function. */
1157 target_default_pointer_address_modes_p (void)
1159 if (targetm
.addr_space
.address_mode
!= default_addr_space_address_mode
)
1161 if (targetm
.addr_space
.pointer_mode
!= default_addr_space_pointer_mode
)
1167 /* Named address space version of legitimate_address_p. */
1170 default_addr_space_legitimate_address_p (enum machine_mode mode
, rtx mem
,
1171 bool strict
, addr_space_t as
)
1173 if (!ADDR_SPACE_GENERIC_P (as
))
1176 return targetm
.legitimate_address_p (mode
, mem
, strict
);
1179 /* Named address space version of LEGITIMIZE_ADDRESS. */
1182 default_addr_space_legitimize_address (rtx x
, rtx oldx
,
1183 enum machine_mode mode
, addr_space_t as
)
1185 if (!ADDR_SPACE_GENERIC_P (as
))
1188 return targetm
.legitimize_address (x
, oldx
, mode
);
1191 /* The default hook for determining if one named address space is a subset of
1192 another and to return which address space to use as the common address
1196 default_addr_space_subset_p (addr_space_t subset
, addr_space_t superset
)
1198 return (subset
== superset
);
1201 /* The default hook for TARGET_ADDR_SPACE_CONVERT. This hook should never be
1202 called for targets with only a generic address space. */
1205 default_addr_space_convert (rtx op ATTRIBUTE_UNUSED
,
1206 tree from_type ATTRIBUTE_UNUSED
,
1207 tree to_type ATTRIBUTE_UNUSED
)
1213 default_hard_regno_scratch_ok (unsigned int regno ATTRIBUTE_UNUSED
)
1218 /* The default implementation of TARGET_MODE_DEPENDENT_ADDRESS_P. */
1221 default_mode_dependent_address_p (const_rtx addr ATTRIBUTE_UNUSED
,
1222 addr_space_t addrspace ATTRIBUTE_UNUSED
)
1228 default_target_option_valid_attribute_p (tree
ARG_UNUSED (fndecl
),
1229 tree
ARG_UNUSED (name
),
1230 tree
ARG_UNUSED (args
),
1231 int ARG_UNUSED (flags
))
1233 warning (OPT_Wattributes
,
1234 "target attribute is not supported on this machine");
1240 default_target_option_pragma_parse (tree
ARG_UNUSED (args
),
1241 tree
ARG_UNUSED (pop_target
))
1243 warning (OPT_Wpragmas
,
1244 "#pragma GCC target is not supported for this machine");
1250 default_target_can_inline_p (tree caller
, tree callee
)
1253 tree callee_opts
= DECL_FUNCTION_SPECIFIC_TARGET (callee
);
1254 tree caller_opts
= DECL_FUNCTION_SPECIFIC_TARGET (caller
);
1256 /* If callee has no option attributes, then it is ok to inline */
1260 /* If caller has no option attributes, but callee does then it is not ok to
1262 else if (!caller_opts
)
1265 /* If both caller and callee have attributes, assume that if the
1266 pointer is different, the two functions have different target
1267 options since build_target_option_node uses a hash table for the
1270 ret
= (callee_opts
== caller_opts
);
1276 # define HAVE_casesi 0
1279 /* If the machine does not have a case insn that compares the bounds,
1280 this means extra overhead for dispatch tables, which raises the
1281 threshold for using them. */
1284 default_case_values_threshold (void)
1286 return (HAVE_casesi
? 4 : 5);
1290 default_have_conditional_execution (void)
1292 #ifdef HAVE_conditional_execution
1293 return HAVE_conditional_execution
;
1300 default_builtin_tm_load_store (tree
ARG_UNUSED (type
))
1305 /* Compute cost of moving registers to/from memory. */
1308 default_memory_move_cost (enum machine_mode mode ATTRIBUTE_UNUSED
,
1309 reg_class_t rclass ATTRIBUTE_UNUSED
,
1310 bool in ATTRIBUTE_UNUSED
)
1312 #ifndef MEMORY_MOVE_COST
1313 return (4 + memory_move_secondary_cost (mode
, (enum reg_class
) rclass
, in
));
1315 return MEMORY_MOVE_COST (mode
, (enum reg_class
) rclass
, in
);
1319 /* Compute cost of moving data from a register of class FROM to one of
1323 default_register_move_cost (enum machine_mode mode ATTRIBUTE_UNUSED
,
1324 reg_class_t from ATTRIBUTE_UNUSED
,
1325 reg_class_t to ATTRIBUTE_UNUSED
)
1327 #ifndef REGISTER_MOVE_COST
1330 return REGISTER_MOVE_COST (mode
, (enum reg_class
) from
, (enum reg_class
) to
);
1335 default_profile_before_prologue (void)
1337 #ifdef PROFILE_BEFORE_PROLOGUE
1344 /* The default implementation of TARGET_PREFERRED_RELOAD_CLASS. */
1347 default_preferred_reload_class (rtx x ATTRIBUTE_UNUSED
,
1350 #ifdef PREFERRED_RELOAD_CLASS
1351 return (reg_class_t
) PREFERRED_RELOAD_CLASS (x
, (enum reg_class
) rclass
);
1357 /* The default implementation of TARGET_OUTPUT_PREFERRED_RELOAD_CLASS. */
1360 default_preferred_output_reload_class (rtx x ATTRIBUTE_UNUSED
,
1366 /* The default implementation of TARGET_PREFERRED_RENAME_CLASS. */
1368 default_preferred_rename_class (reg_class_t rclass ATTRIBUTE_UNUSED
)
1373 /* The default implementation of TARGET_CLASS_LIKELY_SPILLED_P. */
1376 default_class_likely_spilled_p (reg_class_t rclass
)
1378 return (reg_class_size
[(int) rclass
] == 1);
1381 /* The default implementation of TARGET_CLASS_MAX_NREGS. */
1384 default_class_max_nregs (reg_class_t rclass ATTRIBUTE_UNUSED
,
1385 enum machine_mode mode ATTRIBUTE_UNUSED
)
1387 #ifdef CLASS_MAX_NREGS
1388 return (unsigned char) CLASS_MAX_NREGS ((enum reg_class
) rclass
, mode
);
1390 return ((GET_MODE_SIZE (mode
) + UNITS_PER_WORD
- 1) / UNITS_PER_WORD
);
1394 /* Determine the debugging unwind mechanism for the target. */
1396 enum unwind_info_type
1397 default_debug_unwind_info (void)
1399 /* If the target wants to force the use of dwarf2 unwind info, let it. */
1400 /* ??? Change all users to the hook, then poison this. */
1401 #ifdef DWARF2_FRAME_INFO
1402 if (DWARF2_FRAME_INFO
)
1406 /* Otherwise, only turn it on if dwarf2 debugging is enabled. */
1407 #ifdef DWARF2_DEBUGGING_INFO
1408 if (write_symbols
== DWARF2_DEBUG
|| write_symbols
== VMS_AND_DWARF2_DEBUG
)
1415 /* To be used by targets where reg_raw_mode doesn't return the right
1416 mode for registers used in apply_builtin_return and apply_builtin_arg. */
1419 default_get_reg_raw_mode(int regno
)
1421 return reg_raw_mode
[regno
];
1424 /* Return true if the state of option OPTION should be stored in PCH files
1425 and checked by default_pch_valid_p. Store the option's current state
1429 option_affects_pch_p (int option
, struct cl_option_state
*state
)
1431 if ((cl_options
[option
].flags
& CL_TARGET
) == 0)
1433 if (option_flag_var (option
, &global_options
) == &target_flags
)
1434 if (targetm
.check_pch_target_flags
)
1436 return get_option_state (&global_options
, option
, state
);
1439 /* Default version of get_pch_validity.
1440 By default, every flag difference is fatal; that will be mostly right for
1441 most targets, but completely right for very few. */
1444 default_get_pch_validity (size_t *sz
)
1446 struct cl_option_state state
;
1451 if (targetm
.check_pch_target_flags
)
1452 *sz
+= sizeof (target_flags
);
1453 for (i
= 0; i
< cl_options_count
; i
++)
1454 if (option_affects_pch_p (i
, &state
))
1457 result
= r
= XNEWVEC (char, *sz
);
1461 if (targetm
.check_pch_target_flags
)
1463 memcpy (r
, &target_flags
, sizeof (target_flags
));
1464 r
+= sizeof (target_flags
);
1467 for (i
= 0; i
< cl_options_count
; i
++)
1468 if (option_affects_pch_p (i
, &state
))
1470 memcpy (r
, state
.data
, state
.size
);
1477 /* Return a message which says that a PCH file was created with a different
1478 setting of OPTION. */
1481 pch_option_mismatch (const char *option
)
1485 asprintf (&r
, _("created and used with differing settings of '%s'"), option
);
1487 return _("out of memory");
1491 /* Default version of pch_valid_p. */
1494 default_pch_valid_p (const void *data_p
, size_t len
)
1496 struct cl_option_state state
;
1497 const char *data
= (const char *)data_p
;
1500 /* -fpic and -fpie also usually make a PCH invalid. */
1501 if (data
[0] != flag_pic
)
1502 return _("created and used with different settings of -fpic");
1503 if (data
[1] != flag_pie
)
1504 return _("created and used with different settings of -fpie");
1507 /* Check target_flags. */
1508 if (targetm
.check_pch_target_flags
)
1513 memcpy (&tf
, data
, sizeof (target_flags
));
1514 data
+= sizeof (target_flags
);
1515 len
-= sizeof (target_flags
);
1516 r
= targetm
.check_pch_target_flags (tf
);
1521 for (i
= 0; i
< cl_options_count
; i
++)
1522 if (option_affects_pch_p (i
, &state
))
1524 if (memcmp (data
, state
.data
, state
.size
) != 0)
1525 return pch_option_mismatch (cl_options
[i
].opt_text
);
1533 /* Default version of member_type_forces_blk. */
1536 default_member_type_forces_blk (const_tree
, enum machine_mode
)
1541 /* Default version of canonicalize_comparison. */
1544 default_canonicalize_comparison (int *, rtx
*, rtx
*, bool)
1548 #include "gt-targhooks.h"