aoqi@0: /*
aoqi@0:  * Copyright (c) 2003, 2014, Oracle and/or its affiliates. All rights reserved.
aoqi@0:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
aoqi@0:  *
aoqi@0:  * This code is free software; you can redistribute it and/or modify it
aoqi@0:  * under the terms of the GNU General Public License version 2 only, as
aoqi@0:  * published by the Free Software Foundation.
aoqi@0:  *
aoqi@0:  * This code is distributed in the hope that it will be useful, but WITHOUT
aoqi@0:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
aoqi@0:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
aoqi@0:  * version 2 for more details (a copy is included in the LICENSE file that
aoqi@0:  * accompanied this code).
aoqi@0:  *
aoqi@0:  * You should have received a copy of the GNU General Public License version
aoqi@0:  * 2 along with this work; if not, write to the Free Software Foundation,
aoqi@0:  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
aoqi@0:  *
aoqi@0:  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
aoqi@0:  * or visit www.oracle.com if you need additional information or have any
aoqi@0:  * questions.
aoqi@0:  *
aoqi@0:  */
aoqi@0: 
aoqi@0: #include "precompiled.hpp"
aoqi@0: #include "interpreter/interpreter.hpp"
aoqi@0: #include "jvmtifiles/jvmtiEnv.hpp"
aoqi@0: #include "memory/resourceArea.hpp"
aoqi@0: #include "prims/jvmtiEventController.hpp"
aoqi@0: #include "prims/jvmtiEventController.inline.hpp"
aoqi@0: #include "prims/jvmtiExport.hpp"
aoqi@0: #include "prims/jvmtiImpl.hpp"
aoqi@0: #include "prims/jvmtiThreadState.inline.hpp"
aoqi@0: #include "runtime/frame.hpp"
aoqi@0: #include "runtime/thread.hpp"
aoqi@0: #include "runtime/vframe.hpp"
aoqi@0: #include "runtime/vframe_hp.hpp"
aoqi@0: #include "runtime/vmThread.hpp"
aoqi@0: #include "runtime/vm_operations.hpp"
aoqi@0: 
aoqi@0: PRAGMA_FORMAT_MUTE_WARNINGS_FOR_GCC
aoqi@0: 
aoqi@0: #ifdef JVMTI_TRACE
aoqi@0: #define EC_TRACE(out) do { \
aoqi@0:   if (JvmtiTrace::trace_event_controller()) { \
aoqi@0:     SafeResourceMark rm; \
aoqi@0:     tty->print_cr out; \
aoqi@0:   } \
aoqi@0: } while (0)
aoqi@0: #else
aoqi@0: #define EC_TRACE(out)
aoqi@0: #endif /*JVMTI_TRACE */
aoqi@0: 
aoqi@0: // bits for standard events
aoqi@0: 
aoqi@0: static const jlong  SINGLE_STEP_BIT = (((jlong)1) << (JVMTI_EVENT_SINGLE_STEP - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  FRAME_POP_BIT = (((jlong)1) << (JVMTI_EVENT_FRAME_POP - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  BREAKPOINT_BIT = (((jlong)1) << (JVMTI_EVENT_BREAKPOINT - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  FIELD_ACCESS_BIT = (((jlong)1) << (JVMTI_EVENT_FIELD_ACCESS - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  FIELD_MODIFICATION_BIT = (((jlong)1) << (JVMTI_EVENT_FIELD_MODIFICATION - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  METHOD_ENTRY_BIT = (((jlong)1) << (JVMTI_EVENT_METHOD_ENTRY - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  METHOD_EXIT_BIT = (((jlong)1) << (JVMTI_EVENT_METHOD_EXIT - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  CLASS_FILE_LOAD_HOOK_BIT = (((jlong)1) << (JVMTI_EVENT_CLASS_FILE_LOAD_HOOK - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  NATIVE_METHOD_BIND_BIT = (((jlong)1) << (JVMTI_EVENT_NATIVE_METHOD_BIND - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  VM_START_BIT = (((jlong)1) << (JVMTI_EVENT_VM_START - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  VM_INIT_BIT = (((jlong)1) << (JVMTI_EVENT_VM_INIT - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  VM_DEATH_BIT = (((jlong)1) << (JVMTI_EVENT_VM_DEATH - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  CLASS_LOAD_BIT = (((jlong)1) << (JVMTI_EVENT_CLASS_LOAD - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  CLASS_PREPARE_BIT = (((jlong)1) << (JVMTI_EVENT_CLASS_PREPARE - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  THREAD_START_BIT = (((jlong)1) << (JVMTI_EVENT_THREAD_START - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  THREAD_END_BIT = (((jlong)1) << (JVMTI_EVENT_THREAD_END - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  EXCEPTION_THROW_BIT = (((jlong)1) << (JVMTI_EVENT_EXCEPTION - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  EXCEPTION_CATCH_BIT = (((jlong)1) << (JVMTI_EVENT_EXCEPTION_CATCH - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  MONITOR_CONTENDED_ENTER_BIT = (((jlong)1) << (JVMTI_EVENT_MONITOR_CONTENDED_ENTER - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  MONITOR_CONTENDED_ENTERED_BIT = (((jlong)1) << (JVMTI_EVENT_MONITOR_CONTENDED_ENTERED - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  MONITOR_WAIT_BIT = (((jlong)1) << (JVMTI_EVENT_MONITOR_WAIT - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  MONITOR_WAITED_BIT = (((jlong)1) << (JVMTI_EVENT_MONITOR_WAITED - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  DYNAMIC_CODE_GENERATED_BIT = (((jlong)1) << (JVMTI_EVENT_DYNAMIC_CODE_GENERATED - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  DATA_DUMP_BIT = (((jlong)1) << (JVMTI_EVENT_DATA_DUMP_REQUEST - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  COMPILED_METHOD_LOAD_BIT = (((jlong)1) << (JVMTI_EVENT_COMPILED_METHOD_LOAD - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  COMPILED_METHOD_UNLOAD_BIT = (((jlong)1) << (JVMTI_EVENT_COMPILED_METHOD_UNLOAD - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  GARBAGE_COLLECTION_START_BIT = (((jlong)1) << (JVMTI_EVENT_GARBAGE_COLLECTION_START - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  GARBAGE_COLLECTION_FINISH_BIT = (((jlong)1) << (JVMTI_EVENT_GARBAGE_COLLECTION_FINISH - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  OBJECT_FREE_BIT = (((jlong)1) << (JVMTI_EVENT_OBJECT_FREE - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  RESOURCE_EXHAUSTED_BIT = (((jlong)1) << (JVMTI_EVENT_RESOURCE_EXHAUSTED - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: static const jlong  VM_OBJECT_ALLOC_BIT = (((jlong)1) << (JVMTI_EVENT_VM_OBJECT_ALLOC - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: 
aoqi@0: // bits for extension events
aoqi@0: static const jlong  CLASS_UNLOAD_BIT = (((jlong)1) << (EXT_EVENT_CLASS_UNLOAD - TOTAL_MIN_EVENT_TYPE_VAL));
aoqi@0: 
aoqi@0: 
aoqi@0: static const jlong  MONITOR_BITS = MONITOR_CONTENDED_ENTER_BIT | MONITOR_CONTENDED_ENTERED_BIT |
aoqi@0:                           MONITOR_WAIT_BIT | MONITOR_WAITED_BIT;
aoqi@0: static const jlong  EXCEPTION_BITS = EXCEPTION_THROW_BIT | EXCEPTION_CATCH_BIT;
aoqi@0: static const jlong  INTERP_EVENT_BITS =  SINGLE_STEP_BIT | METHOD_ENTRY_BIT | METHOD_EXIT_BIT |
aoqi@0:                                 FRAME_POP_BIT | FIELD_ACCESS_BIT | FIELD_MODIFICATION_BIT;
aoqi@0: static const jlong  THREAD_FILTERED_EVENT_BITS = INTERP_EVENT_BITS | EXCEPTION_BITS | MONITOR_BITS |
aoqi@0:                                         BREAKPOINT_BIT | CLASS_LOAD_BIT | CLASS_PREPARE_BIT | THREAD_END_BIT;
aoqi@0: static const jlong  NEED_THREAD_LIFE_EVENTS = THREAD_FILTERED_EVENT_BITS | THREAD_START_BIT;
aoqi@0: static const jlong  EARLY_EVENT_BITS = CLASS_FILE_LOAD_HOOK_BIT |
aoqi@0:                                VM_START_BIT | VM_INIT_BIT | VM_DEATH_BIT | NATIVE_METHOD_BIND_BIT |
aoqi@0:                                THREAD_START_BIT | THREAD_END_BIT |
aoqi@0:                                DYNAMIC_CODE_GENERATED_BIT;
aoqi@0: static const jlong  GLOBAL_EVENT_BITS = ~THREAD_FILTERED_EVENT_BITS;
aoqi@0: static const jlong  SHOULD_POST_ON_EXCEPTIONS_BITS = EXCEPTION_BITS | METHOD_EXIT_BIT | FRAME_POP_BIT;
aoqi@0: 
aoqi@0: ///////////////////////////////////////////////////////////////
aoqi@0: //
aoqi@0: // JvmtiEventEnabled
aoqi@0: //
aoqi@0: 
aoqi@0: JvmtiEventEnabled::JvmtiEventEnabled() {
aoqi@0:   clear();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void JvmtiEventEnabled::clear() {
aoqi@0:   _enabled_bits = 0;
aoqi@0: #ifndef PRODUCT
aoqi@0:   _init_guard = JEE_INIT_GUARD;
aoqi@0: #endif
aoqi@0: }
aoqi@0: 
aoqi@0: void JvmtiEventEnabled::set_enabled(jvmtiEvent event_type, bool enabled) {
aoqi@0:   jlong bits = get_bits();
aoqi@0:   jlong mask = bit_for(event_type);
aoqi@0:   if (enabled) {
aoqi@0:     bits |= mask;
aoqi@0:   } else {
aoqi@0:     bits &= ~mask;
aoqi@0:   }
aoqi@0:   set_bits(bits);
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: ///////////////////////////////////////////////////////////////
aoqi@0: //
aoqi@0: // JvmtiEnvThreadEventEnable
aoqi@0: //
aoqi@0: 
aoqi@0: JvmtiEnvThreadEventEnable::JvmtiEnvThreadEventEnable() {
aoqi@0:   _event_user_enabled.clear();
aoqi@0:   _event_enabled.clear();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: JvmtiEnvThreadEventEnable::~JvmtiEnvThreadEventEnable() {
aoqi@0:   _event_user_enabled.clear();
aoqi@0:   _event_enabled.clear();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: ///////////////////////////////////////////////////////////////
aoqi@0: //
aoqi@0: // JvmtiThreadEventEnable
aoqi@0: //
aoqi@0: 
aoqi@0: JvmtiThreadEventEnable::JvmtiThreadEventEnable() {
aoqi@0:   _event_enabled.clear();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: JvmtiThreadEventEnable::~JvmtiThreadEventEnable() {
aoqi@0:   _event_enabled.clear();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: ///////////////////////////////////////////////////////////////
aoqi@0: //
aoqi@0: // JvmtiEnvEventEnable
aoqi@0: //
aoqi@0: 
aoqi@0: JvmtiEnvEventEnable::JvmtiEnvEventEnable() {
aoqi@0:   _event_user_enabled.clear();
aoqi@0:   _event_callback_enabled.clear();
aoqi@0:   _event_enabled.clear();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: JvmtiEnvEventEnable::~JvmtiEnvEventEnable() {
aoqi@0:   _event_user_enabled.clear();
aoqi@0:   _event_callback_enabled.clear();
aoqi@0:   _event_enabled.clear();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: ///////////////////////////////////////////////////////////////
aoqi@0: //
aoqi@0: // VM_EnterInterpOnlyMode
aoqi@0: //
aoqi@0: 
aoqi@0: class VM_EnterInterpOnlyMode : public VM_Operation {
aoqi@0: private:
aoqi@0:   JvmtiThreadState *_state;
aoqi@0: 
aoqi@0: public:
aoqi@0:   VM_EnterInterpOnlyMode(JvmtiThreadState *state);
aoqi@0: 
aoqi@0:   bool allow_nested_vm_operations() const        { return true; }
aoqi@0:   VMOp_Type type() const { return VMOp_EnterInterpOnlyMode; }
aoqi@0:   void doit();
aoqi@0: 
aoqi@0:   // to do: this same function is in jvmtiImpl - should be in one place
aoqi@0:   bool can_be_deoptimized(vframe* vf) {
aoqi@0:     return (vf->is_compiled_frame() && vf->fr().can_be_deoptimized());
aoqi@0:   }
aoqi@0: };
aoqi@0: 
aoqi@0: VM_EnterInterpOnlyMode::VM_EnterInterpOnlyMode(JvmtiThreadState *state)
aoqi@0:   : _state(state)
aoqi@0: {
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void VM_EnterInterpOnlyMode::doit() {
aoqi@0:   // Set up the current stack depth for later tracking
aoqi@0:   _state->invalidate_cur_stack_depth();
aoqi@0: 
aoqi@0:   _state->enter_interp_only_mode();
aoqi@0: 
aoqi@0:   JavaThread *thread = _state->get_thread();
aoqi@0:   if (thread->has_last_Java_frame()) {
aoqi@0:     // If running in fullspeed mode, single stepping is implemented
aoqi@0:     // as follows: first, the interpreter does not dispatch to
aoqi@0:     // compiled code for threads that have single stepping enabled;
aoqi@0:     // second, we deoptimize all methods on the thread's stack when
aoqi@0:     // interpreted-only mode is enabled the first time for a given
aoqi@0:     // thread (nothing to do if no Java frames yet).
aoqi@0:     int num_marked = 0;
aoqi@0:     ResourceMark resMark;
aoqi@0:     RegisterMap rm(thread, false);
aoqi@0:     for (vframe* vf = thread->last_java_vframe(&rm); vf; vf = vf->sender()) {
aoqi@0:       if (can_be_deoptimized(vf)) {
aoqi@0:         ((compiledVFrame*) vf)->code()->mark_for_deoptimization();
aoqi@0:         ++num_marked;
aoqi@0:       }
aoqi@0:     }
aoqi@0:     if (num_marked > 0) {
aoqi@0:       VM_Deoptimize op;
aoqi@0:       VMThread::execute(&op);
aoqi@0:     }
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: ///////////////////////////////////////////////////////////////
aoqi@0: //
aoqi@0: // VM_ChangeSingleStep
aoqi@0: //
aoqi@0: 
aoqi@0: class VM_ChangeSingleStep : public VM_Operation {
aoqi@0: private:
aoqi@0:   bool _on;
aoqi@0: 
aoqi@0: public:
aoqi@0:   VM_ChangeSingleStep(bool on);
aoqi@0:   VMOp_Type type() const                         { return VMOp_ChangeSingleStep; }
aoqi@0:   bool allow_nested_vm_operations() const        { return true; }
aoqi@0:   void doit();   // method definition is after definition of JvmtiEventControllerPrivate because of scoping
aoqi@0: };
aoqi@0: 
aoqi@0: 
aoqi@0: VM_ChangeSingleStep::VM_ChangeSingleStep(bool on)
aoqi@0:   : _on(on != 0)
aoqi@0: {
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: 
aoqi@0: 
aoqi@0: ///////////////////////////////////////////////////////////////
aoqi@0: //
aoqi@0: // JvmtiEventControllerPrivate
aoqi@0: //
aoqi@0: // Private internal implementation methods for JvmtiEventController.
aoqi@0: //
aoqi@0: // These methods are thread safe either because they are called
aoqi@0: // in early VM initialization which is single threaded, or they
aoqi@0: // hold the JvmtiThreadState_lock.
aoqi@0: //
aoqi@0: 
aoqi@0: class JvmtiEventControllerPrivate : public AllStatic {
aoqi@0:   static bool _initialized;
aoqi@0: public:
aoqi@0:   static void set_should_post_single_step(bool on);
aoqi@0:   static void enter_interp_only_mode(JvmtiThreadState *state);
aoqi@0:   static void leave_interp_only_mode(JvmtiThreadState *state);
aoqi@0:   static void recompute_enabled();
aoqi@0:   static jlong recompute_env_enabled(JvmtiEnvBase* env);
aoqi@0:   static jlong recompute_env_thread_enabled(JvmtiEnvThreadState* ets, JvmtiThreadState* state);
aoqi@0:   static jlong recompute_thread_enabled(JvmtiThreadState *state);
aoqi@0:   static void event_init();
aoqi@0: 
aoqi@0:   static void set_user_enabled(JvmtiEnvBase *env, JavaThread *thread,
aoqi@0:                         jvmtiEvent event_type, bool enabled);
aoqi@0:   static void set_event_callbacks(JvmtiEnvBase *env,
aoqi@0:                                   const jvmtiEventCallbacks* callbacks,
aoqi@0:                                   jint size_of_callbacks);
aoqi@0: 
aoqi@0:   static void set_extension_event_callback(JvmtiEnvBase *env,
aoqi@0:                                            jint extension_event_index,
aoqi@0:                                            jvmtiExtensionEvent callback);
aoqi@0: 
aoqi@0:   static void set_frame_pop(JvmtiEnvThreadState *env_thread, JvmtiFramePop fpop);
aoqi@0:   static void clear_frame_pop(JvmtiEnvThreadState *env_thread, JvmtiFramePop fpop);
aoqi@0:   static void clear_to_frame_pop(JvmtiEnvThreadState *env_thread, JvmtiFramePop fpop);
aoqi@0:   static void change_field_watch(jvmtiEvent event_type, bool added);
aoqi@0: 
aoqi@0:   static void thread_started(JavaThread *thread);
aoqi@0:   static void thread_ended(JavaThread *thread);
aoqi@0: 
aoqi@0:   static void env_initialize(JvmtiEnvBase *env);
aoqi@0:   static void env_dispose(JvmtiEnvBase *env);
aoqi@0: 
aoqi@0:   static void vm_start();
aoqi@0:   static void vm_init();
aoqi@0:   static void vm_death();
aoqi@0: 
aoqi@0:   static void trace_changed(JvmtiThreadState *state, jlong now_enabled, jlong changed);
aoqi@0:   static void trace_changed(jlong now_enabled, jlong changed);
aoqi@0: };
aoqi@0: 
aoqi@0: bool JvmtiEventControllerPrivate::_initialized = false;
aoqi@0: 
aoqi@0: void JvmtiEventControllerPrivate::set_should_post_single_step(bool on) {
aoqi@0:   // we have permission to do this, VM op doesn't
aoqi@0:   JvmtiExport::set_should_post_single_step(on);
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: // This change must always be occur when at a safepoint.
aoqi@0: // Being at a safepoint causes the interpreter to use the
aoqi@0: // safepoint dispatch table which we overload to find single
aoqi@0: // step points.  Just to be sure that it has been set, we
aoqi@0: // call notice_safepoints when turning on single stepping.
aoqi@0: // When we leave our current safepoint, should_post_single_step
aoqi@0: // will be checked by the interpreter, and the table kept
aoqi@0: // or changed accordingly.
aoqi@0: void VM_ChangeSingleStep::doit() {
aoqi@0:   JvmtiEventControllerPrivate::set_should_post_single_step(_on);
aoqi@0:   if (_on) {
aoqi@0:     Interpreter::notice_safepoints();
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void JvmtiEventControllerPrivate::enter_interp_only_mode(JvmtiThreadState *state) {
aoqi@0:   EC_TRACE(("JVMTI [%s] # Entering interpreter only mode",
aoqi@0:             JvmtiTrace::safe_get_thread_name(state->get_thread())));
aoqi@0: 
aoqi@0:   VM_EnterInterpOnlyMode op(state);
aoqi@0:   VMThread::execute(&op);
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::leave_interp_only_mode(JvmtiThreadState *state) {
aoqi@0:   EC_TRACE(("JVMTI [%s] # Leaving interpreter only mode",
aoqi@0:             JvmtiTrace::safe_get_thread_name(state->get_thread())));
aoqi@0:   state->leave_interp_only_mode();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::trace_changed(JvmtiThreadState *state, jlong now_enabled, jlong changed) {
aoqi@0: #ifdef JVMTI_TRACE
aoqi@0:   if (JvmtiTrace::trace_event_controller()) {
aoqi@0:     SafeResourceMark rm;
aoqi@0:     // traces standard events only
aoqi@0:     for (int ei = JVMTI_MIN_EVENT_TYPE_VAL; ei <= JVMTI_MAX_EVENT_TYPE_VAL; ++ei) {
aoqi@0:       jlong bit = JvmtiEventEnabled::bit_for((jvmtiEvent)ei);
aoqi@0:       if (changed & bit) {
aoqi@0:         // it changed, print it
aoqi@0:         tty->print_cr("JVMTI [%s] # %s event %s",
aoqi@0:                       JvmtiTrace::safe_get_thread_name(state->get_thread()),
aoqi@0:                       (now_enabled & bit)? "Enabling" : "Disabling", JvmtiTrace::event_name((jvmtiEvent)ei));
aoqi@0:       }
aoqi@0:     }
aoqi@0:   }
aoqi@0: #endif /*JVMTI_TRACE */
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::trace_changed(jlong now_enabled, jlong changed) {
aoqi@0: #ifdef JVMTI_TRACE
aoqi@0:   if (JvmtiTrace::trace_event_controller()) {
aoqi@0:     SafeResourceMark rm;
aoqi@0:     // traces standard events only
aoqi@0:     for (int ei = JVMTI_MIN_EVENT_TYPE_VAL; ei <= JVMTI_MAX_EVENT_TYPE_VAL; ++ei) {
aoqi@0:       jlong bit = JvmtiEventEnabled::bit_for((jvmtiEvent)ei);
aoqi@0:       if (changed & bit) {
aoqi@0:         // it changed, print it
aoqi@0:         tty->print_cr("JVMTI [-] # %s event %s",
aoqi@0:                       (now_enabled & bit)? "Enabling" : "Disabling", JvmtiTrace::event_name((jvmtiEvent)ei));
aoqi@0:       }
aoqi@0:     }
aoqi@0:   }
aoqi@0: #endif /*JVMTI_TRACE */
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: // For the specified env: compute the currently truly enabled events
aoqi@0: // set external state accordingly.
aoqi@0: // Return value and set value must include all events.
aoqi@0: // But outside this class, only non-thread-filtered events can be queried..
aoqi@0: jlong
aoqi@0: JvmtiEventControllerPrivate::recompute_env_enabled(JvmtiEnvBase* env) {
aoqi@0:   jlong was_enabled = env->env_event_enable()->_event_enabled.get_bits();
aoqi@0:   jlong now_enabled =
aoqi@0:     env->env_event_enable()->_event_callback_enabled.get_bits() &
aoqi@0:     env->env_event_enable()->_event_user_enabled.get_bits();
aoqi@0: 
aoqi@0:   switch (JvmtiEnv::get_phase()) {
aoqi@0:   case JVMTI_PHASE_PRIMORDIAL:
aoqi@0:   case JVMTI_PHASE_ONLOAD:
aoqi@0:     // only these events allowed in primordial or onload phase
aoqi@0:     now_enabled &= (EARLY_EVENT_BITS & ~THREAD_FILTERED_EVENT_BITS);
aoqi@0:     break;
aoqi@0:   case JVMTI_PHASE_START:
aoqi@0:     // only these events allowed in start phase
aoqi@0:     now_enabled &= EARLY_EVENT_BITS;
aoqi@0:     break;
aoqi@0:   case JVMTI_PHASE_LIVE:
aoqi@0:     // all events allowed during live phase
aoqi@0:     break;
aoqi@0:   case JVMTI_PHASE_DEAD:
aoqi@0:     // no events allowed when dead
aoqi@0:     now_enabled = 0;
aoqi@0:     break;
aoqi@0:   default:
aoqi@0:     assert(false, "no other phases - sanity check");
aoqi@0:     break;
aoqi@0:   }
aoqi@0: 
aoqi@0:   // will we really send these events to this env
aoqi@0:   env->env_event_enable()->_event_enabled.set_bits(now_enabled);
aoqi@0: 
aoqi@0:   trace_changed(now_enabled, (now_enabled ^ was_enabled)  & ~THREAD_FILTERED_EVENT_BITS);
aoqi@0: 
aoqi@0:   return now_enabled;
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: // For the specified env and thread: compute the currently truly enabled events
aoqi@0: // set external state accordingly.  Only thread-filtered events are included.
aoqi@0: jlong
aoqi@0: JvmtiEventControllerPrivate::recompute_env_thread_enabled(JvmtiEnvThreadState* ets, JvmtiThreadState* state) {
aoqi@0:   JvmtiEnv *env = ets->get_env();
aoqi@0: 
aoqi@0:   jlong was_enabled = ets->event_enable()->_event_enabled.get_bits();
aoqi@0:   jlong now_enabled =  THREAD_FILTERED_EVENT_BITS &
aoqi@0:     env->env_event_enable()->_event_callback_enabled.get_bits() &
aoqi@0:     (env->env_event_enable()->_event_user_enabled.get_bits() |
aoqi@0:      ets->event_enable()->_event_user_enabled.get_bits());
aoqi@0: 
aoqi@0:   // for frame pops and field watchs, computed enabled state
aoqi@0:   // is only true if an event has been requested
aoqi@0:   if (!ets->has_frame_pops()) {
aoqi@0:     now_enabled &= ~FRAME_POP_BIT;
aoqi@0:   }
aoqi@0:   if (*((int *)JvmtiExport::get_field_access_count_addr()) == 0) {
aoqi@0:     now_enabled &= ~FIELD_ACCESS_BIT;
aoqi@0:   }
aoqi@0:   if (*((int *)JvmtiExport::get_field_modification_count_addr()) == 0) {
aoqi@0:     now_enabled &= ~FIELD_MODIFICATION_BIT;
aoqi@0:   }
aoqi@0: 
aoqi@0:   switch (JvmtiEnv::get_phase()) {
aoqi@0:   case JVMTI_PHASE_DEAD:
aoqi@0:     // no events allowed when dead
aoqi@0:     now_enabled = 0;
aoqi@0:     break;
aoqi@0:   }
aoqi@0: 
aoqi@0:   // if anything changed do update
aoqi@0:   if (now_enabled != was_enabled) {
aoqi@0: 
aoqi@0:     // will we really send these events to this thread x env
aoqi@0:     ets->event_enable()->_event_enabled.set_bits(now_enabled);
aoqi@0: 
aoqi@0:     // If the enabled status of the single step or breakpoint events changed,
aoqi@0:     // the location status may need to change as well.
aoqi@0:     jlong changed = now_enabled ^ was_enabled;
aoqi@0:     if (changed & SINGLE_STEP_BIT) {
aoqi@0:       ets->reset_current_location(JVMTI_EVENT_SINGLE_STEP, (now_enabled & SINGLE_STEP_BIT) != 0);
aoqi@0:     }
aoqi@0:     if (changed & BREAKPOINT_BIT) {
aoqi@0:       ets->reset_current_location(JVMTI_EVENT_BREAKPOINT,  (now_enabled & BREAKPOINT_BIT) != 0);
aoqi@0:     }
aoqi@0:     trace_changed(state, now_enabled, changed);
aoqi@0:   }
aoqi@0:   return now_enabled;
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: // For the specified thread: compute the currently truly enabled events
aoqi@0: // set external state accordingly.  Only thread-filtered events are included.
aoqi@0: jlong
aoqi@0: JvmtiEventControllerPrivate::recompute_thread_enabled(JvmtiThreadState *state) {
aoqi@0:   if (state == NULL) {
aoqi@0:     // associated JavaThread is exiting
aoqi@0:     return (jlong)0;
aoqi@0:   }
aoqi@0: 
aoqi@0:   jlong was_any_env_enabled = state->thread_event_enable()->_event_enabled.get_bits();
aoqi@0:   jlong any_env_enabled = 0;
aoqi@0: 
aoqi@0:   {
aoqi@0:     // This iteration will include JvmtiEnvThreadStates whoses environments
aoqi@0:     // have been disposed.  These JvmtiEnvThreadStates must not be filtered
aoqi@0:     // as recompute must be called on them to disable their events,
aoqi@0:     JvmtiEnvThreadStateIterator it(state);
aoqi@0:     for (JvmtiEnvThreadState* ets = it.first(); ets != NULL; ets = it.next(ets)) {
aoqi@0:       any_env_enabled |= recompute_env_thread_enabled(ets, state);
aoqi@0:     }
aoqi@0:   }
aoqi@0: 
aoqi@0:   if (any_env_enabled != was_any_env_enabled) {
aoqi@0:     // mark if event is truly enabled on this thread in any environment
aoqi@0:     state->thread_event_enable()->_event_enabled.set_bits(any_env_enabled);
aoqi@0: 
aoqi@0:     // compute interp_only mode
aoqi@0:     bool should_be_interp = (any_env_enabled & INTERP_EVENT_BITS) != 0;
aoqi@0:     bool is_now_interp = state->is_interp_only_mode();
aoqi@0: 
aoqi@0:     if (should_be_interp != is_now_interp) {
aoqi@0:       if (should_be_interp) {
aoqi@0:         enter_interp_only_mode(state);
aoqi@0:       } else {
aoqi@0:         leave_interp_only_mode(state);
aoqi@0:       }
aoqi@0:     }
aoqi@0: 
aoqi@0:     // update the JavaThread cached value for thread-specific should_post_on_exceptions value
aoqi@0:     bool should_post_on_exceptions = (any_env_enabled & SHOULD_POST_ON_EXCEPTIONS_BITS) != 0;
aoqi@0:     state->set_should_post_on_exceptions(should_post_on_exceptions);
aoqi@0:   }
aoqi@0: 
aoqi@0:   return any_env_enabled;
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: // Compute truly enabled events - meaning if the event can and could be
aoqi@0: // sent.  An event is truly enabled if it is user enabled on the thread
aoqi@0: // or globally user enabled, but only if there is a callback or event hook
aoqi@0: // for it and, for field watch and frame pop, one has been set.
aoqi@0: // Compute if truly enabled, per thread, per environment, per combination
aoqi@0: // (thread x environment), and overall.  These merges are true if any is true.
aoqi@0: // True per thread if some environment has callback set and the event is globally
aoqi@0: // enabled or enabled for this thread.
aoqi@0: // True per environment if the callback is set and the event is globally
aoqi@0: // enabled in this environment or enabled for any thread in this environment.
aoqi@0: // True per combination if the environment has the callback set and the
aoqi@0: // event is globally enabled in this environment or the event is enabled
aoqi@0: // for this thread and environment.
aoqi@0: //
aoqi@0: // All states transitions dependent on these transitions are also handled here.
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::recompute_enabled() {
aoqi@0:   assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
aoqi@0: 
aoqi@0:   // event enabled for any thread in any environment
aoqi@0:   jlong was_any_env_thread_enabled = JvmtiEventController::_universal_global_event_enabled.get_bits();
aoqi@0:   jlong any_env_thread_enabled = 0;
aoqi@0: 
aoqi@0:   EC_TRACE(("JVMTI [-] # recompute enabled - before %llx", was_any_env_thread_enabled));
aoqi@0: 
aoqi@0:   // compute non-thread-filters events.
aoqi@0:   // This must be done separately from thread-filtered events, since some
aoqi@0:   // events can occur before any threads exist.
aoqi@0:   JvmtiEnvIterator it;
aoqi@0:   for (JvmtiEnvBase* env = it.first(); env != NULL; env = it.next(env)) {
aoqi@0:     any_env_thread_enabled |= recompute_env_enabled(env);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // We need to create any missing jvmti_thread_state if there are globally set thread
aoqi@0:   // filtered events and there weren't last time
aoqi@0:   if (    (any_env_thread_enabled & THREAD_FILTERED_EVENT_BITS) != 0 &&
aoqi@0:       (was_any_env_thread_enabled & THREAD_FILTERED_EVENT_BITS) == 0) {
aoqi@0:     assert(JvmtiEnv::is_vm_live() || (JvmtiEnv::get_phase()==JVMTI_PHASE_START),
aoqi@0:       "thread filtered events should not be enabled when VM not in start or live phase");
aoqi@0:     {
aoqi@0:       MutexLocker mu(Threads_lock);   //hold the Threads_lock for the iteration
aoqi@0:       for (JavaThread *tp = Threads::first(); tp != NULL; tp = tp->next()) {
aoqi@0:         // state_for_while_locked() makes tp->is_exiting() check
aoqi@0:         JvmtiThreadState::state_for_while_locked(tp);  // create the thread state if missing
aoqi@0:       }
aoqi@0:     }// release Threads_lock
aoqi@0:   }
aoqi@0: 
aoqi@0:   // compute and set thread-filtered events
aoqi@0:   for (JvmtiThreadState *state = JvmtiThreadState::first(); state != NULL; state = state->next()) {
aoqi@0:     any_env_thread_enabled |= recompute_thread_enabled(state);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // set universal state (across all envs and threads)
aoqi@0:   jlong delta = any_env_thread_enabled ^ was_any_env_thread_enabled;
aoqi@0:   if (delta != 0) {
aoqi@0:     JvmtiExport::set_should_post_field_access((any_env_thread_enabled & FIELD_ACCESS_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_field_modification((any_env_thread_enabled & FIELD_MODIFICATION_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_class_load((any_env_thread_enabled & CLASS_LOAD_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_class_file_load_hook((any_env_thread_enabled & CLASS_FILE_LOAD_HOOK_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_native_method_bind((any_env_thread_enabled & NATIVE_METHOD_BIND_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_dynamic_code_generated((any_env_thread_enabled & DYNAMIC_CODE_GENERATED_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_data_dump((any_env_thread_enabled & DATA_DUMP_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_class_prepare((any_env_thread_enabled & CLASS_PREPARE_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_class_unload((any_env_thread_enabled & CLASS_UNLOAD_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_monitor_contended_enter((any_env_thread_enabled & MONITOR_CONTENDED_ENTER_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_monitor_contended_entered((any_env_thread_enabled & MONITOR_CONTENDED_ENTERED_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_monitor_wait((any_env_thread_enabled & MONITOR_WAIT_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_monitor_waited((any_env_thread_enabled & MONITOR_WAITED_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_garbage_collection_start((any_env_thread_enabled & GARBAGE_COLLECTION_START_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_garbage_collection_finish((any_env_thread_enabled & GARBAGE_COLLECTION_FINISH_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_object_free((any_env_thread_enabled & OBJECT_FREE_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_resource_exhausted((any_env_thread_enabled & RESOURCE_EXHAUSTED_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_compiled_method_load((any_env_thread_enabled & COMPILED_METHOD_LOAD_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_compiled_method_unload((any_env_thread_enabled & COMPILED_METHOD_UNLOAD_BIT) != 0);
aoqi@0:     JvmtiExport::set_should_post_vm_object_alloc((any_env_thread_enabled & VM_OBJECT_ALLOC_BIT) != 0);
aoqi@0: 
aoqi@0:     // need this if we want thread events or we need them to init data
aoqi@0:     JvmtiExport::set_should_post_thread_life((any_env_thread_enabled & NEED_THREAD_LIFE_EVENTS) != 0);
aoqi@0: 
aoqi@0:     // If single stepping is turned on or off, execute the VM op to change it.
aoqi@0:     if (delta & SINGLE_STEP_BIT) {
aoqi@0:       switch (JvmtiEnv::get_phase()) {
aoqi@0:       case JVMTI_PHASE_DEAD:
aoqi@0:         // If the VM is dying we can't execute VM ops
aoqi@0:         break;
aoqi@0:       case JVMTI_PHASE_LIVE: {
aoqi@0:         VM_ChangeSingleStep op((any_env_thread_enabled & SINGLE_STEP_BIT) != 0);
aoqi@0:         VMThread::execute(&op);
aoqi@0:         break;
aoqi@0:       }
aoqi@0:       default:
aoqi@0:         assert(false, "should never come here before live phase");
aoqi@0:         break;
aoqi@0:       }
aoqi@0:     }
aoqi@0: 
aoqi@0:     // set global truly enabled, that is, any thread in any environment
aoqi@0:     JvmtiEventController::_universal_global_event_enabled.set_bits(any_env_thread_enabled);
aoqi@0: 
aoqi@0:     // set global should_post_on_exceptions
aoqi@0:     JvmtiExport::set_should_post_on_exceptions((any_env_thread_enabled & SHOULD_POST_ON_EXCEPTIONS_BITS) != 0);
aoqi@0: 
aoqi@0:   }
aoqi@0: 
aoqi@0:   EC_TRACE(("JVMTI [-] # recompute enabled - after %llx", any_env_thread_enabled));
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::thread_started(JavaThread *thread) {
aoqi@0:   assert(thread->is_Java_thread(), "Must be JavaThread");
aoqi@0:   assert(thread == Thread::current(), "must be current thread");
aoqi@0:   assert(JvmtiEnvBase::environments_might_exist(), "to enter event controller, JVM TI environments must exist");
aoqi@0: 
aoqi@0:   EC_TRACE(("JVMTI [%s] # thread started", JvmtiTrace::safe_get_thread_name(thread)));
aoqi@0: 
aoqi@0:   // if we have any thread filtered events globally enabled, create/update the thread state
aoqi@0:   if ((JvmtiEventController::_universal_global_event_enabled.get_bits() & THREAD_FILTERED_EVENT_BITS) != 0) {
aoqi@0:     MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:     // create the thread state if missing
aoqi@0:     JvmtiThreadState *state = JvmtiThreadState::state_for_while_locked(thread);
aoqi@0:     if (state != NULL) {    // skip threads with no JVMTI thread state
aoqi@0:       recompute_thread_enabled(state);
aoqi@0:     }
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::thread_ended(JavaThread *thread) {
aoqi@0:   // Removes the JvmtiThreadState associated with the specified thread.
aoqi@0:   // May be called after all environments have been disposed.
aoqi@0:   assert(JvmtiThreadState_lock->is_locked(), "sanity check");
aoqi@0: 
aoqi@0:   EC_TRACE(("JVMTI [%s] # thread ended", JvmtiTrace::safe_get_thread_name(thread)));
aoqi@0: 
aoqi@0:   JvmtiThreadState *state = thread->jvmti_thread_state();
aoqi@0:   assert(state != NULL, "else why are we here?");
aoqi@0:   delete state;
aoqi@0: }
aoqi@0: 
aoqi@0: void JvmtiEventControllerPrivate::set_event_callbacks(JvmtiEnvBase *env,
aoqi@0:                                                       const jvmtiEventCallbacks* callbacks,
aoqi@0:                                                       jint size_of_callbacks) {
aoqi@0:   assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
aoqi@0:   EC_TRACE(("JVMTI [*] # set event callbacks"));
aoqi@0: 
aoqi@0:   env->set_event_callbacks(callbacks, size_of_callbacks);
aoqi@0:   jlong enabled_bits = 0;
aoqi@0:   for (int ei = JVMTI_MIN_EVENT_TYPE_VAL; ei <= JVMTI_MAX_EVENT_TYPE_VAL; ++ei) {
aoqi@0:     jvmtiEvent evt_t = (jvmtiEvent)ei;
aoqi@0:     if (env->has_callback(evt_t)) {
aoqi@0:       enabled_bits |= JvmtiEventEnabled::bit_for(evt_t);
aoqi@0:     }
aoqi@0:   }
aoqi@0:   env->env_event_enable()->_event_callback_enabled.set_bits(enabled_bits);
aoqi@0:   recompute_enabled();
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::set_extension_event_callback(JvmtiEnvBase *env,
aoqi@0:                                                           jint extension_event_index,
aoqi@0:                                                           jvmtiExtensionEvent callback)
aoqi@0: {
aoqi@0:   assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
aoqi@0:   EC_TRACE(("JVMTI [*] # set extension event callback"));
aoqi@0: 
aoqi@0:   // extension events are allocated below JVMTI_MIN_EVENT_TYPE_VAL
aoqi@0:   assert(extension_event_index >= (jint)EXT_MIN_EVENT_TYPE_VAL &&
aoqi@0:          extension_event_index <= (jint)EXT_MAX_EVENT_TYPE_VAL, "sanity check");
aoqi@0: 
aoqi@0: 
aoqi@0:   // As the bits for both standard (jvmtiEvent) and extension
aoqi@0:   // (jvmtiExtEvents) are stored in the same word we cast here to
aoqi@0:   // jvmtiEvent to set/clear the bit for this extension event.
aoqi@0:   jvmtiEvent event_type = (jvmtiEvent)extension_event_index;
aoqi@0: 
aoqi@0:   // Prevent a possible race condition where events are re-enabled by a call to
aoqi@0:   // set event callbacks, where the DisposeEnvironment occurs after the boiler-plate
aoqi@0:   // environment check and before the lock is acquired.
aoqi@0:   // We can safely do the is_valid check now, as JvmtiThreadState_lock is held.
aoqi@0:   bool enabling = (callback != NULL) && (env->is_valid());
aoqi@0:   env->env_event_enable()->set_user_enabled(event_type, enabling);
aoqi@0: 
aoqi@0:   // update the callback
aoqi@0:   jvmtiExtEventCallbacks* ext_callbacks = env->ext_callbacks();
aoqi@0:   switch (extension_event_index) {
aoqi@0:     case EXT_EVENT_CLASS_UNLOAD :
aoqi@0:       ext_callbacks->ClassUnload = callback;
aoqi@0:       break;
aoqi@0:     default:
aoqi@0:       ShouldNotReachHere();
aoqi@0:   }
aoqi@0: 
aoqi@0:   // update the callback enable/disable bit
aoqi@0:   jlong enabled_bits = env->env_event_enable()->_event_callback_enabled.get_bits();
aoqi@0:   jlong bit_for = JvmtiEventEnabled::bit_for(event_type);
aoqi@0:   if (enabling) {
aoqi@0:     enabled_bits |= bit_for;
aoqi@0:   } else {
aoqi@0:     enabled_bits &= ~bit_for;
aoqi@0:   }
aoqi@0:   env->env_event_enable()->_event_callback_enabled.set_bits(enabled_bits);
aoqi@0: 
aoqi@0:   recompute_enabled();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::env_initialize(JvmtiEnvBase *env) {
aoqi@0:   assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
aoqi@0:   EC_TRACE(("JVMTI [*] # env initialize"));
aoqi@0: 
aoqi@0:   if (JvmtiEnvBase::is_vm_live()) {
aoqi@0:     // if we didn't initialize event info already (this is a late
aoqi@0:     // launched environment), do it now.
aoqi@0:     event_init();
aoqi@0:   }
aoqi@0: 
aoqi@0:   env->initialize();
aoqi@0: 
aoqi@0:   // add the JvmtiEnvThreadState to each JvmtiThreadState
aoqi@0:   for (JvmtiThreadState *state = JvmtiThreadState::first(); state != NULL; state = state->next()) {
aoqi@0:     state->add_env(env);
aoqi@0:     assert((JvmtiEnv*)(state->env_thread_state(env)->get_env()) == env, "sanity check");
aoqi@0:   }
aoqi@0:   JvmtiEventControllerPrivate::recompute_enabled();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::env_dispose(JvmtiEnvBase *env) {
aoqi@0:   assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
aoqi@0:   EC_TRACE(("JVMTI [*] # env dispose"));
aoqi@0: 
aoqi@0:   // Before the environment is marked disposed, disable all events on this
aoqi@0:   // environment (by zapping the callbacks).  As a result, the disposed
aoqi@0:   // environment will not call event handlers.
aoqi@0:   set_event_callbacks(env, NULL, 0);
aoqi@0:   for (jint extension_event_index = EXT_MIN_EVENT_TYPE_VAL;
aoqi@0:        extension_event_index <= EXT_MAX_EVENT_TYPE_VAL;
aoqi@0:        ++extension_event_index) {
aoqi@0:     set_extension_event_callback(env, extension_event_index, NULL);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Let the environment finish disposing itself.
aoqi@0:   env->env_dispose();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::set_user_enabled(JvmtiEnvBase *env, JavaThread *thread,
aoqi@0:                                           jvmtiEvent event_type, bool enabled) {
aoqi@0:   assert(Threads::number_of_threads() == 0 || JvmtiThreadState_lock->is_locked(), "sanity check");
aoqi@0: 
aoqi@0:   EC_TRACE(("JVMTI [%s] # user %s event %s",
aoqi@0:             thread==NULL? "ALL": JvmtiTrace::safe_get_thread_name(thread),
aoqi@0:             enabled? "enabled" : "disabled", JvmtiTrace::event_name(event_type)));
aoqi@0: 
aoqi@0:   if (thread == NULL) {
aoqi@0:     env->env_event_enable()->set_user_enabled(event_type, enabled);
aoqi@0:   } else {
aoqi@0:     // create the thread state (if it didn't exist before)
aoqi@0:     JvmtiThreadState *state = JvmtiThreadState::state_for_while_locked(thread);
aoqi@0:     if (state != NULL) {
aoqi@0:       state->env_thread_state(env)->event_enable()->set_user_enabled(event_type, enabled);
aoqi@0:     }
aoqi@0:   }
aoqi@0:   recompute_enabled();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::set_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
aoqi@0:   EC_TRACE(("JVMTI [%s] # set frame pop - frame=%d",
aoqi@0:             JvmtiTrace::safe_get_thread_name(ets->get_thread()),
aoqi@0:             fpop.frame_number() ));
aoqi@0: 
aoqi@0:   ets->get_frame_pops()->set(fpop);
aoqi@0:   recompute_thread_enabled(ets->get_thread()->jvmti_thread_state());
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::clear_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
aoqi@0:   EC_TRACE(("JVMTI [%s] # clear frame pop - frame=%d",
aoqi@0:             JvmtiTrace::safe_get_thread_name(ets->get_thread()),
aoqi@0:             fpop.frame_number() ));
aoqi@0: 
aoqi@0:   ets->get_frame_pops()->clear(fpop);
aoqi@0:   recompute_thread_enabled(ets->get_thread()->jvmti_thread_state());
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::clear_to_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
aoqi@0:   int cleared_cnt = ets->get_frame_pops()->clear_to(fpop);
aoqi@0: 
aoqi@0:   EC_TRACE(("JVMTI [%s] # clear to frame pop - frame=%d, count=%d",
aoqi@0:             JvmtiTrace::safe_get_thread_name(ets->get_thread()),
aoqi@0:             fpop.frame_number(),
aoqi@0:             cleared_cnt ));
aoqi@0: 
aoqi@0:   if (cleared_cnt > 0) {
aoqi@0:     recompute_thread_enabled(ets->get_thread()->jvmti_thread_state());
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::change_field_watch(jvmtiEvent event_type, bool added) {
aoqi@0:   int *count_addr;
aoqi@0: 
aoqi@0:   switch (event_type) {
aoqi@0:   case JVMTI_EVENT_FIELD_MODIFICATION:
aoqi@0:     count_addr = (int *)JvmtiExport::get_field_modification_count_addr();
aoqi@0:     break;
aoqi@0:   case JVMTI_EVENT_FIELD_ACCESS:
aoqi@0:     count_addr = (int *)JvmtiExport::get_field_access_count_addr();
aoqi@0:     break;
aoqi@0:   default:
aoqi@0:     assert(false, "incorrect event");
aoqi@0:     return;
aoqi@0:   }
aoqi@0: 
aoqi@0:   EC_TRACE(("JVMTI [-] # change field watch - %s %s count=%d",
aoqi@0:             event_type==JVMTI_EVENT_FIELD_MODIFICATION? "modification" : "access",
aoqi@0:             added? "add" : "remove",
aoqi@0:             *count_addr));
aoqi@0: 
aoqi@0:   if (added) {
aoqi@0:     (*count_addr)++;
aoqi@0:     if (*count_addr == 1) {
aoqi@0:       recompute_enabled();
aoqi@0:     }
aoqi@0:   } else {
aoqi@0:     if (*count_addr > 0) {
aoqi@0:       (*count_addr)--;
aoqi@0:       if (*count_addr == 0) {
aoqi@0:         recompute_enabled();
aoqi@0:       }
aoqi@0:     } else {
aoqi@0:       assert(false, "field watch out of phase");
aoqi@0:     }
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::event_init() {
aoqi@0:   assert(JvmtiThreadState_lock->is_locked(), "sanity check");
aoqi@0: 
aoqi@0:   if (_initialized) {
aoqi@0:     return;
aoqi@0:   }
aoqi@0: 
aoqi@0:   EC_TRACE(("JVMTI [-] # VM live"));
aoqi@0: 
aoqi@0: #ifdef ASSERT
aoqi@0:   // check that our idea and the spec's idea of threaded events match
aoqi@0:   for (int ei = JVMTI_MIN_EVENT_TYPE_VAL; ei <= JVMTI_MAX_EVENT_TYPE_VAL; ++ei) {
aoqi@0:     jlong bit = JvmtiEventEnabled::bit_for((jvmtiEvent)ei);
aoqi@0:     assert(((THREAD_FILTERED_EVENT_BITS & bit) != 0) == JvmtiUtil::event_threaded(ei),
aoqi@0:            "thread filtered event list does not match");
aoqi@0:   }
aoqi@0: #endif
aoqi@0: 
aoqi@0:   _initialized = true;
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::vm_start() {
aoqi@0:   // some events are now able to be enabled (phase has changed)
aoqi@0:   JvmtiEventControllerPrivate::recompute_enabled();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::vm_init() {
aoqi@0:   event_init();
aoqi@0: 
aoqi@0:   // all the events are now able to be enabled (phase has changed)
aoqi@0:   JvmtiEventControllerPrivate::recompute_enabled();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventControllerPrivate::vm_death() {
aoqi@0:   // events are disabled (phase has changed)
aoqi@0:   JvmtiEventControllerPrivate::recompute_enabled();
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: ///////////////////////////////////////////////////////////////
aoqi@0: //
aoqi@0: // JvmtiEventController
aoqi@0: //
aoqi@0: 
aoqi@0: JvmtiEventEnabled JvmtiEventController::_universal_global_event_enabled;
aoqi@0: 
aoqi@0: bool
aoqi@0: JvmtiEventController::is_global_event(jvmtiEvent event_type) {
aoqi@0:   assert(is_valid_event_type(event_type), "invalid event type");
aoqi@0:   jlong bit_for = ((jlong)1) << (event_type - TOTAL_MIN_EVENT_TYPE_VAL);
aoqi@0:   return((bit_for & GLOBAL_EVENT_BITS)!=0);
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::set_user_enabled(JvmtiEnvBase *env, JavaThread *thread, jvmtiEvent event_type, bool enabled) {
aoqi@0:   if (Threads::number_of_threads() == 0) {
aoqi@0:     // during early VM start-up locks don't exist, but we are safely single threaded,
aoqi@0:     // call the functionality without holding the JvmtiThreadState_lock.
aoqi@0:     JvmtiEventControllerPrivate::set_user_enabled(env, thread, event_type, enabled);
aoqi@0:   } else {
aoqi@0:     MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:     JvmtiEventControllerPrivate::set_user_enabled(env, thread, event_type, enabled);
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::set_event_callbacks(JvmtiEnvBase *env,
aoqi@0:                                           const jvmtiEventCallbacks* callbacks,
aoqi@0:                                           jint size_of_callbacks) {
aoqi@0:   if (Threads::number_of_threads() == 0) {
aoqi@0:     // during early VM start-up locks don't exist, but we are safely single threaded,
aoqi@0:     // call the functionality without holding the JvmtiThreadState_lock.
aoqi@0:     JvmtiEventControllerPrivate::set_event_callbacks(env, callbacks, size_of_callbacks);
aoqi@0:   } else {
aoqi@0:     MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:     JvmtiEventControllerPrivate::set_event_callbacks(env, callbacks, size_of_callbacks);
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::set_extension_event_callback(JvmtiEnvBase *env,
aoqi@0:                                                    jint extension_event_index,
aoqi@0:                                                    jvmtiExtensionEvent callback) {
aoqi@0:   if (Threads::number_of_threads() == 0) {
aoqi@0:     JvmtiEventControllerPrivate::set_extension_event_callback(env, extension_event_index, callback);
aoqi@0:   } else {
aoqi@0:     MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:     JvmtiEventControllerPrivate::set_extension_event_callback(env, extension_event_index, callback);
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::set_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
aoqi@0:   MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:   JvmtiEventControllerPrivate::set_frame_pop(ets, fpop);
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::clear_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
aoqi@0:   MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:   JvmtiEventControllerPrivate::clear_frame_pop(ets, fpop);
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::clear_to_frame_pop(JvmtiEnvThreadState *ets, JvmtiFramePop fpop) {
aoqi@0:   MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:   JvmtiEventControllerPrivate::clear_to_frame_pop(ets, fpop);
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::change_field_watch(jvmtiEvent event_type, bool added) {
aoqi@0:   MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:   JvmtiEventControllerPrivate::change_field_watch(event_type, added);
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::thread_started(JavaThread *thread) {
aoqi@0:   // operates only on the current thread
aoqi@0:   // JvmtiThreadState_lock grabbed only if needed.
aoqi@0:   JvmtiEventControllerPrivate::thread_started(thread);
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::thread_ended(JavaThread *thread) {
aoqi@0:   // operates only on the current thread
aoqi@0:   // JvmtiThreadState_lock grabbed only if needed.
aoqi@0:   JvmtiEventControllerPrivate::thread_ended(thread);
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::env_initialize(JvmtiEnvBase *env) {
aoqi@0:   if (Threads::number_of_threads() == 0) {
aoqi@0:     // during early VM start-up locks don't exist, but we are safely single threaded,
aoqi@0:     // call the functionality without holding the JvmtiThreadState_lock.
aoqi@0:     JvmtiEventControllerPrivate::env_initialize(env);
aoqi@0:   } else {
aoqi@0:     MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:     JvmtiEventControllerPrivate::env_initialize(env);
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::env_dispose(JvmtiEnvBase *env) {
aoqi@0:   if (Threads::number_of_threads() == 0) {
aoqi@0:     // during early VM start-up locks don't exist, but we are safely single threaded,
aoqi@0:     // call the functionality without holding the JvmtiThreadState_lock.
aoqi@0:     JvmtiEventControllerPrivate::env_dispose(env);
aoqi@0:   } else {
aoqi@0:     MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:     JvmtiEventControllerPrivate::env_dispose(env);
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::vm_start() {
aoqi@0:   if (JvmtiEnvBase::environments_might_exist()) {
aoqi@0:     MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:     JvmtiEventControllerPrivate::vm_start();
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::vm_init() {
aoqi@0:   if (JvmtiEnvBase::environments_might_exist()) {
aoqi@0:     MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:     JvmtiEventControllerPrivate::vm_init();
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: void
aoqi@0: JvmtiEventController::vm_death() {
aoqi@0:   if (JvmtiEnvBase::environments_might_exist()) {
aoqi@0:     MutexLocker mu(JvmtiThreadState_lock);
aoqi@0:     JvmtiEventControllerPrivate::vm_death();
aoqi@0:   }
aoqi@0: }