src/share/vm/prims/jvmtiEnvThreadState.cpp

Wed, 08 Oct 2008 08:10:51 -0700

author
ksrini
date
Wed, 08 Oct 2008 08:10:51 -0700
changeset 823
f008d3631bd1
parent 435
a61af66fc99e
child 1907
c18cbe5936b8
permissions
-rw-r--r--

6755845: JVM_FindClassFromBoot triggers assertions
Summary: Fixes assertions caused by one jvm_entry calling another, solved by refactoring code and modified gamma test.
Reviewed-by: dholmes, xlu

duke@435 1 /*
duke@435 2 * Copyright 2003-2006 Sun Microsystems, Inc. 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 *
duke@435 19 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
duke@435 20 * CA 95054 USA or visit www.sun.com if you need additional information or
duke@435 21 * have any questions.
duke@435 22 *
duke@435 23 */
duke@435 24
duke@435 25 # include "incls/_precompiled.incl"
duke@435 26 # include "incls/_jvmtiEnvThreadState.cpp.incl"
duke@435 27
duke@435 28
duke@435 29 ///////////////////////////////////////////////////////////////
duke@435 30 //
duke@435 31 // class JvmtiFramePop
duke@435 32 //
duke@435 33
duke@435 34 #ifndef PRODUCT
duke@435 35 void JvmtiFramePop::print() {
duke@435 36 tty->print_cr("_frame_number=%d", _frame_number);
duke@435 37 }
duke@435 38 #endif
duke@435 39
duke@435 40
duke@435 41 ///////////////////////////////////////////////////////////////
duke@435 42 //
duke@435 43 // class JvmtiFramePops - private methods
duke@435 44 //
duke@435 45
duke@435 46 void
duke@435 47 JvmtiFramePops::set(JvmtiFramePop& fp) {
duke@435 48 if (_pops->find(fp.frame_number()) < 0) {
duke@435 49 _pops->append(fp.frame_number());
duke@435 50 }
duke@435 51 }
duke@435 52
duke@435 53
duke@435 54 void
duke@435 55 JvmtiFramePops::clear(JvmtiFramePop& fp) {
duke@435 56 assert(_pops->length() > 0, "No more frame pops");
duke@435 57
duke@435 58 _pops->remove(fp.frame_number());
duke@435 59 }
duke@435 60
duke@435 61
duke@435 62 int
duke@435 63 JvmtiFramePops::clear_to(JvmtiFramePop& fp) {
duke@435 64 int cleared = 0;
duke@435 65 int index = 0;
duke@435 66 while (index < _pops->length()) {
duke@435 67 JvmtiFramePop pop = JvmtiFramePop(_pops->at(index));
duke@435 68 if (pop.above_on_stack(fp)) {
duke@435 69 _pops->remove_at(index);
duke@435 70 ++cleared;
duke@435 71 } else {
duke@435 72 ++index;
duke@435 73 }
duke@435 74 }
duke@435 75 return cleared;
duke@435 76 }
duke@435 77
duke@435 78
duke@435 79 ///////////////////////////////////////////////////////////////
duke@435 80 //
duke@435 81 // class JvmtiFramePops - public methods
duke@435 82 //
duke@435 83
duke@435 84 JvmtiFramePops::JvmtiFramePops() {
duke@435 85 _pops = new (ResourceObj::C_HEAP) GrowableArray<int> (2, true);
duke@435 86 }
duke@435 87
duke@435 88 JvmtiFramePops::~JvmtiFramePops() {
duke@435 89 // return memory to c_heap.
duke@435 90 delete _pops;
duke@435 91 }
duke@435 92
duke@435 93
duke@435 94 #ifndef PRODUCT
duke@435 95 void JvmtiFramePops::print() {
duke@435 96 ResourceMark rm;
duke@435 97
duke@435 98 int n = _pops->length();
duke@435 99 for (int i=0; i<n; i++) {
duke@435 100 JvmtiFramePop fp = JvmtiFramePop(_pops->at(i));
duke@435 101 tty->print("%d: ", i);
duke@435 102 fp.print();
duke@435 103 tty->print_cr("");
duke@435 104 }
duke@435 105 }
duke@435 106 #endif
duke@435 107
duke@435 108 ///////////////////////////////////////////////////////////////
duke@435 109 //
duke@435 110 // class JvmtiEnvThreadState
duke@435 111 //
duke@435 112 // Instances of JvmtiEnvThreadState hang off of each JvmtiThreadState,
duke@435 113 // one per JvmtiEnv.
duke@435 114 //
duke@435 115
duke@435 116 JvmtiEnvThreadState::JvmtiEnvThreadState(JavaThread *thread, JvmtiEnvBase *env) :
duke@435 117 _event_enable() {
duke@435 118 _thread = thread;
duke@435 119 _env = (JvmtiEnv*)env;
duke@435 120 _next = NULL;
duke@435 121 _frame_pops = NULL;
duke@435 122 _current_bci = 0;
duke@435 123 _current_method_id = NULL;
duke@435 124 _breakpoint_posted = false;
duke@435 125 _single_stepping_posted = false;
duke@435 126 _agent_thread_local_storage_data = NULL;
duke@435 127 }
duke@435 128
duke@435 129 JvmtiEnvThreadState::~JvmtiEnvThreadState() {
duke@435 130 delete _frame_pops;
duke@435 131 _frame_pops = NULL;
duke@435 132 }
duke@435 133
duke@435 134 // Given that a new (potential) event has come in,
duke@435 135 // maintain the current JVMTI location on a per-thread per-env basis
duke@435 136 // and use it to filter out duplicate events:
duke@435 137 // - instruction rewrites
duke@435 138 // - breakpoint followed by single step
duke@435 139 // - single step at a breakpoint
duke@435 140 void JvmtiEnvThreadState::compare_and_set_current_location(methodOop new_method,
duke@435 141 address new_location, jvmtiEvent event) {
duke@435 142
duke@435 143 int new_bci = new_location - new_method->code_base();
duke@435 144
duke@435 145 // The method is identified and stored as a jmethodID which is safe in this
duke@435 146 // case because the class cannot be unloaded while a method is executing.
duke@435 147 jmethodID new_method_id = new_method->jmethod_id();
duke@435 148
duke@435 149 // the last breakpoint or single step was at this same location
duke@435 150 if (_current_bci == new_bci && _current_method_id == new_method_id) {
duke@435 151 switch (event) {
duke@435 152 case JVMTI_EVENT_BREAKPOINT:
duke@435 153 // Repeat breakpoint is complicated. If we previously posted a breakpoint
duke@435 154 // event at this location and if we also single stepped at this location
duke@435 155 // then we skip the duplicate breakpoint.
duke@435 156 _breakpoint_posted = _breakpoint_posted && _single_stepping_posted;
duke@435 157 break;
duke@435 158 case JVMTI_EVENT_SINGLE_STEP:
duke@435 159 // Repeat single step is easy: just don't post it again.
duke@435 160 // If step is pending for popframe then it may not be
duke@435 161 // a repeat step. The new_bci and method_id is same as current_bci
duke@435 162 // and current method_id after pop and step for recursive calls.
duke@435 163 // This has been handled by clearing the location
duke@435 164 _single_stepping_posted = true;
duke@435 165 break;
duke@435 166 default:
duke@435 167 assert(false, "invalid event value passed");
duke@435 168 break;
duke@435 169 }
duke@435 170 return;
duke@435 171 }
duke@435 172
duke@435 173 set_current_location(new_method_id, new_bci);
duke@435 174 _breakpoint_posted = false;
duke@435 175 _single_stepping_posted = false;
duke@435 176 }
duke@435 177
duke@435 178
duke@435 179 JvmtiFramePops* JvmtiEnvThreadState::get_frame_pops() {
duke@435 180 #ifdef ASSERT
duke@435 181 uint32_t debug_bits = 0;
duke@435 182 #endif
duke@435 183 assert(get_thread() == Thread::current() || JvmtiEnv::is_thread_fully_suspended(get_thread(), false, &debug_bits),
duke@435 184 "frame pop data only accessible from same thread or while suspended");
duke@435 185
duke@435 186 if (_frame_pops == NULL) {
duke@435 187 _frame_pops = new JvmtiFramePops();
duke@435 188 assert(_frame_pops != NULL, "_frame_pops != NULL");
duke@435 189 }
duke@435 190 return _frame_pops;
duke@435 191 }
duke@435 192
duke@435 193
duke@435 194 bool JvmtiEnvThreadState::has_frame_pops() {
duke@435 195 return _frame_pops == NULL? false : (_frame_pops->length() > 0);
duke@435 196 }
duke@435 197
duke@435 198 void JvmtiEnvThreadState::set_frame_pop(int frame_number) {
duke@435 199 #ifdef ASSERT
duke@435 200 uint32_t debug_bits = 0;
duke@435 201 #endif
duke@435 202 assert(get_thread() == Thread::current() || JvmtiEnv::is_thread_fully_suspended(get_thread(), false, &debug_bits),
duke@435 203 "frame pop data only accessible from same thread or while suspended");
duke@435 204 JvmtiFramePop fpop(frame_number);
duke@435 205 JvmtiEventController::set_frame_pop(this, fpop);
duke@435 206 }
duke@435 207
duke@435 208
duke@435 209 void JvmtiEnvThreadState::clear_frame_pop(int frame_number) {
duke@435 210 #ifdef ASSERT
duke@435 211 uint32_t debug_bits = 0;
duke@435 212 #endif
duke@435 213 assert(get_thread() == Thread::current() || JvmtiEnv::is_thread_fully_suspended(get_thread(), false, &debug_bits),
duke@435 214 "frame pop data only accessible from same thread or while suspended");
duke@435 215 JvmtiFramePop fpop(frame_number);
duke@435 216 JvmtiEventController::clear_frame_pop(this, fpop);
duke@435 217 }
duke@435 218
duke@435 219
duke@435 220 void JvmtiEnvThreadState::clear_to_frame_pop(int frame_number) {
duke@435 221 #ifdef ASSERT
duke@435 222 uint32_t debug_bits = 0;
duke@435 223 #endif
duke@435 224 assert(get_thread() == Thread::current() || JvmtiEnv::is_thread_fully_suspended(get_thread(), false, &debug_bits),
duke@435 225 "frame pop data only accessible from same thread or while suspended");
duke@435 226 JvmtiFramePop fpop(frame_number);
duke@435 227 JvmtiEventController::clear_to_frame_pop(this, fpop);
duke@435 228 }
duke@435 229
duke@435 230
duke@435 231 bool JvmtiEnvThreadState::is_frame_pop(int cur_frame_number) {
duke@435 232 #ifdef ASSERT
duke@435 233 uint32_t debug_bits = 0;
duke@435 234 #endif
duke@435 235 assert(get_thread() == Thread::current() || JvmtiEnv::is_thread_fully_suspended(get_thread(), false, &debug_bits),
duke@435 236 "frame pop data only accessible from same thread or while suspended");
duke@435 237 if (!get_thread()->is_interp_only_mode() || _frame_pops == NULL) {
duke@435 238 return false;
duke@435 239 }
duke@435 240 JvmtiFramePop fp(cur_frame_number);
duke@435 241 return get_frame_pops()->contains(fp);
duke@435 242 }
duke@435 243
duke@435 244
duke@435 245 class VM_GetCurrentLocation : public VM_Operation {
duke@435 246 private:
duke@435 247 JavaThread *_thread;
duke@435 248 jmethodID _method_id;
duke@435 249 int _bci;
duke@435 250
duke@435 251 public:
duke@435 252 VM_GetCurrentLocation(JavaThread *thread) {
duke@435 253 _thread = thread;
duke@435 254 }
duke@435 255 VMOp_Type type() const { return VMOp_GetCurrentLocation; }
duke@435 256 void doit() {
duke@435 257 ResourceMark rmark; // _thread != Thread::current()
duke@435 258 RegisterMap rm(_thread, false);
duke@435 259 javaVFrame* vf = _thread->last_java_vframe(&rm);
duke@435 260 assert(vf != NULL, "must have last java frame");
duke@435 261 methodOop method = vf->method();
duke@435 262 _method_id = method->jmethod_id();
duke@435 263 _bci = vf->bci();
duke@435 264 }
duke@435 265 void get_current_location(jmethodID *method_id, int *bci) {
duke@435 266 *method_id = _method_id;
duke@435 267 *bci = _bci;
duke@435 268 }
duke@435 269 };
duke@435 270
duke@435 271 void JvmtiEnvThreadState::reset_current_location(jvmtiEvent event_type, bool enabled) {
duke@435 272 assert(event_type == JVMTI_EVENT_SINGLE_STEP || event_type == JVMTI_EVENT_BREAKPOINT,
duke@435 273 "must be single-step or breakpoint event");
duke@435 274
duke@435 275 // Current location is used to detect the following:
duke@435 276 // 1) a breakpoint event followed by single-stepping to the same bci
duke@435 277 // 2) single-step to a bytecode that will be transformed to a fast version
duke@435 278 // We skip to avoid posting the duplicate single-stepping event.
duke@435 279
duke@435 280 // If single-stepping is disabled, clear current location so that
duke@435 281 // single-stepping to the same method and bcp at a later time will be
duke@435 282 // detected if single-stepping is enabled at that time (see 4388912).
duke@435 283
duke@435 284 // If single-stepping is enabled, set the current location to the
duke@435 285 // current method and bcp. This covers the following type of case,
duke@435 286 // e.g., the debugger stepi command:
duke@435 287 // - bytecode single stepped
duke@435 288 // - SINGLE_STEP event posted and SINGLE_STEP event disabled
duke@435 289 // - SINGLE_STEP event reenabled
duke@435 290 // - bytecode rewritten to fast version
duke@435 291
duke@435 292 // If breakpoint event is disabled, clear current location only if
duke@435 293 // single-stepping is not enabled. Otherwise, keep the thread location
duke@435 294 // to detect any duplicate events.
duke@435 295
duke@435 296 if (enabled) {
duke@435 297 // If enabling breakpoint, no need to reset.
duke@435 298 // Can't do anything if empty stack.
duke@435 299 if (event_type == JVMTI_EVENT_SINGLE_STEP && _thread->has_last_Java_frame()) {
duke@435 300 jmethodID method_id;
duke@435 301 int bci;
duke@435 302 // The java thread stack may not be walkable for a running thread
duke@435 303 // so get current location at safepoint.
duke@435 304 VM_GetCurrentLocation op(_thread);
duke@435 305 VMThread::execute(&op);
duke@435 306 op.get_current_location(&method_id, &bci);
duke@435 307 set_current_location(method_id, bci);
duke@435 308 }
duke@435 309 } else if (event_type == JVMTI_EVENT_SINGLE_STEP || !is_enabled(JVMTI_EVENT_SINGLE_STEP)) {
duke@435 310 // If this is to disable breakpoint, also check if single-step is not enabled
duke@435 311 clear_current_location();
duke@435 312 }
duke@435 313 }

mercurial