+ } else if (option[0] == 'W') {
+ if (option[1] == '\0') {
+ /* ignore -W, our defaults are already quite verbose */
+ } else if (strstart(option + 1, "p,")) {
+ // pass options directly to the preprocessor
+ const char *opt;
+ GET_ARG_AFTER(opt, "-Wp,");
+ add_flag(&cppflags_obst, "-Wp,%s", opt);
+ } else if (strstart(option + 1, "l,")) {
+ // pass options directly to the linker
+ const char *opt;
+ GET_ARG_AFTER(opt, "-Wl,");
+ add_flag(&ldflags_obst, "-Wl,%s", opt);
+ } else if (streq(option + 1, "no-trigraphs")
+ || streq(option + 1, "undef")) {
+ add_flag(&cppflags_obst, "%s", arg);
+ } else {
+ set_warning_opt(&option[1]);
+ }
+ } else if (option[0] == 'm') {
+ /* -m options */
+ const char *opt;
+ char arch_opt[64];
+
+ GET_ARG_AFTER(opt, "-m");
+ if (strstart(opt, "target=")) {
+ GET_ARG_AFTER(opt, "-mtarget=");
+ if (!parse_target_triple(opt)) {
+ argument_errors = true;
+ } else {
+ setup_target_machine();
+ target_triple = opt;
+ }
+ } else if (strstart(opt, "triple=")) {
+ GET_ARG_AFTER(opt, "-mtriple=");
+ if (!parse_target_triple(opt)) {
+ argument_errors = true;
+ } else {
+ setup_target_machine();
+ target_triple = opt;
+ }
+ } else if (strstart(opt, "arch=")) {
+ GET_ARG_AFTER(opt, "-march=");
+ snprintf(arch_opt, sizeof(arch_opt), "%s-arch=%s", cpu_arch, opt);
+ int res = be_parse_arg(arch_opt);
+ if (res == 0) {
+ fprintf(stderr, "Unknown architecture '%s'\n", arch_opt);
+ argument_errors = true;
+ } else {
+ snprintf(arch_opt, sizeof(arch_opt), "%s-opt=%s", cpu_arch, opt);
+ int res = be_parse_arg(arch_opt);
+ if (res == 0)
+ argument_errors = true;
+ }
+ } else if (strstart(opt, "tune=")) {
+ GET_ARG_AFTER(opt, "-mtune=");
+ snprintf(arch_opt, sizeof(arch_opt), "%s-opt=%s", cpu_arch, opt);
+ int res = be_parse_arg(arch_opt);
+ if (res == 0)
+ argument_errors = true;
+ } else if (strstart(opt, "cpu=")) {
+ GET_ARG_AFTER(opt, "-mcpu=");
+ snprintf(arch_opt, sizeof(arch_opt), "%s-arch=%s", cpu_arch, opt);
+ int res = be_parse_arg(arch_opt);
+ if (res == 0)
+ argument_errors = true;
+ } else if (strstart(opt, "fpmath=")) {
+ GET_ARG_AFTER(opt, "-mfpmath=");
+ if (streq(opt, "387"))
+ opt = "x87";
+ else if (streq(opt, "sse"))
+ opt = "sse2";
+ else {
+ fprintf(stderr, "error: option -mfpumath supports only 387 or sse\n");
+ argument_errors = true;
+ }
+ if (!argument_errors) {
+ snprintf(arch_opt, sizeof(arch_opt), "%s-fpunit=%s", cpu_arch, opt);
+ int res = be_parse_arg(arch_opt);
+ if (res == 0)
+ argument_errors = true;
+ }
+ } else if (strstart(opt, "preferred-stack-boundary=")) {
+ GET_ARG_AFTER(opt, "-mpreferred-stack-boundary=");
+ snprintf(arch_opt, sizeof(arch_opt), "%s-stackalign=%s", cpu_arch, opt);
+ int res = be_parse_arg(arch_opt);
+ if (res == 0)
+ argument_errors = true;
+ } else if (streq(opt, "omit-leaf-frame-pointer")) {
+ set_be_option("omitleaffp=1");
+ } else if (streq(opt, "no-omit-leaf-frame-pointer")) {
+ set_be_option("omitleaffp=0");
+ } else if (streq(opt, "rtd")) {
+ default_calling_convention = CC_STDCALL;
+ } else if (strstart(opt, "regparm=")) {
+ fprintf(stderr, "error: regparm convention not supported yet\n");
+ argument_errors = true;
+ } else if (streq(opt, "soft-float")) {
+ fprintf(stderr, "error: software floatingpoint not supported yet\n");
+ argument_errors = true;
+ } else {
+ long int value = strtol(opt, NULL, 10);
+ if (value == 0) {
+ fprintf(stderr, "error: wrong option '-m %s'\n", opt);
+ argument_errors = true;
+ } else 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;
+ add_flag(&asflags_obst, "-m%u", machine_size);
+ add_flag(&ldflags_obst, "-m%u", machine_size);
+ }
+ }
+ } else if (streq(option, "pg")) {
+ set_be_option("gprof");
+ add_flag(&ldflags_obst, "-pg");
+ } else if (streq(option, "pedantic") ||
+ streq(option, "ansi")) {
+ fprintf(stderr, "warning: ignoring gcc option '%s'\n", arg);
+ } else if (strstart(option, "std=")) {
+ const char *const o = &option[4];
+ standard =
+ streq(o, "c++") ? STANDARD_CXX98 :
+ streq(o, "c++98") ? STANDARD_CXX98 :
+ streq(o, "c89") ? STANDARD_C89 :
+ streq(o, "c99") ? STANDARD_C99 :
+ streq(o, "c9x") ? STANDARD_C99 : // deprecated
+ streq(o, "gnu++98") ? STANDARD_GNUXX98 :
+ streq(o, "gnu89") ? STANDARD_GNU89 :
+ streq(o, "gnu99") ? STANDARD_GNU99 :
+ streq(o, "gnu9x") ? STANDARD_GNU99 : // deprecated
+ streq(o, "iso9899:1990") ? STANDARD_C89 :
+ streq(o, "iso9899:199409") ? STANDARD_C90 :
+ streq(o, "iso9899:1999") ? STANDARD_C99 :
+ streq(o, "iso9899:199x") ? STANDARD_C99 : // deprecated
+ (fprintf(stderr, "warning: ignoring gcc option '%s'\n", arg), standard);
+ } else if (streq(option, "version")) {
+ print_cparser_version();
+ } else if (strstart(option, "print-file-name=")) {
+ GET_ARG_AFTER(print_file_name_file, "-print-file-name=");
+ } else if (option[0] == '-') {
+ /* double dash option */
+ ++option;
+ if (streq(option, "gcc")) {
+ features_on |= _GNUC;
+ features_off &= ~_GNUC;
+ } else if (streq(option, "no-gcc")) {
+ features_on &= ~_GNUC;
+ features_off |= _GNUC;
+ } else if (streq(option, "ms")) {
+ features_on |= _MS;
+ features_off &= ~_MS;
+ } else if (streq(option, "no-ms")) {
+ features_on &= ~_MS;
+ features_off |= _MS;
+ } else if (streq(option, "strict")) {
+ strict_mode = true;
+ } else if (streq(option, "lextest")) {
+ mode = LexTest;
+ } else if (streq(option, "benchmark")) {
+ mode = BenchmarkParser;
+ } else if (streq(option, "print-ast")) {
+ mode = PrintAst;
+ } else if (streq(option, "print-implicit-cast")) {
+ print_implicit_casts = true;
+ } else if (streq(option, "print-parenthesis")) {
+ print_parenthesis = true;
+ } else if (streq(option, "print-fluffy")) {
+ mode = PrintFluffy;
+ } else if (streq(option, "print-jna")) {
+ mode = PrintJna;
+ } else if (streq(option, "jna-limit")) {
+ ++i;
+ if (i >= argc) {
+ fprintf(stderr, "error: "
+ "expected argument after '--jna-limit'\n");
+ argument_errors = true;
+ break;
+ }
+ jna_limit_output(argv[i]);
+ } else if (streq(option, "jna-libname")) {
+ ++i;
+ if (i >= argc) {
+ fprintf(stderr, "error: "
+ "expected argument after '--jna-libname'\n");
+ argument_errors = true;
+ break;
+ }
+ jna_set_libname(argv[i]);
+ } else if (streq(option, "time")) {
+ do_timing = true;
+ } else if (streq(option, "version")) {
+ print_cparser_version();
+ return EXIT_SUCCESS;
+ } else if (streq(option, "help")) {
+ print_help(argv[0]);
+ help_displayed = true;
+ } else if (streq(option, "dump-function")) {
+ ++i;
+ if (i >= argc) {
+ fprintf(stderr, "error: "
+ "expected argument after '--dump-function'\n");
+ argument_errors = true;
+ break;
+ }
+ dumpfunction = argv[i];
+ mode = CompileDump;
+ } else if (streq(option, "export-ir")) {
+ mode = CompileExportIR;
+ } else {
+ fprintf(stderr, "error: unknown argument '%s'\n", arg);
+ argument_errors = true;