nsz Git - libfirm/blob - ir/be/belive_t.h

   1 /*
   2  * Copyright (C) 1995-2008 University of Karlsruhe.  All right reserved.
   3  *
   4  * This file is part of libFirm.
   5  *
   6  * This file may be distributed and/or modified under the terms of the
   7  * GNU General Public License version 2 as published by the Free Software
   8  * Foundation and appearing in the file LICENSE.GPL included in the
   9  * packaging of this file.
  10  *
  11  * Licensees holding valid libFirm Professional Edition licenses may use
  12  * this file in accordance with the libFirm Commercial License.
  13  * Agreement provided with the Software.
  14  *
  15  * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
  16  * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  17  * PURPOSE.
  18  */
  19
  20 /**
  21  * @file
  22  * @brief       Internal headers for liveness analysis.
  23  * @author      Sebastian Hack
  24  * @date        06.12.2004
  25  * @version     $Id$
  26  */
  27 #ifndef FIRM_BE_BELIVE_T_H
  28 #define FIRM_BE_BELIVE_T_H
  29
  30 #include "irgraph_t.h"
  31 #include "irphase_t.h"
  32 #include "irhooks.h"
  33 #include "dfs.h"
  34 #include "statev.h"
  35
  36 #include "pset.h"
  37 #include "bitset.h"
  38
  39 #include "belive.h"
  40
  41 #define USE_LIVE_CHK
  42
  43 #ifdef USE_LIVE_CHK
  44 #include "irlivechk.h"
  45 #endif
  46
  47 struct be_irg_t;
  48
  49 struct _be_lv_t {
  50         ir_phase ph;
  51         ir_graph *irg;
  52         dfs_t *dfs;
  53         const struct be_irg_t *birg;
  54         bitset_t *nodes;
  55         hook_entry_t hook_info;
  56 #ifdef USE_LIVE_CHK
  57         lv_chk_t *lvc;
  58 #endif
  59 };
  60
  61 struct _be_lv_info_node_t {
  62         unsigned idx;
  63         unsigned flags;
  64 };
  65
  66 struct _be_lv_info_head_t {
  67         unsigned n_members;
  68         unsigned n_size;
  69 };
  70
  71 struct _be_lv_info_t {
  72         union {
  73                 struct _be_lv_info_head_t head;
  74                 struct _be_lv_info_node_t node;
  75         } u;
  76 };
  77
  78 static INLINE int _be_lv_next_irn(const struct _be_lv_t *lv, const ir_node *bl, unsigned flags, int i)
  79 {
  80         struct _be_lv_info_t *arr = phase_get_irn_data(&lv->ph, bl);
  81
  82         if (arr) {
  83                 int n_members = (int) arr[0].u.head.n_members;
  84
  85                 while(i < n_members) {
  86                         if(arr[i + 1].u.node.flags & flags) {
  87                                 return i;
  88                         }
  89                         ++i;
  90                 }
  91         }
  92
  93         return -1;
  94 }
  95
  96 static INLINE ir_node *_be_lv_get_irn(const struct _be_lv_t *lv, const ir_node *bl, int i)
  97 {
  98         struct _be_lv_info_t *arr = phase_get_irn_data(&lv->ph, bl);
  99         return get_idx_irn(lv->irg, arr[i + 1].u.node.idx);
 100 }
 101
 102 struct _be_lv_info_node_t *be_lv_get(const struct _be_lv_t *li, const ir_node *bl, const ir_node *irn);
 103
 104 static INLINE int _be_is_live_xxx(const struct _be_lv_t *li, const ir_node *block, const ir_node *irn, unsigned flags)
 105 {
 106         int res;
 107
 108         if (li->nodes) {
 109                 struct _be_lv_info_node_t *info = be_lv_get(li, block, irn);
 110                 res = info ? (info->flags & flags) != 0 : 0;
 111         }
 112
 113 #ifdef USE_LIVE_CHK
 114         else
 115                 res = (lv_chk_bl_xxx(li->lvc, block, irn) & flags) != 0;
 116 #endif /* USE_LIVE_CHK */
 117
 118         return res;
 119 }
 120
 121 #define be_lv_foreach(lv, bl, flags, i) \
 122         for (i = _be_lv_next_irn(lv, bl, flags, 0); i >= 0; i = _be_lv_next_irn(lv, bl, flags, i + 1))
 123
 124
 125 static INLINE pset *_be_lv_pset_put(const struct _be_lv_t *lv, const ir_node *block, int state, pset *s)
 126 {
 127         int i;
 128         be_lv_foreach(lv, block, state, i)
 129                 pset_insert_ptr(s, _be_lv_get_irn(lv, block, i));
 130         return s;
 131 }
 132
 133 #define be_lv_get_irn(lv, bl, i)      _be_lv_get_irn(lv, bl, i)
 134 #define be_lv_pset_put_in(lv, bl, s)  _be_lv_pset_put(lv, bl, be_lv_state_in, s)
 135 #define be_lv_pset_put_out(lv, bl, s) _be_lv_pset_put(lv, bl, be_lv_state_out, s)
 136 #define be_lv_pset_put_end(lv, bl, s) _be_lv_pset_put(lv, bl, be_lv_state_end, s)
 137
 138 #define be_is_live_in(lv, bl, irn)    _be_is_live_xxx(lv, bl, irn, be_lv_state_in)
 139 #define be_is_live_end(lv, bl, irn)   _be_is_live_xxx(lv, bl, irn, be_lv_state_end)
 140 #define be_is_live_out(lv, bl, irn)   _be_is_live_xxx(lv, bl, irn, be_lv_state_out)
 141
 142 #define be_lv_has_info_about(lv, irn) bitset_is_set((lv)->nodes, get_irn_idx(irn))
 143
 144 #endif /* FIRM_BE_BELIVE_T_H */