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  */
  26 #ifndef FIRM_BE_BELIVE_T_H
  27 #define FIRM_BE_BELIVE_T_H
  28
  29 #include <stdbool.h>
  30 #include "irnodehashmap.h"
  31 #include "irhooks.h"
  32 #include "irlivechk.h"
  33 #include "belive.h"
  34
  35 struct be_lv_t {
  36         ir_nodehashmap_t map;
  37         struct obstack   obst;
  38         bool             sets_valid;
  39         ir_graph        *irg;
  40         hook_entry_t     hook_info;
  41         lv_chk_t        *lvc;
  42 };
  43
  44 typedef struct be_lv_info_node_t be_lv_info_node_t;
  45 struct be_lv_info_node_t {
  46         unsigned idx;
  47         unsigned flags;
  48 };
  49
  50 struct be_lv_info_head_t {
  51         unsigned n_members;
  52         unsigned n_size;
  53 };
  54
  55 union be_lv_info_t {
  56         struct be_lv_info_head_t head;
  57         struct be_lv_info_node_t node;
  58 };
  59
  60 be_lv_info_node_t *be_lv_get(const be_lv_t *li, const ir_node *block,
  61                              const ir_node *irn);
  62
  63 static inline unsigned _be_is_live_xxx(const be_lv_t *li, const ir_node *block,
  64                                        const ir_node *irn, unsigned flags)
  65 {
  66         unsigned res;
  67
  68         if (li->sets_valid) {
  69                 be_lv_info_node_t *info = be_lv_get(li, block, irn);
  70                 res = info != NULL ? (info->flags & flags) != 0 : 0;
  71         } else {
  72                 res = (lv_chk_bl_xxx(li->lvc, block, irn) & flags) != 0;
  73         }
  74
  75         return res;
  76 }
  77
  78 typedef struct lv_iterator_t
  79 {
  80         be_lv_info_t *info;
  81         ir_graph     *irg;
  82         be_lv_state_t flags;
  83         size_t        i;
  84 } lv_iterator_t;
  85
  86 static inline lv_iterator_t be_lv_iteration_begin(const be_lv_t *lv,
  87         const ir_node *block, be_lv_state_t flags)
  88 {
  89         lv_iterator_t res;
  90         res.info  = ir_nodehashmap_get(be_lv_info_t, &lv->map, block);
  91         res.irg   = get_Block_irg(block);
  92         res.flags = flags;
  93         res.i     = res.info != NULL ? res.info[0].head.n_members : 0;
  94         return res;
  95 }
  96
  97 static inline ir_node *be_lv_iteration_next(lv_iterator_t *iterator)
  98 {
  99         while (iterator->i != 0) {
 100                 const be_lv_info_t *info = iterator->info + iterator->i--;
 101                 if (info->node.flags & iterator->flags)
 102                         return get_idx_irn(iterator->irg, info->node.idx);
 103         }
 104         return NULL;
 105 }
 106
 107 #define be_lv_foreach(lv, block, flags, node) \
 108         for (bool once = true; once;) \
 109                 for (lv_iterator_t iter = be_lv_iteration_begin((lv), (block), (flags)); once; once = false) \
 110                         for (ir_node *node; (node = be_lv_iteration_next(&iter)) != NULL;)
 111
 112 #define be_is_live_in(lv, bl, irn)    _be_is_live_xxx(lv, bl, irn, be_lv_state_in)
 113 #define be_is_live_end(lv, bl, irn)   _be_is_live_xxx(lv, bl, irn, be_lv_state_end)
 114 #define be_is_live_out(lv, bl, irn)   _be_is_live_xxx(lv, bl, irn, be_lv_state_out)
 115
 116 #endif