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