X-Git-Url: http://drtracing.org/?a=blobdiff_plain;f=bfd%2Fnlmcode.h;h=e9bb25d20cc7333a7e2bed01c5f3f36b8de82982;hb=f26dd30880bad7f75b5ed1b1683628c7c986bb34;hp=d4501d066fbce6ce6f3de033aea7c05ebbd364d9;hpb=dc810e3900d47ab2eea86d50231ff2e70b596847;p=deliverable%2Fbinutils-gdb.git diff --git a/bfd/nlmcode.h b/bfd/nlmcode.h index d4501d066f..e9bb25d20c 100644 --- a/bfd/nlmcode.h +++ b/bfd/nlmcode.h @@ -1,28 +1,28 @@ /* NLM (NetWare Loadable Module) executable support for BFD. - Copyright 1993, 1994, 1995, 1998, 2000, 2001 - Free Software Foundation, Inc. + Copyright (C) 1993-2015 Free Software Foundation, Inc. Written by Fred Fish @ Cygnus Support, using ELF support as the template. -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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, 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. */ -#include "bfd.h" #include "sysdep.h" +#include "bfd.h" #include "libbfd.h" #include "libnlm.h" @@ -33,52 +33,29 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ is named nlm_symbol_type below is actually named nlm32_symbol_type in the final executable. */ -#define Nlm_External_Fixed_Header NlmNAME(External_Fixed_Header) -#define Nlm_External_Version_Header NlmNAME(External_Version_Header) -#define Nlm_External_Copyright_Header NlmNAME(External_Copyright_Header) -#define Nlm_External_Extended_Header NlmNAME(External_Extended_Header) -#define Nlm_External_Custom_Header NlmNAME(External_Custom_Header) -#define Nlm_External_Cygnus_Ext_Header NlmNAME(External_Cygnus_Ext_Header) - -#define nlm_symbol_type nlmNAME(symbol_type) -#define nlm_get_symtab_upper_bound nlmNAME(get_symtab_upper_bound) -#define nlm_get_symtab nlmNAME(get_symtab) -#define nlm_make_empty_symbol nlmNAME(make_empty_symbol) -#define nlm_print_symbol nlmNAME(print_symbol) -#define nlm_get_symbol_info nlmNAME(get_symbol_info) -#define nlm_get_reloc_upper_bound nlmNAME(get_reloc_upper_bound) -#define nlm_canonicalize_reloc nlmNAME(canonicalize_reloc) -#define nlm_object_p nlmNAME(object_p) -#define nlm_set_section_contents nlmNAME(set_section_contents) -#define nlm_write_object_contents nlmNAME(write_object_contents) +#define Nlm_External_Fixed_Header NlmNAME (External_Fixed_Header) +#define Nlm_External_Version_Header NlmNAME (External_Version_Header) +#define Nlm_External_Copyright_Header NlmNAME (External_Copyright_Header) +#define Nlm_External_Extended_Header NlmNAME (External_Extended_Header) +#define Nlm_External_Custom_Header NlmNAME (External_Custom_Header) +#define Nlm_External_Cygnus_Ext_Header NlmNAME (External_Cygnus_Ext_Header) + +#define nlm_symbol_type nlmNAME (symbol_type) +#define nlm_get_symtab_upper_bound nlmNAME (get_symtab_upper_bound) +#define nlm_canonicalize_symtab nlmNAME (canonicalize_symtab) +#define nlm_make_empty_symbol nlmNAME (make_empty_symbol) +#define nlm_print_symbol nlmNAME (print_symbol) +#define nlm_get_symbol_info nlmNAME (get_symbol_info) +#define nlm_get_reloc_upper_bound nlmNAME (get_reloc_upper_bound) +#define nlm_canonicalize_reloc nlmNAME (canonicalize_reloc) +#define nlm_object_p nlmNAME (object_p) +#define nlm_set_section_contents nlmNAME (set_section_contents) +#define nlm_write_object_contents nlmNAME (write_object_contents) #define nlm_swap_fixed_header_in(abfd,src,dst) \ - (nlm_swap_fixed_header_in_func(abfd)) (abfd,src,dst) + (nlm_swap_fixed_header_in_func (abfd)) (abfd, src, dst) #define nlm_swap_fixed_header_out(abfd,src,dst) \ - (nlm_swap_fixed_header_out_func(abfd)) (abfd,src,dst) - -/* Forward declarations of static functions */ - -static boolean add_bfd_section - PARAMS ((bfd *, char *, file_ptr, bfd_size_type, flagword)); -static boolean nlm_swap_variable_header_in - PARAMS ((bfd *)); -static boolean nlm_swap_variable_header_out - PARAMS ((bfd *)); -static boolean find_nonzero - PARAMS ((PTR, size_t)); -static boolean nlm_swap_auxiliary_headers_in - PARAMS ((bfd *)); -static boolean nlm_swap_auxiliary_headers_out - PARAMS ((bfd *)); -static boolean nlm_slurp_symbol_table - PARAMS ((bfd *)); -static boolean nlm_slurp_reloc_fixups - PARAMS ((bfd *)); -static boolean nlm_compute_section_file_positions - PARAMS ((bfd *)); -static int nlm_external_reloc_compare - PARAMS ((const void *, const void *)); + (nlm_swap_fixed_header_out_func (abfd)) (abfd, src, dst) /* Should perhaps use put_offset, put_word, etc. For now, the two versions can be handled by explicitly specifying 32 bits or "the long type". */ @@ -91,297 +68,86 @@ static int nlm_external_reloc_compare #define get_word H_GET_32 #endif -const bfd_target * -nlm_object_p (abfd) - bfd *abfd; -{ - struct nlm_obj_tdata *preserved_tdata = nlm_tdata (abfd); - boolean (*backend_object_p) PARAMS ((bfd *)); - PTR x_fxdhdr = NULL; - Nlm_Internal_Fixed_Header *i_fxdhdrp; - struct nlm_obj_tdata *new_tdata = NULL; - const char *signature; - enum bfd_architecture arch; - bfd_size_type amt; - - /* Some NLM formats have a prefix before the standard NLM fixed - header. */ - backend_object_p = nlm_backend_object_p_func (abfd); - if (backend_object_p) - { - if (!(*backend_object_p) (abfd)) - goto got_wrong_format_error; - } - - /* Read in the fixed length portion of the NLM header in external format. */ - - amt = nlm_fixed_header_size (abfd); - x_fxdhdr = (PTR) bfd_malloc (amt); - if (x_fxdhdr == NULL) - goto got_no_match; - - if (bfd_bread ((PTR) x_fxdhdr, amt, abfd) != amt) - { - if (bfd_get_error () != bfd_error_system_call) - goto got_wrong_format_error; - else - goto got_no_match; - } - - /* Allocate an instance of the nlm_obj_tdata structure and hook it up to - the tdata pointer in the bfd. */ - - amt = sizeof (struct nlm_obj_tdata); - new_tdata = (struct nlm_obj_tdata *) bfd_zalloc (abfd, amt); - if (new_tdata == NULL) - goto got_no_match; - - nlm_tdata (abfd) = new_tdata; - - i_fxdhdrp = nlm_fixed_header (abfd); - nlm_swap_fixed_header_in (abfd, x_fxdhdr, i_fxdhdrp); - free (x_fxdhdr); - x_fxdhdr = NULL; - - /* Check to see if we have an NLM file for this backend by matching - the NLM signature. */ - - signature = nlm_signature (abfd); - if (signature != NULL - && *signature != '\0' - && strncmp ((char *) i_fxdhdrp->signature, signature, - NLM_SIGNATURE_SIZE) != 0) - goto got_wrong_format_error; - - /* There's no supported way to discover the endianess of an NLM, so test for - a sane version number after doing byte swapping appropriate for this - XVEC. (Hack alert!) */ - - if (i_fxdhdrp->version > 0xFFFF) - goto got_wrong_format_error; - - /* There's no supported way to check for 32 bit versus 64 bit addresses, - so ignore this distinction for now. (FIXME) */ - - /* Swap in the rest of the required header. */ - if (!nlm_swap_variable_header_in (abfd)) - { - if (bfd_get_error () != bfd_error_system_call) - goto got_wrong_format_error; - else - goto got_no_match; - } - - /* Add the sections supplied by all NLM's, and then read in the - auxiliary headers. Reading the auxiliary headers may create - additional sections described in the cygnus_ext header. - From this point on we assume that we have an NLM, and do not - treat errors as indicating the wrong format. */ - - if (!add_bfd_section (abfd, NLM_CODE_NAME, - i_fxdhdrp->codeImageOffset, - i_fxdhdrp->codeImageSize, - (SEC_CODE | SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS - | SEC_RELOC)) - || !add_bfd_section (abfd, NLM_INITIALIZED_DATA_NAME, - i_fxdhdrp->dataImageOffset, - i_fxdhdrp->dataImageSize, - (SEC_DATA | SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS - | SEC_RELOC)) - || !add_bfd_section (abfd, NLM_UNINITIALIZED_DATA_NAME, - (file_ptr) 0, - i_fxdhdrp->uninitializedDataSize, - SEC_ALLOC)) - goto got_no_match; - - if (!nlm_swap_auxiliary_headers_in (abfd)) - goto got_no_match; - - if (nlm_fixed_header (abfd)->numberOfRelocationFixups != 0 - || nlm_fixed_header (abfd)->numberOfExternalReferences != 0) - abfd->flags |= HAS_RELOC; - if (nlm_fixed_header (abfd)->numberOfPublics != 0 - || nlm_fixed_header (abfd)->numberOfDebugRecords != 0 - || nlm_fixed_header (abfd)->numberOfExternalReferences != 0) - abfd->flags |= HAS_SYMS; - - arch = nlm_architecture (abfd); - if (arch != bfd_arch_unknown) - bfd_default_set_arch_mach (abfd, arch, (unsigned long) 0); - - abfd->flags |= EXEC_P; - bfd_get_start_address (abfd) = nlm_fixed_header (abfd)->codeStartOffset; - - return (abfd->xvec); - -got_wrong_format_error: - bfd_set_error (bfd_error_wrong_format); -got_no_match: - nlm_tdata (abfd) = preserved_tdata; - if (new_tdata != NULL) - bfd_release (abfd, new_tdata); - if (x_fxdhdr != NULL) - free (x_fxdhdr); - return (NULL); -} - -/* Add a section to the bfd. */ - -static boolean -add_bfd_section (abfd, name, offset, size, flags) - bfd *abfd; - char *name; - file_ptr offset; - bfd_size_type size; - flagword flags; -{ - asection *newsect; - - newsect = bfd_make_section (abfd, name); - if (newsect == NULL) - { - return false; - } - newsect->vma = 0; /* NLM's are relocatable. */ - newsect->_raw_size = size; - newsect->filepos = offset; - newsect->flags = flags; - newsect->alignment_power = bfd_log2 ((bfd_vma) 0); /* FIXME */ - return true; -} - /* Read and swap in the variable length header. All the fields must exist in the NLM, and must exist in the order they are read here. */ -static boolean -nlm_swap_variable_header_in (abfd) - bfd *abfd; +static bfd_boolean +nlm_swap_variable_header_in (bfd *abfd) { unsigned char temp[NLM_TARGET_LONG_SIZE]; bfd_size_type amt; /* Read the description length and text members. */ - amt = sizeof (nlm_variable_header (abfd)->descriptionLength); - if (bfd_bread ((PTR) &nlm_variable_header (abfd)->descriptionLength, + if (bfd_bread ((void *) &nlm_variable_header (abfd)->descriptionLength, amt, abfd) != amt) - return false; + return FALSE; amt = nlm_variable_header (abfd)->descriptionLength + 1; - if (bfd_bread ((PTR) nlm_variable_header (abfd)->descriptionText, + if (bfd_bread ((void *) nlm_variable_header (abfd)->descriptionText, amt, abfd) != amt) - return false; + return FALSE; /* Read and convert the stackSize field. */ - amt = sizeof (temp); - if (bfd_bread ((PTR) temp, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) temp, amt, abfd) != amt) + return FALSE; nlm_variable_header (abfd)->stackSize = get_word (abfd, (bfd_byte *) temp); /* Read and convert the reserved field. */ - amt = sizeof (temp); - if (bfd_bread ((PTR) temp, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) temp, amt, abfd) != amt) + return FALSE; nlm_variable_header (abfd)->reserved = get_word (abfd, (bfd_byte *) temp); /* Read the oldThreadName field. This field is a fixed length string. */ - amt = sizeof (nlm_variable_header (abfd)->oldThreadName); - if (bfd_bread ((PTR) nlm_variable_header (abfd)->oldThreadName, + if (bfd_bread ((void *) nlm_variable_header (abfd)->oldThreadName, amt, abfd) != amt) - return false; + return FALSE; /* Read the screen name length and text members. */ - amt = sizeof (nlm_variable_header (abfd)->screenNameLength); - if (bfd_bread ((PTR) & nlm_variable_header (abfd)->screenNameLength, + if (bfd_bread ((void *) & nlm_variable_header (abfd)->screenNameLength, amt, abfd) != amt) - return false; + return FALSE; amt = nlm_variable_header (abfd)->screenNameLength + 1; - if (bfd_bread ((PTR) nlm_variable_header (abfd)->screenName, + if (bfd_bread ((void *) nlm_variable_header (abfd)->screenName, amt, abfd) != amt) - return false; + return FALSE; /* Read the thread name length and text members. */ - amt = sizeof (nlm_variable_header (abfd)->threadNameLength); - if (bfd_bread ((PTR) & nlm_variable_header (abfd)->threadNameLength, + if (bfd_bread ((void *) & nlm_variable_header (abfd)->threadNameLength, amt, abfd) != amt) - return false; + return FALSE; amt = nlm_variable_header (abfd)->threadNameLength + 1; - if (bfd_bread ((PTR) nlm_variable_header (abfd)->threadName, + if (bfd_bread ((void *) nlm_variable_header (abfd)->threadName, amt, abfd) != amt) - return false; - return true; + return FALSE; + return TRUE; } -/* Swap and write out the variable length header. All the fields must - exist in the NLM, and must exist in this order. */ +/* Add a section to the bfd. */ -static boolean -nlm_swap_variable_header_out (abfd) - bfd *abfd; +static bfd_boolean +add_bfd_section (bfd *abfd, + char *name, + file_ptr offset, + bfd_size_type size, + flagword flags) { - unsigned char temp[NLM_TARGET_LONG_SIZE]; - bfd_size_type amt; - - /* Write the description length and text members. */ - - amt = sizeof (nlm_variable_header (abfd)->descriptionLength); - if (bfd_bwrite ((PTR) & nlm_variable_header (abfd)->descriptionLength, amt, - abfd) != amt) - return false; - amt = nlm_variable_header (abfd)->descriptionLength + 1; - if (bfd_bwrite ((PTR) nlm_variable_header (abfd)->descriptionText, amt, - abfd) != amt) - return false; - - /* Convert and write the stackSize field. */ - - put_word (abfd, (bfd_vma) nlm_variable_header (abfd)->stackSize, - (bfd_byte *) temp); - amt = sizeof (temp); - if (bfd_bwrite ((PTR) temp, amt, abfd) != amt) - return false; - - /* Convert and write the reserved field. */ - - put_word (abfd, (bfd_vma) nlm_variable_header (abfd)->reserved, - (bfd_byte *) temp); - amt = sizeof (temp); - if (bfd_bwrite ((PTR) temp, amt, abfd) != amt) - return false; - - /* Write the oldThreadName field. This field is a fixed length string. */ - - amt = sizeof (nlm_variable_header (abfd)->oldThreadName); - if (bfd_bwrite ((PTR) nlm_variable_header (abfd)->oldThreadName, amt, - abfd) != amt) - return false; - - /* Write the screen name length and text members. */ + asection *newsect; - amt = sizeof (nlm_variable_header (abfd)->screenNameLength); - if (bfd_bwrite ((PTR) & nlm_variable_header (abfd)->screenNameLength, amt, - abfd) != amt) - return false; - amt = nlm_variable_header (abfd)->screenNameLength + 1; - if (bfd_bwrite ((PTR) nlm_variable_header (abfd)->screenName, amt, - abfd) != amt) - return false; + newsect = bfd_make_section_with_flags (abfd, name, flags); + if (newsect == NULL) + return FALSE; - /* Write the thread name length and text members. */ + newsect->vma = 0; /* NLM's are relocatable. */ + newsect->size = size; + newsect->filepos = offset; + newsect->alignment_power = bfd_log2 ((bfd_vma) 0); /* FIXME */ - amt = sizeof (nlm_variable_header (abfd)->threadNameLength); - if (bfd_bwrite ((PTR) & nlm_variable_header (abfd)->threadNameLength, amt, - abfd) != amt) - return false; - amt = nlm_variable_header (abfd)->threadNameLength + 1; - if (bfd_bwrite ((PTR) nlm_variable_header (abfd)->threadName, amt, - abfd) != amt) - return false; - return true; + return TRUE; } /* Read and swap in the contents of all the auxiliary headers. Because of @@ -393,9 +159,8 @@ nlm_swap_variable_header_out (abfd) of auxiliary header added will break all existing tools that don't recognize it. */ -static boolean -nlm_swap_auxiliary_headers_in (abfd) - bfd *abfd; +static bfd_boolean +nlm_swap_auxiliary_headers_in (bfd *abfd) { char tempstr[16]; file_ptr position; @@ -405,17 +170,17 @@ nlm_swap_auxiliary_headers_in (abfd) { position = bfd_tell (abfd); amt = sizeof (tempstr); - if (bfd_bread ((PTR) tempstr, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) tempstr, amt, abfd) != amt) + return FALSE; if (bfd_seek (abfd, position, SEEK_SET) != 0) - return false; - if (strncmp (tempstr, "VeRsIoN#", 8) == 0) + return FALSE; + if (CONST_STRNEQ (tempstr, "VeRsIoN#")) { Nlm_External_Version_Header thdr; amt = sizeof (thdr); - if (bfd_bread ((PTR) &thdr, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) &thdr, amt, abfd) != amt) + return FALSE; memcpy (nlm_version_header (abfd)->stamp, thdr.stamp, sizeof (thdr.stamp)); nlm_version_header (abfd)->majorVersion = @@ -431,13 +196,13 @@ nlm_swap_auxiliary_headers_in (abfd) nlm_version_header (abfd)->day = get_word (abfd, (bfd_byte *) thdr.day); } - else if (strncmp (tempstr, "MeSsAgEs", 8) == 0) + else if (CONST_STRNEQ (tempstr, "MeSsAgEs")) { Nlm_External_Extended_Header thdr; amt = sizeof (thdr); - if (bfd_bread ((PTR) &thdr, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) &thdr, amt, abfd) != amt) + return FALSE; memcpy (nlm_extended_header (abfd)->stamp, thdr.stamp, sizeof (thdr.stamp)); nlm_extended_header (abfd)->languageID = @@ -499,39 +264,39 @@ nlm_swap_auxiliary_headers_in (abfd) nlm_extended_header (abfd)->reserved5 = get_word (abfd, (bfd_byte *) thdr.reserved5); } - else if (strncmp (tempstr, "CoPyRiGhT=", 10) == 0) + else if (CONST_STRNEQ (tempstr, "CoPyRiGhT=")) { amt = sizeof (nlm_copyright_header (abfd)->stamp); - if (bfd_bread ((PTR) nlm_copyright_header (abfd)->stamp, + if (bfd_bread ((void *) nlm_copyright_header (abfd)->stamp, amt, abfd) != amt) - return false; - if (bfd_bread ((PTR) &(nlm_copyright_header (abfd) + return FALSE; + if (bfd_bread ((void *) &(nlm_copyright_header (abfd) ->copyrightMessageLength), (bfd_size_type) 1, abfd) != 1) - return false; + return FALSE; /* The copyright message is a variable length string. */ amt = nlm_copyright_header (abfd)->copyrightMessageLength + 1; - if (bfd_bread ((PTR) nlm_copyright_header (abfd)->copyrightMessage, + if (bfd_bread ((void *) nlm_copyright_header (abfd)->copyrightMessage, amt, abfd) != amt) - return false; + return FALSE; } - else if (strncmp (tempstr, "CuStHeAd", 8) == 0) + else if (CONST_STRNEQ (tempstr, "CuStHeAd")) { Nlm_External_Custom_Header thdr; bfd_size_type hdrLength; file_ptr dataOffset; bfd_size_type dataLength; char dataStamp[8]; - PTR hdr; + void * hdr; /* Read the stamp ("CuStHeAd"). */ amt = sizeof (thdr.stamp); - if (bfd_bread ((PTR) thdr.stamp, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) thdr.stamp, amt, abfd) != amt) + return FALSE; /* Read the length of this custom header. */ amt = sizeof (thdr.length); - if (bfd_bread ((PTR) thdr.length, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) thdr.length, amt, abfd) != amt) + return FALSE; hdrLength = get_word (abfd, (bfd_byte *) thdr.length); /* Read further fields if we have them. */ if (hdrLength < NLM_TARGET_LONG_SIZE) @@ -539,8 +304,8 @@ nlm_swap_auxiliary_headers_in (abfd) else { amt = sizeof (thdr.dataOffset); - if (bfd_bread ((PTR) thdr.dataOffset, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) thdr.dataOffset, amt, abfd) != amt) + return FALSE; dataOffset = get_word (abfd, (bfd_byte *) thdr.dataOffset); } if (hdrLength < 2 * NLM_TARGET_LONG_SIZE) @@ -548,8 +313,8 @@ nlm_swap_auxiliary_headers_in (abfd) else { amt = sizeof (thdr.dataLength); - if (bfd_bread ((PTR) thdr.dataLength, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) thdr.dataLength, amt, abfd) != amt) + return FALSE; dataLength = get_word (abfd, (bfd_byte *) thdr.dataLength); } if (hdrLength < 2 * NLM_TARGET_LONG_SIZE + 8) @@ -557,8 +322,8 @@ nlm_swap_auxiliary_headers_in (abfd) else { amt = sizeof (dataStamp); - if (bfd_bread ((PTR) dataStamp, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) dataStamp, amt, abfd) != amt) + return FALSE; } /* Read the rest of the header, if any. */ @@ -572,15 +337,15 @@ nlm_swap_auxiliary_headers_in (abfd) hdrLength -= 2 * NLM_TARGET_LONG_SIZE + 8; hdr = bfd_alloc (abfd, hdrLength); if (hdr == NULL) - return false; + return FALSE; if (bfd_bread (hdr, hdrLength, abfd) != hdrLength) - return false; + return FALSE; } /* If we have found a Cygnus header, process it. Otherwise, just save the associated data without trying to interpret it. */ - if (strncmp (dataStamp, "CyGnUsEx", 8) == 0) + if (CONST_STRNEQ (dataStamp, "CyGnUsEx")) { file_ptr pos; bfd_byte *contents; @@ -590,16 +355,16 @@ nlm_swap_auxiliary_headers_in (abfd) pos = bfd_tell (abfd); if (bfd_seek (abfd, dataOffset, SEEK_SET) != 0) - return false; - contents = (bfd_byte *) bfd_alloc (abfd, dataLength); + return FALSE; + contents = bfd_alloc (abfd, dataLength); if (contents == NULL) - return false; + return FALSE; if (bfd_bread (contents, dataLength, abfd) != dataLength) - return false; + return FALSE; if (bfd_seek (abfd, pos, SEEK_SET) != 0) - return false; + return FALSE; - memcpy (nlm_cygnus_ext_header (abfd), "CyGnUsEx", 8); + LITMEMCPY (nlm_cygnus_ext_header (abfd), "CyGnUsEx"); nlm_cygnus_ext_header (abfd)->offset = dataOffset; nlm_cygnus_ext_header (abfd)->length = dataLength; @@ -627,8 +392,7 @@ nlm_swap_auxiliary_headers_in (abfd) null terminated section name zeroes to adjust to 4 byte boundary 4 byte section data file pointer - 4 byte section size - */ + 4 byte section size. */ name = (char *) p; l = strlen (name) + 1; @@ -640,9 +404,9 @@ nlm_swap_auxiliary_headers_in (abfd) p += 4; newsec = bfd_make_section_anyway (abfd, name); - if (newsec == (asection *) NULL) - return false; - newsec->_raw_size = size; + if (newsec == NULL) + return FALSE; + newsec->size = size; if (filepos != 0) { newsec->filepos = filepos; @@ -663,45 +427,225 @@ nlm_swap_auxiliary_headers_in (abfd) } } else - { - break; - } + break; } - return true; + return TRUE; +} + +const bfd_target * +nlm_object_p (bfd *abfd) +{ + struct nlm_obj_tdata *preserved_tdata = nlm_tdata (abfd); + bfd_boolean (*backend_object_p) (bfd *); + void * x_fxdhdr = NULL; + Nlm_Internal_Fixed_Header *i_fxdhdrp; + struct nlm_obj_tdata *new_tdata = NULL; + const char *signature; + enum bfd_architecture arch; + bfd_size_type amt; + + /* Some NLM formats have a prefix before the standard NLM fixed + header. */ + backend_object_p = nlm_backend_object_p_func (abfd); + if (backend_object_p) + { + if (!(*backend_object_p) (abfd)) + goto got_wrong_format_error; + } + + /* Read in the fixed length portion of the NLM header in external format. */ + amt = nlm_fixed_header_size (abfd); + x_fxdhdr = bfd_malloc (amt); + if (x_fxdhdr == NULL) + goto got_no_match; + + if (bfd_bread ((void *) x_fxdhdr, amt, abfd) != amt) + { + if (bfd_get_error () != bfd_error_system_call) + goto got_wrong_format_error; + else + goto got_no_match; + } + + /* Allocate an instance of the nlm_obj_tdata structure and hook it up to + the tdata pointer in the bfd. */ + amt = sizeof (struct nlm_obj_tdata); + new_tdata = bfd_zalloc (abfd, amt); + if (new_tdata == NULL) + goto got_no_match; + + nlm_tdata (abfd) = new_tdata; + + i_fxdhdrp = nlm_fixed_header (abfd); + nlm_swap_fixed_header_in (abfd, x_fxdhdr, i_fxdhdrp); + free (x_fxdhdr); + x_fxdhdr = NULL; + + /* Check to see if we have an NLM file for this backend by matching + the NLM signature. */ + signature = nlm_signature (abfd); + if (signature != NULL + && *signature != '\0' + && strncmp ((char *) i_fxdhdrp->signature, signature, + NLM_SIGNATURE_SIZE) != 0) + goto got_wrong_format_error; + + /* There's no supported way to discover the endianness of an NLM, so test for + a sane version number after doing byte swapping appropriate for this + XVEC. (Hack alert!) */ + if (i_fxdhdrp->version > 0xFFFF) + goto got_wrong_format_error; + + /* There's no supported way to check for 32 bit versus 64 bit addresses, + so ignore this distinction for now. (FIXME) */ + /* Swap in the rest of the required header. */ + if (!nlm_swap_variable_header_in (abfd)) + { + if (bfd_get_error () != bfd_error_system_call) + goto got_wrong_format_error; + else + goto got_no_match; + } + + /* Add the sections supplied by all NLM's, and then read in the + auxiliary headers. Reading the auxiliary headers may create + additional sections described in the cygnus_ext header. + From this point on we assume that we have an NLM, and do not + treat errors as indicating the wrong format. */ + if (!add_bfd_section (abfd, NLM_CODE_NAME, + i_fxdhdrp->codeImageOffset, + i_fxdhdrp->codeImageSize, + (SEC_CODE | SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS + | SEC_RELOC)) + || !add_bfd_section (abfd, NLM_INITIALIZED_DATA_NAME, + i_fxdhdrp->dataImageOffset, + i_fxdhdrp->dataImageSize, + (SEC_DATA | SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS + | SEC_RELOC)) + || !add_bfd_section (abfd, NLM_UNINITIALIZED_DATA_NAME, + (file_ptr) 0, + i_fxdhdrp->uninitializedDataSize, + SEC_ALLOC)) + goto got_no_match; + + if (!nlm_swap_auxiliary_headers_in (abfd)) + goto got_no_match; + + if (nlm_fixed_header (abfd)->numberOfRelocationFixups != 0 + || nlm_fixed_header (abfd)->numberOfExternalReferences != 0) + abfd->flags |= HAS_RELOC; + if (nlm_fixed_header (abfd)->numberOfPublics != 0 + || nlm_fixed_header (abfd)->numberOfDebugRecords != 0 + || nlm_fixed_header (abfd)->numberOfExternalReferences != 0) + abfd->flags |= HAS_SYMS; + + arch = nlm_architecture (abfd); + if (arch != bfd_arch_unknown) + bfd_default_set_arch_mach (abfd, arch, (unsigned long) 0); + + abfd->flags |= EXEC_P; + bfd_get_start_address (abfd) = nlm_fixed_header (abfd)->codeStartOffset; + + return abfd->xvec; + +got_wrong_format_error: + bfd_set_error (bfd_error_wrong_format); +got_no_match: + nlm_tdata (abfd) = preserved_tdata; + if (new_tdata != NULL) + bfd_release (abfd, new_tdata); + if (x_fxdhdr != NULL) + free (x_fxdhdr); + + return NULL; +} + +/* Swap and write out the variable length header. All the fields must + exist in the NLM, and must exist in this order. */ + +static bfd_boolean +nlm_swap_variable_header_out (bfd *abfd) +{ + bfd_byte temp[NLM_TARGET_LONG_SIZE]; + bfd_size_type amt; + + /* Write the description length and text members. */ + amt = sizeof (nlm_variable_header (abfd)->descriptionLength); + if (bfd_bwrite (& nlm_variable_header (abfd)->descriptionLength, amt, + abfd) != amt) + return FALSE; + amt = nlm_variable_header (abfd)->descriptionLength + 1; + if (bfd_bwrite ((void *) nlm_variable_header (abfd)->descriptionText, amt, + abfd) != amt) + return FALSE; + + /* Convert and write the stackSize field. */ + put_word (abfd, (bfd_vma) nlm_variable_header (abfd)->stackSize, temp); + amt = sizeof (temp); + if (bfd_bwrite (temp, amt, abfd) != amt) + return FALSE; + + /* Convert and write the reserved field. */ + put_word (abfd, (bfd_vma) nlm_variable_header (abfd)->reserved, temp); + amt = sizeof (temp); + if (bfd_bwrite (temp, amt, abfd) != amt) + return FALSE; + + /* Write the oldThreadName field. This field is a fixed length string. */ + amt = sizeof (nlm_variable_header (abfd)->oldThreadName); + if (bfd_bwrite (nlm_variable_header (abfd)->oldThreadName, amt, + abfd) != amt) + return FALSE; + + /* Write the screen name length and text members. */ + amt = sizeof (nlm_variable_header (abfd)->screenNameLength); + if (bfd_bwrite (& nlm_variable_header (abfd)->screenNameLength, amt, + abfd) != amt) + return FALSE; + amt = nlm_variable_header (abfd)->screenNameLength + 1; + if (bfd_bwrite (nlm_variable_header (abfd)->screenName, amt, abfd) != amt) + return FALSE; + + /* Write the thread name length and text members. */ + amt = sizeof (nlm_variable_header (abfd)->threadNameLength); + if (bfd_bwrite (& nlm_variable_header (abfd)->threadNameLength, amt, + abfd) != amt) + return FALSE; + amt = nlm_variable_header (abfd)->threadNameLength + 1; + if (bfd_bwrite (nlm_variable_header (abfd)->threadName, amt, abfd) != amt) + return FALSE; + return TRUE; } /* Return whether there is a non-zero byte in a memory block. */ -static boolean -find_nonzero (buf, size) - PTR buf; - size_t size; +static bfd_boolean +find_nonzero (void * buf, size_t size) { char *p = (char *) buf; while (size-- != 0) if (*p++ != 0) - return true; - return false; + return TRUE; + return FALSE; } /* Swap out the contents of the auxiliary headers. We create those auxiliary headers which have been set non-zero. We do not require the caller to set up the stamp fields. */ -static boolean -nlm_swap_auxiliary_headers_out (abfd) - bfd *abfd; +static bfd_boolean +nlm_swap_auxiliary_headers_out (bfd *abfd) { bfd_size_type amt; /* Write out the version header if there is one. */ - if (find_nonzero ((PTR) nlm_version_header (abfd), + if (find_nonzero (nlm_version_header (abfd), sizeof (Nlm_Internal_Version_Header))) { Nlm_External_Version_Header thdr; - memcpy (thdr.stamp, "VeRsIoN#", 8); + LITMEMCPY (thdr.stamp, "VeRsIoN#"); put_word (abfd, (bfd_vma) nlm_version_header (abfd)->majorVersion, (bfd_byte *) thdr.majorVersion); put_word (abfd, (bfd_vma) nlm_version_header (abfd)->minorVersion, @@ -714,18 +658,43 @@ nlm_swap_auxiliary_headers_out (abfd) (bfd_byte *) thdr.month); put_word (abfd, (bfd_vma) nlm_version_header (abfd)->day, (bfd_byte *) thdr.day); - if (bfd_bwrite ((PTR) &thdr, (bfd_size_type) sizeof (thdr), abfd) + if (bfd_bwrite ((void *) &thdr, (bfd_size_type) sizeof (thdr), abfd) != sizeof (thdr)) - return false; + return FALSE; + } + + /* Note - the CoPyRiGhT tag is emitted before the MeSsAgEs + tag in order to make the NW4.x and NW5.x loaders happy. */ + + /* Write out the copyright header if there is one. */ + if (find_nonzero (nlm_copyright_header (abfd), + sizeof (Nlm_Internal_Copyright_Header))) + { + Nlm_External_Copyright_Header thdr; + + LITMEMCPY (thdr.stamp, "CoPyRiGhT="); + amt = sizeof (thdr.stamp); + if (bfd_bwrite ((void *) thdr.stamp, amt, abfd) != amt) + return FALSE; + thdr.copyrightMessageLength[0] = + nlm_copyright_header (abfd)->copyrightMessageLength; + amt = 1; + if (bfd_bwrite ((void *) thdr.copyrightMessageLength, amt, abfd) != amt) + return FALSE; + /* The copyright message is a variable length string. */ + amt = nlm_copyright_header (abfd)->copyrightMessageLength + 1; + if (bfd_bwrite ((void *) nlm_copyright_header (abfd)->copyrightMessage, + amt, abfd) != amt) + return FALSE; } /* Write out the extended header if there is one. */ - if (find_nonzero ((PTR) nlm_extended_header (abfd), + if (find_nonzero (nlm_extended_header (abfd), sizeof (Nlm_Internal_Extended_Header))) { Nlm_External_Extended_Header thdr; - memcpy (thdr.stamp, "MeSsAgEs", 8); + LITMEMCPY (thdr.stamp, "MeSsAgEs"); put_word (abfd, (bfd_vma) nlm_extended_header (abfd)->languageID, (bfd_byte *) thdr.languageID); @@ -813,44 +782,22 @@ nlm_swap_auxiliary_headers_out (abfd) put_word (abfd, (bfd_vma) nlm_extended_header (abfd)->reserved5, (bfd_byte *) thdr.reserved5); - if (bfd_bwrite ((PTR) &thdr, (bfd_size_type) sizeof (thdr), abfd) + if (bfd_bwrite ((void *) &thdr, (bfd_size_type) sizeof (thdr), abfd) != sizeof (thdr)) - return false; - } - - /* Write out the copyright header if there is one. */ - if (find_nonzero ((PTR) nlm_copyright_header (abfd), - sizeof (Nlm_Internal_Copyright_Header))) - { - Nlm_External_Copyright_Header thdr; - - memcpy (thdr.stamp, "CoPyRiGhT=", 10); - amt = sizeof (thdr.stamp); - if (bfd_bwrite ((PTR) thdr.stamp, amt, abfd) != amt) - return false; - thdr.copyrightMessageLength[0] = - nlm_copyright_header (abfd)->copyrightMessageLength; - amt = 1; - if (bfd_bwrite ((PTR) thdr.copyrightMessageLength, amt, abfd) != amt) - return false; - /* The copyright message is a variable length string. */ - amt = nlm_copyright_header (abfd)->copyrightMessageLength + 1; - if (bfd_bwrite ((PTR) nlm_copyright_header (abfd)->copyrightMessage, - amt, abfd) != amt) - return false; + return FALSE; } /* Write out the custom header if there is one. */ - if (find_nonzero ((PTR) nlm_custom_header (abfd), + if (find_nonzero (nlm_custom_header (abfd), sizeof (Nlm_Internal_Custom_Header))) { Nlm_External_Custom_Header thdr; - boolean ds; + bfd_boolean ds; bfd_size_type hdrLength; - ds = find_nonzero ((PTR) nlm_custom_header (abfd)->dataStamp, + ds = find_nonzero (nlm_custom_header (abfd)->dataStamp, sizeof (nlm_custom_header (abfd)->dataStamp)); - memcpy (thdr.stamp, "CuStHeAd", 8); + LITMEMCPY (thdr.stamp, "CuStHeAd"); hdrLength = (2 * NLM_TARGET_LONG_SIZE + (ds ? 8 : 0) + nlm_custom_header (abfd)->hdrLength); put_word (abfd, hdrLength, thdr.length); @@ -862,42 +809,42 @@ nlm_swap_auxiliary_headers_out (abfd) { BFD_ASSERT (nlm_custom_header (abfd)->hdrLength == 0); amt = sizeof (thdr) - sizeof (thdr.dataStamp); - if (bfd_bwrite ((PTR) &thdr, amt, abfd) != amt) - return false; + if (bfd_bwrite ((void *) &thdr, amt, abfd) != amt) + return FALSE; } else { memcpy (thdr.dataStamp, nlm_custom_header (abfd)->dataStamp, sizeof (thdr.dataStamp)); amt = sizeof (thdr); - if (bfd_bwrite ((PTR) &thdr, amt, abfd) != amt) - return false; + if (bfd_bwrite ((void *) &thdr, amt, abfd) != amt) + return FALSE; amt = nlm_custom_header (abfd)->hdrLength; if (bfd_bwrite (nlm_custom_header (abfd)->hdr, amt, abfd) != amt) - return false; + return FALSE; } } /* Write out the Cygnus debugging header if there is one. */ - if (find_nonzero ((PTR) nlm_cygnus_ext_header (abfd), + if (find_nonzero (nlm_cygnus_ext_header (abfd), sizeof (Nlm_Internal_Cygnus_Ext_Header))) { Nlm_External_Custom_Header thdr; - memcpy (thdr.stamp, "CuStHeAd", 8); + LITMEMCPY (thdr.stamp, "CuStHeAd"); put_word (abfd, (bfd_vma) 2 * NLM_TARGET_LONG_SIZE + 8, (bfd_byte *) thdr.length); put_word (abfd, (bfd_vma) nlm_cygnus_ext_header (abfd)->offset, (bfd_byte *) thdr.dataOffset); put_word (abfd, (bfd_vma) nlm_cygnus_ext_header (abfd)->length, (bfd_byte *) thdr.dataLength); - memcpy (thdr.dataStamp, "CyGnUsEx", 8); + LITMEMCPY (thdr.dataStamp, "CyGnUsEx"); amt = sizeof (thdr); - if (bfd_bwrite ((PTR) &thdr, amt, abfd) != amt) - return false; + if (bfd_bwrite ((void *) &thdr, amt, abfd) != amt) + return FALSE; } - return true; + return TRUE; } /* We read the NLM's public symbols and use it to generate a bfd symbol @@ -910,10 +857,9 @@ nlm_swap_auxiliary_headers_out (abfd) on this size. */ long -nlm_get_symtab_upper_bound (abfd) - bfd *abfd; +nlm_get_symtab_upper_bound (bfd *abfd) { - Nlm_Internal_Fixed_Header *i_fxdhdrp; /* Nlm file header, internal form */ + Nlm_Internal_Fixed_Header *i_fxdhdrp; /* Nlm file header, internal form. */ long symcount; long symtab_size = 0; @@ -922,83 +868,7 @@ nlm_get_symtab_upper_bound (abfd) + i_fxdhdrp->numberOfDebugRecords + i_fxdhdrp->numberOfExternalReferences); symtab_size = (symcount + 1) * (sizeof (asymbol)); - return (symtab_size); -} - -/* Note that bfd_get_symcount is guaranteed to be zero if slurping the - symbol table fails. */ - -long -nlm_get_symtab (abfd, alocation) - bfd *abfd; - asymbol **alocation; -{ - nlm_symbol_type *symbase; - bfd_size_type counter = 0; - - if (nlm_slurp_symbol_table (abfd) == false) - return -1; - symbase = nlm_get_symbols (abfd); - while (counter < bfd_get_symcount (abfd)) - { - *alocation++ = &symbase->symbol; - symbase++; - counter++; - } - *alocation = (asymbol *) NULL; - return bfd_get_symcount (abfd); -} - -/* Make an NLM symbol. There is nothing special to do here. */ - -asymbol * -nlm_make_empty_symbol (abfd) - bfd *abfd; -{ - bfd_size_type amt = sizeof (nlm_symbol_type); - nlm_symbol_type *new = (nlm_symbol_type *) bfd_zalloc (abfd, amt); - - if (new) - new->symbol.the_bfd = abfd; - return &new->symbol; -} - -/* Get symbol information. */ - -void -nlm_get_symbol_info (ignore_abfd, symbol, ret) - bfd *ignore_abfd ATTRIBUTE_UNUSED; - asymbol *symbol; - symbol_info *ret; -{ - bfd_symbol_info (symbol, ret); -} - -/* Print symbol information. */ - -void -nlm_print_symbol (abfd, afile, symbol, how) - bfd *abfd; - PTR afile; - asymbol *symbol; - bfd_print_symbol_type how; -{ - FILE *file = (FILE *) afile; - - switch (how) - { - case bfd_print_symbol_name: - case bfd_print_symbol_more: - if (symbol->name) - fprintf (file, "%s", symbol->name); - break; - case bfd_print_symbol_all: - bfd_print_symbol_vandf (abfd, (PTR) file, symbol); - fprintf (file, " %-5s", symbol->section->name); - if (symbol->name) - fprintf (file, " %s", symbol->name); - break; - } + return symtab_size; } /* Slurp in nlm symbol table. @@ -1015,29 +885,27 @@ nlm_print_symbol (abfd, afile, symbol, how) records we also read in the associated reloc information, which is attached to the symbol. - The bfd symbols are copied to SYMPTRS. + The bfd symbols are copied to SYMvoid *S. When we return, the bfd symcount is either zero or contains the correct - number of symbols. -*/ + number of symbols. */ -static boolean -nlm_slurp_symbol_table (abfd) - bfd *abfd; +static bfd_boolean +nlm_slurp_symbol_table (bfd *abfd) { - Nlm_Internal_Fixed_Header *i_fxdhdrp; /* Nlm file header, internal form */ - bfd_size_type totsymcount; /* Number of NLM symbols */ - bfd_size_type symcount; /* Counter of NLM symbols */ - nlm_symbol_type *sym; /* Pointer to current bfd symbol */ - unsigned char symlength; /* Symbol length read into here */ - unsigned char symtype; /* Type of debugging symbol */ - bfd_byte temp[NLM_TARGET_LONG_SIZE]; /* Symbol offsets read into here */ - boolean (*read_import_func) PARAMS ((bfd *, nlm_symbol_type *)); - boolean (*set_public_section_func) PARAMS ((bfd *, nlm_symbol_type *)); + Nlm_Internal_Fixed_Header *i_fxdhdrp; /* Nlm file header, internal form. */ + bfd_size_type totsymcount; /* Number of NLM symbols. */ + bfd_size_type symcount; /* Counter of NLM symbols. */ + nlm_symbol_type *sym; /* Pointer to current bfd symbol. */ + unsigned char symlength; /* Symbol length read into here. */ + unsigned char symtype; /* Type of debugging symbol. */ + bfd_byte temp[NLM_TARGET_LONG_SIZE]; /* Symbol offsets read into here. */ + bfd_boolean (*read_import_func) (bfd *, nlm_symbol_type *); + bfd_boolean (*set_public_section_func) (bfd *, nlm_symbol_type *); bfd_size_type amt; if (nlm_get_symbols (abfd) != NULL) - return true; + return TRUE; /* Read each raw NLM symbol, using the information to create a canonical bfd symbol table entry. @@ -1053,17 +921,15 @@ nlm_slurp_symbol_table (abfd) + i_fxdhdrp->numberOfDebugRecords + i_fxdhdrp->numberOfExternalReferences); if (totsymcount == 0) - { - return true; - } + return TRUE; if (bfd_seek (abfd, i_fxdhdrp->publicsOffset, SEEK_SET) != 0) - return false; + return FALSE; amt = totsymcount * sizeof (nlm_symbol_type); - sym = ((nlm_symbol_type *) bfd_zalloc (abfd, amt)); + sym = bfd_zalloc (abfd, amt); if (!sym) - return false; + return FALSE; nlm_set_symbols (abfd, sym); /* We use the bfd's symcount directly as the control count, so that early @@ -1075,28 +941,28 @@ nlm_slurp_symbol_table (abfd) while (abfd->symcount < symcount) { amt = sizeof (symlength); - if (bfd_bread ((PTR) &symlength, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) &symlength, amt, abfd) != amt) + return FALSE; amt = symlength; sym->symbol.the_bfd = abfd; sym->symbol.name = bfd_alloc (abfd, amt + 1); if (!sym->symbol.name) - return false; - if (bfd_bread ((PTR) sym->symbol.name, amt, abfd) != amt) - return false; + return FALSE; + if (bfd_bread ((void *) sym->symbol.name, amt, abfd) != amt) + return FALSE; /* Cast away const. */ ((char *) (sym->symbol.name))[symlength] = '\0'; amt = sizeof (temp); - if (bfd_bread ((PTR) temp, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) temp, amt, abfd) != amt) + return FALSE; sym->symbol.flags = BSF_GLOBAL | BSF_EXPORT; sym->symbol.value = get_word (abfd, temp); if (set_public_section_func) { /* Most backends can use the code below, but unfortunately some use a different scheme. */ - if ((*set_public_section_func) (abfd, sym) == false) - return false; + if (! (*set_public_section_func) (abfd, sym)) + return FALSE; } else { @@ -1108,10 +974,8 @@ nlm_slurp_symbol_table (abfd) bfd_get_section_by_name (abfd, NLM_CODE_NAME); } else - { - sym->symbol.section = - bfd_get_section_by_name (abfd, NLM_INITIALIZED_DATA_NAME); - } + sym->symbol.section = + bfd_get_section_by_name (abfd, NLM_INITIALIZED_DATA_NAME); } sym->rcnt = 0; abfd->symcount++; @@ -1123,36 +987,35 @@ nlm_slurp_symbol_table (abfd) if (i_fxdhdrp->numberOfDebugRecords > 0) { if (bfd_seek (abfd, i_fxdhdrp->debugInfoOffset, SEEK_SET) != 0) - return false; + return FALSE; symcount += i_fxdhdrp->numberOfDebugRecords; while (abfd->symcount < symcount) { amt = sizeof (symtype); - if (bfd_bread ((PTR) &symtype, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) &symtype, amt, abfd) != amt) + return FALSE; amt = sizeof (temp); - if (bfd_bread ((PTR) temp, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) temp, amt, abfd) != amt) + return FALSE; amt = sizeof (symlength); - if (bfd_bread ((PTR) &symlength, amt, abfd) != amt) - return false; + if (bfd_bread ((void *) &symlength, amt, abfd) != amt) + return FALSE; amt = symlength; sym->symbol.the_bfd = abfd; sym->symbol.name = bfd_alloc (abfd, amt + 1); if (!sym->symbol.name) - return false; - if (bfd_bread ((PTR) sym->symbol.name, amt, abfd) != amt) - return false; + return FALSE; + if (bfd_bread ((void *) sym->symbol.name, amt, abfd) != amt) + return FALSE; /* Cast away const. */ ((char *) (sym->symbol.name))[symlength] = '\0'; sym->symbol.flags = BSF_LOCAL; sym->symbol.value = get_word (abfd, temp); + if (symtype == 0) - { - sym->symbol.section = - bfd_get_section_by_name (abfd, NLM_INITIALIZED_DATA_NAME); - } + sym->symbol.section = + bfd_get_section_by_name (abfd, NLM_INITIALIZED_DATA_NAME); else if (symtype == 1) { sym->symbol.flags |= BSF_FUNCTION; @@ -1160,9 +1023,8 @@ nlm_slurp_symbol_table (abfd) bfd_get_section_by_name (abfd, NLM_CODE_NAME); } else - { - sym->symbol.section = bfd_abs_section_ptr; - } + sym->symbol.section = bfd_abs_section_ptr; + sym->rcnt = 0; abfd->symcount++; sym++; @@ -1171,24 +1033,95 @@ nlm_slurp_symbol_table (abfd) /* Read in the import records. We can only do this if we know how to read relocs for this target. */ - read_import_func = nlm_read_import_func (abfd); if (read_import_func != NULL) { if (bfd_seek (abfd, i_fxdhdrp->externalReferencesOffset, SEEK_SET) != 0) - return false; + return FALSE; symcount += i_fxdhdrp->numberOfExternalReferences; while (abfd->symcount < symcount) { - if ((*read_import_func) (abfd, sym) == false) - return false; + if (! (*read_import_func) (abfd, sym)) + return FALSE; sym++; abfd->symcount++; } } - return true; + return TRUE; +} + +/* Note that bfd_get_symcount is guaranteed to be zero if slurping the + symbol table fails. */ + +long +nlm_canonicalize_symtab (bfd *abfd, asymbol **alocation) +{ + nlm_symbol_type *symbase; + bfd_size_type counter = 0; + + if (! nlm_slurp_symbol_table (abfd)) + return -1; + symbase = nlm_get_symbols (abfd); + while (counter < bfd_get_symcount (abfd)) + { + *alocation++ = &symbase->symbol; + symbase++; + counter++; + } + *alocation = NULL; + return bfd_get_symcount (abfd); +} + +/* Make an NLM symbol. There is nothing special to do here. */ + +asymbol * +nlm_make_empty_symbol (bfd *abfd) +{ + bfd_size_type amt = sizeof (nlm_symbol_type); + nlm_symbol_type *new = bfd_zalloc (abfd, amt); + + if (new == NULL) + return NULL; + new->symbol.the_bfd = abfd; + return & new->symbol; +} + +/* Get symbol information. */ + +void +nlm_get_symbol_info (bfd *ignore_abfd ATTRIBUTE_UNUSED, + asymbol *symbol, + symbol_info *ret) +{ + bfd_symbol_info (symbol, ret); +} + +/* Print symbol information. */ + +void +nlm_print_symbol (bfd *abfd, + void * afile, + asymbol *symbol, + bfd_print_symbol_type how) +{ + FILE *file = (FILE *) afile; + + switch (how) + { + case bfd_print_symbol_name: + case bfd_print_symbol_more: + if (symbol->name) + fprintf (file, "%s", symbol->name); + break; + case bfd_print_symbol_all: + bfd_print_symbol_vandf (abfd, (void *) file, symbol); + fprintf (file, " %-5s", symbol->section->name); + if (symbol->name) + fprintf (file, " %s", symbol->name); + break; + } } /* Get the relocs for an NLM file. There are two types of relocs. @@ -1204,33 +1137,31 @@ nlm_slurp_symbol_table (abfd) section pointers are needed because the relocs are not sorted by section. */ -static boolean -nlm_slurp_reloc_fixups (abfd) - bfd *abfd; +static bfd_boolean +nlm_slurp_reloc_fixups (bfd *abfd) { - boolean (*read_func) PARAMS ((bfd *, nlm_symbol_type *, asection **, - arelent *)); + bfd_boolean (*read_func) (bfd *, nlm_symbol_type *, asection **, arelent *); bfd_size_type count, amt; arelent *rels; asection **secs; if (nlm_relocation_fixups (abfd) != NULL) - return true; + return TRUE; read_func = nlm_read_reloc_func (abfd); if (read_func == NULL) - return true; + return TRUE; if (bfd_seek (abfd, nlm_fixed_header (abfd)->relocationFixupOffset, SEEK_SET) != 0) - return false; + return FALSE; count = nlm_fixed_header (abfd)->numberOfRelocationFixups; amt = count * sizeof (arelent); - rels = (arelent *) bfd_alloc (abfd, amt); + rels = bfd_alloc (abfd, amt); amt = count * sizeof (asection *); - secs = (asection **) bfd_alloc (abfd, amt); + secs = bfd_alloc (abfd, amt); if ((rels == NULL || secs == NULL) && count != 0) - return false; + return FALSE; nlm_relocation_fixups (abfd) = rels; nlm_relocation_fixup_secs (abfd) = secs; @@ -1238,17 +1169,17 @@ nlm_slurp_reloc_fixups (abfd) the machine specific reloc information is. */ while (count-- != 0) { - if ((*read_func) (abfd, (nlm_symbol_type *) NULL, secs, rels) == false) + if (! (*read_func) (abfd, NULL, secs, rels)) { nlm_relocation_fixups (abfd) = NULL; nlm_relocation_fixup_secs (abfd) = NULL; - return false; + return FALSE; } ++secs; ++rels; } - return true; + return TRUE; } /* Get the number of relocs. This really just returns an upper bound, @@ -1256,9 +1187,7 @@ nlm_slurp_reloc_fixups (abfd) That will be handled when they are actually read. */ long -nlm_get_reloc_upper_bound (abfd, sec) - bfd *abfd; - asection *sec; +nlm_get_reloc_upper_bound (bfd *abfd, asection *sec) { nlm_symbol_type *syms; bfd_size_type count; @@ -1274,7 +1203,7 @@ nlm_get_reloc_upper_bound (abfd, sec) syms = nlm_get_symbols (abfd); if (syms == NULL) { - if (nlm_slurp_symbol_table (abfd) == false) + if (! nlm_slurp_symbol_table (abfd)) return -1; syms = nlm_get_symbols (abfd); } @@ -1294,22 +1223,21 @@ nlm_get_reloc_upper_bound (abfd, sec) /* Get the relocs themselves. */ long -nlm_canonicalize_reloc (abfd, sec, relptr, symbols) - bfd *abfd; - asection *sec; - arelent **relptr; - asymbol **symbols; +nlm_canonicalize_reloc (bfd *abfd, + asection *sec, + arelent **relptr, + asymbol **symbols) { arelent *rels; asection **secs; bfd_size_type count, i; - unsigned int ret; + long ret; /* Get the relocation fixups. */ rels = nlm_relocation_fixups (abfd); if (rels == NULL) { - if (nlm_slurp_reloc_fixups (abfd) == false) + if (! nlm_slurp_reloc_fixups (abfd)) return -1; rels = nlm_relocation_fixups (abfd); } @@ -1373,9 +1301,8 @@ nlm_canonicalize_reloc (abfd, sec, relptr, symbols) move the symbols at this point so that mangle_relocs can see the final values. */ -static boolean -nlm_compute_section_file_positions (abfd) - bfd *abfd; +static bfd_boolean +nlm_compute_section_file_positions (bfd *abfd) { file_ptr sofar; asection *sec; @@ -1386,8 +1313,8 @@ nlm_compute_section_file_positions (abfd) asection *bss_sec; asymbol **sym_ptr_ptr; - if (abfd->output_has_begun == true) - return true; + if (abfd->output_has_begun) + return TRUE; /* Make sure we have a section to hold uninitialized data. */ bss_sec = bfd_get_section_by_name (abfd, NLM_UNINITIALIZED_DATA_NAME); @@ -1396,11 +1323,11 @@ nlm_compute_section_file_positions (abfd) if (!add_bfd_section (abfd, NLM_UNINITIALIZED_DATA_NAME, (file_ptr) 0, (bfd_size_type) 0, SEC_ALLOC)) - return false; + return FALSE; bss_sec = bfd_get_section_by_name (abfd, NLM_UNINITIALIZED_DATA_NAME); } - abfd->output_has_begun = true; + abfd->output_has_begun = TRUE; /* The fixed header. */ sofar = nlm_optional_prefix_size (abfd) + nlm_fixed_header_size (abfd); @@ -1417,21 +1344,21 @@ nlm_compute_section_file_positions (abfd) + nlm_variable_header (abfd)->threadNameLength + 1); /* The auxiliary headers. */ - if (find_nonzero ((PTR) nlm_version_header (abfd), + if (find_nonzero (nlm_version_header (abfd), sizeof (Nlm_Internal_Version_Header))) sofar += sizeof (Nlm_External_Version_Header); - if (find_nonzero ((PTR) nlm_extended_header (abfd), + if (find_nonzero (nlm_extended_header (abfd), sizeof (Nlm_Internal_Extended_Header))) sofar += sizeof (Nlm_External_Extended_Header); - if (find_nonzero ((PTR) nlm_copyright_header (abfd), + if (find_nonzero (nlm_copyright_header (abfd), sizeof (Nlm_Internal_Copyright_Header))) sofar += (sizeof (Nlm_External_Copyright_Header) + nlm_copyright_header (abfd)->copyrightMessageLength + 1); - if (find_nonzero ((PTR) nlm_custom_header (abfd), + if (find_nonzero (nlm_custom_header (abfd), sizeof (Nlm_Internal_Custom_Header))) sofar += (sizeof (Nlm_External_Custom_Header) + nlm_custom_header (abfd)->hdrLength); - if (find_nonzero ((PTR) nlm_cygnus_ext_header (abfd), + if (find_nonzero (nlm_cygnus_ext_header (abfd), sizeof (Nlm_Internal_Cygnus_Ext_Header))) sofar += sizeof (Nlm_External_Custom_Header); @@ -1448,16 +1375,16 @@ nlm_compute_section_file_positions (abfd) data_align = 0; bss = 0; other_align = 0; - for (sec = abfd->sections; sec != (asection *) NULL; sec = sec->next) + for (sec = abfd->sections; sec != NULL; sec = sec->next) { flagword f; - sec->_raw_size = BFD_ALIGN (sec->_raw_size, 1 << sec->alignment_power); + sec->size = BFD_ALIGN (sec->size, 1 << sec->alignment_power); f = bfd_get_section_flags (abfd, sec); if (f & SEC_CODE) { - text += sec->_raw_size; + text += sec->size; if (bfd_get_section_vma (abfd, sec) < text_low) text_low = bfd_get_section_vma (abfd, sec); if (sec->alignment_power > text_align) @@ -1465,7 +1392,7 @@ nlm_compute_section_file_positions (abfd) } else if (f & SEC_DATA) { - data += sec->_raw_size; + data += sec->size; if (bfd_get_section_vma (abfd, sec) < data_low) data_low = bfd_get_section_vma (abfd, sec); if (sec->alignment_power > data_align) @@ -1477,7 +1404,7 @@ nlm_compute_section_file_positions (abfd) other_align = sec->alignment_power; } else if (f & SEC_ALLOC) - bss += sec->_raw_size; + bss += sec->size; } nlm_set_text_low (abfd, text_low); @@ -1504,7 +1431,7 @@ nlm_compute_section_file_positions (abfd) nlm_fixed_header (abfd)->dataImageSize = data; nlm_fixed_header (abfd)->uninitializedDataSize = bss; - for (sec = abfd->sections; sec != (asection *) NULL; sec = sec->next) + for (sec = abfd->sections; sec != NULL; sec = sec->next) { flagword f; @@ -1513,17 +1440,17 @@ nlm_compute_section_file_positions (abfd) if (f & SEC_CODE) { sec->filepos = text_ptr; - text_ptr += sec->_raw_size; + text_ptr += sec->size; } else if (f & SEC_DATA) { sec->filepos = data_ptr; - data_ptr += sec->_raw_size; + data_ptr += sec->size; } else if (f & SEC_HAS_CONTENTS) { sec->filepos = other_ptr; - other_ptr += sec->_raw_size; + other_ptr += sec->size; } } @@ -1554,7 +1481,7 @@ nlm_compute_section_file_positions (abfd) symbol (which is the old value of the symbol). */ sym->section = bss_sec; size = sym->value; - sym->value = bss_sec->_raw_size + add; + sym->value = bss_sec->size + add; add += size; add = BFD_ALIGN (add, 1 << bss_sec->alignment_power); } @@ -1567,11 +1494,11 @@ nlm_compute_section_file_positions (abfd) abort (); } nlm_fixed_header (abfd)->uninitializedDataSize += add; - bss_sec->_raw_size += add; + bss_sec->size += add; } } - return true; + return TRUE; } /* Set the contents of a section. To do this we need to know where @@ -1579,20 +1506,19 @@ nlm_compute_section_file_positions (abfd) that the sizes of all the sections must be set, and all the variable size header information must be known. */ -boolean -nlm_set_section_contents (abfd, section, location, offset, count) - bfd *abfd; - asection *section; - PTR location; - file_ptr offset; - bfd_size_type count; +bfd_boolean +nlm_set_section_contents (bfd *abfd, + asection *section, + const void * location, + file_ptr offset, + bfd_size_type count) { - if (abfd->output_has_begun == false - && nlm_compute_section_file_positions (abfd) == false) - return false; + if (! abfd->output_has_begun + && ! nlm_compute_section_file_positions (abfd)) + return FALSE; if (count == 0) - return true; + return TRUE; /* i386 NetWare has a very restricted set of relocs. In order for objcopy to work, the NLM i386 backend needs a chance to rework @@ -1600,32 +1526,30 @@ nlm_set_section_contents (abfd, section, location, offset, count) the relocs are already acceptable, this will not do anything. */ if (section->reloc_count != 0) { - boolean (*mangle_relocs_func) PARAMS ((bfd *, asection *, PTR, - bfd_vma, bfd_size_type)); + bfd_boolean (*mangle_relocs_func) + (bfd *, asection *, const void *, bfd_vma, bfd_size_type); mangle_relocs_func = nlm_mangle_relocs_func (abfd); if (mangle_relocs_func != NULL) { if (!(*mangle_relocs_func) (abfd, section, location, (bfd_vma) offset, count)) - return false; + return FALSE; } } if (bfd_seek (abfd, section->filepos + offset, SEEK_SET) != 0 || bfd_bwrite (location, count, abfd) != count) - return false; + return FALSE; - return true; + return TRUE; } /* We need to sort a list of relocs associated with sections when we write out the external relocs. */ static int -nlm_external_reloc_compare (p1, p2) - const void *p1; - const void *p2; +nlm_external_reloc_compare (const void *p1, const void *p2) { const struct reloc_and_sec *r1 = (const struct reloc_and_sec *) p1; const struct reloc_and_sec *r2 = (const struct reloc_and_sec *) p2; @@ -1670,36 +1594,34 @@ nlm_external_reloc_compare (p1, p2) section. The exports and debugging records are obtained from the list of outsymbols. */ -boolean -nlm_write_object_contents (abfd) - bfd *abfd; +bfd_boolean +nlm_write_object_contents (bfd *abfd) { asection *sec; - boolean (*write_import_func) PARAMS ((bfd *, asection *, arelent *)); + bfd_boolean (*write_import_func) (bfd *, asection *, arelent *); bfd_size_type external_reloc_count, internal_reloc_count, i, c; struct reloc_and_sec *external_relocs; asymbol **sym_ptr_ptr; file_ptr last; - boolean (*write_prefix_func) PARAMS ((bfd *)); + bfd_boolean (*write_prefix_func) (bfd *); unsigned char *fixed_header = NULL; file_ptr pos; bfd_size_type amt; - fixed_header = ((unsigned char *) - bfd_malloc (nlm_fixed_header_size (abfd))); + fixed_header = bfd_malloc (nlm_fixed_header_size (abfd)); if (fixed_header == NULL) goto error_return; - if (abfd->output_has_begun == false - && nlm_compute_section_file_positions (abfd) == false) + if (! abfd->output_has_begun + && ! nlm_compute_section_file_positions (abfd)) goto error_return; /* Write out the variable length headers. */ pos = nlm_optional_prefix_size (abfd) + nlm_fixed_header_size (abfd); if (bfd_seek (abfd, pos, SEEK_SET) != 0) goto error_return; - if (nlm_swap_variable_header_out (abfd) == false - || nlm_swap_auxiliary_headers_out (abfd) == false) + if (! nlm_swap_variable_header_out (abfd) + || ! nlm_swap_auxiliary_headers_out (abfd)) { bfd_set_error (bfd_error_system_call); goto error_return; @@ -1707,7 +1629,7 @@ nlm_write_object_contents (abfd) /* A weak check on whether the section file positions were reasonable. */ - if (bfd_tell (abfd) > (ufile_ptr) nlm_fixed_header (abfd)->codeImageOffset) + if (bfd_tell (abfd) > nlm_fixed_header (abfd)->codeImageOffset) { bfd_set_error (bfd_error_invalid_operation); goto error_return; @@ -1728,7 +1650,7 @@ nlm_write_object_contents (abfd) needed when they are written out below. */ internal_reloc_count = 0; external_reloc_count = 0; - for (sec = abfd->sections; sec != (asection *) NULL; sec = sec->next) + for (sec = abfd->sections; sec != NULL; sec = sec->next) { arelent **rel_ptr_ptr, **rel_end; @@ -1760,7 +1682,7 @@ nlm_write_object_contents (abfd) if (! bfd_is_und_section (bfd_get_section (sym))) { ++internal_reloc_count; - if ((*write_import_func) (abfd, sec, rel) == false) + if (! (*write_import_func) (abfd, sec, rel)) goto error_return; } else @@ -1774,11 +1696,11 @@ nlm_write_object_contents (abfd) symbol, so we must first gather together all the relocs against external symbols and sort them. */ amt = external_reloc_count * sizeof (struct reloc_and_sec); - external_relocs = (struct reloc_and_sec *) bfd_alloc (abfd, amt); - if (external_relocs == (struct reloc_and_sec *) NULL) + external_relocs = bfd_alloc (abfd, amt); + if (external_relocs == NULL) goto error_return; i = 0; - for (sec = abfd->sections; sec != (asection *) NULL; sec = sec->next) + for (sec = abfd->sections; sec != NULL; sec = sec->next) { arelent **rel_ptr_ptr, **rel_end; @@ -1807,7 +1729,7 @@ nlm_write_object_contents (abfd) BFD_ASSERT (i == external_reloc_count); /* Sort the external relocs by name. */ - qsort ((PTR) external_relocs, (size_t) external_reloc_count, + qsort (external_relocs, (size_t) external_reloc_count, sizeof (struct reloc_and_sec), nlm_external_reloc_compare); /* Write out the external relocs. */ @@ -1832,9 +1754,8 @@ nlm_write_object_contents (abfd) j++) ++cnt; - if ((*nlm_write_external_func (abfd)) (abfd, cnt, sym, - &external_relocs[i]) - == false) + if (! (*nlm_write_external_func (abfd)) (abfd, cnt, sym, + &external_relocs[i])) goto error_return; i += cnt; @@ -1844,10 +1765,10 @@ nlm_write_object_contents (abfd) /* Write out the public symbols (exports). */ sym_ptr_ptr = bfd_get_outsymbols (abfd); - if (sym_ptr_ptr != (asymbol **) NULL) + if (sym_ptr_ptr != NULL) { - bfd_vma (*get_public_offset_func) PARAMS ((bfd *, asymbol *)); - boolean (*write_export_func) PARAMS ((bfd *, asymbol *, bfd_vma)); + bfd_vma (*get_public_offset_func) (bfd *, asymbol *); + bfd_boolean (*write_export_func) (bfd *, asymbol *, bfd_vma); asymbol **sym_end; @@ -1902,7 +1823,7 @@ nlm_write_object_contents (abfd) if (write_export_func) { - if ((*write_export_func) (abfd, sym, offset) == false) + if (! (*write_export_func) (abfd, sym, offset)) goto error_return; } else @@ -2036,7 +1957,7 @@ nlm_write_object_contents (abfd) write_prefix_func = nlm_write_prefix_func (abfd); if (write_prefix_func) { - if ((*write_prefix_func) (abfd) == false) + if (! (*write_prefix_func) (abfd)) goto error_return; } @@ -2050,10 +1971,10 @@ nlm_write_object_contents (abfd) if (fixed_header != NULL) free (fixed_header); - return true; + return TRUE; error_return: if (fixed_header != NULL) free (fixed_header); - return false; + return FALSE; }