Add support for OpenRISC 32-bit embedded processor

[deliverable/binutils-gdb.git] / ld / ldemul.c

diff --git a/ld/ldemul.c b/ld/ldemul.c
index eafe26c54c80bbe4d5643725377d1d5bfeef3b44..6b96204183e372b1ef714bae13c072d6c95b5189 100644 (file)
--- a/ld/ldemul.c
+++ b/ld/ldemul.c
@@ -1,10 +1,12 @@
-/* Copyright (C) 1991 Free Software Foundation, Inc.
+/* ldemul.c -- clearing house for ld emulation states
+   Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 2000
+   Free Software Foundation, Inc.

 
 This file is part of GLD, the Gnu Linker.
 
 GLD is free software; you can redistribute it and/or modify
 it under the terms of the GNU General Public License as published by
 
 This file is part of GLD, the Gnu Linker.
 
 GLD 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 1, or (at your option)
+the Free Software Foundation; either version 2, or (at your option)

 any later version.
 
 GLD is distributed in the hope that it will be useful,
 any later version.
 
 GLD is distributed in the hope that it will be useful,


@@ -13,135 +15,296 @@ 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
 GNU General Public License for more details.
 
 You should have received a copy of the GNU General Public License

-along with GLD; see the file COPYING.  If not, write to
-the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
-
-/*
- * $Id$ 
- */
-
-/*
- * clearing house for ld emulation states 
- */
+along with GLD; see the file COPYING.  If not, write to the Free
+Software Foundation, 59 Temple Place - Suite 330, Boston, MA
+02111-1307, USA.  */

 
 #include "bfd.h"
 #include "sysdep.h"
 
 
 #include "bfd.h"
 #include "sysdep.h"
 

-#include "config.h"

 #include "ld.h"
 #include "ld.h"

-#include "ldemul.h"

 #include "ldmisc.h"
 #include "ldmisc.h"

+#include "ldexp.h"
+#include "ldlang.h"
+#include "ldfile.h"
+#include "ldemul.h"
+#include "ldmain.h"
+#include "ldemul-list.h"

 
 

-extern ld_emulation_xfer_type ld_lnk960_emulation;
-extern ld_emulation_xfer_type ld_gldm88kbcs_emulation;
-extern ld_emulation_xfer_type ld_gld_emulation;
-extern ld_emulation_xfer_type ld_vanilla_emulation;
-extern ld_emulation_xfer_type ld_gld68k_emulation;
-extern ld_emulation_xfer_type ld_gld960_emulation;
-extern ld_emulation_xfer_type ld_gld29k_emulation;
-extern ld_emulation_xfer_type ld_gldnews_emulation;
-extern ld_emulation_xfer_type ld_h8300hds_emulation;
+ld_emulation_xfer_type *ld_emulation;

 
 

+void
+ldemul_hll (name)
+     char *name;
+{
+  ld_emulation->hll (name);
+}

 
 

-ld_emulation_xfer_type *ld_emulation;
+void
+ldemul_syslib (name)
+     char *name;
+{
+  ld_emulation->syslib (name);
+}

 
 void
 
 void

-ldemul_hll(name)
-char *name;
+ldemul_after_parse ()

 {
 {

-  ld_emulation->hll(name);
+  ld_emulation->after_parse ();

 }
 
 }
 

+void
+ldemul_before_parse ()
+{
+  ld_emulation->before_parse ();
+}

 
 

-void ldemul_syslib(name)
-char *name;
+void
+ldemul_after_open ()

 {
 {

-  ld_emulation->syslib(name);
+  ld_emulation->after_open ();

 }
 
 void
 }
 
 void

-ldemul_after_parse()
+ldemul_after_allocation ()

 {
 {

-  ld_emulation->after_parse();
+  ld_emulation->after_allocation ();

 }
 
 void
 }
 
 void

-ldemul_before_parse()
+ldemul_before_allocation ()

 {
 {

-  ld_emulation->before_parse();
+  if (ld_emulation->before_allocation)
+    ld_emulation->before_allocation ();

 }
 
 }
 

