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