1# Copyright (C) 2015-2023 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 lazy string support 17# not tested by py-prettyprinter.exp. 18 19load_lib gdb-python.exp 20 21standard_testfile 22 23if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug c++}]} { 24 return -1 25} 26 27# Skip all tests if Python scripting is not enabled. 28if { [skip_python_tests] } { continue } 29 30if ![runto_main ] { 31 return -1 32} 33 34gdb_breakpoint [gdb_get_line_number "break here"] 35gdb_continue_to_breakpoint "break here" 36 37gdb_py_test_silent_cmd "python null = gdb.parse_and_eval(\"null\")" "get null value" 1 38 39gdb_py_test_silent_cmd "python nullstr = null.lazy_string(length=0)" "create a null lazy string" 1 40gdb_test "python print (nullstr.length)" "0" "null lazy string length" 41gdb_test "python print (nullstr.address)" "0" "null lazy string address" 42gdb_test "python print (nullstr.type)" "const char \\*" "null lazy string type" 43gdb_test "python print(nullstr.value())" \ 44 "gdb.MemoryError: Cannot create a value from NULL.*Error while executing Python code." \ 45 "create value from NULL" 46gdb_test "python print(null.lazy_string(length=3).value())" \ 47 "gdb.MemoryError: Cannot create a lazy string with address 0x0, and a non-zero length.*Error while executing Python code." \ 48 "null lazy string with non-zero length" 49gdb_test "python print(null.lazy_string(length=-2))" \ 50 "ValueError: Invalid length.*Error while executing Python code." \ 51 "bad length" 52 53foreach var_spec { { "ptr" "pointer" "const char \\*" -1 } \ 54 { "array" "array" "const char \\[6\\]" 6 } \ 55 { "typedef_ptr" "typedef pointer" "pointer" -1 } } { 56 set var [lindex $var_spec 0] 57 set value [lindex $var_spec 1] 58 set type [lindex $var_spec 2] 59 set length [lindex $var_spec 3] 60 with_test_prefix $var { 61 gdb_test "print $var" "\"$value\"" 62 gdb_py_test_silent_cmd "python $var = gdb.history (0)" "get value from history" 1 63 gdb_py_test_silent_cmd "python l$var = $var.lazy_string()" "acquire lazy string" 1 64 gdb_test "python print ($var.type)" "$type" "string type name equality" 65 gdb_test "python print (l$var.type)" "$type" "lazy-string type name equality" 66 gdb_test "python print (l$var.length)" "$length" "lazy string length" 67 gdb_test "python print (l$var.value())" "\"$value\"" "lazy string value" 68 gdb_py_test_silent_cmd "python l2$var = $var.lazy_string(length=2)" "acquire lazy string, length 2" 1 69 gdb_test "python print (l2$var.length)" "2" "lazy string length 2" 70 gdb_test "python print (l2$var.value())" "\"[string range $value 0 1]\"" "lazy string length 2 value" 71 # This test will have to wait until gdb can handle it. There's no way, 72 # currently, to internally specify an array of length zero in the C 73 # language support. PR 20786 74 #gdb_test "python print ($var.lazy_string(length=0).value())" "\"\"" "empty lazy string value" 75 } 76} 77