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

/* BFD back-end data structures for a.out (and similar) files.
   Copyright (C) 1990-1991 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.  */

/* $Id$ */

#ifdef __STDC__
#define CAT3(a,b,c) a##b##c
#else
#define CAT3(a,b,c) a/**/b/**/c
#endif

/* 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 (int64_type)GET_WORD
#define PUT_WORD bfd_h_put_64
#define NAME(x,y) CAT3(x,_64_,y)
#define JNAME(x) CAT(x,_64)
#define BYTES_IN_WORD 8
#else
#define GET_WORD bfd_h_get_32
#define GET_SWORD (int32_type)GET_WORD
#define PUT_WORD bfd_h_put_32
#define NAME(x,y) CAT3(x,_32_,y)
#define JNAME(x) CAT(x,_32)
#define BYTES_IN_WORD 4
#endif

#define	adata(bfd)		((struct aoutdata *) ((bfd)->tdata))
#define exec_hdr(bfd)		(adata(bfd)->hdr)
#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)

/* Declare these types at file level, since they are used in parameter
   lists, which have wierd scope.  */
struct external_exec;
struct internal_exec;

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

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 */
  unsigned reloc_entry_size;
};


#define obj_outsymbols(bfd) ((PTR)(((struct aoutdata *) ((bfd)->tdata))->outsymbols))


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

/*#define obj_symbols(bfd) ((((struct aoutdata *) ((bfd)->tdata))->symbols))*/
#define obj_aout_symbols(bfd) ((((struct aoutdata *) (bfd)->tdata))->symbols)
#define obj_arch_flags(bfd) ((((struct aoutdata *) (bfd)->tdata))->arch_flags)

#define get_tdata(x)  ((struct aoutdata *)((x)->tdata))

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

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

PROTO (bfd_target *, NAME(aout,some_aout_object_p), (bfd *abfd,
					  bfd_target *(*callback)()));
PROTO (boolean,	NAME(aout,mkobject), (bfd *abfd));
PROTO (enum machine_type, NAME(aout,machine_type), (enum bfd_architecture arch,
						unsigned long machine));
PROTO (boolean,	NAME(aout,set_arch_mach), (bfd *abfd, enum bfd_architecture arch,
						unsigned long machine));

PROTO (boolean,	NAME(aout,new_section_hook), (bfd *abfd, asection *newsect));
PROTO (boolean, NAME(aout,set_section_contents), (bfd *abfd, sec_ptr section,
			 PTR location, file_ptr offset, bfd_size_type count));

PROTO (asymbol *,NAME(aout,make_empty_symbol), (bfd *abfd));
PROTO (boolean,	NAME(aout,slurp_symbol_table), (bfd *abfd));
PROTO (void,	NAME(aout,write_syms), (bfd *abfd));
PROTO (void,	NAME(aout,reclaim_symbol_table), (bfd *abfd));
PROTO (unsigned int, NAME(aout,get_symtab_upper_bound), (bfd *abfd));
PROTO (unsigned int, NAME(aout,get_symtab), (bfd *abfd, asymbol **location));
PROTO (boolean,	NAME(aout,slurp_reloc_table), (bfd *abfd, sec_ptr asect,
					 asymbol **symbols));
PROTO (unsigned int, NAME(aout,canonicalize_reloc), (bfd *abfd, sec_ptr section,
					 arelent **relptr, asymbol **symbols));
PROTO (unsigned int, NAME(aout,get_reloc_upper_bound), (bfd *abfd, sec_ptr asect));
PROTO (void,	NAME(aout,reclaim_reloc), (bfd *ignore_abfd, sec_ptr ignore));
PROTO (alent *,	NAME(aout,get_lineno), (bfd *ignore_abfd, asymbol *ignore_symbol));
PROTO (void,	NAME(aout,print_symbol), (bfd *ignore_abfd, PTR file,
			    asymbol *symbol, bfd_print_symbol_type how));
PROTO (boolean,	NAME(aout,close_and_cleanup), (bfd *abfd));
PROTO (boolean,	NAME(aout,find_nearest_line), (bfd *abfd, asection *section,
      asymbol **symbols, bfd_vma offset, CONST char **filename_ptr,
      CONST char **functionname_ptr, unsigned int *line_ptr));
