darlinghq/darling-gdb
1
0
Fork 0
mirror of https://github.com/darlinghq/darling-gdb.git synced 2024-11-29 06:50:32 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

2004-07-19 Michael Chastain <mec.gnu@mindspring.com>

Browse Source 
Fix PR cli/740.
	* gdb.base/annota1.exp: Honor gdb,nosignals.
	* gdb.base/annota3.exp: Likewise.
This commit is contained in:
Michael Chastain 2004-07-20 00:24:41 +00:00
parent 3628158c3e
commit ab618a0235
3 changed files with 105 additions and 72 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,16 @@
2004-07-19 Michael Chastain <mec.gnu@mindspring.com>
Fix PR cli/740.
* gdb.base/annota1.exp: Honor gdb,nosignals.
* gdb.base/annota3.exp: Likewise.
2004-07-19 Michael Chastain <mec.gnu@mindspring.com>
* gdb.ada/gnat_ada.gpr.in: Rename from here ...
* gdb.ada/gnat_ada.gin: ... to here.
* configure.in: Use gnat_ada.gin.
* configure: Regenerate.
2004-07-19 Michael Chastain <mec.gnu@mindspring.com> 2004-07-19 Michael Chastain <mec.gnu@mindspring.com>
* lib/java.exp: Update copyright notice. * lib/java.exp: Update copyright notice.

78
gdb/testsuite/gdb.base/annota1.exp
View File

