1 /*
  2  * Copyright (c) 1999, 2026, 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 "ci/ciField.hpp"
 26 #include "ci/ciInlineKlass.hpp"
 27 #include "ci/ciInstance.hpp"
 28 #include "ci/ciInstanceKlass.hpp"
 29 #include "ci/ciUtilities.inline.hpp"
 30 #include "classfile/javaClasses.hpp"
 31 #include "classfile/systemDictionary.hpp"
 32 #include "classfile/vmClasses.hpp"
 33 #include "memory/allocation.hpp"
 34 #include "memory/allocation.inline.hpp"
 35 #include "memory/resourceArea.hpp"
 36 #include "oops/fieldStreams.inline.hpp"
 37 #include "oops/instanceKlass.inline.hpp"
 38 #include "oops/klass.inline.hpp"
 39 #include "oops/oop.inline.hpp"
 40 #include "runtime/arguments.hpp"
 41 #include "runtime/fieldDescriptor.inline.hpp"
 42 #include "runtime/handles.inline.hpp"
 43 #include "runtime/jniHandles.inline.hpp"
 44 
 45 // ciInstanceKlass
 46 //
 47 // This class represents a Klass* in the HotSpot virtual machine
 48 // whose Klass part in an InstanceKlass.
 49 
 50 
 51 // ------------------------------------------------------------------
 52 // ciInstanceKlass::ciInstanceKlass
 53 //
 54 // Loaded instance klass.
 55 ciInstanceKlass::ciInstanceKlass(Klass* k) :
 56   ciKlass(k)
 57 {
 58   assert(get_Klass()->is_instance_klass(), "wrong type");
 59   assert(get_instanceKlass()->is_loaded(), "must be at least loaded");
 60   InstanceKlass* ik = get_instanceKlass();
 61 
 62   AccessFlags access_flags = ik->access_flags();
 63   _flags = ciFlags(access_flags);
 64   _has_finalizer = ik->has_finalizer();
 65   _has_subklass = flags().is_final() ? subklass_false : subklass_unknown;
 66   _init_state = ik->init_state();
 67   _has_nonstatic_fields = ik->has_nonstatic_fields();
 68   _has_nonstatic_concrete_methods = ik->has_nonstatic_concrete_methods();
 69   _is_hidden = ik->is_hidden();
 70   _is_record = ik->is_record();
 71   _declared_nonstatic_fields = nullptr; // initialized lazily by compute_nonstatic_fields
 72   _nonstatic_fields = nullptr;          // initialized lazily by compute_nonstatic_fields
 73   _trust_final_fields = ik->trust_final_fields();
 74   _has_injected_fields = -1;
 75   _implementor = nullptr;               // we will fill these lazily
 76   _transitive_interfaces = nullptr;
 77 
 78   // Ensure that the metadata wrapped by the ciMetadata is kept alive by GC.
 79   // This is primarily useful for metadata which is considered as weak roots
 80   // by the GC but need to be strong roots if reachable from a current compilation.
 81   // InstanceKlass are created for both weak and strong metadata.  Ensuring this metadata
 82   // alive covers the cases where there are weak roots without performance cost.
 83   oop holder = ik->klass_holder();
 84   if (ik->class_loader_data()->has_class_mirror_holder()) {
 85     // Though ciInstanceKlass records class loader oop, it's not enough to keep
 86     // non-strong hidden classes alive (loader == nullptr). Klass holder should
 87     // be used instead. It is enough to record a ciObject, since cached elements are never removed
 88     // during ciObjectFactory lifetime. ciObjectFactory itself is created for
 89     // every compilation and lives for the whole duration of the compilation.
 90     assert(holder != nullptr, "holder of hidden class is the mirror which is never null");
 91     (void)CURRENT_ENV->get_object(holder);
 92   }
 93 
 94   JavaThread *thread = JavaThread::current();
 95   if (ciObjectFactory::is_initialized()) {
 96     _loader = JNIHandles::make_local(thread, ik->class_loader());
 97     _is_shared = false;
 98   } else {
 99     Handle h_loader(thread, ik->class_loader());
100     _loader = JNIHandles::make_global(h_loader);
101     _is_shared = true;
102   }
103 
104   _has_trusted_loader = compute_has_trusted_loader();
105 
106   // Lazy fields get filled in only upon request.
107   _super  = nullptr;
108   _java_mirror = nullptr;
109 
110   if (is_shared()) {
111     if (k != vmClasses::Object_klass()) {
112       super();
113     }
114     //compute_nonstatic_fields();  // done outside of constructor
115   }
116 
117   _field_cache = nullptr;
118 }
119 
120 // Version for unloaded classes:
121 ciInstanceKlass::ciInstanceKlass(ciSymbol* name,
122                                  jobject loader,
123                                  BasicType bt)
124   : ciKlass(name, bt)
125 {
126   assert(name->char_at(0) != JVM_SIGNATURE_ARRAY, "not an instance klass");
127   _init_state = (InstanceKlass::ClassState)0;
128   _has_nonstatic_fields = false;
129   _declared_nonstatic_fields = nullptr; // initialized lazily by compute_nonstatic_fields
130   _nonstatic_fields = nullptr;          // initialized lazily by compute_nonstatic_fields
131   _has_injected_fields = -1;
132   _is_hidden = false;
133   _is_record = false;
134   _loader = loader;
135   _is_shared = false;
136   _super = nullptr;
137   _java_mirror = nullptr;
138   _field_cache = nullptr;
139   _has_trusted_loader = compute_has_trusted_loader();
140 }
141 
142 
143 
144 // ------------------------------------------------------------------
145 InstanceKlass::ClassState ciInstanceKlass::compute_init_state() {
146   if (_is_shared && is_loaded()) {
147     // Return cached init state of shared klass
148     ciEnv* env = CURRENT_ENV;
149     assert(env->task() != nullptr, "only calls from compilation are expected here");
150     return env->get_cached_init_state(ident());
151   }
152   return _init_state;
153 }
154 
155 // ------------------------------------------------------------------
156 // ciInstanceKlass::compute_shared_has_subklass
157 bool ciInstanceKlass::compute_shared_has_subklass() {
158   GUARDED_VM_ENTRY(
159     InstanceKlass* ik = get_instanceKlass();
160     _has_subklass = ik->subklass() != nullptr ? subklass_true : subklass_false;
161     return _has_subklass == subklass_true;
162   )
163 }
164 
165 // ------------------------------------------------------------------
166 // ciInstanceKlass::loader
167 oop ciInstanceKlass::loader() {
168   ASSERT_IN_VM;
169   return JNIHandles::resolve(_loader);
170 }
171 
172 // ------------------------------------------------------------------
173 // ciInstanceKlass::loader_handle
174 jobject ciInstanceKlass::loader_handle() {
175   return _loader;
176 }
177 
178 // ------------------------------------------------------------------
179 // ciInstanceKlass::field_cache
180 //
181 // Get the field cache associated with this klass.
182 ciConstantPoolCache* ciInstanceKlass::field_cache() {
183   if (is_shared()) {
184     return nullptr;
185   }
186   if (_field_cache == nullptr) {
187     assert(!is_java_lang_Object(), "Object has no fields");
188     Arena* arena = CURRENT_ENV->arena();
189     _field_cache = new (arena) ciConstantPoolCache(arena, 5);
190   }
191   return _field_cache;
192 }
193 
194 // ------------------------------------------------------------------
195 // ciInstanceKlass::get_canonical_holder
196 //
197 ciInstanceKlass* ciInstanceKlass::get_canonical_holder(int offset) {
198   #ifdef ASSERT
199   if (!(offset >= 0 && offset < layout_helper_size_in_bytes())) {
200     tty->print("*** get_canonical_holder(%d) on ", offset);
201     this->print();
202     tty->print_cr(" ***");
203   };
204   assert(offset >= 0 && offset < layout_helper_size_in_bytes(), "offset must be tame");
205   #endif
206 
207   if (offset < instanceOopDesc::base_offset_in_bytes()) {
208     // All header offsets belong properly to java/lang/Object.
209     return CURRENT_ENV->Object_klass();
210   }
211 
212   ciInstanceKlass* self = this;
213   assert(self->is_loaded(), "must be loaded to access field info");
214   ciField* field = self->get_field_by_offset(offset, false);
215   if (field != nullptr) {
216     return field->holder();
217   } else {
218     for (;;) {
219       assert(self->is_loaded(), "must be loaded to have size");
220       ciInstanceKlass* super = self->super();
221       if (super == nullptr ||
222           super->nof_nonstatic_fields() == 0 ||
223           super->layout_helper_size_in_bytes() <= offset) {
224         return self;
225       } else {
226         self = super;  // return super->get_canonical_holder(offset)
227       }
228     }
229   }
230 }
231 
232 // ------------------------------------------------------------------
233 // ciInstanceKlass::is_java_lang_Object
234 //
235 // Is this klass java.lang.Object?
236 bool ciInstanceKlass::is_java_lang_Object() const {
237   return equals(CURRENT_ENV->Object_klass());
238 }
239 
240 // ------------------------------------------------------------------
241 // ciInstanceKlass::uses_default_loader
242 bool ciInstanceKlass::uses_default_loader() const {
243   // Note:  We do not need to resolve the handle or enter the VM
244   // in order to test null-ness.
245   return _loader == nullptr;
246 }
247 
248 // ------------------------------------------------------------------
249 
250 /**
251  * Return basic type of boxed value for box klass or T_OBJECT if not.
252  */
253 BasicType ciInstanceKlass::box_klass_type() const {
254   if (uses_default_loader() && is_loaded()) {
255     return vmClasses::box_klass_type(get_Klass());
256   } else {
257     return T_OBJECT;
258   }
259 }
260 
261 /**
262  * Is this boxing klass?
263  */
264 bool ciInstanceKlass::is_box_klass() const {
265   return is_java_primitive(box_klass_type());
266 }
267 
268 /**
269  *  Is this boxed value offset?
270  */
271 bool ciInstanceKlass::is_boxed_value_offset(int offset) const {
272   BasicType bt = box_klass_type();
273   return is_java_primitive(bt) &&
274          (offset == java_lang_boxing_object::value_offset(bt));
275 }
276 
277 // ------------------------------------------------------------------
278 // ciInstanceKlass::is_in_package
279 //
280 // Is this klass in the given package?
281 bool ciInstanceKlass::is_in_package(const char* packagename, int len) {
282   // To avoid class loader mischief, this test always rejects application classes.
283   if (!uses_default_loader())
284     return false;
285   GUARDED_VM_ENTRY(
286     return is_in_package_impl(packagename, len);
287   )
288 }
289 
290 bool ciInstanceKlass::is_in_package_impl(const char* packagename, int len) {
291   ASSERT_IN_VM;
292 
293   // If packagename contains trailing '/' exclude it from the
294   // prefix-test since we test for it explicitly.
295   if (packagename[len - 1] == '/')
296     len--;
297 
298   if (!name()->starts_with(packagename, len))
299     return false;
300 
301   // Test if the class name is something like "java/lang".
302   if ((len + 1) > name()->utf8_length())
303     return false;
304 
305   // Test for trailing '/'
306   if (name()->char_at(len) != '/')
307     return false;
308 
309   // Make sure it's not actually in a subpackage:
310   if (name()->index_of_at(len+1, "/", 1) >= 0)
311     return false;
312 
313   return true;
314 }
315 
316 // ------------------------------------------------------------------
317 // ciInstanceKlass::print_impl
318 //
319 // Implementation of the print method.
320 void ciInstanceKlass::print_impl(outputStream* st) {
321   ciKlass::print_impl(st);
322   GUARDED_VM_ENTRY(st->print(" loader=" INTPTR_FORMAT, p2i(loader()));)
323   if (is_loaded()) {
324     st->print(" initialized=%s finalized=%s subklass=%s size=%d flags=",
325               bool_to_str(is_initialized()),
326               bool_to_str(has_finalizer()),
327               bool_to_str(has_subklass()),
328               layout_helper());
329 
330     _flags.print_klass_flags(st);
331 
332     if (_super) {
333       st->print(" super=");
334       _super->print_name_on(st);
335     }
336     if (_java_mirror) {
337       st->print(" mirror=PRESENT");
338     }
339   }
340 }
341 
342 // ------------------------------------------------------------------
343 // ciInstanceKlass::super
344 //
345 // Get the superklass of this klass.
346 ciInstanceKlass* ciInstanceKlass::super() {
347   assert(is_loaded(), "must be loaded");
348   if (_super == nullptr && !is_java_lang_Object()) {
349     GUARDED_VM_ENTRY(
350       Klass* super_klass = get_instanceKlass()->super();
351       _super = CURRENT_ENV->get_instance_klass(super_klass);
352     )
353   }
354   return _super;
355 }
356 
357 // ------------------------------------------------------------------
358 // ciInstanceKlass::java_mirror
359 //
360 // Get the instance of java.lang.Class corresponding to this klass.
361 // Cache it on this->_java_mirror.
362 ciInstance* ciInstanceKlass::java_mirror() {
363   if (is_shared()) {
364     return ciKlass::java_mirror();
365   }
366   if (_java_mirror == nullptr) {
367     _java_mirror = ciKlass::java_mirror();
368   }
369   return _java_mirror;
370 }
371 
372 // ------------------------------------------------------------------
373 // ciInstanceKlass::unique_concrete_subklass
374 ciInstanceKlass* ciInstanceKlass::unique_concrete_subklass() {
375   if (!is_loaded())     return nullptr; // No change if class is not loaded
376   if (!is_abstract())   return nullptr; // Only applies to abstract classes.
377   if (!has_subklass())  return nullptr; // Must have at least one subklass.
378   VM_ENTRY_MARK;
379   InstanceKlass* ik = get_instanceKlass();
380   Klass* up = ik->up_cast_abstract();
381   assert(up->is_instance_klass(), "must be InstanceKlass");
382   if (ik == up) {
383     return nullptr;
384   }
385   return CURRENT_THREAD_ENV->get_instance_klass(up);
386 }
387 
388 // ------------------------------------------------------------------
389 // ciInstanceKlass::has_finalizable_subclass
390 bool ciInstanceKlass::has_finalizable_subclass() {
391   if (!is_loaded())     return true;
392   VM_ENTRY_MARK;
393   return Dependencies::find_finalizable_subclass(get_instanceKlass()) != nullptr;
394 }
395 
396 bool ciInstanceKlass::contains_field_offset(int offset) const {
397   VM_ENTRY_MARK;
398   return get_instanceKlass()->contains_field_offset(offset);
399 }
400 
401 ciField* ciInstanceKlass::get_nonstatic_field_by_offset(const int field_offset) {
402   for (int i = 0, len = nof_nonstatic_fields(); i < len; i++) {
403     ciField* field = nonstatic_field_at(i);
404     int field_off = field->offset_in_bytes();
405     if (field_off == field_offset) {
406       return field;
407     }
408   }
409   return nullptr;
410 }
411 
412 // ------------------------------------------------------------------
413 // ciInstanceKlass::get_field_by_offset
414 ciField* ciInstanceKlass::get_field_by_offset(int field_offset, bool is_static) {
415   if (!is_static) {
416     return get_nonstatic_field_by_offset(field_offset);
417   }
418 
419   VM_ENTRY_MARK;
420   InstanceKlass* k = get_instanceKlass();
421   fieldDescriptor fd;
422   if (!k->find_field_from_offset(field_offset, is_static, &fd)) {
423     return nullptr;
424   }
425   ciField* field = new (CURRENT_THREAD_ENV->arena()) ciField(&fd);
426   return field;
427 }
428 
429 ciField* ciInstanceKlass::get_non_flat_field_by_offset(int field_offset) {
430   for (int i = 0, len = nof_declared_nonstatic_fields(); i < len; i++) {
431     ciField* field = declared_nonstatic_field_at(i);
432     int field_off = field->offset_in_bytes();
433     if (field_off == field_offset) {
434       return field;
435     }
436   }
437   return nullptr;
438 }
439 
440 int ciInstanceKlass::field_index_by_offset(int offset) {
441   int best_offset = 0;
442   int best_index = -1;
443   // Search the field with the given offset
444   for (int i = 0; i < nof_declared_nonstatic_fields(); ++i) {
445     int field_offset = declared_nonstatic_field_at(i)->offset_in_bytes();
446     if (field_offset == offset) {
447       // Exact match
448       return i;
449     } else if (field_offset < offset && field_offset > best_offset) {
450       // No exact match. Save the index of the field with the closest offset that
451       // is smaller than the given field offset. This index corresponds to the
452       // flat field that holds the field we are looking for.
453       best_offset = field_offset;
454       best_index = i;
455     }
456   }
457   assert(best_index >= 0, "field not found");
458   assert(best_offset == offset || declared_nonstatic_field_at(best_index)->type()->is_inlinetype(), "offset should match for non-inline types");
459   return best_index;
460 }
461 
462 // ------------------------------------------------------------------
463 // ciInstanceKlass::get_field_by_name
464 ciField* ciInstanceKlass::get_field_by_name(ciSymbol* name, ciSymbol* signature, bool is_static) {
465   VM_ENTRY_MARK;
466   InstanceKlass* k = get_instanceKlass();
467   fieldDescriptor fd;
468   Klass* def = k->find_field(name->get_symbol(), signature->get_symbol(), is_static, &fd);
469   if (def == nullptr) {
470     return nullptr;
471   }
472   ciField* field = new (CURRENT_THREAD_ENV->arena()) ciField(&fd);
473   return field;
474 }
475 
476 const GrowableArray<ciField*> empty_field_array(0, MemTag::mtCompiler);
477 
478 // This is essentially a shortcut for:
479 //   get_field_by_offset(field_offset, is_static)->layout_type()
480 // except this does not require allocating memory for a new ciField
481 BasicType ciInstanceKlass::get_field_type_by_offset(const int field_offset, const bool is_static) {
482   if (!is_static) {
483     ciField* field = get_nonstatic_field_by_offset(field_offset);
484     return field != nullptr ? field->layout_type() : T_ILLEGAL;
485   }
486 
487   // Avoid allocating a new ciField by obtaining the field type directly
488   VM_ENTRY_MARK;
489   InstanceKlass* k = get_instanceKlass();
490   fieldDescriptor fd;
491   if (!k->find_field_from_offset(field_offset, is_static, &fd)) {
492     return T_ILLEGAL;
493   }
494 
495   // Reproduce the behavior of ciField::layout_type
496   BasicType field_type = fd.field_type();
497   if (is_reference_type(field_type)) {
498     return T_OBJECT;
499   }
500   return type2field[make(field_type)->basic_type()];
501 }
502 
503 void ciInstanceKlass::compute_nonstatic_fields() {
504   assert(is_loaded(), "must be loaded");
505 
506   if (_nonstatic_fields != nullptr) {
507     assert(_declared_nonstatic_fields != nullptr, "must be initialized at the same time, class %s", name()->as_utf8());
508     return;
509   }
510 
511   if (!has_nonstatic_fields()) {
512     _declared_nonstatic_fields = &empty_field_array;
513     _nonstatic_fields = &empty_field_array;
514     return;
515   }
516   assert(!is_java_lang_Object(), "bootstrap OK");
517 
518   ciInstanceKlass* super = this->super();
519   assert(super != nullptr, "must have a super class, current class: %s", name()->as_utf8());
520   super->compute_nonstatic_fields();
521   const GrowableArray<ciField*>* super_declared_fields = super->_declared_nonstatic_fields;;
522   const GrowableArray<ciField*>* super_fields = super->_nonstatic_fields;
523   assert(super_declared_fields != nullptr && super_fields != nullptr, "must have been initialized, current class: %s, super class: %s", name()->as_utf8(), super->name()->as_utf8());
524 
525   GUARDED_VM_ENTRY({
526     compute_nonstatic_fields_impl(super_declared_fields, super_fields);
527   });
528 }
529 
530 void ciInstanceKlass::compute_nonstatic_fields_impl(const GrowableArray<ciField*>* super_declared_fields, const GrowableArray<ciField*>* super_fields) {
531   assert(_declared_nonstatic_fields == nullptr && _nonstatic_fields == nullptr, "initialized already");
532   ASSERT_IN_VM;
533   Arena* arena = CURRENT_ENV->arena();
534 
535   InstanceKlass* this_klass = get_instanceKlass();
536   int declared_field_num = 0;
537   int field_num = 0;
538   for (JavaFieldStream fs(this_klass); !fs.done(); fs.next()) {
539     if (fs.access_flags().is_static()) {
540       continue;
541     }
542 
543     declared_field_num++;
544 
545     fieldDescriptor& fd = fs.field_descriptor();
546     if (fd.is_flat()) {
547       InlineKlass* k = this_klass->get_inline_type_field_klass(fd.index());
548       ciInlineKlass* vk = CURRENT_ENV->get_klass(k)->as_inline_klass();
549       field_num += vk->nof_nonstatic_fields();
550       field_num += fd.has_null_marker() ? 1 : 0;
551     } else {
552       field_num++;
553     }
554   }
555 
556   GrowableArray<ciField*>* tmp_declared_fields = nullptr;
557   if (declared_field_num != 0) {
558     tmp_declared_fields = new (arena) GrowableArray<ciField*>(arena, declared_field_num + super_declared_fields->length(), 0, nullptr);
559     tmp_declared_fields->appendAll(super_declared_fields);
560   }
561 
562   GrowableArray<ciField*>* tmp_fields = nullptr;
563   if (field_num != 0) {
564     tmp_fields = new (arena) GrowableArray<ciField*>(arena, field_num + super_fields->length(), 0, nullptr);
565     tmp_fields->appendAll(super_fields);
566   }
567 
568   // For later assertion
569   declared_field_num += super_declared_fields->length();
570   field_num += super_fields->length();
571 
572   for (JavaFieldStream fs(this_klass); !fs.done(); fs.next()) {
573     if (fs.access_flags().is_static()) {
574       continue;
575     }
576 
577     fieldDescriptor& fd = fs.field_descriptor();
578     ciField* declared_field = new (arena) ciField(&fd);
579     assert(tmp_declared_fields != nullptr, "should be initialized");
580     tmp_declared_fields->append(declared_field);
581 
582     if (fd.is_flat()) {
583       // Flat fields are embedded
584       Klass* k = get_instanceKlass()->get_inline_type_field_klass(fd.index());
585       ciInlineKlass* vk = CURRENT_ENV->get_klass(k)->as_inline_klass();
586       // Iterate over fields of the flat inline type and copy them to 'this'
587       for (int i = 0; i < vk->nof_nonstatic_fields(); ++i) {
588         assert(tmp_fields != nullptr, "should be initialized");
589         tmp_fields->append(new (arena) ciField(declared_field, vk->nonstatic_field_at(i)));
590       }
591       if (fd.has_null_marker()) {
592         assert(tmp_fields != nullptr, "should be initialized");
593         tmp_fields->append(new (arena) ciField(declared_field));
594       }
595     } else {
596       assert(tmp_fields != nullptr, "should be initialized");
597       tmp_fields->append(declared_field);
598     }
599   }
600 
601   // Now sort them by offset, ascending. In principle, they could mix with superclass fields.
602   if (tmp_declared_fields != nullptr) {
603     assert(tmp_declared_fields->length() == declared_field_num, "sanity check failed for class: %s, number of declared fields: %d, expected: %d",
604            name()->as_utf8(), tmp_declared_fields->length(), declared_field_num);
605     _declared_nonstatic_fields = tmp_declared_fields;
606   } else {
607     _declared_nonstatic_fields = super_declared_fields;
608   }
609 
610   if (tmp_fields != nullptr) {
611     assert(tmp_fields->length() == field_num, "sanity check failed for class: %s, number of fields: %d, expected: %d",
612            name()->as_utf8(), tmp_fields->length(), field_num);
613     _nonstatic_fields = tmp_fields;
614   } else {
615     _nonstatic_fields = super_fields;
616   }
617 }
618 
619 bool ciInstanceKlass::compute_injected_fields_helper() {
620   ASSERT_IN_VM;
621   InstanceKlass* k = get_instanceKlass();
622 
623   for (InternalFieldStream fs(k); !fs.done(); fs.next()) {
624     if (fs.access_flags().is_static())  continue;
625     return true;
626   }
627   return false;
628 }
629 
630 void ciInstanceKlass::compute_injected_fields() {
631   assert(is_loaded(), "must be loaded");
632 
633   int has_injected_fields = 0;
634   if (super() != nullptr && super()->has_injected_fields()) {
635     has_injected_fields = 1;
636   } else {
637     GUARDED_VM_ENTRY({
638         has_injected_fields = compute_injected_fields_helper() ? 1 : 0;
639       });
640   }
641   // may be concurrently initialized for shared ciInstanceKlass objects
642   assert(_has_injected_fields == -1 || _has_injected_fields == has_injected_fields, "broken concurrent initialization");
643   _has_injected_fields = has_injected_fields;
644 }
645 
646 bool ciInstanceKlass::has_object_fields() const {
647   GUARDED_VM_ENTRY(
648       return get_instanceKlass()->nonstatic_oop_map_size() > 0;
649     );
650 }
651 
652 bool ciInstanceKlass::compute_has_trusted_loader() {
653   ASSERT_IN_VM;
654   oop loader_oop = loader();
655   if (loader_oop == nullptr) {
656     return true; // bootstrap class loader
657   }
658   return java_lang_ClassLoader::is_trusted_loader(loader_oop);
659 }
660 
661 bool ciInstanceKlass::has_class_initializer() {
662   VM_ENTRY_MARK;
663   return get_instanceKlass()->class_initializer() != nullptr;
664 }
665 
666 // ------------------------------------------------------------------
667 // ciInstanceKlass::find_method
668 //
669 // Find a method in this klass.
670 ciMethod* ciInstanceKlass::find_method(ciSymbol* name, ciSymbol* signature) {
671   VM_ENTRY_MARK;
672   InstanceKlass* k = get_instanceKlass();
673   Symbol* name_sym = name->get_symbol();
674   Symbol* sig_sym= signature->get_symbol();
675 
676   Method* m = k->find_method(name_sym, sig_sym);
677   if (m == nullptr)  return nullptr;
678 
679   return CURRENT_THREAD_ENV->get_method(m);
680 }
681 
682 // ------------------------------------------------------------------
683 // ciInstanceKlass::is_leaf_type
684 bool ciInstanceKlass::is_leaf_type() {
685   assert(is_loaded(), "must be loaded");
686   if (is_shared()) {
687     return is_final();  // approximately correct
688   } else {
689     return !has_subklass() && (!is_interface() || nof_implementors() == 0);
690   }
691 }
692 
693 // ------------------------------------------------------------------
694 // ciInstanceKlass::implementor
695 //
696 // Report an implementor of this interface.
697 // Note that there are various races here, since my copy
698 // of _nof_implementors might be out of date with respect
699 // to results returned by InstanceKlass::implementor.
700 // This is OK, since any dependencies we decide to assert
701 // will be checked later under the Compile_lock.
702 ciInstanceKlass* ciInstanceKlass::implementor() {
703   assert(is_interface(), "required");
704   ciInstanceKlass* impl = _implementor;
705   if (impl == nullptr) {
706     if (is_shared()) {
707       impl = this; // assume a well-known interface never has a unique implementor
708     } else {
709       // Go into the VM to fetch the implementor.
710       VM_ENTRY_MARK;
711       InstanceKlass* ik = get_instanceKlass();
712       Klass* implk = ik->implementor();
713       if (implk != nullptr) {
714         if (implk == ik) {
715           // More than one implementors. Use 'this' in this case.
716           impl = this;
717         } else {
718           impl = CURRENT_THREAD_ENV->get_instance_klass(implk);
719         }
720       }
721     }
722     // Memoize this result.
723     _implementor = impl;
724   }
725   return impl;
726 }
727 
728 bool ciInstanceKlass::can_be_inline_klass(bool is_exact) {
729   if (!Arguments::is_valhalla_enabled()) {
730     return false;
731   }
732   if (!is_loaded() || is_inlinetype()) {
733     // Not loaded or known to be an inline klass
734     return true;
735   }
736   if (!is_exact) {
737     // Not exact, check if this is a valid super for an inline klass
738     GUARDED_VM_ENTRY(
739       return !get_instanceKlass()->access_flags().is_identity_class() || is_java_lang_Object();
740     )
741   }
742   return false;
743 }
744 
745 // Utility class for printing of the contents of the static fields for
746 // use by compilation replay.  It only prints out the information that
747 // could be consumed by the compiler, so for primitive types it prints
748 // out the actual value.  For Strings it's the actual string value.
749 // For array types it it's first level array size since that's the
750 // only value which statically unchangeable.  For all other reference
751 // types it simply prints out the dynamic type.
752 
753 class StaticFieldPrinter : public FieldClosure {
754 protected:
755   outputStream* _out;
756 public:
757   StaticFieldPrinter(outputStream* out) :
758     _out(out) {
759   }
760   void do_field_helper(fieldDescriptor* fd, oop obj, bool is_flat);
761 };
762 
763 class StaticFinalFieldPrinter : public StaticFieldPrinter {
764   const char*   _holder;
765  public:
766   StaticFinalFieldPrinter(outputStream* out, const char* holder) :
767     StaticFieldPrinter(out), _holder(holder) {
768   }
769   void do_field(fieldDescriptor* fd) {
770     if (fd->is_final() && !fd->has_initial_value()) {
771       ResourceMark rm;
772       InstanceKlass* holder = fd->field_holder();
773       oop mirror = holder->java_mirror();
774       _out->print("staticfield %s %s ", _holder, fd->name()->as_quoted_ascii());
775       BasicType bt = fd->field_type();
776       if (bt != T_OBJECT && bt != T_ARRAY) {
777         _out->print("%s ", fd->signature()->as_quoted_ascii());
778       }
779       do_field_helper(fd, mirror, false);
780       _out->cr();
781     }
782   }
783 };
784 
785 class InlineTypeFieldPrinter : public StaticFieldPrinter {
786   oop _obj;
787 public:
788   InlineTypeFieldPrinter(outputStream* out, oop obj) :
789     StaticFieldPrinter(out), _obj(obj) {
790   }
791   void do_field(fieldDescriptor* fd) {
792     do_field_helper(fd, _obj, true);
793     _out->print(" ");
794   }
795 };
796 
797 void StaticFieldPrinter::do_field_helper(fieldDescriptor* fd, oop mirror, bool is_flat) {
798   BasicType field_type = fd->field_type();
799   switch (field_type) {
800     case T_BYTE:    _out->print("%d", mirror->byte_field(fd->offset()));   break;
801     case T_BOOLEAN: _out->print("%d", mirror->bool_field(fd->offset()));   break;
802     case T_SHORT:   _out->print("%d", mirror->short_field(fd->offset()));  break;
803     case T_CHAR:    _out->print("%d", mirror->char_field(fd->offset()));   break;
804     case T_INT:     _out->print("%d", mirror->int_field(fd->offset()));    break;
805     case T_LONG:    _out->print(INT64_FORMAT, (int64_t)(mirror->long_field(fd->offset())));   break;
806     case T_FLOAT: {
807       float f = mirror->float_field(fd->offset());
808       _out->print("%d", *(int*)&f);
809       break;
810     }
811     case T_DOUBLE: {
812       double d = mirror->double_field(fd->offset());
813       _out->print(INT64_FORMAT, *(int64_t*)&d);
814       break;
815     }
816     case T_ARRAY:  // fall-through
817     case T_OBJECT:
818       if (!fd->is_null_free_inline_type()) {
819         _out->print("%s ", fd->signature()->as_quoted_ascii());
820         oop value =  mirror->obj_field_acquire(fd->offset());
821         if (value == nullptr) {
822           if (field_type == T_ARRAY) {
823             _out->print("%d", -1);
824           }
825           _out->cr();
826         } else if (value->is_instance()) {
827           assert(field_type == T_OBJECT, "");
828           if (value->is_a(vmClasses::String_klass())) {
829             const char* ascii_value = java_lang_String::as_quoted_ascii(value);
830             _out->print("\"%s\"", (ascii_value != nullptr) ? ascii_value : "");
831           } else {
832             const char* klass_name  = value->klass()->name()->as_quoted_ascii();
833             _out->print("%s", klass_name);
834           }
835         } else if (value->is_array()) {
836           arrayOop a = (arrayOop)value;
837           _out->print("%d", a->length());
838           if (value->is_objArray()) {
839             objArrayOop oa = (objArrayOop)value;
840             const char* klass_name  = value->klass()->name()->as_quoted_ascii();
841             _out->print(" %s", klass_name);
842           }
843         } else {
844           ShouldNotReachHere();
845         }
846         break;
847       } else {
848         // handling of null free inline type
849         ResetNoHandleMark rnhm;
850         Thread* THREAD = Thread::current();
851         SignatureStream ss(fd->signature(), false);
852         Symbol* name = ss.as_symbol();
853         assert(!HAS_PENDING_EXCEPTION, "can resolve klass?");
854         InstanceKlass* holder = fd->field_holder();
855         InstanceKlass* k = SystemDictionary::find_instance_klass(THREAD, name,
856                                                                  Handle(THREAD, holder->class_loader()));
857         guarantee(k != nullptr && !HAS_PENDING_EXCEPTION, "can resolve klass?");
858         InlineKlass* vk = InlineKlass::cast(k);
859         oop obj;
860         if (is_flat) {
861           int field_offset = fd->offset() - vk->payload_offset();
862           obj = cast_to_oop(cast_from_oop<address>(mirror) + field_offset);
863         } else {
864           obj = mirror->obj_field_acquire(fd->offset());
865         }
866         InlineTypeFieldPrinter print_field(_out, obj);
867         vk->do_nonstatic_fields(&print_field);
868         break;
869       }
870     default:
871       ShouldNotReachHere();
872   }
873 }
874 
875 const char *ciInstanceKlass::replay_name() const {
876   return CURRENT_ENV->replay_name(get_instanceKlass());
877 }
878 
879 void ciInstanceKlass::dump_replay_instanceKlass(outputStream* out, InstanceKlass* ik) {
880   if (ik->is_hidden()) {
881     const char *name = CURRENT_ENV->dyno_name(ik);
882     if (name != nullptr) {
883       out->print_cr("instanceKlass %s # %s", name, ik->name()->as_quoted_ascii());
884     } else {
885       out->print_cr("# instanceKlass %s", ik->name()->as_quoted_ascii());
886     }
887   } else {
888     out->print_cr("instanceKlass %s", ik->name()->as_quoted_ascii());
889   }
890 }
891 
892 GrowableArray<ciInstanceKlass*>* ciInstanceKlass::transitive_interfaces() const{
893   if (_transitive_interfaces == nullptr) {
894     const_cast<ciInstanceKlass*>(this)->compute_transitive_interfaces();
895   }
896   return _transitive_interfaces;
897 }
898 
899 void ciInstanceKlass::compute_transitive_interfaces() {
900   GUARDED_VM_ENTRY(
901           InstanceKlass* ik = get_instanceKlass();
902           Array<InstanceKlass*>* interfaces = ik->transitive_interfaces();
903           int orig_length = interfaces->length();
904           Arena* arena = CURRENT_ENV->arena();
905           int transitive_interfaces_len = orig_length + (is_interface() ? 1 : 0);
906           GrowableArray<ciInstanceKlass*>* transitive_interfaces = new(arena)GrowableArray<ciInstanceKlass*>(arena, transitive_interfaces_len,
907                                                                                                              0, nullptr);
908           for (int i = 0; i < orig_length; i++) {
909             transitive_interfaces->append(CURRENT_ENV->get_instance_klass(interfaces->at(i)));
910           }
911           if (is_interface()) {
912             transitive_interfaces->append(this);
913           }
914           _transitive_interfaces = transitive_interfaces;
915   );
916 }
917 
918 void ciInstanceKlass::dump_replay_data(outputStream* out) {
919   ResourceMark rm;
920 
921   InstanceKlass* ik = get_instanceKlass();
922   ConstantPool*  cp = ik->constants();
923 
924   // Try to record related loaded classes
925   Klass* sub = ik->subklass();
926   while (sub != nullptr) {
927     if (sub->is_instance_klass()) {
928       InstanceKlass *isub = InstanceKlass::cast(sub);
929       dump_replay_instanceKlass(out, isub);
930     }
931     sub = sub->next_sibling();
932   }
933 
934   // Dump out the state of the constant pool tags.  During replay the
935   // tags will be validated for things which shouldn't change and
936   // classes will be resolved if the tags indicate that they were
937   // resolved at compile time.
938   const char *name = replay_name();
939   out->print("ciInstanceKlass %s %d %d %d", name,
940              is_linked(), is_initialized(), cp->length());
941   for (int index = 1; index < cp->length(); index++) {
942     out->print(" %d", cp->tags()->at(index));
943   }
944   out->cr();
945   if (is_initialized()) {
946     //  Dump out the static final fields in case the compilation relies
947     //  on their value for correct replay.
948     StaticFinalFieldPrinter sffp(out, name);
949     ik->do_local_static_fields(&sffp);
950   }
951 }
952 
953 #ifdef ASSERT
954 bool ciInstanceKlass::debug_final_field_at(int offset) {
955   GUARDED_VM_ENTRY(
956     InstanceKlass* ik = get_instanceKlass();
957     fieldDescriptor fd;
958     if (ik->find_field_from_offset(offset, false, &fd)) {
959       return fd.is_final();
960     }
961   );
962   return false;
963 }
964 
965 bool ciInstanceKlass::debug_stable_field_at(int offset) {
966   GUARDED_VM_ENTRY(
967     InstanceKlass* ik = get_instanceKlass();
968     fieldDescriptor fd;
969     if (ik->find_field_from_offset(offset, false, &fd)) {
970       return fd.is_stable();
971     }
972   );
973   return false;
974 }
975 #endif