Mercurial > hg > graal-jvmci-8
diff src/share/vm/runtime/aprofiler.cpp @ 0:a61af66fc99e jdk7-b24
Initial load
author | duke |
---|---|
date | Sat, 01 Dec 2007 00:00:00 +0000 |
parents | |
children | c18cbe5936b8 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/share/vm/runtime/aprofiler.cpp Sat Dec 01 00:00:00 2007 +0000 @@ -0,0 +1,172 @@ +/* + * Copyright 1997-2002 Sun Microsystems, Inc. All Rights Reserved. + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. + * + * This code is free software; you can redistribute it and/or modify it + * under the terms of the GNU General Public License version 2 only, as + * published by the Free Software Foundation. + * + * This code is distributed in the hope that it will be useful, but WITHOUT + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or + * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License + * version 2 for more details (a copy is included in the LICENSE file that + * accompanied this code). + * + * You should have received a copy of the GNU General Public License version + * 2 along with this work; if not, write to the Free Software Foundation, + * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. + * + * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, + * CA 95054 USA or visit www.sun.com if you need additional information or + * have any questions. + * + */ + +# include "incls/_precompiled.incl" +# include "incls/_aprofiler.cpp.incl" + + +bool AllocationProfiler::_active = false; +GrowableArray<klassOop>* AllocationProfiler::_print_array = NULL; + + +class AllocProfClosure : public ObjectClosure { + public: + void do_object(oop obj) { + Klass* k = obj->blueprint(); + k->set_alloc_count(k->alloc_count() + 1); + k->set_alloc_size(k->alloc_size() + obj->size()); + } +}; + + +#ifndef PRODUCT + +class AllocProfResetClosure : public ObjectClosure { + public: + void do_object(oop obj) { + if (obj->is_klass()) { + Klass* k = Klass::cast(klassOop(obj)); + k->set_alloc_count(0); + k->set_alloc_size(0); + } + } +}; + +#endif + + +void AllocationProfiler::iterate_since_last_gc() { + if (is_active()) { + AllocProfClosure blk; + GenCollectedHeap* heap = GenCollectedHeap::heap(); + heap->object_iterate_since_last_GC(&blk); + } +} + + +void AllocationProfiler::engage() { + _active = true; +} + + +void AllocationProfiler::disengage() { + _active = false; +} + + +void AllocationProfiler::add_class_to_array(klassOop k) { + _print_array->append(k); +} + + +void AllocationProfiler::add_classes_to_array(klassOop k) { + // Iterate over klass and all array klasses for klass + k->klass_part()->with_array_klasses_do(&AllocationProfiler::add_class_to_array); +} + + +int AllocationProfiler::compare_classes(klassOop* k1, klassOop* k2) { + // Sort by total allocation size + return (*k2)->klass_part()->alloc_size() - (*k1)->klass_part()->alloc_size(); +} + + +int AllocationProfiler::average(size_t alloc_size, int alloc_count) { + return (int) ((double) (alloc_size * BytesPerWord) / MAX2(alloc_count, 1) + 0.5); +} + + +void AllocationProfiler::sort_and_print_array(size_t cutoff) { + _print_array->sort(&AllocationProfiler::compare_classes); + tty->print_cr("________________Size" + "__Instances" + "__Average" + "__Class________________"); + size_t total_alloc_size = 0; + int total_alloc_count = 0; + for (int index = 0; index < _print_array->length(); index++) { + klassOop k = _print_array->at(index); + size_t alloc_size = k->klass_part()->alloc_size(); + if (alloc_size > cutoff) { + int alloc_count = k->klass_part()->alloc_count(); +#ifdef PRODUCT + const char* name = k->klass_part()->external_name(); +#else + const char* name = k->klass_part()->internal_name(); +#endif + tty->print_cr("%20u %10u %8u %s", + alloc_size * BytesPerWord, + alloc_count, + average(alloc_size, alloc_count), + name); + total_alloc_size += alloc_size; + total_alloc_count += alloc_count; + } + } + tty->print_cr("%20u %10u %8u --total--", + total_alloc_size * BytesPerWord, + total_alloc_count, + average(total_alloc_size, total_alloc_count)); + tty->cr(); +} + + +void AllocationProfiler::print(size_t cutoff) { + ResourceMark rm; + assert(!is_active(), "AllocationProfiler cannot be active while printing profile"); + + tty->cr(); + tty->print_cr("Allocation profile (sizes in bytes, cutoff = %ld bytes):", cutoff * BytesPerWord); + tty->cr(); + + // Print regular instance klasses and basic type array klasses + _print_array = new GrowableArray<klassOop>(SystemDictionary::number_of_classes()*2); + SystemDictionary::classes_do(&add_classes_to_array); + Universe::basic_type_classes_do(&add_classes_to_array); + sort_and_print_array(cutoff); + + #ifndef PRODUCT + tty->print_cr("Allocation profile for system classes (sizes in bytes, cutoff = %d bytes):", cutoff * BytesPerWord); + tty->cr(); + + // Print system klasses (methods, symbols, constant pools, etc.) + _print_array = new GrowableArray<klassOop>(64); + Universe::system_classes_do(&add_classes_to_array); + sort_and_print_array(cutoff); + + tty->print_cr("Permanent generation dump (sizes in bytes, cutoff = %d bytes):", cutoff * BytesPerWord); + tty->cr(); + + AllocProfResetClosure resetblk; + Universe::heap()->permanent_object_iterate(&resetblk); + AllocProfClosure blk; + Universe::heap()->permanent_object_iterate(&blk); + + _print_array = new GrowableArray<klassOop>(SystemDictionary::number_of_classes()*2); + SystemDictionary::classes_do(&add_classes_to_array); + Universe::basic_type_classes_do(&add_classes_to_array); + Universe::system_classes_do(&add_classes_to_array); + sort_and_print_array(cutoff); + #endif +}