1 /* 2 * Copyright (c) 2012, 2017, 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 <new> 28 29 #include "classfile/classLoaderData.hpp" 30 #include "classfile/modules.hpp" 31 #include "classfile/stringTable.hpp" 32 #include "code/codeCache.hpp" 33 #include "compiler/methodMatcher.hpp" 34 #include "compiler/directivesParser.hpp" 35 #include "jvmtifiles/jvmtiEnv.hpp" 36 #include "memory/metadataFactory.hpp" 37 #include "memory/metaspaceShared.hpp" 38 #include "memory/iterator.hpp" 39 #include "memory/resourceArea.hpp" 40 #include "memory/universe.hpp" 41 #include "memory/oopFactory.hpp" 42 #include "oops/array.hpp" 43 #include "oops/constantPool.hpp" 44 #include "oops/objArrayKlass.hpp" 45 #include "oops/objArrayOop.inline.hpp" 46 #include "oops/oop.inline.hpp" 47 #include "prims/wbtestmethods/parserTests.hpp" 48 #include "prims/whitebox.hpp" 49 #include "runtime/arguments.hpp" 50 #include "runtime/compilationPolicy.hpp" 51 #include "runtime/deoptimization.hpp" 52 #include "runtime/interfaceSupport.hpp" 53 #include "runtime/javaCalls.hpp" 54 #include "runtime/os.hpp" 55 #include "runtime/sweeper.hpp" 56 #include "runtime/thread.hpp" 57 #include "runtime/threadSMR.hpp" 58 #include "runtime/vm_version.hpp" 59 #include "utilities/align.hpp" 60 #include "utilities/debug.hpp" 61 #include "utilities/exceptions.hpp" 62 #include "utilities/macros.hpp" 63 #if INCLUDE_ALL_GCS 64 #include "gc/g1/concurrentMarkThread.hpp" 65 #include "gc/g1/g1CollectedHeap.inline.hpp" 66 #include "gc/g1/g1ConcurrentMark.hpp" 67 #include "gc/g1/heapRegionRemSet.hpp" 68 #include "gc/parallel/parallelScavengeHeap.inline.hpp" 69 #include "gc/parallel/adjoiningGenerations.hpp" 70 #endif // INCLUDE_ALL_GCS 71 #if INCLUDE_NMT 72 #include "services/mallocSiteTable.hpp" 73 #include "services/memTracker.hpp" 74 #include "utilities/nativeCallStack.hpp" 75 #endif // INCLUDE_NMT 76 77 78 #define SIZE_T_MAX_VALUE ((size_t) -1) 79 80 bool WhiteBox::_used = false; 81 volatile bool WhiteBox::compilation_locked = false; 82 83 class VM_WhiteBoxOperation : public VM_Operation { 84 public: 85 VM_WhiteBoxOperation() { } 86 VMOp_Type type() const { return VMOp_WhiteBoxOperation; } 87 bool allow_nested_vm_operations() const { return true; } 88 }; 89 90 91 WB_ENTRY(jlong, WB_GetObjectAddress(JNIEnv* env, jobject o, jobject obj)) 92 return (jlong)(void*)JNIHandles::resolve(obj); 93 WB_END 94 95 WB_ENTRY(jint, WB_GetHeapOopSize(JNIEnv* env, jobject o)) 96 return heapOopSize; 97 WB_END 98 99 WB_ENTRY(jint, WB_GetVMPageSize(JNIEnv* env, jobject o)) 100 return os::vm_page_size(); 101 WB_END 102 103 WB_ENTRY(jlong, WB_GetVMAllocationGranularity(JNIEnv* env, jobject o)) 104 return os::vm_allocation_granularity(); 105 WB_END 106 107 WB_ENTRY(jlong, WB_GetVMLargePageSize(JNIEnv* env, jobject o)) 108 return os::large_page_size(); 109 WB_END 110 111 class WBIsKlassAliveClosure : public KlassClosure { 112 Symbol* _name; 113 bool _found; 114 public: 115 WBIsKlassAliveClosure(Symbol* name) : _name(name), _found(false) {} 116 117 void do_klass(Klass* k) { 118 if (_found) return; 119 Symbol* ksym = k->name(); 120 if (ksym->fast_compare(_name) == 0) { 121 _found = true; 122 } 123 } 124 125 bool found() const { 126 return _found; 127 } 128 }; 129 130 WB_ENTRY(jboolean, WB_IsClassAlive(JNIEnv* env, jobject target, jstring name)) 131 oop h_name = JNIHandles::resolve(name); 132 if (h_name == NULL) return false; 133 Symbol* sym = java_lang_String::as_symbol(h_name, CHECK_false); 134 TempNewSymbol tsym(sym); // Make sure to decrement reference count on sym on return 135 136 WBIsKlassAliveClosure closure(sym); 137 ClassLoaderDataGraph::classes_do(&closure); 138 139 return closure.found(); 140 WB_END 141 142 WB_ENTRY(void, WB_AddToBootstrapClassLoaderSearch(JNIEnv* env, jobject o, jstring segment)) { 143 #if INCLUDE_JVMTI 144 ResourceMark rm; 145 const char* seg = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(segment)); 146 JvmtiEnv* jvmti_env = JvmtiEnv::create_a_jvmti(JVMTI_VERSION); 147 jvmtiError err = jvmti_env->AddToBootstrapClassLoaderSearch(seg); 148 assert(err == JVMTI_ERROR_NONE, "must not fail"); 149 #endif 150 } 151 WB_END 152 153 WB_ENTRY(void, WB_AddToSystemClassLoaderSearch(JNIEnv* env, jobject o, jstring segment)) { 154 #if INCLUDE_JVMTI 155 ResourceMark rm; 156 const char* seg = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(segment)); 157 JvmtiEnv* jvmti_env = JvmtiEnv::create_a_jvmti(JVMTI_VERSION); 158 jvmtiError err = jvmti_env->AddToSystemClassLoaderSearch(seg); 159 assert(err == JVMTI_ERROR_NONE, "must not fail"); 160 #endif 161 } 162 WB_END 163 164 165 WB_ENTRY(jlong, WB_GetCompressedOopsMaxHeapSize(JNIEnv* env, jobject o)) { 166 return (jlong)Arguments::max_heap_for_compressed_oops(); 167 } 168 WB_END 169 170 WB_ENTRY(void, WB_PrintHeapSizes(JNIEnv* env, jobject o)) { 171 CollectorPolicy * p = Universe::heap()->collector_policy(); 172 tty->print_cr("Minimum heap " SIZE_FORMAT " Initial heap " 173 SIZE_FORMAT " Maximum heap " SIZE_FORMAT " Space alignment " SIZE_FORMAT " Heap alignment " SIZE_FORMAT, 174 p->min_heap_byte_size(), p->initial_heap_byte_size(), p->max_heap_byte_size(), 175 p->space_alignment(), p->heap_alignment()); 176 } 177 WB_END 178 179 #ifndef PRODUCT 180 // Forward declaration 181 void TestReservedSpace_test(); 182 void TestReserveMemorySpecial_test(); 183 void TestVirtualSpace_test(); 184 void TestMetaspaceAux_test(); 185 #endif 186 187 WB_ENTRY(void, WB_RunMemoryUnitTests(JNIEnv* env, jobject o)) 188 #ifndef PRODUCT 189 TestReservedSpace_test(); 190 TestReserveMemorySpecial_test(); 191 TestVirtualSpace_test(); 192 TestMetaspaceAux_test(); 193 #endif 194 WB_END 195 196 WB_ENTRY(void, WB_ReadFromNoaccessArea(JNIEnv* env, jobject o)) 197 size_t granularity = os::vm_allocation_granularity(); 198 ReservedHeapSpace rhs(100 * granularity, granularity, false); 199 VirtualSpace vs; 200 vs.initialize(rhs, 50 * granularity); 201 202 // Check if constraints are complied 203 if (!( UseCompressedOops && rhs.base() != NULL && 204 Universe::narrow_oop_base() != NULL && 205 Universe::narrow_oop_use_implicit_null_checks() )) { 206 tty->print_cr("WB_ReadFromNoaccessArea method is useless:\n " 207 "\tUseCompressedOops is %d\n" 208 "\trhs.base() is " PTR_FORMAT "\n" 209 "\tUniverse::narrow_oop_base() is " PTR_FORMAT "\n" 210 "\tUniverse::narrow_oop_use_implicit_null_checks() is %d", 211 UseCompressedOops, 212 p2i(rhs.base()), 213 p2i(Universe::narrow_oop_base()), 214 Universe::narrow_oop_use_implicit_null_checks()); 215 return; 216 } 217 tty->print_cr("Reading from no access area... "); 218 tty->print_cr("*(vs.low_boundary() - rhs.noaccess_prefix() / 2 ) = %c", 219 *(vs.low_boundary() - rhs.noaccess_prefix() / 2 )); 220 WB_END 221 222 static jint wb_stress_virtual_space_resize(size_t reserved_space_size, 223 size_t magnitude, size_t iterations) { 224 size_t granularity = os::vm_allocation_granularity(); 225 ReservedHeapSpace rhs(reserved_space_size * granularity, granularity, false); 226 VirtualSpace vs; 227 if (!vs.initialize(rhs, 0)) { 228 tty->print_cr("Failed to initialize VirtualSpace. Can't proceed."); 229 return 3; 230 } 231 232 int seed = os::random(); 233 tty->print_cr("Random seed is %d", seed); 234 os::init_random(seed); 235 236 for (size_t i = 0; i < iterations; i++) { 237 238 // Whether we will shrink or grow 239 bool shrink = os::random() % 2L == 0; 240 241 // Get random delta to resize virtual space 242 size_t delta = (size_t)os::random() % magnitude; 243 244 // If we are about to shrink virtual space below zero, then expand instead 245 if (shrink && vs.committed_size() < delta) { 246 shrink = false; 247 } 248 249 // Resizing by delta 250 if (shrink) { 251 vs.shrink_by(delta); 252 } else { 253 // If expanding fails expand_by will silently return false 254 vs.expand_by(delta, true); 255 } 256 } 257 return 0; 258 } 259 260 WB_ENTRY(jint, WB_StressVirtualSpaceResize(JNIEnv* env, jobject o, 261 jlong reserved_space_size, jlong magnitude, jlong iterations)) 262 tty->print_cr("reservedSpaceSize=" JLONG_FORMAT ", magnitude=" JLONG_FORMAT ", " 263 "iterations=" JLONG_FORMAT "\n", reserved_space_size, magnitude, 264 iterations); 265 if (reserved_space_size < 0 || magnitude < 0 || iterations < 0) { 266 tty->print_cr("One of variables printed above is negative. Can't proceed.\n"); 267 return 1; 268 } 269 270 // sizeof(size_t) depends on whether OS is 32bit or 64bit. sizeof(jlong) is 271 // always 8 byte. That's why we should avoid overflow in case of 32bit platform. 272 if (sizeof(size_t) < sizeof(jlong)) { 273 jlong size_t_max_value = (jlong) SIZE_T_MAX_VALUE; 274 if (reserved_space_size > size_t_max_value || magnitude > size_t_max_value 275 || iterations > size_t_max_value) { 276 tty->print_cr("One of variables printed above overflows size_t. Can't proceed.\n"); 277 return 2; 278 } 279 } 280 281 return wb_stress_virtual_space_resize((size_t) reserved_space_size, 282 (size_t) magnitude, (size_t) iterations); 283 WB_END 284 285 static const jint serial_code = 1; 286 static const jint parallel_code = 2; 287 static const jint cms_code = 4; 288 static const jint g1_code = 8; 289 290 WB_ENTRY(jint, WB_CurrentGC(JNIEnv* env, jobject o, jobject obj)) 291 if (UseSerialGC) { 292 return serial_code; 293 } else if (UseParallelGC || UseParallelOldGC) { 294 return parallel_code; 295 } if (UseConcMarkSweepGC) { 296 return cms_code; 297 } else if (UseG1GC) { 298 return g1_code; 299 } 300 ShouldNotReachHere(); 301 return 0; 302 WB_END 303 304 WB_ENTRY(jint, WB_AllSupportedGC(JNIEnv* env, jobject o, jobject obj)) 305 #if INCLUDE_ALL_GCS 306 return serial_code | parallel_code | cms_code | g1_code; 307 #else 308 return serial_code; 309 #endif // INCLUDE_ALL_GCS 310 WB_END 311 312 WB_ENTRY(jboolean, WB_GCSelectedByErgo(JNIEnv* env, jobject o, jobject obj)) 313 if (UseSerialGC) { 314 return FLAG_IS_ERGO(UseSerialGC); 315 } else if (UseParallelGC) { 316 return FLAG_IS_ERGO(UseParallelGC); 317 } else if (UseParallelOldGC) { 318 return FLAG_IS_ERGO(UseParallelOldGC); 319 } else if (UseConcMarkSweepGC) { 320 return FLAG_IS_ERGO(UseConcMarkSweepGC); 321 } else if (UseG1GC) { 322 return FLAG_IS_ERGO(UseG1GC); 323 } 324 ShouldNotReachHere(); 325 return false; 326 WB_END 327 328 WB_ENTRY(jboolean, WB_isObjectInOldGen(JNIEnv* env, jobject o, jobject obj)) 329 oop p = JNIHandles::resolve(obj); 330 #if INCLUDE_ALL_GCS 331 if (UseG1GC) { 332 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 333 const HeapRegion* hr = g1->heap_region_containing(p); 334 if (hr == NULL) { 335 return false; 336 } 337 return !(hr->is_young()); 338 } else if (UseParallelGC) { 339 ParallelScavengeHeap* psh = ParallelScavengeHeap::heap(); 340 return !psh->is_in_young(p); 341 } 342 #endif // INCLUDE_ALL_GCS 343 GenCollectedHeap* gch = GenCollectedHeap::heap(); 344 return !gch->is_in_young(p); 345 WB_END 346 347 WB_ENTRY(jlong, WB_GetObjectSize(JNIEnv* env, jobject o, jobject obj)) 348 oop p = JNIHandles::resolve(obj); 349 return p->size() * HeapWordSize; 350 WB_END 351 352 WB_ENTRY(jlong, WB_GetHeapSpaceAlignment(JNIEnv* env, jobject o)) 353 size_t alignment = Universe::heap()->collector_policy()->space_alignment(); 354 return (jlong)alignment; 355 WB_END 356 357 WB_ENTRY(jlong, WB_GetHeapAlignment(JNIEnv* env, jobject o)) 358 size_t alignment = Universe::heap()->collector_policy()->heap_alignment(); 359 return (jlong)alignment; 360 WB_END 361 362 WB_ENTRY(jboolean, WB_SupportsConcurrentGCPhaseControl(JNIEnv* env, jobject o)) 363 return Universe::heap()->supports_concurrent_phase_control(); 364 WB_END 365 366 WB_ENTRY(jobjectArray, WB_GetConcurrentGCPhases(JNIEnv* env, jobject o)) 367 const char* const* phases = Universe::heap()->concurrent_phases(); 368 jint nphases = 0; 369 for ( ; phases[nphases] != NULL; ++nphases) ; 370 371 ResourceMark rm(thread); 372 ThreadToNativeFromVM ttn(thread); 373 jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string()); 374 CHECK_JNI_EXCEPTION_(env, NULL); 375 376 jobjectArray result = env->NewObjectArray(nphases, clazz, NULL); 377 CHECK_JNI_EXCEPTION_(env, NULL); 378 379 // If push fails, return with pending exception. 380 if (env->PushLocalFrame(nphases) < 0) return NULL; 381 for (jint i = 0; i < nphases; ++i) { 382 jstring phase = env->NewStringUTF(phases[i]); 383 CHECK_JNI_EXCEPTION_(env, NULL); 384 env->SetObjectArrayElement(result, i, phase); 385 CHECK_JNI_EXCEPTION_(env, NULL); 386 } 387 env->PopLocalFrame(NULL); 388 389 return result; 390 WB_END 391 392 WB_ENTRY(jboolean, WB_RequestConcurrentGCPhase(JNIEnv* env, jobject o, jstring name)) 393 Handle h_name(THREAD, JNIHandles::resolve(name)); 394 ResourceMark rm; 395 const char* c_name = java_lang_String::as_utf8_string(h_name()); 396 return Universe::heap()->request_concurrent_phase(c_name); 397 WB_END 398 399 #if INCLUDE_ALL_GCS 400 WB_ENTRY(jboolean, WB_G1IsHumongous(JNIEnv* env, jobject o, jobject obj)) 401 if (UseG1GC) { 402 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 403 oop result = JNIHandles::resolve(obj); 404 const HeapRegion* hr = g1->heap_region_containing(result); 405 return hr->is_humongous(); 406 } 407 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1IsHumongous: G1 GC is not enabled"); 408 WB_END 409 410 WB_ENTRY(jboolean, WB_G1BelongsToHumongousRegion(JNIEnv* env, jobject o, jlong addr)) 411 if (UseG1GC) { 412 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 413 const HeapRegion* hr = g1->heap_region_containing((void*) addr); 414 return hr->is_humongous(); 415 } 416 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1BelongsToHumongousRegion: G1 GC is not enabled"); 417 WB_END 418 419 WB_ENTRY(jboolean, WB_G1BelongsToFreeRegion(JNIEnv* env, jobject o, jlong addr)) 420 if (UseG1GC) { 421 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 422 const HeapRegion* hr = g1->heap_region_containing((void*) addr); 423 return hr->is_free(); 424 } 425 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1BelongsToFreeRegion: G1 GC is not enabled"); 426 WB_END 427 428 WB_ENTRY(jlong, WB_G1NumMaxRegions(JNIEnv* env, jobject o)) 429 if (UseG1GC) { 430 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 431 size_t nr = g1->max_regions(); 432 return (jlong)nr; 433 } 434 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1NumMaxRegions: G1 GC is not enabled"); 435 WB_END 436 437 WB_ENTRY(jlong, WB_G1NumFreeRegions(JNIEnv* env, jobject o)) 438 if (UseG1GC) { 439 G1CollectedHeap* g1 = G1CollectedHeap::heap(); 440 size_t nr = g1->num_free_regions(); 441 return (jlong)nr; 442 } 443 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1NumFreeRegions: G1 GC is not enabled"); 444 WB_END 445 446 WB_ENTRY(jboolean, WB_G1InConcurrentMark(JNIEnv* env, jobject o)) 447 if (UseG1GC) { 448 G1CollectedHeap* g1h = G1CollectedHeap::heap(); 449 return g1h->concurrent_mark()->cmThread()->during_cycle(); 450 } 451 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1InConcurrentMark: G1 GC is not enabled"); 452 WB_END 453 454 WB_ENTRY(jboolean, WB_G1StartMarkCycle(JNIEnv* env, jobject o)) 455 if (UseG1GC) { 456 G1CollectedHeap* g1h = G1CollectedHeap::heap(); 457 if (!g1h->concurrent_mark()->cmThread()->during_cycle()) { 458 g1h->collect(GCCause::_wb_conc_mark); 459 return true; 460 } 461 return false; 462 } 463 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1StartMarkCycle: G1 GC is not enabled"); 464 WB_END 465 466 WB_ENTRY(jint, WB_G1RegionSize(JNIEnv* env, jobject o)) 467 if (UseG1GC) { 468 return (jint)HeapRegion::GrainBytes; 469 } 470 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1RegionSize: G1 GC is not enabled"); 471 WB_END 472 473 WB_ENTRY(jlong, WB_PSVirtualSpaceAlignment(JNIEnv* env, jobject o)) 474 #if INCLUDE_ALL_GCS 475 if (UseParallelGC) { 476 return ParallelScavengeHeap::heap()->gens()->virtual_spaces()->alignment(); 477 } 478 #endif // INCLUDE_ALL_GCS 479 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_PSVirtualSpaceAlignment: Parallel GC is not enabled"); 480 WB_END 481 482 WB_ENTRY(jlong, WB_PSHeapGenerationAlignment(JNIEnv* env, jobject o)) 483 #if INCLUDE_ALL_GCS 484 if (UseParallelGC) { 485 return ParallelScavengeHeap::heap()->generation_alignment(); 486 } 487 #endif // INCLUDE_ALL_GCS 488 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_PSHeapGenerationAlignment: Parallel GC is not enabled"); 489 WB_END 490 491 WB_ENTRY(jobject, WB_G1AuxiliaryMemoryUsage(JNIEnv* env)) 492 #if INCLUDE_ALL_GCS 493 if (UseG1GC) { 494 ResourceMark rm(THREAD); 495 G1CollectedHeap* g1h = G1CollectedHeap::heap(); 496 MemoryUsage usage = g1h->get_auxiliary_data_memory_usage(); 497 Handle h = MemoryService::create_MemoryUsage_obj(usage, CHECK_NULL); 498 return JNIHandles::make_local(env, h()); 499 } 500 #endif // INCLUDE_ALL_GCS 501 THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1AuxiliaryMemoryUsage: G1 GC is not enabled"); 502 WB_END 503 504 class OldRegionsLivenessClosure: public HeapRegionClosure { 505 506 private: 507 const int _liveness; 508 size_t _total_count; 509 size_t _total_memory; 510 size_t _total_memory_to_free; 511 512 public: 513 OldRegionsLivenessClosure(int liveness) : 514 _liveness(liveness), 515 _total_count(0), 516 _total_memory(0), 517 _total_memory_to_free(0) { } 518 519 size_t total_count() { return _total_count; } 520 size_t total_memory() { return _total_memory; } 521 size_t total_memory_to_free() { return _total_memory_to_free; } 522 523 bool doHeapRegion(HeapRegion* r) { 524 if (r->is_old()) { 525 size_t prev_live = r->marked_bytes(); 526 size_t live = r->live_bytes(); 527 size_t size = r->used(); 528 size_t reg_size = HeapRegion::GrainBytes; 529 if (size > 0 && ((int)(live * 100 / size) < _liveness)) { 530 _total_memory += size; 531 ++_total_count; 532 if (size == reg_size) { 533 // we don't include non-full regions since they are unlikely included in mixed gc 534 // for testing purposes it's enough to have lowest estimation of total memory that is expected to be freed 535 _total_memory_to_free += size - prev_live; 536 } 537 } 538 } 539 return false; 540 } 541 }; 542 543 544 WB_ENTRY(jlongArray, WB_G1GetMixedGCInfo(JNIEnv* env, jobject o, jint liveness)) 545 if (!UseG1GC) { 546 THROW_MSG_NULL(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1GetMixedGCInfo: G1 GC is not enabled"); 547 } 548 if (liveness < 0) { 549 THROW_MSG_NULL(vmSymbols::java_lang_IllegalArgumentException(), "liveness value should be non-negative"); 550 } 551 552 G1CollectedHeap* g1h = G1CollectedHeap::heap(); 553 OldRegionsLivenessClosure rli(liveness); 554 g1h->heap_region_iterate(&rli); 555 556 typeArrayOop result = oopFactory::new_longArray(3, CHECK_NULL); 557 result->long_at_put(0, rli.total_count()); 558 result->long_at_put(1, rli.total_memory()); 559 result->long_at_put(2, rli.total_memory_to_free()); 560 return (jlongArray) JNIHandles::make_local(env, result); 561 WB_END 562 563 #endif // INCLUDE_ALL_GCS 564 565 #if INCLUDE_NMT 566 // Alloc memory using the test memory type so that we can use that to see if 567 // NMT picks it up correctly 568 WB_ENTRY(jlong, WB_NMTMalloc(JNIEnv* env, jobject o, jlong size)) 569 jlong addr = 0; 570 addr = (jlong)(uintptr_t)os::malloc(size, mtTest); 571 return addr; 572 WB_END 573 574 // Alloc memory with pseudo call stack. The test can create psudo malloc 575 // allocation site to stress the malloc tracking. 576 WB_ENTRY(jlong, WB_NMTMallocWithPseudoStack(JNIEnv* env, jobject o, jlong size, jint pseudo_stack)) 577 address pc = (address)(size_t)pseudo_stack; 578 NativeCallStack stack(&pc, 1); 579 return (jlong)(uintptr_t)os::malloc(size, mtTest, stack); 580 WB_END 581 582 // Free the memory allocated by NMTAllocTest 583 WB_ENTRY(void, WB_NMTFree(JNIEnv* env, jobject o, jlong mem)) 584 os::free((void*)(uintptr_t)mem); 585 WB_END 586 587 WB_ENTRY(jlong, WB_NMTReserveMemory(JNIEnv* env, jobject o, jlong size)) 588 jlong addr = 0; 589 590 addr = (jlong)(uintptr_t)os::reserve_memory(size); 591 MemTracker::record_virtual_memory_type((address)addr, mtTest); 592 593 return addr; 594 WB_END 595 596 WB_ENTRY(void, WB_NMTCommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size)) 597 os::commit_memory((char *)(uintptr_t)addr, size, !ExecMem); 598 MemTracker::record_virtual_memory_type((address)(uintptr_t)addr, mtTest); 599 WB_END 600 601 WB_ENTRY(void, WB_NMTUncommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size)) 602 os::uncommit_memory((char *)(uintptr_t)addr, size); 603 WB_END 604 605 WB_ENTRY(void, WB_NMTReleaseMemory(JNIEnv* env, jobject o, jlong addr, jlong size)) 606 os::release_memory((char *)(uintptr_t)addr, size); 607 WB_END 608 609 WB_ENTRY(jboolean, WB_NMTChangeTrackingLevel(JNIEnv* env)) 610 // Test that we can downgrade NMT levels but not upgrade them. 611 if (MemTracker::tracking_level() == NMT_off) { 612 MemTracker::transition_to(NMT_off); 613 return MemTracker::tracking_level() == NMT_off; 614 } else { 615 assert(MemTracker::tracking_level() == NMT_detail, "Should start out as detail tracking"); 616 MemTracker::transition_to(NMT_summary); 617 assert(MemTracker::tracking_level() == NMT_summary, "Should be summary now"); 618 619 // Can't go to detail once NMT is set to summary. 620 MemTracker::transition_to(NMT_detail); 621 assert(MemTracker::tracking_level() == NMT_summary, "Should still be summary now"); 622 623 // Shutdown sets tracking level to minimal. 624 MemTracker::shutdown(); 625 assert(MemTracker::tracking_level() == NMT_minimal, "Should be minimal now"); 626 627 // Once the tracking level is minimal, we cannot increase to summary. 628 // The code ignores this request instead of asserting because if the malloc site 629 // table overflows in another thread, it tries to change the code to summary. 630 MemTracker::transition_to(NMT_summary); 631 assert(MemTracker::tracking_level() == NMT_minimal, "Should still be minimal now"); 632 633 // Really can never go up to detail, verify that the code would never do this. 634 MemTracker::transition_to(NMT_detail); 635 assert(MemTracker::tracking_level() == NMT_minimal, "Should still be minimal now"); 636 return MemTracker::tracking_level() == NMT_minimal; 637 } 638 WB_END 639 640 WB_ENTRY(jint, WB_NMTGetHashSize(JNIEnv* env, jobject o)) 641 int hash_size = MallocSiteTable::hash_buckets(); 642 assert(hash_size > 0, "NMT hash_size should be > 0"); 643 return (jint)hash_size; 644 WB_END 645 #endif // INCLUDE_NMT 646 647 static jmethodID reflected_method_to_jmid(JavaThread* thread, JNIEnv* env, jobject method) { 648 assert(method != NULL, "method should not be null"); 649 ThreadToNativeFromVM ttn(thread); 650 return env->FromReflectedMethod(method); 651 } 652 653 // Deoptimizes all compiled frames and makes nmethods not entrant if it's requested 654 class VM_WhiteBoxDeoptimizeFrames : public VM_WhiteBoxOperation { 655 private: 656 int _result; 657 const bool _make_not_entrant; 658 public: 659 VM_WhiteBoxDeoptimizeFrames(bool make_not_entrant) : 660 _result(0), _make_not_entrant(make_not_entrant) { } 661 int result() const { return _result; } 662 663 void doit() { 664 for (JavaThreadIteratorWithHandle jtiwh; JavaThread *t = jtiwh.next(); ) { 665 if (t->has_last_Java_frame()) { 666 for (StackFrameStream fst(t, UseBiasedLocking); !fst.is_done(); fst.next()) { 667 frame* f = fst.current(); 668 if (f->can_be_deoptimized() && !f->is_deoptimized_frame()) { 669 RegisterMap* reg_map = fst.register_map(); 670 Deoptimization::deoptimize(t, *f, reg_map); 671 if (_make_not_entrant) { 672 CompiledMethod* cm = CodeCache::find_compiled(f->pc()); 673 assert(cm != NULL, "sanity check"); 674 cm->make_not_entrant(); 675 } 676 ++_result; 677 } 678 } 679 } 680 } 681 } 682 }; 683 684 WB_ENTRY(jint, WB_DeoptimizeFrames(JNIEnv* env, jobject o, jboolean make_not_entrant)) 685 VM_WhiteBoxDeoptimizeFrames op(make_not_entrant == JNI_TRUE); 686 VMThread::execute(&op); 687 return op.result(); 688 WB_END 689 690 WB_ENTRY(void, WB_DeoptimizeAll(JNIEnv* env, jobject o)) 691 MutexLockerEx mu(Compile_lock); 692 CodeCache::mark_all_nmethods_for_deoptimization(); 693 VM_Deoptimize op; 694 VMThread::execute(&op); 695 WB_END 696 697 WB_ENTRY(jint, WB_DeoptimizeMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr)) 698 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 699 int result = 0; 700 CHECK_JNI_EXCEPTION_(env, result); 701 MutexLockerEx mu(Compile_lock); 702 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 703 if (is_osr) { 704 result += mh->mark_osr_nmethods(); 705 } else if (mh->code() != NULL) { 706 mh->code()->mark_for_deoptimization(); 707 ++result; 708 } 709 result += CodeCache::mark_for_deoptimization(mh()); 710 if (result > 0) { 711 VM_Deoptimize op; 712 VMThread::execute(&op); 713 } 714 return result; 715 WB_END 716 717 WB_ENTRY(jboolean, WB_IsMethodCompiled(JNIEnv* env, jobject o, jobject method, jboolean is_osr)) 718 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 719 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 720 MutexLockerEx mu(Compile_lock); 721 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 722 CompiledMethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code(); 723 if (code == NULL) { 724 return JNI_FALSE; 725 } 726 return (code->is_alive() && !code->is_marked_for_deoptimization()); 727 WB_END 728 729 WB_ENTRY(jboolean, WB_IsMethodCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr)) 730 if (method == NULL || comp_level > MIN2((CompLevel) TieredStopAtLevel, CompLevel_highest_tier)) { 731 return false; 732 } 733 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 734 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 735 MutexLockerEx mu(Compile_lock); 736 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 737 if (is_osr) { 738 return CompilationPolicy::can_be_osr_compiled(mh, comp_level); 739 } else { 740 return CompilationPolicy::can_be_compiled(mh, comp_level); 741 } 742 WB_END 743 744 WB_ENTRY(jboolean, WB_IsMethodQueuedForCompilation(JNIEnv* env, jobject o, jobject method)) 745 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 746 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 747 MutexLockerEx mu(Compile_lock); 748 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 749 return mh->queued_for_compilation(); 750 WB_END 751 752 WB_ENTRY(jboolean, WB_IsIntrinsicAvailable(JNIEnv* env, jobject o, jobject method, jobject compilation_context, jint compLevel)) 753 if (compLevel < CompLevel_none || compLevel > MIN2((CompLevel) TieredStopAtLevel, CompLevel_highest_tier)) { 754 return false; // Intrinsic is not available on a non-existent compilation level. 755 } 756 jmethodID method_id, compilation_context_id; 757 method_id = reflected_method_to_jmid(thread, env, method); 758 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 759 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(method_id)); 760 761 DirectiveSet* directive; 762 AbstractCompiler* comp = CompileBroker::compiler((int)compLevel); 763 assert(comp != NULL, "compiler not available"); 764 if (compilation_context != NULL) { 765 compilation_context_id = reflected_method_to_jmid(thread, env, compilation_context); 766 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 767 methodHandle cch(THREAD, Method::checked_resolve_jmethod_id(compilation_context_id)); 768 directive = DirectivesStack::getMatchingDirective(cch, comp); 769 } else { 770 // Calling with NULL matches default directive 771 directive = DirectivesStack::getDefaultDirective(comp); 772 } 773 bool result = comp->is_intrinsic_available(mh, directive); 774 DirectivesStack::release(directive); 775 return result; 776 WB_END 777 778 WB_ENTRY(jint, WB_GetMethodCompilationLevel(JNIEnv* env, jobject o, jobject method, jboolean is_osr)) 779 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 780 CHECK_JNI_EXCEPTION_(env, CompLevel_none); 781 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 782 CompiledMethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code(); 783 return (code != NULL ? code->comp_level() : CompLevel_none); 784 WB_END 785 786 WB_ENTRY(void, WB_MakeMethodNotCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr)) 787 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 788 CHECK_JNI_EXCEPTION(env); 789 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 790 if (is_osr) { 791 mh->set_not_osr_compilable(comp_level, true /* report */, "WhiteBox"); 792 } else { 793 mh->set_not_compilable(comp_level, true /* report */, "WhiteBox"); 794 } 795 WB_END 796 797 WB_ENTRY(jint, WB_GetMethodEntryBci(JNIEnv* env, jobject o, jobject method)) 798 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 799 CHECK_JNI_EXCEPTION_(env, InvocationEntryBci); 800 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 801 CompiledMethod* code = mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false); 802 return (code != NULL && code->is_osr_method() ? code->osr_entry_bci() : InvocationEntryBci); 803 WB_END 804 805 WB_ENTRY(jboolean, WB_TestSetDontInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value)) 806 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 807 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 808 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 809 bool result = mh->dont_inline(); 810 mh->set_dont_inline(value == JNI_TRUE); 811 return result; 812 WB_END 813 814 WB_ENTRY(jint, WB_GetCompileQueueSize(JNIEnv* env, jobject o, jint comp_level)) 815 if (comp_level == CompLevel_any) { 816 return CompileBroker::queue_size(CompLevel_full_optimization) /* C2 */ + 817 CompileBroker::queue_size(CompLevel_full_profile) /* C1 */; 818 } else { 819 return CompileBroker::queue_size(comp_level); 820 } 821 WB_END 822 823 WB_ENTRY(jboolean, WB_TestSetForceInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value)) 824 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 825 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 826 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 827 bool result = mh->force_inline(); 828 mh->set_force_inline(value == JNI_TRUE); 829 return result; 830 WB_END 831 832 bool WhiteBox::compile_method(Method* method, int comp_level, int bci, Thread* THREAD) { 833 // Screen for unavailable/bad comp level or null method 834 if (method == NULL || comp_level > MIN2((CompLevel) TieredStopAtLevel, CompLevel_highest_tier) || 835 CompileBroker::compiler(comp_level) == NULL) { 836 return false; 837 } 838 methodHandle mh(THREAD, method); 839 nmethod* nm = CompileBroker::compile_method(mh, bci, comp_level, mh, mh->invocation_count(), CompileTask::Reason_Whitebox, THREAD); 840 MutexLockerEx mu(Compile_lock); 841 return (mh->queued_for_compilation() || nm != NULL); 842 } 843 844 WB_ENTRY(jboolean, WB_EnqueueMethodForCompilation(JNIEnv* env, jobject o, jobject method, jint comp_level, jint bci)) 845 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 846 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 847 return WhiteBox::compile_method(Method::checked_resolve_jmethod_id(jmid), comp_level, bci, THREAD); 848 WB_END 849 850 WB_ENTRY(jboolean, WB_EnqueueInitializerForCompilation(JNIEnv* env, jobject o, jclass klass, jint comp_level)) 851 InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass))); 852 return WhiteBox::compile_method(ik->class_initializer(), comp_level, InvocationEntryBci, THREAD); 853 WB_END 854 855 WB_ENTRY(jboolean, WB_ShouldPrintAssembly(JNIEnv* env, jobject o, jobject method, jint comp_level)) 856 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 857 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 858 859 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 860 DirectiveSet* directive = DirectivesStack::getMatchingDirective(mh, CompileBroker::compiler(comp_level)); 861 bool result = directive->PrintAssemblyOption; 862 DirectivesStack::release(directive); 863 864 return result; 865 WB_END 866 867 WB_ENTRY(jint, WB_MatchesInline(JNIEnv* env, jobject o, jobject method, jstring pattern)) 868 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 869 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 870 871 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 872 873 ResourceMark rm; 874 const char* error_msg = NULL; 875 char* method_str = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(pattern)); 876 InlineMatcher* m = InlineMatcher::parse_inline_pattern(method_str, error_msg); 877 878 if (m == NULL) { 879 assert(error_msg != NULL, "Always have an error message"); 880 tty->print_cr("Got error: %s", error_msg); 881 return -1; // Pattern failed 882 } 883 884 // Pattern works - now check if it matches 885 int result; 886 if (m->match(mh, InlineMatcher::force_inline)) { 887 result = 2; // Force inline match 888 } else if (m->match(mh, InlineMatcher::dont_inline)) { 889 result = 1; // Dont inline match 890 } else { 891 result = 0; // No match 892 } 893 delete m; 894 return result; 895 WB_END 896 897 WB_ENTRY(jint, WB_MatchesMethod(JNIEnv* env, jobject o, jobject method, jstring pattern)) 898 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 899 CHECK_JNI_EXCEPTION_(env, JNI_FALSE); 900 901 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 902 903 ResourceMark rm; 904 char* method_str = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(pattern)); 905 906 const char* error_msg = NULL; 907 908 BasicMatcher* m = BasicMatcher::parse_method_pattern(method_str, error_msg); 909 if (m == NULL) { 910 assert(error_msg != NULL, "Must have error_msg"); 911 tty->print_cr("Got error: %s", error_msg); 912 return -1; 913 } 914 915 // Pattern works - now check if it matches 916 int result = m->matches(mh); 917 delete m; 918 assert(result == 0 || result == 1, "Result out of range"); 919 return result; 920 WB_END 921 922 static AlwaysFalseClosure always_false; 923 924 WB_ENTRY(void, WB_ClearMethodState(JNIEnv* env, jobject o, jobject method)) 925 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 926 CHECK_JNI_EXCEPTION(env); 927 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 928 MutexLockerEx mu(Compile_lock); 929 MethodData* mdo = mh->method_data(); 930 MethodCounters* mcs = mh->method_counters(); 931 932 if (mdo != NULL) { 933 mdo->init(); 934 ResourceMark rm; 935 int arg_count = mdo->method()->size_of_parameters(); 936 for (int i = 0; i < arg_count; i++) { 937 mdo->set_arg_modified(i, 0); 938 } 939 MutexLockerEx mu(mdo->extra_data_lock()); 940 mdo->clean_method_data(&always_false); 941 } 942 943 mh->clear_not_c1_compilable(); 944 mh->clear_not_c2_compilable(); 945 mh->clear_not_c2_osr_compilable(); 946 NOT_PRODUCT(mh->set_compiled_invocation_count(0)); 947 if (mcs != NULL) { 948 mcs->backedge_counter()->init(); 949 mcs->invocation_counter()->init(); 950 mcs->set_interpreter_invocation_count(0); 951 mcs->set_interpreter_throwout_count(0); 952 953 #ifdef TIERED 954 mcs->set_rate(0.0F); 955 mh->set_prev_event_count(0); 956 mh->set_prev_time(0); 957 #endif 958 } 959 WB_END 960 961 template <typename T> 962 static bool GetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value, Flag::Error (*TAt)(const char*, T*, bool, bool)) { 963 if (name == NULL) { 964 return false; 965 } 966 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 967 const char* flag_name = env->GetStringUTFChars(name, NULL); 968 CHECK_JNI_EXCEPTION_(env, false); 969 Flag::Error result = (*TAt)(flag_name, value, true, true); 970 env->ReleaseStringUTFChars(name, flag_name); 971 return (result == Flag::SUCCESS); 972 } 973 974 template <typename T> 975 static bool SetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value, Flag::Error (*TAtPut)(const char*, T*, Flag::Flags)) { 976 if (name == NULL) { 977 return false; 978 } 979 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 980 const char* flag_name = env->GetStringUTFChars(name, NULL); 981 CHECK_JNI_EXCEPTION_(env, false); 982 Flag::Error result = (*TAtPut)(flag_name, value, Flag::INTERNAL); 983 env->ReleaseStringUTFChars(name, flag_name); 984 return (result == Flag::SUCCESS); 985 } 986 987 template <typename T> 988 static jobject box(JavaThread* thread, JNIEnv* env, Symbol* name, Symbol* sig, T value) { 989 ResourceMark rm(thread); 990 jclass clazz = env->FindClass(name->as_C_string()); 991 CHECK_JNI_EXCEPTION_(env, NULL); 992 jmethodID methodID = env->GetStaticMethodID(clazz, 993 vmSymbols::valueOf_name()->as_C_string(), 994 sig->as_C_string()); 995 CHECK_JNI_EXCEPTION_(env, NULL); 996 jobject result = env->CallStaticObjectMethod(clazz, methodID, value); 997 CHECK_JNI_EXCEPTION_(env, NULL); 998 return result; 999 } 1000 1001 static jobject booleanBox(JavaThread* thread, JNIEnv* env, jboolean value) { 1002 return box(thread, env, vmSymbols::java_lang_Boolean(), vmSymbols::Boolean_valueOf_signature(), value); 1003 } 1004 static jobject integerBox(JavaThread* thread, JNIEnv* env, jint value) { 1005 return box(thread, env, vmSymbols::java_lang_Integer(), vmSymbols::Integer_valueOf_signature(), value); 1006 } 1007 static jobject longBox(JavaThread* thread, JNIEnv* env, jlong value) { 1008 return box(thread, env, vmSymbols::java_lang_Long(), vmSymbols::Long_valueOf_signature(), value); 1009 } 1010 /* static jobject floatBox(JavaThread* thread, JNIEnv* env, jfloat value) { 1011 return box(thread, env, vmSymbols::java_lang_Float(), vmSymbols::Float_valueOf_signature(), value); 1012 }*/ 1013 static jobject doubleBox(JavaThread* thread, JNIEnv* env, jdouble value) { 1014 return box(thread, env, vmSymbols::java_lang_Double(), vmSymbols::Double_valueOf_signature(), value); 1015 } 1016 1017 static Flag* getVMFlag(JavaThread* thread, JNIEnv* env, jstring name) { 1018 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1019 const char* flag_name = env->GetStringUTFChars(name, NULL); 1020 CHECK_JNI_EXCEPTION_(env, NULL); 1021 Flag* result = Flag::find_flag(flag_name, strlen(flag_name), true, true); 1022 env->ReleaseStringUTFChars(name, flag_name); 1023 return result; 1024 } 1025 1026 WB_ENTRY(jboolean, WB_IsConstantVMFlag(JNIEnv* env, jobject o, jstring name)) 1027 Flag* flag = getVMFlag(thread, env, name); 1028 return (flag != NULL) && flag->is_constant_in_binary(); 1029 WB_END 1030 1031 WB_ENTRY(jboolean, WB_IsLockedVMFlag(JNIEnv* env, jobject o, jstring name)) 1032 Flag* flag = getVMFlag(thread, env, name); 1033 return (flag != NULL) && !(flag->is_unlocked() || flag->is_unlocker()); 1034 WB_END 1035 1036 WB_ENTRY(jobject, WB_GetBooleanVMFlag(JNIEnv* env, jobject o, jstring name)) 1037 bool result; 1038 if (GetVMFlag <bool> (thread, env, name, &result, &CommandLineFlags::boolAt)) { 1039 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1040 return booleanBox(thread, env, result); 1041 } 1042 return NULL; 1043 WB_END 1044 1045 WB_ENTRY(jobject, WB_GetIntVMFlag(JNIEnv* env, jobject o, jstring name)) 1046 int result; 1047 if (GetVMFlag <int> (thread, env, name, &result, &CommandLineFlags::intAt)) { 1048 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1049 return longBox(thread, env, result); 1050 } 1051 return NULL; 1052 WB_END 1053 1054 WB_ENTRY(jobject, WB_GetUintVMFlag(JNIEnv* env, jobject o, jstring name)) 1055 uint result; 1056 if (GetVMFlag <uint> (thread, env, name, &result, &CommandLineFlags::uintAt)) { 1057 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1058 return longBox(thread, env, result); 1059 } 1060 return NULL; 1061 WB_END 1062 1063 WB_ENTRY(jobject, WB_GetIntxVMFlag(JNIEnv* env, jobject o, jstring name)) 1064 intx result; 1065 if (GetVMFlag <intx> (thread, env, name, &result, &CommandLineFlags::intxAt)) { 1066 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1067 return longBox(thread, env, result); 1068 } 1069 return NULL; 1070 WB_END 1071 1072 WB_ENTRY(jobject, WB_GetUintxVMFlag(JNIEnv* env, jobject o, jstring name)) 1073 uintx result; 1074 if (GetVMFlag <uintx> (thread, env, name, &result, &CommandLineFlags::uintxAt)) { 1075 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1076 return longBox(thread, env, result); 1077 } 1078 return NULL; 1079 WB_END 1080 1081 WB_ENTRY(jobject, WB_GetUint64VMFlag(JNIEnv* env, jobject o, jstring name)) 1082 uint64_t result; 1083 if (GetVMFlag <uint64_t> (thread, env, name, &result, &CommandLineFlags::uint64_tAt)) { 1084 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1085 return longBox(thread, env, result); 1086 } 1087 return NULL; 1088 WB_END 1089 1090 WB_ENTRY(jobject, WB_GetSizeTVMFlag(JNIEnv* env, jobject o, jstring name)) 1091 uintx result; 1092 if (GetVMFlag <size_t> (thread, env, name, &result, &CommandLineFlags::size_tAt)) { 1093 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1094 return longBox(thread, env, result); 1095 } 1096 return NULL; 1097 WB_END 1098 1099 WB_ENTRY(jobject, WB_GetDoubleVMFlag(JNIEnv* env, jobject o, jstring name)) 1100 double result; 1101 if (GetVMFlag <double> (thread, env, name, &result, &CommandLineFlags::doubleAt)) { 1102 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1103 return doubleBox(thread, env, result); 1104 } 1105 return NULL; 1106 WB_END 1107 1108 WB_ENTRY(jstring, WB_GetStringVMFlag(JNIEnv* env, jobject o, jstring name)) 1109 ccstr ccstrResult; 1110 if (GetVMFlag <ccstr> (thread, env, name, &ccstrResult, &CommandLineFlags::ccstrAt)) { 1111 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1112 jstring result = env->NewStringUTF(ccstrResult); 1113 CHECK_JNI_EXCEPTION_(env, NULL); 1114 return result; 1115 } 1116 return NULL; 1117 WB_END 1118 1119 WB_ENTRY(void, WB_SetBooleanVMFlag(JNIEnv* env, jobject o, jstring name, jboolean value)) 1120 bool result = value == JNI_TRUE ? true : false; 1121 SetVMFlag <bool> (thread, env, name, &result, &CommandLineFlags::boolAtPut); 1122 WB_END 1123 1124 WB_ENTRY(void, WB_SetIntVMFlag(JNIEnv* env, jobject o, jstring name, jlong value)) 1125 int result = value; 1126 SetVMFlag <int> (thread, env, name, &result, &CommandLineFlags::intAtPut); 1127 WB_END 1128 1129 WB_ENTRY(void, WB_SetUintVMFlag(JNIEnv* env, jobject o, jstring name, jlong value)) 1130 uint result = value; 1131 SetVMFlag <uint> (thread, env, name, &result, &CommandLineFlags::uintAtPut); 1132 WB_END 1133 1134 WB_ENTRY(void, WB_SetIntxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value)) 1135 intx result = value; 1136 SetVMFlag <intx> (thread, env, name, &result, &CommandLineFlags::intxAtPut); 1137 WB_END 1138 1139 WB_ENTRY(void, WB_SetUintxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value)) 1140 uintx result = value; 1141 SetVMFlag <uintx> (thread, env, name, &result, &CommandLineFlags::uintxAtPut); 1142 WB_END 1143 1144 WB_ENTRY(void, WB_SetUint64VMFlag(JNIEnv* env, jobject o, jstring name, jlong value)) 1145 uint64_t result = value; 1146 SetVMFlag <uint64_t> (thread, env, name, &result, &CommandLineFlags::uint64_tAtPut); 1147 WB_END 1148 1149 WB_ENTRY(void, WB_SetSizeTVMFlag(JNIEnv* env, jobject o, jstring name, jlong value)) 1150 size_t result = value; 1151 SetVMFlag <size_t> (thread, env, name, &result, &CommandLineFlags::size_tAtPut); 1152 WB_END 1153 1154 WB_ENTRY(void, WB_SetDoubleVMFlag(JNIEnv* env, jobject o, jstring name, jdouble value)) 1155 double result = value; 1156 SetVMFlag <double> (thread, env, name, &result, &CommandLineFlags::doubleAtPut); 1157 WB_END 1158 1159 WB_ENTRY(void, WB_SetStringVMFlag(JNIEnv* env, jobject o, jstring name, jstring value)) 1160 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1161 const char* ccstrValue; 1162 if (value == NULL) { 1163 ccstrValue = NULL; 1164 } 1165 else { 1166 ccstrValue = env->GetStringUTFChars(value, NULL); 1167 CHECK_JNI_EXCEPTION(env); 1168 } 1169 ccstr ccstrResult = ccstrValue; 1170 bool needFree; 1171 { 1172 ThreadInVMfromNative ttvfn(thread); // back to VM 1173 needFree = SetVMFlag <ccstr> (thread, env, name, &ccstrResult, &CommandLineFlags::ccstrAtPut); 1174 } 1175 if (value != NULL) { 1176 env->ReleaseStringUTFChars(value, ccstrValue); 1177 } 1178 if (needFree) { 1179 FREE_C_HEAP_ARRAY(char, ccstrResult); 1180 } 1181 WB_END 1182 1183 WB_ENTRY(void, WB_LockCompilation(JNIEnv* env, jobject o, jlong timeout)) 1184 WhiteBox::compilation_locked = true; 1185 WB_END 1186 1187 WB_ENTRY(void, WB_UnlockCompilation(JNIEnv* env, jobject o)) 1188 MonitorLockerEx mo(Compilation_lock, Mutex::_no_safepoint_check_flag); 1189 WhiteBox::compilation_locked = false; 1190 mo.notify_all(); 1191 WB_END 1192 1193 WB_ENTRY(void, WB_ForceNMethodSweep(JNIEnv* env, jobject o)) 1194 // Force a code cache sweep and block until it finished 1195 NMethodSweeper::force_sweep(); 1196 WB_END 1197 1198 WB_ENTRY(jboolean, WB_IsInStringTable(JNIEnv* env, jobject o, jstring javaString)) 1199 ResourceMark rm(THREAD); 1200 int len; 1201 jchar* name = java_lang_String::as_unicode_string(JNIHandles::resolve(javaString), len, CHECK_false); 1202 return (StringTable::lookup(name, len) != NULL); 1203 WB_END 1204 1205 WB_ENTRY(void, WB_FullGC(JNIEnv* env, jobject o)) 1206 Universe::heap()->collector_policy()->set_should_clear_all_soft_refs(true); 1207 Universe::heap()->collect(GCCause::_wb_full_gc); 1208 #if INCLUDE_ALL_GCS 1209 if (UseG1GC) { 1210 // Needs to be cleared explicitly for G1 1211 Universe::heap()->collector_policy()->set_should_clear_all_soft_refs(false); 1212 } 1213 #endif // INCLUDE_ALL_GCS 1214 WB_END 1215 1216 WB_ENTRY(void, WB_YoungGC(JNIEnv* env, jobject o)) 1217 Universe::heap()->collect(GCCause::_wb_young_gc); 1218 WB_END 1219 1220 WB_ENTRY(void, WB_ReadReservedMemory(JNIEnv* env, jobject o)) 1221 // static+volatile in order to force the read to happen 1222 // (not be eliminated by the compiler) 1223 static char c; 1224 static volatile char* p; 1225 1226 p = os::reserve_memory(os::vm_allocation_granularity(), NULL, 0); 1227 if (p == NULL) { 1228 THROW_MSG(vmSymbols::java_lang_OutOfMemoryError(), "Failed to reserve memory"); 1229 } 1230 1231 c = *p; 1232 WB_END 1233 1234 WB_ENTRY(jstring, WB_GetCPUFeatures(JNIEnv* env, jobject o)) 1235 const char* features = VM_Version::features_string(); 1236 ThreadToNativeFromVM ttn(thread); 1237 jstring features_string = env->NewStringUTF(features); 1238 1239 CHECK_JNI_EXCEPTION_(env, NULL); 1240 1241 return features_string; 1242 WB_END 1243 1244 int WhiteBox::get_blob_type(const CodeBlob* code) { 1245 guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled"); 1246 if (code->is_aot()) { 1247 return -1; 1248 } 1249 return CodeCache::get_code_heap(code)->code_blob_type(); 1250 } 1251 1252 CodeHeap* WhiteBox::get_code_heap(int blob_type) { 1253 guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled"); 1254 return CodeCache::get_code_heap(blob_type); 1255 } 1256 1257 struct CodeBlobStub { 1258 CodeBlobStub(const CodeBlob* blob) : 1259 name(os::strdup(blob->name())), 1260 size(blob->size()), 1261 blob_type(WhiteBox::get_blob_type(blob)), 1262 address((jlong) blob) { } 1263 ~CodeBlobStub() { os::free((void*) name); } 1264 const char* const name; 1265 const jint size; 1266 const jint blob_type; 1267 const jlong address; 1268 }; 1269 1270 static jobjectArray codeBlob2objectArray(JavaThread* thread, JNIEnv* env, CodeBlobStub* cb) { 1271 jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string()); 1272 CHECK_JNI_EXCEPTION_(env, NULL); 1273 jobjectArray result = env->NewObjectArray(4, clazz, NULL); 1274 1275 jstring name = env->NewStringUTF(cb->name); 1276 CHECK_JNI_EXCEPTION_(env, NULL); 1277 env->SetObjectArrayElement(result, 0, name); 1278 1279 jobject obj = integerBox(thread, env, cb->size); 1280 CHECK_JNI_EXCEPTION_(env, NULL); 1281 env->SetObjectArrayElement(result, 1, obj); 1282 1283 obj = integerBox(thread, env, cb->blob_type); 1284 CHECK_JNI_EXCEPTION_(env, NULL); 1285 env->SetObjectArrayElement(result, 2, obj); 1286 1287 obj = longBox(thread, env, cb->address); 1288 CHECK_JNI_EXCEPTION_(env, NULL); 1289 env->SetObjectArrayElement(result, 3, obj); 1290 1291 return result; 1292 } 1293 1294 WB_ENTRY(jobjectArray, WB_GetNMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr)) 1295 ResourceMark rm(THREAD); 1296 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 1297 CHECK_JNI_EXCEPTION_(env, NULL); 1298 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid)); 1299 CompiledMethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code(); 1300 jobjectArray result = NULL; 1301 if (code == NULL) { 1302 return result; 1303 } 1304 int comp_level = code->comp_level(); 1305 int insts_size = comp_level == CompLevel_aot ? code->code_end() - code->code_begin() : code->insts_size(); 1306 1307 ThreadToNativeFromVM ttn(thread); 1308 jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string()); 1309 CHECK_JNI_EXCEPTION_(env, NULL); 1310 result = env->NewObjectArray(5, clazz, NULL); 1311 if (result == NULL) { 1312 return result; 1313 } 1314 1315 CodeBlobStub stub(code); 1316 jobjectArray codeBlob = codeBlob2objectArray(thread, env, &stub); 1317 CHECK_JNI_EXCEPTION_(env, NULL); 1318 env->SetObjectArrayElement(result, 0, codeBlob); 1319 1320 jobject level = integerBox(thread, env, comp_level); 1321 CHECK_JNI_EXCEPTION_(env, NULL); 1322 env->SetObjectArrayElement(result, 1, level); 1323 1324 jbyteArray insts = env->NewByteArray(insts_size); 1325 CHECK_JNI_EXCEPTION_(env, NULL); 1326 env->SetByteArrayRegion(insts, 0, insts_size, (jbyte*) code->insts_begin()); 1327 env->SetObjectArrayElement(result, 2, insts); 1328 1329 jobject id = integerBox(thread, env, code->compile_id()); 1330 CHECK_JNI_EXCEPTION_(env, NULL); 1331 env->SetObjectArrayElement(result, 3, id); 1332 1333 jobject entry_point = longBox(thread, env, (jlong) code->entry_point()); 1334 CHECK_JNI_EXCEPTION_(env, NULL); 1335 env->SetObjectArrayElement(result, 4, entry_point); 1336 1337 return result; 1338 WB_END 1339 1340 CodeBlob* WhiteBox::allocate_code_blob(int size, int blob_type) { 1341 guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled"); 1342 BufferBlob* blob; 1343 int full_size = CodeBlob::align_code_offset(sizeof(BufferBlob)); 1344 if (full_size < size) { 1345 full_size += align_up(size - full_size, oopSize); 1346 } 1347 { 1348 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 1349 blob = (BufferBlob*) CodeCache::allocate(full_size, blob_type); 1350 ::new (blob) BufferBlob("WB::DummyBlob", full_size); 1351 } 1352 // Track memory usage statistic after releasing CodeCache_lock 1353 MemoryService::track_code_cache_memory_usage(); 1354 return blob; 1355 } 1356 1357 WB_ENTRY(jlong, WB_AllocateCodeBlob(JNIEnv* env, jobject o, jint size, jint blob_type)) 1358 if (size < 0) { 1359 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), 1360 err_msg("WB_AllocateCodeBlob: size is negative: " INT32_FORMAT, size)); 1361 } 1362 return (jlong) WhiteBox::allocate_code_blob(size, blob_type); 1363 WB_END 1364 1365 WB_ENTRY(void, WB_FreeCodeBlob(JNIEnv* env, jobject o, jlong addr)) 1366 if (addr == 0) { 1367 return; 1368 } 1369 BufferBlob::free((BufferBlob*) addr); 1370 WB_END 1371 1372 WB_ENTRY(jobjectArray, WB_GetCodeHeapEntries(JNIEnv* env, jobject o, jint blob_type)) 1373 ResourceMark rm; 1374 GrowableArray<CodeBlobStub*> blobs; 1375 { 1376 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 1377 CodeHeap* heap = WhiteBox::get_code_heap(blob_type); 1378 if (heap == NULL) { 1379 return NULL; 1380 } 1381 for (CodeBlob* cb = (CodeBlob*) heap->first(); 1382 cb != NULL; cb = (CodeBlob*) heap->next(cb)) { 1383 CodeBlobStub* stub = NEW_RESOURCE_OBJ(CodeBlobStub); 1384 new (stub) CodeBlobStub(cb); 1385 blobs.append(stub); 1386 } 1387 } 1388 if (blobs.length() == 0) { 1389 return NULL; 1390 } 1391 ThreadToNativeFromVM ttn(thread); 1392 jobjectArray result = NULL; 1393 jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string()); 1394 CHECK_JNI_EXCEPTION_(env, NULL); 1395 result = env->NewObjectArray(blobs.length(), clazz, NULL); 1396 CHECK_JNI_EXCEPTION_(env, NULL); 1397 if (result == NULL) { 1398 return result; 1399 } 1400 int i = 0; 1401 for (GrowableArrayIterator<CodeBlobStub*> it = blobs.begin(); 1402 it != blobs.end(); ++it) { 1403 jobjectArray obj = codeBlob2objectArray(thread, env, *it); 1404 CHECK_JNI_EXCEPTION_(env, NULL); 1405 env->SetObjectArrayElement(result, i, obj); 1406 CHECK_JNI_EXCEPTION_(env, NULL); 1407 ++i; 1408 } 1409 return result; 1410 WB_END 1411 1412 WB_ENTRY(jint, WB_GetCompilationActivityMode(JNIEnv* env, jobject o)) 1413 return CompileBroker::get_compilation_activity_mode(); 1414 WB_END 1415 1416 WB_ENTRY(jobjectArray, WB_GetCodeBlob(JNIEnv* env, jobject o, jlong addr)) 1417 if (addr == 0) { 1418 THROW_MSG_NULL(vmSymbols::java_lang_NullPointerException(), 1419 "WB_GetCodeBlob: addr is null"); 1420 } 1421 ThreadToNativeFromVM ttn(thread); 1422 CodeBlobStub stub((CodeBlob*) addr); 1423 return codeBlob2objectArray(thread, env, &stub); 1424 WB_END 1425 1426 WB_ENTRY(jlong, WB_GetMethodData(JNIEnv* env, jobject wv, jobject method)) 1427 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 1428 CHECK_JNI_EXCEPTION_(env, 0); 1429 methodHandle mh(thread, Method::checked_resolve_jmethod_id(jmid)); 1430 return (jlong) mh->method_data(); 1431 WB_END 1432 1433 WB_ENTRY(jlong, WB_GetThreadStackSize(JNIEnv* env, jobject o)) 1434 return (jlong) Thread::current()->stack_size(); 1435 WB_END 1436 1437 WB_ENTRY(jlong, WB_GetThreadRemainingStackSize(JNIEnv* env, jobject o)) 1438 JavaThread* t = JavaThread::current(); 1439 return (jlong) t->stack_available(os::current_stack_pointer()) - (jlong)JavaThread::stack_shadow_zone_size(); 1440 WB_END 1441 1442 1443 int WhiteBox::array_bytes_to_length(size_t bytes) { 1444 return Array<u1>::bytes_to_length(bytes); 1445 } 1446 1447 WB_ENTRY(jlong, WB_AllocateMetaspace(JNIEnv* env, jobject wb, jobject class_loader, jlong size)) 1448 if (size < 0) { 1449 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), 1450 err_msg("WB_AllocateMetaspace: size is negative: " JLONG_FORMAT, size)); 1451 } 1452 1453 oop class_loader_oop = JNIHandles::resolve(class_loader); 1454 ClassLoaderData* cld = class_loader_oop != NULL 1455 ? java_lang_ClassLoader::loader_data(class_loader_oop) 1456 : ClassLoaderData::the_null_class_loader_data(); 1457 1458 void* metadata = MetadataFactory::new_array<u1>(cld, WhiteBox::array_bytes_to_length((size_t)size), thread); 1459 1460 return (jlong)(uintptr_t)metadata; 1461 WB_END 1462 1463 WB_ENTRY(void, WB_FreeMetaspace(JNIEnv* env, jobject wb, jobject class_loader, jlong addr, jlong size)) 1464 oop class_loader_oop = JNIHandles::resolve(class_loader); 1465 ClassLoaderData* cld = class_loader_oop != NULL 1466 ? java_lang_ClassLoader::loader_data(class_loader_oop) 1467 : ClassLoaderData::the_null_class_loader_data(); 1468 1469 MetadataFactory::free_array(cld, (Array<u1>*)(uintptr_t)addr); 1470 WB_END 1471 1472 WB_ENTRY(void, WB_DefineModule(JNIEnv* env, jobject o, jobject module, jboolean is_open, 1473 jstring version, jstring location, jobjectArray packages)) 1474 ResourceMark rm(THREAD); 1475 1476 objArrayOop packages_oop = objArrayOop(JNIHandles::resolve(packages)); 1477 objArrayHandle packages_h(THREAD, packages_oop); 1478 int num_packages = (packages_h == NULL ? 0 : packages_h->length()); 1479 1480 char** pkgs = NULL; 1481 if (num_packages > 0) { 1482 pkgs = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char*, num_packages); 1483 for (int x = 0; x < num_packages; x++) { 1484 oop pkg_str = packages_h->obj_at(x); 1485 if (pkg_str == NULL || !pkg_str->is_a(SystemDictionary::String_klass())) { 1486 THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), 1487 err_msg("Bad package name")); 1488 } 1489 pkgs[x] = java_lang_String::as_utf8_string(pkg_str); 1490 } 1491 } 1492 Modules::define_module(module, is_open, version, location, (const char* const*)pkgs, num_packages, CHECK); 1493 WB_END 1494 1495 WB_ENTRY(void, WB_AddModuleExports(JNIEnv* env, jobject o, jobject from_module, jstring package, jobject to_module)) 1496 ResourceMark rm(THREAD); 1497 char* package_name = NULL; 1498 if (package != NULL) { 1499 package_name = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(package)); 1500 } 1501 Modules::add_module_exports_qualified(from_module, package_name, to_module, CHECK); 1502 WB_END 1503 1504 WB_ENTRY(void, WB_AddModuleExportsToAllUnnamed(JNIEnv* env, jobject o, jclass module, jstring package)) 1505 ResourceMark rm(THREAD); 1506 char* package_name = NULL; 1507 if (package != NULL) { 1508 package_name = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(package)); 1509 } 1510 Modules::add_module_exports_to_all_unnamed(module, package_name, CHECK); 1511 WB_END 1512 1513 WB_ENTRY(void, WB_AddModuleExportsToAll(JNIEnv* env, jobject o, jclass module, jstring package)) 1514 ResourceMark rm(THREAD); 1515 char* package_name = NULL; 1516 if (package != NULL) { 1517 package_name = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(package)); 1518 } 1519 Modules::add_module_exports(module, package_name, NULL, CHECK); 1520 WB_END 1521 1522 WB_ENTRY(void, WB_AddReadsModule(JNIEnv* env, jobject o, jobject from_module, jobject source_module)) 1523 Modules::add_reads_module(from_module, source_module, CHECK); 1524 WB_END 1525 1526 WB_ENTRY(jlong, WB_IncMetaspaceCapacityUntilGC(JNIEnv* env, jobject wb, jlong inc)) 1527 if (inc < 0) { 1528 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), 1529 err_msg("WB_IncMetaspaceCapacityUntilGC: inc is negative: " JLONG_FORMAT, inc)); 1530 } 1531 1532 jlong max_size_t = (jlong) ((size_t) -1); 1533 if (inc > max_size_t) { 1534 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), 1535 err_msg("WB_IncMetaspaceCapacityUntilGC: inc does not fit in size_t: " JLONG_FORMAT, inc)); 1536 } 1537 1538 size_t new_cap_until_GC = 0; 1539 size_t aligned_inc = align_down((size_t) inc, Metaspace::commit_alignment()); 1540 bool success = MetaspaceGC::inc_capacity_until_GC(aligned_inc, &new_cap_until_GC); 1541 if (!success) { 1542 THROW_MSG_0(vmSymbols::java_lang_IllegalStateException(), 1543 "WB_IncMetaspaceCapacityUntilGC: could not increase capacity until GC " 1544 "due to contention with another thread"); 1545 } 1546 return (jlong) new_cap_until_GC; 1547 WB_END 1548 1549 WB_ENTRY(jlong, WB_MetaspaceCapacityUntilGC(JNIEnv* env, jobject wb)) 1550 return (jlong) MetaspaceGC::capacity_until_GC(); 1551 WB_END 1552 1553 WB_ENTRY(jboolean, WB_MetaspaceShouldConcurrentCollect(JNIEnv* env, jobject wb)) 1554 return MetaspaceGC::should_concurrent_collect(); 1555 WB_END 1556 1557 WB_ENTRY(jlong, WB_MetaspaceReserveAlignment(JNIEnv* env, jobject wb)) 1558 return (jlong)Metaspace::reserve_alignment(); 1559 WB_END 1560 1561 WB_ENTRY(void, WB_AssertMatchingSafepointCalls(JNIEnv* env, jobject o, jboolean mutexSafepointValue, jboolean attemptedNoSafepointValue)) 1562 Monitor::SafepointCheckRequired sfpt_check_required = mutexSafepointValue ? 1563 Monitor::_safepoint_check_always : 1564 Monitor::_safepoint_check_never; 1565 MutexLockerEx ml(new Mutex(Mutex::leaf, "SFPT_Test_lock", true, sfpt_check_required), 1566 attemptedNoSafepointValue == JNI_TRUE); 1567 WB_END 1568 1569 WB_ENTRY(jboolean, WB_IsMonitorInflated(JNIEnv* env, jobject wb, jobject obj)) 1570 oop obj_oop = JNIHandles::resolve(obj); 1571 return (jboolean) obj_oop->mark()->has_monitor(); 1572 WB_END 1573 1574 WB_ENTRY(void, WB_ForceSafepoint(JNIEnv* env, jobject wb)) 1575 VM_ForceSafepoint force_safepoint_op; 1576 VMThread::execute(&force_safepoint_op); 1577 WB_END 1578 1579 WB_ENTRY(jlong, WB_GetConstantPool(JNIEnv* env, jobject wb, jclass klass)) 1580 InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass))); 1581 return (jlong) ik->constants(); 1582 WB_END 1583 1584 WB_ENTRY(jint, WB_GetConstantPoolCacheIndexTag(JNIEnv* env, jobject wb)) 1585 return ConstantPool::CPCACHE_INDEX_TAG; 1586 WB_END 1587 1588 WB_ENTRY(jint, WB_GetConstantPoolCacheLength(JNIEnv* env, jobject wb, jclass klass)) 1589 InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass))); 1590 ConstantPool* cp = ik->constants(); 1591 if (cp->cache() == NULL) { 1592 return -1; 1593 } 1594 return cp->cache()->length(); 1595 WB_END 1596 1597 WB_ENTRY(jint, WB_ConstantPoolRemapInstructionOperandFromCache(JNIEnv* env, jobject wb, jclass klass, jint index)) 1598 InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass))); 1599 ConstantPool* cp = ik->constants(); 1600 if (cp->cache() == NULL) { 1601 THROW_MSG_0(vmSymbols::java_lang_IllegalStateException(), "Constant pool does not have a cache"); 1602 } 1603 jint cpci = index; 1604 jint cpciTag = ConstantPool::CPCACHE_INDEX_TAG; 1605 if (cpciTag > cpci || cpci >= cp->cache()->length() + cpciTag) { 1606 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "Constant pool cache index is out of range"); 1607 } 1608 jint cpi = cp->remap_instruction_operand_from_cache(cpci); 1609 return cpi; 1610 WB_END 1611 1612 WB_ENTRY(jint, WB_ConstantPoolEncodeIndyIndex(JNIEnv* env, jobject wb, jint index)) 1613 return ConstantPool::encode_invokedynamic_index(index); 1614 WB_END 1615 1616 WB_ENTRY(void, WB_ClearInlineCaches(JNIEnv* env, jobject wb, jboolean preserve_static_stubs)) 1617 VM_ClearICs clear_ics(preserve_static_stubs == JNI_TRUE); 1618 VMThread::execute(&clear_ics); 1619 WB_END 1620 1621 template <typename T> 1622 static bool GetMethodOption(JavaThread* thread, JNIEnv* env, jobject method, jstring name, T* value) { 1623 assert(value != NULL, "sanity"); 1624 if (method == NULL || name == NULL) { 1625 return false; 1626 } 1627 jmethodID jmid = reflected_method_to_jmid(thread, env, method); 1628 CHECK_JNI_EXCEPTION_(env, false); 1629 methodHandle mh(thread, Method::checked_resolve_jmethod_id(jmid)); 1630 // can't be in VM when we call JNI 1631 ThreadToNativeFromVM ttnfv(thread); 1632 const char* flag_name = env->GetStringUTFChars(name, NULL); 1633 CHECK_JNI_EXCEPTION_(env, false); 1634 bool result = CompilerOracle::has_option_value(mh, flag_name, *value); 1635 env->ReleaseStringUTFChars(name, flag_name); 1636 return result; 1637 } 1638 1639 WB_ENTRY(jobject, WB_GetMethodBooleaneOption(JNIEnv* env, jobject wb, jobject method, jstring name)) 1640 bool result; 1641 if (GetMethodOption<bool> (thread, env, method, name, &result)) { 1642 // can't be in VM when we call JNI 1643 ThreadToNativeFromVM ttnfv(thread); 1644 return booleanBox(thread, env, result); 1645 } 1646 return NULL; 1647 WB_END 1648 1649 WB_ENTRY(jobject, WB_GetMethodIntxOption(JNIEnv* env, jobject wb, jobject method, jstring name)) 1650 intx result; 1651 if (GetMethodOption <intx> (thread, env, method, name, &result)) { 1652 // can't be in VM when we call JNI 1653 ThreadToNativeFromVM ttnfv(thread); 1654 return longBox(thread, env, result); 1655 } 1656 return NULL; 1657 WB_END 1658 1659 WB_ENTRY(jobject, WB_GetMethodUintxOption(JNIEnv* env, jobject wb, jobject method, jstring name)) 1660 uintx result; 1661 if (GetMethodOption <uintx> (thread, env, method, name, &result)) { 1662 // can't be in VM when we call JNI 1663 ThreadToNativeFromVM ttnfv(thread); 1664 return longBox(thread, env, result); 1665 } 1666 return NULL; 1667 WB_END 1668 1669 WB_ENTRY(jobject, WB_GetMethodDoubleOption(JNIEnv* env, jobject wb, jobject method, jstring name)) 1670 double result; 1671 if (GetMethodOption <double> (thread, env, method, name, &result)) { 1672 // can't be in VM when we call JNI 1673 ThreadToNativeFromVM ttnfv(thread); 1674 return doubleBox(thread, env, result); 1675 } 1676 return NULL; 1677 WB_END 1678 1679 WB_ENTRY(jobject, WB_GetMethodStringOption(JNIEnv* env, jobject wb, jobject method, jstring name)) 1680 ccstr ccstrResult; 1681 if (GetMethodOption <ccstr> (thread, env, method, name, &ccstrResult)) { 1682 // can't be in VM when we call JNI 1683 ThreadToNativeFromVM ttnfv(thread); 1684 jstring result = env->NewStringUTF(ccstrResult); 1685 CHECK_JNI_EXCEPTION_(env, NULL); 1686 return result; 1687 } 1688 return NULL; 1689 WB_END 1690 1691 WB_ENTRY(jboolean, WB_IsShared(JNIEnv* env, jobject wb, jobject obj)) 1692 oop obj_oop = JNIHandles::resolve(obj); 1693 return oopDesc::is_archive_object(obj_oop); 1694 WB_END 1695 1696 WB_ENTRY(jboolean, WB_IsSharedClass(JNIEnv* env, jobject wb, jclass clazz)) 1697 return (jboolean)MetaspaceShared::is_in_shared_space(java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz))); 1698 WB_END 1699 1700 WB_ENTRY(jboolean, WB_AreSharedStringsIgnored(JNIEnv* env)) 1701 return !StringTable::shared_string_mapped(); 1702 WB_END 1703 1704 WB_ENTRY(jobject, WB_GetResolvedReferences(JNIEnv* env, jobject wb, jclass clazz)) 1705 Klass *k = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz)); 1706 if (k->is_instance_klass()) { 1707 InstanceKlass *ik = InstanceKlass::cast(k); 1708 ConstantPool *cp = ik->constants(); 1709 objArrayOop refs = cp->resolved_references(); 1710 return (jobject)JNIHandles::make_local(env, refs); 1711 } else { 1712 return NULL; 1713 } 1714 WB_END 1715 1716 WB_ENTRY(jboolean, WB_IsCDSIncludedInVmBuild(JNIEnv* env)) 1717 #if INCLUDE_CDS 1718 return true; 1719 #else 1720 return false; 1721 #endif 1722 WB_END 1723 1724 //Some convenience methods to deal with objects from java 1725 int WhiteBox::offset_for_field(const char* field_name, oop object, 1726 Symbol* signature_symbol) { 1727 assert(field_name != NULL && strlen(field_name) > 0, "Field name not valid"); 1728 Thread* THREAD = Thread::current(); 1729 1730 //Get the class of our object 1731 Klass* arg_klass = object->klass(); 1732 //Turn it into an instance-klass 1733 InstanceKlass* ik = InstanceKlass::cast(arg_klass); 1734 1735 //Create symbols to look for in the class 1736 TempNewSymbol name_symbol = SymbolTable::lookup(field_name, (int) strlen(field_name), 1737 THREAD); 1738 1739 //To be filled in with an offset of the field we're looking for 1740 fieldDescriptor fd; 1741 1742 Klass* res = ik->find_field(name_symbol, signature_symbol, &fd); 1743 if (res == NULL) { 1744 tty->print_cr("Invalid layout of %s at %s", ik->external_name(), 1745 name_symbol->as_C_string()); 1746 vm_exit_during_initialization("Invalid layout of preloaded class: use -Xlog:class+load=info to see the origin of the problem class"); 1747 } 1748 1749 //fetch the field at the offset we've found 1750 int dest_offset = fd.offset(); 1751 1752 return dest_offset; 1753 } 1754 1755 1756 const char* WhiteBox::lookup_jstring(const char* field_name, oop object) { 1757 int offset = offset_for_field(field_name, object, 1758 vmSymbols::string_signature()); 1759 oop string = object->obj_field(offset); 1760 if (string == NULL) { 1761 return NULL; 1762 } 1763 const char* ret = java_lang_String::as_utf8_string(string); 1764 return ret; 1765 } 1766 1767 bool WhiteBox::lookup_bool(const char* field_name, oop object) { 1768 int offset = 1769 offset_for_field(field_name, object, vmSymbols::bool_signature()); 1770 bool ret = (object->bool_field(offset) == JNI_TRUE); 1771 return ret; 1772 } 1773 1774 void WhiteBox::register_methods(JNIEnv* env, jclass wbclass, JavaThread* thread, JNINativeMethod* method_array, int method_count) { 1775 ResourceMark rm; 1776 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI 1777 1778 // one by one registration natives for exception catching 1779 jclass no_such_method_error_klass = env->FindClass(vmSymbols::java_lang_NoSuchMethodError()->as_C_string()); 1780 CHECK_JNI_EXCEPTION(env); 1781 for (int i = 0, n = method_count; i < n; ++i) { 1782 // Skip dummy entries 1783 if (method_array[i].fnPtr == NULL) continue; 1784 if (env->RegisterNatives(wbclass, &method_array[i], 1) != 0) { 1785 jthrowable throwable_obj = env->ExceptionOccurred(); 1786 if (throwable_obj != NULL) { 1787 env->ExceptionClear(); 1788 if (env->IsInstanceOf(throwable_obj, no_such_method_error_klass)) { 1789 // NoSuchMethodError is thrown when a method can't be found or a method is not native. 1790 // Ignoring the exception since it is not preventing use of other WhiteBox methods. 1791 tty->print_cr("Warning: 'NoSuchMethodError' on register of sun.hotspot.WhiteBox::%s%s", 1792 method_array[i].name, method_array[i].signature); 1793 } 1794 } else { 1795 // Registration failed unexpectedly. 1796 tty->print_cr("Warning: unexpected error on register of sun.hotspot.WhiteBox::%s%s. All methods will be unregistered", 1797 method_array[i].name, method_array[i].signature); 1798 env->UnregisterNatives(wbclass); 1799 break; 1800 } 1801 } 1802 } 1803 } 1804 1805 WB_ENTRY(jint, WB_AddCompilerDirective(JNIEnv* env, jobject o, jstring compDirect)) 1806 // can't be in VM when we call JNI 1807 ThreadToNativeFromVM ttnfv(thread); 1808 const char* dir = env->GetStringUTFChars(compDirect, NULL); 1809 CHECK_JNI_EXCEPTION_(env, 0); 1810 int ret; 1811 { 1812 ThreadInVMfromNative ttvfn(thread); // back to VM 1813 ret = DirectivesParser::parse_string(dir, tty); 1814 } 1815 env->ReleaseStringUTFChars(compDirect, dir); 1816 // -1 for error parsing directive. Return 0 as number of directives added. 1817 if (ret == -1) { 1818 ret = 0; 1819 } 1820 return (jint) ret; 1821 WB_END 1822 1823 WB_ENTRY(void, WB_RemoveCompilerDirective(JNIEnv* env, jobject o, jint count)) 1824 DirectivesStack::pop(count); 1825 WB_END 1826 1827 #define CC (char*) 1828 1829 static JNINativeMethod methods[] = { 1830 {CC"getObjectAddress0", CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectAddress }, 1831 {CC"getObjectSize0", CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectSize }, 1832 {CC"isObjectInOldGen0", CC"(Ljava/lang/Object;)Z", (void*)&WB_isObjectInOldGen }, 1833 {CC"getHeapOopSize", CC"()I", (void*)&WB_GetHeapOopSize }, 1834 {CC"getVMPageSize", CC"()I", (void*)&WB_GetVMPageSize }, 1835 {CC"getVMAllocationGranularity", CC"()J", (void*)&WB_GetVMAllocationGranularity }, 1836 {CC"getVMLargePageSize", CC"()J", (void*)&WB_GetVMLargePageSize}, 1837 {CC"getHeapSpaceAlignment", CC"()J", (void*)&WB_GetHeapSpaceAlignment}, 1838 {CC"getHeapAlignment", CC"()J", (void*)&WB_GetHeapAlignment}, 1839 {CC"isClassAlive0", CC"(Ljava/lang/String;)Z", (void*)&WB_IsClassAlive }, 1840 {CC"parseCommandLine0", 1841 CC"(Ljava/lang/String;C[Lsun/hotspot/parser/DiagnosticCommand;)[Ljava/lang/Object;", 1842 (void*) &WB_ParseCommandLine 1843 }, 1844 {CC"addToBootstrapClassLoaderSearch0", CC"(Ljava/lang/String;)V", 1845 (void*)&WB_AddToBootstrapClassLoaderSearch}, 1846 {CC"addToSystemClassLoaderSearch0", CC"(Ljava/lang/String;)V", 1847 (void*)&WB_AddToSystemClassLoaderSearch}, 1848 {CC"getCompressedOopsMaxHeapSize", CC"()J", 1849 (void*)&WB_GetCompressedOopsMaxHeapSize}, 1850 {CC"printHeapSizes", CC"()V", (void*)&WB_PrintHeapSizes }, 1851 {CC"runMemoryUnitTests", CC"()V", (void*)&WB_RunMemoryUnitTests}, 1852 {CC"readFromNoaccessArea",CC"()V", (void*)&WB_ReadFromNoaccessArea}, 1853 {CC"stressVirtualSpaceResize",CC"(JJJ)I", (void*)&WB_StressVirtualSpaceResize}, 1854 #if INCLUDE_ALL_GCS 1855 {CC"g1InConcurrentMark", CC"()Z", (void*)&WB_G1InConcurrentMark}, 1856 {CC"g1IsHumongous0", CC"(Ljava/lang/Object;)Z", (void*)&WB_G1IsHumongous }, 1857 {CC"g1BelongsToHumongousRegion0", CC"(J)Z", (void*)&WB_G1BelongsToHumongousRegion}, 1858 {CC"g1BelongsToFreeRegion0", CC"(J)Z", (void*)&WB_G1BelongsToFreeRegion}, 1859 {CC"g1NumMaxRegions", CC"()J", (void*)&WB_G1NumMaxRegions }, 1860 {CC"g1NumFreeRegions", CC"()J", (void*)&WB_G1NumFreeRegions }, 1861 {CC"g1RegionSize", CC"()I", (void*)&WB_G1RegionSize }, 1862 {CC"g1StartConcMarkCycle", CC"()Z", (void*)&WB_G1StartMarkCycle }, 1863 {CC"g1AuxiliaryMemoryUsage", CC"()Ljava/lang/management/MemoryUsage;", 1864 (void*)&WB_G1AuxiliaryMemoryUsage }, 1865 {CC"psVirtualSpaceAlignment",CC"()J", (void*)&WB_PSVirtualSpaceAlignment}, 1866 {CC"psHeapGenerationAlignment",CC"()J", (void*)&WB_PSHeapGenerationAlignment}, 1867 {CC"g1GetMixedGCInfo", CC"(I)[J", (void*)&WB_G1GetMixedGCInfo }, 1868 #endif // INCLUDE_ALL_GCS 1869 #if INCLUDE_NMT 1870 {CC"NMTMalloc", CC"(J)J", (void*)&WB_NMTMalloc }, 1871 {CC"NMTMallocWithPseudoStack", CC"(JI)J", (void*)&WB_NMTMallocWithPseudoStack}, 1872 {CC"NMTFree", CC"(J)V", (void*)&WB_NMTFree }, 1873 {CC"NMTReserveMemory", CC"(J)J", (void*)&WB_NMTReserveMemory }, 1874 {CC"NMTCommitMemory", CC"(JJ)V", (void*)&WB_NMTCommitMemory }, 1875 {CC"NMTUncommitMemory", CC"(JJ)V", (void*)&WB_NMTUncommitMemory }, 1876 {CC"NMTReleaseMemory", CC"(JJ)V", (void*)&WB_NMTReleaseMemory }, 1877 {CC"NMTChangeTrackingLevel", CC"()Z", (void*)&WB_NMTChangeTrackingLevel}, 1878 {CC"NMTGetHashSize", CC"()I", (void*)&WB_NMTGetHashSize }, 1879 #endif // INCLUDE_NMT 1880 {CC"deoptimizeFrames", CC"(Z)I", (void*)&WB_DeoptimizeFrames }, 1881 {CC"deoptimizeAll", CC"()V", (void*)&WB_DeoptimizeAll }, 1882 {CC"deoptimizeMethod0", CC"(Ljava/lang/reflect/Executable;Z)I", 1883 (void*)&WB_DeoptimizeMethod }, 1884 {CC"isMethodCompiled0", CC"(Ljava/lang/reflect/Executable;Z)Z", 1885 (void*)&WB_IsMethodCompiled }, 1886 {CC"isMethodCompilable0", CC"(Ljava/lang/reflect/Executable;IZ)Z", 1887 (void*)&WB_IsMethodCompilable}, 1888 {CC"isMethodQueuedForCompilation0", 1889 CC"(Ljava/lang/reflect/Executable;)Z", (void*)&WB_IsMethodQueuedForCompilation}, 1890 {CC"isIntrinsicAvailable0", 1891 CC"(Ljava/lang/reflect/Executable;Ljava/lang/reflect/Executable;I)Z", 1892 (void*)&WB_IsIntrinsicAvailable}, 1893 {CC"makeMethodNotCompilable0", 1894 CC"(Ljava/lang/reflect/Executable;IZ)V", (void*)&WB_MakeMethodNotCompilable}, 1895 {CC"testSetDontInlineMethod0", 1896 CC"(Ljava/lang/reflect/Executable;Z)Z", (void*)&WB_TestSetDontInlineMethod}, 1897 {CC"getMethodCompilationLevel0", 1898 CC"(Ljava/lang/reflect/Executable;Z)I", (void*)&WB_GetMethodCompilationLevel}, 1899 {CC"getMethodEntryBci0", 1900 CC"(Ljava/lang/reflect/Executable;)I", (void*)&WB_GetMethodEntryBci}, 1901 {CC"getCompileQueueSize", 1902 CC"(I)I", (void*)&WB_GetCompileQueueSize}, 1903 {CC"testSetForceInlineMethod0", 1904 CC"(Ljava/lang/reflect/Executable;Z)Z", (void*)&WB_TestSetForceInlineMethod}, 1905 {CC"enqueueMethodForCompilation0", 1906 CC"(Ljava/lang/reflect/Executable;II)Z", (void*)&WB_EnqueueMethodForCompilation}, 1907 {CC"enqueueInitializerForCompilation0", 1908 CC"(Ljava/lang/Class;I)Z", (void*)&WB_EnqueueInitializerForCompilation}, 1909 {CC"clearMethodState0", 1910 CC"(Ljava/lang/reflect/Executable;)V", (void*)&WB_ClearMethodState}, 1911 {CC"lockCompilation", CC"()V", (void*)&WB_LockCompilation}, 1912 {CC"unlockCompilation", CC"()V", (void*)&WB_UnlockCompilation}, 1913 {CC"matchesMethod", 1914 CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)I", 1915 (void*)&WB_MatchesMethod}, 1916 {CC"matchesInline", 1917 CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)I", 1918 (void*)&WB_MatchesInline}, 1919 {CC"shouldPrintAssembly", 1920 CC"(Ljava/lang/reflect/Executable;I)Z", 1921 (void*)&WB_ShouldPrintAssembly}, 1922 1923 {CC"isConstantVMFlag", CC"(Ljava/lang/String;)Z", (void*)&WB_IsConstantVMFlag}, 1924 {CC"isLockedVMFlag", CC"(Ljava/lang/String;)Z", (void*)&WB_IsLockedVMFlag}, 1925 {CC"setBooleanVMFlag", CC"(Ljava/lang/String;Z)V",(void*)&WB_SetBooleanVMFlag}, 1926 {CC"setIntVMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetIntVMFlag}, 1927 {CC"setUintVMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetUintVMFlag}, 1928 {CC"setIntxVMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetIntxVMFlag}, 1929 {CC"setUintxVMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetUintxVMFlag}, 1930 {CC"setUint64VMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetUint64VMFlag}, 1931 {CC"setSizeTVMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetSizeTVMFlag}, 1932 {CC"setDoubleVMFlag", CC"(Ljava/lang/String;D)V",(void*)&WB_SetDoubleVMFlag}, 1933 {CC"setStringVMFlag", CC"(Ljava/lang/String;Ljava/lang/String;)V", 1934 (void*)&WB_SetStringVMFlag}, 1935 {CC"getBooleanVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Boolean;", 1936 (void*)&WB_GetBooleanVMFlag}, 1937 {CC"getIntVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;", 1938 (void*)&WB_GetIntVMFlag}, 1939 {CC"getUintVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;", 1940 (void*)&WB_GetUintVMFlag}, 1941 {CC"getIntxVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;", 1942 (void*)&WB_GetIntxVMFlag}, 1943 {CC"getUintxVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;", 1944 (void*)&WB_GetUintxVMFlag}, 1945 {CC"getUint64VMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;", 1946 (void*)&WB_GetUint64VMFlag}, 1947 {CC"getSizeTVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;", 1948 (void*)&WB_GetSizeTVMFlag}, 1949 {CC"getDoubleVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Double;", 1950 (void*)&WB_GetDoubleVMFlag}, 1951 {CC"getStringVMFlag", CC"(Ljava/lang/String;)Ljava/lang/String;", 1952 (void*)&WB_GetStringVMFlag}, 1953 {CC"isInStringTable", CC"(Ljava/lang/String;)Z", (void*)&WB_IsInStringTable }, 1954 {CC"fullGC", CC"()V", (void*)&WB_FullGC }, 1955 {CC"youngGC", CC"()V", (void*)&WB_YoungGC }, 1956 {CC"readReservedMemory", CC"()V", (void*)&WB_ReadReservedMemory }, 1957 {CC"allocateMetaspace", 1958 CC"(Ljava/lang/ClassLoader;J)J", (void*)&WB_AllocateMetaspace }, 1959 {CC"freeMetaspace", 1960 CC"(Ljava/lang/ClassLoader;JJ)V", (void*)&WB_FreeMetaspace }, 1961 {CC"incMetaspaceCapacityUntilGC", CC"(J)J", (void*)&WB_IncMetaspaceCapacityUntilGC }, 1962 {CC"metaspaceCapacityUntilGC", CC"()J", (void*)&WB_MetaspaceCapacityUntilGC }, 1963 {CC"metaspaceShouldConcurrentCollect", CC"()Z", (void*)&WB_MetaspaceShouldConcurrentCollect }, 1964 {CC"metaspaceReserveAlignment", CC"()J", (void*)&WB_MetaspaceReserveAlignment }, 1965 {CC"getCPUFeatures", CC"()Ljava/lang/String;", (void*)&WB_GetCPUFeatures }, 1966 {CC"getNMethod0", CC"(Ljava/lang/reflect/Executable;Z)[Ljava/lang/Object;", 1967 (void*)&WB_GetNMethod }, 1968 {CC"forceNMethodSweep", CC"()V", (void*)&WB_ForceNMethodSweep }, 1969 {CC"allocateCodeBlob", CC"(II)J", (void*)&WB_AllocateCodeBlob }, 1970 {CC"freeCodeBlob", CC"(J)V", (void*)&WB_FreeCodeBlob }, 1971 {CC"getCodeHeapEntries", CC"(I)[Ljava/lang/Object;",(void*)&WB_GetCodeHeapEntries }, 1972 {CC"getCompilationActivityMode", 1973 CC"()I", (void*)&WB_GetCompilationActivityMode}, 1974 {CC"getMethodData0", CC"(Ljava/lang/reflect/Executable;)J", 1975 (void*)&WB_GetMethodData }, 1976 {CC"getCodeBlob", CC"(J)[Ljava/lang/Object;",(void*)&WB_GetCodeBlob }, 1977 {CC"getThreadStackSize", CC"()J", (void*)&WB_GetThreadStackSize }, 1978 {CC"getThreadRemainingStackSize", CC"()J", (void*)&WB_GetThreadRemainingStackSize }, 1979 {CC"DefineModule", CC"(Ljava/lang/Object;ZLjava/lang/String;Ljava/lang/String;[Ljava/lang/Object;)V", 1980 (void*)&WB_DefineModule }, 1981 {CC"AddModuleExports", CC"(Ljava/lang/Object;Ljava/lang/String;Ljava/lang/Object;)V", 1982 (void*)&WB_AddModuleExports }, 1983 {CC"AddReadsModule", CC"(Ljava/lang/Object;Ljava/lang/Object;)V", 1984 (void*)&WB_AddReadsModule }, 1985 {CC"AddModuleExportsToAllUnnamed", CC"(Ljava/lang/Object;Ljava/lang/String;)V", 1986 (void*)&WB_AddModuleExportsToAllUnnamed }, 1987 {CC"AddModuleExportsToAll", CC"(Ljava/lang/Object;Ljava/lang/String;)V", 1988 (void*)&WB_AddModuleExportsToAll }, 1989 {CC"assertMatchingSafepointCalls", CC"(ZZ)V", (void*)&WB_AssertMatchingSafepointCalls }, 1990 {CC"isMonitorInflated0", CC"(Ljava/lang/Object;)Z", (void*)&WB_IsMonitorInflated }, 1991 {CC"forceSafepoint", CC"()V", (void*)&WB_ForceSafepoint }, 1992 {CC"getConstantPool0", CC"(Ljava/lang/Class;)J", (void*)&WB_GetConstantPool }, 1993 {CC"getConstantPoolCacheIndexTag0", CC"()I", (void*)&WB_GetConstantPoolCacheIndexTag}, 1994 {CC"getConstantPoolCacheLength0", CC"(Ljava/lang/Class;)I", (void*)&WB_GetConstantPoolCacheLength}, 1995 {CC"remapInstructionOperandFromCPCache0", 1996 CC"(Ljava/lang/Class;I)I", (void*)&WB_ConstantPoolRemapInstructionOperandFromCache}, 1997 {CC"encodeConstantPoolIndyIndex0", 1998 CC"(I)I", (void*)&WB_ConstantPoolEncodeIndyIndex}, 1999 {CC"getMethodBooleanOption", 2000 CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/Boolean;", 2001 (void*)&WB_GetMethodBooleaneOption}, 2002 {CC"getMethodIntxOption", 2003 CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/Long;", 2004 (void*)&WB_GetMethodIntxOption}, 2005 {CC"getMethodUintxOption", 2006 CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/Long;", 2007 (void*)&WB_GetMethodUintxOption}, 2008 {CC"getMethodDoubleOption", 2009 CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/Double;", 2010 (void*)&WB_GetMethodDoubleOption}, 2011 {CC"getMethodStringOption", 2012 CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/String;", 2013 (void*)&WB_GetMethodStringOption}, 2014 {CC"isShared", CC"(Ljava/lang/Object;)Z", (void*)&WB_IsShared }, 2015 {CC"isSharedClass", CC"(Ljava/lang/Class;)Z", (void*)&WB_IsSharedClass }, 2016 {CC"areSharedStringsIgnored", CC"()Z", (void*)&WB_AreSharedStringsIgnored }, 2017 {CC"getResolvedReferences", CC"(Ljava/lang/Class;)Ljava/lang/Object;", (void*)&WB_GetResolvedReferences}, 2018 {CC"isCDSIncludedInVmBuild", CC"()Z", (void*)&WB_IsCDSIncludedInVmBuild }, 2019 {CC"clearInlineCaches0", CC"(Z)V", (void*)&WB_ClearInlineCaches }, 2020 {CC"addCompilerDirective", CC"(Ljava/lang/String;)I", 2021 (void*)&WB_AddCompilerDirective }, 2022 {CC"removeCompilerDirective", CC"(I)V", (void*)&WB_RemoveCompilerDirective }, 2023 {CC"currentGC", CC"()I", (void*)&WB_CurrentGC}, 2024 {CC"allSupportedGC", CC"()I", (void*)&WB_AllSupportedGC}, 2025 {CC"gcSelectedByErgo", CC"()Z", (void*)&WB_GCSelectedByErgo}, 2026 {CC"supportsConcurrentGCPhaseControl", CC"()Z", (void*)&WB_SupportsConcurrentGCPhaseControl}, 2027 {CC"getConcurrentGCPhases", CC"()[Ljava/lang/String;", 2028 (void*)&WB_GetConcurrentGCPhases}, 2029 {CC"requestConcurrentGCPhase0", CC"(Ljava/lang/String;)Z", 2030 (void*)&WB_RequestConcurrentGCPhase}, 2031 }; 2032 2033 #undef CC 2034 2035 JVM_ENTRY(void, JVM_RegisterWhiteBoxMethods(JNIEnv* env, jclass wbclass)) 2036 { 2037 if (WhiteBoxAPI) { 2038 // Make sure that wbclass is loaded by the null classloader 2039 InstanceKlass* ik = InstanceKlass::cast(JNIHandles::resolve(wbclass)->klass()); 2040 Handle loader(THREAD, ik->class_loader()); 2041 if (loader.is_null()) { 2042 WhiteBox::register_methods(env, wbclass, thread, methods, sizeof(methods) / sizeof(methods[0])); 2043 WhiteBox::register_extended(env, wbclass, thread); 2044 WhiteBox::set_used(); 2045 } 2046 } 2047 } 2048 JVM_END