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 #if 1 945 /* 946 * This is a hack: 947 * It appears that our gas does not generate @PLT for hidden 948 * symbols. It could be that we need a newer version, or that 949 * this local function is handled differently on linux. 950 */ 951 DECL_VISIBILITY (t) = VISIBILITY_DEFAULT; 952 #else 953 DECL_VISIBILITY (t) = VISIBILITY_HIDDEN; 954 #endif 955 956 stack_chk_fail_decl = t; 957 } 958 959 return build_call_expr (t, 0); 960 #endif 961 } 962 963 bool 964 hook_bool_const_rtx_commutative_p (const_rtx x, 965 int outer_code ATTRIBUTE_UNUSED) 966 { 967 return COMMUTATIVE_P (x); 968 } 969 970 rtx 971 default_function_value (const_tree ret_type ATTRIBUTE_UNUSED, 972 const_tree fn_decl_or_type, 973 bool outgoing ATTRIBUTE_UNUSED) 974 { 975 /* The old interface doesn't handle receiving the function type. */ 976 if (fn_decl_or_type 977 && !DECL_P (fn_decl_or_type)) 978 fn_decl_or_type = NULL; 979 980 #ifdef FUNCTION_VALUE 981 return FUNCTION_VALUE (ret_type, fn_decl_or_type); 982 #else 983 gcc_unreachable (); 984 #endif 985 } 986 987 rtx 988 default_libcall_value (machine_mode mode ATTRIBUTE_UNUSED, 989 const_rtx fun ATTRIBUTE_UNUSED) 990 { 991 #ifdef LIBCALL_VALUE 992 return LIBCALL_VALUE (MACRO_MODE (mode)); 993 #else 994 gcc_unreachable (); 995 #endif 996 } 997 998 /* The default hook for TARGET_FUNCTION_VALUE_REGNO_P. */ 999 1000 bool 1001 default_function_value_regno_p (const unsigned int regno ATTRIBUTE_UNUSED) 1002 { 1003 #ifdef FUNCTION_VALUE_REGNO_P 1004 return FUNCTION_VALUE_REGNO_P (regno); 1005 #else 1006 gcc_unreachable (); 1007 #endif 1008 } 1009 1010 rtx 1011 default_internal_arg_pointer (void) 1012 { 1013 /* If the reg that the virtual arg pointer will be translated into is 1014 not a fixed reg or is the stack pointer, make a copy of the virtual 1015 arg pointer, and address parms via the copy. The frame pointer is 1016 considered fixed even though it is not marked as such. */ 1017 if ((ARG_POINTER_REGNUM == STACK_POINTER_REGNUM 1018 || ! (fixed_regs[ARG_POINTER_REGNUM] 1019 || ARG_POINTER_REGNUM == FRAME_POINTER_REGNUM))) 1020 return copy_to_reg (virtual_incoming_args_rtx); 1021 else 1022 return virtual_incoming_args_rtx; 1023 } 1024 1025 rtx 1026 default_static_chain (const_tree ARG_UNUSED (fndecl_or_type), bool incoming_p) 1027 { 1028 if (incoming_p) 1029 { 1030 #ifdef STATIC_CHAIN_INCOMING_REGNUM 1031 return gen_rtx_REG (Pmode, STATIC_CHAIN_INCOMING_REGNUM); 1032 #endif 1033 } 1034 1035 #ifdef STATIC_CHAIN_REGNUM 1036 return gen_rtx_REG (Pmode, STATIC_CHAIN_REGNUM); 1037 #endif 1038 1039 { 1040 static bool issued_error; 1041 if (!issued_error) 1042 { 1043 issued_error = true; 1044 sorry ("nested functions not supported on this target"); 1045 } 1046 1047 /* It really doesn't matter what we return here, so long at it 1048 doesn't cause the rest of the compiler to crash. */ 1049 return gen_rtx_MEM (Pmode, stack_pointer_rtx); 1050 } 1051 } 1052 1053 void 1054 default_trampoline_init (rtx ARG_UNUSED (m_tramp), tree ARG_UNUSED (t_func), 1055 rtx ARG_UNUSED (r_chain)) 1056 { 1057 sorry ("nested function trampolines not supported on this target"); 1058 } 1059 1060 poly_int64 1061 default_return_pops_args (tree, tree, poly_int64) 1062 { 1063 return 0; 1064 } 1065 1066 reg_class_t 1067 default_branch_target_register_class (void) 1068 { 1069 return NO_REGS; 1070 } 1071 1072 reg_class_t 1073 default_ira_change_pseudo_allocno_class (int regno ATTRIBUTE_UNUSED, 1074 reg_class_t cl, 1075 reg_class_t best_cl ATTRIBUTE_UNUSED) 1076 { 1077 return cl; 1078 } 1079 1080 extern bool 1081 default_lra_p (void) 1082 { 1083 return true; 1084 } 1085 1086 int 1087 default_register_priority (int hard_regno ATTRIBUTE_UNUSED) 1088 { 1089 return 0; 1090 } 1091 1092 extern bool 1093 default_register_usage_leveling_p (void) 1094 { 1095 return false; 1096 } 1097 1098 extern bool 1099 default_different_addr_displacement_p (void) 1100 { 1101 return false; 1102 } 1103 1104 reg_class_t 1105 default_secondary_reload (bool in_p ATTRIBUTE_UNUSED, rtx x ATTRIBUTE_UNUSED, 1106 reg_class_t reload_class_i ATTRIBUTE_UNUSED, 1107 machine_mode reload_mode ATTRIBUTE_UNUSED, 1108 secondary_reload_info *sri) 1109 { 1110 enum reg_class rclass = NO_REGS; 1111 enum reg_class reload_class = (enum reg_class) reload_class_i; 1112 1113 if (sri->prev_sri && sri->prev_sri->t_icode != CODE_FOR_nothing) 1114 { 1115 sri->icode = sri->prev_sri->t_icode; 1116 return NO_REGS; 1117 } 1118 #ifdef SECONDARY_INPUT_RELOAD_CLASS 1119 if (in_p) 1120 rclass = SECONDARY_INPUT_RELOAD_CLASS (reload_class, 1121 MACRO_MODE (reload_mode), x); 1122 #endif 1123 #ifdef SECONDARY_OUTPUT_RELOAD_CLASS 1124 if (! in_p) 1125 rclass = SECONDARY_OUTPUT_RELOAD_CLASS (reload_class, 1126 MACRO_MODE (reload_mode), x); 1127 #endif 1128 if (rclass != NO_REGS) 1129 { 1130 enum insn_code icode 1131 = direct_optab_handler (in_p ? reload_in_optab : reload_out_optab, 1132 reload_mode); 1133 1134 if (icode != CODE_FOR_nothing 1135 && !insn_operand_matches (icode, in_p, x)) 1136 icode = CODE_FOR_nothing; 1137 else if (icode != CODE_FOR_nothing) 1138 { 1139 const char *insn_constraint, *scratch_constraint; 1140 enum reg_class insn_class, scratch_class; 1141 1142 gcc_assert (insn_data[(int) icode].n_operands == 3); 1143 insn_constraint = insn_data[(int) icode].operand[!in_p].constraint; 1144 if (!*insn_constraint) 1145 insn_class = ALL_REGS; 1146 else 1147 { 1148 if (in_p) 1149 { 1150 gcc_assert (*insn_constraint == '='); 1151 insn_constraint++; 1152 } 1153 insn_class = (reg_class_for_constraint 1154 (lookup_constraint (insn_constraint))); 1155 gcc_assert (insn_class != NO_REGS); 1156 } 1157 1158 scratch_constraint = insn_data[(int) icode].operand[2].constraint; 1159 /* The scratch register's constraint must start with "=&", 1160 except for an input reload, where only "=" is necessary, 1161 and where it might be beneficial to re-use registers from 1162 the input. */ 1163 gcc_assert (scratch_constraint[0] == '=' 1164 && (in_p || scratch_constraint[1] == '&')); 1165 scratch_constraint++; 1166 if (*scratch_constraint == '&') 1167 scratch_constraint++; 1168 scratch_class = (reg_class_for_constraint 1169 (lookup_constraint (scratch_constraint))); 1170 1171 if (reg_class_subset_p (reload_class, insn_class)) 1172 { 1173 gcc_assert (scratch_class == rclass); 1174 rclass = NO_REGS; 1175 } 1176 else 1177 rclass = insn_class; 1178 1179 } 1180 if (rclass == NO_REGS) 1181 sri->icode = icode; 1182 else 1183 sri->t_icode = icode; 1184 } 1185 return rclass; 1186 } 1187 1188 /* The default implementation of TARGET_SECONDARY_MEMORY_NEEDED_MODE. */ 1189 1190 machine_mode 1191 default_secondary_memory_needed_mode (machine_mode mode) 1192 { 1193 if (!targetm.lra_p () 1194 && known_lt (GET_MODE_BITSIZE (mode), BITS_PER_WORD) 1195 && INTEGRAL_MODE_P (mode)) 1196 return mode_for_size (BITS_PER_WORD, GET_MODE_CLASS (mode), 0).require (); 1197 return mode; 1198 } 1199 1200 /* By default, if flag_pic is true, then neither local nor global relocs 1201 should be placed in readonly memory. */ 1202 1203 int 1204 default_reloc_rw_mask (void) 1205 { 1206 return flag_pic ? 3 : 0; 1207 } 1208 1209 /* By default, do no modification. */ 1210 tree default_mangle_decl_assembler_name (tree decl ATTRIBUTE_UNUSED, 1211 tree id) 1212 { 1213 return id; 1214 } 1215 1216 /* The default implementation of TARGET_STATIC_RTX_ALIGNMENT. */ 1217 1218 HOST_WIDE_INT 1219 default_static_rtx_alignment (machine_mode mode) 1220 { 1221 return GET_MODE_ALIGNMENT (mode); 1222 } 1223 1224 /* The default implementation of TARGET_CONSTANT_ALIGNMENT. */ 1225 1226 HOST_WIDE_INT 1227 default_constant_alignment (const_tree, HOST_WIDE_INT align) 1228 { 1229 return align; 1230 } 1231 1232 /* An implementation of TARGET_CONSTANT_ALIGNMENT that aligns strings 1233 to at least BITS_PER_WORD but otherwise makes no changes. */ 1234 1235 HOST_WIDE_INT 1236 constant_alignment_word_strings (const_tree exp, HOST_WIDE_INT align) 1237 { 1238 if (TREE_CODE (exp) == STRING_CST) 1239 return MAX (align, BITS_PER_WORD); 1240 return align; 1241 } 1242 1243 /* Default to natural alignment for vector types. */ 1244 HOST_WIDE_INT 1245 default_vector_alignment (const_tree type) 1246 { 1247 HOST_WIDE_INT align = tree_to_shwi (TYPE_SIZE (type)); 1248 if (align > MAX_OFILE_ALIGNMENT) 1249 align = MAX_OFILE_ALIGNMENT; 1250 return align; 1251 } 1252 1253 /* The default implementation of 1254 TARGET_VECTORIZE_PREFERRED_VECTOR_ALIGNMENT. */ 1255 1256 HOST_WIDE_INT 1257 default_preferred_vector_alignment (const_tree type) 1258 { 1259 return TYPE_ALIGN (type); 1260 } 1261 1262 /* By default assume vectors of element TYPE require a multiple of the natural 1263 alignment of TYPE. TYPE is naturally aligned if IS_PACKED is false. */ 1264 bool 1265 default_builtin_vector_alignment_reachable (const_tree /*type*/, bool is_packed) 1266 { 1267 return ! is_packed; 1268 } 1269 1270 /* By default, assume that a target supports any factor of misalignment 1271 memory access if it supports movmisalign patten. 1272 is_packed is true if the memory access is defined in a packed struct. */ 1273 bool 1274 default_builtin_support_vector_misalignment (machine_mode mode, 1275 const_tree type 1276 ATTRIBUTE_UNUSED, 1277 int misalignment 1278 ATTRIBUTE_UNUSED, 1279 bool is_packed 1280 ATTRIBUTE_UNUSED) 1281 { 1282 if (optab_handler (movmisalign_optab, mode) != CODE_FOR_nothing) 1283 return true; 1284 return false; 1285 } 1286 1287 /* By default, only attempt to parallelize bitwise operations, and 1288 possibly adds/subtracts using bit-twiddling. */ 1289 1290 machine_mode 1291 default_preferred_simd_mode (scalar_mode) 1292 { 1293 return word_mode; 1294 } 1295 1296 /* By default do not split reductions further. */ 1297 1298 machine_mode 1299 default_split_reduction (machine_mode mode) 1300 { 1301 return mode; 1302 } 1303 1304 /* By default only the size derived from the preferred vector mode 1305 is tried. */ 1306 1307 void 1308 default_autovectorize_vector_sizes (vector_sizes *) 1309 { 1310 } 1311 1312 /* By default a vector of integers is used as a mask. */ 1313 1314 opt_machine_mode 1315 default_get_mask_mode (poly_uint64 nunits, poly_uint64 vector_size) 1316 { 1317 unsigned int elem_size = vector_element_size (vector_size, nunits); 1318 scalar_int_mode elem_mode 1319 = smallest_int_mode_for_size (elem_size * BITS_PER_UNIT); 1320 machine_mode vector_mode; 1321 1322 gcc_assert (known_eq (elem_size * nunits, vector_size)); 1323 1324 if (mode_for_vector (elem_mode, nunits).exists (&vector_mode) 1325 && VECTOR_MODE_P (vector_mode) 1326 && targetm.vector_mode_supported_p (vector_mode)) 1327 return vector_mode; 1328 1329 return opt_machine_mode (); 1330 } 1331 1332 /* By default consider masked stores to be expensive. */ 1333 1334 bool 1335 default_empty_mask_is_expensive (unsigned ifn) 1336 { 1337 return ifn == IFN_MASK_STORE; 1338 } 1339 1340 /* By default, the cost model accumulates three separate costs (prologue, 1341 loop body, and epilogue) for a vectorized loop or block. So allocate an 1342 array of three unsigned ints, set it to zero, and return its address. */ 1343 1344 void * 1345 default_init_cost (struct loop *loop_info ATTRIBUTE_UNUSED) 1346 { 1347 unsigned *cost = XNEWVEC (unsigned, 3); 1348 cost[vect_prologue] = cost[vect_body] = cost[vect_epilogue] = 0; 1349 return cost; 1350 } 1351 1352 /* By default, the cost model looks up the cost of the given statement 1353 kind and mode, multiplies it by the occurrence count, accumulates 1354 it into the cost specified by WHERE, and returns the cost added. */ 1355 1356 unsigned 1357 default_add_stmt_cost (void *data, int count, enum vect_cost_for_stmt kind, 1358 struct _stmt_vec_info *stmt_info, int misalign, 1359 enum vect_cost_model_location where) 1360 { 1361 unsigned *cost = (unsigned *) data; 1362 unsigned retval = 0; 1363 1364 tree vectype = stmt_info ? stmt_vectype (stmt_info) : NULL_TREE; 1365 int stmt_cost = targetm.vectorize.builtin_vectorization_cost (kind, vectype, 1366 misalign); 1367 /* Statements in an inner loop relative to the loop being 1368 vectorized are weighted more heavily. The value here is 1369 arbitrary and could potentially be improved with analysis. */ 1370 if (where == vect_body && stmt_info && stmt_in_inner_loop_p (stmt_info)) 1371 count *= 50; /* FIXME. */ 1372 1373 retval = (unsigned) (count * stmt_cost); 1374 cost[where] += retval; 1375 1376 return retval; 1377 } 1378 1379 /* By default, the cost model just returns the accumulated costs. */ 1380 1381 void 1382 default_finish_cost (void *data, unsigned *prologue_cost, 1383 unsigned *body_cost, unsigned *epilogue_cost) 1384 { 1385 unsigned *cost = (unsigned *) data; 1386 *prologue_cost = cost[vect_prologue]; 1387 *body_cost = cost[vect_body]; 1388 *epilogue_cost = cost[vect_epilogue]; 1389 } 1390 1391 /* Free the cost data. */ 1392 1393 void 1394 default_destroy_cost_data (void *data) 1395 { 1396 free (data); 1397 } 1398 1399 /* Determine whether or not a pointer mode is valid. Assume defaults 1400 of ptr_mode or Pmode - can be overridden. */ 1401 bool 1402 default_valid_pointer_mode (scalar_int_mode mode) 1403 { 1404 return (mode == ptr_mode || mode == Pmode); 1405 } 1406 1407 /* Determine whether the memory reference specified by REF may alias 1408 the C libraries errno location. */ 1409 bool 1410 default_ref_may_alias_errno (ao_ref *ref) 1411 { 1412 tree base = ao_ref_base (ref); 1413 /* The default implementation assumes the errno location is 1414 a declaration of type int or is always accessed via a 1415 pointer to int. We assume that accesses to errno are 1416 not deliberately obfuscated (even in conforming ways). */ 1417 if (TYPE_UNSIGNED (TREE_TYPE (base)) 1418 || TYPE_MODE (TREE_TYPE (base)) != TYPE_MODE (integer_type_node)) 1419 return false; 1420 /* The default implementation assumes an errno location 1421 declaration is never defined in the current compilation unit. */ 1422 if (DECL_P (base) 1423 && !TREE_STATIC (base)) 1424 return true; 1425 else if (TREE_CODE (base) == MEM_REF 1426 && TREE_CODE (TREE_OPERAND (base, 0)) == SSA_NAME) 1427 { 1428 struct ptr_info_def *pi = SSA_NAME_PTR_INFO (TREE_OPERAND (base, 0)); 1429 return !pi || pi->pt.anything || pi->pt.nonlocal; 1430 } 1431 return false; 1432 } 1433 1434 /* Return the mode for a pointer to a given ADDRSPACE, 1435 defaulting to ptr_mode for all address spaces. */ 1436 1437 scalar_int_mode 1438 default_addr_space_pointer_mode (addr_space_t addrspace ATTRIBUTE_UNUSED) 1439 { 1440 return ptr_mode; 1441 } 1442 1443 /* Return the mode for an address in a given ADDRSPACE, 1444 defaulting to Pmode for all address spaces. */ 1445 1446 scalar_int_mode 1447 default_addr_space_address_mode (addr_space_t addrspace ATTRIBUTE_UNUSED) 1448 { 1449 return Pmode; 1450 } 1451 1452 /* Named address space version of valid_pointer_mode. 1453 To match the above, the same modes apply to all address spaces. */ 1454 1455 bool 1456 default_addr_space_valid_pointer_mode (scalar_int_mode mode, 1457 addr_space_t as ATTRIBUTE_UNUSED) 1458 { 1459 return targetm.valid_pointer_mode (mode); 1460 } 1461 1462 /* Some places still assume that all pointer or address modes are the 1463 standard Pmode and ptr_mode. These optimizations become invalid if 1464 the target actually supports multiple different modes. For now, 1465 we disable such optimizations on such targets, using this function. */ 1466 1467 bool 1468 target_default_pointer_address_modes_p (void) 1469 { 1470 if (targetm.addr_space.address_mode != default_addr_space_address_mode) 1471 return false; 1472 if (targetm.addr_space.pointer_mode != default_addr_space_pointer_mode) 1473 return false; 1474 1475 return true; 1476 } 1477 1478 /* Named address space version of legitimate_address_p. 1479 By default, all address spaces have the same form. */ 1480 1481 bool 1482 default_addr_space_legitimate_address_p (machine_mode mode, rtx mem, 1483 bool strict, 1484 addr_space_t as ATTRIBUTE_UNUSED) 1485 { 1486 return targetm.legitimate_address_p (mode, mem, strict); 1487 } 1488 1489 /* Named address space version of LEGITIMIZE_ADDRESS. 1490 By default, all address spaces have the same form. */ 1491 1492 rtx 1493 default_addr_space_legitimize_address (rtx x, rtx oldx, machine_mode mode, 1494 addr_space_t as ATTRIBUTE_UNUSED) 1495 { 1496 return targetm.legitimize_address (x, oldx, mode); 1497 } 1498 1499 /* The default hook for determining if one named address space is a subset of 1500 another and to return which address space to use as the common address 1501 space. */ 1502 1503 bool 1504 default_addr_space_subset_p (addr_space_t subset, addr_space_t superset) 1505 { 1506 return (subset == superset); 1507 } 1508 1509 /* The default hook for determining if 0 within a named address 1510 space is a valid address. */ 1511 1512 bool 1513 default_addr_space_zero_address_valid (addr_space_t as ATTRIBUTE_UNUSED) 1514 { 1515 return false; 1516 } 1517 1518 /* The default hook for debugging the address space is to return the 1519 address space number to indicate DW_AT_address_class. */ 1520 int 1521 default_addr_space_debug (addr_space_t as) 1522 { 1523 return as; 1524 } 1525 1526 /* The default hook implementation for TARGET_ADDR_SPACE_DIAGNOSE_USAGE. 1527 Don't complain about any address space. */ 1528 1529 void 1530 default_addr_space_diagnose_usage (addr_space_t, location_t) 1531 { 1532 } 1533 1534 1535 /* The default hook for TARGET_ADDR_SPACE_CONVERT. This hook should never be 1536 called for targets with only a generic address space. */ 1537 1538 rtx 1539 default_addr_space_convert (rtx op ATTRIBUTE_UNUSED, 1540 tree from_type ATTRIBUTE_UNUSED, 1541 tree to_type ATTRIBUTE_UNUSED) 1542 { 1543 gcc_unreachable (); 1544 } 1545 1546 /* The defualt implementation of TARGET_HARD_REGNO_NREGS. */ 1547 1548 unsigned int 1549 default_hard_regno_nregs (unsigned int, machine_mode mode) 1550 { 1551 /* Targets with variable-sized modes must provide their own definition 1552 of this hook. */ 1553 return CEIL (GET_MODE_SIZE (mode).to_constant (), UNITS_PER_WORD); 1554 } 1555 1556 bool 1557 default_hard_regno_scratch_ok (unsigned int regno ATTRIBUTE_UNUSED) 1558 { 1559 return true; 1560 } 1561 1562 /* The default implementation of TARGET_MODE_DEPENDENT_ADDRESS_P. */ 1563 1564 bool 1565 default_mode_dependent_address_p (const_rtx addr ATTRIBUTE_UNUSED, 1566 addr_space_t addrspace ATTRIBUTE_UNUSED) 1567 { 1568 return false; 1569 } 1570 1571 bool 1572 default_target_option_valid_attribute_p (tree ARG_UNUSED (fndecl), 1573 tree ARG_UNUSED (name), 1574 tree ARG_UNUSED (args), 1575 int ARG_UNUSED (flags)) 1576 { 1577 warning (OPT_Wattributes, 1578 "target attribute is not supported on this machine"); 1579 1580 return false; 1581 } 1582 1583 bool 1584 default_target_option_pragma_parse (tree ARG_UNUSED (args), 1585 tree ARG_UNUSED (pop_target)) 1586 { 1587 /* If args is NULL the caller is handle_pragma_pop_options (). In that case, 1588 emit no warning because "#pragma GCC pop_target" is valid on targets that 1589 do not have the "target" pragma. */ 1590 if (args) 1591 warning (OPT_Wpragmas, 1592 "#pragma GCC target is not supported for this machine"); 1593 1594 return false; 1595 } 1596 1597 bool 1598 default_target_can_inline_p (tree caller, tree callee) 1599 { 1600 tree callee_opts = DECL_FUNCTION_SPECIFIC_TARGET (callee); 1601 tree caller_opts = DECL_FUNCTION_SPECIFIC_TARGET (caller); 1602 if (! callee_opts) 1603 callee_opts = target_option_default_node; 1604 if (! caller_opts) 1605 caller_opts = target_option_default_node; 1606 1607 /* If both caller and callee have attributes, assume that if the 1608 pointer is different, the two functions have different target 1609 options since build_target_option_node uses a hash table for the 1610 options. */ 1611 return callee_opts == caller_opts; 1612 } 1613 1614 /* If the machine does not have a case insn that compares the bounds, 1615 this means extra overhead for dispatch tables, which raises the 1616 threshold for using them. */ 1617 1618 unsigned int 1619 default_case_values_threshold (void) 1620 { 1621 return (targetm.have_casesi () ? 4 : 5); 1622 } 1623 1624 bool 1625 default_have_conditional_execution (void) 1626 { 1627 return HAVE_conditional_execution; 1628 } 1629 1630 /* By default we assume that c99 functions are present at the runtime, 1631 but sincos is not. */ 1632 bool 1633 default_libc_has_function (enum function_class fn_class) 1634 { 1635 if (fn_class == function_c94 1636 || fn_class == function_c99_misc 1637 || fn_class == function_c99_math_complex) 1638 return true; 1639 1640 return false; 1641 } 1642 1643 bool 1644 gnu_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED) 1645 { 1646 return true; 1647 } 1648 1649 bool 1650 no_c99_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED) 1651 { 1652 return false; 1653 } 1654 1655 tree 1656 default_builtin_tm_load_store (tree ARG_UNUSED (type)) 1657 { 1658 return NULL_TREE; 1659 } 1660 1661 /* Compute cost of moving registers to/from memory. */ 1662 1663 int 1664 default_memory_move_cost (machine_mode mode ATTRIBUTE_UNUSED, 1665 reg_class_t rclass ATTRIBUTE_UNUSED, 1666 bool in ATTRIBUTE_UNUSED) 1667 { 1668 #ifndef MEMORY_MOVE_COST 1669 return (4 + memory_move_secondary_cost (mode, (enum reg_class) rclass, in)); 1670 #else 1671 return MEMORY_MOVE_COST (MACRO_MODE (mode), (enum reg_class) rclass, in); 1672 #endif 1673 } 1674 1675 /* Compute cost of moving data from a register of class FROM to one of 1676 TO, using MODE. */ 1677 1678 int 1679 default_register_move_cost (machine_mode mode ATTRIBUTE_UNUSED, 1680 reg_class_t from ATTRIBUTE_UNUSED, 1681 reg_class_t to ATTRIBUTE_UNUSED) 1682 { 1683 #ifndef REGISTER_MOVE_COST 1684 return 2; 1685 #else 1686 return REGISTER_MOVE_COST (MACRO_MODE (mode), 1687 (enum reg_class) from, (enum reg_class) to); 1688 #endif 1689 } 1690 1691 /* The default implementation of TARGET_SLOW_UNALIGNED_ACCESS. */ 1692 1693 bool 1694 default_slow_unaligned_access (machine_mode, unsigned int) 1695 { 1696 return STRICT_ALIGNMENT; 1697 } 1698 1699 /* The default implementation of TARGET_ESTIMATED_POLY_VALUE. */ 1700 1701 HOST_WIDE_INT 1702 default_estimated_poly_value (poly_int64 x) 1703 { 1704 return x.coeffs[0]; 1705 } 1706 1707 /* For hooks which use the MOVE_RATIO macro, this gives the legacy default 1708 behavior. SPEED_P is true if we are compiling for speed. */ 1709 1710 unsigned int 1711 get_move_ratio (bool speed_p ATTRIBUTE_UNUSED) 1712 { 1713 unsigned int move_ratio; 1714 #ifdef MOVE_RATIO 1715 move_ratio = (unsigned int) MOVE_RATIO (speed_p); 1716 #else 1717 #if defined (HAVE_movmemqi) || defined (HAVE_movmemhi) || defined (HAVE_movmemsi) || defined (HAVE_movmemdi) || defined (HAVE_movmemti) 1718 move_ratio = 2; 1719 #else /* No movmem patterns, pick a default. */ 1720 move_ratio = ((speed_p) ? 15 : 3); 1721 #endif 1722 #endif 1723 return move_ratio; 1724 } 1725 1726 /* Return TRUE if the move_by_pieces/set_by_pieces infrastructure should be 1727 used; return FALSE if the movmem/setmem optab should be expanded, or 1728 a call to memcpy emitted. */ 1729 1730 bool 1731 default_use_by_pieces_infrastructure_p (unsigned HOST_WIDE_INT size, 1732 unsigned int alignment, 1733 enum by_pieces_operation op, 1734 bool speed_p) 1735 { 1736 unsigned int max_size = 0; 1737 unsigned int ratio = 0; 1738 1739 switch (op) 1740 { 1741 case CLEAR_BY_PIECES: 1742 max_size = STORE_MAX_PIECES; 1743 ratio = CLEAR_RATIO (speed_p); 1744 break; 1745 case MOVE_BY_PIECES: 1746 max_size = MOVE_MAX_PIECES; 1747 ratio = get_move_ratio (speed_p); 1748 break; 1749 case SET_BY_PIECES: 1750 max_size = STORE_MAX_PIECES; 1751 ratio = SET_RATIO (speed_p); 1752 break; 1753 case STORE_BY_PIECES: 1754 max_size = STORE_MAX_PIECES; 1755 ratio = get_move_ratio (speed_p); 1756 break; 1757 case COMPARE_BY_PIECES: 1758 max_size = COMPARE_MAX_PIECES; 1759 /* Pick a likely default, just as in get_move_ratio. */ 1760 ratio = speed_p ? 15 : 3; 1761 break; 1762 } 1763 1764 return by_pieces_ninsns (size, alignment, max_size + 1, op) < ratio; 1765 } 1766 1767 /* This hook controls code generation for expanding a memcmp operation by 1768 pieces. Return 1 for the normal pattern of compare/jump after each pair 1769 of loads, or a higher number to reduce the number of branches. */ 1770 1771 int 1772 default_compare_by_pieces_branch_ratio (machine_mode) 1773 { 1774 return 1; 1775 } 1776 1777 /* Write PATCH_AREA_SIZE NOPs into the asm outfile FILE around a function 1778 entry. If RECORD_P is true and the target supports named sections, 1779 the location of the NOPs will be recorded in a special object section 1780 called "__patchable_function_entries". This routine may be called 1781 twice per function to put NOPs before and after the function 1782 entry. */ 1783 1784 void 1785 default_print_patchable_function_entry (FILE *file, 1786 unsigned HOST_WIDE_INT patch_area_size, 1787 bool record_p) 1788 { 1789 const char *nop_templ = 0; 1790 int code_num; 1791 rtx_insn *my_nop = make_insn_raw (gen_nop ()); 1792 1793 /* We use the template alone, relying on the (currently sane) assumption 1794 that the NOP template does not have variable operands. */ 1795 code_num = recog_memoized (my_nop); 1796 nop_templ = get_insn_template (code_num, my_nop); 1797 1798 if (record_p && targetm_common.have_named_sections) 1799 { 1800 char buf[256]; 1801 static int patch_area_number; 1802 section *previous_section = in_section; 1803 1804 patch_area_number++; 1805 ASM_GENERATE_INTERNAL_LABEL (buf, "LPFE", patch_area_number); 1806 1807 switch_to_section (get_section ("__patchable_function_entries", 1808 0, NULL)); 1809 fputs (integer_asm_op (POINTER_SIZE_UNITS, false), file); 1810 assemble_name_raw (file, buf); 1811 fputc ('\n', file); 1812 1813 switch_to_section (previous_section); 1814 ASM_OUTPUT_LABEL (file, buf); 1815 } 1816 1817 unsigned i; 1818 for (i = 0; i < patch_area_size; ++i) 1819 fprintf (file, "\t%s\n", nop_templ); 1820 } 1821 1822 bool 1823 default_profile_before_prologue (void) 1824 { 1825 #ifdef PROFILE_BEFORE_PROLOGUE 1826 return true; 1827 #else 1828 return false; 1829 #endif 1830 } 1831 1832 /* The default implementation of TARGET_PREFERRED_RELOAD_CLASS. */ 1833 1834 reg_class_t 1835 default_preferred_reload_class (rtx x ATTRIBUTE_UNUSED, 1836 reg_class_t rclass) 1837 { 1838 #ifdef PREFERRED_RELOAD_CLASS 1839 return (reg_class_t) PREFERRED_RELOAD_CLASS (x, (enum reg_class) rclass); 1840 #else 1841 return rclass; 1842 #endif 1843 } 1844 1845 /* The default implementation of TARGET_OUTPUT_PREFERRED_RELOAD_CLASS. */ 1846 1847 reg_class_t 1848 default_preferred_output_reload_class (rtx x ATTRIBUTE_UNUSED, 1849 reg_class_t rclass) 1850 { 1851 return rclass; 1852 } 1853 1854 /* The default implementation of TARGET_PREFERRED_RENAME_CLASS. */ 1855 reg_class_t 1856 default_preferred_rename_class (reg_class_t rclass ATTRIBUTE_UNUSED) 1857 { 1858 return NO_REGS; 1859 } 1860 1861 /* The default implementation of TARGET_CLASS_LIKELY_SPILLED_P. */ 1862 1863 bool 1864 default_class_likely_spilled_p (reg_class_t rclass) 1865 { 1866 return (reg_class_size[(int) rclass] == 1); 1867 } 1868 1869 /* The default implementation of TARGET_CLASS_MAX_NREGS. */ 1870 1871 unsigned char 1872 default_class_max_nregs (reg_class_t rclass ATTRIBUTE_UNUSED, 1873 machine_mode mode ATTRIBUTE_UNUSED) 1874 { 1875 #ifdef CLASS_MAX_NREGS 1876 return (unsigned char) CLASS_MAX_NREGS ((enum reg_class) rclass, 1877 MACRO_MODE (mode)); 1878 #else 1879 /* Targets with variable-sized modes must provide their own definition 1880 of this hook. */ 1881 unsigned int size = GET_MODE_SIZE (mode).to_constant (); 1882 return (size + UNITS_PER_WORD - 1) / UNITS_PER_WORD; 1883 #endif 1884 } 1885 1886 /* Determine the debugging unwind mechanism for the target. */ 1887 1888 enum unwind_info_type 1889 default_debug_unwind_info (void) 1890 { 1891 /* If the target wants to force the use of dwarf2 unwind info, let it. */ 1892 /* ??? Change all users to the hook, then poison this. */ 1893 #ifdef DWARF2_FRAME_INFO 1894 if (DWARF2_FRAME_INFO) 1895 return UI_DWARF2; 1896 #endif 1897 1898 /* Otherwise, only turn it on if dwarf2 debugging is enabled. */ 1899 #ifdef DWARF2_DEBUGGING_INFO 1900 if (write_symbols == DWARF2_DEBUG || write_symbols == VMS_AND_DWARF2_DEBUG) 1901 return UI_DWARF2; 1902 #endif 1903 1904 return UI_NONE; 1905 } 1906 1907 /* Targets that set NUM_POLY_INT_COEFFS to something greater than 1 1908 must define this hook. */ 1909 1910 unsigned int 1911 default_dwarf_poly_indeterminate_value (unsigned int, unsigned int *, int *) 1912 { 1913 gcc_unreachable (); 1914 } 1915 1916 /* Determine the correct mode for a Dwarf frame register that represents 1917 register REGNO. */ 1918 1919 machine_mode 1920 default_dwarf_frame_reg_mode (int regno) 1921 { 1922 machine_mode save_mode = reg_raw_mode[regno]; 1923 1924 if (targetm.hard_regno_call_part_clobbered (regno, save_mode)) 1925 save_mode = choose_hard_reg_mode (regno, 1, true); 1926 return save_mode; 1927 } 1928 1929 /* To be used by targets where reg_raw_mode doesn't return the right 1930 mode for registers used in apply_builtin_return and apply_builtin_arg. */ 1931 1932 fixed_size_mode 1933 default_get_reg_raw_mode (int regno) 1934 { 1935 /* Targets must override this hook if the underlying register is 1936 variable-sized. */ 1937 return as_a <fixed_size_mode> (reg_raw_mode[regno]); 1938 } 1939 1940 /* Return true if a leaf function should stay leaf even with profiling 1941 enabled. */ 1942 1943 bool 1944 default_keep_leaf_when_profiled () 1945 { 1946 return false; 1947 } 1948 1949 /* Return true if the state of option OPTION should be stored in PCH files 1950 and checked by default_pch_valid_p. Store the option's current state 1951 in STATE if so. */ 1952 1953 static inline bool 1954 option_affects_pch_p (int option, struct cl_option_state *state) 1955 { 1956 if ((cl_options[option].flags & CL_TARGET) == 0) 1957 return false; 1958 if ((cl_options[option].flags & CL_PCH_IGNORE) != 0) 1959 return false; 1960 if (option_flag_var (option, &global_options) == &target_flags) 1961 if (targetm.check_pch_target_flags) 1962 return false; 1963 return get_option_state (&global_options, option, state); 1964 } 1965 1966 /* Default version of get_pch_validity. 1967 By default, every flag difference is fatal; that will be mostly right for 1968 most targets, but completely right for very few. */ 1969 1970 void * 1971 default_get_pch_validity (size_t *sz) 1972 { 1973 struct cl_option_state state; 1974 size_t i; 1975 char *result, *r; 1976 1977 *sz = 2; 1978 if (targetm.check_pch_target_flags) 1979 *sz += sizeof (target_flags); 1980 for (i = 0; i < cl_options_count; i++) 1981 if (option_affects_pch_p (i, &state)) 1982 *sz += state.size; 1983 1984 result = r = XNEWVEC (char, *sz); 1985 r[0] = flag_pic; 1986 r[1] = flag_pie; 1987 r += 2; 1988 if (targetm.check_pch_target_flags) 1989 { 1990 memcpy (r, &target_flags, sizeof (target_flags)); 1991 r += sizeof (target_flags); 1992 } 1993 1994 for (i = 0; i < cl_options_count; i++) 1995 if (option_affects_pch_p (i, &state)) 1996 { 1997 memcpy (r, state.data, state.size); 1998 r += state.size; 1999 } 2000 2001 return result; 2002 } 2003 2004 /* Return a message which says that a PCH file was created with a different 2005 setting of OPTION. */ 2006 2007 static const char * 2008 pch_option_mismatch (const char *option) 2009 { 2010 return xasprintf (_("created and used with differing settings of '%s'"), 2011 option); 2012 } 2013 2014 /* Default version of pch_valid_p. */ 2015 2016 const char * 2017 default_pch_valid_p (const void *data_p, size_t len) 2018 { 2019 struct cl_option_state state; 2020 const char *data = (const char *)data_p; 2021 size_t i; 2022 2023 /* -fpic and -fpie also usually make a PCH invalid. */ 2024 if (data[0] != flag_pic) 2025 return _("created and used with different settings of -fpic"); 2026 if (data[1] != flag_pie) 2027 return _("created and used with different settings of -fpie"); 2028 data += 2; 2029 2030 /* Check target_flags. */ 2031 if (targetm.check_pch_target_flags) 2032 { 2033 int tf; 2034 const char *r; 2035 2036 memcpy (&tf, data, sizeof (target_flags)); 2037 data += sizeof (target_flags); 2038 len -= sizeof (target_flags); 2039 r = targetm.check_pch_target_flags (tf); 2040 if (r != NULL) 2041 return r; 2042 } 2043 2044 for (i = 0; i < cl_options_count; i++) 2045 if (option_affects_pch_p (i, &state)) 2046 { 2047 if (memcmp (data, state.data, state.size) != 0) 2048 return pch_option_mismatch (cl_options[i].opt_text); 2049 data += state.size; 2050 len -= state.size; 2051 } 2052 2053 return NULL; 2054 } 2055 2056 /* Default version of cstore_mode. */ 2057 2058 scalar_int_mode 2059 default_cstore_mode (enum insn_code icode) 2060 { 2061 return as_a <scalar_int_mode> (insn_data[(int) icode].operand[0].mode); 2062 } 2063 2064 /* Default version of member_type_forces_blk. */ 2065 2066 bool 2067 default_member_type_forces_blk (const_tree, machine_mode) 2068 { 2069 return false; 2070 } 2071 2072 rtx 2073 default_load_bounds_for_arg (rtx addr ATTRIBUTE_UNUSED, 2074 rtx ptr ATTRIBUTE_UNUSED, 2075 rtx bnd ATTRIBUTE_UNUSED) 2076 { 2077 gcc_unreachable (); 2078 } 2079 2080 void 2081 default_store_bounds_for_arg (rtx val ATTRIBUTE_UNUSED, 2082 rtx addr ATTRIBUTE_UNUSED, 2083 rtx bounds ATTRIBUTE_UNUSED, 2084 rtx to ATTRIBUTE_UNUSED) 2085 { 2086 gcc_unreachable (); 2087 } 2088 2089 rtx 2090 default_load_returned_bounds (rtx slot ATTRIBUTE_UNUSED) 2091 { 2092 gcc_unreachable (); 2093 } 2094 2095 void 2096 default_store_returned_bounds (rtx slot ATTRIBUTE_UNUSED, 2097 rtx bounds ATTRIBUTE_UNUSED) 2098 { 2099 gcc_unreachable (); 2100 } 2101 2102 /* Default version of canonicalize_comparison. */ 2103 2104 void 2105 default_canonicalize_comparison (int *, rtx *, rtx *, bool) 2106 { 2107 } 2108 2109 /* Default implementation of TARGET_ATOMIC_ASSIGN_EXPAND_FENV. */ 2110 2111 void 2112 default_atomic_assign_expand_fenv (tree *, tree *, tree *) 2113 { 2114 } 2115 2116 #ifndef PAD_VARARGS_DOWN 2117 #define PAD_VARARGS_DOWN BYTES_BIG_ENDIAN 2118 #endif 2119 2120 /* Build an indirect-ref expression over the given TREE, which represents a 2121 piece of a va_arg() expansion. */ 2122 tree 2123 build_va_arg_indirect_ref (tree addr) 2124 { 2125 addr = build_simple_mem_ref_loc (EXPR_LOCATION (addr), addr); 2126 return addr; 2127 } 2128 2129 /* The "standard" implementation of va_arg: read the value from the 2130 current (padded) address and increment by the (padded) size. */ 2131 2132 tree 2133 std_gimplify_va_arg_expr (tree valist, tree type, gimple_seq *pre_p, 2134 gimple_seq *post_p) 2135 { 2136 tree addr, t, type_size, rounded_size, valist_tmp; 2137 unsigned HOST_WIDE_INT align, boundary; 2138 bool indirect; 2139 2140 /* All of the alignment and movement below is for args-grow-up machines. 2141 As of 2004, there are only 3 ARGS_GROW_DOWNWARD targets, and they all 2142 implement their own specialized gimplify_va_arg_expr routines. */ 2143 if (ARGS_GROW_DOWNWARD) 2144 gcc_unreachable (); 2145 2146 indirect = pass_by_reference (NULL, TYPE_MODE (type), type, false); 2147 if (indirect) 2148 type = build_pointer_type (type); 2149 2150 align = PARM_BOUNDARY / BITS_PER_UNIT; 2151 boundary = targetm.calls.function_arg_boundary (TYPE_MODE (type), type); 2152 2153 /* When we align parameter on stack for caller, if the parameter 2154 alignment is beyond MAX_SUPPORTED_STACK_ALIGNMENT, it will be 2155 aligned at MAX_SUPPORTED_STACK_ALIGNMENT. We will match callee 2156 here with caller. */ 2157 if (boundary > MAX_SUPPORTED_STACK_ALIGNMENT) 2158 boundary = MAX_SUPPORTED_STACK_ALIGNMENT; 2159 2160 boundary /= BITS_PER_UNIT; 2161 2162 /* Hoist the valist value into a temporary for the moment. */ 2163 valist_tmp = get_initialized_tmp_var (valist, pre_p, NULL); 2164 2165 /* va_list pointer is aligned to PARM_BOUNDARY. If argument actually 2166 requires greater alignment, we must perform dynamic alignment. */ 2167 if (boundary > align 2168 && !TYPE_EMPTY_P (type) 2169 && !integer_zerop (TYPE_SIZE (type))) 2170 { 2171 t = build2 (MODIFY_EXPR, TREE_TYPE (valist), valist_tmp, 2172 fold_build_pointer_plus_hwi (valist_tmp, boundary - 1)); 2173 gimplify_and_add (t, pre_p); 2174 2175 t = build2 (MODIFY_EXPR, TREE_TYPE (valist), valist_tmp, 2176 fold_build2 (BIT_AND_EXPR, TREE_TYPE (valist), 2177 valist_tmp, 2178 build_int_cst (TREE_TYPE (valist), -boundary))); 2179 gimplify_and_add (t, pre_p); 2180 } 2181 else 2182 boundary = align; 2183 2184 /* If the actual alignment is less than the alignment of the type, 2185 adjust the type accordingly so that we don't assume strict alignment 2186 when dereferencing the pointer. */ 2187 boundary *= BITS_PER_UNIT; 2188 if (boundary < TYPE_ALIGN (type)) 2189 { 2190 type = build_variant_type_copy (type); 2191 SET_TYPE_ALIGN (type, boundary); 2192 } 2193 2194 /* Compute the rounded size of the type. */ 2195 type_size = arg_size_in_bytes (type); 2196 rounded_size = round_up (type_size, align); 2197 2198 /* Reduce rounded_size so it's sharable with the postqueue. */ 2199 gimplify_expr (&rounded_size, pre_p, post_p, is_gimple_val, fb_rvalue); 2200 2201 /* Get AP. */ 2202 addr = valist_tmp; 2203 if (PAD_VARARGS_DOWN && !integer_zerop (rounded_size)) 2204 { 2205 /* Small args are padded downward. */ 2206 t = fold_build2_loc (input_location, GT_EXPR, sizetype, 2207 rounded_size, size_int (align)); 2208 t = fold_build3 (COND_EXPR, sizetype, t, size_zero_node, 2209 size_binop (MINUS_EXPR, rounded_size, type_size)); 2210 addr = fold_build_pointer_plus (addr, t); 2211 } 2212 2213 /* Compute new value for AP. */ 2214 t = fold_build_pointer_plus (valist_tmp, rounded_size); 2215 t = build2 (MODIFY_EXPR, TREE_TYPE (valist), valist, t); 2216 gimplify_and_add (t, pre_p); 2217 2218 addr = fold_convert (build_pointer_type (type), addr); 2219 2220 if (indirect) 2221 addr = build_va_arg_indirect_ref (addr); 2222 2223 return build_va_arg_indirect_ref (addr); 2224 } 2225 2226 tree 2227 default_chkp_bound_type (void) 2228 { 2229 tree res = make_node (POINTER_BOUNDS_TYPE); 2230 TYPE_PRECISION (res) = TYPE_PRECISION (size_type_node) * 2; 2231 TYPE_NAME (res) = get_identifier ("__bounds_type"); 2232 SET_TYPE_MODE (res, targetm.chkp_bound_mode ()); 2233 layout_type (res); 2234 return res; 2235 } 2236 2237 machine_mode 2238 default_chkp_bound_mode (void) 2239 { 2240 return VOIDmode; 2241 } 2242 2243 tree 2244 default_builtin_chkp_function (unsigned int fcode ATTRIBUTE_UNUSED) 2245 { 2246 return NULL_TREE; 2247 } 2248 2249 rtx 2250 default_chkp_function_value_bounds (const_tree ret_type ATTRIBUTE_UNUSED, 2251 const_tree fn_decl_or_type ATTRIBUTE_UNUSED, 2252 bool outgoing ATTRIBUTE_UNUSED) 2253 { 2254 gcc_unreachable (); 2255 } 2256 2257 tree 2258 default_chkp_make_bounds_constant (HOST_WIDE_INT lb ATTRIBUTE_UNUSED, 2259 HOST_WIDE_INT ub ATTRIBUTE_UNUSED) 2260 { 2261 return NULL_TREE; 2262 } 2263 2264 int 2265 default_chkp_initialize_bounds (tree var ATTRIBUTE_UNUSED, 2266 tree lb ATTRIBUTE_UNUSED, 2267 tree ub ATTRIBUTE_UNUSED, 2268 tree *stmts ATTRIBUTE_UNUSED) 2269 { 2270 return 0; 2271 } 2272 2273 void 2274 default_setup_incoming_vararg_bounds (cumulative_args_t ca ATTRIBUTE_UNUSED, 2275 machine_mode mode ATTRIBUTE_UNUSED, 2276 tree type ATTRIBUTE_UNUSED, 2277 int *pretend_arg_size ATTRIBUTE_UNUSED, 2278 int second_time ATTRIBUTE_UNUSED) 2279 { 2280 } 2281 2282 /* An implementation of TARGET_CAN_USE_DOLOOP_P for targets that do 2283 not support nested low-overhead loops. */ 2284 2285 bool 2286 can_use_doloop_if_innermost (const widest_int &, const widest_int &, 2287 unsigned int loop_depth, bool) 2288 { 2289 return loop_depth == 1; 2290 } 2291 2292 /* Default implementation of TARGET_OPTAB_SUPPORTED_P. */ 2293 2294 bool 2295 default_optab_supported_p (int, machine_mode, machine_mode, optimization_type) 2296 { 2297 return true; 2298 } 2299 2300 /* Default implementation of TARGET_MAX_NOCE_IFCVT_SEQ_COST. */ 2301 2302 unsigned int 2303 default_max_noce_ifcvt_seq_cost (edge e) 2304 { 2305 bool predictable_p = predictable_edge_p (e); 2306 2307 enum compiler_param param 2308 = (predictable_p 2309 ? PARAM_MAX_RTL_IF_CONVERSION_PREDICTABLE_COST 2310 : PARAM_MAX_RTL_IF_CONVERSION_UNPREDICTABLE_COST); 2311 2312 /* If we have a parameter set, use that, otherwise take a guess using 2313 BRANCH_COST. */ 2314 if (global_options_set.x_param_values[param]) 2315 return PARAM_VALUE (param); 2316 else 2317 return BRANCH_COST (true, predictable_p) * COSTS_N_INSNS (3); 2318 } 2319 2320 /* Default implementation of TARGET_MIN_ARITHMETIC_PRECISION. */ 2321 2322 unsigned int 2323 default_min_arithmetic_precision (void) 2324 { 2325 return WORD_REGISTER_OPERATIONS ? BITS_PER_WORD : BITS_PER_UNIT; 2326 } 2327 2328 /* Default implementation of TARGET_C_EXCESS_PRECISION. */ 2329 2330 enum flt_eval_method 2331 default_excess_precision (enum excess_precision_type ATTRIBUTE_UNUSED) 2332 { 2333 return FLT_EVAL_METHOD_PROMOTE_TO_FLOAT; 2334 } 2335 2336 bool 2337 default_stack_clash_protection_final_dynamic_probe (rtx residual ATTRIBUTE_UNUSED) 2338 { 2339 return 0; 2340 } 2341 2342 /* The default implementation of TARGET_EARLY_REMAT_MODES. */ 2343 2344 void 2345 default_select_early_remat_modes (sbitmap) 2346 { 2347 } 2348 2349 #include "gt-targhooks.h" 2350