[deliverable/binutils-gdb.git] / bfd / libaout.h

/* BFD back-end data structures for a.out (and similar) files.
   Copyright 1990, 1991, 1992 Free Software Foundation, Inc.
   Written by Cygnus Support.

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.  */

/* We try to encapsulate the differences in the various a.out file
   variants in a few routines, and otherwise share large masses of code.
   This means we only have to fix bugs in one place, most of the time.  */

/* Parameterize the a.out code based on whether it is being built
   for a 32-bit architecture or a 64-bit architecture.  */
#if ARCH_SIZE==64
#define GET_WORD bfd_h_get_64
#define GET_SWORD bfd_h_get_signed_64
#define PUT_WORD bfd_h_put_64
#ifndef NAME
#define NAME(x,y) CAT3(x,_64_,y)
#endif
#define JNAME(x) CAT(x,_64)
#define BYTES_IN_WORD 8
#else /* ARCH_SIZE == 32 */
#define GET_WORD bfd_h_get_32
#define GET_SWORD bfd_h_get_signed_32
#define PUT_WORD bfd_h_put_32
#ifndef NAME
#define NAME(x,y) CAT3(x,_32_,y)
#endif
#define JNAME(x) CAT(x,_32)
#define BYTES_IN_WORD 4
#endif /* ARCH_SIZE==32 */

/* Declare at file level, since used in parameter lists, which have
   weird scope.  */
struct external_exec;
struct external_nlist;
struct reloc_ext_external;
struct reloc_std_external;

/* Back-end information for various a.out targets.  */
struct aout_backend_data
{
  /* Are ZMAGIC files mapped contiguously?  If so, the text section may
     need more padding, if the segment size (granularity for memory access
     control) is larger than the page size.  */
  unsigned char zmagic_mapped_contiguous;
  /* If this flag is set, ZMAGIC/NMAGIC file headers get mapped in with the
     text section, which starts immediately after the file header.
     If not, the text section starts on the next page.  */
  unsigned char text_includes_header;

  /* If the text section VMA isn't specified, and we need an absolute
     address, use this as the default.  If we're producing a relocatable
     file, zero is always used.  */
  /* ?? Perhaps a callback would be a better choice?  Will this do anything
     reasonable for a format that handles multiple CPUs with different
     load addresses for each?  */
  bfd_vma default_text_vma;

  /* Callback for setting the page and segment sizes, if they can't be
     trivially determined from the architecture.  */
  boolean (*set_sizes) PARAMS ((bfd *));

  /* zmagic files only. For go32, the length of the exec header contributes
     to the size of the text section in the file for alignment purposes but
     does *not* get counted in the length of the text section. */
  unsigned char exec_header_not_counted;
};
#define aout_backend_info(abfd) \
	((CONST struct aout_backend_data *)((abfd)->xvec->backend_data))

/* This is the layout in memory of a "struct exec" while we process it.
   All 'lengths' are given as a number of bytes.
   All 'alignments' are for relinkable files only;  an alignment of
	'n' indicates the corresponding segment must begin at an
	address that is a multiple of (2**n).  */

struct internal_exec
{
    long a_info;		/* Magic number and flags, packed */
    bfd_vma a_text;		/* length of text, in bytes  */
    bfd_vma a_data;		/* length of data, in bytes  */
    bfd_vma a_bss;		/* length of uninitialized data area in mem */
    bfd_vma a_syms;		/* length of symbol table data in file */
    bfd_vma a_entry;		/* start address */
    bfd_vma a_trsize;		/* length of text's relocation info, in bytes */
    bfd_vma a_drsize;		/* length of data's relocation info, in bytes */
    /* Added for i960 */
    bfd_vma a_tload;		/* Text runtime load address */
    bfd_vma a_dload;		/* Data runtime load address */
    unsigned char a_talign;	/* Alignment of text segment */
    unsigned char a_dalign;	/* Alignment of data segment */
    unsigned char a_balign;	/* Alignment of bss segment */
    char a_relaxable;           /* Enough info for linker relax */
};

/* Magic number is written 
< MSB        >
3130292827262524232221201918171615141312111009080706050403020100
< FLAGS      >< MACHINE TYPE ><  MAGIC NUMBER		       >
*/
/* Magic number for NetBSD is
<MSB         >
3130292827262524232221201918171615141312111009080706050403020100
< FLAGS    ><                  ><  MAGIC NUMBER                >
*/

enum machine_type {
  M_UNKNOWN = 0,
  M_68010 = 1,
  M_68020 = 2,
  M_SPARC = 3,
  /* skip a bunch so we don't run into any of suns numbers */
  M_386 = 100,
  M_29K = 101,          /* AMD 29000 */
  M_386_DYNIX = 102,	/* Sequent running dynix */
  M_386_NETBSD = 134,		/* NetBSD/386 binary */
  M_MIPS1 = 151,        /* MIPS R2000/R3000 binary */
  M_MIPS2 = 152,        /* MIPS R4000/R6000 binary */
  M_HP200 = 200,	/* HP 200 (68010) BSD binary */
  M_HP300 = (300 % 256), /* HP 300 (68020+68881) BSD binary */
  M_HPUX = (0x20c % 256)/* HP 200/300 HPUX binary */
};

