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