nsz Git - libfirm/blob - ir/ana/absgraph.c

   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    absgraph.c
  22  * @author  Sebastian Hack
  23  * @date    20.04.2007
  24  * @version $Id$
  25  * @brief
  26  *
  27  * Abstract graph implementations for the CFG of a ir_graph.
  28  */
  29 #include <config.h>
  30
  31 #include "irgraph_t.h"
  32 #include "iredges_t.h"
  33 #include "absgraph.h"
  34
  35 static void *irg_cfg_succ_get_root(void *self)
  36 {
  37         ir_graph *irg = (ir_graph*) self;
  38         edges_assure_kind(irg, EDGE_KIND_BLOCK);
  39         return get_irg_start_block(irg);
  40 }
  41
  42 static void *irg_cfg_succ_get_end(void *self)
  43 {
  44         ir_graph *irg = (ir_graph*) self;
  45         return get_irg_end_block(irg);
  46 }
  47
  48 static void irg_cfg_succ_grow_succs(void *self, void *node, struct obstack *obst)
  49 {
  50         ir_node *bl = (ir_node*) node;
  51         const ir_edge_t *edge;
  52
  53         (void) self;
  54         foreach_block_succ(bl, edge) {
  55                 obstack_ptr_grow(obst, get_edge_src_irn(edge));
  56         }
  57 }
  58
  59 const absgraph_t absgraph_irg_cfg_succ = {
  60         irg_cfg_succ_get_root,
  61         irg_cfg_succ_grow_succs,
  62         irg_cfg_succ_get_end
  63 };
  64
  65 static void *irg_cfg_pred_get_root(void *self)
  66 {
  67         return get_irg_end_block((ir_graph*) self);
  68 }
  69
  70 static void *irg_cfg_pred_get_end(void *self)
  71 {
  72         return get_irg_start_block((ir_graph*) self);
  73 }
  74
  75 static void irg_cfg_pred_grow_succs(void *self, void *node, struct obstack *obst)
  76 {
  77         int i, n;
  78
  79         (void) self;
  80         for (i = 0, n = get_irn_arity((ir_node*) node); i < n; ++i) {
  81                 obstack_ptr_grow(obst, get_irn_n((ir_node*) node, i));
  82         }
  83 }
  84
  85 const absgraph_t absgraph_irg_cfg_pred = {
  86         irg_cfg_pred_get_root,
  87         irg_cfg_pred_grow_succs,
  88         irg_cfg_pred_get_end
  89 };