5 * Permission is hereby granted, free of charge, to any person obtaining a copy of
6 * this software and associated documentation files (the "Software"), to deal in
7 * the Software without restriction, including without limitation the rights to
8 * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
9 * of the Software, and to permit persons to whom the Software is furnished to do
10 * so, subject to the following conditions:
12 * The above copyright notice and this permission notice shall be included in all
13 * copies or substantial portions of the Software.
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
24 // todo CLEANUP this argitem thing
25 typedef struct { char *name, type; } argitem;
26 VECTOR_MAKE(argitem, items);
31 int opts_compiler = COMPILER_GMQCC;
33 static const int usage(const char *const app) {
35 printf(" %s -c<file> -oprog.dat -- compile file\n" , app);
36 printf(" %s -a<file> -oprog.dat -- assemble file\n" , app);
37 printf(" %s -c<file> -i<file> -oprog.dat -- compile together (allowed multiple -i<file>)\n" , app);
38 printf(" %s -a<file> -i<file> -oprog.dat -- assemble together(allowed multiple -i<file>)\n", app);
39 printf(" example:\n");
40 printf(" %s -cfoo.qc -ibar.qc -oqc.dat -afoo.qs -ibar.qs -oqs.dat\n", app);
41 printf(" additional flags:\n");
42 printf(" -debug -- turns on compiler debug messages\n");
43 printf(" -memchk -- turns on compiler memory leak check\n");
44 printf(" -help -- prints this help/usage text\n");
45 printf(" -std -- select the QuakeC compile type (types below):\n");
46 printf(" -std=qcc -- original QuakeC\n");
47 printf(" -std=ftqecc -- fteqcc QuakeC\n");
48 printf(" -std=qccx -- qccx QuakeC\n");
49 printf(" -std=gmqcc -- this compiler QuakeC (default selection)\n");
53 int main(int argc, char **argv) {
55 char *app = &argv[0][0];
59 * Parse all command line arguments. This is rather annoying to do
60 * because of all tiny corner cases.
62 if (argc <= 1 || (argv[1][0] != '-'))
65 while ((argc > 1) && argv[1][0] == '-') {
67 case 'c': items_add((argitem){util_strdup(&argv[1][2]), 0}); break; /* compile */
68 case 'a': items_add((argitem){util_strdup(&argv[1][2]), 1}); break; /* assemble */
69 case 'i': items_add((argitem){util_strdup(&argv[1][2]), 2}); break; /* includes */
71 if (!strncmp(&argv[1][1], "debug" , 5)) { opts_debug = 1; break; }
72 if (!strncmp(&argv[1][1], "memchk", 6)) { opts_memchk = 1; break; }
73 if (!strncmp(&argv[1][1], "help", 4)) {
77 /* compiler type selection */
78 if (!strncmp(&argv[1][1], "std=qcc" , 7 )) { opts_compiler = COMPILER_QCC; break; }
79 if (!strncmp(&argv[1][1], "std=fteqcc", 10)) { opts_compiler = COMPILER_FTEQCC; break; }
80 if (!strncmp(&argv[1][1], "std=qccx", 8 )) { opts_compiler = COMPILER_QCCX; break; }
81 if (!strncmp(&argv[1][1], "std=gmqcc", 9 )) { opts_compiler = COMPILER_GMQCC; break; }
82 if (!strncmp(&argv[1][1], "std=", 4 )) {
83 printf("invalid std selection, supported types:\n");
84 printf(" -std=qcc -- original QuakeC\n");
85 printf(" -std=ftqecc -- fteqcc QuakeC\n");
86 printf(" -std=qccx -- qccx QuakeC\n");
87 printf(" -std=gmqcc -- this compiler QuakeC (default selection)\n");
98 * options could depend on another option, this is where option
99 * validity checking like that would take place.
101 if (opts_memchk && !opts_debug)
102 printf("Warning: cannot enable -memchk, without -debug.\n");
104 util_debug("COM", "starting ...\n");
105 /* multi file multi path compilation system */
106 for (; itr < items_elements; itr++) {
107 switch (items_data[itr].type) {
109 fpp = fopen(items_data[itr].name, "r");
110 struct lex_file *lex = lex_open(fpp);
115 asm_init (items_data[itr].name, &fpp);
122 util_debug("COM", "cleaning ...\n");
124 for (itr = 0; itr < items_elements; itr++)
125 mem_d(items_data[itr].name);