1 /* dllwrap.c -- wrapper for DLLTOOL and GCC to generate PE style DLLs
2 Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
3 Contributed by Mumit Khan (khan@xraylith.wisc.edu).
5 This file is part of GNU Binutils.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
22 /* AIX requires this to be the first thing in the file. */
34 #include "libiberty.h"
37 #include "dyn-string.h"
43 #ifdef HAVE_SYS_WAIT_H
45 #else /* ! HAVE_SYS_WAIT_H */
46 #if ! defined (_WIN32) || defined (__CYGWIN32__)
48 #define WIFEXITED(w) (((w)&0377) == 0)
51 #define WIFSIGNALED(w) (((w)&0377) != 0177 && ((w)&~0377) == 0)
54 #define WTERMSIG(w) ((w) & 0177)
57 #define WEXITSTATUS(w) (((w) >> 8) & 0377)
59 #else /* defined (_WIN32) && ! defined (__CYGWIN32__) */
61 #define WIFEXITED(w) (((w) & 0xff) == 0)
64 #define WIFSIGNALED(w) (((w) & 0xff) != 0 && ((w) & 0xff) != 0x7f)
67 #define WTERMSIG(w) ((w) & 0x7f)
70 #define WEXITSTATUS(w) (((w) & 0xff00) >> 8)
72 #endif /* defined (_WIN32) && ! defined (__CYGWIN32__) */
73 #endif /* ! HAVE_SYS_WAIT_H */
75 static char *driver_name
= NULL
;
76 static char *cygwin_driver_flags
=
77 "-Wl,--dll -nostartfiles";
78 static char *mingw32_driver_flags
= "-mdll";
79 static char *generic_driver_flags
= "-Wl,--dll";
81 static char *entry_point
;
83 static char *dlltool_name
= NULL
;
85 static char *target
= TARGET
;
94 static target_type which_target
= UNKNOWN_TARGET
;
96 static int dontdeltemps
= 0;
97 static int dry_run
= 0;
99 static char *prog_name
;
101 static int verbose
= 0;
103 static char *dll_file_name
;
104 static char *dll_name
;
105 static char *base_file_name
;
106 static char *exp_file_name
;
107 static char *def_file_name
;
108 static int delete_base_file
= 1;
109 static int delete_exp_file
= 1;
110 static int delete_def_file
= 1;
112 static int run (const char *, char *);
113 static char *mybasename (const char *);
114 static int strhash (const char *);
115 static void usage (FILE *, int);
116 static void display (const char *, va_list) ATTRIBUTE_PRINTF(1,0);
117 static void inform (const char *, ...) ATTRIBUTE_PRINTF_1
;
118 static void warn (const char *, ...) ATTRIBUTE_PRINTF_1
;
119 static char *look_for_prog (const char *, const char *, int);
120 static char *deduce_name (const char *);
121 static void delete_temp_files (void);
122 static void cleanup_and_exit (int);
124 /**********************************************************************/
126 /* Please keep the following 4 routines in sync with dlltool.c:
131 It's not worth the hassle to break these out since dllwrap will
132 (hopefully) soon be retired in favor of `ld --shared. */
135 display (const char * message
, va_list args
)
137 if (prog_name
!= NULL
)
138 fprintf (stderr
, "%s: ", prog_name
);
140 vfprintf (stderr
, message
, args
);
141 fputc ('\n', stderr
);
146 inform
VPARAMS ((const char *message
, ...))
148 VA_OPEN (args
, message
);
149 VA_FIXEDARG (args
, const char *, message
);
154 display (message
, args
);
160 warn
VPARAMS ((const char *format
, ...))
162 VA_OPEN (args
, format
);
163 VA_FIXEDARG (args
, const char *, format
);
165 display (format
, args
);
170 /* Look for the program formed by concatenating PROG_NAME and the
171 string running from PREFIX to END_PREFIX. If the concatenated
172 string contains a '/', try appending EXECUTABLE_SUFFIX if it is
176 look_for_prog (const char *prog_name
, const char *prefix
, int end_prefix
)
181 cmd
= xmalloc (strlen (prefix
)
183 #ifdef HAVE_EXECUTABLE_SUFFIX
184 + strlen (EXECUTABLE_SUFFIX
)
187 strcpy (cmd
, prefix
);
189 sprintf (cmd
+ end_prefix
, "%s", prog_name
);
191 if (strchr (cmd
, '/') != NULL
)
195 found
= (stat (cmd
, &s
) == 0
196 #ifdef HAVE_EXECUTABLE_SUFFIX
197 || stat (strcat (cmd
, EXECUTABLE_SUFFIX
), &s
) == 0
203 /* xgettext:c-format */
204 inform (_("Tried file: %s"), cmd
);
210 /* xgettext:c-format */
211 inform (_("Using file: %s"), cmd
);
216 /* Deduce the name of the program we are want to invoke.
217 PROG_NAME is the basic name of the program we want to run,
218 eg "as" or "ld". The catch is that we might want actually
219 run "i386-pe-as" or "ppc-pe-ld".
221 If argv[0] contains the full path, then try to find the program
222 in the same place, with and then without a target-like prefix.
224 Given, argv[0] = /usr/local/bin/i586-cygwin32-dlltool,
225 deduce_name("as") uses the following search order:
227 /usr/local/bin/i586-cygwin32-as
231 If there's an EXECUTABLE_SUFFIX, it'll use that as well; for each
232 name, it'll try without and then with EXECUTABLE_SUFFIX.
234 Given, argv[0] = i586-cygwin32-dlltool, it will not even try "as"
235 as the fallback, but rather return i586-cygwin32-as.
237 Oh, and given, argv[0] = dlltool, it'll return "as".
239 Returns a dynamically allocated string. */
242 deduce_name (const char * name
)
251 for (cp
= prog_name
; *cp
!= '\0'; ++cp
)
257 #if defined(__DJGPP__) || defined (__CYGWIN__) || defined(__WIN32__)
258 *cp
== ':' || *cp
== '\\' ||
270 /* First, try looking for a prefixed NAME in the
271 PROG_NAME directory, with the same prefix as PROG_NAME. */
272 cmd
= look_for_prog (name
, prog_name
, dash
- prog_name
+ 1);
274 if (slash
!= NULL
&& cmd
== NULL
)
275 /* Next, try looking for a NAME in the same directory as
276 that of this program. */
277 cmd
= look_for_prog (name
, prog_name
, slash
- prog_name
+ 1);
280 /* Just return NAME as is. */
281 cmd
= xstrdup (name
);
287 delete_temp_files (void)
289 if (delete_base_file
&& base_file_name
)
294 warn (_("Keeping temporary base file %s"), base_file_name
);
296 warn (_("Deleting temporary base file %s"), base_file_name
);
300 unlink (base_file_name
);
301 free (base_file_name
);
305 if (delete_exp_file
&& exp_file_name
)
310 warn (_("Keeping temporary exp file %s"), exp_file_name
);
312 warn (_("Deleting temporary exp file %s"), exp_file_name
);
316 unlink (exp_file_name
);
317 free (exp_file_name
);
320 if (delete_def_file
&& def_file_name
)
325 warn (_("Keeping temporary def file %s"), def_file_name
);
327 warn (_("Deleting temporary def file %s"), def_file_name
);
331 unlink (def_file_name
);
332 free (def_file_name
);
338 cleanup_and_exit (int status
)
340 delete_temp_files ();
345 run (const char *what
, char *args
)
348 int pid
, wait_status
, retcode
;
351 char *errmsg_fmt
, *errmsg_arg
;
352 char *temp_base
= choose_temp_base ();
356 if (verbose
|| dry_run
)
357 fprintf (stderr
, "%s %s\n", what
, args
);
361 for (s
= args
; *s
; s
++)
365 argv
= alloca (sizeof (char *) * (i
+ 3));
371 while (*s
== ' ' && *s
!= 0)
375 in_quote
= (*s
== '\'' || *s
== '"');
376 sep
= (in_quote
) ? *s
++ : ' ';
378 while (*s
!= sep
&& *s
!= 0)
391 pid
= pexecute (argv
[0], (char * const *) argv
, prog_name
, temp_base
,
392 &errmsg_fmt
, &errmsg_arg
, PEXECUTE_ONE
| PEXECUTE_SEARCH
);
396 int errno_val
= errno
;
398 fprintf (stderr
, "%s: ", prog_name
);
399 fprintf (stderr
, errmsg_fmt
, errmsg_arg
);
400 fprintf (stderr
, ": %s\n", strerror (errno_val
));
405 pid
= pwait (pid
, &wait_status
, 0);
408 warn ("wait: %s", strerror (errno
));
411 else if (WIFSIGNALED (wait_status
))
413 warn (_("subprocess got fatal signal %d"), WTERMSIG (wait_status
));
416 else if (WIFEXITED (wait_status
))
418 if (WEXITSTATUS (wait_status
) != 0)
420 warn (_("%s exited with status %d"), what
, WEXITSTATUS (wait_status
));
431 mybasename (const char *name
)
433 const char *base
= name
;
437 if (*name
== '/' || *name
== '\\')
443 return (char *) base
;
447 strhash (const char *str
)
449 const unsigned char *s
;
456 s
= (const unsigned char *) str
;
457 while ((c
= *s
++) != '\0')
459 hash
+= c
+ (c
<< 17);
463 hash
+= len
+ (len
<< 17);
469 /**********************************************************************/
472 usage (FILE *file
, int status
)
474 fprintf (file
, _("Usage %s <option(s)> <object-file(s)>\n"), prog_name
);
475 fprintf (file
, _(" Generic options:\n"));
476 fprintf (file
, _(" --quiet, -q Work quietly\n"));
477 fprintf (file
, _(" --verbose, -v Verbose\n"));
478 fprintf (file
, _(" --version Print dllwrap version\n"));
479 fprintf (file
, _(" --implib <outname> Synonym for --output-lib\n"));
480 fprintf (file
, _(" Options for %s:\n"), prog_name
);
481 fprintf (file
, _(" --driver-name <driver> Defaults to \"gcc\"\n"));
482 fprintf (file
, _(" --driver-flags <flags> Override default ld flags\n"));
483 fprintf (file
, _(" --dlltool-name <dlltool> Defaults to \"dlltool\"\n"));
484 fprintf (file
, _(" --entry <entry> Specify alternate DLL entry point\n"));
485 fprintf (file
, _(" --image-base <base> Specify image base address\n"));
486 fprintf (file
, _(" --target <machine> i386-cygwin32 or i386-mingw32\n"));
487 fprintf (file
, _(" --dry-run Show what needs to be run\n"));
488 fprintf (file
, _(" --mno-cygwin Create Mingw DLL\n"));
489 fprintf (file
, _(" Options passed to DLLTOOL:\n"));
490 fprintf (file
, _(" --machine <machine>\n"));
491 fprintf (file
, _(" --output-exp <outname> Generate export file.\n"));
492 fprintf (file
, _(" --output-lib <outname> Generate input library.\n"));
493 fprintf (file
, _(" --add-indirect Add dll indirects to export file.\n"));
494 fprintf (file
, _(" --dllname <name> Name of input dll to put into output lib.\n"));
495 fprintf (file
, _(" --def <deffile> Name input .def file\n"));
496 fprintf (file
, _(" --output-def <deffile> Name output .def file\n"));
497 fprintf (file
, _(" --export-all-symbols Export all symbols to .def\n"));
498 fprintf (file
, _(" --no-export-all-symbols Only export .drectve symbols\n"));
499 fprintf (file
, _(" --exclude-symbols <list> Exclude <list> from .def\n"));
500 fprintf (file
, _(" --no-default-excludes Zap default exclude symbols\n"));
501 fprintf (file
, _(" --base-file <basefile> Read linker generated base file\n"));
502 fprintf (file
, _(" --no-idata4 Don't generate idata$4 section\n"));
503 fprintf (file
, _(" --no-idata5 Don't generate idata$5 section\n"));
504 fprintf (file
, _(" -U Add underscores to .lib\n"));
505 fprintf (file
, _(" -k Kill @<n> from exported names\n"));
506 fprintf (file
, _(" --add-stdcall-alias Add aliases without @<n>\n"));
507 fprintf (file
, _(" --as <name> Use <name> for assembler\n"));
508 fprintf (file
, _(" --nodelete Keep temp files.\n"));
509 fprintf (file
, _(" Rest are passed unmodified to the language driver\n"));
510 fprintf (file
, "\n\n");
514 #define OPTION_START 149
516 /* GENERIC options. */
517 #define OPTION_QUIET (OPTION_START + 1)
518 #define OPTION_VERBOSE (OPTION_QUIET + 1)
519 #define OPTION_VERSION (OPTION_VERBOSE + 1)
521 /* DLLWRAP options. */
522 #define OPTION_DRY_RUN (OPTION_VERSION + 1)
523 #define OPTION_DRIVER_NAME (OPTION_DRY_RUN + 1)
524 #define OPTION_DRIVER_FLAGS (OPTION_DRIVER_NAME + 1)
525 #define OPTION_DLLTOOL_NAME (OPTION_DRIVER_FLAGS + 1)
526 #define OPTION_ENTRY (OPTION_DLLTOOL_NAME + 1)
527 #define OPTION_IMAGE_BASE (OPTION_ENTRY + 1)
528 #define OPTION_TARGET (OPTION_IMAGE_BASE + 1)
529 #define OPTION_MNO_CYGWIN (OPTION_TARGET + 1)
531 /* DLLTOOL options. */
532 #define OPTION_NODELETE (OPTION_MNO_CYGWIN + 1)
533 #define OPTION_DLLNAME (OPTION_NODELETE + 1)
534 #define OPTION_NO_IDATA4 (OPTION_DLLNAME + 1)
535 #define OPTION_NO_IDATA5 (OPTION_NO_IDATA4 + 1)
536 #define OPTION_OUTPUT_EXP (OPTION_NO_IDATA5 + 1)
537 #define OPTION_OUTPUT_DEF (OPTION_OUTPUT_EXP + 1)
538 #define OPTION_EXPORT_ALL_SYMS (OPTION_OUTPUT_DEF + 1)
539 #define OPTION_NO_EXPORT_ALL_SYMS (OPTION_EXPORT_ALL_SYMS + 1)
540 #define OPTION_EXCLUDE_SYMS (OPTION_NO_EXPORT_ALL_SYMS + 1)
541 #define OPTION_NO_DEFAULT_EXCLUDES (OPTION_EXCLUDE_SYMS + 1)
542 #define OPTION_OUTPUT_LIB (OPTION_NO_DEFAULT_EXCLUDES + 1)
543 #define OPTION_DEF (OPTION_OUTPUT_LIB + 1)
544 #define OPTION_ADD_UNDERSCORE (OPTION_DEF + 1)
545 #define OPTION_KILLAT (OPTION_ADD_UNDERSCORE + 1)
546 #define OPTION_HELP (OPTION_KILLAT + 1)
547 #define OPTION_MACHINE (OPTION_HELP + 1)
548 #define OPTION_ADD_INDIRECT (OPTION_MACHINE + 1)
549 #define OPTION_BASE_FILE (OPTION_ADD_INDIRECT + 1)
550 #define OPTION_AS (OPTION_BASE_FILE + 1)
552 static const struct option long_options
[] =
554 /* generic options. */
555 {"quiet", no_argument
, NULL
, 'q'},
556 {"verbose", no_argument
, NULL
, 'v'},
557 {"version", no_argument
, NULL
, OPTION_VERSION
},
558 {"implib", required_argument
, NULL
, OPTION_OUTPUT_LIB
},
560 /* dllwrap options. */
561 {"dry-run", no_argument
, NULL
, OPTION_DRY_RUN
},
562 {"driver-name", required_argument
, NULL
, OPTION_DRIVER_NAME
},
563 {"driver-flags", required_argument
, NULL
, OPTION_DRIVER_FLAGS
},
564 {"dlltool-name", required_argument
, NULL
, OPTION_DLLTOOL_NAME
},
565 {"entry", required_argument
, NULL
, 'e'},
566 {"image-base", required_argument
, NULL
, OPTION_IMAGE_BASE
},
567 {"target", required_argument
, NULL
, OPTION_TARGET
},
569 /* dlltool options. */
570 {"no-delete", no_argument
, NULL
, 'n'},
571 {"dllname", required_argument
, NULL
, OPTION_DLLNAME
},
572 {"no-idata4", no_argument
, NULL
, OPTION_NO_IDATA4
},
573 {"no-idata5", no_argument
, NULL
, OPTION_NO_IDATA5
},
574 {"output-exp", required_argument
, NULL
, OPTION_OUTPUT_EXP
},
575 {"output-def", required_argument
, NULL
, OPTION_OUTPUT_DEF
},
576 {"export-all-symbols", no_argument
, NULL
, OPTION_EXPORT_ALL_SYMS
},
577 {"no-export-all-symbols", no_argument
, NULL
, OPTION_NO_EXPORT_ALL_SYMS
},
578 {"exclude-symbols", required_argument
, NULL
, OPTION_EXCLUDE_SYMS
},
579 {"no-default-excludes", no_argument
, NULL
, OPTION_NO_DEFAULT_EXCLUDES
},
580 {"output-lib", required_argument
, NULL
, OPTION_OUTPUT_LIB
},
581 {"def", required_argument
, NULL
, OPTION_DEF
},
582 {"add-underscore", no_argument
, NULL
, 'U'},
583 {"killat", no_argument
, NULL
, 'k'},
584 {"add-stdcall-alias", no_argument
, NULL
, 'A'},
585 {"help", no_argument
, NULL
, 'h'},
586 {"machine", required_argument
, NULL
, OPTION_MACHINE
},
587 {"add-indirect", no_argument
, NULL
, OPTION_ADD_INDIRECT
},
588 {"base-file", required_argument
, NULL
, OPTION_BASE_FILE
},
589 {"as", required_argument
, NULL
, OPTION_AS
},
593 int main (int, char **);
596 main (int argc
, char **argv
)
601 char **saved_argv
= 0;
606 int *dlltool_arg_indices
;
607 int *driver_arg_indices
;
609 char *driver_flags
= 0;
610 char *output_lib_file_name
= 0;
612 dyn_string_t dlltool_cmdline
;
613 dyn_string_t driver_cmdline
;
615 int def_file_seen
= 0;
617 char *image_base_str
= 0;
621 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
622 setlocale (LC_MESSAGES
, "");
624 #if defined (HAVE_SETLOCALE)
625 setlocale (LC_CTYPE
, "");
627 bindtextdomain (PACKAGE
, LOCALEDIR
);
628 textdomain (PACKAGE
);
630 saved_argv
= (char **) xmalloc (argc
* sizeof (char*));
631 dlltool_arg_indices
= (int *) xmalloc (argc
* sizeof (int));
632 driver_arg_indices
= (int *) xmalloc (argc
* sizeof (int));
633 for (i
= 0; i
< argc
; ++i
)
635 size_t len
= strlen (argv
[i
]);
636 char *arg
= (char *) xmalloc (len
+ 1);
637 strcpy (arg
, argv
[i
]);
640 dlltool_arg_indices
[i
] = 0;
641 driver_arg_indices
[i
] = 1;
645 /* We recognize dllwrap and dlltool options, and everything else is
646 passed onto the language driver (eg., to GCC). We collect options
647 to dlltool and driver in dlltool_args and driver_args. */
650 while ((c
= getopt_long_only (argc
, argv
, "nkAqve:Uho:l:L:I:",
651 long_options
, (int *) 0)) != EOF
)
655 int single_word_option_value_pair
;
659 single_word_option_value_pair
= 0;
663 /* We recognize this option, so it has to be either dllwrap or
664 dlltool option. Do not pass to driver unless it's one of the
665 generic options that are passed to all the tools (such as -v)
666 which are dealt with later. */
670 /* deal with generic and dllwrap options first. */
683 print_version (prog_name
);
686 entry_point
= optarg
;
688 case OPTION_IMAGE_BASE
:
689 image_base_str
= optarg
;
692 def_file_name
= optarg
;
701 dll_file_name
= optarg
;
714 case OPTION_DRIVER_NAME
:
715 driver_name
= optarg
;
717 case OPTION_DRIVER_FLAGS
:
718 driver_flags
= optarg
;
720 case OPTION_DLLTOOL_NAME
:
721 dlltool_name
= optarg
;
726 case OPTION_MNO_CYGWIN
:
727 target
= "i386-mingw32";
729 case OPTION_BASE_FILE
:
730 base_file_name
= optarg
;
731 delete_base_file
= 0;
733 case OPTION_OUTPUT_EXP
:
734 exp_file_name
= optarg
;
737 case OPTION_EXPORT_ALL_SYMS
:
740 case OPTION_OUTPUT_LIB
:
741 output_lib_file_name
= optarg
;
750 /* Handle passing through --option=value case. */
752 && saved_argv
[optind
-1][0] == '-'
753 && saved_argv
[optind
-1][1] == '-'
754 && strchr (saved_argv
[optind
-1], '='))
755 single_word_option_value_pair
= 1;
759 dlltool_arg_indices
[optind
-1] = 1;
760 if (optarg
&& ! single_word_option_value_pair
)
762 dlltool_arg_indices
[optind
-2] = 1;
768 driver_arg_indices
[optind
-1] = 0;
769 if (optarg
&& ! single_word_option_value_pair
)
771 driver_arg_indices
[optind
-2] = 0;
777 if (! dll_name
&& ! dll_file_name
)
779 warn (_("Must provide at least one of -o or --dllname options"));
784 dll_name
= xstrdup (mybasename (dll_file_name
));
786 else if (! dll_file_name
)
788 dll_file_name
= xstrdup (dll_name
);
791 /* Deduce driver-name and dlltool-name from our own. */
792 if (driver_name
== NULL
)
793 driver_name
= deduce_name ("gcc");
795 if (dlltool_name
== NULL
)
796 dlltool_name
= deduce_name ("dlltool");
800 char *fileprefix
= choose_temp_base ();
802 def_file_name
= (char *) xmalloc (strlen (fileprefix
) + 5);
803 sprintf (def_file_name
, "%s.def",
804 (dontdeltemps
) ? mybasename (fileprefix
) : fileprefix
);
808 warn (_("no export definition file provided.\n\
809 Creating one, but that may not be what you want"));
812 /* Set the target platform. */
813 if (strstr (target
, "cygwin"))
814 which_target
= CYGWIN_TARGET
;
815 else if (strstr (target
, "mingw"))
816 which_target
= MINGW_TARGET
;
818 which_target
= UNKNOWN_TARGET
;
820 /* Re-create the command lines as a string, taking care to quote stuff. */
821 dlltool_cmdline
= dyn_string_new (cmdline_len
);
823 dyn_string_append_cstr (dlltool_cmdline
, " -v");
825 dyn_string_append_cstr (dlltool_cmdline
, " --dllname ");
826 dyn_string_append_cstr (dlltool_cmdline
, dll_name
);
828 for (i
= 1; i
< argc
; ++i
)
830 if (dlltool_arg_indices
[i
])
832 char *arg
= saved_argv
[i
];
833 int quote
= (strchr (arg
, ' ') || strchr (arg
, '\t'));
834 dyn_string_append_cstr (dlltool_cmdline
,
835 (quote
) ? " \"" : " ");
836 dyn_string_append_cstr (dlltool_cmdline
, arg
);
837 dyn_string_append_cstr (dlltool_cmdline
,
838 (quote
) ? "\"" : "");
842 driver_cmdline
= dyn_string_new (cmdline_len
);
843 if (! driver_flags
|| strlen (driver_flags
) == 0)
845 switch (which_target
)
848 driver_flags
= cygwin_driver_flags
;
852 driver_flags
= mingw32_driver_flags
;
856 driver_flags
= generic_driver_flags
;
860 dyn_string_append_cstr (driver_cmdline
, driver_flags
);
861 dyn_string_append_cstr (driver_cmdline
, " -o ");
862 dyn_string_append_cstr (driver_cmdline
, dll_file_name
);
864 if (! entry_point
|| strlen (entry_point
) == 0)
866 switch (which_target
)
869 entry_point
= "__cygwin_dll_entry@12";
873 entry_point
= "_DllMainCRTStartup@12";
877 entry_point
= "_DllMain@12";
881 dyn_string_append_cstr (driver_cmdline
, " -Wl,-e,");
882 dyn_string_append_cstr (driver_cmdline
, entry_point
);
883 dyn_string_append_cstr (dlltool_cmdline
, " --exclude-symbol=");
884 dyn_string_append_cstr (dlltool_cmdline
,
885 (entry_point
[0] == '_') ? entry_point
+1 : entry_point
);
887 if (! image_base_str
|| strlen (image_base_str
) == 0)
889 char *tmpbuf
= (char *) xmalloc (sizeof ("0x12345678") + 1);
890 unsigned long hash
= strhash (dll_file_name
);
891 sprintf (tmpbuf
, "0x%.8lX", 0x60000000|((hash
<<16)&0xFFC0000));
892 image_base_str
= tmpbuf
;
895 dyn_string_append_cstr (driver_cmdline
, " -Wl,--image-base,");
896 dyn_string_append_cstr (driver_cmdline
, image_base_str
);
900 dyn_string_append_cstr (driver_cmdline
, " -v");
903 for (i
= 1; i
< argc
; ++i
)
905 if (driver_arg_indices
[i
])
907 char *arg
= saved_argv
[i
];
908 int quote
= (strchr (arg
, ' ') || strchr (arg
, '\t'));
909 dyn_string_append_cstr (driver_cmdline
,
910 (quote
) ? " \"" : " ");
911 dyn_string_append_cstr (driver_cmdline
, arg
);
912 dyn_string_append_cstr (driver_cmdline
,
913 (quote
) ? "\"" : "");
917 /* Step pre-1. If no --def <EXPORT_DEF> is specified,
918 then create it and then pass it on. */
923 dyn_string_t step_pre1
;
925 step_pre1
= dyn_string_new (1024);
927 dyn_string_append_cstr (step_pre1
, dlltool_cmdline
->s
);
930 dyn_string_append_cstr (step_pre1
, " --export-all --exclude-symbol=");
931 dyn_string_append_cstr (step_pre1
,
932 "_cygwin_dll_entry@12,DllMainCRTStartup@12,DllMain@12,DllEntryPoint@12");
934 dyn_string_append_cstr (step_pre1
, " --output-def ");
935 dyn_string_append_cstr (step_pre1
, def_file_name
);
937 for (i
= 1; i
< argc
; ++i
)
939 if (driver_arg_indices
[i
])
941 char *arg
= saved_argv
[i
];
942 size_t len
= strlen (arg
);
943 if (len
>= 2 && arg
[len
-2] == '.'
944 && (arg
[len
-1] == 'o' || arg
[len
-1] == 'a'))
946 int quote
= (strchr (arg
, ' ') || strchr (arg
, '\t'));
947 dyn_string_append_cstr (step_pre1
,
948 (quote
) ? " \"" : " ");
949 dyn_string_append_cstr (step_pre1
, arg
);
950 dyn_string_append_cstr (step_pre1
,
951 (quote
) ? "\"" : "");
956 if (run (dlltool_name
, step_pre1
->s
))
957 cleanup_and_exit (1);
959 dyn_string_delete (step_pre1
);
962 dyn_string_append_cstr (dlltool_cmdline
, " --def ");
963 dyn_string_append_cstr (dlltool_cmdline
, def_file_name
);
967 fprintf (stderr
, _("DLLTOOL name : %s\n"), dlltool_name
);
968 fprintf (stderr
, _("DLLTOOL options : %s\n"), dlltool_cmdline
->s
);
969 fprintf (stderr
, _("DRIVER name : %s\n"), driver_name
);
970 fprintf (stderr
, _("DRIVER options : %s\n"), driver_cmdline
->s
);
973 /* Step 1. Call GCC/LD to create base relocation file. If using GCC, the
974 driver command line will look like the following:
976 % gcc -Wl,--dll --Wl,--base-file,foo.base [rest of command line]
978 If the user does not specify a base name, create temporary one that
979 is deleted at exit. */
981 if (! base_file_name
)
983 char *fileprefix
= choose_temp_base ();
984 base_file_name
= (char *) xmalloc (strlen (fileprefix
) + 6);
985 sprintf (base_file_name
, "%s.base",
986 (dontdeltemps
) ? mybasename (fileprefix
) : fileprefix
);
987 delete_base_file
= 1;
994 dyn_string_t step1
= dyn_string_new (driver_cmdline
->length
995 + strlen (base_file_name
)
997 dyn_string_append_cstr (step1
, "-Wl,--base-file,");
998 quote
= (strchr (base_file_name
, ' ')
999 || strchr (base_file_name
, '\t'));
1000 dyn_string_append_cstr (step1
,
1001 (quote
) ? "\"" : "");
1002 dyn_string_append_cstr (step1
, base_file_name
);
1003 dyn_string_append_cstr (step1
,
1004 (quote
) ? "\"" : "");
1005 if (driver_cmdline
->length
)
1007 dyn_string_append_cstr (step1
, " ");
1008 dyn_string_append_cstr (step1
, driver_cmdline
->s
);
1011 if (run (driver_name
, step1
->s
))
1012 cleanup_and_exit (1);
1014 dyn_string_delete (step1
);
1017 /* Step 2. generate the exp file by running dlltool.
1018 dlltool command line will look like the following:
1020 % dlltool -Wl,--dll --Wl,--base-file,foo.base [rest of command line]
1022 If the user does not specify a base name, create temporary one that
1023 is deleted at exit. */
1025 if (! exp_file_name
)
1027 char *p
= strrchr (dll_name
, '.');
1028 size_t prefix_len
= (p
) ? (size_t) (p
- dll_name
) : strlen (dll_name
);
1030 exp_file_name
= (char *) xmalloc (prefix_len
+ 4 + 1);
1031 strncpy (exp_file_name
, dll_name
, prefix_len
);
1032 exp_file_name
[prefix_len
] = '\0';
1033 strcat (exp_file_name
, ".exp");
1034 delete_exp_file
= 1;
1040 dyn_string_t step2
= dyn_string_new (dlltool_cmdline
->length
1041 + strlen (base_file_name
)
1042 + strlen (exp_file_name
)
1045 dyn_string_append_cstr (step2
, "--base-file ");
1046 quote
= (strchr (base_file_name
, ' ')
1047 || strchr (base_file_name
, '\t'));
1048 dyn_string_append_cstr (step2
,
1049 (quote
) ? "\"" : "");
1050 dyn_string_append_cstr (step2
, base_file_name
);
1051 dyn_string_append_cstr (step2
,
1052 (quote
) ? "\" " : " ");
1054 dyn_string_append_cstr (step2
, "--output-exp ");
1055 quote
= (strchr (exp_file_name
, ' ')
1056 || strchr (exp_file_name
, '\t'));
1057 dyn_string_append_cstr (step2
,
1058 (quote
) ? "\"" : "");
1059 dyn_string_append_cstr (step2
, exp_file_name
);
1060 dyn_string_append_cstr (step2
,
1061 (quote
) ? "\"" : "");
1063 if (dlltool_cmdline
->length
)
1065 dyn_string_append_cstr (step2
, " ");
1066 dyn_string_append_cstr (step2
, dlltool_cmdline
->s
);
1069 if (run (dlltool_name
, step2
->s
))
1070 cleanup_and_exit (1);
1072 dyn_string_delete (step2
);
1076 * Step 3. Call GCC/LD to again, adding the exp file this time.
1077 * driver command line will look like the following:
1079 * % gcc -Wl,--dll --Wl,--base-file,foo.base foo.exp [rest ...]
1085 dyn_string_t step3
= dyn_string_new (driver_cmdline
->length
1086 + strlen (exp_file_name
)
1087 + strlen (base_file_name
)
1089 dyn_string_append_cstr (step3
, "-Wl,--base-file,");
1090 quote
= (strchr (base_file_name
, ' ')
1091 || strchr (base_file_name
, '\t'));
1092 dyn_string_append_cstr (step3
,
1093 (quote
) ? "\"" : "");
1094 dyn_string_append_cstr (step3
, base_file_name
);
1095 dyn_string_append_cstr (step3
,
1096 (quote
) ? "\" " : " ");
1098 quote
= (strchr (exp_file_name
, ' ')
1099 || strchr (exp_file_name
, '\t'));
1100 dyn_string_append_cstr (step3
,
1101 (quote
) ? "\"" : "");
1102 dyn_string_append_cstr (step3
, exp_file_name
);
1103 dyn_string_append_cstr (step3
,
1104 (quote
) ? "\"" : "");
1106 if (driver_cmdline
->length
)
1108 dyn_string_append_cstr (step3
, " ");
1109 dyn_string_append_cstr (step3
, driver_cmdline
->s
);
1112 if (run (driver_name
, step3
->s
))
1113 cleanup_and_exit (1);
1115 dyn_string_delete (step3
);
1120 * Step 4. Run DLLTOOL again using the same command line.
1125 dyn_string_t step4
= dyn_string_new (dlltool_cmdline
->length
1126 + strlen (base_file_name
)
1127 + strlen (exp_file_name
)
1130 dyn_string_append_cstr (step4
, "--base-file ");
1131 quote
= (strchr (base_file_name
, ' ')
1132 || strchr (base_file_name
, '\t'));
1133 dyn_string_append_cstr (step4
,
1134 (quote
) ? "\"" : "");
1135 dyn_string_append_cstr (step4
, base_file_name
);
1136 dyn_string_append_cstr (step4
,
1137 (quote
) ? "\" " : " ");
1139 dyn_string_append_cstr (step4
, "--output-exp ");
1140 quote
= (strchr (exp_file_name
, ' ')
1141 || strchr (exp_file_name
, '\t'));
1142 dyn_string_append_cstr (step4
,
1143 (quote
) ? "\"" : "");
1144 dyn_string_append_cstr (step4
, exp_file_name
);
1145 dyn_string_append_cstr (step4
,
1146 (quote
) ? "\"" : "");
1148 if (dlltool_cmdline
->length
)
1150 dyn_string_append_cstr (step4
, " ");
1151 dyn_string_append_cstr (step4
, dlltool_cmdline
->s
);
1154 if (output_lib_file_name
)
1156 dyn_string_append_cstr (step4
, " --output-lib ");
1157 dyn_string_append_cstr (step4
, output_lib_file_name
);
1160 if (run (dlltool_name
, step4
->s
))
1161 cleanup_and_exit (1);
1163 dyn_string_delete (step4
);
1168 * Step 5. Link it all together and be done with it.
1169 * driver command line will look like the following:
1171 * % gcc -Wl,--dll foo.exp [rest ...]
1178 dyn_string_t step5
= dyn_string_new (driver_cmdline
->length
1179 + strlen (exp_file_name
)
1181 quote
= (strchr (exp_file_name
, ' ')
1182 || strchr (exp_file_name
, '\t'));
1183 dyn_string_append_cstr (step5
,
1184 (quote
) ? "\"" : "");
1185 dyn_string_append_cstr (step5
, exp_file_name
);
1186 dyn_string_append_cstr (step5
,
1187 (quote
) ? "\"" : "");
1189 if (driver_cmdline
->length
)
1191 dyn_string_append_cstr (step5
, " ");
1192 dyn_string_append_cstr (step5
, driver_cmdline
->s
);
1195 if (run (driver_name
, step5
->s
))
1196 cleanup_and_exit (1);
1198 dyn_string_delete (step5
);
1201 cleanup_and_exit (0);