OSDN Git Service

2006-01-26 Paolo Bonzini <bonzini@gnu.org>
[pf3gnuchains/gcc-fork.git] / gcc / config / mips / iris6.h
index b0b59b6..9e9e002 100644 (file)
@@ -1,5 +1,6 @@
 /* Definitions of target machine for GNU compiler.  IRIX version 6.
-   Copyright (C) 1994, 1995, 1996, 1997, 1998, 2000, 2001, 2002, 2003
+   Copyright (C) 1994, 1995, 1996, 1997, 1998, 2000, 2001, 2002, 2003, 2004,
+   2005
    Free Software Foundation, Inc.
 
 This file is part of GCC.
@@ -16,383 +17,45 @@ GNU General Public License for more details.
 
 You should have received a copy of the GNU General Public License
 along with GCC; see the file COPYING.  If not, write to
-the Free Software Foundation, 59 Temple Place - Suite 330,
-Boston, MA 02111-1307, USA.  */
+the Free Software Foundation, 51 Franklin Street, Fifth Floor,
+Boston, MA 02110-1301, USA.  */
 
-/* Let mips.c know we need the IRIX 6 functions.  */
+/* Allow some special handling for IRIX 6.  */
+#undef TARGET_IRIX6
 #define TARGET_IRIX6 1
 
 /* Default to -mabi=n32 and -mips3.  */
 #undef MULTILIB_DEFAULTS
 #define MULTILIB_DEFAULTS { "mabi=n32" }
 