#define N_DYNAMIC(exec) ((exec).a_info & 0x80000000)

#ifndef N_MAGIC
# define N_MAGIC(exec) ((exec).a_info & 0xffff)
#endif

#ifndef N_MACHTYPE
# define N_MACHTYPE(exec) ((enum machine_type)(((exec).a_info >> 16) & 0xff))
#endif

#ifndef N_FLAGS
# define N_FLAGS(exec) (((exec).a_info >> 24) & 0xff)
#endif

#ifndef N_SET_INFO
# define N_SET_INFO(exec, magic, type, flags) \
((exec).a_info = ((magic) & 0xffff) \
 | (((int)(type) & 0xff) << 16) \
 | (((flags) & 0xff) << 24))
#endif

#ifndef N_SET_DYNAMIC
# define N_SET_DYNAMIC(exec, dynamic) \
((exec).a_info = (dynamic) ? ((exec).a_info | 0x80000000) : \
((exec).a_info & 0x7fffffff))
#endif

#ifndef N_SET_MAGIC
# define N_SET_MAGIC(exec, magic) \
((exec).a_info = (((exec).a_info & 0xffff0000) | ((magic) & 0xffff)))
#endif

#ifndef N_SET_MACHTYPE
# define N_SET_MACHTYPE(exec, machtype) \
((exec).a_info = \
 ((exec).a_info&0xff00ffff) | ((((int)(machtype))&0xff) << 16))
#endif

#ifndef N_SET_FLAGS
# define N_SET_FLAGS(exec, flags) \
((exec).a_info = \
 ((exec).a_info&0x00ffffff) | (((flags) & 0xff) << 24))
#endif

typedef struct aout_symbol {
  asymbol symbol;
  short desc;
  char other;
  unsigned char type;
} aout_symbol_type;

/* The `tdata' struct for all a.out-like object file formats.
   Various things depend on this struct being around any time an a.out
   file is being handled.  An example is dbxread.c in GDB.  */

struct aoutdata {
  struct internal_exec *hdr;		/* exec file header */
  aout_symbol_type *symbols;		/* symtab for input bfd */
  
  /* For ease, we do this */
  asection *textsec;
  asection *datasec;
  asection *bsssec;

  /* We remember these offsets so that after check_file_format, we have
     no dependencies on the particular format of the exec_hdr.  */
  file_ptr sym_filepos;
  file_ptr str_filepos;

  /* Size of a relocation entry in external form */
  unsigned reloc_entry_size;

  /* Size of a symbol table entry in external form */
  unsigned symbol_entry_size;

  /* Page size - needed for alignment of demand paged files. */
  unsigned long page_size;

  /* Segment size - needed for alignment of demand paged files. */
  unsigned long segment_size;

  unsigned exec_bytes_size;
  unsigned vma_adjusted : 1;

  /* used when a bfd supports several highly similar formats */
  enum {
    default_format = 0,
    gnu_encap_format } subformat;

  enum {
    undecided_magic = 0,
    z_magic,
    o_magic,
    n_magic } magic;

  /* The external symbol information.  */
  struct external_nlist *external_syms;
  bfd_size_type external_sym_count;
  char *external_strings;
  bfd_size_type external_string_size;
  struct aout_link_hash_entry **sym_hashes;

  /* A pointer for shared library information.  */
  PTR dynamic_info;
};

struct  aout_data_struct {
    struct aoutdata a;
    struct internal_exec e;
};

#define	adata(bfd)		((bfd)->tdata.aout_data->a)
#define	exec_hdr(bfd)		(adata(bfd).hdr)
#define	obj_aout_symbols(bfd)	(adata(bfd).symbols)
#define	obj_textsec(bfd)	(adata(bfd).textsec)
#define	obj_datasec(bfd)	(adata(bfd).datasec)
#define	obj_bsssec(bfd)		(adata(bfd).bsssec)
#define	obj_sym_filepos(bfd)	(adata(bfd).sym_filepos)
#define	obj_str_filepos(bfd)	(adata(bfd).str_filepos)
#define	obj_reloc_entry_size(bfd) (adata(bfd).reloc_entry_size)
#define	obj_symbol_entry_size(bfd) (adata(bfd).symbol_entry_size)
#define obj_aout_subformat(bfd)	(adata(bfd).subformat)
#define obj_aout_external_syms(bfd) (adata(bfd).external_syms)
#define obj_aout_external_sym_count(bfd) (adata(bfd).external_sym_count)
#define obj_aout_external_strings(bfd) (adata(bfd).external_strings)
#define obj_aout_external_string_size(bfd) (adata(bfd).external_string_size)
#define obj_aout_sym_hashes(bfd) (adata(bfd).sym_hashes)
#define obj_aout_dynamic_info(bfd) (adata(bfd).dynamic_info)

/* We take the address of the first element of an asymbol to ensure that the
   macro is only ever applied to an asymbol */
#define aout_symbol(asymbol) ((aout_symbol_type *)(&(asymbol)->the_bfd))

/* Prototype declarations for functions defined in aoutx.h  */

boolean
NAME(aout,squirt_out_relocs) PARAMS ((bfd *abfd, asection *section));

