X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2Fbelive_t.h;h=a8d939d881543dea1edf99c12504d5c70325146b;hb=79268f7122ba8f5820658967157b3a9c78ea492a;hp=061826a2009dfdc050f779755c3aab5240e2146e;hpb=423c859509f75769c66d1509110d7c678c6158d4;p=libfirm diff --git a/ir/be/belive_t.h b/ir/be/belive_t.h index 061826a20..a8d939d88 100644 --- a/ir/be/belive_t.h +++ b/ir/be/belive_t.h @@ -1,90 +1,126 @@ -/** - * Internal headers for liveness analysis. - * @author Sebastian Hack - * @date 6.12.2004 +/* + * 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 _BELIVE_T_H -#define _BELIVE_T_H +/** + * @file + * @brief Internal headers for liveness analysis. + * @author Sebastian Hack + * @date 06.12.2004 + */ +#ifndef FIRM_BE_BELIVE_T_H +#define FIRM_BE_BELIVE_T_H +#include +#include "be_types.h" #include "irgraph_t.h" -#include "iredges_t.h" -#include "irphase_t.h" +#include "irnodehashmap.h" #include "irhooks.h" +#include "irlivechk.h" +#include "statev.h" #include "pset.h" -#include "set.h" -#include "list.h" -#include "hashptr.h" #include "bitset.h" #include "belive.h" -struct _be_lv_t { - phase_t ph; - ir_graph *irg; - bitset_t *nodes; - hook_entry_t hook_info; - DEBUG_ONLY(firm_dbg_module_t *dbg;) +struct be_lv_t { + ir_nodehashmap_t map; + struct obstack obst; + bool sets_valid; + ir_graph *irg; + hook_entry_t hook_info; + lv_chk_t *lvc; }; -struct _be_lv_info_node_t { +typedef struct be_lv_info_node_t be_lv_info_node_t; +struct be_lv_info_node_t { unsigned idx; unsigned flags; }; -struct _be_lv_info_head_t { +struct be_lv_info_head_t { unsigned n_members; unsigned n_size; }; -struct _be_lv_info_t { - union { - struct _be_lv_info_head_t head; - struct _be_lv_info_node_t node; - } u; +union be_lv_info_t { + struct be_lv_info_head_t head; + struct be_lv_info_node_t node; }; -static INLINE int _be_lv_next_irn(const struct _be_lv_t *lv, const ir_node *bl, unsigned flags, int i) +be_lv_info_node_t *be_lv_get(const be_lv_t *li, const ir_node *block, + const ir_node *irn); + +static inline unsigned _be_is_live_xxx(const be_lv_t *li, const ir_node *block, + const ir_node *irn, unsigned flags) { - struct _be_lv_info_t *arr = phase_get_irn_data(&lv->ph, bl); - if(arr) { - int n_members = (int) arr[0].u.head.n_members; - - while(i < n_members) { - if(arr[i + 1].u.node.flags & flags) { - return i; - } - ++i; - } + unsigned res; + + if (li->sets_valid) { + be_lv_info_node_t *info = be_lv_get(li, block, irn); + res = info != NULL ? (info->flags & flags) != 0 : 0; + } else { + res = (lv_chk_bl_xxx(li->lvc, block, irn) & flags) != 0; } - return -1; + return res; } -static INLINE ir_node * _be_lv_get_irn(const struct _be_lv_t *lv, const ir_node *bl, int i) +typedef struct lv_iterator_t { - struct _be_lv_info_t *arr = phase_get_irn_data(&lv->ph, bl); - return get_idx_irn(lv->irg, arr[i + 1].u.node.idx); + be_lv_info_t *info; + ir_graph *irg; + be_lv_state_t flags; + size_t i; +} lv_iterator_t; + +static inline lv_iterator_t be_lv_iteration_begin(const be_lv_t *lv, + const ir_node *block, be_lv_state_t flags) +{ + lv_iterator_t res; + res.info = ir_nodehashmap_get(be_lv_info_t, &lv->map, block); + res.irg = get_Block_irg(block); + res.flags = flags; + res.i = res.info != NULL ? res.info[0].head.n_members : 0; + return res; } -struct _be_lv_info_node_t *be_lv_get(const struct _be_lv_t *li, const ir_node *bl, const ir_node *irn); - -static INLINE int _be_is_live_xxx(const struct _be_lv_t *li, const ir_node *block, const ir_node *irn, unsigned flags) +static inline ir_node *be_lv_iteration_next(lv_iterator_t *iterator) { - struct _be_lv_info_node_t *info = be_lv_get(li, block, irn); - return info ? (info->flags & flags) != 0 : 0; + while (iterator->i != 0) { + const be_lv_info_t *info = iterator->info + iterator->i--; + if (info->node.flags & iterator->flags) + return get_idx_irn(iterator->irg, info->node.idx); + } + return NULL; } -#define be_lv_foreach(lv, bl, flags, i) \ - for(i = _be_lv_next_irn(lv, bl, flags, 0); i >= 0; i = _be_lv_next_irn(lv, bl, flags, i + 1)) - +#define be_lv_foreach(lv, block, flags, node) \ + for (bool once = true; once;) \ + for (lv_iterator_t iter = be_lv_iteration_begin((lv), (block), (flags)); once; once = false) \ + for (ir_node *node; (node = be_lv_iteration_next(&iter)) != NULL;) -static INLINE pset *_be_lv_pset_put(struct _be_lv_t *lv, const ir_node *block, int state, pset *s) +static inline pset *_be_lv_pset_put(const be_lv_t *lv, const ir_node *block, + int state, pset *s) { - int i; - be_lv_foreach(lv, block, state, i) - pset_insert_ptr(s, _be_lv_get_irn(lv, block, i)); + be_lv_foreach(lv, block, state, node) + pset_insert_ptr(s, node); return s; }