src/share/vm/prims/jvmtiExport.cpp

Wed, 23 Jan 2013 13:02:39 -0500

author
jprovino
date
Wed, 23 Jan 2013 13:02:39 -0500
changeset 4542
db9981fd3124
parent 4405
0c8717a92b2d
child 4544
3c9bc17b9403
permissions
-rw-r--r--

8005915: Unify SERIALGC and INCLUDE_ALTERNATE_GCS
Summary: Rename INCLUDE_ALTERNATE_GCS to INCLUDE_ALL_GCS and replace SERIALGC with INCLUDE_ALL_GCS.
Reviewed-by: coleenp, stefank

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

mercurial