PROTO (int,	NAME(aout,sizeof_headers), (bfd *ignore_abfd, boolean exec));


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

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

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

#define	aout_32_get_section_contents	bfd_generic_get_section_contents
#define	aout_32_close_and_cleanup	bfd_generic_close_and_cleanup

#define	aout_64_get_section_contents	bfd_generic_get_section_contents
#define	aout_64_close_and_cleanup	bfd_generic_close_and_cleanup

/* Calculate the file positions of the parts of a newly read aout header */
#define WORK_OUT_FILE_POSITIONS(abfd, execp)				\
  obj_datasec (abfd)->vma = N_DATADDR(*execp);			 	\
  obj_bsssec (abfd)->vma = N_BSSADDR(*execp);				\
  obj_textsec (abfd)->vma = N_TXTADDR(*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);				\


#define WRITE_HEADERS(abfd, execp)					      \
      {									      \
        if ((obj_textsec(abfd)->vma & 0xff )== EXEC_BYTES_SIZE)  \
		abfd->flags |= D_PAGED; 		\
	else						\
		abfd->flags &= ~D_PAGED;		\
	if (abfd->flags & D_PAGED) 					      \
	    {								      \
	      execp->a_text = obj_textsec (abfd)->size + EXEC_BYTES_SIZE;     \
	      N_SET_MAGIC (*execp, ZMAGIC);				      \
	    } 								      \
	else 								      \
	    {								      \
	      execp->a_text = obj_textsec (abfd)->size;			      \
	      if (abfd->flags & WP_TEXT)				      \
	        { N_SET_MAGIC (*execp, NMAGIC); }			      \
	      else							      \
	  	{ N_SET_MAGIC(*execp, OMAGIC); }			      \
	    }								      \
	if (abfd->flags & D_PAGED) 					      \
	    {								      \
	      data_pad = ((obj_datasec(abfd)->size + PAGE_SIZE -1)	      \
			  & (- PAGE_SIZE)) - obj_datasec(abfd)->size;	      \
	  								      \
	      if (data_pad > obj_bsssec(abfd)->size)			      \
		execp->a_bss = 0;					      \
	      else 							      \
		execp->a_bss = obj_bsssec(abfd)->size - data_pad;	      \
	      execp->a_data = obj_datasec(abfd)->size + data_pad;	      \
	    }								      \
	else 								      \
	    {								      \
	      execp->a_data = obj_datasec (abfd)->size;			      \
	      execp->a_bss = obj_bsssec (abfd)->size;			      \
	    }								      \
    									      \
	execp->a_syms = bfd_get_symcount (abfd) * EXTERNAL_LIST_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);	      \
									      \
	bfd_seek (abfd, 0L, false);					      \
	bfd_write ((PTR) &exec_bytes, 1, EXEC_BYTES_SIZE, abfd);	      \
	/* Now write out reloc info, followed by syms and strings */	      \
  									      \
	if (bfd_get_symcount (abfd) != 0) 				      \
	    {								      \
	      bfd_seek (abfd,						      \
			(long)(N_SYMOFF(*execp)), false);		      \
									      \
	      NAME(aout,write_syms)(abfd);				      \
									      \
	      bfd_seek (abfd,	(long)(N_TRELOFF(*execp)), false);	      \
									      \
	      if (!NAME(aout,squirt_out_relocs) (abfd, obj_textsec (abfd))) return false; \
	      bfd_seek (abfd, (long)(N_DRELOFF(*execp)), false);	      \
									      \
	      if (!NAME(aout,squirt_out_relocs)(abfd, obj_datasec (abfd))) return false; \
	    }								      \
      }
Commit	Line	Data
69ebee86	1	/* BFD back-end data structures for a.out (and similar) files.
9e2dad8e JG	2	Copyright (C) 1990-1991 Free Software Foundation, Inc.
9e2dad8e JG	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 DHW	24
	25	/* $Id$ */
	26
c0e5039e JG	27	#ifdef __STDC__
	28	#define CAT3(a,b,c) a##b##c
	29	#else
	30	#define CAT3(a,b,c) a//b//c
	31	#endif
	32
