2 * TCC - Tiny C Compiler
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
27 static void print_paths(const char *msg
, char **paths
, int nb_paths
)
30 printf("%s:\n%s", msg
, nb_paths
? "" : " -\n");
31 for(i
= 0; i
< nb_paths
; i
++)
32 printf(" %s\n", paths
[i
]);
35 static void display_info(TCCState
*s
, int what
)
39 printf("tcc version %s ("
40 #ifdef TCC_TARGET_I386
42 #elif defined TCC_TARGET_X86_64
44 #elif defined TCC_TARGET_C67
46 #elif defined TCC_TARGET_ARM
48 # ifdef TCC_ARM_HARDFLOAT
51 #elif defined TCC_TARGET_ARM64
53 # ifdef TCC_ARM_HARDFLOAT
59 #elif defined(__APPLE__)
60 /* Current Apple OS name as of 2016 */
62 #elif defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
64 #elif defined(__DragonFly__)
66 #elif defined(__NetBSD__)
68 #elif defined(__OpenBSD__)
70 #elif defined(__linux__)
73 " Unidentified system"
78 printf("install: %s\n", s
->tcc_lib_path
);
79 /* print_paths("programs", NULL, 0); */
80 print_paths("include", s
->sysinclude_paths
, s
->nb_sysinclude_paths
);
81 print_paths("libraries", s
->library_paths
, s
->nb_library_paths
);
83 print_paths("crt", s
->crt_paths
, s
->nb_crt_paths
);
84 printf("elfinterp:\n %s\n", DEFAULT_ELFINTERP(s
));
90 static void help(void)
92 printf("Tiny C Compiler "TCC_VERSION
" - Copyright (C) 2001-2006 Fabrice Bellard\n"
93 "Usage: tcc [options...] [-o outfile] [-c] infile(s)...\n"
94 " tcc [options...] -run infile [arguments...]\n"
96 " -c compile only - generate an object file\n"
97 " -o outfile set output filename\n"
98 " -run run compiled source\n"
99 " -fflag set or reset (with 'no-' prefix) 'flag' (see man page)\n"
100 " -Wwarning set or reset (with 'no-' prefix) 'warning' (see man page)\n"
101 " -w disable all warnings\n"
103 " -vv show included files (as sole argument: show search paths)\n"
104 " -bench show compilation statistics\n"
105 "Preprocessor options:\n"
106 " -Idir add include path 'dir'\n"
107 " -Dsym[=val] define 'sym' with value 'val'\n"
108 " -Usym undefine 'sym'\n"
109 " -E preprocess only\n"
110 " -P[1] no / alternative #line output with -E\n"
111 " -dD -dM output #define directives with -E\n"
113 " -Ldir add library path 'dir'\n"
114 " -llib link with dynamic or static library 'lib'\n"
115 " -r generate (relocatable) object file\n"
116 " -shared generate a shared library\n"
117 " -rdynamic export all global symbols to dynamic linker\n"
118 " -soname set name for shared library to be used at runtime\n"
119 " -static static linking\n"
120 " -pthread link with -lpthread and -D_REENTRANT (POSIX Linux)\n"
121 " -Wl,-opt[=val] set linker option (see manual)\n"
122 "Debugger options:\n"
123 " -g generate runtime debug info\n"
124 #ifdef CONFIG_TCC_BCHECK
125 " -b compile with built-in memory and bounds checker (implies -g)\n"
127 #ifdef CONFIG_TCC_BACKTRACE
128 " -bt N show N callers in stack traces\n"
131 " -x[c|a|n] specify type of the next infile\n"
132 " -nostdinc do not use standard system include paths\n"
133 " -nostdlib do not link with standard crt and libraries\n"
134 " -Bdir use 'dir' as tcc's private library/include path\n"
135 " -MD generate target dependencies for make\n"
136 " -MF depfile put generated dependencies here\n"
137 " -dumpversion print version\n"
138 " - use stdin pipe as infile\n"
139 " @listfile read arguments from listfile\n"
140 "Target specific options:\n"
141 " -m32/64 execute i386/x86-64 cross compiler\n"
142 " -mms-bitfields use MSVC bitfield layout\n"
143 #ifdef TCC_TARGET_ARM
144 " -mfloat-abi hard/softfp on arm\n"
146 #ifdef TCC_TARGET_X86_64
147 " -mno-sse disable floats on x86-64\n"
152 /* re-execute the i386/x86_64 cross-compilers with tcc -m32/-m64: */
153 #if defined TCC_TARGET_I386 || defined TCC_TARGET_X86_64
156 static int execvp_win32(const char *prog
, char **argv
)
158 int ret
= _spawnvp(P_NOWAIT
, prog
, (const char *const*)argv
);
161 cwait(&ret
, ret
, WAIT_CHILD
);
164 #define execvp execvp_win32
166 static void exec_other_tcc(TCCState
*s
, char **argv
, int option
)
168 char child_path
[4096], *child_name
; const char *target
;
170 #ifdef TCC_TARGET_I386
172 case 64: target
= "x86_64";
175 case 32: target
= "i386";
177 pstrcpy(child_path
, sizeof child_path
- 40, argv
[0]);
178 child_name
= tcc_basename(child_path
);
179 strcpy(child_name
, target
);
181 strcat(child_name
, "-win32");
183 strcat(child_name
, "-tcc");
184 if (strcmp(argv
[0], child_path
)) {
186 printf("tcc: using '%s'\n", child_name
), fflush(stdout
);
187 execvp(argv
[0] = child_path
, argv
);
189 tcc_error("'%s' not found", child_name
);
193 #define exec_other_tcc(s, argv, option)
196 static void gen_makedeps(TCCState
*s
, const char *target
, const char *filename
)
199 char buf
[1024], *ext
;
203 /* compute filename automatically
204 * dir/file.o -> dir/file.d */
205 pstrcpy(buf
, sizeof(buf
), target
);
206 ext
= tcc_fileextension(buf
);
207 pstrcpy(ext
, sizeof(buf
) - (ext
-buf
), ".d");
212 printf("<- %s\n", filename
);
214 /* XXX return err codes instead of error() ? */
215 depout
= fopen(filename
, "w");
217 tcc_error("could not open '%s'", filename
);
219 fprintf(depout
, "%s: \\\n", target
);
220 for (i
=0; i
<s
->nb_target_deps
; ++i
)
221 fprintf(depout
, " %s \\\n", s
->target_deps
[i
]);
222 fprintf(depout
, "\n");
226 static char *default_outputfile(TCCState
*s
, const char *first_file
)
230 const char *name
= "a";
232 if (first_file
&& strcmp(first_file
, "-"))
233 name
= tcc_basename(first_file
);
234 pstrcpy(buf
, sizeof(buf
), name
);
235 ext
= tcc_fileextension(buf
);
237 if (s
->output_type
== TCC_OUTPUT_DLL
)
240 if (s
->output_type
== TCC_OUTPUT_EXE
)
244 if (s
->output_type
== TCC_OUTPUT_OBJ
&& !s
->option_r
&& *ext
)
247 strcpy(buf
, "a.out");
249 return tcc_strdup(buf
);
252 static unsigned getclock_ms(void)
255 return GetTickCount();
258 gettimeofday(&tv
, NULL
);
259 return tv
.tv_sec
*1000 + (tv
.tv_usec
+500)/1000;
263 int main(int argc
, char **argv
)
267 unsigned start_time
= 0;
268 const char *first_file
= NULL
;
272 optind
= tcc_parse_args(s
, argc
- 1, argv
+ 1);
274 tcc_set_environment(s
);
282 exec_other_tcc(s
, argv
, s
->cross_target
);
287 if (s
->nb_files
== 0) {
289 if (s
->print_search_dirs
|| s
->verbose
== 2) {
290 tcc_set_output_type(s
, TCC_OUTPUT_MEMORY
);
297 tcc_error("no input files\n");
300 /* check -c consistency : only single file handled. XXX: checks file type */
301 if (s
->output_type
== TCC_OUTPUT_OBJ
&& !s
->option_r
) {
302 if (s
->nb_libraries
!= 0)
303 tcc_error("cannot specify libraries with -c");
304 /* accepts only a single input file */
305 if (s
->nb_files
!= 1)
306 tcc_error("cannot specify multiple files with -c");
309 if (s
->output_type
== 0)
310 s
->output_type
= TCC_OUTPUT_EXE
;
311 tcc_set_output_type(s
, s
->output_type
);
313 if (s
->output_type
== TCC_OUTPUT_PREPROCESS
) {
317 s
->ppfp
= fopen(s
->outfile
, "w");
319 tcc_error("could not write '%s'", s
->outfile
);
321 } else if (s
->output_type
!= TCC_OUTPUT_OBJ
) {
322 if (s
->option_pthread
)
323 tcc_set_options(s
, "-lpthread");
327 start_time
= getclock_ms();
329 /* compile or add each files or library */
330 for(i
= ret
= 0; i
< s
->nb_files
&& ret
== 0; i
++) {
331 struct filespec
*f
= s
->files
[i
];
332 if (f
->type
>= AFF_TYPE_LIB
) {
333 s
->alacarte_link
= f
->type
== AFF_TYPE_LIB
;
334 if (tcc_add_library_err(s
, f
->name
) < 0)
338 printf("-> %s\n", f
->name
);
339 s
->filetype
= f
->type
;
340 if (tcc_add_file(s
, f
->name
) < 0)
343 first_file
= f
->name
;
345 s
->filetype
= AFF_TYPE_NONE
;
346 s
->alacarte_link
= 1;
349 if (s
->output_type
== TCC_OUTPUT_PREPROCESS
) {
353 } else if (0 == ret
) {
354 if (s
->output_type
== TCC_OUTPUT_MEMORY
) {
356 ret
= tcc_run(s
, argc
- 1 - optind
, argv
+ 1 + optind
);
360 s
->outfile
= default_outputfile(s
, first_file
);
361 ret
= !!tcc_output_file(s
, s
->outfile
);
362 if (s
->gen_deps
&& !ret
)
363 gen_makedeps(s
, s
->outfile
, s
->deps_outfile
);
368 tcc_print_stats(s
, getclock_ms() - start_time
);