[deliverable/binutils-gdb.git] / bfd / aout-target.h

/* Define a target vector and some small routines for a variant of a.out.
   Copyright (C) 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.

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 2 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., 675 Mass Ave, Cambridge, MA 02139, USA.  */

#include "aout/aout64.h"
#include "aout/stab_gnu.h"
#include "aout/ar.h"
/*#include "libaout.h"*/

extern CONST struct reloc_howto_struct * NAME(aout,reloc_type_lookup) ();

/* Set parameters about this a.out file that are machine-dependent.
   This routine is called from some_aout_object_p just before it returns.  */
#ifndef MY_callback
static const bfd_target *
MY(callback) (abfd)
     bfd *abfd;
{
  struct internal_exec *execp = exec_hdr (abfd);
  unsigned int arch_align_power;
  unsigned long arch_align;

  /* Calculate the file positions of the parts of a newly read aout header */
  obj_textsec (abfd)->_raw_size = N_TXTSIZE(*execp);

  /* The virtual memory addresses of the sections */
  obj_textsec (abfd)->vma = N_TXTADDR(*execp);
  obj_datasec (abfd)->vma = N_DATADDR(*execp);
  obj_bsssec  (abfd)->vma = N_BSSADDR(*execp);

  /* The file offsets of the sections */
  obj_textsec (abfd)->filepos = N_TXTOFF (*execp);
  obj_datasec (abfd)->filepos = N_DATOFF (*execp);

  /* The file offsets of the relocation info */
  obj_textsec (abfd)->rel_filepos = N_TRELOFF(*execp);
  obj_datasec (abfd)->rel_filepos = N_DRELOFF(*execp);

  /* The file offsets of the string table and symbol table.  */
  obj_sym_filepos (abfd) = N_SYMOFF (*execp);
  obj_str_filepos (abfd) = N_STROFF (*execp);
  
  /* Determine the architecture and machine type of the object file.  */
#ifdef SET_ARCH_MACH
  SET_ARCH_MACH(abfd, *execp);
#else
  bfd_default_set_arch_mach(abfd, DEFAULT_ARCH, 0);
#endif

  /* Now that we know the architecture, set the alignments of the
     sections.  This is normally done by NAME(aout,new_section_hook),
     but when the initial sections were created the architecture had
     not yet been set.  However, for backward compatibility, we don't
     set the alignment power any higher than as required by the size
     of the section.  */
  arch_align_power = bfd_get_arch_info (abfd)->section_align_power;
  arch_align = 1 << arch_align_power;
  if ((BFD_ALIGN (obj_textsec (abfd)->_raw_size, arch_align)
       == obj_textsec (abfd)->_raw_size)
      && (BFD_ALIGN (obj_datasec (abfd)->_raw_size, arch_align)
	  == obj_datasec (abfd)->_raw_size)
      && (BFD_ALIGN (obj_bsssec (abfd)->_raw_size, arch_align)
	  == obj_bsssec (abfd)->_raw_size))
    {
      obj_textsec (abfd)->alignment_power = arch_align_power;
      obj_datasec (abfd)->alignment_power = arch_align_power;
      obj_bsssec (abfd)->alignment_power = arch_align_power;
    }

  /* Don't set sizes now -- can't be sure until we know arch & mach.
     Sizes get set in set_sizes callback, later.  */
#if 0
  adata(abfd).page_size = PAGE_SIZE;
#ifdef SEGMENT_SIZE
  adata(abfd).segment_size = SEGMENT_SIZE;
#else
  adata(abfd).segment_size = PAGE_SIZE;
#endif
  adata(abfd).exec_bytes_size = EXEC_BYTES_SIZE;
#endif

  return abfd->xvec;
}
#endif

#ifndef MY_object_p
/* Finish up the reading of an a.out file header */

static const bfd_target *
MY(object_p) (abfd)
     bfd *abfd;
{
  struct external_exec exec_bytes;	/* Raw exec header from file */
  struct internal_exec exec;		/* Cleaned-up exec header */
  const bfd_target *target;

  if (bfd_read ((PTR) &exec_bytes, 1, EXEC_BYTES_SIZE, abfd)
      != EXEC_BYTES_SIZE) {
    if (bfd_get_error () != bfd_error_system_call)
      bfd_set_error (bfd_error_wrong_format);
    return 0;
  }

#ifdef SWAP_MAGIC
  exec.a_info = SWAP_MAGIC (exec_bytes.e_info);
#else
  exec.a_info = bfd_h_get_32 (abfd, exec_bytes.e_info);
#endif /* SWAP_MAGIC */

  if (N_BADMAG (exec)) return 0;
#ifdef MACHTYPE_OK
  if (!(MACHTYPE_OK (N_MACHTYPE (exec)))) return 0;
#endif

  NAME(aout,swap_exec_header_in)(abfd, &exec_bytes, &exec);

#ifdef SWAP_MAGIC
  /* swap_exec_header_in read in a_info with the wrong byte order */
  exec.a_info = SWAP_MAGIC (exec_bytes.e_info);
#endif /* SWAP_MAGIC */

  target = NAME(aout,some_aout_object_p) (abfd, &exec, MY(callback));

#ifdef ENTRY_CAN_BE_ZERO
  /* The NEWSOS3 entry-point is/was 0, which (amongst other lossage)
   * means that it isn't obvious if EXEC_P should be set.
   * All of the following must be true for an executable:
   * There must be no relocations, the bfd can be neither an
   * archive nor an archive element, and the file must be executable. */

  if (exec.a_trsize + exec.a_drsize == 0
      && bfd_get_format(abfd) == bfd_object && abfd->my_archive == NULL)
    {
      struct stat buf;
#ifndef S_IXUSR
#define S_IXUSR 0100	/* Execute by owner.  */
#endif
      if (stat(abfd->filename, &buf) == 0 && (buf.st_mode & S_IXUSR))
	abfd->flags |= EXEC_P;
    }
#endif /* ENTRY_CAN_BE_ZERO */

  return target;
}
#define MY_object_p MY(object_p)
#endif


