comparison src/share/vm/jvmci/jvmciCompilerToVM.cpp @ 23740:724fbad94ee3

expose Hotspot intrinsics and HotSpotIntrinsicCandidate info to JVMCI compilers (JDK-8164358)
author Doug Simon <doug.simon@oracle.com>
date Tue, 23 Aug 2016 22:46:08 +0200
parents 2e17c65dddd7
children 6542cd8da2da
comparison
equal deleted inserted replaced
23739:8e907980771e 23740:724fbad94ee3
203 203
204 #undef SET_TRIGFUNC 204 #undef SET_TRIGFUNC
205 } 205 }
206 206
207 C2V_VMENTRY(jobjectArray, readConfiguration, (JNIEnv *env)) 207 C2V_VMENTRY(jobjectArray, readConfiguration, (JNIEnv *env))
208 #define BOXED_INT(name, value) oop name; do { jvalue p; p.j = (jint) (value); name = java_lang_boxing_object::create(T_INT, &p, CHECK_NULL);} while(0)
208 #define BOXED_LONG(name, value) oop name; do { jvalue p; p.j = (jlong) (value); name = java_lang_boxing_object::create(T_LONG, &p, CHECK_NULL);} while(0) 209 #define BOXED_LONG(name, value) oop name; do { jvalue p; p.j = (jlong) (value); name = java_lang_boxing_object::create(T_LONG, &p, CHECK_NULL);} while(0)
209 #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) 210 #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)
210 ResourceMark rm; 211 ResourceMark rm;
211 HandleMark hm; 212 HandleMark hm;
212 213
213 CompilerToVM::Data::initialize(CHECK_NULL); 214 CompilerToVM::Data::initialize(CHECK_NULL);
214 215
215 VMField::klass()->initialize(thread); 216 VMField::klass()->initialize(CHECK_NULL);
216 VMFlag::klass()->initialize(thread); 217 VMFlag::klass()->initialize(CHECK_NULL);
218 VMIntrinsicMethod::klass()->initialize(CHECK_NULL);
217 219
218 int len = VMStructs::localHotSpotVMStructs_count(); 220 int len = VMStructs::localHotSpotVMStructs_count();
219 objArrayHandle vmFields = oopFactory::new_objArray(VMField::klass(), len, CHECK_NULL); 221 objArrayHandle vmFields = oopFactory::new_objArray(VMField::klass(), len, CHECK_NULL);
220 for (int i = 0; i < len ; i++) { 222 for (int i = 0; i < len ; i++) {
221 VMStructEntry vmField = VMStructs::localHotSpotVMStructs[i]; 223 VMStructEntry vmField = VMStructs::localHotSpotVMStructs[i];
222 instanceHandle vmFieldObj = InstanceKlass::cast(VMField::klass())->allocate_instance_handle(CHECK_NULL); 224 instanceHandle vmFieldObj = InstanceKlass::cast(VMField::klass())->allocate_instance_handle(CHECK_NULL);
223 int name_buf_len = strlen(vmField.typeName) + strlen(vmField.fieldName) + 2 /* "::" */; 225 size_t name_buf_len = strlen(vmField.typeName) + strlen(vmField.fieldName) + 2 /* "::" */;
224 char* name_buf = NEW_RESOURCE_ARRAY(char, name_buf_len + 1); 226 char* name_buf = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, name_buf_len + 1);
225 sprintf(name_buf, "%s::%s", vmField.typeName, vmField.fieldName); 227 sprintf(name_buf, "%s::%s", vmField.typeName, vmField.fieldName);
226 Handle name = java_lang_String::create_from_str(name_buf, CHECK_NULL); 228 Handle name = java_lang_String::create_from_str(name_buf, CHECK_NULL);
227 Handle type = java_lang_String::create_from_str(vmField.typeString, CHECK_NULL); 229 Handle type = java_lang_String::create_from_str(vmField.typeString, CHECK_NULL);
228 VMField::set_name(vmFieldObj, name()); 230 VMField::set_name(vmFieldObj, name());
229 VMField::set_type(vmFieldObj, type()); 231 VMField::set_type(vmFieldObj, type());
293 vmAddresses->obj_at_put(i * 2, name()); 295 vmAddresses->obj_at_put(i * 2, name());
294 vmAddresses->obj_at_put(i * 2 + 1, value); 296 vmAddresses->obj_at_put(i * 2 + 1, value);
295 } 297 }
296 298
297 // The last entry is the null entry. 299 // The last entry is the null entry.
298 len = Flag::numFlags - 1; 300 len = (int) Flag::numFlags - 1;
299 objArrayHandle vmFlags = oopFactory::new_objArray(VMFlag::klass(), len, CHECK_NULL); 301 objArrayHandle vmFlags = oopFactory::new_objArray(VMFlag::klass(), len, CHECK_NULL);
300 for (int i = 0; i < len; i++) { 302 for (int i = 0; i < len; i++) {
301 Flag* flag = &Flag::flags[i]; 303 Flag* flag = &Flag::flags[i];
302 instanceHandle vmFlagObj = InstanceKlass::cast(VMFlag::klass())->allocate_instance_handle(CHECK_NULL); 304 instanceHandle vmFlagObj = InstanceKlass::cast(VMFlag::klass())->allocate_instance_handle(CHECK_NULL);
303 Handle name = java_lang_String::create_from_str(flag->_name, CHECK_NULL); 305 Handle name = java_lang_String::create_from_str(flag->_name, CHECK_NULL);
326 JVMCI_ERROR_NULL("VM flag %s has unsupported type %s", flag->_name, flag->_type); 328 JVMCI_ERROR_NULL("VM flag %s has unsupported type %s", flag->_name, flag->_type);
327 } 329 }
328 vmFlags->obj_at_put(i, vmFlagObj()); 330 vmFlags->obj_at_put(i, vmFlagObj());
329 } 331 }
330 332
331 objArrayOop data = oopFactory::new_objArray(SystemDictionary::Object_klass(), 5, CHECK_NULL); 333 objArrayHandle vmIntrinsics = oopFactory::new_objArray(VMIntrinsicMethod::klass(), (vmIntrinsics::ID_LIMIT - 1), CHECK_NULL);
334 int index = 0;
335 // The intrinsics for a class are usually adjacent to each other.
336 // When they are, the string for the class name can be reused.
337 vmSymbols::SID kls_sid = vmSymbols::NO_SID;
338 Handle kls_str;
339 #define SID_ENUM(n) vmSymbols::VM_SYMBOL_ENUM_NAME(n)
340 #define VM_SYMBOL_TO_STRING(s) \
341 java_lang_String::create_from_symbol(vmSymbols::symbol_at(SID_ENUM(s)), THREAD)
342 #define VM_INTRINSIC_INFO(id, kls, name, sig, ignore_fcode) { \
343 instanceHandle vmIntrinsicMethod = InstanceKlass::cast(VMIntrinsicMethod::klass())->allocate_instance_handle(CHECK_NULL); \
344 if (kls_sid != SID_ENUM(kls)) { \
345 kls_str = VM_SYMBOL_TO_STRING(kls); \
346 kls_sid = SID_ENUM(kls); \
347 } \
348 Handle name_str = VM_SYMBOL_TO_STRING(name); \
349 Handle sig_str = VM_SYMBOL_TO_STRING(sig); \
350 VMIntrinsicMethod::set_declaringClass(vmIntrinsicMethod, kls_str()); \
351 VMIntrinsicMethod::set_name(vmIntrinsicMethod, name_str()); \
352 VMIntrinsicMethod::set_descriptor(vmIntrinsicMethod, sig_str()); \
353 VMIntrinsicMethod::set_id(vmIntrinsicMethod, vmIntrinsics::id); \
354 vmIntrinsics->obj_at_put(index++, vmIntrinsicMethod()); \
355 }
356
357 VM_INTRINSICS_DO(VM_INTRINSIC_INFO, VM_SYMBOL_IGNORE, VM_SYMBOL_IGNORE, VM_SYMBOL_IGNORE, VM_ALIAS_IGNORE)
358 #undef VM_INTRINSIC_SYMBOL
359 #undef VM_INTRINSIC_INFO
360 assert(index == vmIntrinsics::ID_LIMIT - 1, "must be");
361
362 objArrayOop data = oopFactory::new_objArray(SystemDictionary::Object_klass(), 6, CHECK_NULL);
332 data->obj_at_put(0, vmFields()); 363 data->obj_at_put(0, vmFields());
333 data->obj_at_put(1, vmTypes()); 364 data->obj_at_put(1, vmTypes());
334 data->obj_at_put(2, vmConstants()); 365 data->obj_at_put(2, vmConstants());
335 data->obj_at_put(3, vmAddresses()); 366 data->obj_at_put(3, vmAddresses());
336 data->obj_at_put(4, vmFlags()); 367 data->obj_at_put(4, vmFlags());
368 data->obj_at_put(5, vmIntrinsics());
337 369
338 return (jobjectArray) JNIHandles::make_local(THREAD, data); 370 return (jobjectArray) JNIHandles::make_local(THREAD, data);
339 #undef BOXED_LONG 371 #undef BOXED_LONG
340 #undef BOXED_DOUBLE 372 #undef BOXED_DOUBLE
341 C2V_END 373 C2V_END