OSDN Git Service

PR other/21052
[pf3gnuchains/gcc-fork.git] / gcc / optabs.h
1 /* Definitions for code generation pass of GNU compiler.
2    Copyright (C) 2001, 2002, 2003, 2004, 2005 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   /* Move, with a misaligned memory.  */
137   OTI_movmisalign,
138
139   /* Unary operations */
140   /* Negation */
141   OTI_neg,
142   OTI_negv,
143   /* Abs value */
144   OTI_abs,
145   OTI_absv,
146   /* Bitwise not */
147   OTI_one_cmpl,
148   /* Bit scanning and counting */
149   OTI_ffs,
150   OTI_clz,
151   OTI_ctz,
152   OTI_popcount,
153   OTI_parity,
154   /* Square root */
155   OTI_sqrt,
156   /* Sine-Cosine */
157   OTI_sincos,
158   /* Sine */
159   OTI_sin,
160   /* Inverse sine */
161   OTI_asin,
162   /* Cosine */
163   OTI_cos,
164   /* Inverse cosine */
165   OTI_acos,
166   /* Exponential */
167   OTI_exp,
168   /* Base-10 Exponential */
169   OTI_exp10,
170   /* Base-2 Exponential */
171   OTI_exp2,
172   /* Exponential - 1*/
173   OTI_expm1,
174   /* Load exponent of a floating point number */
175   OTI_ldexp,
176   /* Radix-independent exponent */
177   OTI_logb,
178   OTI_ilogb,
179   /* Natural Logarithm */
180   OTI_log,
181   /* Base-10 Logarithm */
182   OTI_log10,
183   /* Base-2 Logarithm */
184   OTI_log2,
185   /* logarithm of 1 plus argument */
186   OTI_log1p,
187   /* Rounding functions */
188   OTI_floor,
189   OTI_lfloor,
190   OTI_ceil,
191   OTI_lceil,
192   OTI_btrunc,
193   OTI_round,
194   OTI_nearbyint,
195   OTI_rint,
196   OTI_lrint,
197   /* Tangent */
198   OTI_tan,
199   /* Inverse tangent */
200   OTI_atan,
201   /* Copy sign */
202   OTI_copysign,
203
204   /* Compare insn; two operands.  */
205   OTI_cmp,
206   /* Used only for libcalls for unsigned comparisons.  */
207   OTI_ucmp,
208   /* tst insn; compare one operand against 0 */
209   OTI_tst,
210
211   /* Floating point comparison optabs - used primarily for libfuncs */
212   OTI_eq,
213   OTI_ne,
214   OTI_gt,
215   OTI_ge,
216   OTI_lt,
217   OTI_le,
218   OTI_unord,
219
220   /* String length */
221   OTI_strlen,
222
223   /* Combined compare & jump/store flags/move operations.  */
224   OTI_cbranch,
225   OTI_cmov,
226   OTI_cstore,
227
228   /* Push instruction.  */
229   OTI_push,
230
231   /* Conditional add instruction.  */
232   OTI_addcc,
233
234   /* Set specified field of vector operand.  */
235   OTI_vec_set,
236   /* Extract specified field of vector operand.  */
237   OTI_vec_extract,
238   /* Initialize vector operand.  */
239   OTI_vec_init,
240   /* Extract specified elements from vectors, for vector load.  */
241   OTI_vec_realign_load,
242
243   /* Perform a raise to the power of integer.  */
244   OTI_powi,
245
246   OTI_MAX
247 };
248
249 extern GTY(()) optab optab_table[OTI_MAX];
250
251 #define add_optab (optab_table[OTI_add])
252 #define sub_optab (optab_table[OTI_sub])
253 #define smul_optab (optab_table[OTI_smul])
254 #define addv_optab (optab_table[OTI_addv])
255 #define subv_optab (optab_table[OTI_subv])
256 #define smul_highpart_optab (optab_table[OTI_smul_highpart])
257 #define umul_highpart_optab (optab_table[OTI_umul_highpart])
258 #define smul_widen_optab (optab_table[OTI_smul_widen])
259 #define umul_widen_optab (optab_table[OTI_umul_widen])
260 #define sdiv_optab (optab_table[OTI_sdiv])
261 #define smulv_optab (optab_table[OTI_smulv])
262 #define sdivv_optab (optab_table[OTI_sdivv])
263 #define sdivmod_optab (optab_table[OTI_sdivmod])
264 #define udiv_optab (optab_table[OTI_udiv])
265 #define udivmod_optab (optab_table[OTI_udivmod])
266 #define smod_optab (optab_table[OTI_smod])
267 #define umod_optab (optab_table[OTI_umod])
268 #define fmod_optab (optab_table[OTI_fmod])
269 #define drem_optab (optab_table[OTI_drem])
270 #define ftrunc_optab (optab_table[OTI_ftrunc])
271 #define and_optab (optab_table[OTI_and])
272 #define ior_optab (optab_table[OTI_ior])
273 #define xor_optab (optab_table[OTI_xor])
274 #define ashl_optab (optab_table[OTI_ashl])
275 #define lshr_optab (optab_table[OTI_lshr])
276 #define ashr_optab (optab_table[OTI_ashr])
277 #define rotl_optab (optab_table[OTI_rotl])
278 #define rotr_optab (optab_table[OTI_rotr])
279 #define smin_optab (optab_table[OTI_smin])
280 #define smax_optab (optab_table[OTI_smax])
281 #define umin_optab (optab_table[OTI_umin])
282 #define umax_optab (optab_table[OTI_umax])
283 #define pow_optab (optab_table[OTI_pow])
284 #define atan2_optab (optab_table[OTI_atan2])
285
286 #define mov_optab (optab_table[OTI_mov])
287 #define movstrict_optab (optab_table[OTI_movstrict])
288 #define movmisalign_optab (optab_table[OTI_movmisalign])
289
290 #define neg_optab (optab_table[OTI_neg])
291 #define negv_optab (optab_table[OTI_negv])
292 #define abs_optab (optab_table[OTI_abs])
293 #define absv_optab (optab_table[OTI_absv])
294 #define one_cmpl_optab (optab_table[OTI_one_cmpl])
295 #define ffs_optab (optab_table[OTI_ffs])
296 #define clz_optab (optab_table[OTI_clz])
297 #define ctz_optab (optab_table[OTI_ctz])
298 #define popcount_optab (optab_table[OTI_popcount])
299 #define parity_optab (optab_table[OTI_parity])
300 #define sqrt_optab (optab_table[OTI_sqrt])
301 #define sincos_optab (optab_table[OTI_sincos])
302 #define sin_optab (optab_table[OTI_sin])
303 #define asin_optab (optab_table[OTI_asin])
304 #define cos_optab (optab_table[OTI_cos])
305 #define acos_optab (optab_table[OTI_acos])
306 #define exp_optab (optab_table[OTI_exp])
307 #define exp10_optab (optab_table[OTI_exp10])
308 #define exp2_optab (optab_table[OTI_exp2])
309 #define expm1_optab (optab_table[OTI_expm1])
310 #define ldexp_optab (optab_table[OTI_ldexp])
311 #define logb_optab (optab_table[OTI_logb])
312 #define ilogb_optab (optab_table[OTI_ilogb])
313 #define log_optab (optab_table[OTI_log])
314 #define log10_optab (optab_table[OTI_log10])
315 #define log2_optab (optab_table[OTI_log2])
316 #define log1p_optab (optab_table[OTI_log1p])
317 #define floor_optab (optab_table[OTI_floor])
318 #define lfloor_optab (optab_table[OTI_lfloor])
319 #define ceil_optab (optab_table[OTI_ceil])
320 #define lceil_optab (optab_table[OTI_lceil])
321 #define btrunc_optab (optab_table[OTI_btrunc])
322 #define round_optab (optab_table[OTI_round])
323 #define nearbyint_optab (optab_table[OTI_nearbyint])
324 #define rint_optab (optab_table[OTI_rint])
325 #define lrint_optab (optab_table[OTI_lrint])
326 #define tan_optab (optab_table[OTI_tan])
327 #define atan_optab (optab_table[OTI_atan])
328 #define copysign_optab (optab_table[OTI_copysign])
329
330 #define cmp_optab (optab_table[OTI_cmp])
331 #define ucmp_optab (optab_table[OTI_ucmp])
332 #define tst_optab (optab_table[OTI_tst])
333
334 #define eq_optab (optab_table[OTI_eq])
335 #define ne_optab (optab_table[OTI_ne])
336 #define gt_optab (optab_table[OTI_gt])
337 #define ge_optab (optab_table[OTI_ge])
338 #define lt_optab (optab_table[OTI_lt])
339 #define le_optab (optab_table[OTI_le])
340 #define unord_optab (optab_table[OTI_unord])
341
342 #define strlen_optab (optab_table[OTI_strlen])
343
344 #define cbranch_optab (optab_table[OTI_cbranch])
345 #define cmov_optab (optab_table[OTI_cmov])
346 #define cstore_optab (optab_table[OTI_cstore])
347 #define push_optab (optab_table[OTI_push])
348 #define addcc_optab (optab_table[OTI_addcc])
349
350 #define vec_set_optab (optab_table[OTI_vec_set])
351 #define vec_extract_optab (optab_table[OTI_vec_extract])
352 #define vec_init_optab (optab_table[OTI_vec_init])
353 #define vec_realign_load_optab (optab_table[OTI_vec_realign_load])
354
355 #define powi_optab (optab_table[OTI_powi])
356
357 /* Conversion optabs have their own table and indexes.  */
358 enum convert_optab_index
359 {
360   CTI_sext,
361   CTI_zext,
362   CTI_trunc,
363
364   CTI_sfix,
365   CTI_ufix,
366
367   CTI_sfixtrunc,
368   CTI_ufixtrunc,
369
370   CTI_sfloat,
371   CTI_ufloat,
372
373   CTI_MAX
374 };
375
376 extern GTY(()) convert_optab convert_optab_table[CTI_MAX];
377
378 #define sext_optab (convert_optab_table[CTI_sext])
379 #define zext_optab (convert_optab_table[CTI_zext])
380 #define trunc_optab (convert_optab_table[CTI_trunc])
381 #define sfix_optab (convert_optab_table[CTI_sfix])
382 #define ufix_optab (convert_optab_table[CTI_ufix])
383 #define sfixtrunc_optab (convert_optab_table[CTI_sfixtrunc])
384 #define ufixtrunc_optab (convert_optab_table[CTI_ufixtrunc])
385 #define sfloat_optab (convert_optab_table[CTI_sfloat])
386 #define ufloat_optab (convert_optab_table[CTI_ufloat])
387
388 /* These arrays record the insn_code of insns that may be needed to
389    perform input and output reloads of special objects.  They provide a
390    place to pass a scratch register.  */
391 extern enum insn_code reload_in_optab[NUM_MACHINE_MODES];
392 extern enum insn_code reload_out_optab[NUM_MACHINE_MODES];
393
394 /* Contains the optab used for each rtx code.  */
395 extern GTY(()) optab code_to_optab[NUM_RTX_CODE + 1];
396
397 \f
398 typedef rtx (*rtxfun) (rtx);
399
400 /* Indexed by the rtx-code for a conditional (e.g. EQ, LT,...)
401    gives the gen_function to make a branch to test that condition.  */
402
403 extern rtxfun bcc_gen_fctn[NUM_RTX_CODE];
404
405 /* Indexed by the rtx-code for a conditional (e.g. EQ, LT,...)
406    gives the insn code to make a store-condition insn
407    to test that condition.  */
408
409 extern enum insn_code setcc_gen_code[NUM_RTX_CODE];
410
411 #ifdef HAVE_conditional_move
412 /* Indexed by the machine mode, gives the insn code to make a conditional
413    move insn.  */
414
415 extern enum insn_code movcc_gen_code[NUM_MACHINE_MODES];
416 #endif
417
418 /* Indexed by the machine mode, gives the insn code for vector conditional
419    operation.  */
420
421 extern enum insn_code vcond_gen_code[NUM_MACHINE_MODES];
422 extern enum insn_code vcondu_gen_code[NUM_MACHINE_MODES];
423
424 /* This array records the insn_code of insns to perform block moves.  */
425 extern enum insn_code movmem_optab[NUM_MACHINE_MODES];
426
427 /* This array records the insn_code of insns to perform block clears.  */
428 extern enum insn_code clrmem_optab[NUM_MACHINE_MODES];
429
430 /* These arrays record the insn_code of two different kinds of insns
431    to perform block compares.  */
432 extern enum insn_code cmpstr_optab[NUM_MACHINE_MODES];
433 extern enum insn_code cmpmem_optab[NUM_MACHINE_MODES];
434
435 /* Synchronization primitives.  This first set is atomic operation for
436    which we don't care about the resulting value.  */
437 extern enum insn_code sync_add_optab[NUM_MACHINE_MODES];
438 extern enum insn_code sync_sub_optab[NUM_MACHINE_MODES];
439 extern enum insn_code sync_ior_optab[NUM_MACHINE_MODES];
440 extern enum insn_code sync_and_optab[NUM_MACHINE_MODES];
441 extern enum insn_code sync_xor_optab[NUM_MACHINE_MODES];
442 extern enum insn_code sync_nand_optab[NUM_MACHINE_MODES];
443
444 /* This second set is atomic operations in which we return the value
445    that existed in memory before the operation.  */
446 extern enum insn_code sync_old_add_optab[NUM_MACHINE_MODES];
447 extern enum insn_code sync_old_sub_optab[NUM_MACHINE_MODES];
448 extern enum insn_code sync_old_ior_optab[NUM_MACHINE_MODES];
449 extern enum insn_code sync_old_and_optab[NUM_MACHINE_MODES];
450 extern enum insn_code sync_old_xor_optab[NUM_MACHINE_MODES];
451 extern enum insn_code sync_old_nand_optab[NUM_MACHINE_MODES];
452
453 /* This third set is atomic operations in which we return the value
454    that resulted after performing the operation.  */
455 extern enum insn_code sync_new_add_optab[NUM_MACHINE_MODES];
456 extern enum insn_code sync_new_sub_optab[NUM_MACHINE_MODES];
457 extern enum insn_code sync_new_ior_optab[NUM_MACHINE_MODES];
458 extern enum insn_code sync_new_and_optab[NUM_MACHINE_MODES];
459 extern enum insn_code sync_new_xor_optab[NUM_MACHINE_MODES];
460 extern enum insn_code sync_new_nand_optab[NUM_MACHINE_MODES];
461
462 /* Atomic compare and swap.  */
463 extern enum insn_code sync_compare_and_swap[NUM_MACHINE_MODES];
464 extern enum insn_code sync_compare_and_swap_cc[NUM_MACHINE_MODES];
465
466 /* Atomic exchange with acquire semantics.  */
467 extern enum insn_code sync_lock_test_and_set[NUM_MACHINE_MODES];
468
469 /* Atomic clear with release semantics.  */
470 extern enum insn_code sync_lock_release[NUM_MACHINE_MODES];
471
472 /* Define functions given in optabs.c.  */
473
474 extern rtx expand_ternary_op (enum machine_mode mode, optab ternary_optab, 
475                               rtx op0, rtx op1, rtx op2, rtx target, 
476                               int unsignedp);
477
478 /* Expand a binary operation given optab and rtx operands.  */
479 extern rtx expand_binop (enum machine_mode, optab, rtx, rtx, rtx, int,
480                          enum optab_methods);
481
482 extern bool force_expand_binop (enum machine_mode, optab, rtx, rtx, rtx, int,
483                                 enum optab_methods);
484
485 /* Expand a binary operation with both signed and unsigned forms.  */
486 extern rtx sign_expand_binop (enum machine_mode, optab, optab, rtx, rtx,
487                               rtx, int, enum optab_methods);
488
489 /* Generate code to perform an operation on one operand with two results.  */
490 extern int expand_twoval_unop (optab, rtx, rtx, rtx, int);
491
492 /* Generate code to perform an operation on two operands with two results.  */
493 extern int expand_twoval_binop (optab, rtx, rtx, rtx, rtx, int);
494
495 /* Generate code to perform an operation on two operands with two
496    results, using a library function.  */
497 extern bool expand_twoval_binop_libfunc (optab, rtx, rtx, rtx, rtx,
498                                          enum rtx_code);
499
500 /* Expand a unary arithmetic operation given optab rtx operand.  */
501 extern rtx expand_unop (enum machine_mode, optab, rtx, rtx, int);
502
503 /* Expand the absolute value operation.  */
504 extern rtx expand_abs_nojump (enum machine_mode, rtx, rtx, int);
505 extern rtx expand_abs (enum machine_mode, rtx, rtx, int, int);
506
507 /* Expand the copysign operation.  */
508 extern rtx expand_copysign (rtx, rtx, rtx);
509
510 /* Generate an instruction with a given INSN_CODE with an output and
511    an input.  */
512 extern void emit_unop_insn (int, rtx, rtx, enum rtx_code);
513
514 /* Emit code to perform a series of operations on a multi-word quantity, one
515    word at a time.  */
516 extern rtx emit_no_conflict_block (rtx, rtx, rtx, rtx, rtx);
517
518 /* Emit one rtl insn to compare two rtx's.  */
519 extern void emit_cmp_insn (rtx, rtx, enum rtx_code, rtx, enum machine_mode,
520                            int);
521
522 /* The various uses that a comparison can have; used by can_compare_p:
523    jumps, conditional moves, store flag operations.  */
524 enum can_compare_purpose
525 {
526   ccp_jump,
527   ccp_cmov,
528   ccp_store_flag
529 };
530
531 /* Return the optab used for computing the given operation on the type
532    given by the second argument.  */
533 extern optab optab_for_tree_code (enum tree_code, tree);
534
535 /* Nonzero if a compare of mode MODE can be done straightforwardly
536    (without splitting it into pieces).  */
537 extern int can_compare_p (enum rtx_code, enum machine_mode,
538                           enum can_compare_purpose);
539
540 /* Return the INSN_CODE to use for an extend operation.  */
541 extern enum insn_code can_extend_p (enum machine_mode, enum machine_mode, int);
542
543 /* Generate the body of an insn to extend Y (with mode MFROM)
544    into X (with mode MTO).  Do zero-extension if UNSIGNEDP is nonzero.  */
545 extern rtx gen_extend_insn (rtx, rtx, enum machine_mode,
546                             enum machine_mode, int);
547
548 /* Call this to reset the function entry for one optab.  */
549 extern void set_optab_libfunc (optab, enum machine_mode, const char *);
550 extern void set_conv_libfunc (convert_optab, enum machine_mode,
551                               enum machine_mode, const char *);
552
553 /* Generate code for a FLOAT_EXPR.  */
554 extern void expand_float (rtx, rtx, int);
555
556 /* Generate code for a FIX_EXPR.  */
557 extern void expand_fix (rtx, rtx, int);
558
559 /* Return tree if target supports vector operations for COND_EXPR.  */
560 bool expand_vec_cond_expr_p (tree, enum machine_mode);
561
562 /* Generate code for VEC_COND_EXPR.  */
563 extern rtx expand_vec_cond_expr (tree, rtx);
564
565 #endif /* GCC_OPTABS_H */