Change boolean options to bool instead of int
[deliverable/binutils-gdb.git] / gdb / demangle.c
index 669d9abcd28fca8a83a0bcce97f8edd61d1968cb..cfe3421b23c9e2f29a7589fb11ec37a75b783b0e 100644 (file)
@@ -1,12 +1,14 @@
 /* Basic C++ demangling support for GDB.
-   Copyright 1991, 1992, 1996, 1999 Free Software Foundation, Inc.
+
+   Copyright (C) 1991-2019 Free Software Foundation, Inc.
+
    Written by Fred Fish at Cygnus Support.
 
    This file is part of GDB.
 
    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,
    GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
 
 
 /*  This file contains support code for C++ demangling that is common
-   to a styles of demangling, and GDB specific. */
+   to a styles of demangling, and GDB specific.  */
 
 #include "defs.h"
+#include "cli/cli-utils.h" /* for skip_to_space */
 #include "command.h"
 #include "gdbcmd.h"
 #include "demangle.h"
-#include "gdb_string.h"
+#include "gdb-demangle.h"
+#include "language.h"
 
 /* Select the default C++ demangling style to use.  The default is "auto",
    which allows gdb to attempt to pick an appropriate demangling style for
    "lucid", "arm", "hp", etc.) in which case gdb will never attempt to do auto
    selection of the style unless you do an explicit "set demangle auto".
    To select one of these as the default, set DEFAULT_DEMANGLING_STYLE in
-   the appropriate target configuration file. */
+   the appropriate target configuration file.  */
 
 #ifndef DEFAULT_DEMANGLING_STYLE
 #define DEFAULT_DEMANGLING_STYLE AUTO_DEMANGLING_STYLE_STRING
 #endif
 
-/* String name for the current demangling style.  Set by the
-   "set demangle-style" command, printed as part of the output by the
-   "show demangle-style" command. */
+/* See documentation in gdb-demangle.h.  */
+bool demangle = true;
 
-static char *current_demangling_style_string;
+static void
+show_demangle (struct ui_file *file, int from_tty,
+              struct cmd_list_element *c, const char *value)
+{
+  fprintf_filtered (file,
+                   _("Demangling of encoded C++/ObjC names "
+                     "when displaying symbols is %s.\n"),
+                   value);
+}
 
-/* List of supported demangling styles.  Contains the name of the style as
-   seen by the user, and the enum value that corresponds to that style. */
+/* See documentation in gdb-demangle.h.  */
+bool asm_demangle = false;
 
-static const struct demangler
-  {
-    char *demangling_style_name;
-    enum demangling_styles demangling_style;
-    char *demangling_style_doc;
-  }
-demanglers[] =
+static void
+show_asm_demangle (struct ui_file *file, int from_tty,
+                  struct cmd_list_element *c, const char *value)
 {
-  {
-    AUTO_DEMANGLING_STYLE_STRING,
-      auto_demangling,
-      "Automatic selection based on executable"
-  }
-  ,
-  {
-    GNU_DEMANGLING_STYLE_STRING,
-      gnu_demangling,
-      "GNU (g++) style demangling"
-  }
-  ,
-  {
-    LUCID_DEMANGLING_STYLE_STRING,
-      lucid_demangling,
-      "Lucid (lcc) style demangling"
-  }
-  ,
-  {
-    ARM_DEMANGLING_STYLE_STRING,
-      arm_demangling,
-      "ARM style demangling"
-  }
-  ,
-  {
-    HP_DEMANGLING_STYLE_STRING,
-      hp_demangling,
-      "HP (aCC) style demangling"
-  }
-  ,
-  {
-    EDG_DEMANGLING_STYLE_STRING,
-      edg_demangling,
-      "EDG style demangling"
-  }
-  ,
-  {
-    NULL, unknown_demangling, NULL
-  }
-};
+  fprintf_filtered (file,
+                   _("Demangling of C++/ObjC names in "
+                     "disassembly listings is %s.\n"),
+                   value);
+}
+
+/* String name for the current demangling style.  Set by the
+   "set demangle-style" command, printed as part of the output by the
+   "show demangle-style" command.  */
+
+static const char *current_demangling_style_string;
 
+/* The array of names of the known demanglyng styles.  Generated by
+   _initialize_demangler from libiberty_demanglers[] array.  */
+
+static const char **demangling_style_names;
 static void
-set_demangling_command PARAMS ((char *, int, struct cmd_list_element *));
+show_demangling_style_names(struct ui_file *file, int from_tty,
+                           struct cmd_list_element *c, const char *value)
+{
+  fprintf_filtered (file, _("The current C++ demangling style is \"%s\".\n"),
+                   value);
+}
 
 /* Set current demangling style.  Called by the "set demangle-style"
    command after it has updated the current_demangling_style_string to
@@ -115,123 +101,168 @@ set_demangling_command PARAMS ((char *, int, struct cmd_list_element *));
    enum value.
 
    Note:  Assumes that current_demangling_style_string always points to
-   a malloc'd string, even if it is a null-string. */
+   a malloc'd string, even if it is a null-string.  */
 
 static void