#ifndef MY_mkobject
static boolean
MY(mkobject) (abfd)
     bfd *abfd;
{
  if (NAME(aout,mkobject)(abfd) == false)
    return false;
#if 0 /* Sizes get set in set_sizes callback, later, after we know
	 the architecture and machine.  */
  adata(abfd).page_size = PAGE_SIZE;
#ifdef SEGMENT_SIZE
  adata(abfd).segment_size = SEGMENT_SIZE;
#else
  adata(abfd).segment_size = PAGE_SIZE;
#endif
  adata(abfd).exec_bytes_size = EXEC_BYTES_SIZE;
#endif
  return true;
}
#define MY_mkobject MY(mkobject)
#endif

#ifndef MY_bfd_copy_private_section_data

/* Copy private section data.  This actually does nothing with the
   sections.  It copies the subformat field.  We copy it here, because
   we need to know whether this is a QMAGIC file before we set the
   section contents, and copy_private_bfd_data is not called until
   after the section contents have been set.  */

/*ARGSUSED*/
static boolean
MY_bfd_copy_private_section_data (ibfd, isec, obfd, osec)
     bfd *ibfd;
     asection *isec;
     bfd *obfd;
     asection *osec;
{
  if (bfd_get_flavour (obfd) == bfd_target_aout_flavour)
    obj_aout_subformat (obfd) = obj_aout_subformat (ibfd);
  return true;
}

#endif

/* Write an object file.
   Section contents have already been written.  We write the
   file header, symbols, and relocation.  */

#ifndef MY_write_object_contents
static boolean
MY(write_object_contents) (abfd)
     bfd *abfd;
{
  struct external_exec exec_bytes;
  struct internal_exec *execp = exec_hdr (abfd);

#if CHOOSE_RELOC_SIZE
  CHOOSE_RELOC_SIZE(abfd);
#else
  obj_reloc_entry_size (abfd) = RELOC_STD_SIZE;
#endif

  WRITE_HEADERS(abfd, execp);

  return true;
}
#define MY_write_object_contents MY(write_object_contents)
#endif

#ifndef MY_set_sizes
static boolean
MY(set_sizes) (abfd)
     bfd *abfd;
{
  adata(abfd).page_size = PAGE_SIZE;

#ifdef SEGMENT_SIZE
  adata(abfd).segment_size = SEGMENT_SIZE;
#else
  adata(abfd).segment_size = PAGE_SIZE;
#endif

#ifdef ZMAGIC_DISK_BLOCK_SIZE
  adata(abfd).zmagic_disk_block_size = ZMAGIC_DISK_BLOCK_SIZE;
#else
  adata(abfd).zmagic_disk_block_size = PAGE_SIZE;
#endif

  adata(abfd).exec_bytes_size = EXEC_BYTES_SIZE;
  return true;
}
#define MY_set_sizes MY(set_sizes)
#endif

#ifndef MY_exec_hdr_flags
#define MY_exec_hdr_flags 0
#endif

#ifndef MY_backend_data

#ifndef MY_zmagic_contiguous
#define MY_zmagic_contiguous 0
#endif
#ifndef MY_text_includes_header
#define MY_text_includes_header 0
#endif
#ifndef MY_add_dynamic_symbols
#define MY_add_dynamic_symbols 0
#endif
#ifndef MY_add_one_symbol
#define MY_add_one_symbol 0
#endif
#ifndef MY_link_dynamic_object
#define MY_link_dynamic_object 0
#endif
#ifndef MY_write_dynamic_symbol
#define MY_write_dynamic_symbol 0
#endif
#ifndef MY_check_dynamic_reloc
#define MY_check_dynamic_reloc 0
#endif
#ifndef MY_finish_dynamic_link
#define MY_finish_dynamic_link 0
#endif

static CONST struct aout_backend_data MY(backend_data) = {
  MY_zmagic_contiguous,
  MY_text_includes_header,
  MY_exec_hdr_flags,
  0,				/* text vma? */
  MY_set_sizes,
  0,				/* exec header is counted */
  MY_add_dynamic_symbols,
  MY_add_one_symbol,
  MY_link_dynamic_object,
  MY_write_dynamic_symbol,
  MY_check_dynamic_reloc,
  MY_finish_dynamic_link
};
#define MY_backend_data &MY(backend_data)
#endif

#ifndef MY_final_link_callback

/* Callback for the final_link routine to set the section offsets.  */

static void MY_final_link_callback
  PARAMS ((bfd *, file_ptr *, file_ptr *, file_ptr *));

static void
MY_final_link_callback (abfd, ptreloff, pdreloff, psymoff)
     bfd *abfd;
     file_ptr *ptreloff;
     file_ptr *pdreloff;
     file_ptr *psymoff;
{
  struct internal_exec *execp = exec_hdr (abfd);

  *ptreloff = N_TRELOFF (*execp);
  *pdreloff = N_DRELOFF (*execp);
  *psymoff = N_SYMOFF (*execp);
}

#endif

#ifndef MY_bfd_final_link

/* Final link routine.  We need to use a call back to get the correct
   offsets in the output file.  */

static boolean
MY_bfd_final_link (abfd, info)
     bfd *abfd;
     struct bfd_link_info *info;
{
  return NAME(aout,final_link) (abfd, info, MY_final_link_callback);
}

#endif

/* We assume BFD generic archive files.  */
#ifndef	MY_openr_next_archived_file
#define	MY_openr_next_archived_file	bfd_generic_openr_next_archived_file
#endif
#ifndef	MY_generic_stat_arch_elt
#define	MY_generic_stat_arch_elt	bfd_generic_stat_arch_elt
#endif
#ifndef	MY_slurp_armap
#define	MY_slurp_armap			bfd_slurp_bsd_armap
#endif
#ifndef	MY_slurp_extended_name_table
#define	MY_slurp_extended_name_table	_bfd_slurp_extended_name_table
#endif
#ifndef	MY_write_armap
#define	MY_write_armap		bsd_write_armap
#endif
#ifndef	MY_truncate_arname
#define	MY_truncate_arname		bfd_bsd_truncate_arname
#endif
#ifndef MY_update_armap_timestamp
#define MY_update_armap_timestamp _bfd_archive_bsd_update_armap_timestamp
#endif

