bfd
[deliverable/binutils-gdb.git] / bfd / ieee.c
index 70f0d130d446924e7d6c08e83891929abccad700..08119528c4e89e0de8cc0be532e2a61e739c431b 100644 (file)
@@ -1,24 +1,25 @@
 /* BFD back-end for ieee-695 objects.
-   Copyright (C) 1990, 91, 92, 93, 94, 95, 96, 97, 98, 1999
+   Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
+   2000, 2001, 2002, 2003
    Free Software Foundation, Inc.
 
    Written by Steve Chamberlain of Cygnus Support.
 
-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 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.
+   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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 
 #define KEEPMINUSPCININST 0
 
@@ -31,34 +32,159 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 #include "libbfd.h"
 #include "ieee.h"
 #include "libieee.h"
+#include "safe-ctype.h"
 
-#include <ctype.h>
-
-static boolean ieee_write_byte PARAMS ((bfd *, int));
-static boolean ieee_write_2bytes PARAMS ((bfd *, int));
-static boolean ieee_write_int PARAMS ((bfd *, bfd_vma));
-static boolean ieee_write_id PARAMS ((bfd *, const char *));
-static boolean ieee_write_expression
-  PARAMS ((bfd *, bfd_vma, asymbol *, boolean, unsigned int));
-static void ieee_write_int5 PARAMS ((bfd_byte *, bfd_vma));
-static boolean ieee_write_int5_out PARAMS ((bfd *, bfd_vma));
-static boolean ieee_write_section_part PARAMS ((bfd *));
-static boolean do_with_relocs PARAMS ((bfd *, asection *));
-static boolean do_as_repeat PARAMS ((bfd *, asection *));
-static boolean do_without_relocs PARAMS ((bfd *, asection *));
-static boolean ieee_write_external_part PARAMS ((bfd *));
-static boolean ieee_write_data_part PARAMS ((bfd *));
-static boolean ieee_write_debug_part PARAMS ((bfd *));
-static boolean ieee_write_me_part PARAMS ((bfd *));
-static boolean ieee_write_processor PARAMS ((bfd *));
-
-static boolean ieee_slurp_debug PARAMS ((bfd *));
-static boolean ieee_slurp_section_data PARAMS ((bfd *));
+struct output_buffer_struct
+{
+  unsigned char *ptrp;
+  int buffer;
+};
+
+static bfd_boolean ieee_write_byte
+  PARAMS ((bfd *, int));
+static bfd_boolean ieee_write_2bytes
+  PARAMS ((bfd *, int));
+static bfd_boolean ieee_write_int
+  PARAMS ((bfd *, bfd_vma));
+static bfd_boolean ieee_write_id
+  PARAMS ((bfd *, const char *));
+static unsigned short read_2bytes
+  PARAMS ((common_header_type *));
+static void bfd_get_string
+  PARAMS ((common_header_type *, char *, size_t));
+static char *read_id
+  PARAMS ((common_header_type *));
+static bfd_boolean ieee_write_expression
+  PARAMS ((bfd *, bfd_vma, asymbol *, bfd_boolean, unsigned int));
+static void ieee_write_int5
+  PARAMS ((bfd_byte *, bfd_vma));
+static bfd_boolean ieee_write_int5_out
+  PARAMS ((bfd *, bfd_vma));
+static bfd_boolean parse_int
+  PARAMS ((common_header_type *, bfd_vma *));
+static int parse_i
+  PARAMS ((common_header_type *, bfd_boolean *));
+static bfd_vma must_parse_int
+  PARAMS ((common_header_type *));
+static void parse_expression
+  PARAMS ((ieee_data_type *, bfd_vma *, ieee_symbol_index_type *,
+          bfd_boolean *, unsigned int *, asection **));
+static file_ptr ieee_part_after
+  PARAMS ((ieee_data_type *, file_ptr));
+static ieee_symbol_type *get_symbol
+  PARAMS ((bfd *, ieee_data_type *, ieee_symbol_type *, unsigned int *,
+          ieee_symbol_type ***, unsigned int *, int));
+static bfd_boolean ieee_slurp_external_symbols
+  PARAMS ((bfd *));
+static bfd_boolean ieee_slurp_symbol_table
+  PARAMS ((bfd *));
+static long ieee_get_symtab_upper_bound
+  PARAMS ((bfd *));
+static long ieee_get_symtab
+  PARAMS ((bfd *, asymbol **));
+static asection *get_section_entry
+  PARAMS ((bfd *, ieee_data_type *i, unsigned int));
+static void ieee_slurp_sections
+  PARAMS ((bfd *));
+static bfd_boolean ieee_slurp_debug
+  PARAMS ((bfd *));
+const bfd_target *ieee_archive_p
+  PARAMS ((bfd *));
+const bfd_target *ieee_object_p
+  PARAMS ((bfd *));
+static void ieee_get_symbol_info
+  PARAMS ((bfd *, asymbol *, symbol_info *));
+static void ieee_print_symbol
+  PARAMS ((bfd *, PTR, asymbol *, bfd_print_symbol_type));
+static bfd_boolean do_one
+  PARAMS ((ieee_data_type *, ieee_per_section_type *, unsigned char *,
+          asection *, int));
+static bfd_boolean ieee_slurp_section_data
+  PARAMS ((bfd *));
+static bfd_boolean ieee_new_section_hook
+  PARAMS ((bfd *, asection *));
+static long ieee_get_reloc_upper_bound
+  PARAMS ((bfd *, sec_ptr));
+static bfd_boolean ieee_get_section_contents
+  PARAMS ((bfd *, sec_ptr, PTR, file_ptr, bfd_size_type));
+static long ieee_canonicalize_reloc
+  PARAMS ((bfd *, sec_ptr, arelent **, asymbol **));
+static int comp
+  PARAMS ((const PTR, const PTR));
+static bfd_boolean ieee_write_section_part
+  PARAMS ((bfd *));
+static bfd_boolean do_with_relocs
+  PARAMS ((bfd *, asection *));
+static bfd_boolean do_as_repeat
+  PARAMS ((bfd *, asection *));
+static bfd_boolean do_without_relocs
+  PARAMS ((bfd *, asection *));
+static bfd_boolean ieee_mkobject
+  PARAMS ((bfd *));
+static void fill
+  PARAMS ((void));
+static void flush
+  PARAMS ((void));
+static void write_int
+  PARAMS ((int));
+static void copy_id
+  PARAMS ((void));
+static void copy_expression
+  PARAMS ((void));
+static void fill_int
+  PARAMS ((struct output_buffer_struct *));
+static void drop_int
+  PARAMS ((struct output_buffer_struct *));
+static void copy_int
+  PARAMS ((void));
+static void f1_record
+  PARAMS ((void));
+static void f0_record
+  PARAMS ((void));
+static void copy_till_end
+  PARAMS ((void));
+static void f2_record
+  PARAMS ((void));
+static void f8_record
+  PARAMS ((void));
+static void e2_record
+  PARAMS ((void));
+static void block
+  PARAMS ((void));
+static void relocate_debug
+  PARAMS ((bfd *, bfd *));
+static bfd_boolean ieee_write_debug_part
+  PARAMS ((bfd *));
+static bfd_boolean ieee_write_data_part
+  PARAMS ((bfd *));
+static bfd_boolean init_for_output
+  PARAMS ((bfd *));
+static bfd_boolean ieee_set_section_contents
+  PARAMS ((bfd *, sec_ptr, PTR, file_ptr, bfd_size_type));
+static bfd_boolean ieee_write_external_part
+  PARAMS ((bfd *));
+static bfd_boolean ieee_write_me_part
+  PARAMS ((bfd *));
+static bfd_boolean ieee_write_processor
+  PARAMS ((bfd *));
+static bfd_boolean ieee_write_object_contents
+  PARAMS ((bfd *));
+static asymbol *ieee_make_empty_symbol
+  PARAMS ((bfd *));
+static bfd *ieee_openr_next_archived_file
+  PARAMS ((bfd *, bfd *));
+static bfd_boolean ieee_find_nearest_line
+  PARAMS ((bfd *, asection *, asymbol **, bfd_vma, const char **,
+          const char **, unsigned int *));
+static int ieee_generic_stat_arch_elt
+  PARAMS ((bfd *, struct stat *));
+static int ieee_sizeof_headers
+  PARAMS ((bfd *, bfd_boolean));
 
 /* Functions for writing to ieee files in the strange way that the
    standard requires. */
 
-static boolean
+static bfd_boolean
 ieee_write_byte (abfd, barg)
      bfd *abfd;
      int barg;
@@ -66,12 +192,12 @@ ieee_write_byte (abfd, barg)
   bfd_byte byte;
 
   byte = barg;
-  if (bfd_write ((PTR) &byte, 1, 1, abfd) != 1)
-    return false;
-  return true;
+  if (bfd_bwrite ((PTR) &byte, (bfd_size_type) 1, abfd) != 1)
+    return FALSE;
+  return TRUE;
 }
 
-static boolean
+static bfd_boolean
 ieee_write_2bytes (abfd, bytes)
      bfd *abfd;
      int bytes;
@@ -80,12 +206,12 @@ ieee_write_2bytes (abfd, bytes)
 
   buffer[0] = bytes >> 8;
   buffer[1] = bytes & 0xff;
-  if (bfd_write ((PTR) buffer, 1, 2, abfd) != 2)
-    return false;
-  return true;
+  if (bfd_bwrite ((PTR) buffer, (bfd_size_type) 2, abfd) != 2)
+    return FALSE;
+  return TRUE;
 }
 
-static boolean
+static bfd_boolean
 ieee_write_int (abfd, value)
      bfd *abfd;
      bfd_vma value;
@@ -93,7 +219,7 @@ ieee_write_int (abfd, value)
   if (value <= 127)
     {
       if (! ieee_write_byte (abfd, (bfd_byte) value))
-       return false;
+       return FALSE;
     }
   else
     {
@@ -113,31 +239,31 @@ ieee_write_int (abfd, value)
       if (! ieee_write_byte (abfd,
                             (bfd_byte) ((int) ieee_number_repeat_start_enum
                                         + length)))
-       return false;
+       return FALSE;
       switch (length)
        {
        case 4:
          if (! ieee_write_byte (abfd, (bfd_byte) (value >> 24)))
-           return false;
+           return FALSE;
          /* Fall through.  */
        case 3:
          if (! ieee_write_byte (abfd, (bfd_byte) (value >> 16)))
-           return false;
+           return FALSE;
          /* Fall through.  */
        case 2:
          if (! ieee_write_byte (abfd, (bfd_byte) (value >> 8)))
-           return false;
+           return FALSE;
          /* Fall through.  */
        case 1:
          if (! ieee_write_byte (abfd, (bfd_byte) (value)))
-           return false;
+           return FALSE;
        }
     }
 
-  return true;
+  return TRUE;
 }
 
-static boolean
+static bfd_boolean
 ieee_write_id (abfd, id)
      bfd *abfd;
      const char *id;
@@ -147,19 +273,19 @@ ieee_write_id (abfd, id)
   if (length <= 127)
     {
       if (! ieee_write_byte (abfd, (bfd_byte) length))
-       return false;
+       return FALSE;
     }
   else if (length < 255)
     {
       if (! ieee_write_byte (abfd, ieee_extension_length_1_enum)
          || ! ieee_write_byte (abfd, (bfd_byte) length))
-       return false;
+       return FALSE;
     }
   else if (length < 65535)
     {
       if (! ieee_write_byte (abfd, ieee_extension_length_2_enum)
          || ! ieee_write_2bytes (abfd, (int) length))
-       return false;
+       return FALSE;
     }
   else
     {
@@ -167,12 +293,12 @@ ieee_write_id (abfd, id)
        (_("%s: string too long (%d chars, max 65535)"),
         bfd_get_filename (abfd), length);
       bfd_set_error (bfd_error_invalid_operation);
-      return false;
+      return FALSE;
     }
 
-  if (bfd_write ((PTR) id, 1, length, abfd) != length)
-    return false;
-  return true;
+  if (bfd_bwrite ((PTR) id, (bfd_size_type) length, abfd) != length)
+    return FALSE;
+  return TRUE;
 }
 \f
 /***************************************************************************
@@ -229,7 +355,7 @@ read_id (ieee)
       length = (length * 256) + this_byte_and_next (ieee);
     }
   /* Buy memory and read string */
