diff options
Diffstat (limited to 'gdb/testsuite/gdb.trace/disconnected-tracing.exp')
-rw-r--r-- | gdb/testsuite/gdb.trace/disconnected-tracing.exp | 176 |
1 files changed, 90 insertions, 86 deletions
diff --git a/gdb/testsuite/gdb.trace/disconnected-tracing.exp b/gdb/testsuite/gdb.trace/disconnected-tracing.exp index bec016e..03d7d09 100644 --- a/gdb/testsuite/gdb.trace/disconnected-tracing.exp +++ b/gdb/testsuite/gdb.trace/disconnected-tracing.exp @@ -45,101 +45,105 @@ if ![gdb_target_supports_trace] { # Disconnect in tracing. -proc disconnected_tracing { } { with_test_prefix "trace" { - global executable - global decimal - global srcfile - - # Start with a fresh gdb. - clean_restart ${executable} - if ![runto_main] { - fail "Can't run to main" - return -1 - } - - gdb_test_no_output "set confirm off" - gdb_test_no_output "set disconnected-tracing on" - gdb_test "trace start" ".*" - gdb_trace_setactions "collect on tracepoint 2" "2" \ - "collect foo" "^$" - gdb_test "break end" "Breakpoint ${decimal} at .*" - - gdb_test_no_output "tstart" - - gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" - gdb_test_no_output "tstop" - - gdb_test "info tracepoints" ".*in start at.*" \ - "first info tracepoints" - - gdb_test "disconnect" "Ending remote debugging\\." "first disconnect" - if { [gdb_reconnect] == 0 } { - pass "first reconnect after unload" - } else { - fail "first reconnect after unload" - return 0 - } - gdb_test "info tracepoints" ".*in start at.*" \ - "second info tracepoints" - - delete_breakpoints - gdb_test "info tracepoints" ".*No tracepoints..*" \ - "third info tracepoints" - - gdb_test "disconnect" "Ending remote debugging\\." "second disconnect" - if { [gdb_reconnect] == 0 } { - pass "second reconnect after unload" - } else { - fail "second reconnect after unload" - return 0 - } - gdb_test "tstatus" - gdb_test "info tracepoints" \ - "Num Type\[ \]+Disp Enb Address\[ \]+What.* +proc disconnected_tracing { } { + with_test_prefix "trace" { + global executable + global decimal + global srcfile + + # Start with a fresh gdb. + clean_restart ${executable} + if ![runto_main] { + fail "Can't run to main" + return -1 + } + + gdb_test_no_output "set confirm off" + gdb_test_no_output "set disconnected-tracing on" + gdb_test "trace start" ".*" + gdb_trace_setactions "collect on tracepoint 2" "2" \ + "collect foo" "^$" + gdb_test "break end" "Breakpoint ${decimal} at .*" + + gdb_test_no_output "tstart" + + gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" + gdb_test_no_output "tstop" + + gdb_test "info tracepoints" ".*in start at.*" \ + "first info tracepoints" + + gdb_test "disconnect" "Ending remote debugging\\." "first disconnect" + if { [gdb_reconnect] == 0 } { + pass "first reconnect after unload" + } else { + fail "first reconnect after unload" + return 0 + } + gdb_test "info tracepoints" ".*in start at.*" \ + "second info tracepoints" + + delete_breakpoints + gdb_test "info tracepoints" ".*No tracepoints..*" \ + "third info tracepoints" + + gdb_test "disconnect" "Ending remote debugging\\." "second disconnect" + if { [gdb_reconnect] == 0 } { + pass "second reconnect after unload" + } else { + fail "second reconnect after unload" + return 0 + } + gdb_test "tstatus" + gdb_test "info tracepoints" \ + "Num Type\[ \]+Disp Enb Address\[ \]+What.* \[0-9\]+\[\t \]+tracepoint keep y.* in start at .*$srcfile:\[0-9\]+. \[\t \]+tracepoint already hit 1 time. \[\t \]+trace buffer usage ${decimal} bytes. \[\t \]+collect foo.*" \ - "fourth info tracepoints" -}} + "fourth info tracepoints" + } +} disconnected_tracing # Disconnected in tfind -proc disconnected_tfind { } { with_test_prefix "tfind" { - global executable - global decimal - - # Start with a fresh gdb. - clean_restart ${executable} - if ![runto_main] { - fail "Can't run to main" - return -1 +proc disconnected_tfind { } { + with_test_prefix "tfind" { + global executable + global decimal + + # Start with a fresh gdb. + clean_restart ${executable} + if ![runto_main] { + fail "Can't run to main" + return -1 + } + + gdb_test_no_output "set confirm off" + gdb_test_no_output "set disconnected-tracing on" + gdb_test "trace start" ".*" + gdb_test_no_output "tstart" + + gdb_test "break end" "Breakpoint ${decimal} at .*" + gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" + gdb_test_no_output "tstop" + + gdb_test "tfind" "Found trace frame 0, tracepoint .*" "tfind frame 0" + gdb_test "p \$trace_frame" ".*\\\$${decimal} = 0.*" \ + "p \$trace_frame before disconnected" + gdb_test "p \$tracepoint" ".*\\\$${decimal} = 2.*" \ + "p \$tracepoint before disconnected" + + gdb_test "disconnect" "Ending remote debugging\\." "first disconnect" + + gdb_test "p \$trace_frame" ".*\\\$${decimal} = -1.*" + gdb_test "p \$tracepoint" ".*\\\$${decimal} = -1.*" + gdb_test "p \$trace_line" ".*\\\$${decimal} = -1.*" + gdb_test "p \$trace_file" ".*\\\$${decimal} = void.*" + gdb_test "p \$trace_func" ".*\\\$${decimal} = void.*" } - - gdb_test_no_output "set confirm off" - gdb_test_no_output "set disconnected-tracing on" - gdb_test "trace start" ".*" - gdb_test_no_output "tstart" - - gdb_test "break end" "Breakpoint ${decimal} at .*" - gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" - gdb_test_no_output "tstop" - - gdb_test "tfind" "Found trace frame 0, tracepoint .*" "tfind frame 0" - gdb_test "p \$trace_frame" ".*\\\$${decimal} = 0.*" \ - "p \$trace_frame before disconnected" - gdb_test "p \$tracepoint" ".*\\\$${decimal} = 2.*" \ - "p \$tracepoint before disconnected" - - gdb_test "disconnect" "Ending remote debugging\\." "first disconnect" - - gdb_test "p \$trace_frame" ".*\\\$${decimal} = -1.*" - gdb_test "p \$tracepoint" ".*\\\$${decimal} = -1.*" - gdb_test "p \$trace_line" ".*\\\$${decimal} = -1.*" - gdb_test "p \$trace_file" ".*\\\$${decimal} = void.*" - gdb_test "p \$trace_func" ".*\\\$${decimal} = void.*" -}} +} disconnected_tfind |