[deliverable/binutils-gdb.git] / bfd / i386os9k.c

/* BFD back-end for os9000 i386 binaries.
   Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1998, 1999, 2001, 2002
   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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */


#include "bfd.h"
#include "sysdep.h"
#include "libbfd.h"
#include "bfdlink.h"
#include "libaout.h"		/* BFD a.out internal data structures */
#include "os9k.h"

static const bfd_target * os9k_callback
  PARAMS ((bfd *));
static const bfd_target * os9k_object_p
  PARAMS ((bfd *));
static int os9k_sizeof_headers
  PARAMS ((bfd *, bfd_boolean));
bfd_boolean os9k_swap_exec_header_in
  PARAMS ((bfd *, mh_com *, struct internal_exec *));

/* Swaps the information in an executable header taken from a raw byte
   stream memory image, into the internal exec_header structure.  */
bfd_boolean
os9k_swap_exec_header_in (abfd, raw_bytes, execp)
     bfd *abfd;
     mh_com *raw_bytes;
     struct internal_exec *execp;
{
  mh_com *bytes = (mh_com *) raw_bytes;
  unsigned int dload, dmemsize, dmemstart;

  /* Now fill in fields in the execp, from the bytes in the raw data.  */
  execp->a_info = H_GET_16 (abfd, bytes->m_sync);
  execp->a_syms = 0;
  execp->a_entry = H_GET_32 (abfd, bytes->m_exec);
  execp->a_talign = 2;
  execp->a_dalign = 2;
  execp->a_balign = 2;

  dload = H_GET_32 (abfd, bytes->m_idata);
  execp->a_data = dload + 8;

  if (bfd_seek (abfd, (file_ptr) dload, SEEK_SET) != 0
      || (bfd_bread (&dmemstart, (bfd_size_type) sizeof (dmemstart), abfd)
	  != sizeof (dmemstart))
      || (bfd_bread (&dmemsize, (bfd_size_type) sizeof (dmemsize), abfd)
	  != sizeof (dmemsize)))
    return FALSE;

  execp->a_tload = 0;
  execp->a_dload = H_GET_32 (abfd, (unsigned char *) &dmemstart);
  execp->a_text = dload - execp->a_tload;
  execp->a_data = H_GET_32 (abfd, (unsigned char *) &dmemsize);
  execp->a_bss = H_GET_32 (abfd, bytes->m_data) - execp->a_data;

  execp->a_trsize = 0;
  execp->a_drsize = 0;

  return TRUE;
}

#if 0
/* Swaps the information in an internal exec header structure into the
   supplied buffer ready for writing to disk.  */

void os9k_swap_exec_header_out
  PARAMS ((bfd *, struct internal_exec *, struct mh_com *));

void
os9k_swap_exec_header_out (abfd, execp, raw_bytes)
     bfd *abfd;
     struct internal_exec *execp;
     mh_com *raw_bytes;
{
  mh_com *bytes = (mh_com *) raw_bytes;

  /* Now fill in fields in the raw data, from the fields in the exec struct. */
  H_PUT_32 (abfd, execp->a_info, bytes->e_info);
  H_PUT_32 (abfd, execp->a_text, bytes->e_text);
  H_PUT_32 (abfd, execp->a_data, bytes->e_data);
  H_PUT_32 (abfd, execp->a_bss, bytes->e_bss);
  H_PUT_32 (abfd, execp->a_syms, bytes->e_syms);
  H_PUT_32 (abfd, execp->a_entry, bytes->e_entry);
  H_PUT_32 (abfd, execp->a_trsize, bytes->e_trsize);
  H_PUT_32 (abfd, execp->a_drsize, bytes->e_drsize);
  H_PUT_32 (abfd, execp->a_tload, bytes->e_tload);
  H_PUT_32 (abfd, execp->a_dload, bytes->e_dload);
  bytes->e_talign[0] = execp->a_talign;
  bytes->e_dalign[0] = execp->a_dalign;
  bytes->e_balign[0] = execp->a_balign;
  bytes->e_relaxable[0] = execp->a_relaxable;
}

#endif	/* 0 */

