Date: Sat, 20 Aug 2011 02:31:46 +0000 From: xxp@FreeBSD.org To: svn-soc-all@FreeBSD.org Subject: socsvn commit: r225286 - in soc2011/xxp/test: . config lib testscripts Message-ID: <20110820023146.A08B4106566B@hub.freebsd.org>
next in thread | raw e-mail | index | archive | help
Author: xxp Date: Sat Aug 20 02:31:46 2011 New Revision: 225286 URL: http://svnweb.FreeBSD.org/socsvn/?view=rev&rev=225286 Log: add test files Added: soc2011/xxp/test/clean.sh (contents, props changed) soc2011/xxp/test/config/ soc2011/xxp/test/config/arm-ice.exp soc2011/xxp/test/config/cfdbug.exp soc2011/xxp/test/config/cygmon.exp soc2011/xxp/test/config/d10v.exp soc2011/xxp/test/config/default.exp soc2011/xxp/test/config/dve.exp soc2011/xxp/test/config/gdbserver.exp soc2011/xxp/test/config/h8300.exp soc2011/xxp/test/config/i386-bozo.exp soc2011/xxp/test/config/i960.exp soc2011/xxp/test/config/m32r-stub.exp soc2011/xxp/test/config/m32r.exp soc2011/xxp/test/config/mips-idt.exp soc2011/xxp/test/config/mips.exp soc2011/xxp/test/config/mn10300-eval.exp soc2011/xxp/test/config/monitor.exp soc2011/xxp/test/config/proelf.exp soc2011/xxp/test/config/rom68k.exp soc2011/xxp/test/config/sh.exp soc2011/xxp/test/config/sid.exp soc2011/xxp/test/config/sim.exp soc2011/xxp/test/config/slite.exp soc2011/xxp/test/config/unix.exp soc2011/xxp/test/config/vr4300.exp soc2011/xxp/test/config/vr5000.exp soc2011/xxp/test/config/vx.exp soc2011/xxp/test/config/vxworks.exp soc2011/xxp/test/config/vxworks29k.exp soc2011/xxp/test/lib/ soc2011/xxp/test/lib/ada.exp soc2011/xxp/test/lib/cell.exp soc2011/xxp/test/lib/compiler.c soc2011/xxp/test/lib/compiler.cc soc2011/xxp/test/lib/cp-support.exp soc2011/xxp/test/lib/gdb.exp soc2011/xxp/test/lib/gdbserver-support.exp soc2011/xxp/test/lib/java.exp soc2011/xxp/test/lib/mi-support.exp soc2011/xxp/test/lib/pascal.exp soc2011/xxp/test/lib/prelink-support.exp soc2011/xxp/test/lib/set_unbuffered_mode.c soc2011/xxp/test/lib/trace-support.exp soc2011/xxp/test/run_test.sh (contents, props changed) soc2011/xxp/test/site.exp soc2011/xxp/test/testscripts/ soc2011/xxp/test/testscripts/bcmp.c soc2011/xxp/test/testscripts/bcmp.exp soc2011/xxp/test/testscripts/bcopy.c soc2011/xxp/test/testscripts/bcopy.exp soc2011/xxp/test/testscripts/bzero.c soc2011/xxp/test/testscripts/bzero.exp soc2011/xxp/test/testscripts/ceil.c soc2011/xxp/test/testscripts/ceil.exp soc2011/xxp/test/testscripts/ceilf.c soc2011/xxp/test/testscripts/ceilf.exp soc2011/xxp/test/testscripts/ceill.c soc2011/xxp/test/testscripts/ceill.exp soc2011/xxp/test/testscripts/copysign.c soc2011/xxp/test/testscripts/copysign.exp soc2011/xxp/test/testscripts/copysignf.c soc2011/xxp/test/testscripts/copysignf.exp soc2011/xxp/test/testscripts/copysignl.c soc2011/xxp/test/testscripts/copysignl.exp soc2011/xxp/test/testscripts/cos.c soc2011/xxp/test/testscripts/cos.exp soc2011/xxp/test/testscripts/exp.c soc2011/xxp/test/testscripts/exp.exp soc2011/xxp/test/testscripts/ffs.c soc2011/xxp/test/testscripts/ffs.exp soc2011/xxp/test/testscripts/finite.c soc2011/xxp/test/testscripts/finite.exp soc2011/xxp/test/testscripts/floor.c soc2011/xxp/test/testscripts/floor.exp soc2011/xxp/test/testscripts/floorf.c soc2011/xxp/test/testscripts/floorf.exp soc2011/xxp/test/testscripts/floorl.c soc2011/xxp/test/testscripts/floorl.exp soc2011/xxp/test/testscripts/fmod.c soc2011/xxp/test/testscripts/fmod.exp soc2011/xxp/test/testscripts/index.c soc2011/xxp/test/testscripts/index.exp soc2011/xxp/test/testscripts/llrint.c soc2011/xxp/test/testscripts/llrint.exp soc2011/xxp/test/testscripts/llrintf.c soc2011/xxp/test/testscripts/llrintf.exp soc2011/xxp/test/testscripts/log.c soc2011/xxp/test/testscripts/log.exp soc2011/xxp/test/testscripts/log10.c soc2011/xxp/test/testscripts/log10.exp soc2011/xxp/test/testscripts/log10f.c soc2011/xxp/test/testscripts/log10f.exp soc2011/xxp/test/testscripts/logb.c soc2011/xxp/test/testscripts/logb.exp soc2011/xxp/test/testscripts/logbf.c soc2011/xxp/test/testscripts/logbf.exp soc2011/xxp/test/testscripts/logbl.c soc2011/xxp/test/testscripts/logbl.exp soc2011/xxp/test/testscripts/logf.c soc2011/xxp/test/testscripts/logf.exp soc2011/xxp/test/testscripts/lrint.c soc2011/xxp/test/testscripts/lrint.exp soc2011/xxp/test/testscripts/lrintf.c soc2011/xxp/test/testscripts/lrintf.exp soc2011/xxp/test/testscripts/lrintl.c soc2011/xxp/test/testscripts/lrintl.exp soc2011/xxp/test/testscripts/memchr.c soc2011/xxp/test/testscripts/memchr.exp soc2011/xxp/test/testscripts/memcmp.c soc2011/xxp/test/testscripts/memcmp.exp soc2011/xxp/test/testscripts/memcpy.c soc2011/xxp/test/testscripts/memcpy.exp soc2011/xxp/test/testscripts/memmove.c soc2011/xxp/test/testscripts/memmove.exp soc2011/xxp/test/testscripts/memset.c soc2011/xxp/test/testscripts/memset.exp soc2011/xxp/test/testscripts/remainder.c soc2011/xxp/test/testscripts/remainder.exp soc2011/xxp/test/testscripts/remainderf.c soc2011/xxp/test/testscripts/remainderf.exp soc2011/xxp/test/testscripts/remquo.c soc2011/xxp/test/testscripts/remquo.exp soc2011/xxp/test/testscripts/remquof.c soc2011/xxp/test/testscripts/remquof.exp soc2011/xxp/test/testscripts/remquol.c soc2011/xxp/test/testscripts/remquol.exp soc2011/xxp/test/testscripts/rindex.c soc2011/xxp/test/testscripts/rindex.exp soc2011/xxp/test/testscripts/rint.c soc2011/xxp/test/testscripts/rint.exp soc2011/xxp/test/testscripts/rintf.c soc2011/xxp/test/testscripts/rintf.exp soc2011/xxp/test/testscripts/rintl.c soc2011/xxp/test/testscripts/rintl.exp soc2011/xxp/test/testscripts/scalbn.c soc2011/xxp/test/testscripts/scalbn.exp soc2011/xxp/test/testscripts/scalbnf.c soc2011/xxp/test/testscripts/scalbnf.exp soc2011/xxp/test/testscripts/scalbnl.c soc2011/xxp/test/testscripts/scalbnl.exp soc2011/xxp/test/testscripts/significand.c soc2011/xxp/test/testscripts/significand.exp soc2011/xxp/test/testscripts/significandf.c soc2011/xxp/test/testscripts/significandf.exp soc2011/xxp/test/testscripts/sin.c soc2011/xxp/test/testscripts/sin.exp soc2011/xxp/test/testscripts/sqrt.c soc2011/xxp/test/testscripts/sqrt.exp soc2011/xxp/test/testscripts/sqrtf.c soc2011/xxp/test/testscripts/sqrtf.exp soc2011/xxp/test/testscripts/sqrtl.c soc2011/xxp/test/testscripts/sqrtl.exp soc2011/xxp/test/testscripts/strcat.c soc2011/xxp/test/testscripts/strcat.exp soc2011/xxp/test/testscripts/strchr.c soc2011/xxp/test/testscripts/strchr.exp soc2011/xxp/test/testscripts/strcmp.c soc2011/xxp/test/testscripts/strcmp.exp soc2011/xxp/test/testscripts/strncmp.c soc2011/xxp/test/testscripts/strncmp.exp soc2011/xxp/test/testscripts/swab.c soc2011/xxp/test/testscripts/swab.exp soc2011/xxp/test/testscripts/tan.c soc2011/xxp/test/testscripts/tan.exp soc2011/xxp/test/testscripts/trunc.c soc2011/xxp/test/testscripts/trunc.exp soc2011/xxp/test/testscripts/truncf.c soc2011/xxp/test/testscripts/truncf.exp soc2011/xxp/test/testscripts/truncl.c soc2011/xxp/test/testscripts/truncl.exp soc2011/xxp/test/testscripts/wcschr.c soc2011/xxp/test/testscripts/wcschr.exp soc2011/xxp/test/testscripts/wcscmp.c soc2011/xxp/test/testscripts/wcscmp.exp soc2011/xxp/test/testscripts/wcslen.c soc2011/xxp/test/testscripts/wcslen.exp soc2011/xxp/test/testscripts/wmemchr.c soc2011/xxp/test/testscripts/wmemchr.exp Added: soc2011/xxp/test/clean.sh ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/clean.sh Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,6 @@ + + +EXECUTABLES="bcmp bcopy bzero ceil ceilf ceill copysign copysignf copysignl cos exp ffs finite floor floorf floorl fmod index llrint llrintf log log10 log10f logb logbf logbl logf lrint lrintf lrintl memchr memcmp memcpy memmove memset remainder remainderf remquo remquof remquol rindex rint rintf rintl scalbn scalbnf scalbnl significand significandf sin sqrt sqrtf sqrtl strcat strchr strcmp strncmp swab tan trunc truncf truncl wcschr wcscmp wcslen wmemchr" + +cd testscripts +rm -f $EXECUTABLES Added: soc2011/xxp/test/config/arm-ice.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/arm-ice.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1 @@ +load_lib "../config/monitor.exp"; Added: soc2011/xxp/test/config/cfdbug.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/cfdbug.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,17 @@ +# Copyright 1997, 1999, 2007, 2008, 2009, 2010 +# Free Software Foundation, Inc. + +# 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/>. + +load_lib "../config/monitor.exp" Added: soc2011/xxp/test/config/cygmon.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/cygmon.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1 @@ +load_lib "../config/monitor.exp"; Added: soc2011/xxp/test/config/d10v.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/d10v.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,16 @@ +# Copyright (C) 1997, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. + +# 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/>. + +load_lib "../config/monitor.exp" Added: soc2011/xxp/test/config/default.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/default.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,16 @@ +# Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. + +# 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/>. + +load_lib gdb.exp Added: soc2011/xxp/test/config/dve.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/dve.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,19 @@ +# Copyright 1998, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. + +# 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/>. + +load_lib ../config/monitor.exp +set timeout 1000 +verbose "Timeout is now $timeout seconds" 2 + Added: soc2011/xxp/test/config/gdbserver.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/gdbserver.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,87 @@ +# Copyright 2000, 2002, 2003, 2004, 2005, 2007, 2008, 2009, 2010 +# Free Software Foundation, Inc. + +# 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/>. + +# Test framework for GDB (remote protocol) using a "gdbserver", +# ie. a debug agent running as a native process on the same or +# a different host. + +# +# This module to be used for testing gdb with a "gdbserver" +# built either from libremote or from gdb/gdbserver. +# + +# +# To be addressed or set in your baseboard config file: +# +# set_board_info gdb_protocol "remote" +# Unles you have a gdbserver that uses a different protocol... +# +# set_board_info use_gdb_stub 1 +# This tells the rest of the test suite not to do things +# like "run" which don't work well on remote targets. +# +# set_board_info gdb,do_reload_on_run 1 +# Unles you have a gdbserver that can handle multiple sessions. +# +# set_board_info noargs 1 +# At present there is no provision in the remote protocol +# for passing arguments. This test framework does not +# address the issue, so it's best to set this variable +# in your baseboard configuration file. +# FIXME: there's no reason why the test harness couldn't +# pass commandline args when it spawns gdbserver. +# +# set_board_info gdb,noinferiorio 1 +# Neither the traditional gdbserver nor the one in libremote +# can presently capture stdout and relay it to GDB via the +# 'O' packet. This means that tests involving printf will +# fail unles you set this varibale in your baseboard +# configuration file. +# +# set_board_info gdb,no_hardware_watchpoints 1 +# Unles you have a gdbserver that supports hardware watchpoints. +# FIXME: gdb should detect if the target doesn't support them, +# and fall back to using software watchpoints. +# +# set_board_info gdb_server_prog +# This will be the path to the gdbserver program you want to test. +# Defaults to "gdbserver". +# +# set_board_info sockethost +# The name of the host computer whose socket is being used. +# Defaults to "localhost". Note: old gdbserver requires +# that you define this, but libremote/gdbserver does not. +# +# set_board_info gdb,socketport +# Port id to use for socket connection. If not set explicitly, +# it will start at "2345" and increment for each use. +# + +# The guts live in gdbserver-support.exp now. + +load_lib gdbserver-support.exp + +proc gdbserver_gdb_load { } { + return [gdbserver_spawn ""] +} + +proc gdb_reload { } { + return [gdbserver_run ""] +} + +proc gdb_reconnect { } { + return [gdbserver_reconnect] +} Added: soc2011/xxp/test/config/h8300.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/h8300.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1 @@ +load_lib "../config/monitor.exp"; Added: soc2011/xxp/test/config/i386-bozo.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/i386-bozo.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1 @@ +load_lib "../config/monitor.exp" Added: soc2011/xxp/test/config/i960.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/i960.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,16 @@ +# Copyright 1997, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. + +# 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/>. + +load_lib ../config/monitor.exp Added: soc2011/xxp/test/config/m32r-stub.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/m32r-stub.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1 @@ +load_lib "../../testsuite/config/sparclet.exp" Added: soc2011/xxp/test/config/m32r.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/m32r.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,19 @@ +# Copyright 1997, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. + +# 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/>. + +load_lib ../config/monitor.exp +set timeout 120 +verbose "Timeout is now $timeout seconds" 2 + Added: soc2011/xxp/test/config/mips-idt.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/mips-idt.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,17 @@ +# Copyright (C) 1993, 1997, 2007, 2008, 2009, 2010 +# Free Software Foundation, Inc. + +# 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/>. + +load_lib ../config/monitor.exp Added: soc2011/xxp/test/config/mips.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/mips.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,17 @@ +# Copyright (C) 1993, 1997, 2007, 2008, 2009, 2010 +# Free Software Foundation, Inc. + +# 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/>. + +load_lib ../config/monitor.exp Added: soc2011/xxp/test/config/mn10300-eval.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/mn10300-eval.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,19 @@ +# Copyright 1998, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. + +# 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/>. + +load_lib ../config/monitor.exp +set timeout 1000 +verbose "Timeout is now $timeout seconds" 2 + Added: soc2011/xxp/test/config/monitor.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/monitor.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,259 @@ +# Test Framework Driver for GDB driving a ROM monitor (via monitor.c). +# Copyright 1995, 1996, 1997, 1998, 1999, 2000, 2007, 2008, 2009, 2010 +# Free Software Foundation, Inc. +# +# 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/>. + +load_lib gdb.exp +# puts "***** DID USE MONITOR ******" + +# +# gdb_target_cmd +# Send gdb the "target" command +# +proc gdb_target_cmd { targetname serialport } { + global gdb_prompt + + for {set i 1} {$i <= 3} {incr i} { + send_gdb "target $targetname $serialport\n" + gdb_expect 60 { + -re "A program is being debugged already.*ill it.*y or n. $" { + send_gdb "y\n"; + exp_continue; + } + -re "Couldn't establish connection to remote.*$gdb_prompt" { + verbose "Connection failed"; + } + -re "Remote MIPS debugging.*$gdb_prompt" { + verbose "Set target to $targetname"; + return 0; + } + -re "Remote debugging using .*$serialport.*$gdb_prompt" { + verbose "Set target to $targetname"; + return 0; + } + -re "Remote target $targetname connected to.*$gdb_prompt" { + verbose "Set target to $targetname"; + return 0; + } + -re "Connected to.*$gdb_prompt" { + verbose "Set target to $targetname"; + return 0; + } + -re "Ending remote.*$gdb_prompt" { } + -re "Connection refused.*$gdb_prompt" { + verbose "Connection refused by remote target. Pausing, and trying again." + sleep 30 + continue + } + -re "Timeout reading from remote system.*$gdb_prompt" { + verbose "Got timeout error from gdb."; + } + timeout { + send_gdb ""; + break + } + } + } + return 1 +} + + + +# +# gdb_target_monitor +# Set gdb to target the monitor +# +proc gdb_target_monitor { exec_file } { + global gdb_prompt + global exit_status + global timeout + + if [target_info exists gdb_protocol] { + set targetname "[target_info gdb_protocol]" + } else { + perror "No protocol specified for [target_info name]."; + return -1; + } + if [target_info exists baud] { + gdb_test "set remotebaud [target_info baud]" "" "" + } + if [target_info exists binarydownload] { + gdb_test "set remotebinarydownload [target_info binarydownload]" "" "" + } + if { [ target_info exists disable_x_packet ] } { + gdb_test "set remote X-packet disable" "" + } + if { [ target_info exists disable_z_packet ] } { + gdb_test "set remote Z-packet disable" "" + } + if [target_info exists gdb_serial] { + set serialport "[target_info gdb_serial]"; + } elseif [target_info exists netport] { + set serialport "[target_info netport]" + } else { + set serialport "[target_info serial]" + } + + for {set j 1} {$j <= 2} {incr j} { + if [gdb_file_cmd $exec_file] { return -1; } + + if ![gdb_target_cmd $targetname $serialport] { return 0; } + + gdb_target_exec; + + if { $j == 1 && ![reboot_target] } { + break; + } + } + + perror "Couldn't set target for $targetname, port is $serialport."; + return -1; +} + +proc gdb_target_exec { } { + gdb_test "target exec" "No executable file now." "" ".*Kill it.*y or n.*" "y" + +} +# +# gdb_load -- load a file into the debugger. +# return a -1 if anything goes wrong. +# +proc gdb_load { arg } { + global verbose + global loadpath + global loadfile + global GDB + global gdb_prompt + global timeout + global last_gdb_file; + + if { $arg == "" } { + if [info exists last_gdb_file] { + set arg $last_gdb_file; + } else { + send_gdb "info files\n"; + gdb_expect 30 { + -re "Symbols from \"(\[^\"\]+)\"" { + set arg $expect_out(1,string); + exp_continue; + } + -re "Local exec file:\[\r\n\]+\[ \t\]*`(\[^'\]+)'," { + set arg $expect_out(1,string); + exp_continue; + } + -re "$gdb_prompt $" { } + } + } + } + + set last_gdb_file $arg; + + for { set j 1; } { $j <= 2 } {incr j; } { + if [target_info exists gdb,use_standard_load] { + gdb_target_exec; + if ![target_info exists gdb,no_push_conn] { + remote_push_conn host; + } + set state [remote_ld target $arg]; + if ![target_info exists gdb,no_push_conn] { + remote_close target; + remote_pop_conn host; + } + if { $state == "pass" } { + if [gdb_target_monitor $arg] { return -1; } + gdb_test "list main" ".*" "" + verbose "Loaded $arg into $GDB\n"; + return 0; + } + } else { + + if [gdb_target_monitor $arg] { return -1 } + + if [is_remote host] { + # FIXME: Multiple downloads. bleah. + set farg [remote_download host $arg]; + } else { + set farg $arg; + } + + if { $arg != "" && [target_info exists gdb_sect_offset] } { + set textoff [target_info gdb_sect_offset]; + send_gdb "sect .text $textoff\n"; + gdb_expect 30 { + -re "(0x\[0-9a-z]+) - 0x\[0-9a-z\]+ is \\.data" { + set dataoff $expect_out(1,string); + exp_continue; + } + -re "(0x\[0-9a-z\]+) - 0x\[0-9a-z\]+ is \\.bss" { + set bssoff $expect_out(1,string); + exp_continue; + } + -re "$gdb_prompt" { } + } + set dataoff [format 0x%x [expr $dataoff + $textoff]]; + set bssoff [format 0x%x [expr $bssoff + $textoff]]; + send_gdb "sect .data $dataoff\n"; + gdb_expect 30 { + -re "$gdb_prompt" { } + } + send_gdb "sect .bss $bssoff\n"; + gdb_expect 30 { + -re "$gdb_prompt" { } + } + } + + verbose "Loading $farg" + if [target_info exists gdb_load_offset] { + set command "load $farg [target_info gdb_load_offset]\n"; + } else { + set command "load $farg\n"; + } + if [target_info exists gdb_load_timeout] { + set loadtimeout [target_info gdb_load_timeout] + } else { + set loadtimeout 1600 + } + + send_gdb $command; + gdb_expect $loadtimeout { + -re "\[Ff\]ailed.*$gdb_prompt $" { + verbose "load failed"; + } + -re "Timeout reading from remote.*$gdb_prompt" { + } + -re "$gdb_prompt $" { + verbose "Loaded $farg into $GDB\n" + return 0; + } + timeout { + if { $verbose > 1 } { + perror "Timed out trying to load $farg." + } + } + } + } + + # Make sure we don't have an open connection to the target. + gdb_target_exec; + + if { $j == 1 } { + if { ![reboot_target] } { + break; + } + } + } + perror "Couldn't load file into GDB."; + return -1; +} Added: soc2011/xxp/test/config/proelf.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/proelf.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,16 @@ +# Copyright 1997, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. + +# 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/>. + +load_lib ../config/monitor.exp Added: soc2011/xxp/test/config/rom68k.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/rom68k.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,16 @@ +# Copyright 1997, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. + +# 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/>. + +load_lib ../config/monitor.exp Added: soc2011/xxp/test/config/sh.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/sh.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,16 @@ +# Copyright 1997, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. + +# 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/>. + +load_lib ../config/monitor.exp Added: soc2011/xxp/test/config/sid.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/sid.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,218 @@ +# Test Framework Driver for GDB driving an external simulator +# Copyright 1999, 2001, 2007, 2008, 2009, 2010 +# Free Software Foundation, Inc. +# +# 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/>. + +load_lib gdb.exp + +proc sid_start {} { + global verbose + + set port [lindex [split [target_info netport] ":"] 1] + + # Set a default endianness + case [target_info multilib_flags] in { + { *big-endian* *-EB* *-meb* } { set sidendian "-EB" } + { *little-endian* *-EL* *-mel* } { set sidendian "-EL" } + default { + if {[target_info exists sim,defaultendian]} then { + set sidendian [target_info sim,defaultendian] + } else { + # rely on endianness settings in sid configuration defaults + set sidendian "" + } + } + } + case $sidendian in { + { -EB } { set sidendian2 {-e "set cpu endian big"} } + { -EL } { set sidendian2 {-e "set cpu endian little"} } + default { set sidendian2 {} } + } + + # test to see whether to use use sid in build or install tree + set use_build_tree [file exists ../../sid] + + if {$use_build_tree} then { + set pre_spawn { + global env + set env(SID_LIBRARY_PATH) [join [glob "../../sid/component/*"] ":"] + set env(SID) "../../sid/main/dynamic/sid" + if {! [file exists $env(SID)]} then { error "Cannot find sid in build tree" } + } + if { [board_info target sim,protocol] == "sid" } { + set spawncmd "[target_info sim] [target_info sim,options] $sidendian2 -e \"set cpu-gdb-socket sockaddr-local 0.0.0.0:$port\"" + } elseif { [board_info target sim,protocol] == "rawsid" } { + set spawncmd "[target_info sim] [target_info sim,options] -$sidendian --gdb=$port" + } else { + set spawncmd "../../sid/bsp/[target_info sim] $sidendian --gdb=$port [target_info sim,options]" + } + set post_spawn { + global env + unset env(SID_LIBRARY_PATH) + unset env(SID) + } + } else { + set pre_spawn {} + if { [board_info target sim,protocol] == "sid" } { + # FIXME: sim,options may be from the build tree, should find + # it in the install tree. + set spawncmd "sid [target_info sim,options] $sidendian2 -e \"set cpu-gdb-socket sockaddr-local 0.0.0.0:$port\"" + } elseif { [board_info target sim,protocol] == "rawsid" } { + set spawncmd "[target_info sim] [target_info sim,options] -$sidendian --gdb=$port" + } else { + set spawncmd "[target_info sim] $sidendian --gdb=$port [target_info sim,options]" + } + set post_spawn {} + } + + eval $pre_spawn + if {[catch [list remote_spawn host $spawncmd] msg]} { + perror $msg + exit 1 + } + eval $post_spawn + + # Don't do the following any more; it breaks with "runtest ... < /dev/null" +# expect_background { +# -re \[^\n\]*\n { +# regsub "\n" $expect_out(buffer) {} msg +# verbose "SID: $msg" 2 +# } +# } + + # There should be no need to sleep to give SID time to start; + # GDB would wait for a fair while for the stub to respond. + sleep 4 + + if ![target_info exists gdb,no_push_conn] { + remote_push_conn host; + } +} + +# +# Handle GDB talking to SID +# + +proc gdb_start {} { + sid_start + return [default_gdb_start] +} + +proc sid_exit {} { + if ![target_info exists gdb,no_push_conn] { + remote_close host; + remote_pop_conn host; + } +} + +proc gdb_exit {} { + set result [default_gdb_exit] + sid_exit + return $result +} + +# +# gdb_target_sid +# Set gdb to target the simulator +# +proc send_target_sid { } { + # wait a little while, giving sid time to shut down & restart its + # gdb socket + sleep 4 + send_gdb "target [target_info gdb_protocol] [target_info netport]\n" +} + +proc gdb_target_sid { } { + global gdb_prompt + global exit_status + + send_target_sid + + global timeout + set prev_timeout $timeout + set timeout 60 + verbose "Timeout is now $timeout seconds" 2 + gdb_expect { + -re ".*\[Ee\]rror.*$gdb_prompt $" { + perror "Couldn't set target for remote simulator." + cleanup + gdb_exit + } + -re "Remote debugging using.*$gdb_prompt" { + verbose "Set target to sid" + } + timeout { + perror "Couldn't set target for remote simulator." + cleanup + gdb_exit + } + } + set timeout $prev_timeout + verbose "Timeout is now $timeout seconds" 2 +} + +# +# gdb_load -- load a file into the debugger. +# return a -1 if anything goes wrong. +# +proc gdb_load { arg } { + global verbose + global loadpath + global loadfile + global GDB + global gdb_prompt + global retval + + if { $arg != "" } { + if [gdb_file_cmd $arg] then { return -1 } + } + + gdb_target_sid + + send_gdb "load\n" + global timeout + set prev_timeout $timeout + set timeout 2400 + verbose "Timeout is now $timeout seconds" 2 + gdb_expect { + -re ".*\[Ee\]rror.*$gdb_prompt $" { + if $verbose>1 then { + perror "Error during download." + } + set retval -1; + } + -re ".*$gdb_prompt $" { + if $verbose>1 then { + send_user "Loaded $arg into $GDB\n" + } + set retval 0; + } + -re "$gdb_prompt $" { + if $verbose>1 then { + perror "GDB couldn't load." + } + set retval -1; + } + timeout { + if $verbose>1 then { + perror "Timed out trying to load $arg." + } + set retval -1; + } + } + set timeout $prev_timeout + verbose "Timeout is now $timeout seconds" 2 + return $retval; +} Added: soc2011/xxp/test/config/sim.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/sim.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,88 @@ +# Test Framework Driver for GDB driving a builtin simulator +# Copyright 1994, 1997, 1998, 2004, 2007, 2008, 2009, 2010 +# Free Software Foundation, Inc. +# +# 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/>. + +load_lib gdb.exp + +# +# gdb_target_sim +# Set gdb to target the simulator +# +proc gdb_target_sim { } { + global gdb_prompt + + set target_sim_options "[board_info target gdb,target_sim_options]"; + + send_gdb "target sim $target_sim_options\n" + set timeout 60 + verbose "Timeout is now $timeout seconds" 2 + gdb_expect { + -re "Connected to the simulator.*$gdb_prompt $" { + verbose "Set target to sim" + } + timeout { + perror "Couldn't set target for simulator." + cleanup + return -1 + } + } + set timeout 10 + verbose "Timeout is now $timeout seconds" 2 + return 0 +} + +# +# gdb_load -- load a file into the debugger. +# return a -1 if anything goes wrong. +# +proc gdb_load { arg } { + global verbose + global loadpath + global loadfile + global GDB + global gdb_prompt + + if { $arg != "" } { + if [gdb_file_cmd $arg] then { return -1 } + } + + if [gdb_target_sim] then { return -1 } + + send_gdb "load\n" + set timeout 2400 + verbose "Timeout is now $timeout seconds" 2 + gdb_expect { + -re ".*$gdb_prompt $" { + if $verbose>1 then { + send_user "Loaded $arg into $GDB\n" + } + set timeout 30 + verbose "Timeout is now $timeout seconds" 2 + return 0 + } + -re "$gdb_prompt $" { + if $verbose>1 then { + perror "GDB couldn't load." + } + } + timeout { + if $verbose>1 then { + perror "Timed out trying to load $arg." + } + } + } + return -1 +} Added: soc2011/xxp/test/config/slite.exp ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ soc2011/xxp/test/config/slite.exp Sat Aug 20 02:31:46 2011 (r225286) @@ -0,0 +1,180 @@ +# Copyright 1993, 1997, 1998, 2007, 2008, 2009, 2010 +# Free Software Foundation, Inc. + +# 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/>. + +# This file was written by Ian Lance Taylor <ian@cygnus.com>. + +# GDB support routines for a board using the MIPS remote debugging +# protocol. These are actually pretty generic. + +# DejaGnu currently assumes that debugging is being done over the main +# console port. It would probably be more convenient for people using +# IDT boards to permit the debugging port and the connected port to be +# different, since an IDT board has two ports. This would require +# extending some of the tests in a fashion similar to that done for +# VxWorks, because the test output would appear on the other port, +# rather than being displayed by gdb. + +load_lib remote.exp +load_lib gdb.exp +set gdb_prompt "\\(gdb\\)" + +# +# gdb_load -- load a file into the GDB. +# Returns a 0 if there was an error, +# 1 if it load successfully. +# +proc gdb_load { arg } { + global verbose + global loadpath + global loadfile + global gdb_prompt + global GDB + global expect_out + + set loadfile [file tail $arg] + set loadpath [file dirname $arg] + + gdb_file_cmd $arg + + if [target_info exists gdb_protocol] { + set protocol [target_info gdb_protocol]; + } else { + set protocol "sparclite" + } + + if [target_info exists serial] { + set targetname [target_info serial]; + set command "target $protocol [target_info serial]\n"; + } else { + if ![target_info exists netport] { + perror "Need either netport or gdb_serial entry for [target_info name]."; + return -1; *** DIFF OUTPUT TRUNCATED AT 1000 LINES ***
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20110820023146.A08B4106566B>