fix seg fault in reloc reading code
[deliverable/binutils-gdb.git] / binutils / objcopy.c
index 1bf56b9adf724df54384a630004e2e6f3d14bc2b..cae66fc87fbaae7674281cf476216939521052d5 100644 (file)
@@ -1,5 +1,5 @@
 /* objcopy.c -- copy object file from input to output, optionally massaging it.
-   Copyright (C) 1991, 92, 93, 94, 95, 96, 97, 1998
+   Copyright (C) 1991, 92, 93, 94, 95, 96, 97, 98, 99, 2000, 2001
    Free Software Foundation, Inc.
 
    This file is part of GNU Binutils.
 #include "getopt.h"
 #include "libiberty.h"
 #include "budbg.h"
+#include "filenames.h"
 #include <sys/stat.h>
 
-#ifdef HAVE_GOOD_UTIME_H
-#include <utime.h>
-#else /* ! HAVE_GOOD_UTIME_H */
-#ifdef HAVE_UTIMES
-#include <sys/time.h>
-#endif /* HAVE_UTIMES */
-#endif /* ! HAVE_GOOD_UTIME_H */
-
 /* A list of symbols to explicitly strip out, or to keep.  A linked
    list is good enough for a small number from the command line, but
    this will slow things down a lot if many symbols are being
@@ -46,6 +39,14 @@ struct symlist
   struct symlist *next;
 };
 
+/* A list to support redefine_sym.  */
+struct redefine_node
+{
+  char *source;
+  char *target;
+  struct redefine_node *next;
+};
+
 static void copy_usage PARAMS ((FILE *, int));
 static void strip_usage PARAMS ((FILE *, int));
 static flagword parse_flags PARAMS ((const char *));
@@ -66,13 +67,12 @@ static void copy_object PARAMS ((bfd *, bfd *));
 static void copy_archive PARAMS ((bfd *, bfd *, const char *));
 static void copy_file
   PARAMS ((const char *, const char *, const char *, const char *));
-static int simple_copy PARAMS ((const char *, const char *));
-static int smart_rename PARAMS ((const char *, const char *));
-static void set_times PARAMS ((const char *, const struct stat *));
 static int strip_main PARAMS ((int, char **));
 static int copy_main PARAMS ((int, char **));
+static const char *lookup_sym_redefinition PARAMS((const char *));
+static void redefine_list_append PARAMS ((const char *, const char *));
 
-#define RETURN_NONFATAL(s) {bfd_nonfatal(s); status = 1; return;}
+#define RETURN_NONFATAL(s) {bfd_nonfatal (s); status = 1; return;}
 
 static asymbol **isympp = NULL;        /* Input symbols */
 static asymbol **osympp = NULL;        /* Output symbols that survive stripping */
@@ -122,6 +122,7 @@ struct section_list
   const char *          name;      /* Section name.  */
   boolean               used;      /* Whether this entry was used.  */
   boolean               remove;    /* Whether to remove this section.  */
+  boolean              copy;      /* Whether to copy this section.  */
   enum change_action    change_vma;/* Whether to change or set VMA.  */
   bfd_vma              vma_val;   /* Amount to change by or set to.  */
   enum change_action    change_lma;/* Whether to change or set LMA.  */
@@ -132,6 +133,7 @@ struct section_list
 
 static struct section_list *change_sections;
 static boolean sections_removed;
+static boolean sections_copied;
 
 /* Changes to the start address.  */
 static bfd_vma change_start = 0;
@@ -181,12 +183,13 @@ static boolean change_leading_char = false;
 
 static boolean remove_leading_char = false;
 
-/* List of symbols to strip, keep, localize, and weaken.  */
+/* List of symbols to strip, keep, localize, weaken, or redefine.  */
 
 static struct symlist *strip_specific_list = NULL;
 static struct symlist *keep_specific_list = NULL;
 static struct symlist *localize_specific_list = NULL;
 static struct symlist *weaken_specific_list = NULL;
+static struct redefine_node *redefine_sym_list = NULL;
 
 /* If this is true, we weaken global symbols (set BSF_WEAK).  */
 
@@ -211,6 +214,9 @@ static boolean weaken = false;
 #define OPTION_SET_START (OPTION_SET_SECTION_FLAGS + 1)
 #define OPTION_STRIP_UNNEEDED (OPTION_SET_START + 1)
 #define OPTION_WEAKEN (OPTION_STRIP_UNNEEDED + 1)
+#define OPTION_REDEFINE_SYM (OPTION_WEAKEN + 1)
+#define OPTION_SREC_LEN (OPTION_REDEFINE_SYM + 1)
+#define OPTION_SREC_FORCES3 (OPTION_SREC_LEN + 1)
 
 /* Options to handle if running as "strip".  */
 
@@ -257,6 +263,7 @@ static struct option copy_options[] =
   {"debugging", no_argument, 0, OPTION_DEBUGGING},
   {"discard-all", no_argument, 0, 'x'},
   {"discard-locals", no_argument, 0, 'X'},
+  {"only-section", required_argument, 0, 'j'},
   {"format", required_argument, 0, 'F'}, /* Obsolete */
   {"gap-fill", required_argument, 0, OPTION_GAP_FILL},
   {"help", no_argument, 0, 'h'},
@@ -284,6 +291,9 @@ static struct option copy_options[] =
   {"version", no_argument, 0, 'V'},
   {"weaken", no_argument, 0, OPTION_WEAKEN},
   {"weaken-symbol", required_argument, 0, 'W'},
+  {"redefine-sym", required_argument, 0, OPTION_REDEFINE_SYM},
+  {"srec-len", required_argument, 0, OPTION_SREC_LEN},
+  {"srec-forceS3", no_argument, 0, OPTION_SREC_FORCES3},
   {0, no_argument, 0, 0}
 };
 
@@ -295,38 +305,72 @@ extern char *program_name;
    -1 means if we should use argv[0] to decide. */
 extern int is_strip;
 