static const bfd_target *
os9k_object_p (abfd)
     bfd *abfd;
{
  struct internal_exec anexec;
  mh_com exec_bytes;

  if (bfd_bread ((PTR) &exec_bytes, (bfd_size_type) MHCOM_BYTES_SIZE, abfd)
      != MHCOM_BYTES_SIZE)
    {
      if (bfd_get_error () != bfd_error_system_call)
	bfd_set_error (bfd_error_wrong_format);
      return 0;
    }

  anexec.a_info = H_GET_16 (abfd, exec_bytes.m_sync);
  if (N_BADMAG (anexec))
    {
      bfd_set_error (bfd_error_wrong_format);
      return 0;
    }

  if (! os9k_swap_exec_header_in (abfd, &exec_bytes, &anexec))
    {
      if (bfd_get_error () != bfd_error_system_call)
	bfd_set_error (bfd_error_wrong_format);
      return NULL;
    }
  return aout_32_some_aout_object_p (abfd, &anexec, os9k_callback);
}


/* Finish up the opening of a b.out file for reading.  Fill in all the
   fields that are not handled by common code.  */

static const bfd_target *
os9k_callback (abfd)
     bfd *abfd;
{
  struct internal_exec *execp = exec_hdr (abfd);
  unsigned long bss_start;

  /* Architecture and machine type.  */
  bfd_set_arch_mach (abfd, bfd_arch_i386, 0);

  /* The positions of the string table and symbol table.  */
  obj_str_filepos (abfd) = 0;
  obj_sym_filepos (abfd) = 0;

  /* The alignments of the sections.  */
  obj_textsec (abfd)->alignment_power = execp->a_talign;
  obj_datasec (abfd)->alignment_power = execp->a_dalign;
  obj_bsssec (abfd)->alignment_power = execp->a_balign;

  /* The starting addresses of the sections.  */
  obj_textsec (abfd)->vma = execp->a_tload;
  obj_datasec (abfd)->vma = execp->a_dload;

  /* And reload the sizes, since the aout module zaps them.  */
  obj_textsec (abfd)->_raw_size = execp->a_text;

  bss_start = execp->a_dload + execp->a_data;	/* BSS = end of data section.  */
  obj_bsssec (abfd)->vma = align_power (bss_start, execp->a_balign);

  /* The file positions of the sections.  */
  obj_textsec (abfd)->filepos = execp->a_entry;
  obj_datasec (abfd)->filepos = execp->a_dload;

  /* The file positions of the relocation info ***
  obj_textsec (abfd)->rel_filepos = N_TROFF(*execp);
  obj_datasec (abfd)->rel_filepos =  N_DROFF(*execp);  */

  adata (abfd).page_size = 1;	/* Not applicable.  */
  adata (abfd).segment_size = 1;/* Not applicable.  */
  adata (abfd).exec_bytes_size = MHCOM_BYTES_SIZE;

  return abfd->xvec;
}

#if 0
struct bout_data_struct
{
  struct aoutdata a;
  struct internal_exec e;
};

static bfd_boolean
os9k_mkobject (abfd)
     bfd *abfd;
{
  struct bout_data_struct *rawptr;
  bfd_size_type amt = sizeof (struct bout_data_struct);

  rawptr = (struct bout_data_struct *) bfd_zalloc (abfd, amt);
  if (rawptr == NULL)
    return FALSE;

  abfd->tdata.bout_data = rawptr;
  exec_hdr (abfd) = &rawptr->e;

  obj_textsec (abfd) = (asection *) NULL;
  obj_datasec (abfd) = (asection *) NULL;
  obj_bsssec (abfd) = (asection *) NULL;

  return TRUE;
}

