#include "obst.h"
#include "irgraph_t.h"
#include "irtools.h"
-#include "irphases_t.h"
-
-struct _ir_phase_info {
- ir_phase_id id;
- const char buf[128];
-};
-
-typedef struct _ir_phase_info ir_phase_info;
-
-typedef void *(phase_irn_init)(ir_phase *phase, const ir_node *irn, void *old);
-
-/**
- * A default node initializer.
- * It does nothing and returns NULL.
- */
-extern phase_irn_init phase_irn_init_default;
+#include "irphase.h"
/**
* A phase object.
*/
-struct _ir_phase {
- struct obstack obst; /**< The obstack where the irn phase data will be stored on. */
- ir_phase_id id; /**< The phase ID. */
- const char *name; /**< The name of the phase. */
- ir_graph *irg; /**< The irg this phase will we applied to. */
- unsigned growth_factor; /**< The factor to leave room for additional nodes. 256 means 1.0. */
- void *priv; /**< Some pointer private to the user of the phase. */
- size_t n_data_ptr; /**< The length of the data_ptr array. */
- void **data_ptr; /**< Map node indexes to irn data on the obstack. */
- phase_irn_init *data_init; /**< A callback that is called to initialize newly created node data. */
+struct ir_phase {
+ void **data_ptr; /**< Map node indexes to irn data on the obstack. */
+ ir_graph *irg; /**< The irg this phase will we applied to. */
+ phase_irn_init *data_init; /**< A callback that is called to initialize newly created node data. */
+ size_t n_data_ptr; /**< The length of the data_ptr array. */
+ struct obstack obst; /**< The obstack where the irn phase data will be stored on. */
+ void *priv; /**< Some pointer private to the user of the phase. */
};
-#define PHASE_DEFAULT_GROWTH (256)
-
-
/**
* For statistics: A type containing statistic data of a phase object.
*/
typedef struct {
- unsigned node_slots; /**< The number of allocated node slots. */
- unsigned node_slots_used; /**< The number of used node slots, i.e. nodes that have node data. */
- unsigned node_map_bytes; /**< Number of used bytes for the node map. */
- unsigned overall_bytes; /**< Overall number of used bytes for the phase. */
+ size_t node_slots; /**< The number of allocated node slots. */
+ size_t node_slots_used; /**< The number of used node slots, i.e. nodes that have node data. */
+ size_t node_map_bytes; /**< Number of used bytes for the node map. */
+ size_t overall_bytes; /**< Overall number of used bytes for the phase. */
} phase_stat_t;
/**
*/
phase_stat_t *phase_stat(const ir_phase *phase, phase_stat_t *stat);
-/**
- * Initialize a phase object.
- *
- * @param name The name of the phase. Just for debugging.
- * @param irg The graph the phase will run on.
- * @param growth_factor A factor denoting how many node slots will be additionally allocated,
- * if the node => data is full. The factor is given in units of 1/256, so
- * 256 means 1.0.
- * @param irn_data_init A callback that is called to initialize newly created node data.
- * Must be non-null.
- * @param priv Some private pointer which is kept in the phase and can be retrieved with phase_get_private().
- * @return A new phase object.
- */
-ir_phase *phase_init(ir_phase *ph, const char *name, ir_graph *irg, unsigned growth_factor, phase_irn_init *data_init, void *priv);
-
-/**
- * Init an irg managed phase.
- *
- * The first sizeof(ir_phase) bytes will be considered to be a phase object;
- * they will be properly initialized. The remaining bytes are at the user's disposal.
- * The returned phase object will be inserted in the phase slot of the @p irg designated by the phase ID (@p id).
- * Note that you cannot allocate phases with an ID <code>PHASE_NOT_IRG_MANAGED</code>.
- *
- * @param irg The irg.
- * @param id The ID of the irg-managed phase (see irphaselist.h).
- * @param size The size of the phase
- * @param data_init The node data initialization function.
- * @return The allocated phase object.
- */
-ir_phase *init_irg_phase(ir_graph *irg, ir_phase_id id, size_t size, phase_irn_init *data_init);
-
-void free_irg_phase(ir_graph *irg, ir_phase_id id);
-
-/**
- * Free the phase and all node data associated with it.
- *
- * @param phase The phase.
- */
-void phase_free(ir_phase *phase);
-
-/**
- * Re-initialize the irn data for all nodes in the node => data map using the given callback.
- *
- * @param phase The phase.
- */
-void phase_reinit_irn_data(ir_phase *phase);
-
-/**
- * Re-initialize the irn data for all nodes having phase data in the given block.
- *
- * @param phase The phase.
- * @param block The block.
- *
- * @note Beware: iterates over all nodes in the graph to find the nodes of the given block.
- */
-void phase_reinit_block_irn_data(ir_phase *phase, ir_node *block);
/**
* Re-initialize the irn data for the given node.
* @param phase The phase.
* @param irn The irn.
*/
-#define phase_reinit_single_irn_data(phase, irn) _phase_reinit_single_irn_data((phase), (irn))
+static inline void phase_reinit_single_irn_data(ir_phase *phase, ir_node *irn,
+ phase_irn_reinit *reinit)
+{
+ int idx;
+
+ if (! phase->data_init)
+ return;
+
+ idx = get_irn_idx(irn);
+ if (phase->data_ptr[idx])
+ phase->data_ptr[idx] = reinit(phase, irn, phase->data_ptr[idx]);
+}
/**
* Returns the first node of the phase having some data assigned.
#define foreach_phase_irn(phase, irn) \
for (irn = phase_get_first_node(phase); irn; irn = phase_get_next_node(phase, irn))
-/**
- * Get the name of the phase.
- *
- * @param phase The phase.
- */
-#define phase_get_name(phase) ((phase)->name)
-
/**
* Get the irg the phase runs on.
*
* @param phase The phase.
*/
-#define phase_get_irg(phase) ((phase)->irg)
+static inline ir_graph *phase_get_irg(const ir_phase *phase)
+{
+ return phase->irg;
+}
/**
* Get private data pointer as passed on creating the phase.
*
* @param phase The phase.
*/
-#define phase_get_private(phase) ((phase)->priv)
+static inline void *phase_get_private(const ir_phase *phase)
+{
+ return phase->priv;
+}
/**
- * Allocate memory in the phase's memory pool.
- *
- * @param phase The phase.
- * @param size Number of bytes to allocate.
+ * Attach pointer with private data to phase
*/
-#define phase_alloc(phase, size) obstack_alloc(phase_obst(phase), (size))
+static inline void phase_set_private(ir_phase *phase, void *priv)
+{
+ phase->priv = priv;
+}
+
+static inline void *phase_alloc(ir_phase *phase, size_t size)
+{
+ return obstack_alloc(&phase->obst, size);
+}
/**
* Get the obstack of a phase.
*
* @param phase The phase.
*/
-#define phase_obst(phase) (&(phase)->obst)
+static inline struct obstack *phase_obst(ir_phase *phase)
+{
+ return &phase->obst;
+}
/**
* Get the phase node data for an irn.
*
* @return A pointer to the node data or NULL if the irn has no phase data allocated yet.
*/
-#define phase_get_irn_data(phase, irn) _phase_get_irn_data((phase), (irn))
-
-/**
- * Get or set phase data for an irn.
- *
- * @param phase The phase.
- * @param irn The irn to get (or set) node data for.
- *
- * @return A (non-NULL) pointer to phase data for the irn. Either existent one or newly allocated one.
- */
-#define phase_get_or_set_irn_data(phase, irn) _phase_get_or_set_irn_data((phase), (irn))
-
-/**
- * Set the node data for an irn.
- *
- * @param phase The phase.
- * @param irn The node.
- * @param data The node data.
- *
- * @return The old data or NULL if there was none.
- */
-#define phase_set_irn_data(phase, irn, data) _phase_set_irn_data((phase), (irn), (data))
-
-/**
- * Get the irg-managed phase for a givedn phase ID.
- * @param irg The irg.
- * @param id The ID.
- * @return The corresponding phase, or NULL if there is none.
- */
-#define get_irg_phase(irg, id) _get_irg_phase((irg), (id))
-
-/**
- * Get the information a phase holds about a node.
- * @param irn The node.
- * @param id The ID of the phase.
- */
-#define get_irn_phase_info(irn, id) _get_phase_irn_info((irn), (id))
-
-/**
- * Get or set information a phase holds about a node.
- * If the given phase does not hold information of the node,
- * the information structure will be created, initialized (see the data_init function of ir_phase), and returned.
- * @param irn The node.
- * @param id The ID of the phase.
- */
-#define get_or_set_irn_phase_info(irn, id) _get_or_set_irn_phase_info((irn), (id))
-
-#define set_irn_phase_info(irn, id) _set_irn_phase_info((irn), (id))
-
-/**
- * This is private and only here for performance reasons.
- */
-static inline void _phase_reinit_single_irn_data(ir_phase *phase, ir_node *irn)
+static inline void *phase_get_irn_data(const ir_phase *ph, const ir_node *irn)
{
- int idx;
-
- if (! phase->data_init)
- return;
-
- idx = get_irn_idx(irn);
- if (phase->data_ptr[idx])
- phase->data_init(phase, irn, phase->data_ptr[idx]);
+ unsigned idx = get_irn_idx(irn);
+ return idx < ph->n_data_ptr ? ph->data_ptr[idx] : NULL;
}
-
/**
* This is private and just here for performance reasons.
*/
-static inline void _private_phase_enlarge(ir_phase *phase, unsigned max_idx)
+static inline void private_phase_enlarge(ir_phase *phase, unsigned max_idx)
{
unsigned last_irg_idx = get_irg_last_idx(phase->irg);
size_t old_cap = phase->n_data_ptr;
/* make the maximum index at least as big as the largest index in the graph. */
max_idx = MAX(max_idx, last_irg_idx);
- new_cap = old_cap + (size_t) (max_idx * phase->growth_factor / 256);
+ new_cap = (size_t) (max_idx + 256);
phase->data_ptr = XREALLOC(phase->data_ptr, void*, new_cap);
phase->n_data_ptr = new_cap;
}
-/**
+/*
* This is private and only here for performance reasons.
*/
-#define _private_phase_assure_capacity(ph, max_idx) ((max_idx) >= (ph)->n_data_ptr ? (_private_phase_enlarge((ph), (max_idx)), 1) : 1)
-
-static inline void *_phase_get_irn_data(const ir_phase *ph, const ir_node *irn)
+static inline void private_phase_assure_capacity(ir_phase *ph, unsigned max_idx)
{
- unsigned idx = get_irn_idx(irn);
- return idx < ph->n_data_ptr ? ph->data_ptr[idx] : NULL;
+ if (max_idx >= ph->n_data_ptr)
+ private_phase_enlarge(ph, max_idx);
}
-static inline void *_phase_set_irn_data(ir_phase *ph, const ir_node *irn, void *data)
+
+/**
+ * Get or set phase data for an irn.
+ *
+ * @param phase The phase.
+ * @param irn The irn to get (or set) node data for.
+ *
+ * @return A (non-NULL) pointer to phase data for the irn. Either existent one or newly allocated one.
+ */
+static inline void *phase_get_or_set_irn_data(ir_phase *ph, const ir_node *irn)
{
unsigned idx = get_irn_idx(irn);
void *res;
/* Assure that there's a sufficient amount of slots. */
- _private_phase_assure_capacity(ph, idx);
+ private_phase_assure_capacity(ph, idx + 1);
res = ph->data_ptr[idx];
- ph->data_ptr[idx] = data;
+ /* If there has no irn data allocated yet, do that now. */
+ if(!res) {
+ phase_irn_init *data_init = ph->data_init;
+
+ /* call the node data structure allocator/constructor. */
+ res = ph->data_ptr[idx] = data_init(ph, irn);
+ }
return res;
}
-
-static inline void *_phase_get_or_set_irn_data(ir_phase *ph, const ir_node *irn)
+/**
+ * Set the node data for an irn.
+ *
+ * @param phase The phase.
+ * @param irn The node.
+ * @param data The node data.
+ *
+ * @return The old data or NULL if there was none.
+ */
+static inline void *phase_set_irn_data(ir_phase *ph, const ir_node *irn,
+ void *data)
{
unsigned idx = get_irn_idx(irn);
void *res;
/* Assure that there's a sufficient amount of slots. */
- _private_phase_assure_capacity(ph, idx);
+ private_phase_assure_capacity(ph, idx + 1);
res = ph->data_ptr[idx];
+ ph->data_ptr[idx] = data;
- /* If there has no irn data allocated yet, do that now. */
- if(!res) {
- phase_irn_init *data_init = ph->data_init;
-
- /* call the node data structure allocator/constructor. */
- res = ph->data_ptr[idx] = data_init(ph, irn, NULL);
-
- }
return res;
}
-static inline ir_phase *_get_irg_phase(const ir_graph *irg, ir_phase_id id)
-{
- return irg->phases[id];
-}
-
-static inline void *_get_irn_phase_info(const ir_node *irn, ir_phase_id id)
+/**
+ * convenience function that returns phase information attached to a node
+ */
+static inline void *get_irn_phase_info(const ir_node *irn, ir_phase_id id)
{
const ir_graph *irg = get_irn_irg(irn);
- const ir_phase *ph = get_irg_phase(irg, id);
- assert(ph && "phase info has to be computed");
- return _phase_get_irn_data(ph, irn);
+ const ir_phase *ph = irg_get_phase(irg, id);
+ return phase_get_irn_data(ph, irn);
}
-static inline void *_get_or_set_irn_phase_info(const ir_node *irn, ir_phase_id id)
+/**
+ * Get or set information a phase holds about a node.
+ * If the given phase does not hold information of the node,
+ * the information structure will be created, initialized (see the data_init
+ * function of ir_phase), and returned.
+ * @param irn The node.
+ * @param id The ID of the phase.
+ */
+static inline void *get_or_set_irn_phase_info(const ir_node *irn, ir_phase_id id)
{
const ir_graph *irg = get_irn_irg(irn);
- ir_phase *ph = get_irg_phase(irg, id);
- assert(ph && "phase info has to be computed");
- return _phase_get_or_set_irn_data(ph, irn);
+ ir_phase *ph = irg_get_phase(irg, id);
+ return phase_get_or_set_irn_data(ph, irn);
}
-static inline void *_set_irn_phase_info(const ir_node *irn, ir_phase_id id, void *data)
+static inline void *set_irn_phase_info(const ir_node *irn, ir_phase_id id,
+ void *data)
{
const ir_graph *irg = get_irn_irg(irn);
- ir_phase *ph = get_irg_phase(irg, id);
- assert(ph && "phase info has to be computed");
- return _phase_set_irn_data(ph, irn, data);
+ ir_phase *ph = irg_get_phase(irg, id);
+ return phase_set_irn_data(ph, irn, data);
}
-
#endif
projects / libfirm / blobdiff