+/* The maximum length of an S record.  This variable is declared in srec.c
+   and can be modified by the --srec-len parameter.  */
+extern unsigned int Chunk;
+
+/* Restrict the generation of Srecords to type S3 only.
+   This variable is declare in bfd/srec.c and can be toggled
+   on by the --srec-forceS3 command line switch.  */
+extern boolean S3Forced;
 
 static void
 copy_usage (stream, exit_status)
      FILE *stream;
      int exit_status;
 {
+  fprintf (stream, _("Usage: %s <switches> in-file [out-file]\n"), program_name);
+  fprintf (stream, _(" The switches are:\n"));
   fprintf (stream, _("\
-Usage: %s [-vVSpgxX] [-I bfdname] [-O bfdname] [-F bfdname] [-b byte]\n\
-       [-R section] [-i interleave] [--interleave=interleave] [--byte=byte]\n\
-       [--input-target=bfdname] [--output-target=bfdname] [--target=bfdname]\n\
-       [--strip-all] [--strip-debug] [--strip-unneeded] [--discard-all]\n\
-       [--discard-locals] [--debugging] [--remove-section=section]\n"),
-          program_name);
-  fprintf (stream, _("\
-       [--gap-fill=val] [--pad-to=address] [--preserve-dates]\n\
-       [--set-start=val]
-       [--change-start=incr] [--change-addresses=incr]
-       (--adjust-start   and  --adjust-vma are aliases for these two)
-       [--change-section-address=section{=,+,-}val]\n\
-       (--adjust-section-vma is an alias for --change-section-address)\n\
-       [--change-section-lma=section{=,+,-}val]\n\
-       [--change-section-vma=section{=,+,-}val]\n\
-       [--adjust-warnings] [--no-adjust-warnings]\n\
-       [--change-warnings] [--no-change-warnings]\n\
-       [--set-section-flags=section=flags] [--add-section=sectionname=filename]\n\
-       [--keep-symbol symbol] [-K symbol] [--strip-symbol symbol] [-N symbol]\n\
-       [--localize-symbol symbol] [-L symbol] [--weaken-symbol symbol]\n\
-       [-W symbol] [--change-leading-char] [--remove-leading-char] [--weaken]\n\
-       [--verbose] [--version] [--help] in-file [out-file]\n"));
+  -I --input-target <bfdname>      Assume input file is in format <bfdname>\n\
+  -O --output-target <bfdname>     Create an output file in format <bfdname>\n\
+  -F --target <bfdname>            Set both input and output format to <bfdname>\n\
+     --debugging                   Convert debugging information, if possible\n\
+  -p --preserve-dates              Copy modified/access timestamps to the output\n\
+  -j --only-section <name>         Only copy section <name> into the output\n\
+  -R --remove-section <name>       Remove section <name> from the output\n\
+  -S --strip-all                   Remove all symbol and relocation information\n\
+  -g --strip-debug                 Remove all debugging symbols\n\
+     --strip-unneeded              Remove all symbols not needed by relocations\n\
+  -N --strip-symbol <name>         Do not copy symbol <name>\n\
+  -K --keep-symbol <name>          Only copy symbol <name>\n\
+  -L --localize-symbol <name>      Force symbol <name> to be marked as a local\n\
+  -W --weaken-symbol <name>        Force symbol <name> to be marked as a weak\n\
+     --weaken                      Force all global symbols to be marked as weak\n\
+  -x --discard-all                 Remove all non-global symbols\n\
+  -X --discard-locals              Remove any compiler-generated symbols\n\
+  -i --interleave <number>         Only copy one out of every <number> bytes\n\
+  -b --byte <num>                  Select byte <num> in every interleaved block\n\
+     --gap-fill <val>              Fill gaps between sections with <val>\n\
+     --pad-to <addr>               Pad the last section up to address <addr>\n\
+     --set-start <addr>            Set the start address to <addr>\n\
+    {--change-start|--adjust-start} <incr>\n\
+                                   Add <incr> to the start address\n\
+    {--change-addresses|--adjust-vma} <incr>\n\
+                                   Add <incr> to LMA, VMA and start addresses\n\
+    {--change-section-address|--adjust-section-vma} <name>{=|+|-}<val>\n\
+                                   Change LMA and VMA of section <name> by <val>\n\
+     --change-section-lma <name>{=|+|-}<val>\n\
+                                   Change the LMA of section <name> by <val>\n\
+     --change-section-vma <name>{=|+|-}<val>\n\
+                                   Change the VMA of section <name> by <val>\n\
+    {--[no-]change-warnings|--[no-]adjust-warnings}\n\
+                                   Warn if a named section does not exist\n\
+     --set-section-flags <name>=<flags>\n\
+                                   Set section <name>'s properties to <flags>\n\
+     --add-section <name>=<file>   Add section <name> found in <file> to output\n\
+     --change-leading-char         Force output format's leading character style\n\
+     --remove-leading-char         Remove leading character from global symbols\n\
+     --redefine-sym <old>=<new>    Redefine symbol name <old> to <new>\n\
+     --srec-len <number>           Restrict the length of generated Srecords\n\
+     --srec-forceS3                Restrict the type of generated Srecords to S3\n\
+  -v --verbose                     List all object files modified\n\
+  -V --version                     Display this program's version number\n\
+  -h --help                        Display this output\n\
+"));
   list_supported_targets (program_name, stream);
   if (exit_status == 0)
-    fprintf (stream, _("Report bugs to bug-gnu-utils@gnu.org\n"));
+    fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
   exit (exit_status);
 }
 
@@ -335,17 +379,30 @@ strip_usage (stream, exit_status)
      FILE *stream;
      int exit_status;
 {
+  fprintf (stream, _("Usage: %s <switches> in-file(s)\n"), program_name);
+  fprintf (stream, _(" The switches are:\n"));
   fprintf (stream, _("\
-Usage: %s [-vVsSpgxX] [-I bfdname] [-O bfdname] [-F bfdname] [-R section]\n\
-       [--input-target=bfdname] [--output-target=bfdname] [--target=bfdname]\n\
-       [--strip-all] [--strip-debug] [--strip-unneeded] [--discard-all]\n\
-       [--discard-locals] [--keep-symbol symbol] [-K symbol]\n\
-       [--strip-symbol symbol] [-N symbol] [--remove-section=section]\n\
-       [-o file] [--preserve-dates] [--verbose] [--version] [--help] file...\n"),
-          program_name);
+  -I --input-target <bfdname>      Assume input file is in format <bfdname>\n\
+  -O --output-target <bfdname>     Create an output file in format <bfdname>\n\
+  -F --target <bfdname>            Set both input and output format to <bfdname>\n\
+  -p --preserve-dates              Copy modified/access timestamps to the output\n\
+  -R --remove-section <name>       Remove section <name> from the output\n\
+  -s --strip-all                   Remove all symbol and relocation information\n\
+  -g -S --strip-debug              Remove all debugging symbols\n\
+     --strip-unneeded              Remove all symbols not needed by relocations\n\
+  -N --strip-symbol <name>         Do not copy symbol <name>\n\
+  -K --keep-symbol <name>          Only copy symbol <name>\n\
+  -x --discard-all                 Remove all non-global symbols\n\
+  -X --discard-locals              Remove any compiler-generated symbols\n\
+  -v --verbose                     List all object files modified\n\
+  -V --version                     Display this program's version number\n\
+  -h --help                        Display this output\n\
+  -o <file>                        Place stripped output into <file>\n\
+"));
+
   list_supported_targets (program_name, stream);
   if (exit_status == 0)
-    fprintf (stream, _("Report bugs to bug-gnu-utils@gnu.org\n"));
+    fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
   exit (exit_status);
 }
 
@@ -378,10 +435,13 @@ parse_flags (s)
   else if (strncasecmp (fname, s, len) == 0) ret |= fval
       PARSE_FLAG ("alloc", SEC_ALLOC);
       PARSE_FLAG ("load", SEC_LOAD);
+      PARSE_FLAG ("noload", SEC_NEVER_LOAD);
       PARSE_FLAG ("readonly", SEC_READONLY);
+      PARSE_FLAG ("debug", SEC_DEBUGGING);
       PARSE_FLAG ("code", SEC_CODE);
       PARSE_FLAG ("data", SEC_DATA);
       PARSE_FLAG ("rom", SEC_ROM);
+      PARSE_FLAG ("share", SEC_SHARED);
       PARSE_FLAG ("contents", SEC_HAS_CONTENTS);
 #undef PARSE_FLAG
       else
@@ -392,7 +452,8 @@ parse_flags (s)
          strncpy (copy, s, len);
          copy[len] = '\0';
          non_fatal (_("unrecognized section flag `%s'"), copy);
-         fatal (_("supported flags: alloc, load, readonly, code, data, rom, contents"));
+         fatal (_("supported flags: %s"),
+                "alloc, load, noload, readonly, debug, code, data, rom, share, contents");
        }
 
       s = snext;
@@ -422,6 +483,7 @@ find_section_list (name, add)
   p->name = name;
   p->used = false;
   p->remove = false;
+  p->copy = false;
   p->change_vma = CHANGE_IGNORE;
   p->change_lma = CHANGE_IGNORE;
   p->vma_val = 0;
@@ -437,7 +499,7 @@ find_section_list (name, add)
 
 /* Add a symbol to strip_specific_list.  */
 
-static void 
+static void
 add_specific_symbol (name, list)
      const char *name;
      struct symlist **list;
@@ -472,7 +534,7 @@ is_specified_symbol (name, list)
 
 static boolean
 is_strip_section (abfd, sec)
-     bfd *abfd;
+     bfd *abfd ATTRIBUTE_UNUSED;
      asection *sec;
 {
   struct section_list *p;
@@ -485,10 +547,15 @@ is_strip_section (abfd, sec)
          || convert_debugging))
     return true;
 
