1 /* d-spec.c -- Specific flags and argument handling of the D front end.
2 Copyright (C) 2006-2019 Free Software Foundation, Inc.
4 GCC is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 3, or (at your option)
9 GCC is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with GCC; see the file COPYING3. If not see
16 <http://www.gnu.org/licenses/>. */
20 #include "coretypes.h"
21 #include "opt-suggestions.h"
26 /* This bit is set if the arguments is a D source file. */
27 #define DSOURCE (1<<1)
28 /* This bit is set if they did `-lstdc++'. */
29 #define WITHLIBCXX (1<<2)
30 /* Skip this option. */
31 #define SKIPOPT (1<<3)
34 #define LIBSTDCXX "stdc++"
36 #ifndef LIBSTDCXX_PROFILE
37 #define LIBSTDCXX_PROFILE LIBSTDCXX
41 #define LIBPHOBOS "gphobos"
43 #ifndef LIBPHOBOS_PROFILE
44 #define LIBPHOBOS_PROFILE LIBPHOBOS
48 #define LIBDRUNTIME "gdruntime"
50 #ifndef LIBDRUNTIME_PROFILE
51 #define LIBDRUNTIME_PROFILE LIBDRUNTIME
54 /* What do with libgphobos. */
57 /* libgphobos should not be linked in. */
59 /* libgphobos should be linked in if it is needed. */
61 /* libgphobos is needed and should be linked in. */
63 /* libgphobos is needed and should be linked statically. */
65 /* libgphobos is needed and should be linked dynamically. */
69 static phobos_action phobos_library
= PHOBOS_DEFAULT
;
71 /* If true, use the standard D runtime library when linking with
72 standard libraries. */
73 static bool need_phobos
= true;
75 /* If true, do load libgphobos.spec even if not needed otherwise. */
76 static bool need_spec
= false;
79 lang_specific_driver (cl_decoded_option
**in_decoded_options
,
80 unsigned int *in_decoded_options_count
,
81 int *in_added_libraries
)
85 /* If nonzero, the user gave us the `-p' or `-pg' flag. */
86 int saw_profile_flag
= 0;
88 /* If true, the user gave `-g'. Used by -debuglib. */
89 bool saw_debug_flag
= false;
91 /* The new argument list will be contained in this. */
92 cl_decoded_option
*new_decoded_options
;
94 /* "-lstdc++" if it appears on the command line. */
95 const cl_decoded_option
*saw_libcxx
= 0;
97 /* Whether we need the C++ STD library. */
98 bool need_stdcxx
= false;
100 /* True if we saw -static. */
101 bool static_link
= false;
103 /* True if we should add -shared-libgcc to the command-line. */
104 bool shared_libgcc
= true;
106 /* What default library to use instead of phobos. */
107 const char *defaultlib
= NULL
;
109 /* What debug library to use instead of phobos. */
110 const char *debuglib
= NULL
;
112 /* The total number of arguments with the new stuff. */
113 unsigned int num_args
= 1;
115 /* "-fonly" if it appears on the command line. */
116 const char *only_source_option
= 0;
118 /* Whether the -o option was used. */
119 bool saw_opt_o
= false;
121 /* Whether the -c option was used. Also used for -E, -fsyntax-only,
122 in general anything which implies only compilation and not linking. */
123 bool saw_opt_c
= false;
125 /* Whether the -S option was used. */
126 bool saw_opt_S
= false;
128 /* The first input file with an extension of .d. */
129 const char *first_d_file
= NULL
;
131 /* The total number of arguments with the new stuff. */
132 unsigned int argc
= *in_decoded_options_count
;
134 /* The argument list. */
135 cl_decoded_option
*decoded_options
= *in_decoded_options
;
137 /* The number of libraries added in. */
138 int added_libraries
= *in_added_libraries
;
140 /* An array used to flag each argument that needs a bit set for
141 DSOURCE, MATHLIB, WITHTHREAD, WITHLIBC or WITHLIBCXX. */
142 int *args
= XCNEWVEC (int, argc
);
144 for (i
= 1; i
< argc
; i
++)
146 const char *arg
= decoded_options
[i
].arg
;
147 const int value
= decoded_options
[i
].value
;
149 switch (decoded_options
[i
].opt_index
)
151 case OPT_dstartfiles
:
156 case OPT_nodefaultlibs
:
157 phobos_library
= PHOBOS_NOLINK
;
160 case OPT_nophoboslib
:
170 case OPT_defaultlib_
:
171 if (defaultlib
!= NULL
)
172 free (CONST_CAST (char *, defaultlib
));
177 defaultlib
= XNEWVEC (char, strlen (arg
));
178 strcpy (CONST_CAST (char *, defaultlib
), arg
);
183 if (debuglib
!= NULL
)
184 free (CONST_CAST (char *, debuglib
));
189 debuglib
= XNEWVEC (char, strlen (arg
));
190 strcpy (CONST_CAST (char *, debuglib
), arg
);
195 if ((strcmp (arg
, LIBSTDCXX
) == 0)
196 || (strcmp (arg
, LIBSTDCXX_PROFILE
) == 0))
198 args
[i
] |= WITHLIBCXX
;
201 /* Unrecognized libraries (e.g. -ltango) may require libphobos. */
202 else if (phobos_library
== PHOBOS_DEFAULT
)
203 phobos_library
= PHOBOS_LINK
;
212 saw_debug_flag
= true;
216 /* If they only gave us `-v', don't try to link in libphobos. */
218 phobos_library
= PHOBOS_NOLINK
;
222 if (phobos_library
== PHOBOS_DEFAULT
&& (strcmp (arg
, "d") == 0))
223 phobos_library
= PHOBOS_LINK
;
228 /* Arguments that go directly to the linker might be .o files
229 or something, and so might cause libphobos to be needed. */
230 if (phobos_library
== PHOBOS_DEFAULT
)
231 phobos_library
= PHOBOS_LINK
;
238 case OPT_fsyntax_only
:
239 /* Don't specify libaries if we won't link, since that would
242 phobos_library
= PHOBOS_NOLINK
;
247 phobos_library
= PHOBOS_NOLINK
;
258 case OPT_static_libgcc
:
259 shared_libgcc
= false;
262 case OPT_static_libphobos
:
263 if (phobos_library
!= PHOBOS_NOLINK
)
264 phobos_library
= PHOBOS_STATIC
;
268 case OPT_shared_libphobos
:
269 if (phobos_library
!= PHOBOS_NOLINK
)
270 phobos_library
= PHOBOS_DYNAMIC
;
276 only_source_option
= decoded_options
[i
].orig_option_with_args_text
;
280 const char *suffix
= strrchr (only_source_option
, '.');
281 if (suffix
== NULL
|| strcmp (suffix
, ".d") != 0)
282 only_source_option
= concat (only_source_option
, ".d", NULL
);
286 case OPT_SPECIAL_input_file
:
288 if (arg
[0] == '\0' || arg
[1] == '\0')
291 if (phobos_library
== PHOBOS_DEFAULT
)
292 phobos_library
= PHOBOS_LINK
;
294 /* Record that this is a D source file. */
295 const char *suffix
= strrchr (arg
, '.');
296 if (suffix
!= NULL
&& strcmp (suffix
, ".d") == 0)
298 if (first_d_file
== NULL
)
304 /* If this is a C++ source file, we'll need to link
305 against libstdc++ library. */
307 && (strcmp (suffix
, ".cc") == 0
308 || (strcmp (suffix
, ".cpp") == 0)
309 || (strcmp (suffix
, ".c++") == 0)))
317 /* There's no point adding -shared-libgcc if we don't have a shared
319 #ifndef ENABLE_SHARED_LIBGCC
320 shared_libgcc
= false;
323 /* Make sure to have room for the trailing NULL argument.
324 - needstdcxx might add `-lstdcxx'
325 - libphobos adds `-Bstatic -lphobos -ldruntime -Bdynamic'
326 - only_source adds 1 more arg, also maybe add `-o'. */
327 num_args
= argc
+ need_stdcxx
+ shared_libgcc
+ need_phobos
* 4 + 2;
328 new_decoded_options
= XNEWVEC (cl_decoded_option
, num_args
);
333 /* Copy the 0th argument, i.e., the name of the program itself. */
334 new_decoded_options
[j
++] = decoded_options
[i
++];
336 /* NOTE: We start at 1 now, not 0. */
339 if (args
[i
] & SKIPOPT
)
345 new_decoded_options
[j
] = decoded_options
[i
];
347 if (!saw_libcxx
&& (args
[i
] & WITHLIBCXX
))
350 saw_libcxx
= &decoded_options
[i
];
353 if (args
[i
] & DSOURCE
)
355 if (only_source_option
)
363 if (only_source_option
)
365 const char *only_source_arg
= only_source_option
+ 7;
366 generate_option (OPT_fonly_
, only_source_arg
, 1, CL_DRIVER
,
367 &new_decoded_options
[j
]);
370 generate_option_input_file (only_source_arg
,
371 &new_decoded_options
[j
++]);
374 /* If no reason to link against libphobos library, then don't add it. */
375 if (phobos_library
== PHOBOS_DEFAULT
)
376 phobos_library
= PHOBOS_NOLINK
;
378 /* If we didn't see a -o option, add one. This is because we need the
379 driver to pass all .d files to the D compiler. Without a -o option
380 the driver will invoke the compiler separately for each input file. */
381 if (first_d_file
!= NULL
&& !saw_opt_o
)
383 if (saw_opt_c
|| saw_opt_S
)
385 const char *base
= lbasename (first_d_file
);
386 int baselen
= strlen (base
) - 2;
387 char *out
= XNEWVEC (char, baselen
+ 3);
389 memcpy (out
, base
, baselen
);
390 /* The driver will convert .o to some other suffix if appropriate. */
393 out
[baselen
+ 1] = 's';
395 out
[baselen
+ 1] = 'o';
396 out
[baselen
+ 2] = '\0';
397 generate_option (OPT_o
, out
, 1, CL_DRIVER
,
398 &new_decoded_options
[j
]);
402 /* Wouldn't be necessary if the driver converted .out also. */
403 const char *out
= NULL
;
405 #ifdef TARGET_EXECUTABLE_SUFFIX
406 if (TARGET_EXECUTABLE_SUFFIX
[0] != 0)
407 out
= "a" TARGET_EXECUTABLE_SUFFIX
;
412 generate_option (OPT_o
, out
, 1, CL_DRIVER
,
413 &new_decoded_options
[j
]);
418 /* Add `-lgphobos' if we haven't already done so. */
419 if (phobos_library
!= PHOBOS_NOLINK
&& need_phobos
)
421 /* Default to static linking. */
422 if (phobos_library
!= PHOBOS_DYNAMIC
)
423 phobos_library
= PHOBOS_STATIC
;
425 #ifdef HAVE_LD_STATIC_DYNAMIC
426 if (phobos_library
== PHOBOS_DYNAMIC
&& static_link
)
428 generate_option (OPT_Wl_
, LD_DYNAMIC_OPTION
, 1, CL_DRIVER
,
429 &new_decoded_options
[j
]);
432 else if (phobos_library
== PHOBOS_STATIC
&& !static_link
)
434 generate_option (OPT_Wl_
, LD_STATIC_OPTION
, 1, CL_DRIVER
,
435 &new_decoded_options
[j
]);
440 generate_option (OPT_l
,
441 saw_profile_flag
? LIBPHOBOS_PROFILE
: LIBPHOBOS
, 1,
442 CL_DRIVER
, &new_decoded_options
[j
]);
445 generate_option (OPT_l
,
446 saw_profile_flag
? LIBDRUNTIME_PROFILE
: LIBDRUNTIME
, 1,
447 CL_DRIVER
, &new_decoded_options
[j
]);
451 #ifdef HAVE_LD_STATIC_DYNAMIC
452 if (phobos_library
== PHOBOS_DYNAMIC
&& static_link
)
454 generate_option (OPT_Wl_
, LD_STATIC_OPTION
, 1, CL_DRIVER
,
455 &new_decoded_options
[j
]);
458 else if (phobos_library
== PHOBOS_STATIC
&& !static_link
)
460 generate_option (OPT_Wl_
, LD_DYNAMIC_OPTION
, 1, CL_DRIVER
,
461 &new_decoded_options
[j
]);
466 else if (saw_debug_flag
&& debuglib
)
468 generate_option (OPT_l
, debuglib
, 1, CL_DRIVER
,
469 &new_decoded_options
[j
++]);
474 generate_option (OPT_l
, defaultlib
, 1, CL_DRIVER
,
475 &new_decoded_options
[j
++]);
480 new_decoded_options
[j
++] = *saw_libcxx
;
481 else if (need_stdcxx
)
483 generate_option (OPT_l
,
487 1, CL_DRIVER
, &new_decoded_options
[j
++]);
491 if (shared_libgcc
&& !static_link
)
493 generate_option (OPT_shared_libgcc
, NULL
, 1, CL_DRIVER
,
494 &new_decoded_options
[j
++]);
497 *in_decoded_options_count
= j
;
498 *in_decoded_options
= new_decoded_options
;
499 *in_added_libraries
= added_libraries
;
502 /* Called before linking. Returns 0 on success and -1 on failure. */
505 lang_specific_pre_link (void)
507 if ((phobos_library
!= PHOBOS_NOLINK
&& need_phobos
) || need_spec
)
508 do_spec ("%:include(libgphobos.spec)");
513 /* Number of extra output files that lang_specific_pre_link may generate. */
515 int lang_specific_extra_outfiles
= 0; /* Not used for D. */