duke@435: /*
stefank@2314:  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
duke@435:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435:  *
duke@435:  * This code is free software; you can redistribute it and/or modify it
duke@435:  * under the terms of the GNU General Public License version 2 only, as
duke@435:  * published by the Free Software Foundation.
duke@435:  *
duke@435:  * This code is distributed in the hope that it will be useful, but WITHOUT
duke@435:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
duke@435:  * version 2 for more details (a copy is included in the LICENSE file that
duke@435:  * accompanied this code).
duke@435:  *
duke@435:  * You should have received a copy of the GNU General Public License version
duke@435:  * 2 along with this work; if not, write to the Free Software Foundation,
duke@435:  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435:  *
trims@1907:  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
trims@1907:  * or visit www.oracle.com if you need additional information or have any
trims@1907:  * questions.
duke@435:  *
duke@435:  */
duke@435: 
stefank@2314: #include "precompiled.hpp"
stefank@2314: #include "gc_implementation/parallelScavenge/parallelScavengeHeap.inline.hpp"
stefank@2314: #include "gc_implementation/parallelScavenge/psMarkSweep.hpp"
stefank@2314: #include "gc_implementation/parallelScavenge/psScavenge.hpp"
stefank@2314: #include "gc_implementation/parallelScavenge/psScavenge.inline.hpp"
stefank@2314: #include "gc_implementation/parallelScavenge/vmPSOperations.hpp"
stefank@2314: #include "memory/gcLocker.inline.hpp"
stefank@2314: #include "utilities/dtrace.hpp"
duke@435: 
duke@435: // The following methods are used by the parallel scavenge collector
duke@435: VM_ParallelGCFailedAllocation::VM_ParallelGCFailedAllocation(size_t size,
duke@435:   bool is_tlab, unsigned int gc_count) :
duke@435:   VM_GC_Operation(gc_count),
duke@435:   _size(size),
duke@435:   _is_tlab(is_tlab),
duke@435:   _result(NULL)
duke@435: {
duke@435: }
duke@435: 
duke@435: void VM_ParallelGCFailedAllocation::doit() {
kamg@2445:   SvcGCMarker sgcm(SvcGCMarker::MINOR);
duke@435: 
duke@435:   ParallelScavengeHeap* heap = (ParallelScavengeHeap*)Universe::heap();
duke@435:   assert(heap->kind() == CollectedHeap::ParallelScavengeHeap, "must be a ParallelScavengeHeap");
duke@435: 
duke@435:   GCCauseSetter gccs(heap, _gc_cause);
duke@435:   _result = heap->failed_mem_allocate(_size, _is_tlab);
duke@435: 
duke@435:   if (_result == NULL && GC_locker::is_active_and_needs_gc()) {
duke@435:     set_gc_locked();
duke@435:   }
duke@435: }
duke@435: 
duke@435: VM_ParallelGCFailedPermanentAllocation::VM_ParallelGCFailedPermanentAllocation(size_t size,
duke@435:   unsigned int gc_count, unsigned int full_gc_count) :
duke@435:   VM_GC_Operation(gc_count, full_gc_count, true /* full */),
duke@435:   _size(size),
duke@435:   _result(NULL)
duke@435: {
duke@435: }
duke@435: 
duke@435: void VM_ParallelGCFailedPermanentAllocation::doit() {
kamg@2445:   SvcGCMarker sgcm(SvcGCMarker::FULL);
duke@435: 
duke@435:   ParallelScavengeHeap* heap = (ParallelScavengeHeap*)Universe::heap();
duke@435:   assert(heap->kind() == CollectedHeap::ParallelScavengeHeap, "must be a ParallelScavengeHeap");
duke@435: 
duke@435:   GCCauseSetter gccs(heap, _gc_cause);
duke@435:   _result = heap->failed_permanent_mem_allocate(_size);
apetrusenko@574:   if (_result == NULL && GC_locker::is_active_and_needs_gc()) {
apetrusenko@574:     set_gc_locked();
apetrusenko@574:   }
duke@435: }
duke@435: 
duke@435: // Only used for System.gc() calls
duke@435: VM_ParallelGCSystemGC::VM_ParallelGCSystemGC(unsigned int gc_count,
duke@435:                                              unsigned int full_gc_count,
duke@435:                                              GCCause::Cause gc_cause) :
duke@435:   VM_GC_Operation(gc_count, full_gc_count, true /* full */)
duke@435: {
duke@435:   _gc_cause = gc_cause;
duke@435: }
duke@435: 
duke@435: void VM_ParallelGCSystemGC::doit() {
kamg@2445:   SvcGCMarker sgcm(SvcGCMarker::FULL);
duke@435: 
duke@435:   ParallelScavengeHeap* heap = (ParallelScavengeHeap*)Universe::heap();
duke@435:   assert(heap->kind() == CollectedHeap::ParallelScavengeHeap,
duke@435:     "must be a ParallelScavengeHeap");
duke@435: 
duke@435:   GCCauseSetter gccs(heap, _gc_cause);
duke@435:   if (_gc_cause == GCCause::_gc_locker
duke@435:       DEBUG_ONLY(|| _gc_cause == GCCause::_scavenge_alot)) {
duke@435:     // If (and only if) the scavenge fails, this will invoke a full gc.
duke@435:     heap->invoke_scavenge();
duke@435:   } else {
duke@435:     heap->invoke_full_gc(false);
duke@435:   }
duke@435: }