-  if (! sections_removed)
+  if (! sections_removed && ! sections_copied)
     return false;
+
   p = find_section_list (bfd_get_section_name (abfd, sec), false);
-  return p != NULL && p->remove ? true : false;
+  if (sections_removed && p != NULL && p->remove)
+    return true;
+  if (sections_copied && (p == NULL || ! p->copy))
+    return true;
+  return false;
 }
 
 /* Choose which symbol entries to copy; put the result in OSYMS.
@@ -504,6 +571,8 @@ filter_symbols (abfd, obfd, osyms, isyms, symcount)
 {
   register asymbol **from = isyms, **to = osyms;
   long src_count = 0, dst_count = 0;
+  int relocatable = (abfd->flags & (HAS_RELOC | EXEC_P | DYNAMIC))
+                   == HAS_RELOC;
 
   for (; src_count < symcount; src_count++)
     {
@@ -512,6 +581,15 @@ filter_symbols (abfd, obfd, osyms, isyms, symcount)
       const char *name = bfd_asymbol_name (sym);
       int keep;
 
+      if (redefine_sym_list)
+       {
+         const char *old_name, *new_name;
+
+         old_name = bfd_asymbol_name (sym);
+         new_name = lookup_sym_redefinition (old_name);
+         name = bfd_asymbol_name (sym) = new_name;
+       }
+
       if (change_leading_char
          && (bfd_get_symbol_leading_char (abfd)
              != bfd_get_symbol_leading_char (obfd))
@@ -542,7 +620,15 @@ filter_symbols (abfd, obfd, osyms, isyms, symcount)
          && name[0] == bfd_get_symbol_leading_char (abfd))
        name = bfd_asymbol_name (sym) = name + 1;
 
-      if ((flags & BSF_KEEP) != 0)             /* Used in relocation.  */
+      if (strip_symbols == STRIP_ALL)
+       keep = 0;
+      else if ((flags & BSF_KEEP) != 0         /* Used in relocation.  */
+              || ((flags & BSF_SECTION_SYM) != 0
+                  && ((*bfd_get_section (sym)->symbol_ptr_ptr)->flags
+                      & BSF_KEEP) != 0))
+       keep = 1;
+      else if (relocatable                     /* Relocatable file. */
+              && (flags & (BSF_GLOBAL | BSF_WEAK)) != 0)
        keep = 1;
       else if ((flags & BSF_GLOBAL) != 0       /* Global symbol.  */
               || (flags & BSF_WEAK) != 0
@@ -588,6 +674,64 @@ filter_symbols (abfd, obfd, osyms, isyms, symcount)
   return dst_count;
 }
 
+static const char *
+lookup_sym_redefinition (source)
+     const char *source;
+{
+  const char *result;
+  struct redefine_node *list;
+
+  result = source;
+
+  for (list = redefine_sym_list; list != NULL; list = list->next)
+    {
+      if (strcmp (source, list->source) == 0)
+       {
+         result = list->target;
+         break;
+       }
+    }
+  return result;
+}
+
+/* Add a node to a symbol redefine list */
+
+static void
+redefine_list_append (source, target)
+     const char *source;
+     const char *target;
+{
+  struct redefine_node **p;
+  struct redefine_node *list;
+  struct redefine_node *new_node;
+
+  for (p = &redefine_sym_list; (list = *p) != NULL; p = &list->next)
+    {
+      if (strcmp (source, list->source) == 0)
+       {
+         fatal (_("%s: Multiple redefinition of symbol \"%s\""),
+                "--redefine-sym",
+                 source);
+       }
+
+      if (strcmp (target, list->target) == 0)
+       {
+         fatal (_("%s: Symbol \"%s\" is target of more than one redefinition"),
+                "--redefine-sym",
+                 target);
+       }
+    }
+
+  new_node = (struct redefine_node *) xmalloc (sizeof (struct redefine_node));
+
+  new_node->source = strdup (source);
+  new_node->target = strdup (target);
+  new_node->next = NULL;
+
+  *p = new_node;
+}
+
+
 /* Keep only every `copy_byte'th byte in MEMHUNK, which is *SIZE bytes long.
    Adjust *SIZE.  */
 
@@ -600,7 +744,10 @@ filter_bytes (memhunk, size)
 
   for (; from < end; from += interleave)
     *to++ = *from;
-  *size /= interleave;
+  if (*size % interleave > (bfd_size_type) copy_byte)
+    *size = (*size / interleave) + 1;
+  else
+    *size /= interleave;
 }
 
 /* Copy object file IBFD onto OBFD.  */
@@ -615,14 +762,24 @@ copy_object (ibfd, obfd)
   asection **osections = NULL;
   bfd_size_type *gaps = NULL;
   bfd_size_type max_gap = 0;
