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