X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2Fbelive_t.h;h=ba4efc180181a49ac6a39ffbdb2699336a5644ff;hb=07ea816fa30005a2e1e94171090327233e05a112;hp=68f671ec12030461d328a4dfbecd6f46cbdf3411;hpb=5d001fc14a7d4ef4926012a9b5864341bac35066;p=libfirm

diff --git a/ir/be/belive_t.h b/ir/be/belive_t.h
index 68f671ec1..ba4efc180 100644
--- a/ir/be/belive_t.h
+++ b/ir/be/belive_t.h
@@ -1,149 +1,144 @@
-/**
- * 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
-
-#include "config.h"
+/**
+ * @file
+ * @brief       Internal headers for liveness analysis.
+ * @author      Sebastian Hack
+ * @date        06.12.2004
+ * @version     $Id$
+ */
+#ifndef FIRM_BE_BELIVE_T_H
+#define FIRM_BE_BELIVE_T_H
 
+#include "be_types.h"
 #include "irgraph_t.h"
-#include "iredges_t.h"
+#include "irphase_t.h"
+#include "irhooks.h"
+#include "dfs.h"
+#include "statev.h"
 
-#include "belive.h"
 #include "pset.h"
-#include "set.h"
-#include "list.h"
-#include "hashptr.h"
-
-typedef enum _live_state_t {
-    live_state_in = 1,
-    live_state_end = 2,
-    live_state_out = 4,
-    live_state_block = 8,
-} live_state_t;
-
-typedef struct _irn_live_t {
-    const ir_node *block;
-    const ir_node *irn;
-    unsigned state;
-    struct _irn_live_t *next;
-} irn_live_t;
-
-typedef struct _irg_live_info_t {
-    set *live;
-} irg_live_info_t;
-
-extern size_t live_irg_data_offset;
-
-#define get_irg_live_info(irg) (get_irg_data(irg, irg_live_info_t, live_irg_data_offset))
-
-#define live_is_in(live) (((live)->state & live_state_in) != 0)
-#define live_is_end(live) (((live)->state & live_state_end) != 0)
-#define live_is_out(live) (((live)->state & live_state_out) != 0)
-
-static INLINE irn_live_t *_get_or_set_live(const ir_node *block,
-    const ir_node *irn, int state)
-{
-  irg_live_info_t *live_info = get_irg_live_info(get_irn_irg(block));
-  irn_live_t *live, templ;
-  unsigned hash = HASH_PTR(block) + 37 * HASH_PTR(irn);
-
-  templ.block = block;
-  templ.irn = irn;
-  templ.state = -1;
-  templ.next = NULL;
+#include "bitset.h"
 
-  live = set_insert(live_info->live, &templ, sizeof(templ), hash);
-  if(live->state == -1) {
+#include "belive.h"
 
-    if(!is_Block(irn)) {
-      irn_live_t *bl_live = _get_or_set_live(block, block, live_state_block);
-      live->next = bl_live->next;
-      bl_live->next = live;
-    }
+#define USE_LIVE_CHK
 
-    live->state = state;
-  }
+#ifdef USE_LIVE_CHK
+#include "irlivechk.h"
+#endif
 
-  live->state |= state;
+struct be_lv_t {
+	ir_phase ph;
+	ir_graph *irg;
+	dfs_t *dfs;
+	bitset_t *nodes;
+	hook_entry_t hook_info;
+#ifdef USE_LIVE_CHK
+	lv_chk_t *lvc;
+#endif
+};
+
+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 {
+	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;
+};
+
+static inline int _be_lv_next_irn(const be_lv_t *lv, const ir_node *bl,
+                                  unsigned flags, int i)
+{
+	be_lv_info_t *arr = (be_lv_info_t*)phase_get_irn_data(&lv->ph, bl);
 
-  return live;
-}
+	if (arr) {
+		int n_members = (int) arr[0].u.head.n_members;
 
-static INLINE int _is_live_in(const ir_node *block, const ir_node *irn)
-{
-    return (_get_or_set_live(block, irn, 0)->state & live_state_in) != 0;
-}
+		while(i < n_members) {
+			if(arr[i + 1].u.node.flags & flags) {
+				return i;
+			}
+			++i;
+		}
+	}
 
-static INLINE int _is_live_out(const ir_node *block, const ir_node *irn)
-{
-    return (_get_or_set_live(block, irn, 0)->state & live_state_out) != 0;
+	return -1;
 }
 
-static INLINE int _is_live_end(const ir_node *block, const ir_node *irn)
+static inline ir_node *_be_lv_get_irn(const be_lv_t *lv, const ir_node *bl, int i)
 {
-    return (_get_or_set_live(block, irn, 0)->state & live_state_end) != 0;
+	be_lv_info_t *arr = (be_lv_info_t*)phase_get_irn_data(&lv->ph, bl);
+	return get_idx_irn(lv->irg, arr[i + 1].u.node.idx);
 }
 
-#define live_foreach(block, live_info) \
-	for(live_info = _get_or_set_live(block, block, 0)->next; live_info; live_info = live_info->next)
+be_lv_info_node_t *be_lv_get(const be_lv_t *li, const ir_node *bl, const ir_node *irn);
 
-static INLINE void _put_live(const ir_node *block, int state, pset *s)
+static inline int _be_is_live_xxx(const be_lv_t *li, const ir_node *block, const ir_node *irn, unsigned flags)
 {
-    irn_live_t *live;
+	int res;
 
-    live_foreach(block, live) {
-        if(live->state & state)
-            pset_insert_ptr(s, live->irn);
-    }
-}
+	if (li->nodes) {
+		be_lv_info_node_t *info = be_lv_get(li, block, irn);
+		res = info ? (info->flags & flags) != 0 : 0;
+	}
 
-static INLINE pset *_put_live_in(const ir_node *block, pset *s)
-{
-    _put_live(block, live_state_in, s);
-    return s;
-}
+#ifdef USE_LIVE_CHK
+	else
+		res = (lv_chk_bl_xxx(li->lvc, block, irn) & flags) != 0;
+#endif /* USE_LIVE_CHK */
 
-static INLINE pset *_put_live_out(const ir_node *block, pset *s)
-{
-    _put_live(block, live_state_out, s);
-    return s;
+	return res;
 }
 
-static INLINE pset *_put_live_end(const ir_node *block, pset *s)
-{
-    _put_live(block, live_state_end, s);
-    return s;
-}
-
-static INLINE int _is_phi_arg(const ir_node *irn)
-{
-  const ir_edge_t *edge;
+#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))
 
-  assert(edges_activated(get_irn_irg(irn)) && "Please compute the out edges");
-  foreach_out_edge(irn, edge)
-    if(is_Phi(edge->src))
-      return 1;
 
-  return 0;
+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));
+	return s;
 }
 
