1 /* Definitions for code generation pass of GNU compiler.
2 Copyright (C) 2001-2014 Free Software Foundation, Inc.
4 This file is part of GCC.
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)
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.
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/>. */
23 #include "insn-codes.h"
24 #include "insn-opinit.h"
26 typedef enum optab_tag optab
;
27 typedef enum optab_tag convert_optab
;
28 typedef enum optab_tag direct_optab
;
30 struct optab_libcall_d
33 const char *libcall_basename
;
34 void (*libcall_gen
) (optab
, const char *name
,
35 char suffix
, enum machine_mode
);
38 struct convert_optab_libcall_d
40 const char *libcall_basename
;
41 void (*libcall_gen
) (convert_optab
, const char *name
,
42 enum machine_mode
, enum machine_mode
);
45 /* Given an enum insn_code, access the function to construct
46 the body of that kind of insn. */
47 #define GEN_FCN(CODE) (insn_data[CODE].genfun)
49 /* Contains the optab used for each rtx code, and vice-versa. */
50 extern const optab code_to_optab_
[NUM_RTX_CODE
];
51 extern const enum rtx_code optab_to_code_
[NUM_OPTABS
];
54 code_to_optab (enum rtx_code code
)
56 return code_to_optab_
[code
];
59 static inline enum rtx_code
60 optab_to_code (optab op
)
62 return optab_to_code_
[op
];
65 extern const struct convert_optab_libcall_d convlib_def
[NUM_CONVLIB_OPTABS
];
66 extern const struct optab_libcall_d normlib_def
[NUM_NORMLIB_OPTABS
];
68 /* Returns the active icode for the given (encoded) optab. */
69 extern enum insn_code
raw_optab_handler (unsigned);
70 extern bool swap_optab_enable (optab
, enum machine_mode
, bool);
72 /* Target-dependent globals. */
73 struct target_optabs
{
74 /* Patterns that are used by optabs that are enabled for this target. */
75 bool pat_enable
[NUM_OPTAB_PATTERNS
];
78 extern struct target_optabs default_target_optabs
;
79 extern struct target_optabs
*this_fn_optabs
;
81 extern struct target_optabs
*this_target_optabs
;
83 #define this_target_optabs (&default_target_optabs)
86 /* Define functions given in optabs.c. */
88 extern rtx
expand_widen_pattern_expr (sepops ops
, rtx op0
, rtx op1
, rtx wide_op
,
89 rtx target
, int unsignedp
);
91 extern rtx
expand_ternary_op (enum machine_mode mode
, optab ternary_optab
,
92 rtx op0
, rtx op1
, rtx op2
, rtx target
,
95 /* Expand a binary operation given optab and rtx operands. */
96 extern rtx
expand_binop (enum machine_mode
, optab
, rtx
, rtx
, rtx
, int,
99 extern rtx
simplify_expand_binop (enum machine_mode mode
, optab binoptab
,
100 rtx op0
, rtx op1
, rtx target
, int unsignedp
,
101 enum optab_methods methods
);
103 extern bool force_expand_binop (enum machine_mode
, optab
, rtx
, rtx
, rtx
, int,
106 /* Expand a binary operation with both signed and unsigned forms. */
107 extern rtx
sign_expand_binop (enum machine_mode
, optab
, optab
, rtx
, rtx
,
108 rtx
, int, enum optab_methods
);
110 /* Generate code to perform an operation on one operand with two results. */
111 extern int expand_twoval_unop (optab
, rtx
, rtx
, rtx
, int);
113 /* Generate code to perform an operation on two operands with two results. */
114 extern int expand_twoval_binop (optab
, rtx
, rtx
, rtx
, rtx
, int);
116 /* Generate code to perform an operation on two operands with two
117 results, using a library function. */
118 extern bool expand_twoval_binop_libfunc (optab
, rtx
, rtx
, rtx
, rtx
,
121 /* Expand a unary arithmetic operation given optab rtx operand. */
122 extern rtx
expand_unop (enum machine_mode
, optab
, rtx
, rtx
, int);
124 /* Expand the absolute value operation. */
125 extern rtx
expand_abs_nojump (enum machine_mode
, rtx
, rtx
, int);
126 extern rtx
expand_abs (enum machine_mode
, rtx
, rtx
, int, int);
128 /* Expand the one's complement absolute value operation. */
129 extern rtx
expand_one_cmpl_abs_nojump (enum machine_mode
, rtx
, rtx
);
131 /* Expand the copysign operation. */
132 extern rtx
expand_copysign (rtx
, rtx
, rtx
);
134 /* Generate an instruction with a given INSN_CODE with an output and
136 extern void emit_unop_insn (enum insn_code
, rtx
, rtx
, enum rtx_code
);
137 extern bool maybe_emit_unop_insn (enum insn_code
, rtx
, rtx
, enum rtx_code
);
139 /* Find a widening optab even if it doesn't widen as much as we want. */
140 #define find_widening_optab_handler(A,B,C,D) \
141 find_widening_optab_handler_and_mode (A, B, C, D, NULL)
142 extern enum insn_code
find_widening_optab_handler_and_mode (optab
,
146 enum machine_mode
*);
148 /* An extra flag to control optab_for_tree_code's behavior. This is needed to
149 distinguish between machines with a vector shift that takes a scalar for the
150 shift amount vs. machines that take a vector for the shift amount. */
158 /* Return the optab used for computing the given operation on the type given by
159 the second argument. The third argument distinguishes between the types of
160 vector shifts and rotates */
161 extern optab
optab_for_tree_code (enum tree_code
, const_tree
, enum optab_subtype
);
163 /* Given an optab that reduces a vector to a scalar, find instead the old
164 optab that produces a vector with the reduction result in one element,
165 for a tree with the specified type. */
166 extern optab
scalar_reduc_to_vector (optab
, const_tree type
);
168 /* The various uses that a comparison can have; used by can_compare_p:
169 jumps, conditional moves, store flag operations. */
170 enum can_compare_purpose
177 /* Nonzero if a compare of mode MODE can be done straightforwardly
178 (without splitting it into pieces). */
179 extern int can_compare_p (enum rtx_code
, enum machine_mode
,
180 enum can_compare_purpose
);
182 /* Return the INSN_CODE to use for an extend operation. */
183 extern enum insn_code
can_extend_p (enum machine_mode
, enum machine_mode
, int);
185 /* Generate the body of an insn to extend Y (with mode MFROM)
186 into X (with mode MTO). Do zero-extension if UNSIGNEDP is nonzero. */
187 extern rtx
gen_extend_insn (rtx
, rtx
, enum machine_mode
,
188 enum machine_mode
, int);
190 /* Call this to reset the function entry for one optab. */
191 extern void set_optab_libfunc (optab
, enum machine_mode
, const char *);
192 extern void set_conv_libfunc (convert_optab
, enum machine_mode
,
193 enum machine_mode
, const char *);
195 /* Call this to install all of the __sync libcalls up to size MAX. */
196 extern void init_sync_libfuncs (int max
);
198 /* Generate code for a FIXED_CONVERT_EXPR. */
199 extern void expand_fixed_convert (rtx
, rtx
, int, int);
201 /* Generate code for a FLOAT_EXPR. */
202 extern void expand_float (rtx
, rtx
, int);
204 /* Return the insn_code for a FLOAT_EXPR. */
205 enum insn_code
can_float_p (enum machine_mode
, enum machine_mode
, int);
207 /* Return true if there is an inline compare and swap pattern. */
208 extern bool can_compare_and_swap_p (enum machine_mode
, bool);
210 /* Return true if there is an inline atomic exchange pattern. */
211 extern bool can_atomic_exchange_p (enum machine_mode
, bool);
213 /* Generate code for a compare and swap. */
214 extern bool expand_atomic_compare_and_swap (rtx
*, rtx
*, rtx
, rtx
, rtx
, bool,
215 enum memmodel
, enum memmodel
);
217 /* Generate memory barriers. */
218 extern void expand_mem_thread_fence (enum memmodel
);
219 extern void expand_mem_signal_fence (enum memmodel
);
221 /* Check whether an operation represented by the code CODE is a
222 convert operation that is supported by the target platform in
224 bool supportable_convert_operation (enum tree_code
, tree
, tree
, tree
*,
227 /* Generate code for a FIX_EXPR. */
228 extern void expand_fix (rtx
, rtx
, int);
230 /* Generate code for float to integral conversion. */
231 extern bool expand_sfix_optab (rtx
, rtx
, convert_optab
);
233 /* Generate code for a widening multiply. */
234 extern rtx
expand_widening_mult (enum machine_mode
, rtx
, rtx
, rtx
, int, optab
);
236 /* Return tree if target supports vector operations for COND_EXPR. */
237 bool expand_vec_cond_expr_p (tree
, tree
);
239 /* Generate code for VEC_COND_EXPR. */
240 extern rtx
expand_vec_cond_expr (tree
, tree
, tree
, tree
, rtx
);
241 /* Generate code for VEC_RSHIFT_EXPR. */
242 extern rtx
expand_vec_shift_expr (sepops
, rtx
);
244 /* Return true if target supports vector operations for VEC_PERM_EXPR. */
245 extern bool can_vec_perm_p (enum machine_mode
, bool, const unsigned char *);
247 /* Generate code for VEC_PERM_EXPR. */
248 extern rtx
expand_vec_perm (enum machine_mode
, rtx
, rtx
, rtx
, rtx
);
250 /* Return non-zero if target supports a given highpart multiplication. */
251 extern int can_mult_highpart_p (enum machine_mode
, bool);
253 /* Generate code for MULT_HIGHPART_EXPR. */
254 extern rtx
expand_mult_highpart (enum machine_mode
, rtx
, rtx
, rtx
, bool);
256 /* Return true if target supports vector masked load/store for mode. */
257 extern bool can_vec_mask_load_store_p (enum machine_mode
, bool);
259 /* Return the insn used to implement mode MODE of OP, or CODE_FOR_nothing
260 if the target does not have such an insn. */
262 static inline enum insn_code
263 optab_handler (optab op
, enum machine_mode mode
)
265 unsigned scode
= (op
<< 16) | mode
;
266 gcc_assert (op
> LAST_CONV_OPTAB
);
267 return raw_optab_handler (scode
);
270 /* Return the insn used to perform conversion OP from mode FROM_MODE
271 to mode TO_MODE; return CODE_FOR_nothing if the target does not have
274 static inline enum insn_code
275 convert_optab_handler (convert_optab op
, enum machine_mode to_mode
,
276 enum machine_mode from_mode
)
278 unsigned scode
= (op
<< 16) | (from_mode
<< 8) | to_mode
;
279 gcc_assert (op
> unknown_optab
&& op
<= LAST_CONV_OPTAB
);
280 return raw_optab_handler (scode
);
283 /* Like optab_handler, but for widening_operations that have a
284 TO_MODE and a FROM_MODE. */
286 static inline enum insn_code
287 widening_optab_handler (optab op
, enum machine_mode to_mode
,
288 enum machine_mode from_mode
)
290 unsigned scode
= (op
<< 16) | to_mode
;
291 if (to_mode
!= from_mode
&& from_mode
!= VOIDmode
)
293 /* ??? Why does find_widening_optab_handler_and_mode attempt to
294 widen things that can't be widened? E.g. add_optab... */
295 if (op
> LAST_CONV_OPTAB
)
296 return CODE_FOR_nothing
;
297 scode
|= from_mode
<< 8;
299 return raw_optab_handler (scode
);
302 /* Return the insn used to implement mode MODE of OP, or CODE_FOR_nothing
303 if the target does not have such an insn. */
305 static inline enum insn_code
306 direct_optab_handler (direct_optab op
, enum machine_mode mode
)
308 return optab_handler (op
, mode
);
311 /* Return true if UNOPTAB is for a trapping-on-overflow operation. */
314 trapv_unoptab_p (optab unoptab
)
316 return (unoptab
== negv_optab
317 || unoptab
== absv_optab
);
320 /* Return true if BINOPTAB is for a trapping-on-overflow operation. */
323 trapv_binoptab_p (optab binoptab
)
325 return (binoptab
== addv_optab
326 || binoptab
== subv_optab
327 || binoptab
== smulv_optab
);
330 extern rtx
optab_libfunc (optab optab
, enum machine_mode mode
);
331 extern rtx
convert_optab_libfunc (convert_optab optab
, enum machine_mode mode1
,
332 enum machine_mode mode2
);
334 /* Describes an instruction that inserts or extracts a bitfield. */
335 struct extraction_insn
337 /* The code of the instruction. */
338 enum insn_code icode
;
340 /* The mode that the structure operand should have. This is byte_mode
341 when using the legacy insv, extv and extzv patterns to access memory. */
342 enum machine_mode struct_mode
;
344 /* The mode of the field to be inserted or extracted, and by extension
345 the mode of the insertion or extraction itself. */
346 enum machine_mode field_mode
;
348 /* The mode of the field's bit position. This is only important
349 when the position is variable rather than constant. */
350 enum machine_mode pos_mode
;
353 /* Enumerates the possible extraction_insn operations. */
354 enum extraction_pattern
{ EP_insv
, EP_extv
, EP_extzv
};
356 extern bool get_best_reg_extraction_insn (extraction_insn
*,
357 enum extraction_pattern
,
358 unsigned HOST_WIDE_INT
,
361 extern bool get_best_mem_extraction_insn (extraction_insn
*,
362 enum extraction_pattern
,
363 HOST_WIDE_INT
, HOST_WIDE_INT
,
366 extern bool insn_operand_matches (enum insn_code icode
, unsigned int opno
,
369 /* Describes the type of an expand_operand. Each value is associated
370 with a create_*_operand function; see the comments above those
371 functions for details. */
372 enum expand_operand_type
{
382 /* Information about an operand for instruction expansion. */
383 struct expand_operand
{
384 /* The type of operand. */
385 ENUM_BITFIELD (expand_operand_type
) type
: 8;
387 /* True if any conversion should treat VALUE as being unsigned
388 rather than signed. Only meaningful for certain types. */
389 unsigned int unsigned_p
: 1;
391 /* Unused; available for future use. */
392 unsigned int unused
: 7;
394 /* The mode passed to the convert_*_operand function. It has a
395 type-dependent meaning. */
396 ENUM_BITFIELD (machine_mode
) mode
: 16;
398 /* The value of the operand. */
402 /* Initialize OP with the given fields. Initialise the other fields
403 to their default values. */
406 create_expand_operand (struct expand_operand
*op
,
407 enum expand_operand_type type
,
408 rtx value
, enum machine_mode mode
,
412 op
->unsigned_p
= unsigned_p
;
418 /* Make OP describe an operand that must use rtx X, even if X is volatile. */
421 create_fixed_operand (struct expand_operand
*op
, rtx x
)
423 create_expand_operand (op
, EXPAND_FIXED
, x
, VOIDmode
, false);
426 /* Make OP describe an output operand that must have mode MODE.
427 X, if nonnull, is a suggestion for where the output should be stored.
428 It is OK for VALUE to be inconsistent with MODE, although it will just
429 be ignored in that case. */
432 create_output_operand (struct expand_operand
*op
, rtx x
,
433 enum machine_mode mode
)
435 create_expand_operand (op
, EXPAND_OUTPUT
, x
, mode
, false);
438 /* Make OP describe an input operand that must have mode MODE and
439 value VALUE; MODE cannot be VOIDmode. The backend may request that
440 VALUE be copied into a different kind of rtx before being passed
444 create_input_operand (struct expand_operand
*op
, rtx value
,
445 enum machine_mode mode
)
447 create_expand_operand (op
, EXPAND_INPUT
, value
, mode
, false);
450 /* Like create_input_operand, except that VALUE must first be converted
451 to mode MODE. UNSIGNED_P says whether VALUE is unsigned. */
454 create_convert_operand_to (struct expand_operand
*op
, rtx value
,
455 enum machine_mode mode
, bool unsigned_p
)
457 create_expand_operand (op
, EXPAND_CONVERT_TO
, value
, mode
, unsigned_p
);
460 /* Make OP describe an input operand that should have the same value
461 as VALUE, after any mode conversion that the backend might request.
462 If VALUE is a CONST_INT, it should be treated as having mode MODE.
463 UNSIGNED_P says whether VALUE is unsigned. */
466 create_convert_operand_from (struct expand_operand
*op
, rtx value
,
467 enum machine_mode mode
, bool unsigned_p
)
469 create_expand_operand (op
, EXPAND_CONVERT_FROM
, value
, mode
, unsigned_p
);
472 extern void create_convert_operand_from_type (struct expand_operand
*op
,
473 rtx value
, tree type
);
475 /* Make OP describe an input Pmode address operand. VALUE is the value
476 of the address, but it may need to be converted to Pmode first. */
479 create_address_operand (struct expand_operand
*op
, rtx value
)
481 create_expand_operand (op
, EXPAND_ADDRESS
, value
, Pmode
, false);
484 /* Make OP describe an input operand that has value INTVAL and that has
485 no inherent mode. This function should only be used for operands that
486 are always expand-time constants. The backend may request that INTVAL
487 be copied into a different kind of rtx, but it must specify the mode
488 of that rtx if so. */
491 create_integer_operand (struct expand_operand
*op
, HOST_WIDE_INT intval
)
493 create_expand_operand (op
, EXPAND_INTEGER
, GEN_INT (intval
), VOIDmode
, false);
496 extern bool valid_multiword_target_p (rtx
);
498 extern bool maybe_legitimize_operands (enum insn_code icode
,
499 unsigned int opno
, unsigned int nops
,
500 struct expand_operand
*ops
);
501 extern rtx
maybe_gen_insn (enum insn_code icode
, unsigned int nops
,
502 struct expand_operand
*ops
);
503 extern bool maybe_expand_insn (enum insn_code icode
, unsigned int nops
,
504 struct expand_operand
*ops
);
505 extern bool maybe_expand_jump_insn (enum insn_code icode
, unsigned int nops
,
506 struct expand_operand
*ops
);
507 extern void expand_insn (enum insn_code icode
, unsigned int nops
,
508 struct expand_operand
*ops
);
509 extern void expand_jump_insn (enum insn_code icode
, unsigned int nops
,
510 struct expand_operand
*ops
);
512 extern rtx
prepare_operand (enum insn_code
, rtx
, int, enum machine_mode
,
513 enum machine_mode
, int);
515 extern void gen_int_libfunc (optab
, const char *, char, enum machine_mode
);
516 extern void gen_fp_libfunc (optab
, const char *, char, enum machine_mode
);
517 extern void gen_fixed_libfunc (optab
, const char *, char, enum machine_mode
);
518 extern void gen_signed_fixed_libfunc (optab
, const char *, char,
520 extern void gen_unsigned_fixed_libfunc (optab
, const char *, char,
522 extern void gen_int_fp_libfunc (optab
, const char *, char, enum machine_mode
);
523 extern void gen_intv_fp_libfunc (optab
, const char *, char, enum machine_mode
);
524 extern void gen_int_fp_fixed_libfunc (optab
, const char *, char,
526 extern void gen_int_fp_signed_fixed_libfunc (optab
, const char *, char,
528 extern void gen_int_fixed_libfunc (optab
, const char *, char,
530 extern void gen_int_signed_fixed_libfunc (optab
, const char *, char,
532 extern void gen_int_unsigned_fixed_libfunc (optab
, const char *, char,
535 extern void gen_interclass_conv_libfunc (convert_optab
, const char *,
536 enum machine_mode
, enum machine_mode
);
537 extern void gen_int_to_fp_conv_libfunc (convert_optab
, const char *,
538 enum machine_mode
, enum machine_mode
);
539 extern void gen_ufloat_conv_libfunc (convert_optab
, const char *,
540 enum machine_mode
, enum machine_mode
);
541 extern void gen_int_to_fp_nondecimal_conv_libfunc (convert_optab
,
545 extern void gen_fp_to_int_conv_libfunc (convert_optab
, const char *,
546 enum machine_mode
, enum machine_mode
);
547 extern void gen_intraclass_conv_libfunc (convert_optab
, const char *,
548 enum machine_mode
, enum machine_mode
);
549 extern void gen_trunc_conv_libfunc (convert_optab
, const char *,
550 enum machine_mode
, enum machine_mode
);
551 extern void gen_extend_conv_libfunc (convert_optab
, const char *,
552 enum machine_mode
, enum machine_mode
);
553 extern void gen_fract_conv_libfunc (convert_optab
, const char *,
554 enum machine_mode
, enum machine_mode
);
555 extern void gen_fractuns_conv_libfunc (convert_optab
, const char *,
556 enum machine_mode
, enum machine_mode
);
557 extern void gen_satfract_conv_libfunc (convert_optab
, const char *,
558 enum machine_mode
, enum machine_mode
);
559 extern void gen_satfractuns_conv_libfunc (convert_optab
, const char *,
562 extern void init_tree_optimization_optabs (tree
);
564 #endif /* GCC_OPTABS_H */