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