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