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