1 /*
  2  * Copyright (c) 2001, 2017, 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 "precompiled.hpp"
 26 #include "ci/ciMetadata.hpp"
 27 #include "ci/ciMethodData.hpp"
 28 #include "ci/ciReplay.hpp"
 29 #include "ci/ciUtilities.inline.hpp"
 30 #include "memory/allocation.inline.hpp"
 31 #include "memory/resourceArea.hpp"
 32 #include "runtime/deoptimization.hpp"
 33 #include "utilities/copy.hpp"
 34 
 35 // ciMethodData
 36 
 37 // ------------------------------------------------------------------
 38 // ciMethodData::ciMethodData
 39 //
 40 ciMethodData::ciMethodData(MethodData* md) : ciMetadata(md) {
 41   assert(md != NULL, "no null method data");
 42   Copy::zero_to_words((HeapWord*) &_orig, sizeof(_orig) / sizeof(HeapWord));
 43   _data = NULL;
 44   _data_size = 0;
 45   _extra_data_size = 0;
 46   _current_mileage = 0;
 47   _invocation_counter = 0;
 48   _backedge_counter = 0;
 49   _state = empty_state;
 50   _saw_free_extra_data = false;
 51   // Set an initial hint. Don't use set_hint_di() because
 52   // first_di() may be out of bounds if data_size is 0.
 53   _hint_di = first_di();
 54   // Initialize the escape information (to "don't know.");
 55   _eflags = _arg_local = _arg_stack = _arg_returned = 0;
 56   _parameters = NULL;
 57 }
 58 
 59 // ------------------------------------------------------------------
 60 // ciMethodData::ciMethodData
 61 //
 62 // No MethodData*.
 63 ciMethodData::ciMethodData() : ciMetadata(NULL) {
 64   Copy::zero_to_words((HeapWord*) &_orig, sizeof(_orig) / sizeof(HeapWord));
 65   _data = NULL;
 66   _data_size = 0;
 67   _extra_data_size = 0;
 68   _current_mileage = 0;
 69   _invocation_counter = 0;
 70   _backedge_counter = 0;
 71   _state = empty_state;
 72   _saw_free_extra_data = false;
 73   // Set an initial hint. Don't use set_hint_di() because
 74   // first_di() may be out of bounds if data_size is 0.
 75   _hint_di = first_di();
 76   // Initialize the escape information (to "don't know.");
 77   _eflags = _arg_local = _arg_stack = _arg_returned = 0;
 78   _parameters = NULL;
 79 }
 80 
 81 void ciMethodData::load_extra_data() {
 82   MethodData* mdo = get_MethodData();
 83 
 84   MutexLocker ml(mdo->extra_data_lock());
 85 
 86   // speculative trap entries also hold a pointer to a Method so need to be translated
 87   DataLayout* dp_src  = mdo->extra_data_base();
 88   DataLayout* end_src = mdo->args_data_limit();
 89   DataLayout* dp_dst  = extra_data_base();
 90   for (;; dp_src = MethodData::next_extra(dp_src), dp_dst = MethodData::next_extra(dp_dst)) {
 91     assert(dp_src < end_src, "moved past end of extra data");
 92     assert(((intptr_t)dp_dst) - ((intptr_t)extra_data_base()) == ((intptr_t)dp_src) - ((intptr_t)mdo->extra_data_base()), "source and destination don't match");
 93 
 94     // New traps in the MDO may have been added since we copied the
 95     // data (concurrent deoptimizations before we acquired
 96     // extra_data_lock above) or can be removed (a safepoint may occur
 97     // in the translate_from call below) as we translate the copy:
 98     // update the copy as we go.
 99     int tag = dp_src->tag();
100     if (tag != DataLayout::arg_info_data_tag) {
101       memcpy(dp_dst, dp_src, ((intptr_t)MethodData::next_extra(dp_src)) - ((intptr_t)dp_src));
102     }
103 
104     switch(tag) {
105     case DataLayout::speculative_trap_data_tag: {
106       ciSpeculativeTrapData data_dst(dp_dst);
107       SpeculativeTrapData   data_src(dp_src);
108 
109       { // During translation a safepoint can happen or VM lock can be taken (e.g., Compile_lock).
110         MutexUnlocker ml(mdo->extra_data_lock());
111         data_dst.translate_from(&data_src);
112       }
113       break;
114     }
115     case DataLayout::bit_data_tag:
116       break;
117     case DataLayout::no_tag:
118     case DataLayout::arg_info_data_tag:
119       // An empty slot or ArgInfoData entry marks the end of the trap data
120       {
121         return; // Need a block to avoid SS compiler bug
122       }
123     default:
124       fatal("bad tag = %d", tag);
125     }
126   }
127 }
128 
129 void ciMethodData::load_data() {
130   MethodData* mdo = get_MethodData();
131   if (mdo == NULL) {
132     return;
133   }
134 
135   // To do: don't copy the data if it is not "ripe" -- require a minimum #
136   // of invocations.
137 
138   // Snapshot the data -- actually, take an approximate snapshot of
139   // the data.  Any concurrently executing threads may be changing the
140   // data as we copy it.
141   Copy::disjoint_words((HeapWord*) mdo,
142                        (HeapWord*) &_orig,
143                        sizeof(_orig) / HeapWordSize);
144   Arena* arena = CURRENT_ENV->arena();
145   _data_size = mdo->data_size();
146   _extra_data_size = mdo->extra_data_size();
147   int total_size = _data_size + _extra_data_size;
148   _data = (intptr_t *) arena->Amalloc(total_size);
149   Copy::disjoint_words((HeapWord*) mdo->data_base(), (HeapWord*) _data, total_size / HeapWordSize);
150 
151   // Traverse the profile data, translating any oops into their
152   // ci equivalents.
153   ResourceMark rm;
154   ciProfileData* ci_data = first_data();
155   ProfileData* data = mdo->first_data();
156   while (is_valid(ci_data)) {
157     ci_data->translate_from(data);
158     ci_data = next_data(ci_data);
159     data = mdo->next_data(data);
160   }
161   if (mdo->parameters_type_data() != NULL) {
162     _parameters = data_layout_at(mdo->parameters_type_data_di());
163     ciParametersTypeData* parameters = new ciParametersTypeData(_parameters);
164     parameters->translate_from(mdo->parameters_type_data());
165   }
166 
167   load_extra_data();
168 
169   // Note:  Extra data are all BitData, and do not need translation.
170   _current_mileage = MethodData::mileage_of(mdo->method());
171   _invocation_counter = mdo->invocation_count();
172   _backedge_counter = mdo->backedge_count();
173   _state = mdo->is_mature()? mature_state: immature_state;
174 
175   _eflags = mdo->eflags();
176   _arg_local = mdo->arg_local();
177   _arg_stack = mdo->arg_stack();
178   _arg_returned  = mdo->arg_returned();
179 #ifndef PRODUCT
180   if (ReplayCompiles) {
181     ciReplay::initialize(this);
182   }
183 #endif
184 }
185 
186 void ciReceiverTypeData::translate_receiver_data_from(const ProfileData* data) {
187   for (uint row = 0; row < row_limit(); row++) {
188     Klass* k = data->as_ReceiverTypeData()->receiver(row);
189     if (k != NULL) {
190       if (k->is_loader_alive()) {
191         ciKlass* klass = CURRENT_ENV->get_klass(k);
192         set_receiver(row, klass);
193       } else {
194         // With concurrent class unloading, the MDO could have stale metadata; override it
195         clear_row(row);
196       }
197     }
198   }
199 }
200 
201 void ciTypeStackSlotEntries::translate_type_data_from(const TypeStackSlotEntries* entries) {
202   for (int i = 0; i < number_of_entries(); i++) {
203     intptr_t k = entries->type(i);
204     Klass* klass = (Klass*)klass_part(k);
205     if (klass != NULL && !klass->is_loader_alive()) {
206       // With concurrent class unloading, the MDO could have stale metadata; override it
207       TypeStackSlotEntries::set_type(i, TypeStackSlotEntries::with_status((Klass*)NULL, k));
208     } else {
209       TypeStackSlotEntries::set_type(i, translate_klass(k));
210     }
211   }
212 }
213 
214 void ciReturnTypeEntry::translate_type_data_from(const ReturnTypeEntry* ret) {
215   intptr_t k = ret->type();
216   Klass* klass = (Klass*)klass_part(k);
217   if (klass != NULL && !klass->is_loader_alive()) {
218     // With concurrent class unloading, the MDO could have stale metadata; override it
219     set_type(ReturnTypeEntry::with_status((Klass*)NULL, k));
220   } else {
221     set_type(translate_klass(k));
222   }
223 }
224 
225 void ciSpeculativeTrapData::translate_from(const ProfileData* data) {
226   Method* m = data->as_SpeculativeTrapData()->method();
227   ciMethod* ci_m = CURRENT_ENV->get_method(m);
228   set_method(ci_m);
229 }
230 
231 // Get the data at an arbitrary (sort of) data index.
232 ciProfileData* ciMethodData::data_at(int data_index) {
233   if (out_of_bounds(data_index)) {
234     return NULL;
235   }
236   DataLayout* data_layout = data_layout_at(data_index);
237 
238   switch (data_layout->tag()) {
239   case DataLayout::no_tag:
240   default:
241     ShouldNotReachHere();
242     return NULL;
243   case DataLayout::bit_data_tag:
244     return new ciBitData(data_layout);
245   case DataLayout::counter_data_tag:
246     return new ciCounterData(data_layout);
247   case DataLayout::jump_data_tag:
248     return new ciJumpData(data_layout);
249   case DataLayout::receiver_type_data_tag:
250     return new ciReceiverTypeData(data_layout);
251   case DataLayout::virtual_call_data_tag:
252     return new ciVirtualCallData(data_layout);
253   case DataLayout::ret_data_tag:
254     return new ciRetData(data_layout);
255   case DataLayout::branch_data_tag:
256     return new ciBranchData(data_layout);
257   case DataLayout::multi_branch_data_tag:
258     return new ciMultiBranchData(data_layout);
259   case DataLayout::arg_info_data_tag:
260     return new ciArgInfoData(data_layout);
261   case DataLayout::call_type_data_tag:
262     return new ciCallTypeData(data_layout);
263   case DataLayout::virtual_call_type_data_tag:
264     return new ciVirtualCallTypeData(data_layout);
265   case DataLayout::parameters_type_data_tag:
266     return new ciParametersTypeData(data_layout);
267   };
268 }
269 
270 // Iteration over data.
271 ciProfileData* ciMethodData::next_data(ciProfileData* current) {
272   int current_index = dp_to_di(current->dp());
273   int next_index = current_index + current->size_in_bytes();
274   ciProfileData* next = data_at(next_index);
275   return next;
276 }
277 
278 ciProfileData* ciMethodData::bci_to_extra_data(int bci, ciMethod* m, bool& two_free_slots) {
279   DataLayout* dp  = extra_data_base();
280   DataLayout* end = args_data_limit();
281   two_free_slots = false;
282   for (;dp < end; dp = MethodData::next_extra(dp)) {
283     switch(dp->tag()) {
284     case DataLayout::no_tag:
285       _saw_free_extra_data = true;  // observed an empty slot (common case)
286       two_free_slots = (MethodData::next_extra(dp)->tag() == DataLayout::no_tag);
287       return NULL;
288     case DataLayout::arg_info_data_tag:
289       return NULL; // ArgInfoData is at the end of extra data section.
290     case DataLayout::bit_data_tag:
291       if (m == NULL && dp->bci() == bci) {
292         return new ciBitData(dp);
293       }
294       break;
295     case DataLayout::speculative_trap_data_tag: {
296       ciSpeculativeTrapData* data = new ciSpeculativeTrapData(dp);
297       // data->method() might be null if the MDO is snapshotted
298       // concurrently with a trap
299       if (m != NULL && data->method() == m && dp->bci() == bci) {
300         return data;
301       }
302       break;
303     }
304     default:
305       fatal("bad tag = %d", dp->tag());
306     }
307   }
308   return NULL;
309 }
310 
311 // Translate a bci to its corresponding data, or NULL.
312 ciProfileData* ciMethodData::bci_to_data(int bci, ciMethod* m) {
313   // If m is not NULL we look for a SpeculativeTrapData entry
314   if (m == NULL) {
315     ciProfileData* data = data_before(bci);
316     for ( ; is_valid(data); data = next_data(data)) {
317       if (data->bci() == bci) {
318         set_hint_di(dp_to_di(data->dp()));
319         return data;
320       } else if (data->bci() > bci) {
321         break;
322       }
323     }
324   }
325   bool two_free_slots = false;
326   ciProfileData* result = bci_to_extra_data(bci, m, two_free_slots);
327   if (result != NULL) {
328     return result;
329   }
330   if (m != NULL && !two_free_slots) {
331     // We were looking for a SpeculativeTrapData entry we didn't
332     // find. Room is not available for more SpeculativeTrapData
333     // entries, look in the non SpeculativeTrapData entries.
334     return bci_to_data(bci, NULL);
335   }
336   return NULL;
337 }
338 
339 // Conservatively decode the trap_state of a ciProfileData.
340 int ciMethodData::has_trap_at(ciProfileData* data, int reason) {
341   typedef Deoptimization::DeoptReason DR_t;
342   int per_bc_reason
343     = Deoptimization::reason_recorded_per_bytecode_if_any((DR_t) reason);
344   if (trap_count(reason) == 0) {
345     // Impossible for this trap to have occurred, regardless of trap_state.
346     // Note:  This happens if the MDO is empty.
347     return 0;
348   } else if (per_bc_reason == Deoptimization::Reason_none) {
349     // We cannot conclude anything; a trap happened somewhere, maybe here.
350     return -1;
351   } else if (data == NULL) {
352     // No profile here, not even an extra_data record allocated on the fly.
353     // If there are empty extra_data records, and there had been a trap,
354     // there would have been a non-null data pointer.  If there are no
355     // free extra_data records, we must return a conservative -1.
356     if (_saw_free_extra_data)
357       return 0;                 // Q.E.D.
358     else
359       return -1;                // bail with a conservative answer
360   } else {
361     return Deoptimization::trap_state_has_reason(data->trap_state(), per_bc_reason);
362   }
363 }
364 
365 int ciMethodData::trap_recompiled_at(ciProfileData* data) {
366   if (data == NULL) {
367     return (_saw_free_extra_data? 0: -1);  // (see previous method)
368   } else {
369     return Deoptimization::trap_state_is_recompiled(data->trap_state())? 1: 0;
370   }
371 }
372 
373 void ciMethodData::clear_escape_info() {
374   VM_ENTRY_MARK;
375   MethodData* mdo = get_MethodData();
376   if (mdo != NULL) {
377     mdo->clear_escape_info();
378     ArgInfoData *aid = arg_info();
379     int arg_count = (aid == NULL) ? 0 : aid->number_of_args();
380     for (int i = 0; i < arg_count; i++) {
381       set_arg_modified(i, 0);
382     }
383   }
384   _eflags = _arg_local = _arg_stack = _arg_returned = 0;
385 }
386 
387 // copy our escape info to the MethodData* if it exists
388 void ciMethodData::update_escape_info() {
389   VM_ENTRY_MARK;
390   MethodData* mdo = get_MethodData();
391   if ( mdo != NULL) {
392     mdo->set_eflags(_eflags);
393     mdo->set_arg_local(_arg_local);
394     mdo->set_arg_stack(_arg_stack);
395     mdo->set_arg_returned(_arg_returned);
396     int arg_count = mdo->method()->size_of_parameters();
397     for (int i = 0; i < arg_count; i++) {
398       mdo->set_arg_modified(i, arg_modified(i));
399     }
400   }
401 }
402 
403 void ciMethodData::set_compilation_stats(short loops, short blocks) {
404   VM_ENTRY_MARK;
405   MethodData* mdo = get_MethodData();
406   if (mdo != NULL) {
407     mdo->set_num_loops(loops);
408     mdo->set_num_blocks(blocks);
409   }
410 }
411 
412 void ciMethodData::set_would_profile(bool p) {
413   VM_ENTRY_MARK;
414   MethodData* mdo = get_MethodData();
415   if (mdo != NULL) {
416     mdo->set_would_profile(p);
417   }
418 }
419 
420 void ciMethodData::set_argument_type(int bci, int i, ciKlass* k) {
421   VM_ENTRY_MARK;
422   MethodData* mdo = get_MethodData();
423   if (mdo != NULL) {
424     ProfileData* data = mdo->bci_to_data(bci);
425     if (data != NULL) {
426       if (data->is_CallTypeData()) {
427         data->as_CallTypeData()->set_argument_type(i, k->get_Klass());
428       } else {
429         assert(data->is_VirtualCallTypeData(), "no arguments!");
430         data->as_VirtualCallTypeData()->set_argument_type(i, k->get_Klass());
431       }
432     }
433   }
434 }
435 
436 void ciMethodData::set_parameter_type(int i, ciKlass* k) {
437   VM_ENTRY_MARK;
438   MethodData* mdo = get_MethodData();
439   if (mdo != NULL) {
440     mdo->parameters_type_data()->set_type(i, k->get_Klass());
441   }
442 }
443 
444 void ciMethodData::set_return_type(int bci, ciKlass* k) {
445   VM_ENTRY_MARK;
446   MethodData* mdo = get_MethodData();
447   if (mdo != NULL) {
448     ProfileData* data = mdo->bci_to_data(bci);
449     if (data != NULL) {
450       if (data->is_CallTypeData()) {
451         data->as_CallTypeData()->set_return_type(k->get_Klass());
452       } else {
453         assert(data->is_VirtualCallTypeData(), "no arguments!");
454         data->as_VirtualCallTypeData()->set_return_type(k->get_Klass());
455       }
456     }
457   }
458 }
459 
460 bool ciMethodData::has_escape_info() {
461   return eflag_set(MethodData::estimated);
462 }
463 
464 void ciMethodData::set_eflag(MethodData::EscapeFlag f) {
465   set_bits(_eflags, f);
466 }
467 
468 void ciMethodData::clear_eflag(MethodData::EscapeFlag f) {
469   clear_bits(_eflags, f);
470 }
471 
472 bool ciMethodData::eflag_set(MethodData::EscapeFlag f) const {
473   return mask_bits(_eflags, f) != 0;
474 }
475 
476 void ciMethodData::set_arg_local(int i) {
477   set_nth_bit(_arg_local, i);
478 }
479 
480 void ciMethodData::set_arg_stack(int i) {
481   set_nth_bit(_arg_stack, i);
482 }
483 
484 void ciMethodData::set_arg_returned(int i) {
485   set_nth_bit(_arg_returned, i);
486 }
487 
488 void ciMethodData::set_arg_modified(int arg, uint val) {
489   ArgInfoData *aid = arg_info();
490   if (aid == NULL)
491     return;
492   assert(arg >= 0 && arg < aid->number_of_args(), "valid argument number");
493   aid->set_arg_modified(arg, val);
494 }
495 
496 bool ciMethodData::is_arg_local(int i) const {
497   return is_set_nth_bit(_arg_local, i);
498 }
499 
500 bool ciMethodData::is_arg_stack(int i) const {
501   return is_set_nth_bit(_arg_stack, i);
502 }
503 
504 bool ciMethodData::is_arg_returned(int i) const {
505   return is_set_nth_bit(_arg_returned, i);
506 }
507 
508 uint ciMethodData::arg_modified(int arg) const {
509   ArgInfoData *aid = arg_info();
510   if (aid == NULL)
511     return 0;
512   assert(arg >= 0 && arg < aid->number_of_args(), "valid argument number");
513   return aid->arg_modified(arg);
514 }
515 
516 ByteSize ciMethodData::offset_of_slot(ciProfileData* data, ByteSize slot_offset_in_data) {
517   // Get offset within MethodData* of the data array
518   ByteSize data_offset = MethodData::data_offset();
519 
520   // Get cell offset of the ProfileData within data array
521   int cell_offset = dp_to_di(data->dp());
522 
523   // Add in counter_offset, the # of bytes into the ProfileData of counter or flag
524   int offset = in_bytes(data_offset) + cell_offset + in_bytes(slot_offset_in_data);
525 
526   return in_ByteSize(offset);
527 }
528 
529 ciArgInfoData *ciMethodData::arg_info() const {
530   // Should be last, have to skip all traps.
531   DataLayout* dp  = extra_data_base();
532   DataLayout* end = args_data_limit();
533   for (; dp < end; dp = MethodData::next_extra(dp)) {
534     if (dp->tag() == DataLayout::arg_info_data_tag)
535       return new ciArgInfoData(dp);
536   }
537   return NULL;
538 }
539 
540 
541 // Implementation of the print method.
542 void ciMethodData::print_impl(outputStream* st) {
543   ciMetadata::print_impl(st);
544 }
545 
546 void ciMethodData::dump_replay_data_type_helper(outputStream* out, int round, int& count, ProfileData* pdata, ByteSize offset, ciKlass* k) {
547   if (k != NULL) {
548     if (round == 0) {
549       count++;
550     } else {
551       out->print(" %d %s", (int)(dp_to_di(pdata->dp() + in_bytes(offset)) / sizeof(intptr_t)), k->name()->as_quoted_ascii());
552     }
553   }
554 }
555 
556 template<class T> void ciMethodData::dump_replay_data_receiver_type_helper(outputStream* out, int round, int& count, T* vdata) {
557   for (uint i = 0; i < vdata->row_limit(); i++) {
558     dump_replay_data_type_helper(out, round, count, vdata, vdata->receiver_offset(i), vdata->receiver(i));
559   }
560 }
561 
562 template<class T> void ciMethodData::dump_replay_data_call_type_helper(outputStream* out, int round, int& count, T* call_type_data) {
563   if (call_type_data->has_arguments()) {
564     for (int i = 0; i < call_type_data->number_of_arguments(); i++) {
565       dump_replay_data_type_helper(out, round, count, call_type_data, call_type_data->argument_type_offset(i), call_type_data->valid_argument_type(i));
566     }
567   }
568   if (call_type_data->has_return()) {
569     dump_replay_data_type_helper(out, round, count, call_type_data, call_type_data->return_type_offset(), call_type_data->valid_return_type());
570   }
571 }
572 
573 void ciMethodData::dump_replay_data_extra_data_helper(outputStream* out, int round, int& count) {
574   DataLayout* dp  = extra_data_base();
575   DataLayout* end = args_data_limit();
576 
577   for (;dp < end; dp = MethodData::next_extra(dp)) {
578     switch(dp->tag()) {
579     case DataLayout::no_tag:
580     case DataLayout::arg_info_data_tag:
581       return;
582     case DataLayout::bit_data_tag:
583       break;
584     case DataLayout::speculative_trap_data_tag: {
585       ciSpeculativeTrapData* data = new ciSpeculativeTrapData(dp);
586       ciMethod* m = data->method();
587       if (m != NULL) {
588         if (round == 0) {
589           count++;
590         } else {
591           out->print(" %d ", (int)(dp_to_di(((address)dp) + in_bytes(ciSpeculativeTrapData::method_offset())) / sizeof(intptr_t)));
592           m->dump_name_as_ascii(out);
593         }
594       }
595       break;
596     }
597     default:
598       fatal("bad tag = %d", dp->tag());
599     }
600   }
601 }
602 
603 void ciMethodData::dump_replay_data(outputStream* out) {
604   ResourceMark rm;
605   MethodData* mdo = get_MethodData();
606   Method* method = mdo->method();
607   Klass* holder = method->method_holder();
608   out->print("ciMethodData %s %s %s %d %d",
609              holder->name()->as_quoted_ascii(),
610              method->name()->as_quoted_ascii(),
611              method->signature()->as_quoted_ascii(),
612              _state,
613              current_mileage());
614 
615   // dump the contents of the MDO header as raw data
616   unsigned char* orig = (unsigned char*)&_orig;
617   int length = sizeof(_orig);
618   out->print(" orig %d", length);
619   for (int i = 0; i < length; i++) {
620     out->print(" %d", orig[i]);
621   }
622 
623   // dump the MDO data as raw data
624   int elements = (data_size() + extra_data_size()) / sizeof(intptr_t);
625   out->print(" data %d", elements);
626   for (int i = 0; i < elements; i++) {
627     // We could use INTPTR_FORMAT here but that's zero justified
628     // which makes comparing it with the SA version of this output
629     // harder. data()'s element type is intptr_t.
630     out->print(" " INTPTRNZ_FORMAT, data()[i]);
631   }
632 
633   // The MDO contained oop references as ciObjects, so scan for those
634   // and emit pairs of offset and klass name so that they can be
635   // reconstructed at runtime.  The first round counts the number of
636   // oop references and the second actually emits them.
637   ciParametersTypeData* parameters = parameters_type_data();
638   for (int count = 0, round = 0; round < 2; round++) {
639     if (round == 1) out->print(" oops %d", count);
640     ProfileData* pdata = first_data();
641     for ( ; is_valid(pdata); pdata = next_data(pdata)) {
642       if (pdata->is_VirtualCallData()) {
643         ciVirtualCallData* vdata = (ciVirtualCallData*)pdata;
644         dump_replay_data_receiver_type_helper<ciVirtualCallData>(out, round, count, vdata);
645         if (pdata->is_VirtualCallTypeData()) {
646           ciVirtualCallTypeData* call_type_data = (ciVirtualCallTypeData*)pdata;
647           dump_replay_data_call_type_helper<ciVirtualCallTypeData>(out, round, count, call_type_data);
648         }
649       } else if (pdata->is_ReceiverTypeData()) {
650         ciReceiverTypeData* vdata = (ciReceiverTypeData*)pdata;
651         dump_replay_data_receiver_type_helper<ciReceiverTypeData>(out, round, count, vdata);
652       } else if (pdata->is_CallTypeData()) {
653           ciCallTypeData* call_type_data = (ciCallTypeData*)pdata;
654           dump_replay_data_call_type_helper<ciCallTypeData>(out, round, count, call_type_data);
655       }
656     }
657     if (parameters != NULL) {
658       for (int i = 0; i < parameters->number_of_parameters(); i++) {
659         dump_replay_data_type_helper(out, round, count, parameters, ParametersTypeData::type_offset(i), parameters->valid_parameter_type(i));
660       }
661     }
662   }
663   for (int count = 0, round = 0; round < 2; round++) {
664     if (round == 1) out->print(" methods %d", count);
665     dump_replay_data_extra_data_helper(out, round, count);
666   }
667   out->cr();
668 }
669 
670 #ifndef PRODUCT
671 void ciMethodData::print() {
672   print_data_on(tty);
673 }
674 
675 void ciMethodData::print_data_on(outputStream* st) {
676   ResourceMark rm;
677   ciParametersTypeData* parameters = parameters_type_data();
678   if (parameters != NULL) {
679     parameters->print_data_on(st);
680   }
681   ciProfileData* data;
682   for (data = first_data(); is_valid(data); data = next_data(data)) {
683     st->print("%d", dp_to_di(data->dp()));
684     st->fill_to(6);
685     data->print_data_on(st);
686   }
687   st->print_cr("--- Extra data:");
688   DataLayout* dp  = extra_data_base();
689   DataLayout* end = args_data_limit();
690   for (;; dp = MethodData::next_extra(dp)) {
691     assert(dp < end, "moved past end of extra data");
692     switch (dp->tag()) {
693     case DataLayout::no_tag:
694       continue;
695     case DataLayout::bit_data_tag:
696       data = new BitData(dp);
697       break;
698     case DataLayout::arg_info_data_tag:
699       data = new ciArgInfoData(dp);
700       dp = end; // ArgInfoData is at the end of extra data section.
701       break;
702     case DataLayout::speculative_trap_data_tag:
703       data = new ciSpeculativeTrapData(dp);
704       break;
705     default:
706       fatal("unexpected tag %d", dp->tag());
707     }
708     st->print("%d", dp_to_di(data->dp()));
709     st->fill_to(6);
710     data->print_data_on(st);
711     if (dp >= end) return;
712   }
713 }
714 
715 void ciTypeEntries::print_ciklass(outputStream* st, intptr_t k) {
716   if (TypeEntries::is_type_none(k)) {
717     st->print("none");
718   } else if (TypeEntries::is_type_unknown(k)) {
719     st->print("unknown");
720   } else {
721     valid_ciklass(k)->print_name_on(st);
722   }
723   if (TypeEntries::was_null_seen(k)) {
724     st->print(" (null seen)");
725   }
726 }
727 
728 void ciTypeStackSlotEntries::print_data_on(outputStream* st) const {
729   for (int i = 0; i < number_of_entries(); i++) {
730     _pd->tab(st);
731     st->print("%d: stack (%u) ", i, stack_slot(i));
732     print_ciklass(st, type(i));
733     st->cr();
734   }
735 }
736 
737 void ciReturnTypeEntry::print_data_on(outputStream* st) const {
738   _pd->tab(st);
739   st->print("ret ");
740   print_ciklass(st, type());
741   st->cr();
742 }
743 
744 void ciCallTypeData::print_data_on(outputStream* st, const char* extra) const {
745   print_shared(st, "ciCallTypeData", extra);
746   if (has_arguments()) {
747     tab(st, true);
748     st->print_cr("argument types");
749     args()->print_data_on(st);
750   }
751   if (has_return()) {
752     tab(st, true);
753     st->print_cr("return type");
754     ret()->print_data_on(st);
755   }
756 }
757 
758 void ciReceiverTypeData::print_receiver_data_on(outputStream* st) const {
759   uint row;
760   int entries = 0;
761   for (row = 0; row < row_limit(); row++) {
762     if (receiver(row) != NULL)  entries++;
763   }
764   st->print_cr("count(%u) entries(%u)", count(), entries);
765   for (row = 0; row < row_limit(); row++) {
766     if (receiver(row) != NULL) {
767       tab(st);
768       receiver(row)->print_name_on(st);
769       st->print_cr("(%u)", receiver_count(row));
770     }
771   }
772 }
773 
774 void ciReceiverTypeData::print_data_on(outputStream* st, const char* extra) const {
775   print_shared(st, "ciReceiverTypeData", extra);
776   print_receiver_data_on(st);
777 }
778 
779 void ciVirtualCallData::print_data_on(outputStream* st, const char* extra) const {
780   print_shared(st, "ciVirtualCallData", extra);
781   rtd_super()->print_receiver_data_on(st);
782 }
783 
784 void ciVirtualCallTypeData::print_data_on(outputStream* st, const char* extra) const {
785   print_shared(st, "ciVirtualCallTypeData", extra);
786   rtd_super()->print_receiver_data_on(st);
787   if (has_arguments()) {
788     tab(st, true);
789     st->print("argument types");
790     args()->print_data_on(st);
791   }
792   if (has_return()) {
793     tab(st, true);
794     st->print("return type");
795     ret()->print_data_on(st);
796   }
797 }
798 
799 void ciParametersTypeData::print_data_on(outputStream* st, const char* extra) const {
800   st->print_cr("ciParametersTypeData");
801   parameters()->print_data_on(st);
802 }
803 
804 void ciSpeculativeTrapData::print_data_on(outputStream* st, const char* extra) const {
805   st->print_cr("ciSpeculativeTrapData");
806   tab(st);
807   method()->print_short_name(st);
808   st->cr();
809 }
810 #endif