+  long symsize;
+  PTR dhandle;
+
+  if (ibfd->xvec->byteorder != obfd->xvec->byteorder
+      && ibfd->xvec->byteorder != BFD_ENDIAN_UNKNOWN
+      && obfd->xvec->byteorder != BFD_ENDIAN_UNKNOWN)
+    {
+      fatal (_("Unable to change endianness of input file(s)"));
+      return;
+    }
 
   if (!bfd_set_format (obfd, bfd_get_format (ibfd)))
     RETURN_NONFATAL (bfd_get_filename (obfd));
 
   if (verbose)
     printf (_("copy from %s(%s) to %s(%s)\n"),
-           bfd_get_filename(ibfd), bfd_get_target(ibfd),
-           bfd_get_filename(obfd), bfd_get_target(obfd));
+           bfd_get_filename (ibfd), bfd_get_target (ibfd),
+           bfd_get_filename (obfd), bfd_get_target (obfd));
 
   if (set_start_set)
     start = set_start;
@@ -642,16 +799,17 @@ copy_object (ibfd, obfd)
     non_fatal (_("Warning: Output file cannot represent architecture %s"),
               bfd_printable_arch_mach (bfd_get_arch (ibfd),
                                        bfd_get_mach (ibfd)));
-  
+
   if (!bfd_set_format (obfd, bfd_get_format (ibfd)))
-    RETURN_NONFATAL (bfd_get_filename(ibfd));
+    RETURN_NONFATAL (bfd_get_filename (ibfd));
 
   if (isympp)
     free (isympp);
+
   if (osympp != isympp)
     free (osympp);
 
-  /* bfd mandates that all output sections be created and sizes set before
+  /* BFD mandates that all output sections be created and sizes set before
      any output is done.  Thus, we traverse all sections multiple times.  */
   bfd_map_over_sections (ibfd, setup_section, (void *) obfd);
 
