1 /*
   2  * Copyright (c) 2012, 2014, 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 
  27 #include "code/codeCache.hpp"
  28 #include "memory/metadataFactory.hpp"
  29 #include "memory/universe.hpp"
  30 #include "oops/oop.inline.hpp"
  31 
  32 #include "classfile/stringTable.hpp"
  33 #include "classfile/classLoaderData.hpp"
  34 
  35 #include "prims/whitebox.hpp"
  36 #include "prims/wbtestmethods/parserTests.hpp"
  37 
  38 #include "runtime/thread.hpp"
  39 #include "runtime/arguments.hpp"
  40 #include "runtime/interfaceSupport.hpp"
  41 #include "runtime/os.hpp"
  42 #include "runtime/vm_version.hpp"
  43 
  44 #include "utilities/array.hpp"
  45 #include "utilities/debug.hpp"
  46 #include "utilities/macros.hpp"
  47 #include "utilities/exceptions.hpp"
  48 
  49 #if INCLUDE_ALL_GCS
  50 #include "gc_implementation/parallelScavenge/parallelScavengeHeap.inline.hpp"
  51 #include "gc_implementation/g1/concurrentMark.hpp"
  52 #include "gc_implementation/g1/g1CollectedHeap.inline.hpp"
  53 #include "gc_implementation/g1/heapRegionRemSet.hpp"
  54 #endif // INCLUDE_ALL_GCS
  55 
  56 #if INCLUDE_NMT
  57 #include "services/mallocSiteTable.hpp"
  58 #include "services/memTracker.hpp"
  59 #include "utilities/nativeCallStack.hpp"
  60 #endif // INCLUDE_NMT
  61 
  62 #include "compiler/compileBroker.hpp"
  63 #include "runtime/compilationPolicy.hpp"
  64 
  65 PRAGMA_FORMAT_MUTE_WARNINGS_FOR_GCC
  66 
  67 #define SIZE_T_MAX_VALUE ((size_t) -1)
  68 
  69 bool WhiteBox::_used = false;
  70 
  71 WB_ENTRY(jlong, WB_GetObjectAddress(JNIEnv* env, jobject o, jobject obj))
  72   return (jlong)(void*)JNIHandles::resolve(obj);
  73 WB_END
  74 
  75 WB_ENTRY(jint, WB_GetHeapOopSize(JNIEnv* env, jobject o))
  76   return heapOopSize;
  77 WB_END
  78 
  79 
  80 class WBIsKlassAliveClosure : public KlassClosure {
  81     Symbol* _name;
  82     bool _found;
  83 public:
  84     WBIsKlassAliveClosure(Symbol* name) : _name(name), _found(false) {}
  85 
  86     void do_klass(Klass* k) {
  87       if (_found) return;
  88       Symbol* ksym = k->name();
  89       if (ksym->fast_compare(_name) == 0) {
  90         _found = true;
  91       }
  92     }
  93 
  94     bool found() const {
  95         return _found;
  96     }
  97 };
  98 
  99 WB_ENTRY(jboolean, WB_IsClassAlive(JNIEnv* env, jobject target, jstring name))
 100   Handle h_name = JNIHandles::resolve(name);
 101   if (h_name.is_null()) return false;
 102   Symbol* sym = java_lang_String::as_symbol(h_name, CHECK_false);
 103   TempNewSymbol tsym(sym); // Make sure to decrement reference count on sym on return
 104 
 105   WBIsKlassAliveClosure closure(sym);
 106   ClassLoaderDataGraph::classes_do(&closure);
 107 
 108   return closure.found();
 109 WB_END
 110 
 111 WB_ENTRY(jlong, WB_GetCompressedOopsMaxHeapSize(JNIEnv* env, jobject o)) {
 112   return (jlong)Arguments::max_heap_for_compressed_oops();
 113 }
 114 WB_END
 115 
 116 WB_ENTRY(void, WB_PrintHeapSizes(JNIEnv* env, jobject o)) {
 117   CollectorPolicy * p = Universe::heap()->collector_policy();
 118   gclog_or_tty->print_cr("Minimum heap "SIZE_FORMAT" Initial heap "
 119     SIZE_FORMAT" Maximum heap "SIZE_FORMAT" Space alignment "SIZE_FORMAT" Heap alignment "SIZE_FORMAT,
 120     p->min_heap_byte_size(), p->initial_heap_byte_size(), p->max_heap_byte_size(),
 121     p->space_alignment(), p->heap_alignment());
 122 }
 123 WB_END
 124 
 125 #ifndef PRODUCT
 126 // Forward declaration
 127 void TestReservedSpace_test();
 128 void TestReserveMemorySpecial_test();
 129 void TestVirtualSpace_test();
 130 void TestMetaspaceAux_test();
 131 #endif
 132 
 133 WB_ENTRY(void, WB_RunMemoryUnitTests(JNIEnv* env, jobject o))
 134 #ifndef PRODUCT
 135   TestReservedSpace_test();
 136   TestReserveMemorySpecial_test();
 137   TestVirtualSpace_test();
 138   TestMetaspaceAux_test();
 139 #endif
 140 WB_END
 141 
 142 WB_ENTRY(void, WB_ReadFromNoaccessArea(JNIEnv* env, jobject o))
 143   size_t granularity = os::vm_allocation_granularity();
 144   ReservedHeapSpace rhs(100 * granularity, granularity, false, NULL);
 145   VirtualSpace vs;
 146   vs.initialize(rhs, 50 * granularity);
 147 
 148   //Check if constraints are complied
 149   if (!( UseCompressedOops && rhs.base() != NULL &&
 150          Universe::narrow_oop_base() != NULL &&
 151          Universe::narrow_oop_use_implicit_null_checks() )) {
 152     tty->print_cr("WB_ReadFromNoaccessArea method is useless:\n "
 153                   "\tUseCompressedOops is %d\n"
 154                   "\trhs.base() is "PTR_FORMAT"\n"
 155                   "\tUniverse::narrow_oop_base() is "PTR_FORMAT"\n"
 156                   "\tUniverse::narrow_oop_use_implicit_null_checks() is %d",
 157                   UseCompressedOops,
 158                   rhs.base(),
 159                   Universe::narrow_oop_base(),
 160                   Universe::narrow_oop_use_implicit_null_checks());
 161     return;
 162   }
 163   tty->print_cr("Reading from no access area... ");
 164   tty->print_cr("*(vs.low_boundary() - rhs.noaccess_prefix() / 2 ) = %c",
 165                 *(vs.low_boundary() - rhs.noaccess_prefix() / 2 ));
 166 WB_END
 167 
 168 static jint wb_stress_virtual_space_resize(size_t reserved_space_size,
 169                                            size_t magnitude, size_t iterations) {
 170   size_t granularity = os::vm_allocation_granularity();
 171   ReservedHeapSpace rhs(reserved_space_size * granularity, granularity, false, NULL);
 172   VirtualSpace vs;
 173   if (!vs.initialize(rhs, 0)) {
 174     tty->print_cr("Failed to initialize VirtualSpace. Can't proceed.");
 175     return 3;
 176   }
 177 
 178   long seed = os::random();
 179   tty->print_cr("Random seed is %ld", seed);
 180   os::init_random(seed);
 181 
 182   for (size_t i = 0; i < iterations; i++) {
 183 
 184     // Whether we will shrink or grow
 185     bool shrink = os::random() % 2L == 0;
 186 
 187     // Get random delta to resize virtual space
 188     size_t delta = (size_t)os::random() % magnitude;
 189 
 190     // If we are about to shrink virtual space below zero, then expand instead
 191     if (shrink && vs.committed_size() < delta) {
 192       shrink = false;
 193     }
 194 
 195     // Resizing by delta
 196     if (shrink) {
 197       vs.shrink_by(delta);
 198     } else {
 199       // If expanding fails expand_by will silently return false
 200       vs.expand_by(delta, true);
 201     }
 202   }
 203   return 0;
 204 }
 205 
 206 WB_ENTRY(jint, WB_StressVirtualSpaceResize(JNIEnv* env, jobject o,
 207         jlong reserved_space_size, jlong magnitude, jlong iterations))
 208   tty->print_cr("reservedSpaceSize="JLONG_FORMAT", magnitude="JLONG_FORMAT", "
 209                 "iterations="JLONG_FORMAT"\n", reserved_space_size, magnitude,
 210                 iterations);
 211   if (reserved_space_size < 0 || magnitude < 0 || iterations < 0) {
 212     tty->print_cr("One of variables printed above is negative. Can't proceed.\n");
 213     return 1;
 214   }
 215 
 216   // sizeof(size_t) depends on whether OS is 32bit or 64bit. sizeof(jlong) is
 217   // always 8 byte. That's why we should avoid overflow in case of 32bit platform.
 218   if (sizeof(size_t) < sizeof(jlong)) {
 219     jlong size_t_max_value = (jlong) SIZE_T_MAX_VALUE;
 220     if (reserved_space_size > size_t_max_value || magnitude > size_t_max_value
 221         || iterations > size_t_max_value) {
 222       tty->print_cr("One of variables printed above overflows size_t. Can't proceed.\n");
 223       return 2;
 224     }
 225   }
 226 
 227   return wb_stress_virtual_space_resize((size_t) reserved_space_size,
 228                                         (size_t) magnitude, (size_t) iterations);
 229 WB_END
 230 
 231 WB_ENTRY(jboolean, WB_isObjectInOldGen(JNIEnv* env, jobject o, jobject obj))
 232   oop p = JNIHandles::resolve(obj);
 233 #if INCLUDE_ALL_GCS
 234   if (UseG1GC) {
 235     G1CollectedHeap* g1 = G1CollectedHeap::heap();
 236     const HeapRegion* hr = g1->heap_region_containing(p);
 237     if (hr == NULL) {
 238       return false;
 239     }
 240     return !(hr->is_young());
 241   } else if (UseParallelGC) {
 242     ParallelScavengeHeap* psh = ParallelScavengeHeap::heap();
 243     return !psh->is_in_young(p);
 244   }
 245 #endif // INCLUDE_ALL_GCS
 246   GenCollectedHeap* gch = GenCollectedHeap::heap();
 247   return !gch->is_in_young(p);
 248 WB_END
 249 
 250 WB_ENTRY(jlong, WB_GetObjectSize(JNIEnv* env, jobject o, jobject obj))
 251   oop p = JNIHandles::resolve(obj);
 252   return p->size() * HeapWordSize;
 253 WB_END
 254 
 255 #if INCLUDE_ALL_GCS
 256 WB_ENTRY(jboolean, WB_G1IsHumongous(JNIEnv* env, jobject o, jobject obj))
 257   G1CollectedHeap* g1 = G1CollectedHeap::heap();
 258   oop result = JNIHandles::resolve(obj);
 259   const HeapRegion* hr = g1->heap_region_containing(result);
 260   return hr->is_humongous();
 261 WB_END
 262 
 263 WB_ENTRY(jlong, WB_G1NumFreeRegions(JNIEnv* env, jobject o))
 264   G1CollectedHeap* g1 = G1CollectedHeap::heap();
 265   size_t nr = g1->num_free_regions();
 266   return (jlong)nr;
 267 WB_END
 268 
 269 WB_ENTRY(jboolean, WB_G1InConcurrentMark(JNIEnv* env, jobject o))
 270   G1CollectedHeap* g1 = G1CollectedHeap::heap();
 271   ConcurrentMark* cm = g1->concurrent_mark();
 272   return cm->concurrent_marking_in_progress();
 273 WB_END
 274 
 275 WB_ENTRY(jint, WB_G1RegionSize(JNIEnv* env, jobject o))
 276   return (jint)HeapRegion::GrainBytes;
 277 WB_END
 278 #endif // INCLUDE_ALL_GCS
 279 
 280 #if INCLUDE_NMT
 281 // Alloc memory using the test memory type so that we can use that to see if
 282 // NMT picks it up correctly
 283 WB_ENTRY(jlong, WB_NMTMalloc(JNIEnv* env, jobject o, jlong size))
 284   jlong addr = 0;
 285     addr = (jlong)(uintptr_t)os::malloc(size, mtTest);
 286   return addr;
 287 WB_END
 288 
 289 // Alloc memory with pseudo call stack. The test can create psudo malloc
 290 // allocation site to stress the malloc tracking.
 291 WB_ENTRY(jlong, WB_NMTMallocWithPseudoStack(JNIEnv* env, jobject o, jlong size, jint pseudo_stack))
 292   address pc = (address)(size_t)pseudo_stack;
 293   NativeCallStack stack(&pc, 1);
 294   return (jlong)os::malloc(size, mtTest, stack);
 295 WB_END
 296 
 297 // Free the memory allocated by NMTAllocTest
 298 WB_ENTRY(void, WB_NMTFree(JNIEnv* env, jobject o, jlong mem))
 299   os::free((void*)(uintptr_t)mem, mtTest);
 300 WB_END
 301 
 302 WB_ENTRY(jlong, WB_NMTReserveMemory(JNIEnv* env, jobject o, jlong size))
 303   jlong addr = 0;
 304 
 305     addr = (jlong)(uintptr_t)os::reserve_memory(size);
 306     MemTracker::record_virtual_memory_type((address)addr, mtTest);
 307 
 308   return addr;
 309 WB_END
 310 
 311 
 312 WB_ENTRY(void, WB_NMTCommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size))
 313   os::commit_memory((char *)(uintptr_t)addr, size, !ExecMem);
 314   MemTracker::record_virtual_memory_type((address)(uintptr_t)addr, mtTest);
 315 WB_END
 316 
 317 WB_ENTRY(void, WB_NMTUncommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size))
 318   os::uncommit_memory((char *)(uintptr_t)addr, size);
 319 WB_END
 320 
 321 WB_ENTRY(void, WB_NMTReleaseMemory(JNIEnv* env, jobject o, jlong addr, jlong size))
 322   os::release_memory((char *)(uintptr_t)addr, size);
 323 WB_END
 324 
 325 WB_ENTRY(jboolean, WB_NMTIsDetailSupported(JNIEnv* env))
 326   return MemTracker::tracking_level() == NMT_detail;
 327 WB_END
 328 
 329 WB_ENTRY(void, WB_NMTOverflowHashBucket(JNIEnv* env, jobject o, jlong num))
 330   address pc = (address)1;
 331   for (jlong index = 0; index < num; index ++) {
 332     NativeCallStack stack(&pc, 1);
 333     os::malloc(0, mtTest, stack);
 334     pc += MallocSiteTable::hash_buckets();
 335   }
 336 WB_END
 337 
 338 
 339 #endif // INCLUDE_NMT
 340 
 341 static jmethodID reflected_method_to_jmid(JavaThread* thread, JNIEnv* env, jobject method) {
 342   assert(method != NULL, "method should not be null");
 343   ThreadToNativeFromVM ttn(thread);
 344   return env->FromReflectedMethod(method);
 345 }
 346 
 347 WB_ENTRY(void, WB_DeoptimizeAll(JNIEnv* env, jobject o))
 348   MutexLockerEx mu(Compile_lock);
 349   CodeCache::mark_all_nmethods_for_deoptimization();
 350   VM_Deoptimize op;
 351   VMThread::execute(&op);
 352 WB_END
 353 
 354 WB_ENTRY(jint, WB_DeoptimizeMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
 355   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 356   int result = 0;
 357   CHECK_JNI_EXCEPTION_(env, result);
 358   MutexLockerEx mu(Compile_lock);
 359   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 360   nmethod* code;
 361   if (is_osr) {
 362     int bci = InvocationEntryBci;
 363     while ((code = mh->lookup_osr_nmethod_for(bci, CompLevel_none, false)) != NULL) {
 364       code->mark_for_deoptimization();
 365       ++result;
 366       bci = code->osr_entry_bci() + 1;
 367     }
 368   } else {
 369     code = mh->code();
 370   }
 371   if (code != NULL) {
 372     code->mark_for_deoptimization();
 373     ++result;
 374   }
 375   result += CodeCache::mark_for_deoptimization(mh());
 376   if (result > 0) {
 377     VM_Deoptimize op;
 378     VMThread::execute(&op);
 379   }
 380   return result;
 381 WB_END
 382 
 383 WB_ENTRY(jboolean, WB_IsMethodCompiled(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
 384   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 385   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 386   MutexLockerEx mu(Compile_lock);
 387   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 388   nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code();
 389   if (code == NULL) {
 390     return JNI_FALSE;
 391   }
 392   return (code->is_alive() && !code->is_marked_for_deoptimization());
 393 WB_END
 394 
 395 WB_ENTRY(jboolean, WB_IsMethodCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr))
 396   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 397   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 398   MutexLockerEx mu(Compile_lock);
 399   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 400   if (is_osr) {
 401     return CompilationPolicy::can_be_osr_compiled(mh, comp_level);
 402   } else {
 403     return CompilationPolicy::can_be_compiled(mh, comp_level);
 404   }
 405 WB_END
 406 
 407 WB_ENTRY(jboolean, WB_IsMethodQueuedForCompilation(JNIEnv* env, jobject o, jobject method))
 408   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 409   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 410   MutexLockerEx mu(Compile_lock);
 411   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 412   return mh->queued_for_compilation();
 413 WB_END
 414 
 415 WB_ENTRY(jint, WB_GetMethodCompilationLevel(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
 416   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 417   CHECK_JNI_EXCEPTION_(env, CompLevel_none);
 418   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 419   nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code();
 420   return (code != NULL ? code->comp_level() : CompLevel_none);
 421 WB_END
 422 
 423 WB_ENTRY(void, WB_MakeMethodNotCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr))
 424   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 425   CHECK_JNI_EXCEPTION(env);
 426   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 427   if (is_osr) {
 428     mh->set_not_osr_compilable(comp_level, true /* report */, "WhiteBox");
 429   } else {
 430     mh->set_not_compilable(comp_level, true /* report */, "WhiteBox");
 431   }
 432 WB_END
 433 
 434 WB_ENTRY(jint, WB_GetMethodEntryBci(JNIEnv* env, jobject o, jobject method))
 435   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 436   CHECK_JNI_EXCEPTION_(env, InvocationEntryBci);
 437   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 438   nmethod* code = mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false);
 439   return (code != NULL && code->is_osr_method() ? code->osr_entry_bci() : InvocationEntryBci);
 440 WB_END
 441 
 442 WB_ENTRY(jboolean, WB_TestSetDontInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value))
 443   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 444   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 445   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 446   bool result = mh->dont_inline();
 447   mh->set_dont_inline(value == JNI_TRUE);
 448   return result;
 449 WB_END
 450 
 451 WB_ENTRY(jint, WB_GetCompileQueueSize(JNIEnv* env, jobject o, jint comp_level))
 452   if (comp_level == CompLevel_any) {
 453     return CompileBroker::queue_size(CompLevel_full_optimization) /* C2 */ +
 454         CompileBroker::queue_size(CompLevel_full_profile) /* C1 */;
 455   } else {
 456     return CompileBroker::queue_size(comp_level);
 457   }
 458 WB_END
 459 
 460 WB_ENTRY(jboolean, WB_TestSetForceInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value))
 461   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 462   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 463   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 464   bool result = mh->force_inline();
 465   mh->set_force_inline(value == JNI_TRUE);
 466   return result;
 467 WB_END
 468 
 469 WB_ENTRY(jboolean, WB_EnqueueMethodForCompilation(JNIEnv* env, jobject o, jobject method, jint comp_level, jint bci))
 470   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 471   CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
 472   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 473   nmethod* nm = CompileBroker::compile_method(mh, bci, comp_level, mh, mh->invocation_count(), "WhiteBox", THREAD);
 474   MutexLockerEx mu(Compile_lock);
 475   return (mh->queued_for_compilation() || nm != NULL);
 476 WB_END
 477 
 478 class VM_WhiteBoxOperation : public VM_Operation {
 479  public:
 480   VM_WhiteBoxOperation()                         { }
 481   VMOp_Type type()                  const        { return VMOp_WhiteBoxOperation; }
 482   bool allow_nested_vm_operations() const        { return true; }
 483 };
 484 
 485 class AlwaysFalseClosure : public BoolObjectClosure {
 486  public:
 487   bool do_object_b(oop p) { return false; }
 488 };
 489 
 490 static AlwaysFalseClosure always_false;
 491 
 492 class VM_WhiteBoxCleanMethodData : public VM_WhiteBoxOperation {
 493  public:
 494   VM_WhiteBoxCleanMethodData(MethodData* mdo) : _mdo(mdo) { }
 495   void doit() {
 496     _mdo->clean_method_data(&always_false);
 497   }
 498  private:
 499   MethodData* _mdo;
 500 };
 501 
 502 WB_ENTRY(void, WB_ClearMethodState(JNIEnv* env, jobject o, jobject method))
 503   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 504   CHECK_JNI_EXCEPTION(env);
 505   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 506   MutexLockerEx mu(Compile_lock);
 507   MethodData* mdo = mh->method_data();
 508   MethodCounters* mcs = mh->method_counters();
 509 
 510   if (mdo != NULL) {
 511     mdo->init();
 512     ResourceMark rm;
 513     int arg_count = mdo->method()->size_of_parameters();
 514     for (int i = 0; i < arg_count; i++) {
 515       mdo->set_arg_modified(i, 0);
 516     }
 517     VM_WhiteBoxCleanMethodData op(mdo);
 518     VMThread::execute(&op);
 519   }
 520 
 521   mh->clear_not_c1_compilable();
 522   mh->clear_not_c2_compilable();
 523   mh->clear_not_c2_osr_compilable();
 524   NOT_PRODUCT(mh->set_compiled_invocation_count(0));
 525   if (mcs != NULL) {
 526     mcs->backedge_counter()->init();
 527     mcs->invocation_counter()->init();
 528     mcs->set_interpreter_invocation_count(0);
 529     mcs->set_interpreter_throwout_count(0);
 530 
 531 #ifdef TIERED
 532     mcs->set_rate(0.0F);
 533     mh->set_prev_event_count(0);
 534     mh->set_prev_time(0);
 535 #endif
 536   }
 537 WB_END
 538 
 539 template <typename T>
 540 static bool GetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value, bool (*TAt)(const char*, T*)) {
 541   if (name == NULL) {
 542     return false;
 543   }
 544   ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 545   const char* flag_name = env->GetStringUTFChars(name, NULL);
 546   bool result = (*TAt)(flag_name, value);
 547   env->ReleaseStringUTFChars(name, flag_name);
 548   return result;
 549 }
 550 
 551 template <typename T>
 552 static bool SetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value, bool (*TAtPut)(const char*, T*, Flag::Flags)) {
 553   if (name == NULL) {
 554     return false;
 555   }
 556   ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 557   const char* flag_name = env->GetStringUTFChars(name, NULL);
 558   bool result = (*TAtPut)(flag_name, value, Flag::INTERNAL);
 559   env->ReleaseStringUTFChars(name, flag_name);
 560   return result;
 561 }
 562 
 563 template <typename T>
 564 static jobject box(JavaThread* thread, JNIEnv* env, Symbol* name, Symbol* sig, T value) {
 565   ResourceMark rm(thread);
 566   jclass clazz = env->FindClass(name->as_C_string());
 567   CHECK_JNI_EXCEPTION_(env, NULL);
 568   jmethodID methodID = env->GetStaticMethodID(clazz,
 569         vmSymbols::valueOf_name()->as_C_string(),
 570         sig->as_C_string());
 571   CHECK_JNI_EXCEPTION_(env, NULL);
 572   jobject result = env->CallStaticObjectMethod(clazz, methodID, value);
 573   CHECK_JNI_EXCEPTION_(env, NULL);
 574   return result;
 575 }
 576 
 577 static jobject booleanBox(JavaThread* thread, JNIEnv* env, jboolean value) {
 578   return box(thread, env, vmSymbols::java_lang_Boolean(), vmSymbols::Boolean_valueOf_signature(), value);
 579 }
 580 static jobject integerBox(JavaThread* thread, JNIEnv* env, jint value) {
 581   return box(thread, env, vmSymbols::java_lang_Integer(), vmSymbols::Integer_valueOf_signature(), value);
 582 }
 583 static jobject longBox(JavaThread* thread, JNIEnv* env, jlong value) {
 584   return box(thread, env, vmSymbols::java_lang_Long(), vmSymbols::Long_valueOf_signature(), value);
 585 }
 586 /* static jobject floatBox(JavaThread* thread, JNIEnv* env, jfloat value) {
 587   return box(thread, env, vmSymbols::java_lang_Float(), vmSymbols::Float_valueOf_signature(), value);
 588 }*/
 589 static jobject doubleBox(JavaThread* thread, JNIEnv* env, jdouble value) {
 590   return box(thread, env, vmSymbols::java_lang_Double(), vmSymbols::Double_valueOf_signature(), value);
 591 }
 592 
 593 WB_ENTRY(jobject, WB_GetBooleanVMFlag(JNIEnv* env, jobject o, jstring name))
 594   bool result;
 595   if (GetVMFlag <bool> (thread, env, name, &result, &CommandLineFlags::boolAt)) {
 596     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 597     return booleanBox(thread, env, result);
 598   }
 599   return NULL;
 600 WB_END
 601 
 602 WB_ENTRY(jobject, WB_GetIntxVMFlag(JNIEnv* env, jobject o, jstring name))
 603   intx result;
 604   if (GetVMFlag <intx> (thread, env, name, &result, &CommandLineFlags::intxAt)) {
 605     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 606     return longBox(thread, env, result);
 607   }
 608   return NULL;
 609 WB_END
 610 
 611 WB_ENTRY(jobject, WB_GetUintxVMFlag(JNIEnv* env, jobject o, jstring name))
 612   uintx result;
 613   if (GetVMFlag <uintx> (thread, env, name, &result, &CommandLineFlags::uintxAt)) {
 614     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 615     return longBox(thread, env, result);
 616   }
 617   return NULL;
 618 WB_END
 619 
 620 WB_ENTRY(jobject, WB_GetUint64VMFlag(JNIEnv* env, jobject o, jstring name))
 621   uint64_t result;
 622   if (GetVMFlag <uint64_t> (thread, env, name, &result, &CommandLineFlags::uint64_tAt)) {
 623     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 624     return longBox(thread, env, result);
 625   }
 626   return NULL;
 627 WB_END
 628 
 629 WB_ENTRY(jobject, WB_GetSizeTVMFlag(JNIEnv* env, jobject o, jstring name))
 630   uintx result;
 631   if (GetVMFlag <size_t> (thread, env, name, &result, &CommandLineFlags::size_tAt)) {
 632     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 633     return longBox(thread, env, result);
 634   }
 635   return NULL;
 636 WB_END
 637 
 638 WB_ENTRY(jobject, WB_GetDoubleVMFlag(JNIEnv* env, jobject o, jstring name))
 639   double result;
 640   if (GetVMFlag <double> (thread, env, name, &result, &CommandLineFlags::doubleAt)) {
 641     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 642     return doubleBox(thread, env, result);
 643   }
 644   return NULL;
 645 WB_END
 646 
 647 WB_ENTRY(jstring, WB_GetStringVMFlag(JNIEnv* env, jobject o, jstring name))
 648   ccstr ccstrResult;
 649   if (GetVMFlag <ccstr> (thread, env, name, &ccstrResult, &CommandLineFlags::ccstrAt)) {
 650     ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 651     jstring result = env->NewStringUTF(ccstrResult);
 652     CHECK_JNI_EXCEPTION_(env, NULL);
 653     return result;
 654   }
 655   return NULL;
 656 WB_END
 657 
 658 WB_ENTRY(void, WB_SetBooleanVMFlag(JNIEnv* env, jobject o, jstring name, jboolean value))
 659   bool result = value == JNI_TRUE ? true : false;
 660   SetVMFlag <bool> (thread, env, name, &result, &CommandLineFlags::boolAtPut);
 661 WB_END
 662 
 663 WB_ENTRY(void, WB_SetIntxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
 664   intx result = value;
 665   SetVMFlag <intx> (thread, env, name, &result, &CommandLineFlags::intxAtPut);
 666 WB_END
 667 
 668 WB_ENTRY(void, WB_SetUintxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
 669   uintx result = value;
 670   SetVMFlag <uintx> (thread, env, name, &result, &CommandLineFlags::uintxAtPut);
 671 WB_END
 672 
 673 WB_ENTRY(void, WB_SetUint64VMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
 674   uint64_t result = value;
 675   SetVMFlag <uint64_t> (thread, env, name, &result, &CommandLineFlags::uint64_tAtPut);
 676 WB_END
 677 
 678 WB_ENTRY(void, WB_SetSizeTVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
 679   size_t result = value;
 680   SetVMFlag <size_t> (thread, env, name, &result, &CommandLineFlags::size_tAtPut);
 681 WB_END
 682 
 683 WB_ENTRY(void, WB_SetDoubleVMFlag(JNIEnv* env, jobject o, jstring name, jdouble value))
 684   double result = value;
 685   SetVMFlag <double> (thread, env, name, &result, &CommandLineFlags::doubleAtPut);
 686 WB_END
 687 
 688 WB_ENTRY(void, WB_SetStringVMFlag(JNIEnv* env, jobject o, jstring name, jstring value))
 689   ThreadToNativeFromVM ttnfv(thread);   // can't be in VM when we call JNI
 690   const char* ccstrValue = (value == NULL) ? NULL : env->GetStringUTFChars(value, NULL);
 691   ccstr ccstrResult = ccstrValue;
 692   bool needFree;
 693   {
 694     ThreadInVMfromNative ttvfn(thread); // back to VM
 695     needFree = SetVMFlag <ccstr> (thread, env, name, &ccstrResult, &CommandLineFlags::ccstrAtPut);
 696   }
 697   if (value != NULL) {
 698     env->ReleaseStringUTFChars(value, ccstrValue);
 699   }
 700   if (needFree) {
 701     FREE_C_HEAP_ARRAY(char, ccstrResult, mtInternal);
 702   }
 703 WB_END
 704 
 705 
 706 WB_ENTRY(jboolean, WB_IsInStringTable(JNIEnv* env, jobject o, jstring javaString))
 707   ResourceMark rm(THREAD);
 708   int len;
 709   jchar* name = java_lang_String::as_unicode_string(JNIHandles::resolve(javaString), len, CHECK_false);
 710   return (StringTable::lookup(name, len) != NULL);
 711 WB_END
 712 
 713 WB_ENTRY(void, WB_FullGC(JNIEnv* env, jobject o))
 714   Universe::heap()->collector_policy()->set_should_clear_all_soft_refs(true);
 715   Universe::heap()->collect(GCCause::_last_ditch_collection);
 716 #if INCLUDE_ALL_GCS
 717   if (UseG1GC) {
 718     // Needs to be cleared explicitly for G1
 719     Universe::heap()->collector_policy()->set_should_clear_all_soft_refs(false);
 720   }
 721 #endif // INCLUDE_ALL_GCS
 722 WB_END
 723 
 724 WB_ENTRY(void, WB_YoungGC(JNIEnv* env, jobject o))
 725   Universe::heap()->collect(GCCause::_wb_young_gc);
 726 WB_END
 727 
 728 WB_ENTRY(void, WB_ReadReservedMemory(JNIEnv* env, jobject o))
 729   // static+volatile in order to force the read to happen
 730   // (not be eliminated by the compiler)
 731   static char c;
 732   static volatile char* p;
 733 
 734   p = os::reserve_memory(os::vm_allocation_granularity(), NULL, 0);
 735   if (p == NULL) {
 736     THROW_MSG(vmSymbols::java_lang_OutOfMemoryError(), "Failed to reserve memory");
 737   }
 738 
 739   c = *p;
 740 WB_END
 741 
 742 WB_ENTRY(jstring, WB_GetCPUFeatures(JNIEnv* env, jobject o))
 743   const char* cpu_features = VM_Version::cpu_features();
 744   ThreadToNativeFromVM ttn(thread);
 745   jstring features_string = env->NewStringUTF(cpu_features);
 746 
 747   CHECK_JNI_EXCEPTION_(env, NULL);
 748 
 749   return features_string;
 750 WB_END
 751 
 752 
 753 WB_ENTRY(jobjectArray, WB_GetNMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
 754   ResourceMark rm(THREAD);
 755   jmethodID jmid = reflected_method_to_jmid(thread, env, method);
 756   CHECK_JNI_EXCEPTION_(env, NULL);
 757   methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
 758   nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code();
 759   jobjectArray result = NULL;
 760   if (code == NULL) {
 761     return result;
 762   }
 763   int insts_size = code->insts_size();
 764 
 765   ThreadToNativeFromVM ttn(thread);
 766   jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string());
 767   CHECK_JNI_EXCEPTION_(env, NULL);
 768   result = env->NewObjectArray(2, clazz, NULL);
 769   if (result == NULL) {
 770     return result;
 771   }
 772 
 773   jobject obj = integerBox(thread, env, code->comp_level());
 774   CHECK_JNI_EXCEPTION_(env, NULL);
 775   env->SetObjectArrayElement(result, 0, obj);
 776 
 777   jbyteArray insts = env->NewByteArray(insts_size);
 778   CHECK_JNI_EXCEPTION_(env, NULL);
 779   env->SetByteArrayRegion(insts, 0, insts_size, (jbyte*) code->insts_begin());
 780   env->SetObjectArrayElement(result, 1, insts);
 781 
 782   return result;
 783 WB_END
 784 
 785 WB_ENTRY(jlong, WB_GetThreadStackSize(JNIEnv* env, jobject o))
 786   return (jlong) Thread::current()->stack_size();
 787 WB_END
 788 
 789 WB_ENTRY(jlong, WB_GetThreadRemainingStackSize(JNIEnv* env, jobject o))
 790   JavaThread* t = JavaThread::current();
 791   return (jlong) t->stack_available(os::current_stack_pointer()) - (jlong) StackShadowPages * os::vm_page_size();
 792 WB_END
 793 
 794 int WhiteBox::array_bytes_to_length(size_t bytes) {
 795   return Array<u1>::bytes_to_length(bytes);
 796 }
 797 
 798 WB_ENTRY(jlong, WB_AllocateMetaspace(JNIEnv* env, jobject wb, jobject class_loader, jlong size))
 799   if (size < 0) {
 800     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
 801         err_msg("WB_AllocateMetaspace: size is negative: " JLONG_FORMAT, size));
 802   }
 803 
 804   oop class_loader_oop = JNIHandles::resolve(class_loader);
 805   ClassLoaderData* cld = class_loader_oop != NULL
 806       ? java_lang_ClassLoader::loader_data(class_loader_oop)
 807       : ClassLoaderData::the_null_class_loader_data();
 808 
 809   void* metadata = MetadataFactory::new_writeable_array<u1>(cld, WhiteBox::array_bytes_to_length((size_t)size), thread);
 810 
 811   return (jlong)(uintptr_t)metadata;
 812 WB_END
 813 
 814 WB_ENTRY(void, WB_FreeMetaspace(JNIEnv* env, jobject wb, jobject class_loader, jlong addr, jlong size))
 815   oop class_loader_oop = JNIHandles::resolve(class_loader);
 816   ClassLoaderData* cld = class_loader_oop != NULL
 817       ? java_lang_ClassLoader::loader_data(class_loader_oop)
 818       : ClassLoaderData::the_null_class_loader_data();
 819 
 820   MetadataFactory::free_array(cld, (Array<u1>*)(uintptr_t)addr);
 821 WB_END
 822 
 823 WB_ENTRY(jlong, WB_IncMetaspaceCapacityUntilGC(JNIEnv* env, jobject wb, jlong size))
 824   if (size < 0) {
 825     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
 826         err_msg("WB_IncMetaspaceCapacityUntilGC: size is negative: " JLONG_FORMAT, size));
 827   }
 828 
 829   if (size > (jlong) ((size_t) -1)) {
 830     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
 831         err_msg("WB_IncMetaspaceCapacityUntilGC: size does not fit in size_t: " JLONG_FORMAT, size));
 832   }
 833 
 834   size_t new_val = MetaspaceGC::inc_capacity_until_GC(align_size_down((size_t) size, Metaspace::commit_alignment()));
 835   return (jlong) new_val;
 836 WB_END
 837 
 838 WB_ENTRY(jlong, WB_MetaspaceCapacityUntilGC(JNIEnv* env, jobject wb))
 839   return (jlong) MetaspaceGC::capacity_until_GC();
 840 WB_END
 841 
 842 //Some convenience methods to deal with objects from java
 843 int WhiteBox::offset_for_field(const char* field_name, oop object,
 844     Symbol* signature_symbol) {
 845   assert(field_name != NULL && strlen(field_name) > 0, "Field name not valid");
 846   Thread* THREAD = Thread::current();
 847 
 848   //Get the class of our object
 849   Klass* arg_klass = object->klass();
 850   //Turn it into an instance-klass
 851   InstanceKlass* ik = InstanceKlass::cast(arg_klass);
 852 
 853   //Create symbols to look for in the class
 854   TempNewSymbol name_symbol = SymbolTable::lookup(field_name, (int) strlen(field_name),
 855       THREAD);
 856 
 857   //To be filled in with an offset of the field we're looking for
 858   fieldDescriptor fd;
 859 
 860   Klass* res = ik->find_field(name_symbol, signature_symbol, &fd);
 861   if (res == NULL) {
 862     tty->print_cr("Invalid layout of %s at %s", ik->external_name(),
 863         name_symbol->as_C_string());
 864     fatal("Invalid layout of preloaded class");
 865   }
 866 
 867   //fetch the field at the offset we've found
 868   int dest_offset = fd.offset();
 869 
 870   return dest_offset;
 871 }
 872 
 873 
 874 const char* WhiteBox::lookup_jstring(const char* field_name, oop object) {
 875   int offset = offset_for_field(field_name, object,
 876       vmSymbols::string_signature());
 877   oop string = object->obj_field(offset);
 878   if (string == NULL) {
 879     return NULL;
 880   }
 881   const char* ret = java_lang_String::as_utf8_string(string);
 882   return ret;
 883 }
 884 
 885 bool WhiteBox::lookup_bool(const char* field_name, oop object) {
 886   int offset =
 887       offset_for_field(field_name, object, vmSymbols::bool_signature());
 888   bool ret = (object->bool_field(offset) == JNI_TRUE);
 889   return ret;
 890 }
 891 
 892 void WhiteBox::register_methods(JNIEnv* env, jclass wbclass, JavaThread* thread, JNINativeMethod* method_array, int method_count) {
 893   ResourceMark rm;
 894   ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
 895 
 896   //  one by one registration natives for exception catching
 897   jclass no_such_method_error_klass = env->FindClass(vmSymbols::java_lang_NoSuchMethodError()->as_C_string());
 898   CHECK_JNI_EXCEPTION(env);
 899   for (int i = 0, n = method_count; i < n; ++i) {
 900     // Skip dummy entries
 901     if (method_array[i].fnPtr == NULL) continue;
 902     if (env->RegisterNatives(wbclass, &method_array[i], 1) != 0) {
 903       jthrowable throwable_obj = env->ExceptionOccurred();
 904       if (throwable_obj != NULL) {
 905         env->ExceptionClear();
 906         if (env->IsInstanceOf(throwable_obj, no_such_method_error_klass)) {
 907           // NoSuchMethodError is thrown when a method can't be found or a method is not native.
 908           // Ignoring the exception since it is not preventing use of other WhiteBox methods.
 909           tty->print_cr("Warning: 'NoSuchMethodError' on register of sun.hotspot.WhiteBox::%s%s",
 910               method_array[i].name, method_array[i].signature);
 911         }
 912       } else {
 913         // Registration failed unexpectedly.
 914         tty->print_cr("Warning: unexpected error on register of sun.hotspot.WhiteBox::%s%s. All methods will be unregistered",
 915             method_array[i].name, method_array[i].signature);
 916         env->UnregisterNatives(wbclass);
 917         break;
 918       }
 919     }
 920   }
 921 }
 922 
 923 #define CC (char*)
 924 
 925 static JNINativeMethod methods[] = {
 926   {CC"getObjectAddress",   CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectAddress  },
 927   {CC"getObjectSize",      CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectSize     },
 928   {CC"isObjectInOldGen",   CC"(Ljava/lang/Object;)Z", (void*)&WB_isObjectInOldGen  },
 929   {CC"getHeapOopSize",     CC"()I",                   (void*)&WB_GetHeapOopSize    },
 930   {CC"isClassAlive0",      CC"(Ljava/lang/String;)Z", (void*)&WB_IsClassAlive      },
 931   {CC"parseCommandLine",
 932       CC"(Ljava/lang/String;[Lsun/hotspot/parser/DiagnosticCommand;)[Ljava/lang/Object;",
 933       (void*) &WB_ParseCommandLine
 934   },
 935   {CC"getCompressedOopsMaxHeapSize", CC"()J",
 936       (void*)&WB_GetCompressedOopsMaxHeapSize},
 937   {CC"printHeapSizes",     CC"()V",                   (void*)&WB_PrintHeapSizes    },
 938   {CC"runMemoryUnitTests", CC"()V",                   (void*)&WB_RunMemoryUnitTests},
 939   {CC"readFromNoaccessArea",CC"()V",                  (void*)&WB_ReadFromNoaccessArea},
 940   {CC"stressVirtualSpaceResize",CC"(JJJ)I",           (void*)&WB_StressVirtualSpaceResize},
 941 #if INCLUDE_ALL_GCS
 942   {CC"g1InConcurrentMark", CC"()Z",                   (void*)&WB_G1InConcurrentMark},
 943   {CC"g1IsHumongous",      CC"(Ljava/lang/Object;)Z", (void*)&WB_G1IsHumongous     },
 944   {CC"g1NumFreeRegions",   CC"()J",                   (void*)&WB_G1NumFreeRegions  },
 945   {CC"g1RegionSize",       CC"()I",                   (void*)&WB_G1RegionSize      },
 946 #endif // INCLUDE_ALL_GCS
 947 #if INCLUDE_NMT
 948   {CC"NMTMalloc",           CC"(J)J",                 (void*)&WB_NMTMalloc          },
 949   {CC"NMTMallocWithPseudoStack", CC"(JI)J",           (void*)&WB_NMTMallocWithPseudoStack},
 950   {CC"NMTFree",             CC"(J)V",                 (void*)&WB_NMTFree            },
 951   {CC"NMTReserveMemory",    CC"(J)J",                 (void*)&WB_NMTReserveMemory   },
 952   {CC"NMTCommitMemory",     CC"(JJ)V",                (void*)&WB_NMTCommitMemory    },
 953   {CC"NMTUncommitMemory",   CC"(JJ)V",                (void*)&WB_NMTUncommitMemory  },
 954   {CC"NMTReleaseMemory",    CC"(JJ)V",                (void*)&WB_NMTReleaseMemory   },
 955   {CC"NMTOverflowHashBucket", CC"(J)V",               (void*)&WB_NMTOverflowHashBucket},
 956   {CC"NMTIsDetailSupported",CC"()Z",                  (void*)&WB_NMTIsDetailSupported},
 957 #endif // INCLUDE_NMT
 958   {CC"deoptimizeAll",      CC"()V",                   (void*)&WB_DeoptimizeAll     },
 959   {CC"deoptimizeMethod",   CC"(Ljava/lang/reflect/Executable;Z)I",
 960                                                       (void*)&WB_DeoptimizeMethod  },
 961   {CC"isMethodCompiled",   CC"(Ljava/lang/reflect/Executable;Z)Z",
 962                                                       (void*)&WB_IsMethodCompiled  },
 963   {CC"isMethodCompilable", CC"(Ljava/lang/reflect/Executable;IZ)Z",
 964                                                       (void*)&WB_IsMethodCompilable},
 965   {CC"isMethodQueuedForCompilation",
 966       CC"(Ljava/lang/reflect/Executable;)Z",          (void*)&WB_IsMethodQueuedForCompilation},
 967   {CC"makeMethodNotCompilable",
 968       CC"(Ljava/lang/reflect/Executable;IZ)V",        (void*)&WB_MakeMethodNotCompilable},
 969   {CC"testSetDontInlineMethod",
 970       CC"(Ljava/lang/reflect/Executable;Z)Z",         (void*)&WB_TestSetDontInlineMethod},
 971   {CC"getMethodCompilationLevel",
 972       CC"(Ljava/lang/reflect/Executable;Z)I",         (void*)&WB_GetMethodCompilationLevel},
 973   {CC"getMethodEntryBci",
 974       CC"(Ljava/lang/reflect/Executable;)I",          (void*)&WB_GetMethodEntryBci},
 975   {CC"getCompileQueueSize",
 976       CC"(I)I",                                       (void*)&WB_GetCompileQueueSize},
 977   {CC"testSetForceInlineMethod",
 978       CC"(Ljava/lang/reflect/Executable;Z)Z",         (void*)&WB_TestSetForceInlineMethod},
 979   {CC"enqueueMethodForCompilation",
 980       CC"(Ljava/lang/reflect/Executable;II)Z",        (void*)&WB_EnqueueMethodForCompilation},
 981   {CC"clearMethodState",
 982       CC"(Ljava/lang/reflect/Executable;)V",          (void*)&WB_ClearMethodState},
 983   {CC"setBooleanVMFlag",   CC"(Ljava/lang/String;Z)V",(void*)&WB_SetBooleanVMFlag},
 984   {CC"setIntxVMFlag",      CC"(Ljava/lang/String;J)V",(void*)&WB_SetIntxVMFlag},
 985   {CC"setUintxVMFlag",     CC"(Ljava/lang/String;J)V",(void*)&WB_SetUintxVMFlag},
 986   {CC"setUint64VMFlag",    CC"(Ljava/lang/String;J)V",(void*)&WB_SetUint64VMFlag},
 987   {CC"setSizeTVMFlag",     CC"(Ljava/lang/String;J)V",(void*)&WB_SetSizeTVMFlag},
 988   {CC"setDoubleVMFlag",    CC"(Ljava/lang/String;D)V",(void*)&WB_SetDoubleVMFlag},
 989   {CC"setStringVMFlag",    CC"(Ljava/lang/String;Ljava/lang/String;)V",
 990                                                       (void*)&WB_SetStringVMFlag},
 991   {CC"getBooleanVMFlag",   CC"(Ljava/lang/String;)Ljava/lang/Boolean;",
 992                                                       (void*)&WB_GetBooleanVMFlag},
 993   {CC"getIntxVMFlag",      CC"(Ljava/lang/String;)Ljava/lang/Long;",
 994                                                       (void*)&WB_GetIntxVMFlag},
 995   {CC"getUintxVMFlag",     CC"(Ljava/lang/String;)Ljava/lang/Long;",
 996                                                       (void*)&WB_GetUintxVMFlag},
 997   {CC"getUint64VMFlag",    CC"(Ljava/lang/String;)Ljava/lang/Long;",
 998                                                       (void*)&WB_GetUint64VMFlag},
 999   {CC"getSizeTVMFlag",     CC"(Ljava/lang/String;)Ljava/lang/Long;",
1000                                                       (void*)&WB_GetSizeTVMFlag},
1001   {CC"getDoubleVMFlag",    CC"(Ljava/lang/String;)Ljava/lang/Double;",
1002                                                       (void*)&WB_GetDoubleVMFlag},
1003   {CC"getStringVMFlag",    CC"(Ljava/lang/String;)Ljava/lang/String;",
1004                                                       (void*)&WB_GetStringVMFlag},
1005   {CC"isInStringTable",    CC"(Ljava/lang/String;)Z", (void*)&WB_IsInStringTable  },
1006   {CC"fullGC",   CC"()V",                             (void*)&WB_FullGC },
1007   {CC"youngGC",  CC"()V",                             (void*)&WB_YoungGC },
1008   {CC"readReservedMemory", CC"()V",                   (void*)&WB_ReadReservedMemory },
1009   {CC"allocateMetaspace",
1010      CC"(Ljava/lang/ClassLoader;J)J",                 (void*)&WB_AllocateMetaspace },
1011   {CC"freeMetaspace",
1012      CC"(Ljava/lang/ClassLoader;JJ)V",                (void*)&WB_FreeMetaspace },
1013   {CC"incMetaspaceCapacityUntilGC", CC"(J)J",         (void*)&WB_IncMetaspaceCapacityUntilGC },
1014   {CC"metaspaceCapacityUntilGC", CC"()J",             (void*)&WB_MetaspaceCapacityUntilGC },
1015   {CC"getCPUFeatures",     CC"()Ljava/lang/String;",  (void*)&WB_GetCPUFeatures     },
1016   {CC"getNMethod",         CC"(Ljava/lang/reflect/Executable;Z)[Ljava/lang/Object;",
1017                                                       (void*)&WB_GetNMethod         },
1018   {CC"getThreadStackSize", CC"()J",                   (void*)&WB_GetThreadStackSize },
1019   {CC"getThreadRemainingStackSize", CC"()J",          (void*)&WB_GetThreadRemainingStackSize },
1020 };
1021 
1022 #undef CC
1023 
1024 JVM_ENTRY(void, JVM_RegisterWhiteBoxMethods(JNIEnv* env, jclass wbclass))
1025   {
1026     if (WhiteBoxAPI) {
1027       // Make sure that wbclass is loaded by the null classloader
1028       instanceKlassHandle ikh = instanceKlassHandle(JNIHandles::resolve(wbclass)->klass());
1029       Handle loader(ikh->class_loader());
1030       if (loader.is_null()) {
1031         WhiteBox::register_methods(env, wbclass, thread, methods, sizeof(methods) / sizeof(methods[0]));
1032         WhiteBox::register_extended(env, wbclass, thread);
1033         WhiteBox::set_used();
1034       }
1035     }
1036   }
1037 JVM_END