@ -269,35 +269,40 @@ gdb_expect {
# annotate-arg-value # annotate-arg-value
# annotate-arg-end # annotate-arg-end
# #
send_gdb "signal SIGUSR1\n"
gdb_expect {
-re "\r\n\032\032post-prompt\r\nContinuing with signal SIGUSR1.\r\n\r\n\032\032starting\r\n\r\n\032\032frames-invalid\r\n\r\n\032\032breakpoint 2\r\n\r\nBreakpoint 2, \r\n\032\032frame-begin 0 $hex\r\n\r\n\032\032frame-function-name\r\nhandle_USR1\r\n\032\032frame-args\r\n \\(\r\n\032\032arg-begin\r\nsig\r\n\032\032arg-name-end\r\n=\r\n\032\032arg-value -\r\n$decimal\r\n\032\032arg-end\r\n\\)\r\n\032\032frame-source-begin\r\n at \r\n\032\032frame-source-file\r\n${escapedsrcfile}\r\n\032\032frame-source-file-end\r\n:\r\n\032\032frame-source-line\r\n.*\r\n\032\032frame-source-end\r\n\r\n\r\n\032\032source.*annota1.c:.*:.*:beg:$hex\r\n\r\n\032\032frame-end\r\n\r\n\032\032stopped\r\n$gdb_prompt$" \
{ pass "send SIGUSR1" }
-re "\r\n\032\032post-prompt\r\nContinuing with signal SIGUSR1.\r\n\r\n\032\032starting\r\n\r\n\032\032frames-invalid\r\n\r\n\032\032breakpoint 2\r\n\r\nBreakpoint 2, \r\n\032\032frame-begin 0 $hex\r\n\r\n\032\032frame-function-name\r\nhandle_USR1\r\n\032\032frame-args\r\n \\(\r\n\032\032arg-begin\r\nsig\r\n\032\032arg-name-end\r\n=\r\n\032\032arg-value -\r\n$decimal\r\n\032\032arg-end\r\n\\)\r\n\032\032frame-source-begin\r\n at \r\n\032\032frame-source-file\r\n.*${srcfile}\r\n\032\032frame-source-file-end\r\n:\r\n\032\032frame-source-line\r\n.*\r\n\032\032frame-source-end\r\n\r\n\r\n\032\032source.*annota1.c:.*:.*:beg:$hex\r\n\r\n\032\032frame-end\r\n\r\n\032\032stopped\r\n$gdb_prompt$" \
{ setup_xfail "*-*-*" 1270
fail "send SIGUSR1" }
-re ".*$gdb_prompt$" { fail "send SIGUSR1" }
timeout { fail "send SIGUSR1 (timeout)" }
}
if [target_info exists gdb,nosignals] {
# unsupported "send SIGUSR1"
# test: unsupported "backtrace @ signal handler"
# annotate-signal-handler-caller } else {
# send_gdb "signal SIGUSR1\n"
verbose "match_max local is: [match_max]" gdb_expect {
verbose "match_max default is: [match_max -d]" -re "\r\n\032\032post-prompt\r\nContinuing with signal SIGUSR1.\r\n\r\n\032\032starting\r\n\r\n\032\032frames-invalid\r\n\r\n\032\032breakpoint 2\r\n\r\nBreakpoint 2, \r\n\032\032frame-begin 0 $hex\r\n\r\n\032\032frame-function-name\r\nhandle_USR1\r\n\032\032frame-args\r\n \\(\r\n\032\032arg-begin\r\nsig\r\n\032\032arg-name-end\r\n=\r\n\032\032arg-value -\r\n$decimal\r\n\032\032arg-end\r\n\\)\r\n\032\032frame-source-begin\r\n at \r\n\032\032frame-source-file\r\n${escapedsrcfile}\r\n\032\032frame-source-file-end\r\n:\r\n\032\032frame-source-line\r\n.*\r\n\032\032frame-source-end\r\n\r\n\r\n\032\032source.*annota1.c:.*:.*:beg:$hex\r\n\r\n\032\032frame-end\r\n\r\n\032\032stopped\r\n$gdb_prompt$" \
# This is necessary because a 2000 buffer is not enought to get everything { pass "send SIGUSR1" }
# up to the prompt ad the test gets a timeout. -re "\r\n\032\032post-prompt\r\nContinuing with signal SIGUSR1.\r\n\r\n\032\032starting\r\n\r\n\032\032frames-invalid\r\n\r\n\032\032breakpoint 2\r\n\r\nBreakpoint 2, \r\n\032\032frame-begin 0 $hex\r\n\r\n\032\032frame-function-name\r\nhandle_USR1\r\n\032\032frame-args\r\n \\(\r\n\032\032arg-begin\r\nsig\r\n\032\032arg-name-end\r\n=\r\n\032\032arg-value -\r\n$decimal\r\n\032\032arg-end\r\n\\)\r\n\032\032frame-source-begin\r\n at \r\n\032\032frame-source-file\r\n.*${srcfile}\r\n\032\032frame-source-file-end\r\n:\r\n\032\032frame-source-line\r\n.*\r\n\032\032frame-source-end\r\n\r\n\r\n\032\032source.*annota1.c:.*:.*:beg:$hex\r\n\r\n\032\032frame-end\r\n\r\n\032\032stopped\r\n$gdb_prompt$" \
match_max 3000 { setup_xfail "*-*-*" 1270
verbose "match_max now is: [match_max]" fail "send SIGUSR1" }
send_gdb "backtrace\n" -re ".*$gdb_prompt$" { fail "send SIGUSR1" }
gdb_expect { timeout { fail "send SIGUSR1 (timeout)" }
-re "frame-begin 0 $hex\r\n#0.*frame-end.*frame-begin 1 $hex\r\n#1.*(\032\032signal-handler-caller\r\n.signal handler called.\r\n\r\n)+\032\032frame-end\r\n\r\n\032\032frame-begin 2 $hex\r\n#2.*(frame-begin 3 $hex\r\n#3.*)*frame-end.*$gdb_prompt$" { }
pass "backtrace @ signal handler"
#
# test:
# annotate-signal-handler-caller
#
verbose "match_max local is: [match_max]"
verbose "match_max default is: [match_max -d]"
# This is necessary because a 2000 buffer is not enought to get everything
# up to the prompt ad the test gets a timeout.
match_max 3000
verbose "match_max now is: [match_max]"
send_gdb "backtrace\n"
gdb_expect {
-re "frame-begin 0 $hex\r\n#0.*frame-end.*frame-begin 1 $hex\r\n#1.*(\032\032signal-handler-caller\r\n.signal handler called.\r\n\r\n)+\032\032frame-end\r\n\r\n\032\032frame-begin 2 $hex\r\n#2.*(frame-begin 3 $hex\r\n#3.*)*frame-end.*$gdb_prompt$" {
pass "backtrace @ signal handler"
}
-re ".*$gdb_prompt$" { fail "backtrace @ signal handler" }
timeout { fail "backtrace @ signal handler (timeout)" }
} }
-re ".*$gdb_prompt$" { fail "backtrace @ signal handler" }
timeout { fail "backtrace @ signal handler (timeout)" }
} }
# #
@ -446,13 +451,18 @@ gdb_expect {
# It has been verified that other signals will be delivered. However, # It has been verified that other signals will be delivered. However,
# rather than twiddle the test, I choose to leave it as-is as it # rather than twiddle the test, I choose to leave it as-is as it
# exposes an interesting failure on hpux11. # exposes an interesting failure on hpux11.
setup_xfail hppa*-*-hpux11*
send_gdb "signal SIGTRAP\n" if [target_info exists gdb,nosignals] {
gdb_expect { unsupported "signal sent"
-re ".*\032\032post-prompt\r\nContinuing with signal SIGTRAP.\r\n\r\n\032\032starting\r\n\r\n\032\032frames-invalid\r\n\r\n\032\032frames-invalid\r\n\r\n\032\032signalled\r\n\r\nProgram terminated with signal \r\n\032\032signal-name\r\nSIGTRAP\r\n\032\032signal-name-end\r\n, \r\n\032\032signal-string\r\nTrace.breakpoint trap\r\n\032\032signal-string-end\r\n.\r\nThe program no longer exists.\r\n\r\n\032\032stopped\r\n$gdb_prompt$" \ } else {
{ pass "signal sent" } setup_xfail hppa*-*-hpux11*
-re ".*$gdb_prompt$" { fail "signal sent" } send_gdb "signal SIGTRAP\n"
timeout { fail "signal sent (timeout)" } gdb_expect {
-re ".*\032\032post-prompt\r\nContinuing with signal SIGTRAP.\r\n\r\n\032\032starting\r\n\r\n\032\032frames-invalid\r\n\r\n\032\032frames-invalid\r\n\r\n\032\032signalled\r\n\r\nProgram terminated with signal \r\n\032\032signal-name\r\nSIGTRAP\r\n\032\032signal-name-end\r\n, \r\n\032\032signal-string\r\nTrace.breakpoint trap\r\n\032\032signal-string-end\r\n.\r\nThe program no longer exists.\r\n\r\n\032\032stopped\r\n$gdb_prompt$" \
{ pass "signal sent" }
-re ".*$gdb_prompt$" { fail "signal sent" }
timeout { fail "signal sent (timeout)" }
}
} }

86
gdb/testsuite/gdb.base/annota3.exp
View File

@ -217,34 +217,39 @@ gdb_expect_list "backtrace from shlibrary" "$gdb_prompt$" {
# #
# test printing a frame with some arguments: # test printing a frame with some arguments:
# #
send_gdb "signal SIGUSR1\n"
gdb_expect_list "send SIGUSR1" "$gdb_prompt$" {
"\r\n\032\032post-prompt\r\n"
"Continuing with signal SIGUSR1.\r\n"
"\r\n\032\032starting\r\n"
"\r\n\032\032frames-invalid\r\n"
"\r\n\032\032breakpoint 2\r\n"
"Breakpoint 2, handle_USR1 \\(sig=\[0-9\]+\\) at .*annota3.c:\[0-9\]+\r\n"
"\r\n\032\032source .*annota3.c:\[0-9\]+:\[0-9\]+:beg:0x\[0-9a-z\]+\r\n"
"\r\n\032\032stopped\r\n"
}
if [target_info exists gdb,nosignals] {
unsupported "send SIGUSR1"
unsupported "backtrace @ signal handler"
} else {
send_gdb "signal SIGUSR1\n"
gdb_expect_list "send SIGUSR1" "$gdb_prompt$" {
"\r\n\032\032post-prompt\r\n"
"Continuing with signal SIGUSR1.\r\n"
"\r\n\032\032starting\r\n"
"\r\n\032\032frames-invalid\r\n"
"\r\n\032\032breakpoint 2\r\n"
"Breakpoint 2, handle_USR1 \\(sig=\[0-9\]+\\) at .*annota3.c:\[0-9\]+\r\n"
"\r\n\032\032source .*annota3.c:\[0-9\]+:\[0-9\]+:beg:0x\[0-9a-z\]+\r\n"
"\r\n\032\032stopped\r\n"
}
# #
# test: # test:
# #
verbose "match_max local is: [match_max]" verbose "match_max local is: [match_max]"
verbose "match_max default is: [match_max -d]" verbose "match_max default is: [match_max -d]"
# This is necessary because a 2000 buffer is not enought to get everything # This is necessary because a 2000 buffer is not enought to get everything
# up to the prompt ad the test gets a timeout. # up to the prompt ad the test gets a timeout.
match_max 3000 match_max 3000
verbose "match_max now is: [match_max]" verbose "match_max now is: [match_max]"
send_gdb "backtrace\n" send_gdb "backtrace\n"
gdb_expect_list "backtrace @ signal handler" "$gdb_prompt$" { gdb_expect_list "backtrace @ signal handler" "$gdb_prompt$" {
"#0 +handle_USR1 \[^\r\n\]+\r\n" "#0 +handle_USR1 \[^\r\n\]+\r\n"
"#1 +.signal handler called.\r\n" "#1 +.signal handler called.\r\n"
"#2 .* printf \[^\r\n\]+\r\n" "#2 .* printf \[^\r\n\]+\r\n"
"#3 .* main \[^\r\n\]+\r\n" "#3 .* main \[^\r\n\]+\r\n"
}
} }
# #
@ -369,18 +374,23 @@ gdb_expect_list "breakpoint ignore count" "$gdb_prompt$" {
# It has been verified that other signals will be delivered. However, # It has been verified that other signals will be delivered. However,
# rather than twiddle the test, I choose to leave it as-is as it # rather than twiddle the test, I choose to leave it as-is as it
# exposes an interesting failure on hpux11. # exposes an interesting failure on hpux11.
setup_xfail hppa*-*-hpux11*
send_gdb "signal SIGTRAP\n" if [target_info exists gdb,nosignals] {
gdb_expect_list "signal sent" "$gdb_prompt$" { unsupported "signal sent"
"\r\n\032\032post-prompt\r\n" } else {
"Continuing with signal SIGTRAP.\r\n" setup_xfail hppa*-*-hpux11*
"\r\n\032\032starting\r\n" send_gdb "signal SIGTRAP\n"
"\r\n\032\032frames-invalid\r\n" gdb_expect_list "signal sent" "$gdb_prompt$" {
"\r\n\032\032frames-invalid\r\n" "\r\n\032\032post-prompt\r\n"
"\r\n\032\032signalled\r\n" "Continuing with signal SIGTRAP.\r\n"
"\r\nProgram terminated with signal SIGTRAP, Trace.breakpoint trap.\r\n" "\r\n\032\032starting\r\n"
"The program no longer exists.\r\n" "\r\n\032\032frames-invalid\r\n"
"\r\n\032\032stopped\r\n" "\r\n\032\032frames-invalid\r\n"
"\r\n\032\032signalled\r\n"
"\r\nProgram terminated with signal SIGTRAP, Trace.breakpoint trap.\r\n"
"The program no longer exists.\r\n"
"\r\n\032\032stopped\r\n"
}
} }