1 #!/bin/sh
2
3 # Copyright (c) 2010, 2011, Oracle and/or its affiliates. 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
21 # or visit www.oracle.com if you need additional information or have any
22 # questions.
23
24
25 # This script launches HotSpot.
26 #
27 # If the first parameter is either "-gdb" or "-gud", HotSpot will be
28 # launched inside gdb. "-gud" means "open an Emacs window and run gdb
29 # inside Emacs".
30 #
31 # If the first parameter is "-dbx", HotSpot will be launched inside dbx.
32 #
33 # If the first parameter is "-valgrind", HotSpot will be launched
34 # inside Valgrind (http://valgrind.kde.org) using the Memcheck skin,
35 # and with memory leak detection enabled. This currently (2005jan19)
36 # requires at least Valgrind 2.3.0. -Xmx16m will also be passed as
37 # the first parameter to HotSpot, since lowering HotSpot's memory
38 # consumption makes execution inside of Valgrind *a lot* faster.
39 #
40
41
42 #
43 # User changeable parameters ------------------------------------------------
44 #
45
46 # This is the name of the gdb binary to use
47 if [ ! "$GDB" ]
48 then
49 GDB=gdb
50 fi
51
52 # This is the name of the gdb binary to use
53 if [ ! "$DBX" ]
54 then
55 DBX=dbx
56 fi
57
58 # This is the name of the Valgrind binary to use
59 if [ ! "$VALGRIND" ]
60 then
61 VALGRIND=valgrind
62 fi
63
64 # This is the name of Emacs for running GUD
65 EMACS=emacs
66
67 #
68 # End of user changeable parameters -----------------------------------------
69 #
70
71 # Make sure the paths are fully specified, i.e. they must begin with /.
72 REL_MYDIR=`dirname $0`
73 MYDIR=`cd $REL_MYDIR && pwd`
74
75 # Look whether the user wants to run inside gdb
76 case "$1" in
77 -gdb)
78 MODE=gdb
79 shift
80 ;;
81 -gud)
82 MODE=gud
83 shift
84 ;;
85 -dbx)
86 MODE=dbx
87 shift
88 ;;
89 -valgrind)
90 MODE=valgrind
91 shift
92 ;;
93 *)
94 MODE=run
95 ;;
96 esac
97
98 JDK=
99 if [ "${ALT_JAVA_HOME}" = "" ]; then
100 . ${MYDIR}/jdkpath.sh
101 else
102 JDK=${ALT_JAVA_HOME%%/jre};
103 fi
104
105 if [ "${JDK}" = "" ]; then
106 echo Failed to find JDK. ALT_JAVA_HOME is not set or ./jdkpath.sh is empty or not found.
107 exit 1
108 fi
109
110 # We will set the LD_LIBRARY_PATH as follows:
111 # o $JVMPATH (directory portion only)
112 # o $JRE/lib/$ARCH
113 # followed by the user's previous effective LD_LIBRARY_PATH, if
114 # any.
115 JRE=$JDK/jre
116 JAVA_HOME=$JDK
117 export JAVA_HOME
118
119 ARCH=@@LIBARCH@@
120 SBP=${MYDIR}:${JRE}/lib/${ARCH}
121
122
123 # Set up a suitable LD_LIBRARY_PATH or DYLD_LIBRARY_PATH
124
125 OS=`uname -s`
126 if [ "${OS}" = "Darwin" ]
127 then
128
129 if [ -z "$DYLD_LIBRARY_PATH" ]
130 then
131 DYLD_LIBRARY_PATH="$SBP"
132 else
133 DYLD_LIBRARY_PATH="$SBP:$LD_LIBRARY_PATH"
134 fi
135 export DYLD_LIBRARY_PATH
136
137 else
138 # not 'Darwin'
139
140 if [ -z "$LD_LIBRARY_PATH" ]
141 then
142 LD_LIBRARY_PATH="$SBP"
143 else
144 LD_LIBRARY_PATH="$SBP:$LD_LIBRARY_PATH"
145 fi
146 export LD_LIBRARY_PATH
147
148 fi
149
150 JPARMS="$@ $JAVA_ARGS";
151
152 # Locate the gamma development launcher
153 LAUNCHER=${MYDIR}/gamma
154 if [ ! -x $LAUNCHER ] ; then
155 echo Error: Cannot find the gamma development launcher \"$LAUNCHER\"
156 exit 1
157 fi
158
159 GDBSRCDIR=$MYDIR
160 BASEDIR=`cd $MYDIR/../../.. && pwd`
161
162 init_gdb() {
163 # Create a gdb script in case we should run inside gdb
164 GDBSCR=/tmp/hsl.$$
165 rm -f $GDBSCR
166 cat >>$GDBSCR <<EOF
167 cd `pwd`
168 handle SIGUSR1 nostop noprint
169 handle SIGUSR2 nostop noprint
170 set args $JPARMS
171 file $LAUNCHER
172 directory $GDBSRCDIR
173 # Get us to a point where we can set breakpoints in libjvm.so
174 break InitializeJVM
175 run
176 # Stop in InitializeJVM
177 delete 1
178 # We can now set breakpoints wherever we like
179 EOF
180 }
181
182
183 case "$MODE" in
184 gdb)
185 init_gdb
186 $GDB -x $GDBSCR
187 rm -f $GDBSCR
188 ;;
189 gud)
190 init_gdb
191 # First find out what emacs version we're using, so that we can
192 # use the new pretty GDB mode if emacs -version >= 22.1
193 case `$EMACS -version 2> /dev/null` in
194 *GNU\ Emacs\ 2[23]*)
195 emacs_gud_cmd="gdba"
196 emacs_gud_args="--annotate=3"
197 ;;
198 *)
199 emacs_gud_cmd="gdb"
200 emacs_gud_args=
201 ;;
202 esac
203 $EMACS --eval "($emacs_gud_cmd \"$GDB $emacs_gud_args -x $GDBSCR\")";
204 rm -f $GDBSCR
205 ;;
206 dbx)
207 $DBX -s $MYDIR/.dbxrc $LAUNCHER $JPARAMS
208 ;;
209 valgrind)
210 echo Warning: Defaulting to 16Mb heap to make Valgrind run faster, use -Xmx for larger heap
211 echo
212 $VALGRIND --tool=memcheck --leak-check=yes --num-callers=50 $LAUNCHER -Xmx16m $JPARMS
213 ;;
214 run)
215 LD_PRELOAD=$PRELOADING exec $LAUNCHER $JPARMS
216 ;;
217 *)
218 echo Error: Internal error, unknown launch mode \"$MODE\"
219 exit 1
220 ;;
221 esac
222 RETVAL=$?
223 exit $RETVAL