Mon, 10 Jan 2011 17:14:53 -0500
6458402: 3 jvmti tests fail with CMS and +ExplicitGCInvokesConcurrent
Summary: Make JvmtiGCMark safe to run non-safepoint and instrument CMS
Reviewed-by: ysr, dcubed
1 /*
2 * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
25 #include "precompiled.hpp"
26 #include "gc_implementation/parallelScavenge/parallelScavengeHeap.inline.hpp"
27 #include "gc_implementation/parallelScavenge/psMarkSweep.hpp"
28 #include "gc_implementation/parallelScavenge/psScavenge.hpp"
29 #include "gc_implementation/parallelScavenge/psScavenge.inline.hpp"
30 #include "gc_implementation/parallelScavenge/vmPSOperations.hpp"
31 #include "memory/gcLocker.inline.hpp"
32 #include "utilities/dtrace.hpp"
34 // The following methods are used by the parallel scavenge collector
35 VM_ParallelGCFailedAllocation::VM_ParallelGCFailedAllocation(size_t size,
36 bool is_tlab, unsigned int gc_count) :
37 VM_GC_Operation(gc_count),
38 _size(size),
39 _is_tlab(is_tlab),
40 _result(NULL)
41 {
42 }
44 void VM_ParallelGCFailedAllocation::doit() {
45 SvcGCMarker sgcm(SvcGCMarker::MINOR);
47 ParallelScavengeHeap* heap = (ParallelScavengeHeap*)Universe::heap();
48 assert(heap->kind() == CollectedHeap::ParallelScavengeHeap, "must be a ParallelScavengeHeap");
50 GCCauseSetter gccs(heap, _gc_cause);
51 _result = heap->failed_mem_allocate(_size, _is_tlab);
53 if (_result == NULL && GC_locker::is_active_and_needs_gc()) {
54 set_gc_locked();
55 }
56 }
58 VM_ParallelGCFailedPermanentAllocation::VM_ParallelGCFailedPermanentAllocation(size_t size,
59 unsigned int gc_count, unsigned int full_gc_count) :
60 VM_GC_Operation(gc_count, full_gc_count, true /* full */),
61 _size(size),
62 _result(NULL)
63 {
64 }
66 void VM_ParallelGCFailedPermanentAllocation::doit() {
67 SvcGCMarker sgcm(SvcGCMarker::FULL);
69 ParallelScavengeHeap* heap = (ParallelScavengeHeap*)Universe::heap();
70 assert(heap->kind() == CollectedHeap::ParallelScavengeHeap, "must be a ParallelScavengeHeap");
72 GCCauseSetter gccs(heap, _gc_cause);
73 _result = heap->failed_permanent_mem_allocate(_size);
74 if (_result == NULL && GC_locker::is_active_and_needs_gc()) {
75 set_gc_locked();
76 }
77 }
79 // Only used for System.gc() calls
80 VM_ParallelGCSystemGC::VM_ParallelGCSystemGC(unsigned int gc_count,
81 unsigned int full_gc_count,
82 GCCause::Cause gc_cause) :
83 VM_GC_Operation(gc_count, full_gc_count, true /* full */)
84 {
85 _gc_cause = gc_cause;
86 }
88 void VM_ParallelGCSystemGC::doit() {
89 SvcGCMarker sgcm(SvcGCMarker::FULL);
91 ParallelScavengeHeap* heap = (ParallelScavengeHeap*)Universe::heap();
92 assert(heap->kind() == CollectedHeap::ParallelScavengeHeap,
93 "must be a ParallelScavengeHeap");
95 GCCauseSetter gccs(heap, _gc_cause);
96 if (_gc_cause == GCCause::_gc_locker
97 DEBUG_ONLY(|| _gc_cause == GCCause::_scavenge_alot)) {
98 // If (and only if) the scavenge fails, this will invoke a full gc.
99 heap->invoke_scavenge();
100 } else {
101 heap->invoke_full_gc(false);
102 }
103 }