1 /*
   2  * Copyright (c) 2012, 2025, 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 "cds.h"
  26 #include "cds/archiveHeapLoader.hpp"
  27 #include "cds/cdsConstants.hpp"
  28 #include "cds/filemap.hpp"
  29 #include "cds/heapShared.hpp"
  30 #include "cds/metaspaceShared.hpp"
  31 #include "classfile/classLoader.hpp"
  32 #include "classfile/classLoaderDataGraph.hpp"
  33 #include "classfile/classLoaderStats.hpp"
  34 #include "classfile/classPrinter.hpp"
  35 #include "classfile/javaClasses.inline.hpp"
  36 #include "classfile/modules.hpp"
  37 #include "classfile/stringTable.hpp"
  38 #include "classfile/symbolTable.hpp"
  39 #include "classfile/systemDictionary.hpp"
  40 #include "classfile/vmSymbols.hpp"
  41 #include "code/codeCache.hpp"
  42 #include "compiler/compilationPolicy.hpp"
  43 #include "compiler/compilerOracle.hpp"
  44 #include "compiler/directivesParser.hpp"
  45 #include "compiler/methodMatcher.hpp"
  46 #include "gc/shared/concurrentGCBreakpoints.hpp"
  47 #include "gc/shared/gcConfig.hpp"
  48 #include "gc/shared/genArguments.hpp"
  49 #include "jvm.h"
  50 #include "jvmtifiles/jvmtiEnv.hpp"
  51 #include "logging/log.hpp"
  52 #include "memory/iterator.hpp"
  53 #include "memory/memoryReserver.hpp"
  54 #include "memory/metadataFactory.hpp"
  55 #include "memory/iterator.inline.hpp"
  56 #include "memory/metaspace/testHelpers.hpp"
  57 #include "memory/metaspaceUtils.hpp"
  58 #include "memory/oopFactory.hpp"
  59 #include "memory/resourceArea.hpp"
  60 #include "memory/universe.hpp"
  61 #include "nmt/mallocSiteTable.hpp"
  62 #include "oops/access.hpp"
  63 #include "oops/array.hpp"
  64 #include "oops/compressedOops.hpp"
  65 #include "oops/compressedOops.inline.hpp"
  66 #include "oops/constantPool.inline.hpp"
  67 #include "oops/klass.inline.hpp"
  68 #include "oops/method.inline.hpp"
  69 #include "oops/methodData.inline.hpp"
  70 #include "oops/objArrayKlass.hpp"
  71 #include "oops/objArrayOop.inline.hpp"
  72 #include "oops/oop.inline.hpp"
  73 #include "oops/objArrayOop.inline.hpp"
  74 #include "oops/typeArrayOop.inline.hpp"
  75 #include "prims/jvmtiEnvBase.hpp"
  76 #include "prims/resolvedMethodTable.hpp"
  77 #include "prims/wbtestmethods/parserTests.hpp"
  78 #include "prims/whitebox.inline.hpp"
  79 #include "runtime/arguments.hpp"
  80 #include "runtime/atomic.hpp"
  81 #include "runtime/deoptimization.hpp"
  82 #include "runtime/fieldDescriptor.inline.hpp"
  83 #include "runtime/flags/jvmFlag.hpp"
  84 #include "runtime/flags/jvmFlagAccess.hpp"
  85 #include "runtime/frame.inline.hpp"
  86 #include "runtime/handles.inline.hpp"
  87 #include "runtime/handshake.hpp"
  88 #include "runtime/interfaceSupport.inline.hpp"
  89 #include "runtime/javaCalls.hpp"
  90 #include "runtime/javaThread.inline.hpp"
  91 #include "runtime/jniHandles.inline.hpp"
  92 #include "runtime/keepStackGCProcessed.hpp"
  93 #include "runtime/lockStack.hpp"
  94 #include "runtime/os.hpp"
  95 #include "runtime/stackFrameStream.inline.hpp"
  96 #include "runtime/synchronizer.hpp"
  97 #include "runtime/threadSMR.hpp"
  98 #include "runtime/vframe.hpp"
  99 #include "runtime/vm_version.hpp"
 100 #include "services/memoryService.hpp"
 101 #include "utilities/align.hpp"
 102 #include "utilities/checkedCast.hpp"
 103 #include "utilities/debug.hpp"
 104 #include "utilities/elfFile.hpp"
 105 #include "utilities/exceptions.hpp"
 106 #include "utilities/macros.hpp"
 107 #include "utilities/nativeCallStack.hpp"
 108 #include "utilities/ostream.hpp"
 109 #if INCLUDE_G1GC
 110 #include "gc/g1/g1Arguments.hpp"
 111 #include "gc/g1/g1CollectedHeap.inline.hpp"
 112 #include "gc/g1/g1ConcurrentMark.hpp"
 113 #include "gc/g1/g1ConcurrentMarkThread.inline.hpp"
 114 #include "gc/g1/g1HeapRegionManager.hpp"
 115 #include "gc/g1/g1HeapRegionRemSet.inline.hpp"
 116 #endif // INCLUDE_G1GC
 117 #if INCLUDE_PARALLELGC
 118 #include "gc/parallel/parallelScavengeHeap.inline.hpp"
 119 #endif // INCLUDE_PARALLELGC
 120 #if INCLUDE_SERIALGC
 121 #include "gc/serial/serialHeap.hpp"
 122 #endif // INCLUDE_SERIALGC
 123 #if INCLUDE_ZGC
 124 #include "gc/z/zAddress.inline.hpp"
 125 #endif // INCLUDE_ZGC
 126 #if INCLUDE_JVMCI
 127 #include "jvmci/jvmciEnv.hpp"
 128 #include "jvmci/jvmciRuntime.hpp"
 129 #endif
 130 #ifdef LINUX
 131 #include "cgroupSubsystem_linux.hpp"
 132 #include "osContainer_linux.hpp"
 133 #include "os_linux.hpp"
 134 #endif
 135 
 136 #define CHECK_JNI_EXCEPTION_(env, value)                               \
 137   do {                                                                 \
 138     JavaThread* THREAD = JavaThread::thread_from_jni_environment(env); \
 139     THREAD->clear_pending_jni_exception_check();                       \
 140     if (HAS_PENDING_EXCEPTION) {                                       \
 141       return(value);                                                   \
 142     }                                                                  \
 143   } while (0)
 144 
 145 #define CHECK_JNI_EXCEPTION(env)                                       \
 146   do {                                                                 \
 147     JavaThread* THREAD = JavaThread::thread_from_jni_environment(env); \
 148     THREAD->clear_pending_jni_exception_check();                       \
 149     if (HAS_PENDING_EXCEPTION) {                                       \
 150       return;                                                          \
 151     }                                                                  \
 152   } while (0)
 153 
 154 bool WhiteBox::_used = false;
 155 volatile bool WhiteBox::compilation_locked = false;
 156 
 157 class VM_WhiteBoxOperation : public VM_Operation {
 158  public:
 159   VM_WhiteBoxOperation()                         { }
 160   VMOp_Type type()                  const        { return VMOp_WhiteBoxOperation; }
 161   bool allow_nested_vm_operations() const        { return true; }
 162 };
 163 
 164 
 165 WB_ENTRY(jlong, WB_GetObjectAddress(JNIEnv* env, jobject o, jobject obj))
 166   return (jlong)(void*)JNIHandles::resolve(obj);
 167 WB_END
 168 
 169 WB_ENTRY(jint, WB_GetHeapOopSize(JNIEnv* env, jobject o))
 170   return heapOopSize;
 171 WB_END
 172 
 173 WB_ENTRY(jint, WB_GetVMPageSize(JNIEnv* env, jobject o))
 174   return (jint)os::vm_page_size();
 175 WB_END
 176 
 177 WB_ENTRY(jlong, WB_GetVMAllocationGranularity(JNIEnv* env, jobject o))
 178   return os::vm_allocation_granularity();
 179 WB_END
 180 
 181 WB_ENTRY(jlong, WB_GetVMLargePageSize(JNIEnv* env, jobject o))
 182   return os::large_page_size();
 183 WB_END
 184 
 185 WB_ENTRY(jstring, WB_PrintString(JNIEnv* env, jobject wb, jstring str, jint max_length))
 186   ResourceMark rm(THREAD);
 187   stringStream sb;
 188   java_lang_String::print(JNIHandles::resolve(str), &sb, max_length);
 189   oop result = java_lang_String::create_oop_from_str(sb.as_string(), THREAD);
 190   return (jstring) JNIHandles::make_local(THREAD, result);
 191 WB_END
 192 
 193 WB_ENTRY(jint, WB_TakeLockAndHangInSafepoint(JNIEnv* env, jobject wb))
 194   JavaThread* self = JavaThread::current();
 195   // VMStatistic_lock is used to minimize interference with VM locking
 196   MutexLocker mu(VMStatistic_lock);
 197   VM_HangInSafepoint force_safepoint_stuck_op;
 198   VMThread::execute(&force_safepoint_stuck_op);
 199   ShouldNotReachHere();
 200   return 0;
 201 WB_END
 202 
 203 class WBIsKlassAliveClosure : public LockedClassesDo {
 204     Symbol* _name;
 205     int _count;
 206 public:
 207     WBIsKlassAliveClosure(Symbol* name) : _name(name), _count(0) {}
 208 
 209     void do_klass(Klass* k) {
 210       Symbol* ksym = k->name();
 211       if (ksym->fast_compare(_name) == 0) {
 212         _count++;
 213       } else if (k->is_instance_klass()) {
 214         // Need special handling for hidden classes because the JVM
 215         // appends "+<hex-address>" to hidden class names.
 216         InstanceKlass *ik = InstanceKlass::cast(k);
 217         if (ik->is_hidden()) {
 218           ResourceMark rm;
 219           char* k_name = ksym->as_C_string();
 220           // Find the first '+' char and truncate the string at that point.
 221           // NOTE: This will not work correctly if the original hidden class
 222           // name contains a '+'.
 223           char* plus_char = strchr(k_name, '+');
 224           if (plus_char != nullptr) {
 225             *plus_char = 0;
 226             char* c_name = _name->as_C_string();
 227             if (strcmp(c_name, k_name) == 0) {
 228               _count++;
 229             }
 230           }
 231         }
 232       }
 233     }
 234 
 235     int count() const {
 236         return _count;
 237     }
 238 };
 239 
 240 WB_ENTRY(jint, WB_CountAliveClasses(JNIEnv* env, jobject target, jstring name))
 241   oop h_name = JNIHandles::resolve(name);
 242   if (h_name == nullptr) {
 243     return 0;
 244   }
 245   Symbol* sym = java_lang_String::as_symbol(h_name);
 246   TempNewSymbol tsym(sym); // Make sure to decrement reference count on sym on return
 247 
 248   WBIsKlassAliveClosure closure(sym);
 249   ClassLoaderDataGraph::classes_do(&closure);
 250 
 251   // Return the count of alive classes with this name.
 252   return closure.count();
 253 WB_END
 254 
 255 WB_ENTRY(jint, WB_GetSymbolRefcount(JNIEnv* env, jobject unused, jstring name))
 256   oop h_name = JNIHandles::resolve(name);
 257   if (h_name == nullptr) {
 258     return 0;
 259   }
 260   Symbol* sym = java_lang_String::as_symbol(h_name);
 261   TempNewSymbol tsym(sym); // Make sure to decrement reference count on sym on return
 262   return (jint)sym->refcount();
 263 WB_END
 264 
 265 
 266 WB_ENTRY(void, WB_AddToBootstrapClassLoaderSearch(JNIEnv* env, jobject o, jstring segment)) {
 267 #if INCLUDE_JVMTI
 268   ResourceMark rm;
 269   const char* seg = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(segment));
 270   JvmtiEnv* jvmti_env = JvmtiEnv::create_a_jvmti(JVMTI_VERSION);
 271   jvmtiError err = jvmti_env->AddToBootstrapClassLoaderSearch(seg);
 272   assert(err == JVMTI_ERROR_NONE, "must not fail");
 273 #endif
 274 }
 275 WB_END
 276 
 277 WB_ENTRY(void, WB_AddToSystemClassLoaderSearch(JNIEnv* env, jobject o, jstring segment)) {
 278 #if INCLUDE_JVMTI
 279   ResourceMark rm;
 280   const char* seg = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(segment));
 281   JvmtiEnv* jvmti_env = JvmtiEnv::create_a_jvmti(JVMTI_VERSION);
 282   jvmtiError err = jvmti_env->AddToSystemClassLoaderSearch(seg);
 283   assert(err == JVMTI_ERROR_NONE, "must not fail");
 284 #endif
 285 }
 286 WB_END
 287 
 288 
 289 WB_ENTRY(jlong, WB_GetCompressedOopsMaxHeapSize(JNIEnv* env, jobject o)) {
 290   return (jlong)Arguments::max_heap_for_compressed_oops();
 291 }
 292 WB_END
 293 
 294 WB_ENTRY(void, WB_PrintHeapSizes(JNIEnv* env, jobject o)) {
 295   tty->print_cr("Minimum heap %zu Initial heap %zu "
 296                 "Maximum heap %zu Space alignment %zu Heap alignment %zu",
 297                 MinHeapSize,
 298                 InitialHeapSize,
 299                 MaxHeapSize,
 300                 SpaceAlignment,
 301                 HeapAlignment);
 302 }
 303 WB_END
 304 
 305 WB_ENTRY(void, WB_ReadFromNoaccessArea(JNIEnv* env, jobject o))
 306   size_t granularity = os::vm_allocation_granularity();
 307   ReservedHeapSpace rhs = HeapReserver::reserve(100 * granularity, granularity, os::vm_page_size(), nullptr);
 308 
 309   // Check if constraints are complied
 310   if (!( UseCompressedOops && rhs.is_reserved() &&
 311          CompressedOops::base() != nullptr &&
 312          CompressedOops::use_implicit_null_checks() )) {
 313     tty->print_cr("WB_ReadFromNoaccessArea method is useless:\n "
 314                   "\tUseCompressedOops is %d\n"
 315                   "\trhs.base() is " PTR_FORMAT "\n"
 316                   "\tCompressedOops::base() is " PTR_FORMAT "\n"
 317                   "\tCompressedOops::use_implicit_null_checks() is %d",
 318                   UseCompressedOops,
 319                   p2i(rhs.base()),
 320                   p2i(CompressedOops::base()),
 321                   CompressedOops::use_implicit_null_checks());
 322     return;
 323   }
 324 
 325   VirtualSpace vs;
 326   vs.initialize(rhs, 50 * granularity);
 327 
 328   tty->print_cr("Reading from no access area... ");
 329   tty->print_cr("*(vs.low_boundary() - rhs.noaccess_prefix() / 2 ) = %c",
 330                 *(vs.low_boundary() - rhs.noaccess_prefix() / 2 ));
 331 WB_END
 332 
 333 static jint wb_stress_virtual_space_resize(size_t reserved_space_size,
 334                                            size_t magnitude, size_t iterations) {
 335   size_t granularity = os::vm_allocation_granularity();
 336   ReservedHeapSpace rhs = HeapReserver::reserve(reserved_space_size * granularity, granularity, os::vm_page_size(), nullptr);
 337   if (!rhs.is_reserved()) {
 338     tty->print_cr("Failed to initialize ReservedSpace. Can't proceed.");
 339     return 3;
 340   }
 341 
 342   VirtualSpace vs;
 343   if (!vs.initialize(rhs, 0)) {
 344     tty->print_cr("Failed to initialize VirtualSpace. Can't proceed.");
 345     return 3;
 346   }
 347 
 348   int seed = os::random();
 349   tty->print_cr("Random seed is %d", seed);
 350 
 351   for (size_t i = 0; i < iterations; i++) {
 352 
 353     // Whether we will shrink or grow
 354     bool shrink = os::random() % 2L == 0;
 355 
 356     // Get random delta to resize virtual space
 357     size_t delta = (size_t)os::random() % magnitude;
 358 
 359     // If we are about to shrink virtual space below zero, then expand instead
 360     if (shrink && vs.committed_size() < delta) {
 361       shrink = false;
 362     }
 363 
 364     // Resizing by delta
 365     if (shrink) {
 366       vs.shrink_by(delta);
 367     } else {
 368       // If expanding fails expand_by will silently return false
 369       vs.expand_by(delta, true);
 370     }
 371   }
 372   return 0;
 373 }
 374 
 375 WB_ENTRY(jint, WB_StressVirtualSpaceResize(JNIEnv* env, jobject o,
 376         jlong reserved_space_size, jlong magnitude, jlong iterations))
 377   tty->print_cr("reservedSpaceSize=" JLONG_FORMAT ", magnitude=" JLONG_FORMAT ", "
 378                 "iterations=" JLONG_FORMAT "\n", reserved_space_size, magnitude,
 379                 iterations);
 380   if (reserved_space_size < 0 || magnitude < 0 || iterations < 0) {
 381     tty->print_cr("One of variables printed above is negative. Can't proceed.\n");
 382     return 1;
 383   }
 384 
 385   // sizeof(size_t) depends on whether OS is 32bit or 64bit. sizeof(jlong) is
 386   // always 8 byte. That's why we should avoid overflow in case of 32bit platform.
 387   if (sizeof(size_t) < sizeof(jlong)) {
 388     jlong size_t_max_value = (jlong)SIZE_MAX;
 389     if (reserved_space_size > size_t_max_value || magnitude > size_t_max_value
 390         || iterations > size_t_max_value) {
 391       tty->print_cr("One of variables printed above overflows size_t. Can't proceed.\n");
 392       return 2;
 393     }
 394   }
 395 
 396   return wb_stress_virtual_space_resize((size_t) reserved_space_size,
 397                                         (size_t) magnitude, (size_t) iterations);
 398 WB_END
 399 
 400 WB_ENTRY(jboolean, WB_IsGCSupported(JNIEnv* env, jobject o, jint name))
 401   return GCConfig::is_gc_supported((CollectedHeap::Name)name);
 402 WB_END
 403 
 404 WB_ENTRY(jboolean, WB_HasLibgraal(JNIEnv* env, jobject o))
 405 #if INCLUDE_JVMCI
 406   return JVMCI::shared_library_exists();
 407 #endif
 408   return false;
 409 WB_END
 410 
 411 WB_ENTRY(jboolean, WB_IsGCSupportedByJVMCICompiler(JNIEnv* env, jobject o, jint name))
 412 #if INCLUDE_JVMCI
 413   if (EnableJVMCI) {
 414     // Enter the JVMCI env that will be used by the CompileBroker.
 415     JVMCIEnv jvmciEnv(thread, __FILE__, __LINE__);
 416     return jvmciEnv.init_error() == JNI_OK && jvmciEnv.runtime()->is_gc_supported(&jvmciEnv, (CollectedHeap::Name)name);
 417   }
 418 #endif
 419   return false;
 420 WB_END
 421 
 422 WB_ENTRY(jboolean, WB_IsGCSelected(JNIEnv* env, jobject o, jint name))
 423   return GCConfig::is_gc_selected((CollectedHeap::Name)name);
 424 WB_END
 425 
 426 WB_ENTRY(jboolean, WB_IsGCSelectedErgonomically(JNIEnv* env, jobject o))
 427   return GCConfig::is_gc_selected_ergonomically();
 428 WB_END
 429 
 430 WB_ENTRY(jboolean, WB_isObjectInOldGen(JNIEnv* env, jobject o, jobject obj))
 431   oop p = JNIHandles::resolve(obj);
 432 #if INCLUDE_G1GC
 433   if (UseG1GC) {
 434     G1CollectedHeap* g1h = G1CollectedHeap::heap();
 435     const G1HeapRegion* hr = g1h->heap_region_containing(p);
 436     return hr->is_old_or_humongous();
 437   }
 438 #endif
 439 #if INCLUDE_PARALLELGC
 440   if (UseParallelGC) {
 441     ParallelScavengeHeap* psh = ParallelScavengeHeap::heap();
 442     return !psh->is_in_young(p);
 443   }
 444 #endif
 445 #if INCLUDE_ZGC
 446   if (UseZGC) {
 447     return ZHeap::heap()->is_old(to_zaddress(p));
 448   }
 449 #endif
 450 #if INCLUDE_SHENANDOAHGC
 451   if (UseShenandoahGC) {
 452     ShenandoahHeap* sh = ShenandoahHeap::heap();
 453     return sh->mode()->is_generational() ?  sh->is_in_old(p) : sh->is_in(p);
 454   }
 455 #endif
 456 #if INCLUDE_SERIALGC
 457   if (UseSerialGC) {
 458     return !SerialHeap::heap()->is_in_young(p);
 459   }
 460 #endif
 461   ShouldNotReachHere();
 462   return false;
 463 WB_END
 464 
 465 WB_ENTRY(jlong, WB_GetObjectSize(JNIEnv* env, jobject o, jobject obj))
 466   oop p = JNIHandles::resolve(obj);
 467   return p->size() * HeapWordSize;
 468 WB_END
 469 
 470 WB_ENTRY(jlong, WB_GetHeapSpaceAlignment(JNIEnv* env, jobject o))
 471   return (jlong)SpaceAlignment;
 472 WB_END
 473 
 474 WB_ENTRY(jlong, WB_GetHeapAlignment(JNIEnv* env, jobject o))
 475   return (jlong)HeapAlignment;
 476 WB_END
 477 
 478 WB_ENTRY(jboolean, WB_SupportsConcurrentGCBreakpoints(JNIEnv* env, jobject o))
 479   return Universe::heap()->supports_concurrent_gc_breakpoints();
 480 WB_END
 481 
 482 WB_ENTRY(void, WB_ConcurrentGCAcquireControl(JNIEnv* env, jobject o))
 483   ConcurrentGCBreakpoints::acquire_control();
 484 WB_END
 485 
 486 WB_ENTRY(void, WB_ConcurrentGCReleaseControl(JNIEnv* env, jobject o))
 487   ConcurrentGCBreakpoints::release_control();
 488 WB_END
 489 
 490 WB_ENTRY(void, WB_ConcurrentGCRunToIdle(JNIEnv* env, jobject o))
 491   ConcurrentGCBreakpoints::run_to_idle();
 492 WB_END
 493 
 494 WB_ENTRY(jboolean, WB_ConcurrentGCRunTo(JNIEnv* env, jobject o, jobject at))
 495   Handle h_name(THREAD, JNIHandles::resolve(at));
 496   ResourceMark rm;
 497   const char* c_name = java_lang_String::as_utf8_string(h_name());
 498   return ConcurrentGCBreakpoints::run_to(c_name);
 499 WB_END
 500 
 501 #if INCLUDE_G1GC
 502 
 503 WB_ENTRY(jboolean, WB_G1IsHumongous(JNIEnv* env, jobject o, jobject obj))
 504   if (UseG1GC) {
 505     G1CollectedHeap* g1h = G1CollectedHeap::heap();
 506     oop result = JNIHandles::resolve(obj);
 507     const G1HeapRegion* hr = g1h->heap_region_containing(result);
 508     return hr->is_humongous();
 509   }
 510   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1IsHumongous: G1 GC is not enabled");
 511 WB_END
 512 
 513 WB_ENTRY(jboolean, WB_G1BelongsToHumongousRegion(JNIEnv* env, jobject o, jlong addr))
 514   if (UseG1GC) {
 515     G1CollectedHeap* g1h = G1CollectedHeap::heap();
 516     const G1HeapRegion* hr = g1h->heap_region_containing((void*) addr);
 517     return hr->is_humongous();
 518   }
 519   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1BelongsToHumongousRegion: G1 GC is not enabled");
 520 WB_END
 521 
 522 WB_ENTRY(jboolean, WB_G1BelongsToFreeRegion(JNIEnv* env, jobject o, jlong addr))
 523   if (UseG1GC) {
 524     G1CollectedHeap* g1h = G1CollectedHeap::heap();
 525     const G1HeapRegion* hr = g1h->heap_region_containing((void*) addr);
 526     return hr->is_free();
 527   }
 528   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1BelongsToFreeRegion: G1 GC is not enabled");
 529 WB_END
 530 
 531 WB_ENTRY(jlong, WB_G1NumMaxRegions(JNIEnv* env, jobject o))
 532   if (UseG1GC) {
 533     G1CollectedHeap* g1h = G1CollectedHeap::heap();
 534     size_t nr = g1h->max_regions();
 535     return (jlong)nr;
 536   }
 537   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1NumMaxRegions: G1 GC is not enabled");
 538 WB_END
 539 
 540 WB_ENTRY(jlong, WB_G1NumFreeRegions(JNIEnv* env, jobject o))
 541   if (UseG1GC) {
 542     G1CollectedHeap* g1h = G1CollectedHeap::heap();
 543     size_t nr = g1h->num_free_regions();
 544     return (jlong)nr;
 545   }
 546   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1NumFreeRegions: G1 GC is not enabled");
 547 WB_END
 548 
 549 WB_ENTRY(jboolean, WB_G1InConcurrentMark(JNIEnv* env, jobject o))
 550   if (UseG1GC) {
 551     G1CollectedHeap* g1h = G1CollectedHeap::heap();
 552     return g1h->concurrent_mark()->cm_thread()->in_progress();
 553   }
 554   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1InConcurrentMark: G1 GC is not enabled");
 555 WB_END
 556 
 557 WB_ENTRY(jint, WB_G1CompletedConcurrentMarkCycles(JNIEnv* env, jobject o))
 558   if (UseG1GC) {
 559     G1CollectedHeap* g1h = G1CollectedHeap::heap();
 560     G1ConcurrentMark* cm = g1h->concurrent_mark();
 561     return cm->completed_mark_cycles();
 562   }
 563   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1CompletedConcurrentMarkCycles: G1 GC is not enabled");
 564 WB_END
 565 
 566 WB_ENTRY(jint, WB_G1RegionSize(JNIEnv* env, jobject o))
 567   if (UseG1GC) {
 568     return (jint)G1HeapRegion::GrainBytes;
 569   }
 570   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1RegionSize: G1 GC is not enabled");
 571 WB_END
 572 
 573 WB_ENTRY(jboolean, WB_G1HasRegionsToUncommit(JNIEnv* env, jobject o))
 574   if (UseG1GC) {
 575     return G1CollectedHeap::heap()->has_uncommittable_regions();
 576   }
 577   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1HasRegionsToUncommit: G1 GC is not enabled");
 578 WB_END
 579 
 580 #endif // INCLUDE_G1GC
 581 
 582 #if INCLUDE_PARALLELGC
 583 
 584 WB_ENTRY(jlong, WB_PSVirtualSpaceAlignment(JNIEnv* env, jobject o))
 585   if (UseParallelGC) {
 586     return GenAlignment;
 587   }
 588   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_PSVirtualSpaceAlignment: Parallel GC is not enabled");
 589 WB_END
 590 
 591 WB_ENTRY(jlong, WB_PSHeapGenerationAlignment(JNIEnv* env, jobject o))
 592   if (UseParallelGC) {
 593     return GenAlignment;
 594   }
 595   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_PSHeapGenerationAlignment: Parallel GC is not enabled");
 596 WB_END
 597 
 598 #endif // INCLUDE_PARALLELGC
 599 
 600 #if INCLUDE_G1GC
 601 
 602 WB_ENTRY(jobject, WB_G1AuxiliaryMemoryUsage(JNIEnv* env))
 603   if (UseG1GC) {
 604     ResourceMark rm(THREAD);
 605     G1CollectedHeap* g1h = G1CollectedHeap::heap();
 606     MemoryUsage usage = g1h->get_auxiliary_data_memory_usage();
 607     Handle h = MemoryService::create_MemoryUsage_obj(usage, CHECK_NULL);
 608     return JNIHandles::make_local(THREAD, h());
 609   }
 610   THROW_MSG_NULL(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1AuxiliaryMemoryUsage: G1 GC is not enabled");
 611 WB_END
 612 
 613 WB_ENTRY(jint, WB_G1ActiveMemoryNodeCount(JNIEnv* env, jobject o))
 614   if (UseG1GC) {
 615     G1NUMA* numa = G1NUMA::numa();
 616     return (jint)numa->num_active_nodes();
 617   }
 618   THROW_MSG_0(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1ActiveMemoryNodeCount: G1 GC is not enabled");
 619 WB_END
 620 
 621 WB_ENTRY(jintArray, WB_G1MemoryNodeIds(JNIEnv* env, jobject o))
 622   if (UseG1GC) {
 623     G1NUMA* numa = G1NUMA::numa();
 624     int num_node_ids = checked_cast<int>(numa->num_active_nodes());
 625     const uint* node_ids = numa->node_ids();
 626 
 627     typeArrayOop result = oopFactory::new_intArray(num_node_ids, CHECK_NULL);
 628     for (int i = 0; i < num_node_ids; i++) {
 629       result->int_at_put(i, checked_cast<jint>(node_ids[i]));
 630     }
 631     return (jintArray) JNIHandles::make_local(THREAD, result);
 632   }
 633   THROW_MSG_NULL(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1MemoryNodeIds: G1 GC is not enabled");
 634 WB_END
 635 
 636 class OldRegionsLivenessClosure: public G1HeapRegionClosure {
 637 
 638  private:
 639   const int _liveness;
 640   size_t _total_count;
 641   size_t _total_memory;
 642   size_t _total_memory_to_free;
 643 
 644  public:
 645   OldRegionsLivenessClosure(int liveness) :
 646     _liveness(liveness),
 647     _total_count(0),
 648     _total_memory(0),
 649     _total_memory_to_free(0) { }
 650 
 651     size_t total_count() { return _total_count; }
 652     size_t total_memory() { return _total_memory; }
 653     size_t total_memory_to_free() { return _total_memory_to_free; }
 654 
 655   bool do_heap_region(G1HeapRegion* r) {
 656     if (r->is_old()) {
 657       size_t live = r->live_bytes();
 658       size_t size = r->used();
 659       size_t reg_size = G1HeapRegion::GrainBytes;
 660       if (size > 0 && ((int)(live * 100 / size) < _liveness)) {
 661         _total_memory += size;
 662         ++_total_count;
 663         if (size == reg_size) {
 664           // We don't include non-full regions since they are unlikely included in mixed gc
 665           // for testing purposes it's enough to have lowest estimation of total memory that is expected to be freed
 666           _total_memory_to_free += size - live;
 667         }
 668       }
 669     }
 670     return false;
 671   }
 672 };
 673 
 674 
 675 WB_ENTRY(jlongArray, WB_G1GetMixedGCInfo(JNIEnv* env, jobject o, jint liveness))
 676   if (!UseG1GC) {
 677     THROW_MSG_NULL(vmSymbols::java_lang_UnsupportedOperationException(), "WB_G1GetMixedGCInfo: G1 GC is not enabled");
 678   }
 679   if (liveness < 0) {
 680     THROW_MSG_NULL(vmSymbols::java_lang_IllegalArgumentException(), "liveness value should be non-negative");
 681   }
 682 
 683   G1CollectedHeap* g1h = G1CollectedHeap::heap();
 684   OldRegionsLivenessClosure rli(liveness);
 685   g1h->heap_region_iterate(&rli);
 686 
 687   typeArrayOop result = oopFactory::new_longArray(3, CHECK_NULL);
 688   result->long_at_put(0, rli.total_count());
 689   result->long_at_put(1, rli.total_memory());
 690   result->long_at_put(2, rli.total_memory_to_free());
 691   return (jlongArray) JNIHandles::make_local(THREAD, result);
 692 WB_END
 693 
 694 #endif // INCLUDE_G1GC
 695 
 696 // Alloc memory using the test memory tag so that we can use that to see if
 697 // NMT picks it up correctly
 698 WB_ENTRY(jlong, WB_NMTMalloc(JNIEnv* env, jobject o, jlong size))
 699   jlong addr = 0;
 700   addr = (jlong)(uintptr_t)os::malloc(size, mtTest);
 701   return addr;
 702 WB_END
 703 
 704 // Alloc memory with pseudo call stack. The test can create pseudo malloc
 705 // allocation site to stress the malloc tracking.
 706 WB_ENTRY(jlong, WB_NMTMallocWithPseudoStack(JNIEnv* env, jobject o, jlong size, jint pseudo_stack))
 707   address pc = (address)(size_t)pseudo_stack;
 708   NativeCallStack stack(&pc, 1);
 709   return (jlong)(uintptr_t)os::malloc(size, mtTest, stack);
 710 WB_END
 711 
 712 // Alloc memory with pseudo call stack and specific memory tag.
 713 WB_ENTRY(jlong, WB_NMTMallocWithPseudoStackAndType(JNIEnv* env, jobject o, jlong size, jint pseudo_stack, jint mem_tag))
 714   address pc = (address)(size_t)pseudo_stack;
 715   NativeCallStack stack(&pc, 1);
 716   return (jlong)(uintptr_t)os::malloc(size, (MemTag)mem_tag, stack);
 717 WB_END
 718 
 719 // Free the memory allocated by NMTAllocTest
 720 WB_ENTRY(void, WB_NMTFree(JNIEnv* env, jobject o, jlong mem))
 721   os::free((void*)(uintptr_t)mem);
 722 WB_END
 723 
 724 WB_ENTRY(jlong, WB_NMTReserveMemory(JNIEnv* env, jobject o, jlong size))
 725   return (jlong)(uintptr_t)os::reserve_memory(size, false, mtTest);
 726 WB_END
 727 
 728 WB_ENTRY(jlong, WB_NMTAttemptReserveMemoryAt(JNIEnv* env, jobject o, jlong addr, jlong size))
 729   return (jlong)(uintptr_t)os::attempt_reserve_memory_at((char*)(uintptr_t)addr, (size_t)size, false, mtTest);
 730 WB_END
 731 
 732 WB_ENTRY(void, WB_NMTCommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size))
 733   os::commit_memory((char *)(uintptr_t)addr, size, !ExecMem);
 734 WB_END
 735 
 736 WB_ENTRY(void, WB_NMTUncommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size))
 737   os::uncommit_memory((char *)(uintptr_t)addr, size);
 738 WB_END
 739 
 740 WB_ENTRY(void, WB_NMTReleaseMemory(JNIEnv* env, jobject o, jlong addr, jlong size))
 741   os::release_memory((char *)(uintptr_t)addr, size);
 742 WB_END
 743 
 744 WB_ENTRY(jint, WB_NMTGetHashSize(JNIEnv* env, jobject o))
 745   int hash_size = MallocSiteTable::hash_buckets();
 746   assert(hash_size > 0, "NMT hash_size should be > 0");
 747   return (jint)hash_size;
 748 WB_END
 749 
 750 WB_ENTRY(jlong, WB_NMTNewArena(JNIEnv* env, jobject o, jlong init_size))
 751   Arena* arena =  new (mtTest) Arena(mtTest, Arena::Tag::tag_other, size_t(init_size));
 752   return (jlong)arena;
 753 WB_END
 754 
 755 WB_ENTRY(void, WB_NMTFreeArena(JNIEnv* env, jobject o, jlong arena))
 756   Arena* a = (Arena*)arena;
 757   delete a;
 758 WB_END
 759 
 760 WB_ENTRY(void, WB_NMTArenaMalloc(JNIEnv* env, jobject o, jlong arena, jlong size))
 761   Arena* a = (Arena*)arena;
 762   a->Amalloc(size_t(size));
 763 WB_END
 764 
 765 static jmethodID reflected_method_to_jmid(JavaThread* thread, JNIEnv* env, jobject method) {
 766   assert(method != nullptr, "method should not be null");
 767   ThreadToNativeFromVM ttn(thread);
 768   return env->FromReflectedMethod(method);
 769 }
 770 
 771 // Deoptimizes all compiled frames and makes nmethods not entrant if it's requested
 772 class VM_WhiteBoxDeoptimizeFrames : public VM_WhiteBoxOperation {
 773  private:
 774   int _result;
 775   const bool _make_not_entrant;
 776  public:
 777   VM_WhiteBoxDeoptimizeFrames(bool make_not_entrant) :
 778         _result(0), _make_not_entrant(make_not_entrant) { }
 779   int  result() const { return _result; }
 780 
 781   void doit() {
 782     for (JavaThreadIteratorWithHandle jtiwh; JavaThread *t = jtiwh.next(); ) {
 783       if (t->has_last_Java_frame()) {
 784         for (StackFrameStream fst(t, false /* update */, true /* process_frames */); !fst.is_done(); fst.next()) {
 785           frame* f = fst.current();
 786           if (f->can_be_deoptimized() && !f->is_deoptimized_frame()) {
 787             Deoptimization::deoptimize(t, *f);
 788             if (_make_not_entrant) {
 789                 nmethod* nm = CodeCache::find_nmethod(f->pc());
 790                 assert(nm != nullptr, "did not find nmethod");
 791                 nm->make_not_entrant();
 792             }
 793             ++_result;
 794           }
 795         }
 796       }
 797     }
 798   }
 799 };
 800 
 801 WB_ENTRY(jint, WB_DeoptimizeFrames(JNIEnv* env, jobject o, jboolean make_not_entrant))
 802   VM_WhiteBoxDeoptimizeFrames op(make_not_entrant == JNI_TRUE);
 803   VMThread::execute(&op);
 804   return op.result();
 805 WB_END
 806 
 807 WB_ENTRY(jboolean, WB_IsFrameDeoptimized(JNIEnv* env, jobject o, jint depth))
 808   bool result = false;
 809   if (thread->has_last_Java_frame()) {
 810     ResourceMark rm(THREAD);
 811     RegisterMap reg_map(thread,
 812                         RegisterMap::UpdateMap::include,
 813                         RegisterMap::ProcessFrames::include,
 814                         RegisterMap::WalkContinuation::skip);
 815     javaVFrame *jvf = thread->last_java_vframe(&reg_map);
 816     for (jint d = 0; d < depth && jvf != nullptr; d++) {
 817       jvf = jvf->java_sender();
 818     }
 819     result = jvf != nullptr && jvf->fr().is_deoptimized_frame();
 820   }
 821   return result;
 822 WB_END
 823 
 824 WB_ENTRY(void, WB_DeoptimizeAll(JNIEnv* env, jobject o))
 825   DeoptimizationScope deopt_scope;
 826   CodeCache::mark_all_nmethods_for_deoptimization(&deopt_scope);
 827   deopt_scope.deoptimize_marked();
 828 WB_END
 829 
 830 WB_ENTRY(jint, WB_DeoptimizeMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
 831   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 832   int result = 0;
 833   CHECK_JNI_EXCEPTION_(env, result);
 834 
 835   DeoptimizationScope deopt_scope;
 836   {
 837     MutexLocker mu(Compile_lock);
 838     methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 839     if (is_osr) {
 840       result += mh->method_holder()->mark_osr_nmethods(&deopt_scope, mh());
 841     } else {
 842       MutexLocker ml(NMethodState_lock, Mutex::_no_safepoint_check_flag);
 843       if (mh->code() != nullptr) {
 844         deopt_scope.mark(mh->code());
 845         ++result;
 846       }
 847     }
 848     CodeCache::mark_for_deoptimization(&deopt_scope, mh());
 849   }
 850 
 851   deopt_scope.deoptimize_marked();
 852 
 853   return result;
 854 WB_END
 855 
 856 WB_ENTRY(jboolean, WB_IsMethodCompiled(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
 857   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 858   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 859   MutexLocker mu(Compile_lock);
 860   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 861   nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code();
 862   if (code == nullptr) {
 863     return JNI_FALSE;
 864   }
 865   return !code->is_marked_for_deoptimization();
 866 WB_END
 867 
 868 static bool is_excluded_for_compiler(AbstractCompiler* comp, methodHandle& mh) {
 869   if (comp == nullptr) {
 870     return true;
 871   }
 872   DirectiveSet* directive = DirectivesStack::getMatchingDirective(mh, comp);
 873   bool exclude = directive->ExcludeOption;
 874   DirectivesStack::release(directive);
 875   return exclude;
 876 }
 877 
 878 static bool can_be_compiled_at_level(methodHandle& mh, jboolean is_osr, int level) {
 879   if (is_osr) {
 880     return CompilationPolicy::can_be_osr_compiled(mh, level);
 881   } else {
 882     return CompilationPolicy::can_be_compiled(mh, level);
 883   }
 884 }
 885 
 886 WB_ENTRY(jboolean, WB_IsMethodCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr))
 887   if (method == nullptr || comp_level > CompilationPolicy::highest_compile_level()) {
 888     return false;
 889   }
 890   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 891   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 892   MutexLocker mu(Compile_lock);
 893   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 894 
 895   // The ExcludeOption directive is evaluated lazily upon compilation attempt. If a method was not tried to be compiled by
 896   // a compiler, yet, the method object is not set to be not compilable by that compiler. Thus, evaluate the compiler directive
 897   // to exclude a compilation of 'method'.
 898   if (comp_level == CompLevel_any) {
 899     // Both compilers could have ExcludeOption set. Check all combinations.
 900     bool excluded_c1 = is_excluded_for_compiler(CompileBroker::compiler1(), mh);
 901     bool excluded_c2 = is_excluded_for_compiler(CompileBroker::compiler2(), mh);
 902     if (excluded_c1 && excluded_c2) {
 903       // Compilation of 'method' excluded by both compilers.
 904       return false;
 905     }
 906 
 907     if (excluded_c1) {
 908       // C1 only has ExcludeOption set: Check if compilable with C2.
 909       return can_be_compiled_at_level(mh, is_osr, CompLevel_full_optimization);
 910     } else if (excluded_c2) {
 911       // C2 only has ExcludeOption set: Check if compilable with C1.
 912       return can_be_compiled_at_level(mh, is_osr, CompLevel_simple);
 913     }
 914   } else if (comp_level > CompLevel_none && is_excluded_for_compiler(CompileBroker::compiler((int)comp_level), mh)) {
 915     // Compilation of 'method' excluded by compiler used for 'comp_level'.
 916     return false;
 917   }
 918 
 919   return can_be_compiled_at_level(mh, is_osr, (int)comp_level);
 920 WB_END
 921 
 922 WB_ENTRY(jboolean, WB_IsMethodQueuedForCompilation(JNIEnv* env, jobject o, jobject method))
 923   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 924   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 925   MutexLocker mu(Compile_lock);
 926   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 927   return mh->queued_for_compilation();
 928 WB_END
 929 
 930 WB_ENTRY(jboolean, WB_IsIntrinsicAvailable(JNIEnv* env, jobject o, jobject method, jobject compilation_context, jint compLevel))
 931   if (compLevel < CompLevel_none || compLevel > CompilationPolicy::highest_compile_level()) {
 932     return false; // Intrinsic is not available on a non-existent compilation level.
 933   }
 934   AbstractCompiler* comp = CompileBroker::compiler((int)compLevel);
 935   if (comp == nullptr) {
 936     // Could have compLevel == 0, or !TieredCompilation and incompatible values of TieredStopAtLevel and compLevel.
 937     tty->print_cr("WB error: no compiler for requested compilation level %d", compLevel);
 938     return false;
 939   }
 940 
 941   jmethodID method_id, compilation_context_id;
 942   method_id = reflected_method_to_jmid(thread, env, method);
 943   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 944   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(method_id));
 945 
 946   DirectiveSet* directive;
 947   if (compilation_context != nullptr) {
 948     compilation_context_id = reflected_method_to_jmid(thread, env, compilation_context);
 949     CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 950     methodHandle cch(THREAD, Method::checked_resolve_jmethod_id(compilation_context_id));
 951     directive = DirectivesStack::getMatchingDirective(cch, comp);
 952   } else {
 953     // Calling with null matches default directive
 954     directive = DirectivesStack::getDefaultDirective(comp);
 955   }
 956   bool result = comp->is_intrinsic_available(mh, directive);
 957   DirectivesStack::release(directive);
 958   return result;
 959 WB_END
 960 
 961 WB_ENTRY(jint, WB_GetMethodCompilationLevel(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
 962   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 963   CHECK_JNI_EXCEPTION_(env, CompLevel_none);
 964   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 965   nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code();
 966   return (code != nullptr ? code->comp_level() : CompLevel_none);
 967 WB_END
 968 
 969 WB_ENTRY(void, WB_MakeMethodNotCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr))
 970   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 971   CHECK_JNI_EXCEPTION(env);
 972   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 973   if (is_osr) {
 974     mh->set_not_osr_compilable("WhiteBox", comp_level);
 975   } else {
 976     mh->set_not_compilable("WhiteBox", comp_level);
 977   }
 978 WB_END
 979 
 980 WB_ENTRY(jint, WB_GetMethodDecompileCount(JNIEnv* env, jobject o, jobject method))
 981   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 982   CHECK_JNI_EXCEPTION_(env, 0);
 983   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 984   uint cnt = 0;
 985   MethodData* mdo = mh->method_data();
 986   if (mdo != nullptr) {
 987     cnt = mdo->decompile_count();
 988   }
 989   return cnt;
 990 WB_END
 991 
 992 // Get the trap count of a method for a specific reason. If the trap count for
 993 // that reason did overflow, this includes the overflow trap count of the method.
 994 // If 'reason' is null, the sum of the traps for all reasons will be returned.
 995 // This number includes the overflow trap count if the trap count for any reason
 996 // did overflow.
 997 WB_ENTRY(jint, WB_GetMethodTrapCount(JNIEnv* env, jobject o, jobject method, jstring reason_obj))
 998   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 999   CHECK_JNI_EXCEPTION_(env, 0);
1000   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1001   uint cnt = 0;
1002   MethodData* mdo = mh->method_data();
1003   if (mdo != nullptr) {
1004     ResourceMark rm(THREAD);
1005     char* reason_str = (reason_obj == nullptr) ?
1006       nullptr : java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(reason_obj));
1007     bool overflow = false;
1008     for (uint reason = 0; reason < mdo->trap_reason_limit(); reason++) {
1009       if (reason_str != nullptr && !strcmp(reason_str, Deoptimization::trap_reason_name(reason))) {
1010         cnt = mdo->trap_count(reason);
1011         // Count in the overflow trap count on overflow
1012         if (cnt == (uint)-1) {
1013           cnt = mdo->trap_count_limit() + mdo->overflow_trap_count();
1014         }
1015         break;
1016       } else if (reason_str == nullptr) {
1017         uint c = mdo->trap_count(reason);
1018         if (c == (uint)-1) {
1019           c = mdo->trap_count_limit();
1020           if (!overflow) {
1021             // Count overflow trap count just once
1022             overflow = true;
1023             c += mdo->overflow_trap_count();
1024           }
1025         }
1026         cnt += c;
1027       }
1028     }
1029   }
1030   return cnt;
1031 WB_END
1032 
1033 WB_ENTRY(jint, WB_GetDeoptCount(JNIEnv* env, jobject o, jstring reason_obj, jstring action_obj))
1034   if (reason_obj == nullptr && action_obj == nullptr) {
1035     return Deoptimization::total_deoptimization_count();
1036   }
1037   ResourceMark rm(THREAD);
1038   const char *reason_str = (reason_obj == nullptr) ?
1039     nullptr : java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(reason_obj));
1040   const char *action_str = (action_obj == nullptr) ?
1041     nullptr : java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(action_obj));
1042 
1043   return Deoptimization::deoptimization_count(reason_str, action_str);
1044 WB_END
1045 
1046 WB_ENTRY(jint, WB_GetMethodEntryBci(JNIEnv* env, jobject o, jobject method))
1047   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1048   CHECK_JNI_EXCEPTION_(env, InvocationEntryBci);
1049   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1050   nmethod* code = mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false);
1051   return (code != nullptr && code->is_osr_method() ? code->osr_entry_bci() : InvocationEntryBci);
1052 WB_END
1053 
1054 WB_ENTRY(jboolean, WB_TestSetDontInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value))
1055   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1056   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
1057   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1058   bool result = mh->dont_inline();
1059   mh->set_dont_inline(value == JNI_TRUE);
1060   return result;
1061 WB_END
1062 
1063 WB_ENTRY(jint, WB_GetCompileQueueSize(JNIEnv* env, jobject o, jint comp_level))
1064   if (comp_level == CompLevel_any) {
1065     return CompileBroker::queue_size(CompLevel_full_optimization) /* C2 */ +
1066         CompileBroker::queue_size(CompLevel_full_profile) /* C1 */;
1067   } else {
1068     return CompileBroker::queue_size(comp_level);
1069   }
1070 WB_END
1071 
1072 WB_ENTRY(jboolean, WB_TestSetForceInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value))
1073   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1074   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
1075   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1076   bool result = mh->force_inline();
1077   mh->set_force_inline(value == JNI_TRUE);
1078   return result;
1079 WB_END
1080 
1081 #ifdef LINUX
1082 bool WhiteBox::validate_cgroup(const char* proc_cgroups,
1083                                const char* proc_self_cgroup,
1084                                const char* proc_self_mountinfo,
1085                                u1* cg_flags) {
1086   CgroupInfo cg_infos[CG_INFO_LENGTH];
1087   return CgroupSubsystemFactory::determine_type(cg_infos, proc_cgroups,
1088                                                     proc_self_cgroup,
1089                                                     proc_self_mountinfo, cg_flags);
1090 }
1091 #endif
1092 
1093 bool WhiteBox::compile_method(Method* method, int comp_level, int bci, JavaThread* THREAD) {
1094   // Screen for unavailable/bad comp level or null method
1095   AbstractCompiler* comp = CompileBroker::compiler(comp_level);
1096   if (method == nullptr) {
1097     tty->print_cr("WB error: request to compile null method");
1098     return false;
1099   }
1100   if (method->is_abstract()) {
1101     tty->print_cr("WB error: request to compile abstract method");
1102     return false;
1103   }
1104   if (comp_level > CompilationPolicy::highest_compile_level()) {
1105     tty->print_cr("WB error: invalid compilation level %d", comp_level);
1106     return false;
1107   }
1108   if (comp == nullptr) {
1109     tty->print_cr("WB error: no compiler for requested compilation level %d", comp_level);
1110     return false;
1111   }
1112 
1113   // Check if compilation is blocking
1114   methodHandle mh(THREAD, method);
1115   DirectiveSet* directive = DirectivesStack::getMatchingDirective(mh, comp);
1116   bool is_blocking = !directive->BackgroundCompilationOption;
1117   DirectivesStack::release(directive);
1118 
1119   // Compile method and check result
1120   nmethod* nm = CompileBroker::compile_method(mh, bci, comp_level, mh, mh->invocation_count(), CompileTask::Reason_Whitebox, CHECK_false);
1121   MutexLocker mu(THREAD, Compile_lock);
1122   bool is_queued = mh->queued_for_compilation();
1123   if ((!is_blocking && is_queued) || nm != nullptr) {
1124     return true;
1125   }
1126   // Check code again because compilation may be finished before Compile_lock is acquired.
1127   if (bci == InvocationEntryBci) {
1128     nmethod* code = mh->code();
1129     if (code != nullptr) {
1130       return true;
1131     }
1132   } else if (mh->lookup_osr_nmethod_for(bci, comp_level, false) != nullptr) {
1133     return true;
1134   }
1135   tty->print("WB error: failed to %s compile at level %d method ", is_blocking ? "blocking" : "", comp_level);
1136   mh->print_short_name(tty);
1137   tty->cr();
1138   if (is_blocking && is_queued) {
1139     tty->print_cr("WB error: blocking compilation is still in queue!");
1140   }
1141   return false;
1142 }
1143 
1144 size_t WhiteBox::get_in_use_monitor_count() {
1145   return ObjectSynchronizer::_in_use_list.count();
1146 }
1147 
1148 WB_ENTRY(jboolean, WB_EnqueueMethodForCompilation(JNIEnv* env, jobject o, jobject method, jint comp_level, jint bci))
1149   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1150   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
1151   return WhiteBox::compile_method(Method::checked_resolve_jmethod_id(jmid), comp_level, bci, THREAD);
1152 WB_END
1153 
1154 WB_ENTRY(jboolean, WB_EnqueueInitializerForCompilation(JNIEnv* env, jobject o, jclass klass, jint comp_level))
1155   InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
1156   Method* clinit = ik->class_initializer();
1157   if (clinit == nullptr || clinit->method_holder()->is_not_initialized()) {
1158     return false;
1159   }
1160   return WhiteBox::compile_method(clinit, comp_level, InvocationEntryBci, THREAD);
1161 WB_END
1162 
1163 WB_ENTRY(jboolean, WB_ShouldPrintAssembly(JNIEnv* env, jobject o, jobject method, jint comp_level))
1164   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1165   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
1166 
1167   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1168   DirectiveSet* directive = DirectivesStack::getMatchingDirective(mh, CompileBroker::compiler(comp_level));
1169   bool result = directive->PrintAssemblyOption;
1170   DirectivesStack::release(directive);
1171 
1172   return result;
1173 WB_END
1174 
1175 WB_ENTRY(jint, WB_MatchesInline(JNIEnv* env, jobject o, jobject method, jstring pattern))
1176   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1177   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
1178 
1179   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1180 
1181   ResourceMark rm(THREAD);
1182   const char* error_msg = nullptr;
1183   char* method_str = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(pattern));
1184   InlineMatcher* m = InlineMatcher::parse_inline_pattern(method_str, error_msg);
1185 
1186   if (m == nullptr) {
1187     assert(error_msg != nullptr, "Always have an error message");
1188     tty->print_cr("Got error: %s", error_msg);
1189     return -1; // Pattern failed
1190   }
1191 
1192   // Pattern works - now check if it matches
1193   int result;
1194   if (m->match(mh, InlineMatcher::force_inline)) {
1195     result = 2; // Force inline match
1196   } else if (m->match(mh, InlineMatcher::dont_inline)) {
1197     result = 1; // Dont inline match
1198   } else {
1199     result = 0; // No match
1200   }
1201   delete m;
1202   return result;
1203 WB_END
1204 
1205 WB_ENTRY(jint, WB_MatchesMethod(JNIEnv* env, jobject o, jobject method, jstring pattern))
1206   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1207   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
1208 
1209   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1210 
1211   ResourceMark rm;
1212   char* method_str = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(pattern));
1213 
1214   const char* error_msg = nullptr;
1215 
1216   BasicMatcher* m = BasicMatcher::parse_method_pattern(method_str, error_msg, false);
1217   if (m == nullptr) {
1218     assert(error_msg != nullptr, "Must have error_msg");
1219     tty->print_cr("Got error: %s", error_msg);
1220     return -1;
1221   }
1222 
1223   // Pattern works - now check if it matches
1224   int result = m->matches(mh);
1225   delete m;
1226   assert(result == 0 || result == 1, "Result out of range");
1227   return result;
1228 WB_END
1229 
1230 WB_ENTRY(void, WB_MarkMethodProfiled(JNIEnv* env, jobject o, jobject method))
1231   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1232   CHECK_JNI_EXCEPTION(env);
1233   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1234 
1235   MethodData* mdo = mh->method_data();
1236   if (mdo == nullptr) {
1237     Method::build_profiling_method_data(mh, CHECK_AND_CLEAR);
1238     mdo = mh->method_data();
1239   }
1240   mdo->init();
1241   InvocationCounter* icnt = mdo->invocation_counter();
1242   InvocationCounter* bcnt = mdo->backedge_counter();
1243   // set i-counter according to CompilationPolicy::is_method_profiled
1244   icnt->set(Tier4MinInvocationThreshold);
1245   bcnt->set(Tier4CompileThreshold);
1246 WB_END
1247 
1248 WB_ENTRY(void, WB_ClearMethodState(JNIEnv* env, jobject o, jobject method))
1249   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1250   CHECK_JNI_EXCEPTION(env);
1251   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1252   MutexLocker mu(THREAD, Compile_lock);
1253   MethodData* mdo = mh->method_data();
1254   MethodCounters* mcs = mh->method_counters();
1255 
1256   if (mdo != nullptr) {
1257     mdo->init();
1258     ResourceMark rm(THREAD);
1259     int arg_count = mdo->method()->size_of_parameters();
1260     for (int i = 0; i < arg_count; i++) {
1261       mdo->set_arg_modified(i, 0);
1262     }
1263     mdo->clean_method_data(/*always_clean*/true);
1264   }
1265 
1266   mh->clear_is_not_c1_compilable();
1267   mh->clear_is_not_c2_compilable();
1268   mh->clear_is_not_c2_osr_compilable();
1269   NOT_PRODUCT(mh->set_compiled_invocation_count(0));
1270   if (mcs != nullptr) {
1271     mcs->clear_counters();
1272   }
1273 WB_END
1274 
1275 template <typename T, int type_enum>
1276 static bool GetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value) {
1277   if (name == nullptr) {
1278     return false;
1279   }
1280   ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
1281   const char* flag_name = env->GetStringUTFChars(name, nullptr);
1282   CHECK_JNI_EXCEPTION_(env, false);
1283   const JVMFlag* flag = JVMFlag::find_declared_flag(flag_name);
1284   JVMFlag::Error result = JVMFlagAccess::get<T, type_enum>(flag, value);
1285   env->ReleaseStringUTFChars(name, flag_name);
1286   return (result == JVMFlag::SUCCESS);
1287 }
1288 
1289 template <typename T, int type_enum>
1290 static bool SetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value) {
1291   if (name == nullptr) {
1292     return false;
1293   }
1294   ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
1295   const char* flag_name = env->GetStringUTFChars(name, nullptr);
1296   CHECK_JNI_EXCEPTION_(env, false);
1297   JVMFlag* flag = JVMFlag::find_flag(flag_name);
1298   JVMFlag::Error result = JVMFlagAccess::set<T, type_enum>(flag, value, JVMFlagOrigin::INTERNAL);
1299   env->ReleaseStringUTFChars(name, flag_name);
1300   return (result == JVMFlag::SUCCESS);
1301 }
1302 
1303 template <typename T>
1304 static jobject box(JavaThread* thread, JNIEnv* env, Symbol* name, Symbol* sig, T value) {
1305   ResourceMark rm(thread);
1306   jclass clazz = env->FindClass(name->as_C_string());
1307   CHECK_JNI_EXCEPTION_(env, nullptr);
1308   jmethodID methodID = env->GetStaticMethodID(clazz,
1309         vmSymbols::valueOf_name()->as_C_string(),
1310         sig->as_C_string());
1311   CHECK_JNI_EXCEPTION_(env, nullptr);
1312   jobject result = env->CallStaticObjectMethod(clazz, methodID, value);
1313   CHECK_JNI_EXCEPTION_(env, nullptr);
1314   return result;
1315 }
1316 
1317 static jobject booleanBox(JavaThread* thread, JNIEnv* env, jboolean value) {
1318   return box(thread, env, vmSymbols::java_lang_Boolean(), vmSymbols::Boolean_valueOf_signature(), value);
1319 }
1320 static jobject integerBox(JavaThread* thread, JNIEnv* env, jint value) {
1321   return box(thread, env, vmSymbols::java_lang_Integer(), vmSymbols::Integer_valueOf_signature(), value);
1322 }
1323 static jobject longBox(JavaThread* thread, JNIEnv* env, jlong value) {
1324   return box(thread, env, vmSymbols::java_lang_Long(), vmSymbols::Long_valueOf_signature(), value);
1325 }
1326 /* static jobject floatBox(JavaThread* thread, JNIEnv* env, jfloat value) {
1327   return box(thread, env, vmSymbols::java_lang_Float(), vmSymbols::Float_valueOf_signature(), value);
1328 }*/
1329 static jobject doubleBox(JavaThread* thread, JNIEnv* env, jdouble value) {
1330   return box(thread, env, vmSymbols::java_lang_Double(), vmSymbols::Double_valueOf_signature(), value);
1331 }
1332 
1333 static const JVMFlag* getVMFlag(JavaThread* thread, JNIEnv* env, jstring name) {
1334   ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
1335   const char* flag_name = env->GetStringUTFChars(name, nullptr);
1336   CHECK_JNI_EXCEPTION_(env, nullptr);
1337   const JVMFlag* result = JVMFlag::find_declared_flag(flag_name);
1338   env->ReleaseStringUTFChars(name, flag_name);
1339   return result;
1340 }
1341 
1342 WB_ENTRY(jboolean, WB_IsConstantVMFlag(JNIEnv* env, jobject o, jstring name))
1343   const JVMFlag* flag = getVMFlag(thread, env, name);
1344   return (flag != nullptr) && flag->is_constant_in_binary();
1345 WB_END
1346 
1347 WB_ENTRY(jboolean, WB_IsDefaultVMFlag(JNIEnv* env, jobject o, jstring name))
1348   const JVMFlag* flag = getVMFlag(thread, env, name);
1349   return (flag != nullptr) && flag->is_default();
1350 WB_END
1351 
1352 WB_ENTRY(jboolean, WB_IsLockedVMFlag(JNIEnv* env, jobject o, jstring name))
1353   const JVMFlag* flag = getVMFlag(thread, env, name);
1354   return (flag != nullptr) && !(flag->is_unlocked() || flag->is_unlocker());
1355 WB_END
1356 
1357 WB_ENTRY(jobject, WB_GetBooleanVMFlag(JNIEnv* env, jobject o, jstring name))
1358   bool result;
1359   if (GetVMFlag <JVM_FLAG_TYPE(bool)> (thread, env, name, &result)) {
1360     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
1361     return booleanBox(thread, env, result);
1362   }
1363   return nullptr;
1364 WB_END
1365 
1366 template <typename T, int type_enum>
1367 jobject GetVMFlag_longBox(JNIEnv* env, JavaThread* thread, jstring name) {
1368   T result;
1369   if (GetVMFlag <T, type_enum> (thread, env, name, &result)) {
1370     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
1371     return longBox(thread, env, result);
1372   }
1373   return nullptr;
1374 }
1375 
1376 WB_ENTRY(jobject, WB_GetIntVMFlag(JNIEnv* env, jobject o, jstring name))
1377   return GetVMFlag_longBox<JVM_FLAG_TYPE(int)>(env, thread, name);
1378 WB_END
1379 
1380 WB_ENTRY(jobject, WB_GetUintVMFlag(JNIEnv* env, jobject o, jstring name))
1381   return GetVMFlag_longBox<JVM_FLAG_TYPE(uint)>(env, thread, name);
1382 WB_END
1383 
1384 WB_ENTRY(jobject, WB_GetIntxVMFlag(JNIEnv* env, jobject o, jstring name))
1385   return GetVMFlag_longBox<JVM_FLAG_TYPE(intx)>(env, thread, name);
1386 WB_END
1387 
1388 WB_ENTRY(jobject, WB_GetUintxVMFlag(JNIEnv* env, jobject o, jstring name))
1389   return GetVMFlag_longBox<JVM_FLAG_TYPE(uintx)>(env, thread, name);
1390 WB_END
1391 
1392 WB_ENTRY(jobject, WB_GetUint64VMFlag(JNIEnv* env, jobject o, jstring name))
1393   return GetVMFlag_longBox<JVM_FLAG_TYPE(uint64_t)>(env, thread, name);
1394 WB_END
1395 
1396 WB_ENTRY(jobject, WB_GetSizeTVMFlag(JNIEnv* env, jobject o, jstring name))
1397   return GetVMFlag_longBox<JVM_FLAG_TYPE(size_t)>(env, thread, name);
1398 WB_END
1399 
1400 WB_ENTRY(jobject, WB_GetDoubleVMFlag(JNIEnv* env, jobject o, jstring name))
1401   double result;
1402   if (GetVMFlag <JVM_FLAG_TYPE(double)> (thread, env, name, &result)) {
1403     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
1404     return doubleBox(thread, env, result);
1405   }
1406   return nullptr;
1407 WB_END
1408 
1409 WB_ENTRY(jstring, WB_GetStringVMFlag(JNIEnv* env, jobject o, jstring name))
1410   ccstr ccstrResult;
1411   if (GetVMFlag <JVM_FLAG_TYPE(ccstr)> (thread, env, name, &ccstrResult)) {
1412     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
1413     jstring result = env->NewStringUTF(ccstrResult);
1414     CHECK_JNI_EXCEPTION_(env, nullptr);
1415     return result;
1416   }
1417   return nullptr;
1418 WB_END
1419 
1420 WB_ENTRY(void, WB_SetBooleanVMFlag(JNIEnv* env, jobject o, jstring name, jboolean value))
1421   bool result = value == JNI_TRUE ? true : false;
1422   SetVMFlag <JVM_FLAG_TYPE(bool)> (thread, env, name, &result);
1423 WB_END
1424 
1425 WB_ENTRY(void, WB_SetIntVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
1426   int result = checked_cast<int>(value);
1427   SetVMFlag <JVM_FLAG_TYPE(int)> (thread, env, name, &result);
1428 WB_END
1429 
1430 WB_ENTRY(void, WB_SetUintVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
1431   uint result = checked_cast<uint>(value);
1432   SetVMFlag <JVM_FLAG_TYPE(uint)> (thread, env, name, &result);
1433 WB_END
1434 
1435 WB_ENTRY(void, WB_SetIntxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
1436   intx result = value;
1437   SetVMFlag <JVM_FLAG_TYPE(intx)> (thread, env, name, &result);
1438 WB_END
1439 
1440 WB_ENTRY(void, WB_SetUintxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
1441   uintx result = value;
1442   SetVMFlag <JVM_FLAG_TYPE(uintx)> (thread, env, name, &result);
1443 WB_END
1444 
1445 WB_ENTRY(void, WB_SetUint64VMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
1446   uint64_t result = value;
1447   SetVMFlag <JVM_FLAG_TYPE(uint64_t)> (thread, env, name, &result);
1448 WB_END
1449 
1450 WB_ENTRY(void, WB_SetSizeTVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
1451   size_t result = value;
1452   SetVMFlag <JVM_FLAG_TYPE(size_t)> (thread, env, name, &result);
1453 WB_END
1454 
1455 WB_ENTRY(void, WB_SetDoubleVMFlag(JNIEnv* env, jobject o, jstring name, jdouble value))
1456   double result = value;
1457   SetVMFlag <JVM_FLAG_TYPE(double)> (thread, env, name, &result);
1458 WB_END
1459 
1460 WB_ENTRY(void, WB_SetStringVMFlag(JNIEnv* env, jobject o, jstring name, jstring value))
1461   ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
1462   const char* ccstrValue;
1463   if (value == nullptr) {
1464     ccstrValue = nullptr;
1465   }
1466   else {
1467     ccstrValue = env->GetStringUTFChars(value, nullptr);
1468     CHECK_JNI_EXCEPTION(env);
1469   }
1470   {
1471     ccstr param = ccstrValue;
1472     ThreadInVMfromNative ttvfn(thread); // back to VM
1473     if (SetVMFlag <JVM_FLAG_TYPE(ccstr)> (thread, env, name, &param)) {
1474       assert(param == nullptr, "old value is freed automatically and not returned");
1475     }
1476   }
1477   if (value != nullptr) {
1478     env->ReleaseStringUTFChars(value, ccstrValue);
1479   }
1480 WB_END
1481 
1482 WB_ENTRY(void, WB_LockCompilation(JNIEnv* env, jobject o, jlong timeout))
1483   WhiteBox::compilation_locked = true;
1484 WB_END
1485 
1486 WB_ENTRY(void, WB_UnlockCompilation(JNIEnv* env, jobject o))
1487   MonitorLocker mo(Compilation_lock, Mutex::_no_safepoint_check_flag);
1488   WhiteBox::compilation_locked = false;
1489   mo.notify_all();
1490 WB_END
1491 
1492 WB_ENTRY(jboolean, WB_IsInStringTable(JNIEnv* env, jobject o, jstring javaString))
1493   ResourceMark rm(THREAD);
1494   int len;
1495   jchar* name = java_lang_String::as_unicode_string(JNIHandles::resolve(javaString), len, CHECK_false);
1496   return (StringTable::lookup(name, len) != nullptr);
1497 WB_END
1498 
1499 WB_ENTRY(void, WB_FullGC(JNIEnv* env, jobject o))
1500   Universe::heap()->soft_ref_policy()->set_should_clear_all_soft_refs(true);
1501   Universe::heap()->collect(GCCause::_wb_full_gc);
1502 #if INCLUDE_G1GC || INCLUDE_SERIALGC
1503   if (UseG1GC || UseSerialGC) {
1504     // Needs to be cleared explicitly for G1 and Serial GC.
1505     Universe::heap()->soft_ref_policy()->set_should_clear_all_soft_refs(false);
1506   }
1507 #endif // INCLUDE_G1GC || INCLUDE_SERIALGC
1508 WB_END
1509 
1510 WB_ENTRY(void, WB_YoungGC(JNIEnv* env, jobject o))
1511   Universe::heap()->collect(GCCause::_wb_young_gc);
1512 WB_END
1513 
1514 WB_ENTRY(void, WB_ReadReservedMemory(JNIEnv* env, jobject o))
1515   // static+volatile in order to force the read to happen
1516   // (not be eliminated by the compiler)
1517   static char c;
1518   static volatile char* p;
1519 
1520   p = os::reserve_memory(os::vm_allocation_granularity());
1521   if (p == nullptr) {
1522     THROW_MSG(vmSymbols::java_lang_OutOfMemoryError(), "Failed to reserve memory");
1523   }
1524 
1525   c = *p;
1526 WB_END
1527 
1528 WB_ENTRY(jstring, WB_GetCPUFeatures(JNIEnv* env, jobject o))
1529   const char* features = VM_Version::features_string();
1530   ThreadToNativeFromVM ttn(thread);
1531   jstring features_string = env->NewStringUTF(features);
1532 
1533   CHECK_JNI_EXCEPTION_(env, nullptr);
1534 
1535   return features_string;
1536 WB_END
1537 
1538 CodeBlobType WhiteBox::get_blob_type(const CodeBlob* code) {
1539   guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled");
1540   return CodeCache::get_code_heap(code)->code_blob_type();
1541 }
1542 
1543 CodeHeap* WhiteBox::get_code_heap(CodeBlobType blob_type) {
1544   guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled");
1545   return CodeCache::get_code_heap(blob_type);
1546 }
1547 
1548 struct CodeBlobStub {
1549   CodeBlobStub(const CodeBlob* blob) :
1550       name(os::strdup(blob->name())),
1551       size(blob->size()),
1552       blob_type(static_cast<jint>(WhiteBox::get_blob_type(blob))),
1553       address((jlong) blob) { }
1554   ~CodeBlobStub() { os::free((void*) name); }
1555   const char* const name;
1556   const jint        size;
1557   const jint        blob_type;
1558   const jlong       address;
1559 };
1560 
1561 static jobjectArray codeBlob2objectArray(JavaThread* thread, JNIEnv* env, CodeBlobStub* cb) {
1562   ResourceMark rm;
1563   jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string());
1564   CHECK_JNI_EXCEPTION_(env, nullptr);
1565   jobjectArray result = env->NewObjectArray(4, clazz, nullptr);
1566 
1567   jstring name = env->NewStringUTF(cb->name);
1568   CHECK_JNI_EXCEPTION_(env, nullptr);
1569   env->SetObjectArrayElement(result, 0, name);
1570 
1571   jobject obj = integerBox(thread, env, cb->size);
1572   CHECK_JNI_EXCEPTION_(env, nullptr);
1573   env->SetObjectArrayElement(result, 1, obj);
1574 
1575   obj = integerBox(thread, env, cb->blob_type);
1576   CHECK_JNI_EXCEPTION_(env, nullptr);
1577   env->SetObjectArrayElement(result, 2, obj);
1578 
1579   obj = longBox(thread, env, cb->address);
1580   CHECK_JNI_EXCEPTION_(env, nullptr);
1581   env->SetObjectArrayElement(result, 3, obj);
1582 
1583   return result;
1584 }
1585 
1586 WB_ENTRY(jobjectArray, WB_GetNMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
1587   ResourceMark rm(THREAD);
1588   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1589   CHECK_JNI_EXCEPTION_(env, nullptr);
1590   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
1591   nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code();
1592   jobjectArray result = nullptr;
1593   if (code == nullptr) {
1594     return result;
1595   }
1596   int comp_level = code->comp_level();
1597   int insts_size = code->insts_size();
1598 
1599   ThreadToNativeFromVM ttn(thread);
1600   jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string());
1601   CHECK_JNI_EXCEPTION_(env, nullptr);
1602   result = env->NewObjectArray(5, clazz, nullptr);
1603   if (result == nullptr) {
1604     return result;
1605   }
1606 
1607   CodeBlobStub stub(code);
1608   jobjectArray codeBlob = codeBlob2objectArray(thread, env, &stub);
1609   CHECK_JNI_EXCEPTION_(env, nullptr);
1610   env->SetObjectArrayElement(result, 0, codeBlob);
1611 
1612   jobject level = integerBox(thread, env, comp_level);
1613   CHECK_JNI_EXCEPTION_(env, nullptr);
1614   env->SetObjectArrayElement(result, 1, level);
1615 
1616   jbyteArray insts = env->NewByteArray(insts_size);
1617   CHECK_JNI_EXCEPTION_(env, nullptr);
1618   env->SetByteArrayRegion(insts, 0, insts_size, (jbyte*) code->insts_begin());
1619   env->SetObjectArrayElement(result, 2, insts);
1620 
1621   jobject id = integerBox(thread, env, code->compile_id());
1622   CHECK_JNI_EXCEPTION_(env, nullptr);
1623   env->SetObjectArrayElement(result, 3, id);
1624 
1625   jobject entry_point = longBox(thread, env, (jlong) code->entry_point());
1626   CHECK_JNI_EXCEPTION_(env, nullptr);
1627   env->SetObjectArrayElement(result, 4, entry_point);
1628 
1629   return result;
1630 WB_END
1631 
1632 CodeBlob* WhiteBox::allocate_code_blob(int size, CodeBlobType blob_type) {
1633   guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled");
1634   BufferBlob* blob;
1635   int full_size = CodeBlob::align_code_offset(sizeof(BufferBlob));
1636   if (full_size < size) {
1637     full_size += align_up(size - full_size, oopSize);
1638   }
1639   {
1640     MutexLocker mu(CodeCache_lock, Mutex::_no_safepoint_check_flag);
1641     blob = (BufferBlob*) CodeCache::allocate(full_size, blob_type);
1642     if (blob != nullptr) {
1643       ::new (blob) BufferBlob("WB::DummyBlob", CodeBlobKind::Buffer, full_size);
1644     }
1645   }
1646   // Track memory usage statistic after releasing CodeCache_lock
1647   MemoryService::track_code_cache_memory_usage();
1648   return blob;
1649 }
1650 
1651 WB_ENTRY(jlong, WB_AllocateCodeBlob(JNIEnv* env, jobject o, jint size, jint blob_type))
1652   if (size < 0) {
1653     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
1654       err_msg("WB_AllocateCodeBlob: size is negative: " INT32_FORMAT, size));
1655   }
1656   return (jlong) WhiteBox::allocate_code_blob(size, static_cast<CodeBlobType>(blob_type));
1657 WB_END
1658 
1659 WB_ENTRY(void, WB_FreeCodeBlob(JNIEnv* env, jobject o, jlong addr))
1660   if (addr == 0) {
1661     return;
1662   }
1663   BufferBlob::free((BufferBlob*) addr);
1664 WB_END
1665 
1666 WB_ENTRY(jobjectArray, WB_GetCodeHeapEntries(JNIEnv* env, jobject o, jint blob_type))
1667   ResourceMark rm;
1668   GrowableArray<CodeBlobStub*> blobs;
1669   {
1670     MutexLocker mu(CodeCache_lock, Mutex::_no_safepoint_check_flag);
1671     CodeHeap* heap = WhiteBox::get_code_heap(static_cast<CodeBlobType>(blob_type));
1672     if (heap == nullptr) {
1673       return nullptr;
1674     }
1675     for (CodeBlob* cb = (CodeBlob*) heap->first();
1676          cb != nullptr; cb = (CodeBlob*) heap->next(cb)) {
1677       CodeBlobStub* stub = NEW_RESOURCE_OBJ(CodeBlobStub);
1678       new (stub) CodeBlobStub(cb);
1679       blobs.append(stub);
1680     }
1681   }
1682   ThreadToNativeFromVM ttn(thread);
1683   jobjectArray result = nullptr;
1684   jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string());
1685   CHECK_JNI_EXCEPTION_(env, nullptr);
1686   result = env->NewObjectArray(blobs.length(), clazz, nullptr);
1687   CHECK_JNI_EXCEPTION_(env, nullptr);
1688   if (result == nullptr) {
1689     return result;
1690   }
1691   int i = 0;
1692   for (GrowableArrayIterator<CodeBlobStub*> it = blobs.begin();
1693        it != blobs.end(); ++it) {
1694     jobjectArray obj = codeBlob2objectArray(thread, env, *it);
1695     CHECK_JNI_EXCEPTION_(env, nullptr);
1696     env->SetObjectArrayElement(result, i, obj);
1697     CHECK_JNI_EXCEPTION_(env, nullptr);
1698     ++i;
1699   }
1700   return result;
1701 WB_END
1702 
1703 WB_ENTRY(jint, WB_GetCompilationActivityMode(JNIEnv* env, jobject o))
1704   return CompileBroker::get_compilation_activity_mode();
1705 WB_END
1706 
1707 WB_ENTRY(jobjectArray, WB_GetCodeBlob(JNIEnv* env, jobject o, jlong addr))
1708   if (addr == 0) {
1709     THROW_MSG_NULL(vmSymbols::java_lang_NullPointerException(),
1710       "WB_GetCodeBlob: addr is null");
1711   }
1712   ThreadToNativeFromVM ttn(thread);
1713   CodeBlobStub stub((CodeBlob*) addr);
1714   return codeBlob2objectArray(thread, env, &stub);
1715 WB_END
1716 
1717 WB_ENTRY(jlong, WB_GetMethodData(JNIEnv* env, jobject wv, jobject method))
1718   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
1719   CHECK_JNI_EXCEPTION_(env, 0);
1720   methodHandle mh(thread, Method::checked_resolve_jmethod_id(jmid));
1721   return (jlong) mh->method_data();
1722 WB_END
1723 
1724 WB_ENTRY(jlong, WB_GetThreadStackSize(JNIEnv* env, jobject o))
1725   return (jlong) thread->stack_size();
1726 WB_END
1727 
1728 WB_ENTRY(jlong, WB_GetThreadRemainingStackSize(JNIEnv* env, jobject o))
1729   return (jlong) thread->stack_overflow_state()->stack_available(
1730                    os::current_stack_pointer()) - (jlong)StackOverflow::stack_shadow_zone_size();
1731 WB_END
1732 
1733 
1734 int WhiteBox::array_bytes_to_length(size_t bytes) {
1735   return Array<u1>::bytes_to_length(bytes);
1736 }
1737 
1738 ///////////////
1739 // MetaspaceTestContext and MetaspaceTestArena
1740 WB_ENTRY(jlong, WB_CreateMetaspaceTestContext(JNIEnv* env, jobject wb, jlong commit_limit, jlong reserve_limit))
1741   assert(is_aligned(commit_limit, BytesPerWord),
1742          "WB_CreateMetaspaceTestContext: commit_limit is not a multiple of the system word byte size");
1743   assert(is_aligned(reserve_limit, BytesPerWord),
1744          "WB_CreateMetaspaceTestContext: reserve_limit is not a multiple of the system word byte size");
1745   metaspace::MetaspaceTestContext* context =
1746       new metaspace::MetaspaceTestContext("whitebox-metaspace-context", (size_t) commit_limit / BytesPerWord,
1747                                           (size_t) reserve_limit / BytesPerWord);
1748   return (jlong)p2i(context);
1749 WB_END
1750 
1751 WB_ENTRY(void, WB_DestroyMetaspaceTestContext(JNIEnv* env, jobject wb, jlong context))
1752   delete (metaspace::MetaspaceTestContext*) context;
1753 WB_END
1754 
1755 WB_ENTRY(void, WB_PurgeMetaspaceTestContext(JNIEnv* env, jobject wb, jlong context))
1756   metaspace::MetaspaceTestContext* context0 = (metaspace::MetaspaceTestContext*) context;
1757   context0->purge_area();
1758 WB_END
1759 
1760 WB_ENTRY(void, WB_PrintMetaspaceTestContext(JNIEnv* env, jobject wb, jlong context))
1761   metaspace::MetaspaceTestContext* context0 = (metaspace::MetaspaceTestContext*) context;
1762   context0->print_on(tty);
1763 WB_END
1764 
1765 WB_ENTRY(jlong, WB_GetTotalCommittedBytesInMetaspaceTestContext(JNIEnv* env, jobject wb, jlong context))
1766   metaspace::MetaspaceTestContext* context0 = (metaspace::MetaspaceTestContext*) context;
1767   return (jlong)context0->committed_words() * BytesPerWord;
1768 WB_END
1769 
1770 WB_ENTRY(jlong, WB_GetTotalUsedBytesInMetaspaceTestContext(JNIEnv* env, jobject wb, jlong context))
1771   metaspace::MetaspaceTestContext* context0 = (metaspace::MetaspaceTestContext*) context;
1772   return (jlong)context0->used_words() * BytesPerWord;
1773 WB_END
1774 
1775 WB_ENTRY(jlong, WB_CreateArenaInTestContext(JNIEnv* env, jobject wb, jlong context, jboolean is_micro))
1776   const Metaspace::MetaspaceType type = is_micro ? Metaspace::ClassMirrorHolderMetaspaceType : Metaspace::StandardMetaspaceType;
1777   metaspace::MetaspaceTestContext* context0 = (metaspace::MetaspaceTestContext*) context;
1778   return (jlong)p2i(context0->create_arena(type));
1779 WB_END
1780 
1781 WB_ENTRY(void, WB_DestroyMetaspaceTestArena(JNIEnv* env, jobject wb, jlong arena))
1782   delete (metaspace::MetaspaceTestArena*) arena;
1783 WB_END
1784 
1785 WB_ENTRY(jlong, WB_AllocateFromMetaspaceTestArena(JNIEnv* env, jobject wb, jlong arena, jlong size))
1786   assert(is_aligned(size, BytesPerWord),
1787          "WB_AllocateFromMetaspaceTestArena: size is not a multiple of the system word byte size");
1788   metaspace::MetaspaceTestArena *arena0 = (metaspace::MetaspaceTestArena *)arena;
1789   MetaWord *p = arena0->allocate((size_t) size / BytesPerWord);
1790   return (jlong)p2i(p);
1791 WB_END
1792 
1793 WB_ENTRY(void, WB_DeallocateToMetaspaceTestArena(JNIEnv* env, jobject wb, jlong arena, jlong p, jlong size))
1794   assert(is_aligned(size, BytesPerWord),
1795          "WB_DeallocateToMetaspaceTestArena: size is not a multiple of the system word byte size");
1796   metaspace::MetaspaceTestArena* arena0 = (metaspace::MetaspaceTestArena*) arena;
1797   arena0->deallocate((MetaWord*)p, (size_t) size / BytesPerWord);
1798 WB_END
1799 
1800 WB_ENTRY(jlong, WB_GetMaxMetaspaceAllocationSize(JNIEnv* env, jobject wb))
1801   return (jlong) Metaspace::max_allocation_word_size() * BytesPerWord;
1802 WB_END
1803 
1804 WB_ENTRY(jlong, WB_WordSize(JNIEnv* env))
1805   return (jlong)BytesPerWord;
1806 WB_END
1807 
1808 WB_ENTRY(jlong, WB_RootChunkWordSize(JNIEnv* env))
1809   return (jlong)Metaspace::reserve_alignment_words();
1810 WB_END
1811 
1812 WB_ENTRY(jboolean, WB_IsStaticallyLinked(JNIEnv* env, jobject wb))
1813   return JVM_IsStaticallyLinked();
1814 WB_END
1815 
1816 //////////////
1817 
1818 WB_ENTRY(jlong, WB_AllocateMetaspace(JNIEnv* env, jobject wb, jobject class_loader, jlong size))
1819   if (size < 0) {
1820     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
1821         err_msg("WB_AllocateMetaspace: size is negative: " JLONG_FORMAT, size));
1822   }
1823 
1824   oop class_loader_oop = JNIHandles::resolve(class_loader);
1825   ClassLoaderData* cld = class_loader_oop != nullptr
1826       ? java_lang_ClassLoader::loader_data_acquire(class_loader_oop)
1827       : ClassLoaderData::the_null_class_loader_data();
1828 
1829   void* metadata = MetadataFactory::new_array<u1>(cld, WhiteBox::array_bytes_to_length((size_t)size), thread);
1830 
1831   return (jlong)(uintptr_t)metadata;
1832 WB_END
1833 
1834 WB_ENTRY(void, WB_DefineModule(JNIEnv* env, jobject o, jobject module, jboolean is_open,
1835                                 jstring version, jstring location, jobjectArray packages))
1836   Handle h_module (THREAD, JNIHandles::resolve(module));
1837   Modules::define_module(h_module, is_open, version, location, packages, CHECK);
1838 WB_END
1839 
1840 WB_ENTRY(void, WB_AddModuleExports(JNIEnv* env, jobject o, jobject from_module, jstring package, jobject to_module))
1841   Handle h_from_module (THREAD, JNIHandles::resolve(from_module));
1842   Handle h_to_module (THREAD, JNIHandles::resolve(to_module));
1843   Modules::add_module_exports_qualified(h_from_module, package, h_to_module, CHECK);
1844 WB_END
1845 
1846 WB_ENTRY(void, WB_AddModuleExportsToAllUnnamed(JNIEnv* env, jobject o, jclass module, jstring package))
1847   Handle h_module (THREAD, JNIHandles::resolve(module));
1848   Modules::add_module_exports_to_all_unnamed(h_module, package, CHECK);
1849 WB_END
1850 
1851 WB_ENTRY(void, WB_AddModuleExportsToAll(JNIEnv* env, jobject o, jclass module, jstring package))
1852   Handle h_module (THREAD, JNIHandles::resolve(module));
1853   Modules::add_module_exports(h_module, package, Handle(), CHECK);
1854 WB_END
1855 
1856 WB_ENTRY(void, WB_AddReadsModule(JNIEnv* env, jobject o, jobject from_module, jobject source_module))
1857   Handle h_from_module (THREAD, JNIHandles::resolve(from_module));
1858   Handle h_source_module (THREAD, JNIHandles::resolve(source_module));
1859   Modules::add_reads_module(h_from_module, h_source_module, CHECK);
1860 WB_END
1861 
1862 WB_ENTRY(jlong, WB_IncMetaspaceCapacityUntilGC(JNIEnv* env, jobject wb, jlong inc))
1863   if (inc < 0) {
1864     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
1865         err_msg("WB_IncMetaspaceCapacityUntilGC: inc is negative: " JLONG_FORMAT, inc));
1866   }
1867 
1868   jlong max_size_t = (jlong) ((size_t) -1);
1869   if (inc > max_size_t) {
1870     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
1871         err_msg("WB_IncMetaspaceCapacityUntilGC: inc does not fit in size_t: " JLONG_FORMAT, inc));
1872   }
1873 
1874   size_t new_cap_until_GC = 0;
1875   size_t aligned_inc = align_down((size_t) inc, Metaspace::commit_alignment());
1876   bool success = MetaspaceGC::inc_capacity_until_GC(aligned_inc, &new_cap_until_GC);
1877   if (!success) {
1878     THROW_MSG_0(vmSymbols::java_lang_IllegalStateException(),
1879                 "WB_IncMetaspaceCapacityUntilGC: could not increase capacity until GC "
1880                 "due to contention with another thread");
1881   }
1882   return (jlong) new_cap_until_GC;
1883 WB_END
1884 
1885 WB_ENTRY(jlong, WB_MetaspaceCapacityUntilGC(JNIEnv* env, jobject wb))
1886   return (jlong) MetaspaceGC::capacity_until_GC();
1887 WB_END
1888 
1889 // The function is only valid when CDS is available.
1890 WB_ENTRY(jlong, WB_MetaspaceSharedRegionAlignment(JNIEnv* env, jobject wb))
1891 #if INCLUDE_CDS
1892   return (jlong)MetaspaceShared::core_region_alignment();
1893 #else
1894   ShouldNotReachHere();
1895   return 0L;
1896 #endif
1897 WB_END
1898 
1899 WB_ENTRY(jboolean, WB_IsMonitorInflated(JNIEnv* env, jobject wb, jobject obj))
1900   oop obj_oop = JNIHandles::resolve(obj);
1901   return (jboolean) obj_oop->mark().has_monitor();
1902 WB_END
1903 
1904 WB_ENTRY(jlong, WB_getInUseMonitorCount(JNIEnv* env, jobject wb))
1905   return (jlong) WhiteBox::get_in_use_monitor_count();
1906 WB_END
1907 
1908 WB_ENTRY(jint, WB_getLockStackCapacity(JNIEnv* env))
1909   return (jint) LockStack::CAPACITY;
1910 WB_END
1911 
1912 WB_ENTRY(jboolean, WB_supportsRecursiveLightweightLocking(JNIEnv* env))
1913   return (jboolean) VM_Version::supports_recursive_lightweight_locking();
1914 WB_END
1915 
1916 WB_ENTRY(jboolean, WB_DeflateIdleMonitors(JNIEnv* env, jobject wb))
1917   log_info(monitorinflation)("WhiteBox initiated DeflateIdleMonitors");
1918   return ObjectSynchronizer::request_deflate_idle_monitors_from_wb();
1919 WB_END
1920 
1921 WB_ENTRY(void, WB_ForceSafepoint(JNIEnv* env, jobject wb))
1922   VM_ForceSafepoint force_safepoint_op;
1923   VMThread::execute(&force_safepoint_op);
1924 WB_END
1925 
1926 WB_ENTRY(void, WB_ForceClassLoaderStatsSafepoint(JNIEnv* env, jobject wb))
1927   nullStream dev_null;
1928   ClassLoaderStatsVMOperation force_op(&dev_null);
1929   VMThread::execute(&force_op);
1930 WB_END
1931 
1932 WB_ENTRY(jlong, WB_GetConstantPool(JNIEnv* env, jobject wb, jclass klass))
1933   InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
1934   return (jlong) ik->constants();
1935 WB_END
1936 
1937 WB_ENTRY(jobjectArray, WB_GetResolvedReferences(JNIEnv* env, jobject wb, jclass klass))
1938   InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
1939   objArrayOop resolved_refs= ik->constants()->resolved_references();
1940   return (jobjectArray)JNIHandles::make_local(THREAD, resolved_refs);
1941 WB_END
1942 
1943 WB_ENTRY(jobjectArray, WB_getObjectsViaKlassOopMaps(JNIEnv* env, jobject wb, jobject thing))
1944   oop aoop = JNIHandles::resolve(thing);
1945   if (!aoop->is_instance()) {
1946     return nullptr;
1947   }
1948   instanceHandle ih(THREAD, (instanceOop) aoop);
1949   InstanceKlass* klass = InstanceKlass::cast(ih->klass());
1950   if (klass->nonstatic_oop_map_count() == 0) {
1951     return nullptr;
1952   }
1953   const OopMapBlock* map = klass->start_of_nonstatic_oop_maps();
1954   const OopMapBlock* const end = map + klass->nonstatic_oop_map_count();
1955   int oop_count = 0;
1956   while (map < end) {
1957     oop_count += map->count();
1958     map++;
1959   }
1960 
1961   objArrayHandle result_array =
1962       oopFactory::new_objArray_handle(vmClasses::Object_klass(), oop_count, CHECK_NULL);
1963   map = klass->start_of_nonstatic_oop_maps();
1964   int index = 0;
1965   while (map < end) {
1966     int offset = map->offset();
1967     for (unsigned int j = 0; j < map->count(); j++) {
1968       result_array->obj_at_put(index++, ih->obj_field(offset));
1969       offset += heapOopSize;
1970     }
1971     map++;
1972   }
1973   return (jobjectArray)JNIHandles::make_local(THREAD, result_array());
1974 WB_END
1975 
1976 // Collect Object oops but not value objects...loaded from heap
1977 class CollectObjectOops : public BasicOopIterateClosure {
1978   public:
1979   GrowableArray<Handle>* _array;
1980 
1981   CollectObjectOops() {
1982       _array = new GrowableArray<Handle>(128);
1983   }
1984 
1985   void add_oop(oop o) {
1986     Handle oh = Handle(Thread::current(), o);
1987     if (oh != nullptr && oh->is_inline_type()) {
1988       oh->oop_iterate(this);
1989     } else {
1990       _array->append(oh);
1991     }
1992   }
1993 
1994   template <class T> inline void add_oop(T* p) { add_oop(HeapAccess<>::oop_load(p)); }
1995   void do_oop(oop* o) { add_oop(o); }
1996   void do_oop(narrowOop* v) { add_oop(v); }
1997 
1998   jobjectArray create_jni_result(JNIEnv* env, TRAPS) {
1999     objArrayHandle result_array =
2000         oopFactory::new_objArray_handle(vmClasses::Object_klass(), _array->length(), CHECK_NULL);
2001     for (int i = 0 ; i < _array->length(); i++) {
2002       result_array->obj_at_put(i, _array->at(i)());
2003     }
2004     return (jobjectArray)JNIHandles::make_local(THREAD, result_array());
2005   }
2006 };
2007 
2008 // Collect Object oops but not value objects...loaded from frames
2009 class CollectFrameObjectOops : public BasicOopIterateClosure {
2010  public:
2011   CollectObjectOops _collect;
2012 
2013   template <class T> inline void add_oop(T* p) { _collect.add_oop(RawAccess<>::oop_load(p)); }
2014   void do_oop(oop* o) { add_oop(o); }
2015   void do_oop(narrowOop* v) { add_oop(v); }
2016 
2017   jobjectArray create_jni_result(JNIEnv* env, TRAPS) {
2018     return _collect.create_jni_result(env, THREAD);
2019   }
2020 };
2021 
2022 // Collect Object oops for the given oop, iterate through value objects
2023 WB_ENTRY(jobjectArray, WB_getObjectsViaOopIterator(JNIEnv* env, jobject wb, jobject thing))
2024   ResourceMark rm(thread);
2025   Handle objh(thread, JNIHandles::resolve(thing));
2026   CollectObjectOops collectOops;
2027   objh->oop_iterate(&collectOops);
2028   return collectOops.create_jni_result(env, THREAD);
2029 WB_END
2030 
2031 // Collect Object oops for the given frame deep, iterate through value objects
2032 WB_ENTRY(jobjectArray, WB_getObjectsViaFrameOopIterator(JNIEnv* env, jobject wb, jint depth))
2033   KeepStackGCProcessedMark ksgcpm(THREAD);
2034   ResourceMark rm(THREAD);
2035   CollectFrameObjectOops collectOops;
2036   StackFrameStream sfs(thread, true /* update */, true /* process_frames */);
2037   while (depth > 0) { // Skip the native WB API frame
2038     sfs.next();
2039     frame* f = sfs.current();
2040     f->oops_do(&collectOops, nullptr, sfs.register_map());
2041     depth--;
2042   }
2043   return collectOops.create_jni_result(env, THREAD);
2044 WB_END
2045 
2046 WB_ENTRY(jint, WB_getFieldEntriesLength(JNIEnv* env, jobject wb, jclass klass))
2047   InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
2048   ConstantPool* cp = ik->constants();
2049   if (cp->cache() == nullptr) {
2050     return -1;
2051   }
2052   return cp->resolved_field_entries_length();
2053 WB_END
2054 
2055 WB_ENTRY(jint, WB_getFieldCPIndex(JNIEnv* env, jobject wb, jclass klass, jint index))
2056   InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
2057   ConstantPool* cp = ik->constants();
2058   if (cp->cache() == nullptr) {
2059       return -1;
2060   }
2061   return cp->resolved_field_entry_at(index)->constant_pool_index();
2062 WB_END
2063 
2064 WB_ENTRY(jint, WB_getMethodEntriesLength(JNIEnv* env, jobject wb, jclass klass))
2065   InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
2066   ConstantPool* cp = ik->constants();
2067   if (cp->cache() == nullptr) {
2068     return -1;
2069   }
2070   return cp->resolved_method_entries_length();
2071 WB_END
2072 
2073 WB_ENTRY(jint, WB_getMethodCPIndex(JNIEnv* env, jobject wb, jclass klass, jint index))
2074   InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
2075   ConstantPool* cp = ik->constants();
2076   if (cp->cache() == nullptr) {
2077       return -1;
2078   }
2079   return cp->resolved_method_entry_at(index)->constant_pool_index();
2080 WB_END
2081 
2082 WB_ENTRY(jint, WB_getIndyInfoLength(JNIEnv* env, jobject wb, jclass klass))
2083   InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
2084   ConstantPool* cp = ik->constants();
2085   if (cp->cache() == nullptr) {
2086       return -1;
2087   }
2088   return cp->resolved_indy_entries_length();
2089 WB_END
2090 
2091 WB_ENTRY(jint, WB_getIndyCPIndex(JNIEnv* env, jobject wb, jclass klass, jint index))
2092   InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
2093   ConstantPool* cp = ik->constants();
2094   if (cp->cache() == nullptr) {
2095       return -1;
2096   }
2097   return cp->resolved_indy_entry_at(index)->constant_pool_index();
2098 WB_END
2099 
2100 WB_ENTRY(jobject, WB_printClasses(JNIEnv* env, jobject wb, jstring class_name_pattern, jint flags))
2101   ThreadToNativeFromVM ttnfv(thread);
2102   const char* c = env->GetStringUTFChars(class_name_pattern, nullptr);
2103   ResourceMark rm;
2104   stringStream st;
2105   {
2106     ThreadInVMfromNative ttvfn(thread); // back to VM
2107     ClassPrinter::print_classes(c, flags, &st);
2108   }
2109   jstring result = env->NewStringUTF(st.freeze());
2110   CHECK_JNI_EXCEPTION_(env, nullptr);
2111   return result;
2112 WB_END
2113 
2114 WB_ENTRY(jobject, WB_printMethods(JNIEnv* env, jobject wb, jstring class_name_pattern, jstring method_pattern, jint flags))
2115   ThreadToNativeFromVM ttnfv(thread);
2116   const char* c = env->GetStringUTFChars(class_name_pattern, nullptr);
2117   const char* m = env->GetStringUTFChars(method_pattern, nullptr);
2118   ResourceMark rm;
2119   stringStream st;
2120   {
2121     ThreadInVMfromNative ttvfn(thread); // back to VM
2122     ClassPrinter::print_methods(c, m, flags, &st);
2123   }
2124   jstring result = env->NewStringUTF(st.freeze());
2125   CHECK_JNI_EXCEPTION_(env, nullptr);
2126   return result;
2127 WB_END
2128 
2129 WB_ENTRY(void, WB_ClearInlineCaches(JNIEnv* env, jobject wb, jboolean preserve_static_stubs))
2130   VM_ClearICs clear_ics(preserve_static_stubs == JNI_TRUE);
2131   VMThread::execute(&clear_ics);
2132 WB_END
2133 
2134 template <typename T>
2135 static bool GetMethodOption(JavaThread* thread, JNIEnv* env, jobject method, jstring name, T* value) {
2136   assert(value != nullptr, "sanity");
2137   if (method == nullptr || name == nullptr) {
2138     return false;
2139   }
2140   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
2141   CHECK_JNI_EXCEPTION_(env, false);
2142   methodHandle mh(thread, Method::checked_resolve_jmethod_id(jmid));
2143   // can't be in VM when we call JNI
2144   ThreadToNativeFromVM ttnfv(thread);
2145   const char* flag_name = env->GetStringUTFChars(name, nullptr);
2146   CHECK_JNI_EXCEPTION_(env, false);
2147   CompileCommandEnum option = CompilerOracle::string_to_option(flag_name);
2148   env->ReleaseStringUTFChars(name, flag_name);
2149   if (option == CompileCommandEnum::Unknown) {
2150     return false;
2151   }
2152   if (!CompilerOracle::option_matches_type(option, *value)) {
2153     return false;
2154   }
2155   return CompilerOracle::has_option_value(mh, option, *value);
2156 }
2157 
2158 WB_ENTRY(jobject, WB_GetMethodBooleaneOption(JNIEnv* env, jobject wb, jobject method, jstring name))
2159   bool result;
2160   if (GetMethodOption<bool> (thread, env, method, name, &result)) {
2161     // can't be in VM when we call JNI
2162     ThreadToNativeFromVM ttnfv(thread);
2163     return booleanBox(thread, env, result);
2164   }
2165   return nullptr;
2166 WB_END
2167 
2168 WB_ENTRY(jobject, WB_GetMethodIntxOption(JNIEnv* env, jobject wb, jobject method, jstring name))
2169   intx result;
2170   if (GetMethodOption <intx> (thread, env, method, name, &result)) {
2171     // can't be in VM when we call JNI
2172     ThreadToNativeFromVM ttnfv(thread);
2173     return longBox(thread, env, result);
2174   }
2175   return nullptr;
2176 WB_END
2177 
2178 WB_ENTRY(jobject, WB_GetMethodUintxOption(JNIEnv* env, jobject wb, jobject method, jstring name))
2179   uintx result;
2180   if (GetMethodOption <uintx> (thread, env, method, name, &result)) {
2181     // can't be in VM when we call JNI
2182     ThreadToNativeFromVM ttnfv(thread);
2183     return longBox(thread, env, result);
2184   }
2185   return nullptr;
2186 WB_END
2187 
2188 WB_ENTRY(jobject, WB_GetMethodDoubleOption(JNIEnv* env, jobject wb, jobject method, jstring name))
2189   double result;
2190   if (GetMethodOption <double> (thread, env, method, name, &result)) {
2191     // can't be in VM when we call JNI
2192     ThreadToNativeFromVM ttnfv(thread);
2193     return doubleBox(thread, env, result);
2194   }
2195   return nullptr;
2196 WB_END
2197 
2198 WB_ENTRY(jobject, WB_GetMethodStringOption(JNIEnv* env, jobject wb, jobject method, jstring name))
2199   ccstr ccstrResult;
2200   if (GetMethodOption <ccstr> (thread, env, method, name, &ccstrResult)) {
2201     // can't be in VM when we call JNI
2202     ThreadToNativeFromVM ttnfv(thread);
2203     jstring result = env->NewStringUTF(ccstrResult);
2204     CHECK_JNI_EXCEPTION_(env, nullptr);
2205     return result;
2206   }
2207   return nullptr;
2208 WB_END
2209 
2210 WB_ENTRY(jobject, WB_GetDefaultArchivePath(JNIEnv* env, jobject wb))
2211   const char* p = CDSConfig::default_archive_path();
2212   ThreadToNativeFromVM ttn(thread);
2213   jstring path_string = env->NewStringUTF(p);
2214 
2215   CHECK_JNI_EXCEPTION_(env, nullptr);
2216 
2217   return path_string;
2218 WB_END
2219 
2220 WB_ENTRY(jboolean, WB_IsSharingEnabled(JNIEnv* env, jobject wb))
2221   return CDSConfig::is_using_archive();
2222 WB_END
2223 
2224 WB_ENTRY(jint, WB_GetCDSGenericHeaderMinVersion(JNIEnv* env, jobject wb))
2225 #if INCLUDE_CDS
2226   return (jint)CDS_GENERIC_HEADER_SUPPORTED_MIN_VERSION;
2227 #else
2228   ShouldNotReachHere();
2229   return (jint)-1;
2230 #endif
2231 WB_END
2232 
2233 WB_ENTRY(jint, WB_GetCDSCurrentVersion(JNIEnv* env, jobject wb))
2234 #if INCLUDE_CDS
2235   return (jint)CURRENT_CDS_ARCHIVE_VERSION;
2236 #else
2237   ShouldNotReachHere();
2238   return (jint)-1;
2239 #endif
2240 WB_END
2241 
2242 WB_ENTRY(jboolean, WB_CDSMemoryMappingFailed(JNIEnv* env, jobject wb))
2243   return FileMapInfo::memory_mapping_failed();
2244 WB_END
2245 
2246 WB_ENTRY(jboolean, WB_IsSharedInternedString(JNIEnv* env, jobject wb, jobject str))
2247   ResourceMark rm(THREAD);
2248   oop str_oop = JNIHandles::resolve(str);
2249   int length;
2250   jchar* chars = java_lang_String::as_unicode_string(str_oop, length, CHECK_(false));
2251   return StringTable::lookup_shared(chars, length) == str_oop;
2252 WB_END
2253 
2254 WB_ENTRY(jboolean, WB_IsSharedClass(JNIEnv* env, jobject wb, jclass clazz))
2255   return (jboolean)MetaspaceShared::is_in_shared_metaspace(java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz)));
2256 WB_END
2257 
2258 WB_ENTRY(jboolean, WB_AreSharedStringsMapped(JNIEnv* env))
2259   return ArchiveHeapLoader::is_mapped();
2260 WB_END
2261 
2262 WB_ENTRY(void, WB_LinkClass(JNIEnv* env, jobject wb, jclass clazz))
2263   Klass *k = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz));
2264   if (!k->is_instance_klass()) {
2265     return;
2266   }
2267   InstanceKlass *ik = InstanceKlass::cast(k);
2268   ik->link_class(THREAD); // may throw verification error
2269 WB_END
2270 
2271 WB_ENTRY(jboolean, WB_AreOpenArchiveHeapObjectsMapped(JNIEnv* env))
2272   return ArchiveHeapLoader::is_mapped();
2273 WB_END
2274 
2275 WB_ENTRY(jboolean, WB_IsCDSIncluded(JNIEnv* env))
2276 #if INCLUDE_CDS
2277   // An exploded build inhibits use of CDS. Therefore, for the
2278   // purpose of testing, the JVM can be treated as not having CDS
2279   // built in at all.
2280   return ClassLoader::has_jrt_entry();
2281 #else
2282   return false;
2283 #endif // INCLUDE_CDS
2284 WB_END
2285 
2286 WB_ENTRY(jboolean, WB_isC2OrJVMCIIncluded(JNIEnv* env))
2287 #if COMPILER2_OR_JVMCI
2288   return true;
2289 #else
2290   return false;
2291 #endif
2292 WB_END
2293 
2294 WB_ENTRY(jboolean, WB_IsJVMCISupportedByGC(JNIEnv* env))
2295 #if INCLUDE_JVMCI
2296   return JVMCIGlobals::gc_supports_jvmci();
2297 #else
2298   return false;
2299 #endif
2300 WB_END
2301 
2302 WB_ENTRY(jboolean, WB_CanWriteJavaHeapArchive(JNIEnv* env))
2303   return !CDSConfig::are_vm_options_incompatible_with_dumping_heap();
2304 WB_END
2305 
2306 
2307 WB_ENTRY(jboolean, WB_IsJFRIncluded(JNIEnv* env))
2308 #if INCLUDE_JFR
2309   return true;
2310 #else
2311   return false;
2312 #endif // INCLUDE_JFR
2313 WB_END
2314 
2315 WB_ENTRY(jboolean, WB_IsDTraceIncluded(JNIEnv* env))
2316 #if defined(DTRACE_ENABLED)
2317   return true;
2318 #else
2319   return false;
2320 #endif // DTRACE_ENABLED
2321 WB_END
2322 
2323 #if INCLUDE_CDS
2324 
2325 WB_ENTRY(jint, WB_GetCDSOffsetForName(JNIEnv* env, jobject o, jstring name))
2326   ResourceMark rm;
2327   char* c_name = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(name));
2328   jint result = (jint)CDSConstants::get_cds_offset(c_name);
2329   return result;
2330 WB_END
2331 
2332 WB_ENTRY(jint, WB_GetCDSConstantForName(JNIEnv* env, jobject o, jstring name))
2333   ResourceMark rm;
2334   char* c_name = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(name));
2335   jint result = (jint)CDSConstants::get_cds_constant(c_name);
2336   return result;
2337 WB_END
2338 
2339 #endif // INCLUDE_CDS
2340 
2341 WB_ENTRY(jboolean, WB_HandshakeReadMonitors(JNIEnv* env, jobject wb, jobject thread_handle))
2342   class ReadMonitorsClosure : public HandshakeClosure {
2343     jboolean _executed;
2344 
2345     void do_thread(Thread* th) {
2346       JavaThread* jt = JavaThread::cast(th);
2347       ResourceMark rm;
2348 
2349       GrowableArray<MonitorInfo*>* info = new GrowableArray<MonitorInfo*>();
2350 
2351       if (!jt->has_last_Java_frame()) {
2352         return;
2353       }
2354       RegisterMap rmap(jt,
2355                        RegisterMap::UpdateMap::include,
2356                        RegisterMap::ProcessFrames::include,
2357                        RegisterMap::WalkContinuation::skip);
2358       for (javaVFrame* vf = jt->last_java_vframe(&rmap); vf != nullptr; vf = vf->java_sender()) {
2359         GrowableArray<MonitorInfo*> *monitors = vf->monitors();
2360         if (monitors != nullptr) {
2361           int len = monitors->length();
2362           // Walk monitors youngest to oldest
2363           for (int i = len - 1; i >= 0; i--) {
2364             MonitorInfo* mon_info = monitors->at(i);
2365             if (mon_info->eliminated()) continue;
2366             oop owner = mon_info->owner();
2367             if (owner != nullptr) {
2368               info->append(mon_info);
2369             }
2370           }
2371         }
2372       }
2373       _executed = true;
2374     }
2375 
2376    public:
2377     ReadMonitorsClosure() : HandshakeClosure("WB_HandshakeReadMonitors"), _executed(false) {}
2378     jboolean executed() const { return _executed; }
2379   };
2380 
2381   ReadMonitorsClosure rmc;
2382   if (thread_handle != nullptr) {
2383     ThreadsListHandle tlh;
2384     JavaThread* target = nullptr;
2385     bool is_alive = tlh.cv_internal_thread_to_JavaThread(thread_handle, &target, nullptr);
2386     if (is_alive) {
2387       Handshake::execute(&rmc, &tlh, target);
2388     }
2389   }
2390   return rmc.executed();
2391 WB_END
2392 
2393 WB_ENTRY(jint, WB_HandshakeWalkStack(JNIEnv* env, jobject wb, jobject thread_handle, jboolean all_threads))
2394   class TraceSelfClosure : public HandshakeClosure {
2395     jint _num_threads_completed;
2396 
2397     void do_thread(Thread* th) {
2398       JavaThread* jt = JavaThread::cast(th);
2399       ResourceMark rm;
2400 
2401       jt->print_on(tty);
2402       jt->print_stack_on(tty);
2403       tty->cr();
2404       Atomic::inc(&_num_threads_completed);
2405     }
2406 
2407   public:
2408     TraceSelfClosure(Thread* thread) : HandshakeClosure("WB_TraceSelf"), _num_threads_completed(0) {}
2409 
2410     jint num_threads_completed() const { return _num_threads_completed; }
2411   };
2412   TraceSelfClosure tsc(Thread::current());
2413 
2414   if (all_threads) {
2415     Handshake::execute(&tsc);
2416   } else if (thread_handle != nullptr) {
2417     ThreadsListHandle tlh;
2418     JavaThread* target = nullptr;
2419     bool is_alive = tlh.cv_internal_thread_to_JavaThread(thread_handle, &target, nullptr);
2420     if (is_alive) {
2421       Handshake::execute(&tsc, &tlh, target);
2422     }
2423   }
2424   return tsc.num_threads_completed();
2425 WB_END
2426 
2427 WB_ENTRY(void, WB_AsyncHandshakeWalkStack(JNIEnv* env, jobject wb, jobject thread_handle))
2428   class TraceSelfClosure : public AsyncHandshakeClosure {
2429     JavaThread* _self;
2430     void do_thread(Thread* th) {
2431       assert(th->is_Java_thread(), "sanity");
2432       // AsynchHandshake handshakes are only executed by target.
2433       assert(_self == th, "Must be");
2434       assert(Thread::current() == th, "Must be");
2435       JavaThread* jt = JavaThread::cast(th);
2436       ResourceMark rm;
2437       jt->print_on(tty);
2438       jt->print_stack_on(tty);
2439       tty->cr();
2440     }
2441 
2442   public:
2443     TraceSelfClosure(JavaThread* self_target) : AsyncHandshakeClosure("WB_TraceSelf"), _self(self_target) {}
2444   };
2445   if (thread_handle != nullptr) {
2446     ThreadsListHandle tlh;
2447     JavaThread* target = nullptr;
2448     bool is_alive = tlh.cv_internal_thread_to_JavaThread(thread_handle, &target, nullptr);
2449     if (is_alive) {
2450       TraceSelfClosure* tsc = new TraceSelfClosure(target);
2451       Handshake::execute(tsc, target);
2452     }
2453   }
2454 WB_END
2455 
2456 static volatile int _emulated_lock = 0;
2457 
2458 WB_ENTRY(void, WB_LockAndBlock(JNIEnv* env, jobject wb, jboolean suspender))
2459   JavaThread* self = JavaThread::current();
2460 
2461   {
2462     // Before trying to acquire the lock transition into a safepoint safe state.
2463     // Otherwise if either suspender or suspendee blocks for a safepoint
2464     // in ~ThreadBlockInVM the other one could loop forever trying to acquire
2465     // the lock without allowing the safepoint to progress.
2466     ThreadBlockInVM tbivm(self);
2467 
2468     // We will deadlock here if we are 'suspender' and 'suspendee'
2469     // suspended in ~ThreadBlockInVM. This verifies we only suspend
2470     // at the right place.
2471     while (Atomic::cmpxchg(&_emulated_lock, 0, 1) != 0) {}
2472     assert(_emulated_lock == 1, "Must be locked");
2473 
2474     // Sleep much longer in suspendee to force situation where
2475     // 'suspender' is waiting above to acquire lock.
2476     os::naked_short_sleep(suspender ? 1 : 10);
2477   }
2478   Atomic::store(&_emulated_lock, 0);
2479 WB_END
2480 
2481 // Some convenience methods to deal with objects from java
2482 int WhiteBox::offset_for_field(const char* field_name, oop object,
2483     Symbol* signature_symbol) {
2484   assert(field_name != nullptr && strlen(field_name) > 0, "Field name not valid");
2485 
2486   //Get the class of our object
2487   Klass* arg_klass = object->klass();
2488   //Turn it into an instance-klass
2489   InstanceKlass* ik = InstanceKlass::cast(arg_klass);
2490 
2491   //Create symbols to look for in the class
2492   TempNewSymbol name_symbol = SymbolTable::new_symbol(field_name);
2493 
2494   //To be filled in with an offset of the field we're looking for
2495   fieldDescriptor fd;
2496 
2497   Klass* res = ik->find_field(name_symbol, signature_symbol, &fd);
2498   if (res == nullptr) {
2499     tty->print_cr("Invalid layout of %s at %s", ik->external_name(),
2500         name_symbol->as_C_string());
2501     vm_exit_during_initialization("Invalid layout of preloaded class: use -Xlog:class+load=info to see the origin of the problem class");
2502   }
2503 
2504   //fetch the field at the offset we've found
2505   int dest_offset = fd.offset();
2506 
2507   return dest_offset;
2508 }
2509 
2510 
2511 const char* WhiteBox::lookup_jstring(const char* field_name, oop object) {
2512   int offset = offset_for_field(field_name, object,
2513       vmSymbols::string_signature());
2514   oop string = object->obj_field(offset);
2515   if (string == nullptr) {
2516     return nullptr;
2517   }
2518   const char* ret = java_lang_String::as_utf8_string(string);
2519   return ret;
2520 }
2521 
2522 bool WhiteBox::lookup_bool(const char* field_name, oop object) {
2523   int offset =
2524       offset_for_field(field_name, object, vmSymbols::bool_signature());
2525   bool ret = (object->bool_field(offset) == JNI_TRUE);
2526   return ret;
2527 }
2528 
2529 void WhiteBox::register_methods(JNIEnv* env, jclass wbclass, JavaThread* thread, JNINativeMethod* method_array, int method_count) {
2530   ResourceMark rm;
2531   Klass* klass = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(wbclass));
2532   const char* klass_name = klass->external_name();
2533 
2534   ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
2535 
2536   //  one by one registration natives for exception catching
2537   jclass no_such_method_error_klass = env->FindClass(vmSymbols::java_lang_NoSuchMethodError()->as_C_string());
2538   CHECK_JNI_EXCEPTION(env);
2539   for (int i = 0, n = method_count; i < n; ++i) {
2540     // Skip dummy entries
2541     if (method_array[i].fnPtr == nullptr) continue;
2542     if (env->RegisterNatives(wbclass, &method_array[i], 1) != 0) {
2543       jthrowable throwable_obj = env->ExceptionOccurred();
2544       if (throwable_obj != nullptr) {
2545         env->ExceptionClear();
2546         if (env->IsInstanceOf(throwable_obj, no_such_method_error_klass)) {
2547           // NoSuchMethodError is thrown when a method can't be found or a method is not native.
2548           // Ignoring the exception since it is not preventing use of other WhiteBox methods.
2549           tty->print_cr("Warning: 'NoSuchMethodError' on register of %s::%s%s",
2550               klass_name, method_array[i].name, method_array[i].signature);
2551         }
2552       } else {
2553         // Registration failed unexpectedly.
2554         tty->print_cr("Warning: unexpected error on register of %s::%s%s. All methods will be unregistered",
2555             klass_name, method_array[i].name, method_array[i].signature);
2556         env->UnregisterNatives(wbclass);
2557         break;
2558       }
2559     }
2560   }
2561 }
2562 
2563 WB_ENTRY(jint, WB_AddCompilerDirective(JNIEnv* env, jobject o, jstring compDirect))
2564   // can't be in VM when we call JNI
2565   ThreadToNativeFromVM ttnfv(thread);
2566   const char* dir = env->GetStringUTFChars(compDirect, nullptr);
2567   CHECK_JNI_EXCEPTION_(env, 0);
2568   int ret;
2569   {
2570     ThreadInVMfromNative ttvfn(thread); // back to VM
2571     ret = DirectivesParser::parse_string(dir, tty);
2572   }
2573   env->ReleaseStringUTFChars(compDirect, dir);
2574   // -1 for error parsing directive. Return 0 as number of directives added.
2575   if (ret == -1) {
2576     ret = 0;
2577   }
2578   return (jint) ret;
2579 WB_END
2580 
2581 WB_ENTRY(void, WB_RemoveCompilerDirective(JNIEnv* env, jobject o, jint count))
2582   DirectivesStack::pop(count);
2583 WB_END
2584 
2585 // Checks that the library libfile has the noexecstack bit set.
2586 WB_ENTRY(jboolean, WB_CheckLibSpecifiesNoexecstack(JNIEnv* env, jobject o, jstring libfile))
2587   jboolean ret = false;
2588 #ifdef LINUX
2589   // Can't be in VM when we call JNI.
2590   ThreadToNativeFromVM ttnfv(thread);
2591   const char* lf = env->GetStringUTFChars(libfile, nullptr);
2592   CHECK_JNI_EXCEPTION_(env, 0);
2593   ret = (jboolean) ElfFile::specifies_noexecstack(lf);
2594   env->ReleaseStringUTFChars(libfile, lf);
2595 #endif
2596   return ret;
2597 WB_END
2598 
2599 WB_ENTRY(jboolean, WB_IsContainerized(JNIEnv* env, jobject o))
2600   LINUX_ONLY(return OSContainer::is_containerized();)
2601   return false;
2602 WB_END
2603 
2604 // Physical memory of the host machine (including containers)
2605 WB_ENTRY(jlong, WB_HostPhysicalMemory(JNIEnv* env, jobject o))
2606   LINUX_ONLY(return os::Linux::physical_memory();)
2607   return os::physical_memory();
2608 WB_END
2609 
2610 // Physical swap of the host machine (including containers), Linux only.
2611 WB_ENTRY(jlong, WB_HostPhysicalSwap(JNIEnv* env, jobject o))
2612   LINUX_ONLY(return (jlong)os::Linux::host_swap();)
2613   return -1; // Not used/implemented on other platforms
2614 WB_END
2615 
2616 WB_ENTRY(jint, WB_ValidateCgroup(JNIEnv* env,
2617                                     jobject o,
2618                                     jstring proc_cgroups,
2619                                     jstring proc_self_cgroup,
2620                                     jstring proc_self_mountinfo))
2621   jint ret = 0;
2622 #ifdef LINUX
2623   ThreadToNativeFromVM ttnfv(thread);
2624   const char* p_cgroups = env->GetStringUTFChars(proc_cgroups, nullptr);
2625   CHECK_JNI_EXCEPTION_(env, 0);
2626   const char* p_s_cgroup = env->GetStringUTFChars(proc_self_cgroup, nullptr);
2627   CHECK_JNI_EXCEPTION_(env, 0);
2628   const char* p_s_mountinfo = env->GetStringUTFChars(proc_self_mountinfo, nullptr);
2629   CHECK_JNI_EXCEPTION_(env, 0);
2630   u1 cg_type_flags = 0;
2631   // This sets cg_type_flags
2632   WhiteBox::validate_cgroup(p_cgroups, p_s_cgroup, p_s_mountinfo, &cg_type_flags);
2633   ret = (jint)cg_type_flags;
2634   env->ReleaseStringUTFChars(proc_cgroups, p_cgroups);
2635   env->ReleaseStringUTFChars(proc_self_cgroup, p_s_cgroup);
2636   env->ReleaseStringUTFChars(proc_self_mountinfo, p_s_mountinfo);
2637 #endif
2638   return ret;
2639 WB_END
2640 
2641 // Available cpus of the host machine, Linux only.
2642 // Used in container testing.
2643 WB_ENTRY(jint, WB_HostCPUs(JNIEnv* env, jobject o))
2644   LINUX_ONLY(return os::Linux::active_processor_count();)
2645   return -1; // Not used/implemented on other platforms
2646 WB_END
2647 
2648 WB_ENTRY(void, WB_PrintOsInfo(JNIEnv* env, jobject o))
2649   os::print_os_info(tty);
2650 WB_END
2651 
2652 // Elf decoder
2653 WB_ENTRY(void, WB_DisableElfSectionCache(JNIEnv* env))
2654 #if !defined(_WINDOWS) && !defined(__APPLE__) && !defined(_AIX)
2655   ElfFile::_do_not_cache_elf_section = true;
2656 #endif
2657 WB_END
2658 
2659 WB_ENTRY(jlong, WB_ResolvedMethodItemsCount(JNIEnv* env, jobject o))
2660   return (jlong) ResolvedMethodTable::items_count();
2661 WB_END
2662 
2663 WB_ENTRY(jint, WB_GetKlassMetadataSize(JNIEnv* env, jobject wb, jclass mirror))
2664   Klass* k = java_lang_Class::as_Klass(JNIHandles::resolve(mirror));
2665   // Return size in bytes.
2666   return k->size() * wordSize;
2667 WB_END
2668 
2669 // See test/hotspot/jtreg/runtime/Thread/ThreadObjAccessAtExit.java.
2670 // It explains how the thread's priority field is used for test state coordination.
2671 //
2672 WB_ENTRY(void, WB_CheckThreadObjOfTerminatingThread(JNIEnv* env, jobject wb, jobject target_handle))
2673   oop target_oop = JNIHandles::resolve_non_null(target_handle);
2674   jlong tid = java_lang_Thread::thread_id(target_oop);
2675   JavaThread* target = java_lang_Thread::thread(target_oop);
2676 
2677   // Grab a ThreadsListHandle to protect the target thread whilst terminating
2678   ThreadsListHandle tlh;
2679 
2680   // Look up the target thread by tid to ensure it is present
2681   JavaThread* t = tlh.list()->find_JavaThread_from_java_tid(tid);
2682   if (t == nullptr) {
2683     THROW_MSG(vmSymbols::java_lang_RuntimeException(), "Target thread not found in ThreadsList!");
2684   }
2685 
2686   tty->print_cr("WB_CheckThreadObjOfTerminatingThread: target thread is protected");
2687   // Allow target to terminate by boosting priority
2688   java_lang_Thread::set_priority(t->threadObj(), ThreadPriority(NormPriority + 1));
2689 
2690   // Now wait for the target to terminate
2691   while (!target->is_terminated()) {
2692     ThreadBlockInVM tbivm(thread);  // just in case target is involved in a safepoint
2693     os::naked_short_sleep(0);
2694   }
2695 
2696   tty->print_cr("WB_CheckThreadObjOfTerminatingThread: target thread is terminated");
2697 
2698   // Now release the GC inducing thread - we have to re-resolve the external oop that
2699   // was passed in as GC may have occurred and we don't know if we can trust t->threadObj() now.
2700   oop original = JNIHandles::resolve_non_null(target_handle);
2701   java_lang_Thread::set_priority(original, ThreadPriority(NormPriority + 2));
2702 
2703   tty->print_cr("WB_CheckThreadObjOfTerminatingThread: GC has been initiated - checking threadObj:");
2704 
2705   // The Java code should be creating garbage and triggering GC, which would potentially move
2706   // the threadObj oop. If the exiting thread is properly protected then its threadObj should
2707   // remain valid and equal to our initial target_handle. Loop a few times to give GC a chance to
2708   // kick in.
2709   for (int i = 0; i < 5; i++) {
2710     oop original = JNIHandles::resolve_non_null(target_handle);
2711     oop current = t->threadObj();
2712     if (original != current) {
2713       tty->print_cr("WB_CheckThreadObjOfTerminatingThread: failed comparison on iteration %d", i);
2714       THROW_MSG(vmSymbols::java_lang_RuntimeException(), "Target thread oop has changed!");
2715     } else {
2716       tty->print_cr("WB_CheckThreadObjOfTerminatingThread: successful comparison on iteration %d", i);
2717       ThreadBlockInVM tbivm(thread);
2718       os::naked_short_sleep(50);
2719     }
2720   }
2721 WB_END
2722 
2723 WB_ENTRY(void, WB_VerifyFrames(JNIEnv* env, jobject wb, jboolean log, jboolean update_map))
2724   ResourceMark rm; // for verify
2725   stringStream st;
2726   for (StackFrameStream fst(JavaThread::current(), update_map, true); !fst.is_done(); fst.next()) {
2727     frame* current_frame = fst.current();
2728     if (log) {
2729       current_frame->print_value_on(&st);
2730     }
2731     current_frame->verify(fst.register_map());
2732   }
2733   if (log) {
2734     tty->print_cr("[WhiteBox::VerifyFrames] Walking Frames");
2735     tty->print_raw(st.freeze());
2736     tty->print_cr("[WhiteBox::VerifyFrames] Done");
2737   }
2738 WB_END
2739 
2740 WB_ENTRY(jboolean, WB_IsJVMTIIncluded(JNIEnv* env, jobject wb))
2741 #if INCLUDE_JVMTI
2742   return JNI_TRUE;
2743 #else
2744   return JNI_FALSE;
2745 #endif
2746 WB_END
2747 
2748 WB_ENTRY(void, WB_WaitUnsafe(JNIEnv* env, jobject wb, jint time))
2749     os::naked_short_sleep(time);
2750 WB_END
2751 
2752 WB_ENTRY(jstring, WB_GetLibcName(JNIEnv* env, jobject o))
2753   ThreadToNativeFromVM ttn(thread);
2754   jstring info_string = env->NewStringUTF(XSTR(LIBC));
2755   CHECK_JNI_EXCEPTION_(env, nullptr);
2756   return info_string;
2757 WB_END
2758 
2759 WB_ENTRY(void, WB_PinObject(JNIEnv* env, jobject wb, jobject o))
2760 #if INCLUDE_G1GC
2761   if (!UseG1GC) {
2762     ShouldNotReachHere();
2763     return;
2764   }
2765   oop obj = JNIHandles::resolve(o);
2766   G1CollectedHeap::heap()->pin_object(thread, obj);
2767 #else
2768   ShouldNotReachHere();
2769 #endif // INCLUDE_G1GC
2770 WB_END
2771 
2772 WB_ENTRY(void, WB_UnpinObject(JNIEnv* env, jobject wb, jobject o))
2773 #if INCLUDE_G1GC
2774   if (!UseG1GC) {
2775     ShouldNotReachHere();
2776     return;
2777   }
2778   oop obj = JNIHandles::resolve(o);
2779   G1CollectedHeap::heap()->unpin_object(thread, obj);
2780 #else
2781   ShouldNotReachHere();
2782 #endif // INCLUDE_G1GC
2783 WB_END
2784 
2785 WB_ENTRY(jboolean, WB_SetVirtualThreadsNotifyJvmtiMode(JNIEnv* env, jobject wb, jboolean enable))
2786   if (!Continuations::enabled()) {
2787     tty->print_cr("WB error: must be Continuations::enabled()!");
2788     return JNI_FALSE;
2789   }
2790   jboolean result = false;
2791 #if INCLUDE_JVMTI
2792   if (enable) {
2793     result = JvmtiEnvBase::enable_virtual_threads_notify_jvmti();
2794   } else {
2795     result = JvmtiEnvBase::disable_virtual_threads_notify_jvmti();
2796   }
2797 #endif
2798   return result;
2799 WB_END
2800 
2801 WB_ENTRY(void, WB_PreTouchMemory(JNIEnv* env, jobject wb, jlong addr, jlong size))
2802   void* const from = (void*)addr;
2803   void* const to = (void*)(addr + size);
2804   if (from > to) {
2805     os::pretouch_memory(from, to, os::vm_page_size());
2806   }
2807 WB_END
2808 
2809 WB_ENTRY(void, WB_CleanMetaspaces(JNIEnv* env, jobject target))
2810   ClassLoaderDataGraph::safepoint_and_clean_metaspaces();
2811 WB_END
2812 
2813 // Reports resident set size (RSS) in bytes
2814 WB_ENTRY(jlong, WB_Rss(JNIEnv* env, jobject o))
2815   return os::rss();
2816 WB_END
2817 
2818 #define CC (char*)
2819 
2820 static JNINativeMethod methods[] = {
2821   {CC"getObjectAddress0",                CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectAddress  },
2822   {CC"getObjectSize0",                   CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectSize     },
2823   {CC"isObjectInOldGen0",                CC"(Ljava/lang/Object;)Z", (void*)&WB_isObjectInOldGen  },
2824   {CC"getHeapOopSize",                   CC"()I",                   (void*)&WB_GetHeapOopSize    },
2825   {CC"getVMPageSize",                    CC"()I",                   (void*)&WB_GetVMPageSize     },
2826   {CC"getVMAllocationGranularity",       CC"()J",                   (void*)&WB_GetVMAllocationGranularity },
2827   {CC"getVMLargePageSize",               CC"()J",                   (void*)&WB_GetVMLargePageSize},
2828   {CC"getHeapSpaceAlignment",            CC"()J",                   (void*)&WB_GetHeapSpaceAlignment},
2829   {CC"getHeapAlignment",                 CC"()J",                   (void*)&WB_GetHeapAlignment},
2830   {CC"countAliveClasses0",               CC"(Ljava/lang/String;)I", (void*)&WB_CountAliveClasses },
2831   {CC"getSymbolRefcount",                CC"(Ljava/lang/String;)I", (void*)&WB_GetSymbolRefcount },
2832   {CC"parseCommandLine0",
2833       CC"(Ljava/lang/String;C[Ljdk/test/whitebox/parser/DiagnosticCommand;)[Ljava/lang/Object;",
2834       (void*) &WB_ParseCommandLine
2835   },
2836   {CC"addToBootstrapClassLoaderSearch0", CC"(Ljava/lang/String;)V",
2837                                                       (void*)&WB_AddToBootstrapClassLoaderSearch},
2838   {CC"addToSystemClassLoaderSearch0",    CC"(Ljava/lang/String;)V",
2839                                                       (void*)&WB_AddToSystemClassLoaderSearch},
2840   {CC"getCompressedOopsMaxHeapSize", CC"()J",
2841       (void*)&WB_GetCompressedOopsMaxHeapSize},
2842   {CC"printHeapSizes",     CC"()V",                   (void*)&WB_PrintHeapSizes    },
2843   {CC"readFromNoaccessArea",CC"()V",                  (void*)&WB_ReadFromNoaccessArea},
2844   {CC"stressVirtualSpaceResize",CC"(JJJ)I",           (void*)&WB_StressVirtualSpaceResize},
2845 #if INCLUDE_CDS
2846   {CC"getCDSOffsetForName0", CC"(Ljava/lang/String;)I",  (void*)&WB_GetCDSOffsetForName},
2847   {CC"getCDSConstantForName0", CC"(Ljava/lang/String;)I",  (void*)&WB_GetCDSConstantForName},
2848 #endif
2849 #if INCLUDE_G1GC
2850   {CC"g1InConcurrentMark", CC"()Z",                   (void*)&WB_G1InConcurrentMark},
2851   {CC"g1CompletedConcurrentMarkCycles", CC"()I",      (void*)&WB_G1CompletedConcurrentMarkCycles},
2852   {CC"g1IsHumongous0",      CC"(Ljava/lang/Object;)Z", (void*)&WB_G1IsHumongous     },
2853   {CC"g1BelongsToHumongousRegion0", CC"(J)Z",         (void*)&WB_G1BelongsToHumongousRegion},
2854   {CC"g1BelongsToFreeRegion0", CC"(J)Z",              (void*)&WB_G1BelongsToFreeRegion},
2855   {CC"g1NumMaxRegions",    CC"()J",                   (void*)&WB_G1NumMaxRegions  },
2856   {CC"g1NumFreeRegions",   CC"()J",                   (void*)&WB_G1NumFreeRegions  },
2857   {CC"g1RegionSize",       CC"()I",                   (void*)&WB_G1RegionSize      },
2858   {CC"g1HasRegionsToUncommit",  CC"()Z",              (void*)&WB_G1HasRegionsToUncommit},
2859   {CC"g1AuxiliaryMemoryUsage", CC"()Ljava/lang/management/MemoryUsage;",
2860                                                       (void*)&WB_G1AuxiliaryMemoryUsage  },
2861   {CC"g1ActiveMemoryNodeCount", CC"()I",              (void*)&WB_G1ActiveMemoryNodeCount },
2862   {CC"g1MemoryNodeIds",    CC"()[I",                  (void*)&WB_G1MemoryNodeIds },
2863   {CC"g1GetMixedGCInfo",   CC"(I)[J",                 (void*)&WB_G1GetMixedGCInfo },
2864 #endif // INCLUDE_G1GC
2865 #if INCLUDE_PARALLELGC
2866   {CC"psVirtualSpaceAlignment",CC"()J",               (void*)&WB_PSVirtualSpaceAlignment},
2867   {CC"psHeapGenerationAlignment",CC"()J",             (void*)&WB_PSHeapGenerationAlignment},
2868 #endif
2869   {CC"NMTMalloc",           CC"(J)J",                 (void*)&WB_NMTMalloc          },
2870   {CC"NMTMallocWithPseudoStack", CC"(JI)J",           (void*)&WB_NMTMallocWithPseudoStack},
2871   {CC"NMTMallocWithPseudoStackAndType", CC"(JII)J",   (void*)&WB_NMTMallocWithPseudoStackAndType},
2872   {CC"NMTFree",             CC"(J)V",                 (void*)&WB_NMTFree            },
2873   {CC"NMTReserveMemory",    CC"(J)J",                 (void*)&WB_NMTReserveMemory   },
2874   {CC"NMTAttemptReserveMemoryAt",    CC"(JJ)J",       (void*)&WB_NMTAttemptReserveMemoryAt },
2875   {CC"NMTCommitMemory",     CC"(JJ)V",                (void*)&WB_NMTCommitMemory    },
2876   {CC"NMTUncommitMemory",   CC"(JJ)V",                (void*)&WB_NMTUncommitMemory  },
2877   {CC"NMTReleaseMemory",    CC"(JJ)V",                (void*)&WB_NMTReleaseMemory   },
2878   {CC"NMTGetHashSize",      CC"()I",                  (void*)&WB_NMTGetHashSize     },
2879   {CC"NMTNewArena",         CC"(J)J",                 (void*)&WB_NMTNewArena        },
2880   {CC"NMTFreeArena",        CC"(J)V",                 (void*)&WB_NMTFreeArena       },
2881   {CC"NMTArenaMalloc",      CC"(JJ)V",                (void*)&WB_NMTArenaMalloc     },
2882   {CC"deoptimizeFrames",   CC"(Z)I",                  (void*)&WB_DeoptimizeFrames  },
2883   {CC"isFrameDeoptimized", CC"(I)Z",                  (void*)&WB_IsFrameDeoptimized},
2884   {CC"deoptimizeAll",      CC"()V",                   (void*)&WB_DeoptimizeAll     },
2885   {CC"deoptimizeMethod0",   CC"(Ljava/lang/reflect/Executable;Z)I",
2886                                                       (void*)&WB_DeoptimizeMethod  },
2887   {CC"isMethodCompiled0",   CC"(Ljava/lang/reflect/Executable;Z)Z",
2888                                                       (void*)&WB_IsMethodCompiled  },
2889   {CC"isMethodCompilable0", CC"(Ljava/lang/reflect/Executable;IZ)Z",
2890                                                       (void*)&WB_IsMethodCompilable},
2891   {CC"isMethodQueuedForCompilation0",
2892       CC"(Ljava/lang/reflect/Executable;)Z",          (void*)&WB_IsMethodQueuedForCompilation},
2893   {CC"isIntrinsicAvailable0",
2894       CC"(Ljava/lang/reflect/Executable;Ljava/lang/reflect/Executable;I)Z",
2895                                                       (void*)&WB_IsIntrinsicAvailable},
2896   {CC"makeMethodNotCompilable0",
2897       CC"(Ljava/lang/reflect/Executable;IZ)V",        (void*)&WB_MakeMethodNotCompilable},
2898   {CC"testSetDontInlineMethod0",
2899       CC"(Ljava/lang/reflect/Executable;Z)Z",         (void*)&WB_TestSetDontInlineMethod},
2900   {CC"getMethodCompilationLevel0",
2901       CC"(Ljava/lang/reflect/Executable;Z)I",         (void*)&WB_GetMethodCompilationLevel},
2902   {CC"getMethodDecompileCount0",
2903       CC"(Ljava/lang/reflect/Executable;)I",          (void*)&WB_GetMethodDecompileCount},
2904   {CC"getMethodTrapCount0",
2905       CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)I",
2906                                                       (void*)&WB_GetMethodTrapCount},
2907   {CC"getDeoptCount0",
2908       CC"(Ljava/lang/String;Ljava/lang/String;)I",    (void*)&WB_GetDeoptCount},
2909   {CC"getMethodEntryBci0",
2910       CC"(Ljava/lang/reflect/Executable;)I",          (void*)&WB_GetMethodEntryBci},
2911   {CC"getCompileQueueSize",
2912       CC"(I)I",                                       (void*)&WB_GetCompileQueueSize},
2913   {CC"testSetForceInlineMethod0",
2914       CC"(Ljava/lang/reflect/Executable;Z)Z",         (void*)&WB_TestSetForceInlineMethod},
2915   {CC"enqueueMethodForCompilation0",
2916       CC"(Ljava/lang/reflect/Executable;II)Z",        (void*)&WB_EnqueueMethodForCompilation},
2917   {CC"enqueueInitializerForCompilation0",
2918       CC"(Ljava/lang/Class;I)Z",                      (void*)&WB_EnqueueInitializerForCompilation},
2919   {CC"markMethodProfiled",
2920       CC"(Ljava/lang/reflect/Executable;)V",          (void*)&WB_MarkMethodProfiled},
2921   {CC"clearMethodState0",
2922       CC"(Ljava/lang/reflect/Executable;)V",          (void*)&WB_ClearMethodState},
2923   {CC"lockCompilation",    CC"()V",                   (void*)&WB_LockCompilation},
2924   {CC"unlockCompilation",  CC"()V",                   (void*)&WB_UnlockCompilation},
2925   {CC"matchesMethod",
2926       CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)I",
2927                                                       (void*)&WB_MatchesMethod},
2928   {CC"matchesInline",
2929       CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)I",
2930                                                       (void*)&WB_MatchesInline},
2931   {CC"shouldPrintAssembly",
2932         CC"(Ljava/lang/reflect/Executable;I)Z",
2933                                                         (void*)&WB_ShouldPrintAssembly},
2934 
2935   {CC"isConstantVMFlag",   CC"(Ljava/lang/String;)Z", (void*)&WB_IsConstantVMFlag},
2936   {CC"isDefaultVMFlag",    CC"(Ljava/lang/String;)Z", (void*)&WB_IsDefaultVMFlag},
2937   {CC"isLockedVMFlag",     CC"(Ljava/lang/String;)Z", (void*)&WB_IsLockedVMFlag},
2938   {CC"setBooleanVMFlag",   CC"(Ljava/lang/String;Z)V",(void*)&WB_SetBooleanVMFlag},
2939   {CC"setIntVMFlag",       CC"(Ljava/lang/String;J)V",(void*)&WB_SetIntVMFlag},
2940   {CC"setUintVMFlag",      CC"(Ljava/lang/String;J)V",(void*)&WB_SetUintVMFlag},
2941   {CC"setIntxVMFlag",      CC"(Ljava/lang/String;J)V",(void*)&WB_SetIntxVMFlag},
2942   {CC"setUintxVMFlag",     CC"(Ljava/lang/String;J)V",(void*)&WB_SetUintxVMFlag},
2943   {CC"setUint64VMFlag",    CC"(Ljava/lang/String;J)V",(void*)&WB_SetUint64VMFlag},
2944   {CC"setSizeTVMFlag",     CC"(Ljava/lang/String;J)V",(void*)&WB_SetSizeTVMFlag},
2945   {CC"setDoubleVMFlag",    CC"(Ljava/lang/String;D)V",(void*)&WB_SetDoubleVMFlag},
2946   {CC"setStringVMFlag",    CC"(Ljava/lang/String;Ljava/lang/String;)V",
2947                                                       (void*)&WB_SetStringVMFlag},
2948   {CC"getBooleanVMFlag",   CC"(Ljava/lang/String;)Ljava/lang/Boolean;",
2949                                                       (void*)&WB_GetBooleanVMFlag},
2950   {CC"getIntVMFlag",       CC"(Ljava/lang/String;)Ljava/lang/Long;",
2951                                                       (void*)&WB_GetIntVMFlag},
2952   {CC"getUintVMFlag",      CC"(Ljava/lang/String;)Ljava/lang/Long;",
2953                                                       (void*)&WB_GetUintVMFlag},
2954   {CC"getIntxVMFlag",      CC"(Ljava/lang/String;)Ljava/lang/Long;",
2955                                                       (void*)&WB_GetIntxVMFlag},
2956   {CC"getUintxVMFlag",     CC"(Ljava/lang/String;)Ljava/lang/Long;",
2957                                                       (void*)&WB_GetUintxVMFlag},
2958   {CC"getUint64VMFlag",    CC"(Ljava/lang/String;)Ljava/lang/Long;",
2959                                                       (void*)&WB_GetUint64VMFlag},
2960   {CC"getSizeTVMFlag",     CC"(Ljava/lang/String;)Ljava/lang/Long;",
2961                                                       (void*)&WB_GetSizeTVMFlag},
2962   {CC"getDoubleVMFlag",    CC"(Ljava/lang/String;)Ljava/lang/Double;",
2963                                                       (void*)&WB_GetDoubleVMFlag},
2964   {CC"getStringVMFlag",    CC"(Ljava/lang/String;)Ljava/lang/String;",
2965                                                       (void*)&WB_GetStringVMFlag},
2966   {CC"isInStringTable",    CC"(Ljava/lang/String;)Z", (void*)&WB_IsInStringTable  },
2967   {CC"fullGC",   CC"()V",                             (void*)&WB_FullGC },
2968   {CC"youngGC",  CC"()V",                             (void*)&WB_YoungGC },
2969   {CC"readReservedMemory", CC"()V",                   (void*)&WB_ReadReservedMemory },
2970   {CC"allocateMetaspace",
2971      CC"(Ljava/lang/ClassLoader;J)J",                 (void*)&WB_AllocateMetaspace },
2972   {CC"incMetaspaceCapacityUntilGC", CC"(J)J",         (void*)&WB_IncMetaspaceCapacityUntilGC },
2973   {CC"metaspaceCapacityUntilGC", CC"()J",             (void*)&WB_MetaspaceCapacityUntilGC },
2974   {CC"metaspaceSharedRegionAlignment", CC"()J",       (void*)&WB_MetaspaceSharedRegionAlignment },
2975   {CC"getCPUFeatures",     CC"()Ljava/lang/String;",  (void*)&WB_GetCPUFeatures     },
2976   {CC"getNMethod0",         CC"(Ljava/lang/reflect/Executable;Z)[Ljava/lang/Object;",
2977                                                       (void*)&WB_GetNMethod         },
2978   {CC"allocateCodeBlob",   CC"(II)J",                 (void*)&WB_AllocateCodeBlob   },
2979   {CC"freeCodeBlob",       CC"(J)V",                  (void*)&WB_FreeCodeBlob       },
2980   {CC"getCodeHeapEntries", CC"(I)[Ljava/lang/Object;",(void*)&WB_GetCodeHeapEntries },
2981   {CC"getCompilationActivityMode",
2982                            CC"()I",                   (void*)&WB_GetCompilationActivityMode},
2983   {CC"getMethodData0",     CC"(Ljava/lang/reflect/Executable;)J",
2984                                                       (void*)&WB_GetMethodData      },
2985   {CC"getCodeBlob",        CC"(J)[Ljava/lang/Object;",(void*)&WB_GetCodeBlob        },
2986   {CC"getThreadStackSize", CC"()J",                   (void*)&WB_GetThreadStackSize },
2987   {CC"getThreadRemainingStackSize", CC"()J",          (void*)&WB_GetThreadRemainingStackSize },
2988   {CC"DefineModule",       CC"(Ljava/lang/Object;ZLjava/lang/String;Ljava/lang/String;[Ljava/lang/Object;)V",
2989                                                       (void*)&WB_DefineModule },
2990   {CC"AddModuleExports",   CC"(Ljava/lang/Object;Ljava/lang/String;Ljava/lang/Object;)V",
2991                                                       (void*)&WB_AddModuleExports },
2992   {CC"AddReadsModule",     CC"(Ljava/lang/Object;Ljava/lang/Object;)V",
2993                                                       (void*)&WB_AddReadsModule },
2994   {CC"AddModuleExportsToAllUnnamed", CC"(Ljava/lang/Object;Ljava/lang/String;)V",
2995                                                       (void*)&WB_AddModuleExportsToAllUnnamed },
2996   {CC"AddModuleExportsToAll", CC"(Ljava/lang/Object;Ljava/lang/String;)V",
2997                                                       (void*)&WB_AddModuleExportsToAll },
2998   {CC"deflateIdleMonitors", CC"()Z",                  (void*)&WB_DeflateIdleMonitors },
2999   {CC"isMonitorInflated0", CC"(Ljava/lang/Object;)Z", (void*)&WB_IsMonitorInflated  },
3000   {CC"getInUseMonitorCount", CC"()J", (void*)&WB_getInUseMonitorCount  },
3001   {CC"getLockStackCapacity", CC"()I",                 (void*)&WB_getLockStackCapacity },
3002   {CC"supportsRecursiveLightweightLocking", CC"()Z",  (void*)&WB_supportsRecursiveLightweightLocking },
3003   {CC"forceSafepoint",     CC"()V",                   (void*)&WB_ForceSafepoint     },
3004   {CC"forceClassLoaderStatsSafepoint", CC"()V",       (void*)&WB_ForceClassLoaderStatsSafepoint },
3005   {CC"getConstantPool0",   CC"(Ljava/lang/Class;)J",  (void*)&WB_GetConstantPool    },
3006   {CC"getResolvedReferences0", CC"(Ljava/lang/Class;)[Ljava/lang/Object;", (void*)&WB_GetResolvedReferences},
3007   {CC"getObjectsViaKlassOopMaps0",
3008       CC"(Ljava/lang/Object;)[Ljava/lang/Object;",    (void*)&WB_getObjectsViaKlassOopMaps},
3009   {CC"getObjectsViaOopIterator0",
3010           CC"(Ljava/lang/Object;)[Ljava/lang/Object;",(void*)&WB_getObjectsViaOopIterator},
3011   {CC"getObjectsViaFrameOopIterator",
3012       CC"(I)[Ljava/lang/Object;",                     (void*)&WB_getObjectsViaFrameOopIterator},
3013   {CC"getFieldEntriesLength0", CC"(Ljava/lang/Class;)I",  (void*)&WB_getFieldEntriesLength},
3014   {CC"getFieldCPIndex0",    CC"(Ljava/lang/Class;I)I", (void*)&WB_getFieldCPIndex},
3015   {CC"getMethodEntriesLength0", CC"(Ljava/lang/Class;)I",  (void*)&WB_getMethodEntriesLength},
3016   {CC"getMethodCPIndex0",    CC"(Ljava/lang/Class;I)I", (void*)&WB_getMethodCPIndex},
3017   {CC"getIndyInfoLength0", CC"(Ljava/lang/Class;)I",  (void*)&WB_getIndyInfoLength},
3018   {CC"getIndyCPIndex0",    CC"(Ljava/lang/Class;I)I", (void*)&WB_getIndyCPIndex},
3019   {CC"printClasses0",      CC"(Ljava/lang/String;I)Ljava/lang/String;", (void*)&WB_printClasses},
3020   {CC"printMethods0",      CC"(Ljava/lang/String;Ljava/lang/String;I)Ljava/lang/String;", (void*)&WB_printMethods},
3021   {CC"getMethodBooleanOption",
3022       CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/Boolean;",
3023                                                       (void*)&WB_GetMethodBooleaneOption},
3024   {CC"getMethodIntxOption",
3025       CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/Long;",
3026                                                       (void*)&WB_GetMethodIntxOption},
3027   {CC"getMethodUintxOption",
3028       CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/Long;",
3029                                                       (void*)&WB_GetMethodUintxOption},
3030   {CC"getMethodDoubleOption",
3031       CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/Double;",
3032                                                       (void*)&WB_GetMethodDoubleOption},
3033   {CC"getMethodStringOption",
3034       CC"(Ljava/lang/reflect/Executable;Ljava/lang/String;)Ljava/lang/String;",
3035                                                       (void*)&WB_GetMethodStringOption},
3036   {CC"getDefaultArchivePath",             CC"()Ljava/lang/String;",
3037                                                       (void*)&WB_GetDefaultArchivePath},
3038   {CC"getCDSGenericHeaderMinVersion",     CC"()I",    (void*)&WB_GetCDSGenericHeaderMinVersion},
3039   {CC"getCurrentCDSVersion",              CC"()I",    (void*)&WB_GetCDSCurrentVersion},
3040   {CC"isSharingEnabled",   CC"()Z",                   (void*)&WB_IsSharingEnabled},
3041   {CC"isSharedInternedString", CC"(Ljava/lang/String;)Z", (void*)&WB_IsSharedInternedString },
3042   {CC"isSharedClass",      CC"(Ljava/lang/Class;)Z",  (void*)&WB_IsSharedClass },
3043   {CC"areSharedStringsMapped",            CC"()Z",    (void*)&WB_AreSharedStringsMapped },
3044   {CC"linkClass",          CC"(Ljava/lang/Class;)V",  (void*)&WB_LinkClass},
3045   {CC"areOpenArchiveHeapObjectsMapped",   CC"()Z",    (void*)&WB_AreOpenArchiveHeapObjectsMapped},
3046   {CC"isCDSIncluded",                     CC"()Z",    (void*)&WB_IsCDSIncluded },
3047   {CC"isJFRIncluded",                     CC"()Z",    (void*)&WB_IsJFRIncluded },
3048   {CC"isDTraceIncluded",                  CC"()Z",    (void*)&WB_IsDTraceIncluded },
3049   {CC"hasLibgraal",                       CC"()Z",    (void*)&WB_HasLibgraal },
3050   {CC"isC2OrJVMCIIncluded",               CC"()Z",    (void*)&WB_isC2OrJVMCIIncluded },
3051   {CC"isJVMCISupportedByGC",              CC"()Z",    (void*)&WB_IsJVMCISupportedByGC},
3052   {CC"canWriteJavaHeapArchive",           CC"()Z",    (void*)&WB_CanWriteJavaHeapArchive },
3053   {CC"cdsMemoryMappingFailed",            CC"()Z",    (void*)&WB_CDSMemoryMappingFailed },
3054 
3055   {CC"clearInlineCaches0",  CC"(Z)V",                 (void*)&WB_ClearInlineCaches },
3056   {CC"handshakeReadMonitors", CC"(Ljava/lang/Thread;)Z", (void*)&WB_HandshakeReadMonitors },
3057   {CC"handshakeWalkStack", CC"(Ljava/lang/Thread;Z)I", (void*)&WB_HandshakeWalkStack },
3058   {CC"asyncHandshakeWalkStack", CC"(Ljava/lang/Thread;)V", (void*)&WB_AsyncHandshakeWalkStack },
3059   {CC"lockAndBlock", CC"(Z)V",                        (void*)&WB_LockAndBlock},
3060   {CC"checkThreadObjOfTerminatingThread", CC"(Ljava/lang/Thread;)V", (void*)&WB_CheckThreadObjOfTerminatingThread },
3061   {CC"verifyFrames",                CC"(ZZ)V",            (void*)&WB_VerifyFrames },
3062   {CC"addCompilerDirective",    CC"(Ljava/lang/String;)I",
3063                                                       (void*)&WB_AddCompilerDirective },
3064   {CC"removeCompilerDirective",   CC"(I)V",           (void*)&WB_RemoveCompilerDirective },
3065   {CC"isGCSupported",             CC"(I)Z",           (void*)&WB_IsGCSupported},
3066   {CC"isGCSupportedByJVMCICompiler", CC"(I)Z",        (void*)&WB_IsGCSupportedByJVMCICompiler},
3067   {CC"isGCSelected",              CC"(I)Z",           (void*)&WB_IsGCSelected},
3068   {CC"isGCSelectedErgonomically", CC"()Z",            (void*)&WB_IsGCSelectedErgonomically},
3069   {CC"supportsConcurrentGCBreakpoints", CC"()Z",      (void*)&WB_SupportsConcurrentGCBreakpoints},
3070   {CC"concurrentGCAcquireControl0", CC"()V",          (void*)&WB_ConcurrentGCAcquireControl},
3071   {CC"concurrentGCReleaseControl0", CC"()V",          (void*)&WB_ConcurrentGCReleaseControl},
3072   {CC"concurrentGCRunToIdle0",    CC"()V",            (void*)&WB_ConcurrentGCRunToIdle},
3073   {CC"concurrentGCRunTo0",        CC"(Ljava/lang/String;)Z",
3074                                                       (void*)&WB_ConcurrentGCRunTo},
3075   {CC"checkLibSpecifiesNoexecstack", CC"(Ljava/lang/String;)Z",
3076                                                       (void*)&WB_CheckLibSpecifiesNoexecstack},
3077   {CC"isContainerized",           CC"()Z",            (void*)&WB_IsContainerized },
3078   {CC"validateCgroup",
3079       CC"(Ljava/lang/String;Ljava/lang/String;Ljava/lang/String;)I",
3080                                                       (void*)&WB_ValidateCgroup },
3081   {CC"hostPhysicalMemory",        CC"()J",            (void*)&WB_HostPhysicalMemory },
3082   {CC"hostPhysicalSwap",          CC"()J",            (void*)&WB_HostPhysicalSwap },
3083   {CC"hostCPUs",                  CC"()I",            (void*)&WB_HostCPUs },
3084   {CC"printOsInfo",               CC"()V",            (void*)&WB_PrintOsInfo },
3085   {CC"disableElfSectionCache",    CC"()V",            (void*)&WB_DisableElfSectionCache },
3086   {CC"resolvedMethodItemsCount",  CC"()J",            (void*)&WB_ResolvedMethodItemsCount },
3087   {CC"getKlassMetadataSize", CC"(Ljava/lang/Class;)I",(void*)&WB_GetKlassMetadataSize},
3088 
3089   {CC"createMetaspaceTestContext", CC"(JJ)J",         (void*)&WB_CreateMetaspaceTestContext},
3090   {CC"destroyMetaspaceTestContext", CC"(J)V",         (void*)&WB_DestroyMetaspaceTestContext},
3091   {CC"purgeMetaspaceTestContext", CC"(J)V",           (void*)&WB_PurgeMetaspaceTestContext},
3092   {CC"printMetaspaceTestContext", CC"(J)V",           (void*)&WB_PrintMetaspaceTestContext},
3093   {CC"getTotalCommittedBytesInMetaspaceTestContext", CC"(J)J",(void*)&WB_GetTotalCommittedBytesInMetaspaceTestContext},
3094   {CC"getTotalUsedBytesInMetaspaceTestContext", CC"(J)J", (void*)&WB_GetTotalUsedBytesInMetaspaceTestContext},
3095   {CC"createArenaInTestContext", CC"(JZ)J",           (void*)&WB_CreateArenaInTestContext},
3096   {CC"destroyMetaspaceTestArena", CC"(J)V",           (void*)&WB_DestroyMetaspaceTestArena},
3097   {CC"allocateFromMetaspaceTestArena", CC"(JJ)J",     (void*)&WB_AllocateFromMetaspaceTestArena},
3098   {CC"deallocateToMetaspaceTestArena", CC"(JJJ)V",    (void*)&WB_DeallocateToMetaspaceTestArena},
3099   {CC"maxMetaspaceAllocationSize", CC"()J",           (void*)&WB_GetMaxMetaspaceAllocationSize},
3100 
3101   {CC"isJVMTIIncluded", CC"()Z",                      (void*)&WB_IsJVMTIIncluded},
3102   {CC"waitUnsafe", CC"(I)V",                          (void*)&WB_WaitUnsafe},
3103   {CC"getLibcName",     CC"()Ljava/lang/String;",     (void*)&WB_GetLibcName},
3104 
3105   {CC"pinObject",       CC"(Ljava/lang/Object;)V",    (void*)&WB_PinObject},
3106   {CC"unpinObject",     CC"(Ljava/lang/Object;)V",    (void*)&WB_UnpinObject},
3107   {CC"setVirtualThreadsNotifyJvmtiMode", CC"(Z)Z",    (void*)&WB_SetVirtualThreadsNotifyJvmtiMode},
3108   {CC"preTouchMemory",  CC"(JJ)V",                    (void*)&WB_PreTouchMemory},
3109   {CC"cleanMetaspaces", CC"()V",                      (void*)&WB_CleanMetaspaces},
3110   {CC"rss", CC"()J",                                  (void*)&WB_Rss},
3111   {CC"printString", CC"(Ljava/lang/String;I)Ljava/lang/String;", (void*)&WB_PrintString},
3112   {CC"lockAndStuckInSafepoint", CC"()V", (void*)&WB_TakeLockAndHangInSafepoint},
3113   {CC"wordSize", CC"()J",                             (void*)&WB_WordSize},
3114   {CC"rootChunkWordSize", CC"()J",                    (void*)&WB_RootChunkWordSize},
3115   {CC"isStatic", CC"()Z",                             (void*)&WB_IsStaticallyLinked}
3116 };
3117 
3118 
3119 #undef CC
3120 
3121 JVM_ENTRY(void, JVM_RegisterWhiteBoxMethods(JNIEnv* env, jclass wbclass))
3122   {
3123     if (WhiteBoxAPI) {
3124       // Make sure that wbclass is loaded by the null classloader
3125       InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(wbclass)));
3126       Handle loader(THREAD, ik->class_loader());
3127       if (loader.is_null()) {
3128         WhiteBox::register_methods(env, wbclass, thread, methods, sizeof(methods) / sizeof(methods[0]));
3129         WhiteBox::set_used();
3130       }
3131     }
3132   }
3133 JVM_END