X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=main.c;h=0c9b854a762c475df07d2a67a9fca52a4ef16736;hb=61f567301d0489f37afd48af5c80c5f49d9dceb2;hp=47b33d4bee228c10fd50c754bd4bed221addfb29;hpb=1fb3dd65337fad2aebf0a90db9be2821b2ea5666;p=cparser diff --git a/main.c b/main.c index 47b33d4..0c9b854 100644 --- a/main.c +++ b/main.c @@ -323,8 +323,8 @@ static FILE *preprocess(const char *fname, filetype_t filetype) add_flag(&cppflags_obst, "-MF"); add_flag(&cppflags_obst, dep_target); if (outname != NULL) { - add_flag(&cppflags_obst, "-MQ"); - add_flag(&cppflags_obst, outname); + add_flag(&cppflags_obst, "-MQ"); + add_flag(&cppflags_obst, outname); } } add_flag(&cppflags_obst, fname); @@ -536,7 +536,7 @@ static void print_cparser_version(void) const char *revision = ir_get_version_revision(); if (revision[0] != 0) { - putchar(' '); + putchar('-'); fputs(revision, stdout); } @@ -550,6 +550,11 @@ static void print_cparser_version(void) "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n"); } +static void print_cparser_version_short(void) +{ + puts(cparser_REVISION); +} + static void print_help_basic(const char *argv0) { usage(argv0); @@ -731,18 +736,18 @@ static void print_help_firm(void) typedef enum { HELP_NONE = 0, - HELP_BASIC = 1u << 0, - HELP_PREPROCESSOR = 1u << 1, - HELP_PARSER = 1u << 2, - HELP_WARNINGS = 1u << 3, - HELP_OPTIMIZATION = 1u << 4, - HELP_CODEGEN = 1u << 5, - HELP_LINKER = 1u << 6, - HELP_LANGUAGETOOLS = 1u << 7, - HELP_DEBUG = 1u << 8, - HELP_FIRM = 1u << 9, - - HELP_ALL = (unsigned)-1 + HELP_BASIC = 1 << 0, + HELP_PREPROCESSOR = 1 << 1, + HELP_PARSER = 1 << 2, + HELP_WARNINGS = 1 << 3, + HELP_OPTIMIZATION = 1 << 4, + HELP_CODEGEN = 1 << 5, + HELP_LINKER = 1 << 6, + HELP_LANGUAGETOOLS = 1 << 7, + HELP_DEBUG = 1 << 8, + HELP_FIRM = 1 << 9, + + HELP_ALL = -1 } help_sections_t; static void print_help(const char *argv0, help_sections_t sections) @@ -810,35 +815,18 @@ static filetype_t get_filetype_from_string(const char *string) return FILETYPE_UNKNOWN; } -static bool is_windows_os(const char *os) -{ - return strstr(os, "mingw") != NULL || streq(os, "win32"); -} - -static bool is_unixish_os(const char *os) -{ - return strstr(os, "linux") != NULL || strstr(os, "bsd") != NULL - || streq(os, "solaris"); -} - -static bool is_darwin_os(const char *os) -{ - return streq(os, "darwin"); -} - static bool init_os_support(void) { - const char *os = target_machine->operating_system; wchar_atomic_kind = ATOMIC_TYPE_INT; enable_main_collect2_hack = false; define_intmax_types = false; - if (is_unixish_os(os)) { + if (firm_is_unixish_os(target_machine)) { set_create_ld_ident(create_name_linux_elf); - } else if (is_darwin_os(os)) { + } else if (firm_is_darwin_os(target_machine)) { set_create_ld_ident(create_name_macho); define_intmax_types = true; - } else if (is_windows_os(os)) { + } else if (firm_is_windows_os(target_machine)) { wchar_atomic_kind = ATOMIC_TYPE_USHORT; enable_main_collect2_hack = true; set_create_ld_ident(create_name_win32); @@ -943,8 +931,10 @@ static void init_types_and_adjust(void) /* adjust types as requested by target architecture */ ir_type *type_long_double = be_params->type_long_double; - if (type_long_double != NULL) + if (type_long_double != NULL) { set_typeprops_type(&props[ATOMIC_TYPE_LONG_DOUBLE], type_long_double); + atomic_modes[ATOMIC_TYPE_LONG_DOUBLE] = get_type_mode(type_long_double); + } ir_type *type_long_long = be_params->type_long_long; if (type_long_long != NULL) @@ -955,8 +945,7 @@ static void init_types_and_adjust(void) set_typeprops_type(&props[ATOMIC_TYPE_ULONGLONG], type_unsigned_long_long); /* operating system ABI specifics */ - const char *os = target_machine->operating_system; - if (is_darwin_os(os)) { + if (firm_is_darwin_os(target_machine)) { if (machine_size == 32) { props[ATOMIC_TYPE_LONGLONG].struct_alignment = 4; props[ATOMIC_TYPE_ULONGLONG].struct_alignment = 4; @@ -965,7 +954,7 @@ static void init_types_and_adjust(void) props[ATOMIC_TYPE_LONG_DOUBLE].alignment = 16; props[ATOMIC_TYPE_LONG_DOUBLE].struct_alignment = 16; } - } else if (is_windows_os(os)) { + } else if (firm_is_windows_os(target_machine)) { if (machine_size == 64) { /* to ease porting of old c-code microsoft decided to use 32bits * even for long */ @@ -975,7 +964,7 @@ static void init_types_and_adjust(void) /* on windows long double is not supported */ props[ATOMIC_TYPE_LONG_DOUBLE] = props[ATOMIC_TYPE_DOUBLE]; - } else if (is_unixish_os(os)) { + } else if (firm_is_unixish_os(target_machine)) { if (is_ia32_cpu(target_machine->cpu_type)) { /* System V has a broken alignment for double so we have to add * a hack here */ @@ -1010,15 +999,11 @@ static void init_types_and_adjust(void) /* initialize firm pointer modes */ char name[64]; - ir_mode_sort sort = irms_reference; unsigned bit_size = machine_size; - bool is_signed = 0; - ir_mode_arithmetic arithmetic = irma_twos_complement; unsigned modulo_shift = decide_modulo_shift(bit_size); snprintf(name, sizeof(name), "p%u", machine_size); - ir_mode *ptr_mode = new_ir_mode(name, sort, bit_size, is_signed, arithmetic, - modulo_shift); + ir_mode *ptr_mode = new_reference_mode(name, irma_twos_complement, bit_size, modulo_shift); if (machine_size == 16) { set_reference_mode_signed_eq(ptr_mode, mode_Hs); @@ -1047,8 +1032,6 @@ static void init_types_and_adjust(void) int main(int argc, char **argv) { - firm_early_init(); - const char *dumpfunction = NULL; const char *print_file_name_file = NULL; compile_mode_t mode = CompileAssembleLink; @@ -1097,6 +1080,9 @@ int main(int argc, char **argv) #define SINGLE_OPTION(ch) (option[0] == (ch) && option[1] == '\0') + /* initialize this early because it has to parse options */ + gen_firm_init(); + /* early options parsing (find out optimization level and OS) */ for (int i = 1; i < argc; ++i) { const char *arg = argv[i]; @@ -1109,9 +1095,6 @@ int main(int argc, char **argv) } } - const char *target = getenv("TARGET"); - if (target != NULL) - parse_target_triple(target); if (target_machine == NULL) { target_machine = firm_get_host_machine(); } @@ -1307,6 +1290,7 @@ int main(int argc, char **argv) streq(opt, "align-loops") || streq(opt, "align-jumps") || streq(opt, "align-functions") || + streq(opt, "unroll-loops") || streq(opt, "PIC") || streq(opt, "stack-protector") || streq(opt, "stack-protector-all")) { @@ -1444,6 +1428,9 @@ int main(int argc, char **argv) int res = be_parse_arg(arch_opt); if (res == 0) argument_errors = true; + } else if (streq(opt, "sse2")) { + /* ignore for now, our x86 backend always uses sse when + * sse is requested */ } else { long int value = strtol(opt, NULL, 10); if (value == 0) { @@ -1486,6 +1473,11 @@ int main(int argc, char **argv) (fprintf(stderr, "warning: ignoring gcc option '%s'\n", arg), standard); } else if (streq(option, "version")) { print_cparser_version(); + return EXIT_SUCCESS; + } else if (streq(option, "dumpversion")) { + /* gcc compatibility option */ + print_cparser_version_short(); + return EXIT_SUCCESS; } else if (strstart(option, "print-file-name=")) { GET_ARG_AFTER(print_file_name_file, "-print-file-name="); } else if (option[0] == '-') { @@ -1574,6 +1566,8 @@ int main(int argc, char **argv) mode = CompileDump; } else if (streq(option, "export-ir")) { mode = CompileExportIR; + } else if (streq(option, "unroll-loops")) { + /* ignore (gcc compatibility) */ } else { fprintf(stderr, "error: unknown argument '%s'\n", arg); argument_errors = true; @@ -1661,14 +1655,13 @@ int main(int argc, char **argv) set_be_option("profileuse"); } - gen_firm_init(); init_symbol_table(); init_types_and_adjust(); init_typehash(); init_basic_types(); if (wchar_atomic_kind == ATOMIC_TYPE_INT) init_wchar_types(type_int); - else if (wchar_atomic_kind == ATOMIC_TYPE_SHORT) + else if (wchar_atomic_kind == ATOMIC_TYPE_USHORT) init_wchar_types(type_short); else panic("unexpected wchar type"); @@ -1910,6 +1903,7 @@ do_parsing: if (already_constructed_firm) { panic("compiling multiple files/translation units not possible"); } + init_implicit_optimizations(); translation_unit_to_firm(unit); already_constructed_firm = true; timer_pop(t_construct); @@ -1945,18 +1939,25 @@ graph_built: } if (mode == CompileExportIR) { - fclose(out); - ir_export(outname); + ir_export_file(out); + if (ferror(out) != 0) { + fprintf(stderr, "Error while writing to output\n"); + return EXIT_FAILURE; + } return EXIT_SUCCESS; } - gen_firm_finish(asm_out, filename); + generate_code(asm_out, filename); if (asm_out != out) { fclose(asm_out); } } else if (filetype == FILETYPE_IR) { fclose(in); - ir_import(filename); + int res = ir_import(filename); + if (res != 0) { + fprintf(stderr, "Firm-Program import failed\n"); + return EXIT_FAILURE; + } goto graph_built; } else if (filetype == FILETYPE_PREPROCESSED_ASSEMBLER) { copy_file(asm_out, in); @@ -2060,6 +2061,7 @@ graph_built: obstack_free(&asflags_obst, NULL); obstack_free(&file_obst, NULL); + gen_firm_finish(); exit_mangle(); exit_ast2firm(); exit_parser();