1 /*
  2  * Copyright (c) 1997, 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 "classfile/javaClasses.hpp"
 27 #include "classfile/symbolTable.hpp"
 28 #include "classfile/vmSymbols.hpp"
 29 #include "gc/shared/collectedHeap.inline.hpp"
 30 #include "memory/oopFactory.hpp"
 31 #include "memory/resourceArea.hpp"
 32 #include "memory/universe.hpp"
 33 #include "oops/flatArrayKlass.hpp"
 34 #include "oops/flatArrayOop.inline.hpp"
 35 #include "oops/flatArrayOop.hpp"
 36 #include "oops/instanceKlass.hpp"
 37 #include "oops/instanceOop.hpp"
 38 #include "oops/objArrayKlass.hpp"
 39 #include "oops/objArrayOop.inline.hpp"
 40 #include "oops/objArrayOop.hpp"
 41 #include "oops/oop.inline.hpp"
 42 #include "oops/typeArrayKlass.hpp"
 43 #include "oops/typeArrayOop.inline.hpp"
 44 #include "runtime/handles.inline.hpp"
 45 #include "utilities/utf8.hpp"
 46 
 47 typeArrayOop oopFactory::new_boolArray(int length, TRAPS) {
 48   return TypeArrayKlass::cast(Universe::boolArrayKlassObj())->allocate(length, THREAD);
 49 }
 50 
 51 typeArrayOop oopFactory::new_charArray(int length, TRAPS) {
 52   return TypeArrayKlass::cast(Universe::charArrayKlassObj())->allocate(length, THREAD);
 53 }
 54 
 55 typeArrayOop oopFactory::new_floatArray(int length, TRAPS) {
 56   return TypeArrayKlass::cast(Universe::floatArrayKlassObj())->allocate(length, THREAD);
 57 }
 58 
 59 typeArrayOop oopFactory::new_doubleArray(int length, TRAPS) {
 60   return TypeArrayKlass::cast(Universe::doubleArrayKlassObj())->allocate(length, THREAD);
 61 }
 62 
 63 typeArrayOop oopFactory::new_byteArray(int length, TRAPS) {
 64   return TypeArrayKlass::cast(Universe::byteArrayKlassObj())->allocate(length, THREAD);
 65 }
 66 
 67 typeArrayOop oopFactory::new_shortArray(int length, TRAPS) {
 68   return TypeArrayKlass::cast(Universe::shortArrayKlassObj())->allocate(length, THREAD);
 69 }
 70 
 71 typeArrayOop oopFactory::new_intArray(int length, TRAPS) {
 72   return TypeArrayKlass::cast(Universe::intArrayKlassObj())->allocate(length, THREAD);
 73 }
 74 
 75 typeArrayOop oopFactory::new_longArray(int length, TRAPS) {
 76   return TypeArrayKlass::cast(Universe::longArrayKlassObj())->allocate(length, THREAD);
 77 }
 78 
 79 // create java.lang.Object[]
 80 objArrayOop oopFactory::new_objectArray(int length, TRAPS)  {
 81   assert(Universe::objectArrayKlassObj() != nullptr, "Too early?");
 82   return ObjArrayKlass::cast(Universe::objectArrayKlassObj())->allocate(length, THREAD);
 83 }
 84 
 85 typeArrayOop oopFactory::new_charArray(const char* utf8_str, TRAPS) {
 86   int length = utf8_str == nullptr ? 0 : UTF8::unicode_length(utf8_str);
 87   typeArrayOop result = new_charArray(length, CHECK_NULL);
 88   if (length > 0) {
 89     UTF8::convert_to_unicode(utf8_str, result->char_at_addr(0), length);
 90   }
 91   return result;
 92 }
 93 
 94 typeArrayOop oopFactory::new_typeArray(BasicType type, int length, TRAPS) {
 95   Klass* type_asKlassOop = Universe::typeArrayKlassObj(type);
 96   TypeArrayKlass* type_asArrayKlass = TypeArrayKlass::cast(type_asKlassOop);
 97   typeArrayOop result = type_asArrayKlass->allocate(length, THREAD);
 98   return result;
 99 }
100 
101 // Create a Java array that points to Symbol.
102 // As far as Java code is concerned, a Symbol array is either an array of
103 // int or long depending on pointer size.  Only stack trace elements in Throwable use
104 // this.  They cast Symbol* into this type.
105 typeArrayOop oopFactory::new_symbolArray(int length, TRAPS) {
106   BasicType type = LP64_ONLY(T_LONG) NOT_LP64(T_INT);
107   Klass* type_asKlassOop = Universe::typeArrayKlassObj(type);
108   TypeArrayKlass* type_asArrayKlass = TypeArrayKlass::cast(type_asKlassOop);
109   typeArrayOop result = type_asArrayKlass->allocate(length, THREAD);
110   return result;
111 }
112 
113 typeArrayOop oopFactory::new_typeArray_nozero(BasicType type, int length, TRAPS) {
114   Klass* type_asKlassOop = Universe::typeArrayKlassObj(type);
115   TypeArrayKlass* type_asArrayKlass = TypeArrayKlass::cast(type_asKlassOop);
116   typeArrayOop result = type_asArrayKlass->allocate_common(length, false, THREAD);
117   return result;
118 }
119 
120 
121 objArrayOop oopFactory::new_objArray(Klass* klass, int length, TRAPS) {
122   assert(klass->is_klass(), "must be instance class");
123   if (klass->is_array_klass()) {
124     return ArrayKlass::cast(klass)->allocate_arrayArray(1, length, THREAD);
125   } else {
126     return InstanceKlass::cast(klass)->allocate_objArray(1, length, THREAD);
127   }
128 }
129 
130 arrayOop oopFactory::new_valueArray(Klass* k, int length, TRAPS) {
131   InlineKlass* klass = InlineKlass::cast(k);
132   // Request a flat array, but we might not actually get it...either way "null-free" are the aaload/aastore semantics
133   Klass* array_klass = klass->value_array_klass(CHECK_NULL);
134   assert(array_klass->is_null_free_array_klass(), "Expect a null-free array class here");
135 
136   arrayOop oop;
137   if (array_klass->is_flatArray_klass()) {
138     oop = (arrayOop) FlatArrayKlass::cast(array_klass)->allocate(length, CHECK_NULL);
139     assert(oop == nullptr || oop->is_flatArray(), "sanity");
140     assert(oop == nullptr || oop->klass()->is_flatArray_klass(), "sanity");
141   } else {
142     oop = (arrayOop) ObjArrayKlass::cast(array_klass)->allocate(length, CHECK_NULL);
143   }
144   assert(oop == nullptr || oop->klass()->is_null_free_array_klass(), "sanity");
145   assert(oop == nullptr || oop->is_null_free_array(), "sanity");
146   return oop;
147 }
148 
149 objArrayHandle oopFactory::copy_flatArray_to_objArray(flatArrayHandle array, TRAPS) {
150   int len = array->length();
151   FlatArrayKlass* vak = FlatArrayKlass::cast(array->klass());
152   objArrayOop oarray = new_objectArray(array->length(), CHECK_(objArrayHandle()));
153   objArrayHandle oarrayh(THREAD, oarray);
154   vak->copy_array(array(), 0, oarrayh(), 0, len, CHECK_(objArrayHandle()));
155   return oarrayh;
156 }
157 
158 objArrayHandle  oopFactory::ensure_objArray(oop array, TRAPS) {
159   if (array != nullptr && array->is_flatArray()) {
160     return copy_flatArray_to_objArray(flatArrayHandle(THREAD, flatArrayOop(array)), THREAD);
161   } else {
162     return objArrayHandle(THREAD, objArrayOop(array));
163   }
164 }
165 
166 objArrayHandle oopFactory::new_objArray_handle(Klass* klass, int length, TRAPS) {
167   objArrayOop obj = new_objArray(klass, length, CHECK_(objArrayHandle()));
168   return objArrayHandle(THREAD, obj);
169 }