• file
• revisions
• annotate
• diff
• comparison
• raw

src/share/vm/runtime/aprofiler.cpp@2b42b31e7928 (annotated)

src/share/vm/runtime/aprofiler.cpp

Fri, 21 Nov 2008 08:09:11 -0800

author

coleenp

date

Fri, 21 Nov 2008 08:09:11 -0800

changeset 882

2b42b31e7928

parent 435

a61af66fc99e

child 1907

c18cbe5936b8

permissions

-rw-r--r--

6676175: BigApps crash JVM Client VM (build 10.0-b22, mixed mode, sharing) with SIGSEGV (0xb)
Summary: Add test for biased locking epoch before walking own thread stack in case of rare race
Reviewed-by: phh, never

duke@435	1	/*
duke@435	2	* Copyright 1997-2002 Sun Microsystems, Inc. All Rights Reserved.
duke@435	3	* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435	4	*
duke@435	5	* This code is free software; you can redistribute it and/or modify it
duke@435	6	* under the terms of the GNU General Public License version 2 only, as
duke@435	7	* published by the Free Software Foundation.
duke@435	8	*
duke@435	9	* This code is distributed in the hope that it will be useful, but WITHOUT
duke@435	10	* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435	11	* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
duke@435	12	* version 2 for more details (a copy is included in the LICENSE file that
duke@435	13	* accompanied this code).
duke@435	14	*
duke@435	15	* You should have received a copy of the GNU General Public License version
duke@435	16	* 2 along with this work; if not, write to the Free Software Foundation,
duke@435	17	* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435	18	*
duke@435	19	* Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
duke@435	20	* CA 95054 USA or visit www.sun.com if you need additional information or
duke@435	21	* have any questions.
duke@435	22	*
duke@435	23	*/
duke@435	24
duke@435	25	# include "incls/_precompiled.incl"
duke@435	26	# include "incls/_aprofiler.cpp.incl"
duke@435	27
duke@435	28
duke@435	29	bool AllocationProfiler::_active = false;
duke@435	30	GrowableArray<klassOop>* AllocationProfiler::_print_array = NULL;
duke@435	31
duke@435	32
duke@435	33	class AllocProfClosure : public ObjectClosure {
duke@435	34	public:
duke@435	35	void do_object(oop obj) {
duke@435	36	Klass* k = obj->blueprint();
duke@435	37	k->set_alloc_count(k->alloc_count() + 1);
duke@435	38	k->set_alloc_size(k->alloc_size() + obj->size());
duke@435	39	}
duke@435	40	};
duke@435	41
duke@435	42
duke@435	43	#ifndef PRODUCT
duke@435	44
duke@435	45	class AllocProfResetClosure : public ObjectClosure {
duke@435	46	public:
duke@435	47	void do_object(oop obj) {
duke@435	48	if (obj->is_klass()) {
duke@435	49	Klass* k = Klass::cast(klassOop(obj));
duke@435	50	k->set_alloc_count(0);
duke@435	51	k->set_alloc_size(0);
duke@435	52	}
duke@435	53	}
duke@435	54	};
duke@435	55
duke@435	56	#endif
duke@435	57
duke@435	58
duke@435	59	void AllocationProfiler::iterate_since_last_gc() {
duke@435	60	if (is_active()) {
duke@435	61	AllocProfClosure blk;
duke@435	62	GenCollectedHeap* heap = GenCollectedHeap::heap();
duke@435	63	heap->object_iterate_since_last_GC(&blk);
duke@435	64	}
duke@435	65	}
duke@435	66
duke@435	67
duke@435	68	void AllocationProfiler::engage() {
duke@435	69	_active = true;
duke@435	70	}
duke@435	71
duke@435	72
duke@435	73	void AllocationProfiler::disengage() {
duke@435	74	_active = false;
duke@435	75	}
duke@435	76
duke@435	77
duke@435	78	void AllocationProfiler::add_class_to_array(klassOop k) {
duke@435	79	_print_array->append(k);
duke@435	80	}
duke@435	81
duke@435	82
duke@435	83	void AllocationProfiler::add_classes_to_array(klassOop k) {
duke@435	84	// Iterate over klass and all array klasses for klass
duke@435	85	k->klass_part()->with_array_klasses_do(&AllocationProfiler::add_class_to_array);
duke@435	86	}
duke@435	87
duke@435	88
duke@435	89	int AllocationProfiler::compare_classes(klassOop* k1, klassOop* k2) {
duke@435	90	// Sort by total allocation size
duke@435	91	return (*k2)->klass_part()->alloc_size() - (*k1)->klass_part()->alloc_size();
duke@435	92	}
duke@435	93
duke@435	94
duke@435	95	int AllocationProfiler::average(size_t alloc_size, int alloc_count) {
duke@435	96	return (int) ((double) (alloc_size * BytesPerWord) / MAX2(alloc_count, 1) + 0.5);
duke@435	97	}
duke@435	98
duke@435	99
duke@435	100	void AllocationProfiler::sort_and_print_array(size_t cutoff) {
duke@435	101	_print_array->sort(&AllocationProfiler::compare_classes);
duke@435	102	tty->print_cr("________________Size"
duke@435	103	"__Instances"
duke@435	104	"__Average"
duke@435	105	"__Class________________");
duke@435	106	size_t total_alloc_size = 0;
duke@435	107	int total_alloc_count = 0;
duke@435	108	for (int index = 0; index < _print_array->length(); index++) {
duke@435	109	klassOop k = _print_array->at(index);
duke@435	110	size_t alloc_size = k->klass_part()->alloc_size();
duke@435	111	if (alloc_size > cutoff) {
duke@435	112	int alloc_count = k->klass_part()->alloc_count();
duke@435	113	#ifdef PRODUCT
duke@435	114	const char* name = k->klass_part()->external_name();
duke@435	115	#else
duke@435	116	const char* name = k->klass_part()->internal_name();
duke@435	117	#endif
duke@435	118	tty->print_cr("%20u %10u %8u %s",
duke@435	119	alloc_size * BytesPerWord,
duke@435	120	alloc_count,
duke@435	121	average(alloc_size, alloc_count),
duke@435	122	name);
duke@435	123	total_alloc_size += alloc_size;
duke@435	124	total_alloc_count += alloc_count;
duke@435	125	}
duke@435	126	}
duke@435	127	tty->print_cr("%20u %10u %8u --total--",
duke@435	128	total_alloc_size * BytesPerWord,
duke@435	129	total_alloc_count,
duke@435	130	average(total_alloc_size, total_alloc_count));
duke@435	131	tty->cr();
duke@435	132	}
duke@435	133
duke@435	134
duke@435	135	void AllocationProfiler::print(size_t cutoff) {
duke@435	136	ResourceMark rm;
duke@435	137	assert(!is_active(), "AllocationProfiler cannot be active while printing profile");
duke@435	138
duke@435	139	tty->cr();
duke@435	140	tty->print_cr("Allocation profile (sizes in bytes, cutoff = %ld bytes):", cutoff * BytesPerWord);
duke@435	141	tty->cr();
duke@435	142
duke@435	143	// Print regular instance klasses and basic type array klasses
duke@435	144	_print_array = new GrowableArray<klassOop>(SystemDictionary::number_of_classes()*2);
duke@435	145	SystemDictionary::classes_do(&add_classes_to_array);
duke@435	146	Universe::basic_type_classes_do(&add_classes_to_array);
duke@435	147	sort_and_print_array(cutoff);
duke@435	148
duke@435	149	#ifndef PRODUCT
duke@435	150	tty->print_cr("Allocation profile for system classes (sizes in bytes, cutoff = %d bytes):", cutoff * BytesPerWord);
duke@435	151	tty->cr();
duke@435	152
duke@435	153	// Print system klasses (methods, symbols, constant pools, etc.)
duke@435	154	_print_array = new GrowableArray<klassOop>(64);
duke@435	155	Universe::system_classes_do(&add_classes_to_array);
duke@435	156	sort_and_print_array(cutoff);
duke@435	157
duke@435	158	tty->print_cr("Permanent generation dump (sizes in bytes, cutoff = %d bytes):", cutoff * BytesPerWord);
duke@435	159	tty->cr();
duke@435	160
duke@435	161	AllocProfResetClosure resetblk;
duke@435	162	Universe::heap()->permanent_object_iterate(&resetblk);
duke@435	163	AllocProfClosure blk;
duke@435	164	Universe::heap()->permanent_object_iterate(&blk);
duke@435	165
duke@435	166	_print_array = new GrowableArray<klassOop>(SystemDictionary::number_of_classes()*2);
duke@435	167	SystemDictionary::classes_do(&add_classes_to_array);
duke@435	168	Universe::basic_type_classes_do(&add_classes_to_array);
duke@435	169	Universe::system_classes_do(&add_classes_to_array);
duke@435	170	sort_and_print_array(cutoff);
duke@435	171	#endif
duke@435	172	}