src/share/vm/prims/whitebox.cpp

Wed, 11 Sep 2019 12:06:33 +0200

author
jbachorik
date
Wed, 11 Sep 2019 12:06:33 +0200
changeset 9881
8a0aca5caca0
parent 9861
a248d0be1309
child 9931
fd44df5e3bc3
permissions
-rw-r--r--

8230707: JFR related tests are failing
Reviewed-by: neugens

mgerdin@3619 1 /*
xliu@9690 2 * Copyright (c) 2012, 2019, Oracle and/or its affiliates. All rights reserved.
mgerdin@3619 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
mgerdin@3619 4 *
mgerdin@3619 5 * This code is free software; you can redistribute it and/or modify it
mgerdin@3619 6 * under the terms of the GNU General Public License version 2 only, as
mgerdin@3619 7 * published by the Free Software Foundation.
mgerdin@3619 8 *
mgerdin@3619 9 * This code is distributed in the hope that it will be useful, but WITHOUT
mgerdin@3619 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
mgerdin@3619 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
mgerdin@3619 12 * version 2 for more details (a copy is included in the LICENSE file that
mgerdin@3619 13 * accompanied this code).
mgerdin@3619 14 *
mgerdin@3619 15 * You should have received a copy of the GNU General Public License version
mgerdin@3619 16 * 2 along with this work; if not, write to the Free Software Foundation,
mgerdin@3619 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
mgerdin@3619 18 *
mgerdin@3619 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
mgerdin@3619 20 * or visit www.oracle.com if you need additional information or have any
mgerdin@3619 21 * questions.
mgerdin@3619 22 *
mgerdin@3619 23 */
mgerdin@3619 24
mgerdin@3619 25 #include "precompiled.hpp"
mgerdin@3619 26
stefank@6992 27 #include "memory/metadataFactory.hpp"
iklam@8497 28 #include "memory/metaspaceShared.hpp"
stefank@9665 29 #include "memory/iterator.hpp"
mgerdin@3619 30 #include "memory/universe.hpp"
mgerdin@3619 31 #include "oops/oop.inline.hpp"
nloodin@3681 32
nloodin@3681 33 #include "classfile/symbolTable.hpp"
coleenp@4037 34 #include "classfile/classLoaderData.hpp"
nloodin@3681 35
mgerdin@3619 36 #include "prims/whitebox.hpp"
nloodin@3681 37 #include "prims/wbtestmethods/parserTests.hpp"
nloodin@3681 38
tschatzl@5701 39 #include "runtime/arguments.hpp"
mgerdin@3619 40 #include "runtime/interfaceSupport.hpp"
mgerdin@3619 41 #include "runtime/os.hpp"
stefank@6992 42 #include "utilities/array.hpp"
neugens@9861 43 #include "utilities/align.hpp"
mgerdin@3619 44 #include "utilities/debug.hpp"
jprovino@4542 45 #include "utilities/macros.hpp"
mikael@5174 46 #include "utilities/exceptions.hpp"
mgerdin@3619 47
jprovino@4542 48 #if INCLUDE_ALL_GCS
tschatzl@7071 49 #include "gc_implementation/parallelScavenge/parallelScavengeHeap.inline.hpp"
mgerdin@3619 50 #include "gc_implementation/g1/concurrentMark.hpp"
kevinw@8194 51 #include "gc_implementation/g1/concurrentMarkThread.hpp"
mgerdin@3619 52 #include "gc_implementation/g1/g1CollectedHeap.inline.hpp"
mgerdin@3619 53 #include "gc_implementation/g1/heapRegionRemSet.hpp"
jprovino@4542 54 #endif // INCLUDE_ALL_GCS
mgerdin@3619 55
zgu@7074 56 #if INCLUDE_NMT
zgu@7074 57 #include "services/mallocSiteTable.hpp"
ctornqvi@4512 58 #include "services/memTracker.hpp"
zgu@7074 59 #include "utilities/nativeCallStack.hpp"
ctornqvi@4512 60 #endif // INCLUDE_NMT
ctornqvi@4512 61
iignatyev@4592 62 #include "compiler/compileBroker.hpp"
iklam@7381 63 #include "jvmtifiles/jvmtiEnv.hpp"
iignatyev@4908 64 #include "runtime/compilationPolicy.hpp"
iignatyev@4592 65
drchase@6680 66 PRAGMA_FORMAT_MUTE_WARNINGS_FOR_GCC
drchase@6680 67
mgerdin@6078 68 #define SIZE_T_MAX_VALUE ((size_t) -1)
mgerdin@6078 69
mgerdin@3619 70 bool WhiteBox::_used = false;
mgerdin@3619 71
mgerdin@3619 72 WB_ENTRY(jlong, WB_GetObjectAddress(JNIEnv* env, jobject o, jobject obj))
mgerdin@3619 73 return (jlong)(void*)JNIHandles::resolve(obj);
mgerdin@3619 74 WB_END
mgerdin@3619 75
mgerdin@3619 76 WB_ENTRY(jint, WB_GetHeapOopSize(JNIEnv* env, jobject o))
mgerdin@3619 77 return heapOopSize;
mgerdin@3619 78 WB_END
mgerdin@3619 79
minqi@7779 80 WB_ENTRY(jint, WB_GetVMPageSize(JNIEnv* env, jobject o))
minqi@7779 81 return os::vm_page_size();
minqi@7779 82 WB_END
coleenp@4037 83
tschatzl@7781 84 WB_ENTRY(jlong, WB_GetVMLargePageSize(JNIEnv* env, jobject o))
tschatzl@7781 85 return os::large_page_size();
tschatzl@7781 86 WB_END
tschatzl@7781 87
coleenp@4037 88 class WBIsKlassAliveClosure : public KlassClosure {
coleenp@4037 89 Symbol* _name;
coleenp@4037 90 bool _found;
coleenp@4037 91 public:
coleenp@4037 92 WBIsKlassAliveClosure(Symbol* name) : _name(name), _found(false) {}
coleenp@4037 93
coleenp@4037 94 void do_klass(Klass* k) {
coleenp@4037 95 if (_found) return;
coleenp@4037 96 Symbol* ksym = k->name();
coleenp@4037 97 if (ksym->fast_compare(_name) == 0) {
coleenp@4037 98 _found = true;
coleenp@4037 99 }
coleenp@4037 100 }
coleenp@4037 101
coleenp@4037 102 bool found() const {
coleenp@4037 103 return _found;
coleenp@4037 104 }
coleenp@4037 105 };
coleenp@4037 106
coleenp@4037 107 WB_ENTRY(jboolean, WB_IsClassAlive(JNIEnv* env, jobject target, jstring name))
coleenp@4037 108 Handle h_name = JNIHandles::resolve(name);
coleenp@4037 109 if (h_name.is_null()) return false;
coleenp@4037 110 Symbol* sym = java_lang_String::as_symbol(h_name, CHECK_false);
coleenp@4037 111 TempNewSymbol tsym(sym); // Make sure to decrement reference count on sym on return
coleenp@4037 112
coleenp@4037 113 WBIsKlassAliveClosure closure(sym);
coleenp@4037 114 ClassLoaderDataGraph::classes_do(&closure);
coleenp@4037 115
coleenp@4037 116 return closure.found();
coleenp@4037 117 WB_END
coleenp@4037 118
iklam@7322 119 WB_ENTRY(jboolean, WB_ClassKnownToNotExist(JNIEnv* env, jobject o, jobject loader, jstring name))
iklam@7322 120 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iklam@7322 121 const char* class_name = env->GetStringUTFChars(name, NULL);
iklam@7322 122 jboolean result = JVM_KnownToNotExist(env, loader, class_name);
iklam@7322 123 env->ReleaseStringUTFChars(name, class_name);
iklam@7322 124 return result;
iklam@7322 125 WB_END
iklam@7322 126
iklam@7322 127 WB_ENTRY(jobjectArray, WB_GetLookupCacheURLs(JNIEnv* env, jobject o, jobject loader))
iklam@7322 128 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iklam@7322 129 return JVM_GetResourceLookupCacheURLs(env, loader);
iklam@7322 130 WB_END
iklam@7322 131
iklam@7322 132 WB_ENTRY(jintArray, WB_GetLookupCacheMatches(JNIEnv* env, jobject o, jobject loader, jstring name))
iklam@7322 133 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iklam@7322 134 const char* resource_name = env->GetStringUTFChars(name, NULL);
iklam@7322 135 jintArray result = JVM_GetResourceLookupCache(env, loader, resource_name);
iklam@7322 136
iklam@7322 137 env->ReleaseStringUTFChars(name, resource_name);
iklam@7322 138 return result;
iklam@7322 139 WB_END
iklam@7322 140
iklam@7381 141 WB_ENTRY(void, WB_AddToBootstrapClassLoaderSearch(JNIEnv* env, jobject o, jstring segment)) {
iklam@7381 142 #if INCLUDE_JVMTI
iklam@7382 143 ResourceMark rm;
iklam@7382 144 const char* seg = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(segment));
iklam@7381 145 JvmtiEnv* jvmti_env = JvmtiEnv::create_a_jvmti(JVMTI_VERSION);
iklam@7381 146 jvmtiError err = jvmti_env->AddToBootstrapClassLoaderSearch(seg);
iklam@7381 147 assert(err == JVMTI_ERROR_NONE, "must not fail");
iklam@7381 148 #endif
iklam@7381 149 }
iklam@7381 150 WB_END
iklam@7381 151
iklam@7381 152 WB_ENTRY(void, WB_AddToSystemClassLoaderSearch(JNIEnv* env, jobject o, jstring segment)) {
iklam@7381 153 #if INCLUDE_JVMTI
iklam@7382 154 ResourceMark rm;
iklam@7382 155 const char* seg = java_lang_String::as_utf8_string(JNIHandles::resolve_non_null(segment));
iklam@7381 156 JvmtiEnv* jvmti_env = JvmtiEnv::create_a_jvmti(JVMTI_VERSION);
iklam@7381 157 jvmtiError err = jvmti_env->AddToSystemClassLoaderSearch(seg);
iklam@7381 158 assert(err == JVMTI_ERROR_NONE, "must not fail");
iklam@7381 159 #endif
iklam@7381 160 }
iklam@7381 161 WB_END
iklam@7381 162
dbuck@9186 163 #ifdef LINUX
dbuck@9186 164 #include "utilities/elfFile.hpp"
vaibhav@9421 165 #include "osContainer_linux.hpp"
dbuck@9186 166 #endif
iklam@7381 167
tschatzl@5701 168 WB_ENTRY(jlong, WB_GetCompressedOopsMaxHeapSize(JNIEnv* env, jobject o)) {
tschatzl@5701 169 return (jlong)Arguments::max_heap_for_compressed_oops();
tschatzl@5701 170 }
tschatzl@5701 171 WB_END
tschatzl@5701 172
tschatzl@5073 173 WB_ENTRY(void, WB_PrintHeapSizes(JNIEnv* env, jobject o)) {
tschatzl@5073 174 CollectorPolicy * p = Universe::heap()->collector_policy();
kevinw@9327 175 gclog_or_tty->print_cr("Minimum heap " SIZE_FORMAT " Initial heap "
ehelin@9622 176 SIZE_FORMAT " Maximum heap " SIZE_FORMAT " Space alignment " SIZE_FORMAT " Heap alignment " SIZE_FORMAT,
tschatzl@5073 177 p->min_heap_byte_size(), p->initial_heap_byte_size(), p->max_heap_byte_size(),
jwilhelm@6085 178 p->space_alignment(), p->heap_alignment());
tschatzl@5073 179 }
tschatzl@5073 180 WB_END
tschatzl@5073 181
mgerdin@6078 182 #ifndef PRODUCT
mgerdin@6078 183 // Forward declaration
mgerdin@6078 184 void TestReservedSpace_test();
mgerdin@6078 185 void TestReserveMemorySpecial_test();
mgerdin@6078 186 void TestVirtualSpace_test();
mgerdin@6078 187 void TestMetaspaceAux_test();
mgerdin@6078 188 #endif
mgerdin@6078 189
mgerdin@6078 190 WB_ENTRY(void, WB_RunMemoryUnitTests(JNIEnv* env, jobject o))
mgerdin@6078 191 #ifndef PRODUCT
mgerdin@6078 192 TestReservedSpace_test();
mgerdin@6078 193 TestReserveMemorySpecial_test();
mgerdin@6078 194 TestVirtualSpace_test();
mgerdin@6078 195 TestMetaspaceAux_test();
mgerdin@6078 196 #endif
mgerdin@6078 197 WB_END
mgerdin@6078 198
mgerdin@6078 199 WB_ENTRY(void, WB_ReadFromNoaccessArea(JNIEnv* env, jobject o))
mgerdin@6078 200 size_t granularity = os::vm_allocation_granularity();
mgerdin@6078 201 ReservedHeapSpace rhs(100 * granularity, granularity, false, NULL);
mgerdin@6078 202 VirtualSpace vs;
mgerdin@6078 203 vs.initialize(rhs, 50 * granularity);
mgerdin@6078 204
mgerdin@6078 205 //Check if constraints are complied
mgerdin@6078 206 if (!( UseCompressedOops && rhs.base() != NULL &&
mgerdin@6078 207 Universe::narrow_oop_base() != NULL &&
mgerdin@6078 208 Universe::narrow_oop_use_implicit_null_checks() )) {
mgerdin@6078 209 tty->print_cr("WB_ReadFromNoaccessArea method is useless:\n "
mgerdin@6078 210 "\tUseCompressedOops is %d\n"
kevinw@9327 211 "\trhs.base() is " PTR_FORMAT "\n"
kevinw@9327 212 "\tUniverse::narrow_oop_base() is " PTR_FORMAT "\n"
mgerdin@6078 213 "\tUniverse::narrow_oop_use_implicit_null_checks() is %d",
mgerdin@6078 214 UseCompressedOops,
mgerdin@6078 215 rhs.base(),
mgerdin@6078 216 Universe::narrow_oop_base(),
mgerdin@6078 217 Universe::narrow_oop_use_implicit_null_checks());
mgerdin@6078 218 return;
mgerdin@6078 219 }
mgerdin@6078 220 tty->print_cr("Reading from no access area... ");
mgerdin@6078 221 tty->print_cr("*(vs.low_boundary() - rhs.noaccess_prefix() / 2 ) = %c",
mgerdin@6078 222 *(vs.low_boundary() - rhs.noaccess_prefix() / 2 ));
mgerdin@6078 223 WB_END
mgerdin@6078 224
mgerdin@6078 225 static jint wb_stress_virtual_space_resize(size_t reserved_space_size,
mgerdin@6078 226 size_t magnitude, size_t iterations) {
mgerdin@6078 227 size_t granularity = os::vm_allocation_granularity();
mgerdin@6078 228 ReservedHeapSpace rhs(reserved_space_size * granularity, granularity, false, NULL);
mgerdin@6078 229 VirtualSpace vs;
mgerdin@6078 230 if (!vs.initialize(rhs, 0)) {
mgerdin@6078 231 tty->print_cr("Failed to initialize VirtualSpace. Can't proceed.");
mgerdin@6078 232 return 3;
mgerdin@6078 233 }
mgerdin@6078 234
mgerdin@6078 235 long seed = os::random();
mgerdin@6078 236 tty->print_cr("Random seed is %ld", seed);
mgerdin@6078 237 os::init_random(seed);
mgerdin@6078 238
mgerdin@6078 239 for (size_t i = 0; i < iterations; i++) {
mgerdin@6078 240
mgerdin@6078 241 // Whether we will shrink or grow
mgerdin@6078 242 bool shrink = os::random() % 2L == 0;
mgerdin@6078 243
mgerdin@6078 244 // Get random delta to resize virtual space
mgerdin@6078 245 size_t delta = (size_t)os::random() % magnitude;
mgerdin@6078 246
mgerdin@6078 247 // If we are about to shrink virtual space below zero, then expand instead
mgerdin@6078 248 if (shrink && vs.committed_size() < delta) {
mgerdin@6078 249 shrink = false;
mgerdin@6078 250 }
mgerdin@6078 251
mgerdin@6078 252 // Resizing by delta
mgerdin@6078 253 if (shrink) {
mgerdin@6078 254 vs.shrink_by(delta);
mgerdin@6078 255 } else {
mgerdin@6078 256 // If expanding fails expand_by will silently return false
mgerdin@6078 257 vs.expand_by(delta, true);
mgerdin@6078 258 }
mgerdin@6078 259 }
mgerdin@6078 260 return 0;
mgerdin@6078 261 }
mgerdin@6078 262
mgerdin@6078 263 WB_ENTRY(jint, WB_StressVirtualSpaceResize(JNIEnv* env, jobject o,
mgerdin@6078 264 jlong reserved_space_size, jlong magnitude, jlong iterations))
kevinw@9327 265 tty->print_cr("reservedSpaceSize=" JLONG_FORMAT ", magnitude=" JLONG_FORMAT ", "
kevinw@9327 266 "iterations=" JLONG_FORMAT "\n", reserved_space_size, magnitude,
mgerdin@6078 267 iterations);
mgerdin@6078 268 if (reserved_space_size < 0 || magnitude < 0 || iterations < 0) {
mgerdin@6078 269 tty->print_cr("One of variables printed above is negative. Can't proceed.\n");
mgerdin@6078 270 return 1;
mgerdin@6078 271 }
mgerdin@6078 272
mgerdin@6078 273 // sizeof(size_t) depends on whether OS is 32bit or 64bit. sizeof(jlong) is
mgerdin@6078 274 // always 8 byte. That's why we should avoid overflow in case of 32bit platform.
mgerdin@6078 275 if (sizeof(size_t) < sizeof(jlong)) {
mgerdin@6078 276 jlong size_t_max_value = (jlong) SIZE_T_MAX_VALUE;
mgerdin@6078 277 if (reserved_space_size > size_t_max_value || magnitude > size_t_max_value
mgerdin@6078 278 || iterations > size_t_max_value) {
mgerdin@6078 279 tty->print_cr("One of variables printed above overflows size_t. Can't proceed.\n");
mgerdin@6078 280 return 2;
mgerdin@6078 281 }
mgerdin@6078 282 }
mgerdin@6078 283
mgerdin@6078 284 return wb_stress_virtual_space_resize((size_t) reserved_space_size,
mgerdin@6078 285 (size_t) magnitude, (size_t) iterations);
mgerdin@6078 286 WB_END
mgerdin@6078 287
tschatzl@7071 288 WB_ENTRY(jboolean, WB_isObjectInOldGen(JNIEnv* env, jobject o, jobject obj))
tschatzl@7071 289 oop p = JNIHandles::resolve(obj);
tschatzl@7071 290 #if INCLUDE_ALL_GCS
tschatzl@7071 291 if (UseG1GC) {
tschatzl@7071 292 G1CollectedHeap* g1 = G1CollectedHeap::heap();
tschatzl@7071 293 const HeapRegion* hr = g1->heap_region_containing(p);
tschatzl@7071 294 if (hr == NULL) {
tschatzl@7071 295 return false;
tschatzl@7071 296 }
tschatzl@7071 297 return !(hr->is_young());
tschatzl@7071 298 } else if (UseParallelGC) {
tschatzl@7071 299 ParallelScavengeHeap* psh = ParallelScavengeHeap::heap();
tschatzl@7071 300 return !psh->is_in_young(p);
tschatzl@7071 301 }
tschatzl@7071 302 #endif // INCLUDE_ALL_GCS
tschatzl@7071 303 GenCollectedHeap* gch = GenCollectedHeap::heap();
tschatzl@7071 304 return !gch->is_in_young(p);
tschatzl@7071 305 WB_END
tschatzl@7071 306
tschatzl@7071 307 WB_ENTRY(jlong, WB_GetObjectSize(JNIEnv* env, jobject o, jobject obj))
tschatzl@7071 308 oop p = JNIHandles::resolve(obj);
tschatzl@7071 309 return p->size() * HeapWordSize;
tschatzl@7071 310 WB_END
tschatzl@7071 311
jprovino@4542 312 #if INCLUDE_ALL_GCS
mgerdin@3619 313 WB_ENTRY(jboolean, WB_G1IsHumongous(JNIEnv* env, jobject o, jobject obj))
mgerdin@3619 314 G1CollectedHeap* g1 = G1CollectedHeap::heap();
mgerdin@3619 315 oop result = JNIHandles::resolve(obj);
mgerdin@3619 316 const HeapRegion* hr = g1->heap_region_containing(result);
mgerdin@3619 317 return hr->isHumongous();
mgerdin@3619 318 WB_END
mgerdin@3619 319
azakharov@7835 320 WB_ENTRY(jlong, WB_G1NumMaxRegions(JNIEnv* env, jobject o))
azakharov@7835 321 G1CollectedHeap* g1 = G1CollectedHeap::heap();
azakharov@7835 322 size_t nr = g1->max_regions();
azakharov@7835 323 return (jlong)nr;
azakharov@7835 324 WB_END
azakharov@7835 325
mgerdin@3619 326 WB_ENTRY(jlong, WB_G1NumFreeRegions(JNIEnv* env, jobject o))
mgerdin@3619 327 G1CollectedHeap* g1 = G1CollectedHeap::heap();
tschatzl@7050 328 size_t nr = g1->num_free_regions();
mgerdin@3619 329 return (jlong)nr;
mgerdin@3619 330 WB_END
mgerdin@3619 331
mgerdin@3619 332 WB_ENTRY(jboolean, WB_G1InConcurrentMark(JNIEnv* env, jobject o))
mgerdin@3619 333 G1CollectedHeap* g1 = G1CollectedHeap::heap();
kevinw@8194 334 return g1->concurrent_mark()->cmThread()->during_cycle();
kevinw@8194 335 WB_END
kevinw@8194 336
kevinw@8194 337 WB_ENTRY(jboolean, WB_G1StartMarkCycle(JNIEnv* env, jobject o))
kevinw@8194 338 G1CollectedHeap* g1h = G1CollectedHeap::heap();
kevinw@8194 339 if (!g1h->concurrent_mark()->cmThread()->during_cycle()) {
kevinw@8194 340 g1h->collect(GCCause::_wb_conc_mark);
kevinw@8194 341 return true;
kevinw@8194 342 }
kevinw@8194 343 return false;
mgerdin@3619 344 WB_END
mgerdin@3619 345
mgerdin@3619 346 WB_ENTRY(jint, WB_G1RegionSize(JNIEnv* env, jobject o))
mgerdin@3619 347 return (jint)HeapRegion::GrainBytes;
mgerdin@3619 348 WB_END
azakharov@7835 349
azakharov@7835 350 WB_ENTRY(jobject, WB_G1AuxiliaryMemoryUsage(JNIEnv* env))
azakharov@7835 351 ResourceMark rm(THREAD);
azakharov@7835 352 G1CollectedHeap* g1h = G1CollectedHeap::heap();
azakharov@7835 353 MemoryUsage usage = g1h->get_auxiliary_data_memory_usage();
azakharov@7835 354 Handle h = MemoryService::create_MemoryUsage_obj(usage, CHECK_NULL);
azakharov@7835 355 return JNIHandles::make_local(env, h());
azakharov@7835 356 WB_END
jprovino@4542 357 #endif // INCLUDE_ALL_GCS
mgerdin@3619 358
cjplummer@5586 359 #if INCLUDE_NMT
ctornqvi@4512 360 // Alloc memory using the test memory type so that we can use that to see if
ctornqvi@4512 361 // NMT picks it up correctly
ctornqvi@4885 362 WB_ENTRY(jlong, WB_NMTMalloc(JNIEnv* env, jobject o, jlong size))
ctornqvi@4885 363 jlong addr = 0;
ctornqvi@7344 364 addr = (jlong)(uintptr_t)os::malloc(size, mtTest);
zgu@7074 365 return addr;
zgu@7074 366 WB_END
ctornqvi@4512 367
zgu@7074 368 // Alloc memory with pseudo call stack. The test can create psudo malloc
zgu@7074 369 // allocation site to stress the malloc tracking.
zgu@7074 370 WB_ENTRY(jlong, WB_NMTMallocWithPseudoStack(JNIEnv* env, jobject o, jlong size, jint pseudo_stack))
zgu@7074 371 address pc = (address)(size_t)pseudo_stack;
zgu@7074 372 NativeCallStack stack(&pc, 1);
ctornqvi@7344 373 return (jlong)(uintptr_t)os::malloc(size, mtTest, stack);
ctornqvi@4512 374 WB_END
ctornqvi@4512 375
zgu@9621 376 // Alloc memory with pseudo call stack and specific memory type.
zgu@9621 377 WB_ENTRY(jlong, WB_NMTMallocWithPseudoStackAndType(JNIEnv* env, jobject o, jlong size, jint pseudo_stack, jint type))
zgu@9621 378 address pc = (address)(size_t)pseudo_stack;
zgu@9621 379 NativeCallStack stack(&pc, 1);
zgu@9621 380 return (jlong)(uintptr_t)os::malloc(size, (MEMFLAGS)type, stack);
zgu@9621 381 WB_END
zgu@9621 382
ctornqvi@4512 383 // Free the memory allocated by NMTAllocTest
ctornqvi@4885 384 WB_ENTRY(void, WB_NMTFree(JNIEnv* env, jobject o, jlong mem))
ctornqvi@4885 385 os::free((void*)(uintptr_t)mem, mtTest);
ctornqvi@4885 386 WB_END
ctornqvi@4512 387
ctornqvi@4885 388 WB_ENTRY(jlong, WB_NMTReserveMemory(JNIEnv* env, jobject o, jlong size))
ctornqvi@4885 389 jlong addr = 0;
ctornqvi@4885 390
ctornqvi@4885 391 addr = (jlong)(uintptr_t)os::reserve_memory(size);
ctornqvi@4885 392 MemTracker::record_virtual_memory_type((address)addr, mtTest);
ctornqvi@4512 393
ctornqvi@4885 394 return addr;
ctornqvi@4885 395 WB_END
ctornqvi@4512 396
ctornqvi@4885 397
ctornqvi@4885 398 WB_ENTRY(void, WB_NMTCommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size))
dcubed@5255 399 os::commit_memory((char *)(uintptr_t)addr, size, !ExecMem);
ctornqvi@4885 400 MemTracker::record_virtual_memory_type((address)(uintptr_t)addr, mtTest);
ctornqvi@4885 401 WB_END
ctornqvi@4885 402
ctornqvi@4885 403 WB_ENTRY(void, WB_NMTUncommitMemory(JNIEnv* env, jobject o, jlong addr, jlong size))
ctornqvi@4885 404 os::uncommit_memory((char *)(uintptr_t)addr, size);
ctornqvi@4885 405 WB_END
ctornqvi@4885 406
ctornqvi@4885 407 WB_ENTRY(void, WB_NMTReleaseMemory(JNIEnv* env, jobject o, jlong addr, jlong size))
ctornqvi@4885 408 os::release_memory((char *)(uintptr_t)addr, size);
ctornqvi@4512 409 WB_END
ctornqvi@4512 410
zgu@7074 411 WB_ENTRY(jboolean, WB_NMTIsDetailSupported(JNIEnv* env))
zgu@7074 412 return MemTracker::tracking_level() == NMT_detail;
ctornqvi@4512 413 WB_END
ctornqvi@4512 414
coleenp@7267 415 WB_ENTRY(jboolean, WB_NMTChangeTrackingLevel(JNIEnv* env))
coleenp@7267 416 // Test that we can downgrade NMT levels but not upgrade them.
coleenp@7267 417 if (MemTracker::tracking_level() == NMT_off) {
coleenp@7267 418 MemTracker::transition_to(NMT_off);
coleenp@7267 419 return MemTracker::tracking_level() == NMT_off;
coleenp@7267 420 } else {
coleenp@7267 421 assert(MemTracker::tracking_level() == NMT_detail, "Should start out as detail tracking");
coleenp@7267 422 MemTracker::transition_to(NMT_summary);
coleenp@7267 423 assert(MemTracker::tracking_level() == NMT_summary, "Should be summary now");
zgu@7074 424
coleenp@7267 425 // Can't go to detail once NMT is set to summary.
coleenp@7267 426 MemTracker::transition_to(NMT_detail);
coleenp@7267 427 assert(MemTracker::tracking_level() == NMT_summary, "Should still be summary now");
coleenp@7267 428
coleenp@7267 429 // Shutdown sets tracking level to minimal.
coleenp@7267 430 MemTracker::shutdown();
coleenp@7267 431 assert(MemTracker::tracking_level() == NMT_minimal, "Should be minimal now");
coleenp@7267 432
coleenp@7267 433 // Once the tracking level is minimal, we cannot increase to summary.
coleenp@7267 434 // The code ignores this request instead of asserting because if the malloc site
coleenp@7267 435 // table overflows in another thread, it tries to change the code to summary.
coleenp@7267 436 MemTracker::transition_to(NMT_summary);
coleenp@7267 437 assert(MemTracker::tracking_level() == NMT_minimal, "Should still be minimal now");
coleenp@7267 438
coleenp@7267 439 // Really can never go up to detail, verify that the code would never do this.
coleenp@7267 440 MemTracker::transition_to(NMT_detail);
coleenp@7267 441 assert(MemTracker::tracking_level() == NMT_minimal, "Should still be minimal now");
coleenp@7267 442 return MemTracker::tracking_level() == NMT_minimal;
coleenp@7267 443 }
coleenp@7267 444 WB_END
gtriantafill@7342 445
gtriantafill@7342 446 WB_ENTRY(jint, WB_NMTGetHashSize(JNIEnv* env, jobject o))
gtriantafill@7342 447 int hash_size = MallocSiteTable::hash_buckets();
gtriantafill@7342 448 assert(hash_size > 0, "NMT hash_size should be > 0");
gtriantafill@7342 449 return (jint)hash_size;
gtriantafill@7342 450 WB_END
ctornqvi@4512 451 #endif // INCLUDE_NMT
ctornqvi@4512 452
iignatyev@4592 453 static jmethodID reflected_method_to_jmid(JavaThread* thread, JNIEnv* env, jobject method) {
iignatyev@4592 454 assert(method != NULL, "method should not be null");
iignatyev@4592 455 ThreadToNativeFromVM ttn(thread);
iignatyev@4592 456 return env->FromReflectedMethod(method);
iignatyev@4592 457 }
iignatyev@4592 458
iignatyev@4592 459 WB_ENTRY(void, WB_DeoptimizeAll(JNIEnv* env, jobject o))
iignatyev@4592 460 MutexLockerEx mu(Compile_lock);
iignatyev@4592 461 CodeCache::mark_all_nmethods_for_deoptimization();
iignatyev@4592 462 VM_Deoptimize op;
iignatyev@4592 463 VMThread::execute(&op);
iignatyev@4592 464 WB_END
iignatyev@4592 465
iignatyev@5541 466 WB_ENTRY(jint, WB_DeoptimizeMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
iignatyev@4592 467 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 468 int result = 0;
ccheung@6346 469 CHECK_JNI_EXCEPTION_(env, result);
iignatyev@4592 470 MutexLockerEx mu(Compile_lock);
iignatyev@4592 471 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@5541 472 if (is_osr) {
thartmann@7325 473 result += mh->mark_osr_nmethods();
thartmann@7325 474 } else if (mh->code() != NULL) {
thartmann@7325 475 mh->code()->mark_for_deoptimization();
iignatyev@4592 476 ++result;
iignatyev@4592 477 }
iignatyev@4592 478 result += CodeCache::mark_for_deoptimization(mh());
iignatyev@4592 479 if (result > 0) {
iignatyev@4592 480 VM_Deoptimize op;
iignatyev@4592 481 VMThread::execute(&op);
iignatyev@4592 482 }
iignatyev@4592 483 return result;
iignatyev@4592 484 WB_END
iignatyev@4592 485
iignatyev@5541 486 WB_ENTRY(jboolean, WB_IsMethodCompiled(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
iignatyev@4592 487 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 488 CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
iignatyev@4592 489 MutexLockerEx mu(Compile_lock);
iignatyev@4592 490 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@5541 491 nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code();
iignatyev@4592 492 if (code == NULL) {
iignatyev@4592 493 return JNI_FALSE;
iignatyev@4592 494 }
iignatyev@4592 495 return (code->is_alive() && !code->is_marked_for_deoptimization());
iignatyev@4592 496 WB_END
iignatyev@4592 497
iignatyev@5541 498 WB_ENTRY(jboolean, WB_IsMethodCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr))
iignatyev@4592 499 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 500 CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
iignatyev@4592 501 MutexLockerEx mu(Compile_lock);
iignatyev@4592 502 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@5541 503 if (is_osr) {
iignatyev@5541 504 return CompilationPolicy::can_be_osr_compiled(mh, comp_level);
iignatyev@5541 505 } else {
iignatyev@5541 506 return CompilationPolicy::can_be_compiled(mh, comp_level);
iignatyev@5541 507 }
iignatyev@4592 508 WB_END
iignatyev@4592 509
iignatyev@4592 510 WB_ENTRY(jboolean, WB_IsMethodQueuedForCompilation(JNIEnv* env, jobject o, jobject method))
iignatyev@4592 511 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 512 CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
iignatyev@4592 513 MutexLockerEx mu(Compile_lock);
iignatyev@4592 514 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@4592 515 return mh->queued_for_compilation();
iignatyev@4592 516 WB_END
iignatyev@4592 517
iignatyev@5541 518 WB_ENTRY(jint, WB_GetMethodCompilationLevel(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
iignatyev@4592 519 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 520 CHECK_JNI_EXCEPTION_(env, CompLevel_none);
iignatyev@4592 521 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@5541 522 nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code();
iignatyev@4592 523 return (code != NULL ? code->comp_level() : CompLevel_none);
iignatyev@4592 524 WB_END
iignatyev@4592 525
iignatyev@5541 526 WB_ENTRY(void, WB_MakeMethodNotCompilable(JNIEnv* env, jobject o, jobject method, jint comp_level, jboolean is_osr))
iignatyev@4592 527 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 528 CHECK_JNI_EXCEPTION(env);
iignatyev@4592 529 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@5541 530 if (is_osr) {
iignatyev@5541 531 mh->set_not_osr_compilable(comp_level, true /* report */, "WhiteBox");
iignatyev@5541 532 } else {
iignatyev@5541 533 mh->set_not_compilable(comp_level, true /* report */, "WhiteBox");
iignatyev@5541 534 }
iignatyev@5541 535 WB_END
iignatyev@5541 536
iignatyev@5541 537 WB_ENTRY(jint, WB_GetMethodEntryBci(JNIEnv* env, jobject o, jobject method))
iignatyev@5541 538 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 539 CHECK_JNI_EXCEPTION_(env, InvocationEntryBci);
iignatyev@5541 540 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@5541 541 nmethod* code = mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false);
iignatyev@5541 542 return (code != NULL && code->is_osr_method() ? code->osr_entry_bci() : InvocationEntryBci);
iignatyev@4592 543 WB_END
iignatyev@4592 544
iignatyev@4908 545 WB_ENTRY(jboolean, WB_TestSetDontInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value))
iignatyev@4592 546 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 547 CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
iignatyev@4592 548 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@4592 549 bool result = mh->dont_inline();
iignatyev@4592 550 mh->set_dont_inline(value == JNI_TRUE);
iignatyev@4592 551 return result;
iignatyev@4592 552 WB_END
iignatyev@4592 553
iignatyev@5541 554 WB_ENTRY(jint, WB_GetCompileQueueSize(JNIEnv* env, jobject o, jint comp_level))
iignatyev@5541 555 if (comp_level == CompLevel_any) {
iignatyev@5541 556 return CompileBroker::queue_size(CompLevel_full_optimization) /* C2 */ +
iignatyev@5541 557 CompileBroker::queue_size(CompLevel_full_profile) /* C1 */;
iignatyev@5541 558 } else {
iignatyev@5541 559 return CompileBroker::queue_size(comp_level);
iignatyev@5541 560 }
iignatyev@4592 561 WB_END
iignatyev@4592 562
iignatyev@4908 563 WB_ENTRY(jboolean, WB_TestSetForceInlineMethod(JNIEnv* env, jobject o, jobject method, jboolean value))
iignatyev@4908 564 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 565 CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
iignatyev@4908 566 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@4908 567 bool result = mh->force_inline();
iignatyev@4908 568 mh->set_force_inline(value == JNI_TRUE);
iignatyev@4908 569 return result;
iignatyev@4908 570 WB_END
iignatyev@4908 571
jbachorik@9881 572 bool WhiteBox::compile_method(Method* method, int comp_level, int bci, Thread* THREAD) {
jbachorik@9881 573 // Screen for unavailable/bad comp level or null method
jbachorik@9881 574 AbstractCompiler* comp = CompileBroker::compiler(comp_level);
jbachorik@9881 575 if (method == NULL) {
jbachorik@9881 576 tty->print_cr("WB error: request to compile NULL method");
jbachorik@9881 577 return false;
jbachorik@9881 578 }
jbachorik@9881 579 if (comp_level > MIN2((CompLevel) TieredStopAtLevel, CompLevel_highest_tier)) {
jbachorik@9881 580 tty->print_cr("WB error: invalid compilation level %d", comp_level);
jbachorik@9881 581 return false;
jbachorik@9881 582 }
jbachorik@9881 583 if (comp == NULL) {
jbachorik@9881 584 tty->print_cr("WB error: no compiler for requested compilation level %d", comp_level);
jbachorik@9881 585 return false;
jbachorik@9881 586 }
jbachorik@9881 587
jbachorik@9881 588 methodHandle mh(THREAD, method);
jbachorik@9881 589
jbachorik@9881 590 // Compile method and check result
jbachorik@9881 591 nmethod* nm = CompileBroker::compile_method(mh, bci, comp_level, mh, mh->invocation_count(), "Whitebox", THREAD);
jbachorik@9881 592 MutexLocker mu(Compile_lock);
jbachorik@9881 593 bool is_queued = mh->queued_for_compilation();
jbachorik@9881 594 if (is_queued || nm != NULL) {
jbachorik@9881 595 return true;
jbachorik@9881 596 }
jbachorik@9881 597 tty->print("WB error: failed to compile at level %d method ", comp_level);
jbachorik@9881 598 mh->print_short_name(tty);
jbachorik@9881 599 tty->cr();
jbachorik@9881 600 if (is_queued) {
jbachorik@9881 601 tty->print_cr("WB error: blocking compilation is still in queue!");
jbachorik@9881 602 }
jbachorik@9881 603 return false;
jbachorik@9881 604 }
jbachorik@9881 605
iignatyev@5541 606 WB_ENTRY(jboolean, WB_EnqueueMethodForCompilation(JNIEnv* env, jobject o, jobject method, jint comp_level, jint bci))
iignatyev@4908 607 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 608 CHECK_JNI_EXCEPTION_(env, JNI_FALSE);
jbachorik@9881 609 return WhiteBox::compile_method(Method::checked_resolve_jmethod_id(jmid), comp_level, bci, THREAD);
jbachorik@9881 610 WB_END
jbachorik@9881 611
jbachorik@9881 612 WB_ENTRY(jboolean, WB_EnqueueInitializerForCompilation(JNIEnv* env, jobject o, jclass klass, jint comp_level))
jbachorik@9881 613 InstanceKlass* ik = InstanceKlass::cast(java_lang_Class::as_Klass(JNIHandles::resolve(klass)));
jbachorik@9881 614 Method* clinit = ik->class_initializer();
jbachorik@9881 615 if (clinit == NULL) {
jbachorik@9881 616 return false;
jbachorik@9881 617 }
jbachorik@9881 618 return WhiteBox::compile_method(clinit, comp_level, InvocationEntryBci, THREAD);
iignatyev@4908 619 WB_END
iignatyev@4908 620
iignatyev@6610 621 class VM_WhiteBoxOperation : public VM_Operation {
iignatyev@6610 622 public:
iignatyev@6610 623 VM_WhiteBoxOperation() { }
iignatyev@6610 624 VMOp_Type type() const { return VMOp_WhiteBoxOperation; }
iignatyev@6610 625 bool allow_nested_vm_operations() const { return true; }
iignatyev@6610 626 };
iignatyev@6610 627
iignatyev@6610 628 static AlwaysFalseClosure always_false;
iignatyev@6610 629
iignatyev@6610 630 class VM_WhiteBoxCleanMethodData : public VM_WhiteBoxOperation {
iignatyev@6610 631 public:
iignatyev@6610 632 VM_WhiteBoxCleanMethodData(MethodData* mdo) : _mdo(mdo) { }
iignatyev@6610 633 void doit() {
iignatyev@6610 634 _mdo->clean_method_data(&always_false);
iignatyev@6610 635 }
iignatyev@6610 636 private:
iignatyev@6610 637 MethodData* _mdo;
iignatyev@6610 638 };
iignatyev@6610 639
iignatyev@4908 640 WB_ENTRY(void, WB_ClearMethodState(JNIEnv* env, jobject o, jobject method))
iignatyev@4908 641 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
ccheung@6346 642 CHECK_JNI_EXCEPTION(env);
iignatyev@4908 643 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@4908 644 MutexLockerEx mu(Compile_lock);
iignatyev@4908 645 MethodData* mdo = mh->method_data();
jiangli@4938 646 MethodCounters* mcs = mh->method_counters();
iignatyev@4908 647
iignatyev@4908 648 if (mdo != NULL) {
iignatyev@4908 649 mdo->init();
iignatyev@4908 650 ResourceMark rm;
iignatyev@4908 651 int arg_count = mdo->method()->size_of_parameters();
iignatyev@4908 652 for (int i = 0; i < arg_count; i++) {
iignatyev@4908 653 mdo->set_arg_modified(i, 0);
iignatyev@4908 654 }
iignatyev@6610 655 VM_WhiteBoxCleanMethodData op(mdo);
iignatyev@6610 656 VMThread::execute(&op);
iignatyev@4908 657 }
iignatyev@4908 658
iignatyev@4908 659 mh->clear_not_c1_compilable();
iignatyev@4908 660 mh->clear_not_c2_compilable();
iignatyev@4908 661 mh->clear_not_c2_osr_compilable();
iignatyev@4908 662 NOT_PRODUCT(mh->set_compiled_invocation_count(0));
jiangli@4938 663 if (mcs != NULL) {
jiangli@4938 664 mcs->backedge_counter()->init();
jiangli@4938 665 mcs->invocation_counter()->init();
jiangli@4938 666 mcs->set_interpreter_invocation_count(0);
jiangli@4938 667 mcs->set_interpreter_throwout_count(0);
iignatyev@4908 668
iignatyev@4908 669 #ifdef TIERED
jiangli@4938 670 mcs->set_rate(0.0F);
vlivanov@7179 671 mh->set_prev_event_count(0);
vlivanov@7179 672 mh->set_prev_time(0);
iignatyev@4908 673 #endif
jiangli@4938 674 }
iignatyev@4908 675 WB_END
iignatyev@4908 676
xliu@9690 677 WB_ENTRY(void, WB_MarkMethodProfiled(JNIEnv* env, jobject o, jobject method))
xliu@9690 678 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
xliu@9690 679 CHECK_JNI_EXCEPTION(env);
xliu@9690 680 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
xliu@9690 681
xliu@9690 682 MethodData* mdo = mh->method_data();
xliu@9690 683 if (mdo == NULL) {
xliu@9690 684 Method::build_interpreter_method_data(mh, CHECK_AND_CLEAR);
xliu@9690 685 mdo = mh->method_data();
xliu@9690 686 }
xliu@9690 687 mdo->init();
xliu@9690 688 InvocationCounter* icnt = mdo->invocation_counter();
xliu@9690 689 InvocationCounter* bcnt = mdo->backedge_counter();
xliu@9690 690 // set i-counter according to AdvancedThresholdPolicy::is_method_profiled
xliu@9690 691 // because SimpleThresholdPolicy::call_predicate_helper uses > in jdk8u, that's why we need to plus one.
xliu@9690 692 icnt->set(InvocationCounter::wait_for_compile, Tier4MinInvocationThreshold + 1);
xliu@9690 693 bcnt->set(InvocationCounter::wait_for_compile, Tier4CompileThreshold + 1);
xliu@9690 694 WB_END
xliu@9690 695
iignatyev@6963 696 template <typename T>
neugens@9861 697 static bool GetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value, bool (*TAt)(const char*, T*, bool, bool)) {
iignatyev@6963 698 if (name == NULL) {
iignatyev@6963 699 return false;
iignatyev@6963 700 }
iignatyev@6963 701 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iignatyev@6963 702 const char* flag_name = env->GetStringUTFChars(name, NULL);
neugens@9861 703 bool result = (*TAt)(flag_name, value, true, true);
iignatyev@6963 704 env->ReleaseStringUTFChars(name, flag_name);
iignatyev@6963 705 return result;
iignatyev@6963 706 }
iignatyev@6963 707
iignatyev@6963 708 template <typename T>
iignatyev@6963 709 static bool SetVMFlag(JavaThread* thread, JNIEnv* env, jstring name, T* value, bool (*TAtPut)(const char*, T*, Flag::Flags)) {
iignatyev@6963 710 if (name == NULL) {
iignatyev@6963 711 return false;
iignatyev@6963 712 }
iignatyev@6963 713 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iignatyev@6963 714 const char* flag_name = env->GetStringUTFChars(name, NULL);
iignatyev@6963 715 bool result = (*TAtPut)(flag_name, value, Flag::INTERNAL);
iignatyev@6963 716 env->ReleaseStringUTFChars(name, flag_name);
iignatyev@6963 717 return result;
iignatyev@6963 718 }
iignatyev@6963 719
iignatyev@6963 720 template <typename T>
iignatyev@6963 721 static jobject box(JavaThread* thread, JNIEnv* env, Symbol* name, Symbol* sig, T value) {
iignatyev@6963 722 ResourceMark rm(thread);
iignatyev@6963 723 jclass clazz = env->FindClass(name->as_C_string());
iignatyev@6963 724 CHECK_JNI_EXCEPTION_(env, NULL);
iignatyev@6963 725 jmethodID methodID = env->GetStaticMethodID(clazz,
iignatyev@6963 726 vmSymbols::valueOf_name()->as_C_string(),
iignatyev@6963 727 sig->as_C_string());
iignatyev@6963 728 CHECK_JNI_EXCEPTION_(env, NULL);
iignatyev@6963 729 jobject result = env->CallStaticObjectMethod(clazz, methodID, value);
iignatyev@6963 730 CHECK_JNI_EXCEPTION_(env, NULL);
iignatyev@6963 731 return result;
iignatyev@6963 732 }
iignatyev@6963 733
iignatyev@6963 734 static jobject booleanBox(JavaThread* thread, JNIEnv* env, jboolean value) {
iignatyev@6963 735 return box(thread, env, vmSymbols::java_lang_Boolean(), vmSymbols::Boolean_valueOf_signature(), value);
iignatyev@6963 736 }
iignatyev@6963 737 static jobject integerBox(JavaThread* thread, JNIEnv* env, jint value) {
iignatyev@6963 738 return box(thread, env, vmSymbols::java_lang_Integer(), vmSymbols::Integer_valueOf_signature(), value);
iignatyev@6963 739 }
iignatyev@6963 740 static jobject longBox(JavaThread* thread, JNIEnv* env, jlong value) {
iignatyev@6963 741 return box(thread, env, vmSymbols::java_lang_Long(), vmSymbols::Long_valueOf_signature(), value);
iignatyev@6963 742 }
iignatyev@6963 743 /* static jobject floatBox(JavaThread* thread, JNIEnv* env, jfloat value) {
iignatyev@6963 744 return box(thread, env, vmSymbols::java_lang_Float(), vmSymbols::Float_valueOf_signature(), value);
iignatyev@6963 745 }*/
iignatyev@6963 746 static jobject doubleBox(JavaThread* thread, JNIEnv* env, jdouble value) {
iignatyev@6963 747 return box(thread, env, vmSymbols::java_lang_Double(), vmSymbols::Double_valueOf_signature(), value);
iignatyev@6963 748 }
iignatyev@6963 749
iignatyev@6963 750 WB_ENTRY(jobject, WB_GetBooleanVMFlag(JNIEnv* env, jobject o, jstring name))
iignatyev@6963 751 bool result;
iignatyev@6963 752 if (GetVMFlag <bool> (thread, env, name, &result, &CommandLineFlags::boolAt)) {
iignatyev@6963 753 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iignatyev@6963 754 return booleanBox(thread, env, result);
iignatyev@6963 755 }
iignatyev@6963 756 return NULL;
iignatyev@6963 757 WB_END
iignatyev@6963 758
iignatyev@6963 759 WB_ENTRY(jobject, WB_GetIntxVMFlag(JNIEnv* env, jobject o, jstring name))
iignatyev@6963 760 intx result;
iignatyev@6963 761 if (GetVMFlag <intx> (thread, env, name, &result, &CommandLineFlags::intxAt)) {
iignatyev@6963 762 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iignatyev@6963 763 return longBox(thread, env, result);
iignatyev@6963 764 }
iignatyev@6963 765 return NULL;
iignatyev@6963 766 WB_END
iignatyev@6963 767
iignatyev@6963 768 WB_ENTRY(jobject, WB_GetUintxVMFlag(JNIEnv* env, jobject o, jstring name))
iignatyev@6963 769 uintx result;
iignatyev@6963 770 if (GetVMFlag <uintx> (thread, env, name, &result, &CommandLineFlags::uintxAt)) {
iignatyev@6963 771 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iignatyev@6963 772 return longBox(thread, env, result);
iignatyev@6963 773 }
iignatyev@6963 774 return NULL;
iignatyev@6963 775 WB_END
iignatyev@6963 776
iignatyev@6963 777 WB_ENTRY(jobject, WB_GetUint64VMFlag(JNIEnv* env, jobject o, jstring name))
iignatyev@6963 778 uint64_t result;
iignatyev@6963 779 if (GetVMFlag <uint64_t> (thread, env, name, &result, &CommandLineFlags::uint64_tAt)) {
iignatyev@6963 780 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iignatyev@6963 781 return longBox(thread, env, result);
iignatyev@6963 782 }
iignatyev@6963 783 return NULL;
iignatyev@6963 784 WB_END
iignatyev@6963 785
iignatyev@6963 786 WB_ENTRY(jobject, WB_GetDoubleVMFlag(JNIEnv* env, jobject o, jstring name))
iignatyev@6963 787 double result;
iignatyev@6963 788 if (GetVMFlag <double> (thread, env, name, &result, &CommandLineFlags::doubleAt)) {
iignatyev@6963 789 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iignatyev@6963 790 return doubleBox(thread, env, result);
iignatyev@6963 791 }
iignatyev@6963 792 return NULL;
iignatyev@6963 793 WB_END
iignatyev@6963 794
iignatyev@6963 795 WB_ENTRY(jstring, WB_GetStringVMFlag(JNIEnv* env, jobject o, jstring name))
iignatyev@6963 796 ccstr ccstrResult;
iignatyev@6963 797 if (GetVMFlag <ccstr> (thread, env, name, &ccstrResult, &CommandLineFlags::ccstrAt)) {
iignatyev@6963 798 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iignatyev@6963 799 jstring result = env->NewStringUTF(ccstrResult);
iignatyev@6963 800 CHECK_JNI_EXCEPTION_(env, NULL);
iignatyev@6963 801 return result;
iignatyev@6963 802 }
iignatyev@6963 803 return NULL;
iignatyev@6963 804 WB_END
iignatyev@6963 805
iignatyev@6963 806 WB_ENTRY(void, WB_SetBooleanVMFlag(JNIEnv* env, jobject o, jstring name, jboolean value))
iignatyev@6963 807 bool result = value == JNI_TRUE ? true : false;
iignatyev@6963 808 SetVMFlag <bool> (thread, env, name, &result, &CommandLineFlags::boolAtPut);
iignatyev@6963 809 WB_END
iignatyev@6963 810
iignatyev@6963 811 WB_ENTRY(void, WB_SetIntxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
iignatyev@6963 812 intx result = value;
iignatyev@6963 813 SetVMFlag <intx> (thread, env, name, &result, &CommandLineFlags::intxAtPut);
iignatyev@6963 814 WB_END
iignatyev@6963 815
iignatyev@6963 816 WB_ENTRY(void, WB_SetUintxVMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
iignatyev@6963 817 uintx result = value;
iignatyev@6963 818 SetVMFlag <uintx> (thread, env, name, &result, &CommandLineFlags::uintxAtPut);
iignatyev@6963 819 WB_END
iignatyev@6963 820
iignatyev@6963 821 WB_ENTRY(void, WB_SetUint64VMFlag(JNIEnv* env, jobject o, jstring name, jlong value))
iignatyev@6963 822 uint64_t result = value;
iignatyev@6963 823 SetVMFlag <uint64_t> (thread, env, name, &result, &CommandLineFlags::uint64_tAtPut);
iignatyev@6963 824 WB_END
iignatyev@6963 825
iignatyev@6963 826 WB_ENTRY(void, WB_SetDoubleVMFlag(JNIEnv* env, jobject o, jstring name, jdouble value))
iignatyev@6963 827 double result = value;
iignatyev@6963 828 SetVMFlag <double> (thread, env, name, &result, &CommandLineFlags::doubleAtPut);
iignatyev@6963 829 WB_END
iignatyev@6963 830
iignatyev@6963 831 WB_ENTRY(void, WB_SetStringVMFlag(JNIEnv* env, jobject o, jstring name, jstring value))
iignatyev@6963 832 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
iignatyev@6963 833 const char* ccstrValue = (value == NULL) ? NULL : env->GetStringUTFChars(value, NULL);
iignatyev@6963 834 ccstr ccstrResult = ccstrValue;
iignatyev@6963 835 bool needFree;
iignatyev@6963 836 {
iignatyev@6963 837 ThreadInVMfromNative ttvfn(thread); // back to VM
iignatyev@6963 838 needFree = SetVMFlag <ccstr> (thread, env, name, &ccstrResult, &CommandLineFlags::ccstrAtPut);
iignatyev@6963 839 }
iignatyev@6963 840 if (value != NULL) {
iignatyev@6963 841 env->ReleaseStringUTFChars(value, ccstrValue);
iignatyev@6963 842 }
iignatyev@6963 843 if (needFree) {
iignatyev@6963 844 FREE_C_HEAP_ARRAY(char, ccstrResult, mtInternal);
iignatyev@6963 845 }
iignatyev@6963 846 WB_END
iignatyev@6963 847
mgerdin@4850 848 WB_ENTRY(jboolean, WB_IsInStringTable(JNIEnv* env, jobject o, jstring javaString))
mgerdin@4850 849 ResourceMark rm(THREAD);
mgerdin@4850 850 int len;
hseigel@4987 851 jchar* name = java_lang_String::as_unicode_string(JNIHandles::resolve(javaString), len, CHECK_false);
hseigel@4987 852 return (StringTable::lookup(name, len) != NULL);
mgerdin@4850 853 WB_END
mgerdin@4850 854
mgerdin@4850 855 WB_ENTRY(void, WB_FullGC(JNIEnv* env, jobject o))
mgerdin@4850 856 Universe::heap()->collector_policy()->set_should_clear_all_soft_refs(true);
mgerdin@4850 857 Universe::heap()->collect(GCCause::_last_ditch_collection);
sjohanss@7165 858 #if INCLUDE_ALL_GCS
sjohanss@7165 859 if (UseG1GC) {
sjohanss@7165 860 // Needs to be cleared explicitly for G1
sjohanss@7165 861 Universe::heap()->collector_policy()->set_should_clear_all_soft_refs(false);
sjohanss@7165 862 }
sjohanss@7165 863 #endif // INCLUDE_ALL_GCS
mgerdin@4850 864 WB_END
mgerdin@4850 865
tschatzl@7071 866 WB_ENTRY(void, WB_YoungGC(JNIEnv* env, jobject o))
tschatzl@7071 867 Universe::heap()->collect(GCCause::_wb_young_gc);
tschatzl@7071 868 WB_END
mikael@4989 869
mikael@5174 870 WB_ENTRY(void, WB_ReadReservedMemory(JNIEnv* env, jobject o))
mikael@5174 871 // static+volatile in order to force the read to happen
mikael@5174 872 // (not be eliminated by the compiler)
mikael@5174 873 static char c;
mikael@5174 874 static volatile char* p;
mikael@5174 875
mikael@5174 876 p = os::reserve_memory(os::vm_allocation_granularity(), NULL, 0);
mikael@5174 877 if (p == NULL) {
mikael@5174 878 THROW_MSG(vmSymbols::java_lang_OutOfMemoryError(), "Failed to reserve memory");
mikael@5174 879 }
mikael@5174 880
mikael@5174 881 c = *p;
mikael@4989 882 WB_END
mikael@4989 883
iignatyev@6427 884 WB_ENTRY(jstring, WB_GetCPUFeatures(JNIEnv* env, jobject o))
iignatyev@6427 885 const char* cpu_features = VM_Version::cpu_features();
iignatyev@6427 886 ThreadToNativeFromVM ttn(thread);
iignatyev@6427 887 jstring features_string = env->NewStringUTF(cpu_features);
iignatyev@6427 888
iignatyev@6427 889 CHECK_JNI_EXCEPTION_(env, NULL);
iignatyev@6427 890
iignatyev@6427 891 return features_string;
iignatyev@6427 892 WB_END
iignatyev@6427 893
neugens@9861 894 int WhiteBox::get_blob_type(const CodeBlob* code) {
neugens@9861 895 guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled");
neugens@9861 896 return CodeBlobType::All;;
neugens@9861 897 }
neugens@9861 898
neugens@9861 899 struct CodeBlobStub {
neugens@9861 900 CodeBlobStub(const CodeBlob* blob) :
neugens@9861 901 name(os::strdup(blob->name())),
neugens@9861 902 size(blob->size()),
neugens@9861 903 blob_type(WhiteBox::get_blob_type(blob)),
neugens@9861 904 address((jlong) blob) { }
neugens@9861 905 ~CodeBlobStub() { os::free((void*) name); }
neugens@9861 906 const char* const name;
neugens@9861 907 const jint size;
neugens@9861 908 const jint blob_type;
neugens@9861 909 const jlong address;
neugens@9861 910 };
neugens@9861 911
neugens@9861 912 static jobjectArray codeBlob2objectArray(JavaThread* thread, JNIEnv* env, CodeBlobStub* cb) {
neugens@9861 913 jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string());
neugens@9861 914 CHECK_JNI_EXCEPTION_(env, NULL);
neugens@9861 915 jobjectArray result = env->NewObjectArray(4, clazz, NULL);
neugens@9861 916
neugens@9861 917 jstring name = env->NewStringUTF(cb->name);
neugens@9861 918 CHECK_JNI_EXCEPTION_(env, NULL);
neugens@9861 919 env->SetObjectArrayElement(result, 0, name);
neugens@9861 920
neugens@9861 921 jobject obj = integerBox(thread, env, cb->size);
neugens@9861 922 CHECK_JNI_EXCEPTION_(env, NULL);
neugens@9861 923 env->SetObjectArrayElement(result, 1, obj);
neugens@9861 924
neugens@9861 925 obj = integerBox(thread, env, cb->blob_type);
neugens@9861 926 CHECK_JNI_EXCEPTION_(env, NULL);
neugens@9861 927 env->SetObjectArrayElement(result, 2, obj);
neugens@9861 928
neugens@9861 929 obj = longBox(thread, env, cb->address);
neugens@9861 930 CHECK_JNI_EXCEPTION_(env, NULL);
neugens@9861 931 env->SetObjectArrayElement(result, 3, obj);
neugens@9861 932
neugens@9861 933 return result;
neugens@9861 934 }
iignatyev@6525 935
iignatyev@6525 936 WB_ENTRY(jobjectArray, WB_GetNMethod(JNIEnv* env, jobject o, jobject method, jboolean is_osr))
iignatyev@6525 937 ResourceMark rm(THREAD);
iignatyev@6525 938 jmethodID jmid = reflected_method_to_jmid(thread, env, method);
iignatyev@6525 939 CHECK_JNI_EXCEPTION_(env, NULL);
iignatyev@6525 940 methodHandle mh(THREAD, Method::checked_resolve_jmethod_id(jmid));
iignatyev@6525 941 nmethod* code = is_osr ? mh->lookup_osr_nmethod_for(InvocationEntryBci, CompLevel_none, false) : mh->code();
iignatyev@6525 942 jobjectArray result = NULL;
iignatyev@6525 943 if (code == NULL) {
iignatyev@6525 944 return result;
iignatyev@6525 945 }
iignatyev@6525 946 int insts_size = code->insts_size();
iignatyev@6525 947
iignatyev@6525 948 ThreadToNativeFromVM ttn(thread);
iignatyev@6525 949 jclass clazz = env->FindClass(vmSymbols::java_lang_Object()->as_C_string());
iignatyev@6525 950 CHECK_JNI_EXCEPTION_(env, NULL);
xliu@9689 951 result = env->NewObjectArray(3, clazz, NULL);
iignatyev@6525 952 if (result == NULL) {
iignatyev@6525 953 return result;
iignatyev@6525 954 }
iignatyev@6525 955
xliu@9689 956 jobject level = integerBox(thread, env, code->comp_level());
iignatyev@6525 957 CHECK_JNI_EXCEPTION_(env, NULL);
xliu@9689 958 env->SetObjectArrayElement(result, 0, level);
xliu@9689 959
xliu@9689 960 jobject id = integerBox(thread, env, code->compile_id());
xliu@9689 961 CHECK_JNI_EXCEPTION_(env, NULL);
xliu@9689 962 env->SetObjectArrayElement(result, 1, id);
iignatyev@6525 963
iignatyev@6525 964 jbyteArray insts = env->NewByteArray(insts_size);
iignatyev@6525 965 CHECK_JNI_EXCEPTION_(env, NULL);
iignatyev@6525 966 env->SetByteArrayRegion(insts, 0, insts_size, (jbyte*) code->insts_begin());
xliu@9689 967 env->SetObjectArrayElement(result, 2, insts);
iignatyev@6525 968
iignatyev@6525 969 return result;
iignatyev@6525 970 WB_END
iignatyev@6525 971
neugens@9861 972 CodeBlob* WhiteBox::allocate_code_blob(int size, int blob_type) {
neugens@9861 973 guarantee(WhiteBoxAPI, "internal testing API :: WhiteBox has to be enabled");
neugens@9861 974 BufferBlob* blob;
neugens@9861 975 int full_size = CodeBlob::align_code_offset(sizeof(BufferBlob));
neugens@9861 976 if (full_size < size) {
neugens@9861 977 full_size += align_up(size - full_size, oopSize);
neugens@9861 978 }
neugens@9861 979 {
neugens@9861 980 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag);
neugens@9861 981 blob = (BufferBlob*) CodeCache::allocate(full_size);
neugens@9861 982 ::new (blob) BufferBlob("WB::DummyBlob", full_size);
neugens@9861 983 }
neugens@9861 984 // Track memory usage statistic after releasing CodeCache_lock
neugens@9861 985 MemoryService::track_code_cache_memory_usage();
neugens@9861 986 return blob;
neugens@9861 987 }
neugens@9861 988
neugens@9861 989 WB_ENTRY(jlong, WB_AllocateCodeBlob(JNIEnv* env, jobject o, jint size, jint blob_type))
neugens@9861 990 if (size < 0) {
neugens@9861 991 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
neugens@9861 992 err_msg("WB_AllocateCodeBlob: size is negative: " INT32_FORMAT, size));
neugens@9861 993 }
neugens@9861 994 return (jlong) WhiteBox::allocate_code_blob(size, blob_type);
neugens@9861 995 WB_END
neugens@9861 996
neugens@9861 997 WB_ENTRY(void, WB_FreeCodeBlob(JNIEnv* env, jobject o, jlong addr))
neugens@9861 998 if (addr == 0) {
neugens@9861 999 return;
neugens@9861 1000 }
neugens@9861 1001 BufferBlob::free((BufferBlob*) addr);
neugens@9861 1002 WB_END
neugens@9861 1003
neugens@9861 1004 WB_ENTRY(jobjectArray, WB_GetCodeBlob(JNIEnv* env, jobject o, jlong addr))
neugens@9861 1005 if (addr == 0) {
neugens@9861 1006 THROW_MSG_NULL(vmSymbols::java_lang_NullPointerException(),
neugens@9861 1007 "WB_GetCodeBlob: addr is null");
neugens@9861 1008 }
neugens@9861 1009 ThreadToNativeFromVM ttn(thread);
neugens@9861 1010 CodeBlobStub stub((CodeBlob*) addr);
neugens@9861 1011 return codeBlob2objectArray(thread, env, &stub);
neugens@9861 1012 WB_END
iignatyev@6525 1013
stefank@6992 1014 int WhiteBox::array_bytes_to_length(size_t bytes) {
stefank@6992 1015 return Array<u1>::bytes_to_length(bytes);
stefank@6992 1016 }
stefank@6992 1017
stefank@6992 1018 WB_ENTRY(jlong, WB_AllocateMetaspace(JNIEnv* env, jobject wb, jobject class_loader, jlong size))
stefank@6992 1019 if (size < 0) {
stefank@6992 1020 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
stefank@6992 1021 err_msg("WB_AllocateMetaspace: size is negative: " JLONG_FORMAT, size));
stefank@6992 1022 }
stefank@6992 1023
stefank@6992 1024 oop class_loader_oop = JNIHandles::resolve(class_loader);
stefank@6992 1025 ClassLoaderData* cld = class_loader_oop != NULL
stefank@6992 1026 ? java_lang_ClassLoader::loader_data(class_loader_oop)
stefank@6992 1027 : ClassLoaderData::the_null_class_loader_data();
stefank@6992 1028
stefank@6992 1029 void* metadata = MetadataFactory::new_writeable_array<u1>(cld, WhiteBox::array_bytes_to_length((size_t)size), thread);
stefank@6992 1030
stefank@6992 1031 return (jlong)(uintptr_t)metadata;
stefank@6992 1032 WB_END
stefank@6992 1033
stefank@6992 1034 WB_ENTRY(void, WB_FreeMetaspace(JNIEnv* env, jobject wb, jobject class_loader, jlong addr, jlong size))
stefank@6992 1035 oop class_loader_oop = JNIHandles::resolve(class_loader);
stefank@6992 1036 ClassLoaderData* cld = class_loader_oop != NULL
stefank@6992 1037 ? java_lang_ClassLoader::loader_data(class_loader_oop)
stefank@6992 1038 : ClassLoaderData::the_null_class_loader_data();
stefank@6992 1039
stefank@6992 1040 MetadataFactory::free_array(cld, (Array<u1>*)(uintptr_t)addr);
stefank@6992 1041 WB_END
stefank@6992 1042
ehelin@7254 1043 WB_ENTRY(jlong, WB_IncMetaspaceCapacityUntilGC(JNIEnv* env, jobject wb, jlong inc))
ehelin@7254 1044 if (inc < 0) {
ehelin@7254 1045 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
ehelin@7254 1046 err_msg("WB_IncMetaspaceCapacityUntilGC: inc is negative: " JLONG_FORMAT, inc));
ehelin@7254 1047 }
ehelin@7254 1048
ehelin@7254 1049 jlong max_size_t = (jlong) ((size_t) -1);
ehelin@7254 1050 if (inc > max_size_t) {
ehelin@7254 1051 THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),
ehelin@7254 1052 err_msg("WB_IncMetaspaceCapacityUntilGC: inc does not fit in size_t: " JLONG_FORMAT, inc));
ehelin@7254 1053 }
ehelin@7254 1054
ehelin@7254 1055 size_t new_cap_until_GC = 0;
ehelin@7254 1056 size_t aligned_inc = align_size_down((size_t) inc, Metaspace::commit_alignment());
ehelin@7254 1057 bool success = MetaspaceGC::inc_capacity_until_GC(aligned_inc, &new_cap_until_GC);
ehelin@7254 1058 if (!success) {
ehelin@7254 1059 THROW_MSG_0(vmSymbols::java_lang_IllegalStateException(),
ehelin@7254 1060 "WB_IncMetaspaceCapacityUntilGC: could not increase capacity until GC "
ehelin@7254 1061 "due to contention with another thread");
ehelin@7254 1062 }
ehelin@7254 1063 return (jlong) new_cap_until_GC;
ehelin@7254 1064 WB_END
ehelin@7254 1065
ehelin@7254 1066 WB_ENTRY(jlong, WB_MetaspaceCapacityUntilGC(JNIEnv* env, jobject wb))
ehelin@7254 1067 return (jlong) MetaspaceGC::capacity_until_GC();
ehelin@7254 1068 WB_END
ehelin@7254 1069
iklam@8497 1070 WB_ENTRY(jboolean, WB_IsSharedClass(JNIEnv* env, jobject wb, jclass clazz))
iklam@8497 1071 return (jboolean)MetaspaceShared::is_in_shared_space(java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz)));
iklam@8497 1072 WB_END
iklam@8497 1073
bmoloden@7797 1074 WB_ENTRY(jboolean, WB_IsMonitorInflated(JNIEnv* env, jobject wb, jobject obj))
bmoloden@7797 1075 oop obj_oop = JNIHandles::resolve(obj);
bmoloden@7797 1076 return (jboolean) obj_oop->mark()->has_monitor();
bmoloden@7797 1077 WB_END
bmoloden@7797 1078
bmoloden@7797 1079 WB_ENTRY(void, WB_ForceSafepoint(JNIEnv* env, jobject wb))
bmoloden@7797 1080 VM_ForceSafepoint force_safepoint_op;
bmoloden@7797 1081 VMThread::execute(&force_safepoint_op);
bmoloden@7797 1082 WB_END
bmoloden@7797 1083
jbachorik@9881 1084 WB_ENTRY(jlong, WB_GetHeapAlignment(JNIEnv* env, jobject o))
jbachorik@9881 1085 size_t alignment = Universe::heap()->collector_policy()->heap_alignment();
jbachorik@9881 1086 return (jlong)alignment;
jbachorik@9881 1087 WB_END
jbachorik@9881 1088
nloodin@3681 1089 //Some convenience methods to deal with objects from java
nloodin@3681 1090 int WhiteBox::offset_for_field(const char* field_name, oop object,
nloodin@3681 1091 Symbol* signature_symbol) {
nloodin@3681 1092 assert(field_name != NULL && strlen(field_name) > 0, "Field name not valid");
nloodin@3681 1093 Thread* THREAD = Thread::current();
nloodin@3681 1094
nloodin@3681 1095 //Get the class of our object
coleenp@4037 1096 Klass* arg_klass = object->klass();
nloodin@3681 1097 //Turn it into an instance-klass
coleenp@4037 1098 InstanceKlass* ik = InstanceKlass::cast(arg_klass);
nloodin@3681 1099
nloodin@3681 1100 //Create symbols to look for in the class
nloodin@3681 1101 TempNewSymbol name_symbol = SymbolTable::lookup(field_name, (int) strlen(field_name),
nloodin@3681 1102 THREAD);
nloodin@3681 1103
nloodin@3681 1104 //To be filled in with an offset of the field we're looking for
nloodin@3681 1105 fieldDescriptor fd;
nloodin@3681 1106
coleenp@4037 1107 Klass* res = ik->find_field(name_symbol, signature_symbol, &fd);
nloodin@3681 1108 if (res == NULL) {
nloodin@3681 1109 tty->print_cr("Invalid layout of %s at %s", ik->external_name(),
nloodin@3681 1110 name_symbol->as_C_string());
dbuck@7788 1111 vm_exit_during_initialization("Invalid layout of preloaded class: use -XX:+TraceClassLoading to see the origin of the problem class");
nloodin@3681 1112 }
nloodin@3681 1113
nloodin@3681 1114 //fetch the field at the offset we've found
nloodin@3681 1115 int dest_offset = fd.offset();
nloodin@3681 1116
nloodin@3681 1117 return dest_offset;
nloodin@3681 1118 }
nloodin@3681 1119
nloodin@3681 1120
nloodin@3681 1121 const char* WhiteBox::lookup_jstring(const char* field_name, oop object) {
nloodin@3681 1122 int offset = offset_for_field(field_name, object,
nloodin@3681 1123 vmSymbols::string_signature());
nloodin@3681 1124 oop string = object->obj_field(offset);
sla@3905 1125 if (string == NULL) {
sla@3905 1126 return NULL;
sla@3905 1127 }
nloodin@3681 1128 const char* ret = java_lang_String::as_utf8_string(string);
nloodin@3681 1129 return ret;
nloodin@3681 1130 }
nloodin@3681 1131
nloodin@3681 1132 bool WhiteBox::lookup_bool(const char* field_name, oop object) {
nloodin@3681 1133 int offset =
nloodin@3681 1134 offset_for_field(field_name, object, vmSymbols::bool_signature());
nloodin@3681 1135 bool ret = (object->bool_field(offset) == JNI_TRUE);
nloodin@3681 1136 return ret;
nloodin@3681 1137 }
nloodin@3681 1138
sjohanss@7165 1139 void WhiteBox::register_methods(JNIEnv* env, jclass wbclass, JavaThread* thread, JNINativeMethod* method_array, int method_count) {
sjohanss@7165 1140 ResourceMark rm;
sjohanss@7165 1141 ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI
sjohanss@7165 1142
sjohanss@7165 1143 // one by one registration natives for exception catching
sjohanss@7165 1144 jclass no_such_method_error_klass = env->FindClass(vmSymbols::java_lang_NoSuchMethodError()->as_C_string());
sjohanss@7165 1145 CHECK_JNI_EXCEPTION(env);
sjohanss@7165 1146 for (int i = 0, n = method_count; i < n; ++i) {
sjohanss@7165 1147 // Skip dummy entries
sjohanss@7165 1148 if (method_array[i].fnPtr == NULL) continue;
sjohanss@7165 1149 if (env->RegisterNatives(wbclass, &method_array[i], 1) != 0) {
sjohanss@7165 1150 jthrowable throwable_obj = env->ExceptionOccurred();
sjohanss@7165 1151 if (throwable_obj != NULL) {
sjohanss@7165 1152 env->ExceptionClear();
sjohanss@7165 1153 if (env->IsInstanceOf(throwable_obj, no_such_method_error_klass)) {
sjohanss@7165 1154 // NoSuchMethodError is thrown when a method can't be found or a method is not native.
sjohanss@7165 1155 // Ignoring the exception since it is not preventing use of other WhiteBox methods.
sjohanss@7165 1156 tty->print_cr("Warning: 'NoSuchMethodError' on register of sun.hotspot.WhiteBox::%s%s",
sjohanss@7165 1157 method_array[i].name, method_array[i].signature);
sjohanss@7165 1158 }
sjohanss@7165 1159 } else {
sjohanss@7165 1160 // Registration failed unexpectedly.
sjohanss@7165 1161 tty->print_cr("Warning: unexpected error on register of sun.hotspot.WhiteBox::%s%s. All methods will be unregistered",
sjohanss@7165 1162 method_array[i].name, method_array[i].signature);
sjohanss@7165 1163 env->UnregisterNatives(wbclass);
sjohanss@7165 1164 break;
sjohanss@7165 1165 }
sjohanss@7165 1166 }
sjohanss@7165 1167 }
sjohanss@7165 1168 }
nloodin@3681 1169
dbuck@9186 1170 // Checks that the library libfile has the noexecstack bit set.
dbuck@9186 1171 WB_ENTRY(jboolean, WB_CheckLibSpecifiesNoexecstack(JNIEnv* env, jobject o, jstring libfile))
dbuck@9186 1172 jboolean ret = false;
dbuck@9186 1173 #ifdef LINUX
dbuck@9186 1174 // Can't be in VM when we call JNI.
dbuck@9186 1175 ThreadToNativeFromVM ttnfv(thread);
dbuck@9186 1176 const char* lf = env->GetStringUTFChars(libfile, NULL);
dbuck@9186 1177 CHECK_JNI_EXCEPTION_(env, 0);
dbuck@9186 1178 ElfFile ef(lf);
dbuck@9186 1179 ret = (jboolean) ef.specifies_noexecstack();
dbuck@9186 1180 env->ReleaseStringUTFChars(libfile, lf);
dbuck@9186 1181 #endif
dbuck@9186 1182 return ret;
dbuck@9186 1183 WB_END
dbuck@9186 1184
vaibhav@9421 1185 WB_ENTRY(jboolean, WB_IsContainerized(JNIEnv* env, jobject o))
vaibhav@9421 1186 LINUX_ONLY(return OSContainer::is_containerized();)
vaibhav@9421 1187 return false;
vaibhav@9421 1188 WB_END
vaibhav@9421 1189
vaibhav@9421 1190 WB_ENTRY(void, WB_PrintOsInfo(JNIEnv* env, jobject o))
vaibhav@9421 1191 os::print_os_info(tty);
vaibhav@9421 1192 WB_END
vaibhav@9421 1193
mgerdin@3619 1194 #define CC (char*)
mgerdin@3619 1195
mgerdin@3619 1196 static JNINativeMethod methods[] = {
mgerdin@3619 1197 {CC"getObjectAddress", CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectAddress },
tschatzl@7071 1198 {CC"getObjectSize", CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectSize },
tschatzl@7071 1199 {CC"isObjectInOldGen", CC"(Ljava/lang/Object;)Z", (void*)&WB_isObjectInOldGen },
mgerdin@3619 1200 {CC"getHeapOopSize", CC"()I", (void*)&WB_GetHeapOopSize },
minqi@7779 1201 {CC"getVMPageSize", CC"()I", (void*)&WB_GetVMPageSize },
tschatzl@7781 1202 {CC"getVMLargePageSize", CC"()J", (void*)&WB_GetVMLargePageSize},
jbachorik@9881 1203 {CC"getHeapAlignment", CC"()J", (void*)&WB_GetHeapAlignment },
iignatyev@4592 1204 {CC"isClassAlive0", CC"(Ljava/lang/String;)Z", (void*)&WB_IsClassAlive },
iklam@7322 1205 {CC"classKnownToNotExist",
iklam@7322 1206 CC"(Ljava/lang/ClassLoader;Ljava/lang/String;)Z",(void*)&WB_ClassKnownToNotExist},
iklam@7322 1207 {CC"getLookupCacheURLs", CC"(Ljava/lang/ClassLoader;)[Ljava/net/URL;", (void*)&WB_GetLookupCacheURLs},
iklam@7322 1208 {CC"getLookupCacheMatches", CC"(Ljava/lang/ClassLoader;Ljava/lang/String;)[I",
iklam@7322 1209 (void*)&WB_GetLookupCacheMatches},
iignatyev@4592 1210 {CC"parseCommandLine",
iignatyev@4592 1211 CC"(Ljava/lang/String;[Lsun/hotspot/parser/DiagnosticCommand;)[Ljava/lang/Object;",
nloodin@3681 1212 (void*) &WB_ParseCommandLine
nloodin@3681 1213 },
iklam@7381 1214 {CC"addToBootstrapClassLoaderSearch", CC"(Ljava/lang/String;)V",
iklam@7381 1215 (void*)&WB_AddToBootstrapClassLoaderSearch},
iklam@7381 1216 {CC"addToSystemClassLoaderSearch", CC"(Ljava/lang/String;)V",
iklam@7381 1217 (void*)&WB_AddToSystemClassLoaderSearch},
tschatzl@5701 1218 {CC"getCompressedOopsMaxHeapSize", CC"()J",
tschatzl@5701 1219 (void*)&WB_GetCompressedOopsMaxHeapSize},
tschatzl@5073 1220 {CC"printHeapSizes", CC"()V", (void*)&WB_PrintHeapSizes },
mgerdin@6078 1221 {CC"runMemoryUnitTests", CC"()V", (void*)&WB_RunMemoryUnitTests},
mgerdin@6078 1222 {CC"readFromNoaccessArea",CC"()V", (void*)&WB_ReadFromNoaccessArea},
mgerdin@6078 1223 {CC"stressVirtualSpaceResize",CC"(JJJ)I", (void*)&WB_StressVirtualSpaceResize},
iklam@8497 1224 {CC"isSharedClass", CC"(Ljava/lang/Class;)Z", (void*)&WB_IsSharedClass },
jprovino@4542 1225 #if INCLUDE_ALL_GCS
mgerdin@3619 1226 {CC"g1InConcurrentMark", CC"()Z", (void*)&WB_G1InConcurrentMark},
mgerdin@3619 1227 {CC"g1IsHumongous", CC"(Ljava/lang/Object;)Z", (void*)&WB_G1IsHumongous },
azakharov@7835 1228 {CC"g1NumMaxRegions", CC"()J", (void*)&WB_G1NumMaxRegions },
mgerdin@3619 1229 {CC"g1NumFreeRegions", CC"()J", (void*)&WB_G1NumFreeRegions },
mgerdin@3619 1230 {CC"g1RegionSize", CC"()I", (void*)&WB_G1RegionSize },
kevinw@8194 1231 {CC"g1StartConcMarkCycle", CC"()Z", (void*)&WB_G1StartMarkCycle },
azakharov@7835 1232 {CC"g1AuxiliaryMemoryUsage", CC"()Ljava/lang/management/MemoryUsage;",
azakharov@7835 1233 (void*)&WB_G1AuxiliaryMemoryUsage },
jprovino@4542 1234 #endif // INCLUDE_ALL_GCS
cjplummer@5586 1235 #if INCLUDE_NMT
ctornqvi@4885 1236 {CC"NMTMalloc", CC"(J)J", (void*)&WB_NMTMalloc },
zgu@7074 1237 {CC"NMTMallocWithPseudoStack", CC"(JI)J", (void*)&WB_NMTMallocWithPseudoStack},
zgu@9621 1238 {CC"NMTMallocWithPseudoStackAndType", CC"(JII)J", (void*)&WB_NMTMallocWithPseudoStackAndType},
ctornqvi@4885 1239 {CC"NMTFree", CC"(J)V", (void*)&WB_NMTFree },
ctornqvi@4885 1240 {CC"NMTReserveMemory", CC"(J)J", (void*)&WB_NMTReserveMemory },
ctornqvi@4885 1241 {CC"NMTCommitMemory", CC"(JJ)V", (void*)&WB_NMTCommitMemory },
ctornqvi@4885 1242 {CC"NMTUncommitMemory", CC"(JJ)V", (void*)&WB_NMTUncommitMemory },
ctornqvi@4885 1243 {CC"NMTReleaseMemory", CC"(JJ)V", (void*)&WB_NMTReleaseMemory },
cjplummer@5586 1244 {CC"NMTIsDetailSupported",CC"()Z", (void*)&WB_NMTIsDetailSupported},
coleenp@7267 1245 {CC"NMTChangeTrackingLevel", CC"()Z", (void*)&WB_NMTChangeTrackingLevel},
gtriantafill@7342 1246 {CC"NMTGetHashSize", CC"()I", (void*)&WB_NMTGetHashSize },
ctornqvi@4512 1247 #endif // INCLUDE_NMT
iignatyev@4592 1248 {CC"deoptimizeAll", CC"()V", (void*)&WB_DeoptimizeAll },
iignatyev@5541 1249 {CC"deoptimizeMethod", CC"(Ljava/lang/reflect/Executable;Z)I",
iignatyev@4592 1250 (void*)&WB_DeoptimizeMethod },
iignatyev@5541 1251 {CC"isMethodCompiled", CC"(Ljava/lang/reflect/Executable;Z)Z",
iignatyev@4592 1252 (void*)&WB_IsMethodCompiled },
iignatyev@5541 1253 {CC"isMethodCompilable", CC"(Ljava/lang/reflect/Executable;IZ)Z",
iignatyev@4592 1254 (void*)&WB_IsMethodCompilable},
iignatyev@4592 1255 {CC"isMethodQueuedForCompilation",
iignatyev@4951 1256 CC"(Ljava/lang/reflect/Executable;)Z", (void*)&WB_IsMethodQueuedForCompilation},
iignatyev@4592 1257 {CC"makeMethodNotCompilable",
iignatyev@5541 1258 CC"(Ljava/lang/reflect/Executable;IZ)V", (void*)&WB_MakeMethodNotCompilable},
iignatyev@4908 1259 {CC"testSetDontInlineMethod",
iignatyev@4951 1260 CC"(Ljava/lang/reflect/Executable;Z)Z", (void*)&WB_TestSetDontInlineMethod},
iignatyev@4592 1261 {CC"getMethodCompilationLevel",
iignatyev@5541 1262 CC"(Ljava/lang/reflect/Executable;Z)I", (void*)&WB_GetMethodCompilationLevel},
iignatyev@5541 1263 {CC"getMethodEntryBci",
iignatyev@5541 1264 CC"(Ljava/lang/reflect/Executable;)I", (void*)&WB_GetMethodEntryBci},
iignatyev@5541 1265 {CC"getCompileQueueSize",
iignatyev@5541 1266 CC"(I)I", (void*)&WB_GetCompileQueueSize},
iignatyev@4908 1267 {CC"testSetForceInlineMethod",
iignatyev@4951 1268 CC"(Ljava/lang/reflect/Executable;Z)Z", (void*)&WB_TestSetForceInlineMethod},
jbachorik@9881 1269 {CC"enqueueMethodForCompilation0",
iignatyev@5541 1270 CC"(Ljava/lang/reflect/Executable;II)Z", (void*)&WB_EnqueueMethodForCompilation},
jbachorik@9881 1271 {CC"enqueueInitializerForCompilation0",
jbachorik@9881 1272 CC"(Ljava/lang/Class;I)Z", (void*)&WB_EnqueueInitializerForCompilation},
iignatyev@4908 1273 {CC"clearMethodState",
iignatyev@4951 1274 CC"(Ljava/lang/reflect/Executable;)V", (void*)&WB_ClearMethodState},
xliu@9690 1275 {CC"markMethodProfiled",
xliu@9690 1276 CC"(Ljava/lang/reflect/Executable;)V", (void*)&WB_MarkMethodProfiled},
iignatyev@6963 1277 {CC"setBooleanVMFlag", CC"(Ljava/lang/String;Z)V",(void*)&WB_SetBooleanVMFlag},
iignatyev@6963 1278 {CC"setIntxVMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetIntxVMFlag},
iignatyev@6963 1279 {CC"setUintxVMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetUintxVMFlag},
iignatyev@6963 1280 {CC"setUint64VMFlag", CC"(Ljava/lang/String;J)V",(void*)&WB_SetUint64VMFlag},
iignatyev@6963 1281 {CC"setDoubleVMFlag", CC"(Ljava/lang/String;D)V",(void*)&WB_SetDoubleVMFlag},
iignatyev@6963 1282 {CC"setStringVMFlag", CC"(Ljava/lang/String;Ljava/lang/String;)V",
iignatyev@6963 1283 (void*)&WB_SetStringVMFlag},
iignatyev@6963 1284 {CC"getBooleanVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Boolean;",
iignatyev@6963 1285 (void*)&WB_GetBooleanVMFlag},
iignatyev@6963 1286 {CC"getIntxVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;",
iignatyev@6963 1287 (void*)&WB_GetIntxVMFlag},
iignatyev@6963 1288 {CC"getUintxVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;",
iignatyev@6963 1289 (void*)&WB_GetUintxVMFlag},
iignatyev@6963 1290 {CC"getUint64VMFlag", CC"(Ljava/lang/String;)Ljava/lang/Long;",
iignatyev@6963 1291 (void*)&WB_GetUint64VMFlag},
iignatyev@6963 1292 {CC"getDoubleVMFlag", CC"(Ljava/lang/String;)Ljava/lang/Double;",
iignatyev@6963 1293 (void*)&WB_GetDoubleVMFlag},
iignatyev@6963 1294 {CC"getStringVMFlag", CC"(Ljava/lang/String;)Ljava/lang/String;",
iignatyev@6963 1295 (void*)&WB_GetStringVMFlag},
iignatyev@6963 1296 {CC"isInStringTable", CC"(Ljava/lang/String;)Z", (void*)&WB_IsInStringTable },
mgerdin@4850 1297 {CC"fullGC", CC"()V", (void*)&WB_FullGC },
tschatzl@7071 1298 {CC"youngGC", CC"()V", (void*)&WB_YoungGC },
mikael@5174 1299 {CC"readReservedMemory", CC"()V", (void*)&WB_ReadReservedMemory },
neugens@9861 1300 {CC"allocateCodeBlob", CC"(II)J", (void*)&WB_AllocateCodeBlob },
neugens@9861 1301 {CC"freeCodeBlob", CC"(J)V", (void*)&WB_FreeCodeBlob },
neugens@9861 1302 {CC"getCodeBlob", CC"(J)[Ljava/lang/Object;",(void*)&WB_GetCodeBlob },
stefank@6992 1303 {CC"allocateMetaspace",
stefank@6992 1304 CC"(Ljava/lang/ClassLoader;J)J", (void*)&WB_AllocateMetaspace },
stefank@6992 1305 {CC"freeMetaspace",
stefank@6992 1306 CC"(Ljava/lang/ClassLoader;JJ)V", (void*)&WB_FreeMetaspace },
ehelin@7254 1307 {CC"incMetaspaceCapacityUntilGC", CC"(J)J", (void*)&WB_IncMetaspaceCapacityUntilGC },
ehelin@7254 1308 {CC"metaspaceCapacityUntilGC", CC"()J", (void*)&WB_MetaspaceCapacityUntilGC },
iignatyev@6427 1309 {CC"getCPUFeatures", CC"()Ljava/lang/String;", (void*)&WB_GetCPUFeatures },
iignatyev@6525 1310 {CC"getNMethod", CC"(Ljava/lang/reflect/Executable;Z)[Ljava/lang/Object;",
iignatyev@6525 1311 (void*)&WB_GetNMethod },
bmoloden@7797 1312 {CC"isMonitorInflated", CC"(Ljava/lang/Object;)Z", (void*)&WB_IsMonitorInflated },
bmoloden@7797 1313 {CC"forceSafepoint", CC"()V", (void*)&WB_ForceSafepoint },
dbuck@9186 1314 {CC"checkLibSpecifiesNoexecstack", CC"(Ljava/lang/String;)Z",
dbuck@9186 1315 (void*)&WB_CheckLibSpecifiesNoexecstack},
vaibhav@9421 1316 {CC"isContainerized", CC"()Z", (void*)&WB_IsContainerized },
vaibhav@9421 1317 {CC"printOsInfo", CC"()V", (void*)&WB_PrintOsInfo },
mgerdin@3619 1318 };
mgerdin@3619 1319
mgerdin@3619 1320 #undef CC
mgerdin@3619 1321
mgerdin@3619 1322 JVM_ENTRY(void, JVM_RegisterWhiteBoxMethods(JNIEnv* env, jclass wbclass))
mgerdin@3619 1323 {
mgerdin@3619 1324 if (WhiteBoxAPI) {
mgerdin@3619 1325 // Make sure that wbclass is loaded by the null classloader
mgerdin@3619 1326 instanceKlassHandle ikh = instanceKlassHandle(JNIHandles::resolve(wbclass)->klass());
mgerdin@3619 1327 Handle loader(ikh->class_loader());
mgerdin@3619 1328 if (loader.is_null()) {
sjohanss@7165 1329 WhiteBox::register_methods(env, wbclass, thread, methods, sizeof(methods) / sizeof(methods[0]));
sjohanss@7165 1330 WhiteBox::register_extended(env, wbclass, thread);
sjohanss@7165 1331 WhiteBox::set_used();
mgerdin@3619 1332 }
mgerdin@3619 1333 }
mgerdin@3619 1334 }
mgerdin@3619 1335 JVM_END

mercurial