/*
- * Project: libFIRM
- * File name: ir/ir/irphase_t.c
- * Purpose: Phase information handling using node indexes.
- * Author: Sebastian Hack
- * Modified by:
- * Created:
- * CVS-ID: $Id$
- * Copyright: (c) 1998-2007 Universitaet Karlsruhe
- * Licence: This file protected by GPL - GNU GENERAL PUBLIC LICENSE.
+ * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved.
+ *
+ * This file is part of libFirm.
+ *
+ * This file may be distributed and/or modified under the terms of the
+ * GNU General Public License version 2 as published by the Free Software
+ * Foundation and appearing in the file LICENSE.GPL included in the
+ * packaging of this file.
+ *
+ * Licensees holding valid libFirm Professional Edition licenses may use
+ * this file in accordance with the libFirm Commercial License.
+ * Agreement provided with the Software.
+ *
+ * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+ * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+ * PURPOSE.
*/
-#ifndef _FIRM_IR_PHASE_T_H
-#define _FIRM_IR_PHASE_T_H
+/**
+ * @file
+ * @brief Phase information handling using node indexes.
+ * @author Sebastian Hack
+ * @version $Id$
+ */
+#ifndef FIRM_IR_PHASE_T_H
+#define FIRM_IR_PHASE_T_H
#include "firm_types.h"
-#include "obstack.h"
+#include "obst.h"
#include "irgraph_t.h"
#include "irtools.h"
-#include "irtools.h"
+#include "irphases_t.h"
-typedef struct {
- unsigned node_slots;
- unsigned node_slots_used;
- unsigned node_data_bytes;
- unsigned node_map_bytes;
- unsigned overall_bytes;
-} phase_stat_t;
+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);
/**
- * Phase statistics.
+ * A default node initializer.
+ * It does nothing and returns NULL.
*/
-phase_stat_t *phase_stat(const ir_phase *phase, phase_stat_t *stat);
+extern phase_irn_init phase_irn_init_default;
/**
- * The type of a phase data init function. This callback is called to
- * (re-) initialize the phase data for each new node.
- *
- * @param phase The phase.
- * @param irn The node for which the phase data is (re-) initialized
- * @param old The old phase data for this node.
- *
- * @return The new (or reinitialized) phase data for this node.
- *
- * If newly node data is allocated, old is equal to NULL, else points to the old data.
+ * A phase object.
*/
-typedef void *(phase_irn_data_init_t)(ir_phase *phase, ir_node *irn, void *old);
+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. */
+};
+
+#define PHASE_DEFAULT_GROWTH (256)
+
/**
- * The default grow factor.
- * The node => data map does not speculatively allocate more slots.
+ * For statistics: A type containing statistic data of a phase object.
*/
-#define PHASE_DEFAULT_GROWTH (256)
+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. */
+} phase_stat_t;
/**
- * A phase object.
+ * Collect Phase statistics.
+ *
+ * @param phase The phase.
+ * @param stat Will be filled with the statistical data.
*/
-struct _ir_phase {
- struct obstack obst; /**< The obstack where the irn phase data will be stored on. */
- 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_data_init_t *data_init; /**< A callback that is called to initialize newly created node data. */
-};
+phase_stat_t *phase_stat(const ir_phase *phase, phase_stat_t *stat);
/**
* Initialize a phase object.
* @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_data_init_t *data_init, void *priv);
+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 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.
*
* @return The first irn having some data assigned, NULL otherwise
*/
-ir_node *phase_get_first_node(ir_phase *phase);
+ir_node *phase_get_first_node(const ir_phase *phase);
/**
* Returns the next node after @p start having some data assigned.
*
* @return The next node after start having some data assigned, NULL otherwise
*/
-ir_node *phase_get_next_node(ir_phase *phase, ir_node *start);
+ir_node *phase_get_next_node(const ir_phase *phase, ir_node *start);
/**
* Convenience macro to iterate over all nodes of a phase
*/
#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_reinit_single_irn_data(ir_phase *phase, ir_node *irn)
{
int idx;
/**
* 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;
max_idx = MAX(max_idx, last_irg_idx);
new_cap = (size_t) (max_idx * phase->growth_factor / 256);
- phase->data_ptr = (void **)xrealloc(phase->data_ptr, new_cap * sizeof(phase->data_ptr[0]));
+ phase->data_ptr = XREALLOC(phase->data_ptr, void*, new_cap);
/* initialize the newly allocated memory. */
memset(phase->data_ptr + old_cap, 0, (new_cap - old_cap) * sizeof(phase->data_ptr[0]));
*/
#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 *_phase_get_irn_data(const ir_phase *ph, const ir_node *irn)
{
unsigned idx = get_irn_idx(irn);
return idx < ph->n_data_ptr ? ph->data_ptr[idx] : NULL;
}
-static INLINE void *_phase_set_irn_data(ir_phase *ph, const ir_node *irn, void *data)
+static inline void *_phase_set_irn_data(ir_phase *ph, const ir_node *irn, void *data)
{
unsigned idx = get_irn_idx(irn);
void *res;
}
-static INLINE void *_phase_get_or_set_irn_data(ir_phase *ph, ir_node *irn)
+static inline void *_phase_get_or_set_irn_data(ir_phase *ph, const ir_node *irn)
{
unsigned idx = get_irn_idx(irn);
void *res;
/* If there has no irn data allocated yet, do that now. */
if(!res) {
- phase_irn_data_init_t *data_init = ph->data_init;
+ 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;
}
-#endif /* _FIRM_IR_PHASE_T_H */
+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)
+{
+ 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);
+}
+
+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);
+}
+
+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);
+}
+
+
+#endif