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