* frame.c (read_relative_register_raw_bytes_for_frame): Do not

[deliverable/binutils-gdb.git] / binutils / bucomm.c

diff --git a/binutils/bucomm.c b/binutils/bucomm.c
index 6b4223c2b9fb47551b75772f06f060f09c382ef2..aa3080fa753bd2b623d4eccbc087ff622517f6b5 100644 (file)
--- a/binutils/bucomm.c
+++ b/binutils/bucomm.c
@@ -1,5 +1,6 @@
 /* bucomm.c -- Bin Utils COMmon code.
-   Copyright (C) 1991, 92, 93, 94, 95, 1997 Free Software Foundation, Inc.
+   Copyright 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2000, 2001
+   Free Software Foundation, Inc.
 
    This file is part of GNU Binutils.
 
@@ -24,6 +25,7 @@
 #include "bfd.h"
 #include "libiberty.h"
 #include "bucomm.h"
+#include "filenames.h"
 
 #include <sys/stat.h>
 #include <time.h>              /* ctime, maybe time_t */
@@ -33,14 +35,6 @@
 typedef long time_t;
 #endif
 #endif
-
-#ifdef ANSI_PROTOTYPES
-#include <stdarg.h>
-#else
-#include <varargs.h>
-#endif
-
-char *target = NULL;           /* default as late as possible */
 \f
 /* Error reporting */
 
@@ -66,36 +60,36 @@ bfd_fatal (string)
   xexit (1);
 }
 
-#ifdef ANSI_PROTOTYPES
 void
-fatal (const char *format, ...)
+report (format, args)
+     const char * format;
+     va_list args;
 {
-  va_list args;
-
   fprintf (stderr, "%s: ", program_name);
-  va_start (args, format);
   vfprintf (stderr, format, args);
-  va_end (args);
   putc ('\n', stderr);
-  xexit (1);
 }
-#else
-void 
-fatal (va_alist)
-     va_dcl
+
+void
+fatal VPARAMS ((const char *format, ...))
 {
-  char *Format;
-  va_list args;
+  VA_OPEN (args, format);
+  VA_FIXEDARG (args, const char *, format);
 
-  fprintf (stderr, "%s: ", program_name);
-  va_start (args);
-  Format = va_arg (args, char *);
-  vfprintf (stderr, Format, args);
-  va_end (args);
-  putc ('\n', stderr);
+  report (format, args);
+  VA_CLOSE (args);
   xexit (1);
 }
-#endif
+
+void
+non_fatal VPARAMS ((const char *format, ...))
+{
+  VA_OPEN (args, format);
+  VA_FIXEDARG (args, const char *, format);
+
+  report (format, args);
+  VA_CLOSE (args);
+}
 
 /* Set the default BFD target based on the configured target.  Doing
    this permits the binutils to be configured for a particular target,
@@ -109,13 +103,8 @@ set_default_bfd_target ()
   const char *target = TARGET;
 
   if (! bfd_set_default_target (target))
-    {
-      char *errmsg;
-
-      errmsg = (char *) xmalloc (100 + strlen (target));
-      sprintf (errmsg, "can't set BFD default target to `%s'", target);
-      bfd_fatal (errmsg);
-    }
+    fatal (_("can't set BFD default target to `%s': %s"),
+          target, bfd_errmsg (bfd_get_error ()));
 }
 
 /* After a false return from bfd_check_format_matches with
@@ -126,10 +115,10 @@ void
 list_matching_formats (p)
      char **p;
 {
-  fprintf(stderr, "%s: Matching formats:", program_name);
+  fprintf (stderr, _("%s: Matching formats:"), program_name);
   while (*p)
-    fprintf(stderr, " %s", *p++);
-  fprintf(stderr, "\n");
+    fprintf (stderr, " %s", *p++);
+  fputc ('\n', stderr);
 }
 
 /* List the supported targets.  */
@@ -139,17 +128,36 @@ list_supported_targets (name, f)
      const char *name;
      FILE *f;
 {
-  extern bfd_target *bfd_target_vector[];
+  extern const bfd_target *const *bfd_target_vector;
   int t;
 
   if (name == NULL)
-    fprintf (f, "Supported targets:");
+    fprintf (f, _("Supported targets:"));
   else
-    fprintf (f, "%s: supported targets:", name);
+    fprintf (f, _("%s: supported targets:"), name);
   for (t = 0; bfd_target_vector[t] != NULL; t++)
     fprintf (f, " %s", bfd_target_vector[t]->name);
   fprintf (f, "\n");
 }
+
+/* List the supported architectures.  */
+
+void
+list_supported_architectures (name, f)
+     const char *name;
+     FILE *f;
+{
+  const char** arch;
+
+  if (name == NULL)
+    fprintf (f, _("Supported architectures:"));
+  else
+    fprintf (f, _("%s: supported architectures:"), name);
+
+  for (arch = bfd_arch_list (); *arch; arch++)
+    fprintf (f, " %s", *arch);
+  fprintf (f, "\n");
+}
 \f
 /* Display the archive header for an element as if it were an ls -l listing:
 
@@ -197,9 +205,15 @@ make_tempname (filename)
   char *tmpname;
   char *slash = strrchr (filename, '/');
 
-#if defined (__DJGPP__) || defined (__GO32__) || defined (_WIN32)
-  if (slash == NULL)
-    slash = strrchr (filename, '\\');
+#ifdef HAVE_DOS_BASED_FILE_SYSTEM
+  {
+    /* We could have foo/bar\\baz, or foo\\bar, or d:bar.  */
+    char *bslash = strrchr (filename, '\\');
+    if (slash == NULL || (bslash != NULL && bslash > slash))
+      slash = bslash;
+    if (slash == NULL && filename[0] != '\0' && filename[1] == ':')
+      slash = filename + 1;
+  }
 #endif
 
   if (slash != (char *) NULL)
@@ -208,8 +222,15 @@ make_tempname (filename)
 
       c = *slash;
       *slash = 0;
-      tmpname = xmalloc (strlen (filename) + sizeof (template) + 1);
+      tmpname = xmalloc (strlen (filename) + sizeof (template) + 2);
       strcpy (tmpname, filename);
+#ifdef HAVE_DOS_BASED_FILE_SYSTEM
+      /* If tmpname is "X:", appending a slash will make it a root
+        directory on drive X, which is NOT the same as the current
+        directory on drive X.  */
+      if (tmpname[1] == ':' && tmpname[2] == '\0')
+       strcat (tmpname, ".");
+#endif
       strcat (tmpname, "/");
       strcat (tmpname, template);
       mktemp (tmpname);
@@ -236,10 +257,9 @@ parse_vma (s, arg)
   const char *end;
 
   ret = bfd_scan_vma (s, &end, 0);
+  
   if (*end != '\0')
-    {
-      fprintf (stderr, "%s: %s: bad number: %s\n", program_name, arg, s);
-      exit (1);
-    }
+    fatal (_("%s: bad number: %s"), arg, s);
+
   return ret;
 }