+#define be_lv_get_irn(lv, bl, i)      _be_lv_get_irn(lv, bl, i)
+#define be_lv_pset_put_in(lv, bl, s)  _be_lv_pset_put(lv, bl, be_lv_state_in, s)
+#define be_lv_pset_put_out(lv, bl, s) _be_lv_pset_put(lv, bl, be_lv_state_out, s)
+#define be_lv_pset_put_end(lv, bl, s) _be_lv_pset_put(lv, bl, be_lv_state_end, s)
 
-#define is_live_in(bl,irn) 			_is_live_in(bl, irn)
-#define is_live_out(bl,irn) 		_is_live_out(bl, irn)
-#define is_live_end(bl,irn) 		_is_live_end(bl, irn)
-#define put_live_in(bl,s)			  _put_live_in(bl, s)
-#define put_live_out(bl,s)			_put_live_out(bl, s)
-#define put_live_end(bl,s)			_put_live_end(bl, s)
-#define is_phi_arg(irn)         _is_phi_arg(irn)
+#define be_is_live_in(lv, bl, irn)    _be_is_live_xxx(lv, bl, irn, be_lv_state_in)
+#define be_is_live_end(lv, bl, irn)   _be_is_live_xxx(lv, bl, irn, be_lv_state_end)
+#define be_is_live_out(lv, bl, irn)   _be_is_live_xxx(lv, bl, irn, be_lv_state_out)
 
-/**
- * Initialize the liveness module.
- * To be called from be_init().
- */
-void be_liveness_init(void);
+#define be_lv_has_info_about(lv, irn) bitset_is_set((lv)->nodes, get_irn_idx(irn))
 
 #endif