2 * Copyright (C) 1995-2011 University of Karlsruhe. All right reserved.
4 * This file is part of libFirm.
6 * This file may be distributed and/or modified under the terms of the
7 * GNU General Public License version 2 as published by the Free Software
8 * Foundation and appearing in the file LICENSE.GPL included in the
9 * packaging of this file.
11 * Licensees holding valid libFirm Professional Edition licenses may use
12 * this file in accordance with the libFirm Commercial License.
13 * Agreement provided with the Software.
15 * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
16 * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * @brief Lowering of high level constructs.
23 * @author Michael Beck
26 #ifndef FIRM_LOWERING_H
27 #define FIRM_LOWERING_H
31 #include "firm_types.h"
36 * Lower small CopyB nodes to Load/Store nodes, preserve medium-sized CopyB
37 * nodes and replace large CopyBs by a call to memcpy, depending on the given
40 * Small CopyB nodes (size <= max_small_size) are turned into a series of
42 * Medium-sized CopyB nodes (max_small_size < size < min_large_size) are
44 * Large CopyB nodes (size >= min_large_size) are turned into a memcpy call.
46 * @param irg The graph to be lowered.
47 * @param max_small_size The maximum number of bytes for a CopyB node so
48 * that it is still considered 'small'.
49 * @param min_large_size The minimum number of bytes for a CopyB node so
50 * that it is regarded as 'large'.
51 * @param allow_misalignments Backend can handle misaligned loads and stores.
53 FIRM_API void lower_CopyB(ir_graph *irg, unsigned max_small_size,
54 unsigned min_large_size, int allow_misalignments);
57 * Lowers all Switches (Cond nodes with non-boolean mode) depending on spare_size.
58 * They will either remain the same or be converted into if-cascades.
60 * @param irg The ir graph to be lowered.
61 * @param small_switch If switch has <= cases then change it to an if-cascade.
62 * @param spare_size Allowed spare size for table switches in machine words.
63 * (Default in edgfe: 128)
64 * @param allow_out_of_bounds backend can handle out-of-bounds values
65 * (values bigger than minimum and maximum proj
68 FIRM_API void lower_switch(ir_graph *irg, unsigned small_switch,
69 unsigned spare_size, int allow_out_of_bounds);
72 * Replaces SymConsts by a real constant if possible.
73 * Replace Sel nodes by address computation. Also resolves array access.
74 * Handle bit fields by added And/Or calculations.
76 * @param irg the graph to lower
78 * @note: There is NO lowering ob objects oriented types. This is highly compiler
79 * and ABI specific and should be placed directly in the compiler.
81 FIRM_API void lower_highlevel_graph(ir_graph *irg);
84 * Creates an ir_graph pass for lower_highlevel_graph().
86 * @param name the name of this pass or NULL
88 * @return the newly created ir_graph pass
90 FIRM_API ir_graph_pass_t *lower_highlevel_graph_pass(const char *name);
93 * Replaces SymConsts by a real constant if possible.
94 * Replace Sel nodes by address computation. Also resolves array access.
95 * Handle bit fields by added And/Or calculations.
98 * @note There is NO lowering of objects oriented types. This is highly compiler
99 * and ABI specific and should be placed directly in the compiler.
101 FIRM_API void lower_highlevel(void);
104 * does the same as lower_highlevel for all nodes on the const code irg
106 FIRM_API void lower_const_code(void);
109 * Creates an ir_prog pass for lower_const_code().
111 * @param name the name of this pass or NULL
113 * @return the newly created ir_prog pass
115 FIRM_API ir_prog_pass_t *lower_const_code_pass(const char *name);
118 * Used as callback, whenever a lowerable mux is found. The return value
119 * indicates, whether the mux should be lowered. This may be used, to lower
120 * floating point muxes, while keeping mux nodes for integers, for example.
122 * @param mux The mux node that may be lowered.
123 * @return A non-zero value indicates that the mux should be lowered.
125 typedef int lower_mux_callback(ir_node* mux);
128 * Lowers all mux nodes in the given graph. A callback function may be
129 * given, to select the mux nodes to lower.
131 * @param irg The graph to lower mux nodes in.
132 * @param cb_func The callback function for mux selection. Can be NULL,
133 * to lower all mux nodes.
135 FIRM_API void lower_mux(ir_graph *irg, lower_mux_callback *cb_func);
138 * Creates an ir_graph pass for lower_mux().
140 * @param name the name of this pass or NULL
141 * @param cb_func The callback function for mux selection. Can be NULL,
142 * to lower all mux nodes.
144 * @return the newly created ir_graph pass
146 FIRM_API ir_graph_pass_t *lower_mux_pass(const char *name,
147 lower_mux_callback *cb_func);
150 * An intrinsic mapper function.
152 * @param node the IR-node that will be mapped
153 * @param ctx a context
155 * @return non-zero if the call was mapped
157 typedef int (*i_mapper_func)(ir_node *node, void *ctx);
160 INTRINSIC_CALL = 0, /**< the record represents an intrinsic call */
161 INTRINSIC_INSTR /**< the record represents an intrinsic instruction */
165 * An intrinsic call record.
167 typedef struct i_call_record {
168 enum ikind kind; /**< must be INTRINSIC_CALL */
169 ir_entity *i_ent; /**< the entity representing an intrinsic call */
170 i_mapper_func i_mapper; /**< the mapper function to call */
171 void *ctx; /**< mapper context */
172 void *link; /**< used in the construction algorithm, must be NULL */
176 * An intrinsic instruction record.
178 typedef struct i_instr_record {
179 enum ikind kind; /**< must be INTRINSIC_INSTR */
180 ir_op *op; /**< the opcode that must be mapped. */
181 i_mapper_func i_mapper; /**< the mapper function to call */
182 void *ctx; /**< mapper context */
183 void *link; /**< used in the construction algorithm, must be NULL */
187 * An intrinsic record.
189 typedef union i_record {
190 i_call_record i_call;
191 i_instr_record i_instr;
195 * Go through all graphs and map calls to intrinsic functions and instructions.
197 * Every call or instruction is reported to its mapper function,
198 * which is responsible for rebuilding the graph.
200 * current_ir_graph is always set.
202 * @param list an array of intrinsic map records
203 * @param length the length of the array
204 * @param part_block_used set to true if part_block() must be using during lowering
206 * @return number of found intrinsics.
208 FIRM_API size_t lower_intrinsics(i_record *list, size_t length,
209 int part_block_used);
212 * Creates an irprog pass for lower_intrinsics.
214 * @param name the name of this pass or NULL
215 * @param list an array of intrinsic map records
216 * @param length the length of the array
217 * @param part_block_used set to true if part_block() must be using during lowering
219 FIRM_API ir_prog_pass_t *lower_intrinsics_pass(const char *name, i_record *list,
220 size_t length, int part_block_used);
223 * A mapper for the integer/float absolute value: type abs(type v).
224 * Replaces the call by a Abs node.
228 FIRM_API int i_mapper_abs(ir_node *call, void *ctx);
231 * A mapper for the integer byte swap value: type bswap(type v).
232 * Replaces the call by a builtin[ir_bk_bswap] node.
236 FIRM_API int i_mapper_bswap(ir_node *call, void *ctx);
239 * A mapper for the floating point sqrt(v): floattype sqrt(floattype v);
241 * @return 1 if the sqrt call was removed, 0 else.
243 FIRM_API int i_mapper_sqrt(ir_node *call, void *ctx);
246 * A mapper for the floating point cbrt(v): floattype sqrt(floattype v);
248 * @return 1 if the cbrt call was removed, 0 else.
250 FIRM_API int i_mapper_cbrt(ir_node *call, void *ctx);
253 * A mapper for the floating point pow(a, b): floattype pow(floattype a, floattype b);
255 * @return 1 if the pow call was removed, 0 else.
257 FIRM_API int i_mapper_pow(ir_node *call, void *ctx);
260 * A mapper for the floating point exp(a): floattype exp(floattype a);
262 * @return 1 if the exp call was removed, 0 else.
264 FIRM_API int i_mapper_exp(ir_node *call, void *ctx);
266 #define i_mapper_exp2 i_mapper_exp
267 #define i_mapper_exp10 i_mapper_exp
270 * A mapper for the floating point log(a): floattype log(floattype a);
272 * @return 1 if the log call was removed, 0 else.
274 FIRM_API int i_mapper_log(ir_node *call, void *ctx);
276 #define i_mapper_log2 i_mapper_log
277 #define i_mapper_log10 i_mapper_log
280 * A mapper for the floating point sin(a): floattype sin(floattype a);
282 * @return 1 if the sin call was removed, 0 else.
284 FIRM_API int i_mapper_sin(ir_node *call, void *ctx);
287 * A mapper for the floating point sin(a): floattype cos(floattype a);
289 * @return 1 if the cos call was removed, 0 else.
291 FIRM_API int i_mapper_cos(ir_node *call, void *ctx);
294 * A mapper for the floating point tan(a): floattype tan(floattype a);
296 * @return 1 if the tan call was removed, 0 else.
298 FIRM_API int i_mapper_tan(ir_node *call, void *ctx);
301 * A mapper for the floating point asin(a): floattype asin(floattype a);
303 * @return 1 if the asin call was removed, 0 else.
305 FIRM_API int i_mapper_asin(ir_node *call, void *ctx);
308 * A mapper for the floating point acos(a): floattype acos(floattype a);
310 * @return 1 if the tan call was removed, 0 else.
312 FIRM_API int i_mapper_acos(ir_node *call, void *ctx);
315 * A mapper for the floating point atan(a): floattype atan(floattype a);
317 * @return 1 if the atan call was removed, 0 else.
319 FIRM_API int i_mapper_atan(ir_node *call, void *ctx);
322 * A mapper for the floating point sinh(a): floattype sinh(floattype a);
324 * @return 1 if the sinh call was removed, 0 else.
326 FIRM_API int i_mapper_sinh(ir_node *call, void *ctx);
329 * A mapper for the floating point cosh(a): floattype cosh(floattype a);
331 * @return 1 if the cosh call was removed, 0 else.
333 FIRM_API int i_mapper_cosh(ir_node *call, void *ctx);
336 * A mapper for the floating point tanh(a): floattype tanh(floattype a);
338 * @return 1 if the tanh call was removed, 0 else.
340 FIRM_API int i_mapper_tanh(ir_node *call, void *ctx);
343 * A mapper for the strcmp-Function: inttype strcmp(char pointer a, char pointer b);
345 * @return 1 if the strcmp call was removed, 0 else.
347 FIRM_API int i_mapper_strcmp(ir_node *call, void *ctx);
350 * A mapper for the strncmp-Function: inttype strncmp(char pointer a, char pointer b, inttype len);
352 * @return 1 if the strncmp call was removed, 0 else.
354 FIRM_API int i_mapper_strncmp(ir_node *call, void *ctx);
357 * A mapper for the strcpy-Function: char pointer strcpy(char pointer a, char pointer b);
359 * @return 1 if the strcpy call was removed, 0 else.
361 FIRM_API int i_mapper_strcpy(ir_node *call, void *ctx);
364 * A mapper for the strlen-Function: inttype strlen(char pointer a);
366 * @return 1 if the strlen call was removed, 0 else.
368 FIRM_API int i_mapper_strlen(ir_node *call, void *ctx);
371 * A mapper for the memcpy-Function: void pointer memcpy(void pointer d, void pointer s, inttype c);
373 * @return 1 if the memcpy call was removed, 0 else.
375 FIRM_API int i_mapper_memcpy(ir_node *call, void *ctx);
378 * A mapper for the mempcpy-Function: void pointer mempcpy(void pointer d, void pointer s, inttype c);
380 * @return 1 if the mempcpy call was removed, 0 else.
382 FIRM_API int i_mapper_mempcpy(ir_node *call, void *ctx);
385 * A mapper for the memmove-Function: void pointer memmove(void pointer d, void pointer s, inttype c);
387 * @return 1 if the memmove call was removed, 0 else.
389 FIRM_API int i_mapper_memmove(ir_node *call, void *ctx);
392 * A mapper for the memset-Function: void pointer memset(void pointer d, inttype C, inttype len);
394 * @return 1 if the memset call was removed, 0 else.
396 FIRM_API int i_mapper_memset(ir_node *call, void *ctx);
399 * A mapper for the strncmp-Function: inttype memcmp(void pointer a, void pointer b, inttype len);
401 * @return 1 if the strncmp call was removed, 0 else.
403 FIRM_API int i_mapper_memcmp(ir_node *call, void *ctx);
406 * A mapper for the alloca() function: pointer alloca(inttype size)
407 * Replaces the call by a Alloca(stack_alloc) node.
411 FIRM_API int i_mapper_alloca(ir_node *call, void *ctx);
414 * A runtime routine description.
416 typedef struct runtime_rt {
417 ir_entity *ent; /**< The entity representing the runtime routine. */
418 ir_mode *mode; /**< The operation mode of the mapped instruction. */
419 ir_mode *res_mode; /**< The result mode of the mapped instruction or NULL. */
420 long mem_proj_nr; /**< if >= 0, create a memory ProjM() */
421 long regular_proj_nr; /**< if >= 0, create a regular ProjX() */
422 long exc_proj_nr; /**< if >= 0, create a exception ProjX() */
423 long res_proj_nr; /**< if >= 0, first result projection number */
427 * A mapper for mapping unsupported instructions to runtime calls.
428 * Maps a op(arg_0, ..., arg_n) into a call to a runtime function
429 * rt(arg_0, ..., arg_n).
431 * The mapping is only done, if the modes of all arguments matches the
432 * modes of rt's argument.
433 * Further, if op has a memory input, the generated Call uses it, else
435 * The pinned state of the Call will be set to the pinned state of op.
437 * Note that i_mapper_RuntimeCall() must be used with a i_instr_record.
439 * @return 1 if an op was mapped, 0 else
443 * - Maps signed Div nodes to calls to rt_Div():
445 runtime_rt rt_Div = {
446 ent("int rt_Div(int, int)"),
455 i_instr_record map_Div = {
458 i_mapper_RuntimeCall,
464 * - Maps ConvD(F) to calls to rt_Float2Div():
466 runtime_rt rt_Float2Double = {
467 ent("double rt_Float2Div(float)"),
468 get_type_mode("double"),
476 i_instr_record map_Float2Double = {
479 i_mapper_RuntimeCall,
485 FIRM_API int i_mapper_RuntimeCall(ir_node *node, runtime_rt *rt);