bfd_target *
NAME(aout,some_aout_object_p) PARAMS ((bfd *abfd,
			struct internal_exec *execp,
			bfd_target * (*callback)(bfd *)));

boolean
NAME(aout,mkobject) PARAMS ((bfd *abfd));

enum machine_type
NAME(aout,machine_type) PARAMS ((enum bfd_architecture arch,
				 unsigned long machine));

boolean
NAME(aout,set_arch_mach) PARAMS ((bfd *abfd, enum bfd_architecture arch,
		 		  unsigned long machine));

boolean
NAME(aout,new_section_hook) PARAMS ((bfd *abfd, asection *newsect));

boolean
NAME(aout,set_section_contents) PARAMS ((bfd *abfd, sec_ptr section,
			 PTR location, file_ptr offset, bfd_size_type count));

asymbol *
NAME(aout,make_empty_symbol) PARAMS ((bfd *abfd));

boolean
NAME(aout,translate_symbol_table) PARAMS ((bfd *, aout_symbol_type *,
					   struct external_nlist *,
					   bfd_size_type, char *,
					   bfd_size_type,
					   boolean dynamic));

boolean
NAME(aout,slurp_symbol_table) PARAMS ((bfd *abfd));

boolean
NAME(aout,write_syms) PARAMS ((bfd *abfd));

void
NAME(aout,reclaim_symbol_table) PARAMS ((bfd *abfd));

long
NAME(aout,get_symtab_upper_bound) PARAMS ((bfd *abfd));

long
NAME(aout,get_symtab) PARAMS ((bfd *abfd, asymbol **location));

void
NAME(aout,swap_ext_reloc_in) PARAMS ((bfd *, struct reloc_ext_external *,
				      arelent *, asymbol **));
void
NAME(aout,swap_std_reloc_in) PARAMS ((bfd *, struct reloc_std_external *,
				      arelent *, asymbol **));

boolean
NAME(aout,slurp_reloc_table) PARAMS ((bfd *abfd, sec_ptr asect,
				      asymbol **symbols));

long
NAME(aout,canonicalize_reloc) PARAMS ((bfd *abfd, sec_ptr section,
				       arelent **relptr, asymbol **symbols));

long
NAME(aout,get_reloc_upper_bound) PARAMS ((bfd *abfd, sec_ptr asect));

void
NAME(aout,reclaim_reloc) PARAMS ((bfd *ignore_abfd, sec_ptr ignore));

alent *
NAME(aout,get_lineno) PARAMS ((bfd *ignore_abfd, asymbol *ignore_symbol));

void
NAME(aout,print_symbol) PARAMS ((bfd *ignore_abfd, PTR file,
			    asymbol *symbol, bfd_print_symbol_type how));

void
NAME(aout,get_symbol_info) PARAMS ((bfd *ignore_abfd,
                           asymbol *symbol, symbol_info *ret));

boolean
NAME(aout,find_nearest_line) PARAMS ((bfd *abfd, asection *section,
      asymbol **symbols, bfd_vma offset, CONST char **filename_ptr,
      CONST char **functionname_ptr, unsigned int *line_ptr));

int
NAME(aout,sizeof_headers) PARAMS ((bfd *abfd, boolean exec));

boolean
NAME(aout,adjust_sizes_and_vmas) PARAMS ((bfd *abfd,
       bfd_size_type *text_size, file_ptr *text_end));

void
NAME(aout,swap_exec_header_in) PARAMS ((bfd *abfd,
       struct external_exec *raw_bytes, struct internal_exec *execp));

void
NAME(aout,swap_exec_header_out) PARAMS ((bfd *abfd,
       struct internal_exec *execp, struct external_exec *raw_bytes));

struct bfd_link_hash_table *
NAME(aout,link_hash_table_create) PARAMS ((bfd *));

boolean
NAME(aout,link_add_symbols) PARAMS ((bfd *, struct bfd_link_info *));

boolean
NAME(aout,final_link) PARAMS ((bfd *, struct bfd_link_info *,
			       void (*) (bfd *, file_ptr *, file_ptr *,
					 file_ptr *)));

boolean
NAME(aout,bfd_free_cached_info) PARAMS ((bfd *));

/* Prototypes for functions in stab-syms.c. */

CONST char *
aout_stab_name PARAMS ((int code));

/* A.out uses the generic versions of these routines... */

#define	aout_32_get_section_contents	_bfd_generic_get_section_contents

#define	aout_64_get_section_contents	_bfd_generic_get_section_contents
#ifndef NO_WRITE_HEADER_KLUDGE
#define NO_WRITE_HEADER_KLUDGE 0
#endif

#ifndef aout_32_bfd_is_local_label
#define aout_32_bfd_is_local_label bfd_generic_is_local_label
#endif

