* @file
* @brief Generic hooks for various libFirm functions.
* @author Michael Beck
- * @version $Id$
*/
#ifndef FIRM_IR_IRHOOKS_H
#define FIRM_IR_IRHOOKS_H
#include "irop.h"
#include "irnode.h"
#include "irgraph.h"
+#include "begin.h"
/**
* options for the hook_merge_nodes hook
HOOK_OPT_LAST
} hook_opt_kind;
-typedef enum _if_result_t {
+/** Result of an if-conversion attempt */
+typedef enum if_result_t {
IF_RESULT_SUCCESS = 0, /**< if conversion could be done */
IF_RESULT_SIDE_EFFECT = 1, /**< if conversion failed because of side effect */
IF_RESULT_SIDE_EFFECT_PHI = 2, /**< if conversion failed because of Phi node found */
/** This hook is called after a Mul was replaced by a series of Shift and Add/Sub operations. */
void (*_hook_arch_dep_replace_mul_with_shifts)(void *context, ir_node *irn);
- /** This hook is called after a Div/Mod/DivMod by a constant value was replaced. */
+ /** This hook is called after a Div/Mod by a constant value was replaced. */
void (*_hook_arch_dep_replace_division_by_const)(void *context, ir_node *irn);
/** This hook is called after a new mode was registered. */
- void (*_hook_new_mode)(void *context, const ir_mode *tmpl, ir_mode *mode);
+ void (*_hook_new_mode)(void *context, ir_mode *mode);
/** This hook is called after a new entity was created. */
void (*_hook_new_entity)(void *context, ir_entity *ent);
/** This hook is called at the end of the node info dumper to dump additional node info. */
void (*_hook_node_info)(void *context, FILE *f, const ir_node *n);
- } hook;
+ } hook; /**< hook */
/** the context for every hook */
void *context;
* possible hooks
*/
typedef enum {
- hook_new_ir_op,
- hook_free_ir_op,
- hook_new_node,
- hook_set_irn_n,
- hook_replace,
- hook_turn_into_id,
- hook_normalize,
- hook_new_graph,
- hook_free_graph,
- hook_irg_walk,
- hook_irg_walk_blkwise,
- hook_irg_block_walk,
- hook_merge_nodes,
- hook_reassociate,
- hook_lower,
- hook_inline,
- hook_tail_rec,
- hook_strength_red,
- hook_dead_node_elim,
- hook_dead_node_elim_subst,
- hook_if_conversion,
- hook_func_call,
+ hook_new_ir_op, /**< type for hook_new_ir_op() hook */
+ hook_free_ir_op, /**< type for hook_free_ir_op() hook */
+ hook_new_node, /**< type for hook_new_node() hook */
+ hook_set_irn_n, /**< type for hook_set_irn_n() hook */
+ hook_replace, /**< type for hook_replace() hook */
+ hook_turn_into_id, /**< type for hook_turn_into_id() hook */
+ hook_normalize, /**< type for hook_normalize() hook */
+ hook_new_graph, /**< type for hook_new_graph() hook */
+ hook_free_graph, /**< type for hook_free_graph() hook */
+ hook_irg_walk, /**< type for hook_irg_walk() hook */
+ hook_irg_walk_blkwise, /**< type for hook_irg_walk_blkwise() hook */
+ hook_irg_block_walk, /**< type for hook_irg_block_walk() hook */
+ hook_merge_nodes, /**< type for hook_merge_nodes() hook */
+ hook_reassociate, /**< type for hook_reassociate() hook */
+ hook_lower, /**< type for hook_lower() hook */
+ hook_inline, /**< type for hook_inline() hook */
+ hook_tail_rec, /**< type for hook_tail_rec() hook */
+ hook_strength_red, /**< type for hook_strength_red() hook */
+ hook_dead_node_elim, /**< type for hook_dead_node_elim() hook */
+ hook_dead_node_elim_subst, /**< type for hook_dead_node_elim_subst() hook */
+ hook_if_conversion, /**< type for hook_if_conversion() hook */
+ hook_func_call, /**< type for hook_func_call() hook */
+ /** type for hook_arch_dep_replace_mul_with_shifts() hook */
hook_arch_dep_replace_mul_with_shifts,
+ /** type for hook_arch_dep_replace_division_by_const() hook */
hook_arch_dep_replace_division_by_const,
- hook_new_mode,
- hook_new_entity,
- hook_new_type,
- hook_node_info,
- hook_last
+ hook_new_mode, /**< type for hook_new_mode() hook */
+ hook_new_entity, /**< type for hook_new_entity() hook */
+ hook_new_type, /**< type for hook_new_type() hook */
+ hook_node_info, /**< type for hook_node_info() hook */
+ hook_last /**< last hook type */
} hook_type_t;
/**
* @param hook the hook type
* @param entry the hook entry
*/
-void register_hook(hook_type_t hook, hook_entry_t *entry);
+FIRM_API void register_hook(hook_type_t hook, hook_entry_t *entry);
/**
* unregister a hook entry.
* @param hook the hook type
* @param entry the hook entry
*/
-void unregister_hook(hook_type_t hook, hook_entry_t *entry);
+FIRM_API void unregister_hook(hook_type_t hook, hook_entry_t *entry);
-extern hook_entry_t *hooks[hook_last];
+/** Global list of registerd hooks. */
+FIRM_API hook_entry_t *hooks[hook_last];
/**
- * execute the hook what with the args args
+ * Executes the hook @p what with the args @p args
* Do not use this macro directly.
*/
#define hook_exec(what, args) do { \
hook_entry_t *_p; \
for (_p = hooks[what]; _p; _p = _p->next){ \
- void *ctx = _p->context; \
+ void *hook_ctx_ = _p->context; \
_p->hook._##what args; \
} \
} while (0)
-#define hook_new_ir_op(op) hook_exec(hook_new_ir_op, (ctx, op))
-#define hook_free_ir_op(op) hook_exec(hook_free_ir_op, (ctx, op))
-#define hook_new_node(graph, node) hook_exec(hook_new_node, (ctx, graph, node))
+/** Called when a new node opcode has been created */
+#define hook_new_ir_op(op) hook_exec(hook_new_ir_op, (hook_ctx_, op))
+/** Called when a node opcode has been freed */
+#define hook_free_ir_op(op) hook_exec(hook_free_ir_op, (hook_ctx_, op))
+/** Called after a new node has been created */
+#define hook_new_node(graph, node) hook_exec(hook_new_node, (hook_ctx_, graph, node))
+/** Called when a nodes input is changed */
#define hook_set_irn_n(src, pos, tgt, old_tgt) \
- hook_exec(hook_set_irn_n, (ctx, src, pos, tgt, old_tgt))
-#define hook_replace(old, nw) hook_exec(hook_replace, (ctx, old, nw))
-#define hook_turn_into_id(node) hook_exec(hook_turn_into_id, (ctx, node))
-#define hook_normalize(node) hook_exec(hook_normalize, (ctx, node))
-#define hook_new_graph(irg, ent) hook_exec(hook_new_graph, (ctx, irg, ent))
-#define hook_free_graph(irg) hook_exec(hook_free_graph, (ctx, irg))
-#define hook_irg_walk(irg, pre, post) hook_exec(hook_irg_walk, (ctx, irg, pre, post))
+ hook_exec(hook_set_irn_n, (hook_ctx_, src, pos, tgt, old_tgt))
+/** Called when a node is replaced */
+#define hook_replace(old, nw) hook_exec(hook_replace, (hook_ctx_, old, nw))
+/** Called when a node is turned into an Id node */
+#define hook_turn_into_id(node) hook_exec(hook_turn_into_id, (hook_ctx_, node))
+/** Called when a node is normalized */
+#define hook_normalize(node) hook_exec(hook_normalize, (hook_ctx_, node))
+/** Called after a new graph has been created */
+#define hook_new_graph(irg, ent) hook_exec(hook_new_graph, (hook_ctx_, irg, ent))
+/** Called after a graph has been freed */
+#define hook_free_graph(irg) hook_exec(hook_free_graph, (hook_ctx_, irg))
+/** Called before a graph walk is started */
+#define hook_irg_walk(irg, pre, post) hook_exec(hook_irg_walk, (hook_ctx_, irg, pre, post))
+/** Called before a blockwise graph walk is started */
#define hook_irg_walk_blkwise(irg, pre, post) \
- hook_exec(hook_irg_walk_blkwise, (ctx, irg, pre, post))
+ hook_exec(hook_irg_walk_blkwise, (hook_ctx_, irg, pre, post))
+/** Called before a block walk is started */
#define hook_irg_block_walk(irg, node, pre, post) \
- hook_exec(hook_irg_block_walk, (ctx, irg, node, pre, post))
+ hook_exec(hook_irg_block_walk, (hook_ctx_, irg, node, pre, post))
+/** Called before 2 nodes get merged */
#define hook_merge_nodes(new_node_array, new_num_entries, old_node_array, old_num_entries, opt) \
- hook_exec(hook_merge_nodes, (ctx, new_node_array, new_num_entries, old_node_array, old_num_entries, opt))
-#define hook_reassociate(start) hook_exec(hook_reassociate, (ctx, start))
-#define hook_lower(node) hook_exec(hook_lower, (ctx, node))
-#define hook_inline(call, irg) hook_exec(hook_inline, (ctx, call, irg))
-#define hook_tail_rec(irg, n_calls) hook_exec(hook_tail_rec, (ctx, irg, n_calls))
+ hook_exec(hook_merge_nodes, (hook_ctx_, new_node_array, new_num_entries, old_node_array, old_num_entries, opt))
+/** Called before node inputs get reassociated */
+#define hook_reassociate(start) hook_exec(hook_reassociate, (hook_ctx_, start))
+/** Called before a node gets lowered */
+#define hook_lower(node) hook_exec(hook_lower, (hook_ctx_, node))
+/** Called before a graph is inlined */
+#define hook_inline(call, irg) hook_exec(hook_inline, (hook_ctx_, call, irg))
+/** Called before tail recursion is performed */
+#define hook_tail_rec(irg, n_calls) hook_exec(hook_tail_rec, (hook_ctx_, irg, n_calls))
+/** Called before strength reduction is performed */
#define hook_strength_red(irg, node) \
- hook_exec(hook_strength_red, (ctx, irg, node))
-#define hook_dead_node_elim(irg, start) hook_exec(hook_dead_node_elim, (ctx, irg, start))
+ hook_exec(hook_strength_red, (hook_ctx_, irg, node))
+/** Called before dead node elimination is performed */
+#define hook_dead_node_elim(irg, start) hook_exec(hook_dead_node_elim, (hook_ctx_, irg, start))
+/** Called when a node is substituted during dead code elimination */
#define hook_dead_node_elim_subst(irg, old, nw) \
- hook_exec(hook_dead_node_elim_subst, (ctx, irg, old, nw))
+ hook_exec(hook_dead_node_elim_subst, (hook_ctx_, irg, old, nw))
+/** Called when if-conversion creates a Mux node */
#define hook_if_conversion(irg, phi, pos, mux, reason) \
- hook_exec(hook_if_conversion, (ctx, irg, phi, pos, mux, reason))
+ hook_exec(hook_if_conversion, (hook_ctx_, irg, phi, pos, mux, reason))
+/** Called when a function call is optimized */
#define hook_func_call(irg, call) \
- hook_exec(hook_func_call, (ctx, irg, call))
+ hook_exec(hook_func_call, (hook_ctx_, irg, call))
+/** Called when a mul is replaced with shifts */
#define hook_arch_dep_replace_mul_with_shifts(irn) \
- hook_exec(hook_arch_dep_replace_mul_with_shifts, (ctx, irn))
+ hook_exec(hook_arch_dep_replace_mul_with_shifts, (hook_ctx_, irn))
+/** Called when a dvision by constant is replaced */
#define hook_arch_dep_replace_division_by_const(irn) \
- hook_exec(hook_arch_dep_replace_division_by_const, (ctx, irn))
-#define hook_new_mode(tmpl, mode) hook_exec(hook_new_mode, (ctx, tmpl, mode))
-#define hook_new_entity(ent) hook_exec(hook_new_entity, (ctx, ent))
-#define hook_new_type(tp) hook_exec(hook_new_type, (ctx, tp))
-#define hook_node_info(F, node) hook_exec(hook_node_info, (ctx, F, node))
-
-/* the initializer, move to hooks_t.h some day */
-int firm_init_hooks(void);
+ hook_exec(hook_arch_dep_replace_division_by_const, (hook_ctx_, irn))
+/** Called when a new mode has been created */
+#define hook_new_mode(mode) hook_exec(hook_new_mode, (hook_ctx_, mode))
+/** Called when a new entity has been created */
+#define hook_new_entity(ent) hook_exec(hook_new_entity, (hook_ctx_, ent))
+/** Called when a new type has been created */
+#define hook_new_type(tp) hook_exec(hook_new_type, (hook_ctx_, tp))
+/** Called at the end of the node info dumper to dump additional node info. */
+#define hook_node_info(F, node) hook_exec(hook_node_info, (hook_ctx_, F, node))
+
+#include "end.h"
#endif