aout-target.h.tar.gz_out

/* Define a target vector and some small routines for a variant of a.out. Copyright (C) 1990, 91, 92, 93, 94, 95, 96, 97, 98, 1999 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #include "aout/aout64.h" #include "aout/stab_gnu.h" #include "aout/ar.h" /*#include "libaout.h"*/ #ifndef SEGMENT_SIZE #define SEGMENT_SIZE TARGET_PAGE_SIZE #endif extern reloc_howto_type * NAME(aout,reloc_type_lookup) PARAMS ((bfd *, bfd_reloc_code_real_type)); /* 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) PARAMS ((bfd *)); 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); /* For some targets, if the entry point is not in the same page as the start of the text, then adjust the VMA so that it is. FIXME: Do this with a macro like SET_ARCH_MACH instead? */ if (aout_backend_info (abfd)->entry_is_text_address && execp->a_entry > obj_textsec (abfd)->vma) { bfd_vma adjust; adjust = execp->a_entry - obj_textsec (abfd)->vma; /* Adjust only by whole pages. */ adjust &= ~(TARGET_PAGE_SIZE - 1); obj_textsec (abfd)->vma += adjust; obj_datasec (abfd)->vma += adjust; obj_bsssec (abfd)->vma += adjust; } /* Set the load addresses to be the same as the virtual addresses. */ obj_textsec (abfd)->lma = obj_textsec (abfd)->vma; obj_datasec (abfd)->lma = obj_datasec (abfd)->vma; obj_bsssec (abfd)->lma = obj_bsssec (abfd)->vma; /* 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 /* The number of relocation records. This must be called after SET_ARCH_MACH. It assumes that SET_ARCH_MACH will set obj_reloc_entry_size correctly, if the reloc size is not RELOC_STD_SIZE. */ obj_textsec (abfd)->reloc_count = execp->a_trsize / obj_reloc_entry_size (abfd); obj_datasec (abfd)->reloc_count = execp->a_drsize / obj_reloc_entry_size (abfd); /* 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 = TARGET_PAGE_SIZE; adata(abfd).segment_size = SEGMENT_SIZE; 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) PARAMS ((bfd *)); 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) PARAMS ((bfd *)); 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 = TARGET_PAGE_SIZE; adata(abfd).segment_size = SEGMENT_SIZE; 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. */ stati