-void 
-ldemul_after_allocation()
+void
+ldemul_set_output_arch ()

 {
 {

-  ld_emulation->after_allocation();
+  ld_emulation->set_output_arch ();

 }
 
 }
 

-void 
-ldemul_before_allocation()
+void
+ldemul_finish ()

 {
 {

-  if (ld_emulation->before_allocation) {
-    ld_emulation->before_allocation();
-  }
+  if (ld_emulation->finish)
+    ld_emulation->finish ();

 }
 
 }
 

+void
+ldemul_set_symbols ()
+{
+  if (ld_emulation->set_symbols)
+    ld_emulation->set_symbols ();
+}

 
 void
 
 void

-ldemul_set_output_arch()
+ldemul_create_output_section_statements ()

 {
 {

-  ld_emulation->set_output_arch();
+  if (ld_emulation->create_output_section_statements)
+    ld_emulation->create_output_section_statements ();

 }
 
 char *
 }
 
 char *

-ldemul_choose_target()
+ldemul_get_script (isfile)
+     int *isfile;
+{
+  return ld_emulation->get_script (isfile);
+}
+
+boolean
+ldemul_open_dynamic_archive (arch, search, entry)
+     const char *arch;
+     search_dirs_type *search;
+     lang_input_statement_type *entry;

 {
 {

-  return ld_emulation->choose_target();
+  if (ld_emulation->open_dynamic_archive)
+    return (*ld_emulation->open_dynamic_archive) (arch, search, entry);
+  return false;
+}
+
+boolean
+ldemul_place_orphan (file, s)
+     lang_input_statement_type *file;
+     asection *s;
+{
+  if (ld_emulation->place_orphan)
+    return (*ld_emulation->place_orphan) (file, s);
+  return false;
+}
+
+int
+ldemul_parse_args (argc, argv)
+     int argc;
+     char **argv;
+{
+  /* Try and use the emulation parser if there is one.  */
+  if (ld_emulation->parse_args)
+    {
+      return ld_emulation->parse_args (argc, argv);
+    }
+  return 0;
+}
+
+/* Let the emulation code handle an unrecognized file.  */
+
+boolean
+ldemul_unrecognized_file (entry)
+     lang_input_statement_type *entry;
+{
+  if (ld_emulation->unrecognized_file)
+    return (*ld_emulation->unrecognized_file) (entry);
+  return false;
+}
+
+/* Let the emulation code handle a recognized file.  */
+
+boolean
+ldemul_recognized_file (entry)
+     lang_input_statement_type *entry;
+{
+  if (ld_emulation->recognized_file)
+    return (*ld_emulation->recognized_file) (entry);
+  return false;

 }
 
 char *
 }
 
 char *

-ldemul_get_script()
-{
-  return ld_emulation->get_script();
-}
-
-void
-ldemul_choose_mode(target)
-char *target;
-{
-  if (strcmp(target,LNK960_EMULATION_NAME)==0) {
-    ld_emulation = &ld_lnk960_emulation;
-  }
-  else if (strcmp(target,GLD960_EMULATION_NAME)==0) {
-    ld_emulation = &ld_gld960_emulation;
-  }
-  else if (strcmp(target,GLDM88KBCS_EMULATION_NAME)==0) {
-    ld_emulation = &ld_gldm88kbcs_emulation;
-  }
-#ifndef GNU960
-  else if (strcmp(target,GLD_EMULATION_NAME)==0) {
-    ld_emulation = &ld_gld_emulation;
-  }
-  else if (strcmp(target,VANILLA_EMULATION_NAME)==0) {
-    ld_emulation = &ld_vanilla_emulation;
-  }
-  else if (strcmp(target,H8300HDS_EMULATION_NAME)==0) {
-    ld_emulation = &ld_h8300hds_emulation;
-  }
-
-  else if (strcmp(target,GLD68K_EMULATION_NAME)==0) {
-    ld_emulation = &ld_gld68k_emulation;
-  }
-  else if (strcmp(target,GLD29K_EMULATION_NAME)==0) {
-    ld_emulation = &ld_gld29k_emulation;       
-  }
-  else if (strcmp(target,GLDNEWS_EMULATION_NAME)==0) {
-    ld_emulation = &ld_gldnews_emulation;      
-  }
-#endif
-  else {
-    info("%P%F unrecognised emulation mode: %s\n",target);
-  }
+ldemul_choose_target (argc, argv)
+      int argc;
+      char **argv;
+{
+  return ld_emulation->choose_target (argc, argv);

 }
 
 
 }
 
 

