2115N/A/*
2362N/A * Copyright (c) 1999, 2011, Oracle and/or its affiliates. All rights reserved.
2115N/A * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
2115N/A *
2115N/A * This code is free software; you can redistribute it and/or modify it
2115N/A * under the terms of the GNU General Public License version 2 only, as
2115N/A * published by the Free Software Foundation.
2115N/A *
2115N/A * This code is distributed in the hope that it will be useful, but WITHOUT
2115N/A * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
2115N/A * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
2115N/A * version 2 for more details (a copy is included in the LICENSE file that
2115N/A * accompanied this code).
2115N/A *
2115N/A * You should have received a copy of the GNU General Public License version
2115N/A * 2 along with this work; if not, write to the Free Software Foundation,
2115N/A * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
2115N/A *
2362N/A * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
2362N/A * or visit www.oracle.com if you need additional information or have any
2362N/A * questions.
2115N/A *
2115N/A */
2115N/A
2115N/A#include "precompiled.hpp"
2115N/A#include "ci/ciInstanceKlass.hpp"
2115N/A#include "ci/ciObjArrayKlass.hpp"
2115N/A#include "ci/ciObjArrayKlassKlass.hpp"
2115N/A#include "ci/ciSymbol.hpp"
2115N/A#include "ci/ciUtilities.hpp"
2115N/A#include "oops/objArrayKlass.hpp"
2115N/A
2115N/A// ciObjArrayKlass
2115N/A//
2115N/A// This class represents a klassOop in the HotSpot virtual machine
2115N/A// whose Klass part is an objArrayKlass.
2115N/A
2115N/A// ------------------------------------------------------------------
2115N/A// ciObjArrayKlass::ciObjArrayKlass
2115N/A//
2115N/A// Constructor for loaded object array klasses.
2115N/AciObjArrayKlass::ciObjArrayKlass(KlassHandle h_k) : ciArrayKlass(h_k) {
2115N/A assert(get_Klass()->oop_is_objArray(), "wrong type");
2115N/A klassOop element_klassOop = get_objArrayKlass()->bottom_klass();
2115N/A _base_element_klass = CURRENT_ENV->get_object(element_klassOop)->as_klass();
2115N/A assert(_base_element_klass->is_instance_klass() ||
2115N/A _base_element_klass->is_type_array_klass(), "bad base klass");
2115N/A if (dimension() == 1) {
2562N/A _element_klass = _base_element_klass;
2115N/A } else {
2115N/A _element_klass = NULL;
2115N/A }
2115N/A if (!ciObjectFactory::is_initialized()) {
2115N/A assert(_element_klass->is_java_lang_Object(), "only arrays of object are shared");
2115N/A }
2115N/A}
2115N/A
2115N/A// ------------------------------------------------------------------
2115N/A// ciObjArrayKlass::ciObjArrayKlass
2115N/A//
2115N/A// Constructor for unloaded object array klasses.
2115N/AciObjArrayKlass::ciObjArrayKlass(ciSymbol* array_name,
2115N/A ciKlass* base_element_klass,
2115N/A int dimension)
2115N/A : ciArrayKlass(array_name,
2115N/A dimension,
2115N/A ciObjArrayKlassKlass::make()) {
2115N/A _base_element_klass = base_element_klass;
2115N/A assert(_base_element_klass->is_instance_klass() ||
2115N/A _base_element_klass->is_type_array_klass(), "bad base klass");
2115N/A if (dimension == 1) {
2115N/A _element_klass = base_element_klass;
2115N/A } else {
2115N/A _element_klass = NULL;
2115N/A }
2115N/A}
2115N/A
2115N/A// ------------------------------------------------------------------
2115N/A// ciObjArrayKlass::element_klass
2562N/A//
2562N/A// What is the one-level element type of this array?
2562N/AciKlass* ciObjArrayKlass::element_klass() {
2115N/A if (_element_klass == NULL) {
2562N/A assert(dimension() > 1, "_element_klass should not be NULL");
2562N/A // Produce the element klass.
2115N/A if (is_loaded()) {
2115N/A VM_ENTRY_MARK;
2115N/A klassOop element_klassOop = get_objArrayKlass()->element_klass();
2115N/A _element_klass = CURRENT_THREAD_ENV->get_object(element_klassOop)->as_klass();
2562N/A } else {
2115N/A VM_ENTRY_MARK;
2567N/A // We are an unloaded array klass. Attempt to fetch our
2567N/A // element klass by name.
2115N/A _element_klass = CURRENT_THREAD_ENV->get_klass_by_name_impl(
2115N/A this,
2115N/A constantPoolHandle(),
2115N/A construct_array_name(base_element_klass()->name(),
2115N/A dimension() - 1),
2115N/A false);
2115N/A }
2115N/A }
2115N/A return _element_klass;
2115N/A}
2115N/A
2115N/A// ------------------------------------------------------------------
2115N/A// ciObjArrayKlass::construct_array_name
2115N/A//
2115N/A// Build an array name from an element name and a dimension.
2115N/AciSymbol* ciObjArrayKlass::construct_array_name(ciSymbol* element_name,
2115N/A int dimension) {
2115N/A EXCEPTION_CONTEXT;
2115N/A int element_len = element_name->utf8_length();
2115N/A
2115N/A Symbol* base_name_sym = element_name->get_symbol();
2115N/A char* name;
2115N/A
2115N/A if (base_name_sym->byte_at(0) == '[' ||
2115N/A (base_name_sym->byte_at(0) == 'L' && // watch package name 'Lxx'
2115N/A base_name_sym->byte_at(element_len-1) == ';')) {
2115N/A
2115N/A int new_len = element_len + dimension + 1; // for the ['s and '\0'
2115N/A name = CURRENT_THREAD_ENV->name_buffer(new_len);
2115N/A
2115N/A int pos = 0;
2115N/A for ( ; pos < dimension; pos++) {
2115N/A name[pos] = '[';
2115N/A }
2115N/A strncpy(name+pos, (char*)element_name->base(), element_len);
2115N/A name[new_len-1] = '\0';
2115N/A } else {
2115N/A int new_len = 3 // for L, ;, and '\0'
2115N/A + dimension // for ['s
2115N/A + element_len;
2115N/A
2115N/A name = CURRENT_THREAD_ENV->name_buffer(new_len);
2115N/A int pos = 0;
2115N/A for ( ; pos < dimension; pos++) {
2115N/A name[pos] = '[';
2115N/A }
2115N/A name[pos++] = 'L';
2115N/A strncpy(name+pos, (char*)element_name->base(), element_len);
2115N/A name[new_len-2] = ';';
2562N/A name[new_len-1] = '\0';
2115N/A }
2115N/A return ciSymbol::make(name);
2115N/A}
2115N/A
2115N/A// ------------------------------------------------------------------
2115N/A// ciObjArrayKlass::make_impl
2115N/A//
2115N/A// Implementation of make.
2115N/AciObjArrayKlass* ciObjArrayKlass::make_impl(ciKlass* element_klass) {
2115N/A
2115N/A if (element_klass->is_loaded()) {
2115N/A EXCEPTION_CONTEXT;
2115N/A // The element klass is loaded
2115N/A klassOop array = element_klass->get_Klass()->array_klass(THREAD);
2115N/A if (HAS_PENDING_EXCEPTION) {
2115N/A CLEAR_PENDING_EXCEPTION;
2115N/A CURRENT_THREAD_ENV->record_out_of_memory_failure();
2115N/A return ciEnv::unloaded_ciobjarrayklass();
2115N/A }
2115N/A return CURRENT_THREAD_ENV->get_object(array)->as_obj_array_klass();
2115N/A }
2115N/A
2115N/A // The array klass was unable to be made or the element klass was
2115N/A // not loaded.
2115N/A ciSymbol* array_name = construct_array_name(element_klass->name(), 1);
2115N/A if (array_name == ciEnv::unloaded_cisymbol()) {
2115N/A return ciEnv::unloaded_ciobjarrayklass();
2115N/A }
2115N/A return
2115N/A CURRENT_ENV->get_unloaded_klass(element_klass, array_name)
2115N/A ->as_obj_array_klass();
2115N/A}
2115N/A
2115N/A// ------------------------------------------------------------------
2115N/A// ciObjArrayKlass::make
2115N/A//
2115N/A// Make an array klass corresponding to the specified primitive type.
2115N/AciObjArrayKlass* ciObjArrayKlass::make(ciKlass* element_klass) {
2115N/A assert(element_klass->is_java_klass(), "wrong kind of klass");
2115N/A GUARDED_VM_ENTRY(return make_impl(element_klass);)
2115N/A}
2115N/A