1 /*
  2  * Copyright (c) 1999, 2017, 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/ciArrayKlass.hpp"
 27 #include "ci/ciFlatArrayKlass.hpp"
 28 #include "ci/ciInlineKlass.hpp"
 29 #include "ci/ciObjArrayKlass.hpp"
 30 #include "ci/ciTypeArrayKlass.hpp"
 31 #include "ci/ciUtilities.hpp"
 32 #include "ci/ciUtilities.inline.hpp"
 33 #include "oops/inlineKlass.inline.hpp"
 34 
 35 // ciArrayKlass
 36 //
 37 // This class represents a Klass* in the HotSpot virtual machine
 38 // whose Klass part in an ArrayKlass.
 39 
 40 // ------------------------------------------------------------------
 41 // ciArrayKlass::ciArrayKlass
 42 //
 43 // Loaded array klass.
 44 ciArrayKlass::ciArrayKlass(Klass* k) : ciKlass(k) {
 45   assert(get_Klass()->is_array_klass(), "wrong type");
 46   _dimension = get_ArrayKlass()->dimension();
 47 }
 48 
 49 // ------------------------------------------------------------------
 50 // ciArrayKlass::ciArrayKlass
 51 //
 52 // Unloaded array klass.
 53 ciArrayKlass::ciArrayKlass(ciSymbol* name, int dimension, BasicType bt)
 54   : ciKlass(name, bt) {
 55   _dimension = dimension;
 56 }
 57 
 58 // ------------------------------------------------------------------
 59 // ciArrayKlass::element_type
 60 //
 61 // What type is obtained when this array is indexed once?
 62 ciType* ciArrayKlass::element_type() {
 63   if (is_type_array_klass()) {
 64     return ciType::make(as_type_array_klass()->element_type());
 65   } else {
 66     return element_klass()->as_klass();
 67   }
 68 }
 69 
 70 
 71 // ------------------------------------------------------------------
 72 // ciArrayKlass::base_element_type
 73 //
 74 // What type is obtained when this array is indexed as many times as possible?
 75 ciType* ciArrayKlass::base_element_type() {
 76   if (is_type_array_klass()) {
 77     return ciType::make(as_type_array_klass()->element_type());
 78   } else if (is_obj_array_klass()) {
 79     ciKlass* ek = as_obj_array_klass()->base_element_klass();
 80     if (ek->is_type_array_klass()) {
 81       return ciType::make(ek->as_type_array_klass()->element_type());
 82     }
 83     return ek;
 84   } else {
 85     return as_flat_array_klass()->base_element_klass();
 86   }
 87 }
 88 
 89 
 90 // ------------------------------------------------------------------
 91 // ciArrayKlass::is_leaf_type
 92 bool ciArrayKlass::is_leaf_type() {
 93   if (is_type_array_klass()) {
 94     return true;
 95   } else {
 96     return as_obj_array_klass()->base_element_klass()->is_leaf_type();
 97   }
 98 }
 99 
100 
101 // ------------------------------------------------------------------
102 // ciArrayKlass::base_element_type
103 //
104 // What type is obtained when this array is indexed as many times as possible?
105 ciArrayKlass* ciArrayKlass::make(ciType* element_type, bool null_free) {
106   if (element_type->is_primitive_type()) {
107     return ciTypeArrayKlass::make(element_type->basic_type());
108   } else {
109     ciKlass* klass = element_type->as_klass();
110     if (null_free && klass->is_loaded()) {
111       GUARDED_VM_ENTRY(
112         EXCEPTION_CONTEXT;
113         Klass* ak = InlineKlass::cast(klass->get_Klass())->null_free_inline_array_klass(THREAD);
114         if (HAS_PENDING_EXCEPTION) {
115           CLEAR_PENDING_EXCEPTION;
116         } else if (ak->is_flatArray_klass()) {
117           return CURRENT_THREAD_ENV->get_flat_array_klass(ak);
118         } else if (ak->is_objArray_klass()) {
119           return CURRENT_THREAD_ENV->get_obj_array_klass(ak);
120         }
121       )
122     }
123     return ciObjArrayKlass::make(klass);
124   }
125 }
126 
127 int ciArrayKlass::array_header_in_bytes() {
128   return get_ArrayKlass()->array_header_in_bytes();
129 }
130 
131 ciInstance* ciArrayKlass::component_mirror_instance() const {
132   GUARDED_VM_ENTRY(
133     oop component_mirror = ArrayKlass::cast(get_Klass())->component_mirror();
134     return CURRENT_ENV->get_instance(component_mirror);
135   )
136 }