OSDN Git Service

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