| /* Operating system specific defines to be used when targeting GCC for |
| hosting on Windows NT 3.x, using a Unix style C library and tools, |
| as distinct from winnt.h, which is used to build GCC for use with a |
| windows style library and tool set and uses the Microsoft tools. |
| Copyright (C) 1995, 1996, 1997, 1998, 1999 Free Software Foundation, Inc. |
| |
| This file is part of GNU CC. |
| |
| GNU CC is free software; you can redistribute it and/or modify |
| it under the terms of the GNU General Public License as published by |
| the Free Software Foundation; either version 2, or (at your option) |
| any later version. |
| |
| GNU CC is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| GNU General Public License for more details. |
| |
| You should have received a copy of the GNU General Public License |
| along with GNU CC; see the file COPYING. If not, write to |
| the Free Software Foundation, 59 Temple Place - Suite 330, |
| Boston, MA 02111-1307, USA. */ |
| |
| #define YES_UNDERSCORES |
| |
| #define DBX_DEBUGGING_INFO |
| #define SDB_DEBUGGING_INFO |
| #define PREFERRED_DEBUGGING_TYPE DBX_DEBUG |
| |
| #include "i386/gas.h" |
| #include "dbxcoff.h" |
| |
| /* Augment TARGET_SWITCHES with the cygwin/no-cygwin options. */ |
| #define MASK_WIN32 0x40000000 /* Use -lming32 interface */ |
| #define MASK_CYGWIN 0x20000000 /* Use -lcygwin interface */ |
| #define MASK_WINDOWS 0x10000000 /* Use windows interface */ |
| #define MASK_DLL 0x08000000 /* Use dll interface */ |
| #define MASK_NOP_FUN_DLLIMPORT 0x20000 /* Ignore dllimport for functions */ |
| |
| #define TARGET_WIN32 (target_flags & MASK_WIN32) |
| #define TARGET_CYGWIN (target_flags & MASK_CYGWIN) |
| #define TARGET_WINDOWS (target_flags & MASK_WINDOWS) |
| #define TARGET_DLL (target_flags & MASK_DLL) |
| #define TARGET_NOP_FUN_DLLIMPORT (target_flags & MASK_NOP_FUN_DLLIMPORT) |
| |
| #undef SUBTARGET_SWITCHES |
| #define SUBTARGET_SWITCHES \ |
| { "no-cygwin", MASK_WIN32, "Use the Mingw32 interface" }, \ |
| { "cygwin", MASK_CYGWIN, "Use the Cygwin interface" }, \ |
| { "windows", MASK_WINDOWS, "Use the bare Windows interface" }, \ |
| { "dll", MASK_DLL, "Generate code for a DLL" }, \ |
| { "nop-fun-dllimport", MASK_NOP_FUN_DLLIMPORT, "Ignore dllimport for functions" }, \ |
| { "no-nop-fun-dllimport", MASK_NOP_FUN_DLLIMPORT, "" }, |
| |
| |
| /* Support the __declspec keyword by turning them into attributes. |
| We currently only support: dllimport and dllexport. |
| Note that the current way we do this may result in a collision with |
| predefined attributes later on. This can be solved by using one attribute, |
| say __declspec__, and passing args to it. The problem with that approach |
| is that args are not accumulated: each new appearance would clobber any |
| existing args. */ |
| |
| #ifdef CPP_PREDEFINES |
| #undef CPP_PREDEFINES |
| #endif |
| |
| #define CPP_PREDEFINES "-Di386 -D_WIN32 \ |
| -DWINNT -D_X86_=1 -D__STDC__=1\ |
| -D__stdcall=__attribute__((__stdcall__)) \ |
| -D__cdecl=__attribute__((__cdecl__)) \ |
| -D__declspec(x)=__attribute__((x)) \ |
| -Asystem(winnt) -Acpu(i386) -Amachine(i386)" |
| |
| /* Normally, -lgcc is not needed since everything in it is in the DLL, but we |
| want to allow things to be added to it when installing new versions of |
| GCC without making a new CYGWIN.DLL, so we leave it. Profiling is handled |
| by calling the init function from the prologue. */ |
| |
| #undef STARTFILE_SPEC |
| #define STARTFILE_SPEC "%{mdll: %{!mno-cygwin:dllcrt0%O%s} \ |
| %{mno-cygwin:dllcrt1%O%s}} \ |
| %{!mdll: %{!mno-cygwin:crt0%O%s} \ |
| %{mno-cygwin:crt1%O%s} %{pg:gcrt0%O%s}}" |
| |
| #undef CPP_SPEC |
| #define CPP_SPEC "-remap %(cpp_cpu) %{posix:-D_POSIX_SOURCE} \ |
| %{!mno-cygwin:-D__CYGWIN32__ -D__CYGWIN__} \ |
| %{mno-cygwin:-iwithprefixbefore \ |
| ../../../../%(mingw_include_path)/include/mingw32 -D__MINGW32__=0.2}" |
| |
| /* This macro defines names of additional specifications to put in the specs |
| that can be used in various specifications like CC1_SPEC. Its definition |
| is an initializer with a subgrouping for each command option. |
| |
| Each subgrouping contains a string constant, that defines the |
| specification name, and a string constant that used by the GNU CC driver |
| program. |
| |
| Do not define this macro if it does not need to do anything. */ |
| |
| #undef SUBTARGET_EXTRA_SPECS |
| #define SUBTARGET_EXTRA_SPECS \ |
| { "mingw_include_path", DEFAULT_TARGET_MACHINE } |
| |
| /* We have to dynamic link to get to the system DLLs. All of libc, libm and |
| the Unix stuff is in cygwin.dll. The import library is called |
| 'libcygwin.a'. For Windows applications, include more libraries, but |
| always include kernel32. We'd like to specific subsystem windows to |
| ld, but that doesn't work just yet. */ |
| |
| #undef LIB_SPEC |
| #define LIB_SPEC "%{pg:-lgmon} \ |
| %{!mno-cygwin:-lcygwin} \ |
| %{mno-cygwin:-lmingw32 -lmoldname -lcrtdll} \ |
| %{mwindows:-lgdi32 -lcomdlg32} \ |
| -luser32 -lkernel32 -ladvapi32 -lshell32" |
| |
| #define LINK_SPEC "%{mwindows:--subsystem windows} \ |
| %{mdll:--dll -e _DllMainCRTStartup@12}" |
| |
| |
| #define SIZE_TYPE "unsigned int" |
| #define PTRDIFF_TYPE "int" |
| #define WCHAR_UNSIGNED 1 |
| #define WCHAR_TYPE_SIZE 16 |
| #define WCHAR_TYPE "short unsigned int" |
| |
| #define HAVE_ATEXIT 1 |
| |
| |
| /* Enable parsing of #pragma pack(push,<n>) and #pragma pack(pop). */ |
| #define HANDLE_PRAGMA_PACK_PUSH_POP 1 |
| |
| /* A C expression whose value is nonzero if IDENTIFIER with arguments ARGS |
| is a valid machine specific attribute for DECL. |
| The attributes in ATTRIBUTES have previously been assigned to DECL. */ |
| extern int i386_pe_valid_decl_attribute_p (); |
| |
| #undef VALID_MACHINE_DECL_ATTRIBUTE |
| #define VALID_MACHINE_DECL_ATTRIBUTE(DECL, ATTRIBUTES, IDENTIFIER, ARGS) \ |
| i386_pe_valid_decl_attribute_p (DECL, ATTRIBUTES, IDENTIFIER, ARGS) |
| |
| /* A C expression whose value is nonzero if IDENTIFIER with arguments ARGS |
| is a valid machine specific attribute for TYPE. |
| The attributes in ATTRIBUTES have previously been assigned to TYPE. */ |
| |
| #undef VALID_MACHINE_TYPE_ATTRIBUTE |
| #define VALID_MACHINE_TYPE_ATTRIBUTE(TYPE, ATTRIBUTES, IDENTIFIER, ARGS) \ |
| i386_pe_valid_type_attribute_p (TYPE, ATTRIBUTES, IDENTIFIER, ARGS) |
| extern int i386_pe_valid_type_attribute_p (); |
| |
| extern union tree_node *i386_pe_merge_decl_attributes (); |
| #define MERGE_MACHINE_DECL_ATTRIBUTES(OLD, NEW) \ |
| i386_pe_merge_decl_attributes ((OLD), (NEW)) |
| |
| /* Used to implement dllexport overriding dllimport semantics. It's also used |
| to handle vtables - the first pass won't do anything because |
| DECL_CONTEXT (DECL) will be 0 so i386_pe_dll{ex,im}port_p will return 0. |
| It's also used to handle dllimport override semantics. */ |
| #if 0 |
| #define REDO_SECTION_INFO_P(DECL) \ |
| ((DECL_MACHINE_ATTRIBUTES (DECL) != NULL_TREE) \ |
| || (TREE_CODE (DECL) == VAR_DECL && DECL_VIRTUAL_P (DECL))) |
| #else |
| #define REDO_SECTION_INFO_P(DECL) 1 |
| #endif |
| |
| |
| #undef EXTRA_SECTIONS |
| #define EXTRA_SECTIONS in_ctor, in_dtor, in_drectve |
| |
| #undef EXTRA_SECTION_FUNCTIONS |
| #define EXTRA_SECTION_FUNCTIONS \ |
| CTOR_SECTION_FUNCTION \ |
| DTOR_SECTION_FUNCTION \ |
| DRECTVE_SECTION_FUNCTION \ |
| SWITCH_TO_SECTION_FUNCTION |
| |
| #define CTOR_SECTION_FUNCTION \ |
| void \ |
| ctor_section () \ |
| { \ |
| if (in_section != in_ctor) \ |
| { \ |
| fprintf (asm_out_file, "\t.section .ctor\n"); \ |
| in_section = in_ctor; \ |
| } \ |
| } |
| |
| #define DTOR_SECTION_FUNCTION \ |
| void \ |
| dtor_section () \ |
| { \ |
| if (in_section != in_dtor) \ |
| { \ |
| fprintf (asm_out_file, "\t.section .dtor\n"); \ |
| in_section = in_dtor; \ |
| } \ |
| } |
| |
| #define DRECTVE_SECTION_FUNCTION \ |
| void \ |
| drectve_section () \ |
| { \ |
| if (in_section != in_drectve) \ |
| { \ |
| fprintf (asm_out_file, "%s\n", "\t.section .drectve\n"); \ |
| in_section = in_drectve; \ |
| } \ |
| } |
| |
| /* Switch to SECTION (an `enum in_section'). |
| |
| ??? This facility should be provided by GCC proper. |
| The problem is that we want to temporarily switch sections in |
| ASM_DECLARE_OBJECT_NAME and then switch back to the original section |
| afterwards. */ |
| #define SWITCH_TO_SECTION_FUNCTION \ |
| void \ |
| switch_to_section (section, decl) \ |
| enum in_section section; \ |
| tree decl; \ |
| { \ |
| switch (section) \ |
| { \ |
| case in_text: text_section (); break; \ |
| case in_data: data_section (); break; \ |
| case in_named: named_section (decl, NULL, 0); break; \ |
| case in_ctor: ctor_section (); break; \ |
| case in_dtor: dtor_section (); break; \ |
| case in_drectve: drectve_section (); break; \ |
| default: abort (); break; \ |
| } \ |
| } |
| |
| #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME) \ |
| do { \ |
| ctor_section (); \ |
| fprintf (FILE, "%s\t", ASM_LONG); \ |
| assemble_name (FILE, NAME); \ |
| fprintf (FILE, "\n"); \ |
| } while (0) |
| |
| #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME) \ |
| do { \ |
| dtor_section (); \ |
| fprintf (FILE, "%s\t", ASM_LONG); \ |
| assemble_name (FILE, NAME); \ |
| fprintf (FILE, "\n"); \ |
| } while (0) |
| |
| /* Don't allow flag_pic to propagate since gas may produce invalid code |
| otherwise. */ |
| |
| #undef SUBTARGET_OVERRIDE_OPTIONS |
| #define SUBTARGET_OVERRIDE_OPTIONS \ |
| do { \ |
| if (flag_pic) \ |
| { \ |
| warning ("-f%s ignored for target (all code is position independent)",\ |
| (flag_pic > 1) ? "PIC" : "pic"); \ |
| flag_pic = 0; \ |
| } \ |
| } while (0) \ |
| |
| /* Define this macro if references to a symbol must be treated |
| differently depending on something about the variable or |
| function named by the symbol (such as what section it is in). |
| |
| On i386 running Windows NT, modify the assembler name with a suffix |
| consisting of an atsign (@) followed by string of digits that represents |
| the number of bytes of arguments passed to the function, if it has the |
| attribute STDCALL. |
| |
| In addition, we must mark dll symbols specially. Definitions of |
| dllexport'd objects install some info in the .drectve section. |
| References to dllimport'd objects are fetched indirectly via |
| _imp__. If both are declared, dllexport overrides. This is also |
| needed to implement one-only vtables: they go into their own |
| section and we need to set DECL_SECTION_NAME so we do that here. |
| Note that we can be called twice on the same decl. */ |
| |
| extern void i386_pe_encode_section_info (); |
| |
| #ifdef ENCODE_SECTION_INFO |
| #undef ENCODE_SECTION_INFO |
| #endif |
| #define ENCODE_SECTION_INFO(DECL) i386_pe_encode_section_info (DECL) |
| |
| /* Utility used only in this file. */ |
| #define I386_PE_STRIP_ENCODING(SYM_NAME) \ |
| ((SYM_NAME) + ((SYM_NAME)[0] == '@' ? 3 : 0)) |
| |
| /* This macro gets just the user-specified name |
| out of the string in a SYMBOL_REF. Discard |
| trailing @[NUM] encoded by ENCODE_SECTION_INFO. */ |
| #undef STRIP_NAME_ENCODING |
| #define STRIP_NAME_ENCODING(VAR,SYMBOL_NAME) \ |
| do { \ |
| char *_p; \ |
| char *_name = I386_PE_STRIP_ENCODING (SYMBOL_NAME); \ |
| for (_p = _name; *_p && *_p != '@'; ++_p) \ |
| ; \ |
| if (*_p == '@') \ |
| { \ |
| int _len = _p - _name; \ |
| (VAR) = (char *) alloca (_len + 1); \ |
| strncpy ((VAR), _name, _len); \ |
| (VAR)[_len] = '\0'; \ |
| } \ |
| else \ |
| (VAR) = _name; \ |
| } while (0) |
| |
| |
| /* Output a reference to a label. */ |
| #undef ASM_OUTPUT_LABELREF |
| #define ASM_OUTPUT_LABELREF(STREAM, NAME) \ |
| fprintf (STREAM, "%s%s", USER_LABEL_PREFIX, \ |
| I386_PE_STRIP_ENCODING (NAME)) \ |
| |
| /* Output a common block. */ |
| #undef ASM_OUTPUT_COMMON |
| #define ASM_OUTPUT_COMMON(STREAM, NAME, SIZE, ROUNDED) \ |
| do { \ |
| if (i386_pe_dllexport_name_p (NAME)) \ |
| { \ |
| drectve_section (); \ |
| fprintf ((STREAM), "\t.ascii \" -export:%s\"\n", \ |
| I386_PE_STRIP_ENCODING (NAME)); \ |
| } \ |
| if (! i386_pe_dllimport_name_p (NAME)) \ |
| { \ |
| fprintf ((STREAM), "\t.comm\t"); \ |
| assemble_name ((STREAM), (NAME)); \ |
| fprintf ((STREAM), ", %d\t%s %d\n", \ |
| (ROUNDED), ASM_COMMENT_START, (SIZE)); \ |
| } \ |
| } while (0) |
| |
| /* Output the label for an initialized variable. */ |
| #undef ASM_DECLARE_OBJECT_NAME |
| #define ASM_DECLARE_OBJECT_NAME(STREAM, NAME, DECL) \ |
| do { \ |
| if (i386_pe_dllexport_name_p (NAME)) \ |
| { \ |
| enum in_section save_section = in_section; \ |
| drectve_section (); \ |
| fprintf ((STREAM), "\t.ascii \" -export:%s\"\n", \ |
| I386_PE_STRIP_ENCODING (NAME)); \ |
| switch_to_section (save_section, (DECL)); \ |
| } \ |
| ASM_OUTPUT_LABEL ((STREAM), (NAME)); \ |
| } while (0) |
| |
| |
| /* Emit code to check the stack when allocating more that 4000 |
| bytes in one go. */ |
| |
| #define CHECK_STACK_LIMIT 4000 |
| |
| /* By default, target has a 80387, uses IEEE compatible arithmetic, |
| and returns float values in the 387 and needs stack probes */ |
| #undef TARGET_DEFAULT |
| |
| #define TARGET_DEFAULT \ |
| (MASK_80387 | MASK_IEEE_FP | MASK_FLOAT_RETURNS | MASK_STACK_PROBE) |
| |
| /* This is how to output an assembler line |
| that says to advance the location counter |
| to a multiple of 2**LOG bytes. */ |
| |
| #undef ASM_OUTPUT_ALIGN |
| #define ASM_OUTPUT_ALIGN(FILE,LOG) \ |
| if ((LOG)!=0) fprintf ((FILE), "\t.align %d\n", 1<<(LOG)) |
| |
| /* Define this macro if in some cases global symbols from one translation |
| unit may not be bound to undefined symbols in another translation unit |
| without user intervention. For instance, under Microsoft Windows |
| symbols must be explicitly imported from shared libraries (DLLs). */ |
| #define MULTIPLE_SYMBOL_SPACES |
| |
| #define UNIQUE_SECTION_P(DECL) DECL_ONE_ONLY (DECL) |
| extern void i386_pe_unique_section (); |
| #define UNIQUE_SECTION(DECL,RELOC) i386_pe_unique_section (DECL, RELOC) |
| |
| #define SUPPORTS_ONE_ONLY 1 |
| |
| /* A C statement to output something to the assembler file to switch to section |
| NAME for object DECL which is either a FUNCTION_DECL, a VAR_DECL or |
| NULL_TREE. Some target formats do not support arbitrary sections. Do not |
| define this macro in such cases. */ |
| #undef ASM_OUTPUT_SECTION_NAME |
| #define ASM_OUTPUT_SECTION_NAME(STREAM, DECL, NAME, RELOC) \ |
| do { \ |
| static struct section_info \ |
| { \ |
| struct section_info *next; \ |
| char *name; \ |
| enum sect_enum {SECT_RW, SECT_RO, SECT_EXEC} type; \ |
| } *sections; \ |
| struct section_info *s; \ |
| char *mode; \ |
| enum sect_enum type; \ |
| \ |
| for (s = sections; s; s = s->next) \ |
| if (!strcmp (NAME, s->name)) \ |
| break; \ |
| \ |
| if (DECL && TREE_CODE (DECL) == FUNCTION_DECL) \ |
| type = SECT_EXEC, mode = "x"; \ |
| else if (DECL && DECL_READONLY_SECTION (DECL, RELOC)) \ |
| type = SECT_RO, mode = ""; \ |
| else \ |
| type = SECT_RW, mode = "w"; \ |
| \ |
| if (s == 0) \ |
| { \ |
| s = (struct section_info *) xmalloc (sizeof (struct section_info)); \ |
| s->name = xmalloc ((strlen (NAME) + 1) * sizeof (*NAME)); \ |
| strcpy (s->name, NAME); \ |
| s->type = type; \ |
| s->next = sections; \ |
| sections = s; \ |
| fprintf (STREAM, ".section\t%s,\"%s\"\n", NAME, mode); \ |
| /* Functions may have been compiled at various levels of \ |
| optimization so we can't use `same_size' here. Instead, \ |
| have the linker pick one. */ \ |
| if ((DECL) && DECL_ONE_ONLY (DECL)) \ |
| fprintf (STREAM, "\t.linkonce %s\n", \ |
| TREE_CODE (DECL) == FUNCTION_DECL \ |
| ? "discard" : "same_size"); \ |
| } \ |
| else \ |
| { \ |
| fprintf (STREAM, ".section\t%s,\"%s\"\n", NAME, mode); \ |
| } \ |
| } while (0) |
| |
| /* Write the extra assembler code needed to declare a function |
| properly. If we are generating SDB debugging information, this |
| will happen automatically, so we only need to handle other cases. */ |
| #undef ASM_DECLARE_FUNCTION_NAME |
| #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \ |
| do \ |
| { \ |
| if (i386_pe_dllexport_name_p (NAME)) \ |
| { \ |
| drectve_section (); \ |
| fprintf ((FILE), "\t.ascii \" -export:%s\"\n", \ |
| I386_PE_STRIP_ENCODING (NAME)); \ |
| function_section (DECL); \ |
| } \ |
| if (write_symbols != SDB_DEBUG) \ |
| i386_pe_declare_function_type (FILE, NAME, TREE_PUBLIC (DECL)); \ |
| ASM_OUTPUT_LABEL (FILE, NAME); \ |
| } \ |
| while (0) |
| |
| /* Add an external function to the list of functions to be declared at |
| the end of the file. */ |
| #define ASM_OUTPUT_EXTERNAL(FILE, DECL, NAME) \ |
| do \ |
| { \ |
| if (TREE_CODE (DECL) == FUNCTION_DECL) \ |
| i386_pe_record_external_function (NAME); \ |
| } \ |
| while (0) |
| |
| /* Declare the type properly for any external libcall. */ |
| #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN) \ |
| i386_pe_declare_function_type (FILE, XSTR (FUN, 0), 1) |
| |
| /* Output function declarations at the end of the file. */ |
| #define ASM_FILE_END(FILE) \ |
| i386_pe_asm_file_end (FILE) |
| |
| #undef ASM_COMMENT_START |
| #define ASM_COMMENT_START " #" |
| |
| /* DWARF2 Unwinding doesn't work with exception handling yet. */ |
| #define DWARF2_UNWIND_INFO 0 |
| |
| /* Don't assume anything about the header files. */ |
| #define NO_IMPLICIT_EXTERN_C |
| |
| #define SUBTARGET_PROLOGUE \ |
| if (profile_flag \ |
| && strcmp (IDENTIFIER_POINTER (DECL_NAME (current_function_decl)),\ |
| "main") == 0) \ |
| { \ |
| rtx xops[1]; \ |
| xops[0] = gen_rtx_MEM (FUNCTION_MODE, \ |
| gen_rtx (SYMBOL_REF, Pmode, "_monstartup")); \ |
| if (do_rtl) \ |
| emit_call_insn (gen_rtx (CALL, VOIDmode, xops[0], const0_rtx)); \ |
| else \ |
| output_asm_insn (AS1 (call,%P1), xops); \ |
| } |
| |
| /* External function declarations. */ |
| |
| #ifndef PROTO |
| #if defined (USE_PROTOTYPES) ? USE_PROTOTYPES : defined (__STDC__) |
| #define PROTO(ARGS) ARGS |
| #else |
| #define PROTO(ARGS) () |
| #endif |
| #endif |
| |
| #ifdef BUFSIZ /* stdio.h has been included, ok to use FILE * */ |
| #define STDIO_PROTO(ARGS) PROTO(ARGS) |
| #else |
| #define STDIO_PROTO(ARGS) () |
| #endif |
| |
| extern void i386_pe_record_external_function PROTO((char *)); |
| extern void i386_pe_declare_function_type STDIO_PROTO((FILE *, char *, int)); |
| extern void i386_pe_asm_file_end STDIO_PROTO((FILE *)); |
| |
| /* For Win32 ABI compatibility */ |
| #undef DEFAULT_PCC_STRUCT_RETURN |
| #define DEFAULT_PCC_STRUCT_RETURN 0 |
| |
| /* No data type wants to be aligned rounder than this. */ |
| #undef BIGGEST_ALIGNMENT |
| #define BIGGEST_ALIGNMENT 128 |
| |
| /* A bitfield declared as `int' forces `int' alignment for the struct. */ |
| #undef PCC_BITFIELDS_TYPE_MATTERS |
| #define PCC_BITFIELDS_TYPE_MATTERS 0 |
| |