static bfd_boolean
os9k_write_object_contents (abfd)
     bfd *abfd;
{
  struct external_exec swapped_hdr;

  if (! aout_32_make_sections (abfd))
    return FALSE;

  exec_hdr (abfd)->a_info = BMAGIC;

  exec_hdr (abfd)->a_text = obj_textsec (abfd)->_raw_size;
  exec_hdr (abfd)->a_data = obj_datasec (abfd)->_raw_size;
  exec_hdr (abfd)->a_bss = obj_bsssec (abfd)->_raw_size;
  exec_hdr (abfd)->a_syms = bfd_get_symcount (abfd) * sizeof (struct nlist);
  exec_hdr (abfd)->a_entry = bfd_get_start_address (abfd);
  exec_hdr (abfd)->a_trsize = ((obj_textsec (abfd)->reloc_count) *
			       sizeof (struct relocation_info));
  exec_hdr (abfd)->a_drsize = ((obj_datasec (abfd)->reloc_count) *
			       sizeof (struct relocation_info));

  exec_hdr (abfd)->a_talign = obj_textsec (abfd)->alignment_power;
  exec_hdr (abfd)->a_dalign = obj_datasec (abfd)->alignment_power;
  exec_hdr (abfd)->a_balign = obj_bsssec (abfd)->alignment_power;

  exec_hdr (abfd)->a_tload = obj_textsec (abfd)->vma;
  exec_hdr (abfd)->a_dload = obj_datasec (abfd)->vma;

  bout_swap_exec_header_out (abfd, exec_hdr (abfd), &swapped_hdr);

  if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0
      || bfd_bwrite ((PTR) & swapped_hdr, (bfd_size_type) EXEC_BYTES_SIZE,
		    abfd) != EXEC_BYTES_SIZE)
    return FALSE;

  /* Now write out reloc info, followed by syms and strings.  */
  if (bfd_get_symcount (abfd) != 0)
    {
      if (bfd_seek (abfd, (file_ptr) (N_SYMOFF (*exec_hdr (abfd))), SEEK_SET)
	  != 0)
	return FALSE;

      if (!aout_32_write_syms (abfd))
	return FALSE;

      if (bfd_seek (abfd, (file_ptr) (N_TROFF (*exec_hdr (abfd))), SEEK_SET)
	  != 0)
	return FALSE;

      if (!b_out_squirt_out_relocs (abfd, obj_textsec (abfd)))
	return FALSE;
      if (bfd_seek (abfd, (file_ptr) (N_DROFF (*exec_hdr (abfd))), SEEK_SET)
	  != 0)
	return FALSE;

      if (!b_out_squirt_out_relocs (abfd, obj_datasec (abfd)))
	return FALSE;
    }
  return TRUE;
}
\f
static bfd_boolean
os9k_set_section_contents (abfd, section, location, offset, count)
     bfd *abfd;
     sec_ptr section;
     unsigned char *location;
     file_ptr offset;
     int count;
{

  if (! abfd->output_has_begun)
    {				/* set by bfd.c handler */
      if (! aout_32_make_sections (abfd))
	return FALSE;

      obj_textsec (abfd)->filepos = sizeof (struct internal_exec);
      obj_datasec (abfd)->filepos = obj_textsec (abfd)->filepos
	+ obj_textsec (abfd)->_raw_size;

    }
  /* Regardless, once we know what we're doing, we might as well get going.  */
  if (bfd_seek (abfd, section->filepos + offset, SEEK_SET) != 0)
    return FALSE;

  if (count != 0)
    return bfd_bwrite ((PTR) location, (bfd_size_type) count, abfd) == count;

  return TRUE;
}
#endif	/* 0 */

static int
os9k_sizeof_headers (ignore_abfd, ignore)
     bfd *ignore_abfd ATTRIBUTE_UNUSED;
     bfd_boolean ignore ATTRIBUTE_UNUSED;
{
  return sizeof (struct internal_exec);
}

\f

#define aout_32_close_and_cleanup aout_32_bfd_free_cached_info

#define aout_32_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol

#define aout_32_bfd_reloc_type_lookup _bfd_norelocs_bfd_reloc_type_lookup

#define aout_32_get_section_contents_in_window \
  _bfd_generic_get_section_contents_in_window

#define os9k_bfd_get_relocated_section_contents \
  bfd_generic_get_relocated_section_contents
#define os9k_bfd_relax_section bfd_generic_relax_section
#define os9k_bfd_gc_sections bfd_generic_gc_sections
#define os9k_bfd_merge_sections bfd_generic_merge_sections
#define os9k_bfd_discard_group bfd_generic_discard_group
#define os9k_bfd_link_hash_table_create _bfd_generic_link_hash_table_create
#define os9k_bfd_link_hash_table_free _bfd_generic_link_hash_table_free
#define os9k_bfd_link_add_symbols _bfd_generic_link_add_symbols
#define os9k_bfd_link_just_syms _bfd_generic_link_just_syms
#define os9k_bfd_final_link _bfd_generic_final_link
#define os9k_bfd_link_split_section  _bfd_generic_link_split_section

