+2018-03-19 Andreas Arnez <arnez@linux.vnet.ibm.com>
+
+ * gdb.trace/actions-changed.exp: Call gdb_breakpoint with the
+ "qualified" option when setting breakpoints.
+ * gdb.trace/backtrace.exp: Likewise.
+ * gdb.trace/circ.exp: Likewise.
+ * gdb.trace/collection.exp: Likewise.
+ * gdb.trace/disconnected-tracing.exp: Likewise.
+ * gdb.trace/ftrace-lock.exp: Likewise.
+ * gdb.trace/ftrace.exp: Likewise.
+ * gdb.trace/infotrace.exp: Likewise.
+ * gdb.trace/packetlen.exp: Likewise.
+ * gdb.trace/passc-dyn.exp: Likewise.
+ * gdb.trace/qtro.exp: Likewise.
+ * gdb.trace/read-memory.exp: Likewise.
+ * gdb.trace/report.exp: Likewise.
+ * gdb.trace/signal.exp: Likewise.
+ * gdb.trace/status-stop.exp: Likewise.
+ * gdb.trace/strace.exp: Likewise.
+ * gdb.trace/tfind.exp: Likewise.
+ * gdb.trace/trace-break.exp: Likewise.
+ * gdb.trace/trace-condition.exp: Likewise.
+ * gdb.trace/trace-mt.exp: Likewise.
+ * gdb.trace/tstatus.exp: Likewise.
+ * gdb.trace/tsv.exp: Likewise.
+ * gdb.trace/unavailable-dwarf-piece.exp: Likewise.
+ * gdb.trace/unavailable.exp: Likewise.
+ * gdb.trace/while-dyn.exp: Likewise.
+
2018-03-16 Andreas Arnez <arnez@linux.vnet.ibm.com>
* gdb.trace/tspeed.exp: Add invocation of gdb_load_shlib to ensure
}
proc test_actions_changed { } {
- gdb_breakpoint "end"
+ gdb_breakpoint "end" qualified
gdb_test "trace subr" "Tracepoint .*" \
"tracepoint at subr"
gdb_test_no_output "tstart" ""
-gdb_test "break end" ".*" ""
+gdb_breakpoint "end" qualified
gdb_test "continue" \
"Continuing.*Breakpoint $decimal, end.*" \
"run trace experiment"
global decimal
setup_tracepoints
- gdb_test "break end" "Breakpoint $decimal.*" "breakpoint at end"
+ gdb_breakpoint "end" qualified
gdb_test "tstart" "\[\r\n\]*" "start trace experiment"
gdb_test "continue" "Continuing.*Breakpoint \[0-9\]+, end.*" \
"run to end"
with_test_prefix "frame size" {
set_a_tracepoint func0
- gdb_test "break end" "Breakpoint $decimal.*" "breakpoint at end"
+ gdb_breakpoint "end" qualified
gdb_test "tstart" "\[\r\n\]*" "start trace"
runto_main
- gdb_test "break begin" ".*" ""
- gdb_test "break end" ".*" ""
+ gdb_breakpoint "begin" qualified
+ gdb_breakpoint "end" qualified
}
proc run_trace_experiment { msg test_func } {
gdb_test "trace start" ".*"
gdb_trace_setactions "collect on tracepoint 2" "2" \
"collect foo" "^$"
- gdb_test "break end" "Breakpoint ${decimal} at .*"
+ gdb_breakpoint "end" qualified
gdb_test_no_output "tstart"
gdb_test "trace start" ".*"
gdb_test_no_output "tstart"
- gdb_test "break end" "Breakpoint ${decimal} at .*"
+ gdb_breakpoint "end" qualified
gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*"
gdb_test_no_output "tstop"
return 1
}
-gdb_test "break end" ""
-gdb_test "break fail" ""
+gdb_breakpoint "end" qualified
+gdb_breakpoint "fail" qualified
gdb_test "ftrace set_point" "Fast tracepoint .*" \
"fast tracepoint at a long insn"
set fourgood 0
- gdb_test "break begin" ".*" ""
+ gdb_breakpoint "begin" qualified
- gdb_test "break end" ".*" ""
+ gdb_breakpoint "end" qualified
gdb_test "print gdb_agent_gdb_trampoline_buffer_error" ".*" ""
return 1
}
-gdb_test "break end" "Breakpoint \[0-9\] at .*"
+gdb_breakpoint "end" qualified
gdb_test_no_output "tstart"
gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" \
"continue to end"
"end" ""
gdb_test_no_output "tstart" "survive the long packet send"
-gdb_test "break end" ".*" ""
+gdb_breakpoint "end" qualified
gdb_test "continue" \
"Continuing.*Breakpoint $decimal, end.*" \
"run trace experiment"
gdb_test "tstart" ".*" ""
-gdb_test "break end" ".*" ""
+gdb_breakpoint "end" qualified
gdb_test "continue" \
"Continuing.*Breakpoint $decimal, end.*" \
"run trace experiment"
# frame (IOW, returns while tfind mode is active).
proc prepare_for_trace_disassembly { } {
global gdb_prompt
- gdb_breakpoint "end"
+ gdb_breakpoint "end" qualified
gdb_test "trace subr" "Tracepoint .*" \
"tracepoint at subr"
fail "can't run to main"
return -1
}
- gdb_test "break end" "Breakpoint \[0-9\] at .*"
+ gdb_breakpoint "end" qualified
gdb_test "trace start" "Tracepoint \[0-9\] at .*"
gdb_trace_setactions "set action for tracepoint" "" \
"collect testglob" "^$" \
gdb_test "tstart" ".*" ""
-gdb_test "break end" ".*" ""
+gdb_breakpoint "end" qualified
gdb_test "continue" \
"Continuing.*Breakpoint $decimal, end.*" \
"run trace experiment"
return -1
}
-gdb_test "break kill" "Breakpoint $decimal at .*"
+gdb_breakpoint "kill" qualified
gdb_test "handle SIGABRT nostop noprint pass" ".*" "pass SIGABRT"
# Hit the breakpoint on $syscall for the first time. In this time,
}
delete_breakpoints
-gdb_test "break start" "Breakpoint $decimal at .*"
+gdb_breakpoint "start" qualified
gdb_continue_to_breakpoint "continue to start"
gdb_assert { 0 == [get_integer_valueof "counter" "1"] } "counter is zero"
gdb_test "trace *$syscall_insn_next" "Tracepoint $decimal at .*" \
"tracepoint on instruction following syscall instruction"
-gdb_test "break end" "Breakpoint $decimal at .*"
+gdb_breakpoint "end" qualified
gdb_test_no_output "tstart"
gdb_test "continue" ".*Breakpoint.* end .*at.*$srcfile.*" \
gdb_test "trace func1" "Tracepoint \[0-9\] at $hex: file.*"
gdb_test_no_output "tstart"
- gdb_test "break end" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "end" qualified
gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" \
"continue to end"
"collect buf" "^$"
gdb_test_no_output "tstart"
- gdb_test "break end" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "end" qualified
gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" "continue to end"
gdb_test "tstatus" ".*buffer was full.*"
gdb_test "info static-tracepoint-markers" \
"ust/bar\[\t \]+y\[\t \]+$hex .*ust/bar2\[\t \]+y\[\t \]+$hex.*"
- gdb_test "break end" "Breakpoint \[0-9\]+ at.*"
+ gdb_breakpoint "end" qualified
gdb_test_no_output "tstart"
gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" \
}
}
- gdb_test "break end" "Breakpoint \[0-9\]+ at.*"
+ gdb_breakpoint "end" qualified
if [string equal $type "break"] {
gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" \
gdb_test "trace *${marker_bar2_addr}" \
"Tracepoint \[0-9\]+ at ${hex}: file.*"
- gdb_test "break end" "Breakpoint \[0-9\]+ at.*"
+ gdb_breakpoint "end" qualified
gdb_test_no_output "tstart"
gdb_test "continue" "Continuing\\.\[ \r\n\]+Breakpoint.*" \
# test tstatus (when trace on)
gdb_test "tstatus" "\[Tt\]race is running.*" "test tstatus on"
-gdb_test "break end" ".*" ""
+gdb_breakpoint "end" qualified
gdb_test "continue" \
"Continuing.*Breakpoint $decimal, end.*" \
"run trace experiment"
gdb_test_no_output "set breakpoint always-inserted ${option}"
- gdb_test "break end" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "end" qualified
- gdb_test "break set_point" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "set_point" qualified
gdb_test "${trace_type} set_point" "\(Fast t|T\)racepoint \[0-9\] at $hex: file.*"
gdb_test_no_output "tstart"
gdb_test_no_output "set breakpoint always-inserted ${option}"
- gdb_test "break end" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "end" qualified
gdb_test "${trace_type1} set_point" \
"\(Fast t|T\)racepoint \[0-9\] at $hex: file.*" \
}
gdb_test_no_output "set breakpoint always-inserted ${option}"
- gdb_test "break marker" "Breakpoint \[0-9\] at $hex: file.*"
- gdb_test "break end" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "marker" qualified
+ gdb_breakpoint "end" qualified
- gdb_test "break set_point" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "set_point" qualified
gdb_test "${trace_type} set_point" "\(Fast t|T\)racepoint \[0-9\] at $hex: file.*"
gdb_test_no_output "tstart"
}
gdb_test_no_output "set breakpoint always-inserted ${option}"
- gdb_test "break marker" "Breakpoint \[0-9\] at $hex: file.*"
- gdb_test "break end" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "marker" qualified
+ gdb_breakpoint "end" qualified
- gdb_test "break set_point" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "set_point" qualified
gdb_test "${trace_type} set_point" "\(Fast t|T\)racepoint \[0-9\] at $hex: file.*"
gdb_test "continue" "Continuing\\.\[ \r\n\]+(Thread .* hit )?Breakpoint.*" \
return -1
}
- gdb_test "break marker" "Breakpoint \[0-9\] at $hex: file.*"
- gdb_test "break end" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "marker" qualified
+ gdb_breakpoint "end" qualified
gdb_test "${trace1} set_point" "\(Fast t|T\)racepoint \[0-9\] at $hex: file.*" \
"${trace1} set_point 1"
return -1
}
- gdb_test "break marker" "Breakpoint \[0-9\] at $hex: file.*"
- gdb_test "break end" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "marker" qualified
+ gdb_breakpoint "end" qualified
gdb_test "continue" "Continuing\\.\[ \r\n\]+(Thread .* hit )?Breakpoint.*" \
"continue to marker"
return 0
}
- gdb_test "break begin" ".*" ""
+ gdb_breakpoint "begin" qualified
- gdb_test "break end" ".*" ""
+ gdb_breakpoint "end" qualified
with_test_prefix "${trace_command}: ${condition}" {
gdb_test_no_output "set breakpoint always-inserted ${option}"
- gdb_test "break end" "Breakpoint \[0-9\] at $hex: file.*"
+ gdb_breakpoint "end" qualified
gdb_test "break set_point1" "Breakpoint \[0-9\] at $hex: file.*"
gdb_test "${trace_type} set_point1" "\(Fast t|T\)racepoint \[0-9\] at $hex: file.*"
proc test_tracepoints {} {
global gdb_prompt
- gdb_test "break begin" ".*" ""
+ gdb_breakpoint "begin" qualified
- gdb_test "break end" ".*" ""
+ gdb_breakpoint "end" qualified
gdb_test "trace gdb_c_test" "Tracepoint .*" \
"tracepoint at gdb_c_test"
"Print a trace state variable at start of run"
# Be sure not to fall off the end of the program.
-gdb_test "break end" ".*" ""
+gdb_breakpoint "end" qualified
gdb_test "continue" \
"Continuing.*Breakpoint $decimal, end.*" \
"run trace experiment"
return -1
}
-gdb_breakpoint "end"
+gdb_breakpoint "end" qualified
with_test_prefix "tracing foo" {
gdb_test "trace *foo_start_lbl" ".*"
runto_main
- gdb_test "break begin" ".*" ""
- gdb_test "break end" ".*" ""
+ gdb_breakpoint "begin" qualified
+ gdb_breakpoint "end" qualified
}
proc run_trace_experiment { test_func } {
gdb_test "tstart" ".*" ""
- gdb_test "break end" ".*" ""
+ gdb_breakpoint "end" qualified
gdb_test "continue" \
"Continuing.*Breakpoint $decimal, end.*" \
"$while_stepping: run trace experiment"