src/share/vm/prims/jvmtiEventController.cpp

Tue, 07 Apr 2015 10:53:51 +0200

author
tschatzl
date
Tue, 07 Apr 2015 10:53:51 +0200
changeset 7781
33e421924c67
parent 6680
78bbf4d43a14
child 6876
710a3c8b516e
permissions
-rw-r--r--

8058354: SPECjvm2008-Derby -2.7% performance regression on Solaris-X64 starting with 9-b29
Summary: Allow use of large pages for auxiliary data structures in G1. Clean up existing interfaces.
Reviewed-by: jmasa, pliden, stefank

duke@435 1 /*
drchase@6680 2 * Copyright (c) 2003, 2014, 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 "interpreter/interpreter.hpp"
stefank@2314 27 #include "jvmtifiles/jvmtiEnv.hpp"
stefank@2314 28 #include "memory/resourceArea.hpp"
stefank@2314 29 #include "prims/jvmtiEventController.hpp"
stefank@2314 30 #include "prims/jvmtiEventController.inline.hpp"
stefank@2314 31 #include "prims/jvmtiExport.hpp"
stefank@2314 32 #include "prims/jvmtiImpl.hpp"
stefank@2314 33 #include "prims/jvmtiThreadState.inline.hpp"
stefank@2314 34 #include "runtime/frame.hpp"
stefank@2314 35 #include "runtime/thread.hpp"
stefank@2314 36 #include "runtime/vframe.hpp"
stefank@2314 37 #include "runtime/vframe_hp.hpp"
stefank@2314 38 #include "runtime/vmThread.hpp"
stefank@2314 39 #include "runtime/vm_operations.hpp"
duke@435 40
drchase@6680 41 PRAGMA_FORMAT_MUTE_WARNINGS_FOR_GCC
drchase@6680 42
duke@435 43 #ifdef JVMTI_TRACE
kmo@4871 44 #define EC_TRACE(out) do { \
kmo@4871 45 if (JvmtiTrace::trace_event_controller()) { \
kmo@4871 46 SafeResourceMark rm; \
kmo@4871 47 tty->print_cr out; \
kmo@4871 48 } \
kmo@4871 49 } while (0)
duke@435 50 #else
duke@435 51 #define EC_TRACE(out)
duke@435 52 #endif /*JVMTI_TRACE */
duke@435 53
duke@435 54 // bits for standard events
duke@435 55
duke@435 56 static const jlong SINGLE_STEP_BIT = (((jlong)1) << (JVMTI_EVENT_SINGLE_STEP - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 57 static const jlong FRAME_POP_BIT = (((jlong)1) << (JVMTI_EVENT_FRAME_POP - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 58 static const jlong BREAKPOINT_BIT = (((jlong)1) << (JVMTI_EVENT_BREAKPOINT - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 59 static const jlong FIELD_ACCESS_BIT = (((jlong)1) << (JVMTI_EVENT_FIELD_ACCESS - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 60 static const jlong FIELD_MODIFICATION_BIT = (((jlong)1) << (JVMTI_EVENT_FIELD_MODIFICATION - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 61 static const jlong METHOD_ENTRY_BIT = (((jlong)1) << (JVMTI_EVENT_METHOD_ENTRY - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 62 static const jlong METHOD_EXIT_BIT = (((jlong)1) << (JVMTI_EVENT_METHOD_EXIT - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 63 static const jlong CLASS_FILE_LOAD_HOOK_BIT = (((jlong)1) << (JVMTI_EVENT_CLASS_FILE_LOAD_HOOK - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 64 static const jlong NATIVE_METHOD_BIND_BIT = (((jlong)1) << (JVMTI_EVENT_NATIVE_METHOD_BIND - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 65 static const jlong VM_START_BIT = (((jlong)1) << (JVMTI_EVENT_VM_START - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 66 static const jlong VM_INIT_BIT = (((jlong)1) << (JVMTI_EVENT_VM_INIT - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 67 static const jlong VM_DEATH_BIT = (((jlong)1) << (JVMTI_EVENT_VM_DEATH - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 68 static const jlong CLASS_LOAD_BIT = (((jlong)1) << (JVMTI_EVENT_CLASS_LOAD - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 69 static const jlong CLASS_PREPARE_BIT = (((jlong)1) << (JVMTI_EVENT_CLASS_PREPARE - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 70 static const jlong THREAD_START_BIT = (((jlong)1) << (JVMTI_EVENT_THREAD_START - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 71 static const jlong THREAD_END_BIT = (((jlong)1) << (JVMTI_EVENT_THREAD_END - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 72 static const jlong EXCEPTION_THROW_BIT = (((jlong)1) << (JVMTI_EVENT_EXCEPTION - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 73 static const jlong EXCEPTION_CATCH_BIT = (((jlong)1) << (JVMTI_EVENT_EXCEPTION_CATCH - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 74 static const jlong MONITOR_CONTENDED_ENTER_BIT = (((jlong)1) << (JVMTI_EVENT_MONITOR_CONTENDED_ENTER - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 75 static const jlong MONITOR_CONTENDED_ENTERED_BIT = (((jlong)1) << (JVMTI_EVENT_MONITOR_CONTENDED_ENTERED - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 76 static const jlong MONITOR_WAIT_BIT = (((jlong)1) << (JVMTI_EVENT_MONITOR_WAIT - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 77 static const jlong MONITOR_WAITED_BIT = (((jlong)1) << (JVMTI_EVENT_MONITOR_WAITED - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 78 static const jlong DYNAMIC_CODE_GENERATED_BIT = (((jlong)1) << (JVMTI_EVENT_DYNAMIC_CODE_GENERATED - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 79 static const jlong DATA_DUMP_BIT = (((jlong)1) << (JVMTI_EVENT_DATA_DUMP_REQUEST - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 80 static const jlong COMPILED_METHOD_LOAD_BIT = (((jlong)1) << (JVMTI_EVENT_COMPILED_METHOD_LOAD - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 81 static const jlong COMPILED_METHOD_UNLOAD_BIT = (((jlong)1) << (JVMTI_EVENT_COMPILED_METHOD_UNLOAD - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 82 static const jlong GARBAGE_COLLECTION_START_BIT = (((jlong)1) << (JVMTI_EVENT_GARBAGE_COLLECTION_START - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 83 static const jlong GARBAGE_COLLECTION_FINISH_BIT = (((jlong)1) << (JVMTI_EVENT_GARBAGE_COLLECTION_FINISH - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 84 static const jlong OBJECT_FREE_BIT = (((jlong)1) << (JVMTI_EVENT_OBJECT_FREE - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 85 static const jlong RESOURCE_EXHAUSTED_BIT = (((jlong)1) << (JVMTI_EVENT_RESOURCE_EXHAUSTED - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 86 static const jlong VM_OBJECT_ALLOC_BIT = (((jlong)1) << (JVMTI_EVENT_VM_OBJECT_ALLOC - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 87
duke@435 88 // bits for extension events
duke@435 89 static const jlong CLASS_UNLOAD_BIT = (((jlong)1) << (EXT_EVENT_CLASS_UNLOAD - TOTAL_MIN_EVENT_TYPE_VAL));
duke@435 90
duke@435 91
duke@435 92 static const jlong MONITOR_BITS = MONITOR_CONTENDED_ENTER_BIT | MONITOR_CONTENDED_ENTERED_BIT |
duke@435 93 MONITOR_WAIT_BIT | MONITOR_WAITED_BIT;
duke@435 94 static const jlong EXCEPTION_BITS = EXCEPTION_THROW_BIT | EXCEPTION_CATCH_BIT;
duke@435 95 static const jlong INTERP_EVENT_BITS = SINGLE_STEP_BIT | METHOD_ENTRY_BIT | METHOD_EXIT_BIT |
duke@435 96 FRAME_POP_BIT | FIELD_ACCESS_BIT | FIELD_MODIFICATION_BIT;
duke@435 97 static const jlong THREAD_FILTERED_EVENT_BITS = INTERP_EVENT_BITS | EXCEPTION_BITS | MONITOR_BITS |
duke@435 98 BREAKPOINT_BIT | CLASS_LOAD_BIT | CLASS_PREPARE_BIT | THREAD_END_BIT;
duke@435 99 static const jlong NEED_THREAD_LIFE_EVENTS = THREAD_FILTERED_EVENT_BITS | THREAD_START_BIT;
duke@435 100 static const jlong EARLY_EVENT_BITS = CLASS_FILE_LOAD_HOOK_BIT |
duke@435 101 VM_START_BIT | VM_INIT_BIT | VM_DEATH_BIT | NATIVE_METHOD_BIND_BIT |
duke@435 102 THREAD_START_BIT | THREAD_END_BIT |
duke@435 103 DYNAMIC_CODE_GENERATED_BIT;
duke@435 104 static const jlong GLOBAL_EVENT_BITS = ~THREAD_FILTERED_EVENT_BITS;
dcubed@1648 105 static const jlong SHOULD_POST_ON_EXCEPTIONS_BITS = EXCEPTION_BITS | METHOD_EXIT_BIT | FRAME_POP_BIT;
duke@435 106
duke@435 107 ///////////////////////////////////////////////////////////////
duke@435 108 //
duke@435 109 // JvmtiEventEnabled
duke@435 110 //
duke@435 111
duke@435 112 JvmtiEventEnabled::JvmtiEventEnabled() {
duke@435 113 clear();
duke@435 114 }
duke@435 115
duke@435 116
duke@435 117 void JvmtiEventEnabled::clear() {
duke@435 118 _enabled_bits = 0;
duke@435 119 #ifndef PRODUCT
duke@435 120 _init_guard = JEE_INIT_GUARD;
duke@435 121 #endif
duke@435 122 }
duke@435 123
duke@435 124 void JvmtiEventEnabled::set_enabled(jvmtiEvent event_type, bool enabled) {
duke@435 125 jlong bits = get_bits();
duke@435 126 jlong mask = bit_for(event_type);
duke@435 127 if (enabled) {
duke@435 128 bits |= mask;
duke@435 129 } else {
duke@435 130 bits &= ~mask;
duke@435 131 }
duke@435 132 set_bits(bits);
duke@435 133 }
duke@435 134
duke@435 135
duke@435 136 ///////////////////////////////////////////////////////////////
duke@435 137 //
duke@435 138 // JvmtiEnvThreadEventEnable
duke@435 139 //
duke@435 140
duke@435 141 JvmtiEnvThreadEventEnable::JvmtiEnvThreadEventEnable() {
duke@435 142 _event_user_enabled.clear();
duke@435 143 _event_enabled.clear();
duke@435 144 }
duke@435 145
duke@435 146
duke@435 147 JvmtiEnvThreadEventEnable::~JvmtiEnvThreadEventEnable() {
duke@435 148 _event_user_enabled.clear();
duke@435 149 _event_enabled.clear();
duke@435 150 }
duke@435 151
duke@435 152
duke@435 153 ///////////////////////////////////////////////////////////////
duke@435 154 //
duke@435 155 // JvmtiThreadEventEnable
duke@435 156 //
duke@435 157
duke@435 158 JvmtiThreadEventEnable::JvmtiThreadEventEnable() {
duke@435 159 _event_enabled.clear();
duke@435 160 }
duke@435 161
duke@435 162
duke@435 163 JvmtiThreadEventEnable::~JvmtiThreadEventEnable() {
duke@435 164 _event_enabled.clear();
duke@435 165 }
duke@435 166
duke@435 167
duke@435 168 ///////////////////////////////////////////////////////////////
duke@435 169 //
duke@435 170 // JvmtiEnvEventEnable
duke@435 171 //
duke@435 172
duke@435 173 JvmtiEnvEventEnable::JvmtiEnvEventEnable() {
duke@435 174 _event_user_enabled.clear();
duke@435 175 _event_callback_enabled.clear();
duke@435 176 _event_enabled.clear();
duke@435 177 }
duke@435 178
duke@435 179
duke@435 180 JvmtiEnvEventEnable::~JvmtiEnvEventEnable() {
duke@435 181 _event_user_enabled.clear();
duke@435 182 _event_callback_enabled.clear();
duke@435 183 _event_enabled.clear();
duke@435 184 }
duke@435 185
duke@435 186
duke@435 187 ///////////////////////////////////////////////////////////////
duke@435 188 //
duke@435 189 // VM_EnterInterpOnlyMode
duke@435 190 //
duke@435 191
duke@435 192 class VM_EnterInterpOnlyMode : public VM_Operation {
duke@435 193 private:
duke@435 194 JvmtiThreadState *_state;
duke@435 195
duke@435 196 public:
duke@435 197 VM_EnterInterpOnlyMode(JvmtiThreadState *state);
duke@435 198
duke@435 199 bool allow_nested_vm_operations() const { return true; }
duke@435 200 VMOp_Type type() const { return VMOp_EnterInterpOnlyMode; }
duke@435 201 void doit();
duke@435 202
duke@435 203 // to do: this same function is in jvmtiImpl - should be in one place
duke@435 204 bool can_be_deoptimized(vframe* vf) {
duke@435 205 return (vf->is_compiled_frame() && vf->fr().can_be_deoptimized());
duke@435 206 }
duke@435 207 };
duke@435 208
duke@435 209 VM_EnterInterpOnlyMode::VM_EnterInterpOnlyMode(JvmtiThreadState *state)
duke@435 210 : _state(state)
duke@435 211 {
duke@435 212 }
duke@435 213
duke@435 214
duke@435 215 void VM_EnterInterpOnlyMode::doit() {
duke@435 216 // Set up the current stack depth for later tracking
duke@435 217 _state->invalidate_cur_stack_depth();
duke@435 218
duke@435 219 _state->enter_interp_only_mode();
duke@435 220
duke@435 221 JavaThread *thread = _state->get_thread();
duke@435 222 if (thread->has_last_Java_frame()) {
duke@435 223 // If running in fullspeed mode, single stepping is implemented
duke@435 224 // as follows: first, the interpreter does not dispatch to
duke@435 225 // compiled code for threads that have single stepping enabled;
duke@435 226 // second, we deoptimize all methods on the thread's stack when
duke@435 227 // interpreted-only mode is enabled the first time for a given
duke@435 228 // thread (nothing to do if no Java frames yet).
duke@435 229 int num_marked = 0;
duke@435 230 ResourceMark resMark;
duke@435 231 RegisterMap rm(thread, false);
duke@435 232 for (vframe* vf = thread->last_java_vframe(&rm); vf; vf = vf->sender()) {
duke@435 233 if (can_be_deoptimized(vf)) {
duke@435 234 ((compiledVFrame*) vf)->code()->mark_for_deoptimization();
duke@435 235 ++num_marked;
duke@435 236 }
duke@435 237 }
duke@435 238 if (num_marked > 0) {
duke@435 239 VM_Deoptimize op;
duke@435 240 VMThread::execute(&op);
duke@435 241 }
duke@435 242 }
duke@435 243 }
duke@435 244
duke@435 245
duke@435 246 ///////////////////////////////////////////////////////////////
duke@435 247 //
duke@435 248 // VM_ChangeSingleStep
duke@435 249 //
duke@435 250
duke@435 251 class VM_ChangeSingleStep : public VM_Operation {
duke@435 252 private:
duke@435 253 bool _on;
duke@435 254
duke@435 255 public:
duke@435 256 VM_ChangeSingleStep(bool on);
duke@435 257 VMOp_Type type() const { return VMOp_ChangeSingleStep; }
duke@435 258 bool allow_nested_vm_operations() const { return true; }
duke@435 259 void doit(); // method definition is after definition of JvmtiEventControllerPrivate because of scoping
duke@435 260 };
duke@435 261
duke@435 262
duke@435 263 VM_ChangeSingleStep::VM_ChangeSingleStep(bool on)
duke@435 264 : _on(on != 0)
duke@435 265 {
duke@435 266 }
duke@435 267
duke@435 268
duke@435 269
duke@435 270
duke@435 271 ///////////////////////////////////////////////////////////////
duke@435 272 //
duke@435 273 // JvmtiEventControllerPrivate
duke@435 274 //
duke@435 275 // Private internal implementation methods for JvmtiEventController.
duke@435 276 //
duke@435 277 // These methods are thread safe either because they are called
duke@435 278 // in early VM initialization which is single threaded, or they
duke@435 279 // hold the JvmtiThreadState_lock.
duke@435 280 //
duke@435 281
duke@435 282 class JvmtiEventControllerPrivate : public AllStatic {
duke@435 283 static bool _initialized;
duke@435 284 public:
duke@435 285 static void set_should_post_single_step(bool on);
duke@435 286 static void enter_interp_only_mode(JvmtiThreadState *state);
duke@435 287 static void leave_interp_only_mode(JvmtiThreadState *state);
duke@435 288 static void recompute_enabled();
duke@435 289 static jlong recompute_env_enabled(JvmtiEnvBase* env);
duke@435 290 static jlong recompute_env_thread_enabled(JvmtiEnvThreadState* ets, JvmtiThreadState* state);
duke@435 291 static jlong recompute_thread_enabled(JvmtiThreadState *state);
duke@435 292 static void event_init();
duke@435 293
duke@435 294 static void set_user_enabled(JvmtiEnvBase *env, JavaThread *thread,
duke@435 295 jvmtiEvent event_type, bool enabled);
duke@435 296 static void set_event_callbacks(JvmtiEnvBase *env,
duke@435 297 const jvmtiEventCallbacks* callbacks,
duke@435 298 jint size_of_callbacks);
duke@435 299
duke@435 300 static void set_extension_event_callback(JvmtiEnvBase *env,
duke@435 301 jint extension_event_index,
duke@435 302 jvmtiExtensionEvent callback);
duke@435 303
duke@435 304 static void set_frame_pop(JvmtiEnvThreadState *env_thread, JvmtiFramePop fpop);
duke@435 305 static void clear_frame_pop(JvmtiEnvThreadState *env_thread, JvmtiFramePop fpop);
duke@435 306 static void clear_to_frame_pop(JvmtiEnvThreadState *env_thread, JvmtiFramePop fpop);
duke@435 307 static void change_field_watch(jvmtiEvent event_type, bool added);
duke@435 308
duke@435 309 static void thread_started(JavaThread *thread);
duke@435 310 static void thread_ended(JavaThread *thread);
duke@435 311
duke@435 312 static void env_initialize(JvmtiEnvBase *env);
duke@435 313 static void env_dispose(JvmtiEnvBase *env);
duke@435 314
duke@435 315 static void vm_start();
duke@435 316 static void vm_init();
duke@435 317 static void vm_death();
duke@435 318
duke@435 319 static void trace_changed(JvmtiThreadState *state, jlong now_enabled, jlong changed);
duke@435 320 static void trace_changed(jlong now_enabled, jlong changed);
duke@435 321 };
duke@435 322
duke@435 323 bool JvmtiEventControllerPrivate::_initialized = false;
duke@435 324
duke@435 325 void JvmtiEventControllerPrivate::set_should_post_single_step(bool on) {
duke@435 326 // we have permission to do this, VM op doesn't
duke@435 327 JvmtiExport::set_should_post_single_step(on);
duke@435 328 }
duke@435 329
duke@435 330
duke@435 331 // This change must always be occur when at a safepoint.
duke@435 332 // Being at a safepoint causes the interpreter to use the
duke@435 333 // safepoint dispatch table which we overload to find single
duke@435 334 // step points. Just to be sure that it has been set, we
duke@435 335 // call notice_safepoints when turning on single stepping.
duke@435 336 // When we leave our current safepoint, should_post_single_step
duke@435 337 // will be checked by the interpreter, and the table kept
duke@435 338 // or changed accordingly.
duke@435 339 void VM_ChangeSingleStep::doit() {
duke@435 340 JvmtiEventControllerPrivate::set_should_post_single_step(_on);
duke@435 341 if (_on) {
duke@435 342 Interpreter::notice_safepoints();
duke@435 343 }
duke@435 344 }
duke@435 345
duke@435 346
duke@435 347 void JvmtiEventControllerPrivate::enter_interp_only_mode(JvmtiThreadState *state) {
duke@435 348 EC_TRACE(("JVMTI [%s] # Entering interpreter only mode",
duke@435 349 JvmtiTrace::safe_get_thread_name(state->get_thread())));
duke@435 350
duke@435 351 VM_EnterInterpOnlyMode op(state);
duke@435 352 VMThread::execute(&op);
duke@435 353 }
duke@435 354
duke@435 355
duke@435 356 void
duke@435 357 JvmtiEventControllerPrivate::leave_interp_only_mode(JvmtiThreadState *state) {
duke@435 358 EC_TRACE(("JVMTI [%s] # Leaving interpreter only mode",
duke@435 359 JvmtiTrace::safe_get_thread_name(state->get_thread())));
duke@435 360 state->leave_interp_only_mode();
duke@435 361 }
duke@435 362
duke@435 363
duke@435 364 void
duke@435 365 JvmtiEventControllerPrivate::trace_changed(JvmtiThreadState *state, jlong now_enabled, jlong changed) {
duke@435 366 #ifdef JVMTI_TRACE
duke@435 367 if (JvmtiTrace::trace_event_controller()) {
duke@435 368 SafeResourceMark rm;
duke@435 369 // traces standard events only
duke@435 370 for (int ei = JVMTI_MIN_EVENT_TYPE_VAL; ei <= JVMTI_MAX_EVENT_TYPE_VAL; ++ei) {
duke@435 371 jlong bit = JvmtiEventEnabled::bit_for((jvmtiEvent)ei);
duke@435 372 if (changed & bit) {
duke@435 373 // it changed, print it
duke@435 374 tty->print_cr("JVMTI [%s] # %s event %s",
duke@435 375 JvmtiTrace::safe_get_thread_name(state->get_thread()),
duke@435 376 (now_enabled & bit)? "Enabling" : "Disabling", JvmtiTrace::event_name((jvmtiEvent)ei));
duke@435 377 }
duke@435 378 }
duke@435 379 }
duke@435 380 #endif /*JVMTI_TRACE */
duke@435 381 }
duke@435 382
duke@435 383
duke@435 384 void
duke@435 385 JvmtiEventControllerPrivate::trace_changed(jlong now_enabled, jlong changed) {
duke@435 386 #ifdef JVMTI_TRACE
duke@435 387 if (JvmtiTrace::trace_event_controller()) {
duke@435 388 SafeResourceMark rm;
duke@435 389 // traces standard events only
duke@435 390 for (int ei = JVMTI_MIN_EVENT_TYPE_VAL; ei <= JVMTI_MAX_EVENT_TYPE_VAL; ++ei) {
duke@435 391 jlong bit = JvmtiEventEnabled::bit_for((jvmtiEvent)ei);
duke@435 392 if (changed & bit) {
duke@435 393 // it changed, print it
duke@435 394 tty->print_cr("JVMTI [-] # %s event %s",
duke@435 395 (now_enabled & bit)? "Enabling" : "Disabling", JvmtiTrace::event_name((jvmtiEvent)ei));
duke@435 396 }
duke@435 397 }
duke@435 398 }
duke@435 399 #endif /*JVMTI_TRACE */
duke@435 400 }
duke@435 401
duke@435 402
duke@435 403 // For the specified env: compute the currently truly enabled events
duke@435 404 // set external state accordingly.
duke@435 405 // Return value and set value must include all events.
duke@435 406 // But outside this class, only non-thread-filtered events can be queried..
duke@435 407 jlong
duke@435 408 JvmtiEventControllerPrivate::recompute_env_enabled(JvmtiEnvBase* env) {
duke@435 409 jlong was_enabled = env->env_event_enable()->_event_enabled.get_bits();
duke@435 410 jlong now_enabled =
duke@435 411 env->env_event_enable()->_event_callback_enabled.get_bits() &
duke@435 412 env->env_event_enable()->_event_user_enabled.get_bits();
duke@435 413
duke@435 414 switch (JvmtiEnv::get_phase()) {
duke@435 415 case JVMTI_PHASE_PRIMORDIAL:
duke@435 416 case JVMTI_PHASE_ONLOAD:
duke@435 417 // only these events allowed in primordial or onload phase
duke@435 418 now_enabled &= (EARLY_EVENT_BITS & ~THREAD_FILTERED_EVENT_BITS);
duke@435 419 break;
duke@435 420 case JVMTI_PHASE_START:
duke@435 421 // only these events allowed in start phase
duke@435 422 now_enabled &= EARLY_EVENT_BITS;
duke@435 423 break;
duke@435 424 case JVMTI_PHASE_LIVE:
duke@435 425 // all events allowed during live phase
duke@435 426 break;
duke@435 427 case JVMTI_PHASE_DEAD:
duke@435 428 // no events allowed when dead
duke@435 429 now_enabled = 0;
duke@435 430 break;
duke@435 431 default:
duke@435 432 assert(false, "no other phases - sanity check");
duke@435 433 break;
duke@435 434 }
duke@435 435
duke@435 436 // will we really send these events to this env
duke@435 437 env->env_event_enable()->_event_enabled.set_bits(now_enabled);
duke@435 438
duke@435 439 trace_changed(now_enabled, (now_enabled ^ was_enabled) & ~THREAD_FILTERED_EVENT_BITS);
duke@435 440
duke@435 441 return now_enabled;
duke@435 442 }
duke@435 443
duke@435 444
duke@435 445 // For the specified env and thread: compute the currently truly enabled events
duke@435 446 // set external state accordingly. Only thread-filtered events are included.
duke@435 447 jlong
duke@435 448 JvmtiEventControllerPrivate::recompute_env_thread_enabled(JvmtiEnvThreadState* ets, JvmtiThreadState* state) {
duke@435 449 JvmtiEnv *env = ets->get_env();
duke@435 450
duke@435 451 jlong was_enabled = ets->event_enable()->_event_enabled.get_bits();
duke@435 452 jlong now_enabled = THREAD_FILTERED_EVENT_BITS &
duke@435 453 env->env_event_enable()->_event_callback_enabled.get_bits() &
duke@435 454 (env->env_event_enable()->_event_user_enabled.get_bits() |
duke@435 455 ets->event_enable()->_event_user_enabled.get_bits());
duke@435 456
duke@435 457 // for frame pops and field watchs, computed enabled state
duke@435 458 // is only true if an event has been requested
duke@435 459 if (!ets->has_frame_pops()) {
duke@435 460 now_enabled &= ~FRAME_POP_BIT;
duke@435 461 }
duke@435 462 if (*((int *)JvmtiExport::get_field_access_count_addr()) == 0) {
duke@435 463 now_enabled &= ~FIELD_ACCESS_BIT;
duke@435 464 }
duke@435 465 if (*((int *)JvmtiExport::get_field_modification_count_addr()) == 0) {
duke@435 466 now_enabled &= ~FIELD_MODIFICATION_BIT;
duke@435 467 }
duke@435 468
duke@435 469 switch (JvmtiEnv::get_phase()) {
duke@435 470 case JVMTI_PHASE_DEAD:
duke@435 471 // no events allowed when dead
duke@435 472 now_enabled = 0;
duke@435 473 break;
duke@435 474 }
duke@435 475
duke@435 476 // if anything changed do update
duke@435 477 if (now_enabled != was_enabled) {
duke@435 478
duke@435 479 // will we really send these events to this thread x env
duke@435 480 ets->event_enable()->_event_enabled.set_bits(now_enabled);
duke@435 481
duke@435 482 // If the enabled status of the single step or breakpoint events changed,
duke@435 483 // the location status may need to change as well.
duke@435 484 jlong changed = now_enabled ^ was_enabled;
duke@435 485 if (changed & SINGLE_STEP_BIT) {
duke@435 486 ets->reset_current_location(JVMTI_EVENT_SINGLE_STEP, (now_enabled & SINGLE_STEP_BIT) != 0);
duke@435 487 }
duke@435 488 if (changed & BREAKPOINT_BIT) {
duke@435 489 ets->reset_current_location(JVMTI_EVENT_BREAKPOINT, (now_enabled & BREAKPOINT_BIT) != 0);
duke@435 490 }
duke@435 491 trace_changed(state, now_enabled, changed);
duke@435 492 }
duke@435 493 return now_enabled;
duke@435 494 }
duke@435 495
duke@435 496
duke@435 497 // For the specified thread: compute the currently truly enabled events
duke@435 498 // set external state accordingly. Only thread-filtered events are included.
duke@435 499 jlong
duke@435 500 JvmtiEventControllerPrivate::recompute_thread_enabled(JvmtiThreadState *state) {
dcubed@1044 501 if (state == NULL) {
dcubed@1044 502 // associated JavaThread is exiting
dcubed@1044 503 return (jlong)0;
dcubed@1044 504 }
dcubed@1044 505
duke@435 506 jlong was_any_env_enabled = state->thread_event_enable()->_event_enabled.get_bits();
duke@435 507 jlong any_env_enabled = 0;
duke@435 508
duke@435 509 {
duke@435 510 // This iteration will include JvmtiEnvThreadStates whoses environments
duke@435 511 // have been disposed. These JvmtiEnvThreadStates must not be filtered
duke@435 512 // as recompute must be called on them to disable their events,
duke@435 513 JvmtiEnvThreadStateIterator it(state);
duke@435 514 for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
duke@435 515 any_env_enabled |= recompute_env_thread_enabled(ets, state);
duke@435 516 }
duke@435 517 }
duke@435 518
duke@435 519 if (any_env_enabled != was_any_env_enabled) {
duke@435 520 // mark if event is truly enabled on this thread in any environment
duke@435 521 state->thread_event_enable()->_event_enabled.set_bits(any_env_enabled);
duke@435 522
duke@435 523 // compute interp_only mode
duke@435 524 bool should_be_interp = (any_env_enabled & INTERP_EVENT_BITS) != 0;
duke@435 525 bool is_now_interp = state->is_interp_only_mode();
duke@435 526
duke@435 527 if (should_be_interp != is_now_interp) {
duke@435 528 if (should_be_interp) {
duke@435 529 enter_interp_only_mode(state);
duke@435 530 } else {
duke@435 531 leave_interp_only_mode(state);
duke@435 532 }
duke@435 533 }
dcubed@1648 534
dcubed@1648 535 // update the JavaThread cached value for thread-specific should_post_on_exceptions value
dcubed@1648 536 bool should_post_on_exceptions = (any_env_enabled & SHOULD_POST_ON_EXCEPTIONS_BITS) != 0;
dcubed@1648 537 state->set_should_post_on_exceptions(should_post_on_exceptions);
duke@435 538 }
dcubed@1648 539
duke@435 540 return any_env_enabled;
duke@435 541 }
duke@435 542
duke@435 543
duke@435 544 // Compute truly enabled events - meaning if the event can and could be
duke@435 545 // sent. An event is truly enabled if it is user enabled on the thread
duke@435 546 // or globally user enabled, but only if there is a callback or event hook
duke@435 547 // for it and, for field watch and frame pop, one has been set.
duke@435 548 // Compute if truly enabled, per thread, per environment, per combination
duke@435 549 // (thread x environment), and overall. These merges are true if any is true.
duke@435 550 // True per thread if some environment has callback set and the event is globally
duke@435 551 // enabled or enabled for this thread.
duke@435 552 // True per environment if the callback is set and the event is globally
duke@435 553 // enabled in this environment or enabled for any thread in this environment.
duke@435 554 // True per combination if the environment has the callback set and the
duke@435 555 // event is globally enabled in this environment or the event is enabled
duke@435 556 // for this thread and environment.
duke@435 557 //
duke@435 558 // All states transitions dependent on these transitions are also handled here.
duke@435 559 void
duke@435 560 JvmtiEventControllerPrivate::recompute_enabled() {
duke@435 561 assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
duke@435 562
duke@435 563 // event enabled for any thread in any environment
duke@435 564 jlong was_any_env_thread_enabled = JvmtiEventController::_universal_global_event_enabled.get_bits();
duke@435 565 jlong any_env_thread_enabled = 0;
duke@435 566
duke@435 567 EC_TRACE(("JVMTI [-] # recompute enabled - before %llx", was_any_env_thread_enabled));
duke@435 568
duke@435 569 // compute non-thread-filters events.
duke@435 570 // This must be done separately from thread-filtered events, since some
duke@435 571 // events can occur before any threads exist.
duke@435 572 JvmtiEnvIterator it;
duke@435 573 for (JvmtiEnvBase* env = it.first(); env != NULL; env = it.next(env)) {
duke@435 574 any_env_thread_enabled |= recompute_env_enabled(env);
duke@435 575 }
duke@435 576
duke@435 577 // We need to create any missing jvmti_thread_state if there are globally set thread
duke@435 578 // filtered events and there weren't last time
duke@435 579 if ( (any_env_thread_enabled & THREAD_FILTERED_EVENT_BITS) != 0 &&
duke@435 580 (was_any_env_thread_enabled & THREAD_FILTERED_EVENT_BITS) == 0) {
duke@435 581 assert(JvmtiEnv::is_vm_live() || (JvmtiEnv::get_phase()==JVMTI_PHASE_START),
duke@435 582 "thread filtered events should not be enabled when VM not in start or live phase");
duke@435 583 {
duke@435 584 MutexLocker mu(Threads_lock); //hold the Threads_lock for the iteration
duke@435 585 for (JavaThread *tp = Threads::first(); tp != NULL; tp = tp->next()) {
dcubed@1044 586 // state_for_while_locked() makes tp->is_exiting() check
duke@435 587 JvmtiThreadState::state_for_while_locked(tp); // create the thread state if missing
duke@435 588 }
duke@435 589 }// release Threads_lock
duke@435 590 }
duke@435 591
duke@435 592 // compute and set thread-filtered events
duke@435 593 for (JvmtiThreadState *state = JvmtiThreadState::first(); state != NULL; state = state->next()) {
duke@435 594 any_env_thread_enabled |= recompute_thread_enabled(state);
duke@435 595 }
duke@435 596
duke@435 597 // set universal state (across all envs and threads)
duke@435 598 jlong delta = any_env_thread_enabled ^ was_any_env_thread_enabled;
duke@435 599 if (delta != 0) {
duke@435 600 JvmtiExport::set_should_post_field_access((any_env_thread_enabled & FIELD_ACCESS_BIT) != 0);
duke@435 601 JvmtiExport::set_should_post_field_modification((any_env_thread_enabled & FIELD_MODIFICATION_BIT) != 0);
duke@435 602 JvmtiExport::set_should_post_class_load((any_env_thread_enabled & CLASS_LOAD_BIT) != 0);
duke@435 603 JvmtiExport::set_should_post_class_file_load_hook((any_env_thread_enabled & CLASS_FILE_LOAD_HOOK_BIT) != 0);
duke@435 604 JvmtiExport::set_should_post_native_method_bind((any_env_thread_enabled & NATIVE_METHOD_BIND_BIT) != 0);
duke@435 605 JvmtiExport::set_should_post_dynamic_code_generated((any_env_thread_enabled & DYNAMIC_CODE_GENERATED_BIT) != 0);
duke@435 606 JvmtiExport::set_should_post_data_dump((any_env_thread_enabled & DATA_DUMP_BIT) != 0);
duke@435 607 JvmtiExport::set_should_post_class_prepare((any_env_thread_enabled & CLASS_PREPARE_BIT) != 0);
duke@435 608 JvmtiExport::set_should_post_class_unload((any_env_thread_enabled & CLASS_UNLOAD_BIT) != 0);
duke@435 609 JvmtiExport::set_should_post_monitor_contended_enter((any_env_thread_enabled & MONITOR_CONTENDED_ENTER_BIT) != 0);
duke@435 610 JvmtiExport::set_should_post_monitor_contended_entered((any_env_thread_enabled & MONITOR_CONTENDED_ENTERED_BIT) != 0);
duke@435 611 JvmtiExport::set_should_post_monitor_wait((any_env_thread_enabled & MONITOR_WAIT_BIT) != 0);
duke@435 612 JvmtiExport::set_should_post_monitor_waited((any_env_thread_enabled & MONITOR_WAITED_BIT) != 0);
duke@435 613 JvmtiExport::set_should_post_garbage_collection_start((any_env_thread_enabled & GARBAGE_COLLECTION_START_BIT) != 0);
duke@435 614 JvmtiExport::set_should_post_garbage_collection_finish((any_env_thread_enabled & GARBAGE_COLLECTION_FINISH_BIT) != 0);
duke@435 615 JvmtiExport::set_should_post_object_free((any_env_thread_enabled & OBJECT_FREE_BIT) != 0);
duke@435 616 JvmtiExport::set_should_post_resource_exhausted((any_env_thread_enabled & RESOURCE_EXHAUSTED_BIT) != 0);
duke@435 617 JvmtiExport::set_should_post_compiled_method_load((any_env_thread_enabled & COMPILED_METHOD_LOAD_BIT) != 0);
duke@435 618 JvmtiExport::set_should_post_compiled_method_unload((any_env_thread_enabled & COMPILED_METHOD_UNLOAD_BIT) != 0);
duke@435 619 JvmtiExport::set_should_post_vm_object_alloc((any_env_thread_enabled & VM_OBJECT_ALLOC_BIT) != 0);
duke@435 620
duke@435 621 // need this if we want thread events or we need them to init data
duke@435 622 JvmtiExport::set_should_post_thread_life((any_env_thread_enabled & NEED_THREAD_LIFE_EVENTS) != 0);
duke@435 623
duke@435 624 // If single stepping is turned on or off, execute the VM op to change it.
duke@435 625 if (delta & SINGLE_STEP_BIT) {
duke@435 626 switch (JvmtiEnv::get_phase()) {
duke@435 627 case JVMTI_PHASE_DEAD:
duke@435 628 // If the VM is dying we can't execute VM ops
duke@435 629 break;
duke@435 630 case JVMTI_PHASE_LIVE: {
duke@435 631 VM_ChangeSingleStep op((any_env_thread_enabled & SINGLE_STEP_BIT) != 0);
duke@435 632 VMThread::execute(&op);
duke@435 633 break;
duke@435 634 }
duke@435 635 default:
duke@435 636 assert(false, "should never come here before live phase");
duke@435 637 break;
duke@435 638 }
duke@435 639 }
duke@435 640
duke@435 641 // set global truly enabled, that is, any thread in any environment
duke@435 642 JvmtiEventController::_universal_global_event_enabled.set_bits(any_env_thread_enabled);
dcubed@1648 643
dcubed@1648 644 // set global should_post_on_exceptions
dcubed@1648 645 JvmtiExport::set_should_post_on_exceptions((any_env_thread_enabled & SHOULD_POST_ON_EXCEPTIONS_BITS) != 0);
dcubed@1648 646
duke@435 647 }
duke@435 648
duke@435 649 EC_TRACE(("JVMTI [-] # recompute enabled - after %llx", any_env_thread_enabled));
duke@435 650 }
duke@435 651
duke@435 652
duke@435 653 void
duke@435 654 JvmtiEventControllerPrivate::thread_started(JavaThread *thread) {
duke@435 655 assert(thread->is_Java_thread(), "Must be JavaThread");
duke@435 656 assert(thread == Thread::current(), "must be current thread");
duke@435 657 assert(JvmtiEnvBase::environments_might_exist(), "to enter event controller, JVM TI environments must exist");
duke@435 658
duke@435 659 EC_TRACE(("JVMTI [%s] # thread started", JvmtiTrace::safe_get_thread_name(thread)));
duke@435 660
duke@435 661 // if we have any thread filtered events globally enabled, create/update the thread state
duke@435 662 if ((JvmtiEventController::_universal_global_event_enabled.get_bits() & THREAD_FILTERED_EVENT_BITS) != 0) {
duke@435 663 MutexLocker mu(JvmtiThreadState_lock);
duke@435 664 // create the thread state if missing
duke@435 665 JvmtiThreadState *state = JvmtiThreadState::state_for_while_locked(thread);
duke@435 666 if (state != NULL) { // skip threads with no JVMTI thread state
duke@435 667 recompute_thread_enabled(state);
duke@435 668 }
duke@435 669 }
duke@435 670 }
duke@435 671
duke@435 672
duke@435 673 void
duke@435 674 JvmtiEventControllerPrivate::thread_ended(JavaThread *thread) {
duke@435 675 // Removes the JvmtiThreadState associated with the specified thread.
duke@435 676 // May be called after all environments have been disposed.
kamg@2446 677 assert(JvmtiThreadState_lock->is_locked(), "sanity check");
duke@435 678
duke@435 679 EC_TRACE(("JVMTI [%s] # thread ended", JvmtiTrace::safe_get_thread_name(thread)));
duke@435 680
duke@435 681 JvmtiThreadState *state = thread->jvmti_thread_state();
kamg@2446 682 assert(state != NULL, "else why are we here?");
kamg@2446 683 delete state;
duke@435 684 }
duke@435 685
duke@435 686 void JvmtiEventControllerPrivate::set_event_callbacks(JvmtiEnvBase *env,
duke@435 687 const jvmtiEventCallbacks* callbacks,
duke@435 688 jint size_of_callbacks) {
duke@435 689 assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
duke@435 690 EC_TRACE(("JVMTI [*] # set event callbacks"));
duke@435 691
duke@435 692 env->set_event_callbacks(callbacks, size_of_callbacks);
duke@435 693 jlong enabled_bits = 0;
duke@435 694 for (int ei = JVMTI_MIN_EVENT_TYPE_VAL; ei <= JVMTI_MAX_EVENT_TYPE_VAL; ++ei) {
duke@435 695 jvmtiEvent evt_t = (jvmtiEvent)ei;
duke@435 696 if (env->has_callback(evt_t)) {
duke@435 697 enabled_bits |= JvmtiEventEnabled::bit_for(evt_t);
duke@435 698 }
duke@435 699 }
duke@435 700 env->env_event_enable()->_event_callback_enabled.set_bits(enabled_bits);
duke@435 701 recompute_enabled();
duke@435 702 }
duke@435 703
duke@435 704 void
duke@435 705 JvmtiEventControllerPrivate::set_extension_event_callback(JvmtiEnvBase *env,
duke@435 706 jint extension_event_index,
duke@435 707 jvmtiExtensionEvent callback)
duke@435 708 {
duke@435 709 assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
duke@435 710 EC_TRACE(("JVMTI [*] # set extension event callback"));
duke@435 711
duke@435 712 // extension events are allocated below JVMTI_MIN_EVENT_TYPE_VAL
duke@435 713 assert(extension_event_index >= (jint)EXT_MIN_EVENT_TYPE_VAL &&
duke@435 714 extension_event_index <= (jint)EXT_MAX_EVENT_TYPE_VAL, "sanity check");
duke@435 715
duke@435 716
duke@435 717 // As the bits for both standard (jvmtiEvent) and extension
duke@435 718 // (jvmtiExtEvents) are stored in the same word we cast here to
duke@435 719 // jvmtiEvent to set/clear the bit for this extension event.
duke@435 720 jvmtiEvent event_type = (jvmtiEvent)extension_event_index;
duke@435 721
duke@435 722 // Prevent a possible race condition where events are re-enabled by a call to
duke@435 723 // set event callbacks, where the DisposeEnvironment occurs after the boiler-plate
duke@435 724 // environment check and before the lock is acquired.
duke@435 725 // We can safely do the is_valid check now, as JvmtiThreadState_lock is held.
duke@435 726 bool enabling = (callback != NULL) && (env->is_valid());
duke@435 727 env->env_event_enable()->set_user_enabled(event_type, enabling);
duke@435 728
duke@435 729 // update the callback
duke@435 730 jvmtiExtEventCallbacks* ext_callbacks = env->ext_callbacks();
duke@435 731 switch (extension_event_index) {
duke@435 732 case EXT_EVENT_CLASS_UNLOAD :
duke@435 733 ext_callbacks->ClassUnload = callback;
duke@435 734 break;
duke@435 735 default:
duke@435 736 ShouldNotReachHere();
duke@435 737 }
duke@435 738
duke@435 739 // update the callback enable/disable bit
duke@435 740 jlong enabled_bits = env->env_event_enable()->_event_callback_enabled.get_bits();
duke@435 741 jlong bit_for = JvmtiEventEnabled::bit_for(event_type);
duke@435 742 if (enabling) {
duke@435 743 enabled_bits |= bit_for;
duke@435 744 } else {
duke@435 745 enabled_bits &= ~bit_for;
duke@435 746 }
duke@435 747 env->env_event_enable()->_event_callback_enabled.set_bits(enabled_bits);
duke@435 748
duke@435 749 recompute_enabled();
duke@435 750 }
duke@435 751
duke@435 752
duke@435 753 void
duke@435 754 JvmtiEventControllerPrivate::env_initialize(JvmtiEnvBase *env) {
duke@435 755 assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
duke@435 756 EC_TRACE(("JVMTI [*] # env initialize"));
duke@435 757
duke@435 758 if (JvmtiEnvBase::is_vm_live()) {
duke@435 759 // if we didn't initialize event info already (this is a late
duke@435 760 // launched environment), do it now.
duke@435 761 event_init();
duke@435 762 }
duke@435 763
duke@435 764 env->initialize();
duke@435 765
duke@435 766 // add the JvmtiEnvThreadState to each JvmtiThreadState
duke@435 767 for (JvmtiThreadState *state = JvmtiThreadState::first(); state != NULL; state = state->next()) {
duke@435 768 state->add_env(env);
duke@435 769 assert((JvmtiEnv*)(state->env_thread_state(env)->get_env()) == env, "sanity check");
duke@435 770 }
duke@435 771 JvmtiEventControllerPrivate::recompute_enabled();
duke@435 772 }
duke@435 773
duke@435 774
duke@435 775 void
duke@435 776 JvmtiEventControllerPrivate::env_dispose(JvmtiEnvBase *env) {
duke@435 777 assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
duke@435 778 EC_TRACE(("JVMTI [*] # env dispose"));
duke@435 779
duke@435 780 // Before the environment is marked disposed, disable all events on this
duke@435 781 // environment (by zapping the callbacks). As a result, the disposed
duke@435 782 // environment will not call event handlers.
duke@435 783 set_event_callbacks(env, NULL, 0);
duke@435 784 for (jint extension_event_index = EXT_MIN_EVENT_TYPE_VAL;
duke@435 785 extension_event_index <= EXT_MAX_EVENT_TYPE_VAL;
duke@435 786 ++extension_event_index) {
duke@435 787 set_extension_event_callback(env, extension_event_index, NULL);
duke@435 788 }
duke@435 789
duke@435 790 // Let the environment finish disposing itself.
duke@435 791 env->env_dispose();
duke@435 792 }
duke@435 793
duke@435 794
duke@435 795 void
duke@435 796 JvmtiEventControllerPrivate::set_user_enabled(JvmtiEnvBase *env, JavaThread *thread,
duke@435 797 jvmtiEvent event_type, bool enabled) {
duke@435 798 assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
duke@435 799
duke@435 800 EC_TRACE(("JVMTI [%s] # user %s event %s",
duke@435 801 thread==NULL? "ALL": JvmtiTrace::safe_get_thread_name(thread),
duke@435 802 enabled? "enabled" : "disabled", JvmtiTrace::event_name(event_type)));
duke@435 803
duke@435 804 if (thread == NULL) {
duke@435 805 env->env_event_enable()->set_user_enabled(event_type, enabled);
duke@435 806 } else {
duke@435 807 // create the thread state (if it didn't exist before)
duke@435 808 JvmtiThreadState *state = JvmtiThreadState::state_for_while_locked(thread);
duke@435 809 if (state != NULL) {
duke@435 810 state->env_thread_state(env)->event_enable()->set_user_enabled(event_type, enabled);
duke@435 811 }
duke@435 812 }
duke@435 813 recompute_enabled();
duke@435 814 }
duke@435 815
duke@435 816
duke@435 817 void
duke@435 818 JvmtiEventControllerPrivate::set_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
duke@435 819 EC_TRACE(("JVMTI [%s] # set frame pop - frame=%d",
duke@435 820 JvmtiTrace::safe_get_thread_name(ets->get_thread()),
duke@435 821 fpop.frame_number() ));
duke@435 822
duke@435 823 ets->get_frame_pops()->set(fpop);
duke@435 824 recompute_thread_enabled(ets->get_thread()->jvmti_thread_state());
duke@435 825 }
duke@435 826
duke@435 827
duke@435 828 void
duke@435 829 JvmtiEventControllerPrivate::clear_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
duke@435 830 EC_TRACE(("JVMTI [%s] # clear frame pop - frame=%d",
duke@435 831 JvmtiTrace::safe_get_thread_name(ets->get_thread()),
duke@435 832 fpop.frame_number() ));
duke@435 833
duke@435 834 ets->get_frame_pops()->clear(fpop);
duke@435 835 recompute_thread_enabled(ets->get_thread()->jvmti_thread_state());
duke@435 836 }
duke@435 837
duke@435 838
duke@435 839 void
duke@435 840 JvmtiEventControllerPrivate::clear_to_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
duke@435 841 int cleared_cnt = ets->get_frame_pops()->clear_to(fpop);
duke@435 842
duke@435 843 EC_TRACE(("JVMTI [%s] # clear to frame pop - frame=%d, count=%d",
duke@435 844 JvmtiTrace::safe_get_thread_name(ets->get_thread()),
duke@435 845 fpop.frame_number(),
duke@435 846 cleared_cnt ));
duke@435 847
duke@435 848 if (cleared_cnt > 0) {
duke@435 849 recompute_thread_enabled(ets->get_thread()->jvmti_thread_state());
duke@435 850 }
duke@435 851 }
duke@435 852
duke@435 853 void
duke@435 854 JvmtiEventControllerPrivate::change_field_watch(jvmtiEvent event_type, bool added) {
duke@435 855 int *count_addr;
duke@435 856
duke@435 857 switch (event_type) {
duke@435 858 case JVMTI_EVENT_FIELD_MODIFICATION:
duke@435 859 count_addr = (int *)JvmtiExport::get_field_modification_count_addr();
duke@435 860 break;
duke@435 861 case JVMTI_EVENT_FIELD_ACCESS:
duke@435 862 count_addr = (int *)JvmtiExport::get_field_access_count_addr();
duke@435 863 break;
duke@435 864 default:
duke@435 865 assert(false, "incorrect event");
duke@435 866 return;
duke@435 867 }
duke@435 868
duke@435 869 EC_TRACE(("JVMTI [-] # change field watch - %s %s count=%d",
duke@435 870 event_type==JVMTI_EVENT_FIELD_MODIFICATION? "modification" : "access",
duke@435 871 added? "add" : "remove",
duke@435 872 *count_addr));
duke@435 873
duke@435 874 if (added) {
duke@435 875 (*count_addr)++;
duke@435 876 if (*count_addr == 1) {
duke@435 877 recompute_enabled();
duke@435 878 }
duke@435 879 } else {
duke@435 880 if (*count_addr > 0) {
duke@435 881 (*count_addr)--;
duke@435 882 if (*count_addr == 0) {
duke@435 883 recompute_enabled();
duke@435 884 }
duke@435 885 } else {
duke@435 886 assert(false, "field watch out of phase");
duke@435 887 }
duke@435 888 }
duke@435 889 }
duke@435 890
duke@435 891 void
duke@435 892 JvmtiEventControllerPrivate::event_init() {
duke@435 893 assert(JvmtiThreadState_lock->is_locked(), "sanity check");
duke@435 894
duke@435 895 if (_initialized) {
duke@435 896 return;
duke@435 897 }
duke@435 898
duke@435 899 EC_TRACE(("JVMTI [-] # VM live"));
duke@435 900
duke@435 901 #ifdef ASSERT
duke@435 902 // check that our idea and the spec's idea of threaded events match
duke@435 903 for (int ei = JVMTI_MIN_EVENT_TYPE_VAL; ei <= JVMTI_MAX_EVENT_TYPE_VAL; ++ei) {
duke@435 904 jlong bit = JvmtiEventEnabled::bit_for((jvmtiEvent)ei);
duke@435 905 assert(((THREAD_FILTERED_EVENT_BITS & bit) != 0) == JvmtiUtil::event_threaded(ei),
duke@435 906 "thread filtered event list does not match");
duke@435 907 }
duke@435 908 #endif
duke@435 909
duke@435 910 _initialized = true;
duke@435 911 }
duke@435 912
duke@435 913 void
duke@435 914 JvmtiEventControllerPrivate::vm_start() {
duke@435 915 // some events are now able to be enabled (phase has changed)
duke@435 916 JvmtiEventControllerPrivate::recompute_enabled();
duke@435 917 }
duke@435 918
duke@435 919
duke@435 920 void
duke@435 921 JvmtiEventControllerPrivate::vm_init() {
duke@435 922 event_init();
duke@435 923
duke@435 924 // all the events are now able to be enabled (phase has changed)
duke@435 925 JvmtiEventControllerPrivate::recompute_enabled();
duke@435 926 }
duke@435 927
duke@435 928
duke@435 929 void
duke@435 930 JvmtiEventControllerPrivate::vm_death() {
duke@435 931 // events are disabled (phase has changed)
duke@435 932 JvmtiEventControllerPrivate::recompute_enabled();
duke@435 933 }
duke@435 934
duke@435 935
duke@435 936 ///////////////////////////////////////////////////////////////
duke@435 937 //
duke@435 938 // JvmtiEventController
duke@435 939 //
duke@435 940
duke@435 941 JvmtiEventEnabled JvmtiEventController::_universal_global_event_enabled;
duke@435 942
duke@435 943 bool
duke@435 944 JvmtiEventController::is_global_event(jvmtiEvent event_type) {
duke@435 945 assert(is_valid_event_type(event_type), "invalid event type");
duke@435 946 jlong bit_for = ((jlong)1) << (event_type - TOTAL_MIN_EVENT_TYPE_VAL);
duke@435 947 return((bit_for & GLOBAL_EVENT_BITS)!=0);
duke@435 948 }
duke@435 949
duke@435 950 void
duke@435 951 JvmtiEventController::set_user_enabled(JvmtiEnvBase *env, JavaThread *thread, jvmtiEvent event_type, bool enabled) {
duke@435 952 if (Threads::number_of_threads() == 0) {
duke@435 953 // during early VM start-up locks don't exist, but we are safely single threaded,
duke@435 954 // call the functionality without holding the JvmtiThreadState_lock.
duke@435 955 JvmtiEventControllerPrivate::set_user_enabled(env, thread, event_type, enabled);
duke@435 956 } else {
duke@435 957 MutexLocker mu(JvmtiThreadState_lock);
duke@435 958 JvmtiEventControllerPrivate::set_user_enabled(env, thread, event_type, enabled);
duke@435 959 }
duke@435 960 }
duke@435 961
duke@435 962
duke@435 963 void
duke@435 964 JvmtiEventController::set_event_callbacks(JvmtiEnvBase *env,
duke@435 965 const jvmtiEventCallbacks* callbacks,
duke@435 966 jint size_of_callbacks) {
duke@435 967 if (Threads::number_of_threads() == 0) {
duke@435 968 // during early VM start-up locks don't exist, but we are safely single threaded,
duke@435 969 // call the functionality without holding the JvmtiThreadState_lock.
duke@435 970 JvmtiEventControllerPrivate::set_event_callbacks(env, callbacks, size_of_callbacks);
duke@435 971 } else {
duke@435 972 MutexLocker mu(JvmtiThreadState_lock);
duke@435 973 JvmtiEventControllerPrivate::set_event_callbacks(env, callbacks, size_of_callbacks);
duke@435 974 }
duke@435 975 }
duke@435 976
duke@435 977 void
duke@435 978 JvmtiEventController::set_extension_event_callback(JvmtiEnvBase *env,
duke@435 979 jint extension_event_index,
duke@435 980 jvmtiExtensionEvent callback) {
duke@435 981 if (Threads::number_of_threads() == 0) {
duke@435 982 JvmtiEventControllerPrivate::set_extension_event_callback(env, extension_event_index, callback);
duke@435 983 } else {
duke@435 984 MutexLocker mu(JvmtiThreadState_lock);
duke@435 985 JvmtiEventControllerPrivate::set_extension_event_callback(env, extension_event_index, callback);
duke@435 986 }
duke@435 987 }
duke@435 988
duke@435 989
duke@435 990
duke@435 991
duke@435 992 void
duke@435 993 JvmtiEventController::set_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
duke@435 994 MutexLocker mu(JvmtiThreadState_lock);
duke@435 995 JvmtiEventControllerPrivate::set_frame_pop(ets, fpop);
duke@435 996 }
duke@435 997
duke@435 998
duke@435 999 void
duke@435 1000 JvmtiEventController::clear_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
duke@435 1001 MutexLocker mu(JvmtiThreadState_lock);
duke@435 1002 JvmtiEventControllerPrivate::clear_frame_pop(ets, fpop);
duke@435 1003 }
duke@435 1004
duke@435 1005
duke@435 1006 void
duke@435 1007 JvmtiEventController::clear_to_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
duke@435 1008 MutexLocker mu(JvmtiThreadState_lock);
duke@435 1009 JvmtiEventControllerPrivate::clear_to_frame_pop(ets, fpop);
duke@435 1010 }
duke@435 1011
duke@435 1012 void
duke@435 1013 JvmtiEventController::change_field_watch(jvmtiEvent event_type, bool added) {
duke@435 1014 MutexLocker mu(JvmtiThreadState_lock);
duke@435 1015 JvmtiEventControllerPrivate::change_field_watch(event_type, added);
duke@435 1016 }
duke@435 1017
duke@435 1018 void
duke@435 1019 JvmtiEventController::thread_started(JavaThread *thread) {
duke@435 1020 // operates only on the current thread
duke@435 1021 // JvmtiThreadState_lock grabbed only if needed.
duke@435 1022 JvmtiEventControllerPrivate::thread_started(thread);
duke@435 1023 }
duke@435 1024
duke@435 1025 void
duke@435 1026 JvmtiEventController::thread_ended(JavaThread *thread) {
duke@435 1027 // operates only on the current thread
duke@435 1028 // JvmtiThreadState_lock grabbed only if needed.
duke@435 1029 JvmtiEventControllerPrivate::thread_ended(thread);
duke@435 1030 }
duke@435 1031
duke@435 1032 void
duke@435 1033 JvmtiEventController::env_initialize(JvmtiEnvBase *env) {
duke@435 1034 if (Threads::number_of_threads() == 0) {
duke@435 1035 // during early VM start-up locks don't exist, but we are safely single threaded,
duke@435 1036 // call the functionality without holding the JvmtiThreadState_lock.
duke@435 1037 JvmtiEventControllerPrivate::env_initialize(env);
duke@435 1038 } else {
duke@435 1039 MutexLocker mu(JvmtiThreadState_lock);
duke@435 1040 JvmtiEventControllerPrivate::env_initialize(env);
duke@435 1041 }
duke@435 1042 }
duke@435 1043
duke@435 1044 void
duke@435 1045 JvmtiEventController::env_dispose(JvmtiEnvBase *env) {
duke@435 1046 if (Threads::number_of_threads() == 0) {
duke@435 1047 // during early VM start-up locks don't exist, but we are safely single threaded,
duke@435 1048 // call the functionality without holding the JvmtiThreadState_lock.
duke@435 1049 JvmtiEventControllerPrivate::env_dispose(env);
duke@435 1050 } else {
duke@435 1051 MutexLocker mu(JvmtiThreadState_lock);
duke@435 1052 JvmtiEventControllerPrivate::env_dispose(env);
duke@435 1053 }
duke@435 1054 }
duke@435 1055
duke@435 1056
duke@435 1057 void
duke@435 1058 JvmtiEventController::vm_start() {
duke@435 1059 if (JvmtiEnvBase::environments_might_exist()) {
duke@435 1060 MutexLocker mu(JvmtiThreadState_lock);
duke@435 1061 JvmtiEventControllerPrivate::vm_start();
duke@435 1062 }
duke@435 1063 }
duke@435 1064
duke@435 1065 void
duke@435 1066 JvmtiEventController::vm_init() {
duke@435 1067 if (JvmtiEnvBase::environments_might_exist()) {
duke@435 1068 MutexLocker mu(JvmtiThreadState_lock);
duke@435 1069 JvmtiEventControllerPrivate::vm_init();
duke@435 1070 }
duke@435 1071 }
duke@435 1072
duke@435 1073 void
duke@435 1074 JvmtiEventController::vm_death() {
duke@435 1075 if (JvmtiEnvBase::environments_might_exist()) {
duke@435 1076 MutexLocker mu(JvmtiThreadState_lock);
duke@435 1077 JvmtiEventControllerPrivate::vm_death();
duke@435 1078 }
duke@435 1079 }

mercurial