1 /* 2 * Copyright (c) 2012, 2019, Oracle and/or its affiliates. All rights reserved. 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 20 * or visit www.oracle.com if you need additional information or have any 21 * questions. 22 * 23 */ 24 25 #include "precompiled.hpp" 26 27 #include "memory/metadataFactory.hpp" 28 #include "memory/metaspaceShared.hpp" 29 #include "memory/iterator.hpp" 30 #include "memory/universe.hpp" 31 #include "oops/oop.inline.hpp" 32 33 #include "classfile/symbolTable.hpp" 34 #include "classfile/classLoaderData.hpp" 35 36 #include "prims/whitebox.hpp" 37 #include "prims/wbtestmethods/parserTests.hpp" 38 39 #include "runtime/arguments.hpp" 40 #include "runtime/interfaceSupport.hpp" 41 #include "runtime/os.hpp" 42 #include "utilities/array.hpp" 43 #include "utilities/align.hpp" 44 #include "utilities/debug.hpp" 45 #include "utilities/macros.hpp" 46 #include "utilities/exceptions.hpp" 47 48 #if INCLUDE_ALL_GCS 49 #include "gc_implementation/parallelScavenge/parallelScavengeHeap.inline.hpp" 50 #include "gc_implementation/g1/concurrentMark.hpp" 51 #include "gc_implementation/g1/concurrentMarkThread.hpp" 52 #include "gc_implementation/g1/g1CollectedHeap.inline.hpp" 53 #include "gc_implementation/g1/heapRegionRemSet.hpp" 54 #endif // INCLUDE_ALL_GCS 55 56 #if INCLUDE_NMT 57 #include "services/mallocSiteTable.hpp" 58 #include "services/memTracker.hpp" 59 #include "utilities/nativeCallStack.hpp" 60 #endif // INCLUDE_NMT 61 62 #include "compiler/compileBroker.hpp" 63 #include "jvmtifiles/jvmtiEnv.hpp" 64 #include "runtime/compilationPolicy.hpp" 65 66 PRAGMA_FORMAT_MUTE_WARNINGS_FOR_GCC 67 68 #define SIZE_T_MAX_VALUE ((size_t) -1) 69 70 bool WhiteBox::_used = false; 71 72 WB_ENTRY(jlong, WB_GetObjectAddress(JNIEnv* env, jobject o, jobject obj)) 73 return (jlong)(void*)JNIHandles::resolve(obj); 74 WB_END 75 76 WB_ENTRY(jint, WB_GetHeapOopSize(JNIEnv* env, jobject o)) 77 return heapOopSize; 78 WB_END 79 80 WB_ENTRY(jint, WB_GetVMPageSize(JNIEnv* env, jobject o)) 81 return os::vm_page_size(); 82 WB_END 83 84 WB_ENTRY(jlong, WB_GetVMLargePageSize(JNIEnv* env, jobject o)) 85 return os::large_page_size(); 86 WB_END 87 88 class WBIsKlassAliveClosure : public KlassClosure { 89 Symbol* _name; 90 bool _found; 91 public: 92 WBIsKlassAliveClosure(Symbol* name) : _name(name), _found(false) {} 93 94 void do_klass(Klass* k) { 95 if (_found) return; 96 Symbol* ksym = k->name(); 97 if (ksym->fast_compare(_name) == 0) { 98 _found = true; 99 } 100 } 101 102 bool found() const { 103 return _found; 104 } 105 }; 106 107 WB_ENTRY(jboolean, WB_IsClassAlive(JNIEnv* env, jobject target, jstring name)) 108 Handle h_name = JNIHandles::resolve(name); 109 if (h_name.is_null()) return false; 110 Symbol* sym = java_lang_String::as_symbol(h_name, CHECK_false); 111 TempNewSymbol tsym(sym); // Make sure to decrement reference count on sym on return 112 113 WBIsKlassAliveClosure closure(sym); 114 ClassLoaderDataGraph::classes_do(&closure); 115 116 return closure.found(); 117 WB_END 118 119 WB_ENTRY(jboolean, WB_ClassKnownToNotExist(JNIEnv* env, jobject o, jobject loader, jstring name)) 120 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 121 const char* class_name = env->GetStringUTFChars(name, NULL); 122 jboolean result = JVM_KnownToNotExist(env, loader, class_name); 123 env->ReleaseStringUTFChars(name, class_name); 124 return result; 125 WB_END 126 127 WB_ENTRY(jobjectArray, WB_GetLookupCacheURLs(JNIEnv* env, jobject o, jobject loader)) 128 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 129 return JVM_GetResourceLookupCacheURLs(env, loader); 130 WB_END 131 132 WB_ENTRY(jintArray, WB_GetLookupCacheMatches(JNIEnv* env, jobject o, jobject loader, jstring name)) 133 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 134 const char* resource_name = env->GetStringUTFChars(name, NULL); 135 jintArray result = JVM_GetResourceLookupCache(env, loader, resource_name); 136 137 env->ReleaseStringUTFChars(name, resource_name); 138 return result; 139 WB_END 140 141 WB_ENTRY(void, WB_AddToBootstrapClassLoaderSearch(JNIEnv* env, jobject o, jstring segment)) { 142 #if INCLUDE_JVMTI 143 ResourceMark rm; 144 const char* seg = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(segment)); 145 JvmtiEnv* jvmti_env = JvmtiEnv::create_a_jvmti(JVMTI_VERSION); 146 jvmtiError err = jvmti_env->AddToBootstrapClassLoaderSearch(seg); 147 assert(err == JVMTI_ERROR_NONE, "must not fail"); 148 #endif 149 } 150 WB_END 151 152 WB_ENTRY(void, WB_AddToSystemClassLoaderSearch(JNIEnv* env, jobject o, jstring segment)) { 153 #if INCLUDE_JVMTI 154 ResourceMark rm; 155 const char* seg = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(segment)); 156 JvmtiEnv* jvmti_env = JvmtiEnv::create_a_jvmti(JVMTI_VERSION); 157 jvmtiError err = jvmti_env->AddToSystemClassLoaderSearch(seg); 158 assert(err == JVMTI_ERROR_NONE, "must not fail"); 159 #endif 160 } 161 WB_END 162 163 #ifdef LINUX 164 #include "utilities/elfFile.hpp" 165 #include "osContainer_linux.hpp" 166 #endif 167 168 WB_ENTRY(jlong, WB_GetCompressedOopsMaxHeapSize(JNIEnv* env, jobject o)) { 169 return (jlong)Arguments::max_heap_for_compressed_oops(); 170 } 171 WB_END 172 173 WB_ENTRY(void, WB_PrintHeapSizes(JNIEnv* env, jobject o)) { 174 CollectorPolicy * p = Universe::heap()->collector_policy(); 175 gclog_or_tty->print_cr("Minimum heap " SIZE_FORMAT " Initial heap " 176 SIZE_FORMAT " Maximum heap " SIZE_FORMAT " Space alignment " SIZE_FORMAT " Heap alignment " SIZE_FORMAT, 177 p->min_heap_byte_size(), p->initial_heap_byte_size(), p->max_heap_byte_size(), 178 p->space_alignment(), p->heap_alignment()); 179 } 180 WB_END 181 182 #ifndef PRODUCT 183 // Forward declaration 184 void TestReservedSpace_test(); 185 void TestReserveMemorySpecial_test(); 186 void TestVirtualSpace_test(); 187 void TestMetaspaceAux_test(); 188 #endif 189 190 WB_ENTRY(void, WB_RunMemoryUnitTests(JNIEnv* env, jobject o)) 191 #ifndef PRODUCT 192 TestReservedSpace_test(); 193 TestReserveMemorySpecial_test(); 194 TestVirtualSpace_test(); 195 TestMetaspaceAux_test(); 196 #endif 197 WB_END 198 199 WB_ENTRY(void, WB_ReadFromNoaccessArea(JNIEnv* env, jobject o)) 200 size_t granularity = os::vm_allocation_granularity(); 201 ReservedHeapSpace rhs(100 * granularity, granularity, false, NULL); 202 VirtualSpace vs; 203 vs.initialize(rhs, 50 * granularity); 204 205 //Check if constraints are complied 206 if (!( UseCompressedOops && rhs.base() != NULL && 207 Universe::narrow_oop_base() != NULL && 208 Universe::narrow_oop_use_implicit_null_checks() )) { 209 tty->print_cr("WB_ReadFromNoaccessArea method is useless:\n " 210 "\tUseCompressedOops is %d\n" 211 "\trhs.base() is " PTR_FORMAT "\n" 212 "\tUniverse::narrow_oop_base() is " PTR_FORMAT "\n" 213 "\tUniverse::narrow_oop_use_implicit_null_checks() is %d", 214 UseCompressedOops, 215 rhs.base(), 216 Universe::narrow_oop_base(), 217 Universe::narrow_oop_use_implicit_null_checks()); 218 return; 219 } 220 tty->print_cr("Reading from no access area... "); 221 tty->print_cr("*(vs.low_boundary() - rhs.noaccess_prefix() / 2 ) = %c", 222 *(vs.low_boundary() - rhs.noaccess_prefix() / 2 )); 223 WB_END 224 225 static jint wb_stress_virtual_space_resize(size_t reserved_space_size, 226 size_t magnitude, size_t iterations) { 227 size_t granularity = os::vm_allocation_granularity(); 228 ReservedHeapSpace rhs(reserved_space_size * granularity, granularity, false, NULL); 229 VirtualSpace vs; 230 if (!vs.initialize(rhs, 0)) { 231 tty->print_cr("Failed to initialize VirtualSpace. Can't proceed."); 232 return 3; 233 } 234 235 long seed = os::random(); 236 tty->print_cr("Random seed is %ld", seed); 237 os::init_random(seed); 238 239 for (size_t i = 0; i < iterations; i++) { 240 241 // Whether we will shrink or grow 242 bool shrink = os::random() % 2L == 0; 243 244 // Get random delta to resize virtual space 245 size_t delta = (size_t)os::random() % magnitude; 246 247 // If we are about to shrink virtual space below zero, then expand instead 248 if (shrink && vs.committed_size() < delta) { 249 shrink = false; 250 } 251 252 // Resizing by delta 253 if (shrink) { 254 vs.shrink_by(delta); 255 } else { 256 // If expanding fails expand_by will silently return false 257 vs.expand_by(delta, true); 258 } 259 } 260 return 0; 261 } 262 263 WB_ENTRY(jint, WB_StressVirtualSpaceResize(JNIEnv* env, jobject o, 264 jlong reserved_space_size, jlong magnitude, jlong iterations)) 265 tty->print_cr("reservedSpaceSize=" JLONG_FORMAT ", magnitude=" JLONG_FORMAT ", " 266 "iterations=" JLONG_FORMAT "\n", reserved_space_size, magnitude, 267 iterations); 268 if (reserved_space_size < 0 || magnitude < 0 || iterations < 0) { 269 tty->print_cr("One of variables printed above is negative. Can't proceed.\n"); 270 return 1; 271 } 272 273 // sizeof(size_t) depends on whether OS is 32bit or 64bit. sizeof(jlong) is 274 // always 8 byte. That's why we should avoid overflow in case of 32bit platform. 275 if (sizeof(size_t) < sizeof(jlong)) { 276 jlong size_t_max_value = (jlong) SIZE_T_MAX_VALUE; 277 if (reserved_space_size > size_t_max_value || magnitude > size_t_max_value 278 || iterations > size_t_max_value) { 279 tty->print_cr("One of variables printed above overflows size_t. Can't proceed.\n"); 280 return 2; 281 } 282 } 283 284 return wb_stress_virtual_space_resize((size_t) reserved_space_size, 285 (size_t) magnitude, (size_t) iterations); 286 WB_END 287 288 WB_ENTRY(jboolean, WB_isObjectInOldGen(JNIEnv* env, jobject o, jobject obj)) 289 oop p = JNIHandles::resolve(obj); 290 #if INCLUDE_ALL_GCS 291 if (UseG1GC) { 292 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 293 const HeapRegion* hr = g1->heap_region_containing(p); 294 if (hr == NULL) { 295 return false; 296 } 297 return !(hr->is_young()); 298 } else if (UseParallelGC) { 299 ParallelScavengeHeap* psh = ParallelScavengeHeap::heap(); 300 return !psh->is_in_young(p); 301 } 302 #endif // INCLUDE_ALL_GCS 303 GenCollectedHeap* gch = GenCollectedHeap::heap(); 304 return !gch->is_in_young(p); 305 WB_END 306 307 WB_ENTRY(jlong, WB_GetObjectSize(JNIEnv* env, jobject o, jobject obj)) 308 oop p = JNIHandles::resolve(obj); 309 return p->size() * HeapWordSize; 310 WB_END 311 312 #if INCLUDE_ALL_GCS 313 WB_ENTRY(jboolean, WB_G1IsHumongous(JNIEnv* env, jobject o, jobject obj)) 314 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 315 oop result = JNIHandles::resolve(obj); 316 const HeapRegion* hr = g1->heap_region_containing(result); 317 return hr->isHumongous(); 318 WB_END 319 320 WB_ENTRY(jlong, WB_G1NumMaxRegions(JNIEnv* env, jobject o)) 321 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 322 size_t nr = g1->max_regions(); 323 return (jlong)nr; 324 WB_END 325 326 WB_ENTRY(jlong, WB_G1NumFreeRegions(JNIEnv* env, jobject o)) 327 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 328 size_t nr = g1->num_free_regions(); 329 return (jlong)nr; 330 WB_END 331 332 WB_ENTRY(jboolean, WB_G1InConcurrentMark(JNIEnv* env, jobject o)) 333 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 334 return g1->concurrent_mark()->cmThread()->during_cycle(); 335 WB_END 336 337 WB_ENTRY(jboolean, WB_G1StartMarkCycle(JNIEnv* env, jobject o)) 338 G1CollectedHeap* g1h = G1CollectedHeap::heap(); 339 if (!g1h->concurrent_mark()->cmThread()->during_cycle()) { 340 g1h->collect(GCCause::_wb_conc_mark); 341 return true; 342 } 343 return false; 344 WB_END 345 346 WB_ENTRY(jint, WB_G1RegionSize(JNIEnv* env, jobject o)) 347 return (jint)HeapRegion::GrainBytes; 348 WB_END 349 350 WB_ENTRY(jobject, WB_G1AuxiliaryMemoryUsage(JNIEnv* env)) 351 ResourceMark rm(THREAD); 352 G1CollectedHeap* g1h = G1CollectedHeap::heap(); 353 MemoryUsage usage = g1h->get_auxiliary_data_memory_usage(); 354 Handle h = MemoryService::create_MemoryUsage_obj(usage, CHECK_NULL); 355 return JNIHandles::make_local(env, h()); 356 WB_END 357 #endif // INCLUDE_ALL_GCS 358 359 #if INCLUDE_NMT 360 // Alloc memory using the test memory type so that we can use that to see if 361 // NMT picks it up correctly 362 WB_ENTRY(jlong, WB_NMTMalloc(JNIEnv* env, jobject o, jlong size)) 363 jlong addr = 0; 364 addr = (jlong)(uintptr_t)os::malloc(size, mtTest); 365 return addr; 366 WB_END 367 368 // Alloc memory with pseudo call stack. The test can create psudo malloc 369 // allocation site to stress the malloc tracking. 370 WB_ENTRY(jlong, WB_NMTMallocWithPseudoStack(JNIEnv* env, jobject o, jlong size, jint pseudo_stack)) 371 address pc = (address)(size_t)pseudo_stack; 372 NativeCallStack stack(&pc, 1); 373 return (jlong)(uintptr_t)os::malloc(size, mtTest, stack); 374 WB_END 375 376 // Alloc memory with pseudo call stack and specific memory type. 377 WB_ENTRY(jlong, WB_NMTMallocWithPseudoStackAndType(JNIEnv* env, jobject o, jlong size, jint pseudo_stack, jint type)) 378 address pc = (address)(size_t)pseudo_stack; 379 NativeCallStack stack(&pc, 1); 380 return (jlong)(uintptr_t)os::malloc(size, (MEMFLAGS)type, stack); 381 WB_END 382 383 // Free the memory allocated by NMTAllocTest 384 WB_ENTRY(void, WB_NMTFree(JNIEnv* env, jobject o, jlong mem)) 385 os::free((void*)(uintptr_t)mem, mtTest); 386 WB_END 387 388 WB_ENTRY(jlong, WB_NMTReserveMemory(JNIEnv* env, jobject o, jlong size)) 389 jlong addr = 0; 390 391 addr = (jlong)(uintptr_t)os::reserve_memory(size); 392 MemTracker::record_virtual_memory_type((address)addr, mtTest); 393 394 return addr; 395 WB_END 396 397 398 WB_ENTRY(void, WB_NMTCommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size)) 399 os::commit_memory((char *)(uintptr_t)addr, size, !ExecMem); 400 MemTracker::record_virtual_memory_type((address)(uintptr_t)addr, mtTest); 401 WB_END 402 403 WB_ENTRY(void, WB_NMTUncommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size)) 404 os::uncommit_memory((char *)(uintptr_t)addr, size); 405 WB_END 406 407 WB_ENTRY(void, WB_NMTReleaseMemory(JNIEnv* env, jobject o, jlong addr, jlong size)) 408 os::release_memory((char *)(uintptr_t)addr, size); 409 WB_END 410 411 WB_ENTRY(jboolean, WB_NMTIsDetailSupported(JNIEnv* env)) 412 return MemTracker::tracking_level() == NMT_detail; 413 WB_END 414 415 WB_ENTRY(jboolean, WB_NMTChangeTrackingLevel(JNIEnv* env)) 416 // Test that we can downgrade NMT levels but not upgrade them. 417 if (MemTracker::tracking_level() == NMT_off) { 418 MemTracker::transition_to(NMT_off); 419 return MemTracker::tracking_level() == NMT_off; 420 } else { 421 assert(MemTracker::tracking_level() == NMT_detail, "Should start out as detail tracking"); 422 MemTracker::transition_to(NMT_summary); 423 assert(MemTracker::tracking_level() == NMT_summary, "Should be summary now"); 424 425 // Can't go to detail once NMT is set to summary. 426 MemTracker::transition_to(NMT_detail); 427 assert(MemTracker::tracking_level() == NMT_summary, "Should still be summary now"); 428 429 // Shutdown sets tracking level to minimal. 430 MemTracker::shutdown(); 431 assert(MemTracker::tracking_level() == NMT_minimal, "Should be minimal now"); 432 433 // Once the tracking level is minimal, we cannot increase to summary. 434 // The code ignores this request instead of asserting because if the malloc site 435 // table overflows in another thread, it tries to change the code to summary. 436 MemTracker::transition_to(NMT_summary); 437 assert(MemTracker::tracking_level() == NMT_minimal, "Should still be minimal now"); 438 439 // Really can never go up to detail, verify that the code would never do this. 440 MemTracker::transition_to(NMT_detail); 441 assert(MemTracker::tracking_level() == NMT_minimal, "Should still be minimal now"); 442 return MemTracker::tracking_level() == NMT_minimal; 443 } 444 WB_END 445 446 WB_ENTRY(jint, WB_NMTGetHashSize(JNIEnv* env, jobject o)) 447 int hash_size = MallocSiteTable::hash_buckets(); 448 assert(hash_size > 0, "NMT hash_size should be > 0"); 449 return (jint)hash_size; 450 WB_END 451 #endif // INCLUDE_NMT 452 453 static jmethodID reflected_method_to_jmid(JavaThread* thread, JNIEnv* env, jobject method) { 454 assert(method != NULL, "method should not be null"); 455 ThreadToNativeFromVM ttn(thread); 456 return env->FromReflectedMethod(method); 457 } 458 459 WB_ENTRY(void, WB_DeoptimizeAll(JNIEnv* env, jobject o)) 460 MutexLockerEx mu(Compile_lock); 461 CodeCache::mark_all_nmethods_for_deoptimization(); 462 VM_Deoptimize op; 463 VMThread::execute(&op); 464 WB_END 465 466 WB_ENTRY(jint, WB_DeoptimizeMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr)) 467 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 468 int result = 0; 469 CHECK_JNI_EXCEPTION_(env, result); 470 MutexLockerEx mu(Compile_lock); 471 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 472 if (is_osr) { 473 result += mh->mark_osr_nmethods(); 474 } else if (mh->code() != NULL) { 475 mh->code()->mark_for_deoptimization(); 476 ++result; 477 } 478 result += CodeCache::mark_for_deoptimization(mh()); 479 if (result > 0) { 480 VM_Deoptimize op; 481 VMThread::execute(&op); 482 } 483 return result; 484 WB_END 485 486 WB_ENTRY(jboolean, WB_IsMethodCompiled(JNIEnv* env, jobject o, jobject method, jboolean is_osr)) 487 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 488 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 489 MutexLockerEx mu(Compile_lock); 490 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 491 nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code(); 492 if (code == NULL) { 493 return JNI_FALSE; 494 } 495 return (code->is_alive() && !code->is_marked_for_deoptimization()); 496 WB_END 497 498 WB_ENTRY(jboolean, WB_IsMethodCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr)) 499 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 500 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 501 MutexLockerEx mu(Compile_lock); 502 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 503 if (is_osr) { 504 return CompilationPolicy::can_be_osr_compiled(mh, comp_level); 505 } else { 506 return CompilationPolicy::can_be_compiled(mh, comp_level); 507 } 508 WB_END 509 510 WB_ENTRY(jboolean, WB_IsMethodQueuedForCompilation(JNIEnv* env, jobject o, jobject method)) 511 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 512 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 513 MutexLockerEx mu(Compile_lock); 514 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 515 return mh->queued_for_compilation(); 516 WB_END 517 518 WB_ENTRY(jint, WB_GetMethodCompilationLevel(JNIEnv* env, jobject o, jobject method, jboolean is_osr)) 519 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 520 CHECK_JNI_EXCEPTION_(env, CompLevel_none); 521 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 522 nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code(); 523 return (code != NULL ? code->comp_level() : CompLevel_none); 524 WB_END 525 526 WB_ENTRY(void, WB_MakeMethodNotCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr)) 527 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 528 CHECK_JNI_EXCEPTION(env); 529 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 530 if (is_osr) { 531 mh->set_not_osr_compilable(comp_level, true /* report */, "WhiteBox"); 532 } else { 533 mh->set_not_compilable(comp_level, true /* report */, "WhiteBox"); 534 } 535 WB_END 536 537 WB_ENTRY(jint, WB_GetMethodEntryBci(JNIEnv* env, jobject o, jobject method)) 538 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 539 CHECK_JNI_EXCEPTION_(env, InvocationEntryBci); 540 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 541 nmethod* code = mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false); 542 return (code != NULL && code->is_osr_method() ? code->osr_entry_bci() : InvocationEntryBci); 543 WB_END 544 545 WB_ENTRY(jboolean, WB_TestSetDontInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value)) 546 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 547 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 548 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 549 bool result = mh->dont_inline(); 550 mh->set_dont_inline(value == JNI_TRUE); 551 return result; 552 WB_END 553 554 WB_ENTRY(jint, WB_GetCompileQueueSize(JNIEnv* env, jobject o, jint comp_level)) 555 if (comp_level == CompLevel_any) { 556 return CompileBroker::queue_size(CompLevel_full_optimization) /* C2 */ + 557 CompileBroker::queue_size(CompLevel_full_profile) /* C1 */; 558 } else { 559 return CompileBroker::queue_size(comp_level); 560 } 561 WB_END 562 563 WB_ENTRY(jboolean, WB_TestSetForceInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value)) 564 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 565 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 566 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 567 bool result = mh->force_inline(); 568 mh->set_force_inline(value == JNI_TRUE); 569 return result; 570 WB_END 571 572 WB_ENTRY(jboolean, WB_EnqueueMethodForCompilation(JNIEnv* env, jobject o, jobject method, jint comp_level, jint bci)) 573 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 574 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 575 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 576 nmethod* nm = CompileBroker::compile_method(mh, bci, comp_level, mh, mh->invocation_count(), "WhiteBox", THREAD); 577 MutexLockerEx mu(Compile_lock); 578 return (mh->queued_for_compilation() || nm != NULL); 579 WB_END 580 581 class VM_WhiteBoxOperation : public VM_Operation { 582 public: 583 VM_WhiteBoxOperation() { } 584 VMOp_Type type() const { return VMOp_WhiteBoxOperation; } 585 bool allow_nested_vm_operations() const { return true; } 586 }; 587 588 static AlwaysFalseClosure always_false; 589 590 class VM_WhiteBoxCleanMethodData : public VM_WhiteBoxOperation { 591 public: 592 VM_WhiteBoxCleanMethodData(MethodData* mdo) : _mdo(mdo) { } 593 void doit() { 594 _mdo->clean_method_data(&always_false); 595 } 596 private: 597 MethodData* _mdo; 598 }; 599 600 WB_ENTRY(void, WB_ClearMethodState(JNIEnv* env, jobject o, jobject method)) 601 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 602 CHECK_JNI_EXCEPTION(env); 603 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 604 MutexLockerEx mu(Compile_lock); 605 MethodData* mdo = mh->method_data(); 606 MethodCounters* mcs = mh->method_counters(); 607 608 if (mdo != NULL) { 609 mdo->init(); 610 ResourceMark rm; 611 int arg_count = mdo->method()->size_of_parameters(); 612 for (int i = 0; i < arg_count; i++) { 613 mdo->set_arg_modified(i, 0); 614 } 615 VM_WhiteBoxCleanMethodData op(mdo); 616 VMThread::execute(&op); 617 } 618 619 mh->clear_not_c1_compilable(); 620 mh->clear_not_c2_compilable(); 621 mh->clear_not_c2_osr_compilable(); 622 NOT_PRODUCT(mh->set_compiled_invocation_count(0)); 623 if (mcs != NULL) { 624 mcs->backedge_counter()->init(); 625 mcs->invocation_counter()->init(); 626 mcs->set_interpreter_invocation_count(0); 627 mcs->set_interpreter_throwout_count(0); 628 629 #ifdef TIERED 630 mcs->set_rate(0.0F); 631 mh->set_prev_event_count(0); 632 mh->set_prev_time(0); 633 #endif 634 } 635 WB_END 636 637 WB_ENTRY(void, WB_MarkMethodProfiled(JNIEnv* env, jobject o, jobject method)) 638 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 639 CHECK_JNI_EXCEPTION(env); 640 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 641 642 MethodData* mdo = mh->method_data(); 643 if (mdo == NULL) { 644 Method::build_interpreter_method_data(mh, CHECK_AND_CLEAR); 645 mdo = mh->method_data(); 646 } 647 mdo->init(); 648 InvocationCounter* icnt = mdo->invocation_counter(); 649 InvocationCounter* bcnt = mdo->backedge_counter(); 650 // set i-counter according to AdvancedThresholdPolicy::is_method_profiled 651 // because SimpleThresholdPolicy::call_predicate_helper uses > in jdk8u, that's why we need to plus one. 652 icnt->set(InvocationCounter::wait_for_compile, Tier4MinInvocationThreshold + 1); 653 bcnt->set(InvocationCounter::wait_for_compile, Tier4CompileThreshold + 1); 654 WB_END 655 656 template <typename T> 657 static bool GetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value, bool (*TAt)(const char*, T*, bool, bool)) { 658 if (name == NULL) { 659 return false; 660 } 661 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 662 const char* flag_name = env->GetStringUTFChars(name, NULL); 663 bool result = (*TAt)(flag_name, value, true, true); 664 env->ReleaseStringUTFChars(name, flag_name); 665 return result; 666 } 667 668 template <typename T> 669 static bool SetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value, bool (*TAtPut)(const char*, T*, Flag::Flags)) { 670 if (name == NULL) { 671 return false; 672 } 673 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 674 const char* flag_name = env->GetStringUTFChars(name, NULL); 675 bool result = (*TAtPut)(flag_name, value, Flag::INTERNAL); 676 env->ReleaseStringUTFChars(name, flag_name); 677 return result; 678 } 679 680 template <typename T> 681 static jobject box(JavaThread* thread, JNIEnv* env, Symbol* name, Symbol* sig, T value) { 682 ResourceMark rm(thread); 683 jclass clazz = env->FindClass(name->as_C_string()); 684 CHECK_JNI_EXCEPTION_(env, NULL); 685 jmethodID methodID = env->GetStaticMethodID(clazz, 686 vmSymbols::valueOf_name()->as_C_string(), 687 sig->as_C_string()); 688 CHECK_JNI_EXCEPTION_(env, NULL); 689 jobject result = env->CallStaticObjectMethod(clazz, methodID, value); 690 CHECK_JNI_EXCEPTION_(env, NULL); 691 return result; 692 } 693 694 static jobject booleanBox(JavaThread* thread, JNIEnv* env, jboolean value) { 695 return box(thread, env, vmSymbols::java_lang_Boolean(), vmSymbols::Boolean_valueOf_signature(), value); 696 } 697 static jobject integerBox(JavaThread* thread, JNIEnv* env, jint value) { 698 return box(thread, env, vmSymbols::java_lang_Integer(), vmSymbols::Integer_valueOf_signature(), value); 699 } 700 static jobject longBox(JavaThread* thread, JNIEnv* env, jlong value) { 701 return box(thread, env, vmSymbols::java_lang_Long(), vmSymbols::Long_valueOf_signature(), value); 702 } 703 /* static jobject floatBox(JavaThread* thread, JNIEnv* env, jfloat value) { 704 return box(thread, env, vmSymbols::java_lang_Float(), vmSymbols::Float_valueOf_signature(), value); 705 }*/ 706 static jobject doubleBox(JavaThread* thread, JNIEnv* env, jdouble value) { 707 return box(thread, env, vmSymbols::java_lang_Double(), vmSymbols::Double_valueOf_signature(), value); 708 } 709 710 WB_ENTRY(jobject, WB_GetBooleanVMFlag(JNIEnv* env, jobject o, jstring name)) 711 bool result; 712 if (GetVMFlag <bool> (thread, env, name, &result, &CommandLineFlags::boolAt)) { 713 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 714 return booleanBox(thread, env, result); 715 } 716 return NULL; 717 WB_END 718 719 WB_ENTRY(jobject, WB_GetIntxVMFlag(JNIEnv* env, jobject o, jstring name)) 720 intx result; 721 if (GetVMFlag <intx> (thread, env, name, &result, &CommandLineFlags::intxAt)) { 722 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 723 return longBox(thread, env, result); 724 } 725 return NULL; 726 WB_END 727 728 WB_ENTRY(jobject, WB_GetUintxVMFlag(JNIEnv* env, jobject o, jstring name)) 729 uintx result; 730 if (GetVMFlag <uintx> (thread, env, name, &result, &CommandLineFlags::uintxAt)) { 731 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 732 return longBox(thread, env, result); 733 } 734 return NULL; 735 WB_END 736 737 WB_ENTRY(jobject, WB_GetUint64VMFlag(JNIEnv* env, jobject o, jstring name)) 738 uint64_t result; 739 if (GetVMFlag <uint64_t> (thread, env, name, &result, &CommandLineFlags::uint64_tAt)) { 740 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 741 return longBox(thread, env, result); 742 } 743 return NULL; 744 WB_END 745 746 WB_ENTRY(jobject, WB_GetDoubleVMFlag(JNIEnv* env, jobject o, jstring name)) 747 double result; 748 if (GetVMFlag <double> (thread, env, name, &result, &CommandLineFlags::doubleAt)) { 749 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 750 return doubleBox(thread, env, result); 751 } 752 return NULL; 753 WB_END 754 755 WB_ENTRY(jstring, WB_GetStringVMFlag(JNIEnv* env, jobject o, jstring name)) 756 ccstr ccstrResult; 757 if (GetVMFlag <ccstr> (thread, env, name, &ccstrResult, &CommandLineFlags::ccstrAt)) { 758 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 759 jstring result = env->NewStringUTF(ccstrResult); 760 CHECK_JNI_EXCEPTION_(env, NULL); 761 return result; 762 } 763 return NULL; 764 WB_END 765 766 WB_ENTRY(void, WB_SetBooleanVMFlag(JNIEnv* env, jobject o, jstring name, jboolean value)) 767 bool result = value == JNI_TRUE ? true : false; 768 SetVMFlag <bool> (thread, env, name, &result, &CommandLineFlags::boolAtPut); 769 WB_END 770 771 WB_ENTRY(void, WB_SetIntxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value)) 772 intx result = value; 773 SetVMFlag <intx> (thread, env, name, &result, &CommandLineFlags::intxAtPut); 774 WB_END 775 776 WB_ENTRY(void, WB_SetUintxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value)) 777 uintx result = value; 778 SetVMFlag <uintx> (thread, env, name, &result, &CommandLineFlags::uintxAtPut); 779 WB_END 780 781 WB_ENTRY(void, WB_SetUint64VMFlag(JNIEnv* env, jobject o, jstring name, jlong value)) 782 uint64_t result = value; 783 SetVMFlag <uint64_t> (thread, env, name, &result, &CommandLineFlags::uint64_tAtPut); 784 WB_END 785 786 WB_ENTRY(void, WB_SetDoubleVMFlag(JNIEnv* env, jobject o, jstring name, jdouble value)) 787 double result = value; 788 SetVMFlag <double> (thread, env, name, &result, &CommandLineFlags::doubleAtPut); 789 WB_END 790 791 WB_ENTRY(void, WB_SetStringVMFlag(JNIEnv* env, jobject o, jstring name, jstring value)) 792 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 793 const char* ccstrValue = (value == NULL) ? NULL : env->GetStringUTFChars(value, NULL); 794 ccstr ccstrResult = ccstrValue; 795 bool needFree; 796 { 797 ThreadInVMfromNative ttvfn(thread); // back to VM 798 needFree = SetVMFlag <ccstr> (thread, env, name, &ccstrResult, &CommandLineFlags::ccstrAtPut); 799 } 800 if (value != NULL) { 801 env->ReleaseStringUTFChars(value, ccstrValue); 802 } 803 if (needFree) { 804 FREE_C_HEAP_ARRAY(char, ccstrResult, mtInternal); 805 } 806 WB_END 807 808 809 WB_ENTRY(jboolean, WB_IsInStringTable(JNIEnv* env, jobject o, jstring javaString)) 810 ResourceMark rm(THREAD); 811 int len; 812 jchar* name = java_lang_String::as_unicode_string(JNIHandles::resolve(javaString), len, CHECK_false); 813 return (StringTable::lookup(name, len) != NULL); 814 WB_END 815 816 WB_ENTRY(void, WB_FullGC(JNIEnv* env, jobject o)) 817 Universe::heap()->collector_policy()->set_should_clear_all_soft_refs(true); 818 Universe::heap()->collect(GCCause::_last_ditch_collection); 819 #if INCLUDE_ALL_GCS 820 if (UseG1GC) { 821 // Needs to be cleared explicitly for G1 822 Universe::heap()->collector_policy()->set_should_clear_all_soft_refs(false); 823 } 824 #endif // INCLUDE_ALL_GCS 825 WB_END 826 827 WB_ENTRY(void, WB_YoungGC(JNIEnv* env, jobject o)) 828 Universe::heap()->collect(GCCause::_wb_young_gc); 829 WB_END 830 831 WB_ENTRY(void, WB_ReadReservedMemory(JNIEnv* env, jobject o)) 832 // static+volatile in order to force the read to happen 833 // (not be eliminated by the compiler) 834 static char c; 835 static volatile char* p; 836 837 p = os::reserve_memory(os::vm_allocation_granularity(), NULL, 0); 838 if (p == NULL) { 839 THROW_MSG(vmSymbols::java_lang_OutOfMemoryError(), "Failed to reserve memory"); 840 } 841 842 c = *p; 843 WB_END 844 845 WB_ENTRY(jstring, WB_GetCPUFeatures(JNIEnv* env, jobject o)) 846 const char* cpu_features = VM_Version::cpu_features(); 847 ThreadToNativeFromVM ttn(thread); 848 jstring features_string = env->NewStringUTF(cpu_features); 849 850 CHECK_JNI_EXCEPTION_(env, NULL); 851 852 return features_string; 853 WB_END 854 855 int WhiteBox::get_blob_type(const CodeBlob* code) { 856 guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled"); 857 return CodeBlobType::All;; 858 } 859 860 struct CodeBlobStub { 861 CodeBlobStub(const CodeBlob* blob) : 862 name(os::strdup(blob->name())), 863 size(blob->size()), 864 blob_type(WhiteBox::get_blob_type(blob)), 865 address((jlong) blob) { } 866 ~CodeBlobStub() { os::free((void*) name); } 867 const char* const name; 868 const jint size; 869 const jint blob_type; 870 const jlong address; 871 }; 872 873 static jobjectArray codeBlob2objectArray(JavaThread* thread, JNIEnv* env, CodeBlobStub* cb) { 874 jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string()); 875 CHECK_JNI_EXCEPTION_(env, NULL); 876 jobjectArray result = env->NewObjectArray(4, clazz, NULL); 877 878 jstring name = env->NewStringUTF(cb->name); 879 CHECK_JNI_EXCEPTION_(env, NULL); 880 env->SetObjectArrayElement(result, 0, name); 881 882 jobject obj = integerBox(thread, env, cb->size); 883 CHECK_JNI_EXCEPTION_(env, NULL); 884 env->SetObjectArrayElement(result, 1, obj); 885 886 obj = integerBox(thread, env, cb->blob_type); 887 CHECK_JNI_EXCEPTION_(env, NULL); 888 env->SetObjectArrayElement(result, 2, obj); 889 890 obj = longBox(thread, env, cb->address); 891 CHECK_JNI_EXCEPTION_(env, NULL); 892 env->SetObjectArrayElement(result, 3, obj); 893 894 return result; 895 } 896 897 WB_ENTRY(jobjectArray, WB_GetNMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr)) 898 ResourceMark rm(THREAD); 899 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 900 CHECK_JNI_EXCEPTION_(env, NULL); 901 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 902 nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code(); 903 jobjectArray result = NULL; 904 if (code == NULL) { 905 return result; 906 } 907 int insts_size = code->insts_size(); 908 909 ThreadToNativeFromVM ttn(thread); 910 jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string()); 911 CHECK_JNI_EXCEPTION_(env, NULL); 912 result = env->NewObjectArray(3, clazz, NULL); 913 if (result == NULL) { 914 return result; 915 } 916 917 jobject level = integerBox(thread, env, code->comp_level()); 918 CHECK_JNI_EXCEPTION_(env, NULL); 919 env->SetObjectArrayElement(result, 0, level); 920 921 jobject id = integerBox(thread, env, code->compile_id()); 922 CHECK_JNI_EXCEPTION_(env, NULL); 923 env->SetObjectArrayElement(result, 1, id); 924 925 jbyteArray insts = env->NewByteArray(insts_size); 926 CHECK_JNI_EXCEPTION_(env, NULL); 927 env->SetByteArrayRegion(insts, 0, insts_size, (jbyte*) code->insts_begin()); 928 env->SetObjectArrayElement(result, 2, insts); 929 930 return result; 931 WB_END 932 933 CodeBlob* WhiteBox::allocate_code_blob(int size, int blob_type) { 934 guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled"); 935 BufferBlob* blob; 936 int full_size = CodeBlob::align_code_offset(sizeof(BufferBlob)); 937 if (full_size < size) { 938 full_size += align_up(size - full_size, oopSize); 939 } 940 { 941 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 942 blob = (BufferBlob*) CodeCache::allocate(full_size); 943 ::new (blob) BufferBlob("WB::DummyBlob", full_size); 944 } 945 // Track memory usage statistic after releasing CodeCache_lock 946 MemoryService::track_code_cache_memory_usage(); 947 return blob; 948 } 949 950 WB_ENTRY(jlong, WB_AllocateCodeBlob(JNIEnv* env, jobject o, jint size, jint blob_type)) 951 if (size < 0) { 952 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), 953 err_msg("WB_AllocateCodeBlob: size is negative: " INT32_FORMAT, size)); 954 } 955 return (jlong) WhiteBox::allocate_code_blob(size, blob_type); 956 WB_END 957 958 WB_ENTRY(void, WB_FreeCodeBlob(JNIEnv* env, jobject o, jlong addr)) 959 if (addr == 0) { 960 return; 961 } 962 BufferBlob::free((BufferBlob*) addr); 963 WB_END 964 965 WB_ENTRY(jobjectArray, WB_GetCodeBlob(JNIEnv* env, jobject o, jlong addr)) 966 if (addr == 0) { 967 THROW_MSG_NULL(vmSymbols::java_lang_NullPointerException(), 968 "WB_GetCodeBlob: addr is null"); 969 } 970 ThreadToNativeFromVM ttn(thread); 971 CodeBlobStub stub((CodeBlob*) addr); 972 return codeBlob2objectArray(thread, env, &stub); 973 WB_END 974 975 int WhiteBox::array_bytes_to_length(size_t bytes) { 976 return Array<u1>::bytes_to_length(bytes); 977 } 978 979 WB_ENTRY(jlong, WB_AllocateMetaspace(JNIEnv* env, jobject wb, jobject class_loader, jlong size)) 980 if (size < 0) { 981 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), 982 err_msg("WB_AllocateMetaspace: size is negative: " JLONG_FORMAT, size)); 983 } 984 985 oop class_loader_oop = JNIHandles::resolve(class_loader); 986 ClassLoaderData* cld = class_loader_oop != NULL 987 ? java_lang_ClassLoader::loader_data(class_loader_oop) 988 : ClassLoaderData::the_null_class_loader_data(); 989 990 void* metadata = MetadataFactory::new_writeable_array<u1>(cld, WhiteBox::array_bytes_to_length((size_t)size), thread); 991 992 return (jlong)(uintptr_t)metadata; 993 WB_END 994 995 WB_ENTRY(void, WB_FreeMetaspace(JNIEnv* env, jobject wb, jobject class_loader, jlong addr, jlong size)) 996 oop class_loader_oop = JNIHandles::resolve(class_loader); 997 ClassLoaderData* cld = class_loader_oop != NULL 998 ? java_lang_ClassLoader::loader_data(class_loader_oop) 999 : ClassLoaderData::the_null_class_loader_data(); 1000 1001 MetadataFactory::free_array(cld, (Array<u1>*)(uintptr_t)addr); 1002 WB_END 1003 1004 WB_ENTRY(jlong, WB_IncMetaspaceCapacityUntilGC(JNIEnv* env, jobject wb, jlong inc)) 1005 if (inc < 0) { 1006 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), 1007 err_msg("WB_IncMetaspaceCapacityUntilGC: inc is negative: " JLONG_FORMAT, inc)); 1008 } 1009 1010 jlong max_size_t = (jlong) ((size_t) -1); 1011 if (inc > max_size_t) { 1012 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), 1013 err_msg("WB_IncMetaspaceCapacityUntilGC: inc does not fit in size_t: " JLONG_FORMAT, inc)); 1014 } 1015 1016 size_t new_cap_until_GC = 0; 1017 size_t aligned_inc = align_size_down((size_t) inc, Metaspace::commit_alignment()); 1018 bool success = MetaspaceGC::inc_capacity_until_GC(aligned_inc, &new_cap_until_GC); 1019 if (!success) { 1020 THROW_MSG_0(vmSymbols::java_lang_IllegalStateException(), 1021 "WB_IncMetaspaceCapacityUntilGC: could not increase capacity until GC " 1022 "due to contention with another thread"); 1023 } 1024 return (jlong) new_cap_until_GC; 1025 WB_END 1026 1027 WB_ENTRY(jlong, WB_MetaspaceCapacityUntilGC(JNIEnv* env, jobject wb)) 1028 return (jlong) MetaspaceGC::capacity_until_GC(); 1029 WB_END 1030 1031 WB_ENTRY(jboolean, WB_IsSharedClass(JNIEnv* env, jobject wb, jclass clazz)) 1032 return (jboolean)MetaspaceShared::is_in_shared_space(java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz))); 1033 WB_END 1034 1035 WB_ENTRY(jboolean, WB_IsMonitorInflated(JNIEnv* env, jobject wb, jobject obj)) 1036 oop obj_oop = JNIHandles::resolve(obj); 1037 return (jboolean) obj_oop->mark()->has_monitor(); 1038 WB_END 1039 1040 WB_ENTRY(void, WB_ForceSafepoint(JNIEnv* env, jobject wb)) 1041 VM_ForceSafepoint force_safepoint_op; 1042 VMThread::execute(&force_safepoint_op); 1043 WB_END 1044 1045 //Some convenience methods to deal with objects from java 1046 int WhiteBox::offset_for_field(const char* field_name, oop object, 1047 Symbol* signature_symbol) { 1048 assert(field_name != NULL && strlen(field_name) > 0, "Field name not valid"); 1049 Thread* THREAD = Thread::current(); 1050 1051 //Get the class of our object 1052 Klass* arg_klass = object->klass(); 1053 //Turn it into an instance-klass 1054 InstanceKlass* ik = InstanceKlass::cast(arg_klass); 1055 1056 //Create symbols to look for in the class 1057 TempNewSymbol name_symbol = SymbolTable::lookup(field_name, (int) strlen(field_name), 1058 THREAD); 1059 1060 //To be filled in with an offset of the field we're looking for 1061 fieldDescriptor fd; 1062 1063 Klass* res = ik->find_field(name_symbol, signature_symbol, &fd); 1064 if (res == NULL) { 1065 tty->print_cr("Invalid layout of %s at %s", ik->external_name(), 1066 name_symbol->as_C_string()); 1067 vm_exit_during_initialization("Invalid layout of preloaded class: use -XX:+TraceClassLoading to see the origin of the problem class"); 1068 } 1069 1070 //fetch the field at the offset we've found 1071 int dest_offset = fd.offset(); 1072 1073 return dest_offset; 1074 } 1075 1076 1077 const char* WhiteBox::lookup_jstring(const char* field_name, oop object) { 1078 int offset = offset_for_field(field_name, object, 1079 vmSymbols::string_signature()); 1080 oop string = object->obj_field(offset); 1081 if (string == NULL) { 1082 return NULL; 1083 } 1084 const char* ret = java_lang_String::as_utf8_string(string); 1085 return ret; 1086 } 1087 1088 bool WhiteBox::lookup_bool(const char* field_name, oop object) { 1089 int offset = 1090 offset_for_field(field_name, object, vmSymbols::bool_signature()); 1091 bool ret = (object->bool_field(offset) == JNI_TRUE); 1092 return ret; 1093 } 1094 1095 void WhiteBox::register_methods(JNIEnv* env, jclass wbclass, JavaThread* thread, JNINativeMethod* method_array, int method_count) { 1096 ResourceMark rm; 1097 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1098 1099 // one by one registration natives for exception catching 1100 jclass no_such_method_error_klass = env->FindClass(vmSymbols::java_lang_NoSuchMethodError()->as_C_string()); 1101 CHECK_JNI_EXCEPTION(env); 1102 for (int i = 0, n = method_count; i < n; ++i) { 1103 // Skip dummy entries 1104 if (method_array[i].fnPtr == NULL) continue; 1105 if (env->RegisterNatives(wbclass, &method_array[i], 1) != 0) { 1106 jthrowable throwable_obj = env->ExceptionOccurred(); 1107 if (throwable_obj != NULL) { 1108 env->ExceptionClear(); 1109 if (env->IsInstanceOf(throwable_obj, no_such_method_error_klass)) { 1110 // NoSuchMethodError is thrown when a method can't be found or a method is not native. 1111 // Ignoring the exception since it is not preventing use of other WhiteBox methods. 1112 tty->print_cr("Warning: 'NoSuchMethodError' on register of sun.hotspot.WhiteBox::%s%s", 1113 method_array[i].name, method_array[i].signature); 1114 } 1115 } else { 1116 // Registration failed unexpectedly. 1117 tty->print_cr("Warning: unexpected error on register of sun.hotspot.WhiteBox::%s%s. All methods will be unregistered", 1118 method_array[i].name, method_array[i].signature); 1119 env->UnregisterNatives(wbclass); 1120 break; 1121 } 1122 } 1123 } 1124 } 1125 1126 // Checks that the library libfile has the noexecstack bit set. 1127 WB_ENTRY(jboolean, WB_CheckLibSpecifiesNoexecstack(JNIEnv* env, jobject o, jstring libfile)) 1128 jboolean ret = false; 1129 #ifdef LINUX 1130 // Can't be in VM when we call JNI. 1131 ThreadToNativeFromVM ttnfv(thread); 1132 const char* lf = env->GetStringUTFChars(libfile, NULL); 1133 CHECK_JNI_EXCEPTION_(env, 0); 1134 ElfFile ef(lf); 1135 ret = (jboolean) ef.specifies_noexecstack(); 1136 env->ReleaseStringUTFChars(libfile, lf); 1137 #endif 1138 return ret; 1139 WB_END 1140 1141 WB_ENTRY(jboolean, WB_IsContainerized(JNIEnv* env, jobject o)) 1142 LINUX_ONLY(return OSContainer::is_containerized();) 1143 return false; 1144 WB_END 1145 1146 WB_ENTRY(void, WB_PrintOsInfo(JNIEnv* env, jobject o)) 1147 os::print_os_info(tty); 1148 WB_END 1149 1150 #define CC (char*) 1151 1152 static JNINativeMethod methods[] = { 1153 {CC"getObjectAddress", CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectAddress }, 1154 {CC"getObjectSize", CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectSize }, 1155 {CC"isObjectInOldGen", CC"(Ljava/lang/Object;)Z", (void*)&WB_isObjectInOldGen }, 1156 {CC"getHeapOopSize", CC"()I", (void*)&WB_GetHeapOopSize }, 1157 {CC"getVMPageSize", CC"()I", (void*)&WB_GetVMPageSize }, 1158 {CC"getVMLargePageSize", CC"()J", (void*)&WB_GetVMLargePageSize}, 1159 {CC"isClassAlive0", CC"(Ljava/lang/String;)Z", (void*)&WB_IsClassAlive }, 1160 {CC"classKnownToNotExist", 1161 CC"(Ljava/lang/ClassLoader;Ljava/lang/String;)Z",(void*)&WB_ClassKnownToNotExist}, 1162 {CC"getLookupCacheURLs", CC"(Ljava/lang/ClassLoader;)[Ljava/net/URL;", (void*)&WB_GetLookupCacheURLs}, 1163 {CC"getLookupCacheMatches", CC"(Ljava/lang/ClassLoader;Ljava/lang/String;)[I", 1164 (void*)&WB_GetLookupCacheMatches}, 1165 {CC"parseCommandLine", 1166 CC"(Ljava/lang/String;[Lsun/hotspot/parser/DiagnosticCommand;)[Ljava/lang/Object;", 1167 (void*) &WB_ParseCommandLine 1168 }, 1169 {CC"addToBootstrapClassLoaderSearch", CC"(Ljava/lang/String;)V", 1170 (void*)&WB_AddToBootstrapClassLoaderSearch}, 1171 {CC"addToSystemClassLoaderSearch", CC"(Ljava/lang/String;)V", 1172 (void*)&WB_AddToSystemClassLoaderSearch}, 1173 {CC"getCompressedOopsMaxHeapSize", CC"()J", 1174 (void*)&WB_GetCompressedOopsMaxHeapSize}, 1175 {CC"printHeapSizes", CC"()V", (void*)&WB_PrintHeapSizes }, 1176 {CC"runMemoryUnitTests", CC"()V", (void*)&WB_RunMemoryUnitTests}, 1177 {CC"readFromNoaccessArea",CC"()V", (void*)&WB_ReadFromNoaccessArea}, 1178 {CC"stressVirtualSpaceResize",CC"(JJJ)I", (void*)&WB_StressVirtualSpaceResize}, 1179 {CC"isSharedClass", CC"(Ljava/lang/Class;)Z", (void*)&WB_IsSharedClass }, 1180 #if INCLUDE_ALL_GCS 1181 {CC"g1InConcurrentMark", CC"()Z", (void*)&WB_G1InConcurrentMark}, 1182 {CC"g1IsHumongous", CC"(Ljava/lang/Object;)Z", (void*)&WB_G1IsHumongous }, 1183 {CC"g1NumMaxRegions", CC"()J", (void*)&WB_G1NumMaxRegions }, 1184 {CC"g1NumFreeRegions", CC"()J", (void*)&WB_G1NumFreeRegions }, 1185 {CC"g1RegionSize", CC"()I", (void*)&WB_G1RegionSize }, 1186 {CC"g1StartConcMarkCycle", CC"()Z", (void*)&WB_G1StartMarkCycle }, 1187 {CC"g1AuxiliaryMemoryUsage", CC"()Ljava/lang/management/MemoryUsage;", 1188 (void*)&WB_G1AuxiliaryMemoryUsage }, 1189 #endif // INCLUDE_ALL_GCS 1190 #if INCLUDE_NMT 1191 {CC"NMTMalloc", CC"(J)J", (void*)&WB_NMTMalloc }, 1192 {CC"NMTMallocWithPseudoStack", CC"(JI)J", (void*)&WB_NMTMallocWithPseudoStack}, 1193 {CC"NMTMallocWithPseudoStackAndType", CC"(JII)J", (void*)&WB_NMTMallocWithPseudoStackAndType}, 1194 {CC"NMTFree", CC"(J)V", (void*)&WB_NMTFree }, 1195 {CC"NMTReserveMemory", CC"(J)J", (void*)&WB_NMTReserveMemory }, 1196 {CC"NMTCommitMemory", CC"(JJ)V", (void*)&WB_NMTCommitMemory }, 1197 {CC"NMTUncommitMemory", CC"(JJ)V", (void*)&WB_NMTUncommitMemory }, 1198 {CC"NMTReleaseMemory", CC"(JJ)V", (void*)&WB_NMTReleaseMemory }, 1199 {CC"NMTIsDetailSupported",CC"()Z", (void*)&WB_NMTIsDetailSupported}, 1200 {CC"NMTChangeTrackingLevel", CC"()Z", (void*)&WB_NMTChangeTrackingLevel}, 1201 {CC"NMTGetHashSize", CC"()I", (void*)&WB_NMTGetHashSize }, 1202 #endif // INCLUDE_NMT 1203 {CC"deoptimizeAll", CC"()V", (void*)&WB_DeoptimizeAll }, 1204 {CC"deoptimizeMethod", CC"(Ljava/lang/reflect/Executable;Z)I", 1205 (void*)&WB_DeoptimizeMethod }, 1206 {CC"isMethodCompiled", CC"(Ljava/lang/reflect/Executable;Z)Z", 1207 (void*)&WB_IsMethodCompiled }, 1208 {CC"isMethodCompilable", CC"(Ljava/lang/reflect/Executable;IZ)Z", 1209 (void*)&WB_IsMethodCompilable}, 1210 {CC"isMethodQueuedForCompilation", 1211 CC"(Ljava/lang/reflect/Executable;)Z", (void*)&WB_IsMethodQueuedForCompilation}, 1212 {CC"makeMethodNotCompilable", 1213 CC"(Ljava/lang/reflect/Executable;IZ)V", (void*)&WB_MakeMethodNotCompilable}, 1214 {CC"testSetDontInlineMethod", 1215 CC"(Ljava/lang/reflect/Executable;Z)Z", (void*)&WB_TestSetDontInlineMethod}, 1216 {CC"getMethodCompilationLevel", 1217 CC"(Ljava/lang/reflect/Executable;Z)I", (void*)&WB_GetMethodCompilationLevel}, 1218 {CC"getMethodEntryBci", 1219 CC"(Ljava/lang/reflect/Executable;)I", (void*)&WB_GetMethodEntryBci}, 1220 {CC"getCompileQueueSize", 1221 CC"(I)I", (void*)&WB_GetCompileQueueSize}, 1222 {CC"testSetForceInlineMethod", 1223 CC"(Ljava/lang/reflect/Executable;Z)Z", (void*)&WB_TestSetForceInlineMethod}, 1224 {CC"enqueueMethodForCompilation", 1225 CC"(Ljava/lang/reflect/Executable;II)Z", (void*)&WB_EnqueueMethodForCompilation}, 1226 {CC"clearMethodState", 1227 CC"(Ljava/lang/reflect/Executable;)V", (void*)&WB_ClearMethodState}, 1228 {CC"markMethodProfiled", 1229 CC"(Ljava/lang/reflect/Executable;)V", (void*)&WB_MarkMethodProfiled}, 1230 {CC"setBooleanVMFlag", CC"(Ljava/lang/String;Z)V",(void*)&WB_SetBooleanVMFlag}, 1231 {CC"setIntxVMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetIntxVMFlag}, 1232 {CC"setUintxVMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetUintxVMFlag}, 1233 {CC"setUint64VMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetUint64VMFlag}, 1234 {CC"setDoubleVMFlag", CC"(Ljava/lang/String;D)V",(void*)&WB_SetDoubleVMFlag}, 1235 {CC"setStringVMFlag", CC"(Ljava/lang/String;Ljava/lang/String;)V", 1236 (void*)&WB_SetStringVMFlag}, 1237 {CC"getBooleanVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Boolean;", 1238 (void*)&WB_GetBooleanVMFlag}, 1239 {CC"getIntxVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;", 1240 (void*)&WB_GetIntxVMFlag}, 1241 {CC"getUintxVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;", 1242 (void*)&WB_GetUintxVMFlag}, 1243 {CC"getUint64VMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;", 1244 (void*)&WB_GetUint64VMFlag}, 1245 {CC"getDoubleVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Double;", 1246 (void*)&WB_GetDoubleVMFlag}, 1247 {CC"getStringVMFlag", CC"(Ljava/lang/String;)Ljava/lang/String;", 1248 (void*)&WB_GetStringVMFlag}, 1249 {CC"isInStringTable", CC"(Ljava/lang/String;)Z", (void*)&WB_IsInStringTable }, 1250 {CC"fullGC", CC"()V", (void*)&WB_FullGC }, 1251 {CC"youngGC", CC"()V", (void*)&WB_YoungGC }, 1252 {CC"readReservedMemory", CC"()V", (void*)&WB_ReadReservedMemory }, 1253 {CC"allocateCodeBlob", CC"(II)J", (void*)&WB_AllocateCodeBlob }, 1254 {CC"freeCodeBlob", CC"(J)V", (void*)&WB_FreeCodeBlob }, 1255 {CC"getCodeBlob", CC"(J)[Ljava/lang/Object;",(void*)&WB_GetCodeBlob }, 1256 {CC"allocateMetaspace", 1257 CC"(Ljava/lang/ClassLoader;J)J", (void*)&WB_AllocateMetaspace }, 1258 {CC"freeMetaspace", 1259 CC"(Ljava/lang/ClassLoader;JJ)V", (void*)&WB_FreeMetaspace }, 1260 {CC"incMetaspaceCapacityUntilGC", CC"(J)J", (void*)&WB_IncMetaspaceCapacityUntilGC }, 1261 {CC"metaspaceCapacityUntilGC", CC"()J", (void*)&WB_MetaspaceCapacityUntilGC }, 1262 {CC"getCPUFeatures", CC"()Ljava/lang/String;", (void*)&WB_GetCPUFeatures }, 1263 {CC"getNMethod", CC"(Ljava/lang/reflect/Executable;Z)[Ljava/lang/Object;", 1264 (void*)&WB_GetNMethod }, 1265 {CC"isMonitorInflated", CC"(Ljava/lang/Object;)Z", (void*)&WB_IsMonitorInflated }, 1266 {CC"forceSafepoint", CC"()V", (void*)&WB_ForceSafepoint }, 1267 {CC"checkLibSpecifiesNoexecstack", CC"(Ljava/lang/String;)Z", 1268 (void*)&WB_CheckLibSpecifiesNoexecstack}, 1269 {CC"isContainerized", CC"()Z", (void*)&WB_IsContainerized }, 1270 {CC"printOsInfo", CC"()V", (void*)&WB_PrintOsInfo }, 1271 }; 1272 1273 #undef CC 1274 1275 JVM_ENTRY(void, JVM_RegisterWhiteBoxMethods(JNIEnv* env, jclass wbclass)) 1276 { 1277 if (WhiteBoxAPI) { 1278 // Make sure that wbclass is loaded by the null classloader 1279 instanceKlassHandle ikh = instanceKlassHandle(JNIHandles::resolve(wbclass)->klass()); 1280 Handle loader(ikh->class_loader()); 1281 if (loader.is_null()) { 1282 WhiteBox::register_methods(env, wbclass, thread, methods, sizeof(methods) / sizeof(methods[0])); 1283 WhiteBox::register_extended(env, wbclass, thread); 1284 WhiteBox::set_used(); 1285 } 1286 } 1287 } 1288 JVM_END