1 /*
   2  * Copyright (c) 1997, 2026, Oracle and/or its affiliates. All rights reserved.
   3  * Copyright (c) 2012, 2024 Red Hat, Inc.
   4  * Copyright (c) 2021, Azul Systems, Inc. All rights reserved.
   5  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   6  *
   7  * This code is free software; you can redistribute it and/or modify it
   8  * under the terms of the GNU General Public License version 2 only, as
   9  * published by the Free Software Foundation.
  10  *
  11  * This code is distributed in the hope that it will be useful, but WITHOUT
  12  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  14  * version 2 for more details (a copy is included in the LICENSE file that
  15  * accompanied this code).
  16  *
  17  * You should have received a copy of the GNU General Public License version
  18  * 2 along with this work; if not, write to the Free Software Foundation,
  19  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  20  *
  21  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  22  * or visit www.oracle.com if you need additional information or have any
  23  * questions.
  24  *
  25  */
  26 
  27 #include "ci/ciReplay.hpp"
  28 #include "classfile/altHashing.hpp"
  29 #include "classfile/classFileStream.hpp"
  30 #include "classfile/classLoader.hpp"
  31 #include "classfile/classLoadInfo.hpp"
  32 #include "classfile/javaClasses.inline.hpp"
  33 #include "classfile/javaThreadStatus.hpp"
  34 #include "classfile/moduleEntry.hpp"
  35 #include "classfile/modules.hpp"
  36 #include "classfile/symbolTable.hpp"
  37 #include "classfile/systemDictionary.hpp"
  38 #include "classfile/vmClasses.hpp"
  39 #include "classfile/vmSymbols.hpp"
  40 #include "compiler/compiler_globals.hpp"
  41 #include "gc/shared/collectedHeap.hpp"
  42 #include "gc/shared/stringdedup/stringDedup.hpp"
  43 #include "interpreter/linkResolver.hpp"
  44 #include "jni.h"
  45 #include "jvm.h"
  46 #include "logging/log.hpp"
  47 #include "memory/allocation.inline.hpp"
  48 #include "memory/oopFactory.hpp"
  49 #include "memory/resourceArea.hpp"
  50 #include "memory/universe.hpp"
  51 #include "nmt/memTracker.hpp"
  52 #include "oops/access.inline.hpp"
  53 #include "oops/arrayOop.inline.hpp"
  54 #include "oops/flatArrayOop.inline.hpp"
  55 #include "oops/inlineKlass.inline.hpp"
  56 #include "oops/instanceKlass.inline.hpp"
  57 #include "oops/instanceOop.hpp"
  58 #include "oops/klass.inline.hpp"
  59 #include "oops/markWord.hpp"
  60 #include "oops/method.hpp"
  61 #include "oops/objArrayKlass.hpp"
  62 #include "oops/objArrayOop.inline.hpp"
  63 #include "oops/oop.inline.hpp"
  64 #include "oops/oopCast.inline.hpp"
  65 #include "oops/symbol.hpp"
  66 #include "oops/typeArrayKlass.hpp"
  67 #include "oops/typeArrayOop.inline.hpp"
  68 #include "oops/valuePayload.inline.hpp"
  69 #include "prims/jniCheck.hpp"
  70 #include "prims/jniExport.hpp"
  71 #include "prims/jniFastGetField.hpp"
  72 #include "prims/jvm_misc.hpp"
  73 #include "prims/jvmtiExport.hpp"
  74 #include "prims/jvmtiThreadState.hpp"
  75 #include "runtime/arguments.hpp"
  76 #include "runtime/atomicAccess.hpp"
  77 #include "runtime/fieldDescriptor.inline.hpp"
  78 #include "runtime/handles.inline.hpp"
  79 #include "runtime/interfaceSupport.inline.hpp"
  80 #include "runtime/java.hpp"
  81 #include "runtime/javaCalls.hpp"
  82 #include "runtime/javaThread.inline.hpp"
  83 #include "runtime/jfieldIDWorkaround.hpp"
  84 #include "runtime/jniHandles.inline.hpp"
  85 #include "runtime/reflection.hpp"
  86 #include "runtime/safepointVerifiers.hpp"
  87 #include "runtime/sharedRuntime.hpp"
  88 #include "runtime/signature.hpp"
  89 #include "runtime/synchronizer.hpp"
  90 #include "runtime/thread.inline.hpp"
  91 #include "runtime/vmOperations.hpp"
  92 #include "services/runtimeService.hpp"
  93 #include "utilities/defaultStream.hpp"
  94 #include "utilities/dtrace.hpp"
  95 #include "utilities/events.hpp"
  96 #include "utilities/macros.hpp"
  97 #include "utilities/vmError.hpp"
  98 #if INCLUDE_JVMCI
  99 #include "jvmci/jvmciCompiler.hpp"
 100 #endif
 101 #if INCLUDE_JFR
 102 #include "jfr/jfr.hpp"
 103 #endif
 104 
 105 static jint CurrentVersion = JNI_VERSION_24;
 106 
 107 #if defined(_WIN32) && !defined(USE_VECTORED_EXCEPTION_HANDLING)
 108 extern LONG WINAPI topLevelExceptionFilter(_EXCEPTION_POINTERS* );
 109 #endif
 110 
 111 // The DT_RETURN_MARK macros create a scoped object to fire the dtrace
 112 // '-return' probe regardless of the return path is taken out of the function.
 113 // Methods that have multiple return paths use this to avoid having to
 114 // instrument each return path.  Methods that use CHECK or THROW must use this
 115 // since those macros can cause an immediate uninstrumented return.
 116 //
 117 // In order to get the return value, a reference to the variable containing
 118 // the return value must be passed to the constructor of the object, and
 119 // the return value must be set before return (since the mark object has
 120 // a reference to it).
 121 //
 122 // Example:
 123 // DT_RETURN_MARK_DECL(SomeFunc, int);
 124 // JNI_ENTRY(int, SomeFunc, ...)
 125 //   int return_value = 0;
 126 //   DT_RETURN_MARK(SomeFunc, int, (const int&)return_value);
 127 //   foo(CHECK_0)
 128 //   return_value = 5;
 129 //   return return_value;
 130 // JNI_END
 131 #define DT_RETURN_MARK_DECL(name, type, probe)                             \
 132   DTRACE_ONLY(                                                             \
 133     class DTraceReturnProbeMark_##name {                                   \
 134      public:                                                               \
 135       const type& _ret_ref;                                                \
 136       DTraceReturnProbeMark_##name(const type& v) : _ret_ref(v) {}         \
 137       ~DTraceReturnProbeMark_##name() {                                    \
 138         probe;                                                             \
 139       }                                                                    \
 140     }                                                                      \
 141   )
 142 // Void functions are simpler since there's no return value
 143 #define DT_VOID_RETURN_MARK_DECL(name, probe)                              \
 144   DTRACE_ONLY(                                                             \
 145     class DTraceReturnProbeMark_##name {                                   \
 146      public:                                                               \
 147       ~DTraceReturnProbeMark_##name() {                                    \
 148         probe;                                                             \
 149       }                                                                    \
 150     }                                                                      \
 151   )
 152 
 153 // Place these macros in the function to mark the return.  Non-void
 154 // functions need the type and address of the return value.
 155 #define DT_RETURN_MARK(name, type, ref) \
 156   DTRACE_ONLY( DTraceReturnProbeMark_##name dtrace_return_mark(ref) )
 157 #define DT_VOID_RETURN_MARK(name) \
 158   DTRACE_ONLY( DTraceReturnProbeMark_##name dtrace_return_mark )
 159 
 160 
 161 // Use these to select distinct code for floating-point vs. non-floating point
 162 // situations.  Used from within common macros where we need slightly
 163 // different behavior for Float/Double
 164 #define FP_SELECT_Boolean(intcode, fpcode) intcode
 165 #define FP_SELECT_Byte(intcode, fpcode)    intcode
 166 #define FP_SELECT_Char(intcode, fpcode)    intcode
 167 #define FP_SELECT_Short(intcode, fpcode)   intcode
 168 #define FP_SELECT_Object(intcode, fpcode)  intcode
 169 #define FP_SELECT_Int(intcode, fpcode)     intcode
 170 #define FP_SELECT_Long(intcode, fpcode)    intcode
 171 #define FP_SELECT_Float(intcode, fpcode)   fpcode
 172 #define FP_SELECT_Double(intcode, fpcode)  fpcode
 173 #define FP_SELECT(TypeName, intcode, fpcode) \
 174   FP_SELECT_##TypeName(intcode, fpcode)
 175 
 176 // Choose DT_RETURN_MARK macros  based on the type: float/double -> void
 177 // (dtrace doesn't do FP yet)
 178 #define DT_RETURN_MARK_DECL_FOR(TypeName, name, type, probe)    \
 179   FP_SELECT(TypeName, \
 180     DT_RETURN_MARK_DECL(name, type, probe), DT_VOID_RETURN_MARK_DECL(name, probe) )
 181 #define DT_RETURN_MARK_FOR(TypeName, name, type, ref) \
 182   FP_SELECT(TypeName, \
 183     DT_RETURN_MARK(name, type, ref), DT_VOID_RETURN_MARK(name) )
 184 
 185 
 186 // out-of-line helpers for class jfieldIDWorkaround:
 187 
 188 bool jfieldIDWorkaround::is_valid_jfieldID(Klass* k, jfieldID id) {
 189   if (jfieldIDWorkaround::is_instance_jfieldID(k, id)) {
 190     uintptr_t as_uint = (uintptr_t) id;
 191     int offset = raw_instance_offset(id);
 192     if (is_checked_jfieldID(id)) {
 193       if (!klass_hash_ok(k, id)) {
 194         return false;
 195       }
 196     }
 197     return InstanceKlass::cast(k)->contains_field_offset(offset);
 198   } else {
 199     JNIid* result = (JNIid*) id;
 200 #ifdef ASSERT
 201     return result != nullptr && result->is_static_field_id();
 202 #else
 203     return result != nullptr;
 204 #endif
 205   }
 206 }
 207 
 208 
 209 intptr_t jfieldIDWorkaround::encode_klass_hash(Klass* k, int offset) {
 210   if (offset <= small_offset_mask) {
 211     Klass* field_klass = k;
 212     Klass* super_klass = field_klass->super();
 213     // With compressed oops the most super class with nonstatic fields would
 214     // be the owner of fields embedded in the header.
 215     while (InstanceKlass::cast(super_klass)->has_nonstatic_fields() &&
 216            InstanceKlass::cast(super_klass)->contains_field_offset(offset)) {
 217       field_klass = super_klass;   // super contains the field also
 218       super_klass = field_klass->super();
 219     }
 220     DEBUG_ONLY(NoSafepointVerifier nosafepoint;)
 221     uintptr_t klass_hash = field_klass->identity_hash();
 222     return ((klass_hash & klass_mask) << klass_shift) | checked_mask_in_place;
 223   } else {
 224 #if 0
 225     #ifndef PRODUCT
 226     {
 227       ResourceMark rm;
 228       warning("VerifyJNIFields: long offset %d in %s", offset, k->external_name());
 229     }
 230     #endif
 231 #endif
 232     return 0;
 233   }
 234 }
 235 
 236 bool jfieldIDWorkaround::klass_hash_ok(Klass* k, jfieldID id) {
 237   uintptr_t as_uint = (uintptr_t) id;
 238   intptr_t klass_hash = (as_uint >> klass_shift) & klass_mask;
 239   do {
 240     DEBUG_ONLY(NoSafepointVerifier nosafepoint;)
 241     // Could use a non-blocking query for identity_hash here...
 242     if ((k->identity_hash() & klass_mask) == klass_hash)
 243       return true;
 244     k = k->super();
 245   } while (k != nullptr);
 246   return false;
 247 }
 248 
 249 void jfieldIDWorkaround::verify_instance_jfieldID(Klass* k, jfieldID id) {
 250   guarantee(jfieldIDWorkaround::is_instance_jfieldID(k, id), "must be an instance field" );
 251   uintptr_t as_uint = (uintptr_t) id;
 252   int offset = raw_instance_offset(id);
 253   if (VerifyJNIFields) {
 254     if (is_checked_jfieldID(id)) {
 255       guarantee(klass_hash_ok(k, id),
 256     "Bug in native code: jfieldID class must match object");
 257     } else {
 258 #if 0
 259       #ifndef PRODUCT
 260       if (Verbose) {
 261   ResourceMark rm;
 262   warning("VerifyJNIFields: unverified offset %d for %s", offset, k->external_name());
 263       }
 264       #endif
 265 #endif
 266     }
 267   }
 268   guarantee(InstanceKlass::cast(k)->contains_field_offset(offset),
 269       "Bug in native code: jfieldID offset must address interior of object");
 270 }
 271 
 272 // Implementation of JNI entries
 273 
 274 DT_RETURN_MARK_DECL(DefineClass, jclass
 275                     , HOTSPOT_JNI_DEFINECLASS_RETURN(_ret_ref));
 276 
 277 JNI_ENTRY(jclass, jni_DefineClass(JNIEnv *env, const char *name, jobject loaderRef,
 278                                   const jbyte *buf, jsize bufLen))
 279   HOTSPOT_JNI_DEFINECLASS_ENTRY(
 280     env, (char*) name, loaderRef, (char*) buf, bufLen);
 281 
 282   jclass cls = nullptr;
 283   DT_RETURN_MARK(DefineClass, jclass, (const jclass&)cls);
 284 
 285   // Class resolution will get the class name from the .class stream if the name is null.
 286   TempNewSymbol class_name = name == nullptr ? nullptr :
 287     SystemDictionary::class_name_symbol(name, vmSymbols::java_lang_NoClassDefFoundError(),
 288                                         CHECK_NULL);
 289 
 290   ResourceMark rm(THREAD);
 291   ClassFileStream st((u1*)buf, bufLen, nullptr);
 292   Handle class_loader (THREAD, JNIHandles::resolve(loaderRef));
 293   Handle protection_domain;
 294   ClassLoadInfo cl_info(protection_domain);
 295   Klass* k = SystemDictionary::resolve_from_stream(&st, class_name,
 296                                                    class_loader,
 297                                                    cl_info,
 298                                                    CHECK_NULL);
 299 
 300   if (log_is_enabled(Debug, class, resolve)) {
 301     trace_class_resolution(k);
 302   }
 303 
 304   cls = (jclass)JNIHandles::make_local(THREAD, k->java_mirror());
 305   return cls;
 306 JNI_END
 307 
 308 
 309 
 310 DT_RETURN_MARK_DECL(FindClass, jclass
 311                     , HOTSPOT_JNI_FINDCLASS_RETURN(_ret_ref));
 312 
 313 JNI_ENTRY(jclass, jni_FindClass(JNIEnv *env, const char *name))
 314   HOTSPOT_JNI_FINDCLASS_ENTRY(env, (char *)name);
 315 
 316   jclass result = nullptr;
 317   DT_RETURN_MARK(FindClass, jclass, (const jclass&)result);
 318 
 319   // This should be ClassNotFoundException imo.
 320   TempNewSymbol class_name =
 321     SystemDictionary::class_name_symbol(name, vmSymbols::java_lang_NoClassDefFoundError(),
 322                                         CHECK_NULL);
 323 
 324   // Find calling class
 325   Klass* k = thread->security_get_caller_class(0);
 326   // default to the system loader when no context
 327   Handle loader(THREAD, SystemDictionary::java_system_loader());
 328   if (k != nullptr) {
 329     // Special handling to make sure JNI_OnLoad and JNI_OnUnload are executed
 330     // in the correct class context.
 331     if (k->class_loader() == nullptr &&
 332         k->name() == vmSymbols::jdk_internal_loader_NativeLibraries()) {
 333       JavaValue result(T_OBJECT);
 334       JavaCalls::call_static(&result, k,
 335                              vmSymbols::getFromClass_name(),
 336                              vmSymbols::void_class_signature(),
 337                              CHECK_NULL);
 338       // When invoked from JNI_OnLoad, NativeLibraries::getFromClass returns
 339       // a non-null Class object.  When invoked from JNI_OnUnload,
 340       // it will return null to indicate no context.
 341       oop mirror = result.get_oop();
 342       if (mirror != nullptr) {
 343         Klass* fromClass = java_lang_Class::as_Klass(mirror);
 344         loader = Handle(THREAD, fromClass->class_loader());
 345       }
 346     } else {
 347       loader = Handle(THREAD, k->class_loader());
 348     }
 349   }
 350 
 351   result = find_class_from_class_loader(env, class_name, true, loader, true, thread);
 352 
 353   if (log_is_enabled(Debug, class, resolve) && result != nullptr) {
 354     trace_class_resolution(java_lang_Class::as_Klass(JNIHandles::resolve_non_null(result)));
 355   }
 356 
 357   return result;
 358 JNI_END
 359 
 360 DT_RETURN_MARK_DECL(FromReflectedMethod, jmethodID
 361                     , HOTSPOT_JNI_FROMREFLECTEDMETHOD_RETURN((uintptr_t)_ret_ref));
 362 
 363 JNI_ENTRY(jmethodID, jni_FromReflectedMethod(JNIEnv *env, jobject method))
 364   HOTSPOT_JNI_FROMREFLECTEDMETHOD_ENTRY(env, method);
 365 
 366   jmethodID ret = nullptr;
 367   DT_RETURN_MARK(FromReflectedMethod, jmethodID, (const jmethodID&)ret);
 368 
 369   // method is a handle to a java.lang.reflect.Method object
 370   oop reflected  = JNIHandles::resolve_non_null(method);
 371   oop mirror     = nullptr;
 372   int slot       = 0;
 373 
 374   if (reflected->klass() == vmClasses::reflect_Constructor_klass()) {
 375     mirror = java_lang_reflect_Constructor::clazz(reflected);
 376     slot   = java_lang_reflect_Constructor::slot(reflected);
 377   } else {
 378     assert(reflected->klass() == vmClasses::reflect_Method_klass(), "wrong type");
 379     mirror = java_lang_reflect_Method::clazz(reflected);
 380     slot   = java_lang_reflect_Method::slot(reflected);
 381   }
 382   Klass* k1 = java_lang_Class::as_Klass(mirror);
 383 
 384   // Make sure class is initialized before handing id's out to methods
 385   k1->initialize(CHECK_NULL);
 386   Method* m = InstanceKlass::cast(k1)->method_with_idnum(slot);
 387   ret = m==nullptr? nullptr : m->jmethod_id();  // return null if reflected method deleted
 388   return ret;
 389 JNI_END
 390 
 391 DT_RETURN_MARK_DECL(FromReflectedField, jfieldID
 392                     , HOTSPOT_JNI_FROMREFLECTEDFIELD_RETURN((uintptr_t)_ret_ref));
 393 
 394 JNI_ENTRY(jfieldID, jni_FromReflectedField(JNIEnv *env, jobject field))
 395   HOTSPOT_JNI_FROMREFLECTEDFIELD_ENTRY(env, field);
 396 
 397   jfieldID ret = nullptr;
 398   DT_RETURN_MARK(FromReflectedField, jfieldID, (const jfieldID&)ret);
 399 
 400   // field is a handle to a java.lang.reflect.Field object
 401   oop reflected   = JNIHandles::resolve_non_null(field);
 402   oop mirror      = java_lang_reflect_Field::clazz(reflected);
 403   Klass* k1       = java_lang_Class::as_Klass(mirror);
 404   int slot        = java_lang_reflect_Field::slot(reflected);
 405   int modifiers   = java_lang_reflect_Field::modifiers(reflected);
 406 
 407   // Make sure class is initialized before handing id's out to fields
 408   k1->initialize(CHECK_NULL);
 409 
 410   // First check if this is a static field
 411   if (modifiers & JVM_ACC_STATIC) {
 412     int offset = InstanceKlass::cast(k1)->field_offset( slot );
 413     JNIid* id = InstanceKlass::cast(k1)->jni_id_for(offset);
 414     assert(id != nullptr, "corrupt Field object");
 415     DEBUG_ONLY(id->set_is_static_field_id();)
 416     // A jfieldID for a static field is a JNIid specifying the field holder and the offset within the Klass*
 417     ret = jfieldIDWorkaround::to_static_jfieldID(id);
 418     return ret;
 419   }
 420 
 421   // The slot is the index of the field description in the field-array
 422   // The jfieldID is the offset of the field within the object
 423   // It may also have hash bits for k, if VerifyJNIFields is turned on.
 424   int offset = InstanceKlass::cast(k1)->field_offset( slot );
 425   bool is_flat = InstanceKlass::cast(k1)->field_is_flat(slot);
 426   assert(InstanceKlass::cast(k1)->contains_field_offset(offset), "stay within object");
 427   ret = jfieldIDWorkaround::to_instance_jfieldID(k1, offset, is_flat);
 428   return ret;
 429 JNI_END
 430 
 431 
 432 DT_RETURN_MARK_DECL(ToReflectedMethod, jobject
 433                     , HOTSPOT_JNI_TOREFLECTEDMETHOD_RETURN(_ret_ref));
 434 
 435 JNI_ENTRY(jobject, jni_ToReflectedMethod(JNIEnv *env, jclass cls, jmethodID method_id, jboolean isStatic))
 436   HOTSPOT_JNI_TOREFLECTEDMETHOD_ENTRY(env, cls, (uintptr_t) method_id, isStatic);
 437 
 438   jobject ret = nullptr;
 439   DT_RETURN_MARK(ToReflectedMethod, jobject, (const jobject&)ret);
 440 
 441   methodHandle m (THREAD, Method::resolve_jmethod_id(method_id));
 442   assert(m->is_static() == (isStatic != 0), "jni_ToReflectedMethod access flags doesn't match");
 443   oop reflection_method;
 444   if (m->is_object_constructor()) {
 445     reflection_method = Reflection::new_constructor(m, CHECK_NULL);
 446   } else {
 447     // Note: Static initializers can theoretically be here, if JNI users manage
 448     // to get their jmethodID. Record them as plain methods.
 449     reflection_method = Reflection::new_method(m, false, CHECK_NULL);
 450   }
 451   ret = JNIHandles::make_local(THREAD, reflection_method);
 452   return ret;
 453 JNI_END
 454 
 455 DT_RETURN_MARK_DECL(GetSuperclass, jclass
 456                     , HOTSPOT_JNI_GETSUPERCLASS_RETURN(_ret_ref));
 457 
 458 JNI_ENTRY(jclass, jni_GetSuperclass(JNIEnv *env, jclass sub))
 459   HOTSPOT_JNI_GETSUPERCLASS_ENTRY(env, sub);
 460 
 461   jclass obj = nullptr;
 462   DT_RETURN_MARK(GetSuperclass, jclass, (const jclass&)obj);
 463 
 464   oop mirror = JNIHandles::resolve_non_null(sub);
 465   // primitive classes return null
 466   if (java_lang_Class::is_primitive(mirror)) return nullptr;
 467 
 468   // Rules of Class.getSuperClass as implemented by KLass::java_super:
 469   // arrays return Object
 470   // interfaces return null
 471   // proper classes return Klass::super()
 472   Klass* k = java_lang_Class::as_Klass(mirror);
 473   if (k->is_interface()) return nullptr;
 474 
 475   // return mirror for superclass
 476   Klass* super = k->java_super();
 477   // super2 is the value computed by the compiler's getSuperClass intrinsic:
 478   DEBUG_ONLY(Klass* super2 = ( k->is_array_klass()
 479                                  ? vmClasses::Object_klass()
 480                                  : k->super() ) );
 481   assert(super == super2,
 482          "java_super computation depends on interface, array, other super");
 483   obj = (super == nullptr) ? nullptr : (jclass) JNIHandles::make_local(THREAD, super->java_mirror());
 484   return obj;
 485 JNI_END
 486 
 487 JNI_ENTRY_NO_PRESERVE(jboolean, jni_IsAssignableFrom(JNIEnv *env, jclass sub, jclass super))
 488   HOTSPOT_JNI_ISASSIGNABLEFROM_ENTRY(env, sub, super);
 489 
 490   oop sub_mirror   = JNIHandles::resolve_non_null(sub);
 491   oop super_mirror = JNIHandles::resolve_non_null(super);
 492   if (java_lang_Class::is_primitive(sub_mirror) ||
 493       java_lang_Class::is_primitive(super_mirror)) {
 494     jboolean ret = (sub_mirror == super_mirror);
 495 
 496     HOTSPOT_JNI_ISASSIGNABLEFROM_RETURN(ret);
 497     return ret;
 498   }
 499   Klass* sub_klass   = java_lang_Class::as_Klass(sub_mirror);
 500   Klass* super_klass = java_lang_Class::as_Klass(super_mirror);
 501   assert(sub_klass != nullptr && super_klass != nullptr, "invalid arguments to jni_IsAssignableFrom");
 502   jboolean ret = sub_klass->is_subtype_of(super_klass) ?
 503                    JNI_TRUE : JNI_FALSE;
 504 
 505   HOTSPOT_JNI_ISASSIGNABLEFROM_RETURN(ret);
 506   return ret;
 507 JNI_END
 508 
 509 
 510 DT_RETURN_MARK_DECL(Throw, jint
 511                     , HOTSPOT_JNI_THROW_RETURN(_ret_ref));
 512 
 513 JNI_ENTRY(jint, jni_Throw(JNIEnv *env, jthrowable obj))
 514   HOTSPOT_JNI_THROW_ENTRY(env, obj);
 515 
 516   jint ret = JNI_OK;
 517   DT_RETURN_MARK(Throw, jint, (const jint&)ret);
 518 
 519   THROW_OOP_(JNIHandles::resolve(obj), JNI_OK);
 520   ShouldNotReachHere();
 521   return 0;  // Mute compiler.
 522 JNI_END
 523 
 524 
 525 DT_RETURN_MARK_DECL(ThrowNew, jint
 526                     , HOTSPOT_JNI_THROWNEW_RETURN(_ret_ref));
 527 
 528 JNI_ENTRY(jint, jni_ThrowNew(JNIEnv *env, jclass clazz, const char *message))
 529   HOTSPOT_JNI_THROWNEW_ENTRY(env, clazz, (char *) message);
 530 
 531   jint ret = JNI_OK;
 532   DT_RETURN_MARK(ThrowNew, jint, (const jint&)ret);
 533 
 534   InstanceKlass* k = java_lang_Class::as_InstanceKlass(JNIHandles::resolve_non_null(clazz));
 535   Symbol*  name = k->name();
 536   Handle class_loader (THREAD,  k->class_loader());
 537   THROW_MSG_LOADER_(name, (char *)message, class_loader, JNI_OK);
 538   ShouldNotReachHere();
 539   return 0;  // Mute compiler.
 540 JNI_END
 541 
 542 
 543 // JNI functions only transform a pending async exception to a synchronous
 544 // exception in ExceptionOccurred and ExceptionCheck calls, since
 545 // delivering an async exception in other places won't change the native
 546 // code's control flow and would be harmful when native code further calls
 547 // JNI functions with a pending exception. Async exception is also checked
 548 // during the call, so ExceptionOccurred/ExceptionCheck won't return
 549 // false but deliver the async exception at the very end during
 550 // state transition.
 551 
 552 static void jni_check_async_exceptions(JavaThread *thread) {
 553   assert(thread == Thread::current(), "must be itself");
 554   if (thread->has_async_exception_condition()) {
 555     SafepointMechanism::process_if_requested_with_exit_check(thread, true /* check asyncs */);
 556   }
 557 }
 558 
 559 JNI_ENTRY_NO_PRESERVE(jthrowable, jni_ExceptionOccurred(JNIEnv *env))
 560   HOTSPOT_JNI_EXCEPTIONOCCURRED_ENTRY(env);
 561 
 562   jni_check_async_exceptions(thread);
 563   oop exception = thread->pending_exception();
 564   jthrowable ret = (jthrowable) JNIHandles::make_local(THREAD, exception);
 565 
 566   HOTSPOT_JNI_EXCEPTIONOCCURRED_RETURN(ret);
 567   return ret;
 568 JNI_END
 569 
 570 
 571 JNI_ENTRY_NO_PRESERVE(void, jni_ExceptionDescribe(JNIEnv *env))
 572   HOTSPOT_JNI_EXCEPTIONDESCRIBE_ENTRY(env);
 573 
 574   if (thread->has_pending_exception()) {
 575     Handle ex(thread, thread->pending_exception());
 576     thread->clear_pending_exception();
 577     jio_fprintf(defaultStream::error_stream(), "Exception ");
 578     if (thread != nullptr && thread->threadObj() != nullptr) {
 579       ResourceMark rm(THREAD);
 580       jio_fprintf(defaultStream::error_stream(),
 581                   "in thread \"%s\" ", thread->name());
 582     }
 583     if (ex->is_a(vmClasses::Throwable_klass())) {
 584       JavaValue result(T_VOID);
 585       JavaCalls::call_virtual(&result,
 586                               ex,
 587                               vmClasses::Throwable_klass(),
 588                               vmSymbols::printStackTrace_name(),
 589                               vmSymbols::void_method_signature(),
 590                               THREAD);
 591       // If an exception is thrown in the call it gets thrown away. Not much
 592       // we can do with it. The native code that calls this, does not check
 593       // for the exception - hence, it might still be in the thread when DestroyVM gets
 594       // called, potentially causing a few asserts to trigger - since no pending exception
 595       // is expected.
 596       CLEAR_PENDING_EXCEPTION;
 597     } else {
 598       ResourceMark rm(THREAD);
 599       jio_fprintf(defaultStream::error_stream(),
 600                   ". Uncaught exception of type %s.",
 601                   ex->klass()->external_name());
 602     }
 603   }
 604 
 605   HOTSPOT_JNI_EXCEPTIONDESCRIBE_RETURN();
 606 JNI_END
 607 
 608 
 609 JNI_ENTRY_NO_PRESERVE(void, jni_ExceptionClear(JNIEnv *env))
 610   HOTSPOT_JNI_EXCEPTIONCLEAR_ENTRY(env);
 611 
 612   // The jni code might be using this API to clear java thrown exception.
 613   // So just mark jvmti thread exception state as exception caught.
 614   JvmtiThreadState *state = JavaThread::current()->jvmti_thread_state();
 615   if (state != nullptr && state->is_exception_detected()) {
 616     state->set_exception_caught();
 617   }
 618   thread->clear_pending_exception();
 619 
 620   HOTSPOT_JNI_EXCEPTIONCLEAR_RETURN();
 621 JNI_END
 622 
 623 
 624 JNI_ENTRY(void, jni_FatalError(JNIEnv *env, const char *msg))
 625   HOTSPOT_JNI_FATALERROR_ENTRY(env, (char *) msg);
 626 
 627   tty->print_cr("FATAL ERROR in native method: %s", msg);
 628   thread->print_jni_stack();
 629   os::abort(); // Dump core and abort
 630 JNI_END
 631 
 632 
 633 JNI_ENTRY(jint, jni_PushLocalFrame(JNIEnv *env, jint capacity))
 634   HOTSPOT_JNI_PUSHLOCALFRAME_ENTRY(env, capacity);
 635 
 636   //%note jni_11
 637   if (capacity < 0 ||
 638       ((MaxJNILocalCapacity > 0) && (capacity > MaxJNILocalCapacity))) {
 639     HOTSPOT_JNI_PUSHLOCALFRAME_RETURN((uint32_t)JNI_ERR);
 640     return JNI_ERR;
 641   }
 642 
 643   thread->push_jni_handle_block();
 644   jint ret = JNI_OK;
 645   HOTSPOT_JNI_PUSHLOCALFRAME_RETURN(ret);
 646   return ret;
 647 JNI_END
 648 
 649 
 650 JNI_ENTRY(jobject, jni_PopLocalFrame(JNIEnv *env, jobject result))
 651   HOTSPOT_JNI_POPLOCALFRAME_ENTRY(env, result);
 652 
 653   //%note jni_11
 654   Handle result_handle(thread, JNIHandles::resolve(result));
 655   JNIHandleBlock* old_handles = thread->active_handles();
 656   JNIHandleBlock* new_handles = old_handles->pop_frame_link();
 657   if (new_handles != nullptr) {
 658     // As a sanity check we only release the handle blocks if the pop_frame_link is not null.
 659     // This way code will still work if PopLocalFrame is called without a corresponding
 660     // PushLocalFrame call. Note that we set the pop_frame_link to null explicitly, otherwise
 661     // the release_block call will release the blocks.
 662     thread->set_active_handles(new_handles);
 663     old_handles->set_pop_frame_link(nullptr);              // clear link we won't release new_handles below
 664     JNIHandleBlock::release_block(old_handles, thread); // may block
 665     result = JNIHandles::make_local(thread, result_handle());
 666   }
 667   HOTSPOT_JNI_POPLOCALFRAME_RETURN(result);
 668   return result;
 669 JNI_END
 670 
 671 
 672 JNI_ENTRY(jobject, jni_NewGlobalRef(JNIEnv *env, jobject ref))
 673   HOTSPOT_JNI_NEWGLOBALREF_ENTRY(env, ref);
 674 
 675   Handle ref_handle(thread, JNIHandles::resolve(ref));
 676   jobject ret = JNIHandles::make_global(ref_handle, AllocFailStrategy::RETURN_NULL);
 677 
 678   HOTSPOT_JNI_NEWGLOBALREF_RETURN(ret);
 679   return ret;
 680 JNI_END
 681 
 682 // Must be JNI_ENTRY (with HandleMark)
 683 JNI_ENTRY_NO_PRESERVE(void, jni_DeleteGlobalRef(JNIEnv *env, jobject ref))
 684   HOTSPOT_JNI_DELETEGLOBALREF_ENTRY(env, ref);
 685 
 686   JNIHandles::destroy_global(ref);
 687 
 688   HOTSPOT_JNI_DELETEGLOBALREF_RETURN();
 689 JNI_END
 690 
 691 JNI_ENTRY_NO_PRESERVE(void, jni_DeleteLocalRef(JNIEnv *env, jobject obj))
 692   HOTSPOT_JNI_DELETELOCALREF_ENTRY(env, obj);
 693 
 694   JNIHandles::destroy_local(obj);
 695 
 696   HOTSPOT_JNI_DELETELOCALREF_RETURN();
 697 JNI_END
 698 
 699 JNI_ENTRY_NO_PRESERVE(jboolean, jni_IsSameObject(JNIEnv *env, jobject r1, jobject r2))
 700   HOTSPOT_JNI_ISSAMEOBJECT_ENTRY(env, r1, r2);
 701 
 702   jboolean ret = JNIHandles::is_same_object(r1, r2) ? JNI_TRUE : JNI_FALSE;
 703 
 704   HOTSPOT_JNI_ISSAMEOBJECT_RETURN(ret);
 705   return ret;
 706 JNI_END
 707 
 708 
 709 JNI_ENTRY(jobject, jni_NewLocalRef(JNIEnv *env, jobject ref))
 710   HOTSPOT_JNI_NEWLOCALREF_ENTRY(env, ref);
 711 
 712   jobject ret = JNIHandles::make_local(THREAD, JNIHandles::resolve(ref),
 713                                        AllocFailStrategy::RETURN_NULL);
 714 
 715   HOTSPOT_JNI_NEWLOCALREF_RETURN(ret);
 716   return ret;
 717 JNI_END
 718 
 719 JNI_LEAF(jint, jni_EnsureLocalCapacity(JNIEnv *env, jint capacity))
 720   HOTSPOT_JNI_ENSURELOCALCAPACITY_ENTRY(env, capacity);
 721 
 722   jint ret;
 723   if (capacity >= 0 &&
 724       ((MaxJNILocalCapacity <= 0) || (capacity <= MaxJNILocalCapacity))) {
 725     ret = JNI_OK;
 726   } else {
 727     ret = JNI_ERR;
 728   }
 729 
 730   HOTSPOT_JNI_ENSURELOCALCAPACITY_RETURN(ret);
 731   return ret;
 732 JNI_END
 733 
 734 // Return the Handle Type
 735 JNI_LEAF(jobjectRefType, jni_GetObjectRefType(JNIEnv *env, jobject obj))
 736   HOTSPOT_JNI_GETOBJECTREFTYPE_ENTRY(env, obj);
 737 
 738   jobjectRefType ret = JNIInvalidRefType;
 739   if (obj != nullptr) {
 740     ret = JNIHandles::handle_type(thread, obj);
 741   }
 742 
 743   HOTSPOT_JNI_GETOBJECTREFTYPE_RETURN((void *) ret);
 744   return ret;
 745 JNI_END
 746 
 747 
 748 class JNI_ArgumentPusher : public SignatureIterator {
 749  protected:
 750   JavaCallArguments*  _arguments;
 751 
 752   void push_int(jint x)         { _arguments->push_int(x); }
 753   void push_long(jlong x)       { _arguments->push_long(x); }
 754   void push_float(jfloat x)     { _arguments->push_float(x); }
 755   void push_double(jdouble x)   { _arguments->push_double(x); }
 756   void push_object(jobject x)   { _arguments->push_jobject(x); }
 757 
 758   void push_boolean(jboolean b) {
 759     // Normalize boolean arguments from native code by converting 1-255 to JNI_TRUE and
 760     // 0 to JNI_FALSE.  Boolean return values from native are normalized the same in
 761     // TemplateInterpreterGenerator::generate_result_handler_for and
 762     // SharedRuntime::generate_native_wrapper.
 763     push_int(b == 0 ? JNI_FALSE : JNI_TRUE);
 764   }
 765 
 766   JNI_ArgumentPusher(Method* method)
 767     : SignatureIterator(method->signature(),
 768                         Fingerprinter(methodHandle(Thread::current(), method)).fingerprint())
 769   {
 770     _arguments = nullptr;
 771   }
 772 
 773  public:
 774   virtual void push_arguments_on(JavaCallArguments* arguments) = 0;
 775 };
 776 
 777 
 778 class JNI_ArgumentPusherVaArg : public JNI_ArgumentPusher {
 779   va_list _ap;
 780 
 781   void set_ap(va_list rap) {
 782     va_copy(_ap, rap);
 783   }
 784 
 785   friend class SignatureIterator;  // so do_parameters_on can call do_type
 786   void do_type(BasicType type) {
 787     switch (type) {
 788     // these are coerced to int when using va_arg
 789     case T_BYTE:
 790     case T_CHAR:
 791     case T_SHORT:
 792     case T_INT:         push_int(va_arg(_ap, jint)); break;
 793     case T_BOOLEAN:     push_boolean((jboolean) va_arg(_ap, jint)); break;
 794 
 795     // each of these paths is exercised by the various jck Call[Static,Nonvirtual,][Void,Int,..]Method[A,V,] tests
 796 
 797     case T_LONG:        push_long(va_arg(_ap, jlong)); break;
 798     // float is coerced to double w/ va_arg
 799     case T_FLOAT:       push_float((jfloat) va_arg(_ap, jdouble)); break;
 800     case T_DOUBLE:      push_double(va_arg(_ap, jdouble)); break;
 801 
 802     case T_ARRAY:
 803     case T_OBJECT:      push_object(va_arg(_ap, jobject)); break;
 804     default:            ShouldNotReachHere();
 805     }
 806   }
 807 
 808  public:
 809   JNI_ArgumentPusherVaArg(jmethodID method_id, va_list rap)
 810       : JNI_ArgumentPusher(Method::resolve_jmethod_id(method_id)) {
 811     set_ap(rap);
 812   }
 813 
 814   ~JNI_ArgumentPusherVaArg() {
 815     va_end(_ap);
 816   }
 817 
 818   virtual void push_arguments_on(JavaCallArguments* arguments) {
 819     _arguments = arguments;
 820     do_parameters_on(this);
 821   }
 822 };
 823 
 824 
 825 class JNI_ArgumentPusherArray : public JNI_ArgumentPusher {
 826  protected:
 827   const jvalue *_ap;
 828 
 829   inline void set_ap(const jvalue *rap) { _ap = rap; }
 830 
 831   friend class SignatureIterator;  // so do_parameters_on can call do_type
 832   void do_type(BasicType type) {
 833     switch (type) {
 834     case T_CHAR:        push_int((_ap++)->c); break;
 835     case T_SHORT:       push_int((_ap++)->s); break;
 836     case T_BYTE:        push_int((_ap++)->b); break;
 837     case T_INT:         push_int((_ap++)->i); break;
 838     case T_BOOLEAN:     push_boolean((_ap++)->z); break;
 839     case T_LONG:        push_long((_ap++)->j); break;
 840     case T_FLOAT:       push_float((_ap++)->f); break;
 841     case T_DOUBLE:      push_double((_ap++)->d); break;
 842     case T_ARRAY:
 843     case T_OBJECT:      push_object((_ap++)->l); break;
 844     default:            ShouldNotReachHere();
 845     }
 846   }
 847 
 848  public:
 849   JNI_ArgumentPusherArray(jmethodID method_id, const jvalue *rap)
 850       : JNI_ArgumentPusher(Method::resolve_jmethod_id(method_id)) {
 851     set_ap(rap);
 852   }
 853 
 854   virtual void push_arguments_on(JavaCallArguments* arguments) {
 855     _arguments = arguments;
 856     do_parameters_on(this);
 857   }
 858 };
 859 
 860 
 861 enum JNICallType {
 862   JNI_STATIC,
 863   JNI_VIRTUAL,
 864   JNI_NONVIRTUAL
 865 };
 866 
 867 
 868 
 869 static void jni_invoke_static(JNIEnv *env, JavaValue* result, jobject receiver, JNICallType call_type, jmethodID method_id, JNI_ArgumentPusher *args, TRAPS) {
 870   methodHandle method(THREAD, Method::resolve_jmethod_id(method_id));
 871 
 872   // Create object to hold arguments for the JavaCall, and associate it with
 873   // the jni parser
 874   ResourceMark rm(THREAD);
 875   int number_of_parameters = method->size_of_parameters();
 876   JavaCallArguments java_args(number_of_parameters);
 877 
 878   assert(method->is_static(), "method should be static");
 879 
 880   // Fill out JavaCallArguments object
 881   args->push_arguments_on(&java_args);
 882   // Initialize result type
 883   result->set_type(args->return_type());
 884 
 885   // Invoke the method. Result is returned as oop.
 886   JavaCalls::call(result, method, &java_args, CHECK);
 887 
 888   // Convert result
 889   if (is_reference_type(result->get_type())) {
 890     result->set_jobject(JNIHandles::make_local(THREAD, result->get_oop()));
 891   }
 892 }
 893 
 894 
 895 static void jni_invoke_nonstatic(JNIEnv *env, JavaValue* result, jobject receiver, JNICallType call_type, jmethodID method_id, JNI_ArgumentPusher *args, TRAPS) {
 896   oop recv = JNIHandles::resolve(receiver);
 897   if (recv == nullptr) {
 898     THROW(vmSymbols::java_lang_NullPointerException());
 899   }
 900   Handle h_recv(THREAD, recv);
 901 
 902   int number_of_parameters;
 903   Method* selected_method;
 904   {
 905     Method* m = Method::resolve_jmethod_id(method_id);
 906     number_of_parameters = m->size_of_parameters();
 907     InstanceKlass* holder = m->method_holder();
 908     if (call_type != JNI_VIRTUAL) {
 909         selected_method = m;
 910     } else if (!m->has_itable_index()) {
 911       // non-interface call -- for that little speed boost, don't handlize
 912       DEBUG_ONLY(NoSafepointVerifier nosafepoint;)
 913       // jni_GetMethodID makes sure class is linked and initialized
 914       // so m should have a valid vtable index.
 915       assert(m->valid_vtable_index(), "no valid vtable index");
 916       int vtbl_index = m->vtable_index();
 917       if (vtbl_index != Method::nonvirtual_vtable_index) {
 918         selected_method = h_recv->klass()->method_at_vtable(vtbl_index);
 919       } else {
 920         // final method
 921         selected_method = m;
 922       }
 923     } else {
 924       // interface call
 925       int itbl_index = m->itable_index();
 926       Klass* k = h_recv->klass();
 927       selected_method = InstanceKlass::cast(k)->method_at_itable(holder, itbl_index, CHECK);
 928     }
 929   }
 930 
 931   if (selected_method->is_abstract()) {
 932     ResourceMark rm(THREAD);
 933     THROW_MSG(vmSymbols::java_lang_AbstractMethodError(), selected_method->name()->as_C_string());
 934   }
 935 
 936   methodHandle method(THREAD, selected_method);
 937 
 938   // Create object to hold arguments for the JavaCall, and associate it with
 939   // the jni parser
 940   ResourceMark rm(THREAD);
 941   JavaCallArguments java_args(number_of_parameters);
 942 
 943   // handle arguments
 944   assert(!method->is_static(), "method %s should not be static", method->name_and_sig_as_C_string());
 945   java_args.push_oop(h_recv); // Push jobject handle
 946 
 947   // Fill out JavaCallArguments object
 948   args->push_arguments_on(&java_args);
 949   // Initialize result type
 950   result->set_type(args->return_type());
 951 
 952   // Invoke the method. Result is returned as oop.
 953   JavaCalls::call(result, method, &java_args, CHECK);
 954 
 955   // Convert result
 956   if (is_reference_type(result->get_type())) {
 957     result->set_jobject(JNIHandles::make_local(THREAD, result->get_oop()));
 958   }
 959 }
 960 
 961 DT_RETURN_MARK_DECL(AllocObject, jobject
 962                     , HOTSPOT_JNI_ALLOCOBJECT_RETURN(_ret_ref));
 963 
 964 JNI_ENTRY(jobject, jni_AllocObject(JNIEnv *env, jclass clazz))
 965   HOTSPOT_JNI_ALLOCOBJECT_ENTRY(env, clazz);
 966 
 967   jobject ret = nullptr;
 968   DT_RETURN_MARK(AllocObject, jobject, (const jobject&)ret);
 969 
 970   instanceOop i = InstanceKlass::allocate_instance(JNIHandles::resolve_non_null(clazz), CHECK_NULL);
 971   ret = JNIHandles::make_local(THREAD, i);
 972   return ret;
 973 JNI_END
 974 
 975 DT_RETURN_MARK_DECL(NewObjectA, jobject
 976                     , HOTSPOT_JNI_NEWOBJECTA_RETURN(_ret_ref));
 977 
 978 JNI_ENTRY(jobject, jni_NewObjectA(JNIEnv *env, jclass clazz, jmethodID methodID, const jvalue *args))
 979   HOTSPOT_JNI_NEWOBJECTA_ENTRY(env, clazz, (uintptr_t) methodID);
 980 
 981   jobject obj = nullptr;
 982   DT_RETURN_MARK(NewObjectA, jobject, (const jobject&)obj);
 983 
 984   instanceOop i = InstanceKlass::allocate_instance(JNIHandles::resolve_non_null(clazz), CHECK_NULL);
 985   obj = JNIHandles::make_local(THREAD, i);
 986   JavaValue jvalue(T_VOID);
 987   JNI_ArgumentPusherArray ap(methodID, args);
 988   jni_invoke_nonstatic(env, &jvalue, obj, JNI_NONVIRTUAL, methodID, &ap, CHECK_NULL);
 989   return obj;
 990 JNI_END
 991 
 992 
 993 DT_RETURN_MARK_DECL(NewObjectV, jobject
 994                     , HOTSPOT_JNI_NEWOBJECTV_RETURN(_ret_ref));
 995 
 996 JNI_ENTRY(jobject, jni_NewObjectV(JNIEnv *env, jclass clazz, jmethodID methodID, va_list args))
 997   HOTSPOT_JNI_NEWOBJECTV_ENTRY(env, clazz, (uintptr_t) methodID);
 998 
 999   jobject obj = nullptr;
1000   DT_RETURN_MARK(NewObjectV, jobject, (const jobject&)obj);
1001 
1002   instanceOop i = InstanceKlass::allocate_instance(JNIHandles::resolve_non_null(clazz), CHECK_NULL);
1003   obj = JNIHandles::make_local(THREAD, i);
1004   JavaValue jvalue(T_VOID);
1005   JNI_ArgumentPusherVaArg ap(methodID, args);
1006   jni_invoke_nonstatic(env, &jvalue, obj, JNI_NONVIRTUAL, methodID, &ap, CHECK_NULL);
1007   return obj;
1008 JNI_END
1009 
1010 
1011 DT_RETURN_MARK_DECL(NewObject, jobject
1012                     , HOTSPOT_JNI_NEWOBJECT_RETURN(_ret_ref));
1013 
1014 JNI_ENTRY(jobject, jni_NewObject(JNIEnv *env, jclass clazz, jmethodID methodID, ...))
1015   HOTSPOT_JNI_NEWOBJECT_ENTRY(env, clazz, (uintptr_t) methodID);
1016 
1017   jobject obj = nullptr;
1018   DT_RETURN_MARK(NewObject, jobject, (const jobject&)obj);
1019 
1020   instanceOop i = InstanceKlass::allocate_instance(JNIHandles::resolve_non_null(clazz), CHECK_NULL);
1021   obj = JNIHandles::make_local(THREAD, i);
1022   va_list args;
1023   va_start(args, methodID);
1024   JavaValue jvalue(T_VOID);
1025   JNI_ArgumentPusherVaArg ap(methodID, args);
1026   jni_invoke_nonstatic(env, &jvalue, obj, JNI_NONVIRTUAL, methodID, &ap, CHECK_NULL);
1027   va_end(args);
1028   return obj;
1029 JNI_END
1030 
1031 
1032 JNI_ENTRY(jclass, jni_GetObjectClass(JNIEnv *env, jobject obj))
1033   HOTSPOT_JNI_GETOBJECTCLASS_ENTRY(env, obj);
1034 
1035   Klass* k = JNIHandles::resolve_non_null(obj)->klass();
1036   jclass ret =
1037     (jclass) JNIHandles::make_local(THREAD, k->java_mirror());
1038 
1039   HOTSPOT_JNI_GETOBJECTCLASS_RETURN(ret);
1040   return ret;
1041 JNI_END
1042 
1043 JNI_ENTRY_NO_PRESERVE(jboolean, jni_IsInstanceOf(JNIEnv *env, jobject obj, jclass clazz))
1044   HOTSPOT_JNI_ISINSTANCEOF_ENTRY(env, obj, clazz);
1045 
1046   jboolean ret = JNI_TRUE;
1047   if (obj != nullptr) {
1048     ret = JNI_FALSE;
1049     Klass* k = java_lang_Class::as_Klass(
1050       JNIHandles::resolve_non_null(clazz));
1051     if (k != nullptr) {
1052       ret = JNIHandles::resolve_non_null(obj)->is_a(k) ? JNI_TRUE : JNI_FALSE;
1053     }
1054   }
1055 
1056   HOTSPOT_JNI_ISINSTANCEOF_RETURN(ret);
1057   return ret;
1058 JNI_END
1059 
1060 
1061 static jmethodID get_method_id(JNIEnv *env, jclass clazz, const char *name_str,
1062                                const char *sig, bool is_static, TRAPS) {
1063   // %%%% This code should probably just call into a method in the LinkResolver
1064   //
1065   // The class should have been loaded (we have an instance of the class
1066   // passed in) so the method and signature should already be in the symbol
1067   // table.  If they're not there, the method doesn't exist.
1068   const char *name_to_probe = (name_str == nullptr)
1069                         ? vmSymbols::object_initializer_name()->as_C_string()
1070                         : name_str;
1071   TempNewSymbol name = SymbolTable::probe(name_to_probe, (int)strlen(name_to_probe));
1072   TempNewSymbol signature = SymbolTable::probe(sig, (int)strlen(sig));
1073 
1074   if (name == nullptr || signature == nullptr) {
1075     THROW_MSG_NULL(vmSymbols::java_lang_NoSuchMethodError(), name_str);
1076   }
1077 
1078   oop mirror = JNIHandles::resolve_non_null(clazz);
1079   Klass* klass = java_lang_Class::as_Klass(mirror);
1080 
1081   // Throw a NoSuchMethodError exception if we have an instance of a
1082   // primitive java.lang.Class
1083   if (java_lang_Class::is_primitive(mirror)) {
1084     ResourceMark rm(THREAD);
1085     THROW_MSG_NULL(vmSymbols::java_lang_NoSuchMethodError(), err_msg("%s%s.%s%s", is_static ? "static " : "", klass->signature_name(), name_str, sig));
1086   }
1087 
1088   // Make sure class is linked and initialized before handing id's out to
1089   // Method*s.
1090   klass->initialize(CHECK_NULL);
1091 
1092   Method* m;
1093   if (name == vmSymbols::object_initializer_name() ||
1094       name == vmSymbols::class_initializer_name()) {
1095     // Never search superclasses for constructors
1096     if (klass->is_instance_klass()) {
1097       m = InstanceKlass::cast(klass)->find_method(name, signature);
1098     } else {
1099       m = nullptr;
1100     }
1101   } else {
1102     m = klass->lookup_method(name, signature);
1103     if (m == nullptr &&  klass->is_instance_klass()) {
1104       m = InstanceKlass::cast(klass)->lookup_method_in_ordered_interfaces(name, signature);
1105     }
1106   }
1107   if (m == nullptr || (m->is_static() != is_static)) {
1108     ResourceMark rm(THREAD);
1109     THROW_MSG_NULL(vmSymbols::java_lang_NoSuchMethodError(), err_msg("%s%s.%s%s", is_static ? "static " : "", klass->signature_name(), name_str, sig));
1110   }
1111   return m->jmethod_id();
1112 }
1113 
1114 
1115 JNI_ENTRY(jmethodID, jni_GetMethodID(JNIEnv *env, jclass clazz,
1116           const char *name, const char *sig))
1117   HOTSPOT_JNI_GETMETHODID_ENTRY(env, clazz, (char *) name, (char *) sig);
1118   jmethodID ret = get_method_id(env, clazz, name, sig, false, thread);
1119   HOTSPOT_JNI_GETMETHODID_RETURN((uintptr_t) ret);
1120   return ret;
1121 JNI_END
1122 
1123 
1124 JNI_ENTRY(jmethodID, jni_GetStaticMethodID(JNIEnv *env, jclass clazz,
1125           const char *name, const char *sig))
1126   HOTSPOT_JNI_GETSTATICMETHODID_ENTRY(env, (char *) clazz, (char *) name, (char *)sig);
1127   jmethodID ret = get_method_id(env, clazz, name, sig, true, thread);
1128   HOTSPOT_JNI_GETSTATICMETHODID_RETURN((uintptr_t) ret);
1129   return ret;
1130 JNI_END
1131 
1132 
1133 
1134 //
1135 // Calling Methods
1136 //
1137 
1138 
1139 #define DEFINE_CALLMETHOD(ResultType, Result, Tag \
1140                           , EntryProbe, ReturnProbe)    \
1141 \
1142   DT_RETURN_MARK_DECL_FOR(Result, Call##Result##Method, ResultType \
1143                           , ReturnProbe);                          \
1144 \
1145 JNI_ENTRY(ResultType, \
1146           jni_Call##Result##Method(JNIEnv *env, jobject obj, jmethodID methodID, ...)) \
1147 \
1148   EntryProbe; \
1149   ResultType ret{}; \
1150   DT_RETURN_MARK_FOR(Result, Call##Result##Method, ResultType, \
1151                      (const ResultType&)ret);\
1152 \
1153   va_list args; \
1154   va_start(args, methodID); \
1155   JavaValue jvalue(Tag); \
1156   JNI_ArgumentPusherVaArg ap(methodID, args); \
1157   jni_invoke_nonstatic(env, &jvalue, obj, JNI_VIRTUAL, methodID, &ap, CHECK_(ResultType{})); \
1158   va_end(args); \
1159   ret = jvalue.get_##ResultType(); \
1160   return ret;\
1161 JNI_END
1162 
1163 // the runtime type of subword integral basic types is integer
1164 DEFINE_CALLMETHOD(jboolean, Boolean, T_BOOLEAN
1165                   , HOTSPOT_JNI_CALLBOOLEANMETHOD_ENTRY(env, obj, (uintptr_t)methodID),
1166                   HOTSPOT_JNI_CALLBOOLEANMETHOD_RETURN(_ret_ref))
1167 DEFINE_CALLMETHOD(jbyte,    Byte,    T_BYTE
1168                   , HOTSPOT_JNI_CALLBYTEMETHOD_ENTRY(env, obj, (uintptr_t)methodID),
1169                   HOTSPOT_JNI_CALLBYTEMETHOD_RETURN(_ret_ref))
1170 DEFINE_CALLMETHOD(jchar,    Char,    T_CHAR
1171                   , HOTSPOT_JNI_CALLCHARMETHOD_ENTRY(env, obj, (uintptr_t)methodID),
1172                   HOTSPOT_JNI_CALLCHARMETHOD_RETURN(_ret_ref))
1173 DEFINE_CALLMETHOD(jshort,   Short,   T_SHORT
1174                   , HOTSPOT_JNI_CALLSHORTMETHOD_ENTRY(env, obj, (uintptr_t)methodID),
1175                   HOTSPOT_JNI_CALLSHORTMETHOD_RETURN(_ret_ref))
1176 
1177 DEFINE_CALLMETHOD(jobject,  Object,  T_OBJECT
1178                   , HOTSPOT_JNI_CALLOBJECTMETHOD_ENTRY(env, obj, (uintptr_t)methodID),
1179                   HOTSPOT_JNI_CALLOBJECTMETHOD_RETURN(_ret_ref))
1180 DEFINE_CALLMETHOD(jint,     Int,     T_INT,
1181                   HOTSPOT_JNI_CALLINTMETHOD_ENTRY(env, obj, (uintptr_t)methodID),
1182                   HOTSPOT_JNI_CALLINTMETHOD_RETURN(_ret_ref))
1183 DEFINE_CALLMETHOD(jlong,    Long,    T_LONG
1184                   , HOTSPOT_JNI_CALLLONGMETHOD_ENTRY(env, obj, (uintptr_t)methodID),
1185                   HOTSPOT_JNI_CALLLONGMETHOD_RETURN(_ret_ref))
1186 // Float and double probes don't return value because dtrace doesn't currently support it
1187 DEFINE_CALLMETHOD(jfloat,   Float,   T_FLOAT
1188                   , HOTSPOT_JNI_CALLFLOATMETHOD_ENTRY(env, obj, (uintptr_t)methodID),
1189                   HOTSPOT_JNI_CALLFLOATMETHOD_RETURN())
1190 DEFINE_CALLMETHOD(jdouble,  Double,  T_DOUBLE
1191                   , HOTSPOT_JNI_CALLDOUBLEMETHOD_ENTRY(env, obj, (uintptr_t)methodID),
1192                   HOTSPOT_JNI_CALLDOUBLEMETHOD_RETURN())
1193 
1194 #define DEFINE_CALLMETHODV(ResultType, Result, Tag \
1195                           , EntryProbe, ReturnProbe)    \
1196 \
1197   DT_RETURN_MARK_DECL_FOR(Result, Call##Result##MethodV, ResultType \
1198                           , ReturnProbe);                          \
1199 \
1200 JNI_ENTRY(ResultType, \
1201           jni_Call##Result##MethodV(JNIEnv *env, jobject obj, jmethodID methodID, va_list args)) \
1202 \
1203   EntryProbe;\
1204   ResultType ret{}; \
1205   DT_RETURN_MARK_FOR(Result, Call##Result##MethodV, ResultType, \
1206                      (const ResultType&)ret);\
1207 \
1208   JavaValue jvalue(Tag); \
1209   JNI_ArgumentPusherVaArg ap(methodID, args); \
1210   jni_invoke_nonstatic(env, &jvalue, obj, JNI_VIRTUAL, methodID, &ap, CHECK_(ResultType{})); \
1211   ret = jvalue.get_##ResultType(); \
1212   return ret;\
1213 JNI_END
1214 
1215 // the runtime type of subword integral basic types is integer
1216 DEFINE_CALLMETHODV(jboolean, Boolean, T_BOOLEAN
1217                   , HOTSPOT_JNI_CALLBOOLEANMETHODV_ENTRY(env, obj, (uintptr_t)methodID),
1218                   HOTSPOT_JNI_CALLBOOLEANMETHODV_RETURN(_ret_ref))
1219 DEFINE_CALLMETHODV(jbyte,    Byte,    T_BYTE
1220                   , HOTSPOT_JNI_CALLBYTEMETHODV_ENTRY(env, obj, (uintptr_t)methodID),
1221                   HOTSPOT_JNI_CALLBYTEMETHODV_RETURN(_ret_ref))
1222 DEFINE_CALLMETHODV(jchar,    Char,    T_CHAR
1223                   , HOTSPOT_JNI_CALLCHARMETHODV_ENTRY(env, obj, (uintptr_t)methodID),
1224                   HOTSPOT_JNI_CALLCHARMETHODV_RETURN(_ret_ref))
1225 DEFINE_CALLMETHODV(jshort,   Short,   T_SHORT
1226                   , HOTSPOT_JNI_CALLSHORTMETHODV_ENTRY(env, obj, (uintptr_t)methodID),
1227                   HOTSPOT_JNI_CALLSHORTMETHODV_RETURN(_ret_ref))
1228 
1229 DEFINE_CALLMETHODV(jobject,  Object,  T_OBJECT
1230                   , HOTSPOT_JNI_CALLOBJECTMETHODV_ENTRY(env, obj, (uintptr_t)methodID),
1231                   HOTSPOT_JNI_CALLOBJECTMETHODV_RETURN(_ret_ref))
1232 DEFINE_CALLMETHODV(jint,     Int,     T_INT,
1233                   HOTSPOT_JNI_CALLINTMETHODV_ENTRY(env, obj, (uintptr_t)methodID),
1234                   HOTSPOT_JNI_CALLINTMETHODV_RETURN(_ret_ref))
1235 DEFINE_CALLMETHODV(jlong,    Long,    T_LONG
1236                   , HOTSPOT_JNI_CALLLONGMETHODV_ENTRY(env, obj, (uintptr_t)methodID),
1237                   HOTSPOT_JNI_CALLLONGMETHODV_RETURN(_ret_ref))
1238 // Float and double probes don't return value because dtrace doesn't currently support it
1239 DEFINE_CALLMETHODV(jfloat,   Float,   T_FLOAT
1240                   , HOTSPOT_JNI_CALLFLOATMETHODV_ENTRY(env, obj, (uintptr_t)methodID),
1241                   HOTSPOT_JNI_CALLFLOATMETHODV_RETURN())
1242 DEFINE_CALLMETHODV(jdouble,  Double,  T_DOUBLE
1243                   , HOTSPOT_JNI_CALLDOUBLEMETHODV_ENTRY(env, obj, (uintptr_t)methodID),
1244                   HOTSPOT_JNI_CALLDOUBLEMETHODV_RETURN())
1245 
1246 #define DEFINE_CALLMETHODA(ResultType, Result, Tag \
1247                           , EntryProbe, ReturnProbe)    \
1248 \
1249   DT_RETURN_MARK_DECL_FOR(Result, Call##Result##MethodA, ResultType \
1250                           , ReturnProbe);                          \
1251 \
1252 JNI_ENTRY(ResultType, \
1253           jni_Call##Result##MethodA(JNIEnv *env, jobject obj, jmethodID methodID, const jvalue *args)) \
1254   EntryProbe; \
1255   ResultType ret{}; \
1256   DT_RETURN_MARK_FOR(Result, Call##Result##MethodA, ResultType, \
1257                      (const ResultType&)ret);\
1258 \
1259   JavaValue jvalue(Tag); \
1260   JNI_ArgumentPusherArray ap(methodID, args); \
1261   jni_invoke_nonstatic(env, &jvalue, obj, JNI_VIRTUAL, methodID, &ap, CHECK_(ResultType{})); \
1262   ret = jvalue.get_##ResultType(); \
1263   return ret;\
1264 JNI_END
1265 
1266 // the runtime type of subword integral basic types is integer
1267 DEFINE_CALLMETHODA(jboolean, Boolean, T_BOOLEAN
1268                   , HOTSPOT_JNI_CALLBOOLEANMETHODA_ENTRY(env, obj, (uintptr_t)methodID),
1269                   HOTSPOT_JNI_CALLBOOLEANMETHODA_RETURN(_ret_ref))
1270 DEFINE_CALLMETHODA(jbyte,    Byte,    T_BYTE
1271                   , HOTSPOT_JNI_CALLBYTEMETHODA_ENTRY(env, obj, (uintptr_t)methodID),
1272                   HOTSPOT_JNI_CALLBYTEMETHODA_RETURN(_ret_ref))
1273 DEFINE_CALLMETHODA(jchar,    Char,    T_CHAR
1274                   , HOTSPOT_JNI_CALLCHARMETHODA_ENTRY(env, obj, (uintptr_t)methodID),
1275                   HOTSPOT_JNI_CALLCHARMETHODA_RETURN(_ret_ref))
1276 DEFINE_CALLMETHODA(jshort,   Short,   T_SHORT
1277                   , HOTSPOT_JNI_CALLSHORTMETHODA_ENTRY(env, obj, (uintptr_t)methodID),
1278                   HOTSPOT_JNI_CALLSHORTMETHODA_RETURN(_ret_ref))
1279 
1280 DEFINE_CALLMETHODA(jobject,  Object,  T_OBJECT
1281                   , HOTSPOT_JNI_CALLOBJECTMETHODA_ENTRY(env, obj, (uintptr_t)methodID),
1282                   HOTSPOT_JNI_CALLOBJECTMETHODA_RETURN(_ret_ref))
1283 DEFINE_CALLMETHODA(jint,     Int,     T_INT,
1284                   HOTSPOT_JNI_CALLINTMETHODA_ENTRY(env, obj, (uintptr_t)methodID),
1285                   HOTSPOT_JNI_CALLINTMETHODA_RETURN(_ret_ref))
1286 DEFINE_CALLMETHODA(jlong,    Long,    T_LONG
1287                   , HOTSPOT_JNI_CALLLONGMETHODA_ENTRY(env, obj, (uintptr_t)methodID),
1288                   HOTSPOT_JNI_CALLLONGMETHODA_RETURN(_ret_ref))
1289 // Float and double probes don't return value because dtrace doesn't currently support it
1290 DEFINE_CALLMETHODA(jfloat,   Float,   T_FLOAT
1291                   , HOTSPOT_JNI_CALLFLOATMETHODA_ENTRY(env, obj, (uintptr_t)methodID),
1292                   HOTSPOT_JNI_CALLFLOATMETHODA_RETURN())
1293 DEFINE_CALLMETHODA(jdouble,  Double,  T_DOUBLE
1294                   , HOTSPOT_JNI_CALLDOUBLEMETHODA_ENTRY(env, obj, (uintptr_t)methodID),
1295                   HOTSPOT_JNI_CALLDOUBLEMETHODA_RETURN())
1296 
1297 DT_VOID_RETURN_MARK_DECL(CallVoidMethod, HOTSPOT_JNI_CALLVOIDMETHOD_RETURN());
1298 DT_VOID_RETURN_MARK_DECL(CallVoidMethodV, HOTSPOT_JNI_CALLVOIDMETHODV_RETURN());
1299 DT_VOID_RETURN_MARK_DECL(CallVoidMethodA, HOTSPOT_JNI_CALLVOIDMETHODA_RETURN());
1300 
1301 
1302 JNI_ENTRY(void, jni_CallVoidMethod(JNIEnv *env, jobject obj, jmethodID methodID, ...))
1303   HOTSPOT_JNI_CALLVOIDMETHOD_ENTRY(env, obj, (uintptr_t) methodID);
1304   DT_VOID_RETURN_MARK(CallVoidMethod);
1305 
1306   va_list args;
1307   va_start(args, methodID);
1308   JavaValue jvalue(T_VOID);
1309   JNI_ArgumentPusherVaArg ap(methodID, args);
1310   jni_invoke_nonstatic(env, &jvalue, obj, JNI_VIRTUAL, methodID, &ap, CHECK);
1311   va_end(args);
1312 JNI_END
1313 
1314 
1315 JNI_ENTRY(void, jni_CallVoidMethodV(JNIEnv *env, jobject obj, jmethodID methodID, va_list args))
1316   HOTSPOT_JNI_CALLVOIDMETHODV_ENTRY(env, obj, (uintptr_t) methodID);
1317   DT_VOID_RETURN_MARK(CallVoidMethodV);
1318 
1319   JavaValue jvalue(T_VOID);
1320   JNI_ArgumentPusherVaArg ap(methodID, args);
1321   jni_invoke_nonstatic(env, &jvalue, obj, JNI_VIRTUAL, methodID, &ap, CHECK);
1322 JNI_END
1323 
1324 
1325 JNI_ENTRY(void, jni_CallVoidMethodA(JNIEnv *env, jobject obj, jmethodID methodID, const jvalue *args))
1326   HOTSPOT_JNI_CALLVOIDMETHODA_ENTRY(env, obj, (uintptr_t) methodID);
1327   DT_VOID_RETURN_MARK(CallVoidMethodA);
1328 
1329   JavaValue jvalue(T_VOID);
1330   JNI_ArgumentPusherArray ap(methodID, args);
1331   jni_invoke_nonstatic(env, &jvalue, obj, JNI_VIRTUAL, methodID, &ap, CHECK);
1332 JNI_END
1333 
1334 
1335 
1336 #define DEFINE_CALLNONVIRTUALMETHOD(ResultType, Result, Tag \
1337                                     , EntryProbe, ReturnProbe)      \
1338 \
1339   DT_RETURN_MARK_DECL_FOR(Result, CallNonvirtual##Result##Method, ResultType \
1340                           , ReturnProbe);\
1341 \
1342 JNI_ENTRY(ResultType, \
1343           jni_CallNonvirtual##Result##Method(JNIEnv *env, jobject obj, jclass cls, jmethodID methodID, ...)) \
1344 \
1345   EntryProbe;\
1346   ResultType ret;\
1347   DT_RETURN_MARK_FOR(Result, CallNonvirtual##Result##Method, ResultType, \
1348                      (const ResultType&)ret);\
1349 \
1350   va_list args; \
1351   va_start(args, methodID); \
1352   JavaValue jvalue(Tag); \
1353   JNI_ArgumentPusherVaArg ap(methodID, args); \
1354   jni_invoke_nonstatic(env, &jvalue, obj, JNI_NONVIRTUAL, methodID, &ap, CHECK_(ResultType{})); \
1355   va_end(args); \
1356   ret = jvalue.get_##ResultType(); \
1357   return ret;\
1358 JNI_END
1359 
1360 // the runtime type of subword integral basic types is integer
1361 DEFINE_CALLNONVIRTUALMETHOD(jboolean, Boolean, T_BOOLEAN
1362                             , HOTSPOT_JNI_CALLNONVIRTUALBOOLEANMETHOD_ENTRY(env, obj, cls, (uintptr_t)methodID),
1363                             HOTSPOT_JNI_CALLNONVIRTUALBOOLEANMETHOD_RETURN(_ret_ref))
1364 DEFINE_CALLNONVIRTUALMETHOD(jbyte,    Byte,    T_BYTE
1365                             , HOTSPOT_JNI_CALLNONVIRTUALBYTEMETHOD_ENTRY(env, obj, cls, (uintptr_t)methodID),
1366                             HOTSPOT_JNI_CALLNONVIRTUALBYTEMETHOD_RETURN(_ret_ref))
1367 DEFINE_CALLNONVIRTUALMETHOD(jchar,    Char,    T_CHAR
1368                             , HOTSPOT_JNI_CALLNONVIRTUALCHARMETHOD_ENTRY(env, obj, cls, (uintptr_t)methodID),
1369                             HOTSPOT_JNI_CALLNONVIRTUALCHARMETHOD_RETURN(_ret_ref))
1370 DEFINE_CALLNONVIRTUALMETHOD(jshort,   Short,   T_SHORT
1371                             , HOTSPOT_JNI_CALLNONVIRTUALSHORTMETHOD_ENTRY(env, obj, cls, (uintptr_t)methodID),
1372                             HOTSPOT_JNI_CALLNONVIRTUALSHORTMETHOD_RETURN(_ret_ref))
1373 
1374 DEFINE_CALLNONVIRTUALMETHOD(jobject,  Object,  T_OBJECT
1375                             , HOTSPOT_JNI_CALLNONVIRTUALOBJECTMETHOD_ENTRY(env, obj, cls, (uintptr_t)methodID),
1376                             HOTSPOT_JNI_CALLNONVIRTUALOBJECTMETHOD_RETURN(_ret_ref))
1377 DEFINE_CALLNONVIRTUALMETHOD(jint,     Int,     T_INT
1378                             , HOTSPOT_JNI_CALLNONVIRTUALINTMETHOD_ENTRY(env, obj, cls, (uintptr_t)methodID),
1379                             HOTSPOT_JNI_CALLNONVIRTUALINTMETHOD_RETURN(_ret_ref))
1380 DEFINE_CALLNONVIRTUALMETHOD(jlong,    Long,    T_LONG
1381                             , HOTSPOT_JNI_CALLNONVIRTUALLONGMETHOD_ENTRY(env, obj, cls, (uintptr_t)methodID),
1382 // Float and double probes don't return value because dtrace doesn't currently support it
1383                             HOTSPOT_JNI_CALLNONVIRTUALLONGMETHOD_RETURN(_ret_ref))
1384 DEFINE_CALLNONVIRTUALMETHOD(jfloat,   Float,   T_FLOAT
1385                             , HOTSPOT_JNI_CALLNONVIRTUALFLOATMETHOD_ENTRY(env, obj, cls, (uintptr_t)methodID),
1386                             HOTSPOT_JNI_CALLNONVIRTUALFLOATMETHOD_RETURN())
1387 DEFINE_CALLNONVIRTUALMETHOD(jdouble,  Double,  T_DOUBLE
1388                             , HOTSPOT_JNI_CALLNONVIRTUALDOUBLEMETHOD_ENTRY(env, obj, cls, (uintptr_t)methodID),
1389                             HOTSPOT_JNI_CALLNONVIRTUALDOUBLEMETHOD_RETURN())
1390 
1391 #define DEFINE_CALLNONVIRTUALMETHODV(ResultType, Result, Tag \
1392                                     , EntryProbe, ReturnProbe)      \
1393 \
1394   DT_RETURN_MARK_DECL_FOR(Result, CallNonvirtual##Result##MethodV, ResultType \
1395                           , ReturnProbe);\
1396 \
1397 JNI_ENTRY(ResultType, \
1398           jni_CallNonvirtual##Result##MethodV(JNIEnv *env, jobject obj, jclass cls, jmethodID methodID, va_list args)) \
1399 \
1400   EntryProbe;\
1401   ResultType ret;\
1402   DT_RETURN_MARK_FOR(Result, CallNonvirtual##Result##MethodV, ResultType, \
1403                      (const ResultType&)ret);\
1404 \
1405   JavaValue jvalue(Tag); \
1406   JNI_ArgumentPusherVaArg ap(methodID, args); \
1407   jni_invoke_nonstatic(env, &jvalue, obj, JNI_NONVIRTUAL, methodID, &ap, CHECK_(ResultType{})); \
1408   ret = jvalue.get_##ResultType(); \
1409   return ret;\
1410 JNI_END
1411 
1412 // the runtime type of subword integral basic types is integer
1413 DEFINE_CALLNONVIRTUALMETHODV(jboolean, Boolean, T_BOOLEAN
1414                             , HOTSPOT_JNI_CALLNONVIRTUALBOOLEANMETHODV_ENTRY(env, obj, cls, (uintptr_t)methodID),
1415                             HOTSPOT_JNI_CALLNONVIRTUALBOOLEANMETHODV_RETURN(_ret_ref))
1416 DEFINE_CALLNONVIRTUALMETHODV(jbyte,    Byte,    T_BYTE
1417                             , HOTSPOT_JNI_CALLNONVIRTUALBYTEMETHODV_ENTRY(env, obj, cls, (uintptr_t)methodID),
1418                             HOTSPOT_JNI_CALLNONVIRTUALBYTEMETHODV_RETURN(_ret_ref))
1419 DEFINE_CALLNONVIRTUALMETHODV(jchar,    Char,    T_CHAR
1420                             , HOTSPOT_JNI_CALLNONVIRTUALCHARMETHODV_ENTRY(env, obj, cls, (uintptr_t)methodID),
1421                             HOTSPOT_JNI_CALLNONVIRTUALCHARMETHODV_RETURN(_ret_ref))
1422 DEFINE_CALLNONVIRTUALMETHODV(jshort,   Short,   T_SHORT
1423                             , HOTSPOT_JNI_CALLNONVIRTUALSHORTMETHODV_ENTRY(env, obj, cls, (uintptr_t)methodID),
1424                             HOTSPOT_JNI_CALLNONVIRTUALSHORTMETHODV_RETURN(_ret_ref))
1425 
1426 DEFINE_CALLNONVIRTUALMETHODV(jobject,  Object,  T_OBJECT
1427                             , HOTSPOT_JNI_CALLNONVIRTUALOBJECTMETHODV_ENTRY(env, obj, cls, (uintptr_t)methodID),
1428                             HOTSPOT_JNI_CALLNONVIRTUALOBJECTMETHODV_RETURN(_ret_ref))
1429 DEFINE_CALLNONVIRTUALMETHODV(jint,     Int,     T_INT
1430                             , HOTSPOT_JNI_CALLNONVIRTUALINTMETHODV_ENTRY(env, obj, cls, (uintptr_t)methodID),
1431                             HOTSPOT_JNI_CALLNONVIRTUALINTMETHODV_RETURN(_ret_ref))
1432 DEFINE_CALLNONVIRTUALMETHODV(jlong,    Long,    T_LONG
1433                             , HOTSPOT_JNI_CALLNONVIRTUALLONGMETHODV_ENTRY(env, obj, cls, (uintptr_t)methodID),
1434 // Float and double probes don't return value because dtrace doesn't currently support it
1435                             HOTSPOT_JNI_CALLNONVIRTUALLONGMETHODV_RETURN(_ret_ref))
1436 DEFINE_CALLNONVIRTUALMETHODV(jfloat,   Float,   T_FLOAT
1437                             , HOTSPOT_JNI_CALLNONVIRTUALFLOATMETHODV_ENTRY(env, obj, cls, (uintptr_t)methodID),
1438                             HOTSPOT_JNI_CALLNONVIRTUALFLOATMETHODV_RETURN())
1439 DEFINE_CALLNONVIRTUALMETHODV(jdouble,  Double,  T_DOUBLE
1440                             , HOTSPOT_JNI_CALLNONVIRTUALDOUBLEMETHODV_ENTRY(env, obj, cls, (uintptr_t)methodID),
1441                             HOTSPOT_JNI_CALLNONVIRTUALDOUBLEMETHODV_RETURN())
1442 
1443 #define DEFINE_CALLNONVIRTUALMETHODA(ResultType, Result, Tag \
1444                                     , EntryProbe, ReturnProbe)      \
1445 \
1446   DT_RETURN_MARK_DECL_FOR(Result, CallNonvirtual##Result##MethodA, ResultType \
1447                           , ReturnProbe);\
1448 \
1449 JNI_ENTRY(ResultType, \
1450           jni_CallNonvirtual##Result##MethodA(JNIEnv *env, jobject obj, jclass cls, jmethodID methodID, const jvalue *args)) \
1451 \
1452   EntryProbe;\
1453   ResultType ret;\
1454   DT_RETURN_MARK_FOR(Result, CallNonvirtual##Result##MethodA, ResultType, \
1455                      (const ResultType&)ret);\
1456 \
1457   JavaValue jvalue(Tag); \
1458   JNI_ArgumentPusherArray ap(methodID, args); \
1459   jni_invoke_nonstatic(env, &jvalue, obj, JNI_NONVIRTUAL, methodID, &ap, CHECK_(ResultType{})); \
1460   ret = jvalue.get_##ResultType(); \
1461   return ret;\
1462 JNI_END
1463 
1464 // the runtime type of subword integral basic types is integer
1465 DEFINE_CALLNONVIRTUALMETHODA(jboolean, Boolean, T_BOOLEAN
1466                             , HOTSPOT_JNI_CALLNONVIRTUALBOOLEANMETHODA_ENTRY(env, obj, cls, (uintptr_t)methodID),
1467                             HOTSPOT_JNI_CALLNONVIRTUALBOOLEANMETHODA_RETURN(_ret_ref))
1468 DEFINE_CALLNONVIRTUALMETHODA(jbyte,    Byte,    T_BYTE
1469                             , HOTSPOT_JNI_CALLNONVIRTUALBYTEMETHODA_ENTRY(env, obj, cls, (uintptr_t)methodID),
1470                             HOTSPOT_JNI_CALLNONVIRTUALBYTEMETHODA_RETURN(_ret_ref))
1471 DEFINE_CALLNONVIRTUALMETHODA(jchar,    Char,    T_CHAR
1472                             , HOTSPOT_JNI_CALLNONVIRTUALCHARMETHODA_ENTRY(env, obj, cls, (uintptr_t)methodID),
1473                             HOTSPOT_JNI_CALLNONVIRTUALCHARMETHODA_RETURN(_ret_ref))
1474 DEFINE_CALLNONVIRTUALMETHODA(jshort,   Short,   T_SHORT
1475                             , HOTSPOT_JNI_CALLNONVIRTUALSHORTMETHODA_ENTRY(env, obj, cls, (uintptr_t)methodID),
1476                             HOTSPOT_JNI_CALLNONVIRTUALSHORTMETHODA_RETURN(_ret_ref))
1477 
1478 DEFINE_CALLNONVIRTUALMETHODA(jobject,  Object,  T_OBJECT
1479                             , HOTSPOT_JNI_CALLNONVIRTUALOBJECTMETHODA_ENTRY(env, obj, cls, (uintptr_t)methodID),
1480                             HOTSPOT_JNI_CALLNONVIRTUALOBJECTMETHODA_RETURN(_ret_ref))
1481 DEFINE_CALLNONVIRTUALMETHODA(jint,     Int,     T_INT
1482                             , HOTSPOT_JNI_CALLNONVIRTUALINTMETHODA_ENTRY(env, obj, cls, (uintptr_t)methodID),
1483                             HOTSPOT_JNI_CALLNONVIRTUALINTMETHODA_RETURN(_ret_ref))
1484 DEFINE_CALLNONVIRTUALMETHODA(jlong,    Long,    T_LONG
1485                             , HOTSPOT_JNI_CALLNONVIRTUALLONGMETHODA_ENTRY(env, obj, cls, (uintptr_t)methodID),
1486 // Float and double probes don't return value because dtrace doesn't currently support it
1487                             HOTSPOT_JNI_CALLNONVIRTUALLONGMETHODA_RETURN(_ret_ref))
1488 DEFINE_CALLNONVIRTUALMETHODA(jfloat,   Float,   T_FLOAT
1489                             , HOTSPOT_JNI_CALLNONVIRTUALFLOATMETHODA_ENTRY(env, obj, cls, (uintptr_t)methodID),
1490                             HOTSPOT_JNI_CALLNONVIRTUALFLOATMETHODA_RETURN())
1491 DEFINE_CALLNONVIRTUALMETHODA(jdouble,  Double,  T_DOUBLE
1492                             , HOTSPOT_JNI_CALLNONVIRTUALDOUBLEMETHODA_ENTRY(env, obj, cls, (uintptr_t)methodID),
1493                             HOTSPOT_JNI_CALLNONVIRTUALDOUBLEMETHODA_RETURN())
1494 
1495 DT_VOID_RETURN_MARK_DECL(CallNonvirtualVoidMethod
1496                          , HOTSPOT_JNI_CALLNONVIRTUALVOIDMETHOD_RETURN());
1497 DT_VOID_RETURN_MARK_DECL(CallNonvirtualVoidMethodV
1498                          , HOTSPOT_JNI_CALLNONVIRTUALVOIDMETHODV_RETURN());
1499 DT_VOID_RETURN_MARK_DECL(CallNonvirtualVoidMethodA
1500                          , HOTSPOT_JNI_CALLNONVIRTUALVOIDMETHODA_RETURN());
1501 
1502 JNI_ENTRY(void, jni_CallNonvirtualVoidMethod(JNIEnv *env, jobject obj, jclass cls, jmethodID methodID, ...))
1503   HOTSPOT_JNI_CALLNONVIRTUALVOIDMETHOD_ENTRY(env, obj, cls, (uintptr_t) methodID);
1504   DT_VOID_RETURN_MARK(CallNonvirtualVoidMethod);
1505 
1506   va_list args;
1507   va_start(args, methodID);
1508   JavaValue jvalue(T_VOID);
1509   JNI_ArgumentPusherVaArg ap(methodID, args);
1510   jni_invoke_nonstatic(env, &jvalue, obj, JNI_NONVIRTUAL, methodID, &ap, CHECK);
1511   va_end(args);
1512 JNI_END
1513 
1514 
1515 JNI_ENTRY(void, jni_CallNonvirtualVoidMethodV(JNIEnv *env, jobject obj, jclass cls, jmethodID methodID, va_list args))
1516   HOTSPOT_JNI_CALLNONVIRTUALVOIDMETHODV_ENTRY(
1517                env, obj, cls, (uintptr_t) methodID);
1518   DT_VOID_RETURN_MARK(CallNonvirtualVoidMethodV);
1519 
1520   JavaValue jvalue(T_VOID);
1521   JNI_ArgumentPusherVaArg ap(methodID, args);
1522   jni_invoke_nonstatic(env, &jvalue, obj, JNI_NONVIRTUAL, methodID, &ap, CHECK);
1523 JNI_END
1524 
1525 
1526 JNI_ENTRY(void, jni_CallNonvirtualVoidMethodA(JNIEnv *env, jobject obj, jclass cls, jmethodID methodID, const jvalue *args))
1527   HOTSPOT_JNI_CALLNONVIRTUALVOIDMETHODA_ENTRY(
1528                 env, obj, cls, (uintptr_t) methodID);
1529   DT_VOID_RETURN_MARK(CallNonvirtualVoidMethodA);
1530   JavaValue jvalue(T_VOID);
1531   JNI_ArgumentPusherArray ap(methodID, args);
1532   jni_invoke_nonstatic(env, &jvalue, obj, JNI_NONVIRTUAL, methodID, &ap, CHECK);
1533 JNI_END
1534 
1535 
1536 
1537 #define DEFINE_CALLSTATICMETHOD(ResultType, Result, Tag \
1538                                 , EntryProbe, ResultProbe) \
1539 \
1540   DT_RETURN_MARK_DECL_FOR(Result, CallStatic##Result##Method, ResultType \
1541                           , ResultProbe);                               \
1542 \
1543 JNI_ENTRY(ResultType, \
1544           jni_CallStatic##Result##Method(JNIEnv *env, jclass cls, jmethodID methodID, ...)) \
1545 \
1546   EntryProbe; \
1547   ResultType ret{}; \
1548   DT_RETURN_MARK_FOR(Result, CallStatic##Result##Method, ResultType, \
1549                      (const ResultType&)ret);\
1550 \
1551   va_list args; \
1552   va_start(args, methodID); \
1553   JavaValue jvalue(Tag); \
1554   JNI_ArgumentPusherVaArg ap(methodID, args); \
1555   jni_invoke_static(env, &jvalue, nullptr, JNI_STATIC, methodID, &ap, CHECK_(ResultType{})); \
1556   va_end(args); \
1557   ret = jvalue.get_##ResultType(); \
1558   return ret;\
1559 JNI_END
1560 
1561 // the runtime type of subword integral basic types is integer
1562 DEFINE_CALLSTATICMETHOD(jboolean, Boolean, T_BOOLEAN
1563                         , HOTSPOT_JNI_CALLSTATICBOOLEANMETHOD_ENTRY(env, cls, (uintptr_t)methodID),
1564                         HOTSPOT_JNI_CALLSTATICBOOLEANMETHOD_RETURN(_ret_ref));
1565 DEFINE_CALLSTATICMETHOD(jbyte,    Byte,    T_BYTE
1566                         , HOTSPOT_JNI_CALLSTATICBYTEMETHOD_ENTRY(env, cls, (uintptr_t)methodID),
1567                         HOTSPOT_JNI_CALLSTATICBYTEMETHOD_RETURN(_ret_ref));
1568 DEFINE_CALLSTATICMETHOD(jchar,    Char,    T_CHAR
1569                         , HOTSPOT_JNI_CALLSTATICCHARMETHOD_ENTRY(env, cls, (uintptr_t)methodID),
1570                         HOTSPOT_JNI_CALLSTATICCHARMETHOD_RETURN(_ret_ref));
1571 DEFINE_CALLSTATICMETHOD(jshort,   Short,   T_SHORT
1572                         , HOTSPOT_JNI_CALLSTATICSHORTMETHOD_ENTRY(env, cls, (uintptr_t)methodID),
1573                         HOTSPOT_JNI_CALLSTATICSHORTMETHOD_RETURN(_ret_ref));
1574 
1575 DEFINE_CALLSTATICMETHOD(jobject,  Object,  T_OBJECT
1576                         , HOTSPOT_JNI_CALLSTATICOBJECTMETHOD_ENTRY(env, cls, (uintptr_t)methodID),
1577                         HOTSPOT_JNI_CALLSTATICOBJECTMETHOD_RETURN(_ret_ref));
1578 DEFINE_CALLSTATICMETHOD(jint,     Int,     T_INT
1579                         , HOTSPOT_JNI_CALLSTATICINTMETHOD_ENTRY(env, cls, (uintptr_t)methodID),
1580                         HOTSPOT_JNI_CALLSTATICINTMETHOD_RETURN(_ret_ref));
1581 DEFINE_CALLSTATICMETHOD(jlong,    Long,    T_LONG
1582                         , HOTSPOT_JNI_CALLSTATICLONGMETHOD_ENTRY(env, cls, (uintptr_t)methodID),
1583                         HOTSPOT_JNI_CALLSTATICLONGMETHOD_RETURN(_ret_ref));
1584 // Float and double probes don't return value because dtrace doesn't currently support it
1585 DEFINE_CALLSTATICMETHOD(jfloat,   Float,   T_FLOAT
1586                         , HOTSPOT_JNI_CALLSTATICFLOATMETHOD_ENTRY(env, cls, (uintptr_t)methodID),
1587                         HOTSPOT_JNI_CALLSTATICFLOATMETHOD_RETURN());
1588 DEFINE_CALLSTATICMETHOD(jdouble,  Double,  T_DOUBLE
1589                         , HOTSPOT_JNI_CALLSTATICDOUBLEMETHOD_ENTRY(env, cls, (uintptr_t)methodID),
1590                         HOTSPOT_JNI_CALLSTATICDOUBLEMETHOD_RETURN());
1591 
1592 #define DEFINE_CALLSTATICMETHODV(ResultType, Result, Tag \
1593                                 , EntryProbe, ResultProbe) \
1594 \
1595   DT_RETURN_MARK_DECL_FOR(Result, CallStatic##Result##MethodV, ResultType \
1596                           , ResultProbe);                               \
1597 \
1598 JNI_ENTRY(ResultType, \
1599           jni_CallStatic##Result##MethodV(JNIEnv *env, jclass cls, jmethodID methodID, va_list args)) \
1600 \
1601   EntryProbe; \
1602   ResultType ret{}; \
1603   DT_RETURN_MARK_FOR(Result, CallStatic##Result##MethodV, ResultType, \
1604                      (const ResultType&)ret);\
1605 \
1606   JavaValue jvalue(Tag); \
1607   JNI_ArgumentPusherVaArg ap(methodID, args); \
1608   /* Make sure class is initialized before trying to invoke its method */ \
1609   Klass* k = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(cls)); \
1610   k->initialize(CHECK_(ResultType{})); \
1611   jni_invoke_static(env, &jvalue, nullptr, JNI_STATIC, methodID, &ap, CHECK_(ResultType{})); \
1612   va_end(args); \
1613   ret = jvalue.get_##ResultType(); \
1614   return ret;\
1615 JNI_END
1616 
1617 // the runtime type of subword integral basic types is integer
1618 DEFINE_CALLSTATICMETHODV(jboolean, Boolean, T_BOOLEAN
1619                         , HOTSPOT_JNI_CALLSTATICBOOLEANMETHODV_ENTRY(env, cls, (uintptr_t)methodID),
1620                         HOTSPOT_JNI_CALLSTATICBOOLEANMETHODV_RETURN(_ret_ref));
1621 DEFINE_CALLSTATICMETHODV(jbyte,    Byte,    T_BYTE
1622                         , HOTSPOT_JNI_CALLSTATICBYTEMETHODV_ENTRY(env, cls, (uintptr_t)methodID),
1623                         HOTSPOT_JNI_CALLSTATICBYTEMETHODV_RETURN(_ret_ref));
1624 DEFINE_CALLSTATICMETHODV(jchar,    Char,    T_CHAR
1625                         , HOTSPOT_JNI_CALLSTATICCHARMETHODV_ENTRY(env, cls, (uintptr_t)methodID),
1626                         HOTSPOT_JNI_CALLSTATICCHARMETHODV_RETURN(_ret_ref));
1627 DEFINE_CALLSTATICMETHODV(jshort,   Short,   T_SHORT
1628                         , HOTSPOT_JNI_CALLSTATICSHORTMETHODV_ENTRY(env, cls, (uintptr_t)methodID),
1629                         HOTSPOT_JNI_CALLSTATICSHORTMETHODV_RETURN(_ret_ref));
1630 
1631 DEFINE_CALLSTATICMETHODV(jobject,  Object,  T_OBJECT
1632                         , HOTSPOT_JNI_CALLSTATICOBJECTMETHODV_ENTRY(env, cls, (uintptr_t)methodID),
1633                         HOTSPOT_JNI_CALLSTATICOBJECTMETHODV_RETURN(_ret_ref));
1634 DEFINE_CALLSTATICMETHODV(jint,     Int,     T_INT
1635                         , HOTSPOT_JNI_CALLSTATICINTMETHODV_ENTRY(env, cls, (uintptr_t)methodID),
1636                         HOTSPOT_JNI_CALLSTATICINTMETHODV_RETURN(_ret_ref));
1637 DEFINE_CALLSTATICMETHODV(jlong,    Long,    T_LONG
1638                         , HOTSPOT_JNI_CALLSTATICLONGMETHODV_ENTRY(env, cls, (uintptr_t)methodID),
1639                         HOTSPOT_JNI_CALLSTATICLONGMETHODV_RETURN(_ret_ref));
1640 // Float and double probes don't return value because dtrace doesn't currently support it
1641 DEFINE_CALLSTATICMETHODV(jfloat,   Float,   T_FLOAT
1642                         , HOTSPOT_JNI_CALLSTATICFLOATMETHODV_ENTRY(env, cls, (uintptr_t)methodID),
1643                         HOTSPOT_JNI_CALLSTATICFLOATMETHODV_RETURN());
1644 DEFINE_CALLSTATICMETHODV(jdouble,  Double,  T_DOUBLE
1645                         , HOTSPOT_JNI_CALLSTATICDOUBLEMETHODV_ENTRY(env, cls, (uintptr_t)methodID),
1646                         HOTSPOT_JNI_CALLSTATICDOUBLEMETHODV_RETURN());
1647 
1648 #define DEFINE_CALLSTATICMETHODA(ResultType, Result, Tag \
1649                                 , EntryProbe, ResultProbe) \
1650 \
1651   DT_RETURN_MARK_DECL_FOR(Result, CallStatic##Result##MethodA, ResultType \
1652                           , ResultProbe);                               \
1653 \
1654 JNI_ENTRY(ResultType, \
1655           jni_CallStatic##Result##MethodA(JNIEnv *env, jclass cls, jmethodID methodID, const jvalue *args)) \
1656 \
1657   EntryProbe; \
1658   ResultType ret{}; \
1659   DT_RETURN_MARK_FOR(Result, CallStatic##Result##MethodA, ResultType, \
1660                      (const ResultType&)ret);\
1661 \
1662   JavaValue jvalue(Tag); \
1663   JNI_ArgumentPusherArray ap(methodID, args); \
1664   jni_invoke_static(env, &jvalue, nullptr, JNI_STATIC, methodID, &ap, CHECK_(ResultType{})); \
1665   ret = jvalue.get_##ResultType(); \
1666   return ret;\
1667 JNI_END
1668 
1669 // the runtime type of subword integral basic types is integer
1670 DEFINE_CALLSTATICMETHODA(jboolean, Boolean, T_BOOLEAN
1671                         , HOTSPOT_JNI_CALLSTATICBOOLEANMETHODA_ENTRY(env, cls, (uintptr_t)methodID),
1672                         HOTSPOT_JNI_CALLSTATICBOOLEANMETHODA_RETURN(_ret_ref));
1673 DEFINE_CALLSTATICMETHODA(jbyte,    Byte,    T_BYTE
1674                         , HOTSPOT_JNI_CALLSTATICBYTEMETHODA_ENTRY(env, cls, (uintptr_t)methodID),
1675                         HOTSPOT_JNI_CALLSTATICBYTEMETHODA_RETURN(_ret_ref));
1676 DEFINE_CALLSTATICMETHODA(jchar,    Char,    T_CHAR
1677                         , HOTSPOT_JNI_CALLSTATICCHARMETHODA_ENTRY(env, cls, (uintptr_t)methodID),
1678                         HOTSPOT_JNI_CALLSTATICCHARMETHODA_RETURN(_ret_ref));
1679 DEFINE_CALLSTATICMETHODA(jshort,   Short,   T_SHORT
1680                         , HOTSPOT_JNI_CALLSTATICSHORTMETHODA_ENTRY(env, cls, (uintptr_t)methodID),
1681                         HOTSPOT_JNI_CALLSTATICSHORTMETHODA_RETURN(_ret_ref));
1682 
1683 DEFINE_CALLSTATICMETHODA(jobject,  Object,  T_OBJECT
1684                         , HOTSPOT_JNI_CALLSTATICOBJECTMETHODA_ENTRY(env, cls, (uintptr_t)methodID),
1685                         HOTSPOT_JNI_CALLSTATICOBJECTMETHODA_RETURN(_ret_ref));
1686 DEFINE_CALLSTATICMETHODA(jint,     Int,     T_INT
1687                         , HOTSPOT_JNI_CALLSTATICINTMETHODA_ENTRY(env, cls, (uintptr_t)methodID),
1688                         HOTSPOT_JNI_CALLSTATICINTMETHODA_RETURN(_ret_ref));
1689 DEFINE_CALLSTATICMETHODA(jlong,    Long,    T_LONG
1690                         , HOTSPOT_JNI_CALLSTATICLONGMETHODA_ENTRY(env, cls, (uintptr_t)methodID),
1691                         HOTSPOT_JNI_CALLSTATICLONGMETHODA_RETURN(_ret_ref));
1692 // Float and double probes don't return value because dtrace doesn't currently support it
1693 DEFINE_CALLSTATICMETHODA(jfloat,   Float,   T_FLOAT
1694                         , HOTSPOT_JNI_CALLSTATICFLOATMETHODA_ENTRY(env, cls, (uintptr_t)methodID),
1695                         HOTSPOT_JNI_CALLSTATICFLOATMETHODA_RETURN());
1696 DEFINE_CALLSTATICMETHODA(jdouble,  Double,  T_DOUBLE
1697                         , HOTSPOT_JNI_CALLSTATICDOUBLEMETHODA_ENTRY(env, cls, (uintptr_t)methodID),
1698                         HOTSPOT_JNI_CALLSTATICDOUBLEMETHODA_RETURN());
1699 
1700 DT_VOID_RETURN_MARK_DECL(CallStaticVoidMethod
1701                          , HOTSPOT_JNI_CALLSTATICVOIDMETHOD_RETURN());
1702 DT_VOID_RETURN_MARK_DECL(CallStaticVoidMethodV
1703                          , HOTSPOT_JNI_CALLSTATICVOIDMETHODV_RETURN());
1704 DT_VOID_RETURN_MARK_DECL(CallStaticVoidMethodA
1705                          , HOTSPOT_JNI_CALLSTATICVOIDMETHODA_RETURN());
1706 
1707 JNI_ENTRY(void, jni_CallStaticVoidMethod(JNIEnv *env, jclass cls, jmethodID methodID, ...))
1708   HOTSPOT_JNI_CALLSTATICVOIDMETHOD_ENTRY(env, cls, (uintptr_t) methodID);
1709   DT_VOID_RETURN_MARK(CallStaticVoidMethod);
1710 
1711   va_list args;
1712   va_start(args, methodID);
1713   JavaValue jvalue(T_VOID);
1714   JNI_ArgumentPusherVaArg ap(methodID, args);
1715   jni_invoke_static(env, &jvalue, nullptr, JNI_STATIC, methodID, &ap, CHECK);
1716   va_end(args);
1717 JNI_END
1718 
1719 
1720 JNI_ENTRY(void, jni_CallStaticVoidMethodV(JNIEnv *env, jclass cls, jmethodID methodID, va_list args))
1721   HOTSPOT_JNI_CALLSTATICVOIDMETHODV_ENTRY(env, cls, (uintptr_t) methodID);
1722   DT_VOID_RETURN_MARK(CallStaticVoidMethodV);
1723 
1724   JavaValue jvalue(T_VOID);
1725   JNI_ArgumentPusherVaArg ap(methodID, args);
1726   jni_invoke_static(env, &jvalue, nullptr, JNI_STATIC, methodID, &ap, CHECK);
1727 JNI_END
1728 
1729 
1730 JNI_ENTRY(void, jni_CallStaticVoidMethodA(JNIEnv *env, jclass cls, jmethodID methodID, const jvalue *args))
1731   HOTSPOT_JNI_CALLSTATICVOIDMETHODA_ENTRY(env, cls, (uintptr_t) methodID);
1732   DT_VOID_RETURN_MARK(CallStaticVoidMethodA);
1733 
1734   JavaValue jvalue(T_VOID);
1735   JNI_ArgumentPusherArray ap(methodID, args);
1736   jni_invoke_static(env, &jvalue, nullptr, JNI_STATIC, methodID, &ap, CHECK);
1737 JNI_END
1738 
1739 
1740 //
1741 // Accessing Fields
1742 //
1743 
1744 
1745 DT_RETURN_MARK_DECL(GetFieldID, jfieldID
1746                     , HOTSPOT_JNI_GETFIELDID_RETURN((uintptr_t)_ret_ref));
1747 
1748 JNI_ENTRY(jfieldID, jni_GetFieldID(JNIEnv *env, jclass clazz,
1749           const char *name, const char *sig))
1750   HOTSPOT_JNI_GETFIELDID_ENTRY(env, clazz, (char *) name, (char *) sig);
1751   jfieldID ret = nullptr;
1752   DT_RETURN_MARK(GetFieldID, jfieldID, (const jfieldID&)ret);
1753 
1754   Klass* k = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz));
1755 
1756   // The class should have been loaded (we have an instance of the class
1757   // passed in) so the field and signature should already be in the symbol
1758   // table.  If they're not there, the field doesn't exist.
1759   TempNewSymbol fieldname = SymbolTable::probe(name, (int)strlen(name));
1760   TempNewSymbol signame = SymbolTable::probe(sig, (int)strlen(sig));
1761   if (fieldname == nullptr || signame == nullptr) {
1762     ResourceMark rm;
1763     THROW_MSG_NULL(vmSymbols::java_lang_NoSuchFieldError(), err_msg("%s.%s %s", k->external_name(), name, sig));
1764   }
1765 
1766   // Make sure class is initialized before handing id's out to fields
1767   k->initialize(CHECK_NULL);
1768 
1769   fieldDescriptor fd;
1770   if (!k->is_instance_klass() ||
1771       !InstanceKlass::cast(k)->find_field(fieldname, signame, false, &fd)) {
1772     ResourceMark rm;
1773     THROW_MSG_NULL(vmSymbols::java_lang_NoSuchFieldError(), err_msg("%s.%s %s", k->external_name(), name, sig));
1774   }
1775 
1776   // A jfieldID for a non-static field is simply the offset of the field within the instanceOop
1777   // It may also have hash bits for k, if VerifyJNIFields is turned on.
1778   ret = jfieldIDWorkaround::to_instance_jfieldID(k, fd.offset(), fd.is_flat());
1779   return ret;
1780 JNI_END
1781 
1782 
1783 JNI_ENTRY(jobject, jni_GetObjectField(JNIEnv *env, jobject obj, jfieldID fieldID))
1784   HOTSPOT_JNI_GETOBJECTFIELD_ENTRY(env, obj, (uintptr_t) fieldID);
1785   oop o = JNIHandles::resolve_non_null(obj);
1786   Klass* k = o->klass();
1787   int offset = jfieldIDWorkaround::from_instance_jfieldID(k, fieldID);
1788   oop res = nullptr;
1789   // Keep JVMTI addition small and only check enabled flag here.
1790   // jni_GetField_probe() assumes that is okay to create handles.
1791   if (JvmtiExport::should_post_field_access()) {
1792     o = JvmtiExport::jni_GetField_probe(thread, obj, o, k, fieldID, false);
1793   }
1794   if (!jfieldIDWorkaround::is_flat_jfieldID(fieldID)) {
1795     res = HeapAccess<ON_UNKNOWN_OOP_REF>::oop_load_at(o, offset);
1796   } else {
1797     InstanceKlass* ik = InstanceKlass::cast(k);
1798     fieldDescriptor fd;
1799     bool found = ik->find_field_from_offset(offset, false, &fd);  // performance bottleneck
1800     assert(found, "Field not found");
1801     FlatFieldPayload payload(instanceOop(o), &fd);
1802     res = payload.read(CHECK_NULL);
1803   }
1804   jobject ret = JNIHandles::make_local(THREAD, res);
1805   HOTSPOT_JNI_GETOBJECTFIELD_RETURN(ret);
1806   return ret;
1807 JNI_END
1808 
1809 
1810 
1811 #define DEFINE_GETFIELD(Return,Fieldname,Result \
1812   , EntryProbe, ReturnProbe) \
1813 \
1814   DT_RETURN_MARK_DECL_FOR(Result, Get##Result##Field, Return \
1815   , ReturnProbe); \
1816 \
1817 JNI_ENTRY_NO_PRESERVE(Return, jni_Get##Result##Field(JNIEnv *env, jobject obj, jfieldID fieldID)) \
1818 \
1819   EntryProbe; \
1820   Return ret = 0;\
1821   DT_RETURN_MARK_FOR(Result, Get##Result##Field, Return, (const Return&)ret);\
1822 \
1823   oop o = JNIHandles::resolve_non_null(obj); \
1824   Klass* k = o->klass(); \
1825   int offset = jfieldIDWorkaround::from_instance_jfieldID(k, fieldID);  \
1826   /* Keep JVMTI addition small and only check enabled flag here.       */ \
1827   if (JvmtiExport::should_post_field_access()) { \
1828     o = JvmtiExport::jni_GetField_probe(thread, obj, o, k, fieldID, false); \
1829   } \
1830   ret = o->Fieldname##_field(offset); \
1831   return ret; \
1832 JNI_END
1833 
1834 DEFINE_GETFIELD(jboolean, bool,   Boolean
1835                 , HOTSPOT_JNI_GETBOOLEANFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1836                 HOTSPOT_JNI_GETBOOLEANFIELD_RETURN(_ret_ref))
1837 DEFINE_GETFIELD(jbyte,    byte,   Byte
1838                 , HOTSPOT_JNI_GETBYTEFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1839                 HOTSPOT_JNI_GETBYTEFIELD_RETURN(_ret_ref))
1840 DEFINE_GETFIELD(jchar,    char,   Char
1841                 , HOTSPOT_JNI_GETCHARFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1842                 HOTSPOT_JNI_GETCHARFIELD_RETURN(_ret_ref))
1843 DEFINE_GETFIELD(jshort,   short,  Short
1844                 , HOTSPOT_JNI_GETSHORTFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1845                 HOTSPOT_JNI_GETSHORTFIELD_RETURN(_ret_ref))
1846 DEFINE_GETFIELD(jint,     int,    Int
1847                 , HOTSPOT_JNI_GETINTFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1848                 HOTSPOT_JNI_GETINTFIELD_RETURN(_ret_ref))
1849 DEFINE_GETFIELD(jlong,    long,   Long
1850                 , HOTSPOT_JNI_GETLONGFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1851                 HOTSPOT_JNI_GETLONGFIELD_RETURN(_ret_ref))
1852 // Float and double probes don't return value because dtrace doesn't currently support it
1853 DEFINE_GETFIELD(jfloat,   float,  Float
1854                 , HOTSPOT_JNI_GETFLOATFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1855                 HOTSPOT_JNI_GETFLOATFIELD_RETURN())
1856 DEFINE_GETFIELD(jdouble,  double, Double
1857                 , HOTSPOT_JNI_GETDOUBLEFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1858                 HOTSPOT_JNI_GETDOUBLEFIELD_RETURN())
1859 
1860 address jni_GetBooleanField_addr() {
1861   return (address)jni_GetBooleanField;
1862 }
1863 address jni_GetByteField_addr() {
1864   return (address)jni_GetByteField;
1865 }
1866 address jni_GetCharField_addr() {
1867   return (address)jni_GetCharField;
1868 }
1869 address jni_GetShortField_addr() {
1870   return (address)jni_GetShortField;
1871 }
1872 address jni_GetIntField_addr() {
1873   return (address)jni_GetIntField;
1874 }
1875 address jni_GetLongField_addr() {
1876   return (address)jni_GetLongField;
1877 }
1878 address jni_GetFloatField_addr() {
1879   return (address)jni_GetFloatField;
1880 }
1881 address jni_GetDoubleField_addr() {
1882   return (address)jni_GetDoubleField;
1883 }
1884 
1885 static void log_debug_if_final_static_field(JavaThread* current, const char* func_name, InstanceKlass* ik, int offset) {
1886   if (log_is_enabled(Debug, jni)) {
1887     fieldDescriptor fd;
1888     bool found = ik->find_field_from_offset(offset, true, &fd);
1889     assert(found, "bad field offset");
1890     assert(fd.is_static(), "static/instance mismatch");
1891     if (fd.is_final() && !fd.is_mutable_static_final()) {
1892       ResourceMark rm(current);
1893       log_debug(jni)("%s mutated final static field %s.%s", func_name, ik->external_name(), fd.name()->as_C_string());
1894     }
1895   }
1896 }
1897 
1898 static void log_debug_if_final_instance_field(JavaThread* current, const char* func_name, InstanceKlass* ik, int offset) {
1899   if (log_is_enabled(Debug, jni)) {
1900     fieldDescriptor fd;
1901     bool found = ik->find_field_from_offset(offset, false, &fd);
1902     assert(found, "bad field offset");
1903     assert(!fd.is_static(), "static/instance mismatch");
1904     if (fd.is_final()) {
1905       ResourceMark rm(current);
1906       log_debug(jni)("%s mutated final instance field %s.%s", func_name, ik->external_name(), fd.name()->as_C_string());
1907     }
1908   }
1909 }
1910 
1911 JNI_ENTRY_NO_PRESERVE(void, jni_SetObjectField(JNIEnv *env, jobject obj, jfieldID fieldID, jobject value))
1912   HOTSPOT_JNI_SETOBJECTFIELD_ENTRY(env, obj, (uintptr_t) fieldID, value);
1913   oop o = JNIHandles::resolve_non_null(obj);
1914   Klass* k = o->klass();
1915   int offset = jfieldIDWorkaround::from_instance_jfieldID(k, fieldID);
1916   // Keep JVMTI addition small and only check enabled flag here.
1917   if (JvmtiExport::should_post_field_modification()) {
1918     jvalue field_value;
1919     field_value.l = value;
1920     o = JvmtiExport::jni_SetField_probe(thread, obj, o, k, fieldID, false, JVM_SIGNATURE_CLASS, (jvalue *)&field_value);
1921   }
1922   if (!jfieldIDWorkaround::is_flat_jfieldID(fieldID)) {
1923     oop v = JNIHandles::resolve(value);
1924     if (v == nullptr) {
1925       InstanceKlass *ik = InstanceKlass::cast(k);
1926       fieldDescriptor fd;
1927       ik->find_field_from_offset(offset, false, &fd);
1928       if (fd.is_null_free_inline_type()) {
1929         THROW_MSG(vmSymbols::java_lang_NullPointerException(), "Cannot store null in a null-restricted field");
1930       }
1931     }
1932     HeapAccess<ON_UNKNOWN_OOP_REF>::oop_store_at(o, offset, v);
1933   } else {
1934     assert(k->is_instance_klass(), "Only instances can have flat fields");
1935     InstanceKlass* ik = InstanceKlass::cast(k);
1936     fieldDescriptor fd;
1937     bool found = ik->find_field_from_offset(offset, false, &fd);
1938     assert(found, "Field not found");
1939     FlatFieldPayload payload(instanceOop(o), &fd);
1940     payload.write(inlineOop(JNIHandles::resolve(value)), CHECK);
1941   }
1942   log_debug_if_final_instance_field(thread, "SetObjectField", InstanceKlass::cast(k), offset);
1943   HOTSPOT_JNI_SETOBJECTFIELD_RETURN();
1944 JNI_END
1945 
1946 // TODO: make this a template
1947 
1948 #define DEFINE_SETFIELD(Argument,Fieldname,Result,SigType,unionType \
1949                         , EntryProbe, ReturnProbe) \
1950 \
1951 JNI_ENTRY_NO_PRESERVE(void, jni_Set##Result##Field(JNIEnv *env, jobject obj, jfieldID fieldID, Argument value)) \
1952 \
1953   EntryProbe; \
1954 \
1955   oop o = JNIHandles::resolve_non_null(obj); \
1956   Klass* k = o->klass(); \
1957   int offset = jfieldIDWorkaround::from_instance_jfieldID(k, fieldID);  \
1958   /* Keep JVMTI addition small and only check enabled flag here.       */ \
1959   if (JvmtiExport::should_post_field_modification()) { \
1960     jvalue field_value; \
1961     field_value.unionType = value; \
1962     o = JvmtiExport::jni_SetField_probe(thread, obj, o, k, fieldID, false, SigType, (jvalue *)&field_value); \
1963   } \
1964   o->Fieldname##_field_put(offset, value); \
1965   log_debug_if_final_instance_field(thread, "Set<Type>Field", InstanceKlass::cast(k), offset); \
1966   ReturnProbe; \
1967 JNI_END
1968 
1969 DEFINE_SETFIELD(jboolean, bool,   Boolean, JVM_SIGNATURE_BOOLEAN, z
1970                 , HOTSPOT_JNI_SETBOOLEANFIELD_ENTRY(env, obj, (uintptr_t)fieldID, value),
1971                 HOTSPOT_JNI_SETBOOLEANFIELD_RETURN())
1972 DEFINE_SETFIELD(jbyte,    byte,   Byte,    JVM_SIGNATURE_BYTE, b
1973                 , HOTSPOT_JNI_SETBYTEFIELD_ENTRY(env, obj, (uintptr_t)fieldID, value),
1974                 HOTSPOT_JNI_SETBYTEFIELD_RETURN())
1975 DEFINE_SETFIELD(jchar,    char,   Char,    JVM_SIGNATURE_CHAR, c
1976                 , HOTSPOT_JNI_SETCHARFIELD_ENTRY(env, obj, (uintptr_t)fieldID, value),
1977                 HOTSPOT_JNI_SETCHARFIELD_RETURN())
1978 DEFINE_SETFIELD(jshort,   short,  Short,   JVM_SIGNATURE_SHORT, s
1979                 , HOTSPOT_JNI_SETSHORTFIELD_ENTRY(env, obj, (uintptr_t)fieldID, value),
1980                 HOTSPOT_JNI_SETSHORTFIELD_RETURN())
1981 DEFINE_SETFIELD(jint,     int,    Int,     JVM_SIGNATURE_INT, i
1982                 , HOTSPOT_JNI_SETINTFIELD_ENTRY(env, obj, (uintptr_t)fieldID, value),
1983                 HOTSPOT_JNI_SETINTFIELD_RETURN())
1984 DEFINE_SETFIELD(jlong,    long,   Long,    JVM_SIGNATURE_LONG, j
1985                 , HOTSPOT_JNI_SETLONGFIELD_ENTRY(env, obj, (uintptr_t)fieldID, value),
1986                 HOTSPOT_JNI_SETLONGFIELD_RETURN())
1987 // Float and double probes don't return value because dtrace doesn't currently support it
1988 DEFINE_SETFIELD(jfloat,   float,  Float,   JVM_SIGNATURE_FLOAT, f
1989                 , HOTSPOT_JNI_SETFLOATFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1990                 HOTSPOT_JNI_SETFLOATFIELD_RETURN())
1991 DEFINE_SETFIELD(jdouble,  double, Double,  JVM_SIGNATURE_DOUBLE, d
1992                 , HOTSPOT_JNI_SETDOUBLEFIELD_ENTRY(env, obj, (uintptr_t)fieldID),
1993                 HOTSPOT_JNI_SETDOUBLEFIELD_RETURN())
1994 
1995 DT_RETURN_MARK_DECL(ToReflectedField, jobject
1996                     , HOTSPOT_JNI_TOREFLECTEDFIELD_RETURN(_ret_ref));
1997 
1998 JNI_ENTRY(jobject, jni_ToReflectedField(JNIEnv *env, jclass cls, jfieldID fieldID, jboolean isStatic))
1999   HOTSPOT_JNI_TOREFLECTEDFIELD_ENTRY(env, cls, (uintptr_t) fieldID, isStatic);
2000   jobject ret = nullptr;
2001   DT_RETURN_MARK(ToReflectedField, jobject, (const jobject&)ret);
2002 
2003   fieldDescriptor fd;
2004   bool found = false;
2005   Klass* k = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(cls));
2006 
2007   assert(jfieldIDWorkaround::is_static_jfieldID(fieldID) == (isStatic != 0), "invalid fieldID");
2008 
2009   if (isStatic) {
2010     // Static field. The fieldID a JNIid specifying the field holder and the offset within the Klass*.
2011     JNIid* id = jfieldIDWorkaround::from_static_jfieldID(fieldID);
2012     assert(id->is_static_field_id(), "invalid static field id");
2013     found = id->find_local_field(&fd);
2014   } else {
2015     // Non-static field. The fieldID is really the offset of the field within the instanceOop.
2016     int offset = jfieldIDWorkaround::from_instance_jfieldID(k, fieldID);
2017     found = InstanceKlass::cast(k)->find_field_from_offset(offset, false, &fd);
2018   }
2019   assert(found, "bad fieldID passed into jni_ToReflectedField");
2020   oop reflected = Reflection::new_field(&fd, CHECK_NULL);
2021   ret = JNIHandles::make_local(THREAD, reflected);
2022   return ret;
2023 JNI_END
2024 
2025 
2026 //
2027 // Accessing Static Fields
2028 //
2029 DT_RETURN_MARK_DECL(GetStaticFieldID, jfieldID
2030                     , HOTSPOT_JNI_GETSTATICFIELDID_RETURN((uintptr_t)_ret_ref));
2031 
2032 JNI_ENTRY(jfieldID, jni_GetStaticFieldID(JNIEnv *env, jclass clazz,
2033           const char *name, const char *sig))
2034   HOTSPOT_JNI_GETSTATICFIELDID_ENTRY(env, clazz, (char *) name, (char *) sig);
2035   jfieldID ret = nullptr;
2036   DT_RETURN_MARK(GetStaticFieldID, jfieldID, (const jfieldID&)ret);
2037 
2038   // The class should have been loaded (we have an instance of the class
2039   // passed in) so the field and signature should already be in the symbol
2040   // table.  If they're not there, the field doesn't exist.
2041   TempNewSymbol fieldname = SymbolTable::probe(name, (int)strlen(name));
2042   TempNewSymbol signame = SymbolTable::probe(sig, (int)strlen(sig));
2043   if (fieldname == nullptr || signame == nullptr) {
2044     THROW_MSG_NULL(vmSymbols::java_lang_NoSuchFieldError(), (char*) name);
2045   }
2046   Klass* k = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz));
2047   // Make sure class is initialized before handing id's out to static fields
2048   k->initialize(CHECK_NULL);
2049 
2050   fieldDescriptor fd;
2051   if (!k->is_instance_klass() ||
2052       !InstanceKlass::cast(k)->find_field(fieldname, signame, true, &fd)) {
2053     THROW_MSG_NULL(vmSymbols::java_lang_NoSuchFieldError(), (char*) name);
2054   }
2055 
2056   // A jfieldID for a static field is a JNIid specifying the field holder and the offset within the Klass*
2057   JNIid* id = fd.field_holder()->jni_id_for(fd.offset());
2058   DEBUG_ONLY(id->set_is_static_field_id();)
2059 
2060   DEBUG_ONLY(id->verify(fd.field_holder()));
2061 
2062   ret = jfieldIDWorkaround::to_static_jfieldID(id);
2063   return ret;
2064 JNI_END
2065 
2066 
2067 JNI_ENTRY(jobject, jni_GetStaticObjectField(JNIEnv *env, jclass clazz, jfieldID fieldID))
2068   HOTSPOT_JNI_GETSTATICOBJECTFIELD_ENTRY(env, clazz, (uintptr_t) fieldID);
2069 #if INCLUDE_JNI_CHECK
2070   DEBUG_ONLY(Klass* param_k = jniCheck::validate_class(thread, clazz);)
2071 #endif // INCLUDE_JNI_CHECK
2072   JNIid* id = jfieldIDWorkaround::from_static_jfieldID(fieldID);
2073   assert(id->is_static_field_id(), "invalid static field id");
2074   // Keep JVMTI addition small and only check enabled flag here.
2075   // jni_GetField_probe() assumes that is okay to create handles.
2076   if (JvmtiExport::should_post_field_access()) {
2077     JvmtiExport::jni_GetField_probe(thread, nullptr, nullptr, id->holder(), fieldID, true);
2078   }
2079   jobject ret = JNIHandles::make_local(THREAD, id->holder()->java_mirror()->obj_field(id->offset()));
2080   HOTSPOT_JNI_GETSTATICOBJECTFIELD_RETURN(ret);
2081   return ret;
2082 JNI_END
2083 
2084 
2085 #define DEFINE_GETSTATICFIELD(Return,Fieldname,Result \
2086                               , EntryProbe, ReturnProbe) \
2087 \
2088   DT_RETURN_MARK_DECL_FOR(Result, GetStatic##Result##Field, Return \
2089                           , ReturnProbe);                                          \
2090 \
2091 JNI_ENTRY(Return, jni_GetStatic##Result##Field(JNIEnv *env, jclass clazz, jfieldID fieldID)) \
2092   EntryProbe; \
2093   Return ret = 0;\
2094   DT_RETURN_MARK_FOR(Result, GetStatic##Result##Field, Return, \
2095                      (const Return&)ret);\
2096   JNIid* id = jfieldIDWorkaround::from_static_jfieldID(fieldID); \
2097   assert(id->is_static_field_id(), "invalid static field id"); \
2098   /* Keep JVMTI addition small and only check enabled flag here. */ \
2099   /* jni_GetField_probe() assumes that is okay to create handles. */ \
2100   if (JvmtiExport::should_post_field_access()) { \
2101     JvmtiExport::jni_GetField_probe(thread, nullptr, nullptr, id->holder(), fieldID, true); \
2102   } \
2103   ret = id->holder()->java_mirror()-> Fieldname##_field (id->offset()); \
2104   return ret;\
2105 JNI_END
2106 
2107 DEFINE_GETSTATICFIELD(jboolean, bool,   Boolean
2108                       , HOTSPOT_JNI_GETSTATICBOOLEANFIELD_ENTRY(env, clazz, (uintptr_t) fieldID), HOTSPOT_JNI_GETSTATICBOOLEANFIELD_RETURN(_ret_ref))
2109 DEFINE_GETSTATICFIELD(jbyte,    byte,   Byte
2110                       , HOTSPOT_JNI_GETSTATICBYTEFIELD_ENTRY(env, clazz, (uintptr_t) fieldID),    HOTSPOT_JNI_GETSTATICBYTEFIELD_RETURN(_ret_ref)   )
2111 DEFINE_GETSTATICFIELD(jchar,    char,   Char
2112                       , HOTSPOT_JNI_GETSTATICCHARFIELD_ENTRY(env, clazz, (uintptr_t) fieldID),    HOTSPOT_JNI_GETSTATICCHARFIELD_RETURN(_ret_ref)   )
2113 DEFINE_GETSTATICFIELD(jshort,   short,  Short
2114                       , HOTSPOT_JNI_GETSTATICSHORTFIELD_ENTRY(env, clazz, (uintptr_t) fieldID),   HOTSPOT_JNI_GETSTATICSHORTFIELD_RETURN(_ret_ref)  )
2115 DEFINE_GETSTATICFIELD(jint,     int,    Int
2116                       , HOTSPOT_JNI_GETSTATICINTFIELD_ENTRY(env, clazz, (uintptr_t) fieldID),     HOTSPOT_JNI_GETSTATICINTFIELD_RETURN(_ret_ref)    )
2117 DEFINE_GETSTATICFIELD(jlong,    long,   Long
2118                       , HOTSPOT_JNI_GETSTATICLONGFIELD_ENTRY(env, clazz, (uintptr_t) fieldID),    HOTSPOT_JNI_GETSTATICLONGFIELD_RETURN(_ret_ref)   )
2119 // Float and double probes don't return value because dtrace doesn't currently support it
2120 DEFINE_GETSTATICFIELD(jfloat,   float,  Float
2121                       , HOTSPOT_JNI_GETSTATICFLOATFIELD_ENTRY(env, clazz, (uintptr_t) fieldID),   HOTSPOT_JNI_GETSTATICFLOATFIELD_RETURN()          )
2122 DEFINE_GETSTATICFIELD(jdouble,  double, Double
2123                       , HOTSPOT_JNI_GETSTATICDOUBLEFIELD_ENTRY(env, clazz, (uintptr_t) fieldID),  HOTSPOT_JNI_GETSTATICDOUBLEFIELD_RETURN()         )
2124 
2125 JNI_ENTRY(void, jni_SetStaticObjectField(JNIEnv *env, jclass clazz, jfieldID fieldID, jobject value))
2126  HOTSPOT_JNI_SETSTATICOBJECTFIELD_ENTRY(env, clazz, (uintptr_t) fieldID, value);
2127   JNIid* id = jfieldIDWorkaround::from_static_jfieldID(fieldID);
2128   assert(id->is_static_field_id(), "invalid static field id");
2129   // Keep JVMTI addition small and only check enabled flag here.
2130   // jni_SetField_probe() assumes that is okay to create handles.
2131   if (JvmtiExport::should_post_field_modification()) {
2132     jvalue field_value;
2133     field_value.l = value;
2134     JvmtiExport::jni_SetField_probe(thread, nullptr, nullptr, id->holder(), fieldID, true, JVM_SIGNATURE_CLASS, (jvalue *)&field_value);
2135   }
2136   id->holder()->java_mirror()->obj_field_put(id->offset(), JNIHandles::resolve(value));
2137   log_debug_if_final_static_field(THREAD, "SetStaticObjectField", id->holder(), id->offset());
2138   HOTSPOT_JNI_SETSTATICOBJECTFIELD_RETURN();
2139 JNI_END
2140 
2141 
2142 
2143 #define DEFINE_SETSTATICFIELD(Argument,Fieldname,Result,SigType,unionType \
2144                               , EntryProbe, ReturnProbe) \
2145 \
2146 JNI_ENTRY(void, jni_SetStatic##Result##Field(JNIEnv *env, jclass clazz, jfieldID fieldID, Argument value)) \
2147   EntryProbe; \
2148 \
2149   JNIid* id = jfieldIDWorkaround::from_static_jfieldID(fieldID); \
2150   assert(id->is_static_field_id(), "invalid static field id"); \
2151   /* Keep JVMTI addition small and only check enabled flag here. */ \
2152   /* jni_SetField_probe() assumes that is okay to create handles. */ \
2153   if (JvmtiExport::should_post_field_modification()) { \
2154     jvalue field_value; \
2155     field_value.unionType = value; \
2156     JvmtiExport::jni_SetField_probe(thread, nullptr, nullptr, id->holder(), fieldID, true, SigType, (jvalue *)&field_value); \
2157   } \
2158   id->holder()->java_mirror()-> Fieldname##_field_put (id->offset(), value); \
2159   log_debug_if_final_static_field(THREAD, "SetStatic<Type>Field", id->holder(), id->offset()); \
2160   ReturnProbe;\
2161 JNI_END
2162 
2163 DEFINE_SETSTATICFIELD(jboolean, bool,   Boolean, JVM_SIGNATURE_BOOLEAN, z
2164                       , HOTSPOT_JNI_SETSTATICBOOLEANFIELD_ENTRY(env, clazz, (uintptr_t)fieldID, value),
2165                       HOTSPOT_JNI_SETSTATICBOOLEANFIELD_RETURN())
2166 DEFINE_SETSTATICFIELD(jbyte,    byte,   Byte,    JVM_SIGNATURE_BYTE, b
2167                       , HOTSPOT_JNI_SETSTATICBYTEFIELD_ENTRY(env, clazz, (uintptr_t) fieldID, value),
2168                       HOTSPOT_JNI_SETSTATICBYTEFIELD_RETURN())
2169 DEFINE_SETSTATICFIELD(jchar,    char,   Char,    JVM_SIGNATURE_CHAR, c
2170                       , HOTSPOT_JNI_SETSTATICCHARFIELD_ENTRY(env, clazz, (uintptr_t) fieldID, value),
2171                       HOTSPOT_JNI_SETSTATICCHARFIELD_RETURN())
2172 DEFINE_SETSTATICFIELD(jshort,   short,  Short,   JVM_SIGNATURE_SHORT, s
2173                       , HOTSPOT_JNI_SETSTATICSHORTFIELD_ENTRY(env, clazz, (uintptr_t) fieldID, value),
2174                       HOTSPOT_JNI_SETSTATICSHORTFIELD_RETURN())
2175 DEFINE_SETSTATICFIELD(jint,     int,    Int,     JVM_SIGNATURE_INT, i
2176                       , HOTSPOT_JNI_SETSTATICINTFIELD_ENTRY(env, clazz, (uintptr_t) fieldID, value),
2177                       HOTSPOT_JNI_SETSTATICINTFIELD_RETURN())
2178 DEFINE_SETSTATICFIELD(jlong,    long,   Long,    JVM_SIGNATURE_LONG, j
2179                       , HOTSPOT_JNI_SETSTATICLONGFIELD_ENTRY(env, clazz, (uintptr_t) fieldID, value),
2180                       HOTSPOT_JNI_SETSTATICLONGFIELD_RETURN())
2181 // Float and double probes don't return value because dtrace doesn't currently support it
2182 DEFINE_SETSTATICFIELD(jfloat,   float,  Float,   JVM_SIGNATURE_FLOAT, f
2183                       , HOTSPOT_JNI_SETSTATICFLOATFIELD_ENTRY(env, clazz, (uintptr_t) fieldID),
2184                       HOTSPOT_JNI_SETSTATICFLOATFIELD_RETURN())
2185 DEFINE_SETSTATICFIELD(jdouble,  double, Double,  JVM_SIGNATURE_DOUBLE, d
2186                       , HOTSPOT_JNI_SETSTATICDOUBLEFIELD_ENTRY(env, clazz, (uintptr_t) fieldID),
2187                       HOTSPOT_JNI_SETSTATICDOUBLEFIELD_RETURN())
2188 
2189 //
2190 // String Operations
2191 //
2192 
2193 // Unicode Interface
2194 
2195 DT_RETURN_MARK_DECL(NewString, jstring
2196                     , HOTSPOT_JNI_NEWSTRING_RETURN(_ret_ref));
2197 
2198 JNI_ENTRY(jstring, jni_NewString(JNIEnv *env, const jchar *unicodeChars, jsize len))
2199  HOTSPOT_JNI_NEWSTRING_ENTRY(env, (uint16_t *) unicodeChars, len);
2200   jstring ret = nullptr;
2201   DT_RETURN_MARK(NewString, jstring, (const jstring&)ret);
2202   oop string=java_lang_String::create_oop_from_unicode((jchar*) unicodeChars, len, CHECK_NULL);
2203   ret = (jstring) JNIHandles::make_local(THREAD, string);
2204   return ret;
2205 JNI_END
2206 
2207 
2208 JNI_ENTRY_NO_PRESERVE(jsize, jni_GetStringLength(JNIEnv *env, jstring string))
2209   HOTSPOT_JNI_GETSTRINGLENGTH_ENTRY(env, string);
2210   jsize ret = 0;
2211   oop s = JNIHandles::resolve_non_null(string);
2212   ret = java_lang_String::length(s);
2213  HOTSPOT_JNI_GETSTRINGLENGTH_RETURN(ret);
2214   return ret;
2215 JNI_END
2216 
2217 
2218 JNI_ENTRY_NO_PRESERVE(const jchar*, jni_GetStringChars(
2219   JNIEnv *env, jstring string, jboolean *isCopy))
2220  HOTSPOT_JNI_GETSTRINGCHARS_ENTRY(env, string, (uintptr_t *) isCopy);
2221   jchar* buf = nullptr;
2222   oop s = JNIHandles::resolve_non_null(string);
2223   typeArrayOop s_value = java_lang_String::value(s);
2224   if (s_value != nullptr) {
2225     int s_len = java_lang_String::length(s, s_value);
2226     bool is_latin1 = java_lang_String::is_latin1(s);
2227     buf = NEW_C_HEAP_ARRAY_RETURN_NULL(jchar, s_len + 1, mtInternal);  // add one for zero termination
2228     /* JNI Specification states return null on OOM */
2229     if (buf != nullptr) {
2230       if (s_len > 0) {
2231         if (!is_latin1) {
2232           ArrayAccess<>::arraycopy_to_native(s_value, (size_t) typeArrayOopDesc::element_offset<jchar>(0),
2233                                              buf, s_len);
2234         } else {
2235           for (int i = 0; i < s_len; i++) {
2236             buf[i] = ((jchar) s_value->byte_at(i)) & 0xff;
2237           }
2238         }
2239       }
2240       buf[s_len] = 0;
2241       //%note jni_5
2242       if (isCopy != nullptr) {
2243         *isCopy = JNI_TRUE;
2244       }
2245     }
2246   }
2247   HOTSPOT_JNI_GETSTRINGCHARS_RETURN(buf);
2248   return buf;
2249 JNI_END
2250 
2251 
2252 JNI_ENTRY_NO_PRESERVE(void, jni_ReleaseStringChars(JNIEnv *env, jstring str, const jchar *chars))
2253   HOTSPOT_JNI_RELEASESTRINGCHARS_ENTRY(env, str, (uint16_t *) chars);
2254   //%note jni_6
2255   if (chars != nullptr) {
2256     // Since String objects are supposed to be immutable, don't copy any
2257     // new data back.  A bad user will have to go after the char array.
2258     FreeHeap((void*) chars);
2259   }
2260   HOTSPOT_JNI_RELEASESTRINGCHARS_RETURN();
2261 JNI_END
2262 
2263 
2264 // UTF Interface
2265 
2266 DT_RETURN_MARK_DECL(NewStringUTF, jstring
2267                     , HOTSPOT_JNI_NEWSTRINGUTF_RETURN(_ret_ref));
2268 
2269 JNI_ENTRY(jstring, jni_NewStringUTF(JNIEnv *env, const char *bytes))
2270   HOTSPOT_JNI_NEWSTRINGUTF_ENTRY(env, (char *) bytes);
2271   jstring ret;
2272   DT_RETURN_MARK(NewStringUTF, jstring, (const jstring&)ret);
2273 
2274   oop result = java_lang_String::create_oop_from_str((char*) bytes, CHECK_NULL);
2275   ret = (jstring) JNIHandles::make_local(THREAD, result);
2276   return ret;
2277 JNI_END
2278 
2279 
2280 JNI_ENTRY(jsize, jni_GetStringUTFLength(JNIEnv *env, jstring string))
2281   HOTSPOT_JNI_GETSTRINGUTFLENGTH_ENTRY(env, string);
2282   oop java_string = JNIHandles::resolve_non_null(string);
2283   jsize ret = java_lang_String::utf8_length_as_int(java_string);
2284   HOTSPOT_JNI_GETSTRINGUTFLENGTH_RETURN(ret);
2285   return ret;
2286 JNI_END
2287 
2288 JNI_ENTRY(jlong, jni_GetStringUTFLengthAsLong(JNIEnv *env, jstring string))
2289   HOTSPOT_JNI_GETSTRINGUTFLENGTHASLONG_ENTRY(env, string);
2290   oop java_string = JNIHandles::resolve_non_null(string);
2291   size_t ret = java_lang_String::utf8_length(java_string);
2292   HOTSPOT_JNI_GETSTRINGUTFLENGTHASLONG_RETURN(ret);
2293 return checked_cast<jlong>(ret);
2294 JNI_END
2295 
2296 
2297 JNI_ENTRY(const char*, jni_GetStringUTFChars(JNIEnv *env, jstring string, jboolean *isCopy))
2298  HOTSPOT_JNI_GETSTRINGUTFCHARS_ENTRY(env, string, (uintptr_t *) isCopy);
2299   char* result = nullptr;
2300   oop java_string = JNIHandles::resolve_non_null(string);
2301   typeArrayOop s_value = java_lang_String::value(java_string);
2302   if (s_value != nullptr) {
2303     size_t length = java_lang_String::utf8_length(java_string, s_value);
2304     // JNI Specification states return null on OOM.
2305     // The resulting sequence doesn't have to be NUL-terminated but we do.
2306     result = AllocateHeap(length + 1, mtInternal, AllocFailStrategy::RETURN_NULL);
2307     if (result != nullptr) {
2308       java_lang_String::as_utf8_string(java_string, s_value, result, length + 1);
2309       if (isCopy != nullptr) {
2310         *isCopy = JNI_TRUE;
2311       }
2312     }
2313   }
2314  HOTSPOT_JNI_GETSTRINGUTFCHARS_RETURN(result);
2315   return result;
2316 JNI_END
2317 
2318 
2319 JNI_LEAF(void, jni_ReleaseStringUTFChars(JNIEnv *env, jstring str, const char *chars))
2320  HOTSPOT_JNI_RELEASESTRINGUTFCHARS_ENTRY(env, str, (char *) chars);
2321   if (chars != nullptr) {
2322     FreeHeap((char*) chars);
2323   }
2324 HOTSPOT_JNI_RELEASESTRINGUTFCHARS_RETURN();
2325 JNI_END
2326 
2327 
2328 JNI_ENTRY_NO_PRESERVE(jsize, jni_GetArrayLength(JNIEnv *env, jarray array))
2329  HOTSPOT_JNI_GETARRAYLENGTH_ENTRY(env, array);
2330   arrayOop a = arrayOop(JNIHandles::resolve_non_null(array));
2331   assert(a->is_array(), "must be array");
2332   jsize ret = a->length();
2333  HOTSPOT_JNI_GETARRAYLENGTH_RETURN(ret);
2334   return ret;
2335 JNI_END
2336 
2337 
2338 //
2339 // Object Array Operations
2340 //
2341 
2342 DT_RETURN_MARK_DECL(NewObjectArray, jobjectArray
2343                     , HOTSPOT_JNI_NEWOBJECTARRAY_RETURN(_ret_ref));
2344 
2345 JNI_ENTRY(jobjectArray, jni_NewObjectArray(JNIEnv *env, jsize length, jclass elementClass, jobject initialElement))
2346  HOTSPOT_JNI_NEWOBJECTARRAY_ENTRY(env, length, elementClass, initialElement);
2347   jobjectArray ret = nullptr;
2348   DT_RETURN_MARK(NewObjectArray, jobjectArray, (const jobjectArray&)ret);
2349   Klass* ek = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(elementClass));
2350 
2351   // Make sure bottom_klass is initialized.
2352   ek->initialize(CHECK_NULL);
2353   objArrayOop result = oopFactory::new_objArray(ek, length, CHECK_NULL);
2354 
2355   oop initial_value = JNIHandles::resolve(initialElement);
2356   if (initial_value != nullptr) {  // array already initialized with null
2357     for (int index = 0; index < length; index++) {
2358       result->obj_at_put(index, initial_value);
2359     }
2360   }
2361   ret = (jobjectArray) JNIHandles::make_local(THREAD, result);
2362   return ret;
2363 JNI_END
2364 
2365 DT_RETURN_MARK_DECL(GetObjectArrayElement, jobject
2366                     , HOTSPOT_JNI_GETOBJECTARRAYELEMENT_RETURN(_ret_ref));
2367 
2368 JNI_ENTRY(jobject, jni_GetObjectArrayElement(JNIEnv *env, jobjectArray array, jsize index))
2369  HOTSPOT_JNI_GETOBJECTARRAYELEMENT_ENTRY(env, array, index);
2370   jobject ret = nullptr;
2371   DT_RETURN_MARK(GetObjectArrayElement, jobject, (const jobject&)ret);
2372   objArrayOop a = oop_cast<objArrayOop>(JNIHandles::resolve_non_null(array));
2373   if (a->is_within_bounds(index)) {
2374     oop res = a->obj_at(index, CHECK_NULL);
2375     assert(res != nullptr || !a->is_null_free_array(), "Invalid value");
2376     ret = JNIHandles::make_local(THREAD, res);
2377     return ret;
2378   } else {
2379     ResourceMark rm(THREAD);
2380     stringStream ss;
2381     ss.print("Index %d out of bounds for length %d", index, a->length());
2382     THROW_MSG_NULL(vmSymbols::java_lang_ArrayIndexOutOfBoundsException(), ss.as_string());
2383   }
2384 JNI_END
2385 
2386 DT_VOID_RETURN_MARK_DECL(SetObjectArrayElement
2387                          , HOTSPOT_JNI_SETOBJECTARRAYELEMENT_RETURN());
2388 
2389 JNI_ENTRY(void, jni_SetObjectArrayElement(JNIEnv *env, jobjectArray array, jsize index, jobject value))
2390  HOTSPOT_JNI_SETOBJECTARRAYELEMENT_ENTRY(env, array, index, value);
2391   DT_VOID_RETURN_MARK(SetObjectArrayElement);
2392 
2393   objArrayOop a = oop_cast<objArrayOop>(JNIHandles::resolve_non_null(array));
2394   oop v = JNIHandles::resolve(value);
2395   if (a->is_within_bounds(index)) {
2396     assert(a->klass()->is_refined_objArray_klass(), "must be");
2397     if (v == nullptr || v->is_a(ObjArrayKlass::cast(a->klass())->element_klass())) {
2398       a->obj_at_put(index, v, THREAD);
2399       return;
2400     } else {
2401       ResourceMark rm(THREAD);
2402       stringStream ss;
2403       Klass *bottom_kl = ObjArrayKlass::cast(a->klass())->bottom_klass();
2404       ss.print("type mismatch: can not store %s to %s[%d]",
2405                v->klass()->external_name(),
2406                bottom_kl->is_typeArray_klass() ? type2name_tab[ArrayKlass::cast(bottom_kl)->element_type()] : bottom_kl->external_name(),
2407                index);
2408       for (int dims = ArrayKlass::cast(a->klass())->dimension(); dims > 1; --dims) {
2409         ss.print("[]");
2410       }
2411       THROW_MSG(vmSymbols::java_lang_ArrayStoreException(), ss.as_string());
2412     }
2413   } else {
2414     ResourceMark rm(THREAD);
2415     stringStream ss;
2416     ss.print("Index %d out of bounds for length %d", index, a->length());
2417     THROW_MSG(vmSymbols::java_lang_ArrayIndexOutOfBoundsException(), ss.as_string());
2418   }
2419 JNI_END
2420 
2421 
2422 
2423 #define DEFINE_NEWSCALARARRAY(Return,Allocator,Result \
2424                               ,EntryProbe,ReturnProbe)  \
2425 \
2426   DT_RETURN_MARK_DECL(New##Result##Array, Return \
2427                       , ReturnProbe); \
2428 \
2429 JNI_ENTRY(Return, \
2430           jni_New##Result##Array(JNIEnv *env, jsize len)) \
2431   EntryProbe; \
2432   Return ret = nullptr;\
2433   DT_RETURN_MARK(New##Result##Array, Return, (const Return&)ret);\
2434 \
2435   oop obj= oopFactory::Allocator(len, CHECK_NULL); \
2436   ret = (Return) JNIHandles::make_local(THREAD, obj); \
2437   return ret;\
2438 JNI_END
2439 
2440 DEFINE_NEWSCALARARRAY(jbooleanArray, new_boolArray,   Boolean,
2441                       HOTSPOT_JNI_NEWBOOLEANARRAY_ENTRY(env, len),
2442                       HOTSPOT_JNI_NEWBOOLEANARRAY_RETURN(_ret_ref))
2443 DEFINE_NEWSCALARARRAY(jbyteArray,    new_byteArray,   Byte,
2444                       HOTSPOT_JNI_NEWBYTEARRAY_ENTRY(env, len),
2445                       HOTSPOT_JNI_NEWBYTEARRAY_RETURN(_ret_ref))
2446 DEFINE_NEWSCALARARRAY(jshortArray,   new_shortArray,  Short,
2447                       HOTSPOT_JNI_NEWSHORTARRAY_ENTRY(env, len),
2448                       HOTSPOT_JNI_NEWSHORTARRAY_RETURN(_ret_ref))
2449 DEFINE_NEWSCALARARRAY(jcharArray,    new_charArray,   Char,
2450                       HOTSPOT_JNI_NEWCHARARRAY_ENTRY(env, len),
2451                       HOTSPOT_JNI_NEWCHARARRAY_RETURN(_ret_ref))
2452 DEFINE_NEWSCALARARRAY(jintArray,     new_intArray,    Int,
2453                       HOTSPOT_JNI_NEWINTARRAY_ENTRY(env, len),
2454                       HOTSPOT_JNI_NEWINTARRAY_RETURN(_ret_ref))
2455 DEFINE_NEWSCALARARRAY(jlongArray,    new_longArray,   Long,
2456                       HOTSPOT_JNI_NEWLONGARRAY_ENTRY(env, len),
2457                       HOTSPOT_JNI_NEWLONGARRAY_RETURN(_ret_ref))
2458 DEFINE_NEWSCALARARRAY(jfloatArray,   new_floatArray,  Float,
2459                       HOTSPOT_JNI_NEWFLOATARRAY_ENTRY(env, len),
2460                       HOTSPOT_JNI_NEWFLOATARRAY_RETURN(_ret_ref))
2461 DEFINE_NEWSCALARARRAY(jdoubleArray,  new_doubleArray, Double,
2462                       HOTSPOT_JNI_NEWDOUBLEARRAY_ENTRY(env, len),
2463                       HOTSPOT_JNI_NEWDOUBLEARRAY_RETURN(_ret_ref))
2464 
2465 // Return an address which will fault if the caller writes to it.
2466 
2467 static char* get_bad_address() {
2468   static char* bad_address = nullptr;
2469   if (bad_address == nullptr) {
2470     size_t size = os::vm_allocation_granularity();
2471     bad_address = os::reserve_memory(size, mtInternal);
2472     if (bad_address != nullptr) {
2473       os::protect_memory(bad_address, size, os::MEM_PROT_READ,
2474                          /*is_committed*/false);
2475     }
2476   }
2477   return bad_address;
2478 }
2479 
2480 
2481 
2482 #define DEFINE_GETSCALARARRAYELEMENTS(ElementType,Result \
2483                                       , EntryProbe, ReturnProbe) \
2484 \
2485 JNI_ENTRY_NO_PRESERVE(ElementType*, \
2486           jni_Get##Result##ArrayElements(JNIEnv *env, ElementType##Array array, jboolean *isCopy)) \
2487   EntryProbe; \
2488   /* allocate an chunk of memory in c land */ \
2489   typeArrayOop a = typeArrayOop(JNIHandles::resolve_non_null(array)); \
2490   ElementType* result; \
2491   int len = a->length(); \
2492   if (len == 0) { \
2493     if (isCopy != nullptr) { \
2494       *isCopy = JNI_FALSE; \
2495     } \
2496     /* Empty array: legal but useless, can't return null. \
2497      * Return a pointer to something useless. \
2498      * Avoid asserts in typeArrayOop. */ \
2499     result = (ElementType*)get_bad_address(); \
2500   } else { \
2501     /* JNI Specification states return null on OOM */                    \
2502     result = NEW_C_HEAP_ARRAY_RETURN_NULL(ElementType, len, mtInternal); \
2503     if (result != nullptr) {                                             \
2504       /* copy the array to the c chunk */                                \
2505       ArrayAccess<>::arraycopy_to_native(a, typeArrayOopDesc::element_offset<ElementType>(0), \
2506                                          result, len);                   \
2507       if (isCopy) {                                                      \
2508         *isCopy = JNI_TRUE;                                              \
2509       }                                                                  \
2510     }                                                                    \
2511   } \
2512   ReturnProbe; \
2513   return result; \
2514 JNI_END
2515 
2516 DEFINE_GETSCALARARRAYELEMENTS(jboolean, Boolean
2517                               , HOTSPOT_JNI_GETBOOLEANARRAYELEMENTS_ENTRY(env, array, (uintptr_t *) isCopy),
2518                               HOTSPOT_JNI_GETBOOLEANARRAYELEMENTS_RETURN((uintptr_t*)result))
2519 DEFINE_GETSCALARARRAYELEMENTS(jbyte,    Byte
2520                               , HOTSPOT_JNI_GETBYTEARRAYELEMENTS_ENTRY(env, array, (uintptr_t *) isCopy),
2521                               HOTSPOT_JNI_GETBYTEARRAYELEMENTS_RETURN((char*)result))
2522 DEFINE_GETSCALARARRAYELEMENTS(jshort,   Short
2523                               , HOTSPOT_JNI_GETSHORTARRAYELEMENTS_ENTRY(env, (uint16_t*) array, (uintptr_t *) isCopy),
2524                               HOTSPOT_JNI_GETSHORTARRAYELEMENTS_RETURN((uint16_t*)result))
2525 DEFINE_GETSCALARARRAYELEMENTS(jchar,    Char
2526                               , HOTSPOT_JNI_GETCHARARRAYELEMENTS_ENTRY(env, (uint16_t*) array, (uintptr_t *) isCopy),
2527                               HOTSPOT_JNI_GETCHARARRAYELEMENTS_RETURN(result))
2528 DEFINE_GETSCALARARRAYELEMENTS(jint,     Int
2529                               , HOTSPOT_JNI_GETINTARRAYELEMENTS_ENTRY(env, array, (uintptr_t *) isCopy),
2530                               HOTSPOT_JNI_GETINTARRAYELEMENTS_RETURN((uint32_t*)result))
2531 DEFINE_GETSCALARARRAYELEMENTS(jlong,    Long
2532                               , HOTSPOT_JNI_GETLONGARRAYELEMENTS_ENTRY(env, array, (uintptr_t *) isCopy),
2533                               HOTSPOT_JNI_GETLONGARRAYELEMENTS_RETURN(((uintptr_t*)result)))
2534 // Float and double probes don't return value because dtrace doesn't currently support it
2535 DEFINE_GETSCALARARRAYELEMENTS(jfloat,   Float
2536                               , HOTSPOT_JNI_GETFLOATARRAYELEMENTS_ENTRY(env, array, (uintptr_t *) isCopy),
2537                               HOTSPOT_JNI_GETFLOATARRAYELEMENTS_RETURN(result))
2538 DEFINE_GETSCALARARRAYELEMENTS(jdouble,  Double
2539                               , HOTSPOT_JNI_GETDOUBLEARRAYELEMENTS_ENTRY(env, array, (uintptr_t *) isCopy),
2540                               HOTSPOT_JNI_GETDOUBLEARRAYELEMENTS_RETURN(result))
2541 
2542 
2543 #define DEFINE_RELEASESCALARARRAYELEMENTS(ElementType,Result \
2544                                           , EntryProbe, ReturnProbe) \
2545 \
2546 JNI_ENTRY_NO_PRESERVE(void, \
2547           jni_Release##Result##ArrayElements(JNIEnv *env, ElementType##Array array, \
2548                                              ElementType *buf, jint mode)) \
2549   EntryProbe; \
2550   typeArrayOop a = typeArrayOop(JNIHandles::resolve_non_null(array)); \
2551   int len = a->length(); \
2552   if (len != 0) {   /* Empty array:  nothing to free or copy. */  \
2553     if ((mode == 0) || (mode == JNI_COMMIT)) { \
2554       ArrayAccess<>::arraycopy_from_native(buf, a, typeArrayOopDesc::element_offset<ElementType>(0), len); \
2555     } \
2556     if ((mode == 0) || (mode == JNI_ABORT)) { \
2557       FreeHeap(buf); \
2558     } \
2559   } \
2560   ReturnProbe; \
2561 JNI_END
2562 
2563 DEFINE_RELEASESCALARARRAYELEMENTS(jboolean, Boolean
2564                                   , HOTSPOT_JNI_RELEASEBOOLEANARRAYELEMENTS_ENTRY(env, array, (uintptr_t *) buf, mode),
2565                                   HOTSPOT_JNI_RELEASEBOOLEANARRAYELEMENTS_RETURN())
2566 DEFINE_RELEASESCALARARRAYELEMENTS(jbyte,    Byte
2567                                   , HOTSPOT_JNI_RELEASEBYTEARRAYELEMENTS_ENTRY(env, array, (char *) buf, mode),
2568                                   HOTSPOT_JNI_RELEASEBYTEARRAYELEMENTS_RETURN())
2569 DEFINE_RELEASESCALARARRAYELEMENTS(jshort,   Short
2570                                   ,  HOTSPOT_JNI_RELEASESHORTARRAYELEMENTS_ENTRY(env, array, (uint16_t *) buf, mode),
2571                                   HOTSPOT_JNI_RELEASESHORTARRAYELEMENTS_RETURN())
2572 DEFINE_RELEASESCALARARRAYELEMENTS(jchar,    Char
2573                                   ,  HOTSPOT_JNI_RELEASECHARARRAYELEMENTS_ENTRY(env, array, (uint16_t *) buf, mode),
2574                                   HOTSPOT_JNI_RELEASECHARARRAYELEMENTS_RETURN())
2575 DEFINE_RELEASESCALARARRAYELEMENTS(jint,     Int
2576                                   , HOTSPOT_JNI_RELEASEINTARRAYELEMENTS_ENTRY(env, array, (uint32_t *) buf, mode),
2577                                   HOTSPOT_JNI_RELEASEINTARRAYELEMENTS_RETURN())
2578 DEFINE_RELEASESCALARARRAYELEMENTS(jlong,    Long
2579                                   , HOTSPOT_JNI_RELEASELONGARRAYELEMENTS_ENTRY(env, array, (uintptr_t *) buf, mode),
2580                                   HOTSPOT_JNI_RELEASELONGARRAYELEMENTS_RETURN())
2581 DEFINE_RELEASESCALARARRAYELEMENTS(jfloat,   Float
2582                                   , HOTSPOT_JNI_RELEASEFLOATARRAYELEMENTS_ENTRY(env, array, (float *) buf, mode),
2583                                   HOTSPOT_JNI_RELEASEFLOATARRAYELEMENTS_RETURN())
2584 DEFINE_RELEASESCALARARRAYELEMENTS(jdouble,  Double
2585                                   , HOTSPOT_JNI_RELEASEDOUBLEARRAYELEMENTS_ENTRY(env, array, (double *) buf, mode),
2586                                   HOTSPOT_JNI_RELEASEDOUBLEARRAYELEMENTS_RETURN())
2587 
2588 static void check_bounds(jsize start, jsize copy_len, jsize array_len, TRAPS) {
2589   ResourceMark rm(THREAD);
2590   if (copy_len < 0) {
2591     stringStream ss;
2592     ss.print("Length %d is negative", copy_len);
2593     THROW_MSG(vmSymbols::java_lang_ArrayIndexOutOfBoundsException(), ss.as_string());
2594   } else if (start < 0 || (start > array_len - copy_len)) {
2595     stringStream ss;
2596     ss.print("Array region %d.." INT64_FORMAT " out of bounds for length %d",
2597              start, (int64_t)start+(int64_t)copy_len, array_len);
2598     THROW_MSG(vmSymbols::java_lang_ArrayIndexOutOfBoundsException(), ss.as_string());
2599   }
2600 }
2601 
2602 #define DEFINE_GETSCALARARRAYREGION(ElementType,Result \
2603                                     , EntryProbe, ReturnProbe) \
2604   DT_VOID_RETURN_MARK_DECL(Get##Result##ArrayRegion \
2605                            , ReturnProbe); \
2606 \
2607 JNI_ENTRY(void, \
2608 jni_Get##Result##ArrayRegion(JNIEnv *env, ElementType##Array array, jsize start, \
2609              jsize len, ElementType *buf)) \
2610   EntryProbe; \
2611   DT_VOID_RETURN_MARK(Get##Result##ArrayRegion); \
2612   typeArrayOop src = typeArrayOop(JNIHandles::resolve_non_null(array)); \
2613   check_bounds(start, len, src->length(), CHECK); \
2614   if (len > 0) {    \
2615     ArrayAccess<>::arraycopy_to_native(src, typeArrayOopDesc::element_offset<ElementType>(start), buf, len); \
2616   } \
2617 JNI_END
2618 
2619 DEFINE_GETSCALARARRAYREGION(jboolean,Boolean
2620                             , HOTSPOT_JNI_GETBOOLEANARRAYREGION_ENTRY(env, array, start, len, (uintptr_t *) buf),
2621                             HOTSPOT_JNI_GETBOOLEANARRAYREGION_RETURN());
2622 DEFINE_GETSCALARARRAYREGION(jbyte,   Byte
2623                             ,  HOTSPOT_JNI_GETBYTEARRAYREGION_ENTRY(env, array, start, len, (char *) buf),
2624                             HOTSPOT_JNI_GETBYTEARRAYREGION_RETURN());
2625 DEFINE_GETSCALARARRAYREGION(jshort,  Short
2626                             , HOTSPOT_JNI_GETSHORTARRAYREGION_ENTRY(env, array, start, len, (uint16_t *) buf),
2627                             HOTSPOT_JNI_GETSHORTARRAYREGION_RETURN());
2628 DEFINE_GETSCALARARRAYREGION(jchar,   Char
2629                             ,  HOTSPOT_JNI_GETCHARARRAYREGION_ENTRY(env, array, start, len, (uint16_t*) buf),
2630                             HOTSPOT_JNI_GETCHARARRAYREGION_RETURN());
2631 DEFINE_GETSCALARARRAYREGION(jint,    Int
2632                             , HOTSPOT_JNI_GETINTARRAYREGION_ENTRY(env, array, start, len, (uint32_t*) buf),
2633                             HOTSPOT_JNI_GETINTARRAYREGION_RETURN());
2634 DEFINE_GETSCALARARRAYREGION(jlong,   Long
2635                             ,  HOTSPOT_JNI_GETLONGARRAYREGION_ENTRY(env, array, start, len, (uintptr_t *) buf),
2636                             HOTSPOT_JNI_GETLONGARRAYREGION_RETURN());
2637 DEFINE_GETSCALARARRAYREGION(jfloat,  Float
2638                             , HOTSPOT_JNI_GETFLOATARRAYREGION_ENTRY(env, array, start, len, (float *) buf),
2639                             HOTSPOT_JNI_GETFLOATARRAYREGION_RETURN());
2640 DEFINE_GETSCALARARRAYREGION(jdouble, Double
2641                             , HOTSPOT_JNI_GETDOUBLEARRAYREGION_ENTRY(env, array, start, len, (double *) buf),
2642                             HOTSPOT_JNI_GETDOUBLEARRAYREGION_RETURN());
2643 
2644 
2645 #define DEFINE_SETSCALARARRAYREGION(ElementType,Result \
2646                                     , EntryProbe, ReturnProbe) \
2647   DT_VOID_RETURN_MARK_DECL(Set##Result##ArrayRegion \
2648                            ,ReturnProbe);           \
2649 \
2650 JNI_ENTRY(void, \
2651 jni_Set##Result##ArrayRegion(JNIEnv *env, ElementType##Array array, jsize start, \
2652              jsize len, const ElementType *buf)) \
2653   EntryProbe; \
2654   DT_VOID_RETURN_MARK(Set##Result##ArrayRegion); \
2655   typeArrayOop dst = typeArrayOop(JNIHandles::resolve_non_null(array)); \
2656   check_bounds(start, len, dst->length(), CHECK); \
2657   if (len > 0) { \
2658     ArrayAccess<>::arraycopy_from_native(buf, dst, typeArrayOopDesc::element_offset<ElementType>(start), len); \
2659   } \
2660 JNI_END
2661 
2662 DEFINE_SETSCALARARRAYREGION(jboolean, Boolean
2663                             , HOTSPOT_JNI_SETBOOLEANARRAYREGION_ENTRY(env, array, start, len, (uintptr_t *)buf),
2664                             HOTSPOT_JNI_SETBOOLEANARRAYREGION_RETURN())
2665 DEFINE_SETSCALARARRAYREGION(jbyte,    Byte
2666                             , HOTSPOT_JNI_SETBYTEARRAYREGION_ENTRY(env, array, start, len, (char *) buf),
2667                             HOTSPOT_JNI_SETBYTEARRAYREGION_RETURN())
2668 DEFINE_SETSCALARARRAYREGION(jshort,   Short
2669                             , HOTSPOT_JNI_SETSHORTARRAYREGION_ENTRY(env, array, start, len, (uint16_t *) buf),
2670                             HOTSPOT_JNI_SETSHORTARRAYREGION_RETURN())
2671 DEFINE_SETSCALARARRAYREGION(jchar,    Char
2672                             , HOTSPOT_JNI_SETCHARARRAYREGION_ENTRY(env, array, start, len, (uint16_t *) buf),
2673                             HOTSPOT_JNI_SETCHARARRAYREGION_RETURN())
2674 DEFINE_SETSCALARARRAYREGION(jint,     Int
2675                             , HOTSPOT_JNI_SETINTARRAYREGION_ENTRY(env, array, start, len, (uint32_t *) buf),
2676                             HOTSPOT_JNI_SETINTARRAYREGION_RETURN())
2677 DEFINE_SETSCALARARRAYREGION(jlong,    Long
2678                             , HOTSPOT_JNI_SETLONGARRAYREGION_ENTRY(env, array, start, len, (uintptr_t *) buf),
2679                             HOTSPOT_JNI_SETLONGARRAYREGION_RETURN())
2680 DEFINE_SETSCALARARRAYREGION(jfloat,   Float
2681                             , HOTSPOT_JNI_SETFLOATARRAYREGION_ENTRY(env, array, start, len, (float *) buf),
2682                             HOTSPOT_JNI_SETFLOATARRAYREGION_RETURN())
2683 DEFINE_SETSCALARARRAYREGION(jdouble,  Double
2684                             , HOTSPOT_JNI_SETDOUBLEARRAYREGION_ENTRY(env, array, start, len, (double *) buf),
2685                             HOTSPOT_JNI_SETDOUBLEARRAYREGION_RETURN())
2686 
2687 
2688 DT_RETURN_MARK_DECL(RegisterNatives, jint
2689                     , HOTSPOT_JNI_REGISTERNATIVES_RETURN(_ret_ref));
2690 
2691 JNI_ENTRY(jint, jni_RegisterNatives(JNIEnv *env, jclass clazz,
2692                                     const JNINativeMethod *methods,
2693                                     jint nMethods))
2694   HOTSPOT_JNI_REGISTERNATIVES_ENTRY(env, clazz, (void *) methods, nMethods);
2695   jint ret = 0;
2696   DT_RETURN_MARK(RegisterNatives, jint, (const jint&)ret);
2697 
2698   Klass* k = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz));
2699 
2700   // There are no restrictions on native code registering native methods,
2701   // which allows agents to redefine the bindings to native methods, however
2702   // we issue a warning if any code running outside of the boot/platform
2703   // loader is rebinding any native methods in classes loaded by the
2704   // boot/platform loader that are in named modules. That will catch changes
2705   // to platform classes while excluding classes added to the bootclasspath.
2706   bool do_warning = false;
2707 
2708   // Only instanceKlasses can have native methods
2709   if (k->is_instance_klass()) {
2710     oop cl = k->class_loader();
2711     InstanceKlass* ik = InstanceKlass::cast(k);
2712     // Check for a platform class
2713     if ((cl ==  nullptr || SystemDictionary::is_platform_class_loader(cl)) &&
2714         ik->module()->is_named()) {
2715       Klass* caller = thread->security_get_caller_class(1);
2716       // If no caller class, or caller class has a different loader, then
2717       // issue a warning below.
2718       do_warning = (caller == nullptr) || caller->class_loader() != cl;
2719     }
2720   }
2721 
2722 
2723   for (int index = 0; index < nMethods; index++) {
2724     const char* meth_name = methods[index].name;
2725     const char* meth_sig = methods[index].signature;
2726     int meth_name_len = (int)strlen(meth_name);
2727 
2728     // The class should have been loaded (we have an instance of the class
2729     // passed in) so the method and signature should already be in the symbol
2730     // table.  If they're not there, the method doesn't exist.
2731     TempNewSymbol  name = SymbolTable::probe(meth_name, meth_name_len);
2732     TempNewSymbol  signature = SymbolTable::probe(meth_sig, (int)strlen(meth_sig));
2733 
2734     if (name == nullptr || signature == nullptr) {
2735       ResourceMark rm(THREAD);
2736       stringStream st;
2737       st.print("Method %s.%s%s not found", k->external_name(), meth_name, meth_sig);
2738       // Must return negative value on failure
2739       THROW_MSG_(vmSymbols::java_lang_NoSuchMethodError(), st.as_string(), -1);
2740     }
2741 
2742     if (do_warning) {
2743       ResourceMark rm(THREAD);
2744       log_warning(jni, resolve)("Re-registering of platform native method: %s.%s%s "
2745               "from code in a different classloader", k->external_name(), meth_name, meth_sig);
2746     }
2747 
2748     bool res = Method::register_native(k, name, signature,
2749                                        (address) methods[index].fnPtr, THREAD);
2750     if (!res) {
2751       ret = -1;
2752       break;
2753     }
2754   }
2755   return ret;
2756 JNI_END
2757 
2758 
2759 JNI_ENTRY(jint, jni_UnregisterNatives(JNIEnv *env, jclass clazz))
2760  HOTSPOT_JNI_UNREGISTERNATIVES_ENTRY(env, clazz);
2761   Klass* k   = java_lang_Class::as_Klass(JNIHandles::resolve_non_null(clazz));
2762   //%note jni_2
2763   if (k->is_instance_klass()) {
2764     for (int index = 0; index < InstanceKlass::cast(k)->methods()->length(); index++) {
2765       Method* m = InstanceKlass::cast(k)->methods()->at(index);
2766       if (m->is_native()) {
2767         m->clear_native_function();
2768         m->set_signature_handler(nullptr);
2769       }
2770     }
2771   }
2772  HOTSPOT_JNI_UNREGISTERNATIVES_RETURN(0);
2773   return 0;
2774 JNI_END
2775 
2776 //
2777 // Monitor functions
2778 //
2779 
2780 DT_RETURN_MARK_DECL(MonitorEnter, jint
2781                     , HOTSPOT_JNI_MONITORENTER_RETURN(_ret_ref));
2782 
2783 JNI_ENTRY(jint, jni_MonitorEnter(JNIEnv *env, jobject jobj))
2784  HOTSPOT_JNI_MONITORENTER_ENTRY(env, jobj);
2785   jint ret = JNI_ERR;
2786   DT_RETURN_MARK(MonitorEnter, jint, (const jint&)ret);
2787 
2788   // If the object is null, we can't do anything with it
2789   if (jobj == nullptr) {
2790     THROW_(vmSymbols::java_lang_NullPointerException(), JNI_ERR);
2791   }
2792 
2793   Handle obj(thread, JNIHandles::resolve_non_null(jobj));
2794   ObjectSynchronizer::jni_enter(obj, CHECK_(JNI_ERR));
2795   return JNI_OK;
2796 JNI_END
2797 
2798 DT_RETURN_MARK_DECL(MonitorExit, jint
2799                     , HOTSPOT_JNI_MONITOREXIT_RETURN(_ret_ref));
2800 
2801 JNI_ENTRY(jint, jni_MonitorExit(JNIEnv *env, jobject jobj))
2802  HOTSPOT_JNI_MONITOREXIT_ENTRY(env, jobj);
2803   jint ret = JNI_ERR;
2804   DT_RETURN_MARK(MonitorExit, jint, (const jint&)ret);
2805 
2806   // Don't do anything with a null object
2807   if (jobj == nullptr) {
2808     THROW_(vmSymbols::java_lang_NullPointerException(), JNI_ERR);
2809   }
2810 
2811   Handle obj(THREAD, JNIHandles::resolve_non_null(jobj));
2812   ObjectSynchronizer::jni_exit(obj(), CHECK_(JNI_ERR));
2813   return JNI_OK;
2814 JNI_END
2815 
2816 //
2817 // Extensions
2818 //
2819 
2820 DT_VOID_RETURN_MARK_DECL(GetStringRegion
2821                          , HOTSPOT_JNI_GETSTRINGREGION_RETURN());
2822 
2823 JNI_ENTRY(void, jni_GetStringRegion(JNIEnv *env, jstring string, jsize start, jsize len, jchar *buf))
2824  HOTSPOT_JNI_GETSTRINGREGION_ENTRY(env, string, start, len, buf);
2825   DT_VOID_RETURN_MARK(GetStringRegion);
2826   oop s = JNIHandles::resolve_non_null(string);
2827   typeArrayOop s_value = java_lang_String::value(s);
2828   int s_len = java_lang_String::length(s, s_value);
2829   if (start < 0 || len < 0 || start > s_len - len) {
2830     THROW(vmSymbols::java_lang_StringIndexOutOfBoundsException());
2831   } else {
2832     if (len > 0) {
2833       bool is_latin1 = java_lang_String::is_latin1(s);
2834       if (!is_latin1) {
2835         ArrayAccess<>::arraycopy_to_native(s_value, typeArrayOopDesc::element_offset<jchar>(start),
2836                                            buf, len);
2837       } else {
2838         for (int i = 0; i < len; i++) {
2839           buf[i] = ((jchar) s_value->byte_at(i + start)) & 0xff;
2840         }
2841       }
2842     }
2843   }
2844 JNI_END
2845 
2846 DT_VOID_RETURN_MARK_DECL(GetStringUTFRegion
2847                          , HOTSPOT_JNI_GETSTRINGUTFREGION_RETURN());
2848 
2849 JNI_ENTRY(void, jni_GetStringUTFRegion(JNIEnv *env, jstring string, jsize start, jsize len, char *buf))
2850  HOTSPOT_JNI_GETSTRINGUTFREGION_ENTRY(env, string, start, len, buf);
2851   DT_VOID_RETURN_MARK(GetStringUTFRegion);
2852   oop s = JNIHandles::resolve_non_null(string);
2853   typeArrayOop s_value = java_lang_String::value(s);
2854   int s_len = java_lang_String::length(s, s_value);
2855   if (start < 0 || len < 0 || start > s_len - len) {
2856     THROW(vmSymbols::java_lang_StringIndexOutOfBoundsException());
2857   } else {
2858     //%note jni_7
2859     if (len > 0) {
2860       // Assume the buffer is large enough as the JNI spec. does not require user error checking
2861       java_lang_String::as_utf8_string(s, s_value, start, len, buf, INT_MAX);
2862       // as_utf8_string null-terminates the result string
2863     } else {
2864       // JDK null-terminates the buffer even in len is zero
2865       if (buf != nullptr) {
2866         buf[0] = 0;
2867       }
2868     }
2869   }
2870 JNI_END
2871 
2872 JNI_ENTRY(void*, jni_GetPrimitiveArrayCritical(JNIEnv *env, jarray array, jboolean *isCopy))
2873  HOTSPOT_JNI_GETPRIMITIVEARRAYCRITICAL_ENTRY(env, array, (uintptr_t *) isCopy);
2874   Handle a(thread, JNIHandles::resolve_non_null(array));
2875   assert(a->is_typeArray(), "just checking");
2876 
2877   // Pin object
2878   Universe::heap()->pin_object(thread, a());
2879 
2880   BasicType type = TypeArrayKlass::cast(a->klass())->element_type();
2881   void* ret = arrayOop(a())->base(type);
2882   if (isCopy != nullptr) {
2883     *isCopy = JNI_FALSE;
2884   }
2885  HOTSPOT_JNI_GETPRIMITIVEARRAYCRITICAL_RETURN(ret);
2886   return ret;
2887 JNI_END
2888 
2889 
2890 JNI_ENTRY(void, jni_ReleasePrimitiveArrayCritical(JNIEnv *env, jarray array, void *carray, jint mode))
2891   HOTSPOT_JNI_RELEASEPRIMITIVEARRAYCRITICAL_ENTRY(env, array, carray, mode);
2892   // Unpin object
2893   Universe::heap()->unpin_object(thread, JNIHandles::resolve_non_null(array));
2894 HOTSPOT_JNI_RELEASEPRIMITIVEARRAYCRITICAL_RETURN();
2895 JNI_END
2896 
2897 
2898 JNI_ENTRY(const jchar*, jni_GetStringCritical(JNIEnv *env, jstring string, jboolean *isCopy))
2899   HOTSPOT_JNI_GETSTRINGCRITICAL_ENTRY(env, string, (uintptr_t *) isCopy);
2900   oop s = JNIHandles::resolve_non_null(string);
2901   jchar* ret;
2902   if (!java_lang_String::is_latin1(s)) {
2903     typeArrayHandle s_value(thread, java_lang_String::value(s));
2904 
2905     // Pin value array
2906     Universe::heap()->pin_object(thread, s_value());
2907 
2908     ret = (jchar*) s_value->base(T_CHAR);
2909     if (isCopy != nullptr) *isCopy = JNI_FALSE;
2910   } else {
2911     // Inflate latin1 encoded string to UTF16
2912     typeArrayOop s_value = java_lang_String::value(s);
2913     int s_len = java_lang_String::length(s, s_value);
2914     ret = NEW_C_HEAP_ARRAY_RETURN_NULL(jchar, s_len + 1, mtInternal);  // add one for zero termination
2915     /* JNI Specification states return null on OOM */
2916     if (ret != nullptr) {
2917       for (int i = 0; i < s_len; i++) {
2918         ret[i] = ((jchar) s_value->byte_at(i)) & 0xff;
2919       }
2920       ret[s_len] = 0;
2921     }
2922     if (isCopy != nullptr) *isCopy = JNI_TRUE;
2923   }
2924  HOTSPOT_JNI_GETSTRINGCRITICAL_RETURN((uint16_t *) ret);
2925   return ret;
2926 JNI_END
2927 
2928 
2929 JNI_ENTRY(void, jni_ReleaseStringCritical(JNIEnv *env, jstring str, const jchar *chars))
2930   HOTSPOT_JNI_RELEASESTRINGCRITICAL_ENTRY(env, str, (uint16_t *) chars);
2931   oop s = JNIHandles::resolve_non_null(str);
2932   bool is_latin1 = java_lang_String::is_latin1(s);
2933 
2934   if (is_latin1) {
2935     // For latin1 string, free jchar array allocated by earlier call to GetStringCritical.
2936     // This assumes that ReleaseStringCritical bookends GetStringCritical.
2937     FREE_C_HEAP_ARRAY(jchar, chars);
2938   } else {
2939     // StringDedup can have replaced the value array, so don't fetch the array from 's'.
2940     // Instead, we calculate the address based on the jchar array exposed with GetStringCritical.
2941     oop value = cast_to_oop((address)chars - arrayOopDesc::base_offset_in_bytes(T_CHAR));
2942 
2943     // Unpin value array
2944     Universe::heap()->unpin_object(thread, value);
2945   }
2946 HOTSPOT_JNI_RELEASESTRINGCRITICAL_RETURN();
2947 JNI_END
2948 
2949 
2950 JNI_ENTRY(jweak, jni_NewWeakGlobalRef(JNIEnv *env, jobject ref))
2951   HOTSPOT_JNI_NEWWEAKGLOBALREF_ENTRY(env, ref);
2952   Handle ref_handle(thread, JNIHandles::resolve(ref));
2953 
2954   if (!ref_handle.is_null() && ref_handle->klass()->is_inline_klass()) {
2955     ResourceMark rm(THREAD);
2956     stringStream ss;
2957     ss.print("%s is not an identity class", ref_handle->klass()->external_name());
2958     THROW_MSG_(vmSymbols::java_lang_IdentityException(), ss.as_string(), nullptr);
2959   }
2960 
2961   jweak ret = JNIHandles::make_weak_global(ref_handle, AllocFailStrategy::RETURN_NULL);
2962   if (ret == nullptr && ref_handle.not_null()) {
2963     THROW_OOP_(Universe::out_of_memory_error_c_heap(), nullptr);
2964   }
2965   HOTSPOT_JNI_NEWWEAKGLOBALREF_RETURN(ret);
2966   return ret;
2967 JNI_END
2968 
2969 // Must be JNI_ENTRY (with HandleMark)
2970 JNI_ENTRY(void, jni_DeleteWeakGlobalRef(JNIEnv *env, jweak ref))
2971   HOTSPOT_JNI_DELETEWEAKGLOBALREF_ENTRY(env, ref);
2972   JNIHandles::destroy_weak_global(ref);
2973   HOTSPOT_JNI_DELETEWEAKGLOBALREF_RETURN();
2974 JNI_END
2975 
2976 
2977 JNI_ENTRY_NO_PRESERVE(jboolean, jni_ExceptionCheck(JNIEnv *env))
2978  HOTSPOT_JNI_EXCEPTIONCHECK_ENTRY(env);
2979   jni_check_async_exceptions(thread);
2980   jboolean ret = (thread->has_pending_exception()) ? JNI_TRUE : JNI_FALSE;
2981  HOTSPOT_JNI_EXCEPTIONCHECK_RETURN(ret);
2982   return ret;
2983 JNI_END
2984 
2985 
2986 // Initialization state for three routines below relating to
2987 // java.nio.DirectBuffers
2988 static          int directBufferSupportInitializeStarted = 0;
2989 static volatile int directBufferSupportInitializeEnded   = 0;
2990 static volatile int directBufferSupportInitializeFailed  = 0;
2991 static jclass    bufferClass                 = nullptr;
2992 static jclass    directBufferClass           = nullptr;
2993 static jclass    directByteBufferClass       = nullptr;
2994 static jmethodID directByteBufferConstructor = nullptr;
2995 static jfieldID  directBufferAddressField    = nullptr;
2996 static jfieldID  bufferCapacityField         = nullptr;
2997 
2998 static jclass lookupOne(JNIEnv* env, const char* name, TRAPS) {
2999   Handle loader;            // null (bootstrap) loader
3000 
3001   TempNewSymbol sym = SymbolTable::new_symbol(name);
3002   jclass result =  find_class_from_class_loader(env, sym, true, loader, true, CHECK_NULL);
3003 
3004   if (log_is_enabled(Debug, class, resolve) && result != nullptr) {
3005     trace_class_resolution(java_lang_Class::as_Klass(JNIHandles::resolve_non_null(result)));
3006   }
3007   return result;
3008 }
3009 
3010 // These lookups are done with the null (bootstrap) ClassLoader to
3011 // circumvent any security checks that would be done by jni_FindClass.
3012 JNI_ENTRY(bool, lookupDirectBufferClasses(JNIEnv* env))
3013 {
3014   if ((bufferClass           = lookupOne(env, "java/nio/Buffer", thread))           == nullptr) { return false; }
3015   if ((directBufferClass     = lookupOne(env, "sun/nio/ch/DirectBuffer", thread))   == nullptr) { return false; }
3016   if ((directByteBufferClass = lookupOne(env, "java/nio/DirectByteBuffer", thread)) == nullptr) { return false; }
3017   return true;
3018 }
3019 JNI_END
3020 
3021 
3022 static bool initializeDirectBufferSupport(JNIEnv* env, JavaThread* thread) {
3023   if (directBufferSupportInitializeFailed) {
3024     return false;
3025   }
3026 
3027   if (AtomicAccess::cmpxchg(&directBufferSupportInitializeStarted, 0, 1) == 0) {
3028     if (!lookupDirectBufferClasses(env)) {
3029       directBufferSupportInitializeFailed = 1;
3030       return false;
3031     }
3032 
3033     // Make global references for these
3034     bufferClass           = (jclass) env->NewGlobalRef(bufferClass);
3035     directBufferClass     = (jclass) env->NewGlobalRef(directBufferClass);
3036     directByteBufferClass = (jclass) env->NewGlobalRef(directByteBufferClass);
3037 
3038     // Global refs will be null if out-of-memory (no exception is pending)
3039     if (bufferClass == nullptr || directBufferClass == nullptr || directByteBufferClass == nullptr) {
3040       directBufferSupportInitializeFailed = 1;
3041       return false;
3042     }
3043 
3044     // Get needed field and method IDs
3045     directByteBufferConstructor = env->GetMethodID(directByteBufferClass, "<init>", "(JJ)V");
3046     if (env->ExceptionCheck()) {
3047       env->ExceptionClear();
3048       directBufferSupportInitializeFailed = 1;
3049       return false;
3050     }
3051     directBufferAddressField    = env->GetFieldID(bufferClass, "address", "J");
3052     if (env->ExceptionCheck()) {
3053       env->ExceptionClear();
3054       directBufferSupportInitializeFailed = 1;
3055       return false;
3056     }
3057     bufferCapacityField         = env->GetFieldID(bufferClass, "capacity", "I");
3058     if (env->ExceptionCheck()) {
3059       env->ExceptionClear();
3060       directBufferSupportInitializeFailed = 1;
3061       return false;
3062     }
3063 
3064     if ((directByteBufferConstructor == nullptr) ||
3065         (directBufferAddressField    == nullptr) ||
3066         (bufferCapacityField         == nullptr)) {
3067       directBufferSupportInitializeFailed = 1;
3068       return false;
3069     }
3070 
3071     directBufferSupportInitializeEnded = 1;
3072   } else {
3073     while (!directBufferSupportInitializeEnded && !directBufferSupportInitializeFailed) {
3074       os::naked_yield();
3075     }
3076   }
3077 
3078   return !directBufferSupportInitializeFailed;
3079 }
3080 
3081 extern "C" jobject JNICALL jni_NewDirectByteBuffer(JNIEnv *env, void* address, jlong capacity)
3082 {
3083   // thread_from_jni_environment() will block if VM is gone.
3084   JavaThread* thread = JavaThread::thread_from_jni_environment(env);
3085 
3086  HOTSPOT_JNI_NEWDIRECTBYTEBUFFER_ENTRY(env, address, capacity);
3087 
3088   if (!directBufferSupportInitializeEnded) {
3089     if (!initializeDirectBufferSupport(env, thread)) {
3090       HOTSPOT_JNI_NEWDIRECTBYTEBUFFER_RETURN(nullptr);
3091       return nullptr;
3092     }
3093   }
3094 
3095   // Being paranoid about accidental sign extension on address
3096   jlong addr = (jlong) ((uintptr_t) address);
3097   jobject ret = env->NewObject(directByteBufferClass, directByteBufferConstructor, addr, capacity);
3098   HOTSPOT_JNI_NEWDIRECTBYTEBUFFER_RETURN(ret);
3099   return ret;
3100 }
3101 
3102 DT_RETURN_MARK_DECL(GetDirectBufferAddress, void*
3103                     , HOTSPOT_JNI_GETDIRECTBUFFERADDRESS_RETURN((void*) _ret_ref));
3104 
3105 extern "C" void* JNICALL jni_GetDirectBufferAddress(JNIEnv *env, jobject buf)
3106 {
3107   // thread_from_jni_environment() will block if VM is gone.
3108   JavaThread* thread = JavaThread::thread_from_jni_environment(env);
3109 
3110   HOTSPOT_JNI_GETDIRECTBUFFERADDRESS_ENTRY(env, buf);
3111   void* ret = nullptr;
3112   DT_RETURN_MARK(GetDirectBufferAddress, void*, (const void*&)ret);
3113 
3114   if (!directBufferSupportInitializeEnded) {
3115     if (!initializeDirectBufferSupport(env, thread)) {
3116       return nullptr;
3117     }
3118   }
3119 
3120   if ((buf != nullptr) && (!env->IsInstanceOf(buf, directBufferClass))) {
3121     return nullptr;
3122   }
3123 
3124   ret = (void*)(intptr_t)env->GetLongField(buf, directBufferAddressField);
3125   return ret;
3126 }
3127 
3128 DT_RETURN_MARK_DECL(GetDirectBufferCapacity, jlong
3129                     , HOTSPOT_JNI_GETDIRECTBUFFERCAPACITY_RETURN(_ret_ref));
3130 
3131 extern "C" jlong JNICALL jni_GetDirectBufferCapacity(JNIEnv *env, jobject buf)
3132 {
3133   // thread_from_jni_environment() will block if VM is gone.
3134   JavaThread* thread = JavaThread::thread_from_jni_environment(env);
3135 
3136   HOTSPOT_JNI_GETDIRECTBUFFERCAPACITY_ENTRY(env, buf);
3137   jlong ret = -1;
3138   DT_RETURN_MARK(GetDirectBufferCapacity, jlong, (const jlong&)ret);
3139 
3140   if (!directBufferSupportInitializeEnded) {
3141     if (!initializeDirectBufferSupport(env, thread)) {
3142       ret = 0;
3143       return ret;
3144     }
3145   }
3146 
3147   if (buf == nullptr) {
3148     return -1;
3149   }
3150 
3151   if (!env->IsInstanceOf(buf, directBufferClass)) {
3152     return -1;
3153   }
3154 
3155   // NOTE that capacity is currently an int in the implementation
3156   ret = env->GetIntField(buf, bufferCapacityField);
3157   return ret;
3158 }
3159 
3160 
3161 JNI_LEAF(jint, jni_GetVersion(JNIEnv *env))
3162   HOTSPOT_JNI_GETVERSION_ENTRY(env);
3163   HOTSPOT_JNI_GETVERSION_RETURN(CurrentVersion);
3164   return CurrentVersion;
3165 JNI_END
3166 
3167 extern struct JavaVM_ main_vm;
3168 
3169 JNI_LEAF(jint, jni_GetJavaVM(JNIEnv *env, JavaVM **vm))
3170   HOTSPOT_JNI_GETJAVAVM_ENTRY(env, (void **) vm);
3171   *vm  = (JavaVM *)(&main_vm);
3172   HOTSPOT_JNI_GETJAVAVM_RETURN(JNI_OK);
3173   return JNI_OK;
3174 JNI_END
3175 
3176 
3177 JNI_ENTRY(jobject, jni_GetModule(JNIEnv* env, jclass clazz))
3178   HOTSPOT_JNI_GETMODULE_ENTRY(env, clazz);
3179   jobject ret = Modules::get_module(clazz, THREAD);
3180   HOTSPOT_JNI_GETMODULE_RETURN(ret);
3181   return ret;
3182 JNI_END
3183 
3184 JNI_ENTRY(jboolean, jni_IsVirtualThread(JNIEnv* env, jobject obj))
3185   HOTSPOT_JNI_ISVIRTUALTHREAD_ENTRY(env, obj);
3186   jboolean ret = JNI_FALSE;
3187   oop thread_obj = JNIHandles::resolve_external_guard(obj);
3188   if (thread_obj != nullptr && thread_obj->is_a(vmClasses::BaseVirtualThread_klass())) {
3189     ret = JNI_TRUE;
3190   }
3191   HOTSPOT_JNI_ISVIRTUALTHREAD_RETURN(ret);
3192   return ret;
3193 JNI_END
3194 
3195 JNI_ENTRY(jboolean, jni_IsValueObject(JNIEnv* env, jobject obj))
3196   HOTSPOT_JNI_ISVALUEOBJECT_ENTRY(env, obj);
3197   oop o = JNIHandles::resolve(obj);
3198   if (o != nullptr && o->klass()->is_inline_klass()) {
3199     HOTSPOT_JNI_ISVALUEOBJECT_RETURN(JNI_TRUE);
3200     return JNI_TRUE;
3201   } else {
3202     HOTSPOT_JNI_ISVALUEOBJECT_RETURN(JNI_FALSE);
3203     return JNI_FALSE;
3204   }
3205 JNI_END
3206 
3207 // Structure containing all jni functions
3208 struct JNINativeInterface_ jni_NativeInterface = {
3209     nullptr,
3210     nullptr,
3211     nullptr,
3212 
3213     nullptr,
3214 
3215     jni_GetVersion,
3216 
3217     jni_DefineClass,
3218     jni_FindClass,
3219 
3220     jni_FromReflectedMethod,
3221     jni_FromReflectedField,
3222 
3223     jni_ToReflectedMethod,
3224 
3225     jni_GetSuperclass,
3226     jni_IsAssignableFrom,
3227 
3228     jni_ToReflectedField,
3229 
3230     jni_Throw,
3231     jni_ThrowNew,
3232     jni_ExceptionOccurred,
3233     jni_ExceptionDescribe,
3234     jni_ExceptionClear,
3235     jni_FatalError,
3236 
3237     jni_PushLocalFrame,
3238     jni_PopLocalFrame,
3239 
3240     jni_NewGlobalRef,
3241     jni_DeleteGlobalRef,
3242     jni_DeleteLocalRef,
3243     jni_IsSameObject,
3244 
3245     jni_NewLocalRef,
3246     jni_EnsureLocalCapacity,
3247 
3248     jni_AllocObject,
3249     jni_NewObject,
3250     jni_NewObjectV,
3251     jni_NewObjectA,
3252 
3253     jni_GetObjectClass,
3254     jni_IsInstanceOf,
3255 
3256     jni_GetMethodID,
3257 
3258     jni_CallObjectMethod,
3259     jni_CallObjectMethodV,
3260     jni_CallObjectMethodA,
3261     jni_CallBooleanMethod,
3262     jni_CallBooleanMethodV,
3263     jni_CallBooleanMethodA,
3264     jni_CallByteMethod,
3265     jni_CallByteMethodV,
3266     jni_CallByteMethodA,
3267     jni_CallCharMethod,
3268     jni_CallCharMethodV,
3269     jni_CallCharMethodA,
3270     jni_CallShortMethod,
3271     jni_CallShortMethodV,
3272     jni_CallShortMethodA,
3273     jni_CallIntMethod,
3274     jni_CallIntMethodV,
3275     jni_CallIntMethodA,
3276     jni_CallLongMethod,
3277     jni_CallLongMethodV,
3278     jni_CallLongMethodA,
3279     jni_CallFloatMethod,
3280     jni_CallFloatMethodV,
3281     jni_CallFloatMethodA,
3282     jni_CallDoubleMethod,
3283     jni_CallDoubleMethodV,
3284     jni_CallDoubleMethodA,
3285     jni_CallVoidMethod,
3286     jni_CallVoidMethodV,
3287     jni_CallVoidMethodA,
3288 
3289     jni_CallNonvirtualObjectMethod,
3290     jni_CallNonvirtualObjectMethodV,
3291     jni_CallNonvirtualObjectMethodA,
3292     jni_CallNonvirtualBooleanMethod,
3293     jni_CallNonvirtualBooleanMethodV,
3294     jni_CallNonvirtualBooleanMethodA,
3295     jni_CallNonvirtualByteMethod,
3296     jni_CallNonvirtualByteMethodV,
3297     jni_CallNonvirtualByteMethodA,
3298     jni_CallNonvirtualCharMethod,
3299     jni_CallNonvirtualCharMethodV,
3300     jni_CallNonvirtualCharMethodA,
3301     jni_CallNonvirtualShortMethod,
3302     jni_CallNonvirtualShortMethodV,
3303     jni_CallNonvirtualShortMethodA,
3304     jni_CallNonvirtualIntMethod,
3305     jni_CallNonvirtualIntMethodV,
3306     jni_CallNonvirtualIntMethodA,
3307     jni_CallNonvirtualLongMethod,
3308     jni_CallNonvirtualLongMethodV,
3309     jni_CallNonvirtualLongMethodA,
3310     jni_CallNonvirtualFloatMethod,
3311     jni_CallNonvirtualFloatMethodV,
3312     jni_CallNonvirtualFloatMethodA,
3313     jni_CallNonvirtualDoubleMethod,
3314     jni_CallNonvirtualDoubleMethodV,
3315     jni_CallNonvirtualDoubleMethodA,
3316     jni_CallNonvirtualVoidMethod,
3317     jni_CallNonvirtualVoidMethodV,
3318     jni_CallNonvirtualVoidMethodA,
3319 
3320     jni_GetFieldID,
3321 
3322     jni_GetObjectField,
3323     jni_GetBooleanField,
3324     jni_GetByteField,
3325     jni_GetCharField,
3326     jni_GetShortField,
3327     jni_GetIntField,
3328     jni_GetLongField,
3329     jni_GetFloatField,
3330     jni_GetDoubleField,
3331 
3332     jni_SetObjectField,
3333     jni_SetBooleanField,
3334     jni_SetByteField,
3335     jni_SetCharField,
3336     jni_SetShortField,
3337     jni_SetIntField,
3338     jni_SetLongField,
3339     jni_SetFloatField,
3340     jni_SetDoubleField,
3341 
3342     jni_GetStaticMethodID,
3343 
3344     jni_CallStaticObjectMethod,
3345     jni_CallStaticObjectMethodV,
3346     jni_CallStaticObjectMethodA,
3347     jni_CallStaticBooleanMethod,
3348     jni_CallStaticBooleanMethodV,
3349     jni_CallStaticBooleanMethodA,
3350     jni_CallStaticByteMethod,
3351     jni_CallStaticByteMethodV,
3352     jni_CallStaticByteMethodA,
3353     jni_CallStaticCharMethod,
3354     jni_CallStaticCharMethodV,
3355     jni_CallStaticCharMethodA,
3356     jni_CallStaticShortMethod,
3357     jni_CallStaticShortMethodV,
3358     jni_CallStaticShortMethodA,
3359     jni_CallStaticIntMethod,
3360     jni_CallStaticIntMethodV,
3361     jni_CallStaticIntMethodA,
3362     jni_CallStaticLongMethod,
3363     jni_CallStaticLongMethodV,
3364     jni_CallStaticLongMethodA,
3365     jni_CallStaticFloatMethod,
3366     jni_CallStaticFloatMethodV,
3367     jni_CallStaticFloatMethodA,
3368     jni_CallStaticDoubleMethod,
3369     jni_CallStaticDoubleMethodV,
3370     jni_CallStaticDoubleMethodA,
3371     jni_CallStaticVoidMethod,
3372     jni_CallStaticVoidMethodV,
3373     jni_CallStaticVoidMethodA,
3374 
3375     jni_GetStaticFieldID,
3376 
3377     jni_GetStaticObjectField,
3378     jni_GetStaticBooleanField,
3379     jni_GetStaticByteField,
3380     jni_GetStaticCharField,
3381     jni_GetStaticShortField,
3382     jni_GetStaticIntField,
3383     jni_GetStaticLongField,
3384     jni_GetStaticFloatField,
3385     jni_GetStaticDoubleField,
3386 
3387     jni_SetStaticObjectField,
3388     jni_SetStaticBooleanField,
3389     jni_SetStaticByteField,
3390     jni_SetStaticCharField,
3391     jni_SetStaticShortField,
3392     jni_SetStaticIntField,
3393     jni_SetStaticLongField,
3394     jni_SetStaticFloatField,
3395     jni_SetStaticDoubleField,
3396 
3397     jni_NewString,
3398     jni_GetStringLength,
3399     jni_GetStringChars,
3400     jni_ReleaseStringChars,
3401 
3402     jni_NewStringUTF,
3403     jni_GetStringUTFLength,
3404     jni_GetStringUTFChars,
3405     jni_ReleaseStringUTFChars,
3406 
3407     jni_GetArrayLength,
3408 
3409     jni_NewObjectArray,
3410     jni_GetObjectArrayElement,
3411     jni_SetObjectArrayElement,
3412 
3413     jni_NewBooleanArray,
3414     jni_NewByteArray,
3415     jni_NewCharArray,
3416     jni_NewShortArray,
3417     jni_NewIntArray,
3418     jni_NewLongArray,
3419     jni_NewFloatArray,
3420     jni_NewDoubleArray,
3421 
3422     jni_GetBooleanArrayElements,
3423     jni_GetByteArrayElements,
3424     jni_GetCharArrayElements,
3425     jni_GetShortArrayElements,
3426     jni_GetIntArrayElements,
3427     jni_GetLongArrayElements,
3428     jni_GetFloatArrayElements,
3429     jni_GetDoubleArrayElements,
3430 
3431     jni_ReleaseBooleanArrayElements,
3432     jni_ReleaseByteArrayElements,
3433     jni_ReleaseCharArrayElements,
3434     jni_ReleaseShortArrayElements,
3435     jni_ReleaseIntArrayElements,
3436     jni_ReleaseLongArrayElements,
3437     jni_ReleaseFloatArrayElements,
3438     jni_ReleaseDoubleArrayElements,
3439 
3440     jni_GetBooleanArrayRegion,
3441     jni_GetByteArrayRegion,
3442     jni_GetCharArrayRegion,
3443     jni_GetShortArrayRegion,
3444     jni_GetIntArrayRegion,
3445     jni_GetLongArrayRegion,
3446     jni_GetFloatArrayRegion,
3447     jni_GetDoubleArrayRegion,
3448 
3449     jni_SetBooleanArrayRegion,
3450     jni_SetByteArrayRegion,
3451     jni_SetCharArrayRegion,
3452     jni_SetShortArrayRegion,
3453     jni_SetIntArrayRegion,
3454     jni_SetLongArrayRegion,
3455     jni_SetFloatArrayRegion,
3456     jni_SetDoubleArrayRegion,
3457 
3458     jni_RegisterNatives,
3459     jni_UnregisterNatives,
3460 
3461     jni_MonitorEnter,
3462     jni_MonitorExit,
3463 
3464     jni_GetJavaVM,
3465 
3466     jni_GetStringRegion,
3467     jni_GetStringUTFRegion,
3468 
3469     jni_GetPrimitiveArrayCritical,
3470     jni_ReleasePrimitiveArrayCritical,
3471 
3472     jni_GetStringCritical,
3473     jni_ReleaseStringCritical,
3474 
3475     jni_NewWeakGlobalRef,
3476     jni_DeleteWeakGlobalRef,
3477 
3478     jni_ExceptionCheck,
3479 
3480     jni_NewDirectByteBuffer,
3481     jni_GetDirectBufferAddress,
3482     jni_GetDirectBufferCapacity,
3483 
3484     // New 1_6 features
3485 
3486     jni_GetObjectRefType,
3487 
3488     // Module features
3489 
3490     jni_GetModule,
3491 
3492     // Virtual threads
3493 
3494     jni_IsVirtualThread,
3495 
3496     // Large UTF8 support
3497 
3498     jni_GetStringUTFLengthAsLong,
3499 
3500     // Value classes
3501 
3502     jni_IsValueObject
3503 };
3504 
3505 
3506 // For jvmti use to modify jni function table.
3507 // Java threads in native contiues to run until it is transitioned
3508 // to VM at safepoint. Before the transition or before it is blocked
3509 // for safepoint it may access jni function table. VM could crash if
3510 // any java thread access the jni function table in the middle of memcpy.
3511 // To avoid this each function pointers are copied automically.
3512 void copy_jni_function_table(const struct JNINativeInterface_ *new_jni_NativeInterface) {
3513   assert(SafepointSynchronize::is_at_safepoint(), "must be at safepoint");
3514   intptr_t *a = (intptr_t *) jni_functions();
3515   intptr_t *b = (intptr_t *) new_jni_NativeInterface;
3516   for (uint i=0; i <  sizeof(struct JNINativeInterface_)/sizeof(void *); i++) {
3517     AtomicAccess::store(a++, *b++);
3518   }
3519 }
3520 
3521 void quicken_jni_functions() {
3522   // Replace Get<Primitive>Field with fast versions
3523   if (UseFastJNIAccessors && !VerifyJNIFields && !CheckJNICalls) {
3524     address func;
3525     func = JNI_FastGetField::generate_fast_get_boolean_field();
3526     if (func != (address)-1) {
3527       jni_NativeInterface.GetBooleanField = (GetBooleanField_t)func;
3528     }
3529     func = JNI_FastGetField::generate_fast_get_byte_field();
3530     if (func != (address)-1) {
3531       jni_NativeInterface.GetByteField = (GetByteField_t)func;
3532     }
3533     func = JNI_FastGetField::generate_fast_get_char_field();
3534     if (func != (address)-1) {
3535       jni_NativeInterface.GetCharField = (GetCharField_t)func;
3536     }
3537     func = JNI_FastGetField::generate_fast_get_short_field();
3538     if (func != (address)-1) {
3539       jni_NativeInterface.GetShortField = (GetShortField_t)func;
3540     }
3541     func = JNI_FastGetField::generate_fast_get_int_field();
3542     if (func != (address)-1) {
3543       jni_NativeInterface.GetIntField = (GetIntField_t)func;
3544     }
3545     func = JNI_FastGetField::generate_fast_get_long_field();
3546     if (func != (address)-1) {
3547       jni_NativeInterface.GetLongField = (GetLongField_t)func;
3548     }
3549     func = JNI_FastGetField::generate_fast_get_float_field();
3550     if (func != (address)-1) {
3551       jni_NativeInterface.GetFloatField = (GetFloatField_t)func;
3552     }
3553     func = JNI_FastGetField::generate_fast_get_double_field();
3554     if (func != (address)-1) {
3555       jni_NativeInterface.GetDoubleField = (GetDoubleField_t)func;
3556     }
3557   }
3558 }
3559 
3560 // Returns the function structure
3561 struct JNINativeInterface_* jni_functions() {
3562 #if INCLUDE_JNI_CHECK
3563   if (CheckJNICalls) return jni_functions_check();
3564 #endif // INCLUDE_JNI_CHECK
3565   return &jni_NativeInterface;
3566 }
3567 
3568 // Returns the function structure
3569 struct JNINativeInterface_* jni_functions_nocheck() {
3570   return &jni_NativeInterface;
3571 }
3572 
3573 
3574 // Invocation API
3575 
3576 
3577 // Forward declaration
3578 extern const struct JNIInvokeInterface_ jni_InvokeInterface;
3579 
3580 // Global invocation API vars
3581 enum VM_Creation_State {
3582   NOT_CREATED = 0,
3583   IN_PROGRESS,  // Most JNI operations are permitted during this phase to
3584                 // allow for initialization actions by libraries and agents.
3585   COMPLETE
3586 };
3587 
3588 volatile VM_Creation_State vm_created = NOT_CREATED;
3589 
3590 bool is_vm_created() {
3591   return AtomicAccess::load(&vm_created) == COMPLETE;
3592 }
3593 
3594 // Indicate whether it is safe to recreate VM. Recreation is only
3595 // possible after a failed initial creation attempt in some cases.
3596 volatile int safe_to_recreate_vm = 1;
3597 struct JavaVM_ main_vm = {&jni_InvokeInterface};
3598 
3599 
3600 #define JAVASTACKSIZE (400 * 1024)    /* Default size of a thread java stack */
3601 enum { VERIFY_NONE, VERIFY_REMOTE, VERIFY_ALL };
3602 
3603 DT_RETURN_MARK_DECL(GetDefaultJavaVMInitArgs, jint
3604                     , HOTSPOT_JNI_GETDEFAULTJAVAVMINITARGS_RETURN(_ret_ref));
3605 
3606 _JNI_IMPORT_OR_EXPORT_ jint JNICALL JNI_GetDefaultJavaVMInitArgs(void *args_) {
3607   HOTSPOT_JNI_GETDEFAULTJAVAVMINITARGS_ENTRY(args_);
3608   JDK1_1InitArgs *args = (JDK1_1InitArgs *)args_;
3609   jint ret = JNI_ERR;
3610   DT_RETURN_MARK(GetDefaultJavaVMInitArgs, jint, (const jint&)ret);
3611 
3612   if (Threads::is_supported_jni_version(args->version)) {
3613     ret = JNI_OK;
3614   }
3615   // 1.1 style no longer supported in hotspot.
3616   // According the JNI spec, we should update args->version on return.
3617   // We also use the structure to communicate with launcher about default
3618   // stack size.
3619   if (args->version == JNI_VERSION_1_1) {
3620     args->version = JNI_VERSION_1_2;
3621     // javaStackSize is int in arguments structure
3622     assert(jlong(ThreadStackSize) * K < INT_MAX, "integer overflow");
3623     args->javaStackSize = (jint)(ThreadStackSize * K);
3624   }
3625   return ret;
3626 }
3627 
3628 DT_RETURN_MARK_DECL(CreateJavaVM, jint
3629                     , HOTSPOT_JNI_CREATEJAVAVM_RETURN(_ret_ref));
3630 
3631 static jint JNI_CreateJavaVM_inner(JavaVM **vm, void **penv, void *args) {
3632   HOTSPOT_JNI_CREATEJAVAVM_ENTRY((void **) vm, penv, args);
3633 
3634   jint result = JNI_ERR;
3635   DT_RETURN_MARK(CreateJavaVM, jint, (const jint&)result);
3636 
3637   // We're about to use AtomicAccess::xchg for synchronization.  Some Zero
3638   // platforms use the GCC builtin __sync_lock_test_and_set for this,
3639   // but __sync_lock_test_and_set is not guaranteed to do what we want
3640   // on all architectures.  So we check it works before relying on it.
3641 #if defined(ZERO) && defined(ASSERT)
3642   {
3643     jint a = 0xcafebabe;
3644     jint b = AtomicAccess::xchg(&a, (jint) 0xdeadbeef);
3645     void *c = &a;
3646     void *d = AtomicAccess::xchg(&c, &b);
3647     assert(a == (jint) 0xdeadbeef && b == (jint) 0xcafebabe, "AtomicAccess::xchg() works");
3648     assert(c == &b && d == &a, "AtomicAccess::xchg() works");
3649   }
3650 #endif // ZERO && ASSERT
3651 
3652   // At the moment it's only possible to have one Java VM,
3653   // since some of the runtime state is in global variables.
3654 
3655   // We cannot use our mutex locks here, since they only work on
3656   // Threads. We do an atomic compare and exchange to ensure only
3657   // one thread can call this method at a time
3658 
3659   // We use AtomicAccess::xchg rather than AtomicAccess::add/dec since on some platforms
3660   // the add/dec implementations are dependent on whether we are running
3661   // on a multiprocessor AtomicAccess::xchg does not have this problem.
3662   if (AtomicAccess::xchg(&vm_created, IN_PROGRESS) != NOT_CREATED) {
3663     return JNI_EEXIST;   // already created, or create attempt in progress
3664   }
3665 
3666   // If a previous creation attempt failed but can be retried safely,
3667   // then safe_to_recreate_vm will have been reset to 1 after being
3668   // cleared here. If a previous creation attempt succeeded and we then
3669   // destroyed that VM, we will be prevented from trying to recreate
3670   // the VM in the same process, as the value will still be 0.
3671   if (AtomicAccess::xchg(&safe_to_recreate_vm, 0) == 0) {
3672     return JNI_ERR;
3673   }
3674 
3675   /**
3676    * Certain errors during initialization are recoverable and do not
3677    * prevent this method from being called again at a later time
3678    * (perhaps with different arguments).  However, at a certain
3679    * point during initialization if an error occurs we cannot allow
3680    * this function to be called again (or it will crash).  In those
3681    * situations, the 'canTryAgain' flag is set to false, which atomically
3682    * sets safe_to_recreate_vm to 1, such that any new call to
3683    * JNI_CreateJavaVM will immediately fail using the above logic.
3684    */
3685   bool can_try_again = true;
3686 
3687   result = Threads::create_vm((JavaVMInitArgs*) args, &can_try_again);
3688   if (result == JNI_OK) {
3689     JavaThread *thread = JavaThread::current();
3690     assert(!thread->has_pending_exception(), "should have returned not OK");
3691     // thread is thread_in_vm here
3692     *vm = (JavaVM *)(&main_vm);
3693     *(JNIEnv**)penv = thread->jni_environment();
3694     // mark creation complete for other JNI ops
3695     AtomicAccess::release_store(&vm_created, COMPLETE);
3696 
3697 #if INCLUDE_JVMCI
3698     if (EnableJVMCI) {
3699       if (UseJVMCICompiler) {
3700         // JVMCI is initialized on a CompilerThread
3701         if (BootstrapJVMCI) {
3702           JavaThread* THREAD = thread; // For exception macros.
3703           JVMCICompiler* compiler = JVMCICompiler::instance(true, CATCH);
3704           compiler->bootstrap(THREAD);
3705           if (HAS_PENDING_EXCEPTION) {
3706             HandleMark hm(THREAD);
3707             vm_exit_during_initialization(Handle(THREAD, PENDING_EXCEPTION));
3708           }
3709         }
3710       }
3711     }
3712 #endif
3713 
3714     // Notify JVMTI
3715     if (JvmtiExport::should_post_thread_life()) {
3716        JvmtiExport::post_thread_start(thread);
3717     }
3718 
3719     JFR_ONLY(Jfr::on_thread_start(thread);)
3720 
3721     if (ReplayCompiles) ciReplay::replay(thread);
3722 
3723 #ifdef ASSERT
3724     // Some platforms (like Win*) need a wrapper around these test
3725     // functions in order to properly handle error conditions.
3726     if (ErrorHandlerTest != 0) {
3727       VMError::controlled_crash(ErrorHandlerTest);
3728     }
3729 #endif
3730 
3731     // Since this is not a JVM_ENTRY we have to set the thread state manually before leaving.
3732     ThreadStateTransition::transition_from_vm(thread, _thread_in_native);
3733     MACOS_AARCH64_ONLY(thread->enable_wx(WXExec));
3734   } else {
3735     // If create_vm exits because of a pending exception, exit with that
3736     // exception.  In the future when we figure out how to reclaim memory,
3737     // we may be able to exit with JNI_ERR and allow the calling application
3738     // to continue.
3739     if (Universe::is_fully_initialized()) {
3740       // otherwise no pending exception possible - VM will already have aborted
3741       Thread* current = Thread::current_or_null();
3742       if (current != nullptr) {
3743         JavaThread* THREAD = JavaThread::cast(current); // For exception macros.
3744         assert(HAS_PENDING_EXCEPTION, "must be - else no current thread exists");
3745         HandleMark hm(THREAD);
3746         vm_exit_during_initialization(Handle(THREAD, PENDING_EXCEPTION));
3747       }
3748     }
3749 
3750     if (can_try_again) {
3751       // reset safe_to_recreate_vm to 1 so that retrial would be possible
3752       safe_to_recreate_vm = 1;
3753     }
3754 
3755     // Creation failed. We must reset vm_created
3756     *vm = nullptr;
3757     *(JNIEnv**)penv = nullptr;
3758     // reset vm_created last to avoid race condition. Use OrderAccess to
3759     // control both compiler and architectural-based reordering.
3760     assert(vm_created == IN_PROGRESS, "must be");
3761     AtomicAccess::release_store(&vm_created, NOT_CREATED);
3762   }
3763 
3764   // Flush stdout and stderr before exit.
3765   fflush(stdout);
3766   fflush(stderr);
3767 
3768   return result;
3769 
3770 }
3771 
3772 _JNI_IMPORT_OR_EXPORT_ jint JNICALL JNI_CreateJavaVM(JavaVM **vm, void **penv, void *args) {
3773   jint result = JNI_ERR;
3774   // On Windows, let CreateJavaVM run with SEH protection
3775 #if defined(_WIN32) && !defined(USE_VECTORED_EXCEPTION_HANDLING)
3776   __try {
3777 #endif
3778     result = JNI_CreateJavaVM_inner(vm, penv, args);
3779 #if defined(_WIN32) && !defined(USE_VECTORED_EXCEPTION_HANDLING)
3780   } __except(topLevelExceptionFilter((_EXCEPTION_POINTERS*)_exception_info())) {
3781     // Nothing to do.
3782   }
3783 #endif
3784   return result;
3785 }
3786 
3787 _JNI_IMPORT_OR_EXPORT_ jint JNICALL JNI_GetCreatedJavaVMs(JavaVM **vm_buf, jsize bufLen, jsize *numVMs) {
3788   HOTSPOT_JNI_GETCREATEDJAVAVMS_ENTRY((void **) vm_buf, bufLen, (uintptr_t *) numVMs);
3789 
3790   if (vm_created == COMPLETE) {
3791     if (numVMs != nullptr) *numVMs = 1;
3792     if (bufLen > 0)     *vm_buf = (JavaVM *)(&main_vm);
3793   } else {
3794     if (numVMs != nullptr) *numVMs = 0;
3795   }
3796   HOTSPOT_JNI_GETCREATEDJAVAVMS_RETURN(JNI_OK);
3797   return JNI_OK;
3798 }
3799 
3800 extern "C" {
3801 
3802 DT_RETURN_MARK_DECL(DestroyJavaVM, jint
3803                     , HOTSPOT_JNI_DESTROYJAVAVM_RETURN(_ret_ref));
3804 
3805 static jint JNICALL jni_DestroyJavaVM_inner(JavaVM *vm) {
3806   HOTSPOT_JNI_DESTROYJAVAVM_ENTRY(vm);
3807   jint res = JNI_ERR;
3808   DT_RETURN_MARK(DestroyJavaVM, jint, (const jint&)res);
3809 
3810   if (vm_created == NOT_CREATED) {
3811     res = JNI_ERR;
3812     return res;
3813   }
3814 
3815   JNIEnv *env;
3816   JavaVMAttachArgs destroyargs;
3817   destroyargs.version = CurrentVersion;
3818   destroyargs.name = (char *)"DestroyJavaVM";
3819   destroyargs.group = nullptr;
3820   res = vm->AttachCurrentThread((void **)&env, (void *)&destroyargs);
3821   if (res != JNI_OK) {
3822     return res;
3823   }
3824 
3825   JavaThread* thread = JavaThread::current();
3826 
3827   // Make sure we are actually in a newly attached thread, with no
3828   // existing Java frame.
3829   if (thread->has_last_Java_frame()) {
3830     return JNI_ERR;
3831   }
3832 
3833   // Since this is not a JVM_ENTRY we have to set the thread state manually before entering.
3834 
3835   // We are going to VM, change W^X state to the expected one.
3836   MACOS_AARCH64_ONLY(WXMode oldmode = thread->enable_wx(WXWrite));
3837 
3838   ThreadStateTransition::transition_from_native(thread, _thread_in_vm);
3839   Threads::destroy_vm();
3840   // Don't bother restoring thread state, VM is gone.
3841   vm_created = NOT_CREATED;
3842   return JNI_OK;
3843 }
3844 
3845 jint JNICALL jni_DestroyJavaVM(JavaVM *vm) {
3846   jint result = JNI_ERR;
3847   // On Windows, we need SEH protection
3848 #if defined(_WIN32) && !defined(USE_VECTORED_EXCEPTION_HANDLING)
3849   __try {
3850 #endif
3851     result = jni_DestroyJavaVM_inner(vm);
3852 #if defined(_WIN32) && !defined(USE_VECTORED_EXCEPTION_HANDLING)
3853   } __except(topLevelExceptionFilter((_EXCEPTION_POINTERS*)_exception_info())) {
3854     // Nothing to do.
3855   }
3856 #endif
3857   return result;
3858 }
3859 
3860 static jint attach_current_thread(JavaVM *vm, void **penv, void *_args, bool daemon) {
3861   JavaVMAttachArgs *args = (JavaVMAttachArgs *) _args;
3862 
3863   // Check below commented out from JDK1.2fcs as well
3864   /*
3865   if (args && (args->version != JNI_VERSION_1_1 || args->version != JNI_VERSION_1_2)) {
3866     return JNI_EVERSION;
3867   }
3868   */
3869 
3870   Thread* t = Thread::current_or_null();
3871   if (t != nullptr) {
3872     // If executing from an atexit hook we may be in the VMThread.
3873     if (t->is_Java_thread()) {
3874       // If the thread has been attached this operation is a no-op
3875       *(JNIEnv**)penv = JavaThread::cast(t)->jni_environment();
3876       return JNI_OK;
3877     } else {
3878       return JNI_ERR;
3879     }
3880   }
3881 
3882   // Create a thread and mark it as attaching so it will be skipped by the
3883   // ThreadsListEnumerator - see CR 6404306
3884   JavaThread* thread = JavaThread::create_attaching_thread();
3885 
3886   // Set correct safepoint info. The thread is going to call into Java when
3887   // initializing the Java level thread object. Hence, the correct state must
3888   // be set in order for the Safepoint code to deal with it correctly.
3889   thread->set_thread_state(_thread_in_vm);
3890   thread->record_stack_base_and_size();
3891   thread->initialize_thread_current();
3892   thread->register_thread_stack_with_NMT();
3893   MACOS_AARCH64_ONLY(thread->init_wx());
3894 
3895   if (!os::create_attached_thread(thread)) {
3896     thread->unregister_thread_stack_with_NMT();
3897     thread->smr_delete();
3898     return JNI_ERR;
3899   }
3900   // Enable stack overflow checks
3901   thread->stack_overflow_state()->create_stack_guard_pages();
3902 
3903   thread->initialize_tlab();
3904 
3905   thread->cache_global_variables();
3906 
3907   // Set the _monitor_owner_id to the next thread_id temporarily while initialization runs.
3908   // Do it now before we make this thread visible in Threads::add().
3909   thread->set_monitor_owner_id(ThreadIdentifier::next());
3910 
3911   // This thread will not do a safepoint check, since it has
3912   // not been added to the Thread list yet.
3913   { MutexLocker ml(Threads_lock);
3914     // This must be inside this lock in order to get FullGCALot to work properly, i.e., to
3915     // avoid this thread trying to do a GC before it is added to the thread-list
3916     thread->set_active_handles(JNIHandleBlock::allocate_block());
3917     Threads::add(thread, daemon);
3918   }
3919   // Create thread group and name info from attach arguments
3920   oop group = nullptr;
3921   char* thread_name = nullptr;
3922   if (args != nullptr && Threads::is_supported_jni_version(args->version)) {
3923     group = JNIHandles::resolve(args->group);
3924     thread_name = args->name; // may be null
3925   }
3926   if (group == nullptr) group = Universe::main_thread_group();
3927 
3928   // Create Java level thread object and attach it to this thread
3929   bool attach_failed = false;
3930   {
3931     EXCEPTION_MARK;
3932     HandleMark hm(THREAD);
3933     Handle thread_group(THREAD, group);
3934     thread->allocate_threadObj(thread_group, thread_name, daemon, THREAD);
3935     if (HAS_PENDING_EXCEPTION) {
3936       CLEAR_PENDING_EXCEPTION;
3937       // cleanup outside the handle mark.
3938       attach_failed = true;
3939     }
3940   }
3941 
3942   if (attach_failed) {
3943     // Added missing cleanup
3944     thread->cleanup_failed_attach_current_thread(daemon);
3945     thread->unregister_thread_stack_with_NMT();
3946     thread->smr_delete();
3947     return JNI_ERR;
3948   }
3949 
3950   // Update the _monitor_owner_id with the tid value.
3951   thread->set_monitor_owner_id(java_lang_Thread::thread_id(thread->threadObj()));
3952 
3953   // Want this inside 'attaching via jni'.
3954   JFR_ONLY(Jfr::on_thread_start(thread);)
3955 
3956   // mark the thread as no longer attaching
3957   // this uses a fence to push the change through so we don't have
3958   // to regrab the threads_lock
3959   thread->set_done_attaching_via_jni();
3960 
3961   // Set java thread status.
3962   java_lang_Thread::set_thread_status(thread->threadObj(),
3963               JavaThreadStatus::RUNNABLE);
3964 
3965   // Notify the debugger
3966   if (JvmtiExport::should_post_thread_life()) {
3967     JvmtiExport::post_thread_start(thread);
3968   }
3969 
3970   *(JNIEnv**)penv = thread->jni_environment();
3971 
3972   // Now leaving the VM, so change thread_state. This is normally automatically taken care
3973   // of in the JVM_ENTRY. But in this situation we have to do it manually.
3974   ThreadStateTransition::transition_from_vm(thread, _thread_in_native);
3975   MACOS_AARCH64_ONLY(thread->enable_wx(WXExec));
3976 
3977   // Perform any platform dependent FPU setup
3978   os::setup_fpu();
3979 
3980   return JNI_OK;
3981 }
3982 
3983 
3984 jint JNICALL jni_AttachCurrentThread(JavaVM *vm, void **penv, void *_args) {
3985   HOTSPOT_JNI_ATTACHCURRENTTHREAD_ENTRY(vm, penv, _args);
3986   if (vm_created == NOT_CREATED) {
3987     // Not sure how we could possibly get here.
3988     HOTSPOT_JNI_ATTACHCURRENTTHREAD_RETURN((uint32_t) JNI_ERR);
3989     return JNI_ERR;
3990   }
3991 
3992   jint ret = attach_current_thread(vm, penv, _args, false);
3993   HOTSPOT_JNI_ATTACHCURRENTTHREAD_RETURN(ret);
3994   return ret;
3995 }
3996 
3997 
3998 jint JNICALL jni_DetachCurrentThread(JavaVM *vm)  {
3999   HOTSPOT_JNI_DETACHCURRENTTHREAD_ENTRY(vm);
4000   if (vm_created == NOT_CREATED) {
4001     // Not sure how we could possibly get here.
4002     HOTSPOT_JNI_DETACHCURRENTTHREAD_RETURN(JNI_ERR);
4003     return JNI_ERR;
4004   }
4005 
4006   Thread* current = Thread::current_or_null();
4007 
4008   // If the thread has already been detached the operation is a no-op
4009   if (current == nullptr) {
4010     HOTSPOT_JNI_DETACHCURRENTTHREAD_RETURN(JNI_OK);
4011     return JNI_OK;
4012   }
4013 
4014   // If executing from an atexit hook we may be in the VMThread.
4015   if (!current->is_Java_thread()) {
4016     HOTSPOT_JNI_DETACHCURRENTTHREAD_RETURN((uint32_t) JNI_ERR);
4017     return JNI_ERR;
4018   }
4019 
4020   VM_Exit::block_if_vm_exited();
4021 
4022   JavaThread* thread = JavaThread::cast(current);
4023   if (thread->has_last_Java_frame()) {
4024     HOTSPOT_JNI_DETACHCURRENTTHREAD_RETURN((uint32_t) JNI_ERR);
4025     // Can't detach a thread that's running java, that can't work.
4026     return JNI_ERR;
4027   }
4028 
4029   // We are going to VM, change W^X state to the expected one.
4030   MACOS_AARCH64_ONLY(thread->enable_wx(WXWrite));
4031 
4032   // Safepoint support. Have to do call-back to safepoint code, if in the
4033   // middle of a safepoint operation
4034   ThreadStateTransition::transition_from_native(thread, _thread_in_vm);
4035 
4036   // XXX: Note that JavaThread::exit() call below removes the guards on the
4037   // stack pages set up via enable_stack_{red,yellow}_zone() calls
4038   // above in jni_AttachCurrentThread. Unfortunately, while the setting
4039   // of the guards is visible in jni_AttachCurrentThread above,
4040   // the removal of the guards is buried below in JavaThread::exit()
4041   // here. The abstraction should be more symmetrically either exposed
4042   // or hidden (e.g. it could probably be hidden in the same
4043   // (platform-dependent) methods where we do alternate stack
4044   // maintenance work?)
4045   thread->exit(false, JavaThread::jni_detach);
4046   thread->unregister_thread_stack_with_NMT();
4047   thread->smr_delete();
4048 
4049   // Go to the execute mode, the initial state of the thread on creation.
4050   // Use os interface as the thread is not a JavaThread anymore.
4051   MACOS_AARCH64_ONLY(os::current_thread_enable_wx(WXExec));
4052 
4053   HOTSPOT_JNI_DETACHCURRENTTHREAD_RETURN(JNI_OK);
4054   return JNI_OK;
4055 }
4056 
4057 DT_RETURN_MARK_DECL(GetEnv, jint
4058                     , HOTSPOT_JNI_GETENV_RETURN(_ret_ref));
4059 
4060 jint JNICALL jni_GetEnv(JavaVM *vm, void **penv, jint version) {
4061   HOTSPOT_JNI_GETENV_ENTRY(vm, penv, version);
4062   jint ret = JNI_ERR;
4063   DT_RETURN_MARK(GetEnv, jint, (const jint&)ret);
4064 
4065   if (vm_created == NOT_CREATED) {
4066     *penv = nullptr;
4067     ret = JNI_EDETACHED;
4068     return ret;
4069   }
4070 
4071   if (JniExportedInterface::GetExportedInterface(vm, penv, version, &ret)) {
4072     return ret;
4073   }
4074 
4075 #ifndef JVMPI_VERSION_1
4076 // need these in order to be polite about older agents
4077 #define JVMPI_VERSION_1   ((jint)0x10000001)
4078 #define JVMPI_VERSION_1_1 ((jint)0x10000002)
4079 #define JVMPI_VERSION_1_2 ((jint)0x10000003)
4080 #endif // !JVMPI_VERSION_1
4081 
4082   Thread* thread = Thread::current_or_null();
4083   if (thread != nullptr && thread->is_Java_thread()) {
4084     if (Threads::is_supported_jni_version_including_1_1(version)) {
4085       *(JNIEnv**)penv = JavaThread::cast(thread)->jni_environment();
4086       ret = JNI_OK;
4087       return ret;
4088 
4089     } else if (version == JVMPI_VERSION_1 ||
4090                version == JVMPI_VERSION_1_1 ||
4091                version == JVMPI_VERSION_1_2) {
4092       tty->print_cr("ERROR: JVMPI, an experimental interface, is no longer supported.");
4093       tty->print_cr("Please use the supported interface: the JVM Tool Interface (JVM TI).");
4094       ret = JNI_EVERSION;
4095       return ret;
4096     } else if (JvmtiExport::is_jvmdi_version(version)) {
4097       tty->print_cr("FATAL ERROR: JVMDI is no longer supported.");
4098       tty->print_cr("Please use the supported interface: the JVM Tool Interface (JVM TI).");
4099       ret = JNI_EVERSION;
4100       return ret;
4101     } else {
4102       *penv = nullptr;
4103       ret = JNI_EVERSION;
4104       return ret;
4105     }
4106   } else {
4107     *penv = nullptr;
4108     ret = JNI_EDETACHED;
4109     return ret;
4110   }
4111 }
4112 
4113 
4114 jint JNICALL jni_AttachCurrentThreadAsDaemon(JavaVM *vm, void **penv, void *_args) {
4115   HOTSPOT_JNI_ATTACHCURRENTTHREADASDAEMON_ENTRY(vm, penv, _args);
4116   if (vm_created == NOT_CREATED) {
4117     // Not sure how we could possibly get here.
4118     HOTSPOT_JNI_ATTACHCURRENTTHREADASDAEMON_RETURN((uint32_t) JNI_ERR);
4119     return JNI_ERR;
4120   }
4121 
4122   jint ret = attach_current_thread(vm, penv, _args, true);
4123   HOTSPOT_JNI_ATTACHCURRENTTHREADASDAEMON_RETURN(ret);
4124   return ret;
4125 }
4126 
4127 
4128 } // End extern "C"
4129 
4130 const struct JNIInvokeInterface_ jni_InvokeInterface = {
4131     nullptr,
4132     nullptr,
4133     nullptr,
4134 
4135     jni_DestroyJavaVM,
4136     jni_AttachCurrentThread,
4137     jni_DetachCurrentThread,
4138     jni_GetEnv,
4139     jni_AttachCurrentThreadAsDaemon
4140 };