134 lines
3.4 KiB
Bash
134 lines
3.4 KiB
Bash
#!/bin/ksh
|
|
#
|
|
# Copyright 2002-2004 Sun Microsystems, Inc. All Rights Reserved.
|
|
# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
#
|
|
# This code is free software; you can redistribute it and/or modify it
|
|
# under the terms of the GNU General Public License version 2 only, as
|
|
# published by the Free Software Foundation.
|
|
#
|
|
# This code 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
|
|
# version 2 for more details (a copy is included in the LICENSE file that
|
|
# accompanied this code).
|
|
#
|
|
# You should have received a copy of the GNU General Public License version
|
|
# 2 along with this work; if not, write to the Free Software Foundation,
|
|
# Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
#
|
|
# Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
|
|
# CA 95054 USA or visit www.sun.com if you need additional information or
|
|
# have any questions.
|
|
#
|
|
#
|
|
|
|
# This script runs the test program, sagtest.java, with the regular
|
|
# JPDA jdi.
|
|
# It then starts up the debuggee part of the test, sagtarg.java,
|
|
# and calls gcore to create file sagcore for use in running
|
|
# the SA JDI client.
|
|
|
|
set -x
|
|
# jdk is a jdk with the vm from the sa workspace
|
|
while [ $# != 0 ] ; do
|
|
case $1 in
|
|
-vv)
|
|
set -x
|
|
;;
|
|
-gui)
|
|
theClass=sun.jvm.hotspot.HSDB
|
|
;;
|
|
-jdk)
|
|
jdk=$2
|
|
shift
|
|
;;
|
|
-jdbx)
|
|
do=jdbx
|
|
;;
|
|
-jdb)
|
|
do=jdb
|
|
;;
|
|
-help | help)
|
|
doUsage
|
|
exit
|
|
;;
|
|
-dontkill)
|
|
dontkill=true
|
|
;;
|
|
-d64)
|
|
d64=-d64
|
|
;;
|
|
-*)
|
|
javaArgs="$javaArgs $1"
|
|
;;
|
|
*)
|
|
echo "$1" | grep -s '^[0-9]*$' > /dev/null
|
|
if [ $? = 0 ] ; then
|
|
# it is a pid
|
|
args="$args $1"
|
|
else
|
|
# It is a core.
|
|
# We have to pass the name of the program that produced the
|
|
# core, and the core file itself.
|
|
args="$jdk/bin/java $1"
|
|
fi
|
|
;;
|
|
esac
|
|
shift
|
|
done
|
|
|
|
# First, run the sagtest.java with the regular JPDA jdi
|
|
workdir=./workdir
|
|
mkdir -p $workdir
|
|
CLASSPATH=$jdk/classes:$jdk/lib/tools.jar:$workdir
|
|
export CLASSPATH
|
|
|
|
$jdk/bin/javac -g -source 1.5 -classpath $jdk/classes:$jdk/lib/tools.jar:$workdir -J-Xms40m -d $workdir \
|
|
TestScaffold.java \
|
|
VMConnection.java \
|
|
TargetListener.java \
|
|
TargetAdapter.java \
|
|
sagdoit.java \
|
|
sagtarg.java \
|
|
sagtest.java
|
|
|
|
if [ $? != 0 ] ; then
|
|
exit 1
|
|
fi
|
|
|
|
$jdk/bin/java $javaArgs -Dtest.classes=$workdir sagtest
|
|
|
|
# Now run create a core file for use in running sa-jdi
|
|
|
|
if [ ! core.satest -nt sagtarg.class ] ; then
|
|
tmp=/tmp/sagsetup
|
|
rm -f $tmp
|
|
$jdk/bin/java $d64 sagtarg > $tmp &
|
|
pid=$!
|
|
while [ ! -s $tmp ] ; do
|
|
# Kludge alert!
|
|
sleep 2
|
|
done
|
|
#rm -f $tmp
|
|
|
|
# force core dump of the debuggee
|
|
OS=`uname`
|
|
if [ "$OS" = "Linux" ]; then
|
|
# Linux does not have gcore command. Instead, we use 'gdb's
|
|
# gcore command. Note that only some versions of gdb support
|
|
# gdb command.
|
|
echo "gcore" > gdbscript
|
|
gdb -batch -p $pid -x gdbscript
|
|
rm -f gdbscript
|
|
else
|
|
gcore $* $pid
|
|
fi
|
|
mv core.$pid sagcore
|
|
|
|
if [ "$dontkill" != "true" ]; then
|
|
kill -9 $pid
|
|
fi
|
|
fi
|
|
|