#ifndef WRITE_HEADERS
#define WRITE_HEADERS(abfd, execp)					      \
      {									      \
	bfd_size_type text_size; /* dummy vars */			      \
	file_ptr text_end;						      \
	if (adata(abfd).magic == undecided_magic)			      \
	  NAME(aout,adjust_sizes_and_vmas) (abfd, &text_size, &text_end);     \
    									      \
	execp->a_syms = bfd_get_symcount (abfd) * EXTERNAL_NLIST_SIZE;	      \
	execp->a_entry = bfd_get_start_address (abfd);			      \
    									      \
	execp->a_trsize = ((obj_textsec (abfd)->reloc_count) *		      \
			   obj_reloc_entry_size (abfd));		      \
	execp->a_drsize = ((obj_datasec (abfd)->reloc_count) *		      \
			   obj_reloc_entry_size (abfd));		      \
	NAME(aout,swap_exec_header_out) (abfd, execp, &exec_bytes);	      \
									      \
	if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0) return false;	      \
	if (bfd_write ((PTR) &exec_bytes, 1, EXEC_BYTES_SIZE, abfd)	      \
	    != EXEC_BYTES_SIZE)						      \
	  return false;							      \
	/* Now write out reloc info, followed by syms and strings */	      \
  									      \
	if (bfd_get_outsymbols (abfd) != (asymbol **) NULL		      \
	    && bfd_get_symcount (abfd) != 0) 				      \
	    {								      \
	      if (bfd_seek (abfd, (file_ptr)(N_SYMOFF(*execp)), SEEK_SET)     \
		  != 0)							      \
	        return false;						      \
									      \
	      if (! NAME(aout,write_syms)(abfd)) return false;		      \
									      \
	      if (bfd_seek (abfd, (file_ptr)(N_TRELOFF(*execp)), SEEK_SET)    \
		  != 0)							      \
	        return false;						      \
									      \
	      if (!NAME(aout,squirt_out_relocs) (abfd, obj_textsec (abfd)))   \
		return false;						      \
	      if (bfd_seek (abfd, (file_ptr)(N_DRELOFF(*execp)), SEEK_SET)    \
		  != 0)							      \
	        return false;						      \
									      \
	      if (!NAME(aout,squirt_out_relocs)(abfd, obj_datasec (abfd)))    \
		return false;						      \
	    }								      \
      }									      
#endif
Commit	Line	Data
69ebee86	1	/* BFD back-end data structures for a.out (and similar) files.
1f29e30b	2	Copyright 1990, 1991, 1992 Free Software Foundation, Inc.
9e2dad8e	3	Written by Cygnus Support.
69ebee86	4
9e2dad8e	5	This file is part of BFD, the Binary File Descriptor library.
69ebee86	6
9e2dad8e	7	This program is free software; you can redistribute it and/or modify
4a81b561	8	it under the terms of the GNU General Public License as published by
9e2dad8e JG	9	the Free Software Foundation; either version 2 of the License, or
9e2dad8e JG	10	(at your option) any later version.
4a81b561	11
9e2dad8e	12	This program is distributed in the hope that it will be useful,
4a81b561 DHW	13	but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	GNU General Public License for more details.
	16
	17	You should have received a copy of the GNU General Public License
9e2dad8e JG	18	along with this program; if not, write to the Free Software
	19	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
	20
	21	/* We try to encapsulate the differences in the various a.out file
	22	variants in a few routines, and otherwise share large masses of code.
	23	This means we only have to fix bugs in one place, most of the time. */
4a81b561	24
359f1dee JG	25	/* Parameterize the a.out code based on whether it is being built
359f1dee JG	26	for a 32-bit architecture or a 64-bit architecture. */
c0e5039e JG	27	#if ARCH_SIZE==64
c0e5039e JG	28	#define GET_WORD bfd_h_get_64
4c3721d5	29	#define GET_SWORD bfd_h_get_signed_64
c0e5039e	30	#define PUT_WORD bfd_h_put_64
c2623b7d	31	#ifndef NAME
c0e5039e	32	#define NAME(x,y) CAT3(x,_64_,y)
c2623b7d	33	#endif
c0e5039e JG	34	#define JNAME(x) CAT(x,_64)
c0e5039e JG	35	#define BYTES_IN_WORD 8
c2623b7d	36	#else /* ARCH_SIZE == 32 */
c0e5039e	37	#define GET_WORD bfd_h_get_32
4c3721d5	38	#define GET_SWORD bfd_h_get_signed_32
c0e5039e	39	#define PUT_WORD bfd_h_put_32
c2623b7d	40	#ifndef NAME
c0e5039e	41	#define NAME(x,y) CAT3(x,_32_,y)
c2623b7d	42	#endif
c0e5039e JG	43	#define JNAME(x) CAT(x,_32)
c0e5039e JG	44	#define BYTES_IN_WORD 4
c2623b7d	45	#endif /* ARCH_SIZE==32 */
c0e5039e	46
326e32d7 ILT	47	/* Declare at file level, since used in parameter lists, which have
326e32d7 ILT	48	weird scope. */
9e2dad8e	49	struct external_exec;
326e32d7	50	struct external_nlist;
fa77c704 ILT	51	struct reloc_ext_external;
fa77c704 ILT	52	struct reloc_std_external;
9e2dad8e	53
ce07dd7c KR	54	/* Back-end information for various a.out targets. */
	55	struct aout_backend_data
	56	{
	57	/* Are ZMAGIC files mapped contiguously? If so, the text section may
	58	need more padding, if the segment size (granularity for memory access
	59	control) is larger than the page size. */
7f90aa8b	60	unsigned char zmagic_mapped_contiguous;
ce07dd7c KR	61	/* If this flag is set, ZMAGIC/NMAGIC file headers get mapped in with the
	62	text section, which starts immediately after the file header.
	63	If not, the text section starts on the next page. */
7f90aa8b	64	unsigned char text_includes_header;
ce07dd7c KR	65
	66	/* If the text section VMA isn't specified, and we need an absolute
	67	address, use this as the default. If we're producing a relocatable
	68	file, zero is always used. */
	69	/* ?? Perhaps a callback would be a better choice? Will this do anything
	70	reasonable for a format that handles multiple CPUs with different
	71	load addresses for each? */
	72	bfd_vma default_text_vma;
7f90aa8b ME	73
	74	/* Callback for setting the page and segment sizes, if they can't be
	75	trivially determined from the architecture. */
	76	boolean (set_sizes) PARAMS ((bfd ));
	77
	78	/* zmagic files only. For go32, the length of the exec header contributes
	79	to the size of the text section in the file for alignment purposes but
	80	does not get counted in the length of the text section. */
	81	unsigned char exec_header_not_counted;
ce07dd7c KR	82	};
	83	#define aout_backend_info(abfd) \
	84	((CONST struct aout_backend_data *)((abfd)->xvec->backend_data))
	85
