1 /* Default target hook functions. 2 Copyright (C) 2003-2018 Free Software Foundation, Inc. 3 4 This file is part of GCC. 5 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 9 version. 10 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 14 for more details. 15 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/>. */ 19 20 /* The migration of target macros to target hooks works as follows: 21 22 1. Create a target hook that uses the existing target macros to 23 implement the same functionality. 24 25 2. Convert all the MI files to use the hook instead of the macro. 26 27 3. Repeat for a majority of the remaining target macros. This will 28 take some time. 29 30 4. Tell target maintainers to start migrating. 31 32 5. Eventually convert the backends to override the hook instead of 33 defining the macros. This will take some time too. 34 35 6. TBD when, poison the macros. Unmigrated targets will break at 36 this point. 37 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. 41 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. 44 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. */ 48 49 #include "config.h" 50 #include "system.h" 51 #include "coretypes.h" 52 #include "target.h" 53 #include "function.h" 54 #include "rtl.h" 55 #include "tree.h" 56 #include "tree-ssa-alias.h" 57 #include "gimple-expr.h" 58 #include "memmodel.h" 59 #include "tm_p.h" 60 #include "stringpool.h" 61 #include "tree-vrp.h" 62 #include "tree-ssanames.h" 63 #include "profile-count.h" 64 #include "optabs.h" 65 #include "regs.h" 66 #include "recog.h" 67 #include "diagnostic-core.h" 68 #include "fold-const.h" 69 #include "stor-layout.h" 70 #include "varasm.h" 71 #include "flags.h" 72 #include "explow.h" 73 #include "calls.h" 74 #include "expr.h" 75 #include "output.h" 76 #include "common/common-target.h" 77 #include "reload.h" 78 #include "intl.h" 79 #include "opts.h" 80 #include "gimplify.h" 81 #include "predict.h" 82 #include "params.h" 83 #include "real.h" 84 #include "langhooks.h" 85 #include "sbitmap.h" 86 87 bool 88 default_legitimate_address_p (machine_mode mode ATTRIBUTE_UNUSED, 89 rtx addr ATTRIBUTE_UNUSED, 90 bool strict ATTRIBUTE_UNUSED) 91 { 92 #ifdef GO_IF_LEGITIMATE_ADDRESS 93 /* Defer to the old implementation using a goto. */ 94 if (strict) 95 return strict_memory_address_p (mode, addr); 96 else 97 return memory_address_p (mode, addr); 98 #else 99 gcc_unreachable (); 100 #endif 101 } 102 103 void 104 default_external_libcall (rtx fun ATTRIBUTE_UNUSED) 105 { 106 #ifdef ASM_OUTPUT_EXTERNAL_LIBCALL 107 ASM_OUTPUT_EXTERNAL_LIBCALL (asm_out_file, fun); 108 #endif 109 } 110 111 int 112 default_unspec_may_trap_p (const_rtx x, unsigned flags) 113 { 114 int i; 115 116 /* Any floating arithmetic may trap. */ 117 if ((SCALAR_FLOAT_MODE_P (GET_MODE (x)) && flag_trapping_math)) 118 return 1; 119 120 for (i = 0; i < XVECLEN (x, 0); ++i) 121 { 122 if (may_trap_p_1 (XVECEXP (x, 0, i), flags)) 123 return 1; 124 } 125 126 return 0; 127 } 128 129 machine_mode 130 default_promote_function_mode (const_tree type ATTRIBUTE_UNUSED, 131 machine_mode mode, 132 int *punsignedp ATTRIBUTE_UNUSED, 133 const_tree funtype ATTRIBUTE_UNUSED, 134 int for_return ATTRIBUTE_UNUSED) 135 { 136 if (type != NULL_TREE && for_return == 2) 137 return promote_mode (type, mode, punsignedp); 138 return mode; 139 } 140 141 machine_mode 142 default_promote_function_mode_always_promote (const_tree type, 143 machine_mode mode, 144 int *punsignedp, 145 const_tree funtype ATTRIBUTE_UNUSED, 146 int for_return ATTRIBUTE_UNUSED) 147 { 148 return promote_mode (type, mode, punsignedp); 149 } 150 151 machine_mode 152 default_cc_modes_compatible (machine_mode m1, machine_mode m2) 153 { 154 if (m1 == m2) 155 return m1; 156 return VOIDmode; 157 } 158 159 bool 160 default_return_in_memory (const_tree type, 161 const_tree fntype ATTRIBUTE_UNUSED) 162 { 163 return (TYPE_MODE (type) == BLKmode); 164 } 165 166 rtx 167 default_legitimize_address (rtx x, rtx orig_x ATTRIBUTE_UNUSED, 168 machine_mode mode ATTRIBUTE_UNUSED) 169 { 170 return x; 171 } 172 173 bool 174 default_legitimize_address_displacement (rtx *, rtx *, poly_int64, 175 machine_mode) 176 { 177 return false; 178 } 179 180 bool 181 default_const_not_ok_for_debug_p (rtx x) 182 { 183 if (GET_CODE (x) == UNSPEC) 184 return true; 185 return false; 186 } 187 188 rtx 189 default_expand_builtin_saveregs (void) 190 { 191 error ("__builtin_saveregs not supported by this target"); 192 return const0_rtx; 193 } 194 195 void 196 default_setup_incoming_varargs (cumulative_args_t ca ATTRIBUTE_UNUSED, 197 machine_mode mode ATTRIBUTE_UNUSED, 198 tree type ATTRIBUTE_UNUSED, 199 int *pretend_arg_size ATTRIBUTE_UNUSED, 200 int second_time ATTRIBUTE_UNUSED) 201 { 202 } 203 204 /* The default implementation of TARGET_BUILTIN_SETJMP_FRAME_VALUE. */ 205 206 rtx 207 default_builtin_setjmp_frame_value (void) 208 { 209 return virtual_stack_vars_rtx; 210 } 211 212 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns false. */ 213 214 bool 215 hook_bool_CUMULATIVE_ARGS_false (cumulative_args_t ca ATTRIBUTE_UNUSED) 216 { 217 return false; 218 } 219 220 bool 221 default_pretend_outgoing_varargs_named (cumulative_args_t ca ATTRIBUTE_UNUSED) 222 { 223 return (targetm.calls.setup_incoming_varargs 224 != default_setup_incoming_varargs); 225 } 226 227 scalar_int_mode 228 default_eh_return_filter_mode (void) 229 { 230 return targetm.unwind_word_mode (); 231 } 232 233 scalar_int_mode 234 default_libgcc_cmp_return_mode (void) 235 { 236 return word_mode; 237 } 238 239 scalar_int_mode 240 default_libgcc_shift_count_mode (void) 241 { 242 return word_mode; 243 } 244 245 scalar_int_mode 246 default_unwind_word_mode (void) 247 { 248 return word_mode; 249 } 250 251 /* The default implementation of TARGET_SHIFT_TRUNCATION_MASK. */ 252 253 unsigned HOST_WIDE_INT 254 default_shift_truncation_mask (machine_mode mode) 255 { 256 return SHIFT_COUNT_TRUNCATED ? GET_MODE_UNIT_BITSIZE (mode) - 1 : 0; 257 } 258 259 /* The default implementation of TARGET_MIN_DIVISIONS_FOR_RECIP_MUL. */ 260 261 unsigned int 262 default_min_divisions_for_recip_mul (machine_mode mode ATTRIBUTE_UNUSED) 263 { 264 return have_insn_for (DIV, mode) ? 3 : 2; 265 } 266 267 /* The default implementation of TARGET_MODE_REP_EXTENDED. */ 268 269 int 270 default_mode_rep_extended (scalar_int_mode, scalar_int_mode) 271 { 272 return UNKNOWN; 273 } 274 275 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns true. */ 276 277 bool 278 hook_bool_CUMULATIVE_ARGS_true (cumulative_args_t a ATTRIBUTE_UNUSED) 279 { 280 return true; 281 } 282 283 /* Return machine mode for non-standard suffix 284 or VOIDmode if non-standard suffixes are unsupported. */ 285 machine_mode 286 default_mode_for_suffix (char suffix ATTRIBUTE_UNUSED) 287 { 288 return VOIDmode; 289 } 290 291 /* The generic C++ ABI specifies this is a 64-bit value. */ 292 tree 293 default_cxx_guard_type (void) 294 { 295 return long_long_integer_type_node; 296 } 297 298 /* Returns the size of the cookie to use when allocating an array 299 whose elements have the indicated TYPE. Assumes that it is already 300 known that a cookie is needed. */ 301 302 tree 303 default_cxx_get_cookie_size (tree type) 304 { 305 tree cookie_size; 306 307 /* We need to allocate an additional max (sizeof (size_t), alignof 308 (true_type)) bytes. */ 309 tree sizetype_size; 310 tree type_align; 311 312 sizetype_size = size_in_bytes (sizetype); 313 type_align = size_int (TYPE_ALIGN_UNIT (type)); 314 if (tree_int_cst_lt (type_align, sizetype_size)) 315 cookie_size = sizetype_size; 316 else 317 cookie_size = type_align; 318 319 return cookie_size; 320 } 321 322 /* Return true if a parameter must be passed by reference. This version 323 of the TARGET_PASS_BY_REFERENCE hook uses just MUST_PASS_IN_STACK. */ 324 325 bool 326 hook_pass_by_reference_must_pass_in_stack (cumulative_args_t c ATTRIBUTE_UNUSED, 327 machine_mode mode ATTRIBUTE_UNUSED, const_tree type ATTRIBUTE_UNUSED, 328 bool named_arg ATTRIBUTE_UNUSED) 329 { 330 return targetm.calls.must_pass_in_stack (mode, type); 331 } 332 333 /* Return true if a parameter follows callee copies conventions. This 334 version of the hook is true for all named arguments. */ 335 336 bool 337 hook_callee_copies_named (cumulative_args_t ca ATTRIBUTE_UNUSED, 338 machine_mode mode ATTRIBUTE_UNUSED, 339 const_tree type ATTRIBUTE_UNUSED, bool named) 340 { 341 return named; 342 } 343 344 /* Emit to STREAM the assembler syntax for insn operand X. */ 345 346 void 347 default_print_operand (FILE *stream ATTRIBUTE_UNUSED, rtx x ATTRIBUTE_UNUSED, 348 int code ATTRIBUTE_UNUSED) 349 { 350 #ifdef PRINT_OPERAND 351 PRINT_OPERAND (stream, x, code); 352 #else 353 gcc_unreachable (); 354 #endif 355 } 356 357 /* Emit to STREAM the assembler syntax for an insn operand whose memory 358 address is X. */ 359 360 void 361 default_print_operand_address (FILE *stream ATTRIBUTE_UNUSED, 362 machine_mode /*mode*/, 363 rtx x ATTRIBUTE_UNUSED) 364 { 365 #ifdef PRINT_OPERAND_ADDRESS 366 PRINT_OPERAND_ADDRESS (stream, x); 367 #else 368 gcc_unreachable (); 369 #endif 370 } 371 372 /* Return true if CODE is a valid punctuation character for the 373 `print_operand' hook. */ 374 375 bool 376 default_print_operand_punct_valid_p (unsigned char code ATTRIBUTE_UNUSED) 377 { 378 #ifdef PRINT_OPERAND_PUNCT_VALID_P 379 return PRINT_OPERAND_PUNCT_VALID_P (code); 380 #else 381 return false; 382 #endif 383 } 384 385 /* The default implementation of TARGET_MANGLE_ASSEMBLER_NAME. */ 386 tree 387 default_mangle_assembler_name (const char *name ATTRIBUTE_UNUSED) 388 { 389 const char *skipped = name + (*name == '*' ? 1 : 0); 390 const char *stripped = targetm.strip_name_encoding (skipped); 391 if (*name != '*' && user_label_prefix[0]) 392 stripped = ACONCAT ((user_label_prefix, stripped, NULL)); 393 return get_identifier (stripped); 394 } 395 396 /* True if MODE is valid for the target. By "valid", we mean able to 397 be manipulated in non-trivial ways. In particular, this means all 398 the arithmetic is supported. 399 400 By default we guess this means that any C type is supported. If 401 we can't map the mode back to a type that would be available in C, 402 then reject it. Special case, here, is the double-word arithmetic 403 supported by optabs.c. */ 404 405 bool 406 default_scalar_mode_supported_p (scalar_mode mode) 407 { 408 int precision = GET_MODE_PRECISION (mode); 409 410 switch (GET_MODE_CLASS (mode)) 411 { 412 case MODE_PARTIAL_INT: 413 case MODE_INT: 414 if (precision == CHAR_TYPE_SIZE) 415 return true; 416 if (precision == SHORT_TYPE_SIZE) 417 return true; 418 if (precision == INT_TYPE_SIZE) 419 return true; 420 if (precision == LONG_TYPE_SIZE) 421 return true; 422 if (precision == LONG_LONG_TYPE_SIZE) 423 return true; 424 if (precision == 2 * BITS_PER_WORD) 425 return true; 426 return false; 427 428 case MODE_FLOAT: 429 if (precision == FLOAT_TYPE_SIZE) 430 return true; 431 if (precision == DOUBLE_TYPE_SIZE) 432 return true; 433 if (precision == LONG_DOUBLE_TYPE_SIZE) 434 return true; 435 return false; 436 437 case MODE_DECIMAL_FLOAT: 438 case MODE_FRACT: 439 case MODE_UFRACT: 440 case MODE_ACCUM: 441 case MODE_UACCUM: 442 return false; 443 444 default: 445 gcc_unreachable (); 446 } 447 } 448 449 /* Return true if libgcc supports floating-point mode MODE (known to 450 be supported as a scalar mode). */ 451 452 bool 453 default_libgcc_floating_mode_supported_p (scalar_float_mode mode) 454 { 455 switch (mode) 456 { 457 #ifdef HAVE_SFmode 458 case E_SFmode: 459 #endif 460 #ifdef HAVE_DFmode 461 case E_DFmode: 462 #endif 463 #ifdef HAVE_XFmode 464 case E_XFmode: 465 #endif 466 #ifdef HAVE_TFmode 467 case E_TFmode: 468 #endif 469 return true; 470 471 default: 472 return false; 473 } 474 } 475 476 /* Return the machine mode to use for the type _FloatN, if EXTENDED is 477 false, or _FloatNx, if EXTENDED is true, or VOIDmode if not 478 supported. */ 479 opt_scalar_float_mode 480 default_floatn_mode (int n, bool extended) 481 { 482 if (extended) 483 { 484 opt_scalar_float_mode cand1, cand2; 485 scalar_float_mode mode; 486 switch (n) 487 { 488 case 32: 489 #ifdef HAVE_DFmode 490 cand1 = DFmode; 491 #endif 492 break; 493 494 case 64: 495 #ifdef HAVE_XFmode 496 cand1 = XFmode; 497 #endif 498 #ifdef HAVE_TFmode 499 cand2 = TFmode; 500 #endif 501 break; 502 503 case 128: 504 break; 505 506 default: 507 /* Those are the only valid _FloatNx types. */ 508 gcc_unreachable (); 509 } 510 if (cand1.exists (&mode) 511 && REAL_MODE_FORMAT (mode)->ieee_bits > n 512 && targetm.scalar_mode_supported_p (mode) 513 && targetm.libgcc_floating_mode_supported_p (mode)) 514 return cand1; 515 if (cand2.exists (&mode) 516 && REAL_MODE_FORMAT (mode)->ieee_bits > n 517 && targetm.scalar_mode_supported_p (mode) 518 && targetm.libgcc_floating_mode_supported_p (mode)) 519 return cand2; 520 } 521 else 522 { 523 opt_scalar_float_mode cand; 524 scalar_float_mode mode; 525 switch (n) 526 { 527 case 16: 528 /* Always enable _Float16 if we have basic support for the mode. 529 Targets can control the range and precision of operations on 530 the _Float16 type using TARGET_C_EXCESS_PRECISION. */ 531 #ifdef HAVE_HFmode 532 cand = HFmode; 533 #endif 534 break; 535 536 case 32: 537 #ifdef HAVE_SFmode 538 cand = SFmode; 539 #endif 540 break; 541 542 case 64: 543 #ifdef HAVE_DFmode 544 cand = DFmode; 545 #endif 546 break; 547 548 case 128: 549 #ifdef HAVE_TFmode 550 cand = TFmode; 551 #endif 552 break; 553 554 default: 555 break; 556 } 557 if (cand.exists (&mode) 558 && REAL_MODE_FORMAT (mode)->ieee_bits == n 559 && targetm.scalar_mode_supported_p (mode) 560 && targetm.libgcc_floating_mode_supported_p (mode)) 561 return cand; 562 } 563 return opt_scalar_float_mode (); 564 } 565 566 /* Define this to return true if the _Floatn and _Floatnx built-in functions 567 should implicitly enable the built-in function without the __builtin_ prefix 568 in addition to the normal built-in function with the __builtin_ prefix. The 569 default is to only enable built-in functions without the __builtin_ prefix 570 for the GNU C langauge. The argument FUNC is the enum builtin_in_function 571 id of the function to be enabled. */ 572 573 bool 574 default_floatn_builtin_p (int func ATTRIBUTE_UNUSED) 575 { 576 static bool first_time_p = true; 577 static bool c_or_objective_c; 578 579 if (first_time_p) 580 { 581 first_time_p = false; 582 c_or_objective_c = lang_GNU_C () || lang_GNU_OBJC (); 583 } 584 585 return c_or_objective_c; 586 } 587 588 /* Make some target macros useable by target-independent code. */ 589 bool 590 targhook_words_big_endian (void) 591 { 592 return !!WORDS_BIG_ENDIAN; 593 } 594 595 bool 596 targhook_float_words_big_endian (void) 597 { 598 return !!FLOAT_WORDS_BIG_ENDIAN; 599 } 600 601 /* True if the target supports floating-point exceptions and rounding 602 modes. */ 603 604 bool 605 default_float_exceptions_rounding_supported_p (void) 606 { 607 #ifdef HAVE_adddf3 608 return HAVE_adddf3; 609 #else 610 return false; 611 #endif 612 } 613 614 /* True if the target supports decimal floating point. */ 615 616 bool 617 default_decimal_float_supported_p (void) 618 { 619 return ENABLE_DECIMAL_FLOAT; 620 } 621 622 /* True if the target supports fixed-point arithmetic. */ 623 624 bool 625 default_fixed_point_supported_p (void) 626 { 627 return ENABLE_FIXED_POINT; 628 } 629 630 /* True if the target supports GNU indirect functions. */ 631 632 bool 633 default_has_ifunc_p (void) 634 { 635 return HAVE_GNU_INDIRECT_FUNCTION; 636 } 637 638 /* NULL if INSN insn is valid within a low-overhead loop, otherwise returns 639 an error message. 640 641 This function checks whether a given INSN is valid within a low-overhead 642 loop. If INSN is invalid it returns the reason for that, otherwise it 643 returns NULL. A called function may clobber any special registers required 644 for low-overhead looping. Additionally, some targets (eg, PPC) use the count 645 register for branch on table instructions. We reject the doloop pattern in 646 these cases. */ 647 648 const char * 649 default_invalid_within_doloop (const rtx_insn *insn) 650 { 651 if (CALL_P (insn)) 652 return "Function call in loop."; 653 654 if (tablejump_p (insn, NULL, NULL) || computed_jump_p (insn)) 655 return "Computed branch in the loop."; 656 657 return NULL; 658 } 659 660 /* Mapping of builtin functions to vectorized variants. */ 661 662 tree 663 default_builtin_vectorized_function (unsigned int, tree, tree) 664 { 665 return NULL_TREE; 666 } 667 668 /* Mapping of target builtin functions to vectorized variants. */ 669 670 tree 671 default_builtin_md_vectorized_function (tree, tree, tree) 672 { 673 return NULL_TREE; 674 } 675 676 /* Vectorized conversion. */ 677 678 tree 679 default_builtin_vectorized_conversion (unsigned int code ATTRIBUTE_UNUSED, 680 tree dest_type ATTRIBUTE_UNUSED, 681 tree src_type ATTRIBUTE_UNUSED) 682 { 683 return NULL_TREE; 684 } 685 686 /* Default vectorizer cost model values. */ 687 688 int 689 default_builtin_vectorization_cost (enum vect_cost_for_stmt type_of_cost, 690 tree vectype, 691 int misalign ATTRIBUTE_UNUSED) 692 { 693 switch (type_of_cost) 694 { 695 case scalar_stmt: 696 case scalar_load: 697 case scalar_store: 698 case vector_stmt: 699 case vector_load: 700 case vector_store: 701 case vec_to_scalar: 702 case scalar_to_vec: 703 case cond_branch_not_taken: 704 case vec_perm: 705 case vec_promote_demote: 706 return 1; 707 708 case unaligned_load: 709 case unaligned_store: 710 return 2; 711 712 case cond_branch_taken: 713 return 3; 714 715 case vec_construct: 716 return estimated_poly_value (TYPE_VECTOR_SUBPARTS (vectype)) - 1; 717 718 default: 719 gcc_unreachable (); 720 } 721 } 722 723 /* Reciprocal. */ 724 725 tree 726 default_builtin_reciprocal (tree) 727 { 728 return NULL_TREE; 729 } 730 731 bool 732 hook_bool_CUMULATIVE_ARGS_mode_tree_bool_false ( 733 cumulative_args_t ca ATTRIBUTE_UNUSED, 734 machine_mode mode ATTRIBUTE_UNUSED, 735 const_tree type ATTRIBUTE_UNUSED, bool named ATTRIBUTE_UNUSED) 736 { 737 return false; 738 } 739 740 bool 741 hook_bool_CUMULATIVE_ARGS_mode_tree_bool_true ( 742 cumulative_args_t ca ATTRIBUTE_UNUSED, 743 machine_mode mode ATTRIBUTE_UNUSED, 744 const_tree type ATTRIBUTE_UNUSED, bool named ATTRIBUTE_UNUSED) 745 { 746 return true; 747 } 748 749 int 750 hook_int_CUMULATIVE_ARGS_mode_tree_bool_0 ( 751 cumulative_args_t ca ATTRIBUTE_UNUSED, 752 machine_mode mode ATTRIBUTE_UNUSED, 753 tree type ATTRIBUTE_UNUSED, bool named ATTRIBUTE_UNUSED) 754 { 755 return 0; 756 } 757 758 void 759 hook_void_CUMULATIVE_ARGS_tree (cumulative_args_t ca ATTRIBUTE_UNUSED, 760 tree ATTRIBUTE_UNUSED) 761 { 762 } 763 764 void 765 default_function_arg_advance (cumulative_args_t ca ATTRIBUTE_UNUSED, 766 machine_mode mode ATTRIBUTE_UNUSED, 767 const_tree type ATTRIBUTE_UNUSED, 768 bool named ATTRIBUTE_UNUSED) 769 { 770 gcc_unreachable (); 771 } 772 773 /* Default implementation of TARGET_FUNCTION_ARG_OFFSET. */ 774 775 HOST_WIDE_INT 776 default_function_arg_offset (machine_mode, const_tree) 777 { 778 return 0; 779 } 780 781 /* Default implementation of TARGET_FUNCTION_ARG_PADDING: usually pad 782 upward, but pad short args downward on big-endian machines. */ 783 784 pad_direction 785 default_function_arg_padding (machine_mode mode, const_tree type) 786 { 787 if (!BYTES_BIG_ENDIAN) 788 return PAD_UPWARD; 789 790 unsigned HOST_WIDE_INT size; 791 if (mode == BLKmode) 792 { 793 if (!type || TREE_CODE (TYPE_SIZE (type)) != INTEGER_CST) 794 return PAD_UPWARD; 795 size = int_size_in_bytes (type); 796 } 797 else 798 /* Targets with variable-sized modes must override this hook 799 and handle variable-sized modes explicitly. */ 800 size = GET_MODE_SIZE (mode).to_constant (); 801 802 if (size < (PARM_BOUNDARY / BITS_PER_UNIT)) 803 return PAD_DOWNWARD; 804 805 return PAD_UPWARD; 806 } 807 808 rtx 809 default_function_arg (cumulative_args_t ca ATTRIBUTE_UNUSED, 810 machine_mode mode ATTRIBUTE_UNUSED, 811 const_tree type ATTRIBUTE_UNUSED, 812 bool named ATTRIBUTE_UNUSED) 813 { 814 gcc_unreachable (); 815 } 816 817 rtx 818 default_function_incoming_arg (cumulative_args_t ca ATTRIBUTE_UNUSED, 819 machine_mode mode ATTRIBUTE_UNUSED, 820 const_tree type ATTRIBUTE_UNUSED, 821 bool named ATTRIBUTE_UNUSED) 822 { 823 gcc_unreachable (); 824 } 825 826 unsigned int 827 default_function_arg_boundary (machine_mode mode ATTRIBUTE_UNUSED, 828 const_tree type ATTRIBUTE_UNUSED) 829 { 830 return PARM_BOUNDARY; 831 } 832 833 unsigned int 834 default_function_arg_round_boundary (machine_mode mode ATTRIBUTE_UNUSED, 835 const_tree type ATTRIBUTE_UNUSED) 836 { 837 return PARM_BOUNDARY; 838 } 839 840 void 841 hook_void_bitmap (bitmap regs ATTRIBUTE_UNUSED) 842 { 843 } 844 845 const char * 846 hook_invalid_arg_for_unprototyped_fn ( 847 const_tree typelist ATTRIBUTE_UNUSED, 848 const_tree funcdecl ATTRIBUTE_UNUSED, 849 const_tree val ATTRIBUTE_UNUSED) 850 { 851 return NULL; 852 } 853 854 /* Initialize the stack protection decls. */ 855 856 /* Stack protection related decls living in libgcc. */ 857 static GTY(()) tree stack_chk_guard_decl; 858 859 tree 860 default_stack_protect_guard (void) 861 { 862 tree t = stack_chk_guard_decl; 863 864 if (t == NULL) 865 { 866 rtx x; 867 868 t = build_decl (UNKNOWN_LOCATION, 869 VAR_DECL, get_identifier ("__stack_chk_guard"), 870 ptr_type_node); 871 TREE_STATIC (t) = 1; 872 TREE_PUBLIC (t) = 1; 873 DECL_EXTERNAL (t) = 1; 874 TREE_USED (t) = 1; 875 TREE_THIS_VOLATILE (t) = 1; 876 DECL_ARTIFICIAL (t) = 1; 877 DECL_IGNORED_P (t) = 1; 878 879 /* Do not share RTL as the declaration is visible outside of 880 current function. */ 881 x = DECL_RTL (t); 882 RTX_FLAG (x, used) = 1; 883 884 stack_chk_guard_decl = t; 885 } 886 887 return t; 888 } 889 890 static GTY(()) tree stack_chk_fail_decl; 891 892 tree 893 default_external_stack_protect_fail (void) 894 { 895 tree t = stack_chk_fail_decl; 896 897 if (t == NULL_TREE) 898 { 899 t = build_function_type_list (void_type_node, NULL_TREE); 900 t = build_decl (UNKNOWN_LOCATION, 901 FUNCTION_DECL, get_identifier ("__stack_chk_fail"), t); 902 TREE_STATIC (t) = 1; 903 TREE_PUBLIC (t) = 1; 904 DECL_EXTERNAL (t) = 1; 905 TREE_USED (t) = 1; 906 TREE_THIS_VOLATILE (t) = 1; 907 TREE_NOTHROW (t) = 1; 908 DECL_ARTIFICIAL (t) = 1; 909 DECL_IGNORED_P (t) = 1; 910 DECL_VISIBILITY (t) = VISIBILITY_DEFAULT; 911 DECL_VISIBILITY_SPECIFIED (t) = 1; 912 913 stack_chk_fail_decl = t; 914 } 915 916 return build_call_expr (t, 0); 917 } 918 919 tree 920 default_hidden_stack_protect_fail (void) 921 { 922 #ifndef HAVE_GAS_HIDDEN 923 return default_external_stack_protect_fail (); 924 #else 925 tree t = stack_chk_fail_decl; 926 927 if (!flag_pic) 928 return default_external_stack_protect_fail (); 929 930 if (t == NULL_TREE) 931 { 932 t = build_function_type_list (void_type_node, NULL_TREE); 933 t = build_decl (UNKNOWN_LOCATION, FUNCTION_DECL, 934 get_identifier ("__stack_chk_fail_local"), t); 935 TREE_STATIC (t) = 1; 936 TREE_PUBLIC (t) = 1; 937 DECL_EXTERNAL (t) = 1; 938 TREE_USED (t) = 1; 939 TREE_THIS_VOLATILE (t) = 1; 940 TREE_NOTHROW (t) = 1; 941 DECL_ARTIFICIAL (t) = 1; 942 DECL_IGNORED_P (t) = 1; 943 DECL_VISIBILITY_SPECIFIED (t) = 1; 944 DECL_VISIBILITY (t) = VISIBILITY_HIDDEN; 945 946 stack_chk_fail_decl = t; 947 } 948 949 return build_call_expr (t, 0); 950 #endif 951 } 952 953 bool 954 hook_bool_const_rtx_commutative_p (const_rtx x, 955 int outer_code ATTRIBUTE_UNUSED) 956 { 957 return COMMUTATIVE_P (x); 958 } 959 960 rtx 961 default_function_value (const_tree ret_type ATTRIBUTE_UNUSED, 962 const_tree fn_decl_or_type, 963 bool outgoing ATTRIBUTE_UNUSED) 964 { 965 /* The old interface doesn't handle receiving the function type. */ 966 if (fn_decl_or_type 967 && !DECL_P (fn_decl_or_type)) 968 fn_decl_or_type = NULL; 969 970 #ifdef FUNCTION_VALUE 971 return FUNCTION_VALUE (ret_type, fn_decl_or_type); 972 #else 973 gcc_unreachable (); 974 #endif 975 } 976 977 rtx 978 default_libcall_value (machine_mode mode ATTRIBUTE_UNUSED, 979 const_rtx fun ATTRIBUTE_UNUSED) 980 { 981 #ifdef LIBCALL_VALUE 982 return LIBCALL_VALUE (MACRO_MODE (mode)); 983 #else 984 gcc_unreachable (); 985 #endif 986 } 987 988 /* The default hook for TARGET_FUNCTION_VALUE_REGNO_P. */ 989 990 bool 991 default_function_value_regno_p (const unsigned int regno ATTRIBUTE_UNUSED) 992 { 993 #ifdef FUNCTION_VALUE_REGNO_P 994 return FUNCTION_VALUE_REGNO_P (regno); 995 #else 996 gcc_unreachable (); 997 #endif 998 } 999 1000 rtx 1001 default_internal_arg_pointer (void) 1002 { 1003 /* If the reg that the virtual arg pointer will be translated into is 1004 not a fixed reg or is the stack pointer, make a copy of the virtual 1005 arg pointer, and address parms via the copy. The frame pointer is 1006 considered fixed even though it is not marked as such. */ 1007 if ((ARG_POINTER_REGNUM == STACK_POINTER_REGNUM 1008 || ! (fixed_regs[ARG_POINTER_REGNUM] 1009 || ARG_POINTER_REGNUM == FRAME_POINTER_REGNUM))) 1010 return copy_to_reg (virtual_incoming_args_rtx); 1011 else 1012 return virtual_incoming_args_rtx; 1013 } 1014 1015 rtx 1016 default_static_chain (const_tree ARG_UNUSED (fndecl_or_type), bool incoming_p) 1017 { 1018 if (incoming_p) 1019 { 1020 #ifdef STATIC_CHAIN_INCOMING_REGNUM 1021 return gen_rtx_REG (Pmode, STATIC_CHAIN_INCOMING_REGNUM); 1022 #endif 1023 } 1024 1025 #ifdef STATIC_CHAIN_REGNUM 1026 return gen_rtx_REG (Pmode, STATIC_CHAIN_REGNUM); 1027 #endif 1028 1029 { 1030 static bool issued_error; 1031 if (!issued_error) 1032 { 1033 issued_error = true; 1034 sorry ("nested functions not supported on this target"); 1035 } 1036 1037 /* It really doesn't matter what we return here, so long at it 1038 doesn't cause the rest of the compiler to crash. */ 1039 return gen_rtx_MEM (Pmode, stack_pointer_rtx); 1040 } 1041 } 1042 1043 void 1044 default_trampoline_init (rtx ARG_UNUSED (m_tramp), tree ARG_UNUSED (t_func), 1045 rtx ARG_UNUSED (r_chain)) 1046 { 1047 sorry ("nested function trampolines not supported on this target"); 1048 } 1049 1050 poly_int64 1051 default_return_pops_args (tree, tree, poly_int64) 1052 { 1053 return 0; 1054 } 1055 1056 reg_class_t 1057 default_branch_target_register_class (void) 1058 { 1059 return NO_REGS; 1060 } 1061 1062 reg_class_t 1063 default_ira_change_pseudo_allocno_class (int regno ATTRIBUTE_UNUSED, 1064 reg_class_t cl, 1065 reg_class_t best_cl ATTRIBUTE_UNUSED) 1066 { 1067 return cl; 1068 } 1069 1070 extern bool 1071 default_lra_p (void) 1072 { 1073 return true; 1074 } 1075 1076 int 1077 default_register_priority (int hard_regno ATTRIBUTE_UNUSED) 1078 { 1079 return 0; 1080 } 1081 1082 extern bool 1083 default_register_usage_leveling_p (void) 1084 { 1085 return false; 1086 } 1087 1088 extern bool 1089 default_different_addr_displacement_p (void) 1090 { 1091 return false; 1092 } 1093 1094 reg_class_t 1095 default_secondary_reload (bool in_p ATTRIBUTE_UNUSED, rtx x ATTRIBUTE_UNUSED, 1096 reg_class_t reload_class_i ATTRIBUTE_UNUSED, 1097 machine_mode reload_mode ATTRIBUTE_UNUSED, 1098 secondary_reload_info *sri) 1099 { 1100 enum reg_class rclass = NO_REGS; 1101 enum reg_class reload_class = (enum reg_class) reload_class_i; 1102 1103 if (sri->prev_sri && sri->prev_sri->t_icode != CODE_FOR_nothing) 1104 { 1105 sri->icode = sri->prev_sri->t_icode; 1106 return NO_REGS; 1107 } 1108 #ifdef SECONDARY_INPUT_RELOAD_CLASS 1109 if (in_p) 1110 rclass = SECONDARY_INPUT_RELOAD_CLASS (reload_class, 1111 MACRO_MODE (reload_mode), x); 1112 #endif 1113 #ifdef SECONDARY_OUTPUT_RELOAD_CLASS 1114 if (! in_p) 1115 rclass = SECONDARY_OUTPUT_RELOAD_CLASS (reload_class, 1116 MACRO_MODE (reload_mode), x); 1117 #endif 1118 if (rclass != NO_REGS) 1119 { 1120 enum insn_code icode 1121 = direct_optab_handler (in_p ? reload_in_optab : reload_out_optab, 1122 reload_mode); 1123 1124 if (icode != CODE_FOR_nothing 1125 && !insn_operand_matches (icode, in_p, x)) 1126 icode = CODE_FOR_nothing; 1127 else if (icode != CODE_FOR_nothing) 1128 { 1129 const char *insn_constraint, *scratch_constraint; 1130 enum reg_class insn_class, scratch_class; 1131 1132 gcc_assert (insn_data[(int) icode].n_operands == 3); 1133 insn_constraint = insn_data[(int) icode].operand[!in_p].constraint; 1134 if (!*insn_constraint) 1135 insn_class = ALL_REGS; 1136 else 1137 { 1138 if (in_p) 1139 { 1140 gcc_assert (*insn_constraint == '='); 1141 insn_constraint++; 1142 } 1143 insn_class = (reg_class_for_constraint 1144 (lookup_constraint (insn_constraint))); 1145 gcc_assert (insn_class != NO_REGS); 1146 } 1147 1148 scratch_constraint = insn_data[(int) icode].operand[2].constraint; 1149 /* The scratch register's constraint must start with "=&", 1150 except for an input reload, where only "=" is necessary, 1151 and where it might be beneficial to re-use registers from 1152 the input. */ 1153 gcc_assert (scratch_constraint[0] == '=' 1154 && (in_p || scratch_constraint[1] == '&')); 1155 scratch_constraint++; 1156 if (*scratch_constraint == '&') 1157 scratch_constraint++; 1158 scratch_class = (reg_class_for_constraint 1159 (lookup_constraint (scratch_constraint))); 1160 1161 if (reg_class_subset_p (reload_class, insn_class)) 1162 { 1163 gcc_assert (scratch_class == rclass); 1164 rclass = NO_REGS; 1165 } 1166 else 1167 rclass = insn_class; 1168 1169 } 1170 if (rclass == NO_REGS) 1171 sri->icode = icode; 1172 else 1173 sri->t_icode = icode; 1174 } 1175 return rclass; 1176 } 1177 1178 /* The default implementation of TARGET_SECONDARY_MEMORY_NEEDED_MODE. */ 1179 1180 machine_mode 1181 default_secondary_memory_needed_mode (machine_mode mode) 1182 { 1183 if (!targetm.lra_p () 1184 && known_lt (GET_MODE_BITSIZE (mode), BITS_PER_WORD) 1185 && INTEGRAL_MODE_P (mode)) 1186 return mode_for_size (BITS_PER_WORD, GET_MODE_CLASS (mode), 0).require (); 1187 return mode; 1188 } 1189 1190 /* By default, if flag_pic is true, then neither local nor global relocs 1191 should be placed in readonly memory. */ 1192 1193 int 1194 default_reloc_rw_mask (void) 1195 { 1196 return flag_pic ? 3 : 0; 1197 } 1198 1199 /* By default, do no modification. */ 1200 tree default_mangle_decl_assembler_name (tree decl ATTRIBUTE_UNUSED, 1201 tree id) 1202 { 1203 return id; 1204 } 1205 1206 /* The default implementation of TARGET_STATIC_RTX_ALIGNMENT. */ 1207 1208 HOST_WIDE_INT 1209 default_static_rtx_alignment (machine_mode mode) 1210 { 1211 return GET_MODE_ALIGNMENT (mode); 1212 } 1213 1214 /* The default implementation of TARGET_CONSTANT_ALIGNMENT. */ 1215 1216 HOST_WIDE_INT 1217 default_constant_alignment (const_tree, HOST_WIDE_INT align) 1218 { 1219 return align; 1220 } 1221 1222 /* An implementation of TARGET_CONSTANT_ALIGNMENT that aligns strings 1223 to at least BITS_PER_WORD but otherwise makes no changes. */ 1224 1225 HOST_WIDE_INT 1226 constant_alignment_word_strings (const_tree exp, HOST_WIDE_INT align) 1227 { 1228 if (TREE_CODE (exp) == STRING_CST) 1229 return MAX (align, BITS_PER_WORD); 1230 return align; 1231 } 1232 1233 /* Default to natural alignment for vector types. */ 1234 HOST_WIDE_INT 1235 default_vector_alignment (const_tree type) 1236 { 1237 HOST_WIDE_INT align = tree_to_shwi (TYPE_SIZE (type)); 1238 if (align > MAX_OFILE_ALIGNMENT) 1239 align = MAX_OFILE_ALIGNMENT; 1240 return align; 1241 } 1242 1243 /* The default implementation of 1244 TARGET_VECTORIZE_PREFERRED_VECTOR_ALIGNMENT. */ 1245 1246 HOST_WIDE_INT 1247 default_preferred_vector_alignment (const_tree type) 1248 { 1249 return TYPE_ALIGN (type); 1250 } 1251 1252 /* By default assume vectors of element TYPE require a multiple of the natural 1253 alignment of TYPE. TYPE is naturally aligned if IS_PACKED is false. */ 1254 bool 1255 default_builtin_vector_alignment_reachable (const_tree /*type*/, bool is_packed) 1256 { 1257 return ! is_packed; 1258 } 1259 1260 /* By default, assume that a target supports any factor of misalignment 1261 memory access if it supports movmisalign patten. 1262 is_packed is true if the memory access is defined in a packed struct. */ 1263 bool 1264 default_builtin_support_vector_misalignment (machine_mode mode, 1265 const_tree type 1266 ATTRIBUTE_UNUSED, 1267 int misalignment 1268 ATTRIBUTE_UNUSED, 1269 bool is_packed 1270 ATTRIBUTE_UNUSED) 1271 { 1272 if (optab_handler (movmisalign_optab, mode) != CODE_FOR_nothing) 1273 return true; 1274 return false; 1275 } 1276 1277 /* By default, only attempt to parallelize bitwise operations, and 1278 possibly adds/subtracts using bit-twiddling. */ 1279 1280 machine_mode 1281 default_preferred_simd_mode (scalar_mode) 1282 { 1283 return word_mode; 1284 } 1285 1286 /* By default do not split reductions further. */ 1287 1288 machine_mode 1289 default_split_reduction (machine_mode mode) 1290 { 1291 return mode; 1292 } 1293 1294 /* By default only the size derived from the preferred vector mode 1295 is tried. */ 1296 1297 void 1298 default_autovectorize_vector_sizes (vector_sizes *) 1299 { 1300 } 1301 1302 /* By default a vector of integers is used as a mask. */ 1303 1304 opt_machine_mode 1305 default_get_mask_mode (poly_uint64 nunits, poly_uint64 vector_size) 1306 { 1307 unsigned int elem_size = vector_element_size (vector_size, nunits); 1308 scalar_int_mode elem_mode 1309 = smallest_int_mode_for_size (elem_size * BITS_PER_UNIT); 1310 machine_mode vector_mode; 1311 1312 gcc_assert (known_eq (elem_size * nunits, vector_size)); 1313 1314 if (mode_for_vector (elem_mode, nunits).exists (&vector_mode) 1315 && VECTOR_MODE_P (vector_mode) 1316 && targetm.vector_mode_supported_p (vector_mode)) 1317 return vector_mode; 1318 1319 return opt_machine_mode (); 1320 } 1321 1322 /* By default consider masked stores to be expensive. */ 1323 1324 bool 1325 default_empty_mask_is_expensive (unsigned ifn) 1326 { 1327 return ifn == IFN_MASK_STORE; 1328 } 1329 1330 /* By default, the cost model accumulates three separate costs (prologue, 1331 loop body, and epilogue) for a vectorized loop or block. So allocate an 1332 array of three unsigned ints, set it to zero, and return its address. */ 1333 1334 void * 1335 default_init_cost (struct loop *loop_info ATTRIBUTE_UNUSED) 1336 { 1337 unsigned *cost = XNEWVEC (unsigned, 3); 1338 cost[vect_prologue] = cost[vect_body] = cost[vect_epilogue] = 0; 1339 return cost; 1340 } 1341 1342 /* By default, the cost model looks up the cost of the given statement 1343 kind and mode, multiplies it by the occurrence count, accumulates 1344 it into the cost specified by WHERE, and returns the cost added. */ 1345 1346 unsigned 1347 default_add_stmt_cost (void *data, int count, enum vect_cost_for_stmt kind, 1348 struct _stmt_vec_info *stmt_info, int misalign, 1349 enum vect_cost_model_location where) 1350 { 1351 unsigned *cost = (unsigned *) data; 1352 unsigned retval = 0; 1353 1354 tree vectype = stmt_info ? stmt_vectype (stmt_info) : NULL_TREE; 1355 int stmt_cost = targetm.vectorize.builtin_vectorization_cost (kind, vectype, 1356 misalign); 1357 /* Statements in an inner loop relative to the loop being 1358 vectorized are weighted more heavily. The value here is 1359 arbitrary and could potentially be improved with analysis. */ 1360 if (where == vect_body && stmt_info && stmt_in_inner_loop_p (stmt_info)) 1361 count *= 50; /* FIXME. */ 1362 1363 retval = (unsigned) (count * stmt_cost); 1364 cost[where] += retval; 1365 1366 return retval; 1367 } 1368 1369 /* By default, the cost model just returns the accumulated costs. */ 1370 1371 void 1372 default_finish_cost (void *data, unsigned *prologue_cost, 1373 unsigned *body_cost, unsigned *epilogue_cost) 1374 { 1375 unsigned *cost = (unsigned *) data; 1376 *prologue_cost = cost[vect_prologue]; 1377 *body_cost = cost[vect_body]; 1378 *epilogue_cost = cost[vect_epilogue]; 1379 } 1380 1381 /* Free the cost data. */ 1382 1383 void 1384 default_destroy_cost_data (void *data) 1385 { 1386 free (data); 1387 } 1388 1389 /* Determine whether or not a pointer mode is valid. Assume defaults 1390 of ptr_mode or Pmode - can be overridden. */ 1391 bool 1392 default_valid_pointer_mode (scalar_int_mode mode) 1393 { 1394 return (mode == ptr_mode || mode == Pmode); 1395 } 1396 1397 /* Determine whether the memory reference specified by REF may alias 1398 the C libraries errno location. */ 1399 bool 1400 default_ref_may_alias_errno (ao_ref *ref) 1401 { 1402 tree base = ao_ref_base (ref); 1403 /* The default implementation assumes the errno location is 1404 a declaration of type int or is always accessed via a 1405 pointer to int. We assume that accesses to errno are 1406 not deliberately obfuscated (even in conforming ways). */ 1407 if (TYPE_UNSIGNED (TREE_TYPE (base)) 1408 || TYPE_MODE (TREE_TYPE (base)) != TYPE_MODE (integer_type_node)) 1409 return false; 1410 /* The default implementation assumes an errno location 1411 declaration is never defined in the current compilation unit. */ 1412 if (DECL_P (base) 1413 && !TREE_STATIC (base)) 1414 return true; 1415 else if (TREE_CODE (base) == MEM_REF 1416 && TREE_CODE (TREE_OPERAND (base, 0)) == SSA_NAME) 1417 { 1418 struct ptr_info_def *pi = SSA_NAME_PTR_INFO (TREE_OPERAND (base, 0)); 1419 return !pi || pi->pt.anything || pi->pt.nonlocal; 1420 } 1421 return false; 1422 } 1423 1424 /* Return the mode for a pointer to a given ADDRSPACE, 1425 defaulting to ptr_mode for all address spaces. */ 1426 1427 scalar_int_mode 1428 default_addr_space_pointer_mode (addr_space_t addrspace ATTRIBUTE_UNUSED) 1429 { 1430 return ptr_mode; 1431 } 1432 1433 /* Return the mode for an address in a given ADDRSPACE, 1434 defaulting to Pmode for all address spaces. */ 1435 1436 scalar_int_mode 1437 default_addr_space_address_mode (addr_space_t addrspace ATTRIBUTE_UNUSED) 1438 { 1439 return Pmode; 1440 } 1441 1442 /* Named address space version of valid_pointer_mode. 1443 To match the above, the same modes apply to all address spaces. */ 1444 1445 bool 1446 default_addr_space_valid_pointer_mode (scalar_int_mode mode, 1447 addr_space_t as ATTRIBUTE_UNUSED) 1448 { 1449 return targetm.valid_pointer_mode (mode); 1450 } 1451 1452 /* Some places still assume that all pointer or address modes are the 1453 standard Pmode and ptr_mode. These optimizations become invalid if 1454 the target actually supports multiple different modes. For now, 1455 we disable such optimizations on such targets, using this function. */ 1456 1457 bool 1458 target_default_pointer_address_modes_p (void) 1459 { 1460 if (targetm.addr_space.address_mode != default_addr_space_address_mode) 1461 return false; 1462 if (targetm.addr_space.pointer_mode != default_addr_space_pointer_mode) 1463 return false; 1464 1465 return true; 1466 } 1467 1468 /* Named address space version of legitimate_address_p. 1469 By default, all address spaces have the same form. */ 1470 1471 bool 1472 default_addr_space_legitimate_address_p (machine_mode mode, rtx mem, 1473 bool strict, 1474 addr_space_t as ATTRIBUTE_UNUSED) 1475 { 1476 return targetm.legitimate_address_p (mode, mem, strict); 1477 } 1478 1479 /* Named address space version of LEGITIMIZE_ADDRESS. 1480 By default, all address spaces have the same form. */ 1481 1482 rtx 1483 default_addr_space_legitimize_address (rtx x, rtx oldx, machine_mode mode, 1484 addr_space_t as ATTRIBUTE_UNUSED) 1485 { 1486 return targetm.legitimize_address (x, oldx, mode); 1487 } 1488 1489 /* The default hook for determining if one named address space is a subset of 1490 another and to return which address space to use as the common address 1491 space. */ 1492 1493 bool 1494 default_addr_space_subset_p (addr_space_t subset, addr_space_t superset) 1495 { 1496 return (subset == superset); 1497 } 1498 1499 /* The default hook for determining if 0 within a named address 1500 space is a valid address. */ 1501 1502 bool 1503 default_addr_space_zero_address_valid (addr_space_t as ATTRIBUTE_UNUSED) 1504 { 1505 return false; 1506 } 1507 1508 /* The default hook for debugging the address space is to return the 1509 address space number to indicate DW_AT_address_class. */ 1510 int 1511 default_addr_space_debug (addr_space_t as) 1512 { 1513 return as; 1514 } 1515 1516 /* The default hook implementation for TARGET_ADDR_SPACE_DIAGNOSE_USAGE. 1517 Don't complain about any address space. */ 1518 1519 void 1520 default_addr_space_diagnose_usage (addr_space_t, location_t) 1521 { 1522 } 1523 1524 1525 /* The default hook for TARGET_ADDR_SPACE_CONVERT. This hook should never be 1526 called for targets with only a generic address space. */ 1527 1528 rtx 1529 default_addr_space_convert (rtx op ATTRIBUTE_UNUSED, 1530 tree from_type ATTRIBUTE_UNUSED, 1531 tree to_type ATTRIBUTE_UNUSED) 1532 { 1533 gcc_unreachable (); 1534 } 1535 1536 /* The defualt implementation of TARGET_HARD_REGNO_NREGS. */ 1537 1538 unsigned int 1539 default_hard_regno_nregs (unsigned int, machine_mode mode) 1540 { 1541 /* Targets with variable-sized modes must provide their own definition 1542 of this hook. */ 1543 return CEIL (GET_MODE_SIZE (mode).to_constant (), UNITS_PER_WORD); 1544 } 1545 1546 bool 1547 default_hard_regno_scratch_ok (unsigned int regno ATTRIBUTE_UNUSED) 1548 { 1549 return true; 1550 } 1551 1552 /* The default implementation of TARGET_MODE_DEPENDENT_ADDRESS_P. */ 1553 1554 bool 1555 default_mode_dependent_address_p (const_rtx addr ATTRIBUTE_UNUSED, 1556 addr_space_t addrspace ATTRIBUTE_UNUSED) 1557 { 1558 return false; 1559 } 1560 1561 bool 1562 default_target_option_valid_attribute_p (tree ARG_UNUSED (fndecl), 1563 tree ARG_UNUSED (name), 1564 tree ARG_UNUSED (args), 1565 int ARG_UNUSED (flags)) 1566 { 1567 warning (OPT_Wattributes, 1568 "target attribute is not supported on this machine"); 1569 1570 return false; 1571 } 1572 1573 bool 1574 default_target_option_pragma_parse (tree ARG_UNUSED (args), 1575 tree ARG_UNUSED (pop_target)) 1576 { 1577 /* If args is NULL the caller is handle_pragma_pop_options (). In that case, 1578 emit no warning because "#pragma GCC pop_target" is valid on targets that 1579 do not have the "target" pragma. */ 1580 if (args) 1581 warning (OPT_Wpragmas, 1582 "#pragma GCC target is not supported for this machine"); 1583 1584 return false; 1585 } 1586 1587 bool 1588 default_target_can_inline_p (tree caller, tree callee) 1589 { 1590 tree callee_opts = DECL_FUNCTION_SPECIFIC_TARGET (callee); 1591 tree caller_opts = DECL_FUNCTION_SPECIFIC_TARGET (caller); 1592 if (! callee_opts) 1593 callee_opts = target_option_default_node; 1594 if (! caller_opts) 1595 caller_opts = target_option_default_node; 1596 1597 /* If both caller and callee have attributes, assume that if the 1598 pointer is different, the two functions have different target 1599 options since build_target_option_node uses a hash table for the 1600 options. */ 1601 return callee_opts == caller_opts; 1602 } 1603 1604 /* If the machine does not have a case insn that compares the bounds, 1605 this means extra overhead for dispatch tables, which raises the 1606 threshold for using them. */ 1607 1608 unsigned int 1609 default_case_values_threshold (void) 1610 { 1611 return (targetm.have_casesi () ? 4 : 5); 1612 } 1613 1614 bool 1615 default_have_conditional_execution (void) 1616 { 1617 return HAVE_conditional_execution; 1618 } 1619 1620 /* By default we assume that c99 functions are present at the runtime, 1621 but sincos is not. */ 1622 bool 1623 default_libc_has_function (enum function_class fn_class) 1624 { 1625 if (fn_class == function_c94 1626 || fn_class == function_c99_misc 1627 || fn_class == function_c99_math_complex) 1628 return true; 1629 1630 return false; 1631 } 1632 1633 bool 1634 gnu_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED) 1635 { 1636 return true; 1637 } 1638 1639 bool 1640 no_c99_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED) 1641 { 1642 return false; 1643 } 1644 1645 tree 1646 default_builtin_tm_load_store (tree ARG_UNUSED (type)) 1647 { 1648 return NULL_TREE; 1649 } 1650 1651 /* Compute cost of moving registers to/from memory. */ 1652 1653 int 1654 default_memory_move_cost (machine_mode mode ATTRIBUTE_UNUSED, 1655 reg_class_t rclass ATTRIBUTE_UNUSED, 1656 bool in ATTRIBUTE_UNUSED) 1657 { 1658 #ifndef MEMORY_MOVE_COST 1659 return (4 + memory_move_secondary_cost (mode, (enum reg_class) rclass, in)); 1660 #else 1661 return MEMORY_MOVE_COST (MACRO_MODE (mode), (enum reg_class) rclass, in); 1662 #endif 1663 } 1664 1665 /* Compute cost of moving data from a register of class FROM to one of 1666 TO, using MODE. */ 1667 1668 int 1669 default_register_move_cost (machine_mode mode ATTRIBUTE_UNUSED, 1670 reg_class_t from ATTRIBUTE_UNUSED, 1671 reg_class_t to ATTRIBUTE_UNUSED) 1672 { 1673 #ifndef REGISTER_MOVE_COST 1674 return 2; 1675 #else 1676 return REGISTER_MOVE_COST (MACRO_MODE (mode), 1677 (enum reg_class) from, (enum reg_class) to); 1678 #endif 1679 } 1680 1681 /* The default implementation of TARGET_SLOW_UNALIGNED_ACCESS. */ 1682 1683 bool 1684 default_slow_unaligned_access (machine_mode, unsigned int) 1685 { 1686 return STRICT_ALIGNMENT; 1687 } 1688 1689 /* The default implementation of TARGET_ESTIMATED_POLY_VALUE. */ 1690 1691 HOST_WIDE_INT 1692 default_estimated_poly_value (poly_int64 x) 1693 { 1694 return x.coeffs[0]; 1695 } 1696 1697 /* For hooks which use the MOVE_RATIO macro, this gives the legacy default 1698 behavior. SPEED_P is true if we are compiling for speed. */ 1699 1700 unsigned int 1701 get_move_ratio (bool speed_p ATTRIBUTE_UNUSED) 1702 { 1703 unsigned int move_ratio; 1704 #ifdef MOVE_RATIO 1705 move_ratio = (unsigned int) MOVE_RATIO (speed_p); 1706 #else 1707 #if defined (HAVE_movmemqi) || defined (HAVE_movmemhi) || defined (HAVE_movmemsi) || defined (HAVE_movmemdi) || defined (HAVE_movmemti) 1708 move_ratio = 2; 1709 #else /* No movmem patterns, pick a default. */ 1710 move_ratio = ((speed_p) ? 15 : 3); 1711 #endif 1712 #endif 1713 return move_ratio; 1714 } 1715 1716 /* Return TRUE if the move_by_pieces/set_by_pieces infrastructure should be 1717 used; return FALSE if the movmem/setmem optab should be expanded, or 1718 a call to memcpy emitted. */ 1719 1720 bool 1721 default_use_by_pieces_infrastructure_p (unsigned HOST_WIDE_INT size, 1722 unsigned int alignment, 1723 enum by_pieces_operation op, 1724 bool speed_p) 1725 { 1726 unsigned int max_size = 0; 1727 unsigned int ratio = 0; 1728 1729 switch (op) 1730 { 1731 case CLEAR_BY_PIECES: 1732 max_size = STORE_MAX_PIECES; 1733 ratio = CLEAR_RATIO (speed_p); 1734 break; 1735 case MOVE_BY_PIECES: 1736 max_size = MOVE_MAX_PIECES; 1737 ratio = get_move_ratio (speed_p); 1738 break; 1739 case SET_BY_PIECES: 1740 max_size = STORE_MAX_PIECES; 1741 ratio = SET_RATIO (speed_p); 1742 break; 1743 case STORE_BY_PIECES: 1744 max_size = STORE_MAX_PIECES; 1745 ratio = get_move_ratio (speed_p); 1746 break; 1747 case COMPARE_BY_PIECES: 1748 max_size = COMPARE_MAX_PIECES; 1749 /* Pick a likely default, just as in get_move_ratio. */ 1750 ratio = speed_p ? 15 : 3; 1751 break; 1752 } 1753 1754 return by_pieces_ninsns (size, alignment, max_size + 1, op) < ratio; 1755 } 1756 1757 /* This hook controls code generation for expanding a memcmp operation by 1758 pieces. Return 1 for the normal pattern of compare/jump after each pair 1759 of loads, or a higher number to reduce the number of branches. */ 1760 1761 int 1762 default_compare_by_pieces_branch_ratio (machine_mode) 1763 { 1764 return 1; 1765 } 1766 1767 /* Write PATCH_AREA_SIZE NOPs into the asm outfile FILE around a function 1768 entry. If RECORD_P is true and the target supports named sections, 1769 the location of the NOPs will be recorded in a special object section 1770 called "__patchable_function_entries". This routine may be called 1771 twice per function to put NOPs before and after the function 1772 entry. */ 1773 1774 void 1775 default_print_patchable_function_entry (FILE *file, 1776 unsigned HOST_WIDE_INT patch_area_size, 1777 bool record_p) 1778 { 1779 const char *nop_templ = 0; 1780 int code_num; 1781 rtx_insn *my_nop = make_insn_raw (gen_nop ()); 1782 1783 /* We use the template alone, relying on the (currently sane) assumption 1784 that the NOP template does not have variable operands. */ 1785 code_num = recog_memoized (my_nop); 1786 nop_templ = get_insn_template (code_num, my_nop); 1787 1788 if (record_p && targetm_common.have_named_sections) 1789 { 1790 char buf[256]; 1791 static int patch_area_number; 1792 section *previous_section = in_section; 1793 1794 patch_area_number++; 1795 ASM_GENERATE_INTERNAL_LABEL (buf, "LPFE", patch_area_number); 1796 1797 switch_to_section (get_section ("__patchable_function_entries", 1798 0, NULL)); 1799 fputs (integer_asm_op (POINTER_SIZE_UNITS, false), file); 1800 assemble_name_raw (file, buf); 1801 fputc ('\n', file); 1802 1803 switch_to_section (previous_section); 1804 ASM_OUTPUT_LABEL (file, buf); 1805 } 1806 1807 unsigned i; 1808 for (i = 0; i < patch_area_size; ++i) 1809 fprintf (file, "\t%s\n", nop_templ); 1810 } 1811 1812 bool 1813 default_profile_before_prologue (void) 1814 { 1815 #ifdef PROFILE_BEFORE_PROLOGUE 1816 return true; 1817 #else 1818 return false; 1819 #endif 1820 } 1821 1822 /* The default implementation of TARGET_PREFERRED_RELOAD_CLASS. */ 1823 1824 reg_class_t 1825 default_preferred_reload_class (rtx x ATTRIBUTE_UNUSED, 1826 reg_class_t rclass) 1827 { 1828 #ifdef PREFERRED_RELOAD_CLASS 1829 return (reg_class_t) PREFERRED_RELOAD_CLASS (x, (enum reg_class) rclass); 1830 #else 1831 return rclass; 1832 #endif 1833 } 1834 1835 /* The default implementation of TARGET_OUTPUT_PREFERRED_RELOAD_CLASS. */ 1836 1837 reg_class_t 1838 default_preferred_output_reload_class (rtx x ATTRIBUTE_UNUSED, 1839 reg_class_t rclass) 1840 { 1841 return rclass; 1842 } 1843 1844 /* The default implementation of TARGET_PREFERRED_RENAME_CLASS. */ 1845 reg_class_t 1846 default_preferred_rename_class (reg_class_t rclass ATTRIBUTE_UNUSED) 1847 { 1848 return NO_REGS; 1849 } 1850 1851 /* The default implementation of TARGET_CLASS_LIKELY_SPILLED_P. */ 1852 1853 bool 1854 default_class_likely_spilled_p (reg_class_t rclass) 1855 { 1856 return (reg_class_size[(int) rclass] == 1); 1857 } 1858 1859 /* The default implementation of TARGET_CLASS_MAX_NREGS. */ 1860 1861 unsigned char 1862 default_class_max_nregs (reg_class_t rclass ATTRIBUTE_UNUSED, 1863 machine_mode mode ATTRIBUTE_UNUSED) 1864 { 1865 #ifdef CLASS_MAX_NREGS 1866 return (unsigned char) CLASS_MAX_NREGS ((enum reg_class) rclass, 1867 MACRO_MODE (mode)); 1868 #else 1869 /* Targets with variable-sized modes must provide their own definition 1870 of this hook. */ 1871 unsigned int size = GET_MODE_SIZE (mode).to_constant (); 1872 return (size + UNITS_PER_WORD - 1) / UNITS_PER_WORD; 1873 #endif 1874 } 1875 1876 /* Determine the debugging unwind mechanism for the target. */ 1877 1878 enum unwind_info_type 1879 default_debug_unwind_info (void) 1880 { 1881 /* If the target wants to force the use of dwarf2 unwind info, let it. */ 1882 /* ??? Change all users to the hook, then poison this. */ 1883 #ifdef DWARF2_FRAME_INFO 1884 if (DWARF2_FRAME_INFO) 1885 return UI_DWARF2; 1886 #endif 1887 1888 /* Otherwise, only turn it on if dwarf2 debugging is enabled. */ 1889 #ifdef DWARF2_DEBUGGING_INFO 1890 if (write_symbols == DWARF2_DEBUG || write_symbols == VMS_AND_DWARF2_DEBUG) 1891 return UI_DWARF2; 1892 #endif 1893 1894 return UI_NONE; 1895 } 1896 1897 /* Targets that set NUM_POLY_INT_COEFFS to something greater than 1 1898 must define this hook. */ 1899 1900 unsigned int 1901 default_dwarf_poly_indeterminate_value (unsigned int, unsigned int *, int *) 1902 { 1903 gcc_unreachable (); 1904 } 1905 1906 /* Determine the correct mode for a Dwarf frame register that represents 1907 register REGNO. */ 1908 1909 machine_mode 1910 default_dwarf_frame_reg_mode (int regno) 1911 { 1912 machine_mode save_mode = reg_raw_mode[regno]; 1913 1914 if (targetm.hard_regno_call_part_clobbered (regno, save_mode)) 1915 save_mode = choose_hard_reg_mode (regno, 1, true); 1916 return save_mode; 1917 } 1918 1919 /* To be used by targets where reg_raw_mode doesn't return the right 1920 mode for registers used in apply_builtin_return and apply_builtin_arg. */ 1921 1922 fixed_size_mode 1923 default_get_reg_raw_mode (int regno) 1924 { 1925 /* Targets must override this hook if the underlying register is 1926 variable-sized. */ 1927 return as_a <fixed_size_mode> (reg_raw_mode[regno]); 1928 } 1929 1930 /* Return true if a leaf function should stay leaf even with profiling 1931 enabled. */ 1932 1933 bool 1934 default_keep_leaf_when_profiled () 1935 { 1936 return false; 1937 } 1938 1939 /* Return true if the state of option OPTION should be stored in PCH files 1940 and checked by default_pch_valid_p. Store the option's current state 1941 in STATE if so. */ 1942 1943 static inline bool 1944 option_affects_pch_p (int option, struct cl_option_state *state) 1945 { 1946 if ((cl_options[option].flags & CL_TARGET) == 0) 1947 return false; 1948 if ((cl_options[option].flags & CL_PCH_IGNORE) != 0) 1949 return false; 1950 if (option_flag_var (option, &global_options) == &target_flags) 1951 if (targetm.check_pch_target_flags) 1952 return false; 1953 return get_option_state (&global_options, option, state); 1954 } 1955 1956 /* Default version of get_pch_validity. 1957 By default, every flag difference is fatal; that will be mostly right for 1958 most targets, but completely right for very few. */ 1959 1960 void * 1961 default_get_pch_validity (size_t *sz) 1962 { 1963 struct cl_option_state state; 1964 size_t i; 1965 char *result, *r; 1966 1967 *sz = 2; 1968 if (targetm.check_pch_target_flags) 1969 *sz += sizeof (target_flags); 1970 for (i = 0; i < cl_options_count; i++) 1971 if (option_affects_pch_p (i, &state)) 1972 *sz += state.size; 1973 1974 result = r = XNEWVEC (char, *sz); 1975 r[0] = flag_pic; 1976 r[1] = flag_pie; 1977 r += 2; 1978 if (targetm.check_pch_target_flags) 1979 { 1980 memcpy (r, &target_flags, sizeof (target_flags)); 1981 r += sizeof (target_flags); 1982 } 1983 1984 for (i = 0; i < cl_options_count; i++) 1985 if (option_affects_pch_p (i, &state)) 1986 { 1987 memcpy (r, state.data, state.size); 1988 r += state.size; 1989 } 1990 1991 return result; 1992 } 1993 1994 /* Return a message which says that a PCH file was created with a different 1995 setting of OPTION. */ 1996 1997 static const char * 1998 pch_option_mismatch (const char *option) 1999 { 2000 return xasprintf (_("created and used with differing settings of '%s'"), 2001 option); 2002 } 2003 2004 /* Default version of pch_valid_p. */ 2005 2006 const char * 2007 default_pch_valid_p (const void *data_p, size_t len) 2008 { 2009 struct cl_option_state state; 2010 const char *data = (const char *)data_p; 2011 size_t i; 2012 2013 /* -fpic and -fpie also usually make a PCH invalid. */ 2014 if (data[0] != flag_pic) 2015 return _("created and used with different settings of -fpic"); 2016 if (data[1] != flag_pie) 2017 return _("created and used with different settings of -fpie"); 2018 data += 2; 2019 2020 /* Check target_flags. */ 2021 if (targetm.check_pch_target_flags) 2022 { 2023 int tf; 2024 const char *r; 2025 2026 memcpy (&tf, data, sizeof (target_flags)); 2027 data += sizeof (target_flags); 2028 len -= sizeof (target_flags); 2029 r = targetm.check_pch_target_flags (tf); 2030 if (r != NULL) 2031 return r; 2032 } 2033 2034 for (i = 0; i < cl_options_count; i++) 2035 if (option_affects_pch_p (i, &state)) 2036 { 2037 if (memcmp (data, state.data, state.size) != 0) 2038 return pch_option_mismatch (cl_options[i].opt_text); 2039 data += state.size; 2040 len -= state.size; 2041 } 2042 2043 return NULL; 2044 } 2045 2046 /* Default version of cstore_mode. */ 2047 2048 scalar_int_mode 2049 default_cstore_mode (enum insn_code icode) 2050 { 2051 return as_a <scalar_int_mode> (insn_data[(int) icode].operand[0].mode); 2052 } 2053 2054 /* Default version of member_type_forces_blk. */ 2055 2056 bool 2057 default_member_type_forces_blk (const_tree, machine_mode) 2058 { 2059 return false; 2060 } 2061 2062 rtx 2063 default_load_bounds_for_arg (rtx addr ATTRIBUTE_UNUSED, 2064 rtx ptr ATTRIBUTE_UNUSED, 2065 rtx bnd ATTRIBUTE_UNUSED) 2066 { 2067 gcc_unreachable (); 2068 } 2069 2070 void 2071 default_store_bounds_for_arg (rtx val ATTRIBUTE_UNUSED, 2072 rtx addr ATTRIBUTE_UNUSED, 2073 rtx bounds ATTRIBUTE_UNUSED, 2074 rtx to ATTRIBUTE_UNUSED) 2075 { 2076 gcc_unreachable (); 2077 } 2078 2079 rtx 2080 default_load_returned_bounds (rtx slot ATTRIBUTE_UNUSED) 2081 { 2082 gcc_unreachable (); 2083 } 2084 2085 void 2086 default_store_returned_bounds (rtx slot ATTRIBUTE_UNUSED, 2087 rtx bounds ATTRIBUTE_UNUSED) 2088 { 2089 gcc_unreachable (); 2090 } 2091 2092 /* Default version of canonicalize_comparison. */ 2093 2094 void 2095 default_canonicalize_comparison (int *, rtx *, rtx *, bool) 2096 { 2097 } 2098 2099 /* Default implementation of TARGET_ATOMIC_ASSIGN_EXPAND_FENV. */ 2100 2101 void 2102 default_atomic_assign_expand_fenv (tree *, tree *, tree *) 2103 { 2104 } 2105 2106 #ifndef PAD_VARARGS_DOWN 2107 #define PAD_VARARGS_DOWN BYTES_BIG_ENDIAN 2108 #endif 2109 2110 /* Build an indirect-ref expression over the given TREE, which represents a 2111 piece of a va_arg() expansion. */ 2112 tree 2113 build_va_arg_indirect_ref (tree addr) 2114 { 2115 addr = build_simple_mem_ref_loc (EXPR_LOCATION (addr), addr); 2116 return addr; 2117 } 2118 2119 /* The "standard" implementation of va_arg: read the value from the 2120 current (padded) address and increment by the (padded) size. */ 2121 2122 tree 2123 std_gimplify_va_arg_expr (tree valist, tree type, gimple_seq *pre_p, 2124 gimple_seq *post_p) 2125 { 2126 tree addr, t, type_size, rounded_size, valist_tmp; 2127 unsigned HOST_WIDE_INT align, boundary; 2128 bool indirect; 2129 2130 /* All of the alignment and movement below is for args-grow-up machines. 2131 As of 2004, there are only 3 ARGS_GROW_DOWNWARD targets, and they all 2132 implement their own specialized gimplify_va_arg_expr routines. */ 2133 if (ARGS_GROW_DOWNWARD) 2134 gcc_unreachable (); 2135 2136 indirect = pass_by_reference (NULL, TYPE_MODE (type), type, false); 2137 if (indirect) 2138 type = build_pointer_type (type); 2139 2140 align = PARM_BOUNDARY / BITS_PER_UNIT; 2141 boundary = targetm.calls.function_arg_boundary (TYPE_MODE (type), type); 2142 2143 /* When we align parameter on stack for caller, if the parameter 2144 alignment is beyond MAX_SUPPORTED_STACK_ALIGNMENT, it will be 2145 aligned at MAX_SUPPORTED_STACK_ALIGNMENT. We will match callee 2146 here with caller. */ 2147 if (boundary > MAX_SUPPORTED_STACK_ALIGNMENT) 2148 boundary = MAX_SUPPORTED_STACK_ALIGNMENT; 2149 2150 boundary /= BITS_PER_UNIT; 2151 2152 /* Hoist the valist value into a temporary for the moment. */ 2153 valist_tmp = get_initialized_tmp_var (valist, pre_p, NULL); 2154 2155 /* va_list pointer is aligned to PARM_BOUNDARY. If argument actually 2156 requires greater alignment, we must perform dynamic alignment. */ 2157 if (boundary > align 2158 && !TYPE_EMPTY_P (type) 2159 && !integer_zerop (TYPE_SIZE (type))) 2160 { 2161 t = build2 (MODIFY_EXPR, TREE_TYPE (valist), valist_tmp, 2162 fold_build_pointer_plus_hwi (valist_tmp, boundary - 1)); 2163 gimplify_and_add (t, pre_p); 2164 2165 t = build2 (MODIFY_EXPR, TREE_TYPE (valist), valist_tmp, 2166 fold_build2 (BIT_AND_EXPR, TREE_TYPE (valist), 2167 valist_tmp, 2168 build_int_cst (TREE_TYPE (valist), -boundary))); 2169 gimplify_and_add (t, pre_p); 2170 } 2171 else 2172 boundary = align; 2173 2174 /* If the actual alignment is less than the alignment of the type, 2175 adjust the type accordingly so that we don't assume strict alignment 2176 when dereferencing the pointer. */ 2177 boundary *= BITS_PER_UNIT; 2178 if (boundary < TYPE_ALIGN (type)) 2179 { 2180 type = build_variant_type_copy (type); 2181 SET_TYPE_ALIGN (type, boundary); 2182 } 2183 2184 /* Compute the rounded size of the type. */ 2185 type_size = arg_size_in_bytes (type); 2186 rounded_size = round_up (type_size, align); 2187 2188 /* Reduce rounded_size so it's sharable with the postqueue. */ 2189 gimplify_expr (&rounded_size, pre_p, post_p, is_gimple_val, fb_rvalue); 2190 2191 /* Get AP. */ 2192 addr = valist_tmp; 2193 if (PAD_VARARGS_DOWN && !integer_zerop (rounded_size)) 2194 { 2195 /* Small args are padded downward. */ 2196 t = fold_build2_loc (input_location, GT_EXPR, sizetype, 2197 rounded_size, size_int (align)); 2198 t = fold_build3 (COND_EXPR, sizetype, t, size_zero_node, 2199 size_binop (MINUS_EXPR, rounded_size, type_size)); 2200 addr = fold_build_pointer_plus (addr, t); 2201 } 2202 2203 /* Compute new value for AP. */ 2204 t = fold_build_pointer_plus (valist_tmp, rounded_size); 2205 t = build2 (MODIFY_EXPR, TREE_TYPE (valist), valist, t); 2206 gimplify_and_add (t, pre_p); 2207 2208 addr = fold_convert (build_pointer_type (type), addr); 2209 2210 if (indirect) 2211 addr = build_va_arg_indirect_ref (addr); 2212 2213 return build_va_arg_indirect_ref (addr); 2214 } 2215 2216 tree 2217 default_chkp_bound_type (void) 2218 { 2219 tree res = make_node (POINTER_BOUNDS_TYPE); 2220 TYPE_PRECISION (res) = TYPE_PRECISION (size_type_node) * 2; 2221 TYPE_NAME (res) = get_identifier ("__bounds_type"); 2222 SET_TYPE_MODE (res, targetm.chkp_bound_mode ()); 2223 layout_type (res); 2224 return res; 2225 } 2226 2227 machine_mode 2228 default_chkp_bound_mode (void) 2229 { 2230 return VOIDmode; 2231 } 2232 2233 tree 2234 default_builtin_chkp_function (unsigned int fcode ATTRIBUTE_UNUSED) 2235 { 2236 return NULL_TREE; 2237 } 2238 2239 rtx 2240 default_chkp_function_value_bounds (const_tree ret_type ATTRIBUTE_UNUSED, 2241 const_tree fn_decl_or_type ATTRIBUTE_UNUSED, 2242 bool outgoing ATTRIBUTE_UNUSED) 2243 { 2244 gcc_unreachable (); 2245 } 2246 2247 tree 2248 default_chkp_make_bounds_constant (HOST_WIDE_INT lb ATTRIBUTE_UNUSED, 2249 HOST_WIDE_INT ub ATTRIBUTE_UNUSED) 2250 { 2251 return NULL_TREE; 2252 } 2253 2254 int 2255 default_chkp_initialize_bounds (tree var ATTRIBUTE_UNUSED, 2256 tree lb ATTRIBUTE_UNUSED, 2257 tree ub ATTRIBUTE_UNUSED, 2258 tree *stmts ATTRIBUTE_UNUSED) 2259 { 2260 return 0; 2261 } 2262 2263 void 2264 default_setup_incoming_vararg_bounds (cumulative_args_t ca ATTRIBUTE_UNUSED, 2265 machine_mode mode ATTRIBUTE_UNUSED, 2266 tree type ATTRIBUTE_UNUSED, 2267 int *pretend_arg_size ATTRIBUTE_UNUSED, 2268 int second_time ATTRIBUTE_UNUSED) 2269 { 2270 } 2271 2272 /* An implementation of TARGET_CAN_USE_DOLOOP_P for targets that do 2273 not support nested low-overhead loops. */ 2274 2275 bool 2276 can_use_doloop_if_innermost (const widest_int &, const widest_int &, 2277 unsigned int loop_depth, bool) 2278 { 2279 return loop_depth == 1; 2280 } 2281 2282 /* Default implementation of TARGET_OPTAB_SUPPORTED_P. */ 2283 2284 bool 2285 default_optab_supported_p (int, machine_mode, machine_mode, optimization_type) 2286 { 2287 return true; 2288 } 2289 2290 /* Default implementation of TARGET_MAX_NOCE_IFCVT_SEQ_COST. */ 2291 2292 unsigned int 2293 default_max_noce_ifcvt_seq_cost (edge e) 2294 { 2295 bool predictable_p = predictable_edge_p (e); 2296 2297 enum compiler_param param 2298 = (predictable_p 2299 ? PARAM_MAX_RTL_IF_CONVERSION_PREDICTABLE_COST 2300 : PARAM_MAX_RTL_IF_CONVERSION_UNPREDICTABLE_COST); 2301 2302 /* If we have a parameter set, use that, otherwise take a guess using 2303 BRANCH_COST. */ 2304 if (global_options_set.x_param_values[param]) 2305 return PARAM_VALUE (param); 2306 else 2307 return BRANCH_COST (true, predictable_p) * COSTS_N_INSNS (3); 2308 } 2309 2310 /* Default implementation of TARGET_MIN_ARITHMETIC_PRECISION. */ 2311 2312 unsigned int 2313 default_min_arithmetic_precision (void) 2314 { 2315 return WORD_REGISTER_OPERATIONS ? BITS_PER_WORD : BITS_PER_UNIT; 2316 } 2317 2318 /* Default implementation of TARGET_C_EXCESS_PRECISION. */ 2319 2320 enum flt_eval_method 2321 default_excess_precision (enum excess_precision_type ATTRIBUTE_UNUSED) 2322 { 2323 return FLT_EVAL_METHOD_PROMOTE_TO_FLOAT; 2324 } 2325 2326 bool 2327 default_stack_clash_protection_final_dynamic_probe (rtx residual ATTRIBUTE_UNUSED) 2328 { 2329 return 0; 2330 } 2331 2332 /* The default implementation of TARGET_EARLY_REMAT_MODES. */ 2333 2334 void 2335 default_select_early_remat_modes (sbitmap) 2336 { 2337 } 2338 2339 #include "gt-targhooks.h" 2340