359f1dee JG	33	/* Parameterize the a.out code based on whether it is being built
359f1dee JG	34	for a 32-bit architecture or a 64-bit architecture. */
c0e5039e JG	35	#if ARCH_SIZE==64
	36	#define GET_WORD bfd_h_get_64
	37	#define GET_SWORD (int64_type)GET_WORD
	38	#define PUT_WORD bfd_h_put_64
	39	#define NAME(x,y) CAT3(x,_64_,y)
	40	#define JNAME(x) CAT(x,_64)
	41	#define BYTES_IN_WORD 8
	42	#else
	43	#define GET_WORD bfd_h_get_32
	44	#define GET_SWORD (int32_type)GET_WORD
	45	#define PUT_WORD bfd_h_put_32
	46	#define NAME(x,y) CAT3(x,_32_,y)
	47	#define JNAME(x) CAT(x,_32)
	48	#define BYTES_IN_WORD 4
	49	#endif
	50
69ebee86 JG	51	#define adata(bfd) ((struct aoutdata *) ((bfd)->tdata))
	52	#define exec_hdr(bfd) (adata(bfd)->hdr)
	53	#define obj_textsec(bfd) (adata(bfd)->textsec)
	54	#define obj_datasec(bfd) (adata(bfd)->datasec)
	55	#define obj_bsssec(bfd) (adata(bfd)->bsssec)
	56	#define obj_sym_filepos(bfd) (adata(bfd)->sym_filepos)
	57	#define obj_str_filepos(bfd) (adata(bfd)->str_filepos)
4a81b561	58
69ebee86	59	#define obj_reloc_entry_size(bfd) (adata(bfd)->reloc_entry_size)
4a81b561	60
9e2dad8e JG	61	/* Declare these types at file level, since they are used in parameter
	62	lists, which have wierd scope. */
	63	struct external_exec;
	64	struct internal_exec;
	65
69ebee86	66	typedef struct aout_symbol {
4a81b561 DHW	67	asymbol symbol;
4a81b561 DHW	68	short desc;
69ebee86 JG	69	char other;
69ebee86 JG	70	unsigned char type;
4a81b561 DHW	71	} aout_symbol_type;
4a81b561 DHW	72
69ebee86	73	struct aoutdata {
c0e5039e	74	struct internal_exec hdr; / exec file header */
4a81b561 DHW	75	aout_symbol_type symbols; / symtab for input bfd */
	76
	77
	78	/* For ease, we do this */
	79	asection *textsec;
	80	asection *datasec;
	81	asection *bsssec;
	82
	83	/* We remember these offsets so that after check_file_format, we have
	84	no dependencies on the particular format of the exec_hdr. */
	85	file_ptr sym_filepos;
	86	file_ptr str_filepos;
4a81b561	87
69ebee86 JG	88	/* Size of a relocation entry */
	89	unsigned reloc_entry_size;
	90	};
4a81b561	91
4a81b561	92
69ebee86	93	#define obj_outsymbols(bfd) ((PTR)(((struct aoutdata *) ((bfd)->tdata))->outsymbols))
4a81b561 DHW	94
4a81b561 DHW	95
fc723380 JG	96	/* We take the address of the first element of an asymbol to ensure that the
fc723380 JG	97	* macro is only ever applied to an asymbol */
4a81b561 DHW	98	#define aout_symbol(asymbol) ((aout_symbol_type *)(&(asymbol)->the_bfd))
4a81b561 DHW	99
69ebee86 JG	100	/#define obj_symbols(bfd) ((((struct aoutdata ) ((bfd)->tdata))->symbols))*/
	101	#define obj_aout_symbols(bfd) ((((struct aoutdata *) (bfd)->tdata))->symbols)
	102	#define obj_arch_flags(bfd) ((((struct aoutdata *) (bfd)->tdata))->arch_flags)
	103
	104	#define get_tdata(x) ((struct aoutdata *)((x)->tdata))
	105
