X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fcommon%2Ffirm.c;h=e35f9cb9cd072ec039842713a0b6a2b8fc8bedb9;hb=4d6c06673e8fc5d144bfe16397697ff2812fc22e;hp=79a6ca07943e59ff563f282f429743bb4844f970;hpb=d02c0f8256f55e457564c67bb7362efec749e112;p=libfirm diff --git a/ir/common/firm.c b/ir/common/firm.c index 79a6ca079..e35f9cb9c 100644 --- a/ir/common/firm.c +++ b/ir/common/firm.c @@ -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. * @@ -23,31 +23,20 @@ * @author Martin Trapp, Christian Schaefer, Goetz Lindenmaier * @version $Id$ */ -#ifdef HAVE_CONFIG_H -# include "config.h" -#endif +#include "config.h" #ifdef HAVE_FIRM_REVISION_H # include "firm_revision.h" #endif -#include "firm_config.h" - -#ifdef HAVE_STRING_H -# include -#endif -#ifdef HAVE_STDIO_H -# include -#endif +#include +#include -#ifdef WITH_LIBCORE -# include -#endif +#include "lc_opts.h" #include "ident_t.h" #include "firm.h" #include "irflag_t.h" -/* init functions are not public */ #include "tv_t.h" #include "tpop_t.h" #include "irprog_t.h" @@ -59,37 +48,31 @@ #include "entity_t.h" #include "firmstat.h" #include "irarch.h" -#include "reassoc_t.h" #include "irhooks.h" #include "iredges_t.h" +#include "irmemory_t.h" +#include "opt_init.h" #include "debugger.h" +#include "be_t.h" +#include "irtools.h" -#ifdef WITH_LIBCORE /* returns the firm root */ -lc_opt_entry_t *firm_opt_get_root(void) { +lc_opt_entry_t *firm_opt_get_root(void) +{ static lc_opt_entry_t *grp = NULL; - if(!grp) + if (!grp) grp = lc_opt_get_grp(lc_opt_root_grp(), "firm"); return grp; } -#endif - -void firm_init_options(const char *arg_prefix, int argc, const char **argv) { -#ifdef LIBCORE - /* parse any init files for firm */ - lc_opts_init("firm", firm_opt_get_root(), arg_prefix, argc, argv); -#else - (void) arg_prefix; - (void) argc; - (void) argv; -#endif -} -void init_firm(const firm_parameter_t *param) +void ir_init(const firm_parameter_t *param) { firm_parameter_t def_params; unsigned int size; + /* for historical reasons be_init must be run first */ + firm_be_init(); + memset(&def_params, 0, sizeof(def_params)); if (param) { @@ -106,17 +89,16 @@ void init_firm(const firm_parameter_t *param) /* initialize firm flags */ firm_init_flags(); /* initialize all ident stuff */ - init_ident(def_params.id_if, 1024); - /* initialize Firm hooks */ - firm_init_hooks(); + init_ident(); /* enhanced statistics, need idents and hooks */ - firm_init_stat(def_params.enable_statistics); + if (def_params.enable_statistics != 0) + firm_init_stat(def_params.enable_statistics); /* Edges need hooks. */ init_edges(); /* create the type kinds. */ init_tpop(); /* create an obstack and put all tarvals in a pdeq */ - init_tarval_1(0l); + init_tarval_1(0l, /* support_quad_precision */0); /* Builds a basic program representation, so modes can be added. */ init_irprog_1(); /* initialize all modes an ir node can consist of */ @@ -130,24 +112,35 @@ void init_firm(const firm_parameter_t *param) /* initialize all op codes an irnode can consist of */ init_op(); /* called once for each run of this library */ - init_cons(def_params.initialize_local_func); + if (def_params.initialize_local_func != NULL) + ir_set_uninitialized_local_variable_func( + def_params.initialize_local_func); /* initialize reassociation */ firm_init_reassociation(); + /* initialize function call optimization */ + firm_init_funccalls(); + /* initialize function inlining */ + firm_init_inline(); + /* initialize scalar replacement */ + firm_init_scalar_replace(); /* Builds a construct allowing to access all information to be constructed later. */ init_irprog_2(); /* Initialize the type module and construct some idents needed. */ - firm_init_type(def_params.builtin_dbg, def_params.cc_mask); + firm_init_type(); /* initialize the entity module */ firm_init_entity(); - /* allocate a hash table. */ - init_type_identify(def_params.ti_if); + /* class cast optimization */ + firm_init_class_casts_opt(); + /* memory disambiguation */ + firm_init_memory_disambiguator(); + firm_init_loop_opt(); /* Init architecture dependent optimizations. */ arch_dep_init(arch_dep_default_factory); arch_dep_set_opts(0); - firm_archops_init(def_params.arch_op_settings); + init_irnode(); #ifdef DEBUG_libfirm /* integrated debugger extension */ @@ -155,11 +148,14 @@ void init_firm(const firm_parameter_t *param) #endif } -void free_firm(void) { +void ir_finish(void) +{ int i; for (i = get_irp_n_irgs() - 1; i >= 0; --i) free_ir_graph(get_irp_irg(i)); + for (i = get_irp_n_pseudo_irgs() - 1; i >= 0; --i) + free_ir_graph(get_irp_pseudo_irg(i)); free_type_entities(get_glob_type()); for (i = get_irp_n_types() - 1; i >= 0; --i) @@ -168,23 +164,36 @@ void free_firm(void) { for (i = get_irp_n_types() - 1; i >= 0; --i) free_type(get_irp_type(i)); - finish_op(); free_ir_prog(); finish_tarval(); finish_mode(); finish_tpop(); finish_ident(); + + firm_be_finish(); +} + +unsigned ir_get_version_major(void) +{ + return libfirm_VERSION_MAJOR; +} + +unsigned ir_get_version_minor(void) +{ + return libfirm_VERSION_MINOR; } -/* Returns the libFirm version number. */ -void firm_get_version(firm_version_t *version) { - version->major = libfirm_VERSION_MAJOR; - version->minor = libfirm_VERSION_MINOR; +const char *ir_get_version_revision(void) +{ #ifdef libfirm_VERSION_REVISION - version->revision = libfirm_VERSION_REVISION; + return libfirm_VERSION_REVISION; #else - version->revision = ""; + return ""; #endif - version->build = ""; +} + +const char *ir_get_version_build(void) +{ + return ""; }