-  string = bfd_alloc (ieee->abfd, length + 1);
+  string = bfd_alloc (ieee->abfd, (bfd_size_type) length + 1);
   if (!string)
     return NULL;
   bfd_get_string (ieee, string, length);
@@ -237,12 +363,12 @@ read_id (ieee)
   return string;
 }
 
-static boolean
+static bfd_boolean
 ieee_write_expression (abfd, value, symbol, pcrel, index)
      bfd *abfd;
      bfd_vma value;
      asymbol *symbol;
-     boolean pcrel;
+     bfd_boolean pcrel;
      unsigned int index;
 {
   unsigned int term_count = 0;
@@ -250,7 +376,7 @@ ieee_write_expression (abfd, value, symbol, pcrel, index)
   if (value != 0)
     {
       if (! ieee_write_int (abfd, value))
-       return false;
+       return FALSE;
       term_count++;
     }
 
@@ -260,7 +386,7 @@ ieee_write_expression (abfd, value, symbol, pcrel, index)
       /* Def of a common symbol */
       if (! ieee_write_byte (abfd, ieee_variable_X_enum)
          || ! ieee_write_int (abfd, symbol->value))
-       return false;
+       return FALSE;
       term_count++;
     }
   else if (! bfd_is_abs_section (symbol->section))
@@ -271,7 +397,7 @@ ieee_write_expression (abfd, value, symbol, pcrel, index)
        {
          if (! ieee_write_byte (abfd, ieee_variable_I_enum)
              || ! ieee_write_int (abfd, symbol->value))
-           return false;
+           return FALSE;
          term_count++;
        }
       else if (symbol->flags & (BSF_LOCAL | BSF_SECTION_SYM))
@@ -282,12 +408,12 @@ ieee_write_expression (abfd, value, symbol, pcrel, index)
              || ! ieee_write_byte (abfd,
                                    (bfd_byte) (symbol->section->index
                                                + IEEE_SECTION_NUMBER_BASE)))
-           return false;
+           return FALSE;
          term_count++;
          if (symbol->value != 0)
            {
              if (! ieee_write_int (abfd, symbol->value))
-               return false;
+               return FALSE;
              term_count++;
            }
        }
@@ -298,7 +424,7 @@ ieee_write_expression (abfd, value, symbol, pcrel, index)
             bfd_get_filename (abfd), bfd_asymbol_name (symbol),
             symbol->flags);
          bfd_set_error (bfd_error_invalid_operation);
-         return false;
+         return FALSE;
        }
     }
 
@@ -309,24 +435,24 @@ ieee_write_expression (abfd, value, symbol, pcrel, index)
          || ! ieee_write_byte (abfd,
                                (bfd_byte) (index + IEEE_SECTION_NUMBER_BASE))
          || ! ieee_write_byte (abfd, ieee_function_minus_enum))
-       return false;
+       return FALSE;
     }
 
   /* Handle the degenerate case of a 0 address.  */
   if (term_count == 0)
     {
-      if (! ieee_write_int (abfd, 0))
-       return false;
+      if (! ieee_write_int (abfd, (bfd_vma) 0))
+       return FALSE;
     }
 
   while (term_count > 1)
     {
       if (! ieee_write_byte (abfd, ieee_function_plus_enum))
-       return false;
+       return FALSE;
       term_count--;
     }
 
-  return true;
+  return TRUE;
 }
 \f
 /*****************************************************************************/
@@ -346,7 +472,7 @@ ieee_write_int5 (buffer, value)
   buffer[4] = (value >> 0) & 0xff;
 }
 
-static boolean
+static bfd_boolean
 ieee_write_int5_out (abfd, value)
      bfd *abfd;
      bfd_vma value;
@@ -354,12 +480,12 @@ ieee_write_int5_out (abfd, value)
   bfd_byte b[5];
 
   ieee_write_int5 (b, value);
-  if (bfd_write ((PTR) b, 1, 5, abfd) != 5)
-    return false;
-  return true;
+  if (bfd_bwrite ((PTR) b, (bfd_size_type) 5, abfd) != 5)
+    return FALSE;
+  return TRUE;
 }
 
-static boolean
+static bfd_boolean
 parse_int (ieee, value_ptr)
      common_header_type *ieee;
      bfd_vma *value_ptr;
@@ -370,7 +496,7 @@ parse_int (ieee, value_ptr)
     {
       *value_ptr = value;
       next_byte (ieee);
-      return true;
+      return TRUE;
     }
   else if (value >= 0x80 && value <= 0x88)
     {
@@ -383,15 +509,15 @@ parse_int (ieee, value_ptr)
          count--;
        }
       *value_ptr = result;
-      return true;
+      return TRUE;
     }
-  return false;
+  return FALSE;
 }
 
 static int
 parse_i (ieee, ok)
      common_header_type *ieee;
-     boolean *ok;
+     bfd_boolean *ok;
 {
   bfd_vma x;
   *ok = parse_int (ieee, &x);
@@ -403,7 +529,7 @@ must_parse_int (ieee)
      common_header_type *ieee;
 {
   bfd_vma result;
-  BFD_ASSERT (parse_int (ieee, &result) == true);
+  BFD_ASSERT (parse_int (ieee, &result));
   return result;
 }
 
@@ -418,12 +544,12 @@ typedef struct
 #if KEEPMINUSPCININST
 
 #define SRC_MASK(arg) arg
-#define PCREL_OFFSET false
+#define PCREL_OFFSET FALSE
 
 #else
 
 #define SRC_MASK(arg) 0
-#define PCREL_OFFSET true
+#define PCREL_OFFSET TRUE
 
 #endif
 
@@ -432,57 +558,57 @@ static reloc_howto_type abs32_howto =
         0,
         2,
         32,
-        false,
+        FALSE,
         0,
         complain_overflow_bitfield,
         0,
         "abs32",
-        true,
+        TRUE,
         0xffffffff,
         0xffffffff,
-        false);
+        FALSE);
 
 static reloc_howto_type abs16_howto =
   HOWTO (1,
         0,
         1,
         16,
-        false,
+        FALSE,
         0,
         complain_overflow_bitfield,
         0,
         "abs16",
-        true,
+        TRUE,
         0x0000ffff,
         0x0000ffff,
-        false);
+        FALSE);
 
 static reloc_howto_type abs8_howto =
   HOWTO (1,
         0,
         0,
         8,
-        false,
+        FALSE,
         0,
         complain_overflow_bitfield,
         0,
         "abs8",
-        true,
+        TRUE,
         0x000000ff,
         0x000000ff,
-        false);
+        FALSE);
 
 static reloc_howto_type rel32_howto =
   HOWTO (1,
         0,
         2,
         32,
-        true,
+        TRUE,
         0,
         complain_overflow_signed,
         0,
         "rel32",
-        true,
+        TRUE,
         SRC_MASK (0xffffffff),
         0xffffffff,
         PCREL_OFFSET);
@@ -492,12 +618,12 @@ static reloc_howto_type rel16_howto =
         0,
         1,
         16,
-        true,
+        TRUE,
         0,
         complain_overflow_signed,
         0,
         "rel16",
-        true,
+        TRUE,
         SRC_MASK (0x0000ffff),
         0x0000ffff,
         PCREL_OFFSET);
@@ -507,12 +633,12 @@ static reloc_howto_type rel8_howto =
         0,
         0,
         8,
-        true,
+        TRUE,
         0,
         complain_overflow_signed,
         0,
         "rel8",
-        true,
+        TRUE,
         SRC_MASK (0x000000ff),
         0x000000ff,
         PCREL_OFFSET);
@@ -524,7 +650,7 @@ parse_expression (ieee, value, symbol, pcrel, extra, section)
      ieee_data_type *ieee;
      bfd_vma *value;
      ieee_symbol_index_type *symbol;
-     boolean *pcrel;
+     bfd_boolean *pcrel;
      unsigned int *extra;
      asection **section;
 
@@ -535,15 +661,16 @@ parse_expression (ieee, value, symbol, pcrel, extra, section)
 #define INC sp++;
 #define DEC sp--;
 
-  boolean loop = true;
+  bfd_boolean loop = TRUE;
   ieee_value_type stack[10];
 
   /* The stack pointer always points to the next unused location */
 #define PUSH(x,y,z) TOS.symbol=x;TOS.section=y;TOS.value=z;INC;
 #define POP(x,y,z) DEC;x=TOS.symbol;y=TOS.section;z=TOS.value;
   ieee_value_type *sp = stack;
+  asection *dummy;
 
-  while (loop)
+  while (loop && ieee->h.input_p < ieee->h.last_byte)
     {
       switch (this_byte (&(ieee->h)))
        {
@@ -552,7 +679,7 @@ parse_expression (ieee, value, symbol, pcrel, extra, section)
          {
            int section_n;
            next_byte (&(ieee->h));
-           *pcrel = true;
+           *pcrel = TRUE;
            section_n = must_parse_int (&(ieee->h));
            PUSH (NOSYMBOL, bfd_abs_section_ptr, 0);
            break;
@@ -636,70 +763,85 @@ parse_expression (ieee, value, symbol, pcrel, extra, section)
              }
            else
              {
-               /*
-                 Thats all that we can understand. As far as I can see
-                 there is a bug in the Microtec IEEE output which I'm
-                 using to scan, whereby the comma operator is omitted
-                 sometimes in an expression, giving expressions with too
-                 many terms. We can tell if that's the case by ensuring
-                 that sp == stack here. If not, then we've pushed
-                 something too far, so we keep adding.  */
-
-               while (sp != stack + 1)
-                 {
-                   asection *section1;
-                   ieee_symbol_index_type sy1;
-                   POP (sy1, section1, *extra);
-                 }
-               {
-                 asection *dummy;
-
-                 POP (*symbol, dummy, *value);
-                 if (section)
-                   *section = dummy;
-               }
-
-               loop = false;
+               /* Thats all that we can understand.  */
+               loop = FALSE;
              }
          }
        }
     }
+
+  /* As far as I can see there is a bug in the Microtec IEEE output
+     which I'm using to scan, whereby the comma operator is omitted
+     sometimes in an expression, giving expressions with too many
+     terms.  We can tell if that's the case by ensuring that
+     sp == stack here.  If not, then we've pushed something too far,
+     so we keep adding.  */
+
+  while (sp != stack + 1)
+    {
+      asection *section1;
+      ieee_symbol_index_type sy1;
+      POP (sy1, section1, *extra);
+    }
+
+  POP (*symbol, dummy, *value);
+  if (section)
+    *section = dummy;
 }
 
 
-#define ieee_seek(abfd, offset) \
-  IEEE_DATA(abfd)->h.input_p = IEEE_DATA(abfd)->h.first_byte + offset
+#define ieee_seek(ieee, offset) \
+  do                                                           \
+    {                                                          \
+      ieee->h.input_p = ieee->h.first_byte + offset;           \
+      ieee->h.last_byte = (ieee->h.first_byte                  \
+                          + ieee_part_after (ieee, offset));   \
+    }                                                          \
+  while (0)
+
+#define ieee_pos(ieee) \
+  (ieee->h.input_p - ieee->h.first_byte)
+
+/* Find the first part of the ieee file after HERE.  */
+
+static file_ptr
+ieee_part_after (ieee, here)
+     ieee_data_type *ieee;
+     file_ptr here;
+{
+  int part;
+  file_ptr after = ieee->w.r.me_record;
+
+  /* File parts can come in any order, except that module end is
+     guaranteed to be last (and the header first).  */
+  for (part = 0; part < N_W_VARIABLES; part++)
+    if (ieee->w.offset[part] > here && after > ieee->w.offset[part])
+      after = ieee->w.offset[part];
 
-#define ieee_pos(abfd) \
-  (IEEE_DATA(abfd)->h.input_p - IEEE_DATA(abfd)->h.first_byte)
+  return after;
+}
 
 static unsigned int last_index;
 static char last_type;         /* is the index for an X or a D */
 
 static ieee_symbol_type *
-get_symbol (abfd,
-           ieee,
-           last_symbol,
-           symbol_count,
-           pptr,
-           max_index,
-           this_type
-)
+get_symbol (abfd, ieee, last_symbol, symbol_count, pptr, max_index, this_type)
      bfd *abfd ATTRIBUTE_UNUSED;
      ieee_data_type *ieee;
      ieee_symbol_type *last_symbol;
      unsigned int *symbol_count;
      ieee_symbol_type ***pptr;
      unsigned int *max_index;
