gcc-4_9-branch/gcc/optabs.h

   1 /* Definitions for code generation pass of GNU compiler.
   2    Copyright (C) 2001-2014 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 "insn-codes.h"
  24 #include "insn-opinit.h"
  25
  26 typedef enum optab_tag optab;
  27 typedef enum optab_tag convert_optab;
  28 typedef enum optab_tag direct_optab;
  29
  30 struct optab_libcall_d
  31 {
  32   char libcall_suffix;
  33   const char *libcall_basename;
  34   void (*libcall_gen) (optab, const char *name,
  35                        char suffix, enum machine_mode);
  36 };
  37
  38 struct convert_optab_libcall_d
  39 {
  40   const char *libcall_basename;
  41   void (*libcall_gen) (convert_optab, const char *name,
  42                        enum machine_mode, enum machine_mode);
  43 };
  44
  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)
  48
  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];
  52
  53 static inline optab
  54 code_to_optab (enum rtx_code code)
  55 {
  56   return code_to_optab_[code];
  57 }
  58
  59 static inline enum rtx_code
  60 optab_to_code (optab op)
  61 {
  62   return optab_to_code_[op];
  63 }
  64
  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];
  67
  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);
  71
  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];
  76 };
  77
  78 extern struct target_optabs default_target_optabs;
  79 extern struct target_optabs *this_fn_optabs;
  80 #if SWITCHABLE_TARGET
  81 extern struct target_optabs *this_target_optabs;
  82 #else
  83 #define this_target_optabs (&default_target_optabs)
  84 #endif
  85 \f
  86 /* Define functions given in optabs.c.  */
  87
  88 extern rtx expand_widen_pattern_expr (sepops ops, rtx op0, rtx op1, rtx wide_op,
  89                                       rtx target, int unsignedp);
  90
  91 extern rtx expand_ternary_op (enum machine_mode mode, optab ternary_optab,
  92                               rtx op0, rtx op1, rtx op2, rtx target,
  93                               int unsignedp);
  94
  95 /* Expand a binary operation given optab and rtx operands.  */
  96 extern rtx expand_binop (enum machine_mode, optab, rtx, rtx, rtx, int,
  97                          enum optab_methods);
  98
  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);
 102
 103 extern bool force_expand_binop (enum machine_mode, optab, rtx, rtx, rtx, int,
 104                                 enum optab_methods);
 105
 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);
 109
 110 /* Generate code to perform an operation on one operand with two results.  */
 111 extern int expand_twoval_unop (optab, rtx, rtx, rtx, int);
 112
 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);
 115
 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,
 119                                          enum rtx_code);
 120
 121 /* Expand a unary arithmetic operation given optab rtx operand.  */
 122 extern rtx expand_unop (enum machine_mode, optab, rtx, rtx, int);
 123
 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);
 127
 128 /* Expand the one's complement absolute value operation.  */
 129 extern rtx expand_one_cmpl_abs_nojump (enum machine_mode, rtx, rtx);
 130
 131 /* Expand the copysign operation.  */
 132 extern rtx expand_copysign (rtx, rtx, rtx);
 133
 134 /* Generate an instruction with a given INSN_CODE with an output and
 135    an input.  */
 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);
 138
 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,
 143                                                             enum machine_mode,
 144                                                             enum machine_mode,
 145                                                             int,
 146                                                             enum machine_mode *);
 147
 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.  */
 151 enum optab_subtype
 152 {
 153   optab_default,
 154   optab_scalar,
 155   optab_vector
 156 };
 157
 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);
 162
 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);
 167
 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
 171 {
 172   ccp_jump,
 173   ccp_cmov,
 174   ccp_store_flag
 175 };
 176
 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);
 181
 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);
 184
 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);
 189
 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 *);
 194
 195 /* Call this to install all of the __sync libcalls up to size MAX.  */
 196 extern void init_sync_libfuncs (int max);
 197
 198 /* Generate code for a FIXED_CONVERT_EXPR.  */
 199 extern void expand_fixed_convert (rtx, rtx, int, int);
 200
 201 /* Generate code for a FLOAT_EXPR.  */
 202 extern void expand_float (rtx, rtx, int);
 203
 204 /* Return the insn_code for a FLOAT_EXPR.  */
 205 enum insn_code can_float_p (enum machine_mode, enum machine_mode, int);
 206
 207 /* Return true if there is an inline compare and swap pattern.  */
 208 extern bool can_compare_and_swap_p (enum machine_mode, bool);
 209
 210 /* Return true if there is an inline atomic exchange pattern.  */
 211 extern bool can_atomic_exchange_p (enum machine_mode, bool);
 212
 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);
 216
 217 /* Generate memory barriers.  */
 218 extern void expand_mem_thread_fence (enum memmodel);
 219 extern void expand_mem_signal_fence (enum memmodel);
 220
 221 /* Check whether an operation represented by the code CODE is a
 222    convert operation that is supported by the target platform in
 223    vector form */
 224 bool supportable_convert_operation (enum tree_code, tree, tree, tree *,
 225                                     enum tree_code *);
 226
 227 /* Generate code for a FIX_EXPR.  */
 228 extern void expand_fix (rtx, rtx, int);
 229
 230 /* Generate code for float to integral conversion.  */
 231 extern bool expand_sfix_optab (rtx, rtx, convert_optab);
 232
 233 /* Generate code for a widening multiply.  */
 234 extern rtx expand_widening_mult (enum machine_mode, rtx, rtx, rtx, int, optab);
 235
 236 /* Return tree if target supports vector operations for COND_EXPR.  */
 237 bool expand_vec_cond_expr_p (tree, tree);
 238
 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);
 243
 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 *);
 246
 247 /* Generate code for VEC_PERM_EXPR.  */
 248 extern rtx expand_vec_perm (enum machine_mode, rtx, rtx, rtx, rtx);
 249
 250 /* Return non-zero if target supports a given highpart multiplication.  */
 251 extern int can_mult_highpart_p (enum machine_mode, bool);
 252
 253 /* Generate code for MULT_HIGHPART_EXPR.  */
 254 extern rtx expand_mult_highpart (enum machine_mode, rtx, rtx, rtx, bool);
 255
 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);
 258
 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.  */
 261
 262 static inline enum insn_code
 263 optab_handler (optab op, enum machine_mode mode)
 264 {
 265   unsigned scode = (op << 16) | mode;
 266   gcc_assert (op > LAST_CONV_OPTAB);
 267   return raw_optab_handler (scode);
 268 }
 269
 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
 272    such an insn.  */
 273
 274 static inline enum insn_code
 275 convert_optab_handler (convert_optab op, enum machine_mode to_mode,
 276                        enum machine_mode from_mode)
 277 {
 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);
 281 }
 282
 283 /* Like optab_handler, but for widening_operations that have a
 284    TO_MODE and a FROM_MODE.  */
 285
 286 static inline enum insn_code
 287 widening_optab_handler (optab op, enum machine_mode to_mode,
 288                         enum machine_mode from_mode)
 289 {
 290   unsigned scode = (op << 16) | to_mode;
 291   if (to_mode != from_mode && from_mode != VOIDmode)
 292     {
 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;
 298     }
 299   return raw_optab_handler (scode);
 300 }
 301
 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.  */
 304
 305 static inline enum insn_code
 306 direct_optab_handler (direct_optab op, enum machine_mode mode)
 307 {
 308   return optab_handler (op, mode);
 309 }
 310
 311 /* Return true if UNOPTAB is for a trapping-on-overflow operation.  */
 312
 313 static inline bool
 314 trapv_unoptab_p (optab unoptab)
 315 {
 316   return (unoptab == negv_optab
 317           || unoptab == absv_optab);
 318 }
 319
 320 /* Return true if BINOPTAB is for a trapping-on-overflow operation.  */
 321
 322 static inline bool
 323 trapv_binoptab_p (optab binoptab)
 324 {
 325   return (binoptab == addv_optab
 326           || binoptab == subv_optab
 327           || binoptab == smulv_optab);
 328 }
 329
 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);
 333
 334 /* Describes an instruction that inserts or extracts a bitfield.  */
 335 struct extraction_insn
 336 {
 337   /* The code of the instruction.  */
 338   enum insn_code icode;
 339
 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;
 343
 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;
 347
 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;
 351 };
 352
 353 /* Enumerates the possible extraction_insn operations.  */
 354 enum extraction_pattern { EP_insv, EP_extv, EP_extzv };
 355
 356 extern bool get_best_reg_extraction_insn (extraction_insn *,
 357                                           enum extraction_pattern,
 358                                           unsigned HOST_WIDE_INT,
 359                                           enum machine_mode);
 360
 361 extern bool get_best_mem_extraction_insn (extraction_insn *,
 362                                           enum extraction_pattern,
 363                                           HOST_WIDE_INT, HOST_WIDE_INT,
 364                                           enum machine_mode);
 365
 366 extern bool insn_operand_matches (enum insn_code icode, unsigned int opno,
 367                                   rtx operand);
 368
 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 {
 373   EXPAND_FIXED,
 374   EXPAND_OUTPUT,
 375   EXPAND_INPUT,
 376   EXPAND_CONVERT_TO,
 377   EXPAND_CONVERT_FROM,
 378   EXPAND_ADDRESS,
 379   EXPAND_INTEGER
 380 };
 381
 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;
 386
 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;
 390
 391   /* Unused; available for future use.  */
 392   unsigned int unused : 7;
 393
 394   /* The mode passed to the convert_*_operand function.  It has a
 395      type-dependent meaning.  */
 396   ENUM_BITFIELD (machine_mode) mode : 16;
 397
 398   /* The value of the operand.  */
 399   rtx value;
 400 };
 401
 402 /* Initialize OP with the given fields.  Initialise the other fields
 403    to their default values.  */
 404
 405 static inline void
 406 create_expand_operand (struct expand_operand *op,
 407                        enum expand_operand_type type,
 408                        rtx value, enum machine_mode mode,
 409                        bool unsigned_p)
 410 {
 411   op->type = type;
 412   op->unsigned_p = unsigned_p;
 413   op->unused = 0;
 414   op->mode = mode;
 415   op->value = value;
 416 }
 417
 418 /* Make OP describe an operand that must use rtx X, even if X is volatile.  */
 419
 420 static inline void
 421 create_fixed_operand (struct expand_operand *op, rtx x)
 422 {
 423   create_expand_operand (op, EXPAND_FIXED, x, VOIDmode, false);
 424 }
 425
 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.  */
 430
 431 static inline void
 432 create_output_operand (struct expand_operand *op, rtx x,
 433                        enum machine_mode mode)
 434 {
 435   create_expand_operand (op, EXPAND_OUTPUT, x, mode, false);
 436 }
 437
 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
 441    as an operand.  */
 442
 443 static inline void
 444 create_input_operand (struct expand_operand *op, rtx value,
 445                       enum machine_mode mode)
 446 {
 447   create_expand_operand (op, EXPAND_INPUT, value, mode, false);
 448 }
 449
 450 /* Like create_input_operand, except that VALUE must first be converted
 451    to mode MODE.  UNSIGNED_P says whether VALUE is unsigned.  */
 452
 453 static inline void
 454 create_convert_operand_to (struct expand_operand *op, rtx value,
 455                            enum machine_mode mode, bool unsigned_p)
 456 {
 457   create_expand_operand (op, EXPAND_CONVERT_TO, value, mode, unsigned_p);
 458 }
 459
 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.  */
 464
 465 static inline void
 466 create_convert_operand_from (struct expand_operand *op, rtx value,
 467                              enum machine_mode mode, bool unsigned_p)
 468 {
 469   create_expand_operand (op, EXPAND_CONVERT_FROM, value, mode, unsigned_p);
 470 }
 471
 472 extern void create_convert_operand_from_type (struct expand_operand *op,
 473                                               rtx value, tree type);
 474
 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.  */
 477
 478 static inline void
 479 create_address_operand (struct expand_operand *op, rtx value)
 480 {
 481   create_expand_operand (op, EXPAND_ADDRESS, value, Pmode, false);
 482 }
 483
 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.  */
 489
 490 static inline void
 491 create_integer_operand (struct expand_operand *op, HOST_WIDE_INT intval)
 492 {
 493   create_expand_operand (op, EXPAND_INTEGER, GEN_INT (intval), VOIDmode, false);
 494 }
 495
 496 extern bool valid_multiword_target_p (rtx);
 497
 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);
 511
 512 extern rtx prepare_operand (enum insn_code, rtx, int, enum machine_mode,
 513                             enum machine_mode, int);
 514
 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,
 519                                       enum machine_mode);
 520 extern void gen_unsigned_fixed_libfunc (optab, const char *, char,
 521                                         enum machine_mode);
 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,
 525                                       enum machine_mode);
 526 extern void gen_int_fp_signed_fixed_libfunc (optab, const char *, char,
 527                                              enum machine_mode);
 528 extern void gen_int_fixed_libfunc (optab, const char *, char,
 529                                    enum machine_mode);
 530 extern void gen_int_signed_fixed_libfunc (optab, const char *, char,
 531                                           enum machine_mode);
 532 extern void gen_int_unsigned_fixed_libfunc (optab, const char *, char,
 533                                             enum machine_mode);
 534
 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,
 542                                                     const char *,
 543                                                     enum machine_mode,
 544                                                     enum machine_mode);
 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 *,
 560                                           enum machine_mode,
 561                                           enum machine_mode);
 562 extern void init_tree_optimization_optabs (tree);
 563
 564 #endif /* GCC_OPTABS_H */