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