-     char this_type
-      ;
+     int this_type;
 {
   /* Need a new symbol */
   unsigned int new_index = must_parse_int (&(ieee->h));
   if (new_index != last_index || this_type != last_type)
     {
-      ieee_symbol_type *new_symbol = (ieee_symbol_type *) bfd_alloc (ieee->h.abfd,
-                                                sizeof (ieee_symbol_type));
+      ieee_symbol_type *new_symbol;
+      bfd_size_type amt = sizeof (ieee_symbol_type);
+
+      new_symbol = (ieee_symbol_type *) bfd_alloc (ieee->h.abfd, amt);
       if (!new_symbol)
        return NULL;
 
@@ -719,7 +861,7 @@ get_symbol (abfd,
   return last_symbol;
 }
 
-static boolean
+static bfd_boolean
 ieee_slurp_external_symbols (abfd)
      bfd *abfd;
 {
@@ -730,11 +872,11 @@ ieee_slurp_external_symbols (abfd)
   ieee_symbol_type **prev_reference_ptr = &ieee->external_reference;
   ieee_symbol_type *symbol = (ieee_symbol_type *) NULL;
   unsigned int symbol_count = 0;
-  boolean loop = true;
+  bfd_boolean loop = TRUE;
   last_index = 0xffffff;
-  ieee->symbol_table_full = true;
+  ieee->symbol_table_full = TRUE;
 
-  ieee_seek (abfd, offset);
+  ieee_seek (ieee, offset);
 
   while (loop)
     {
@@ -747,7 +889,7 @@ ieee_slurp_external_symbols (abfd)
                               &prev_symbols_ptr,
                               &ieee->external_symbol_max_index, 'I');
          if (symbol == NULL)
-           return false;
+           return FALSE;
 
          symbol->symbol.the_bfd = abfd;
          symbol->symbol.name = read_id (&(ieee->h));
@@ -761,7 +903,7 @@ ieee_slurp_external_symbols (abfd)
                               &prev_symbols_ptr,
                               &ieee->external_symbol_max_index, 'D');
          if (symbol == NULL)
-           return false;
+           return FALSE;
 
          BFD_ASSERT (symbol->index >= ieee->external_symbol_min_index);
 
@@ -776,7 +918,7 @@ ieee_slurp_external_symbols (abfd)
            unsigned int symbol_type_index;
            unsigned int symbol_attribute_def;
            bfd_vma value;
-           switch (read_2bytes (ieee))
+           switch (read_2bytes (&ieee->h))
              {
              case ieee_attribute_record_enum:
                symbol_name_index = must_parse_int (&(ieee->h));
@@ -790,11 +932,11 @@ ieee_slurp_external_symbols (abfd)
                    break;
                  default:
                    (*_bfd_error_handler)
-                     (_("%s: unimplemented ATI record  %u for symbol %u"),
-                      bfd_get_filename (abfd), symbol_attribute_def,
+                     (_("%s: unimplemented ATI record %u for symbol %u"),
+                      bfd_archive_filename (abfd), symbol_attribute_def,
                       symbol_name_index);
                    bfd_set_error (bfd_error_bad_value);
-                   return false;
+                   return FALSE;
                    break;
                  }
                break;
@@ -816,9 +958,9 @@ ieee_slurp_external_symbols (abfd)
                  {
                    (*_bfd_error_handler)
                      (_("%s: unexpected ATN type %d in external part"),
-                        bfd_get_filename (abfd), (int) value);
+                        bfd_archive_filename (abfd), (int) value);
                    bfd_set_error (bfd_error_bad_value);
-                   return false;
+                   return FALSE;
                  }
                parse_int (&ieee->h, &value);
                parse_int (&ieee->h, &value);
@@ -828,7 +970,7 @@ ieee_slurp_external_symbols (abfd)
 
                    --value;
 
-                   switch (read_2bytes (ieee))
+                   switch (read_2bytes (&ieee->h))
                      {
                      case ieee_asn_record_enum:
                        parse_int (&ieee->h, &val1);
@@ -838,9 +980,9 @@ ieee_slurp_external_symbols (abfd)
                      default:
                        (*_bfd_error_handler)
                          (_("%s: unexpected type after ATN"),
-                            bfd_get_filename (abfd));
+                            bfd_archive_filename (abfd));
                        bfd_set_error (bfd_error_bad_value);
-                       return false;
+                       return FALSE;
                      }
                  }
              }
@@ -850,7 +992,7 @@ ieee_slurp_external_symbols (abfd)
          {
            unsigned int symbol_name_index;
            ieee_symbol_index_type symbol_ignore;
-           boolean pcrel_ignore;
+           bfd_boolean pcrel_ignore;
            unsigned int extra;
            next_byte (&(ieee->h));
            next_byte (&(ieee->h));
@@ -899,7 +1041,7 @@ ieee_slurp_external_symbols (abfd)
            /* Fetch the default size if not resolved */
            size = must_parse_int (&(ieee->h));
            /* Fetch the defautlt value if available */
-           if (parse_int (&(ieee->h), &value) == false)
+           if (! parse_int (&(ieee->h), &value))
              {
                value = 0;
              }
@@ -916,7 +1058,7 @@ ieee_slurp_external_symbols (abfd)
                               &prev_reference_ptr,
                               &ieee->external_reference_max_index, 'X');
          if (symbol == NULL)
-           return false;
+           return FALSE;
 
          symbol->symbol.the_bfd = abfd;
          symbol->symbol.name = read_id (&(ieee->h));
@@ -929,7 +1071,7 @@ ieee_slurp_external_symbols (abfd)
          break;
 
        default:
-         loop = false;
+         loop = FALSE;
        }
     }
 
@@ -961,29 +1103,29 @@ ieee_slurp_external_symbols (abfd)
   if (symbol_count != abfd->symcount)
     {
       /* There are gaps in the table -- */
-      ieee->symbol_table_full = false;
+      ieee->symbol_table_full = FALSE;
     }
 
   *prev_symbols_ptr = (ieee_symbol_type *) NULL;
   *prev_reference_ptr = (ieee_symbol_type *) NULL;
 
-  return true;
+  return TRUE;
 }
 
-static boolean
+static bfd_boolean
 ieee_slurp_symbol_table (abfd)
      bfd *abfd;
 {
-  if (IEEE_DATA (abfd)->read_symbols == false)
+  if (! IEEE_DATA (abfd)->read_symbols)
     {
       if (! ieee_slurp_external_symbols (abfd))
-       return false;
-      IEEE_DATA (abfd)->read_symbols = true;
+       return FALSE;
+      IEEE_DATA (abfd)->read_symbols = TRUE;
     }
-  return true;
+  return TRUE;
 }
 
