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