--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/hotspot/src/share/vm/ci/ciObjArrayKlass.cpp Sat Dec 01 00:00:00 2007 +0000
@@ -0,0 +1,178 @@
+/*
+ * Copyright 1999-2007 Sun Microsystems, Inc. All Rights Reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
+ * CA 95054 USA or visit www.sun.com if you need additional information or
+ * have any questions.
+ *
+ */
+
+#include "incls/_precompiled.incl"
+#include "incls/_ciObjArrayKlass.cpp.incl"
+
+// ciObjArrayKlass
+//
+// This class represents a klassOop in the HotSpot virtual machine
+// whose Klass part is an objArrayKlass.
+
+// ------------------------------------------------------------------
+// ciObjArrayKlass::ciObjArrayKlass
+//
+// Constructor for loaded object array klasses.
+ciObjArrayKlass::ciObjArrayKlass(KlassHandle h_k) : ciArrayKlass(h_k) {
+ assert(get_Klass()->oop_is_objArray(), "wrong type");
+ klassOop element_klassOop = get_objArrayKlass()->bottom_klass();
+ _base_element_klass = CURRENT_ENV->get_object(element_klassOop)->as_klass();
+ assert(_base_element_klass->is_instance_klass() ||
+ _base_element_klass->is_type_array_klass(), "bad base klass");
+ if (dimension() == 1) {
+ _element_klass = _base_element_klass;
+ } else {
+ _element_klass = NULL;
+ }
+ if (!ciObjectFactory::is_initialized()) {
+ assert(_element_klass->is_java_lang_Object(), "only arrays of object are shared");
+ }
+}
+
+// ------------------------------------------------------------------
+// ciObjArrayKlass::ciObjArrayKlass
+//
+// Constructor for unloaded object array klasses.
+ciObjArrayKlass::ciObjArrayKlass(ciSymbol* array_name,
+ ciKlass* base_element_klass,
+ int dimension)
+ : ciArrayKlass(array_name,
+ dimension,
+ ciObjArrayKlassKlass::make()) {
+ _base_element_klass = base_element_klass;
+ assert(_base_element_klass->is_instance_klass() ||
+ _base_element_klass->is_type_array_klass(), "bad base klass");
+ if (dimension == 1) {
+ _element_klass = base_element_klass;
+ } else {
+ _element_klass = NULL;
+ }
+}
+
+// ------------------------------------------------------------------
+// ciObjArrayKlass::element_klass
+//
+// What is the one-level element type of this array?
+ciKlass* ciObjArrayKlass::element_klass() {
+ if (_element_klass == NULL) {
+ assert(dimension() > 1, "_element_klass should not be NULL");
+ // Produce the element klass.
+ if (is_loaded()) {
+ VM_ENTRY_MARK;
+ klassOop element_klassOop = get_objArrayKlass()->element_klass();
+ _element_klass = CURRENT_THREAD_ENV->get_object(element_klassOop)->as_klass();
+ } else {
+ VM_ENTRY_MARK;
+ // We are an unloaded array klass. Attempt to fetch our
+ // element klass by name.
+ _element_klass = CURRENT_THREAD_ENV->get_klass_by_name_impl(
+ this,
+ construct_array_name(base_element_klass()->name(),
+ dimension() - 1),
+ false);
+ }
+ }
+ return _element_klass;
+}
+
+// ------------------------------------------------------------------
+// ciObjArrayKlass::construct_array_name
+//
+// Build an array name from an element name and a dimension.
+ciSymbol* ciObjArrayKlass::construct_array_name(ciSymbol* element_name,
+ int dimension) {
+ EXCEPTION_CONTEXT;
+ int element_len = element_name->utf8_length();
+
+ symbolOop base_name_sym = element_name->get_symbolOop();
+ char* name;
+
+ if (base_name_sym->byte_at(0) == '[' ||
+ (base_name_sym->byte_at(0) == 'L' && // watch package name 'Lxx'
+ base_name_sym->byte_at(element_len-1) == ';')) {
+
+ int new_len = element_len + dimension + 1; // for the ['s and '\0'
+ name = CURRENT_THREAD_ENV->name_buffer(new_len);
+
+ int pos = 0;
+ for ( ; pos < dimension; pos++) {
+ name[pos] = '[';
+ }
+ strncpy(name+pos, (char*)element_name->base(), element_len);
+ name[new_len-1] = '\0';
+ } else {
+ int new_len = 3 // for L, ;, and '\0'
+ + dimension // for ['s
+ + element_len;
+
+ name = CURRENT_THREAD_ENV->name_buffer(new_len);
+ int pos = 0;
+ for ( ; pos < dimension; pos++) {
+ name[pos] = '[';
+ }
+ name[pos++] = 'L';
+ strncpy(name+pos, (char*)element_name->base(), element_len);
+ name[new_len-2] = ';';
+ name[new_len-1] = '\0';
+ }
+ return ciSymbol::make(name);
+}
+
+// ------------------------------------------------------------------
+// ciObjArrayKlass::make_impl
+//
+// Implementation of make.
+ciObjArrayKlass* ciObjArrayKlass::make_impl(ciKlass* element_klass) {
+
+ if (element_klass->is_loaded()) {
+ EXCEPTION_CONTEXT;
+ // The element klass is loaded
+ klassOop array = element_klass->get_Klass()->array_klass(THREAD);
+ if (HAS_PENDING_EXCEPTION) {
+ CLEAR_PENDING_EXCEPTION;
+ CURRENT_THREAD_ENV->record_out_of_memory_failure();
+ return ciEnv::unloaded_ciobjarrayklass();
+ }
+ return CURRENT_THREAD_ENV->get_object(array)->as_obj_array_klass();
+ }
+
+ // The array klass was unable to be made or the element klass was
+ // not loaded.
+ ciSymbol* array_name = construct_array_name(element_klass->name(), 1);
+ if (array_name == ciEnv::unloaded_cisymbol()) {
+ return ciEnv::unloaded_ciobjarrayklass();
+ }
+ return
+ CURRENT_ENV->get_unloaded_klass(element_klass, array_name)
+ ->as_obj_array_klass();
+}
+
+// ------------------------------------------------------------------
+// ciObjArrayKlass::make
+//
+// Make an array klass corresponding to the specified primitive type.
+ciObjArrayKlass* ciObjArrayKlass::make(ciKlass* element_klass) {
+ assert(element_klass->is_java_klass(), "wrong kind of klass");
+ GUARDED_VM_ENTRY(return make_impl(element_klass);)
+}