Mercurial > hg > truffle
annotate src/share/vm/prims/jvmtiEnv.cpp @ 1121:98cd9901c161
6849968: 3/2 JVMTI tests fails on jdk5.0 with hs14
Summary: If a JVMTI agent asks for version 1.0, then it should get version 1.0 semantics.
Reviewed-by: dholmes, ohair
| author | dcubed |
|---|---|
| date | Mon, 14 Dec 2009 10:05:36 -0700 |
| parents | 9127aa69352e |
| children | dcb15a6f342d |
| rev | line source |
|---|---|
| 0 | 1 /* |
|
1120
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
2 * Copyright 2003-2009 Sun Microsystems, Inc. All Rights Reserved. |
| 0 | 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
| 4 * | |
| 5 * This code is free software; you can redistribute it and/or modify it | |
| 6 * under the terms of the GNU General Public License version 2 only, as | |
| 7 * published by the Free Software Foundation. | |
| 8 * | |
| 9 * This code is distributed in the hope that it will be useful, but WITHOUT | |
| 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 12 * version 2 for more details (a copy is included in the LICENSE file that | |
| 13 * accompanied this code). | |
| 14 * | |
| 15 * You should have received a copy of the GNU General Public License version | |
| 16 * 2 along with this work; if not, write to the Free Software Foundation, | |
| 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. | |
| 18 * | |
| 19 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, | |
| 20 * CA 95054 USA or visit www.sun.com if you need additional information or | |
| 21 * have any questions. | |
| 22 * | |
| 23 */ | |
| 24 | |
| 25 | |
| 26 # include "incls/_precompiled.incl" | |
| 27 # include "incls/_jvmtiEnv.cpp.incl" | |
| 28 | |
| 29 | |
| 30 #define FIXLATER 0 // REMOVE this when completed. | |
| 31 | |
| 32 // FIXLATER: hook into JvmtiTrace | |
| 33 #define TraceJVMTICalls false | |
| 34 | |
| 1121 | 35 JvmtiEnv::JvmtiEnv(jint version) : JvmtiEnvBase(version) { |
| 0 | 36 } |
| 37 | |
| 38 JvmtiEnv::~JvmtiEnv() { | |
| 39 } | |
| 40 | |
| 41 JvmtiEnv* | |
| 1121 | 42 JvmtiEnv::create_a_jvmti(jint version) { |
| 43 return new JvmtiEnv(version); | |
| 0 | 44 } |
| 45 | |
| 46 // VM operation class to copy jni function table at safepoint. | |
| 47 // More than one java threads or jvmti agents may be reading/ | |
| 48 // modifying jni function tables. To reduce the risk of bad | |
| 49 // interaction b/w these threads it is copied at safepoint. | |
| 50 class VM_JNIFunctionTableCopier : public VM_Operation { | |
| 51 private: | |
| 52 const struct JNINativeInterface_ *_function_table; | |
| 53 public: | |
| 54 VM_JNIFunctionTableCopier(const struct JNINativeInterface_ *func_tbl) { | |
| 55 _function_table = func_tbl; | |
| 56 }; | |
| 57 | |
| 58 VMOp_Type type() const { return VMOp_JNIFunctionTableCopier; } | |
| 59 void doit() { | |
| 60 copy_jni_function_table(_function_table); | |
| 61 }; | |
| 62 }; | |
| 63 | |
| 64 // | |
| 65 // Do not change the "prefix" marker below, everything above it is copied | |
| 66 // unchanged into the filled stub, everything below is controlled by the | |
| 67 // stub filler (only method bodies are carried forward, and then only for | |
| 68 // functionality still in the spec). | |
| 69 // | |
| 70 // end file prefix | |
| 71 | |
| 72 // | |
| 73 // Memory Management functions | |
| 74 // | |
| 75 | |
| 76 // mem_ptr - pre-checked for NULL | |
| 77 jvmtiError | |
| 78 JvmtiEnv::Allocate(jlong size, unsigned char** mem_ptr) { | |
| 79 return allocate(size, mem_ptr); | |
| 80 } /* end Allocate */ | |
| 81 | |
| 82 | |
| 83 // mem - NULL is a valid value, must be checked | |
| 84 jvmtiError | |
| 85 JvmtiEnv::Deallocate(unsigned char* mem) { | |
| 86 return deallocate(mem); | |
| 87 } /* end Deallocate */ | |
| 88 | |
| 89 // Threads_lock NOT held, java_thread not protected by lock | |
| 90 // java_thread - pre-checked | |
| 91 // data - NULL is a valid value, must be checked | |
| 92 jvmtiError | |
| 93 JvmtiEnv::SetThreadLocalStorage(JavaThread* java_thread, const void* data) { | |
| 94 JvmtiThreadState* state = java_thread->jvmti_thread_state(); | |
| 95 if (state == NULL) { | |
| 96 if (data == NULL) { | |
| 97 // leaving state unset same as data set to NULL | |
| 98 return JVMTI_ERROR_NONE; | |
| 99 } | |
| 100 // otherwise, create the state | |
| 101 state = JvmtiThreadState::state_for(java_thread); | |
| 102 } | |
| 103 state->env_thread_state(this)->set_agent_thread_local_storage_data((void*)data); | |
| 104 return JVMTI_ERROR_NONE; | |
| 105 } /* end SetThreadLocalStorage */ | |
| 106 | |
| 107 | |
| 108 // Threads_lock NOT held | |
| 109 // thread - NOT pre-checked | |
| 110 // data_ptr - pre-checked for NULL | |
| 111 jvmtiError | |
| 112 JvmtiEnv::GetThreadLocalStorage(jthread thread, void** data_ptr) { | |
| 113 JavaThread* current_thread = JavaThread::current(); | |
| 114 if (thread == NULL) { | |
| 115 JvmtiThreadState* state = current_thread->jvmti_thread_state(); | |
| 116 *data_ptr = (state == NULL) ? NULL : | |
| 117 state->env_thread_state(this)->get_agent_thread_local_storage_data(); | |
| 118 } else { | |
| 119 | |
| 120 // jvmti_GetThreadLocalStorage is "in native" and doesn't transition | |
| 121 // the thread to _thread_in_vm. However, when the TLS for a thread | |
| 122 // other than the current thread is required we need to transition | |
| 123 // from native so as to resolve the jthread. | |
| 124 | |
| 125 ThreadInVMfromNative __tiv(current_thread); | |
| 126 __ENTRY(jvmtiError, JvmtiEnv::GetThreadLocalStorage , current_thread) | |
| 127 debug_only(VMNativeEntryWrapper __vew;) | |
| 128 | |
| 129 oop thread_oop = JNIHandles::resolve_external_guard(thread); | |
| 130 if (thread_oop == NULL) { | |
| 131 return JVMTI_ERROR_INVALID_THREAD; | |
| 132 } | |
| 133 if (!thread_oop->is_a(SystemDictionary::thread_klass())) { | |
| 134 return JVMTI_ERROR_INVALID_THREAD; | |
| 135 } | |
| 136 JavaThread* java_thread = java_lang_Thread::thread(thread_oop); | |
| 137 if (java_thread == NULL) { | |
| 138 return JVMTI_ERROR_THREAD_NOT_ALIVE; | |
| 139 } | |
| 140 JvmtiThreadState* state = java_thread->jvmti_thread_state(); | |
| 141 *data_ptr = (state == NULL) ? NULL : | |
| 142 state->env_thread_state(this)->get_agent_thread_local_storage_data(); | |
| 143 } | |
| 144 return JVMTI_ERROR_NONE; | |
| 145 } /* end GetThreadLocalStorage */ | |
| 146 | |
| 147 // | |
| 148 // Class functions | |
| 149 // | |
| 150 | |
| 151 // class_count_ptr - pre-checked for NULL | |
| 152 // classes_ptr - pre-checked for NULL | |
| 153 jvmtiError | |
| 154 JvmtiEnv::GetLoadedClasses(jint* class_count_ptr, jclass** classes_ptr) { | |
| 155 return JvmtiGetLoadedClasses::getLoadedClasses(this, class_count_ptr, classes_ptr); | |
| 156 } /* end GetLoadedClasses */ | |
| 157 | |
| 158 | |
| 159 // initiating_loader - NULL is a valid value, must be checked | |
| 160 // class_count_ptr - pre-checked for NULL | |
| 161 // classes_ptr - pre-checked for NULL | |
| 162 jvmtiError | |
| 163 JvmtiEnv::GetClassLoaderClasses(jobject initiating_loader, jint* class_count_ptr, jclass** classes_ptr) { | |
| 164 return JvmtiGetLoadedClasses::getClassLoaderClasses(this, initiating_loader, | |
| 165 class_count_ptr, classes_ptr); | |
| 166 } /* end GetClassLoaderClasses */ | |
| 167 | |
| 168 // k_mirror - may be primitive, this must be checked | |
| 169 // is_modifiable_class_ptr - pre-checked for NULL | |
| 170 jvmtiError | |
| 171 JvmtiEnv::IsModifiableClass(oop k_mirror, jboolean* is_modifiable_class_ptr) { | |
| 172 *is_modifiable_class_ptr = VM_RedefineClasses::is_modifiable_class(k_mirror)? | |
| 173 JNI_TRUE : JNI_FALSE; | |
| 174 return JVMTI_ERROR_NONE; | |
| 175 } /* end IsModifiableClass */ | |
| 176 | |
| 177 // class_count - pre-checked to be greater than or equal to 0 | |
| 178 // classes - pre-checked for NULL | |
| 179 jvmtiError | |
| 180 JvmtiEnv::RetransformClasses(jint class_count, const jclass* classes) { | |
| 181 //TODO: add locking | |
| 182 | |
| 183 int index; | |
| 184 JavaThread* current_thread = JavaThread::current(); | |
| 185 ResourceMark rm(current_thread); | |
| 186 | |
| 187 jvmtiClassDefinition* class_definitions = | |
| 188 NEW_RESOURCE_ARRAY(jvmtiClassDefinition, class_count); | |
| 189 NULL_CHECK(class_definitions, JVMTI_ERROR_OUT_OF_MEMORY); | |
| 190 | |
| 191 for (index = 0; index < class_count; index++) { | |
| 192 HandleMark hm(current_thread); | |
| 193 | |
| 194 jclass jcls = classes[index]; | |
| 195 oop k_mirror = JNIHandles::resolve_external_guard(jcls); | |
| 196 if (k_mirror == NULL) { | |
| 197 return JVMTI_ERROR_INVALID_CLASS; | |
| 198 } | |
| 199 if (!k_mirror->is_a(SystemDictionary::class_klass())) { | |
| 200 return JVMTI_ERROR_INVALID_CLASS; | |
| 201 } | |
| 202 | |
| 203 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 204 return JVMTI_ERROR_UNMODIFIABLE_CLASS; | |
| 205 } | |
| 206 | |
| 207 klassOop k_oop = java_lang_Class::as_klassOop(k_mirror); | |
| 208 KlassHandle klass(current_thread, k_oop); | |
| 209 | |
| 210 jint status = klass->jvmti_class_status(); | |
| 211 if (status & (JVMTI_CLASS_STATUS_ERROR)) { | |
| 212 return JVMTI_ERROR_INVALID_CLASS; | |
| 213 } | |
| 214 if (status & (JVMTI_CLASS_STATUS_ARRAY)) { | |
| 215 return JVMTI_ERROR_UNMODIFIABLE_CLASS; | |
| 216 } | |
| 217 | |
| 218 instanceKlassHandle ikh(current_thread, k_oop); | |
| 219 if (ikh->get_cached_class_file_bytes() == NULL) { | |
| 220 // not cached, we need to reconstitute the class file from VM representation | |
| 221 constantPoolHandle constants(current_thread, ikh->constants()); | |
| 222 ObjectLocker ol(constants, current_thread); // lock constant pool while we query it | |
| 223 | |
| 224 JvmtiClassFileReconstituter reconstituter(ikh); | |
| 225 if (reconstituter.get_error() != JVMTI_ERROR_NONE) { | |
| 226 return reconstituter.get_error(); | |
| 227 } | |
| 228 | |
| 229 class_definitions[index].class_byte_count = (jint)reconstituter.class_file_size(); | |
| 230 class_definitions[index].class_bytes = (unsigned char*) | |
| 231 reconstituter.class_file_bytes(); | |
| 232 } else { | |
| 233 // it is cached, get it from the cache | |
| 234 class_definitions[index].class_byte_count = ikh->get_cached_class_file_len(); | |
| 235 class_definitions[index].class_bytes = ikh->get_cached_class_file_bytes(); | |
| 236 } | |
| 237 class_definitions[index].klass = jcls; | |
| 238 } | |
| 239 VM_RedefineClasses op(class_count, class_definitions, jvmti_class_load_kind_retransform); | |
| 240 VMThread::execute(&op); | |
| 241 return (op.check_error()); | |
| 242 } /* end RetransformClasses */ | |
| 243 | |
| 244 | |
| 245 // class_count - pre-checked to be greater than or equal to 0 | |
| 246 // class_definitions - pre-checked for NULL | |
| 247 jvmtiError | |
| 248 JvmtiEnv::RedefineClasses(jint class_count, const jvmtiClassDefinition* class_definitions) { | |
| 249 //TODO: add locking | |
| 250 VM_RedefineClasses op(class_count, class_definitions, jvmti_class_load_kind_redefine); | |
| 251 VMThread::execute(&op); | |
| 252 return (op.check_error()); | |
| 253 } /* end RedefineClasses */ | |
| 254 | |
| 255 | |
| 256 // | |
| 257 // Object functions | |
| 258 // | |
| 259 | |
| 260 // size_ptr - pre-checked for NULL | |
| 261 jvmtiError | |
| 262 JvmtiEnv::GetObjectSize(jobject object, jlong* size_ptr) { | |
| 263 oop mirror = JNIHandles::resolve_external_guard(object); | |
| 264 NULL_CHECK(mirror, JVMTI_ERROR_INVALID_OBJECT); | |
| 265 | |
| 266 if (mirror->klass() == SystemDictionary::class_klass()) { | |
| 267 if (!java_lang_Class::is_primitive(mirror)) { | |
| 268 mirror = java_lang_Class::as_klassOop(mirror); | |
| 269 assert(mirror != NULL, "class for non-primitive mirror must exist"); | |
| 270 } | |
| 271 } | |
| 272 | |
| 273 *size_ptr = mirror->size() * wordSize; | |
| 274 return JVMTI_ERROR_NONE; | |
| 275 } /* end GetObjectSize */ | |
| 276 | |
| 277 // | |
| 278 // Method functions | |
| 279 // | |
| 280 | |
| 281 // prefix - NULL is a valid value, must be checked | |
| 282 jvmtiError | |
| 283 JvmtiEnv::SetNativeMethodPrefix(const char* prefix) { | |
| 284 return prefix == NULL? | |
| 285 SetNativeMethodPrefixes(0, NULL) : | |
| 286 SetNativeMethodPrefixes(1, (char**)&prefix); | |
| 287 } /* end SetNativeMethodPrefix */ | |
| 288 | |
| 289 | |
| 290 // prefix_count - pre-checked to be greater than or equal to 0 | |
| 291 // prefixes - pre-checked for NULL | |
| 292 jvmtiError | |
| 293 JvmtiEnv::SetNativeMethodPrefixes(jint prefix_count, char** prefixes) { | |
| 294 // Have to grab JVMTI thread state lock to be sure that some thread | |
| 295 // isn't accessing the prefixes at the same time we are setting them. | |
| 296 // No locks during VM bring-up. | |
| 297 if (Threads::number_of_threads() == 0) { | |
| 298 return set_native_method_prefixes(prefix_count, prefixes); | |
| 299 } else { | |
| 300 MutexLocker mu(JvmtiThreadState_lock); | |
| 301 return set_native_method_prefixes(prefix_count, prefixes); | |
| 302 } | |
| 303 } /* end SetNativeMethodPrefixes */ | |
| 304 | |
| 305 // | |
| 306 // Event Management functions | |
| 307 // | |
| 308 | |
| 309 // callbacks - NULL is a valid value, must be checked | |
| 310 // size_of_callbacks - pre-checked to be greater than or equal to 0 | |
| 311 jvmtiError | |
| 312 JvmtiEnv::SetEventCallbacks(const jvmtiEventCallbacks* callbacks, jint size_of_callbacks) { | |
| 313 JvmtiEventController::set_event_callbacks(this, callbacks, size_of_callbacks); | |
| 314 return JVMTI_ERROR_NONE; | |
| 315 } /* end SetEventCallbacks */ | |
| 316 | |
| 317 | |
| 318 // event_thread - NULL is a valid value, must be checked | |
| 319 jvmtiError | |
| 320 JvmtiEnv::SetEventNotificationMode(jvmtiEventMode mode, jvmtiEvent event_type, jthread event_thread, ...) { | |
| 321 JavaThread* java_thread = NULL; | |
| 322 if (event_thread != NULL) { | |
| 323 oop thread_oop = JNIHandles::resolve_external_guard(event_thread); | |
| 324 if (thread_oop == NULL) { | |
| 325 return JVMTI_ERROR_INVALID_THREAD; | |
| 326 } | |
| 327 if (!thread_oop->is_a(SystemDictionary::thread_klass())) { | |
| 328 return JVMTI_ERROR_INVALID_THREAD; | |
| 329 } | |
| 330 java_thread = java_lang_Thread::thread(thread_oop); | |
| 331 if (java_thread == NULL) { | |
| 332 return JVMTI_ERROR_THREAD_NOT_ALIVE; | |
| 333 } | |
| 334 } | |
| 335 | |
| 336 // event_type must be valid | |
| 337 if (!JvmtiEventController::is_valid_event_type(event_type)) { | |
| 338 return JVMTI_ERROR_INVALID_EVENT_TYPE; | |
| 339 } | |
| 340 | |
| 341 // global events cannot be controlled at thread level. | |
| 342 if (java_thread != NULL && JvmtiEventController::is_global_event(event_type)) { | |
| 343 return JVMTI_ERROR_ILLEGAL_ARGUMENT; | |
| 344 } | |
| 345 | |
| 346 bool enabled = (mode == JVMTI_ENABLE); | |
| 347 | |
| 348 // assure that needed capabilities are present | |
| 349 if (enabled && !JvmtiUtil::has_event_capability(event_type, get_capabilities())) { | |
| 350 return JVMTI_ERROR_MUST_POSSESS_CAPABILITY; | |
| 351 } | |
| 352 | |
| 353 if (event_type == JVMTI_EVENT_CLASS_FILE_LOAD_HOOK && enabled) { | |
| 354 record_class_file_load_hook_enabled(); | |
| 355 } | |
| 356 JvmtiEventController::set_user_enabled(this, java_thread, event_type, enabled); | |
| 357 | |
| 358 return JVMTI_ERROR_NONE; | |
| 359 } /* end SetEventNotificationMode */ | |
| 360 | |
| 361 // | |
| 362 // Capability functions | |
| 363 // | |
| 364 | |
| 365 // capabilities_ptr - pre-checked for NULL | |
| 366 jvmtiError | |
| 367 JvmtiEnv::GetPotentialCapabilities(jvmtiCapabilities* capabilities_ptr) { | |
| 368 JvmtiManageCapabilities::get_potential_capabilities(get_capabilities(), | |
| 369 get_prohibited_capabilities(), | |
| 370 capabilities_ptr); | |
| 371 return JVMTI_ERROR_NONE; | |
| 372 } /* end GetPotentialCapabilities */ | |
| 373 | |
| 374 | |
| 375 // capabilities_ptr - pre-checked for NULL | |
| 376 jvmtiError | |
| 377 JvmtiEnv::AddCapabilities(const jvmtiCapabilities* capabilities_ptr) { | |
| 378 return JvmtiManageCapabilities::add_capabilities(get_capabilities(), | |
| 379 get_prohibited_capabilities(), | |
| 380 capabilities_ptr, | |
| 381 get_capabilities()); | |
| 382 } /* end AddCapabilities */ | |
| 383 | |
| 384 | |
| 385 // capabilities_ptr - pre-checked for NULL | |
| 386 jvmtiError | |
| 387 JvmtiEnv::RelinquishCapabilities(const jvmtiCapabilities* capabilities_ptr) { | |
| 388 JvmtiManageCapabilities::relinquish_capabilities(get_capabilities(), capabilities_ptr, get_capabilities()); | |
| 389 return JVMTI_ERROR_NONE; | |
| 390 } /* end RelinquishCapabilities */ | |
| 391 | |
| 392 | |
| 393 // capabilities_ptr - pre-checked for NULL | |
| 394 jvmtiError | |
| 395 JvmtiEnv::GetCapabilities(jvmtiCapabilities* capabilities_ptr) { | |
| 396 JvmtiManageCapabilities::copy_capabilities(get_capabilities(), capabilities_ptr); | |
| 397 return JVMTI_ERROR_NONE; | |
| 398 } /* end GetCapabilities */ | |
| 399 | |
| 400 // | |
| 401 // Class Loader Search functions | |
| 402 // | |
| 403 | |
| 404 // segment - pre-checked for NULL | |
| 405 jvmtiError | |
| 406 JvmtiEnv::AddToBootstrapClassLoaderSearch(const char* segment) { | |
| 407 jvmtiPhase phase = get_phase(); | |
| 408 if (phase == JVMTI_PHASE_ONLOAD) { | |
| 409 Arguments::append_sysclasspath(segment); | |
| 410 return JVMTI_ERROR_NONE; | |
| 1121 | 411 } else if (use_version_1_0_semantics()) { |
| 412 // This JvmtiEnv requested version 1.0 semantics and this function | |
| 413 // is only allowed in the ONLOAD phase in version 1.0 so we need to | |
| 414 // return an error here. | |
| 415 return JVMTI_ERROR_WRONG_PHASE; | |
|
1120
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
416 } else if (phase == JVMTI_PHASE_LIVE) { |
|
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
417 // The phase is checked by the wrapper that called this function, |
|
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
418 // but this thread could be racing with the thread that is |
|
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
419 // terminating the VM so we check one more time. |
| 0 | 420 |
| 421 // create the zip entry | |
| 422 ClassPathZipEntry* zip_entry = ClassLoader::create_class_path_zip_entry(segment); | |
| 423 if (zip_entry == NULL) { | |
| 424 return JVMTI_ERROR_ILLEGAL_ARGUMENT; | |
| 425 } | |
| 426 | |
| 427 // lock the loader | |
| 428 Thread* thread = Thread::current(); | |
| 429 HandleMark hm; | |
| 430 Handle loader_lock = Handle(thread, SystemDictionary::system_loader_lock()); | |
| 431 | |
| 432 ObjectLocker ol(loader_lock, thread); | |
| 433 | |
| 434 // add the jar file to the bootclasspath | |
| 435 if (TraceClassLoading) { | |
| 436 tty->print_cr("[Opened %s]", zip_entry->name()); | |
| 437 } | |
| 438 ClassLoader::add_to_list(zip_entry); | |
| 439 return JVMTI_ERROR_NONE; | |
|
1120
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
440 } else { |
|
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
441 return JVMTI_ERROR_WRONG_PHASE; |
| 0 | 442 } |
| 443 | |
| 444 } /* end AddToBootstrapClassLoaderSearch */ | |
| 445 | |
| 446 | |
| 447 // segment - pre-checked for NULL | |
| 448 jvmtiError | |
| 449 JvmtiEnv::AddToSystemClassLoaderSearch(const char* segment) { | |
| 450 jvmtiPhase phase = get_phase(); | |
| 451 | |
| 452 if (phase == JVMTI_PHASE_ONLOAD) { | |
| 453 for (SystemProperty* p = Arguments::system_properties(); p != NULL; p = p->next()) { | |
| 454 if (strcmp("java.class.path", p->key()) == 0) { | |
| 455 p->append_value(segment); | |
| 456 break; | |
| 457 } | |
| 458 } | |
| 459 return JVMTI_ERROR_NONE; | |
|
1120
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
460 } else if (phase == JVMTI_PHASE_LIVE) { |
|
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
461 // The phase is checked by the wrapper that called this function, |
|
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
462 // but this thread could be racing with the thread that is |
|
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
463 // terminating the VM so we check one more time. |
| 0 | 464 HandleMark hm; |
| 465 | |
| 466 // create the zip entry (which will open the zip file and hence | |
| 467 // check that the segment is indeed a zip file). | |
| 468 ClassPathZipEntry* zip_entry = ClassLoader::create_class_path_zip_entry(segment); | |
| 469 if (zip_entry == NULL) { | |
| 470 return JVMTI_ERROR_ILLEGAL_ARGUMENT; | |
| 471 } | |
| 472 delete zip_entry; // no longer needed | |
| 473 | |
| 474 // lock the loader | |
| 475 Thread* THREAD = Thread::current(); | |
| 476 Handle loader = Handle(THREAD, SystemDictionary::java_system_loader()); | |
| 477 | |
| 478 ObjectLocker ol(loader, THREAD); | |
| 479 | |
| 480 // need the path as java.lang.String | |
| 481 Handle path = java_lang_String::create_from_str(segment, THREAD); | |
| 482 if (HAS_PENDING_EXCEPTION) { | |
| 483 CLEAR_PENDING_EXCEPTION; | |
| 484 return JVMTI_ERROR_INTERNAL; | |
| 485 } | |
| 486 | |
| 487 instanceKlassHandle loader_ik(THREAD, loader->klass()); | |
| 488 | |
| 489 // Invoke the appendToClassPathForInstrumentation method - if the method | |
| 490 // is not found it means the loader doesn't support adding to the class path | |
| 491 // in the live phase. | |
| 492 { | |
| 493 JavaValue res(T_VOID); | |
| 494 JavaCalls::call_special(&res, | |
| 495 loader, | |
| 496 loader_ik, | |
| 497 vmSymbolHandles::appendToClassPathForInstrumentation_name(), | |
| 498 vmSymbolHandles::appendToClassPathForInstrumentation_signature(), | |
| 499 path, | |
| 500 THREAD); | |
| 501 if (HAS_PENDING_EXCEPTION) { | |
| 502 symbolOop ex_name = PENDING_EXCEPTION->klass()->klass_part()->name(); | |
| 503 CLEAR_PENDING_EXCEPTION; | |
| 504 | |
| 505 if (ex_name == vmSymbols::java_lang_NoSuchMethodError()) { | |
| 506 return JVMTI_ERROR_CLASS_LOADER_UNSUPPORTED; | |
| 507 } else { | |
| 508 return JVMTI_ERROR_INTERNAL; | |
| 509 } | |
| 510 } | |
| 511 } | |
| 512 | |
| 513 return JVMTI_ERROR_NONE; | |
|
1120
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
514 } else { |
|
9127aa69352e
6648438: 4/4 src/share/vm/prims/jvmtiEnv.cpp:457 assert(phase == JVMTI_PHASE_LIVE,"sanity check")
dcubed
parents:
0
diff
changeset
|
515 return JVMTI_ERROR_WRONG_PHASE; |
| 0 | 516 } |
| 517 } /* end AddToSystemClassLoaderSearch */ | |
| 518 | |
| 519 // | |
| 520 // General functions | |
| 521 // | |
| 522 | |
| 523 // phase_ptr - pre-checked for NULL | |
| 524 jvmtiError | |
| 525 JvmtiEnv::GetPhase(jvmtiPhase* phase_ptr) { | |
| 526 *phase_ptr = get_phase(); | |
| 527 return JVMTI_ERROR_NONE; | |
| 528 } /* end GetPhase */ | |
| 529 | |
| 530 | |
| 531 jvmtiError | |
| 532 JvmtiEnv::DisposeEnvironment() { | |
| 533 dispose(); | |
| 534 return JVMTI_ERROR_NONE; | |
| 535 } /* end DisposeEnvironment */ | |
| 536 | |
| 537 | |
| 538 // data - NULL is a valid value, must be checked | |
| 539 jvmtiError | |
| 540 JvmtiEnv::SetEnvironmentLocalStorage(const void* data) { | |
| 541 set_env_local_storage(data); | |
| 542 return JVMTI_ERROR_NONE; | |
| 543 } /* end SetEnvironmentLocalStorage */ | |
| 544 | |
| 545 | |
| 546 // data_ptr - pre-checked for NULL | |
| 547 jvmtiError | |
| 548 JvmtiEnv::GetEnvironmentLocalStorage(void** data_ptr) { | |
| 549 *data_ptr = (void*)get_env_local_storage(); | |
| 550 return JVMTI_ERROR_NONE; | |
| 551 } /* end GetEnvironmentLocalStorage */ | |
| 552 | |
| 553 // version_ptr - pre-checked for NULL | |
| 554 jvmtiError | |
| 555 JvmtiEnv::GetVersionNumber(jint* version_ptr) { | |
| 556 *version_ptr = JVMTI_VERSION; | |
| 557 return JVMTI_ERROR_NONE; | |
| 558 } /* end GetVersionNumber */ | |
| 559 | |
| 560 | |
| 561 // name_ptr - pre-checked for NULL | |
| 562 jvmtiError | |
| 563 JvmtiEnv::GetErrorName(jvmtiError error, char** name_ptr) { | |
| 564 if (error < JVMTI_ERROR_NONE || error > JVMTI_ERROR_MAX) { | |
| 565 return JVMTI_ERROR_ILLEGAL_ARGUMENT; | |
| 566 } | |
| 567 const char *name = JvmtiUtil::error_name(error); | |
| 568 if (name == NULL) { | |
| 569 return JVMTI_ERROR_ILLEGAL_ARGUMENT; | |
| 570 } | |
| 571 size_t len = strlen(name) + 1; | |
| 572 jvmtiError err = allocate(len, (unsigned char**)name_ptr); | |
| 573 if (err == JVMTI_ERROR_NONE) { | |
| 574 memcpy(*name_ptr, name, len); | |
| 575 } | |
| 576 return err; | |
| 577 } /* end GetErrorName */ | |
| 578 | |
| 579 | |
| 580 jvmtiError | |
| 581 JvmtiEnv::SetVerboseFlag(jvmtiVerboseFlag flag, jboolean value) { | |
| 582 switch (flag) { | |
| 583 case JVMTI_VERBOSE_OTHER: | |
| 584 // ignore | |
| 585 break; | |
| 586 case JVMTI_VERBOSE_CLASS: | |
| 587 TraceClassLoading = value != 0; | |
| 588 TraceClassUnloading = value != 0; | |
| 589 break; | |
| 590 case JVMTI_VERBOSE_GC: | |
| 591 PrintGC = value != 0; | |
| 592 TraceClassUnloading = value != 0; | |
| 593 break; | |
| 594 case JVMTI_VERBOSE_JNI: | |
| 595 PrintJNIResolving = value != 0; | |
| 596 break; | |
| 597 default: | |
| 598 return JVMTI_ERROR_ILLEGAL_ARGUMENT; | |
| 599 }; | |
| 600 return JVMTI_ERROR_NONE; | |
| 601 } /* end SetVerboseFlag */ | |
| 602 | |
| 603 | |
| 604 // format_ptr - pre-checked for NULL | |
| 605 jvmtiError | |
| 606 JvmtiEnv::GetJLocationFormat(jvmtiJlocationFormat* format_ptr) { | |
| 607 *format_ptr = JVMTI_JLOCATION_JVMBCI; | |
| 608 return JVMTI_ERROR_NONE; | |
| 609 } /* end GetJLocationFormat */ | |
| 610 | |
| 611 #ifndef JVMTI_KERNEL | |
| 612 | |
| 613 // | |
| 614 // Thread functions | |
| 615 // | |
| 616 | |
| 617 // Threads_lock NOT held | |
| 618 // thread - NOT pre-checked | |
| 619 // thread_state_ptr - pre-checked for NULL | |
| 620 jvmtiError | |
| 621 JvmtiEnv::GetThreadState(jthread thread, jint* thread_state_ptr) { | |
| 622 jint state; | |
| 623 oop thread_oop; | |
| 624 JavaThread* thr; | |
| 625 | |
| 626 if (thread == NULL) { | |
| 627 thread_oop = JavaThread::current()->threadObj(); | |
| 628 } else { | |
| 629 thread_oop = JNIHandles::resolve_external_guard(thread); | |
| 630 } | |
| 631 | |
| 632 if (thread_oop == NULL || !thread_oop->is_a(SystemDictionary::thread_klass())) { | |
| 633 return JVMTI_ERROR_INVALID_THREAD; | |
| 634 } | |
| 635 | |
| 636 // get most state bits | |
| 637 state = (jint)java_lang_Thread::get_thread_status(thread_oop); | |
| 638 | |
| 639 // add more state bits | |
| 640 thr = java_lang_Thread::thread(thread_oop); | |
| 641 if (thr != NULL) { | |
| 642 JavaThreadState jts = thr->thread_state(); | |
| 643 | |
| 644 if (thr->is_being_ext_suspended()) { | |
| 645 state |= JVMTI_THREAD_STATE_SUSPENDED; | |
| 646 } | |
| 647 if (jts == _thread_in_native) { | |
| 648 state |= JVMTI_THREAD_STATE_IN_NATIVE; | |
| 649 } | |
| 650 OSThread* osThread = thr->osthread(); | |
| 651 if (osThread != NULL && osThread->interrupted()) { | |
| 652 state |= JVMTI_THREAD_STATE_INTERRUPTED; | |
| 653 } | |
| 654 } | |
| 655 | |
| 656 *thread_state_ptr = state; | |
| 657 return JVMTI_ERROR_NONE; | |
| 658 } /* end GetThreadState */ | |
| 659 | |
| 660 | |
| 661 // thread_ptr - pre-checked for NULL | |
| 662 jvmtiError | |
| 663 JvmtiEnv::GetCurrentThread(jthread* thread_ptr) { | |
| 664 JavaThread* current_thread = JavaThread::current(); | |
| 665 *thread_ptr = (jthread)JNIHandles::make_local(current_thread, current_thread->threadObj()); | |
| 666 return JVMTI_ERROR_NONE; | |
| 667 } /* end GetCurrentThread */ | |
| 668 | |
| 669 | |
| 670 // threads_count_ptr - pre-checked for NULL | |
| 671 // threads_ptr - pre-checked for NULL | |
| 672 jvmtiError | |
| 673 JvmtiEnv::GetAllThreads(jint* threads_count_ptr, jthread** threads_ptr) { | |
| 674 int nthreads = 0; | |
| 675 Handle *thread_objs = NULL; | |
| 676 ResourceMark rm; | |
| 677 HandleMark hm; | |
| 678 | |
| 679 // enumerate threads (including agent threads) | |
| 680 ThreadsListEnumerator tle(Thread::current(), true); | |
| 681 nthreads = tle.num_threads(); | |
| 682 *threads_count_ptr = nthreads; | |
| 683 | |
| 684 if (nthreads == 0) { | |
| 685 *threads_ptr = NULL; | |
| 686 return JVMTI_ERROR_NONE; | |
| 687 } | |
| 688 | |
| 689 thread_objs = NEW_RESOURCE_ARRAY(Handle, nthreads); | |
| 690 NULL_CHECK(thread_objs, JVMTI_ERROR_OUT_OF_MEMORY); | |
| 691 | |
| 692 for (int i=0; i < nthreads; i++) { | |
| 693 thread_objs[i] = Handle(tle.get_threadObj(i)); | |
| 694 } | |
| 695 | |
| 696 // have to make global handles outside of Threads_lock | |
| 697 jthread *jthreads = new_jthreadArray(nthreads, thread_objs); | |
| 698 NULL_CHECK(jthreads, JVMTI_ERROR_OUT_OF_MEMORY); | |
| 699 | |
| 700 *threads_ptr = jthreads; | |
| 701 return JVMTI_ERROR_NONE; | |
| 702 } /* end GetAllThreads */ | |
| 703 | |
| 704 | |
| 705 // Threads_lock NOT held, java_thread not protected by lock | |
| 706 // java_thread - pre-checked | |
| 707 jvmtiError | |
| 708 JvmtiEnv::SuspendThread(JavaThread* java_thread) { | |
| 709 // don't allow hidden thread suspend request. | |
| 710 if (java_thread->is_hidden_from_external_view()) { | |
| 711 return (JVMTI_ERROR_NONE); | |
| 712 } | |
| 713 | |
| 714 { | |
| 715 MutexLockerEx ml(java_thread->SR_lock(), Mutex::_no_safepoint_check_flag); | |
| 716 if (java_thread->is_external_suspend()) { | |
| 717 // don't allow nested external suspend requests. | |
| 718 return (JVMTI_ERROR_THREAD_SUSPENDED); | |
| 719 } | |
| 720 if (java_thread->is_exiting()) { // thread is in the process of exiting | |
| 721 return (JVMTI_ERROR_THREAD_NOT_ALIVE); | |
| 722 } | |
| 723 java_thread->set_external_suspend(); | |
| 724 } | |
| 725 | |
| 726 if (!JvmtiSuspendControl::suspend(java_thread)) { | |
| 727 // the thread was in the process of exiting | |
| 728 return (JVMTI_ERROR_THREAD_NOT_ALIVE); | |
| 729 } | |
| 730 return JVMTI_ERROR_NONE; | |
| 731 } /* end SuspendThread */ | |
| 732 | |
| 733 | |
| 734 // request_count - pre-checked to be greater than or equal to 0 | |
| 735 // request_list - pre-checked for NULL | |
| 736 // results - pre-checked for NULL | |
| 737 jvmtiError | |
| 738 JvmtiEnv::SuspendThreadList(jint request_count, const jthread* request_list, jvmtiError* results) { | |
| 739 int needSafepoint = 0; // > 0 if we need a safepoint | |
| 740 for (int i = 0; i < request_count; i++) { | |
| 741 JavaThread *java_thread = get_JavaThread(request_list[i]); | |
| 742 if (java_thread == NULL) { | |
| 743 results[i] = JVMTI_ERROR_INVALID_THREAD; | |
| 744 continue; | |
| 745 } | |
| 746 // the thread has not yet run or has exited (not on threads list) | |
| 747 if (java_thread->threadObj() == NULL) { | |
| 748 results[i] = JVMTI_ERROR_THREAD_NOT_ALIVE; | |
| 749 continue; | |
| 750 } | |
| 751 if (java_lang_Thread::thread(java_thread->threadObj()) == NULL) { | |
| 752 results[i] = JVMTI_ERROR_THREAD_NOT_ALIVE; | |
| 753 continue; | |
| 754 } | |
| 755 // don't allow hidden thread suspend request. | |
| 756 if (java_thread->is_hidden_from_external_view()) { | |
| 757 results[i] = JVMTI_ERROR_NONE; // indicate successful suspend | |
| 758 continue; | |
| 759 } | |
| 760 | |
| 761 { | |
| 762 MutexLockerEx ml(java_thread->SR_lock(), Mutex::_no_safepoint_check_flag); | |
| 763 if (java_thread->is_external_suspend()) { | |
| 764 // don't allow nested external suspend requests. | |
| 765 results[i] = JVMTI_ERROR_THREAD_SUSPENDED; | |
| 766 continue; | |
| 767 } | |
| 768 if (java_thread->is_exiting()) { // thread is in the process of exiting | |
| 769 results[i] = JVMTI_ERROR_THREAD_NOT_ALIVE; | |
| 770 continue; | |
| 771 } | |
| 772 java_thread->set_external_suspend(); | |
| 773 } | |
| 774 if (java_thread->thread_state() == _thread_in_native) { | |
| 775 // We need to try and suspend native threads here. Threads in | |
| 776 // other states will self-suspend on their next transition. | |
| 777 if (!JvmtiSuspendControl::suspend(java_thread)) { | |
| 778 // The thread was in the process of exiting. Force another | |
| 779 // safepoint to make sure that this thread transitions. | |
| 780 needSafepoint++; | |
| 781 results[i] = JVMTI_ERROR_THREAD_NOT_ALIVE; | |
| 782 continue; | |
| 783 } | |
| 784 } else { | |
| 785 needSafepoint++; | |
| 786 } | |
| 787 results[i] = JVMTI_ERROR_NONE; // indicate successful suspend | |
| 788 } | |
| 789 if (needSafepoint > 0) { | |
| 790 VM_ForceSafepoint vfs; | |
| 791 VMThread::execute(&vfs); | |
| 792 } | |
| 793 // per-thread suspend results returned via results parameter | |
| 794 return JVMTI_ERROR_NONE; | |
| 795 } /* end SuspendThreadList */ | |
| 796 | |
| 797 | |
| 798 // Threads_lock NOT held, java_thread not protected by lock | |
| 799 // java_thread - pre-checked | |
| 800 jvmtiError | |
| 801 JvmtiEnv::ResumeThread(JavaThread* java_thread) { | |
| 802 // don't allow hidden thread resume request. | |
| 803 if (java_thread->is_hidden_from_external_view()) { | |
| 804 return JVMTI_ERROR_NONE; | |
| 805 } | |
| 806 | |
| 807 if (!java_thread->is_being_ext_suspended()) { | |
| 808 return JVMTI_ERROR_THREAD_NOT_SUSPENDED; | |
| 809 } | |
| 810 | |
| 811 if (!JvmtiSuspendControl::resume(java_thread)) { | |
| 812 return JVMTI_ERROR_INTERNAL; | |
| 813 } | |
| 814 return JVMTI_ERROR_NONE; | |
| 815 } /* end ResumeThread */ | |
| 816 | |
| 817 | |
| 818 // request_count - pre-checked to be greater than or equal to 0 | |
| 819 // request_list - pre-checked for NULL | |
| 820 // results - pre-checked for NULL | |
| 821 jvmtiError | |
| 822 JvmtiEnv::ResumeThreadList(jint request_count, const jthread* request_list, jvmtiError* results) { | |
| 823 for (int i = 0; i < request_count; i++) { | |
| 824 JavaThread *java_thread = get_JavaThread(request_list[i]); | |
| 825 if (java_thread == NULL) { | |
| 826 results[i] = JVMTI_ERROR_INVALID_THREAD; | |
| 827 continue; | |
| 828 } | |
| 829 // don't allow hidden thread resume request. | |
| 830 if (java_thread->is_hidden_from_external_view()) { | |
| 831 results[i] = JVMTI_ERROR_NONE; // indicate successful resume | |
| 832 continue; | |
| 833 } | |
| 834 if (!java_thread->is_being_ext_suspended()) { | |
| 835 results[i] = JVMTI_ERROR_THREAD_NOT_SUSPENDED; | |
| 836 continue; | |
| 837 } | |
| 838 | |
| 839 if (!JvmtiSuspendControl::resume(java_thread)) { | |
| 840 results[i] = JVMTI_ERROR_INTERNAL; | |
| 841 continue; | |
| 842 } | |
| 843 | |
| 844 results[i] = JVMTI_ERROR_NONE; // indicate successful suspend | |
| 845 } | |
| 846 // per-thread resume results returned via results parameter | |
| 847 return JVMTI_ERROR_NONE; | |
| 848 } /* end ResumeThreadList */ | |
| 849 | |
| 850 | |
| 851 // Threads_lock NOT held, java_thread not protected by lock | |
| 852 // java_thread - pre-checked | |
| 853 jvmtiError | |
| 854 JvmtiEnv::StopThread(JavaThread* java_thread, jobject exception) { | |
| 855 oop e = JNIHandles::resolve_external_guard(exception); | |
| 856 NULL_CHECK(e, JVMTI_ERROR_NULL_POINTER); | |
| 857 | |
| 858 JavaThread::send_async_exception(java_thread->threadObj(), e); | |
| 859 | |
| 860 return JVMTI_ERROR_NONE; | |
| 861 | |
| 862 } /* end StopThread */ | |
| 863 | |
| 864 | |
| 865 // Threads_lock NOT held | |
| 866 // thread - NOT pre-checked | |
| 867 jvmtiError | |
| 868 JvmtiEnv::InterruptThread(jthread thread) { | |
| 869 oop thread_oop = JNIHandles::resolve_external_guard(thread); | |
| 870 if (thread_oop == NULL || !thread_oop->is_a(SystemDictionary::thread_klass())) | |
| 871 return JVMTI_ERROR_INVALID_THREAD; | |
| 872 | |
| 873 JavaThread* current_thread = JavaThread::current(); | |
| 874 | |
| 875 // Todo: this is a duplicate of JVM_Interrupt; share code in future | |
| 876 // Ensure that the C++ Thread and OSThread structures aren't freed before we operate | |
| 877 MutexLockerEx ml(current_thread->threadObj() == thread_oop ? NULL : Threads_lock); | |
| 878 // We need to re-resolve the java_thread, since a GC might have happened during the | |
| 879 // acquire of the lock | |
| 880 | |
| 881 JavaThread* java_thread = java_lang_Thread::thread(JNIHandles::resolve_external_guard(thread)); | |
| 882 NULL_CHECK(java_thread, JVMTI_ERROR_THREAD_NOT_ALIVE); | |
| 883 | |
| 884 Thread::interrupt(java_thread); | |
| 885 | |
| 886 return JVMTI_ERROR_NONE; | |
| 887 } /* end InterruptThread */ | |
| 888 | |
| 889 | |
| 890 // Threads_lock NOT held | |
| 891 // thread - NOT pre-checked | |
| 892 // info_ptr - pre-checked for NULL | |
| 893 jvmtiError | |
| 894 JvmtiEnv::GetThreadInfo(jthread thread, jvmtiThreadInfo* info_ptr) { | |
| 895 ResourceMark rm; | |
| 896 HandleMark hm; | |
| 897 | |
| 898 JavaThread* current_thread = JavaThread::current(); | |
| 899 | |
| 900 // if thread is NULL the current thread is used | |
| 901 oop thread_oop; | |
| 902 if (thread == NULL) { | |
| 903 thread_oop = current_thread->threadObj(); | |
| 904 } else { | |
| 905 thread_oop = JNIHandles::resolve_external_guard(thread); | |
| 906 } | |
| 907 if (thread_oop == NULL || !thread_oop->is_a(SystemDictionary::thread_klass())) | |
| 908 return JVMTI_ERROR_INVALID_THREAD; | |
| 909 | |
| 910 Handle thread_obj(current_thread, thread_oop); | |
| 911 typeArrayHandle name; | |
| 912 ThreadPriority priority; | |
| 913 Handle thread_group; | |
| 914 Handle context_class_loader; | |
| 915 bool is_daemon; | |
| 916 | |
| 917 { MutexLocker mu(Threads_lock); | |
| 918 | |
| 919 name = typeArrayHandle(current_thread, java_lang_Thread::name(thread_obj())); | |
| 920 priority = java_lang_Thread::priority(thread_obj()); | |
| 921 thread_group = Handle(current_thread, java_lang_Thread::threadGroup(thread_obj())); | |
| 922 is_daemon = java_lang_Thread::is_daemon(thread_obj()); | |
| 923 | |
| 924 oop loader = java_lang_Thread::context_class_loader(thread_obj()); | |
| 925 context_class_loader = Handle(current_thread, loader); | |
| 926 } | |
| 927 { const char *n; | |
| 928 | |
| 929 if (name() != NULL) { | |
| 930 n = UNICODE::as_utf8((jchar*) name->base(T_CHAR), name->length()); | |
| 931 } else { | |
| 932 n = UNICODE::as_utf8(NULL, 0); | |
| 933 } | |
| 934 | |
| 935 info_ptr->name = (char *) jvmtiMalloc(strlen(n)+1); | |
| 936 if (info_ptr->name == NULL) | |
| 937 return JVMTI_ERROR_OUT_OF_MEMORY; | |
| 938 | |
| 939 strcpy(info_ptr->name, n); | |
| 940 } | |
| 941 info_ptr->is_daemon = is_daemon; | |
| 942 info_ptr->priority = priority; | |
| 943 | |
| 944 info_ptr->context_class_loader = (context_class_loader.is_null()) ? NULL : | |
| 945 jni_reference(context_class_loader); | |
| 946 info_ptr->thread_group = jni_reference(thread_group); | |
| 947 | |
| 948 return JVMTI_ERROR_NONE; | |
| 949 } /* end GetThreadInfo */ | |
| 950 | |
| 951 | |
| 952 // Threads_lock NOT held, java_thread not protected by lock | |
| 953 // java_thread - pre-checked | |
| 954 // owned_monitor_count_ptr - pre-checked for NULL | |
| 955 // owned_monitors_ptr - pre-checked for NULL | |
| 956 jvmtiError | |
| 957 JvmtiEnv::GetOwnedMonitorInfo(JavaThread* java_thread, jint* owned_monitor_count_ptr, jobject** owned_monitors_ptr) { | |
| 958 jvmtiError err = JVMTI_ERROR_NONE; | |
| 959 JavaThread* calling_thread = JavaThread::current(); | |
| 960 | |
| 961 // growable array of jvmti monitors info on the C-heap | |
| 962 GrowableArray<jvmtiMonitorStackDepthInfo*> *owned_monitors_list = | |
| 963 new (ResourceObj::C_HEAP) GrowableArray<jvmtiMonitorStackDepthInfo*>(1, true); | |
| 964 | |
| 965 uint32_t debug_bits = 0; | |
| 966 if (is_thread_fully_suspended(java_thread, true, &debug_bits)) { | |
| 967 err = get_owned_monitors(calling_thread, java_thread, owned_monitors_list); | |
| 968 } else { | |
| 969 // JVMTI get monitors info at safepoint. Do not require target thread to | |
| 970 // be suspended. | |
| 971 VM_GetOwnedMonitorInfo op(this, calling_thread, java_thread, owned_monitors_list); | |
| 972 VMThread::execute(&op); | |
| 973 err = op.result(); | |
| 974 } | |
| 975 jint owned_monitor_count = owned_monitors_list->length(); | |
| 976 if (err == JVMTI_ERROR_NONE) { | |
| 977 if ((err = allocate(owned_monitor_count * sizeof(jobject *), | |
| 978 (unsigned char**)owned_monitors_ptr)) == JVMTI_ERROR_NONE) { | |
| 979 // copy into the returned array | |
| 980 for (int i = 0; i < owned_monitor_count; i++) { | |
| 981 (*owned_monitors_ptr)[i] = | |
| 982 ((jvmtiMonitorStackDepthInfo*)owned_monitors_list->at(i))->monitor; | |
| 983 } | |
| 984 *owned_monitor_count_ptr = owned_monitor_count; | |
| 985 } | |
| 986 } | |
| 987 // clean up. | |
| 988 for (int i = 0; i < owned_monitor_count; i++) { | |
| 989 deallocate((unsigned char*)owned_monitors_list->at(i)); | |
| 990 } | |
| 991 delete owned_monitors_list; | |
| 992 | |
| 993 return err; | |
| 994 } /* end GetOwnedMonitorInfo */ | |
| 995 | |
| 996 | |
| 997 // Threads_lock NOT held, java_thread not protected by lock | |
| 998 // java_thread - pre-checked | |
| 999 // monitor_info_count_ptr - pre-checked for NULL | |
| 1000 // monitor_info_ptr - pre-checked for NULL | |
| 1001 jvmtiError | |
| 1002 JvmtiEnv::GetOwnedMonitorStackDepthInfo(JavaThread* java_thread, jint* monitor_info_count_ptr, jvmtiMonitorStackDepthInfo** monitor_info_ptr) { | |
| 1003 jvmtiError err = JVMTI_ERROR_NONE; | |
| 1004 JavaThread* calling_thread = JavaThread::current(); | |
| 1005 | |
| 1006 // growable array of jvmti monitors info on the C-heap | |
| 1007 GrowableArray<jvmtiMonitorStackDepthInfo*> *owned_monitors_list = | |
| 1008 new (ResourceObj::C_HEAP) GrowableArray<jvmtiMonitorStackDepthInfo*>(1, true); | |
| 1009 | |
| 1010 uint32_t debug_bits = 0; | |
| 1011 if (is_thread_fully_suspended(java_thread, true, &debug_bits)) { | |
| 1012 err = get_owned_monitors(calling_thread, java_thread, owned_monitors_list); | |
| 1013 } else { | |
| 1014 // JVMTI get owned monitors info at safepoint. Do not require target thread to | |
| 1015 // be suspended. | |
| 1016 VM_GetOwnedMonitorInfo op(this, calling_thread, java_thread, owned_monitors_list); | |
| 1017 VMThread::execute(&op); | |
| 1018 err = op.result(); | |
| 1019 } | |
| 1020 | |
| 1021 jint owned_monitor_count = owned_monitors_list->length(); | |
| 1022 if (err == JVMTI_ERROR_NONE) { | |
| 1023 if ((err = allocate(owned_monitor_count * sizeof(jvmtiMonitorStackDepthInfo), | |
| 1024 (unsigned char**)monitor_info_ptr)) == JVMTI_ERROR_NONE) { | |
| 1025 // copy to output array. | |
| 1026 for (int i = 0; i < owned_monitor_count; i++) { | |
| 1027 (*monitor_info_ptr)[i].monitor = | |
| 1028 ((jvmtiMonitorStackDepthInfo*)owned_monitors_list->at(i))->monitor; | |
| 1029 (*monitor_info_ptr)[i].stack_depth = | |
| 1030 ((jvmtiMonitorStackDepthInfo*)owned_monitors_list->at(i))->stack_depth; | |
| 1031 } | |
| 1032 } | |
| 1033 *monitor_info_count_ptr = owned_monitor_count; | |
| 1034 } | |
| 1035 | |
| 1036 // clean up. | |
| 1037 for (int i = 0; i < owned_monitor_count; i++) { | |
| 1038 deallocate((unsigned char*)owned_monitors_list->at(i)); | |
| 1039 } | |
| 1040 delete owned_monitors_list; | |
| 1041 | |
| 1042 return err; | |
| 1043 } /* end GetOwnedMonitorStackDepthInfo */ | |
| 1044 | |
| 1045 | |
| 1046 // Threads_lock NOT held, java_thread not protected by lock | |
| 1047 // java_thread - pre-checked | |
| 1048 // monitor_ptr - pre-checked for NULL | |
| 1049 jvmtiError | |
| 1050 JvmtiEnv::GetCurrentContendedMonitor(JavaThread* java_thread, jobject* monitor_ptr) { | |
| 1051 jvmtiError err = JVMTI_ERROR_NONE; | |
| 1052 uint32_t debug_bits = 0; | |
| 1053 JavaThread* calling_thread = JavaThread::current(); | |
| 1054 if (is_thread_fully_suspended(java_thread, true, &debug_bits)) { | |
| 1055 err = get_current_contended_monitor(calling_thread, java_thread, monitor_ptr); | |
| 1056 } else { | |
| 1057 // get contended monitor information at safepoint. | |
| 1058 VM_GetCurrentContendedMonitor op(this, calling_thread, java_thread, monitor_ptr); | |
| 1059 VMThread::execute(&op); | |
| 1060 err = op.result(); | |
| 1061 } | |
| 1062 return err; | |
| 1063 } /* end GetCurrentContendedMonitor */ | |
| 1064 | |
| 1065 | |
| 1066 // Threads_lock NOT held | |
| 1067 // thread - NOT pre-checked | |
| 1068 // proc - pre-checked for NULL | |
| 1069 // arg - NULL is a valid value, must be checked | |
| 1070 jvmtiError | |
| 1071 JvmtiEnv::RunAgentThread(jthread thread, jvmtiStartFunction proc, const void* arg, jint priority) { | |
| 1072 oop thread_oop = JNIHandles::resolve_external_guard(thread); | |
| 1073 if (thread_oop == NULL || !thread_oop->is_a(SystemDictionary::thread_klass())) { | |
| 1074 return JVMTI_ERROR_INVALID_THREAD; | |
| 1075 } | |
| 1076 if (priority < JVMTI_THREAD_MIN_PRIORITY || priority > JVMTI_THREAD_MAX_PRIORITY) { | |
| 1077 return JVMTI_ERROR_INVALID_PRIORITY; | |
| 1078 } | |
| 1079 | |
| 1080 //Thread-self | |
| 1081 JavaThread* current_thread = JavaThread::current(); | |
| 1082 | |
| 1083 Handle thread_hndl(current_thread, thread_oop); | |
| 1084 { | |
| 1085 MutexLocker mu(Threads_lock); // grab Threads_lock | |
| 1086 | |
| 1087 JvmtiAgentThread *new_thread = new JvmtiAgentThread(this, proc, arg); | |
| 1088 | |
| 1089 // At this point it may be possible that no osthread was created for the | |
| 1090 // JavaThread due to lack of memory. | |
| 1091 if (new_thread == NULL || new_thread->osthread() == NULL) { | |
| 1092 if (new_thread) delete new_thread; | |
| 1093 return JVMTI_ERROR_OUT_OF_MEMORY; | |
| 1094 } | |
| 1095 | |
| 1096 java_lang_Thread::set_thread(thread_hndl(), new_thread); | |
| 1097 java_lang_Thread::set_priority(thread_hndl(), (ThreadPriority)priority); | |
| 1098 java_lang_Thread::set_daemon(thread_hndl()); | |
| 1099 | |
| 1100 new_thread->set_threadObj(thread_hndl()); | |
| 1101 Threads::add(new_thread); | |
| 1102 Thread::start(new_thread); | |
| 1103 } // unlock Threads_lock | |
| 1104 | |
| 1105 return JVMTI_ERROR_NONE; | |
| 1106 } /* end RunAgentThread */ | |
| 1107 | |
| 1108 // | |
| 1109 // Thread Group functions | |
| 1110 // | |
| 1111 | |
| 1112 // group_count_ptr - pre-checked for NULL | |
| 1113 // groups_ptr - pre-checked for NULL | |
| 1114 jvmtiError | |
| 1115 JvmtiEnv::GetTopThreadGroups(jint* group_count_ptr, jthreadGroup** groups_ptr) { | |
| 1116 JavaThread* current_thread = JavaThread::current(); | |
| 1117 | |
| 1118 // Only one top level thread group now. | |
| 1119 *group_count_ptr = 1; | |
| 1120 | |
| 1121 // Allocate memory to store global-refs to the thread groups. | |
| 1122 // Assume this area is freed by caller. | |
| 1123 *groups_ptr = (jthreadGroup *) jvmtiMalloc((sizeof(jthreadGroup)) * (*group_count_ptr)); | |
| 1124 | |
| 1125 NULL_CHECK(*groups_ptr, JVMTI_ERROR_OUT_OF_MEMORY); | |
| 1126 | |
| 1127 // Convert oop to Handle, then convert Handle to global-ref. | |
| 1128 { | |
| 1129 HandleMark hm(current_thread); | |
| 1130 Handle system_thread_group(current_thread, Universe::system_thread_group()); | |
| 1131 *groups_ptr[0] = jni_reference(system_thread_group); | |
| 1132 } | |
| 1133 | |
| 1134 return JVMTI_ERROR_NONE; | |
| 1135 } /* end GetTopThreadGroups */ | |
| 1136 | |
| 1137 | |
| 1138 // info_ptr - pre-checked for NULL | |
| 1139 jvmtiError | |
| 1140 JvmtiEnv::GetThreadGroupInfo(jthreadGroup group, jvmtiThreadGroupInfo* info_ptr) { | |
| 1141 ResourceMark rm; | |
| 1142 HandleMark hm; | |
| 1143 | |
| 1144 JavaThread* current_thread = JavaThread::current(); | |
| 1145 | |
| 1146 Handle group_obj (current_thread, JNIHandles::resolve_external_guard(group)); | |
| 1147 NULL_CHECK(group_obj(), JVMTI_ERROR_INVALID_THREAD_GROUP); | |
| 1148 | |
| 1149 typeArrayHandle name; | |
| 1150 Handle parent_group; | |
| 1151 bool is_daemon; | |
| 1152 ThreadPriority max_priority; | |
| 1153 | |
| 1154 { MutexLocker mu(Threads_lock); | |
| 1155 | |
| 1156 name = typeArrayHandle(current_thread, | |
| 1157 java_lang_ThreadGroup::name(group_obj())); | |
| 1158 parent_group = Handle(current_thread, java_lang_ThreadGroup::parent(group_obj())); | |
| 1159 is_daemon = java_lang_ThreadGroup::is_daemon(group_obj()); | |
| 1160 max_priority = java_lang_ThreadGroup::maxPriority(group_obj()); | |
| 1161 } | |
| 1162 | |
| 1163 info_ptr->is_daemon = is_daemon; | |
| 1164 info_ptr->max_priority = max_priority; | |
| 1165 info_ptr->parent = jni_reference(parent_group); | |
| 1166 | |
| 1167 if (name() != NULL) { | |
| 1168 const char* n = UNICODE::as_utf8((jchar*) name->base(T_CHAR), name->length()); | |
| 1169 info_ptr->name = (char *)jvmtiMalloc(strlen(n)+1); | |
| 1170 NULL_CHECK(info_ptr->name, JVMTI_ERROR_OUT_OF_MEMORY); | |
| 1171 strcpy(info_ptr->name, n); | |
| 1172 } else { | |
| 1173 info_ptr->name = NULL; | |
| 1174 } | |
| 1175 | |
| 1176 return JVMTI_ERROR_NONE; | |
| 1177 } /* end GetThreadGroupInfo */ | |
| 1178 | |
| 1179 | |
| 1180 // thread_count_ptr - pre-checked for NULL | |
| 1181 // threads_ptr - pre-checked for NULL | |
| 1182 // group_count_ptr - pre-checked for NULL | |
| 1183 // groups_ptr - pre-checked for NULL | |
| 1184 jvmtiError | |
| 1185 JvmtiEnv::GetThreadGroupChildren(jthreadGroup group, jint* thread_count_ptr, jthread** threads_ptr, jint* group_count_ptr, jthreadGroup** groups_ptr) { | |
| 1186 JavaThread* current_thread = JavaThread::current(); | |
| 1187 oop group_obj = (oop) JNIHandles::resolve_external_guard(group); | |
| 1188 NULL_CHECK(group_obj, JVMTI_ERROR_INVALID_THREAD_GROUP); | |
| 1189 | |
| 1190 Handle *thread_objs = NULL; | |
| 1191 Handle *group_objs = NULL; | |
| 1192 int nthreads = 0; | |
| 1193 int ngroups = 0; | |
| 1194 int hidden_threads = 0; | |
| 1195 | |
| 1196 ResourceMark rm; | |
| 1197 HandleMark hm; | |
| 1198 | |
| 1199 Handle group_hdl(current_thread, group_obj); | |
| 1200 | |
| 1201 { MutexLocker mu(Threads_lock); | |
| 1202 | |
| 1203 nthreads = java_lang_ThreadGroup::nthreads(group_hdl()); | |
| 1204 ngroups = java_lang_ThreadGroup::ngroups(group_hdl()); | |
| 1205 | |
| 1206 if (nthreads > 0) { | |
| 1207 objArrayOop threads = java_lang_ThreadGroup::threads(group_hdl()); | |
| 1208 assert(nthreads <= threads->length(), "too many threads"); | |
| 1209 thread_objs = NEW_RESOURCE_ARRAY(Handle,nthreads); | |
| 1210 for (int i=0, j=0; i<nthreads; i++) { | |
| 1211 oop thread_obj = threads->obj_at(i); | |
| 1212 assert(thread_obj != NULL, "thread_obj is NULL"); | |
| 1213 JavaThread *javathread = java_lang_Thread::thread(thread_obj); | |
| 1214 // Filter out hidden java threads. | |
| 1215 if (javathread != NULL && javathread->is_hidden_from_external_view()) { | |
| 1216 hidden_threads++; | |
| 1217 continue; | |
| 1218 } | |
| 1219 thread_objs[j++] = Handle(current_thread, thread_obj); | |
| 1220 } | |
| 1221 nthreads -= hidden_threads; | |
| 1222 } | |
| 1223 if (ngroups > 0) { | |
| 1224 objArrayOop groups = java_lang_ThreadGroup::groups(group_hdl()); | |
| 1225 assert(ngroups <= groups->length(), "too many threads"); | |
| 1226 group_objs = NEW_RESOURCE_ARRAY(Handle,ngroups); | |
| 1227 for (int i=0; i<ngroups; i++) { | |
| 1228 oop group_obj = groups->obj_at(i); | |
| 1229 assert(group_obj != NULL, "group_obj != NULL"); | |
| 1230 group_objs[i] = Handle(current_thread, group_obj); | |
| 1231 } | |
| 1232 } | |
| 1233 } | |
| 1234 | |
| 1235 // have to make global handles outside of Threads_lock | |
| 1236 *group_count_ptr = ngroups; | |
| 1237 *thread_count_ptr = nthreads; | |
| 1238 *threads_ptr = new_jthreadArray(nthreads, thread_objs); | |
| 1239 *groups_ptr = new_jthreadGroupArray(ngroups, group_objs); | |
| 1240 if ((nthreads > 0) && (*threads_ptr == NULL)) { | |
| 1241 return JVMTI_ERROR_OUT_OF_MEMORY; | |
| 1242 } | |
| 1243 if ((ngroups > 0) && (*groups_ptr == NULL)) { | |
| 1244 return JVMTI_ERROR_OUT_OF_MEMORY; | |
| 1245 } | |
| 1246 | |
| 1247 return JVMTI_ERROR_NONE; | |
| 1248 } /* end GetThreadGroupChildren */ | |
| 1249 | |
| 1250 | |
| 1251 // | |
| 1252 // Stack Frame functions | |
| 1253 // | |
| 1254 | |
| 1255 // Threads_lock NOT held, java_thread not protected by lock | |
| 1256 // java_thread - pre-checked | |
| 1257 // max_frame_count - pre-checked to be greater than or equal to 0 | |
| 1258 // frame_buffer - pre-checked for NULL | |
| 1259 // count_ptr - pre-checked for NULL | |
| 1260 jvmtiError | |
| 1261 JvmtiEnv::GetStackTrace(JavaThread* java_thread, jint start_depth, jint max_frame_count, jvmtiFrameInfo* frame_buffer, jint* count_ptr) { | |
| 1262 jvmtiError err = JVMTI_ERROR_NONE; | |
| 1263 uint32_t debug_bits = 0; | |
| 1264 if (is_thread_fully_suspended(java_thread, true, &debug_bits)) { | |
| 1265 err = get_stack_trace(java_thread, start_depth, max_frame_count, frame_buffer, count_ptr); | |
| 1266 } else { | |
| 1267 // JVMTI get stack trace at safepoint. Do not require target thread to | |
| 1268 // be suspended. | |
| 1269 VM_GetStackTrace op(this, java_thread, start_depth, max_frame_count, frame_buffer, count_ptr); | |
| 1270 VMThread::execute(&op); | |
| 1271 err = op.result(); | |
| 1272 } | |
| 1273 | |
| 1274 return err; | |
| 1275 } /* end GetStackTrace */ | |
| 1276 | |
| 1277 | |
| 1278 // max_frame_count - pre-checked to be greater than or equal to 0 | |
| 1279 // stack_info_ptr - pre-checked for NULL | |
| 1280 // thread_count_ptr - pre-checked for NULL | |
| 1281 jvmtiError | |
| 1282 JvmtiEnv::GetAllStackTraces(jint max_frame_count, jvmtiStackInfo** stack_info_ptr, jint* thread_count_ptr) { | |
| 1283 jvmtiError err = JVMTI_ERROR_NONE; | |
| 1284 JavaThread* calling_thread = JavaThread::current(); | |
| 1285 | |
| 1286 // JVMTI get stack traces at safepoint. | |
| 1287 VM_GetAllStackTraces op(this, calling_thread, max_frame_count); | |
| 1288 VMThread::execute(&op); | |
| 1289 *thread_count_ptr = op.final_thread_count(); | |
| 1290 *stack_info_ptr = op.stack_info(); | |
| 1291 err = op.result(); | |
| 1292 return err; | |
| 1293 } /* end GetAllStackTraces */ | |
| 1294 | |
| 1295 | |
| 1296 // thread_count - pre-checked to be greater than or equal to 0 | |
| 1297 // thread_list - pre-checked for NULL | |
| 1298 // max_frame_count - pre-checked to be greater than or equal to 0 | |
| 1299 // stack_info_ptr - pre-checked for NULL | |
| 1300 jvmtiError | |
| 1301 JvmtiEnv::GetThreadListStackTraces(jint thread_count, const jthread* thread_list, jint max_frame_count, jvmtiStackInfo** stack_info_ptr) { | |
| 1302 jvmtiError err = JVMTI_ERROR_NONE; | |
| 1303 // JVMTI get stack traces at safepoint. | |
| 1304 VM_GetThreadListStackTraces op(this, thread_count, thread_list, max_frame_count); | |
| 1305 VMThread::execute(&op); | |
| 1306 err = op.result(); | |
| 1307 if (err == JVMTI_ERROR_NONE) { | |
| 1308 *stack_info_ptr = op.stack_info(); | |
| 1309 } | |
| 1310 return err; | |
| 1311 } /* end GetThreadListStackTraces */ | |
| 1312 | |
| 1313 | |
| 1314 // Threads_lock NOT held, java_thread not protected by lock | |
| 1315 // java_thread - pre-checked | |
| 1316 // count_ptr - pre-checked for NULL | |
| 1317 jvmtiError | |
| 1318 JvmtiEnv::GetFrameCount(JavaThread* java_thread, jint* count_ptr) { | |
| 1319 jvmtiError err = JVMTI_ERROR_NONE; | |
| 1320 | |
| 1321 // retrieve or create JvmtiThreadState. | |
| 1322 JvmtiThreadState* state = JvmtiThreadState::state_for(java_thread); | |
| 1323 uint32_t debug_bits = 0; | |
| 1324 if (is_thread_fully_suspended(java_thread, true, &debug_bits)) { | |
| 1325 err = get_frame_count(state, count_ptr); | |
| 1326 } else { | |
| 1327 // get java stack frame count at safepoint. | |
| 1328 VM_GetFrameCount op(this, state, count_ptr); | |
| 1329 VMThread::execute(&op); | |
| 1330 err = op.result(); | |
| 1331 } | |
| 1332 return err; | |
| 1333 } /* end GetFrameCount */ | |
| 1334 | |
| 1335 | |
| 1336 // Threads_lock NOT held, java_thread not protected by lock | |
| 1337 // java_thread - pre-checked | |
| 1338 jvmtiError | |
| 1339 JvmtiEnv::PopFrame(JavaThread* java_thread) { | |
| 1340 JavaThread* current_thread = JavaThread::current(); | |
| 1341 HandleMark hm(current_thread); | |
| 1342 uint32_t debug_bits = 0; | |
| 1343 | |
| 1344 // Check if java_thread is fully suspended | |
| 1345 if (!is_thread_fully_suspended(java_thread, true /* wait for suspend completion */, &debug_bits)) { | |
| 1346 return JVMTI_ERROR_THREAD_NOT_SUSPENDED; | |
| 1347 } | |
| 1348 // Check to see if a PopFrame was already in progress | |
| 1349 if (java_thread->popframe_condition() != JavaThread::popframe_inactive) { | |
| 1350 // Probably possible for JVMTI clients to trigger this, but the | |
| 1351 // JPDA backend shouldn't allow this to happen | |
| 1352 return JVMTI_ERROR_INTERNAL; | |
| 1353 } | |
| 1354 | |
| 1355 { | |
| 1356 // Was workaround bug | |
| 1357 // 4812902: popFrame hangs if the method is waiting at a synchronize | |
| 1358 // Catch this condition and return an error to avoid hanging. | |
| 1359 // Now JVMTI spec allows an implementation to bail out with an opaque frame error. | |
| 1360 OSThread* osThread = java_thread->osthread(); | |
| 1361 if (osThread->get_state() == MONITOR_WAIT) { | |
| 1362 return JVMTI_ERROR_OPAQUE_FRAME; | |
| 1363 } | |
| 1364 } | |
| 1365 | |
| 1366 { | |
| 1367 ResourceMark rm(current_thread); | |
| 1368 // Check if there are more than one Java frame in this thread, that the top two frames | |
| 1369 // are Java (not native) frames, and that there is no intervening VM frame | |
| 1370 int frame_count = 0; | |
| 1371 bool is_interpreted[2]; | |
| 1372 intptr_t *frame_sp[2]; | |
| 1373 // The 2-nd arg of constructor is needed to stop iterating at java entry frame. | |
| 1374 for (vframeStream vfs(java_thread, true); !vfs.at_end(); vfs.next()) { | |
| 1375 methodHandle mh(current_thread, vfs.method()); | |
| 1376 if (mh->is_native()) return(JVMTI_ERROR_OPAQUE_FRAME); | |
| 1377 is_interpreted[frame_count] = vfs.is_interpreted_frame(); | |
| 1378 frame_sp[frame_count] = vfs.frame_id(); | |
| 1379 if (++frame_count > 1) break; | |
| 1380 } | |
| 1381 if (frame_count < 2) { | |
| 1382 // We haven't found two adjacent non-native Java frames on the top. | |
| 1383 // There can be two situations here: | |
| 1384 // 1. There are no more java frames | |
| 1385 // 2. Two top java frames are separated by non-java native frames | |
| 1386 if(vframeFor(java_thread, 1) == NULL) { | |
| 1387 return JVMTI_ERROR_NO_MORE_FRAMES; | |
| 1388 } else { | |
| 1389 // Intervening non-java native or VM frames separate java frames. | |
| 1390 // Current implementation does not support this. See bug #5031735. | |
| 1391 // In theory it is possible to pop frames in such cases. | |
| 1392 return JVMTI_ERROR_OPAQUE_FRAME; | |
| 1393 } | |
| 1394 } | |
| 1395 | |
| 1396 // If any of the top 2 frames is a compiled one, need to deoptimize it | |
| 1397 for (int i = 0; i < 2; i++) { | |
| 1398 if (!is_interpreted[i]) { | |
| 1399 VM_DeoptimizeFrame op(java_thread, frame_sp[i]); | |
| 1400 VMThread::execute(&op); | |
| 1401 } | |
| 1402 } | |
| 1403 | |
| 1404 // Update the thread state to reflect that the top frame is popped | |
| 1405 // so that cur_stack_depth is maintained properly and all frameIDs | |
| 1406 // are invalidated. | |
| 1407 // The current frame will be popped later when the suspended thread | |
| 1408 // is resumed and right before returning from VM to Java. | |
| 1409 // (see call_VM_base() in assembler_<cpu>.cpp). | |
| 1410 | |
| 1411 // It's fine to update the thread state here because no JVMTI events | |
| 1412 // shall be posted for this PopFrame. | |
| 1413 | |
| 1414 // retreive or create the state | |
| 1415 JvmtiThreadState* state = JvmtiThreadState::state_for(java_thread); | |
| 1416 | |
| 1417 state->update_for_pop_top_frame(); | |
| 1418 java_thread->set_popframe_condition(JavaThread::popframe_pending_bit); | |
| 1419 // Set pending step flag for this popframe and it is cleared when next | |
| 1420 // step event is posted. | |
| 1421 state->set_pending_step_for_popframe(); | |
| 1422 } | |
| 1423 | |
| 1424 return JVMTI_ERROR_NONE; | |
| 1425 } /* end PopFrame */ | |
| 1426 | |
| 1427 | |
| 1428 // Threads_lock NOT held, java_thread not protected by lock | |
| 1429 // java_thread - pre-checked | |
| 1430 // java_thread - unchecked | |
| 1431 // depth - pre-checked as non-negative | |
| 1432 // method_ptr - pre-checked for NULL | |
| 1433 // location_ptr - pre-checked for NULL | |
| 1434 jvmtiError | |
| 1435 JvmtiEnv::GetFrameLocation(JavaThread* java_thread, jint depth, jmethodID* method_ptr, jlocation* location_ptr) { | |
| 1436 jvmtiError err = JVMTI_ERROR_NONE; | |
| 1437 uint32_t debug_bits = 0; | |
| 1438 | |
| 1439 if (is_thread_fully_suspended(java_thread, true, &debug_bits)) { | |
| 1440 err = get_frame_location(java_thread, depth, method_ptr, location_ptr); | |
| 1441 } else { | |
| 1442 // JVMTI get java stack frame location at safepoint. | |
| 1443 VM_GetFrameLocation op(this, java_thread, depth, method_ptr, location_ptr); | |
| 1444 VMThread::execute(&op); | |
| 1445 err = op.result(); | |
| 1446 } | |
| 1447 return err; | |
| 1448 } /* end GetFrameLocation */ | |
| 1449 | |
| 1450 | |
| 1451 // Threads_lock NOT held, java_thread not protected by lock | |
| 1452 // java_thread - pre-checked | |
| 1453 // java_thread - unchecked | |
| 1454 // depth - pre-checked as non-negative | |
| 1455 jvmtiError | |
| 1456 JvmtiEnv::NotifyFramePop(JavaThread* java_thread, jint depth) { | |
| 1457 ResourceMark rm; | |
| 1458 uint32_t debug_bits = 0; | |
| 1459 | |
| 1460 if (!JvmtiEnv::is_thread_fully_suspended(java_thread, true, &debug_bits)) { | |
| 1461 return JVMTI_ERROR_THREAD_NOT_SUSPENDED; | |
| 1462 } | |
| 1463 | |
| 1464 if (TraceJVMTICalls) { | |
| 1465 JvmtiSuspendControl::print(); | |
| 1466 } | |
| 1467 | |
| 1468 vframe *vf = vframeFor(java_thread, depth); | |
| 1469 if (vf == NULL) { | |
| 1470 return JVMTI_ERROR_NO_MORE_FRAMES; | |
| 1471 } | |
| 1472 | |
| 1473 if (!vf->is_java_frame() || ((javaVFrame*) vf)->method()->is_native()) { | |
| 1474 return JVMTI_ERROR_OPAQUE_FRAME; | |
| 1475 } | |
| 1476 | |
| 1477 assert(vf->frame_pointer() != NULL, "frame pointer mustn't be NULL"); | |
| 1478 | |
| 1479 JvmtiThreadState *state = JvmtiThreadState::state_for(java_thread); | |
| 1480 int frame_number = state->count_frames() - depth; | |
| 1481 state->env_thread_state(this)->set_frame_pop(frame_number); | |
| 1482 | |
| 1483 return JVMTI_ERROR_NONE; | |
| 1484 } /* end NotifyFramePop */ | |
| 1485 | |
| 1486 | |
| 1487 // | |
| 1488 // Force Early Return functions | |
| 1489 // | |
| 1490 | |
| 1491 // Threads_lock NOT held, java_thread not protected by lock | |
| 1492 // java_thread - pre-checked | |
| 1493 jvmtiError | |
| 1494 JvmtiEnv::ForceEarlyReturnObject(JavaThread* java_thread, jobject value) { | |
| 1495 jvalue val; | |
| 1496 val.l = value; | |
| 1497 return force_early_return(java_thread, val, atos); | |
| 1498 } /* end ForceEarlyReturnObject */ | |
| 1499 | |
| 1500 | |
| 1501 // Threads_lock NOT held, java_thread not protected by lock | |
| 1502 // java_thread - pre-checked | |
| 1503 jvmtiError | |
| 1504 JvmtiEnv::ForceEarlyReturnInt(JavaThread* java_thread, jint value) { | |
| 1505 jvalue val; | |
| 1506 val.i = value; | |
| 1507 return force_early_return(java_thread, val, itos); | |
| 1508 } /* end ForceEarlyReturnInt */ | |
| 1509 | |
| 1510 | |
| 1511 // Threads_lock NOT held, java_thread not protected by lock | |
| 1512 // java_thread - pre-checked | |
| 1513 jvmtiError | |
| 1514 JvmtiEnv::ForceEarlyReturnLong(JavaThread* java_thread, jlong value) { | |
| 1515 jvalue val; | |
| 1516 val.j = value; | |
| 1517 return force_early_return(java_thread, val, ltos); | |
| 1518 } /* end ForceEarlyReturnLong */ | |
| 1519 | |
| 1520 | |
| 1521 // Threads_lock NOT held, java_thread not protected by lock | |
| 1522 // java_thread - pre-checked | |
| 1523 jvmtiError | |
| 1524 JvmtiEnv::ForceEarlyReturnFloat(JavaThread* java_thread, jfloat value) { | |
| 1525 jvalue val; | |
| 1526 val.f = value; | |
| 1527 return force_early_return(java_thread, val, ftos); | |
| 1528 } /* end ForceEarlyReturnFloat */ | |
| 1529 | |
| 1530 | |
| 1531 // Threads_lock NOT held, java_thread not protected by lock | |
| 1532 // java_thread - pre-checked | |
| 1533 jvmtiError | |
| 1534 JvmtiEnv::ForceEarlyReturnDouble(JavaThread* java_thread, jdouble value) { | |
| 1535 jvalue val; | |
| 1536 val.d = value; | |
| 1537 return force_early_return(java_thread, val, dtos); | |
| 1538 } /* end ForceEarlyReturnDouble */ | |
| 1539 | |
| 1540 | |
| 1541 // Threads_lock NOT held, java_thread not protected by lock | |
| 1542 // java_thread - pre-checked | |
| 1543 jvmtiError | |
| 1544 JvmtiEnv::ForceEarlyReturnVoid(JavaThread* java_thread) { | |
| 1545 jvalue val; | |
| 1546 val.j = 0L; | |
| 1547 return force_early_return(java_thread, val, vtos); | |
| 1548 } /* end ForceEarlyReturnVoid */ | |
| 1549 | |
| 1550 | |
| 1551 // | |
| 1552 // Heap functions | |
| 1553 // | |
| 1554 | |
| 1555 // klass - NULL is a valid value, must be checked | |
| 1556 // initial_object - NULL is a valid value, must be checked | |
| 1557 // callbacks - pre-checked for NULL | |
| 1558 // user_data - NULL is a valid value, must be checked | |
| 1559 jvmtiError | |
| 1560 JvmtiEnv::FollowReferences(jint heap_filter, jclass klass, jobject initial_object, const jvmtiHeapCallbacks* callbacks, const void* user_data) { | |
| 1561 // check klass if provided | |
| 1562 klassOop k_oop = NULL; | |
| 1563 if (klass != NULL) { | |
| 1564 oop k_mirror = JNIHandles::resolve_external_guard(klass); | |
| 1565 if (k_mirror == NULL) { | |
| 1566 return JVMTI_ERROR_INVALID_CLASS; | |
| 1567 } | |
| 1568 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 1569 return JVMTI_ERROR_NONE; | |
| 1570 } | |
| 1571 k_oop = java_lang_Class::as_klassOop(k_mirror); | |
| 1572 if (k_oop == NULL) { | |
| 1573 return JVMTI_ERROR_INVALID_CLASS; | |
| 1574 } | |
| 1575 } | |
| 1576 | |
| 1577 Thread *thread = Thread::current(); | |
| 1578 HandleMark hm(thread); | |
| 1579 KlassHandle kh (thread, k_oop); | |
| 1580 | |
| 1581 TraceTime t("FollowReferences", TraceJVMTIObjectTagging); | |
| 1582 JvmtiTagMap::tag_map_for(this)->follow_references(heap_filter, kh, initial_object, callbacks, user_data); | |
| 1583 return JVMTI_ERROR_NONE; | |
| 1584 } /* end FollowReferences */ | |
| 1585 | |
| 1586 | |
| 1587 // klass - NULL is a valid value, must be checked | |
| 1588 // callbacks - pre-checked for NULL | |
| 1589 // user_data - NULL is a valid value, must be checked | |
| 1590 jvmtiError | |
| 1591 JvmtiEnv::IterateThroughHeap(jint heap_filter, jclass klass, const jvmtiHeapCallbacks* callbacks, const void* user_data) { | |
| 1592 // check klass if provided | |
| 1593 klassOop k_oop = NULL; | |
| 1594 if (klass != NULL) { | |
| 1595 oop k_mirror = JNIHandles::resolve_external_guard(klass); | |
| 1596 if (k_mirror == NULL) { | |
| 1597 return JVMTI_ERROR_INVALID_CLASS; | |
| 1598 } | |
| 1599 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 1600 return JVMTI_ERROR_NONE; | |
| 1601 } | |
| 1602 k_oop = java_lang_Class::as_klassOop(k_mirror); | |
| 1603 if (k_oop == NULL) { | |
| 1604 return JVMTI_ERROR_INVALID_CLASS; | |
| 1605 } | |
| 1606 } | |
| 1607 | |
| 1608 Thread *thread = Thread::current(); | |
| 1609 HandleMark hm(thread); | |
| 1610 KlassHandle kh (thread, k_oop); | |
| 1611 | |
| 1612 TraceTime t("IterateThroughHeap", TraceJVMTIObjectTagging); | |
| 1613 JvmtiTagMap::tag_map_for(this)->iterate_through_heap(heap_filter, kh, callbacks, user_data); | |
| 1614 return JVMTI_ERROR_NONE; | |
| 1615 } /* end IterateThroughHeap */ | |
| 1616 | |
| 1617 | |
| 1618 // tag_ptr - pre-checked for NULL | |
| 1619 jvmtiError | |
| 1620 JvmtiEnv::GetTag(jobject object, jlong* tag_ptr) { | |
| 1621 oop o = JNIHandles::resolve_external_guard(object); | |
| 1622 NULL_CHECK(o, JVMTI_ERROR_INVALID_OBJECT); | |
| 1623 *tag_ptr = JvmtiTagMap::tag_map_for(this)->get_tag(object); | |
| 1624 return JVMTI_ERROR_NONE; | |
| 1625 } /* end GetTag */ | |
| 1626 | |
| 1627 | |
| 1628 jvmtiError | |
| 1629 JvmtiEnv::SetTag(jobject object, jlong tag) { | |
| 1630 oop o = JNIHandles::resolve_external_guard(object); | |
| 1631 NULL_CHECK(o, JVMTI_ERROR_INVALID_OBJECT); | |
| 1632 JvmtiTagMap::tag_map_for(this)->set_tag(object, tag); | |
| 1633 return JVMTI_ERROR_NONE; | |
| 1634 } /* end SetTag */ | |
| 1635 | |
| 1636 | |
| 1637 // tag_count - pre-checked to be greater than or equal to 0 | |
| 1638 // tags - pre-checked for NULL | |
| 1639 // count_ptr - pre-checked for NULL | |
| 1640 // object_result_ptr - NULL is a valid value, must be checked | |
| 1641 // tag_result_ptr - NULL is a valid value, must be checked | |
| 1642 jvmtiError | |
| 1643 JvmtiEnv::GetObjectsWithTags(jint tag_count, const jlong* tags, jint* count_ptr, jobject** object_result_ptr, jlong** tag_result_ptr) { | |
| 1644 TraceTime t("GetObjectsWithTags", TraceJVMTIObjectTagging); | |
| 1645 return JvmtiTagMap::tag_map_for(this)->get_objects_with_tags((jlong*)tags, tag_count, count_ptr, object_result_ptr, tag_result_ptr); | |
| 1646 } /* end GetObjectsWithTags */ | |
| 1647 | |
| 1648 | |
| 1649 jvmtiError | |
| 1650 JvmtiEnv::ForceGarbageCollection() { | |
| 1651 Universe::heap()->collect(GCCause::_jvmti_force_gc); | |
| 1652 return JVMTI_ERROR_NONE; | |
| 1653 } /* end ForceGarbageCollection */ | |
| 1654 | |
| 1655 | |
| 1656 // | |
| 1657 // Heap (1.0) functions | |
| 1658 // | |
| 1659 | |
| 1660 // object_reference_callback - pre-checked for NULL | |
| 1661 // user_data - NULL is a valid value, must be checked | |
| 1662 jvmtiError | |
| 1663 JvmtiEnv::IterateOverObjectsReachableFromObject(jobject object, jvmtiObjectReferenceCallback object_reference_callback, const void* user_data) { | |
| 1664 oop o = JNIHandles::resolve_external_guard(object); | |
| 1665 NULL_CHECK(o, JVMTI_ERROR_INVALID_OBJECT); | |
| 1666 JvmtiTagMap::tag_map_for(this)->iterate_over_objects_reachable_from_object(object, object_reference_callback, user_data); | |
| 1667 return JVMTI_ERROR_NONE; | |
| 1668 } /* end IterateOverObjectsReachableFromObject */ | |
| 1669 | |
| 1670 | |
| 1671 // heap_root_callback - NULL is a valid value, must be checked | |
| 1672 // stack_ref_callback - NULL is a valid value, must be checked | |
| 1673 // object_ref_callback - NULL is a valid value, must be checked | |
| 1674 // user_data - NULL is a valid value, must be checked | |
| 1675 jvmtiError | |
| 1676 JvmtiEnv::IterateOverReachableObjects(jvmtiHeapRootCallback heap_root_callback, jvmtiStackReferenceCallback stack_ref_callback, jvmtiObjectReferenceCallback object_ref_callback, const void* user_data) { | |
| 1677 TraceTime t("IterateOverReachableObjects", TraceJVMTIObjectTagging); | |
| 1678 JvmtiTagMap::tag_map_for(this)->iterate_over_reachable_objects(heap_root_callback, stack_ref_callback, object_ref_callback, user_data); | |
| 1679 return JVMTI_ERROR_NONE; | |
| 1680 } /* end IterateOverReachableObjects */ | |
| 1681 | |
| 1682 | |
| 1683 // heap_object_callback - pre-checked for NULL | |
| 1684 // user_data - NULL is a valid value, must be checked | |
| 1685 jvmtiError | |
| 1686 JvmtiEnv::IterateOverHeap(jvmtiHeapObjectFilter object_filter, jvmtiHeapObjectCallback heap_object_callback, const void* user_data) { | |
| 1687 TraceTime t("IterateOverHeap", TraceJVMTIObjectTagging); | |
| 1688 Thread *thread = Thread::current(); | |
| 1689 HandleMark hm(thread); | |
| 1690 JvmtiTagMap::tag_map_for(this)->iterate_over_heap(object_filter, KlassHandle(), heap_object_callback, user_data); | |
| 1691 return JVMTI_ERROR_NONE; | |
| 1692 } /* end IterateOverHeap */ | |
| 1693 | |
| 1694 | |
| 1695 // k_mirror - may be primitive, this must be checked | |
| 1696 // heap_object_callback - pre-checked for NULL | |
| 1697 // user_data - NULL is a valid value, must be checked | |
| 1698 jvmtiError | |
| 1699 JvmtiEnv::IterateOverInstancesOfClass(oop k_mirror, jvmtiHeapObjectFilter object_filter, jvmtiHeapObjectCallback heap_object_callback, const void* user_data) { | |
| 1700 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 1701 // DO PRIMITIVE CLASS PROCESSING | |
| 1702 return JVMTI_ERROR_NONE; | |
| 1703 } | |
| 1704 klassOop k_oop = java_lang_Class::as_klassOop(k_mirror); | |
| 1705 if (k_oop == NULL) { | |
| 1706 return JVMTI_ERROR_INVALID_CLASS; | |
| 1707 } | |
| 1708 Thread *thread = Thread::current(); | |
| 1709 HandleMark hm(thread); | |
| 1710 KlassHandle klass (thread, k_oop); | |
| 1711 TraceTime t("IterateOverInstancesOfClass", TraceJVMTIObjectTagging); | |
| 1712 JvmtiTagMap::tag_map_for(this)->iterate_over_heap(object_filter, klass, heap_object_callback, user_data); | |
| 1713 return JVMTI_ERROR_NONE; | |
| 1714 } /* end IterateOverInstancesOfClass */ | |
| 1715 | |
| 1716 | |
| 1717 // | |
| 1718 // Local Variable functions | |
| 1719 // | |
| 1720 | |
| 1721 // Threads_lock NOT held, java_thread not protected by lock | |
| 1722 // java_thread - pre-checked | |
| 1723 // java_thread - unchecked | |
| 1724 // depth - pre-checked as non-negative | |
| 1725 // value_ptr - pre-checked for NULL | |
| 1726 jvmtiError | |
| 1727 JvmtiEnv::GetLocalObject(JavaThread* java_thread, jint depth, jint slot, jobject* value_ptr) { | |
| 1728 JavaThread* current_thread = JavaThread::current(); | |
| 1729 // rm object is created to clean up the javaVFrame created in | |
| 1730 // doit_prologue(), but after doit() is finished with it. | |
| 1731 ResourceMark rm(current_thread); | |
| 1732 | |
| 1733 VM_GetOrSetLocal op(java_thread, current_thread, depth, slot); | |
| 1734 VMThread::execute(&op); | |
| 1735 jvmtiError err = op.result(); | |
| 1736 if (err != JVMTI_ERROR_NONE) { | |
| 1737 return err; | |
| 1738 } else { | |
| 1739 *value_ptr = op.value().l; | |
| 1740 return JVMTI_ERROR_NONE; | |
| 1741 } | |
| 1742 } /* end GetLocalObject */ | |
| 1743 | |
| 1744 | |
| 1745 // Threads_lock NOT held, java_thread not protected by lock | |
| 1746 // java_thread - pre-checked | |
| 1747 // java_thread - unchecked | |
| 1748 // depth - pre-checked as non-negative | |
| 1749 // value_ptr - pre-checked for NULL | |
| 1750 jvmtiError | |
| 1751 JvmtiEnv::GetLocalInt(JavaThread* java_thread, jint depth, jint slot, jint* value_ptr) { | |
| 1752 // rm object is created to clean up the javaVFrame created in | |
| 1753 // doit_prologue(), but after doit() is finished with it. | |
| 1754 ResourceMark rm; | |
| 1755 | |
| 1756 VM_GetOrSetLocal op(java_thread, depth, slot, T_INT); | |
| 1757 VMThread::execute(&op); | |
| 1758 *value_ptr = op.value().i; | |
| 1759 return op.result(); | |
| 1760 } /* end GetLocalInt */ | |
| 1761 | |
| 1762 | |
| 1763 // Threads_lock NOT held, java_thread not protected by lock | |
| 1764 // java_thread - pre-checked | |
| 1765 // java_thread - unchecked | |
| 1766 // depth - pre-checked as non-negative | |
| 1767 // value_ptr - pre-checked for NULL | |
| 1768 jvmtiError | |
| 1769 JvmtiEnv::GetLocalLong(JavaThread* java_thread, jint depth, jint slot, jlong* value_ptr) { | |
| 1770 // rm object is created to clean up the javaVFrame created in | |
| 1771 // doit_prologue(), but after doit() is finished with it. | |
| 1772 ResourceMark rm; | |
| 1773 | |
| 1774 VM_GetOrSetLocal op(java_thread, depth, slot, T_LONG); | |
| 1775 VMThread::execute(&op); | |
| 1776 *value_ptr = op.value().j; | |
| 1777 return op.result(); | |
| 1778 } /* end GetLocalLong */ | |
| 1779 | |
| 1780 | |
| 1781 // Threads_lock NOT held, java_thread not protected by lock | |
| 1782 // java_thread - pre-checked | |
| 1783 // java_thread - unchecked | |
| 1784 // depth - pre-checked as non-negative | |
| 1785 // value_ptr - pre-checked for NULL | |
| 1786 jvmtiError | |
| 1787 JvmtiEnv::GetLocalFloat(JavaThread* java_thread, jint depth, jint slot, jfloat* value_ptr) { | |
| 1788 // rm object is created to clean up the javaVFrame created in | |
| 1789 // doit_prologue(), but after doit() is finished with it. | |
| 1790 ResourceMark rm; | |
| 1791 | |
| 1792 VM_GetOrSetLocal op(java_thread, depth, slot, T_FLOAT); | |
| 1793 VMThread::execute(&op); | |
| 1794 *value_ptr = op.value().f; | |
| 1795 return op.result(); | |
| 1796 } /* end GetLocalFloat */ | |
| 1797 | |
| 1798 | |
| 1799 // Threads_lock NOT held, java_thread not protected by lock | |
| 1800 // java_thread - pre-checked | |
| 1801 // java_thread - unchecked | |
| 1802 // depth - pre-checked as non-negative | |
| 1803 // value_ptr - pre-checked for NULL | |
| 1804 jvmtiError | |
| 1805 JvmtiEnv::GetLocalDouble(JavaThread* java_thread, jint depth, jint slot, jdouble* value_ptr) { | |
| 1806 // rm object is created to clean up the javaVFrame created in | |
| 1807 // doit_prologue(), but after doit() is finished with it. | |
| 1808 ResourceMark rm; | |
| 1809 | |
| 1810 VM_GetOrSetLocal op(java_thread, depth, slot, T_DOUBLE); | |
| 1811 VMThread::execute(&op); | |
| 1812 *value_ptr = op.value().d; | |
| 1813 return op.result(); | |
| 1814 } /* end GetLocalDouble */ | |
| 1815 | |
| 1816 | |
| 1817 // Threads_lock NOT held, java_thread not protected by lock | |
| 1818 // java_thread - pre-checked | |
| 1819 // java_thread - unchecked | |
| 1820 // depth - pre-checked as non-negative | |
| 1821 jvmtiError | |
| 1822 JvmtiEnv::SetLocalObject(JavaThread* java_thread, jint depth, jint slot, jobject value) { | |
| 1823 // rm object is created to clean up the javaVFrame created in | |
| 1824 // doit_prologue(), but after doit() is finished with it. | |
| 1825 ResourceMark rm; | |
| 1826 jvalue val; | |
| 1827 val.l = value; | |
| 1828 VM_GetOrSetLocal op(java_thread, depth, slot, T_OBJECT, val); | |
| 1829 VMThread::execute(&op); | |
| 1830 return op.result(); | |
| 1831 } /* end SetLocalObject */ | |
| 1832 | |
| 1833 | |
| 1834 // Threads_lock NOT held, java_thread not protected by lock | |
| 1835 // java_thread - pre-checked | |
| 1836 // java_thread - unchecked | |
| 1837 // depth - pre-checked as non-negative | |
| 1838 jvmtiError | |
| 1839 JvmtiEnv::SetLocalInt(JavaThread* java_thread, jint depth, jint slot, jint value) { | |
| 1840 // rm object is created to clean up the javaVFrame created in | |
| 1841 // doit_prologue(), but after doit() is finished with it. | |
| 1842 ResourceMark rm; | |
| 1843 jvalue val; | |
| 1844 val.i = value; | |
| 1845 VM_GetOrSetLocal op(java_thread, depth, slot, T_INT, val); | |
| 1846 VMThread::execute(&op); | |
| 1847 return op.result(); | |
| 1848 } /* end SetLocalInt */ | |
| 1849 | |
| 1850 | |
| 1851 // Threads_lock NOT held, java_thread not protected by lock | |
| 1852 // java_thread - pre-checked | |
| 1853 // java_thread - unchecked | |
| 1854 // depth - pre-checked as non-negative | |
| 1855 jvmtiError | |
| 1856 JvmtiEnv::SetLocalLong(JavaThread* java_thread, jint depth, jint slot, jlong value) { | |
| 1857 // rm object is created to clean up the javaVFrame created in | |
| 1858 // doit_prologue(), but after doit() is finished with it. | |
| 1859 ResourceMark rm; | |
| 1860 jvalue val; | |
| 1861 val.j = value; | |
| 1862 VM_GetOrSetLocal op(java_thread, depth, slot, T_LONG, val); | |
| 1863 VMThread::execute(&op); | |
| 1864 return op.result(); | |
| 1865 } /* end SetLocalLong */ | |
| 1866 | |
| 1867 | |
| 1868 // Threads_lock NOT held, java_thread not protected by lock | |
| 1869 // java_thread - pre-checked | |
| 1870 // java_thread - unchecked | |
| 1871 // depth - pre-checked as non-negative | |
| 1872 jvmtiError | |
| 1873 JvmtiEnv::SetLocalFloat(JavaThread* java_thread, jint depth, jint slot, jfloat value) { | |
| 1874 // rm object is created to clean up the javaVFrame created in | |
| 1875 // doit_prologue(), but after doit() is finished with it. | |
| 1876 ResourceMark rm; | |
| 1877 jvalue val; | |
| 1878 val.f = value; | |
| 1879 VM_GetOrSetLocal op(java_thread, depth, slot, T_FLOAT, val); | |
| 1880 VMThread::execute(&op); | |
| 1881 return op.result(); | |
| 1882 } /* end SetLocalFloat */ | |
| 1883 | |
| 1884 | |
| 1885 // Threads_lock NOT held, java_thread not protected by lock | |
| 1886 // java_thread - pre-checked | |
| 1887 // java_thread - unchecked | |
| 1888 // depth - pre-checked as non-negative | |
| 1889 jvmtiError | |
| 1890 JvmtiEnv::SetLocalDouble(JavaThread* java_thread, jint depth, jint slot, jdouble value) { | |
| 1891 // rm object is created to clean up the javaVFrame created in | |
| 1892 // doit_prologue(), but after doit() is finished with it. | |
| 1893 ResourceMark rm; | |
| 1894 jvalue val; | |
| 1895 val.d = value; | |
| 1896 VM_GetOrSetLocal op(java_thread, depth, slot, T_DOUBLE, val); | |
| 1897 VMThread::execute(&op); | |
| 1898 return op.result(); | |
| 1899 } /* end SetLocalDouble */ | |
| 1900 | |
| 1901 | |
| 1902 // | |
| 1903 // Breakpoint functions | |
| 1904 // | |
| 1905 | |
| 1906 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 1907 jvmtiError | |
| 1908 JvmtiEnv::SetBreakpoint(methodOop method_oop, jlocation location) { | |
| 1909 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 1910 if (location < 0) { // simple invalid location check first | |
| 1911 return JVMTI_ERROR_INVALID_LOCATION; | |
| 1912 } | |
| 1913 // verify that the breakpoint is not past the end of the method | |
| 1914 if (location >= (jlocation) method_oop->code_size()) { | |
| 1915 return JVMTI_ERROR_INVALID_LOCATION; | |
| 1916 } | |
| 1917 | |
| 1918 ResourceMark rm; | |
| 1919 JvmtiBreakpoint bp(method_oop, location); | |
| 1920 JvmtiBreakpoints& jvmti_breakpoints = JvmtiCurrentBreakpoints::get_jvmti_breakpoints(); | |
| 1921 if (jvmti_breakpoints.set(bp) == JVMTI_ERROR_DUPLICATE) | |
| 1922 return JVMTI_ERROR_DUPLICATE; | |
| 1923 | |
| 1924 if (TraceJVMTICalls) { | |
| 1925 jvmti_breakpoints.print(); | |
| 1926 } | |
| 1927 | |
| 1928 return JVMTI_ERROR_NONE; | |
| 1929 } /* end SetBreakpoint */ | |
| 1930 | |
| 1931 | |
| 1932 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 1933 jvmtiError | |
| 1934 JvmtiEnv::ClearBreakpoint(methodOop method_oop, jlocation location) { | |
| 1935 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 1936 | |
| 1937 if (location < 0) { // simple invalid location check first | |
| 1938 return JVMTI_ERROR_INVALID_LOCATION; | |
| 1939 } | |
| 1940 | |
| 1941 // verify that the breakpoint is not past the end of the method | |
| 1942 if (location >= (jlocation) method_oop->code_size()) { | |
| 1943 return JVMTI_ERROR_INVALID_LOCATION; | |
| 1944 } | |
| 1945 | |
| 1946 JvmtiBreakpoint bp(method_oop, location); | |
| 1947 | |
| 1948 JvmtiBreakpoints& jvmti_breakpoints = JvmtiCurrentBreakpoints::get_jvmti_breakpoints(); | |
| 1949 if (jvmti_breakpoints.clear(bp) == JVMTI_ERROR_NOT_FOUND) | |
| 1950 return JVMTI_ERROR_NOT_FOUND; | |
| 1951 | |
| 1952 if (TraceJVMTICalls) { | |
| 1953 jvmti_breakpoints.print(); | |
| 1954 } | |
| 1955 | |
| 1956 return JVMTI_ERROR_NONE; | |
| 1957 } /* end ClearBreakpoint */ | |
| 1958 | |
| 1959 | |
| 1960 // | |
| 1961 // Watched Field functions | |
| 1962 // | |
| 1963 | |
| 1964 jvmtiError | |
| 1965 JvmtiEnv::SetFieldAccessWatch(fieldDescriptor* fdesc_ptr) { | |
| 1966 // make sure we haven't set this watch before | |
| 1967 if (fdesc_ptr->is_field_access_watched()) return JVMTI_ERROR_DUPLICATE; | |
| 1968 fdesc_ptr->set_is_field_access_watched(true); | |
| 1969 update_klass_field_access_flag(fdesc_ptr); | |
| 1970 | |
| 1971 JvmtiEventController::change_field_watch(JVMTI_EVENT_FIELD_ACCESS, true); | |
| 1972 | |
| 1973 return JVMTI_ERROR_NONE; | |
| 1974 } /* end SetFieldAccessWatch */ | |
| 1975 | |
| 1976 | |
| 1977 jvmtiError | |
| 1978 JvmtiEnv::ClearFieldAccessWatch(fieldDescriptor* fdesc_ptr) { | |
| 1979 // make sure we have a watch to clear | |
| 1980 if (!fdesc_ptr->is_field_access_watched()) return JVMTI_ERROR_NOT_FOUND; | |
| 1981 fdesc_ptr->set_is_field_access_watched(false); | |
| 1982 update_klass_field_access_flag(fdesc_ptr); | |
| 1983 | |
| 1984 JvmtiEventController::change_field_watch(JVMTI_EVENT_FIELD_ACCESS, false); | |
| 1985 | |
| 1986 return JVMTI_ERROR_NONE; | |
| 1987 } /* end ClearFieldAccessWatch */ | |
| 1988 | |
| 1989 | |
| 1990 jvmtiError | |
| 1991 JvmtiEnv::SetFieldModificationWatch(fieldDescriptor* fdesc_ptr) { | |
| 1992 // make sure we haven't set this watch before | |
| 1993 if (fdesc_ptr->is_field_modification_watched()) return JVMTI_ERROR_DUPLICATE; | |
| 1994 fdesc_ptr->set_is_field_modification_watched(true); | |
| 1995 update_klass_field_access_flag(fdesc_ptr); | |
| 1996 | |
| 1997 JvmtiEventController::change_field_watch(JVMTI_EVENT_FIELD_MODIFICATION, true); | |
| 1998 | |
| 1999 return JVMTI_ERROR_NONE; | |
| 2000 } /* end SetFieldModificationWatch */ | |
| 2001 | |
| 2002 | |
| 2003 jvmtiError | |
| 2004 JvmtiEnv::ClearFieldModificationWatch(fieldDescriptor* fdesc_ptr) { | |
| 2005 // make sure we have a watch to clear | |
| 2006 if (!fdesc_ptr->is_field_modification_watched()) return JVMTI_ERROR_NOT_FOUND; | |
| 2007 fdesc_ptr->set_is_field_modification_watched(false); | |
| 2008 update_klass_field_access_flag(fdesc_ptr); | |
| 2009 | |
| 2010 JvmtiEventController::change_field_watch(JVMTI_EVENT_FIELD_MODIFICATION, false); | |
| 2011 | |
| 2012 return JVMTI_ERROR_NONE; | |
| 2013 } /* end ClearFieldModificationWatch */ | |
| 2014 | |
| 2015 // | |
| 2016 // Class functions | |
| 2017 // | |
| 2018 | |
| 2019 | |
| 2020 // k_mirror - may be primitive, this must be checked | |
| 2021 // signature_ptr - NULL is a valid value, must be checked | |
| 2022 // generic_ptr - NULL is a valid value, must be checked | |
| 2023 jvmtiError | |
| 2024 JvmtiEnv::GetClassSignature(oop k_mirror, char** signature_ptr, char** generic_ptr) { | |
| 2025 ResourceMark rm; | |
| 2026 bool isPrimitive = java_lang_Class::is_primitive(k_mirror); | |
| 2027 klassOop k = NULL; | |
| 2028 if (!isPrimitive) { | |
| 2029 k = java_lang_Class::as_klassOop(k_mirror); | |
| 2030 NULL_CHECK(k, JVMTI_ERROR_INVALID_CLASS); | |
| 2031 } | |
| 2032 if (signature_ptr != NULL) { | |
| 2033 char* result = NULL; | |
| 2034 if (isPrimitive) { | |
| 2035 char tchar = type2char(java_lang_Class::primitive_type(k_mirror)); | |
| 2036 result = (char*) jvmtiMalloc(2); | |
| 2037 result[0] = tchar; | |
| 2038 result[1] = '\0'; | |
| 2039 } else { | |
| 2040 const char* class_sig = Klass::cast(k)->signature_name(); | |
| 2041 result = (char *) jvmtiMalloc(strlen(class_sig)+1); | |
| 2042 strcpy(result, class_sig); | |
| 2043 } | |
| 2044 *signature_ptr = result; | |
| 2045 } | |
| 2046 if (generic_ptr != NULL) { | |
| 2047 *generic_ptr = NULL; | |
| 2048 if (!isPrimitive && Klass::cast(k)->oop_is_instance()) { | |
| 2049 symbolOop soo = instanceKlass::cast(k)->generic_signature(); | |
| 2050 if (soo != NULL) { | |
| 2051 const char *gen_sig = soo->as_C_string(); | |
| 2052 if (gen_sig != NULL) { | |
| 2053 char* gen_result; | |
| 2054 jvmtiError err = allocate(strlen(gen_sig) + 1, | |
| 2055 (unsigned char **)&gen_result); | |
| 2056 if (err != JVMTI_ERROR_NONE) { | |
| 2057 return err; | |
| 2058 } | |
| 2059 strcpy(gen_result, gen_sig); | |
| 2060 *generic_ptr = gen_result; | |
| 2061 } | |
| 2062 } | |
| 2063 } | |
| 2064 } | |
| 2065 return JVMTI_ERROR_NONE; | |
| 2066 } /* end GetClassSignature */ | |
| 2067 | |
| 2068 | |
| 2069 // k_mirror - may be primitive, this must be checked | |
| 2070 // status_ptr - pre-checked for NULL | |
| 2071 jvmtiError | |
| 2072 JvmtiEnv::GetClassStatus(oop k_mirror, jint* status_ptr) { | |
| 2073 jint result = 0; | |
| 2074 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 2075 result |= JVMTI_CLASS_STATUS_PRIMITIVE; | |
| 2076 } else { | |
| 2077 klassOop k = java_lang_Class::as_klassOop(k_mirror); | |
| 2078 NULL_CHECK(k, JVMTI_ERROR_INVALID_CLASS); | |
| 2079 result = Klass::cast(k)->jvmti_class_status(); | |
| 2080 } | |
| 2081 *status_ptr = result; | |
| 2082 | |
| 2083 return JVMTI_ERROR_NONE; | |
| 2084 } /* end GetClassStatus */ | |
| 2085 | |
| 2086 | |
| 2087 // k_mirror - may be primitive, this must be checked | |
| 2088 // source_name_ptr - pre-checked for NULL | |
| 2089 jvmtiError | |
| 2090 JvmtiEnv::GetSourceFileName(oop k_mirror, char** source_name_ptr) { | |
| 2091 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 2092 return JVMTI_ERROR_ABSENT_INFORMATION; | |
| 2093 } | |
| 2094 klassOop k_klass = java_lang_Class::as_klassOop(k_mirror); | |
| 2095 NULL_CHECK(k_klass, JVMTI_ERROR_INVALID_CLASS); | |
| 2096 | |
| 2097 if (!Klass::cast(k_klass)->oop_is_instance()) { | |
| 2098 return JVMTI_ERROR_ABSENT_INFORMATION; | |
| 2099 } | |
| 2100 | |
| 2101 symbolOop sfnOop = instanceKlass::cast(k_klass)->source_file_name(); | |
| 2102 NULL_CHECK(sfnOop, JVMTI_ERROR_ABSENT_INFORMATION); | |
| 2103 { | |
| 2104 JavaThread* current_thread = JavaThread::current(); | |
| 2105 ResourceMark rm(current_thread); | |
| 2106 const char* sfncp = (const char*) sfnOop->as_C_string(); | |
| 2107 *source_name_ptr = (char *) jvmtiMalloc(strlen(sfncp)+1); | |
| 2108 strcpy(*source_name_ptr, sfncp); | |
| 2109 } | |
| 2110 | |
| 2111 return JVMTI_ERROR_NONE; | |
| 2112 } /* end GetSourceFileName */ | |
| 2113 | |
| 2114 | |
| 2115 // k_mirror - may be primitive, this must be checked | |
| 2116 // modifiers_ptr - pre-checked for NULL | |
| 2117 jvmtiError | |
| 2118 JvmtiEnv::GetClassModifiers(oop k_mirror, jint* modifiers_ptr) { | |
| 2119 JavaThread* current_thread = JavaThread::current(); | |
| 2120 jint result = 0; | |
| 2121 if (!java_lang_Class::is_primitive(k_mirror)) { | |
| 2122 klassOop k = java_lang_Class::as_klassOop(k_mirror); | |
| 2123 NULL_CHECK(k, JVMTI_ERROR_INVALID_CLASS); | |
| 2124 assert((Klass::cast(k)->oop_is_instance() || Klass::cast(k)->oop_is_array()), "should be an instance or an array klass"); | |
| 2125 result = Klass::cast(k)->compute_modifier_flags(current_thread); | |
| 2126 JavaThread* THREAD = current_thread; // pass to macros | |
| 2127 if (HAS_PENDING_EXCEPTION) { | |
| 2128 CLEAR_PENDING_EXCEPTION; | |
| 2129 return JVMTI_ERROR_INTERNAL; | |
| 2130 }; | |
| 2131 | |
| 2132 // Reset the deleted ACC_SUPER bit ( deleted in compute_modifier_flags()). | |
| 2133 if(Klass::cast(k)->is_super()) { | |
| 2134 result |= JVM_ACC_SUPER; | |
| 2135 } | |
| 2136 } else { | |
| 2137 result = (JVM_ACC_ABSTRACT | JVM_ACC_FINAL | JVM_ACC_PUBLIC); | |
| 2138 } | |
| 2139 *modifiers_ptr = result; | |
| 2140 | |
| 2141 return JVMTI_ERROR_NONE; | |
| 2142 } /* end GetClassModifiers */ | |
| 2143 | |
| 2144 | |
| 2145 // k_mirror - may be primitive, this must be checked | |
| 2146 // method_count_ptr - pre-checked for NULL | |
| 2147 // methods_ptr - pre-checked for NULL | |
| 2148 jvmtiError | |
| 2149 JvmtiEnv::GetClassMethods(oop k_mirror, jint* method_count_ptr, jmethodID** methods_ptr) { | |
| 2150 JavaThread* current_thread = JavaThread::current(); | |
| 2151 HandleMark hm(current_thread); | |
| 2152 | |
| 2153 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 2154 *method_count_ptr = 0; | |
| 2155 *methods_ptr = (jmethodID*) jvmtiMalloc(0 * sizeof(jmethodID)); | |
| 2156 return JVMTI_ERROR_NONE; | |
| 2157 } | |
| 2158 klassOop k = java_lang_Class::as_klassOop(k_mirror); | |
| 2159 NULL_CHECK(k, JVMTI_ERROR_INVALID_CLASS); | |
| 2160 | |
| 2161 // Return CLASS_NOT_PREPARED error as per JVMTI spec. | |
| 2162 if (!(Klass::cast(k)->jvmti_class_status() & (JVMTI_CLASS_STATUS_PREPARED|JVMTI_CLASS_STATUS_ARRAY) )) { | |
| 2163 return JVMTI_ERROR_CLASS_NOT_PREPARED; | |
| 2164 } | |
| 2165 | |
| 2166 if (!Klass::cast(k)->oop_is_instance()) { | |
| 2167 *method_count_ptr = 0; | |
| 2168 *methods_ptr = (jmethodID*) jvmtiMalloc(0 * sizeof(jmethodID)); | |
| 2169 return JVMTI_ERROR_NONE; | |
| 2170 } | |
| 2171 instanceKlassHandle instanceK_h(current_thread, k); | |
| 2172 // Allocate the result and fill it in | |
| 2173 int result_length = instanceK_h->methods()->length(); | |
| 2174 jmethodID* result_list = (jmethodID*)jvmtiMalloc(result_length * sizeof(jmethodID)); | |
| 2175 int index; | |
| 2176 if (JvmtiExport::can_maintain_original_method_order()) { | |
| 2177 // Use the original method ordering indices stored in the class, so we can emit | |
| 2178 // jmethodIDs in the order they appeared in the class file | |
| 2179 for (index = 0; index < result_length; index++) { | |
| 2180 methodOop m = methodOop(instanceK_h->methods()->obj_at(index)); | |
| 2181 int original_index = instanceK_h->method_ordering()->int_at(index); | |
| 2182 assert(original_index >= 0 && original_index < result_length, "invalid original method index"); | |
| 2183 jmethodID id = m->jmethod_id(); | |
| 2184 result_list[original_index] = id; | |
| 2185 } | |
| 2186 } else { | |
| 2187 // otherwise just copy in any order | |
| 2188 for (index = 0; index < result_length; index++) { | |
| 2189 methodOop m = methodOop(instanceK_h->methods()->obj_at(index)); | |
| 2190 jmethodID id = m->jmethod_id(); | |
| 2191 result_list[index] = id; | |
| 2192 } | |
| 2193 } | |
| 2194 // Fill in return value. | |
| 2195 *method_count_ptr = result_length; | |
| 2196 *methods_ptr = result_list; | |
| 2197 | |
| 2198 return JVMTI_ERROR_NONE; | |
| 2199 } /* end GetClassMethods */ | |
| 2200 | |
| 2201 | |
| 2202 // k_mirror - may be primitive, this must be checked | |
| 2203 // field_count_ptr - pre-checked for NULL | |
| 2204 // fields_ptr - pre-checked for NULL | |
| 2205 jvmtiError | |
| 2206 JvmtiEnv::GetClassFields(oop k_mirror, jint* field_count_ptr, jfieldID** fields_ptr) { | |
| 2207 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 2208 *field_count_ptr = 0; | |
| 2209 *fields_ptr = (jfieldID*) jvmtiMalloc(0 * sizeof(jfieldID)); | |
| 2210 return JVMTI_ERROR_NONE; | |
| 2211 } | |
| 2212 JavaThread* current_thread = JavaThread::current(); | |
| 2213 HandleMark hm(current_thread); | |
| 2214 klassOop k = java_lang_Class::as_klassOop(k_mirror); | |
| 2215 NULL_CHECK(k, JVMTI_ERROR_INVALID_CLASS); | |
| 2216 | |
| 2217 // Return CLASS_NOT_PREPARED error as per JVMTI spec. | |
| 2218 if (!(Klass::cast(k)->jvmti_class_status() & (JVMTI_CLASS_STATUS_PREPARED|JVMTI_CLASS_STATUS_ARRAY) )) { | |
| 2219 return JVMTI_ERROR_CLASS_NOT_PREPARED; | |
| 2220 } | |
| 2221 | |
| 2222 if (!Klass::cast(k)->oop_is_instance()) { | |
| 2223 *field_count_ptr = 0; | |
| 2224 *fields_ptr = (jfieldID*) jvmtiMalloc(0 * sizeof(jfieldID)); | |
| 2225 return JVMTI_ERROR_NONE; | |
| 2226 } | |
| 2227 | |
| 2228 | |
| 2229 instanceKlassHandle instanceK_h(current_thread, k); | |
| 2230 | |
| 2231 int result_count = 0; | |
| 2232 // First, count the fields. | |
| 2233 FilteredFieldStream flds(instanceK_h, true, true); | |
| 2234 result_count = flds.field_count(); | |
| 2235 | |
| 2236 // Allocate the result and fill it in | |
| 2237 jfieldID* result_list = (jfieldID*) jvmtiMalloc(result_count * sizeof(jfieldID)); | |
| 2238 // The JVMTI spec requires fields in the order they occur in the class file, | |
| 2239 // this is the reverse order of what FieldStream hands out. | |
| 2240 int id_index = (result_count - 1); | |
| 2241 | |
| 2242 for (FilteredFieldStream src_st(instanceK_h, true, true); !src_st.eos(); src_st.next()) { | |
| 2243 result_list[id_index--] = jfieldIDWorkaround::to_jfieldID( | |
| 2244 instanceK_h, src_st.offset(), | |
| 2245 src_st.access_flags().is_static()); | |
| 2246 } | |
| 2247 assert(id_index == -1, "just checking"); | |
| 2248 // Fill in the results | |
| 2249 *field_count_ptr = result_count; | |
| 2250 *fields_ptr = result_list; | |
| 2251 | |
| 2252 return JVMTI_ERROR_NONE; | |
| 2253 } /* end GetClassFields */ | |
| 2254 | |
| 2255 | |
| 2256 // k_mirror - may be primitive, this must be checked | |
| 2257 // interface_count_ptr - pre-checked for NULL | |
| 2258 // interfaces_ptr - pre-checked for NULL | |
| 2259 jvmtiError | |
| 2260 JvmtiEnv::GetImplementedInterfaces(oop k_mirror, jint* interface_count_ptr, jclass** interfaces_ptr) { | |
| 2261 { | |
| 2262 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 2263 *interface_count_ptr = 0; | |
| 2264 *interfaces_ptr = (jclass*) jvmtiMalloc(0 * sizeof(jclass)); | |
| 2265 return JVMTI_ERROR_NONE; | |
| 2266 } | |
| 2267 JavaThread* current_thread = JavaThread::current(); | |
| 2268 HandleMark hm(current_thread); | |
| 2269 klassOop k = java_lang_Class::as_klassOop(k_mirror); | |
| 2270 NULL_CHECK(k, JVMTI_ERROR_INVALID_CLASS); | |
| 2271 | |
| 2272 // Return CLASS_NOT_PREPARED error as per JVMTI spec. | |
| 2273 if (!(Klass::cast(k)->jvmti_class_status() & (JVMTI_CLASS_STATUS_PREPARED|JVMTI_CLASS_STATUS_ARRAY) )) | |
| 2274 return JVMTI_ERROR_CLASS_NOT_PREPARED; | |
| 2275 | |
| 2276 if (!Klass::cast(k)->oop_is_instance()) { | |
| 2277 *interface_count_ptr = 0; | |
| 2278 *interfaces_ptr = (jclass*) jvmtiMalloc(0 * sizeof(jclass)); | |
| 2279 return JVMTI_ERROR_NONE; | |
| 2280 } | |
| 2281 | |
| 2282 objArrayHandle interface_list(current_thread, instanceKlass::cast(k)->local_interfaces()); | |
| 2283 const int result_length = (interface_list.is_null() ? 0 : interface_list->length()); | |
| 2284 jclass* result_list = (jclass*) jvmtiMalloc(result_length * sizeof(jclass)); | |
| 2285 for (int i_index = 0; i_index < result_length; i_index += 1) { | |
| 2286 oop oop_at = interface_list->obj_at(i_index); | |
| 2287 assert(oop_at->is_klass(), "interfaces must be klassOops"); | |
| 2288 klassOop klassOop_at = klassOop(oop_at); // ???: is there a better way? | |
| 2289 assert(Klass::cast(klassOop_at)->is_interface(), "interfaces must be interfaces"); | |
| 2290 oop mirror_at = Klass::cast(klassOop_at)->java_mirror(); | |
| 2291 Handle handle_at = Handle(current_thread, mirror_at); | |
| 2292 result_list[i_index] = (jclass) jni_reference(handle_at); | |
| 2293 } | |
| 2294 *interface_count_ptr = result_length; | |
| 2295 *interfaces_ptr = result_list; | |
| 2296 } | |
| 2297 | |
| 2298 return JVMTI_ERROR_NONE; | |
| 2299 } /* end GetImplementedInterfaces */ | |
| 2300 | |
| 2301 | |
| 2302 // k_mirror - may be primitive, this must be checked | |
| 2303 // minor_version_ptr - pre-checked for NULL | |
| 2304 // major_version_ptr - pre-checked for NULL | |
| 2305 jvmtiError | |
| 2306 JvmtiEnv::GetClassVersionNumbers(oop k_mirror, jint* minor_version_ptr, jint* major_version_ptr) { | |
| 2307 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 2308 return JVMTI_ERROR_ABSENT_INFORMATION; | |
| 2309 } | |
| 2310 klassOop k_oop = java_lang_Class::as_klassOop(k_mirror); | |
| 2311 Thread *thread = Thread::current(); | |
| 2312 HandleMark hm(thread); | |
| 2313 KlassHandle klass(thread, k_oop); | |
| 2314 | |
| 2315 jint status = klass->jvmti_class_status(); | |
| 2316 if (status & (JVMTI_CLASS_STATUS_ERROR)) { | |
| 2317 return JVMTI_ERROR_INVALID_CLASS; | |
| 2318 } | |
| 2319 if (status & (JVMTI_CLASS_STATUS_ARRAY)) { | |
| 2320 return JVMTI_ERROR_ABSENT_INFORMATION; | |
| 2321 } | |
| 2322 | |
| 2323 instanceKlassHandle ik(thread, k_oop); | |
| 2324 *minor_version_ptr = ik->minor_version(); | |
| 2325 *major_version_ptr = ik->major_version(); | |
| 2326 | |
| 2327 return JVMTI_ERROR_NONE; | |
| 2328 } /* end GetClassVersionNumbers */ | |
| 2329 | |
| 2330 | |
| 2331 // k_mirror - may be primitive, this must be checked | |
| 2332 // constant_pool_count_ptr - pre-checked for NULL | |
| 2333 // constant_pool_byte_count_ptr - pre-checked for NULL | |
| 2334 // constant_pool_bytes_ptr - pre-checked for NULL | |
| 2335 jvmtiError | |
| 2336 JvmtiEnv::GetConstantPool(oop k_mirror, jint* constant_pool_count_ptr, jint* constant_pool_byte_count_ptr, unsigned char** constant_pool_bytes_ptr) { | |
| 2337 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 2338 return JVMTI_ERROR_ABSENT_INFORMATION; | |
| 2339 } | |
| 2340 | |
| 2341 klassOop k_oop = java_lang_Class::as_klassOop(k_mirror); | |
| 2342 Thread *thread = Thread::current(); | |
| 2343 HandleMark hm(thread); | |
| 2344 ResourceMark rm(thread); | |
| 2345 KlassHandle klass(thread, k_oop); | |
| 2346 | |
| 2347 jint status = klass->jvmti_class_status(); | |
| 2348 if (status & (JVMTI_CLASS_STATUS_ERROR)) { | |
| 2349 return JVMTI_ERROR_INVALID_CLASS; | |
| 2350 } | |
| 2351 if (status & (JVMTI_CLASS_STATUS_ARRAY)) { | |
| 2352 return JVMTI_ERROR_ABSENT_INFORMATION; | |
| 2353 } | |
| 2354 | |
| 2355 instanceKlassHandle ikh(thread, k_oop); | |
| 2356 constantPoolHandle constants(thread, ikh->constants()); | |
| 2357 ObjectLocker ol(constants, thread); // lock constant pool while we query it | |
| 2358 | |
| 2359 JvmtiConstantPoolReconstituter reconstituter(ikh); | |
| 2360 if (reconstituter.get_error() != JVMTI_ERROR_NONE) { | |
| 2361 return reconstituter.get_error(); | |
| 2362 } | |
| 2363 | |
| 2364 unsigned char *cpool_bytes; | |
| 2365 int cpool_size = reconstituter.cpool_size(); | |
| 2366 if (reconstituter.get_error() != JVMTI_ERROR_NONE) { | |
| 2367 return reconstituter.get_error(); | |
| 2368 } | |
| 2369 jvmtiError res = allocate(cpool_size, &cpool_bytes); | |
| 2370 if (res != JVMTI_ERROR_NONE) { | |
| 2371 return res; | |
| 2372 } | |
| 2373 reconstituter.copy_cpool_bytes(cpool_bytes); | |
| 2374 if (reconstituter.get_error() != JVMTI_ERROR_NONE) { | |
| 2375 return reconstituter.get_error(); | |
| 2376 } | |
| 2377 | |
| 2378 *constant_pool_count_ptr = constants->length(); | |
| 2379 *constant_pool_byte_count_ptr = cpool_size; | |
| 2380 *constant_pool_bytes_ptr = cpool_bytes; | |
| 2381 | |
| 2382 return JVMTI_ERROR_NONE; | |
| 2383 } /* end GetConstantPool */ | |
| 2384 | |
| 2385 | |
| 2386 // k_mirror - may be primitive, this must be checked | |
| 2387 // is_interface_ptr - pre-checked for NULL | |
| 2388 jvmtiError | |
| 2389 JvmtiEnv::IsInterface(oop k_mirror, jboolean* is_interface_ptr) { | |
| 2390 { | |
| 2391 bool result = false; | |
| 2392 if (!java_lang_Class::is_primitive(k_mirror)) { | |
| 2393 klassOop k = java_lang_Class::as_klassOop(k_mirror); | |
| 2394 if (k != NULL && Klass::cast(k)->is_interface()) { | |
| 2395 result = true; | |
| 2396 } | |
| 2397 } | |
| 2398 *is_interface_ptr = result; | |
| 2399 } | |
| 2400 | |
| 2401 return JVMTI_ERROR_NONE; | |
| 2402 } /* end IsInterface */ | |
| 2403 | |
| 2404 | |
| 2405 // k_mirror - may be primitive, this must be checked | |
| 2406 // is_array_class_ptr - pre-checked for NULL | |
| 2407 jvmtiError | |
| 2408 JvmtiEnv::IsArrayClass(oop k_mirror, jboolean* is_array_class_ptr) { | |
| 2409 { | |
| 2410 bool result = false; | |
| 2411 if (!java_lang_Class::is_primitive(k_mirror)) { | |
| 2412 klassOop k = java_lang_Class::as_klassOop(k_mirror); | |
| 2413 if (k != NULL && Klass::cast(k)->oop_is_array()) { | |
| 2414 result = true; | |
| 2415 } | |
| 2416 } | |
| 2417 *is_array_class_ptr = result; | |
| 2418 } | |
| 2419 | |
| 2420 return JVMTI_ERROR_NONE; | |
| 2421 } /* end IsArrayClass */ | |
| 2422 | |
| 2423 | |
| 2424 // k_mirror - may be primitive, this must be checked | |
| 2425 // classloader_ptr - pre-checked for NULL | |
| 2426 jvmtiError | |
| 2427 JvmtiEnv::GetClassLoader(oop k_mirror, jobject* classloader_ptr) { | |
| 2428 { | |
| 2429 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 2430 *classloader_ptr = (jclass) jni_reference(Handle()); | |
| 2431 return JVMTI_ERROR_NONE; | |
| 2432 } | |
| 2433 JavaThread* current_thread = JavaThread::current(); | |
| 2434 HandleMark hm(current_thread); | |
| 2435 klassOop k = java_lang_Class::as_klassOop(k_mirror); | |
| 2436 NULL_CHECK(k, JVMTI_ERROR_INVALID_CLASS); | |
| 2437 | |
| 2438 oop result_oop = Klass::cast(k)->class_loader(); | |
| 2439 if (result_oop == NULL) { | |
| 2440 *classloader_ptr = (jclass) jni_reference(Handle()); | |
| 2441 return JVMTI_ERROR_NONE; | |
| 2442 } | |
| 2443 Handle result_handle = Handle(current_thread, result_oop); | |
| 2444 jclass result_jnihandle = (jclass) jni_reference(result_handle); | |
| 2445 *classloader_ptr = result_jnihandle; | |
| 2446 } | |
| 2447 return JVMTI_ERROR_NONE; | |
| 2448 } /* end GetClassLoader */ | |
| 2449 | |
| 2450 | |
| 2451 // k_mirror - may be primitive, this must be checked | |
| 2452 // source_debug_extension_ptr - pre-checked for NULL | |
| 2453 jvmtiError | |
| 2454 JvmtiEnv::GetSourceDebugExtension(oop k_mirror, char** source_debug_extension_ptr) { | |
| 2455 { | |
| 2456 if (java_lang_Class::is_primitive(k_mirror)) { | |
| 2457 return JVMTI_ERROR_ABSENT_INFORMATION; | |
| 2458 } | |
| 2459 klassOop k = java_lang_Class::as_klassOop(k_mirror); | |
| 2460 NULL_CHECK(k, JVMTI_ERROR_INVALID_CLASS); | |
| 2461 if (!Klass::cast(k)->oop_is_instance()) { | |
| 2462 return JVMTI_ERROR_ABSENT_INFORMATION; | |
| 2463 } | |
| 2464 symbolOop sdeOop = instanceKlass::cast(k)->source_debug_extension(); | |
| 2465 NULL_CHECK(sdeOop, JVMTI_ERROR_ABSENT_INFORMATION); | |
| 2466 | |
| 2467 { | |
| 2468 JavaThread* current_thread = JavaThread::current(); | |
| 2469 ResourceMark rm(current_thread); | |
| 2470 const char* sdecp = (const char*) sdeOop->as_C_string(); | |
| 2471 *source_debug_extension_ptr = (char *) jvmtiMalloc(strlen(sdecp)+1); | |
| 2472 strcpy(*source_debug_extension_ptr, sdecp); | |
| 2473 } | |
| 2474 } | |
| 2475 | |
| 2476 return JVMTI_ERROR_NONE; | |
| 2477 } /* end GetSourceDebugExtension */ | |
| 2478 | |
| 2479 // | |
| 2480 // Object functions | |
| 2481 // | |
| 2482 | |
| 2483 // hash_code_ptr - pre-checked for NULL | |
| 2484 jvmtiError | |
| 2485 JvmtiEnv::GetObjectHashCode(jobject object, jint* hash_code_ptr) { | |
| 2486 oop mirror = JNIHandles::resolve_external_guard(object); | |
| 2487 NULL_CHECK(mirror, JVMTI_ERROR_INVALID_OBJECT); | |
| 2488 NULL_CHECK(hash_code_ptr, JVMTI_ERROR_NULL_POINTER); | |
| 2489 | |
| 2490 { | |
| 2491 jint result = (jint) mirror->identity_hash(); | |
| 2492 *hash_code_ptr = result; | |
| 2493 } | |
| 2494 return JVMTI_ERROR_NONE; | |
| 2495 } /* end GetObjectHashCode */ | |
| 2496 | |
| 2497 | |
| 2498 // info_ptr - pre-checked for NULL | |
| 2499 jvmtiError | |
| 2500 JvmtiEnv::GetObjectMonitorUsage(jobject object, jvmtiMonitorUsage* info_ptr) { | |
| 2501 JavaThread* calling_thread = JavaThread::current(); | |
| 2502 jvmtiError err = get_object_monitor_usage(calling_thread, object, info_ptr); | |
| 2503 if (err == JVMTI_ERROR_THREAD_NOT_SUSPENDED) { | |
| 2504 // Some of the critical threads were not suspended. go to a safepoint and try again | |
| 2505 VM_GetObjectMonitorUsage op(this, calling_thread, object, info_ptr); | |
| 2506 VMThread::execute(&op); | |
| 2507 err = op.result(); | |
| 2508 } | |
| 2509 return err; | |
| 2510 } /* end GetObjectMonitorUsage */ | |
| 2511 | |
| 2512 | |
| 2513 // | |
| 2514 // Field functions | |
| 2515 // | |
| 2516 | |
| 2517 // name_ptr - NULL is a valid value, must be checked | |
| 2518 // signature_ptr - NULL is a valid value, must be checked | |
| 2519 // generic_ptr - NULL is a valid value, must be checked | |
| 2520 jvmtiError | |
| 2521 JvmtiEnv::GetFieldName(fieldDescriptor* fdesc_ptr, char** name_ptr, char** signature_ptr, char** generic_ptr) { | |
| 2522 JavaThread* current_thread = JavaThread::current(); | |
| 2523 ResourceMark rm(current_thread); | |
| 2524 if (name_ptr == NULL) { | |
| 2525 // just don't return the name | |
| 2526 } else { | |
| 2527 const char* fieldName = fdesc_ptr->name()->as_C_string(); | |
| 2528 *name_ptr = (char*) jvmtiMalloc(strlen(fieldName) + 1); | |
| 2529 if (*name_ptr == NULL) | |
| 2530 return JVMTI_ERROR_OUT_OF_MEMORY; | |
| 2531 strcpy(*name_ptr, fieldName); | |
| 2532 } | |
| 2533 if (signature_ptr== NULL) { | |
| 2534 // just don't return the signature | |
| 2535 } else { | |
| 2536 const char* fieldSignature = fdesc_ptr->signature()->as_C_string(); | |
| 2537 *signature_ptr = (char*) jvmtiMalloc(strlen(fieldSignature) + 1); | |
| 2538 if (*signature_ptr == NULL) | |
| 2539 return JVMTI_ERROR_OUT_OF_MEMORY; | |
| 2540 strcpy(*signature_ptr, fieldSignature); | |
| 2541 } | |
| 2542 if (generic_ptr != NULL) { | |
| 2543 *generic_ptr = NULL; | |
| 2544 symbolOop soop = fdesc_ptr->generic_signature(); | |
| 2545 if (soop != NULL) { | |
| 2546 const char* gen_sig = soop->as_C_string(); | |
| 2547 if (gen_sig != NULL) { | |
| 2548 jvmtiError err = allocate(strlen(gen_sig) + 1, (unsigned char **)generic_ptr); | |
| 2549 if (err != JVMTI_ERROR_NONE) { | |
| 2550 return err; | |
| 2551 } | |
| 2552 strcpy(*generic_ptr, gen_sig); | |
| 2553 } | |
| 2554 } | |
| 2555 } | |
| 2556 return JVMTI_ERROR_NONE; | |
| 2557 } /* end GetFieldName */ | |
| 2558 | |
| 2559 | |
| 2560 // declaring_class_ptr - pre-checked for NULL | |
| 2561 jvmtiError | |
| 2562 JvmtiEnv::GetFieldDeclaringClass(fieldDescriptor* fdesc_ptr, jclass* declaring_class_ptr) { | |
| 2563 | |
| 2564 *declaring_class_ptr = get_jni_class_non_null(fdesc_ptr->field_holder()); | |
| 2565 return JVMTI_ERROR_NONE; | |
| 2566 } /* end GetFieldDeclaringClass */ | |
| 2567 | |
| 2568 | |
| 2569 // modifiers_ptr - pre-checked for NULL | |
| 2570 jvmtiError | |
| 2571 JvmtiEnv::GetFieldModifiers(fieldDescriptor* fdesc_ptr, jint* modifiers_ptr) { | |
| 2572 | |
| 2573 AccessFlags resultFlags = fdesc_ptr->access_flags(); | |
| 2574 jint result = resultFlags.as_int(); | |
| 2575 *modifiers_ptr = result; | |
| 2576 | |
| 2577 return JVMTI_ERROR_NONE; | |
| 2578 } /* end GetFieldModifiers */ | |
| 2579 | |
| 2580 | |
| 2581 // is_synthetic_ptr - pre-checked for NULL | |
| 2582 jvmtiError | |
| 2583 JvmtiEnv::IsFieldSynthetic(fieldDescriptor* fdesc_ptr, jboolean* is_synthetic_ptr) { | |
| 2584 *is_synthetic_ptr = fdesc_ptr->is_synthetic(); | |
| 2585 return JVMTI_ERROR_NONE; | |
| 2586 } /* end IsFieldSynthetic */ | |
| 2587 | |
| 2588 | |
| 2589 // | |
| 2590 // Method functions | |
| 2591 // | |
| 2592 | |
| 2593 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2594 // name_ptr - NULL is a valid value, must be checked | |
| 2595 // signature_ptr - NULL is a valid value, must be checked | |
| 2596 // generic_ptr - NULL is a valid value, must be checked | |
| 2597 jvmtiError | |
| 2598 JvmtiEnv::GetMethodName(methodOop method_oop, char** name_ptr, char** signature_ptr, char** generic_ptr) { | |
| 2599 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2600 JavaThread* current_thread = JavaThread::current(); | |
| 2601 | |
| 2602 ResourceMark rm(current_thread); // get the utf8 name and signature | |
| 2603 if (name_ptr == NULL) { | |
| 2604 // just don't return the name | |
| 2605 } else { | |
| 2606 const char* utf8_name = (const char *) method_oop->name()->as_utf8(); | |
| 2607 *name_ptr = (char *) jvmtiMalloc(strlen(utf8_name)+1); | |
| 2608 strcpy(*name_ptr, utf8_name); | |
| 2609 } | |
| 2610 if (signature_ptr == NULL) { | |
| 2611 // just don't return the signature | |
| 2612 } else { | |
| 2613 const char* utf8_signature = (const char *) method_oop->signature()->as_utf8(); | |
| 2614 *signature_ptr = (char *) jvmtiMalloc(strlen(utf8_signature) + 1); | |
| 2615 strcpy(*signature_ptr, utf8_signature); | |
| 2616 } | |
| 2617 | |
| 2618 if (generic_ptr != NULL) { | |
| 2619 *generic_ptr = NULL; | |
| 2620 symbolOop soop = method_oop->generic_signature(); | |
| 2621 if (soop != NULL) { | |
| 2622 const char* gen_sig = soop->as_C_string(); | |
| 2623 if (gen_sig != NULL) { | |
| 2624 jvmtiError err = allocate(strlen(gen_sig) + 1, (unsigned char **)generic_ptr); | |
| 2625 if (err != JVMTI_ERROR_NONE) { | |
| 2626 return err; | |
| 2627 } | |
| 2628 strcpy(*generic_ptr, gen_sig); | |
| 2629 } | |
| 2630 } | |
| 2631 } | |
| 2632 return JVMTI_ERROR_NONE; | |
| 2633 } /* end GetMethodName */ | |
| 2634 | |
| 2635 | |
| 2636 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2637 // declaring_class_ptr - pre-checked for NULL | |
| 2638 jvmtiError | |
| 2639 JvmtiEnv::GetMethodDeclaringClass(methodOop method_oop, jclass* declaring_class_ptr) { | |
| 2640 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2641 (*declaring_class_ptr) = get_jni_class_non_null(method_oop->method_holder()); | |
| 2642 return JVMTI_ERROR_NONE; | |
| 2643 } /* end GetMethodDeclaringClass */ | |
| 2644 | |
| 2645 | |
| 2646 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2647 // modifiers_ptr - pre-checked for NULL | |
| 2648 jvmtiError | |
| 2649 JvmtiEnv::GetMethodModifiers(methodOop method_oop, jint* modifiers_ptr) { | |
| 2650 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2651 (*modifiers_ptr) = method_oop->access_flags().as_int() & JVM_RECOGNIZED_METHOD_MODIFIERS; | |
| 2652 return JVMTI_ERROR_NONE; | |
| 2653 } /* end GetMethodModifiers */ | |
| 2654 | |
| 2655 | |
| 2656 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2657 // max_ptr - pre-checked for NULL | |
| 2658 jvmtiError | |
| 2659 JvmtiEnv::GetMaxLocals(methodOop method_oop, jint* max_ptr) { | |
| 2660 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2661 // get max stack | |
| 2662 (*max_ptr) = method_oop->max_locals(); | |
| 2663 return JVMTI_ERROR_NONE; | |
| 2664 } /* end GetMaxLocals */ | |
| 2665 | |
| 2666 | |
| 2667 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2668 // size_ptr - pre-checked for NULL | |
| 2669 jvmtiError | |
| 2670 JvmtiEnv::GetArgumentsSize(methodOop method_oop, jint* size_ptr) { | |
| 2671 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2672 // get size of arguments | |
| 2673 | |
| 2674 (*size_ptr) = method_oop->size_of_parameters(); | |
| 2675 return JVMTI_ERROR_NONE; | |
| 2676 } /* end GetArgumentsSize */ | |
| 2677 | |
| 2678 | |
| 2679 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2680 // entry_count_ptr - pre-checked for NULL | |
| 2681 // table_ptr - pre-checked for NULL | |
| 2682 jvmtiError | |
| 2683 JvmtiEnv::GetLineNumberTable(methodOop method_oop, jint* entry_count_ptr, jvmtiLineNumberEntry** table_ptr) { | |
| 2684 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2685 if (!method_oop->has_linenumber_table()) { | |
| 2686 return (JVMTI_ERROR_ABSENT_INFORMATION); | |
| 2687 } | |
| 2688 | |
| 2689 // The line number table is compressed so we don't know how big it is until decompressed. | |
| 2690 // Decompression is really fast so we just do it twice. | |
| 2691 | |
| 2692 // Compute size of table | |
| 2693 jint num_entries = 0; | |
| 2694 CompressedLineNumberReadStream stream(method_oop->compressed_linenumber_table()); | |
| 2695 while (stream.read_pair()) { | |
| 2696 num_entries++; | |
| 2697 } | |
| 2698 jvmtiLineNumberEntry *jvmti_table = | |
| 2699 (jvmtiLineNumberEntry *)jvmtiMalloc(num_entries * (sizeof(jvmtiLineNumberEntry))); | |
| 2700 | |
| 2701 // Fill jvmti table | |
| 2702 if (num_entries > 0) { | |
| 2703 int index = 0; | |
| 2704 CompressedLineNumberReadStream stream(method_oop->compressed_linenumber_table()); | |
| 2705 while (stream.read_pair()) { | |
| 2706 jvmti_table[index].start_location = (jlocation) stream.bci(); | |
| 2707 jvmti_table[index].line_number = (jint) stream.line(); | |
| 2708 index++; | |
| 2709 } | |
| 2710 assert(index == num_entries, "sanity check"); | |
| 2711 } | |
| 2712 | |
| 2713 // Set up results | |
| 2714 (*entry_count_ptr) = num_entries; | |
| 2715 (*table_ptr) = jvmti_table; | |
| 2716 | |
| 2717 return JVMTI_ERROR_NONE; | |
| 2718 } /* end GetLineNumberTable */ | |
| 2719 | |
| 2720 | |
| 2721 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2722 // start_location_ptr - pre-checked for NULL | |
| 2723 // end_location_ptr - pre-checked for NULL | |
| 2724 jvmtiError | |
| 2725 JvmtiEnv::GetMethodLocation(methodOop method_oop, jlocation* start_location_ptr, jlocation* end_location_ptr) { | |
| 2726 | |
| 2727 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2728 // get start and end location | |
| 2729 (*end_location_ptr) = (jlocation) (method_oop->code_size() - 1); | |
| 2730 if (method_oop->code_size() == 0) { | |
| 2731 // there is no code so there is no start location | |
| 2732 (*start_location_ptr) = (jlocation)(-1); | |
| 2733 } else { | |
| 2734 (*start_location_ptr) = (jlocation)(0); | |
| 2735 } | |
| 2736 | |
| 2737 return JVMTI_ERROR_NONE; | |
| 2738 } /* end GetMethodLocation */ | |
| 2739 | |
| 2740 | |
| 2741 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2742 // entry_count_ptr - pre-checked for NULL | |
| 2743 // table_ptr - pre-checked for NULL | |
| 2744 jvmtiError | |
| 2745 JvmtiEnv::GetLocalVariableTable(methodOop method_oop, jint* entry_count_ptr, jvmtiLocalVariableEntry** table_ptr) { | |
| 2746 | |
| 2747 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2748 JavaThread* current_thread = JavaThread::current(); | |
| 2749 | |
| 2750 // does the klass have any local variable information? | |
| 2751 instanceKlass* ik = instanceKlass::cast(method_oop->method_holder()); | |
| 2752 if (!ik->access_flags().has_localvariable_table()) { | |
| 2753 return (JVMTI_ERROR_ABSENT_INFORMATION); | |
| 2754 } | |
| 2755 | |
| 2756 constantPoolOop constants = method_oop->constants(); | |
| 2757 NULL_CHECK(constants, JVMTI_ERROR_ABSENT_INFORMATION); | |
| 2758 | |
| 2759 // in the vm localvariable table representation, 6 consecutive elements in the table | |
| 2760 // represent a 6-tuple of shorts | |
| 2761 // [start_pc, length, name_index, descriptor_index, signature_index, index] | |
| 2762 jint num_entries = method_oop->localvariable_table_length(); | |
| 2763 jvmtiLocalVariableEntry *jvmti_table = (jvmtiLocalVariableEntry *) | |
| 2764 jvmtiMalloc(num_entries * (sizeof(jvmtiLocalVariableEntry))); | |
| 2765 | |
| 2766 if (num_entries > 0) { | |
| 2767 LocalVariableTableElement* table = method_oop->localvariable_table_start(); | |
| 2768 for (int i = 0; i < num_entries; i++) { | |
| 2769 // get the 5 tuple information from the vm table | |
| 2770 jlocation start_location = (jlocation) table[i].start_bci; | |
| 2771 jint length = (jint) table[i].length; | |
| 2772 int name_index = (int) table[i].name_cp_index; | |
| 2773 int signature_index = (int) table[i].descriptor_cp_index; | |
| 2774 int generic_signature_index = (int) table[i].signature_cp_index; | |
| 2775 jint slot = (jint) table[i].slot; | |
| 2776 | |
| 2777 // get utf8 name and signature | |
| 2778 char *name_buf = NULL; | |
| 2779 char *sig_buf = NULL; | |
| 2780 char *gen_sig_buf = NULL; | |
| 2781 { | |
| 2782 ResourceMark rm(current_thread); | |
| 2783 | |
| 2784 const char *utf8_name = (const char *) constants->symbol_at(name_index)->as_utf8(); | |
| 2785 name_buf = (char *) jvmtiMalloc(strlen(utf8_name)+1); | |
| 2786 strcpy(name_buf, utf8_name); | |
| 2787 | |
| 2788 const char *utf8_signature = (const char *) constants->symbol_at(signature_index)->as_utf8(); | |
| 2789 sig_buf = (char *) jvmtiMalloc(strlen(utf8_signature)+1); | |
| 2790 strcpy(sig_buf, utf8_signature); | |
| 2791 | |
| 2792 if (generic_signature_index > 0) { | |
| 2793 const char *utf8_gen_sign = (const char *) | |
| 2794 constants->symbol_at(generic_signature_index)->as_utf8(); | |
| 2795 gen_sig_buf = (char *) jvmtiMalloc(strlen(utf8_gen_sign)+1); | |
| 2796 strcpy(gen_sig_buf, utf8_gen_sign); | |
| 2797 } | |
| 2798 } | |
| 2799 | |
| 2800 // fill in the jvmti local variable table | |
| 2801 jvmti_table[i].start_location = start_location; | |
| 2802 jvmti_table[i].length = length; | |
| 2803 jvmti_table[i].name = name_buf; | |
| 2804 jvmti_table[i].signature = sig_buf; | |
| 2805 jvmti_table[i].generic_signature = gen_sig_buf; | |
| 2806 jvmti_table[i].slot = slot; | |
| 2807 } | |
| 2808 } | |
| 2809 | |
| 2810 // set results | |
| 2811 (*entry_count_ptr) = num_entries; | |
| 2812 (*table_ptr) = jvmti_table; | |
| 2813 | |
| 2814 return JVMTI_ERROR_NONE; | |
| 2815 } /* end GetLocalVariableTable */ | |
| 2816 | |
| 2817 | |
| 2818 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2819 // bytecode_count_ptr - pre-checked for NULL | |
| 2820 // bytecodes_ptr - pre-checked for NULL | |
| 2821 jvmtiError | |
| 2822 JvmtiEnv::GetBytecodes(methodOop method_oop, jint* bytecode_count_ptr, unsigned char** bytecodes_ptr) { | |
| 2823 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2824 | |
| 2825 HandleMark hm; | |
| 2826 methodHandle method(method_oop); | |
| 2827 jint size = (jint)method->code_size(); | |
| 2828 jvmtiError err = allocate(size, bytecodes_ptr); | |
| 2829 if (err != JVMTI_ERROR_NONE) { | |
| 2830 return err; | |
| 2831 } | |
| 2832 | |
| 2833 (*bytecode_count_ptr) = size; | |
| 2834 // get byte codes | |
| 2835 JvmtiClassFileReconstituter::copy_bytecodes(method, *bytecodes_ptr); | |
| 2836 | |
| 2837 return JVMTI_ERROR_NONE; | |
| 2838 } /* end GetBytecodes */ | |
| 2839 | |
| 2840 | |
| 2841 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2842 // is_native_ptr - pre-checked for NULL | |
| 2843 jvmtiError | |
| 2844 JvmtiEnv::IsMethodNative(methodOop method_oop, jboolean* is_native_ptr) { | |
| 2845 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2846 (*is_native_ptr) = method_oop->is_native(); | |
| 2847 return JVMTI_ERROR_NONE; | |
| 2848 } /* end IsMethodNative */ | |
| 2849 | |
| 2850 | |
| 2851 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2852 // is_synthetic_ptr - pre-checked for NULL | |
| 2853 jvmtiError | |
| 2854 JvmtiEnv::IsMethodSynthetic(methodOop method_oop, jboolean* is_synthetic_ptr) { | |
| 2855 NULL_CHECK(method_oop, JVMTI_ERROR_INVALID_METHODID); | |
| 2856 (*is_synthetic_ptr) = method_oop->is_synthetic(); | |
| 2857 return JVMTI_ERROR_NONE; | |
| 2858 } /* end IsMethodSynthetic */ | |
| 2859 | |
| 2860 | |
| 2861 // method_oop - pre-checked for validity, but may be NULL meaning obsolete method | |
| 2862 // is_obsolete_ptr - pre-checked for NULL | |
| 2863 jvmtiError | |
| 2864 JvmtiEnv::IsMethodObsolete(methodOop method_oop, jboolean* is_obsolete_ptr) { | |
| 1121 | 2865 if (use_version_1_0_semantics() && |
| 2866 get_capabilities()->can_redefine_classes == 0) { | |
| 2867 // This JvmtiEnv requested version 1.0 semantics and this function | |
| 2868 // requires the can_redefine_classes capability in version 1.0 so | |
| 2869 // we need to return an error here. | |
| 2870 return JVMTI_ERROR_MUST_POSSESS_CAPABILITY; | |
| 2871 } | |
| 2872 | |
| 0 | 2873 if (method_oop == NULL || method_oop->is_obsolete()) { |
| 2874 *is_obsolete_ptr = true; | |
| 2875 } else { | |
| 2876 *is_obsolete_ptr = false; | |
| 2877 } | |
| 2878 return JVMTI_ERROR_NONE; | |
| 2879 } /* end IsMethodObsolete */ | |
| 2880 | |
| 2881 // | |
| 2882 // Raw Monitor functions | |
| 2883 // | |
| 2884 | |
| 2885 // name - pre-checked for NULL | |
| 2886 // monitor_ptr - pre-checked for NULL | |
| 2887 jvmtiError | |
| 2888 JvmtiEnv::CreateRawMonitor(const char* name, jrawMonitorID* monitor_ptr) { | |
| 2889 JvmtiRawMonitor* rmonitor = new JvmtiRawMonitor(name); | |
| 2890 NULL_CHECK(rmonitor, JVMTI_ERROR_OUT_OF_MEMORY); | |
| 2891 | |
| 2892 *monitor_ptr = (jrawMonitorID)rmonitor; | |
| 2893 | |
| 2894 return JVMTI_ERROR_NONE; | |
| 2895 } /* end CreateRawMonitor */ | |
| 2896 | |
| 2897 | |
| 2898 // rmonitor - pre-checked for validity | |
| 2899 jvmtiError | |
| 2900 JvmtiEnv::DestroyRawMonitor(JvmtiRawMonitor * rmonitor) { | |
| 2901 if (Threads::number_of_threads() == 0) { | |
| 2902 // Remove this monitor from pending raw monitors list | |
| 2903 // if it has entered in onload or start phase. | |
| 2904 JvmtiPendingMonitors::destroy(rmonitor); | |
| 2905 } else { | |
| 2906 Thread* thread = Thread::current(); | |
| 2907 if (rmonitor->is_entered(thread)) { | |
| 2908 // The caller owns this monitor which we are about to destroy. | |
| 2909 // We exit the underlying synchronization object so that the | |
| 2910 // "delete monitor" call below can work without an assertion | |
| 2911 // failure on systems that don't like destroying synchronization | |
| 2912 // objects that are locked. | |
| 2913 int r; | |
| 2914 intptr_t recursion = rmonitor->recursions(); | |
| 2915 for (intptr_t i=0; i <= recursion; i++) { | |
| 2916 r = rmonitor->raw_exit(thread); | |
| 2917 assert(r == ObjectMonitor::OM_OK, "raw_exit should have worked"); | |
| 2918 if (r != ObjectMonitor::OM_OK) { // robustness | |
| 2919 return JVMTI_ERROR_INTERNAL; | |
| 2920 } | |
| 2921 } | |
| 2922 } | |
| 2923 if (rmonitor->owner() != NULL) { | |
| 2924 // The caller is trying to destroy a monitor that is locked by | |
| 2925 // someone else. While this is not forbidden by the JVMTI | |
| 2926 // spec, it will cause an assertion failure on systems that don't | |
| 2927 // like destroying synchronization objects that are locked. | |
| 2928 // We indicate a problem with the error return (and leak the | |
| 2929 // monitor's memory). | |
| 2930 return JVMTI_ERROR_NOT_MONITOR_OWNER; | |
| 2931 } | |
| 2932 } | |
| 2933 | |
| 2934 delete rmonitor; | |
| 2935 | |
| 2936 return JVMTI_ERROR_NONE; | |
| 2937 } /* end DestroyRawMonitor */ | |
| 2938 | |
| 2939 | |
| 2940 // rmonitor - pre-checked for validity | |
| 2941 jvmtiError | |
| 2942 JvmtiEnv::RawMonitorEnter(JvmtiRawMonitor * rmonitor) { | |
| 2943 if (Threads::number_of_threads() == 0) { | |
| 2944 // No JavaThreads exist so ObjectMonitor enter cannot be | |
| 2945 // used, add this raw monitor to the pending list. | |
| 2946 // The pending monitors will be actually entered when | |
| 2947 // the VM is setup. | |
| 2948 // See transition_pending_raw_monitors in create_vm() | |
| 2949 // in thread.cpp. | |
| 2950 JvmtiPendingMonitors::enter(rmonitor); | |
| 2951 } else { | |
| 2952 int r; | |
| 2953 Thread* thread = Thread::current(); | |
| 2954 | |
| 2955 if (thread->is_Java_thread()) { | |
| 2956 JavaThread* current_thread = (JavaThread*)thread; | |
| 2957 | |
| 2958 #ifdef PROPER_TRANSITIONS | |
| 2959 // Not really unknown but ThreadInVMfromNative does more than we want | |
| 2960 ThreadInVMfromUnknown __tiv; | |
| 2961 { | |
| 2962 ThreadBlockInVM __tbivm(current_thread); | |
| 2963 r = rmonitor->raw_enter(current_thread); | |
| 2964 } | |
| 2965 #else | |
| 2966 /* Transition to thread_blocked without entering vm state */ | |
| 2967 /* This is really evil. Normally you can't undo _thread_blocked */ | |
| 2968 /* transitions like this because it would cause us to miss a */ | |
| 2969 /* safepoint but since the thread was already in _thread_in_native */ | |
| 2970 /* the thread is not leaving a safepoint safe state and it will */ | |
| 2971 /* block when it tries to return from native. We can't safepoint */ | |
| 2972 /* block in here because we could deadlock the vmthread. Blech. */ | |
| 2973 | |
| 2974 JavaThreadState state = current_thread->thread_state(); | |
| 2975 assert(state == _thread_in_native, "Must be _thread_in_native"); | |
| 2976 // frame should already be walkable since we are in native | |
| 2977 assert(!current_thread->has_last_Java_frame() || | |
| 2978 current_thread->frame_anchor()->walkable(), "Must be walkable"); | |
| 2979 current_thread->set_thread_state(_thread_blocked); | |
| 2980 | |
| 2981 r = rmonitor->raw_enter(current_thread); | |
| 2982 // restore state, still at a safepoint safe state | |
| 2983 current_thread->set_thread_state(state); | |
| 2984 | |
| 2985 #endif /* PROPER_TRANSITIONS */ | |
| 2986 assert(r == ObjectMonitor::OM_OK, "raw_enter should have worked"); | |
| 2987 } else { | |
| 2988 if (thread->is_VM_thread() || thread->is_ConcurrentGC_thread()) { | |
| 2989 r = rmonitor->raw_enter(thread); | |
| 2990 } else { | |
| 2991 ShouldNotReachHere(); | |
| 2992 } | |
| 2993 } | |
| 2994 | |
| 2995 if (r != ObjectMonitor::OM_OK) { // robustness | |
| 2996 return JVMTI_ERROR_INTERNAL; | |
| 2997 } | |
| 2998 } | |
| 2999 return JVMTI_ERROR_NONE; | |
| 3000 } /* end RawMonitorEnter */ | |
| 3001 | |
| 3002 | |
| 3003 // rmonitor - pre-checked for validity | |
| 3004 jvmtiError | |
| 3005 JvmtiEnv::RawMonitorExit(JvmtiRawMonitor * rmonitor) { | |
| 3006 jvmtiError err = JVMTI_ERROR_NONE; | |
| 3007 | |
| 3008 if (Threads::number_of_threads() == 0) { | |
| 3009 // No JavaThreads exist so just remove this monitor from the pending list. | |
| 3010 // Bool value from exit is false if rmonitor is not in the list. | |
| 3011 if (!JvmtiPendingMonitors::exit(rmonitor)) { | |
| 3012 err = JVMTI_ERROR_NOT_MONITOR_OWNER; | |
| 3013 } | |
| 3014 } else { | |
| 3015 int r; | |
| 3016 Thread* thread = Thread::current(); | |
| 3017 | |
| 3018 if (thread->is_Java_thread()) { | |
| 3019 JavaThread* current_thread = (JavaThread*)thread; | |
| 3020 #ifdef PROPER_TRANSITIONS | |
| 3021 // Not really unknown but ThreadInVMfromNative does more than we want | |
| 3022 ThreadInVMfromUnknown __tiv; | |
| 3023 #endif /* PROPER_TRANSITIONS */ | |
| 3024 r = rmonitor->raw_exit(current_thread); | |
| 3025 } else { | |
| 3026 if (thread->is_VM_thread() || thread->is_ConcurrentGC_thread()) { | |
| 3027 r = rmonitor->raw_exit(thread); | |
| 3028 } else { | |
| 3029 ShouldNotReachHere(); | |
| 3030 } | |
| 3031 } | |
| 3032 | |
| 3033 if (r == ObjectMonitor::OM_ILLEGAL_MONITOR_STATE) { | |
| 3034 err = JVMTI_ERROR_NOT_MONITOR_OWNER; | |
| 3035 } else { | |
| 3036 assert(r == ObjectMonitor::OM_OK, "raw_exit should have worked"); | |
| 3037 if (r != ObjectMonitor::OM_OK) { // robustness | |
| 3038 err = JVMTI_ERROR_INTERNAL; | |
| 3039 } | |
| 3040 } | |
| 3041 } | |
| 3042 return err; | |
| 3043 } /* end RawMonitorExit */ | |
| 3044 | |
| 3045 | |
| 3046 // rmonitor - pre-checked for validity | |
| 3047 jvmtiError | |
| 3048 JvmtiEnv::RawMonitorWait(JvmtiRawMonitor * rmonitor, jlong millis) { | |
| 3049 int r; | |
| 3050 Thread* thread = Thread::current(); | |
| 3051 | |
| 3052 if (thread->is_Java_thread()) { | |
| 3053 JavaThread* current_thread = (JavaThread*)thread; | |
| 3054 #ifdef PROPER_TRANSITIONS | |
| 3055 // Not really unknown but ThreadInVMfromNative does more than we want | |
| 3056 ThreadInVMfromUnknown __tiv; | |
| 3057 { | |
| 3058 ThreadBlockInVM __tbivm(current_thread); | |
| 3059 r = rmonitor->raw_wait(millis, true, current_thread); | |
| 3060 } | |
| 3061 #else | |
| 3062 /* Transition to thread_blocked without entering vm state */ | |
| 3063 /* This is really evil. Normally you can't undo _thread_blocked */ | |
| 3064 /* transitions like this because it would cause us to miss a */ | |
| 3065 /* safepoint but since the thread was already in _thread_in_native */ | |
| 3066 /* the thread is not leaving a safepoint safe state and it will */ | |
| 3067 /* block when it tries to return from native. We can't safepoint */ | |
| 3068 /* block in here because we could deadlock the vmthread. Blech. */ | |
| 3069 | |
| 3070 JavaThreadState state = current_thread->thread_state(); | |
| 3071 assert(state == _thread_in_native, "Must be _thread_in_native"); | |
| 3072 // frame should already be walkable since we are in native | |
| 3073 assert(!current_thread->has_last_Java_frame() || | |
| 3074 current_thread->frame_anchor()->walkable(), "Must be walkable"); | |
| 3075 current_thread->set_thread_state(_thread_blocked); | |
| 3076 | |
| 3077 r = rmonitor->raw_wait(millis, true, current_thread); | |
| 3078 // restore state, still at a safepoint safe state | |
| 3079 current_thread->set_thread_state(state); | |
| 3080 | |
| 3081 #endif /* PROPER_TRANSITIONS */ | |
| 3082 } else { | |
| 3083 if (thread->is_VM_thread() || thread->is_ConcurrentGC_thread()) { | |
| 3084 r = rmonitor->raw_wait(millis, true, thread); | |
| 3085 } else { | |
| 3086 ShouldNotReachHere(); | |
| 3087 } | |
| 3088 } | |
| 3089 | |
| 3090 switch (r) { | |
| 3091 case ObjectMonitor::OM_INTERRUPTED: | |
| 3092 return JVMTI_ERROR_INTERRUPT; | |
| 3093 case ObjectMonitor::OM_ILLEGAL_MONITOR_STATE: | |
| 3094 return JVMTI_ERROR_NOT_MONITOR_OWNER; | |
| 3095 } | |
| 3096 assert(r == ObjectMonitor::OM_OK, "raw_wait should have worked"); | |
| 3097 if (r != ObjectMonitor::OM_OK) { // robustness | |
| 3098 return JVMTI_ERROR_INTERNAL; | |
| 3099 } | |
| 3100 | |
| 3101 return JVMTI_ERROR_NONE; | |
| 3102 } /* end RawMonitorWait */ | |
| 3103 | |
| 3104 | |
| 3105 // rmonitor - pre-checked for validity | |
| 3106 jvmtiError | |
| 3107 JvmtiEnv::RawMonitorNotify(JvmtiRawMonitor * rmonitor) { | |
| 3108 int r; | |
| 3109 Thread* thread = Thread::current(); | |
| 3110 | |
| 3111 if (thread->is_Java_thread()) { | |
| 3112 JavaThread* current_thread = (JavaThread*)thread; | |
| 3113 // Not really unknown but ThreadInVMfromNative does more than we want | |
| 3114 ThreadInVMfromUnknown __tiv; | |
| 3115 r = rmonitor->raw_notify(current_thread); | |
| 3116 } else { | |
| 3117 if (thread->is_VM_thread() || thread->is_ConcurrentGC_thread()) { | |
| 3118 r = rmonitor->raw_notify(thread); | |
| 3119 } else { | |
| 3120 ShouldNotReachHere(); | |
| 3121 } | |
| 3122 } | |
| 3123 | |
| 3124 if (r == ObjectMonitor::OM_ILLEGAL_MONITOR_STATE) { | |
| 3125 return JVMTI_ERROR_NOT_MONITOR_OWNER; | |
| 3126 } | |
| 3127 assert(r == ObjectMonitor::OM_OK, "raw_notify should have worked"); | |
| 3128 if (r != ObjectMonitor::OM_OK) { // robustness | |
| 3129 return JVMTI_ERROR_INTERNAL; | |
| 3130 } | |
| 3131 | |
| 3132 return JVMTI_ERROR_NONE; | |
| 3133 } /* end RawMonitorNotify */ | |
| 3134 | |
| 3135 | |
| 3136 // rmonitor - pre-checked for validity | |
| 3137 jvmtiError | |
| 3138 JvmtiEnv::RawMonitorNotifyAll(JvmtiRawMonitor * rmonitor) { | |
| 3139 int r; | |
| 3140 Thread* thread = Thread::current(); | |
| 3141 | |
| 3142 if (thread->is_Java_thread()) { | |
| 3143 JavaThread* current_thread = (JavaThread*)thread; | |
| 3144 ThreadInVMfromUnknown __tiv; | |
| 3145 r = rmonitor->raw_notifyAll(current_thread); | |
| 3146 } else { | |
| 3147 if (thread->is_VM_thread() || thread->is_ConcurrentGC_thread()) { | |
| 3148 r = rmonitor->raw_notifyAll(thread); | |
| 3149 } else { | |
| 3150 ShouldNotReachHere(); | |
| 3151 } | |
| 3152 } | |
| 3153 | |
| 3154 if (r == ObjectMonitor::OM_ILLEGAL_MONITOR_STATE) { | |
| 3155 return JVMTI_ERROR_NOT_MONITOR_OWNER; | |
| 3156 } | |
| 3157 assert(r == ObjectMonitor::OM_OK, "raw_notifyAll should have worked"); | |
| 3158 if (r != ObjectMonitor::OM_OK) { // robustness | |
| 3159 return JVMTI_ERROR_INTERNAL; | |
| 3160 } | |
| 3161 | |
| 3162 return JVMTI_ERROR_NONE; | |
| 3163 } /* end RawMonitorNotifyAll */ | |
| 3164 | |
| 3165 | |
| 3166 // | |
| 3167 // JNI Function Interception functions | |
| 3168 // | |
| 3169 | |
| 3170 | |
| 3171 // function_table - pre-checked for NULL | |
| 3172 jvmtiError | |
| 3173 JvmtiEnv::SetJNIFunctionTable(const jniNativeInterface* function_table) { | |
| 3174 // Copy jni function table at safepoint. | |
| 3175 VM_JNIFunctionTableCopier copier(function_table); | |
| 3176 VMThread::execute(&copier); | |
| 3177 | |
| 3178 return JVMTI_ERROR_NONE; | |
| 3179 } /* end SetJNIFunctionTable */ | |
| 3180 | |
| 3181 | |
| 3182 // function_table - pre-checked for NULL | |
| 3183 jvmtiError | |
| 3184 JvmtiEnv::GetJNIFunctionTable(jniNativeInterface** function_table) { | |
| 3185 *function_table=(jniNativeInterface*)jvmtiMalloc(sizeof(jniNativeInterface)); | |
| 3186 if (*function_table == NULL) | |
| 3187 return JVMTI_ERROR_OUT_OF_MEMORY; | |
| 3188 memcpy(*function_table,(JavaThread::current())->get_jni_functions(),sizeof(jniNativeInterface)); | |
| 3189 return JVMTI_ERROR_NONE; | |
| 3190 } /* end GetJNIFunctionTable */ | |
| 3191 | |
| 3192 | |
| 3193 // | |
| 3194 // Event Management functions | |
| 3195 // | |
| 3196 | |
| 3197 jvmtiError | |
| 3198 JvmtiEnv::GenerateEvents(jvmtiEvent event_type) { | |
| 3199 // can only generate two event types | |
| 3200 if (event_type != JVMTI_EVENT_COMPILED_METHOD_LOAD && | |
| 3201 event_type != JVMTI_EVENT_DYNAMIC_CODE_GENERATED) { | |
| 3202 return JVMTI_ERROR_ILLEGAL_ARGUMENT; | |
| 3203 } | |
| 3204 | |
| 3205 // for compiled_method_load events we must check that the environment | |
| 3206 // has the can_generate_compiled_method_load_events capability. | |
| 3207 if (event_type == JVMTI_EVENT_COMPILED_METHOD_LOAD) { | |
| 3208 if (get_capabilities()->can_generate_compiled_method_load_events == 0) { | |
| 3209 return JVMTI_ERROR_MUST_POSSESS_CAPABILITY; | |
| 3210 } | |
| 3211 return JvmtiCodeBlobEvents::generate_compiled_method_load_events(this); | |
| 3212 } else { | |
| 3213 return JvmtiCodeBlobEvents::generate_dynamic_code_events(this); | |
| 3214 } | |
| 3215 | |
| 3216 } /* end GenerateEvents */ | |
| 3217 | |
| 3218 | |
| 3219 // | |
| 3220 // Extension Mechanism functions | |
| 3221 // | |
| 3222 | |
| 3223 // extension_count_ptr - pre-checked for NULL | |
| 3224 // extensions - pre-checked for NULL | |
| 3225 jvmtiError | |
| 3226 JvmtiEnv::GetExtensionFunctions(jint* extension_count_ptr, jvmtiExtensionFunctionInfo** extensions) { | |
| 3227 return JvmtiExtensions::get_functions(this, extension_count_ptr, extensions); | |
| 3228 } /* end GetExtensionFunctions */ | |
| 3229 | |
| 3230 | |
| 3231 // extension_count_ptr - pre-checked for NULL | |
| 3232 // extensions - pre-checked for NULL | |
| 3233 jvmtiError | |
| 3234 JvmtiEnv::GetExtensionEvents(jint* extension_count_ptr, jvmtiExtensionEventInfo** extensions) { | |
| 3235 return JvmtiExtensions::get_events(this, extension_count_ptr, extensions); | |
| 3236 } /* end GetExtensionEvents */ | |
| 3237 | |
| 3238 | |
| 3239 // callback - NULL is a valid value, must be checked | |
| 3240 jvmtiError | |
| 3241 JvmtiEnv::SetExtensionEventCallback(jint extension_event_index, jvmtiExtensionEvent callback) { | |
| 3242 return JvmtiExtensions::set_event_callback(this, extension_event_index, callback); | |
| 3243 } /* end SetExtensionEventCallback */ | |
| 3244 | |
| 3245 // | |
| 3246 // Timers functions | |
| 3247 // | |
| 3248 | |
| 3249 // info_ptr - pre-checked for NULL | |
| 3250 jvmtiError | |
| 3251 JvmtiEnv::GetCurrentThreadCpuTimerInfo(jvmtiTimerInfo* info_ptr) { | |
| 3252 os::current_thread_cpu_time_info(info_ptr); | |
| 3253 return JVMTI_ERROR_NONE; | |
| 3254 } /* end GetCurrentThreadCpuTimerInfo */ | |
| 3255 | |
| 3256 | |
| 3257 // nanos_ptr - pre-checked for NULL | |
| 3258 jvmtiError | |
| 3259 JvmtiEnv::GetCurrentThreadCpuTime(jlong* nanos_ptr) { | |
| 3260 *nanos_ptr = os::current_thread_cpu_time(); | |
| 3261 return JVMTI_ERROR_NONE; | |
| 3262 } /* end GetCurrentThreadCpuTime */ | |
| 3263 | |
| 3264 | |
| 3265 // info_ptr - pre-checked for NULL | |
| 3266 jvmtiError | |
| 3267 JvmtiEnv::GetThreadCpuTimerInfo(jvmtiTimerInfo* info_ptr) { | |
| 3268 os::thread_cpu_time_info(info_ptr); | |
| 3269 return JVMTI_ERROR_NONE; | |
| 3270 } /* end GetThreadCpuTimerInfo */ | |
| 3271 | |
| 3272 | |
| 3273 // Threads_lock NOT held, java_thread not protected by lock | |
| 3274 // java_thread - pre-checked | |
| 3275 // nanos_ptr - pre-checked for NULL | |
| 3276 jvmtiError | |
| 3277 JvmtiEnv::GetThreadCpuTime(JavaThread* java_thread, jlong* nanos_ptr) { | |
| 3278 *nanos_ptr = os::thread_cpu_time(java_thread); | |
| 3279 return JVMTI_ERROR_NONE; | |
| 3280 } /* end GetThreadCpuTime */ | |
| 3281 | |
| 3282 | |
| 3283 // info_ptr - pre-checked for NULL | |
| 3284 jvmtiError | |
| 3285 JvmtiEnv::GetTimerInfo(jvmtiTimerInfo* info_ptr) { | |
| 3286 os::javaTimeNanos_info(info_ptr); | |
| 3287 return JVMTI_ERROR_NONE; | |
| 3288 } /* end GetTimerInfo */ | |
| 3289 | |
| 3290 | |
| 3291 // nanos_ptr - pre-checked for NULL | |
| 3292 jvmtiError | |
| 3293 JvmtiEnv::GetTime(jlong* nanos_ptr) { | |
| 3294 *nanos_ptr = os::javaTimeNanos(); | |
| 3295 return JVMTI_ERROR_NONE; | |
| 3296 } /* end GetTime */ | |
| 3297 | |
| 3298 | |
| 3299 // processor_count_ptr - pre-checked for NULL | |
| 3300 jvmtiError | |
| 3301 JvmtiEnv::GetAvailableProcessors(jint* processor_count_ptr) { | |
| 3302 *processor_count_ptr = os::active_processor_count(); | |
| 3303 return JVMTI_ERROR_NONE; | |
| 3304 } /* end GetAvailableProcessors */ | |
| 3305 | |
| 3306 // | |
| 3307 // System Properties functions | |
| 3308 // | |
| 3309 | |
| 3310 // count_ptr - pre-checked for NULL | |
| 3311 // property_ptr - pre-checked for NULL | |
| 3312 jvmtiError | |
| 3313 JvmtiEnv::GetSystemProperties(jint* count_ptr, char*** property_ptr) { | |
| 3314 jvmtiError err = JVMTI_ERROR_NONE; | |
| 3315 | |
| 3316 *count_ptr = Arguments::PropertyList_count(Arguments::system_properties()); | |
| 3317 | |
| 3318 err = allocate(*count_ptr * sizeof(char *), (unsigned char **)property_ptr); | |
| 3319 if (err != JVMTI_ERROR_NONE) { | |
| 3320 return err; | |
| 3321 } | |
| 3322 int i = 0 ; | |
| 3323 for (SystemProperty* p = Arguments::system_properties(); p != NULL && i < *count_ptr; p = p->next(), i++) { | |
| 3324 const char *key = p->key(); | |
| 3325 char **tmp_value = *property_ptr+i; | |
| 3326 err = allocate((strlen(key)+1) * sizeof(char), (unsigned char**)tmp_value); | |
| 3327 if (err == JVMTI_ERROR_NONE) { | |
| 3328 strcpy(*tmp_value, key); | |
| 3329 } else { | |
| 3330 // clean up previously allocated memory. | |
| 3331 for (int j=0; j<i; j++) { | |
| 3332 Deallocate((unsigned char*)*property_ptr+j); | |
| 3333 } | |
| 3334 Deallocate((unsigned char*)property_ptr); | |
| 3335 break; | |
| 3336 } | |
| 3337 } | |
| 3338 return err; | |
| 3339 } /* end GetSystemProperties */ | |
| 3340 | |
| 3341 | |
| 3342 // property - pre-checked for NULL | |
| 3343 // value_ptr - pre-checked for NULL | |
| 3344 jvmtiError | |
| 3345 JvmtiEnv::GetSystemProperty(const char* property, char** value_ptr) { | |
| 3346 jvmtiError err = JVMTI_ERROR_NONE; | |
| 3347 const char *value; | |
| 3348 | |
| 3349 value = Arguments::PropertyList_get_value(Arguments::system_properties(), property); | |
| 3350 if (value == NULL) { | |
| 3351 err = JVMTI_ERROR_NOT_AVAILABLE; | |
| 3352 } else { | |
| 3353 err = allocate((strlen(value)+1) * sizeof(char), (unsigned char **)value_ptr); | |
| 3354 if (err == JVMTI_ERROR_NONE) { | |
| 3355 strcpy(*value_ptr, value); | |
| 3356 } | |
| 3357 } | |
| 3358 return err; | |
| 3359 } /* end GetSystemProperty */ | |
| 3360 | |
| 3361 | |
| 3362 // property - pre-checked for NULL | |
| 3363 // value - NULL is a valid value, must be checked | |
| 3364 jvmtiError | |
| 3365 JvmtiEnv::SetSystemProperty(const char* property, const char* value) { | |
| 3366 jvmtiError err =JVMTI_ERROR_NOT_AVAILABLE; | |
| 3367 | |
| 3368 for (SystemProperty* p = Arguments::system_properties(); p != NULL; p = p->next()) { | |
| 3369 if (strcmp(property, p->key()) == 0) { | |
| 3370 if (p->set_value((char *)value)) { | |
| 3371 err = JVMTI_ERROR_NONE; | |
| 3372 } | |
| 3373 } | |
| 3374 } | |
| 3375 return err; | |
| 3376 } /* end SetSystemProperty */ | |
| 3377 | |
| 3378 #endif // !JVMTI_KERNEL |