Fix defaults of some "maint test-settings" subcommands
[external/binutils.git] / gdb / maint-test-settings.c
1 /* Support for GDB maintenance commands.
2
3    Copyright (C) 2019 Free Software Foundation, Inc.
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 3 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, see <http://www.gnu.org/licenses/>.  */
19
20
21 #include "defs.h"
22 #include "gdbcmd.h"
23
24 /* Command list for "maint test-settings".  */
25 static cmd_list_element *maintenance_test_settings_list;
26
27 /* Command list for "maint test-settings set/show".  */
28 static cmd_list_element *maintenance_test_settings_set_list;
29 static cmd_list_element *maintenance_test_settings_show_list;
30
31 /* The "maintenance test-options" prefix command.  */
32
33 static void
34 maintenance_test_settings_cmd (const char *arg, int from_tty)
35 {
36   printf_unfiltered
37     (_("\"maintenance test-settings\" must be followed "
38        "by the name of a subcommand.\n"));
39   help_list (maintenance_test_settings_list, "maintenance test-settings ",
40              all_commands, gdb_stdout);
41 }
42
43 /* The "maintenance test-options set" prefix command.  */
44
45 static void
46 maintenance_test_settings_set_cmd (const char *args, int from_tty)
47 {
48   printf_unfiltered (_("\"maintenance test-settings set\" must be followed "
49                        "by the name of a set command.\n"));
50   help_list (maintenance_test_settings_set_list,
51              "maintenance test-settings set ",
52              all_commands, gdb_stdout);
53 }
54
55 /* The "maintenance test-options show" prefix command.  */
56
57 static void
58 maintenance_test_settings_show_cmd (const char *args, int from_tty)
59 {
60   cmd_show_list (maintenance_test_settings_show_list, from_tty, "");
61 }
62
63 /* Control variables for all the "maintenance test-options set/show
64    xxx" commands.  */
65
66 static int maintenance_test_settings_boolean;
67
68 static auto_boolean maintenance_test_settings_auto_boolean = AUTO_BOOLEAN_AUTO;
69
70 static unsigned int maintenance_test_settings_uinteger;
71
72 static int maintenance_test_settings_integer;
73
74 static int maintenance_test_settings_zinteger;
75
76 static unsigned int maintenance_test_settings_zuinteger;
77
78 static int maintenance_test_settings_zuinteger_unlimited;
79
80 static char *maintenance_test_settings_string;
81
82 static char *maintenance_test_settings_string_noescape;
83
84 static char *maintenance_test_settings_optional_filename;
85
86 static char *maintenance_test_settings_filename;
87
88 /* Enum values for the "maintenance test-settings set/show boolean"
89    commands.  */
90 static const char maintenance_test_settings_xxx[] = "xxx";
91 static const char maintenance_test_settings_yyy[] = "yyy";
92 static const char maintenance_test_settings_zzz[] = "zzz";
93
94 static const char *const maintenance_test_settings_enums[] = {
95   maintenance_test_settings_xxx,
96   maintenance_test_settings_yyy,
97   maintenance_test_settings_zzz,
98   nullptr
99 };
100
101 static const char *maintenance_test_settings_enum
102   = maintenance_test_settings_xxx;
103
104 /* The "maintenance test-options show xxx" commands.  */
105
106 static void
107 maintenance_test_settings_show_value_cmd
108   (struct ui_file *file, int from_tty,
109    struct cmd_list_element *c, const char *value)
110 {
111   fprintf_filtered (file, (("%s\n")), value);
112 }
113
114 \f
115 void
116 _initialize_maint_test_settings (void)
117 {
118   maintenance_test_settings_filename = xstrdup ("/foo/bar");
119
120   add_prefix_cmd ("test-settings", no_class,
121                   maintenance_test_settings_cmd,
122                   _("\
123 Generic command for testing the settings infrastructure."),
124                   &maintenance_test_settings_list,
125                   "maintenance test-settings ", 0,
126                   &maintenancelist);
127
128   add_prefix_cmd ("set", class_maintenance,
129                   maintenance_test_settings_set_cmd, _("\
130 Set GDB internal variables used for set/show command infrastructure testing."),
131                   &maintenance_test_settings_set_list,
132                   "maintenance test-settings set ",
133                   0/*allow-unknown*/,
134                   &maintenance_test_settings_list);
135
136   add_prefix_cmd ("show", class_maintenance,
137                   maintenance_test_settings_show_cmd, _("\
138 Show GDB internal variables used for set/show command infrastructure testing."),
139                   &maintenance_test_settings_show_list,
140                   "maintenance test-settings show ",
141                   0/*allow-unknown*/,
142                   &maintenance_test_settings_list);
143
144   add_setshow_boolean_cmd ("boolean", class_maintenance,
145                            &maintenance_test_settings_boolean, _("\
146 command used for internal testing"), _("\
147 command used for internal testing"),
148                            nullptr, /* help_doc */
149                            nullptr, /* set_cmd */
150                            maintenance_test_settings_show_value_cmd,
151                            &maintenance_test_settings_set_list,
152                            &maintenance_test_settings_show_list);
153
154   add_setshow_auto_boolean_cmd ("auto-boolean", class_maintenance,
155                                 &maintenance_test_settings_auto_boolean, _("\
156 command used for internal testing"), _("\
157 command used for internal testing"),
158                                 nullptr, /* help_doc */
159                                 nullptr, /* set_cmd */
160                                 maintenance_test_settings_show_value_cmd,
161                                 &maintenance_test_settings_set_list,
162                                 &maintenance_test_settings_show_list);
163
164   add_setshow_uinteger_cmd ("uinteger", class_maintenance,
165                            &maintenance_test_settings_uinteger, _("\
166 command used for internal testing"), _("\
167 command used for internal testing"),
168                            nullptr, /* help_doc */
169                            nullptr, /* set_cmd */
170                            maintenance_test_settings_show_value_cmd,
171                            &maintenance_test_settings_set_list,
172                            &maintenance_test_settings_show_list);
173
174   add_setshow_integer_cmd ("integer", class_maintenance,
175                            &maintenance_test_settings_integer, _("\
176 command used for internal testing"), _("\
177 command used for internal testing"),
178                            nullptr, /* help_doc */
179                            nullptr, /* set_cmd */
180                            maintenance_test_settings_show_value_cmd,
181                            &maintenance_test_settings_set_list,
182                            &maintenance_test_settings_show_list);
183
184   add_setshow_string_cmd ("string", class_maintenance,
185      &maintenance_test_settings_string, _("\
186 command used for internal testing"), _("\
187 command used for internal testing"),
188      nullptr, /* help_doc */
189      nullptr, /* set_cmd */
190      maintenance_test_settings_show_value_cmd,
191      &maintenance_test_settings_set_list,
192      &maintenance_test_settings_show_list);
193
194   add_setshow_string_noescape_cmd
195     ("string-noescape", class_maintenance,
196      &maintenance_test_settings_string_noescape, _("\
197 command used for internal testing"), _("\
198 command used for internal testing"),
199      nullptr, /* help_doc */
200      nullptr, /* set_cmd */
201      maintenance_test_settings_show_value_cmd,
202      &maintenance_test_settings_set_list,
203      &maintenance_test_settings_show_list);
204
205   add_setshow_optional_filename_cmd
206     ("optional-filename", class_maintenance,
207      &maintenance_test_settings_optional_filename, _("\
208 command used for internal testing"), _("\
209 command used for internal testing"),
210      nullptr, /* help_doc */
211      nullptr, /* set_cmd */
212      maintenance_test_settings_show_value_cmd,
213      &maintenance_test_settings_set_list,
214      &maintenance_test_settings_show_list);
215
216   add_setshow_filename_cmd ("filename", class_maintenance,
217                             &maintenance_test_settings_filename, _("\
218 command used for internal testing"), _("\
219 command used for internal testing"),
220                             nullptr, /* help_doc */
221                             nullptr, /* set_cmd */
222                             maintenance_test_settings_show_value_cmd,
223                             &maintenance_test_settings_set_list,
224                             &maintenance_test_settings_show_list);
225
226   add_setshow_zinteger_cmd ("zinteger", class_maintenance,
227                             &maintenance_test_settings_zinteger, _("\
228 command used for internal testing"), _("\
229 command used for internal testing"),
230                             nullptr, /* help_doc */
231                             nullptr, /* set_cmd */
232                             maintenance_test_settings_show_value_cmd,
233                             &maintenance_test_settings_set_list,
234                             &maintenance_test_settings_show_list);
235
236   add_setshow_zuinteger_cmd ("zuinteger", class_maintenance,
237                              &maintenance_test_settings_zuinteger, _("\
238 command used for internal testing"), _("\
239 command used for internal testing"),
240                              nullptr, /* help_doc */
241                              nullptr, /* set_cmd */
242                              maintenance_test_settings_show_value_cmd,
243                              &maintenance_test_settings_set_list,
244                              &maintenance_test_settings_show_list);
245
246   add_setshow_zuinteger_unlimited_cmd
247     ("zuinteger-unlimited", class_maintenance,
248      &maintenance_test_settings_zuinteger_unlimited, _("\
249 command used for internal testing"), _("\
250 command used for internal testing"),
251      nullptr, /* help_doc */
252      nullptr, /* set_cmd */
253      maintenance_test_settings_show_value_cmd,
254      &maintenance_test_settings_set_list,
255      &maintenance_test_settings_show_list);
256
257   add_setshow_enum_cmd ("enum", class_maintenance,
258                         maintenance_test_settings_enums,
259                         &maintenance_test_settings_enum, _("\
260 command used for internal testing"), _("\
261 command used for internal testing"),
262                         nullptr, /* help_doc */
263                         nullptr, /* set_cmd */
264                         maintenance_test_settings_show_value_cmd,
265                         &maintenance_test_settings_set_list,
266                         &maintenance_test_settings_show_list);
267 }