public inbox for gdb-cvs@sourceware.org
help / color / mirror / Atom feed
* [binutils-gdb] [gdb/testsuite] Detect trailing ^C/^D in command
@ 2022-10-10 14:24 Tom de Vries
0 siblings, 0 replies; only message in thread
From: Tom de Vries @ 2022-10-10 14:24 UTC (permalink / raw)
To: gdb-cvs
https://sourceware.org/git/gitweb.cgi?p=binutils-gdb.git;h=c52ce603561128ca3b9bc626f27abd8cda09b4d6
commit c52ce603561128ca3b9bc626f27abd8cda09b4d6
Author: Tom de Vries <tdevries@suse.de>
Date: Mon Oct 10 16:24:38 2022 +0200
[gdb/testsuite] Detect trailing ^C/^D in command
Detect a trailing ^C/^D in the command argument of gdb_test_multiple, and
error out.
Tested on x86_64-linux.
Diff:
---
gdb/testsuite/gdb.testsuite/gdb-test.exp | 34 ++++++++++++++++++++++++++------
gdb/testsuite/lib/gdb.exp | 4 ++++
2 files changed, 32 insertions(+), 6 deletions(-)
diff --git a/gdb/testsuite/gdb.testsuite/gdb-test.exp b/gdb/testsuite/gdb.testsuite/gdb-test.exp
index 2ce8eb31d73..e891f81e7b0 100644
--- a/gdb/testsuite/gdb.testsuite/gdb-test.exp
+++ b/gdb/testsuite/gdb.testsuite/gdb-test.exp
@@ -19,10 +19,32 @@ clean_restart
# Check that a command with trailing newline triggers an error.
-set results [catch {
- gdb_test "pwd\n" ".*" "cmd with trailing newline"
-} output]
+with_test_prefix "cmd with trailing newline" {
+ set results [catch {
+ gdb_test "pwd\n" ".*" "pwd"
+ } output]
-gdb_assert { $results == 1 }
-set expected_error_msg "Invalid trailing newline in \"pwd\n\" command"
-gdb_assert { [string equal $output $expected_error_msg] }
+ gdb_assert { $results == 1 }
+ set expected_error_msg "Invalid trailing newline in \"pwd\n\" command"
+ gdb_assert { [string equal $output $expected_error_msg] }
+}
+
+with_test_prefix "cmd with trailing control code" {
+ foreach_with_prefix control_code {^C ^D} {
+ switch $control_code {
+ ^C {
+ set cmd "\003"
+ }
+ ^D {
+ set cmd "\004"
+ }
+ }
+ set results [catch {
+ gdb_test $cmd ".*" "control code"
+ } output]
+
+ gdb_assert { $results == 1 }
+ set expected_error_msg "Invalid trailing control code in \"$cmd\" command"
+ gdb_assert { [string equal $output $expected_error_msg] }
+ }
+}
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp
index 5f0acfaa530..ac28ede1b08 100644
--- a/gdb/testsuite/lib/gdb.exp
+++ b/gdb/testsuite/lib/gdb.exp
@@ -1003,6 +1003,10 @@ proc gdb_test_multiple { command message args } {
error "Invalid trailing newline in \"$command\" command"
}
+ if [string match "*\[\003\004\]" $command] {
+ error "Invalid trailing control code in \"$command\" command"
+ }
+
if [string match "*\[\r\n\]*" $message] {
error "Invalid newline in \"$message\" test"
}
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2022-10-10 14:24 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-10-10 14:24 [binutils-gdb] [gdb/testsuite] Detect trailing ^C/^D in command Tom de Vries
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).