X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fir%2Firphase_t.h;h=9a6e4630ab1bf3b991e36fa09abaf63be3a9e784;hb=a572aa3cb3a08690a3d2d6567bd26ab7c52a81c5;hp=00d2c1252d383692315794124824a465c182638c;hpb=e07b61c6ed5d198a484761f8a40a4f26520d964d;p=libfirm diff --git a/ir/ir/irphase_t.h b/ir/ir/irphase_t.h index 00d2c1252..9a6e4630a 100644 --- a/ir/ir/irphase_t.h +++ b/ir/ir/irphase_t.h @@ -30,49 +30,28 @@ #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; /** @@ -83,62 +62,6 @@ typedef struct { */ 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 PHASE_NOT_IRG_MANAGED. - * - * @param ph The memory of the phase to initialize. - * @param irg The irg. - * @param id The ID of the irg-managed phase (see irphaselist.h). - * @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. @@ -146,7 +69,18 @@ void phase_reinit_block_irn_data(ir_phase *phase, ir_node *block); * @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. @@ -177,41 +111,48 @@ ir_node *phase_get_next_node(const ir_phase *phase, ir_node *start); #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. @@ -221,75 +162,16 @@ ir_node *phase_get_next_node(const ir_phase *phase, ir_node *start); * * @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; @@ -297,7 +179,7 @@ static INLINE void _private_phase_enlarge(ir_phase *phase, unsigned max_idx) /* 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 = (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); @@ -306,81 +188,99 @@ static INLINE void _private_phase_enlarge(ir_phase *phase, unsigned max_idx) 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