/* No core file defined here -- configure in trad-core.c separately.  */
#ifndef	MY_core_file_failing_command
#define	MY_core_file_failing_command _bfd_nocore_core_file_failing_command
#endif
#ifndef	MY_core_file_failing_signal
#define	MY_core_file_failing_signal	_bfd_nocore_core_file_failing_signal
#endif
#ifndef	MY_core_file_matches_executable_p
#define	MY_core_file_matches_executable_p	\
				_bfd_nocore_core_file_matches_executable_p
#endif
#ifndef	MY_core_file_p
#define	MY_core_file_p		_bfd_dummy_target
#endif

#ifndef MY_bfd_debug_info_start
#define MY_bfd_debug_info_start		bfd_void
#endif
#ifndef MY_bfd_debug_info_end
#define MY_bfd_debug_info_end		bfd_void
#endif
#ifndef MY_bfd_debug_info_accumulate
#define MY_bfd_debug_info_accumulate	\
			(void (*) PARAMS ((bfd*, struct sec *))) bfd_void
#endif

#ifndef MY_core_file_failing_command
#define MY_core_file_failing_command NAME(aout,core_file_failing_command)
#endif
#ifndef MY_core_file_failing_signal
#define MY_core_file_failing_signal NAME(aout,core_file_failing_signal)
#endif
#ifndef MY_core_file_matches_executable_p
#define MY_core_file_matches_executable_p NAME(aout,core_file_matches_executable_p)
#endif
#ifndef MY_set_section_contents
#define MY_set_section_contents NAME(aout,set_section_contents)
#endif
#ifndef MY_get_section_contents
#define MY_get_section_contents NAME(aout,get_section_contents)
#endif
#ifndef MY_new_section_hook
#define MY_new_section_hook NAME(aout,new_section_hook)
#endif
#ifndef MY_get_symtab_upper_bound
#define MY_get_symtab_upper_bound NAME(aout,get_symtab_upper_bound)
#endif
#ifndef MY_get_symtab
#define MY_get_symtab NAME(aout,get_symtab)
#endif
#ifndef MY_get_reloc_upper_bound
#define MY_get_reloc_upper_bound NAME(aout,get_reloc_upper_bound)
#endif
#ifndef MY_canonicalize_reloc
#define MY_canonicalize_reloc NAME(aout,canonicalize_reloc)
#endif
#ifndef MY_make_empty_symbol
#define MY_make_empty_symbol NAME(aout,make_empty_symbol)
#endif
#ifndef MY_print_symbol
#define MY_print_symbol NAME(aout,print_symbol)
#endif
#ifndef MY_get_symbol_info
#define MY_get_symbol_info NAME(aout,get_symbol_info)
#endif
#ifndef MY_get_lineno
#define MY_get_lineno NAME(aout,get_lineno)
#endif
#ifndef MY_set_arch_mach
#define MY_set_arch_mach NAME(aout,set_arch_mach)
#endif
#ifndef MY_find_nearest_line
#define MY_find_nearest_line NAME(aout,find_nearest_line)
#endif
#ifndef MY_sizeof_headers
#define MY_sizeof_headers NAME(aout,sizeof_headers)
#endif
#ifndef MY_bfd_get_relocated_section_contents
#define MY_bfd_get_relocated_section_contents \
			bfd_generic_get_relocated_section_contents
#endif
#ifndef MY_bfd_relax_section
#define MY_bfd_relax_section bfd_generic_relax_section
#endif
#ifndef MY_bfd_reloc_type_lookup
#define MY_bfd_reloc_type_lookup NAME(aout,reloc_type_lookup)
#endif
#ifndef MY_bfd_make_debug_symbol
#define MY_bfd_make_debug_symbol 0
#endif
#ifndef MY_bfd_link_hash_table_create
#define MY_bfd_link_hash_table_create NAME(aout,link_hash_table_create)
#endif
#ifndef MY_bfd_link_add_symbols
#define MY_bfd_link_add_symbols NAME(aout,link_add_symbols)
#endif

#ifndef MY_bfd_copy_private_bfd_data
#define MY_bfd_copy_private_bfd_data _bfd_generic_bfd_copy_private_bfd_data
#endif

#ifndef MY_bfd_is_local_label
#define MY_bfd_is_local_label bfd_generic_is_local_label
#endif

#ifndef MY_bfd_free_cached_info
#define MY_bfd_free_cached_info NAME(aout,bfd_free_cached_info)
#endif

#ifndef MY_close_and_cleanup
#define MY_close_and_cleanup MY_bfd_free_cached_info
#endif

#ifndef MY_get_dynamic_symtab_upper_bound
#define MY_get_dynamic_symtab_upper_bound \
  _bfd_nodynamic_get_dynamic_symtab_upper_bound
#endif
#ifndef MY_canonicalize_dynamic_symtab
#define MY_canonicalize_dynamic_symtab \
  _bfd_nodynamic_canonicalize_dynamic_symtab
#endif
#ifndef MY_get_dynamic_reloc_upper_bound
#define MY_get_dynamic_reloc_upper_bound \
  _bfd_nodynamic_get_dynamic_reloc_upper_bound
#endif
#ifndef MY_canonicalize_dynamic_reloc
#define MY_canonicalize_dynamic_reloc \
  _bfd_nodynamic_canonicalize_dynamic_reloc
#endif

/* Aout symbols normally have leading underscores */
#ifndef MY_symbol_leading_char 
#define MY_symbol_leading_char '_'
#endif

/* Aout archives normally use spaces for padding */
#ifndef AR_PAD_CHAR
#define AR_PAD_CHAR ' '
#endif

