Mercurial > hg > graal-jvmci-8
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 |