gdb/testsuite/
* gdb.base/async-shell.exp: Skip the testfile for use_gdb_stub. * gdb.base/attach-pie-misread.exp: Likewise. * gdb.base/break-interp.exp: Likewise. * gdb.base/default.exp (attach, run "r" abbreviation, run): Skip these testcases for use_gdb_stub. * gdb.dwarf2/dw2-restore.exp: Fix the run for use_gdb_stub. (continue): New testcase. * gdb.python/py-events.exp: Skip the testfile for use_gdb_stub. * gdb.threads/attach-into-signal.exp: Likewise. * gdb.threads/attach-stopped.exp: Likewise. * gdb.threads/attachstop-mt.exp: Likewise.
This commit is contained in:
parent
821296b70d
commit
3a3dad982f
|
@ -1,15 +1,27 @@
|
||||||
|
2011-10-28 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
|
||||||
|
* gdb.base/async-shell.exp: Skip the testfile for use_gdb_stub.
|
||||||
|
* gdb.base/attach-pie-misread.exp: Likewise.
|
||||||
|
* gdb.base/break-interp.exp: Likewise.
|
||||||
|
* gdb.base/default.exp (attach, run "r" abbreviation, run): Skip these
|
||||||
|
testcases for use_gdb_stub.
|
||||||
|
* gdb.dwarf2/dw2-restore.exp: Fix the run for use_gdb_stub.
|
||||||
|
(continue): New testcase.
|
||||||
|
* gdb.python/py-events.exp: Skip the testfile for use_gdb_stub.
|
||||||
|
* gdb.threads/attach-into-signal.exp: Likewise.
|
||||||
|
* gdb.threads/attach-stopped.exp: Likewise.
|
||||||
|
* gdb.threads/attachstop-mt.exp: Likewise.
|
||||||
|
|
||||||
2011-10-28 Paul Koning <paul_koning@dell.com>
|
2011-10-28 Paul Koning <paul_koning@dell.com>
|
||||||
|
|
||||||
* gdb.python/lib-types.exp (deep_items): Rename from deepitems.
|
* gdb.python/lib-types.exp (deep_items): Rename from deepitems.
|
||||||
|
|
||||||
|
|
||||||
2011-10-27 Jan Kratochvil <jan.kratochvil@redhat.com>
|
2011-10-27 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
|
||||||
* lib/mi-support.exp (breakpoint_re): Suppress match reporting.
|
* lib/mi-support.exp (breakpoint_re): Suppress match reporting.
|
||||||
(mi_gdb_test): Import globals thread_selected_re
|
(mi_gdb_test): Import globals thread_selected_re
|
||||||
and breakpoint_re. Expect them optionally at the regex start.
|
and breakpoint_re. Expect them optionally at the regex start.
|
||||||
|
|
||||||
|
|
||||||
2011-10-27 Doug Evans <dje@google.com>
|
2011-10-27 Doug Evans <dje@google.com>
|
||||||
|
|
||||||
* gdb.python/python.exp: Test source -s.
|
* gdb.python/python.exp: Test source -s.
|
||||||
|
|
|
@ -20,6 +20,11 @@ if { ![support_displaced_stepping] } {
|
||||||
return -1
|
return -1
|
||||||
}
|
}
|
||||||
|
|
||||||
|
# The testfile uses "run". The real bug happened only for ![is_remote target].
|
||||||
|
if [target_info exists use_gdb_stub] {
|
||||||
|
return 0
|
||||||
|
}
|
||||||
|
|
||||||
if { [prepare_for_testing ${testfile}.exp ${testfile}] } {
|
if { [prepare_for_testing ${testfile}.exp ${testfile}] } {
|
||||||
return -1
|
return -1
|
||||||
}
|
}
|
||||||
|
|
|
@ -14,7 +14,8 @@
|
||||||
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
|
||||||
# This test only works on GNU/Linux.
|
# This test only works on GNU/Linux.
|
||||||
if { ![isnative] || [is_remote host] || ![istarget *-linux*] || [skip_shlib_tests]} {
|
if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub]
|
||||||
|
|| ![istarget *-linux*] || [skip_shlib_tests]} {
|
||||||
continue
|
continue
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -14,7 +14,8 @@
|
||||||
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
|
||||||
# This test only works on GNU/Linux.
|
# This test only works on GNU/Linux.
|
||||||
if { ![isnative] || [is_remote host] || ![istarget *-linux*] || [skip_shlib_tests]} {
|
if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub]
|
||||||
|
|| ![istarget *-linux*] || [skip_shlib_tests]} {
|
||||||
continue
|
continue
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -39,23 +39,23 @@ gdb_test "append value" "Missing filename\."
|
||||||
gdb_test "append binary memory" "Missing filename\."
|
gdb_test "append binary memory" "Missing filename\."
|
||||||
gdb_test "append binary value" "Missing filename\."
|
gdb_test "append binary value" "Missing filename\."
|
||||||
|
|
||||||
setup_xfail "mips-idt-*"
|
|
||||||
gdb_test_multiple "attach" "attach" {
|
|
||||||
-re "Argument required .(process-id|program) to attach.*$gdb_prompt $"\
|
|
||||||
{ pass "attach" }
|
|
||||||
-re "You can't do that when your target is `None'.*$gdb_prompt $"\
|
|
||||||
{ pass "attach" }
|
|
||||||
-re "You can't do that without a process to debug.*$gdb_prompt $"\
|
|
||||||
{ pass "attach" }
|
|
||||||
-re "Don't know how to attach. Try \"help target\"..*$gdb_prompt $"\
|
|
||||||
{ pass "attach" }
|
|
||||||
-re "Kill it. .y or n." {
|
|
||||||
send_gdb "y\n"
|
|
||||||
exp_continue
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if ![target_info exists use_gdb_stub] {
|
if ![target_info exists use_gdb_stub] {
|
||||||
|
setup_xfail "mips-idt-*"
|
||||||
|
gdb_test_multiple "attach" "attach" {
|
||||||
|
-re "Argument required .(process-id|program) to attach.*$gdb_prompt $"\
|
||||||
|
{ pass "attach" }
|
||||||
|
-re "You can't do that when your target is `None'.*$gdb_prompt $"\
|
||||||
|
{ pass "attach" }
|
||||||
|
-re "You can't do that without a process to debug.*$gdb_prompt $"\
|
||||||
|
{ pass "attach" }
|
||||||
|
-re "Don't know how to attach. Try \"help target\"..*$gdb_prompt $"\
|
||||||
|
{ pass "attach" }
|
||||||
|
-re "Kill it. .y or n." {
|
||||||
|
send_gdb "y\n"
|
||||||
|
exp_continue
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
gdb_test "break" "No default breakpoint address now." "break"
|
gdb_test "break" "No default breakpoint address now." "break"
|
||||||
foreach i "b br bre brea" {
|
foreach i "b br bre brea" {
|
||||||
gdb_test $i "No default breakpoint address now." "break \"$i\" abbreviation"
|
gdb_test $i "No default breakpoint address now." "break \"$i\" abbreviation"
|
||||||
|
@ -420,7 +420,9 @@ gdb_test "ptype" "The history is empty." "ptype"
|
||||||
gdb_test "pwd" "Working directory .*" "pwd"
|
gdb_test "pwd" "Working directory .*" "pwd"
|
||||||
|
|
||||||
#test run "r" abbreviation
|
#test run "r" abbreviation
|
||||||
if [istarget "*-*-vxworks*"] then {
|
if [target_info exists use_gdb_stub] {
|
||||||
|
# Only extended-remote supports "run".
|
||||||
|
} elseif [istarget "*-*-vxworks*"] then {
|
||||||
gdb_test "set args" ".*" ""
|
gdb_test "set args" ".*" ""
|
||||||
|
|
||||||
gdb_test "r" "Starting program: .*
|
gdb_test "r" "Starting program: .*
|
||||||
|
@ -446,7 +448,9 @@ You must specify a function name to run, and arguments if any"\
|
||||||
}
|
}
|
||||||
|
|
||||||
#test run
|
#test run
|
||||||
if [istarget "*-*-vxworks*"] then {
|
if [target_info exists use_gdb_stub] {
|
||||||
|
# Only extended-remote supports "run".
|
||||||
|
} elseif [istarget "*-*-vxworks*"] then {
|
||||||
gdb_test "set args" ".*" ""
|
gdb_test "set args" ".*" ""
|
||||||
|
|
||||||
gdb_test "run" "Starting program: .*
|
gdb_test "run" "Starting program: .*
|
||||||
|
|
|
@ -33,5 +33,8 @@ gdb_start
|
||||||
gdb_reinitialize_dir $srcdir/$subdir
|
gdb_reinitialize_dir $srcdir/$subdir
|
||||||
gdb_load ${binfile}
|
gdb_load ${binfile}
|
||||||
|
|
||||||
gdb_test "run" ".*"
|
if ![runto foo] {
|
||||||
gdb_test "where" ".*$hex in foo ().+$hex in _start ().*"
|
return 0
|
||||||
|
}
|
||||||
|
gdb_test "continue" "$hex in foo \\(\\)"
|
||||||
|
gdb_test "where" "#0 +$hex in foo \\(\\)\r\n#1 +$hex in _start \\(\\)"
|
||||||
|
|
|
@ -13,6 +13,10 @@
|
||||||
# You should have received a copy of the GNU General Public License
|
# You should have received a copy of the GNU General Public License
|
||||||
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
|
||||||
|
if [target_info exists use_gdb_stub] {
|
||||||
|
return 0
|
||||||
|
}
|
||||||
|
|
||||||
if $tracelevel then {
|
if $tracelevel then {
|
||||||
strace $tracelevel
|
strace $tracelevel
|
||||||
}
|
}
|
||||||
|
|
|
@ -17,7 +17,8 @@
|
||||||
# This file was created by Jan Kratochvil <jan.kratochvil@redhat.com>.
|
# This file was created by Jan Kratochvil <jan.kratochvil@redhat.com>.
|
||||||
|
|
||||||
# This test only works on Linux
|
# This test only works on Linux
|
||||||
if { ![isnative] || [is_remote host] || ![istarget *-linux*] } {
|
if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub]
|
||||||
|
|| ![istarget *-linux*] } {
|
||||||
continue
|
continue
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -18,7 +18,8 @@
|
||||||
# This file was updated by Jan Kratochvil <jan.kratochvil@redhat.com>.
|
# This file was updated by Jan Kratochvil <jan.kratochvil@redhat.com>.
|
||||||
|
|
||||||
# This test only works on Linux
|
# This test only works on Linux
|
||||||
if { ![isnative] || [is_remote host] || ![istarget *-linux*] } {
|
if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub]
|
||||||
|
|| ![istarget *-linux*] } {
|
||||||
continue
|
continue
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -17,7 +17,8 @@
|
||||||
# <jjohnstn@redhat.com> and Jan Kratochvil <jan.kratochvil@redhat.com>.
|
# <jjohnstn@redhat.com> and Jan Kratochvil <jan.kratochvil@redhat.com>.
|
||||||
|
|
||||||
# This test only works on Linux
|
# This test only works on Linux
|
||||||
if { ![isnative] || [is_remote host] || ![istarget *-linux*] } {
|
if { ![isnative] || [is_remote host] || [target_info exists use_gdb_stub]
|
||||||
|
|| ![istarget *-linux*] } {
|
||||||
continue
|
continue
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue