1 /*
  2  * Copyright (c) 2015, 2025, 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 #ifndef SHARE_CLASSFILE_JAVACLASSES_INLINE_HPP
 26 #define SHARE_CLASSFILE_JAVACLASSES_INLINE_HPP
 27 
 28 #include "classfile/javaClasses.hpp"
 29 
 30 #include "memory/referenceType.hpp"
 31 #include "oops/access.inline.hpp"
 32 #include "oops/instanceKlass.inline.hpp"
 33 #include "oops/method.hpp"
 34 #include "oops/oop.inline.hpp"
 35 #include "oops/oopsHierarchy.hpp"
 36 #include "oops/typeArrayOop.inline.hpp"
 37 
 38 void java_lang_String::set_coder(oop string, jbyte coder) {
 39   string->byte_field_put(_coder_offset, coder);
 40 }
 41 
 42 void java_lang_String::set_value(oop string, typeArrayOop buffer) {
 43   string->obj_field_put(_value_offset, buffer);
 44 }
 45 
 46 bool java_lang_String::hash_is_set(oop java_string) {
 47   return java_string->int_field(_hash_offset) != 0 || java_string->bool_field(_hashIsZero_offset) != 0;
 48 }
 49 
 50 // Accessors
 51 bool java_lang_String::value_equals(typeArrayOop str_value1, typeArrayOop str_value2) {
 52   return ((str_value1 == str_value2) ||
 53           (str_value1->length() == str_value2->length() &&
 54            (!memcmp(str_value1->base(T_BYTE),
 55                     str_value2->base(T_BYTE),
 56                     str_value2->length() * sizeof(jbyte)))));
 57 }
 58 
 59 typeArrayOop java_lang_String::value(oop java_string) {
 60   assert(is_instance(java_string), "must be java_string");
 61   return (typeArrayOop) java_string->obj_field(_value_offset);
 62 }
 63 
 64 typeArrayOop java_lang_String::value_no_keepalive(oop java_string) {
 65   assert(is_instance(java_string), "must be java_string");
 66   return (typeArrayOop) java_string->obj_field_access<AS_NO_KEEPALIVE>(_value_offset);
 67 }
 68 
 69 bool java_lang_String::is_latin1(oop java_string) {
 70   assert(is_instance(java_string), "must be java_string");
 71   jbyte coder = java_string->byte_field(_coder_offset);
 72   assert(CompactStrings || coder == CODER_UTF16, "Must be UTF16 without CompactStrings");
 73   return coder == CODER_LATIN1;
 74 }
 75 
 76 uint8_t* java_lang_String::flags_addr(oop java_string) {
 77   assert(_initialized, "Must be initialized");
 78   assert(is_instance(java_string), "Must be java string");
 79   return java_string->field_addr<uint8_t>(_flags_offset);
 80 }
 81 
 82 bool java_lang_String::is_flag_set(oop java_string, uint8_t flag_mask) {
 83   return (AtomicAccess::load(flags_addr(java_string)) & flag_mask) != 0;
 84 }
 85 
 86 bool java_lang_String::deduplication_forbidden(oop java_string) {
 87   return is_flag_set(java_string, _deduplication_forbidden_mask);
 88 }
 89 
 90 bool java_lang_String::deduplication_requested(oop java_string) {
 91   return is_flag_set(java_string, _deduplication_requested_mask);
 92 }
 93 
 94 bool java_lang_String::deduplication_requested_or_forbidden(oop java_string) {
 95   return is_flag_set(java_string, _deduplication_requested_mask | _deduplication_forbidden_mask);
 96 }
 97 
 98 void java_lang_String::set_deduplication_forbidden(oop java_string) {
 99   test_and_set_flag(java_string, _deduplication_forbidden_mask);
100 }
101 
102 bool java_lang_String::test_and_set_deduplication_requested(oop java_string) {
103   return test_and_set_flag(java_string, _deduplication_requested_mask);
104 }
105 
106 int java_lang_String::length(oop java_string, typeArrayOop value) {
107   assert(_initialized, "Must be initialized");
108   assert(is_instance(java_string), "must be java_string");
109   assert(value_equals(value, java_lang_String::value(java_string)),
110          "value must be equal to java_lang_String::value(java_string)");
111   if (value == nullptr) {
112     return 0;
113   }
114   int arr_length = value->length();
115   if (!is_latin1(java_string)) {
116     assert((arr_length & 1) == 0, "should be even for UTF16 string");
117     arr_length >>= 1; // convert number of bytes to number of elements
118   }
119   return arr_length;
120 }
121 
122 int java_lang_String::length(oop java_string) {
123   assert(_initialized, "Must be initialized");
124   assert(is_instance(java_string), "must be java_string");
125   typeArrayOop value = java_lang_String::value_no_keepalive(java_string);
126   return length(java_string, value);
127 }
128 
129 bool java_lang_String::is_instance(oop obj) {
130   return obj != nullptr && obj->klass() == vmClasses::String_klass();
131 }
132 
133 // Accessors
134 
135 oop java_lang_ref_Reference::weak_referent_no_keepalive(oop ref) {
136   assert(java_lang_ref_Reference::is_weak(ref) || java_lang_ref_Reference::is_soft(ref), "must be Weak or Soft Reference");
137   return ref->obj_field_access<ON_WEAK_OOP_REF | AS_NO_KEEPALIVE>(_referent_offset);
138 }
139 
140 oop java_lang_ref_Reference::weak_referent(oop ref) {
141   assert(java_lang_ref_Reference::is_weak(ref) || java_lang_ref_Reference::is_soft(ref), "must be Weak or Soft Reference");
142   return ref->obj_field_access<ON_WEAK_OOP_REF>(_referent_offset);
143 }
144 
145 oop java_lang_ref_Reference::phantom_referent_no_keepalive(oop ref) {
146   assert(java_lang_ref_Reference::is_phantom(ref), "must be Phantom Reference");
147   return ref->obj_field_access<ON_PHANTOM_OOP_REF | AS_NO_KEEPALIVE>(_referent_offset);
148 }
149 
150 oop java_lang_ref_Reference::unknown_referent_no_keepalive(oop ref) {
151   return ref->obj_field_access<ON_UNKNOWN_OOP_REF | AS_NO_KEEPALIVE>(_referent_offset);
152 }
153 
154 void java_lang_ref_Reference::clear_referent(oop ref) {
155   HeapAccess<ON_UNKNOWN_OOP_REF | AS_NO_KEEPALIVE>::oop_store_at(ref, _referent_offset, nullptr);
156 }
157 
158 void java_lang_ref_Reference::clear_referent_raw(oop ref) {
159   ref->obj_field_put_raw(_referent_offset, nullptr);
160 }
161 
162 HeapWord* java_lang_ref_Reference::referent_addr_raw(oop ref) {
163   return ref->field_addr<HeapWord>(_referent_offset);
164 }
165 
166 oop java_lang_ref_Reference::next(oop ref) {
167   return ref->obj_field(_next_offset);
168 }
169 
170 void java_lang_ref_Reference::set_next(oop ref, oop value) {
171   ref->obj_field_put(_next_offset, value);
172 }
173 
174 void java_lang_ref_Reference::set_next_raw(oop ref, oop value) {
175   ref->obj_field_put_raw(_next_offset, value);
176 }
177 
178 HeapWord* java_lang_ref_Reference::next_addr_raw(oop ref) {
179   return ref->field_addr<HeapWord>(_next_offset);
180 }
181 
182 oop java_lang_ref_Reference::discovered(oop ref) {
183   return ref->obj_field(_discovered_offset);
184 }
185 
186 void java_lang_ref_Reference::set_discovered(oop ref, oop value) {
187   ref->obj_field_put(_discovered_offset, value);
188 }
189 
190 void java_lang_ref_Reference::set_discovered_raw(oop ref, oop value) {
191   ref->obj_field_put_raw(_discovered_offset, value);
192 }
193 
194 HeapWord* java_lang_ref_Reference::discovered_addr_raw(oop ref) {
195   return ref->field_addr<HeapWord>(_discovered_offset);
196 }
197 
198 bool java_lang_ref_Reference::is_final(oop ref) {
199   return InstanceKlass::cast(ref->klass())->reference_type() == REF_FINAL;
200 }
201 
202 bool java_lang_ref_Reference::is_phantom(oop ref) {
203   return InstanceKlass::cast(ref->klass())->reference_type() == REF_PHANTOM;
204 }
205 
206 bool java_lang_ref_Reference::is_weak(oop ref) {
207   return InstanceKlass::cast(ref->klass())->reference_type() == REF_WEAK;
208 }
209 
210 bool java_lang_ref_Reference::is_soft(oop ref) {
211   return InstanceKlass::cast(ref->klass())->reference_type() == REF_SOFT;
212 }
213 
214 inline oop java_lang_Thread::continuation(oop java_thread) {
215   return java_thread->obj_field(_continuation_offset);
216 }
217 
218 inline int64_t java_lang_Thread::thread_id(oop java_thread) {
219   return java_thread->long_field(_tid_offset);
220 }
221 
222 inline oop java_lang_VirtualThread::vthread_scope() {
223   oop base = vmClasses::VirtualThread_klass()->static_field_base_raw();
224   return base->obj_field(static_vthread_scope_offset);
225 }
226 
227 inline ObjectWaiter* java_lang_VirtualThread::objectWaiter(oop vthread) {
228   return (ObjectWaiter*)vthread->address_field(_objectWaiter_offset);
229 }
230 
231 inline void java_lang_VirtualThread::set_objectWaiter(oop vthread, ObjectWaiter* value) {
232   vthread->address_field_put(_objectWaiter_offset, (address)value);
233 }
234 
235 #if INCLUDE_JFR
236 inline u2 java_lang_Thread::jfr_epoch(oop ref) {
237   return ref->short_field(_jfr_epoch_offset);
238 }
239 
240 inline void java_lang_Thread::set_jfr_epoch(oop ref, u2 epoch) {
241   ref->short_field_put(_jfr_epoch_offset, epoch);
242 }
243 #endif // INCLUDE_JFR
244 
245 
246 inline void java_lang_invoke_CallSite::set_target_volatile(oop site, oop target) {
247   site->obj_field_put_volatile(_target_offset, target);
248 }
249 
250 inline oop  java_lang_invoke_CallSite::target(oop site) {
251   return site->obj_field(_target_offset);
252 }
253 
254 inline void java_lang_invoke_CallSite::set_target(oop site, oop target) {
255   site->obj_field_put(_target_offset, target);
256 }
257 
258 inline bool java_lang_invoke_CallSite::is_instance(oop obj) {
259   return obj != nullptr && is_subclass(obj->klass());
260 }
261 
262 inline jboolean java_lang_invoke_ConstantCallSite::is_frozen(oop site) {
263   return site->bool_field(_is_frozen_offset);
264 }
265 
266 inline bool java_lang_invoke_ConstantCallSite::is_instance(oop obj) {
267   return obj != nullptr && is_subclass(obj->klass());
268 }
269 
270 inline bool java_lang_invoke_MemberName::is_instance(oop obj) {
271   return obj != nullptr && obj->klass() == vmClasses::MemberName_klass();
272 }
273 
274 inline bool java_lang_invoke_ResolvedMethodName::is_instance(oop obj) {
275   return obj != nullptr && obj->klass() == vmClasses::ResolvedMethodName_klass();
276 }
277 
278 inline bool java_lang_invoke_MethodType::is_instance(oop obj) {
279   return obj != nullptr && obj->klass() == vmClasses::MethodType_klass();
280 }
281 
282 inline bool java_lang_invoke_MethodHandle::is_instance(oop obj) {
283   return obj != nullptr && is_subclass(obj->klass());
284 }
285 
286 inline bool java_lang_Class::is_instance(oop obj) {
287   return obj != nullptr && obj->klass() == vmClasses::Class_klass();
288 }
289 
290 inline Klass* java_lang_Class::as_Klass(oop java_class) {
291   //%note memory_2
292   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
293   Klass* k = ((Klass*)java_class->metadata_field(_klass_offset));
294   assert(k == nullptr || k->is_klass(), "type check");
295   return k;
296 }
297 
298 inline InstanceKlass* java_lang_Class::as_InstanceKlass(oop java_class) {
299   Klass* k = as_Klass(java_class);
300   assert(k == nullptr || k->is_instance_klass(), "type check");
301   return static_cast<InstanceKlass*>(k);
302 }
303 
304 inline bool java_lang_Class::is_primitive(oop java_class) {
305   // should assert:
306   // assert(java_lang_Class::is_instance(java_class), "must be a Class object");
307   bool is_primitive = (java_class->metadata_field(_klass_offset) == nullptr);
308 
309 #ifdef ASSERT
310   // The heapwalker walks through Classes that have had their Klass pointers removed, so can't assert this.
311   // assert(is_primitive == java_class->bool_field(_is_primitive_offset), "must match what we told Java");
312   if (java_class->bool_field(_is_primitive_offset)) {
313     Klass* k = ((Klass*)java_class->metadata_field(_array_klass_offset));
314     assert(k == nullptr || is_java_primitive(ArrayKlass::cast(k)->element_type()),
315         "Should be either the T_VOID primitive or a java primitive");
316   }
317 #endif
318 
319   return is_primitive;
320 }
321 
322 inline size_t java_lang_Class::oop_size(oop java_class) {
323   assert(_oop_size_offset != 0, "must be set");
324   int size = java_class->int_field(_oop_size_offset);
325   assert(size > 0, "Oop size must be greater than zero, not %d", size);
326   return size;
327 }
328 
329 inline bool java_lang_invoke_DirectMethodHandle::is_instance(oop obj) {
330   return obj != nullptr && is_subclass(obj->klass());
331 }
332 
333 inline bool java_lang_Module::is_instance(oop obj) {
334   return obj != nullptr && obj->klass() == vmClasses::Module_klass();
335 }
336 
337 inline int Backtrace::merge_bci_and_version(int bci, int version) {
338   // only store u2 for version, checking for overflow.
339   if (version > USHRT_MAX || version < 0) version = USHRT_MAX;
340   assert((u2)bci == bci, "bci should be short");
341   return build_int_from_shorts((u2)version, (u2)bci);
342 }
343 
344 inline int Backtrace::merge_mid_and_cpref(int mid, int cpref) {
345   // only store u2 for mid and cpref, checking for overflow.
346   assert((u2)mid == mid, "mid should be short");
347   assert((u2)cpref == cpref, "cpref should be short");
348   return build_int_from_shorts((u2)cpref, (u2)mid);
349 }
350 
351 inline int Backtrace::bci_at(unsigned int merged) {
352   return extract_high_short_from_int(merged);
353 }
354 
355 inline int Backtrace::version_at(unsigned int merged) {
356   return extract_low_short_from_int(merged);
357 }
358 
359 inline int Backtrace::mid_at(unsigned int merged) {
360   return extract_high_short_from_int(merged);
361 }
362 
363 inline int Backtrace::cpref_at(unsigned int merged) {
364   return extract_low_short_from_int(merged);
365 }
366 
367 inline int Backtrace::get_line_number(Method* method, int bci) {
368   int line_number = 0;
369   if (method->is_native()) {
370     // Negative value different from -1 below, enabling Java code in
371     // class java.lang.StackTraceElement to distinguish "native" from
372     // "no LineNumberTable".  JDK tests for -2.
373     line_number = -2;
374   } else {
375     // Returns -1 if no LineNumberTable, and otherwise actual line number
376     line_number = method->line_number_from_bci(bci);
377   }
378   return line_number;
379 }
380 
381 inline Symbol* Backtrace::get_source_file_name(InstanceKlass* holder, int version) {
382   // RedefineClasses() currently permits redefine operations to
383   // happen in parallel using a "last one wins" philosophy. That
384   // spec laxness allows the constant pool entry associated with
385   // the source_file_name_index for any older constant pool version
386   // to be unstable so we shouldn't try to use it.
387   if (holder->constants()->version() != version) {
388     return nullptr;
389   } else {
390     return holder->source_file_name();
391   }
392 }
393 
394 #endif // SHARE_CLASSFILE_JAVACLASSES_INLINE_HPP