X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2Fbecopyopt_t.h;h=31068c81c6bc3f00d2e7ad30540d22882b20f336;hb=fef8dc3eff6468d7d65485af8e1ac9884c504e1a;hp=9f42944d7da830ab34b16b4abc64532c1b606caf;hpb=8279528bb31ccbdf4bbdc8db9e6e3f3818094e8c;p=libfirm diff --git a/ir/be/becopyopt_t.h b/ir/be/becopyopt_t.h index 9f42944d7..31068c81c 100644 --- a/ir/be/becopyopt_t.h +++ b/ir/be/becopyopt_t.h @@ -1,61 +1,80 @@ -/** - * Author: Daniel Grund - * Date: 12.04.2005 - * Copyright: (c) 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. * - * Internal header for copy optimization problem. + * 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 _BECOPYOPT_T_H -#define _BECOPYOPT_T_H +/** + * @file + * @brief Internal header for copy optimization problem. + * @author Daniel Grund + * @date 12.04.2005 + */ +#ifndef FIRM_BE_BECOPYOPT_T_H +#define FIRM_BE_BECOPYOPT_T_H #include "obst.h" #include "list.h" -#include "bearch_t.h" +#include "set.h" +#include "irnode_t.h" + +#include "bearch.h" #include "bechordal_t.h" #include "becopyopt.h" -#include "benodesets.h" /** * Data representing the problem of copy minimization. */ -struct _copy_opt_t { - be_chordal_env_t *cenv; +struct copy_opt_t { + be_chordal_env_t *cenv; const arch_register_class_t *cls; - const arch_env_t *aenv; - ir_graph *irg; - char *name; /**< ProgName__IrgName__RegClassName */ - cost_fct_t get_costs; /**< function ptr used to get costs for copies */ + ir_graph *irg; + char *name; /**< ProgName__IrgName__RegClassName */ + cost_fct_t get_costs; /**< function ptr used to get costs for copies */ /** Representation as optimization units */ - struct list_head units; /**< all units to optimize in specific order */ + struct list_head units; /**< all units to optimize in specific order */ /** Representation in graph structure. Only build on demand */ struct obstack obst; - set *nodes; + set *nodes; }; /* Helpers */ -#define ASSERT_OU_AVAIL(co) assert((co)->units.next && "Representation as optimization-units not build") -#define ASSERT_GS_AVAIL(co) assert((co)->nodes && "Representation as graph not build") +#define ASSERT_OU_AVAIL(co) assert((co)->units.next && "Representation as optimization-units not build") +#define ASSERT_GS_AVAIL(co) assert((co)->nodes && "Representation as graph not build") + +static inline unsigned get_irn_col(const ir_node *node) +{ + return arch_get_irn_register(node)->index; +} -#define get_irn_col(co, irn) arch_register_get_index(arch_get_irn_register((co)->aenv, irn)) -#define set_irn_col(co, irn, col) arch_set_irn_register((co)->aenv, irn, arch_register_for_index((co)->cls, col)) -#define is_curr_reg_class(co, irn) (arch_get_irn_reg_class((co)->aenv, irn, -1) == (co)->cls) +static inline void set_irn_col(const arch_register_class_t *cls, ir_node *node, + unsigned color) +{ + const arch_register_t *reg = arch_register_for_index(cls, color); + arch_set_irn_register(node, reg); +} #define list_entry_units(lh) list_entry(lh, unit_t, units) -#define is_Reg_Phi(irn) (is_Phi(irn) && mode_is_data(get_irn_mode(irn))) +#define is_Reg_Phi(irn) (is_Phi(irn) && mode_is_data(get_irn_mode(irn))) -#define get_Perm_src(irn) (get_irn_n(get_Proj_pred(irn), get_Proj_proj(irn))) -#define is_Perm(arch_env, irn) (arch_irn_classify(arch_env, irn) == arch_irn_class_perm) -#define is_Perm_Proj(arch_env, irn) (is_Proj(irn) && is_Perm(arch_env, get_Proj_pred(irn))) - -static INLINE int is_2addr_code(const arch_register_req_t *req) -{ - return req->type == arch_register_req_type_should_be_same; -} +#define get_Perm_src(irn) (get_irn_n(get_Proj_pred(irn), get_Proj_proj(irn))) +#define is_Perm_Proj(irn) (is_Proj(irn) && be_is_Perm(get_Proj_pred(irn))) /****************************************************************************** ____ _ _ _ _ _ _____ _ @@ -70,19 +89,19 @@ static INLINE int is_2addr_code(const arch_register_req_t *req) #define MIS_HEUR_TRIGGER 8 -typedef struct _unit_t { - struct list_head units; /**< chain for all units */ - copy_opt_t *co; /**< the copy opt this unit belongs to */ - int node_count; /**< size of the nodes array */ - ir_node **nodes; /**< [0] is the root-node, others are non interfering args of it. */ - int *costs; /**< costs[i] are incurred, if nodes[i] has a different color */ - int inevitable_costs; /**< sum of costs of all args interfering with root */ - int all_nodes_costs; /**< sum of all costs[i] */ - int min_nodes_costs; /**< a lower bound for the costs in costs[], determined by a max independent set */ - int sort_key; /**< maximum costs. controls the order of ou's in the struct list_head units. */ +typedef struct unit_t { + struct list_head units; /**< chain for all units */ + copy_opt_t *co; /**< the copy opt this unit belongs to */ + int node_count; /**< size of the nodes array */ + ir_node **nodes; /**< [0] is the root-node, others are non interfering args of it. */ + int *costs; /**< costs[i] are incurred, if nodes[i] has a different color */ + int inevitable_costs; /**< sum of costs of all args interfering with root */ + int all_nodes_costs; /**< sum of all costs[i] */ + int min_nodes_costs; /**< a lower bound for the costs in costs[], determined by a max independent set */ + int sort_key; /**< maximum costs. controls the order of ou's in the struct list_head units. */ /* for heuristic */ - struct list_head queue; /**< list of qn's sorted by weight of qn-mis */ + struct list_head queue; /**< list of qn's sorted by weight of qn-mis */ } unit_t; @@ -98,38 +117,34 @@ typedef struct _unit_t { |_| |___/ ******************************************************************************/ -typedef struct _neighb_t neighb_t; -typedef struct _affinity_node_t affinity_node_t; +typedef struct neighb_t neighb_t; +typedef struct affinity_node_t affinity_node_t; -struct _neighb_t { - neighb_t *next; /** the next neighbour entry*/ - ir_node *irn; /** the neighbour itself */ - int costs; /** the costs of the edge (affinity_node_t->irn, neighb_t->irn) */ +struct neighb_t { + neighb_t *next; /** the next neighbour entry*/ + const ir_node *irn; /** the neighbour itself */ + int costs; /** the costs of the edge (affinity_node_t->irn, neighb_t->irn) */ }; -struct _affinity_node_t { - ir_node *irn; /** a node with affinity edges */ - int degree; /** number of affinity edges in the linked list below */ - neighb_t *neighbours; /** a linked list of all affinity neighbours */ - void *data; /** stuff that is attachable. */ +struct affinity_node_t { + const ir_node *irn; /** a node with affinity edges */ + int degree; /** number of affinity edges in the linked list below */ + neighb_t *neighbours; /** a linked list of all affinity neighbours */ + void *data; /** stuff that is attachable. */ }; -static INLINE affinity_node_t *get_affinity_info(const copy_opt_t *co, ir_node *irn) { +static inline affinity_node_t *get_affinity_info(const copy_opt_t *co, const ir_node *irn) +{ affinity_node_t find; ASSERT_GS_AVAIL(co); find.irn = irn; - return set_find(co->nodes, &find, sizeof(find), nodeset_hash(irn)); + return set_find(affinity_node_t, co->nodes, &find, sizeof(find), hash_irn(irn)); } -#define co_gs_nodes_begin(co) set_first((co)->nodes) -#define co_gs_nodes_next(co) set_next((co)->nodes) -#define co_gs_nodes_break(co) set_break((co)->nodes) - -#define co_gs_foreach_aff_node(co, aff_node) for (aff_node = co_gs_nodes_begin(co); aff_node; aff_node = co_gs_nodes_next(co)) -#define co_gs_foreach_neighb(aff_node, neighb) for (neighb = aff_node->neighbours; neighb; neighb = neighb->next) - +#define co_gs_foreach_aff_node(co, aff_node) foreach_set((co)->nodes, affinity_node_t, (aff_node)) +#define co_gs_foreach_neighb(aff_node, neighb) for (neighb_t *neighb = aff_node->neighbours; neighb; neighb = neighb->next) -#endif +#endif /* FIRM_BE_BECOPYOPT_T_H */