@@ -673,7 +831,7 @@ copy_object (ibfd, obfd)
          else
            {
              flagword flags;
-             
+
              if (! bfd_set_section_size (obfd, padd->section, padd->size))
                RETURN_NONFATAL (bfd_get_filename (obfd));
 
@@ -685,7 +843,7 @@ copy_object (ibfd, obfd)
                flags = pset->flags | SEC_HAS_CONTENTS;
              else
                flags = SEC_HAS_CONTENTS | SEC_READONLY | SEC_DATA;
-             
+
              if (! bfd_set_section_flags (obfd, padd->section, flags))
                RETURN_NONFATAL (bfd_get_filename (obfd));
 
@@ -694,11 +852,11 @@ copy_object (ibfd, obfd)
                  if (pset->change_vma != CHANGE_IGNORE)
                    if (! bfd_set_section_vma (obfd, padd->section, pset->vma_val))
                      RETURN_NONFATAL (bfd_get_filename (obfd));
-                 
+
                  if (pset->change_lma != CHANGE_IGNORE)
                    {
                      padd->section->lma = pset->lma_val;
-                     
+
                      if (! bfd_set_section_alignment
                          (obfd, padd->section,
                           bfd_section_alignment (obfd, padd->section)))
@@ -753,7 +911,7 @@ copy_object (ibfd, obfd)
                    {
                      non_fatal (_("Can't fill gap after %s: %s"),
                               bfd_get_section_name (obfd, osections[i]),
-                              bfd_errmsg (bfd_get_error()));
+                              bfd_errmsg (bfd_get_error ()));
                      status = 1;
                      break;
                    }
@@ -793,63 +951,57 @@ copy_object (ibfd, obfd)
 
   /* Symbol filtering must happen after the output sections have
      been created, but before their contents are set.  */
-  if (strip_symbols == STRIP_ALL)
-    {
-      osympp = isympp = NULL;
-      symcount = 0;
-    }
-  else
-    {
-      long symsize;
-      PTR dhandle = NULL;
-
-      symsize = bfd_get_symtab_upper_bound (ibfd);
-      if (symsize < 0)
-       RETURN_NONFATAL (bfd_get_filename (ibfd));
-
-      osympp = isympp = (asymbol **) xmalloc (symsize);
-      symcount = bfd_canonicalize_symtab (ibfd, isympp);
-      if (symcount < 0)
-       RETURN_NONFATAL (bfd_get_filename (ibfd));
+  dhandle = NULL;
+  symsize = bfd_get_symtab_upper_bound (ibfd);
+  if (symsize < 0)
+    RETURN_NONFATAL (bfd_get_filename (ibfd));
 
-      if (convert_debugging)
-       dhandle = read_debugging_info (ibfd, isympp, symcount);
+  osympp = isympp = (asymbol **) xmalloc (symsize);
+  symcount = bfd_canonicalize_symtab (ibfd, isympp);
+  if (symcount < 0)
+    RETURN_NONFATAL (bfd_get_filename (ibfd));
 
-      if (strip_symbols == STRIP_DEBUG 
-         || strip_symbols == STRIP_UNNEEDED
-         || discard_locals != LOCALS_UNDEF
-         || strip_specific_list != NULL
-         || keep_specific_list != NULL
-         || localize_specific_list != NULL
-         || weaken_specific_list != NULL
-         || sections_removed
-         || convert_debugging
-         || change_leading_char
-         || remove_leading_char
-         || weaken)
-       {
-         /* Mark symbols used in output relocations so that they
-            are kept, even if they are local labels or static symbols.
-
-            Note we iterate over the input sections examining their
-            relocations since the relocations for the output sections
-            haven't been set yet.  mark_symbols_used_in_relocations will
-            ignore input sections which have no corresponding output
-            section.  */
-         bfd_map_over_sections (ibfd,
-                                mark_symbols_used_in_relocations,
-                                (PTR)isympp);
-         osympp = (asymbol **) xmalloc ((symcount + 1) * sizeof (asymbol *));
-         symcount = filter_symbols (ibfd, obfd, osympp, isympp, symcount);
-       }
+  if (convert_debugging)
+    dhandle = read_debugging_info (ibfd, isympp, symcount);
+
+  if (strip_symbols == STRIP_DEBUG
+      || strip_symbols == STRIP_ALL
+      || strip_symbols == STRIP_UNNEEDED
+      || discard_locals != LOCALS_UNDEF
+      || strip_specific_list != NULL
+      || keep_specific_list != NULL
+      || localize_specific_list != NULL
+      || weaken_specific_list != NULL
+      || sections_removed
+      || sections_copied
+      || convert_debugging
+      || change_leading_char
+      || remove_leading_char
+      || redefine_sym_list
+      || weaken)
+    {
+      /* Mark symbols used in output relocations so that they
+        are kept, even if they are local labels or static symbols.
+
+        Note we iterate over the input sections examining their
+        relocations since the relocations for the output sections
+        haven't been set yet.  mark_symbols_used_in_relocations will
+        ignore input sections which have no corresponding output
+        section.  */
+      if (strip_symbols != STRIP_ALL)
+       bfd_map_over_sections (ibfd,
+                              mark_symbols_used_in_relocations,
+                              (PTR)isympp);
+      osympp = (asymbol **) xmalloc ((symcount + 1) * sizeof (asymbol *));
+      symcount = filter_symbols (ibfd, obfd, osympp, isympp, symcount);
+    }
 
-      if (convert_debugging && dhandle != NULL)
+  if (convert_debugging && dhandle != NULL)
+    {
+      if (! write_debugging_info (obfd, dhandle, &symcount, &osympp))
        {
-         if (! write_debugging_info (obfd, dhandle, &symcount, &osympp))
-           {
-             status = 1;
-             return;
-           }
+         status = 1;
+         return;
        }
     }
 
@@ -902,6 +1054,7 @@ copy_object (ibfd, obfd)
                    now = 8192;
                  else
                    now = left;
+
                  if (! bfd_set_section_contents (obfd, osections[i], buf,
                                                  off, now))
                    RETURN_NONFATAL (bfd_get_filename (obfd));
@@ -961,13 +1114,23 @@ copy_archive (ibfd, obfd, output_target)
   list = NULL;
 
   this_element = bfd_openr_next_archived_file (ibfd, NULL);
-  while (this_element != (bfd *) NULL)
+  while (!status && this_element != (bfd *) NULL)
     {
       /* Create an output file for this member.  */
-      char *output_name = concat (dir, "/", bfd_get_filename(this_element),
+      char *output_name = concat (dir, "/", bfd_get_filename (this_element),
                                  (char *) NULL);
       bfd *output_bfd = bfd_openw (output_name, output_target);
       bfd *last_element;
+      struct stat buf;
+      int stat_status = 0;
+
+      if (preserve_dates)
+       {
+         stat_status = bfd_stat_arch_elt (this_element, &buf);
+         if (stat_status != 0)
+           non_fatal (_("internal stat error on %s"),
+                      bfd_get_filename (this_element));
+       }
 
       l = (struct name_list *) xmalloc (sizeof (struct name_list));
       l->name = output_name;
@@ -983,7 +1146,15 @@ copy_archive (ibfd, obfd, output_target)
       if (bfd_check_format (this_element, bfd_object) == true)
        copy_object (this_element, output_bfd);
 
-      bfd_close (output_bfd);
+      if (!bfd_close (output_bfd))
+       {
+         bfd_nonfatal (bfd_get_filename (output_bfd));
+         /* Error in new object file. Don't change archive. */
+         status = 1;
+       }
+
+      if (preserve_dates && stat_status == 0)
+       set_times (output_name, &buf);
 
       /* Open the newly output file and attach to our list.  */
       output_bfd = bfd_openr (output_name, output_target);
@@ -1074,13 +1245,13 @@ copy_file (input_filename, output_filename, input_target, output_target)
   else
     {
       bfd_nonfatal (input_filename);
-      
+
       if (bfd_get_error () == bfd_error_file_ambiguously_recognized)
        {
          list_matching_formats (matching);
          free (matching);
        }
-      
+
       status = 1;
     }
 }
@@ -1097,10 +1268,11 @@ setup_section (ibfd, isection, obfdarg)
   bfd *obfd = (bfd *) obfdarg;
   struct section_list *p;
   sec_ptr osection;
+  bfd_size_type size;
   bfd_vma vma;
   bfd_vma lma;
   flagword flags;
-  char *err;
+  const char *err;
 
   if ((bfd_get_section_flags (ibfd, isection) & SEC_DEBUGGING) != 0
       && (strip_symbols == STRIP_DEBUG
@@ -1114,21 +1286,25 @@ setup_section (ibfd, isection, obfdarg)
   if (p != NULL)
     p->used = true;
 
-  if (p != NULL && p->remove)
+  if (sections_removed && p != NULL && p->remove)
+    return;
+  if (sections_copied && (p == NULL || ! p->copy))
     return;
 
   osection = bfd_make_section_anyway (obfd, bfd_section_name (ibfd, isection));
+
   if (osection == NULL)
     {
-      err = "making";
+      err = _("making");
       goto loser;
     }
 
-  if (!bfd_set_section_size (obfd,
-                            osection,
-                            bfd_section_size (ibfd, isection)))
+  size = bfd_section_size (ibfd, isection);
+  if (copy_byte >= 0)
+    size = (size + interleave - 1) / interleave;
+  if (! bfd_set_section_size (obfd, osection, size))
     {
-      err = "size";
+      err = _("size");
       goto loser;
     }
 
@@ -1139,10 +1315,10 @@ setup_section (ibfd, isection, obfdarg)
     vma = p->vma_val;
   else
     vma += change_section_address;
-  
+
   if (! bfd_set_section_vma (obfd, osection, vma))
     {
-      err = "vma";
+      err = _("vma");
       goto loser;
     }
 
@@ -1154,11 +1330,11 @@ setup_section (ibfd, isection, obfdarg)
       else if (p->change_lma == CHANGE_SET)
        lma = p->lma_val;
       else
-       abort();
+       abort ();
     }
   else
     lma += change_section_address;
-  
+
   osection->lma = lma;
 
   /* FIXME: This is probably not enough.  If we change the LMA we
@@ -1168,7 +1344,7 @@ setup_section (ibfd, isection, obfdarg)
                                 bfd_section_alignment (ibfd, isection))
       == false)
     {
-      err = "alignment";
+      err = _("alignment");
       goto loser;
     }
 
@@ -1177,7 +1353,7 @@ setup_section (ibfd, isection, obfdarg)
     flags = p->flags | (flags & SEC_HAS_CONTENTS);
   if (!bfd_set_section_flags (obfd, osection, flags))
     {
-      err = "flags";
+      err = _("flags");
       goto loser;
     }
 
@@ -1191,7 +1367,7 @@ setup_section (ibfd, isection, obfdarg)
      from the input section to the output section.  */
   if (!bfd_copy_private_section_data (ibfd, isection, obfd, osection))
     {
-      err = "private data";
+      err = _("private data");
       goto loser;
     }
 
@@ -1222,12 +1398,13 @@ copy_section (ibfd, isection, obfdarg)
   long relcount;
   sec_ptr osection;
   bfd_size_type size;
+  long relsize;
 
   /* If we have already failed earlier on, do not keep on generating
      complaints now.  */
   if (status != 0)
     return;
-  
+
   if ((bfd_get_section_flags (ibfd, isection) & SEC_DEBUGGING) != 0
       && (strip_symbols == STRIP_DEBUG
          || strip_symbols == STRIP_UNNEEDED
@@ -1240,7 +1417,9 @@ copy_section (ibfd, isection, obfdarg)
 
   p = find_section_list (bfd_section_name (ibfd, isection), false);
 
-  if (p != NULL && p->remove)
+  if (sections_removed && p != NULL && p->remove)
+    return;
+  if (sections_copied && (p == NULL || ! p->copy))
     return;
 
   osection = isection->output_section;
@@ -1249,27 +1428,40 @@ copy_section (ibfd, isection, obfdarg)
   if (size == 0 || osection == 0)
     return;
 
-  if (strip_symbols == STRIP_ALL)
+
+  relsize = bfd_get_reloc_upper_bound (ibfd, isection);
+  if (relsize < 0)
+    RETURN_NONFATAL (bfd_get_filename (ibfd));
+
+  if (relsize == 0)
     bfd_set_reloc (obfd, osection, (arelent **) NULL, 0);
   else
     {
-      long relsize;
-
-      relsize = bfd_get_reloc_upper_bound (ibfd, isection);
-      if (relsize < 0)
+      relpp = (arelent **) xmalloc (relsize);
+      relcount = bfd_canonicalize_reloc (ibfd, isection, relpp, isympp);
+      if (relcount < 0)
        RETURN_NONFATAL (bfd_get_filename (ibfd));
 
-      if (relsize == 0)
-       bfd_set_reloc (obfd, osection, (arelent **) NULL, 0);
-      else
+      if (strip_symbols == STRIP_ALL)
        {
-         relpp = (arelent **) xmalloc (relsize);
-         relcount = bfd_canonicalize_reloc (ibfd, isection, relpp, isympp);
-         if (relcount < 0)
-           RETURN_NONFATAL (bfd_get_filename (ibfd));
-
-         bfd_set_reloc (obfd, osection, relpp, relcount);
+         /* Remove relocations which are not in
+            keep_strip_specific_list. */
+         arelent **temp_relpp;
+         long temp_relcount = 0;
+         long i;
+
+         temp_relpp = (arelent **) xmalloc (relsize);
+         for (i = 0; i < relcount; i++)
+           if (is_specified_symbol
+               (bfd_asymbol_name (*relpp [i]->sym_ptr_ptr),
+                keep_specific_list))
+             temp_relpp [temp_relcount++] = relpp [i];
+         relcount = temp_relcount;
+         free (relpp);
+         relpp = temp_relpp;
        }
+      bfd_set_reloc (obfd, osection,
+                    (relcount == 0 ? (arelent **) NULL : relpp), relcount);
     }
 
   isection->_cooked_size = isection->_raw_size;
@@ -1283,13 +1475,8 @@ copy_section (ibfd, isection, obfdarg)
                                     size))
        RETURN_NONFATAL (bfd_get_filename (ibfd));
 
-      if (copy_byte >= 0) 
-        {
-         filter_bytes (memhunk, &size);
-              /* The section has gotten smaller. */
-          if (!bfd_set_section_size (obfd, osection, size))
-            RETURN_NONFATAL (bfd_get_filename (obfd));
-        }
+      if (copy_byte >= 0)
+       filter_bytes (memhunk, &size);
 
       if (!bfd_set_section_contents (obfd, osection, memhunk, (file_ptr) 0,
                                     size))
@@ -1320,7 +1507,7 @@ copy_section (ibfd, isection, obfdarg)
 
 static void
 get_sections (obfd, osection, secppparg)
-     bfd *obfd;
+     bfd *obfd ATTRIBUTE_UNUSED;
      asection *osection;
      PTR secppparg;
 {
@@ -1427,8 +1614,8 @@ static boolean
 write_debugging_info (obfd, dhandle, symcountp, symppp)
      bfd *obfd;
      PTR dhandle;
-     long *symcountp;
-     asymbol ***symppp;
+     long *symcountp ATTRIBUTE_UNUSED;
+     asymbol ***symppp ATTRIBUTE_UNUSED;
 {
   if (bfd_get_flavour (obfd) == bfd_target_ieee_flavour)
     return write_ieee_debugging_info (obfd, dhandle);
@@ -1491,178 +1678,6 @@ write_debugging_info (obfd, dhandle, symcountp, symppp)
   return false;
 }
 
-/* The number of bytes to copy at once.  */
-#define COPY_BUF 8192
-
-/* Copy file FROM to file TO, performing no translations.
-   Return 0 if ok, -1 if error.  */
-
-static int
-simple_copy (from, to)
-     const char *from;
-     const char *to;
-{
-  int fromfd, tofd, nread;
-  int saved;
-  char buf[COPY_BUF];
-
-  fromfd = open (from, O_RDONLY);
-  if (fromfd < 0)
-    return -1;
-  tofd = creat (to, 0777);
-  if (tofd < 0)
-    {
-      saved = errno;
-      close (fromfd);
-      errno = saved;
-      return -1;
-    }
-  while ((nread = read (fromfd, buf, sizeof buf)) > 0)
-    {
-      if (write (tofd, buf, nread) != nread)
-       {
-         saved = errno;
-         close (fromfd);
-         close (tofd);
-         errno = saved;
-         return -1;
-       }
-    }
-  saved = errno;
-  close (fromfd);
-  close (tofd);
-  if (nread < 0)
-    {
-      errno = saved;
-      return -1;
-    }
-  return 0;
-}
-
-#ifndef S_ISLNK
-#ifdef S_IFLNK
-#define S_ISLNK(m) (((m) & S_IFMT) == S_IFLNK)
-#else
-#define S_ISLNK(m) 0
-#define lstat stat
-#endif
-#endif
-
-/* Rename FROM to TO, copying if TO is a link.
-   Assumes that TO already exists, because FROM is a temp file.
-   Return 0 if ok, -1 if error.  */
-
-static int
-smart_rename (from, to)
-     const char *from;
-     const char *to;
-{
-  struct stat s;
-  int ret = 0;
-
-  if (lstat (to, &s))
-    return -1;
-
-#if defined (_WIN32) && !defined (__CYGWIN32__)
-  /* Win32, unlike unix, will not erase `to' in `rename(from, to)' but
-     fail instead.  Also, chown is not present.  */
-
-  if (stat (to, &s) == 0)
-    remove (to);
-
-  ret = rename (from, to);
-  if (ret != 0)
-    {
-      /* We have to clean up here. */
-      
-      non_fatal (_("%s: rename: %s"), to, strerror (errno));
-      unlink (from);
-    }
-#else
-  /* Use rename only if TO is not a symbolic link and has
-     only one hard link.  */
-  if (!S_ISLNK (s.st_mode) && s.st_nlink == 1)
-    {
-      ret = rename (from, to);
-      if (ret == 0)
-       {
-         /* Try to preserve the permission bits and ownership of TO.
-             First get the mode right except for the setuid bit.  Then
-             change the ownership.  Then fix the setuid bit.  We do
-             the chmod before the chown because if the chown succeeds,
-             and we are a normal user, we won't be able to do the
-             chmod afterward.  We don't bother to fix the setuid bit
-             first because that might introduce a fleeting security
-             problem, and because the chown will clear the setuid bit
-             anyhow.  We only fix the setuid bit if the chown
-             succeeds, because we don't want to introduce an
-             unexpected setuid file owned by the user running objcopy.  */
-         chmod (to, s.st_mode & 0777);
-         if (chown (to, s.st_uid, s.st_gid) >= 0)
-           chmod (to, s.st_mode & 07777);
-       }
-      else
-       {
-         /* We have to clean up here. */
-         non_fatal (_("%s: rename: %s"), to, strerror (errno));
-         unlink (from);
-       }
-    }
-  else
-    {
-      ret = simple_copy (from, to);
-      if (ret != 0)
-       non_fatal (_("%s: simple_copy: %s"), to, strerror (errno));
-
-      if (preserve_dates)
-       set_times (to, &s);
-      unlink (from);
-    }
-#endif /* _WIN32 && !__CYGWIN32__ */
-
-  return ret;
-}
-
-/* Set the times of the file DESTINATION to be the same as those in
-   STATBUF.  */
-
-static void
-set_times (destination, statbuf)
-     const char *destination;
-     const struct stat *statbuf;
-{
-  int result;
-
-  {
-#ifdef HAVE_GOOD_UTIME_H
-    struct utimbuf tb;
-
-    tb.actime = statbuf->st_atime;
-    tb.modtime = statbuf->st_mtime;
-    result = utime (destination, &tb);
-#else /* ! HAVE_GOOD_UTIME_H */
-#ifndef HAVE_UTIMES
-    long tb[2];
-
-    tb[0] = statbuf->st_atime;
-    tb[1] = statbuf->st_mtime;
-    result = utime (destination, tb);
-#else /* HAVE_UTIMES */
-    struct timeval tv[2];
-
-    tv[0].tv_sec = statbuf->st_atime;
-    tv[0].tv_usec = 0;
-    tv[1].tv_sec = statbuf->st_mtime;
-    tv[1].tv_usec = 0;
-    result = utimes (destination, tv);
-#endif /* HAVE_UTIMES */
-#endif /* ! HAVE_GOOD_UTIME_H */
-  }
-
-  if (result != 0)
-    non_fatal (_("%s: cannot set time: %s"), destination, strerror (errno));
-}
-
 static int
 strip_main (argc, argv)
      int argc;
@@ -1674,7 +1689,7 @@ strip_main (argc, argv)
   struct section_list *p;
   char *output_file = NULL;
 
-  while ((c = getopt_long (argc, argv, "I:O:F:K:N:R:o:sSpgxXVv",
+  while ((c = getopt_long (argc, argv, "I:O:F:K:N:R:o:sSpdgxXVv",
                           strip_options, (int *) 0)) != EOF)
     {
       switch (c)
@@ -1698,6 +1713,7 @@ strip_main (argc, argv)
          break;
        case 'S':
        case 'g':
+       case 'd':       /* Historic BSD alias for -g.  Used by early NetBSD.  */
          strip_symbols = STRIP_DEBUG;
          break;
        case OPTION_STRIP_UNNEEDED:
@@ -1780,7 +1796,7 @@ strip_main (argc, argv)
          if (preserve_dates)
            set_times (tmpname, &statbuf);
          if (output_file == NULL)
-           smart_rename (tmpname, argv[i]);
+           smart_rename (tmpname, argv[i], preserve_dates);
          status = hold_status;
        }
       else
@@ -1805,76 +1821,105 @@ copy_main (argc, argv)
   struct section_list *p;
   struct stat statbuf;
 
-  while ((c = getopt_long (argc, argv, "b:i:I:K:N:s:O:d:F:L:R:SpgxXVvW:",
+  while ((c = getopt_long (argc, argv, "b:i:I:j:K:N:s:O:d:F:L:R:SpgxXVvW:",
                           copy_options, (int *) 0)) != EOF)
     {
       switch (c)
        {
        case 'b':
-         copy_byte = atoi(optarg);
+         copy_byte = atoi (optarg);
          if (copy_byte < 0)
            fatal (_("byte number must be non-negative"));
          break;
+
        case 'i':
-         interleave = atoi(optarg);
+         interleave = atoi (optarg);
          if (interleave < 1)
            fatal (_("interleave must be positive"));
          break;
+
        case 'I':
        case 's':               /* "source" - 'I' is preferred */
          input_target = optarg;
          break;
+
        case 'O':
        case 'd':               /* "destination" - 'O' is preferred */
          output_target = optarg;
          break;
+
        case 'F':
          input_target = output_target = optarg;
          break;
+
+       case 'j':
+         p = find_section_list (optarg, true);
+         if (p->remove)
+           fatal (_("%s both copied and removed"), optarg);
+         p->copy = true;
+         sections_copied = true;
+         break;
+
        case 'R':
          p = find_section_list (optarg, true);
+         if (p->copy)
+           fatal (_("%s both copied and removed"), optarg);
          p->remove = true;
          sections_removed = true;
          break;
+
        case 'S':
          strip_symbols = STRIP_ALL;
          break;
+
        case 'g':
          strip_symbols = STRIP_DEBUG;
          break;
+
        case OPTION_STRIP_UNNEEDED:
          strip_symbols = STRIP_UNNEEDED;
          break;
+
        case 'K':
          add_specific_symbol (optarg, &keep_specific_list);
          break;
+
        case 'N':
          add_specific_symbol (optarg, &strip_specific_list);
          break;
+
        case 'L':
          add_specific_symbol (optarg, &localize_specific_list);
          break;
+
        case 'W':
          add_specific_symbol (optarg, &weaken_specific_list);
          break;
+
        case 'p':
          preserve_dates = true;
          break;
+
        case 'x':
          discard_locals = LOCALS_ALL;
          break;
+
        case 'X':
          discard_locals = LOCALS_START_L;
          break;
+
        case 'v':
          verbose = true;
          break;
+
        case 'V':
          show_version = true;
          break;
+
        case OPTION_WEAKEN:
          weaken = true;
          break;
+
        case OPTION_ADD_SECTION:
          {
            const char *s;
@@ -1885,9 +1930,9 @@ copy_main (argc, argv)
            FILE *f;
 
            s = strchr (optarg, '=');
-           
+
            if (s == NULL)
-             fatal (_("bad format for --add-section NAME=FILENAME"));
+             fatal (_("bad format for %s"), "--add-section");
 
            if (stat (s + 1, & st) < 0)
              fatal (_("cannot stat: %s: %s"), s + 1, strerror (errno));
@@ -1906,10 +1951,10 @@ copy_main (argc, argv)
 
            pa->contents = (bfd_byte *) xmalloc (pa->size);
            f = fopen (pa->filename, FOPEN_RB);
-           
+
            if (f == NULL)
              fatal (_("cannot open: %s: %s"), pa->filename, strerror (errno));
-           
+
            if (fread (pa->contents, 1, pa->size, f) == 0
                || ferror (f))
              fatal (_("%s: fread failed"), pa->filename);
@@ -1920,9 +1965,11 @@ copy_main (argc, argv)
            add_sections = pa;
          }
          break;
+
        case OPTION_CHANGE_START:
          change_start = parse_vma (optarg, "--change-start");
          break;
+
        case OPTION_CHANGE_SECTION_ADDRESS:
        case OPTION_CHANGE_SECTION_LMA:
        case OPTION_CHANGE_SECTION_VMA:
@@ -1930,17 +1977,23 @@ copy_main (argc, argv)
            const char *s;
            int len;
            char *name;
-           char *option;
+           char *option = NULL;
            bfd_vma val;
-           enum change_action what;
-           
+           enum change_action what = CHANGE_IGNORE;
+
            switch (c)
              {
-             case OPTION_CHANGE_SECTION_ADDRESS: option = "--change-section-address"; break;
-             case OPTION_CHANGE_SECTION_LMA: option = "--change-section-lma"; break;
-             case OPTION_CHANGE_SECTION_VMA: option = "--change-section-vma"; break;
+             case OPTION_CHANGE_SECTION_ADDRESS:
+               option = "--change-section-address";
+               break;
+             case OPTION_CHANGE_SECTION_LMA:
+               option = "--change-section-lma";
+               break;
+             case OPTION_CHANGE_SECTION_VMA:
+               option = "--change-section-vma";
+               break;
              }
-           
+
            s = strchr (optarg, '=');
            if (s == NULL)
              {
@@ -1968,19 +2021,19 @@ copy_main (argc, argv)
              case '-': val  = - val; /* Drop through.  */
              case '+': what = CHANGE_MODIFY; break;
              }
-           
+
            switch (c)
              {
              case OPTION_CHANGE_SECTION_ADDRESS:
                p->change_vma = what;
                p->vma_val    = val;
                /* Drop through.  */
-               
+
              case OPTION_CHANGE_SECTION_LMA:
                p->change_lma = what;
                p->lma_val    = val;
                break;
-               
+
              case OPTION_CHANGE_SECTION_VMA:
                p->change_vma = what;
                p->vma_val    = val;
@@ -1988,19 +2041,24 @@ copy_main (argc, argv)
              }
          }
          break;
+
        case OPTION_CHANGE_ADDRESSES:
          change_section_address = parse_vma (optarg, "--change-addresses");
          change_start = change_section_address;
          break;
+
        case OPTION_CHANGE_WARNINGS:
          change_warn = true;
          break;
+
        case OPTION_CHANGE_LEADING_CHAR:
          change_leading_char = true;
          break;
+
        case OPTION_DEBUGGING:
          convert_debugging = true;
          break;
+
        case OPTION_GAP_FILL:
          {
            bfd_vma gap_fill_vma;
@@ -2010,25 +2068,61 @@ copy_main (argc, argv)
            if ((bfd_vma) gap_fill != gap_fill_vma)
              {
                char buff[20];
-               
+
                sprintf_vma (buff, gap_fill_vma);
-               
+
                non_fatal (_("Warning: truncating gap-fill from 0x%s to 0x%x"),
                           buff, gap_fill);
              }
            gap_fill_set = true;
          }
          break;
+
        case OPTION_NO_CHANGE_WARNINGS:
          change_warn = false;
          break;
+
        case OPTION_PAD_TO:
          pad_to = parse_vma (optarg, "--pad-to");
          pad_to_set = true;
          break;
+
        case OPTION_REMOVE_LEADING_CHAR:
          remove_leading_char = true;
          break;
+
+       case OPTION_REDEFINE_SYM:
+         {
+           /* Push this redefinition onto redefine_symbol_list.  */
+
+           int len;
+           const char *s;
+           const char *nextarg;
+           char *source, *target;
+
+           s = strchr (optarg, '=');
+           if (s == NULL)
+             {
+               fatal (_("bad format for %s"), "--redefine-sym");
+             }
+
+           len = s - optarg;
+           source = (char *) xmalloc (len + 1);
+           strncpy (source, optarg, len);
+           source[len] = '\0';
+
+           nextarg = s + 1;
+           len = strlen (nextarg);
+           target = (char *) xmalloc (len + 1);
+           strcpy (target, nextarg);
+
+           redefine_list_append (source, target);
+
+           free (source);
+           free (target);
+         }
+         break;
+
        case OPTION_SET_SECTION_FLAGS:
          {
            const char *s;
@@ -2037,7 +2131,7 @@ copy_main (argc, argv)
 
            s = strchr (optarg, '=');
            if (s == NULL)
-             fatal (_("bad format for --set-section-flags"));
+             fatal (_("bad format for %s"), "--set-section-flags");
 
            len = s - optarg;
            name = (char *) xmalloc (len + 1);
@@ -2050,14 +2144,26 @@ copy_main (argc, argv)
            p->flags = parse_flags (s + 1);
          }
          break;
+
        case OPTION_SET_START:
          set_start = parse_vma (optarg, "--set-start");
          set_start_set = true;
          break;
+
+        case OPTION_SREC_LEN:
+          Chunk = parse_vma (optarg, "--srec-len");
+          break;
+
+        case OPTION_SREC_FORCES3:
+         S3Forced = true;
+          break;
+
        case 0:
          break;                /* we've been given a long option */
+
        case 'h':
          copy_usage (stdout, 0);
+
        default:
          copy_usage (stderr, 1);
        }
@@ -2098,10 +2204,10 @@ copy_main (argc, argv)
 
       copy_file (input_filename, tmpname, input_target, output_target);
       if (status == 0)
-       {       
+       {
          if (preserve_dates)
            set_times (tmpname, &statbuf);
-         smart_rename (tmpname, input_filename);
+         smart_rename (tmpname, input_filename, preserve_dates);
        }
       else
        unlink (tmpname);
@@ -2124,22 +2230,24 @@ copy_main (argc, argv)
                  char buff [20];
 
                  sprintf_vma (buff, p->vma_val);
-                 
+
                  /* xgettext:c-format */
-                 non_fatal (_("Warning: --change-section-vma %s%c0x%s never used"),
+                 non_fatal (_("%s %s%c0x%s never used"),
+                            "--change-section-vma",
                             p->name,
                             p->change_vma == CHANGE_SET ? '=' : '+',
                             buff);
                }
-             
+
              if (p->change_lma != CHANGE_IGNORE)
                {
                  char buff [20];
 
                  sprintf_vma (buff, p->lma_val);
-                 
+
                  /* xgettext:c-format */
-                 non_fatal (_("Warning: --change-section-lma %s%c0x%s never used"),
+                 non_fatal (_("%s %s%c0x%s never used"),
+                            "--change-section-lma",
                             p->name,
                             p->change_lma == CHANGE_SET ? '=' : '+',
                             buff);
@@ -2156,7 +2264,7 @@ main (argc, argv)
      int argc;
      char *argv[];
 {
-#ifdef HAVE_SETLOCALE
+#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
   setlocale (LC_MESSAGES, "");
 #endif
   bindtextdomain (PACKAGE, LOCALEDIR);
@@ -2176,7 +2284,15 @@ main (argc, argv)
   if (is_strip < 0)
     {
       int i = strlen (program_name);
-      is_strip = (i >= 5 && strcmp (program_name + i - 5, "strip") == 0);
+#ifdef HAVE_DOS_BASED_FILE_SYSTEM
+      /* Drop the .exe suffix, if any.  */
+      if (i > 4 && FILENAME_CMP (program_name + i - 4, ".exe") == 0)
+       {
+         i -= 4;
+         program_name[i] = '\0';
+       }
+#endif
+      is_strip = (i >= 5 && FILENAME_CMP (program_name + i - 5, "strip") == 0);
     }
 
   if (is_strip)
This page took 0.039585 seconds and 4 git commands to generate.