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