const bfd_target i386os9k_vec =
  {
    "i386os9k",			/* name */
    bfd_target_os9k_flavour,
    BFD_ENDIAN_LITTLE,		/* data byte order is little */
    BFD_ENDIAN_LITTLE,		/* hdr byte order is little */
    (HAS_RELOC | EXEC_P | WP_TEXT),	/* object flags */
    (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD),	/* section flags */
    0,				/* symbol leading char */
    ' ',				/* ar_pad_char */
    16,				/* ar_max_namelen */

    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 */
    {_bfd_dummy_target, os9k_object_p,	/* bfd_check_format */
     bfd_generic_archive_p, _bfd_dummy_target},
    {bfd_false, bfd_false,	/* bfd_set_format */
     _bfd_generic_mkarchive, bfd_false},
    {bfd_false, bfd_false,	/* bfd_write_contents */
     _bfd_write_archive_contents, bfd_false},

    BFD_JUMP_TABLE_GENERIC (aout_32),
    BFD_JUMP_TABLE_COPY (_bfd_generic),
    BFD_JUMP_TABLE_CORE (_bfd_nocore),
    BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_bsd),
    BFD_JUMP_TABLE_SYMBOLS (aout_32),
    BFD_JUMP_TABLE_RELOCS (aout_32),
    BFD_JUMP_TABLE_WRITE (aout_32),
    BFD_JUMP_TABLE_LINK (os9k),
    BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),

    NULL,

    (PTR) 0,
  };
Commit	Line	Data
252b5132	1	/* BFD back-end for os9000 i386 binaries.
e2d34d7d	2	Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1998, 1999, 2001, 2002
7898deda	3	Free Software Foundation, Inc.
252b5132 RH	4	Written by Cygnus Support.
	5
	6	This file is part of BFD, the Binary File Descriptor library.
	7
	8	This program is free software; you can redistribute it and/or modify
	9	it under the terms of the GNU General Public License as published by
	10	the Free Software Foundation; either version 2 of the License, or
	11	(at your option) any later version.
	12
	13	This program is distributed in the hope that it will be useful,
	14	but WITHOUT ANY WARRANTY; without even the implied warranty of
	15	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	16	GNU General Public License for more details.
	17
	18	You should have received a copy of the GNU General Public License
	19	along with this program; if not, write to the Free Software
	20	Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
	21
	22
	23	#include "bfd.h"
	24	#include "sysdep.h"
	25	#include "libbfd.h"
	26	#include "bfdlink.h"
	27	#include "libaout.h" /* BFD a.out internal data structures */
	28	#include "os9k.h"
	29
b34976b6 AM	30	static const bfd_target * os9k_callback
	31	PARAMS ((bfd *));
	32	static const bfd_target * os9k_object_p
	33	PARAMS ((bfd *));
	34	static int os9k_sizeof_headers
	35	PARAMS ((bfd *, bfd_boolean));
	36	bfd_boolean os9k_swap_exec_header_in
	37	PARAMS ((bfd , mh_com , struct internal_exec *));
252b5132 RH	38
	39	/* Swaps the information in an executable header taken from a raw byte
	40	stream memory image, into the internal exec_header structure. */
