Mercurial > hg > truffle

comparison agent/test/jdi/runsa.sh @ 0:a61af66fc99e jdk7-b24

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial load
author duke
date Sat, 01 Dec 2007 00:00:00 +0000
parents
children c18cbe5936b8
comparison
equal deleted inserted replaced
-1:000000000000 0:a61af66fc99e
1 #!/bin/ksh
2 #
3 # Copyright 2002-2003 Sun Microsystems, Inc. All Rights Reserved.
4 # DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5 #
6 # This code is free software; you can redistribute it and/or modify it
7 # under the terms of the GNU General Public License version 2 only, as
8 # published by the Free Software Foundation.
9 #
10 # This code is distributed in the hope that it will be useful, but WITHOUT
11 # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 # FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13 # version 2 for more details (a copy is included in the LICENSE file that
14 # accompanied this code).
15 #
16 # You should have received a copy of the GNU General Public License version
17 # 2 along with this work; if not, write to the Free Software Foundation,
18 # Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
19 #
20 # Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21 # CA 95054 USA or visit www.sun.com if you need additional information or
22 # have any questions.
23 #
24 #
25
26
27 # This jdk must be hopper or better; it must have the
28 # SA connectors in VirtualMachineManagerImpl.
29 jdk=/java/re/jdk/1.4.1/promoted/latest/binaries/solaris-sparc
30 #jdk=/net/mmm/export/mmm/jdk1.4fcs.sa
31
32 doUsage()
33 {
34 cat <<EOF
35 Run sagclient.class using Serviceability Agent to talk to a corefile/pid/debugserver.
36 Usage: runsa.sh [-jdk <jdk-pathname>] [-jdb] [ -jdbx ] [ -d64 ] [ -remote ] [ pid | corefile | debugserver ]
37
38 -jdk means to use that jdk. Default is 1.4.1/latest.
39 -jdbx means to run it under jdbx
40 -jdb means to connect using jdb instead of the sagclient program.
41 -remote debugserver means you want to connect to a remote debug server
42
43 The corefile must have been produced by the same java as is running SA.
44
45 EOF
46 }
47
48 if [ $# = 0 ] ; then
49 doUsage
50 exit 1
51 fi
52
53 # License file for development version of dbx
54 #LM_LICENSE_FILE=7588@extend.eng:/usr/dist/local/config/sparcworks/license.dat:7588@setlicense
55 #export LM_LICENSE_FILE
56
57 do=
58 args=
59 theClass=sagclient
60 javaArgs=
61
62 while [ $# != 0 ] ; do
63 case $1 in
64 -vv)
65 set -x
66 ;;
67 -jdk)
68 jdk=$2
69 shift
70 ;;
71 -jdbx)
72 do=jdbx
73 ;;
74 -jdb)
75 do=jdb
76 ;;
77 -help | help)
78 doUsage
79 exit
80 ;;
81 -d64)
82 d64=-d64
83 ;;
84 -remote)
85 shift
86 args="$1"
87 do=remote
88 ;;
89 -*)
90 javaArgs="$javaArgs $1"
91 ;;
92 *)
93 echo "$1" | grep -s '^[0-9]*$' > /dev/null
94 if [ $? = 0 ] ; then
95 # it is a pid
96 args="$args $1"
97 else
98 # It is a core.
99 # We have to pass the name of the program that produced the
100 # core, and the core file itself.
101 args="$jdk/bin/java $1"
102 fi
103 ;;
104 esac
105 shift
106 done
107
108 if [ -z "$jdk" ] ; then
109 error "--Error: runsa.sh: Must specify -jdk <jdk-pathname>."
110 error " Do runsa.sh -help for more info"
111 exit 1
112 fi
113
114 set -x
115 #setenv USE_LIBPROC_DEBUGGER "-Dsun.jvm.hotspot.debugger.useProcDebugger -Djava.library.path=$saprocdir"
116
117 # If jjh makes this, then the classes are in .../build/agent.
118 # if someone else does, they are in .
119 classesDir=../../../../../../build/agent
120 if [ ! -r $classesDir ] ; then
121 classesDir=.
122 if [ ! -r $classesDir ] ; then
123 echo "-- Error: runsa.sh can't find the SA classes"
124 exit 1
125 fi
126 fi
127 #javacp="/net/mmm/export/mmm/ws/sabaseline/build/solaris/solaris_sparc_compiler1/generated/sa-jdi.jar:$classesDir:$jdk/lib/tools.jar:$jdk/classes:./workdir"
128
129 javacp="$jdk/lib/sa-jdi.jar:$classesDir:$jdk/lib/tools.jar:$jdk/classes:./workdir"
130
131
132 extraArgs="-showversion $javaArgs"
133 #extraArgs="-DdbxSvcAgentDSOPathName=/net/mmm/export/mmm/ws/m/b2/sa/src/os/solaris/agent/64bit/libsvc_agent_dbx.so $extraArgs"
134 #extraArgs="-DdbxSvcAgentDSOPathName=/net/jano.eng/export/disk05/hotspot/sa/solaris/sparcv9/lib/libsvc_agent_dbx.so $extraArgs"
135
136 mkdir -p workdir
137 if [ sagclient.java -nt ./workdir/sagclient.class ] ; then
138 $jdk/bin/javac -d ./workdir -classpath $javacp sagclient.java
139 if [ $? != 0 ] ; then
140 exit 1
141 fi
142 fi
143 if [ sagdoit.java -nt ./workdir/sagdoit.class ] ; then
144 $jdk/bin/javac -d ./workdir -classpath $javacp sagdoit.java
145 if [ $? != 0 ] ; then
146 exit 1
147 fi
148 fi
149
150 if [ "$do" = jdbx ] ; then
151 set -x
152 dbx=/net/sparcworks.eng/export/set/sparcworks2/dbx_70_nightly/dev/buildbin/Derived-sparc-S2-opt/bin/dbx
153
154 # Have to do this export for jdbx to work. -cp and -classpath don't work.
155 CLASSPATH=$javacp
156 export CLASSPATH
157 #extraArgs="-Djava.class.path=$mhs/../sa/build/agent sun.jvm.hotspot.HSDB $*"
158 jvm_invocation="$jdk/bin/java -Xdebug \
159 -Dsun.boot.class.path=$jdk/classes \
160 $extraArgs"
161 #export jvm_invocation
162
163 JAVASRCPATH=$mhs/../sa/src/share/vm/agent
164 export JAVASRCPATH
165
166 #operand is pathname of .class file, eg ./jj.class.
167 echo run $args
168 clss=`echo $theClass | sed -e 's@\.@/@'`
169 if [ -r ./workdir/$clss.class ] ; then
170 # kludge for running sagclient
171 $dbx ./workdir/$clss.class
172 else
173 # kludge for running HSDB
174 $dbx $mhs/../sa/build/agent/$clss.class
175 fi
176 elif [ "$do" = jdb ] ; then
177 # This hasn't been tested.
178 $jdk/bin/jdb -J-Xbootclasspath/a:$classesDir -connect sun.jvm.hotspot.jdi.SACoreAttachingConnector:core=sagcore
179 elif [ "$do" = remote ] ; then
180 $jdk/bin/java $d64 -Djava.class.path=$javacp $extraArgs $theClass $args
181 else
182 $jdk/bin/java $d64 -Djava.class.path=$javacp $extraArgs $theClass $args
183
184 fi