#include "complaints.h"
#include "command.h"
#include "gdbcmd.h"
+#include "gdbsupport/selftest.h"
#include <unordered_map>
/* Map format strings to counters. */
value);
}
+#if GDB_SELF_TEST
+namespace selftests {
+
+/* Entry point for complaints unit tests. */
+
+static void
+test_complaints ()
+{
+ std::unordered_map<const char *, int> tmp;
+ scoped_restore reset_counters = make_scoped_restore (&counters, tmp);
+ scoped_restore reset_stop_whining = make_scoped_restore (&stop_whining, 2);
+
+#define CHECK_COMPLAINT(STR, CNT) \
+ do \
+ { \
+ std::string output; \
+ output = execute_fn_to_string ([]() { complaint (STR); }, false); \
+ std::string expected \
+ = _("During symbol reading: ") + std::string (STR "\n"); \
+ SELF_CHECK (output == expected); \
+ SELF_CHECK (counters[STR] == CNT); \
+ } while (0)
+
+#define CHECK_COMPLAINT_SILENT(STR, CNT) \
+ do \
+ { \
+ std::string output; \
+ output = execute_fn_to_string ([]() { complaint (STR); }, false); \
+ SELF_CHECK (output.empty ()); \
+ SELF_CHECK (counters[STR] == CNT); \
+ } while (0)
+
+ CHECK_COMPLAINT ("maintenance complaint 0", 1);
+ CHECK_COMPLAINT ("maintenance complaint 0", 2);
+ CHECK_COMPLAINT_SILENT ("maintenance complaint 0", 3);
+ CHECK_COMPLAINT ("maintenance complaint 1", 1);
+ clear_complaints ();
+ CHECK_COMPLAINT ("maintenance complaint 0", 1);
+
+#undef CHECK_COMPLAINT
+#undef CHECK_COMPLAINT_SILENT
+}
+
+
+} // namespace selftests
+#endif /* GDB_SELF_TEST */
+
void _initialize_complaints ();
void
_initialize_complaints ()
Show max number of complaints about incorrect symbols."), NULL,
NULL, complaints_show_value,
&setlist, &showlist);
+
+#if GDB_SELF_TEST
+ selftests::register_test ("complaints", selftests::test_complaints);
+#endif /* GDB_SELF_TEST */
}
extern void execute_command (const char *, int);
-/* Run execute_command for P and FROM_TTY. Capture its output into the
- returned string, do not display it to the screen. The global BATCH_FLAG
- will temporarily be set to true. When TERM_OUT is true the output is
- collected with terminal behaviour (e.g. with styling). When TERM_OUT is
- false raw output will be collected (e.g. no styling). */
+/* Run FN. Sends its output to FILE, do not display it to the screen.
+ The global BATCH_FLAG will be temporarily set to true. */
+
+extern void execute_fn_to_ui_file (struct ui_file *file, std::function<void(void)> fn);
+
+/* Run FN. Capture its output into the returned string, do not display it
+ to the screen. The global BATCH_FLAG will temporarily be set to true.
+ When TERM_OUT is true the output is collected with terminal behaviour
+ (e.g. with styling). When TERM_OUT is false raw output will be collected
+ (e.g. no styling). */
+
+extern std::string execute_fn_to_string (std::function<void(void)> fn, bool term_out);
+
+/* As execute_fn_to_ui_file, but run execute_command for P and FROM_TTY. */
-extern std::string execute_command_to_string (const char *p, int from_tty,
- bool term_out);
extern void execute_command_to_ui_file (struct ui_file *file,
const char *p, int from_tty);
+/* As execute_fn_to_string, but run execute_command for P and FROM_TTY. */
+
+extern std::string execute_command_to_string (const char *p, int from_tty,
+ bool term_out);
+
extern void print_command_line (struct command_line *, unsigned int,
struct ui_file *);
extern void print_command_lines (struct ui_out *,
+++ /dev/null
-# Copyright 2002-2021 Free Software Foundation, Inc.
-
-# 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 this program. If not, see <http://www.gnu.org/licenses/>.
-
-# This file was written by Andrew Cagney (cagney at redhat dot com),
-# derived from xfullpath.exp (written by Joel Brobecker), derived from
-# selftest.exp (written by Rob Savoye).
-
-load_lib selftest-support.exp
-
-if [target_info exists gdb,noinferiorio] {
- verbose "Skipping because of no inferiorio capabilities."
- return
-}
-
-# Similar to gdb_test_stdio, except no \r\n is expected before
-# $gdb_prompt in the $gdb_spawn_id.
-
-proc test_complaint {test inferior_io_re msg} {
- global inferior_spawn_id gdb_spawn_id
- global gdb_prompt
-
- set inferior_matched 0
- set gdb_matched 0
-
- gdb_test_multiple $test $msg {
- -i $inferior_spawn_id -re "$inferior_io_re" {
- set inferior_matched 1
- if {!$gdb_matched} {
- exp_continue
- }
- }
- -i $gdb_spawn_id -re "$gdb_prompt $" {
- set gdb_matched 1
- if {!$inferior_matched} {
- exp_continue
- }
- }
- }
-
- verbose -log "inferior_matched=$inferior_matched, gdb_matched=$gdb_matched"
- gdb_assert {$inferior_matched && $gdb_matched} $msg
-}
-
-proc test_initial_complaints { } {
- # Unsupress complaints
- gdb_test "set stop_whining = 2"
-
- gdb_test_no_output "set var \$cstr = \"Register a complaint\""
-
- # Prime the system
- gdb_test_stdio \
- "call complaint_internal (\$cstr)" \
- "During symbol reading: Register a complaint"
-
- # Re-issue the first message #1
- with_test_prefix "re-issue" {
- gdb_test_stdio \
- "call complaint_internal (\$cstr)" \
- "During symbol reading: Register a complaint"
- }
-
- # Add a second complaint, expect it
- gdb_test_stdio \
- "call complaint_internal (\"Testing! Testing! Testing!\")" \
- "During symbol reading: Testing. Testing. Testing."
-
- return 0
-}
-
-# Check that nothing comes out when there haven't been any real
-# complaints. Note that each test is really checking the previous
-# command.
-
-proc test_empty_complaint { cmd msg } {
- global gdb_prompt
- global inferior_spawn_id gdb_spawn_id
-
- if {$gdb_spawn_id == $inferior_spawn_id} {
- gdb_test_no_output $cmd $msg
- } else {
- set seen_output 0
- gdb_test_multiple $cmd $msg {
- -i $inferior_spawn_id -re "." {
- set seen_output 1
- exp_continue
- }
- -i $gdb_spawn_id "$gdb_prompt $" {
- gdb_assert !$seen_output $msg
- }
- }
- }
-}
-
-proc test_empty_complaints { } {
- global decimal
-
- set re [multi_line \
- "All functions matching regular expression \[^:\]*:" \
- "" \
- "File \[^\r\n\]*/complaints\\.c:" \
- "$decimal:\tvoid clear_complaints\\(\\);"]
-
- set found 0
- gdb_test_multiple "info function ^clear_complaints()$" "" {
- -re -wrap $re {
- set found 1
- }
- -re -wrap "" {
- }
- }
- if { ! $found } {
- untested "Cannot find clear_complaints, skipping test"
- return 0
- }
-
- test_empty_complaint "call clear_complaints()" \
- "clear complaints"
-
- return 0
-}
-
-do_self_tests captured_command_loop {
- test_initial_complaints
- test_empty_complaints
-}
cleanup_if_error.release ();
}
-/* Run execute_command for P and FROM_TTY. Sends its output to FILE,
- do not display it to the screen. BATCH_FLAG will be
- temporarily set to true. */
+/* See gdbcmd.h. */
void
-execute_command_to_ui_file (struct ui_file *file, const char *p, int from_tty)
+execute_fn_to_ui_file (struct ui_file *file, std::function<void(void)> fn)
{
/* GDB_STDOUT should be better already restored during these
restoration callbacks. */
scoped_restore save_stdtargerr
= make_scoped_restore (&gdb_stdtargerr, file);
- execute_command (p, from_tty);
+ fn ();
}
}
/* See gdbcmd.h. */
std::string
-execute_command_to_string (const char *p, int from_tty,
- bool term_out)
+execute_fn_to_string (std::function<void(void)> fn, bool term_out)
{
string_file str_file (term_out);
- execute_command_to_ui_file (&str_file, p, from_tty);
+ execute_fn_to_ui_file (&str_file, fn);
return std::move (str_file.string ());
}
+/* See gdbcmd.h. */
+
+void
+execute_command_to_ui_file (struct ui_file *file,
+ const char *p, int from_tty)
+{
+ execute_fn_to_ui_file (file, [=]() { execute_command (p, from_tty); });
+}
+
+/* See gdbcmd.h. */
+
+std::string
+execute_command_to_string (const char *p, int from_tty,
+ bool term_out)
+{
+ return
+ execute_fn_to_string ([=]() { execute_command (p, from_tty); }, term_out);
+}
\f
/* When nonzero, cause dont_repeat to do nothing. This should only be
set via prevent_dont_repeat. */
projects / binutils-gdb.git / commitdiff