2002-09-10 Andrew Cagney <cagney@redhat.com>
[deliverable/binutils-gdb.git] / ld / ldmain.c
index 03dd31513fedaf14063b5f24f17fd8365967353c..84baa4ddf0aff3aa43bc4cae472e569e48864a45 100644 (file)
@@ -1,5 +1,7 @@
 /* Main program of GNU linker.
-   Copyright (C) 1991, 92, 93, 94, 95, 96, 1997 Free Software Foundation, Inc.
+   Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001,
+   2002
+   Free Software Foundation, Inc.
    Written by Steve Chamberlain steve@cygnus.com
 
 This file is part of GLD, the Gnu Linker.
@@ -22,24 +24,25 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 #include "bfd.h"
 #include "sysdep.h"
 #include <stdio.h>
-#include <ctype.h>
+#include "safe-ctype.h"
 #include "libiberty.h"
 #include "progress.h"
 #include "bfdlink.h"
+#include "filenames.h"
 
 #include "ld.h"
 #include "ldmain.h"
 #include "ldmisc.h"
 #include "ldwrite.h"
-#include "ldgram.h"
 #include "ldexp.h"
 #include "ldlang.h"
-#include "ldemul.h"
+#include "ldgram.h"
 #include "ldlex.h"
 #include "ldfile.h"
+#include "ldemul.h"
 #include "ldctor.h"
 
-/* Somewhere above, sys/stat.h got included . . . . */
+/* Somewhere above, sys/stat.h got included . . . .  */
 #if !defined(S_ISDIR) && defined(S_IFDIR)
 #define        S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR)
 #endif
@@ -52,6 +55,8 @@ extern PTR sbrk ();
 #endif
 #endif
 
+int main PARAMS ((int, char **));
+
 static char *get_emulation PARAMS ((int, char **));
 static void set_scripts_dir PARAMS ((void));
 
@@ -63,7 +68,7 @@ const char *output_filename = "a.out";
 /* Name this program was invoked by.  */
 char *program_name;
 
-/* The file that we're creating */
+/* The file that we're creating */
 bfd *output_bfd = 0;
 
 /* Set by -G argument, for MIPS ECOFF target.  */
@@ -82,10 +87,14 @@ boolean version_printed;
 /* Nonzero means link in every member of an archive.  */
 boolean whole_archive;
 
+/* True if we should demangle symbol names.  */
+boolean demangling;
+
 args_type command_line;
 
 ld_config_type config;
 
+static void remove_output PARAMS ((void));
 static boolean check_for_scripts_dir PARAMS ((char *dir));
 static boolean add_archive_element PARAMS ((struct bfd_link_info *, bfd *,
                                            const char *));
@@ -112,7 +121,7 @@ static boolean warning_callback PARAMS ((struct bfd_link_info *,
 static void warning_find_reloc PARAMS ((bfd *, asection *, PTR));
 static boolean undefined_symbol PARAMS ((struct bfd_link_info *,
                                         const char *, bfd *,
-                                        asection *, bfd_vma));
+                                        asection *, bfd_vma, boolean));
 static boolean reloc_overflow PARAMS ((struct bfd_link_info *, const char *,
                                       const char *, bfd_vma,
                                       bfd *, asection *, bfd_vma));
