1 /*
   2  * Copyright (c) 2001, 2014, 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.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       ciKlass* klass = CURRENT_ENV->get_klass(k);
 191       CURRENT_ENV->ensure_metadata_alive(klass);
 192       set_receiver(row, klass);
 193     }
 194   }
 195 }
 196 
 197 
 198 void ciTypeStackSlotEntries::translate_type_data_from(const TypeStackSlotEntries* entries) {
 199   for (int i = 0; i < number_of_entries(); i++) {
 200     intptr_t k = entries->type(i);
 201     TypeStackSlotEntries::set_type(i, translate_klass(k));
 202   }
 203 }
 204 
 205 void ciReturnTypeEntry::translate_type_data_from(const ReturnTypeEntry* ret) {
 206   intptr_t k = ret->type();
 207   set_type(translate_klass(k));
 208 }
 209 
 210 void ciSpeculativeTrapData::translate_from(const ProfileData* data) {
 211   Method* m = data->as_SpeculativeTrapData()->method();
 212   ciMethod* ci_m = CURRENT_ENV->get_method(m);
 213   CURRENT_ENV->ensure_metadata_alive(ci_m);
 214   set_method(ci_m);
 215 }
 216 
 217 // Get the data at an arbitrary (sort of) data index.
 218 ciProfileData* ciMethodData::data_at(int data_index) {
 219   if (out_of_bounds(data_index)) {
 220     return NULL;
 221   }
 222   DataLayout* data_layout = data_layout_at(data_index);
 223 
 224   switch (data_layout->tag()) {
 225   case DataLayout::no_tag:
 226   default:
 227     ShouldNotReachHere();
 228     return NULL;
 229   case DataLayout::bit_data_tag:
 230     return new ciBitData(data_layout);
 231   case DataLayout::counter_data_tag:
 232     return new ciCounterData(data_layout);
 233   case DataLayout::jump_data_tag:
 234     return new ciJumpData(data_layout);
 235   case DataLayout::receiver_type_data_tag:
 236     return new ciReceiverTypeData(data_layout);
 237   case DataLayout::virtual_call_data_tag:
 238     return new ciVirtualCallData(data_layout);
 239   case DataLayout::ret_data_tag:
 240     return new ciRetData(data_layout);
 241   case DataLayout::branch_data_tag:
 242     return new ciBranchData(data_layout);
 243   case DataLayout::multi_branch_data_tag:
 244     return new ciMultiBranchData(data_layout);
 245   case DataLayout::arg_info_data_tag:
 246     return new ciArgInfoData(data_layout);
 247   case DataLayout::call_type_data_tag:
 248     return new ciCallTypeData(data_layout);
 249   case DataLayout::virtual_call_type_data_tag:
 250     return new ciVirtualCallTypeData(data_layout);
 251   case DataLayout::parameters_type_data_tag:
 252     return new ciParametersTypeData(data_layout);
 253   };
 254 }
 255 
 256 // Iteration over data.
 257 ciProfileData* ciMethodData::next_data(ciProfileData* current) {
 258   int current_index = dp_to_di(current->dp());
 259   int next_index = current_index + current->size_in_bytes();
 260   ciProfileData* next = data_at(next_index);
 261   return next;
 262 }
 263 
 264 ciProfileData* ciMethodData::bci_to_extra_data(int bci, ciMethod* m, bool& two_free_slots) {
 265   DataLayout* dp  = extra_data_base();
 266   DataLayout* end = args_data_limit();
 267   two_free_slots = false;
 268   for (;dp < end; dp = MethodData::next_extra(dp)) {
 269     switch(dp->tag()) {
 270     case DataLayout::no_tag:
 271       _saw_free_extra_data = true;  // observed an empty slot (common case)
 272       two_free_slots = (MethodData::next_extra(dp)->tag() == DataLayout::no_tag);
 273       return NULL;
 274     case DataLayout::arg_info_data_tag:
 275       return NULL; // ArgInfoData is at the end of extra data section.
 276     case DataLayout::bit_data_tag:
 277       if (m == NULL && dp->bci() == bci) {
 278         return new ciBitData(dp);
 279       }
 280       break;
 281     case DataLayout::speculative_trap_data_tag: {
 282       ciSpeculativeTrapData* data = new ciSpeculativeTrapData(dp);
 283       // data->method() might be null if the MDO is snapshotted
 284       // concurrently with a trap
 285       if (m != NULL && data->method() == m && dp->bci() == bci) {
 286         return data;
 287       }
 288       break;
 289     }
 290     default:
 291       fatal("bad tag = %d", dp->tag());
 292     }
 293   }
 294   return NULL;
 295 }
 296 
 297 // Translate a bci to its corresponding data, or NULL.
 298 ciProfileData* ciMethodData::bci_to_data(int bci, ciMethod* m) {
 299   // If m is not NULL we look for a SpeculativeTrapData entry
 300   if (m == NULL) {
 301     ciProfileData* data = data_before(bci);
 302     for ( ; is_valid(data); data = next_data(data)) {
 303       if (data->bci() == bci) {
 304         set_hint_di(dp_to_di(data->dp()));
 305         return data;
 306       } else if (data->bci() > bci) {
 307         break;
 308       }
 309     }
 310   }
 311   bool two_free_slots = false;
 312   ciProfileData* result = bci_to_extra_data(bci, m, two_free_slots);
 313   if (result != NULL) {
 314     return result;
 315   }
 316   if (m != NULL && !two_free_slots) {
 317     // We were looking for a SpeculativeTrapData entry we didn't
 318     // find. Room is not available for more SpeculativeTrapData
 319     // entries, look in the non SpeculativeTrapData entries.
 320     return bci_to_data(bci, NULL);
 321   }
 322   return NULL;
 323 }
 324 
 325 // Conservatively decode the trap_state of a ciProfileData.
 326 int ciMethodData::has_trap_at(ciProfileData* data, int reason) {
 327   typedef Deoptimization::DeoptReason DR_t;
 328   int per_bc_reason
 329     = Deoptimization::reason_recorded_per_bytecode_if_any((DR_t) reason);
 330   if (trap_count(reason) == 0) {
 331     // Impossible for this trap to have occurred, regardless of trap_state.
 332     // Note:  This happens if the MDO is empty.
 333     return 0;
 334   } else if (per_bc_reason == Deoptimization::Reason_none) {
 335     // We cannot conclude anything; a trap happened somewhere, maybe here.
 336     return -1;
 337   } else if (data == NULL) {
 338     // No profile here, not even an extra_data record allocated on the fly.
 339     // If there are empty extra_data records, and there had been a trap,
 340     // there would have been a non-null data pointer.  If there are no
 341     // free extra_data records, we must return a conservative -1.
 342     if (_saw_free_extra_data)
 343       return 0;                 // Q.E.D.
 344     else
 345       return -1;                // bail with a conservative answer
 346   } else {
 347     return Deoptimization::trap_state_has_reason(data->trap_state(), per_bc_reason);
 348   }
 349 }
 350 
 351 int ciMethodData::trap_recompiled_at(ciProfileData* data) {
 352   if (data == NULL) {
 353     return (_saw_free_extra_data? 0: -1);  // (see previous method)
 354   } else {
 355     return Deoptimization::trap_state_is_recompiled(data->trap_state())? 1: 0;
 356   }
 357 }
 358 
 359 void ciMethodData::clear_escape_info() {
 360   VM_ENTRY_MARK;
 361   MethodData* mdo = get_MethodData();
 362   if (mdo != NULL) {
 363     mdo->clear_escape_info();
 364     ArgInfoData *aid = arg_info();
 365     int arg_count = (aid == NULL) ? 0 : aid->number_of_args();
 366     for (int i = 0; i < arg_count; i++) {
 367       set_arg_modified(i, 0);
 368     }
 369   }
 370   _eflags = _arg_local = _arg_stack = _arg_returned = 0;
 371 }
 372 
 373 // copy our escape info to the MethodData* if it exists
 374 void ciMethodData::update_escape_info() {
 375   VM_ENTRY_MARK;
 376   MethodData* mdo = get_MethodData();
 377   if ( mdo != NULL) {
 378     mdo->set_eflags(_eflags);
 379     mdo->set_arg_local(_arg_local);
 380     mdo->set_arg_stack(_arg_stack);
 381     mdo->set_arg_returned(_arg_returned);
 382     int arg_count = mdo->method()->size_of_parameters();
 383     for (int i = 0; i < arg_count; i++) {
 384       mdo->set_arg_modified(i, arg_modified(i));
 385     }
 386   }
 387 }
 388 
 389 void ciMethodData::set_compilation_stats(short loops, short blocks) {
 390   VM_ENTRY_MARK;
 391   MethodData* mdo = get_MethodData();
 392   if (mdo != NULL) {
 393     mdo->set_num_loops(loops);
 394     mdo->set_num_blocks(blocks);
 395   }
 396 }
 397 
 398 void ciMethodData::set_would_profile(bool p) {
 399   VM_ENTRY_MARK;
 400   MethodData* mdo = get_MethodData();
 401   if (mdo != NULL) {
 402     mdo->set_would_profile(p);
 403   }
 404 }
 405 
 406 void ciMethodData::set_argument_type(int bci, int i, ciKlass* k) {
 407   VM_ENTRY_MARK;
 408   MethodData* mdo = get_MethodData();
 409   if (mdo != NULL) {
 410     ProfileData* data = mdo->bci_to_data(bci);
 411     if (data != NULL) {
 412       if (data->is_CallTypeData()) {
 413         data->as_CallTypeData()->set_argument_type(i, k->get_Klass());
 414       } else {
 415         assert(data->is_VirtualCallTypeData(), "no arguments!");
 416         data->as_VirtualCallTypeData()->set_argument_type(i, k->get_Klass());
 417       }
 418     }
 419   }
 420 }
 421 
 422 void ciMethodData::set_parameter_type(int i, ciKlass* k) {
 423   VM_ENTRY_MARK;
 424   MethodData* mdo = get_MethodData();
 425   if (mdo != NULL) {
 426     mdo->parameters_type_data()->set_type(i, k->get_Klass());
 427   }
 428 }
 429 
 430 void ciMethodData::set_return_type(int bci, ciKlass* k) {
 431   VM_ENTRY_MARK;
 432   MethodData* mdo = get_MethodData();
 433   if (mdo != NULL) {
 434     ProfileData* data = mdo->bci_to_data(bci);
 435     if (data != NULL) {
 436       if (data->is_CallTypeData()) {
 437         data->as_CallTypeData()->set_return_type(k->get_Klass());
 438       } else {
 439         assert(data->is_VirtualCallTypeData(), "no arguments!");
 440         data->as_VirtualCallTypeData()->set_return_type(k->get_Klass());
 441       }
 442     }
 443   }
 444 }
 445 
 446 bool ciMethodData::has_escape_info() {
 447   return eflag_set(MethodData::estimated);
 448 }
 449 
 450 void ciMethodData::set_eflag(MethodData::EscapeFlag f) {
 451   set_bits(_eflags, f);
 452 }
 453 
 454 void ciMethodData::clear_eflag(MethodData::EscapeFlag f) {
 455   clear_bits(_eflags, f);
 456 }
 457 
 458 bool ciMethodData::eflag_set(MethodData::EscapeFlag f) const {
 459   return mask_bits(_eflags, f) != 0;
 460 }
 461 
 462 void ciMethodData::set_arg_local(int i) {
 463   set_nth_bit(_arg_local, i);
 464 }
 465 
 466 void ciMethodData::set_arg_stack(int i) {
 467   set_nth_bit(_arg_stack, i);
 468 }
 469 
 470 void ciMethodData::set_arg_returned(int i) {
 471   set_nth_bit(_arg_returned, i);
 472 }
 473 
 474 void ciMethodData::set_arg_modified(int arg, uint val) {
 475   ArgInfoData *aid = arg_info();
 476   if (aid == NULL)
 477     return;
 478   assert(arg >= 0 && arg < aid->number_of_args(), "valid argument number");
 479   aid->set_arg_modified(arg, val);
 480 }
 481 
 482 bool ciMethodData::is_arg_local(int i) const {
 483   return is_set_nth_bit(_arg_local, i);
 484 }
 485 
 486 bool ciMethodData::is_arg_stack(int i) const {
 487   return is_set_nth_bit(_arg_stack, i);
 488 }
 489 
 490 bool ciMethodData::is_arg_returned(int i) const {
 491   return is_set_nth_bit(_arg_returned, i);
 492 }
 493 
 494 uint ciMethodData::arg_modified(int arg) const {
 495   ArgInfoData *aid = arg_info();
 496   if (aid == NULL)
 497     return 0;
 498   assert(arg >= 0 && arg < aid->number_of_args(), "valid argument number");
 499   return aid->arg_modified(arg);
 500 }
 501 
 502 ByteSize ciMethodData::offset_of_slot(ciProfileData* data, ByteSize slot_offset_in_data) {
 503   // Get offset within MethodData* of the data array
 504   ByteSize data_offset = MethodData::data_offset();
 505 
 506   // Get cell offset of the ProfileData within data array
 507   int cell_offset = dp_to_di(data->dp());
 508 
 509   // Add in counter_offset, the # of bytes into the ProfileData of counter or flag
 510   int offset = in_bytes(data_offset) + cell_offset + in_bytes(slot_offset_in_data);
 511 
 512   return in_ByteSize(offset);
 513 }
 514 
 515 ciArgInfoData *ciMethodData::arg_info() const {
 516   // Should be last, have to skip all traps.
 517   DataLayout* dp  = extra_data_base();
 518   DataLayout* end = args_data_limit();
 519   for (; dp < end; dp = MethodData::next_extra(dp)) {
 520     if (dp->tag() == DataLayout::arg_info_data_tag)
 521       return new ciArgInfoData(dp);
 522   }
 523   return NULL;
 524 }
 525 
 526 
 527 // Implementation of the print method.
 528 void ciMethodData::print_impl(outputStream* st) {
 529   ciMetadata::print_impl(st);
 530 }
 531 
 532 void ciMethodData::dump_replay_data_type_helper(outputStream* out, int round, int& count, ProfileData* pdata, ByteSize offset, ciKlass* k) {
 533   if (k != NULL) {
 534     if (round == 0) {
 535       count++;
 536     } else {
 537       out->print(" %d %s", (int)(dp_to_di(pdata->dp() + in_bytes(offset)) / sizeof(intptr_t)), k->name()->as_quoted_ascii());
 538     }
 539   }
 540 }
 541 
 542 template<class T> void ciMethodData::dump_replay_data_receiver_type_helper(outputStream* out, int round, int& count, T* vdata) {
 543   for (uint i = 0; i < vdata->row_limit(); i++) {
 544     dump_replay_data_type_helper(out, round, count, vdata, vdata->receiver_offset(i), vdata->receiver(i));
 545   }
 546 }
 547 
 548 template<class T> void ciMethodData::dump_replay_data_call_type_helper(outputStream* out, int round, int& count, T* call_type_data) {
 549   if (call_type_data->has_arguments()) {
 550     for (int i = 0; i < call_type_data->number_of_arguments(); i++) {
 551       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));
 552     }
 553   }
 554   if (call_type_data->has_return()) {
 555     dump_replay_data_type_helper(out, round, count, call_type_data, call_type_data->return_type_offset(), call_type_data->valid_return_type());
 556   }
 557 }
 558 
 559 void ciMethodData::dump_replay_data_extra_data_helper(outputStream* out, int round, int& count) {
 560   DataLayout* dp  = extra_data_base();
 561   DataLayout* end = args_data_limit();
 562 
 563   for (;dp < end; dp = MethodData::next_extra(dp)) {
 564     switch(dp->tag()) {
 565     case DataLayout::no_tag:
 566     case DataLayout::arg_info_data_tag:
 567       return;
 568     case DataLayout::bit_data_tag:
 569       break;
 570     case DataLayout::speculative_trap_data_tag: {
 571       ciSpeculativeTrapData* data = new ciSpeculativeTrapData(dp);
 572       ciMethod* m = data->method();
 573       if (m != NULL) {
 574         if (round == 0) {
 575           count++;
 576         } else {
 577           out->print(" %d ", (int)(dp_to_di(((address)dp) + in_bytes(ciSpeculativeTrapData::method_offset())) / sizeof(intptr_t)));
 578           m->dump_name_as_ascii(out);
 579         }
 580       }
 581       break;
 582     }
 583     default:
 584       fatal("bad tag = %d", dp->tag());
 585     }
 586   }
 587 }
 588 
 589 void ciMethodData::dump_replay_data(outputStream* out) {
 590   ResourceMark rm;
 591   MethodData* mdo = get_MethodData();
 592   Method* method = mdo->method();
 593   Klass* holder = method->method_holder();
 594   out->print("ciMethodData %s %s %s %d %d",
 595              holder->name()->as_quoted_ascii(),
 596              method->name()->as_quoted_ascii(),
 597              method->signature()->as_quoted_ascii(),
 598              _state,
 599              current_mileage());
 600 
 601   // dump the contents of the MDO header as raw data
 602   unsigned char* orig = (unsigned char*)&_orig;
 603   int length = sizeof(_orig);
 604   out->print(" orig %d", length);
 605   for (int i = 0; i < length; i++) {
 606     out->print(" %d", orig[i]);
 607   }
 608 
 609   // dump the MDO data as raw data
 610   int elements = (data_size() + extra_data_size()) / sizeof(intptr_t);
 611   out->print(" data %d", elements);
 612   for (int i = 0; i < elements; i++) {
 613     // We could use INTPTR_FORMAT here but that's a zero justified
 614     // which makes comparing it with the SA version of this output
 615     // harder.
 616 #ifdef _LP64
 617     out->print(" 0x%" FORMAT64_MODIFIER "x", data()[i]);
 618 #else
 619     out->print(" 0x%x", data()[i]);
 620 #endif
 621   }
 622 
 623   // The MDO contained oop references as ciObjects, so scan for those
 624   // and emit pairs of offset and klass name so that they can be
 625   // reconstructed at runtime.  The first round counts the number of
 626   // oop references and the second actually emits them.
 627   ciParametersTypeData* parameters = parameters_type_data();
 628   for (int count = 0, round = 0; round < 2; round++) {
 629     if (round == 1) out->print(" oops %d", count);
 630     ProfileData* pdata = first_data();
 631     for ( ; is_valid(pdata); pdata = next_data(pdata)) {
 632       if (pdata->is_VirtualCallData()) {
 633         ciVirtualCallData* vdata = (ciVirtualCallData*)pdata;
 634         dump_replay_data_receiver_type_helper<ciVirtualCallData>(out, round, count, vdata);
 635         if (pdata->is_VirtualCallTypeData()) {
 636           ciVirtualCallTypeData* call_type_data = (ciVirtualCallTypeData*)pdata;
 637           dump_replay_data_call_type_helper<ciVirtualCallTypeData>(out, round, count, call_type_data);
 638         }
 639       } else if (pdata->is_ReceiverTypeData()) {
 640         ciReceiverTypeData* vdata = (ciReceiverTypeData*)pdata;
 641         dump_replay_data_receiver_type_helper<ciReceiverTypeData>(out, round, count, vdata);
 642       } else if (pdata->is_CallTypeData()) {
 643           ciCallTypeData* call_type_data = (ciCallTypeData*)pdata;
 644           dump_replay_data_call_type_helper<ciCallTypeData>(out, round, count, call_type_data);
 645       }
 646     }
 647     if (parameters != NULL) {
 648       for (int i = 0; i < parameters->number_of_parameters(); i++) {
 649         dump_replay_data_type_helper(out, round, count, parameters, ParametersTypeData::type_offset(i), parameters->valid_parameter_type(i));
 650       }
 651     }
 652   }
 653   for (int count = 0, round = 0; round < 2; round++) {
 654     if (round == 1) out->print(" methods %d", count);
 655     dump_replay_data_extra_data_helper(out, round, count);
 656   }
 657   out->cr();
 658 }
 659 
 660 #ifndef PRODUCT
 661 void ciMethodData::print() {
 662   print_data_on(tty);
 663 }
 664 
 665 void ciMethodData::print_data_on(outputStream* st) {
 666   ResourceMark rm;
 667   ciParametersTypeData* parameters = parameters_type_data();
 668   if (parameters != NULL) {
 669     parameters->print_data_on(st);
 670   }
 671   ciProfileData* data;
 672   for (data = first_data(); is_valid(data); data = next_data(data)) {
 673     st->print("%d", dp_to_di(data->dp()));
 674     st->fill_to(6);
 675     data->print_data_on(st);
 676   }
 677   st->print_cr("--- Extra data:");
 678   DataLayout* dp  = extra_data_base();
 679   DataLayout* end = args_data_limit();
 680   for (;; dp = MethodData::next_extra(dp)) {
 681     assert(dp < end, "moved past end of extra data");
 682     switch (dp->tag()) {
 683     case DataLayout::no_tag:
 684       continue;
 685     case DataLayout::bit_data_tag:
 686       data = new BitData(dp);
 687       break;
 688     case DataLayout::arg_info_data_tag:
 689       data = new ciArgInfoData(dp);
 690       dp = end; // ArgInfoData is at the end of extra data section.
 691       break;
 692     case DataLayout::speculative_trap_data_tag:
 693       data = new ciSpeculativeTrapData(dp);
 694       break;
 695     default:
 696       fatal("unexpected tag %d", dp->tag());
 697     }
 698     st->print("%d", dp_to_di(data->dp()));
 699     st->fill_to(6);
 700     data->print_data_on(st);
 701     if (dp >= end) return;
 702   }
 703 }
 704 
 705 void ciTypeEntries::print_ciklass(outputStream* st, intptr_t k) {
 706   if (TypeEntries::is_type_none(k)) {
 707     st->print("none");
 708   } else if (TypeEntries::is_type_unknown(k)) {
 709     st->print("unknown");
 710   } else {
 711     valid_ciklass(k)->print_name_on(st);
 712   }
 713   if (TypeEntries::was_null_seen(k)) {
 714     st->print(" (null seen)");
 715   }
 716 }
 717 
 718 void ciTypeStackSlotEntries::print_data_on(outputStream* st) const {
 719   for (int i = 0; i < number_of_entries(); i++) {
 720     _pd->tab(st);
 721     st->print("%d: stack (%u) ", i, stack_slot(i));
 722     print_ciklass(st, type(i));
 723     st->cr();
 724   }
 725 }
 726 
 727 void ciReturnTypeEntry::print_data_on(outputStream* st) const {
 728   _pd->tab(st);
 729   st->print("ret ");
 730   print_ciklass(st, type());
 731   st->cr();
 732 }
 733 
 734 void ciCallTypeData::print_data_on(outputStream* st, const char* extra) const {
 735   print_shared(st, "ciCallTypeData", extra);
 736   if (has_arguments()) {
 737     tab(st, true);
 738     st->print_cr("argument types");
 739     args()->print_data_on(st);
 740   }
 741   if (has_return()) {
 742     tab(st, true);
 743     st->print_cr("return type");
 744     ret()->print_data_on(st);
 745   }
 746 }
 747 
 748 void ciReceiverTypeData::print_receiver_data_on(outputStream* st) const {
 749   uint row;
 750   int entries = 0;
 751   for (row = 0; row < row_limit(); row++) {
 752     if (receiver(row) != NULL)  entries++;
 753   }
 754   st->print_cr("count(%u) entries(%u)", count(), entries);
 755   for (row = 0; row < row_limit(); row++) {
 756     if (receiver(row) != NULL) {
 757       tab(st);
 758       receiver(row)->print_name_on(st);
 759       st->print_cr("(%u)", receiver_count(row));
 760     }
 761   }
 762 }
 763 
 764 void ciReceiverTypeData::print_data_on(outputStream* st, const char* extra) const {
 765   print_shared(st, "ciReceiverTypeData", extra);
 766   print_receiver_data_on(st);
 767 }
 768 
 769 void ciVirtualCallData::print_data_on(outputStream* st, const char* extra) const {
 770   print_shared(st, "ciVirtualCallData", extra);
 771   rtd_super()->print_receiver_data_on(st);
 772 }
 773 
 774 void ciVirtualCallTypeData::print_data_on(outputStream* st, const char* extra) const {
 775   print_shared(st, "ciVirtualCallTypeData", extra);
 776   rtd_super()->print_receiver_data_on(st);
 777   if (has_arguments()) {
 778     tab(st, true);
 779     st->print("argument types");
 780     args()->print_data_on(st);
 781   }
 782   if (has_return()) {
 783     tab(st, true);
 784     st->print("return type");
 785     ret()->print_data_on(st);
 786   }
 787 }
 788 
 789 void ciParametersTypeData::print_data_on(outputStream* st, const char* extra) const {
 790   st->print_cr("ciParametersTypeData");
 791   parameters()->print_data_on(st);
 792 }
 793 
 794 void ciSpeculativeTrapData::print_data_on(outputStream* st, const char* extra) const {
 795   st->print_cr("ciSpeculativeTrapData");
 796   tab(st);
 797   method()->print_short_name(st);
 798   st->cr();
 799 }
 800 #endif