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