/*
- * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved.
+ * Copyright (C) 1995-2011 University of Karlsruhe. All right reserved.
*
* This file is part of libFirm.
*
* @brief This file implements the creation of the achitecture specific firm
* opcodes and the coresponding node constructors for the amd64
* assembler irg.
- * @version $Id: amd64_new_nodes.c 26673 2009-10-01 16:43:13Z matze $
*/
#include "config.h"
#include "ircons_t.h"
#include "iropt_t.h"
#include "irop.h"
-#include "irvrfy_t.h"
#include "irprintf.h"
#include "xmalloc.h"
-#include "../bearch.h"
+#include "bearch.h"
#include "amd64_nodes_attr.h"
#include "amd64_new_nodes.h"
#include "gen_amd64_regalloc_if.h"
+void set_amd64_ls_mode(ir_node *node, ir_mode *mode)
+{
+ amd64_attr_t *attr = get_amd64_attr(node);
+ attr->ls_mode = mode;
+}
+
/**
* Dumper interface for dumping amd64 nodes in vcg.
* @param F the output file
* @param n the node to dump
* @param reason indicates which kind of information should be dumped
*/
-static void amd64_dump_node(FILE *F, ir_node *n, dump_reason_t reason)
+static void amd64_dump_node(FILE *F, const ir_node *n, dump_reason_t reason)
{
- ir_mode *mode = NULL;
+ ir_mode *mode = NULL;
switch (reason) {
case dump_node_opcode_txt:
return (amd64_attr_t *)get_irn_generic_attr(node);
}
-const amd64_immediate_attr_t *get_amd64_immediate_attr_const(const ir_node *node)
-{
- const amd64_attr_t *attr = get_amd64_attr_const(node);
- const amd64_immediate_attr_t *imm_attr = CONST_CAST_AMD64_ATTR(amd64_immediate_attr_t, attr);
-
- return imm_attr;
-}
-
-/*
-static amd64_immediate_attr_t *get_amd64_immediate_attr(ir_node *node)
-{
- amd64_attr_t *attr = get_amd64_attr(node);
- amd64_immediate_attr_t *imm_attr = CAST_AMD64_ATTR(amd64_immediate_attr_t, attr);
-
- return imm_attr;
-}
-*/
-
const amd64_SymConst_attr_t *get_amd64_SymConst_attr_const(const ir_node *node)
{
- const amd64_attr_t *attr = get_amd64_attr_const(node);
- const amd64_SymConst_attr_t *sym_attr = CONST_CAST_AMD64_ATTR(amd64_SymConst_attr_t, attr);
-
- return sym_attr;
-}
-
-
-/**
- * Returns the argument register requirements of a amd64 node.
- */
-const arch_register_req_t **get_amd64_in_req_all(const ir_node *node)
-{
- const amd64_attr_t *attr = get_amd64_attr_const(node);
- return attr->in_req;
+ const amd64_SymConst_attr_t *attr
+ = (const amd64_SymConst_attr_t*)get_irn_generic_attr_const(node);
+ return attr;
}
-/**
- * Returns the argument register requirement at position pos of an amd64 node.
- */
-const arch_register_req_t *get_amd64_in_req(const ir_node *node, int pos)
+amd64_SymConst_attr_t *get_amd64_SymConst_attr(ir_node *node)
{
- const amd64_attr_t *attr = get_amd64_attr_const(node);
- return attr->in_req[pos];
-}
-
-/**
- * Sets the IN register requirements at position pos.
- */
-void set_amd64_req_in(ir_node *node, const arch_register_req_t *req, int pos)
-{
- amd64_attr_t *attr = get_amd64_attr(node);
- attr->in_req[pos] = req;
+ amd64_SymConst_attr_t *attr
+ = (amd64_SymConst_attr_t*)get_irn_generic_attr(node);
+ return attr;
}
/**
*/
static void init_amd64_attributes(ir_node *node, arch_irn_flags_t flags,
const arch_register_req_t **in_reqs,
- const be_execution_unit_t ***execution_units,
int n_res)
{
ir_graph *irg = get_irn_irg(node);
struct obstack *obst = get_irg_obstack(irg);
- amd64_attr_t *attr = get_amd64_attr(node);
+ amd64_attr_t *attr = get_amd64_attr(node);
+
backend_info_t *info;
- (void) execution_units;
- arch_irn_set_flags(node, flags);
- attr->in_req = in_reqs;
+ arch_set_irn_flags(node, flags);
+ arch_set_irn_register_reqs_in(node, in_reqs);
info = be_get_info(node);
info->out_infos = NEW_ARR_D(reg_out_info_t, obst, n_res);
memset(info->out_infos, 0, n_res * sizeof(info->out_infos[0]));
-}
-/**
- * Initialize immediate attributes.
- */
-static void init_amd64_immediate_attributes(ir_node *node, unsigned imm_value)
-{
- amd64_immediate_attr_t *attr = get_irn_generic_attr (node);
- attr->imm_value = imm_value;
+ attr->data.ins_permuted = 0;
+ attr->data.cmp_unsigned = 0;
+ attr->ext.relation = ir_relation_false;
+ attr->ext.imm_value = 0;
}
/**
*/
static void init_amd64_SymConst_attributes(ir_node *node, ir_entity *entity)
{
- amd64_SymConst_attr_t *attr = get_irn_generic_attr (node);
- attr->entity = entity;
+ amd64_SymConst_attr_t *attr = get_amd64_SymConst_attr(node);
+ attr->entity = entity;
+ attr->fp_offset = 0;
}
/** Compare node attributes for SymConst. */
-static int cmp_amd64_attr_SymConst(ir_node *a, ir_node *b)
+static int cmp_amd64_attr_SymConst(const ir_node *a, const ir_node *b)
{
const amd64_SymConst_attr_t *attr_a = get_amd64_SymConst_attr_const(a);
const amd64_SymConst_attr_t *attr_b = get_amd64_SymConst_attr_const(b);
- if (attr_a->entity != attr_b->entity)
+ if (attr_a->entity != attr_b->entity
+ || attr_a->fp_offset != attr_b->fp_offset)
return 1;
return 0;
}
-
-/** Compare node attributes for Immediates. */
-static int cmp_amd64_attr_immediate(ir_node *a, ir_node *b)
+/** Compare common amd64 node attributes. */
+static int cmp_amd64_attr(const ir_node *a, const ir_node *b)
{
- const amd64_immediate_attr_t *attr_a = get_amd64_immediate_attr_const(a);
- const amd64_immediate_attr_t *attr_b = get_amd64_immediate_attr_const(b);
-
- if (attr_a->imm_value != attr_b->imm_value)
- return 1;
+ const amd64_attr_t *attr_a = get_amd64_attr_const(a);
+ const amd64_attr_t *attr_b = get_amd64_attr_const(b);
- return 0;
+ return attr_a->ext.imm_value != attr_b->ext.imm_value;
}
-static int cmp_amd64_attr(ir_node *a, ir_node *b)
+/** copies the AMD64 attributes of a node. */
+static void amd64_copy_attr(ir_graph *irg, const ir_node *old_node,
+ ir_node *new_node)
{
- const amd64_attr_t *attr_a = get_amd64_attr_const(a);
- const amd64_attr_t *attr_b = get_amd64_attr_const(b);
- (void) attr_a;
- (void) attr_b;
-
- return 0;
+ struct obstack *obst = get_irg_obstack(irg);
+ const amd64_attr_t *attr_old = get_amd64_attr_const(old_node);
+ amd64_attr_t *attr_new = get_amd64_attr(new_node);
+ backend_info_t *old_info = be_get_info(old_node);
+ backend_info_t *new_info = be_get_info(new_node);
+
+ /* copy the attributes */
+ memcpy(attr_new, attr_old, get_op_attr_size(get_irn_op(old_node)));
+
+ /* copy out flags */
+ new_info->flags = old_info->flags;
+ new_info->out_infos =
+ DUP_ARR_D(reg_out_info_t, obst, old_info->out_infos);
+ new_info->in_reqs = old_info->in_reqs;
}
/* Include the generated constructor functions */