1 /* d-spec.c -- Specific flags and argument handling of the D front end.
2 Copyright (C) 2006-2023 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
47 /* What do with libgphobos. */
50 /* libgphobos should not be linked in. */
52 /* libgphobos should be linked in if it is needed. */
54 /* libgphobos is needed and should be linked in. */
56 /* libgphobos is needed and should be linked statically. */
58 /* libgphobos is needed and should be linked dynamically. */
62 static phobos_action phobos_library
= PHOBOS_DEFAULT
;
64 /* If true, do load libgphobos.spec even if not needed otherwise. */
65 static bool need_spec
= false;
68 lang_specific_driver (cl_decoded_option
**in_decoded_options
,
69 unsigned int *in_decoded_options_count
,
70 int *in_added_libraries
)
74 /* If nonzero, the user gave us the `-p' or `-pg' flag. */
75 int saw_profile_flag
= 0;
77 /* If true, the user gave `-g'. Used by -debuglib. */
78 bool saw_debug_flag
= false;
80 /* The new argument list will be contained in this. */
81 cl_decoded_option
*new_decoded_options
;
83 /* "-lstdc++" if it appears on the command line. */
84 const cl_decoded_option
*saw_libcxx
= 0;
86 /* True if we saw `-static-libstdc++'. */
87 bool saw_static_libcxx
= false;
89 /* Whether we need the C++ STD library. */
90 bool need_stdcxx
= false;
92 /* True if we saw -static. */
93 bool static_link
= false;
95 /* True if we should add -shared-libgcc to the command-line. */
96 bool shared_libgcc
= true;
98 /* What default library to use instead of phobos. */
99 const char *defaultlib
= NULL
;
101 /* What debug library to use instead of phobos. */
102 const char *debuglib
= NULL
;
104 /* The total number of arguments with the new stuff. */
105 unsigned int num_args
= 1;
107 /* "-fonly" if it appears on the command line. */
108 const char *only_source_option
= 0;
110 /* Whether the -o option was used. */
111 bool saw_opt_o
= false;
113 /* Whether the -c option was used. Also used for -E, -fsyntax-only,
114 in general anything which implies only compilation and not linking. */
115 bool saw_opt_c
= false;
117 /* Whether the -S option was used. */
118 bool saw_opt_S
= false;
120 /* The first input file with an extension of .d. */
121 const char *first_d_file
= NULL
;
123 /* The total number of arguments with the new stuff. */
124 unsigned int argc
= *in_decoded_options_count
;
126 /* The argument list. */
127 cl_decoded_option
*decoded_options
= *in_decoded_options
;
129 /* The number of libraries added in. */
130 int added_libraries
= *in_added_libraries
;
132 /* An array used to flag each argument that needs a bit set for
133 DSOURCE, MATHLIB, WITHTHREAD, WITHLIBC or WITHLIBCXX. */
134 int *args
= XCNEWVEC (int, argc
);
136 for (i
= 1; i
< argc
; i
++)
138 const char *arg
= decoded_options
[i
].arg
;
139 const int value
= decoded_options
[i
].value
;
141 switch (decoded_options
[i
].opt_index
)
143 case OPT_dstartfiles
:
148 case OPT_nodefaultlibs
:
149 phobos_library
= PHOBOS_NOLINK
;
152 case OPT_nophoboslib
:
153 phobos_library
= PHOBOS_NOLINK
;
159 phobos_library
= PHOBOS_NOLINK
;
161 phobos_library
= PHOBOS_LINK
;
164 case OPT_defaultlib_
:
165 if (defaultlib
!= NULL
)
166 free (CONST_CAST (char *, defaultlib
));
170 defaultlib
= XNEWVEC (char, strlen (arg
));
171 strcpy (CONST_CAST (char *, defaultlib
), arg
);
176 if (debuglib
!= NULL
)
177 free (CONST_CAST (char *, debuglib
));
181 debuglib
= XNEWVEC (char, strlen (arg
));
182 strcpy (CONST_CAST (char *, debuglib
), arg
);
187 if ((strcmp (arg
, LIBSTDCXX
) == 0)
188 || (strcmp (arg
, LIBSTDCXX_PROFILE
) == 0))
190 args
[i
] |= WITHLIBCXX
;
193 /* Unrecognized libraries (e.g. -ltango) may require libphobos. */
194 else if (phobos_library
== PHOBOS_DEFAULT
)
195 phobos_library
= PHOBOS_LINK
;
204 saw_debug_flag
= true;
208 /* If they only gave us `-v', don't try to link in libphobos. */
210 phobos_library
= PHOBOS_NOLINK
;
214 if (phobos_library
== PHOBOS_DEFAULT
&& (strcmp (arg
, "d") == 0))
215 phobos_library
= PHOBOS_LINK
;
220 /* Arguments that go directly to the linker might be .o files
221 or something, and so might cause libphobos to be needed. */
222 if (phobos_library
== PHOBOS_DEFAULT
)
223 phobos_library
= PHOBOS_LINK
;
230 case OPT_fsyntax_only
:
231 /* Don't specify libaries if we won't link, since that would
234 phobos_library
= PHOBOS_NOLINK
;
239 phobos_library
= PHOBOS_NOLINK
;
250 case OPT_static_libgcc
:
251 shared_libgcc
= false;
254 case OPT_static_libstdc__
:
255 saw_static_libcxx
= true;
256 #ifdef HAVE_LD_STATIC_DYNAMIC
257 /* Remove -static-libstdc++ from the command only if target supports
258 LD_STATIC_DYNAMIC. When not supported, it is left in so that a
259 back-end target can use outfile substitution. */
264 case OPT_static_libphobos
:
265 if (phobos_library
!= PHOBOS_NOLINK
)
266 phobos_library
= PHOBOS_STATIC
;
267 #ifdef HAVE_LD_STATIC_DYNAMIC
268 /* Remove -static-libphobos from the command only if target supports
269 LD_STATIC_DYNAMIC. When not supported, it is left in so that a
270 back-end target can use outfile substitution. */
275 case OPT_shared_libphobos
:
276 if (phobos_library
!= PHOBOS_NOLINK
)
277 phobos_library
= PHOBOS_DYNAMIC
;
283 only_source_option
= decoded_options
[i
].orig_option_with_args_text
;
287 const char *suffix
= strrchr (only_source_option
, '.');
288 if (suffix
== NULL
|| strcmp (suffix
, ".d") != 0)
289 only_source_option
= concat (only_source_option
, ".d", NULL
);
293 case OPT_SPECIAL_input_file
:
295 if (arg
[0] == '\0' || arg
[1] == '\0')
298 if (phobos_library
== PHOBOS_DEFAULT
)
299 phobos_library
= PHOBOS_LINK
;
301 /* Record that this is a D source file. */
302 const char *suffix
= strrchr (arg
, '.');
303 if (suffix
!= NULL
&& strcmp (suffix
, ".d") == 0)
305 if (first_d_file
== NULL
)
311 /* If this is a C++ source file, we'll need to link
312 against libstdc++ library. */
314 && (strcmp (suffix
, ".cc") == 0
315 || (strcmp (suffix
, ".cpp") == 0)
316 || (strcmp (suffix
, ".c++") == 0)))
324 /* There's no point adding -shared-libgcc if we don't have a shared
326 #ifndef ENABLE_SHARED_LIBGCC
327 shared_libgcc
= false;
330 /* Make sure to have room for the trailing NULL argument.
331 - need_stdcxx might add `-lstdcxx'
332 - libphobos adds `-Bstatic -lphobos -Bdynamic'
333 - only_source adds 1 more arg, also maybe add `-o'. */
334 num_args
= argc
+ need_stdcxx
+ shared_libgcc
335 + (phobos_library
!= PHOBOS_NOLINK
) * 4 + 2;
336 new_decoded_options
= XNEWVEC (cl_decoded_option
, num_args
);
341 /* Copy the 0th argument, i.e., the name of the program itself. */
342 new_decoded_options
[j
++] = decoded_options
[i
++];
344 /* NOTE: We start at 1 now, not 0. */
347 if (args
[i
] & SKIPOPT
)
353 new_decoded_options
[j
] = decoded_options
[i
];
355 if (!saw_libcxx
&& (args
[i
] & WITHLIBCXX
))
358 saw_libcxx
= &decoded_options
[i
];
361 if (args
[i
] & DSOURCE
)
363 if (only_source_option
)
371 if (only_source_option
)
373 const char *only_source_arg
= only_source_option
+ 7;
374 generate_option (OPT_fonly_
, only_source_arg
, 1, CL_DRIVER
,
375 &new_decoded_options
[j
]);
378 generate_option_input_file (only_source_arg
,
379 &new_decoded_options
[j
++]);
382 /* If no reason to link against libphobos library, then don't add it. */
383 if (phobos_library
== PHOBOS_DEFAULT
)
384 phobos_library
= PHOBOS_NOLINK
;
386 /* If we didn't see a -o option, add one. This is because we need the
387 driver to pass all .d files to the D compiler. Without a -o option
388 the driver will invoke the compiler separately for each input file. */
389 if (first_d_file
!= NULL
&& !saw_opt_o
)
391 if (saw_opt_c
|| saw_opt_S
)
393 const char *base
= lbasename (first_d_file
);
394 int baselen
= strlen (base
) - 2;
395 char *out
= XNEWVEC (char, baselen
+ 3);
397 memcpy (out
, base
, baselen
);
398 /* The driver will convert .o to some other suffix if appropriate. */
401 out
[baselen
+ 1] = 's';
403 out
[baselen
+ 1] = 'o';
404 out
[baselen
+ 2] = '\0';
405 generate_option (OPT_o
, out
, 1, CL_DRIVER
,
406 &new_decoded_options
[j
]);
410 /* Wouldn't be necessary if the driver converted .out also. */
411 const char *out
= NULL
;
413 #ifdef TARGET_EXECUTABLE_SUFFIX
414 if (TARGET_EXECUTABLE_SUFFIX
[0] != 0)
415 out
= "a" TARGET_EXECUTABLE_SUFFIX
;
420 generate_option (OPT_o
, out
, 1, CL_DRIVER
,
421 &new_decoded_options
[j
]);
426 /* Add `-lgphobos' if we haven't already done so. */
427 if (phobos_library
!= PHOBOS_NOLINK
)
429 /* Default to static linking. */
430 if (phobos_library
!= PHOBOS_DYNAMIC
)
431 phobos_library
= PHOBOS_STATIC
;
433 #ifdef HAVE_LD_STATIC_DYNAMIC
434 if (phobos_library
== PHOBOS_STATIC
&& !static_link
)
436 generate_option (OPT_Wl_
, LD_STATIC_OPTION
, 1, CL_DRIVER
,
437 &new_decoded_options
[j
++]);
440 /* Order of precedence in determining what library to link against is:
441 - `-l<lib>' from `-debuglib=<lib>' if `-g' was also seen.
442 - `-l<lib>' from `-defaultlib=<lib>'.
443 - `-lgphobos' unless `-nophoboslib' or `-fno-druntime' was seen. */
444 if (debuglib
&& saw_debug_flag
)
446 generate_option (OPT_l
, debuglib
, 1, CL_DRIVER
,
447 &new_decoded_options
[j
++]);
452 generate_option (OPT_l
, defaultlib
, 1, CL_DRIVER
,
453 &new_decoded_options
[j
++]);
458 generate_option (OPT_l
,
459 saw_profile_flag
? LIBPHOBOS_PROFILE
: LIBPHOBOS
, 1,
460 CL_DRIVER
, &new_decoded_options
[j
++]);
464 #ifdef HAVE_LD_STATIC_DYNAMIC
465 if (phobos_library
== PHOBOS_STATIC
&& !static_link
)
467 generate_option (OPT_Wl_
, LD_DYNAMIC_OPTION
, 1, CL_DRIVER
,
468 &new_decoded_options
[j
++]);
473 if (saw_libcxx
|| saw_static_libcxx
|| need_stdcxx
)
475 #ifdef HAVE_LD_STATIC_DYNAMIC
476 if (saw_static_libcxx
&& !static_link
)
478 generate_option (OPT_Wl_
, LD_STATIC_OPTION
, 1, CL_DRIVER
,
479 &new_decoded_options
[j
++]);
483 new_decoded_options
[j
++] = *saw_libcxx
;
484 else if (need_stdcxx
)
486 generate_option (OPT_l
,
490 1, CL_DRIVER
, &new_decoded_options
[j
++]);
493 #ifdef HAVE_LD_STATIC_DYNAMIC
494 if (saw_static_libcxx
&& !static_link
)
496 generate_option (OPT_Wl_
, LD_DYNAMIC_OPTION
, 1, CL_DRIVER
,
497 &new_decoded_options
[j
++]);
502 if (shared_libgcc
&& !static_link
)
504 generate_option (OPT_shared_libgcc
, NULL
, 1, CL_DRIVER
,
505 &new_decoded_options
[j
++]);
508 *in_decoded_options_count
= j
;
509 *in_decoded_options
= new_decoded_options
;
510 *in_added_libraries
= added_libraries
;
513 /* Called before linking. Returns 0 on success and -1 on failure. */
516 lang_specific_pre_link (void)
518 if ((phobos_library
!= PHOBOS_NOLINK
) || need_spec
)
519 do_spec ("%:include(libgphobos.spec)");
524 /* Number of extra output files that lang_specific_pre_link may generate. */
526 int lang_specific_extra_outfiles
= 0; /* Not used for D. */