0fa4f690 JG	86	/* This is the layout in memory of a "struct exec" while we process it.
	87	All 'lengths' are given as a number of bytes.
	88	All 'alignments' are for relinkable files only; an alignment of
	89	'n' indicates the corresponding segment must begin at an
	90	address that is a multiple of (2*n). /
	91
	92	struct internal_exec
	93	{
	94	long a_info; /* Magic number and flags, packed */
	95	bfd_vma a_text; /* length of text, in bytes */
	96	bfd_vma a_data; /* length of data, in bytes */
	97	bfd_vma a_bss; /* length of uninitialized data area in mem */
	98	bfd_vma a_syms; /* length of symbol table data in file */
	99	bfd_vma a_entry; /* start address */
	100	bfd_vma a_trsize; /* length of text's relocation info, in bytes */
	101	bfd_vma a_drsize; /* length of data's relocation info, in bytes */
	102	/* Added for i960 */
	103	bfd_vma a_tload; /* Text runtime load address */
	104	bfd_vma a_dload; /* Data runtime load address */
	105	unsigned char a_talign; /* Alignment of text segment */
	106	unsigned char a_dalign; /* Alignment of data segment */
	107	unsigned char a_balign; /* Alignment of bss segment */
7f90aa8b	108	char a_relaxable; /* Enough info for linker relax */
0fa4f690 JG	109	};
	110
	111	/* Magic number is written
	112	< MSB >
	113	3130292827262524232221201918171615141312111009080706050403020100
	114	< FLAGS >< MACHINE TYPE >< MAGIC NUMBER >
	115	*/
4c3721d5 ILT	116	/* Magic number for NetBSD is
	117	<MSB >
	118	3130292827262524232221201918171615141312111009080706050403020100
	119	< FLAGS >< >< MAGIC NUMBER >
	120	*/
	121
0fa4f690 JG	122	enum machine_type {
	123	M_UNKNOWN = 0,
	124	M_68010 = 1,
	125	M_68020 = 2,
	126	M_SPARC = 3,
9eb73722	127	/* skip a bunch so we don't run into any of suns numbers */
0fa4f690	128	M_386 = 100,
9eb73722	129	M_29K = 101, /* AMD 29000 */
4c3721d5 ILT	130	M_386_DYNIX = 102, /* Sequent running dynix */
4c3721d5 ILT	131	M_386_NETBSD = 134, /* NetBSD/386 binary */
9eb73722 KR	132	M_MIPS1 = 151, /* MIPS R2000/R3000 binary */
9eb73722 KR	133	M_MIPS2 = 152, /* MIPS R4000/R6000 binary */
0fa4f690 JG	134	M_HP200 = 200, /* HP 200 (68010) BSD binary */
0fa4f690 JG	135	M_HP300 = (300 % 256), /* HP 300 (68020+68881) BSD binary */
ce07dd7c	136	M_HPUX = (0x20c % 256)/* HP 200/300 HPUX binary */
0fa4f690 JG	137	};
0fa4f690 JG	138
326e32d7	139	#define N_DYNAMIC(exec) ((exec).a_info & 0x80000000)
0fa4f690	140
4c3721d5 ILT	141	#ifndef N_MAGIC
	142	# define N_MAGIC(exec) ((exec).a_info & 0xffff)
	143	#endif
	144
	145	#ifndef N_MACHTYPE
	146	# define N_MACHTYPE(exec) ((enum machine_type)(((exec).a_info >> 16) & 0xff))
	147	#endif
	148
	149	#ifndef N_FLAGS
	150	# define N_FLAGS(exec) (((exec).a_info >> 24) & 0xff)
	151	#endif
	152
	153	#ifndef N_SET_INFO
	154	# define N_SET_INFO(exec, magic, type, flags) \
0fa4f690 JG	155	((exec).a_info = ((magic) & 0xffff) \
	156	\| (((int)(type) & 0xff) << 16) \
	157	\| (((flags) & 0xff) << 24))
