#include "irop.h"
#include "irnode.h"
#include "irgraph.h"
+#include "irhooks.h"
/**
* Statistic options, can be or'ed.
*/
enum firmstat_options_t {
- FIRMSTAT_ENABLED = 0x00000001, /**< enable statistics */
- FIRMSTAT_PATTERN_ENABLED = 0x00000002 /**< enable pattern calculation */
+ FIRMSTAT_ENABLED = 0x00000001, /**< enable statistics */
+ FIRMSTAT_PATTERN_ENABLED = 0x00000002, /**< enable pattern calculation */
+ FIRMSTAT_COUNT_STRONG_OP = 0x00000004, /**< if set, count Mul/Div/Mod/DivMod by constant */
+ FIRMSTAT_COUNT_DAG = 0x00000008, /**< if set, count DAG statistics */
+ FIRMSTAT_COUNT_DELETED = 0x00000010, /**< if set, count deleted graphs */
+ FIRMSTAT_COUNT_SELS = 0x00000020, /**< if set, count Sel(Sel(..)) differently */
+ FIRMSTAT_COUNT_CONSTS = 0x00000040, /**< if set, count Const statistics */
+ FIRMSTAT_COUNT_EXTBB = 0x00000080, /**< if set, count extended Basic Block statistics */
+ FIRMSTAT_CSV_OUTPUT = 0x10000000 /**< CSV output of some mini-statistic */
};
/**
- * Finish the statistics.
+ * Additional flags for statistics.
+ */
+enum firmstat_optimizations_t {
+ FS_OPT_NEUTRAL_0 = HOOK_OPT_LAST, /**< a op 0 = 0 op a = a */
+ FS_OPT_NEUTRAL_1, /**< a op 1 = 1 op a = a */
+ FS_OPT_ADD_A_A, /**< a + a = a * 2 */
+ FS_OPT_ADD_A_MINUS_B, /**< a + -b = a - b */
+ FS_OPT_ADD_SUB, /**< (a + x) - x = (a - x) + x */
+ FS_OPT_ADD_MUL_A_X_A, /**< a * x + a = a * (x + 1) */
+ FS_OPT_SUB_0_A, /**< 0 - a = -a */
+ FS_OPT_SUB_MUL_A_X_A, /**< a * x - a = a * (x - 1) */
+ FS_OPT_MUL_MINUS_1, /**< a * -1 = -a */
+ FS_OPT_OR, /**< a | a = a | 0 = 0 | a = a */
+ FS_OPT_AND, /**< a & 0b1...1 = 0b1...1 & a = a & a = a */
+ FS_OPT_EOR_A_A, /**< a ^ a = 0 */
+ FS_OPT_EOR_TO_NOT_BOOL, /**< bool ^ 1 = !bool */
+ FS_OPT_EOR_TO_NOT, /**< x ^ 0b1..1 = ~x */
+ FS_OPT_NOT_CMP, /**< !(a cmp b) = a !cmp b */
+ FS_OPT_OR_SHFT_TO_ROT, /**< (x << c) | (x >> (bits - c)) == Rot(x, c) */
+ FS_OPT_REASSOC_SHIFT, /**< (x SHF c1) SHF c2 = x SHF (c1+c2) */
+ FS_OPT_CONV, /**< a Conv could be removed */
+ FS_OPT_CAST, /**< a Cast could be removed */
+ FS_OPT_MIN_MAX_EQ, /**< Min(a,a) = Max(a,a) = a */
+ FS_OPT_MUX_C, /**< Mux(C, f, t) = C ? t : f */
+ FS_OPT_MUX_EQ, /**< Mux(v, x, x) = x */
+ FS_OPT_MUX_TRANSFORM, /**< Mux(a, b, c) = b OR Mux(a,b, c) = c */
+ FS_OPT_MUX_TO_MIN, /**< Mux(a < b, a, b) = Min(a,b) */
+ FS_OPT_MUX_TO_MAX, /**< Mux(a > b, a, b) = Max(a,b) */
+ FS_OPT_MUX_TO_ABS, /**< Mux(a > b, a, b) = Abs(a,b) */
+ FS_OPT_MUX_TO_SHR, /**< Mux(a > b, a, b) = a >> b */
+ FS_BE_IA32_LEA, /**< Lea was created */
+ FS_BE_IA32_LOAD_LEA, /**< Load merged with a Lea */
+ FS_BE_IA32_STORE_LEA, /**< Store merged with a Lea */
+ FS_BE_IA32_AM_S, /**< Source address mode node created */
+ FS_BE_IA32_AM_D, /**< Destination address mode node created */
+ FS_BE_IA32_CJMP, /**< CJmp created to save a cmp/test */
+ FS_BE_IA32_2ADDRCPY, /**< Copy created due to 2-Addresscode constraints */
+ FS_BE_IA32_SPILL2ST, /**< Created Store for a Spill */
+ FS_BE_IA32_RELOAD2LD, /**< Created Load for a Reload */
+ FS_BE_IA32_SUB2NEGADD, /**< Created Neg-Add for a Sub due to 2-Addresscode constraints */
+ FS_BE_IA32_LEA2ADD, /**< Transformed Lea back into Add */
+ FS_OPT_MAX
+};
+
+/**
+ * Dump a snapshot of the statistic values.
* Never called from libFirm should be called from user.
*
- * @param name basename of the statistic output file
+ * @param name base name of the statistic output file
+ * @param phase a phase name. Prefix will be firmstat-<phase>-
*/
-void stat_finish(const char *name);
-
-#ifdef FIRM_STATISTICS
-
-typedef enum {
- STAT_OPT_STG, /**< straightening optimization */
- STAT_OPT_IFSIM, /**< if simplification */
- STAT_OPT_ALGSIM, /**< algebraic simplification */
- STAT_OPT_PHI, /**< Phi optmization */
- STAT_OPT_WAW, /**< Write-After-Write optimization */
- STAT_OPT_WAR, /**< Write-After-Read optimization */
- STAT_OPT_RAW, /**< Read-After-Write optimization */
- STAT_OPT_RAR, /**< Read-After-Read optimization */
- STAT_OPT_TUPLE, /**< Tuple optimization */
- STAT_OPT_ID, /**< ID optimization */
- STAT_OPT_CONST_EVAL, /**< constant evaluation */
- STAT_OPT_STRENGTH_RED, /**< strenght reduction */
- STAT_LOWERED, /**< lowered */
-
- STAT_OPT_MAX
-} stat_opt_kind;
+void stat_dump_snapshot(const char *name, const char *phase);
/**
* initialize the statistics module.
*
- * @param enable_options Bitmask containing the statistic options
- */
-void init_stat(unsigned enable_options);
-
-/**
- * A new IR op is registered.
- */
-void stat_new_ir_op(const ir_op *op);
-
-/**
- * An IR op is freed.
- */
-void stat_free_ir_op(const ir_op *op);
-
-/**
- * A new node is created.
- */
-void stat_new_node(const ir_node *node);
-
-/**
- * A node is changed into a Id node
- */
-void stat_turn_into_id(const ir_node *node);
-
-/**
- * A new graph was created
+ * @param enable_options a bitmask containing the statistic options
*/
-void stat_new_graph(ir_graph *irg, entity *ent);
+void firm_init_stat(unsigned enable_options);
/**
- * A graph was deleted
+ * terminates the statistics module, frees all memory
*/
-void stat_free_graph(ir_graph *irg);
+void stat_term(void);
/**
- * A walk over a graph is initiated
+ * returns 1 if statistic module is active, 0 otherwise
*/
-void stat_irg_walk(ir_graph *irg, void *pre, void *post);
-
-/**
- * A walk over a graph in block-wise order is initiated
- */
-void stat_irg_walk_blkwise(ir_graph *irg, void *pre, void *post);
-
-/**
- * A walk over the graph's blocks is initiated
- */
-void stat_irg_block_walk(ir_graph *irg, const ir_node *node, void *pre, void *post);
-
-/**
- * Some nodes were optimized into some others due to an optimization
- */
-void stat_merge_nodes(
- ir_node **new_node_array, int new_num_entries,
- ir_node **old_node_array, int old_num_entries,
- stat_opt_kind opt);
-
-/**
- * A node was lowered into other nodes
- */
-void stat_lower(ir_node *node);
-
-/**
- * A graph was inlined
- */
-void stat_inline(ir_node *call, ir_graph *irg);
-
-/**
- * A graph with tail-recursions was optimized.
- */
-void stat_tail_rec(ir_graph *irg);
-
-/**
- * Strength reduction was performed on an iteration variable.
- */
-void stat_strength_red(ir_graph *irg, ir_node *strong, ir_node *cmp);
-
-/**
- * Start the dead node elimination.
- */
-void stat_dead_node_elim_start(ir_graph *irg);
-
-/**
- * Stops the dead node elimination.
- */
-void stat_dead_node_elim_stop(ir_graph *irg);
-
-/**
- * helper: get an ir_op from an opcode
- *
- * @param code the opcode
- *
- * @return The associated ir_op or NULL if the opcode could not be found.
- */
-ir_op *stat_get_op_from_opcode(opcode code);
-
-#else
-
-#define init_stat(enable_options)
-#define stat_finish(name)
-#define stat_new_ir_op(op)
-#define stat_free_ir_op(op)
-#define stat_new_node(node)
-#define stat_turn_into_id(node)
-#define stat_new_graph(irg, ent)
-#define stat_free_graph(irg)
-#define stat_irg_walk(irg, pre, post)
-#define stat_irg_walk_blkwise(irg, pre, post)
-#define stat_irg_block_walk(irg, node, pre, post)
-#define stat_merge_nodes(new_node_array, new_num_entries, old_node_array, old_num_entries, opt)
-#define stat_lower(node)
-#define stat_inline(call, irg)
-#define stat_tail_rec(irg)
-#define stat_strength_red(irg, strong, cmp)
-#define stat_dead_node_elim_start(irg)
-#define stat_dead_node_elim_stop(irg)
+int stat_is_active(void);
-#endif
#endif /* _FIRMSTAT_H_ */