Sun, 11 Oct 2009 16:19:25 -0700
6888953: some calls to function-like macros are missing semicolons
Reviewed-by: pbk, kvn
1 /*
2 * Copyright 2003-2010 Sun Microsystems, Inc. All Rights Reserved.
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 */
25 # include "incls/_precompiled.incl"
26 # include "incls/_jvmtiExport.cpp.incl"
28 #ifdef JVMTI_TRACE
29 #define EVT_TRACE(evt,out) if ((JvmtiTrace::event_trace_flags(evt) & JvmtiTrace::SHOW_EVENT_SENT) != 0) { SafeResourceMark rm; tty->print_cr out; }
30 #define EVT_TRIG_TRACE(evt,out) if ((JvmtiTrace::event_trace_flags(evt) & JvmtiTrace::SHOW_EVENT_TRIGGER) != 0) { SafeResourceMark rm; tty->print_cr out; }
31 #else
32 #define EVT_TRIG_TRACE(evt,out)
33 #define EVT_TRACE(evt,out)
34 #endif
36 ///////////////////////////////////////////////////////////////
37 //
38 // JvmtiEventTransition
39 //
40 // TO DO --
41 // more handle purging
43 // Use this for JavaThreads and state is _thread_in_vm.
44 class JvmtiJavaThreadEventTransition : StackObj {
45 private:
46 ResourceMark _rm;
47 ThreadToNativeFromVM _transition;
48 HandleMark _hm;
50 public:
51 JvmtiJavaThreadEventTransition(JavaThread *thread) :
52 _rm(),
53 _transition(thread),
54 _hm(thread) {};
55 };
57 // For JavaThreads which are not in _thread_in_vm state
58 // and other system threads use this.
59 class JvmtiThreadEventTransition : StackObj {
60 private:
61 ResourceMark _rm;
62 HandleMark _hm;
63 JavaThreadState _saved_state;
64 JavaThread *_jthread;
66 public:
67 JvmtiThreadEventTransition(Thread *thread) : _rm(), _hm() {
68 if (thread->is_Java_thread()) {
69 _jthread = (JavaThread *)thread;
70 _saved_state = _jthread->thread_state();
71 if (_saved_state == _thread_in_Java) {
72 ThreadStateTransition::transition_from_java(_jthread, _thread_in_native);
73 } else {
74 ThreadStateTransition::transition(_jthread, _saved_state, _thread_in_native);
75 }
76 } else {
77 _jthread = NULL;
78 }
79 }
81 ~JvmtiThreadEventTransition() {
82 if (_jthread != NULL)
83 ThreadStateTransition::transition_from_native(_jthread, _saved_state);
84 }
85 };
88 ///////////////////////////////////////////////////////////////
89 //
90 // JvmtiEventMark
91 //
93 class JvmtiEventMark : public StackObj {
94 private:
95 JavaThread *_thread;
96 JNIEnv* _jni_env;
97 bool _exception_detected;
98 bool _exception_caught;
99 #if 0
100 JNIHandleBlock* _hblock;
101 #endif
103 public:
104 JvmtiEventMark(JavaThread *thread) : _thread(thread),
105 _jni_env(thread->jni_environment()) {
106 #if 0
107 _hblock = thread->active_handles();
108 _hblock->clear_thoroughly(); // so we can be safe
109 #else
110 // we want to use the code above - but that needs the JNIHandle changes - later...
111 // for now, steal JNI push local frame code
112 JvmtiThreadState *state = thread->jvmti_thread_state();
113 // we are before an event.
114 // Save current jvmti thread exception state.
115 if (state != NULL) {
116 _exception_detected = state->is_exception_detected();
117 _exception_caught = state->is_exception_caught();
118 } else {
119 _exception_detected = false;
120 _exception_caught = false;
121 }
123 JNIHandleBlock* old_handles = thread->active_handles();
124 JNIHandleBlock* new_handles = JNIHandleBlock::allocate_block(thread);
125 assert(new_handles != NULL, "should not be NULL");
126 new_handles->set_pop_frame_link(old_handles);
127 thread->set_active_handles(new_handles);
128 #endif
129 assert(thread == JavaThread::current(), "thread must be current!");
130 thread->frame_anchor()->make_walkable(thread);
131 };
133 ~JvmtiEventMark() {
134 #if 0
135 _hblock->clear(); // for consistency with future correct behavior
136 #else
137 // we want to use the code above - but that needs the JNIHandle changes - later...
138 // for now, steal JNI pop local frame code
139 JNIHandleBlock* old_handles = _thread->active_handles();
140 JNIHandleBlock* new_handles = old_handles->pop_frame_link();
141 assert(new_handles != NULL, "should not be NULL");
142 _thread->set_active_handles(new_handles);
143 // Note that we set the pop_frame_link to NULL explicitly, otherwise
144 // the release_block call will release the blocks.
145 old_handles->set_pop_frame_link(NULL);
146 JNIHandleBlock::release_block(old_handles, _thread); // may block
147 #endif
149 JvmtiThreadState* state = _thread->jvmti_thread_state();
150 // we are continuing after an event.
151 if (state != NULL) {
152 // Restore the jvmti thread exception state.
153 if (_exception_detected) {
154 state->set_exception_detected();
155 }
156 if (_exception_caught) {
157 state->set_exception_caught();
158 }
159 }
160 }
162 #if 0
163 jobject to_jobject(oop obj) { return obj == NULL? NULL : _hblock->allocate_handle_fast(obj); }
164 #else
165 // we want to use the code above - but that needs the JNIHandle changes - later...
166 // for now, use regular make_local
167 jobject to_jobject(oop obj) { return JNIHandles::make_local(_thread,obj); }
168 #endif
170 jclass to_jclass(klassOop klass) { return (klass == NULL ? NULL : (jclass)to_jobject(Klass::cast(klass)->java_mirror())); }
172 jmethodID to_jmethodID(methodHandle method) { return method->jmethod_id(); }
174 JNIEnv* jni_env() { return _jni_env; }
175 };
177 class JvmtiThreadEventMark : public JvmtiEventMark {
178 private:
179 jthread _jt;
181 public:
182 JvmtiThreadEventMark(JavaThread *thread) :
183 JvmtiEventMark(thread) {
184 _jt = (jthread)(to_jobject(thread->threadObj()));
185 };
186 jthread jni_thread() { return _jt; }
187 };
189 class JvmtiClassEventMark : public JvmtiThreadEventMark {
190 private:
191 jclass _jc;
193 public:
194 JvmtiClassEventMark(JavaThread *thread, klassOop klass) :
195 JvmtiThreadEventMark(thread) {
196 _jc = to_jclass(klass);
197 };
198 jclass jni_class() { return _jc; }
199 };
201 class JvmtiMethodEventMark : public JvmtiThreadEventMark {
202 private:
203 jmethodID _mid;
205 public:
206 JvmtiMethodEventMark(JavaThread *thread, methodHandle method) :
207 JvmtiThreadEventMark(thread),
208 _mid(to_jmethodID(method)) {};
209 jmethodID jni_methodID() { return _mid; }
210 };
212 class JvmtiLocationEventMark : public JvmtiMethodEventMark {
213 private:
214 jlocation _loc;
216 public:
217 JvmtiLocationEventMark(JavaThread *thread, methodHandle method, address location) :
218 JvmtiMethodEventMark(thread, method),
219 _loc(location - method->code_base()) {};
220 jlocation location() { return _loc; }
221 };
223 class JvmtiExceptionEventMark : public JvmtiLocationEventMark {
224 private:
225 jobject _exc;
227 public:
228 JvmtiExceptionEventMark(JavaThread *thread, methodHandle method, address location, Handle exception) :
229 JvmtiLocationEventMark(thread, method, location),
230 _exc(to_jobject(exception())) {};
231 jobject exception() { return _exc; }
232 };
234 class JvmtiClassFileLoadEventMark : public JvmtiThreadEventMark {
235 private:
236 const char *_class_name;
237 jobject _jloader;
238 jobject _protection_domain;
239 jclass _class_being_redefined;
241 public:
242 JvmtiClassFileLoadEventMark(JavaThread *thread, symbolHandle name,
243 Handle class_loader, Handle prot_domain, KlassHandle *class_being_redefined) : JvmtiThreadEventMark(thread) {
244 _class_name = name() != NULL? name->as_utf8() : NULL;
245 _jloader = (jobject)to_jobject(class_loader());
246 _protection_domain = (jobject)to_jobject(prot_domain());
247 if (class_being_redefined == NULL) {
248 _class_being_redefined = NULL;
249 } else {
250 _class_being_redefined = (jclass)to_jclass((*class_being_redefined)());
251 }
252 };
253 const char *class_name() {
254 return _class_name;
255 }
256 jobject jloader() {
257 return _jloader;
258 }
259 jobject protection_domain() {
260 return _protection_domain;
261 }
262 jclass class_being_redefined() {
263 return _class_being_redefined;
264 }
265 };
267 //////////////////////////////////////////////////////////////////////////////
269 int JvmtiExport::_field_access_count = 0;
270 int JvmtiExport::_field_modification_count = 0;
272 bool JvmtiExport::_can_access_local_variables = false;
273 bool JvmtiExport::_can_examine_or_deopt_anywhere = false;
274 bool JvmtiExport::_can_hotswap_or_post_breakpoint = false;
275 bool JvmtiExport::_can_modify_any_class = false;
276 bool JvmtiExport::_can_walk_any_space = false;
278 bool JvmtiExport::_has_redefined_a_class = false;
279 bool JvmtiExport::_all_dependencies_are_recorded = false;
281 //
282 // field access management
283 //
285 // interpreter generator needs the address of the counter
286 address JvmtiExport::get_field_access_count_addr() {
287 // We don't grab a lock because we don't want to
288 // serialize field access between all threads. This means that a
289 // thread on another processor can see the wrong count value and
290 // may either miss making a needed call into post_field_access()
291 // or will make an unneeded call into post_field_access(). We pay
292 // this price to avoid slowing down the VM when we aren't watching
293 // field accesses.
294 // Other access/mutation safe by virtue of being in VM state.
295 return (address)(&_field_access_count);
296 }
298 //
299 // field modification management
300 //
302 // interpreter generator needs the address of the counter
303 address JvmtiExport::get_field_modification_count_addr() {
304 // We don't grab a lock because we don't
305 // want to serialize field modification between all threads. This
306 // means that a thread on another processor can see the wrong
307 // count value and may either miss making a needed call into
308 // post_field_modification() or will make an unneeded call into
309 // post_field_modification(). We pay this price to avoid slowing
310 // down the VM when we aren't watching field modifications.
311 // Other access/mutation safe by virtue of being in VM state.
312 return (address)(&_field_modification_count);
313 }
316 ///////////////////////////////////////////////////////////////
317 // Functions needed by java.lang.instrument for starting up javaagent.
318 ///////////////////////////////////////////////////////////////
320 jint
321 JvmtiExport::get_jvmti_interface(JavaVM *jvm, void **penv, jint version) {
322 // The JVMTI_VERSION_INTERFACE_JVMTI part of the version number
323 // has already been validated in JNI GetEnv().
324 int major, minor, micro;
326 // micro version doesn't matter here (yet?)
327 decode_version_values(version, &major, &minor, µ);
328 switch (major) {
329 case 1:
330 switch (minor) {
331 case 0: // version 1.0.<micro> is recognized
332 case 1: // version 1.1.<micro> is recognized
333 break;
335 default:
336 return JNI_EVERSION; // unsupported minor version number
337 }
338 break;
340 default:
341 return JNI_EVERSION; // unsupported major version number
342 }
344 if (JvmtiEnv::get_phase() == JVMTI_PHASE_LIVE) {
345 JavaThread* current_thread = (JavaThread*) ThreadLocalStorage::thread();
346 // transition code: native to VM
347 ThreadInVMfromNative __tiv(current_thread);
348 __ENTRY(jvmtiEnv*, JvmtiExport::get_jvmti_interface, current_thread)
349 debug_only(VMNativeEntryWrapper __vew;)
351 JvmtiEnv *jvmti_env = JvmtiEnv::create_a_jvmti(version);
352 *penv = jvmti_env->jvmti_external(); // actual type is jvmtiEnv* -- not to be confused with JvmtiEnv*
353 return JNI_OK;
355 } else if (JvmtiEnv::get_phase() == JVMTI_PHASE_ONLOAD) {
356 // not live, no thread to transition
357 JvmtiEnv *jvmti_env = JvmtiEnv::create_a_jvmti(version);
358 *penv = jvmti_env->jvmti_external(); // actual type is jvmtiEnv* -- not to be confused with JvmtiEnv*
359 return JNI_OK;
361 } else {
362 // Called at the wrong time
363 *penv = NULL;
364 return JNI_EDETACHED;
365 }
366 }
369 void
370 JvmtiExport::decode_version_values(jint version, int * major, int * minor,
371 int * micro) {
372 *major = (version & JVMTI_VERSION_MASK_MAJOR) >> JVMTI_VERSION_SHIFT_MAJOR;
373 *minor = (version & JVMTI_VERSION_MASK_MINOR) >> JVMTI_VERSION_SHIFT_MINOR;
374 *micro = (version & JVMTI_VERSION_MASK_MICRO) >> JVMTI_VERSION_SHIFT_MICRO;
375 }
377 void JvmtiExport::enter_primordial_phase() {
378 JvmtiEnvBase::set_phase(JVMTI_PHASE_PRIMORDIAL);
379 }
381 void JvmtiExport::enter_start_phase() {
382 JvmtiManageCapabilities::recompute_always_capabilities();
383 JvmtiEnvBase::set_phase(JVMTI_PHASE_START);
384 }
386 void JvmtiExport::enter_onload_phase() {
387 JvmtiEnvBase::set_phase(JVMTI_PHASE_ONLOAD);
388 }
390 void JvmtiExport::enter_live_phase() {
391 JvmtiEnvBase::set_phase(JVMTI_PHASE_LIVE);
392 }
394 //
395 // JVMTI events that the VM posts to the debugger and also startup agent
396 // and call the agent's premain() for java.lang.instrument.
397 //
399 void JvmtiExport::post_vm_start() {
400 EVT_TRIG_TRACE(JVMTI_EVENT_VM_START, ("JVMTI Trg VM start event triggered" ));
402 // can now enable some events
403 JvmtiEventController::vm_start();
405 JvmtiEnvIterator it;
406 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
407 if (env->is_enabled(JVMTI_EVENT_VM_START)) {
408 EVT_TRACE(JVMTI_EVENT_VM_START, ("JVMTI Evt VM start event sent" ));
410 JavaThread *thread = JavaThread::current();
411 JvmtiThreadEventMark jem(thread);
412 JvmtiJavaThreadEventTransition jet(thread);
413 jvmtiEventVMStart callback = env->callbacks()->VMStart;
414 if (callback != NULL) {
415 (*callback)(env->jvmti_external(), jem.jni_env());
416 }
417 }
418 }
419 }
422 void JvmtiExport::post_vm_initialized() {
423 EVT_TRIG_TRACE(JVMTI_EVENT_VM_INIT, ("JVMTI Trg VM init event triggered" ));
425 // can now enable events
426 JvmtiEventController::vm_init();
428 JvmtiEnvIterator it;
429 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
430 if (env->is_enabled(JVMTI_EVENT_VM_INIT)) {
431 EVT_TRACE(JVMTI_EVENT_VM_INIT, ("JVMTI Evt VM init event sent" ));
433 JavaThread *thread = JavaThread::current();
434 JvmtiThreadEventMark jem(thread);
435 JvmtiJavaThreadEventTransition jet(thread);
436 jvmtiEventVMInit callback = env->callbacks()->VMInit;
437 if (callback != NULL) {
438 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread());
439 }
440 }
441 }
442 }
445 void JvmtiExport::post_vm_death() {
446 EVT_TRIG_TRACE(JVMTI_EVENT_VM_DEATH, ("JVMTI Trg VM death event triggered" ));
448 JvmtiEnvIterator it;
449 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
450 if (env->is_enabled(JVMTI_EVENT_VM_DEATH)) {
451 EVT_TRACE(JVMTI_EVENT_VM_DEATH, ("JVMTI Evt VM death event sent" ));
453 JavaThread *thread = JavaThread::current();
454 JvmtiEventMark jem(thread);
455 JvmtiJavaThreadEventTransition jet(thread);
456 jvmtiEventVMDeath callback = env->callbacks()->VMDeath;
457 if (callback != NULL) {
458 (*callback)(env->jvmti_external(), jem.jni_env());
459 }
460 }
461 }
463 JvmtiEnvBase::set_phase(JVMTI_PHASE_DEAD);
464 JvmtiEventController::vm_death();
465 }
467 char**
468 JvmtiExport::get_all_native_method_prefixes(int* count_ptr) {
469 // Have to grab JVMTI thread state lock to be sure environment doesn't
470 // go away while we iterate them. No locks during VM bring-up.
471 if (Threads::number_of_threads() == 0 || SafepointSynchronize::is_at_safepoint()) {
472 return JvmtiEnvBase::get_all_native_method_prefixes(count_ptr);
473 } else {
474 MutexLocker mu(JvmtiThreadState_lock);
475 return JvmtiEnvBase::get_all_native_method_prefixes(count_ptr);
476 }
477 }
479 class JvmtiClassFileLoadHookPoster : public StackObj {
480 private:
481 symbolHandle _h_name;
482 Handle _class_loader;
483 Handle _h_protection_domain;
484 unsigned char ** _data_ptr;
485 unsigned char ** _end_ptr;
486 JavaThread * _thread;
487 jint _curr_len;
488 unsigned char * _curr_data;
489 JvmtiEnv * _curr_env;
490 jint * _cached_length_ptr;
491 unsigned char ** _cached_data_ptr;
492 JvmtiThreadState * _state;
493 KlassHandle * _h_class_being_redefined;
494 JvmtiClassLoadKind _load_kind;
496 public:
497 inline JvmtiClassFileLoadHookPoster(symbolHandle h_name, Handle class_loader,
498 Handle h_protection_domain,
499 unsigned char **data_ptr, unsigned char **end_ptr,
500 unsigned char **cached_data_ptr,
501 jint *cached_length_ptr) {
502 _h_name = h_name;
503 _class_loader = class_loader;
504 _h_protection_domain = h_protection_domain;
505 _data_ptr = data_ptr;
506 _end_ptr = end_ptr;
507 _thread = JavaThread::current();
508 _curr_len = *end_ptr - *data_ptr;
509 _curr_data = *data_ptr;
510 _curr_env = NULL;
511 _cached_length_ptr = cached_length_ptr;
512 _cached_data_ptr = cached_data_ptr;
513 *_cached_length_ptr = 0;
514 *_cached_data_ptr = NULL;
516 _state = _thread->jvmti_thread_state();
517 if (_state != NULL) {
518 _h_class_being_redefined = _state->get_class_being_redefined();
519 _load_kind = _state->get_class_load_kind();
520 // Clear class_being_redefined flag here. The action
521 // from agent handler could generate a new class file load
522 // hook event and if it is not cleared the new event generated
523 // from regular class file load could have this stale redefined
524 // class handle info.
525 _state->clear_class_being_redefined();
526 } else {
527 // redefine and retransform will always set the thread state
528 _h_class_being_redefined = (KlassHandle *) NULL;
529 _load_kind = jvmti_class_load_kind_load;
530 }
531 }
533 void post() {
534 // EVT_TRIG_TRACE(JVMTI_EVENT_CLASS_FILE_LOAD_HOOK,
535 // ("JVMTI [%s] class file load hook event triggered",
536 // JvmtiTrace::safe_get_thread_name(_thread)));
537 post_all_envs();
538 copy_modified_data();
539 }
541 private:
542 void post_all_envs() {
543 if (_load_kind != jvmti_class_load_kind_retransform) {
544 // for class load and redefine,
545 // call the non-retransformable agents
546 JvmtiEnvIterator it;
547 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
548 if (!env->is_retransformable() && env->is_enabled(JVMTI_EVENT_CLASS_FILE_LOAD_HOOK)) {
549 // non-retransformable agents cannot retransform back,
550 // so no need to cache the original class file bytes
551 post_to_env(env, false);
552 }
553 }
554 }
555 JvmtiEnvIterator it;
556 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
557 // retransformable agents get all events
558 if (env->is_retransformable() && env->is_enabled(JVMTI_EVENT_CLASS_FILE_LOAD_HOOK)) {
559 // retransformable agents need to cache the original class file
560 // bytes if changes are made via the ClassFileLoadHook
561 post_to_env(env, true);
562 }
563 }
564 }
566 void post_to_env(JvmtiEnv* env, bool caching_needed) {
567 unsigned char *new_data = NULL;
568 jint new_len = 0;
569 // EVT_TRACE(JVMTI_EVENT_CLASS_FILE_LOAD_HOOK,
570 // ("JVMTI [%s] class file load hook event sent %s data_ptr = %d, data_len = %d",
571 // JvmtiTrace::safe_get_thread_name(_thread),
572 // _h_name.is_null() ? "NULL" : _h_name->as_utf8(),
573 // _curr_data, _curr_len ));
574 JvmtiClassFileLoadEventMark jem(_thread, _h_name, _class_loader,
575 _h_protection_domain,
576 _h_class_being_redefined);
577 JvmtiJavaThreadEventTransition jet(_thread);
578 JNIEnv* jni_env = (JvmtiEnv::get_phase() == JVMTI_PHASE_PRIMORDIAL)?
579 NULL : jem.jni_env();
580 jvmtiEventClassFileLoadHook callback = env->callbacks()->ClassFileLoadHook;
581 if (callback != NULL) {
582 (*callback)(env->jvmti_external(), jni_env,
583 jem.class_being_redefined(),
584 jem.jloader(), jem.class_name(),
585 jem.protection_domain(),
586 _curr_len, _curr_data,
587 &new_len, &new_data);
588 }
589 if (new_data != NULL) {
590 // this agent has modified class data.
591 if (caching_needed && *_cached_data_ptr == NULL) {
592 // data has been changed by the new retransformable agent
593 // and it hasn't already been cached, cache it
594 *_cached_data_ptr = (unsigned char *)os::malloc(_curr_len);
595 memcpy(*_cached_data_ptr, _curr_data, _curr_len);
596 *_cached_length_ptr = _curr_len;
597 }
599 if (_curr_data != *_data_ptr) {
600 // curr_data is previous agent modified class data.
601 // And this has been changed by the new agent so
602 // we can delete it now.
603 _curr_env->Deallocate(_curr_data);
604 }
606 // Class file data has changed by the current agent.
607 _curr_data = new_data;
608 _curr_len = new_len;
609 // Save the current agent env we need this to deallocate the
610 // memory allocated by this agent.
611 _curr_env = env;
612 }
613 }
615 void copy_modified_data() {
616 // if one of the agent has modified class file data.
617 // Copy modified class data to new resources array.
618 if (_curr_data != *_data_ptr) {
619 *_data_ptr = NEW_RESOURCE_ARRAY(u1, _curr_len);
620 memcpy(*_data_ptr, _curr_data, _curr_len);
621 *_end_ptr = *_data_ptr + _curr_len;
622 _curr_env->Deallocate(_curr_data);
623 }
624 }
625 };
627 bool JvmtiExport::_should_post_class_file_load_hook = false;
629 // this entry is for class file load hook on class load, redefine and retransform
630 void JvmtiExport::post_class_file_load_hook(symbolHandle h_name,
631 Handle class_loader,
632 Handle h_protection_domain,
633 unsigned char **data_ptr,
634 unsigned char **end_ptr,
635 unsigned char **cached_data_ptr,
636 jint *cached_length_ptr) {
637 JvmtiClassFileLoadHookPoster poster(h_name, class_loader,
638 h_protection_domain,
639 data_ptr, end_ptr,
640 cached_data_ptr,
641 cached_length_ptr);
642 poster.post();
643 }
645 void JvmtiExport::report_unsupported(bool on) {
646 // If any JVMTI service is turned on, we need to exit before native code
647 // tries to access nonexistant services.
648 if (on) {
649 vm_exit_during_initialization("Java Kernel does not support JVMTI.");
650 }
651 }
654 #ifndef JVMTI_KERNEL
655 static inline klassOop oop_to_klassOop(oop obj) {
656 klassOop k = obj->klass();
658 // if the object is a java.lang.Class then return the java mirror
659 if (k == SystemDictionary::Class_klass()) {
660 if (!java_lang_Class::is_primitive(obj)) {
661 k = java_lang_Class::as_klassOop(obj);
662 assert(k != NULL, "class for non-primitive mirror must exist");
663 }
664 }
665 return k;
666 }
668 class JvmtiVMObjectAllocEventMark : public JvmtiClassEventMark {
669 private:
670 jobject _jobj;
671 jlong _size;
672 public:
673 JvmtiVMObjectAllocEventMark(JavaThread *thread, oop obj) : JvmtiClassEventMark(thread, oop_to_klassOop(obj)) {
674 _jobj = (jobject)to_jobject(obj);
675 _size = obj->size() * wordSize;
676 };
677 jobject jni_jobject() { return _jobj; }
678 jlong size() { return _size; }
679 };
681 class JvmtiCompiledMethodLoadEventMark : public JvmtiMethodEventMark {
682 private:
683 jint _code_size;
684 const void *_code_data;
685 jint _map_length;
686 jvmtiAddrLocationMap *_map;
687 const void *_compile_info;
688 public:
689 JvmtiCompiledMethodLoadEventMark(JavaThread *thread, nmethod *nm, void* compile_info_ptr = NULL)
690 : JvmtiMethodEventMark(thread,methodHandle(thread, nm->method())) {
691 _code_data = nm->code_begin();
692 _code_size = nm->code_size();
693 _compile_info = compile_info_ptr; // Set void pointer of compiledMethodLoad Event. Default value is NULL.
694 JvmtiCodeBlobEvents::build_jvmti_addr_location_map(nm, &_map, &_map_length);
695 }
696 ~JvmtiCompiledMethodLoadEventMark() {
697 FREE_C_HEAP_ARRAY(jvmtiAddrLocationMap, _map);
698 }
700 jint code_size() { return _code_size; }
701 const void *code_data() { return _code_data; }
702 jint map_length() { return _map_length; }
703 const jvmtiAddrLocationMap* map() { return _map; }
704 const void *compile_info() { return _compile_info; }
705 };
709 class JvmtiMonitorEventMark : public JvmtiThreadEventMark {
710 private:
711 jobject _jobj;
712 public:
713 JvmtiMonitorEventMark(JavaThread *thread, oop object)
714 : JvmtiThreadEventMark(thread){
715 _jobj = to_jobject(object);
716 }
717 jobject jni_object() { return _jobj; }
718 };
720 ///////////////////////////////////////////////////////////////
721 //
722 // pending CompiledMethodUnload support
723 //
725 bool JvmtiExport::_have_pending_compiled_method_unload_events;
726 GrowableArray<jmethodID>* JvmtiExport::_pending_compiled_method_unload_method_ids;
727 GrowableArray<const void *>* JvmtiExport::_pending_compiled_method_unload_code_begins;
728 JavaThread* JvmtiExport::_current_poster;
730 // post any pending CompiledMethodUnload events
732 void JvmtiExport::post_pending_compiled_method_unload_events() {
733 JavaThread* self = JavaThread::current();
734 assert(!self->owns_locks(), "can't hold locks");
736 // Indicates if this is the first activiation of this function.
737 // In theory the profiler's callback could call back into VM and provoke
738 // another CompiledMethodLoad event to be posted from this thread. As the
739 // stack rewinds we need to ensure that the original activation does the
740 // completion and notifies any waiters.
741 bool first_activation = false;
743 // the jmethodID (may not be valid) to be used for a single event
744 jmethodID method;
745 const void *code_begin;
747 // grab the monitor and check if another thread is already posting
748 // events. If there is another thread posting events then we wait
749 // until it completes. (In theory we could check the pending events to
750 // see if any of the addresses overlap with the event that we want to
751 // post but as it will happen so rarely we just block any thread waiting
752 // to post a CompiledMethodLoad or DynamicCodeGenerated event until all
753 // pending CompiledMethodUnload events have been posted).
754 //
755 // If another thread isn't posting we examine the list of pending jmethodIDs.
756 // If the list is empty then we are done. If it's not empty then this thread
757 // (self) becomes the pending event poster and we remove the top (last)
758 // event from the list. Note that this means we remove the newest event first
759 // but as they are all CompiledMethodUnload events the order doesn't matter.
760 // Once we have removed a jmethodID then we exit the monitor. Any other thread
761 // wanting to post a CompiledMethodLoad or DynamicCodeGenerated event will
762 // be forced to wait on the monitor.
763 {
764 MutexLocker mu(JvmtiPendingEvent_lock);
765 if (_current_poster != self) {
766 while (_current_poster != NULL) {
767 JvmtiPendingEvent_lock->wait();
768 }
769 }
770 if ((_pending_compiled_method_unload_method_ids == NULL) ||
771 (_pending_compiled_method_unload_method_ids->length() == 0)) {
772 return;
773 }
774 if (_current_poster == NULL) {
775 _current_poster = self;
776 first_activation = true;
777 } else {
778 // re-entrant
779 guarantee(_current_poster == self, "checking");
780 }
781 method = _pending_compiled_method_unload_method_ids->pop();
782 code_begin = _pending_compiled_method_unload_code_begins->pop();
783 }
785 // This thread is the pending event poster so it first posts the CompiledMethodUnload
786 // event for the jmethodID that has been removed from the list. Once posted it
787 // re-grabs the monitor and checks the list again. If the list is empty then and this
788 // is the first activation of the function then we reset the _have_pending_events
789 // flag, cleanup _current_poster to indicate that no thread is now servicing the
790 // pending events list, and finally notify any thread that might be waiting.
791 for (;;) {
792 EVT_TRIG_TRACE(JVMTI_EVENT_COMPILED_METHOD_UNLOAD,
793 ("JVMTI [%s] method compile unload event triggered",
794 JvmtiTrace::safe_get_thread_name(self)));
796 // post the event for each environment that has this event enabled.
797 JvmtiEnvIterator it;
798 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
799 if (env->is_enabled(JVMTI_EVENT_COMPILED_METHOD_UNLOAD)) {
800 EVT_TRACE(JVMTI_EVENT_COMPILED_METHOD_UNLOAD,
801 ("JVMTI [%s] class compile method unload event sent jmethodID " PTR_FORMAT,
802 JvmtiTrace::safe_get_thread_name(self), method));
804 JvmtiEventMark jem(self);
805 JvmtiJavaThreadEventTransition jet(self);
806 jvmtiEventCompiledMethodUnload callback = env->callbacks()->CompiledMethodUnload;
807 if (callback != NULL) {
808 (*callback)(env->jvmti_external(), method, code_begin);
809 }
810 }
811 }
813 // event posted, now re-grab monitor and get the next event
814 // If there's no next event then we are done. If this is the first
815 // activiation of this function by this thread notify any waiters
816 // so that they can post.
817 {
818 MutexLocker ml(JvmtiPendingEvent_lock);
819 if (_pending_compiled_method_unload_method_ids->length() == 0) {
820 if (first_activation) {
821 _have_pending_compiled_method_unload_events = false;
822 _current_poster = NULL;
823 JvmtiPendingEvent_lock->notify_all();
824 }
825 return;
826 }
827 method = _pending_compiled_method_unload_method_ids->pop();
828 code_begin = _pending_compiled_method_unload_code_begins->pop();
829 }
830 }
831 }
833 ///////////////////////////////////////////////////////////////
834 //
835 // JvmtiExport
836 //
838 void JvmtiExport::post_raw_breakpoint(JavaThread *thread, methodOop method, address location) {
839 HandleMark hm(thread);
840 methodHandle mh(thread, method);
842 JvmtiThreadState *state = thread->jvmti_thread_state();
843 if (state == NULL) {
844 return;
845 }
846 EVT_TRIG_TRACE(JVMTI_EVENT_BREAKPOINT, ("JVMTI [%s] Trg Breakpoint triggered",
847 JvmtiTrace::safe_get_thread_name(thread)));
848 JvmtiEnvThreadStateIterator it(state);
849 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
850 ets->compare_and_set_current_location(mh(), location, JVMTI_EVENT_BREAKPOINT);
851 if (!ets->breakpoint_posted() && ets->is_enabled(JVMTI_EVENT_BREAKPOINT)) {
852 ThreadState old_os_state = thread->osthread()->get_state();
853 thread->osthread()->set_state(BREAKPOINTED);
854 EVT_TRACE(JVMTI_EVENT_BREAKPOINT, ("JVMTI [%s] Evt Breakpoint sent %s.%s @ %d",
855 JvmtiTrace::safe_get_thread_name(thread),
856 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
857 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
858 location - mh()->code_base() ));
860 JvmtiEnv *env = ets->get_env();
861 JvmtiLocationEventMark jem(thread, mh, location);
862 JvmtiJavaThreadEventTransition jet(thread);
863 jvmtiEventBreakpoint callback = env->callbacks()->Breakpoint;
864 if (callback != NULL) {
865 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
866 jem.jni_methodID(), jem.location());
867 }
869 ets->set_breakpoint_posted();
870 thread->osthread()->set_state(old_os_state);
871 }
872 }
873 }
875 //////////////////////////////////////////////////////////////////////////////
877 bool JvmtiExport::_can_get_source_debug_extension = false;
878 bool JvmtiExport::_can_maintain_original_method_order = false;
879 bool JvmtiExport::_can_post_interpreter_events = false;
880 bool JvmtiExport::_can_post_on_exceptions = false;
881 bool JvmtiExport::_can_post_breakpoint = false;
882 bool JvmtiExport::_can_post_field_access = false;
883 bool JvmtiExport::_can_post_field_modification = false;
884 bool JvmtiExport::_can_post_method_entry = false;
885 bool JvmtiExport::_can_post_method_exit = false;
886 bool JvmtiExport::_can_pop_frame = false;
887 bool JvmtiExport::_can_force_early_return = false;
889 bool JvmtiExport::_should_post_single_step = false;
890 bool JvmtiExport::_should_post_field_access = false;
891 bool JvmtiExport::_should_post_field_modification = false;
892 bool JvmtiExport::_should_post_class_load = false;
893 bool JvmtiExport::_should_post_class_prepare = false;
894 bool JvmtiExport::_should_post_class_unload = false;
895 bool JvmtiExport::_should_post_thread_life = false;
896 bool JvmtiExport::_should_clean_up_heap_objects = false;
897 bool JvmtiExport::_should_post_native_method_bind = false;
898 bool JvmtiExport::_should_post_dynamic_code_generated = false;
899 bool JvmtiExport::_should_post_data_dump = false;
900 bool JvmtiExport::_should_post_compiled_method_load = false;
901 bool JvmtiExport::_should_post_compiled_method_unload = false;
902 bool JvmtiExport::_should_post_monitor_contended_enter = false;
903 bool JvmtiExport::_should_post_monitor_contended_entered = false;
904 bool JvmtiExport::_should_post_monitor_wait = false;
905 bool JvmtiExport::_should_post_monitor_waited = false;
906 bool JvmtiExport::_should_post_garbage_collection_start = false;
907 bool JvmtiExport::_should_post_garbage_collection_finish = false;
908 bool JvmtiExport::_should_post_object_free = false;
909 bool JvmtiExport::_should_post_resource_exhausted = false;
910 bool JvmtiExport::_should_post_vm_object_alloc = false;
911 bool JvmtiExport::_should_post_on_exceptions = false;
913 ////////////////////////////////////////////////////////////////////////////////////////////////
916 //
917 // JVMTI single step management
918 //
919 void JvmtiExport::at_single_stepping_point(JavaThread *thread, methodOop method, address location) {
920 assert(JvmtiExport::should_post_single_step(), "must be single stepping");
922 HandleMark hm(thread);
923 methodHandle mh(thread, method);
925 // update information about current location and post a step event
926 JvmtiThreadState *state = thread->jvmti_thread_state();
927 if (state == NULL) {
928 return;
929 }
930 EVT_TRIG_TRACE(JVMTI_EVENT_SINGLE_STEP, ("JVMTI [%s] Trg Single Step triggered",
931 JvmtiTrace::safe_get_thread_name(thread)));
932 if (!state->hide_single_stepping()) {
933 if (state->is_pending_step_for_popframe()) {
934 state->process_pending_step_for_popframe();
935 }
936 if (state->is_pending_step_for_earlyret()) {
937 state->process_pending_step_for_earlyret();
938 }
939 JvmtiExport::post_single_step(thread, mh(), location);
940 }
941 }
944 void JvmtiExport::expose_single_stepping(JavaThread *thread) {
945 JvmtiThreadState *state = thread->jvmti_thread_state();
946 if (state != NULL) {
947 state->clear_hide_single_stepping();
948 }
949 }
952 bool JvmtiExport::hide_single_stepping(JavaThread *thread) {
953 JvmtiThreadState *state = thread->jvmti_thread_state();
954 if (state != NULL && state->is_enabled(JVMTI_EVENT_SINGLE_STEP)) {
955 state->set_hide_single_stepping();
956 return true;
957 } else {
958 return false;
959 }
960 }
962 void JvmtiExport::post_class_load(JavaThread *thread, klassOop klass) {
963 HandleMark hm(thread);
964 KlassHandle kh(thread, klass);
966 EVT_TRIG_TRACE(JVMTI_EVENT_CLASS_LOAD, ("JVMTI [%s] Trg Class Load triggered",
967 JvmtiTrace::safe_get_thread_name(thread)));
968 JvmtiThreadState* state = thread->jvmti_thread_state();
969 if (state == NULL) {
970 return;
971 }
972 JvmtiEnvThreadStateIterator it(state);
973 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
974 if (ets->is_enabled(JVMTI_EVENT_CLASS_LOAD)) {
975 EVT_TRACE(JVMTI_EVENT_CLASS_LOAD, ("JVMTI [%s] Evt Class Load sent %s",
976 JvmtiTrace::safe_get_thread_name(thread),
977 kh()==NULL? "NULL" : Klass::cast(kh())->external_name() ));
979 JvmtiEnv *env = ets->get_env();
980 JvmtiClassEventMark jem(thread, kh());
981 JvmtiJavaThreadEventTransition jet(thread);
982 jvmtiEventClassLoad callback = env->callbacks()->ClassLoad;
983 if (callback != NULL) {
984 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_class());
985 }
986 }
987 }
988 }
991 void JvmtiExport::post_class_prepare(JavaThread *thread, klassOop klass) {
992 HandleMark hm(thread);
993 KlassHandle kh(thread, klass);
995 EVT_TRIG_TRACE(JVMTI_EVENT_CLASS_PREPARE, ("JVMTI [%s] Trg Class Prepare triggered",
996 JvmtiTrace::safe_get_thread_name(thread)));
997 JvmtiThreadState* state = thread->jvmti_thread_state();
998 if (state == NULL) {
999 return;
1000 }
1001 JvmtiEnvThreadStateIterator it(state);
1002 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1003 if (ets->is_enabled(JVMTI_EVENT_CLASS_PREPARE)) {
1004 EVT_TRACE(JVMTI_EVENT_CLASS_PREPARE, ("JVMTI [%s] Evt Class Prepare sent %s",
1005 JvmtiTrace::safe_get_thread_name(thread),
1006 kh()==NULL? "NULL" : Klass::cast(kh())->external_name() ));
1008 JvmtiEnv *env = ets->get_env();
1009 JvmtiClassEventMark jem(thread, kh());
1010 JvmtiJavaThreadEventTransition jet(thread);
1011 jvmtiEventClassPrepare callback = env->callbacks()->ClassPrepare;
1012 if (callback != NULL) {
1013 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_class());
1014 }
1015 }
1016 }
1017 }
1019 void JvmtiExport::post_class_unload(klassOop klass) {
1020 Thread *thread = Thread::current();
1021 HandleMark hm(thread);
1022 KlassHandle kh(thread, klass);
1024 EVT_TRIG_TRACE(EXT_EVENT_CLASS_UNLOAD, ("JVMTI [?] Trg Class Unload triggered" ));
1025 if (JvmtiEventController::is_enabled((jvmtiEvent)EXT_EVENT_CLASS_UNLOAD)) {
1026 assert(thread->is_VM_thread(), "wrong thread");
1028 // get JavaThread for whom we are proxy
1029 JavaThread *real_thread =
1030 (JavaThread *)((VMThread *)thread)->vm_operation()->calling_thread();
1032 JvmtiEnvIterator it;
1033 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1034 if (env->is_enabled((jvmtiEvent)EXT_EVENT_CLASS_UNLOAD)) {
1035 EVT_TRACE(EXT_EVENT_CLASS_UNLOAD, ("JVMTI [?] Evt Class Unload sent %s",
1036 kh()==NULL? "NULL" : Klass::cast(kh())->external_name() ));
1038 // do everything manually, since this is a proxy - needs special care
1039 JNIEnv* jni_env = real_thread->jni_environment();
1040 jthread jt = (jthread)JNIHandles::make_local(real_thread, real_thread->threadObj());
1041 jclass jk = (jclass)JNIHandles::make_local(real_thread, Klass::cast(kh())->java_mirror());
1043 // Before we call the JVMTI agent, we have to set the state in the
1044 // thread for which we are proxying.
1045 JavaThreadState prev_state = real_thread->thread_state();
1046 assert(prev_state == _thread_blocked, "JavaThread should be at safepoint");
1047 real_thread->set_thread_state(_thread_in_native);
1049 jvmtiExtensionEvent callback = env->ext_callbacks()->ClassUnload;
1050 if (callback != NULL) {
1051 (*callback)(env->jvmti_external(), jni_env, jt, jk);
1052 }
1054 assert(real_thread->thread_state() == _thread_in_native,
1055 "JavaThread should be in native");
1056 real_thread->set_thread_state(prev_state);
1058 JNIHandles::destroy_local(jk);
1059 JNIHandles::destroy_local(jt);
1060 }
1061 }
1062 }
1063 }
1066 void JvmtiExport::post_thread_start(JavaThread *thread) {
1067 assert(thread->thread_state() == _thread_in_vm, "must be in vm state");
1069 EVT_TRIG_TRACE(JVMTI_EVENT_THREAD_START, ("JVMTI [%s] Trg Thread Start event triggered",
1070 JvmtiTrace::safe_get_thread_name(thread)));
1072 // do JVMTI thread initialization (if needed)
1073 JvmtiEventController::thread_started(thread);
1075 // Do not post thread start event for hidden java thread.
1076 if (JvmtiEventController::is_enabled(JVMTI_EVENT_THREAD_START) &&
1077 !thread->is_hidden_from_external_view()) {
1078 JvmtiEnvIterator it;
1079 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1080 if (env->is_enabled(JVMTI_EVENT_THREAD_START)) {
1081 EVT_TRACE(JVMTI_EVENT_THREAD_START, ("JVMTI [%s] Evt Thread Start event sent",
1082 JvmtiTrace::safe_get_thread_name(thread) ));
1084 JvmtiThreadEventMark jem(thread);
1085 JvmtiJavaThreadEventTransition jet(thread);
1086 jvmtiEventThreadStart callback = env->callbacks()->ThreadStart;
1087 if (callback != NULL) {
1088 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread());
1089 }
1090 }
1091 }
1092 }
1093 }
1096 void JvmtiExport::post_thread_end(JavaThread *thread) {
1097 EVT_TRIG_TRACE(JVMTI_EVENT_THREAD_END, ("JVMTI [%s] Trg Thread End event triggered",
1098 JvmtiTrace::safe_get_thread_name(thread)));
1100 JvmtiThreadState *state = thread->jvmti_thread_state();
1101 if (state == NULL) {
1102 return;
1103 }
1105 // Do not post thread end event for hidden java thread.
1106 if (state->is_enabled(JVMTI_EVENT_THREAD_END) &&
1107 !thread->is_hidden_from_external_view()) {
1109 JvmtiEnvThreadStateIterator it(state);
1110 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1111 if (ets->is_enabled(JVMTI_EVENT_THREAD_END)) {
1112 EVT_TRACE(JVMTI_EVENT_THREAD_END, ("JVMTI [%s] Evt Thread End event sent",
1113 JvmtiTrace::safe_get_thread_name(thread) ));
1115 JvmtiEnv *env = ets->get_env();
1116 JvmtiThreadEventMark jem(thread);
1117 JvmtiJavaThreadEventTransition jet(thread);
1118 jvmtiEventThreadEnd callback = env->callbacks()->ThreadEnd;
1119 if (callback != NULL) {
1120 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread());
1121 }
1122 }
1123 }
1124 }
1125 }
1127 void JvmtiExport::post_object_free(JvmtiEnv* env, jlong tag) {
1128 assert(SafepointSynchronize::is_at_safepoint(), "must be executed at safepoint");
1129 assert(env->is_enabled(JVMTI_EVENT_OBJECT_FREE), "checking");
1131 EVT_TRIG_TRACE(JVMTI_EVENT_OBJECT_FREE, ("JVMTI [?] Trg Object Free triggered" ));
1132 EVT_TRACE(JVMTI_EVENT_OBJECT_FREE, ("JVMTI [?] Evt Object Free sent"));
1134 jvmtiEventObjectFree callback = env->callbacks()->ObjectFree;
1135 if (callback != NULL) {
1136 (*callback)(env->jvmti_external(), tag);
1137 }
1138 }
1140 void JvmtiExport::post_resource_exhausted(jint resource_exhausted_flags, const char* description) {
1141 EVT_TRIG_TRACE(JVMTI_EVENT_RESOURCE_EXHAUSTED, ("JVMTI Trg resource exhausted event triggered" ));
1143 JvmtiEnvIterator it;
1144 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1145 if (env->is_enabled(JVMTI_EVENT_RESOURCE_EXHAUSTED)) {
1146 EVT_TRACE(JVMTI_EVENT_RESOURCE_EXHAUSTED, ("JVMTI Evt resource exhausted event sent" ));
1148 JavaThread *thread = JavaThread::current();
1149 JvmtiThreadEventMark jem(thread);
1150 JvmtiJavaThreadEventTransition jet(thread);
1151 jvmtiEventResourceExhausted callback = env->callbacks()->ResourceExhausted;
1152 if (callback != NULL) {
1153 (*callback)(env->jvmti_external(), jem.jni_env(),
1154 resource_exhausted_flags, NULL, description);
1155 }
1156 }
1157 }
1158 }
1160 void JvmtiExport::post_method_entry(JavaThread *thread, methodOop method, frame current_frame) {
1161 HandleMark hm(thread);
1162 methodHandle mh(thread, method);
1164 EVT_TRIG_TRACE(JVMTI_EVENT_METHOD_ENTRY, ("JVMTI [%s] Trg Method Entry triggered %s.%s",
1165 JvmtiTrace::safe_get_thread_name(thread),
1166 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1167 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1169 JvmtiThreadState* state = thread->jvmti_thread_state();
1170 if (state == NULL || !state->is_interp_only_mode()) {
1171 // for any thread that actually wants method entry, interp_only_mode is set
1172 return;
1173 }
1175 state->incr_cur_stack_depth();
1177 if (state->is_enabled(JVMTI_EVENT_METHOD_ENTRY)) {
1178 JvmtiEnvThreadStateIterator it(state);
1179 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1180 if (ets->is_enabled(JVMTI_EVENT_METHOD_ENTRY)) {
1181 EVT_TRACE(JVMTI_EVENT_METHOD_ENTRY, ("JVMTI [%s] Evt Method Entry sent %s.%s",
1182 JvmtiTrace::safe_get_thread_name(thread),
1183 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1184 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1186 JvmtiEnv *env = ets->get_env();
1187 JvmtiMethodEventMark jem(thread, mh);
1188 JvmtiJavaThreadEventTransition jet(thread);
1189 jvmtiEventMethodEntry callback = env->callbacks()->MethodEntry;
1190 if (callback != NULL) {
1191 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_methodID());
1192 }
1193 }
1194 }
1195 }
1196 }
1198 void JvmtiExport::post_method_exit(JavaThread *thread, methodOop method, frame current_frame) {
1199 HandleMark hm(thread);
1200 methodHandle mh(thread, method);
1202 EVT_TRIG_TRACE(JVMTI_EVENT_METHOD_EXIT, ("JVMTI [%s] Trg Method Exit triggered %s.%s",
1203 JvmtiTrace::safe_get_thread_name(thread),
1204 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1205 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1207 JvmtiThreadState *state = thread->jvmti_thread_state();
1208 if (state == NULL || !state->is_interp_only_mode()) {
1209 // for any thread that actually wants method exit, interp_only_mode is set
1210 return;
1211 }
1213 // return a flag when a method terminates by throwing an exception
1214 // i.e. if an exception is thrown and it's not caught by the current method
1215 bool exception_exit = state->is_exception_detected() && !state->is_exception_caught();
1218 if (state->is_enabled(JVMTI_EVENT_METHOD_EXIT)) {
1219 Handle result;
1220 jvalue value;
1221 value.j = 0L;
1223 // if the method hasn't been popped because of an exception then we populate
1224 // the return_value parameter for the callback. At this point we only have
1225 // the address of a "raw result" and we just call into the interpreter to
1226 // convert this into a jvalue.
1227 if (!exception_exit) {
1228 oop oop_result;
1229 BasicType type = current_frame.interpreter_frame_result(&oop_result, &value);
1230 if (type == T_OBJECT || type == T_ARRAY) {
1231 result = Handle(thread, oop_result);
1232 }
1233 }
1235 JvmtiEnvThreadStateIterator it(state);
1236 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1237 if (ets->is_enabled(JVMTI_EVENT_METHOD_EXIT)) {
1238 EVT_TRACE(JVMTI_EVENT_METHOD_EXIT, ("JVMTI [%s] Evt Method Exit sent %s.%s",
1239 JvmtiTrace::safe_get_thread_name(thread),
1240 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1241 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1243 JvmtiEnv *env = ets->get_env();
1244 JvmtiMethodEventMark jem(thread, mh);
1245 if (result.not_null()) {
1246 value.l = JNIHandles::make_local(thread, result());
1247 }
1248 JvmtiJavaThreadEventTransition jet(thread);
1249 jvmtiEventMethodExit callback = env->callbacks()->MethodExit;
1250 if (callback != NULL) {
1251 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1252 jem.jni_methodID(), exception_exit, value);
1253 }
1254 }
1255 }
1256 }
1258 if (state->is_enabled(JVMTI_EVENT_FRAME_POP)) {
1259 JvmtiEnvThreadStateIterator it(state);
1260 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1261 int cur_frame_number = state->cur_stack_depth();
1263 if (ets->is_frame_pop(cur_frame_number)) {
1264 // we have a NotifyFramePop entry for this frame.
1265 // now check that this env/thread wants this event
1266 if (ets->is_enabled(JVMTI_EVENT_FRAME_POP)) {
1267 EVT_TRACE(JVMTI_EVENT_FRAME_POP, ("JVMTI [%s] Evt Frame Pop sent %s.%s",
1268 JvmtiTrace::safe_get_thread_name(thread),
1269 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1270 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1272 // we also need to issue a frame pop event for this frame
1273 JvmtiEnv *env = ets->get_env();
1274 JvmtiMethodEventMark jem(thread, mh);
1275 JvmtiJavaThreadEventTransition jet(thread);
1276 jvmtiEventFramePop callback = env->callbacks()->FramePop;
1277 if (callback != NULL) {
1278 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1279 jem.jni_methodID(), exception_exit);
1280 }
1281 }
1282 // remove the frame's entry
1283 ets->clear_frame_pop(cur_frame_number);
1284 }
1285 }
1286 }
1288 state->decr_cur_stack_depth();
1289 }
1292 // Todo: inline this for optimization
1293 void JvmtiExport::post_single_step(JavaThread *thread, methodOop method, address location) {
1294 HandleMark hm(thread);
1295 methodHandle mh(thread, method);
1297 JvmtiThreadState *state = thread->jvmti_thread_state();
1298 if (state == NULL) {
1299 return;
1300 }
1301 JvmtiEnvThreadStateIterator it(state);
1302 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1303 ets->compare_and_set_current_location(mh(), location, JVMTI_EVENT_SINGLE_STEP);
1304 if (!ets->single_stepping_posted() && ets->is_enabled(JVMTI_EVENT_SINGLE_STEP)) {
1305 EVT_TRACE(JVMTI_EVENT_SINGLE_STEP, ("JVMTI [%s] Evt Single Step sent %s.%s @ %d",
1306 JvmtiTrace::safe_get_thread_name(thread),
1307 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1308 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1309 location - mh()->code_base() ));
1311 JvmtiEnv *env = ets->get_env();
1312 JvmtiLocationEventMark jem(thread, mh, location);
1313 JvmtiJavaThreadEventTransition jet(thread);
1314 jvmtiEventSingleStep callback = env->callbacks()->SingleStep;
1315 if (callback != NULL) {
1316 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1317 jem.jni_methodID(), jem.location());
1318 }
1320 ets->set_single_stepping_posted();
1321 }
1322 }
1323 }
1326 void JvmtiExport::post_exception_throw(JavaThread *thread, methodOop method, address location, oop exception) {
1327 HandleMark hm(thread);
1328 methodHandle mh(thread, method);
1329 Handle exception_handle(thread, exception);
1331 JvmtiThreadState *state = thread->jvmti_thread_state();
1332 if (state == NULL) {
1333 return;
1334 }
1336 EVT_TRIG_TRACE(JVMTI_EVENT_EXCEPTION, ("JVMTI [%s] Trg Exception thrown triggered",
1337 JvmtiTrace::safe_get_thread_name(thread)));
1338 if (!state->is_exception_detected()) {
1339 state->set_exception_detected();
1340 JvmtiEnvThreadStateIterator it(state);
1341 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1342 if (ets->is_enabled(JVMTI_EVENT_EXCEPTION) && (exception != NULL)) {
1344 EVT_TRACE(JVMTI_EVENT_EXCEPTION,
1345 ("JVMTI [%s] Evt Exception thrown sent %s.%s @ %d",
1346 JvmtiTrace::safe_get_thread_name(thread),
1347 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1348 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1349 location - mh()->code_base() ));
1351 JvmtiEnv *env = ets->get_env();
1352 JvmtiExceptionEventMark jem(thread, mh, location, exception_handle);
1354 // It's okay to clear these exceptions here because we duplicate
1355 // this lookup in InterpreterRuntime::exception_handler_for_exception.
1356 EXCEPTION_MARK;
1358 bool should_repeat;
1359 vframeStream st(thread);
1360 assert(!st.at_end(), "cannot be at end");
1361 methodOop current_method = NULL;
1362 int current_bci = -1;
1363 do {
1364 current_method = st.method();
1365 current_bci = st.bci();
1366 do {
1367 should_repeat = false;
1368 KlassHandle eh_klass(thread, exception_handle()->klass());
1369 current_bci = current_method->fast_exception_handler_bci_for(
1370 eh_klass, current_bci, THREAD);
1371 if (HAS_PENDING_EXCEPTION) {
1372 exception_handle = KlassHandle(thread, PENDING_EXCEPTION);
1373 CLEAR_PENDING_EXCEPTION;
1374 should_repeat = true;
1375 }
1376 } while (should_repeat && (current_bci != -1));
1377 st.next();
1378 } while ((current_bci < 0) && (!st.at_end()));
1380 jmethodID catch_jmethodID;
1381 if (current_bci < 0) {
1382 catch_jmethodID = 0;
1383 current_bci = 0;
1384 } else {
1385 catch_jmethodID = jem.to_jmethodID(
1386 methodHandle(thread, current_method));
1387 }
1389 JvmtiJavaThreadEventTransition jet(thread);
1390 jvmtiEventException callback = env->callbacks()->Exception;
1391 if (callback != NULL) {
1392 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1393 jem.jni_methodID(), jem.location(),
1394 jem.exception(),
1395 catch_jmethodID, current_bci);
1396 }
1397 }
1398 }
1399 }
1401 // frames may get popped because of this throw, be safe - invalidate cached depth
1402 state->invalidate_cur_stack_depth();
1403 }
1406 void JvmtiExport::notice_unwind_due_to_exception(JavaThread *thread, methodOop method, address location, oop exception, bool in_handler_frame) {
1407 HandleMark hm(thread);
1408 methodHandle mh(thread, method);
1409 Handle exception_handle(thread, exception);
1411 JvmtiThreadState *state = thread->jvmti_thread_state();
1412 if (state == NULL) {
1413 return;
1414 }
1415 EVT_TRIG_TRACE(JVMTI_EVENT_EXCEPTION_CATCH,
1416 ("JVMTI [%s] Trg unwind_due_to_exception triggered %s.%s @ %s%d - %s",
1417 JvmtiTrace::safe_get_thread_name(thread),
1418 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1419 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1420 location==0? "no location:" : "",
1421 location==0? 0 : location - mh()->code_base(),
1422 in_handler_frame? "in handler frame" : "not handler frame" ));
1424 if (state->is_exception_detected()) {
1426 state->invalidate_cur_stack_depth();
1427 if (!in_handler_frame) {
1428 // Not in exception handler.
1429 if(state->is_interp_only_mode()) {
1430 // method exit and frame pop events are posted only in interp mode.
1431 // When these events are enabled code should be in running in interp mode.
1432 JvmtiExport::post_method_exit(thread, method, thread->last_frame());
1433 // The cached cur_stack_depth might have changed from the
1434 // operations of frame pop or method exit. We are not 100% sure
1435 // the cached cur_stack_depth is still valid depth so invalidate
1436 // it.
1437 state->invalidate_cur_stack_depth();
1438 }
1439 } else {
1440 // In exception handler frame. Report exception catch.
1441 assert(location != NULL, "must be a known location");
1442 // Update cur_stack_depth - the frames above the current frame
1443 // have been unwound due to this exception:
1444 assert(!state->is_exception_caught(), "exception must not be caught yet.");
1445 state->set_exception_caught();
1447 JvmtiEnvThreadStateIterator it(state);
1448 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1449 if (ets->is_enabled(JVMTI_EVENT_EXCEPTION_CATCH) && (exception_handle() != NULL)) {
1450 EVT_TRACE(JVMTI_EVENT_EXCEPTION_CATCH,
1451 ("JVMTI [%s] Evt ExceptionCatch sent %s.%s @ %d",
1452 JvmtiTrace::safe_get_thread_name(thread),
1453 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1454 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1455 location - mh()->code_base() ));
1457 JvmtiEnv *env = ets->get_env();
1458 JvmtiExceptionEventMark jem(thread, mh, location, exception_handle);
1459 JvmtiJavaThreadEventTransition jet(thread);
1460 jvmtiEventExceptionCatch callback = env->callbacks()->ExceptionCatch;
1461 if (callback != NULL) {
1462 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1463 jem.jni_methodID(), jem.location(),
1464 jem.exception());
1465 }
1466 }
1467 }
1468 }
1469 }
1470 }
1472 oop JvmtiExport::jni_GetField_probe(JavaThread *thread, jobject jobj, oop obj,
1473 klassOop klass, jfieldID fieldID, bool is_static) {
1474 if (*((int *)get_field_access_count_addr()) > 0 && thread->has_last_Java_frame()) {
1475 // At least one field access watch is set so we have more work
1476 // to do. This wrapper is used by entry points that allow us
1477 // to create handles in post_field_access_by_jni().
1478 post_field_access_by_jni(thread, obj, klass, fieldID, is_static);
1479 // event posting can block so refetch oop if we were passed a jobj
1480 if (jobj != NULL) return JNIHandles::resolve_non_null(jobj);
1481 }
1482 return obj;
1483 }
1485 oop JvmtiExport::jni_GetField_probe_nh(JavaThread *thread, jobject jobj, oop obj,
1486 klassOop klass, jfieldID fieldID, bool is_static) {
1487 if (*((int *)get_field_access_count_addr()) > 0 && thread->has_last_Java_frame()) {
1488 // At least one field access watch is set so we have more work
1489 // to do. This wrapper is used by "quick" entry points that don't
1490 // allow us to create handles in post_field_access_by_jni(). We
1491 // override that with a ResetNoHandleMark.
1492 ResetNoHandleMark rnhm;
1493 post_field_access_by_jni(thread, obj, klass, fieldID, is_static);
1494 // event posting can block so refetch oop if we were passed a jobj
1495 if (jobj != NULL) return JNIHandles::resolve_non_null(jobj);
1496 }
1497 return obj;
1498 }
1500 void JvmtiExport::post_field_access_by_jni(JavaThread *thread, oop obj,
1501 klassOop klass, jfieldID fieldID, bool is_static) {
1502 // We must be called with a Java context in order to provide reasonable
1503 // values for the klazz, method, and location fields. The callers of this
1504 // function don't make the call unless there is a Java context.
1505 assert(thread->has_last_Java_frame(), "must be called with a Java context");
1507 ResourceMark rm;
1508 fieldDescriptor fd;
1509 // if get_field_descriptor finds fieldID to be invalid, then we just bail
1510 bool valid_fieldID = JvmtiEnv::get_field_descriptor(klass, fieldID, &fd);
1511 assert(valid_fieldID == true,"post_field_access_by_jni called with invalid fieldID");
1512 if (!valid_fieldID) return;
1513 // field accesses are not watched so bail
1514 if (!fd.is_field_access_watched()) return;
1516 HandleMark hm(thread);
1517 KlassHandle h_klass(thread, klass);
1518 Handle h_obj;
1519 if (!is_static) {
1520 // non-static field accessors have an object, but we need a handle
1521 assert(obj != NULL, "non-static needs an object");
1522 h_obj = Handle(thread, obj);
1523 }
1524 post_field_access(thread,
1525 thread->last_frame().interpreter_frame_method(),
1526 thread->last_frame().interpreter_frame_bcp(),
1527 h_klass, h_obj, fieldID);
1528 }
1530 void JvmtiExport::post_field_access(JavaThread *thread, methodOop method,
1531 address location, KlassHandle field_klass, Handle object, jfieldID field) {
1533 HandleMark hm(thread);
1534 methodHandle mh(thread, method);
1536 JvmtiThreadState *state = thread->jvmti_thread_state();
1537 if (state == NULL) {
1538 return;
1539 }
1540 EVT_TRIG_TRACE(JVMTI_EVENT_FIELD_ACCESS, ("JVMTI [%s] Trg Field Access event triggered",
1541 JvmtiTrace::safe_get_thread_name(thread)));
1542 JvmtiEnvThreadStateIterator it(state);
1543 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1544 if (ets->is_enabled(JVMTI_EVENT_FIELD_ACCESS)) {
1545 EVT_TRACE(JVMTI_EVENT_FIELD_ACCESS, ("JVMTI [%s] Evt Field Access event sent %s.%s @ %d",
1546 JvmtiTrace::safe_get_thread_name(thread),
1547 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1548 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1549 location - mh()->code_base() ));
1551 JvmtiEnv *env = ets->get_env();
1552 JvmtiLocationEventMark jem(thread, mh, location);
1553 jclass field_jclass = jem.to_jclass(field_klass());
1554 jobject field_jobject = jem.to_jobject(object());
1555 JvmtiJavaThreadEventTransition jet(thread);
1556 jvmtiEventFieldAccess callback = env->callbacks()->FieldAccess;
1557 if (callback != NULL) {
1558 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1559 jem.jni_methodID(), jem.location(),
1560 field_jclass, field_jobject, field);
1561 }
1562 }
1563 }
1564 }
1566 oop JvmtiExport::jni_SetField_probe(JavaThread *thread, jobject jobj, oop obj,
1567 klassOop klass, jfieldID fieldID, bool is_static,
1568 char sig_type, jvalue *value) {
1569 if (*((int *)get_field_modification_count_addr()) > 0 && thread->has_last_Java_frame()) {
1570 // At least one field modification watch is set so we have more work
1571 // to do. This wrapper is used by entry points that allow us
1572 // to create handles in post_field_modification_by_jni().
1573 post_field_modification_by_jni(thread, obj, klass, fieldID, is_static, sig_type, value);
1574 // event posting can block so refetch oop if we were passed a jobj
1575 if (jobj != NULL) return JNIHandles::resolve_non_null(jobj);
1576 }
1577 return obj;
1578 }
1580 oop JvmtiExport::jni_SetField_probe_nh(JavaThread *thread, jobject jobj, oop obj,
1581 klassOop klass, jfieldID fieldID, bool is_static,
1582 char sig_type, jvalue *value) {
1583 if (*((int *)get_field_modification_count_addr()) > 0 && thread->has_last_Java_frame()) {
1584 // At least one field modification watch is set so we have more work
1585 // to do. This wrapper is used by "quick" entry points that don't
1586 // allow us to create handles in post_field_modification_by_jni(). We
1587 // override that with a ResetNoHandleMark.
1588 ResetNoHandleMark rnhm;
1589 post_field_modification_by_jni(thread, obj, klass, fieldID, is_static, sig_type, value);
1590 // event posting can block so refetch oop if we were passed a jobj
1591 if (jobj != NULL) return JNIHandles::resolve_non_null(jobj);
1592 }
1593 return obj;
1594 }
1596 void JvmtiExport::post_field_modification_by_jni(JavaThread *thread, oop obj,
1597 klassOop klass, jfieldID fieldID, bool is_static,
1598 char sig_type, jvalue *value) {
1599 // We must be called with a Java context in order to provide reasonable
1600 // values for the klazz, method, and location fields. The callers of this
1601 // function don't make the call unless there is a Java context.
1602 assert(thread->has_last_Java_frame(), "must be called with Java context");
1604 ResourceMark rm;
1605 fieldDescriptor fd;
1606 // if get_field_descriptor finds fieldID to be invalid, then we just bail
1607 bool valid_fieldID = JvmtiEnv::get_field_descriptor(klass, fieldID, &fd);
1608 assert(valid_fieldID == true,"post_field_modification_by_jni called with invalid fieldID");
1609 if (!valid_fieldID) return;
1610 // field modifications are not watched so bail
1611 if (!fd.is_field_modification_watched()) return;
1613 HandleMark hm(thread);
1615 Handle h_obj;
1616 if (!is_static) {
1617 // non-static field accessors have an object, but we need a handle
1618 assert(obj != NULL, "non-static needs an object");
1619 h_obj = Handle(thread, obj);
1620 }
1621 KlassHandle h_klass(thread, klass);
1622 post_field_modification(thread,
1623 thread->last_frame().interpreter_frame_method(),
1624 thread->last_frame().interpreter_frame_bcp(),
1625 h_klass, h_obj, fieldID, sig_type, value);
1626 }
1628 void JvmtiExport::post_raw_field_modification(JavaThread *thread, methodOop method,
1629 address location, KlassHandle field_klass, Handle object, jfieldID field,
1630 char sig_type, jvalue *value) {
1632 if (sig_type == 'I' || sig_type == 'Z' || sig_type == 'C' || sig_type == 'S') {
1633 // 'I' instructions are used for byte, char, short and int.
1634 // determine which it really is, and convert
1635 fieldDescriptor fd;
1636 bool found = JvmtiEnv::get_field_descriptor(field_klass(), field, &fd);
1637 // should be found (if not, leave as is)
1638 if (found) {
1639 jint ival = value->i;
1640 // convert value from int to appropriate type
1641 switch (fd.field_type()) {
1642 case T_BOOLEAN:
1643 sig_type = 'Z';
1644 value->i = 0; // clear it
1645 value->z = (jboolean)ival;
1646 break;
1647 case T_BYTE:
1648 sig_type = 'B';
1649 value->i = 0; // clear it
1650 value->b = (jbyte)ival;
1651 break;
1652 case T_CHAR:
1653 sig_type = 'C';
1654 value->i = 0; // clear it
1655 value->c = (jchar)ival;
1656 break;
1657 case T_SHORT:
1658 sig_type = 'S';
1659 value->i = 0; // clear it
1660 value->s = (jshort)ival;
1661 break;
1662 case T_INT:
1663 // nothing to do
1664 break;
1665 default:
1666 // this is an integer instruction, should be one of above
1667 ShouldNotReachHere();
1668 break;
1669 }
1670 }
1671 }
1673 // convert oop to JNI handle.
1674 if (sig_type == 'L' || sig_type == '[') {
1675 value->l = (jobject)JNIHandles::make_local(thread, (oop)value->l);
1676 }
1678 post_field_modification(thread, method, location, field_klass, object, field, sig_type, value);
1680 // Destroy the JNI handle allocated above.
1681 if (sig_type == 'L') {
1682 JNIHandles::destroy_local(value->l);
1683 }
1684 }
1686 void JvmtiExport::post_field_modification(JavaThread *thread, methodOop method,
1687 address location, KlassHandle field_klass, Handle object, jfieldID field,
1688 char sig_type, jvalue *value_ptr) {
1690 HandleMark hm(thread);
1691 methodHandle mh(thread, method);
1693 JvmtiThreadState *state = thread->jvmti_thread_state();
1694 if (state == NULL) {
1695 return;
1696 }
1697 EVT_TRIG_TRACE(JVMTI_EVENT_FIELD_MODIFICATION,
1698 ("JVMTI [%s] Trg Field Modification event triggered",
1699 JvmtiTrace::safe_get_thread_name(thread)));
1701 JvmtiEnvThreadStateIterator it(state);
1702 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1703 if (ets->is_enabled(JVMTI_EVENT_FIELD_MODIFICATION)) {
1704 EVT_TRACE(JVMTI_EVENT_FIELD_MODIFICATION,
1705 ("JVMTI [%s] Evt Field Modification event sent %s.%s @ %d",
1706 JvmtiTrace::safe_get_thread_name(thread),
1707 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1708 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1709 location - mh()->code_base() ));
1711 JvmtiEnv *env = ets->get_env();
1712 JvmtiLocationEventMark jem(thread, mh, location);
1713 jclass field_jclass = jem.to_jclass(field_klass());
1714 jobject field_jobject = jem.to_jobject(object());
1715 JvmtiJavaThreadEventTransition jet(thread);
1716 jvmtiEventFieldModification callback = env->callbacks()->FieldModification;
1717 if (callback != NULL) {
1718 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1719 jem.jni_methodID(), jem.location(),
1720 field_jclass, field_jobject, field, sig_type, *value_ptr);
1721 }
1722 }
1723 }
1724 }
1726 void JvmtiExport::post_native_method_bind(methodOop method, address* function_ptr) {
1727 JavaThread* thread = JavaThread::current();
1728 assert(thread->thread_state() == _thread_in_vm, "must be in vm state");
1730 HandleMark hm(thread);
1731 methodHandle mh(thread, method);
1733 EVT_TRIG_TRACE(JVMTI_EVENT_NATIVE_METHOD_BIND, ("JVMTI [%s] Trg Native Method Bind event triggered",
1734 JvmtiTrace::safe_get_thread_name(thread)));
1736 if (JvmtiEventController::is_enabled(JVMTI_EVENT_NATIVE_METHOD_BIND)) {
1737 JvmtiEnvIterator it;
1738 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1739 if (env->is_enabled(JVMTI_EVENT_NATIVE_METHOD_BIND)) {
1740 EVT_TRACE(JVMTI_EVENT_NATIVE_METHOD_BIND, ("JVMTI [%s] Evt Native Method Bind event sent",
1741 JvmtiTrace::safe_get_thread_name(thread) ));
1743 JvmtiMethodEventMark jem(thread, mh);
1744 JvmtiJavaThreadEventTransition jet(thread);
1745 JNIEnv* jni_env = JvmtiEnv::get_phase() == JVMTI_PHASE_PRIMORDIAL? NULL : jem.jni_env();
1746 jvmtiEventNativeMethodBind callback = env->callbacks()->NativeMethodBind;
1747 if (callback != NULL) {
1748 (*callback)(env->jvmti_external(), jni_env, jem.jni_thread(),
1749 jem.jni_methodID(), (void*)(*function_ptr), (void**)function_ptr);
1750 }
1751 }
1752 }
1753 }
1754 }
1756 // Returns a record containing inlining information for the given nmethod
1757 jvmtiCompiledMethodLoadInlineRecord* create_inline_record(nmethod* nm) {
1758 jint numstackframes = 0;
1759 jvmtiCompiledMethodLoadInlineRecord* record = (jvmtiCompiledMethodLoadInlineRecord*)NEW_RESOURCE_OBJ(jvmtiCompiledMethodLoadInlineRecord);
1760 record->header.kind = JVMTI_CMLR_INLINE_INFO;
1761 record->header.next = NULL;
1762 record->header.majorinfoversion = JVMTI_CMLR_MAJOR_VERSION_1;
1763 record->header.minorinfoversion = JVMTI_CMLR_MINOR_VERSION_0;
1764 record->numpcs = 0;
1765 for(PcDesc* p = nm->scopes_pcs_begin(); p < nm->scopes_pcs_end(); p++) {
1766 if(p->scope_decode_offset() == DebugInformationRecorder::serialized_null) continue;
1767 record->numpcs++;
1768 }
1769 record->pcinfo = (PCStackInfo*)(NEW_RESOURCE_ARRAY(PCStackInfo, record->numpcs));
1770 int scope = 0;
1771 for(PcDesc* p = nm->scopes_pcs_begin(); p < nm->scopes_pcs_end(); p++) {
1772 if(p->scope_decode_offset() == DebugInformationRecorder::serialized_null) continue;
1773 void* pc_address = (void*)p->real_pc(nm);
1774 assert(pc_address != NULL, "pc_address must be non-null");
1775 record->pcinfo[scope].pc = pc_address;
1776 numstackframes=0;
1777 for(ScopeDesc* sd = nm->scope_desc_at(p->real_pc(nm));sd != NULL;sd = sd->sender()) {
1778 numstackframes++;
1779 }
1780 assert(numstackframes != 0, "numstackframes must be nonzero.");
1781 record->pcinfo[scope].methods = (jmethodID *)NEW_RESOURCE_ARRAY(jmethodID, numstackframes);
1782 record->pcinfo[scope].bcis = (jint *)NEW_RESOURCE_ARRAY(jint, numstackframes);
1783 record->pcinfo[scope].numstackframes = numstackframes;
1784 int stackframe = 0;
1785 for(ScopeDesc* sd = nm->scope_desc_at(p->real_pc(nm));sd != NULL;sd = sd->sender()) {
1786 // sd->method() can be NULL for stubs but not for nmethods. To be completely robust, include an assert that we should never see a null sd->method()
1787 assert(!sd->method().is_null(), "sd->method() cannot be null.");
1788 record->pcinfo[scope].methods[stackframe] = sd->method()->jmethod_id();
1789 record->pcinfo[scope].bcis[stackframe] = sd->bci();
1790 stackframe++;
1791 }
1792 scope++;
1793 }
1794 return record;
1795 }
1797 void JvmtiExport::post_compiled_method_load(nmethod *nm) {
1798 // If there are pending CompiledMethodUnload events then these are
1799 // posted before this CompiledMethodLoad event. We "lock" the nmethod and
1800 // maintain a handle to the methodOop to ensure that the nmethod isn't
1801 // flushed or unloaded while posting the events.
1802 JavaThread* thread = JavaThread::current();
1803 if (have_pending_compiled_method_unload_events()) {
1804 methodHandle mh(thread, nm->method());
1805 nmethodLocker nml(nm);
1806 post_pending_compiled_method_unload_events();
1807 }
1809 EVT_TRIG_TRACE(JVMTI_EVENT_COMPILED_METHOD_LOAD,
1810 ("JVMTI [%s] method compile load event triggered",
1811 JvmtiTrace::safe_get_thread_name(thread)));
1813 JvmtiEnvIterator it;
1814 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1815 if (env->is_enabled(JVMTI_EVENT_COMPILED_METHOD_LOAD)) {
1817 EVT_TRACE(JVMTI_EVENT_COMPILED_METHOD_LOAD,
1818 ("JVMTI [%s] class compile method load event sent %s.%s ",
1819 JvmtiTrace::safe_get_thread_name(thread),
1820 (nm->method() == NULL) ? "NULL" : nm->method()->klass_name()->as_C_string(),
1821 (nm->method() == NULL) ? "NULL" : nm->method()->name()->as_C_string()));
1823 ResourceMark rm(thread);
1825 // Add inlining information
1826 jvmtiCompiledMethodLoadInlineRecord* inlinerecord = create_inline_record(nm);
1827 // Pass inlining information through the void pointer
1828 JvmtiCompiledMethodLoadEventMark jem(thread, nm, inlinerecord);
1829 JvmtiJavaThreadEventTransition jet(thread);
1830 jvmtiEventCompiledMethodLoad callback = env->callbacks()->CompiledMethodLoad;
1831 if (callback != NULL) {
1832 (*callback)(env->jvmti_external(), jem.jni_methodID(),
1833 jem.code_size(), jem.code_data(), jem.map_length(),
1834 jem.map(), jem.compile_info());
1835 }
1836 }
1837 }
1838 }
1841 // post a COMPILED_METHOD_LOAD event for a given environment
1842 void JvmtiExport::post_compiled_method_load(JvmtiEnv* env, const jmethodID method, const jint length,
1843 const void *code_begin, const jint map_length,
1844 const jvmtiAddrLocationMap* map)
1845 {
1846 JavaThread* thread = JavaThread::current();
1847 EVT_TRIG_TRACE(JVMTI_EVENT_COMPILED_METHOD_LOAD,
1848 ("JVMTI [%s] method compile load event triggered (by GenerateEvents)",
1849 JvmtiTrace::safe_get_thread_name(thread)));
1850 if (env->is_enabled(JVMTI_EVENT_COMPILED_METHOD_LOAD)) {
1852 EVT_TRACE(JVMTI_EVENT_COMPILED_METHOD_LOAD,
1853 ("JVMTI [%s] class compile method load event sent (by GenerateEvents), jmethodID=" PTR_FORMAT,
1854 JvmtiTrace::safe_get_thread_name(thread), method));
1856 JvmtiEventMark jem(thread);
1857 JvmtiJavaThreadEventTransition jet(thread);
1858 jvmtiEventCompiledMethodLoad callback = env->callbacks()->CompiledMethodLoad;
1859 if (callback != NULL) {
1860 (*callback)(env->jvmti_external(), method,
1861 length, code_begin, map_length,
1862 map, NULL);
1863 }
1864 }
1865 }
1867 // used at a safepoint to post a CompiledMethodUnload event
1868 void JvmtiExport::post_compiled_method_unload_at_safepoint(jmethodID mid, const void *code_begin) {
1869 assert(SafepointSynchronize::is_at_safepoint(), "must be executed at a safepoint");
1871 // create list lazily
1872 if (_pending_compiled_method_unload_method_ids == NULL) {
1873 _pending_compiled_method_unload_method_ids = new (ResourceObj::C_HEAP) GrowableArray<jmethodID>(10,true);
1874 _pending_compiled_method_unload_code_begins = new (ResourceObj::C_HEAP) GrowableArray<const void *>(10,true);
1875 }
1876 _pending_compiled_method_unload_method_ids->append(mid);
1877 _pending_compiled_method_unload_code_begins->append(code_begin);
1878 _have_pending_compiled_method_unload_events = true;
1879 }
1881 void JvmtiExport::post_dynamic_code_generated_internal(const char *name, const void *code_begin, const void *code_end) {
1882 JavaThread* thread = JavaThread::current();
1883 EVT_TRIG_TRACE(JVMTI_EVENT_DYNAMIC_CODE_GENERATED,
1884 ("JVMTI [%s] method dynamic code generated event triggered",
1885 JvmtiTrace::safe_get_thread_name(thread)));
1886 JvmtiEnvIterator it;
1887 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1888 if (env->is_enabled(JVMTI_EVENT_DYNAMIC_CODE_GENERATED)) {
1889 EVT_TRACE(JVMTI_EVENT_DYNAMIC_CODE_GENERATED,
1890 ("JVMTI [%s] dynamic code generated event sent for %s",
1891 JvmtiTrace::safe_get_thread_name(thread), name));
1892 JvmtiEventMark jem(thread);
1893 JvmtiJavaThreadEventTransition jet(thread);
1894 jint length = (jint)pointer_delta(code_end, code_begin, sizeof(char));
1895 jvmtiEventDynamicCodeGenerated callback = env->callbacks()->DynamicCodeGenerated;
1896 if (callback != NULL) {
1897 (*callback)(env->jvmti_external(), name, (void*)code_begin, length);
1898 }
1899 }
1900 }
1901 }
1903 void JvmtiExport::post_dynamic_code_generated(const char *name, const void *code_begin, const void *code_end) {
1904 // In theory everyone coming thru here is in_vm but we need to be certain
1905 // because a callee will do a vm->native transition
1906 ThreadInVMfromUnknown __tiv;
1907 jvmtiPhase phase = JvmtiEnv::get_phase();
1908 if (phase == JVMTI_PHASE_PRIMORDIAL || phase == JVMTI_PHASE_START) {
1909 post_dynamic_code_generated_internal(name, code_begin, code_end);
1910 return;
1911 }
1913 if (have_pending_compiled_method_unload_events()) {
1914 post_pending_compiled_method_unload_events();
1915 }
1916 post_dynamic_code_generated_internal(name, code_begin, code_end);
1917 }
1920 // post a DYNAMIC_CODE_GENERATED event for a given environment
1921 // used by GenerateEvents
1922 void JvmtiExport::post_dynamic_code_generated(JvmtiEnv* env, const char *name,
1923 const void *code_begin, const void *code_end)
1924 {
1925 JavaThread* thread = JavaThread::current();
1926 EVT_TRIG_TRACE(JVMTI_EVENT_DYNAMIC_CODE_GENERATED,
1927 ("JVMTI [%s] dynamic code generated event triggered (by GenerateEvents)",
1928 JvmtiTrace::safe_get_thread_name(thread)));
1929 if (env->is_enabled(JVMTI_EVENT_DYNAMIC_CODE_GENERATED)) {
1930 EVT_TRACE(JVMTI_EVENT_DYNAMIC_CODE_GENERATED,
1931 ("JVMTI [%s] dynamic code generated event sent for %s",
1932 JvmtiTrace::safe_get_thread_name(thread), name));
1933 JvmtiEventMark jem(thread);
1934 JvmtiJavaThreadEventTransition jet(thread);
1935 jint length = (jint)pointer_delta(code_end, code_begin, sizeof(char));
1936 jvmtiEventDynamicCodeGenerated callback = env->callbacks()->DynamicCodeGenerated;
1937 if (callback != NULL) {
1938 (*callback)(env->jvmti_external(), name, (void*)code_begin, length);
1939 }
1940 }
1941 }
1943 // post a DynamicCodeGenerated event while holding locks in the VM.
1944 void JvmtiExport::post_dynamic_code_generated_while_holding_locks(const char* name,
1945 address code_begin, address code_end)
1946 {
1947 // register the stub with the current dynamic code event collector
1948 JvmtiThreadState* state = JvmtiThreadState::state_for(JavaThread::current());
1949 // state can only be NULL if the current thread is exiting which
1950 // should not happen since we're trying to post an event
1951 guarantee(state != NULL, "attempt to register stub via an exiting thread");
1952 JvmtiDynamicCodeEventCollector* collector = state->get_dynamic_code_event_collector();
1953 guarantee(collector != NULL, "attempt to register stub without event collector");
1954 collector->register_stub(name, code_begin, code_end);
1955 }
1957 // Collect all the vm internally allocated objects which are visible to java world
1958 void JvmtiExport::record_vm_internal_object_allocation(oop obj) {
1959 Thread* thread = ThreadLocalStorage::thread();
1960 if (thread != NULL && thread->is_Java_thread()) {
1961 // Can not take safepoint here.
1962 No_Safepoint_Verifier no_sfpt;
1963 // Can not take safepoint here so can not use state_for to get
1964 // jvmti thread state.
1965 JvmtiThreadState *state = ((JavaThread*)thread)->jvmti_thread_state();
1966 if (state != NULL ) {
1967 // state is non NULL when VMObjectAllocEventCollector is enabled.
1968 JvmtiVMObjectAllocEventCollector *collector;
1969 collector = state->get_vm_object_alloc_event_collector();
1970 if (collector != NULL && collector->is_enabled()) {
1971 // Don't record classes as these will be notified via the ClassLoad
1972 // event.
1973 if (obj->klass() != SystemDictionary::Class_klass()) {
1974 collector->record_allocation(obj);
1975 }
1976 }
1977 }
1978 }
1979 }
1981 void JvmtiExport::post_garbage_collection_finish() {
1982 Thread *thread = Thread::current(); // this event is posted from VM-Thread.
1983 EVT_TRIG_TRACE(JVMTI_EVENT_GARBAGE_COLLECTION_FINISH,
1984 ("JVMTI [%s] garbage collection finish event triggered",
1985 JvmtiTrace::safe_get_thread_name(thread)));
1986 JvmtiEnvIterator it;
1987 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1988 if (env->is_enabled(JVMTI_EVENT_GARBAGE_COLLECTION_FINISH)) {
1989 EVT_TRACE(JVMTI_EVENT_GARBAGE_COLLECTION_FINISH,
1990 ("JVMTI [%s] garbage collection finish event sent ",
1991 JvmtiTrace::safe_get_thread_name(thread)));
1992 JvmtiThreadEventTransition jet(thread);
1993 // JNIEnv is NULL here because this event is posted from VM Thread
1994 jvmtiEventGarbageCollectionFinish callback = env->callbacks()->GarbageCollectionFinish;
1995 if (callback != NULL) {
1996 (*callback)(env->jvmti_external());
1997 }
1998 }
1999 }
2000 }
2002 void JvmtiExport::post_garbage_collection_start() {
2003 Thread* thread = Thread::current(); // this event is posted from vm-thread.
2004 EVT_TRIG_TRACE(JVMTI_EVENT_GARBAGE_COLLECTION_START,
2005 ("JVMTI [%s] garbage collection start event triggered",
2006 JvmtiTrace::safe_get_thread_name(thread)));
2007 JvmtiEnvIterator it;
2008 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2009 if (env->is_enabled(JVMTI_EVENT_GARBAGE_COLLECTION_START)) {
2010 EVT_TRACE(JVMTI_EVENT_GARBAGE_COLLECTION_START,
2011 ("JVMTI [%s] garbage collection start event sent ",
2012 JvmtiTrace::safe_get_thread_name(thread)));
2013 JvmtiThreadEventTransition jet(thread);
2014 // JNIEnv is NULL here because this event is posted from VM Thread
2015 jvmtiEventGarbageCollectionStart callback = env->callbacks()->GarbageCollectionStart;
2016 if (callback != NULL) {
2017 (*callback)(env->jvmti_external());
2018 }
2019 }
2020 }
2021 }
2023 void JvmtiExport::post_data_dump() {
2024 Thread *thread = Thread::current();
2025 EVT_TRIG_TRACE(JVMTI_EVENT_DATA_DUMP_REQUEST,
2026 ("JVMTI [%s] data dump request event triggered",
2027 JvmtiTrace::safe_get_thread_name(thread)));
2028 JvmtiEnvIterator it;
2029 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2030 if (env->is_enabled(JVMTI_EVENT_DATA_DUMP_REQUEST)) {
2031 EVT_TRACE(JVMTI_EVENT_DATA_DUMP_REQUEST,
2032 ("JVMTI [%s] data dump request event sent ",
2033 JvmtiTrace::safe_get_thread_name(thread)));
2034 JvmtiThreadEventTransition jet(thread);
2035 // JNIEnv is NULL here because this event is posted from VM Thread
2036 jvmtiEventDataDumpRequest callback = env->callbacks()->DataDumpRequest;
2037 if (callback != NULL) {
2038 (*callback)(env->jvmti_external());
2039 }
2040 }
2041 }
2042 }
2044 void JvmtiExport::post_monitor_contended_enter(JavaThread *thread, ObjectMonitor *obj_mntr) {
2045 oop object = (oop)obj_mntr->object();
2046 if (!ServiceUtil::visible_oop(object)) {
2047 // Ignore monitor contended enter for vm internal object.
2048 return;
2049 }
2050 JvmtiThreadState *state = thread->jvmti_thread_state();
2051 if (state == NULL) {
2052 return;
2053 }
2055 HandleMark hm(thread);
2056 Handle h(thread, object);
2058 EVT_TRIG_TRACE(JVMTI_EVENT_MONITOR_CONTENDED_ENTER,
2059 ("JVMTI [%s] montior contended enter event triggered",
2060 JvmtiTrace::safe_get_thread_name(thread)));
2062 JvmtiEnvThreadStateIterator it(state);
2063 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
2064 if (ets->is_enabled(JVMTI_EVENT_MONITOR_CONTENDED_ENTER)) {
2065 EVT_TRACE(JVMTI_EVENT_MONITOR_CONTENDED_ENTER,
2066 ("JVMTI [%s] monitor contended enter event sent",
2067 JvmtiTrace::safe_get_thread_name(thread)));
2068 JvmtiMonitorEventMark jem(thread, h());
2069 JvmtiEnv *env = ets->get_env();
2070 JvmtiThreadEventTransition jet(thread);
2071 jvmtiEventMonitorContendedEnter callback = env->callbacks()->MonitorContendedEnter;
2072 if (callback != NULL) {
2073 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_object());
2074 }
2075 }
2076 }
2077 }
2079 void JvmtiExport::post_monitor_contended_entered(JavaThread *thread, ObjectMonitor *obj_mntr) {
2080 oop object = (oop)obj_mntr->object();
2081 if (!ServiceUtil::visible_oop(object)) {
2082 // Ignore monitor contended entered for vm internal object.
2083 return;
2084 }
2085 JvmtiThreadState *state = thread->jvmti_thread_state();
2086 if (state == NULL) {
2087 return;
2088 }
2090 HandleMark hm(thread);
2091 Handle h(thread, object);
2093 EVT_TRIG_TRACE(JVMTI_EVENT_MONITOR_CONTENDED_ENTERED,
2094 ("JVMTI [%s] montior contended entered event triggered",
2095 JvmtiTrace::safe_get_thread_name(thread)));
2097 JvmtiEnvThreadStateIterator it(state);
2098 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
2099 if (ets->is_enabled(JVMTI_EVENT_MONITOR_CONTENDED_ENTERED)) {
2100 EVT_TRACE(JVMTI_EVENT_MONITOR_CONTENDED_ENTERED,
2101 ("JVMTI [%s] monitor contended enter event sent",
2102 JvmtiTrace::safe_get_thread_name(thread)));
2103 JvmtiMonitorEventMark jem(thread, h());
2104 JvmtiEnv *env = ets->get_env();
2105 JvmtiThreadEventTransition jet(thread);
2106 jvmtiEventMonitorContendedEntered callback = env->callbacks()->MonitorContendedEntered;
2107 if (callback != NULL) {
2108 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_object());
2109 }
2110 }
2111 }
2112 }
2114 void JvmtiExport::post_monitor_wait(JavaThread *thread, oop object,
2115 jlong timeout) {
2116 JvmtiThreadState *state = thread->jvmti_thread_state();
2117 if (state == NULL) {
2118 return;
2119 }
2121 HandleMark hm(thread);
2122 Handle h(thread, object);
2124 EVT_TRIG_TRACE(JVMTI_EVENT_MONITOR_WAIT,
2125 ("JVMTI [%s] montior wait event triggered",
2126 JvmtiTrace::safe_get_thread_name(thread)));
2128 JvmtiEnvThreadStateIterator it(state);
2129 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
2130 if (ets->is_enabled(JVMTI_EVENT_MONITOR_WAIT)) {
2131 EVT_TRACE(JVMTI_EVENT_MONITOR_WAIT,
2132 ("JVMTI [%s] monitor wait event sent ",
2133 JvmtiTrace::safe_get_thread_name(thread)));
2134 JvmtiMonitorEventMark jem(thread, h());
2135 JvmtiEnv *env = ets->get_env();
2136 JvmtiThreadEventTransition jet(thread);
2137 jvmtiEventMonitorWait callback = env->callbacks()->MonitorWait;
2138 if (callback != NULL) {
2139 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
2140 jem.jni_object(), timeout);
2141 }
2142 }
2143 }
2144 }
2146 void JvmtiExport::post_monitor_waited(JavaThread *thread, ObjectMonitor *obj_mntr, jboolean timed_out) {
2147 oop object = (oop)obj_mntr->object();
2148 if (!ServiceUtil::visible_oop(object)) {
2149 // Ignore monitor waited for vm internal object.
2150 return;
2151 }
2152 JvmtiThreadState *state = thread->jvmti_thread_state();
2153 if (state == NULL) {
2154 return;
2155 }
2157 HandleMark hm(thread);
2158 Handle h(thread, object);
2160 EVT_TRIG_TRACE(JVMTI_EVENT_MONITOR_WAITED,
2161 ("JVMTI [%s] montior waited event triggered",
2162 JvmtiTrace::safe_get_thread_name(thread)));
2164 JvmtiEnvThreadStateIterator it(state);
2165 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
2166 if (ets->is_enabled(JVMTI_EVENT_MONITOR_WAITED)) {
2167 EVT_TRACE(JVMTI_EVENT_MONITOR_WAITED,
2168 ("JVMTI [%s] monitor waited event sent ",
2169 JvmtiTrace::safe_get_thread_name(thread)));
2170 JvmtiMonitorEventMark jem(thread, h());
2171 JvmtiEnv *env = ets->get_env();
2172 JvmtiThreadEventTransition jet(thread);
2173 jvmtiEventMonitorWaited callback = env->callbacks()->MonitorWaited;
2174 if (callback != NULL) {
2175 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
2176 jem.jni_object(), timed_out);
2177 }
2178 }
2179 }
2180 }
2183 void JvmtiExport::post_vm_object_alloc(JavaThread *thread, oop object) {
2184 EVT_TRIG_TRACE(JVMTI_EVENT_VM_OBJECT_ALLOC, ("JVMTI [%s] Trg vm object alloc triggered",
2185 JvmtiTrace::safe_get_thread_name(thread)));
2186 if (object == NULL) {
2187 return;
2188 }
2189 HandleMark hm(thread);
2190 Handle h(thread, object);
2191 JvmtiEnvIterator it;
2192 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2193 if (env->is_enabled(JVMTI_EVENT_VM_OBJECT_ALLOC)) {
2194 EVT_TRACE(JVMTI_EVENT_VM_OBJECT_ALLOC, ("JVMTI [%s] Evt vmobject alloc sent %s",
2195 JvmtiTrace::safe_get_thread_name(thread),
2196 object==NULL? "NULL" : Klass::cast(java_lang_Class::as_klassOop(object))->external_name()));
2198 JvmtiVMObjectAllocEventMark jem(thread, h());
2199 JvmtiJavaThreadEventTransition jet(thread);
2200 jvmtiEventVMObjectAlloc callback = env->callbacks()->VMObjectAlloc;
2201 if (callback != NULL) {
2202 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
2203 jem.jni_jobject(), jem.jni_class(), jem.size());
2204 }
2205 }
2206 }
2207 }
2209 ////////////////////////////////////////////////////////////////////////////////////////////////
2211 void JvmtiExport::cleanup_thread(JavaThread* thread) {
2212 assert(JavaThread::current() == thread, "thread is not current");
2215 // This has to happen after the thread state is removed, which is
2216 // why it is not in post_thread_end_event like its complement
2217 // Maybe both these functions should be rolled into the posts?
2218 JvmtiEventController::thread_ended(thread);
2219 }
2221 void JvmtiExport::oops_do(OopClosure* f) {
2222 JvmtiCurrentBreakpoints::oops_do(f);
2223 JvmtiVMObjectAllocEventCollector::oops_do_for_all_threads(f);
2224 }
2226 // Onload raw monitor transition.
2227 void JvmtiExport::transition_pending_onload_raw_monitors() {
2228 JvmtiPendingMonitors::transition_raw_monitors();
2229 }
2231 ////////////////////////////////////////////////////////////////////////////////////////////////
2233 // type for the Agent_OnAttach entry point
2234 extern "C" {
2235 typedef jint (JNICALL *OnAttachEntry_t)(JavaVM*, char *, void *);
2236 }
2238 #ifndef SERVICES_KERNEL
2239 jint JvmtiExport::load_agent_library(AttachOperation* op, outputStream* st) {
2240 char ebuf[1024];
2241 char buffer[JVM_MAXPATHLEN];
2242 void* library;
2243 jint result = JNI_ERR;
2245 // get agent name and options
2246 const char* agent = op->arg(0);
2247 const char* absParam = op->arg(1);
2248 const char* options = op->arg(2);
2250 // The abs paramter should be "true" or "false"
2251 bool is_absolute_path = (absParam != NULL) && (strcmp(absParam,"true")==0);
2254 // If the path is absolute we attempt to load the library. Otherwise we try to
2255 // load it from the standard dll directory.
2257 if (is_absolute_path) {
2258 library = hpi::dll_load(agent, ebuf, sizeof ebuf);
2259 } else {
2260 // Try to load the agent from the standard dll directory
2261 hpi::dll_build_name(buffer, sizeof(buffer), Arguments::get_dll_dir(), agent);
2262 library = hpi::dll_load(buffer, ebuf, sizeof ebuf);
2263 if (library == NULL) {
2264 // not found - try local path
2265 char ns[1] = {0};
2266 hpi::dll_build_name(buffer, sizeof(buffer), ns, agent);
2267 library = hpi::dll_load(buffer, ebuf, sizeof ebuf);
2268 }
2269 }
2271 // If the library was loaded then we attempt to invoke the Agent_OnAttach
2272 // function
2273 if (library != NULL) {
2275 // Lookup the Agent_OnAttach function
2276 OnAttachEntry_t on_attach_entry = NULL;
2277 const char *on_attach_symbols[] = AGENT_ONATTACH_SYMBOLS;
2278 for (uint symbol_index = 0; symbol_index < ARRAY_SIZE(on_attach_symbols); symbol_index++) {
2279 on_attach_entry =
2280 CAST_TO_FN_PTR(OnAttachEntry_t, hpi::dll_lookup(library, on_attach_symbols[symbol_index]));
2281 if (on_attach_entry != NULL) break;
2282 }
2284 if (on_attach_entry == NULL) {
2285 // Agent_OnAttach missing - unload library
2286 hpi::dll_unload(library);
2287 } else {
2288 // Invoke the Agent_OnAttach function
2289 JavaThread* THREAD = JavaThread::current();
2290 {
2291 extern struct JavaVM_ main_vm;
2292 JvmtiThreadEventMark jem(THREAD);
2293 JvmtiJavaThreadEventTransition jet(THREAD);
2295 result = (*on_attach_entry)(&main_vm, (char*)options, NULL);
2296 }
2298 // Agent_OnAttach may have used JNI
2299 if (HAS_PENDING_EXCEPTION) {
2300 CLEAR_PENDING_EXCEPTION;
2301 }
2303 // If OnAttach returns JNI_OK then we add it to the list of
2304 // agent libraries so that we can call Agent_OnUnload later.
2305 if (result == JNI_OK) {
2306 Arguments::add_loaded_agent(agent, (char*)options, is_absolute_path, library);
2307 }
2309 // Agent_OnAttach executed so completion status is JNI_OK
2310 st->print_cr("%d", result);
2311 result = JNI_OK;
2312 }
2313 }
2314 return result;
2315 }
2316 #endif // SERVICES_KERNEL
2318 // CMS has completed referencing processing so may need to update
2319 // tag maps.
2320 void JvmtiExport::cms_ref_processing_epilogue() {
2321 if (JvmtiEnv::environments_might_exist()) {
2322 JvmtiTagMap::cms_ref_processing_epilogue();
2323 }
2324 }
2327 ////////////////////////////////////////////////////////////////////////////////////////////////
2329 // Setup current current thread for event collection.
2330 void JvmtiEventCollector::setup_jvmti_thread_state() {
2331 // set this event collector to be the current one.
2332 JvmtiThreadState* state = JvmtiThreadState::state_for(JavaThread::current());
2333 // state can only be NULL if the current thread is exiting which
2334 // should not happen since we're trying to configure for event collection
2335 guarantee(state != NULL, "exiting thread called setup_jvmti_thread_state");
2336 if (is_vm_object_alloc_event()) {
2337 _prev = state->get_vm_object_alloc_event_collector();
2338 state->set_vm_object_alloc_event_collector((JvmtiVMObjectAllocEventCollector *)this);
2339 } else if (is_dynamic_code_event()) {
2340 _prev = state->get_dynamic_code_event_collector();
2341 state->set_dynamic_code_event_collector((JvmtiDynamicCodeEventCollector *)this);
2342 }
2343 }
2345 // Unset current event collection in this thread and reset it with previous
2346 // collector.
2347 void JvmtiEventCollector::unset_jvmti_thread_state() {
2348 JvmtiThreadState* state = JavaThread::current()->jvmti_thread_state();
2349 if (state != NULL) {
2350 // restore the previous event collector (if any)
2351 if (is_vm_object_alloc_event()) {
2352 if (state->get_vm_object_alloc_event_collector() == this) {
2353 state->set_vm_object_alloc_event_collector((JvmtiVMObjectAllocEventCollector *)_prev);
2354 } else {
2355 // this thread's jvmti state was created during the scope of
2356 // the event collector.
2357 }
2358 } else {
2359 if (is_dynamic_code_event()) {
2360 if (state->get_dynamic_code_event_collector() == this) {
2361 state->set_dynamic_code_event_collector((JvmtiDynamicCodeEventCollector *)_prev);
2362 } else {
2363 // this thread's jvmti state was created during the scope of
2364 // the event collector.
2365 }
2366 }
2367 }
2368 }
2369 }
2371 // create the dynamic code event collector
2372 JvmtiDynamicCodeEventCollector::JvmtiDynamicCodeEventCollector() : _code_blobs(NULL) {
2373 if (JvmtiExport::should_post_dynamic_code_generated()) {
2374 setup_jvmti_thread_state();
2375 }
2376 }
2378 // iterate over any code blob descriptors collected and post a
2379 // DYNAMIC_CODE_GENERATED event to the profiler.
2380 JvmtiDynamicCodeEventCollector::~JvmtiDynamicCodeEventCollector() {
2381 assert(!JavaThread::current()->owns_locks(), "all locks must be released to post deferred events");
2382 // iterate over any code blob descriptors that we collected
2383 if (_code_blobs != NULL) {
2384 for (int i=0; i<_code_blobs->length(); i++) {
2385 JvmtiCodeBlobDesc* blob = _code_blobs->at(i);
2386 JvmtiExport::post_dynamic_code_generated(blob->name(), blob->code_begin(), blob->code_end());
2387 FreeHeap(blob);
2388 }
2389 delete _code_blobs;
2390 }
2391 unset_jvmti_thread_state();
2392 }
2394 // register a stub
2395 void JvmtiDynamicCodeEventCollector::register_stub(const char* name, address start, address end) {
2396 if (_code_blobs == NULL) {
2397 _code_blobs = new (ResourceObj::C_HEAP) GrowableArray<JvmtiCodeBlobDesc*>(1,true);
2398 }
2399 _code_blobs->append(new JvmtiCodeBlobDesc(name, start, end));
2400 }
2402 // Setup current thread to record vm allocated objects.
2403 JvmtiVMObjectAllocEventCollector::JvmtiVMObjectAllocEventCollector() : _allocated(NULL) {
2404 if (JvmtiExport::should_post_vm_object_alloc()) {
2405 _enable = true;
2406 setup_jvmti_thread_state();
2407 } else {
2408 _enable = false;
2409 }
2410 }
2412 // Post vm_object_alloc event for vm allocated objects visible to java
2413 // world.
2414 JvmtiVMObjectAllocEventCollector::~JvmtiVMObjectAllocEventCollector() {
2415 if (_allocated != NULL) {
2416 set_enabled(false);
2417 for (int i = 0; i < _allocated->length(); i++) {
2418 oop obj = _allocated->at(i);
2419 if (ServiceUtil::visible_oop(obj)) {
2420 JvmtiExport::post_vm_object_alloc(JavaThread::current(), obj);
2421 }
2422 }
2423 delete _allocated;
2424 }
2425 unset_jvmti_thread_state();
2426 }
2428 void JvmtiVMObjectAllocEventCollector::record_allocation(oop obj) {
2429 assert(is_enabled(), "VM object alloc event collector is not enabled");
2430 if (_allocated == NULL) {
2431 _allocated = new (ResourceObj::C_HEAP) GrowableArray<oop>(1, true);
2432 }
2433 _allocated->push(obj);
2434 }
2436 // GC support.
2437 void JvmtiVMObjectAllocEventCollector::oops_do(OopClosure* f) {
2438 if (_allocated != NULL) {
2439 for(int i=_allocated->length() - 1; i >= 0; i--) {
2440 if (_allocated->at(i) != NULL) {
2441 f->do_oop(_allocated->adr_at(i));
2442 }
2443 }
2444 }
2445 }
2447 void JvmtiVMObjectAllocEventCollector::oops_do_for_all_threads(OopClosure* f) {
2448 // no-op if jvmti not enabled
2449 if (!JvmtiEnv::environments_might_exist()) {
2450 return;
2451 }
2453 // Runs at safepoint. So no need to acquire Threads_lock.
2454 for (JavaThread *jthr = Threads::first(); jthr != NULL; jthr = jthr->next()) {
2455 JvmtiThreadState *state = jthr->jvmti_thread_state();
2456 if (state != NULL) {
2457 JvmtiVMObjectAllocEventCollector *collector;
2458 collector = state->get_vm_object_alloc_event_collector();
2459 while (collector != NULL) {
2460 collector->oops_do(f);
2461 collector = (JvmtiVMObjectAllocEventCollector *)collector->get_prev();
2462 }
2463 }
2464 }
2465 }
2468 // Disable collection of VMObjectAlloc events
2469 NoJvmtiVMObjectAllocMark::NoJvmtiVMObjectAllocMark() : _collector(NULL) {
2470 // a no-op if VMObjectAlloc event is not enabled
2471 if (!JvmtiExport::should_post_vm_object_alloc()) {
2472 return;
2473 }
2474 Thread* thread = ThreadLocalStorage::thread();
2475 if (thread != NULL && thread->is_Java_thread()) {
2476 JavaThread* current_thread = (JavaThread*)thread;
2477 JvmtiThreadState *state = current_thread->jvmti_thread_state();
2478 if (state != NULL) {
2479 JvmtiVMObjectAllocEventCollector *collector;
2480 collector = state->get_vm_object_alloc_event_collector();
2481 if (collector != NULL && collector->is_enabled()) {
2482 _collector = collector;
2483 _collector->set_enabled(false);
2484 }
2485 }
2486 }
2487 }
2489 // Re-Enable collection of VMObjectAlloc events (if previously enabled)
2490 NoJvmtiVMObjectAllocMark::~NoJvmtiVMObjectAllocMark() {
2491 if (was_enabled()) {
2492 _collector->set_enabled(true);
2493 }
2494 };
2496 JvmtiGCMarker::JvmtiGCMarker(bool full) : _full(full), _invocation_count(0) {
2497 assert(Thread::current()->is_VM_thread(), "wrong thread");
2499 // if there aren't any JVMTI environments then nothing to do
2500 if (!JvmtiEnv::environments_might_exist()) {
2501 return;
2502 }
2504 if (ForceFullGCJVMTIEpilogues) {
2505 // force 'Full GC' was done semantics for JVMTI GC epilogues
2506 _full = true;
2507 }
2509 // GarbageCollectionStart event posted from VM thread - okay because
2510 // JVMTI is clear that the "world is stopped" and callback shouldn't
2511 // try to call into the VM.
2512 if (JvmtiExport::should_post_garbage_collection_start()) {
2513 JvmtiExport::post_garbage_collection_start();
2514 }
2516 // if "full" is false it probably means this is a scavenge of the young
2517 // generation. However it could turn out that a "full" GC is required
2518 // so we record the number of collections so that it can be checked in
2519 // the destructor.
2520 if (!_full) {
2521 _invocation_count = Universe::heap()->total_full_collections();
2522 }
2524 // Do clean up tasks that need to be done at a safepoint
2525 JvmtiEnvBase::check_for_periodic_clean_up();
2526 }
2528 JvmtiGCMarker::~JvmtiGCMarker() {
2529 // if there aren't any JVMTI environments then nothing to do
2530 if (!JvmtiEnv::environments_might_exist()) {
2531 return;
2532 }
2534 // JVMTI notify gc finish
2535 if (JvmtiExport::should_post_garbage_collection_finish()) {
2536 JvmtiExport::post_garbage_collection_finish();
2537 }
2539 // we might have initially started out doing a scavenge of the young
2540 // generation but could have ended up doing a "full" GC - check the
2541 // GC count to see.
2542 if (!_full) {
2543 _full = (_invocation_count != Universe::heap()->total_full_collections());
2544 }
2546 // Full collection probably means the perm generation has been GC'ed
2547 // so we clear the breakpoint cache.
2548 if (_full) {
2549 JvmtiCurrentBreakpoints::gc_epilogue();
2550 }
2552 // Notify heap/object tagging support
2553 JvmtiTagMap::gc_epilogue(_full);
2554 }
2555 #endif // JVMTI_KERNEL