| #!/bin/ksh |
| # |
| # Copyright (c) 2002, 2004, Oracle and/or its affiliates. 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
| # or visit www.oracle.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 |
| |