b34976b6	41	bfd_boolean
252b5132 RH	42	os9k_swap_exec_header_in (abfd, raw_bytes, execp)
	43	bfd *abfd;
	44	mh_com *raw_bytes;
	45	struct internal_exec *execp;
	46	{
	47	mh_com bytes = (mh_com ) raw_bytes;
	48	unsigned int dload, dmemsize, dmemstart;
	49
	50	/* Now fill in fields in the execp, from the bytes in the raw data. */
dc810e39	51	execp->a_info = H_GET_16 (abfd, bytes->m_sync);
252b5132	52	execp->a_syms = 0;
dc810e39	53	execp->a_entry = H_GET_32 (abfd, bytes->m_exec);
252b5132 RH	54	execp->a_talign = 2;
	55	execp->a_dalign = 2;
	56	execp->a_balign = 2;
	57
dc810e39	58	dload = H_GET_32 (abfd, bytes->m_idata);
252b5132 RH	59	execp->a_data = dload + 8;
	60
	61	if (bfd_seek (abfd, (file_ptr) dload, SEEK_SET) != 0
dc810e39	62	\|\| (bfd_bread (&dmemstart, (bfd_size_type) sizeof (dmemstart), abfd)
252b5132	63	!= sizeof (dmemstart))
dc810e39	64	\|\| (bfd_bread (&dmemsize, (bfd_size_type) sizeof (dmemsize), abfd)
252b5132	65	!= sizeof (dmemsize)))
b34976b6	66	return FALSE;
252b5132 RH	67
252b5132 RH	68	execp->a_tload = 0;
dc810e39	69	execp->a_dload = H_GET_32 (abfd, (unsigned char *) &dmemstart);
252b5132	70	execp->a_text = dload - execp->a_tload;
dc810e39 AM	71	execp->a_data = H_GET_32 (abfd, (unsigned char *) &dmemsize);
dc810e39 AM	72	execp->a_bss = H_GET_32 (abfd, bytes->m_data) - execp->a_data;
252b5132 RH	73
	74	execp->a_trsize = 0;
	75	execp->a_drsize = 0;
	76
b34976b6	77	return TRUE;
252b5132 RH	78	}
	79
	80	#if 0
	81	/* Swaps the information in an internal exec header structure into the
	82	supplied buffer ready for writing to disk. */
	83
dc810e39 AM	84	void os9k_swap_exec_header_out
	85	PARAMS ((bfd , struct internal_exec , struct mh_com *));
	86
