2000-12-19 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
[deliverable/binutils-gdb.git] / gdb / demangle.c
CommitLineData
c906108c
SS
1/* Basic C++ demangling support for GDB.
2 Copyright 1991, 1992, 1996, 1999 Free Software Foundation, Inc.
3 Written by Fred Fish at Cygnus Support.
4
5 This file is part of GDB.
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
c5aa993b
JM
19 Foundation, Inc., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
c906108c
SS
21
22
23/* This file contains support code for C++ demangling that is common
24 to a styles of demangling, and GDB specific. */
25
26#include "defs.h"
27#include "command.h"
28#include "gdbcmd.h"
29#include "demangle.h"
30#include "gdb_string.h"
31
32/* Select the default C++ demangling style to use. The default is "auto",
33 which allows gdb to attempt to pick an appropriate demangling style for
34 the executable it has loaded. It can be set to a specific style ("gnu",
35 "lucid", "arm", "hp", etc.) in which case gdb will never attempt to do auto
36 selection of the style unless you do an explicit "set demangle auto".
37 To select one of these as the default, set DEFAULT_DEMANGLING_STYLE in
38 the appropriate target configuration file. */
39
40#ifndef DEFAULT_DEMANGLING_STYLE
41#define DEFAULT_DEMANGLING_STYLE AUTO_DEMANGLING_STYLE_STRING
42#endif
43
a14ed312 44extern void _initialize_demangler (void);
392a587b 45
c906108c
SS
46/* String name for the current demangling style. Set by the
47 "set demangle-style" command, printed as part of the output by the
48 "show demangle-style" command. */
49
50static char *current_demangling_style_string;
51
a14ed312 52static void set_demangling_command (char *, int, struct cmd_list_element *);
c906108c
SS
53
54/* Set current demangling style. Called by the "set demangle-style"
55 command after it has updated the current_demangling_style_string to
56 match what the user has entered.
57
58 If the user has entered a string that matches a known demangling style
59 name in the demanglers[] array then just leave the string alone and update
60 the current_demangling_style enum value to match.
61
62 If the user has entered a string that doesn't match, including an empty
63 string, then print a list of the currently known styles and restore
64 the current_demangling_style_string to match the current_demangling_style
65 enum value.
66
67 Note: Assumes that current_demangling_style_string always points to
68 a malloc'd string, even if it is a null-string. */
69
70static void
fba45db2 71set_demangling_command (char *ignore, int from_tty, struct cmd_list_element *c)
c906108c 72{
770de199 73 const struct demangler_engine *dem;
c906108c
SS
74
75 /* First just try to match whatever style name the user supplied with
76 one of the known ones. Don't bother special casing for an empty
77 name, we just treat it as any other style name that doesn't match.
78 If we match, update the current demangling style enum. */
79
770de199
DB
80 for (dem = libiberty_demanglers;
81 dem->demangling_style != unknown_demangling;
82 dem++)
c906108c
SS
83 {
84 if (STREQ (current_demangling_style_string,
85 dem->demangling_style_name))
86 {
87 current_demangling_style = dem->demangling_style;
88 break;
89 }
90 }
91
92 /* Check to see if we found a match. If not, gripe about any non-empty
93 style name and supply a list of valid ones. FIXME: This should
94 probably be done with some sort of completion and with help. */
95
770de199 96 if (dem->demangling_style == unknown_demangling)
c906108c
SS
97 {
98 if (*current_demangling_style_string != '\0')
99 {
100 printf_unfiltered ("Unknown demangling style `%s'.\n",
101 current_demangling_style_string);
102 }
103 printf_unfiltered ("The currently understood settings are:\n\n");
770de199
DB
104 for (dem = libiberty_demanglers;
105 dem->demangling_style != unknown_demangling;
106 dem++)
c906108c
SS
107 {
108 printf_unfiltered ("%-10s %s\n", dem->demangling_style_name,
109 dem->demangling_style_doc);
110 if (dem->demangling_style == current_demangling_style)
111 {
b8c9b27d 112 xfree (current_demangling_style_string);
c906108c
SS
113 current_demangling_style_string =
114 savestring (dem->demangling_style_name,
115 strlen (dem->demangling_style_name));
116 }
117 }
118 if (current_demangling_style == unknown_demangling)
119 {
120 /* This can happen during initialization if gdb is compiled with
121 a DEMANGLING_STYLE value that is unknown, so pick the first
122 one as the default. */
770de199 123 current_demangling_style = libiberty_demanglers[0].demangling_style;
c906108c 124 current_demangling_style_string =
770de199
DB
125 savestring (
126 libiberty_demanglers[0].demangling_style_name,
127 strlen (libiberty_demanglers[0].demangling_style_name));
c906108c
SS
128 warning ("`%s' style demangling chosen as the default.\n",
129 current_demangling_style_string);
130 }
131 }
132}
133
134/* Fake a "set demangle-style" command. */
135
136void
fba45db2 137set_demangling_style (char *style)
c906108c
SS
138{
139 if (current_demangling_style_string != NULL)
140 {
b8c9b27d 141 xfree (current_demangling_style_string);
c906108c
SS
142 }
143 current_demangling_style_string = savestring (style, strlen (style));
144 set_demangling_command ((char *) NULL, 0, (struct cmd_list_element *) NULL);
145}
146
147/* In order to allow a single demangler executable to demangle strings
148 using various common values of CPLUS_MARKER, as well as any specific
149 one set at compile time, we maintain a string containing all the
150 commonly used ones, and check to see if the marker we are looking for
151 is in that string. CPLUS_MARKER is usually '$' on systems where the
152 assembler can deal with that. Where the assembler can't, it's usually
153 '.' (but on many systems '.' is used for other things). We put the
154 current defined CPLUS_MARKER first (which defaults to '$'), followed
155 by the next most common value, followed by an explicit '$' in case
156 the value of CPLUS_MARKER is not '$'.
157
158 We could avoid this if we could just get g++ to tell us what the actual
159 cplus marker character is as part of the debug information, perhaps by
160 ensuring that it is the character that terminates the gcc<n>_compiled
161 marker symbol (FIXME). */
162
c5aa993b
JM
163static char cplus_markers[] =
164{CPLUS_MARKER, '.', '$', '\0'};
c906108c
SS
165
166int
fba45db2 167is_cplus_marker (int c)
c906108c
SS
168{
169 return c && strchr (cplus_markers, c) != NULL;
170}
171
172void
fba45db2 173_initialize_demangler (void)
c906108c
SS
174{
175 struct cmd_list_element *set, *show;
176
177 set = add_set_cmd ("demangle-style", class_support, var_string_noescape,
178 (char *) &current_demangling_style_string,
179 "Set the current C++ demangling style.\n\
180Use `set demangle-style' without arguments for a list of demangling styles.",
181 &setlist);
182 show = add_show_from_set (set, &showlist);
183 set->function.sfunc = set_demangling_command;
184
185 /* Set the default demangling style chosen at compilation time. */
186 set_demangling_style (DEFAULT_DEMANGLING_STYLE);
187 set_cplus_marker_for_demangling (CPLUS_MARKER);
188}
This page took 0.080734 seconds and 4 git commands to generate.