1 /*
2 * Copyright (c) 2003, 2018, Oracle and/or its affiliates. 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
24
25 #include "precompiled.hpp"
26 #include "classfile/systemDictionary.hpp"
27 #include "code/nmethod.hpp"
28 #include "code/pcDesc.hpp"
29 #include "code/scopeDesc.hpp"
30 #include "interpreter/interpreter.hpp"
31 #include "jvmtifiles/jvmtiEnv.hpp"
32 #include "logging/log.hpp"
33 #include "logging/logStream.hpp"
34 #include "memory/allocation.inline.hpp"
35 #include "memory/resourceArea.hpp"
36 #include "oops/objArrayKlass.hpp"
37 #include "oops/objArrayOop.hpp"
38 #include "oops/oop.inline.hpp"
39 #include "prims/jvmtiCodeBlobEvents.hpp"
40 #include "prims/jvmtiEventController.hpp"
41 #include "prims/jvmtiEventController.inline.hpp"
42 #include "prims/jvmtiExport.hpp"
43 #include "prims/jvmtiImpl.hpp"
44 #include "prims/jvmtiManageCapabilities.hpp"
45 #include "prims/jvmtiRawMonitor.hpp"
46 #include "prims/jvmtiRedefineClasses.hpp"
47 #include "prims/jvmtiTagMap.hpp"
48 #include "prims/jvmtiThreadState.inline.hpp"
49 #include "runtime/arguments.hpp"
50 #include "runtime/handles.hpp"
51 #include "runtime/interfaceSupport.inline.hpp"
52 #include "runtime/javaCalls.hpp"
53 #include "runtime/jniHandles.inline.hpp"
54 #include "runtime/objectMonitor.hpp"
55 #include "runtime/objectMonitor.inline.hpp"
56 #include "runtime/os.inline.hpp"
57 #include "runtime/thread.inline.hpp"
58 #include "runtime/threadSMR.hpp"
59 #include "runtime/vframe.hpp"
60 #include "utilities/macros.hpp"
61 #if INCLUDE_ALL_GCS
62 #include "gc/parallel/psMarkSweep.hpp"
63 #endif // INCLUDE_ALL_GCS
64
65 #ifdef JVMTI_TRACE
66 #define EVT_TRACE(evt,out) if ((JvmtiTrace::event_trace_flags(evt) & JvmtiTrace::SHOW_EVENT_SENT) != 0) { SafeResourceMark rm; log_trace(jvmti) out; }
67 #define EVT_TRIG_TRACE(evt,out) if ((JvmtiTrace::event_trace_flags(evt) & JvmtiTrace::SHOW_EVENT_TRIGGER) != 0) { SafeResourceMark rm; log_trace(jvmti) out; }
68 #else
69 #define EVT_TRIG_TRACE(evt,out)
70 #define EVT_TRACE(evt,out)
71 #endif
72
73 ///////////////////////////////////////////////////////////////
74 //
75 // JvmtiEventTransition
76 //
77 // TO DO --
78 // more handle purging
79
80 // Use this for JavaThreads and state is _thread_in_vm.
81 class JvmtiJavaThreadEventTransition : StackObj {
82 private:
83 ResourceMark _rm;
84 ThreadToNativeFromVM _transition;
85 HandleMark _hm;
86
87 public:
88 JvmtiJavaThreadEventTransition(JavaThread *thread) :
89 _rm(),
90 _transition(thread),
91 _hm(thread) {};
92 };
93
94 // For JavaThreads which are not in _thread_in_vm state
95 // and other system threads use this.
96 class JvmtiThreadEventTransition : StackObj {
97 private:
98 ResourceMark _rm;
99 HandleMark _hm;
100 JavaThreadState _saved_state;
101 JavaThread *_jthread;
102
103 public:
104 JvmtiThreadEventTransition(Thread *thread) : _rm(), _hm() {
105 if (thread->is_Java_thread()) {
106 _jthread = (JavaThread *)thread;
107 _saved_state = _jthread->thread_state();
108 if (_saved_state == _thread_in_Java) {
109 ThreadStateTransition::transition_from_java(_jthread, _thread_in_native);
110 } else {
111 ThreadStateTransition::transition(_jthread, _saved_state, _thread_in_native);
112 }
113 } else {
114 _jthread = NULL;
115 }
116 }
117
118 ~JvmtiThreadEventTransition() {
119 if (_jthread != NULL)
120 ThreadStateTransition::transition_from_native(_jthread, _saved_state);
121 }
122 };
123
124
125 ///////////////////////////////////////////////////////////////
126 //
127 // JvmtiEventMark
128 //
129
130 class JvmtiEventMark : public StackObj {
131 private:
132 JavaThread *_thread;
133 JNIEnv* _jni_env;
134 JvmtiThreadState::ExceptionState _saved_exception_state;
135 #if 0
136 JNIHandleBlock* _hblock;
137 #endif
138
139 public:
140 JvmtiEventMark(JavaThread *thread) : _thread(thread),
141 _jni_env(thread->jni_environment()),
142 _saved_exception_state(JvmtiThreadState::ES_CLEARED) {
143 #if 0
144 _hblock = thread->active_handles();
145 _hblock->clear_thoroughly(); // so we can be safe
146 #else
147 // we want to use the code above - but that needs the JNIHandle changes - later...
148 // for now, steal JNI push local frame code
149 JvmtiThreadState *state = thread->jvmti_thread_state();
150 // we are before an event.
151 // Save current jvmti thread exception state.
152 if (state != NULL) {
153 _saved_exception_state = state->get_exception_state();
154 }
155
156 JNIHandleBlock* old_handles = thread->active_handles();
157 JNIHandleBlock* new_handles = JNIHandleBlock::allocate_block(thread);
158 assert(new_handles != NULL, "should not be NULL");
159 new_handles->set_pop_frame_link(old_handles);
160 thread->set_active_handles(new_handles);
161 #endif
162 assert(thread == JavaThread::current(), "thread must be current!");
163 thread->frame_anchor()->make_walkable(thread);
164 };
165
166 ~JvmtiEventMark() {
167 #if 0
168 _hblock->clear(); // for consistency with future correct behavior
169 #else
170 // we want to use the code above - but that needs the JNIHandle changes - later...
171 // for now, steal JNI pop local frame code
172 JNIHandleBlock* old_handles = _thread->active_handles();
173 JNIHandleBlock* new_handles = old_handles->pop_frame_link();
174 assert(new_handles != NULL, "should not be NULL");
175 _thread->set_active_handles(new_handles);
176 // Note that we set the pop_frame_link to NULL explicitly, otherwise
177 // the release_block call will release the blocks.
178 old_handles->set_pop_frame_link(NULL);
179 JNIHandleBlock::release_block(old_handles, _thread); // may block
180 #endif
181
182 JvmtiThreadState* state = _thread->jvmti_thread_state();
183 // we are continuing after an event.
184 if (state != NULL) {
185 // Restore the jvmti thread exception state.
186 state->restore_exception_state(_saved_exception_state);
187 }
188 }
189
190 #if 0
191 jobject to_jobject(oop obj) { return obj == NULL? NULL : _hblock->allocate_handle_fast(obj); }
192 #else
193 // we want to use the code above - but that needs the JNIHandle changes - later...
194 // for now, use regular make_local
195 jobject to_jobject(oop obj) { return JNIHandles::make_local(_thread,obj); }
196 #endif
197
198 jclass to_jclass(Klass* klass) { return (klass == NULL ? NULL : (jclass)to_jobject(klass->java_mirror())); }
199
200 jmethodID to_jmethodID(const methodHandle& method) { return method->jmethod_id(); }
201
202 JNIEnv* jni_env() { return _jni_env; }
203 };
204
205 class JvmtiThreadEventMark : public JvmtiEventMark {
206 private:
207 jthread _jt;
208
209 public:
210 JvmtiThreadEventMark(JavaThread *thread) :
211 JvmtiEventMark(thread) {
212 _jt = (jthread)(to_jobject(thread->threadObj()));
213 };
214 jthread jni_thread() { return _jt; }
215 };
216
217 class JvmtiClassEventMark : public JvmtiThreadEventMark {
218 private:
219 jclass _jc;
220
221 public:
222 JvmtiClassEventMark(JavaThread *thread, Klass* klass) :
223 JvmtiThreadEventMark(thread) {
224 _jc = to_jclass(klass);
225 };
226 jclass jni_class() { return _jc; }
227 };
228
229 class JvmtiMethodEventMark : public JvmtiThreadEventMark {
230 private:
231 jmethodID _mid;
232
233 public:
234 JvmtiMethodEventMark(JavaThread *thread, const methodHandle& method) :
235 JvmtiThreadEventMark(thread),
236 _mid(to_jmethodID(method)) {};
237 jmethodID jni_methodID() { return _mid; }
238 };
239
240 class JvmtiLocationEventMark : public JvmtiMethodEventMark {
241 private:
242 jlocation _loc;
243
244 public:
245 JvmtiLocationEventMark(JavaThread *thread, const methodHandle& method, address location) :
246 JvmtiMethodEventMark(thread, method),
247 _loc(location - method->code_base()) {};
248 jlocation location() { return _loc; }
249 };
250
251 class JvmtiExceptionEventMark : public JvmtiLocationEventMark {
252 private:
253 jobject _exc;
254
255 public:
256 JvmtiExceptionEventMark(JavaThread *thread, const methodHandle& method, address location, Handle exception) :
257 JvmtiLocationEventMark(thread, method, location),
258 _exc(to_jobject(exception())) {};
259 jobject exception() { return _exc; }
260 };
261
262 class JvmtiClassFileLoadEventMark : public JvmtiThreadEventMark {
263 private:
264 const char *_class_name;
265 jobject _jloader;
266 jobject _protection_domain;
267 jclass _class_being_redefined;
268
269 public:
270 JvmtiClassFileLoadEventMark(JavaThread *thread, Symbol* name,
271 Handle class_loader, Handle prot_domain, Klass* class_being_redefined) : JvmtiThreadEventMark(thread) {
272 _class_name = name != NULL? name->as_utf8() : NULL;
273 _jloader = (jobject)to_jobject(class_loader());
274 _protection_domain = (jobject)to_jobject(prot_domain());
275 if (class_being_redefined == NULL) {
276 _class_being_redefined = NULL;
277 } else {
278 _class_being_redefined = (jclass)to_jclass(class_being_redefined);
279 }
280 };
281 const char *class_name() {
282 return _class_name;
283 }
284 jobject jloader() {
285 return _jloader;
286 }
287 jobject protection_domain() {
288 return _protection_domain;
289 }
290 jclass class_being_redefined() {
291 return _class_being_redefined;
292 }
293 };
294
295 //////////////////////////////////////////////////////////////////////////////
296
297 int JvmtiExport::_field_access_count = 0;
298 int JvmtiExport::_field_modification_count = 0;
299
300 bool JvmtiExport::_can_access_local_variables = false;
301 bool JvmtiExport::_can_hotswap_or_post_breakpoint = false;
302 bool JvmtiExport::_can_modify_any_class = false;
303 bool JvmtiExport::_can_walk_any_space = false;
304
305 bool JvmtiExport::_has_redefined_a_class = false;
306 bool JvmtiExport::_all_dependencies_are_recorded = false;
307
308 //
309 // field access management
310 //
311
312 // interpreter generator needs the address of the counter
313 address JvmtiExport::get_field_access_count_addr() {
314 // We don't grab a lock because we don't want to
315 // serialize field access between all threads. This means that a
316 // thread on another processor can see the wrong count value and
317 // may either miss making a needed call into post_field_access()
318 // or will make an unneeded call into post_field_access(). We pay
319 // this price to avoid slowing down the VM when we aren't watching
320 // field accesses.
321 // Other access/mutation safe by virtue of being in VM state.
322 return (address)(&_field_access_count);
323 }
324
325 //
326 // field modification management
327 //
328
329 // interpreter generator needs the address of the counter
330 address JvmtiExport::get_field_modification_count_addr() {
331 // We don't grab a lock because we don't
332 // want to serialize field modification between all threads. This
333 // means that a thread on another processor can see the wrong
334 // count value and may either miss making a needed call into
335 // post_field_modification() or will make an unneeded call into
336 // post_field_modification(). We pay this price to avoid slowing
337 // down the VM when we aren't watching field modifications.
338 // Other access/mutation safe by virtue of being in VM state.
339 return (address)(&_field_modification_count);
340 }
341
342
343 ///////////////////////////////////////////////////////////////
344 // Functions needed by java.lang.instrument for starting up javaagent.
345 ///////////////////////////////////////////////////////////////
346
347 jint
348 JvmtiExport::get_jvmti_interface(JavaVM *jvm, void **penv, jint version) {
349 // The JVMTI_VERSION_INTERFACE_JVMTI part of the version number
350 // has already been validated in JNI GetEnv().
351 int major, minor, micro;
352
353 // micro version doesn't matter here (yet?)
354 decode_version_values(version, &major, &minor, µ);
355 switch (major) {
356 case 1:
357 switch (minor) {
358 case 0: // version 1.0.<micro> is recognized
359 case 1: // version 1.1.<micro> is recognized
360 case 2: // version 1.2.<micro> is recognized
361 break;
362
363 default:
364 return JNI_EVERSION; // unsupported minor version number
365 }
366 break;
367 case 9:
368 switch (minor) {
369 case 0: // version 9.0.<micro> is recognized
370 break;
371 default:
372 return JNI_EVERSION; // unsupported minor version number
373 }
374 break;
375 default:
376 return JNI_EVERSION; // unsupported major version number
377 }
378
379 if (JvmtiEnv::get_phase() == JVMTI_PHASE_LIVE) {
380 JavaThread* current_thread = JavaThread::current();
381 // transition code: native to VM
382 ThreadInVMfromNative __tiv(current_thread);
383 VM_ENTRY_BASE(jvmtiEnv*, JvmtiExport::get_jvmti_interface, current_thread)
384 debug_only(VMNativeEntryWrapper __vew;)
385
386 JvmtiEnv *jvmti_env = JvmtiEnv::create_a_jvmti(version);
387 *penv = jvmti_env->jvmti_external(); // actual type is jvmtiEnv* -- not to be confused with JvmtiEnv*
388 return JNI_OK;
389
390 } else if (JvmtiEnv::get_phase() == JVMTI_PHASE_ONLOAD) {
391 // not live, no thread to transition
392 JvmtiEnv *jvmti_env = JvmtiEnv::create_a_jvmti(version);
393 *penv = jvmti_env->jvmti_external(); // actual type is jvmtiEnv* -- not to be confused with JvmtiEnv*
394 return JNI_OK;
395
396 } else {
397 // Called at the wrong time
398 *penv = NULL;
399 return JNI_EDETACHED;
400 }
401 }
402
403 void
404 JvmtiExport::add_default_read_edges(Handle h_module, TRAPS) {
405 if (!Universe::is_module_initialized()) {
406 return; // extra safety
407 }
408 assert(!h_module.is_null(), "module should always be set");
409
410 // Invoke the transformedByAgent method
411 JavaValue result(T_VOID);
412 JavaCalls::call_static(&result,
413 SystemDictionary::module_Modules_klass(),
414 vmSymbols::transformedByAgent_name(),
415 vmSymbols::transformedByAgent_signature(),
416 h_module,
417 THREAD);
418
419 if (HAS_PENDING_EXCEPTION) {
420 LogTarget(Trace, jvmti) log;
421 LogStream log_stream(log);
422 java_lang_Throwable::print(PENDING_EXCEPTION, &log_stream);
423 log_stream.cr();
424 CLEAR_PENDING_EXCEPTION;
425 return;
426 }
427 }
428
429 jvmtiError
430 JvmtiExport::add_module_reads(Handle module, Handle to_module, TRAPS) {
431 if (!Universe::is_module_initialized()) {
432 return JVMTI_ERROR_NONE; // extra safety
433 }
434 assert(!module.is_null(), "module should always be set");
435 assert(!to_module.is_null(), "to_module should always be set");
436
437 // Invoke the addReads method
438 JavaValue result(T_VOID);
439 JavaCalls::call_static(&result,
440 SystemDictionary::module_Modules_klass(),
441 vmSymbols::addReads_name(),
442 vmSymbols::addReads_signature(),
443 module,
444 to_module,
445 THREAD);
446
447 if (HAS_PENDING_EXCEPTION) {
448 LogTarget(Trace, jvmti) log;
449 LogStream log_stream(log);
450 java_lang_Throwable::print(PENDING_EXCEPTION, &log_stream);
451 log_stream.cr();
452 CLEAR_PENDING_EXCEPTION;
453 return JVMTI_ERROR_INTERNAL;
454 }
455 return JVMTI_ERROR_NONE;
456 }
457
458 jvmtiError
459 JvmtiExport::add_module_exports(Handle module, Handle pkg_name, Handle to_module, TRAPS) {
460 if (!Universe::is_module_initialized()) {
461 return JVMTI_ERROR_NONE; // extra safety
462 }
463 assert(!module.is_null(), "module should always be set");
464 assert(!to_module.is_null(), "to_module should always be set");
465 assert(!pkg_name.is_null(), "pkg_name should always be set");
466
467 // Invoke the addExports method
468 JavaValue result(T_VOID);
469 JavaCalls::call_static(&result,
470 SystemDictionary::module_Modules_klass(),
471 vmSymbols::addExports_name(),
472 vmSymbols::addExports_signature(),
473 module,
474 pkg_name,
475 to_module,
476 THREAD);
477
478 if (HAS_PENDING_EXCEPTION) {
479 Symbol* ex_name = PENDING_EXCEPTION->klass()->name();
480 LogTarget(Trace, jvmti) log;
481 LogStream log_stream(log);
482 java_lang_Throwable::print(PENDING_EXCEPTION, &log_stream);
483 log_stream.cr();
484 CLEAR_PENDING_EXCEPTION;
485 if (ex_name == vmSymbols::java_lang_IllegalArgumentException()) {
486 return JVMTI_ERROR_ILLEGAL_ARGUMENT;
487 }
488 return JVMTI_ERROR_INTERNAL;
489 }
490 return JVMTI_ERROR_NONE;
491 }
492
493 jvmtiError
494 JvmtiExport::add_module_opens(Handle module, Handle pkg_name, Handle to_module, TRAPS) {
495 if (!Universe::is_module_initialized()) {
496 return JVMTI_ERROR_NONE; // extra safety
497 }
498 assert(!module.is_null(), "module should always be set");
499 assert(!to_module.is_null(), "to_module should always be set");
500 assert(!pkg_name.is_null(), "pkg_name should always be set");
501
502 // Invoke the addOpens method
503 JavaValue result(T_VOID);
504 JavaCalls::call_static(&result,
505 SystemDictionary::module_Modules_klass(),
506 vmSymbols::addOpens_name(),
507 vmSymbols::addExports_signature(),
508 module,
509 pkg_name,
510 to_module,
511 THREAD);
512
513 if (HAS_PENDING_EXCEPTION) {
514 Symbol* ex_name = PENDING_EXCEPTION->klass()->name();
515 LogTarget(Trace, jvmti) log;
516 LogStream log_stream(log);
517 java_lang_Throwable::print(PENDING_EXCEPTION, &log_stream);
518 log_stream.cr();
519 CLEAR_PENDING_EXCEPTION;
520 if (ex_name == vmSymbols::java_lang_IllegalArgumentException()) {
521 return JVMTI_ERROR_ILLEGAL_ARGUMENT;
522 }
523 return JVMTI_ERROR_INTERNAL;
524 }
525 return JVMTI_ERROR_NONE;
526 }
527
528 jvmtiError
529 JvmtiExport::add_module_uses(Handle module, Handle service, TRAPS) {
530 if (!Universe::is_module_initialized()) {
531 return JVMTI_ERROR_NONE; // extra safety
532 }
533 assert(!module.is_null(), "module should always be set");
534 assert(!service.is_null(), "service should always be set");
535
536 // Invoke the addUses method
537 JavaValue result(T_VOID);
538 JavaCalls::call_static(&result,
539 SystemDictionary::module_Modules_klass(),
540 vmSymbols::addUses_name(),
541 vmSymbols::addUses_signature(),
542 module,
543 service,
544 THREAD);
545
546 if (HAS_PENDING_EXCEPTION) {
547 LogTarget(Trace, jvmti) log;
548 LogStream log_stream(log);
549 java_lang_Throwable::print(PENDING_EXCEPTION, &log_stream);
550 log_stream.cr();
551 CLEAR_PENDING_EXCEPTION;
552 return JVMTI_ERROR_INTERNAL;
553 }
554 return JVMTI_ERROR_NONE;
555 }
556
557 jvmtiError
558 JvmtiExport::add_module_provides(Handle module, Handle service, Handle impl_class, TRAPS) {
559 if (!Universe::is_module_initialized()) {
560 return JVMTI_ERROR_NONE; // extra safety
561 }
562 assert(!module.is_null(), "module should always be set");
563 assert(!service.is_null(), "service should always be set");
564 assert(!impl_class.is_null(), "impl_class should always be set");
565
566 // Invoke the addProvides method
567 JavaValue result(T_VOID);
568 JavaCalls::call_static(&result,
569 SystemDictionary::module_Modules_klass(),
570 vmSymbols::addProvides_name(),
571 vmSymbols::addProvides_signature(),
572 module,
573 service,
574 impl_class,
575 THREAD);
576
577 if (HAS_PENDING_EXCEPTION) {
578 LogTarget(Trace, jvmti) log;
579 LogStream log_stream(log);
580 java_lang_Throwable::print(PENDING_EXCEPTION, &log_stream);
581 log_stream.cr();
582 CLEAR_PENDING_EXCEPTION;
583 return JVMTI_ERROR_INTERNAL;
584 }
585 return JVMTI_ERROR_NONE;
586 }
587
588 void
589 JvmtiExport::decode_version_values(jint version, int * major, int * minor,
590 int * micro) {
591 *major = (version & JVMTI_VERSION_MASK_MAJOR) >> JVMTI_VERSION_SHIFT_MAJOR;
592 *minor = (version & JVMTI_VERSION_MASK_MINOR) >> JVMTI_VERSION_SHIFT_MINOR;
593 *micro = (version & JVMTI_VERSION_MASK_MICRO) >> JVMTI_VERSION_SHIFT_MICRO;
594 }
595
596 void JvmtiExport::enter_primordial_phase() {
597 JvmtiEnvBase::set_phase(JVMTI_PHASE_PRIMORDIAL);
598 }
599
600 void JvmtiExport::enter_early_start_phase() {
601 set_early_vmstart_recorded(true);
602 }
603
604 void JvmtiExport::enter_start_phase() {
605 JvmtiEnvBase::set_phase(JVMTI_PHASE_START);
606 }
607
608 void JvmtiExport::enter_onload_phase() {
609 JvmtiEnvBase::set_phase(JVMTI_PHASE_ONLOAD);
610 }
611
612 void JvmtiExport::enter_live_phase() {
613 JvmtiEnvBase::set_phase(JVMTI_PHASE_LIVE);
614 }
615
616 //
617 // JVMTI events that the VM posts to the debugger and also startup agent
618 // and call the agent's premain() for java.lang.instrument.
619 //
620
621 void JvmtiExport::post_early_vm_start() {
622 EVT_TRIG_TRACE(JVMTI_EVENT_VM_START, ("Trg Early VM start event triggered" ));
623
624 // can now enable some events
625 JvmtiEventController::vm_start();
626
627 JvmtiEnvIterator it;
628 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
629 // Only early vmstart envs post early VMStart event
630 if (env->early_vmstart_env() && env->is_enabled(JVMTI_EVENT_VM_START)) {
631 EVT_TRACE(JVMTI_EVENT_VM_START, ("Evt Early VM start event sent" ));
632 JavaThread *thread = JavaThread::current();
633 JvmtiThreadEventMark jem(thread);
634 JvmtiJavaThreadEventTransition jet(thread);
635 jvmtiEventVMStart callback = env->callbacks()->VMStart;
636 if (callback != NULL) {
637 (*callback)(env->jvmti_external(), jem.jni_env());
638 }
639 }
640 }
641 }
642
643 void JvmtiExport::post_vm_start() {
644 EVT_TRIG_TRACE(JVMTI_EVENT_VM_START, ("Trg VM start event triggered" ));
645
646 // can now enable some events
647 JvmtiEventController::vm_start();
648
649 JvmtiEnvIterator it;
650 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
651 // Early vmstart envs do not post normal VMStart event
652 if (!env->early_vmstart_env() && env->is_enabled(JVMTI_EVENT_VM_START)) {
653 EVT_TRACE(JVMTI_EVENT_VM_START, ("Evt VM start event sent" ));
654
655 JavaThread *thread = JavaThread::current();
656 JvmtiThreadEventMark jem(thread);
657 JvmtiJavaThreadEventTransition jet(thread);
658 jvmtiEventVMStart callback = env->callbacks()->VMStart;
659 if (callback != NULL) {
660 (*callback)(env->jvmti_external(), jem.jni_env());
661 }
662 }
663 }
664 }
665
666
667 void JvmtiExport::post_vm_initialized() {
668 EVT_TRIG_TRACE(JVMTI_EVENT_VM_INIT, ("Trg VM init event triggered" ));
669
670 // can now enable events
671 JvmtiEventController::vm_init();
672
673 JvmtiEnvIterator it;
674 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
675 if (env->is_enabled(JVMTI_EVENT_VM_INIT)) {
676 EVT_TRACE(JVMTI_EVENT_VM_INIT, ("Evt VM init event sent" ));
677
678 JavaThread *thread = JavaThread::current();
679 JvmtiThreadEventMark jem(thread);
680 JvmtiJavaThreadEventTransition jet(thread);
681 jvmtiEventVMInit callback = env->callbacks()->VMInit;
682 if (callback != NULL) {
683 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread());
684 }
685 }
686 }
687 }
688
689
690 void JvmtiExport::post_vm_death() {
691 EVT_TRIG_TRACE(JVMTI_EVENT_VM_DEATH, ("Trg VM death event triggered" ));
692
693 JvmtiEnvIterator it;
694 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
695 if (env->is_enabled(JVMTI_EVENT_VM_DEATH)) {
696 EVT_TRACE(JVMTI_EVENT_VM_DEATH, ("Evt VM death event sent" ));
697
698 JavaThread *thread = JavaThread::current();
699 JvmtiEventMark jem(thread);
700 JvmtiJavaThreadEventTransition jet(thread);
701 jvmtiEventVMDeath callback = env->callbacks()->VMDeath;
702 if (callback != NULL) {
703 (*callback)(env->jvmti_external(), jem.jni_env());
704 }
705 }
706 }
707
708 JvmtiEnvBase::set_phase(JVMTI_PHASE_DEAD);
709 JvmtiEventController::vm_death();
710 }
711
712 char**
713 JvmtiExport::get_all_native_method_prefixes(int* count_ptr) {
714 // Have to grab JVMTI thread state lock to be sure environment doesn't
715 // go away while we iterate them. No locks during VM bring-up.
716 if (Threads::number_of_threads() == 0 || SafepointSynchronize::is_at_safepoint()) {
717 return JvmtiEnvBase::get_all_native_method_prefixes(count_ptr);
718 } else {
719 MutexLocker mu(JvmtiThreadState_lock);
720 return JvmtiEnvBase::get_all_native_method_prefixes(count_ptr);
721 }
722 }
723
724 // Convert an external thread reference to a JavaThread found on the
725 // specified ThreadsList. The ThreadsListHandle in the caller "protects"
726 // the returned JavaThread *.
727 //
728 // If thread_oop_p is not NULL, then the caller wants to use the oop
729 // after this call so the oop is returned. On success, *jt_pp is set
730 // to the converted JavaThread * and JVMTI_ERROR_NONE is returned.
731 // On error, returns various JVMTI_ERROR_* values.
732 //
733 jvmtiError
734 JvmtiExport::cv_external_thread_to_JavaThread(ThreadsList * t_list,
735 jthread thread,
736 JavaThread ** jt_pp,
737 oop * thread_oop_p) {
738 assert(t_list != NULL, "must have a ThreadsList");
739 assert(jt_pp != NULL, "must have a return JavaThread pointer");
740 // thread_oop_p is optional so no assert()
741
742 oop thread_oop = JNIHandles::resolve_external_guard(thread);
743 if (thread_oop == NULL) {
744 // NULL jthread, GC'ed jthread or a bad JNI handle.
745 return JVMTI_ERROR_INVALID_THREAD;
746 }
747 // Looks like an oop at this point.
748
749 if (!thread_oop->is_a(SystemDictionary::Thread_klass())) {
750 // The oop is not a java.lang.Thread.
751 return JVMTI_ERROR_INVALID_THREAD;
752 }
753 // Looks like a java.lang.Thread oop at this point.
754
755 if (thread_oop_p != NULL) {
756 // Return the oop to the caller; the caller may still want
757 // the oop even if this function returns an error.
758 *thread_oop_p = thread_oop;
759 }
760
761 JavaThread * java_thread = java_lang_Thread::thread(thread_oop);
762 if (java_thread == NULL) {
763 // The java.lang.Thread does not contain a JavaThread * so it has
764 // not yet run or it has died.
765 return JVMTI_ERROR_THREAD_NOT_ALIVE;
766 }
767 // Looks like a live JavaThread at this point.
768
769 // We do not check the EnableThreadSMRExtraValidityChecks option
770 // for this includes() call because JVM/TI's spec is tighter.
771 if (!t_list->includes(java_thread)) {
772 // Not on the JavaThreads list so it is not alive.
773 return JVMTI_ERROR_THREAD_NOT_ALIVE;
774 }
775
776 // Return a live JavaThread that is "protected" by the
777 // ThreadsListHandle in the caller.
778 *jt_pp = java_thread;
779
780 return JVMTI_ERROR_NONE;
781 }
782
783 // Convert an oop to a JavaThread found on the specified ThreadsList.
784 // The ThreadsListHandle in the caller "protects" the returned
785 // JavaThread *.
786 //
787 // On success, *jt_pp is set to the converted JavaThread * and
788 // JVMTI_ERROR_NONE is returned. On error, returns various
789 // JVMTI_ERROR_* values.
790 //
791 jvmtiError
792 JvmtiExport::cv_oop_to_JavaThread(ThreadsList * t_list, oop thread_oop,
793 JavaThread ** jt_pp) {
794 assert(t_list != NULL, "must have a ThreadsList");
795 assert(thread_oop != NULL, "must have an oop");
796 assert(jt_pp != NULL, "must have a return JavaThread pointer");
797
798 if (!thread_oop->is_a(SystemDictionary::Thread_klass())) {
799 // The oop is not a java.lang.Thread.
800 return JVMTI_ERROR_INVALID_THREAD;
801 }
802 // Looks like a java.lang.Thread oop at this point.
803
804 JavaThread * java_thread = java_lang_Thread::thread(thread_oop);
805 if (java_thread == NULL) {
806 // The java.lang.Thread does not contain a JavaThread * so it has
807 // not yet run or it has died.
808 return JVMTI_ERROR_THREAD_NOT_ALIVE;
809 }
810 // Looks like a live JavaThread at this point.
811
812 // We do not check the EnableThreadSMRExtraValidityChecks option
813 // for this includes() call because JVM/TI's spec is tighter.
814 if (!t_list->includes(java_thread)) {
815 // Not on the JavaThreads list so it is not alive.
816 return JVMTI_ERROR_THREAD_NOT_ALIVE;
817 }
818
819 // Return a live JavaThread that is "protected" by the
820 // ThreadsListHandle in the caller.
821 *jt_pp = java_thread;
822
823 return JVMTI_ERROR_NONE;
824 }
825
826 class JvmtiClassFileLoadHookPoster : public StackObj {
827 private:
828 Symbol* _h_name;
829 Handle _class_loader;
830 Handle _h_protection_domain;
831 unsigned char ** _data_ptr;
832 unsigned char ** _end_ptr;
833 JavaThread * _thread;
834 jint _curr_len;
835 unsigned char * _curr_data;
836 JvmtiEnv * _curr_env;
837 JvmtiCachedClassFileData ** _cached_class_file_ptr;
838 JvmtiThreadState * _state;
839 Klass* _class_being_redefined;
840 JvmtiClassLoadKind _load_kind;
841 bool _has_been_modified;
842
843 public:
844 inline JvmtiClassFileLoadHookPoster(Symbol* h_name, Handle class_loader,
845 Handle h_protection_domain,
846 unsigned char **data_ptr, unsigned char **end_ptr,
847 JvmtiCachedClassFileData **cache_ptr) {
848 _h_name = h_name;
849 _class_loader = class_loader;
850 _h_protection_domain = h_protection_domain;
851 _data_ptr = data_ptr;
852 _end_ptr = end_ptr;
853 _thread = JavaThread::current();
854 _curr_len = *end_ptr - *data_ptr;
855 _curr_data = *data_ptr;
856 _curr_env = NULL;
857 _cached_class_file_ptr = cache_ptr;
858 _has_been_modified = false;
859
860 _state = _thread->jvmti_thread_state();
861 if (_state != NULL) {
862 _class_being_redefined = _state->get_class_being_redefined();
863 _load_kind = _state->get_class_load_kind();
864 Klass* klass = (_class_being_redefined == NULL) ? NULL : _class_being_redefined;
865 if (_load_kind != jvmti_class_load_kind_load && klass != NULL) {
866 ModuleEntry* module_entry = InstanceKlass::cast(klass)->module();
867 assert(module_entry != NULL, "module_entry should always be set");
868 if (module_entry->is_named() &&
869 module_entry->module() != NULL &&
870 !module_entry->has_default_read_edges()) {
871 if (!module_entry->set_has_default_read_edges()) {
872 // We won a potential race.
873 // Add read edges to the unnamed modules of the bootstrap and app class loaders
874 Handle class_module(_thread, module_entry->module()); // Obtain j.l.r.Module
875 JvmtiExport::add_default_read_edges(class_module, _thread);
876 }
877 }
878 }
879 // Clear class_being_redefined flag here. The action
880 // from agent handler could generate a new class file load
881 // hook event and if it is not cleared the new event generated
882 // from regular class file load could have this stale redefined
883 // class handle info.
884 _state->clear_class_being_redefined();
885 } else {
886 // redefine and retransform will always set the thread state
887 _class_being_redefined = NULL;
888 _load_kind = jvmti_class_load_kind_load;
889 }
890 }
891
892 void post() {
893 post_all_envs();
894 copy_modified_data();
895 }
896
897 bool has_been_modified() { return _has_been_modified; }
898
899 private:
900 void post_all_envs() {
901 if (_load_kind != jvmti_class_load_kind_retransform) {
902 // for class load and redefine,
903 // call the non-retransformable agents
904 JvmtiEnvIterator it;
905 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
906 if (!env->is_retransformable() && env->is_enabled(JVMTI_EVENT_CLASS_FILE_LOAD_HOOK)) {
907 // non-retransformable agents cannot retransform back,
908 // so no need to cache the original class file bytes
909 post_to_env(env, false);
910 }
911 }
912 }
913 JvmtiEnvIterator it;
914 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
915 // retransformable agents get all events
916 if (env->is_retransformable() && env->is_enabled(JVMTI_EVENT_CLASS_FILE_LOAD_HOOK)) {
917 // retransformable agents need to cache the original class file
918 // bytes if changes are made via the ClassFileLoadHook
919 post_to_env(env, true);
920 }
921 }
922 }
923
924 void post_to_env(JvmtiEnv* env, bool caching_needed) {
925 if (env->phase() == JVMTI_PHASE_PRIMORDIAL && !env->early_class_hook_env()) {
926 return;
927 }
928 unsigned char *new_data = NULL;
929 jint new_len = 0;
930 JvmtiClassFileLoadEventMark jem(_thread, _h_name, _class_loader,
931 _h_protection_domain,
932 _class_being_redefined);
933 JvmtiJavaThreadEventTransition jet(_thread);
934 jvmtiEventClassFileLoadHook callback = env->callbacks()->ClassFileLoadHook;
935 if (callback != NULL) {
936 (*callback)(env->jvmti_external(), jem.jni_env(),
937 jem.class_being_redefined(),
938 jem.jloader(), jem.class_name(),
939 jem.protection_domain(),
940 _curr_len, _curr_data,
941 &new_len, &new_data);
942 }
943 if (new_data != NULL) {
944 // this agent has modified class data.
945 _has_been_modified = true;
946 if (caching_needed && *_cached_class_file_ptr == NULL) {
947 // data has been changed by the new retransformable agent
948 // and it hasn't already been cached, cache it
949 JvmtiCachedClassFileData *p;
950 p = (JvmtiCachedClassFileData *)os::malloc(
951 offset_of(JvmtiCachedClassFileData, data) + _curr_len, mtInternal);
952 if (p == NULL) {
953 vm_exit_out_of_memory(offset_of(JvmtiCachedClassFileData, data) + _curr_len,
954 OOM_MALLOC_ERROR,
955 "unable to allocate cached copy of original class bytes");
956 }
957 p->length = _curr_len;
958 memcpy(p->data, _curr_data, _curr_len);
959 *_cached_class_file_ptr = p;
960 }
961
962 if (_curr_data != *_data_ptr) {
963 // curr_data is previous agent modified class data.
964 // And this has been changed by the new agent so
965 // we can delete it now.
966 _curr_env->Deallocate(_curr_data);
967 }
968
969 // Class file data has changed by the current agent.
970 _curr_data = new_data;
971 _curr_len = new_len;
972 // Save the current agent env we need this to deallocate the
973 // memory allocated by this agent.
974 _curr_env = env;
975 }
976 }
977
978 void copy_modified_data() {
979 // if one of the agent has modified class file data.
980 // Copy modified class data to new resources array.
981 if (_curr_data != *_data_ptr) {
982 *_data_ptr = NEW_RESOURCE_ARRAY(u1, _curr_len);
983 memcpy(*_data_ptr, _curr_data, _curr_len);
984 *_end_ptr = *_data_ptr + _curr_len;
985 _curr_env->Deallocate(_curr_data);
986 }
987 }
988 };
989
990 bool JvmtiExport::_should_post_class_file_load_hook = false;
991
992 // this entry is for class file load hook on class load, redefine and retransform
993 bool JvmtiExport::post_class_file_load_hook(Symbol* h_name,
994 Handle class_loader,
995 Handle h_protection_domain,
996 unsigned char **data_ptr,
997 unsigned char **end_ptr,
998 JvmtiCachedClassFileData **cache_ptr) {
999 if (JvmtiEnv::get_phase() < JVMTI_PHASE_PRIMORDIAL) {
1000 return false;
1001 }
1002
1003 JvmtiClassFileLoadHookPoster poster(h_name, class_loader,
1004 h_protection_domain,
1005 data_ptr, end_ptr,
1006 cache_ptr);
1007 poster.post();
1008 return poster.has_been_modified();
1009 }
1010
1011 void JvmtiExport::report_unsupported(bool on) {
1012 // If any JVMTI service is turned on, we need to exit before native code
1013 // tries to access nonexistant services.
1014 if (on) {
1015 vm_exit_during_initialization("Java Kernel does not support JVMTI.");
1016 }
1017 }
1018
1019
1020 static inline Klass* oop_to_klass(oop obj) {
1021 Klass* k = obj->klass();
1022
1023 // if the object is a java.lang.Class then return the java mirror
1024 if (k == SystemDictionary::Class_klass()) {
1025 if (!java_lang_Class::is_primitive(obj)) {
1026 k = java_lang_Class::as_Klass(obj);
1027 assert(k != NULL, "class for non-primitive mirror must exist");
1028 }
1029 }
1030 return k;
1031 }
1032
1033 class JvmtiVMObjectAllocEventMark : public JvmtiClassEventMark {
1034 private:
1035 jobject _jobj;
1036 jlong _size;
1037 public:
1038 JvmtiVMObjectAllocEventMark(JavaThread *thread, oop obj) : JvmtiClassEventMark(thread, oop_to_klass(obj)) {
1039 _jobj = (jobject)to_jobject(obj);
1040 _size = obj->size() * wordSize;
1041 };
1042 jobject jni_jobject() { return _jobj; }
1043 jlong size() { return _size; }
1044 };
1045
1046 class JvmtiCompiledMethodLoadEventMark : public JvmtiMethodEventMark {
1047 private:
1048 jint _code_size;
1049 const void *_code_data;
1050 jint _map_length;
1051 jvmtiAddrLocationMap *_map;
1052 const void *_compile_info;
1053 public:
1054 JvmtiCompiledMethodLoadEventMark(JavaThread *thread, nmethod *nm, void* compile_info_ptr = NULL)
1055 : JvmtiMethodEventMark(thread,methodHandle(thread, nm->method())) {
1056 _code_data = nm->insts_begin();
1057 _code_size = nm->insts_size();
1058 _compile_info = compile_info_ptr; // Set void pointer of compiledMethodLoad Event. Default value is NULL.
1059 JvmtiCodeBlobEvents::build_jvmti_addr_location_map(nm, &_map, &_map_length);
1060 }
1061 ~JvmtiCompiledMethodLoadEventMark() {
1062 FREE_C_HEAP_ARRAY(jvmtiAddrLocationMap, _map);
1063 }
1064
1065 jint code_size() { return _code_size; }
1066 const void *code_data() { return _code_data; }
1067 jint map_length() { return _map_length; }
1068 const jvmtiAddrLocationMap* map() { return _map; }
1069 const void *compile_info() { return _compile_info; }
1070 };
1071
1072
1073
1074 class JvmtiMonitorEventMark : public JvmtiThreadEventMark {
1075 private:
1076 jobject _jobj;
1077 public:
1078 JvmtiMonitorEventMark(JavaThread *thread, oop object)
1079 : JvmtiThreadEventMark(thread){
1080 _jobj = to_jobject(object);
1081 }
1082 jobject jni_object() { return _jobj; }
1083 };
1084
1085 ///////////////////////////////////////////////////////////////
1086 //
1087 // pending CompiledMethodUnload support
1088 //
1089
1090 void JvmtiExport::post_compiled_method_unload(
1091 jmethodID method, const void *code_begin) {
1092 if (JvmtiEnv::get_phase() < JVMTI_PHASE_PRIMORDIAL) {
1093 return;
1094 }
1095 JavaThread* thread = JavaThread::current();
1096 EVT_TRIG_TRACE(JVMTI_EVENT_COMPILED_METHOD_UNLOAD,
1097 ("[%s] method compile unload event triggered",
1098 JvmtiTrace::safe_get_thread_name(thread)));
1099
1100 // post the event for each environment that has this event enabled.
1101 JvmtiEnvIterator it;
1102 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1103 if (env->is_enabled(JVMTI_EVENT_COMPILED_METHOD_UNLOAD)) {
1104 if (env->phase() == JVMTI_PHASE_PRIMORDIAL) {
1105 continue;
1106 }
1107 EVT_TRACE(JVMTI_EVENT_COMPILED_METHOD_UNLOAD,
1108 ("[%s] class compile method unload event sent jmethodID " PTR_FORMAT,
1109 JvmtiTrace::safe_get_thread_name(thread), p2i(method)));
1110
1111 ResourceMark rm(thread);
1112
1113 JvmtiEventMark jem(thread);
1114 JvmtiJavaThreadEventTransition jet(thread);
1115 jvmtiEventCompiledMethodUnload callback = env->callbacks()->CompiledMethodUnload;
1116 if (callback != NULL) {
1117 (*callback)(env->jvmti_external(), method, code_begin);
1118 }
1119 }
1120 }
1121 }
1122
1123 ///////////////////////////////////////////////////////////////
1124 //
1125 // JvmtiExport
1126 //
1127
1128 void JvmtiExport::post_raw_breakpoint(JavaThread *thread, Method* method, address location) {
1129 HandleMark hm(thread);
1130 methodHandle mh(thread, method);
1131
1132 JvmtiThreadState *state = thread->jvmti_thread_state();
1133 if (state == NULL) {
1134 return;
1135 }
1136 EVT_TRIG_TRACE(JVMTI_EVENT_BREAKPOINT, ("[%s] Trg Breakpoint triggered",
1137 JvmtiTrace::safe_get_thread_name(thread)));
1138 JvmtiEnvThreadStateIterator it(state);
1139 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1140 ets->compare_and_set_current_location(mh(), location, JVMTI_EVENT_BREAKPOINT);
1141 if (!ets->breakpoint_posted() && ets->is_enabled(JVMTI_EVENT_BREAKPOINT)) {
1142 ThreadState old_os_state = thread->osthread()->get_state();
1143 thread->osthread()->set_state(BREAKPOINTED);
1144 EVT_TRACE(JVMTI_EVENT_BREAKPOINT, ("[%s] Evt Breakpoint sent %s.%s @ " INTX_FORMAT,
1145 JvmtiTrace::safe_get_thread_name(thread),
1146 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1147 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1148 location - mh()->code_base() ));
1149
1150 JvmtiEnv *env = ets->get_env();
1151 JvmtiLocationEventMark jem(thread, mh, location);
1152 JvmtiJavaThreadEventTransition jet(thread);
1153 jvmtiEventBreakpoint callback = env->callbacks()->Breakpoint;
1154 if (callback != NULL) {
1155 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1156 jem.jni_methodID(), jem.location());
1157 }
1158
1159 ets->set_breakpoint_posted();
1160 thread->osthread()->set_state(old_os_state);
1161 }
1162 }
1163 }
1164
1165 //////////////////////////////////////////////////////////////////////////////
1166
1167 bool JvmtiExport::_can_get_source_debug_extension = false;
1168 bool JvmtiExport::_can_maintain_original_method_order = false;
1169 bool JvmtiExport::_can_post_interpreter_events = false;
1170 bool JvmtiExport::_can_post_on_exceptions = false;
1171 bool JvmtiExport::_can_post_breakpoint = false;
1172 bool JvmtiExport::_can_post_field_access = false;
1173 bool JvmtiExport::_can_post_field_modification = false;
1174 bool JvmtiExport::_can_post_method_entry = false;
1175 bool JvmtiExport::_can_post_method_exit = false;
1176 bool JvmtiExport::_can_pop_frame = false;
1177 bool JvmtiExport::_can_force_early_return = false;
1178
1179 bool JvmtiExport::_early_vmstart_recorded = false;
1180
1181 bool JvmtiExport::_should_post_single_step = false;
1182 bool JvmtiExport::_should_post_field_access = false;
1183 bool JvmtiExport::_should_post_field_modification = false;
1184 bool JvmtiExport::_should_post_class_load = false;
1185 bool JvmtiExport::_should_post_class_prepare = false;
1186 bool JvmtiExport::_should_post_class_unload = false;
1187 bool JvmtiExport::_should_post_thread_life = false;
1188 bool JvmtiExport::_should_clean_up_heap_objects = false;
1189 bool JvmtiExport::_should_post_native_method_bind = false;
1190 bool JvmtiExport::_should_post_dynamic_code_generated = false;
1191 bool JvmtiExport::_should_post_data_dump = false;
1192 bool JvmtiExport::_should_post_compiled_method_load = false;
1193 bool JvmtiExport::_should_post_compiled_method_unload = false;
1194 bool JvmtiExport::_should_post_monitor_contended_enter = false;
1195 bool JvmtiExport::_should_post_monitor_contended_entered = false;
1196 bool JvmtiExport::_should_post_monitor_wait = false;
1197 bool JvmtiExport::_should_post_monitor_waited = false;
1198 bool JvmtiExport::_should_post_garbage_collection_start = false;
1199 bool JvmtiExport::_should_post_garbage_collection_finish = false;
1200 bool JvmtiExport::_should_post_object_free = false;
1201 bool JvmtiExport::_should_post_resource_exhausted = false;
1202 bool JvmtiExport::_should_post_vm_object_alloc = false;
1203 bool JvmtiExport::_should_post_on_exceptions = false;
1204
1205 ////////////////////////////////////////////////////////////////////////////////////////////////
1206
1207
1208 //
1209 // JVMTI single step management
1210 //
1211 void JvmtiExport::at_single_stepping_point(JavaThread *thread, Method* method, address location) {
1212 assert(JvmtiExport::should_post_single_step(), "must be single stepping");
1213
1214 HandleMark hm(thread);
1215 methodHandle mh(thread, method);
1216
1217 // update information about current location and post a step event
1218 JvmtiThreadState *state = thread->jvmti_thread_state();
1219 if (state == NULL) {
1220 return;
1221 }
1222 EVT_TRIG_TRACE(JVMTI_EVENT_SINGLE_STEP, ("[%s] Trg Single Step triggered",
1223 JvmtiTrace::safe_get_thread_name(thread)));
1224 if (!state->hide_single_stepping()) {
1225 if (state->is_pending_step_for_popframe()) {
1226 state->process_pending_step_for_popframe();
1227 }
1228 if (state->is_pending_step_for_earlyret()) {
1229 state->process_pending_step_for_earlyret();
1230 }
1231 JvmtiExport::post_single_step(thread, mh(), location);
1232 }
1233 }
1234
1235
1236 void JvmtiExport::expose_single_stepping(JavaThread *thread) {
1237 JvmtiThreadState *state = thread->jvmti_thread_state();
1238 if (state != NULL) {
1239 state->clear_hide_single_stepping();
1240 }
1241 }
1242
1243
1244 bool JvmtiExport::hide_single_stepping(JavaThread *thread) {
1245 JvmtiThreadState *state = thread->jvmti_thread_state();
1246 if (state != NULL && state->is_enabled(JVMTI_EVENT_SINGLE_STEP)) {
1247 state->set_hide_single_stepping();
1248 return true;
1249 } else {
1250 return false;
1251 }
1252 }
1253
1254 void JvmtiExport::post_class_load(JavaThread *thread, Klass* klass) {
1255 if (JvmtiEnv::get_phase() < JVMTI_PHASE_PRIMORDIAL) {
1256 return;
1257 }
1258 HandleMark hm(thread);
1259
1260 EVT_TRIG_TRACE(JVMTI_EVENT_CLASS_LOAD, ("[%s] Trg Class Load triggered",
1261 JvmtiTrace::safe_get_thread_name(thread)));
1262 JvmtiThreadState* state = thread->jvmti_thread_state();
1263 if (state == NULL) {
1264 return;
1265 }
1266 JvmtiEnvThreadStateIterator it(state);
1267 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1268 if (ets->is_enabled(JVMTI_EVENT_CLASS_LOAD)) {
1269 JvmtiEnv *env = ets->get_env();
1270 if (env->phase() == JVMTI_PHASE_PRIMORDIAL) {
1271 continue;
1272 }
1273 EVT_TRACE(JVMTI_EVENT_CLASS_LOAD, ("[%s] Evt Class Load sent %s",
1274 JvmtiTrace::safe_get_thread_name(thread),
1275 klass==NULL? "NULL" : klass->external_name() ));
1276 JvmtiClassEventMark jem(thread, klass);
1277 JvmtiJavaThreadEventTransition jet(thread);
1278 jvmtiEventClassLoad callback = env->callbacks()->ClassLoad;
1279 if (callback != NULL) {
1280 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_class());
1281 }
1282 }
1283 }
1284 }
1285
1286
1287 void JvmtiExport::post_class_prepare(JavaThread *thread, Klass* klass) {
1288 if (JvmtiEnv::get_phase() < JVMTI_PHASE_PRIMORDIAL) {
1289 return;
1290 }
1291 HandleMark hm(thread);
1292
1293 EVT_TRIG_TRACE(JVMTI_EVENT_CLASS_PREPARE, ("[%s] Trg Class Prepare triggered",
1294 JvmtiTrace::safe_get_thread_name(thread)));
1295 JvmtiThreadState* state = thread->jvmti_thread_state();
1296 if (state == NULL) {
1297 return;
1298 }
1299 JvmtiEnvThreadStateIterator it(state);
1300 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1301 if (ets->is_enabled(JVMTI_EVENT_CLASS_PREPARE)) {
1302 JvmtiEnv *env = ets->get_env();
1303 if (env->phase() == JVMTI_PHASE_PRIMORDIAL) {
1304 continue;
1305 }
1306 EVT_TRACE(JVMTI_EVENT_CLASS_PREPARE, ("[%s] Evt Class Prepare sent %s",
1307 JvmtiTrace::safe_get_thread_name(thread),
1308 klass==NULL? "NULL" : klass->external_name() ));
1309 JvmtiClassEventMark jem(thread, klass);
1310 JvmtiJavaThreadEventTransition jet(thread);
1311 jvmtiEventClassPrepare callback = env->callbacks()->ClassPrepare;
1312 if (callback != NULL) {
1313 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_class());
1314 }
1315 }
1316 }
1317 }
1318
1319 void JvmtiExport::post_class_unload(Klass* klass) {
1320 if (JvmtiEnv::get_phase() < JVMTI_PHASE_PRIMORDIAL) {
1321 return;
1322 }
1323 Thread *thread = Thread::current();
1324 HandleMark hm(thread);
1325
1326 EVT_TRIG_TRACE(EXT_EVENT_CLASS_UNLOAD, ("[?] Trg Class Unload triggered" ));
1327 if (JvmtiEventController::is_enabled((jvmtiEvent)EXT_EVENT_CLASS_UNLOAD)) {
1328 assert(thread->is_VM_thread(), "wrong thread");
1329
1330 // get JavaThread for whom we are proxy
1331 Thread *calling_thread = ((VMThread *)thread)->vm_operation()->calling_thread();
1332 if (!calling_thread->is_Java_thread()) {
1333 // cannot post an event to a non-JavaThread
1334 return;
1335 }
1336 JavaThread *real_thread = (JavaThread *)calling_thread;
1337
1338 JvmtiEnvIterator it;
1339 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1340 if (env->phase() == JVMTI_PHASE_PRIMORDIAL) {
1341 continue;
1342 }
1343 if (env->is_enabled((jvmtiEvent)EXT_EVENT_CLASS_UNLOAD)) {
1344 EVT_TRACE(EXT_EVENT_CLASS_UNLOAD, ("[?] Evt Class Unload sent %s",
1345 klass==NULL? "NULL" : klass->external_name() ));
1346
1347 // do everything manually, since this is a proxy - needs special care
1348 JNIEnv* jni_env = real_thread->jni_environment();
1349 jthread jt = (jthread)JNIHandles::make_local(real_thread, real_thread->threadObj());
1350 jclass jk = (jclass)JNIHandles::make_local(real_thread, klass->java_mirror());
1351
1352 // Before we call the JVMTI agent, we have to set the state in the
1353 // thread for which we are proxying.
1354 JavaThreadState prev_state = real_thread->thread_state();
1355 assert(((Thread *)real_thread)->is_ConcurrentGC_thread() ||
1356 (real_thread->is_Java_thread() && prev_state == _thread_blocked),
1357 "should be ConcurrentGCThread or JavaThread at safepoint");
1358 real_thread->set_thread_state(_thread_in_native);
1359
1360 jvmtiExtensionEvent callback = env->ext_callbacks()->ClassUnload;
1361 if (callback != NULL) {
1362 (*callback)(env->jvmti_external(), jni_env, jt, jk);
1363 }
1364
1365 assert(real_thread->thread_state() == _thread_in_native,
1366 "JavaThread should be in native");
1367 real_thread->set_thread_state(prev_state);
1368
1369 JNIHandles::destroy_local(jk);
1370 JNIHandles::destroy_local(jt);
1371 }
1372 }
1373 }
1374 }
1375
1376
1377 void JvmtiExport::post_thread_start(JavaThread *thread) {
1378 if (JvmtiEnv::get_phase() < JVMTI_PHASE_PRIMORDIAL) {
1379 return;
1380 }
1381 assert(thread->thread_state() == _thread_in_vm, "must be in vm state");
1382
1383 EVT_TRIG_TRACE(JVMTI_EVENT_THREAD_START, ("[%s] Trg Thread Start event triggered",
1384 JvmtiTrace::safe_get_thread_name(thread)));
1385
1386 // do JVMTI thread initialization (if needed)
1387 JvmtiEventController::thread_started(thread);
1388
1389 // Do not post thread start event for hidden java thread.
1390 if (JvmtiEventController::is_enabled(JVMTI_EVENT_THREAD_START) &&
1391 !thread->is_hidden_from_external_view()) {
1392 JvmtiEnvIterator it;
1393 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1394 if (env->phase() == JVMTI_PHASE_PRIMORDIAL) {
1395 continue;
1396 }
1397 if (env->is_enabled(JVMTI_EVENT_THREAD_START)) {
1398 EVT_TRACE(JVMTI_EVENT_THREAD_START, ("[%s] Evt Thread Start event sent",
1399 JvmtiTrace::safe_get_thread_name(thread) ));
1400
1401 JvmtiThreadEventMark jem(thread);
1402 JvmtiJavaThreadEventTransition jet(thread);
1403 jvmtiEventThreadStart callback = env->callbacks()->ThreadStart;
1404 if (callback != NULL) {
1405 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread());
1406 }
1407 }
1408 }
1409 }
1410 }
1411
1412
1413 void JvmtiExport::post_thread_end(JavaThread *thread) {
1414 if (JvmtiEnv::get_phase() < JVMTI_PHASE_PRIMORDIAL) {
1415 return;
1416 }
1417 EVT_TRIG_TRACE(JVMTI_EVENT_THREAD_END, ("[%s] Trg Thread End event triggered",
1418 JvmtiTrace::safe_get_thread_name(thread)));
1419
1420 JvmtiThreadState *state = thread->jvmti_thread_state();
1421 if (state == NULL) {
1422 return;
1423 }
1424
1425 // Do not post thread end event for hidden java thread.
1426 if (state->is_enabled(JVMTI_EVENT_THREAD_END) &&
1427 !thread->is_hidden_from_external_view()) {
1428
1429 JvmtiEnvThreadStateIterator it(state);
1430 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1431 if (ets->is_enabled(JVMTI_EVENT_THREAD_END)) {
1432 JvmtiEnv *env = ets->get_env();
1433 if (env->phase() == JVMTI_PHASE_PRIMORDIAL) {
1434 continue;
1435 }
1436 EVT_TRACE(JVMTI_EVENT_THREAD_END, ("[%s] Evt Thread End event sent",
1437 JvmtiTrace::safe_get_thread_name(thread) ));
1438
1439 JvmtiThreadEventMark jem(thread);
1440 JvmtiJavaThreadEventTransition jet(thread);
1441 jvmtiEventThreadEnd callback = env->callbacks()->ThreadEnd;
1442 if (callback != NULL) {
1443 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread());
1444 }
1445 }
1446 }
1447 }
1448 }
1449
1450 void JvmtiExport::post_object_free(JvmtiEnv* env, jlong tag) {
1451 assert(SafepointSynchronize::is_at_safepoint(), "must be executed at safepoint");
1452 assert(env->is_enabled(JVMTI_EVENT_OBJECT_FREE), "checking");
1453
1454 EVT_TRIG_TRACE(JVMTI_EVENT_OBJECT_FREE, ("[?] Trg Object Free triggered" ));
1455 EVT_TRACE(JVMTI_EVENT_OBJECT_FREE, ("[?] Evt Object Free sent"));
1456
1457 jvmtiEventObjectFree callback = env->callbacks()->ObjectFree;
1458 if (callback != NULL) {
1459 (*callback)(env->jvmti_external(), tag);
1460 }
1461 }
1462
1463 void JvmtiExport::post_resource_exhausted(jint resource_exhausted_flags, const char* description) {
1464 EVT_TRIG_TRACE(JVMTI_EVENT_RESOURCE_EXHAUSTED, ("Trg resource exhausted event triggered" ));
1465
1466 JvmtiEnvIterator it;
1467 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
1468 if (env->is_enabled(JVMTI_EVENT_RESOURCE_EXHAUSTED)) {
1469 EVT_TRACE(JVMTI_EVENT_RESOURCE_EXHAUSTED, ("Evt resource exhausted event sent" ));
1470
1471 JavaThread *thread = JavaThread::current();
1472 JvmtiThreadEventMark jem(thread);
1473 JvmtiJavaThreadEventTransition jet(thread);
1474 jvmtiEventResourceExhausted callback = env->callbacks()->ResourceExhausted;
1475 if (callback != NULL) {
1476 (*callback)(env->jvmti_external(), jem.jni_env(),
1477 resource_exhausted_flags, NULL, description);
1478 }
1479 }
1480 }
1481 }
1482
1483 void JvmtiExport::post_method_entry(JavaThread *thread, Method* method, frame current_frame) {
1484 HandleMark hm(thread);
1485 methodHandle mh(thread, method);
1486
1487 EVT_TRIG_TRACE(JVMTI_EVENT_METHOD_ENTRY, ("[%s] Trg Method Entry triggered %s.%s",
1488 JvmtiTrace::safe_get_thread_name(thread),
1489 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1490 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1491
1492 JvmtiThreadState* state = thread->jvmti_thread_state();
1493 if (state == NULL || !state->is_interp_only_mode()) {
1494 // for any thread that actually wants method entry, interp_only_mode is set
1495 return;
1496 }
1497
1498 state->incr_cur_stack_depth();
1499
1500 if (state->is_enabled(JVMTI_EVENT_METHOD_ENTRY)) {
1501 JvmtiEnvThreadStateIterator it(state);
1502 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1503 if (ets->is_enabled(JVMTI_EVENT_METHOD_ENTRY)) {
1504 EVT_TRACE(JVMTI_EVENT_METHOD_ENTRY, ("[%s] Evt Method Entry sent %s.%s",
1505 JvmtiTrace::safe_get_thread_name(thread),
1506 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1507 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1508
1509 JvmtiEnv *env = ets->get_env();
1510 JvmtiMethodEventMark jem(thread, mh);
1511 JvmtiJavaThreadEventTransition jet(thread);
1512 jvmtiEventMethodEntry callback = env->callbacks()->MethodEntry;
1513 if (callback != NULL) {
1514 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_methodID());
1515 }
1516 }
1517 }
1518 }
1519 }
1520
1521 void JvmtiExport::post_method_exit(JavaThread *thread, Method* method, frame current_frame) {
1522 HandleMark hm(thread);
1523 methodHandle mh(thread, method);
1524
1525 EVT_TRIG_TRACE(JVMTI_EVENT_METHOD_EXIT, ("[%s] Trg Method Exit triggered %s.%s",
1526 JvmtiTrace::safe_get_thread_name(thread),
1527 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1528 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1529
1530 JvmtiThreadState *state = thread->jvmti_thread_state();
1531 if (state == NULL || !state->is_interp_only_mode()) {
1532 // for any thread that actually wants method exit, interp_only_mode is set
1533 return;
1534 }
1535
1536 // return a flag when a method terminates by throwing an exception
1537 // i.e. if an exception is thrown and it's not caught by the current method
1538 bool exception_exit = state->is_exception_detected() && !state->is_exception_caught();
1539
1540
1541 if (state->is_enabled(JVMTI_EVENT_METHOD_EXIT)) {
1542 Handle result;
1543 jvalue value;
1544 value.j = 0L;
1545
1546 // if the method hasn't been popped because of an exception then we populate
1547 // the return_value parameter for the callback. At this point we only have
1548 // the address of a "raw result" and we just call into the interpreter to
1549 // convert this into a jvalue.
1550 if (!exception_exit) {
1551 oop oop_result;
1552 BasicType type = current_frame.interpreter_frame_result(&oop_result, &value);
1553 if (type == T_OBJECT || type == T_ARRAY) {
1554 result = Handle(thread, oop_result);
1555 }
1556 }
1557
1558 JvmtiEnvThreadStateIterator it(state);
1559 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1560 if (ets->is_enabled(JVMTI_EVENT_METHOD_EXIT)) {
1561 EVT_TRACE(JVMTI_EVENT_METHOD_EXIT, ("[%s] Evt Method Exit sent %s.%s",
1562 JvmtiTrace::safe_get_thread_name(thread),
1563 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1564 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1565
1566 JvmtiEnv *env = ets->get_env();
1567 JvmtiMethodEventMark jem(thread, mh);
1568 if (result.not_null()) {
1569 value.l = JNIHandles::make_local(thread, result());
1570 }
1571 JvmtiJavaThreadEventTransition jet(thread);
1572 jvmtiEventMethodExit callback = env->callbacks()->MethodExit;
1573 if (callback != NULL) {
1574 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1575 jem.jni_methodID(), exception_exit, value);
1576 }
1577 }
1578 }
1579 }
1580
1581 if (state->is_enabled(JVMTI_EVENT_FRAME_POP)) {
1582 JvmtiEnvThreadStateIterator it(state);
1583 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1584 int cur_frame_number = state->cur_stack_depth();
1585
1586 if (ets->is_frame_pop(cur_frame_number)) {
1587 // we have a NotifyFramePop entry for this frame.
1588 // now check that this env/thread wants this event
1589 if (ets->is_enabled(JVMTI_EVENT_FRAME_POP)) {
1590 EVT_TRACE(JVMTI_EVENT_FRAME_POP, ("[%s] Evt Frame Pop sent %s.%s",
1591 JvmtiTrace::safe_get_thread_name(thread),
1592 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1593 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string() ));
1594
1595 // we also need to issue a frame pop event for this frame
1596 JvmtiEnv *env = ets->get_env();
1597 JvmtiMethodEventMark jem(thread, mh);
1598 JvmtiJavaThreadEventTransition jet(thread);
1599 jvmtiEventFramePop callback = env->callbacks()->FramePop;
1600 if (callback != NULL) {
1601 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1602 jem.jni_methodID(), exception_exit);
1603 }
1604 }
1605 // remove the frame's entry
1606 ets->clear_frame_pop(cur_frame_number);
1607 }
1608 }
1609 }
1610
1611 state->decr_cur_stack_depth();
1612 }
1613
1614
1615 // Todo: inline this for optimization
1616 void JvmtiExport::post_single_step(JavaThread *thread, Method* method, address location) {
1617 HandleMark hm(thread);
1618 methodHandle mh(thread, method);
1619
1620 JvmtiThreadState *state = thread->jvmti_thread_state();
1621 if (state == NULL) {
1622 return;
1623 }
1624 JvmtiEnvThreadStateIterator it(state);
1625 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1626 ets->compare_and_set_current_location(mh(), location, JVMTI_EVENT_SINGLE_STEP);
1627 if (!ets->single_stepping_posted() && ets->is_enabled(JVMTI_EVENT_SINGLE_STEP)) {
1628 EVT_TRACE(JVMTI_EVENT_SINGLE_STEP, ("[%s] Evt Single Step sent %s.%s @ " INTX_FORMAT,
1629 JvmtiTrace::safe_get_thread_name(thread),
1630 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1631 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1632 location - mh()->code_base() ));
1633
1634 JvmtiEnv *env = ets->get_env();
1635 JvmtiLocationEventMark jem(thread, mh, location);
1636 JvmtiJavaThreadEventTransition jet(thread);
1637 jvmtiEventSingleStep callback = env->callbacks()->SingleStep;
1638 if (callback != NULL) {
1639 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1640 jem.jni_methodID(), jem.location());
1641 }
1642
1643 ets->set_single_stepping_posted();
1644 }
1645 }
1646 }
1647
1648 void JvmtiExport::post_exception_throw(JavaThread *thread, Method* method, address location, oop exception) {
1649 HandleMark hm(thread);
1650 methodHandle mh(thread, method);
1651 Handle exception_handle(thread, exception);
1652
1653 JvmtiThreadState *state = thread->jvmti_thread_state();
1654 if (state == NULL) {
1655 return;
1656 }
1657
1658 EVT_TRIG_TRACE(JVMTI_EVENT_EXCEPTION, ("[%s] Trg Exception thrown triggered",
1659 JvmtiTrace::safe_get_thread_name(thread)));
1660 if (!state->is_exception_detected()) {
1661 state->set_exception_detected();
1662 JvmtiEnvThreadStateIterator it(state);
1663 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1664 if (ets->is_enabled(JVMTI_EVENT_EXCEPTION) && (exception != NULL)) {
1665
1666 EVT_TRACE(JVMTI_EVENT_EXCEPTION,
1667 ("[%s] Evt Exception thrown sent %s.%s @ " INTX_FORMAT,
1668 JvmtiTrace::safe_get_thread_name(thread),
1669 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1670 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1671 location - mh()->code_base() ));
1672
1673 JvmtiEnv *env = ets->get_env();
1674 JvmtiExceptionEventMark jem(thread, mh, location, exception_handle);
1675
1676 // It's okay to clear these exceptions here because we duplicate
1677 // this lookup in InterpreterRuntime::exception_handler_for_exception.
1678 EXCEPTION_MARK;
1679
1680 bool should_repeat;
1681 vframeStream st(thread);
1682 assert(!st.at_end(), "cannot be at end");
1683 Method* current_method = NULL;
1684 // A GC may occur during the Method::fast_exception_handler_bci_for()
1685 // call below if it needs to load the constraint class. Using a
1686 // methodHandle to keep the 'current_method' from being deallocated
1687 // if GC happens.
1688 methodHandle current_mh = methodHandle(thread, current_method);
1689 int current_bci = -1;
1690 do {
1691 current_method = st.method();
1692 current_mh = methodHandle(thread, current_method);
1693 current_bci = st.bci();
1694 do {
1695 should_repeat = false;
1696 Klass* eh_klass = exception_handle()->klass();
1697 current_bci = Method::fast_exception_handler_bci_for(
1698 current_mh, eh_klass, current_bci, THREAD);
1699 if (HAS_PENDING_EXCEPTION) {
1700 exception_handle = Handle(thread, PENDING_EXCEPTION);
1701 CLEAR_PENDING_EXCEPTION;
1702 should_repeat = true;
1703 }
1704 } while (should_repeat && (current_bci != -1));
1705 st.next();
1706 } while ((current_bci < 0) && (!st.at_end()));
1707
1708 jmethodID catch_jmethodID;
1709 if (current_bci < 0) {
1710 catch_jmethodID = 0;
1711 current_bci = 0;
1712 } else {
1713 catch_jmethodID = jem.to_jmethodID(current_mh);
1714 }
1715
1716 JvmtiJavaThreadEventTransition jet(thread);
1717 jvmtiEventException callback = env->callbacks()->Exception;
1718 if (callback != NULL) {
1719 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1720 jem.jni_methodID(), jem.location(),
1721 jem.exception(),
1722 catch_jmethodID, current_bci);
1723 }
1724 }
1725 }
1726 }
1727
1728 // frames may get popped because of this throw, be safe - invalidate cached depth
1729 state->invalidate_cur_stack_depth();
1730 }
1731
1732
1733 void JvmtiExport::notice_unwind_due_to_exception(JavaThread *thread, Method* method, address location, oop exception, bool in_handler_frame) {
1734 HandleMark hm(thread);
1735 methodHandle mh(thread, method);
1736 Handle exception_handle(thread, exception);
1737
1738 JvmtiThreadState *state = thread->jvmti_thread_state();
1739 if (state == NULL) {
1740 return;
1741 }
1742 EVT_TRIG_TRACE(JVMTI_EVENT_EXCEPTION_CATCH,
1743 ("[%s] Trg unwind_due_to_exception triggered %s.%s @ %s" INTX_FORMAT " - %s",
1744 JvmtiTrace::safe_get_thread_name(thread),
1745 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1746 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1747 location==0? "no location:" : "",
1748 location==0? 0 : location - mh()->code_base(),
1749 in_handler_frame? "in handler frame" : "not handler frame" ));
1750
1751 if (state->is_exception_detected()) {
1752
1753 state->invalidate_cur_stack_depth();
1754 if (!in_handler_frame) {
1755 // Not in exception handler.
1756 if(state->is_interp_only_mode()) {
1757 // method exit and frame pop events are posted only in interp mode.
1758 // When these events are enabled code should be in running in interp mode.
1759 JvmtiExport::post_method_exit(thread, method, thread->last_frame());
1760 // The cached cur_stack_depth might have changed from the
1761 // operations of frame pop or method exit. We are not 100% sure
1762 // the cached cur_stack_depth is still valid depth so invalidate
1763 // it.
1764 state->invalidate_cur_stack_depth();
1765 }
1766 } else {
1767 // In exception handler frame. Report exception catch.
1768 assert(location != NULL, "must be a known location");
1769 // Update cur_stack_depth - the frames above the current frame
1770 // have been unwound due to this exception:
1771 assert(!state->is_exception_caught(), "exception must not be caught yet.");
1772 state->set_exception_caught();
1773
1774 JvmtiEnvThreadStateIterator it(state);
1775 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1776 if (ets->is_enabled(JVMTI_EVENT_EXCEPTION_CATCH) && (exception_handle() != NULL)) {
1777 EVT_TRACE(JVMTI_EVENT_EXCEPTION_CATCH,
1778 ("[%s] Evt ExceptionCatch sent %s.%s @ " INTX_FORMAT,
1779 JvmtiTrace::safe_get_thread_name(thread),
1780 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1781 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1782 location - mh()->code_base() ));
1783
1784 JvmtiEnv *env = ets->get_env();
1785 JvmtiExceptionEventMark jem(thread, mh, location, exception_handle);
1786 JvmtiJavaThreadEventTransition jet(thread);
1787 jvmtiEventExceptionCatch callback = env->callbacks()->ExceptionCatch;
1788 if (callback != NULL) {
1789 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1790 jem.jni_methodID(), jem.location(),
1791 jem.exception());
1792 }
1793 }
1794 }
1795 }
1796 }
1797 }
1798
1799 oop JvmtiExport::jni_GetField_probe(JavaThread *thread, jobject jobj, oop obj,
1800 Klass* klass, jfieldID fieldID, bool is_static) {
1801 if (*((int *)get_field_access_count_addr()) > 0 && thread->has_last_Java_frame()) {
1802 // At least one field access watch is set so we have more work
1803 // to do. This wrapper is used by entry points that allow us
1804 // to create handles in post_field_access_by_jni().
1805 post_field_access_by_jni(thread, obj, klass, fieldID, is_static);
1806 // event posting can block so refetch oop if we were passed a jobj
1807 if (jobj != NULL) return JNIHandles::resolve_non_null(jobj);
1808 }
1809 return obj;
1810 }
1811
1812 oop JvmtiExport::jni_GetField_probe_nh(JavaThread *thread, jobject jobj, oop obj,
1813 Klass* klass, jfieldID fieldID, bool is_static) {
1814 if (*((int *)get_field_access_count_addr()) > 0 && thread->has_last_Java_frame()) {
1815 // At least one field access watch is set so we have more work
1816 // to do. This wrapper is used by "quick" entry points that don't
1817 // allow us to create handles in post_field_access_by_jni(). We
1818 // override that with a ResetNoHandleMark.
1819 ResetNoHandleMark rnhm;
1820 post_field_access_by_jni(thread, obj, klass, fieldID, is_static);
1821 // event posting can block so refetch oop if we were passed a jobj
1822 if (jobj != NULL) return JNIHandles::resolve_non_null(jobj);
1823 }
1824 return obj;
1825 }
1826
1827 void JvmtiExport::post_field_access_by_jni(JavaThread *thread, oop obj,
1828 Klass* klass, jfieldID fieldID, bool is_static) {
1829 // We must be called with a Java context in order to provide reasonable
1830 // values for the klazz, method, and location fields. The callers of this
1831 // function don't make the call unless there is a Java context.
1832 assert(thread->has_last_Java_frame(), "must be called with a Java context");
1833
1834 ResourceMark rm;
1835 fieldDescriptor fd;
1836 // if get_field_descriptor finds fieldID to be invalid, then we just bail
1837 bool valid_fieldID = JvmtiEnv::get_field_descriptor(klass, fieldID, &fd);
1838 assert(valid_fieldID == true,"post_field_access_by_jni called with invalid fieldID");
1839 if (!valid_fieldID) return;
1840 // field accesses are not watched so bail
1841 if (!fd.is_field_access_watched()) return;
1842
1843 HandleMark hm(thread);
1844 Handle h_obj;
1845 if (!is_static) {
1846 // non-static field accessors have an object, but we need a handle
1847 assert(obj != NULL, "non-static needs an object");
1848 h_obj = Handle(thread, obj);
1849 }
1850 post_field_access(thread,
1851 thread->last_frame().interpreter_frame_method(),
1852 thread->last_frame().interpreter_frame_bcp(),
1853 klass, h_obj, fieldID);
1854 }
1855
1856 void JvmtiExport::post_field_access(JavaThread *thread, Method* method,
1857 address location, Klass* field_klass, Handle object, jfieldID field) {
1858
1859 HandleMark hm(thread);
1860 methodHandle mh(thread, method);
1861
1862 JvmtiThreadState *state = thread->jvmti_thread_state();
1863 if (state == NULL) {
1864 return;
1865 }
1866 EVT_TRIG_TRACE(JVMTI_EVENT_FIELD_ACCESS, ("[%s] Trg Field Access event triggered",
1867 JvmtiTrace::safe_get_thread_name(thread)));
1868 JvmtiEnvThreadStateIterator it(state);
1869 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
1870 if (ets->is_enabled(JVMTI_EVENT_FIELD_ACCESS)) {
1871 EVT_TRACE(JVMTI_EVENT_FIELD_ACCESS, ("[%s] Evt Field Access event sent %s.%s @ " INTX_FORMAT,
1872 JvmtiTrace::safe_get_thread_name(thread),
1873 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
1874 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
1875 location - mh()->code_base() ));
1876
1877 JvmtiEnv *env = ets->get_env();
1878 JvmtiLocationEventMark jem(thread, mh, location);
1879 jclass field_jclass = jem.to_jclass(field_klass);
1880 jobject field_jobject = jem.to_jobject(object());
1881 JvmtiJavaThreadEventTransition jet(thread);
1882 jvmtiEventFieldAccess callback = env->callbacks()->FieldAccess;
1883 if (callback != NULL) {
1884 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
1885 jem.jni_methodID(), jem.location(),
1886 field_jclass, field_jobject, field);
1887 }
1888 }
1889 }
1890 }
1891
1892 oop JvmtiExport::jni_SetField_probe(JavaThread *thread, jobject jobj, oop obj,
1893 Klass* klass, jfieldID fieldID, bool is_static,
1894 char sig_type, jvalue *value) {
1895 if (*((int *)get_field_modification_count_addr()) > 0 && thread->has_last_Java_frame()) {
1896 // At least one field modification watch is set so we have more work
1897 // to do. This wrapper is used by entry points that allow us
1898 // to create handles in post_field_modification_by_jni().
1899 post_field_modification_by_jni(thread, obj, klass, fieldID, is_static, sig_type, value);
1900 // event posting can block so refetch oop if we were passed a jobj
1901 if (jobj != NULL) return JNIHandles::resolve_non_null(jobj);
1902 }
1903 return obj;
1904 }
1905
1906 oop JvmtiExport::jni_SetField_probe_nh(JavaThread *thread, jobject jobj, oop obj,
1907 Klass* klass, jfieldID fieldID, bool is_static,
1908 char sig_type, jvalue *value) {
1909 if (*((int *)get_field_modification_count_addr()) > 0 && thread->has_last_Java_frame()) {
1910 // At least one field modification watch is set so we have more work
1911 // to do. This wrapper is used by "quick" entry points that don't
1912 // allow us to create handles in post_field_modification_by_jni(). We
1913 // override that with a ResetNoHandleMark.
1914 ResetNoHandleMark rnhm;
1915 post_field_modification_by_jni(thread, obj, klass, fieldID, is_static, sig_type, value);
1916 // event posting can block so refetch oop if we were passed a jobj
1917 if (jobj != NULL) return JNIHandles::resolve_non_null(jobj);
1918 }
1919 return obj;
1920 }
1921
1922 void JvmtiExport::post_field_modification_by_jni(JavaThread *thread, oop obj,
1923 Klass* klass, jfieldID fieldID, bool is_static,
1924 char sig_type, jvalue *value) {
1925 // We must be called with a Java context in order to provide reasonable
1926 // values for the klazz, method, and location fields. The callers of this
1927 // function don't make the call unless there is a Java context.
1928 assert(thread->has_last_Java_frame(), "must be called with Java context");
1929
1930 ResourceMark rm;
1931 fieldDescriptor fd;
1932 // if get_field_descriptor finds fieldID to be invalid, then we just bail
1933 bool valid_fieldID = JvmtiEnv::get_field_descriptor(klass, fieldID, &fd);
1934 assert(valid_fieldID == true,"post_field_modification_by_jni called with invalid fieldID");
1935 if (!valid_fieldID) return;
1936 // field modifications are not watched so bail
1937 if (!fd.is_field_modification_watched()) return;
1938
1939 HandleMark hm(thread);
1940
1941 Handle h_obj;
1942 if (!is_static) {
1943 // non-static field accessors have an object, but we need a handle
1944 assert(obj != NULL, "non-static needs an object");
1945 h_obj = Handle(thread, obj);
1946 }
1947 post_field_modification(thread,
1948 thread->last_frame().interpreter_frame_method(),
1949 thread->last_frame().interpreter_frame_bcp(),
1950 klass, h_obj, fieldID, sig_type, value);
1951 }
1952
1953 void JvmtiExport::post_raw_field_modification(JavaThread *thread, Method* method,
1954 address location, Klass* field_klass, Handle object, jfieldID field,
1955 char sig_type, jvalue *value) {
1956
1957 if (sig_type == 'I' || sig_type == 'Z' || sig_type == 'B' || sig_type == 'C' || sig_type == 'S') {
1958 // 'I' instructions are used for byte, char, short and int.
1959 // determine which it really is, and convert
1960 fieldDescriptor fd;
1961 bool found = JvmtiEnv::get_field_descriptor(field_klass, field, &fd);
1962 // should be found (if not, leave as is)
1963 if (found) {
1964 jint ival = value->i;
1965 // convert value from int to appropriate type
1966 switch (fd.field_type()) {
1967 case T_BOOLEAN:
1968 sig_type = 'Z';
1969 value->i = 0; // clear it
1970 value->z = (jboolean)ival;
1971 break;
1972 case T_BYTE:
1973 sig_type = 'B';
1974 value->i = 0; // clear it
1975 value->b = (jbyte)ival;
1976 break;
1977 case T_CHAR:
1978 sig_type = 'C';
1979 value->i = 0; // clear it
1980 value->c = (jchar)ival;
1981 break;
1982 case T_SHORT:
1983 sig_type = 'S';
1984 value->i = 0; // clear it
1985 value->s = (jshort)ival;
1986 break;
1987 case T_INT:
1988 // nothing to do
1989 break;
1990 default:
1991 // this is an integer instruction, should be one of above
1992 ShouldNotReachHere();
1993 break;
1994 }
1995 }
1996 }
1997
1998 assert(sig_type != '[', "array should have sig_type == 'L'");
1999 bool handle_created = false;
2000
2001 // convert oop to JNI handle.
2002 if (sig_type == 'L') {
2003 handle_created = true;
2004 value->l = (jobject)JNIHandles::make_local(thread, (oop)value->l);
2005 }
2006
2007 post_field_modification(thread, method, location, field_klass, object, field, sig_type, value);
2008
2009 // Destroy the JNI handle allocated above.
2010 if (handle_created) {
2011 JNIHandles::destroy_local(value->l);
2012 }
2013 }
2014
2015 void JvmtiExport::post_field_modification(JavaThread *thread, Method* method,
2016 address location, Klass* field_klass, Handle object, jfieldID field,
2017 char sig_type, jvalue *value_ptr) {
2018
2019 HandleMark hm(thread);
2020 methodHandle mh(thread, method);
2021
2022 JvmtiThreadState *state = thread->jvmti_thread_state();
2023 if (state == NULL) {
2024 return;
2025 }
2026 EVT_TRIG_TRACE(JVMTI_EVENT_FIELD_MODIFICATION,
2027 ("[%s] Trg Field Modification event triggered",
2028 JvmtiTrace::safe_get_thread_name(thread)));
2029
2030 JvmtiEnvThreadStateIterator it(state);
2031 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
2032 if (ets->is_enabled(JVMTI_EVENT_FIELD_MODIFICATION)) {
2033 EVT_TRACE(JVMTI_EVENT_FIELD_MODIFICATION,
2034 ("[%s] Evt Field Modification event sent %s.%s @ " INTX_FORMAT,
2035 JvmtiTrace::safe_get_thread_name(thread),
2036 (mh() == NULL) ? "NULL" : mh()->klass_name()->as_C_string(),
2037 (mh() == NULL) ? "NULL" : mh()->name()->as_C_string(),
2038 location - mh()->code_base() ));
2039
2040 JvmtiEnv *env = ets->get_env();
2041 JvmtiLocationEventMark jem(thread, mh, location);
2042 jclass field_jclass = jem.to_jclass(field_klass);
2043 jobject field_jobject = jem.to_jobject(object());
2044 JvmtiJavaThreadEventTransition jet(thread);
2045 jvmtiEventFieldModification callback = env->callbacks()->FieldModification;
2046 if (callback != NULL) {
2047 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
2048 jem.jni_methodID(), jem.location(),
2049 field_jclass, field_jobject, field, sig_type, *value_ptr);
2050 }
2051 }
2052 }
2053 }
2054
2055 void JvmtiExport::post_native_method_bind(Method* method, address* function_ptr) {
2056 JavaThread* thread = JavaThread::current();
2057 assert(thread->thread_state() == _thread_in_vm, "must be in vm state");
2058
2059 HandleMark hm(thread);
2060 methodHandle mh(thread, method);
2061
2062 EVT_TRIG_TRACE(JVMTI_EVENT_NATIVE_METHOD_BIND, ("[%s] Trg Native Method Bind event triggered",
2063 JvmtiTrace::safe_get_thread_name(thread)));
2064
2065 if (JvmtiEventController::is_enabled(JVMTI_EVENT_NATIVE_METHOD_BIND)) {
2066 JvmtiEnvIterator it;
2067 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2068 if (env->is_enabled(JVMTI_EVENT_NATIVE_METHOD_BIND)) {
2069 EVT_TRACE(JVMTI_EVENT_NATIVE_METHOD_BIND, ("[%s] Evt Native Method Bind event sent",
2070 JvmtiTrace::safe_get_thread_name(thread) ));
2071
2072 JvmtiMethodEventMark jem(thread, mh);
2073 JvmtiJavaThreadEventTransition jet(thread);
2074 JNIEnv* jni_env = (env->phase() == JVMTI_PHASE_PRIMORDIAL) ? NULL : jem.jni_env();
2075 jvmtiEventNativeMethodBind callback = env->callbacks()->NativeMethodBind;
2076 if (callback != NULL) {
2077 (*callback)(env->jvmti_external(), jni_env, jem.jni_thread(),
2078 jem.jni_methodID(), (void*)(*function_ptr), (void**)function_ptr);
2079 }
2080 }
2081 }
2082 }
2083 }
2084
2085 // Returns a record containing inlining information for the given nmethod
2086 jvmtiCompiledMethodLoadInlineRecord* create_inline_record(nmethod* nm) {
2087 jint numstackframes = 0;
2088 jvmtiCompiledMethodLoadInlineRecord* record = (jvmtiCompiledMethodLoadInlineRecord*)NEW_RESOURCE_OBJ(jvmtiCompiledMethodLoadInlineRecord);
2089 record->header.kind = JVMTI_CMLR_INLINE_INFO;
2090 record->header.next = NULL;
2091 record->header.majorinfoversion = JVMTI_CMLR_MAJOR_VERSION_1;
2092 record->header.minorinfoversion = JVMTI_CMLR_MINOR_VERSION_0;
2093 record->numpcs = 0;
2094 for(PcDesc* p = nm->scopes_pcs_begin(); p < nm->scopes_pcs_end(); p++) {
2095 if(p->scope_decode_offset() == DebugInformationRecorder::serialized_null) continue;
2096 record->numpcs++;
2097 }
2098 record->pcinfo = (PCStackInfo*)(NEW_RESOURCE_ARRAY(PCStackInfo, record->numpcs));
2099 int scope = 0;
2100 for(PcDesc* p = nm->scopes_pcs_begin(); p < nm->scopes_pcs_end(); p++) {
2101 if(p->scope_decode_offset() == DebugInformationRecorder::serialized_null) continue;
2102 void* pc_address = (void*)p->real_pc(nm);
2103 assert(pc_address != NULL, "pc_address must be non-null");
2104 record->pcinfo[scope].pc = pc_address;
2105 numstackframes=0;
2106 for(ScopeDesc* sd = nm->scope_desc_at(p->real_pc(nm));sd != NULL;sd = sd->sender()) {
2107 numstackframes++;
2108 }
2109 assert(numstackframes != 0, "numstackframes must be nonzero.");
2110 record->pcinfo[scope].methods = (jmethodID *)NEW_RESOURCE_ARRAY(jmethodID, numstackframes);
2111 record->pcinfo[scope].bcis = (jint *)NEW_RESOURCE_ARRAY(jint, numstackframes);
2112 record->pcinfo[scope].numstackframes = numstackframes;
2113 int stackframe = 0;
2114 for(ScopeDesc* sd = nm->scope_desc_at(p->real_pc(nm));sd != NULL;sd = sd->sender()) {
2115 // 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()
2116 assert(sd->method() != NULL, "sd->method() cannot be null.");
2117 record->pcinfo[scope].methods[stackframe] = sd->method()->jmethod_id();
2118 record->pcinfo[scope].bcis[stackframe] = sd->bci();
2119 stackframe++;
2120 }
2121 scope++;
2122 }
2123 return record;
2124 }
2125
2126 void JvmtiExport::post_compiled_method_load(nmethod *nm) {
2127 if (JvmtiEnv::get_phase() < JVMTI_PHASE_PRIMORDIAL) {
2128 return;
2129 }
2130 JavaThread* thread = JavaThread::current();
2131
2132 EVT_TRIG_TRACE(JVMTI_EVENT_COMPILED_METHOD_LOAD,
2133 ("[%s] method compile load event triggered",
2134 JvmtiTrace::safe_get_thread_name(thread)));
2135
2136 JvmtiEnvIterator it;
2137 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2138 if (env->is_enabled(JVMTI_EVENT_COMPILED_METHOD_LOAD)) {
2139 if (env->phase() == JVMTI_PHASE_PRIMORDIAL) {
2140 continue;
2141 }
2142 EVT_TRACE(JVMTI_EVENT_COMPILED_METHOD_LOAD,
2143 ("[%s] class compile method load event sent %s.%s ",
2144 JvmtiTrace::safe_get_thread_name(thread),
2145 (nm->method() == NULL) ? "NULL" : nm->method()->klass_name()->as_C_string(),
2146 (nm->method() == NULL) ? "NULL" : nm->method()->name()->as_C_string()));
2147 ResourceMark rm(thread);
2148 HandleMark hm(thread);
2149
2150 // Add inlining information
2151 jvmtiCompiledMethodLoadInlineRecord* inlinerecord = create_inline_record(nm);
2152 // Pass inlining information through the void pointer
2153 JvmtiCompiledMethodLoadEventMark jem(thread, nm, inlinerecord);
2154 JvmtiJavaThreadEventTransition jet(thread);
2155 jvmtiEventCompiledMethodLoad callback = env->callbacks()->CompiledMethodLoad;
2156 if (callback != NULL) {
2157 (*callback)(env->jvmti_external(), jem.jni_methodID(),
2158 jem.code_size(), jem.code_data(), jem.map_length(),
2159 jem.map(), jem.compile_info());
2160 }
2161 }
2162 }
2163 }
2164
2165
2166 // post a COMPILED_METHOD_LOAD event for a given environment
2167 void JvmtiExport::post_compiled_method_load(JvmtiEnv* env, const jmethodID method, const jint length,
2168 const void *code_begin, const jint map_length,
2169 const jvmtiAddrLocationMap* map)
2170 {
2171 if (env->phase() <= JVMTI_PHASE_PRIMORDIAL) {
2172 return;
2173 }
2174 JavaThread* thread = JavaThread::current();
2175 EVT_TRIG_TRACE(JVMTI_EVENT_COMPILED_METHOD_LOAD,
2176 ("[%s] method compile load event triggered (by GenerateEvents)",
2177 JvmtiTrace::safe_get_thread_name(thread)));
2178 if (env->is_enabled(JVMTI_EVENT_COMPILED_METHOD_LOAD)) {
2179
2180 EVT_TRACE(JVMTI_EVENT_COMPILED_METHOD_LOAD,
2181 ("[%s] class compile method load event sent (by GenerateEvents), jmethodID=" PTR_FORMAT,
2182 JvmtiTrace::safe_get_thread_name(thread), p2i(method)));
2183
2184 JvmtiEventMark jem(thread);
2185 JvmtiJavaThreadEventTransition jet(thread);
2186 jvmtiEventCompiledMethodLoad callback = env->callbacks()->CompiledMethodLoad;
2187 if (callback != NULL) {
2188 (*callback)(env->jvmti_external(), method,
2189 length, code_begin, map_length,
2190 map, NULL);
2191 }
2192 }
2193 }
2194
2195 void JvmtiExport::post_dynamic_code_generated_internal(const char *name, const void *code_begin, const void *code_end) {
2196 assert(name != NULL && name[0] != '\0', "sanity check");
2197
2198 JavaThread* thread = JavaThread::current();
2199 // In theory everyone coming thru here is in_vm but we need to be certain
2200 // because a callee will do a vm->native transition
2201 ThreadInVMfromUnknown __tiv;
2202
2203 EVT_TRIG_TRACE(JVMTI_EVENT_DYNAMIC_CODE_GENERATED,
2204 ("[%s] method dynamic code generated event triggered",
2205 JvmtiTrace::safe_get_thread_name(thread)));
2206 JvmtiEnvIterator it;
2207 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2208 if (env->is_enabled(JVMTI_EVENT_DYNAMIC_CODE_GENERATED)) {
2209 EVT_TRACE(JVMTI_EVENT_DYNAMIC_CODE_GENERATED,
2210 ("[%s] dynamic code generated event sent for %s",
2211 JvmtiTrace::safe_get_thread_name(thread), name));
2212 JvmtiEventMark jem(thread);
2213 JvmtiJavaThreadEventTransition jet(thread);
2214 jint length = (jint)pointer_delta(code_end, code_begin, sizeof(char));
2215 jvmtiEventDynamicCodeGenerated callback = env->callbacks()->DynamicCodeGenerated;
2216 if (callback != NULL) {
2217 (*callback)(env->jvmti_external(), name, (void*)code_begin, length);
2218 }
2219 }
2220 }
2221 }
2222
2223 void JvmtiExport::post_dynamic_code_generated(const char *name, const void *code_begin, const void *code_end) {
2224 jvmtiPhase phase = JvmtiEnv::get_phase();
2225 if (phase == JVMTI_PHASE_PRIMORDIAL || phase == JVMTI_PHASE_START) {
2226 post_dynamic_code_generated_internal(name, code_begin, code_end);
2227 } else {
2228 // It may not be safe to post the event from this thread. Defer all
2229 // postings to the service thread so that it can perform them in a safe
2230 // context and in-order.
2231 MutexLockerEx ml(Service_lock, Mutex::_no_safepoint_check_flag);
2232 JvmtiDeferredEvent event = JvmtiDeferredEvent::dynamic_code_generated_event(
2233 name, code_begin, code_end);
2234 JvmtiDeferredEventQueue::enqueue(event);
2235 }
2236 }
2237
2238
2239 // post a DYNAMIC_CODE_GENERATED event for a given environment
2240 // used by GenerateEvents
2241 void JvmtiExport::post_dynamic_code_generated(JvmtiEnv* env, const char *name,
2242 const void *code_begin, const void *code_end)
2243 {
2244 JavaThread* thread = JavaThread::current();
2245 EVT_TRIG_TRACE(JVMTI_EVENT_DYNAMIC_CODE_GENERATED,
2246 ("[%s] dynamic code generated event triggered (by GenerateEvents)",
2247 JvmtiTrace::safe_get_thread_name(thread)));
2248 if (env->is_enabled(JVMTI_EVENT_DYNAMIC_CODE_GENERATED)) {
2249 EVT_TRACE(JVMTI_EVENT_DYNAMIC_CODE_GENERATED,
2250 ("[%s] dynamic code generated event sent for %s",
2251 JvmtiTrace::safe_get_thread_name(thread), name));
2252 JvmtiEventMark jem(thread);
2253 JvmtiJavaThreadEventTransition jet(thread);
2254 jint length = (jint)pointer_delta(code_end, code_begin, sizeof(char));
2255 jvmtiEventDynamicCodeGenerated callback = env->callbacks()->DynamicCodeGenerated;
2256 if (callback != NULL) {
2257 (*callback)(env->jvmti_external(), name, (void*)code_begin, length);
2258 }
2259 }
2260 }
2261
2262 // post a DynamicCodeGenerated event while holding locks in the VM.
2263 void JvmtiExport::post_dynamic_code_generated_while_holding_locks(const char* name,
2264 address code_begin, address code_end)
2265 {
2266 // register the stub with the current dynamic code event collector
2267 JvmtiThreadState* state = JvmtiThreadState::state_for(JavaThread::current());
2268 // state can only be NULL if the current thread is exiting which
2269 // should not happen since we're trying to post an event
2270 guarantee(state != NULL, "attempt to register stub via an exiting thread");
2271 JvmtiDynamicCodeEventCollector* collector = state->get_dynamic_code_event_collector();
2272 guarantee(collector != NULL, "attempt to register stub without event collector");
2273 collector->register_stub(name, code_begin, code_end);
2274 }
2275
2276 // Collect all the vm internally allocated objects which are visible to java world
2277 void JvmtiExport::record_vm_internal_object_allocation(oop obj) {
2278 Thread* thread = Thread::current_or_null();
2279 if (thread != NULL && thread->is_Java_thread()) {
2280 // Can not take safepoint here.
2281 NoSafepointVerifier no_sfpt;
2282 // Can not take safepoint here so can not use state_for to get
2283 // jvmti thread state.
2284 JvmtiThreadState *state = ((JavaThread*)thread)->jvmti_thread_state();
2285 if (state != NULL ) {
2286 // state is non NULL when VMObjectAllocEventCollector is enabled.
2287 JvmtiVMObjectAllocEventCollector *collector;
2288 collector = state->get_vm_object_alloc_event_collector();
2289 if (collector != NULL && collector->is_enabled()) {
2290 // Don't record classes as these will be notified via the ClassLoad
2291 // event.
2292 if (obj->klass() != SystemDictionary::Class_klass()) {
2293 collector->record_allocation(obj);
2294 }
2295 }
2296 }
2297 }
2298 }
2299
2300 void JvmtiExport::post_garbage_collection_finish() {
2301 Thread *thread = Thread::current(); // this event is posted from VM-Thread.
2302 EVT_TRIG_TRACE(JVMTI_EVENT_GARBAGE_COLLECTION_FINISH,
2303 ("[%s] garbage collection finish event triggered",
2304 JvmtiTrace::safe_get_thread_name(thread)));
2305 JvmtiEnvIterator it;
2306 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2307 if (env->is_enabled(JVMTI_EVENT_GARBAGE_COLLECTION_FINISH)) {
2308 EVT_TRACE(JVMTI_EVENT_GARBAGE_COLLECTION_FINISH,
2309 ("[%s] garbage collection finish event sent",
2310 JvmtiTrace::safe_get_thread_name(thread)));
2311 JvmtiThreadEventTransition jet(thread);
2312 // JNIEnv is NULL here because this event is posted from VM Thread
2313 jvmtiEventGarbageCollectionFinish callback = env->callbacks()->GarbageCollectionFinish;
2314 if (callback != NULL) {
2315 (*callback)(env->jvmti_external());
2316 }
2317 }
2318 }
2319 }
2320
2321 void JvmtiExport::post_garbage_collection_start() {
2322 Thread* thread = Thread::current(); // this event is posted from vm-thread.
2323 EVT_TRIG_TRACE(JVMTI_EVENT_GARBAGE_COLLECTION_START,
2324 ("[%s] garbage collection start event triggered",
2325 JvmtiTrace::safe_get_thread_name(thread)));
2326 JvmtiEnvIterator it;
2327 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2328 if (env->is_enabled(JVMTI_EVENT_GARBAGE_COLLECTION_START)) {
2329 EVT_TRACE(JVMTI_EVENT_GARBAGE_COLLECTION_START,
2330 ("[%s] garbage collection start event sent",
2331 JvmtiTrace::safe_get_thread_name(thread)));
2332 JvmtiThreadEventTransition jet(thread);
2333 // JNIEnv is NULL here because this event is posted from VM Thread
2334 jvmtiEventGarbageCollectionStart callback = env->callbacks()->GarbageCollectionStart;
2335 if (callback != NULL) {
2336 (*callback)(env->jvmti_external());
2337 }
2338 }
2339 }
2340 }
2341
2342 void JvmtiExport::post_data_dump() {
2343 Thread *thread = Thread::current();
2344 EVT_TRIG_TRACE(JVMTI_EVENT_DATA_DUMP_REQUEST,
2345 ("[%s] data dump request event triggered",
2346 JvmtiTrace::safe_get_thread_name(thread)));
2347 JvmtiEnvIterator it;
2348 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2349 if (env->is_enabled(JVMTI_EVENT_DATA_DUMP_REQUEST)) {
2350 EVT_TRACE(JVMTI_EVENT_DATA_DUMP_REQUEST,
2351 ("[%s] data dump request event sent",
2352 JvmtiTrace::safe_get_thread_name(thread)));
2353 JvmtiThreadEventTransition jet(thread);
2354 // JNIEnv is NULL here because this event is posted from VM Thread
2355 jvmtiEventDataDumpRequest callback = env->callbacks()->DataDumpRequest;
2356 if (callback != NULL) {
2357 (*callback)(env->jvmti_external());
2358 }
2359 }
2360 }
2361 }
2362
2363 void JvmtiExport::post_monitor_contended_enter(JavaThread *thread, ObjectMonitor *obj_mntr) {
2364 oop object = (oop)obj_mntr->object();
2365 JvmtiThreadState *state = thread->jvmti_thread_state();
2366 if (state == NULL) {
2367 return;
2368 }
2369
2370 HandleMark hm(thread);
2371 Handle h(thread, object);
2372
2373 EVT_TRIG_TRACE(JVMTI_EVENT_MONITOR_CONTENDED_ENTER,
2374 ("[%s] montior contended enter event triggered",
2375 JvmtiTrace::safe_get_thread_name(thread)));
2376
2377 JvmtiEnvThreadStateIterator it(state);
2378 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
2379 if (ets->is_enabled(JVMTI_EVENT_MONITOR_CONTENDED_ENTER)) {
2380 EVT_TRACE(JVMTI_EVENT_MONITOR_CONTENDED_ENTER,
2381 ("[%s] monitor contended enter event sent",
2382 JvmtiTrace::safe_get_thread_name(thread)));
2383 JvmtiMonitorEventMark jem(thread, h());
2384 JvmtiEnv *env = ets->get_env();
2385 JvmtiThreadEventTransition jet(thread);
2386 jvmtiEventMonitorContendedEnter callback = env->callbacks()->MonitorContendedEnter;
2387 if (callback != NULL) {
2388 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_object());
2389 }
2390 }
2391 }
2392 }
2393
2394 void JvmtiExport::post_monitor_contended_entered(JavaThread *thread, ObjectMonitor *obj_mntr) {
2395 oop object = (oop)obj_mntr->object();
2396 JvmtiThreadState *state = thread->jvmti_thread_state();
2397 if (state == NULL) {
2398 return;
2399 }
2400
2401 HandleMark hm(thread);
2402 Handle h(thread, object);
2403
2404 EVT_TRIG_TRACE(JVMTI_EVENT_MONITOR_CONTENDED_ENTERED,
2405 ("[%s] montior contended entered event triggered",
2406 JvmtiTrace::safe_get_thread_name(thread)));
2407
2408 JvmtiEnvThreadStateIterator it(state);
2409 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
2410 if (ets->is_enabled(JVMTI_EVENT_MONITOR_CONTENDED_ENTERED)) {
2411 EVT_TRACE(JVMTI_EVENT_MONITOR_CONTENDED_ENTERED,
2412 ("[%s] monitor contended enter event sent",
2413 JvmtiTrace::safe_get_thread_name(thread)));
2414 JvmtiMonitorEventMark jem(thread, h());
2415 JvmtiEnv *env = ets->get_env();
2416 JvmtiThreadEventTransition jet(thread);
2417 jvmtiEventMonitorContendedEntered callback = env->callbacks()->MonitorContendedEntered;
2418 if (callback != NULL) {
2419 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(), jem.jni_object());
2420 }
2421 }
2422 }
2423 }
2424
2425 void JvmtiExport::post_monitor_wait(JavaThread *thread, oop object,
2426 jlong timeout) {
2427 JvmtiThreadState *state = thread->jvmti_thread_state();
2428 if (state == NULL) {
2429 return;
2430 }
2431
2432 HandleMark hm(thread);
2433 Handle h(thread, object);
2434
2435 EVT_TRIG_TRACE(JVMTI_EVENT_MONITOR_WAIT,
2436 ("[%s] montior wait event triggered",
2437 JvmtiTrace::safe_get_thread_name(thread)));
2438
2439 JvmtiEnvThreadStateIterator it(state);
2440 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
2441 if (ets->is_enabled(JVMTI_EVENT_MONITOR_WAIT)) {
2442 EVT_TRACE(JVMTI_EVENT_MONITOR_WAIT,
2443 ("[%s] monitor wait event sent",
2444 JvmtiTrace::safe_get_thread_name(thread)));
2445 JvmtiMonitorEventMark jem(thread, h());
2446 JvmtiEnv *env = ets->get_env();
2447 JvmtiThreadEventTransition jet(thread);
2448 jvmtiEventMonitorWait callback = env->callbacks()->MonitorWait;
2449 if (callback != NULL) {
2450 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
2451 jem.jni_object(), timeout);
2452 }
2453 }
2454 }
2455 }
2456
2457 void JvmtiExport::post_monitor_waited(JavaThread *thread, ObjectMonitor *obj_mntr, jboolean timed_out) {
2458 oop object = (oop)obj_mntr->object();
2459 JvmtiThreadState *state = thread->jvmti_thread_state();
2460 if (state == NULL) {
2461 return;
2462 }
2463
2464 HandleMark hm(thread);
2465 Handle h(thread, object);
2466
2467 EVT_TRIG_TRACE(JVMTI_EVENT_MONITOR_WAITED,
2468 ("[%s] montior waited event triggered",
2469 JvmtiTrace::safe_get_thread_name(thread)));
2470
2471 JvmtiEnvThreadStateIterator it(state);
2472 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
2473 if (ets->is_enabled(JVMTI_EVENT_MONITOR_WAITED)) {
2474 EVT_TRACE(JVMTI_EVENT_MONITOR_WAITED,
2475 ("[%s] monitor waited event sent",
2476 JvmtiTrace::safe_get_thread_name(thread)));
2477 JvmtiMonitorEventMark jem(thread, h());
2478 JvmtiEnv *env = ets->get_env();
2479 JvmtiThreadEventTransition jet(thread);
2480 jvmtiEventMonitorWaited callback = env->callbacks()->MonitorWaited;
2481 if (callback != NULL) {
2482 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
2483 jem.jni_object(), timed_out);
2484 }
2485 }
2486 }
2487 }
2488
2489
2490 void JvmtiExport::post_vm_object_alloc(JavaThread *thread, oop object) {
2491 EVT_TRIG_TRACE(JVMTI_EVENT_VM_OBJECT_ALLOC, ("[%s] Trg vm object alloc triggered",
2492 JvmtiTrace::safe_get_thread_name(thread)));
2493 if (object == NULL) {
2494 return;
2495 }
2496 HandleMark hm(thread);
2497 Handle h(thread, object);
2498 JvmtiEnvIterator it;
2499 for (JvmtiEnv* env = it.first(); env != NULL; env = it.next(env)) {
2500 if (env->is_enabled(JVMTI_EVENT_VM_OBJECT_ALLOC)) {
2501 EVT_TRACE(JVMTI_EVENT_VM_OBJECT_ALLOC, ("[%s] Evt vmobject alloc sent %s",
2502 JvmtiTrace::safe_get_thread_name(thread),
2503 object==NULL? "NULL" : object->klass()->external_name()));
2504
2505 JvmtiVMObjectAllocEventMark jem(thread, h());
2506 JvmtiJavaThreadEventTransition jet(thread);
2507 jvmtiEventVMObjectAlloc callback = env->callbacks()->VMObjectAlloc;
2508 if (callback != NULL) {
2509 (*callback)(env->jvmti_external(), jem.jni_env(), jem.jni_thread(),
2510 jem.jni_jobject(), jem.jni_class(), jem.size());
2511 }
2512 }
2513 }
2514 }
2515
2516 ////////////////////////////////////////////////////////////////////////////////////////////////
2517
2518 void JvmtiExport::cleanup_thread(JavaThread* thread) {
2519 assert(JavaThread::current() == thread, "thread is not current");
2520 MutexLocker mu(JvmtiThreadState_lock);
2521
2522 if (thread->jvmti_thread_state() != NULL) {
2523 // This has to happen after the thread state is removed, which is
2524 // why it is not in post_thread_end_event like its complement
2525 // Maybe both these functions should be rolled into the posts?
2526 JvmtiEventController::thread_ended(thread);
2527 }
2528 }
2529
2530 void JvmtiExport::clear_detected_exception(JavaThread* thread) {
2531 assert(JavaThread::current() == thread, "thread is not current");
2532
2533 JvmtiThreadState* state = thread->jvmti_thread_state();
2534 if (state != NULL) {
2535 state->clear_exception_state();
2536 }
2537 }
2538
2539 void JvmtiExport::oops_do(OopClosure* f) {
2540 JvmtiCurrentBreakpoints::oops_do(f);
2541 JvmtiVMObjectAllocEventCollector::oops_do_for_all_threads(f);
2542 }
2543
2544 void JvmtiExport::weak_oops_do(BoolObjectClosure* is_alive, OopClosure* f) {
2545 JvmtiTagMap::weak_oops_do(is_alive, f);
2546 }
2547
2548 void JvmtiExport::gc_epilogue() {
2549 JvmtiCurrentBreakpoints::gc_epilogue();
2550 }
2551
2552 // Onload raw monitor transition.
2553 void JvmtiExport::transition_pending_onload_raw_monitors() {
2554 JvmtiPendingMonitors::transition_raw_monitors();
2555 }
2556
2557 ////////////////////////////////////////////////////////////////////////////////////////////////
2558 #if INCLUDE_SERVICES
2559 // Attach is disabled if SERVICES is not included
2560
2561 // type for the Agent_OnAttach entry point
2562 extern "C" {
2563 typedef jint (JNICALL *OnAttachEntry_t)(JavaVM*, char *, void *);
2564 }
2565
2566 jint JvmtiExport::load_agent_library(const char *agent, const char *absParam,
2567 const char *options, outputStream* st) {
2568 char ebuf[1024] = {0};
2569 char buffer[JVM_MAXPATHLEN];
2570 void* library = NULL;
2571 jint result = JNI_ERR;
2572 const char *on_attach_symbols[] = AGENT_ONATTACH_SYMBOLS;
2573 size_t num_symbol_entries = ARRAY_SIZE(on_attach_symbols);
2574
2575 // The abs paramter should be "true" or "false"
2576 bool is_absolute_path = (absParam != NULL) && (strcmp(absParam,"true")==0);
2577
2578 // Initially marked as invalid. It will be set to valid if we can find the agent
2579 AgentLibrary *agent_lib = new AgentLibrary(agent, options, is_absolute_path, NULL);
2580
2581 // Check for statically linked in agent. If not found then if the path is
2582 // absolute we attempt to load the library. Otherwise we try to load it
2583 // from the standard dll directory.
2584
2585 if (!os::find_builtin_agent(agent_lib, on_attach_symbols, num_symbol_entries)) {
2586 if (is_absolute_path) {
2587 library = os::dll_load(agent, ebuf, sizeof ebuf);
2588 } else {
2589 // Try to load the agent from the standard dll directory
2590 if (os::dll_locate_lib(buffer, sizeof(buffer), Arguments::get_dll_dir(),
2591 agent)) {
2592 library = os::dll_load(buffer, ebuf, sizeof ebuf);
2593 }
2594 if (library == NULL) {
2595 // not found - try OS default library path
2596 if (os::dll_build_name(buffer, sizeof(buffer), agent)) {
2597 library = os::dll_load(buffer, ebuf, sizeof ebuf);
2598 }
2599 }
2600 }
2601 if (library != NULL) {
2602 agent_lib->set_os_lib(library);
2603 agent_lib->set_valid();
2604 }
2605 }
2606 // If the library was loaded then we attempt to invoke the Agent_OnAttach
2607 // function
2608 if (agent_lib->valid()) {
2609 // Lookup the Agent_OnAttach function
2610 OnAttachEntry_t on_attach_entry = NULL;
2611 on_attach_entry = CAST_TO_FN_PTR(OnAttachEntry_t,
2612 os::find_agent_function(agent_lib, false, on_attach_symbols, num_symbol_entries));
2613 if (on_attach_entry == NULL) {
2614 // Agent_OnAttach missing - unload library
2615 if (!agent_lib->is_static_lib()) {
2616 os::dll_unload(library);
2617 }
2618 st->print_cr("%s is not available in %s",
2619 on_attach_symbols[0], agent_lib->name());
2620 delete agent_lib;
2621 } else {
2622 // Invoke the Agent_OnAttach function
2623 JavaThread* THREAD = JavaThread::current();
2624 {
2625 extern struct JavaVM_ main_vm;
2626 JvmtiThreadEventMark jem(THREAD);
2627 JvmtiJavaThreadEventTransition jet(THREAD);
2628
2629 result = (*on_attach_entry)(&main_vm, (char*)options, NULL);
2630 }
2631
2632 // Agent_OnAttach may have used JNI
2633 if (HAS_PENDING_EXCEPTION) {
2634 CLEAR_PENDING_EXCEPTION;
2635 }
2636
2637 // If OnAttach returns JNI_OK then we add it to the list of
2638 // agent libraries so that we can call Agent_OnUnload later.
2639 if (result == JNI_OK) {
2640 Arguments::add_loaded_agent(agent_lib);
2641 } else {
2642 delete agent_lib;
2643 }
2644
2645 // Agent_OnAttach executed so completion status is JNI_OK
2646 st->print_cr("return code: %d", result);
2647 result = JNI_OK;
2648 }
2649 } else {
2650 st->print_cr("%s was not loaded.", agent);
2651 if (*ebuf != '\0') {
2652 st->print_cr("%s", ebuf);
2653 }
2654 }
2655 return result;
2656 }
2657
2658 #endif // INCLUDE_SERVICES
2659 ////////////////////////////////////////////////////////////////////////////////////////////////
2660
2661 // Setup current current thread for event collection.
2662 void JvmtiEventCollector::setup_jvmti_thread_state() {
2663 // set this event collector to be the current one.
2664 JvmtiThreadState* state = JvmtiThreadState::state_for(JavaThread::current());
2665 // state can only be NULL if the current thread is exiting which
2666 // should not happen since we're trying to configure for event collection
2667 guarantee(state != NULL, "exiting thread called setup_jvmti_thread_state");
2668 if (is_vm_object_alloc_event()) {
2669 _prev = state->get_vm_object_alloc_event_collector();
2670 state->set_vm_object_alloc_event_collector((JvmtiVMObjectAllocEventCollector *)this);
2671 } else if (is_dynamic_code_event()) {
2672 _prev = state->get_dynamic_code_event_collector();
2673 state->set_dynamic_code_event_collector((JvmtiDynamicCodeEventCollector *)this);
2674 }
2675 }
2676
2677 // Unset current event collection in this thread and reset it with previous
2678 // collector.
2679 void JvmtiEventCollector::unset_jvmti_thread_state() {
2680 JvmtiThreadState* state = JavaThread::current()->jvmti_thread_state();
2681 if (state != NULL) {
2682 // restore the previous event collector (if any)
2683 if (is_vm_object_alloc_event()) {
2684 if (state->get_vm_object_alloc_event_collector() == this) {
2685 state->set_vm_object_alloc_event_collector((JvmtiVMObjectAllocEventCollector *)_prev);
2686 } else {
2687 // this thread's jvmti state was created during the scope of
2688 // the event collector.
2689 }
2690 } else {
2691 if (is_dynamic_code_event()) {
2692 if (state->get_dynamic_code_event_collector() == this) {
2693 state->set_dynamic_code_event_collector((JvmtiDynamicCodeEventCollector *)_prev);
2694 } else {
2695 // this thread's jvmti state was created during the scope of
2696 // the event collector.
2697 }
2698 }
2699 }
2700 }
2701 }
2702
2703 // create the dynamic code event collector
2704 JvmtiDynamicCodeEventCollector::JvmtiDynamicCodeEventCollector() : _code_blobs(NULL) {
2705 if (JvmtiExport::should_post_dynamic_code_generated()) {
2706 setup_jvmti_thread_state();
2707 }
2708 }
2709
2710 // iterate over any code blob descriptors collected and post a
2711 // DYNAMIC_CODE_GENERATED event to the profiler.
2712 JvmtiDynamicCodeEventCollector::~JvmtiDynamicCodeEventCollector() {
2713 assert(!JavaThread::current()->owns_locks(), "all locks must be released to post deferred events");
2714 // iterate over any code blob descriptors that we collected
2715 if (_code_blobs != NULL) {
2716 for (int i=0; i<_code_blobs->length(); i++) {
2717 JvmtiCodeBlobDesc* blob = _code_blobs->at(i);
2718 JvmtiExport::post_dynamic_code_generated(blob->name(), blob->code_begin(), blob->code_end());
2719 FreeHeap(blob);
2720 }
2721 delete _code_blobs;
2722 }
2723 unset_jvmti_thread_state();
2724 }
2725
2726 // register a stub
2727 void JvmtiDynamicCodeEventCollector::register_stub(const char* name, address start, address end) {
2728 if (_code_blobs == NULL) {
2729 _code_blobs = new (ResourceObj::C_HEAP, mtInternal) GrowableArray<JvmtiCodeBlobDesc*>(1,true);
2730 }
2731 _code_blobs->append(new JvmtiCodeBlobDesc(name, start, end));
2732 }
2733
2734 // Setup current thread to record vm allocated objects.
2735 JvmtiVMObjectAllocEventCollector::JvmtiVMObjectAllocEventCollector() : _allocated(NULL) {
2736 if (JvmtiExport::should_post_vm_object_alloc()) {
2737 _enable = true;
2738 setup_jvmti_thread_state();
2739 } else {
2740 _enable = false;
2741 }
2742 }
2743
2744 // Post vm_object_alloc event for vm allocated objects visible to java
2745 // world.
2746 JvmtiVMObjectAllocEventCollector::~JvmtiVMObjectAllocEventCollector() {
2747 if (_allocated != NULL) {
2748 set_enabled(false);
2749 for (int i = 0; i < _allocated->length(); i++) {
2750 oop obj = _allocated->at(i);
2751 JvmtiExport::post_vm_object_alloc(JavaThread::current(), obj);
2752 }
2753 delete _allocated;
2754 }
2755 unset_jvmti_thread_state();
2756 }
2757
2758 void JvmtiVMObjectAllocEventCollector::record_allocation(oop obj) {
2759 assert(is_enabled(), "VM object alloc event collector is not enabled");
2760 if (_allocated == NULL) {
2761 _allocated = new (ResourceObj::C_HEAP, mtInternal) GrowableArray<oop>(1, true);
2762 }
2763 _allocated->push(obj);
2764 }
2765
2766 // GC support.
2767 void JvmtiVMObjectAllocEventCollector::oops_do(OopClosure* f) {
2768 if (_allocated != NULL) {
2769 for(int i=_allocated->length() - 1; i >= 0; i--) {
2770 if (_allocated->at(i) != NULL) {
2771 f->do_oop(_allocated->adr_at(i));
2772 }
2773 }
2774 }
2775 }
2776
2777 void JvmtiVMObjectAllocEventCollector::oops_do_for_all_threads(OopClosure* f) {
2778 // no-op if jvmti not enabled
2779 if (!JvmtiEnv::environments_might_exist()) {
2780 return;
2781 }
2782
2783 for (JavaThreadIteratorWithHandle jtiwh; JavaThread *jthr = jtiwh.next(); ) {
2784 JvmtiThreadState *state = jthr->jvmti_thread_state();
2785 if (state != NULL) {
2786 JvmtiVMObjectAllocEventCollector *collector;
2787 collector = state->get_vm_object_alloc_event_collector();
2788 while (collector != NULL) {
2789 collector->oops_do(f);
2790 collector = (JvmtiVMObjectAllocEventCollector *)collector->get_prev();
2791 }
2792 }
2793 }
2794 }
2795
2796
2797 // Disable collection of VMObjectAlloc events
2798 NoJvmtiVMObjectAllocMark::NoJvmtiVMObjectAllocMark() : _collector(NULL) {
2799 // a no-op if VMObjectAlloc event is not enabled
2800 if (!JvmtiExport::should_post_vm_object_alloc()) {
2801 return;
2802 }
2803 Thread* thread = Thread::current_or_null();
2804 if (thread != NULL && thread->is_Java_thread()) {
2805 JavaThread* current_thread = (JavaThread*)thread;
2806 JvmtiThreadState *state = current_thread->jvmti_thread_state();
2807 if (state != NULL) {
2808 JvmtiVMObjectAllocEventCollector *collector;
2809 collector = state->get_vm_object_alloc_event_collector();
2810 if (collector != NULL && collector->is_enabled()) {
2811 _collector = collector;
2812 _collector->set_enabled(false);
2813 }
2814 }
2815 }
2816 }
2817
2818 // Re-Enable collection of VMObjectAlloc events (if previously enabled)
2819 NoJvmtiVMObjectAllocMark::~NoJvmtiVMObjectAllocMark() {
2820 if (was_enabled()) {
2821 _collector->set_enabled(true);
2822 }
2823 };
2824
2825 JvmtiGCMarker::JvmtiGCMarker() {
2826 // if there aren't any JVMTI environments then nothing to do
2827 if (!JvmtiEnv::environments_might_exist()) {
2828 return;
2829 }
2830
2831 if (JvmtiExport::should_post_garbage_collection_start()) {
2832 JvmtiExport::post_garbage_collection_start();
2833 }
2834
2835 if (SafepointSynchronize::is_at_safepoint()) {
2836 // Do clean up tasks that need to be done at a safepoint
2837 JvmtiEnvBase::check_for_periodic_clean_up();
2838 }
2839 }
2840
2841 JvmtiGCMarker::~JvmtiGCMarker() {
2842 // if there aren't any JVMTI environments then nothing to do
2843 if (!JvmtiEnv::environments_might_exist()) {
2844 return;
2845 }
2846
2847 // JVMTI notify gc finish
2848 if (JvmtiExport::should_post_garbage_collection_finish()) {
2849 JvmtiExport::post_garbage_collection_finish();
2850 }
2851 }
--- EOF ---