0
|
1 /*
|
|
2 * Copyright 1999-2005 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/_ciInstance.cpp.incl"
|
|
27
|
|
28 // ciInstance
|
|
29 //
|
|
30 // This class represents an instanceOop in the HotSpot virtual
|
|
31 // machine.
|
|
32
|
|
33 // ------------------------------------------------------------------
|
|
34 // ciObject::java_mirror_type
|
|
35 ciType* ciInstance::java_mirror_type() {
|
|
36 VM_ENTRY_MARK;
|
|
37 oop m = get_oop();
|
|
38 // Return NULL if it is not java.lang.Class.
|
1142
|
39 if (m == NULL || m->klass() != SystemDictionary::Class_klass()) {
|
0
|
40 return NULL;
|
|
41 }
|
|
42 // Return either a primitive type or a klass.
|
|
43 if (java_lang_Class::is_primitive(m)) {
|
|
44 return ciType::make(java_lang_Class::primitive_type(m));
|
|
45 } else {
|
|
46 klassOop k = java_lang_Class::as_klassOop(m);
|
|
47 assert(k != NULL, "");
|
|
48 return CURRENT_THREAD_ENV->get_object(k)->as_klass();
|
|
49 }
|
|
50 }
|
|
51
|
|
52 // ------------------------------------------------------------------
|
|
53 // ciInstance::field_value
|
|
54 //
|
|
55 // Constant value of a field.
|
|
56 ciConstant ciInstance::field_value(ciField* field) {
|
|
57 assert(is_loaded() &&
|
|
58 field->holder()->is_loaded() &&
|
|
59 klass()->is_subclass_of(field->holder()),
|
|
60 "invalid access");
|
|
61 VM_ENTRY_MARK;
|
|
62 ciConstant result;
|
|
63 oop obj = get_oop();
|
|
64 assert(obj != NULL, "bad oop");
|
|
65 BasicType field_btype = field->type()->basic_type();
|
|
66 int offset = field->offset();
|
|
67
|
|
68 switch(field_btype) {
|
|
69 case T_BYTE:
|
|
70 return ciConstant(field_btype, obj->byte_field(offset));
|
|
71 break;
|
|
72 case T_CHAR:
|
|
73 return ciConstant(field_btype, obj->char_field(offset));
|
|
74 break;
|
|
75 case T_SHORT:
|
|
76 return ciConstant(field_btype, obj->short_field(offset));
|
|
77 break;
|
|
78 case T_BOOLEAN:
|
|
79 return ciConstant(field_btype, obj->bool_field(offset));
|
|
80 break;
|
|
81 case T_INT:
|
|
82 return ciConstant(field_btype, obj->int_field(offset));
|
|
83 break;
|
|
84 case T_FLOAT:
|
|
85 return ciConstant(obj->float_field(offset));
|
|
86 break;
|
|
87 case T_DOUBLE:
|
|
88 return ciConstant(obj->double_field(offset));
|
|
89 break;
|
|
90 case T_LONG:
|
|
91 return ciConstant(obj->long_field(offset));
|
|
92 break;
|
|
93 case T_OBJECT:
|
|
94 case T_ARRAY:
|
|
95 {
|
|
96 oop o = obj->obj_field(offset);
|
|
97
|
|
98 // A field will be "constant" if it is known always to be
|
|
99 // a non-null reference to an instance of a particular class,
|
|
100 // or to a particular array. This can happen even if the instance
|
|
101 // or array is not perm. In such a case, an "unloaded" ciArray
|
|
102 // or ciInstance is created. The compiler may be able to use
|
|
103 // information about the object's class (which is exact) or length.
|
|
104
|
|
105 if (o == NULL) {
|
|
106 return ciConstant(field_btype, ciNullObject::make());
|
|
107 } else {
|
|
108 return ciConstant(field_btype, CURRENT_ENV->get_object(o));
|
|
109 }
|
|
110 }
|
|
111 }
|
|
112 ShouldNotReachHere();
|
|
113 // to shut up the compiler
|
|
114 return ciConstant();
|
|
115 }
|
|
116
|
|
117 // ------------------------------------------------------------------
|
|
118 // ciInstance::field_value_by_offset
|
|
119 //
|
|
120 // Constant value of a field at the specified offset.
|
|
121 ciConstant ciInstance::field_value_by_offset(int field_offset) {
|
|
122 ciInstanceKlass* ik = klass()->as_instance_klass();
|
|
123 ciField* field = ik->get_field_by_offset(field_offset, false);
|
|
124 return field_value(field);
|
|
125 }
|
|
126
|
|
127 // ------------------------------------------------------------------
|
|
128 // ciInstance::print_impl
|
|
129 //
|
|
130 // Implementation of the print method.
|
|
131 void ciInstance::print_impl(outputStream* st) {
|
|
132 st->print(" type=");
|
|
133 klass()->print(st);
|
|
134 }
|