-long
+static long
 ieee_get_symtab_upper_bound (abfd)
      bfd *abfd;
 {
@@ -1001,7 +1143,7 @@ symbol index order
 
 extern const bfd_target ieee_vec;
 
-long
+static long
 ieee_get_symtab (abfd, location)
      bfd *abfd;
      asymbol **location;
@@ -1028,7 +1170,7 @@ ieee_get_symtab (abfd, location)
       if (! ieee_slurp_symbol_table (abfd))
        return -1;
 
-      if (ieee->symbol_table_full == false)
+      if (! ieee->symbol_table_full)
        {
          /* Arrgh - there are gaps in the table, run through and fill them */
          /* up with pointers to a null place */
@@ -1078,6 +1220,7 @@ get_section_entry (abfd, ieee, index)
     {
       unsigned int c, i;
       asection **n;
+      bfd_size_type amt;
 
       c = ieee->section_table_size;
       if (c == 0)
@@ -1085,8 +1228,9 @@ get_section_entry (abfd, ieee, index)
       while (c <= index)
        c *= 2;
 
-      n = ((asection **)
-          bfd_realloc (ieee->section_table, c * sizeof (asection *)));
+      amt = c;
+      amt *= sizeof (asection *);
+      n = (asection **) bfd_realloc (ieee->section_table, amt);
       if (n == NULL)
        return NULL;
 
@@ -1099,7 +1243,7 @@ get_section_entry (abfd, ieee, index)
 
   if (ieee->section_table[index] == (asection *) NULL)
     {
-      char *tmp = bfd_alloc (abfd, 11);
+      char *tmp = bfd_alloc (abfd, (bfd_size_type) 11);
       asection *section;
 
       if (!tmp)
@@ -1120,19 +1264,19 @@ ieee_slurp_sections (abfd)
 {
   ieee_data_type *ieee = IEEE_DATA (abfd);
   file_ptr offset = ieee->w.r.section_part;
-  asection *section = (asection *) NULL;
   char *name;
 
   if (offset != 0)
     {
       bfd_byte section_type[3];
-      ieee_seek (abfd, offset);
-      while (true)
+      ieee_seek (ieee, offset);
+      while (TRUE)
        {
          switch (this_byte (&(ieee->h)))
            {
            case ieee_section_type_enum:
              {
+               asection *section;
                unsigned int section_index;
                next_byte (&(ieee->h));
                section_index = must_parse_int (&(ieee->h));
@@ -1232,8 +1376,10 @@ ieee_slurp_sections (abfd)
              break;
            case ieee_e2_first_byte_enum:
              {
-               ieee_record_enum_type t = (ieee_record_enum_type) (read_2bytes (&(ieee->h)));
+               asection *section;
+               ieee_record_enum_type t;
 
+               t = (ieee_record_enum_type) (read_2bytes (&(ieee->h)));
                switch (t)
                  {
                  case ieee_section_size_enum:
@@ -1283,7 +1429,7 @@ ieee_slurp_sections (abfd)
    at the area in the file so that program which understand can dig it
    out.  */
 
-static boolean
+static bfd_boolean
 ieee_slurp_debug (abfd)
      bfd *abfd;
 {
@@ -1292,22 +1438,18 @@ ieee_slurp_debug (abfd)
   file_ptr debug_end;
 
   if (ieee->w.r.debug_information_part == 0)
-    return true;
+    return TRUE;
 
   sec = bfd_make_section (abfd, ".debug");
   if (sec == NULL)
-    return false;
+    return FALSE;
   sec->flags |= SEC_DEBUGGING | SEC_HAS_CONTENTS;
   sec->filepos = ieee->w.r.debug_information_part;
 
-  debug_end = ieee->w.r.data_part;
-  if (debug_end == 0)
-    debug_end = ieee->w.r.trailer_part;
-  if (debug_end == 0)
-    debug_end = ieee->w.r.me_record;
+  debug_end = ieee_part_after (ieee, ieee->w.r.debug_information_part);
   sec->_raw_size = debug_end - ieee->w.r.debug_information_part;
 
-  return true;
+  return TRUE;
 }
 \f
 /***********************************************************************
@@ -1324,18 +1466,18 @@ ieee_archive_p (abfd)
   file_ptr buffer_offset = 0;
   ieee_ar_data_type *save = abfd->tdata.ieee_ar_data;
   ieee_ar_data_type *ieee;
-  unsigned int alc_elts;
+  bfd_size_type alc_elts;
   ieee_ar_obstack_type *elts = NULL;
+  bfd_size_type amt = sizeof (ieee_ar_data_type);
 
-  abfd->tdata.ieee_ar_data =
-    (ieee_ar_data_type *) bfd_alloc (abfd, sizeof (ieee_ar_data_type));
+  abfd->tdata.ieee_ar_data = (ieee_ar_data_type *) bfd_alloc (abfd, amt);
   if (!abfd->tdata.ieee_ar_data)
-    goto error_return;
+    goto error_ret_restore;
   ieee = IEEE_AR_DATA (abfd);
 
-  /* FIXME: Check return value.  I'm not sure whether it needs to read
-     the entire buffer or not.  */
-  bfd_read ((PTR) buffer, 1, sizeof (buffer), abfd);
+  /* Ignore the return value here.  It doesn't matter if we don't read
+     the entire buffer.  We might have a very small ieee file.  */
+  bfd_bread ((PTR) buffer, (bfd_size_type) sizeof (buffer), abfd);
 
   ieee->h.first_byte = buffer;
   ieee->h.input_p = buffer;
@@ -1395,29 +1537,27 @@ ieee_archive_p (abfd)
       t->abfd = (bfd *) NULL;
 
       /* Make sure that we don't go over the end of the buffer.  */
-      if ((size_t) ieee_pos (abfd) > sizeof (buffer) / 2)
+      if ((size_t) ieee_pos (IEEE_DATA (abfd)) > sizeof (buffer) / 2)
        {
          /* Past half way, reseek and reprime.  */
-         buffer_offset += ieee_pos (abfd);
+         buffer_offset += ieee_pos (IEEE_DATA (abfd));
          if (bfd_seek (abfd, buffer_offset, SEEK_SET) != 0)
            goto error_return;
 
-         /* FIXME: Check return value.  I'm not sure whether it needs
-            to read the entire buffer or not.  */
-         bfd_read ((PTR) buffer, 1, sizeof (buffer), abfd);
+         /* Again ignore return value of bfd_bread.  */
+         bfd_bread ((PTR) buffer, (bfd_size_type) sizeof (buffer), abfd);
          ieee->h.first_byte = buffer;
          ieee->h.input_p = buffer;
        }
     }
 
-  ieee->elements = ((ieee_ar_obstack_type *)
-                   bfd_alloc (abfd,
-                              ieee->element_count * sizeof *ieee->elements));
+  amt = ieee->element_count;
+  amt *= sizeof *ieee->elements;
+  ieee->elements = (ieee_ar_obstack_type *) bfd_alloc (abfd, amt);
   if (ieee->elements == NULL)
     goto error_return;
 
-  memcpy (ieee->elements, elts,
-         ieee->element_count * sizeof *ieee->elements);
+  memcpy (ieee->elements, elts, (size_t) amt);
   free (elts);
   elts = NULL;
 
@@ -1427,16 +1567,15 @@ ieee_archive_p (abfd)
       if (bfd_seek (abfd, ieee->elements[i].file_offset, SEEK_SET) != 0)
        goto error_return;
 
-      /* FIXME: Check return value.  I'm not sure whether it needs to
-        read the entire buffer or not.  */
-      bfd_read ((PTR) buffer, 1, sizeof (buffer), abfd);
+      /* Again ignore return value of bfd_bread.  */
+      bfd_bread ((PTR) buffer, (bfd_size_type) sizeof (buffer), abfd);
       ieee->h.first_byte = buffer;
       ieee->h.input_p = buffer;
 
       next_byte (&(ieee->h));          /* Drop F8.  */
       next_byte (&(ieee->h));          /* Drop 14.  */
       must_parse_int (&(ieee->h));     /* Drop size of block.  */
-      
+
       if (must_parse_int (&(ieee->h)) != 0)
        /* This object has been deleted.  */
        ieee->elements[i].file_offset = 0;
@@ -1449,25 +1588,17 @@ ieee_archive_p (abfd)
   return abfd->xvec;
 
  got_wrong_format_error:
-  bfd_release (abfd, ieee);
-  abfd->tdata.ieee_ar_data = save;
   bfd_set_error (bfd_error_wrong_format);
-
  error_return:
   if (elts != NULL)
     free (elts);
+  bfd_release (abfd, ieee);
+ error_ret_restore:
+  abfd->tdata.ieee_ar_data = save;
 
   return NULL;
 }
 
-static boolean
-ieee_mkobject (abfd)
-     bfd *abfd;
-{
-  abfd->tdata.ieee_data = (ieee_data_type *) bfd_zalloc (abfd, sizeof (ieee_data_type));
-  return abfd->tdata.ieee_data ? true : false;
-}
-
 const bfd_target *
 ieee_object_p (abfd)
      bfd *abfd;
@@ -1477,6 +1608,7 @@ ieee_object_p (abfd)
   ieee_data_type *ieee;
   unsigned char buffer[300];
   ieee_data_type *save = IEEE_DATA (abfd);
+  bfd_size_type amt;
 
   abfd->tdata.ieee_data = 0;
   ieee_mkobject (abfd);
@@ -1484,17 +1616,16 @@ ieee_object_p (abfd)
   ieee = IEEE_DATA (abfd);
   if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0)
     goto fail;
-  /* Read the first few bytes in to see if it makes sense */
-  /* FIXME: Check return value.  I'm not sure whether it needs to read
-     the entire buffer or not.  */
-  bfd_read ((PTR) buffer, 1, sizeof (buffer), abfd);
+  /* Read the first few bytes in to see if it makes sense.  Ignore
+     bfd_bread return value;  The file might be very small.  */
+  bfd_bread ((PTR) buffer, (bfd_size_type) sizeof (buffer), abfd);
 
   ieee->h.input_p = buffer;
   if (this_byte_and_next (&(ieee->h)) != Module_Beginning)
     goto got_wrong_format;
 
-  ieee->read_symbols = false;
-  ieee->read_data = false;
+  ieee->read_symbols = FALSE;
+  ieee->read_data = FALSE;
   ieee->section_count = 0;
   ieee->external_symbol_max_index = 0;
   ieee->external_symbol_min_index = IEEE_PUBLIC_BASE;
@@ -1508,7 +1639,7 @@ ieee_object_p (abfd)
   if (strcmp (processor, "LIBRARY") == 0)
     goto got_wrong_format;
   ieee->mb.module_name = read_id (&(ieee->h));
-  if (abfd->filename == (CONST char *) NULL)
+  if (abfd->filename == (const char *) NULL)
     {
       abfd->filename = ieee->mb.module_name;
     }
@@ -1552,12 +1683,12 @@ ieee_object_p (abfd)
                strcpy (family, "68332");   /* Guess it will be CPU32 */
              }
          }
-       else if (toupper (processor[3]) == 'F')   /* 68F333 */
-         strcpy (family, "68332");               /* CPU32 */
-       else if ((toupper (processor[3]) == 'C')  /* Embedded controllers */
-                && ((toupper (processor[2]) == 'E')
-                    || (toupper (processor[2]) == 'H')
-                    || (toupper (processor[2]) == 'L')))
+       else if (TOUPPER (processor[3]) == 'F')  /* 68F333 */
+         strcpy (family, "68332");                /* CPU32 */
+       else if ((TOUPPER (processor[3]) == 'C') /* Embedded controllers */
+                && ((TOUPPER (processor[2]) == 'E')
+                    || (TOUPPER (processor[2]) == 'H')
+                    || (TOUPPER (processor[2]) == 'L')))
          {
            strcpy (family, "68");
            strncat (family, processor + 4, 7);
@@ -1590,11 +1721,11 @@ ieee_object_p (abfd)
     }
   next_byte (&(ieee->h));
 
-  if (parse_int (&(ieee->h), &ieee->ad.number_of_bits_mau) == false)
+  if (! parse_int (&(ieee->h), &ieee->ad.number_of_bits_mau))
     {
       goto fail;
     }
-  if (parse_int (&(ieee->h), &ieee->ad.number_of_maus_in_address) == false)
+  if (! parse_int (&(ieee->h), &ieee->ad.number_of_maus_in_address))
     {
       goto fail;
     }
@@ -1606,7 +1737,7 @@ ieee_object_p (abfd)
 
   for (part = 0; part < N_W_VARIABLES; part++)
     {
-      boolean ok;
+      bfd_boolean ok;
       if (read_2bytes (&(ieee->h)) != (int) ieee_assign_value_to_variable_enum)
        {
          goto fail;
@@ -1617,7 +1748,7 @@ ieee_object_p (abfd)
        }
 
       ieee->w.offset[part] = parse_i (&(ieee->h), &ok);
-      if (ok == false)
+      if (! ok)
        {
          goto fail;
        }
@@ -1632,16 +1763,17 @@ ieee_object_p (abfd)
      quickly.  We can work out how big the file is from the trailer
      record */
 
+  amt = ieee->w.r.me_record + 1;
   IEEE_DATA (abfd)->h.first_byte =
-    (unsigned char *) bfd_alloc (ieee->h.abfd, ieee->w.r.me_record + 1);
+    (unsigned char *) bfd_alloc (ieee->h.abfd, amt);
   if (!IEEE_DATA (abfd)->h.first_byte)
     goto fail;
   if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0)
     goto fail;
   /* FIXME: Check return value.  I'm not sure whether it needs to read
      the entire buffer or not.  */
-  bfd_read ((PTR) (IEEE_DATA (abfd)->h.first_byte), 1,
-           ieee->w.r.me_record + 1, abfd);
+  bfd_bread ((PTR) (IEEE_DATA (abfd)->h.first_byte),
+           (bfd_size_type) ieee->w.r.me_record + 1, abfd);
 
   ieee_slurp_sections (abfd);
 
@@ -1653,17 +1785,17 @@ ieee_object_p (abfd)
 
   if (! ieee_slurp_section_data (abfd))
     goto fail;
-    
+
   return abfd->xvec;
 got_wrong_format:
   bfd_set_error (bfd_error_wrong_format);
 fail:
-  (void) bfd_release (abfd, ieee);
+  bfd_release (abfd, ieee);
   abfd->tdata.ieee_data = save;
   return (const bfd_target *) NULL;
 }
 
-void
+static void
 ieee_get_symbol_info (ignore_abfd, symbol, ret)
      bfd *ignore_abfd ATTRIBUTE_UNUSED;
      asymbol *symbol;
@@ -1676,9 +1808,9 @@ ieee_get_symbol_info (ignore_abfd, symbol, ret)
     ret->type = (symbol->flags & BSF_LOCAL) ? 'a' : 'A';
 }
 
-void
-ieee_print_symbol (ignore_abfd, afile, symbol, how)
-     bfd *ignore_abfd ATTRIBUTE_UNUSED;
+static void
+ieee_print_symbol (abfd, afile, symbol, how)
+     bfd *abfd;
      PTR afile;
      asymbol *symbol;
      bfd_print_symbol_type how;
@@ -1709,7 +1841,7 @@ ieee_print_symbol (ignore_abfd, afile, symbol, how)
          }
        else
          {
-           bfd_print_symbol_vandf ((PTR) file, symbol);
+           bfd_print_symbol_vandf (abfd, (PTR) file, symbol);
 
            fprintf (file, " %-5s %04x %02x %s",
                     section_name,
@@ -1722,7 +1854,7 @@ ieee_print_symbol (ignore_abfd, afile, symbol, how)
     }
 }
 
-static boolean
+static bfd_boolean
 do_one (ieee, current_map, location_ptr, s, iterations)
      ieee_data_type *ieee;
      ieee_per_section_type *current_map;
@@ -1749,7 +1881,7 @@ do_one (ieee, current_map, location_ptr, s, iterations)
 
     case ieee_load_with_relocation_enum:
       {
-       boolean loop = true;
+       bfd_boolean loop = TRUE;
        next_byte (&(ieee->h));
        while (loop)
          {
@@ -1762,13 +1894,14 @@ do_one (ieee, current_map, location_ptr, s, iterations)
              case ieee_function_either_open_b_enum:
                {
                  unsigned int extra = 4;
-                 boolean pcrel = false;
+                 bfd_boolean pcrel = FALSE;
                  asection *section;
-                 ieee_reloc_type *r =
-                 (ieee_reloc_type *) bfd_alloc (ieee->h.abfd,
-                                                sizeof (ieee_reloc_type));
+                 ieee_reloc_type *r;
+                 bfd_size_type amt = sizeof (ieee_reloc_type);
+
+                 r = (ieee_reloc_type *) bfd_alloc (ieee->h.abfd, amt);
                  if (!r)
-                   return false;
+                   return FALSE;
 
                  *(current_map->reloc_tail_ptr) = r;
                  current_map->reloc_tail_ptr = &r->next;
@@ -1820,51 +1953,53 @@ do_one (ieee, current_map, location_ptr, s, iterations)
                    case 0:
                    case 4:
 
-                     if (pcrel == true)
+                     if (pcrel)
                        {
 #if KEEPMINUSPCININST
-                         bfd_put_32 (ieee->h.abfd, -current_map->pc, location_ptr +
-                                     current_map->pc);
+                         bfd_put_32 (ieee->h.abfd, -current_map->pc,
+                                     location_ptr + current_map->pc);
                          r->relent.howto = &rel32_howto;
-                         r->relent.addend -=
-                           current_map->pc;
+                         r->relent.addend -= current_map->pc;
 #else
-                         bfd_put_32 (ieee->h.abfd, 0, location_ptr +
+                         bfd_put_32 (ieee->h.abfd, (bfd_vma) 0, location_ptr +
                                      current_map->pc);
                          r->relent.howto = &rel32_howto;
 #endif
                        }
                      else
                        {
-                         bfd_put_32 (ieee->h.abfd, 0, location_ptr +
-                                     current_map->pc);
+                         bfd_put_32 (ieee->h.abfd, (bfd_vma) 0,
+                                     location_ptr + current_map->pc);
                          r->relent.howto = &abs32_howto;
                        }
                      current_map->pc += 4;
                      break;
                    case 2:
-                     if (pcrel == true)
+                     if (pcrel)
                        {
 #if KEEPMINUSPCININST
-                         bfd_put_16 (ieee->h.abfd, (int) (-current_map->pc), location_ptr + current_map->pc);
+                         bfd_put_16 (ieee->h.abfd, (bfd_vma) -current_map->pc,
+                                     location_ptr + current_map->pc);
                          r->relent.addend -= current_map->pc;
                          r->relent.howto = &rel16_howto;
 #else
 
-                         bfd_put_16 (ieee->h.abfd, 0, location_ptr + current_map->pc);
+                         bfd_put_16 (ieee->h.abfd, (bfd_vma) 0,
+                                     location_ptr + current_map->pc);
                          r->relent.howto = &rel16_howto;
 #endif
                        }
 
                      else
                        {
-                         bfd_put_16 (ieee->h.abfd, 0, location_ptr + current_map->pc);
+                         bfd_put_16 (ieee->h.abfd, (bfd_vma) 0,
+                                     location_ptr + current_map->pc);
                          r->relent.howto = &abs16_howto;
                        }
                      current_map->pc += 2;
                      break;
                    case 1:
-                     if (pcrel == true)
+                     if (pcrel)
                        {
 #if KEEPMINUSPCININST
                          bfd_put_8 (ieee->h.abfd, (int) (-current_map->pc), location_ptr + current_map->pc);
@@ -1885,14 +2020,14 @@ do_one (ieee, current_map, location_ptr, s, iterations)
 
                    default:
                      BFD_FAIL ();
-                     return false;
+                     return FALSE;
                    }
                }
                break;
              default:
                {
                  bfd_vma this_size;
-                 if (parse_int (&(ieee->h), &this_size) == true)
+                 if (parse_int (&(ieee->h), &this_size))
                    {
                      unsigned int i;
                      for (i = 0; i < this_size; i++)
@@ -1903,7 +2038,7 @@ do_one (ieee, current_map, location_ptr, s, iterations)
                    }
                  else
                    {
-                     loop = false;
+                     loop = FALSE;
                    }
                }
              }
@@ -1911,15 +2046,15 @@ do_one (ieee, current_map, location_ptr, s, iterations)
            /* Prevent more than the first load-item of an LR record
               from being repeated (MRI convention). */
            if (iterations != 1)
-             loop = false;
+             loop = FALSE;
          }
       }
     }
-  return true;
+  return TRUE;
 }
 
 /* Read in all the section data and relocation stuff too */
-static boolean
+static bfd_boolean
 ieee_slurp_section_data (abfd)
      bfd *abfd;
 {
@@ -1930,40 +2065,40 @@ ieee_slurp_section_data (abfd)
   ieee_per_section_type *current_map = (ieee_per_section_type *) NULL;
   asection *s;
   /* Seek to the start of the data area */
-  if (ieee->read_data == true)
-    return true;
-  ieee->read_data = true;
-  ieee_seek (abfd, ieee->w.r.data_part);
+  if (ieee->read_data)
+    return TRUE;
+  ieee->read_data = TRUE;
+  ieee_seek (ieee, ieee->w.r.data_part);
 
   /* Allocate enough space for all the section contents */
 
   for (s = abfd->sections; s != (asection *) NULL; s = s->next)
     {
-      ieee_per_section_type *per = (ieee_per_section_type *) s->used_by_bfd;
+      ieee_per_section_type *per = ieee_per_section (s);
       if ((s->flags & SEC_DEBUGGING) != 0)
        continue;
       per->data = (bfd_byte *) bfd_alloc (ieee->h.abfd, s->_raw_size);
       if (!per->data)
-       return false;
+       return FALSE;
       /*SUPPRESS 68*/
       per->reloc_tail_ptr =
        (ieee_reloc_type **) & (s->relocation);
     }
 
-  while (true)
+  while (TRUE)
     {
       switch (this_byte (&(ieee->h)))
        {
          /* IF we see anything strange then quit */
        default:
-         return true;
+         return TRUE;
 
        case ieee_set_current_section_enum:
          next_byte (&(ieee->h));
          section_number = must_parse_int (&(ieee->h));
          s = ieee->section_table[section_number];
          s->flags |= SEC_LOAD | SEC_HAS_CONTENTS;
-         current_map = (ieee_per_section_type *) s->used_by_bfd;
+         current_map = ieee_per_section (s);
          location_ptr = current_map->data - s->vma;
          /* The document I have says that Microtec's compilers reset */
          /* this after a sec section, even though the standard says not */
@@ -1980,9 +2115,9 @@ ieee_slurp_section_data (abfd)
                bfd_vma value;
                ieee_symbol_index_type symbol;
                unsigned int extra;
-               boolean pcrel;
+               bfd_boolean pcrel;
                next_byte (&(ieee->h));
-               must_parse_int (&(ieee->h));    /* Thow away section #*/
+               must_parse_int (&(ieee->h));    /* Throw away section #*/
                parse_expression (ieee, &value,
                                  &symbol,
                                  &pcrel, &extra,
@@ -1998,10 +2133,10 @@ ieee_slurp_section_data (abfd)
                next_byte (&(ieee->h));
              abfd->start_address = must_parse_int (&(ieee->h));
              /* We've got to the end of the data now - */
-             return true;
+             return TRUE;
            default:
              BFD_FAIL ();
-             return false;
+             return FALSE;
            }
          break;
        case ieee_repeat_data_enum:
@@ -2035,8 +2170,8 @@ ieee_slurp_section_data (abfd)
                  {
                    ieee->h.input_p = start;
                    if (!do_one (ieee, current_map, location_ptr, s,
-                                iterations))
-                     return false;
+                                (int) iterations))
+                     return FALSE;
                    iterations--;
                  }
              }
@@ -2046,27 +2181,27 @@ ieee_slurp_section_data (abfd)
        case ieee_load_with_relocation_enum:
          {
            if (!do_one (ieee, current_map, location_ptr, s, 1))
-             return false;
+             return FALSE;
          }
        }
     }
 }
 
