Wed, 03 Jul 2019 20:42:37 +0800
Merge
1 /*
2 * Copyright (c) 1999, 2013, Oracle and/or its affiliates. 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
25 #include "precompiled.hpp"
26 #include "ci/ciInstanceKlass.hpp"
27 #include "ci/ciObjArrayKlass.hpp"
28 #include "ci/ciSymbol.hpp"
29 #include "ci/ciUtilities.hpp"
30 #include "oops/objArrayKlass.hpp"
32 // ciObjArrayKlass
33 //
34 // This class represents a Klass* in the HotSpot virtual machine
35 // whose Klass part is an ObjArrayKlass.
37 // ------------------------------------------------------------------
38 // ciObjArrayKlass::ciObjArrayKlass
39 //
40 // Constructor for loaded object array klasses.
41 ciObjArrayKlass::ciObjArrayKlass(KlassHandle h_k) : ciArrayKlass(h_k) {
42 assert(get_Klass()->oop_is_objArray(), "wrong type");
43 Klass* element_Klass = get_ObjArrayKlass()->bottom_klass();
44 _base_element_klass = CURRENT_ENV->get_klass(element_Klass);
45 assert(_base_element_klass->is_instance_klass() ||
46 _base_element_klass->is_type_array_klass(), "bad base klass");
47 if (dimension() == 1) {
48 _element_klass = _base_element_klass;
49 } else {
50 _element_klass = NULL;
51 }
52 if (!ciObjectFactory::is_initialized()) {
53 assert(_element_klass->is_java_lang_Object(), "only arrays of object are shared");
54 }
55 }
57 // ------------------------------------------------------------------
58 // ciObjArrayKlass::ciObjArrayKlass
59 //
60 // Constructor for unloaded object array klasses.
61 ciObjArrayKlass::ciObjArrayKlass(ciSymbol* array_name,
62 ciKlass* base_element_klass,
63 int dimension)
64 : ciArrayKlass(array_name,
65 dimension, T_OBJECT) {
66 _base_element_klass = base_element_klass;
67 assert(_base_element_klass->is_instance_klass() ||
68 _base_element_klass->is_type_array_klass(), "bad base klass");
69 if (dimension == 1) {
70 _element_klass = base_element_klass;
71 } else {
72 _element_klass = NULL;
73 }
74 }
76 // ------------------------------------------------------------------
77 // ciObjArrayKlass::element_klass
78 //
79 // What is the one-level element type of this array?
80 ciKlass* ciObjArrayKlass::element_klass() {
81 if (_element_klass == NULL) {
82 assert(dimension() > 1, "_element_klass should not be NULL");
83 // Produce the element klass.
84 if (is_loaded()) {
85 VM_ENTRY_MARK;
86 Klass* element_Klass = get_ObjArrayKlass()->element_klass();
87 _element_klass = CURRENT_THREAD_ENV->get_klass(element_Klass);
88 } else {
89 VM_ENTRY_MARK;
90 // We are an unloaded array klass. Attempt to fetch our
91 // element klass by name.
92 _element_klass = CURRENT_THREAD_ENV->get_klass_by_name_impl(
93 this,
94 constantPoolHandle(),
95 construct_array_name(base_element_klass()->name(),
96 dimension() - 1),
97 false);
98 }
99 }
100 return _element_klass;
101 }
103 // ------------------------------------------------------------------
104 // ciObjArrayKlass::construct_array_name
105 //
106 // Build an array name from an element name and a dimension.
107 ciSymbol* ciObjArrayKlass::construct_array_name(ciSymbol* element_name,
108 int dimension) {
109 EXCEPTION_CONTEXT;
110 int element_len = element_name->utf8_length();
112 Symbol* base_name_sym = element_name->get_symbol();
113 char* name;
115 if (base_name_sym->byte_at(0) == '[' ||
116 (base_name_sym->byte_at(0) == 'L' && // watch package name 'Lxx'
117 base_name_sym->byte_at(element_len-1) == ';')) {
119 int new_len = element_len + dimension + 1; // for the ['s and '\0'
120 name = CURRENT_THREAD_ENV->name_buffer(new_len);
122 int pos = 0;
123 for ( ; pos < dimension; pos++) {
124 name[pos] = '[';
125 }
126 strncpy(name+pos, (char*)element_name->base(), element_len);
127 name[new_len-1] = '\0';
128 } else {
129 int new_len = 3 // for L, ;, and '\0'
130 + dimension // for ['s
131 + element_len;
133 name = CURRENT_THREAD_ENV->name_buffer(new_len);
134 int pos = 0;
135 for ( ; pos < dimension; pos++) {
136 name[pos] = '[';
137 }
138 name[pos++] = 'L';
139 strncpy(name+pos, (char*)element_name->base(), element_len);
140 name[new_len-2] = ';';
141 name[new_len-1] = '\0';
142 }
143 return ciSymbol::make(name);
144 }
146 // ------------------------------------------------------------------
147 // ciObjArrayKlass::make_impl
148 //
149 // Implementation of make.
150 ciObjArrayKlass* ciObjArrayKlass::make_impl(ciKlass* element_klass) {
152 if (element_klass->is_loaded()) {
153 EXCEPTION_CONTEXT;
154 // The element klass is loaded
155 Klass* array = element_klass->get_Klass()->array_klass(THREAD);
156 if (HAS_PENDING_EXCEPTION) {
157 CLEAR_PENDING_EXCEPTION;
158 CURRENT_THREAD_ENV->record_out_of_memory_failure();
159 return ciEnv::unloaded_ciobjarrayklass();
160 }
161 return CURRENT_THREAD_ENV->get_obj_array_klass(array);
162 }
164 // The array klass was unable to be made or the element klass was
165 // not loaded.
166 ciSymbol* array_name = construct_array_name(element_klass->name(), 1);
167 if (array_name == ciEnv::unloaded_cisymbol()) {
168 return ciEnv::unloaded_ciobjarrayklass();
169 }
170 return
171 CURRENT_ENV->get_unloaded_klass(element_klass, array_name)
172 ->as_obj_array_klass();
173 }
175 // ------------------------------------------------------------------
176 // ciObjArrayKlass::make
177 //
178 // Make an array klass corresponding to the specified primitive type.
179 ciObjArrayKlass* ciObjArrayKlass::make(ciKlass* element_klass) {
180 GUARDED_VM_ENTRY(return make_impl(element_klass);)
181 }
183 ciKlass* ciObjArrayKlass::exact_klass() {
184 ciType* base = base_element_type();
185 if (base->is_instance_klass()) {
186 ciInstanceKlass* ik = base->as_instance_klass();
187 if (ik->exact_klass() != NULL) {
188 return this;
189 }
190 } else if (base->is_primitive_type()) {
191 return this;
192 }
193 return NULL;
194 }