Mercurial > jdk8-mips64-public > hotspot / file revision

 /*

  * Copyright 2005-2008 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/_psCompactionManager.cpp.incl"

 PSOldGen*            ParCompactionManager::_old_gen = NULL;

 ParCompactionManager**  ParCompactionManager::_manager_array = NULL;

 OopTaskQueueSet*     ParCompactionManager::_stack_array = NULL;

 ObjectStartArray*    ParCompactionManager::_start_array = NULL;

 ParMarkBitMap*       ParCompactionManager::_mark_bitmap = NULL;

 RegionTaskQueueSet*   ParCompactionManager::_region_array = NULL;

 ParCompactionManager::ParCompactionManager() :

     _action(CopyAndUpdate) {

   ParallelScavengeHeap* heap = (ParallelScavengeHeap*)Universe::heap();

   assert(heap->kind() == CollectedHeap::ParallelScavengeHeap, "Sanity");

   _old_gen = heap->old_gen();

   _start_array = old_gen()->start_array();

   marking_stack()->initialize();

   // We want the overflow stack to be permanent

   _overflow_stack = new (ResourceObj::C_HEAP) GrowableArray<oop>(10, true);

 #ifdef USE_RegionTaskQueueWithOverflow

   region_stack()->initialize();

 #else

   region_stack()->initialize();

   // We want the overflow stack to be permanent

   _region_overflow_stack =

     new (ResourceObj::C_HEAP) GrowableArray<size_t>(10, true);

 #endif

   // Note that _revisit_klass_stack is allocated out of the

   // C heap (as opposed to out of ResourceArena).

   int size =

     (SystemDictionary::number_of_classes() * 2) * 2 / ParallelGCThreads;

   _revisit_klass_stack = new (ResourceObj::C_HEAP) GrowableArray<Klass*>(size, true);

 }

 ParCompactionManager::~ParCompactionManager() {

   delete _overflow_stack;

   delete _revisit_klass_stack;

   // _manager_array and _stack_array are statics

   // shared with all instances of ParCompactionManager

   // should not be deallocated.

 }

 void ParCompactionManager::initialize(ParMarkBitMap* mbm) {

   assert(PSParallelCompact::gc_task_manager() != NULL,

     "Needed for initialization");

   _mark_bitmap = mbm;

   uint parallel_gc_threads = PSParallelCompact::gc_task_manager()->workers();

   assert(_manager_array == NULL, "Attempt to initialize twice");

   _manager_array = NEW_C_HEAP_ARRAY(ParCompactionManager*, parallel_gc_threads+1 );

   guarantee(_manager_array != NULL, "Could not initialize promotion manager");

   _stack_array = new OopTaskQueueSet(parallel_gc_threads);

   guarantee(_stack_array != NULL, "Count not initialize promotion manager");

   _region_array = new RegionTaskQueueSet(parallel_gc_threads);

   guarantee(_region_array != NULL, "Count not initialize promotion manager");

   // Create and register the ParCompactionManager(s) for the worker threads.

   for(uint i=0; i<parallel_gc_threads; i++) {

     _manager_array[i] = new ParCompactionManager();

     guarantee(_manager_array[i] != NULL, "Could not create ParCompactionManager");

     stack_array()->register_queue(i, _manager_array[i]->marking_stack());

 #ifdef USE_RegionTaskQueueWithOverflow

     region_array()->register_queue(i, _manager_array[i]->region_stack()->task_queue());

 #else

     region_array()->register_queue(i, _manager_array[i]->region_stack());

 #endif

   }

   // The VMThread gets its own ParCompactionManager, which is not available

   // for work stealing.

   _manager_array[parallel_gc_threads] = new ParCompactionManager();

   guarantee(_manager_array[parallel_gc_threads] != NULL,

     "Could not create ParCompactionManager");

   assert(PSParallelCompact::gc_task_manager()->workers() != 0,

     "Not initialized?");

 }

 bool ParCompactionManager::should_update() {

   assert(action() != NotValid, "Action is not set");

   return (action() == ParCompactionManager::Update) ||

          (action() == ParCompactionManager::CopyAndUpdate) ||

          (action() == ParCompactionManager::UpdateAndCopy);

 }

 bool ParCompactionManager::should_copy() {

   assert(action() != NotValid, "Action is not set");

   return (action() == ParCompactionManager::Copy) ||

          (action() == ParCompactionManager::CopyAndUpdate) ||

          (action() == ParCompactionManager::UpdateAndCopy);

 }

 bool ParCompactionManager::should_verify_only() {

   assert(action() != NotValid, "Action is not set");

   return action() == ParCompactionManager::VerifyUpdate;

 }

 bool ParCompactionManager::should_reset_only() {

   assert(action() != NotValid, "Action is not set");

   return action() == ParCompactionManager::ResetObjects;

 }

 // For now save on a stack

 void ParCompactionManager::save_for_scanning(oop m) {

   stack_push(m);

 }

 void ParCompactionManager::stack_push(oop obj) {

   if(!marking_stack()->push(obj)) {

     overflow_stack()->push(obj);

   }

 }

 oop ParCompactionManager::retrieve_for_scanning() {

   // Should not be used in the parallel case

   ShouldNotReachHere();

   return NULL;

 }

 // Save region on a stack

 void ParCompactionManager::save_for_processing(size_t region_index) {

 #ifdef ASSERT

   const ParallelCompactData& sd = PSParallelCompact::summary_data();

   ParallelCompactData::RegionData* const region_ptr = sd.region(region_index);

   assert(region_ptr->claimed(), "must be claimed");

   assert(region_ptr->_pushed++ == 0, "should only be pushed once");

 #endif

   region_stack_push(region_index);

 }

 void ParCompactionManager::region_stack_push(size_t region_index) {

 #ifdef USE_RegionTaskQueueWithOverflow

   region_stack()->save(region_index);

 #else

   if(!region_stack()->push(region_index)) {

     region_overflow_stack()->push(region_index);

   }

 #endif

 }

 bool ParCompactionManager::retrieve_for_processing(size_t& region_index) {

 #ifdef USE_RegionTaskQueueWithOverflow

   return region_stack()->retrieve(region_index);

 #else

   // Should not be used in the parallel case

   ShouldNotReachHere();

   return false;

 #endif

 }

 ParCompactionManager*

 ParCompactionManager::gc_thread_compaction_manager(int index) {

   assert(index >= 0 && index < (int)ParallelGCThreads, "index out of range");

   assert(_manager_array != NULL, "Sanity");

   return _manager_array[index];

 }

 void ParCompactionManager::reset() {

   for(uint i=0; i<ParallelGCThreads+1; i++) {

     manager_array(i)->revisit_klass_stack()->clear();

   }

 }

 void ParCompactionManager::drain_marking_stacks(OopClosure* blk) {

 #ifdef ASSERT

   ParallelScavengeHeap* heap = (ParallelScavengeHeap*)Universe::heap();

   assert(heap->kind() == CollectedHeap::ParallelScavengeHeap, "Sanity");

   MutableSpace* to_space = heap->young_gen()->to_space();

   MutableSpace* old_space = heap->old_gen()->object_space();

   MutableSpace* perm_space = heap->perm_gen()->object_space();

 #endif /* ASSERT */

   do {

     // Drain overflow stack first, so other threads can steal from

     // claimed stack while we work.

     while(!overflow_stack()->is_empty()) {

       oop obj = overflow_stack()->pop();

       obj->follow_contents(this);

     }

     oop obj;

     // obj is a reference!!!

     while (marking_stack()->pop_local(obj)) {

       // It would be nice to assert about the type of objects we might

       // pop, but they can come from anywhere, unfortunately.

       obj->follow_contents(this);

     }

   } while((marking_stack()->size() != 0) || (overflow_stack()->length() != 0));

   assert(marking_stack()->size() == 0, "Sanity");

   assert(overflow_stack()->length() == 0, "Sanity");

 }

 void ParCompactionManager::drain_region_overflow_stack() {

   size_t region_index = (size_t) -1;

   while(region_stack()->retrieve_from_overflow(region_index)) {

     PSParallelCompact::fill_and_update_region(this, region_index);

   }

 }

 void ParCompactionManager::drain_region_stacks() {

 #ifdef ASSERT

   ParallelScavengeHeap* heap = (ParallelScavengeHeap*)Universe::heap();

   assert(heap->kind() == CollectedHeap::ParallelScavengeHeap, "Sanity");

   MutableSpace* to_space = heap->young_gen()->to_space();

   MutableSpace* old_space = heap->old_gen()->object_space();

   MutableSpace* perm_space = heap->perm_gen()->object_space();

 #endif /* ASSERT */

 #if 1 // def DO_PARALLEL - the serial code hasn't been updated

   do {

 #ifdef USE_RegionTaskQueueWithOverflow

     // Drain overflow stack first, so other threads can steal from

     // claimed stack while we work.

     size_t region_index = (size_t) -1;

     while(region_stack()->retrieve_from_overflow(region_index)) {

       PSParallelCompact::fill_and_update_region(this, region_index);

     }

     while (region_stack()->retrieve_from_stealable_queue(region_index)) {

       PSParallelCompact::fill_and_update_region(this, region_index);

     }

   } while (!region_stack()->is_empty());

 #else

     // Drain overflow stack first, so other threads can steal from

     // claimed stack while we work.

     while(!region_overflow_stack()->is_empty()) {

       size_t region_index = region_overflow_stack()->pop();

       PSParallelCompact::fill_and_update_region(this, region_index);

     }

     size_t region_index = -1;

     // obj is a reference!!!

     while (region_stack()->pop_local(region_index)) {

       // It would be nice to assert about the type of objects we might

       // pop, but they can come from anywhere, unfortunately.

       PSParallelCompact::fill_and_update_region(this, region_index);

     }

   } while((region_stack()->size() != 0) ||

           (region_overflow_stack()->length() != 0));

 #endif

 #ifdef USE_RegionTaskQueueWithOverflow

   assert(region_stack()->is_empty(), "Sanity");

 #else

   assert(region_stack()->size() == 0, "Sanity");

   assert(region_overflow_stack()->length() == 0, "Sanity");

 #endif

 #else

   oop obj;

   while (obj = retrieve_for_scanning()) {

     obj->follow_contents(this);

   }

 #endif

 }

 #ifdef ASSERT

 bool ParCompactionManager::stacks_have_been_allocated() {

   return (revisit_klass_stack()->data_addr() != NULL);

 }

 #endif