Mercurial > hg > truffle
annotate src/share/vm/prims/jvmtiThreadState.cpp @ 14725:ba7b08d90fde
new ProfileCompiledMethods tool
author | Lukas Stadler <lukas.stadler@oracle.com> |
---|---|
date | Mon, 24 Mar 2014 14:02:58 +0100 |
parents | 0d8d78c0329a |
children | 92aa6797d639 |
rev | line source |
---|---|
0 | 1 /* |
14653
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
2 * Copyright (c) 2003, 2014, Oracle and/or its affiliates. All rights reserved. |
0 | 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
4 * | |
5 * This code is free software; you can redistribute it and/or modify it | |
6 * under the terms of the GNU General Public License version 2 only, as | |
7 * published by the Free Software Foundation. | |
8 * | |
9 * This code is distributed in the hope that it will be useful, but WITHOUT | |
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
12 * version 2 for more details (a copy is included in the LICENSE file that | |
13 * accompanied this code). | |
14 * | |
15 * You should have received a copy of the GNU General Public License version | |
16 * 2 along with this work; if not, write to the Free Software Foundation, | |
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. | |
18 * | |
1552
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
0
diff
changeset
|
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
0
diff
changeset
|
20 * or visit www.oracle.com if you need additional information or have any |
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
0
diff
changeset
|
21 * questions. |
0 | 22 * |
23 */ | |
24 | |
1972 | 25 #include "precompiled.hpp" |
26 #include "jvmtifiles/jvmtiEnv.hpp" | |
27 #include "memory/gcLocker.hpp" | |
28 #include "memory/resourceArea.hpp" | |
29 #include "prims/jvmtiEventController.inline.hpp" | |
30 #include "prims/jvmtiImpl.hpp" | |
31 #include "prims/jvmtiThreadState.inline.hpp" | |
32 #include "runtime/vframe.hpp" | |
0 | 33 |
34 // marker for when the stack depth has been reset and is now unknown. | |
35 // any negative number would work but small ones might obscure an | |
36 // underrun error. | |
37 static const int UNKNOWN_STACK_DEPTH = -99; | |
38 | |
39 /////////////////////////////////////////////////////////////// | |
40 // | |
41 // class JvmtiThreadState | |
42 // | |
43 // Instances of JvmtiThreadState hang off of each thread. | |
44 // Thread local storage for JVMTI. | |
45 // | |
46 | |
47 JvmtiThreadState *JvmtiThreadState::_head = NULL; | |
48 | |
49 JvmtiThreadState::JvmtiThreadState(JavaThread* thread) | |
50 : _thread_event_enable() { | |
51 assert(JvmtiThreadState_lock->is_locked(), "sanity check"); | |
52 _thread = thread; | |
53 _exception_detected = false; | |
54 _exception_caught = false; | |
55 _debuggable = true; | |
56 _hide_single_stepping = false; | |
57 _hide_level = 0; | |
58 _pending_step_for_popframe = false; | |
59 _class_being_redefined = NULL; | |
60 _class_load_kind = jvmti_class_load_kind_load; | |
61 _head_env_thread_state = NULL; | |
62 _dynamic_code_event_collector = NULL; | |
63 _vm_object_alloc_event_collector = NULL; | |
64 _the_class_for_redefinition_verification = NULL; | |
65 _scratch_class_for_redefinition_verification = NULL; | |
14653
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
66 _cur_stack_depth = UNKNOWN_STACK_DEPTH; |
0 | 67 |
68 // JVMTI ForceEarlyReturn support | |
69 _pending_step_for_earlyret = false; | |
70 _earlyret_state = earlyret_inactive; | |
71 _earlyret_tos = ilgl; | |
72 _earlyret_value.j = 0L; | |
73 _earlyret_oop = NULL; | |
74 | |
75 // add all the JvmtiEnvThreadState to the new JvmtiThreadState | |
76 { | |
77 JvmtiEnvIterator it; | |
78 for (JvmtiEnvBase* env = it.first(); env != NULL; env = it.next(env)) { | |
79 if (env->is_valid()) { | |
80 add_env(env); | |
81 } | |
82 } | |
83 } | |
84 | |
85 // link us into the list | |
86 { | |
87 // The thread state list manipulation code must not have safepoints. | |
88 // See periodic_clean_up(). | |
89 debug_only(No_Safepoint_Verifier nosafepoint;) | |
90 | |
91 _prev = NULL; | |
92 _next = _head; | |
93 if (_head != NULL) { | |
94 _head->_prev = this; | |
95 } | |
96 _head = this; | |
97 } | |
98 | |
99 // set this as the state for the thread | |
100 thread->set_jvmti_thread_state(this); | |
101 } | |
102 | |
103 | |
104 JvmtiThreadState::~JvmtiThreadState() { | |
105 assert(JvmtiThreadState_lock->is_locked(), "sanity check"); | |
106 | |
107 // clear this as the state for the thread | |
108 get_thread()->set_jvmti_thread_state(NULL); | |
109 | |
110 // zap our env thread states | |
111 { | |
112 JvmtiEnvBase::entering_dying_thread_env_iteration(); | |
113 JvmtiEnvThreadStateIterator it(this); | |
114 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ) { | |
115 JvmtiEnvThreadState* zap = ets; | |
116 ets = it.next(ets); | |
117 delete zap; | |
118 } | |
119 JvmtiEnvBase::leaving_dying_thread_env_iteration(); | |
120 } | |
121 | |
122 // remove us from the list | |
123 { | |
124 // The thread state list manipulation code must not have safepoints. | |
125 // See periodic_clean_up(). | |
126 debug_only(No_Safepoint_Verifier nosafepoint;) | |
127 | |
128 if (_prev == NULL) { | |
129 assert(_head == this, "sanity check"); | |
130 _head = _next; | |
131 } else { | |
132 assert(_head != this, "sanity check"); | |
133 _prev->_next = _next; | |
134 } | |
135 if (_next != NULL) { | |
136 _next->_prev = _prev; | |
137 } | |
138 _next = NULL; | |
139 _prev = NULL; | |
140 } | |
141 } | |
142 | |
143 | |
144 void | |
145 JvmtiThreadState::periodic_clean_up() { | |
146 assert(SafepointSynchronize::is_at_safepoint(), "at safepoint"); | |
147 | |
148 // This iteration is initialized with "_head" instead of "JvmtiThreadState::first()" | |
149 // because the latter requires the JvmtiThreadState_lock. | |
150 // This iteration is safe at a safepoint as well, see the No_Safepoint_Verifier | |
151 // asserts at all list manipulation sites. | |
152 for (JvmtiThreadState *state = _head; state != NULL; state = state->next()) { | |
153 // For each environment thread state corresponding to an invalid environment | |
154 // unlink it from the list and deallocate it. | |
155 JvmtiEnvThreadStateIterator it(state); | |
156 JvmtiEnvThreadState* previous_ets = NULL; | |
157 JvmtiEnvThreadState* ets = it.first(); | |
158 while (ets != NULL) { | |
159 if (ets->get_env()->is_valid()) { | |
160 previous_ets = ets; | |
161 ets = it.next(ets); | |
162 } else { | |
163 // This one isn't valid, remove it from the list and deallocate it | |
164 JvmtiEnvThreadState* defunct_ets = ets; | |
165 ets = ets->next(); | |
166 if (previous_ets == NULL) { | |
167 assert(state->head_env_thread_state() == defunct_ets, "sanity check"); | |
168 state->set_head_env_thread_state(ets); | |
169 } else { | |
170 previous_ets->set_next(ets); | |
171 } | |
172 delete defunct_ets; | |
173 } | |
174 } | |
175 } | |
176 } | |
177 | |
178 void JvmtiThreadState::add_env(JvmtiEnvBase *env) { | |
179 assert(JvmtiThreadState_lock->is_locked(), "sanity check"); | |
180 | |
181 JvmtiEnvThreadState *new_ets = new JvmtiEnvThreadState(_thread, env); | |
182 // add this environment thread state to the end of the list (order is important) | |
183 { | |
184 // list deallocation (which occurs at a safepoint) cannot occur simultaneously | |
185 debug_only(No_Safepoint_Verifier nosafepoint;) | |
186 | |
187 JvmtiEnvThreadStateIterator it(this); | |
188 JvmtiEnvThreadState* previous_ets = NULL; | |
189 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) { | |
190 previous_ets = ets; | |
191 } | |
192 if (previous_ets == NULL) { | |
193 set_head_env_thread_state(new_ets); | |
194 } else { | |
195 previous_ets->set_next(new_ets); | |
196 } | |
197 } | |
198 } | |
199 | |
200 | |
201 | |
202 | |
203 void JvmtiThreadState::enter_interp_only_mode() { | |
204 assert(_thread->get_interp_only_mode() == 0, "entering interp only when mode not zero"); | |
205 _thread->increment_interp_only_mode(); | |
206 } | |
207 | |
208 | |
209 void JvmtiThreadState::leave_interp_only_mode() { | |
210 assert(_thread->get_interp_only_mode() == 1, "leaving interp only when mode not one"); | |
211 _thread->decrement_interp_only_mode(); | |
212 } | |
213 | |
214 | |
215 // Helper routine used in several places | |
216 int JvmtiThreadState::count_frames() { | |
14653
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
217 guarantee(SafepointSynchronize::is_at_safepoint() || |
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
218 (JavaThread *)Thread::current() == get_thread(), |
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
219 "must be current thread or at safepoint"); |
0 | 220 |
221 if (!get_thread()->has_last_Java_frame()) return 0; // no Java frames | |
222 | |
223 ResourceMark rm; | |
224 RegisterMap reg_map(get_thread()); | |
225 javaVFrame *jvf = get_thread()->last_java_vframe(®_map); | |
226 int n = 0; | |
227 // tty->print_cr("CSD: counting frames on %s ...", | |
228 // JvmtiTrace::safe_get_thread_name(get_thread())); | |
229 while (jvf != NULL) { | |
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
4841
diff
changeset
|
230 Method* method = jvf->method(); |
0 | 231 // tty->print_cr("CSD: frame - method %s.%s - loc %d", |
232 // method->klass_name()->as_C_string(), | |
233 // method->name()->as_C_string(), | |
234 // jvf->bci() ); | |
235 jvf = jvf->java_sender(); | |
236 n++; | |
237 } | |
238 // tty->print_cr("CSD: frame count: %d", n); | |
239 return n; | |
240 } | |
241 | |
242 | |
243 void JvmtiThreadState::invalidate_cur_stack_depth() { | |
14653
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
244 guarantee(SafepointSynchronize::is_at_safepoint() || |
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
245 (JavaThread *)Thread::current() == get_thread(), |
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
246 "must be current thread or at safepoint"); |
0 | 247 |
248 _cur_stack_depth = UNKNOWN_STACK_DEPTH; | |
249 } | |
250 | |
251 void JvmtiThreadState::incr_cur_stack_depth() { | |
252 guarantee(JavaThread::current() == get_thread(), "must be current thread"); | |
253 | |
254 if (!is_interp_only_mode()) { | |
255 _cur_stack_depth = UNKNOWN_STACK_DEPTH; | |
256 } | |
257 if (_cur_stack_depth != UNKNOWN_STACK_DEPTH) { | |
258 ++_cur_stack_depth; | |
259 } | |
260 } | |
261 | |
262 void JvmtiThreadState::decr_cur_stack_depth() { | |
263 guarantee(JavaThread::current() == get_thread(), "must be current thread"); | |
264 | |
265 if (!is_interp_only_mode()) { | |
266 _cur_stack_depth = UNKNOWN_STACK_DEPTH; | |
267 } | |
268 if (_cur_stack_depth != UNKNOWN_STACK_DEPTH) { | |
269 --_cur_stack_depth; | |
270 assert(_cur_stack_depth >= 0, "incr/decr_cur_stack_depth mismatch"); | |
271 } | |
272 } | |
273 | |
274 int JvmtiThreadState::cur_stack_depth() { | |
14653
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
275 guarantee(SafepointSynchronize::is_at_safepoint() || |
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
276 (JavaThread *)Thread::current() == get_thread(), |
0d8d78c0329a
6471769: Error: assert(_cur_stack_depth == count_frames(),"cur_stack_depth out of sync")
sspitsyn
parents:
6725
diff
changeset
|
277 "must be current thread or at safepoint"); |
0 | 278 |
279 if (!is_interp_only_mode() || _cur_stack_depth == UNKNOWN_STACK_DEPTH) { | |
280 _cur_stack_depth = count_frames(); | |
281 } else { | |
282 // heavy weight assert | |
283 assert(_cur_stack_depth == count_frames(), | |
284 "cur_stack_depth out of sync"); | |
285 } | |
286 return _cur_stack_depth; | |
287 } | |
288 | |
289 bool JvmtiThreadState::may_be_walked() { | |
290 return (get_thread()->is_being_ext_suspended() || (JavaThread::current() == get_thread())); | |
291 } | |
292 | |
293 | |
294 void JvmtiThreadState::process_pending_step_for_popframe() { | |
295 // We are single stepping as the last part of the PopFrame() dance | |
296 // so we have some house keeping to do. | |
297 | |
298 JavaThread *thr = get_thread(); | |
299 if (thr->popframe_condition() != JavaThread::popframe_inactive) { | |
300 // If the popframe_condition field is not popframe_inactive, then | |
301 // we missed all of the popframe_field cleanup points: | |
302 // | |
303 // - unpack_frames() was not called (nothing to deopt) | |
304 // - remove_activation_preserving_args_entry() was not called | |
305 // (did not get suspended in a call_vm() family call and did | |
306 // not complete a call_vm() family call on the way here) | |
307 thr->clear_popframe_condition(); | |
308 } | |
309 | |
310 // clearing the flag indicates we are done with the PopFrame() dance | |
311 clr_pending_step_for_popframe(); | |
312 | |
4841
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
313 // If exception was thrown in this frame, need to reset jvmti thread state. |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
314 // Single stepping may not get enabled correctly by the agent since |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
315 // exception state is passed in MethodExit event which may be sent at some |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
316 // time in the future. JDWP agent ignores MethodExit events if caused by |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
317 // an exception. |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
318 // |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
319 if (is_exception_detected()) { |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
320 clear_exception_detected(); |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
321 } |
0 | 322 // If step is pending for popframe then it may not be |
323 // a repeat step. The new_bci and method_id is same as current_bci | |
324 // and current method_id after pop and step for recursive calls. | |
325 // Force the step by clearing the last location. | |
326 JvmtiEnvThreadStateIterator it(this); | |
327 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) { | |
328 ets->clear_current_location(); | |
329 } | |
330 } | |
331 | |
332 | |
333 // Class: JvmtiThreadState | |
334 // Function: update_for_pop_top_frame | |
335 // Description: | |
336 // This function removes any frame pop notification request for | |
337 // the top frame and invalidates both the current stack depth and | |
338 // all cached frameIDs. | |
339 // | |
340 // Called by: PopFrame | |
341 // | |
342 void JvmtiThreadState::update_for_pop_top_frame() { | |
343 if (is_interp_only_mode()) { | |
344 // remove any frame pop notification request for the top frame | |
345 // in any environment | |
346 int popframe_number = cur_stack_depth(); | |
347 { | |
348 JvmtiEnvThreadStateIterator it(this); | |
349 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) { | |
350 if (ets->is_frame_pop(popframe_number)) { | |
351 ets->clear_frame_pop(popframe_number); | |
352 } | |
353 } | |
354 } | |
355 // force stack depth to be recalculated | |
356 invalidate_cur_stack_depth(); | |
357 } else { | |
358 assert(!is_enabled(JVMTI_EVENT_FRAME_POP), "Must have no framepops set"); | |
359 } | |
360 } | |
361 | |
362 | |
363 void JvmtiThreadState::process_pending_step_for_earlyret() { | |
364 // We are single stepping as the last part of the ForceEarlyReturn | |
365 // dance so we have some house keeping to do. | |
366 | |
367 if (is_earlyret_pending()) { | |
368 // If the earlyret_state field is not earlyret_inactive, then | |
369 // we missed all of the earlyret_field cleanup points: | |
370 // | |
371 // - remove_activation() was not called | |
372 // (did not get suspended in a call_vm() family call and did | |
373 // not complete a call_vm() family call on the way here) | |
374 // | |
375 // One legitimate way for us to miss all the cleanup points is | |
376 // if we got here right after handling a compiled return. If that | |
377 // is the case, then we consider our return from compiled code to | |
378 // complete the ForceEarlyReturn request and we clear the condition. | |
379 clr_earlyret_pending(); | |
380 set_earlyret_oop(NULL); | |
381 clr_earlyret_value(); | |
382 } | |
383 | |
384 // clearing the flag indicates we are done with | |
385 // the ForceEarlyReturn() dance | |
386 clr_pending_step_for_earlyret(); | |
387 | |
4841
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
388 // If exception was thrown in this frame, need to reset jvmti thread state. |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
389 // Single stepping may not get enabled correctly by the agent since |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
390 // exception state is passed in MethodExit event which may be sent at some |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
391 // time in the future. JDWP agent ignores MethodExit events if caused by |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
392 // an exception. |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
393 // |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
394 if (is_exception_detected()) { |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
395 clear_exception_detected(); |
af739d5ab23c
6972759: Step over not working after thrown exception and Pop
bpittore
parents:
1972
diff
changeset
|
396 } |
0 | 397 // If step is pending for earlyret then it may not be a repeat step. |
398 // The new_bci and method_id is same as current_bci and current | |
399 // method_id after earlyret and step for recursive calls. | |
400 // Force the step by clearing the last location. | |
401 JvmtiEnvThreadStateIterator it(this); | |
402 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) { | |
403 ets->clear_current_location(); | |
404 } | |
405 } | |
406 | |
407 void JvmtiThreadState::oops_do(OopClosure* f) { | |
408 f->do_oop((oop*) &_earlyret_oop); | |
409 } |