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