-boolean
+static bfd_boolean
 ieee_new_section_hook (abfd, newsect)
      bfd *abfd;
      asection *newsect;
 {
-  newsect->used_by_bfd = (PTR)
-    bfd_alloc (abfd, sizeof (ieee_per_section_type));
+  newsect->used_by_bfd
+    = (PTR) bfd_alloc (abfd, (bfd_size_type) sizeof (ieee_per_section_type));
   if (!newsect->used_by_bfd)
-    return false;
+    return FALSE;
   ieee_per_section (newsect)->data = (bfd_byte *) NULL;
   ieee_per_section (newsect)->section = newsect;
-  return true;
+  return TRUE;
 }
 
-long
+static long
 ieee_get_reloc_upper_bound (abfd, asect)
      bfd *abfd;
      sec_ptr asect;
@@ -2078,7 +2213,7 @@ ieee_get_reloc_upper_bound (abfd, asect)
   return (asect->reloc_count + 1) * sizeof (arelent *);
 }
 
-static boolean
+static bfd_boolean
 ieee_get_section_contents (abfd, section, location, offset, count)
      bfd *abfd;
      sec_ptr section;
@@ -2086,23 +2221,22 @@ ieee_get_section_contents (abfd, section, location, offset, count)
      file_ptr offset;
      bfd_size_type count;
 {
-  ieee_per_section_type *p = (ieee_per_section_type *) section->used_by_bfd;
+  ieee_per_section_type *p = ieee_per_section (section);
   if ((section->flags & SEC_DEBUGGING) != 0)
     return _bfd_generic_get_section_contents (abfd, section, location,
                                              offset, count);
   ieee_slurp_section_data (abfd);
   (void) memcpy ((PTR) location, (PTR) (p->data + offset), (unsigned) count);
-  return true;
+  return TRUE;
 }
 
-long
+static long
 ieee_canonicalize_reloc (abfd, section, relptr, symbols)
      bfd *abfd;
      sec_ptr section;
      arelent **relptr;
      asymbol **symbols;
 {
-/*  ieee_per_section_type *p = (ieee_per_section_type *) section->used_by_bfd;*/
   ieee_reloc_type *src = (ieee_reloc_type *) (section->relocation);
   ieee_data_type *ieee = IEEE_DATA (abfd);
 
@@ -2140,8 +2274,8 @@ ieee_canonicalize_reloc (abfd, section, relptr, symbols)
 
 static int
 comp (ap, bp)
-     CONST PTR ap;
-     CONST PTR bp;
+     const PTR ap;
+     const PTR bp;
 {
   arelent *a = *((arelent **) ap);
   arelent *b = *((arelent **) bp);
@@ -2150,7 +2284,7 @@ comp (ap, bp)
 
 /* Write the section headers.  */
 
-static boolean
+static bfd_boolean
 ieee_write_section_part (abfd)
      bfd *abfd;
 {
@@ -2166,19 +2300,19 @@ ieee_write_section_part (abfd)
              || ! ieee_write_byte (abfd,
                                    (bfd_byte) (s->index
                                                + IEEE_SECTION_NUMBER_BASE)))
-           return false;
+           return FALSE;
 
          if (abfd->flags & EXEC_P)
            {
              /* This image is executable, so output absolute sections */
              if (! ieee_write_byte (abfd, ieee_variable_A_enum)
                  || ! ieee_write_byte (abfd, ieee_variable_S_enum))
-               return false;
+               return FALSE;
            }
          else
            {
              if (! ieee_write_byte (abfd, ieee_variable_C_enum))
-               return false;
+               return FALSE;
            }
 
          switch (s->flags & (SEC_CODE | SEC_DATA | SEC_ROM))
@@ -2186,24 +2320,24 @@ ieee_write_section_part (abfd)
            case SEC_CODE | SEC_LOAD:
            case SEC_CODE:
              if (! ieee_write_byte (abfd, ieee_variable_P_enum))
-               return false;
+               return FALSE;
              break;
            case SEC_DATA:
            default:
              if (! ieee_write_byte (abfd, ieee_variable_D_enum))
-               return false;
+               return FALSE;
              break;
            case SEC_ROM:
            case SEC_ROM | SEC_DATA:
            case SEC_ROM | SEC_LOAD:
            case SEC_ROM | SEC_DATA | SEC_LOAD:
              if (! ieee_write_byte (abfd, ieee_variable_R_enum))
-               return false;
+               return FALSE;
            }
 
 
          if (! ieee_write_id (abfd, s->name))
-           return false;
+           return FALSE;
 #if 0
          ieee_write_int (abfd, 0);     /* Parent */
          ieee_write_int (abfd, 0);     /* Brother */
@@ -2214,8 +2348,8 @@ ieee_write_section_part (abfd)
              || ! ieee_write_byte (abfd,
                                    (bfd_byte) (s->index
                                                + IEEE_SECTION_NUMBER_BASE))
-             || ! ieee_write_int (abfd, 1 << s->alignment_power))
-           return false;
+             || ! ieee_write_int (abfd, (bfd_vma) 1 << s->alignment_power))
+           return FALSE;
 
          /* Size */
          if (! ieee_write_2bytes (abfd, ieee_section_size_enum)
@@ -2223,7 +2357,7 @@ ieee_write_section_part (abfd)
                                    (bfd_byte) (s->index
                                                + IEEE_SECTION_NUMBER_BASE))
              || ! ieee_write_int (abfd, s->_raw_size))
-           return false;
+           return FALSE;
          if (abfd->flags & EXEC_P)
            {
              /* Relocateable sections don't have asl records */
@@ -2234,16 +2368,16 @@ ieee_write_section_part (abfd)
                                         (s->index
                                          + IEEE_SECTION_NUMBER_BASE)))
                  || ! ieee_write_int (abfd, s->lma))