@@ -124,8 +133,7 @@ static boolean unattached_reloc PARAMS ((struct bfd_link_info *,
 static boolean notice PARAMS ((struct bfd_link_info *, const char *,
                               bfd *, asection *, bfd_vma));
 
-static struct bfd_link_callbacks link_callbacks =
-{
+static struct bfd_link_callbacks link_callbacks = {
   add_archive_element,
   multiple_definition,
   multiple_common,
@@ -144,10 +152,10 @@ struct bfd_link_info link_info;
 static void
 remove_output ()
 {
-  if (output_filename) 
+  if (output_filename)
     {
       if (output_bfd && output_bfd->iostream)
-       fclose((FILE *)(output_bfd->iostream));
+       fclose ((FILE *) (output_bfd->iostream));
       if (delete_output_file_on_failure)
        unlink (output_filename);
     }
@@ -161,6 +169,15 @@ main (argc, argv)
   char *emulation;
   long start_time = get_run_time ();
 
+#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
+  setlocale (LC_MESSAGES, "");
+#endif
+#if defined (HAVE_SETLOCALE)
+  setlocale (LC_CTYPE, "");
+#endif
+  bindtextdomain (PACKAGE, LOCALEDIR);
+  textdomain (PACKAGE);
+
   program_name = argv[0];
   xmalloc_set_program_name (program_name);
 
@@ -178,47 +195,88 @@ main (argc, argv)
      a different target.  The macro TARGET is defined by Makefile.  */
   if (! bfd_set_default_target (TARGET))
     {
-      einfo ("%X%P: can't set BFD default target to `%s': %E\n", TARGET);
+      einfo (_("%X%P: can't set BFD default target to `%s': %E\n"), TARGET);
       xexit (1);
     }
 
+#if YYDEBUG
+  {
+    extern int yydebug;
+    yydebug = 1;
+  }
+#endif
+
   /* Initialize the data about options.  */
   trace_files = trace_file_tries = version_printed = false;
   whole_archive = false;
   config.build_constructors = true;
   config.dynamic_link = false;
+  config.has_shared = false;
+  config.split_by_reloc = (unsigned) -1;
+  config.split_by_file = (bfd_size_type) -1;
   command_line.force_common_definition = false;
+  command_line.inhibit_common_definition = false;
   command_line.interpreter = NULL;
   command_line.rpath = NULL;
+  command_line.warn_mismatch = true;
+  command_line.check_section_addresses = true;
+
+  /* We initialize DEMANGLING based on the environment variable
+     COLLECT_NO_DEMANGLE.  The gcc collect2 program will demangle the
+     output of the linker, unless COLLECT_NO_DEMANGLE is set in the
+     environment.  Acting the same way here lets us provide the same
+     interface by default.  */
+  demangling = getenv ("COLLECT_NO_DEMANGLE") == NULL;
 
   link_info.callbacks = &link_callbacks;
   link_info.relocateable = false;
+  link_info.emitrelocations = false;
   link_info.shared = false;
   link_info.symbolic = false;
+  link_info.export_dynamic = false;
   link_info.static_link = false;
   link_info.traditional_format = false;
+  link_info.optimize = false;
+  link_info.no_undefined = false;
+  link_info.allow_shlib_undefined = false;
+  link_info.allow_multiple_definition = false;
+  link_info.allow_undefined_version = true;
   link_info.strip = strip_none;
-  link_info.discard = discard_none;
+  link_info.discard = discard_sec_merge;
   link_info.keep_memory = true;
   link_info.input_bfds = NULL;
   link_info.create_object_symbols_section = NULL;
+  link_info.gc_sym_list = NULL;
   link_info.hash = NULL;
   link_info.keep_hash = NULL;
   link_info.notice_all = false;
   link_info.notice_hash = NULL;
   link_info.wrap_hash = NULL;
-  
+  link_info.mpc860c0 = 0;
+  /* SVR4 linkers seem to set DT_INIT and DT_FINI based on magic _init
+     and _fini symbols.  We are compatible.  */
+  link_info.init_function = "_init";
+  link_info.fini_function = "_fini";
+  link_info.new_dtags = false;
+  link_info.eh_frame_hdr = false;
+  link_info.flags = (bfd_vma) 0;
+  link_info.flags_1 = (bfd_vma) 0;
+  link_info.pei386_auto_import = false;
+  link_info.pei386_auto_import = -1;
+  link_info.combreloc = true;
+  link_info.spare_dynamic_tags = 5;
+  link_info.common_skip_ar_aymbols = bfd_link_common_skip_none;
+
   ldfile_add_arch ("");
 
   config.make_executable = true;
   force_make_executable = false;
   config.magic_demand_paged = true;
   config.text_read_only = true;
-  config.make_executable = true;
 
   emulation = get_emulation (argc, argv);
   ldemul_choose_mode (emulation);
-  default_target = ldemul_choose_target ();
+  default_target = ldemul_choose_target (argc, argv);
   lang_init ();
   ldemul_before_parse ();
   lang_has_input_file = false;
@@ -228,10 +286,22 @@ main (argc, argv)
 
   if (link_info.relocateable)
     {
-      if (command_line.relax)
-       einfo ("%P%F: -relax and -r may not be used together\n");
+      if (command_line.gc_sections)
+       einfo ("%P%F: --gc-sections and -r may not be used together\n");
+      if (link_info.mpc860c0)
+       einfo (_("%P%F: -r and --mpc860c0 may not be used together\n"));
+      else if (command_line.relax)
+       einfo (_("%P%F: --relax and -r may not be used together\n"));
       if (link_info.shared)
-       einfo ("%P%F: -r and -shared may not be used together\n");
+       einfo (_("%P%F: -r and -shared may not be used together\n"));
+    }
+
+  if (! link_info.shared)
+    {
+      if (command_line.filter_shlib)
+       einfo (_("%P%F: -F may not be used without -shared\n"));
+      if (command_line.auxiliary_filters)
+       einfo (_("%P%F: -f may not be used without -shared\n"));
     }
 
   /* Treat ld -r -s as ld -r -S -x (i.e., strip all local symbols).  I
@@ -240,7 +310,7 @@ main (argc, argv)
   if (link_info.relocateable && link_info.strip == strip_all)
     {
       link_info.strip = strip_debugger;
-      if (link_info.discard == discard_none)
+      if (link_info.discard == discard_sec_merge)
        link_info.discard = discard_all;
     }
 
@@ -248,9 +318,10 @@ main (argc, argv)
      the -L's in argv have been processed.  */
   set_scripts_dir ();
 
-  if (had_script == false)
+  /* If we have not already opened and parsed a linker script
+     read the emulation's appropriate default script.  */
+  if (saved_script_handle == NULL)
     {
-      /* Read the emulation's appropriate default script.  */
       int isfile;
       char *s = ldemul_get_script (&isfile);
 
@@ -258,13 +329,6 @@ main (argc, argv)
        ldfile_open_command_file (s);
       else
        {
-         if (trace_file_tries)
-           {
-             info_msg ("using internal linker script:\n");
-             info_msg ("==================================================\n");
-             info_msg (s);
-             info_msg ("\n==================================================\n");
-           }
          lex_string = s;
          lex_redirect (s);
        }
@@ -273,23 +337,55 @@ main (argc, argv)
       lex_string = NULL;
     }
 
+  if (trace_file_tries)
+    {
+      if (saved_script_handle)
+       info_msg (_("using external linker script:"));
+      else
+       info_msg (_("using internal linker script:"));
+      info_msg ("\n==================================================\n");
+
+      if (saved_script_handle)
+       {
+         static const int ld_bufsz = 8193;
+         size_t n;
+         char *buf = xmalloc (ld_bufsz);
+
+         rewind (saved_script_handle);
+         while ((n = fread (buf, 1, ld_bufsz - 1, saved_script_handle)) > 0)
+           {
+             buf[n] = 0;
+             info_msg (buf);
+           }
+         rewind (saved_script_handle);
+         free (buf);
+       }
+      else
+       {
+         int isfile;
+
+         info_msg (ldemul_get_script (&isfile));
+       }
+
+      info_msg ("\n==================================================\n");
+    }
+
   lang_final ();
 
   if (lang_has_input_file == false)
     {
       if (version_printed)
        xexit (0);
-      einfo ("%P%F: no input files\n");
+      einfo (_("%P%F: no input files\n"));
     }
 
   if (trace_files)
     {
-      info_msg ("%P: mode %s\n", emulation);
+      info_msg (_("%P: mode %s\n"), emulation);
     }
 
   ldemul_after_parse ();
 
-
   if (config.map_filename)
     {
       if (strcmp (config.map_filename, "-") == 0)
@@ -302,29 +398,16 @@ main (argc, argv)
          if (config.map_file == (FILE *) NULL)
            {
              bfd_set_error (bfd_error_system_call);
-             einfo ("%P%F: cannot open map file %s: %E\n",
+             einfo (_("%P%F: cannot open map file %s: %E\n"),
                     config.map_filename);
            }
        }
     }
 
-
   lang_process ();
 
   /* Print error messages for any missing symbols, for any warning
-     symbols, and possibly multiple definitions */
-
-
-  if (config.text_read_only)
-    {
-      /* Look for a text section and mark the readonly attribute in it */
-      asection *found = bfd_get_section_by_name (output_bfd, ".text");
-
-      if (found != (asection *) NULL)
-       {
-         found->flags |= SEC_READONLY;
-       }
-    }
+     symbols, and possibly multiple definitions.  */
 
   if (link_info.relocateable)
     output_bfd->flags &= ~EXEC_P;
@@ -348,7 +431,7 @@ main (argc, argv)
     {
       if (trace_files == true)
        {
-         einfo ("%P: link errors found, deleting executable `%s'\n",
+         einfo (_("%P: link errors found, deleting executable `%s'\n"),
                 output_filename);
        }
 
@@ -359,15 +442,15 @@ main (argc, argv)
   else
     {
       if (! bfd_close (output_bfd))
-       einfo ("%F%B: final close failed: %E\n", output_bfd);
+       einfo (_("%F%B: final close failed: %E\n"), output_bfd);
 
       /* If the --force-exe-suffix is enabled, and we're making an
-        executable file and it doesn't end in .exe, copy it to one which does. */
-
+        executable file and it doesn't end in .exe, copy it to one
+        which does.  */
       if (! link_info.relocateable && command_line.force_exe_suffix)
        {
          int len = strlen (output_filename);
-         if (len < 4 
+         if (len < 4
              || (strcasecmp (output_filename + len - 4, ".exe") != 0
                  && strcasecmp (output_filename + len - 4, ".dll") != 0))
            {
@@ -383,21 +466,21 @@ main (argc, argv)
              dst = fopen (dst_name, FOPEN_WB);
 
              if (!src)
-               einfo ("%X%P: unable to open for source of copy `%s'\n", output_filename);
+               einfo (_("%X%P: unable to open for source of copy `%s'\n"), output_filename);
              if (!dst)
-               einfo ("%X%P: unable to open for destination of copy `%s'\n", dst_name);
+               einfo (_("%X%P: unable to open for destination of copy `%s'\n"), dst_name);
              while ((l = fread (buf, 1, bsize, src)) > 0)
                {
                  int done = fwrite (buf, 1, l, dst);
                  if (done != l)
                    {
-                     einfo ("%P: Error writing file `%s'\n", dst_name);
+                     einfo (_("%P: Error writing file `%s'\n"), dst_name);
                    }
                }
              fclose (src);
-             if (!fclose (dst))
+             if (fclose (dst) == EOF)
                {
-                 einfo ("%P: Error closing file `%s'\n", dst_name);
+                 einfo (_("%P: Error closing file `%s'\n"), dst_name);
                }
              free (dst_name);
              free (buf);
@@ -409,16 +492,15 @@ main (argc, argv)
 
   if (config.stats)
     {
-      extern char **environ;
 #ifdef HAVE_SBRK
       char *lim = (char *) sbrk (0);
 #endif
       long run_time = get_run_time () - start_time;
 
-      fprintf (stderr, "%s: total time in link: %ld.%06ld\n",
+      fprintf (stderr, _("%s: total time in link: %ld.%06ld\n"),
               program_name, run_time / 1000000, run_time % 1000000);
 #ifdef HAVE_SBRK
-      fprintf (stderr, "%s: data size %ld\n", program_name,
+      fprintf (stderr, _("%s: data size %ld\n"), program_name,
               (long) (lim - (char *) &environ));
 #endif
     }
@@ -459,15 +541,18 @@ get_emulation (argc, argv)
                }
              else
                {
-                 einfo("%P%F: missing argument to -m\n");
+                 einfo (_("%P%F: missing argument to -m\n"));
                }
            }
          else if (strcmp (argv[i], "-mips1") == 0
                   || strcmp (argv[i], "-mips2") == 0
                   || strcmp (argv[i], "-mips3") == 0
-                  || strcmp (argv[i], "-mips4") == 0)
+                  || strcmp (argv[i], "-mips32") == 0
+                  || strcmp (argv[i], "-mips64") == 0
+                  || strcmp (argv[i], "-mips4") == 0
+                  || strcmp (argv[i], "-mips5") == 0)
            {
-             /* FIXME: The arguments -mips1, -mips2 and -mips3 are
+             /* FIXME: The arguments -mips1, -mips2, -mips3, etc. are
                 passed to the linker by some MIPS compilers.  They
                 generally tell the linker to use a slightly different
                 library path.  Perhaps someday these should be
@@ -507,7 +592,7 @@ check_for_scripts_dir (dir)
 
   dirlen = strlen (dir);
   /* sizeof counts the terminating NUL.  */
-  buf = (char *) xmalloc (dirlen + sizeof("/ldscripts"));
+  buf = (char *) xmalloc (dirlen + sizeof ("/ldscripts"));
   sprintf (buf, "%s/ldscripts", dir);
 
   res = stat (buf, &s) == 0 && S_ISDIR (s.st_mode);
@@ -532,10 +617,19 @@ set_scripts_dir ()
   size_t dirlen;
 
   if (check_for_scripts_dir (SCRIPTDIR))
-    return;                    /* We've been installed normally.  */
+    /* We've been installed normally.  */
+    return;
 
   /* Look for "ldscripts" in the dir where our binary is.  */
   end = strrchr (program_name, '/');
+#ifdef HAVE_DOS_BASED_FILE_SYSTEM
+  {
+    /* We could have \foo\bar, or /foo\bar.  */
+    char *bslash = strrchr (program_name, '\\');
+    if (end == NULL || (bslash != NULL && bslash > end))
+      end = bslash;
+  }
+#endif
 
   if (end == NULL)
     {
@@ -552,14 +646,16 @@ set_scripts_dir ()
   dir[dirlen] = '\0';
 
   if (check_for_scripts_dir (dir))
-    return;                    /* Don't free dir.  */
+    /* Don't free dir.  */
+    return;
 
   /* Look for "ldscripts" in <the dir where our binary is>/../lib.  */
   strcpy (dir + dirlen, "/../lib");
   if (check_for_scripts_dir (dir))
     return;
 
-  free (dir);                  /* Well, we tried.  */
+  /* Well, we tried.  */
+  free (dir);
 }
 
 void
@@ -573,12 +669,12 @@ add_ysym (name)
       if (! bfd_hash_table_init_n (link_info.notice_hash,
                                   bfd_hash_newfunc,
                                   61))
-       einfo ("%P%F: bfd_hash_table_init failed: %E\n");
-    }      
+       einfo (_("%P%F: bfd_hash_table_init failed: %E\n"));
+    }
 
   if (bfd_hash_lookup (link_info.notice_hash, name, true, true)
       == (struct bfd_hash_entry *) NULL)
-    einfo ("%P%F: bfd_hash_lookup failed: %E\n");
+    einfo (_("%P%F: bfd_hash_lookup failed: %E\n"));
 }
 
 /* Record a symbol to be wrapped, from the --wrap option.  */
@@ -594,10 +690,10 @@ add_wrap (name)
       if (! bfd_hash_table_init_n (link_info.wrap_hash,
                                   bfd_hash_newfunc,
                                   61))
-       einfo ("%P%F: bfd_hash_table_init failed: %E\n");
+       einfo (_("%P%F: bfd_hash_table_init failed: %E\n"));
     }
   if (bfd_hash_lookup (link_info.wrap_hash, name, true, true) == NULL)
-    einfo ("%P%F: bfd_hash_lookup failed: %E\n");
+    einfo (_("%P%F: bfd_hash_lookup failed: %E\n"));
 }
 
 /* Handle the -retain-symbols-file option.  */
@@ -612,7 +708,7 @@ add_keepsyms_file (filename)
   int c;
 
   if (link_info.strip == strip_some)
-    einfo ("%X%P: error: duplicate retain-symbols-file\n");
+    einfo (_("%X%P: error: duplicate retain-symbols-file\n"));
 
   file = fopen (filename, "r");
   if (file == (FILE *) NULL)
@@ -625,7 +721,7 @@ add_keepsyms_file (filename)
   link_info.keep_hash = ((struct bfd_hash_table *)
                         xmalloc (sizeof (struct bfd_hash_table)));
   if (! bfd_hash_table_init (link_info.keep_hash, bfd_hash_newfunc))
-    einfo ("%P%F: bfd_hash_table_init failed: %E\n");
+    einfo (_("%P%F: bfd_hash_table_init failed: %E\n"));
 
   bufsize = 100;
   buf = (char *) xmalloc (bufsize);
@@ -633,14 +729,14 @@ add_keepsyms_file (filename)
   c = getc (file);
   while (c != EOF)
     {
-      while (isspace (c))
+      while (ISSPACE (c))
        c = getc (file);
 
       if (c != EOF)
        {
          size_t len = 0;
 
-         while (! isspace (c) && c != EOF)
+         while (! ISSPACE (c) && c != EOF)
            {
              buf[len] = c;
              ++len;
@@ -656,12 +752,12 @@ add_keepsyms_file (filename)
 
          if (bfd_hash_lookup (link_info.keep_hash, buf, true, true)
              == (struct bfd_hash_entry *) NULL)
-           einfo ("%P%F: bfd_hash_lookup for insertion failed: %E\n");
+           einfo (_("%P%F: bfd_hash_lookup for insertion failed: %E\n"));
        }
     }
 
   if (link_info.strip != strip_none)
-    einfo ("%P: `-retain-symbols-file' overrides `-s' and `-S'\n");
+    einfo (_("%P: `-retain-symbols-file' overrides `-s' and `-S'\n"));
 
   link_info.strip = strip_some;
 }
@@ -671,10 +767,9 @@ add_keepsyms_file (filename)
 /* This is called when BFD has decided to include an archive member in
    a link.  */
 
-/*ARGSUSED*/
 static boolean
 add_archive_element (info, abfd, name)
-     struct bfd_link_info *info;
+     struct bfd_link_info *info ATTRIBUTE_UNUSED;
      bfd *abfd;
      const char *name;
 {
@@ -738,8 +833,7 @@ add_archive_element (info, abfd, name)
        {
          char buf[100];
 
-         sprintf (buf, "%-29s %s\n\n", "Archive member included",
-                  "because of file (symbol)");
+         sprintf (buf, _("Archive member included because of file (symbol)\n\n"));
          minfo ("%s", buf);
          header_printed = true;
        }
@@ -786,10 +880,9 @@ add_archive_element (info, abfd, name)
 /* This is called when BFD has discovered a symbol which is defined
    multiple times.  */
 
-/*ARGSUSED*/
 static boolean
 multiple_definition (info, name, obfd, osec, oval, nbfd, nsec, nval)
-     struct bfd_link_info *info;
+     struct bfd_link_info *info ATTRIBUTE_UNUSED;
      const char *name;
      bfd *obfd;
      asection *osec;
@@ -811,10 +904,17 @@ multiple_definition (info, name, obfd, osec, oval, nbfd, nsec, nval)
          && bfd_is_abs_section (nsec->output_section)))
     return true;
 
-  einfo ("%X%C: multiple definition of `%T'\n",
+  einfo (_("%X%C: multiple definition of `%T'\n"),
         nbfd, nsec, nval, name);
   if (obfd != (bfd *) NULL)
-    einfo ("%D: first defined here\n", obfd, osec, oval);
+    einfo (_("%D: first defined here\n"), obfd, osec, oval);
+
+  if (command_line.relax)
+    {
+      einfo (_("%P: Disabling relaxation: it will not work with multiple definitions\n"));
+      command_line.relax = 0;
+    }
+
   return true;
 }
 
@@ -823,10 +923,9 @@ multiple_definition (info, name, obfd, osec, oval, nbfd, nsec, nval)
    or when two common symbols are found.  We only do something if
    -warn-common was used.  */
 
-/*ARGSUSED*/
 static boolean
 multiple_common (info, name, obfd, otype, osize, nbfd, ntype, nsize)
-     struct bfd_link_info *info;
+     struct bfd_link_info *info ATTRIBUTE_UNUSED;
      const char *name;
      bfd *obfd;
      enum bfd_link_hash_type otype;
@@ -843,43 +942,43 @@ multiple_common (info, name, obfd, otype, osize, nbfd, ntype, nsize)
       || ntype == bfd_link_hash_indirect)
     {
       ASSERT (otype == bfd_link_hash_common);
-      einfo ("%B: warning: definition of `%T' overriding common\n",
+      einfo (_("%B: warning: definition of `%T' overriding common\n"),
             nbfd, name);
       if (obfd != NULL)
-       einfo ("%B: warning: common is here\n", obfd);
+       einfo (_("%B: warning: common is here\n"), obfd);
     }
   else if (otype == bfd_link_hash_defined
           || otype == bfd_link_hash_defweak
           || otype == bfd_link_hash_indirect)
     {
       ASSERT (ntype == bfd_link_hash_common);
-      einfo ("%B: warning: common of `%T' overridden by definition\n",
+      einfo (_("%B: warning: common of `%T' overridden by definition\n"),
             nbfd, name);
       if (obfd != NULL)
-       einfo ("%B: warning: defined here\n", obfd);
+       einfo (_("%B: warning: defined here\n"), obfd);
     }
   else
     {
       ASSERT (otype == bfd_link_hash_common && ntype == bfd_link_hash_common);
       if (osize > nsize)
        {
-         einfo ("%B: warning: common of `%T' overridden by larger common\n",
+         einfo (_("%B: warning: common of `%T' overridden by larger common\n"),
                 nbfd, name);
          if (obfd != NULL)
-           einfo ("%B: warning: larger common is here\n", obfd);
+           einfo (_("%B: warning: larger common is here\n"), obfd);
        }
       else if (nsize > osize)
        {
-         einfo ("%B: warning: common of `%T' overriding smaller common\n",
+         einfo (_("%B: warning: common of `%T' overriding smaller common\n"),
                 nbfd, name);
          if (obfd != NULL)
-           einfo ("%B: warning: smaller common is here\n", obfd);
+           einfo (_("%B: warning: smaller common is here\n"), obfd);
        }
       else
        {
-         einfo ("%B: warning: multiple common of `%T'\n", nbfd, name);
+         einfo (_("%B: warning: multiple common of `%T'\n"), nbfd, name);
          if (obfd != NULL)
-           einfo ("%B: warning: previous common is here\n", obfd);
+           einfo (_("%B: warning: previous common is here\n"), obfd);
        }
     }
 
@@ -890,10 +989,9 @@ multiple_common (info, name, obfd, otype, osize, nbfd, ntype, nsize)
    entry in the linker hash table for the set.  SECTION and VALUE
    represent a value which should be added to the set.  */
 
-/*ARGSUSED*/
 static boolean
 add_to_set (info, h, reloc, abfd, section, value)
-     struct bfd_link_info *info;
+     struct bfd_link_info *info ATTRIBUTE_UNUSED;
      struct bfd_link_hash_entry *h;
      bfd_reloc_code_real_type reloc;
      bfd *abfd;
@@ -901,7 +999,7 @@ add_to_set (info, h, reloc, abfd, section, value)
      bfd_vma value;
 {
   if (config.warn_constructors)
-    einfo ("%P: warning: global constructor %s used\n",
+    einfo (_("%P: warning: global constructor %s used\n"),
           h->root.string);
 
   if (! config.build_constructors)
@@ -940,7 +1038,7 @@ constructor_callback (info, constructor, name, abfd, section, value)
   char set_name[1 + sizeof "__CTOR_LIST__"];
 
   if (config.warn_constructors)
-    einfo ("%P: warning: global constructor %s used\n", name);
+    einfo (_("%P: warning: global constructor %s used\n"), name);
 
   if (! config.build_constructors)
     return true;
@@ -950,7 +1048,7 @@ constructor_callback (info, constructor, name, abfd, section, value)
   if (bfd_reloc_type_lookup (output_bfd, BFD_RELOC_CTOR) == NULL
       && (link_info.relocateable
          || bfd_reloc_type_lookup (abfd, BFD_RELOC_CTOR) == NULL))
-    einfo ("%P%F: BFD backend error: BFD_RELOC_CTOR unsupported\n");
+    einfo (_("%P%F: BFD backend error: BFD_RELOC_CTOR unsupported\n"));
 
   s = set_name;
   if (bfd_get_symbol_leading_char (abfd) != '\0')
@@ -962,7 +1060,7 @@ constructor_callback (info, constructor, name, abfd, section, value)
 
   h = bfd_link_hash_lookup (info->hash, set_name, true, true, true);
   if (h == (struct bfd_link_hash_entry *) NULL)
-    einfo ("%P%F: bfd_link_hash_lookup failed: %E\n");
+    einfo (_("%P%F: bfd_link_hash_lookup failed: %E\n"));
   if (h->type == bfd_link_hash_new)
     {
       h->type = bfd_link_hash_undefined;
@@ -979,8 +1077,7 @@ constructor_callback (info, constructor, name, abfd, section, value)
 /* A structure used by warning_callback to pass information through
    bfd_map_over_sections.  */
 
-struct warning_callback_info
-{
+struct warning_callback_info {
   boolean found;
   const char *warning;
   const char *symbol;
@@ -989,10 +1086,9 @@ struct warning_callback_info
 
 /* This is called when there is a reference to a warning symbol.  */
 
-/*ARGSUSED*/
 static boolean
 warning_callback (info, warning, symbol, abfd, section, address)
-     struct bfd_link_info *info;
+     struct bfd_link_info *info ATTRIBUTE_UNUSED;
      const char *warning;
      const char *symbol;
      bfd *abfd;
@@ -1030,11 +1126,11 @@ warning_callback (info, warning, symbol, abfd, section, address)
 
          symsize = bfd_get_symtab_upper_bound (abfd);
          if (symsize < 0)
-           einfo ("%B%F: could not read symbols: %E\n", abfd);
+           einfo (_("%B%F: could not read symbols: %E\n"), abfd);
          asymbols = (asymbol **) xmalloc (symsize);
          symbol_count = bfd_canonicalize_symtab (abfd, asymbols);
          if (symbol_count < 0)
-           einfo ("%B%F: could not read symbols: %E\n", abfd);
+           einfo (_("%B%F: could not read symbols: %E\n"), abfd);
          if (entry != NULL)
            {
              entry->asymbols = asymbols;
@@ -1080,14 +1176,14 @@ warning_find_reloc (abfd, sec, iarg)
 
   relsize = bfd_get_reloc_upper_bound (abfd, sec);
   if (relsize < 0)
-    einfo ("%B%F: could not read relocs: %E\n", abfd);
+    einfo (_("%B%F: could not read relocs: %E\n"), abfd);
   if (relsize == 0)
     return;
 
   relpp = (arelent **) xmalloc (relsize);
   relcount = bfd_canonicalize_reloc (abfd, sec, relpp, info->asymbols);
   if (relcount < 0)
-    einfo ("%B%F: could not read relocs: %E\n", abfd);
+    einfo (_("%B%F: could not read relocs: %E\n"), abfd);
 
   p = relpp;
   pend = p + relcount;
@@ -1111,14 +1207,14 @@ warning_find_reloc (abfd, sec, iarg)
 
 /* This is called when an undefined symbol is found.  */
 
-/*ARGSUSED*/
 static boolean
-undefined_symbol (info, name, abfd, section, address)
-     struct bfd_link_info *info;
+undefined_symbol (info, name, abfd, section, address, fatal)
+     struct bfd_link_info *info ATTRIBUTE_UNUSED;
      const char *name;
      bfd *abfd;
      asection *section;
      bfd_vma address;
+     boolean fatal ATTRIBUTE_UNUSED;
 {
   static char *error_name;
   static unsigned int error_count;
@@ -1136,14 +1232,14 @@ undefined_symbol (info, name, abfd, section, address)
          hash = ((struct bfd_hash_table *)
                  xmalloc (sizeof (struct bfd_hash_table)));
          if (! bfd_hash_table_init (hash, bfd_hash_newfunc))
-           einfo ("%F%P: bfd_hash_table_init failed: %E\n");
+           einfo (_("%F%P: bfd_hash_table_init failed: %E\n"));
        }
 
       if (bfd_hash_lookup (hash, name, false, false) != NULL)
        return true;
 
       if (bfd_hash_lookup (hash, name, true, true) == NULL)
-       einfo ("%F%P: bfd_hash_lookup failed: %E\n");
+       einfo (_("%F%P: bfd_hash_lookup failed: %E\n"));
     }
 
   /* We never print more than a reasonable number of errors in a row
@@ -1156,25 +1252,33 @@ undefined_symbol (info, name, abfd, section, address)
       error_count = 0;
       if (error_name != (char *) NULL)
        free (error_name);
-      error_name = buystring (name);
+      error_name = xstrdup (name);
     }
 
   if (section != NULL)
     {
       if (error_count < MAX_ERRORS_IN_A_ROW)
-       einfo ("%X%C: undefined reference to `%T'\n",
-              abfd, section, address, name);
+       {
+         einfo (_("%C: undefined reference to `%T'\n"),
+                abfd, section, address, name);
+         if (fatal)
+           einfo ("%X");
+       }
       else if (error_count == MAX_ERRORS_IN_A_ROW)
-       einfo ("%D: more undefined references to `%T' follow\n",
+       einfo (_("%D: more undefined references to `%T' follow\n"),
               abfd, section, address, name);
     }
   else
     {
       if (error_count < MAX_ERRORS_IN_A_ROW)
-       einfo ("%X%B: undefined reference to `%T'\n",
-              abfd, name);
+       {
+         einfo (_("%B: undefined reference to `%T'\n"),
+                abfd, name);
+         if (fatal)
+           einfo ("%X");
+       }
       else if (error_count == MAX_ERRORS_IN_A_ROW)
-       einfo ("%B: more undefined references to `%T' follow\n",
+       einfo (_("%B: more undefined references to `%T' follow\n"),
               abfd, name);
     }
 
@@ -1183,10 +1287,9 @@ undefined_symbol (info, name, abfd, section, address)
 
 /* This is called when a reloc overflows.  */
 
-/*ARGSUSED*/
 static boolean
 reloc_overflow (info, name, reloc_name, addend, abfd, section, address)
-     struct bfd_link_info *info;
+     struct bfd_link_info *info ATTRIBUTE_UNUSED;
      const char *name;
      const char *reloc_name;
      bfd_vma addend;
@@ -1195,10 +1298,10 @@ reloc_overflow (info, name, reloc_name, addend, abfd, section, address)
      bfd_vma address;
 {
   if (abfd == (bfd *) NULL)
-    einfo ("%P%X: generated");
+    einfo (_("%P%X: generated"));
   else
     einfo ("%X%C:", abfd, section, address);
-  einfo (" relocation truncated to fit: %s %T", reloc_name, name);
+  einfo (_(" relocation truncated to fit: %s %T"), reloc_name, name);
   if (addend != 0)
     einfo ("+%v", addend);
   einfo ("\n");
@@ -1207,40 +1310,38 @@ reloc_overflow (info, name, reloc_name, addend, abfd, section, address)
 
 /* This is called when a dangerous relocation is made.  */
 
-/*ARGSUSED*/
 static boolean
 reloc_dangerous (info, message, abfd, section, address)
-     struct bfd_link_info *info;
+     struct bfd_link_info *info ATTRIBUTE_UNUSED;
      const char *message;
      bfd *abfd;
      asection *section;
      bfd_vma address;
 {
   if (abfd == (bfd *) NULL)
-    einfo ("%P%X: generated");
+    einfo (_("%P%X: generated"));
   else
     einfo ("%X%C:", abfd, section, address);
-  einfo ("dangerous relocation: %s\n", message);
+  einfo (_("dangerous relocation: %s\n"), message);
   return true;
 }
 
 /* This is called when a reloc is being generated attached to a symbol
    that is not being output.  */
 
-/*ARGSUSED*/
 static boolean
 unattached_reloc (info, name, abfd, section, address)
-     struct bfd_link_info *info;
+     struct bfd_link_info *info ATTRIBUTE_UNUSED;
      const char *name;
      bfd *abfd;
      asection *section;
      bfd_vma address;
 {
   if (abfd == (bfd *) NULL)
-    einfo ("%P%X: generated");
+    einfo (_("%P%X: generated"));
   else
     einfo ("%X%C:", abfd, section, address);
-  einfo (" reloc refers to symbol `%T' which is not being output\n", name);
+  einfo (_(" reloc refers to symbol `%T' which is not being output\n"), name);
   return true;
 }
 
@@ -1259,9 +1360,12 @@ notice (info, name, abfd, section, value)
   if (! info->notice_all
       || (info->notice_hash != NULL
          && bfd_hash_lookup (info->notice_hash, name, false, false) != NULL))
-    einfo ("%B: %s %s\n", abfd,
-          bfd_is_und_section (section) ? "reference to" : "definition of",
-          name);
+    {
+      if (bfd_is_und_section (section))
+       einfo ("%B: reference to %s\n", abfd, name);
+      else
+       einfo ("%B: definition of %s\n", abfd, name);
+    }
 
   if (command_line.cref || nocrossref_list != NULL)
     add_cref (name, abfd, section, value);
This page took 0.038873 seconds and 4 git commands to generate.