/*
- * Project: libFIRM
- * File name: ir/ana/analyze_irg_agrs.c
- * Purpose: read/write analyze of graph argument, which have mode reference.
- * Author: Beyhan Veliev
- * Created:
- * CVS-ID: $Id$
- * Copyright: (c) 1998-2005 Universität Karlsruhe
- * Licence: This file protected by GPL - GNU GENERAL PUBLIC LICENSE.
+ * Copyright (C) 1995-2007 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.
*/
/**
- * @file analyze_irg_agrs.c
- *
+ * @file
+ * @brief read/write analyze of graph argument, which have mode reference.
+ * @author Beyhan Veliev
+ * @version $Id$
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
-#ifdef HAVE_MALLOC_H
-# include <malloc.h>
-#endif
-#ifdef HAVE_ALLOCA_H
-# include <alloca.h>
-#endif
#ifdef HAVE_STDLIB_H
# include <stdlib.h>
#endif
#include "array.h"
#include "irprog.h"
#include "entity_t.h"
+#include "xmalloc.h"
#include "analyze_irg_args.h"
}
else {
ir_op *op = get_irn_op(ptr);
- entity *meth_ent;
+ ir_entity *meth_ent;
if (op == op_SymConst && get_SymConst_kind(ptr) == symconst_addr_ent) {
meth_ent = get_SymConst_entity(ptr);
*
* @param irg The ir graph to analyze.
*/
-static void analyze_ent_args(entity *ent)
+static void analyze_ent_args(ir_entity *ent)
{
ir_graph *irg;
ir_node *irg_args, *arg;
mtp = get_entity_type(ent);
nparams = get_method_n_params(mtp);
- ent->param_access = NEW_ARR_F(ptr_access_kind, nparams);
+ ent->attr.mtd_attr.param_access = NEW_ARR_F(ptr_access_kind, nparams);
/* If the method haven't parameters we have
* nothing to do.
/* we have not yet analyzed the graph, set ALL access for pointer args */
for (i = nparams - 1; i >= 0; --i)
- ent->param_access[i] =
+ ent->attr.mtd_attr.param_access[i] =
is_Pointer_type(get_method_param_type(mtp, i)) ? ptr_access_all : ptr_access_none;
if (! irg) {
return;
}
- /* Call algorithm that computes the out edges */
- if (get_irg_outs_state(irg) != outs_consistent)
- compute_irg_outs(irg);
+ assure_irg_outs(irg);
irg_args = get_irg_args(irg);
}
/* copy the temporary info */
- memcpy(ent->param_access, rw_info, nparams * sizeof(ent->param_access[0]));
+ memcpy(ent->attr.mtd_attr.param_access, rw_info,
+ nparams * sizeof(ent->attr.mtd_attr.param_access[0]));
#if 0
printf("\n%s:\n", get_entity_name(ent));
for (i = 0; i < nparams; ++i) {
if (is_Pointer_type(get_method_param_type(mtp, i)))
- if (ent->param_access[i] != ptr_access_none) {
+ if (ent->attr.mtd_attr.param_access[i] != ptr_access_none) {
printf(" Pointer Arg %d access: ", i);
- if (ent->param_access[i] & ptr_access_read)
+ if (ent->attr.mtd_attr.param_access[i] & ptr_access_read)
printf("READ ");
- if (ent->param_access[i] & ptr_access_write)
+ if (ent->attr.mtd_attr.param_access[i] & ptr_access_write)
printf("WRITE ");
- if (ent->param_access[i] & ptr_access_store)
+ if (ent->attr.mtd_attr.param_access[i] & ptr_access_store)
printf("STORE ");
printf("\n");
}
*/
void analyze_irg_args(ir_graph *irg)
{
- entity *ent;
+ ir_entity *ent;
if (irg == get_const_code_irg())
return;
if (! ent)
return;
- if (! ent->param_access)
+ if (! ent->attr.mtd_attr.param_access)
analyze_ent_args(ent);
}
* Compute for a method with pointer parameter(s)
* if they will be read or written.
*/
-ptr_access_kind get_method_param_access(entity *ent, int pos)
+ptr_access_kind get_method_param_access(ir_entity *ent, int pos)
{
ir_type *mtp = get_entity_type(ent);
- int is_variadic = get_method_variadicity(mtp) == variadicity_variadic;
+#ifndef NDEBUG
+ int is_variadic = get_method_variadicity(mtp) == variadicity_variadic;
assert(0 <= pos && (is_variadic || pos < get_method_n_params(mtp)));
+#endif
- if (ent->param_access) {
- if (pos < ARR_LEN(ent->param_access))
- return ent->param_access[pos];
+ if (ent->attr.mtd_attr.param_access) {
+ if (pos < ARR_LEN(ent->attr.mtd_attr.param_access))
+ return ent->attr.mtd_attr.param_access[pos];
else
return ptr_access_all;
}
analyze_ent_args(ent);
- if (pos < ARR_LEN(ent->param_access))
- return ent->param_access[pos];
+ if (pos < ARR_LEN(ent->attr.mtd_attr.param_access))
+ return ent->attr.mtd_attr.param_access[pos];
else
return ptr_access_all;
}
*
* @param ent The entity of the ir_graph.
*/
-static void analyze_method_params_weight(entity *ent)
+static void analyze_method_params_weight(ir_entity *ent)
{
ir_type *mtp;
ir_graph *irg;
nparams = get_method_n_params(mtp);
/* allocate a new array. currently used as 'analysed' flag */
- ent->param_weight = NEW_ARR_F(float, nparams);
+ ent->attr.mtd_attr.param_weight = NEW_ARR_F(float, nparams);
/* If the method haven't parameters we have
* nothing to do.
/* First we initialize the parameter weight with 0. */
for (i = nparams - 1; i >= 0; i--)
- ent->param_weight[i] = null_weight;
+ ent->attr.mtd_attr.param_weight[i] = null_weight;
if (! irg) {
/* no graph, no better info */
}
/* Call algorithm that computes the out edges */
- if (get_irg_outs_state(irg) != outs_consistent)
- compute_irg_outs(irg);
+ assure_irg_outs(irg);
irg_args = get_irg_args(irg);
for (i = get_irn_n_outs(irg_args) - 1; i >= 0; --i) {
- arg = get_irn_out(irg_args, i);
- proj_nr = get_Proj_proj(arg);
- ent->param_weight[proj_nr] += calc_method_param_weight(arg);
+ arg = get_irn_out(irg_args, i);
+ proj_nr = get_Proj_proj(arg);
+ ent->attr.mtd_attr.param_weight[proj_nr] += calc_method_param_weight(arg);
}
#if 0
* Compute for a method with pointer parameter(s)
* if they will be read or written.
*/
-float get_method_param_weight(entity *ent, int pos)
+float get_method_param_weight(ir_entity *ent, int pos)
{
ir_type *mtp = get_entity_type(ent);
- int is_variadic = get_method_variadicity(mtp) == variadicity_variadic;
+#ifndef NDEBUG
+ int is_variadic = get_method_variadicity(mtp) == variadicity_variadic;
assert(0 <= pos && (is_variadic || pos < get_method_n_params(mtp)));
+#endif
- if (ent->param_weight) {
- if (pos < ARR_LEN(ent->param_weight))
- return ent->param_weight[pos];
+ if (ent->attr.mtd_attr.param_weight) {
+ if (pos < ARR_LEN(ent->attr.mtd_attr.param_weight))
+ return ent->attr.mtd_attr.param_weight[pos];
else
return 0.0f;
}
analyze_method_params_weight(ent);
- if (pos < ARR_LEN(ent->param_weight))
- return ent->param_weight[pos];
+ if (pos < ARR_LEN(ent->attr.mtd_attr.param_weight))
+ return ent->attr.mtd_attr.param_weight[pos];
else
return 0.0f;
}
*/
void analyze_irg_args_weight(ir_graph *irg)
{
- entity *ent;
+ ir_entity *ent;
ent = get_irg_entity(irg);
if (! ent)
return;
- if (! ent->param_weight)
+ if (! ent->attr.mtd_attr.param_weight)
analyze_method_params_weight(ent);
}