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