- Create KD branch. All debugging support is removed in this branch (no symbols,...
[reactos.git] / reactos / tools / winebuild / main.c
1 /*
2 * Main function
3 *
4 * Copyright 1993 Robert J. Amstadt
5 * Copyright 1995 Martin von Loewis
6 * Copyright 1995, 1996, 1997 Alexandre Julliard
7 * Copyright 1997 Eric Youngdale
8 * Copyright 1999 Ulrich Weigand
9 *
10 * This library is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU Lesser General Public
12 * License as published by the Free Software Foundation; either
13 * version 2.1 of the License, or (at your option) any later version.
14 *
15 * This library is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * Lesser General Public License for more details.
19 *
20 * You should have received a copy of the GNU Lesser General Public
21 * License along with this library; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 */
24
25 #include "config.h"
26
27 #include <assert.h>
28 #include <stdio.h>
29 #ifdef WIN32
30 #include <io.h> /* unlink() */
31 #endif//WIN32
32 #include <signal.h>
33 #include <errno.h>
34 #include <string.h>
35 #include <stdarg.h>
36 #include <ctype.h>
37 #ifdef HAVE_GETOPT_H
38 # include <getopt.h>
39 #endif
40
41 #include "winglue.h"
42 #include "build.h"
43
44 int UsePIC = 0;
45 int nb_lib_paths = 0;
46 int nb_errors = 0;
47 int display_warnings = 0;
48 int kill_at = 0;
49 int verbose = 0;
50 int save_temps = 0;
51
52 #if defined(__i386__) || defined(__x86_64__)
53 enum target_cpu target_cpu = CPU_x86;
54 #elif defined(__x86_64__)
55 enum target_cpu target_cpu = CPU_x86_64;
56 #elif defined(__sparc__)
57 enum target_cpu target_cpu = CPU_SPARC;
58 #elif defined(__ALPHA__)
59 enum target_cpu target_cpu = CPU_ALPHA;
60 #elif defined(__powerpc__)
61 enum target_cpu target_cpu = CPU_POWERPC;
62 #else
63 #error Unsupported CPU
64 #endif
65
66 #ifdef __APPLE__
67 enum target_platform target_platform = PLATFORM_APPLE;
68 #elif defined(__svr4__)
69 enum target_platform target_platform = PLATFORM_SVR4;
70 #elif defined(_WINDOWS)
71 enum target_platform target_platform = PLATFORM_WINDOWS;
72 #else
73 enum target_platform target_platform = PLATFORM_UNSPECIFIED;
74 #endif
75
76 char **lib_path = NULL;
77
78 char *input_file_name = NULL;
79 char *spec_file_name = NULL;
80 const char *output_file_name = NULL;
81 static const char *output_file_source_name;
82
83 char *as_command = NULL;
84 char *ld_command = NULL;
85 char *nm_command = NULL;
86
87 static FILE *output_file;
88 static int nb_res_files;
89 static char **res_files;
90
91 /* execution mode */
92 enum exec_mode_values
93 {
94 MODE_NONE,
95 MODE_DLL,
96 MODE_EXE,
97 MODE_DEF,
98 MODE_RELAY16,
99 MODE_RELAY32,
100 MODE_PEDLL
101 };
102
103 static enum exec_mode_values exec_mode = MODE_NONE;
104
105 static const struct
106 {
107 const char *name;
108 enum target_cpu cpu;
109 } cpu_names[] =
110 {
111 { "i386", CPU_x86 },
112 { "i486", CPU_x86 },
113 { "i586", CPU_x86 },
114 { "i686", CPU_x86 },
115 { "i786", CPU_x86 },
116 { "x86_64", CPU_x86_64 },
117 { "sparc", CPU_SPARC },
118 { "alpha", CPU_ALPHA },
119 { "powerpc", CPU_POWERPC }
120 };
121
122 static const struct
123 {
124 const char *name;
125 enum target_platform platform;
126 } platform_names[] =
127 {
128 { "macos", PLATFORM_APPLE },
129 { "darwin", PLATFORM_APPLE },
130 { "sunos", PLATFORM_SVR4 },
131 { "windows", PLATFORM_WINDOWS },
132 { "winnt", PLATFORM_WINDOWS }
133 };
134
135 /* set the dll file name from the input file name */
136 static void set_dll_file_name( const char *name, DLLSPEC *spec )
137 {
138 char *p;
139
140 if (spec->file_name) return;
141
142 if ((p = strrchr( name, '\\' ))) name = p + 1;
143 if ((p = strrchr( name, '/' ))) name = p + 1;
144 spec->file_name = xmalloc( strlen(name) + 5 );
145 strcpy( spec->file_name, name );
146 if ((p = strrchr( spec->file_name, '.' )))
147 {
148 if (!strcmp( p, ".spec" ) || !strcmp( p, ".def" )) *p = 0;
149 }
150 }
151
152 /* set the dll subsystem */
153 static void set_subsystem( const char *subsystem, DLLSPEC *spec )
154 {
155 char *major, *minor, *str = xstrdup( subsystem );
156
157 if ((major = strchr( str, ':' ))) *major++ = 0;
158 if (!strcmp( str, "native" )) spec->subsystem = IMAGE_SUBSYSTEM_NATIVE;
159 else if (!strcmp( str, "windows" )) spec->subsystem = IMAGE_SUBSYSTEM_WINDOWS_GUI;
160 else if (!strcmp( str, "console" )) spec->subsystem = IMAGE_SUBSYSTEM_WINDOWS_CUI;
161 else fatal_error( "Invalid subsystem name '%s'\n", subsystem );
162 if (major)
163 {
164 if ((minor = strchr( major, '.' )))
165 {
166 *minor++ = 0;
167 spec->subsystem_minor = atoi( minor );
168 }
169 spec->subsystem_major = atoi( major );
170 }
171 free( str );
172 }
173
174 /* set the target CPU and platform */
175 static void set_target( const char *target )
176 {
177 unsigned int i;
178 char *p, *platform, *spec = xstrdup( target );
179
180 /* target specification is in the form CPU-MANUFACTURER-OS or CPU-MANUFACTURER-KERNEL-OS */
181
182 /* get the CPU part */
183
184 if (!(p = strchr( spec, '-' ))) fatal_error( "Invalid target specification '%s'\n", target );
185 *p++ = 0;
186 for (i = 0; i < sizeof(cpu_names)/sizeof(cpu_names[0]); i++)
187 {
188 if (!strcmp( cpu_names[i].name, spec )) break;
189 }
190 if (i < sizeof(cpu_names)/sizeof(cpu_names[0])) target_cpu = cpu_names[i].cpu;
191 else fatal_error( "Unrecognized CPU '%s'\n", spec );
192
193 platform = p;
194 if ((p = strrchr( p, '-' ))) platform = p + 1;
195
196 /* get the OS part */
197
198 target_platform = PLATFORM_UNSPECIFIED; /* default value */
199 for (i = 0; i < sizeof(platform_names)/sizeof(platform_names[0]); i++)
200 {
201 if (!strncmp( platform_names[i].name, platform, strlen(platform_names[i].name) ))
202 {
203 target_platform = platform_names[i].platform;
204 break;
205 }
206 }
207
208 free( spec );
209
210 if (!as_command)
211 {
212 as_command = xmalloc( strlen(target) + sizeof("-as") );
213 strcpy( as_command, target );
214 strcat( as_command, "-as" );
215 }
216 if (!ld_command)
217 {
218 ld_command = xmalloc( strlen(target) + sizeof("-ld") );
219 strcpy( ld_command, target );
220 strcat( ld_command, "-ld" );
221 }
222 if (!nm_command)
223 {
224 nm_command = xmalloc( strlen(target) + sizeof("-nm") );
225 strcpy( nm_command, target );
226 strcat( nm_command, "-nm" );
227 }
228 }
229
230 /* cleanup on program exit */
231 static void cleanup(void)
232 {
233 if (output_file_name) unlink( output_file_name );
234 }
235
236 /* clean things up when aborting on a signal */
237 static void exit_on_signal( int sig )
238 {
239 exit(1); /* this will call atexit functions */
240 }
241
242 /*******************************************************************
243 * command-line option handling
244 */
245 static const char usage_str[] =
246 "Usage: winebuild [OPTIONS] [FILES]\n\n"
247 "Options:\n"
248 " --as-cmd=AS Command to use for assembling (default: as)\n"
249 " -d, --delay-lib=LIB Import the specified library in delayed mode\n"
250 " -D SYM Ignored for C flags compatibility\n"
251 " -E, --export=FILE Export the symbols defined in the .spec or .def file\n"
252 " -e, --entry=FUNC Set the DLL entry point function (default: DllMain)\n"
253 " -f FLAGS Compiler flags (only -fPIC is supported)\n"
254 " -F, --filename=DLLFILE Set the DLL filename (default: from input file name)\n"
255 " -h, --help Display this help message\n"
256 " -H, --heap=SIZE Set the heap size for a Win16 dll\n"
257 " -i, --ignore=SYM[,SYM] Ignore specified symbols when resolving imports\n"
258 " -I DIR Ignored for C flags compatibility\n"
259 " -k, --kill-at Kill stdcall decorations in generated .def files\n"
260 " -K, FLAGS Compiler flags (only -KPIC is supported)\n"
261 " --ld-cmd=LD Command to use for linking (default: ld)\n"
262 " -l, --library=LIB Import the specified library\n"
263 " -L, --library-path=DIR Look for imports libraries in DIR\n"
264 " -M, --main-module=MODULE Set the name of the main module for a Win16 dll\n"
265 " --nm-cmd=NM Command to use to get undefined symbols (default: nm)\n"
266 " -N, --dll-name=DLLNAME Set the DLL name (default: from input file name)\n"
267 " -o, --output=NAME Set the output file name (default: stdout)\n"
268 " -r, --res=RSRC.RES Load resources from RSRC.RES\n"
269 " --save-temps Do not delete the generated intermediate files\n"
270 " --subsystem=SUBSYS Set the subsystem (one of native, windows, console)\n"
271 " --target=TARGET Specify target CPU and platform for cross-compiling\n"
272 " -u, --undefined=SYMBOL Add an undefined reference to SYMBOL when linking\n"
273 " -v, --verbose Display the programs invoked\n"
274 " --version Print the version and exit\n"
275 " -w, --warnings Turn on warnings\n"
276 "\nMode options:\n"
277 " --dll Build a .c file from a .spec or .def file\n"
278 " --def Build a .def file from a .spec file\n"
279 " --exe Build a .c file for an executable\n"
280 " --relay16 Build the 16-bit relay assembly routines\n"
281 " --relay32 Build the 32-bit relay assembly routines\n"
282 " --pedll Build a .c file for PE dll\n\n"
283 "The mode options are mutually exclusive; you must specify one and only one.\n\n";
284
285 enum long_options_values
286 {
287 LONG_OPT_DLL = 1,
288 LONG_OPT_DEF,
289 LONG_OPT_EXE,
290 LONG_OPT_ASCMD,
291 LONG_OPT_LDCMD,
292 LONG_OPT_NMCMD,
293 LONG_OPT_RELAY16,
294 LONG_OPT_RELAY32,
295 LONG_OPT_SAVE_TEMPS,
296 LONG_OPT_SUBSYSTEM,
297 LONG_OPT_VERSION,
298 LONG_OPT_TARGET,
299 LONG_OPT_PEDLL
300 };
301
302 static const char short_options[] = "C:D:E:F:H:I:K:L:M:N:d:e:f:hi:kl:m:o:r:u:vw";
303
304 static const struct option long_options[] =
305 {
306 { "dll", 0, 0, LONG_OPT_DLL },
307 { "def", 0, 0, LONG_OPT_DEF },
308 { "exe", 0, 0, LONG_OPT_EXE },
309 { "as-cmd", 1, 0, LONG_OPT_ASCMD },
310 { "ld-cmd", 1, 0, LONG_OPT_LDCMD },
311 { "nm-cmd", 1, 0, LONG_OPT_NMCMD },
312 { "relay16", 0, 0, LONG_OPT_RELAY16 },
313 { "relay32", 0, 0, LONG_OPT_RELAY32 },
314 { "save-temps",0, 0, LONG_OPT_SAVE_TEMPS },
315 { "subsystem",1, 0, LONG_OPT_SUBSYSTEM },
316 { "target", 1, 0, LONG_OPT_TARGET },
317 { "version", 0, 0, LONG_OPT_VERSION },
318 { "pedll", 1, 0, LONG_OPT_PEDLL },
319 /* aliases for short options */
320 { "delay-lib", 1, 0, 'd' },
321 { "export", 1, 0, 'E' },
322 { "entry", 1, 0, 'e' },
323 { "filename", 1, 0, 'F' },
324 { "help", 0, 0, 'h' },
325 { "heap", 1, 0, 'H' },
326 { "ignore", 1, 0, 'i' },
327 { "kill-at", 0, 0, 'k' },
328 { "library", 1, 0, 'l' },
329 { "library-path", 1, 0, 'L' },
330 { "main-module", 1, 0, 'M' },
331 { "dll-name", 1, 0, 'N' },
332 { "output", 1, 0, 'o' },
333 { "res", 1, 0, 'r' },
334 { "undefined", 1, 0, 'u' },
335 { "verbose", 0, 0, 'v' },
336 { "warnings", 0, 0, 'w' },
337 { NULL, 0, 0, 0 }
338 };
339
340 static void usage( int exit_code )
341 {
342 fprintf( stderr, "%s", usage_str );
343 exit( exit_code );
344 }
345
346 static void set_exec_mode( enum exec_mode_values mode )
347 {
348 if (exec_mode != MODE_NONE) usage(1);
349 exec_mode = mode;
350 }
351
352 /* parse options from the argv array and remove all the recognized ones */
353 static char **parse_options( int argc, char **argv, DLLSPEC *spec )
354 {
355 char *p;
356 int optc;
357
358 while ((optc = getopt_long( argc, argv, short_options, long_options, NULL )) != -1)
359 {
360 switch(optc)
361 {
362 case 'D':
363 /* ignored */
364 break;
365 case 'E':
366 spec_file_name = xstrdup( optarg );
367 set_dll_file_name( optarg, spec );
368 break;
369 case 'F':
370 spec->file_name = xstrdup( optarg );
371 break;
372 case 'H':
373 if (!isdigit(optarg[0]))
374 fatal_error( "Expected number argument with -H option instead of '%s'\n", optarg );
375 spec->heap_size = atoi(optarg);
376 if (spec->heap_size > 65535)
377 fatal_error( "Invalid heap size %d, maximum is 65535\n", spec->heap_size );
378 break;
379 case 'I':
380 /* ignored */
381 break;
382 case 'K':
383 /* ignored, because cc generates correct code. */
384 break;
385 case 'L':
386 lib_path = xrealloc( lib_path, (nb_lib_paths+1) * sizeof(*lib_path) );
387 lib_path[nb_lib_paths++] = xstrdup( optarg );
388 break;
389 case 'M':
390 spec->type = SPEC_WIN16;
391 break;
392 case 'N':
393 spec->dll_name = xstrdup( optarg );
394 break;
395 case 'd':
396 add_delayed_import( optarg );
397 break;
398 case 'e':
399 spec->init_func = xstrdup( optarg );
400 if ((p = strchr( spec->init_func, '@' ))) *p = 0; /* kill stdcall decoration */
401 break;
402 case 'f':
403 if (!strcmp( optarg, "PIC") || !strcmp( optarg, "pic")) UsePIC = 1;
404 /* ignore all other flags */
405 break;
406 case 'h':
407 usage(0);
408 break;
409 case 'i':
410 {
411 char *str = xstrdup( optarg );
412 char *token = strtok( str, "," );
413 while (token)
414 {
415 add_ignore_symbol( token );
416 token = strtok( NULL, "," );
417 }
418 free( str );
419 }
420 break;
421 case 'k':
422 kill_at = 1;
423 break;
424 case 'l':
425 add_import_dll( optarg, NULL );
426 break;
427 case 'o':
428 {
429 char *ext = strrchr( optarg, '.' );
430
431 if (unlink( optarg ) == -1 && errno != ENOENT)
432 fatal_error( "Unable to create output file '%s'\n", optarg );
433 if (ext && !strcmp( ext, ".o" ))
434 {
435 output_file_source_name = get_temp_file_name( optarg, ".s" );
436 if (!(output_file = fopen( output_file_source_name, "w" )))
437 fatal_error( "Unable to create output file '%s'\n", optarg );
438 }
439 else
440 {
441 if (!(output_file = fopen( optarg, "w" )))
442 fatal_error( "Unable to create output file '%s'\n", optarg );
443 }
444 output_file_name = xstrdup(optarg);
445 atexit( cleanup ); /* make sure we remove the output file on exit */
446 }
447 break;
448 case 'r':
449 res_files = xrealloc( res_files, (nb_res_files+1) * sizeof(*res_files) );
450 res_files[nb_res_files++] = xstrdup( optarg );
451 break;
452 case 'u':
453 add_extra_ld_symbol( optarg );
454 break;
455 case 'v':
456 verbose++;
457 break;
458 case 'w':
459 display_warnings = 1;
460 break;
461 case LONG_OPT_DLL:
462 set_exec_mode( MODE_DLL );
463 break;
464 case LONG_OPT_DEF:
465 set_exec_mode( MODE_DEF );
466 break;
467 case LONG_OPT_EXE:
468 set_exec_mode( MODE_EXE );
469 if (!spec->subsystem) spec->subsystem = IMAGE_SUBSYSTEM_WINDOWS_GUI;
470 break;
471 case LONG_OPT_ASCMD:
472 as_command = xstrdup( optarg );
473 break;
474 case LONG_OPT_LDCMD:
475 ld_command = xstrdup( optarg );
476 break;
477 case LONG_OPT_NMCMD:
478 nm_command = xstrdup( optarg );
479 break;
480 case LONG_OPT_RELAY16:
481 set_exec_mode( MODE_RELAY16 );
482 break;
483 case LONG_OPT_RELAY32:
484 set_exec_mode( MODE_RELAY32 );
485 break;
486 case LONG_OPT_SAVE_TEMPS:
487 save_temps = 1;
488 break;
489 case LONG_OPT_SUBSYSTEM:
490 set_subsystem( optarg, spec );
491 break;
492 case LONG_OPT_TARGET:
493 set_target( optarg );
494 break;
495 case LONG_OPT_VERSION:
496 printf( "winebuild version " PACKAGE_VERSION "\n" );
497 exit(0);
498 case LONG_OPT_PEDLL:
499 set_exec_mode( MODE_PEDLL );
500 spec_file_name = xstrdup( optarg );
501 set_dll_file_name( optarg, spec );
502 break;
503 case '?':
504 usage(1);
505 break;
506 }
507 }
508
509 if (spec->file_name && !strchr( spec->file_name, '.' ))
510 strcat( spec->file_name, exec_mode == MODE_EXE ? ".exe" : ".dll" );
511
512 return &argv[optind];
513 }
514
515
516 /* load all specified resource files */
517 static void load_resources( char *argv[], DLLSPEC *spec )
518 {
519 int i;
520 char **ptr, **last;
521
522 switch (spec->type)
523 {
524 case SPEC_WIN16:
525 for (i = 0; i < nb_res_files; i++) load_res16_file( res_files[i], spec );
526 break;
527
528 case SPEC_WIN32:
529 for (i = 0; i < nb_res_files; i++)
530 {
531 if (!load_res32_file( res_files[i], spec ))
532 fatal_error( "%s is not a valid Win32 resource file\n", res_files[i] );
533 }
534
535 /* load any resource file found in the remaining arguments */
536 for (ptr = last = argv; *ptr; ptr++)
537 {
538 if (!load_res32_file( *ptr, spec ))
539 *last++ = *ptr; /* not a resource file, keep it in the list */
540 }
541 *last = NULL;
542 break;
543 }
544 }
545
546 /* add input files that look like import libs to the import list */
547 static void load_import_libs( char *argv[] )
548 {
549 char **ptr, **last;
550
551 for (ptr = last = argv; *ptr; ptr++)
552 {
553 if (strendswith( *ptr, ".def" ))
554 add_import_dll( NULL, *ptr );
555 else
556 *last++ = *ptr; /* not an import dll, keep it in the list */
557 }
558 *last = NULL;
559 }
560
561 static int parse_input_file( DLLSPEC *spec )
562 {
563 FILE *input_file = open_input_file( NULL, spec_file_name );
564 char *extension = strrchr( spec_file_name, '.' );
565 int result;
566
567 if (extension && !strcmp( extension, ".def" ))
568 result = parse_def_file( input_file, spec );
569 else
570 result = parse_spec_file( input_file, spec );
571 close_input_file( input_file );
572 return result;
573 }
574
575
576 /*******************************************************************
577 * main
578 */
579 int main(int argc, char **argv)
580 {
581 DLLSPEC *spec = alloc_dll_spec();
582
583 #ifdef SIGHUP
584 signal( SIGHUP, exit_on_signal );
585 #endif
586 signal( SIGTERM, exit_on_signal );
587 signal( SIGINT, exit_on_signal );
588
589 output_file = stdout;
590 argv = parse_options( argc, argv, spec );
591
592 switch(exec_mode)
593 {
594 case MODE_DLL:
595 spec->characteristics |= IMAGE_FILE_DLL;
596 load_resources( argv, spec );
597 load_import_libs( argv );
598 if (!spec_file_name) fatal_error( "missing .spec file\n" );
599 if (!parse_input_file( spec )) break;
600 switch (spec->type)
601 {
602 case SPEC_WIN16:
603 fatal_error( "Win16 specs are not supported in ReactOS version of winebuild\n" );
604 break;
605 case SPEC_WIN32:
606 read_undef_symbols( spec, argv );
607 BuildSpec32File( output_file, spec );
608 break;
609 default: assert(0);
610 }
611 break;
612 case MODE_EXE:
613 if (spec->type == SPEC_WIN16) fatal_error( "Cannot build 16-bit exe files\n" );
614 if (!spec->file_name) fatal_error( "executable must be named via the -F option\n" );
615 load_resources( argv, spec );
616 load_import_libs( argv );
617 if (spec_file_name && !parse_input_file( spec )) break;
618 read_undef_symbols( spec, argv );
619 BuildSpec32File( output_file, spec );
620 break;
621 case MODE_DEF:
622 if (argv[0]) fatal_error( "file argument '%s' not allowed in this mode\n", argv[0] );
623 if (spec->type == SPEC_WIN16) fatal_error( "Cannot yet build .def file for 16-bit dlls\n" );
624 if (!spec_file_name) fatal_error( "missing .spec file\n" );
625 if (!parse_input_file( spec )) break;
626 BuildDef32File( output_file, spec );
627 break;
628 case MODE_RELAY16:
629 fatal_error( "Win16 relays are not supported in ReactOS version of winebuild\n" );
630 break;
631 case MODE_RELAY32:
632 fatal_error( "Win32 relays are not supported in ReactOS version of winebuild\n" );
633 break;
634 case MODE_PEDLL:
635 if (argv[0]) fatal_error( "file argument '%s' not allowed in this mode\n", argv[0] );
636 if (!parse_input_file( spec )) break;
637 BuildPedllFile( output_file, spec );
638 break;
639 default:
640 usage(1);
641 break;
642 }
643 if (nb_errors) exit(1);
644 if (output_file_name)
645 {
646 fclose( output_file );
647 if (output_file_source_name) assemble_file( output_file_source_name, output_file_name );
648 output_file_name = NULL;
649 }
650 return 0;
651 }