252b5132 RH	87	void
	88	os9k_swap_exec_header_out (abfd, execp, raw_bytes)
	89	bfd *abfd;
	90	struct internal_exec *execp;
	91	mh_com *raw_bytes;
	92	{
	93	mh_com bytes = (mh_com ) raw_bytes;
	94
	95	/* Now fill in fields in the raw data, from the fields in the exec struct. */
dc810e39 AM	96	H_PUT_32 (abfd, execp->a_info, bytes->e_info);
	97	H_PUT_32 (abfd, execp->a_text, bytes->e_text);
	98	H_PUT_32 (abfd, execp->a_data, bytes->e_data);
	99	H_PUT_32 (abfd, execp->a_bss, bytes->e_bss);
	100	H_PUT_32 (abfd, execp->a_syms, bytes->e_syms);
	101	H_PUT_32 (abfd, execp->a_entry, bytes->e_entry);
	102	H_PUT_32 (abfd, execp->a_trsize, bytes->e_trsize);
	103	H_PUT_32 (abfd, execp->a_drsize, bytes->e_drsize);
	104	H_PUT_32 (abfd, execp->a_tload, bytes->e_tload);
	105	H_PUT_32 (abfd, execp->a_dload, bytes->e_dload);
252b5132 RH	106	bytes->e_talign[0] = execp->a_talign;
	107	bytes->e_dalign[0] = execp->a_dalign;
	108	bytes->e_balign[0] = execp->a_balign;
	109	bytes->e_relaxable[0] = execp->a_relaxable;
	110	}
	111
	112	#endif /* 0 */
	113
	114	static const bfd_target *
	115	os9k_object_p (abfd)
	116	bfd *abfd;
	117	{
	118	struct internal_exec anexec;
	119	mh_com exec_bytes;
	120
dc810e39	121	if (bfd_bread ((PTR) &exec_bytes, (bfd_size_type) MHCOM_BYTES_SIZE, abfd)
252b5132 RH	122	!= MHCOM_BYTES_SIZE)
	123	{
	124	if (bfd_get_error () != bfd_error_system_call)
	125	bfd_set_error (bfd_error_wrong_format);
	126	return 0;
	127	}
	128
dc810e39	129	anexec.a_info = H_GET_16 (abfd, exec_bytes.m_sync);
252b5132 RH	130	if (N_BADMAG (anexec))
	131	{
	132	bfd_set_error (bfd_error_wrong_format);
	133	return 0;
	134	}
	135
	136	if (! os9k_swap_exec_header_in (abfd, &exec_bytes, &anexec))
	137	{
	138	if (bfd_get_error () != bfd_error_system_call)
	139	bfd_set_error (bfd_error_wrong_format);
	140	return NULL;
	141	}
	142	return aout_32_some_aout_object_p (abfd, &anexec, os9k_callback);
	143	}
	144
	145
	146	/* Finish up the opening of a b.out file for reading. Fill in all the
	147	fields that are not handled by common code. */
	148
	149	static const bfd_target *
	150	os9k_callback (abfd)
	151	bfd *abfd;
	152	{
	153	struct internal_exec *execp = exec_hdr (abfd);
	154	unsigned long bss_start;
	155
e4b17274	156	/* Architecture and machine type. */
252b5132 RH	157	bfd_set_arch_mach (abfd, bfd_arch_i386, 0);
	158
	159	/* The positions of the string table and symbol table. */
	160	obj_str_filepos (abfd) = 0;
	161	obj_sym_filepos (abfd) = 0;
	162
e4b17274	163	/* The alignments of the sections. */
252b5132 RH	164	obj_textsec (abfd)->alignment_power = execp->a_talign;
	165	obj_datasec (abfd)->alignment_power = execp->a_dalign;
	166	obj_bsssec (abfd)->alignment_power = execp->a_balign;
	167
	168	/* The starting addresses of the sections. */
	169	obj_textsec (abfd)->vma = execp->a_tload;
	170	obj_datasec (abfd)->vma = execp->a_dload;
	171
e4b17274	172	/* And reload the sizes, since the aout module zaps them. */
252b5132 RH	173	obj_textsec (abfd)->_raw_size = execp->a_text;
252b5132 RH	174
e4b17274	175	bss_start = execp->a_dload + execp->a_data; /* BSS = end of data section. */
252b5132 RH	176	obj_bsssec (abfd)->vma = align_power (bss_start, execp->a_balign);
252b5132 RH	177
e4b17274	178	/* The file positions of the sections. */
252b5132 RH	179	obj_textsec (abfd)->filepos = execp->a_entry;
	180	obj_datasec (abfd)->filepos = execp->a_dload;
	181
	182	/* The file positions of the relocation info ***
	183	obj_textsec (abfd)->rel_filepos = N_TROFF(*execp);
e4b17274	184	obj_datasec (abfd)->rel_filepos = N_DROFF(execp); /
252b5132	185
e4b17274 NC	186	adata (abfd).page_size = 1; /* Not applicable. */
e4b17274 NC	187	adata (abfd).segment_size = 1;/* Not applicable. */
252b5132 RH	188	adata (abfd).exec_bytes_size = MHCOM_BYTES_SIZE;
	189
	190	return abfd->xvec;
	191	}
	192
	193	#if 0
	194	struct bout_data_struct
	195	{
	196	struct aoutdata a;
	197	struct internal_exec e;
	198	};
	199