-/* IRIX 6 assembler does handle DWARF2 directives.  Override setting in
-   iris5.h file.  */
-#undef DWARF2_UNWIND_INFO
-
-/* The IRIX 6 assembler will sometimes assign labels to the wrong
-   section unless the labels are within .ent/.end blocks.  Therefore,
-   we avoid creating such labels.  */
-#define DWARF2_GENERATE_TEXT_SECTION_LABEL 0
-
-/* wchar_t is defined differently with and without -mabi=64.  */
-
-#undef WCHAR_TYPE
-#define WCHAR_TYPE (Pmode == DImode ? "int" : "long int")
-
-#undef WCHAR_TYPE_SIZE
-#define WCHAR_TYPE_SIZE 32
-
-/* Same for wint_t.  */
-
-#undef WINT_TYPE
-#define WINT_TYPE (Pmode == DImode ? "int" : "long int")
-
-#undef WINT_TYPE_SIZE
-#define WINT_TYPE_SIZE 32
-
-/* For IRIX 6, -mabi=64 implies TARGET_LONG64.  */
-/* This is handled in override_options.  */
-
-#undef SUBTARGET_CC1_SPEC
-#define SUBTARGET_CC1_SPEC ""
-
-/* #line directives let the O32 assembler create object files that cause the
-   O32 linker to crash.  */
-#undef SUBTARGET_CPP_SPEC
-#define SUBTARGET_CPP_SPEC "%{mabi=32: %{.S:-P}}"
-
-/* We must pass -D_LONGLONG always, even when -ansi is used, because IRIX 6
-   system header files require it.  This is OK, because gcc never warns
-   when long long is used in system header files.  Alternatively, we can
-   add support for the SGI builtin type __long_long.  */
-
-/* The GNU C++ standard library requires that __EXTENSIONS__ and
-   _SGI_SOURCE be defined on at least IRIX 6.2 and probably all IRIX 6
-   prior to 6.5.  They normally get defined if !ansi, for g++ we want
-   them regardless.  We don't need this on IRIX 6.5 itself, but it
-   shouldn't hurt other than the namespace pollution.  */
-
-/* Undefine because this includes iris5.h.  */
-#undef  TARGET_OS_CPP_BUILTINS
-#define TARGET_OS_CPP_BUILTINS()                       \
-    do {                                               \
-       builtin_define_std ("host_mips");               \
-       builtin_define ("_LONGLONG");                   \
-       builtin_define ("_MODERN_C");                   \
-       builtin_define ("_SVR4_SOURCE");                \
-       builtin_define_std ("SYSTYPE_SVR4");            \
-       builtin_define ("__DSO__");                     \
-       builtin_define_std ("unix");                    \
-       builtin_define_std ("sgi");                     \
-       builtin_assert ("system=svr4");                 \
-       builtin_assert ("system=unix");                 \
-       builtin_assert ("machine=sgi");                 \
-                                                       \
-     if (mips_abi == ABI_32)                           \
-      {                                                        \
-       builtin_define ("_MIPS_SIM=_MIPS_SIM_ABI32");   \
-       builtin_define ("_MIPS_SZLONG=32");             \
-       builtin_define ("_MIPS_SZPTR=32");              \
-      }                                                        \
-     else if (mips_abi == ABI_64)                      \
-      {                                                        \
-       builtin_define ("_ABI64=3");                    \
-       builtin_define ("_MIPS_SIM=_ABI64");            \
-       builtin_define ("_MIPS_SZLONG=64");             \
-       builtin_define ("_MIPS_SZPTR=64");              \
-      }                                                        \
-     else                                              \
-      {                                                        \
-       builtin_define ("_ABIN32=2");                   \
-       builtin_define ("_MIPS_SIM=_ABIN32");           \
-       builtin_define ("_MIPS_SZLONG=32");             \
-       builtin_define ("_MIPS_SZPTR=32");              \
-      }                                                        \
-                                                       \
-     if (!TARGET_FLOAT64)                              \
-       builtin_define ("_MIPS_FPSET=16");              \
-     else                                              \
-       builtin_define ("_MIPS_FPSET=32");              \
-                                                       \
-     if (!TARGET_INT64)                                        \
-       builtin_define ("_MIPS_SZINT=32");              \
-     else                                              \
-       builtin_define ("_MIPS_SZINT=64");              \
-                                                       \
-     if (!ISA_MIPS1 && !ISA_MIPS2)                     \
-       builtin_define ("_COMPILER_VERSION=601");       \
-                                                       \
-     /* IRIX 6.5.18 and above provide many ISO C99     \
-       features protected by the __c99 macro.          \
-       libstdc++ v3 needs them as well.  */            \
-     if ((!c_dialect_cxx () && flag_isoc99)            \
-        || c_dialect_cxx ())                           \
-       builtin_define ("__c99");                       \
-                                                       \
-     if (c_dialect_cxx ())                             \
-      {                                                        \
-       builtin_define ("__EXTENSIONS__");              \
-       builtin_define ("_SGI_SOURCE");                 \
-      }                                                        \
-                                                       \
-     if (!flag_iso)                                    \
-       {                                               \
-        builtin_define ("__EXTENSIONS__");             \
-        builtin_define ("_SGI_SOURCE");                \
-       }                                               \
-} while (0)
-
-/* IRIX 6 uses DWARF-2.  */
-#define DWARF2_DEBUGGING_INFO 1
-#define MIPS_DEBUGGING_INFO 1
-#undef PREFERRED_DEBUGGING_TYPE
-#define PREFERRED_DEBUGGING_TYPE DWARF2_DEBUG
+/* Force the default ABI onto the command line in order to make the specs
+   easier to write.  Default to the mips2 ISA for the O32 ABI.  */
+#define DRIVER_SELF_SPECS \
+  "%{!mabi=*: -mabi=n32}", \
+  "%{mabi=32: %{!mips*: %{!march*: -mips2}}}"
 
 /* Force the generation of dwarf .debug_frame sections even if not
    compiling -g.  This guarantees that we can unwind the stack.  */
 #define DWARF2_FRAME_INFO 1
 
-/* The size in bytes of a DWARF field indicating an offset or length
-   relative to a debug info section, specified to be 4 bytes in the DWARF-2
-   specification.  The SGI/MIPS ABI defines it to be the same as PTR_SIZE.  */
-#define DWARF_OFFSET_SIZE PTR_SIZE
-
-/* The size in bytes of the initial length field in a debug info
-   section.  The DWARF 3 (draft) specification defines this to be
-   either 4 or 12 (with a 4-byte "escape" word when it's 12), but the
-   SGI/MIPS ABI predates this standard and defines it to be the same
-   as DWARF_OFFSET_SIZE.  */
-#define DWARF_INITIAL_LENGTH_SIZE DWARF_OFFSET_SIZE
-
-/* There is no GNU as port for IRIX 6 yet, so we set MD_EXEC_PREFIX so that
-   gcc will automatically find SGI as instead of searching the user's path.
-   The latter can fail when building a cross compiler if the user has . in
-   the path before /usr/bin, since then gcc will find and try to use the link
-   to the cross assembler which can't possibly work.  */
-
-#undef MD_EXEC_PREFIX
-#define MD_EXEC_PREFIX "/usr/bin/"
-
-/* We have no need for MD_STARTFILE_PREFIX.  */
-#undef MD_STARTFILE_PREFIX
+/* The system unwinder in libexc requires a specific dwarf return address
+   column to work.  */
+#undef  DWARF_FRAME_RETURN_COLUMN
+#define DWARF_FRAME_RETURN_COLUMN (FP_REG_LAST + 1)
 
 #undef MACHINE_TYPE
 #define MACHINE_TYPE "SGI running IRIX 6.x"
 
