1 /*

     2  * Copyright (c) 2011, 2017, Oracle and/or its affiliates. All rights reserved.

     3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

     4  *

     5  * This code is free software; you can redistribute it and/or modify it

     6  * under the terms of the GNU General Public License version 2 only, as

     7  * published by the Free Software Foundation.

     8  *

     9  * This code is distributed in the hope that it will be useful, but WITHOUT

    10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

    11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

    12  * version 2 for more details (a copy is included in the LICENSE file that

    13  * accompanied this code).

    14  *

    15  * You should have received a copy of the GNU General Public License version

    16  * 2 along with this work; if not, write to the Free Software Foundation,

    17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

    18  *

    19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

    20  * or visit www.oracle.com if you need additional information or have any

    21  * questions.

    22  */

    23 

    24 #include "precompiled.hpp"

    25 #include "classfile/javaClasses.inline.hpp"

    26 #include "code/codeCache.hpp"

    27 #include "code/scopeDesc.hpp"

    28 #include "interpreter/linkResolver.hpp"

    29 #include "memory/oopFactory.hpp"

    30 #include "memory/resourceArea.hpp"

    31 #include "oops/generateOopMap.hpp"

    32 #include "oops/fieldStreams.hpp"

    33 #include "oops/oop.inline.hpp"

    34 #include "oops/objArrayOop.inline.hpp"

    35 #include "runtime/fieldDescriptor.hpp"

    36 #include "runtime/javaCalls.hpp"

    37 #include "jvmci/jvmciRuntime.hpp"

    38 #include "compiler/abstractCompiler.hpp"

    39 #include "compiler/compileBroker.hpp"

    40 #include "compiler/compilerOracle.hpp"

    41 #include "compiler/disassembler.hpp"

    42 #include "compiler/oopMap.hpp"

    43 #include "jvmci/jvmciCompilerToVM.hpp"

    44 #include "jvmci/jvmciCompiler.hpp"

    45 #include "jvmci/jvmciEnv.hpp"

    46 #include "jvmci/jvmciJavaClasses.hpp"

    47 #include "jvmci/jvmciCodeInstaller.hpp"

    48 #include "jvmci/vmStructs_jvmci.hpp"

    49 #include "gc/g1/heapRegion.hpp"

    50 #include "runtime/javaCalls.hpp"

    51 #include "runtime/deoptimization.hpp"

    52 #include "runtime/timerTrace.hpp"

    53 #include "runtime/vframe.hpp"

    54 #include "runtime/vframe_hp.hpp"

    55 #include "runtime/vmStructs.hpp"

    56 #include "utilities/resourceHash.hpp"

    57 

    58 

    59 void JNIHandleMark::push_jni_handle_block() {

    60   JavaThread* thread = JavaThread::current();

    61   if (thread != NULL) {

    62     // Allocate a new block for JNI handles.

    63     // Inlined code from jni_PushLocalFrame()

    64     JNIHandleBlock* java_handles = ((JavaThread*)thread)->active_handles();

    65     JNIHandleBlock* compile_handles = JNIHandleBlock::allocate_block(thread);

    66     assert(compile_handles != NULL && java_handles != NULL, "should not be NULL");

    67     compile_handles->set_pop_frame_link(java_handles);

    68     thread->set_active_handles(compile_handles);

    69   }

    70 }

    71 

    72 void JNIHandleMark::pop_jni_handle_block() {

    73   JavaThread* thread = JavaThread::current();

    74   if (thread != NULL) {

    75     // Release our JNI handle block

    76     JNIHandleBlock* compile_handles = thread->active_handles();

    77     JNIHandleBlock* java_handles = compile_handles->pop_frame_link();

    78     thread->set_active_handles(java_handles);

    79     compile_handles->set_pop_frame_link(NULL);

    80     JNIHandleBlock::release_block(compile_handles, thread); // may block

    81   }

    82 }

    83 

    84 // Entry to native method implementation that transitions current thread to '_thread_in_vm'.

    85 #define C2V_VMENTRY(result_type, name, signature) \

    86   JNIEXPORT result_type JNICALL c2v_ ## name signature { \

    87   TRACE_jvmci_1("CompilerToVM::" #name); \

    88   TRACE_CALL(result_type, jvmci_ ## name signature) \

    89   JVMCI_VM_ENTRY_MARK; \

    90 

    91 #define C2V_END }

    92 

    93 oop CompilerToVM::get_jvmci_method(const methodHandle& method, TRAPS) {

    94   if (method() != NULL) {

    95     JavaValue result(T_OBJECT);

    96     JavaCallArguments args;

    97     args.push_long((jlong) (address) method());

    98     JavaCalls::call_static(&result, SystemDictionary::HotSpotResolvedJavaMethodImpl_klass(), vmSymbols::fromMetaspace_name(), vmSymbols::method_fromMetaspace_signature(), &args, CHECK_NULL);

    99 

   100     return (oop)result.get_jobject();

   101   }

   102   return NULL;

   103 }

   104 

   105 oop CompilerToVM::get_jvmci_type(Klass* klass, TRAPS) {

   106   if (klass != NULL) {

   107     JavaValue result(T_OBJECT);

   108     JavaCallArguments args;

   109     args.push_oop(Handle(THREAD, klass->java_mirror()));

   110     JavaCalls::call_static(&result, SystemDictionary::HotSpotResolvedObjectTypeImpl_klass(), vmSymbols::fromMetaspace_name(), vmSymbols::klass_fromMetaspace_signature(), &args, CHECK_NULL);

   111 

   112     return (oop)result.get_jobject();

   113   }

   114   return NULL;

   115 }

   116 

   117 

   118 int CompilerToVM::Data::Klass_vtable_start_offset;

   119 int CompilerToVM::Data::Klass_vtable_length_offset;

   120 

   121 int CompilerToVM::Data::Method_extra_stack_entries;

   122 

   123 address CompilerToVM::Data::SharedRuntime_ic_miss_stub;

   124 address CompilerToVM::Data::SharedRuntime_handle_wrong_method_stub;

   125 address CompilerToVM::Data::SharedRuntime_deopt_blob_unpack;

   126 address CompilerToVM::Data::SharedRuntime_deopt_blob_uncommon_trap;

   127 

   128 size_t CompilerToVM::Data::ThreadLocalAllocBuffer_alignment_reserve;

   129 

   130 CollectedHeap* CompilerToVM::Data::Universe_collectedHeap;

   131 int CompilerToVM::Data::Universe_base_vtable_size;

   132 address CompilerToVM::Data::Universe_narrow_oop_base;

   133 int CompilerToVM::Data::Universe_narrow_oop_shift;

   134 address CompilerToVM::Data::Universe_narrow_klass_base;

   135 int CompilerToVM::Data::Universe_narrow_klass_shift;

   136 void* CompilerToVM::Data::Universe_non_oop_bits;

   137 uintptr_t CompilerToVM::Data::Universe_verify_oop_mask;

   138 uintptr_t CompilerToVM::Data::Universe_verify_oop_bits;

   139 

   140 bool       CompilerToVM::Data::_supports_inline_contig_alloc;

   141 HeapWord** CompilerToVM::Data::_heap_end_addr;

   142 HeapWord* volatile* CompilerToVM::Data::_heap_top_addr;

   143 int CompilerToVM::Data::_max_oop_map_stack_offset;

   144 

   145 jbyte* CompilerToVM::Data::cardtable_start_address;

   146 int CompilerToVM::Data::cardtable_shift;

   147 

   148 int CompilerToVM::Data::vm_page_size;

   149 

   150 int CompilerToVM::Data::sizeof_vtableEntry = sizeof(vtableEntry);

   151 int CompilerToVM::Data::sizeof_ExceptionTableElement = sizeof(ExceptionTableElement);

   152 int CompilerToVM::Data::sizeof_LocalVariableTableElement = sizeof(LocalVariableTableElement);

   153 int CompilerToVM::Data::sizeof_ConstantPool = sizeof(ConstantPool);

   154 int CompilerToVM::Data::sizeof_SymbolPointer = sizeof(Symbol*);

   155 int CompilerToVM::Data::sizeof_narrowKlass = sizeof(narrowKlass);

   156 int CompilerToVM::Data::sizeof_arrayOopDesc = sizeof(arrayOopDesc);

   157 int CompilerToVM::Data::sizeof_BasicLock = sizeof(BasicLock);

   158 

   159 address CompilerToVM::Data::dsin;

   160 address CompilerToVM::Data::dcos;

   161 address CompilerToVM::Data::dtan;

   162 address CompilerToVM::Data::dexp;

   163 address CompilerToVM::Data::dlog;

   164 address CompilerToVM::Data::dlog10;

   165 address CompilerToVM::Data::dpow;

   166 

   167 address CompilerToVM::Data::symbol_init;

   168 address CompilerToVM::Data::symbol_clinit;

   169 

   170 void CompilerToVM::Data::initialize(TRAPS) {

   171   Klass_vtable_start_offset = in_bytes(Klass::vtable_start_offset());

   172   Klass_vtable_length_offset = in_bytes(Klass::vtable_length_offset());

   173 

   174   Method_extra_stack_entries = Method::extra_stack_entries();

   175 

   176   SharedRuntime_ic_miss_stub = SharedRuntime::get_ic_miss_stub();

   177   SharedRuntime_handle_wrong_method_stub = SharedRuntime::get_handle_wrong_method_stub();

   178   SharedRuntime_deopt_blob_unpack = SharedRuntime::deopt_blob()->unpack();

   179   SharedRuntime_deopt_blob_uncommon_trap = SharedRuntime::deopt_blob()->uncommon_trap();

   180 

   181   ThreadLocalAllocBuffer_alignment_reserve = ThreadLocalAllocBuffer::alignment_reserve();

   182 

   183   Universe_collectedHeap = Universe::heap();

   184   Universe_base_vtable_size = Universe::base_vtable_size();

   185   Universe_narrow_oop_base = Universe::narrow_oop_base();

   186   Universe_narrow_oop_shift = Universe::narrow_oop_shift();

   187   Universe_narrow_klass_base = Universe::narrow_klass_base();

   188   Universe_narrow_klass_shift = Universe::narrow_klass_shift();

   189   Universe_non_oop_bits = Universe::non_oop_word();

   190   Universe_verify_oop_mask = Universe::verify_oop_mask();

   191   Universe_verify_oop_bits = Universe::verify_oop_bits();

   192 

   193   _supports_inline_contig_alloc = Universe::heap()->supports_inline_contig_alloc();

   194   _heap_end_addr = _supports_inline_contig_alloc ? Universe::heap()->end_addr() : (HeapWord**) -1;

   195   _heap_top_addr = _supports_inline_contig_alloc ? Universe::heap()->top_addr() : (HeapWord* volatile*) -1;

   196 

   197   _max_oop_map_stack_offset = (OopMapValue::register_mask - VMRegImpl::stack2reg(0)->value()) * VMRegImpl::stack_slot_size;

   198   int max_oop_map_stack_index = _max_oop_map_stack_offset / VMRegImpl::stack_slot_size;

   199   assert(OopMapValue::legal_vm_reg_name(VMRegImpl::stack2reg(max_oop_map_stack_index)), "should be valid");

   200   assert(!OopMapValue::legal_vm_reg_name(VMRegImpl::stack2reg(max_oop_map_stack_index + 1)), "should be invalid");

   201 

   202   symbol_init = (address) vmSymbols::object_initializer_name();

   203   symbol_clinit = (address) vmSymbols::class_initializer_name();

   204 

   205   BarrierSet* bs = Universe::heap()->barrier_set();

   206   if (bs->is_a(BarrierSet::CardTableModRef)) {

   207     jbyte* base = barrier_set_cast<CardTableModRefBS>(bs)->byte_map_base;

   208     assert(base != 0, "unexpected byte_map_base");

   209     cardtable_start_address = base;

   210     cardtable_shift = CardTableModRefBS::card_shift;

   211   } else {

   212     // No card mark barriers

   213     cardtable_start_address = 0;

   214     cardtable_shift = 0;

   215   }

   216 

   217   vm_page_size = os::vm_page_size();

   218 

   219 #define SET_TRIGFUNC(name)                                      \

   220   if (StubRoutines::name() != NULL) {                           \

   221     name = StubRoutines::name();                                \

   222   } else {                                                      \

   223     name = CAST_FROM_FN_PTR(address, SharedRuntime::name);      \

   224   }

   225 

   226   SET_TRIGFUNC(dsin);

   227   SET_TRIGFUNC(dcos);

   228   SET_TRIGFUNC(dtan);

   229   SET_TRIGFUNC(dexp);

   230   SET_TRIGFUNC(dlog10);

   231   SET_TRIGFUNC(dlog);

   232   SET_TRIGFUNC(dpow);

   233 

   234 #undef SET_TRIGFUNC

   235 }

   236 

   237 objArrayHandle CompilerToVM::initialize_intrinsics(TRAPS) {

   238   objArrayHandle vmIntrinsics = oopFactory::new_objArray_handle(VMIntrinsicMethod::klass(), (vmIntrinsics::ID_LIMIT - 1), CHECK_(objArrayHandle()));

   239   int index = 0;

   240   // The intrinsics for a class are usually adjacent to each other.

   241   // When they are, the string for the class name can be reused.

   242   vmSymbols::SID kls_sid = vmSymbols::NO_SID;

   243   Handle kls_str;

   244 #define SID_ENUM(n) vmSymbols::VM_SYMBOL_ENUM_NAME(n)

   245 #define VM_SYMBOL_TO_STRING(s) \

   246   java_lang_String::create_from_symbol(vmSymbols::symbol_at(SID_ENUM(s)), CHECK_(objArrayHandle()))

   247 #define VM_INTRINSIC_INFO(id, kls, name, sig, ignore_fcode) {             \

   248     instanceHandle vmIntrinsicMethod = InstanceKlass::cast(VMIntrinsicMethod::klass())->allocate_instance_handle(CHECK_(objArrayHandle())); \

   249     if (kls_sid != SID_ENUM(kls)) {                                       \

   250       kls_str = VM_SYMBOL_TO_STRING(kls);                                 \

   251       kls_sid = SID_ENUM(kls);                                            \

   252     }                                                                     \

   253     Handle name_str = VM_SYMBOL_TO_STRING(name);                          \

   254     Handle sig_str = VM_SYMBOL_TO_STRING(sig);                            \

   255     VMIntrinsicMethod::set_declaringClass(vmIntrinsicMethod, kls_str());  \

   256     VMIntrinsicMethod::set_name(vmIntrinsicMethod, name_str());           \

   257     VMIntrinsicMethod::set_descriptor(vmIntrinsicMethod, sig_str());      \

   258     VMIntrinsicMethod::set_id(vmIntrinsicMethod, vmIntrinsics::id);       \

   259       vmIntrinsics->obj_at_put(index++, vmIntrinsicMethod());             \

   260   }

   261 

   262   VM_INTRINSICS_DO(VM_INTRINSIC_INFO, VM_SYMBOL_IGNORE, VM_SYMBOL_IGNORE, VM_SYMBOL_IGNORE, VM_ALIAS_IGNORE)

   263 #undef SID_ENUM

   264 #undef VM_SYMBOL_TO_STRING

   265 #undef VM_INTRINSIC_INFO

   266   assert(index == vmIntrinsics::ID_LIMIT - 1, "must be");

   267 

   268   return vmIntrinsics;

   269 }

   270 

   271 /**

   272  * The set of VM flags known to be used.

   273  */

   274 #define PREDEFINED_CONFIG_FLAGS(do_bool_flag, do_intx_flag, do_uintx_flag) \

   275   do_intx_flag(AllocateInstancePrefetchLines)                              \

   276   do_intx_flag(AllocatePrefetchDistance)                                   \

   277   do_intx_flag(AllocatePrefetchInstr)                                      \

   278   do_intx_flag(AllocatePrefetchLines)                                      \

   279   do_intx_flag(AllocatePrefetchStepSize)                                   \

   280   do_intx_flag(AllocatePrefetchStyle)                                      \

   281   do_intx_flag(BciProfileWidth)                                            \

   282   do_bool_flag(BootstrapJVMCI)                                             \

   283   do_bool_flag(CITime)                                                     \

   284   do_bool_flag(CITimeEach)                                                 \

   285   do_uintx_flag(CodeCacheSegmentSize)                                      \

   286   do_intx_flag(CodeEntryAlignment)                                         \

   287   do_bool_flag(CompactFields)                                              \

   288   NOT_PRODUCT(do_intx_flag(CompileTheWorldStartAt))                        \

   289   NOT_PRODUCT(do_intx_flag(CompileTheWorldStopAt))                         \

   290   do_intx_flag(ContendedPaddingWidth)                                      \

   291   do_bool_flag(DontCompileHugeMethods)                                     \

   292   do_bool_flag(EnableContended)                                            \

   293   do_intx_flag(FieldsAllocationStyle)                                      \

   294   do_bool_flag(FoldStableValues)                                           \

   295   do_bool_flag(ForceUnreachable)                                           \

   296   do_intx_flag(HugeMethodLimit)                                            \

   297   do_bool_flag(Inline)                                                     \

   298   do_intx_flag(JVMCICounterSize)                                           \

   299   do_bool_flag(JVMCIPrintProperties)                                       \

   300   do_bool_flag(JVMCIUseFastLocking)                                        \

   301   do_intx_flag(MethodProfileWidth)                                         \

   302   do_intx_flag(ObjectAlignmentInBytes)                                     \

   303   do_bool_flag(PrintInlining)                                              \

   304   do_bool_flag(ReduceInitialCardMarks)                                     \

   305   do_bool_flag(RestrictContended)                                          \

   306   do_intx_flag(StackReservedPages)                                         \

   307   do_intx_flag(StackShadowPages)                                           \

   308   do_bool_flag(TLABStats)                                                  \

   309   do_uintx_flag(TLABWasteIncrement)                                        \

   310   do_intx_flag(TypeProfileWidth)                                           \

   311   do_bool_flag(UseAESIntrinsics)                                           \

   312   X86_ONLY(do_intx_flag(UseAVX))                                           \

   313   do_bool_flag(UseBiasedLocking)                                           \

   314   do_bool_flag(UseCRC32Intrinsics)                                         \

   315   do_bool_flag(UseCompressedClassPointers)                                 \

   316   do_bool_flag(UseCompressedOops)                                          \

   317   do_bool_flag(UseConcMarkSweepGC)                                         \

   318   X86_ONLY(do_bool_flag(UseCountLeadingZerosInstruction))                  \

   319   X86_ONLY(do_bool_flag(UseCountTrailingZerosInstruction))                 \

   320   do_bool_flag(UseG1GC)                                                    \

   321   COMPILER2_PRESENT(do_bool_flag(UseMontgomeryMultiplyIntrinsic))          \

   322   COMPILER2_PRESENT(do_bool_flag(UseMontgomerySquareIntrinsic))            \

   323   COMPILER2_PRESENT(do_bool_flag(UseMulAddIntrinsic))                      \

   324   COMPILER2_PRESENT(do_bool_flag(UseMultiplyToLenIntrinsic))               \

   325   do_bool_flag(UsePopCountInstruction)                                     \

   326   do_bool_flag(UseSHA1Intrinsics)                                          \

   327   do_bool_flag(UseSHA256Intrinsics)                                        \

   328   do_bool_flag(UseSHA512Intrinsics)                                        \

   329   do_intx_flag(UseSSE)                                                     \

   330   COMPILER2_PRESENT(do_bool_flag(UseSquareToLenIntrinsic))                 \

   331   do_bool_flag(UseStackBanging)                                            \

   332   do_bool_flag(UseTLAB)                                                    \

   333   do_bool_flag(VerifyOops)                                                 \

   334 

   335 #define BOXED_BOOLEAN(name, value) oop name = ((jboolean)(value) ? boxedTrue() : boxedFalse())

   336 #define BOXED_DOUBLE(name, value) oop name; do { jvalue p; p.d = (jdouble) (value); name = java_lang_boxing_object::create(T_DOUBLE, &p, CHECK_NULL);} while(0)

   337 #define BOXED_LONG(name, value) \

   338   oop name; \

   339   do { \

   340     jvalue p; p.j = (jlong) (value); \

   341     Handle* e = longs.get(p.j); \

   342     if (e == NULL) { \

   343       oop o = java_lang_boxing_object::create(T_LONG, &p, CHECK_NULL); \

   344       Handle h(THREAD, o); \

   345       longs.put(p.j, h); \

   346       name = h(); \

   347     } else { \

   348       name = (*e)(); \

   349     } \

   350   } while (0)

   351 

   352 #define CSTRING_TO_JSTRING(name, value) \

   353   Handle name; \

   354   do { \

   355     if (value != NULL) { \

   356       Handle* e = strings.get(value); \

   357       if (e == NULL) { \

   358         Handle h = java_lang_String::create_from_str(value, CHECK_NULL); \

   359         strings.put(value, h); \

   360         name = h; \

   361       } else { \

   362         name = (*e); \

   363       } \

   364     } \

   365   } while (0)

   366 

   367 C2V_VMENTRY(jobjectArray, readConfiguration, (JNIEnv *env))

   368   ResourceMark rm;

   369   HandleMark hm;

   370 

   371   // Used to canonicalize Long and String values.

   372   ResourceHashtable<jlong, Handle> longs;

   373   ResourceHashtable<const char*, Handle, &CompilerToVM::cstring_hash, &CompilerToVM::cstring_equals> strings;

   374 

   375   jvalue prim;

   376   prim.z = true;  oop boxedTrueOop =  java_lang_boxing_object::create(T_BOOLEAN, &prim, CHECK_NULL);

   377   Handle boxedTrue(THREAD, boxedTrueOop);

   378   prim.z = false; oop boxedFalseOop = java_lang_boxing_object::create(T_BOOLEAN, &prim, CHECK_NULL);

   379   Handle boxedFalse(THREAD, boxedFalseOop);

   380 

   381   CompilerToVM::Data::initialize(CHECK_NULL);

   382 

   383   VMField::klass()->initialize(CHECK_NULL);

   384   VMFlag::klass()->initialize(CHECK_NULL);

   385   VMIntrinsicMethod::klass()->initialize(CHECK_NULL);

   386 

   387   int len = JVMCIVMStructs::localHotSpotVMStructs_count();

   388   objArrayHandle vmFields = oopFactory::new_objArray_handle(VMField::klass(), len, CHECK_NULL);

   389   for (int i = 0; i < len ; i++) {

   390     VMStructEntry vmField = JVMCIVMStructs::localHotSpotVMStructs[i];

   391     instanceHandle vmFieldObj = InstanceKlass::cast(VMField::klass())->allocate_instance_handle(CHECK_NULL);

   392     size_t name_buf_len = strlen(vmField.typeName) + strlen(vmField.fieldName) + 2 /* "::" */;

   393     char* name_buf = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, name_buf_len + 1);

   394     sprintf(name_buf, "%s::%s", vmField.typeName, vmField.fieldName);

   395     CSTRING_TO_JSTRING(name, name_buf);

   396     CSTRING_TO_JSTRING(type, vmField.typeString);

   397     VMField::set_name(vmFieldObj, name());

   398     VMField::set_type(vmFieldObj, type());

   399     VMField::set_offset(vmFieldObj, vmField.offset);

   400     VMField::set_address(vmFieldObj, (jlong) vmField.address);

   401     if (vmField.isStatic && vmField.typeString != NULL) {

   402       if (strcmp(vmField.typeString, "bool") == 0) {

   403         BOXED_BOOLEAN(box, *(jbyte*) vmField.address);

   404         VMField::set_value(vmFieldObj, box);

   405       } else if (strcmp(vmField.typeString, "int") == 0 ||

   406                  strcmp(vmField.typeString, "jint") == 0) {

   407         BOXED_LONG(box, *(jint*) vmField.address);

   408         VMField::set_value(vmFieldObj, box);

   409       } else if (strcmp(vmField.typeString, "uint64_t") == 0) {

   410         BOXED_LONG(box, *(uint64_t*) vmField.address);

   411         VMField::set_value(vmFieldObj, box);

   412       } else if (strcmp(vmField.typeString, "address") == 0 ||

   413                  strcmp(vmField.typeString, "intptr_t") == 0 ||

   414                  strcmp(vmField.typeString, "uintptr_t") == 0 ||

   415                  strcmp(vmField.typeString, "size_t") == 0 ||

   416                  // All foo* types are addresses.

   417                  vmField.typeString[strlen(vmField.typeString) - 1] == '*') {

   418         BOXED_LONG(box, *((address*) vmField.address));

   419         VMField::set_value(vmFieldObj, box);

   420       } else {

   421         JVMCI_ERROR_NULL("VM field %s has unsupported type %s", name_buf, vmField.typeString);

   422       }

   423     }

   424     vmFields->obj_at_put(i, vmFieldObj());

   425   }

   426 

   427   int ints_len = JVMCIVMStructs::localHotSpotVMIntConstants_count();

   428   int longs_len = JVMCIVMStructs::localHotSpotVMLongConstants_count();

   429   len = ints_len + longs_len;

   430   objArrayHandle vmConstants = oopFactory::new_objArray_handle(SystemDictionary::Object_klass(), len * 2, CHECK_NULL);

   431   int insert = 0;

   432   for (int i = 0; i < ints_len ; i++) {

   433     VMIntConstantEntry c = JVMCIVMStructs::localHotSpotVMIntConstants[i];

   434     CSTRING_TO_JSTRING(name, c.name);

   435     BOXED_LONG(value, c.value);

   436     vmConstants->obj_at_put(insert++, name());

   437     vmConstants->obj_at_put(insert++, value);

   438   }

   439   for (int i = 0; i < longs_len ; i++) {

   440     VMLongConstantEntry c = JVMCIVMStructs::localHotSpotVMLongConstants[i];

   441     CSTRING_TO_JSTRING(name, c.name);

   442     BOXED_LONG(value, c.value);

   443     vmConstants->obj_at_put(insert++, name());

   444     vmConstants->obj_at_put(insert++, value);

   445   }

   446   assert(insert == len * 2, "must be");

   447 

   448   len = JVMCIVMStructs::localHotSpotVMAddresses_count();

   449   objArrayHandle vmAddresses = oopFactory::new_objArray_handle(SystemDictionary::Object_klass(), len * 2, CHECK_NULL);

   450   for (int i = 0; i < len ; i++) {

   451     VMAddressEntry a = JVMCIVMStructs::localHotSpotVMAddresses[i];

   452     CSTRING_TO_JSTRING(name, a.name);

   453     BOXED_LONG(value, a.value);

   454     vmAddresses->obj_at_put(i * 2, name());

   455     vmAddresses->obj_at_put(i * 2 + 1, value);

   456   }

   457 

   458 #define COUNT_FLAG(ignore) +1

   459 #ifdef ASSERT

   460 #define CHECK_FLAG(type, name) { \

   461   Flag* flag = Flag::find_flag(#name, strlen(#name), /*allow_locked*/ true, /* return_flag */ true); \

   462   assert(flag != NULL, "No such flag named " #name); \

   463   assert(flag->is_##type(), "Flag " #name " is not of type " #type); \

   464 }

   465 #else

   466 #define CHECK_FLAG(type, name)

   467 #endif

   468 

   469 #define ADD_FLAG(type, name, convert) { \

   470   CHECK_FLAG(type, name) \

   471   instanceHandle vmFlagObj = InstanceKlass::cast(VMFlag::klass())->allocate_instance_handle(CHECK_NULL); \

   472   CSTRING_TO_JSTRING(fname, #name); \

   473   CSTRING_TO_JSTRING(ftype, #type); \

   474   VMFlag::set_name(vmFlagObj, fname()); \

   475   VMFlag::set_type(vmFlagObj, ftype()); \

   476   convert(value, name); \

   477   VMFlag::set_value(vmFlagObj, value); \

   478   vmFlags->obj_at_put(i++, vmFlagObj()); \

   479 }

   480 #define ADD_BOOL_FLAG(name)  ADD_FLAG(bool, name, BOXED_BOOLEAN)

   481 #define ADD_INTX_FLAG(name)  ADD_FLAG(intx, name, BOXED_LONG)

   482 #define ADD_UINTX_FLAG(name) ADD_FLAG(uintx, name, BOXED_LONG)

   483 

   484   len = 0 + PREDEFINED_CONFIG_FLAGS(COUNT_FLAG, COUNT_FLAG, COUNT_FLAG);

   485   objArrayHandle vmFlags = oopFactory::new_objArray_handle(VMFlag::klass(), len, CHECK_NULL);

   486   int i = 0;

   487   PREDEFINED_CONFIG_FLAGS(ADD_BOOL_FLAG, ADD_INTX_FLAG, ADD_UINTX_FLAG)

   488 

   489   objArrayHandle vmIntrinsics = CompilerToVM::initialize_intrinsics(CHECK_NULL);

   490 

   491   objArrayOop data = oopFactory::new_objArray(SystemDictionary::Object_klass(), 5, CHECK_NULL);

   492   data->obj_at_put(0, vmFields());

   493   data->obj_at_put(1, vmConstants());

   494   data->obj_at_put(2, vmAddresses());

   495   data->obj_at_put(3, vmFlags());

   496   data->obj_at_put(4, vmIntrinsics());

   497 

   498   return (jobjectArray) JNIHandles::make_local(THREAD, data);

   499 #undef COUNT_FLAG

   500 #undef ADD_FLAG

   501 #undef ADD_BOOL_FLAG

   502 #undef ADD_INTX_FLAG

   503 #undef ADD_UINTX_FLAG

   504 #undef CHECK_FLAG

   505 C2V_END

   506 

   507 C2V_VMENTRY(jobject, getFlagValue, (JNIEnv *, jobject c2vm, jobject name_handle))

   508 #define RETURN_BOXED_LONG(value) oop box; jvalue p; p.j = (jlong) (value); box = java_lang_boxing_object::create(T_LONG, &p, CHECK_NULL); return JNIHandles::make_local(THREAD, box);

   509 #define RETURN_BOXED_DOUBLE(value) oop box; jvalue p; p.d = (jdouble) (value); box = java_lang_boxing_object::create(T_DOUBLE, &p, CHECK_NULL); return JNIHandles::make_local(THREAD, box);

   510   Handle name(THREAD, JNIHandles::resolve(name_handle));

   511   if (name.is_null()) {

   512     THROW_0(vmSymbols::java_lang_NullPointerException());

   513   }

   514   ResourceMark rm;

   515   const char* cstring = java_lang_String::as_utf8_string(name());

   516   Flag* flag = Flag::find_flag(cstring, strlen(cstring), /* allow_locked */ true, /* return_flag */ true);

   517   if (flag == NULL) {

   518     return c2vm;

   519   }

   520   if (flag->is_bool()) {

   521     jvalue prim;

   522     prim.z = flag->get_bool();

   523     oop box = java_lang_boxing_object::create(T_BOOLEAN, &prim, CHECK_NULL);

   524     return JNIHandles::make_local(THREAD, box);

   525   } else if (flag->is_ccstr()) {

   526     Handle value = java_lang_String::create_from_str(flag->get_ccstr(), CHECK_NULL);

   527     return JNIHandles::make_local(THREAD, value());

   528   } else if (flag->is_intx()) {

   529     RETURN_BOXED_LONG(flag->get_intx());

   530   } else if (flag->is_int()) {

   531     RETURN_BOXED_LONG(flag->get_int());

   532   } else if (flag->is_uint()) {

   533     RETURN_BOXED_LONG(flag->get_uint());

   534   } else if (flag->is_uint64_t()) {

   535     RETURN_BOXED_LONG(flag->get_uint64_t());

   536   } else if (flag->is_size_t()) {

   537     RETURN_BOXED_LONG(flag->get_size_t());

   538   } else if (flag->is_uintx()) {

   539     RETURN_BOXED_LONG(flag->get_uintx());

   540   } else if (flag->is_double()) {

   541     RETURN_BOXED_DOUBLE(flag->get_double());

   542   } else {

   543     JVMCI_ERROR_NULL("VM flag %s has unsupported type %s", flag->_name, flag->_type);

   544   }

   545 C2V_END

   546 

   547 #undef BOXED_LONG

   548 #undef BOXED_DOUBLE

   549 #undef CSTRING_TO_JSTRING

   550 

   551 C2V_VMENTRY(jbyteArray, getBytecode, (JNIEnv *, jobject, jobject jvmci_method))

   552   methodHandle method = CompilerToVM::asMethod(jvmci_method);

   553   ResourceMark rm;

   554 

   555   int code_size = method->code_size();

   556   typeArrayOop reconstituted_code = oopFactory::new_byteArray(code_size, CHECK_NULL);

   557 

   558   guarantee(method->method_holder()->is_rewritten(), "Method's holder should be rewritten");

   559   // iterate over all bytecodes and replace non-Java bytecodes

   560 

   561   for (BytecodeStream s(method); s.next() != Bytecodes::_illegal; ) {

   562     Bytecodes::Code code = s.code();

   563     Bytecodes::Code raw_code = s.raw_code();

   564     int bci = s.bci();

   565     int len = s.instruction_size();

   566 

   567     // Restore original byte code.

   568     reconstituted_code->byte_at_put(bci, (jbyte) (s.is_wide()? Bytecodes::_wide : code));

   569     if (len > 1) {

   570       memcpy(reconstituted_code->byte_at_addr(bci + 1), s.bcp()+1, len-1);

   571     }

   572 

   573     if (len > 1) {

   574       // Restore the big-endian constant pool indexes.

   575       // Cf. Rewriter::scan_method

   576       switch (code) {

   577         case Bytecodes::_getstatic:

   578         case Bytecodes::_putstatic:

   579         case Bytecodes::_getfield:

   580         case Bytecodes::_putfield:

   581         case Bytecodes::_invokevirtual:

   582         case Bytecodes::_invokespecial:

   583         case Bytecodes::_invokestatic:

   584         case Bytecodes::_invokeinterface:

   585         case Bytecodes::_invokehandle: {

   586           int cp_index = Bytes::get_native_u2((address) reconstituted_code->byte_at_addr(bci + 1));

   587           Bytes::put_Java_u2((address) reconstituted_code->byte_at_addr(bci + 1), (u2) cp_index);

   588           break;

   589         }

   590 

   591         case Bytecodes::_invokedynamic: {

   592           int cp_index = Bytes::get_native_u4((address) reconstituted_code->byte_at_addr(bci + 1));

   593           Bytes::put_Java_u4((address) reconstituted_code->byte_at_addr(bci + 1), (u4) cp_index);

   594           break;

   595         }

   596 

   597         default:

   598           break;

   599       }

   600 

   601       // Not all ldc byte code are rewritten.

   602       switch (raw_code) {

   603         case Bytecodes::_fast_aldc: {

   604           int cpc_index = reconstituted_code->byte_at(bci + 1) & 0xff;

   605           int cp_index = method->constants()->object_to_cp_index(cpc_index);

   606           assert(cp_index < method->constants()->length(), "sanity check");

   607           reconstituted_code->byte_at_put(bci + 1, (jbyte) cp_index);

   608           break;

   609         }

   610 

   611         case Bytecodes::_fast_aldc_w: {

   612           int cpc_index = Bytes::get_native_u2((address) reconstituted_code->byte_at_addr(bci + 1));

   613           int cp_index = method->constants()->object_to_cp_index(cpc_index);

   614           assert(cp_index < method->constants()->length(), "sanity check");

   615           Bytes::put_Java_u2((address) reconstituted_code->byte_at_addr(bci + 1), (u2) cp_index);

   616           break;

   617         }

   618 

   619         default:

   620           break;

   621       }

   622     }

   623   }

   624 

   625   return (jbyteArray) JNIHandles::make_local(THREAD, reconstituted_code);

   626 C2V_END

   627 

   628 C2V_VMENTRY(jint, getExceptionTableLength, (JNIEnv *, jobject, jobject jvmci_method))

   629   ResourceMark rm;

   630   methodHandle method = CompilerToVM::asMethod(jvmci_method);

   631   return method->exception_table_length();

   632 C2V_END

   633 

   634 C2V_VMENTRY(jlong, getExceptionTableStart, (JNIEnv *, jobject, jobject jvmci_method))

   635   ResourceMark rm;

   636   methodHandle method = CompilerToVM::asMethod(jvmci_method);

   637   if (method->exception_table_length() == 0) {

   638     return 0L;

   639   }

   640   return (jlong) (address) method->exception_table_start();

   641 C2V_END

   642 

   643 C2V_VMENTRY(jobject, asResolvedJavaMethod, (JNIEnv *, jobject, jobject executable_handle))

   644   oop executable = JNIHandles::resolve(executable_handle);

   645   oop mirror = NULL;

   646   int slot = 0;

   647 

   648   if (executable->klass() == SystemDictionary::reflect_Constructor_klass()) {

   649     mirror = java_lang_reflect_Constructor::clazz(executable);

   650     slot = java_lang_reflect_Constructor::slot(executable);

   651   } else {

   652     assert(executable->klass() == SystemDictionary::reflect_Method_klass(), "wrong type");

   653     mirror = java_lang_reflect_Method::clazz(executable);

   654     slot = java_lang_reflect_Method::slot(executable);

   655   }

   656   Klass* holder = java_lang_Class::as_Klass(mirror);

   657   methodHandle method = InstanceKlass::cast(holder)->method_with_idnum(slot);

   658   oop result = CompilerToVM::get_jvmci_method(method, CHECK_NULL);

   659   return JNIHandles::make_local(THREAD, result);

   660 }

   661 

   662 C2V_VMENTRY(jobject, getResolvedJavaMethod, (JNIEnv *, jobject, jobject base, jlong offset))

   663   methodHandle method;

   664   oop base_object = JNIHandles::resolve(base);

   665   if (base_object == NULL) {

   666     method = *((Method**)(offset));

   667   } else if (base_object->is_a(SystemDictionary::ResolvedMethodName_klass())) {

   668     method = (Method*) (intptr_t) base_object->long_field(offset);

   669   } else if (base_object->is_a(SystemDictionary::HotSpotResolvedJavaMethodImpl_klass())) {

   670     method = *((Method**)(HotSpotResolvedJavaMethodImpl::metaspaceMethod(base_object) + offset));

   671   } else {

   672     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),

   673                 err_msg("Unexpected type: %s", base_object->klass()->external_name()));

   674   }

   675   assert (method.is_null() || method->is_method(), "invalid read");

   676   oop result = CompilerToVM::get_jvmci_method(method, CHECK_NULL);

   677   return JNIHandles::make_local(THREAD, result);

   678 }

   679 

   680 C2V_VMENTRY(jobject, getConstantPool, (JNIEnv *, jobject, jobject object_handle))

   681   constantPoolHandle cp;

   682   oop object = JNIHandles::resolve(object_handle);

   683   if (object == NULL) {

   684     THROW_0(vmSymbols::java_lang_NullPointerException());

   685   }

   686   if (object->is_a(SystemDictionary::HotSpotResolvedJavaMethodImpl_klass())) {

   687     cp = CompilerToVM::asMethod(object)->constMethod()->constants();

   688   } else if (object->is_a(SystemDictionary::HotSpotResolvedObjectTypeImpl_klass())) {

   689     cp = InstanceKlass::cast(CompilerToVM::asKlass(object))->constants();

   690   } else {

   691     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),

   692                 err_msg("Unexpected type: %s", object->klass()->external_name()));

   693   }

   694   assert(!cp.is_null(), "npe");

   695   JavaValue method_result(T_OBJECT);

   696   JavaCallArguments args;

   697   args.push_long((jlong) (address) cp());

   698   JavaCalls::call_static(&method_result, SystemDictionary::HotSpotConstantPool_klass(), vmSymbols::fromMetaspace_name(), vmSymbols::constantPool_fromMetaspace_signature(), &args, CHECK_NULL);

   699   return JNIHandles::make_local(THREAD, (oop)method_result.get_jobject());

   700 }

   701 

   702 C2V_VMENTRY(jobject, getResolvedJavaType, (JNIEnv *, jobject, jobject base, jlong offset, jboolean compressed))

   703   Klass* klass = NULL;

   704   oop base_object = JNIHandles::resolve(base);

   705   jlong base_address = 0;

   706   if (base_object != NULL && offset == oopDesc::klass_offset_in_bytes()) {

   707     klass = base_object->klass();

   708   } else if (!compressed) {

   709     if (base_object != NULL) {

   710       if (base_object->is_a(SystemDictionary::HotSpotResolvedJavaMethodImpl_klass())) {

   711         base_address = HotSpotResolvedJavaMethodImpl::metaspaceMethod(base_object);

   712       } else if (base_object->is_a(SystemDictionary::HotSpotConstantPool_klass())) {

   713         base_address = HotSpotConstantPool::metaspaceConstantPool(base_object);

   714       } else if (base_object->is_a(SystemDictionary::HotSpotResolvedObjectTypeImpl_klass())) {

   715         base_address = (jlong) CompilerToVM::asKlass(base_object);

   716       } else if (base_object->is_a(SystemDictionary::Class_klass())) {

   717         base_address = (jlong) (address) base_object;

   718       } else {

   719         THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),

   720                     err_msg("Unexpected arguments: %s " JLONG_FORMAT " %s", base_object->klass()->external_name(), offset, compressed ? "true" : "false"));

   721       }

   722     }

   723     klass = *((Klass**) (intptr_t) (base_address + offset));

   724   } else {

   725     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(),

   726                 err_msg("Unexpected arguments: %s " JLONG_FORMAT " %s", base_object->klass()->external_name(), offset, compressed ? "true" : "false"));

   727   }

   728   assert (klass == NULL || klass->is_klass(), "invalid read");

   729   oop result = CompilerToVM::get_jvmci_type(klass, CHECK_NULL);

   730   return JNIHandles::make_local(THREAD, result);

   731 }

   732 

   733 C2V_VMENTRY(jobject, findUniqueConcreteMethod, (JNIEnv *, jobject, jobject jvmci_type, jobject jvmci_method))

   734   ResourceMark rm;

   735   methodHandle method = CompilerToVM::asMethod(jvmci_method);

   736   Klass* holder = CompilerToVM::asKlass(jvmci_type);

   737   if (holder->is_interface()) {

   738     THROW_MSG_0(vmSymbols::java_lang_InternalError(), err_msg("Interface %s should be handled in Java code", holder->external_name()));

   739   }

   740 

   741   methodHandle ucm;

   742   {

   743     MutexLocker locker(Compile_lock);

   744     ucm = Dependencies::find_unique_concrete_method(holder, method());

   745   }

   746   oop result = CompilerToVM::get_jvmci_method(ucm, CHECK_NULL);

   747   return JNIHandles::make_local(THREAD, result);

   748 C2V_END

   749 

   750 C2V_VMENTRY(jobject, getImplementor, (JNIEnv *, jobject, jobject jvmci_type))

   751   InstanceKlass* klass = (InstanceKlass*) CompilerToVM::asKlass(jvmci_type);

   752   oop implementor = CompilerToVM::get_jvmci_type(klass->implementor(), CHECK_NULL);

   753   return JNIHandles::make_local(THREAD, implementor);

   754 C2V_END

   755 

   756 C2V_VMENTRY(jboolean, methodIsIgnoredBySecurityStackWalk,(JNIEnv *, jobject, jobject jvmci_method))

   757   methodHandle method = CompilerToVM::asMethod(jvmci_method);

   758   return method->is_ignored_by_security_stack_walk();

   759 C2V_END

   760 

   761 C2V_VMENTRY(jboolean, isCompilable,(JNIEnv *, jobject, jobject jvmci_method))

   762   methodHandle method = CompilerToVM::asMethod(jvmci_method);

   763   return !method->is_not_compilable(CompLevel_full_optimization);

   764 C2V_END

   765 

   766 C2V_VMENTRY(jboolean, hasNeverInlineDirective,(JNIEnv *, jobject, jobject jvmci_method))

   767   methodHandle method = CompilerToVM::asMethod(jvmci_method);

   768   return !Inline || CompilerOracle::should_not_inline(method) || method->dont_inline();

   769 C2V_END

   770 

   771 C2V_VMENTRY(jboolean, shouldInlineMethod,(JNIEnv *, jobject, jobject jvmci_method))

   772   methodHandle method = CompilerToVM::asMethod(jvmci_method);

   773   return CompilerOracle::should_inline(method) || method->force_inline();

   774 C2V_END

   775 

   776 C2V_VMENTRY(jobject, lookupType, (JNIEnv*, jobject, jstring jname, jclass accessing_class, jboolean resolve))

   777   ResourceMark rm;

   778   Handle name(THREAD, JNIHandles::resolve(jname));

   779   Symbol* class_name = java_lang_String::as_symbol(name(), CHECK_0);

   780   if (java_lang_String::length(name()) <= 1) {

   781     THROW_MSG_0(vmSymbols::java_lang_InternalError(), err_msg("Primitive type %s should be handled in Java code", class_name->as_C_string()));

   782   }

   783 

   784   Klass* resolved_klass = NULL;

   785   if (JNIHandles::resolve(accessing_class) == NULL) {

   786     THROW_0(vmSymbols::java_lang_NullPointerException());

   787   }

   788   Klass* accessing_klass = java_lang_Class::as_Klass(JNIHandles::resolve(accessing_class));

   789   Handle class_loader(THREAD, accessing_klass->class_loader());

   790   Handle protection_domain(THREAD, accessing_klass->protection_domain());

   791 

   792   if (resolve) {

   793     resolved_klass = SystemDictionary::resolve_or_null(class_name, class_loader, protection_domain, CHECK_0);

   794   } else {

   795     if (class_name->byte_at(0) == 'L' &&

   796       class_name->byte_at(class_name->utf8_length()-1) == ';') {

   797       // This is a name from a signature.  Strip off the trimmings.

   798       // Call recursive to keep scope of strippedsym.

   799       TempNewSymbol strippedsym = SymbolTable::new_symbol(class_name->as_utf8()+1,

   800                                                           class_name->utf8_length()-2,

   801                                                           CHECK_0);

   802       resolved_klass = SystemDictionary::find(strippedsym, class_loader, protection_domain, CHECK_0);

   803     } else if (FieldType::is_array(class_name)) {

   804       FieldArrayInfo fd;

   805       // dimension and object_key in FieldArrayInfo are assigned as a side-effect

   806       // of this call

   807       BasicType t = FieldType::get_array_info(class_name, fd, CHECK_0);

   808       if (t == T_OBJECT) {

   809         TempNewSymbol strippedsym = SymbolTable::new_symbol(class_name->as_utf8()+1+fd.dimension(),

   810                                                             class_name->utf8_length()-2-fd.dimension(),

   811                                                             CHECK_0);

   812         // naked oop "k" is OK here -- we assign back into it

   813         resolved_klass = SystemDictionary::find(strippedsym,

   814                                                              class_loader,

   815                                                              protection_domain,

   816                                                              CHECK_0);

   817         if (resolved_klass != NULL) {

   818           resolved_klass = resolved_klass->array_klass(fd.dimension(), CHECK_0);

   819         }

   820       } else {

   821         resolved_klass = Universe::typeArrayKlassObj(t);

   822         resolved_klass = TypeArrayKlass::cast(resolved_klass)->array_klass(fd.dimension(), CHECK_0);

   823       }

   824     }

   825   }

   826   oop result = CompilerToVM::get_jvmci_type(resolved_klass, CHECK_NULL);

   827   return JNIHandles::make_local(THREAD, result);

   828 C2V_END

   829 

   830 C2V_VMENTRY(jobject, resolveConstantInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index))

   831   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   832   oop result = cp->resolve_constant_at(index, CHECK_NULL);

   833   return JNIHandles::make_local(THREAD, result);

   834 C2V_END

   835 

   836 C2V_VMENTRY(jobject, resolvePossiblyCachedConstantInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index))

   837   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   838   oop result = cp->resolve_possibly_cached_constant_at(index, CHECK_NULL);

   839   return JNIHandles::make_local(THREAD, result);

   840 C2V_END

   841 

   842 C2V_VMENTRY(jint, lookupNameAndTypeRefIndexInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index))

   843   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   844   return cp->name_and_type_ref_index_at(index);

   845 C2V_END

   846 

   847 C2V_VMENTRY(jobject, lookupNameInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint which))

   848   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   849   Handle sym = java_lang_String::create_from_symbol(cp->name_ref_at(which), CHECK_NULL);

   850   return JNIHandles::make_local(THREAD, sym());

   851 C2V_END

   852 

   853 C2V_VMENTRY(jobject, lookupSignatureInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint which))

   854   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   855   Handle sym = java_lang_String::create_from_symbol(cp->signature_ref_at(which), CHECK_NULL);

   856   return JNIHandles::make_local(THREAD, sym());

   857 C2V_END

   858 

   859 C2V_VMENTRY(jint, lookupKlassRefIndexInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index))

   860   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   861   return cp->klass_ref_index_at(index);

   862 C2V_END

   863 

   864 C2V_VMENTRY(jobject, resolveTypeInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index))

   865   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   866   Klass* resolved_klass = cp->klass_at(index, CHECK_NULL);

   867   oop klass = CompilerToVM::get_jvmci_type(resolved_klass, CHECK_NULL);

   868   return JNIHandles::make_local(THREAD, klass);

   869 C2V_END

   870 

   871 C2V_VMENTRY(jobject, lookupKlassInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index, jbyte opcode))

   872   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   873   Klass* loading_klass = cp->pool_holder();

   874   bool is_accessible = false;

   875   Klass* klass = JVMCIEnv::get_klass_by_index(cp, index, is_accessible, loading_klass);

   876   Symbol* symbol = NULL;

   877   if (klass == NULL) {

   878     symbol = cp->klass_name_at(index);

   879   }

   880   oop result_oop;

   881   if (klass != NULL) {

   882     result_oop = CompilerToVM::get_jvmci_type(klass, CHECK_NULL);

   883   } else {

   884     Handle result = java_lang_String::create_from_symbol(symbol, CHECK_NULL);

   885     result_oop = result();

   886   }

   887   return JNIHandles::make_local(THREAD, result_oop);

   888 C2V_END

   889 

   890 C2V_VMENTRY(jobject, lookupAppendixInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index))

   891   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   892   oop appendix_oop = ConstantPool::appendix_at_if_loaded(cp, index);

   893   return JNIHandles::make_local(THREAD, appendix_oop);

   894 C2V_END

   895 

   896 C2V_VMENTRY(jobject, lookupMethodInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index, jbyte opcode))

   897   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   898   InstanceKlass* pool_holder = cp->pool_holder();

   899   Bytecodes::Code bc = (Bytecodes::Code) (((int) opcode) & 0xFF);

   900   methodHandle method = JVMCIEnv::get_method_by_index(cp, index, bc, pool_holder);

   901   oop result = CompilerToVM::get_jvmci_method(method, CHECK_NULL);

   902   return JNIHandles::make_local(THREAD, result);

   903 C2V_END

   904 

   905 C2V_VMENTRY(jint, constantPoolRemapInstructionOperandFromCache, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index))

   906   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   907   return cp->remap_instruction_operand_from_cache(index);

   908 C2V_END

   909 

   910 C2V_VMENTRY(jobject, resolveFieldInPool, (JNIEnv*, jobject, jobject jvmci_constant_pool, jint index, jobject jvmci_method, jbyte opcode, jintArray info_handle))

   911   ResourceMark rm;

   912   constantPoolHandle cp = CompilerToVM::asConstantPool(jvmci_constant_pool);

   913   Bytecodes::Code code = (Bytecodes::Code)(((int) opcode) & 0xFF);

   914   fieldDescriptor fd;

   915   LinkInfo link_info(cp, index, (jvmci_method != NULL) ? CompilerToVM::asMethod(jvmci_method) : NULL, CHECK_0);

   916   LinkResolver::resolve_field(fd, link_info, Bytecodes::java_code(code), false, CHECK_0);

   917   typeArrayOop info = (typeArrayOop) JNIHandles::resolve(info_handle);

   918   if (info == NULL || info->length() != 3) {

   919     JVMCI_ERROR_NULL("info must not be null and have a length of 3");

   920   }

   921   info->int_at_put(0, fd.access_flags().as_int());

   922   info->int_at_put(1, fd.offset());

   923   info->int_at_put(2, fd.index());

   924   oop field_holder = CompilerToVM::get_jvmci_type(fd.field_holder(), CHECK_NULL);

   925   return JNIHandles::make_local(THREAD, field_holder);

   926 C2V_END

   927 

   928 C2V_VMENTRY(jint, getVtableIndexForInterfaceMethod, (JNIEnv *, jobject, jobject jvmci_type, jobject jvmci_method))

   929   ResourceMark rm;

   930   Klass* klass = CompilerToVM::asKlass(jvmci_type);

   931   Method* method = CompilerToVM::asMethod(jvmci_method);

   932   if (klass->is_interface()) {

   933     THROW_MSG_0(vmSymbols::java_lang_InternalError(), err_msg("Interface %s should be handled in Java code", klass->external_name()));

   934   }

   935   if (!method->method_holder()->is_interface()) {

   936     THROW_MSG_0(vmSymbols::java_lang_InternalError(), err_msg("Method %s is not held by an interface, this case should be handled in Java code", method->name_and_sig_as_C_string()));

   937   }

   938   if (!InstanceKlass::cast(klass)->is_linked()) {

   939     THROW_MSG_0(vmSymbols::java_lang_InternalError(), err_msg("Class %s must be linked", klass->external_name()));

   940   }

   941   return LinkResolver::vtable_index_of_interface_method(klass, method);

   942 C2V_END

   943 

   944 C2V_VMENTRY(jobject, resolveMethod, (JNIEnv *, jobject, jobject receiver_jvmci_type, jobject jvmci_method, jobject caller_jvmci_type))

   945   Klass* recv_klass = CompilerToVM::asKlass(receiver_jvmci_type);

   946   Klass* caller_klass = CompilerToVM::asKlass(caller_jvmci_type);

   947   methodHandle method = CompilerToVM::asMethod(jvmci_method);

   948 

   949   Klass* resolved     = method->method_holder();

   950   Symbol* h_name      = method->name();

   951   Symbol* h_signature = method->signature();

   952 

   953   if (MethodHandles::is_signature_polymorphic_method(method())) {

   954       // Signature polymorphic methods are already resolved, JVMCI just returns NULL in this case.

   955       return NULL;

   956   }

   957 

   958   LinkInfo link_info(resolved, h_name, h_signature, caller_klass);

   959   methodHandle m;

   960   // Only do exact lookup if receiver klass has been linked.  Otherwise,

   961   // the vtable has not been setup, and the LinkResolver will fail.

   962   if (recv_klass->is_array_klass() ||

   963       (InstanceKlass::cast(recv_klass)->is_linked() && !recv_klass->is_interface())) {

   964     if (resolved->is_interface()) {

   965       m = LinkResolver::resolve_interface_call_or_null(recv_klass, link_info);

   966     } else {

   967       m = LinkResolver::resolve_virtual_call_or_null(recv_klass, link_info);

   968     }

   969   }

   970 

   971   if (m.is_null()) {

   972     // Return NULL if there was a problem with lookup (uninitialized class, etc.)

   973     return NULL;

   974   }

   975 

   976   oop result = CompilerToVM::get_jvmci_method(m, CHECK_NULL);

   977   return JNIHandles::make_local(THREAD, result);

   978 C2V_END

   979 

   980 C2V_VMENTRY(jboolean, hasFinalizableSubclass,(JNIEnv *, jobject, jobject jvmci_type))

   981   Klass* klass = CompilerToVM::asKlass(jvmci_type);

   982   assert(klass != NULL, "method must not be called for primitive types");

   983   return Dependencies::find_finalizable_subclass(klass) != NULL;

   984 C2V_END

   985 

   986 C2V_VMENTRY(jobject, getClassInitializer, (JNIEnv *, jobject, jobject jvmci_type))

   987   InstanceKlass* klass = (InstanceKlass*) CompilerToVM::asKlass(jvmci_type);

   988   oop result = CompilerToVM::get_jvmci_method(klass->class_initializer(), CHECK_NULL);

   989   return JNIHandles::make_local(THREAD, result);

   990 C2V_END

   991 

   992 C2V_VMENTRY(jlong, getMaxCallTargetOffset, (JNIEnv*, jobject, jlong addr))

   993   address target_addr = (address) addr;

   994   if (target_addr != 0x0) {

   995     int64_t off_low = (int64_t)target_addr - ((int64_t)CodeCache::low_bound() + sizeof(int));

   996     int64_t off_high = (int64_t)target_addr - ((int64_t)CodeCache::high_bound() + sizeof(int));

   997     return MAX2(ABS(off_low), ABS(off_high));

   998   }

   999   return -1;

  1000 C2V_END

  1001 

  1002 C2V_VMENTRY(void, setNotInlineableOrCompileable,(JNIEnv *, jobject,  jobject jvmci_method))

  1003   methodHandle method = CompilerToVM::asMethod(jvmci_method);

  1004   method->set_not_c1_compilable();

  1005   method->set_not_c2_compilable();

  1006   method->set_dont_inline(true);

  1007 C2V_END

  1008 

  1009 C2V_VMENTRY(jint, installCode, (JNIEnv *jniEnv, jobject, jobject target, jobject compiled_code, jobject installed_code, jobject speculation_log))

  1010   ResourceMark rm;

  1011   HandleMark hm;

  1012   JNIHandleMark jni_hm;

  1013 

  1014   Handle target_handle(THREAD, JNIHandles::resolve(target));

  1015   Handle compiled_code_handle(THREAD, JNIHandles::resolve(compiled_code));

  1016   CodeBlob* cb = NULL;

  1017   Handle installed_code_handle(THREAD, JNIHandles::resolve(installed_code));

  1018   Handle speculation_log_handle(THREAD, JNIHandles::resolve(speculation_log));

  1019 

  1020   JVMCICompiler* compiler = JVMCICompiler::instance(CHECK_JNI_ERR);

  1021 

  1022   TraceTime install_time("installCode", JVMCICompiler::codeInstallTimer());

  1023   bool is_immutable_PIC = HotSpotCompiledCode::isImmutablePIC(compiled_code_handle) > 0;

  1024   CodeInstaller installer(is_immutable_PIC);

  1025   JVMCIEnv::CodeInstallResult result = installer.install(compiler, target_handle, compiled_code_handle, cb, installed_code_handle, speculation_log_handle, CHECK_0);

  1026 

  1027   if (PrintCodeCacheOnCompilation) {

  1028     stringStream s;

  1029     // Dump code cache  into a buffer before locking the tty,

  1030     {

  1031       MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag);

  1032       CodeCache::print_summary(&s, false);

  1033     }

  1034     ttyLocker ttyl;

  1035     tty->print_raw_cr(s.as_string());

  1036   }

  1037 

  1038   if (result != JVMCIEnv::ok) {

  1039     assert(cb == NULL, "should be");

  1040   } else {

  1041     if (!installed_code_handle.is_null()) {

  1042       assert(installed_code_handle->is_a(InstalledCode::klass()), "wrong type");

  1043       nmethod::invalidate_installed_code(installed_code_handle, CHECK_0);

  1044       {

  1045         // Ensure that all updates to the InstalledCode fields are consistent.

  1046         MutexLockerEx pl(Patching_lock, Mutex::_no_safepoint_check_flag);

  1047         InstalledCode::set_address(installed_code_handle, (jlong) cb);

  1048         InstalledCode::set_version(installed_code_handle, InstalledCode::version(installed_code_handle) + 1);

  1049         if (cb->is_nmethod()) {

  1050           InstalledCode::set_entryPoint(installed_code_handle, (jlong) cb->as_nmethod_or_null()->verified_entry_point());

  1051         } else {

  1052           InstalledCode::set_entryPoint(installed_code_handle, (jlong) cb->code_begin());

  1053         }

  1054         if (installed_code_handle->is_a(HotSpotInstalledCode::klass())) {

  1055           HotSpotInstalledCode::set_size(installed_code_handle, cb->size());

  1056           HotSpotInstalledCode::set_codeStart(installed_code_handle, (jlong) cb->code_begin());

  1057           HotSpotInstalledCode::set_codeSize(installed_code_handle, cb->code_size());

  1058         }

  1059       }

  1060       nmethod* nm = cb->as_nmethod_or_null();

  1061       if (nm != NULL && installed_code_handle->is_scavengable()) {

  1062         assert(nm->detect_scavenge_root_oops(), "nm should be scavengable if installed_code is scavengable");

  1063         if (!UseG1GC) {

  1064           assert(nm->on_scavenge_root_list(), "nm should be on scavengable list");

  1065         }

  1066       }

  1067     }

  1068   }

  1069   return result;

  1070 C2V_END

  1071 

  1072 C2V_VMENTRY(jint, getMetadata, (JNIEnv *jniEnv, jobject, jobject target, jobject compiled_code, jobject metadata))

  1073   ResourceMark rm;

  1074   HandleMark hm;

  1075 

  1076   Handle target_handle(THREAD, JNIHandles::resolve(target));

  1077   Handle compiled_code_handle(THREAD, JNIHandles::resolve(compiled_code));

  1078   Handle metadata_handle(THREAD, JNIHandles::resolve(metadata));

  1079 

  1080   CodeMetadata code_metadata;

  1081   CodeBlob *cb = NULL;

  1082   CodeInstaller installer(true /* immutable PIC compilation */);

  1083 

  1084   JVMCIEnv::CodeInstallResult result = installer.gather_metadata(target_handle, compiled_code_handle, code_metadata, CHECK_0);

  1085   if (result != JVMCIEnv::ok) {

  1086     return result;

  1087   }

  1088 

  1089   if (code_metadata.get_nr_pc_desc() > 0) {

  1090     typeArrayHandle pcArrayOop = oopFactory::new_byteArray_handle(sizeof(PcDesc) * code_metadata.get_nr_pc_desc(), CHECK_(JVMCIEnv::cache_full));

  1091     memcpy(pcArrayOop->byte_at_addr(0), code_metadata.get_pc_desc(), sizeof(PcDesc) * code_metadata.get_nr_pc_desc());

  1092     HotSpotMetaData::set_pcDescBytes(metadata_handle, pcArrayOop());

  1093   }

  1094 

  1095   if (code_metadata.get_scopes_size() > 0) {

  1096     typeArrayHandle scopesArrayOop = oopFactory::new_byteArray_handle(code_metadata.get_scopes_size(), CHECK_(JVMCIEnv::cache_full));

  1097     memcpy(scopesArrayOop->byte_at_addr(0), code_metadata.get_scopes_desc(), code_metadata.get_scopes_size());

  1098     HotSpotMetaData::set_scopesDescBytes(metadata_handle, scopesArrayOop());

  1099   }

  1100 

  1101   RelocBuffer* reloc_buffer = code_metadata.get_reloc_buffer();

  1102   typeArrayHandle relocArrayOop = oopFactory::new_byteArray_handle((int) reloc_buffer->size(), CHECK_(JVMCIEnv::cache_full));

  1103   if (reloc_buffer->size() > 0) {

  1104     memcpy(relocArrayOop->byte_at_addr(0), reloc_buffer->begin(), reloc_buffer->size());

  1105   }

  1106   HotSpotMetaData::set_relocBytes(metadata_handle, relocArrayOop());

  1107 

  1108   const OopMapSet* oopMapSet = installer.oopMapSet();

  1109   {

  1110     ResourceMark mark;

  1111     ImmutableOopMapBuilder builder(oopMapSet);

  1112     int oopmap_size = builder.heap_size();

  1113     typeArrayHandle oopMapArrayHandle = oopFactory::new_byteArray_handle(oopmap_size, CHECK_(JVMCIEnv::cache_full));

  1114     builder.generate_into((address) oopMapArrayHandle->byte_at_addr(0));

  1115     HotSpotMetaData::set_oopMaps(metadata_handle, oopMapArrayHandle());

  1116   }

  1117 

  1118   AOTOopRecorder* recorder = code_metadata.get_oop_recorder();

  1119 

  1120   int nr_meta_strings = recorder->nr_meta_strings();

  1121   objArrayOop metadataArray = oopFactory::new_objectArray(nr_meta_strings, CHECK_(JVMCIEnv::cache_full));

  1122   objArrayHandle metadataArrayHandle(THREAD, metadataArray);

  1123   for (int i = 0; i < nr_meta_strings; ++i) {

  1124     const char* element = recorder->meta_element(i);

  1125     Handle java_string = java_lang_String::create_from_str(element, CHECK_(JVMCIEnv::cache_full));

  1126     metadataArrayHandle->obj_at_put(i, java_string());

  1127   }

  1128   HotSpotMetaData::set_metadata(metadata_handle, metadataArrayHandle());

  1129 

  1130   ExceptionHandlerTable* handler = code_metadata.get_exception_table();

  1131   int table_size = handler->size_in_bytes();

  1132   typeArrayHandle exceptionArrayOop = oopFactory::new_byteArray_handle(table_size, CHECK_(JVMCIEnv::cache_full));

  1133 

  1134   if (table_size > 0) {