FSF GCC version 2.7.2

1 files changed, 274 insertions, 0 deletions

diff --git a/gnu/usr.bin/gcc/config/rs6000/netware.h b/gnu/usr.bin/gcc/config/rs6000/netware.h
new file mode 100644
index 00000000000..8e86a3438dd
--- /dev/null
+++ b/gnu/usr.bin/gcc/config/rs6000/netware.h
@@ -0,0 +1,274 @@
+/* Core target definitions for GNU compiler
+   for IBM RS/6000 PowerPC running NetWare
+   Copyright (C) 1994 Free Software Foundation, Inc.
+   Contributed by Cygnus Support.
+
+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, 675 Mass Ave, Cambridge, MA 02139, USA.  */
+
+#include "rs6000/powerpc.h"
+
+/* Don't generate XCOFF debugging information.  */
+
+#undef XCOFF_DEBUGGING_INFO
+
+/* Don't use the COFF object file format.  */
+
+#undef OBJECT_FORMAT_COFF
+
+/* The XCOFF support uses weird symbol suffixes, which we don't want
+   for ELF.  */
+
+#undef RS6000_OUTPUT_BASENAME
+#define RS6000_OUTPUT_BASENAME(FILE, NAME) assemble_name (FILE, NAME)
+
+/* Don't bother to output .extern pseudo-ops.  They are not needed by
+   ELF assemblers.  */
+
+#undef ASM_OUTPUT_EXTERNAL
+
+/* Undefine some things which are defined by the generic svr4.h.  */
+
+#undef ASM_FILE_END
+#undef ASM_OUTPUT_EXTERNAL_LIBCALL
+#undef READONLY_DATA_SECTION
+#undef SELECT_SECTION
+#undef ASM_DECLARE_FUNCTION_NAME
+
+/* Use the regular svr4 definitions.  */
+
+#include "svr4.h"
+#include "netware.h"
+
+/* Create a function descriptor when we declare a function name.  This
+   is a mixture of the ASM_DECLARE_FUNCTION_NAME macros in rs6000.h
+   and svr4.h.  The unmodified function name is used to name the
+   descriptor.  The function name with an initial `.' is used to name
+   the code.  */
+
+#undef ASM_DECLARE_FUNCTION_NAME
+#define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)			\
+  do {									\
+    fprintf (FILE, "\t%s\t ", TYPE_ASM_OP);				\
+    assemble_name (FILE, NAME);						\
+    putc (',', FILE);							\
+    fprintf (FILE, TYPE_OPERAND_FMT, "function");			\
+    putc ('\n', FILE);							\
+    ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL));			\
+    if (TREE_PUBLIC (DECL))						\
+      {									\
+        fprintf (FILE, "\t.globl .");					\
+	assemble_name (FILE, NAME);					\
+        fprintf (FILE, "\n");						\
+      }									\
+    data_section ();							\
+    ASM_OUTPUT_ALIGN (FILE, 2);						\
+    ASM_OUTPUT_LABEL (FILE, NAME);					\
+    fprintf (FILE, "\t.long .");					\
+    assemble_name (FILE, NAME);						\
+    fprintf (FILE, ", __GOT0, 0\n");					\
+    text_section ();							\
+    fprintf (FILE, ".");						\
+    ASM_OUTPUT_LABEL (FILE, NAME);					\
+  } while (0)
+
+/* We need to override the .size output in order to put a `.' before
+   the function name.  */
+
+#undef ASM_DECLARE_FUNCTION_SIZE
+#define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL)			\
+  do {									\
+    if (!flag_inhibit_size_directive)					\
+      {									\
+        char label[256];						\
+	static int labelno;						\
+	labelno++;							\
+	ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno);		\
+	ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno);		\
+	fprintf (FILE, "\t%s\t ", SIZE_ASM_OP);				\
+	assemble_name (FILE, (FNAME));					\
+        fprintf (FILE, ",");						\
+	assemble_name (FILE, label);					\
+        fprintf (FILE, "-.");						\
+	assemble_name (FILE, (FNAME));					\
+	putc ('\n', FILE);						\
+      }									\
+  } while (0)
+
+/* Use ELF style section commands.  */
+
+#undef TEXT_SECTION_ASM_OP
+#define TEXT_SECTION_ASM_OP	"\t.section\t\".text\""
+
+#undef DATA_SECTION_ASM_OP
+#define DATA_SECTION_ASM_OP	"\t.section\t\".data\""
+
+/* Besides the usual ELF sections, we need a toc section.  */
+
+#undef EXTRA_SECTIONS
+#define EXTRA_SECTIONS in_const, in_ctors, in_dtors, in_toc
+
+#undef EXTRA_SECTION_FUNCTIONS
+#define EXTRA_SECTION_FUNCTIONS						\
+  CONST_SECTION_FUNCTION						\
+  CTORS_SECTION_FUNCTION						\
+  DTORS_SECTION_FUNCTION						\
+  TOC_SECTION_FUNCTION
+
+#define TOC_SECTION_FUNCTION						\
+void									\
+toc_section ()								\
+{									\
+  if (TARGET_MINIMAL_TOC)						\
+    {									\
+      static int toc_initialized = 0;					\
+									\
+      if (! toc_initialized)						\
+	{								\
+	  fprintf (asm_out_file, "%s\n", TOC_SECTION_ASM_OP);		\
+	  fprintf (asm_out_file, ".LCTOC0:\n");				\
+	  fprintf (asm_out_file, "\t.tc .LCTOC1\n");			\
+	  fprintf (asm_out_file, "%s\n", MINIMAL_TOC_SECTION_ASM_OP);	\
+	  fprintf (asm_out_file, ".LCTOC1:\n");				\
+	  toc_initialized = 1;						\
+	}								\
+    }									\
+									\
+  if (in_section != in_toc)						\
+    {									\
+      fprintf (asm_out_file, "%s\n",					\
+	       (TARGET_MINIMAL_TOC					\
+		? MINIMAL_TOC_SECTION_ASM_OP				\
+		: TOC_SECTION_ASM_OP));					\
+      in_section = in_toc;						\
+    }									\
+}
+
+#define TOC_SECTION_ASM_OP "\t.section\t.got,\"aw\""
+#define MINIMAL_TOC_SECTION_ASM_OP "\t.section\t.got1,\"aw\""
+
+/* Use the TOC section for TOC entries.  */
+
+#undef SELECT_RTX_SECTION
+#define SELECT_RTX_SECTION(MODE, X)		\
+{ if (ASM_OUTPUT_SPECIAL_POOL_ENTRY_P (X))	\
+    toc_section ();				\
+  else						\
+    const_section ();				\
+}
+
+/* How to renumber registers for dbx and gdb.  */
+
+#define DBX_REGISTER_NUMBER(REGNO) (REGNO)
+
+/* svr4.h overrides ASM_OUTPUT_INTERNAL_LABEL.  */
+
+#undef ASM_OUTPUT_INTERNAL_LABEL_PREFIX
+#define ASM_OUTPUT_INTERNAL_LABEL_PREFIX(FILE,PREFIX)	\
+  fprintf (FILE, ".%s", PREFIX)
+
+/* Pass -m601 to the assembler, since that is what powerpc.h currently
+   implies.  */
+#undef ASM_SPEC
+#define ASM_SPEC \
+  "-u -m601 %{V} %{v:%{!V:-V}} %{Qy:} %{!Qn:-Qy} %{n} %{T} %{Ym,*} %{Yd,*} %{Wa,*:%*}"
+/* This is the end of what might become sysv4.h.  */
+
+/* Enable output of DBX (stabs) debugging information when asked for it.  */
+
+#define DBX_DEBUGGING_INFO
+
+/* Prefer DBX (stabs) debugging information over the native (DWARF) format. */
+
+#undef PREFERRED_DEBUGGING_TYPE
+#define PREFERRED_DEBUGGING_TYPE DBX_DEBUG
+
+/* Line numbers are relative to the current function.  */
+
+#undef  ASM_OUTPUT_SOURCE_LINE
+#define ASM_OUTPUT_SOURCE_LINE(file, line)		\
+  { static int sym_lineno = 1;				\
+    fprintf (file, ".stabn 68,0,%d,.LM%d-.%s\n.LM%d:\n",\
+	     line, sym_lineno, 				\
+	     XSTR (XEXP (DECL_RTL (current_function_decl), 0), 0), \
+	     sym_lineno);				\
+    sym_lineno += 1; }
+
+/* But, to make this work, we have to output the stabs for the function
+   name *first*...  */
+
+#define	DBX_FUNCTION_FIRST
+
+/* We need to output LBRAC and RBRAC lines specially to include the
+   dot in from of the text symbol for a function.  */
+
+#define DBX_OUTPUT_LBRAC(FILE, BUF)					   \
+do									   \
+  {									   \
+    fprintf (FILE, "%s %d,0,0,", ASM_STABN_OP, N_LBRAC);		   \
+    assemble_name (FILE, BUF);						   \
+    fprintf (FILE, "-.");						   \
+    assemble_name (asmfile,						   \
+		   XSTR (XEXP (DECL_RTL (current_function_decl), 0), 0));  \
+    fprintf (asmfile, "\n");						   \
+  }									   \
+while (0)
+
+#define DBX_OUTPUT_RBRAC(FILE, BUF)					   \
+do									   \
+  {									   \
+    fprintf (FILE, "%s %d,0,0,", ASM_STABN_OP, N_RBRAC);		   \
+    assemble_name (FILE, BUF);						   \
+    fprintf (FILE, "-.");						   \
+    assemble_name (asmfile,						   \
+		   XSTR (XEXP (DECL_RTL (current_function_decl), 0), 0));  \
+    fprintf (asmfile, "\n");						   \
+  }									   \
+while (0)
+
+/* We are using function descriptors, so the value of a function
+   symbol is in the .data section.  However, we want the stabs entry
+   for that function to point at the actual function code in the .text
+   section, which we get by prefixing the symbol with a dot.  */
+
+#define DBX_FINISH_SYMBOL(sym)						\
+do {									\
+  int line = 0;								\
+  if (use_gnu_debug_info_extensions && sym != 0)			\
+    line = DECL_SOURCE_LINE (sym);					\
+									\
+  fprintf (asmfile, "\",%d,0,%d,", current_sym_code, line);		\
+  if (current_sym_addr)							\
+    {									\
+      if (TREE_CODE (sym) == FUNCTION_DECL)				\
+	fprintf (asmfile, ".");						\
+      output_addr_const (asmfile, current_sym_addr);			\
+    }									\
+  else									\
+    fprintf (asmfile, "%d", current_sym_value);				\
+  putc ('\n', asmfile);							\
+} while (0)
+
+/* This is the end of what might become sysv4dbx.h.  */
+
+#undef TARGET_VERSION
+#define TARGET_VERSION fprintf (stderr, " (PowerPC Netware)");
+
+/* FIXME: These should actually indicate PowerPC, when there is some
+   standard way of expressing that.  */
+#undef CPP_PREDEFINES
+#define CPP_PREDEFINES \
+  "-DPPC D__netware__ -Asystem(netware) -Acpu(powerpc) -Amachine(powerpc)"