-/* IRIX 5 stuff that we don't need for IRIX 6.  */
-/* ??? We do need this for the -mabi=32 switch though.  */
-#undef ASM_OUTPUT_UNDEF_FUNCTION
-#undef ASM_DECLARE_FUNCTION_SIZE
-
-/* Stuff we need for IRIX 6 that isn't in IRIX 5.  */
-
-/* The SGI assembler doesn't like labels before the .ent, so we must output
-   the .ent and function name here, which is the normal place for it.  */
-
-#undef ASM_DECLARE_FUNCTION_NAME
-#define ASM_DECLARE_FUNCTION_NAME(STREAM, NAME, DECL)                  \
-  do {                                                                 \
-    fputs ("\t.ent\t", STREAM);                                                \
-    assemble_name (STREAM, NAME);                                      \
-    fputs ("\n", STREAM);                                              \
-    assemble_name (STREAM, NAME);                                      \
-    fputs (":\n", STREAM);                                             \
-  } while (0)
-
-/* Likewise, the SGI assembler doesn't like labels after the .end, so we
-   must output the .end here.  */
-#define ASM_DECLARE_FUNCTION_SIZE(STREAM, NAME, DECL)                  \
-  do {                                                                 \
-    fputs ("\t.end\t", STREAM);                                                \
-    assemble_name (STREAM, NAME);                                      \
-    fputs ("\n", STREAM);                                              \
-  } while (0)
-
-/* Tell function_prologue in mips.c that we have already output the .ent/.end
-   pseudo-ops.  */
-#define FUNCTION_NAME_ALREADY_DECLARED
-
-#undef SET_ASM_OP      /* Has no equivalent.  See ASM_OUTPUT_DEF below.  */
-
-#if 0
-/* This is *NOT* how to equate one symbol to another symbol.  The assembler
-   '=' syntax just equates a name to a constant expression.
-   See ASM_OUTPUT_WEAK_ALIAS.  */
-
-#define ASM_OUTPUT_DEF(FILE,LABEL1,LABEL2)                             \
- do {  fprintf ((FILE), "\t");                                         \
-       assemble_name (FILE, LABEL1);                                   \
-       fprintf (FILE, " = ");                                          \
-       assemble_name (FILE, LABEL2);                                   \
-       fprintf (FILE, "\n");                                           \
-  } while (0)
+#ifdef IRIX_USING_GNU_LD
+#define IRIX_SUBTARGET_LINK_SPEC \
+  "%{mabi=32: -melf32bsmip}%{mabi=n32: -melf32bmipn32}%{mabi=64: -melf64bmip}"
+#else
+#define IRIX_SUBTARGET_LINK_SPEC \
+  "%{w} -_SYSTYPE_SVR4 -woff 131 \
+   %{mabi=32: -32}%{mabi=n32: -n32}%{mabi=64: -64}%{!mabi*: -n32}"
 #endif
 
