2015-01-01 09:32:14 +00:00
|
|
|
# Copyright (C) 2010-2015 Free Software Foundation, Inc.
|
2011-02-05 05:27:23 +00:00
|
|
|
|
|
|
|
# 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/>.
|
|
|
|
|
2011-10-28 17:32:30 +00:00
|
|
|
if [target_info exists use_gdb_stub] {
|
|
|
|
return 0
|
|
|
|
}
|
|
|
|
|
2011-02-05 05:27:23 +00:00
|
|
|
load_lib gdb-python.exp
|
|
|
|
|
2011-10-07 07:38:30 +00:00
|
|
|
set libfile "py-events-shlib"
|
|
|
|
set libsrc $srcdir/$subdir/$libfile.c
|
* gdb.python/lib-types.exp: Use standard_testfile,
prepare_for_testing.
* gdb.python/py-block.exp: Use standard_testfile.
* gdb.python/py-breakpoint.exp: Use standard_testfile.
* gdb.python/py-events.exp: Use standard_testfile,
standard_output_file.
* gdb.python/py-evsignal.exp: Use standard_testfile.
* gdb.python/py-evethreads.exp: Use standard_testfile.
* gdb.python/py-explore-cc.exp: Use standard_testfile.
* gdb.python/py-explore.exp: Use standard_testfile.
* gdb.python/py-finish-breakpoint.exp: Use standard_testfile,
standard_output_file.
* gdb.python/py-finish-breakpoint2.exp: Use standard_testfile,
prepare_for_testing.
* gdb.python/py-frame-inline.exp: Use standard_testfile.
* gdb.python/py-frame.exp: Use standard_testfile.
* gdb.python/py-inferior.exp: Use standard_testfile.
* gdb.python/py-infthread.exp: Use standard_testfile.
* gdb.python/py-mi.exp: Use standard_testfile.
* gdb.python/py-objfile-script.exp: Use standard_testfile,
build_executable.
* gdb.python/py-objfile.exp: Use standard_testfile.
* gdb.python/py-pp-maint.exp: Use standard_testfile,
prepare_for_testing.
* gdb.python/py-prettyprint.exp: Use standard_testfile.
* gdb.python/py-progspace.exp: Use standard_testfile,
build_executable.
* gdb.python/py-prompt.exp: Use standard_testfile,
build_executable.
* gdb.python/py-section-script.exp: Use standard_testfile,
build_executable.
* gdb.python/py-shared.exp: Use standard_testfile,
standard_output_file, clean_restart.
* gdb.python/py-symbol.exp: Use standard_output_file,
prepare_for_testing.
* gdb.python/py-symtab.exp: Use standard_output_file,
prepare_for_testing
* gdb.python/py-template.exp: Use standard_testfile.
* gdb.python/py-type.exp: Use standard_testfile.
* gdb.python/py-value-cc.exp: Use standard_testfile.
* gdb.python/py-value.exp: Use standard_testfile.
* gdb.python/python.exp: Use standard_testfile, build_executable.
2012-06-22 17:59:33 +00:00
|
|
|
set lib_sl [standard_output_file $libfile.so]
|
2011-10-07 07:38:30 +00:00
|
|
|
set lib_opts debug
|
|
|
|
|
* gdb.python/lib-types.exp: Use standard_testfile,
prepare_for_testing.
* gdb.python/py-block.exp: Use standard_testfile.
* gdb.python/py-breakpoint.exp: Use standard_testfile.
* gdb.python/py-events.exp: Use standard_testfile,
standard_output_file.
* gdb.python/py-evsignal.exp: Use standard_testfile.
* gdb.python/py-evethreads.exp: Use standard_testfile.
* gdb.python/py-explore-cc.exp: Use standard_testfile.
* gdb.python/py-explore.exp: Use standard_testfile.
* gdb.python/py-finish-breakpoint.exp: Use standard_testfile,
standard_output_file.
* gdb.python/py-finish-breakpoint2.exp: Use standard_testfile,
prepare_for_testing.
* gdb.python/py-frame-inline.exp: Use standard_testfile.
* gdb.python/py-frame.exp: Use standard_testfile.
* gdb.python/py-inferior.exp: Use standard_testfile.
* gdb.python/py-infthread.exp: Use standard_testfile.
* gdb.python/py-mi.exp: Use standard_testfile.
* gdb.python/py-objfile-script.exp: Use standard_testfile,
build_executable.
* gdb.python/py-objfile.exp: Use standard_testfile.
* gdb.python/py-pp-maint.exp: Use standard_testfile,
prepare_for_testing.
* gdb.python/py-prettyprint.exp: Use standard_testfile.
* gdb.python/py-progspace.exp: Use standard_testfile,
build_executable.
* gdb.python/py-prompt.exp: Use standard_testfile,
build_executable.
* gdb.python/py-section-script.exp: Use standard_testfile,
build_executable.
* gdb.python/py-shared.exp: Use standard_testfile,
standard_output_file, clean_restart.
* gdb.python/py-symbol.exp: Use standard_output_file,
prepare_for_testing.
* gdb.python/py-symtab.exp: Use standard_output_file,
prepare_for_testing
* gdb.python/py-template.exp: Use standard_testfile.
* gdb.python/py-type.exp: Use standard_testfile.
* gdb.python/py-value-cc.exp: Use standard_testfile.
* gdb.python/py-value.exp: Use standard_testfile.
* gdb.python/python.exp: Use standard_testfile, build_executable.
2012-06-22 17:59:33 +00:00
|
|
|
standard_testfile
|
2011-10-07 07:38:30 +00:00
|
|
|
set exec_opts [list debug shlib=$lib_sl]
|
2011-02-05 05:27:23 +00:00
|
|
|
set pyfile ${srcdir}/${subdir}/${testfile}.py
|
|
|
|
|
2012-06-21 20:46:25 +00:00
|
|
|
if [get_compiler_info] {
|
2011-02-05 05:27:23 +00:00
|
|
|
return -1
|
|
|
|
}
|
|
|
|
|
2011-10-07 07:38:30 +00:00
|
|
|
if { [gdb_compile_shlib $libsrc $lib_sl $lib_opts] != ""
|
|
|
|
|| [gdb_compile $srcdir/$subdir/$srcfile $binfile executable $exec_opts] != ""} {
|
|
|
|
untested "Could not compile either $libsrc or $srcdir/$subdir/$srcfile."
|
|
|
|
return -1
|
|
|
|
}
|
|
|
|
|
|
|
|
# Start with a fresh gdb.
|
|
|
|
clean_restart ${testfile}
|
|
|
|
|
2011-02-05 05:27:23 +00:00
|
|
|
if { [skip_python_tests] } { continue }
|
|
|
|
|
2012-12-10 21:22:21 +00:00
|
|
|
gdb_test_no_output "python exec (open ('${pyfile}').read ())" ""
|
2011-02-05 05:27:23 +00:00
|
|
|
|
2013-09-04 23:49:21 +00:00
|
|
|
gdb_test "test-objfile-events" "Object file events registered."
|
2011-10-07 07:38:30 +00:00
|
|
|
|
|
|
|
gdb_breakpoint "main" {temporary}
|
|
|
|
|
|
|
|
gdb_test "run" ".*event type: new_objfile.*new objfile name.*" "New objfile notification"
|
2011-02-05 05:27:23 +00:00
|
|
|
|
2011-10-04 08:04:13 +00:00
|
|
|
gdb_test_no_output "set detach-on-fork off" ""
|
|
|
|
|
2013-09-04 23:49:21 +00:00
|
|
|
gdb_test "test-events" "Event testers registered."
|
2011-02-05 05:27:23 +00:00
|
|
|
|
2011-09-15 12:27:20 +00:00
|
|
|
gdb_breakpoint "first"
|
2011-02-05 05:27:23 +00:00
|
|
|
gdb_breakpoint "first"
|
|
|
|
|
|
|
|
# Test continue event and breakpoint stop event
|
|
|
|
gdb_test "continue" ".*event type: continue.*
|
|
|
|
.*event type: stop.*
|
|
|
|
.*stop reason: breakpoint.*
|
2011-09-15 12:27:20 +00:00
|
|
|
.*first breakpoint number: 2.*
|
2011-02-05 05:27:23 +00:00
|
|
|
.*breakpoint number: 2.*
|
2011-09-15 12:27:20 +00:00
|
|
|
.*breakpoint number: 3.*
|
2011-02-05 05:27:23 +00:00
|
|
|
all threads stopped"
|
|
|
|
|
2012-01-05 13:11:31 +00:00
|
|
|
# Test that when "step N" trips on a breakpoint, we get a stop event
|
|
|
|
# with breakpoint stop reason.
|
|
|
|
gdb_breakpoint "do_nothing"
|
|
|
|
gdb_test "step 3" ".*event type: continue.*
|
|
|
|
.*event type: stop.*
|
|
|
|
.*stop reason: breakpoint.*
|
|
|
|
.*first breakpoint number: 4.*
|
|
|
|
.*breakpoint number: 4.*
|
|
|
|
all threads stopped"
|
|
|
|
|
|
|
|
delete_breakpoints
|
|
|
|
|
New python events: inferior call, register/memory changed.
gdb/ChangeLog:
* NEWS: Mention new Python events.
* Makefile.in (SUBDIR_PYTHON_OBS): Add py-infevents.o.
(SUBDIR_PYTHON_SRCS): Add py-infevents.c.
(py-infevents.o): New rule.
* doc/observer.texi (inferior_call_pre, inferior_call_post)
(memory_changed, register_changed): New observers.
* infcall.c (call_function_by_hand): Notify observer before and
after inferior call.
* python/py-event.h (inferior_call_kind): New enum.
(emit_inferior_call_event): New prototype.
(emit_register_changed_event): New prototype.
(emit_memory_changed_event): New prototype.
* python/py-events.h (events_object): New registries
inferior_call, memory_changed and register_changed.
* python/py-evts.c (gdbpy_initialize_py_events): Add the
inferior_call, memory_changed and register_changed registries.
* python/py-infevents.c: New.
* python/py-inferior.c (python_on_inferior_call_pre)
(python_on_inferior_call_post, python_on_register_change)
(python_on_memory_change): New functions.
(gdbpy_initialize_inferior): Attach python handler to new
observers.
* python/py-infthread.c(gdbpy_create_ptid_object): New.
(thpy_get_ptid) Use gdbpy_create_ptid_object.
* python/python-internal.h:
(gdbpy_create_ptid_object)
(gdbpy_initialize_inferior_call_pre_event)
(gdbpy_initialize_inferior_call_post_event)
(gdbpy_initialize_register_changed_event)
(gdbpy_initialize_memory_changed_event): New prototypes.
* python/python.c (_initialize_python): Initialize new events.
* valops.c (value_assign): Notify register_changed observer.
gdb/doc/ChangeLog:
* python.texi (Events In Python): Document new events
InferiorCallPreEvent, InferiorCallPostEvent, MemoryChangedEvent
and RegisterChangedEvent.
gdb/testsuite/ChangeLog:
* gdb.python/py-events.py (inferior_call_handler): New.
(register_changed_handler, memory_changed_handler): New.
(test_events.invoke): Register new handlers.
* gdb.python/py-events.exp: Add tests for inferior call,
memory_changed and register_changed events.
2014-12-02 19:15:29 +00:00
|
|
|
# Test inferior call events
|
|
|
|
|
|
|
|
gdb_test_multiple "info threads" "get current thread" {
|
|
|
|
-re "\[^\n\r\]*process (\[0-9\]+)\[^\n\r\]*do_nothing.*$gdb_prompt $" {
|
|
|
|
set process_id $expect_out(1,string)
|
|
|
|
pass "get current thread"
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
gdb_test_multiple "print do_nothing" "get address of do_nothing" {
|
|
|
|
-re "\[^\n\r\]*(0x\[0-9a-f\]+) \<do_nothing\>.*$gdb_prompt $" {
|
|
|
|
set addr $expect_out(1,string)
|
|
|
|
pass "get address of do_nothing"
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
set expected [list "event type: pre-call"]
|
|
|
|
lappend expected "ptid: \\($process_id, $process_id, 0\\)" "address: $addr"
|
|
|
|
lappend expected "event type: post-call"
|
|
|
|
lappend expected "ptid: \\($process_id, $process_id, 0\\)" "address: $addr"
|
|
|
|
gdb_test_sequence "call do_nothing()" "" $expected
|
|
|
|
|
|
|
|
# Test register changed event
|
|
|
|
gdb_test_no_output {set $old_sp = $sp}
|
|
|
|
gdb_test_sequence {set $sp = 0} "" {
|
|
|
|
"event type: register-changed"
|
|
|
|
"frame: "
|
|
|
|
"num: "
|
|
|
|
}
|
|
|
|
gdb_test_sequence {set $sp = 1} "" {
|
|
|
|
"event type: register-changed"
|
|
|
|
"frame: "
|
|
|
|
"num: "
|
|
|
|
}
|
|
|
|
gdb_test_sequence {set $sp = $old_sp} "" {
|
|
|
|
"event type: register-changed"
|
|
|
|
"frame: "
|
|
|
|
"num: "
|
|
|
|
}
|
|
|
|
|
|
|
|
# Test that no register_changed event is generated on "non-user"
|
|
|
|
# modifications
|
|
|
|
set test "up"
|
|
|
|
gdb_test_multiple {up} $test {
|
|
|
|
-re "event type: register-changed.*\r\n$gdb_prompt $" {
|
|
|
|
fail $test
|
|
|
|
}
|
|
|
|
-re "#1.*in first.*\r\n.*do_nothing.*\r\n$gdb_prompt $" {
|
|
|
|
pass $test
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
set test "down"
|
|
|
|
gdb_test_multiple {down} $test {
|
|
|
|
-re "event type: register-changed.*\r\n$gdb_prompt $" {
|
|
|
|
fail $test
|
|
|
|
}
|
|
|
|
-re "#0.*do_nothing.* at .*\r\n.*void do_nothing.*\r\n$gdb_prompt $" {
|
|
|
|
pass $test
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
set test "step"
|
|
|
|
# Note: This will step the inferior out of do_nothing and back into first.
|
|
|
|
gdb_test_multiple {step} $test {
|
|
|
|
-re "event type: register-changed.*\r\n$gdb_prompt $" {
|
|
|
|
fail $test
|
|
|
|
}
|
|
|
|
-re "first.* at .*\r\n$gdb_prompt $" {
|
|
|
|
pass $test
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
# Test memory changed event
|
|
|
|
gdb_test_no_output {set $saved = *(int*) $sp}
|
|
|
|
gdb_test_sequence {set *(int*) $sp = 0} "" {
|
|
|
|
"event type: memory-changed"
|
|
|
|
"address: "
|
|
|
|
"length: "
|
|
|
|
}
|
|
|
|
gdb_test_sequence {set *(int*) $sp = $saved} "" {
|
|
|
|
"event type: memory-changed"
|
|
|
|
"address: "
|
|
|
|
"length: "
|
|
|
|
}
|
|
|
|
|
|
|
|
# Test that no memory_changed event is generated on breakpoint
|
|
|
|
# activity
|
|
|
|
set test "break second"
|
|
|
|
gdb_test_multiple "break second" $test {
|
|
|
|
-re "event type: memory-changed" {
|
|
|
|
fail $test
|
|
|
|
}
|
|
|
|
-re "Breakpoint (\[0-9\]+) at .*\r\n$gdb_prompt $" {
|
|
|
|
set second_breakpoint $expect_out(1,string)
|
|
|
|
pass $test
|
|
|
|
}
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
set test "continue to breakpoint $second_breakpoint"
|
|
|
|
set expected ".*event type: continue.*\r\n"
|
|
|
|
append expected ".*event type: stop.*\r\n"
|
|
|
|
append expected ".*stop reason: breakpoint.*\r\n"
|
|
|
|
append expected ".*all threads stopped.*\r\n$gdb_prompt $"
|
|
|
|
|
|
|
|
gdb_test_multiple "continue" $test {
|
|
|
|
-re "event type: memory-changed.*\r\n$gdb_prompt $" {
|
|
|
|
fail $test
|
|
|
|
}
|
|
|
|
-re $expected {
|
|
|
|
pass $test
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
gdb_test_no_output "delete $second_breakpoint"
|
|
|
|
|
2011-02-05 05:27:23 +00:00
|
|
|
#test exited event.
|
|
|
|
gdb_test "continue" ".*event type: continue.*
|
2014-10-17 18:12:17 +00:00
|
|
|
.*clear_objfiles\[\r\n\]*progspace: .*py-events.*
|
2011-02-05 05:27:23 +00:00
|
|
|
.*event type: exit.*
|
2011-10-04 08:04:13 +00:00
|
|
|
.*exit code: 12.*
|
2012-02-17 19:24:27 +00:00
|
|
|
.*exit inf: 1.*
|
|
|
|
dir ok: True.*" "Inferior 1 terminated."
|
2011-10-04 08:04:13 +00:00
|
|
|
|
|
|
|
gdb_test "inferior 2" ".*Switching to inferior 2.*"
|
|
|
|
gdb_test "continue" ".*event type: continue.*
|
|
|
|
.*event type: exit.*
|
|
|
|
.*exit code: 12.*
|
2012-02-17 19:24:27 +00:00
|
|
|
.*exit inf: 2.*
|
|
|
|
dir ok: True.*" "Inferior 2 terminated."
|