Mercurial > hg > truffle
comparison src/share/vm/ci/ciField.cpp @ 0:a61af66fc99e jdk7-b24
Initial load
author | duke |
---|---|
date | Sat, 01 Dec 2007 00:00:00 +0000 |
parents | |
children | dd57230ba8fe |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:a61af66fc99e |
---|---|
1 /* | |
2 * Copyright 1999-2007 Sun Microsystems, Inc. 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 Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, | |
20 * CA 95054 USA or visit www.sun.com if you need additional information or | |
21 * have any questions. | |
22 * | |
23 */ | |
24 | |
25 #include "incls/_precompiled.incl" | |
26 #include "incls/_ciField.cpp.incl" | |
27 | |
28 // ciField | |
29 // | |
30 // This class represents the result of a field lookup in the VM. | |
31 // The lookup may not succeed, in which case the information in | |
32 // the ciField will be incomplete. | |
33 | |
34 // The ciObjectFactory cannot create circular data structures in one query. | |
35 // To avoid vicious circularities, we initialize ciField::_type to NULL | |
36 // for reference types and derive it lazily from the ciField::_signature. | |
37 // Primitive types are eagerly initialized, and basic layout queries | |
38 // can succeed without initialization, using only the BasicType of the field. | |
39 | |
40 // Notes on bootstrapping and shared CI objects: A field is shared if and | |
41 // only if it is (a) non-static and (b) declared by a shared instance klass. | |
42 // This allows non-static field lists to be cached on shared types. | |
43 // Because the _type field is lazily initialized, however, there is a | |
44 // special restriction that a shared field cannot cache an unshared type. | |
45 // This puts a small performance penalty on shared fields with unshared | |
46 // types, such as StackTraceElement[] Throwable.stackTrace. | |
47 // (Throwable is shared because ClassCastException is shared, but | |
48 // StackTraceElement is not presently shared.) | |
49 | |
50 // It is not a vicious circularity for a ciField to recursively create | |
51 // the ciSymbols necessary to represent its name and signature. | |
52 // Therefore, these items are created eagerly, and the name and signature | |
53 // of a shared field are themselves shared symbols. This somewhat | |
54 // pollutes the set of shared CI objects: It grows from 50 to 93 items, | |
55 // with all of the additional 43 being uninteresting shared ciSymbols. | |
56 // This adds at most one step to the binary search, an amount which | |
57 // decreases for complex compilation tasks. | |
58 | |
59 // ------------------------------------------------------------------ | |
60 // ciField::ciField | |
61 ciField::ciField(ciInstanceKlass* klass, int index): _known_to_link_with(NULL) { | |
62 ASSERT_IN_VM; | |
63 CompilerThread *thread = CompilerThread::current(); | |
64 | |
65 assert(ciObjectFactory::is_initialized(), "not a shared field"); | |
66 | |
67 assert(klass->get_instanceKlass()->is_linked(), "must be linked before using its constan-pool"); | |
68 | |
69 _cp_index = index; | |
70 constantPoolHandle cpool(thread, klass->get_instanceKlass()->constants()); | |
71 | |
72 // Get the field's name, signature, and type. | |
73 symbolHandle name (thread, cpool->name_ref_at(index)); | |
74 _name = ciEnv::current(thread)->get_object(name())->as_symbol(); | |
75 | |
76 int nt_index = cpool->name_and_type_ref_index_at(index); | |
77 int sig_index = cpool->signature_ref_index_at(nt_index); | |
78 symbolHandle signature (thread, cpool->symbol_at(sig_index)); | |
79 _signature = ciEnv::current(thread)->get_object(signature())->as_symbol(); | |
80 | |
81 BasicType field_type = FieldType::basic_type(signature()); | |
82 | |
83 // If the field is a pointer type, get the klass of the | |
84 // field. | |
85 if (field_type == T_OBJECT || field_type == T_ARRAY) { | |
86 bool ignore; | |
87 // This is not really a class reference; the index always refers to the | |
88 // field's type signature, as a symbol. Linkage checks do not apply. | |
89 _type = ciEnv::current(thread)->get_klass_by_index(klass, sig_index, ignore); | |
90 } else { | |
91 _type = ciType::make(field_type); | |
92 } | |
93 | |
94 _name = (ciSymbol*)ciEnv::current(thread)->get_object(name()); | |
95 | |
96 // Get the field's declared holder. | |
97 // | |
98 // Note: we actually create a ciInstanceKlass for this klass, | |
99 // even though we may not need to. | |
100 int holder_index = cpool->klass_ref_index_at(index); | |
101 bool holder_is_accessible; | |
102 ciInstanceKlass* declared_holder = | |
103 ciEnv::current(thread)->get_klass_by_index(klass, holder_index, | |
104 holder_is_accessible) | |
105 ->as_instance_klass(); | |
106 | |
107 // The declared holder of this field may not have been loaded. | |
108 // Bail out with partial field information. | |
109 if (!holder_is_accessible) { | |
110 // _cp_index and _type have already been set. | |
111 // The default values for _flags and _constant_value will suffice. | |
112 // We need values for _holder, _offset, and _is_constant, | |
113 _holder = declared_holder; | |
114 _offset = -1; | |
115 _is_constant = false; | |
116 return; | |
117 } | |
118 | |
119 instanceKlass* loaded_decl_holder = declared_holder->get_instanceKlass(); | |
120 | |
121 // Perform the field lookup. | |
122 fieldDescriptor field_desc; | |
123 klassOop canonical_holder = | |
124 loaded_decl_holder->find_field(name(), signature(), &field_desc); | |
125 if (canonical_holder == NULL) { | |
126 // Field lookup failed. Will be detected by will_link. | |
127 _holder = declared_holder; | |
128 _offset = -1; | |
129 _is_constant = false; | |
130 return; | |
131 } | |
132 | |
133 assert(canonical_holder == field_desc.field_holder(), "just checking"); | |
134 initialize_from(&field_desc); | |
135 } | |
136 | |
137 ciField::ciField(fieldDescriptor *fd): _known_to_link_with(NULL) { | |
138 ASSERT_IN_VM; | |
139 | |
140 _cp_index = -1; | |
141 | |
142 // Get the field's name, signature, and type. | |
143 ciEnv* env = CURRENT_ENV; | |
144 _name = env->get_object(fd->name())->as_symbol(); | |
145 _signature = env->get_object(fd->signature())->as_symbol(); | |
146 | |
147 BasicType field_type = fd->field_type(); | |
148 | |
149 // If the field is a pointer type, get the klass of the | |
150 // field. | |
151 if (field_type == T_OBJECT || field_type == T_ARRAY) { | |
152 _type = NULL; // must call compute_type on first access | |
153 } else { | |
154 _type = ciType::make(field_type); | |
155 } | |
156 | |
157 initialize_from(fd); | |
158 | |
159 // Either (a) it is marked shared, or else (b) we are done bootstrapping. | |
160 assert(is_shared() || ciObjectFactory::is_initialized(), | |
161 "bootstrap classes must not create & cache unshared fields"); | |
162 } | |
163 | |
164 void ciField::initialize_from(fieldDescriptor* fd) { | |
165 // Get the flags, offset, and canonical holder of the field. | |
166 _flags = ciFlags(fd->access_flags()); | |
167 _offset = fd->offset(); | |
168 _holder = CURRENT_ENV->get_object(fd->field_holder())->as_instance_klass(); | |
169 | |
170 // Check to see if the field is constant. | |
171 if (_holder->is_initialized() && | |
172 this->is_final() && this->is_static()) { | |
173 // This field just may be constant. The only cases where it will | |
174 // not be constant are: | |
175 // | |
176 // 1. The field holds a non-perm-space oop. The field is, strictly | |
177 // speaking, constant but we cannot embed non-perm-space oops into | |
178 // generated code. For the time being we need to consider the | |
179 // field to be not constant. | |
180 // 2. The field is a *special* static&final field whose value | |
181 // may change. The three examples are java.lang.System.in, | |
182 // java.lang.System.out, and java.lang.System.err. | |
183 | |
184 klassOop k = _holder->get_klassOop(); | |
185 assert( SystemDictionary::system_klass() != NULL, "Check once per vm"); | |
186 if( k == SystemDictionary::system_klass() ) { | |
187 // Check offsets for case 2: System.in, System.out, or System.err | |
188 if( _offset == java_lang_System::in_offset_in_bytes() || | |
189 _offset == java_lang_System::out_offset_in_bytes() || | |
190 _offset == java_lang_System::err_offset_in_bytes() ) { | |
191 _is_constant = false; | |
192 return; | |
193 } | |
194 } | |
195 | |
196 _is_constant = true; | |
197 switch(type()->basic_type()) { | |
198 case T_BYTE: | |
199 _constant_value = ciConstant(type()->basic_type(), k->byte_field(_offset)); | |
200 break; | |
201 case T_CHAR: | |
202 _constant_value = ciConstant(type()->basic_type(), k->char_field(_offset)); | |
203 break; | |
204 case T_SHORT: | |
205 _constant_value = ciConstant(type()->basic_type(), k->short_field(_offset)); | |
206 break; | |
207 case T_BOOLEAN: | |
208 _constant_value = ciConstant(type()->basic_type(), k->bool_field(_offset)); | |
209 break; | |
210 case T_INT: | |
211 _constant_value = ciConstant(type()->basic_type(), k->int_field(_offset)); | |
212 break; | |
213 case T_FLOAT: | |
214 _constant_value = ciConstant(k->float_field(_offset)); | |
215 break; | |
216 case T_DOUBLE: | |
217 _constant_value = ciConstant(k->double_field(_offset)); | |
218 break; | |
219 case T_LONG: | |
220 _constant_value = ciConstant(k->long_field(_offset)); | |
221 break; | |
222 case T_OBJECT: | |
223 case T_ARRAY: | |
224 { | |
225 oop o = k->obj_field(_offset); | |
226 | |
227 // A field will be "constant" if it is known always to be | |
228 // a non-null reference to an instance of a particular class, | |
229 // or to a particular array. This can happen even if the instance | |
230 // or array is not perm. In such a case, an "unloaded" ciArray | |
231 // or ciInstance is created. The compiler may be able to use | |
232 // information about the object's class (which is exact) or length. | |
233 | |
234 if (o == NULL) { | |
235 _constant_value = ciConstant(type()->basic_type(), ciNullObject::make()); | |
236 } else { | |
237 _constant_value = ciConstant(type()->basic_type(), CURRENT_ENV->get_object(o)); | |
238 assert(_constant_value.as_object() == CURRENT_ENV->get_object(o), "check interning"); | |
239 } | |
240 } | |
241 } | |
242 } else { | |
243 _is_constant = false; | |
244 } | |
245 } | |
246 | |
247 // ------------------------------------------------------------------ | |
248 // ciField::compute_type | |
249 // | |
250 // Lazily compute the type, if it is an instance klass. | |
251 ciType* ciField::compute_type() { | |
252 GUARDED_VM_ENTRY(return compute_type_impl();) | |
253 } | |
254 | |
255 ciType* ciField::compute_type_impl() { | |
256 ciKlass* type = CURRENT_ENV->get_klass_by_name_impl(_holder, _signature, false); | |
257 if (!type->is_primitive_type() && is_shared()) { | |
258 // We must not cache a pointer to an unshared type, in a shared field. | |
259 bool type_is_also_shared = false; | |
260 if (type->is_type_array_klass()) { | |
261 type_is_also_shared = true; // int[] etc. are explicitly bootstrapped | |
262 } else if (type->is_instance_klass()) { | |
263 type_is_also_shared = type->as_instance_klass()->is_shared(); | |
264 } else { | |
265 // Currently there is no 'shared' query for array types. | |
266 type_is_also_shared = !ciObjectFactory::is_initialized(); | |
267 } | |
268 if (!type_is_also_shared) | |
269 return type; // Bummer. | |
270 } | |
271 _type = type; | |
272 return type; | |
273 } | |
274 | |
275 | |
276 // ------------------------------------------------------------------ | |
277 // ciField::will_link | |
278 // | |
279 // Can a specific access to this field be made without causing | |
280 // link errors? | |
281 bool ciField::will_link(ciInstanceKlass* accessing_klass, | |
282 Bytecodes::Code bc) { | |
283 VM_ENTRY_MARK; | |
284 if (_offset == -1) { | |
285 // at creation we couldn't link to our holder so we need to | |
286 // maintain that stance, otherwise there's no safe way to use this | |
287 // ciField. | |
288 return false; | |
289 } | |
290 | |
291 if (_known_to_link_with == accessing_klass) { | |
292 return true; | |
293 } | |
294 | |
295 FieldAccessInfo result; | |
296 constantPoolHandle c_pool(THREAD, | |
297 accessing_klass->get_instanceKlass()->constants()); | |
298 LinkResolver::resolve_field(result, c_pool, _cp_index, | |
299 Bytecodes::java_code(bc), | |
300 true, false, KILL_COMPILE_ON_FATAL_(false)); | |
301 | |
302 // update the hit-cache, unless there is a problem with memory scoping: | |
303 if (accessing_klass->is_shared() || !is_shared()) | |
304 _known_to_link_with = accessing_klass; | |
305 | |
306 return true; | |
307 } | |
308 | |
309 // ------------------------------------------------------------------ | |
310 // ciField::print | |
311 void ciField::print() { | |
312 tty->print("<ciField "); | |
313 _holder->print_name(); | |
314 tty->print("."); | |
315 _name->print_symbol(); | |
316 tty->print(" offset=%d type=", _offset); | |
317 if (_type != NULL) _type->print_name(); | |
318 else tty->print("(reference)"); | |
319 tty->print(" is_constant=%s", bool_to_str(_is_constant)); | |
320 if (_is_constant) { | |
321 tty->print(" constant_value="); | |
322 _constant_value.print(); | |
323 } | |
324 tty->print(">"); | |
325 } | |
326 | |
327 // ------------------------------------------------------------------ | |
328 // ciField::print_name_on | |
329 // | |
330 // Print the name of this field | |
331 void ciField::print_name_on(outputStream* st) { | |
332 name()->print_symbol_on(st); | |
333 } |