Mercurial > hg > graal-compiler
annotate src/share/vm/runtime/aprofiler.cpp @ 6972:bd7a7ce2e264
6830717: replay of compilations would help with debugging
Summary: When java process crashed in compiler thread, repeat the compilation process will help finding root cause. This is done with using SA dump application class data and replay data from core dump, then use debug version of jvm to recompile the problematic java method.
Reviewed-by: kvn, twisti, sspitsyn
Contributed-by: yumin.qi@oracle.com
| author | minqi |
|---|---|
| date | Mon, 12 Nov 2012 14:03:53 -0800 |
| parents | da91efe96a93 |
| children | 203f64878aab |
| rev | line source |
|---|---|
| 0 | 1 /* |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
2 * Copyright (c) 1997, 2012, 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/resourceArea.hpp" | |
| 29 #include "memory/space.hpp" | |
| 30 #include "oops/oop.inline.hpp" | |
| 31 #include "oops/oop.inline2.hpp" | |
| 32 #include "runtime/aprofiler.hpp" | |
| 0 | 33 |
| 34 | |
| 35 bool AllocationProfiler::_active = false; | |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
36 GrowableArray<Klass*>* AllocationProfiler::_print_array = NULL; |
| 0 | 37 |
| 38 | |
| 39 class AllocProfClosure : public ObjectClosure { | |
| 40 public: | |
| 41 void do_object(oop obj) { | |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
42 Klass* k = obj->klass(); |
| 0 | 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 | |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
68 void AllocationProfiler::add_class_to_array(Klass* k) { |
| 0 | 69 _print_array->append(k); |
| 70 } | |
| 71 | |
| 72 | |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
73 void AllocationProfiler::add_classes_to_array(Klass* k) { |
| 0 | 74 // Iterate over klass and all array klasses for klass |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
75 k->with_array_klasses_do(&AllocationProfiler::add_class_to_array); |
| 0 | 76 } |
| 77 | |
| 78 | |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
79 int AllocationProfiler::compare_classes(Klass** k1, Klass** k2) { |
| 0 | 80 // Sort by total allocation size |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
81 return (*k2)->alloc_size() - (*k1)->alloc_size(); |
| 0 | 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++) { | |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
99 Klass* k = _print_array->at(index); |
|
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
100 size_t alloc_size = k->alloc_size(); |
| 0 | 101 if (alloc_size > cutoff) { |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
102 int alloc_count = k->alloc_count(); |
| 0 | 103 #ifdef PRODUCT |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
104 const char* name = k->external_name(); |
| 0 | 105 #else |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
106 const char* name = k->internal_name(); |
| 0 | 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 } | |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
116 k->set_alloc_count(0); |
|
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
117 k->set_alloc_size(0); |
| 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 = %ld bytes):", cutoff * BytesPerWord); | |
| 133 tty->cr(); | |
| 134 | |
| 135 // Print regular instance klasses and basic type array klasses | |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
136 _print_array = new GrowableArray<Klass*>(SystemDictionary::number_of_classes()*2); |
| 0 | 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 | |
|
6725
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
141 // This used to print metadata in the permgen but since there isn't a permgen |
|
da91efe96a93
6964458: Reimplement class meta-data storage to use native memory
coleenp
parents:
1972
diff
changeset
|
142 // anymore, it is not yet implemented. |
| 0 | 143 } |