-/* Define the strings used for the special svr4 .type and .size directives.  */
-
-#define TYPE_ASM_OP    "\t.type\t"
-#define SIZE_ASM_OP    "\t.size\t"
-
-/* IRIX assembler does not support the init_priority C++ attribute.  */
-#undef SUPPORTS_INIT_PRIORITY
-#define SUPPORTS_INIT_PRIORITY 0
-
-/* A linker error can empirically be avoided by removing duplicate
-   library search directories.  */
-#define LINK_ELIMINATE_DUPLICATE_LDIRECTORIES 1
-
-#define POPSECTION_ASM_OP      "\t.popsection"
-
-/* ??? If no mabi=X option give, but a mipsX option is, then should depend
-   on the mipsX option.  */
-/* If no mips[3,4] option given, give the appropriate default for mabi=X */
-#undef SUBTARGET_ASM_SPEC
-#define SUBTARGET_ASM_SPEC "%{!mabi*:-n32} %{!mips*: %{!mabi*:-mips3} %{mabi=n32|mabi=64:-mips3}}"
-
-/* Must pass -g0 to the assembler, otherwise it may overwrite our
-   debug info with its own debug info.  */
-/* Must pass -show instead of -v.  */
-/* Must pass -G 0 to the assembler, otherwise we may get warnings about
-   GOT overflow.  */
-/* ??? We pass -w to disable all assembler warnings.  The `label should be
-   inside .ent/.end block' warning that we get for DWARF II debug info labels
-   is particularly annoying.  */
-#undef SUBTARGET_MIPS_AS_ASM_SPEC
-#define SUBTARGET_MIPS_AS_ASM_SPEC "%{v:-show} -G 0 -w"
-
-#undef SUBTARGET_ASM_DEBUGGING_SPEC
-#define SUBTARGET_ASM_DEBUGGING_SPEC "-g0"
-
-/* The MIPS assembler occasionally misoptimizes.  Since GCC should be
-   doing scheduling anyhow, just turn off optimization in the assembler.  */
-#undef SUBTARGET_ASM_OPTIMIZING_SPEC
-#define SUBTARGET_ASM_OPTIMIZING_SPEC "-O0"
-
-/* The assembler now accepts .section pseudo-ops, but it does not allow
-   one to change the section in the middle of a function, so we can't use
-   the INIT_SECTION_ASM_OP code in crtstuff.  But we can build up the ctor
-   and dtor lists this way, so we use -init and -fini to invoke the
-   do_global_* functions instead of running collect2.  */
-
-#define BSS_SECTION_ASM_OP     "\t.section\t.bss"
-
-#undef READONLY_DATA_SECTION_ASM_OP
-#define READONLY_DATA_SECTION_ASM_OP_32        "\t.rdata"
-#define READONLY_DATA_SECTION_ASM_OP_64        "\t.section\t.rodata"
-#define READONLY_DATA_SECTION_ASM_OP           \
-  (mips_abi != ABI_32 && mips_abi != ABI_O64   \
-   ? READONLY_DATA_SECTION_ASM_OP_64           \
-   : READONLY_DATA_SECTION_ASM_OP_32)
-
-/* Define functions to read the name and flags of the current section.
-   They are used by iris6_asm_output_align.  */
-
-#undef EXTRA_SECTION_FUNCTIONS
-#define EXTRA_SECTION_FUNCTIONS                                                \
-const char *                                                           \
-current_section_name (void)                                            \
-{                                                                      \
-  switch (in_section)                                                  \
-    {                                                                  \
-    case no_section:   return NULL;                                    \
-    case in_text:      return ".text";                                 \
-    case in_data:      return ".data";                                 \
-    case in_bss:       return ".bss";                                  \
-    case in_readonly_data:                                             \
-      if (mips_abi != ABI_32 && mips_abi != ABI_O64)                   \
-       return ".rodata";                                               \
-      else                                                             \
-       return ".rdata";                                                \
-    case in_named:                                                     \
-      return in_named_name;                                            \
-    }                                                                  \
-  abort ();                                                            \
-}                                                                      \
-                                                                       \
-unsigned int                                                           \
-current_section_flags (void)                                           \
-{                                                                      \
-  switch (in_section)                                                  \
-    {                                                                  \
-    case no_section:   return 0;                                       \
-    case in_text:      return SECTION_CODE;                            \
-    case in_data:      return SECTION_WRITE;                           \
-    case in_bss:       return SECTION_WRITE | SECTION_BSS;             \
-    case in_readonly_data: return 0;                                   \
-    case in_named:     return get_named_section_flags (in_named_name); \
-    }                                                                  \
-  abort ();                                                            \
-}
-
-/* Switch into a generic section.  */
-#undef TARGET_ASM_NAMED_SECTION
-#define TARGET_ASM_NAMED_SECTION  iris6_asm_named_section
-
-/* SGI assembler needs all sorts of extra help to do alignment properly.  */
-#undef ASM_OUTPUT_ALIGN
-#define ASM_OUTPUT_ALIGN iris6_asm_output_align
-
-#undef MAX_OFILE_ALIGNMENT
-#define MAX_OFILE_ALIGNMENT (32768*8)
-
-/* ??? SGI assembler may core dump when compiling with -g.
-   Sometimes as succeeds, but then we get a linker error. (cmds.c in 072.sc)
-   Getting rid of .file solves both problems.  */
-#undef ASM_OUTPUT_FILENAME
-#define ASM_OUTPUT_FILENAME(STREAM, NUM_SOURCE_FILENAMES, NAME) \
-do                                                             \
-  {                                                            \
-    fprintf (STREAM, "\t#.file\t%d ", NUM_SOURCE_FILENAMES);   \
-    output_quoted_string (STREAM, NAME);                       \
-    fputs ("\n", STREAM);                                      \
-  }                                                            \
-while (0)
-
-/* ??? SGI assembler gives warning whenever .lcomm is used.  */
-#undef ASM_OUTPUT_LOCAL
-#define ASM_OUTPUT_ALIGNED_LOCAL(STREAM, NAME, SIZE, ALIGN)               \
-do                                                                        \
-  {                                                                       \
-    if (mips_abi != ABI_32 && mips_abi != ABI_O64)                        \
-      {                                                                           \
-       bss_section ();                                                    \
-       mips_declare_object (STREAM, NAME, "", ":\n", 0);                  \
-       ASM_OUTPUT_ALIGN (STREAM, floor_log2 (ALIGN / BITS_PER_UNIT));     \
-       ASM_OUTPUT_SKIP (STREAM, SIZE);                                    \
-      }                                                                           \
-    else                                                                  \
-      mips_declare_object (STREAM, NAME, "\n\t.lcomm\t", ",%u\n", (int)(SIZE)); \
-  }                                                                       \
-while (0)
-
-/* A C statement (sans semicolon) to output to the stdio stream
-   FILE the assembler definition of uninitialized global DECL named
-   NAME whose size is SIZE bytes and alignment is ALIGN bytes.
-   Try to use asm_output_aligned_bss to implement this macro.  */
-
-#define ASM_OUTPUT_ALIGNED_BSS(FILE, DECL, NAME, SIZE, ALIGN) \
-  asm_output_aligned_bss (FILE, DECL, NAME, SIZE, ALIGN)
-
-/* Define the `__builtin_va_list' type for the ABI.  On IRIX 6, this
-   type is `char *'.  */
-#undef BUILD_VA_LIST_TYPE
-#define BUILD_VA_LIST_TYPE(VALIST) \
-  (VALIST) = build_pointer_type (char_type_node)
-
-#undef ASM_DECLARE_OBJECT_NAME
-#define ASM_DECLARE_OBJECT_NAME mips_declare_object_name
-
-#undef ASM_FINISH_DECLARE_OBJECT
-#define ASM_FINISH_DECLARE_OBJECT mips_finish_declare_object
-
-#undef LOCAL_LABEL_PREFIX
-#define LOCAL_LABEL_PREFIX ((mips_abi == ABI_32 || mips_abi == ABI_O64) \
-                           ? "$" : ".")
-
 /* Profiling is supported via libprof1.a not -lc_p as in IRIX 3.  */
