/* * Copyright (C) 2012 * Dale Weiler * * Permission is hereby granted, free of charge, to any person obtaining a copy of * this software and associated documentation files (the "Software"), to deal in * the Software without restriction, including without limitation the rights to * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies * of the Software, and to permit persons to whom the Software is furnished to do * so, subject to the following conditions: * * The above copyright notice and this permission notice shall be included in all * copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. */ #include "gmqcc.h" typedef struct { char *name, type; } argitem; VECTOR_MAKE(argitem, items); static const int usage(const char *const app) { printf("usage:\n" " %s -c -oprog.dat -- compile file\n" " %s -a -oprog.dat -- assemble file\n" " %s -c -i -oprog.dat -- compile together (allowed multiple -i)\n" " %s -a -i -oprog.dat -- assemble together(allowed multiple -i)\n" " example:\n" " %s -cfoo.qc -ibar.qc -oqc.dat -afoo.qs -ibar.qs -oqs.dat\n", app, app, app, app, app); printf(" additional flags:\n" " -debug -- turns on compiler debug messages\n" " -memchk -- turns on compiler memory leak check\n" " -help -- prints this help/usage text\n" " -std -- select the QuakeC compile type (types below):\n"); printf(" -std=qcc -- original QuakeC\n" " -std=ftqecc -- fteqcc QuakeC\n" " -std=qccx -- qccx QuakeC\n" " -std=gmqcc -- this compiler QuakeC (default selection)\n"); printf(" codegen flags:\n" " -fdarkplaces-string-table-bug -- patches the string table to work with bugged versions of darkplaces\n" " -fomit-nullcode -- omits the generation of null code (will break everywhere see propsal.txt)\n"); return -1; } int main(int argc, char **argv) { size_t itr = 0; char *app = &argv[0][0]; FILE *fpp = NULL; lex_file *lex = NULL; /* * Parse all command line arguments. This is rather annoying to do * because of all tiny corner cases. */ if (argc <= 1 || (argv[1][0] != '-')) return usage(app); while ((argc > 1) && argv[1][0] == '-') { switch (argv[1][1]) { case 'v': { printf("GMQCC:\n" " version: %d.%d.%d (0x%08X)\n" " build date: %s\n" " build time: %s\n", (GMQCC_VERSION >> 16) & 0xFF, (GMQCC_VERSION >> 8) & 0xFF, (GMQCC_VERSION >> 0) & 0xFF, (GMQCC_VERSION), __DATE__, __TIME__ ); return 0; } #define param_argument(argtype) do { \ argitem item; \ if (argv[1][2]) { \ item.name = util_strdup(&argv[1][2]); \ item.type = argtype; \ items_add(item); \ } else { \ ++argv; \ --argc; \ if (argc <= 1) \ goto clean_params_usage; \ item.name = util_strdup(argv[1]); \ item.type = argtype; \ items_add(item); \ } \ } while (0) case 'c': { param_argument(0); break; } /* compile */ case 'a': { param_argument(1); break; } /* assemble */ case 'i': { param_argument(2); break; } /* includes */ #undef parm_argument default: if (util_strncmpexact(&argv[1][1], "debug" , 5)) { opts_debug = true; break; } if (util_strncmpexact(&argv[1][1], "memchk", 6)) { opts_memchk = true; break; } if (util_strncmpexact(&argv[1][1], "help", 4)) { return usage(app); break; } /* compiler type selection */ if (util_strncmpexact(&argv[1][1], "std=qcc" , 7 )) { opts_compiler = COMPILER_QCC; break; } if (util_strncmpexact(&argv[1][1], "std=fteqcc", 10)) { opts_compiler = COMPILER_FTEQCC; break; } if (util_strncmpexact(&argv[1][1], "std=qccx", 8 )) { opts_compiler = COMPILER_QCCX; break; } if (util_strncmpexact(&argv[1][1], "std=gmqcc", 9 )) { opts_compiler = COMPILER_GMQCC; break; } if (util_strncmpexact(&argv[1][1], "std=", 4 )) { printf("invalid std selection, supported types:\n" " -std=qcc -- original QuakeC\n" " -std=ftqecc -- fteqcc QuakeC\n" " -std=qccx -- qccx QuakeC\n" " -std=gmqcc -- this compiler QuakeC (default selection)\n"); return 0; } /* code specific switches */ if (util_strncmpexact(&argv[1][1], "fdarkplaces-stringtablebug", 26)) { opts_darkplaces_stringtablebug = true; break; } if (util_strncmpexact(&argv[1][1], "fomit-nullcode", 14)) { opts_omit_nullcode = true; break; } return printf("invalid command line argument: %s\n", argv[1]); } ++argv; --argc; } /* * options could depend on another option, this is where option * validity checking like that would take place. */ if (opts_memchk && !opts_debug) printf("Warning: cannot enable -memchk, without -debug.\n"); util_debug("COM", "starting ...\n"); /* multi file multi path compilation system */ for (; itr < items_elements; itr++) { switch (items_data[itr].type) { case 0: lex_init (items_data[itr].name, &lex); if (lex) { lex_parse(lex); lex_close(lex); } break; case 1: asm_init (items_data[itr].name, &fpp); if (fpp) { asm_parse(fpp); asm_close(fpp); } break; } } util_debug("COM", "cleaning ...\n"); /* clean list */ for (itr = 0; itr < items_elements; itr++) mem_d(items_data[itr].name); mem_d(items_data); util_meminfo(); return 0; clean_params_usage: for (itr = 0; itr < items_elements; itr++) mem_d(items_data[itr].name); mem_d(items_data); return usage(app); }