Remove sh-symbianelf support

bfd/
	* Makefile.am: Remove sh-symbianelf support.
	* config.bfd: Likewise.
	* configure.ac: Likewise.
	* targets.c: Likewise.
	* elf32-sh-symbian.c: Delete.
	* Makefile.in: Regenerate.
	* configure: Regenerate.
	* po/SRC-POTFILES.in: Regenerate.
gas/
	* config/tc-sh.c: Remove sh-symbianelf support.
	* config/tc-sh.h: Likewise.
	* configure.ac: Likewise.
	* configure.tgt: Likewise.
	* testsuite/gas/sh/reg-prefix.d: Likewise.
	* testsuite/gas/sh/sh2a-pic.d: Likewise.
	* config.in: Regenerate.
	* configure: Regenerate.
ld/
	* Makefile.am: Remove sh-symbianelf support.
	* configure.tgt: Likewise.
	* emulparams/shlsymbian.sh: Delete.
	* scripttempl/elf32sh-symbian.sc: Delete.
	* Makefile.in: Regenerate.
	* po/BLD-POTFILES.in: Regenerate.

1 files changed, 0 insertions, 615 deletions

diff --git a/bfd/elf32-sh-symbian.c b/bfd/elf32-sh-symbian.c
deleted file mode 100644
index b0f519b..0000000
--- a/bfd/elf32-sh-symbian.c
+++ /dev/null
@@ -1,615 +0,0 @@
-/* Renesas / SuperH specific support for Symbian 32-bit ELF files
-   Copyright (C) 2004-2018 Free Software Foundation, Inc.
-   Contributed by Red Hat
-
-   This file is part of BFD, the Binary File Descriptor library.
-
-   This program 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 3 of the License, or
-   (at your option) any later version.
-
-   This program 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 this program; if not, write to the Free Software
-   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
-   MA 02110-1301, USA.  */
-
-
-/* Stop elf32-sh.c from defining any target vectors.  */
-#define SH_TARGET_ALREADY_DEFINED
-#define sh_find_elf_flags	    sh_symbian_find_elf_flags
-#define sh_elf_get_flags_from_mach  sh_symbian_elf_get_flags_from_mach
-#include "elf32-sh.c"
-
-
-//#define SYMBIAN_DEBUG 1
-#define SYMBIAN_DEBUG 0
-
-#define DIRECTIVE_HEADER	"#<SYMEDIT>#\n"
-#define DIRECTIVE_IMPORT	"IMPORT "
-#define DIRECTIVE_EXPORT	"EXPORT "
-#define DIRECTIVE_AS		"AS "
-
-/* Macro to advance 's' until either it reaches 'e' or the
-   character pointed to by 's' is equal to 'c'.  If 'e' is
-   reached and SYMBIAN_DEBUG is enabled then the error message 'm'
-   is displayed.  */
-#define SKIP_UNTIL(s,e,c,m)					\
-  do								\
-    {								\
-      while (s < e && *s != c)					\
-	++ s;							\
-      if (s >= e)						\
-	{							\
-	  if (SYMBIAN_DEBUG)					\
-	    fprintf (stderr, "Corrupt directive: %s\n", m);	\
-	  result = FALSE;					\
-	}							\
-    }								\
-  while (0);							\
-  if (!result)							\
-     break;
-
-/* Like SKIP_UNTIL except there are two terminator characters
-   c1 and c2.  */
-#define SKIP_UNTIL2(s,e,c1,c2,m)				\
-  do								\
-    {								\
-      while (s < e && *s != c1 && *s != c2)			\
-	++ s;							\
-      if (s >= e)						\
-	{							\
-	  if (SYMBIAN_DEBUG)					\
-	    fprintf (stderr, "Corrupt directive: %s\n", m);	\
-	  result = FALSE;					\
-	}							\
-    }								\
-  while (0);							\
-  if (!result)							\
-     break;
-
-/* Macro to advance 's' until either it reaches 'e' or the
-   character pointed to by 's' is not equal to 'c'.  If 'e'
-   is reached and SYMBIAN_DEBUG is enabled then the error message
-   'm' is displayed.  */
-#define SKIP_WHILE(s,e,c,m)					\
-  do								\
-    {								\
-      while (s < e && *s == c)					\
-	++ s;							\
-      if (s >= e)						\
-	{							\
-	  if (SYMBIAN_DEBUG)					\
-	    fprintf (stderr, "Corrupt directive: %s\n", m);	\
-	  result = FALSE;					\
-	}							\
-    }								\
-  while (0);							\
-  if (!result)							\
-     break;
-
-
-typedef struct symbol_rename
-{
-  struct symbol_rename *       next;
-  char *		       current_name;
-  char *		       new_name;
-  struct elf_link_hash_entry * current_hash;
-  unsigned long		       new_symndx;
-}
-symbol_rename;
-
-static symbol_rename * rename_list = NULL;
-
-/* Accumulate a list of symbols to be renamed.  */
-
-static bfd_boolean
-sh_symbian_import_as (struct bfd_link_info *info, bfd * abfd,
-		      char * current_name, char * new_name)
-{
-  struct elf_link_hash_entry * new_hash;
-  symbol_rename * node;
-
-  if (SYMBIAN_DEBUG)
-    fprintf (stderr, "IMPORT '%s' AS '%s'\n", current_name, new_name);
-
-  for (node = rename_list; node; node = node->next)
-    if (strcmp (node->current_name, current_name) == 0)
-      {
-	if (strcmp (node->new_name, new_name) == 0)
-	  /* Already added to rename list.  */
-	  return TRUE;
-
-	bfd_set_error (bfd_error_invalid_operation);
-	/* xgettext:c-format */
-	_bfd_error_handler (_("%pB: IMPORT AS directive for %s conceals previous IMPORT AS"),
-			    abfd, current_name);
-	return FALSE;
-      }
-
-  if ((node = bfd_malloc (sizeof * node)) == NULL)
-    {
-      if (SYMBIAN_DEBUG)
-	fprintf (stderr, "IMPORT AS: No mem for new rename node\n");
-      return FALSE;
-    }
-
-  if ((node->current_name = bfd_malloc (strlen (current_name) + 1)) == NULL)
-    {
-      if (SYMBIAN_DEBUG)
-	fprintf (stderr, "IMPORT AS: No mem for current name field in rename node\n");
-      free (node);
-      return FALSE;
-    }
-  else
-    strcpy (node->current_name, current_name);
-
-  if ((node->new_name = bfd_malloc (strlen (new_name) + 1)) == NULL)
-    {
-      if (SYMBIAN_DEBUG)
-	fprintf (stderr, "IMPORT AS: No mem for new name field in rename node\n");
-      free (node->current_name);
-      free (node);
-      return FALSE;
-    }
-  else
-    strcpy (node->new_name, new_name);
-
-  node->next = rename_list;
-  node->current_hash = NULL;
-  node->new_symndx = 0;
-  rename_list = node;
-
-  new_hash = elf_link_hash_lookup (elf_hash_table (info), node->new_name, TRUE, FALSE, TRUE);
-  bfd_elf_link_record_dynamic_symbol (info, new_hash);
-  if (new_hash->root.type == bfd_link_hash_new)
-    new_hash->root.type = bfd_link_hash_undefined;
-
-  return TRUE;
-}
-
-
-static bfd_boolean
-sh_symbian_import (bfd * abfd ATTRIBUTE_UNUSED, char * name)
-{
-  if (SYMBIAN_DEBUG)
-    fprintf (stderr, "IMPORT '%s'\n", name);
-
-  /* XXX: Generate an import somehow ?  */
-
-  return TRUE;
-}
-
-static bfd_boolean
-sh_symbian_export (bfd * abfd ATTRIBUTE_UNUSED, char * name)
-{
-  if (SYMBIAN_DEBUG)
-    fprintf (stderr, "EXPORT '%s'\n", name);
-
-  /* XXX: Generate an export somehow ?  */
-
-  return TRUE;
-}
-
-/* Process any magic embedded commands in the .directive. section.
-   Returns TRUE upon sucecss, but if it fails it sets bfd_error and
-   returns FALSE.  */
-
-static bfd_boolean
-sh_symbian_process_embedded_commands (struct bfd_link_info *info, bfd * abfd,
-				      asection * sec, bfd_byte * contents)
-{
-  char *s;
-  char *e;
-  bfd_boolean result = TRUE;
-  bfd_size_type sz = sec->rawsize ? sec->rawsize : sec->size;
-
-  for (s = (char *) contents, e = s + sz; s < e;)
-    {
-      char * directive = s;
-
-      switch (*s)
-	{
-	  /* I want to use "case DIRECTIVE_HEADER [0]:" here but gcc won't let me :-(  */
-	case '#':
-	  if (strcmp (s, DIRECTIVE_HEADER))
-	    result = FALSE;
-	  else
-	    /* Just ignore the header.
-	       XXX: Strictly speaking we ought to check that the header
-	       is present and that it is the first thing in the file.  */
-	    s += strlen (DIRECTIVE_HEADER) + 1;
-	  break;
-
-	case 'I':
-	  if (! CONST_STRNEQ (s, DIRECTIVE_IMPORT))
-	    result = FALSE;
-	  else
-	    {
-	      char * new_name;
-	      char * new_name_end;
-	      char   name_end_char;
-
-	      /* Skip the IMPORT directive.  */
-	      s += strlen (DIRECTIVE_IMPORT);
-
-	      new_name = s;
-	      /* Find the end of the new name.  */
-	      while (s < e && *s != ' ' && *s != '\n')
-		++ s;
-	      if (s >= e)
-		{
-		  /* We have reached the end of the .directive section
-		     without encountering a string terminator.  This is
-		     allowed for IMPORT directives.  */
-		  new_name_end   = e - 1;
-		  name_end_char  = * new_name_end;
-		  * new_name_end = 0;
-		  result = sh_symbian_import (abfd, new_name);
-		  * new_name_end = name_end_char;
-		  break;
-		}
-
-	      /* Remember where the name ends.  */
-	      new_name_end = s;
-	      /* Skip any whitespace before the 'AS'.  */
-	      SKIP_WHILE (s, e, ' ', "IMPORT: Name just followed by spaces");
-	      /* Terminate the new name.  (Do this after skiping...)  */
-	      name_end_char = * new_name_end;
-	      * new_name_end = 0;
-
-	      /* Check to see if 'AS '... is present.  If so we have an
-		 IMPORT AS directive, otherwise we have an IMPORT directive.  */
-	      if (! CONST_STRNEQ (s, DIRECTIVE_AS))
-		{
-		  /* Skip the new-line at the end of the name.  */
-		  if (SYMBIAN_DEBUG && name_end_char != '\n')
-		    fprintf (stderr, "IMPORT: No newline at end of directive\n");
-		  else
-		    s ++;
-
-		  result = sh_symbian_import (abfd, new_name);
-
-		  /* Skip past the NUL character.  */
-		  if (* s ++ != 0)
-		    {
-		      if (SYMBIAN_DEBUG)
-			fprintf (stderr, "IMPORT: No NUL at end of directive\n");
-		    }
-		}
-	      else
-		{
-		  char * current_name;
-		  char * current_name_end;
-		  char   current_name_end_char;
-
-		  /* Skip the 'AS '.  */
-		  s += strlen (DIRECTIVE_AS);
-		  /* Skip any white space after the 'AS '.  */
-		  SKIP_WHILE (s, e, ' ', "IMPORT AS: Nothing after AS");
-		  current_name = s;
-		  /* Find the end of the current name.  */
-		  SKIP_UNTIL2 (s, e, ' ', '\n', "IMPORT AS: No newline at the end of the current name");
-		  /* Skip (backwards) over spaces at the end of the current name.  */
-		  current_name_end = s;
-		  current_name_end_char = * current_name_end;
-
-		  SKIP_WHILE (s, e, ' ', "IMPORT AS: Current name just followed by spaces");
-		  /* Skip past the newline character.  */
-		  if (* s ++ != '\n')
-		    if (SYMBIAN_DEBUG)
-		      fprintf (stderr, "IMPORT AS: No newline at end of directive\n");
-
-		  /* Terminate the current name after having performed the skips.  */
-		  * current_name_end = 0;
-
-		  result = sh_symbian_import_as (info, abfd, current_name, new_name);
-
-		  /* The next character should be a NUL.  */
-		  if (* s != 0)
-		    {
-		      if (SYMBIAN_DEBUG)
-			fprintf (stderr, "IMPORT AS: Junk at end of directive\n");
-		      result = FALSE;
-		    }
-		  s ++;
-
-		  * current_name_end = current_name_end_char;
-		}
-
-	      /* Restore the characters we overwrote, since
-		 the .directive section will be emitted.  */
-	      * new_name_end = name_end_char;
-	    }
-	  break;
-
-	case 'E':
-	  if (! CONST_STRNEQ (s, DIRECTIVE_EXPORT))
-	    result = FALSE;
-	  else
-	    {
-	      char * name;
-	      char * name_end;
-	      char   name_end_char;
-
-	      /* Skip the directive.  */
-	      s += strlen (DIRECTIVE_EXPORT);
-	      name = s;
-	      /* Find the end of the name to be exported.  */
-	      SKIP_UNTIL (s, e, '\n', "EXPORT: no newline at end of directive");
-	      /* Skip (backwards) over spaces at end of exported name.  */
-	      for (name_end = s; name_end[-1] == ' '; name_end --)
-		;
-	      /* name_end now points at the first character after the
-		 end of the exported name, so we can termiante it  */
-	      name_end_char = * name_end;
-	      * name_end = 0;
-	      /* Skip passed the newline character.  */
-	      s ++;
-
-	      result = sh_symbian_export (abfd, name);
-
-	      /* The next character should be a NUL.  */
-	      if (* s != 0)
-		{
-		  if (SYMBIAN_DEBUG)
-		    fprintf (stderr, "EXPORT: Junk at end of directive\n");
-		  result = FALSE;
-		}
-	      s++;
-
-	      /* Restore the character we deleted.  */
-	      * name_end = name_end_char;
-	    }
-	  break;
-
-	default:
-	  result = FALSE;
-	  break;
-	}
-
-      if (! result)
-	{
-	  if (SYMBIAN_DEBUG)
-	    fprintf (stderr, "offset into .directive section: %ld\n",
-		     (long) (directive - (char *) contents));
-
-	  bfd_set_error (bfd_error_invalid_operation);
-	  /* xgettext:c-format */
-	  _bfd_error_handler (_("%pB: unrecognized .directive command: %s"),
-			      abfd, directive);
-	  break;
-	}
-    }
-
-  return result;
-}
-
-
-/* Scan a bfd for a .directive section, and if found process it.
-   Returns TRUE upon success, FALSE otherwise.  */
-
-static bfd_boolean
-sh_symbian_process_directives (bfd *abfd, struct bfd_link_info *info)
-{
-  bfd_boolean result = FALSE;
-  bfd_byte *  contents;
-  asection *  sec = bfd_get_section_by_name (abfd, ".directive");
-  bfd_size_type sz;
-
-  if (!sec)
-    return TRUE;
-
-  sz = sec->rawsize ? sec->rawsize : sec->size;
-  contents = bfd_malloc (sz);
-
-  if (!contents)
-    bfd_set_error (bfd_error_no_memory);
-  else
-    {
-      if (bfd_get_section_contents (abfd, sec, contents, 0, sz))
-	result = sh_symbian_process_embedded_commands (info, abfd, sec, contents);
-      free (contents);
-    }
-
-  return result;
-}
-
-/* Intercept the normal sh_relocate_section() function
-   and magle the relocs to allow for symbol renaming.  */
-
-static bfd_boolean
-sh_symbian_relocate_section (bfd *		    output_bfd,
-			     struct bfd_link_info * info,
-			     bfd *		    input_bfd,
-			     asection *		    input_section,
-			     bfd_byte *		    contents,
-			     Elf_Internal_Rela *    relocs,
-			     Elf_Internal_Sym *	    local_syms,
-			     asection **	    local_sections)
-{
-  /* When performing a final link we implement the IMPORT AS directives.  */
-  if (!bfd_link_relocatable (info))
-    {
-      Elf_Internal_Rela *	     rel;
-      Elf_Internal_Rela *	     relend;
-      Elf_Internal_Shdr *	     symtab_hdr;
-      struct elf_link_hash_entry **  sym_hashes;
-      struct elf_link_hash_entry **  sym_hashes_end;
-      struct elf_link_hash_table *   hash_table;
-      symbol_rename *		     ptr;
-      bfd_size_type		     num_global_syms;
-      unsigned long		     num_local_syms;
-
-      BFD_ASSERT (! elf_bad_symtab (input_bfd));
-
-      symtab_hdr       = & elf_tdata (input_bfd)->symtab_hdr;
-      hash_table       = elf_hash_table (info);
-      num_local_syms   = symtab_hdr->sh_info;
-      num_global_syms  = symtab_hdr->sh_size / sizeof (Elf32_External_Sym);
-      num_global_syms -= num_local_syms;
-      sym_hashes       = elf_sym_hashes (input_bfd);
-      sym_hashes_end   = sym_hashes + num_global_syms;
-
-      /* First scan the rename table, caching the hash entry and the new index.  */
-      for (ptr = rename_list; ptr; ptr = ptr->next)
-	{
-	  struct elf_link_hash_entry *   new_hash;
-	  struct elf_link_hash_entry **  h;
-
-	  ptr->current_hash = elf_link_hash_lookup (hash_table, ptr->current_name, FALSE, FALSE, TRUE);
-
-	  if (ptr->current_hash == NULL)
-	    {
-	      if (SYMBIAN_DEBUG)
-		fprintf (stderr, "IMPORT AS: current symbol '%s' does not exist\n", ptr->current_name);
-	      continue;
-	    }
-
-	  new_hash = elf_link_hash_lookup (hash_table, ptr->new_name,
-					   FALSE, FALSE, TRUE);
-	  /* If we could not find the symbol then it is a new, undefined symbol.
-	     Symbian want this behaviour - ie they want to be able to rename the
-	     reference in a reloc from one undefined symbol to another, new and
-	     undefined symbol.  So we create that symbol here.  */
-	  if (new_hash == NULL)
-	    {
-	      struct bfd_link_hash_entry *bh = NULL;
-	      bfd_boolean collect = get_elf_backend_data (input_bfd)->collect;
-	      if (_bfd_generic_link_add_one_symbol (info, input_bfd,
-						    ptr->new_name, BSF_GLOBAL,
-						    bfd_und_section_ptr, 0,
-						    NULL, FALSE, collect,
-						    &bh))
-		{
-		  new_hash = (struct elf_link_hash_entry *) bh;
-		  new_hash->type = STT_FUNC;
-		  new_hash->non_elf = 0;
-
-		  if (SYMBIAN_DEBUG)
-		    fprintf (stderr, "Created new symbol %s\n", ptr->new_name);
-		}
-	    }
-
-	  if (new_hash == NULL)
-	    {
-	      /* xgettext:c-format */
-	      _bfd_error_handler (_("%pB: failed to add renamed symbol %s"),
-				  input_bfd, ptr->new_name);
-	      continue;
-	    }
-
-	  /* Convert the new_hash value into a index into the table of symbol hashes.  */
-	  for (h = sym_hashes; h < sym_hashes_end; h ++)
-	    {
-	      if (* h == new_hash)
-		{
-		  ptr->new_symndx = h - sym_hashes + num_local_syms;
-		  if (SYMBIAN_DEBUG)
-		    fprintf (stderr, "Converted new hash to index of %ld\n", ptr->new_symndx);
-		  break;
-		}
-	    }
-	  /* If the new symbol is not in the hash table then it must be
-	     because it is one of the newly created undefined symbols
-	     manufactured above.  So we extend the sym has table here to
-	     include this extra symbol.  */
-	  if (h == sym_hashes_end)
-	    {
-	      struct elf_link_hash_entry **  new_sym_hashes;
-
-	      /* This is not very efficient, but it works.  */
-	      ++ num_global_syms;
-	      new_sym_hashes = bfd_alloc (input_bfd, num_global_syms * sizeof * sym_hashes);
-	      if (new_sym_hashes == NULL)
-		{
-		  if (SYMBIAN_DEBUG)
-		    fprintf (stderr, "Out of memory extending hash table\n");
-		  continue;
-		}
-	      memcpy (new_sym_hashes, sym_hashes, (num_global_syms - 1) * sizeof * sym_hashes);
-	      new_sym_hashes[num_global_syms - 1] = new_hash;
-	      elf_sym_hashes (input_bfd) = sym_hashes = new_sym_hashes;
-	      sym_hashes_end = sym_hashes + num_global_syms;
-	      symtab_hdr->sh_size  = (num_global_syms + num_local_syms) * sizeof (Elf32_External_Sym);
-
-	      ptr->new_symndx = num_global_syms - 1 + num_local_syms;
-
-	      if (SYMBIAN_DEBUG)
-		fprintf (stderr, "Extended symbol hash table to insert new symbol as index %ld\n",
-			 ptr->new_symndx);
-	    }
-	}
-
-      /* Walk the reloc list looking for references to renamed symbols.
-	 When we find one, we alter the index in the reloc to point to the new symbol.  */
-      for (rel = relocs, relend = relocs + input_section->reloc_count;
-	   rel < relend;
-	   rel ++)
-	{
-	  int			       r_type;
-	  unsigned long		       r_symndx;
-	  struct elf_link_hash_entry * h;
-
-	  r_symndx = ELF32_R_SYM (rel->r_info);
-	  r_type = ELF32_R_TYPE (rel->r_info);
-
-	  /* Ignore unused relocs.  */
-	  if ((r_type >= (int) R_SH_GNU_VTINHERIT
-	       && r_type <= (int) R_SH_LABEL)
-	      || r_type == (int) R_SH_NONE
-	      || r_type < 0
-	      || r_type >= R_SH_max)
-	    continue;
-
-	  /* Ignore relocs against local symbols.  */
-	  if (r_symndx < num_local_syms)
-	    continue;
-
-	  BFD_ASSERT (r_symndx < (num_global_syms + num_local_syms));
-	  h = sym_hashes[r_symndx - num_local_syms];
-	  BFD_ASSERT (h != NULL);
-
-	  while (   h->root.type == bfd_link_hash_indirect
-		 || h->root.type == bfd_link_hash_warning)
-	    h = (struct elf_link_hash_entry *) h->root.u.i.link;
-
-	  /* If the symbol is defined there is no need to rename it.
-	     XXX - is this true ?  */
-	  if (   h->root.type == bfd_link_hash_defined
-	      || h->root.type == bfd_link_hash_defweak
-	      || h->root.type == bfd_link_hash_undefweak)
-	    continue;
-
-	  for (ptr = rename_list; ptr; ptr = ptr->next)
-	    if (h == ptr->current_hash)
-	      {
-		BFD_ASSERT (ptr->new_symndx);
-		if (SYMBIAN_DEBUG)
-		  fprintf (stderr, "convert reloc %lx from using index %ld to using index %ld\n",
-			   (unsigned long) rel->r_info,
-			   (long) ELF32_R_SYM (rel->r_info), ptr->new_symndx);
-		rel->r_info = ELF32_R_INFO (ptr->new_symndx, r_type);
-		break;
-	      }
-	}
-    }
-
-  return sh_elf_relocate_section (output_bfd, info, input_bfd, input_section,
-				  contents, relocs, local_syms, local_sections);
-}
-
-#define TARGET_LITTLE_SYM	sh_elf32_symbian_le_vec
-#define TARGET_LITTLE_NAME      "elf32-shl-symbian"
-
-#undef  elf_backend_relocate_section
-#define elf_backend_relocate_section	sh_symbian_relocate_section
-#undef  elf_backend_check_directives
-#define elf_backend_check_directives    sh_symbian_process_directives
-
-#include "elf32-target.h"