X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;ds=sidebyside;f=main.c;h=7df2b4220eba88e829756169ec4a64f0edf7a73f;hb=2aa9a7c30d2961cbc240b4951849c308013a48d2;hp=86bb29e602a8129e4e705f197468bda8d8df44b3;hpb=a2c47f9d691b8785bf4036c4c3e02ef123d0c9c8;p=cparser diff --git a/main.c b/main.c index 86bb29e..7df2b42 100644 --- a/main.c +++ b/main.c @@ -46,14 +46,17 @@ #include "lexer.h" #include "token_t.h" +#include "types.h" #include "type_hash.h" #include "parser.h" #include "ast2firm.h" +#include "diagnostic.h" #include "lang_features.h" +#include "driver/firm_opt.h" #include "driver/firm_cmdline.h" #include "adt/error.h" #include "write_fluffy.h" -#include "driver/firm_opt.h" +#include "revision.h" #ifndef PREPROCESSOR #define PREPROCESSOR "cpp -std=c99 -U__WCHAR_TYPE__ -D__WCHAR_TYPE__=int" @@ -68,7 +71,16 @@ #endif /** The current c mode/dialect. */ -unsigned int c_mode = _C99|_GNUC; +unsigned int c_mode = _C89|_C99|_GNUC; + +/** The 'machine size', 16, 32 or 64 bit, 32bit is the default. */ +unsigned int machine_size = 32; + +/** true if the char type is signed. */ +bool char_is_signed = true; + +/** true for strict language checking. */ +bool strict_mode = false; static int verbose; static struct obstack cppflags_obst; @@ -355,6 +367,12 @@ int main(int argc, char **argv) c_mode &= ~_GNUC; } else if(strcmp(arg, "--ms") == 0) { c_mode |= _MS; + } else if(strcmp(arg, "--signed-chars") == 0) { + char_is_signed = true; + } else if(strcmp(arg, "--unsigned-chars") == 0) { + char_is_signed = false; + } else if(strcmp(arg, "--strict") == 0) { + strict_mode = true; } else if(strcmp(arg, "--no-ms") == 0) { c_mode &= ~_MS; } else if(strcmp(arg, "--lextest") == 0) { @@ -363,6 +381,20 @@ int main(int argc, char **argv) mode = PrintAst; } else if(strcmp(arg, "--print-fluffy") == 0) { mode = PrintFluffy; + } else if(strcmp(arg, "--version") == 0) { + firm_version_t ver; + firm_get_version(&ver); + printf("cparser (%d.%d %s) using libFirm (%u.%u", 0, 1, cparser_REVISION, ver.major, ver.minor); + if(ver.revision[0] != 0) { + putchar(' '); + fputs(ver.revision, stdout); + } + if(ver.build[0] != 0) { + putchar(' '); + fputs(ver.build, stdout); + } + puts(")\n"); + exit(EXIT_SUCCESS); } else if(strcmp(arg, "-fsyntax-only") == 0) { mode = ParseOnly; } else if(strncmp(arg, "-I", 2) == 0) { @@ -373,6 +405,10 @@ int main(int argc, char **argv) const char *opt; GET_ARG_AFTER(opt, "-D"); obstack_printf(&cppflags_obst, " -D%s", opt); + } else if(strncmp(arg, "-U", 2) == 0) { + const char *opt; + GET_ARG_AFTER(opt, "-U"); + obstack_printf(&cppflags_obst, " -U%s", opt); } else if(strcmp(arg, "--dump-function") == 0) { ++i; if(i >= argc) { @@ -385,16 +421,26 @@ int main(int argc, char **argv) mode = CompileDump; } else if(strcmp(arg, "-v") == 0) { verbose = 1; + } else if(strcmp(arg, "-w") == 0) { + inhibit_all_warnings = true; } else if(arg[0] == '-' && arg[1] == 'f') { const char *opt; GET_ARG_AFTER(opt, "-f"); - int res = firm_option(opt); - if (res == 0) { - fprintf(stderr, "error: unknown Firm option '-f %s'\n", opt); - argument_errors = true; - continue; - } else if (res == -1) { - help_displayed = true; + + if(strcmp(opt, "omit-frame-pointer") == 0) { + firm_be_option("omitfp"); + } else if(strcmp(opt, "no-omit-frame-pointer") == 0) { + firm_be_option("omitfp=no"); + } else { + int res = firm_option(opt); + if (res == 0) { + fprintf(stderr, "error: unknown Firm option '-f %s'\n", + opt); + argument_errors = true; + continue; + } else if (res == -1) { + help_displayed = true; + } } } else if(arg[0] == '-' && arg[1] == 'b') { const char *opt; @@ -407,6 +453,31 @@ int main(int argc, char **argv) } else if (res == -1) { help_displayed = true; } + } else if(arg[0] == '-' && arg[1] == 'W') { + const char *opt; + GET_ARG_AFTER(opt, "-W"); + if (strcmp(opt, "error") == 0) { + warnings_are_errors = true; + } else if (strcmp(opt, "fatal-errors") == 0) { + fatal_errors = true; + } else { + fprintf(stderr, "warning: ignoring gcc option -W%s\n", opt); + } + } else if(arg[0] == '-' && arg[1] == 'm') { + const char *opt; + GET_ARG_AFTER(opt, "-m"); + char *endptr; + long int value = strtol(opt, &endptr, 10); + if (*endptr != '\0') { + fprintf(stderr, "error: wrong option '-m %s'\n", opt); + argument_errors = true; + } + if (value != 16 && value != 32 && value != 64) { + fprintf(stderr, "error: option -m supports only 16, 32 or 64\n"); + argument_errors = true; + } else { + machine_size = (unsigned int)value; + } } else if(arg[0] == '-') { if (arg[1] == '\0') { if(input != NULL) { @@ -418,8 +489,6 @@ int main(int argc, char **argv) } else if(strcmp(arg, "-pedantic") == 0) { fprintf(stderr, "warning: ignoring gcc option '%s'\n", arg); } else if(arg[1] == 'O' || - arg[1] == 'f' || - arg[1] == 'W' || arg[1] == 'g' || strncmp(arg + 1, "std=", 4) == 0) { fprintf(stderr, "warning: ignoring gcc option '%s'\n", arg); @@ -437,6 +506,9 @@ int main(int argc, char **argv) } } + /* we do the lowering in ast2firm */ + firm_opt.lower_bitfields = FALSE; + if(help_displayed) { return !argument_errors; } @@ -445,16 +517,18 @@ int main(int argc, char **argv) return 1; } + gen_firm_init(); init_symbol_table(); init_tokens(); init_types(); init_typehash(); + init_basic_types(); init_lexer(); init_ast(); init_parser(); init_ast2firm(); - FILE *out; + FILE *out = NULL; char outnamebuf[4096]; if(outname == NULL) { switch(mode) { @@ -521,9 +595,18 @@ int main(int argc, char **argv) FILE *preprocessed_in = preprocess(in, input); translation_unit_t *const unit = do_parsing(preprocessed_in, input); - pclose(preprocessed_in); - if(unit == NULL) - return 1; + int result = pclose(preprocessed_in); + if(result != 0) { + return result; + } + if(unit == NULL) { + /* parsing failed because of errors */ + fprintf(stderr, "%u error(s), %u warning(s)\n", error_count, warning_count); + return EXIT_FAILURE; + } + if (warning_count > 0) { + fprintf(stderr, "%u warning(s)\n", warning_count); + } if(mode == PrintAst) { type_set_output(out); @@ -537,7 +620,6 @@ int main(int argc, char **argv) write_fluffy_decls(out, unit); } - gen_firm_init(); translation_unit_to_firm(unit); if(mode == ParseOnly) {