gcc/optabs.h

   1 /* Definitions for code generation pass of GNU compiler.
   2    Copyright (C) 2001, 2002, 2003, 2004 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 2, 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 COPYING.  If not, write to
  18 the Free Software Foundation, 59 Temple Place - Suite 330,
  19 Boston, MA 02111-1307, USA.  */
  20
  21 #ifndef GCC_OPTABS_H
  22 #define GCC_OPTABS_H
  23
  24 #include "insn-codes.h"
  25
  26 /* Optabs are tables saying how to generate insn bodies
  27    for various machine modes and numbers of operands.
  28    Each optab applies to one operation.
  29    For example, add_optab applies to addition.
  30
  31    The insn_code slot is the enum insn_code that says how to
  32    generate an insn for this operation on a particular machine mode.
  33    It is CODE_FOR_nothing if there is no such insn on the target machine.
  34
  35    The `lib_call' slot is the name of the library function that
  36    can be used to perform the operation.
  37
  38    A few optabs, such as move_optab and cmp_optab, are used
  39    by special code.  */
  40
  41 struct optab_handlers GTY(())
  42 {
  43   enum insn_code insn_code;
  44   rtx libfunc;
  45 };
  46
  47 struct optab GTY(())
  48 {
  49   enum rtx_code code;
  50   struct optab_handlers handlers[NUM_MACHINE_MODES];
  51 };
  52 typedef struct optab * optab;
  53
  54 /* A convert_optab is for some sort of conversion operation between
  55    modes.  The first array index is the destination mode, the second
  56    is the source mode.  */
  57 struct convert_optab GTY(())
  58 {
  59   enum rtx_code code;
  60   struct optab_handlers handlers[NUM_MACHINE_MODES][NUM_MACHINE_MODES];
  61 };
  62 typedef struct convert_optab *convert_optab;
  63
  64 /* Given an enum insn_code, access the function to construct
  65    the body of that kind of insn.  */
  66 #define GEN_FCN(CODE) (insn_data[CODE].genfun)
  67
  68 /* Enumeration of valid indexes into optab_table.  */
  69 enum optab_index
  70 {
  71   OTI_add,
  72   OTI_addv,
  73   OTI_sub,
  74   OTI_subv,
  75
  76   /* Signed and fp multiply */
  77   OTI_smul,
  78   OTI_smulv,
  79   /* Signed multiply, return high word */
  80   OTI_smul_highpart,
  81   OTI_umul_highpart,
  82   /* Signed multiply with result one machine mode wider than args */
  83   OTI_smul_widen,
  84   OTI_umul_widen,
  85
  86   /* Signed divide */
  87   OTI_sdiv,
  88   OTI_sdivv,
  89   /* Signed divide-and-remainder in one */
  90   OTI_sdivmod,
  91   OTI_udiv,
  92   OTI_udivmod,
  93   /* Signed remainder */
  94   OTI_smod,
  95   OTI_umod,
  96   /* Floating point remainder functions */
  97   OTI_fmod,
  98   OTI_drem,
  99   /* Convert float to integer in float fmt */
 100   OTI_ftrunc,
 101
 102   /* Logical and */
 103   OTI_and,
 104   /* Logical or */
 105   OTI_ior,
 106   /* Logical xor */
 107   OTI_xor,
 108
 109   /* Arithmetic shift left */
 110   OTI_ashl,
 111   /* Logical shift right */
 112   OTI_lshr,
 113   /* Arithmetic shift right */
 114   OTI_ashr,
 115   /* Rotate left */
 116   OTI_rotl,
 117   /* Rotate right */
 118   OTI_rotr,
 119   /* Signed and floating-point minimum value */
 120   OTI_smin,
 121   /* Signed and floating-point maximum value */
 122   OTI_smax,
 123   /* Unsigned minimum value */
 124   OTI_umin,
 125   /* Unsigned maximum value */
 126   OTI_umax,
 127   /* Power */
 128   OTI_pow,
 129   /* Arc tangent of y/x */
 130   OTI_atan2,
 131
 132   /* Move instruction.  */
 133   OTI_mov,
 134   /* Move, preserving high part of register.  */
 135   OTI_movstrict,
 136
 137   /* Unary operations */
 138   /* Negation */
 139   OTI_neg,
 140   OTI_negv,
 141   /* Abs value */
 142   OTI_abs,
 143   OTI_absv,
 144   /* Bitwise not */
 145   OTI_one_cmpl,
 146   /* Bit scanning and counting */
 147   OTI_ffs,
 148   OTI_clz,
 149   OTI_ctz,
 150   OTI_popcount,
 151   OTI_parity,
 152   /* Square root */
 153   OTI_sqrt,
 154   /* Sine-Cosine */
 155   OTI_sincos,
 156   /* Sine */
 157   OTI_sin,
 158   /* Inverse sine */
 159   OTI_asin,
 160   /* Cosine */
 161   OTI_cos,
 162   /* Inverse cosine */
 163   OTI_acos,
 164   /* Exponential */
 165   OTI_exp,
 166   /* Base-10 Exponential */
 167   OTI_exp10,
 168   /* Base-2 Exponential */
 169   OTI_exp2,
 170   /* Exponential - 1*/
 171   OTI_expm1,
 172   /* Radix-independent exponent */
 173   OTI_logb,
 174   OTI_ilogb,
 175   /* Natural Logarithm */
 176   OTI_log,
 177   /* Base-10 Logarithm */
 178   OTI_log10,
 179   /* Base-2 Logarithm */
 180   OTI_log2,
 181   /* logarithm of 1 plus argument */
 182   OTI_log1p,
 183   /* Rounding functions */
 184   OTI_floor,
 185   OTI_ceil,
 186   OTI_trunc,
 187   OTI_round,
 188   OTI_nearbyint,
 189   /* Tangent */
 190   OTI_tan,
 191   /* Inverse tangent */
 192   OTI_atan,
 193
 194   /* Compare insn; two operands.  */
 195   OTI_cmp,
 196   /* Used only for libcalls for unsigned comparisons.  */
 197   OTI_ucmp,
 198   /* tst insn; compare one operand against 0 */
 199   OTI_tst,
 200
 201   /* Floating point comparison optabs - used primarily for libfuncs */
 202   OTI_eq,
 203   OTI_ne,
 204   OTI_gt,
 205   OTI_ge,
 206   OTI_lt,
 207   OTI_le,
 208   OTI_unord,
 209
 210   /* String length */
 211   OTI_strlen,
 212
 213   /* Combined compare & jump/store flags/move operations.  */
 214   OTI_cbranch,
 215   OTI_cmov,
 216   OTI_cstore,
 217
 218   /* Push instruction.  */
 219   OTI_push,
 220
 221   /* Conditional add instruction.  */
 222   OTI_addcc,
 223
 224   /* Set specified field of vector operand.  */
 225   OTI_vec_set,
 226   /* Extract specified field of vector operand.  */
 227   OTI_vec_extract,
 228   /* Initialize vector operand.  */
 229   OTI_vec_init,
 230
 231   OTI_MAX
 232 };
 233
 234 extern GTY(()) optab optab_table[OTI_MAX];
 235
 236 #define add_optab (optab_table[OTI_add])
 237 #define sub_optab (optab_table[OTI_sub])
 238 #define smul_optab (optab_table[OTI_smul])
 239 #define addv_optab (optab_table[OTI_addv])
 240 #define subv_optab (optab_table[OTI_subv])
 241 #define smul_highpart_optab (optab_table[OTI_smul_highpart])
 242 #define umul_highpart_optab (optab_table[OTI_umul_highpart])
 243 #define smul_widen_optab (optab_table[OTI_smul_widen])
 244 #define umul_widen_optab (optab_table[OTI_umul_widen])
 245 #define sdiv_optab (optab_table[OTI_sdiv])
 246 #define smulv_optab (optab_table[OTI_smulv])
 247 #define sdivv_optab (optab_table[OTI_sdivv])
 248 #define sdivmod_optab (optab_table[OTI_sdivmod])
 249 #define udiv_optab (optab_table[OTI_udiv])
 250 #define udivmod_optab (optab_table[OTI_udivmod])
 251 #define smod_optab (optab_table[OTI_smod])
 252 #define umod_optab (optab_table[OTI_umod])
 253 #define fmod_optab (optab_table[OTI_fmod])
 254 #define drem_optab (optab_table[OTI_drem])
 255 #define ftrunc_optab (optab_table[OTI_ftrunc])
 256 #define and_optab (optab_table[OTI_and])
 257 #define ior_optab (optab_table[OTI_ior])
 258 #define xor_optab (optab_table[OTI_xor])
 259 #define ashl_optab (optab_table[OTI_ashl])
 260 #define lshr_optab (optab_table[OTI_lshr])
 261 #define ashr_optab (optab_table[OTI_ashr])
 262 #define rotl_optab (optab_table[OTI_rotl])
 263 #define rotr_optab (optab_table[OTI_rotr])
 264 #define smin_optab (optab_table[OTI_smin])
 265 #define smax_optab (optab_table[OTI_smax])
 266 #define umin_optab (optab_table[OTI_umin])
 267 #define umax_optab (optab_table[OTI_umax])
 268 #define pow_optab (optab_table[OTI_pow])
 269 #define atan2_optab (optab_table[OTI_atan2])
 270
 271 #define mov_optab (optab_table[OTI_mov])
 272 #define movstrict_optab (optab_table[OTI_movstrict])
 273
 274 #define neg_optab (optab_table[OTI_neg])
 275 #define negv_optab (optab_table[OTI_negv])
 276 #define abs_optab (optab_table[OTI_abs])
 277 #define absv_optab (optab_table[OTI_absv])
 278 #define one_cmpl_optab (optab_table[OTI_one_cmpl])
 279 #define ffs_optab (optab_table[OTI_ffs])
 280 #define clz_optab (optab_table[OTI_clz])
 281 #define ctz_optab (optab_table[OTI_ctz])
 282 #define popcount_optab (optab_table[OTI_popcount])
 283 #define parity_optab (optab_table[OTI_parity])
 284 #define sqrt_optab (optab_table[OTI_sqrt])
 285 #define sincos_optab (optab_table[OTI_sincos])
 286 #define sin_optab (optab_table[OTI_sin])
 287 #define asin_optab (optab_table[OTI_asin])
 288 #define cos_optab (optab_table[OTI_cos])
 289 #define acos_optab (optab_table[OTI_acos])
 290 #define exp_optab (optab_table[OTI_exp])
 291 #define exp10_optab (optab_table[OTI_exp10])
 292 #define exp2_optab (optab_table[OTI_exp2])
 293 #define expm1_optab (optab_table[OTI_expm1])
 294 #define logb_optab (optab_table[OTI_logb])
 295 #define ilogb_optab (optab_table[OTI_ilogb])
 296 #define log_optab (optab_table[OTI_log])
 297 #define log10_optab (optab_table[OTI_log10])
 298 #define log2_optab (optab_table[OTI_log2])
 299 #define log1p_optab (optab_table[OTI_log1p])
 300 #define floor_optab (optab_table[OTI_floor])
 301 #define ceil_optab (optab_table[OTI_ceil])
 302 #define btrunc_optab (optab_table[OTI_trunc])
 303 #define round_optab (optab_table[OTI_round])
 304 #define nearbyint_optab (optab_table[OTI_nearbyint])
 305 #define tan_optab (optab_table[OTI_tan])
 306 #define atan_optab (optab_table[OTI_atan])
 307
 308 #define cmp_optab (optab_table[OTI_cmp])
 309 #define ucmp_optab (optab_table[OTI_ucmp])
 310 #define tst_optab (optab_table[OTI_tst])
 311
 312 #define eq_optab (optab_table[OTI_eq])
 313 #define ne_optab (optab_table[OTI_ne])
 314 #define gt_optab (optab_table[OTI_gt])
 315 #define ge_optab (optab_table[OTI_ge])
 316 #define lt_optab (optab_table[OTI_lt])
 317 #define le_optab (optab_table[OTI_le])
 318 #define unord_optab (optab_table[OTI_unord])
 319
 320 #define strlen_optab (optab_table[OTI_strlen])
 321
 322 #define cbranch_optab (optab_table[OTI_cbranch])
 323 #define cmov_optab (optab_table[OTI_cmov])
 324 #define cstore_optab (optab_table[OTI_cstore])
 325 #define push_optab (optab_table[OTI_push])
 326 #define addcc_optab (optab_table[OTI_addcc])
 327
 328 #define vec_set_optab (optab_table[OTI_vec_set])
 329 #define vec_extract_optab (optab_table[OTI_vec_extract])
 330 #define vec_init_optab (optab_table[OTI_vec_init])
 331
 332 /* Conversion optabs have their own table and indexes.  */
 333 enum convert_optab_index
 334 {
 335   CTI_sext,
 336   CTI_zext,
 337   CTI_trunc,
 338
 339   CTI_sfix,
 340   CTI_ufix,
 341
 342   CTI_sfixtrunc,
 343   CTI_ufixtrunc,
 344
 345   CTI_sfloat,
 346   CTI_ufloat,
 347
 348   CTI_MAX
 349 };
 350
 351 extern GTY(()) convert_optab convert_optab_table[CTI_MAX];
 352
 353 #define sext_optab (convert_optab_table[CTI_sext])
 354 #define zext_optab (convert_optab_table[CTI_zext])
 355 #define trunc_optab (convert_optab_table[CTI_trunc])
 356 #define sfix_optab (convert_optab_table[CTI_sfix])
 357 #define ufix_optab (convert_optab_table[CTI_ufix])
 358 #define sfixtrunc_optab (convert_optab_table[CTI_sfixtrunc])
 359 #define ufixtrunc_optab (convert_optab_table[CTI_ufixtrunc])
 360 #define sfloat_optab (convert_optab_table[CTI_sfloat])
 361 #define ufloat_optab (convert_optab_table[CTI_ufloat])
 362
 363 /* These arrays record the insn_code of insns that may be needed to
 364    perform input and output reloads of special objects.  They provide a
 365    place to pass a scratch register.  */
 366 extern enum insn_code reload_in_optab[NUM_MACHINE_MODES];
 367 extern enum insn_code reload_out_optab[NUM_MACHINE_MODES];
 368
 369 /* Contains the optab used for each rtx code.  */
 370 extern GTY(()) optab code_to_optab[NUM_RTX_CODE + 1];
 371
 372 \f
 373 typedef rtx (*rtxfun) (rtx);
 374
 375 /* Indexed by the rtx-code for a conditional (eg. EQ, LT,...)
 376    gives the gen_function to make a branch to test that condition.  */
 377
 378 extern rtxfun bcc_gen_fctn[NUM_RTX_CODE];
 379
 380 /* Indexed by the rtx-code for a conditional (eg. EQ, LT,...)
 381    gives the insn code to make a store-condition insn
 382    to test that condition.  */
 383
 384 extern enum insn_code setcc_gen_code[NUM_RTX_CODE];
 385
 386 #ifdef HAVE_conditional_move
 387 /* Indexed by the machine mode, gives the insn code to make a conditional
 388    move insn.  */
 389
 390 extern enum insn_code movcc_gen_code[NUM_MACHINE_MODES];
 391 #endif
 392
 393 /* This array records the insn_code of insns to perform block moves.  */
 394 extern enum insn_code movmem_optab[NUM_MACHINE_MODES];
 395
 396 /* This array records the insn_code of insns to perform block clears.  */
 397 extern enum insn_code clrmem_optab[NUM_MACHINE_MODES];
 398
 399 /* These arrays record the insn_code of two different kinds of insns
 400    to perform block compares.  */
 401 extern enum insn_code cmpstr_optab[NUM_MACHINE_MODES];
 402 extern enum insn_code cmpmem_optab[NUM_MACHINE_MODES];
 403
 404 /* Define functions given in optabs.c.  */
 405
 406 /* Expand a binary operation given optab and rtx operands.  */
 407 extern rtx expand_binop (enum machine_mode, optab, rtx, rtx, rtx, int,
 408                          enum optab_methods);
 409
 410 /* Expand a binary operation with both signed and unsigned forms.  */
 411 extern rtx sign_expand_binop (enum machine_mode, optab, optab, rtx, rtx,
 412                               rtx, int, enum optab_methods);
 413
 414 /* Generate code to perform an operation on one operand with two results.  */
 415 extern int expand_twoval_unop (optab, rtx, rtx, rtx, int);
 416
 417 /* Generate code to perform an operation on two operands with two results.  */
 418 extern int expand_twoval_binop (optab, rtx, rtx, rtx, rtx, int);
 419
 420 /* Generate code to perform an operation on two operands with two
 421    results, using a library function.  */
 422 extern bool expand_twoval_binop_libfunc (optab, rtx, rtx, rtx, rtx,
 423                                          enum rtx_code);
 424
 425 /* Expand a unary arithmetic operation given optab rtx operand.  */
 426 extern rtx expand_unop (enum machine_mode, optab, rtx, rtx, int);
 427
 428 /* Expand the absolute value operation.  */
 429 extern rtx expand_abs_nojump (enum machine_mode, rtx, rtx, int);
 430 extern rtx expand_abs (enum machine_mode, rtx, rtx, int, int);
 431
 432 /* Expand the complex absolute value operation.  */
 433 extern rtx expand_complex_abs (enum machine_mode, rtx, rtx, int);
 434
 435 /* Generate an instruction with a given INSN_CODE with an output and
 436    an input.  */
 437 extern void emit_unop_insn (int, rtx, rtx, enum rtx_code);
 438
 439 /* Emit code to perform a series of operations on a multi-word quantity, one
 440    word at a time.  */
 441 extern rtx emit_no_conflict_block (rtx, rtx, rtx, rtx, rtx);
 442
 443 /* Emit one rtl insn to compare two rtx's.  */
 444 extern void emit_cmp_insn (rtx, rtx, enum rtx_code, rtx, enum machine_mode,
 445                            int);
 446
 447 /* The various uses that a comparison can have; used by can_compare_p:
 448    jumps, conditional moves, store flag operations.  */
 449 enum can_compare_purpose
 450 {
 451   ccp_jump,
 452   ccp_cmov,
 453   ccp_store_flag
 454 };
 455
 456 /* Return the optab used for computing the given operation on the type
 457    given by the second argument.  */
 458 extern optab optab_for_tree_code (enum tree_code, tree);
 459
 460 /* Nonzero if a compare of mode MODE can be done straightforwardly
 461    (without splitting it into pieces).  */
 462 extern int can_compare_p (enum rtx_code, enum machine_mode,
 463                           enum can_compare_purpose);
 464
 465 extern rtx prepare_operand (int, rtx, int, enum machine_mode,
 466                             enum machine_mode, int);
 467
 468 /* Return the INSN_CODE to use for an extend operation.  */
 469 extern enum insn_code can_extend_p (enum machine_mode, enum machine_mode, int);
 470
 471 /* Generate the body of an insn to extend Y (with mode MFROM)
 472    into X (with mode MTO).  Do zero-extension if UNSIGNEDP is nonzero.  */
 473 extern rtx gen_extend_insn (rtx, rtx, enum machine_mode,
 474                             enum machine_mode, int);
 475
 476 /* Initialize the tables that control conversion between fixed and
 477    floating values.  */
 478 extern void init_fixtab (void);
 479 extern void init_floattab (void);
 480
 481 /* Call this to reset the function entry for one optab.  */
 482 extern void set_optab_libfunc (optab, enum machine_mode, const char *);
 483 extern void set_conv_libfunc (convert_optab, enum machine_mode,
 484                               enum machine_mode, const char *);
 485
 486 /* Generate code for a FLOAT_EXPR.  */
 487 extern void expand_float (rtx, rtx, int);
 488
 489 /* Generate code for a FIX_EXPR.  */
 490 extern void expand_fix (rtx, rtx, int);
 491
 492 #endif /* GCC_OPTABS_H */