OSDN Git Service

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