-set_demangling_command (ignore, from_tty, c)
-     char *ignore;
-     int from_tty;
-     struct cmd_list_element *c;
+set_demangling_command (const char *ignore,
+                       int from_tty, struct cmd_list_element *c)
 {
-  const struct demangler *dem;
+  const struct demangler_engine *dem;
+  int i;
 
   /*  First just try to match whatever style name the user supplied with
      one of the known ones.  Don't bother special casing for an empty
      name, we just treat it as any other style name that doesn't match.
-     If we match, update the current demangling style enum. */
+     If we match, update the current demangling style enum.  */
 
-  for (dem = demanglers; dem->demangling_style_name != NULL; dem++)
+  for (dem = libiberty_demanglers, i = 0;
+       dem->demangling_style != unknown_demangling; 
+       dem++)
     {
-      if (STREQ (current_demangling_style_string,
-                dem->demangling_style_name))
+      if (strcmp (current_demangling_style_string,
+                 dem->demangling_style_name) == 0)
        {
          current_demangling_style = dem->demangling_style;
+         current_demangling_style_string = demangling_style_names[i];
          break;
        }
+      i++;
     }
 
-  /* Check to see if we found a match.  If not, gripe about any non-empty
-     style name and supply a list of valid ones.  FIXME:  This should
-     probably be done with some sort of completion and with help. */
+  /* We should have found a match, given we only add known styles to
+     the enumeration list.  */
+  gdb_assert (dem->demangling_style != unknown_demangling);
+}
 
-  if (dem->demangling_style_name == NULL)
-    {
-      if (*current_demangling_style_string != '\0')
-       {
-         printf_unfiltered ("Unknown demangling style `%s'.\n",
-                            current_demangling_style_string);
-       }
-      printf_unfiltered ("The currently understood settings are:\n\n");
-      for (dem = demanglers; dem->demangling_style_name != NULL; dem++)
-       {
-         printf_unfiltered ("%-10s %s\n", dem->demangling_style_name,
-                            dem->demangling_style_doc);
-         if (dem->demangling_style == current_demangling_style)
-           {
-             free (current_demangling_style_string);
-             current_demangling_style_string =
-               savestring (dem->demangling_style_name,
-                           strlen (dem->demangling_style_name));
-           }
-       }
-      if (current_demangling_style == unknown_demangling)
-       {
-         /* This can happen during initialization if gdb is compiled with
-            a DEMANGLING_STYLE value that is unknown, so pick the first
-            one as the default. */
-         current_demangling_style = demanglers[0].demangling_style;
-         current_demangling_style_string =
-           savestring (demanglers[0].demangling_style_name,
-                       strlen (demanglers[0].demangling_style_name));
-         warning ("`%s' style demangling chosen as the default.\n",
-                  current_demangling_style_string);
-       }
-    }
+/* G++ uses a special character to indicate certain internal names.  Which
+   character it is depends on the platform:
+   - Usually '$' on systems where the assembler will accept that
+   - Usually '.' otherwise (this includes most sysv4-like systems and most
+     ELF targets)
+   - Occasionally '_' if neither of the above is usable
+
+   We check '$' first because it is the safest, and '.' often has another
+   meaning.  We don't currently try to handle '_' because the precise forms
+   of the names are different on those targets.  */
+
+static char cplus_markers[] = {'$', '.', '\0'};
+
+/* See documentation in gdb-demangle.h.  */
+
+int
+is_cplus_marker (int c)
+{
+  return c && strchr (cplus_markers, c) != NULL;
 }
 
-/* Fake a "set demangle-style" command. */
+/* Demangle the given string in the current language.  */
 
-void
-set_demangling_style (style)
-     char *style;
+static void
+demangle_command (const char *args, int from_tty)
 {
-  if (current_demangling_style_string != NULL)
+  char *demangled;
+  const char *name;
+  const char *arg_start;
+  int processing_args = 1;
+  const struct language_defn *lang;
+
+  std::string arg_buf = args != NULL ? args : "";
+  arg_start = arg_buf.c_str ();
+
+  std::string lang_name;
+  while (processing_args
+        && *arg_start == '-')
     {
-      free (current_demangling_style_string);
+      const char *p = skip_to_space (arg_start);
+
+      if (strncmp (arg_start, "-l", p - arg_start) == 0)
+       lang_name = extract_arg (&p);
+      else if (strncmp (arg_start, "--", p - arg_start) == 0)
+       processing_args = 0;
+      else
+       report_unrecognized_option_error ("demangle", arg_start);
+
+      arg_start = skip_spaces (p);
     }
-  current_demangling_style_string = savestring (style, strlen (style));
-  set_demangling_command ((char *) NULL, 0, (struct cmd_list_element *) NULL);
-}
 
