1 /* 2 * Copyright (c) 1999, 2010, 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 */ 24 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" 32 33 // ciObjArrayKlass 34 // 35 // This class represents a klassOop in the HotSpot virtual machine 36 // whose Klass part is an objArrayKlass. 37 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 } 57 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 } 77 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 construct_array_name(base_element_klass()->name(), 97 dimension() - 1), 98 false); 99 } 100 } 101 return _element_klass; 102 } 103 104 // ------------------------------------------------------------------ 105 // ciObjArrayKlass::construct_array_name 106 // 107 // Build an array name from an element name and a dimension. 108 ciSymbol* ciObjArrayKlass::construct_array_name(ciSymbol* element_name, 109 int dimension) { 110 EXCEPTION_CONTEXT; 111 int element_len = element_name->utf8_length(); 112 113 symbolOop base_name_sym = element_name->get_symbolOop(); 114 char* name; 115 116 if (base_name_sym->byte_at(0) == '[' || 117 (base_name_sym->byte_at(0) == 'L' && // watch package name 'Lxx' 118 base_name_sym->byte_at(element_len-1) == ';')) { 119 120 int new_len = element_len + dimension + 1; // for the ['s and '\0' 121 name = CURRENT_THREAD_ENV->name_buffer(new_len); 122 123 int pos = 0; 124 for ( ; pos < dimension; pos++) { 125 name[pos] = '['; 126 } 127 strncpy(name+pos, (char*)element_name->base(), element_len); 128 name[new_len-1] = '\0'; 129 } else { 130 int new_len = 3 // for L, ;, and '\0' 131 + dimension // for ['s 132 + element_len; 133 134 name = CURRENT_THREAD_ENV->name_buffer(new_len); 135 int pos = 0; 136 for ( ; pos < dimension; pos++) { 137 name[pos] = '['; 138 } 139 name[pos++] = 'L'; 140 strncpy(name+pos, (char*)element_name->base(), element_len); 141 name[new_len-2] = ';'; 142 name[new_len-1] = '\0'; 143 } 144 return ciSymbol::make(name); 145 } 146 147 // ------------------------------------------------------------------ 148 // ciObjArrayKlass::make_impl 149 // 150 // Implementation of make. 151 ciObjArrayKlass* ciObjArrayKlass::make_impl(ciKlass* element_klass) { 152 153 if (element_klass->is_loaded()) { 154 EXCEPTION_CONTEXT; 155 // The element klass is loaded 156 klassOop array = element_klass->get_Klass()->array_klass(THREAD); 157 if (HAS_PENDING_EXCEPTION) { 158 CLEAR_PENDING_EXCEPTION; 159 CURRENT_THREAD_ENV->record_out_of_memory_failure(); 160 return ciEnv::unloaded_ciobjarrayklass(); 161 } 162 return CURRENT_THREAD_ENV->get_object(array)->as_obj_array_klass(); 163 } 164 165 // The array klass was unable to be made or the element klass was 166 // not loaded. 167 ciSymbol* array_name = construct_array_name(element_klass->name(), 1); 168 if (array_name == ciEnv::unloaded_cisymbol()) { 169 return ciEnv::unloaded_ciobjarrayklass(); 170 } 171 return 172 CURRENT_ENV->get_unloaded_klass(element_klass, array_name) 173 ->as_obj_array_klass(); 174 } 175 176 // ------------------------------------------------------------------ 177 // ciObjArrayKlass::make 178 // 179 // Make an array klass corresponding to the specified primitive type. 180 ciObjArrayKlass* ciObjArrayKlass::make(ciKlass* element_klass) { 181 assert(element_klass->is_java_klass(), "wrong kind of klass"); 182 GUARDED_VM_ENTRY(return make_impl(element_klass);) 183 }