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