1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/src/share/vm/ci/ciObjArrayKlass.cpp Wed Apr 27 01:25:04 2016 +0800
1.3 @@ -0,0 +1,194 @@
1.4 +/*
1.5 + * Copyright (c) 1999, 2013, Oracle and/or its affiliates. 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
1.23 + * or visit www.oracle.com if you need additional information or have any
1.24 + * questions.
1.25 + *
1.26 + */
1.27 +
1.28 +#include "precompiled.hpp"
1.29 +#include "ci/ciInstanceKlass.hpp"
1.30 +#include "ci/ciObjArrayKlass.hpp"
1.31 +#include "ci/ciSymbol.hpp"
1.32 +#include "ci/ciUtilities.hpp"
1.33 +#include "oops/objArrayKlass.hpp"
1.34 +
1.35 +// ciObjArrayKlass
1.36 +//
1.37 +// This class represents a Klass* in the HotSpot virtual machine
1.38 +// whose Klass part is an ObjArrayKlass.
1.39 +
1.40 +// ------------------------------------------------------------------
1.41 +// ciObjArrayKlass::ciObjArrayKlass
1.42 +//
1.43 +// Constructor for loaded object array klasses.
1.44 +ciObjArrayKlass::ciObjArrayKlass(KlassHandle h_k) : ciArrayKlass(h_k) {
1.45 + assert(get_Klass()->oop_is_objArray(), "wrong type");
1.46 + Klass* element_Klass = get_ObjArrayKlass()->bottom_klass();
1.47 + _base_element_klass = CURRENT_ENV->get_klass(element_Klass);
1.48 + assert(_base_element_klass->is_instance_klass() ||
1.49 + _base_element_klass->is_type_array_klass(), "bad base klass");
1.50 + if (dimension() == 1) {
1.51 + _element_klass = _base_element_klass;
1.52 + } else {
1.53 + _element_klass = NULL;
1.54 + }
1.55 + if (!ciObjectFactory::is_initialized()) {
1.56 + assert(_element_klass->is_java_lang_Object(), "only arrays of object are shared");
1.57 + }
1.58 +}
1.59 +
1.60 +// ------------------------------------------------------------------
1.61 +// ciObjArrayKlass::ciObjArrayKlass
1.62 +//
1.63 +// Constructor for unloaded object array klasses.
1.64 +ciObjArrayKlass::ciObjArrayKlass(ciSymbol* array_name,
1.65 + ciKlass* base_element_klass,
1.66 + int dimension)
1.67 + : ciArrayKlass(array_name,
1.68 + dimension, T_OBJECT) {
1.69 + _base_element_klass = base_element_klass;
1.70 + assert(_base_element_klass->is_instance_klass() ||
1.71 + _base_element_klass->is_type_array_klass(), "bad base klass");
1.72 + if (dimension == 1) {
1.73 + _element_klass = base_element_klass;
1.74 + } else {
1.75 + _element_klass = NULL;
1.76 + }
1.77 +}
1.78 +
1.79 +// ------------------------------------------------------------------
1.80 +// ciObjArrayKlass::element_klass
1.81 +//
1.82 +// What is the one-level element type of this array?
1.83 +ciKlass* ciObjArrayKlass::element_klass() {
1.84 + if (_element_klass == NULL) {
1.85 + assert(dimension() > 1, "_element_klass should not be NULL");
1.86 + // Produce the element klass.
1.87 + if (is_loaded()) {
1.88 + VM_ENTRY_MARK;
1.89 + Klass* element_Klass = get_ObjArrayKlass()->element_klass();
1.90 + _element_klass = CURRENT_THREAD_ENV->get_klass(element_Klass);
1.91 + } else {
1.92 + VM_ENTRY_MARK;
1.93 + // We are an unloaded array klass. Attempt to fetch our
1.94 + // element klass by name.
1.95 + _element_klass = CURRENT_THREAD_ENV->get_klass_by_name_impl(
1.96 + this,
1.97 + constantPoolHandle(),
1.98 + construct_array_name(base_element_klass()->name(),
1.99 + dimension() - 1),
1.100 + false);
1.101 + }
1.102 + }
1.103 + return _element_klass;
1.104 +}
1.105 +
1.106 +// ------------------------------------------------------------------
1.107 +// ciObjArrayKlass::construct_array_name
1.108 +//
1.109 +// Build an array name from an element name and a dimension.
1.110 +ciSymbol* ciObjArrayKlass::construct_array_name(ciSymbol* element_name,
1.111 + int dimension) {
1.112 + EXCEPTION_CONTEXT;
1.113 + int element_len = element_name->utf8_length();
1.114 +
1.115 + Symbol* base_name_sym = element_name->get_symbol();
1.116 + char* name;
1.117 +
1.118 + if (base_name_sym->byte_at(0) == '[' ||
1.119 + (base_name_sym->byte_at(0) == 'L' && // watch package name 'Lxx'
1.120 + base_name_sym->byte_at(element_len-1) == ';')) {
1.121 +
1.122 + int new_len = element_len + dimension + 1; // for the ['s and '\0'
1.123 + name = CURRENT_THREAD_ENV->name_buffer(new_len);
1.124 +
1.125 + int pos = 0;
1.126 + for ( ; pos < dimension; pos++) {
1.127 + name[pos] = '[';
1.128 + }
1.129 + strncpy(name+pos, (char*)element_name->base(), element_len);
1.130 + name[new_len-1] = '\0';
1.131 + } else {
1.132 + int new_len = 3 // for L, ;, and '\0'
1.133 + + dimension // for ['s
1.134 + + element_len;
1.135 +
1.136 + name = CURRENT_THREAD_ENV->name_buffer(new_len);
1.137 + int pos = 0;
1.138 + for ( ; pos < dimension; pos++) {
1.139 + name[pos] = '[';
1.140 + }
1.141 + name[pos++] = 'L';
1.142 + strncpy(name+pos, (char*)element_name->base(), element_len);
1.143 + name[new_len-2] = ';';
1.144 + name[new_len-1] = '\0';
1.145 + }
1.146 + return ciSymbol::make(name);
1.147 +}
1.148 +
1.149 +// ------------------------------------------------------------------
1.150 +// ciObjArrayKlass::make_impl
1.151 +//
1.152 +// Implementation of make.
1.153 +ciObjArrayKlass* ciObjArrayKlass::make_impl(ciKlass* element_klass) {
1.154 +
1.155 + if (element_klass->is_loaded()) {
1.156 + EXCEPTION_CONTEXT;
1.157 + // The element klass is loaded
1.158 + Klass* array = element_klass->get_Klass()->array_klass(THREAD);
1.159 + if (HAS_PENDING_EXCEPTION) {
1.160 + CLEAR_PENDING_EXCEPTION;
1.161 + CURRENT_THREAD_ENV->record_out_of_memory_failure();
1.162 + return ciEnv::unloaded_ciobjarrayklass();
1.163 + }
1.164 + return CURRENT_THREAD_ENV->get_obj_array_klass(array);
1.165 + }
1.166 +
1.167 + // The array klass was unable to be made or the element klass was
1.168 + // not loaded.
1.169 + ciSymbol* array_name = construct_array_name(element_klass->name(), 1);
1.170 + if (array_name == ciEnv::unloaded_cisymbol()) {
1.171 + return ciEnv::unloaded_ciobjarrayklass();
1.172 + }
1.173 + return
1.174 + CURRENT_ENV->get_unloaded_klass(element_klass, array_name)
1.175 + ->as_obj_array_klass();
1.176 +}
1.177 +
1.178 +// ------------------------------------------------------------------
1.179 +// ciObjArrayKlass::make
1.180 +//
1.181 +// Make an array klass corresponding to the specified primitive type.
1.182 +ciObjArrayKlass* ciObjArrayKlass::make(ciKlass* element_klass) {
1.183 + GUARDED_VM_ENTRY(return make_impl(element_klass);)
1.184 +}
1.185 +
1.186 +ciKlass* ciObjArrayKlass::exact_klass() {
1.187 + ciType* base = base_element_type();
1.188 + if (base->is_instance_klass()) {
1.189 + ciInstanceKlass* ik = base->as_instance_klass();
1.190 + if (ik->exact_klass() != NULL) {
1.191 + return this;
1.192 + }
1.193 + } else if (base->is_primitive_type()) {
1.194 + return this;
1.195 + }
1.196 + return NULL;
1.197 +}
