X-Git-Url: http://drtracing.org/?a=blobdiff_plain;f=bfd%2Fi386lynx.c;h=f8b8e02610ad6414d284594afb91389b50b7b477;hb=19a6653ce8c6d8a76586a54f3c0396063de5f987;hp=e643dad795a3287b3d69dbc557c9ee65b8a0f899;hpb=5c8444f8f80fee5a32dfecbc0e408640c57c6809;p=deliverable%2Fbinutils-gdb.git diff --git a/bfd/i386lynx.c b/bfd/i386lynx.c index e643dad795..f8b8e02610 100644 --- a/bfd/i386lynx.c +++ b/bfd/i386lynx.c @@ -1,36 +1,39 @@ /* BFD back-end for i386 a.out binaries under LynxOS. - Copyright (C) 1990, 1991, 1992 Free Software Foundation, Inc. + Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1999, 2001, 2002, + 2003, 2007 Free Software Foundation, Inc. -This file is part of BFD, the Binary File Descriptor library. + 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 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 3 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. + 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. */ + 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., 51 Franklin Street - Fifth Floor, Boston, + MA 02110-1301, USA. */ -#define BYTES_IN_WORD 4 -#define ARCH 32 #define N_SHARED_LIB(x) 0 #define TEXT_START_ADDR 0 -#define PAGE_SIZE 4096 -#define SEGMENT_SIZE PAGE_SIZE +#define TARGET_PAGE_SIZE 4096 +#define SEGMENT_SIZE TARGET_PAGE_SIZE #define DEFAULT_ARCH bfd_arch_i386 -#define MY(OP) CAT(i386lynx_aout_,OP) +/* Do not "beautify" the CONCAT* macro args. Traditional C will not + remove whitespace added here, and thus will fail to concatenate + the tokens. */ +#define MY(OP) CONCAT2 (i386lynx_aout_,OP) #define TARGETNAME "a.out-i386-lynx" -#include "bfd.h" #include "sysdep.h" +#include "bfd.h" #include "libbfd.h" #ifndef WRITE_HEADERS @@ -50,22 +53,32 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ obj_reloc_entry_size (abfd)); \ NAME(aout,swap_exec_header_out) (abfd, execp, &exec_bytes); \ \ - bfd_seek (abfd, (file_ptr) 0, SEEK_SET); \ - bfd_write ((PTR) &exec_bytes, 1, EXEC_BYTES_SIZE, abfd); \ + if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0 \ + || bfd_bwrite ((PTR) &exec_bytes, (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) \ { \ - bfd_seek (abfd, (file_ptr)(N_SYMOFF(*execp)), SEEK_SET); \ + if (bfd_seek (abfd, (file_ptr) (N_SYMOFF(*execp)), SEEK_SET) \ + != 0) \ + return FALSE; \ \ - if (! NAME(aout,write_syms)(abfd)) return false; \ + if (! NAME(aout,write_syms) (abfd)) return FALSE; \ \ - bfd_seek (abfd, (file_ptr)(N_TRELOFF(*execp)), SEEK_SET); \ + if (bfd_seek (abfd, (file_ptr) (N_TRELOFF(*execp)), SEEK_SET) \ + != 0) \ + return FALSE; \ \ - if (!NAME(lynx,squirt_out_relocs) (abfd, obj_textsec (abfd))) return false; \ - bfd_seek (abfd, (file_ptr)(N_DRELOFF(*execp)), SEEK_SET); \ + if (!NAME(lynx,squirt_out_relocs) (abfd, obj_textsec (abfd))) \ + return FALSE; \ + if (bfd_seek (abfd, (file_ptr) (N_DRELOFF(*execp)), SEEK_SET) \ + != 0) \ + return 0; \ \ - if (!NAME(lynx,squirt_out_relocs)(abfd, obj_datasec (abfd))) return false; \ + if (!NAME(lynx,squirt_out_relocs) (abfd, obj_datasec (abfd))) \ + return FALSE; \ } \ } #endif @@ -73,22 +86,39 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #include "libaout.h" #include "aout/aout64.h" -#ifdef HOST_LYNX +void NAME (lynx,swap_std_reloc_out) + PARAMS ((bfd *, arelent *, struct reloc_std_external *)); +void NAME (lynx,swap_ext_reloc_out) + PARAMS ((bfd *, arelent *, struct reloc_ext_external *)); +void NAME (lynx,swap_ext_reloc_in) + PARAMS ((bfd *, struct reloc_ext_external *, arelent *, asymbol **, + bfd_size_type)); +void NAME (lynx,swap_std_reloc_in) + PARAMS ((bfd *, struct reloc_std_external *, arelent *, asymbol **, + bfd_size_type)); +bfd_boolean NAME (lynx,slurp_reloc_table) + PARAMS ((bfd *, sec_ptr, asymbol **)); +bfd_boolean NAME (lynx,squirt_out_relocs) + PARAMS ((bfd *, asection *)); +long NAME (lynx,canonicalize_reloc) + PARAMS ((bfd *, sec_ptr, arelent **, asymbol **)); + +#ifdef LYNX_CORE char *lynx_core_file_failing_command (); int lynx_core_file_failing_signal (); -boolean lynx_core_file_matches_executable_p (); -bfd_target *lynx_core_file_p (); +bfd_boolean lynx_core_file_matches_executable_p (); +const bfd_target *lynx_core_file_p (); #define MY_core_file_failing_command lynx_core_file_failing_command #define MY_core_file_failing_signal lynx_core_file_failing_signal #define MY_core_file_matches_executable_p lynx_core_file_matches_executable_p #define MY_core_file_p lynx_core_file_p -#endif /* HOST_LYNX */ +#endif /* LYNX_CORE */ -#define KEEPIT flags +#define KEEPIT udata.i extern reloc_howto_type aout_32_ext_howto_table[]; extern reloc_howto_type aout_32_std_howto_table[]; @@ -97,7 +127,7 @@ extern reloc_howto_type aout_32_std_howto_table[]; /* Output standard relocation information to a file in target byte order. */ void -NAME (lynx, swap_std_reloc_out) (abfd, g, natptr) +NAME(lynx,swap_std_reloc_out) (abfd, g, natptr) bfd *abfd; arelent *g; struct reloc_std_external *natptr; @@ -130,17 +160,17 @@ NAME (lynx, swap_std_reloc_out) (abfd, g, natptr) Absolute symbols can come in in two ways, either as an offset from the abs section, or as a symbol which has an abs value. check for that here - */ + */ if (bfd_is_com_section (output_section) - || output_section == &bfd_abs_section - || output_section == &bfd_und_section) + || bfd_is_abs_section (output_section) + || bfd_is_und_section (output_section)) { - if (bfd_abs_section.symbol == sym) + if (bfd_abs_section_ptr->symbol == sym) { /* Whoops, looked like an abs symbol, but is really an offset - from the abs section */ + from the abs section */ r_index = 0; r_extern = 0; } @@ -148,8 +178,7 @@ NAME (lynx, swap_std_reloc_out) (abfd, g, natptr) { /* Fill in symbol */ r_extern = 1; - r_index = stoi ((*(g->sym_ptr_ptr))->KEEPIT); - + r_index = (*g->sym_ptr_ptr)->KEEPIT; } } else @@ -160,7 +189,7 @@ NAME (lynx, swap_std_reloc_out) (abfd, g, natptr) } /* now the fun stuff */ - if (abfd->xvec->header_byteorder_big_p != false) + if (bfd_header_big_endian (abfd)) { natptr->r_index[0] = r_index >> 16; natptr->r_index[1] = r_index >> 8; @@ -193,7 +222,7 @@ NAME (lynx, swap_std_reloc_out) (abfd, g, natptr) /* Output extended relocation information to a file in target byte order. */ void -NAME (lynx, swap_ext_reloc_out) (abfd, g, natptr) +NAME(lynx,swap_ext_reloc_out) (abfd, g, natptr) bfd *abfd; arelent *g; register struct reloc_ext_external *natptr; @@ -221,10 +250,10 @@ NAME (lynx, swap_ext_reloc_out) (abfd, g, natptr) */ if (bfd_is_com_section (output_section) - || output_section == &bfd_abs_section - || output_section == &bfd_und_section) + || bfd_is_abs_section (output_section) + || bfd_is_und_section (output_section)) { - if (bfd_abs_section.symbol == sym) + if (bfd_abs_section_ptr->symbol == sym) { /* Whoops, looked like an abs symbol, but is really an offset from the abs section */ @@ -234,7 +263,7 @@ NAME (lynx, swap_ext_reloc_out) (abfd, g, natptr) else { r_extern = 1; - r_index = stoi ((*(g->sym_ptr_ptr))->KEEPIT); + r_index = (*g->sym_ptr_ptr)->KEEPIT; } } else @@ -246,7 +275,7 @@ NAME (lynx, swap_ext_reloc_out) (abfd, g, natptr) /* now the fun stuff */ - if (abfd->xvec->header_byteorder_big_p != false) + if (bfd_header_big_endian (abfd)) { natptr->r_index[0] = r_index >> 16; natptr->r_index[1] = r_index >> 8; @@ -304,18 +333,19 @@ NAME (lynx, swap_ext_reloc_out) (abfd, g, natptr) default: \ case N_ABS: \ case N_ABS | N_EXT: \ - cache_ptr->sym_ptr_ptr = bfd_abs_section.symbol_ptr_ptr; \ + cache_ptr->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr; \ cache_ptr->addend = ad; \ break; \ } \ } \ void -NAME (lynx, swap_ext_reloc_in) (abfd, bytes, cache_ptr, symbols) +NAME(lynx,swap_ext_reloc_in) (abfd, bytes, cache_ptr, symbols, symcount) bfd *abfd; struct reloc_ext_external *bytes; arelent *cache_ptr; asymbol **symbols; + bfd_size_type symcount ATTRIBUTE_UNUSED; { int r_index; int r_extern; @@ -334,11 +364,12 @@ NAME (lynx, swap_ext_reloc_in) (abfd, bytes, cache_ptr, symbols) } void -NAME (lynx, swap_std_reloc_in) (abfd, bytes, cache_ptr, symbols) +NAME(lynx,swap_std_reloc_in) (abfd, bytes, cache_ptr, symbols, symcount) bfd *abfd; struct reloc_std_external *bytes; arelent *cache_ptr; asymbol **symbols; + bfd_size_type symcount ATTRIBUTE_UNUSED; { int r_index; int r_extern; @@ -347,7 +378,7 @@ NAME (lynx, swap_std_reloc_in) (abfd, bytes, cache_ptr, symbols) int r_baserel, r_jmptable, r_relative; struct aoutdata *su = &(abfd->tdata.aout_data->a); - cache_ptr->address = bfd_h_get_32 (abfd, bytes->r_address); + cache_ptr->address = H_GET_32 (abfd, bytes->r_address); r_index = bytes->r_index[1]; r_extern = (0 != (bytes->r_index[0] & RELOC_STD_BITS_EXTERN_BIG)); @@ -366,23 +397,23 @@ NAME (lynx, swap_std_reloc_in) (abfd, bytes, cache_ptr, symbols) /* Reloc hackery */ -boolean +bfd_boolean NAME(lynx,slurp_reloc_table) (abfd, asect, symbols) bfd *abfd; sec_ptr asect; asymbol **symbols; { - unsigned int count; + bfd_size_type count; bfd_size_type reloc_size; PTR relocs; arelent *reloc_cache; size_t each_size; if (asect->relocation) - return true; + return TRUE; if (asect->flags & SEC_CONSTRUCTOR) - return true; + return TRUE; if (asect == obj_datasec (abfd)) { @@ -397,37 +428,32 @@ NAME(lynx,slurp_reloc_table) (abfd, asect, symbols) } bfd_set_error (bfd_error_invalid_operation); - return false; + return FALSE; doit: if (bfd_seek (abfd, asect->rel_filepos, SEEK_SET) != 0) - return false; + return FALSE; each_size = obj_reloc_entry_size (abfd); count = reloc_size / each_size; - reloc_cache = (arelent *) malloc (count * sizeof (arelent)); + reloc_cache = (arelent *) bfd_zmalloc (count * sizeof (arelent)); if (!reloc_cache && count != 0) - { - nomem: - bfd_set_error (bfd_error_no_memory); - return false; - } - memset (reloc_cache, 0, count * sizeof (arelent)); + return FALSE; relocs = (PTR) bfd_alloc (abfd, reloc_size); - if (!relocs) + if (!relocs && reloc_size != 0) { free (reloc_cache); - goto nomem; + return FALSE; } - if (bfd_read (relocs, 1, reloc_size, abfd) != reloc_size) + if (bfd_bread (relocs, reloc_size, abfd) != reloc_size) { bfd_release (abfd, relocs); free (reloc_cache); - return false; + return FALSE; } if (each_size == RELOC_EXT_SIZE) @@ -438,7 +464,8 @@ doit: for (; counter < count; counter++, rptr++, cache_ptr++) { - NAME (lynx, swap_ext_reloc_in) (abfd, rptr, cache_ptr, symbols); + NAME(lynx,swap_ext_reloc_in) (abfd, rptr, cache_ptr, symbols, + (bfd_size_type) bfd_get_symcount (abfd)); } } else @@ -449,7 +476,8 @@ doit: for (; counter < count; counter++, rptr++, cache_ptr++) { - NAME (lynx, swap_std_reloc_in) (abfd, rptr, cache_ptr, symbols); + NAME(lynx,swap_std_reloc_in) (abfd, rptr, cache_ptr, symbols, + (bfd_size_type) bfd_get_symcount (abfd)); } } @@ -457,15 +485,15 @@ doit: bfd_release (abfd, relocs); asect->relocation = reloc_cache; asect->reloc_count = count; - return true; + return TRUE; } /* Write out a relocation section into an object file. */ -boolean -NAME (lynx, squirt_out_relocs) (abfd, section) +bfd_boolean +NAME(lynx,squirt_out_relocs) (abfd, section) bfd *abfd; asection *section; { @@ -474,19 +502,17 @@ NAME (lynx, squirt_out_relocs) (abfd, section) size_t each_size; unsigned int count = section->reloc_count; - size_t natsize; + bfd_size_type natsize; if (count == 0) - return true; + return TRUE; each_size = obj_reloc_entry_size (abfd); - natsize = each_size * count; + natsize = count; + natsize *= each_size; native = (unsigned char *) bfd_zalloc (abfd, natsize); if (!native) - { - bfd_set_error (bfd_error_no_memory); - return false; - } + return FALSE; generic = section->orelocation; @@ -495,24 +521,24 @@ NAME (lynx, squirt_out_relocs) (abfd, section) for (natptr = native; count != 0; --count, natptr += each_size, ++generic) - NAME (lynx, swap_ext_reloc_out) (abfd, *generic, (struct reloc_ext_external *) natptr); + NAME(lynx,swap_ext_reloc_out) (abfd, *generic, (struct reloc_ext_external *) natptr); } else { for (natptr = native; count != 0; --count, natptr += each_size, ++generic) - NAME (lynx, swap_std_reloc_out) (abfd, *generic, (struct reloc_std_external *) natptr); + NAME(lynx,swap_std_reloc_out) (abfd, *generic, (struct reloc_std_external *) natptr); } - if (bfd_write ((PTR) native, 1, natsize, abfd) != natsize) + if (bfd_bwrite ((PTR) native, natsize, abfd) != natsize) { bfd_release (abfd, native); - return false; + return FALSE; } bfd_release (abfd, native); - return true; + return TRUE; } /* This is stupid. This function should be a boolean predicate */ @@ -526,7 +552,7 @@ NAME(lynx,canonicalize_reloc) (abfd, section, relptr, symbols) arelent *tblptr = section->relocation; unsigned int count; - if (!(tblptr || NAME (lynx, slurp_reloc_table) (abfd, section, symbols))) + if (!(tblptr || NAME(lynx,slurp_reloc_table) (abfd, section, symbols))) return -1; if (section->flags & SEC_CONSTRUCTOR) @@ -541,8 +567,6 @@ NAME(lynx,canonicalize_reloc) (abfd, section, relptr, symbols) else { tblptr = section->relocation; - if (!tblptr) - return -1; for (count = 0; count++ < section->reloc_count;) {