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 Universe::boolArrayKlass()->allocate(length, THREAD);
49 }
50
51 typeArrayOop oopFactory::new_charArray(int length, TRAPS) {
52 return Universe::charArrayKlass()->allocate(length, THREAD);
53 }
54
55 typeArrayOop oopFactory::new_floatArray(int length, TRAPS) {
56 return Universe::floatArrayKlass()->allocate(length, THREAD);
57 }
58
59 typeArrayOop oopFactory::new_doubleArray(int length, TRAPS) {
60 return Universe::doubleArrayKlass()->allocate(length, THREAD);
61 }
62
63 typeArrayOop oopFactory::new_byteArray(int length, TRAPS) {
64 return Universe::byteArrayKlass()->allocate(length, THREAD);
65 }
66
67 typeArrayOop oopFactory::new_shortArray(int length, TRAPS) {
68 return Universe::shortArrayKlass()->allocate(length, THREAD);
69 }
70
71 typeArrayOop oopFactory::new_intArray(int length, TRAPS) {
72 return Universe::intArrayKlass()->allocate(length, THREAD);
73 }
74
75 typeArrayOop oopFactory::new_longArray(int length, TRAPS) {
76 return Universe::longArrayKlass()->allocate(length, THREAD);
77 }
78
79 // create java.lang.Object[]
80 objArrayOop oopFactory::new_objectArray(int length, TRAPS) {
81 assert(Universe::objectArrayKlass() != nullptr, "Too early?");
82 return Universe::objectArrayKlass()->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 TypeArrayKlass* klass = Universe::typeArrayKlass(type);
96 return klass->allocate(length, THREAD);
97 }
98
99 // Create a Java array that points to Symbol.
100 // As far as Java code is concerned, a Symbol array is either an array of
101 // int or long depending on pointer size. Only stack trace elements in Throwable use
102 // this. They cast Symbol* into this type.
103 typeArrayOop oopFactory::new_symbolArray(int length, TRAPS) {
104 BasicType type = LP64_ONLY(T_LONG) NOT_LP64(T_INT);
105 return new_typeArray(type, length, THREAD);
106 }
107
108 typeArrayOop oopFactory::new_typeArray_nozero(BasicType type, int length, TRAPS) {
109 TypeArrayKlass* klass = Universe::typeArrayKlass(type);
110 return klass->allocate_common(length, false, THREAD);
111 }
112
113
114 objArrayOop oopFactory::new_objArray(Klass* klass, int length, TRAPS) {
115 assert(klass->is_klass(), "must be instance class");
116 if (klass->is_array_klass()) {
117 return ArrayKlass::cast(klass)->allocate_arrayArray(1, length, THREAD);
118 } else {
119 return InstanceKlass::cast(klass)->allocate_objArray(1, length, THREAD);
120 }
121 }
122
123 arrayOop oopFactory::new_valueArray(Klass* k, int length, TRAPS) {
124 InlineKlass* klass = InlineKlass::cast(k);
125 // Request a flat array, but we might not actually get it...either way "null-free" are the aaload/aastore semantics
126 Klass* array_klass = klass->value_array_klass(CHECK_NULL);
127 assert(array_klass->is_null_free_array_klass(), "Expect a null-free array class here");
128
129 arrayOop oop;
130 if (array_klass->is_flatArray_klass()) {
131 oop = (arrayOop) FlatArrayKlass::cast(array_klass)->allocate(length, CHECK_NULL);
132 assert(oop == nullptr || oop->is_flatArray(), "sanity");
133 assert(oop == nullptr || oop->klass()->is_flatArray_klass(), "sanity");
134 } else {
135 oop = (arrayOop) ObjArrayKlass::cast(array_klass)->allocate(length, CHECK_NULL);
136 }
137 assert(oop == nullptr || oop->klass()->is_null_free_array_klass(), "sanity");
138 assert(oop == nullptr || oop->is_null_free_array(), "sanity");
139 return oop;
140 }
141
142 objArrayHandle oopFactory::copy_flatArray_to_objArray(flatArrayHandle array, TRAPS) {
143 int len = array->length();
144 FlatArrayKlass* vak = FlatArrayKlass::cast(array->klass());
145 objArrayOop oarray = new_objectArray(array->length(), CHECK_(objArrayHandle()));
146 objArrayHandle oarrayh(THREAD, oarray);
147 vak->copy_array(array(), 0, oarrayh(), 0, len, CHECK_(objArrayHandle()));
148 return oarrayh;
149 }
150
151 objArrayHandle oopFactory::ensure_objArray(oop array, TRAPS) {
152 if (array != nullptr && array->is_flatArray()) {
153 return copy_flatArray_to_objArray(flatArrayHandle(THREAD, flatArrayOop(array)), THREAD);
154 } else {
155 return objArrayHandle(THREAD, objArrayOop(array));
156 }
157 }
158
159 objArrayHandle oopFactory::new_objArray_handle(Klass* klass, int length, TRAPS) {
160 objArrayOop obj = new_objArray(klass, length, CHECK_(objArrayHandle()));
161 return objArrayHandle(THREAD, obj);
162 }