4c3721d5	158	#endif
0fa4f690	159
326e32d7 ILT	160	#ifndef N_SET_DYNAMIC
	161	# define N_SET_DYNAMIC(exec, dynamic) \
	162	((exec).a_info = (dynamic) ? ((exec).a_info \| 0x80000000) : \
	163	((exec).a_info & 0x7fffffff))
	164	#endif
	165
4c3721d5 ILT	166	#ifndef N_SET_MAGIC
4c3721d5 ILT	167	# define N_SET_MAGIC(exec, magic) \
0fa4f690	168	((exec).a_info = (((exec).a_info & 0xffff0000) \| ((magic) & 0xffff)))
4c3721d5	169	#endif
0fa4f690	170
4c3721d5 ILT	171	#ifndef N_SET_MACHTYPE
4c3721d5 ILT	172	# define N_SET_MACHTYPE(exec, machtype) \
0fa4f690 JG	173	((exec).a_info = \
0fa4f690 JG	174	((exec).a_info&0xff00ffff) \| ((((int)(machtype))&0xff) << 16))
4c3721d5	175	#endif
0fa4f690	176
4c3721d5 ILT	177	#ifndef N_SET_FLAGS
4c3721d5 ILT	178	# define N_SET_FLAGS(exec, flags) \
0fa4f690 JG	179	((exec).a_info = \
0fa4f690 JG	180	((exec).a_info&0x00ffffff) \| (((flags) & 0xff) << 24))
4c3721d5	181	#endif
0fa4f690	182
69ebee86	183	typedef struct aout_symbol {
4a81b561 DHW	184	asymbol symbol;
4a81b561 DHW	185	short desc;
69ebee86 JG	186	char other;
69ebee86 JG	187	unsigned char type;
4a81b561 DHW	188	} aout_symbol_type;
4a81b561 DHW	189
0fa4f690 JG	190	/* The `tdata' struct for all a.out-like object file formats.
	191	Various things depend on this struct being around any time an a.out
	192	file is being handled. An example is dbxread.c in GDB. */
	193
69ebee86	194	struct aoutdata {
0fa4f690	195	struct internal_exec hdr; / exec file header */
4a81b561	196	aout_symbol_type symbols; / symtab for input bfd */
4a81b561 DHW	197
	198	/* For ease, we do this */
	199	asection *textsec;
	200	asection *datasec;
	201	asection *bsssec;
	202
	203	/* We remember these offsets so that after check_file_format, we have
	204	no dependencies on the particular format of the exec_hdr. */
	205	file_ptr sym_filepos;
	206	file_ptr str_filepos;
4a81b561	207
0fa4f690	208	/* Size of a relocation entry in external form */
69ebee86	209	unsigned reloc_entry_size;
4a81b561	210
0fa4f690 JG	211	/* Size of a symbol table entry in external form */
0fa4f690 JG	212	unsigned symbol_entry_size;
4a81b561	213
0fa4f690 JG	214	/* Page size - needed for alignment of demand paged files. */
0fa4f690 JG	215	unsigned long page_size;
4a81b561	216
0fa4f690 JG	217	/* Segment size - needed for alignment of demand paged files. */
0fa4f690 JG	218	unsigned long segment_size;
4a81b561	219
0fa4f690	220	unsigned exec_bytes_size;
ce07dd7c KR	221	unsigned vma_adjusted : 1;
ce07dd7c KR	222
9eb73722 KR	223	/* used when a bfd supports several highly similar formats */
	224	enum {
	225	default_format = 0,
	226	gnu_encap_format } subformat;
	227
ce07dd7c KR	228	enum {
	229	undecided_magic = 0,
	230	z_magic,
	231	o_magic,
	232	n_magic } magic;
4c3721d5 ILT	233
	234	/* The external symbol information. */
	235	struct external_nlist *external_syms;
	236	bfd_size_type external_sym_count;
	237	char *external_strings;
5c8444f8	238	bfd_size_type external_string_size;
4c3721d5	239	struct aout_link_hash_entry **sym_hashes;
326e32d7 ILT	240
	241	/* A pointer for shared library information. */
	242	PTR dynamic_info;
0fa4f690	243	};
4a81b561	244
ce07dd7c KR	245	struct aout_data_struct {
	246	struct aoutdata a;
	247	struct internal_exec e;
	248	};
	249
	250	#define adata(bfd) ((bfd)->tdata.aout_data->a)
	251	#define exec_hdr(bfd) (adata(bfd).hdr)
	252	#define obj_aout_symbols(bfd) (adata(bfd).symbols)
	253	#define obj_textsec(bfd) (adata(bfd).textsec)
	254	#define obj_datasec(bfd) (adata(bfd).datasec)
	255	#define obj_bsssec(bfd) (adata(bfd).bsssec)
	256	#define obj_sym_filepos(bfd) (adata(bfd).sym_filepos)
	257	#define obj_str_filepos(bfd) (adata(bfd).str_filepos)
	258	#define obj_reloc_entry_size(bfd) (adata(bfd).reloc_entry_size)
	259	#define obj_symbol_entry_size(bfd) (adata(bfd).symbol_entry_size)
