arc: Add support for ARC HS extra registers in core files
[deliverable/binutils-gdb.git] / binutils / emul_aix.c
index 4caf6529a26057a4611f8953d56e21976cfd6d6b..c54e1083e5d5e91a6e74dcb5b6e4fdde45e502ef 100644 (file)
@@ -1,12 +1,12 @@
 /* Binutils emulation layer.
-   Copyright (C) 2002 Free Software Foundation, Inc.
-   Written by Tom Rix, Redhat.
+   Copyright (C) 2002-2020 Free Software Foundation, Inc.
+   Written by Tom Rix, Red Hat Inc.
 
    This file is part of GNU Binutils.
 
    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
+   the Free Software Foundation; either version 3 of the License, or
    (at your option) any later version.
 
    This program is distributed in the hope that it will be useful,
@@ -16,7 +16,8 @@
 
    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.  */
+   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
+   MA 02110-1301, USA.  */
 
 #include "binemul.h"
 #include "bfdlink.h"
 #include "libxcoff.h"
 
 /* Default to <bigaf>.  */
-static boolean big_archive = true;
+/* FIXME: write only variable.  */
+static bfd_boolean big_archive = TRUE;
 
 /* Whether to include 32 bit objects.  */
-static boolean X32 = true;
+static bfd_boolean X32 = TRUE;
 
 /* Whether to include 64 bit objects.  */
-static boolean X64 = false;
-
-static void    ar_emul_aix_usage     PARAMS ((FILE *));
-static boolean ar_emul_aix_append    PARAMS ((bfd **, char *, boolean));
-static boolean ar_emul_aix5_append   PARAMS ((bfd **, char *, boolean));
-static boolean ar_emul_aix_replace   PARAMS ((bfd **, char *, boolean));
-static boolean ar_emul_aix5_replace  PARAMS ((bfd **, char *, boolean));
-static boolean ar_emul_aix_parse_arg PARAMS ((char *));
-static boolean ar_emul_aix_internal  PARAMS ((bfd **, char *, boolean,
-                                             const char *, boolean));
+static bfd_boolean X64 = FALSE;
 
 static void
-ar_emul_aix_usage (fp)
-     FILE *fp;
+ar_emul_aix_usage (FILE *fp)
 {
   AR_EMUL_USAGE_PRINT_OPTION_HEADER (fp);
   /* xgettext:c-format */
@@ -55,142 +47,88 @@ ar_emul_aix_usage (fp)
   fprintf (fp, _("  [-X32_64]    - accepts 32 and 64 bit objects\n"));
 }
 
-static boolean
-ar_emul_aix_internal (after_bfd, file_name, verbose, target_name, is_append)
-     bfd **after_bfd;
-     char *file_name;
-     boolean verbose;
-     const char * target_name;
-     boolean is_append;
+static bfd_boolean
+check_aix (bfd *try_bfd)
 {
-  bfd *temp;
-  bfd *try_bfd;
-
-  temp = *after_bfd;
-
-  /* Try 64 bit.  */
-  try_bfd = bfd_openr (file_name, target_name);
-
-  /* Failed or the object is possibly 32 bit.  */
-  if (NULL == try_bfd || ! bfd_check_format (try_bfd, bfd_object))
-    try_bfd = bfd_openr (file_name, "aixcoff-rs6000");
-
-  AR_EMUL_ELEMENT_CHECK (try_bfd, file_name);
-
-  if (bfd_xcoff_is_xcoff64 (try_bfd) && (! X64))
-    return false;
-
-  if (bfd_xcoff_is_xcoff32 (try_bfd)
-      && bfd_check_format (try_bfd, bfd_object) && (! X32))
-    return false;
+  extern const bfd_target rs6000_xcoff_vec;
+  extern const bfd_target rs6000_xcoff64_vec;
+  extern const bfd_target rs6000_xcoff64_aix_vec;
 
-  if (is_append)
+  if (bfd_check_format (try_bfd, bfd_object))
     {
-      AR_EMUL_APPEND_PRINT_VERBOSE (verbose, file_name);
-    }
-  else
-    {
-      AR_EMUL_REPLACE_PRINT_VERBOSE (verbose, file_name);
-    }
-
-  *after_bfd = try_bfd;
-  (*after_bfd)->next = temp;
+      if (!X32 && try_bfd->xvec == &rs6000_xcoff_vec)
+       return FALSE;
 
-  return true;
+      if (!X64 && (try_bfd->xvec == &rs6000_xcoff64_vec
+                  || try_bfd->xvec == &rs6000_xcoff64_aix_vec))
+       return FALSE;
+    }
+  return TRUE;
 }
 