-/* ??? If no mabi=X option give, but a mipsX option is, then should depend
-   on the mipsX option.  */
 #undef STARTFILE_SPEC
 #define STARTFILE_SPEC \
   "%{!shared: \
@@ -411,15 +74,16 @@ while (0)
            %{!p:/usr/lib64/mips4/crt1.o}}} \
        %{!mips4:%{pg:/usr/lib64/mips3/gcrt1.o} \
          %{!pg:%{p:/usr/lib64/mips3/mcrt1.o /usr/lib64/mips3/libprof1.a} \
-           %{!p:/usr/lib64/mips3/crt1.o}}}} \
-     %{!mabi*: \
-       %{mips4:%{pg:/usr/lib32/mips4/gcrt1.o%s} \
-         %{!pg:%{p:/usr/lib32/mips4/mcrt1.o%s /usr/lib32/mips4/libprof1.a%s} \
-           %{!p:/usr/lib32/mips4/crt1.o%s}}} \
-       %{!mips4:%{pg:/usr/lib32/mips3/gcrt1.o%s} \
-         %{!pg:%{p:/usr/lib32/mips3/mcrt1.o%s /usr/lib32/mips3/libprof1.a%s} \
-           %{!p:/usr/lib32/mips3/crt1.o%s}}}}} \
-   crtbegin.o%s"
+           %{!p:/usr/lib64/mips3/crt1.o}}}}} \
+  irix-crti.o%s crtbegin.o%s"
+
+#ifdef IRIX_USING_GNU_LD
+#define SUBTARGET_DONT_WARN_UNUSED_SPEC ""
+#define SUBTARGET_WARN_UNUSED_SPEC ""
+#else
+#define SUBTARGET_DONT_WARN_UNUSED_SPEC "-dont_warn_unused"
+#define SUBTARGET_WARN_UNUSED_SPEC "-warn_unused"
+#endif
 
 #undef LIB_SPEC
 #define LIB_SPEC \