-               return false;
+               return FALSE;
            }
        }
     }
 
-  return true;
+  return TRUE;
 }
 
 
-static boolean
+static bfd_boolean
 do_with_relocs (abfd, s)
      bfd *abfd;
      asection *s;
@@ -2267,16 +2401,17 @@ do_with_relocs (abfd, s)
       || ! ieee_write_2bytes (abfd, ieee_set_current_pc_enum)
       || ! ieee_write_byte (abfd,
                            (bfd_byte) (s->index + IEEE_SECTION_NUMBER_BASE)))
-    return false;
+    return FALSE;
+
   if ((abfd->flags & EXEC_P) != 0 && relocs_to_go == 0)
     {
       if (! ieee_write_int (abfd, s->lma))
-       return false;
+       return FALSE;
     }
   else
     {
-      if (! ieee_write_expression (abfd, 0, s->symbol, 0, 0))
-       return false;
+      if (! ieee_write_expression (abfd, (bfd_vma) 0, s->symbol, 0, 0))
+       return FALSE;
     }
 
   if (relocs_to_go == 0)
@@ -2297,16 +2432,13 @@ do_with_relocs (abfd, s)
          if (run != 0)
            {
              if (! ieee_write_byte (abfd, ieee_load_constant_bytes_enum))
-               return false;
+               return FALSE;
              /* Output a stream of bytes */
              if (! ieee_write_int (abfd, run))
-               return false;
-             if (bfd_write ((PTR) (stream + current_byte_index),
-                            1,
-                            run,
-                            abfd)
+               return FALSE;
+             if (bfd_bwrite ((PTR) (stream + current_byte_index), run, abfd)
                  != run)
-               return false;
+               return FALSE;
              current_byte_index += run;
            }
        }
@@ -2314,7 +2446,7 @@ do_with_relocs (abfd, s)
   else
     {
       if (! ieee_write_byte (abfd, ieee_load_with_relocation_enum))
-       return false;
+       return FALSE;
 
       /* Output the data stream as the longest sequence of bytes
         possible, allowing for the a reasonable packet size and
@@ -2323,10 +2455,9 @@ do_with_relocs (abfd, s)
       if ((PTR) stream == (PTR) NULL)
        {
          /* Outputting a section without data, fill it up */
-         stream = (unsigned char *) (bfd_alloc (abfd, s->_raw_size));
+         stream = (unsigned char *) bfd_zalloc (abfd, s->_raw_size);
          if (!stream)
-           return false;
-         memset ((PTR) stream, 0, (size_t) s->_raw_size);
+           return FALSE;
        }
       while (current_byte_index < s->_raw_size)
        {
@@ -2351,13 +2482,10 @@ do_with_relocs (abfd, s)
            {
              /* Output a stream of bytes */
              if (! ieee_write_int (abfd, run))
-               return false;
-             if (bfd_write ((PTR) (stream + current_byte_index),
-                            1,
-                            run,
-                            abfd)
+               return FALSE;
+             if (bfd_bwrite ((PTR) (stream + current_byte_index), run, abfd)
                  != run)
-               return false;
+               return FALSE;
              current_byte_index += run;
            }
          /* Output any relocations here */
@@ -2397,7 +2525,7 @@ do_with_relocs (abfd, s)
                    default:
                      ov = 0;
                      BFD_FAIL ();
-                     return false;
+                     return FALSE;
                    }
 
                  ov &= r->howto->src_mask;
@@ -2408,7 +2536,7 @@ do_with_relocs (abfd, s)
 
                  if (! ieee_write_byte (abfd,
                                         ieee_function_either_open_b_enum))
-                   return false;
+                   return FALSE;
 
 /*               abort();*/
 
@@ -2417,28 +2545,28 @@ do_with_relocs (abfd, s)
                      if (! ieee_write_expression (abfd, r->addend + ov,
                                                   *(r->sym_ptr_ptr),
                                                   r->howto->pc_relative,
-                                                  s->index))
-                       return false;
+                                                  (unsigned) s->index))
+                       return FALSE;
                    }
                  else
                    {
                      if (! ieee_write_expression (abfd, r->addend + ov,
                                                   (asymbol *) NULL,
                                                   r->howto->pc_relative,
-                                                  s->index))
-                       return false;
+                                                  (unsigned) s->index))
+                       return FALSE;
                    }
 
                  if (number_of_maus_in_address
                      != bfd_get_reloc_size (r->howto))
                    {
-                     if (! ieee_write_int (abfd,
-                                           bfd_get_reloc_size (r->howto)))
-                       return false;
+                     bfd_vma rsize = bfd_get_reloc_size (r->howto);
+                     if (! ieee_write_int (abfd, rsize))
+                       return FALSE;
                    }
                  if (! ieee_write_byte (abfd,
                                         ieee_function_either_close_b_enum))
-                   return false;
+                   return FALSE;
 
                  relocs_to_go--;
                  p++;
@@ -2448,14 +2576,14 @@ do_with_relocs (abfd, s)
        }
     }
 
-  return true;
+  return TRUE;
 }
 
 /* If there are no relocations in the output section then we can be
    clever about how we write.  We block items up into a max of 127
    bytes.  */
 
-static boolean
+static bfd_boolean
 do_as_repeat (abfd, s)
      bfd *abfd;
      asection *s;
@@ -2470,20 +2598,32 @@ do_as_repeat (abfd, s)
          || ! ieee_write_byte (abfd, ieee_set_current_pc_enum & 0xff)
          || ! ieee_write_byte (abfd,
                                (bfd_byte) (s->index
-                                           + IEEE_SECTION_NUMBER_BASE))
-         || ! ieee_write_int (abfd, s->lma)
-         || ! ieee_write_byte (abfd, ieee_repeat_data_enum)
+                                           + IEEE_SECTION_NUMBER_BASE)))
+       return FALSE;
+
+      if ((abfd->flags & EXEC_P) != 0)
+       {
+         if (! ieee_write_int (abfd, s->lma))
+           return FALSE;
+       }
+      else
+       {
+         if (! ieee_write_expression (abfd, (bfd_vma) 0, s->symbol, 0, 0))
+           return FALSE;
+       }
+
+      if (! ieee_write_byte (abfd, ieee_repeat_data_enum)
          || ! ieee_write_int (abfd, s->_raw_size)
          || ! ieee_write_byte (abfd, ieee_load_constant_bytes_enum)
          || ! ieee_write_byte (abfd, 1)
          || ! ieee_write_byte (abfd, 0))
-       return false;
+       return FALSE;
     }
 
-  return true;
+  return TRUE;
 }
 
-static boolean
+static bfd_boolean
 do_without_relocs (abfd, s)
      bfd *abfd;
      asection *s;
@@ -2493,7 +2633,7 @@ do_without_relocs (abfd, s)
   if (stream == 0 || ((s->flags & SEC_LOAD) == 0))
     {
       if (! do_as_repeat (abfd, s))
-       return false;
+       return FALSE;
     }
   else
     {
@@ -2503,15 +2643,15 @@ do_without_relocs (abfd, s)
          if (stream[i] != 0)
            {
              if (! do_with_relocs (abfd, s))
-               return false;
-             return true;
+               return FALSE;
+             return TRUE;
            }
        }
       if (! do_as_repeat (abfd, s))
-       return false;
+       return FALSE;
     }
 
-  return true;
+  return TRUE;
 }
 
 
@@ -2525,20 +2665,41 @@ static bfd *input_bfd;
 static bfd *output_bfd;
 static int output_buffer;
 
+static bfd_boolean
+ieee_mkobject (abfd)
+     bfd *abfd;
+{
+  bfd_size_type amt;
+
+  output_ptr_start = NULL;
+  output_ptr = NULL;
+  output_ptr_end = NULL;
+  input_ptr_start = NULL;
+  input_ptr = NULL;
+  input_ptr_end = NULL;
+  input_bfd = NULL;
+  output_bfd = NULL;
+  output_buffer = 0;
+  amt = sizeof (ieee_data_type);
+  abfd->tdata.ieee_data = (ieee_data_type *) bfd_zalloc (abfd, amt);
+  return abfd->tdata.ieee_data != NULL;
+}
+
 static void
 fill ()
 {
+  bfd_size_type amt = input_ptr_end - input_ptr_start;
   /* FIXME: Check return value.  I'm not sure whether it needs to read
      the entire buffer or not.  */
-  bfd_read ((PTR) input_ptr_start, 1, input_ptr_end - input_ptr_start, input_bfd);
+  bfd_bread ((PTR) input_ptr_start, amt, input_bfd);
   input_ptr = input_ptr_start;
 }
+
 static void
 flush ()
 {
-  if (bfd_write ((PTR) (output_ptr_start), 1, output_ptr - output_ptr_start,
-                output_bfd)
-      != (bfd_size_type) (output_ptr - output_ptr_start))
+  bfd_size_type amt = output_ptr - output_ptr_start;
+  if (bfd_bwrite ((PTR) (output_ptr_start), amt, output_bfd) != amt)
     abort ();
   output_ptr = output_ptr_start;
   output_buffer++;
@@ -2613,7 +2774,7 @@ copy_expression ()
 {
   int stack[10];
   int *tos = stack;
-  int value = 0;
+  int value;
   while (1)
     {
       switch (THIS ())
@@ -2667,16 +2828,13 @@ copy_expression ()
            }
          *tos++ = THIS ();
          NEXT ();
-         value = 0;
          break;
        case 0xa5:
          /* PLUS anything */
-         {
-           int value = *(--tos);
-           value += *(--tos);
-           *tos++ = value;
-           NEXT ();
-         }
+         value = *(--tos);
+         value += *(--tos);
+         *tos++ = value;
+         NEXT ();
          break;
        case VAR ('R'):
          {
@@ -2689,17 +2847,11 @@ copy_expression ()
            NEXT ();
            ieee = IEEE_DATA (input_bfd);
            s = ieee->section_table[section_number];
+           value = 0;
            if (s->output_section)
-             {
-               value = s->output_section->lma;
-             }
-           else
-             {
-               value = 0;
-             }
+             value = s->output_section->lma;
            value += s->output_offset;
            *tos++ = value;
-           value = 0;
          }
          break;
        case 0x90:
@@ -2708,22 +2860,14 @@ copy_expression ()
            write_int (*(--tos));
            OUT (0x90);
            return;
-
          }
        }
     }
-
 }
 
 /* Drop the int in the buffer, and copy a null into the gap, which we
    will overwrite later */
 
-struct output_buffer_struct
-{
-  unsigned char *ptrp;
-  int buffer;
-};
-
 static void
 fill_int (buf)
      struct output_buffer_struct *buf;
@@ -2811,7 +2955,6 @@ copy_int ()
 #define ID copy_id()
 #define INT copy_int()
 #define EXP copy_expression()
-static void copy_till_end ();
 #define INTn(q) copy_int()
 #define EXPn(q) copy_expression()
 
@@ -2977,7 +3120,6 @@ f2_record ()
 }
 
 
-static void block ();
 static void
 f8_record ()
 {
@@ -3188,26 +3330,26 @@ relocate_debug (output, input)
   input_bfd = input;
   /* FIXME: Check return value.  I'm not sure whether it needs to read
      the entire buffer or not.  */
-  bfd_read ((PTR) input_ptr_start, 1, IBS, input);
+  bfd_bread ((PTR) input_ptr_start, (bfd_size_type) IBS, input);
   block ();
 }
 
 /* Gather together all the debug information from each input BFD into
    one place, relocating it and emitting it as we go.  */
 