9eb73722	260	#define obj_aout_subformat(bfd) (adata(bfd).subformat)
4c3721d5 ILT	261	#define obj_aout_external_syms(bfd) (adata(bfd).external_syms)
	262	#define obj_aout_external_sym_count(bfd) (adata(bfd).external_sym_count)
	263	#define obj_aout_external_strings(bfd) (adata(bfd).external_strings)
5c8444f8	264	#define obj_aout_external_string_size(bfd) (adata(bfd).external_string_size)
4c3721d5	265	#define obj_aout_sym_hashes(bfd) (adata(bfd).sym_hashes)
326e32d7	266	#define obj_aout_dynamic_info(bfd) (adata(bfd).dynamic_info)
69ebee86	267
0fa4f690 JG	268	/* We take the address of the first element of an asymbol to ensure that the
	269	macro is only ever applied to an asymbol */
	270	#define aout_symbol(asymbol) ((aout_symbol_type *)(&(asymbol)->the_bfd))
69ebee86	271
c0e5039e	272	/* Prototype declarations for functions defined in aoutx.h */
69ebee86	273
1f29e30b JG	274	boolean
1f29e30b JG	275	NAME(aout,squirt_out_relocs) PARAMS ((bfd abfd, asection section));
69ebee86	276
1f29e30b JG	277	bfd_target *
	278	NAME(aout,some_aout_object_p) PARAMS ((bfd *abfd,
	279	struct internal_exec *execp,
	280	bfd_target * (callback)(bfd )));
69ebee86	281
1f29e30b JG	282	boolean
	283	NAME(aout,mkobject) PARAMS ((bfd *abfd));
	284
	285	enum machine_type
	286	NAME(aout,machine_type) PARAMS ((enum bfd_architecture arch,
	287	unsigned long machine));
	288
	289	boolean
	290	NAME(aout,set_arch_mach) PARAMS ((bfd *abfd, enum bfd_architecture arch,
	291	unsigned long machine));
	292
	293	boolean
	294	NAME(aout,new_section_hook) PARAMS ((bfd abfd, asection newsect));
	295
	296	boolean
	297	NAME(aout,set_section_contents) PARAMS ((bfd *abfd, sec_ptr section,
c0e5039e JG	298	PTR location, file_ptr offset, bfd_size_type count));
c0e5039e JG	299
1f29e30b JG	300	asymbol *
	301	NAME(aout,make_empty_symbol) PARAMS ((bfd *abfd));
	302
fa77c704 ILT	303	boolean
	304	NAME(aout,translate_symbol_table) PARAMS ((bfd , aout_symbol_type ,
	305	struct external_nlist *,
	306	bfd_size_type, char *,
	307	bfd_size_type,
	308	boolean dynamic));
	309
1f29e30b JG	310	boolean
	311	NAME(aout,slurp_symbol_table) PARAMS ((bfd *abfd));
	312
4c3721d5	313	boolean
1f29e30b JG	314	NAME(aout,write_syms) PARAMS ((bfd *abfd));
	315
	316	void
	317	NAME(aout,reclaim_symbol_table) PARAMS ((bfd *abfd));
	318
326e32d7	319	long
1f29e30b JG	320	NAME(aout,get_symtab_upper_bound) PARAMS ((bfd *abfd));
1f29e30b JG	321
326e32d7	322	long
1f29e30b JG	323	NAME(aout,get_symtab) PARAMS ((bfd abfd, asymbol *location));
1f29e30b JG	324
fa77c704 ILT	325	void
	326	NAME(aout,swap_ext_reloc_in) PARAMS ((bfd , struct reloc_ext_external ,
	327	arelent , asymbol *));
	328	void
	329	NAME(aout,swap_std_reloc_in) PARAMS ((bfd , struct reloc_std_external ,
	330	arelent , asymbol *));
	331
1f29e30b JG	332	boolean
	333	NAME(aout,slurp_reloc_table) PARAMS ((bfd *abfd, sec_ptr asect,
	334	asymbol **symbols));
	335
326e32d7	336	long
1f29e30b JG	337	NAME(aout,canonicalize_reloc) PARAMS ((bfd *abfd, sec_ptr section,
	338	arelent relptr, asymbol symbols));
	339
326e32d7	340	long
1f29e30b JG	341	NAME(aout,get_reloc_upper_bound) PARAMS ((bfd *abfd, sec_ptr asect));
	342
	343	void
	344	NAME(aout,reclaim_reloc) PARAMS ((bfd *ignore_abfd, sec_ptr ignore));
	345
	346	alent *
	347	NAME(aout,get_lineno) PARAMS ((bfd ignore_abfd, asymbol ignore_symbol));
	348
	349	void
	350	NAME(aout,print_symbol) PARAMS ((bfd *ignore_abfd, PTR file,
9e2dad8e	351	asymbol *symbol, bfd_print_symbol_type how));
1f29e30b	352
c2623b7d KR	353	void
	354	NAME(aout,get_symbol_info) PARAMS ((bfd *ignore_abfd,
	355	asymbol symbol, symbol_info ret));
	356
