1# Copyright (C) 2010-2020 Free Software Foundation, Inc. 2 3# This program is free software; you can redistribute it and/or modify 4# it under the terms of the GNU General Public License as published by 5# the Free Software Foundation; either version 3 of the License, or 6# (at your option) any later version. 7# 8# This program is distributed in the hope that it will be useful, 9# but WITHOUT ANY WARRANTY; without even the implied warranty of 10# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 11# GNU General Public License for more details. 12# 13# You should have received a copy of the GNU General Public License 14# along with this program. If not, see <http://www.gnu.org/licenses/>. 15 16# This file is part of the GDB testsuite. It tests the program space 17# support in Python. 18 19load_lib gdb-python.exp 20 21standard_testfile 22 23if {[build_executable $testfile.exp $testfile $srcfile debug] == -1} { 24 return -1 25} 26 27# Start with a fresh gdb. 28 29gdb_exit 30gdb_start 31gdb_reinitialize_dir $srcdir/$subdir 32 33# Skip all tests if Python scripting is not enabled. 34if { [skip_python_tests] } { continue } 35 36gdb_test "python print (gdb.current_progspace().filename)" "None" \ 37 "current progspace filename (None)" 38gdb_test "python print (gdb.progspaces())" "\\\[<gdb.Progspace object at $hex>\\\]" 39 40gdb_test_no_output "python dir(gdb.current_progspace())" 41 42gdb_load ${binfile} 43 44gdb_py_test_silent_cmd "python progspace = gdb.current_progspace()" \ 45 "Get current progspace" 1 46 47gdb_test "python print (progspace.filename)" "py-progspace" \ 48 "current progspace filename (py-progspace)" 49 50gdb_py_test_silent_cmd "python progspace.random_attribute = 42" \ 51 "Set random attribute in progspace" 1 52gdb_test "python print (progspace.random_attribute)" "42" \ 53 "Verify set of random attribute in progspace" 54 55if {![runto_main]} { 56 fail "can't run to main" 57 return 58} 59 60# Check we can get a block for the current $pc. 61set pc_val [get_integer_valueof "\$pc" 0] 62gdb_py_test_silent_cmd "python blk = gdb.current_progspace ().block_for_pc (${pc_val})" \ 63 "get block for the current \$pc" 1 64gdb_test "python print (blk.start <= ${pc_val})" "True" \ 65 "block start is before \$pc" 66gdb_test "python print (blk.end >= ${pc_val})" "True" \ 67 "block end is after \$pc" 68 69# Check what happens when we ask for a block of an invalid address. 70if ![is_address_zero_readable] { 71 gdb_test "python print (gdb.current_progspace ().block_for_pc (0))" "None" 72} 73 74# With a single inferior, progspace.objfiles () and gdb.objfiles () should 75# be identical. 76gdb_test "python print (progspace.objfiles () == gdb.objfiles ())" "True" 77 78gdb_test "add-inferior" 79gdb_test "inferior 2" 80 81gdb_load ${binfile} 82 83# With a second (non-started) inferior, we should have a single objfile - the 84# main one. 85gdb_test "python print (len (gdb.objfiles ())) == 1" 86 87# And the gdb.objfiles() list should now be different from the objfiles of the 88# prog space of inferior 1. 89gdb_test "python print (progspace.objfiles () != gdb.objfiles ())" "True" 90 91# Delete inferior 2 (and therefore the second progspace), check that the Python 92# object reacts sensibly. 93gdb_py_test_silent_cmd "python progspace2 = gdb.current_progspace()" \ 94 "save progspace 2" 1 95gdb_test "inferior 1" "Switching to inferior 1.*" 96gdb_test_no_output "remove-inferiors 2" 97gdb_test "python print (progspace2.objfiles ())" \ 98 "RuntimeError: Program space no longer exists.*" 99