Thu, 23 Jun 2011 17:14:06 -0700
7056328: JSR 292 invocation sometimes fails in adapters for types not on boot class path
Reviewed-by: never
1 /*
2 * Copyright (c) 1999, 2011, 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/ciObjArrayKlassKlass.hpp"
29 #include "ci/ciSymbol.hpp"
30 #include "ci/ciUtilities.hpp"
31 #include "oops/objArrayKlass.hpp"
33 // ciObjArrayKlass
34 //
35 // This class represents a klassOop in the HotSpot virtual machine
36 // whose Klass part is an objArrayKlass.
38 // ------------------------------------------------------------------
39 // ciObjArrayKlass::ciObjArrayKlass
40 //
41 // Constructor for loaded object array klasses.
42 ciObjArrayKlass::ciObjArrayKlass(KlassHandle h_k) : ciArrayKlass(h_k) {
43 assert(get_Klass()->oop_is_objArray(), "wrong type");
44 klassOop element_klassOop = get_objArrayKlass()->bottom_klass();
45 _base_element_klass = CURRENT_ENV->get_object(element_klassOop)->as_klass();
46 assert(_base_element_klass->is_instance_klass() ||
47 _base_element_klass->is_type_array_klass(), "bad base klass");
48 if (dimension() == 1) {
49 _element_klass = _base_element_klass;
50 } else {
51 _element_klass = NULL;
52 }
53 if (!ciObjectFactory::is_initialized()) {
54 assert(_element_klass->is_java_lang_Object(), "only arrays of object are shared");
55 }
56 }
58 // ------------------------------------------------------------------
59 // ciObjArrayKlass::ciObjArrayKlass
60 //
61 // Constructor for unloaded object array klasses.
62 ciObjArrayKlass::ciObjArrayKlass(ciSymbol* array_name,
63 ciKlass* base_element_klass,
64 int dimension)
65 : ciArrayKlass(array_name,
66 dimension,
67 ciObjArrayKlassKlass::make()) {
68 _base_element_klass = base_element_klass;
69 assert(_base_element_klass->is_instance_klass() ||
70 _base_element_klass->is_type_array_klass(), "bad base klass");
71 if (dimension == 1) {
72 _element_klass = base_element_klass;
73 } else {
74 _element_klass = NULL;
75 }
76 }
78 // ------------------------------------------------------------------
79 // ciObjArrayKlass::element_klass
80 //
81 // What is the one-level element type of this array?
82 ciKlass* ciObjArrayKlass::element_klass() {
83 if (_element_klass == NULL) {
84 assert(dimension() > 1, "_element_klass should not be NULL");
85 // Produce the element klass.
86 if (is_loaded()) {
87 VM_ENTRY_MARK;
88 klassOop element_klassOop = get_objArrayKlass()->element_klass();
89 _element_klass = CURRENT_THREAD_ENV->get_object(element_klassOop)->as_klass();
90 } else {
91 VM_ENTRY_MARK;
92 // We are an unloaded array klass. Attempt to fetch our
93 // element klass by name.
94 _element_klass = CURRENT_THREAD_ENV->get_klass_by_name_impl(
95 this,
96 constantPoolHandle(),
97 construct_array_name(base_element_klass()->name(),
98 dimension() - 1),
99 false);
100 }
101 }
102 return _element_klass;
103 }
105 // ------------------------------------------------------------------
106 // ciObjArrayKlass::construct_array_name
107 //
108 // Build an array name from an element name and a dimension.
109 ciSymbol* ciObjArrayKlass::construct_array_name(ciSymbol* element_name,
110 int dimension) {
111 EXCEPTION_CONTEXT;
112 int element_len = element_name->utf8_length();
114 Symbol* base_name_sym = element_name->get_symbol();
115 char* name;
117 if (base_name_sym->byte_at(0) == '[' ||
118 (base_name_sym->byte_at(0) == 'L' && // watch package name 'Lxx'
119 base_name_sym->byte_at(element_len-1) == ';')) {
121 int new_len = element_len + dimension + 1; // for the ['s and '\0'
122 name = CURRENT_THREAD_ENV->name_buffer(new_len);
124 int pos = 0;
125 for ( ; pos < dimension; pos++) {
126 name[pos] = '[';
127 }
128 strncpy(name+pos, (char*)element_name->base(), element_len);
129 name[new_len-1] = '\0';
130 } else {
131 int new_len = 3 // for L, ;, and '\0'
132 + dimension // for ['s
133 + element_len;
135 name = CURRENT_THREAD_ENV->name_buffer(new_len);
136 int pos = 0;
137 for ( ; pos < dimension; pos++) {
138 name[pos] = '[';
139 }
140 name[pos++] = 'L';
141 strncpy(name+pos, (char*)element_name->base(), element_len);
142 name[new_len-2] = ';';
143 name[new_len-1] = '\0';
144 }
145 return ciSymbol::make(name);
146 }
148 // ------------------------------------------------------------------
149 // ciObjArrayKlass::make_impl
150 //
151 // Implementation of make.
152 ciObjArrayKlass* ciObjArrayKlass::make_impl(ciKlass* element_klass) {
154 if (element_klass->is_loaded()) {
155 EXCEPTION_CONTEXT;
156 // The element klass is loaded
157 klassOop array = element_klass->get_Klass()->array_klass(THREAD);
158 if (HAS_PENDING_EXCEPTION) {
159 CLEAR_PENDING_EXCEPTION;
160 CURRENT_THREAD_ENV->record_out_of_memory_failure();
161 return ciEnv::unloaded_ciobjarrayklass();
162 }
163 return CURRENT_THREAD_ENV->get_object(array)->as_obj_array_klass();
164 }
166 // The array klass was unable to be made or the element klass was
167 // not loaded.
168 ciSymbol* array_name = construct_array_name(element_klass->name(), 1);
169 if (array_name == ciEnv::unloaded_cisymbol()) {
170 return ciEnv::unloaded_ciobjarrayklass();
171 }
172 return
173 CURRENT_ENV->get_unloaded_klass(element_klass, array_name)
174 ->as_obj_array_klass();
175 }
177 // ------------------------------------------------------------------
178 // ciObjArrayKlass::make
179 //
180 // Make an array klass corresponding to the specified primitive type.
181 ciObjArrayKlass* ciObjArrayKlass::make(ciKlass* element_klass) {
182 assert(element_klass->is_java_klass(), "wrong kind of klass");
183 GUARDED_VM_ENTRY(return make_impl(element_klass);)
184 }