b34976b6	200	static bfd_boolean
252b5132 RH	201	os9k_mkobject (abfd)
	202	bfd *abfd;
	203	{
	204	struct bout_data_struct *rawptr;
dc810e39	205	bfd_size_type amt = sizeof (struct bout_data_struct);
252b5132	206
dc810e39	207	rawptr = (struct bout_data_struct *) bfd_zalloc (abfd, amt);
252b5132	208	if (rawptr == NULL)
b34976b6	209	return FALSE;
252b5132 RH	210
	211	abfd->tdata.bout_data = rawptr;
	212	exec_hdr (abfd) = &rawptr->e;
	213
	214	obj_textsec (abfd) = (asection *) NULL;
	215	obj_datasec (abfd) = (asection *) NULL;
	216	obj_bsssec (abfd) = (asection *) NULL;
	217
b34976b6	218	return TRUE;
252b5132 RH	219	}
252b5132 RH	220
b34976b6	221	static bfd_boolean
252b5132 RH	222	os9k_write_object_contents (abfd)
	223	bfd *abfd;
	224	{
	225	struct external_exec swapped_hdr;
	226
	227	if (! aout_32_make_sections (abfd))
b34976b6	228	return FALSE;
252b5132 RH	229
	230	exec_hdr (abfd)->a_info = BMAGIC;
	231
	232	exec_hdr (abfd)->a_text = obj_textsec (abfd)->_raw_size;
	233	exec_hdr (abfd)->a_data = obj_datasec (abfd)->_raw_size;
	234	exec_hdr (abfd)->a_bss = obj_bsssec (abfd)->_raw_size;
	235	exec_hdr (abfd)->a_syms = bfd_get_symcount (abfd) * sizeof (struct nlist);
	236	exec_hdr (abfd)->a_entry = bfd_get_start_address (abfd);
	237	exec_hdr (abfd)->a_trsize = ((obj_textsec (abfd)->reloc_count) *
	238	sizeof (struct relocation_info));
	239	exec_hdr (abfd)->a_drsize = ((obj_datasec (abfd)->reloc_count) *
	240	sizeof (struct relocation_info));
	241
	242	exec_hdr (abfd)->a_talign = obj_textsec (abfd)->alignment_power;
	243	exec_hdr (abfd)->a_dalign = obj_datasec (abfd)->alignment_power;
	244	exec_hdr (abfd)->a_balign = obj_bsssec (abfd)->alignment_power;
	245
	246	exec_hdr (abfd)->a_tload = obj_textsec (abfd)->vma;
	247	exec_hdr (abfd)->a_dload = obj_datasec (abfd)->vma;
	248
	249	bout_swap_exec_header_out (abfd, exec_hdr (abfd), &swapped_hdr);
	250
	251	if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0
dc810e39 AM	252	\|\| bfd_bwrite ((PTR) & swapped_hdr, (bfd_size_type) EXEC_BYTES_SIZE,
dc810e39 AM	253	abfd) != EXEC_BYTES_SIZE)
b34976b6	254	return FALSE;
252b5132	255
e4b17274	256	/* Now write out reloc info, followed by syms and strings. */
252b5132 RH	257	if (bfd_get_symcount (abfd) != 0)
	258	{
	259	if (bfd_seek (abfd, (file_ptr) (N_SYMOFF (*exec_hdr (abfd))), SEEK_SET)
	260	!= 0)
b34976b6	261	return FALSE;
252b5132 RH	262
252b5132 RH	263	if (!aout_32_write_syms (abfd))
b34976b6	264	return FALSE;
252b5132 RH	265
	266	if (bfd_seek (abfd, (file_ptr) (N_TROFF (*exec_hdr (abfd))), SEEK_SET)
	267	!= 0)
b34976b6	268	return FALSE;
252b5132 RH	269
252b5132 RH	270	if (!b_out_squirt_out_relocs (abfd, obj_textsec (abfd)))
b34976b6	271	return FALSE;
252b5132 RH	272	if (bfd_seek (abfd, (file_ptr) (N_DROFF (*exec_hdr (abfd))), SEEK_SET)
252b5132 RH	273	!= 0)
b34976b6	274	return FALSE;
252b5132 RH	275
252b5132 RH	276	if (!b_out_squirt_out_relocs (abfd, obj_datasec (abfd)))
b34976b6	277	return FALSE;
252b5132	278	}
b34976b6	279	return TRUE;
252b5132 RH	280	}
252b5132 RH	281	\f
b34976b6	282	static bfd_boolean
252b5132 RH	283	os9k_set_section_contents (abfd, section, location, offset, count)
	284	bfd *abfd;
	285	sec_ptr section;
	286	unsigned char *location;
	287	file_ptr offset;
	288	int count;
	289	{
	290
82e51918	291	if (! abfd->output_has_begun)
252b5132 RH	292	{ /* set by bfd.c handler */
252b5132 RH	293	if (! aout_32_make_sections (abfd))
b34976b6	294	return FALSE;
252b5132 RH	295
	296	obj_textsec (abfd)->filepos = sizeof (struct internal_exec);
	297	obj_datasec (abfd)->filepos = obj_textsec (abfd)->filepos
	298	+ obj_textsec (abfd)->_raw_size;
	299
	300	}
e4b17274	301	/* Regardless, once we know what we're doing, we might as well get going. */
252b5132	302	if (bfd_seek (abfd, section->filepos + offset, SEEK_SET) != 0)
b34976b6	303	return FALSE;
252b5132 RH	304
252b5132 RH	305	if (count != 0)
dc810e39	306	return bfd_bwrite ((PTR) location, (bfd_size_type) count, abfd) == count;
e4b17274	307
b34976b6	308	return TRUE;
252b5132 RH	309	}
	310	#endif /* 0 */
	311
	312	static int
	313	os9k_sizeof_headers (ignore_abfd, ignore)
