remove #ifdef HAVE_CONFIG_Hs
[libfirm] / ir / be / ia32 / ia32_new_nodes.c
index c17d217..f58c3a9 100644 (file)
@@ -26,9 +26,7 @@
  * This file implements the creation of the achitecture specific firm opcodes
  * and the corresponding node constructors for the ia32 assembler irg.
  */
-#ifdef HAVE_CONFIG_H
 #include "config.h"
-#endif
 
 #include <stdlib.h>
 
@@ -107,7 +105,7 @@ static void dump_reg_req(FILE *F, ir_node *n, const arch_register_req_t **reqs,
                                }
                        }
 
-                       if (reqs[i]->type & arch_register_req_type_should_be_different) {
+                       if (reqs[i]->type & arch_register_req_type_must_be_different) {
                                unsigned other = reqs[i]->other_different;
                                int i;
 
@@ -257,17 +255,14 @@ static int ia32_dump_node(ir_node *n, FILE *F, dump_reason_t reason) {
                        /* dump supported am */
                        fprintf(F, "AM support = ");
                        switch (get_ia32_am_support(n)) {
-                               case ia32_am_None:
-                                       fprintf(F, "none");
-                                       break;
-                               case ia32_am_Source:
-                                       fprintf(F, "source only (Load)");
-                                       break;
+                               case ia32_am_none:   fputs("none\n",            F); break;
+                               case ia32_am_unary:  fputs("source (unary)\n",  F); break;
+                               case ia32_am_binary: fputs("source (binary)\n", F); break;
+
                                default:
-                                       fprintf(F, "unknown (%d)", get_ia32_am_support(n));
+                                       fprintf(F, "unknown (%d)\n", get_ia32_am_support(n));
                                        break;
                        }
-                       fprintf(F, "\n");
 
                        /* dump AM offset */
                        if(get_ia32_am_offs_int(n) != 0) {
@@ -288,26 +283,21 @@ static int ia32_dump_node(ir_node *n, FILE *F, dump_reason_t reason) {
                        if (is_ia32_SwitchJmp(n)) {
                                fprintf(F, "pn_code = %ld\n", get_ia32_condcode(n));
                        } else if (is_ia32_CMov(n) || is_ia32_Set(n) || is_ia32_Jcc(n)) {
+                               ia32_attr_t *attr = get_ia32_attr(n);
                                long pnc = get_ia32_condcode(n);
-                               fprintf(F, "pn_code = 0x%X (%s)\n", pnc, get_pnc_string(pnc & pn_Cmp_True));
+                               fprintf(F, "pn_code = 0x%lX (%s)\n", pnc, get_pnc_string(pnc & pn_Cmp_True));
+                               fprintf(F, "ins_permuted = %u \n", attr->data.ins_permuted);
+                               fprintf(F, "cmp_unsigned = %u \n", attr->data.cmp_unsigned);
                        }
                        else if (is_ia32_CopyB(n) || is_ia32_CopyB_i(n)) {
                                fprintf(F, "size = %u\n", get_ia32_copyb_size(n));
                        }
 
-                       /* dump n_res */
                        fprintf(F, "n_res = %d\n", get_ia32_n_res(n));
-
-                       /* dump use_frame */
                        fprintf(F, "use_frame = %d\n", is_ia32_use_frame(n));
-
-                       /* commutative */
                        fprintf(F, "commutative = %d\n", is_ia32_commutative(n));
-
-                       /* need stackent */
                        fprintf(F, "need stackent = %d\n", is_ia32_need_stackent(n));
-
-                       /* dump latency */
+                       fprintf(F, "is reload = %d\n", is_ia32_is_reload(n));
                        fprintf(F, "latency = %d\n", get_ia32_latency(n));
 
                        /* dump flags */
@@ -446,6 +436,22 @@ const ia32_condcode_attr_t *get_ia32_condcode_attr_const(const ir_node *node) {
        return cc_attr;
 }
 
+ia32_call_attr_t *get_ia32_call_attr(ir_node *node)
+{
+       ia32_attr_t      *attr      = get_ia32_attr(node);
+       ia32_call_attr_t *call_attr = CAST_IA32_ATTR(ia32_call_attr_t, attr);
+
+       return call_attr;
+}
+
+const ia32_call_attr_t *get_ia32_call_attr_const(const ir_node *node)
+{
+       const ia32_attr_t      *attr      = get_ia32_attr_const(node);
+       const ia32_call_attr_t *call_attr = CONST_CAST_IA32_ATTR(ia32_call_attr_t, attr);
+
+       return call_attr;
+}
+
 ia32_copyb_attr_t *get_ia32_copyb_attr(ir_node *node) {
        ia32_attr_t       *attr       = get_ia32_attr(node);
        ia32_copyb_attr_t *copyb_attr = CAST_IA32_ATTR(ia32_copyb_attr_t, attr);
@@ -476,15 +482,8 @@ void set_ia32_op_type(ir_node *node, ia32_op_type_t tp) {
        attr->data.tp     = tp;
 }
 
-/**
- * Gets the supported address mode of an ia32 node
- */
-ia32_am_type_t get_ia32_am_support(const ir_node *node) {
-       const ia32_attr_t *attr = get_ia32_attr_const(node);
-       return attr->data.am_support;
-}
-
-ia32_am_arity_t get_ia32_am_arity(const ir_node *node) {
+ia32_am_type_t get_ia32_am_support(const ir_node *node)
+{
        const ia32_attr_t *attr = get_ia32_attr_const(node);
        return attr->data.am_arity;
 }
@@ -492,15 +491,10 @@ ia32_am_arity_t get_ia32_am_arity(const ir_node *node) {
 /**
  * Sets the supported address mode of an ia32 node
  */
-void set_ia32_am_support(ir_node *node, ia32_am_type_t am_tp,
-                         ia32_am_arity_t arity) {
-       ia32_attr_t *attr     = get_ia32_attr(node);
-       attr->data.am_support = am_tp;
-       attr->data.am_arity   = arity;
-
-       assert((am_tp == ia32_am_None && arity == ia32_am_arity_none) ||
-              (am_tp != ia32_am_None &&
-              ((arity == ia32_am_unary) || (arity == ia32_am_binary) || (arity == ia32_am_ternary))));
+void set_ia32_am_support(ir_node *node, ia32_am_type_t arity)
+{
+       ia32_attr_t *attr   = get_ia32_attr(node);
+       attr->data.am_arity = arity;
 }
 
 /**
@@ -576,7 +570,8 @@ int get_ia32_am_scale(const ir_node *node) {
  * Sets the index register scale for address mode.
  */
 void set_ia32_am_scale(ir_node *node, int scale) {
-       ia32_attr_t *attr   = get_ia32_attr(node);
+       ia32_attr_t *attr = get_ia32_attr(node);
+       assert(0 <= scale && scale < 4 && "AM scale out of range");
        attr->data.am_scale = scale;
 }
 
@@ -656,6 +651,36 @@ int is_ia32_need_stackent(const ir_node *node) {
        return attr->data.need_stackent;
 }
 
+void set_ia32_is_reload(ir_node *node) {
+       ia32_attr_t *attr = get_ia32_attr(node);
+       attr->data.is_reload = 1;
+}
+
+int is_ia32_is_reload(const ir_node *node) {
+       const ia32_attr_t *attr = get_ia32_attr_const(node);
+       return attr->data.is_reload;
+}
+
+void set_ia32_is_spill(ir_node *node) {
+       ia32_attr_t *attr = get_ia32_attr(node);
+       attr->data.is_spill = 1;
+}
+
+int is_ia32_is_spill(const ir_node *node) {
+       const ia32_attr_t *attr = get_ia32_attr_const(node);
+       return attr->data.is_spill;
+}
+
+void set_ia32_is_remat(ir_node *node) {
+       ia32_attr_t *attr = get_ia32_attr(node);
+       attr->data.is_remat = 1;
+}
+
+int is_ia32_is_remat(const ir_node *node) {
+       const ia32_attr_t *attr = get_ia32_attr_const(node);
+       return attr->data.is_remat;
+}
+
 /**
  * Gets the mode of the stored/loaded value (only set for Store/Load)
  */
@@ -1084,6 +1109,17 @@ init_ia32_immediate_attributes(ir_node *res, ir_entity *symconst,
        attr->offset   = offset;
 }
 
+void init_ia32_call_attributes(ir_node *const res, unsigned const pop, ir_type *const call_tp)
+{
+       ia32_call_attr_t *attr = get_irn_generic_attr(res);
+
+#ifndef NDEBUG
+       attr->attr.attr_type  |= IA32_ATTR_ia32_call_attr_t;
+#endif
+       attr->pop     = pop;
+       attr->call_tp = call_tp;
+}
+
 void
 init_ia32_copyb_attributes(ir_node *res, unsigned size) {
        ia32_copyb_attr_t *attr = get_irn_generic_attr(res);
@@ -1192,6 +1228,26 @@ int ia32_compare_condcode_attr(ir_node *a, ir_node *b)
        return 0;
 }
 
+static int ia32_compare_call_attr(ir_node *a, ir_node *b)
+{
+       const ia32_call_attr_t *attr_a;
+       const ia32_call_attr_t *attr_b;
+
+       if (ia32_compare_nodes_attr(a, b))
+               return 1;
+
+       attr_a = get_ia32_call_attr_const(a);
+       attr_b = get_ia32_call_attr_const(b);
+
+       if (attr_a->pop != attr_b->pop)
+               return 1;
+
+       if (attr_a->call_tp != attr_b->call_tp)
+               return 1;
+
+       return 0;
+}
+
 /** Compare node attributes for CopyB nodes. */
 static
 int ia32_compare_copyb_attr(ir_node *a, ir_node *b)
@@ -1231,6 +1287,15 @@ int ia32_compare_asm_attr(ir_node *a, ir_node *b)
        return 0;
 }
 
+/**
+ * Hash function for Immediates
+ */
+static unsigned ia32_hash_Immediate(const ir_node *irn) {
+       const ia32_immediate_attr_t *a = get_ia32_immediate_attr_const(irn);
+
+       return HASH_PTR(a->symconst) + (a->sc_sign << 16) + a->offset;
+}
+
 /** Compare node attributes for Immediates. */
 static
 int ia32_compare_immediate_attr(ir_node *a, ir_node *b)