-
-static boolean
-ar_emul_aix_append (after_bfd, file_name, verbose)
-     bfd **after_bfd;
-     char *file_name;
-     boolean verbose;
+static bfd_boolean
+ar_emul_aix_append (bfd **after_bfd, char *file_name, const char *target,
+                   bfd_boolean verbose, bfd_boolean flatten)
 {
-  return ar_emul_aix_internal (after_bfd, file_name, verbose,
-                              "aixcoff64-rs6000", true);
-}
+  bfd *new_bfd;
 
-static boolean
-ar_emul_aix5_append (after_bfd, file_name, verbose)
-     bfd **after_bfd;
-     char *file_name;
-     boolean verbose;
-{
-  return ar_emul_aix_internal (after_bfd, file_name, verbose,
-                              "aix5coff64-rs6000", true);
-}
+  new_bfd = bfd_openr (file_name, target);
+  AR_EMUL_ELEMENT_CHECK (new_bfd, file_name);
 
-static boolean
-ar_emul_aix_replace (after_bfd, file_name, verbose)
-     bfd **after_bfd;
-     char *file_name;
-     boolean verbose;
-{
-  return ar_emul_aix_internal (after_bfd, file_name, verbose,
-                              "aixcoff64-rs6000", false);
+  return do_ar_emul_append (after_bfd, new_bfd, verbose, flatten, check_aix);
 }
 
-static boolean
-ar_emul_aix5_replace (after_bfd, file_name, verbose)
-     bfd **after_bfd;
-     char *file_name;
-     boolean verbose;
+static bfd_boolean
+ar_emul_aix_replace (bfd **after_bfd, char *file_name, const char *target,
+                    bfd_boolean verbose)
 {
-  return ar_emul_aix_internal (after_bfd, file_name, verbose,
-                              "aix5coff64-rs6000", false);
-}
+  bfd *new_bfd;
 
-boolean
-ar_emul_aix_create (abfd_out, archive_file_name, file_name)
-     bfd **abfd_out;
-     char *archive_file_name;
-     char *file_name ATTRIBUTE_UNUSED;
-{
-  char *target = "aixcoff-rs6000";
+  new_bfd = bfd_openr (file_name, target);
+  AR_EMUL_ELEMENT_CHECK (new_bfd, file_name);
 
-  /* Create an empty archive.  */
-  *abfd_out = bfd_openw (archive_file_name, target);
+  if (!check_aix (new_bfd))
+    return FALSE;
 
-  if (*abfd_out == NULL)
-    bfd_fatal (archive_file_name);
+  AR_EMUL_REPLACE_PRINT_VERBOSE (verbose, file_name);
 
-  /* set to small or big format.  */
-  /* not done.  */
-  return true;
+  new_bfd->archive_next = *after_bfd;
+  *after_bfd = new_bfd;
+
+  return TRUE;
 }
 
-static boolean
-ar_emul_aix_parse_arg (arg)
-     char *arg;
+static bfd_boolean
+ar_emul_aix_parse_arg (char *arg)
 {
-  if (strncmp (arg, "-X32_64", 6) == 0)
+  if (CONST_STRNEQ (arg, "-X32_64"))
     {
-      big_archive = true;
-      X32 = true;
-      X64 = true;
+      big_archive = TRUE;
+      X32 = TRUE;
+      X64 = TRUE;
     }
-  else if (strncmp (arg, "-X32", 3) == 0)
+  else if (CONST_STRNEQ (arg, "-X32"))
     {
-      big_archive = true;
-      X32 = true;
-      X64 = false;
+      big_archive = TRUE;
+      X32 = TRUE;
+      X64 = FALSE;
     }
-  else if (strncmp (arg, "-X64", 3) == 0)
+  else if (CONST_STRNEQ (arg, "-X64"))
     {
-      big_archive = true;
-      X32 = false;
-      X64 = true;
+      big_archive = TRUE;
+      X32 = FALSE;
+      X64 = TRUE;
     }
-  else if (strncmp (arg, "-g", 2) == 0)
+  else if (CONST_STRNEQ (arg, "-g"))
     {
-      big_archive = false;
-      X32 = true;
-      X64 = false;
+      big_archive = FALSE;
+      X32 = TRUE;
+      X64 = FALSE;
     }
   else
-    return false;
+    return FALSE;
 
-  return true;
+  return TRUE;
 }
 
 struct bin_emulation_xfer_struct bin_aix_emulation =
@@ -198,15 +136,5 @@ struct bin_emulation_xfer_struct bin_aix_emulation =
   ar_emul_aix_usage,
   ar_emul_aix_append,
   ar_emul_aix_replace,
-  ar_emul_default_create,
-  ar_emul_aix_parse_arg,
-};
-
-struct bin_emulation_xfer_struct bin_aix5_emulation =
-{
-  ar_emul_aix_usage,
-  ar_emul_aix5_append,
-  ar_emul_aix5_replace,
-  ar_emul_default_create,
   ar_emul_aix_parse_arg,
 };
This page took 0.036565 seconds and 4 git commands to generate.