1# Copyright 2009, 2011 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# Contributed by Markus Deuling <deuling@de.ibm.com>. 17# 18# Testsuite for Cell Broadband Engine combined debugger 19# Testcase for ea software managed cache. 20 21load_lib cell.exp 22 23set ppu_file "ea-cache" 24set ppu_src ${srcdir}/${subdir}/${ppu_file}.c 25set ppu_bin ${objdir}/${subdir}/${ppu_file} 26set spu_file "ea-cache-spu" 27set spu_src ${srcdir}/${subdir}/${spu_file}.c 28set spu_bin ${objdir}/${subdir}/${spu_file} 29 30if {[skip_cell_tests]} { 31 return 0 32} 33 34# Compile SPU binary. 35if { [gdb_compile_cell_spu $spu_src $spu_bin executable {debug}] != "" } { 36 unsupported "Compiling spu binary failed." 37 return -1 38} 39# Compile PPU binary. 40if { [gdb_cell_embedspu $spu_bin $spu_bin-embed.o {debug}] != "" } { 41 unsupported "Embedding spu binary failed." 42 return -1 43} 44if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable {debug}] != "" } { 45 unsupported "Compiling ppu binary failed." 46 return -1 47} 48 49if [get_compiler_info ${ppu_bin}] { 50 return -1 51} 52 53gdb_exit 54gdb_start 55gdb_reinitialize_dir $srcdir/$subdir 56gdb_load ${ppu_bin} 57 58if ![runto_main] then { 59 fail "Can't run to main" 60 return 0 61} 62 63# Set breakpoint in SPU binary. 64cont_spu_main 65c_to "Marker SPUEA" $spu_file.c 66 67gdb_test "p *ppe_int_ptr" \ 68 ".*=.*23.*" \ 69 "p *ppe_int_ptr" 70 71gdb_test "set *ppe_int_ptr=42" "" "" 72 73gdb_test "p *ppe_int_ptr" \ 74 ".*=.*42.*" \ 75 "p *ppe_int_ptr" 76 77# Now switch to thread 1 (PPU) and look at int_var. ppe_int_ptr points to 78# int_var and should now also contain 42 (ea cache has been flushed). 79gdb_test "t 1" \ 80 ".*Switching to thread 1.*" \ 81 "Switch to thread 1" 82 83gdb_test "p int_var" \ 84 ".*=.*42.*" \ 85 "p int_var on ppu" 86 87gdb_exit 88return 0 89 90 91