-static boolean
+static bfd_boolean
 ieee_write_debug_part (abfd)
      bfd *abfd;
 {
   ieee_data_type *ieee = IEEE_DATA (abfd);
   bfd_chain_type *chain = ieee->chain_root;
-  unsigned char output_buffer[OBS];
-  boolean some_debug = false;
+  unsigned char obuff[OBS];
+  bfd_boolean some_debug = FALSE;
   file_ptr here = bfd_tell (abfd);
 
-  output_ptr_start = output_ptr = output_buffer;
-  output_ptr_end = output_buffer + OBS;
-  output_ptr = output_buffer;
+  output_ptr_start = output_ptr = obuff;
+  output_ptr_end = obuff + OBS;
+  output_ptr = obuff;
   output_bfd = abfd;
 
   if (chain == (bfd_chain_type *) NULL)
@@ -3220,12 +3362,12 @@ ieee_write_debug_part (abfd)
       if (s == NULL)
        {
          ieee->w.r.debug_information_part = 0;
-         return true;
+         return TRUE;
        }
 
       ieee->w.r.debug_information_part = here;
-      if (bfd_write (s->contents, 1, s->_raw_size, abfd) != s->_raw_size)
-       return false;
+      if (bfd_bwrite (s->contents, s->_raw_size, abfd) != s->_raw_size)
+       return FALSE;
     }
   else
     {
@@ -3236,9 +3378,8 @@ ieee_write_debug_part (abfd)
          if (entry_ieee->w.r.debug_information_part)
            {
              if (bfd_seek (entry, entry_ieee->w.r.debug_information_part,
-                           SEEK_SET)
-                 != 0)
-               return false;
+                           SEEK_SET) != 0)
+               return FALSE;
              relocate_debug (abfd, entry);
            }
 
@@ -3256,12 +3397,12 @@ ieee_write_debug_part (abfd)
       flush ();
     }
 
-  return true;
+  return TRUE;
 }
 
 /* Write the data in an ieee way.  */
 
-static boolean
+static bfd_boolean
 ieee_write_data_part (abfd)
      bfd *abfd;
 {
@@ -3280,20 +3421,20 @@ ieee_write_data_part (abfd)
       if (s->reloc_count != 0)
        {
          if (! do_with_relocs (abfd, s))
-           return false;
+           return FALSE;
        }
       else
        {
          if (! do_without_relocs (abfd, s))
-           return false;
+           return FALSE;
        }
     }
 
-  return true;
+  return TRUE;
 }
 
 
-static boolean
+static bfd_boolean
 init_for_output (abfd)
      bfd *abfd;
 {
@@ -3304,12 +3445,13 @@ init_for_output (abfd)
        continue;
       if (s->_raw_size != 0)
        {
-         ieee_per_section (s)->data = (bfd_byte *) (bfd_alloc (abfd, s->_raw_size));
+         bfd_size_type size = s->_raw_size;
+         ieee_per_section (s)->data = (bfd_byte *) (bfd_alloc (abfd, size));
          if (!ieee_per_section (s)->data)
-           return false;
+           return FALSE;
        }
     }
-  return true;
+  return TRUE;
 }
 \f
 /** exec and core file sections */
@@ -3317,7 +3459,7 @@ init_for_output (abfd)
 /* set section contents is complicated with IEEE since the format is
 * not a byte image, but a record stream.
 */
-boolean
+static bfd_boolean
 ieee_set_section_contents (abfd, section, location, offset, count)
      bfd *abfd;
      sec_ptr section;
@@ -3329,26 +3471,26 @@ ieee_set_section_contents (abfd, section, location, offset, count)
     {
       if (section->contents == NULL)
        {
-         section->contents = ((unsigned char *)
-                              bfd_alloc (abfd, section->_raw_size));
+         bfd_size_type size = section->_raw_size;
+         section->contents = (unsigned char *) bfd_alloc (abfd, size);
          if (section->contents == NULL)
-           return false;
+           return FALSE;
        }
       /* bfd_set_section_contents has already checked that everything
          is within range.  */
-      memcpy (section->contents + offset, location, count);
-      return true;
+      memcpy (section->contents + offset, location, (size_t) count);
+      return TRUE;
     }
 
   if (ieee_per_section (section)->data == (bfd_byte *) NULL)
     {
       if (!init_for_output (abfd))
-       return false;
+       return FALSE;
     }
   memcpy ((PTR) (ieee_per_section (section)->data + offset),
          (PTR) location,
          (unsigned int) count);
-  return true;
+  return TRUE;
 }
 
 /* Write the external symbols of a file.  IEEE considers two sorts of
@@ -3356,7 +3498,7 @@ ieee_set_section_contents (abfd, section, location, offset, count)
    forms to index them as well.  When we write them out we turn their
    symbol values into indexes from the right base.  */
 
-static boolean
+static bfd_boolean
 ieee_write_external_part (abfd)
      bfd *abfd;
 {
@@ -3366,7 +3508,7 @@ ieee_write_external_part (abfd)
   unsigned int reference_index = IEEE_REFERENCE_BASE;
   unsigned int public_index = IEEE_PUBLIC_BASE + 2;
   file_ptr here = bfd_tell (abfd);
-  boolean hadone = false;
+  bfd_boolean hadone = FALSE;
   if (abfd->outsymbols != (asymbol **) NULL)
     {
 
@@ -3377,46 +3519,46 @@ ieee_write_external_part (abfd)
            {
              /* This must be a symbol reference .. */
              if (! ieee_write_byte (abfd, ieee_external_reference_enum)
-                 || ! ieee_write_int (abfd, reference_index)
+                 || ! ieee_write_int (abfd, (bfd_vma) reference_index)
                  || ! ieee_write_id (abfd, p->name))
-               return false;
+               return FALSE;
              p->value = reference_index;
              reference_index++;
-             hadone = true;
+             hadone = TRUE;
            }
          else if (bfd_is_com_section (p->section))
            {
              /* This is a weak reference */
              if (! ieee_write_byte (abfd, ieee_external_reference_enum)
-                 || ! ieee_write_int (abfd, reference_index)
+                 || ! ieee_write_int (abfd, (bfd_vma) reference_index)
                  || ! ieee_write_id (abfd, p->name)
                  || ! ieee_write_byte (abfd,
                                        ieee_weak_external_reference_enum)
-                 || ! ieee_write_int (abfd, reference_index)
+                 || ! ieee_write_int (abfd, (bfd_vma) reference_index)
                  || ! ieee_write_int (abfd, p->value))
-               return false;
+               return FALSE;
              p->value = reference_index;
              reference_index++;
-             hadone = true;
+             hadone = TRUE;
            }
          else if (p->flags & BSF_GLOBAL)
            {
              /* This must be a symbol definition */
 
              if (! ieee_write_byte (abfd, ieee_external_symbol_enum)
-                 || ! ieee_write_int (abfd, public_index)
+                 || ! ieee_write_int (abfd, (bfd_vma) public_index)
                  || ! ieee_write_id (abfd, p->name)
                  || ! ieee_write_2bytes (abfd, ieee_attribute_record_enum)
-                 || ! ieee_write_int (abfd, public_index)
+                 || ! ieee_write_int (abfd, (bfd_vma) public_index)
                  || ! ieee_write_byte (abfd, 15) /* instruction address */
                  || ! ieee_write_byte (abfd, 19) /* static symbol */
                  || ! ieee_write_byte (abfd, 1)) /* one of them */
-               return false;
+               return FALSE;
 
              /* Write out the value */
              if (! ieee_write_2bytes (abfd, ieee_value_record_enum)
-                 || ! ieee_write_int (abfd, public_index))
-               return false;
+                 || ! ieee_write_int (abfd, (bfd_vma) public_index))
+               return FALSE;
              if (! bfd_is_abs_section (p->section))
                {
                  if (abfd->flags & EXEC_P)
@@ -3428,7 +3570,7 @@ ieee_write_external_part (abfd)
                              (p->value
                               + p->section->output_offset
                               + p->section->output_section->vma))))
-                       return false;
+                       return FALSE;
                    }
                  else
                    {
@@ -3436,8 +3578,8 @@ ieee_write_external_part (abfd)
                             (abfd,
                              p->value + p->section->output_offset,
                              p->section->output_section->symbol,
-                             false, 0)))
-                       return false;
+                             FALSE, 0)))
+                       return FALSE;
                    }
                }
              else
@@ -3445,12 +3587,12 @@ ieee_write_external_part (abfd)
                  if (! ieee_write_expression (abfd,
                                               p->value,
                                               bfd_abs_section_ptr->symbol,
-                                              false, 0))
-                   return false;
+                                              FALSE, 0))
+                   return FALSE;
                }
              p->value = public_index;
              public_index++;
-             hadone = true;
+             hadone = TRUE;
            }
          else
            {
@@ -3462,11 +3604,11 @@ ieee_write_external_part (abfd)
   if (hadone)
     ieee->w.r.external_part = here;
 
-  return true;
+  return TRUE;
 }
 
 
-static CONST unsigned char exten[] =
+static const unsigned char exten[] =
 {
   0xf0, 0x20, 0x00,
   0xf1, 0xce, 0x20, 0x00, 37, 3, 3,    /* Set version 3 rev 3          */
@@ -3474,7 +3616,7 @@ static CONST unsigned char exten[] =
   0xf1, 0xce, 0x20, 0x00, 38   /* set object type relocateable to x */
 };
 
-static CONST unsigned char envi[] =
+static const unsigned char envi[] =
 {
   0xf0, 0x21, 0x00,
 
@@ -3487,7 +3629,7 @@ static CONST unsigned char envi[] =
 /*    0xf1, 0xce, 0x21, 0, 54, 2,1,1   tool & version # */
 };
 
-static boolean
+static bfd_boolean
 ieee_write_me_part (abfd)
      bfd *abfd;
 {
@@ -3499,17 +3641,17 @@ ieee_write_me_part (abfd)
          || ! ieee_write_byte (abfd, ieee_function_either_open_b_enum)
          || ! ieee_write_int (abfd, abfd->start_address)
          || ! ieee_write_byte (abfd, ieee_function_either_close_b_enum))
-       return false;
+       return FALSE;
     }
   ieee->w.r.me_record = bfd_tell (abfd);
   if (! ieee_write_byte (abfd, ieee_module_end_enum))
-    return false;
-  return true;
+    return FALSE;
+  return TRUE;
 }
 
 /* Write out the IEEE processor ID.  */
 
-static boolean
+static bfd_boolean
 ieee_write_processor (abfd)
      bfd *abfd;
 {
@@ -3520,22 +3662,22 @@ ieee_write_processor (abfd)
     {
     default:
       if (! ieee_write_id (abfd, bfd_printable_name (abfd)))
-       return false;
+       return FALSE;
       break;
 
     case bfd_arch_a29k:
       if (! ieee_write_id (abfd, "29000"))
-       return false;
+       return FALSE;
       break;
 
     case bfd_arch_h8300:
       if (! ieee_write_id (abfd, "H8/300"))
-       return false;
+       return FALSE;
       break;
 
     case bfd_arch_h8500:
       if (! ieee_write_id (abfd, "H8/500"))
-       return false;
+       return FALSE;
       break;
 
     case bfd_arch_i960:
@@ -3545,23 +3687,23 @@ ieee_write_processor (abfd)
        case bfd_mach_i960_core:
        case bfd_mach_i960_ka_sa:
          if (! ieee_write_id (abfd, "80960KA"))
-           return false;
+           return FALSE;
          break;
 
        case bfd_mach_i960_kb_sb:
          if (! ieee_write_id (abfd, "80960KB"))
-           return false;
+           return FALSE;
          break;
 
        case bfd_mach_i960_ca:
          if (! ieee_write_id (abfd, "80960CA"))
-           return false;
+           return FALSE;
          break;
 
        case bfd_mach_i960_mc:
        case bfd_mach_i960_xa:
          if (! ieee_write_id (abfd, "80960MC"))
-           return false;
+           return FALSE;
          break;
        }
       break;
@@ -3581,18 +3723,22 @@ ieee_write_processor (abfd)
          case bfd_mach_m68040: id = "68040"; break;
          case bfd_mach_m68060: id = "68060"; break;
          case bfd_mach_cpu32:  id = "cpu32"; break;
+         case bfd_mach_mcf5200:id = "5200";  break;
+         case bfd_mach_mcf5206e:id = "5206e"; break;
+         case bfd_mach_mcf5307:id = "5307";  break;
+         case bfd_mach_mcf5407:id = "5407";  break;
          }
 
        if (! ieee_write_id (abfd, id))
-         return false;
+         return FALSE;
       }
       break;
     }
 
-  return true;
+  return TRUE;
 }
 
-boolean
+static bfd_boolean
 ieee_write_object_contents (abfd)
      bfd *abfd;
 {
@@ -3602,47 +3748,49 @@ ieee_write_object_contents (abfd)
 
   /* Fast forward over the header area */
   if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0)
-    return false;
+    return FALSE;
 
   if (! ieee_write_byte (abfd, ieee_module_beginning_enum)
       || ! ieee_write_processor (abfd)
       || ! ieee_write_id (abfd, abfd->filename))
