1 /*
  2  * Copyright (c) 2000, 2023, 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/ciEnv.hpp"
 27 #include "ci/ciType.hpp"
 28 #include "ci/ciUtilities.inline.hpp"
 29 #include "memory/resourceArea.hpp"
 30 #include "memory/universe.hpp"
 31 #include "oops/oop.inline.hpp"
 32 
 33 ciType* ciType::_basic_types[T_CONFLICT+1];
 34 
 35 // ciType
 36 //
 37 // This class represents a Java reference, inline type or primitive type.
 38 
 39 // ------------------------------------------------------------------
 40 // ciType::ciType
 41 //
 42 ciType::ciType(BasicType basic_type) : ciMetadata() {
 43   assert(basic_type >= T_BOOLEAN && basic_type <= T_CONFLICT, "range check");
 44   _basic_type = basic_type;
 45 }
 46 
 47 ciType::ciType(Klass* k) : ciMetadata(k) {
 48   _basic_type = k->is_array_klass() ? T_ARRAY : T_OBJECT;
 49 }
 50 
 51 
 52 // ------------------------------------------------------------------
 53 // ciType::is_subtype_of
 54 //
 55 bool ciType::is_subtype_of(ciType* type) {
 56   if (this == type)  return true;
 57   if (is_klass() && type->is_klass())
 58     return this->as_klass()->is_subtype_of(type->as_klass());
 59   return false;
 60 }
 61 
 62 // ------------------------------------------------------------------
 63 // ciType::name
 64 //
 65 // Return the name of this type
 66 const char* ciType::name() {
 67   if (is_primitive_type()) {
 68     return type2name(basic_type());
 69   } else {
 70     assert(is_klass(), "must be");
 71     return as_klass()->name()->as_utf8();
 72   }
 73 }
 74 
 75 // ------------------------------------------------------------------
 76 // ciType::print_impl
 77 //
 78 // Implementation of the print method.
 79 void ciType::print_impl(outputStream* st) {
 80   st->print(" type=");
 81   print_name_on(st);
 82 }
 83 
 84 // ------------------------------------------------------------------
 85 // ciType::print_name
 86 //
 87 // Print the name of this type
 88 void ciType::print_name_on(outputStream* st) {
 89   ResourceMark rm;
 90   st->print("%s", name());
 91 }
 92 
 93 
 94 
 95 // ------------------------------------------------------------------
 96 // ciType::java_mirror
 97 //
 98 ciInstance* ciType::java_mirror() {
 99   VM_ENTRY_MARK;
100   return CURRENT_THREAD_ENV->get_instance(Universe::java_mirror(basic_type()));
101 }
102 
103 // ------------------------------------------------------------------
104 // ciType::make
105 //
106 // Produce the ciType for a given primitive BasicType.
107 // As a bonus, produce the right reference type for T_OBJECT.
108 // Does not work on T_ARRAY.
109 ciType* ciType::make(BasicType t) {
110   // short, etc.
111   // Note: Bare T_ADDRESS means a raw pointer type, not a return_address.
112   assert((uint)t < T_CONFLICT+1, "range check");
113   if (t == T_OBJECT)  return ciEnv::_Object_klass;  // java/lang/Object
114   assert(_basic_types[t] != nullptr, "domain check");
115   return _basic_types[t];
116 }
117 
118 // ciReturnAddress
119 //
120 // This class represents the type of a specific return address in the
121 // bytecodes.
122 
123 // ------------------------------------------------------------------
124 // ciReturnAddress::ciReturnAddress
125 //
126 ciReturnAddress::ciReturnAddress(int bci) : ciType(T_ADDRESS) {
127   assert(0 <= bci, "bci cannot be negative");
128   _bci = bci;
129 }
130 
131 // ------------------------------------------------------------------
132 // ciReturnAddress::print_impl
133 //
134 // Implementation of the print method.
135 void ciReturnAddress::print_impl(outputStream* st) {
136   st->print(" bci=%d", _bci);
137 }
138 
139 // ------------------------------------------------------------------
140 // ciReturnAddress::make
141 ciReturnAddress* ciReturnAddress::make(int bci) {
142   GUARDED_VM_ENTRY(return CURRENT_ENV->get_return_address(bci);)
143 }