hotspot/src/share/vm/runtime/aprofiler.cpp
changeset 18892 8c0ce47b4b82
parent 18891 be38bcc1d0f3
parent 18733 2d3875b0d18b
child 18893 80bb0bd17234
child 19112 3bf2022fbd9a
equal deleted inserted replaced
18891:be38bcc1d0f3 18892:8c0ce47b4b82
     1 /*
       
     2  * Copyright (c) 1997, 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 "classfile/systemDictionary.hpp"
       
    27 #include "gc_interface/collectedHeap.inline.hpp"
       
    28 #include "memory/resourceArea.hpp"
       
    29 #include "memory/space.hpp"
       
    30 #include "oops/oop.inline.hpp"
       
    31 #include "oops/oop.inline2.hpp"
       
    32 #include "runtime/aprofiler.hpp"
       
    33 
       
    34 
       
    35 bool AllocationProfiler::_active = false;
       
    36 GrowableArray<Klass*>* AllocationProfiler::_print_array = NULL;
       
    37 
       
    38 
       
    39 class AllocProfClosure : public ObjectClosure {
       
    40  public:
       
    41   void do_object(oop obj) {
       
    42     Klass* k = obj->klass();
       
    43     k->set_alloc_count(k->alloc_count() + 1);
       
    44     k->set_alloc_size(k->alloc_size() + obj->size());
       
    45   }
       
    46 };
       
    47 
       
    48 
       
    49 void AllocationProfiler::iterate_since_last_gc() {
       
    50   if (is_active()) {
       
    51     AllocProfClosure blk;
       
    52     GenCollectedHeap* heap = GenCollectedHeap::heap();
       
    53     heap->object_iterate_since_last_GC(&blk);
       
    54   }
       
    55 }
       
    56 
       
    57 
       
    58 void AllocationProfiler::engage() {
       
    59   _active = true;
       
    60 }
       
    61 
       
    62 
       
    63 void AllocationProfiler::disengage() {
       
    64   _active = false;
       
    65 }
       
    66 
       
    67 
       
    68 void AllocationProfiler::add_class_to_array(Klass* k) {
       
    69   _print_array->append(k);
       
    70 }
       
    71 
       
    72 
       
    73 void AllocationProfiler::add_classes_to_array(Klass* k) {
       
    74   // Iterate over klass and all array klasses for klass
       
    75   k->with_array_klasses_do(&AllocationProfiler::add_class_to_array);
       
    76 }
       
    77 
       
    78 
       
    79 int AllocationProfiler::compare_classes(Klass** k1, Klass** k2) {
       
    80   // Sort by total allocation size
       
    81   return (*k2)->alloc_size() - (*k1)->alloc_size();
       
    82 }
       
    83 
       
    84 
       
    85 int AllocationProfiler::average(size_t alloc_size, int alloc_count) {
       
    86   return (int) ((double) (alloc_size * BytesPerWord) / MAX2(alloc_count, 1) + 0.5);
       
    87 }
       
    88 
       
    89 
       
    90 void AllocationProfiler::sort_and_print_array(size_t cutoff) {
       
    91   _print_array->sort(&AllocationProfiler::compare_classes);
       
    92   tty->print_cr("________________Size"
       
    93                 "__Instances"
       
    94                 "__Average"
       
    95                 "__Class________________");
       
    96   size_t total_alloc_size = 0;
       
    97   int total_alloc_count = 0;
       
    98   for (int index = 0; index < _print_array->length(); index++) {
       
    99     Klass* k = _print_array->at(index);
       
   100     size_t alloc_size = k->alloc_size();
       
   101     if (alloc_size > cutoff) {
       
   102       int alloc_count = k->alloc_count();
       
   103 #ifdef PRODUCT
       
   104       const char* name = k->external_name();
       
   105 #else
       
   106       const char* name = k->internal_name();
       
   107 #endif
       
   108       tty->print_cr("%20u %10u %8u  %s",
       
   109         alloc_size * BytesPerWord,
       
   110         alloc_count,
       
   111         average(alloc_size, alloc_count),
       
   112         name);
       
   113       total_alloc_size += alloc_size;
       
   114       total_alloc_count += alloc_count;
       
   115     }
       
   116     k->set_alloc_count(0);
       
   117     k->set_alloc_size(0);
       
   118   }
       
   119   tty->print_cr("%20u %10u %8u  --total--",
       
   120     total_alloc_size * BytesPerWord,
       
   121     total_alloc_count,
       
   122     average(total_alloc_size, total_alloc_count));
       
   123   tty->cr();
       
   124 }
       
   125 
       
   126 
       
   127 void AllocationProfiler::print(size_t cutoff) {
       
   128   ResourceMark rm;
       
   129   assert(!is_active(), "AllocationProfiler cannot be active while printing profile");
       
   130 
       
   131   tty->cr();
       
   132   tty->print_cr("Allocation profile (sizes in bytes, cutoff = " SIZE_FORMAT " bytes):", cutoff * BytesPerWord);
       
   133   tty->cr();
       
   134 
       
   135   // Print regular instance klasses and basic type array klasses
       
   136   _print_array = new GrowableArray<Klass*>(SystemDictionary::number_of_classes()*2);
       
   137   SystemDictionary::classes_do(&add_classes_to_array);
       
   138   Universe::basic_type_classes_do(&add_classes_to_array);
       
   139   sort_and_print_array(cutoff);
       
   140 
       
   141   // This used to print metadata in the permgen but since there isn't a permgen
       
   142   // anymore, it is not yet implemented.
       
   143 }