rename tarval to ir_tarval
[libfirm] / ir / be / ia32 / ia32_common_transform.c
index 7e9e6d9..c8cd614 100644 (file)
@@ -31,6 +31,7 @@
 #include "irprintf.h"
 #include "typerep.h"
 #include "bitset.h"
+#include "heights.h"
 
 #include "../betranshlp.h"
 #include "../beirg.h"
 #include "gen_ia32_new_nodes.h"
 #include "gen_ia32_regalloc_if.h"
 
-/** hold the current code generator during transformation */
-ia32_code_gen_t *env_cg = NULL;
-
-heights_t *heights = NULL;
-
-static const arch_register_req_t no_register_req = {
-       arch_register_req_type_none,
-       NULL,                         /* regclass */
-       NULL,                         /* limit bitset */
-       0,                            /* same pos */
-       0                             /* different pos */
-};
+ir_heights_t *heights = NULL;
 
 static int check_immediate_constraint(long val, char immediate_constraint_type)
 {
@@ -93,9 +83,11 @@ static ir_type *ia32_get_prim_type(pmap *types, ir_mode *mode)
 
 ir_entity *create_float_const_entity(ir_node *cnst)
 {
-       ia32_isa_t       *isa = env_cg->isa;
-       tarval           *tv  = get_Const_tarval(cnst);
-       ir_entity        *res = pmap_get(isa->tv_ent, tv);
+       ir_graph         *irg      = get_irn_irg(cnst);
+       const arch_env_t *arch_env = be_get_irg_arch_env(irg);
+       ia32_isa_t       *isa      = (ia32_isa_t*) arch_env;
+       ir_tarval        *tv       = get_Const_tarval(cnst);
+       ir_entity        *res      = pmap_get(isa->tv_ent, tv);
        ir_initializer_t *initializer;
        ir_mode          *mode;
        ir_type          *tp;
@@ -139,7 +131,7 @@ ir_node *ia32_create_Immediate(ir_entity *symconst, int symconst_sign, long val)
        ir_node  *start_block = get_irg_start_block(irg);
        ir_node  *immediate   = new_bd_ia32_Immediate(NULL, start_block, symconst,
                        symconst_sign, no_pic_adjust, val);
-       arch_set_irn_register(immediate, &ia32_gp_regs[REG_GP_NOREG]);
+       arch_set_irn_register(immediate, &ia32_registers[REG_GP_NOREG]);
 
        return immediate;
 }
@@ -153,7 +145,7 @@ const arch_register_t *ia32_get_clobber_register(const char *clobber)
 
        /* TODO: construct a hashmap instead of doing linear search for clobber
         * register */
-       for (c = 0; c < N_CLASSES; ++c) {
+       for (c = 0; c < N_IA32_CLASSES; ++c) {
                cls = & ia32_reg_classes[c];
                for (r = 0; r < cls->n_regs; ++r) {
                        const arch_register_t *temp_reg = arch_register_for_index(cls, r);
@@ -226,32 +218,32 @@ static void parse_asm_constraints(constraint_t *constraint, const char *c,
                case 'a':
                        assert(cls == NULL || cls == &ia32_reg_classes[CLASS_ia32_gp]);
                        cls      = &ia32_reg_classes[CLASS_ia32_gp];
-                       limited |= 1 << REG_EAX;
+                       limited |= 1 << REG_GP_EAX;
                        break;
                case 'b':
                        assert(cls == NULL || cls == &ia32_reg_classes[CLASS_ia32_gp]);
                        cls      = &ia32_reg_classes[CLASS_ia32_gp];
-                       limited |= 1 << REG_EBX;
+                       limited |= 1 << REG_GP_EBX;
                        break;
                case 'c':
                        assert(cls == NULL || cls == &ia32_reg_classes[CLASS_ia32_gp]);
                        cls      = &ia32_reg_classes[CLASS_ia32_gp];
-                       limited |= 1 << REG_ECX;
+                       limited |= 1 << REG_GP_ECX;
                        break;
                case 'd':
                        assert(cls == NULL || cls == &ia32_reg_classes[CLASS_ia32_gp]);
                        cls      = &ia32_reg_classes[CLASS_ia32_gp];
-                       limited |= 1 << REG_EDX;
+                       limited |= 1 << REG_GP_EDX;
                        break;
                case 'D':
                        assert(cls == NULL || cls == &ia32_reg_classes[CLASS_ia32_gp]);
                        cls      = &ia32_reg_classes[CLASS_ia32_gp];
-                       limited |= 1 << REG_EDI;
+                       limited |= 1 << REG_GP_EDI;
                        break;
                case 'S':
                        assert(cls == NULL || cls == &ia32_reg_classes[CLASS_ia32_gp]);
                        cls      = &ia32_reg_classes[CLASS_ia32_gp];
-                       limited |= 1 << REG_ESI;
+                       limited |= 1 << REG_GP_ESI;
                        break;
                case 'Q':
                case 'q':
@@ -259,20 +251,20 @@ static void parse_asm_constraints(constraint_t *constraint, const char *c,
                         * difference to Q for us (we only assign whole registers) */
                        assert(cls == NULL || cls == &ia32_reg_classes[CLASS_ia32_gp]);
                        cls      = &ia32_reg_classes[CLASS_ia32_gp];
-                       limited |= 1 << REG_EAX | 1 << REG_EBX | 1 << REG_ECX |
-                                  1 << REG_EDX;
+                       limited |= 1 << REG_GP_EAX | 1 << REG_GP_EBX | 1 << REG_GP_ECX |
+                                  1 << REG_GP_EDX;
                        break;
                case 'A':
                        assert(cls == NULL || cls == &ia32_reg_classes[CLASS_ia32_gp]);
                        cls      = &ia32_reg_classes[CLASS_ia32_gp];
-                       limited |= 1 << REG_EAX | 1 << REG_EDX;
+                       limited |= 1 << REG_GP_EAX | 1 << REG_GP_EDX;
                        break;
                case 'l':
                        assert(cls == NULL || cls == &ia32_reg_classes[CLASS_ia32_gp]);
                        cls      = &ia32_reg_classes[CLASS_ia32_gp];
-                       limited |= 1 << REG_EAX | 1 << REG_EBX | 1 << REG_ECX |
-                                  1 << REG_EDX | 1 << REG_ESI | 1 << REG_EDI |
-                                  1 << REG_EBP;
+                       limited |= 1 << REG_GP_EAX | 1 << REG_GP_EBX | 1 << REG_GP_ECX |
+                                  1 << REG_GP_EDX | 1 << REG_GP_ESI | 1 << REG_GP_EDI |
+                                  1 << REG_GP_EBP;
                        break;
 
                case 'R':
@@ -455,7 +447,7 @@ ir_node *gen_ASM(ir_node *node)
        const ir_asm_constraint    *out_constraints;
        ident                     **clobbers;
        int                         clobbers_flags = 0;
-       unsigned                    clobber_bits[N_CLASSES];
+       unsigned                    clobber_bits[N_IA32_CLASSES];
        int                         out_size;
        backend_info_t             *info;
 
@@ -555,7 +547,7 @@ ir_node *gen_ASM(ir_node *node)
                        if (r_clobber_bits != 0) {
                                if (parsed_constraint.all_registers_allowed) {
                                        parsed_constraint.all_registers_allowed = 0;
-                                       be_abi_set_non_ignore_regs(be_get_irg_abi(env_cg->irg),
+                                       be_abi_set_non_ignore_regs(be_get_irg_abi(current_ir_graph),
                                                        parsed_constraint.cls,
                                                        &parsed_constraint.allowed_registers);
                                }
@@ -747,7 +739,7 @@ ir_node *gen_ASM(ir_node *node)
        for (i = 0; i < out_arity; ++i) {
                info->out_infos[i].req = out_reg_reqs[i];
        }
-       set_ia32_in_req_all(new_node, in_reg_reqs);
+       arch_set_in_register_reqs(new_node, in_reg_reqs);
 
        SET_IA32_ORIG_NODE(new_node, node);
 
@@ -844,6 +836,7 @@ const arch_register_req_t *make_register_req(const constraint_t *constraint,
                *req             = *other_constr;
                req->type       |= arch_register_req_type_should_be_same;
                req->other_same  = 1U << pos;
+               req->width       = 1;
 
                /* switch constraints. This is because in firm we have same_as
                 * constraints on the output constraints while in the gcc asm syntax
@@ -854,7 +847,7 @@ const arch_register_req_t *make_register_req(const constraint_t *constraint,
 
        /* pure memory ops */
        if (constraint->cls == NULL) {
-               return &no_register_req;
+               return arch_no_register_req;
        }
 
        if (constraint->allowed_registers != 0
@@ -873,7 +866,8 @@ const arch_register_req_t *make_register_req(const constraint_t *constraint,
                memset(req, 0, sizeof(req[0]));
                req->type = arch_register_req_type_normal;
        }
-       req->cls = constraint->cls;
+       req->cls   = constraint->cls;
+       req->width = 1;
 
        return req;
 }
@@ -899,6 +893,7 @@ const arch_register_req_t *parse_clobber(const char *clobber)
        req->type    = arch_register_req_type_limited;
        req->cls     = arch_register_get_class(reg);
        req->limited = limited;
+       req->width   = 1;
 
        return req;
 }
@@ -977,7 +972,7 @@ ir_node *try_create_Immediate(ir_node *node, char immediate_constraint_type)
        }
 
        if (cnst != NULL) {
-               tarval *offset = get_Const_tarval(cnst);
+               ir_tarval *offset = get_Const_tarval(cnst);
                if (!tarval_is_long(offset)) {
                        ir_fprintf(stderr, "Optimisation Warning: tarval of %+F is not a long?\n", cnst);
                        return NULL;