-/* In order to allow a single demangler executable to demangle strings
-   using various common values of CPLUS_MARKER, as well as any specific
-   one set at compile time, we maintain a string containing all the
-   commonly used ones, and check to see if the marker we are looking for
-   is in that string.  CPLUS_MARKER is usually '$' on systems where the
-   assembler can deal with that.  Where the assembler can't, it's usually
-   '.' (but on many systems '.' is used for other things).  We put the
-   current defined CPLUS_MARKER first (which defaults to '$'), followed
-   by the next most common value, followed by an explicit '$' in case
-   the value of CPLUS_MARKER is not '$'.
+  name = arg_start;
 
-   We could avoid this if we could just get g++ to tell us what the actual
-   cplus marker character is as part of the debug information, perhaps by
-   ensuring that it is the character that terminates the gcc<n>_compiled
-   marker symbol (FIXME). */
+  if (*name == '\0')
+    error (_("Usage: demangle [-l LANGUAGE] [--] NAME"));
 
-static char cplus_markers[] = {CPLUS_MARKER, '.', '$', '\0'};
+  if (!lang_name.empty ())
+    {
+      enum language lang_enum;
 
-int
-is_cplus_marker (c)
-     int c;
-{
-  return c && strchr (cplus_markers, c) != NULL;
+      lang_enum = language_enum (lang_name.c_str ());
+      if (lang_enum == language_unknown)
+       error (_("Unknown language \"%s\""), lang_name.c_str ());
+      lang = language_def (lang_enum);
+    }
+  else
+    lang = current_language;
+
+  demangled = language_demangle (lang, name, DMGL_ANSI | DMGL_PARAMS);
+  if (demangled != NULL)
+    {
+      printf_filtered ("%s\n", demangled);
+      xfree (demangled);
+    }
+  else
+    error (_("Can't demangle \"%s\""), name);
 }
 
 void
-_initialize_demangler ()
+_initialize_demangler (void)
 {
-  struct cmd_list_element *set, *show;
-
-  set = add_set_cmd ("demangle-style", class_support, var_string_noescape,
-                    (char *) &current_demangling_style_string,
-                    "Set the current C++ demangling style.\n\
-Use `set demangle-style' without arguments for a list of demangling styles.",
-                    &setlist);
-  show = add_show_from_set (set, &showlist);
-  set->function.sfunc = set_demangling_command;
-
-  /* Set the default demangling style chosen at compilation time. */
-  set_demangling_style (DEFAULT_DEMANGLING_STYLE);
-  set_cplus_marker_for_demangling (CPLUS_MARKER);
+  int i, ndems;
+
+  /* Fill the demangling_style_names[] array, and set the default
+     demangling style chosen at compilation time.  */
+  for (ndems = 0;
+       libiberty_demanglers[ndems].demangling_style != unknown_demangling; 
+       ndems++)
+    ;
+  demangling_style_names = XCNEWVEC (const char *, ndems + 1);
+  for (i = 0;
+       libiberty_demanglers[i].demangling_style != unknown_demangling; 
+       i++)
+    {
+      demangling_style_names[i]
+       = xstrdup (libiberty_demanglers[i].demangling_style_name);
+
+      if (current_demangling_style_string == NULL
+         && strcmp (DEFAULT_DEMANGLING_STYLE, demangling_style_names[i]) == 0)
+       current_demangling_style_string = demangling_style_names[i];
+    }
+
+  add_setshow_boolean_cmd ("demangle", class_support, &demangle, _("\
+Set demangling of encoded C++/ObjC names when displaying symbols."), _("\
+Show demangling of encoded C++/ObjC names when displaying symbols."), NULL,
+                          NULL,
+                          show_demangle,
+                          &setprintlist, &showprintlist);
+
+  add_setshow_boolean_cmd ("asm-demangle", class_support, &asm_demangle, _("\
+Set demangling of C++/ObjC names in disassembly listings."), _("\
+Show demangling of C++/ObjC names in disassembly listings."), NULL,
+                          NULL,
+                          show_asm_demangle,
+                          &setprintlist, &showprintlist);
+
+  add_setshow_enum_cmd ("demangle-style", class_support,
+                       demangling_style_names,
+                       &current_demangling_style_string, _("\
+Set the current C++ demangling style."), _("\
+Show the current C++ demangling style."), _("\
+Use `set demangle-style' without arguments for a list of demangling styles."),
+                       set_demangling_command,
+                       show_demangling_style_names,
+                       &setlist, &showlist);
+
+  add_cmd ("demangle", class_support, demangle_command, _("\
+Demangle a mangled name.\n\
+Usage: demangle [-l LANGUAGE] [--] NAME\n\
+If LANGUAGE is not specified, NAME is demangled in the current language."),
+          &cmdlist);
 }
This page took 0.036309 seconds and 4 git commands to generate.