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