c0e5039e	106	/* Prototype declarations for functions defined in aoutx.h */
69ebee86	107
c0e5039e	108	PROTO (boolean, NAME(aout,squirt_out_relocs),(bfd abfd, asection section));
69ebee86	109
c0e5039e	110	PROTO (bfd_target , NAME(aout,some_aout_object_p), (bfd abfd,
69ebee86	111	bfd_target (callback)()));
c0e5039e JG	112	PROTO (boolean, NAME(aout,mkobject), (bfd *abfd));
c0e5039e JG	113	PROTO (enum machine_type, NAME(aout,machine_type), (enum bfd_architecture arch,
69ebee86	114	unsigned long machine));
c0e5039e	115	PROTO (boolean, NAME(aout,set_arch_mach), (bfd *abfd, enum bfd_architecture arch,
69ebee86 JG	116	unsigned long machine));
69ebee86 JG	117
c0e5039e JG	118	PROTO (boolean, NAME(aout,new_section_hook), (bfd abfd, asection newsect));
	119	PROTO (boolean, NAME(aout,set_section_contents), (bfd *abfd, sec_ptr section,
	120	PTR location, file_ptr offset, bfd_size_type count));
	121
	122	PROTO (asymbol ,NAME(aout,make_empty_symbol), (bfd abfd));
	123	PROTO (boolean, NAME(aout,slurp_symbol_table), (bfd *abfd));
	124	PROTO (void, NAME(aout,write_syms), (bfd *abfd));
	125	PROTO (void, NAME(aout,reclaim_symbol_table), (bfd *abfd));
	126	PROTO (unsigned int, NAME(aout,get_symtab_upper_bound), (bfd *abfd));
	127	PROTO (unsigned int, NAME(aout,get_symtab), (bfd abfd, asymbol *location));
	128	PROTO (boolean, NAME(aout,slurp_reloc_table), (bfd *abfd, sec_ptr asect,
69ebee86	129	asymbol **symbols));
c0e5039e	130	PROTO (unsigned int, NAME(aout,canonicalize_reloc), (bfd *abfd, sec_ptr section,
69ebee86	131	arelent relptr, asymbol symbols));
c0e5039e JG	132	PROTO (unsigned int, NAME(aout,get_reloc_upper_bound), (bfd *abfd, sec_ptr asect));
	133	PROTO (void, NAME(aout,reclaim_reloc), (bfd *ignore_abfd, sec_ptr ignore));
	134	PROTO (alent , NAME(aout,get_lineno), (bfd ignore_abfd, asymbol *ignore_symbol));
	135	PROTO (void, NAME(aout,print_symbol), (bfd *ignore_abfd, PTR file,
9e2dad8e	136	asymbol *symbol, bfd_print_symbol_type how));
c0e5039e JG	137	PROTO (boolean, NAME(aout,close_and_cleanup), (bfd *abfd));
c0e5039e JG	138	PROTO (boolean, NAME(aout,find_nearest_line), (bfd abfd, asection section,
69ebee86 JG	139	asymbol symbols, bfd_vma offset, CONST char filename_ptr,
69ebee86 JG	140	CONST char *functionname_ptr, unsigned int line_ptr));
c0e5039e	141	PROTO (int, NAME(aout,sizeof_headers), (bfd *ignore_abfd, boolean exec));
69ebee86	142
69ebee86	143
c0e5039e JG	144	PROTO (void, NAME(aout,swap_exec_header_in), (bfd *abfd,
c0e5039e JG	145	struct external_exec raw_bytes, struct internal_exec execp));
69ebee86	146
c0e5039e JG	147	PROTO (void, NAME(aout,swap_exec_header_out),(bfd abfd, struct internal_exec execp,
c0e5039e JG	148	struct external_exec *raw_bytes));
69ebee86 JG	149
	150	/* A.out uses the generic versions of these routines... */
	151