5f771d47	314	bfd *ignore_abfd ATTRIBUTE_UNUSED;
b34976b6	315	bfd_boolean ignore ATTRIBUTE_UNUSED;
252b5132 RH	316	{
	317	return sizeof (struct internal_exec);
	318	}
	319
e4b17274	320	\f
252b5132 RH	321
	322	#define aout_32_close_and_cleanup aout_32_bfd_free_cached_info
	323
	324	#define aout_32_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol
	325
	326	#define aout_32_bfd_reloc_type_lookup _bfd_norelocs_bfd_reloc_type_lookup
	327
	328	#define aout_32_get_section_contents_in_window \
	329	_bfd_generic_get_section_contents_in_window
	330
	331	#define os9k_bfd_get_relocated_section_contents \
	332	bfd_generic_get_relocated_section_contents
	333	#define os9k_bfd_relax_section bfd_generic_relax_section
	334	#define os9k_bfd_gc_sections bfd_generic_gc_sections
8550eb6e	335	#define os9k_bfd_merge_sections bfd_generic_merge_sections
e61463e1	336	#define os9k_bfd_discard_group bfd_generic_discard_group
252b5132	337	#define os9k_bfd_link_hash_table_create _bfd_generic_link_hash_table_create
e2d34d7d	338	#define os9k_bfd_link_hash_table_free _bfd_generic_link_hash_table_free
252b5132	339	#define os9k_bfd_link_add_symbols _bfd_generic_link_add_symbols
2d653fc7	340	#define os9k_bfd_link_just_syms _bfd_generic_link_just_syms
252b5132 RH	341	#define os9k_bfd_final_link _bfd_generic_final_link
	342	#define os9k_bfd_link_split_section _bfd_generic_link_split_section
	343
	344	const bfd_target i386os9k_vec =
e4b17274 NC	345	{
	346	"i386os9k", /* name */
	347	bfd_target_os9k_flavour,
	348	BFD_ENDIAN_LITTLE, /* data byte order is little */
	349	BFD_ENDIAN_LITTLE, /* hdr byte order is little */
	350	(HAS_RELOC \| EXEC_P \| WP_TEXT), /* object flags */
	351	(SEC_HAS_CONTENTS \| SEC_ALLOC \| SEC_LOAD), /* section flags */
	352	0, /* symbol leading char */
	353	' ', /* ar_pad_char */
	354	16, /* ar_max_namelen */
	355
	356	bfd_getl64, bfd_getl_signed_64, bfd_putl64,
	357	bfd_getl32, bfd_getl_signed_32, bfd_putl32,
	358	bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* data */
	359	bfd_getl64, bfd_getl_signed_64, bfd_putl64,
	360	bfd_getl32, bfd_getl_signed_32, bfd_putl32,
	361	bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* hdrs */
	362	{_bfd_dummy_target, os9k_object_p, /* bfd_check_format */
	363	bfd_generic_archive_p, _bfd_dummy_target},
	364	{bfd_false, bfd_false, /* bfd_set_format */
	365	_bfd_generic_mkarchive, bfd_false},
	366	{bfd_false, bfd_false, /* bfd_write_contents */
	367	_bfd_write_archive_contents, bfd_false},
	368
	369	BFD_JUMP_TABLE_GENERIC (aout_32),
	370	BFD_JUMP_TABLE_COPY (_bfd_generic),
	371	BFD_JUMP_TABLE_CORE (_bfd_nocore),
	372	BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_bsd),
	373	BFD_JUMP_TABLE_SYMBOLS (aout_32),
	374	BFD_JUMP_TABLE_RELOCS (aout_32),
	375	BFD_JUMP_TABLE_WRITE (aout_32),
	376	BFD_JUMP_TABLE_LINK (os9k),
	377	BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
dc810e39	378
e4b17274 NC	379	NULL,
	380
	381	(PTR) 0,
	382	};