53 Klass* k = java_lang_Class::as_Klass(m);
54 assert(k != NULL, "");
55 return CURRENT_THREAD_ENV->get_klass(k);
56 }
57 }
58
59 // ------------------------------------------------------------------
60 // ciInstance::field_value_impl
61 ciConstant ciInstance::field_value_impl(BasicType field_btype, int offset) {
62 oop obj = get_oop();
63 assert(obj != NULL, "bad oop");
64 switch(field_btype) {
65 case T_BYTE: return ciConstant(field_btype, obj->byte_field(offset));
66 case T_CHAR: return ciConstant(field_btype, obj->char_field(offset));
67 case T_SHORT: return ciConstant(field_btype, obj->short_field(offset));
68 case T_BOOLEAN: return ciConstant(field_btype, obj->bool_field(offset));
69 case T_INT: return ciConstant(field_btype, obj->int_field(offset));
70 case T_FLOAT: return ciConstant(obj->float_field(offset));
71 case T_DOUBLE: return ciConstant(obj->double_field(offset));
72 case T_LONG: return ciConstant(obj->long_field(offset));
73 case T_OBJECT: // fall through
74 case T_ARRAY: {
75 oop o = obj->obj_field(offset);
76
77 // A field will be "constant" if it is known always to be
78 // a non-null reference to an instance of a particular class,
79 // or to a particular array. This can happen even if the instance
80 // or array is not perm. In such a case, an "unloaded" ciArray
81 // or ciInstance is created. The compiler may be able to use
82 // information about the object's class (which is exact) or length.
83
84 if (o == NULL) {
85 return ciConstant(field_btype, ciNullObject::make());
86 } else {
87 return ciConstant(field_btype, CURRENT_ENV->get_object(o));
88 }
89 }
90 default:
91 fatal("no field value: %s", type2name(field_btype));
92 return ciConstant();
93 }
94 }
95
96 // ------------------------------------------------------------------
97 // ciInstance::field_value
98 //
99 // Constant value of a field.
100 ciConstant ciInstance::field_value(ciField* field) {
101 assert(is_loaded(), "invalid access - must be loaded");
102 assert(field->holder()->is_loaded(), "invalid access - holder must be loaded");
103 assert(field->is_static() || klass()->is_subclass_of(field->holder()), "invalid access - must be subclass");
104
105 GUARDED_VM_ENTRY(return field_value_impl(field->type()->basic_type(), field->offset());)
106 }
107
108 // ------------------------------------------------------------------
109 // ciInstance::field_value_by_offset
110 //
111 // Constant value of a field at the specified offset.
112 ciConstant ciInstance::field_value_by_offset(int field_offset) {
113 ciInstanceKlass* ik = klass()->as_instance_klass();
114 ciField* field = ik->get_field_by_offset(field_offset, false);
115 if (field == NULL)
116 return ciConstant(); // T_ILLEGAL
117 return field_value(field);
118 }
119
120 // ------------------------------------------------------------------
121 // ciInstance::print_impl
122 //
123 // Implementation of the print method.
|
53 Klass* k = java_lang_Class::as_Klass(m);
54 assert(k != NULL, "");
55 return CURRENT_THREAD_ENV->get_klass(k);
56 }
57 }
58
59 // ------------------------------------------------------------------
60 // ciInstance::field_value_impl
61 ciConstant ciInstance::field_value_impl(BasicType field_btype, int offset) {
62 oop obj = get_oop();
63 assert(obj != NULL, "bad oop");
64 switch(field_btype) {
65 case T_BYTE: return ciConstant(field_btype, obj->byte_field(offset));
66 case T_CHAR: return ciConstant(field_btype, obj->char_field(offset));
67 case T_SHORT: return ciConstant(field_btype, obj->short_field(offset));
68 case T_BOOLEAN: return ciConstant(field_btype, obj->bool_field(offset));
69 case T_INT: return ciConstant(field_btype, obj->int_field(offset));
70 case T_FLOAT: return ciConstant(obj->float_field(offset));
71 case T_DOUBLE: return ciConstant(obj->double_field(offset));
72 case T_LONG: return ciConstant(obj->long_field(offset));
73 case T_VALUETYPE: // fall through
74 case T_OBJECT: // fall through
75 case T_ARRAY: {
76 oop o = obj->obj_field(offset);
77
78 // A field will be "constant" if it is known always to be
79 // a non-null reference to an instance of a particular class,
80 // or to a particular array. This can happen even if the instance
81 // or array is not perm. In such a case, an "unloaded" ciArray
82 // or ciInstance is created. The compiler may be able to use
83 // information about the object's class (which is exact) or length.
84
85 if (o == NULL) {
86 return ciConstant(field_btype, ciNullObject::make());
87 } else {
88 return ciConstant(field_btype, CURRENT_ENV->get_object(o));
89 }
90 }
91 default:
92 fatal("no field value: %s", type2name(field_btype));
93 return ciConstant();
94 }
95 }
96
97 // ------------------------------------------------------------------
98 // ciInstance::field_value
99 //
100 // Constant value of a field.
101 ciConstant ciInstance::field_value(ciField* field) {
102 assert(is_loaded(), "invalid access - must be loaded");
103 assert(field->holder()->is_loaded(), "invalid access - holder must be loaded");
104 assert(field->is_static() || field->holder()->is_valuetype() || klass()->is_subclass_of(field->holder()),
105 "invalid access - must be subclass");
106
107 GUARDED_VM_ENTRY(return field_value_impl(field->type()->basic_type(), field->offset());)
108 }
109
110 // ------------------------------------------------------------------
111 // ciInstance::field_value_by_offset
112 //
113 // Constant value of a field at the specified offset.
114 ciConstant ciInstance::field_value_by_offset(int field_offset) {
115 ciInstanceKlass* ik = klass()->as_instance_klass();
116 ciField* field = ik->get_field_by_offset(field_offset, false);
117 if (field == NULL)
118 return ciConstant(); // T_ILLEGAL
119 return field_value(field);
120 }
121
122 // ------------------------------------------------------------------
123 // ciInstance::print_impl
124 //
125 // Implementation of the print method.
|