1 /* Print in infix form a struct expression.
3 Copyright (C) 1986-2022 Free Software Foundation, Inc.
5 This file is part of GDB.
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 3 of the License, or
10 (at your option) any later version.
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.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
23 #include "expression.h"
26 #include "parser-defs.h"
27 #include "user-regs.h" /* For user_reg_map_regnum_to_name. */
32 #include "cli/cli-style.h"
39 /* Default name for the standard operator OPCODE (i.e., one defined in
40 the definition of enum exp_opcode). */
43 op_name (enum exp_opcode opcode
)
51 xsnprintf (buf
, sizeof (buf
), "<unknown %d>", opcode
);
57 #include "std-operator.def"
63 dump_prefix_expression (struct expression
*exp
, struct ui_file
*stream
)
65 exp
->op
->dump (stream
, 0);
72 dump_for_expression (struct ui_file
*stream
, int depth
, enum exp_opcode op
)
74 gdb_printf (stream
, _("%*sOperation: %s\n"), depth
, "", op_name (op
));
78 dump_for_expression (struct ui_file
*stream
, int depth
, const std::string
&str
)
80 gdb_printf (stream
, _("%*sString: %s\n"), depth
, "", str
.c_str ());
84 dump_for_expression (struct ui_file
*stream
, int depth
, struct type
*type
)
86 gdb_printf (stream
, _("%*sType: "), depth
, "");
87 type_print (type
, nullptr, stream
, 0);
88 gdb_printf (stream
, "\n");
92 dump_for_expression (struct ui_file
*stream
, int depth
, CORE_ADDR addr
)
94 gdb_printf (stream
, _("%*sConstant: %s\n"), depth
, "",
95 core_addr_to_string (addr
));
99 dump_for_expression (struct ui_file
*stream
, int depth
, internalvar
*ivar
)
101 gdb_printf (stream
, _("%*sInternalvar: $%s\n"), depth
, "",
102 internalvar_name (ivar
));
106 dump_for_expression (struct ui_file
*stream
, int depth
, symbol
*sym
)
108 gdb_printf (stream
, _("%*sSymbol: %s\n"), depth
, "",
113 dump_for_expression (struct ui_file
*stream
, int depth
,
114 bound_minimal_symbol msym
)
116 gdb_printf (stream
, _("%*sMinsym %s in objfile %s\n"), depth
, "",
117 msym
.minsym
->print_name (), objfile_name (msym
.objfile
));
121 dump_for_expression (struct ui_file
*stream
, int depth
, const block
*bl
)
123 gdb_printf (stream
, _("%*sBlock: %p\n"), depth
, "", bl
);
127 dump_for_expression (struct ui_file
*stream
, int depth
,
128 const block_symbol
&sym
)
130 gdb_printf (stream
, _("%*sBlock symbol:\n"), depth
, "");
131 dump_for_expression (stream
, depth
+ 1, sym
.symbol
);
132 dump_for_expression (stream
, depth
+ 1, sym
.block
);
136 dump_for_expression (struct ui_file
*stream
, int depth
,
137 type_instance_flags flags
)
139 gdb_printf (stream
, _("%*sType flags: "), depth
, "");
140 if (flags
& TYPE_INSTANCE_FLAG_CONST
)
141 gdb_puts ("const ", stream
);
142 if (flags
& TYPE_INSTANCE_FLAG_VOLATILE
)
143 gdb_puts ("volatile", stream
);
144 gdb_printf (stream
, "\n");
148 dump_for_expression (struct ui_file
*stream
, int depth
,
149 enum c_string_type_values flags
)
151 gdb_printf (stream
, _("%*sC string flags: "), depth
, "");
152 switch (flags
& ~C_CHAR
)
155 gdb_puts (_("wide "), stream
);
158 gdb_puts (_("u16 "), stream
);
161 gdb_puts (_("u32 "), stream
);
164 gdb_puts (_("ordinary "), stream
);
168 if ((flags
& C_CHAR
) != 0)
169 gdb_puts (_("char"), stream
);
171 gdb_puts (_("string"), stream
);
172 gdb_puts ("\n", stream
);
176 dump_for_expression (struct ui_file
*stream
, int depth
,
177 enum range_flag flags
)
179 gdb_printf (stream
, _("%*sRange:"), depth
, "");
180 if ((flags
& RANGE_LOW_BOUND_DEFAULT
) != 0)
181 gdb_puts (_("low-default "), stream
);
182 if ((flags
& RANGE_HIGH_BOUND_DEFAULT
) != 0)
183 gdb_puts (_("high-default "), stream
);
184 if ((flags
& RANGE_HIGH_BOUND_EXCLUSIVE
) != 0)
185 gdb_puts (_("high-exclusive "), stream
);
186 if ((flags
& RANGE_HAS_STRIDE
) != 0)
187 gdb_puts (_("has-stride"), stream
);
188 gdb_printf (stream
, "\n");
192 dump_for_expression (struct ui_file
*stream
, int depth
,
193 const std::unique_ptr
<ada_component
> &comp
)
195 comp
->dump (stream
, depth
);
199 float_const_operation::dump (struct ui_file
*stream
, int depth
) const
201 gdb_printf (stream
, _("%*sFloat: "), depth
, "");
202 print_floating (m_data
.data (), m_type
, stream
);
203 gdb_printf (stream
, "\n");
206 } /* namespace expr */