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