| /* |
| * Copyright 1999-2007 Sun Microsystems, Inc. All Rights Reserved. |
| * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
| * |
| * This code is free software; you can redistribute it and/or modify it |
| * under the terms of the GNU General Public License version 2 only, as |
| * published by the Free Software Foundation. |
| * |
| * This code is distributed in the hope that it will be useful, but WITHOUT |
| * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
| * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
| * version 2 for more details (a copy is included in the LICENSE file that |
| * accompanied this code). |
| * |
| * You should have received a copy of the GNU General Public License version |
| * 2 along with this work; if not, write to the Free Software Foundation, |
| * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
| * |
| * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, |
| * CA 95054 USA or visit www.sun.com if you need additional information or |
| * have any questions. |
| * |
| */ |
| |
| // |
| // Forward Declarations |
| // |
| |
| class JvmtiRawMonitor; |
| class JvmtiBreakpoint; |
| class JvmtiBreakpoints; |
| |
| |
| /////////////////////////////////////////////////////////////// |
| // |
| // class GrowableCache, GrowableElement |
| // Used by : JvmtiBreakpointCache |
| // Used by JVMTI methods: none directly. |
| // |
| // GrowableCache is a permanent CHeap growable array of <GrowableElement *> |
| // |
| // In addition, the GrowableCache maintains a NULL terminated cache array of type address |
| // that's created from the element array using the function: |
| // address GrowableElement::getCacheValue(). |
| // |
| // Whenever the GrowableArray changes size, the cache array gets recomputed into a new C_HEAP allocated |
| // block of memory. Additionally, every time the cache changes its position in memory, the |
| // void (*_listener_fun)(void *this_obj, address* cache) |
| // gets called with the cache's new address. This gives the user of the GrowableCache a callback |
| // to update its pointer to the address cache. |
| // |
| |
| class GrowableElement : public CHeapObj { |
| public: |
| virtual address getCacheValue() =0; |
| virtual bool equals(GrowableElement* e) =0; |
| virtual bool lessThan(GrowableElement *e)=0; |
| virtual GrowableElement *clone() =0; |
| virtual void oops_do(OopClosure* f) =0; |
| }; |
| |
| class GrowableCache VALUE_OBJ_CLASS_SPEC { |
| |
| private: |
| // Object pointer passed into cache & listener functions. |
| void *_this_obj; |
| |
| // Array of elements in the collection |
| GrowableArray<GrowableElement *> *_elements; |
| |
| // Parallel array of cached values |
| address *_cache; |
| |
| // Listener for changes to the _cache field. |
| // Called whenever the _cache field has it's value changed |
| // (but NOT when cached elements are recomputed). |
| void (*_listener_fun)(void *, address*); |
| |
| static bool equals(void *, GrowableElement *); |
| |
| // recache all elements after size change, notify listener |
| void recache(); |
| |
| public: |
| GrowableCache(); |
| ~GrowableCache(); |
| |
| void initialize(void *this_obj, void listener_fun(void *, address*) ); |
| |
| // number of elements in the collection |
| int length(); |
| // get the value of the index element in the collection |
| GrowableElement* at(int index); |
| // find the index of the element, -1 if it doesn't exist |
| int find(GrowableElement* e); |
| // append a copy of the element to the end of the collection, notify listener |
| void append(GrowableElement* e); |
| // insert a copy of the element using lessthan(), notify listener |
| void insert(GrowableElement* e); |
| // remove the element at index, notify listener |
| void remove (int index); |
| // clear out all elements and release all heap space, notify listener |
| void clear(); |
| // apply f to every element and update the cache |
| void oops_do(OopClosure* f); |
| void gc_epilogue(); |
| }; |
| |
| |
| /////////////////////////////////////////////////////////////// |
| // |
| // class JvmtiBreakpointCache |
| // Used by : JvmtiBreakpoints |
| // Used by JVMTI methods: none directly. |
| // Note : typesafe wrapper for GrowableCache of JvmtiBreakpoint |
| // |
| |
| class JvmtiBreakpointCache : public CHeapObj { |
| |
| private: |
| GrowableCache _cache; |
| |
| public: |
| JvmtiBreakpointCache() {} |
| ~JvmtiBreakpointCache() {} |
| |
| void initialize(void *this_obj, void listener_fun(void *, address*) ) { |
| _cache.initialize(this_obj,listener_fun); |
| } |
| |
| int length() { return _cache.length(); } |
| JvmtiBreakpoint& at(int index) { return (JvmtiBreakpoint&) *(_cache.at(index)); } |
| int find(JvmtiBreakpoint& e) { return _cache.find((GrowableElement *) &e); } |
| void append(JvmtiBreakpoint& e) { _cache.append((GrowableElement *) &e); } |
| void remove (int index) { _cache.remove(index); } |
| void clear() { _cache.clear(); } |
| void oops_do(OopClosure* f) { _cache.oops_do(f); } |
| void gc_epilogue() { _cache.gc_epilogue(); } |
| }; |
| |
| |
| /////////////////////////////////////////////////////////////// |
| // |
| // class JvmtiBreakpoint |
| // Used by : JvmtiBreakpoints |
| // Used by JVMTI methods: SetBreakpoint, ClearBreakpoint, ClearAllBreakpoints |
| // Note: Extends GrowableElement for use in a GrowableCache |
| // |
| // A JvmtiBreakpoint describes a location (class, method, bci) to break at. |
| // |
| |
| typedef void (methodOopDesc::*method_action)(int _bci); |
| |
| class JvmtiBreakpoint : public GrowableElement { |
| private: |
| methodOop _method; |
| int _bci; |
| Bytecodes::Code _orig_bytecode; |
| |
| public: |
| JvmtiBreakpoint(); |
| JvmtiBreakpoint(methodOop m_method, jlocation location); |
| bool equals(JvmtiBreakpoint& bp); |
| bool lessThan(JvmtiBreakpoint &bp); |
| void copy(JvmtiBreakpoint& bp); |
| bool is_valid(); |
| address getBcp(); |
| void each_method_version_do(method_action meth_act); |
| void set(); |
| void clear(); |
| void print(); |
| |
| methodOop method() { return _method; } |
| |
| // GrowableElement implementation |
| address getCacheValue() { return getBcp(); } |
| bool lessThan(GrowableElement* e) { Unimplemented(); return false; } |
| bool equals(GrowableElement* e) { return equals((JvmtiBreakpoint&) *e); } |
| void oops_do(OopClosure* f) { f->do_oop((oop *) &_method); } |
| GrowableElement *clone() { |
| JvmtiBreakpoint *bp = new JvmtiBreakpoint(); |
| bp->copy(*this); |
| return bp; |
| } |
| }; |
| |
| |
| /////////////////////////////////////////////////////////////// |
| // |
| // class VM_ChangeBreakpoints |
| // Used by : JvmtiBreakpoints |
| // Used by JVMTI methods: none directly. |
| // Note: A Helper class. |
| // |
| // VM_ChangeBreakpoints implements a VM_Operation for ALL modifications to the JvmtiBreakpoints class. |
| // |
| |
| class VM_ChangeBreakpoints : public VM_Operation { |
| private: |
| JvmtiBreakpoints* _breakpoints; |
| int _operation; |
| JvmtiBreakpoint* _bp; |
| |
| public: |
| enum { SET_BREAKPOINT=0, CLEAR_BREAKPOINT=1, CLEAR_ALL_BREAKPOINT=2 }; |
| |
| VM_ChangeBreakpoints(JvmtiBreakpoints* breakpoints, int operation) { |
| _breakpoints = breakpoints; |
| _bp = NULL; |
| _operation = operation; |
| assert(breakpoints != NULL, "breakpoints != NULL"); |
| assert(operation == CLEAR_ALL_BREAKPOINT, "unknown breakpoint operation"); |
| } |
| VM_ChangeBreakpoints(JvmtiBreakpoints* breakpoints, int operation, JvmtiBreakpoint *bp) { |
| _breakpoints = breakpoints; |
| _bp = bp; |
| _operation = operation; |
| assert(breakpoints != NULL, "breakpoints != NULL"); |
| assert(bp != NULL, "bp != NULL"); |
| assert(operation == SET_BREAKPOINT || operation == CLEAR_BREAKPOINT , "unknown breakpoint operation"); |
| } |
| |
| VMOp_Type type() const { return VMOp_ChangeBreakpoints; } |
| void doit(); |
| void oops_do(OopClosure* f); |
| }; |
| |
| |
| /////////////////////////////////////////////////////////////// |
| // |
| // class JvmtiBreakpoints |
| // Used by : JvmtiCurrentBreakpoints |
| // Used by JVMTI methods: none directly |
| // Note: A Helper class |
| // |
| // JvmtiBreakpoints is a GrowableCache of JvmtiBreakpoint. |
| // All changes to the GrowableCache occur at a safepoint using VM_ChangeBreakpoints. |
| // |
| // Because _bps is only modified at safepoints, its possible to always use the |
| // cached byte code pointers from _bps without doing any synchronization (see JvmtiCurrentBreakpoints). |
| // |
| // It would be possible to make JvmtiBreakpoints a static class, but I've made it |
| // CHeap allocated to emphasize its similarity to JvmtiFramePops. |
| // |
| |
| class JvmtiBreakpoints : public CHeapObj { |
| private: |
| |
| JvmtiBreakpointCache _bps; |
| |
| // These should only be used by VM_ChangeBreakpoints |
| // to insure they only occur at safepoints. |
| // Todo: add checks for safepoint |
| friend class VM_ChangeBreakpoints; |
| void set_at_safepoint(JvmtiBreakpoint& bp); |
| void clear_at_safepoint(JvmtiBreakpoint& bp); |
| void clearall_at_safepoint(); |
| |
| static void do_element(GrowableElement *e); |
| |
| public: |
| JvmtiBreakpoints(void listener_fun(void *, address *)); |
| ~JvmtiBreakpoints(); |
| |
| int length(); |
| void oops_do(OopClosure* f); |
| void gc_epilogue(); |
| void print(); |
| |
| int set(JvmtiBreakpoint& bp); |
| int clear(JvmtiBreakpoint& bp); |
| void clearall_in_class_at_safepoint(klassOop klass); |
| void clearall(); |
| }; |
| |
| |
| /////////////////////////////////////////////////////////////// |
| // |
| // class JvmtiCurrentBreakpoints |
| // |
| // A static wrapper class for the JvmtiBreakpoints that provides: |
| // 1. a fast inlined function to check if a byte code pointer is a breakpoint (is_breakpoint). |
| // 2. a function for lazily creating the JvmtiBreakpoints class (this is not strictly necessary, |
| // but I'm copying the code from JvmtiThreadState which needs to lazily initialize |
| // JvmtiFramePops). |
| // 3. An oops_do entry point for GC'ing the breakpoint array. |
| // |
| |
| class JvmtiCurrentBreakpoints : public AllStatic { |
| |
| private: |
| |
| // Current breakpoints, lazily initialized by get_jvmti_breakpoints(); |
| static JvmtiBreakpoints *_jvmti_breakpoints; |
| |
| // NULL terminated cache of byte-code pointers corresponding to current breakpoints. |
| // Updated only at safepoints (with listener_fun) when the cache is moved. |
| // It exists only to make is_breakpoint fast. |
| static address *_breakpoint_list; |
| static inline void set_breakpoint_list(address *breakpoint_list) { _breakpoint_list = breakpoint_list; } |
| static inline address *get_breakpoint_list() { return _breakpoint_list; } |
| |
| // Listener for the GrowableCache in _jvmti_breakpoints, updates _breakpoint_list. |
| static void listener_fun(void *this_obj, address *cache); |
| |
| public: |
| static void initialize(); |
| static void destroy(); |
| |
| // lazily create _jvmti_breakpoints and _breakpoint_list |
| static JvmtiBreakpoints& get_jvmti_breakpoints(); |
| |
| // quickly test whether the bcp matches a cached breakpoint in the list |
| static inline bool is_breakpoint(address bcp); |
| |
| static void oops_do(OopClosure* f); |
| static void gc_epilogue(); |
| }; |
| |
| // quickly test whether the bcp matches a cached breakpoint in the list |
| bool JvmtiCurrentBreakpoints::is_breakpoint(address bcp) { |
| address *bps = get_breakpoint_list(); |
| if (bps == NULL) return false; |
| for ( ; (*bps) != NULL; bps++) { |
| if ((*bps) == bcp) return true; |
| } |
| return false; |
| } |
| |
| |
| /////////////////////////////////////////////////////////////// |
| // |
| // class JvmtiRawMonitor |
| // |
| // Used by JVMTI methods: All RawMonitor methods (CreateRawMonitor, EnterRawMonitor, etc.) |
| // |
| // Wrapper for ObjectMonitor class that saves the Monitor's name |
| // |
| |
| class JvmtiRawMonitor : public ObjectMonitor { |
| private: |
| int _magic; |
| char * _name; |
| // JVMTI_RM_MAGIC is set in contructor and unset in destructor. |
| enum { JVMTI_RM_MAGIC = (int)(('T' << 24) | ('I' << 16) | ('R' << 8) | 'M') }; |
| |
| public: |
| JvmtiRawMonitor(const char *name); |
| ~JvmtiRawMonitor(); |
| int magic() { return _magic; } |
| const char *get_name() { return _name; } |
| bool is_valid() { return _magic == JVMTI_RM_MAGIC; } |
| }; |
| |
| // Onload pending raw monitors |
| // Class is used to cache onload or onstart monitor enter |
| // which will transition into real monitor when |
| // VM is fully initialized. |
| class JvmtiPendingMonitors : public AllStatic { |
| |
| private: |
| static GrowableArray<JvmtiRawMonitor*> *_monitors; // Cache raw monitor enter |
| |
| inline static GrowableArray<JvmtiRawMonitor*>* monitors() { return _monitors; } |
| |
| static void dispose() { |
| delete monitors(); |
| } |
| |
| public: |
| static void enter(JvmtiRawMonitor *monitor) { |
| monitors()->append(monitor); |
| } |
| |
| static int count() { |
| return monitors()->length(); |
| } |
| |
| static void destroy(JvmtiRawMonitor *monitor) { |
| while (monitors()->contains(monitor)) { |
| monitors()->remove(monitor); |
| } |
| } |
| |
| // Return false if monitor is not found in the list. |
| static bool exit(JvmtiRawMonitor *monitor) { |
| if (monitors()->contains(monitor)) { |
| monitors()->remove(monitor); |
| return true; |
| } else { |
| return false; |
| } |
| } |
| |
| static void transition_raw_monitors(); |
| }; |
| |
| |
| |
| /////////////////////////////////////////////////////////////// |
| // The get/set local operations must only be done by the VM thread |
| // because the interpreter version needs to access oop maps, which can |
| // only safely be done by the VM thread |
| // |
| // I'm told that in 1.5 oop maps are now protected by a lock and |
| // we could get rid of the VM op |
| // However if the VM op is removed then the target thread must |
| // be suspended AND a lock will be needed to prevent concurrent |
| // setting of locals to the same java thread. This lock is needed |
| // to prevent compiledVFrames from trying to add deferred updates |
| // to the thread simultaneously. |
| // |
| class VM_GetOrSetLocal : public VM_Operation { |
| private: |
| JavaThread* _thread; |
| JavaThread* _calling_thread; |
| jint _depth; |
| jint _index; |
| BasicType _type; |
| jvalue _value; |
| javaVFrame* _jvf; |
| bool _set; |
| |
| jvmtiError _result; |
| |
| vframe* get_vframe(); |
| javaVFrame* get_java_vframe(); |
| bool check_slot_type(javaVFrame* vf); |
| |
| public: |
| // Constructor for non-object getter |
| VM_GetOrSetLocal(JavaThread* thread, jint depth, jint index, BasicType type); |
| |
| // Constructor for object or non-object setter |
| VM_GetOrSetLocal(JavaThread* thread, jint depth, jint index, BasicType type, jvalue value); |
| |
| // Constructor for object getter |
| VM_GetOrSetLocal(JavaThread* thread, JavaThread* calling_thread, jint depth, |
| int index); |
| |
| VMOp_Type type() const { return VMOp_GetOrSetLocal; } |
| jvalue value() { return _value; } |
| jvmtiError result() { return _result; } |
| |
| bool doit_prologue(); |
| void doit(); |
| bool allow_nested_vm_operations() const; |
| const char* name() const { return "get/set locals"; } |
| |
| // Check that the klass is assignable to a type with the given signature. |
| static bool is_assignable(const char* ty_sign, Klass* klass, Thread* thread); |
| }; |
| |
| |
| /////////////////////////////////////////////////////////////// |
| // |
| // class JvmtiSuspendControl |
| // |
| // Convenience routines for suspending and resuming threads. |
| // |
| // All attempts by JVMTI to suspend and resume threads must go through the |
| // JvmtiSuspendControl interface. |
| // |
| // methods return true if successful |
| // |
| class JvmtiSuspendControl : public AllStatic { |
| public: |
| // suspend the thread, taking it to a safepoint |
| static bool suspend(JavaThread *java_thread); |
| // resume the thread |
| static bool resume(JavaThread *java_thread); |
| |
| static void print(); |
| }; |
| |
| // Utility macro that checks for NULL pointers: |
| #define NULL_CHECK(X, Y) if ((X) == NULL) { return (Y); } |