gcc/optabs.h

   1 /* Definitions for code generation pass of GNU compiler.
   2    Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009,
   3    2010, 2012  Free Software Foundation, Inc.
   4
   5 This file is part of GCC.
   6
   7 GCC is free software; you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 3, or (at your option)
  10 any later version.
  11
  12 GCC is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with GCC; see the file COPYING3.  If not see
  19 <http://www.gnu.org/licenses/>.  */
  20
  21 #ifndef GCC_OPTABS_H
  22 #define GCC_OPTABS_H
  23
  24 #include "insn-codes.h"
  25 #include "insn-opinit.h"
  26
  27 typedef enum optab_tag optab;
  28 typedef enum optab_tag convert_optab;
  29 typedef enum optab_tag direct_optab;
  30
  31 struct optab_libcall_d
  32 {
  33   char libcall_suffix;
  34   const char *libcall_basename;
  35   void (*libcall_gen) (optab, const char *name,
  36                        char suffix, enum machine_mode);
  37 };
  38
  39 struct convert_optab_libcall_d
  40 {
  41   const char *libcall_basename;
  42   void (*libcall_gen) (convert_optab, const char *name,
  43                        enum machine_mode, enum machine_mode);
  44 };
  45
  46 /* Given an enum insn_code, access the function to construct
  47    the body of that kind of insn.  */
  48 #define GEN_FCN(CODE) (insn_data[CODE].genfun)
  49
  50 /* Contains the optab used for each rtx code, and vice-versa.  */
  51 extern const optab code_to_optab_[NUM_RTX_CODE];
  52 extern const enum rtx_code optab_to_code_[NUM_OPTABS];
  53
  54 static inline optab
  55 code_to_optab (enum rtx_code code)
  56 {
  57   return code_to_optab_[code];
  58 }
  59
  60 static inline enum rtx_code
  61 optab_to_code (optab op)
  62 {
  63   return optab_to_code_[op];
  64 }
  65
  66 extern const struct convert_optab_libcall_d convlib_def[NUM_CONVLIB_OPTABS];
  67 extern const struct optab_libcall_d normlib_def[NUM_NORMLIB_OPTABS];
  68
  69 /* Returns the active icode for the given (encoded) optab.  */
  70 extern enum insn_code raw_optab_handler (unsigned);
  71 extern bool swap_optab_enable (optab, enum machine_mode, bool);
  72
  73 /* Target-dependent globals.  */
  74 struct target_optabs {
  75   /* Patterns that are used by optabs that are enabled for this target.  */
  76   bool pat_enable[NUM_OPTAB_PATTERNS];
  77 };
  78
  79 extern struct target_optabs default_target_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 /* The various uses that a comparison can have; used by can_compare_p:
 164    jumps, conditional moves, store flag operations.  */
 165 enum can_compare_purpose
 166 {
 167   ccp_jump,
 168   ccp_cmov,
 169   ccp_store_flag
 170 };
 171
 172 /* Nonzero if a compare of mode MODE can be done straightforwardly
 173    (without splitting it into pieces).  */
 174 extern int can_compare_p (enum rtx_code, enum machine_mode,
 175                           enum can_compare_purpose);
 176
 177 /* Return the INSN_CODE to use for an extend operation.  */
 178 extern enum insn_code can_extend_p (enum machine_mode, enum machine_mode, int);
 179
 180 /* Generate the body of an insn to extend Y (with mode MFROM)
 181    into X (with mode MTO).  Do zero-extension if UNSIGNEDP is nonzero.  */
 182 extern rtx gen_extend_insn (rtx, rtx, enum machine_mode,
 183                             enum machine_mode, int);
 184
 185 /* Call this to reset the function entry for one optab.  */
 186 extern void set_optab_libfunc (optab, enum machine_mode, const char *);
 187 extern void set_conv_libfunc (convert_optab, enum machine_mode,
 188                               enum machine_mode, const char *);
 189
 190 /* Call this to install all of the __sync libcalls up to size MAX.  */
 191 extern void init_sync_libfuncs (int max);
 192
 193 /* Generate code for a FIXED_CONVERT_EXPR.  */
 194 extern void expand_fixed_convert (rtx, rtx, int, int);
 195
 196 /* Generate code for a FLOAT_EXPR.  */
 197 extern void expand_float (rtx, rtx, int);
 198
 199 /* Return the insn_code for a FLOAT_EXPR.  */
 200 enum insn_code can_float_p (enum machine_mode, enum machine_mode, int);
 201
 202 /* Return true if there is an inline compare and swap pattern.  */
 203 extern bool can_compare_and_swap_p (enum machine_mode, bool);
 204
 205 /* Return true if there is an inline atomic exchange pattern.  */
 206 extern bool can_atomic_exchange_p (enum machine_mode, bool);
 207
 208 /* Generate code for a compare and swap.  */
 209 extern bool expand_atomic_compare_and_swap (rtx *, rtx *, rtx, rtx, rtx, bool,
 210                                             enum memmodel, enum memmodel);
 211
 212 /* Generate memory barriers.  */
 213 extern void expand_mem_thread_fence (enum memmodel);
 214 extern void expand_mem_signal_fence (enum memmodel);
 215
 216 /* Check whether an operation represented by the code CODE is a
 217    convert operation that is supported by the target platform in
 218    vector form */
 219 bool supportable_convert_operation (enum tree_code, tree, tree, tree *,
 220                                     enum tree_code *);
 221
 222 /* Generate code for a FIX_EXPR.  */
 223 extern void expand_fix (rtx, rtx, int);
 224
 225 /* Generate code for float to integral conversion.  */
 226 extern bool expand_sfix_optab (rtx, rtx, convert_optab);
 227
 228 /* Generate code for a widening multiply.  */
 229 extern rtx expand_widening_mult (enum machine_mode, rtx, rtx, rtx, int, optab);
 230
 231 /* Return tree if target supports vector operations for COND_EXPR.  */
 232 bool expand_vec_cond_expr_p (tree, tree);
 233
 234 /* Generate code for VEC_COND_EXPR.  */
 235 extern rtx expand_vec_cond_expr (tree, tree, tree, tree, rtx);
 236 /* Generate code for VEC_LSHIFT_EXPR and VEC_RSHIFT_EXPR.  */
 237 extern rtx expand_vec_shift_expr (sepops, rtx);
 238
 239 /* Return tree if target supports vector operations for VEC_PERM_EXPR.  */
 240 extern bool can_vec_perm_p (enum machine_mode, bool, const unsigned char *);
 241
 242 /* Generate code for VEC_PERM_EXPR.  */
 243 extern rtx expand_vec_perm (enum machine_mode, rtx, rtx, rtx, rtx);
 244
 245 /* Return non-zero if target supports a given highpart multiplication.  */
 246 extern int can_mult_highpart_p (enum machine_mode, bool);
 247
 248 /* Generate code for MULT_HIGHPART_EXPR.  */
 249 extern rtx expand_mult_highpart (enum machine_mode, rtx, rtx, rtx, bool);
 250
 251 /* Return the insn used to implement mode MODE of OP, or CODE_FOR_nothing
 252    if the target does not have such an insn.  */
 253
 254 static inline enum insn_code
 255 optab_handler (optab op, enum machine_mode mode)
 256 {
 257   unsigned scode = (op << 16) | mode;
 258   gcc_assert (op > LAST_CONV_OPTAB);
 259   return raw_optab_handler (scode);
 260 }
 261
 262 /* Return the insn used to perform conversion OP from mode FROM_MODE
 263    to mode TO_MODE; return CODE_FOR_nothing if the target does not have
 264    such an insn.  */
 265
 266 static inline enum insn_code
 267 convert_optab_handler (convert_optab op, enum machine_mode to_mode,
 268                        enum machine_mode from_mode)
 269 {
 270   unsigned scode = (op << 16) | (from_mode << 8) | to_mode;
 271   gcc_assert (op > unknown_optab && op <= LAST_CONV_OPTAB);
 272   return raw_optab_handler (scode);
 273 }
 274
 275 /* Like optab_handler, but for widening_operations that have a
 276    TO_MODE and a FROM_MODE.  */
 277
 278 static inline enum insn_code
 279 widening_optab_handler (optab op, enum machine_mode to_mode,
 280                         enum machine_mode from_mode)
 281 {
 282   unsigned scode = (op << 16) | to_mode;
 283   if (to_mode != from_mode && from_mode != VOIDmode)
 284     {
 285       /* ??? Why does find_widening_optab_handler_and_mode attempt to
 286          widen things that can't be widened?  E.g. add_optab... */
 287       if (op > LAST_CONV_OPTAB)
 288         return CODE_FOR_nothing;
 289       scode |= from_mode << 8;
 290     }
 291   return raw_optab_handler (scode);
 292 }
 293
 294 /* Return the insn used to implement mode MODE of OP, or CODE_FOR_nothing
 295    if the target does not have such an insn.  */
 296
 297 static inline enum insn_code
 298 direct_optab_handler (direct_optab op, enum machine_mode mode)
 299 {
 300   return optab_handler (op, mode);
 301 }
 302
 303 /* Return true if UNOPTAB is for a trapping-on-overflow operation.  */
 304
 305 static inline bool
 306 trapv_unoptab_p (optab unoptab)
 307 {
 308   return (unoptab == negv_optab
 309           || unoptab == absv_optab);
 310 }
 311
 312 /* Return true if BINOPTAB is for a trapping-on-overflow operation.  */
 313
 314 static inline bool
 315 trapv_binoptab_p (optab binoptab)
 316 {
 317   return (binoptab == addv_optab
 318           || binoptab == subv_optab
 319           || binoptab == smulv_optab);
 320 }
 321
 322 extern rtx optab_libfunc (optab optab, enum machine_mode mode);
 323 extern rtx convert_optab_libfunc (convert_optab optab, enum machine_mode mode1,
 324                                   enum machine_mode mode2);
 325
 326 extern bool insn_operand_matches (enum insn_code icode, unsigned int opno,
 327                                   rtx operand);
 328
 329 /* Describes the type of an expand_operand.  Each value is associated
 330    with a create_*_operand function; see the comments above those
 331    functions for details.  */
 332 enum expand_operand_type {
 333   EXPAND_FIXED,
 334   EXPAND_OUTPUT,
 335   EXPAND_INPUT,
 336   EXPAND_CONVERT_TO,
 337   EXPAND_CONVERT_FROM,
 338   EXPAND_ADDRESS,
 339   EXPAND_INTEGER
 340 };
 341
 342 /* Information about an operand for instruction expansion.  */
 343 struct expand_operand {
 344   /* The type of operand.  */
 345   ENUM_BITFIELD (expand_operand_type) type : 8;
 346
 347   /* True if any conversion should treat VALUE as being unsigned
 348      rather than signed.  Only meaningful for certain types.  */
 349   unsigned int unsigned_p : 1;
 350
 351   /* Unused; available for future use.  */
 352   unsigned int unused : 7;
 353
 354   /* The mode passed to the convert_*_operand function.  It has a
 355      type-dependent meaning.  */
 356   ENUM_BITFIELD (machine_mode) mode : 16;
 357
 358   /* The value of the operand.  */
 359   rtx value;
 360 };
 361
 362 /* Initialize OP with the given fields.  Initialise the other fields
 363    to their default values.  */
 364
 365 static inline void
 366 create_expand_operand (struct expand_operand *op,
 367                        enum expand_operand_type type,
 368                        rtx value, enum machine_mode mode,
 369                        bool unsigned_p)
 370 {
 371   op->type = type;
 372   op->unsigned_p = unsigned_p;
 373   op->unused = 0;
 374   op->mode = mode;
 375   op->value = value;
 376 }
 377
 378 /* Make OP describe an operand that must use rtx X, even if X is volatile.  */
 379
 380 static inline void
 381 create_fixed_operand (struct expand_operand *op, rtx x)
 382 {
 383   create_expand_operand (op, EXPAND_FIXED, x, VOIDmode, false);
 384 }
 385
 386 /* Make OP describe an output operand that must have mode MODE.
 387    X, if nonnull, is a suggestion for where the output should be stored.
 388    It is OK for VALUE to be inconsistent with MODE, although it will just
 389    be ignored in that case.  */
 390
 391 static inline void
 392 create_output_operand (struct expand_operand *op, rtx x,
 393                        enum machine_mode mode)
 394 {
 395   create_expand_operand (op, EXPAND_OUTPUT, x, mode, false);
 396 }
 397
 398 /* Make OP describe an input operand that must have mode MODE and
 399    value VALUE; MODE cannot be VOIDmode.  The backend may request that
 400    VALUE be copied into a different kind of rtx before being passed
 401    as an operand.  */
 402
 403 static inline void
 404 create_input_operand (struct expand_operand *op, rtx value,
 405                       enum machine_mode mode)
 406 {
 407   create_expand_operand (op, EXPAND_INPUT, value, mode, false);
 408 }
 409
 410 /* Like create_input_operand, except that VALUE must first be converted
 411    to mode MODE.  UNSIGNED_P says whether VALUE is unsigned.  */
 412
 413 static inline void
 414 create_convert_operand_to (struct expand_operand *op, rtx value,
 415                            enum machine_mode mode, bool unsigned_p)
 416 {
 417   create_expand_operand (op, EXPAND_CONVERT_TO, value, mode, unsigned_p);
 418 }
 419
 420 /* Make OP describe an input operand that should have the same value
 421    as VALUE, after any mode conversion that the backend might request.
 422    If VALUE is a CONST_INT, it should be treated as having mode MODE.
 423    UNSIGNED_P says whether VALUE is unsigned.  */
 424
 425 static inline void
 426 create_convert_operand_from (struct expand_operand *op, rtx value,
 427                              enum machine_mode mode, bool unsigned_p)
 428 {
 429   create_expand_operand (op, EXPAND_CONVERT_FROM, value, mode, unsigned_p);
 430 }
 431
 432 extern void create_convert_operand_from_type (struct expand_operand *op,
 433                                               rtx value, tree type);
 434
 435 /* Make OP describe an input Pmode address operand.  VALUE is the value
 436    of the address, but it may need to be converted to Pmode first.  */
 437
 438 static inline void
 439 create_address_operand (struct expand_operand *op, rtx value)
 440 {
 441   create_expand_operand (op, EXPAND_ADDRESS, value, Pmode, false);
 442 }
 443
 444 /* Make OP describe an input operand that has value INTVAL and that has
 445    no inherent mode.  This function should only be used for operands that
 446    are always expand-time constants.  The backend may request that INTVAL
 447    be copied into a different kind of rtx, but it must specify the mode
 448    of that rtx if so.  */
 449
 450 static inline void
 451 create_integer_operand (struct expand_operand *op, HOST_WIDE_INT intval)
 452 {
 453   create_expand_operand (op, EXPAND_INTEGER, GEN_INT (intval), VOIDmode, false);
 454 }
 455
 456 extern bool valid_multiword_target_p (rtx);
 457
 458 extern bool maybe_legitimize_operands (enum insn_code icode,
 459                                        unsigned int opno, unsigned int nops,
 460                                        struct expand_operand *ops);
 461 extern rtx maybe_gen_insn (enum insn_code icode, unsigned int nops,
 462                            struct expand_operand *ops);
 463 extern bool maybe_expand_insn (enum insn_code icode, unsigned int nops,
 464                                struct expand_operand *ops);
 465 extern bool maybe_expand_jump_insn (enum insn_code icode, unsigned int nops,
 466                                     struct expand_operand *ops);
 467 extern void expand_insn (enum insn_code icode, unsigned int nops,
 468                          struct expand_operand *ops);
 469 extern void expand_jump_insn (enum insn_code icode, unsigned int nops,
 470                               struct expand_operand *ops);
 471
 472 extern rtx prepare_operand (enum insn_code, rtx, int, enum machine_mode,
 473                             enum machine_mode, int);
 474
 475 extern void gen_int_libfunc (optab, const char *, char, enum machine_mode);
 476 extern void gen_fp_libfunc (optab, const char *, char, enum machine_mode);
 477 extern void gen_fixed_libfunc (optab, const char *, char, enum machine_mode);
 478 extern void gen_signed_fixed_libfunc (optab, const char *, char,
 479                                       enum machine_mode);
 480 extern void gen_unsigned_fixed_libfunc (optab, const char *, char,
 481                                         enum machine_mode);
 482 extern void gen_int_fp_libfunc (optab, const char *, char, enum machine_mode);
 483 extern void gen_intv_fp_libfunc (optab, const char *, char, enum machine_mode);
 484 extern void gen_int_fp_fixed_libfunc (optab, const char *, char,
 485                                       enum machine_mode);
 486 extern void gen_int_fp_signed_fixed_libfunc (optab, const char *, char,
 487                                              enum machine_mode);
 488 extern void gen_int_fixed_libfunc (optab, const char *, char,
 489                                    enum machine_mode);
 490 extern void gen_int_signed_fixed_libfunc (optab, const char *, char,
 491                                           enum machine_mode);
 492 extern void gen_int_unsigned_fixed_libfunc (optab, const char *, char,
 493                                             enum machine_mode);
 494
 495 extern void gen_interclass_conv_libfunc (convert_optab, const char *,
 496                                          enum machine_mode, enum machine_mode);
 497 extern void gen_int_to_fp_conv_libfunc (convert_optab, const char *,
 498                                         enum machine_mode, enum machine_mode);
 499 extern void gen_ufloat_conv_libfunc (convert_optab, const char *,
 500                                      enum machine_mode, enum machine_mode);
 501 extern void gen_int_to_fp_nondecimal_conv_libfunc  (convert_optab,
 502                                                     const char *,
 503                                                     enum machine_mode,
 504                                                     enum machine_mode);
 505 extern void gen_fp_to_int_conv_libfunc (convert_optab, const char *,
 506                                         enum machine_mode, enum machine_mode);
 507 extern void gen_intraclass_conv_libfunc (convert_optab, const char *,
 508                                          enum machine_mode, enum machine_mode);
 509 extern void gen_trunc_conv_libfunc (convert_optab, const char *,
 510                                     enum machine_mode, enum machine_mode);
 511 extern void gen_extend_conv_libfunc (convert_optab, const char *,
 512                                      enum machine_mode, enum machine_mode);
 513 extern void gen_fract_conv_libfunc (convert_optab, const char *,
 514                                     enum machine_mode, enum machine_mode);
 515 extern void gen_fractuns_conv_libfunc (convert_optab, const char *,
 516                                        enum machine_mode, enum machine_mode);
 517 extern void gen_satfract_conv_libfunc (convert_optab, const char *,
 518                                        enum machine_mode, enum machine_mode);
 519 extern void gen_satfractuns_conv_libfunc (convert_optab, const char *,
 520                                           enum machine_mode,
 521                                           enum machine_mode);
 522
 523 #endif /* GCC_OPTABS_H */