1 /* Definitions for code generation pass of GNU compiler.
2 Copyright (C) 2001-2021 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
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3, or (at your option)
9 any later version.
10
11 GCC is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License 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 #ifndef GCC_OPTABS_H
21 #define GCC_OPTABS_H
22
23 #include "optabs-query.h"
24 #include "optabs-libfuncs.h"
25 #include "vec-perm-indices.h"
26
27 /* Generate code for a widening multiply. */
28 extern rtx expand_widening_mult (machine_mode, rtx, rtx, rtx, int, optab);
29
30 /* Describes the type of an expand_operand. Each value is associated
31 with a create_*_operand function; see the comments above those
32 functions for details. */
33 enum expand_operand_type {
34 EXPAND_FIXED,
35 EXPAND_OUTPUT,
36 EXPAND_INPUT,
37 EXPAND_CONVERT_TO,
38 EXPAND_CONVERT_FROM,
39 EXPAND_ADDRESS,
40 EXPAND_INTEGER
41 };
42
43 /* Information about an operand for instruction expansion. */
44 class expand_operand {
45 public:
46 /* The type of operand. */
47 ENUM_BITFIELD (expand_operand_type) type : 8;
48
49 /* True if any conversion should treat VALUE as being unsigned
50 rather than signed. Only meaningful for certain types. */
51 unsigned int unsigned_p : 1;
52
53 /* Is the target operand. */
54 unsigned int target : 1;
55
56 /* Unused; available for future use. */
57 unsigned int unused : 6;
58
59 /* The mode passed to the convert_*_operand function. It has a
60 type-dependent meaning. */
61 ENUM_BITFIELD (machine_mode) mode : 16;
62
63 /* The value of the operand. */
64 rtx value;
65
66 /* The value of an EXPAND_INTEGER operand. */
67 poly_int64 int_value;
68 };
69
70 /* Initialize OP with the given fields. Initialise the other fields
71 to their default values. */
72
73 static inline void
74 create_expand_operand (class expand_operand *op,
75 enum expand_operand_type type,
76 rtx value, machine_mode mode,
77 bool unsigned_p, poly_int64 int_value = 0)
78 {
79 op->type = type;
80 op->unsigned_p = unsigned_p;
81 op->target = 0;
82 op->unused = 0;
83 op->mode = mode;
84 op->value = value;
85 op->int_value = int_value;
86 }
87
88 /* Make OP describe an operand that must use rtx X, even if X is volatile. */
89
90 static inline void
create_fixed_operand(class expand_operand * op,rtx x)91 create_fixed_operand (class expand_operand *op, rtx x)
92 {
93 create_expand_operand (op, EXPAND_FIXED, x, VOIDmode, false);
94 }
95
96 /* Make OP describe an output operand that must have mode MODE.
97 X, if nonnull, is a suggestion for where the output should be stored.
98 It is OK for VALUE to be inconsistent with MODE, although it will just
99 be ignored in that case. */
100
101 static inline void
create_output_operand(class expand_operand * op,rtx x,machine_mode mode)102 create_output_operand (class expand_operand *op, rtx x,
103 machine_mode mode)
104 {
105 create_expand_operand (op, EXPAND_OUTPUT, x, mode, false);
106 }
107
108 /* Make OP describe an input operand that must have mode MODE and
109 value VALUE; MODE cannot be VOIDmode. The backend may request that
110 VALUE be copied into a different kind of rtx before being passed
111 as an operand. */
112
113 static inline void
create_input_operand(class expand_operand * op,rtx value,machine_mode mode)114 create_input_operand (class expand_operand *op, rtx value,
115 machine_mode mode)
116 {
117 create_expand_operand (op, EXPAND_INPUT, value, mode, false);
118 }
119
120 /* Like create_input_operand, except that VALUE must first be converted
121 to mode MODE. UNSIGNED_P says whether VALUE is unsigned. */
122
123 static inline void
create_convert_operand_to(class expand_operand * op,rtx value,machine_mode mode,bool unsigned_p)124 create_convert_operand_to (class expand_operand *op, rtx value,
125 machine_mode mode, bool unsigned_p)
126 {
127 create_expand_operand (op, EXPAND_CONVERT_TO, value, mode, unsigned_p);
128 }
129
130 /* Make OP describe an input operand that should have the same value
131 as VALUE, after any mode conversion that the backend might request.
132 If VALUE is a CONST_INT, it should be treated as having mode MODE.
133 UNSIGNED_P says whether VALUE is unsigned.
134
135 The conversion of VALUE can include a combination of numerical
136 conversion (as for convert_modes) and duplicating a scalar to fill
137 a vector (if VALUE is a scalar but the operand is a vector). */
138
139 static inline void
create_convert_operand_from(class expand_operand * op,rtx value,machine_mode mode,bool unsigned_p)140 create_convert_operand_from (class expand_operand *op, rtx value,
141 machine_mode mode, bool unsigned_p)
142 {
143 create_expand_operand (op, EXPAND_CONVERT_FROM, value, mode, unsigned_p);
144 }
145
146
147 /* Make OP describe an input Pmode address operand. VALUE is the value
148 of the address, but it may need to be converted to Pmode first. */
149
150 static inline void
create_address_operand(class expand_operand * op,rtx value)151 create_address_operand (class expand_operand *op, rtx value)
152 {
153 create_expand_operand (op, EXPAND_ADDRESS, value, Pmode, false);
154 }
155
156 extern void create_integer_operand (class expand_operand *, poly_int64);
157
158 /* Passed to expand_simple_binop and expand_binop to say which options
159 to try to use if the requested operation can't be open-coded on the
160 requisite mode. Either OPTAB_LIB or OPTAB_LIB_WIDEN says try using
161 a library call. Either OPTAB_WIDEN or OPTAB_LIB_WIDEN says try
162 using a wider mode. OPTAB_MUST_WIDEN says try widening and don't
163 try anything else. */
164
165 enum optab_methods
166 {
167 OPTAB_DIRECT,
168 OPTAB_LIB,
169 OPTAB_WIDEN,
170 OPTAB_LIB_WIDEN,
171 OPTAB_MUST_WIDEN
172 };
173
174 extern rtx expand_widen_pattern_expr (struct separate_ops *, rtx , rtx , rtx,
175 rtx, int);
176 extern rtx expand_ternary_op (machine_mode mode, optab ternary_optab,
177 rtx op0, rtx op1, rtx op2, rtx target,
178 int unsignedp);
179 extern rtx simplify_expand_binop (machine_mode mode, optab binoptab,
180 rtx op0, rtx op1, rtx target, int unsignedp,
181 enum optab_methods methods);
182 extern bool force_expand_binop (machine_mode, optab, rtx, rtx, rtx, int,
183 enum optab_methods);
184 extern rtx expand_vector_broadcast (machine_mode, rtx);
185
186 extern rtx expand_doubleword_divmod (machine_mode, rtx, rtx, rtx *, bool);
187
188 /* Generate code for a simple binary or unary operation. "Simple" in
189 this case means "can be unambiguously described by a (mode, code)
190 pair and mapped to a single optab." */
191 extern rtx expand_simple_binop (machine_mode, enum rtx_code, rtx,
192 rtx, rtx, int, enum optab_methods);
193
194 /* Expand a binary operation given optab and rtx operands. */
195 extern rtx expand_binop (machine_mode, optab, rtx, rtx, rtx, int,
196 enum optab_methods);
197
198 /* Expand a binary operation with both signed and unsigned forms. */
199 extern rtx sign_expand_binop (machine_mode, optab, optab, rtx, rtx,
200 rtx, int, enum optab_methods);
201
202 /* Generate code to perform an operation on one operand with two results. */
203 extern int expand_twoval_unop (optab, rtx, rtx, rtx, int);
204
205 /* Generate code to perform an operation on two operands with two results. */
206 extern int expand_twoval_binop (optab, rtx, rtx, rtx, rtx, int);
207
208 /* Generate code to perform an operation on two operands with two
209 results, using a library function. */
210 extern bool expand_twoval_binop_libfunc (optab, rtx, rtx, rtx, rtx,
211 enum rtx_code);
212 extern rtx expand_simple_unop (machine_mode, enum rtx_code, rtx, rtx,
213 int);
214
215 /* Expand a unary arithmetic operation given optab rtx operand. */
216 extern rtx expand_unop (machine_mode, optab, rtx, rtx, int);
217
218 /* Expand the absolute value operation. */
219 extern rtx expand_abs_nojump (machine_mode, rtx, rtx, int);
220 extern rtx expand_abs (machine_mode, rtx, rtx, int, int);
221
222 /* Expand the one's complement absolute value operation. */
223 extern rtx expand_one_cmpl_abs_nojump (machine_mode, rtx, rtx);
224
225 /* Expand the copysign operation. */
226 extern rtx expand_copysign (rtx, rtx, rtx);
227 /* Generate an instruction with a given INSN_CODE with an output and
228 an input. */
229 extern bool maybe_emit_unop_insn (enum insn_code, rtx, rtx, enum rtx_code);
230 extern void emit_unop_insn (enum insn_code, rtx, rtx, enum rtx_code);
231
232 /* Emit code to make a call to a constant function or a library call. */
233 extern void emit_libcall_block (rtx_insn *, rtx, rtx, rtx);
234
235 /* The various uses that a comparison can have; used by can_compare_p:
236 jumps, conditional moves, store flag operations. */
237 enum can_compare_purpose
238 {
239 ccp_jump,
240 ccp_cmov,
241 ccp_store_flag
242 };
243
244 /* Nonzero if a compare of mode MODE can be done straightforwardly
245 (without splitting it into pieces). */
246 extern int can_compare_p (enum rtx_code, machine_mode,
247 enum can_compare_purpose);
248
249 /* Return whether the backend can emit a vector comparison (vec_cmp/vec_cmpu)
250 for code CODE, comparing operands of mode VALUE_MODE and producing a result
251 with MASK_MODE. */
252 extern bool can_vec_cmp_compare_p (enum rtx_code, machine_mode, machine_mode);
253
254 /* Return whether the backend can emit a vector comparison (vcond/vcondu) for
255 code CODE, comparing operands of mode CMP_OP_MODE and producing a result
256 with VALUE_MODE. */
257 extern bool can_vcond_compare_p (enum rtx_code, machine_mode, machine_mode);
258
259 /* Return whether the backend can emit vector set instructions for inserting
260 element into vector at variable index position. */
261 extern bool can_vec_set_var_idx_p (machine_mode);
262
263 extern rtx prepare_operand (enum insn_code, rtx, int, machine_mode,
264 machine_mode, int);
265 /* Emit a pair of rtl insns to compare two rtx's and to jump
266 to a label if the comparison is true. */
267 extern void emit_cmp_and_jump_insns (rtx, rtx, enum rtx_code, rtx,
268 machine_mode, int, rtx,
269 profile_probability prob
270 = profile_probability::uninitialized ());
271
272 /* Generate code to indirectly jump to a location given in the rtx LOC. */
273 extern void emit_indirect_jump (rtx);
274
275 #include "insn-config.h"
276
277 #ifndef GCC_INSN_CONFIG_H
278 #error "insn-config.h must be included before optabs.h"
279 #endif
280
281 /* Emit a conditional move operation. */
282 rtx emit_conditional_move (rtx, enum rtx_code, rtx, rtx, machine_mode,
283 rtx, rtx, machine_mode, int);
284
285 /* Emit a conditional negate or bitwise complement operation. */
286 rtx emit_conditional_neg_or_complement (rtx, rtx_code, machine_mode, rtx,
287 rtx, rtx);
288
289 rtx emit_conditional_add (rtx, enum rtx_code, rtx, rtx, machine_mode,
290 rtx, rtx, machine_mode, int);
291
292 /* Create but don't emit one rtl instruction to perform certain operations.
293 Modes must match; operands must meet the operation's predicates.
294 Likewise for subtraction and for just copying. */
295 extern rtx_insn *gen_add2_insn (rtx, rtx);
296 extern rtx_insn *gen_add3_insn (rtx, rtx, rtx);
297 extern int have_add2_insn (rtx, rtx);
298 extern rtx_insn *gen_addptr3_insn (rtx, rtx, rtx);
299 extern int have_addptr3_insn (rtx, rtx, rtx);
300 extern rtx_insn *gen_sub2_insn (rtx, rtx);
301 extern rtx_insn *gen_sub3_insn (rtx, rtx, rtx);
302 extern int have_sub2_insn (rtx, rtx);
303
304 /* Generate the body of an insn to extend Y (with mode MFROM)
305 into X (with mode MTO). Do zero-extension if UNSIGNEDP is nonzero. */
306 extern rtx_insn *gen_extend_insn (rtx, rtx, machine_mode, machine_mode, int);
307
308 /* Generate code for a FLOAT_EXPR. */
309 extern void expand_float (rtx, rtx, int);
310
311 /* Generate code for a FIX_EXPR. */
312 extern void expand_fix (rtx, rtx, int);
313
314 /* Generate code for a FIXED_CONVERT_EXPR. */
315 extern void expand_fixed_convert (rtx, rtx, int, int);
316
317 /* Generate code for float to integral conversion. */
318 extern bool expand_sfix_optab (rtx, rtx, convert_optab);
319
320 /* Report whether the machine description contains an insn which can
321 perform the operation described by CODE and MODE. */
322 extern int have_insn_for (enum rtx_code, machine_mode);
323
324 /* Generate a conditional trap instruction. */
325 extern rtx_insn *gen_cond_trap (enum rtx_code, rtx, rtx, rtx);
326
327 /* Generate code for VEC_PERM_EXPR. */
328 extern rtx expand_vec_perm_var (machine_mode, rtx, rtx, rtx, rtx);
329 extern rtx expand_vec_perm_const (machine_mode, rtx, rtx,
330 const vec_perm_builder &, machine_mode, rtx);
331
332 /* Generate code for vector comparison. */
333 extern rtx expand_vec_cmp_expr (tree, tree, rtx);
334
335 /* Generate code for VEC_SERIES_EXPR. */
336 extern rtx expand_vec_series_expr (machine_mode, rtx, rtx, rtx);
337
338 /* Generate code for MULT_HIGHPART_EXPR. */
339 extern rtx expand_mult_highpart (machine_mode, rtx, rtx, rtx, bool);
340
341 extern rtx expand_sync_lock_test_and_set (rtx, rtx, rtx);
342 extern rtx expand_atomic_test_and_set (rtx, rtx, enum memmodel);
343 extern rtx expand_atomic_exchange (rtx, rtx, rtx, enum memmodel);
344 extern bool expand_atomic_compare_and_swap (rtx *, rtx *, rtx, rtx, rtx, bool,
345 enum memmodel, enum memmodel);
346 /* Generate memory barriers. */
347 extern void expand_mem_thread_fence (enum memmodel);
348 extern void expand_mem_signal_fence (enum memmodel);
349
350 rtx expand_atomic_load (rtx, rtx, enum memmodel);
351 rtx expand_atomic_store (rtx, rtx, enum memmodel, bool);
352 rtx expand_atomic_fetch_op (rtx, rtx, rtx, enum rtx_code, enum memmodel,
353 bool);
354
355 extern void expand_asm_reg_clobber_mem_blockage (HARD_REG_SET);
356
357 extern bool insn_operand_matches (enum insn_code icode, unsigned int opno,
358 rtx operand);
359 extern bool valid_multiword_target_p (rtx);
360 extern void create_convert_operand_from_type (class expand_operand *op,
361 rtx value, tree type);
362 extern bool maybe_legitimize_operands (enum insn_code icode,
363 unsigned int opno, unsigned int nops,
364 class expand_operand *ops);
365 extern rtx_insn *maybe_gen_insn (enum insn_code icode, unsigned int nops,
366 class expand_operand *ops);
367 extern bool maybe_expand_insn (enum insn_code icode, unsigned int nops,
368 class expand_operand *ops);
369 extern bool maybe_expand_jump_insn (enum insn_code icode, unsigned int nops,
370 class expand_operand *ops);
371 extern void expand_insn (enum insn_code icode, unsigned int nops,
372 class expand_operand *ops);
373 extern void expand_jump_insn (enum insn_code icode, unsigned int nops,
374 class expand_operand *ops);
375
376 extern enum rtx_code get_rtx_code_1 (enum tree_code tcode, bool unsignedp);
377 extern enum rtx_code get_rtx_code (enum tree_code tcode, bool unsignedp);
378 extern rtx vector_compare_rtx (machine_mode cmp_mode, enum tree_code tcode,
379 tree t_op0, tree t_op1, bool unsignedp,
380 enum insn_code icode, unsigned int opno);
381
382
383 #endif /* GCC_OPTABS_H */
384