1 /* Default target hook functions.
2 Copyright (C) 2003-2023 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify it under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 3, or (at your option) any later
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16 You should have received a copy of the GNU General Public License
17 along with GCC; see the file COPYING3. If not see
18 <http://www.gnu.org/licenses/>. */
20 /* The migration of target macros to target hooks works as follows:
22 1. Create a target hook that uses the existing target macros to
23 implement the same functionality.
25 2. Convert all the MI files to use the hook instead of the macro.
27 3. Repeat for a majority of the remaining target macros. This will
30 4. Tell target maintainers to start migrating.
32 5. Eventually convert the backends to override the hook instead of
33 defining the macros. This will take some time too.
35 6. TBD when, poison the macros. Unmigrated targets will break at
38 Note that we expect steps 1-3 to be done by the people that
39 understand what the MI does with each macro, and step 5 to be done
40 by the target maintainers for their respective targets.
42 Note that steps 1 and 2 don't have to be done together, but no
43 target can override the new hook until step 2 is complete for it.
45 Once the macros are poisoned, we will revert to the old migration
46 rules - migrate the macro, callers, and targets all at once. This
47 comment can thus be removed at that point. */
51 #include "coretypes.h"
56 #include "tree-ssa-alias.h"
57 #include "gimple-expr.h"
63 #include "stringpool.h"
65 #include "tree-ssanames.h"
66 #include "profile-count.h"
70 #include "diagnostic-core.h"
71 #include "fold-const.h"
72 #include "stor-layout.h"
80 #include "common/common-target.h"
87 #include "langhooks.h"
89 #include "function-abi.h"
95 #include "tree-vectorizer.h"
97 #include "case-cfn-macros.h"
100 default_legitimate_address_p (machine_mode mode ATTRIBUTE_UNUSED
,
101 rtx addr ATTRIBUTE_UNUSED
,
102 bool strict ATTRIBUTE_UNUSED
,
103 code_helper ATTRIBUTE_UNUSED
)
105 #ifdef GO_IF_LEGITIMATE_ADDRESS
106 /* Defer to the old implementation using a goto. */
108 return strict_memory_address_p (mode
, addr
);
110 return memory_address_p (mode
, addr
);
117 default_external_libcall (rtx fun ATTRIBUTE_UNUSED
)
119 #ifdef ASM_OUTPUT_EXTERNAL_LIBCALL
120 ASM_OUTPUT_EXTERNAL_LIBCALL (asm_out_file
, fun
);
125 default_unspec_may_trap_p (const_rtx x
, unsigned flags
)
129 /* Any floating arithmetic may trap. */
130 if ((SCALAR_FLOAT_MODE_P (GET_MODE (x
)) && flag_trapping_math
))
133 for (i
= 0; i
< XVECLEN (x
, 0); ++i
)
135 if (may_trap_p_1 (XVECEXP (x
, 0, i
), flags
))
143 default_promote_function_mode (const_tree type ATTRIBUTE_UNUSED
,
145 int *punsignedp ATTRIBUTE_UNUSED
,
146 const_tree funtype ATTRIBUTE_UNUSED
,
147 int for_return ATTRIBUTE_UNUSED
)
149 if (type
!= NULL_TREE
&& for_return
== 2)
150 return promote_mode (type
, mode
, punsignedp
);
155 default_promote_function_mode_always_promote (const_tree type
,
158 const_tree funtype ATTRIBUTE_UNUSED
,
159 int for_return ATTRIBUTE_UNUSED
)
161 return promote_mode (type
, mode
, punsignedp
);
165 default_cc_modes_compatible (machine_mode m1
, machine_mode m2
)
173 default_return_in_memory (const_tree type
,
174 const_tree fntype ATTRIBUTE_UNUSED
)
176 return (TYPE_MODE (type
) == BLKmode
);
180 default_legitimize_address (rtx x
, rtx orig_x ATTRIBUTE_UNUSED
,
181 machine_mode mode ATTRIBUTE_UNUSED
)
187 default_legitimize_address_displacement (rtx
*, rtx
*, poly_int64
,
194 default_const_not_ok_for_debug_p (rtx x
)
196 if (GET_CODE (x
) == UNSPEC
)
202 default_expand_builtin_saveregs (void)
204 error ("%<__builtin_saveregs%> not supported by this target");
209 default_setup_incoming_varargs (cumulative_args_t
,
210 const function_arg_info
&, int *, int)
214 /* The default implementation of TARGET_BUILTIN_SETJMP_FRAME_VALUE. */
217 default_builtin_setjmp_frame_value (void)
219 return virtual_stack_vars_rtx
;
222 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns false. */
225 hook_bool_CUMULATIVE_ARGS_false (cumulative_args_t ca ATTRIBUTE_UNUSED
)
231 default_pretend_outgoing_varargs_named (cumulative_args_t ca ATTRIBUTE_UNUSED
)
233 return (targetm
.calls
.setup_incoming_varargs
234 != default_setup_incoming_varargs
);
238 default_eh_return_filter_mode (void)
240 return targetm
.unwind_word_mode ();
244 default_libgcc_cmp_return_mode (void)
250 default_libgcc_shift_count_mode (void)
256 default_unwind_word_mode (void)
261 /* The default implementation of TARGET_SHIFT_TRUNCATION_MASK. */
263 unsigned HOST_WIDE_INT
264 default_shift_truncation_mask (machine_mode mode
)
266 return SHIFT_COUNT_TRUNCATED
? GET_MODE_UNIT_BITSIZE (mode
) - 1 : 0;
269 /* The default implementation of TARGET_MIN_DIVISIONS_FOR_RECIP_MUL. */
272 default_min_divisions_for_recip_mul (machine_mode mode ATTRIBUTE_UNUSED
)
274 return have_insn_for (DIV
, mode
) ? 3 : 2;
277 /* The default implementation of TARGET_MODE_REP_EXTENDED. */
280 default_mode_rep_extended (scalar_int_mode
, scalar_int_mode
)
285 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns true. */
288 hook_bool_CUMULATIVE_ARGS_true (cumulative_args_t a ATTRIBUTE_UNUSED
)
293 /* Return machine mode for non-standard suffix
294 or VOIDmode if non-standard suffixes are unsupported. */
296 default_mode_for_suffix (char suffix ATTRIBUTE_UNUSED
)
301 /* The generic C++ ABI specifies this is a 64-bit value. */
303 default_cxx_guard_type (void)
305 return long_long_integer_type_node
;
308 /* Returns the size of the cookie to use when allocating an array
309 whose elements have the indicated TYPE. Assumes that it is already
310 known that a cookie is needed. */
313 default_cxx_get_cookie_size (tree type
)
317 /* We need to allocate an additional max (sizeof (size_t), alignof
318 (true_type)) bytes. */
322 sizetype_size
= size_in_bytes (sizetype
);
323 type_align
= size_int (TYPE_ALIGN_UNIT (type
));
324 if (tree_int_cst_lt (type_align
, sizetype_size
))
325 cookie_size
= sizetype_size
;
327 cookie_size
= type_align
;
332 /* Return true if a parameter must be passed by reference. This version
333 of the TARGET_PASS_BY_REFERENCE hook uses just MUST_PASS_IN_STACK. */
336 hook_pass_by_reference_must_pass_in_stack (cumulative_args_t
,
337 const function_arg_info
&arg
)
339 return targetm
.calls
.must_pass_in_stack (arg
);
342 /* Return true if a parameter follows callee copies conventions. This
343 version of the hook is true for all named arguments. */
346 hook_callee_copies_named (cumulative_args_t
, const function_arg_info
&arg
)
351 /* Emit to STREAM the assembler syntax for insn operand X. */
354 default_print_operand (FILE *stream ATTRIBUTE_UNUSED
, rtx x ATTRIBUTE_UNUSED
,
355 int code ATTRIBUTE_UNUSED
)
358 PRINT_OPERAND (stream
, x
, code
);
364 /* Emit to STREAM the assembler syntax for an insn operand whose memory
368 default_print_operand_address (FILE *stream ATTRIBUTE_UNUSED
,
369 machine_mode
/*mode*/,
370 rtx x ATTRIBUTE_UNUSED
)
372 #ifdef PRINT_OPERAND_ADDRESS
373 PRINT_OPERAND_ADDRESS (stream
, x
);
379 /* Return true if CODE is a valid punctuation character for the
380 `print_operand' hook. */
383 default_print_operand_punct_valid_p (unsigned char code ATTRIBUTE_UNUSED
)
385 #ifdef PRINT_OPERAND_PUNCT_VALID_P
386 return PRINT_OPERAND_PUNCT_VALID_P (code
);
392 /* The default implementation of TARGET_MANGLE_ASSEMBLER_NAME. */
394 default_mangle_assembler_name (const char *name ATTRIBUTE_UNUSED
)
396 const char *skipped
= name
+ (*name
== '*' ? 1 : 0);
397 const char *stripped
= targetm
.strip_name_encoding (skipped
);
398 if (*name
!= '*' && user_label_prefix
[0])
399 stripped
= ACONCAT ((user_label_prefix
, stripped
, NULL
));
400 return get_identifier (stripped
);
403 /* The default implementation of TARGET_TRANSLATE_MODE_ATTRIBUTE. */
406 default_translate_mode_attribute (machine_mode mode
)
411 /* True if MODE is valid for the target. By "valid", we mean able to
412 be manipulated in non-trivial ways. In particular, this means all
413 the arithmetic is supported.
415 By default we guess this means that any C type is supported. If
416 we can't map the mode back to a type that would be available in C,
417 then reject it. Special case, here, is the double-word arithmetic
418 supported by optabs.cc. */
421 default_scalar_mode_supported_p (scalar_mode mode
)
423 int precision
= GET_MODE_PRECISION (mode
);
425 switch (GET_MODE_CLASS (mode
))
427 case MODE_PARTIAL_INT
:
429 if (precision
== CHAR_TYPE_SIZE
)
431 if (precision
== SHORT_TYPE_SIZE
)
433 if (precision
== INT_TYPE_SIZE
)
435 if (precision
== LONG_TYPE_SIZE
)
437 if (precision
== LONG_LONG_TYPE_SIZE
)
439 if (precision
== 2 * BITS_PER_WORD
)
444 if (precision
== FLOAT_TYPE_SIZE
)
446 if (precision
== DOUBLE_TYPE_SIZE
)
448 if (precision
== LONG_DOUBLE_TYPE_SIZE
)
452 case MODE_DECIMAL_FLOAT
:
464 /* Return true if libgcc supports floating-point mode MODE (known to
465 be supported as a scalar mode). */
468 default_libgcc_floating_mode_supported_p (scalar_float_mode mode
)
491 /* Return the machine mode to use for the type _FloatN, if EXTENDED is
492 false, or _FloatNx, if EXTENDED is true, or VOIDmode if not
494 opt_scalar_float_mode
495 default_floatn_mode (int n
, bool extended
)
499 opt_scalar_float_mode cand1
, cand2
;
500 scalar_float_mode mode
;
522 /* Those are the only valid _FloatNx types. */
525 if (cand1
.exists (&mode
)
526 && REAL_MODE_FORMAT (mode
)->ieee_bits
> n
527 && targetm
.scalar_mode_supported_p (mode
)
528 && targetm
.libgcc_floating_mode_supported_p (mode
))
530 if (cand2
.exists (&mode
)
531 && REAL_MODE_FORMAT (mode
)->ieee_bits
> n
532 && targetm
.scalar_mode_supported_p (mode
)
533 && targetm
.libgcc_floating_mode_supported_p (mode
))
538 opt_scalar_float_mode cand
;
539 scalar_float_mode mode
;
543 /* Always enable _Float16 if we have basic support for the mode.
544 Targets can control the range and precision of operations on
545 the _Float16 type using TARGET_C_EXCESS_PRECISION. */
572 if (cand
.exists (&mode
)
573 && REAL_MODE_FORMAT (mode
)->ieee_bits
== n
574 && targetm
.scalar_mode_supported_p (mode
)
575 && targetm
.libgcc_floating_mode_supported_p (mode
))
578 return opt_scalar_float_mode ();
581 /* Define this to return true if the _Floatn and _Floatnx built-in functions
582 should implicitly enable the built-in function without the __builtin_ prefix
583 in addition to the normal built-in function with the __builtin_ prefix. The
584 default is to only enable built-in functions without the __builtin_ prefix
585 for the GNU C langauge. The argument FUNC is the enum builtin_in_function
586 id of the function to be enabled. */
589 default_floatn_builtin_p (int func ATTRIBUTE_UNUSED
)
591 static bool first_time_p
= true;
592 static bool c_or_objective_c
;
596 first_time_p
= false;
597 c_or_objective_c
= lang_GNU_C () || lang_GNU_OBJC ();
600 return c_or_objective_c
;
603 /* Make some target macros useable by target-independent code. */
605 targhook_words_big_endian (void)
607 return !!WORDS_BIG_ENDIAN
;
611 targhook_float_words_big_endian (void)
613 return !!FLOAT_WORDS_BIG_ENDIAN
;
616 /* True if the target supports floating-point exceptions and rounding
620 default_float_exceptions_rounding_supported_p (void)
629 /* True if the target supports decimal floating point. */
632 default_decimal_float_supported_p (void)
634 return ENABLE_DECIMAL_FLOAT
;
637 /* True if the target supports fixed-point arithmetic. */
640 default_fixed_point_supported_p (void)
642 return ENABLE_FIXED_POINT
;
645 /* True if the target supports GNU indirect functions. */
648 default_has_ifunc_p (void)
650 return HAVE_GNU_INDIRECT_FUNCTION
;
653 /* Return true if we predict the loop LOOP will be transformed to a
654 low-overhead loop, otherwise return false.
656 By default, false is returned, as this hook's applicability should be
657 verified for each target. Target maintainers should re-define the hook
658 if the target can take advantage of it. */
661 default_predict_doloop_p (class loop
*loop ATTRIBUTE_UNUSED
)
666 /* By default, just use the input MODE itself. */
669 default_preferred_doloop_mode (machine_mode mode
)
674 /* NULL if INSN insn is valid within a low-overhead loop, otherwise returns
677 This function checks whether a given INSN is valid within a low-overhead
678 loop. If INSN is invalid it returns the reason for that, otherwise it
679 returns NULL. A called function may clobber any special registers required
680 for low-overhead looping. Additionally, some targets (eg, PPC) use the count
681 register for branch on table instructions. We reject the doloop pattern in
685 default_invalid_within_doloop (const rtx_insn
*insn
)
688 return "Function call in loop.";
690 if (tablejump_p (insn
, NULL
, NULL
) || computed_jump_p (insn
))
691 return "Computed branch in the loop.";
696 /* Mapping of builtin functions to vectorized variants. */
699 default_builtin_vectorized_function (unsigned int, tree
, tree
)
704 /* Mapping of target builtin functions to vectorized variants. */
707 default_builtin_md_vectorized_function (tree
, tree
, tree
)
712 /* Default vectorizer cost model values. */
715 default_builtin_vectorization_cost (enum vect_cost_for_stmt type_of_cost
,
717 int misalign ATTRIBUTE_UNUSED
)
719 switch (type_of_cost
)
729 case cond_branch_not_taken
:
731 case vec_promote_demote
:
735 case unaligned_store
:
738 case cond_branch_taken
:
742 return estimated_poly_value (TYPE_VECTOR_SUBPARTS (vectype
)) - 1;
752 default_builtin_reciprocal (tree
)
758 default_emit_support_tinfos (emit_support_tinfos_callback
)
763 hook_bool_CUMULATIVE_ARGS_arg_info_false (cumulative_args_t
,
764 const function_arg_info
&)
770 hook_bool_CUMULATIVE_ARGS_arg_info_true (cumulative_args_t
,
771 const function_arg_info
&)
777 hook_int_CUMULATIVE_ARGS_arg_info_0 (cumulative_args_t
,
778 const function_arg_info
&)
784 hook_void_CUMULATIVE_ARGS_tree (cumulative_args_t ca ATTRIBUTE_UNUSED
,
785 tree ATTRIBUTE_UNUSED
)
789 /* Default implementation of TARGET_PUSH_ARGUMENT. */
792 default_push_argument (unsigned int)
795 return !ACCUMULATE_OUTGOING_ARGS
;
802 default_function_arg_advance (cumulative_args_t
, const function_arg_info
&)
807 /* Default implementation of TARGET_FUNCTION_ARG_OFFSET. */
810 default_function_arg_offset (machine_mode
, const_tree
)
815 /* Default implementation of TARGET_FUNCTION_ARG_PADDING: usually pad
816 upward, but pad short args downward on big-endian machines. */
819 default_function_arg_padding (machine_mode mode
, const_tree type
)
821 if (!BYTES_BIG_ENDIAN
)
824 unsigned HOST_WIDE_INT size
;
827 if (!type
|| TREE_CODE (TYPE_SIZE (type
)) != INTEGER_CST
)
829 size
= int_size_in_bytes (type
);
832 /* Targets with variable-sized modes must override this hook
833 and handle variable-sized modes explicitly. */
834 size
= GET_MODE_SIZE (mode
).to_constant ();
836 if (size
< (PARM_BOUNDARY
/ BITS_PER_UNIT
))
843 default_function_arg (cumulative_args_t
, const function_arg_info
&)
849 default_function_incoming_arg (cumulative_args_t
, const function_arg_info
&)
855 default_function_arg_boundary (machine_mode mode ATTRIBUTE_UNUSED
,
856 const_tree type ATTRIBUTE_UNUSED
)
858 return PARM_BOUNDARY
;
862 default_function_arg_round_boundary (machine_mode mode ATTRIBUTE_UNUSED
,
863 const_tree type ATTRIBUTE_UNUSED
)
865 return PARM_BOUNDARY
;
869 hook_void_bitmap (bitmap regs ATTRIBUTE_UNUSED
)
874 hook_invalid_arg_for_unprototyped_fn (
875 const_tree typelist ATTRIBUTE_UNUSED
,
876 const_tree funcdecl ATTRIBUTE_UNUSED
,
877 const_tree val ATTRIBUTE_UNUSED
)
882 /* Initialize the stack protection decls. */
884 /* Stack protection related decls living in libgcc. */
885 static GTY(()) tree stack_chk_guard_decl
;
888 default_stack_protect_guard (void)
890 tree t
= stack_chk_guard_decl
;
896 t
= build_decl (UNKNOWN_LOCATION
,
897 VAR_DECL
, get_identifier ("__stack_chk_guard"),
901 DECL_EXTERNAL (t
) = 1;
903 TREE_THIS_VOLATILE (t
) = 1;
904 DECL_ARTIFICIAL (t
) = 1;
905 DECL_IGNORED_P (t
) = 1;
907 /* Do not share RTL as the declaration is visible outside of
910 RTX_FLAG (x
, used
) = 1;
912 stack_chk_guard_decl
= t
;
918 static GTY(()) tree stack_chk_fail_decl
;
921 default_external_stack_protect_fail (void)
923 tree t
= stack_chk_fail_decl
;
927 t
= build_function_type_list (void_type_node
, NULL_TREE
);
928 t
= build_decl (UNKNOWN_LOCATION
,
929 FUNCTION_DECL
, get_identifier ("__stack_chk_fail"), t
);
932 DECL_EXTERNAL (t
) = 1;
934 TREE_THIS_VOLATILE (t
) = 1;
935 TREE_NOTHROW (t
) = 1;
936 DECL_ARTIFICIAL (t
) = 1;
937 DECL_IGNORED_P (t
) = 1;
938 DECL_VISIBILITY (t
) = VISIBILITY_DEFAULT
;
939 DECL_VISIBILITY_SPECIFIED (t
) = 1;
941 stack_chk_fail_decl
= t
;
944 return build_call_expr (t
, 0);
948 default_hidden_stack_protect_fail (void)
950 #ifndef HAVE_GAS_HIDDEN
951 return default_external_stack_protect_fail ();
953 tree t
= stack_chk_fail_decl
;
956 return default_external_stack_protect_fail ();
960 t
= build_function_type_list (void_type_node
, NULL_TREE
);
961 t
= build_decl (UNKNOWN_LOCATION
, FUNCTION_DECL
,
962 get_identifier ("__stack_chk_fail_local"), t
);
965 DECL_EXTERNAL (t
) = 1;
967 TREE_THIS_VOLATILE (t
) = 1;
968 TREE_NOTHROW (t
) = 1;
969 DECL_ARTIFICIAL (t
) = 1;
970 DECL_IGNORED_P (t
) = 1;
971 DECL_VISIBILITY_SPECIFIED (t
) = 1;
972 DECL_VISIBILITY (t
) = VISIBILITY_HIDDEN
;
974 stack_chk_fail_decl
= t
;
977 return build_call_expr (t
, 0);
982 hook_bool_const_rtx_commutative_p (const_rtx x
,
983 int outer_code ATTRIBUTE_UNUSED
)
985 return COMMUTATIVE_P (x
);
989 default_function_value (const_tree ret_type ATTRIBUTE_UNUSED
,
990 const_tree fn_decl_or_type
,
991 bool outgoing ATTRIBUTE_UNUSED
)
993 /* The old interface doesn't handle receiving the function type. */
995 && !DECL_P (fn_decl_or_type
))
996 fn_decl_or_type
= NULL
;
998 #ifdef FUNCTION_VALUE
999 return FUNCTION_VALUE (ret_type
, fn_decl_or_type
);
1006 default_libcall_value (machine_mode mode ATTRIBUTE_UNUSED
,
1007 const_rtx fun ATTRIBUTE_UNUSED
)
1009 #ifdef LIBCALL_VALUE
1010 return LIBCALL_VALUE (MACRO_MODE (mode
));
1016 /* The default hook for TARGET_FUNCTION_VALUE_REGNO_P. */
1019 default_function_value_regno_p (const unsigned int regno ATTRIBUTE_UNUSED
)
1021 #ifdef FUNCTION_VALUE_REGNO_P
1022 return FUNCTION_VALUE_REGNO_P (regno
);
1028 /* Choose the mode and rtx to use to zero REGNO, storing tem in PMODE and
1029 PREGNO_RTX and returning TRUE if successful, otherwise returning FALSE. If
1030 the natural mode for REGNO doesn't work, attempt to group it with subsequent
1031 adjacent registers set in TOZERO. */
1034 zcur_select_mode_rtx (unsigned int regno
, machine_mode
*pmode
,
1035 rtx
*pregno_rtx
, HARD_REG_SET tozero
)
1037 rtx regno_rtx
= regno_reg_rtx
[regno
];
1038 machine_mode mode
= GET_MODE (regno_rtx
);
1040 /* If the natural mode doesn't work, try some wider mode. */
1041 if (!targetm
.hard_regno_mode_ok (regno
, mode
))
1045 !found
&& nregs
<= hard_regno_max_nregs
1046 && regno
+ nregs
<= FIRST_PSEUDO_REGISTER
1047 && TEST_HARD_REG_BIT (tozero
,
1051 mode
= choose_hard_reg_mode (regno
, nregs
, 0);
1052 if (mode
== E_VOIDmode
)
1054 gcc_checking_assert (targetm
.hard_regno_mode_ok (regno
, mode
));
1055 regno_rtx
= gen_rtx_REG (mode
, regno
);
1063 *pregno_rtx
= regno_rtx
;
1067 /* The default hook for TARGET_ZERO_CALL_USED_REGS. */
1070 default_zero_call_used_regs (HARD_REG_SET need_zeroed_hardregs
)
1072 gcc_assert (!hard_reg_set_empty_p (need_zeroed_hardregs
));
1074 HARD_REG_SET failed
;
1075 CLEAR_HARD_REG_SET (failed
);
1076 bool progress
= false;
1078 /* First, try to zero each register in need_zeroed_hardregs by
1079 loading a zero into it, taking note of any failures in
1081 for (unsigned int regno
= 0; regno
< FIRST_PSEUDO_REGISTER
; regno
++)
1082 if (TEST_HARD_REG_BIT (need_zeroed_hardregs
, regno
))
1084 rtx_insn
*last_insn
= get_last_insn ();
1088 if (!zcur_select_mode_rtx (regno
, &mode
, ®no_rtx
,
1089 need_zeroed_hardregs
))
1091 SET_HARD_REG_BIT (failed
, regno
);
1095 rtx zero
= CONST0_RTX (mode
);
1096 rtx_insn
*insn
= emit_move_insn (regno_rtx
, zero
);
1097 if (!valid_insn_p (insn
))
1099 SET_HARD_REG_BIT (failed
, regno
);
1100 delete_insns_since (last_insn
);
1105 regno
+= hard_regno_nregs (regno
, mode
) - 1;
1109 /* Now retry with copies from zeroed registers, as long as we've
1110 made some PROGRESS, and registers remain to be zeroed in
1112 while (progress
&& !hard_reg_set_empty_p (failed
))
1114 HARD_REG_SET retrying
= failed
;
1116 CLEAR_HARD_REG_SET (failed
);
1119 for (unsigned int regno
= 0; regno
< FIRST_PSEUDO_REGISTER
; regno
++)
1120 if (TEST_HARD_REG_BIT (retrying
, regno
))
1125 /* This might select registers we've already zeroed. If grouping
1126 with them is what it takes to get regno zeroed, so be it. */
1127 if (!zcur_select_mode_rtx (regno
, &mode
, ®no_rtx
,
1128 need_zeroed_hardregs
))
1130 SET_HARD_REG_BIT (failed
, regno
);
1134 bool success
= false;
1135 /* Look for a source. */
1136 for (unsigned int src
= 0; src
< FIRST_PSEUDO_REGISTER
; src
++)
1138 /* If SRC hasn't been zeroed (yet?), skip it. */
1139 if (! TEST_HARD_REG_BIT (need_zeroed_hardregs
, src
))
1141 if (TEST_HARD_REG_BIT (retrying
, src
))
1144 /* Check that SRC can hold MODE, and that any other
1145 registers needed to hold MODE in SRC have also been
1147 if (!targetm
.hard_regno_mode_ok (src
, mode
))
1149 unsigned n
= targetm
.hard_regno_nregs (src
, mode
);
1151 for (unsigned i
= 1; ok
&& i
< n
; i
++)
1152 ok
= (TEST_HARD_REG_BIT (need_zeroed_hardregs
, src
+ i
)
1153 && !TEST_HARD_REG_BIT (retrying
, src
+ i
));
1157 /* SRC is usable, try to copy from it. */
1158 rtx_insn
*last_insn
= get_last_insn ();
1159 rtx src_rtx
= gen_rtx_REG (mode
, src
);
1160 rtx_insn
*insn
= emit_move_insn (regno_rtx
, src_rtx
);
1161 if (!valid_insn_p (insn
))
1162 /* It didn't work, remove any inserts. We'll look
1164 delete_insns_since (last_insn
);
1167 /* We're done for REGNO. */
1173 /* If nothing worked for REGNO this round, mark it to be
1174 retried if we get another round. */
1176 SET_HARD_REG_BIT (failed
, regno
);
1179 /* Take note so as to enable another round if needed. */
1181 regno
+= hard_regno_nregs (regno
, mode
) - 1;
1186 /* If any register remained, report it. */
1189 static bool issued_error
;
1192 const char *name
= NULL
;
1193 for (unsigned int i
= 0; zero_call_used_regs_opts
[i
].name
!= NULL
;
1195 if (flag_zero_call_used_regs
== zero_call_used_regs_opts
[i
].flag
)
1197 name
= zero_call_used_regs_opts
[i
].name
;
1204 issued_error
= true;
1205 sorry ("argument %qs is not supported for %qs on this target",
1206 name
, "-fzero-call-used-regs");
1210 return need_zeroed_hardregs
;
1214 default_internal_arg_pointer (void)
1216 /* If the reg that the virtual arg pointer will be translated into is
1217 not a fixed reg or is the stack pointer, make a copy of the virtual
1218 arg pointer, and address parms via the copy. The frame pointer is
1219 considered fixed even though it is not marked as such. */
1220 if ((ARG_POINTER_REGNUM
== STACK_POINTER_REGNUM
1221 || ! (fixed_regs
[ARG_POINTER_REGNUM
]
1222 || ARG_POINTER_REGNUM
== FRAME_POINTER_REGNUM
)))
1223 return copy_to_reg (virtual_incoming_args_rtx
);
1225 return virtual_incoming_args_rtx
;
1229 default_static_chain (const_tree
ARG_UNUSED (fndecl_or_type
), bool incoming_p
)
1233 #ifdef STATIC_CHAIN_INCOMING_REGNUM
1234 return gen_rtx_REG (Pmode
, STATIC_CHAIN_INCOMING_REGNUM
);
1238 #ifdef STATIC_CHAIN_REGNUM
1239 return gen_rtx_REG (Pmode
, STATIC_CHAIN_REGNUM
);
1243 static bool issued_error
;
1246 issued_error
= true;
1247 sorry ("nested functions not supported on this target");
1250 /* It really doesn't matter what we return here, so long at it
1251 doesn't cause the rest of the compiler to crash. */
1252 return gen_rtx_MEM (Pmode
, stack_pointer_rtx
);
1257 default_trampoline_init (rtx
ARG_UNUSED (m_tramp
), tree
ARG_UNUSED (t_func
),
1258 rtx
ARG_UNUSED (r_chain
))
1260 sorry ("nested function trampolines not supported on this target");
1264 default_return_pops_args (tree
, tree
, poly_int64
)
1270 default_ira_change_pseudo_allocno_class (int regno ATTRIBUTE_UNUSED
,
1272 reg_class_t best_cl ATTRIBUTE_UNUSED
)
1278 default_lra_p (void)
1284 default_register_priority (int hard_regno ATTRIBUTE_UNUSED
)
1290 default_register_usage_leveling_p (void)
1296 default_different_addr_displacement_p (void)
1302 default_secondary_reload (bool in_p ATTRIBUTE_UNUSED
, rtx x ATTRIBUTE_UNUSED
,
1303 reg_class_t reload_class_i ATTRIBUTE_UNUSED
,
1304 machine_mode reload_mode ATTRIBUTE_UNUSED
,
1305 secondary_reload_info
*sri
)
1307 enum reg_class rclass
= NO_REGS
;
1308 enum reg_class reload_class
= (enum reg_class
) reload_class_i
;
1310 if (sri
->prev_sri
&& sri
->prev_sri
->t_icode
!= CODE_FOR_nothing
)
1312 sri
->icode
= sri
->prev_sri
->t_icode
;
1315 #ifdef SECONDARY_INPUT_RELOAD_CLASS
1317 rclass
= SECONDARY_INPUT_RELOAD_CLASS (reload_class
,
1318 MACRO_MODE (reload_mode
), x
);
1320 #ifdef SECONDARY_OUTPUT_RELOAD_CLASS
1322 rclass
= SECONDARY_OUTPUT_RELOAD_CLASS (reload_class
,
1323 MACRO_MODE (reload_mode
), x
);
1325 if (rclass
!= NO_REGS
)
1327 enum insn_code icode
1328 = direct_optab_handler (in_p
? reload_in_optab
: reload_out_optab
,
1331 if (icode
!= CODE_FOR_nothing
1332 && !insn_operand_matches (icode
, in_p
, x
))
1333 icode
= CODE_FOR_nothing
;
1334 else if (icode
!= CODE_FOR_nothing
)
1336 const char *insn_constraint
, *scratch_constraint
;
1337 enum reg_class insn_class
, scratch_class
;
1339 gcc_assert (insn_data
[(int) icode
].n_operands
== 3);
1340 insn_constraint
= insn_data
[(int) icode
].operand
[!in_p
].constraint
;
1341 if (!*insn_constraint
)
1342 insn_class
= ALL_REGS
;
1347 gcc_assert (*insn_constraint
== '=');
1350 insn_class
= (reg_class_for_constraint
1351 (lookup_constraint (insn_constraint
)));
1352 gcc_assert (insn_class
!= NO_REGS
);
1355 scratch_constraint
= insn_data
[(int) icode
].operand
[2].constraint
;
1356 /* The scratch register's constraint must start with "=&",
1357 except for an input reload, where only "=" is necessary,
1358 and where it might be beneficial to re-use registers from
1360 gcc_assert (scratch_constraint
[0] == '='
1361 && (in_p
|| scratch_constraint
[1] == '&'));
1362 scratch_constraint
++;
1363 if (*scratch_constraint
== '&')
1364 scratch_constraint
++;
1365 scratch_class
= (reg_class_for_constraint
1366 (lookup_constraint (scratch_constraint
)));
1368 if (reg_class_subset_p (reload_class
, insn_class
))
1370 gcc_assert (scratch_class
== rclass
);
1374 rclass
= insn_class
;
1377 if (rclass
== NO_REGS
)
1380 sri
->t_icode
= icode
;
1385 /* The default implementation of TARGET_SECONDARY_MEMORY_NEEDED_MODE. */
1388 default_secondary_memory_needed_mode (machine_mode mode
)
1390 if (!targetm
.lra_p ()
1391 && known_lt (GET_MODE_BITSIZE (mode
), BITS_PER_WORD
)
1392 && INTEGRAL_MODE_P (mode
))
1393 return mode_for_size (BITS_PER_WORD
, GET_MODE_CLASS (mode
), 0).require ();
1397 /* By default, if flag_pic is true, then neither local nor global relocs
1398 should be placed in readonly memory. */
1401 default_reloc_rw_mask (void)
1403 return flag_pic
? 3 : 0;
1406 /* By default, address diff vectors are generated
1407 for jump tables when flag_pic is true. */
1410 default_generate_pic_addr_diff_vec (void)
1415 /* Record an element in the table of global constructors. SYMBOL is
1416 a SYMBOL_REF of the function to be called; PRIORITY is a number
1417 between 0 and MAX_INIT_PRIORITY. */
1420 default_asm_out_constructor (rtx symbol ATTRIBUTE_UNUSED
,
1421 int priority ATTRIBUTE_UNUSED
)
1423 sorry ("global constructors not supported on this target");
1426 /* Likewise for global destructors. */
1429 default_asm_out_destructor (rtx symbol ATTRIBUTE_UNUSED
,
1430 int priority ATTRIBUTE_UNUSED
)
1432 sorry ("global destructors not supported on this target");
1435 /* By default, do no modification. */
1436 tree
default_mangle_decl_assembler_name (tree decl ATTRIBUTE_UNUSED
,
1442 /* The default implementation of TARGET_STATIC_RTX_ALIGNMENT. */
1445 default_static_rtx_alignment (machine_mode mode
)
1447 return GET_MODE_ALIGNMENT (mode
);
1450 /* The default implementation of TARGET_CONSTANT_ALIGNMENT. */
1453 default_constant_alignment (const_tree
, HOST_WIDE_INT align
)
1458 /* An implementation of TARGET_CONSTANT_ALIGNMENT that aligns strings
1459 to at least BITS_PER_WORD but otherwise makes no changes. */
1462 constant_alignment_word_strings (const_tree exp
, HOST_WIDE_INT align
)
1464 if (TREE_CODE (exp
) == STRING_CST
)
1465 return MAX (align
, BITS_PER_WORD
);
1469 /* Default to natural alignment for vector types, bounded by
1470 MAX_OFILE_ALIGNMENT. */
1473 default_vector_alignment (const_tree type
)
1475 unsigned HOST_WIDE_INT align
= MAX_OFILE_ALIGNMENT
;
1476 tree size
= TYPE_SIZE (type
);
1477 if (tree_fits_uhwi_p (size
))
1478 align
= tree_to_uhwi (size
);
1479 if (align
>= MAX_OFILE_ALIGNMENT
)
1480 return MAX_OFILE_ALIGNMENT
;
1481 return MAX (align
, GET_MODE_ALIGNMENT (TYPE_MODE (type
)));
1484 /* The default implementation of
1485 TARGET_VECTORIZE_PREFERRED_VECTOR_ALIGNMENT. */
1488 default_preferred_vector_alignment (const_tree type
)
1490 return TYPE_ALIGN (type
);
1493 /* The default implementation of
1494 TARGET_VECTORIZE_PREFERRED_DIV_AS_SHIFTS_OVER_MULT. */
1497 default_preferred_div_as_shifts_over_mult (const_tree type
)
1499 return !can_mult_highpart_p (TYPE_MODE (type
), TYPE_UNSIGNED (type
));
1502 /* By default assume vectors of element TYPE require a multiple of the natural
1503 alignment of TYPE. TYPE is naturally aligned if IS_PACKED is false. */
1505 default_builtin_vector_alignment_reachable (const_tree
/*type*/, bool is_packed
)
1510 /* By default, assume that a target supports any factor of misalignment
1511 memory access if it supports movmisalign patten.
1512 is_packed is true if the memory access is defined in a packed struct. */
1514 default_builtin_support_vector_misalignment (machine_mode mode
,
1522 if (optab_handler (movmisalign_optab
, mode
) != CODE_FOR_nothing
)
1527 /* By default, only attempt to parallelize bitwise operations, and
1528 possibly adds/subtracts using bit-twiddling. */
1531 default_preferred_simd_mode (scalar_mode
)
1536 /* By default do not split reductions further. */
1539 default_split_reduction (machine_mode mode
)
1544 /* By default only the preferred vector mode is tried. */
1547 default_autovectorize_vector_modes (vector_modes
*, bool)
1552 /* The default implementation of TARGET_VECTORIZE_RELATED_MODE. */
1555 default_vectorize_related_mode (machine_mode vector_mode
,
1556 scalar_mode element_mode
,
1559 machine_mode result_mode
;
1560 if ((maybe_ne (nunits
, 0U)
1561 || multiple_p (GET_MODE_SIZE (vector_mode
),
1562 GET_MODE_SIZE (element_mode
), &nunits
))
1563 && mode_for_vector (element_mode
, nunits
).exists (&result_mode
)
1564 && VECTOR_MODE_P (result_mode
)
1565 && targetm
.vector_mode_supported_p (result_mode
))
1568 return opt_machine_mode ();
1571 /* By default a vector of integers is used as a mask. */
1574 default_get_mask_mode (machine_mode mode
)
1576 return related_int_vector_mode (mode
);
1579 /* By default consider masked stores to be expensive. */
1582 default_empty_mask_is_expensive (unsigned ifn
)
1584 return ifn
== IFN_MASK_STORE
;
1587 /* By default, the cost model accumulates three separate costs (prologue,
1588 loop body, and epilogue) for a vectorized loop or block. So allocate an
1589 array of three unsigned ints, set it to zero, and return its address. */
1592 default_vectorize_create_costs (vec_info
*vinfo
, bool costing_for_scalar
)
1594 return new vector_costs (vinfo
, costing_for_scalar
);
1597 /* Determine whether or not a pointer mode is valid. Assume defaults
1598 of ptr_mode or Pmode - can be overridden. */
1600 default_valid_pointer_mode (scalar_int_mode mode
)
1602 return (mode
== ptr_mode
|| mode
== Pmode
);
1605 /* Determine whether the memory reference specified by REF may alias
1606 the C libraries errno location. */
1608 default_ref_may_alias_errno (ao_ref
*ref
)
1610 tree base
= ao_ref_base (ref
);
1611 /* The default implementation assumes the errno location is
1612 a declaration of type int or is always accessed via a
1613 pointer to int. We assume that accesses to errno are
1614 not deliberately obfuscated (even in conforming ways). */
1615 if (TYPE_UNSIGNED (TREE_TYPE (base
))
1616 || TYPE_MODE (TREE_TYPE (base
)) != TYPE_MODE (integer_type_node
))
1618 /* The default implementation assumes an errno location declaration
1619 is never defined in the current compilation unit and may not be
1620 aliased by a local variable. */
1622 && DECL_EXTERNAL (base
)
1623 && !TREE_STATIC (base
))
1625 else if (TREE_CODE (base
) == MEM_REF
1626 && TREE_CODE (TREE_OPERAND (base
, 0)) == SSA_NAME
)
1628 struct ptr_info_def
*pi
= SSA_NAME_PTR_INFO (TREE_OPERAND (base
, 0));
1629 return !pi
|| pi
->pt
.anything
|| pi
->pt
.nonlocal
;
1634 /* Return the mode for a pointer to a given ADDRSPACE,
1635 defaulting to ptr_mode for all address spaces. */
1638 default_addr_space_pointer_mode (addr_space_t addrspace ATTRIBUTE_UNUSED
)
1643 /* Return the mode for an address in a given ADDRSPACE,
1644 defaulting to Pmode for all address spaces. */
1647 default_addr_space_address_mode (addr_space_t addrspace ATTRIBUTE_UNUSED
)
1652 /* Named address space version of valid_pointer_mode.
1653 To match the above, the same modes apply to all address spaces. */
1656 default_addr_space_valid_pointer_mode (scalar_int_mode mode
,
1657 addr_space_t as ATTRIBUTE_UNUSED
)
1659 return targetm
.valid_pointer_mode (mode
);
1662 /* Some places still assume that all pointer or address modes are the
1663 standard Pmode and ptr_mode. These optimizations become invalid if
1664 the target actually supports multiple different modes. For now,
1665 we disable such optimizations on such targets, using this function. */
1668 target_default_pointer_address_modes_p (void)
1670 if (targetm
.addr_space
.address_mode
!= default_addr_space_address_mode
)
1672 if (targetm
.addr_space
.pointer_mode
!= default_addr_space_pointer_mode
)
1678 /* Named address space version of legitimate_address_p.
1679 By default, all address spaces have the same form. */
1682 default_addr_space_legitimate_address_p (machine_mode mode
, rtx mem
,
1684 addr_space_t as ATTRIBUTE_UNUSED
,
1687 return targetm
.legitimate_address_p (mode
, mem
, strict
, code
);
1690 /* Named address space version of LEGITIMIZE_ADDRESS.
1691 By default, all address spaces have the same form. */
1694 default_addr_space_legitimize_address (rtx x
, rtx oldx
, machine_mode mode
,
1695 addr_space_t as ATTRIBUTE_UNUSED
)
1697 return targetm
.legitimize_address (x
, oldx
, mode
);
1700 /* The default hook for determining if one named address space is a subset of
1701 another and to return which address space to use as the common address
1705 default_addr_space_subset_p (addr_space_t subset
, addr_space_t superset
)
1707 return (subset
== superset
);
1710 /* The default hook for determining if 0 within a named address
1711 space is a valid address. */
1714 default_addr_space_zero_address_valid (addr_space_t as ATTRIBUTE_UNUSED
)
1719 /* The default hook for debugging the address space is to return the
1720 address space number to indicate DW_AT_address_class. */
1722 default_addr_space_debug (addr_space_t as
)
1727 /* The default hook implementation for TARGET_ADDR_SPACE_DIAGNOSE_USAGE.
1728 Don't complain about any address space. */
1731 default_addr_space_diagnose_usage (addr_space_t
, location_t
)
1736 /* The default hook for TARGET_ADDR_SPACE_CONVERT. This hook should never be
1737 called for targets with only a generic address space. */
1740 default_addr_space_convert (rtx op ATTRIBUTE_UNUSED
,
1741 tree from_type ATTRIBUTE_UNUSED
,
1742 tree to_type ATTRIBUTE_UNUSED
)
1747 /* The defualt implementation of TARGET_HARD_REGNO_NREGS. */
1750 default_hard_regno_nregs (unsigned int, machine_mode mode
)
1752 /* Targets with variable-sized modes must provide their own definition
1754 return CEIL (GET_MODE_SIZE (mode
).to_constant (), UNITS_PER_WORD
);
1758 default_hard_regno_scratch_ok (unsigned int regno ATTRIBUTE_UNUSED
)
1763 /* The default implementation of TARGET_MODE_DEPENDENT_ADDRESS_P. */
1766 default_mode_dependent_address_p (const_rtx addr ATTRIBUTE_UNUSED
,
1767 addr_space_t addrspace ATTRIBUTE_UNUSED
)
1772 extern bool default_new_address_profitable_p (rtx
, rtx
);
1775 /* The default implementation of TARGET_NEW_ADDRESS_PROFITABLE_P. */
1778 default_new_address_profitable_p (rtx memref ATTRIBUTE_UNUSED
,
1779 rtx_insn
*insn ATTRIBUTE_UNUSED
,
1780 rtx new_addr ATTRIBUTE_UNUSED
)
1786 default_target_option_valid_attribute_p (tree
ARG_UNUSED (fndecl
),
1787 tree
ARG_UNUSED (name
),
1788 tree
ARG_UNUSED (args
),
1789 int ARG_UNUSED (flags
))
1791 warning (OPT_Wattributes
,
1792 "target attribute is not supported on this machine");
1798 default_target_option_pragma_parse (tree
ARG_UNUSED (args
),
1799 tree
ARG_UNUSED (pop_target
))
1801 /* If args is NULL the caller is handle_pragma_pop_options (). In that case,
1802 emit no warning because "#pragma GCC pop_target" is valid on targets that
1803 do not have the "target" pragma. */
1805 warning (OPT_Wpragmas
,
1806 "%<#pragma GCC target%> is not supported for this machine");
1812 default_target_can_inline_p (tree caller
, tree callee
)
1814 tree callee_opts
= DECL_FUNCTION_SPECIFIC_TARGET (callee
);
1815 tree caller_opts
= DECL_FUNCTION_SPECIFIC_TARGET (caller
);
1817 callee_opts
= target_option_default_node
;
1819 caller_opts
= target_option_default_node
;
1821 /* If both caller and callee have attributes, assume that if the
1822 pointer is different, the two functions have different target
1823 options since build_target_option_node uses a hash table for the
1825 return callee_opts
== caller_opts
;
1828 /* By default, return false to not need to collect any target information
1829 for inlining. Target maintainer should re-define the hook if the
1830 target want to take advantage of it. */
1833 default_need_ipa_fn_target_info (const_tree
, unsigned int &)
1839 default_update_ipa_fn_target_info (unsigned int &, const gimple
*)
1844 /* If the machine does not have a case insn that compares the bounds,
1845 this means extra overhead for dispatch tables, which raises the
1846 threshold for using them. */
1849 default_case_values_threshold (void)
1851 return (targetm
.have_casesi () ? 4 : 5);
1855 default_have_conditional_execution (void)
1857 return HAVE_conditional_execution
;
1860 /* By default we assume that c99 functions are present at the runtime,
1861 but sincos is not. */
1863 default_libc_has_function (enum function_class fn_class
,
1864 tree type ATTRIBUTE_UNUSED
)
1866 if (fn_class
== function_c94
1867 || fn_class
== function_c99_misc
1868 || fn_class
== function_c99_math_complex
)
1874 /* By default assume that libc has not a fast implementation. */
1877 default_libc_has_fast_function (int fcode ATTRIBUTE_UNUSED
)
1883 gnu_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED
,
1884 tree type ATTRIBUTE_UNUSED
)
1890 no_c99_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED
,
1891 tree type ATTRIBUTE_UNUSED
)
1896 /* Assume some c99 functions are present at the runtime including sincos. */
1898 bsd_libc_has_function (enum function_class fn_class
,
1899 tree type ATTRIBUTE_UNUSED
)
1901 if (fn_class
== function_c94
1902 || fn_class
== function_c99_misc
1903 || fn_class
== function_sincos
)
1909 /* By default, -fhardened will add -D_FORTIFY_SOURCE=2. */
1912 default_fortify_source_default_level ()
1918 default_libm_function_max_error (unsigned, machine_mode
, bool)
1924 glibc_linux_libm_function_max_error (unsigned cfn
, machine_mode mode
,
1928 https://www.gnu.org/software/libc/manual/2.22/html_node/Errors-in-Math-Functions.html
1929 https://www.gnu.org/software/libc/manual/html_node/Errors-in-Math-Functions.html
1930 with usual values recorded here and significant outliers handled in
1931 target CPU specific overriders. The tables only record default
1932 rounding to nearest, for -frounding-math let's add some extra ulps.
1933 For boundary_p values (say finite results outside of [-1.,1.] for
1934 sin/cos, or [-0.,+Inf] for sqrt etc. let's use custom random testers. */
1935 int rnd
= flag_rounding_math
? 4 : 0;
1936 bool sf
= (REAL_MODE_FORMAT (mode
) == &ieee_single_format
1937 || REAL_MODE_FORMAT (mode
) == &mips_single_format
1938 || REAL_MODE_FORMAT (mode
) == &motorola_single_format
);
1939 bool df
= (REAL_MODE_FORMAT (mode
) == &ieee_double_format
1940 || REAL_MODE_FORMAT (mode
) == &mips_double_format
1941 || REAL_MODE_FORMAT (mode
) == &motorola_double_format
);
1942 bool xf
= (REAL_MODE_FORMAT (mode
) == &ieee_extended_intel_96_format
1943 || REAL_MODE_FORMAT (mode
) == &ieee_extended_intel_128_format
1944 || REAL_MODE_FORMAT (mode
) == &ieee_extended_motorola_format
);
1945 bool tf
= (REAL_MODE_FORMAT (mode
) == &ieee_quad_format
1946 || REAL_MODE_FORMAT (mode
) == &mips_quad_format
);
1953 /* https://gcc.gnu.org/pipermail/gcc-patches/2023-April/616595.html */
1955 if (sf
|| df
|| xf
|| tf
)
1960 /* cos is generally errors like sin, but far more arches have 2ulps
1962 if (!boundary_p
&& df
)
1969 https://sourceware.org/pipermail/gcc-patches/2023-April/616315.html
1970 seems default rounding sin/cos stay strictly in [-1.,1.] range,
1971 with rounding to infinity it can be 1ulp larger/smaller. */
1972 return flag_rounding_math
? 1 : 0;
1982 return default_libm_function_max_error (cfn
, mode
, boundary_p
);
1986 default_builtin_tm_load_store (tree
ARG_UNUSED (type
))
1991 /* Compute cost of moving registers to/from memory. */
1994 default_memory_move_cost (machine_mode mode ATTRIBUTE_UNUSED
,
1995 reg_class_t rclass ATTRIBUTE_UNUSED
,
1996 bool in ATTRIBUTE_UNUSED
)
1998 #ifndef MEMORY_MOVE_COST
1999 return (4 + memory_move_secondary_cost (mode
, (enum reg_class
) rclass
, in
));
2001 return MEMORY_MOVE_COST (MACRO_MODE (mode
), (enum reg_class
) rclass
, in
);
2005 /* Compute cost of moving data from a register of class FROM to one of
2009 default_register_move_cost (machine_mode mode ATTRIBUTE_UNUSED
,
2010 reg_class_t from ATTRIBUTE_UNUSED
,
2011 reg_class_t to ATTRIBUTE_UNUSED
)
2013 #ifndef REGISTER_MOVE_COST
2016 return REGISTER_MOVE_COST (MACRO_MODE (mode
),
2017 (enum reg_class
) from
, (enum reg_class
) to
);
2021 /* The default implementation of TARGET_SLOW_UNALIGNED_ACCESS. */
2024 default_slow_unaligned_access (machine_mode
, unsigned int)
2026 return STRICT_ALIGNMENT
;
2029 /* The default implementation of TARGET_ESTIMATED_POLY_VALUE. */
2032 default_estimated_poly_value (poly_int64 x
, poly_value_estimate_kind
)
2037 /* For hooks which use the MOVE_RATIO macro, this gives the legacy default
2038 behavior. SPEED_P is true if we are compiling for speed. */
2041 get_move_ratio (bool speed_p ATTRIBUTE_UNUSED
)
2043 unsigned int move_ratio
;
2045 move_ratio
= (unsigned int) MOVE_RATIO (speed_p
);
2047 #if defined (HAVE_cpymemqi) || defined (HAVE_cpymemhi) || defined (HAVE_cpymemsi) || defined (HAVE_cpymemdi) || defined (HAVE_cpymemti)
2049 #else /* No cpymem patterns, pick a default. */
2050 move_ratio
= ((speed_p
) ? 15 : 3);
2056 /* Return TRUE if the move_by_pieces/set_by_pieces infrastructure should be
2057 used; return FALSE if the cpymem/setmem optab should be expanded, or
2058 a call to memcpy emitted. */
2061 default_use_by_pieces_infrastructure_p (unsigned HOST_WIDE_INT size
,
2062 unsigned int alignment
,
2063 enum by_pieces_operation op
,
2066 unsigned int max_size
= 0;
2067 unsigned int ratio
= 0;
2071 case CLEAR_BY_PIECES
:
2072 max_size
= STORE_MAX_PIECES
;
2073 ratio
= CLEAR_RATIO (speed_p
);
2075 case MOVE_BY_PIECES
:
2076 max_size
= MOVE_MAX_PIECES
;
2077 ratio
= get_move_ratio (speed_p
);
2080 max_size
= STORE_MAX_PIECES
;
2081 ratio
= SET_RATIO (speed_p
);
2083 case STORE_BY_PIECES
:
2084 max_size
= STORE_MAX_PIECES
;
2085 ratio
= get_move_ratio (speed_p
);
2087 case COMPARE_BY_PIECES
:
2088 max_size
= COMPARE_MAX_PIECES
;
2089 /* Pick a likely default, just as in get_move_ratio. */
2090 ratio
= speed_p
? 15 : 3;
2094 return by_pieces_ninsns (size
, alignment
, max_size
+ 1, op
) < ratio
;
2097 /* This hook controls code generation for expanding a memcmp operation by
2098 pieces. Return 1 for the normal pattern of compare/jump after each pair
2099 of loads, or a higher number to reduce the number of branches. */
2102 default_compare_by_pieces_branch_ratio (machine_mode
)
2107 /* Write PATCH_AREA_SIZE NOPs into the asm outfile FILE around a function
2108 entry. If RECORD_P is true and the target supports named sections,
2109 the location of the NOPs will be recorded in a special object section
2110 called "__patchable_function_entries". This routine may be called
2111 twice per function to put NOPs before and after the function
2115 default_print_patchable_function_entry (FILE *file
,
2116 unsigned HOST_WIDE_INT patch_area_size
,
2119 const char *nop_templ
= 0;
2121 rtx_insn
*my_nop
= make_insn_raw (gen_nop ());
2123 /* We use the template alone, relying on the (currently sane) assumption
2124 that the NOP template does not have variable operands. */
2125 code_num
= recog_memoized (my_nop
);
2126 nop_templ
= get_insn_template (code_num
, my_nop
);
2128 if (record_p
&& targetm_common
.have_named_sections
)
2131 section
*previous_section
= in_section
;
2132 const char *asm_op
= integer_asm_op (POINTER_SIZE_UNITS
, false);
2134 gcc_assert (asm_op
!= NULL
);
2135 /* If SECTION_LINK_ORDER is supported, this internal label will
2136 be filled as the symbol for linked_to section. */
2137 ASM_GENERATE_INTERNAL_LABEL (buf
, "LPFE", current_function_funcdef_no
);
2139 unsigned int flags
= SECTION_WRITE
| SECTION_RELRO
;
2140 if (HAVE_GAS_SECTION_LINK_ORDER
)
2141 flags
|= SECTION_LINK_ORDER
;
2143 section
*sect
= get_section ("__patchable_function_entries",
2144 flags
, current_function_decl
);
2145 if (HAVE_COMDAT_GROUP
&& DECL_COMDAT_GROUP (current_function_decl
))
2146 switch_to_comdat_section (sect
, current_function_decl
);
2148 switch_to_section (sect
);
2149 assemble_align (POINTER_SIZE
);
2150 fputs (asm_op
, file
);
2151 assemble_name_raw (file
, buf
);
2154 switch_to_section (previous_section
);
2155 ASM_OUTPUT_LABEL (file
, buf
);
2159 for (i
= 0; i
< patch_area_size
; ++i
)
2160 output_asm_insn (nop_templ
, NULL
);
2164 default_profile_before_prologue (void)
2166 #ifdef PROFILE_BEFORE_PROLOGUE
2173 /* The default implementation of TARGET_PREFERRED_RELOAD_CLASS. */
2176 default_preferred_reload_class (rtx x ATTRIBUTE_UNUSED
,
2179 #ifdef PREFERRED_RELOAD_CLASS
2180 return (reg_class_t
) PREFERRED_RELOAD_CLASS (x
, (enum reg_class
) rclass
);
2186 /* The default implementation of TARGET_OUTPUT_PREFERRED_RELOAD_CLASS. */
2189 default_preferred_output_reload_class (rtx x ATTRIBUTE_UNUSED
,
2195 /* The default implementation of TARGET_PREFERRED_RENAME_CLASS. */
2197 default_preferred_rename_class (reg_class_t rclass ATTRIBUTE_UNUSED
)
2202 /* The default implementation of TARGET_CLASS_LIKELY_SPILLED_P. */
2205 default_class_likely_spilled_p (reg_class_t rclass
)
2207 return (reg_class_size
[(int) rclass
] == 1);
2210 /* The default implementation of TARGET_CLASS_MAX_NREGS. */
2213 default_class_max_nregs (reg_class_t rclass ATTRIBUTE_UNUSED
,
2214 machine_mode mode ATTRIBUTE_UNUSED
)
2216 #ifdef CLASS_MAX_NREGS
2217 return (unsigned char) CLASS_MAX_NREGS ((enum reg_class
) rclass
,
2220 /* Targets with variable-sized modes must provide their own definition
2222 unsigned int size
= GET_MODE_SIZE (mode
).to_constant ();
2223 return (size
+ UNITS_PER_WORD
- 1) / UNITS_PER_WORD
;
2227 /* Determine the debugging unwind mechanism for the target. */
2229 enum unwind_info_type
2230 default_debug_unwind_info (void)
2232 /* If the target wants to force the use of dwarf2 unwind info, let it. */
2233 /* ??? Change all users to the hook, then poison this. */
2234 #ifdef DWARF2_FRAME_INFO
2235 if (DWARF2_FRAME_INFO
)
2239 /* Otherwise, only turn it on if dwarf2 debugging is enabled. */
2240 #ifdef DWARF2_DEBUGGING_INFO
2241 if (dwarf_debuginfo_p ())
2248 /* Targets that set NUM_POLY_INT_COEFFS to something greater than 1
2249 must define this hook. */
2252 default_dwarf_poly_indeterminate_value (unsigned int, unsigned int *, int *)
2257 /* Determine the correct mode for a Dwarf frame register that represents
2261 default_dwarf_frame_reg_mode (int regno
)
2263 machine_mode save_mode
= reg_raw_mode
[regno
];
2265 if (targetm
.hard_regno_call_part_clobbered (eh_edge_abi
.id (),
2267 save_mode
= choose_hard_reg_mode (regno
, 1, &eh_edge_abi
);
2271 /* To be used by targets where reg_raw_mode doesn't return the right
2272 mode for registers used in apply_builtin_return and apply_builtin_arg. */
2275 default_get_reg_raw_mode (int regno
)
2277 /* Targets must override this hook if the underlying register is
2279 return as_a
<fixed_size_mode
> (reg_raw_mode
[regno
]);
2282 /* Return true if a leaf function should stay leaf even with profiling
2286 default_keep_leaf_when_profiled ()
2291 /* Return true if the state of option OPTION should be stored in PCH files
2292 and checked by default_pch_valid_p. Store the option's current state
2296 option_affects_pch_p (int option
, struct cl_option_state
*state
)
2298 if ((cl_options
[option
].flags
& CL_TARGET
) == 0)
2300 if ((cl_options
[option
].flags
& CL_PCH_IGNORE
) != 0)
2302 if (option_flag_var (option
, &global_options
) == &target_flags
)
2303 if (targetm
.check_pch_target_flags
)
2305 return get_option_state (&global_options
, option
, state
);
2308 /* Default version of get_pch_validity.
2309 By default, every flag difference is fatal; that will be mostly right for
2310 most targets, but completely right for very few. */
2313 default_get_pch_validity (size_t *sz
)
2315 struct cl_option_state state
;
2320 if (targetm
.check_pch_target_flags
)
2321 *sz
+= sizeof (target_flags
);
2322 for (i
= 0; i
< cl_options_count
; i
++)
2323 if (option_affects_pch_p (i
, &state
))
2326 result
= r
= XNEWVEC (char, *sz
);
2330 if (targetm
.check_pch_target_flags
)
2332 memcpy (r
, &target_flags
, sizeof (target_flags
));
2333 r
+= sizeof (target_flags
);
2336 for (i
= 0; i
< cl_options_count
; i
++)
2337 if (option_affects_pch_p (i
, &state
))
2339 memcpy (r
, state
.data
, state
.size
);
2346 /* Return a message which says that a PCH file was created with a different
2347 setting of OPTION. */
2350 pch_option_mismatch (const char *option
)
2352 return xasprintf (_("created and used with differing settings of '%s'"),
2356 /* Default version of pch_valid_p. */
2359 default_pch_valid_p (const void *data_p
, size_t len ATTRIBUTE_UNUSED
)
2361 struct cl_option_state state
;
2362 const char *data
= (const char *)data_p
;
2365 /* -fpic and -fpie also usually make a PCH invalid. */
2366 if (data
[0] != flag_pic
)
2367 return _("created and used with different settings of %<-fpic%>");
2368 if (data
[1] != flag_pie
)
2369 return _("created and used with different settings of %<-fpie%>");
2372 /* Check target_flags. */
2373 if (targetm
.check_pch_target_flags
)
2378 memcpy (&tf
, data
, sizeof (target_flags
));
2379 data
+= sizeof (target_flags
);
2380 r
= targetm
.check_pch_target_flags (tf
);
2385 for (i
= 0; i
< cl_options_count
; i
++)
2386 if (option_affects_pch_p (i
, &state
))
2388 if (memcmp (data
, state
.data
, state
.size
) != 0)
2389 return pch_option_mismatch (cl_options
[i
].opt_text
);
2396 /* Default version of cstore_mode. */
2399 default_cstore_mode (enum insn_code icode
)
2401 return as_a
<scalar_int_mode
> (insn_data
[(int) icode
].operand
[0].mode
);
2404 /* Default version of member_type_forces_blk. */
2407 default_member_type_forces_blk (const_tree
, machine_mode
)
2412 /* Default version of canonicalize_comparison. */
2415 default_canonicalize_comparison (int *, rtx
*, rtx
*, bool)
2419 /* Default implementation of TARGET_ATOMIC_ASSIGN_EXPAND_FENV. */
2422 default_atomic_assign_expand_fenv (tree
*, tree
*, tree
*)
2426 #ifndef PAD_VARARGS_DOWN
2427 #define PAD_VARARGS_DOWN BYTES_BIG_ENDIAN
2430 /* Build an indirect-ref expression over the given TREE, which represents a
2431 piece of a va_arg() expansion. */
2433 build_va_arg_indirect_ref (tree addr
)
2435 addr
= build_simple_mem_ref_loc (EXPR_LOCATION (addr
), addr
);
2439 /* The "standard" implementation of va_arg: read the value from the
2440 current (padded) address and increment by the (padded) size. */
2443 std_gimplify_va_arg_expr (tree valist
, tree type
, gimple_seq
*pre_p
,
2446 tree addr
, t
, type_size
, rounded_size
, valist_tmp
;
2447 unsigned HOST_WIDE_INT align
, boundary
;
2450 /* All of the alignment and movement below is for args-grow-up machines.
2451 As of 2004, there are only 3 ARGS_GROW_DOWNWARD targets, and they all
2452 implement their own specialized gimplify_va_arg_expr routines. */
2453 if (ARGS_GROW_DOWNWARD
)
2456 indirect
= pass_va_arg_by_reference (type
);
2458 type
= build_pointer_type (type
);
2460 if (targetm
.calls
.split_complex_arg
2461 && TREE_CODE (type
) == COMPLEX_TYPE
2462 && targetm
.calls
.split_complex_arg (type
))
2464 tree real_part
, imag_part
;
2466 real_part
= std_gimplify_va_arg_expr (valist
,
2467 TREE_TYPE (type
), pre_p
, NULL
);
2468 real_part
= get_initialized_tmp_var (real_part
, pre_p
);
2470 imag_part
= std_gimplify_va_arg_expr (unshare_expr (valist
),
2471 TREE_TYPE (type
), pre_p
, NULL
);
2472 imag_part
= get_initialized_tmp_var (imag_part
, pre_p
);
2474 return build2 (COMPLEX_EXPR
, type
, real_part
, imag_part
);
2477 align
= PARM_BOUNDARY
/ BITS_PER_UNIT
;
2478 boundary
= targetm
.calls
.function_arg_boundary (TYPE_MODE (type
), type
);
2480 /* When we align parameter on stack for caller, if the parameter
2481 alignment is beyond MAX_SUPPORTED_STACK_ALIGNMENT, it will be
2482 aligned at MAX_SUPPORTED_STACK_ALIGNMENT. We will match callee
2483 here with caller. */
2484 if (boundary
> MAX_SUPPORTED_STACK_ALIGNMENT
)
2485 boundary
= MAX_SUPPORTED_STACK_ALIGNMENT
;
2487 boundary
/= BITS_PER_UNIT
;
2489 /* Hoist the valist value into a temporary for the moment. */
2490 valist_tmp
= get_initialized_tmp_var (valist
, pre_p
);
2492 /* va_list pointer is aligned to PARM_BOUNDARY. If argument actually
2493 requires greater alignment, we must perform dynamic alignment. */
2494 if (boundary
> align
2495 && !TYPE_EMPTY_P (type
)
2496 && !integer_zerop (TYPE_SIZE (type
)))
2498 t
= build2 (MODIFY_EXPR
, TREE_TYPE (valist
), valist_tmp
,
2499 fold_build_pointer_plus_hwi (valist_tmp
, boundary
- 1));
2500 gimplify_and_add (t
, pre_p
);
2502 t
= build2 (MODIFY_EXPR
, TREE_TYPE (valist
), valist_tmp
,
2503 fold_build2 (BIT_AND_EXPR
, TREE_TYPE (valist
),
2505 build_int_cst (TREE_TYPE (valist
), -boundary
)));
2506 gimplify_and_add (t
, pre_p
);
2511 /* If the actual alignment is less than the alignment of the type,
2512 adjust the type accordingly so that we don't assume strict alignment
2513 when dereferencing the pointer. */
2514 boundary
*= BITS_PER_UNIT
;
2515 if (boundary
< TYPE_ALIGN (type
))
2517 type
= build_variant_type_copy (type
);
2518 SET_TYPE_ALIGN (type
, boundary
);
2521 /* Compute the rounded size of the type. */
2522 type_size
= arg_size_in_bytes (type
);
2523 rounded_size
= round_up (type_size
, align
);
2525 /* Reduce rounded_size so it's sharable with the postqueue. */
2526 gimplify_expr (&rounded_size
, pre_p
, post_p
, is_gimple_val
, fb_rvalue
);
2530 if (PAD_VARARGS_DOWN
&& !integer_zerop (rounded_size
))
2532 /* Small args are padded downward. */
2533 t
= fold_build2_loc (input_location
, GT_EXPR
, sizetype
,
2534 rounded_size
, size_int (align
));
2535 t
= fold_build3 (COND_EXPR
, sizetype
, t
, size_zero_node
,
2536 size_binop (MINUS_EXPR
, rounded_size
, type_size
));
2537 addr
= fold_build_pointer_plus (addr
, t
);
2540 /* Compute new value for AP. */
2541 t
= fold_build_pointer_plus (valist_tmp
, rounded_size
);
2542 t
= build2 (MODIFY_EXPR
, TREE_TYPE (valist
), valist
, t
);
2543 gimplify_and_add (t
, pre_p
);
2545 addr
= fold_convert (build_pointer_type (type
), addr
);
2548 addr
= build_va_arg_indirect_ref (addr
);
2550 return build_va_arg_indirect_ref (addr
);
2553 /* An implementation of TARGET_CAN_USE_DOLOOP_P for targets that do
2554 not support nested low-overhead loops. */
2557 can_use_doloop_if_innermost (const widest_int
&, const widest_int
&,
2558 unsigned int loop_depth
, bool)
2560 return loop_depth
== 1;
2563 /* Default implementation of TARGET_OPTAB_SUPPORTED_P. */
2566 default_optab_supported_p (int, machine_mode
, machine_mode
, optimization_type
)
2571 /* Default implementation of TARGET_MAX_NOCE_IFCVT_SEQ_COST. */
2574 default_max_noce_ifcvt_seq_cost (edge e
)
2576 bool predictable_p
= predictable_edge_p (e
);
2580 if (OPTION_SET_P (param_max_rtl_if_conversion_predictable_cost
))
2581 return param_max_rtl_if_conversion_predictable_cost
;
2585 if (OPTION_SET_P (param_max_rtl_if_conversion_unpredictable_cost
))
2586 return param_max_rtl_if_conversion_unpredictable_cost
;
2589 return BRANCH_COST (true, predictable_p
) * COSTS_N_INSNS (3);
2592 /* Default implementation of TARGET_MIN_ARITHMETIC_PRECISION. */
2595 default_min_arithmetic_precision (void)
2597 return WORD_REGISTER_OPERATIONS
? BITS_PER_WORD
: BITS_PER_UNIT
;
2600 /* Default implementation of TARGET_C_EXCESS_PRECISION. */
2602 enum flt_eval_method
2603 default_excess_precision (enum excess_precision_type ATTRIBUTE_UNUSED
)
2605 return FLT_EVAL_METHOD_PROMOTE_TO_FLOAT
;
2608 /* Return true if _BitInt(N) is supported and fill details about it into
2611 default_bitint_type_info (int, struct bitint_info
*)
2616 /* Default implementation for
2617 TARGET_STACK_CLASH_PROTECTION_ALLOCA_PROBE_RANGE. */
2619 default_stack_clash_protection_alloca_probe_range (void)
2624 /* The default implementation of TARGET_EARLY_REMAT_MODES. */
2627 default_select_early_remat_modes (sbitmap
)
2631 /* The default implementation of TARGET_PREFERRED_ELSE_VALUE. */
2634 default_preferred_else_value (unsigned, tree type
, unsigned, tree
*)
2636 return build_zero_cst (type
);
2639 /* Default implementation of TARGET_HAVE_SPECULATION_SAFE_VALUE. */
2641 default_have_speculation_safe_value (bool active ATTRIBUTE_UNUSED
)
2643 #ifdef HAVE_speculation_barrier
2644 return active
? HAVE_speculation_barrier
: true;
2649 /* Alternative implementation of TARGET_HAVE_SPECULATION_SAFE_VALUE
2650 that can be used on targets that never have speculative execution. */
2652 speculation_safe_value_not_needed (bool active
)
2657 /* Default implementation of the speculation-safe-load builtin. This
2658 implementation simply copies val to result and generates a
2659 speculation_barrier insn, if such a pattern is defined. */
2661 default_speculation_safe_value (machine_mode mode ATTRIBUTE_UNUSED
,
2662 rtx result
, rtx val
,
2663 rtx failval ATTRIBUTE_UNUSED
)
2665 emit_move_insn (result
, val
);
2667 #ifdef HAVE_speculation_barrier
2668 /* Assume the target knows what it is doing: if it defines a
2669 speculation barrier, but it is not enabled, then assume that one
2671 if (HAVE_speculation_barrier
)
2672 emit_insn (gen_speculation_barrier ());
2678 /* How many bits to shift in order to access the tag bits.
2679 The default is to store the tag in the top 8 bits of a 64 bit pointer, hence
2680 shifting 56 bits will leave just the tag. */
2681 #define HWASAN_SHIFT (GET_MODE_PRECISION (Pmode) - 8)
2682 #define HWASAN_SHIFT_RTX GEN_INT (HWASAN_SHIFT)
2685 default_memtag_can_tag_addresses ()
2691 default_memtag_tag_size ()
2697 default_memtag_granule_size ()
2702 /* The default implementation of TARGET_MEMTAG_INSERT_RANDOM_TAG. */
2704 default_memtag_insert_random_tag (rtx untagged
, rtx target
)
2706 gcc_assert (param_hwasan_instrument_stack
);
2707 if (param_hwasan_random_frame_tag
)
2709 rtx fn
= init_one_libfunc ("__hwasan_generate_tag");
2710 rtx new_tag
= emit_library_call_value (fn
, NULL_RTX
, LCT_NORMAL
, QImode
);
2711 return targetm
.memtag
.set_tag (untagged
, new_tag
, target
);
2715 /* NOTE: The kernel API does not have __hwasan_generate_tag exposed.
2716 In the future we may add the option emit random tags with inline
2717 instrumentation instead of function calls. This would be the same
2718 between the kernel and userland. */
2723 /* The default implementation of TARGET_MEMTAG_ADD_TAG. */
2725 default_memtag_add_tag (rtx base
, poly_int64 offset
, uint8_t tag_offset
)
2727 /* Need to look into what the most efficient code sequence is.
2728 This is a code sequence that would be emitted *many* times, so we
2729 want it as small as possible.
2731 There are two places where tag overflow is a question:
2732 - Tagging the shadow stack.
2733 (both tagging and untagging).
2734 - Tagging addressable pointers.
2736 We need to ensure both behaviors are the same (i.e. that the tag that
2737 ends up in a pointer after "overflowing" the tag bits with a tag addition
2738 is the same that ends up in the shadow space).
2740 The aim is that the behavior of tag addition should follow modulo
2741 wrapping in both instances.
2743 The libhwasan code doesn't have any path that increments a pointer's tag,
2744 which means it has no opinion on what happens when a tag increment
2745 overflows (and hence we can choose our own behavior). */
2747 offset
+= ((uint64_t)tag_offset
<< HWASAN_SHIFT
);
2748 return plus_constant (Pmode
, base
, offset
);
2751 /* The default implementation of TARGET_MEMTAG_SET_TAG. */
2753 default_memtag_set_tag (rtx untagged
, rtx tag
, rtx target
)
2755 gcc_assert (GET_MODE (untagged
) == Pmode
&& GET_MODE (tag
) == QImode
);
2756 tag
= expand_simple_binop (Pmode
, ASHIFT
, tag
, HWASAN_SHIFT_RTX
, NULL_RTX
,
2757 /* unsignedp = */1, OPTAB_WIDEN
);
2758 rtx ret
= expand_simple_binop (Pmode
, IOR
, untagged
, tag
, target
,
2759 /* unsignedp = */1, OPTAB_DIRECT
);
2764 /* The default implementation of TARGET_MEMTAG_EXTRACT_TAG. */
2766 default_memtag_extract_tag (rtx tagged_pointer
, rtx target
)
2768 rtx tag
= expand_simple_binop (Pmode
, LSHIFTRT
, tagged_pointer
,
2769 HWASAN_SHIFT_RTX
, target
,
2772 rtx ret
= gen_lowpart (QImode
, tag
);
2777 /* The default implementation of TARGET_MEMTAG_UNTAGGED_POINTER. */
2779 default_memtag_untagged_pointer (rtx tagged_pointer
, rtx target
)
2781 rtx tag_mask
= gen_int_mode ((HOST_WIDE_INT_1U
<< HWASAN_SHIFT
) - 1, Pmode
);
2782 rtx untagged_base
= expand_simple_binop (Pmode
, AND
, tagged_pointer
,
2783 tag_mask
, target
, true,
2785 gcc_assert (untagged_base
);
2786 return untagged_base
;
2789 #include "gt-targhooks.h"