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