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