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