New entry point in the transfer vector - bfd_relax_section.

	* aout-target.h: add to vector, call generic_relax
	* bfd-in.h: add to vector
	* bfd.c: add #define for vector
	* bout.c: add to vector, call generic_relax
	* coffcode.h: add to vector, also now has coff specific relax code
	for the relaxable H8/300 relocs. Also clean up abs section cruft.
	* elf.c: call generic_relax
	* ieee.c: call new vector, clean up some bugs due to the creation
	of bfd_abs_section
	* libbfd.h: add bfd_generic_relax_section EXFUN
	* oasys.c: call generic_relax
	* reloc.c: implement generic_relax
	* seclet.c: moved much of this into coffcode.h
	* srec.c: call generic_relax
	* targets.c: define new transfer vector

1 files changed, 0 insertions, 241 deletions

diff --git a/bfd/seclet.c b/bfd/seclet.c
index 4088f0e..8deef00 100644
--- a/bfd/seclet.c
+++ b/bfd/seclet.c
@@ -50,248 +50,7 @@ DEFUN(bfd_new_seclet,(abfd, section),
 
 #define MAX_ERRORS_IN_A_ROW 10
 extern bfd_error_vector_type bfd_error_vector;
-bfd_vma 
-DEFUN(get_value,(reloc, seclet),
-      arelent  *reloc AND
-      bfd_seclet_type *seclet)
-{
-  bfd_vma value;
-  if (reloc->sym_ptr_ptr) 
-  {
-    asymbol *symbol = *(reloc->sym_ptr_ptr);
-
-  
-    /* A symbol holds a pointer to a section, and an offset from the
-       base of the section.  To relocate, we find where the section will
-       live in the output and add that in */
-
-    if (symbol->section == (asection *)NULL) 
-    {
-      /* Ouch, this is an undefined symbol.. */
-      bfd_error_vector.undefined_symbol(reloc, seclet);
-      value = symbol->value;
-    }
-    else 
-    {
-      value = symbol->value +
-       symbol->section->output_offset +
-	symbol->section->output_section->vma;
-    }  
-  }
-  
-  else 
-  {
-    value = 0;  
-  }
-  
-  /* Add the value contained in the relocation */
-  value += (short)((reloc->addend) & 0xffff);
-  
-  return value;
-  
-
-}
-
-static char *
-DEFUN(foo_bfd_get_relocated_section_contents,(seclet),
-      bfd_seclet_type *seclet)
-
-{
-  asymbol **symbols = 0;
-  extern bfd *output_bfd;
-  bfd *abfd;    
-
-  /* Get enough memory to hold the stuff */
-  bfd *input_bfd = seclet->u.indirect.section->owner;
-  asection *input_section = seclet->u.indirect.section;
-
-  char *data = malloc(input_section->_raw_size);
-  char *dst = data;
-  char *prev_dst = data;
-  unsigned int gap = 0;
-
-  bfd_size_type reloc_size = bfd_get_reloc_upper_bound(input_bfd,
-						       input_section);
-  arelent **reloc_vector = (arelent **)ldmalloc(reloc_size);
-  abfd = output_bfd;
-  
-  /* read in the section */
-  bfd_get_section_contents(input_bfd,
-			   input_section,
-			   data,
-			   0,
-			   input_section->_raw_size);
-  
-  
-  if (bfd_canonicalize_reloc(input_bfd, 
-			     input_section,
-			     reloc_vector,
-			     seclet->u.indirect.symbols) )
-  {
-    arelent **parent = reloc_vector;
-    arelent *reloc ;
-    
-
-
-    unsigned int dst_address = 0;
-    unsigned int src_address = 0;
-    unsigned int run;
-    unsigned int idx;
-    
-    /* Find how long a run we can do */
-    while (dst_address < seclet->size) 
-    {
-      
-      reloc = *parent;
-      if (reloc) 
-      {
-	/* Note that the relaxing didn't tie up the addresses in the
-	   relocation, so we use the original address to work out the
-	   run of non-relocated data */
-	run = reloc->address - src_address;
-	parent++;
-	
-      }
-      else 
-      {
-	run = seclet->size - dst_address;
-      }
-      /* Copy the bytes */
-      for (idx = 0; idx < run; idx++)
-      {
-	data[dst_address++] = data[src_address++];
-      }
-    
-      /* Now do the relocation */
-    
-      if (reloc) 
-      {
-	switch (reloc->howto->type) 
-	{
-	case R_JMP2:
-	  /* Speciial relaxed type */
-	{
-	  bfd_vma dot = seclet->offset + dst_address + seclet->u.indirect.section->output_section->vma;	  
-	  int   gap = get_value(reloc,seclet)-dot-1;
-	  if ((gap & ~0xff  ) != 0 &&((gap & 0xff00)!= 0xff00)) abort();
-
-	  bfd_put_8(abfd,gap,   data+dst_address);
-
-	  switch (data[dst_address-1]) 
-	  {
-	    
-	  case 0x5e:
-	    /* jsr -> bsr */
-	    bfd_put_8(abfd, 0x55, data+dst_address-1);
-	    break;
-	  case 0x5a:	 
-	    /* jmp ->bra */
-	    bfd_put_8(abfd, 0x40, data+dst_address-1);
-	    break;
-	  
-	  default:
-	    abort();
-	  
-	  }
-	
-	
 
-	     
-	  dst_address++;
-	  src_address+=3;
-  
-	  break;
-	}
-
-	     
-	case R_MOVB2:
-	  /* Special relaxed type, there will be a gap between where we
-	     get stuff from and where we put stuff to now 
-	     
-	     for a mov.b @aa:16 -> mov.b @aa:8
-	     opcode 0x6a 0x0y offset
-	     ->     0x2y off
-	     */
-	  if (data[dst_address-1] != 0x6a)
-	   abort();
-	  switch (data[dst_address] & 0xf0) 
-	  {
-	  case 0x00:
-	    /* Src is memory */
-	    data[dst_address-1] = (data[src_address] & 0xf) | 0x20;
-	    break;
-	  case 0x80:
-	    /* Src is reg */
-	    data[dst_address-1] = (data[src_address] & 0xf) | 0x30;
-	    break;
-	  default:
-	    abort();
-	  }
-	
-	  /* the offset must fit ! after all, what was all the relaxing
-	     about ? */
-
-	  bfd_put_8(abfd, get_value(reloc, seclet), data + dst_address);
-
-	  /* Note the magic - src goes up by two bytes, but dst by only
-	     one */
-	  dst_address+=1;
-	  src_address+=3;
-	
-	  break;
-	  /* PCrel 8 bits */
-	case R_PCRBYTE:	  
-	{
-	  bfd_vma dot = seclet->offset + dst_address + seclet->u.indirect.section->output_section->vma;	  
-	  int   gap = get_value(reloc,seclet)-dot;
-	  if (gap > 127 || gap < -128) 
-	  {
-	    bfd_error_vector.reloc_value_truncated(reloc, seclet);
-	  }
-	  
-	  bfd_put_8(abfd,gap,   data+dst_address);
-	  dst_address++;
-	  src_address++;
-  
-	  break;
-	}
-
-	case R_RELBYTE:
-	{
-	  unsigned  int gap =get_value(reloc,seclet);
-	  if (gap > 256)
-	  {
-	    bfd_error_vector.reloc_value_truncated(reloc, seclet);
-	  }
-	  
-	  bfd_put_8(abfd, gap, data+dst_address);
-	  dst_address+=1;
-	  src_address+=1;
-
-
-	}
-	  break; 
-	case R_JMP1:
-	  /* A relword which would have like to have been a pcrel */
-	case R_MOVB1:	
-	  /* A relword which would like to have been modified but
-	     didn't make it */
-	case R_RELWORD:
-	  bfd_put_16(abfd, get_value(reloc,seclet), data+dst_address);
-	  dst_address+=2;
-	  src_address+=2;
-	  break;
-	
-	default:
-	  abort();
-	}
-      }    
-    }
-  }
-  free((char *)reloc_vector);
-  return data;
-  
-}
 
 void
 DEFUN(rel,(abfd, seclet, output_section),