1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/src/share/vm/ci/ciObjArrayKlass.cpp Sat Dec 01 00:00:00 2007 +0000
1.3 @@ -0,0 +1,178 @@
1.4 +/*
1.5 + * Copyright 1999-2007 Sun Microsystems, Inc. All Rights Reserved.
1.6 + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
1.7 + *
1.8 + * This code is free software; you can redistribute it and/or modify it
1.9 + * under the terms of the GNU General Public License version 2 only, as
1.10 + * published by the Free Software Foundation.
1.11 + *
1.12 + * This code is distributed in the hope that it will be useful, but WITHOUT
1.13 + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
1.14 + * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
1.15 + * version 2 for more details (a copy is included in the LICENSE file that
1.16 + * accompanied this code).
1.17 + *
1.18 + * You should have received a copy of the GNU General Public License version
1.19 + * 2 along with this work; if not, write to the Free Software Foundation,
1.20 + * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
1.21 + *
1.22 + * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
1.23 + * CA 95054 USA or visit www.sun.com if you need additional information or
1.24 + * have any questions.
1.25 + *
1.26 + */
1.27 +
1.28 +#include "incls/_precompiled.incl"
1.29 +#include "incls/_ciObjArrayKlass.cpp.incl"
1.30 +
1.31 +// ciObjArrayKlass
1.32 +//
1.33 +// This class represents a klassOop in the HotSpot virtual machine
1.34 +// whose Klass part is an objArrayKlass.
1.35 +
1.36 +// ------------------------------------------------------------------
1.37 +// ciObjArrayKlass::ciObjArrayKlass
1.38 +//
1.39 +// Constructor for loaded object array klasses.
1.40 +ciObjArrayKlass::ciObjArrayKlass(KlassHandle h_k) : ciArrayKlass(h_k) {
1.41 + assert(get_Klass()->oop_is_objArray(), "wrong type");
1.42 + klassOop element_klassOop = get_objArrayKlass()->bottom_klass();
1.43 + _base_element_klass = CURRENT_ENV->get_object(element_klassOop)->as_klass();
1.44 + assert(_base_element_klass->is_instance_klass() ||
1.45 + _base_element_klass->is_type_array_klass(), "bad base klass");
1.46 + if (dimension() == 1) {
1.47 + _element_klass = _base_element_klass;
1.48 + } else {
1.49 + _element_klass = NULL;
1.50 + }
1.51 + if (!ciObjectFactory::is_initialized()) {
1.52 + assert(_element_klass->is_java_lang_Object(), "only arrays of object are shared");
1.53 + }
1.54 +}
1.55 +
1.56 +// ------------------------------------------------------------------
1.57 +// ciObjArrayKlass::ciObjArrayKlass
1.58 +//
1.59 +// Constructor for unloaded object array klasses.
1.60 +ciObjArrayKlass::ciObjArrayKlass(ciSymbol* array_name,
1.61 + ciKlass* base_element_klass,
1.62 + int dimension)
1.63 + : ciArrayKlass(array_name,
1.64 + dimension,
1.65 + ciObjArrayKlassKlass::make()) {
1.66 + _base_element_klass = base_element_klass;
1.67 + assert(_base_element_klass->is_instance_klass() ||
1.68 + _base_element_klass->is_type_array_klass(), "bad base klass");
1.69 + if (dimension == 1) {
1.70 + _element_klass = base_element_klass;
1.71 + } else {
1.72 + _element_klass = NULL;
1.73 + }
1.74 +}
1.75 +
1.76 +// ------------------------------------------------------------------
1.77 +// ciObjArrayKlass::element_klass
1.78 +//
1.79 +// What is the one-level element type of this array?
1.80 +ciKlass* ciObjArrayKlass::element_klass() {
1.81 + if (_element_klass == NULL) {
1.82 + assert(dimension() > 1, "_element_klass should not be NULL");
1.83 + // Produce the element klass.
1.84 + if (is_loaded()) {
1.85 + VM_ENTRY_MARK;
1.86 + klassOop element_klassOop = get_objArrayKlass()->element_klass();
1.87 + _element_klass = CURRENT_THREAD_ENV->get_object(element_klassOop)->as_klass();
1.88 + } else {
1.89 + VM_ENTRY_MARK;
1.90 + // We are an unloaded array klass. Attempt to fetch our
1.91 + // element klass by name.
1.92 + _element_klass = CURRENT_THREAD_ENV->get_klass_by_name_impl(
1.93 + this,
1.94 + construct_array_name(base_element_klass()->name(),
1.95 + dimension() - 1),
1.96 + false);
1.97 + }
1.98 + }
1.99 + return _element_klass;
1.100 +}
1.101 +
1.102 +// ------------------------------------------------------------------
1.103 +// ciObjArrayKlass::construct_array_name
1.104 +//
1.105 +// Build an array name from an element name and a dimension.
1.106 +ciSymbol* ciObjArrayKlass::construct_array_name(ciSymbol* element_name,
1.107 + int dimension) {
1.108 + EXCEPTION_CONTEXT;
1.109 + int element_len = element_name->utf8_length();
1.110 +
1.111 + symbolOop base_name_sym = element_name->get_symbolOop();
1.112 + char* name;
1.113 +
1.114 + if (base_name_sym->byte_at(0) == '[' ||
1.115 + (base_name_sym->byte_at(0) == 'L' && // watch package name 'Lxx'
1.116 + base_name_sym->byte_at(element_len-1) == ';')) {
1.117 +
1.118 + int new_len = element_len + dimension + 1; // for the ['s and '\0'
1.119 + name = CURRENT_THREAD_ENV->name_buffer(new_len);
1.120 +
1.121 + int pos = 0;
1.122 + for ( ; pos < dimension; pos++) {
1.123 + name[pos] = '[';
1.124 + }
1.125 + strncpy(name+pos, (char*)element_name->base(), element_len);
1.126 + name[new_len-1] = '\0';
1.127 + } else {
1.128 + int new_len = 3 // for L, ;, and '\0'
1.129 + + dimension // for ['s
1.130 + + element_len;
1.131 +
1.132 + name = CURRENT_THREAD_ENV->name_buffer(new_len);
1.133 + int pos = 0;
1.134 + for ( ; pos < dimension; pos++) {
1.135 + name[pos] = '[';
1.136 + }
1.137 + name[pos++] = 'L';
1.138 + strncpy(name+pos, (char*)element_name->base(), element_len);
1.139 + name[new_len-2] = ';';
1.140 + name[new_len-1] = '\0';
1.141 + }
1.142 + return ciSymbol::make(name);
1.143 +}
1.144 +
1.145 +// ------------------------------------------------------------------
1.146 +// ciObjArrayKlass::make_impl
1.147 +//
1.148 +// Implementation of make.
1.149 +ciObjArrayKlass* ciObjArrayKlass::make_impl(ciKlass* element_klass) {
1.150 +
1.151 + if (element_klass->is_loaded()) {
1.152 + EXCEPTION_CONTEXT;
1.153 + // The element klass is loaded
1.154 + klassOop array = element_klass->get_Klass()->array_klass(THREAD);
1.155 + if (HAS_PENDING_EXCEPTION) {
1.156 + CLEAR_PENDING_EXCEPTION;
1.157 + CURRENT_THREAD_ENV->record_out_of_memory_failure();
1.158 + return ciEnv::unloaded_ciobjarrayklass();
1.159 + }
1.160 + return CURRENT_THREAD_ENV->get_object(array)->as_obj_array_klass();
1.161 + }
1.162 +
1.163 + // The array klass was unable to be made or the element klass was
1.164 + // not loaded.
1.165 + ciSymbol* array_name = construct_array_name(element_klass->name(), 1);
1.166 + if (array_name == ciEnv::unloaded_cisymbol()) {
1.167 + return ciEnv::unloaded_ciobjarrayklass();
1.168 + }
1.169 + return
1.170 + CURRENT_ENV->get_unloaded_klass(element_klass, array_name)
1.171 + ->as_obj_array_klass();
1.172 +}
1.173 +
1.174 +// ------------------------------------------------------------------
1.175 +// ciObjArrayKlass::make
1.176 +//
1.177 +// Make an array klass corresponding to the specified primitive type.
1.178 +ciObjArrayKlass* ciObjArrayKlass::make(ciKlass* element_klass) {
1.179 + assert(element_klass->is_java_klass(), "wrong kind of klass");
1.180 + GUARDED_VM_ENTRY(return make_impl(element_klass);)
1.181 +}
