diff options
author | Tom Tromey <tromey@adacore.com> | 2023-05-16 09:34:20 -0600 |
---|---|---|
committer | Tom Tromey <tromey@adacore.com> | 2023-06-12 12:09:56 -0600 |
commit | 67efac36f17824b147b3d4645719404ccd662206 (patch) | |
tree | d31f11164e20dbf2507a991be2ffa9f6a5784485 /gdb/testsuite/gdb.dap | |
parent | 8115dffa1e76ab007223199dfbc8c1298d2bf06e (diff) | |
download | gdb-67efac36f17824b147b3d4645719404ccd662206.zip gdb-67efac36f17824b147b3d4645719404ccd662206.tar.gz gdb-67efac36f17824b147b3d4645719404ccd662206.tar.bz2 |
Add "target" parameter to DAP attach request
This adds a new "target" to the DAP attach request. This is passed to
"target remote". I thought "attach" made the most sense for this,
because in some sense gdb is attaching to a running process. It's
worth noting that all DAP "attach" parameters are defined by the
implementation.
Reviewed-By: Eli Zaretskii <eliz@gnu.org>
Diffstat (limited to 'gdb/testsuite/gdb.dap')
-rw-r--r-- | gdb/testsuite/gdb.dap/remote-dap.exp | 49 |
1 files changed, 49 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.dap/remote-dap.exp b/gdb/testsuite/gdb.dap/remote-dap.exp new file mode 100644 index 0000000..3352408 --- /dev/null +++ b/gdb/testsuite/gdb.dap/remote-dap.exp @@ -0,0 +1,49 @@ +# Copyright 2023 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/>. + +# Test "attach" with a remote target in DAP. + +load_lib gdbserver-support.exp +load_lib dap-support.exp + +require allow_dap_tests allow_gdbserver_tests +# We want to have control over where we start gdbserver. +require {!is_remote target} + +# This test is only for remote targets. +if {[target_info exists gdb_protocol] + && [target_info gdb_protocol] != "remote"} { + unsupported "requires remote" + return +} + +standard_testfile attach.c + +if {[build_executable ${testfile}.exp $testfile $srcfile] == -1} { + return +} + +set target_exec [gdb_remote_download target [standard_output_file $testfile]] + +lassign [gdbserver_start "" $target_exec] protocol port +# Really should have been caught up above. +gdb_assert {$protocol == "remote"} + +# We just want to test that attaching works at all. +if {[dap_target_remote $port] != ""} { + dap_shutdown true +} + +close_gdbserver |