1 /* Operating system specific defines to be used when targeting GCC for
2    hosting on Windows32, using a Unix style C library and tools.
3    Copyright (C) 1995-2021 Free Software Foundation, Inc.
4 
5 This file is part of GCC.
6 
7 GCC 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 3, or (at your option)
10 any later version.
11 
12 GCC 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.
16 
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING3.  If not see
19 <http://www.gnu.org/licenses/>.  */
20 
21 #define DBX_DEBUGGING_INFO 1
22 #if TARGET_64BIT_DEFAULT || defined (HAVE_GAS_PE_SECREL32_RELOC)
23 #define DWARF2_DEBUGGING_INFO 1
24 #endif
25 
26 #undef PREFERRED_DEBUGGING_TYPE
27 #if (DWARF2_DEBUGGING_INFO)
28 #define PREFERRED_DEBUGGING_TYPE DWARF2_DEBUG
29 #else
30 #define PREFERRED_DEBUGGING_TYPE DBX_DEBUG
31 #endif
32 
33 #undef TARGET_SEH
34 #define TARGET_SEH  (TARGET_64BIT_MS_ABI && flag_unwind_tables)
35 
36 /* Win64 with SEH cannot represent DRAP stack frames.  Disable its use.
37    Force the use of different mechanisms to allocate aligned local data.  */
38 #undef MAX_STACK_ALIGNMENT
39 #define MAX_STACK_ALIGNMENT  (TARGET_SEH ? 128 : MAX_OFILE_ALIGNMENT)
40 
41 /* 32-bit Windows aligns the stack on a 4-byte boundary but SSE instructions
42    may require 16-byte alignment.  */
43 #undef STACK_REALIGN_DEFAULT
44 #define STACK_REALIGN_DEFAULT TARGET_SSE
45 
46 /* Support hooks for SEH.  */
47 #undef  TARGET_ASM_UNWIND_EMIT
48 #define TARGET_ASM_UNWIND_EMIT  i386_pe_seh_unwind_emit
49 #undef  TARGET_ASM_UNWIND_EMIT_BEFORE_INSN
50 #define TARGET_ASM_UNWIND_EMIT_BEFORE_INSN  false
51 #undef  TARGET_ASM_FUNCTION_END_PROLOGUE
52 #define TARGET_ASM_FUNCTION_END_PROLOGUE  i386_pe_seh_end_prologue
53 #undef  TARGET_ASM_EMIT_EXCEPT_PERSONALITY
54 #define TARGET_ASM_EMIT_EXCEPT_PERSONALITY i386_pe_seh_emit_except_personality
55 #undef  TARGET_ASM_INIT_SECTIONS
56 #define TARGET_ASM_INIT_SECTIONS  i386_pe_seh_init_sections
57 #define SUBTARGET_ASM_UNWIND_INIT  i386_pe_seh_init
58 
59 #undef DEFAULT_ABI
60 #define DEFAULT_ABI (TARGET_64BIT ? MS_ABI : SYSV_ABI)
61 
62 #undef TARGET_PECOFF
63 #define TARGET_PECOFF 1
64 
65 #if ! defined (USE_MINGW64_LEADING_UNDERSCORES)
66 #undef USER_LABEL_PREFIX
67 #define USER_LABEL_PREFIX (TARGET_64BIT ? "" : "_")
68 
69 #undef LOCAL_LABEL_PREFIX
70 #define LOCAL_LABEL_PREFIX (TARGET_64BIT ? "." : "")
71 
72 #undef ASM_GENERATE_INTERNAL_LABEL
73 #define ASM_GENERATE_INTERNAL_LABEL(BUF,PREFIX,NUMBER)  \
74   sprintf ((BUF), "*%s%s%ld", LOCAL_LABEL_PREFIX, \
75 	   (PREFIX), (long)(NUMBER))
76 
77 #undef LPREFIX
78 #define LPREFIX (TARGET_64BIT ? ".L" : "L")
79 
80 #endif
81 
82 #undef DBX_REGISTER_NUMBER
83 #define DBX_REGISTER_NUMBER(n)				\
84   (TARGET_64BIT ? dbx64_register_map[n]			\
85    : (write_symbols == DWARF2_DEBUG			\
86       ? svr4_dbx_register_map[n] : dbx_register_map[n]))
87 
88 /* Map gcc register number to DWARF 2 CFA column number. For 32 bit
89    target, always use the svr4_dbx_register_map for DWARF .eh_frame
90    even if we don't use DWARF .debug_frame. */
91 #undef DWARF_FRAME_REGNUM
92 #define DWARF_FRAME_REGNUM(n)				\
93   (TARGET_64BIT ? dbx64_register_map[(n)]		\
94 		: svr4_dbx_register_map[(n)])
95 
96 /* The 64-bit MS_ABI changes the set of call-used registers.  */
97 #undef DWARF_FRAME_REGISTERS
98 #define DWARF_FRAME_REGISTERS (TARGET_64BIT ? 33 : 17)
99 
100 #ifdef HAVE_GAS_PE_SECREL32_RELOC
101 /* Use section relative relocations for debugging offsets.  Unlike
102    other targets that fake this by putting the section VMA at 0, PE
103    won't allow it.  */
104 #define ASM_OUTPUT_DWARF_OFFSET(FILE, SIZE, LABEL, OFFSET, SECTION) \
105   do {								\
106     switch (SIZE)						\
107       {								\
108       case 4:							\
109 	fputs ("\t.secrel32\t", FILE);				\
110 	assemble_name (FILE, LABEL);				\
111 	if ((OFFSET) != 0)					\
112 	  fprintf (FILE, "+" HOST_WIDE_INT_PRINT_DEC,		\
113 		   (HOST_WIDE_INT) (OFFSET));			\
114 	break;							\
115       case 8:							\
116 	/* This is a hack.  There is no 64-bit section relative	\
117 	   relocation.  However, the COFF format also does not	\
118 	   support 64-bit file offsets; 64-bit applications are	\
119 	   limited to 32-bits of code+data in any one module.	\
120 	   Fake the 64-bit offset by zero-extending it.  */	\
121 	fputs ("\t.secrel32\t", FILE);				\
122 	assemble_name (FILE, LABEL);				\
123 	if ((OFFSET) != 0)					\
124 	  fprintf (FILE, "+" HOST_WIDE_INT_PRINT_DEC,		\
125 		   (HOST_WIDE_INT) (OFFSET));			\
126 	fputs ("\n\t.long\t0", FILE);				\
127 	break;							\
128       default:							\
129 	gcc_unreachable ();					\
130       }								\
131   } while (0)
132 #endif
133 
134 #define TARGET_EXECUTABLE_SUFFIX ".exe"
135 
136 #define TARGET_OS_CPP_BUILTINS()					\
137   do									\
138     {									\
139 	if (!TARGET_64BIT)						\
140 	  builtin_define ("_X86_=1");					\
141 	if (TARGET_SEH)							\
142 	  builtin_define ("__SEH__");				\
143 	builtin_assert ("system=winnt");				\
144 	builtin_define ("__stdcall=__attribute__((__stdcall__))");	\
145 	builtin_define ("__fastcall=__attribute__((__fastcall__))");	\
146 	builtin_define ("__thiscall=__attribute__((__thiscall__))");	\
147 	builtin_define ("__cdecl=__attribute__((__cdecl__))");		\
148 	if (!flag_iso)							\
149 	  {								\
150 	    builtin_define ("_stdcall=__attribute__((__stdcall__))");	\
151 	    builtin_define ("_fastcall=__attribute__((__fastcall__))");	\
152 	    builtin_define ("_thiscall=__attribute__((__thiscall__))");	\
153 	    builtin_define ("_cdecl=__attribute__((__cdecl__))");	\
154 	  }								\
155 	/* Even though linkonce works with static libs, this is needed 	\
156 	    to compare typeinfo symbols across dll boundaries.  */	\
157 	builtin_define ("__GXX_MERGED_TYPEINFO_NAMES=0");		\
158 	builtin_define ("__GXX_TYPEINFO_EQUALITY_INLINE=0");		\
159 	EXTRA_OS_CPP_BUILTINS ();					\
160   }									\
161   while (0)
162 
163 /* Get tree.c to declare a target-specific specialization of
164    merge_decl_attributes.  */
165 #define TARGET_DLLIMPORT_DECL_ATTRIBUTES 1
166 
167 /* This macro defines names of additional specifications to put in the specs
168    that can be used in various specifications like CC1_SPEC.  Its definition
169    is an initializer with a subgrouping for each command option.
170 
171    Each subgrouping contains a string constant, that defines the
172    specification name, and a string constant that used by the GCC driver
173    program.
174 
175    Do not define this macro if it does not need to do anything.  */
176 
177 #undef  SUBTARGET_EXTRA_SPECS
178 #define SUBTARGET_EXTRA_SPECS						\
179   { "mingw_include_path", DEFAULT_TARGET_MACHINE }
180 
181 #undef MATH_LIBRARY
182 #define MATH_LIBRARY ""
183 
184 #undef TARGET_LIBC_HAS_FUNCTION
185 #define TARGET_LIBC_HAS_FUNCTION no_c99_libc_has_function
186 
187 #define SIZE_TYPE (TARGET_64BIT ? "long long unsigned int" : "unsigned int")
188 #define PTRDIFF_TYPE (TARGET_64BIT ? "long long int" : "int")
189 
190 #define WCHAR_TYPE_SIZE 16
191 #define WCHAR_TYPE "short unsigned int"
192 
193 /* Windows64 continues to use a 32-bit long type.  */
194 #undef LONG_TYPE_SIZE
195 #define LONG_TYPE_SIZE 32
196 
197 #define drectve_section() \
198   (fprintf (asm_out_file, "\t.section .drectve\n"), \
199    in_section = NULL)
200 
201 /* Older versions of gas don't handle 'r' as data.
202    Explicitly set data flag with 'd'.  */
203 #define READONLY_DATA_SECTION_ASM_OP "\t.section .rdata,\"dr\""
204 
205 /* Don't allow flag_pic to propagate since gas may produce invalid code
206    otherwise.  */
207 
208 #undef  SUBTARGET_OVERRIDE_OPTIONS
209 #define SUBTARGET_OVERRIDE_OPTIONS					\
210 do {									\
211   flag_pic = TARGET_64BIT ? 1 : 0;                                      \
212 } while (0)
213 
214 /* Define this macro if references to a symbol must be treated
215    differently depending on something about the variable or
216    function named by the symbol (such as what section it is in).
217 
218    On i386 running Windows NT, modify the assembler name with a suffix
219    consisting of an atsign (@) followed by string of digits that represents
220    the number of bytes of arguments passed to the function, if it has the
221    attribute STDCALL.
222 
223    In addition, we must mark dll symbols specially. Definitions of
224    dllexport'd objects install some info in the .drectve section.
225    References to dllimport'd objects are fetched indirectly via
226    _imp__.  If both are declared, dllexport overrides.  This is also
227    needed to implement one-only vtables: they go into their own
228    section and we need to set DECL_SECTION_NAME so we do that here.
229    Note that we can be called twice on the same decl.  */
230 
231 #define SUBTARGET_ENCODE_SECTION_INFO  i386_pe_encode_section_info
232 
233 /* Local and global relocs can be placed always into readonly memory
234    for PE-COFF targets.  */
235 #undef TARGET_ASM_RELOC_RW_MASK
236 #define TARGET_ASM_RELOC_RW_MASK i386_pe_reloc_rw_mask
237 
238 /* Output a common block.  */
239 #undef ASM_OUTPUT_ALIGNED_DECL_COMMON
240 #define ASM_OUTPUT_ALIGNED_DECL_COMMON \
241   i386_pe_asm_output_aligned_decl_common
242 
243 /* Output the label for an initialized variable.  */
244 #undef ASM_DECLARE_OBJECT_NAME
245 #define ASM_DECLARE_OBJECT_NAME(STREAM, NAME, DECL)	\
246 do {							\
247   i386_pe_maybe_record_exported_symbol (DECL, NAME, 1);	\
248   ASM_OUTPUT_LABEL ((STREAM), (NAME));			\
249 } while (0)
250 
251 /* Output a reference to a label. Fastcall function symbols
252    keep their '@' prefix, while other symbols are prefixed
253    with user_label_prefix.  */
254 #undef ASM_OUTPUT_LABELREF
255 #define  ASM_OUTPUT_LABELREF(STREAM, NAME)	\
256 do {						\
257   if ((NAME)[0] != FASTCALL_PREFIX)		\
258     fputs (user_label_prefix, (STREAM));	\
259   fputs ((NAME), (STREAM));			\
260 } while (0)
261 
262 /* This does much the same in memory rather than to a stream.  */
263 #undef TARGET_MANGLE_ASSEMBLER_NAME
264 #define TARGET_MANGLE_ASSEMBLER_NAME i386_pe_mangle_assembler_name
265 
266 
267 /* Emit code to check the stack when allocating more than 4000
268    bytes in one go.  */
269 #define CHECK_STACK_LIMIT 4000
270 
271 /* By default, target has a 80387, uses IEEE compatible arithmetic,
272    returns float values in the 387 and needs stack probes.
273    We also align doubles to 64-bits for MSVC default compatibility.  */
274 
275 #undef TARGET_SUBTARGET_DEFAULT
276 #define TARGET_SUBTARGET_DEFAULT \
277 	(MASK_80387 | MASK_IEEE_FP | MASK_FLOAT_RETURNS \
278 	 | MASK_STACK_PROBE | MASK_ALIGN_DOUBLE)
279 
280 #undef TARGET_SUBTARGET64_DEFAULT
281 #define TARGET_SUBTARGET64_DEFAULT \
282 	MASK_128BIT_LONG_DOUBLE
283 
284 /* This is how to output an assembler line
285    that says to advance the location counter
286    to a multiple of 2**LOG bytes.  */
287 
288 #undef ASM_OUTPUT_ALIGN
289 #define ASM_OUTPUT_ALIGN(FILE,LOG)	\
290     if ((LOG) != 0) fprintf ((FILE), "\t.align %d\n", 1 << (LOG))
291 
292 /* Windows uses explicit import from shared libraries.  */
293 #define MULTIPLE_SYMBOL_SPACES 1
294 
295 #define TARGET_ASM_UNIQUE_SECTION i386_pe_unique_section
296 #define TARGET_ASM_FUNCTION_RODATA_SECTION default_no_function_rodata_section
297 
298 #define SUPPORTS_ONE_ONLY 1
299 
300 /* Switch into a generic section.  */
301 #define TARGET_ASM_NAMED_SECTION  i386_pe_asm_named_section
302 
303 /* Select attributes for named sections.  */
304 #define TARGET_SECTION_TYPE_FLAGS  i386_pe_section_type_flags
305 
306 /* Write the extra assembler code needed to declare a function
307    properly.  */
308 #undef ASM_DECLARE_FUNCTION_NAME
309 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \
310   i386_pe_start_function (FILE, NAME, DECL)
311 
312 /* Write the extra assembler code needed to declare the name of a
313    cold function partition properly.  */
314 
315 #undef ASM_DECLARE_COLD_FUNCTION_NAME
316 #define ASM_DECLARE_COLD_FUNCTION_NAME(FILE, NAME, DECL)	\
317   do								\
318     {								\
319       i386_pe_declare_function_type (FILE, NAME, 0);		\
320       i386_pe_seh_cold_init (FILE, NAME);			\
321       ASM_OUTPUT_LABEL (FILE, NAME);				\
322     }								\
323   while (0)
324 
325 #undef ASM_DECLARE_FUNCTION_SIZE
326 #define ASM_DECLARE_FUNCTION_SIZE(FILE,NAME,DECL) \
327   i386_pe_end_function (FILE, NAME, DECL)
328 
329 #undef ASM_DECLARE_COLD_FUNCTION_SIZE
330 #define ASM_DECLARE_COLD_FUNCTION_SIZE(FILE,NAME,DECL) \
331   i386_pe_end_cold_function (FILE, NAME, DECL)
332 
333 /* Add an external function to the list of functions to be declared at
334    the end of the file.  */
335 #define ASM_OUTPUT_EXTERNAL(FILE, DECL, NAME)				\
336   do									\
337     {									\
338       if (TREE_CODE (DECL) == FUNCTION_DECL)				\
339 	i386_pe_record_external_function ((DECL), (NAME));		\
340     }									\
341   while (0)
342 
343 /* Declare the type properly for any external libcall.  */
344 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN) \
345   i386_pe_declare_function_type (FILE, XSTR (FUN, 0), 1)
346 
347 /* This says out to put a global symbol in the BSS section.  */
348 #undef ASM_OUTPUT_ALIGNED_BSS
349 #define ASM_OUTPUT_ALIGNED_BSS(FILE, DECL, NAME, SIZE, ALIGN) \
350   asm_output_aligned_bss ((FILE), (DECL), (NAME), (SIZE), (ALIGN))
351 
352 /* Output function declarations at the end of the file.  */
353 #undef TARGET_ASM_FILE_END
354 #define TARGET_ASM_FILE_END i386_pe_file_end
355 
356 /* Kludge because of missing PE-COFF support for early LTO debug.  */
357 #undef  TARGET_ASM_LTO_START
358 #define TARGET_ASM_LTO_START i386_pe_asm_lto_start
359 #undef  TARGET_ASM_LTO_END
360 #define TARGET_ASM_LTO_END i386_pe_asm_lto_end
361 
362 #undef ASM_COMMENT_START
363 #define ASM_COMMENT_START " #"
364 
365 #ifndef DWARF2_UNWIND_INFO
366 /* If configured with --disable-sjlj-exceptions, use DWARF2 for 32-bit
367    mode else default to SJLJ.  64-bit code uses SEH unless you request
368    SJLJ.  */
369 #if  (defined (CONFIG_SJLJ_EXCEPTIONS) && !CONFIG_SJLJ_EXCEPTIONS)
370 /* The logic of this #if must be kept synchronised with the logic
371    for selecting the tmake_eh_file fragment in libgcc/config.host.  */
372 #define DWARF2_UNWIND_INFO 1
373 #else
374 #define DWARF2_UNWIND_INFO 0
375 #endif
376 #endif
377 
378 #undef PROFILE_HOOK
379 #define PROFILE_HOOK(LABEL)						\
380   if (MAIN_NAME_P (DECL_NAME (current_function_decl)))			\
381     {									\
382       emit_call_insn (gen_rtx_CALL (VOIDmode,				\
383 	gen_rtx_MEM (FUNCTION_MODE,					\
384 		     gen_rtx_SYMBOL_REF (Pmode, "_monstartup")),	\
385 	const0_rtx));							\
386     }
387 
388 /* For Win32 ABI compatibility */
389 #undef DEFAULT_PCC_STRUCT_RETURN
390 #define DEFAULT_PCC_STRUCT_RETURN 0
391 
392 /* MSVC returns aggregate types of up to 8 bytes via registers.
393    See i386.c:ix86_return_in_memory.  */
394 #undef MS_AGGREGATE_RETURN
395 #define MS_AGGREGATE_RETURN 1
396 
397 /* Biggest alignment supported by the object file format of this
398    machine.  Use this macro to limit the alignment which can be
399    specified using the `__attribute__ ((aligned (N)))' construct.  If
400    not defined, the default value is `BIGGEST_ALIGNMENT'.  */
401 /* IMAGE_SCN_ALIGN_8192BYTES is the largest section alignment flag
402    specified in the PECOFF60 spec.  Native MS compiler also limits
403    user-specified alignment to 8192 bytes.  */
404 #undef MAX_OFILE_ALIGNMENT
405 #define MAX_OFILE_ALIGNMENT (8192 * 8)
406 
407 /* BIGGEST_FIELD_ALIGNMENT macro is used directly by libobjc, There, we
408    align internal doubles in structures on dword boundaries. Otherwise,
409    support vector modes using ADJUST_FIELD_ALIGN, defined in i386.h.  */
410 #ifdef IN_TARGET_LIBS
411 #undef	BIGGEST_FIELD_ALIGNMENT
412 #define BIGGEST_FIELD_ALIGNMENT 64
413 #endif
414 
415 /* Enable alias attribute support.  */
416 #ifndef SET_ASM_OP
417 #define SET_ASM_OP "\t.set\t"
418 #endif
419 
420 /* This implements the `alias' attribute, keeping any stdcall or
421    fastcall decoration.  */
422 #undef	ASM_OUTPUT_DEF_FROM_DECLS
423 #define	ASM_OUTPUT_DEF_FROM_DECLS(STREAM, DECL, TARGET)			\
424   do									\
425     {									\
426       const char *alias							\
427 	= IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (DECL));		\
428       i386_pe_maybe_record_exported_symbol (DECL, alias, 0);		\
429       if (TREE_CODE (DECL) == FUNCTION_DECL)				\
430 	i386_pe_declare_function_type (STREAM, alias,			\
431 				       TREE_PUBLIC (DECL));		\
432       ASM_OUTPUT_DEF (STREAM, alias, IDENTIFIER_POINTER (TARGET));	\
433     } while (0)
434 
435 /* GNU as supports weak symbols on PECOFF. */
436 #ifdef HAVE_GAS_WEAK
437 #define ASM_WEAKEN_LABEL(FILE, NAME)  \
438   do                                  \
439     {                                 \
440       fputs ("\t.weak\t", (FILE));    \
441       assemble_name ((FILE), (NAME)); \
442       fputc ('\n', (FILE));           \
443     }                                 \
444   while (0)
445 
446 #endif /* HAVE_GAS_WEAK */
447 
448 /* Decide whether it is safe to use a local alias for a virtual function
449    when constructing thunks.  */
450 #undef TARGET_USE_LOCAL_THUNK_ALIAS_P
451 #define TARGET_USE_LOCAL_THUNK_ALIAS_P(DECL) (!DECL_ONE_ONLY (DECL))
452 
453 #define SUBTARGET_ATTRIBUTE_TABLE \
454   { "selectany", 0, 0, true, false, false, false, \
455     ix86_handle_selectany_attribute, NULL }
456   /* { name, min_len, max_len, decl_req, type_req, fn_type_req,
457        affects_type_identity, handler, exclude } */
458 
459 /*  mcount() does not need a counter variable.  */
460 #undef NO_PROFILE_COUNTERS
461 #define NO_PROFILE_COUNTERS 1
462 
463 #define TARGET_VALID_DLLIMPORT_ATTRIBUTE_P i386_pe_valid_dllimport_attribute_p
464 #define TARGET_CXX_ADJUST_CLASS_AT_DEFINITION i386_pe_adjust_class_at_definition
465 #define SUBTARGET_MANGLE_DECL_ASSEMBLER_NAME i386_pe_mangle_decl_assembler_name
466 
467 #undef TARGET_ASM_ASSEMBLE_VISIBILITY
468 #define TARGET_ASM_ASSEMBLE_VISIBILITY i386_pe_assemble_visibility
469 
470 #undef SUB_TARGET_RECORD_STUB
471 #define SUB_TARGET_RECORD_STUB i386_pe_record_stub
472 
473 /* Static stack checking is supported by means of probes.  */
474 #define STACK_CHECK_STATIC_BUILTIN 1
475 
476 #ifndef HAVE_GAS_ALIGNED_COMM
477 # define HAVE_GAS_ALIGNED_COMM 0
478 #endif
479