#ifndef MY_BFD_TARGET
const bfd_target MY(vec) =
{
  TARGETNAME,		/* name */
  bfd_target_aout_flavour,
#ifdef TARGET_IS_BIG_ENDIAN_P
  true,				/* target byte order (big) */
  true,				/* target headers byte order (big) */
#else
  false,			/* target byte order (little) */
  false,			/* target headers byte order (little) */
#endif
  (HAS_RELOC | EXEC_P |		/* object flags */
   HAS_LINENO | HAS_DEBUG |
   HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT | D_PAGED),
  (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
  MY_symbol_leading_char,
  AR_PAD_CHAR,			/* ar_pad_char */
  15,				/* ar_max_namelen */
  3,				/* minimum alignment */
#ifdef TARGET_IS_BIG_ENDIAN_P
  bfd_getb64, bfd_getb_signed_64, bfd_putb64,
     bfd_getb32, bfd_getb_signed_32, bfd_putb32,
     bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
  bfd_getb64, bfd_getb_signed_64, bfd_putb64,
     bfd_getb32, bfd_getb_signed_32, bfd_putb32,
     bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
#else
  bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     bfd_getl32, bfd_getl_signed_32, bfd_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* data */
  bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     bfd_getl32, bfd_getl_signed_32, bfd_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* hdrs */
#endif
    {_bfd_dummy_target, MY_object_p, /* bfd_check_format */
       bfd_generic_archive_p, MY_core_file_p},
    {bfd_false, MY_mkobject,	/* bfd_set_format */
       _bfd_generic_mkarchive, bfd_false},
    {bfd_false, MY_write_object_contents, /* bfd_write_contents */
       _bfd_write_archive_contents, bfd_false},

     BFD_JUMP_TABLE_GENERIC (MY),
     BFD_JUMP_TABLE_COPY (MY),
     BFD_JUMP_TABLE_CORE (MY),
     BFD_JUMP_TABLE_ARCHIVE (MY),
     BFD_JUMP_TABLE_SYMBOLS (MY),
     BFD_JUMP_TABLE_RELOCS (MY),
     BFD_JUMP_TABLE_WRITE (MY),
     BFD_JUMP_TABLE_LINK (MY),
     BFD_JUMP_TABLE_DYNAMIC (MY),

  (PTR) MY_backend_data,
};
#endif /* MY_BFD_TARGET */
Commit	Line	Data
582bc90a	1	/* Define a target vector and some small routines for a variant of a.out.
f5419a59	2	Copyright (C) 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
e98e6ec1 SC	3
	4	This file is part of BFD, the Binary File Descriptor library.
	5
	6	This program is free software; you can redistribute it and/or modify
	7	it under the terms of the GNU General Public License as published by
	8	the Free Software Foundation; either version 2 of the License, or
	9	(at your option) any later version.
	10
	11	This program is distributed in the hope that it will be useful,
	12	but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	14	GNU General Public License for more details.
	15
	16	You should have received a copy of the GNU General Public License
	17	along with this program; if not, write to the Free Software
	18	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
	19
582bc90a PB	20	#include "aout/aout64.h"
	21	#include "aout/stab_gnu.h"
	22	#include "aout/ar.h"
	23	/#include "libaout.h"/
	24
214f8f23 KR	25	extern CONST struct reloc_howto_struct * NAME(aout,reloc_type_lookup) ();
214f8f23 KR	26
e98e6ec1 SC	27	/* Set parameters about this a.out file that are machine-dependent.
e98e6ec1 SC	28	This routine is called from some_aout_object_p just before it returns. */
214f8f23	29	#ifndef MY_callback
a932d0ff	30	static const bfd_target *
57a1867e DM	31	MY(callback) (abfd)
57a1867e DM	32	bfd *abfd;
e98e6ec1 SC	33	{
e98e6ec1 SC	34	struct internal_exec *execp = exec_hdr (abfd);
a932d0ff ILT	35	unsigned int arch_align_power;
a932d0ff ILT	36	unsigned long arch_align;
294eaca4 SC	37
294eaca4 SC	38	/* Calculate the file positions of the parts of a newly read aout header */
e98e6ec1 SC	39	obj_textsec (abfd)->_raw_size = N_TXTSIZE(*execp);
	40
	41	/* The virtual memory addresses of the sections */
	42	obj_textsec (abfd)->vma = N_TXTADDR(*execp);
	43	obj_datasec (abfd)->vma = N_DATADDR(*execp);
	44	obj_bsssec (abfd)->vma = N_BSSADDR(*execp);
	45
	46	/* The file offsets of the sections */
	47	obj_textsec (abfd)->filepos = N_TXTOFF (*execp);
	48	obj_datasec (abfd)->filepos = N_DATOFF (*execp);
	49
	50	/* The file offsets of the relocation info */
	51	obj_textsec (abfd)->rel_filepos = N_TRELOFF(*execp);
	52	obj_datasec (abfd)->rel_filepos = N_DRELOFF(*execp);
	53
	54	/* The file offsets of the string table and symbol table. */
	55	obj_sym_filepos (abfd) = N_SYMOFF (*execp);
	56	obj_str_filepos (abfd) = N_STROFF (*execp);
	57
582bc90a	58	/* Determine the architecture and machine type of the object file. */
e98e6ec1 SC	59	#ifdef SET_ARCH_MACH
	60	SET_ARCH_MACH(abfd, *execp);
	61	#else
	62	bfd_default_set_arch_mach(abfd, DEFAULT_ARCH, 0);
	63	#endif
	64
785e2b52 ILT	65	/* Now that we know the architecture, set the alignments of the
	66	sections. This is normally done by NAME(aout,new_section_hook),
	67	but when the initial sections were created the architecture had
a932d0ff ILT	68	not yet been set. However, for backward compatibility, we don't
	69	set the alignment power any higher than as required by the size
	70	of the section. */
	71	arch_align_power = bfd_get_arch_info (abfd)->section_align_power;
	72	arch_align = 1 << arch_align_power;
	73	if ((BFD_ALIGN (obj_textsec (abfd)->_raw_size, arch_align)
	74	== obj_textsec (abfd)->_raw_size)
	75	&& (BFD_ALIGN (obj_datasec (abfd)->_raw_size, arch_align)
	76	== obj_datasec (abfd)->_raw_size)
	77	&& (BFD_ALIGN (obj_bsssec (abfd)->_raw_size, arch_align)
	78	== obj_bsssec (abfd)->_raw_size))
	79	{
	80	obj_textsec (abfd)->alignment_power = arch_align_power;
	81	obj_datasec (abfd)->alignment_power = arch_align_power;
	82	obj_bsssec (abfd)->alignment_power = arch_align_power;
	83	}
785e2b52	84
294eaca4 SC	85	/* Don't set sizes now -- can't be sure until we know arch & mach.
	86	Sizes get set in set_sizes callback, later. */
	87	#if 0
e98e6ec1 SC	88	adata(abfd).page_size = PAGE_SIZE;
	89	#ifdef SEGMENT_SIZE
	90	adata(abfd).segment_size = SEGMENT_SIZE;
	91	#else
	92	adata(abfd).segment_size = PAGE_SIZE;
	93	#endif
	94	adata(abfd).exec_bytes_size = EXEC_BYTES_SIZE;
294eaca4	95	#endif
e98e6ec1 SC	96
	97	return abfd->xvec;
	98	}
214f8f23	99	#endif
e98e6ec1 SC	100
	101	#ifndef MY_object_p
	102	/* Finish up the reading of an a.out file header */
	103
a932d0ff	104	static const bfd_target *
57a1867e DM	105	MY(object_p) (abfd)
57a1867e DM	106	bfd *abfd;
e98e6ec1 SC	107	{
	108	struct external_exec exec_bytes; /* Raw exec header from file */
	109	struct internal_exec exec; /* Cleaned-up exec header */
a932d0ff	110	const bfd_target *target;
e98e6ec1 SC	111
	112	if (bfd_read ((PTR) &exec_bytes, 1, EXEC_BYTES_SIZE, abfd)
	113	!= EXEC_BYTES_SIZE) {
4002f18a ILT	114	if (bfd_get_error () != bfd_error_system_call)
4002f18a ILT	115	bfd_set_error (bfd_error_wrong_format);
e98e6ec1 SC	116	return 0;
	117	}
	118
3f99570e JK	119	#ifdef SWAP_MAGIC
3f99570e JK	120	exec.a_info = SWAP_MAGIC (exec_bytes.e_info);
4c3721d5	121	#else
e98e6ec1	122	exec.a_info = bfd_h_get_32 (abfd, exec_bytes.e_info);
3f99570e	123	#endif /* SWAP_MAGIC */
e98e6ec1 SC	124
e98e6ec1 SC	125	if (N_BADMAG (exec)) return 0;
4c3721d5 ILT	126	#ifdef MACHTYPE_OK
	127	if (!(MACHTYPE_OK (N_MACHTYPE (exec)))) return 0;
	128	#endif
e98e6ec1 SC	129
e98e6ec1 SC	130	NAME(aout,swap_exec_header_in)(abfd, &exec_bytes, &exec);
a932d0ff ILT	131
	132	#ifdef SWAP_MAGIC
	133	/* swap_exec_header_in read in a_info with the wrong byte order */
	134	exec.a_info = SWAP_MAGIC (exec_bytes.e_info);
	135	#endif /* SWAP_MAGIC */
	136
e98e6ec1 SC	137	target = NAME(aout,some_aout_object_p) (abfd, &exec, MY(callback));
	138
	139	#ifdef ENTRY_CAN_BE_ZERO
	140	/* The NEWSOS3 entry-point is/was 0, which (amongst other lossage)
	141	* means that it isn't obvious if EXEC_P should be set.
	142	* All of the following must be true for an executable:
	143	* There must be no relocations, the bfd can be neither an
	144	* archive nor an archive element, and the file must be executable. */
	145
	146	if (exec.a_trsize + exec.a_drsize == 0
	147	&& bfd_get_format(abfd) == bfd_object && abfd->my_archive == NULL)
	148	{
	149	struct stat buf;
	150	#ifndef S_IXUSR
	151	#define S_IXUSR 0100 /* Execute by owner. */
	152	#endif
	153	if (stat(abfd->filename, &buf) == 0 && (buf.st_mode & S_IXUSR))
	154	abfd->flags \|= EXEC_P;
	155	}
	156	#endif /* ENTRY_CAN_BE_ZERO */
	157
	158	return target;
	159	}
	160	#define MY_object_p MY(object_p)
	161	#endif
	162
	163
	164	#ifndef MY_mkobject
	165	static boolean
57a1867e DM	166	MY(mkobject) (abfd)
57a1867e DM	167	bfd *abfd;
e98e6ec1 SC	168	{
	169	if (NAME(aout,mkobject)(abfd) == false)
	170	return false;
294eaca4 SC	171	#if 0 /* Sizes get set in set_sizes callback, later, after we know
294eaca4 SC	172	the architecture and machine. */
e98e6ec1 SC	173	adata(abfd).page_size = PAGE_SIZE;
	174	#ifdef SEGMENT_SIZE
	175	adata(abfd).segment_size = SEGMENT_SIZE;
	176	#else
	177	adata(abfd).segment_size = PAGE_SIZE;
	178	#endif
	179	adata(abfd).exec_bytes_size = EXEC_BYTES_SIZE;
294eaca4	180	#endif
e98e6ec1 SC	181	return true;
	182	}
	183	#define MY_mkobject MY(mkobject)
	184	#endif
	185
f5419a59 ILT	186	#ifndef MY_bfd_copy_private_section_data
	187
	188	/* Copy private section data. This actually does nothing with the
	189	sections. It copies the subformat field. We copy it here, because
aa91350c ILT	190	we need to know whether this is a QMAGIC file before we set the
	191	section contents, and copy_private_bfd_data is not called until
	192	after the section contents have been set. */
f5419a59 ILT	193
	194	/ARGSUSED/
	195	static boolean
	196	MY_bfd_copy_private_section_data (ibfd, isec, obfd, osec)
	197	bfd *ibfd;
	198	asection *isec;
	199	bfd *obfd;
	200	asection *osec;
	201	{
d7785845 ILT	202	if (bfd_get_flavour (obfd) == bfd_target_aout_flavour)
d7785845 ILT	203	obj_aout_subformat (obfd) = obj_aout_subformat (ibfd);
f5419a59 ILT	204	return true;
	205	}
	206
	207	#endif
	208
e98e6ec1 SC	209	/* Write an object file.
	210	Section contents have already been written. We write the
	211	file header, symbols, and relocation. */
	212
	213	#ifndef MY_write_object_contents
	214	static boolean
57a1867e DM	215	MY(write_object_contents) (abfd)
57a1867e DM	216	bfd *abfd;
e98e6ec1	217	{
e98e6ec1 SC	218	struct external_exec exec_bytes;
	219	struct internal_exec *execp = exec_hdr (abfd);
	220
582bc90a PB	221	#if CHOOSE_RELOC_SIZE
	222	CHOOSE_RELOC_SIZE(abfd);
	223	#else
	224	obj_reloc_entry_size (abfd) = RELOC_STD_SIZE;
	225	#endif
	226
e98e6ec1	227	WRITE_HEADERS(abfd, execp);
582bc90a	228
e98e6ec1 SC	229	return true;
	230	}
	231	#define MY_write_object_contents MY(write_object_contents)
	232	#endif
	233
294eaca4 SC	234	#ifndef MY_set_sizes
294eaca4 SC	235	static boolean
57a1867e DM	236	MY(set_sizes) (abfd)
57a1867e DM	237	bfd *abfd;
294eaca4 SC	238	{
294eaca4 SC	239	adata(abfd).page_size = PAGE_SIZE;
a932d0ff	240
294eaca4 SC	241	#ifdef SEGMENT_SIZE
	242	adata(abfd).segment_size = SEGMENT_SIZE;
	243	#else
	244	adata(abfd).segment_size = PAGE_SIZE;
	245	#endif
a932d0ff ILT	246
	247	#ifdef ZMAGIC_DISK_BLOCK_SIZE
	248	adata(abfd).zmagic_disk_block_size = ZMAGIC_DISK_BLOCK_SIZE;
	249	#else
	250	adata(abfd).zmagic_disk_block_size = PAGE_SIZE;
	251	#endif
	252
294eaca4 SC	253	adata(abfd).exec_bytes_size = EXEC_BYTES_SIZE;
	254	return true;
	255	}
	256	#define MY_set_sizes MY(set_sizes)
	257	#endif
	258
f5419a59 ILT	259	#ifndef MY_exec_hdr_flags
	260	#define MY_exec_hdr_flags 0
	261	#endif
	262
294eaca4	263	#ifndef MY_backend_data
57a1867e	264
a932d0ff ILT	265	#ifndef MY_zmagic_contiguous
	266	#define MY_zmagic_contiguous 0
	267	#endif
f5419a59 ILT	268	#ifndef MY_text_includes_header
	269	#define MY_text_includes_header 0
	270	#endif
	271	#ifndef MY_add_dynamic_symbols
	272	#define MY_add_dynamic_symbols 0
	273	#endif
	274	#ifndef MY_add_one_symbol
	275	#define MY_add_one_symbol 0
	276	#endif
	277	#ifndef MY_link_dynamic_object
	278	#define MY_link_dynamic_object 0
	279	#endif
	280	#ifndef MY_write_dynamic_symbol
	281	#define MY_write_dynamic_symbol 0
	282	#endif
	283	#ifndef MY_check_dynamic_reloc
	284	#define MY_check_dynamic_reloc 0
57a1867e	285	#endif
f5419a59 ILT	286	#ifndef MY_finish_dynamic_link
f5419a59 ILT	287	#define MY_finish_dynamic_link 0
57a1867e DM	288	#endif
57a1867e DM	289
294eaca4	290	static CONST struct aout_backend_data MY(backend_data) = {
a932d0ff	291	MY_zmagic_contiguous,
f5419a59 ILT	292	MY_text_includes_header,
f5419a59 ILT	293	MY_exec_hdr_flags,
294eaca4 SC	294	0, /* text vma? */
294eaca4 SC	295	MY_set_sizes,
1f29e30b	296	0, /* exec header is counted */
f5419a59 ILT	297	MY_add_dynamic_symbols,
	298	MY_add_one_symbol,
	299	MY_link_dynamic_object,
	300	MY_write_dynamic_symbol,
	301	MY_check_dynamic_reloc,
	302	MY_finish_dynamic_link
294eaca4 SC	303	};
	304	#define MY_backend_data &MY(backend_data)
	305	#endif
	306
f5419a59	307	#ifndef MY_final_link_callback
4c3721d5	308
f5419a59	309	/* Callback for the final_link routine to set the section offsets. */
4c3721d5	310
f5419a59	311	static void MY_final_link_callback
4c3721d5 ILT	312	PARAMS ((bfd , file_ptr , file_ptr , file_ptr ));
	313
	314	static void
f5419a59	315	MY_final_link_callback (abfd, ptreloff, pdreloff, psymoff)
4c3721d5 ILT	316	bfd *abfd;
	317	file_ptr *ptreloff;
	318	file_ptr *pdreloff;
	319	file_ptr *psymoff;
	320	{
	321	struct internal_exec *execp = exec_hdr (abfd);
	322
	323	ptreloff = N_TRELOFF (execp);
	324	pdreloff = N_DRELOFF (execp);
	325	psymoff = N_SYMOFF (execp);
	326	}
	327
f5419a59 ILT	328	#endif
	329
	330	#ifndef MY_bfd_final_link
	331
	332	/* Final link routine. We need to use a call back to get the correct
	333	offsets in the output file. */
	334
4c3721d5 ILT	335	static boolean
	336	MY_bfd_final_link (abfd, info)
	337	bfd *abfd;
	338	struct bfd_link_info *info;
	339	{
f5419a59	340	return NAME(aout,final_link) (abfd, info, MY_final_link_callback);
4c3721d5 ILT	341	}
	342
	343	#endif
	344
e98e6ec1 SC	345	/* We assume BFD generic archive files. */
	346	#ifndef MY_openr_next_archived_file
	347	#define MY_openr_next_archived_file bfd_generic_openr_next_archived_file
	348	#endif
	349	#ifndef MY_generic_stat_arch_elt
	350	#define MY_generic_stat_arch_elt bfd_generic_stat_arch_elt
	351	#endif
	352	#ifndef MY_slurp_armap
	353	#define MY_slurp_armap bfd_slurp_bsd_armap
	354	#endif
	355	#ifndef MY_slurp_extended_name_table
582bc90a	356	#define MY_slurp_extended_name_table _bfd_slurp_extended_name_table
e98e6ec1 SC	357	#endif
	358	#ifndef MY_write_armap
	359	#define MY_write_armap bsd_write_armap
	360	#endif
	361	#ifndef MY_truncate_arname
	362	#define MY_truncate_arname bfd_bsd_truncate_arname
	363	#endif
d7785845 ILT	364	#ifndef MY_update_armap_timestamp
	365	#define MY_update_armap_timestamp _bfd_archive_bsd_update_armap_timestamp
	366	#endif
e98e6ec1 SC	367
	368	/* No core file defined here -- configure in trad-core.c separately. */
	369	#ifndef MY_core_file_failing_command
6812b607	370	#define MY_core_file_failing_command _bfd_nocore_core_file_failing_command
e98e6ec1 SC	371	#endif
e98e6ec1 SC	372	#ifndef MY_core_file_failing_signal
6812b607	373	#define MY_core_file_failing_signal _bfd_nocore_core_file_failing_signal
e98e6ec1 SC	374	#endif
	375	#ifndef MY_core_file_matches_executable_p
	376	#define MY_core_file_matches_executable_p \
6812b607	377	_bfd_nocore_core_file_matches_executable_p
e98e6ec1 SC	378	#endif
	379	#ifndef MY_core_file_p
	380	#define MY_core_file_p _bfd_dummy_target
	381	#endif
	382
	383	#ifndef MY_bfd_debug_info_start
	384	#define MY_bfd_debug_info_start bfd_void
	385	#endif
	386	#ifndef MY_bfd_debug_info_end
	387	#define MY_bfd_debug_info_end bfd_void
	388	#endif
	389	#ifndef MY_bfd_debug_info_accumulate
1f29e30b JG	390	#define MY_bfd_debug_info_accumulate \
1f29e30b JG	391	(void () PARAMS ((bfd, struct sec *))) bfd_void
e98e6ec1 SC	392	#endif
	393
	394	#ifndef MY_core_file_failing_command
	395	#define MY_core_file_failing_command NAME(aout,core_file_failing_command)
	396	#endif
	397	#ifndef MY_core_file_failing_signal
	398	#define MY_core_file_failing_signal NAME(aout,core_file_failing_signal)
	399	#endif
	400	#ifndef MY_core_file_matches_executable_p
	401	#define MY_core_file_matches_executable_p NAME(aout,core_file_matches_executable_p)
	402	#endif
e98e6ec1 SC	403	#ifndef MY_set_section_contents
	404	#define MY_set_section_contents NAME(aout,set_section_contents)
	405	#endif
	406	#ifndef MY_get_section_contents
	407	#define MY_get_section_contents NAME(aout,get_section_contents)
	408	#endif
	409	#ifndef MY_new_section_hook
	410	#define MY_new_section_hook NAME(aout,new_section_hook)
	411	#endif
	412	#ifndef MY_get_symtab_upper_bound
	413	#define MY_get_symtab_upper_bound NAME(aout,get_symtab_upper_bound)
	414	#endif
	415	#ifndef MY_get_symtab
	416	#define MY_get_symtab NAME(aout,get_symtab)
	417	#endif
	418	#ifndef MY_get_reloc_upper_bound
	419	#define MY_get_reloc_upper_bound NAME(aout,get_reloc_upper_bound)
	420	#endif
	421	#ifndef MY_canonicalize_reloc
	422	#define MY_canonicalize_reloc NAME(aout,canonicalize_reloc)
	423	#endif
	424	#ifndef MY_make_empty_symbol
	425	#define MY_make_empty_symbol NAME(aout,make_empty_symbol)
	426	#endif
	427	#ifndef MY_print_symbol
	428	#define MY_print_symbol NAME(aout,print_symbol)
	429	#endif
4c3721d5 ILT	430	#ifndef MY_get_symbol_info
	431	#define MY_get_symbol_info NAME(aout,get_symbol_info)
	432	#endif
e98e6ec1 SC	433	#ifndef MY_get_lineno
	434	#define MY_get_lineno NAME(aout,get_lineno)
	435	#endif
	436	#ifndef MY_set_arch_mach
	437	#define MY_set_arch_mach NAME(aout,set_arch_mach)
	438	#endif
e98e6ec1 SC	439	#ifndef MY_find_nearest_line
	440	#define MY_find_nearest_line NAME(aout,find_nearest_line)
	441	#endif
e98e6ec1 SC	442	#ifndef MY_sizeof_headers
	443	#define MY_sizeof_headers NAME(aout,sizeof_headers)
	444	#endif
4c3721d5 ILT	445	#ifndef MY_bfd_get_relocated_section_contents
	446	#define MY_bfd_get_relocated_section_contents \
	447	bfd_generic_get_relocated_section_contents
e98e6ec1	448	#endif
4c3721d5 ILT	449	#ifndef MY_bfd_relax_section
	450	#define MY_bfd_relax_section bfd_generic_relax_section
	451	#endif
	452	#ifndef MY_bfd_reloc_type_lookup
	453	#define MY_bfd_reloc_type_lookup NAME(aout,reloc_type_lookup)
e98e6ec1	454	#endif
4c3721d5 ILT	455	#ifndef MY_bfd_make_debug_symbol
4c3721d5 ILT	456	#define MY_bfd_make_debug_symbol 0
e98e6ec1	457	#endif
4c3721d5 ILT	458	#ifndef MY_bfd_link_hash_table_create
4c3721d5 ILT	459	#define MY_bfd_link_hash_table_create NAME(aout,link_hash_table_create)
582bc90a	460	#endif
4c3721d5 ILT	461	#ifndef MY_bfd_link_add_symbols
4c3721d5 ILT	462	#define MY_bfd_link_add_symbols NAME(aout,link_add_symbols)
582bc90a	463	#endif
294eaca4	464
9deaaaf1	465	#ifndef MY_bfd_copy_private_bfd_data
6812b607	466	#define MY_bfd_copy_private_bfd_data _bfd_generic_bfd_copy_private_bfd_data
9deaaaf1 ILT	467	#endif
	468
	469	#ifndef MY_bfd_is_local_label
	470	#define MY_bfd_is_local_label bfd_generic_is_local_label
	471	#endif
	472
	473	#ifndef MY_bfd_free_cached_info
5c8444f8 ILT	474	#define MY_bfd_free_cached_info NAME(aout,bfd_free_cached_info)
	475	#endif
	476
	477	#ifndef MY_close_and_cleanup
	478	#define MY_close_and_cleanup MY_bfd_free_cached_info
9deaaaf1 ILT	479	#endif
9deaaaf1 ILT	480
f5419a59 ILT	481	#ifndef MY_get_dynamic_symtab_upper_bound
	482	#define MY_get_dynamic_symtab_upper_bound \
	483	_bfd_nodynamic_get_dynamic_symtab_upper_bound
	484	#endif
	485	#ifndef MY_canonicalize_dynamic_symtab
	486	#define MY_canonicalize_dynamic_symtab \
	487	_bfd_nodynamic_canonicalize_dynamic_symtab
	488	#endif
	489	#ifndef MY_get_dynamic_reloc_upper_bound
	490	#define MY_get_dynamic_reloc_upper_bound \
	491	_bfd_nodynamic_get_dynamic_reloc_upper_bound
	492	#endif
	493	#ifndef MY_canonicalize_dynamic_reloc
	494	#define MY_canonicalize_dynamic_reloc \
	495	_bfd_nodynamic_canonicalize_dynamic_reloc
	496	#endif
	497
294eaca4 SC	498	/* Aout symbols normally have leading underscores */
	499	#ifndef MY_symbol_leading_char
	500	#define MY_symbol_leading_char '_'
582bc90a	501	#endif
e98e6ec1	502
4c3721d5 ILT	503	/* Aout archives normally use spaces for padding */
	504	#ifndef AR_PAD_CHAR
	505	#define AR_PAD_CHAR ' '
	506	#endif
	507
	508	#ifndef MY_BFD_TARGET
a932d0ff	509	const bfd_target MY(vec) =
e98e6ec1 SC	510	{
	511	TARGETNAME, /* name */
	512	bfd_target_aout_flavour,
582bc90a PB	513	#ifdef TARGET_IS_BIG_ENDIAN_P
	514	true, /* target byte order (big) */
	515	true, /* target headers byte order (big) */
	516	#else
	517	false, /* target byte order (little) */
	518	false, /* target headers byte order (little) */
	519	#endif
e98e6ec1 SC	520	(HAS_RELOC \| EXEC_P \| /* object flags */
e98e6ec1 SC	521	HAS_LINENO \| HAS_DEBUG \|
57a1867e	522	HAS_SYMS \| HAS_LOCALS \| DYNAMIC \| WP_TEXT \| D_PAGED),
e98e6ec1	523	(SEC_HAS_CONTENTS \| SEC_ALLOC \| SEC_LOAD \| SEC_RELOC), /* section flags */
294eaca4	524	MY_symbol_leading_char,
4c3721d5	525	AR_PAD_CHAR, /* ar_pad_char */
582bc90a	526	15, /* ar_max_namelen */
4c3721d5	527	3, /* minimum alignment */
e98e6ec1	528	#ifdef TARGET_IS_BIG_ENDIAN_P
4c3721d5 ILT	529	bfd_getb64, bfd_getb_signed_64, bfd_putb64,
	530	bfd_getb32, bfd_getb_signed_32, bfd_putb32,
	531	bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
	532	bfd_getb64, bfd_getb_signed_64, bfd_putb64,
	533	bfd_getb32, bfd_getb_signed_32, bfd_putb32,
	534	bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
e98e6ec1	535	#else
4c3721d5 ILT	536	bfd_getl64, bfd_getl_signed_64, bfd_putl64,
	537	bfd_getl32, bfd_getl_signed_32, bfd_putl32,
	538	bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* data */
	539	bfd_getl64, bfd_getl_signed_64, bfd_putl64,
	540	bfd_getl32, bfd_getl_signed_32, bfd_putl32,
	541	bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* hdrs */
e98e6ec1 SC	542	#endif
	543	{_bfd_dummy_target, MY_object_p, /* bfd_check_format */
	544	bfd_generic_archive_p, MY_core_file_p},
	545	{bfd_false, MY_mkobject, /* bfd_set_format */
	546	_bfd_generic_mkarchive, bfd_false},
	547	{bfd_false, MY_write_object_contents, /* bfd_write_contents */
	548	_bfd_write_archive_contents, bfd_false},
	549
6812b607 ILT	550	BFD_JUMP_TABLE_GENERIC (MY),
	551	BFD_JUMP_TABLE_COPY (MY),
	552	BFD_JUMP_TABLE_CORE (MY),
	553	BFD_JUMP_TABLE_ARCHIVE (MY),
	554	BFD_JUMP_TABLE_SYMBOLS (MY),
	555	BFD_JUMP_TABLE_RELOCS (MY),
	556	BFD_JUMP_TABLE_WRITE (MY),
	557	BFD_JUMP_TABLE_LINK (MY),
f5419a59	558	BFD_JUMP_TABLE_DYNAMIC (MY),
6812b607	559
582bc90a	560	(PTR) MY_backend_data,
e98e6ec1	561	};
4c3721d5	562	#endif /* MY_BFD_TARGET */