1 /* BFD back-end for os9000 i386 binaries.
2 Copyright 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
3 Written by Cygnus Support.
5 This file is part of BFD, the Binary File Descriptor library.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
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.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
26 #include "libaout.h" /* BFD a.out internal data structures */
29 static bfd_target
*os9k_callback
PARAMS ((bfd
*));
31 /* Swaps the information in an executable header taken from a raw byte
32 stream memory image, into the internal exec_header structure. */
34 os9k_swap_exec_header_in (abfd
, raw_bytes
, execp
)
37 struct internal_exec
*execp
;
39 mh_com
*bytes
= (mh_com
*) raw_bytes
;
40 unsigned int dload
, dmemsize
, dmemstart
;
42 /* Now fill in fields in the execp, from the bytes in the raw data. */
43 execp
->a_info
= bfd_h_get_16 (abfd
, bytes
->m_sync
);
45 execp
->a_entry
= bfd_h_get_32 (abfd
, bytes
->m_exec
);
50 dload
= bfd_h_get_32 (abfd
, bytes
->m_idata
);
51 execp
->a_data
= dload
+ 8;
53 if (bfd_seek (abfd
, (file_ptr
) dload
, SEEK_SET
) != 0
54 || (bfd_read (&dmemstart
, sizeof (dmemstart
), 1, abfd
)
55 != sizeof (dmemstart
))
56 || (bfd_read (&dmemsize
, sizeof (dmemsize
), 1, abfd
)
57 != sizeof (dmemsize
)))
61 execp
->a_dload
= bfd_h_get_32 (abfd
, (unsigned char *) &dmemstart
);
62 execp
->a_text
= dload
- execp
->a_tload
;
63 execp
->a_data
= bfd_h_get_32 (abfd
, (unsigned char *) &dmemsize
);
64 execp
->a_bss
= bfd_h_get_32 (abfd
, bytes
->m_data
) - execp
->a_data
;
73 /* Swaps the information in an internal exec header structure into the
74 supplied buffer ready for writing to disk. */
76 PROTO (void, os9k_swap_exec_header_out
,
78 struct internal_exec
* execp
,
79 struct mh_com
* raw_bytes
));
81 os9k_swap_exec_header_out (abfd
, execp
, raw_bytes
)
83 struct internal_exec
*execp
;
86 mh_com
*bytes
= (mh_com
*) raw_bytes
;
88 /* Now fill in fields in the raw data, from the fields in the exec struct. */
89 bfd_h_put_32 (abfd
, execp
->a_info
, bytes
->e_info
);
90 bfd_h_put_32 (abfd
, execp
->a_text
, bytes
->e_text
);
91 bfd_h_put_32 (abfd
, execp
->a_data
, bytes
->e_data
);
92 bfd_h_put_32 (abfd
, execp
->a_bss
, bytes
->e_bss
);
93 bfd_h_put_32 (abfd
, execp
->a_syms
, bytes
->e_syms
);
94 bfd_h_put_32 (abfd
, execp
->a_entry
, bytes
->e_entry
);
95 bfd_h_put_32 (abfd
, execp
->a_trsize
, bytes
->e_trsize
);
96 bfd_h_put_32 (abfd
, execp
->a_drsize
, bytes
->e_drsize
);
97 bfd_h_put_32 (abfd
, execp
->a_tload
, bytes
->e_tload
);
98 bfd_h_put_32 (abfd
, execp
->a_dload
, bytes
->e_dload
);
99 bytes
->e_talign
[0] = execp
->a_talign
;
100 bytes
->e_dalign
[0] = execp
->a_dalign
;
101 bytes
->e_balign
[0] = execp
->a_balign
;
102 bytes
->e_relaxable
[0] = execp
->a_relaxable
;
111 struct internal_exec anexec
;
114 if (bfd_read ((PTR
) & exec_bytes
, MHCOM_BYTES_SIZE
, 1, abfd
)
117 if (bfd_get_error () != bfd_error_system_call
)
118 bfd_set_error (bfd_error_wrong_format
);
122 anexec
.a_info
= bfd_h_get_16 (abfd
, exec_bytes
.m_sync
);
123 if (N_BADMAG (anexec
))
125 bfd_set_error (bfd_error_wrong_format
);
129 if (! os9k_swap_exec_header_in (abfd
, &exec_bytes
, &anexec
))
131 if (bfd_get_error () != bfd_error_system_call
)
132 bfd_set_error (bfd_error_wrong_format
);
135 return aout_32_some_aout_object_p (abfd
, &anexec
, os9k_callback
);
139 /* Finish up the opening of a b.out file for reading. Fill in all the
140 fields that are not handled by common code. */
146 struct internal_exec
*execp
= exec_hdr (abfd
);
147 unsigned long bss_start
;
149 /* Architecture and machine type */
150 bfd_set_arch_mach (abfd
, bfd_arch_i386
, 0);
152 /* The positions of the string table and symbol table. */
153 obj_str_filepos (abfd
) = 0;
154 obj_sym_filepos (abfd
) = 0;
156 /* The alignments of the sections */
157 obj_textsec (abfd
)->alignment_power
= execp
->a_talign
;
158 obj_datasec (abfd
)->alignment_power
= execp
->a_dalign
;
159 obj_bsssec (abfd
)->alignment_power
= execp
->a_balign
;
161 /* The starting addresses of the sections. */
162 obj_textsec (abfd
)->vma
= execp
->a_tload
;
163 obj_datasec (abfd
)->vma
= execp
->a_dload
;
165 /* And reload the sizes, since the aout module zaps them */
166 obj_textsec (abfd
)->_raw_size
= execp
->a_text
;
168 bss_start
= execp
->a_dload
+ execp
->a_data
; /* BSS = end of data section */
169 obj_bsssec (abfd
)->vma
= align_power (bss_start
, execp
->a_balign
);
171 /* The file positions of the sections */
172 obj_textsec (abfd
)->filepos
= execp
->a_entry
;
173 obj_datasec (abfd
)->filepos
= execp
->a_dload
;
175 /* The file positions of the relocation info ***
176 obj_textsec (abfd)->rel_filepos = N_TROFF(*execp);
177 obj_datasec (abfd)->rel_filepos = N_DROFF(*execp);
180 adata (abfd
).page_size
= 1; /* Not applicable. */
181 adata (abfd
).segment_size
= 1;/* Not applicable. */
182 adata (abfd
).exec_bytes_size
= MHCOM_BYTES_SIZE
;
188 struct bout_data_struct
191 struct internal_exec e
;
198 struct bout_data_struct
*rawptr
;
200 rawptr
= (struct bout_data_struct
*) bfd_zalloc (abfd
, sizeof (struct bout_data_struct
));
203 bfd_set_error (bfd_error_no_memory
);
207 abfd
->tdata
.bout_data
= rawptr
;
208 exec_hdr (abfd
) = &rawptr
->e
;
210 /* For simplicity's sake we just make all the sections right here. */
211 obj_textsec (abfd
) = (asection
*) NULL
;
212 obj_datasec (abfd
) = (asection
*) NULL
;
213 obj_bsssec (abfd
) = (asection
*) NULL
;
215 bfd_make_section (abfd
, ".text");
216 bfd_make_section (abfd
, ".data");
217 bfd_make_section (abfd
, ".bss");
223 os9k_write_object_contents (abfd
)
226 struct external_exec swapped_hdr
;
228 exec_hdr (abfd
)->a_info
= BMAGIC
;
230 exec_hdr (abfd
)->a_text
= obj_textsec (abfd
)->_raw_size
;
231 exec_hdr (abfd
)->a_data
= obj_datasec (abfd
)->_raw_size
;
232 exec_hdr (abfd
)->a_bss
= obj_bsssec (abfd
)->_raw_size
;
233 exec_hdr (abfd
)->a_syms
= bfd_get_symcount (abfd
) * sizeof (struct nlist
);
234 exec_hdr (abfd
)->a_entry
= bfd_get_start_address (abfd
);
235 exec_hdr (abfd
)->a_trsize
= ((obj_textsec (abfd
)->reloc_count
) *
236 sizeof (struct relocation_info
));
237 exec_hdr (abfd
)->a_drsize
= ((obj_datasec (abfd
)->reloc_count
) *
238 sizeof (struct relocation_info
));
240 exec_hdr (abfd
)->a_talign
= obj_textsec (abfd
)->alignment_power
;
241 exec_hdr (abfd
)->a_dalign
= obj_datasec (abfd
)->alignment_power
;
242 exec_hdr (abfd
)->a_balign
= obj_bsssec (abfd
)->alignment_power
;
244 exec_hdr (abfd
)->a_tload
= obj_textsec (abfd
)->vma
;
245 exec_hdr (abfd
)->a_dload
= obj_datasec (abfd
)->vma
;
247 bout_swap_exec_header_out (abfd
, exec_hdr (abfd
), &swapped_hdr
);
249 if (bfd_seek (abfd
, (file_ptr
) 0, SEEK_SET
) != 0
250 || (bfd_write ((PTR
) & swapped_hdr
, 1, EXEC_BYTES_SIZE
, abfd
)
254 /* Now write out reloc info, followed by syms and strings */
255 if (bfd_get_symcount (abfd
) != 0)
257 if (bfd_seek (abfd
, (file_ptr
) (N_SYMOFF (*exec_hdr (abfd
))), SEEK_SET
)
261 if (!aout_32_write_syms (abfd
))
264 if (bfd_seek (abfd
, (file_ptr
) (N_TROFF (*exec_hdr (abfd
))), SEEK_SET
)
268 if (!b_out_squirt_out_relocs (abfd
, obj_textsec (abfd
)))
270 if (bfd_seek (abfd
, (file_ptr
) (N_DROFF (*exec_hdr (abfd
))), SEEK_SET
)
274 if (!b_out_squirt_out_relocs (abfd
, obj_datasec (abfd
)))
281 os9k_set_section_contents (abfd
, section
, location
, offset
, count
)
284 unsigned char *location
;
289 if (abfd
->output_has_begun
== false)
290 { /* set by bfd.c handler */
291 if ((obj_textsec (abfd
) == NULL
) || (obj_datasec (abfd
) == NULL
) /*||
292 (obj_textsec (abfd)->_cooked_size == 0) || (obj_datasec (abfd)->_cooked_size == 0)*/ )
294 bfd_set_error (bfd_error_invalid_operation
);
298 obj_textsec (abfd
)->filepos
= sizeof (struct internal_exec
);
299 obj_datasec (abfd
)->filepos
= obj_textsec (abfd
)->filepos
300 + obj_textsec (abfd
)->_raw_size
;
303 /* regardless, once we know what we're doing, we might as well get going */
304 if (bfd_seek (abfd
, section
->filepos
+ offset
, SEEK_SET
) != 0)
309 return (bfd_write ((PTR
) location
, 1, count
, abfd
) == count
) ? true : false;
316 os9k_sizeof_headers (ignore_abfd
, ignore
)
320 return sizeof (struct internal_exec
);
324 /***********************************************************************/
326 #define aout_32_close_and_cleanup aout_32_bfd_free_cached_info
328 #define aout_32_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol
330 #define aout_32_bfd_reloc_type_lookup _bfd_norelocs_bfd_reloc_type_lookup
332 #define os9k_bfd_get_relocated_section_contents \
333 bfd_generic_get_relocated_section_contents
334 #define os9k_bfd_relax_section bfd_generic_relax_section
335 #define os9k_bfd_link_hash_table_create _bfd_generic_link_hash_table_create
336 #define os9k_bfd_link_add_symbols _bfd_generic_link_add_symbols
337 #define os9k_bfd_final_link _bfd_generic_final_link
339 bfd_target i386os9k_vec
=
341 "i386os9k", /* name */
342 bfd_target_os9k_flavour
,
343 false, /* data byte order is little */
344 false, /* hdr byte order is big */
345 (HAS_RELOC
| EXEC_P
| WP_TEXT
), /* object flags */
346 (SEC_HAS_CONTENTS
| SEC_ALLOC
| SEC_LOAD
), /* section flags */
347 0, /* symbol leading char */
348 ' ', /* ar_pad_char */
349 16, /* ar_max_namelen */
350 2, /* minumum alignment power */
352 bfd_getl64
, bfd_getl_signed_64
, bfd_putl64
,
353 bfd_getl32
, bfd_getl_signed_32
, bfd_putl32
,
354 bfd_getl16
, bfd_getl_signed_16
, bfd_putl16
, /* data */
355 bfd_getl64
, bfd_getl_signed_64
, bfd_putl64
,
356 bfd_getl32
, bfd_getl_signed_32
, bfd_putl32
,
357 bfd_getl16
, bfd_getl_signed_16
, bfd_putl16
, /* hdrs */
358 {_bfd_dummy_target
, os9k_object_p
, /* bfd_check_format */
359 bfd_generic_archive_p
, _bfd_dummy_target
},
360 {bfd_false
, bfd_false
, /* bfd_set_format */
361 _bfd_generic_mkarchive
, bfd_false
},
362 {bfd_false
, bfd_false
, /* bfd_write_contents */
363 _bfd_write_archive_contents
, bfd_false
},
365 BFD_JUMP_TABLE_GENERIC (aout_32
),
366 BFD_JUMP_TABLE_COPY (_bfd_generic
),
367 BFD_JUMP_TABLE_CORE (_bfd_nocore
),
368 BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_bsd
),
369 BFD_JUMP_TABLE_SYMBOLS (aout_32
),
370 BFD_JUMP_TABLE_RELOCS (aout_32
),
371 BFD_JUMP_TABLE_WRITE (aout_32
),
372 BFD_JUMP_TABLE_LINK (os9k
),
373 BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic
),