Mercurial > hg > graal-compiler
view src/share/vm/services/memoryService.cpp @ 477:24fda36852ce
6727377: VM stack guard pages on Windows should PAGE_READWRITE not PAGE_EXECUTE_READWRITE
Summary: Make reguard_stack change access to RW, not execute and use os::protect_memory with the new parameter when change needed to X.
Reviewed-by: acorn, jcoomes
author | coleenp |
---|---|
date | Wed, 10 Dec 2008 15:14:29 -0800 |
parents | 37f87013dfd8 |
children | db0d5eba9d20 |
line wrap: on
line source
/* * 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; } case CollectedHeap::G1CollectedHeap : { G1CollectedHeap::g1_unimplemented(); return; } #endif // SERIALGC default: { guarantee(false, "Unrecognized 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); }