@@ -427,40 +91,24 @@ while (0)
      -L/usr/lib32} \
    %{mabi=64: %{mips4:-L/usr/lib64/mips4} %{!mips4:-L/usr/lib64/mips3} \
      -L/usr/lib64} \
-   %{!mabi*: %{mips4:-L/usr/lib32/mips4} %{!mips4:-L/usr/lib32/mips3} \
-     -L/usr/lib32} \
-   %{!shared: \
-     -dont_warn_unused %{p:libprof1.a%s}%{pg:libprof1.a%s} -lc -warn_unused}"
+   %{!shared:" \
+     SUBTARGET_DONT_WARN_UNUSED_SPEC \
+     " %{p:libprof1.a%s}%{pg:libprof1.a%s} -lc " \
+     SUBTARGET_WARN_UNUSED_SPEC "}"
 
 /* Avoid getting two warnings for libgcc.a everytime we link.  */
 #undef LIBGCC_SPEC
-#define LIBGCC_SPEC "-dont_warn_unused -lgcc -warn_unused"
+#define LIBGCC_SPEC \
+  SUBTARGET_DONT_WARN_UNUSED_SPEC " -lgcc " SUBTARGET_WARN_UNUSED_SPEC
 
-/* ??? If no mabi=X option give, but a mipsX option is, then should depend
-   on the mipsX option.  */
 #undef ENDFILE_SPEC
 #define ENDFILE_SPEC \
-  "crtend.o%s \
+  "crtend.o%s irix-crtn.o%s \
    %{!shared: \
      %{mabi=32:crtn.o%s}\
      %{mabi=n32:%{mips4:/usr/lib32/mips4/crtn.o%s}\
        %{!mips4:/usr/lib32/mips3/crtn.o%s}}\
      %{mabi=64:%{mips4:/usr/lib64/mips4/crtn.o%s}\
-       %{!mips4:/usr/lib64/mips3/crtn.o%s}}\
-     %{!mabi*:%{mips4:/usr/lib32/mips4/crtn.o%s}\
-       %{!mips4:/usr/lib32/mips3/crtn.o%s}}}"
-
-/* ??? If no mabi=X option give, but a mipsX option is, then should depend
-   on the mipsX option.  */
-#undef LINK_SPEC
-#define LINK_SPEC "\
-%{G*} %{EB} %{EL} %{mips1} %{mips2} %{mips3} %{mips4} \
-%{bestGnum} %{shared} %{non_shared} \
-%{call_shared} %{no_archive} %{exact_version} %{w} \
-%{!shared: %{!non_shared: %{!call_shared: -call_shared -no_unresolved}}} \
-%{rpath} -init __do_global_ctors -fini __do_global_dtors \
-%{shared:-hidden_symbol __do_global_ctors,__do_global_ctors_1,__do_global_dtors} \
--_SYSTYPE_SVR4 -woff 131 \
-%{mabi=32: -32}%{mabi=n32: -n32}%{mabi=64: -64}%{!mabi*: -n32}"
+       %{!mips4:/usr/lib64/mips3/crtn.o%s}}}"
 
 #define MIPS_TFMODE_FORMAT mips_extended_format