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