author | ysr |
Thu, 03 Dec 2009 15:01:57 -0800 | |
changeset 4461 | c17c526d36ef |
parent 3261 | c7d5aae8d3f7 |
child 4571 | 80b553bddc26 |
child 4492 | 63c49e60fc25 |
permissions | -rw-r--r-- |
1 | 1 |
/* |
3261 | 2 |
* Copyright 2003-2009 Sun Microsystems, Inc. All Rights Reserved. |
1 | 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 |
* |
|
19 |
* Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, |
|
20 |
* CA 95054 USA or visit www.sun.com if you need additional information or |
|
21 |
* have any questions. |
|
22 |
* |
|
23 |
*/ |
|
24 |
# include "incls/_precompiled.incl" |
|
25 |
# include "incls/_jvmtiEnvBase.cpp.incl" |
|
26 |
||
27 |
||
28 |
/////////////////////////////////////////////////////////////// |
|
29 |
// |
|
30 |
// JvmtiEnvBase |
|
31 |
// |
|
32 |
||
33 |
JvmtiEnvBase* JvmtiEnvBase::_head_environment = NULL; |
|
34 |
||
35 |
bool JvmtiEnvBase::_globally_initialized = false; |
|
36 |
volatile bool JvmtiEnvBase::_needs_clean_up = false; |
|
37 |
||
38 |
jvmtiPhase JvmtiEnvBase::_phase = JVMTI_PHASE_PRIMORDIAL; |
|
39 |
||
40 |
volatile int JvmtiEnvBase::_dying_thread_env_iteration_count = 0; |
|
41 |
||
42 |
extern jvmtiInterface_1_ jvmti_Interface; |
|
43 |
extern jvmtiInterface_1_ jvmtiTrace_Interface; |
|
44 |
||
45 |
||
46 |
// perform initializations that must occur before any JVMTI environments |
|
47 |
// are released but which should only be initialized once (no matter |
|
48 |
// how many environments are created). |
|
49 |
void |
|
50 |
JvmtiEnvBase::globally_initialize() { |
|
51 |
assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check"); |
|
52 |
assert(_globally_initialized == false, "bad call"); |
|
53 |
||
54 |
JvmtiManageCapabilities::initialize(); |
|
55 |
||
56 |
#ifndef JVMTI_KERNEL |
|
57 |
// register extension functions and events |
|
58 |
JvmtiExtensions::register_extensions(); |
|
59 |
#endif // !JVMTI_KERNEL |
|
60 |
||
61 |
#ifdef JVMTI_TRACE |
|
62 |
JvmtiTrace::initialize(); |
|
63 |
#endif |
|
64 |
||
65 |
_globally_initialized = true; |
|
66 |
} |
|
67 |
||
68 |
||
69 |
void |
|
70 |
JvmtiEnvBase::initialize() { |
|
71 |
assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check"); |
|
72 |
||
73 |
// Add this environment to the end of the environment list (order is important) |
|
74 |
{ |
|
75 |
// This block of code must not contain any safepoints, as list deallocation |
|
76 |
// (which occurs at a safepoint) cannot occur simultaneously with this list |
|
77 |
// addition. Note: No_Safepoint_Verifier cannot, currently, be used before |
|
78 |
// threads exist. |
|
79 |
JvmtiEnvIterator it; |
|
80 |
JvmtiEnvBase *previous_env = NULL; |
|
81 |
for (JvmtiEnvBase* env = it.first(); env != NULL; env = it.next(env)) { |
|
82 |
previous_env = env; |
|
83 |
} |
|
84 |
if (previous_env == NULL) { |
|
85 |
_head_environment = this; |
|
86 |
} else { |
|
87 |
previous_env->set_next_environment(this); |
|
88 |
} |
|
89 |
} |
|
90 |
||
91 |
if (_globally_initialized == false) { |
|
92 |
globally_initialize(); |
|
93 |
} |
|
94 |
} |
|
95 |
||
96 |
||
2137
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
97 |
bool |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
98 |
JvmtiEnvBase::is_valid() { |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
99 |
jint value = 0; |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
100 |
|
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
101 |
// This object might not be a JvmtiEnvBase so we can't assume |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
102 |
// the _magic field is properly aligned. Get the value in a safe |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
103 |
// way and then check against JVMTI_MAGIC. |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
104 |
|
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
105 |
switch (sizeof(_magic)) { |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
106 |
case 2: |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
107 |
value = Bytes::get_native_u2((address)&_magic); |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
108 |
break; |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
109 |
|
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
110 |
case 4: |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
111 |
value = Bytes::get_native_u4((address)&_magic); |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
112 |
break; |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
113 |
|
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
114 |
case 8: |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
115 |
value = Bytes::get_native_u8((address)&_magic); |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
116 |
break; |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
117 |
|
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
118 |
default: |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
119 |
guarantee(false, "_magic field is an unexpected size"); |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
120 |
} |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
121 |
|
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
122 |
return value == JVMTI_MAGIC; |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
123 |
} |
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
124 |
|
b03f1da1a3d3
6567360: 3/4 SIGBUS in jvmti RawMonitor magic check for unaligned bad monitor pointer
dcubed
parents:
2135
diff
changeset
|
125 |
|
1 | 126 |
JvmtiEnvBase::JvmtiEnvBase() : _env_event_enable() { |
127 |
_env_local_storage = NULL; |
|
128 |
_tag_map = NULL; |
|
129 |
_native_method_prefix_count = 0; |
|
130 |
_native_method_prefixes = NULL; |
|
131 |
_next = NULL; |
|
132 |
_class_file_load_hook_ever_enabled = false; |
|
133 |
||
134 |
// Moot since ClassFileLoadHook not yet enabled. |
|
135 |
// But "true" will give a more predictable ClassFileLoadHook behavior |
|
136 |
// for environment creation during ClassFileLoadHook. |
|
137 |
_is_retransformable = true; |
|
138 |
||
139 |
// all callbacks initially NULL |
|
140 |
memset(&_event_callbacks,0,sizeof(jvmtiEventCallbacks)); |
|
141 |
||
142 |
// all capabilities initially off |
|
143 |
memset(&_current_capabilities, 0, sizeof(_current_capabilities)); |
|
144 |
||
145 |
// all prohibited capabilities initially off |
|
146 |
memset(&_prohibited_capabilities, 0, sizeof(_prohibited_capabilities)); |
|
147 |
||
148 |
_magic = JVMTI_MAGIC; |
|
149 |
||
150 |
JvmtiEventController::env_initialize((JvmtiEnv*)this); |
|
151 |
||
152 |
#ifdef JVMTI_TRACE |
|
1403 | 153 |
_jvmti_external.functions = TraceJVMTI != NULL ? &jvmtiTrace_Interface : &jvmti_Interface; |
1 | 154 |
#else |
155 |
_jvmti_external.functions = &jvmti_Interface; |
|
156 |
#endif |
|
157 |
} |
|
158 |
||
159 |
||
160 |
void |
|
161 |
JvmtiEnvBase::dispose() { |
|
162 |
||
163 |
#ifdef JVMTI_TRACE |
|
164 |
JvmtiTrace::shutdown(); |
|
165 |
#endif |
|
166 |
||
167 |
// Dispose of event info and let the event controller call us back |
|
168 |
// in a locked state (env_dispose, below) |
|
169 |
JvmtiEventController::env_dispose(this); |
|
170 |
} |
|
171 |
||
172 |
void |
|
173 |
JvmtiEnvBase::env_dispose() { |
|
174 |
assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check"); |
|
175 |
||
176 |
// We have been entered with all events disabled on this environment. |
|
177 |
// A race to re-enable events (by setting callbacks) is prevented by |
|
178 |
// checking for a valid environment when setting callbacks (while |
|
179 |
// holding the JvmtiThreadState_lock). |
|
180 |
||
181 |
// Mark as invalid. |
|
182 |
_magic = DISPOSED_MAGIC; |
|
183 |
||
184 |
// Relinquish all capabilities. |
|
185 |
jvmtiCapabilities *caps = get_capabilities(); |
|
186 |
JvmtiManageCapabilities::relinquish_capabilities(caps, caps, caps); |
|
187 |
||
188 |
// Same situation as with events (see above) |
|
189 |
set_native_method_prefixes(0, NULL); |
|
190 |
||
191 |
#ifndef JVMTI_KERNEL |
|
192 |
JvmtiTagMap* tag_map_to_deallocate = _tag_map; |
|
193 |
set_tag_map(NULL); |
|
194 |
// A tag map can be big, deallocate it now |
|
195 |
if (tag_map_to_deallocate != NULL) { |
|
196 |
delete tag_map_to_deallocate; |
|
197 |
} |
|
198 |
#endif // !JVMTI_KERNEL |
|
199 |
||
200 |
_needs_clean_up = true; |
|
201 |
} |
|
202 |
||
203 |
||
204 |
JvmtiEnvBase::~JvmtiEnvBase() { |
|
205 |
assert(SafepointSynchronize::is_at_safepoint(), "sanity check"); |
|
206 |
||
207 |
// There is a small window of time during which the tag map of a |
|
208 |
// disposed environment could have been reallocated. |
|
209 |
// Make sure it is gone. |
|
210 |
#ifndef JVMTI_KERNEL |
|
211 |
JvmtiTagMap* tag_map_to_deallocate = _tag_map; |
|
212 |
set_tag_map(NULL); |
|
213 |
// A tag map can be big, deallocate it now |
|
214 |
if (tag_map_to_deallocate != NULL) { |
|
215 |
delete tag_map_to_deallocate; |
|
216 |
} |
|
217 |
#endif // !JVMTI_KERNEL |
|
218 |
||
219 |
_magic = BAD_MAGIC; |
|
220 |
} |
|
221 |
||
222 |
||
223 |
void |
|
224 |
JvmtiEnvBase::periodic_clean_up() { |
|
225 |
assert(SafepointSynchronize::is_at_safepoint(), "sanity check"); |
|
226 |
||
227 |
// JvmtiEnvBase reference is saved in JvmtiEnvThreadState. So |
|
228 |
// clean up JvmtiThreadState before deleting JvmtiEnv pointer. |
|
229 |
JvmtiThreadState::periodic_clean_up(); |
|
230 |
||
231 |
// Unlink all invalid environments from the list of environments |
|
232 |
// and deallocate them |
|
233 |
JvmtiEnvIterator it; |
|
234 |
JvmtiEnvBase* previous_env = NULL; |
|
235 |
JvmtiEnvBase* env = it.first(); |
|
236 |
while (env != NULL) { |
|
237 |
if (env->is_valid()) { |
|
238 |
previous_env = env; |
|
239 |
env = it.next(env); |
|
240 |
} else { |
|
241 |
// This one isn't valid, remove it from the list and deallocate it |
|
242 |
JvmtiEnvBase* defunct_env = env; |
|
243 |
env = it.next(env); |
|
244 |
if (previous_env == NULL) { |
|
245 |
_head_environment = env; |
|
246 |
} else { |
|
247 |
previous_env->set_next_environment(env); |
|
248 |
} |
|
249 |
delete defunct_env; |
|
250 |
} |
|
251 |
} |
|
252 |
||
253 |
} |
|
254 |
||
255 |
||
256 |
void |
|
257 |
JvmtiEnvBase::check_for_periodic_clean_up() { |
|
258 |
assert(SafepointSynchronize::is_at_safepoint(), "sanity check"); |
|
259 |
||
260 |
class ThreadInsideIterationClosure: public ThreadClosure { |
|
261 |
private: |
|
262 |
bool _inside; |
|
263 |
public: |
|
264 |
ThreadInsideIterationClosure() : _inside(false) {}; |
|
265 |
||
266 |
void do_thread(Thread* thread) { |
|
267 |
_inside |= thread->is_inside_jvmti_env_iteration(); |
|
268 |
} |
|
269 |
||
270 |
bool is_inside_jvmti_env_iteration() { |
|
271 |
return _inside; |
|
272 |
} |
|
273 |
}; |
|
274 |
||
275 |
if (_needs_clean_up) { |
|
276 |
// Check if we are currently iterating environment, |
|
277 |
// deallocation should not occur if we are |
|
278 |
ThreadInsideIterationClosure tiic; |
|
279 |
Threads::threads_do(&tiic); |
|
280 |
if (!tiic.is_inside_jvmti_env_iteration() && |
|
281 |
!is_inside_dying_thread_env_iteration()) { |
|
282 |
_needs_clean_up = false; |
|
283 |
JvmtiEnvBase::periodic_clean_up(); |
|
284 |
} |
|
285 |
} |
|
286 |
} |
|
287 |
||
288 |
||
289 |
void |
|
290 |
JvmtiEnvBase::record_first_time_class_file_load_hook_enabled() { |
|
291 |
assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), |
|
292 |
"sanity check"); |
|
293 |
||
294 |
if (!_class_file_load_hook_ever_enabled) { |
|
295 |
_class_file_load_hook_ever_enabled = true; |
|
296 |
||
297 |
if (get_capabilities()->can_retransform_classes) { |
|
298 |
_is_retransformable = true; |
|
299 |
} else { |
|
300 |
_is_retransformable = false; |
|
301 |
||
302 |
// cannot add retransform capability after ClassFileLoadHook has been enabled |
|
303 |
get_prohibited_capabilities()->can_retransform_classes = 1; |
|
304 |
} |
|
305 |
} |
|
306 |
} |
|
307 |
||
308 |
||
309 |
void |
|
310 |
JvmtiEnvBase::record_class_file_load_hook_enabled() { |
|
311 |
if (!_class_file_load_hook_ever_enabled) { |
|
312 |
if (Threads::number_of_threads() == 0) { |
|
313 |
record_first_time_class_file_load_hook_enabled(); |
|
314 |
} else { |
|
315 |
MutexLocker mu(JvmtiThreadState_lock); |
|
316 |
record_first_time_class_file_load_hook_enabled(); |
|
317 |
} |
|
318 |
} |
|
319 |
} |
|
320 |
||
321 |
||
322 |
jvmtiError |
|
323 |
JvmtiEnvBase::set_native_method_prefixes(jint prefix_count, char** prefixes) { |
|
324 |
assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), |
|
325 |
"sanity check"); |
|
326 |
||
327 |
int old_prefix_count = get_native_method_prefix_count(); |
|
328 |
char **old_prefixes = get_native_method_prefixes(); |
|
329 |
||
330 |
// allocate and install the new prefixex |
|
331 |
if (prefix_count == 0 || !is_valid()) { |
|
332 |
_native_method_prefix_count = 0; |
|
333 |
_native_method_prefixes = NULL; |
|
334 |
} else { |
|
335 |
// there are prefixes, allocate an array to hold them, and fill it |
|
336 |
char** new_prefixes = (char**)os::malloc((prefix_count) * sizeof(char*)); |
|
337 |
if (new_prefixes == NULL) { |
|
338 |
return JVMTI_ERROR_OUT_OF_MEMORY; |
|
339 |
} |
|
340 |
for (int i = 0; i < prefix_count; i++) { |
|
341 |
char* prefix = prefixes[i]; |
|
342 |
if (prefix == NULL) { |
|
343 |
for (int j = 0; j < (i-1); j++) { |
|
344 |
os::free(new_prefixes[j]); |
|
345 |
} |
|
346 |
os::free(new_prefixes); |
|
347 |
return JVMTI_ERROR_NULL_POINTER; |
|
348 |
} |
|
349 |
prefix = os::strdup(prefixes[i]); |
|
350 |
if (prefix == NULL) { |
|
351 |
for (int j = 0; j < (i-1); j++) { |
|
352 |
os::free(new_prefixes[j]); |
|
353 |
} |
|
354 |
os::free(new_prefixes); |
|
355 |
return JVMTI_ERROR_OUT_OF_MEMORY; |
|
356 |
} |
|
357 |
new_prefixes[i] = prefix; |
|
358 |
} |
|
359 |
_native_method_prefix_count = prefix_count; |
|
360 |
_native_method_prefixes = new_prefixes; |
|
361 |
} |
|
362 |
||
363 |
// now that we know the new prefixes have been successfully installed we can |
|
364 |
// safely remove the old ones |
|
365 |
if (old_prefix_count != 0) { |
|
366 |
for (int i = 0; i < old_prefix_count; i++) { |
|
367 |
os::free(old_prefixes[i]); |
|
368 |
} |
|
369 |
os::free(old_prefixes); |
|
370 |
} |
|
371 |
||
372 |
return JVMTI_ERROR_NONE; |
|
373 |
} |
|
374 |
||
375 |
||
376 |
// Collect all the prefixes which have been set in any JVM TI environments |
|
377 |
// by the SetNativeMethodPrefix(es) functions. Be sure to maintain the |
|
378 |
// order of environments and the order of prefixes within each environment. |
|
379 |
// Return in a resource allocated array. |
|
380 |
char** |
|
381 |
JvmtiEnvBase::get_all_native_method_prefixes(int* count_ptr) { |
|
382 |
assert(Threads::number_of_threads() == 0 || |
|
383 |
SafepointSynchronize::is_at_safepoint() || |
|
384 |
JvmtiThreadState_lock->is_locked(), |
|
385 |
"sanity check"); |
|
386 |
||
387 |
int total_count = 0; |
|
388 |
GrowableArray<char*>* prefix_array =new GrowableArray<char*>(5); |
|
389 |
||
390 |
JvmtiEnvIterator it; |
|
391 |
for (JvmtiEnvBase* env = it.first(); env != NULL; env = it.next(env)) { |
|
392 |
int prefix_count = env->get_native_method_prefix_count(); |
|
393 |
char** prefixes = env->get_native_method_prefixes(); |
|
394 |
for (int j = 0; j < prefix_count; j++) { |
|
395 |
// retrieve a prefix and so that it is safe against asynchronous changes |
|
396 |
// copy it into the resource area |
|
397 |
char* prefix = prefixes[j]; |
|
398 |
char* prefix_copy = NEW_RESOURCE_ARRAY(char, strlen(prefix)+1); |
|
399 |
strcpy(prefix_copy, prefix); |
|
400 |
prefix_array->at_put_grow(total_count++, prefix_copy); |
|
401 |
} |
|
402 |
} |
|
403 |
||
404 |
char** all_prefixes = NEW_RESOURCE_ARRAY(char*, total_count); |
|
405 |
char** p = all_prefixes; |
|
406 |
for (int i = 0; i < total_count; ++i) { |
|
407 |
*p++ = prefix_array->at(i); |
|
408 |
} |
|
409 |
*count_ptr = total_count; |
|
410 |
return all_prefixes; |
|
411 |
} |
|
412 |
||
413 |
void |
|
414 |
JvmtiEnvBase::set_event_callbacks(const jvmtiEventCallbacks* callbacks, |
|
415 |
jint size_of_callbacks) { |
|
416 |
assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check"); |
|
417 |
||
418 |
size_t byte_cnt = sizeof(jvmtiEventCallbacks); |
|
419 |
||
420 |
// clear in either case to be sure we got any gap between sizes |
|
421 |
memset(&_event_callbacks, 0, byte_cnt); |
|
422 |
||
423 |
// Now that JvmtiThreadState_lock is held, prevent a possible race condition where events |
|
424 |
// are re-enabled by a call to set event callbacks where the DisposeEnvironment |
|
425 |
// occurs after the boiler-plate environment check and before the lock is acquired. |
|
426 |
if (callbacks != NULL && is_valid()) { |
|
427 |
if (size_of_callbacks < (jint)byte_cnt) { |
|
428 |
byte_cnt = size_of_callbacks; |
|
429 |
} |
|
430 |
memcpy(&_event_callbacks, callbacks, byte_cnt); |
|
431 |
} |
|
432 |
} |
|
433 |
||
434 |
// Called from JVMTI entry points which perform stack walking. If the |
|
435 |
// associated JavaThread is the current thread, then wait_for_suspend |
|
436 |
// is not used. Otherwise, it determines if we should wait for the |
|
437 |
// "other" thread to complete external suspension. (NOTE: in future |
|
438 |
// releases the suspension mechanism should be reimplemented so this |
|
439 |
// is not necessary.) |
|
440 |
// |
|
441 |
bool |
|
442 |
JvmtiEnvBase::is_thread_fully_suspended(JavaThread* thr, bool wait_for_suspend, uint32_t *bits) { |
|
443 |
// "other" threads require special handling |
|
444 |
if (thr != JavaThread::current()) { |
|
445 |
if (wait_for_suspend) { |
|
446 |
// We are allowed to wait for the external suspend to complete |
|
447 |
// so give the other thread a chance to get suspended. |
|
448 |
if (!thr->wait_for_ext_suspend_completion(SuspendRetryCount, |
|
449 |
SuspendRetryDelay, bits)) { |
|
450 |
// didn't make it so let the caller know |
|
451 |
return false; |
|
452 |
} |
|
453 |
} |
|
454 |
// We aren't allowed to wait for the external suspend to complete |
|
455 |
// so if the other thread isn't externally suspended we need to |
|
456 |
// let the caller know. |
|
457 |
else if (!thr->is_ext_suspend_completed_with_lock(bits)) { |
|
458 |
return false; |
|
459 |
} |
|
460 |
} |
|
461 |
||
462 |
return true; |
|
463 |
} |
|
464 |
||
465 |
||
466 |
// In the fullness of time, all users of the method should instead |
|
467 |
// directly use allocate, besides being cleaner and faster, this will |
|
468 |
// mean much better out of memory handling |
|
469 |
unsigned char * |
|
470 |
JvmtiEnvBase::jvmtiMalloc(jlong size) { |
|
471 |
unsigned char* mem; |
|
472 |
jvmtiError result = allocate(size, &mem); |
|
473 |
assert(result == JVMTI_ERROR_NONE, "Allocate failed"); |
|
474 |
return mem; |
|
475 |
} |
|
476 |
||
477 |
||
478 |
// |
|
479 |
// Threads |
|
480 |
// |
|
481 |
||
482 |
jobject * |
|
483 |
JvmtiEnvBase::new_jobjectArray(int length, Handle *handles) { |
|
484 |
if (length == 0) { |
|
485 |
return NULL; |
|
486 |
} |
|
487 |
||
488 |
jobject *objArray = (jobject *) jvmtiMalloc(sizeof(jobject) * length); |
|
489 |
NULL_CHECK(objArray, NULL); |
|
490 |
||
491 |
for (int i=0; i<length; i++) { |
|
492 |
objArray[i] = jni_reference(handles[i]); |
|
493 |
} |
|
494 |
return objArray; |
|
495 |
} |
|
496 |
||
497 |
jthread * |
|
498 |
JvmtiEnvBase::new_jthreadArray(int length, Handle *handles) { |
|
499 |
return (jthread *) new_jobjectArray(length,handles); |
|
500 |
} |
|
501 |
||
502 |
jthreadGroup * |
|
503 |
JvmtiEnvBase::new_jthreadGroupArray(int length, Handle *handles) { |
|
504 |
return (jthreadGroup *) new_jobjectArray(length,handles); |
|
505 |
} |
|
506 |
||
507 |
||
508 |
JavaThread * |
|
509 |
JvmtiEnvBase::get_JavaThread(jthread jni_thread) { |
|
510 |
oop t = JNIHandles::resolve_external_guard(jni_thread); |
|
511 |
if (t == NULL || !t->is_a(SystemDictionary::thread_klass())) { |
|
512 |
return NULL; |
|
513 |
} |
|
514 |
// The following returns NULL if the thread has not yet run or is in |
|
515 |
// process of exiting |
|
516 |
return java_lang_Thread::thread(t); |
|
517 |
} |
|
518 |
||
519 |
||
520 |
// update the access_flags for the field in the klass |
|
521 |
void |
|
522 |
JvmtiEnvBase::update_klass_field_access_flag(fieldDescriptor *fd) { |
|
523 |
instanceKlass* ik = instanceKlass::cast(fd->field_holder()); |
|
524 |
typeArrayOop fields = ik->fields(); |
|
525 |
fields->ushort_at_put(fd->index(), (jushort)fd->access_flags().as_short()); |
|
526 |
} |
|
527 |
||
528 |
||
529 |
// return the vframe on the specified thread and depth, NULL if no such frame |
|
530 |
vframe* |
|
531 |
JvmtiEnvBase::vframeFor(JavaThread* java_thread, jint depth) { |
|
532 |
if (!java_thread->has_last_Java_frame()) { |
|
533 |
return NULL; |
|
534 |
} |
|
535 |
RegisterMap reg_map(java_thread); |
|
536 |
vframe *vf = java_thread->last_java_vframe(®_map); |
|
537 |
int d = 0; |
|
538 |
while ((vf != NULL) && (d < depth)) { |
|
539 |
vf = vf->java_sender(); |
|
540 |
d++; |
|
541 |
} |
|
542 |
return vf; |
|
543 |
} |
|
544 |
||
545 |
||
546 |
// |
|
547 |
// utilities: JNI objects |
|
548 |
// |
|
549 |
||
550 |
||
551 |
jclass |
|
552 |
JvmtiEnvBase::get_jni_class_non_null(klassOop k) { |
|
553 |
assert(k != NULL, "k != NULL"); |
|
554 |
return (jclass)jni_reference(Klass::cast(k)->java_mirror()); |
|
555 |
} |
|
556 |
||
557 |
#ifndef JVMTI_KERNEL |
|
558 |
||
559 |
// |
|
560 |
// Field Information |
|
561 |
// |
|
562 |
||
563 |
bool |
|
564 |
JvmtiEnvBase::get_field_descriptor(klassOop k, jfieldID field, fieldDescriptor* fd) { |
|
565 |
if (!jfieldIDWorkaround::is_valid_jfieldID(k, field)) { |
|
566 |
return false; |
|
567 |
} |
|
568 |
bool found = false; |
|
569 |
if (jfieldIDWorkaround::is_static_jfieldID(field)) { |
|
570 |
JNIid* id = jfieldIDWorkaround::from_static_jfieldID(field); |
|
571 |
int offset = id->offset(); |
|
572 |
klassOop holder = id->holder(); |
|
573 |
found = instanceKlass::cast(holder)->find_local_field_from_offset(offset, true, fd); |
|
574 |
} else { |
|
575 |
// Non-static field. The fieldID is really the offset of the field within the object. |
|
576 |
int offset = jfieldIDWorkaround::from_instance_jfieldID(k, field); |
|
577 |
found = instanceKlass::cast(k)->find_field_from_offset(offset, false, fd); |
|
578 |
} |
|
579 |
return found; |
|
580 |
} |
|
581 |
||
582 |
// |
|
583 |
// Object Monitor Information |
|
584 |
// |
|
585 |
||
586 |
// |
|
587 |
// Count the number of objects for a lightweight monitor. The hobj |
|
588 |
// parameter is object that owns the monitor so this routine will |
|
589 |
// count the number of times the same object was locked by frames |
|
590 |
// in java_thread. |
|
591 |
// |
|
592 |
jint |
|
593 |
JvmtiEnvBase::count_locked_objects(JavaThread *java_thread, Handle hobj) { |
|
594 |
jint ret = 0; |
|
595 |
if (!java_thread->has_last_Java_frame()) { |
|
596 |
return ret; // no Java frames so no monitors |
|
597 |
} |
|
598 |
||
599 |
ResourceMark rm; |
|
600 |
HandleMark hm; |
|
601 |
RegisterMap reg_map(java_thread); |
|
602 |
||
603 |
for(javaVFrame *jvf=java_thread->last_java_vframe(®_map); jvf != NULL; |
|
604 |
jvf = jvf->java_sender()) { |
|
605 |
GrowableArray<MonitorInfo*>* mons = jvf->monitors(); |
|
606 |
if (!mons->is_empty()) { |
|
607 |
for (int i = 0; i < mons->length(); i++) { |
|
608 |
MonitorInfo *mi = mons->at(i); |
|
3171
aa289b22b577
6837472: com/sun/jdi/MonitorFrameInfo.java fails with AggressiveOpts in 6u14
kvn
parents:
2137
diff
changeset
|
609 |
if (mi->owner_is_scalar_replaced()) continue; |
1 | 610 |
|
611 |
// see if owner of the monitor is our object |
|
612 |
if (mi->owner() != NULL && mi->owner() == hobj()) { |
|
613 |
ret++; |
|
614 |
} |
|
615 |
} |
|
616 |
} |
|
617 |
} |
|
618 |
return ret; |
|
619 |
} |
|
620 |
||
621 |
||
622 |
||
623 |
jvmtiError |
|
624 |
JvmtiEnvBase::get_current_contended_monitor(JavaThread *calling_thread, JavaThread *java_thread, jobject *monitor_ptr) { |
|
625 |
#ifdef ASSERT |
|
626 |
uint32_t debug_bits = 0; |
|
627 |
#endif |
|
628 |
assert((SafepointSynchronize::is_at_safepoint() || |
|
629 |
is_thread_fully_suspended(java_thread, false, &debug_bits)), |
|
630 |
"at safepoint or target thread is suspended"); |
|
631 |
oop obj = NULL; |
|
632 |
ObjectMonitor *mon = java_thread->current_waiting_monitor(); |
|
633 |
if (mon == NULL) { |
|
634 |
// thread is not doing an Object.wait() call |
|
635 |
mon = java_thread->current_pending_monitor(); |
|
636 |
if (mon != NULL) { |
|
637 |
// The thread is trying to enter() or raw_enter() an ObjectMonitor. |
|
638 |
obj = (oop)mon->object(); |
|
639 |
// If obj == NULL, then ObjectMonitor is raw which doesn't count |
|
640 |
// as contended for this API |
|
641 |
} |
|
642 |
// implied else: no contended ObjectMonitor |
|
643 |
} else { |
|
644 |
// thread is doing an Object.wait() call |
|
645 |
obj = (oop)mon->object(); |
|
646 |
assert(obj != NULL, "Object.wait() should have an object"); |
|
647 |
} |
|
648 |
||
649 |
if (obj == NULL) { |
|
650 |
*monitor_ptr = NULL; |
|
651 |
} else { |
|
652 |
HandleMark hm; |
|
653 |
Handle hobj(obj); |
|
654 |
*monitor_ptr = jni_reference(calling_thread, hobj); |
|
655 |
} |
|
656 |
return JVMTI_ERROR_NONE; |
|
657 |
} |
|
658 |
||
659 |
||
660 |
jvmtiError |
|
661 |
JvmtiEnvBase::get_owned_monitors(JavaThread *calling_thread, JavaThread* java_thread, |
|
662 |
GrowableArray<jvmtiMonitorStackDepthInfo*> *owned_monitors_list) { |
|
663 |
jvmtiError err = JVMTI_ERROR_NONE; |
|
664 |
#ifdef ASSERT |
|
665 |
uint32_t debug_bits = 0; |
|
666 |
#endif |
|
667 |
assert((SafepointSynchronize::is_at_safepoint() || |
|
668 |
is_thread_fully_suspended(java_thread, false, &debug_bits)), |
|
669 |
"at safepoint or target thread is suspended"); |
|
670 |
||
671 |
if (java_thread->has_last_Java_frame()) { |
|
672 |
ResourceMark rm; |
|
673 |
HandleMark hm; |
|
674 |
RegisterMap reg_map(java_thread); |
|
675 |
||
676 |
int depth = 0; |
|
677 |
for (javaVFrame *jvf = java_thread->last_java_vframe(®_map); jvf != NULL; |
|
678 |
jvf = jvf->java_sender()) { |
|
679 |
if (depth++ < MaxJavaStackTraceDepth) { // check for stack too deep |
|
680 |
// add locked objects for this frame into list |
|
681 |
err = get_locked_objects_in_frame(calling_thread, java_thread, jvf, owned_monitors_list, depth-1); |
|
682 |
if (err != JVMTI_ERROR_NONE) { |
|
683 |
return err; |
|
684 |
} |
|
685 |
} |
|
686 |
} |
|
687 |
} |
|
688 |
||
689 |
// Get off stack monitors. (e.g. acquired via jni MonitorEnter). |
|
690 |
JvmtiMonitorClosure jmc(java_thread, calling_thread, owned_monitors_list, this); |
|
691 |
ObjectSynchronizer::monitors_iterate(&jmc); |
|
692 |
err = jmc.error(); |
|
693 |
||
694 |
return err; |
|
695 |
} |
|
696 |
||
697 |
// Save JNI local handles for any objects that this frame owns. |
|
698 |
jvmtiError |
|
699 |
JvmtiEnvBase::get_locked_objects_in_frame(JavaThread* calling_thread, JavaThread* java_thread, |
|
700 |
javaVFrame *jvf, GrowableArray<jvmtiMonitorStackDepthInfo*>* owned_monitors_list, int stack_depth) { |
|
701 |
jvmtiError err = JVMTI_ERROR_NONE; |
|
702 |
ResourceMark rm; |
|
703 |
||
704 |
GrowableArray<MonitorInfo*>* mons = jvf->monitors(); |
|
705 |
if (mons->is_empty()) { |
|
706 |
return err; // this javaVFrame holds no monitors |
|
707 |
} |
|
708 |
||
709 |
HandleMark hm; |
|
710 |
oop wait_obj = NULL; |
|
711 |
{ |
|
712 |
// save object of current wait() call (if any) for later comparison |
|
713 |
ObjectMonitor *mon = java_thread->current_waiting_monitor(); |
|
714 |
if (mon != NULL) { |
|
715 |
wait_obj = (oop)mon->object(); |
|
716 |
} |
|
717 |
} |
|
718 |
oop pending_obj = NULL; |
|
719 |
{ |
|
720 |
// save object of current enter() call (if any) for later comparison |
|
721 |
ObjectMonitor *mon = java_thread->current_pending_monitor(); |
|
722 |
if (mon != NULL) { |
|
723 |
pending_obj = (oop)mon->object(); |
|
724 |
} |
|
725 |
} |
|
726 |
||
727 |
for (int i = 0; i < mons->length(); i++) { |
|
728 |
MonitorInfo *mi = mons->at(i); |
|
729 |
||
3171
aa289b22b577
6837472: com/sun/jdi/MonitorFrameInfo.java fails with AggressiveOpts in 6u14
kvn
parents:
2137
diff
changeset
|
730 |
if (mi->owner_is_scalar_replaced()) continue; |
aa289b22b577
6837472: com/sun/jdi/MonitorFrameInfo.java fails with AggressiveOpts in 6u14
kvn
parents:
2137
diff
changeset
|
731 |
|
1 | 732 |
oop obj = mi->owner(); |
733 |
if (obj == NULL) { |
|
734 |
// this monitor doesn't have an owning object so skip it |
|
735 |
continue; |
|
736 |
} |
|
737 |
||
738 |
if (wait_obj == obj) { |
|
739 |
// the thread is waiting on this monitor so it isn't really owned |
|
740 |
continue; |
|
741 |
} |
|
742 |
||
743 |
if (pending_obj == obj) { |
|
744 |
// the thread is pending on this monitor so it isn't really owned |
|
745 |
continue; |
|
746 |
} |
|
747 |
||
748 |
if (owned_monitors_list->length() > 0) { |
|
749 |
// Our list has at least one object on it so we have to check |
|
750 |
// for recursive object locking |
|
751 |
bool found = false; |
|
752 |
for (int j = 0; j < owned_monitors_list->length(); j++) { |
|
753 |
jobject jobj = ((jvmtiMonitorStackDepthInfo*)owned_monitors_list->at(j))->monitor; |
|
754 |
oop check = JNIHandles::resolve(jobj); |
|
755 |
if (check == obj) { |
|
756 |
found = true; // we found the object |
|
757 |
break; |
|
758 |
} |
|
759 |
} |
|
760 |
||
761 |
if (found) { |
|
762 |
// already have this object so don't include it |
|
763 |
continue; |
|
764 |
} |
|
765 |
} |
|
766 |
||
767 |
// add the owning object to our list |
|
768 |
jvmtiMonitorStackDepthInfo *jmsdi; |
|
769 |
err = allocate(sizeof(jvmtiMonitorStackDepthInfo), (unsigned char **)&jmsdi); |
|
770 |
if (err != JVMTI_ERROR_NONE) { |
|
771 |
return err; |
|
772 |
} |
|
773 |
Handle hobj(obj); |
|
774 |
jmsdi->monitor = jni_reference(calling_thread, hobj); |
|
775 |
jmsdi->stack_depth = stack_depth; |
|
776 |
owned_monitors_list->append(jmsdi); |
|
777 |
} |
|
778 |
||
779 |
return err; |
|
780 |
} |
|
781 |
||
782 |
jvmtiError |
|
783 |
JvmtiEnvBase::get_stack_trace(JavaThread *java_thread, |
|
784 |
jint start_depth, jint max_count, |
|
785 |
jvmtiFrameInfo* frame_buffer, jint* count_ptr) { |
|
786 |
#ifdef ASSERT |
|
787 |
uint32_t debug_bits = 0; |
|
788 |
#endif |
|
789 |
assert((SafepointSynchronize::is_at_safepoint() || |
|
790 |
is_thread_fully_suspended(java_thread, false, &debug_bits)), |
|
791 |
"at safepoint or target thread is suspended"); |
|
792 |
int count = 0; |
|
793 |
if (java_thread->has_last_Java_frame()) { |
|
794 |
RegisterMap reg_map(java_thread); |
|
795 |
Thread* current_thread = Thread::current(); |
|
796 |
ResourceMark rm(current_thread); |
|
797 |
javaVFrame *jvf = java_thread->last_java_vframe(®_map); |
|
798 |
HandleMark hm(current_thread); |
|
799 |
if (start_depth != 0) { |
|
800 |
if (start_depth > 0) { |
|
801 |
for (int j = 0; j < start_depth && jvf != NULL; j++) { |
|
802 |
jvf = jvf->java_sender(); |
|
803 |
} |
|
804 |
if (jvf == NULL) { |
|
805 |
// start_depth is deeper than the stack depth |
|
806 |
return JVMTI_ERROR_ILLEGAL_ARGUMENT; |
|
807 |
} |
|
808 |
} else { // start_depth < 0 |
|
809 |
// we are referencing the starting depth based on the oldest |
|
810 |
// part of the stack. |
|
811 |
// optimize to limit the number of times that java_sender() is called |
|
812 |
javaVFrame *jvf_cursor = jvf; |
|
813 |
javaVFrame *jvf_prev = NULL; |
|
814 |
javaVFrame *jvf_prev_prev; |
|
815 |
int j = 0; |
|
816 |
while (jvf_cursor != NULL) { |
|
817 |
jvf_prev_prev = jvf_prev; |
|
818 |
jvf_prev = jvf_cursor; |
|
819 |
for (j = 0; j > start_depth && jvf_cursor != NULL; j--) { |
|
820 |
jvf_cursor = jvf_cursor->java_sender(); |
|
821 |
} |
|
822 |
} |
|
823 |
if (j == start_depth) { |
|
824 |
// previous pointer is exactly where we want to start |
|
825 |
jvf = jvf_prev; |
|
826 |
} else { |
|
827 |
// we need to back up further to get to the right place |
|
828 |
if (jvf_prev_prev == NULL) { |
|
829 |
// the -start_depth is greater than the stack depth |
|
830 |
return JVMTI_ERROR_ILLEGAL_ARGUMENT; |
|
831 |
} |
|
832 |
// j now is the number of frames on the stack starting with |
|
833 |
// jvf_prev, we start from jvf_prev_prev and move older on |
|
834 |
// the stack that many, the result is -start_depth frames |
|
835 |
// remaining. |
|
836 |
jvf = jvf_prev_prev; |
|
837 |
for (; j < 0; j++) { |
|
838 |
jvf = jvf->java_sender(); |
|
839 |
} |
|
840 |
} |
|
841 |
} |
|
842 |
} |
|
843 |
for (; count < max_count && jvf != NULL; count++) { |
|
844 |
frame_buffer[count].method = jvf->method()->jmethod_id(); |
|
845 |
frame_buffer[count].location = (jvf->method()->is_native() ? -1 : jvf->bci()); |
|
846 |
jvf = jvf->java_sender(); |
|
847 |
} |
|
848 |
} else { |
|
849 |
if (start_depth != 0) { |
|
850 |
// no frames and there is a starting depth |
|
851 |
return JVMTI_ERROR_ILLEGAL_ARGUMENT; |
|
852 |
} |
|
853 |
} |
|
854 |
*count_ptr = count; |
|
855 |
return JVMTI_ERROR_NONE; |
|
856 |
} |
|
857 |
||
858 |
jvmtiError |
|
859 |
JvmtiEnvBase::get_frame_count(JvmtiThreadState *state, jint *count_ptr) { |
|
860 |
assert((state != NULL), |
|
861 |
"JavaThread should create JvmtiThreadState before calling this method"); |
|
862 |
*count_ptr = state->count_frames(); |
|
863 |
return JVMTI_ERROR_NONE; |
|
864 |
} |
|
865 |
||
866 |
jvmtiError |
|
867 |
JvmtiEnvBase::get_frame_location(JavaThread *java_thread, jint depth, |
|
868 |
jmethodID* method_ptr, jlocation* location_ptr) { |
|
869 |
#ifdef ASSERT |
|
870 |
uint32_t debug_bits = 0; |
|
871 |
#endif |
|
872 |
assert((SafepointSynchronize::is_at_safepoint() || |
|
873 |
is_thread_fully_suspended(java_thread, false, &debug_bits)), |
|
874 |
"at safepoint or target thread is suspended"); |
|
875 |
Thread* current_thread = Thread::current(); |
|
876 |
ResourceMark rm(current_thread); |
|
877 |
||
878 |
vframe *vf = vframeFor(java_thread, depth); |
|
879 |
if (vf == NULL) { |
|
880 |
return JVMTI_ERROR_NO_MORE_FRAMES; |
|
881 |
} |
|
882 |
||
883 |
// vframeFor should return a java frame. If it doesn't |
|
884 |
// it means we've got an internal error and we return the |
|
885 |
// error in product mode. In debug mode we will instead |
|
886 |
// attempt to cast the vframe to a javaVFrame and will |
|
887 |
// cause an assertion/crash to allow further diagnosis. |
|
888 |
#ifdef PRODUCT |
|
889 |
if (!vf->is_java_frame()) { |
|
890 |
return JVMTI_ERROR_INTERNAL; |
|
891 |
} |
|
892 |
#endif |
|
893 |
||
894 |
HandleMark hm(current_thread); |
|
895 |
javaVFrame *jvf = javaVFrame::cast(vf); |
|
896 |
methodOop method = jvf->method(); |
|
897 |
if (method->is_native()) { |
|
898 |
*location_ptr = -1; |
|
899 |
} else { |
|
900 |
*location_ptr = jvf->bci(); |
|
901 |
} |
|
902 |
*method_ptr = method->jmethod_id(); |
|
903 |
||
904 |
return JVMTI_ERROR_NONE; |
|
905 |
} |
|
906 |
||
907 |
||
908 |
jvmtiError |
|
909 |
JvmtiEnvBase::get_object_monitor_usage(JavaThread* calling_thread, jobject object, jvmtiMonitorUsage* info_ptr) { |
|
910 |
HandleMark hm; |
|
911 |
Handle hobj; |
|
912 |
||
913 |
bool at_safepoint = SafepointSynchronize::is_at_safepoint(); |
|
914 |
||
915 |
// Check arguments |
|
916 |
{ |
|
917 |
oop mirror = JNIHandles::resolve_external_guard(object); |
|
918 |
NULL_CHECK(mirror, JVMTI_ERROR_INVALID_OBJECT); |
|
919 |
NULL_CHECK(info_ptr, JVMTI_ERROR_NULL_POINTER); |
|
920 |
||
921 |
hobj = Handle(mirror); |
|
922 |
} |
|
923 |
||
924 |
JavaThread *owning_thread = NULL; |
|
925 |
ObjectMonitor *mon = NULL; |
|
926 |
jvmtiMonitorUsage ret = { |
|
927 |
NULL, 0, 0, NULL, 0, NULL |
|
928 |
}; |
|
929 |
||
930 |
uint32_t debug_bits = 0; |
|
931 |
// first derive the object's owner and entry_count (if any) |
|
932 |
{ |
|
933 |
// Revoke any biases before querying the mark word |
|
934 |
if (SafepointSynchronize::is_at_safepoint()) { |
|
935 |
BiasedLocking::revoke_at_safepoint(hobj); |
|
936 |
} else { |
|
937 |
BiasedLocking::revoke_and_rebias(hobj, false, calling_thread); |
|
938 |
} |
|
939 |
||
940 |
address owner = NULL; |
|
941 |
{ |
|
942 |
markOop mark = hobj()->mark(); |
|
943 |
||
944 |
if (!mark->has_monitor()) { |
|
945 |
// this object has a lightweight monitor |
|
946 |
||
947 |
if (mark->has_locker()) { |
|
948 |
owner = (address)mark->locker(); // save the address of the Lock word |
|
949 |
} |
|
950 |
// implied else: no owner |
|
951 |
} else { |
|
952 |
// this object has a heavyweight monitor |
|
953 |
mon = mark->monitor(); |
|
954 |
||
955 |
// The owner field of a heavyweight monitor may be NULL for no |
|
956 |
// owner, a JavaThread * or it may still be the address of the |
|
957 |
// Lock word in a JavaThread's stack. A monitor can be inflated |
|
958 |
// by a non-owning JavaThread, but only the owning JavaThread |
|
959 |
// can change the owner field from the Lock word to the |
|
960 |
// JavaThread * and it may not have done that yet. |
|
961 |
owner = (address)mon->owner(); |
|
962 |
} |
|
963 |
} |
|
964 |
||
965 |
if (owner != NULL) { |
|
966 |
// This monitor is owned so we have to find the owning JavaThread. |
|
967 |
// Since owning_thread_from_monitor_owner() grabs a lock, GC can |
|
968 |
// move our object at this point. However, our owner value is safe |
|
969 |
// since it is either the Lock word on a stack or a JavaThread *. |
|
970 |
owning_thread = Threads::owning_thread_from_monitor_owner(owner, !at_safepoint); |
|
971 |
assert(owning_thread != NULL, "sanity check"); |
|
972 |
if (owning_thread != NULL) { // robustness |
|
973 |
// The monitor's owner either has to be the current thread, at safepoint |
|
974 |
// or it has to be suspended. Any of these conditions will prevent both |
|
975 |
// contending and waiting threads from modifying the state of |
|
976 |
// the monitor. |
|
977 |
if (!at_safepoint && !JvmtiEnv::is_thread_fully_suspended(owning_thread, true, &debug_bits)) { |
|
978 |
return JVMTI_ERROR_THREAD_NOT_SUSPENDED; |
|
979 |
} |
|
980 |
HandleMark hm; |
|
981 |
Handle th(owning_thread->threadObj()); |
|
982 |
ret.owner = (jthread)jni_reference(calling_thread, th); |
|
983 |
} |
|
984 |
// implied else: no owner |
|
985 |
} |
|
986 |
||
987 |
if (owning_thread != NULL) { // monitor is owned |
|
988 |
if ((address)owning_thread == owner) { |
|
989 |
// the owner field is the JavaThread * |
|
990 |
assert(mon != NULL, |
|
991 |
"must have heavyweight monitor with JavaThread * owner"); |
|
992 |
ret.entry_count = mon->recursions() + 1; |
|
993 |
} else { |
|
994 |
// The owner field is the Lock word on the JavaThread's stack |
|
995 |
// so the recursions field is not valid. We have to count the |
|
996 |
// number of recursive monitor entries the hard way. We pass |
|
997 |
// a handle to survive any GCs along the way. |
|
998 |
ResourceMark rm; |
|
999 |
ret.entry_count = count_locked_objects(owning_thread, hobj); |
|
1000 |
} |
|
1001 |
} |
|
1002 |
// implied else: entry_count == 0 |
|
1003 |
} |
|
1004 |
||
1005 |
int nWant,nWait; |
|
1006 |
if (mon != NULL) { |
|
1007 |
// this object has a heavyweight monitor |
|
1008 |
nWant = mon->contentions(); // # of threads contending for monitor |
|
1009 |
nWait = mon->waiters(); // # of threads in Object.wait() |
|
1010 |
ret.waiter_count = nWant + nWait; |
|
1011 |
ret.notify_waiter_count = nWait; |
|
1012 |
} else { |
|
1013 |
// this object has a lightweight monitor |
|
1014 |
ret.waiter_count = 0; |
|
1015 |
ret.notify_waiter_count = 0; |
|
1016 |
} |
|
1017 |
||
1018 |
// Allocate memory for heavyweight and lightweight monitor. |
|
1019 |
jvmtiError err; |
|
1020 |
err = allocate(ret.waiter_count * sizeof(jthread *), (unsigned char**)&ret.waiters); |
|
1021 |
if (err != JVMTI_ERROR_NONE) { |
|
1022 |
return err; |
|
1023 |
} |
|
1024 |
err = allocate(ret.notify_waiter_count * sizeof(jthread *), |
|
1025 |
(unsigned char**)&ret.notify_waiters); |
|
1026 |
if (err != JVMTI_ERROR_NONE) { |
|
1027 |
deallocate((unsigned char*)ret.waiters); |
|
1028 |
return err; |
|
1029 |
} |
|
1030 |
||
1031 |
// now derive the rest of the fields |
|
1032 |
if (mon != NULL) { |
|
1033 |
// this object has a heavyweight monitor |
|
1034 |
||
1035 |
// Number of waiters may actually be less than the waiter count. |
|
1036 |
// So NULL out memory so that unused memory will be NULL. |
|
1037 |
memset(ret.waiters, 0, ret.waiter_count * sizeof(jthread *)); |
|
1038 |
memset(ret.notify_waiters, 0, ret.notify_waiter_count * sizeof(jthread *)); |
|
1039 |
||
1040 |
if (ret.waiter_count > 0) { |
|
1041 |
// we have contending and/or waiting threads |
|
1042 |
HandleMark hm; |
|
1043 |
if (nWant > 0) { |
|
1044 |
// we have contending threads |
|
1045 |
ResourceMark rm; |
|
1046 |
// get_pending_threads returns only java thread so we do not need to |
|
1047 |
// check for non java threads. |
|
1048 |
GrowableArray<JavaThread*>* wantList = Threads::get_pending_threads( |
|
1049 |
nWant, (address)mon, !at_safepoint); |
|
1050 |
if (wantList->length() < nWant) { |
|
1051 |
// robustness: the pending list has gotten smaller |
|
1052 |
nWant = wantList->length(); |
|
1053 |
} |
|
1054 |
for (int i = 0; i < nWant; i++) { |
|
1055 |
JavaThread *pending_thread = wantList->at(i); |
|
1056 |
// If the monitor has no owner, then a non-suspended contending |
|
1057 |
// thread could potentially change the state of the monitor by |
|
1058 |
// entering it. The JVM/TI spec doesn't allow this. |
|
1059 |
if (owning_thread == NULL && !at_safepoint & |
|
1060 |
!JvmtiEnv::is_thread_fully_suspended(pending_thread, true, &debug_bits)) { |
|
1061 |
if (ret.owner != NULL) { |
|
1062 |
destroy_jni_reference(calling_thread, ret.owner); |
|
1063 |
} |
|
1064 |
for (int j = 0; j < i; j++) { |
|
1065 |
destroy_jni_reference(calling_thread, ret.waiters[j]); |
|
1066 |
} |
|
1067 |
deallocate((unsigned char*)ret.waiters); |
|
1068 |
deallocate((unsigned char*)ret.notify_waiters); |
|
1069 |
return JVMTI_ERROR_THREAD_NOT_SUSPENDED; |
|
1070 |
} |
|
1071 |
Handle th(pending_thread->threadObj()); |
|
1072 |
ret.waiters[i] = (jthread)jni_reference(calling_thread, th); |
|
1073 |
} |
|
1074 |
} |
|
1075 |
if (nWait > 0) { |
|
1076 |
// we have threads in Object.wait() |
|
1077 |
int offset = nWant; // add after any contending threads |
|
1078 |
ObjectWaiter *waiter = mon->first_waiter(); |
|
1079 |
for (int i = 0, j = 0; i < nWait; i++) { |
|
1080 |
if (waiter == NULL) { |
|
1081 |
// robustness: the waiting list has gotten smaller |
|
1082 |
nWait = j; |
|
1083 |
break; |
|
1084 |
} |
|
1085 |
Thread *t = mon->thread_of_waiter(waiter); |
|
1086 |
if (t != NULL && t->is_Java_thread()) { |
|
1087 |
JavaThread *wjava_thread = (JavaThread *)t; |
|
1088 |
// If the thread was found on the ObjectWaiter list, then |
|
1089 |
// it has not been notified. This thread can't change the |
|
1090 |
// state of the monitor so it doesn't need to be suspended. |
|
1091 |
Handle th(wjava_thread->threadObj()); |
|
1092 |
ret.waiters[offset + j] = (jthread)jni_reference(calling_thread, th); |
|
1093 |
ret.notify_waiters[j++] = (jthread)jni_reference(calling_thread, th); |
|
1094 |
} |
|
1095 |
waiter = mon->next_waiter(waiter); |
|
1096 |
} |
|
1097 |
} |
|
1098 |
} |
|
1099 |
||
1100 |
// Adjust count. nWant and nWait count values may be less than original. |
|
1101 |
ret.waiter_count = nWant + nWait; |
|
1102 |
ret.notify_waiter_count = nWait; |
|
1103 |
} else { |
|
1104 |
// this object has a lightweight monitor and we have nothing more |
|
1105 |
// to do here because the defaults are just fine. |
|
1106 |
} |
|
1107 |
||
1108 |
// we don't update return parameter unless everything worked |
|
1109 |
*info_ptr = ret; |
|
1110 |
||
1111 |
return JVMTI_ERROR_NONE; |
|
1112 |
} |
|
1113 |
||
1114 |
ResourceTracker::ResourceTracker(JvmtiEnv* env) { |
|
1115 |
_env = env; |
|
1116 |
_allocations = new (ResourceObj::C_HEAP) GrowableArray<unsigned char*>(20, true); |
|
1117 |
_failed = false; |
|
1118 |
} |
|
1119 |
ResourceTracker::~ResourceTracker() { |
|
1120 |
if (_failed) { |
|
1121 |
for (int i=0; i<_allocations->length(); i++) { |
|
1122 |
_env->deallocate(_allocations->at(i)); |
|
1123 |
} |
|
1124 |
} |
|
1125 |
delete _allocations; |
|
1126 |
} |
|
1127 |
||
1128 |
jvmtiError ResourceTracker::allocate(jlong size, unsigned char** mem_ptr) { |
|
1129 |
unsigned char *ptr; |
|
1130 |
jvmtiError err = _env->allocate(size, &ptr); |
|
1131 |
if (err == JVMTI_ERROR_NONE) { |
|
1132 |
_allocations->append(ptr); |
|
1133 |
*mem_ptr = ptr; |
|
1134 |
} else { |
|
1135 |
*mem_ptr = NULL; |
|
1136 |
_failed = true; |
|
1137 |
} |
|
1138 |
return err; |
|
1139 |
} |
|
1140 |
||
1141 |
unsigned char* ResourceTracker::allocate(jlong size) { |
|
1142 |
unsigned char* ptr; |
|
1143 |
allocate(size, &ptr); |
|
1144 |
return ptr; |
|
1145 |
} |
|
1146 |
||
1147 |
char* ResourceTracker::strdup(const char* str) { |
|
1148 |
char *dup_str = (char*)allocate(strlen(str)+1); |
|
1149 |
if (dup_str != NULL) { |
|
1150 |
strcpy(dup_str, str); |
|
1151 |
} |
|
1152 |
return dup_str; |
|
1153 |
} |
|
1154 |
||
1155 |
struct StackInfoNode { |
|
1156 |
struct StackInfoNode *next; |
|
1157 |
jvmtiStackInfo info; |
|
1158 |
}; |
|
1159 |
||
1160 |
// Create a jvmtiStackInfo inside a linked list node and create a |
|
1161 |
// buffer for the frame information, both allocated as resource objects. |
|
1162 |
// Fill in both the jvmtiStackInfo and the jvmtiFrameInfo. |
|
1163 |
// Note that either or both of thr and thread_oop |
|
1164 |
// may be null if the thread is new or has exited. |
|
1165 |
void |
|
1166 |
VM_GetMultipleStackTraces::fill_frames(jthread jt, JavaThread *thr, oop thread_oop) { |
|
1167 |
assert(SafepointSynchronize::is_at_safepoint(), "must be at safepoint"); |
|
1168 |
||
1169 |
jint state = 0; |
|
1170 |
struct StackInfoNode *node = NEW_RESOURCE_OBJ(struct StackInfoNode); |
|
1171 |
jvmtiStackInfo *infop = &(node->info); |
|
1172 |
node->next = head(); |
|
1173 |
set_head(node); |
|
1174 |
infop->frame_count = 0; |
|
1175 |
infop->thread = jt; |
|
1176 |
||
1177 |
if (thread_oop != NULL) { |
|
1178 |
// get most state bits |
|
1179 |
state = (jint)java_lang_Thread::get_thread_status(thread_oop); |
|
1180 |
} |
|
1181 |
||
1182 |
if (thr != NULL) { // add more state bits if there is a JavaThead to query |
|
1183 |
// same as is_being_ext_suspended() but without locking |
|
1184 |
if (thr->is_ext_suspended() || thr->is_external_suspend()) { |
|
1185 |
state |= JVMTI_THREAD_STATE_SUSPENDED; |
|
1186 |
} |
|
1187 |
JavaThreadState jts = thr->thread_state(); |
|
1188 |
if (jts == _thread_in_native) { |
|
1189 |
state |= JVMTI_THREAD_STATE_IN_NATIVE; |
|
1190 |
} |
|
1191 |
OSThread* osThread = thr->osthread(); |
|
1192 |
if (osThread != NULL && osThread->interrupted()) { |
|
1193 |
state |= JVMTI_THREAD_STATE_INTERRUPTED; |
|
1194 |
} |
|
1195 |
} |
|
1196 |
infop->state = state; |
|
1197 |
||
1198 |
if (thr != NULL || (state & JVMTI_THREAD_STATE_ALIVE) != 0) { |
|
1199 |
infop->frame_buffer = NEW_RESOURCE_ARRAY(jvmtiFrameInfo, max_frame_count()); |
|
1200 |
env()->get_stack_trace(thr, 0, max_frame_count(), |
|
1201 |
infop->frame_buffer, &(infop->frame_count)); |
|
1202 |
} else { |
|
1203 |
infop->frame_buffer = NULL; |
|
1204 |
infop->frame_count = 0; |
|
1205 |
} |
|
1206 |
_frame_count_total += infop->frame_count; |
|
1207 |
} |
|
1208 |
||
1209 |
// Based on the stack information in the linked list, allocate memory |
|
1210 |
// block to return and fill it from the info in the linked list. |
|
1211 |
void |
|
1212 |
VM_GetMultipleStackTraces::allocate_and_fill_stacks(jint thread_count) { |
|
1213 |
// do I need to worry about alignment issues? |
|
1214 |
jlong alloc_size = thread_count * sizeof(jvmtiStackInfo) |
|
1215 |
+ _frame_count_total * sizeof(jvmtiFrameInfo); |
|
1216 |
env()->allocate(alloc_size, (unsigned char **)&_stack_info); |
|
1217 |
||
1218 |
// pointers to move through the newly allocated space as it is filled in |
|
1219 |
jvmtiStackInfo *si = _stack_info + thread_count; // bottom of stack info |
|
1220 |
jvmtiFrameInfo *fi = (jvmtiFrameInfo *)si; // is the top of frame info |
|
1221 |
||
1222 |
// copy information in resource area into allocated buffer |
|
1223 |
// insert stack info backwards since linked list is backwards |
|
1224 |
// insert frame info forwards |
|
1225 |
// walk the StackInfoNodes |
|
1226 |
for (struct StackInfoNode *sin = head(); sin != NULL; sin = sin->next) { |
|
1227 |
jint frame_count = sin->info.frame_count; |
|
1228 |
size_t frames_size = frame_count * sizeof(jvmtiFrameInfo); |
|
1229 |
--si; |
|
1230 |
memcpy(si, &(sin->info), sizeof(jvmtiStackInfo)); |
|
1231 |
if (frames_size == 0) { |
|
1232 |
si->frame_buffer = NULL; |
|
1233 |
} else { |
|
1234 |
memcpy(fi, sin->info.frame_buffer, frames_size); |
|
1235 |
si->frame_buffer = fi; // point to the new allocated copy of the frames |
|
1236 |
fi += frame_count; |
|
1237 |
} |
|
1238 |
} |
|
1239 |
assert(si == _stack_info, "the last copied stack info must be the first record"); |
|
1240 |
assert((unsigned char *)fi == ((unsigned char *)_stack_info) + alloc_size, |
|
1241 |
"the last copied frame info must be the last record"); |
|
1242 |
} |
|
1243 |
||
1244 |
||
1245 |
void |
|
1246 |
VM_GetThreadListStackTraces::doit() { |
|
1247 |
assert(SafepointSynchronize::is_at_safepoint(), "must be at safepoint"); |
|
1248 |
||
1249 |
ResourceMark rm; |
|
1250 |
for (int i = 0; i < _thread_count; ++i) { |
|
1251 |
jthread jt = _thread_list[i]; |
|
1252 |
oop thread_oop = JNIHandles::resolve_external_guard(jt); |
|
1253 |
if (thread_oop == NULL || !thread_oop->is_a(SystemDictionary::thread_klass())) { |
|
1254 |
set_result(JVMTI_ERROR_INVALID_THREAD); |
|
1255 |
return; |
|
1256 |
} |
|
1257 |
fill_frames(jt, java_lang_Thread::thread(thread_oop), thread_oop); |
|
1258 |
} |
|
1259 |
allocate_and_fill_stacks(_thread_count); |
|
1260 |
} |
|
1261 |
||
1262 |
void |
|
1263 |
VM_GetAllStackTraces::doit() { |
|
1264 |
assert(SafepointSynchronize::is_at_safepoint(), "must be at safepoint"); |
|
1265 |
||
1266 |
ResourceMark rm; |
|
1267 |
_final_thread_count = 0; |
|
1268 |
for (JavaThread *jt = Threads::first(); jt != NULL; jt = jt->next()) { |
|
1269 |
oop thread_oop = jt->threadObj(); |
|
1270 |
if (thread_oop != NULL && |
|
1271 |
!jt->is_exiting() && |
|
1272 |
java_lang_Thread::is_alive(thread_oop) && |
|
1273 |
!jt->is_hidden_from_external_view()) { |
|
1274 |
++_final_thread_count; |
|
1275 |
// Handle block of the calling thread is used to create local refs. |
|
1276 |
fill_frames((jthread)JNIHandles::make_local(_calling_thread, thread_oop), |
|
1277 |
jt, thread_oop); |
|
1278 |
} |
|
1279 |
} |
|
1280 |
allocate_and_fill_stacks(_final_thread_count); |
|
1281 |
} |
|
1282 |
||
1283 |
// Verifies that the top frame is a java frame in an expected state. |
|
1284 |
// Deoptimizes frame if needed. |
|
1285 |
// Checks that the frame method signature matches the return type (tos). |
|
1286 |
// HandleMark must be defined in the caller only. |
|
1287 |
// It is to keep a ret_ob_h handle alive after return to the caller. |
|
1288 |
jvmtiError |
|
1289 |
JvmtiEnvBase::check_top_frame(JavaThread* current_thread, JavaThread* java_thread, |
|
1290 |
jvalue value, TosState tos, Handle* ret_ob_h) { |
|
1291 |
ResourceMark rm(current_thread); |
|
1292 |
||
1293 |
vframe *vf = vframeFor(java_thread, 0); |
|
1294 |
NULL_CHECK(vf, JVMTI_ERROR_NO_MORE_FRAMES); |
|
1295 |
||
1296 |
javaVFrame *jvf = (javaVFrame*) vf; |
|
1297 |
if (!vf->is_java_frame() || jvf->method()->is_native()) { |
|
1298 |
return JVMTI_ERROR_OPAQUE_FRAME; |
|
1299 |
} |
|
1300 |
||
1301 |
// If the frame is a compiled one, need to deoptimize it. |
|
1302 |
if (vf->is_compiled_frame()) { |
|
1303 |
if (!vf->fr().can_be_deoptimized()) { |
|
1304 |
return JVMTI_ERROR_OPAQUE_FRAME; |
|
1305 |
} |
|
1306 |
VM_DeoptimizeFrame deopt(java_thread, jvf->fr().id()); |
|
1307 |
VMThread::execute(&deopt); |
|
1308 |
} |
|
1309 |
||
1310 |
// Get information about method return type |
|
1311 |
symbolHandle signature(current_thread, jvf->method()->signature()); |
|
1312 |
||
1313 |
ResultTypeFinder rtf(signature); |
|
1314 |
TosState fr_tos = as_TosState(rtf.type()); |
|
1315 |
if (fr_tos != tos) { |
|
1316 |
if (tos != itos || (fr_tos != btos && fr_tos != ctos && fr_tos != stos)) { |
|
1317 |
return JVMTI_ERROR_TYPE_MISMATCH; |
|
1318 |
} |
|
1319 |
} |
|
1320 |
||
1321 |
// Check that the jobject class matches the return type signature. |
|
1322 |
jobject jobj = value.l; |
|
1323 |
if (tos == atos && jobj != NULL) { // NULL reference is allowed |
|
1324 |
Handle ob_h = Handle(current_thread, JNIHandles::resolve_external_guard(jobj)); |
|
1325 |
NULL_CHECK(ob_h, JVMTI_ERROR_INVALID_OBJECT); |
|
1326 |
KlassHandle ob_kh = KlassHandle(current_thread, ob_h()->klass()); |
|
1327 |
NULL_CHECK(ob_kh, JVMTI_ERROR_INVALID_OBJECT); |
|
1328 |
||
1329 |
// Method return type signature. |
|
1330 |
char* ty_sign = 1 + strchr(signature->as_C_string(), ')'); |
|
1331 |
||
1332 |
if (!VM_GetOrSetLocal::is_assignable(ty_sign, Klass::cast(ob_kh()), current_thread)) { |
|
1333 |
return JVMTI_ERROR_TYPE_MISMATCH; |
|
1334 |
} |
|
1335 |
*ret_ob_h = ob_h; |
|
1336 |
} |
|
1337 |
return JVMTI_ERROR_NONE; |
|
1338 |
} /* end check_top_frame */ |
|
1339 |
||
1340 |
||
1341 |
// ForceEarlyReturn<type> follows the PopFrame approach in many aspects. |
|
1342 |
// Main difference is on the last stage in the interpreter. |
|
1343 |
// The PopFrame stops method execution to continue execution |
|
1344 |
// from the same method call instruction. |
|
1345 |
// The ForceEarlyReturn forces return from method so the execution |
|
1346 |
// continues at the bytecode following the method call. |
|
1347 |
||
1348 |
// Threads_lock NOT held, java_thread not protected by lock |
|
1349 |
// java_thread - pre-checked |
|
1350 |
||
1351 |
jvmtiError |
|
1352 |
JvmtiEnvBase::force_early_return(JavaThread* java_thread, jvalue value, TosState tos) { |
|
1353 |
JavaThread* current_thread = JavaThread::current(); |
|
1354 |
HandleMark hm(current_thread); |
|
1355 |
uint32_t debug_bits = 0; |
|
1356 |
||
2135
f82c3012ec86
6800721: 3/4 JavaThread::jvmti_thread_state() and JvmtiThreadState::state_for() robustness
dcubed
parents:
1623
diff
changeset
|
1357 |
// retrieve or create the state |
f82c3012ec86
6800721: 3/4 JavaThread::jvmti_thread_state() and JvmtiThreadState::state_for() robustness
dcubed
parents:
1623
diff
changeset
|
1358 |
JvmtiThreadState* state = JvmtiThreadState::state_for(java_thread); |
f82c3012ec86
6800721: 3/4 JavaThread::jvmti_thread_state() and JvmtiThreadState::state_for() robustness
dcubed
parents:
1623
diff
changeset
|
1359 |
if (state == NULL) { |
f82c3012ec86
6800721: 3/4 JavaThread::jvmti_thread_state() and JvmtiThreadState::state_for() robustness
dcubed
parents:
1623
diff
changeset
|
1360 |
return JVMTI_ERROR_THREAD_NOT_ALIVE; |
f82c3012ec86
6800721: 3/4 JavaThread::jvmti_thread_state() and JvmtiThreadState::state_for() robustness
dcubed
parents:
1623
diff
changeset
|
1361 |
} |
f82c3012ec86
6800721: 3/4 JavaThread::jvmti_thread_state() and JvmtiThreadState::state_for() robustness
dcubed
parents:
1623
diff
changeset
|
1362 |
|
1 | 1363 |
// Check if java_thread is fully suspended |
1364 |
if (!is_thread_fully_suspended(java_thread, |
|
1365 |
true /* wait for suspend completion */, |
|
1366 |
&debug_bits)) { |
|
1367 |
return JVMTI_ERROR_THREAD_NOT_SUSPENDED; |
|
1368 |
} |
|
1369 |
||
1370 |
// Check to see if a ForceEarlyReturn was already in progress |
|
1371 |
if (state->is_earlyret_pending()) { |
|
1372 |
// Probably possible for JVMTI clients to trigger this, but the |
|
1373 |
// JPDA backend shouldn't allow this to happen |
|
1374 |
return JVMTI_ERROR_INTERNAL; |
|
1375 |
} |
|
1376 |
{ |
|
1377 |
// The same as for PopFrame. Workaround bug: |
|
1378 |
// 4812902: popFrame hangs if the method is waiting at a synchronize |
|
1379 |
// Catch this condition and return an error to avoid hanging. |
|
1380 |
// Now JVMTI spec allows an implementation to bail out with an opaque |
|
1381 |
// frame error. |
|
1382 |
OSThread* osThread = java_thread->osthread(); |
|
1383 |
if (osThread->get_state() == MONITOR_WAIT) { |
|
1384 |
return JVMTI_ERROR_OPAQUE_FRAME; |
|
1385 |
} |
|
1386 |
} |
|
1387 |
Handle ret_ob_h = Handle(); |
|
1388 |
jvmtiError err = check_top_frame(current_thread, java_thread, value, tos, &ret_ob_h); |
|
1389 |
if (err != JVMTI_ERROR_NONE) { |
|
1390 |
return err; |
|
1391 |
} |
|
1392 |
assert(tos != atos || value.l == NULL || ret_ob_h() != NULL, |
|
1393 |
"return object oop must not be NULL if jobject is not NULL"); |
|
1394 |
||
1395 |
// Update the thread state to reflect that the top frame must be |
|
1396 |
// forced to return. |
|
1397 |
// The current frame will be returned later when the suspended |
|
1398 |
// thread is resumed and right before returning from VM to Java. |
|
1399 |
// (see call_VM_base() in assembler_<cpu>.cpp). |
|
1400 |
||
1401 |
state->set_earlyret_pending(); |
|
1402 |
state->set_earlyret_oop(ret_ob_h()); |
|
1403 |
state->set_earlyret_value(value, tos); |
|
1404 |
||
1405 |
// Set pending step flag for this early return. |
|
1406 |
// It is cleared when next step event is posted. |
|
1407 |
state->set_pending_step_for_earlyret(); |
|
1408 |
||
1409 |
return JVMTI_ERROR_NONE; |
|
1410 |
} /* end force_early_return */ |
|
1411 |
||
1412 |
void |
|
1413 |
JvmtiMonitorClosure::do_monitor(ObjectMonitor* mon) { |
|
1414 |
if ( _error != JVMTI_ERROR_NONE) { |
|
1415 |
// Error occurred in previous iteration so no need to add |
|
1416 |
// to the list. |
|
1417 |
return; |
|
1418 |
} |
|
1419 |
if (mon->owner() == _java_thread ) { |
|
1420 |
// Filter out on stack monitors collected during stack walk. |
|
1421 |
oop obj = (oop)mon->object(); |
|
1422 |
bool found = false; |
|
1423 |
for (int j = 0; j < _owned_monitors_list->length(); j++) { |
|
1424 |
jobject jobj = ((jvmtiMonitorStackDepthInfo*)_owned_monitors_list->at(j))->monitor; |
|
1425 |
oop check = JNIHandles::resolve(jobj); |
|
1426 |
if (check == obj) { |
|
1427 |
// On stack monitor already collected during the stack walk. |
|
1428 |
found = true; |
|
1429 |
break; |
|
1430 |
} |
|
1431 |
} |
|
1432 |
if (found == false) { |
|
1433 |
// This is off stack monitor (e.g. acquired via jni MonitorEnter). |
|
1434 |
jvmtiError err; |
|
1435 |
jvmtiMonitorStackDepthInfo *jmsdi; |
|
1436 |
err = _env->allocate(sizeof(jvmtiMonitorStackDepthInfo), (unsigned char **)&jmsdi); |
|
1437 |
if (err != JVMTI_ERROR_NONE) { |
|
1438 |
_error = err; |
|
1439 |
return; |
|
1440 |
} |
|
1441 |
Handle hobj(obj); |
|
1442 |
jmsdi->monitor = _env->jni_reference(_calling_thread, hobj); |
|
1443 |
// stack depth is unknown for this monitor. |
|
1444 |
jmsdi->stack_depth = -1; |
|
1445 |
_owned_monitors_list->append(jmsdi); |
|
1446 |
} |
|
1447 |
} |
|
1448 |
} |
|
1449 |
||
1450 |
#endif // !JVMTI_KERNEL |