123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260 |
- /* Demangler for GNU C++ - main program
- Copyright (C) 1989-2022 Free Software Foundation, Inc.
- Written by James Clark (jjc@jclark.uucp)
- Rewritten by Fred Fish (fnf@cygnus.com) for ARM and Lucid demangling
- Modified by Satish Pai (pai@apollo.hp.com) for HP demangling
- 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 3 of the License, or (at
- your option) any later version.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
- You should have received a copy of the GNU General Public License
- along with GCC; see the file COPYING. If not, write to the Free
- Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
- 02110-1301, USA. */
- #include "sysdep.h"
- #include "bfd.h"
- #include "libiberty.h"
- #include "demangle.h"
- #include "getopt.h"
- #include "safe-ctype.h"
- #include "bucomm.h"
- static int flags = DMGL_PARAMS | DMGL_ANSI | DMGL_VERBOSE;
- static int strip_underscore = TARGET_PREPENDS_UNDERSCORE;
- static const struct option long_options[] =
- {
- {"strip-underscore", no_argument, NULL, '_'},
- {"format", required_argument, NULL, 's'},
- {"help", no_argument, NULL, 'h'},
- {"no-params", no_argument, NULL, 'p'},
- {"no-strip-underscores", no_argument, NULL, 'n'},
- {"no-verbose", no_argument, NULL, 'i'},
- {"types", no_argument, NULL, 't'},
- {"version", no_argument, NULL, 'v'},
- {"recurse-limit", no_argument, NULL, 'R'},
- {"recursion-limit", no_argument, NULL, 'R'},
- {"no-recurse-limit", no_argument, NULL, 'r'},
- {"no-recursion-limit", no_argument, NULL, 'r'},
- {NULL, no_argument, NULL, 0}
- };
- static void
- demangle_it (char *mangled_name)
- {
- char *result;
- unsigned int skip_first = 0;
- /* _ and $ are sometimes found at the start of function names
- in assembler sources in order to distinguish them from other
- names (eg register names). So skip them here. */
- if (mangled_name[0] == '.' || mangled_name[0] == '$')
- ++skip_first;
- if (strip_underscore && mangled_name[skip_first] == '_')
- ++skip_first;
- result = cplus_demangle (mangled_name + skip_first, flags);
- if (result == NULL)
- printf ("%s", mangled_name);
- else
- {
- if (mangled_name[0] == '.')
- putchar ('.');
- printf ("%s", result);
- free (result);
- }
- }
- static void
- print_demangler_list (FILE *stream)
- {
- const struct demangler_engine *demangler;
- fprintf (stream, "{%s", libiberty_demanglers->demangling_style_name);
- for (demangler = libiberty_demanglers + 1;
- demangler->demangling_style != unknown_demangling;
- ++demangler)
- fprintf (stream, ",%s", demangler->demangling_style_name);
- fprintf (stream, "}");
- }
- ATTRIBUTE_NORETURN static void
- usage (FILE *stream, int status)
- {
- fprintf (stream, "\
- Usage: %s [options] [mangled names]\n", program_name);
- fprintf (stream, "\
- Options are:\n\
- [-_|--strip-underscore] Ignore first leading underscore%s\n",
- TARGET_PREPENDS_UNDERSCORE ? " (default)" : "");
- fprintf (stream, "\
- [-n|--no-strip-underscore] Do not ignore a leading underscore%s\n",
- TARGET_PREPENDS_UNDERSCORE ? "" : " (default)");
- fprintf (stream, "\
- [-p|--no-params] Do not display function arguments\n\
- [-i|--no-verbose] Do not show implementation details (if any)\n\
- [-R|--recurse-limit] Enable a limit on recursion whilst demangling. [Default]\n\
- ]-r|--no-recurse-limit] Disable a limit on recursion whilst demangling\n\
- [-t|--types] Also attempt to demangle type encodings\n\
- [-s|--format ");
- print_demangler_list (stream);
- fprintf (stream, "]\n");
- fprintf (stream, "\
- [@<file>] Read extra options from <file>\n\
- [-h|--help] Display this information\n\
- [-v|--version] Show the version information\n\
- Demangled names are displayed to stdout.\n\
- If a name cannot be demangled it is just echoed to stdout.\n\
- If no names are provided on the command line, stdin is read.\n");
- if (REPORT_BUGS_TO[0] && status == 0)
- fprintf (stream, _("Report bugs to %s.\n"), REPORT_BUGS_TO);
- exit (status);
- }
- /* Return the string of non-alnum characters that may occur
- as a valid symbol component, in the standard assembler symbol
- syntax. */
- static const char *
- standard_symbol_characters (void)
- {
- return "_$.";
- }
- extern int main (int, char **);
- int
- main (int argc, char **argv)
- {
- int c;
- const char *valid_symbols;
- enum demangling_styles style = auto_demangling;
- program_name = argv[0];
- xmalloc_set_program_name (program_name);
- bfd_set_error_program_name (program_name);
- expandargv (&argc, &argv);
- while ((c = getopt_long (argc, argv, "_hinprRs:tv", long_options, (int *) 0)) != EOF)
- {
- switch (c)
- {
- case '?':
- usage (stderr, 1);
- break;
- case 'h':
- usage (stdout, 0);
- case 'n':
- strip_underscore = 0;
- break;
- case 'p':
- flags &= ~ DMGL_PARAMS;
- break;
- case 'r':
- flags |= DMGL_NO_RECURSE_LIMIT;
- break;
- case 'R':
- flags &= ~ DMGL_NO_RECURSE_LIMIT;
- break;
- case 't':
- flags |= DMGL_TYPES;
- break;
- case 'i':
- flags &= ~ DMGL_VERBOSE;
- break;
- case 'v':
- print_version ("c++filt");
- return 0;
- case '_':
- strip_underscore = 1;
- break;
- case 's':
- style = cplus_demangle_name_to_style (optarg);
- if (style == unknown_demangling)
- {
- fprintf (stderr, "%s: unknown demangling style `%s'\n",
- program_name, optarg);
- return 1;
- }
- cplus_demangle_set_style (style);
- break;
- }
- }
- if (optind < argc)
- {
- for ( ; optind < argc; optind++)
- {
- demangle_it (argv[optind]);
- putchar ('\n');
- }
- return 0;
- }
- switch (current_demangling_style)
- {
- case auto_demangling:
- case gnu_v3_demangling:
- case java_demangling:
- case gnat_demangling:
- case dlang_demangling:
- case rust_demangling:
- valid_symbols = standard_symbol_characters ();
- break;
- default:
- /* Folks should explicitly indicate the appropriate alphabet for
- each demangling. Providing a default would allow the
- question to go unconsidered. */
- fatal ("Internal error: no symbol alphabet for current style");
- }
- for (;;)
- {
- static char mbuffer[32767];
- unsigned i = 0;
- c = getchar ();
- /* Try to read a mangled name. */
- while (c != EOF && (ISALNUM (c) || strchr (valid_symbols, c)))
- {
- if (i >= sizeof (mbuffer) - 1)
- break;
- mbuffer[i++] = c;
- c = getchar ();
- }
- if (i > 0)
- {
- mbuffer[i] = 0;
- demangle_it (mbuffer);
- }
- if (c == EOF)
- break;
- /* Echo the whitespace characters so that the output looks
- like the input, only with the mangled names demangled. */
- putchar (c);
- if (c == '\n')
- fflush (stdout);
- }
- fflush (stdout);
- return 0;
- }
|