Mercurial > hg > graal-compiler
diff src/share/vm/services/memoryService.cpp @ 0:a61af66fc99e jdk7-b24
Initial load
author | duke |
---|---|
date | Sat, 01 Dec 2007 00:00:00 +0000 |
parents | |
children | 37f87013dfd8 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/share/vm/services/memoryService.cpp Sat Dec 01 00:00:00 2007 +0000 @@ -0,0 +1,548 @@ +/* + * Copyright 2003-2006 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/_memoryService.cpp.incl" + +GrowableArray<MemoryPool*>* MemoryService::_pools_list = + new (ResourceObj::C_HEAP) GrowableArray<MemoryPool*>(init_pools_list_size, true); +GrowableArray<MemoryManager*>* MemoryService::_managers_list = + new (ResourceObj::C_HEAP) GrowableArray<MemoryManager*>(init_managers_list_size, true); + +GCMemoryManager* MemoryService::_minor_gc_manager = NULL; +GCMemoryManager* MemoryService::_major_gc_manager = NULL; +MemoryPool* MemoryService::_code_heap_pool = NULL; + +class GcThreadCountClosure: public ThreadClosure { + private: + int _count; + public: + GcThreadCountClosure() : _count(0) {}; + void do_thread(Thread* thread); + int count() { return _count; } +}; + +void GcThreadCountClosure::do_thread(Thread* thread) { + _count++; +} + +void MemoryService::set_universe_heap(CollectedHeap* heap) { + CollectedHeap::Name kind = heap->kind(); + switch (kind) { + case CollectedHeap::GenCollectedHeap : { + add_gen_collected_heap_info(GenCollectedHeap::heap()); + break; + } +#ifndef SERIALGC + case CollectedHeap::ParallelScavengeHeap : { + add_parallel_scavenge_heap_info(ParallelScavengeHeap::heap()); + break; + } +#endif // SERIALGC + default: { + guarantee(false, "Not recognized kind of heap"); + } + } + + // set the GC thread count + GcThreadCountClosure gctcc; + heap->gc_threads_do(&gctcc); + int count = gctcc.count(); + if (count > 0) { + _minor_gc_manager->set_num_gc_threads(count); + _major_gc_manager->set_num_gc_threads(count); + } + + // All memory pools and memory managers are initialized. + // + _minor_gc_manager->initialize_gc_stat_info(); + _major_gc_manager->initialize_gc_stat_info(); +} + +// Add memory pools for GenCollectedHeap +// This function currently only supports two generations collected heap. +// The collector for GenCollectedHeap will have two memory managers. +void MemoryService::add_gen_collected_heap_info(GenCollectedHeap* heap) { + CollectorPolicy* policy = heap->collector_policy(); + + assert(policy->is_two_generation_policy(), "Only support two generations"); + guarantee(heap->n_gens() == 2, "Only support two-generation heap"); + + TwoGenerationCollectorPolicy* two_gen_policy = policy->as_two_generation_policy(); + if (two_gen_policy != NULL) { + GenerationSpec** specs = two_gen_policy->generations(); + Generation::Name kind = specs[0]->name(); + switch (kind) { + case Generation::DefNew: + _minor_gc_manager = MemoryManager::get_copy_memory_manager(); + break; +#ifndef SERIALGC + case Generation::ParNew: + case Generation::ASParNew: + _minor_gc_manager = MemoryManager::get_parnew_memory_manager(); + break; +#endif // SERIALGC + default: + guarantee(false, "Unrecognized generation spec"); + break; + } + if (policy->is_mark_sweep_policy()) { + _major_gc_manager = MemoryManager::get_msc_memory_manager(); +#ifndef SERIALGC + } else if (policy->is_concurrent_mark_sweep_policy()) { + _major_gc_manager = MemoryManager::get_cms_memory_manager(); +#endif // SERIALGC + } else { + guarantee(false, "Unknown two-gen policy"); + } + } else { + guarantee(false, "Non two-gen policy"); + } + _managers_list->append(_minor_gc_manager); + _managers_list->append(_major_gc_manager); + + add_generation_memory_pool(heap->get_gen(minor), _major_gc_manager, _minor_gc_manager); + add_generation_memory_pool(heap->get_gen(major), _major_gc_manager); + + PermGen::Name name = policy->permanent_generation()->name(); + switch (name) { + case PermGen::MarkSweepCompact: { + CompactingPermGenGen* perm_gen = (CompactingPermGenGen*) heap->perm_gen(); + add_compact_perm_gen_memory_pool(perm_gen, _major_gc_manager); + break; + } +#ifndef SERIALGC + case PermGen::ConcurrentMarkSweep: { + CMSPermGenGen* cms_gen = (CMSPermGenGen*) heap->perm_gen(); + add_cms_perm_gen_memory_pool(cms_gen, _major_gc_manager); + break; + } +#endif // SERIALGC + default: + guarantee(false, "Unrecognized perm generation"); + break; + } +} + +#ifndef SERIALGC +// Add memory pools for ParallelScavengeHeap +// This function currently only supports two generations collected heap. +// The collector for ParallelScavengeHeap will have two memory managers. +void MemoryService::add_parallel_scavenge_heap_info(ParallelScavengeHeap* heap) { + // Two managers to keep statistics about _minor_gc_manager and _major_gc_manager GC. + _minor_gc_manager = MemoryManager::get_psScavenge_memory_manager(); + _major_gc_manager = MemoryManager::get_psMarkSweep_memory_manager(); + _managers_list->append(_minor_gc_manager); + _managers_list->append(_major_gc_manager); + + add_psYoung_memory_pool(heap->young_gen(), _major_gc_manager, _minor_gc_manager); + add_psOld_memory_pool(heap->old_gen(), _major_gc_manager); + add_psPerm_memory_pool(heap->perm_gen(), _major_gc_manager); +} +#endif // SERIALGC + +MemoryPool* MemoryService::add_gen(Generation* gen, + const char* name, + bool is_heap, + bool support_usage_threshold) { + + MemoryPool::PoolType type = (is_heap ? MemoryPool::Heap : MemoryPool::NonHeap); + GenerationPool* pool = new GenerationPool(gen, name, type, support_usage_threshold); + _pools_list->append(pool); + return (MemoryPool*) pool; +} + +MemoryPool* MemoryService::add_space(ContiguousSpace* space, + const char* name, + bool is_heap, + size_t max_size, + bool support_usage_threshold) { + MemoryPool::PoolType type = (is_heap ? MemoryPool::Heap : MemoryPool::NonHeap); + ContiguousSpacePool* pool = new ContiguousSpacePool(space, name, type, max_size, support_usage_threshold); + + _pools_list->append(pool); + return (MemoryPool*) pool; +} + +MemoryPool* MemoryService::add_survivor_spaces(DefNewGeneration* gen, + const char* name, + bool is_heap, + size_t max_size, + bool support_usage_threshold) { + MemoryPool::PoolType type = (is_heap ? MemoryPool::Heap : MemoryPool::NonHeap); + SurvivorContiguousSpacePool* pool = new SurvivorContiguousSpacePool(gen, name, type, max_size, support_usage_threshold); + + _pools_list->append(pool); + return (MemoryPool*) pool; +} + +#ifndef SERIALGC +MemoryPool* MemoryService::add_cms_space(CompactibleFreeListSpace* space, + const char* name, + bool is_heap, + size_t max_size, + bool support_usage_threshold) { + MemoryPool::PoolType type = (is_heap ? MemoryPool::Heap : MemoryPool::NonHeap); + CompactibleFreeListSpacePool* pool = new CompactibleFreeListSpacePool(space, name, type, max_size, support_usage_threshold); + _pools_list->append(pool); + return (MemoryPool*) pool; +} +#endif // SERIALGC + +// Add memory pool(s) for one generation +void MemoryService::add_generation_memory_pool(Generation* gen, + MemoryManager* major_mgr, + MemoryManager* minor_mgr) { + Generation::Name kind = gen->kind(); + int index = _pools_list->length(); + + switch (kind) { + case Generation::DefNew: { + assert(major_mgr != NULL && minor_mgr != NULL, "Should have two managers"); + DefNewGeneration* young_gen = (DefNewGeneration*) gen; + // Add a memory pool for each space and young gen doesn't + // support low memory detection as it is expected to get filled up. + MemoryPool* eden = add_space(young_gen->eden(), + "Eden Space", + true, /* is_heap */ + young_gen->max_eden_size(), + false /* support_usage_threshold */); + MemoryPool* survivor = add_survivor_spaces(young_gen, + "Survivor Space", + true, /* is_heap */ + young_gen->max_survivor_size(), + false /* support_usage_threshold */); + break; + } + +#ifndef SERIALGC + case Generation::ParNew: + case Generation::ASParNew: + { + assert(major_mgr != NULL && minor_mgr != NULL, "Should have two managers"); + // Add a memory pool for each space and young gen doesn't + // support low memory detection as it is expected to get filled up. + ParNewGeneration* parnew_gen = (ParNewGeneration*) gen; + MemoryPool* eden = add_space(parnew_gen->eden(), + "Par Eden Space", + true /* is_heap */, + parnew_gen->max_eden_size(), + false /* support_usage_threshold */); + MemoryPool* survivor = add_survivor_spaces(parnew_gen, + "Par Survivor Space", + true, /* is_heap */ + parnew_gen->max_survivor_size(), + false /* support_usage_threshold */); + + break; + } +#endif // SERIALGC + + case Generation::MarkSweepCompact: { + assert(major_mgr != NULL && minor_mgr == NULL, "Should have only one manager"); + add_gen(gen, + "Tenured Gen", + true, /* is_heap */ + true /* support_usage_threshold */); + break; + } + +#ifndef SERIALGC + case Generation::ConcurrentMarkSweep: + case Generation::ASConcurrentMarkSweep: + { + assert(major_mgr != NULL && minor_mgr == NULL, "Should have only one manager"); + ConcurrentMarkSweepGeneration* cms = (ConcurrentMarkSweepGeneration*) gen; + MemoryPool* pool = add_cms_space(cms->cmsSpace(), + "CMS Old Gen", + true, /* is_heap */ + cms->reserved().byte_size(), + true /* support_usage_threshold */); + break; + } +#endif // SERIALGC + + default: + assert(false, "should not reach here"); + // no memory pool added for others + break; + } + + assert(major_mgr != NULL, "Should have at least one manager"); + // Link managers and the memory pools together + for (int i = index; i < _pools_list->length(); i++) { + MemoryPool* pool = _pools_list->at(i); + major_mgr->add_pool(pool); + if (minor_mgr != NULL) { + minor_mgr->add_pool(pool); + } + } +} + +void MemoryService::add_compact_perm_gen_memory_pool(CompactingPermGenGen* perm_gen, + MemoryManager* mgr) { + PermanentGenerationSpec* spec = perm_gen->spec(); + size_t max_size = spec->max_size() - spec->read_only_size() - spec->read_write_size(); + MemoryPool* pool = add_space(perm_gen->unshared_space(), + "Perm Gen", + false, /* is_heap */ + max_size, + true /* support_usage_threshold */); + mgr->add_pool(pool); + if (UseSharedSpaces) { + pool = add_space(perm_gen->ro_space(), + "Perm Gen [shared-ro]", + false, /* is_heap */ + spec->read_only_size(), + true /* support_usage_threshold */); + mgr->add_pool(pool); + + pool = add_space(perm_gen->rw_space(), + "Perm Gen [shared-rw]", + false, /* is_heap */ + spec->read_write_size(), + true /* support_usage_threshold */); + mgr->add_pool(pool); + } +} + +#ifndef SERIALGC +void MemoryService::add_cms_perm_gen_memory_pool(CMSPermGenGen* cms_gen, + MemoryManager* mgr) { + + MemoryPool* pool = add_cms_space(cms_gen->cmsSpace(), + "CMS Perm Gen", + false, /* is_heap */ + cms_gen->reserved().byte_size(), + true /* support_usage_threshold */); + mgr->add_pool(pool); +} + +void MemoryService::add_psYoung_memory_pool(PSYoungGen* gen, MemoryManager* major_mgr, MemoryManager* minor_mgr) { + assert(major_mgr != NULL && minor_mgr != NULL, "Should have two managers"); + + // Add a memory pool for each space and young gen doesn't + // support low memory detection as it is expected to get filled up. + EdenMutableSpacePool* eden = new EdenMutableSpacePool(gen, + gen->eden_space(), + "PS Eden Space", + MemoryPool::Heap, + false /* support_usage_threshold */); + + SurvivorMutableSpacePool* survivor = new SurvivorMutableSpacePool(gen, + "PS Survivor Space", + MemoryPool::Heap, + false /* support_usage_threshold */); + + major_mgr->add_pool(eden); + major_mgr->add_pool(survivor); + minor_mgr->add_pool(eden); + minor_mgr->add_pool(survivor); + _pools_list->append(eden); + _pools_list->append(survivor); +} + +void MemoryService::add_psOld_memory_pool(PSOldGen* gen, MemoryManager* mgr) { + PSGenerationPool* old_gen = new PSGenerationPool(gen, + "PS Old Gen", + MemoryPool::Heap, + true /* support_usage_threshold */); + mgr->add_pool(old_gen); + _pools_list->append(old_gen); +} + +void MemoryService::add_psPerm_memory_pool(PSPermGen* gen, MemoryManager* mgr) { + PSGenerationPool* perm_gen = new PSGenerationPool(gen, + "PS Perm Gen", + MemoryPool::NonHeap, + true /* support_usage_threshold */); + mgr->add_pool(perm_gen); + _pools_list->append(perm_gen); +} +#endif // SERIALGC + +void MemoryService::add_code_heap_memory_pool(CodeHeap* heap) { + _code_heap_pool = new CodeHeapPool(heap, + "Code Cache", + true /* support_usage_threshold */); + MemoryManager* mgr = MemoryManager::get_code_cache_memory_manager(); + mgr->add_pool(_code_heap_pool); + + _pools_list->append(_code_heap_pool); + _managers_list->append(mgr); +} + +MemoryManager* MemoryService::get_memory_manager(instanceHandle mh) { + for (int i = 0; i < _managers_list->length(); i++) { + MemoryManager* mgr = _managers_list->at(i); + if (mgr->is_manager(mh)) { + return mgr; + } + } + return NULL; +} + +MemoryPool* MemoryService::get_memory_pool(instanceHandle ph) { + for (int i = 0; i < _pools_list->length(); i++) { + MemoryPool* pool = _pools_list->at(i); + if (pool->is_pool(ph)) { + return pool; + } + } + return NULL; +} + +void MemoryService::track_memory_usage() { + // Track the peak memory usage + for (int i = 0; i < _pools_list->length(); i++) { + MemoryPool* pool = _pools_list->at(i); + pool->record_peak_memory_usage(); + } + + // Detect low memory + LowMemoryDetector::detect_low_memory(); +} + +void MemoryService::track_memory_pool_usage(MemoryPool* pool) { + // Track the peak memory usage + pool->record_peak_memory_usage(); + + // Detect low memory + if (LowMemoryDetector::is_enabled(pool)) { + LowMemoryDetector::detect_low_memory(pool); + } +} + +void MemoryService::gc_begin(bool fullGC) { + GCMemoryManager* mgr; + if (fullGC) { + mgr = _major_gc_manager; + } else { + mgr = _minor_gc_manager; + } + assert(mgr->is_gc_memory_manager(), "Sanity check"); + mgr->gc_begin(); + + // Track the peak memory usage when GC begins + for (int i = 0; i < _pools_list->length(); i++) { + MemoryPool* pool = _pools_list->at(i); + pool->record_peak_memory_usage(); + } +} + +void MemoryService::gc_end(bool fullGC) { + GCMemoryManager* mgr; + if (fullGC) { + mgr = (GCMemoryManager*) _major_gc_manager; + } else { + mgr = (GCMemoryManager*) _minor_gc_manager; + } + assert(mgr->is_gc_memory_manager(), "Sanity check"); + + // register the GC end statistics and memory usage + mgr->gc_end(); +} + +void MemoryService::oops_do(OopClosure* f) { + int i; + + for (i = 0; i < _pools_list->length(); i++) { + MemoryPool* pool = _pools_list->at(i); + pool->oops_do(f); + } + for (i = 0; i < _managers_list->length(); i++) { + MemoryManager* mgr = _managers_list->at(i); + mgr->oops_do(f); + } +} + +bool MemoryService::set_verbose(bool verbose) { + MutexLocker m(Management_lock); + // verbose will be set to the previous value + bool succeed = CommandLineFlags::boolAtPut((char*)"PrintGC", &verbose, MANAGEMENT); + assert(succeed, "Setting PrintGC flag fails"); + ClassLoadingService::reset_trace_class_unloading(); + + return verbose; +} + +Handle MemoryService::create_MemoryUsage_obj(MemoryUsage usage, TRAPS) { + klassOop k = Management::java_lang_management_MemoryUsage_klass(CHECK_NH); + instanceKlassHandle ik(THREAD, k); + + instanceHandle obj = ik->allocate_instance_handle(CHECK_NH); + + JavaValue result(T_VOID); + JavaCallArguments args(10); + args.push_oop(obj); // receiver + args.push_long(usage.init_size_as_jlong()); // Argument 1 + args.push_long(usage.used_as_jlong()); // Argument 2 + args.push_long(usage.committed_as_jlong()); // Argument 3 + args.push_long(usage.max_size_as_jlong()); // Argument 4 + + JavaCalls::call_special(&result, + ik, + vmSymbolHandles::object_initializer_name(), + vmSymbolHandles::long_long_long_long_void_signature(), + &args, + CHECK_NH); + return obj; +} +// +// GC manager type depends on the type of Generation. Depending the space +// availablity and vm option the gc uses major gc manager or minor gc +// manager or both. The type of gc manager depends on the generation kind. +// For DefNew, ParNew and ASParNew generation doing scavange gc uses minor +// gc manager (so _fullGC is set to false ) and for other generation kind +// DOing mark-sweep-compact uses major gc manager (so _fullGC is set +// to true). +TraceMemoryManagerStats::TraceMemoryManagerStats(Generation::Name kind) { + switch (kind) { + case Generation::DefNew: +#ifndef SERIALGC + case Generation::ParNew: + case Generation::ASParNew: +#endif // SERIALGC + _fullGC=false; + break; + case Generation::MarkSweepCompact: +#ifndef SERIALGC + case Generation::ConcurrentMarkSweep: + case Generation::ASConcurrentMarkSweep: +#endif // SERIALGC + _fullGC=true; + break; + default: + assert(false, "Unrecognized gc generation kind."); + } + MemoryService::gc_begin(_fullGC); +} +TraceMemoryManagerStats::TraceMemoryManagerStats(bool fullGC) { + _fullGC = fullGC; + MemoryService::gc_begin(_fullGC); +} + +TraceMemoryManagerStats::~TraceMemoryManagerStats() { + MemoryService::gc_end(_fullGC); +}