stuff & fixes
[tinycc.git] / tcc.c
blob9d06a47721748568a5ad93dbdb68cadecc8b4f90
1 /*
2 * TCC - Tiny C Compiler
3 *
4 * Copyright (c) 2001-2004 Fabrice Bellard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 #include "tcc.h"
22 #if ONE_SOURCE
23 # include "libtcc.c"
24 #endif
25 #include "tcctools.c"
27 static const char help[] =
28 "Tiny C Compiler "TCC_VERSION" - Copyright (C) 2001-2006 Fabrice Bellard\n"
29 "Usage: tcc [options...] [-o outfile] [-c] infile(s)...\n"
30 " tcc [options...] -run infile (or --) [arguments...]\n"
31 "General options:\n"
32 " -c compile only - generate an object file\n"
33 " -o outfile set output filename\n"
34 " -run run compiled source\n"
35 " -fflag set or reset (with 'no-' prefix) 'flag' (see tcc -hh)\n"
36 " -std=c99 Conform to the ISO 1999 C standard (default).\n"
37 " -std=c11 Conform to the ISO 2011 C standard.\n"
38 " -Wwarning set or reset (with 'no-' prefix) 'warning' (see tcc -hh)\n"
39 " -w disable all warnings\n"
40 " -v --version show version\n"
41 " -vv show search paths or loaded files\n"
42 " -h -hh show this, show more help\n"
43 " -bench show compilation statistics\n"
44 " - use stdin pipe as infile\n"
45 " @listfile read arguments from listfile\n"
46 "Preprocessor options:\n"
47 " -Idir add include path 'dir'\n"
48 " -Dsym[=val] define 'sym' with value 'val'\n"
49 " -Usym undefine 'sym'\n"
50 " -E preprocess only\n"
51 "Linker options:\n"
52 " -Ldir add library path 'dir'\n"
53 " -llib link with dynamic or static library 'lib'\n"
54 " -r generate (relocatable) object file\n"
55 " -shared generate a shared library/dll\n"
56 " -rdynamic export all global symbols to dynamic linker\n"
57 " -soname set name for shared library to be used at runtime\n"
58 " -Wl,-opt[=val] set linker option (see tcc -hh)\n"
59 "Debugger options:\n"
60 " -g generate stab runtime debug info\n"
61 " -gdwarf[-x] generate dwarf runtime debug info\n"
62 #ifdef CONFIG_TCC_BCHECK
63 " -b compile with built-in memory and bounds checker (implies -g)\n"
64 #endif
65 #ifdef CONFIG_TCC_BACKTRACE
66 " -bt[N] link with backtrace (stack dump) support [show max N callers]\n"
67 #endif
68 "Misc. options:\n"
69 " -x[c|a|b|n] specify type of the next infile (C,ASM,BIN,NONE)\n"
70 " -nostdinc do not use standard system include paths\n"
71 " -nostdlib do not link with standard crt and libraries\n"
72 " -Bdir set tcc's private include/library dir\n"
73 " -M[M]D generate make dependency file [ignore system files]\n"
74 " -M[M] as above but no other output\n"
75 " -MF file specify dependency file name\n"
76 #if defined(TCC_TARGET_I386) || defined(TCC_TARGET_X86_64)
77 " -m32/64 defer to i386/x86_64 cross compiler\n"
78 #endif
79 "Tools:\n"
80 " create library : tcc -ar [crstvx] lib [files]\n"
81 #ifdef TCC_TARGET_PE
82 " create def file : tcc -impdef lib.dll [-v] [-o lib.def]\n"
83 #endif
86 static const char help2[] =
87 "Tiny C Compiler "TCC_VERSION" - More Options\n"
88 "Special options:\n"
89 " -P -P1 with -E: no/alternative #line output\n"
90 " -dD -dM with -E: output #define directives\n"
91 " -pthread same as -D_REENTRANT and -lpthread\n"
92 " -On same as -D__OPTIMIZE__ for n > 0\n"
93 " -Wp,-opt same as -opt\n"
94 " -include file include 'file' above each input file\n"
95 " -isystem dir add 'dir' to system include path\n"
96 " -static link to static libraries (not recommended)\n"
97 " -dumpversion print version\n"
98 " -print-search-dirs print search paths\n"
99 " -dt with -run/-E: auto-define 'test_...' macros\n"
100 "Ignored options:\n"
101 " -arch -C --param -pedantic -pipe -s -traditional\n"
102 "-W[no-]... warnings:\n"
103 " all turn on some (*) warnings\n"
104 " error[=warning] stop after warning (any or specified)\n"
105 " write-strings strings are const\n"
106 " unsupported warn about ignored options, pragmas, etc.\n"
107 " implicit-function-declaration warn for missing prototype (*)\n"
108 " discarded-qualifiers warn when const is dropped (*)\n"
109 "-f[no-]... flags:\n"
110 " unsigned-char default char is unsigned\n"
111 " signed-char default char is signed\n"
112 " common use common section instead of bss\n"
113 " leading-underscore decorate extern symbols\n"
114 " ms-extensions allow anonymous struct in struct\n"
115 " dollars-in-identifiers allow '$' in C symbols\n"
116 " test-coverage create code coverage code\n"
117 "-m... target specific options:\n"
118 " ms-bitfields use MSVC bitfield layout\n"
119 #ifdef TCC_TARGET_ARM
120 " float-abi hard/softfp on arm\n"
121 #endif
122 #ifdef TCC_TARGET_X86_64
123 " no-sse disable floats on x86_64\n"
124 #endif
125 "-Wl,... linker options:\n"
126 " -nostdlib do not link with standard crt/libs\n"
127 " -[no-]whole-archive load lib(s) fully/only as needed\n"
128 " -export-all-symbols same as -rdynamic\n"
129 " -export-dynamic same as -rdynamic\n"
130 " -image-base= -Ttext= set base address of executable\n"
131 " -section-alignment= set section alignment in executable\n"
132 #ifdef TCC_TARGET_PE
133 " -file-alignment= set PE file alignment\n"
134 " -stack= set PE stack reserve\n"
135 " -large-address-aware set related PE option\n"
136 " -subsystem=[console/windows] set PE subsystem\n"
137 " -oformat=[pe-* binary] set executable output format\n"
138 "Predefined macros:\n"
139 " tcc -E -dM - < nul\n"
140 #else
141 " -rpath= set dynamic library search path\n"
142 " -enable-new-dtags set DT_RUNPATH instead of DT_RPATH\n"
143 " -soname= set DT_SONAME elf tag\n"
144 #if defined(TCC_TARGET_MACHO)
145 " -install_name= set DT_SONAME elf tag (soname macOS alias)\n"
146 #endif
147 " -Bsymbolic set DT_SYMBOLIC elf tag\n"
148 " -oformat=[elf32/64-* binary] set executable output format\n"
149 " -init= -fini= -Map= -as-needed -O (ignored)\n"
150 "Predefined macros:\n"
151 " tcc -E -dM - < /dev/null\n"
152 #endif
153 "See also the manual for more details.\n"
156 static const char version[] =
157 "tcc version "TCC_VERSION
158 #ifdef TCC_GITHASH
159 " "TCC_GITHASH
160 #endif
161 " ("
162 #ifdef TCC_TARGET_I386
163 "i386"
164 #elif defined TCC_TARGET_X86_64
165 "x86_64"
166 #elif defined TCC_TARGET_C67
167 "C67"
168 #elif defined TCC_TARGET_ARM
169 "ARM"
170 # ifdef TCC_ARM_EABI
171 " eabi"
172 # ifdef TCC_ARM_HARDFLOAT
173 "hf"
174 # endif
175 # endif
176 #elif defined TCC_TARGET_ARM64
177 "AArch64"
178 #elif defined TCC_TARGET_RISCV64
179 "riscv64"
180 #endif
181 #ifdef TCC_TARGET_PE
182 " Windows"
183 #elif defined(TCC_TARGET_MACHO)
184 " Darwin"
185 #elif TARGETOS_FreeBSD || TARGETOS_FreeBSD_kernel
186 " FreeBSD"
187 #elif TARGETOS_OpenBSD
188 " OpenBSD"
189 #elif TARGETOS_NetBSD
190 " NetBSD"
191 #else
192 " Linux"
193 #endif
194 ")\n"
197 static void print_dirs(const char *msg, char **paths, int nb_paths)
199 int i;
200 printf("%s:\n%s", msg, nb_paths ? "" : " -\n");
201 for(i = 0; i < nb_paths; i++)
202 printf(" %s\n", paths[i]);
205 static void print_search_dirs(TCCState *s)
207 printf("install: %s\n", s->tcc_lib_path);
208 /* print_dirs("programs", NULL, 0); */
209 print_dirs("include", s->sysinclude_paths, s->nb_sysinclude_paths);
210 print_dirs("libraries", s->library_paths, s->nb_library_paths);
211 printf("libtcc1:\n %s/%s\n", s->library_paths[0], CONFIG_TCC_CROSSPREFIX TCC_LIBTCC1);
212 #if !defined TCC_TARGET_PE && !defined TCC_TARGET_MACHO
213 print_dirs("crt", s->crt_paths, s->nb_crt_paths);
214 printf("elfinterp:\n %s\n", DEFAULT_ELFINTERP(s));
215 #endif
218 static void set_environment(TCCState *s)
220 char * path;
222 path = getenv("C_INCLUDE_PATH");
223 if(path != NULL) {
224 tcc_add_sysinclude_path(s, path);
226 path = getenv("CPATH");
227 if(path != NULL) {
228 tcc_add_include_path(s, path);
230 path = getenv("LIBRARY_PATH");
231 if(path != NULL) {
232 tcc_add_library_path(s, path);
236 static char *default_outputfile(TCCState *s, const char *first_file)
238 char buf[1024];
239 char *ext;
240 const char *name = "a";
242 if (first_file && strcmp(first_file, "-"))
243 name = tcc_basename(first_file);
244 snprintf(buf, sizeof(buf), "%s", name);
245 ext = tcc_fileextension(buf);
246 #ifdef TCC_TARGET_PE
247 if (s->output_type == TCC_OUTPUT_DLL)
248 strcpy(ext, ".dll");
249 else
250 if (s->output_type == TCC_OUTPUT_EXE)
251 strcpy(ext, ".exe");
252 else
253 #endif
254 if ((s->just_deps || s->output_type == TCC_OUTPUT_OBJ) && !s->option_r && *ext)
255 strcpy(ext, ".o");
256 else
257 strcpy(buf, "a.out");
258 return tcc_strdup(buf);
261 static unsigned getclock_ms(void)
263 #ifdef _WIN32
264 return GetTickCount();
265 #else
266 struct timeval tv;
267 gettimeofday(&tv, NULL);
268 return tv.tv_sec*1000 + (tv.tv_usec+500)/1000;
269 #endif
272 int main(int argc0, char **argv0)
274 TCCState *s, *s1;
275 int ret, opt, n = 0, t = 0, done;
276 unsigned start_time = 0, end_time = 0;
277 const char *first_file;
278 int argc; char **argv;
279 FILE *ppfp = stdout;
281 redo:
282 argc = argc0, argv = argv0;
283 s = s1 = tcc_new();
284 #ifdef CONFIG_TCC_SWITCHES /* predefined options */
285 tcc_set_options(s, CONFIG_TCC_SWITCHES);
286 #endif
287 opt = tcc_parse_args(s, &argc, &argv, 1);
288 if (opt < 0)
289 return 1;
291 if (n == 0) {
292 if (opt == OPT_HELP) {
293 fputs(help, stdout);
294 if (!s->verbose)
295 return 0;
296 ++opt;
298 if (opt == OPT_HELP2) {
299 fputs(help2, stdout);
300 return 0;
302 if (opt == OPT_M32 || opt == OPT_M64)
303 return tcc_tool_cross(s, argv, opt);
304 if (s->verbose)
305 printf("%s", version);
306 if (opt == OPT_AR)
307 return tcc_tool_ar(s, argc, argv);
308 #ifdef TCC_TARGET_PE
309 if (opt == OPT_IMPDEF)
310 return tcc_tool_impdef(s, argc, argv);
311 #endif
312 if (opt == OPT_V)
313 return 0;
314 if (opt == OPT_PRINT_DIRS) {
315 /* initialize search dirs */
316 set_environment(s);
317 tcc_set_output_type(s, TCC_OUTPUT_MEMORY);
318 print_search_dirs(s);
319 return 0;
322 if (s->nb_files == 0) {
323 tcc_error_noabort("no input files");
324 } else if (s->output_type == TCC_OUTPUT_PREPROCESS) {
325 if (s->outfile && 0!=strcmp("-",s->outfile)) {
326 ppfp = fopen(s->outfile, "w");
327 if (!ppfp)
328 tcc_error_noabort("could not write '%s'", s->outfile);
330 } else if (s->output_type == TCC_OUTPUT_OBJ && !s->option_r) {
331 if (s->nb_libraries)
332 tcc_error_noabort("cannot specify libraries with -c");
333 else if (s->nb_files > 1 && s->outfile)
334 tcc_error_noabort("cannot specify output file with -c many files");
336 if (s->nb_errors)
337 return 1;
338 if (s->do_bench)
339 start_time = getclock_ms();
342 set_environment(s);
343 if (s->output_type == 0)
344 s->output_type = TCC_OUTPUT_EXE;
345 tcc_set_output_type(s, s->output_type);
346 s->ppfp = ppfp;
348 if ((s->output_type == TCC_OUTPUT_MEMORY
349 || s->output_type == TCC_OUTPUT_PREPROCESS)
350 && (s->dflag & 16)) { /* -dt option */
351 if (t)
352 s->dflag |= 32;
353 s->run_test = ++t;
354 if (n)
355 --n;
358 /* compile or add each files or library */
359 first_file = NULL, ret = 0;
360 do {
361 struct filespec *f = s->files[n];
362 s->filetype = f->type;
363 if (f->type & AFF_TYPE_LIB) {
364 if (tcc_add_library_err(s, f->name) < 0)
365 ret = 1;
366 } else {
367 if (1 == s->verbose)
368 printf("-> %s\n", f->name);
369 if (!first_file)
370 first_file = f->name;
371 if (tcc_add_file(s, f->name) < 0)
372 ret = 1;
374 done = ret || ++n >= s->nb_files;
375 } while (!done && (s->output_type != TCC_OUTPUT_OBJ || s->option_r));
377 if (s->do_bench)
378 end_time = getclock_ms();
380 if (s->run_test) {
381 t = 0;
382 } else if (s->output_type == TCC_OUTPUT_PREPROCESS) {
384 } else if (0 == ret) {
385 if (s->output_type == TCC_OUTPUT_MEMORY) {
386 #ifdef TCC_IS_NATIVE
387 ret = tcc_run(s, argc, argv);
388 #endif
389 } else {
390 if (!s->outfile)
391 s->outfile = default_outputfile(s, first_file);
392 if (!s->just_deps && tcc_output_file(s, s->outfile))
393 ret = 1;
394 else if (s->gen_deps)
395 ret = gen_makedeps(s, s->outfile, s->deps_outfile);
399 if (done && 0 == t && 0 == ret && s->do_bench)
400 tcc_print_stats(s, end_time - start_time);
402 tcc_delete(s);
403 if (!done)
404 goto redo; /* compile more files with -c */
405 if (t)
406 goto redo; /* run more tests with -dt -run */
408 if (ppfp && ppfp != stdout)
409 fclose(ppfp);
410 return ret;