1f29e30b JG	357	boolean
1f29e30b JG	358	NAME(aout,find_nearest_line) PARAMS ((bfd abfd, asection section,
69ebee86 JG	359	asymbol symbols, bfd_vma offset, CONST char filename_ptr,
69ebee86 JG	360	CONST char *functionname_ptr, unsigned int line_ptr));
69ebee86	361
1f29e30b JG	362	int
	363	NAME(aout,sizeof_headers) PARAMS ((bfd *abfd, boolean exec));
	364
	365	boolean
	366	NAME(aout,adjust_sizes_and_vmas) PARAMS ((bfd *abfd,
	367	bfd_size_type text_size, file_ptr text_end));
	368
	369	void
	370	NAME(aout,swap_exec_header_in) PARAMS ((bfd *abfd,
	371	struct external_exec raw_bytes, struct internal_exec execp));
69ebee86	372
1f29e30b JG	373	void
	374	NAME(aout,swap_exec_header_out) PARAMS ((bfd *abfd,
	375	struct internal_exec execp, struct external_exec raw_bytes));
69ebee86	376
4c3721d5 ILT	377	struct bfd_link_hash_table *
	378	NAME(aout,link_hash_table_create) PARAMS ((bfd *));
	379
	380	boolean
	381	NAME(aout,link_add_symbols) PARAMS ((bfd , struct bfd_link_info ));
	382
	383	boolean
	384	NAME(aout,final_link) PARAMS ((bfd , struct bfd_link_info ,
	385	void () (bfd , file_ptr , file_ptr ,
	386	file_ptr *)));
	387
5c8444f8 ILT	388	boolean
	389	NAME(aout,bfd_free_cached_info) PARAMS ((bfd *));
	390
7de245d3 PB	391	/* Prototypes for functions in stab-syms.c. */
7de245d3 PB	392
9eb73722	393	CONST char *
1f29e30b	394	aout_stab_name PARAMS ((int code));
7de245d3	395
69ebee86 JG	396	/* A.out uses the generic versions of these routines... */
69ebee86 JG	397
6812b607	398	#define aout_32_get_section_contents _bfd_generic_get_section_contents
c0e5039e	399
6812b607	400	#define aout_64_get_section_contents _bfd_generic_get_section_contents
ce07dd7c KR	401	#ifndef NO_WRITE_HEADER_KLUDGE
	402	#define NO_WRITE_HEADER_KLUDGE 0
	403	#endif
c0e5039e	404
326e32d7 ILT	405	#ifndef aout_32_bfd_is_local_label
	406	#define aout_32_bfd_is_local_label bfd_generic_is_local_label
	407	#endif
	408
ce07dd7c	409	#ifndef WRITE_HEADERS
c0e5039e JG	410	#define WRITE_HEADERS(abfd, execp) \
c0e5039e JG	411	{ \
ce07dd7c KR	412	bfd_size_type text_size; /* dummy vars */ \
	413	file_ptr text_end; \
	414	if (adata(abfd).magic == undecided_magic) \
	415	NAME(aout,adjust_sizes_and_vmas) (abfd, &text_size, &text_end); \
c0e5039e	416	\
0fa4f690	417	execp->a_syms = bfd_get_symcount (abfd) * EXTERNAL_NLIST_SIZE; \
c0e5039e JG	418	execp->a_entry = bfd_get_start_address (abfd); \
	419	\
	420	execp->a_trsize = ((obj_textsec (abfd)->reloc_count) * \
	421	obj_reloc_entry_size (abfd)); \
	422	execp->a_drsize = ((obj_datasec (abfd)->reloc_count) * \
	423	obj_reloc_entry_size (abfd)); \
	424	NAME(aout,swap_exec_header_out) (abfd, execp, &exec_bytes); \
	425	\
4002f18a ILT	426	if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0) return false; \
	427	if (bfd_write ((PTR) &exec_bytes, 1, EXEC_BYTES_SIZE, abfd) \
	428	!= EXEC_BYTES_SIZE) \
	429	return false; \
c0e5039e JG	430	/* Now write out reloc info, followed by syms and strings */ \
c0e5039e JG	431	\
4c3721d5 ILT	432	if (bfd_get_outsymbols (abfd) != (asymbol **) NULL \
4c3721d5 ILT	433	&& bfd_get_symcount (abfd) != 0) \
c0e5039e	434	{ \
4002f18a ILT	435	if (bfd_seek (abfd, (file_ptr)(N_SYMOFF(*execp)), SEEK_SET) \
	436	!= 0) \
	437	return false; \
c0e5039e	438	\
4c3721d5	439	if (! NAME(aout,write_syms)(abfd)) return false; \
c0e5039e	440	\
4002f18a ILT	441	if (bfd_seek (abfd, (file_ptr)(N_TRELOFF(*execp)), SEEK_SET) \
	442	!= 0) \
	443	return false; \
c0e5039e	444	\
4002f18a ILT	445	if (!NAME(aout,squirt_out_relocs) (abfd, obj_textsec (abfd))) \
	446	return false; \
	447	if (bfd_seek (abfd, (file_ptr)(N_DRELOFF(*execp)), SEEK_SET) \
	448	!= 0) \
	449	return false; \
c0e5039e	450	\
4002f18a ILT	451	if (!NAME(aout,squirt_out_relocs)(abfd, obj_datasec (abfd))) \
4002f18a ILT	452	return false; \
c0e5039e JG	453	} \
c0e5039e JG	454	}
ce07dd7c	455	#endif