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