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