src/share/vm/gc_implementation/concurrentMarkSweep/freeList.cpp

Thu, 06 Jan 2011 23:50:02 -0800

author
ysr
date
Thu, 06 Jan 2011 23:50:02 -0800
changeset 2452
4947ee68d19c
parent 2314
f95d63e2154a
child 2972
f75137faa7fe
permissions
-rw-r--r--

7008136: CMS: assert((HeapWord*)nextChunk <= _limit) failed: sweep invariant
Summary: The recorded _sweep_limit may not necessarily remain a block boundary as the old generation expands during a concurrent cycle. Terminal actions inside the sweep closure need to be aware of this as they cross over the limit.
Reviewed-by: johnc, minqi

duke@435 1 /*
stefank@2314 2 * Copyright (c) 2001, 2010, Oracle and/or its affiliates. All rights reserved.
duke@435 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435 4 *
duke@435 5 * This code is free software; you can redistribute it and/or modify it
duke@435 6 * under the terms of the GNU General Public License version 2 only, as
duke@435 7 * published by the Free Software Foundation.
duke@435 8 *
duke@435 9 * This code is distributed in the hope that it will be useful, but WITHOUT
duke@435 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
duke@435 12 * version 2 for more details (a copy is included in the LICENSE file that
duke@435 13 * accompanied this code).
duke@435 14 *
duke@435 15 * You should have received a copy of the GNU General Public License version
duke@435 16 * 2 along with this work; if not, write to the Free Software Foundation,
duke@435 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435 18 *
trims@1907 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
trims@1907 20 * or visit www.oracle.com if you need additional information or have any
trims@1907 21 * questions.
duke@435 22 *
duke@435 23 */
duke@435 24
stefank@2314 25 #include "precompiled.hpp"
stefank@2314 26 #include "gc_implementation/concurrentMarkSweep/freeBlockDictionary.hpp"
stefank@2314 27 #include "gc_implementation/concurrentMarkSweep/freeList.hpp"
stefank@2314 28 #include "memory/sharedHeap.hpp"
stefank@2314 29 #include "runtime/globals.hpp"
stefank@2314 30 #include "runtime/mutex.hpp"
stefank@2314 31 #include "runtime/vmThread.hpp"
duke@435 32
duke@435 33 // Free list. A FreeList is used to access a linked list of chunks
duke@435 34 // of space in the heap. The head and tail are maintained so that
duke@435 35 // items can be (as in the current implementation) added at the
duke@435 36 // at the tail of the list and removed from the head of the list to
duke@435 37 // maintain a FIFO queue.
duke@435 38
duke@435 39 FreeList::FreeList() :
duke@435 40 _head(NULL), _tail(NULL)
duke@435 41 #ifdef ASSERT
duke@435 42 , _protecting_lock(NULL)
duke@435 43 #endif
duke@435 44 {
duke@435 45 _size = 0;
duke@435 46 _count = 0;
duke@435 47 _hint = 0;
duke@435 48 init_statistics();
duke@435 49 }
duke@435 50
duke@435 51 FreeList::FreeList(FreeChunk* fc) :
duke@435 52 _head(fc), _tail(fc)
duke@435 53 #ifdef ASSERT
duke@435 54 , _protecting_lock(NULL)
duke@435 55 #endif
duke@435 56 {
duke@435 57 _size = fc->size();
duke@435 58 _count = 1;
duke@435 59 _hint = 0;
duke@435 60 init_statistics();
duke@435 61 #ifndef PRODUCT
duke@435 62 _allocation_stats.set_returnedBytes(size() * HeapWordSize);
duke@435 63 #endif
duke@435 64 }
duke@435 65
duke@435 66 FreeList::FreeList(HeapWord* addr, size_t size) :
duke@435 67 _head((FreeChunk*) addr), _tail((FreeChunk*) addr)
duke@435 68 #ifdef ASSERT
duke@435 69 , _protecting_lock(NULL)
duke@435 70 #endif
duke@435 71 {
duke@435 72 assert(size > sizeof(FreeChunk), "size is too small");
duke@435 73 head()->setSize(size);
duke@435 74 _size = size;
duke@435 75 _count = 1;
duke@435 76 init_statistics();
duke@435 77 #ifndef PRODUCT
duke@435 78 _allocation_stats.set_returnedBytes(_size * HeapWordSize);
duke@435 79 #endif
duke@435 80 }
duke@435 81
duke@435 82 void FreeList::reset(size_t hint) {
duke@435 83 set_count(0);
duke@435 84 set_head(NULL);
duke@435 85 set_tail(NULL);
duke@435 86 set_hint(hint);
duke@435 87 }
duke@435 88
ysr@1580 89 void FreeList::init_statistics(bool split_birth) {
ysr@1580 90 _allocation_stats.initialize(split_birth);
duke@435 91 }
duke@435 92
duke@435 93 FreeChunk* FreeList::getChunkAtHead() {
duke@435 94 assert_proper_lock_protection();
duke@435 95 assert(head() == NULL || head()->prev() == NULL, "list invariant");
duke@435 96 assert(tail() == NULL || tail()->next() == NULL, "list invariant");
duke@435 97 FreeChunk* fc = head();
duke@435 98 if (fc != NULL) {
duke@435 99 FreeChunk* nextFC = fc->next();
duke@435 100 if (nextFC != NULL) {
duke@435 101 // The chunk fc being removed has a "next". Set the "next" to the
duke@435 102 // "prev" of fc.
duke@435 103 nextFC->linkPrev(NULL);
duke@435 104 } else { // removed tail of list
duke@435 105 link_tail(NULL);
duke@435 106 }
duke@435 107 link_head(nextFC);
duke@435 108 decrement_count();
duke@435 109 }
duke@435 110 assert(head() == NULL || head()->prev() == NULL, "list invariant");
duke@435 111 assert(tail() == NULL || tail()->next() == NULL, "list invariant");
duke@435 112 return fc;
duke@435 113 }
duke@435 114
duke@435 115
duke@435 116 void FreeList::getFirstNChunksFromList(size_t n, FreeList* fl) {
duke@435 117 assert_proper_lock_protection();
duke@435 118 assert(fl->count() == 0, "Precondition");
duke@435 119 if (count() > 0) {
duke@435 120 int k = 1;
duke@435 121 fl->set_head(head()); n--;
duke@435 122 FreeChunk* tl = head();
duke@435 123 while (tl->next() != NULL && n > 0) {
duke@435 124 tl = tl->next(); n--; k++;
duke@435 125 }
duke@435 126 assert(tl != NULL, "Loop Inv.");
duke@435 127
duke@435 128 // First, fix up the list we took from.
duke@435 129 FreeChunk* new_head = tl->next();
duke@435 130 set_head(new_head);
duke@435 131 set_count(count() - k);
duke@435 132 if (new_head == NULL) {
duke@435 133 set_tail(NULL);
duke@435 134 } else {
duke@435 135 new_head->linkPrev(NULL);
duke@435 136 }
duke@435 137 // Now we can fix up the tail.
duke@435 138 tl->linkNext(NULL);
duke@435 139 // And return the result.
duke@435 140 fl->set_tail(tl);
duke@435 141 fl->set_count(k);
duke@435 142 }
duke@435 143 }
duke@435 144
duke@435 145 // Remove this chunk from the list
duke@435 146 void FreeList::removeChunk(FreeChunk*fc) {
duke@435 147 assert_proper_lock_protection();
duke@435 148 assert(head() != NULL, "Remove from empty list");
duke@435 149 assert(fc != NULL, "Remove a NULL chunk");
duke@435 150 assert(size() == fc->size(), "Wrong list");
duke@435 151 assert(head() == NULL || head()->prev() == NULL, "list invariant");
duke@435 152 assert(tail() == NULL || tail()->next() == NULL, "list invariant");
duke@435 153
duke@435 154 FreeChunk* prevFC = fc->prev();
duke@435 155 FreeChunk* nextFC = fc->next();
duke@435 156 if (nextFC != NULL) {
duke@435 157 // The chunk fc being removed has a "next". Set the "next" to the
duke@435 158 // "prev" of fc.
duke@435 159 nextFC->linkPrev(prevFC);
duke@435 160 } else { // removed tail of list
duke@435 161 link_tail(prevFC);
duke@435 162 }
duke@435 163 if (prevFC == NULL) { // removed head of list
duke@435 164 link_head(nextFC);
duke@435 165 assert(nextFC == NULL || nextFC->prev() == NULL,
duke@435 166 "Prev of head should be NULL");
duke@435 167 } else {
duke@435 168 prevFC->linkNext(nextFC);
duke@435 169 assert(tail() != prevFC || prevFC->next() == NULL,
duke@435 170 "Next of tail should be NULL");
duke@435 171 }
duke@435 172 decrement_count();
ysr@2132 173 assert(((head() == NULL) + (tail() == NULL) + (count() == 0)) % 3 == 0,
ysr@2132 174 "H/T/C Inconsistency");
duke@435 175 // clear next and prev fields of fc, debug only
duke@435 176 NOT_PRODUCT(
duke@435 177 fc->linkPrev(NULL);
duke@435 178 fc->linkNext(NULL);
duke@435 179 )
duke@435 180 assert(fc->isFree(), "Should still be a free chunk");
duke@435 181 assert(head() == NULL || head()->prev() == NULL, "list invariant");
duke@435 182 assert(tail() == NULL || tail()->next() == NULL, "list invariant");
duke@435 183 assert(head() == NULL || head()->size() == size(), "wrong item on list");
duke@435 184 assert(tail() == NULL || tail()->size() == size(), "wrong item on list");
duke@435 185 }
duke@435 186
duke@435 187 // Add this chunk at the head of the list.
duke@435 188 void FreeList::returnChunkAtHead(FreeChunk* chunk, bool record_return) {
duke@435 189 assert_proper_lock_protection();
duke@435 190 assert(chunk != NULL, "insert a NULL chunk");
duke@435 191 assert(size() == chunk->size(), "Wrong size");
duke@435 192 assert(head() == NULL || head()->prev() == NULL, "list invariant");
duke@435 193 assert(tail() == NULL || tail()->next() == NULL, "list invariant");
duke@435 194
duke@435 195 FreeChunk* oldHead = head();
duke@435 196 assert(chunk != oldHead, "double insertion");
duke@435 197 chunk->linkAfter(oldHead);
duke@435 198 link_head(chunk);
duke@435 199 if (oldHead == NULL) { // only chunk in list
duke@435 200 assert(tail() == NULL, "inconsistent FreeList");
duke@435 201 link_tail(chunk);
duke@435 202 }
duke@435 203 increment_count(); // of # of chunks in list
duke@435 204 DEBUG_ONLY(
duke@435 205 if (record_return) {
duke@435 206 increment_returnedBytes_by(size()*HeapWordSize);
duke@435 207 }
duke@435 208 )
duke@435 209 assert(head() == NULL || head()->prev() == NULL, "list invariant");
duke@435 210 assert(tail() == NULL || tail()->next() == NULL, "list invariant");
duke@435 211 assert(head() == NULL || head()->size() == size(), "wrong item on list");
duke@435 212 assert(tail() == NULL || tail()->size() == size(), "wrong item on list");
duke@435 213 }
duke@435 214
duke@435 215 void FreeList::returnChunkAtHead(FreeChunk* chunk) {
duke@435 216 assert_proper_lock_protection();
duke@435 217 returnChunkAtHead(chunk, true);
duke@435 218 }
duke@435 219
duke@435 220 // Add this chunk at the tail of the list.
duke@435 221 void FreeList::returnChunkAtTail(FreeChunk* chunk, bool record_return) {
duke@435 222 assert_proper_lock_protection();
duke@435 223 assert(head() == NULL || head()->prev() == NULL, "list invariant");
duke@435 224 assert(tail() == NULL || tail()->next() == NULL, "list invariant");
duke@435 225 assert(chunk != NULL, "insert a NULL chunk");
duke@435 226 assert(size() == chunk->size(), "wrong size");
duke@435 227
duke@435 228 FreeChunk* oldTail = tail();
duke@435 229 assert(chunk != oldTail, "double insertion");
duke@435 230 if (oldTail != NULL) {
duke@435 231 oldTail->linkAfter(chunk);
duke@435 232 } else { // only chunk in list
duke@435 233 assert(head() == NULL, "inconsistent FreeList");
duke@435 234 link_head(chunk);
duke@435 235 }
duke@435 236 link_tail(chunk);
duke@435 237 increment_count(); // of # of chunks in list
duke@435 238 DEBUG_ONLY(
duke@435 239 if (record_return) {
duke@435 240 increment_returnedBytes_by(size()*HeapWordSize);
duke@435 241 }
duke@435 242 )
duke@435 243 assert(head() == NULL || head()->prev() == NULL, "list invariant");
duke@435 244 assert(tail() == NULL || tail()->next() == NULL, "list invariant");
duke@435 245 assert(head() == NULL || head()->size() == size(), "wrong item on list");
duke@435 246 assert(tail() == NULL || tail()->size() == size(), "wrong item on list");
duke@435 247 }
duke@435 248
duke@435 249 void FreeList::returnChunkAtTail(FreeChunk* chunk) {
duke@435 250 returnChunkAtTail(chunk, true);
duke@435 251 }
duke@435 252
duke@435 253 void FreeList::prepend(FreeList* fl) {
duke@435 254 assert_proper_lock_protection();
duke@435 255 if (fl->count() > 0) {
duke@435 256 if (count() == 0) {
duke@435 257 set_head(fl->head());
duke@435 258 set_tail(fl->tail());
duke@435 259 set_count(fl->count());
duke@435 260 } else {
duke@435 261 // Both are non-empty.
duke@435 262 FreeChunk* fl_tail = fl->tail();
duke@435 263 FreeChunk* this_head = head();
duke@435 264 assert(fl_tail->next() == NULL, "Well-formedness of fl");
duke@435 265 fl_tail->linkNext(this_head);
duke@435 266 this_head->linkPrev(fl_tail);
duke@435 267 set_head(fl->head());
duke@435 268 set_count(count() + fl->count());
duke@435 269 }
duke@435 270 fl->set_head(NULL);
duke@435 271 fl->set_tail(NULL);
duke@435 272 fl->set_count(0);
duke@435 273 }
duke@435 274 }
duke@435 275
duke@435 276 // verifyChunkInFreeLists() is used to verify that an item is in this free list.
duke@435 277 // It is used as a debugging aid.
duke@435 278 bool FreeList::verifyChunkInFreeLists(FreeChunk* fc) const {
duke@435 279 // This is an internal consistency check, not part of the check that the
duke@435 280 // chunk is in the free lists.
duke@435 281 guarantee(fc->size() == size(), "Wrong list is being searched");
duke@435 282 FreeChunk* curFC = head();
duke@435 283 while (curFC) {
duke@435 284 // This is an internal consistency check.
duke@435 285 guarantee(size() == curFC->size(), "Chunk is in wrong list.");
duke@435 286 if (fc == curFC) {
duke@435 287 return true;
duke@435 288 }
duke@435 289 curFC = curFC->next();
duke@435 290 }
duke@435 291 return false;
duke@435 292 }
duke@435 293
duke@435 294 #ifndef PRODUCT
ysr@1580 295 void FreeList::verify_stats() const {
ysr@1580 296 // The +1 of the LH comparand is to allow some "looseness" in
ysr@1580 297 // checking: we usually call this interface when adding a block
ysr@1580 298 // and we'll subsequently update the stats; we cannot update the
ysr@1580 299 // stats beforehand because in the case of the large-block BT
ysr@1580 300 // dictionary for example, this might be the first block and
ysr@1580 301 // in that case there would be no place that we could record
ysr@1580 302 // the stats (which are kept in the block itself).
ysr@1580 303 assert(_allocation_stats.prevSweep() + _allocation_stats.splitBirths() + 1 // Total Stock + 1
ysr@1580 304 >= _allocation_stats.splitDeaths() + (ssize_t)count(), "Conservation Principle");
ysr@1580 305 }
ysr@1580 306
duke@435 307 void FreeList::assert_proper_lock_protection_work() const {
ysr@1580 308 assert(_protecting_lock != NULL, "Don't call this directly");
ysr@1580 309 assert(ParallelGCThreads > 0, "Don't call this directly");
ysr@1580 310 Thread* thr = Thread::current();
ysr@1580 311 if (thr->is_VM_thread() || thr->is_ConcurrentGC_thread()) {
ysr@1580 312 // assert that we are holding the freelist lock
ysr@1580 313 } else if (thr->is_GC_task_thread()) {
ysr@1580 314 assert(_protecting_lock->owned_by_self(), "FreeList RACE DETECTED");
ysr@1580 315 } else if (thr->is_Java_thread()) {
ysr@1580 316 assert(!SafepointSynchronize::is_at_safepoint(), "Should not be executing");
ysr@1580 317 } else {
ysr@1580 318 ShouldNotReachHere(); // unaccounted thread type?
duke@435 319 }
duke@435 320 }
duke@435 321 #endif
ysr@447 322
ysr@447 323 // Print the "label line" for free list stats.
ysr@447 324 void FreeList::print_labels_on(outputStream* st, const char* c) {
ysr@447 325 st->print("%16s\t", c);
ysr@447 326 st->print("%14s\t" "%14s\t" "%14s\t" "%14s\t" "%14s\t"
ysr@447 327 "%14s\t" "%14s\t" "%14s\t" "%14s\t" "%14s\t" "\n",
ysr@447 328 "bfrsurp", "surplus", "desired", "prvSwep", "bfrSwep",
ysr@447 329 "count", "cBirths", "cDeaths", "sBirths", "sDeaths");
ysr@447 330 }
ysr@447 331
ysr@447 332 // Print the AllocationStats for the given free list. If the second argument
ysr@447 333 // to the call is a non-null string, it is printed in the first column;
ysr@447 334 // otherwise, if the argument is null (the default), then the size of the
ysr@447 335 // (free list) block is printed in the first column.
ysr@447 336 void FreeList::print_on(outputStream* st, const char* c) const {
ysr@447 337 if (c != NULL) {
ysr@447 338 st->print("%16s", c);
ysr@447 339 } else {
ysr@447 340 st->print(SIZE_FORMAT_W(16), size());
ysr@447 341 }
ysr@447 342 st->print("\t"
ysr@447 343 SSIZE_FORMAT_W(14) "\t" SSIZE_FORMAT_W(14) "\t" SSIZE_FORMAT_W(14) "\t" SSIZE_FORMAT_W(14) "\t" SSIZE_FORMAT_W(14) "\t"
ysr@447 344 SSIZE_FORMAT_W(14) "\t" SSIZE_FORMAT_W(14) "\t" SSIZE_FORMAT_W(14) "\t" SSIZE_FORMAT_W(14) "\t" SSIZE_FORMAT_W(14) "\n",
ysr@447 345 bfrSurp(), surplus(), desired(), prevSweep(), beforeSweep(),
ysr@447 346 count(), coalBirths(), coalDeaths(), splitBirths(), splitDeaths());
ysr@447 347 }

mercurial