shouldn't be here anymore
[libfirm] / ir / be / ia32 / bearch_ia32.c
index 59127ed..d20c867 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * Copyright (C) 1995-2007 University of Karlsruhe.  All right reserved.
+ * Copyright (C) 1995-2008 University of Karlsruhe.  All right reserved.
  *
  * This file is part of libFirm.
  *
@@ -27,8 +27,8 @@
 #include "config.h"
 #endif
 
-#include <libcore/lc_opts.h>
-#include <libcore/lc_opts_enum.h>
+#include "lc_opts.h"
+#include "lc_opts_enum.h"
 
 #include <math.h>
 
 #include "irgopt.h"
 #include "irbitset.h"
 #include "irgopt.h"
+#include "irdump_grgen.h"
 #include "pdeq.h"
 #include "pset.h"
 #include "debug.h"
 #include "error.h"
 #include "xmalloc.h"
 #include "irtools.h"
+#include "iroptimize.h"
 
 #include "../beabi.h"
 #include "../beirg_t.h"
@@ -74,6 +76,7 @@
 #include "gen_ia32_regalloc_if.h"
 #include "gen_ia32_machine.h"
 #include "ia32_transform.h"
+#include "ia32_pbqp_transform.h"
 #include "ia32_emitter.h"
 #include "ia32_map_regs.h"
 #include "ia32_optimize.h"
@@ -954,7 +957,18 @@ static void ia32_prepare_graph(void *self) {
        if(cg->dump)
                be_dump(cg->irg, "-pre_transform", dump_ir_block_graph_sched);
 
-       /* transform nodes into assembler instructions */
+        /* used for examination purposes only
+         * if(cg->dump)
+                dump_irg_grgen(cg->irg, "-pre_transform");
+         */
+
+        /* transform nodes into assembler instructions by PBQP magic */
+        ia32_transform_graph_by_pbqp(cg);
+
+       if(cg->dump)
+               be_dump(cg->irg, "-after_pbqp_transform", dump_ir_block_graph_sched);
+
+       /* transform remaining nodes into assembler instructions */
        ia32_transform_graph(cg);
 
        /* do local optimisations (mainly CSE) */
@@ -1292,25 +1306,25 @@ static void transform_MemPerm(ia32_code_gen_t *cg, ir_node *node) {
        arity = be_get_MemPerm_entity_arity(node);
        pops = alloca(arity * sizeof(pops[0]));
 
-       // create pushs
+       /* create Pushs */
        for(i = 0; i < arity; ++i) {
                ir_entity *inent = be_get_MemPerm_in_entity(node, i);
                ir_entity *outent = be_get_MemPerm_out_entity(node, i);
                ir_type *enttype = get_entity_type(inent);
-               int entbits = get_type_size_bits(enttype);
-               int entbits2 = get_type_size_bits(get_entity_type(outent));
+               unsigned entsize = get_type_size_bytes(enttype);
+               unsigned entsize2 = get_type_size_bytes(get_entity_type(outent));
                ir_node *mem = get_irn_n(node, i + 1);
                ir_node *push;
 
                /* work around cases where entities have different sizes */
-               if(entbits2 < entbits)
-                       entbits = entbits2;
-               assert( (entbits == 32 || entbits == 64) && "spillslot on x86 should be 32 or 64 bit");
+               if(entsize2 < entsize)
+                       entsize = entsize2;
+               assert( (entsize == 4 || entsize == 8) && "spillslot on x86 should be 32 or 64 bit");
 
                push = create_push(cg, node, node, sp, mem, inent);
                sp = create_spproj(cg, node, push, pn_ia32_Push_stack);
-               if(entbits == 64) {
-                       // add another push after the first one
+               if(entsize == 8) {
+                       /* add another push after the first one */
                        push = create_push(cg, node, node, sp, mem, inent);
                        add_ia32_am_offs_int(push, 4);
                        sp = create_spproj(cg, node, push, pn_ia32_Push_stack);
@@ -1319,26 +1333,26 @@ static void transform_MemPerm(ia32_code_gen_t *cg, ir_node *node) {
                set_irn_n(node, i, new_Bad());
        }
 
-       // create pops
+       /* create pops */
        for(i = arity - 1; i >= 0; --i) {
                ir_entity *inent = be_get_MemPerm_in_entity(node, i);
                ir_entity *outent = be_get_MemPerm_out_entity(node, i);
                ir_type *enttype = get_entity_type(outent);
-               int entbits = get_type_size_bits(enttype);
-               int entbits2 = get_type_size_bits(get_entity_type(inent));
+               unsigned entsize = get_type_size_bytes(enttype);
+               unsigned entsize2 = get_type_size_bytes(get_entity_type(inent));
                ir_node *pop;
 
                /* work around cases where entities have different sizes */
-               if(entbits2 < entbits)
-                       entbits = entbits2;
-               assert( (entbits == 32 || entbits == 64) && "spillslot on x86 should be 32 or 64 bit");
+               if(entsize2 < entsize)
+                       entsize = entsize2;
+               assert( (entsize == 4 || entsize == 8) && "spillslot on x86 should be 32 or 64 bit");
 
                pop = create_pop(cg, node, node, sp, outent);
                sp = create_spproj(cg, node, pop, pn_ia32_Pop_stack);
-               if(entbits == 64) {
+               if(entsize == 8) {
                        add_ia32_am_offs_int(pop, 4);
 
-                       // add another pop after the first one
+                       /* add another pop after the first one */
                        pop = create_pop(cg, node, node, sp, outent);
                        sp = create_spproj(cg, node, pop, pn_ia32_Pop_stack);
                }
@@ -1350,7 +1364,7 @@ static void transform_MemPerm(ia32_code_gen_t *cg, ir_node *node) {
        keep  = be_new_Keep(&ia32_reg_classes[CLASS_ia32_gp], irg, block, 1, in);
        sched_add_before(node, keep);
 
-       // exchange memprojs
+       /* exchange memprojs */
        foreach_out_edge_safe(node, edge, next) {
                ir_node *proj = get_edge_src_irn(edge);
                int p = get_Proj_proj(proj);
@@ -1361,7 +1375,7 @@ static void transform_MemPerm(ia32_code_gen_t *cg, ir_node *node) {
                set_Proj_proj(proj, pn_ia32_Pop_M);
        }
 
-       // remove memperm
+       /* remove memperm */
        arity = get_irn_arity(node);
        for(i = 0; i < arity; ++i) {
                set_irn_n(node, i, new_Bad());
@@ -1610,9 +1624,9 @@ static ia32_isa_t ia32_isa_template = {
        NULL,                    /* types */
        NULL,                    /* tv_ents */
        NULL,                    /* current code generator */
+       NULL,                    /* abstract machine */
 #ifndef NDEBUG
        NULL,                    /* name obstack */
-       0                        /* name obst size */
 #endif
 };
 
@@ -2082,8 +2096,10 @@ static const backend_params *ia32_get_libfirm_params(void) {
 }
 
 static const lc_opt_enum_int_items_t gas_items[] = {
-       { "normal",  GAS_FLAVOUR_NORMAL },
+       { "elf",     GAS_FLAVOUR_ELF },
        { "mingw",   GAS_FLAVOUR_MINGW  },
+       { "yasm",    GAS_FLAVOUR_YASM   },
+       { "macho",   GAS_FLAVOUR_MACH_O },
        { NULL,      0 }
 };