?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
shell32: Add network icon.
[wine.git] / tools / winegcc / winegcc.c
blob05a0ebb01b9de68df54d9fdc41b6d72bc4dbd4c6
1 /*
2 * MinGW wrapper: makes gcc behave like MinGW.
3 *
4 * Copyright 2000 Manuel Novoa III
5 * Copyright 2000 Francois Gouget
6 * Copyright 2002 Dimitrie O. Paun
7 *
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 *
22 * DESCRIPTION
23 *
24 * all options for gcc start with '-' and are for the most part
25 * single options (no parameters as separate argument).
26 * There are of course exceptions to this rule, so here is an
27 * exhaustive list of options that do take parameters (potentially)
28 * as a separate argument:
29 *
30 * Compiler:
31 * -x language
32 * -o filename
33 * -aux-info filename
34 *
35 * Preprocessor:
36 * -D name
37 * -U name
38 * -I dir
39 * -MF file
40 * -MT target
41 * -MQ target
42 * (all -i.* arg)
43 * -include file
44 * -imacros file
45 * -idirafter dir
46 * -iwithprefix dir
47 * -iwithprefixbefore dir
48 * -isystem dir
49 * -A predicate=answer
50 *
51 * Linking:
52 * -l library
53 * -Xlinker option
54 * -u symbol
55 *
56 * Misc:
57 * -b machine
58 * -V version
59 * -G num (see NOTES below)
60 *
61 * NOTES
62 * There is -G option for compatibility with System V that
63 * takes no parameters. This makes "-G num" parsing ambiguous.
64 * This option is synonymous to -shared, and as such we will
65 * not support it for now.
66 *
67 * Special interest options
68 *
69 * Assembler Option
70 * -Wa,option
71 *
72 * Linker Options
73 * object-file-name -llibrary -nostartfiles -nodefaultlibs
74 * -nostdlib -s -static -static-libgcc -shared -shared-libgcc
75 * -symbolic -Wl,option -Xlinker option -u symbol --image-base
76 *
77 * Directory Options
78 * -Bprefix -Idir -I- -Ldir -specs=file
79 *
80 * Target Options
81 * -b machine -V version
82 *
83 * Please note that the Target Options are relevant to everything:
84 * compiler, linker, assembler, preprocessor.
85 *
86 */
87
88 #include "config.h"
89 #include "wine/port.h"
90
91 #include <assert.h>
92 #include <stdio.h>
93 #include <stdlib.h>
94 #include <signal.h>
95 #include <stdarg.h>
96 #include <string.h>
97 #include <errno.h>
98
99 #include "utils.h"
100
101 static const char* app_loader_template =
102 "#!/bin/sh\n"
103 "\n"
104 "appname=\"%s\"\n"
105 "# determine the application directory\n"
106 "appdir=''\n"
107 "case \"$0\" in\n"
108 " */*)\n"
109 " # $0 contains a path, use it\n"
110 " appdir=`dirname \"$0\"`\n"
111 " ;;\n"
112 " *)\n"
113 " # no directory in $0, search in PATH\n"
114 " saved_ifs=$IFS\n"
115 " IFS=:\n"
116 " for d in $PATH\n"
117 " do\n"
118 " IFS=$saved_ifs\n"
119 " if [ -x \"$d/$appname\" ]; then appdir=\"$d\"; break; fi\n"
120 " done\n"
121 " ;;\n"
122 "esac\n"
123 "\n"
124 "# figure out the full app path\n"
125 "if [ -n \"$appdir\" ]; then\n"
126 " apppath=\"$appdir/$appname\"\n"
127 " WINEDLLPATH=\"$appdir:$WINEDLLPATH\"\n"
128 " export WINEDLLPATH\n"
129 "else\n"
130 " apppath=\"$appname\"\n"
131 "fi\n"
132 "\n"
133 "# determine the WINELOADER\n"
134 "if [ ! -x \"$WINELOADER\" ]; then WINELOADER=\"wine\"; fi\n"
135 "\n"
136 "# and try to start the app\n"
137 "exec \"$WINELOADER\" \"$apppath\" \"$@\"\n"
138 ;
139
140 static int keep_generated = 0;
141 static strarray* tmp_files;
142 #ifdef HAVE_SIGSET_T
143 static sigset_t signal_mask;
144 #endif
145
146 enum processor { proc_cc, proc_cxx, proc_cpp, proc_as };
147
148 static const struct
149 {
150 const char *name;
151 enum target_cpu cpu;
152 } cpu_names[] =
153 {
154 { "i386", CPU_x86 },
155 { "i486", CPU_x86 },
156 { "i586", CPU_x86 },
157 { "i686", CPU_x86 },
158 { "i786", CPU_x86 },
159 { "amd64", CPU_x86_64 },
160 { "x86_64", CPU_x86_64 },
161 { "powerpc", CPU_POWERPC },
162 { "arm", CPU_ARM },
163 { "armv5", CPU_ARM },
164 { "armv6", CPU_ARM },
165 { "armv7", CPU_ARM },
166 { "arm64", CPU_ARM64 },
167 { "aarch64", CPU_ARM64 },
168 };
169
170 static const struct
171 {
172 const char *name;
173 enum target_platform platform;
174 } platform_names[] =
175 {
176 { "macos", PLATFORM_APPLE },
177 { "darwin", PLATFORM_APPLE },
178 { "android", PLATFORM_ANDROID },
179 { "solaris", PLATFORM_SOLARIS },
180 { "cygwin", PLATFORM_CYGWIN },
181 { "mingw32", PLATFORM_WINDOWS },
182 { "windows", PLATFORM_WINDOWS },
183 { "winnt", PLATFORM_WINDOWS }
184 };
185
186 struct options
187 {
188 enum processor processor;
189 enum target_cpu target_cpu;
190 enum target_platform target_platform;
191 const char *target;
192 const char *version;
193 int shared;
194 int use_msvcrt;
195 int nostdinc;
196 int nostdlib;
197 int nostartfiles;
198 int nodefaultlibs;
199 int noshortwchar;
200 int gui_app;
201 int unicode_app;
202 int win16_app;
203 int compile_only;
204 int force_pointer_size;
205 int large_address_aware;
206 int unwind_tables;
207 int strip;
208 const char* wine_objdir;
209 const char* output_name;
210 const char* image_base;
211 const char* section_align;
212 const char* lib_suffix;
213 const char* subsystem;
214 strarray* prefix;
215 strarray* lib_dirs;
216 strarray* linker_args;
217 strarray* compiler_args;
218 strarray* winebuild_args;
219 strarray* files;
220 };
221
222 #ifdef __i386__
223 static const enum target_cpu build_cpu = CPU_x86;
224 #elif defined(__x86_64__)
225 static const enum target_cpu build_cpu = CPU_x86_64;
226 #elif defined(__powerpc__)
227 static const enum target_cpu build_cpu = CPU_POWERPC;
228 #elif defined(__arm__)
229 static const enum target_cpu build_cpu = CPU_ARM;
230 #elif defined(__aarch64__)
231 static const enum target_cpu build_cpu = CPU_ARM64;
232 #else
233 #error Unsupported CPU
234 #endif
235
236 #ifdef __APPLE__
237 static enum target_platform build_platform = PLATFORM_APPLE;
238 #elif defined(__ANDROID__)
239 static enum target_platform build_platform = PLATFORM_ANDROID;
240 #elif defined(__sun)
241 static enum target_platform build_platform = PLATFORM_SOLARIS;
242 #elif defined(__CYGWIN__)
243 static enum target_platform build_platform = PLATFORM_CYGWIN;
244 #elif defined(_WIN32)
245 static enum target_platform build_platform = PLATFORM_WINDOWS;
246 #else
247 static enum target_platform build_platform = PLATFORM_UNSPECIFIED;
248 #endif
249
250 static void clean_temp_files(void)
251 {
252 unsigned int i;
253
254 if (keep_generated) return;
255
256 for (i = 0; i < tmp_files->size; i++)
257 unlink(tmp_files->base[i]);
258 }
259
260 /* clean things up when aborting on a signal */
261 static void exit_on_signal( int sig )
262 {
263 exit(1); /* this will call the atexit functions */
264 }
265
266 static char* get_temp_file(const char* prefix, const char* suffix)
267 {
268 int fd;
269 char* tmp = strmake("%s-XXXXXX%s", prefix, suffix);
270
271 #ifdef HAVE_SIGPROCMASK
272 sigset_t old_set;
273 /* block signals while manipulating the temp files list */
274 sigprocmask( SIG_BLOCK, &signal_mask, &old_set );
275 #endif
276 fd = mkstemps( tmp, strlen(suffix) );
277 if (fd == -1)
278 {
279 /* could not create it in current directory, try in TMPDIR */
280 const char* tmpdir;
281
282 free(tmp);
283 if (!(tmpdir = getenv("TMPDIR"))) tmpdir = "/tmp";
284 tmp = strmake("%s/%s-XXXXXX%s", tmpdir, prefix, suffix);
285 fd = mkstemps( tmp, strlen(suffix) );
286 if (fd == -1) error( "could not create temp file\n" );
287 }
288 close( fd );
289 strarray_add(tmp_files, tmp);
290 #ifdef HAVE_SIGPROCMASK
291 sigprocmask( SIG_SETMASK, &old_set, NULL );
292 #endif
293 return tmp;
294 }
295
296 static char* build_tool_name(struct options *opts, const char* base, const char* deflt)
297 {
298 char* str;
299
300 if (opts->target && opts->version)
301 {
302 str = strmake("%s-%s-%s", opts->target, base, opts->version);
303 }
304 else if (opts->target)
305 {
306 str = strmake("%s-%s", opts->target, base);
307 }
308 else if (opts->version)
309 {
310 str = strmake("%s-%s", base, opts->version);
311 }
312 else
313 str = xstrdup(deflt);
314 return str;
315 }
316
317 static const strarray* get_translator(struct options *opts)
318 {
319 char *str = NULL;
320 strarray *ret;
321
322 switch(opts->processor)
323 {
324 case proc_cpp:
325 str = build_tool_name(opts, "cpp", CPP);
326 break;
327 case proc_cc:
328 case proc_as:
329 str = build_tool_name(opts, "gcc", CC);
330 break;
331 case proc_cxx:
332 str = build_tool_name(opts, "g++", CXX);
333 break;
334 default:
335 assert(0);
336 }
337 ret = strarray_fromstring( str, " " );
338 free(str);
339 if (opts->force_pointer_size)
340 strarray_add( ret, strmake("-m%u", 8 * opts->force_pointer_size ));
341 return ret;
342 }
343
344 static int try_link( const strarray *prefix, const strarray *link_tool, const char *cflags )
345 {
346 const char *in = get_temp_file( "try_link", ".c" );
347 const char *out = get_temp_file( "try_link", ".out" );
348 const char *err = get_temp_file( "try_link", ".err" );
349 strarray *link = strarray_dup( link_tool );
350 int sout = -1, serr = -1;
351 int ret;
352
353 create_file( in, 0644, "int main(void){return 1;}\n" );
354
355 strarray_add( link, "-o" );
356 strarray_add( link, out );
357 strarray_addall( link, strarray_fromstring( cflags, " " ) );
358 strarray_add( link, in );
359
360 sout = dup( fileno(stdout) );
361 freopen( err, "w", stdout );
362 serr = dup( fileno(stderr) );
363 freopen( err, "w", stderr );
364 ret = spawn( prefix, link, 1 );
365 if (sout >= 0)
366 {
367 dup2( sout, fileno(stdout) );
368 close( sout );
369 }
370 if (serr >= 0)
371 {
372 dup2( serr, fileno(stderr) );
373 close( serr );
374 }
375 strarray_free( link );
376 return ret;
377 }
378
379 static const strarray* get_lddllflags( const struct options *opts, const strarray *link_tool )
380 {
381 strarray *flags = strarray_alloc();
382 switch (opts->target_platform)
383 {
384 case PLATFORM_APPLE:
385 strarray_add( flags, "-bundle" );
386 strarray_add( flags, "-multiply_defined" );
387 strarray_add( flags, "suppress" );
388 if (opts->target_cpu == CPU_POWERPC)
389 {
390 strarray_add( flags, "-read_only_relocs" );
391 strarray_add( flags, "warning" );
392 }
393 break;
394
395 case PLATFORM_ANDROID:
396 case PLATFORM_SOLARIS:
397 case PLATFORM_UNSPECIFIED:
398 strarray_add( flags, "-shared" );
399 strarray_add( flags, "-Wl,-Bsymbolic" );
400
401 /* Try all options first - this is likely to succeed on modern compilers */
402 if (!try_link( opts->prefix, link_tool, "-fPIC -shared -Wl,-Bsymbolic "
403 "-Wl,-z,defs -Wl,-init,__wine_spec_init,-fini,_wine_spec_fini" ))
404 {
405 strarray_add( flags, "-Wl,-z,defs" );
406 strarray_add( flags, "-Wl,-init,__wine_spec_init,-fini,__wine_spec_fini" );
407 }
408 else /* otherwise figure out which ones are allowed */
409 {
410 if (!try_link( opts->prefix, link_tool, "-fPIC -shared -Wl,-Bsymbolic -Wl,-z,defs" ))
411 strarray_add( flags, "-Wl,-z,defs" );
412 if (!try_link( opts->prefix, link_tool, "-fPIC -shared -Wl,-Bsymbolic "
413 "-Wl,-init,__wine_spec_init,-fini,_wine_spec_fini" ))
414 strarray_add( flags, "-Wl,-init,__wine_spec_init,-fini,__wine_spec_fini" );
415 }
416 break;
417
418 default:
419 assert(0);
420 }
421 return flags;
422 }
423
424 /* check that file is a library for the correct platform */
425 static int check_platform( struct options *opts, const char *file )
426 {
427 int ret = 0, fd = open( file, O_RDONLY );
428 if (fd != -1)
429 {
430 unsigned char header[16];
431 if (read( fd, header, sizeof(header) ) == sizeof(header))
432 {
433 /* FIXME: only ELF is supported, platform is not checked beyond 32/64 */
434 if (!memcmp( header, "\177ELF", 4 ))
435 {
436 if (header[4] == 2) /* 64-bit */
437 ret = (opts->target_cpu == CPU_x86_64 || opts->target_cpu == CPU_ARM64);
438 else
439 ret = (opts->target_cpu != CPU_x86_64 && opts->target_cpu != CPU_ARM64);
440 }
441 }
442 close( fd );
443 }
444 return ret;
445 }
446
447 static char *get_lib_dir( struct options *opts )
448 {
449 static const char *stdlibpath[] = { LIBDIR, "/usr/lib", "/usr/local/lib", "/lib" };
450 static const char libwine[] = "/libwine.so";
451 const char *bit_suffix, *other_bit_suffix;
452 unsigned int i;
453
454 bit_suffix = opts->target_cpu == CPU_x86_64 || opts->target_cpu == CPU_ARM64 ? "64" : "32";
455 other_bit_suffix = opts->target_cpu == CPU_x86_64 || opts->target_cpu == CPU_ARM64 ? "32" : "64";
456
457 for (i = 0; i < sizeof(stdlibpath)/sizeof(stdlibpath[0]); i++)
458 {
459 char *p, *buffer = xmalloc( strlen(stdlibpath[i]) + strlen("/arm-linux-gnueabi") + strlen(libwine) + 1 );
460 strcpy( buffer, stdlibpath[i] );
461 p = buffer + strlen(buffer);
462 while (p > buffer && p[-1] == '/') p--;
463 strcpy( p, libwine );
464 if (check_platform( opts, buffer )) goto found;
465 if (p > buffer + 2 && (!memcmp( p - 2, "32", 2 ) || !memcmp( p - 2, "64", 2 )))
466 {
467 p -= 2;
468 strcpy( p, libwine );
469 if (check_platform( opts, buffer )) goto found;
470 }
471 strcpy( p, bit_suffix );
472 strcat( p, libwine );
473 if (check_platform( opts, buffer )) goto found;
474 switch(opts->target_cpu)
475 {
476 case CPU_x86: strcpy( p, "/i386-linux-gnu" ); break;
477 case CPU_x86_64: strcpy( p, "/x86_64-linux-gnu" ); break;
478 case CPU_ARM: strcpy( p, "/arm-linux-gnueabi" ); break;
479 case CPU_ARM64: strcpy( p, "/aarch64-linux-gnu" ); break;
480 case CPU_POWERPC: strcpy( p, "/powerpc-linux-gnu" ); break;
481 default:
482 assert(0);
483 }
484 strcat( p, libwine );
485 if (check_platform( opts, buffer )) goto found;
486
487 strcpy( buffer, stdlibpath[i] );
488 p = buffer + strlen(buffer);
489 while (p > buffer && p[-1] == '/') p--;
490 strcpy( p, libwine );
491
492 /* try to fixup each parent dirs named lib, lib32 or lib64 with target bitness suffix */
493 while (p > buffer)
494 {
495 p--;
496 while (p > buffer && *p != '/') p--;
497 if (*p != '/') break;
498 if (memcmp( p + 1, "lib", 3 )) continue;
499 if (p[4] == '/')
500 {
501 memmove( p + 6, p + 4, strlen( p + 4 ) + 1 );
502 memcpy( p + 4, bit_suffix, 2 );
503 if (check_platform( opts, buffer )) goto found;
504 memmove( p + 4, p + 6, strlen( p + 6 ) + 1 );
505 }
506 else if (!memcmp( p + 4, other_bit_suffix, 2 ) && p[6] == '/')
507 {
508 memcpy( p + 4, bit_suffix, 2 );
509 if (check_platform( opts, buffer )) goto found;
510 memmove( p + 4, p + 6, strlen( p + 6 ) + 1 );
511 if (check_platform( opts, buffer )) goto found;
512 memmove( p + 6, p + 4, strlen( p + 4 ) + 1 );
513 memcpy( p + 4, other_bit_suffix, 2 );
514 }
515 }
516
517 free( buffer );
518 continue;
519
520 found:
521 buffer[strlen(buffer) - strlen(libwine)] = 0;
522 return buffer;
523 }
524 return xstrdup( LIBDIR );
525 }
526
527 static void compile(struct options* opts, const char* lang)
528 {
529 strarray* comp_args = strarray_alloc();
530 unsigned int i, j;
531 int gcc_defs = 0;
532 strarray* gcc;
533 strarray* gpp;
534
535 strarray_addall(comp_args, get_translator(opts));
536 switch(opts->processor)
537 {
538 case proc_cpp: gcc_defs = 1; break;
539 case proc_as: gcc_defs = 0; break;
540 /* Note: if the C compiler is gcc we assume the C++ compiler is too */
541 /* mixing different C and C++ compilers isn't supported in configure anyway */
542 case proc_cc:
543 case proc_cxx:
544 gcc = strarray_fromstring(build_tool_name(opts, "gcc", CC), " ");
545 gpp = strarray_fromstring(build_tool_name(opts, "g++", CXX), " ");
546 for ( j = 0; !gcc_defs && j < comp_args->size; j++ )
547 {
548 const char *cc = comp_args->base[j];
549
550 for (i = 0; !gcc_defs && i < gcc->size; i++)
551 gcc_defs = gcc->base[i][0] != '-' && strendswith(cc, gcc->base[i]);
552 for (i = 0; !gcc_defs && i < gpp->size; i++)
553 gcc_defs = gpp->base[i][0] != '-' && strendswith(cc, gpp->base[i]);
554 }
555 strarray_free(gcc);
556 strarray_free(gpp);
557 break;
558 }
559
560 if (opts->target_platform == PLATFORM_WINDOWS || opts->target_platform == PLATFORM_CYGWIN)
561 goto no_compat_defines;
562
563 if (opts->processor != proc_cpp)
564 {
565 if (gcc_defs && !opts->wine_objdir && !opts->noshortwchar)
566 {
567 strarray_add(comp_args, "-fshort-wchar");
568 strarray_add(comp_args, "-DWINE_UNICODE_NATIVE");
569 }
570 strarray_add(comp_args, "-D_REENTRANT");
571 strarray_add(comp_args, "-fPIC");
572 }
573
574 if (opts->target_cpu == CPU_x86_64 || opts->target_cpu == CPU_ARM64)
575 {
576 strarray_add(comp_args, "-DWIN64");
577 strarray_add(comp_args, "-D_WIN64");
578 strarray_add(comp_args, "-D__WIN64");
579 strarray_add(comp_args, "-D__WIN64__");
580 }
581
582 strarray_add(comp_args, "-DWIN32");
583 strarray_add(comp_args, "-D_WIN32");
584 strarray_add(comp_args, "-D__WIN32");
585 strarray_add(comp_args, "-D__WIN32__");
586 strarray_add(comp_args, "-D__WINNT");
587 strarray_add(comp_args, "-D__WINNT__");
588
589 if (gcc_defs)
590 {
591 switch (opts->target_cpu)
592 {
593 case CPU_x86_64:
594 strarray_add(comp_args, "-D__stdcall=__attribute__((ms_abi))");
595 strarray_add(comp_args, "-D__cdecl=__attribute__((ms_abi))");
596 strarray_add(comp_args, "-D_stdcall=__attribute__((ms_abi))");
597 strarray_add(comp_args, "-D_cdecl=__attribute__((ms_abi))");
598 strarray_add(comp_args, "-D__fastcall=__attribute__((ms_abi))");
599 strarray_add(comp_args, "-D_fastcall=__attribute__((ms_abi))");
600 break;
601 case CPU_x86:
602 strarray_add(comp_args, "-D__stdcall=__attribute__((__stdcall__)) __attribute__((__force_align_arg_pointer__))");
603 strarray_add(comp_args, "-D__cdecl=__attribute__((__cdecl__)) __attribute__((__force_align_arg_pointer__))");
604 strarray_add(comp_args, "-D_stdcall=__attribute__((__stdcall__)) __attribute__((__force_align_arg_pointer__))");
605 strarray_add(comp_args, "-D_cdecl=__attribute__((__cdecl__)) __attribute__((__force_align_arg_pointer__))");
606 strarray_add(comp_args, "-D__fastcall=__attribute__((__fastcall__))");
607 strarray_add(comp_args, "-D_fastcall=__attribute__((__fastcall__))");
608 break;
609 case CPU_ARM:
610 case CPU_ARM64:
611 case CPU_POWERPC:
612 strarray_add(comp_args, "-D__stdcall=");
613 strarray_add(comp_args, "-D__cdecl=");
614 strarray_add(comp_args, "-D_stdcall=");
615 strarray_add(comp_args, "-D_cdecl=");
616 strarray_add(comp_args, "-D__fastcall=");
617 strarray_add(comp_args, "-D_fastcall=");
618 break;
619 }
620 strarray_add(comp_args, "-D__declspec(x)=__declspec_##x");
621 strarray_add(comp_args, "-D__declspec_align(x)=__attribute__((aligned(x)))");
622 strarray_add(comp_args, "-D__declspec_allocate(x)=__attribute__((section(x)))");
623 strarray_add(comp_args, "-D__declspec_deprecated=__attribute__((deprecated))");
624 strarray_add(comp_args, "-D__declspec_dllimport=__attribute__((dllimport))");
625 strarray_add(comp_args, "-D__declspec_dllexport=__attribute__((dllexport))");
626 strarray_add(comp_args, "-D__declspec_naked=__attribute__((naked))");
627 strarray_add(comp_args, "-D__declspec_noinline=__attribute__((noinline))");
628 strarray_add(comp_args, "-D__declspec_noreturn=__attribute__((noreturn))");
629 strarray_add(comp_args, "-D__declspec_nothrow=__attribute__((nothrow))");
630 strarray_add(comp_args, "-D__declspec_novtable=__attribute__(())"); /* ignore it */
631 strarray_add(comp_args, "-D__declspec_selectany=__attribute__((weak))");
632 strarray_add(comp_args, "-D__declspec_thread=__thread");
633 }
634
635 strarray_add(comp_args, "-D__int8=char");
636 strarray_add(comp_args, "-D__int16=short");
637 strarray_add(comp_args, "-D__int32=int");
638 if (opts->target_cpu == CPU_x86_64 || opts->target_cpu == CPU_ARM64)
639 strarray_add(comp_args, "-D__int64=long");
640 else
641 strarray_add(comp_args, "-D__int64=long long");
642
643 no_compat_defines:
644 strarray_add(comp_args, "-D__WINE__");
645
646 /* options we handle explicitly */
647 if (opts->compile_only)
648 strarray_add(comp_args, "-c");
649 if (opts->output_name)
650 {
651 strarray_add(comp_args, "-o");
652 strarray_add(comp_args, opts->output_name);
653 }
654
655 /* the rest of the pass-through parameters */
656 for ( j = 0 ; j < opts->compiler_args->size ; j++ )
657 strarray_add(comp_args, opts->compiler_args->base[j]);
658
659 /* the language option, if any */
660 if (lang && strcmp(lang, "-xnone"))
661 strarray_add(comp_args, lang);
662
663 /* last, but not least, the files */
664 for ( j = 0; j < opts->files->size; j++ )
665 {
666 if (opts->files->base[j][0] != '-')
667 strarray_add(comp_args, opts->files->base[j]);
668 }
669
670 /* standard includes come last in the include search path */
671 if (!opts->wine_objdir && !opts->nostdinc)
672 {
673 if (opts->use_msvcrt)
674 {
675 strarray_add(comp_args, gcc_defs ? "-isystem" INCLUDEDIR "/msvcrt" : "-I" INCLUDEDIR "/msvcrt" );
676 strarray_add(comp_args, "-D__MSVCRT__");
677 }
678 strarray_add(comp_args, gcc_defs ? "-isystem" INCLUDEDIR "/windows" : "-I" INCLUDEDIR "/windows" );
679 }
680 else if (opts->wine_objdir)
681 strarray_add(comp_args, strmake("-I%s/include", opts->wine_objdir) );
682
683 spawn(opts->prefix, comp_args, 0);
684 strarray_free(comp_args);
685 }
686
687 static const char* compile_to_object(struct options* opts, const char* file, const char* lang)
688 {
689 struct options copts;
690 char* base_name;
691
692 /* make a copy so we don't change any of the initial stuff */
693 /* a shallow copy is exactly what we want in this case */
694 base_name = get_basename(file);
695 copts = *opts;
696 copts.output_name = get_temp_file(base_name, ".o");
697 copts.compile_only = 1;
698 copts.files = strarray_alloc();
699 strarray_add(copts.files, file);
700 compile(&copts, lang);
701 strarray_free(copts.files);
702 free(base_name);
703
704 return copts.output_name;
705 }
706
707 /* return the initial set of options needed to run winebuild */
708 static strarray *get_winebuild_args(struct options *opts)
709 {
710 const char* winebuild = getenv("WINEBUILD");
711 strarray *spec_args = strarray_alloc();
712
713 if (!winebuild) winebuild = "winebuild";
714 strarray_add( spec_args, winebuild );
715 if (verbose) strarray_add( spec_args, "-v" );
716 if (keep_generated) strarray_add( spec_args, "--save-temps" );
717 if (opts->target)
718 {
719 strarray_add( spec_args, "--target" );
720 strarray_add( spec_args, opts->target );
721 }
722 if (opts->unwind_tables) strarray_add( spec_args, "-fasynchronous-unwind-tables" );
723 else strarray_add( spec_args, "-fno-asynchronous-unwind-tables" );
724 return spec_args;
725 }
726
727 static const char* compile_resources_to_object(struct options* opts, const strarray *resources,
728 const char *res_o_name)
729 {
730 strarray *winebuild_args = get_winebuild_args( opts );
731
732 strarray_add( winebuild_args, "--resources" );
733 strarray_add( winebuild_args, "-o" );
734 strarray_add( winebuild_args, res_o_name );
735 strarray_addall( winebuild_args, resources );
736
737 spawn( opts->prefix, winebuild_args, 0 );
738 strarray_free( winebuild_args );
739 return res_o_name;
740 }
741
742 /* check if there is a static lib associated to a given dll */
743 static char *find_static_lib( const char *dll )
744 {
745 char *lib = strmake("%s.a", dll);
746 if (get_file_type(lib) == file_arh) return lib;
747 free( lib );
748 return NULL;
749 }
750
751 /* add specified library to the list of files */
752 static void add_library( struct options *opts, strarray *lib_dirs, strarray *files, const char *library )
753 {
754 char *static_lib, *fullname = 0;
755
756 switch(get_lib_type(opts->target_platform, lib_dirs, library, opts->lib_suffix, &fullname))
757 {
758 case file_arh:
759 strarray_add(files, strmake("-a%s", fullname));
760 break;
761 case file_dll:
762 strarray_add(files, strmake("-d%s", fullname));
763 if ((static_lib = find_static_lib(fullname)))
764 {
765 strarray_add(files, strmake("-a%s",static_lib));
766 free(static_lib);
767 }
768 break;
769 case file_so:
770 default:
771 /* keep it anyway, the linker may know what to do with it */
772 strarray_add(files, strmake("-l%s", library));
773 break;
774 }
775 free(fullname);
776 }
777
778 /* hack a main or WinMain function to work around Mingw's lack of Unicode support */
779 static const char *mingw_unicode_hack( struct options *opts )
780 {
781 char *main_stub = get_temp_file( opts->output_name, ".c" );
782
783 create_file( main_stub, 0644,
784 "typedef unsigned short wchar_t;\n"
785 "extern void * __stdcall LoadLibraryA(const char *);\n"
786 "extern void * __stdcall GetProcAddress(void *,const char *);\n"
787 "extern int wmain( int argc, wchar_t *argv[] );\n\n"
788 "int main( int argc, char *argv[] )\n{\n"
789 " int wargc;\n"
790 " wchar_t **wargv, **wenv;\n"
791 " void *msvcrt = LoadLibraryA( \"msvcrt.dll\" );\n"
792 " void (*__wgetmainargs)(int *argc, wchar_t** *wargv, wchar_t** *wenvp, int expand_wildcards,\n"
793 " int *new_mode) = GetProcAddress( msvcrt, \"__wgetmainargs\" );\n"
794 " __wgetmainargs( &wargc, &wargv, &wenv, 0, 0 );\n"
795 " return wmain( wargc, wargv );\n}\n" );
796 return compile_to_object( opts, main_stub, NULL );
797 }
798
799 static void build(struct options* opts)
800 {
801 strarray *lib_dirs, *files;
802 strarray *spec_args, *link_args;
803 char *output_file;
804 const char *spec_o_name;
805 const char *output_name, *spec_file, *lang;
806 const char *prelink = NULL;
807 int generate_app_loader = 1;
808 int fake_module = 0;
809 unsigned int j;
810
811 /* NOTE: for the files array we'll use the following convention:
812 * -axxx: xxx is an archive (.a)
813 * -dxxx: xxx is a DLL (.def)
814 * -lxxx: xxx is an unsorted library
815 * -oxxx: xxx is an object (.o)
816 * -rxxx: xxx is a resource (.res)
817 * -sxxx: xxx is a shared lib (.so)
818 * -xlll: lll is the language (c, c++, etc.)
819 */
820
821 output_file = strdup( opts->output_name ? opts->output_name : "a.out" );
822
823 /* 'winegcc -o app xxx.exe.so' only creates the load script */
824 if (opts->files->size == 1 && strendswith(opts->files->base[0], ".exe.so"))
825 {
826 create_file(output_file, 0755, app_loader_template, opts->files->base[0]);
827 return;
828 }
829
830 /* generate app loader only for .exe */
831 if (opts->shared || strendswith(output_file, ".so"))
832 generate_app_loader = 0;
833
834 if (strendswith(output_file, ".fake")) fake_module = 1;
835
836 /* normalize the filename a bit: strip .so, ensure it has proper ext */
837 if (strendswith(output_file, ".so"))
838 output_file[strlen(output_file) - 3] = 0;
839 if ((output_name = strrchr(output_file, '/'))) output_name++;
840 else output_name = output_file;
841 if (!strchr(output_name, '.'))
842 output_file = strmake("%s.%s", output_file, opts->shared ? "dll" : "exe");
843
844 /* get the filename from the path */
845 if ((output_name = strrchr(output_file, '/'))) output_name++;
846 else output_name = output_file;
847
848 /* prepare the linking path */
849 if (!opts->wine_objdir)
850 {
851 char *lib_dir = get_lib_dir( opts );
852 lib_dirs = strarray_dup(opts->lib_dirs);
853 strarray_add( lib_dirs, strmake( "%s/wine", lib_dir ));
854 strarray_add( lib_dirs, lib_dir );
855 }
856 else
857 {
858 lib_dirs = strarray_alloc();
859 strarray_add(lib_dirs, strmake("%s/dlls", opts->wine_objdir));
860 strarray_add(lib_dirs, strmake("%s/libs/wine", opts->wine_objdir));
861 strarray_addall(lib_dirs, opts->lib_dirs);
862 }
863
864 /* mark the files with their appropriate type */
865 spec_file = lang = 0;
866 files = strarray_alloc();
867 link_args = strarray_alloc();
868 for ( j = 0; j < opts->files->size; j++ )
869 {
870 const char* file = opts->files->base[j];
871 if (file[0] != '-')
872 {
873 switch(get_file_type(file))
874 {
875 case file_def:
876 case file_spec:
877 if (spec_file)
878 error("Only one spec file can be specified\n");
879 spec_file = file;
880 break;
881 case file_rc:
882 /* FIXME: invoke wrc to build it */
883 error("Can't compile .rc file at the moment: %s\n", file);
884 break;
885 case file_res:
886 strarray_add(files, strmake("-r%s", file));
887 break;
888 case file_obj:
889 strarray_add(files, strmake("-o%s", file));
890 break;
891 case file_arh:
892 strarray_add(files, strmake("-a%s", file));
893 break;
894 case file_so:
895 strarray_add(files, strmake("-s%s", file));
896 break;
897 case file_na:
898 error("File does not exist: %s\n", file);
899 break;
900 default:
901 file = compile_to_object(opts, file, lang);
902 strarray_add(files, strmake("-o%s", file));
903 break;
904 }
905 }
906 else if (file[1] == 'l')
907 add_library(opts, lib_dirs, files, file + 2 );
908 else if (file[1] == 'x')
909 lang = file;
910 }
911
912 /* building for Windows is completely different */
913
914 if (opts->target_platform == PLATFORM_WINDOWS || opts->target_platform == PLATFORM_CYGWIN)
915 {
916 strarray *resources = strarray_alloc();
917 char *res_o_name = NULL;
918
919 if (opts->win16_app)
920 error( "Building 16-bit code is not supported for Windows\n" );
921
922 strarray_addall(link_args, get_translator(opts));
923
924 if (opts->shared)
925 {
926 /* run winebuild to generate the .def file */
927 char *spec_def_name = get_temp_file(output_name, ".spec.def");
928 spec_args = get_winebuild_args( opts );
929 strarray_add(spec_args, "--def");
930 strarray_add(spec_args, "-o");
931 strarray_add(spec_args, spec_def_name);
932 if (spec_file)
933 {
934 strarray_add(spec_args, "--export");
935 strarray_add(spec_args, spec_file);
936 }
937 spawn(opts->prefix, spec_args, 0);
938 strarray_free(spec_args);
939
940 strarray_add(link_args, "-shared");
941 if (verbose) strarray_add(link_args, "-v");
942 strarray_add(link_args, "-Wl,--kill-at");
943 strarray_add(link_args, spec_def_name);
944 }
945 else
946 {
947 strarray_add(link_args, opts->gui_app ? "-mwindows" : "-mconsole");
948 }
949
950 if (opts->nodefaultlibs) strarray_add(link_args, "-nodefaultlibs");
951 if (opts->nostartfiles) strarray_add(link_args, "-nostartfiles" );
952
953 if (opts->subsystem)
954 {
955 strarray_add(link_args, strmake("-Wl,--subsystem,%s", opts->subsystem));
956 if (!strcmp( opts->subsystem, "native" ))
957 {
958 const char *entry = opts->target_cpu == CPU_x86 ? "_DriverEntry@8" : "DriverEntry";
959 strarray_add(link_args, strmake( "-Wl,--entry,%s", entry ));
960 }
961 }
962
963 for ( j = 0 ; j < opts->linker_args->size ; j++ )
964 strarray_add(link_args, opts->linker_args->base[j]);
965
966 strarray_add(link_args, "-o");
967 strarray_add(link_args, output_file);
968
969 if (opts->image_base)
970 strarray_add(link_args, strmake("-Wl,--image-base,%s", opts->image_base));
971
972 if (opts->large_address_aware && opts->target_cpu == CPU_x86)
973 strarray_add( link_args, "-Wl,--large-address-aware" );
974
975 if (opts->unicode_app && !opts->shared)
976 strarray_add(link_args, mingw_unicode_hack(opts));
977
978 for ( j = 0; j < lib_dirs->size; j++ )
979 strarray_add(link_args, strmake("-L%s", lib_dirs->base[j]));
980
981 if (!opts->nodefaultlibs)
982 {
983 add_library(opts, lib_dirs, files, "winecrt0");
984 add_library(opts, lib_dirs, files, "kernel32");
985 add_library(opts, lib_dirs, files, "ntdll");
986 }
987 if (!opts->shared && opts->use_msvcrt && opts->target_platform == PLATFORM_CYGWIN)
988 add_library(opts, lib_dirs, files, "msvcrt");
989
990 for ( j = 0; j < files->size; j++ )
991 {
992 const char* name = files->base[j] + 2;
993
994 switch(files->base[j][1])
995 {
996 case 'l':
997 case 'd':
998 strarray_add(link_args, strmake("-l%s", name));
999 break;
1000 case 's':
1001 case 'o':
1002 strarray_add(link_args, name);
1003 break;
1004 case 'a':
1005 if (!opts->lib_suffix && strchr(name, '/'))
1006 {
1007 /* turn the path back into -Ldir -lfoo options
1008 * this makes sure that we use the specified libs even
1009 * when mingw adds its own import libs to the link */
1010 char *lib = xstrdup( name );
1011 char *p = strrchr( lib, '/' );
1012
1013 *p++ = 0;
1014 if (!strncmp( p, "lib", 3 ))
1015 {
1016 char *ext = strrchr( p, '.' );
1017
1018 if (ext) *ext = 0;
1019 p += 3;
1020 strarray_add(link_args, strmake("-L%s", lib ));
1021 strarray_add(link_args, strmake("-l%s", p ));
1022 free( lib );
1023 break;
1024 }
1025 free( lib );
1026 }
1027 strarray_add(link_args, name);
1028 break;
1029 case 'r':
1030 if (!res_o_name)
1031 {
1032 res_o_name = get_temp_file( output_name, ".res.o" );
1033 strarray_add( link_args, res_o_name );
1034 }
1035 strarray_add( resources, name );
1036 break;
1037 }
1038 }
1039
1040 if (res_o_name) compile_resources_to_object( opts, resources, res_o_name );
1041
1042 spawn(opts->prefix, link_args, 0);
1043 strarray_free (resources);
1044 strarray_free (link_args);
1045 strarray_free (lib_dirs);
1046 strarray_free (files);
1047 return;
1048 }
1049
1050 /* add the default libraries, if needed */
1051 if (!opts->nostdlib && opts->use_msvcrt) add_library(opts, lib_dirs, files, "msvcrt");
1052
1053 if (!opts->wine_objdir && !opts->nodefaultlibs)
1054 {
1055 if (opts->gui_app)
1056 {
1057 add_library(opts, lib_dirs, files, "shell32");
1058 add_library(opts, lib_dirs, files, "comdlg32");
1059 add_library(opts, lib_dirs, files, "gdi32");
1060 }
1061 add_library(opts, lib_dirs, files, "advapi32");
1062 add_library(opts, lib_dirs, files, "user32");
1063 }
1064
1065 if (!opts->nodefaultlibs)
1066 {
1067 add_library(opts, lib_dirs, files, "winecrt0");
1068 if (opts->win16_app) add_library(opts, lib_dirs, files, "kernel");
1069 add_library(opts, lib_dirs, files, "kernel32");
1070 add_library(opts, lib_dirs, files, "ntdll");
1071 }
1072 if (!opts->nostdlib) add_library(opts, lib_dirs, files, "wine");
1073
1074 /* run winebuild to generate the .spec.o file */
1075 spec_args = get_winebuild_args( opts );
1076 strarray_add( spec_args, strmake( "--cc-cmd=%s", build_tool_name( opts, "gcc", CC )));
1077 strarray_add( spec_args, strmake( "--ld-cmd=%s", build_tool_name( opts, "ld", LD )));
1078
1079 spec_o_name = get_temp_file(output_name, ".spec.o");
1080 if (opts->force_pointer_size)
1081 strarray_add(spec_args, strmake("-m%u", 8 * opts->force_pointer_size ));
1082 strarray_add(spec_args, "-D_REENTRANT");
1083 strarray_add(spec_args, "-fPIC");
1084 strarray_add(spec_args, opts->shared ? "--dll" : "--exe");
1085 if (fake_module)
1086 {
1087 strarray_add(spec_args, "--fake-module");
1088 strarray_add(spec_args, "-o");
1089 strarray_add(spec_args, output_file);
1090 }
1091 else
1092 {
1093 strarray_add(spec_args, "-o");
1094 strarray_add(spec_args, spec_o_name);
1095 }
1096 if (spec_file)
1097 {
1098 strarray_add(spec_args, "-E");
1099 strarray_add(spec_args, spec_file);
1100 }
1101 if (opts->win16_app) strarray_add(spec_args, "-m16");
1102
1103 if (!opts->shared)
1104 {
1105 strarray_add(spec_args, "-F");
1106 strarray_add(spec_args, output_name);
1107 strarray_add(spec_args, "--subsystem");
1108 strarray_add(spec_args, opts->gui_app ? "windows" : "console");
1109 if (opts->unicode_app)
1110 {
1111 strarray_add(spec_args, "--entry");
1112 strarray_add(spec_args, "__wine_spec_exe_wentry");
1113 }
1114 if (opts->large_address_aware) strarray_add( spec_args, "--large-address-aware" );
1115 }
1116
1117 if (opts->subsystem)
1118 {
1119 strarray_add(spec_args, "--subsystem");
1120 strarray_add(spec_args, opts->subsystem);
1121 }
1122
1123 for ( j = 0; j < lib_dirs->size; j++ )
1124 strarray_add(spec_args, strmake("-L%s", lib_dirs->base[j]));
1125
1126 for ( j = 0 ; j < opts->winebuild_args->size ; j++ )
1127 strarray_add(spec_args, opts->winebuild_args->base[j]);
1128
1129 /* add resource files */
1130 for ( j = 0; j < files->size; j++ )
1131 if (files->base[j][1] == 'r') strarray_add(spec_args, files->base[j]);
1132
1133 /* add other files */
1134 strarray_add(spec_args, "--");
1135 for ( j = 0; j < files->size; j++ )
1136 {
1137 switch(files->base[j][1])
1138 {
1139 case 'd':
1140 case 'a':
1141 case 'o':
1142 strarray_add(spec_args, files->base[j] + 2);
1143 break;
1144 }
1145 }
1146
1147 spawn(opts->prefix, spec_args, 0);
1148 strarray_free (spec_args);
1149 if (fake_module) return; /* nothing else to do */
1150
1151 /* link everything together now */
1152 strarray_addall(link_args, get_translator(opts));
1153 strarray_addall(link_args, get_lddllflags(opts, link_args));
1154
1155 strarray_add(link_args, "-o");
1156 strarray_add(link_args, strmake("%s.so", output_file));
1157
1158 for ( j = 0 ; j < opts->linker_args->size ; j++ )
1159 strarray_add(link_args, opts->linker_args->base[j]);
1160
1161 switch (opts->target_platform)
1162 {
1163 case PLATFORM_APPLE:
1164 if (opts->image_base)
1165 {
1166 strarray_add(link_args, "-image_base");
1167 strarray_add(link_args, opts->image_base);
1168 }
1169 if (opts->strip)
1170 strarray_add(link_args, "-Wl,-x");
1171 break;
1172 case PLATFORM_SOLARIS:
1173 {
1174 char *mapfile = get_temp_file( output_name, ".map" );
1175 const char *align = opts->section_align ? opts->section_align : "0x1000";
1176
1177 create_file( mapfile, 0644, "text = A%s;\ndata = A%s;\n", align, align );
1178 strarray_add(link_args, strmake("-Wl,-M,%s", mapfile));
1179 strarray_add(tmp_files, mapfile);
1180 }
1181 break;
1182 case PLATFORM_ANDROID:
1183 /* the Android loader requires a soname for all libraries */
1184 strarray_add( link_args, strmake( "-Wl,-soname,%s.so", output_name ));
1185 break;
1186 default:
1187 if (opts->image_base)
1188 {
1189 if (!try_link(opts->prefix, link_args, strmake("-Wl,-Ttext-segment=%s", opts->image_base)))
1190 strarray_add(link_args, strmake("-Wl,-Ttext-segment=%s", opts->image_base));
1191 else
1192 prelink = PRELINK;
1193 }
1194 if (!try_link(opts->prefix, link_args, "-Wl,-z,max-page-size=0x1000"))
1195 strarray_add(link_args, "-Wl,-z,max-page-size=0x1000");
1196 break;
1197 }
1198
1199 for ( j = 0; j < lib_dirs->size; j++ )
1200 strarray_add(link_args, strmake("-L%s", lib_dirs->base[j]));
1201
1202 strarray_add(link_args, spec_o_name);
1203
1204 for ( j = 0; j < files->size; j++ )
1205 {
1206 const char* name = files->base[j] + 2;
1207 switch(files->base[j][1])
1208 {
1209 case 'l':
1210 strarray_add(link_args, strmake("-l%s", name));
1211 break;
1212 case 's':
1213 case 'a':
1214 case 'o':
1215 strarray_add(link_args, name);
1216 break;
1217 }
1218 }
1219
1220 if (!opts->nostdlib)
1221 {
1222 strarray_add(link_args, "-lm");
1223 strarray_add(link_args, "-lc");
1224 }
1225
1226 spawn(opts->prefix, link_args, 0);
1227 strarray_free (link_args);
1228
1229 /* set the base address with prelink if linker support is not present */
1230 if (prelink && !opts->target)
1231 {
1232 if (prelink[0] && strcmp(prelink,"false"))
1233 {
1234 strarray *prelink_args = strarray_alloc();
1235 strarray_add(prelink_args, prelink);
1236 strarray_add(prelink_args, "--reloc-only");
1237 strarray_add(prelink_args, opts->image_base);
1238 strarray_add(prelink_args, strmake("%s.so", output_file));
1239 spawn(opts->prefix, prelink_args, 1);
1240 strarray_free(prelink_args);
1241 }
1242 }
1243
1244 /* create the loader script */
1245 if (generate_app_loader)
1246 create_file(output_file, 0755, app_loader_template, strmake("%s.so", output_name));
1247 }
1248
1249
1250 static void forward(int argc, char **argv, struct options* opts)
1251 {
1252 strarray* args = strarray_alloc();
1253 int j;
1254
1255 strarray_addall(args, get_translator(opts));
1256
1257 for( j = 1; j < argc; j++ )
1258 strarray_add(args, argv[j]);
1259
1260 spawn(opts->prefix, args, 0);
1261 strarray_free (args);
1262 }
1263
1264 static int is_linker_arg(const char* arg)
1265 {
1266 static const char* link_switches[] =
1267 {
1268 "-nostdlib", "-s", "-static", "-static-libgcc", "-shared", "-shared-libgcc", "-symbolic",
1269 "-framework", "--coverage", "-fprofile-generate", "-fprofile-use"
1270 };
1271 unsigned int j;
1272
1273 switch (arg[1])
1274 {
1275 case 'R':
1276 case 'z':
1277 case 'l':
1278 case 'u':
1279 return 1;
1280 case 'W':
1281 if (strncmp("-Wl,", arg, 4) == 0) return 1;
1282 break;
1283 case 'X':
1284 if (strcmp("-Xlinker", arg) == 0) return 1;
1285 break;
1286 case 'a':
1287 if (strcmp("-arch", arg) == 0) return 1;
1288 break;
1289 }
1290
1291 for (j = 0; j < sizeof(link_switches)/sizeof(link_switches[0]); j++)
1292 if (strcmp(link_switches[j], arg) == 0) return 1;
1293
1294 return 0;
1295 }
1296
1297 /*
1298 * Target Options
1299 * -b machine -V version
1300 */
1301 static int is_target_arg(const char* arg)
1302 {
1303 return arg[1] == 'b' || arg[1] == 'V';
1304 }
1305
1306
1307 /*
1308 * Directory Options
1309 * -Bprefix -Idir -I- -Ldir -specs=file
1310 */
1311 static int is_directory_arg(const char* arg)
1312 {
1313 return arg[1] == 'B' || arg[1] == 'L' || arg[1] == 'I' || strncmp("-specs=", arg, 7) == 0;
1314 }
1315
1316 /*
1317 * MinGW Options
1318 * -mno-cygwin -mwindows -mconsole -mthreads -municode
1319 */
1320 static int is_mingw_arg(const char* arg)
1321 {
1322 static const char* mingw_switches[] =
1323 {
1324 "-mno-cygwin", "-mwindows", "-mconsole", "-mthreads", "-municode"
1325 };
1326 unsigned int j;
1327
1328 for (j = 0; j < sizeof(mingw_switches)/sizeof(mingw_switches[0]); j++)
1329 if (strcmp(mingw_switches[j], arg) == 0) return 1;
1330
1331 return 0;
1332 }
1333
1334 static void parse_target_option( struct options *opts, const char *target )
1335 {
1336 char *p, *platform, *spec = xstrdup( target );
1337 unsigned int i;
1338
1339 /* target specification is in the form CPU-MANUFACTURER-OS or CPU-MANUFACTURER-KERNEL-OS */
1340
1341 /* get the CPU part */
1342
1343 if ((p = strchr( spec, '-' )))
1344 {
1345 *p++ = 0;
1346 for (i = 0; i < sizeof(cpu_names)/sizeof(cpu_names[0]); i++)
1347 {
1348 if (!strcmp( cpu_names[i].name, spec ))
1349 {
1350 opts->target_cpu = cpu_names[i].cpu;
1351 break;
1352 }
1353 }
1354 if (i == sizeof(cpu_names)/sizeof(cpu_names[0]))
1355 error( "Unrecognized CPU '%s'\n", spec );
1356 platform = p;
1357 if ((p = strrchr( p, '-' ))) platform = p + 1;
1358 }
1359 else if (!strcmp( spec, "mingw32" ))
1360 {
1361 opts->target_cpu = CPU_x86;
1362 platform = spec;
1363 }
1364 else
1365 error( "Invalid target specification '%s'\n", target );
1366
1367 /* get the OS part */
1368
1369 opts->target_platform = PLATFORM_UNSPECIFIED; /* default value */
1370 for (i = 0; i < sizeof(platform_names)/sizeof(platform_names[0]); i++)
1371 {
1372 if (!strncmp( platform_names[i].name, platform, strlen(platform_names[i].name) ))
1373 {
1374 opts->target_platform = platform_names[i].platform;
1375 break;
1376 }
1377 }
1378
1379 free( spec );
1380 opts->target = xstrdup( target );
1381 }
1382
1383 int main(int argc, char **argv)
1384 {
1385 int i, c, next_is_arg = 0, linking = 1;
1386 int raw_compiler_arg, raw_linker_arg;
1387 const char* option_arg;
1388 struct options opts;
1389 char* lang = 0;
1390 char* str;
1391
1392 #ifdef SIGHUP
1393 signal( SIGHUP, exit_on_signal );
1394 #endif
1395 signal( SIGTERM, exit_on_signal );
1396 signal( SIGINT, exit_on_signal );
1397 #ifdef HAVE_SIGADDSET
1398 sigemptyset( &signal_mask );
1399 sigaddset( &signal_mask, SIGHUP );
1400 sigaddset( &signal_mask, SIGTERM );
1401 sigaddset( &signal_mask, SIGINT );
1402 #endif
1403
1404 /* setup tmp file removal at exit */
1405 tmp_files = strarray_alloc();
1406 atexit(clean_temp_files);
1407
1408 /* initialize options */
1409 memset(&opts, 0, sizeof(opts));
1410 opts.target_cpu = build_cpu;
1411 opts.target_platform = build_platform;
1412 opts.lib_dirs = strarray_alloc();
1413 opts.files = strarray_alloc();
1414 opts.linker_args = strarray_alloc();
1415 opts.compiler_args = strarray_alloc();
1416 opts.winebuild_args = strarray_alloc();
1417
1418 /* determine the processor type */
1419 if (strendswith(argv[0], "winecpp")) opts.processor = proc_cpp;
1420 else if (strendswith(argv[0], "++")) opts.processor = proc_cxx;
1421
1422 /* parse options */
1423 for ( i = 1 ; i < argc ; i++ )
1424 {
1425 if (argv[i][0] == '-') /* option */
1426 {
1427 /* determine if this switch is followed by a separate argument */
1428 next_is_arg = 0;
1429 option_arg = 0;
1430 switch(argv[i][1])
1431 {
1432 case 'x': case 'o': case 'D': case 'U':
1433 case 'I': case 'A': case 'l': case 'u':
1434 case 'b': case 'V': case 'G': case 'L':
1435 case 'B': case 'R': case 'z':
1436 if (argv[i][2]) option_arg = &argv[i][2];
1437 else next_is_arg = 1;
1438 break;
1439 case 'i':
1440 next_is_arg = 1;
1441 break;
1442 case 'a':
1443 if (strcmp("-aux-info", argv[i]) == 0)
1444 next_is_arg = 1;
1445 if (strcmp("-arch", argv[i]) == 0)
1446 next_is_arg = 1;
1447 break;
1448 case 'X':
1449 if (strcmp("-Xlinker", argv[i]) == 0)
1450 next_is_arg = 1;
1451 break;
1452 case 'M':
1453 c = argv[i][2];
1454 if (c == 'F' || c == 'T' || c == 'Q')
1455 {
1456 if (argv[i][3]) option_arg = &argv[i][3];
1457 else next_is_arg = 1;
1458 }
1459 break;
1460 case 'f':
1461 if (strcmp("-framework", argv[i]) == 0)
1462 next_is_arg = 1;
1463 break;
1464 case '-':
1465 if (strcmp("--param", argv[i]) == 0)
1466 next_is_arg = 1;
1467 break;
1468 }
1469 if (next_is_arg)
1470 {
1471 if (i + 1 >= argc) error("option -%c requires an argument\n", argv[i][1]);
1472 option_arg = argv[i+1];
1473 }
1474
1475 /* determine what options go 'as is' to the linker & the compiler */
1476 raw_compiler_arg = raw_linker_arg = 0;
1477 if (is_linker_arg(argv[i]))
1478 {
1479 raw_linker_arg = 1;
1480 }
1481 else
1482 {
1483 if (is_directory_arg(argv[i]) || is_target_arg(argv[i]))
1484 raw_linker_arg = 1;
1485 raw_compiler_arg = !is_mingw_arg(argv[i]);
1486 }
1487
1488 /* these things we handle explicitly so we don't pass them 'as is' */
1489 if (argv[i][1] == 'l' || argv[i][1] == 'I' || argv[i][1] == 'L')
1490 raw_linker_arg = 0;
1491 if (argv[i][1] == 'c' || argv[i][1] == 'L')
1492 raw_compiler_arg = 0;
1493 if (argv[i][1] == 'o' || argv[i][1] == 'b' || argv[i][1] == 'V')
1494 raw_compiler_arg = raw_linker_arg = 0;
1495
1496 /* do a bit of semantic analysis */
1497 switch (argv[i][1])
1498 {
1499 case 'B':
1500 str = strdup(option_arg);
1501 if (strendswith(str, "/")) str[strlen(str) - 1] = 0;
1502 if (strendswith(str, "/tools/winebuild"))
1503 {
1504 char *objdir = strdup(str);
1505 objdir[strlen(objdir) - sizeof("/tools/winebuild") + 1] = 0;
1506 opts.wine_objdir = objdir;
1507 /* don't pass it to the compiler, this generates warnings */
1508 raw_compiler_arg = raw_linker_arg = 0;
1509 }
1510 else if (!strcmp(str, "tools/winebuild"))
1511 {
1512 opts.wine_objdir = ".";
1513 raw_compiler_arg = raw_linker_arg = 0;
1514 }
1515 if (!opts.prefix) opts.prefix = strarray_alloc();
1516 strarray_add(opts.prefix, str);
1517 break;
1518 case 'b':
1519 parse_target_option( &opts, option_arg );
1520 break;
1521 case 'V':
1522 opts.version = xstrdup( option_arg );
1523 break;
1524 case 'c': /* compile or assemble */
1525 if (argv[i][2] == 0) opts.compile_only = 1;
1526 /* fall through */
1527 case 'S': /* generate assembler code */
1528 case 'E': /* preprocess only */
1529 if (argv[i][2] == 0) linking = 0;
1530 break;
1531 case 'f':
1532 if (strcmp("-fno-short-wchar", argv[i]) == 0)
1533 opts.noshortwchar = 1;
1534 else if (!strcmp("-fasynchronous-unwind-tables", argv[i]))
1535 opts.unwind_tables = 1;
1536 else if (!strcmp("-fno-asynchronous-unwind-tables", argv[i]))
1537 opts.unwind_tables = 0;
1538 break;
1539 case 'l':
1540 strarray_add(opts.files, strmake("-l%s", option_arg));
1541 break;
1542 case 'L':
1543 strarray_add(opts.lib_dirs, option_arg);
1544 break;
1545 case 'M': /* map file generation */
1546 linking = 0;
1547 break;
1548 case 'm':
1549 if (strcmp("-mno-cygwin", argv[i]) == 0)
1550 opts.use_msvcrt = 1;
1551 else if (strcmp("-mwindows", argv[i]) == 0)
1552 opts.gui_app = 1;
1553 else if (strcmp("-mconsole", argv[i]) == 0)
1554 opts.gui_app = 0;
1555 else if (strcmp("-municode", argv[i]) == 0)
1556 opts.unicode_app = 1;
1557 else if (strcmp("-m16", argv[i]) == 0)
1558 opts.win16_app = 1;
1559 else if (strcmp("-m32", argv[i]) == 0)
1560 {
1561 if (opts.target_cpu == CPU_x86_64)
1562 opts.target_cpu = CPU_x86;
1563 else if (opts.target_cpu == CPU_ARM64)
1564 opts.target_cpu = CPU_ARM;
1565 opts.force_pointer_size = 4;
1566 raw_linker_arg = 1;
1567 }
1568 else if (strcmp("-m64", argv[i]) == 0)
1569 {
1570 if (opts.target_cpu == CPU_x86)
1571 opts.target_cpu = CPU_x86_64;
1572 else if (opts.target_cpu == CPU_ARM)
1573 opts.target_cpu = CPU_ARM64;
1574 opts.force_pointer_size = 8;
1575 raw_linker_arg = 1;
1576 }
1577 else if (!strcmp("-marm", argv[i] ) || !strcmp("-mthumb", argv[i] ))
1578 {
1579 strarray_add(opts.winebuild_args, argv[i]);
1580 raw_linker_arg = 1;
1581 }
1582 else if (!strncmp("-mcpu=", argv[i], 6) ||
1583 !strncmp("-march=", argv[i], 7) ||
1584 !strncmp("-mfloat-abi=", argv[i], 12))
1585 strarray_add(opts.winebuild_args, argv[i]);
1586 break;
1587 case 'n':
1588 if (strcmp("-nostdinc", argv[i]) == 0)
1589 opts.nostdinc = 1;
1590 else if (strcmp("-nodefaultlibs", argv[i]) == 0)
1591 opts.nodefaultlibs = 1;
1592 else if (strcmp("-nostdlib", argv[i]) == 0)
1593 opts.nostdlib = 1;
1594 else if (strcmp("-nostartfiles", argv[i]) == 0)
1595 opts.nostartfiles = 1;
1596 break;
1597 case 'o':
1598 opts.output_name = option_arg;
1599 break;
1600 case 's':
1601 if (strcmp("-static", argv[i]) == 0)
1602 linking = -1;
1603 else if(strcmp("-save-temps", argv[i]) == 0)
1604 keep_generated = 1;
1605 else if(strcmp("-shared", argv[i]) == 0)
1606 {
1607 opts.shared = 1;
1608 raw_compiler_arg = raw_linker_arg = 0;
1609 }
1610 else if (strcmp("-s", argv[i]) == 0 && opts.target_platform == PLATFORM_APPLE)
1611 {
1612 /* On Mac, change -s into -Wl,-x. ld's -s switch
1613 * is deprecated, and it doesn't work on Tiger with
1614 * MH_BUNDLEs anyway
1615 */
1616 opts.strip = 1;
1617 raw_linker_arg = 0;
1618 }
1619 break;
1620 case 'v':
1621 if (argv[i][2] == 0) verbose++;
1622 break;
1623 case 'W':
1624 if (strncmp("-Wl,", argv[i], 4) == 0)
1625 {
1626 unsigned int j;
1627 strarray* Wl = strarray_fromstring(argv[i] + 4, ",");
1628 for (j = 0; j < Wl->size; j++)
1629 {
1630 if (!strcmp(Wl->base[j], "--image-base") && j < Wl->size - 1)
1631 {
1632 opts.image_base = strdup( Wl->base[++j] );
1633 continue;
1634 }
1635 if (!strcmp(Wl->base[j], "--section-alignment") && j < Wl->size - 1)
1636 {
1637 opts.section_align = strdup( Wl->base[++j] );
1638 continue;
1639 }
1640 if (!strcmp(Wl->base[j], "--large-address-aware"))
1641 {
1642 opts.large_address_aware = 1;
1643 continue;
1644 }
1645 if (!strcmp(Wl->base[j], "--subsystem") && j < Wl->size - 1)
1646 {
1647 opts.subsystem = strdup( Wl->base[++j] );
1648 continue;
1649 }
1650 if (!strcmp(Wl->base[j], "-static")) linking = -1;
1651 strarray_add(opts.linker_args, strmake("-Wl,%s",Wl->base[j]));
1652 }
1653 strarray_free(Wl);
1654 raw_compiler_arg = raw_linker_arg = 0;
1655 }
1656 else if (strncmp("-Wb,", argv[i], 4) == 0)
1657 {
1658 strarray* Wb = strarray_fromstring(argv[i] + 4, ",");
1659 strarray_addall(opts.winebuild_args, Wb);
1660 strarray_free(Wb);
1661 /* don't pass it to the compiler, it generates errors */
1662 raw_compiler_arg = raw_linker_arg = 0;
1663 }
1664 break;
1665 case 'x':
1666 lang = strmake("-x%s", option_arg);
1667 strarray_add(opts.files, lang);
1668 /* we'll pass these flags ourselves, explicitly */
1669 raw_compiler_arg = raw_linker_arg = 0;
1670 break;
1671 case '-':
1672 if (strcmp("-static", argv[i]+1) == 0)
1673 linking = -1;
1674 else if (!strncmp("--sysroot", argv[i], 9) && opts.wine_objdir)
1675 {
1676 if (argv[i][9] == '=') opts.wine_objdir = argv[i] + 10;
1677 else opts.wine_objdir = argv[++i];
1678 raw_compiler_arg = raw_linker_arg = 0;
1679 }
1680 else if (!strncmp("--lib-suffix", argv[i], 12) && opts.wine_objdir)
1681 {
1682 if (argv[i][12] == '=') opts.lib_suffix = argv[i] + 13;
1683 else opts.lib_suffix = argv[++i];
1684 raw_compiler_arg = raw_linker_arg = 0;
1685 }
1686 break;
1687 }
1688
1689 /* put the arg into the appropriate bucket */
1690 if (raw_linker_arg)
1691 {
1692 strarray_add(opts.linker_args, argv[i]);
1693 if (next_is_arg && (i + 1 < argc))
1694 strarray_add(opts.linker_args, argv[i + 1]);
1695 }
1696 if (raw_compiler_arg)
1697 {
1698 strarray_add(opts.compiler_args, argv[i]);
1699 if (next_is_arg && (i + 1 < argc))
1700 strarray_add(opts.compiler_args, argv[i + 1]);
1701 }
1702
1703 /* skip the next token if it's an argument */
1704 if (next_is_arg) i++;
1705 }
1706 else
1707 {
1708 strarray_add(opts.files, argv[i]);
1709 }
1710 }
1711
1712 if (opts.processor == proc_cpp) linking = 0;
1713 if (linking == -1) error("Static linking is not supported\n");
1714
1715 if (opts.files->size == 0) forward(argc, argv, &opts);
1716 else if (linking) build(&opts);
1717 else compile(&opts, lang);
1718
1719 return 0;
1720 }
Windows API implementation