Mercurial > hg > truffle
annotate src/share/vm/runtime/aprofiler.cpp @ 1972:f95d63e2154a
6989984: Use standard include model for Hospot
Summary: Replaced MakeDeps and the includeDB files with more standardized solutions.
Reviewed-by: coleenp, kvn, kamg
| author | stefank |
|---|---|
| date | Tue, 23 Nov 2010 13:22:55 -0800 |
| parents | c18cbe5936b8 |
| children | da91efe96a93 |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 1972 | 2 * Copyright (c) 1997, 2010, Oracle and/or its affiliates. All rights reserved. |
| 0 | 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 * | |
|
1552
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
0
diff
changeset
|
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
|
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
0
diff
changeset
|
20 * or visit www.oracle.com if you need additional information or have any |
|
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
0
diff
changeset
|
21 * questions. |
| 0 | 22 * |
| 23 */ | |
| 24 | |
| 1972 | 25 #include "precompiled.hpp" |
| 26 #include "classfile/systemDictionary.hpp" | |
| 27 #include "gc_interface/collectedHeap.inline.hpp" | |
| 28 #include "memory/permGen.hpp" | |
| 29 #include "memory/resourceArea.hpp" | |
| 30 #include "memory/space.hpp" | |
| 31 #include "oops/oop.inline.hpp" | |
| 32 #include "oops/oop.inline2.hpp" | |
| 33 #include "runtime/aprofiler.hpp" | |
| 0 | 34 |
| 35 | |
| 36 bool AllocationProfiler::_active = false; | |
| 37 GrowableArray<klassOop>* AllocationProfiler::_print_array = NULL; | |
| 38 | |
| 39 | |
| 40 class AllocProfClosure : public ObjectClosure { | |
| 41 public: | |
| 42 void do_object(oop obj) { | |
| 43 Klass* k = obj->blueprint(); | |
| 44 k->set_alloc_count(k->alloc_count() + 1); | |
| 45 k->set_alloc_size(k->alloc_size() + obj->size()); | |
| 46 } | |
| 47 }; | |
| 48 | |
| 49 | |
| 50 #ifndef PRODUCT | |
| 51 | |
| 52 class AllocProfResetClosure : public ObjectClosure { | |
| 53 public: | |
| 54 void do_object(oop obj) { | |
| 55 if (obj->is_klass()) { | |
| 56 Klass* k = Klass::cast(klassOop(obj)); | |
| 57 k->set_alloc_count(0); | |
| 58 k->set_alloc_size(0); | |
| 59 } | |
| 60 } | |
| 61 }; | |
| 62 | |
| 63 #endif | |
| 64 | |
| 65 | |
| 66 void AllocationProfiler::iterate_since_last_gc() { | |
| 67 if (is_active()) { | |
| 68 AllocProfClosure blk; | |
| 69 GenCollectedHeap* heap = GenCollectedHeap::heap(); | |
| 70 heap->object_iterate_since_last_GC(&blk); | |
| 71 } | |
| 72 } | |
| 73 | |
| 74 | |
| 75 void AllocationProfiler::engage() { | |
| 76 _active = true; | |
| 77 } | |
| 78 | |
| 79 | |
| 80 void AllocationProfiler::disengage() { | |
| 81 _active = false; | |
| 82 } | |
| 83 | |
| 84 | |
| 85 void AllocationProfiler::add_class_to_array(klassOop k) { | |
| 86 _print_array->append(k); | |
| 87 } | |
| 88 | |
| 89 | |
| 90 void AllocationProfiler::add_classes_to_array(klassOop k) { | |
| 91 // Iterate over klass and all array klasses for klass | |
| 92 k->klass_part()->with_array_klasses_do(&AllocationProfiler::add_class_to_array); | |
| 93 } | |
| 94 | |
| 95 | |
| 96 int AllocationProfiler::compare_classes(klassOop* k1, klassOop* k2) { | |
| 97 // Sort by total allocation size | |
| 98 return (*k2)->klass_part()->alloc_size() - (*k1)->klass_part()->alloc_size(); | |
| 99 } | |
| 100 | |
| 101 | |
| 102 int AllocationProfiler::average(size_t alloc_size, int alloc_count) { | |
| 103 return (int) ((double) (alloc_size * BytesPerWord) / MAX2(alloc_count, 1) + 0.5); | |
| 104 } | |
| 105 | |
| 106 | |
| 107 void AllocationProfiler::sort_and_print_array(size_t cutoff) { | |
| 108 _print_array->sort(&AllocationProfiler::compare_classes); | |
| 109 tty->print_cr("________________Size" | |
| 110 "__Instances" | |
| 111 "__Average" | |
| 112 "__Class________________"); | |
| 113 size_t total_alloc_size = 0; | |
| 114 int total_alloc_count = 0; | |
| 115 for (int index = 0; index < _print_array->length(); index++) { | |
| 116 klassOop k = _print_array->at(index); | |
| 117 size_t alloc_size = k->klass_part()->alloc_size(); | |
| 118 if (alloc_size > cutoff) { | |
| 119 int alloc_count = k->klass_part()->alloc_count(); | |
| 120 #ifdef PRODUCT | |
| 121 const char* name = k->klass_part()->external_name(); | |
| 122 #else | |
| 123 const char* name = k->klass_part()->internal_name(); | |
| 124 #endif | |
| 125 tty->print_cr("%20u %10u %8u %s", | |
| 126 alloc_size * BytesPerWord, | |
| 127 alloc_count, | |
| 128 average(alloc_size, alloc_count), | |
| 129 name); | |
| 130 total_alloc_size += alloc_size; | |
| 131 total_alloc_count += alloc_count; | |
| 132 } | |
| 133 } | |
| 134 tty->print_cr("%20u %10u %8u --total--", | |
| 135 total_alloc_size * BytesPerWord, | |
| 136 total_alloc_count, | |
| 137 average(total_alloc_size, total_alloc_count)); | |
| 138 tty->cr(); | |
| 139 } | |
| 140 | |
| 141 | |
| 142 void AllocationProfiler::print(size_t cutoff) { | |
| 143 ResourceMark rm; | |
| 144 assert(!is_active(), "AllocationProfiler cannot be active while printing profile"); | |
| 145 | |
| 146 tty->cr(); | |
| 147 tty->print_cr("Allocation profile (sizes in bytes, cutoff = %ld bytes):", cutoff * BytesPerWord); | |
| 148 tty->cr(); | |
| 149 | |
| 150 // Print regular instance klasses and basic type array klasses | |
| 151 _print_array = new GrowableArray<klassOop>(SystemDictionary::number_of_classes()*2); | |
| 152 SystemDictionary::classes_do(&add_classes_to_array); | |
| 153 Universe::basic_type_classes_do(&add_classes_to_array); | |
| 154 sort_and_print_array(cutoff); | |
| 155 | |
| 156 #ifndef PRODUCT | |
| 157 tty->print_cr("Allocation profile for system classes (sizes in bytes, cutoff = %d bytes):", cutoff * BytesPerWord); | |
| 158 tty->cr(); | |
| 159 | |
| 160 // Print system klasses (methods, symbols, constant pools, etc.) | |
| 161 _print_array = new GrowableArray<klassOop>(64); | |
| 162 Universe::system_classes_do(&add_classes_to_array); | |
| 163 sort_and_print_array(cutoff); | |
| 164 | |
| 165 tty->print_cr("Permanent generation dump (sizes in bytes, cutoff = %d bytes):", cutoff * BytesPerWord); | |
| 166 tty->cr(); | |
| 167 | |
| 168 AllocProfResetClosure resetblk; | |
| 169 Universe::heap()->permanent_object_iterate(&resetblk); | |
| 170 AllocProfClosure blk; | |
| 171 Universe::heap()->permanent_object_iterate(&blk); | |
| 172 | |
| 173 _print_array = new GrowableArray<klassOop>(SystemDictionary::number_of_classes()*2); | |
| 174 SystemDictionary::classes_do(&add_classes_to_array); | |
| 175 Universe::basic_type_classes_do(&add_classes_to_array); | |
| 176 Universe::system_classes_do(&add_classes_to_array); | |
| 177 sort_and_print_array(cutoff); | |
| 178 #endif | |
| 179 } |