1 /* Definitions of target machine for GNU compiler, for IBM S/390.
2 Copyright (C) 2000-2022 Free Software Foundation, Inc.
4 Contributed by Hartmut Penner (hpenner@de.ibm.com)
6 This file is part of GCC.
8 GCC is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 3, or (at your option) any later
13 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
18 You should have received a copy of the GNU General Public License
19 along with GCC; see the file COPYING3. If not see
20 <http://www.gnu.org/licenses/>. */
24 /* Prototypes of functions used for constraint evaluation in
27 extern int s390_mem_constraint (const char *str
, rtx op
);
28 extern int s390_O_constraint_str (const char c
, HOST_WIDE_INT value
);
29 extern int s390_N_constraint_str (const char *str
, HOST_WIDE_INT value
);
30 extern int s390_float_const_zero_p (rtx value
);
31 extern bool s390_check_symref_alignment (rtx addr
, HOST_WIDE_INT alignment
);
34 /* In s390-common.c. */
35 extern bool s390_handle_option (struct gcc_options
*opts ATTRIBUTE_UNUSED
,
36 struct gcc_options
*opts_set ATTRIBUTE_UNUSED
,
37 const struct cl_decoded_option
*decoded
,
40 /* Declare functions in s390.c. */
42 extern HOST_WIDE_INT
s390_initial_elimination_offset (int, int);
43 extern void s390_emit_prologue (void);
44 extern void s390_emit_epilogue (bool);
45 extern void s390_expand_split_stack_prologue (void);
46 extern bool s390_can_use_simple_return_insn (void);
47 extern bool s390_can_use_return_insn (void);
48 extern void s390_function_profiler (FILE *, int);
49 extern void s390_set_has_landing_pad_p (bool);
50 extern bool s390_hard_regno_rename_ok (unsigned int, unsigned int);
51 extern int s390_class_max_nregs (enum reg_class
, machine_mode
);
52 extern bool s390_function_arg_vector (machine_mode
, const_tree
);
53 extern bool s390_return_addr_from_memory(void);
54 extern bool s390_fma_allowed_p (machine_mode
);
55 #if S390_USE_TARGET_ATTRIBUTE
56 extern tree
s390_valid_target_attribute_tree (tree args
,
57 struct gcc_options
*opts
,
58 const struct gcc_options
59 *opts_set
, bool is_pragma
);
60 extern void s390_activate_target_options (tree new_tree
);
62 s390_asm_output_function_prefix (FILE *asm_out_file
,
63 const char *fnname ATTRIBUTE_UNUSED
);
65 s390_asm_declare_function_size (FILE *asm_out_file
,
66 const char *fnname ATTRIBUTE_UNUSED
, tree decl
);
69 extern void s390_rawmemchr (machine_mode elt_mode
, rtx dst
, rtx src
, rtx pat
);
72 extern int s390_extra_constraint_str (rtx
, int, const char *);
73 extern int s390_const_ok_for_constraint_p (HOST_WIDE_INT
, int, const char *);
74 extern int s390_const_double_ok_for_constraint_p (rtx
, int, const char *);
75 extern int s390_single_part (rtx
, machine_mode
, machine_mode
, int);
76 extern unsigned HOST_WIDE_INT
s390_extract_part (rtx
, machine_mode
, int);
77 extern bool s390_contiguous_bitmask_p (unsigned HOST_WIDE_INT
, bool, int, int *, int *);
78 extern bool s390_contiguous_bitmask_vector_p (rtx
, int *, int *);
79 extern bool s390_bytemask_vector_p (rtx
, unsigned *);
80 extern bool s390_split_ok_p (rtx
, rtx
, machine_mode
, int);
81 extern bool s390_overlap_p (rtx
, rtx
, HOST_WIDE_INT
);
82 extern bool s390_offset_p (rtx
, rtx
, rtx
);
83 extern bool s390_rel_address_ok_p (rtx
);
84 extern int tls_symbolic_operand (rtx
);
86 extern bool s390_match_ccmode (rtx_insn
*, machine_mode
);
87 extern machine_mode
s390_tm_ccmode (rtx
, rtx
, bool);
88 extern machine_mode
s390_select_ccmode (enum rtx_code
, rtx
, rtx
);
89 extern rtx
s390_emit_compare (enum rtx_code
, rtx
, rtx
);
90 extern rtx_insn
*s390_emit_jump (rtx
, rtx
);
91 extern bool symbolic_reference_mentioned_p (rtx
);
92 extern bool tls_symbolic_reference_mentioned_p (rtx
);
93 extern bool legitimate_la_operand_p (rtx
);
94 extern bool preferred_la_operand_p (rtx
, rtx
);
95 extern int legitimate_pic_operand_p (rtx
);
96 extern bool legitimate_reload_constant_p (rtx
);
97 extern rtx
legitimize_pic_address (rtx
, rtx
);
98 extern rtx
legitimize_reload_address (rtx
, machine_mode
, int, int);
99 extern enum reg_class
s390_secondary_input_reload_class (enum reg_class
,
102 extern enum reg_class
s390_secondary_output_reload_class (enum reg_class
,
105 extern void s390_reload_larl_operand (rtx
, rtx
, rtx
);
106 extern void s390_reload_symref_address (rtx
, rtx
, rtx
, bool);
107 extern void s390_expand_plus_operand (rtx
, rtx
, rtx
);
108 extern void emit_symbolic_move (rtx
*);
109 extern void s390_load_address (rtx
, rtx
);
110 extern bool s390_expand_cpymem (rtx
, rtx
, rtx
);
111 extern void s390_expand_setmem (rtx
, rtx
, rtx
);
112 extern bool s390_expand_cmpmem (rtx
, rtx
, rtx
, rtx
);
113 extern void s390_expand_vec_strlen (rtx
, rtx
, rtx
);
114 extern void s390_expand_vec_movstr (rtx
, rtx
, rtx
);
115 extern bool s390_expand_addcc (enum rtx_code
, rtx
, rtx
, rtx
, rtx
, rtx
);
116 extern bool s390_expand_insv (rtx
, rtx
, rtx
, rtx
);
117 extern void s390_expand_cs (machine_mode
, rtx
, rtx
, rtx
, rtx
, rtx
, bool);
118 extern void s390_expand_atomic_exchange_tdsi (rtx
, rtx
, rtx
);
119 extern void s390_expand_atomic (machine_mode
, enum rtx_code
,
120 rtx
, rtx
, rtx
, bool);
121 extern void s390_expand_tbegin (rtx
, rtx
, rtx
, bool);
122 extern void s390_expand_vec_compare (rtx
, enum rtx_code
, rtx
, rtx
);
123 extern void s390_expand_vec_compare_cc (rtx
, enum rtx_code
, rtx
, rtx
, bool);
124 extern enum rtx_code
s390_reverse_condition (machine_mode
, enum rtx_code
);
125 extern void s390_expand_vcond (rtx
, rtx
, rtx
, enum rtx_code
, rtx
, rtx
);
126 extern void s390_expand_vec_init (rtx
, rtx
);
127 extern rtx
s390_expand_merge_perm_const (machine_mode
, bool);
128 extern void s390_expand_merge (rtx
, rtx
, rtx
, bool);
129 extern rtx
s390_build_signbit_mask (machine_mode
);
130 extern rtx
s390_return_addr_rtx (int, rtx
);
131 extern rtx
s390_back_chain_rtx (void);
132 extern rtx_insn
*s390_emit_call (rtx
, rtx
, rtx
, rtx
);
133 extern void s390_expand_logical_operator (enum rtx_code
,
134 machine_mode
, rtx
*);
135 extern bool s390_logical_operator_ok_p (rtx
*);
136 extern void s390_narrow_logical_operator (enum rtx_code
, rtx
*, rtx
*);
137 extern void s390_split_access_reg (rtx
, rtx
*, rtx
*);
139 extern void print_operand_address (FILE *, rtx
);
140 extern void print_operand (FILE *, rtx
, int);
141 extern void s390_output_pool_entry (rtx
, machine_mode
, unsigned int);
142 extern bool s390_const_int_pool_entry_p (rtx
, HOST_WIDE_INT
*);
143 extern int s390_label_align (rtx_insn
*);
144 extern int s390_agen_dep_p (rtx_insn
*, rtx_insn
*);
145 extern rtx_insn
*s390_load_got (void);
146 extern rtx
s390_get_thread_pointer (void);
147 extern void s390_emit_tpf_eh_return (rtx
);
148 extern bool s390_legitimate_address_without_index_p (rtx
);
149 extern bool s390_decompose_addrstyle_without_index (rtx
, rtx
*,
151 extern bool s390_valid_shift_count (rtx op
, HOST_WIDE_INT required_mask
= 63);
152 extern int s390_branch_condition_mask (rtx
);
153 extern int s390_compare_and_branch_condition_mask (rtx
);
154 extern bool s390_extzv_shift_ok (int, int, unsigned HOST_WIDE_INT
);
155 extern void s390_asm_output_function_label (FILE *, const char *, tree
);
156 extern void s390_output_split_stack_data (rtx
, rtx
, rtx
, rtx
);
158 enum s390_indirect_branch_type
160 s390_indirect_branch_type_jump
= 0,
161 s390_indirect_branch_type_call
,
162 s390_indirect_branch_type_return
164 extern void s390_indirect_branch_via_thunk (unsigned int regno
,
165 unsigned int return_addr_regno
,
166 rtx comparison_operator
,
167 enum s390_indirect_branch_type type
);
168 extern void s390_indirect_branch_via_inline_thunk (rtx execute_target
);
169 #endif /* RTX_CODE */
171 /* s390-c.c routines */
172 extern void s390_cpu_cpp_builtins (struct cpp_reader
*);
173 extern void s390_register_target_pragmas (void);
175 /* Routines for s390-c.c */
176 extern bool s390_const_operand_ok (tree
, int, int, tree
);
178 /* s390-d.c routines */
179 extern void s390_d_target_versions (void);
180 extern void s390_d_register_target_info (void);
182 /* Pass management. */
183 namespace gcc
{ class context
; }
186 extern rtl_opt_pass
*make_pass_s390_early_mach (gcc::context
*ctxt
);