c0e5039e JG	152	#define aout_32_get_section_contents bfd_generic_get_section_contents
	153	#define aout_32_close_and_cleanup bfd_generic_close_and_cleanup
	154
	155	#define aout_64_get_section_contents bfd_generic_get_section_contents
	156	#define aout_64_close_and_cleanup bfd_generic_close_and_cleanup
	157
	158	/* Calculate the file positions of the parts of a newly read aout header */
	159	#define WORK_OUT_FILE_POSITIONS(abfd, execp) \
	160	obj_datasec (abfd)->vma = N_DATADDR(*execp); \
	161	obj_bsssec (abfd)->vma = N_BSSADDR(*execp); \
	162	obj_textsec (abfd)->vma = N_TXTADDR(*execp); \
	163	\
	164	/* The file offsets of the sections */ \
	165	obj_textsec (abfd)->filepos = N_TXTOFF (*execp); \
	166	obj_datasec (abfd)->filepos = N_DATOFF (*execp); \
	167	\
	168	/* The file offsets of the relocation info */ \
	169	obj_textsec (abfd)->rel_filepos = N_TRELOFF(*execp); \
	170	obj_datasec (abfd)->rel_filepos = N_DRELOFF(*execp); \
	171	\
	172	/* The file offsets of the string table and symbol table. */ \
	173	obj_sym_filepos (abfd) = N_SYMOFF (*execp); \
	174	obj_str_filepos (abfd) = N_STROFF (*execp); \
	175
	176
	177	#define WRITE_HEADERS(abfd, execp) \
	178	{ \
9e2dad8e JG	179	if ((obj_textsec(abfd)->vma & 0xff )== EXEC_BYTES_SIZE) \
	180	abfd->flags \|= D_PAGED; \
	181	else \
	182	abfd->flags &= ~D_PAGED; \
c0e5039e JG	183	if (abfd->flags & D_PAGED) \
	184	{ \
	185	execp->a_text = obj_textsec (abfd)->size + EXEC_BYTES_SIZE; \
	186	N_SET_MAGIC (*execp, ZMAGIC); \
	187	} \
9e2dad8e	188	else \
c0e5039e	189	{ \
9e2dad8e JG	190	execp->a_text = obj_textsec (abfd)->size; \
	191	if (abfd->flags & WP_TEXT) \
	192	{ N_SET_MAGIC (*execp, NMAGIC); } \
	193	else \
	194	{ N_SET_MAGIC(*execp, OMAGIC); } \
c0e5039e	195	} \
c0e5039e JG	196	if (abfd->flags & D_PAGED) \
	197	{ \
	198	data_pad = ((obj_datasec(abfd)->size + PAGE_SIZE -1) \
	199	& (- PAGE_SIZE)) - obj_datasec(abfd)->size; \
	200	\
	201	if (data_pad > obj_bsssec(abfd)->size) \
	202	execp->a_bss = 0; \
	203	else \
	204	execp->a_bss = obj_bsssec(abfd)->size - data_pad; \
	205	execp->a_data = obj_datasec(abfd)->size + data_pad; \
	206	} \
	207	else \
	208	{ \
	209	execp->a_data = obj_datasec (abfd)->size; \
	210	execp->a_bss = obj_bsssec (abfd)->size; \
	211	} \
	212	\
	213	execp->a_syms = bfd_get_symcount (abfd) * EXTERNAL_LIST_SIZE; \
	214	execp->a_entry = bfd_get_start_address (abfd); \
	215	\
	216	execp->a_trsize = ((obj_textsec (abfd)->reloc_count) * \
	217	obj_reloc_entry_size (abfd)); \
	218	execp->a_drsize = ((obj_datasec (abfd)->reloc_count) * \
	219	obj_reloc_entry_size (abfd)); \
	220	NAME(aout,swap_exec_header_out) (abfd, execp, &exec_bytes); \
	221	\
	222	bfd_seek (abfd, 0L, false); \
	223	bfd_write ((PTR) &exec_bytes, 1, EXEC_BYTES_SIZE, abfd); \
	224	/* Now write out reloc info, followed by syms and strings */ \
	225	\
	226	if (bfd_get_symcount (abfd) != 0) \
	227	{ \
	228	bfd_seek (abfd, \
	229	(long)(N_SYMOFF(*execp)), false); \
	230	\
	231	NAME(aout,write_syms)(abfd); \
	232	\
	233	bfd_seek (abfd, (long)(N_TRELOFF(*execp)), false); \
	234	\
	235	if (!NAME(aout,squirt_out_relocs) (abfd, obj_textsec (abfd))) return false; \
	236	bfd_seek (abfd, (long)(N_DRELOFF(*execp)), false); \
	237	\
	238	if (!NAME(aout,squirt_out_relocs)(abfd, obj_datasec (abfd))) return false; \
	239	} \
	240	}