+/* The default choose_target function.  */
+
+char *
+ldemul_default_target (argc, argv)
+     int argc ATTRIBUTE_UNUSED;
+     char **argv ATTRIBUTE_UNUSED;
+{
+  char *from_outside = getenv (TARGET_ENVIRON);
+  if (from_outside != (char *) NULL)
+    return from_outside;
+  return ld_emulation->target_name;
+}
+
+void
+after_parse_default ()
+{
+}

 
 

+void
+after_open_default ()
+{
+}
+
+void
+after_allocation_default ()
+{
+}
+
+void
+before_allocation_default ()
+{
+}
+
+void
+set_output_arch_default ()
+{
+  /* Set the output architecture and machine if possible.  */
+  bfd_set_arch_mach (output_bfd,
+                    ldfile_output_architecture, ldfile_output_machine);
+}
+
+void
+syslib_default (ignore)
+     char *ignore ATTRIBUTE_UNUSED;
+{
+  info_msg (_("%S SYSLIB ignored\n"));
+}
+
+void
+hll_default (ignore)
+     char *ignore ATTRIBUTE_UNUSED;
+{
+  info_msg (_("%S HLL ignored\n"));
+}
+
+ld_emulation_xfer_type *ld_emulations[] = { EMULATION_LIST };
+
+void
+ldemul_choose_mode (target)
+     char *target;
+{
+  ld_emulation_xfer_type **eptr = ld_emulations;
+  /* Ignore "gld" prefix.  */
+  if (target[0] == 'g' && target[1] == 'l' && target[2] == 'd')
+    target += 3;
+  for (; *eptr; eptr++)
+    {
+      if (strcmp (target, (*eptr)->emulation_name) == 0)
+       {
+         ld_emulation = *eptr;
+         return;
+       }
+    }
+  einfo (_("%P: unrecognised emulation mode: %s\n"), target);
+  einfo (_("Supported emulations: "));
+  ldemul_list_emulations (stderr);
+  einfo ("%F\n");
+}
+
+void
+ldemul_list_emulations (f)
+     FILE *f;
+{
+  ld_emulation_xfer_type **eptr = ld_emulations;
+  boolean first = true;
+
+  for (; *eptr; eptr++)
+    {
+      if (first)
+       first = false;
+      else
+       fprintf (f, " ");
+      fprintf (f, "%s", (*eptr)->emulation_name);
+    }
+}
+
+void
+ldemul_list_emulation_options (f)
+     FILE *f;
+{
+  ld_emulation_xfer_type **eptr;
+  int options_found = 0;
+
+  for (eptr = ld_emulations; *eptr; eptr++)
+    {
+      ld_emulation_xfer_type *emul = *eptr;
+
+      if (emul->list_options)
+       {
+         fprintf (f, "%s: \n", emul->emulation_name);
+
+         emul->list_options (f);
+
+         options_found = 1;
+       }
+    }
+
+  if (! options_found)
+    fprintf (f, _("  no emulation specific options.\n"));
+}
+
+int
+ldemul_find_potential_libraries (name, entry)
+     char *name;
+     lang_input_statement_type *entry;
+{
+  if (ld_emulation->find_potential_libraries)
+    return ld_emulation->find_potential_libraries (name, entry);
+
+  return 0;
+}