X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=main.c;h=a0f17a5dff9473bf1ed162d4ca25d0888e46287d;hb=2151f7ff22ee388e6a57ff024d2558101907e7f7;hp=64797fd50cd5aa1dd497001118163a60aedc5bc3;hpb=0cefeeb021ee145eb92a292a489cc22e55e6e712;p=cparser diff --git a/main.c b/main.c index 64797fd..a0f17a5 100644 --- a/main.c +++ b/main.c @@ -1,3 +1,22 @@ +/* + * This file is part of cparser. + * Copyright (C) 2007-2008 Matthias Braun + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU General Public License + * as published by the Free Software Foundation; either version 2 + * of the License, or (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA + * 02111-1307, USA. + */ #include #define _GNU_SOURCE @@ -86,7 +105,7 @@ bool strict_mode = false; /* to switch on printing of implicit casts */ extern bool print_implicit_casts; -/* to switch on printing of srenthesis to indicate operator precedence */ +/* to switch on printing of parenthesis to indicate operator precedence */ extern bool print_parenthesis; static int verbose; @@ -168,6 +187,7 @@ static void lextest(FILE *in, const char *fname) static FILE* preprocess(FILE* in, const char *fname) { char buf[4096]; + obstack_1grow(&cppflags_obst, '\0'); const char *flags = obstack_finish(&cppflags_obst); if(in != stdin) { @@ -191,6 +211,7 @@ static FILE* preprocess(FILE* in, const char *fname) static void do_link(const char *out, const char *in) { char buf[4096]; + obstack_1grow(&ldflags_obst, '\0'); const char *flags = obstack_finish(&ldflags_obst); snprintf(buf, sizeof(buf), LINKER " %s -o %s %s", flags, out, in); @@ -316,6 +337,7 @@ void lower_compound_params(void) } typedef enum compile_mode_t { + BenchmarkParser, ParseOnly, Compile, CompileDump, @@ -339,6 +361,8 @@ int main(int argc, char **argv) const char *outname = NULL; const char *dumpfunction = NULL; compile_mode_t mode = CompileAssembleLink; + int opt_level = 1; + int result = EXIT_SUCCESS; obstack_init(&cppflags_obst); obstack_init(&ldflags_obst); @@ -362,6 +386,42 @@ int main(int argc, char **argv) #define SINGLE_OPTION(ch) (option[0] == (ch) && option[1] == '\0') + /* early options parsing (find out optimisation level) */ + for(int i = 1; i < argc; ++i) { + const char *arg = argv[i]; + if(arg[0] != '-') + continue; + + const char *option = &arg[1]; + if(option[0] == 'O') { + sscanf(&option[1], "%d", &opt_level); + } + } + + /* apply optimisation level */ + switch(opt_level) { + case 0: + firm_option("no-opt"); + break; + case 1: + firm_option("no-inline"); + break; + default: + case 4: + firm_option("strict-aliasing"); + /* fallthrough */ + case 3: + firm_option("cond-eval"); + firm_option("if-conv"); + /* fallthrough */ + case 2: + firm_option("inline"); + firm_option("deconv"); + firm_be_option("omitfp"); + break; + } + + /* parse rest of options */ bool help_displayed = false; bool argument_errors = false; for(int i = 1; i < argc; ++i) { @@ -371,10 +431,16 @@ int main(int argc, char **argv) const char *option = &arg[1]; if(option[0] == 'o') { GET_ARG_AFTER(outname, "-o"); + } else if(option[0] == 'g') { + firm_be_option("stabs=yes"); + firm_be_option("omitfp=no"); + firm_be_option("ia32-nooptcc=yes"); } else if(SINGLE_OPTION('c')) { mode = CompileAssemble; } else if(SINGLE_OPTION('S')) { mode = Compile; + } else if(option[0] == 'O') { + continue; } else if(option[0] == 'I') { const char *opt; GET_ARG_AFTER(opt, "-I"); @@ -457,9 +523,7 @@ int main(int argc, char **argv) } } else if(strcmp(option, "pedantic") == 0) { fprintf(stderr, "warning: ignoring gcc option '%s'\n", arg); - } else if(option[0] == 'O' || - option[0] == 'g' || - strncmp(option, "std=", 4) == 0) { + } else if(strncmp(option, "std=", 4) == 0) { fprintf(stderr, "warning: ignoring gcc option '%s'\n", arg); } else if (option[0] == '-') { /* double dash option */ @@ -480,6 +544,8 @@ int main(int argc, char **argv) strict_mode = true; } else if(strcmp(option, "lextest") == 0) { mode = LexTest; + } else if(strcmp(option, "benchmark") == 0) { + mode = BenchmarkParser; } else if(strcmp(option, "print-ast") == 0) { mode = PrintAst; } else if(strcmp(option, "print-implicit-cast") == 0) { @@ -491,7 +557,8 @@ int main(int argc, char **argv) } else if(strcmp(option, "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); + printf("cparser (%s) using libFirm (%u.%u", + cparser_REVISION, ver.major, ver.minor); if(ver.revision[0] != 0) { putchar(' '); fputs(ver.revision, stdout); @@ -556,6 +623,7 @@ int main(int argc, char **argv) char outnamebuf[4096]; if(outname == NULL) { switch(mode) { + case BenchmarkParser: case PrintAst: case PrintFluffy: case LexTest: @@ -619,25 +687,35 @@ int main(int argc, char **argv) FILE *preprocessed_in = preprocess(in, input); translation_unit_t *const unit = do_parsing(preprocessed_in, input); - int result = pclose(preprocessed_in); - if(result != 0) { - return result; + int res = pclose(preprocessed_in); + if(res != 0) { + return res; } - if(unit == NULL) { + + if(error_count > 0) { /* 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) { + result = EXIT_FAILURE; + } else if(warning_count > 0) { fprintf(stderr, "%u warning(s)\n", warning_count); } + if(mode == BenchmarkParser) { + return result; + } + + /* prints the AST even if errors occurred */ if(mode == PrintAst) { type_set_output(out); ast_set_output(out); print_ast(unit); - return 0; + return result; } + + /* cannot handle other modes with errors */ + if(result != EXIT_SUCCESS) + return result; + if(mode == PrintFluffy) { type_set_output(out); ast_set_output(out);