-    return false;
+    return FALSE;
 
   /* Fast forward over the variable bits */
   if (! ieee_write_byte (abfd, ieee_address_descriptor_enum))
-    return false;
+    return FALSE;
 
   /* Bits per MAU */
   if (! ieee_write_byte (abfd, (bfd_byte) (bfd_arch_bits_per_byte (abfd))))
-    return false;
+    return FALSE;
   /* MAU's per address */
   if (! ieee_write_byte (abfd,
                         (bfd_byte) (bfd_arch_bits_per_address (abfd)
                                     / bfd_arch_bits_per_byte (abfd))))
-    return false;
+    return FALSE;
 
   old = bfd_tell (abfd);
   if (bfd_seek (abfd, (file_ptr) (8 * N_W_VARIABLES), SEEK_CUR) != 0)
-    return false;
+    return FALSE;
 
   ieee->w.r.extension_record = bfd_tell (abfd);
-  if (bfd_write ((char *) exten, 1, sizeof (exten), abfd) != sizeof (exten))
-    return false;
+  if (bfd_bwrite ((char *) exten, (bfd_size_type) sizeof (exten), abfd)
+      != sizeof (exten))
+    return FALSE;
   if (abfd->flags & EXEC_P)
     {
       if (! ieee_write_byte (abfd, 0x1)) /* Absolute */
-       return false;
+       return FALSE;
     }
   else
     {
       if (! ieee_write_byte (abfd, 0x2)) /* Relocateable */
-       return false;
+       return FALSE;
     }
 
   ieee->w.r.environmental_record = bfd_tell (abfd);
-  if (bfd_write ((char *) envi, 1, sizeof (envi), abfd) != sizeof (envi))
-    return false;
+  if (bfd_bwrite ((char *) envi, (bfd_size_type) sizeof (envi), abfd)
+      != sizeof (envi))
+    return FALSE;
 
   /* The HP emulator database requires a timestamp in the file.  */
   {
@@ -3655,13 +3803,13 @@ ieee_write_object_contents (abfd)
        || ! ieee_write_byte (abfd, 0x21)
        || ! ieee_write_byte (abfd, 0)
        || ! ieee_write_byte (abfd, 50)
-       || ! ieee_write_int (abfd, t->tm_year + 1900)
-       || ! ieee_write_int (abfd, t->tm_mon + 1)
-       || ! ieee_write_int (abfd, t->tm_mday)
-       || ! ieee_write_int (abfd, t->tm_hour)
-       || ! ieee_write_int (abfd, t->tm_min)
-       || ! ieee_write_int (abfd, t->tm_sec))
-      return false;
+       || ! ieee_write_int (abfd, (bfd_vma) (t->tm_year + 1900))
+       || ! ieee_write_int (abfd, (bfd_vma) (t->tm_mon + 1))
+       || ! ieee_write_int (abfd, (bfd_vma) t->tm_mday)
+       || ! ieee_write_int (abfd, (bfd_vma) t->tm_hour)
+       || ! ieee_write_int (abfd, (bfd_vma) t->tm_min)
+       || ! ieee_write_int (abfd, (bfd_vma) t->tm_sec))
+      return FALSE;
   }
 
   output_bfd = abfd;
@@ -3669,11 +3817,11 @@ ieee_write_object_contents (abfd)
   flush ();
 
   if (! ieee_write_section_part (abfd))
-    return false;
+    return FALSE;
   /* First write the symbols.  This changes their values into table
     indeces so we cant use it after this point.  */
   if (! ieee_write_external_part (abfd))
-    return false;
+    return FALSE;
 
   /*  ieee_write_byte(abfd, ieee_record_seperator_enum);*/
 
@@ -3682,31 +3830,31 @@ ieee_write_object_contents (abfd)
 
   /* Write any debugs we have been told about.  */
   if (! ieee_write_debug_part (abfd))
-    return false;
+    return FALSE;
 
   /* Can only write the data once the symbols have been written, since
      the data contains relocation information which points to the
      symbols.  */
   if (! ieee_write_data_part (abfd))
-    return false;
+    return FALSE;
 
   /* At the end we put the end!  */
   if (! ieee_write_me_part (abfd))
-    return false;
+    return FALSE;
 
   /* Generate the header */
   if (bfd_seek (abfd, old, SEEK_SET) != 0)
-    return false;
+    return FALSE;
 
   for (i = 0; i < N_W_VARIABLES; i++)
     {
       if (! ieee_write_2bytes (abfd, ieee_assign_value_to_variable_enum)
          || ! ieee_write_byte (abfd, (bfd_byte) i)
-         || ! ieee_write_int5_out (abfd, ieee->w.offset[i]))
-       return false;
+         || ! ieee_write_int5_out (abfd, (bfd_vma) ieee->w.offset[i]))
+       return FALSE;
     }
 
-  return true;
+  return TRUE;
 }
 \f
 /* Native-level interface to symbols. */
@@ -3715,12 +3863,12 @@ ieee_write_object_contents (abfd)
    function exits.  We read the strings into a buffer large enough to
    hold them all plus all the cached symbol entries. */
 
-asymbol *
+static asymbol *
 ieee_make_empty_symbol (abfd)
      bfd *abfd;
 {
-  ieee_symbol_type *new =
-    (ieee_symbol_type *) bfd_zalloc (abfd, sizeof (ieee_symbol_type));
+  bfd_size_type amt = sizeof (ieee_symbol_type);
+  ieee_symbol_type *new = (ieee_symbol_type *) bfd_zalloc (abfd, amt);
   if (!new)
     return NULL;
   new->symbol.the_bfd = abfd;
@@ -3739,7 +3887,7 @@ ieee_openr_next_archived_file (arch, prev)
       /* Reset the index - the first two entries are bogus*/
       ar->element_index = 2;
     }
-  while (true)
+  while (TRUE)
     {
       ieee_ar_obstack_type *p = ar->elements + ar->element_index;
       ar->element_index++;
@@ -3764,14 +3912,9 @@ ieee_openr_next_archived_file (arch, prev)
     }
 }
 
-static boolean
-ieee_find_nearest_line (abfd,
-                       section,
-                       symbols,
-                       offset,
-                       filename_ptr,
-                       functionname_ptr,
-                       line_ptr)
+static bfd_boolean
+ieee_find_nearest_line (abfd, section, symbols, offset, filename_ptr,
+                       functionname_ptr, line_ptr)
      bfd *abfd ATTRIBUTE_UNUSED;
      asection *section ATTRIBUTE_UNUSED;
      asymbol **symbols ATTRIBUTE_UNUSED;
@@ -3780,7 +3923,7 @@ ieee_find_nearest_line (abfd,
      const char **functionname_ptr ATTRIBUTE_UNUSED;
      unsigned int *line_ptr ATTRIBUTE_UNUSED;
 {
-  return false;
+  return FALSE;
 }
 
 static int
@@ -3818,7 +3961,7 @@ ieee_generic_stat_arch_elt (abfd, buf)
 static int
 ieee_sizeof_headers (abfd, x)
      bfd *abfd ATTRIBUTE_UNUSED;
-     boolean x ATTRIBUTE_UNUSED;
+     bfd_boolean x ATTRIBUTE_UNUSED;
 {
   return 0;
 }
@@ -3856,9 +3999,9 @@ ieee_bfd_debug_info_accumulate (abfd, section)
   if (section->owner->xvec != abfd->xvec)
     return;
   /* Only bother once per bfd */
-  if (ieee->done_debug == true)
+  if (ieee->done_debug)
     return;
-  ieee->done_debug = true;
+  ieee->done_debug = TRUE;
 
   /* Don't bother if there is no debug info */
   if (ieee->w.r.debug_information_part == 0)
@@ -3867,7 +4010,8 @@ ieee_bfd_debug_info_accumulate (abfd, section)
 
   /* Add to chain */
   {
-    bfd_chain_type *n = (bfd_chain_type *) bfd_alloc (abfd, sizeof (bfd_chain_type));
+    bfd_size_type amt = sizeof (bfd_chain_type);
+    bfd_chain_type *n = (bfd_chain_type *) bfd_alloc (abfd, amt);
     if (!n)
       abort ();                /* FIXME */
     n->this = section->owner;
@@ -3894,11 +4038,12 @@ ieee_bfd_debug_info_accumulate (abfd, section)
 #define ieee_slurp_armap bfd_true
 #define ieee_slurp_extended_name_table bfd_true
 #define ieee_construct_extended_name_table \
-  ((boolean (*) PARAMS ((bfd *, char **, bfd_size_type *, const char **))) \
+  ((bfd_boolean (*) \
+    PARAMS ((bfd *, char **, bfd_size_type *, const char **))) \
    bfd_true)
 #define ieee_truncate_arname bfd_dont_truncate_arname
 #define ieee_write_armap \
-  ((boolean (*) \
+  ((bfd_boolean (*) \
     PARAMS ((bfd *, unsigned int, struct orl *, unsigned int, int))) \
    bfd_true)
 #define ieee_read_ar_hdr bfd_nullvoidptr
@@ -3921,8 +4066,12 @@ ieee_bfd_debug_info_accumulate (abfd, section)
   bfd_generic_get_relocated_section_contents
 #define ieee_bfd_relax_section bfd_generic_relax_section
 #define ieee_bfd_gc_sections bfd_generic_gc_sections
+#define ieee_bfd_merge_sections bfd_generic_merge_sections
+#define ieee_bfd_discard_group bfd_generic_discard_group
 #define ieee_bfd_link_hash_table_create _bfd_generic_link_hash_table_create
+#define ieee_bfd_link_hash_table_free _bfd_generic_link_hash_table_free
 #define ieee_bfd_link_add_symbols _bfd_generic_link_add_symbols
+#define ieee_bfd_link_just_syms _bfd_generic_link_just_syms
 #define ieee_bfd_final_link _bfd_generic_final_link
 #define ieee_bfd_link_split_section  _bfd_generic_link_split_section
 
@@ -3966,17 +4115,44 @@ const bfd_target ieee_vec =
     bfd_false,
   },
 
+  /* ieee_close_and_cleanup, ieee_bfd_free_cached_info, ieee_new_section_hook,
+     ieee_get_section_contents, ieee_get_section_contents_in_window  */
   BFD_JUMP_TABLE_GENERIC (ieee),
+
   BFD_JUMP_TABLE_COPY (_bfd_generic),
   BFD_JUMP_TABLE_CORE (_bfd_nocore),
+
+  /* ieee_slurp_armap, ieee_slurp_extended_name_table,
+     ieee_construct_extended_name_table, ieee_truncate_arname,
+     ieee_write_armap, ieee_read_ar_hdr, ieee_openr_next_archived_file,
+     ieee_get_elt_at_index, ieee_generic_stat_arch_elt,
+     ieee_update_armap_timestamp  */
   BFD_JUMP_TABLE_ARCHIVE (ieee),
+
+  /* ieee_get_symtab_upper_bound, ieee_get_symtab, ieee_make_empty_symbol,
+     ieee_print_symbol, ieee_get_symbol_info, ieee_bfd_is_local_label_name,
+     ieee_get_lineno, ieee_find_nearest_line, ieee_bfd_make_debug_symbol,
+     ieee_read_minisymbols, ieee_minisymbol_to_symbol  */
   BFD_JUMP_TABLE_SYMBOLS (ieee),
+
+  /* ieee_get_reloc_upper_bound, ieee_canonicalize_reloc,
+     ieee_bfd_reloc_type_lookup  */
   BFD_JUMP_TABLE_RELOCS (ieee),
+
+  /* ieee_set_arch_mach, ieee_set_section_contents  */
   BFD_JUMP_TABLE_WRITE (ieee),
+
+  /* ieee_sizeof_headers, ieee_bfd_get_relocated_section_contents,
+     ieee_bfd_relax_section, ieee_bfd_link_hash_table_create,
+     _bfd_generic_link_hash_table_free,
+     ieee_bfd_link_add_symbols, ieee_bfd_final_link,
+     ieee_bfd_link_split_section, ieee_bfd_gc_sections,
+     ieee_bfd_merge_sections  */
   BFD_JUMP_TABLE_LINK (ieee),
+
   BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
 
   NULL,
-  
+
   (PTR) 0
 };
This page took 0.085992 seconds and 4 git commands to generate.