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