Mon, 09 Aug 2010 05:41:05 -0700
6966222: G1: simplify TaskQueue overflow handling
Reviewed-by: tonyp, ysr
ysr@777 | 1 | /* |
trims@1907 | 2 | * Copyright (c) 2001, 2010, Oracle and/or its affiliates. All rights reserved. |
ysr@777 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
ysr@777 | 4 | * |
ysr@777 | 5 | * This code is free software; you can redistribute it and/or modify it |
ysr@777 | 6 | * under the terms of the GNU General Public License version 2 only, as |
ysr@777 | 7 | * published by the Free Software Foundation. |
ysr@777 | 8 | * |
ysr@777 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
ysr@777 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
ysr@777 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
ysr@777 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
ysr@777 | 13 | * accompanied this code). |
ysr@777 | 14 | * |
ysr@777 | 15 | * You should have received a copy of the GNU General Public License version |
ysr@777 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
ysr@777 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
ysr@777 | 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. |
ysr@777 | 22 | * |
ysr@777 | 23 | */ |
ysr@777 | 24 | |
ysr@777 | 25 | #include "incls/_precompiled.incl" |
ysr@777 | 26 | #include "incls/_g1CollectedHeap.cpp.incl" |
ysr@777 | 27 | |
tonyp@1377 | 28 | size_t G1CollectedHeap::_humongous_object_threshold_in_words = 0; |
tonyp@1377 | 29 | |
ysr@777 | 30 | // turn it on so that the contents of the young list (scan-only / |
ysr@777 | 31 | // to-be-collected) are printed at "strategic" points before / during |
ysr@777 | 32 | // / after the collection --- this is useful for debugging |
johnc@1829 | 33 | #define YOUNG_LIST_VERBOSE 0 |
ysr@777 | 34 | // CURRENT STATUS |
ysr@777 | 35 | // This file is under construction. Search for "FIXME". |
ysr@777 | 36 | |
ysr@777 | 37 | // INVARIANTS/NOTES |
ysr@777 | 38 | // |
ysr@777 | 39 | // All allocation activity covered by the G1CollectedHeap interface is |
ysr@777 | 40 | // serialized by acquiring the HeapLock. This happens in |
ysr@777 | 41 | // mem_allocate_work, which all such allocation functions call. |
ysr@777 | 42 | // (Note that this does not apply to TLAB allocation, which is not part |
ysr@777 | 43 | // of this interface: it is done by clients of this interface.) |
ysr@777 | 44 | |
ysr@777 | 45 | // Local to this file. |
ysr@777 | 46 | |
ysr@777 | 47 | class RefineCardTableEntryClosure: public CardTableEntryClosure { |
ysr@777 | 48 | SuspendibleThreadSet* _sts; |
ysr@777 | 49 | G1RemSet* _g1rs; |
ysr@777 | 50 | ConcurrentG1Refine* _cg1r; |
ysr@777 | 51 | bool _concurrent; |
ysr@777 | 52 | public: |
ysr@777 | 53 | RefineCardTableEntryClosure(SuspendibleThreadSet* sts, |
ysr@777 | 54 | G1RemSet* g1rs, |
ysr@777 | 55 | ConcurrentG1Refine* cg1r) : |
ysr@777 | 56 | _sts(sts), _g1rs(g1rs), _cg1r(cg1r), _concurrent(true) |
ysr@777 | 57 | {} |
ysr@777 | 58 | bool do_card_ptr(jbyte* card_ptr, int worker_i) { |
johnc@2060 | 59 | bool oops_into_cset = _g1rs->concurrentRefineOneCard(card_ptr, worker_i, false); |
johnc@2060 | 60 | // This path is executed by the concurrent refine or mutator threads, |
johnc@2060 | 61 | // concurrently, and so we do not care if card_ptr contains references |
johnc@2060 | 62 | // that point into the collection set. |
johnc@2060 | 63 | assert(!oops_into_cset, "should be"); |
johnc@2060 | 64 | |
ysr@777 | 65 | if (_concurrent && _sts->should_yield()) { |
ysr@777 | 66 | // Caller will actually yield. |
ysr@777 | 67 | return false; |
ysr@777 | 68 | } |
ysr@777 | 69 | // Otherwise, we finished successfully; return true. |
ysr@777 | 70 | return true; |
ysr@777 | 71 | } |
ysr@777 | 72 | void set_concurrent(bool b) { _concurrent = b; } |
ysr@777 | 73 | }; |
ysr@777 | 74 | |
ysr@777 | 75 | |
ysr@777 | 76 | class ClearLoggedCardTableEntryClosure: public CardTableEntryClosure { |
ysr@777 | 77 | int _calls; |
ysr@777 | 78 | G1CollectedHeap* _g1h; |
ysr@777 | 79 | CardTableModRefBS* _ctbs; |
ysr@777 | 80 | int _histo[256]; |
ysr@777 | 81 | public: |
ysr@777 | 82 | ClearLoggedCardTableEntryClosure() : |
ysr@777 | 83 | _calls(0) |
ysr@777 | 84 | { |
ysr@777 | 85 | _g1h = G1CollectedHeap::heap(); |
ysr@777 | 86 | _ctbs = (CardTableModRefBS*)_g1h->barrier_set(); |
ysr@777 | 87 | for (int i = 0; i < 256; i++) _histo[i] = 0; |
ysr@777 | 88 | } |
ysr@777 | 89 | bool do_card_ptr(jbyte* card_ptr, int worker_i) { |
ysr@777 | 90 | if (_g1h->is_in_reserved(_ctbs->addr_for(card_ptr))) { |
ysr@777 | 91 | _calls++; |
ysr@777 | 92 | unsigned char* ujb = (unsigned char*)card_ptr; |
ysr@777 | 93 | int ind = (int)(*ujb); |
ysr@777 | 94 | _histo[ind]++; |
ysr@777 | 95 | *card_ptr = -1; |
ysr@777 | 96 | } |
ysr@777 | 97 | return true; |
ysr@777 | 98 | } |
ysr@777 | 99 | int calls() { return _calls; } |
ysr@777 | 100 | void print_histo() { |
ysr@777 | 101 | gclog_or_tty->print_cr("Card table value histogram:"); |
ysr@777 | 102 | for (int i = 0; i < 256; i++) { |
ysr@777 | 103 | if (_histo[i] != 0) { |
ysr@777 | 104 | gclog_or_tty->print_cr(" %d: %d", i, _histo[i]); |
ysr@777 | 105 | } |
ysr@777 | 106 | } |
ysr@777 | 107 | } |
ysr@777 | 108 | }; |
ysr@777 | 109 | |
ysr@777 | 110 | class RedirtyLoggedCardTableEntryClosure: public CardTableEntryClosure { |
ysr@777 | 111 | int _calls; |
ysr@777 | 112 | G1CollectedHeap* _g1h; |
ysr@777 | 113 | CardTableModRefBS* _ctbs; |
ysr@777 | 114 | public: |
ysr@777 | 115 | RedirtyLoggedCardTableEntryClosure() : |
ysr@777 | 116 | _calls(0) |
ysr@777 | 117 | { |
ysr@777 | 118 | _g1h = G1CollectedHeap::heap(); |
ysr@777 | 119 | _ctbs = (CardTableModRefBS*)_g1h->barrier_set(); |
ysr@777 | 120 | } |
ysr@777 | 121 | bool do_card_ptr(jbyte* card_ptr, int worker_i) { |
ysr@777 | 122 | if (_g1h->is_in_reserved(_ctbs->addr_for(card_ptr))) { |
ysr@777 | 123 | _calls++; |
ysr@777 | 124 | *card_ptr = 0; |
ysr@777 | 125 | } |
ysr@777 | 126 | return true; |
ysr@777 | 127 | } |
ysr@777 | 128 | int calls() { return _calls; } |
ysr@777 | 129 | }; |
ysr@777 | 130 | |
iveresov@1051 | 131 | class RedirtyLoggedCardTableEntryFastClosure : public CardTableEntryClosure { |
iveresov@1051 | 132 | public: |
iveresov@1051 | 133 | bool do_card_ptr(jbyte* card_ptr, int worker_i) { |
iveresov@1051 | 134 | *card_ptr = CardTableModRefBS::dirty_card_val(); |
iveresov@1051 | 135 | return true; |
iveresov@1051 | 136 | } |
iveresov@1051 | 137 | }; |
iveresov@1051 | 138 | |
ysr@777 | 139 | YoungList::YoungList(G1CollectedHeap* g1h) |
ysr@777 | 140 | : _g1h(g1h), _head(NULL), |
johnc@1829 | 141 | _length(0), |
ysr@777 | 142 | _last_sampled_rs_lengths(0), |
apetrusenko@980 | 143 | _survivor_head(NULL), _survivor_tail(NULL), _survivor_length(0) |
ysr@777 | 144 | { |
ysr@777 | 145 | guarantee( check_list_empty(false), "just making sure..." ); |
ysr@777 | 146 | } |
ysr@777 | 147 | |
ysr@777 | 148 | void YoungList::push_region(HeapRegion *hr) { |
ysr@777 | 149 | assert(!hr->is_young(), "should not already be young"); |
ysr@777 | 150 | assert(hr->get_next_young_region() == NULL, "cause it should!"); |
ysr@777 | 151 | |
ysr@777 | 152 | hr->set_next_young_region(_head); |
ysr@777 | 153 | _head = hr; |
ysr@777 | 154 | |
ysr@777 | 155 | hr->set_young(); |
ysr@777 | 156 | double yg_surv_rate = _g1h->g1_policy()->predict_yg_surv_rate((int)_length); |
ysr@777 | 157 | ++_length; |
ysr@777 | 158 | } |
ysr@777 | 159 | |
ysr@777 | 160 | void YoungList::add_survivor_region(HeapRegion* hr) { |
apetrusenko@980 | 161 | assert(hr->is_survivor(), "should be flagged as survivor region"); |
ysr@777 | 162 | assert(hr->get_next_young_region() == NULL, "cause it should!"); |
ysr@777 | 163 | |
ysr@777 | 164 | hr->set_next_young_region(_survivor_head); |
ysr@777 | 165 | if (_survivor_head == NULL) { |
apetrusenko@980 | 166 | _survivor_tail = hr; |
ysr@777 | 167 | } |
ysr@777 | 168 | _survivor_head = hr; |
ysr@777 | 169 | |
ysr@777 | 170 | ++_survivor_length; |
ysr@777 | 171 | } |
ysr@777 | 172 | |
ysr@777 | 173 | void YoungList::empty_list(HeapRegion* list) { |
ysr@777 | 174 | while (list != NULL) { |
ysr@777 | 175 | HeapRegion* next = list->get_next_young_region(); |
ysr@777 | 176 | list->set_next_young_region(NULL); |
ysr@777 | 177 | list->uninstall_surv_rate_group(); |
ysr@777 | 178 | list->set_not_young(); |
ysr@777 | 179 | list = next; |
ysr@777 | 180 | } |
ysr@777 | 181 | } |
ysr@777 | 182 | |
ysr@777 | 183 | void YoungList::empty_list() { |
ysr@777 | 184 | assert(check_list_well_formed(), "young list should be well formed"); |
ysr@777 | 185 | |
ysr@777 | 186 | empty_list(_head); |
ysr@777 | 187 | _head = NULL; |
ysr@777 | 188 | _length = 0; |
ysr@777 | 189 | |
ysr@777 | 190 | empty_list(_survivor_head); |
ysr@777 | 191 | _survivor_head = NULL; |
apetrusenko@980 | 192 | _survivor_tail = NULL; |
ysr@777 | 193 | _survivor_length = 0; |
ysr@777 | 194 | |
ysr@777 | 195 | _last_sampled_rs_lengths = 0; |
ysr@777 | 196 | |
ysr@777 | 197 | assert(check_list_empty(false), "just making sure..."); |
ysr@777 | 198 | } |
ysr@777 | 199 | |
ysr@777 | 200 | bool YoungList::check_list_well_formed() { |
ysr@777 | 201 | bool ret = true; |
ysr@777 | 202 | |
ysr@777 | 203 | size_t length = 0; |
ysr@777 | 204 | HeapRegion* curr = _head; |
ysr@777 | 205 | HeapRegion* last = NULL; |
ysr@777 | 206 | while (curr != NULL) { |
johnc@1829 | 207 | if (!curr->is_young()) { |
ysr@777 | 208 | gclog_or_tty->print_cr("### YOUNG REGION "PTR_FORMAT"-"PTR_FORMAT" " |
johnc@1829 | 209 | "incorrectly tagged (y: %d, surv: %d)", |
ysr@777 | 210 | curr->bottom(), curr->end(), |
johnc@1829 | 211 | curr->is_young(), curr->is_survivor()); |
ysr@777 | 212 | ret = false; |
ysr@777 | 213 | } |
ysr@777 | 214 | ++length; |
ysr@777 | 215 | last = curr; |
ysr@777 | 216 | curr = curr->get_next_young_region(); |
ysr@777 | 217 | } |
ysr@777 | 218 | ret = ret && (length == _length); |
ysr@777 | 219 | |
ysr@777 | 220 | if (!ret) { |
ysr@777 | 221 | gclog_or_tty->print_cr("### YOUNG LIST seems not well formed!"); |
ysr@777 | 222 | gclog_or_tty->print_cr("### list has %d entries, _length is %d", |
ysr@777 | 223 | length, _length); |
ysr@777 | 224 | } |
ysr@777 | 225 | |
johnc@1829 | 226 | return ret; |
ysr@777 | 227 | } |
ysr@777 | 228 | |
johnc@1829 | 229 | bool YoungList::check_list_empty(bool check_sample) { |
ysr@777 | 230 | bool ret = true; |
ysr@777 | 231 | |
ysr@777 | 232 | if (_length != 0) { |
ysr@777 | 233 | gclog_or_tty->print_cr("### YOUNG LIST should have 0 length, not %d", |
ysr@777 | 234 | _length); |
ysr@777 | 235 | ret = false; |
ysr@777 | 236 | } |
ysr@777 | 237 | if (check_sample && _last_sampled_rs_lengths != 0) { |
ysr@777 | 238 | gclog_or_tty->print_cr("### YOUNG LIST has non-zero last sampled RS lengths"); |
ysr@777 | 239 | ret = false; |
ysr@777 | 240 | } |
ysr@777 | 241 | if (_head != NULL) { |
ysr@777 | 242 | gclog_or_tty->print_cr("### YOUNG LIST does not have a NULL head"); |
ysr@777 | 243 | ret = false; |
ysr@777 | 244 | } |
ysr@777 | 245 | if (!ret) { |
ysr@777 | 246 | gclog_or_tty->print_cr("### YOUNG LIST does not seem empty"); |
ysr@777 | 247 | } |
ysr@777 | 248 | |
johnc@1829 | 249 | return ret; |
ysr@777 | 250 | } |
ysr@777 | 251 | |
ysr@777 | 252 | void |
ysr@777 | 253 | YoungList::rs_length_sampling_init() { |
ysr@777 | 254 | _sampled_rs_lengths = 0; |
ysr@777 | 255 | _curr = _head; |
ysr@777 | 256 | } |
ysr@777 | 257 | |
ysr@777 | 258 | bool |
ysr@777 | 259 | YoungList::rs_length_sampling_more() { |
ysr@777 | 260 | return _curr != NULL; |
ysr@777 | 261 | } |
ysr@777 | 262 | |
ysr@777 | 263 | void |
ysr@777 | 264 | YoungList::rs_length_sampling_next() { |
ysr@777 | 265 | assert( _curr != NULL, "invariant" ); |
johnc@1829 | 266 | size_t rs_length = _curr->rem_set()->occupied(); |
johnc@1829 | 267 | |
johnc@1829 | 268 | _sampled_rs_lengths += rs_length; |
johnc@1829 | 269 | |
johnc@1829 | 270 | // The current region may not yet have been added to the |
johnc@1829 | 271 | // incremental collection set (it gets added when it is |
johnc@1829 | 272 | // retired as the current allocation region). |
johnc@1829 | 273 | if (_curr->in_collection_set()) { |
johnc@1829 | 274 | // Update the collection set policy information for this region |
johnc@1829 | 275 | _g1h->g1_policy()->update_incremental_cset_info(_curr, rs_length); |
johnc@1829 | 276 | } |
johnc@1829 | 277 | |
ysr@777 | 278 | _curr = _curr->get_next_young_region(); |
ysr@777 | 279 | if (_curr == NULL) { |
ysr@777 | 280 | _last_sampled_rs_lengths = _sampled_rs_lengths; |
ysr@777 | 281 | // gclog_or_tty->print_cr("last sampled RS lengths = %d", _last_sampled_rs_lengths); |
ysr@777 | 282 | } |
ysr@777 | 283 | } |
ysr@777 | 284 | |
ysr@777 | 285 | void |
ysr@777 | 286 | YoungList::reset_auxilary_lists() { |
ysr@777 | 287 | guarantee( is_empty(), "young list should be empty" ); |
ysr@777 | 288 | assert(check_list_well_formed(), "young list should be well formed"); |
ysr@777 | 289 | |
ysr@777 | 290 | // Add survivor regions to SurvRateGroup. |
ysr@777 | 291 | _g1h->g1_policy()->note_start_adding_survivor_regions(); |
apetrusenko@980 | 292 | _g1h->g1_policy()->finished_recalculating_age_indexes(true /* is_survivors */); |
johnc@1829 | 293 | |
ysr@777 | 294 | for (HeapRegion* curr = _survivor_head; |
ysr@777 | 295 | curr != NULL; |
ysr@777 | 296 | curr = curr->get_next_young_region()) { |
ysr@777 | 297 | _g1h->g1_policy()->set_region_survivors(curr); |
johnc@1829 | 298 | |
johnc@1829 | 299 | // The region is a non-empty survivor so let's add it to |
johnc@1829 | 300 | // the incremental collection set for the next evacuation |
johnc@1829 | 301 | // pause. |
johnc@1829 | 302 | _g1h->g1_policy()->add_region_to_incremental_cset_rhs(curr); |
ysr@777 | 303 | } |
ysr@777 | 304 | _g1h->g1_policy()->note_stop_adding_survivor_regions(); |
ysr@777 | 305 | |
johnc@1829 | 306 | _head = _survivor_head; |
johnc@1829 | 307 | _length = _survivor_length; |
ysr@777 | 308 | if (_survivor_head != NULL) { |
johnc@1829 | 309 | assert(_survivor_tail != NULL, "cause it shouldn't be"); |
johnc@1829 | 310 | assert(_survivor_length > 0, "invariant"); |
johnc@1829 | 311 | _survivor_tail->set_next_young_region(NULL); |
johnc@1829 | 312 | } |
johnc@1829 | 313 | |
johnc@1829 | 314 | // Don't clear the survivor list handles until the start of |
johnc@1829 | 315 | // the next evacuation pause - we need it in order to re-tag |
johnc@1829 | 316 | // the survivor regions from this evacuation pause as 'young' |
johnc@1829 | 317 | // at the start of the next. |
johnc@1829 | 318 | |
apetrusenko@980 | 319 | _g1h->g1_policy()->finished_recalculating_age_indexes(false /* is_survivors */); |
ysr@777 | 320 | |
ysr@777 | 321 | assert(check_list_well_formed(), "young list should be well formed"); |
ysr@777 | 322 | } |
ysr@777 | 323 | |
ysr@777 | 324 | void YoungList::print() { |
johnc@1829 | 325 | HeapRegion* lists[] = {_head, _survivor_head}; |
johnc@1829 | 326 | const char* names[] = {"YOUNG", "SURVIVOR"}; |
ysr@777 | 327 | |
ysr@777 | 328 | for (unsigned int list = 0; list < ARRAY_SIZE(lists); ++list) { |
ysr@777 | 329 | gclog_or_tty->print_cr("%s LIST CONTENTS", names[list]); |
ysr@777 | 330 | HeapRegion *curr = lists[list]; |
ysr@777 | 331 | if (curr == NULL) |
ysr@777 | 332 | gclog_or_tty->print_cr(" empty"); |
ysr@777 | 333 | while (curr != NULL) { |
ysr@777 | 334 | gclog_or_tty->print_cr(" [%08x-%08x], t: %08x, P: %08x, N: %08x, C: %08x, " |
johnc@1829 | 335 | "age: %4d, y: %d, surv: %d", |
ysr@777 | 336 | curr->bottom(), curr->end(), |
ysr@777 | 337 | curr->top(), |
ysr@777 | 338 | curr->prev_top_at_mark_start(), |
ysr@777 | 339 | curr->next_top_at_mark_start(), |
ysr@777 | 340 | curr->top_at_conc_mark_count(), |
ysr@777 | 341 | curr->age_in_surv_rate_group_cond(), |
ysr@777 | 342 | curr->is_young(), |
ysr@777 | 343 | curr->is_survivor()); |
ysr@777 | 344 | curr = curr->get_next_young_region(); |
ysr@777 | 345 | } |
ysr@777 | 346 | } |
ysr@777 | 347 | |
ysr@777 | 348 | gclog_or_tty->print_cr(""); |
ysr@777 | 349 | } |
ysr@777 | 350 | |
apetrusenko@1231 | 351 | void G1CollectedHeap::push_dirty_cards_region(HeapRegion* hr) |
apetrusenko@1231 | 352 | { |
apetrusenko@1231 | 353 | // Claim the right to put the region on the dirty cards region list |
apetrusenko@1231 | 354 | // by installing a self pointer. |
apetrusenko@1231 | 355 | HeapRegion* next = hr->get_next_dirty_cards_region(); |
apetrusenko@1231 | 356 | if (next == NULL) { |
apetrusenko@1231 | 357 | HeapRegion* res = (HeapRegion*) |
apetrusenko@1231 | 358 | Atomic::cmpxchg_ptr(hr, hr->next_dirty_cards_region_addr(), |
apetrusenko@1231 | 359 | NULL); |
apetrusenko@1231 | 360 | if (res == NULL) { |
apetrusenko@1231 | 361 | HeapRegion* head; |
apetrusenko@1231 | 362 | do { |
apetrusenko@1231 | 363 | // Put the region to the dirty cards region list. |
apetrusenko@1231 | 364 | head = _dirty_cards_region_list; |
apetrusenko@1231 | 365 | next = (HeapRegion*) |
apetrusenko@1231 | 366 | Atomic::cmpxchg_ptr(hr, &_dirty_cards_region_list, head); |
apetrusenko@1231 | 367 | if (next == head) { |
apetrusenko@1231 | 368 | assert(hr->get_next_dirty_cards_region() == hr, |
apetrusenko@1231 | 369 | "hr->get_next_dirty_cards_region() != hr"); |
apetrusenko@1231 | 370 | if (next == NULL) { |
apetrusenko@1231 | 371 | // The last region in the list points to itself. |
apetrusenko@1231 | 372 | hr->set_next_dirty_cards_region(hr); |
apetrusenko@1231 | 373 | } else { |
apetrusenko@1231 | 374 | hr->set_next_dirty_cards_region(next); |
apetrusenko@1231 | 375 | } |
apetrusenko@1231 | 376 | } |
apetrusenko@1231 | 377 | } while (next != head); |
apetrusenko@1231 | 378 | } |
apetrusenko@1231 | 379 | } |
apetrusenko@1231 | 380 | } |
apetrusenko@1231 | 381 | |
apetrusenko@1231 | 382 | HeapRegion* G1CollectedHeap::pop_dirty_cards_region() |
apetrusenko@1231 | 383 | { |
apetrusenko@1231 | 384 | HeapRegion* head; |
apetrusenko@1231 | 385 | HeapRegion* hr; |
apetrusenko@1231 | 386 | do { |
apetrusenko@1231 | 387 | head = _dirty_cards_region_list; |
apetrusenko@1231 | 388 | if (head == NULL) { |
apetrusenko@1231 | 389 | return NULL; |
apetrusenko@1231 | 390 | } |
apetrusenko@1231 | 391 | HeapRegion* new_head = head->get_next_dirty_cards_region(); |
apetrusenko@1231 | 392 | if (head == new_head) { |
apetrusenko@1231 | 393 | // The last region. |
apetrusenko@1231 | 394 | new_head = NULL; |
apetrusenko@1231 | 395 | } |
apetrusenko@1231 | 396 | hr = (HeapRegion*)Atomic::cmpxchg_ptr(new_head, &_dirty_cards_region_list, |
apetrusenko@1231 | 397 | head); |
apetrusenko@1231 | 398 | } while (hr != head); |
apetrusenko@1231 | 399 | assert(hr != NULL, "invariant"); |
apetrusenko@1231 | 400 | hr->set_next_dirty_cards_region(NULL); |
apetrusenko@1231 | 401 | return hr; |
apetrusenko@1231 | 402 | } |
apetrusenko@1231 | 403 | |
ysr@777 | 404 | void G1CollectedHeap::stop_conc_gc_threads() { |
iveresov@1229 | 405 | _cg1r->stop(); |
ysr@777 | 406 | _czft->stop(); |
ysr@777 | 407 | _cmThread->stop(); |
ysr@777 | 408 | } |
ysr@777 | 409 | |
ysr@777 | 410 | |
ysr@777 | 411 | void G1CollectedHeap::check_ct_logs_at_safepoint() { |
ysr@777 | 412 | DirtyCardQueueSet& dcqs = JavaThread::dirty_card_queue_set(); |
ysr@777 | 413 | CardTableModRefBS* ct_bs = (CardTableModRefBS*)barrier_set(); |
ysr@777 | 414 | |
ysr@777 | 415 | // Count the dirty cards at the start. |
ysr@777 | 416 | CountNonCleanMemRegionClosure count1(this); |
ysr@777 | 417 | ct_bs->mod_card_iterate(&count1); |
ysr@777 | 418 | int orig_count = count1.n(); |
ysr@777 | 419 | |
ysr@777 | 420 | // First clear the logged cards. |
ysr@777 | 421 | ClearLoggedCardTableEntryClosure clear; |
ysr@777 | 422 | dcqs.set_closure(&clear); |
ysr@777 | 423 | dcqs.apply_closure_to_all_completed_buffers(); |
ysr@777 | 424 | dcqs.iterate_closure_all_threads(false); |
ysr@777 | 425 | clear.print_histo(); |
ysr@777 | 426 | |
ysr@777 | 427 | // Now ensure that there's no dirty cards. |
ysr@777 | 428 | CountNonCleanMemRegionClosure count2(this); |
ysr@777 | 429 | ct_bs->mod_card_iterate(&count2); |
ysr@777 | 430 | if (count2.n() != 0) { |
ysr@777 | 431 | gclog_or_tty->print_cr("Card table has %d entries; %d originally", |
ysr@777 | 432 | count2.n(), orig_count); |
ysr@777 | 433 | } |
ysr@777 | 434 | guarantee(count2.n() == 0, "Card table should be clean."); |
ysr@777 | 435 | |
ysr@777 | 436 | RedirtyLoggedCardTableEntryClosure redirty; |
ysr@777 | 437 | JavaThread::dirty_card_queue_set().set_closure(&redirty); |
ysr@777 | 438 | dcqs.apply_closure_to_all_completed_buffers(); |
ysr@777 | 439 | dcqs.iterate_closure_all_threads(false); |
ysr@777 | 440 | gclog_or_tty->print_cr("Log entries = %d, dirty cards = %d.", |
ysr@777 | 441 | clear.calls(), orig_count); |
ysr@777 | 442 | guarantee(redirty.calls() == clear.calls(), |
ysr@777 | 443 | "Or else mechanism is broken."); |
ysr@777 | 444 | |
ysr@777 | 445 | CountNonCleanMemRegionClosure count3(this); |
ysr@777 | 446 | ct_bs->mod_card_iterate(&count3); |
ysr@777 | 447 | if (count3.n() != orig_count) { |
ysr@777 | 448 | gclog_or_tty->print_cr("Should have restored them all: orig = %d, final = %d.", |
ysr@777 | 449 | orig_count, count3.n()); |
ysr@777 | 450 | guarantee(count3.n() >= orig_count, "Should have restored them all."); |
ysr@777 | 451 | } |
ysr@777 | 452 | |
ysr@777 | 453 | JavaThread::dirty_card_queue_set().set_closure(_refine_cte_cl); |
ysr@777 | 454 | } |
ysr@777 | 455 | |
ysr@777 | 456 | // Private class members. |
ysr@777 | 457 | |
ysr@777 | 458 | G1CollectedHeap* G1CollectedHeap::_g1h; |
ysr@777 | 459 | |
ysr@777 | 460 | // Private methods. |
ysr@777 | 461 | |
ysr@777 | 462 | // Finds a HeapRegion that can be used to allocate a given size of block. |
ysr@777 | 463 | |
ysr@777 | 464 | |
ysr@777 | 465 | HeapRegion* G1CollectedHeap::newAllocRegion_work(size_t word_size, |
ysr@777 | 466 | bool do_expand, |
ysr@777 | 467 | bool zero_filled) { |
ysr@777 | 468 | ConcurrentZFThread::note_region_alloc(); |
ysr@777 | 469 | HeapRegion* res = alloc_free_region_from_lists(zero_filled); |
ysr@777 | 470 | if (res == NULL && do_expand) { |
ysr@777 | 471 | expand(word_size * HeapWordSize); |
ysr@777 | 472 | res = alloc_free_region_from_lists(zero_filled); |
ysr@777 | 473 | assert(res == NULL || |
ysr@777 | 474 | (!res->isHumongous() && |
ysr@777 | 475 | (!zero_filled || |
ysr@777 | 476 | res->zero_fill_state() == HeapRegion::Allocated)), |
ysr@777 | 477 | "Alloc Regions must be zero filled (and non-H)"); |
ysr@777 | 478 | } |
apetrusenko@1900 | 479 | if (res != NULL) { |
apetrusenko@1900 | 480 | if (res->is_empty()) { |
apetrusenko@1900 | 481 | _free_regions--; |
apetrusenko@1900 | 482 | } |
apetrusenko@1900 | 483 | assert(!res->isHumongous() && |
apetrusenko@1900 | 484 | (!zero_filled || res->zero_fill_state() == HeapRegion::Allocated), |
apetrusenko@1900 | 485 | err_msg("Non-young alloc Regions must be zero filled (and non-H):" |
apetrusenko@1900 | 486 | " res->isHumongous()=%d, zero_filled=%d, res->zero_fill_state()=%d", |
apetrusenko@1900 | 487 | res->isHumongous(), zero_filled, res->zero_fill_state())); |
apetrusenko@1900 | 488 | assert(!res->is_on_unclean_list(), |
apetrusenko@1900 | 489 | "Alloc Regions must not be on the unclean list"); |
apetrusenko@1900 | 490 | if (G1PrintHeapRegions) { |
ysr@777 | 491 | gclog_or_tty->print_cr("new alloc region %d:["PTR_FORMAT", "PTR_FORMAT"], " |
ysr@777 | 492 | "top "PTR_FORMAT, |
ysr@777 | 493 | res->hrs_index(), res->bottom(), res->end(), res->top()); |
ysr@777 | 494 | } |
ysr@777 | 495 | } |
ysr@777 | 496 | return res; |
ysr@777 | 497 | } |
ysr@777 | 498 | |
ysr@777 | 499 | HeapRegion* G1CollectedHeap::newAllocRegionWithExpansion(int purpose, |
ysr@777 | 500 | size_t word_size, |
ysr@777 | 501 | bool zero_filled) { |
ysr@777 | 502 | HeapRegion* alloc_region = NULL; |
ysr@777 | 503 | if (_gc_alloc_region_counts[purpose] < g1_policy()->max_regions(purpose)) { |
ysr@777 | 504 | alloc_region = newAllocRegion_work(word_size, true, zero_filled); |
ysr@777 | 505 | if (purpose == GCAllocForSurvived && alloc_region != NULL) { |
apetrusenko@980 | 506 | alloc_region->set_survivor(); |
ysr@777 | 507 | } |
ysr@777 | 508 | ++_gc_alloc_region_counts[purpose]; |
ysr@777 | 509 | } else { |
ysr@777 | 510 | g1_policy()->note_alloc_region_limit_reached(purpose); |
ysr@777 | 511 | } |
ysr@777 | 512 | return alloc_region; |
ysr@777 | 513 | } |
ysr@777 | 514 | |
ysr@777 | 515 | // If could fit into free regions w/o expansion, try. |
ysr@777 | 516 | // Otherwise, if can expand, do so. |
ysr@777 | 517 | // Otherwise, if using ex regions might help, try with ex given back. |
ysr@777 | 518 | HeapWord* G1CollectedHeap::humongousObjAllocate(size_t word_size) { |
ysr@777 | 519 | assert(regions_accounted_for(), "Region leakage!"); |
ysr@777 | 520 | |
ysr@777 | 521 | // We can't allocate H regions while cleanupComplete is running, since |
ysr@777 | 522 | // some of the regions we find to be empty might not yet be added to the |
ysr@777 | 523 | // unclean list. (If we're already at a safepoint, this call is |
ysr@777 | 524 | // unnecessary, not to mention wrong.) |
ysr@777 | 525 | if (!SafepointSynchronize::is_at_safepoint()) |
ysr@777 | 526 | wait_for_cleanup_complete(); |
ysr@777 | 527 | |
ysr@777 | 528 | size_t num_regions = |
ysr@777 | 529 | round_to(word_size, HeapRegion::GrainWords) / HeapRegion::GrainWords; |
ysr@777 | 530 | |
ysr@777 | 531 | // Special case if < one region??? |
ysr@777 | 532 | |
ysr@777 | 533 | // Remember the ft size. |
ysr@777 | 534 | size_t x_size = expansion_regions(); |
ysr@777 | 535 | |
ysr@777 | 536 | HeapWord* res = NULL; |
ysr@777 | 537 | bool eliminated_allocated_from_lists = false; |
ysr@777 | 538 | |
ysr@777 | 539 | // Can the allocation potentially fit in the free regions? |
ysr@777 | 540 | if (free_regions() >= num_regions) { |
ysr@777 | 541 | res = _hrs->obj_allocate(word_size); |
ysr@777 | 542 | } |
ysr@777 | 543 | if (res == NULL) { |
ysr@777 | 544 | // Try expansion. |
ysr@777 | 545 | size_t fs = _hrs->free_suffix(); |
ysr@777 | 546 | if (fs + x_size >= num_regions) { |
ysr@777 | 547 | expand((num_regions - fs) * HeapRegion::GrainBytes); |
ysr@777 | 548 | res = _hrs->obj_allocate(word_size); |
ysr@777 | 549 | assert(res != NULL, "This should have worked."); |
ysr@777 | 550 | } else { |
ysr@777 | 551 | // Expansion won't help. Are there enough free regions if we get rid |
ysr@777 | 552 | // of reservations? |
ysr@777 | 553 | size_t avail = free_regions(); |
ysr@777 | 554 | if (avail >= num_regions) { |
ysr@777 | 555 | res = _hrs->obj_allocate(word_size); |
ysr@777 | 556 | if (res != NULL) { |
ysr@777 | 557 | remove_allocated_regions_from_lists(); |
ysr@777 | 558 | eliminated_allocated_from_lists = true; |
ysr@777 | 559 | } |
ysr@777 | 560 | } |
ysr@777 | 561 | } |
ysr@777 | 562 | } |
ysr@777 | 563 | if (res != NULL) { |
ysr@777 | 564 | // Increment by the number of regions allocated. |
ysr@777 | 565 | // FIXME: Assumes regions all of size GrainBytes. |
ysr@777 | 566 | #ifndef PRODUCT |
ysr@777 | 567 | mr_bs()->verify_clean_region(MemRegion(res, res + num_regions * |
ysr@777 | 568 | HeapRegion::GrainWords)); |
ysr@777 | 569 | #endif |
ysr@777 | 570 | if (!eliminated_allocated_from_lists) |
ysr@777 | 571 | remove_allocated_regions_from_lists(); |
ysr@777 | 572 | _summary_bytes_used += word_size * HeapWordSize; |
ysr@777 | 573 | _free_regions -= num_regions; |
ysr@777 | 574 | _num_humongous_regions += (int) num_regions; |
ysr@777 | 575 | } |
ysr@777 | 576 | assert(regions_accounted_for(), "Region Leakage"); |
ysr@777 | 577 | return res; |
ysr@777 | 578 | } |
ysr@777 | 579 | |
ysr@777 | 580 | HeapWord* |
ysr@777 | 581 | G1CollectedHeap::attempt_allocation_slow(size_t word_size, |
ysr@777 | 582 | bool permit_collection_pause) { |
ysr@777 | 583 | HeapWord* res = NULL; |
ysr@777 | 584 | HeapRegion* allocated_young_region = NULL; |
ysr@777 | 585 | |
ysr@777 | 586 | assert( SafepointSynchronize::is_at_safepoint() || |
ysr@777 | 587 | Heap_lock->owned_by_self(), "pre condition of the call" ); |
ysr@777 | 588 | |
ysr@777 | 589 | if (isHumongous(word_size)) { |
ysr@777 | 590 | // Allocation of a humongous object can, in a sense, complete a |
ysr@777 | 591 | // partial region, if the previous alloc was also humongous, and |
ysr@777 | 592 | // caused the test below to succeed. |
ysr@777 | 593 | if (permit_collection_pause) |
ysr@777 | 594 | do_collection_pause_if_appropriate(word_size); |
ysr@777 | 595 | res = humongousObjAllocate(word_size); |
ysr@777 | 596 | assert(_cur_alloc_region == NULL |
ysr@777 | 597 | || !_cur_alloc_region->isHumongous(), |
ysr@777 | 598 | "Prevent a regression of this bug."); |
ysr@777 | 599 | |
ysr@777 | 600 | } else { |
iveresov@789 | 601 | // We may have concurrent cleanup working at the time. Wait for it |
iveresov@789 | 602 | // to complete. In the future we would probably want to make the |
iveresov@789 | 603 | // concurrent cleanup truly concurrent by decoupling it from the |
iveresov@789 | 604 | // allocation. |
iveresov@789 | 605 | if (!SafepointSynchronize::is_at_safepoint()) |
iveresov@789 | 606 | wait_for_cleanup_complete(); |
ysr@777 | 607 | // If we do a collection pause, this will be reset to a non-NULL |
ysr@777 | 608 | // value. If we don't, nulling here ensures that we allocate a new |
ysr@777 | 609 | // region below. |
ysr@777 | 610 | if (_cur_alloc_region != NULL) { |
ysr@777 | 611 | // We're finished with the _cur_alloc_region. |
johnc@1829 | 612 | // As we're builing (at least the young portion) of the collection |
johnc@1829 | 613 | // set incrementally we'll add the current allocation region to |
johnc@1829 | 614 | // the collection set here. |
johnc@1829 | 615 | if (_cur_alloc_region->is_young()) { |
johnc@1829 | 616 | g1_policy()->add_region_to_incremental_cset_lhs(_cur_alloc_region); |
johnc@1829 | 617 | } |
ysr@777 | 618 | _summary_bytes_used += _cur_alloc_region->used(); |
ysr@777 | 619 | _cur_alloc_region = NULL; |
ysr@777 | 620 | } |
ysr@777 | 621 | assert(_cur_alloc_region == NULL, "Invariant."); |
ysr@777 | 622 | // Completion of a heap region is perhaps a good point at which to do |
ysr@777 | 623 | // a collection pause. |
ysr@777 | 624 | if (permit_collection_pause) |
ysr@777 | 625 | do_collection_pause_if_appropriate(word_size); |
ysr@777 | 626 | // Make sure we have an allocation region available. |
ysr@777 | 627 | if (_cur_alloc_region == NULL) { |
ysr@777 | 628 | if (!SafepointSynchronize::is_at_safepoint()) |
ysr@777 | 629 | wait_for_cleanup_complete(); |
ysr@777 | 630 | bool next_is_young = should_set_young_locked(); |
ysr@777 | 631 | // If the next region is not young, make sure it's zero-filled. |
ysr@777 | 632 | _cur_alloc_region = newAllocRegion(word_size, !next_is_young); |
ysr@777 | 633 | if (_cur_alloc_region != NULL) { |
ysr@777 | 634 | _summary_bytes_used -= _cur_alloc_region->used(); |
ysr@777 | 635 | if (next_is_young) { |
ysr@777 | 636 | set_region_short_lived_locked(_cur_alloc_region); |
ysr@777 | 637 | allocated_young_region = _cur_alloc_region; |
ysr@777 | 638 | } |
ysr@777 | 639 | } |
ysr@777 | 640 | } |
ysr@777 | 641 | assert(_cur_alloc_region == NULL || !_cur_alloc_region->isHumongous(), |
ysr@777 | 642 | "Prevent a regression of this bug."); |
ysr@777 | 643 | |
ysr@777 | 644 | // Now retry the allocation. |
ysr@777 | 645 | if (_cur_alloc_region != NULL) { |
johnc@2021 | 646 | if (allocated_young_region != NULL) { |
johnc@2021 | 647 | // We need to ensure that the store to top does not |
johnc@2021 | 648 | // float above the setting of the young type. |
johnc@2021 | 649 | OrderAccess::storestore(); |
johnc@2021 | 650 | } |
ysr@777 | 651 | res = _cur_alloc_region->allocate(word_size); |
ysr@777 | 652 | } |
ysr@777 | 653 | } |
ysr@777 | 654 | |
ysr@777 | 655 | // NOTE: fails frequently in PRT |
ysr@777 | 656 | assert(regions_accounted_for(), "Region leakage!"); |
ysr@777 | 657 | |
ysr@777 | 658 | if (res != NULL) { |
ysr@777 | 659 | if (!SafepointSynchronize::is_at_safepoint()) { |
ysr@777 | 660 | assert( permit_collection_pause, "invariant" ); |
ysr@777 | 661 | assert( Heap_lock->owned_by_self(), "invariant" ); |
ysr@777 | 662 | Heap_lock->unlock(); |
ysr@777 | 663 | } |
ysr@777 | 664 | |
ysr@777 | 665 | if (allocated_young_region != NULL) { |
ysr@777 | 666 | HeapRegion* hr = allocated_young_region; |
ysr@777 | 667 | HeapWord* bottom = hr->bottom(); |
ysr@777 | 668 | HeapWord* end = hr->end(); |
ysr@777 | 669 | MemRegion mr(bottom, end); |
ysr@777 | 670 | ((CardTableModRefBS*)_g1h->barrier_set())->dirty(mr); |
ysr@777 | 671 | } |
ysr@777 | 672 | } |
ysr@777 | 673 | |
ysr@777 | 674 | assert( SafepointSynchronize::is_at_safepoint() || |
ysr@777 | 675 | (res == NULL && Heap_lock->owned_by_self()) || |
ysr@777 | 676 | (res != NULL && !Heap_lock->owned_by_self()), |
ysr@777 | 677 | "post condition of the call" ); |
ysr@777 | 678 | |
ysr@777 | 679 | return res; |
ysr@777 | 680 | } |
ysr@777 | 681 | |
ysr@777 | 682 | HeapWord* |
ysr@777 | 683 | G1CollectedHeap::mem_allocate(size_t word_size, |
ysr@777 | 684 | bool is_noref, |
ysr@777 | 685 | bool is_tlab, |
ysr@777 | 686 | bool* gc_overhead_limit_was_exceeded) { |
ysr@777 | 687 | debug_only(check_for_valid_allocation_state()); |
ysr@777 | 688 | assert(no_gc_in_progress(), "Allocation during gc not allowed"); |
ysr@777 | 689 | HeapWord* result = NULL; |
ysr@777 | 690 | |
ysr@777 | 691 | // Loop until the allocation is satisified, |
ysr@777 | 692 | // or unsatisfied after GC. |
ysr@777 | 693 | for (int try_count = 1; /* return or throw */; try_count += 1) { |
ysr@777 | 694 | int gc_count_before; |
ysr@777 | 695 | { |
ysr@777 | 696 | Heap_lock->lock(); |
ysr@777 | 697 | result = attempt_allocation(word_size); |
ysr@777 | 698 | if (result != NULL) { |
ysr@777 | 699 | // attempt_allocation should have unlocked the heap lock |
ysr@777 | 700 | assert(is_in(result), "result not in heap"); |
ysr@777 | 701 | return result; |
ysr@777 | 702 | } |
ysr@777 | 703 | // Read the gc count while the heap lock is held. |
ysr@777 | 704 | gc_count_before = SharedHeap::heap()->total_collections(); |
ysr@777 | 705 | Heap_lock->unlock(); |
ysr@777 | 706 | } |
ysr@777 | 707 | |
ysr@777 | 708 | // Create the garbage collection operation... |
ysr@777 | 709 | VM_G1CollectForAllocation op(word_size, |
ysr@777 | 710 | gc_count_before); |
ysr@777 | 711 | |
ysr@777 | 712 | // ...and get the VM thread to execute it. |
ysr@777 | 713 | VMThread::execute(&op); |
ysr@777 | 714 | if (op.prologue_succeeded()) { |
ysr@777 | 715 | result = op.result(); |
ysr@777 | 716 | assert(result == NULL || is_in(result), "result not in heap"); |
ysr@777 | 717 | return result; |
ysr@777 | 718 | } |
ysr@777 | 719 | |
ysr@777 | 720 | // Give a warning if we seem to be looping forever. |
ysr@777 | 721 | if ((QueuedAllocationWarningCount > 0) && |
ysr@777 | 722 | (try_count % QueuedAllocationWarningCount == 0)) { |
ysr@777 | 723 | warning("G1CollectedHeap::mem_allocate_work retries %d times", |
ysr@777 | 724 | try_count); |
ysr@777 | 725 | } |
ysr@777 | 726 | } |
ysr@777 | 727 | } |
ysr@777 | 728 | |
ysr@777 | 729 | void G1CollectedHeap::abandon_cur_alloc_region() { |
ysr@777 | 730 | if (_cur_alloc_region != NULL) { |
ysr@777 | 731 | // We're finished with the _cur_alloc_region. |
ysr@777 | 732 | if (_cur_alloc_region->is_empty()) { |
ysr@777 | 733 | _free_regions++; |
ysr@777 | 734 | free_region(_cur_alloc_region); |
ysr@777 | 735 | } else { |
johnc@1829 | 736 | // As we're builing (at least the young portion) of the collection |
johnc@1829 | 737 | // set incrementally we'll add the current allocation region to |
johnc@1829 | 738 | // the collection set here. |
johnc@1829 | 739 | if (_cur_alloc_region->is_young()) { |
johnc@1829 | 740 | g1_policy()->add_region_to_incremental_cset_lhs(_cur_alloc_region); |
johnc@1829 | 741 | } |
ysr@777 | 742 | _summary_bytes_used += _cur_alloc_region->used(); |
ysr@777 | 743 | } |
ysr@777 | 744 | _cur_alloc_region = NULL; |
ysr@777 | 745 | } |
ysr@777 | 746 | } |
ysr@777 | 747 | |
tonyp@1071 | 748 | void G1CollectedHeap::abandon_gc_alloc_regions() { |
tonyp@1071 | 749 | // first, make sure that the GC alloc region list is empty (it should!) |
tonyp@1071 | 750 | assert(_gc_alloc_region_list == NULL, "invariant"); |
tonyp@1071 | 751 | release_gc_alloc_regions(true /* totally */); |
tonyp@1071 | 752 | } |
tonyp@1071 | 753 | |
ysr@777 | 754 | class PostMCRemSetClearClosure: public HeapRegionClosure { |
ysr@777 | 755 | ModRefBarrierSet* _mr_bs; |
ysr@777 | 756 | public: |
ysr@777 | 757 | PostMCRemSetClearClosure(ModRefBarrierSet* mr_bs) : _mr_bs(mr_bs) {} |
ysr@777 | 758 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 759 | r->reset_gc_time_stamp(); |
ysr@777 | 760 | if (r->continuesHumongous()) |
ysr@777 | 761 | return false; |
ysr@777 | 762 | HeapRegionRemSet* hrrs = r->rem_set(); |
ysr@777 | 763 | if (hrrs != NULL) hrrs->clear(); |
ysr@777 | 764 | // You might think here that we could clear just the cards |
ysr@777 | 765 | // corresponding to the used region. But no: if we leave a dirty card |
ysr@777 | 766 | // in a region we might allocate into, then it would prevent that card |
ysr@777 | 767 | // from being enqueued, and cause it to be missed. |
ysr@777 | 768 | // Re: the performance cost: we shouldn't be doing full GC anyway! |
ysr@777 | 769 | _mr_bs->clear(MemRegion(r->bottom(), r->end())); |
ysr@777 | 770 | return false; |
ysr@777 | 771 | } |
ysr@777 | 772 | }; |
ysr@777 | 773 | |
ysr@777 | 774 | |
ysr@777 | 775 | class PostMCRemSetInvalidateClosure: public HeapRegionClosure { |
ysr@777 | 776 | ModRefBarrierSet* _mr_bs; |
ysr@777 | 777 | public: |
ysr@777 | 778 | PostMCRemSetInvalidateClosure(ModRefBarrierSet* mr_bs) : _mr_bs(mr_bs) {} |
ysr@777 | 779 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 780 | if (r->continuesHumongous()) return false; |
ysr@777 | 781 | if (r->used_region().word_size() != 0) { |
ysr@777 | 782 | _mr_bs->invalidate(r->used_region(), true /*whole heap*/); |
ysr@777 | 783 | } |
ysr@777 | 784 | return false; |
ysr@777 | 785 | } |
ysr@777 | 786 | }; |
ysr@777 | 787 | |
apetrusenko@1061 | 788 | class RebuildRSOutOfRegionClosure: public HeapRegionClosure { |
apetrusenko@1061 | 789 | G1CollectedHeap* _g1h; |
apetrusenko@1061 | 790 | UpdateRSOopClosure _cl; |
apetrusenko@1061 | 791 | int _worker_i; |
apetrusenko@1061 | 792 | public: |
apetrusenko@1061 | 793 | RebuildRSOutOfRegionClosure(G1CollectedHeap* g1, int worker_i = 0) : |
apetrusenko@1061 | 794 | _cl(g1->g1_rem_set()->as_HRInto_G1RemSet(), worker_i), |
apetrusenko@1061 | 795 | _worker_i(worker_i), |
apetrusenko@1061 | 796 | _g1h(g1) |
apetrusenko@1061 | 797 | { } |
apetrusenko@1061 | 798 | bool doHeapRegion(HeapRegion* r) { |
apetrusenko@1061 | 799 | if (!r->continuesHumongous()) { |
apetrusenko@1061 | 800 | _cl.set_from(r); |
apetrusenko@1061 | 801 | r->oop_iterate(&_cl); |
apetrusenko@1061 | 802 | } |
apetrusenko@1061 | 803 | return false; |
apetrusenko@1061 | 804 | } |
apetrusenko@1061 | 805 | }; |
apetrusenko@1061 | 806 | |
apetrusenko@1061 | 807 | class ParRebuildRSTask: public AbstractGangTask { |
apetrusenko@1061 | 808 | G1CollectedHeap* _g1; |
apetrusenko@1061 | 809 | public: |
apetrusenko@1061 | 810 | ParRebuildRSTask(G1CollectedHeap* g1) |
apetrusenko@1061 | 811 | : AbstractGangTask("ParRebuildRSTask"), |
apetrusenko@1061 | 812 | _g1(g1) |
apetrusenko@1061 | 813 | { } |
apetrusenko@1061 | 814 | |
apetrusenko@1061 | 815 | void work(int i) { |
apetrusenko@1061 | 816 | RebuildRSOutOfRegionClosure rebuild_rs(_g1, i); |
apetrusenko@1061 | 817 | _g1->heap_region_par_iterate_chunked(&rebuild_rs, i, |
apetrusenko@1061 | 818 | HeapRegion::RebuildRSClaimValue); |
apetrusenko@1061 | 819 | } |
apetrusenko@1061 | 820 | }; |
apetrusenko@1061 | 821 | |
tonyp@2011 | 822 | void G1CollectedHeap::do_collection(bool explicit_gc, |
tonyp@2011 | 823 | bool clear_all_soft_refs, |
ysr@777 | 824 | size_t word_size) { |
tonyp@1794 | 825 | if (GC_locker::check_active_before_gc()) { |
tonyp@1794 | 826 | return; // GC is disabled (e.g. JNI GetXXXCritical operation) |
tonyp@1794 | 827 | } |
tonyp@1794 | 828 | |
ysr@777 | 829 | ResourceMark rm; |
ysr@777 | 830 | |
tonyp@1273 | 831 | if (PrintHeapAtGC) { |
tonyp@1273 | 832 | Universe::print_heap_before_gc(); |
tonyp@1273 | 833 | } |
tonyp@1273 | 834 | |
ysr@777 | 835 | assert(SafepointSynchronize::is_at_safepoint(), "should be at safepoint"); |
ysr@777 | 836 | assert(Thread::current() == VMThread::vm_thread(), "should be in vm thread"); |
ysr@777 | 837 | |
jmasa@1822 | 838 | const bool do_clear_all_soft_refs = clear_all_soft_refs || |
jmasa@1822 | 839 | collector_policy()->should_clear_all_soft_refs(); |
jmasa@1822 | 840 | |
jmasa@1822 | 841 | ClearedAllSoftRefs casr(do_clear_all_soft_refs, collector_policy()); |
jmasa@1822 | 842 | |
ysr@777 | 843 | { |
ysr@777 | 844 | IsGCActiveMark x; |
ysr@777 | 845 | |
ysr@777 | 846 | // Timing |
tonyp@2011 | 847 | bool system_gc = (gc_cause() == GCCause::_java_lang_system_gc); |
tonyp@2011 | 848 | assert(!system_gc || explicit_gc, "invariant"); |
ysr@777 | 849 | gclog_or_tty->date_stamp(PrintGC && PrintGCDateStamps); |
ysr@777 | 850 | TraceCPUTime tcpu(PrintGCDetails, true, gclog_or_tty); |
tonyp@2011 | 851 | TraceTime t(system_gc ? "Full GC (System.gc())" : "Full GC", |
jmasa@1822 | 852 | PrintGC, true, gclog_or_tty); |
ysr@777 | 853 | |
tonyp@1524 | 854 | TraceMemoryManagerStats tms(true /* fullGC */); |
tonyp@1524 | 855 | |
ysr@777 | 856 | double start = os::elapsedTime(); |
ysr@777 | 857 | g1_policy()->record_full_collection_start(); |
ysr@777 | 858 | |
ysr@777 | 859 | gc_prologue(true); |
tonyp@1273 | 860 | increment_total_collections(true /* full gc */); |
ysr@777 | 861 | |
ysr@777 | 862 | size_t g1h_prev_used = used(); |
ysr@777 | 863 | assert(used() == recalculate_used(), "Should be equal"); |
ysr@777 | 864 | |
ysr@777 | 865 | if (VerifyBeforeGC && total_collections() >= VerifyGCStartAt) { |
ysr@777 | 866 | HandleMark hm; // Discard invalid handles created during verification |
ysr@777 | 867 | prepare_for_verify(); |
ysr@777 | 868 | gclog_or_tty->print(" VerifyBeforeGC:"); |
ysr@777 | 869 | Universe::verify(true); |
ysr@777 | 870 | } |
ysr@777 | 871 | assert(regions_accounted_for(), "Region leakage!"); |
ysr@777 | 872 | |
ysr@777 | 873 | COMPILER2_PRESENT(DerivedPointerTable::clear()); |
ysr@777 | 874 | |
ysr@777 | 875 | // We want to discover references, but not process them yet. |
ysr@777 | 876 | // This mode is disabled in |
ysr@777 | 877 | // instanceRefKlass::process_discovered_references if the |
ysr@777 | 878 | // generation does some collection work, or |
ysr@777 | 879 | // instanceRefKlass::enqueue_discovered_references if the |
ysr@777 | 880 | // generation returns without doing any work. |
ysr@777 | 881 | ref_processor()->disable_discovery(); |
ysr@777 | 882 | ref_processor()->abandon_partial_discovery(); |
ysr@777 | 883 | ref_processor()->verify_no_references_recorded(); |
ysr@777 | 884 | |
ysr@777 | 885 | // Abandon current iterations of concurrent marking and concurrent |
ysr@777 | 886 | // refinement, if any are in progress. |
ysr@777 | 887 | concurrent_mark()->abort(); |
ysr@777 | 888 | |
ysr@777 | 889 | // Make sure we'll choose a new allocation region afterwards. |
ysr@777 | 890 | abandon_cur_alloc_region(); |
tonyp@1071 | 891 | abandon_gc_alloc_regions(); |
ysr@777 | 892 | assert(_cur_alloc_region == NULL, "Invariant."); |
ysr@777 | 893 | g1_rem_set()->as_HRInto_G1RemSet()->cleanupHRRS(); |
ysr@777 | 894 | tear_down_region_lists(); |
ysr@777 | 895 | set_used_regions_to_need_zero_fill(); |
johnc@1829 | 896 | |
johnc@1829 | 897 | // We may have added regions to the current incremental collection |
johnc@1829 | 898 | // set between the last GC or pause and now. We need to clear the |
johnc@1829 | 899 | // incremental collection set and then start rebuilding it afresh |
johnc@1829 | 900 | // after this full GC. |
johnc@1829 | 901 | abandon_collection_set(g1_policy()->inc_cset_head()); |
johnc@1829 | 902 | g1_policy()->clear_incremental_cset(); |
johnc@1829 | 903 | g1_policy()->stop_incremental_cset_building(); |
johnc@1829 | 904 | |
ysr@777 | 905 | if (g1_policy()->in_young_gc_mode()) { |
ysr@777 | 906 | empty_young_list(); |
ysr@777 | 907 | g1_policy()->set_full_young_gcs(true); |
ysr@777 | 908 | } |
ysr@777 | 909 | |
ysr@777 | 910 | // Temporarily make reference _discovery_ single threaded (non-MT). |
ysr@777 | 911 | ReferenceProcessorMTMutator rp_disc_ser(ref_processor(), false); |
ysr@777 | 912 | |
ysr@777 | 913 | // Temporarily make refs discovery atomic |
ysr@777 | 914 | ReferenceProcessorAtomicMutator rp_disc_atomic(ref_processor(), true); |
ysr@777 | 915 | |
ysr@777 | 916 | // Temporarily clear _is_alive_non_header |
ysr@777 | 917 | ReferenceProcessorIsAliveMutator rp_is_alive_null(ref_processor(), NULL); |
ysr@777 | 918 | |
ysr@777 | 919 | ref_processor()->enable_discovery(); |
jmasa@1822 | 920 | ref_processor()->setup_policy(do_clear_all_soft_refs); |
ysr@777 | 921 | |
ysr@777 | 922 | // Do collection work |
ysr@777 | 923 | { |
ysr@777 | 924 | HandleMark hm; // Discard invalid handles created during gc |
jmasa@1822 | 925 | G1MarkSweep::invoke_at_safepoint(ref_processor(), do_clear_all_soft_refs); |
ysr@777 | 926 | } |
ysr@777 | 927 | // Because freeing humongous regions may have added some unclean |
ysr@777 | 928 | // regions, it is necessary to tear down again before rebuilding. |
ysr@777 | 929 | tear_down_region_lists(); |
ysr@777 | 930 | rebuild_region_lists(); |
ysr@777 | 931 | |
ysr@777 | 932 | _summary_bytes_used = recalculate_used(); |
ysr@777 | 933 | |
ysr@777 | 934 | ref_processor()->enqueue_discovered_references(); |
ysr@777 | 935 | |
ysr@777 | 936 | COMPILER2_PRESENT(DerivedPointerTable::update_pointers()); |
ysr@777 | 937 | |
tonyp@1524 | 938 | MemoryService::track_memory_usage(); |
tonyp@1524 | 939 | |
ysr@777 | 940 | if (VerifyAfterGC && total_collections() >= VerifyGCStartAt) { |
ysr@777 | 941 | HandleMark hm; // Discard invalid handles created during verification |
ysr@777 | 942 | gclog_or_tty->print(" VerifyAfterGC:"); |
iveresov@1072 | 943 | prepare_for_verify(); |
ysr@777 | 944 | Universe::verify(false); |
ysr@777 | 945 | } |
ysr@777 | 946 | NOT_PRODUCT(ref_processor()->verify_no_references_recorded()); |
ysr@777 | 947 | |
ysr@777 | 948 | reset_gc_time_stamp(); |
ysr@777 | 949 | // Since everything potentially moved, we will clear all remembered |
apetrusenko@1061 | 950 | // sets, and clear all cards. Later we will rebuild remebered |
apetrusenko@1061 | 951 | // sets. We will also reset the GC time stamps of the regions. |
ysr@777 | 952 | PostMCRemSetClearClosure rs_clear(mr_bs()); |
ysr@777 | 953 | heap_region_iterate(&rs_clear); |
ysr@777 | 954 | |
ysr@777 | 955 | // Resize the heap if necessary. |
tonyp@2011 | 956 | resize_if_necessary_after_full_collection(explicit_gc ? 0 : word_size); |
ysr@777 | 957 | |
ysr@777 | 958 | if (_cg1r->use_cache()) { |
ysr@777 | 959 | _cg1r->clear_and_record_card_counts(); |
ysr@777 | 960 | _cg1r->clear_hot_cache(); |
ysr@777 | 961 | } |
ysr@777 | 962 | |
apetrusenko@1061 | 963 | // Rebuild remembered sets of all regions. |
apetrusenko@1061 | 964 | if (ParallelGCThreads > 0) { |
apetrusenko@1061 | 965 | ParRebuildRSTask rebuild_rs_task(this); |
apetrusenko@1061 | 966 | assert(check_heap_region_claim_values( |
apetrusenko@1061 | 967 | HeapRegion::InitialClaimValue), "sanity check"); |
apetrusenko@1061 | 968 | set_par_threads(workers()->total_workers()); |
apetrusenko@1061 | 969 | workers()->run_task(&rebuild_rs_task); |
apetrusenko@1061 | 970 | set_par_threads(0); |
apetrusenko@1061 | 971 | assert(check_heap_region_claim_values( |
apetrusenko@1061 | 972 | HeapRegion::RebuildRSClaimValue), "sanity check"); |
apetrusenko@1061 | 973 | reset_heap_region_claim_values(); |
apetrusenko@1061 | 974 | } else { |
apetrusenko@1061 | 975 | RebuildRSOutOfRegionClosure rebuild_rs(this); |
apetrusenko@1061 | 976 | heap_region_iterate(&rebuild_rs); |
apetrusenko@1061 | 977 | } |
apetrusenko@1061 | 978 | |
ysr@777 | 979 | if (PrintGC) { |
ysr@777 | 980 | print_size_transition(gclog_or_tty, g1h_prev_used, used(), capacity()); |
ysr@777 | 981 | } |
ysr@777 | 982 | |
ysr@777 | 983 | if (true) { // FIXME |
ysr@777 | 984 | // Ask the permanent generation to adjust size for full collections |
ysr@777 | 985 | perm()->compute_new_size(); |
ysr@777 | 986 | } |
ysr@777 | 987 | |
johnc@1829 | 988 | // Start a new incremental collection set for the next pause |
johnc@1829 | 989 | assert(g1_policy()->collection_set() == NULL, "must be"); |
johnc@1829 | 990 | g1_policy()->start_incremental_cset_building(); |
johnc@1829 | 991 | |
johnc@1829 | 992 | // Clear the _cset_fast_test bitmap in anticipation of adding |
johnc@1829 | 993 | // regions to the incremental collection set for the next |
johnc@1829 | 994 | // evacuation pause. |
johnc@1829 | 995 | clear_cset_fast_test(); |
johnc@1829 | 996 | |
ysr@777 | 997 | double end = os::elapsedTime(); |
ysr@777 | 998 | g1_policy()->record_full_collection_end(); |
ysr@777 | 999 | |
jmasa@981 | 1000 | #ifdef TRACESPINNING |
jmasa@981 | 1001 | ParallelTaskTerminator::print_termination_counts(); |
jmasa@981 | 1002 | #endif |
jmasa@981 | 1003 | |
ysr@777 | 1004 | gc_epilogue(true); |
ysr@777 | 1005 | |
iveresov@1229 | 1006 | // Discard all rset updates |
iveresov@1229 | 1007 | JavaThread::dirty_card_queue_set().abandon_logs(); |
iveresov@1051 | 1008 | assert(!G1DeferredRSUpdate |
iveresov@1051 | 1009 | || (G1DeferredRSUpdate && (dirty_card_queue_set().completed_buffers_num() == 0)), "Should not be any"); |
ysr@777 | 1010 | assert(regions_accounted_for(), "Region leakage!"); |
ysr@777 | 1011 | } |
ysr@777 | 1012 | |
ysr@777 | 1013 | if (g1_policy()->in_young_gc_mode()) { |
ysr@777 | 1014 | _young_list->reset_sampled_info(); |
johnc@1829 | 1015 | // At this point there should be no regions in the |
johnc@1829 | 1016 | // entire heap tagged as young. |
johnc@1829 | 1017 | assert( check_young_list_empty(true /* check_heap */), |
ysr@777 | 1018 | "young list should be empty at this point"); |
ysr@777 | 1019 | } |
tonyp@1273 | 1020 | |
tonyp@2011 | 1021 | // Update the number of full collections that have been completed. |
tonyp@2011 | 1022 | increment_full_collections_completed(false /* outer */); |
tonyp@2011 | 1023 | |
tonyp@1273 | 1024 | if (PrintHeapAtGC) { |
tonyp@1273 | 1025 | Universe::print_heap_after_gc(); |
tonyp@1273 | 1026 | } |
ysr@777 | 1027 | } |
ysr@777 | 1028 | |
ysr@777 | 1029 | void G1CollectedHeap::do_full_collection(bool clear_all_soft_refs) { |
tonyp@2011 | 1030 | do_collection(true, /* explicit_gc */ |
tonyp@2011 | 1031 | clear_all_soft_refs, |
tonyp@2011 | 1032 | 0 /* word_size */); |
ysr@777 | 1033 | } |
ysr@777 | 1034 | |
ysr@777 | 1035 | // This code is mostly copied from TenuredGeneration. |
ysr@777 | 1036 | void |
ysr@777 | 1037 | G1CollectedHeap:: |
ysr@777 | 1038 | resize_if_necessary_after_full_collection(size_t word_size) { |
ysr@777 | 1039 | assert(MinHeapFreeRatio <= MaxHeapFreeRatio, "sanity check"); |
ysr@777 | 1040 | |
ysr@777 | 1041 | // Include the current allocation, if any, and bytes that will be |
ysr@777 | 1042 | // pre-allocated to support collections, as "used". |
ysr@777 | 1043 | const size_t used_after_gc = used(); |
ysr@777 | 1044 | const size_t capacity_after_gc = capacity(); |
ysr@777 | 1045 | const size_t free_after_gc = capacity_after_gc - used_after_gc; |
ysr@777 | 1046 | |
ysr@777 | 1047 | // We don't have floating point command-line arguments |
ysr@777 | 1048 | const double minimum_free_percentage = (double) MinHeapFreeRatio / 100; |
ysr@777 | 1049 | const double maximum_used_percentage = 1.0 - minimum_free_percentage; |
ysr@777 | 1050 | const double maximum_free_percentage = (double) MaxHeapFreeRatio / 100; |
ysr@777 | 1051 | const double minimum_used_percentage = 1.0 - maximum_free_percentage; |
ysr@777 | 1052 | |
ysr@777 | 1053 | size_t minimum_desired_capacity = (size_t) (used_after_gc / maximum_used_percentage); |
ysr@777 | 1054 | size_t maximum_desired_capacity = (size_t) (used_after_gc / minimum_used_percentage); |
ysr@777 | 1055 | |
ysr@777 | 1056 | // Don't shrink less than the initial size. |
ysr@777 | 1057 | minimum_desired_capacity = |
ysr@777 | 1058 | MAX2(minimum_desired_capacity, |
ysr@777 | 1059 | collector_policy()->initial_heap_byte_size()); |
ysr@777 | 1060 | maximum_desired_capacity = |
ysr@777 | 1061 | MAX2(maximum_desired_capacity, |
ysr@777 | 1062 | collector_policy()->initial_heap_byte_size()); |
ysr@777 | 1063 | |
ysr@777 | 1064 | // We are failing here because minimum_desired_capacity is |
ysr@777 | 1065 | assert(used_after_gc <= minimum_desired_capacity, "sanity check"); |
ysr@777 | 1066 | assert(minimum_desired_capacity <= maximum_desired_capacity, "sanity check"); |
ysr@777 | 1067 | |
ysr@777 | 1068 | if (PrintGC && Verbose) { |
ysr@777 | 1069 | const double free_percentage = ((double)free_after_gc) / capacity(); |
ysr@777 | 1070 | gclog_or_tty->print_cr("Computing new size after full GC "); |
ysr@777 | 1071 | gclog_or_tty->print_cr(" " |
ysr@777 | 1072 | " minimum_free_percentage: %6.2f", |
ysr@777 | 1073 | minimum_free_percentage); |
ysr@777 | 1074 | gclog_or_tty->print_cr(" " |
ysr@777 | 1075 | " maximum_free_percentage: %6.2f", |
ysr@777 | 1076 | maximum_free_percentage); |
ysr@777 | 1077 | gclog_or_tty->print_cr(" " |
ysr@777 | 1078 | " capacity: %6.1fK" |
ysr@777 | 1079 | " minimum_desired_capacity: %6.1fK" |
ysr@777 | 1080 | " maximum_desired_capacity: %6.1fK", |
ysr@777 | 1081 | capacity() / (double) K, |
ysr@777 | 1082 | minimum_desired_capacity / (double) K, |
ysr@777 | 1083 | maximum_desired_capacity / (double) K); |
ysr@777 | 1084 | gclog_or_tty->print_cr(" " |
ysr@777 | 1085 | " free_after_gc : %6.1fK" |
ysr@777 | 1086 | " used_after_gc : %6.1fK", |
ysr@777 | 1087 | free_after_gc / (double) K, |
ysr@777 | 1088 | used_after_gc / (double) K); |
ysr@777 | 1089 | gclog_or_tty->print_cr(" " |
ysr@777 | 1090 | " free_percentage: %6.2f", |
ysr@777 | 1091 | free_percentage); |
ysr@777 | 1092 | } |
ysr@777 | 1093 | if (capacity() < minimum_desired_capacity) { |
ysr@777 | 1094 | // Don't expand unless it's significant |
ysr@777 | 1095 | size_t expand_bytes = minimum_desired_capacity - capacity_after_gc; |
ysr@777 | 1096 | expand(expand_bytes); |
ysr@777 | 1097 | if (PrintGC && Verbose) { |
ysr@777 | 1098 | gclog_or_tty->print_cr(" expanding:" |
ysr@777 | 1099 | " minimum_desired_capacity: %6.1fK" |
ysr@777 | 1100 | " expand_bytes: %6.1fK", |
ysr@777 | 1101 | minimum_desired_capacity / (double) K, |
ysr@777 | 1102 | expand_bytes / (double) K); |
ysr@777 | 1103 | } |
ysr@777 | 1104 | |
ysr@777 | 1105 | // No expansion, now see if we want to shrink |
ysr@777 | 1106 | } else if (capacity() > maximum_desired_capacity) { |
ysr@777 | 1107 | // Capacity too large, compute shrinking size |
ysr@777 | 1108 | size_t shrink_bytes = capacity_after_gc - maximum_desired_capacity; |
ysr@777 | 1109 | shrink(shrink_bytes); |
ysr@777 | 1110 | if (PrintGC && Verbose) { |
ysr@777 | 1111 | gclog_or_tty->print_cr(" " |
ysr@777 | 1112 | " shrinking:" |
ysr@777 | 1113 | " initSize: %.1fK" |
ysr@777 | 1114 | " maximum_desired_capacity: %.1fK", |
ysr@777 | 1115 | collector_policy()->initial_heap_byte_size() / (double) K, |
ysr@777 | 1116 | maximum_desired_capacity / (double) K); |
ysr@777 | 1117 | gclog_or_tty->print_cr(" " |
ysr@777 | 1118 | " shrink_bytes: %.1fK", |
ysr@777 | 1119 | shrink_bytes / (double) K); |
ysr@777 | 1120 | } |
ysr@777 | 1121 | } |
ysr@777 | 1122 | } |
ysr@777 | 1123 | |
ysr@777 | 1124 | |
ysr@777 | 1125 | HeapWord* |
ysr@777 | 1126 | G1CollectedHeap::satisfy_failed_allocation(size_t word_size) { |
ysr@777 | 1127 | HeapWord* result = NULL; |
ysr@777 | 1128 | |
ysr@777 | 1129 | // In a G1 heap, we're supposed to keep allocation from failing by |
ysr@777 | 1130 | // incremental pauses. Therefore, at least for now, we'll favor |
ysr@777 | 1131 | // expansion over collection. (This might change in the future if we can |
ysr@777 | 1132 | // do something smarter than full collection to satisfy a failed alloc.) |
ysr@777 | 1133 | |
ysr@777 | 1134 | result = expand_and_allocate(word_size); |
ysr@777 | 1135 | if (result != NULL) { |
ysr@777 | 1136 | assert(is_in(result), "result not in heap"); |
ysr@777 | 1137 | return result; |
ysr@777 | 1138 | } |
ysr@777 | 1139 | |
ysr@777 | 1140 | // OK, I guess we have to try collection. |
ysr@777 | 1141 | |
ysr@777 | 1142 | do_collection(false, false, word_size); |
ysr@777 | 1143 | |
ysr@777 | 1144 | result = attempt_allocation(word_size, /*permit_collection_pause*/false); |
ysr@777 | 1145 | |
ysr@777 | 1146 | if (result != NULL) { |
ysr@777 | 1147 | assert(is_in(result), "result not in heap"); |
ysr@777 | 1148 | return result; |
ysr@777 | 1149 | } |
ysr@777 | 1150 | |
ysr@777 | 1151 | // Try collecting soft references. |
ysr@777 | 1152 | do_collection(false, true, word_size); |
ysr@777 | 1153 | result = attempt_allocation(word_size, /*permit_collection_pause*/false); |
ysr@777 | 1154 | if (result != NULL) { |
ysr@777 | 1155 | assert(is_in(result), "result not in heap"); |
ysr@777 | 1156 | return result; |
ysr@777 | 1157 | } |
ysr@777 | 1158 | |
jmasa@1822 | 1159 | assert(!collector_policy()->should_clear_all_soft_refs(), |
jmasa@1822 | 1160 | "Flag should have been handled and cleared prior to this point"); |
jmasa@1822 | 1161 | |
ysr@777 | 1162 | // What else? We might try synchronous finalization later. If the total |
ysr@777 | 1163 | // space available is large enough for the allocation, then a more |
ysr@777 | 1164 | // complete compaction phase than we've tried so far might be |
ysr@777 | 1165 | // appropriate. |
ysr@777 | 1166 | return NULL; |
ysr@777 | 1167 | } |
ysr@777 | 1168 | |
ysr@777 | 1169 | // Attempting to expand the heap sufficiently |
ysr@777 | 1170 | // to support an allocation of the given "word_size". If |
ysr@777 | 1171 | // successful, perform the allocation and return the address of the |
ysr@777 | 1172 | // allocated block, or else "NULL". |
ysr@777 | 1173 | |
ysr@777 | 1174 | HeapWord* G1CollectedHeap::expand_and_allocate(size_t word_size) { |
ysr@777 | 1175 | size_t expand_bytes = word_size * HeapWordSize; |
ysr@777 | 1176 | if (expand_bytes < MinHeapDeltaBytes) { |
ysr@777 | 1177 | expand_bytes = MinHeapDeltaBytes; |
ysr@777 | 1178 | } |
ysr@777 | 1179 | expand(expand_bytes); |
ysr@777 | 1180 | assert(regions_accounted_for(), "Region leakage!"); |
ysr@777 | 1181 | HeapWord* result = attempt_allocation(word_size, false /* permit_collection_pause */); |
ysr@777 | 1182 | return result; |
ysr@777 | 1183 | } |
ysr@777 | 1184 | |
ysr@777 | 1185 | size_t G1CollectedHeap::free_region_if_totally_empty(HeapRegion* hr) { |
ysr@777 | 1186 | size_t pre_used = 0; |
ysr@777 | 1187 | size_t cleared_h_regions = 0; |
ysr@777 | 1188 | size_t freed_regions = 0; |
ysr@777 | 1189 | UncleanRegionList local_list; |
ysr@777 | 1190 | free_region_if_totally_empty_work(hr, pre_used, cleared_h_regions, |
ysr@777 | 1191 | freed_regions, &local_list); |
ysr@777 | 1192 | |
ysr@777 | 1193 | finish_free_region_work(pre_used, cleared_h_regions, freed_regions, |
ysr@777 | 1194 | &local_list); |
ysr@777 | 1195 | return pre_used; |
ysr@777 | 1196 | } |
ysr@777 | 1197 | |
ysr@777 | 1198 | void |
ysr@777 | 1199 | G1CollectedHeap::free_region_if_totally_empty_work(HeapRegion* hr, |
ysr@777 | 1200 | size_t& pre_used, |
ysr@777 | 1201 | size_t& cleared_h, |
ysr@777 | 1202 | size_t& freed_regions, |
ysr@777 | 1203 | UncleanRegionList* list, |
ysr@777 | 1204 | bool par) { |
ysr@777 | 1205 | assert(!hr->continuesHumongous(), "should have filtered these out"); |
ysr@777 | 1206 | size_t res = 0; |
apetrusenko@1112 | 1207 | if (hr->used() > 0 && hr->garbage_bytes() == hr->used() && |
apetrusenko@1112 | 1208 | !hr->is_young()) { |
apetrusenko@1112 | 1209 | if (G1PolicyVerbose > 0) |
apetrusenko@1112 | 1210 | gclog_or_tty->print_cr("Freeing empty region "PTR_FORMAT "(" SIZE_FORMAT " bytes)" |
apetrusenko@1112 | 1211 | " during cleanup", hr, hr->used()); |
apetrusenko@1112 | 1212 | free_region_work(hr, pre_used, cleared_h, freed_regions, list, par); |
ysr@777 | 1213 | } |
ysr@777 | 1214 | } |
ysr@777 | 1215 | |
ysr@777 | 1216 | // FIXME: both this and shrink could probably be more efficient by |
ysr@777 | 1217 | // doing one "VirtualSpace::expand_by" call rather than several. |
ysr@777 | 1218 | void G1CollectedHeap::expand(size_t expand_bytes) { |
ysr@777 | 1219 | size_t old_mem_size = _g1_storage.committed_size(); |
ysr@777 | 1220 | // We expand by a minimum of 1K. |
ysr@777 | 1221 | expand_bytes = MAX2(expand_bytes, (size_t)K); |
ysr@777 | 1222 | size_t aligned_expand_bytes = |
ysr@777 | 1223 | ReservedSpace::page_align_size_up(expand_bytes); |
ysr@777 | 1224 | aligned_expand_bytes = align_size_up(aligned_expand_bytes, |
ysr@777 | 1225 | HeapRegion::GrainBytes); |
ysr@777 | 1226 | expand_bytes = aligned_expand_bytes; |
ysr@777 | 1227 | while (expand_bytes > 0) { |
ysr@777 | 1228 | HeapWord* base = (HeapWord*)_g1_storage.high(); |
ysr@777 | 1229 | // Commit more storage. |
ysr@777 | 1230 | bool successful = _g1_storage.expand_by(HeapRegion::GrainBytes); |
ysr@777 | 1231 | if (!successful) { |
ysr@777 | 1232 | expand_bytes = 0; |
ysr@777 | 1233 | } else { |
ysr@777 | 1234 | expand_bytes -= HeapRegion::GrainBytes; |
ysr@777 | 1235 | // Expand the committed region. |
ysr@777 | 1236 | HeapWord* high = (HeapWord*) _g1_storage.high(); |
ysr@777 | 1237 | _g1_committed.set_end(high); |
ysr@777 | 1238 | // Create a new HeapRegion. |
ysr@777 | 1239 | MemRegion mr(base, high); |
ysr@777 | 1240 | bool is_zeroed = !_g1_max_committed.contains(base); |
ysr@777 | 1241 | HeapRegion* hr = new HeapRegion(_bot_shared, mr, is_zeroed); |
ysr@777 | 1242 | |
ysr@777 | 1243 | // Now update max_committed if necessary. |
ysr@777 | 1244 | _g1_max_committed.set_end(MAX2(_g1_max_committed.end(), high)); |
ysr@777 | 1245 | |
ysr@777 | 1246 | // Add it to the HeapRegionSeq. |
ysr@777 | 1247 | _hrs->insert(hr); |
ysr@777 | 1248 | // Set the zero-fill state, according to whether it's already |
ysr@777 | 1249 | // zeroed. |
ysr@777 | 1250 | { |
ysr@777 | 1251 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 1252 | if (is_zeroed) { |
ysr@777 | 1253 | hr->set_zero_fill_complete(); |
ysr@777 | 1254 | put_free_region_on_list_locked(hr); |
ysr@777 | 1255 | } else { |
ysr@777 | 1256 | hr->set_zero_fill_needed(); |
ysr@777 | 1257 | put_region_on_unclean_list_locked(hr); |
ysr@777 | 1258 | } |
ysr@777 | 1259 | } |
ysr@777 | 1260 | _free_regions++; |
ysr@777 | 1261 | // And we used up an expansion region to create it. |
ysr@777 | 1262 | _expansion_regions--; |
ysr@777 | 1263 | // Tell the cardtable about it. |
ysr@777 | 1264 | Universe::heap()->barrier_set()->resize_covered_region(_g1_committed); |
ysr@777 | 1265 | // And the offset table as well. |
ysr@777 | 1266 | _bot_shared->resize(_g1_committed.word_size()); |
ysr@777 | 1267 | } |
ysr@777 | 1268 | } |
ysr@777 | 1269 | if (Verbose && PrintGC) { |
ysr@777 | 1270 | size_t new_mem_size = _g1_storage.committed_size(); |
ysr@777 | 1271 | gclog_or_tty->print_cr("Expanding garbage-first heap from %ldK by %ldK to %ldK", |
ysr@777 | 1272 | old_mem_size/K, aligned_expand_bytes/K, |
ysr@777 | 1273 | new_mem_size/K); |
ysr@777 | 1274 | } |
ysr@777 | 1275 | } |
ysr@777 | 1276 | |
ysr@777 | 1277 | void G1CollectedHeap::shrink_helper(size_t shrink_bytes) |
ysr@777 | 1278 | { |
ysr@777 | 1279 | size_t old_mem_size = _g1_storage.committed_size(); |
ysr@777 | 1280 | size_t aligned_shrink_bytes = |
ysr@777 | 1281 | ReservedSpace::page_align_size_down(shrink_bytes); |
ysr@777 | 1282 | aligned_shrink_bytes = align_size_down(aligned_shrink_bytes, |
ysr@777 | 1283 | HeapRegion::GrainBytes); |
ysr@777 | 1284 | size_t num_regions_deleted = 0; |
ysr@777 | 1285 | MemRegion mr = _hrs->shrink_by(aligned_shrink_bytes, num_regions_deleted); |
ysr@777 | 1286 | |
ysr@777 | 1287 | assert(mr.end() == (HeapWord*)_g1_storage.high(), "Bad shrink!"); |
ysr@777 | 1288 | if (mr.byte_size() > 0) |
ysr@777 | 1289 | _g1_storage.shrink_by(mr.byte_size()); |
ysr@777 | 1290 | assert(mr.start() == (HeapWord*)_g1_storage.high(), "Bad shrink!"); |
ysr@777 | 1291 | |
ysr@777 | 1292 | _g1_committed.set_end(mr.start()); |
ysr@777 | 1293 | _free_regions -= num_regions_deleted; |
ysr@777 | 1294 | _expansion_regions += num_regions_deleted; |
ysr@777 | 1295 | |
ysr@777 | 1296 | // Tell the cardtable about it. |
ysr@777 | 1297 | Universe::heap()->barrier_set()->resize_covered_region(_g1_committed); |
ysr@777 | 1298 | |
ysr@777 | 1299 | // And the offset table as well. |
ysr@777 | 1300 | _bot_shared->resize(_g1_committed.word_size()); |
ysr@777 | 1301 | |
ysr@777 | 1302 | HeapRegionRemSet::shrink_heap(n_regions()); |
ysr@777 | 1303 | |
ysr@777 | 1304 | if (Verbose && PrintGC) { |
ysr@777 | 1305 | size_t new_mem_size = _g1_storage.committed_size(); |
ysr@777 | 1306 | gclog_or_tty->print_cr("Shrinking garbage-first heap from %ldK by %ldK to %ldK", |
ysr@777 | 1307 | old_mem_size/K, aligned_shrink_bytes/K, |
ysr@777 | 1308 | new_mem_size/K); |
ysr@777 | 1309 | } |
ysr@777 | 1310 | } |
ysr@777 | 1311 | |
ysr@777 | 1312 | void G1CollectedHeap::shrink(size_t shrink_bytes) { |
tonyp@1071 | 1313 | release_gc_alloc_regions(true /* totally */); |
ysr@777 | 1314 | tear_down_region_lists(); // We will rebuild them in a moment. |
ysr@777 | 1315 | shrink_helper(shrink_bytes); |
ysr@777 | 1316 | rebuild_region_lists(); |
ysr@777 | 1317 | } |
ysr@777 | 1318 | |
ysr@777 | 1319 | // Public methods. |
ysr@777 | 1320 | |
ysr@777 | 1321 | #ifdef _MSC_VER // the use of 'this' below gets a warning, make it go away |
ysr@777 | 1322 | #pragma warning( disable:4355 ) // 'this' : used in base member initializer list |
ysr@777 | 1323 | #endif // _MSC_VER |
ysr@777 | 1324 | |
ysr@777 | 1325 | |
ysr@777 | 1326 | G1CollectedHeap::G1CollectedHeap(G1CollectorPolicy* policy_) : |
ysr@777 | 1327 | SharedHeap(policy_), |
ysr@777 | 1328 | _g1_policy(policy_), |
iveresov@1546 | 1329 | _dirty_card_queue_set(false), |
johnc@2060 | 1330 | _into_cset_dirty_card_queue_set(false), |
ysr@777 | 1331 | _ref_processor(NULL), |
ysr@777 | 1332 | _process_strong_tasks(new SubTasksDone(G1H_PS_NumElements)), |
ysr@777 | 1333 | _bot_shared(NULL), |
ysr@777 | 1334 | _par_alloc_during_gc_lock(Mutex::leaf, "par alloc during GC lock"), |
ysr@777 | 1335 | _objs_with_preserved_marks(NULL), _preserved_marks_of_objs(NULL), |
ysr@777 | 1336 | _evac_failure_scan_stack(NULL) , |
ysr@777 | 1337 | _mark_in_progress(false), |
ysr@777 | 1338 | _cg1r(NULL), _czft(NULL), _summary_bytes_used(0), |
ysr@777 | 1339 | _cur_alloc_region(NULL), |
ysr@777 | 1340 | _refine_cte_cl(NULL), |
ysr@777 | 1341 | _free_region_list(NULL), _free_region_list_size(0), |
ysr@777 | 1342 | _free_regions(0), |
ysr@777 | 1343 | _full_collection(false), |
ysr@777 | 1344 | _unclean_region_list(), |
ysr@777 | 1345 | _unclean_regions_coming(false), |
ysr@777 | 1346 | _young_list(new YoungList(this)), |
ysr@777 | 1347 | _gc_time_stamp(0), |
tonyp@961 | 1348 | _surviving_young_words(NULL), |
tonyp@2011 | 1349 | _full_collections_completed(0), |
tonyp@961 | 1350 | _in_cset_fast_test(NULL), |
apetrusenko@1231 | 1351 | _in_cset_fast_test_base(NULL), |
apetrusenko@1231 | 1352 | _dirty_cards_region_list(NULL) { |
ysr@777 | 1353 | _g1h = this; // To catch bugs. |
ysr@777 | 1354 | if (_process_strong_tasks == NULL || !_process_strong_tasks->valid()) { |
ysr@777 | 1355 | vm_exit_during_initialization("Failed necessary allocation."); |
ysr@777 | 1356 | } |
tonyp@1377 | 1357 | |
tonyp@1377 | 1358 | _humongous_object_threshold_in_words = HeapRegion::GrainWords / 2; |
tonyp@1377 | 1359 | |
ysr@777 | 1360 | int n_queues = MAX2((int)ParallelGCThreads, 1); |
ysr@777 | 1361 | _task_queues = new RefToScanQueueSet(n_queues); |
ysr@777 | 1362 | |
ysr@777 | 1363 | int n_rem_sets = HeapRegionRemSet::num_par_rem_sets(); |
ysr@777 | 1364 | assert(n_rem_sets > 0, "Invariant."); |
ysr@777 | 1365 | |
ysr@777 | 1366 | HeapRegionRemSetIterator** iter_arr = |
ysr@777 | 1367 | NEW_C_HEAP_ARRAY(HeapRegionRemSetIterator*, n_queues); |
ysr@777 | 1368 | for (int i = 0; i < n_queues; i++) { |
ysr@777 | 1369 | iter_arr[i] = new HeapRegionRemSetIterator(); |
ysr@777 | 1370 | } |
ysr@777 | 1371 | _rem_set_iterator = iter_arr; |
ysr@777 | 1372 | |
ysr@777 | 1373 | for (int i = 0; i < n_queues; i++) { |
ysr@777 | 1374 | RefToScanQueue* q = new RefToScanQueue(); |
ysr@777 | 1375 | q->initialize(); |
ysr@777 | 1376 | _task_queues->register_queue(i, q); |
ysr@777 | 1377 | } |
ysr@777 | 1378 | |
ysr@777 | 1379 | for (int ap = 0; ap < GCAllocPurposeCount; ++ap) { |
tonyp@1071 | 1380 | _gc_alloc_regions[ap] = NULL; |
tonyp@1071 | 1381 | _gc_alloc_region_counts[ap] = 0; |
tonyp@1071 | 1382 | _retained_gc_alloc_regions[ap] = NULL; |
tonyp@1071 | 1383 | // by default, we do not retain a GC alloc region for each ap; |
tonyp@1071 | 1384 | // we'll override this, when appropriate, below |
tonyp@1071 | 1385 | _retain_gc_alloc_region[ap] = false; |
tonyp@1071 | 1386 | } |
tonyp@1071 | 1387 | |
tonyp@1071 | 1388 | // We will try to remember the last half-full tenured region we |
tonyp@1071 | 1389 | // allocated to at the end of a collection so that we can re-use it |
tonyp@1071 | 1390 | // during the next collection. |
tonyp@1071 | 1391 | _retain_gc_alloc_region[GCAllocForTenured] = true; |
tonyp@1071 | 1392 | |
ysr@777 | 1393 | guarantee(_task_queues != NULL, "task_queues allocation failure."); |
ysr@777 | 1394 | } |
ysr@777 | 1395 | |
ysr@777 | 1396 | jint G1CollectedHeap::initialize() { |
ysr@1601 | 1397 | CollectedHeap::pre_initialize(); |
ysr@777 | 1398 | os::enable_vtime(); |
ysr@777 | 1399 | |
ysr@777 | 1400 | // Necessary to satisfy locking discipline assertions. |
ysr@777 | 1401 | |
ysr@777 | 1402 | MutexLocker x(Heap_lock); |
ysr@777 | 1403 | |
ysr@777 | 1404 | // While there are no constraints in the GC code that HeapWordSize |
ysr@777 | 1405 | // be any particular value, there are multiple other areas in the |
ysr@777 | 1406 | // system which believe this to be true (e.g. oop->object_size in some |
ysr@777 | 1407 | // cases incorrectly returns the size in wordSize units rather than |
ysr@777 | 1408 | // HeapWordSize). |
ysr@777 | 1409 | guarantee(HeapWordSize == wordSize, "HeapWordSize must equal wordSize"); |
ysr@777 | 1410 | |
ysr@777 | 1411 | size_t init_byte_size = collector_policy()->initial_heap_byte_size(); |
ysr@777 | 1412 | size_t max_byte_size = collector_policy()->max_heap_byte_size(); |
ysr@777 | 1413 | |
ysr@777 | 1414 | // Ensure that the sizes are properly aligned. |
ysr@777 | 1415 | Universe::check_alignment(init_byte_size, HeapRegion::GrainBytes, "g1 heap"); |
ysr@777 | 1416 | Universe::check_alignment(max_byte_size, HeapRegion::GrainBytes, "g1 heap"); |
ysr@777 | 1417 | |
ysr@777 | 1418 | _cg1r = new ConcurrentG1Refine(); |
ysr@777 | 1419 | |
ysr@777 | 1420 | // Reserve the maximum. |
ysr@777 | 1421 | PermanentGenerationSpec* pgs = collector_policy()->permanent_generation(); |
ysr@777 | 1422 | // Includes the perm-gen. |
kvn@1077 | 1423 | |
kvn@1077 | 1424 | const size_t total_reserved = max_byte_size + pgs->max_size(); |
kvn@1077 | 1425 | char* addr = Universe::preferred_heap_base(total_reserved, Universe::UnscaledNarrowOop); |
kvn@1077 | 1426 | |
ysr@777 | 1427 | ReservedSpace heap_rs(max_byte_size + pgs->max_size(), |
ysr@777 | 1428 | HeapRegion::GrainBytes, |
kvn@1077 | 1429 | false /*ism*/, addr); |
kvn@1077 | 1430 | |
kvn@1077 | 1431 | if (UseCompressedOops) { |
kvn@1077 | 1432 | if (addr != NULL && !heap_rs.is_reserved()) { |
kvn@1077 | 1433 | // Failed to reserve at specified address - the requested memory |
kvn@1077 | 1434 | // region is taken already, for example, by 'java' launcher. |
kvn@1077 | 1435 | // Try again to reserver heap higher. |
kvn@1077 | 1436 | addr = Universe::preferred_heap_base(total_reserved, Universe::ZeroBasedNarrowOop); |
kvn@1077 | 1437 | ReservedSpace heap_rs0(total_reserved, HeapRegion::GrainBytes, |
kvn@1077 | 1438 | false /*ism*/, addr); |
kvn@1077 | 1439 | if (addr != NULL && !heap_rs0.is_reserved()) { |
kvn@1077 | 1440 | // Failed to reserve at specified address again - give up. |
kvn@1077 | 1441 | addr = Universe::preferred_heap_base(total_reserved, Universe::HeapBasedNarrowOop); |
kvn@1077 | 1442 | assert(addr == NULL, ""); |
kvn@1077 | 1443 | ReservedSpace heap_rs1(total_reserved, HeapRegion::GrainBytes, |
kvn@1077 | 1444 | false /*ism*/, addr); |
kvn@1077 | 1445 | heap_rs = heap_rs1; |
kvn@1077 | 1446 | } else { |
kvn@1077 | 1447 | heap_rs = heap_rs0; |
kvn@1077 | 1448 | } |
kvn@1077 | 1449 | } |
kvn@1077 | 1450 | } |
ysr@777 | 1451 | |
ysr@777 | 1452 | if (!heap_rs.is_reserved()) { |
ysr@777 | 1453 | vm_exit_during_initialization("Could not reserve enough space for object heap"); |
ysr@777 | 1454 | return JNI_ENOMEM; |
ysr@777 | 1455 | } |
ysr@777 | 1456 | |
ysr@777 | 1457 | // It is important to do this in a way such that concurrent readers can't |
ysr@777 | 1458 | // temporarily think somethings in the heap. (I've actually seen this |
ysr@777 | 1459 | // happen in asserts: DLD.) |
ysr@777 | 1460 | _reserved.set_word_size(0); |
ysr@777 | 1461 | _reserved.set_start((HeapWord*)heap_rs.base()); |
ysr@777 | 1462 | _reserved.set_end((HeapWord*)(heap_rs.base() + heap_rs.size())); |
ysr@777 | 1463 | |
ysr@777 | 1464 | _expansion_regions = max_byte_size/HeapRegion::GrainBytes; |
ysr@777 | 1465 | |
ysr@777 | 1466 | _num_humongous_regions = 0; |
ysr@777 | 1467 | |
ysr@777 | 1468 | // Create the gen rem set (and barrier set) for the entire reserved region. |
ysr@777 | 1469 | _rem_set = collector_policy()->create_rem_set(_reserved, 2); |
ysr@777 | 1470 | set_barrier_set(rem_set()->bs()); |
ysr@777 | 1471 | if (barrier_set()->is_a(BarrierSet::ModRef)) { |
ysr@777 | 1472 | _mr_bs = (ModRefBarrierSet*)_barrier_set; |
ysr@777 | 1473 | } else { |
ysr@777 | 1474 | vm_exit_during_initialization("G1 requires a mod ref bs."); |
ysr@777 | 1475 | return JNI_ENOMEM; |
ysr@777 | 1476 | } |
ysr@777 | 1477 | |
ysr@777 | 1478 | // Also create a G1 rem set. |
ysr@777 | 1479 | if (G1UseHRIntoRS) { |
ysr@777 | 1480 | if (mr_bs()->is_a(BarrierSet::CardTableModRef)) { |
ysr@777 | 1481 | _g1_rem_set = new HRInto_G1RemSet(this, (CardTableModRefBS*)mr_bs()); |
ysr@777 | 1482 | } else { |
ysr@777 | 1483 | vm_exit_during_initialization("G1 requires a cardtable mod ref bs."); |
ysr@777 | 1484 | return JNI_ENOMEM; |
ysr@777 | 1485 | } |
ysr@777 | 1486 | } else { |
ysr@777 | 1487 | _g1_rem_set = new StupidG1RemSet(this); |
ysr@777 | 1488 | } |
ysr@777 | 1489 | |
ysr@777 | 1490 | // Carve out the G1 part of the heap. |
ysr@777 | 1491 | |
ysr@777 | 1492 | ReservedSpace g1_rs = heap_rs.first_part(max_byte_size); |
ysr@777 | 1493 | _g1_reserved = MemRegion((HeapWord*)g1_rs.base(), |
ysr@777 | 1494 | g1_rs.size()/HeapWordSize); |
ysr@777 | 1495 | ReservedSpace perm_gen_rs = heap_rs.last_part(max_byte_size); |
ysr@777 | 1496 | |
ysr@777 | 1497 | _perm_gen = pgs->init(perm_gen_rs, pgs->init_size(), rem_set()); |
ysr@777 | 1498 | |
ysr@777 | 1499 | _g1_storage.initialize(g1_rs, 0); |
ysr@777 | 1500 | _g1_committed = MemRegion((HeapWord*)_g1_storage.low(), (size_t) 0); |
ysr@777 | 1501 | _g1_max_committed = _g1_committed; |
iveresov@828 | 1502 | _hrs = new HeapRegionSeq(_expansion_regions); |
ysr@777 | 1503 | guarantee(_hrs != NULL, "Couldn't allocate HeapRegionSeq"); |
ysr@777 | 1504 | guarantee(_cur_alloc_region == NULL, "from constructor"); |
ysr@777 | 1505 | |
johnc@1242 | 1506 | // 6843694 - ensure that the maximum region index can fit |
johnc@1242 | 1507 | // in the remembered set structures. |
johnc@1242 | 1508 | const size_t max_region_idx = ((size_t)1 << (sizeof(RegionIdx_t)*BitsPerByte-1)) - 1; |
johnc@1242 | 1509 | guarantee((max_regions() - 1) <= max_region_idx, "too many regions"); |
johnc@1242 | 1510 | |
johnc@1242 | 1511 | size_t max_cards_per_region = ((size_t)1 << (sizeof(CardIdx_t)*BitsPerByte-1)) - 1; |
tonyp@1377 | 1512 | guarantee(HeapRegion::CardsPerRegion > 0, "make sure it's initialized"); |
tonyp@1377 | 1513 | guarantee((size_t) HeapRegion::CardsPerRegion < max_cards_per_region, |
tonyp@1377 | 1514 | "too many cards per region"); |
johnc@1242 | 1515 | |
ysr@777 | 1516 | _bot_shared = new G1BlockOffsetSharedArray(_reserved, |
ysr@777 | 1517 | heap_word_size(init_byte_size)); |
ysr@777 | 1518 | |
ysr@777 | 1519 | _g1h = this; |
ysr@777 | 1520 | |
johnc@1829 | 1521 | _in_cset_fast_test_length = max_regions(); |
johnc@1829 | 1522 | _in_cset_fast_test_base = NEW_C_HEAP_ARRAY(bool, _in_cset_fast_test_length); |
johnc@1829 | 1523 | |
johnc@1829 | 1524 | // We're biasing _in_cset_fast_test to avoid subtracting the |
johnc@1829 | 1525 | // beginning of the heap every time we want to index; basically |
johnc@1829 | 1526 | // it's the same with what we do with the card table. |
johnc@1829 | 1527 | _in_cset_fast_test = _in_cset_fast_test_base - |
johnc@1829 | 1528 | ((size_t) _g1_reserved.start() >> HeapRegion::LogOfHRGrainBytes); |
johnc@1829 | 1529 | |
johnc@1829 | 1530 | // Clear the _cset_fast_test bitmap in anticipation of adding |
johnc@1829 | 1531 | // regions to the incremental collection set for the first |
johnc@1829 | 1532 | // evacuation pause. |
johnc@1829 | 1533 | clear_cset_fast_test(); |
johnc@1829 | 1534 | |
ysr@777 | 1535 | // Create the ConcurrentMark data structure and thread. |
ysr@777 | 1536 | // (Must do this late, so that "max_regions" is defined.) |
ysr@777 | 1537 | _cm = new ConcurrentMark(heap_rs, (int) max_regions()); |
ysr@777 | 1538 | _cmThread = _cm->cmThread(); |
ysr@777 | 1539 | |
ysr@777 | 1540 | // ...and the concurrent zero-fill thread, if necessary. |
ysr@777 | 1541 | if (G1ConcZeroFill) { |
ysr@777 | 1542 | _czft = new ConcurrentZFThread(); |
ysr@777 | 1543 | } |
ysr@777 | 1544 | |
ysr@777 | 1545 | // Initialize the from_card cache structure of HeapRegionRemSet. |
ysr@777 | 1546 | HeapRegionRemSet::init_heap(max_regions()); |
ysr@777 | 1547 | |
apetrusenko@1112 | 1548 | // Now expand into the initial heap size. |
apetrusenko@1112 | 1549 | expand(init_byte_size); |
ysr@777 | 1550 | |
ysr@777 | 1551 | // Perform any initialization actions delegated to the policy. |
ysr@777 | 1552 | g1_policy()->init(); |
ysr@777 | 1553 | |
ysr@777 | 1554 | g1_policy()->note_start_of_mark_thread(); |
ysr@777 | 1555 | |
ysr@777 | 1556 | _refine_cte_cl = |
ysr@777 | 1557 | new RefineCardTableEntryClosure(ConcurrentG1RefineThread::sts(), |
ysr@777 | 1558 | g1_rem_set(), |
ysr@777 | 1559 | concurrent_g1_refine()); |
ysr@777 | 1560 | JavaThread::dirty_card_queue_set().set_closure(_refine_cte_cl); |
ysr@777 | 1561 | |
ysr@777 | 1562 | JavaThread::satb_mark_queue_set().initialize(SATB_Q_CBL_mon, |
ysr@777 | 1563 | SATB_Q_FL_lock, |
iveresov@1546 | 1564 | G1SATBProcessCompletedThreshold, |
ysr@777 | 1565 | Shared_SATB_Q_lock); |
iveresov@1229 | 1566 | |
iveresov@1229 | 1567 | JavaThread::dirty_card_queue_set().initialize(DirtyCardQ_CBL_mon, |
iveresov@1229 | 1568 | DirtyCardQ_FL_lock, |
iveresov@1546 | 1569 | concurrent_g1_refine()->yellow_zone(), |
iveresov@1546 | 1570 | concurrent_g1_refine()->red_zone(), |
iveresov@1229 | 1571 | Shared_DirtyCardQ_lock); |
iveresov@1229 | 1572 | |
iveresov@1051 | 1573 | if (G1DeferredRSUpdate) { |
iveresov@1051 | 1574 | dirty_card_queue_set().initialize(DirtyCardQ_CBL_mon, |
iveresov@1051 | 1575 | DirtyCardQ_FL_lock, |
iveresov@1546 | 1576 | -1, // never trigger processing |
iveresov@1546 | 1577 | -1, // no limit on length |
iveresov@1051 | 1578 | Shared_DirtyCardQ_lock, |
iveresov@1051 | 1579 | &JavaThread::dirty_card_queue_set()); |
iveresov@1051 | 1580 | } |
johnc@2060 | 1581 | |
johnc@2060 | 1582 | // Initialize the card queue set used to hold cards containing |
johnc@2060 | 1583 | // references into the collection set. |
johnc@2060 | 1584 | _into_cset_dirty_card_queue_set.initialize(DirtyCardQ_CBL_mon, |
johnc@2060 | 1585 | DirtyCardQ_FL_lock, |
johnc@2060 | 1586 | -1, // never trigger processing |
johnc@2060 | 1587 | -1, // no limit on length |
johnc@2060 | 1588 | Shared_DirtyCardQ_lock, |
johnc@2060 | 1589 | &JavaThread::dirty_card_queue_set()); |
johnc@2060 | 1590 | |
ysr@777 | 1591 | // In case we're keeping closure specialization stats, initialize those |
ysr@777 | 1592 | // counts and that mechanism. |
ysr@777 | 1593 | SpecializationStats::clear(); |
ysr@777 | 1594 | |
ysr@777 | 1595 | _gc_alloc_region_list = NULL; |
ysr@777 | 1596 | |
ysr@777 | 1597 | // Do later initialization work for concurrent refinement. |
ysr@777 | 1598 | _cg1r->init(); |
ysr@777 | 1599 | |
ysr@777 | 1600 | return JNI_OK; |
ysr@777 | 1601 | } |
ysr@777 | 1602 | |
ysr@777 | 1603 | void G1CollectedHeap::ref_processing_init() { |
ysr@777 | 1604 | SharedHeap::ref_processing_init(); |
ysr@777 | 1605 | MemRegion mr = reserved_region(); |
ysr@777 | 1606 | _ref_processor = ReferenceProcessor::create_ref_processor( |
ysr@777 | 1607 | mr, // span |
ysr@777 | 1608 | false, // Reference discovery is not atomic |
ysr@777 | 1609 | // (though it shouldn't matter here.) |
ysr@777 | 1610 | true, // mt_discovery |
ysr@777 | 1611 | NULL, // is alive closure: need to fill this in for efficiency |
ysr@777 | 1612 | ParallelGCThreads, |
ysr@777 | 1613 | ParallelRefProcEnabled, |
ysr@777 | 1614 | true); // Setting next fields of discovered |
ysr@777 | 1615 | // lists requires a barrier. |
ysr@777 | 1616 | } |
ysr@777 | 1617 | |
ysr@777 | 1618 | size_t G1CollectedHeap::capacity() const { |
ysr@777 | 1619 | return _g1_committed.byte_size(); |
ysr@777 | 1620 | } |
ysr@777 | 1621 | |
johnc@2060 | 1622 | void G1CollectedHeap::iterate_dirty_card_closure(CardTableEntryClosure* cl, |
johnc@2060 | 1623 | DirtyCardQueue* into_cset_dcq, |
johnc@2060 | 1624 | bool concurrent, |
ysr@777 | 1625 | int worker_i) { |
johnc@1324 | 1626 | // Clean cards in the hot card cache |
johnc@2060 | 1627 | concurrent_g1_refine()->clean_up_cache(worker_i, g1_rem_set(), into_cset_dcq); |
johnc@1324 | 1628 | |
ysr@777 | 1629 | DirtyCardQueueSet& dcqs = JavaThread::dirty_card_queue_set(); |
ysr@777 | 1630 | int n_completed_buffers = 0; |
johnc@2060 | 1631 | while (dcqs.apply_closure_to_completed_buffer(cl, worker_i, 0, true)) { |
ysr@777 | 1632 | n_completed_buffers++; |
ysr@777 | 1633 | } |
ysr@777 | 1634 | g1_policy()->record_update_rs_processed_buffers(worker_i, |
ysr@777 | 1635 | (double) n_completed_buffers); |
ysr@777 | 1636 | dcqs.clear_n_completed_buffers(); |
ysr@777 | 1637 | assert(!dcqs.completed_buffers_exist_dirty(), "Completed buffers exist!"); |
ysr@777 | 1638 | } |
ysr@777 | 1639 | |
ysr@777 | 1640 | |
ysr@777 | 1641 | // Computes the sum of the storage used by the various regions. |
ysr@777 | 1642 | |
ysr@777 | 1643 | size_t G1CollectedHeap::used() const { |
ysr@1297 | 1644 | assert(Heap_lock->owner() != NULL, |
ysr@1297 | 1645 | "Should be owned on this thread's behalf."); |
ysr@777 | 1646 | size_t result = _summary_bytes_used; |
ysr@1280 | 1647 | // Read only once in case it is set to NULL concurrently |
ysr@1280 | 1648 | HeapRegion* hr = _cur_alloc_region; |
ysr@1280 | 1649 | if (hr != NULL) |
ysr@1280 | 1650 | result += hr->used(); |
ysr@777 | 1651 | return result; |
ysr@777 | 1652 | } |
ysr@777 | 1653 | |
tonyp@1281 | 1654 | size_t G1CollectedHeap::used_unlocked() const { |
tonyp@1281 | 1655 | size_t result = _summary_bytes_used; |
tonyp@1281 | 1656 | return result; |
tonyp@1281 | 1657 | } |
tonyp@1281 | 1658 | |
ysr@777 | 1659 | class SumUsedClosure: public HeapRegionClosure { |
ysr@777 | 1660 | size_t _used; |
ysr@777 | 1661 | public: |
ysr@777 | 1662 | SumUsedClosure() : _used(0) {} |
ysr@777 | 1663 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 1664 | if (!r->continuesHumongous()) { |
ysr@777 | 1665 | _used += r->used(); |
ysr@777 | 1666 | } |
ysr@777 | 1667 | return false; |
ysr@777 | 1668 | } |
ysr@777 | 1669 | size_t result() { return _used; } |
ysr@777 | 1670 | }; |
ysr@777 | 1671 | |
ysr@777 | 1672 | size_t G1CollectedHeap::recalculate_used() const { |
ysr@777 | 1673 | SumUsedClosure blk; |
ysr@777 | 1674 | _hrs->iterate(&blk); |
ysr@777 | 1675 | return blk.result(); |
ysr@777 | 1676 | } |
ysr@777 | 1677 | |
ysr@777 | 1678 | #ifndef PRODUCT |
ysr@777 | 1679 | class SumUsedRegionsClosure: public HeapRegionClosure { |
ysr@777 | 1680 | size_t _num; |
ysr@777 | 1681 | public: |
apetrusenko@1112 | 1682 | SumUsedRegionsClosure() : _num(0) {} |
ysr@777 | 1683 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 1684 | if (r->continuesHumongous() || r->used() > 0 || r->is_gc_alloc_region()) { |
ysr@777 | 1685 | _num += 1; |
ysr@777 | 1686 | } |
ysr@777 | 1687 | return false; |
ysr@777 | 1688 | } |
ysr@777 | 1689 | size_t result() { return _num; } |
ysr@777 | 1690 | }; |
ysr@777 | 1691 | |
ysr@777 | 1692 | size_t G1CollectedHeap::recalculate_used_regions() const { |
ysr@777 | 1693 | SumUsedRegionsClosure blk; |
ysr@777 | 1694 | _hrs->iterate(&blk); |
ysr@777 | 1695 | return blk.result(); |
ysr@777 | 1696 | } |
ysr@777 | 1697 | #endif // PRODUCT |
ysr@777 | 1698 | |
ysr@777 | 1699 | size_t G1CollectedHeap::unsafe_max_alloc() { |
ysr@777 | 1700 | if (_free_regions > 0) return HeapRegion::GrainBytes; |
ysr@777 | 1701 | // otherwise, is there space in the current allocation region? |
ysr@777 | 1702 | |
ysr@777 | 1703 | // We need to store the current allocation region in a local variable |
ysr@777 | 1704 | // here. The problem is that this method doesn't take any locks and |
ysr@777 | 1705 | // there may be other threads which overwrite the current allocation |
ysr@777 | 1706 | // region field. attempt_allocation(), for example, sets it to NULL |
ysr@777 | 1707 | // and this can happen *after* the NULL check here but before the call |
ysr@777 | 1708 | // to free(), resulting in a SIGSEGV. Note that this doesn't appear |
ysr@777 | 1709 | // to be a problem in the optimized build, since the two loads of the |
ysr@777 | 1710 | // current allocation region field are optimized away. |
ysr@777 | 1711 | HeapRegion* car = _cur_alloc_region; |
ysr@777 | 1712 | |
ysr@777 | 1713 | // FIXME: should iterate over all regions? |
ysr@777 | 1714 | if (car == NULL) { |
ysr@777 | 1715 | return 0; |
ysr@777 | 1716 | } |
ysr@777 | 1717 | return car->free(); |
ysr@777 | 1718 | } |
ysr@777 | 1719 | |
tonyp@2011 | 1720 | bool G1CollectedHeap::should_do_concurrent_full_gc(GCCause::Cause cause) { |
tonyp@2011 | 1721 | return |
tonyp@2011 | 1722 | ((cause == GCCause::_gc_locker && GCLockerInvokesConcurrent) || |
tonyp@2011 | 1723 | (cause == GCCause::_java_lang_system_gc && ExplicitGCInvokesConcurrent)); |
tonyp@2011 | 1724 | } |
tonyp@2011 | 1725 | |
tonyp@2011 | 1726 | void G1CollectedHeap::increment_full_collections_completed(bool outer) { |
tonyp@2011 | 1727 | MonitorLockerEx x(FullGCCount_lock, Mutex::_no_safepoint_check_flag); |
tonyp@2011 | 1728 | |
tonyp@2011 | 1729 | // We have already incremented _total_full_collections at the start |
tonyp@2011 | 1730 | // of the GC, so total_full_collections() represents how many full |
tonyp@2011 | 1731 | // collections have been started. |
tonyp@2011 | 1732 | unsigned int full_collections_started = total_full_collections(); |
tonyp@2011 | 1733 | |
tonyp@2011 | 1734 | // Given that this method is called at the end of a Full GC or of a |
tonyp@2011 | 1735 | // concurrent cycle, and those can be nested (i.e., a Full GC can |
tonyp@2011 | 1736 | // interrupt a concurrent cycle), the number of full collections |
tonyp@2011 | 1737 | // completed should be either one (in the case where there was no |
tonyp@2011 | 1738 | // nesting) or two (when a Full GC interrupted a concurrent cycle) |
tonyp@2011 | 1739 | // behind the number of full collections started. |
tonyp@2011 | 1740 | |
tonyp@2011 | 1741 | // This is the case for the inner caller, i.e. a Full GC. |
tonyp@2011 | 1742 | assert(outer || |
tonyp@2011 | 1743 | (full_collections_started == _full_collections_completed + 1) || |
tonyp@2011 | 1744 | (full_collections_started == _full_collections_completed + 2), |
tonyp@2011 | 1745 | err_msg("for inner caller: full_collections_started = %u " |
tonyp@2011 | 1746 | "is inconsistent with _full_collections_completed = %u", |
tonyp@2011 | 1747 | full_collections_started, _full_collections_completed)); |
tonyp@2011 | 1748 | |
tonyp@2011 | 1749 | // This is the case for the outer caller, i.e. the concurrent cycle. |
tonyp@2011 | 1750 | assert(!outer || |
tonyp@2011 | 1751 | (full_collections_started == _full_collections_completed + 1), |
tonyp@2011 | 1752 | err_msg("for outer caller: full_collections_started = %u " |
tonyp@2011 | 1753 | "is inconsistent with _full_collections_completed = %u", |
tonyp@2011 | 1754 | full_collections_started, _full_collections_completed)); |
tonyp@2011 | 1755 | |
tonyp@2011 | 1756 | _full_collections_completed += 1; |
tonyp@2011 | 1757 | |
tonyp@2011 | 1758 | // This notify_all() will ensure that a thread that called |
tonyp@2011 | 1759 | // System.gc() with (with ExplicitGCInvokesConcurrent set or not) |
tonyp@2011 | 1760 | // and it's waiting for a full GC to finish will be woken up. It is |
tonyp@2011 | 1761 | // waiting in VM_G1IncCollectionPause::doit_epilogue(). |
tonyp@2011 | 1762 | FullGCCount_lock->notify_all(); |
tonyp@2011 | 1763 | } |
tonyp@2011 | 1764 | |
ysr@777 | 1765 | void G1CollectedHeap::collect_as_vm_thread(GCCause::Cause cause) { |
ysr@777 | 1766 | assert(Thread::current()->is_VM_thread(), "Precondition#1"); |
ysr@777 | 1767 | assert(Heap_lock->is_locked(), "Precondition#2"); |
ysr@777 | 1768 | GCCauseSetter gcs(this, cause); |
ysr@777 | 1769 | switch (cause) { |
ysr@777 | 1770 | case GCCause::_heap_inspection: |
ysr@777 | 1771 | case GCCause::_heap_dump: { |
ysr@777 | 1772 | HandleMark hm; |
ysr@777 | 1773 | do_full_collection(false); // don't clear all soft refs |
ysr@777 | 1774 | break; |
ysr@777 | 1775 | } |
ysr@777 | 1776 | default: // XXX FIX ME |
ysr@777 | 1777 | ShouldNotReachHere(); // Unexpected use of this function |
ysr@777 | 1778 | } |
ysr@777 | 1779 | } |
ysr@777 | 1780 | |
ysr@1523 | 1781 | void G1CollectedHeap::collect(GCCause::Cause cause) { |
ysr@1523 | 1782 | // The caller doesn't have the Heap_lock |
ysr@1523 | 1783 | assert(!Heap_lock->owned_by_self(), "this thread should not own the Heap_lock"); |
ysr@1523 | 1784 | |
tonyp@2011 | 1785 | unsigned int gc_count_before; |
tonyp@2011 | 1786 | unsigned int full_gc_count_before; |
ysr@777 | 1787 | { |
ysr@1523 | 1788 | MutexLocker ml(Heap_lock); |
ysr@1523 | 1789 | // Read the GC count while holding the Heap_lock |
ysr@1523 | 1790 | gc_count_before = SharedHeap::heap()->total_collections(); |
tonyp@2011 | 1791 | full_gc_count_before = SharedHeap::heap()->total_full_collections(); |
ysr@1523 | 1792 | |
ysr@1523 | 1793 | // Don't want to do a GC until cleanup is completed. |
ysr@1523 | 1794 | wait_for_cleanup_complete(); |
tonyp@2011 | 1795 | |
tonyp@2011 | 1796 | // We give up heap lock; VMThread::execute gets it back below |
tonyp@2011 | 1797 | } |
tonyp@2011 | 1798 | |
tonyp@2011 | 1799 | if (should_do_concurrent_full_gc(cause)) { |
tonyp@2011 | 1800 | // Schedule an initial-mark evacuation pause that will start a |
tonyp@2011 | 1801 | // concurrent cycle. |
tonyp@2011 | 1802 | VM_G1IncCollectionPause op(gc_count_before, |
tonyp@2011 | 1803 | true, /* should_initiate_conc_mark */ |
tonyp@2011 | 1804 | g1_policy()->max_pause_time_ms(), |
tonyp@2011 | 1805 | cause); |
tonyp@2011 | 1806 | VMThread::execute(&op); |
tonyp@2011 | 1807 | } else { |
tonyp@2011 | 1808 | if (cause == GCCause::_gc_locker |
tonyp@2011 | 1809 | DEBUG_ONLY(|| cause == GCCause::_scavenge_alot)) { |
tonyp@2011 | 1810 | |
tonyp@2011 | 1811 | // Schedule a standard evacuation pause. |
tonyp@2011 | 1812 | VM_G1IncCollectionPause op(gc_count_before, |
tonyp@2011 | 1813 | false, /* should_initiate_conc_mark */ |
tonyp@2011 | 1814 | g1_policy()->max_pause_time_ms(), |
tonyp@2011 | 1815 | cause); |
ysr@1523 | 1816 | VMThread::execute(&op); |
tonyp@2011 | 1817 | } else { |
tonyp@2011 | 1818 | // Schedule a Full GC. |
tonyp@2011 | 1819 | VM_G1CollectFull op(gc_count_before, full_gc_count_before, cause); |
ysr@1523 | 1820 | VMThread::execute(&op); |
ysr@1523 | 1821 | } |
ysr@777 | 1822 | } |
ysr@777 | 1823 | } |
ysr@777 | 1824 | |
ysr@777 | 1825 | bool G1CollectedHeap::is_in(const void* p) const { |
ysr@777 | 1826 | if (_g1_committed.contains(p)) { |
ysr@777 | 1827 | HeapRegion* hr = _hrs->addr_to_region(p); |
ysr@777 | 1828 | return hr->is_in(p); |
ysr@777 | 1829 | } else { |
ysr@777 | 1830 | return _perm_gen->as_gen()->is_in(p); |
ysr@777 | 1831 | } |
ysr@777 | 1832 | } |
ysr@777 | 1833 | |
ysr@777 | 1834 | // Iteration functions. |
ysr@777 | 1835 | |
ysr@777 | 1836 | // Iterates an OopClosure over all ref-containing fields of objects |
ysr@777 | 1837 | // within a HeapRegion. |
ysr@777 | 1838 | |
ysr@777 | 1839 | class IterateOopClosureRegionClosure: public HeapRegionClosure { |
ysr@777 | 1840 | MemRegion _mr; |
ysr@777 | 1841 | OopClosure* _cl; |
ysr@777 | 1842 | public: |
ysr@777 | 1843 | IterateOopClosureRegionClosure(MemRegion mr, OopClosure* cl) |
ysr@777 | 1844 | : _mr(mr), _cl(cl) {} |
ysr@777 | 1845 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 1846 | if (! r->continuesHumongous()) { |
ysr@777 | 1847 | r->oop_iterate(_cl); |
ysr@777 | 1848 | } |
ysr@777 | 1849 | return false; |
ysr@777 | 1850 | } |
ysr@777 | 1851 | }; |
ysr@777 | 1852 | |
iveresov@1113 | 1853 | void G1CollectedHeap::oop_iterate(OopClosure* cl, bool do_perm) { |
ysr@777 | 1854 | IterateOopClosureRegionClosure blk(_g1_committed, cl); |
ysr@777 | 1855 | _hrs->iterate(&blk); |
iveresov@1113 | 1856 | if (do_perm) { |
iveresov@1113 | 1857 | perm_gen()->oop_iterate(cl); |
iveresov@1113 | 1858 | } |
ysr@777 | 1859 | } |
ysr@777 | 1860 | |
iveresov@1113 | 1861 | void G1CollectedHeap::oop_iterate(MemRegion mr, OopClosure* cl, bool do_perm) { |
ysr@777 | 1862 | IterateOopClosureRegionClosure blk(mr, cl); |
ysr@777 | 1863 | _hrs->iterate(&blk); |
iveresov@1113 | 1864 | if (do_perm) { |
iveresov@1113 | 1865 | perm_gen()->oop_iterate(cl); |
iveresov@1113 | 1866 | } |
ysr@777 | 1867 | } |
ysr@777 | 1868 | |
ysr@777 | 1869 | // Iterates an ObjectClosure over all objects within a HeapRegion. |
ysr@777 | 1870 | |
ysr@777 | 1871 | class IterateObjectClosureRegionClosure: public HeapRegionClosure { |
ysr@777 | 1872 | ObjectClosure* _cl; |
ysr@777 | 1873 | public: |
ysr@777 | 1874 | IterateObjectClosureRegionClosure(ObjectClosure* cl) : _cl(cl) {} |
ysr@777 | 1875 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 1876 | if (! r->continuesHumongous()) { |
ysr@777 | 1877 | r->object_iterate(_cl); |
ysr@777 | 1878 | } |
ysr@777 | 1879 | return false; |
ysr@777 | 1880 | } |
ysr@777 | 1881 | }; |
ysr@777 | 1882 | |
iveresov@1113 | 1883 | void G1CollectedHeap::object_iterate(ObjectClosure* cl, bool do_perm) { |
ysr@777 | 1884 | IterateObjectClosureRegionClosure blk(cl); |
ysr@777 | 1885 | _hrs->iterate(&blk); |
iveresov@1113 | 1886 | if (do_perm) { |
iveresov@1113 | 1887 | perm_gen()->object_iterate(cl); |
iveresov@1113 | 1888 | } |
ysr@777 | 1889 | } |
ysr@777 | 1890 | |
ysr@777 | 1891 | void G1CollectedHeap::object_iterate_since_last_GC(ObjectClosure* cl) { |
ysr@777 | 1892 | // FIXME: is this right? |
ysr@777 | 1893 | guarantee(false, "object_iterate_since_last_GC not supported by G1 heap"); |
ysr@777 | 1894 | } |
ysr@777 | 1895 | |
ysr@777 | 1896 | // Calls a SpaceClosure on a HeapRegion. |
ysr@777 | 1897 | |
ysr@777 | 1898 | class SpaceClosureRegionClosure: public HeapRegionClosure { |
ysr@777 | 1899 | SpaceClosure* _cl; |
ysr@777 | 1900 | public: |
ysr@777 | 1901 | SpaceClosureRegionClosure(SpaceClosure* cl) : _cl(cl) {} |
ysr@777 | 1902 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 1903 | _cl->do_space(r); |
ysr@777 | 1904 | return false; |
ysr@777 | 1905 | } |
ysr@777 | 1906 | }; |
ysr@777 | 1907 | |
ysr@777 | 1908 | void G1CollectedHeap::space_iterate(SpaceClosure* cl) { |
ysr@777 | 1909 | SpaceClosureRegionClosure blk(cl); |
ysr@777 | 1910 | _hrs->iterate(&blk); |
ysr@777 | 1911 | } |
ysr@777 | 1912 | |
ysr@777 | 1913 | void G1CollectedHeap::heap_region_iterate(HeapRegionClosure* cl) { |
ysr@777 | 1914 | _hrs->iterate(cl); |
ysr@777 | 1915 | } |
ysr@777 | 1916 | |
ysr@777 | 1917 | void G1CollectedHeap::heap_region_iterate_from(HeapRegion* r, |
ysr@777 | 1918 | HeapRegionClosure* cl) { |
ysr@777 | 1919 | _hrs->iterate_from(r, cl); |
ysr@777 | 1920 | } |
ysr@777 | 1921 | |
ysr@777 | 1922 | void |
ysr@777 | 1923 | G1CollectedHeap::heap_region_iterate_from(int idx, HeapRegionClosure* cl) { |
ysr@777 | 1924 | _hrs->iterate_from(idx, cl); |
ysr@777 | 1925 | } |
ysr@777 | 1926 | |
ysr@777 | 1927 | HeapRegion* G1CollectedHeap::region_at(size_t idx) { return _hrs->at(idx); } |
ysr@777 | 1928 | |
ysr@777 | 1929 | void |
ysr@777 | 1930 | G1CollectedHeap::heap_region_par_iterate_chunked(HeapRegionClosure* cl, |
ysr@777 | 1931 | int worker, |
ysr@777 | 1932 | jint claim_value) { |
tonyp@790 | 1933 | const size_t regions = n_regions(); |
tonyp@790 | 1934 | const size_t worker_num = (ParallelGCThreads > 0 ? ParallelGCThreads : 1); |
tonyp@790 | 1935 | // try to spread out the starting points of the workers |
tonyp@790 | 1936 | const size_t start_index = regions / worker_num * (size_t) worker; |
tonyp@790 | 1937 | |
tonyp@790 | 1938 | // each worker will actually look at all regions |
tonyp@790 | 1939 | for (size_t count = 0; count < regions; ++count) { |
tonyp@790 | 1940 | const size_t index = (start_index + count) % regions; |
tonyp@790 | 1941 | assert(0 <= index && index < regions, "sanity"); |
tonyp@790 | 1942 | HeapRegion* r = region_at(index); |
tonyp@790 | 1943 | // we'll ignore "continues humongous" regions (we'll process them |
tonyp@790 | 1944 | // when we come across their corresponding "start humongous" |
tonyp@790 | 1945 | // region) and regions already claimed |
tonyp@790 | 1946 | if (r->claim_value() == claim_value || r->continuesHumongous()) { |
tonyp@790 | 1947 | continue; |
tonyp@790 | 1948 | } |
tonyp@790 | 1949 | // OK, try to claim it |
ysr@777 | 1950 | if (r->claimHeapRegion(claim_value)) { |
tonyp@790 | 1951 | // success! |
tonyp@790 | 1952 | assert(!r->continuesHumongous(), "sanity"); |
tonyp@790 | 1953 | if (r->startsHumongous()) { |
tonyp@790 | 1954 | // If the region is "starts humongous" we'll iterate over its |
tonyp@790 | 1955 | // "continues humongous" first; in fact we'll do them |
tonyp@790 | 1956 | // first. The order is important. In on case, calling the |
tonyp@790 | 1957 | // closure on the "starts humongous" region might de-allocate |
tonyp@790 | 1958 | // and clear all its "continues humongous" regions and, as a |
tonyp@790 | 1959 | // result, we might end up processing them twice. So, we'll do |
tonyp@790 | 1960 | // them first (notice: most closures will ignore them anyway) and |
tonyp@790 | 1961 | // then we'll do the "starts humongous" region. |
tonyp@790 | 1962 | for (size_t ch_index = index + 1; ch_index < regions; ++ch_index) { |
tonyp@790 | 1963 | HeapRegion* chr = region_at(ch_index); |
tonyp@790 | 1964 | |
tonyp@790 | 1965 | // if the region has already been claimed or it's not |
tonyp@790 | 1966 | // "continues humongous" we're done |
tonyp@790 | 1967 | if (chr->claim_value() == claim_value || |
tonyp@790 | 1968 | !chr->continuesHumongous()) { |
tonyp@790 | 1969 | break; |
tonyp@790 | 1970 | } |
tonyp@790 | 1971 | |
tonyp@790 | 1972 | // Noone should have claimed it directly. We can given |
tonyp@790 | 1973 | // that we claimed its "starts humongous" region. |
tonyp@790 | 1974 | assert(chr->claim_value() != claim_value, "sanity"); |
tonyp@790 | 1975 | assert(chr->humongous_start_region() == r, "sanity"); |
tonyp@790 | 1976 | |
tonyp@790 | 1977 | if (chr->claimHeapRegion(claim_value)) { |
tonyp@790 | 1978 | // we should always be able to claim it; noone else should |
tonyp@790 | 1979 | // be trying to claim this region |
tonyp@790 | 1980 | |
tonyp@790 | 1981 | bool res2 = cl->doHeapRegion(chr); |
tonyp@790 | 1982 | assert(!res2, "Should not abort"); |
tonyp@790 | 1983 | |
tonyp@790 | 1984 | // Right now, this holds (i.e., no closure that actually |
tonyp@790 | 1985 | // does something with "continues humongous" regions |
tonyp@790 | 1986 | // clears them). We might have to weaken it in the future, |
tonyp@790 | 1987 | // but let's leave these two asserts here for extra safety. |
tonyp@790 | 1988 | assert(chr->continuesHumongous(), "should still be the case"); |
tonyp@790 | 1989 | assert(chr->humongous_start_region() == r, "sanity"); |
tonyp@790 | 1990 | } else { |
tonyp@790 | 1991 | guarantee(false, "we should not reach here"); |
tonyp@790 | 1992 | } |
tonyp@790 | 1993 | } |
tonyp@790 | 1994 | } |
tonyp@790 | 1995 | |
tonyp@790 | 1996 | assert(!r->continuesHumongous(), "sanity"); |
tonyp@790 | 1997 | bool res = cl->doHeapRegion(r); |
tonyp@790 | 1998 | assert(!res, "Should not abort"); |
tonyp@790 | 1999 | } |
tonyp@790 | 2000 | } |
tonyp@790 | 2001 | } |
tonyp@790 | 2002 | |
tonyp@825 | 2003 | class ResetClaimValuesClosure: public HeapRegionClosure { |
tonyp@825 | 2004 | public: |
tonyp@825 | 2005 | bool doHeapRegion(HeapRegion* r) { |
tonyp@825 | 2006 | r->set_claim_value(HeapRegion::InitialClaimValue); |
tonyp@825 | 2007 | return false; |
tonyp@825 | 2008 | } |
tonyp@825 | 2009 | }; |
tonyp@825 | 2010 | |
tonyp@825 | 2011 | void |
tonyp@825 | 2012 | G1CollectedHeap::reset_heap_region_claim_values() { |
tonyp@825 | 2013 | ResetClaimValuesClosure blk; |
tonyp@825 | 2014 | heap_region_iterate(&blk); |
tonyp@825 | 2015 | } |
tonyp@825 | 2016 | |
tonyp@790 | 2017 | #ifdef ASSERT |
tonyp@790 | 2018 | // This checks whether all regions in the heap have the correct claim |
tonyp@790 | 2019 | // value. I also piggy-backed on this a check to ensure that the |
tonyp@790 | 2020 | // humongous_start_region() information on "continues humongous" |
tonyp@790 | 2021 | // regions is correct. |
tonyp@790 | 2022 | |
tonyp@790 | 2023 | class CheckClaimValuesClosure : public HeapRegionClosure { |
tonyp@790 | 2024 | private: |
tonyp@790 | 2025 | jint _claim_value; |
tonyp@790 | 2026 | size_t _failures; |
tonyp@790 | 2027 | HeapRegion* _sh_region; |
tonyp@790 | 2028 | public: |
tonyp@790 | 2029 | CheckClaimValuesClosure(jint claim_value) : |
tonyp@790 | 2030 | _claim_value(claim_value), _failures(0), _sh_region(NULL) { } |
tonyp@790 | 2031 | bool doHeapRegion(HeapRegion* r) { |
tonyp@790 | 2032 | if (r->claim_value() != _claim_value) { |
tonyp@790 | 2033 | gclog_or_tty->print_cr("Region ["PTR_FORMAT","PTR_FORMAT"), " |
tonyp@790 | 2034 | "claim value = %d, should be %d", |
tonyp@790 | 2035 | r->bottom(), r->end(), r->claim_value(), |
tonyp@790 | 2036 | _claim_value); |
tonyp@790 | 2037 | ++_failures; |
tonyp@790 | 2038 | } |
tonyp@790 | 2039 | if (!r->isHumongous()) { |
tonyp@790 | 2040 | _sh_region = NULL; |
tonyp@790 | 2041 | } else if (r->startsHumongous()) { |
tonyp@790 | 2042 | _sh_region = r; |
tonyp@790 | 2043 | } else if (r->continuesHumongous()) { |
tonyp@790 | 2044 | if (r->humongous_start_region() != _sh_region) { |
tonyp@790 | 2045 | gclog_or_tty->print_cr("Region ["PTR_FORMAT","PTR_FORMAT"), " |
tonyp@790 | 2046 | "HS = "PTR_FORMAT", should be "PTR_FORMAT, |
tonyp@790 | 2047 | r->bottom(), r->end(), |
tonyp@790 | 2048 | r->humongous_start_region(), |
tonyp@790 | 2049 | _sh_region); |
tonyp@790 | 2050 | ++_failures; |
ysr@777 | 2051 | } |
ysr@777 | 2052 | } |
tonyp@790 | 2053 | return false; |
tonyp@790 | 2054 | } |
tonyp@790 | 2055 | size_t failures() { |
tonyp@790 | 2056 | return _failures; |
tonyp@790 | 2057 | } |
tonyp@790 | 2058 | }; |
tonyp@790 | 2059 | |
tonyp@790 | 2060 | bool G1CollectedHeap::check_heap_region_claim_values(jint claim_value) { |
tonyp@790 | 2061 | CheckClaimValuesClosure cl(claim_value); |
tonyp@790 | 2062 | heap_region_iterate(&cl); |
tonyp@790 | 2063 | return cl.failures() == 0; |
tonyp@790 | 2064 | } |
tonyp@790 | 2065 | #endif // ASSERT |
ysr@777 | 2066 | |
ysr@777 | 2067 | void G1CollectedHeap::collection_set_iterate(HeapRegionClosure* cl) { |
ysr@777 | 2068 | HeapRegion* r = g1_policy()->collection_set(); |
ysr@777 | 2069 | while (r != NULL) { |
ysr@777 | 2070 | HeapRegion* next = r->next_in_collection_set(); |
ysr@777 | 2071 | if (cl->doHeapRegion(r)) { |
ysr@777 | 2072 | cl->incomplete(); |
ysr@777 | 2073 | return; |
ysr@777 | 2074 | } |
ysr@777 | 2075 | r = next; |
ysr@777 | 2076 | } |
ysr@777 | 2077 | } |
ysr@777 | 2078 | |
ysr@777 | 2079 | void G1CollectedHeap::collection_set_iterate_from(HeapRegion* r, |
ysr@777 | 2080 | HeapRegionClosure *cl) { |
tonyp@2011 | 2081 | if (r == NULL) { |
tonyp@2011 | 2082 | // The CSet is empty so there's nothing to do. |
tonyp@2011 | 2083 | return; |
tonyp@2011 | 2084 | } |
tonyp@2011 | 2085 | |
ysr@777 | 2086 | assert(r->in_collection_set(), |
ysr@777 | 2087 | "Start region must be a member of the collection set."); |
ysr@777 | 2088 | HeapRegion* cur = r; |
ysr@777 | 2089 | while (cur != NULL) { |
ysr@777 | 2090 | HeapRegion* next = cur->next_in_collection_set(); |
ysr@777 | 2091 | if (cl->doHeapRegion(cur) && false) { |
ysr@777 | 2092 | cl->incomplete(); |
ysr@777 | 2093 | return; |
ysr@777 | 2094 | } |
ysr@777 | 2095 | cur = next; |
ysr@777 | 2096 | } |
ysr@777 | 2097 | cur = g1_policy()->collection_set(); |
ysr@777 | 2098 | while (cur != r) { |
ysr@777 | 2099 | HeapRegion* next = cur->next_in_collection_set(); |
ysr@777 | 2100 | if (cl->doHeapRegion(cur) && false) { |
ysr@777 | 2101 | cl->incomplete(); |
ysr@777 | 2102 | return; |
ysr@777 | 2103 | } |
ysr@777 | 2104 | cur = next; |
ysr@777 | 2105 | } |
ysr@777 | 2106 | } |
ysr@777 | 2107 | |
ysr@777 | 2108 | CompactibleSpace* G1CollectedHeap::first_compactible_space() { |
ysr@777 | 2109 | return _hrs->length() > 0 ? _hrs->at(0) : NULL; |
ysr@777 | 2110 | } |
ysr@777 | 2111 | |
ysr@777 | 2112 | |
ysr@777 | 2113 | Space* G1CollectedHeap::space_containing(const void* addr) const { |
ysr@777 | 2114 | Space* res = heap_region_containing(addr); |
ysr@777 | 2115 | if (res == NULL) |
ysr@777 | 2116 | res = perm_gen()->space_containing(addr); |
ysr@777 | 2117 | return res; |
ysr@777 | 2118 | } |
ysr@777 | 2119 | |
ysr@777 | 2120 | HeapWord* G1CollectedHeap::block_start(const void* addr) const { |
ysr@777 | 2121 | Space* sp = space_containing(addr); |
ysr@777 | 2122 | if (sp != NULL) { |
ysr@777 | 2123 | return sp->block_start(addr); |
ysr@777 | 2124 | } |
ysr@777 | 2125 | return NULL; |
ysr@777 | 2126 | } |
ysr@777 | 2127 | |
ysr@777 | 2128 | size_t G1CollectedHeap::block_size(const HeapWord* addr) const { |
ysr@777 | 2129 | Space* sp = space_containing(addr); |
ysr@777 | 2130 | assert(sp != NULL, "block_size of address outside of heap"); |
ysr@777 | 2131 | return sp->block_size(addr); |
ysr@777 | 2132 | } |
ysr@777 | 2133 | |
ysr@777 | 2134 | bool G1CollectedHeap::block_is_obj(const HeapWord* addr) const { |
ysr@777 | 2135 | Space* sp = space_containing(addr); |
ysr@777 | 2136 | return sp->block_is_obj(addr); |
ysr@777 | 2137 | } |
ysr@777 | 2138 | |
ysr@777 | 2139 | bool G1CollectedHeap::supports_tlab_allocation() const { |
ysr@777 | 2140 | return true; |
ysr@777 | 2141 | } |
ysr@777 | 2142 | |
ysr@777 | 2143 | size_t G1CollectedHeap::tlab_capacity(Thread* ignored) const { |
ysr@777 | 2144 | return HeapRegion::GrainBytes; |
ysr@777 | 2145 | } |
ysr@777 | 2146 | |
ysr@777 | 2147 | size_t G1CollectedHeap::unsafe_max_tlab_alloc(Thread* ignored) const { |
ysr@777 | 2148 | // Return the remaining space in the cur alloc region, but not less than |
ysr@777 | 2149 | // the min TLAB size. |
johnc@1748 | 2150 | |
johnc@1748 | 2151 | // Also, this value can be at most the humongous object threshold, |
johnc@1748 | 2152 | // since we can't allow tlabs to grow big enough to accomodate |
johnc@1748 | 2153 | // humongous objects. |
johnc@1748 | 2154 | |
johnc@1748 | 2155 | // We need to store the cur alloc region locally, since it might change |
johnc@1748 | 2156 | // between when we test for NULL and when we use it later. |
ysr@777 | 2157 | ContiguousSpace* cur_alloc_space = _cur_alloc_region; |
johnc@1748 | 2158 | size_t max_tlab_size = _humongous_object_threshold_in_words * wordSize; |
johnc@1748 | 2159 | |
ysr@777 | 2160 | if (cur_alloc_space == NULL) { |
johnc@1748 | 2161 | return max_tlab_size; |
ysr@777 | 2162 | } else { |
johnc@1748 | 2163 | return MIN2(MAX2(cur_alloc_space->free(), (size_t)MinTLABSize), |
johnc@1748 | 2164 | max_tlab_size); |
ysr@777 | 2165 | } |
ysr@777 | 2166 | } |
ysr@777 | 2167 | |
ysr@777 | 2168 | HeapWord* G1CollectedHeap::allocate_new_tlab(size_t size) { |
ysr@777 | 2169 | bool dummy; |
ysr@777 | 2170 | return G1CollectedHeap::mem_allocate(size, false, true, &dummy); |
ysr@777 | 2171 | } |
ysr@777 | 2172 | |
ysr@777 | 2173 | bool G1CollectedHeap::allocs_are_zero_filled() { |
ysr@777 | 2174 | return false; |
ysr@777 | 2175 | } |
ysr@777 | 2176 | |
ysr@777 | 2177 | size_t G1CollectedHeap::large_typearray_limit() { |
ysr@777 | 2178 | // FIXME |
ysr@777 | 2179 | return HeapRegion::GrainBytes/HeapWordSize; |
ysr@777 | 2180 | } |
ysr@777 | 2181 | |
ysr@777 | 2182 | size_t G1CollectedHeap::max_capacity() const { |
tonyp@1527 | 2183 | return g1_reserved_obj_bytes(); |
ysr@777 | 2184 | } |
ysr@777 | 2185 | |
ysr@777 | 2186 | jlong G1CollectedHeap::millis_since_last_gc() { |
ysr@777 | 2187 | // assert(false, "NYI"); |
ysr@777 | 2188 | return 0; |
ysr@777 | 2189 | } |
ysr@777 | 2190 | |
ysr@777 | 2191 | |
ysr@777 | 2192 | void G1CollectedHeap::prepare_for_verify() { |
ysr@777 | 2193 | if (SafepointSynchronize::is_at_safepoint() || ! UseTLAB) { |
ysr@777 | 2194 | ensure_parsability(false); |
ysr@777 | 2195 | } |
ysr@777 | 2196 | g1_rem_set()->prepare_for_verify(); |
ysr@777 | 2197 | } |
ysr@777 | 2198 | |
ysr@777 | 2199 | class VerifyLivenessOopClosure: public OopClosure { |
ysr@777 | 2200 | G1CollectedHeap* g1h; |
ysr@777 | 2201 | public: |
ysr@777 | 2202 | VerifyLivenessOopClosure(G1CollectedHeap* _g1h) { |
ysr@777 | 2203 | g1h = _g1h; |
ysr@777 | 2204 | } |
ysr@1280 | 2205 | void do_oop(narrowOop *p) { do_oop_work(p); } |
ysr@1280 | 2206 | void do_oop( oop *p) { do_oop_work(p); } |
ysr@1280 | 2207 | |
ysr@1280 | 2208 | template <class T> void do_oop_work(T *p) { |
ysr@1280 | 2209 | oop obj = oopDesc::load_decode_heap_oop(p); |
ysr@1280 | 2210 | guarantee(obj == NULL || !g1h->is_obj_dead(obj), |
ysr@1280 | 2211 | "Dead object referenced by a not dead object"); |
ysr@777 | 2212 | } |
ysr@777 | 2213 | }; |
ysr@777 | 2214 | |
ysr@777 | 2215 | class VerifyObjsInRegionClosure: public ObjectClosure { |
tonyp@1246 | 2216 | private: |
ysr@777 | 2217 | G1CollectedHeap* _g1h; |
ysr@777 | 2218 | size_t _live_bytes; |
ysr@777 | 2219 | HeapRegion *_hr; |
tonyp@1246 | 2220 | bool _use_prev_marking; |
ysr@777 | 2221 | public: |
tonyp@1246 | 2222 | // use_prev_marking == true -> use "prev" marking information, |
tonyp@1246 | 2223 | // use_prev_marking == false -> use "next" marking information |
tonyp@1246 | 2224 | VerifyObjsInRegionClosure(HeapRegion *hr, bool use_prev_marking) |
tonyp@1246 | 2225 | : _live_bytes(0), _hr(hr), _use_prev_marking(use_prev_marking) { |
ysr@777 | 2226 | _g1h = G1CollectedHeap::heap(); |
ysr@777 | 2227 | } |
ysr@777 | 2228 | void do_object(oop o) { |
ysr@777 | 2229 | VerifyLivenessOopClosure isLive(_g1h); |
ysr@777 | 2230 | assert(o != NULL, "Huh?"); |
tonyp@1246 | 2231 | if (!_g1h->is_obj_dead_cond(o, _use_prev_marking)) { |
ysr@777 | 2232 | o->oop_iterate(&isLive); |
johnc@1824 | 2233 | if (!_hr->obj_allocated_since_prev_marking(o)) { |
johnc@1824 | 2234 | size_t obj_size = o->size(); // Make sure we don't overflow |
johnc@1824 | 2235 | _live_bytes += (obj_size * HeapWordSize); |
johnc@1824 | 2236 | } |
ysr@777 | 2237 | } |
ysr@777 | 2238 | } |
ysr@777 | 2239 | size_t live_bytes() { return _live_bytes; } |
ysr@777 | 2240 | }; |
ysr@777 | 2241 | |
ysr@777 | 2242 | class PrintObjsInRegionClosure : public ObjectClosure { |
ysr@777 | 2243 | HeapRegion *_hr; |
ysr@777 | 2244 | G1CollectedHeap *_g1; |
ysr@777 | 2245 | public: |
ysr@777 | 2246 | PrintObjsInRegionClosure(HeapRegion *hr) : _hr(hr) { |
ysr@777 | 2247 | _g1 = G1CollectedHeap::heap(); |
ysr@777 | 2248 | }; |
ysr@777 | 2249 | |
ysr@777 | 2250 | void do_object(oop o) { |
ysr@777 | 2251 | if (o != NULL) { |
ysr@777 | 2252 | HeapWord *start = (HeapWord *) o; |
ysr@777 | 2253 | size_t word_sz = o->size(); |
ysr@777 | 2254 | gclog_or_tty->print("\nPrinting obj "PTR_FORMAT" of size " SIZE_FORMAT |
ysr@777 | 2255 | " isMarkedPrev %d isMarkedNext %d isAllocSince %d\n", |
ysr@777 | 2256 | (void*) o, word_sz, |
ysr@777 | 2257 | _g1->isMarkedPrev(o), |
ysr@777 | 2258 | _g1->isMarkedNext(o), |
ysr@777 | 2259 | _hr->obj_allocated_since_prev_marking(o)); |
ysr@777 | 2260 | HeapWord *end = start + word_sz; |
ysr@777 | 2261 | HeapWord *cur; |
ysr@777 | 2262 | int *val; |
ysr@777 | 2263 | for (cur = start; cur < end; cur++) { |
ysr@777 | 2264 | val = (int *) cur; |
ysr@777 | 2265 | gclog_or_tty->print("\t "PTR_FORMAT":"PTR_FORMAT"\n", val, *val); |
ysr@777 | 2266 | } |
ysr@777 | 2267 | } |
ysr@777 | 2268 | } |
ysr@777 | 2269 | }; |
ysr@777 | 2270 | |
ysr@777 | 2271 | class VerifyRegionClosure: public HeapRegionClosure { |
tonyp@1246 | 2272 | private: |
ysr@777 | 2273 | bool _allow_dirty; |
tonyp@825 | 2274 | bool _par; |
tonyp@1246 | 2275 | bool _use_prev_marking; |
tonyp@1455 | 2276 | bool _failures; |
tonyp@1246 | 2277 | public: |
tonyp@1246 | 2278 | // use_prev_marking == true -> use "prev" marking information, |
tonyp@1246 | 2279 | // use_prev_marking == false -> use "next" marking information |
tonyp@1246 | 2280 | VerifyRegionClosure(bool allow_dirty, bool par, bool use_prev_marking) |
ysr@1280 | 2281 | : _allow_dirty(allow_dirty), |
ysr@1280 | 2282 | _par(par), |
tonyp@1455 | 2283 | _use_prev_marking(use_prev_marking), |
tonyp@1455 | 2284 | _failures(false) {} |
tonyp@1455 | 2285 | |
tonyp@1455 | 2286 | bool failures() { |
tonyp@1455 | 2287 | return _failures; |
tonyp@1455 | 2288 | } |
ysr@1280 | 2289 | |
ysr@777 | 2290 | bool doHeapRegion(HeapRegion* r) { |
tonyp@825 | 2291 | guarantee(_par || r->claim_value() == HeapRegion::InitialClaimValue, |
tonyp@825 | 2292 | "Should be unclaimed at verify points."); |
iveresov@1072 | 2293 | if (!r->continuesHumongous()) { |
tonyp@1455 | 2294 | bool failures = false; |
tonyp@1455 | 2295 | r->verify(_allow_dirty, _use_prev_marking, &failures); |
tonyp@1455 | 2296 | if (failures) { |
tonyp@1455 | 2297 | _failures = true; |
tonyp@1455 | 2298 | } else { |
tonyp@1455 | 2299 | VerifyObjsInRegionClosure not_dead_yet_cl(r, _use_prev_marking); |
tonyp@1455 | 2300 | r->object_iterate(¬_dead_yet_cl); |
tonyp@1455 | 2301 | if (r->max_live_bytes() < not_dead_yet_cl.live_bytes()) { |
tonyp@1455 | 2302 | gclog_or_tty->print_cr("["PTR_FORMAT","PTR_FORMAT"] " |
tonyp@1455 | 2303 | "max_live_bytes "SIZE_FORMAT" " |
tonyp@1455 | 2304 | "< calculated "SIZE_FORMAT, |
tonyp@1455 | 2305 | r->bottom(), r->end(), |
tonyp@1455 | 2306 | r->max_live_bytes(), |
tonyp@1455 | 2307 | not_dead_yet_cl.live_bytes()); |
tonyp@1455 | 2308 | _failures = true; |
tonyp@1455 | 2309 | } |
tonyp@1455 | 2310 | } |
ysr@777 | 2311 | } |
tonyp@1455 | 2312 | return false; // stop the region iteration if we hit a failure |
ysr@777 | 2313 | } |
ysr@777 | 2314 | }; |
ysr@777 | 2315 | |
ysr@777 | 2316 | class VerifyRootsClosure: public OopsInGenClosure { |
ysr@777 | 2317 | private: |
ysr@777 | 2318 | G1CollectedHeap* _g1h; |
tonyp@1455 | 2319 | bool _use_prev_marking; |
ysr@777 | 2320 | bool _failures; |
ysr@777 | 2321 | public: |
tonyp@1246 | 2322 | // use_prev_marking == true -> use "prev" marking information, |
tonyp@1246 | 2323 | // use_prev_marking == false -> use "next" marking information |
tonyp@1246 | 2324 | VerifyRootsClosure(bool use_prev_marking) : |
ysr@1280 | 2325 | _g1h(G1CollectedHeap::heap()), |
tonyp@1455 | 2326 | _use_prev_marking(use_prev_marking), |
tonyp@1455 | 2327 | _failures(false) { } |
ysr@777 | 2328 | |
ysr@777 | 2329 | bool failures() { return _failures; } |
ysr@777 | 2330 | |
ysr@1280 | 2331 | template <class T> void do_oop_nv(T* p) { |
ysr@1280 | 2332 | T heap_oop = oopDesc::load_heap_oop(p); |
ysr@1280 | 2333 | if (!oopDesc::is_null(heap_oop)) { |
ysr@1280 | 2334 | oop obj = oopDesc::decode_heap_oop_not_null(heap_oop); |
tonyp@1246 | 2335 | if (_g1h->is_obj_dead_cond(obj, _use_prev_marking)) { |
ysr@777 | 2336 | gclog_or_tty->print_cr("Root location "PTR_FORMAT" " |
tonyp@1455 | 2337 | "points to dead obj "PTR_FORMAT, p, (void*) obj); |
ysr@777 | 2338 | obj->print_on(gclog_or_tty); |
ysr@777 | 2339 | _failures = true; |
ysr@777 | 2340 | } |
ysr@777 | 2341 | } |
ysr@777 | 2342 | } |
ysr@1280 | 2343 | |
ysr@1280 | 2344 | void do_oop(oop* p) { do_oop_nv(p); } |
ysr@1280 | 2345 | void do_oop(narrowOop* p) { do_oop_nv(p); } |
ysr@777 | 2346 | }; |
ysr@777 | 2347 | |
tonyp@825 | 2348 | // This is the task used for parallel heap verification. |
tonyp@825 | 2349 | |
tonyp@825 | 2350 | class G1ParVerifyTask: public AbstractGangTask { |
tonyp@825 | 2351 | private: |
tonyp@825 | 2352 | G1CollectedHeap* _g1h; |
tonyp@825 | 2353 | bool _allow_dirty; |
tonyp@1246 | 2354 | bool _use_prev_marking; |
tonyp@1455 | 2355 | bool _failures; |
tonyp@825 | 2356 | |
tonyp@825 | 2357 | public: |
tonyp@1246 | 2358 | // use_prev_marking == true -> use "prev" marking information, |
tonyp@1246 | 2359 | // use_prev_marking == false -> use "next" marking information |
tonyp@1246 | 2360 | G1ParVerifyTask(G1CollectedHeap* g1h, bool allow_dirty, |
tonyp@1246 | 2361 | bool use_prev_marking) : |
tonyp@825 | 2362 | AbstractGangTask("Parallel verify task"), |
ysr@1280 | 2363 | _g1h(g1h), |
ysr@1280 | 2364 | _allow_dirty(allow_dirty), |
tonyp@1455 | 2365 | _use_prev_marking(use_prev_marking), |
tonyp@1455 | 2366 | _failures(false) { } |
tonyp@1455 | 2367 | |
tonyp@1455 | 2368 | bool failures() { |
tonyp@1455 | 2369 | return _failures; |
tonyp@1455 | 2370 | } |
tonyp@825 | 2371 | |
tonyp@825 | 2372 | void work(int worker_i) { |
iveresov@1072 | 2373 | HandleMark hm; |
tonyp@1246 | 2374 | VerifyRegionClosure blk(_allow_dirty, true, _use_prev_marking); |
tonyp@825 | 2375 | _g1h->heap_region_par_iterate_chunked(&blk, worker_i, |
tonyp@825 | 2376 | HeapRegion::ParVerifyClaimValue); |
tonyp@1455 | 2377 | if (blk.failures()) { |
tonyp@1455 | 2378 | _failures = true; |
tonyp@1455 | 2379 | } |
tonyp@825 | 2380 | } |
tonyp@825 | 2381 | }; |
tonyp@825 | 2382 | |
ysr@777 | 2383 | void G1CollectedHeap::verify(bool allow_dirty, bool silent) { |
tonyp@1246 | 2384 | verify(allow_dirty, silent, /* use_prev_marking */ true); |
tonyp@1246 | 2385 | } |
tonyp@1246 | 2386 | |
tonyp@1246 | 2387 | void G1CollectedHeap::verify(bool allow_dirty, |
tonyp@1246 | 2388 | bool silent, |
tonyp@1246 | 2389 | bool use_prev_marking) { |
ysr@777 | 2390 | if (SafepointSynchronize::is_at_safepoint() || ! UseTLAB) { |
ysr@777 | 2391 | if (!silent) { gclog_or_tty->print("roots "); } |
tonyp@1246 | 2392 | VerifyRootsClosure rootsCl(use_prev_marking); |
jrose@1424 | 2393 | CodeBlobToOopClosure blobsCl(&rootsCl, /*do_marking=*/ false); |
jrose@1424 | 2394 | process_strong_roots(true, // activate StrongRootsScope |
jrose@1424 | 2395 | false, |
ysr@777 | 2396 | SharedHeap::SO_AllClasses, |
ysr@777 | 2397 | &rootsCl, |
jrose@1424 | 2398 | &blobsCl, |
ysr@777 | 2399 | &rootsCl); |
tonyp@1455 | 2400 | bool failures = rootsCl.failures(); |
ysr@777 | 2401 | rem_set()->invalidate(perm_gen()->used_region(), false); |
ysr@777 | 2402 | if (!silent) { gclog_or_tty->print("heapRegions "); } |
tonyp@825 | 2403 | if (GCParallelVerificationEnabled && ParallelGCThreads > 1) { |
tonyp@825 | 2404 | assert(check_heap_region_claim_values(HeapRegion::InitialClaimValue), |
tonyp@825 | 2405 | "sanity check"); |
tonyp@825 | 2406 | |
tonyp@1246 | 2407 | G1ParVerifyTask task(this, allow_dirty, use_prev_marking); |
tonyp@825 | 2408 | int n_workers = workers()->total_workers(); |
tonyp@825 | 2409 | set_par_threads(n_workers); |
tonyp@825 | 2410 | workers()->run_task(&task); |
tonyp@825 | 2411 | set_par_threads(0); |
tonyp@1455 | 2412 | if (task.failures()) { |
tonyp@1455 | 2413 | failures = true; |
tonyp@1455 | 2414 | } |
tonyp@825 | 2415 | |
tonyp@825 | 2416 | assert(check_heap_region_claim_values(HeapRegion::ParVerifyClaimValue), |
tonyp@825 | 2417 | "sanity check"); |
tonyp@825 | 2418 | |
tonyp@825 | 2419 | reset_heap_region_claim_values(); |
tonyp@825 | 2420 | |
tonyp@825 | 2421 | assert(check_heap_region_claim_values(HeapRegion::InitialClaimValue), |
tonyp@825 | 2422 | "sanity check"); |
tonyp@825 | 2423 | } else { |
tonyp@1246 | 2424 | VerifyRegionClosure blk(allow_dirty, false, use_prev_marking); |
tonyp@825 | 2425 | _hrs->iterate(&blk); |
tonyp@1455 | 2426 | if (blk.failures()) { |
tonyp@1455 | 2427 | failures = true; |
tonyp@1455 | 2428 | } |
tonyp@825 | 2429 | } |
ysr@777 | 2430 | if (!silent) gclog_or_tty->print("remset "); |
ysr@777 | 2431 | rem_set()->verify(); |
tonyp@1455 | 2432 | |
tonyp@1455 | 2433 | if (failures) { |
tonyp@1455 | 2434 | gclog_or_tty->print_cr("Heap:"); |
tonyp@1455 | 2435 | print_on(gclog_or_tty, true /* extended */); |
tonyp@1455 | 2436 | gclog_or_tty->print_cr(""); |
jcoomes@1902 | 2437 | #ifndef PRODUCT |
tonyp@1479 | 2438 | if (VerifyDuringGC && G1VerifyDuringGCPrintReachable) { |
tonyp@1823 | 2439 | concurrent_mark()->print_reachable("at-verification-failure", |
tonyp@1823 | 2440 | use_prev_marking, false /* all */); |
tonyp@1455 | 2441 | } |
jcoomes@1902 | 2442 | #endif |
tonyp@1455 | 2443 | gclog_or_tty->flush(); |
tonyp@1455 | 2444 | } |
tonyp@1455 | 2445 | guarantee(!failures, "there should not have been any failures"); |
ysr@777 | 2446 | } else { |
ysr@777 | 2447 | if (!silent) gclog_or_tty->print("(SKIPPING roots, heapRegions, remset) "); |
ysr@777 | 2448 | } |
ysr@777 | 2449 | } |
ysr@777 | 2450 | |
ysr@777 | 2451 | class PrintRegionClosure: public HeapRegionClosure { |
ysr@777 | 2452 | outputStream* _st; |
ysr@777 | 2453 | public: |
ysr@777 | 2454 | PrintRegionClosure(outputStream* st) : _st(st) {} |
ysr@777 | 2455 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 2456 | r->print_on(_st); |
ysr@777 | 2457 | return false; |
ysr@777 | 2458 | } |
ysr@777 | 2459 | }; |
ysr@777 | 2460 | |
tonyp@1273 | 2461 | void G1CollectedHeap::print() const { print_on(tty); } |
ysr@777 | 2462 | |
ysr@777 | 2463 | void G1CollectedHeap::print_on(outputStream* st) const { |
tonyp@1273 | 2464 | print_on(st, PrintHeapAtGCExtended); |
tonyp@1273 | 2465 | } |
tonyp@1273 | 2466 | |
tonyp@1273 | 2467 | void G1CollectedHeap::print_on(outputStream* st, bool extended) const { |
tonyp@1273 | 2468 | st->print(" %-20s", "garbage-first heap"); |
tonyp@1273 | 2469 | st->print(" total " SIZE_FORMAT "K, used " SIZE_FORMAT "K", |
tonyp@1281 | 2470 | capacity()/K, used_unlocked()/K); |
tonyp@1273 | 2471 | st->print(" [" INTPTR_FORMAT ", " INTPTR_FORMAT ", " INTPTR_FORMAT ")", |
tonyp@1273 | 2472 | _g1_storage.low_boundary(), |
tonyp@1273 | 2473 | _g1_storage.high(), |
tonyp@1273 | 2474 | _g1_storage.high_boundary()); |
tonyp@1273 | 2475 | st->cr(); |
tonyp@1273 | 2476 | st->print(" region size " SIZE_FORMAT "K, ", |
tonyp@1273 | 2477 | HeapRegion::GrainBytes/K); |
tonyp@1273 | 2478 | size_t young_regions = _young_list->length(); |
tonyp@1273 | 2479 | st->print(SIZE_FORMAT " young (" SIZE_FORMAT "K), ", |
tonyp@1273 | 2480 | young_regions, young_regions * HeapRegion::GrainBytes / K); |
tonyp@1273 | 2481 | size_t survivor_regions = g1_policy()->recorded_survivor_regions(); |
tonyp@1273 | 2482 | st->print(SIZE_FORMAT " survivors (" SIZE_FORMAT "K)", |
tonyp@1273 | 2483 | survivor_regions, survivor_regions * HeapRegion::GrainBytes / K); |
tonyp@1273 | 2484 | st->cr(); |
tonyp@1273 | 2485 | perm()->as_gen()->print_on(st); |
tonyp@1273 | 2486 | if (extended) { |
tonyp@1455 | 2487 | st->cr(); |
tonyp@1273 | 2488 | print_on_extended(st); |
tonyp@1273 | 2489 | } |
tonyp@1273 | 2490 | } |
tonyp@1273 | 2491 | |
tonyp@1273 | 2492 | void G1CollectedHeap::print_on_extended(outputStream* st) const { |
ysr@777 | 2493 | PrintRegionClosure blk(st); |
ysr@777 | 2494 | _hrs->iterate(&blk); |
ysr@777 | 2495 | } |
ysr@777 | 2496 | |
ysr@777 | 2497 | void G1CollectedHeap::print_gc_threads_on(outputStream* st) const { |
ysr@777 | 2498 | if (ParallelGCThreads > 0) { |
tonyp@1454 | 2499 | workers()->print_worker_threads_on(st); |
tonyp@1454 | 2500 | } |
tonyp@1454 | 2501 | |
tonyp@1454 | 2502 | _cmThread->print_on(st); |
ysr@777 | 2503 | st->cr(); |
tonyp@1454 | 2504 | |
tonyp@1454 | 2505 | _cm->print_worker_threads_on(st); |
tonyp@1454 | 2506 | |
tonyp@1454 | 2507 | _cg1r->print_worker_threads_on(st); |
tonyp@1454 | 2508 | |
ysr@777 | 2509 | _czft->print_on(st); |
ysr@777 | 2510 | st->cr(); |
ysr@777 | 2511 | } |
ysr@777 | 2512 | |
ysr@777 | 2513 | void G1CollectedHeap::gc_threads_do(ThreadClosure* tc) const { |
ysr@777 | 2514 | if (ParallelGCThreads > 0) { |
ysr@777 | 2515 | workers()->threads_do(tc); |
ysr@777 | 2516 | } |
ysr@777 | 2517 | tc->do_thread(_cmThread); |
iveresov@1229 | 2518 | _cg1r->threads_do(tc); |
ysr@777 | 2519 | tc->do_thread(_czft); |
ysr@777 | 2520 | } |
ysr@777 | 2521 | |
ysr@777 | 2522 | void G1CollectedHeap::print_tracing_info() const { |
ysr@777 | 2523 | // We'll overload this to mean "trace GC pause statistics." |
ysr@777 | 2524 | if (TraceGen0Time || TraceGen1Time) { |
ysr@777 | 2525 | // The "G1CollectorPolicy" is keeping track of these stats, so delegate |
ysr@777 | 2526 | // to that. |
ysr@777 | 2527 | g1_policy()->print_tracing_info(); |
ysr@777 | 2528 | } |
johnc@1186 | 2529 | if (G1SummarizeRSetStats) { |
ysr@777 | 2530 | g1_rem_set()->print_summary_info(); |
ysr@777 | 2531 | } |
tonyp@1717 | 2532 | if (G1SummarizeConcMark) { |
ysr@777 | 2533 | concurrent_mark()->print_summary_info(); |
ysr@777 | 2534 | } |
johnc@1186 | 2535 | if (G1SummarizeZFStats) { |
ysr@777 | 2536 | ConcurrentZFThread::print_summary_info(); |
ysr@777 | 2537 | } |
ysr@777 | 2538 | g1_policy()->print_yg_surv_rate_info(); |
ysr@777 | 2539 | |
ysr@777 | 2540 | SpecializationStats::print(); |
ysr@777 | 2541 | } |
ysr@777 | 2542 | |
ysr@777 | 2543 | |
ysr@777 | 2544 | int G1CollectedHeap::addr_to_arena_id(void* addr) const { |
ysr@777 | 2545 | HeapRegion* hr = heap_region_containing(addr); |
ysr@777 | 2546 | if (hr == NULL) { |
ysr@777 | 2547 | return 0; |
ysr@777 | 2548 | } else { |
ysr@777 | 2549 | return 1; |
ysr@777 | 2550 | } |
ysr@777 | 2551 | } |
ysr@777 | 2552 | |
ysr@777 | 2553 | G1CollectedHeap* G1CollectedHeap::heap() { |
ysr@777 | 2554 | assert(_sh->kind() == CollectedHeap::G1CollectedHeap, |
ysr@777 | 2555 | "not a garbage-first heap"); |
ysr@777 | 2556 | return _g1h; |
ysr@777 | 2557 | } |
ysr@777 | 2558 | |
ysr@777 | 2559 | void G1CollectedHeap::gc_prologue(bool full /* Ignored */) { |
ysr@1680 | 2560 | // always_do_update_barrier = false; |
ysr@777 | 2561 | assert(InlineCacheBuffer::is_empty(), "should have cleaned up ICBuffer"); |
ysr@777 | 2562 | // Call allocation profiler |
ysr@777 | 2563 | AllocationProfiler::iterate_since_last_gc(); |
ysr@777 | 2564 | // Fill TLAB's and such |
ysr@777 | 2565 | ensure_parsability(true); |
ysr@777 | 2566 | } |
ysr@777 | 2567 | |
ysr@777 | 2568 | void G1CollectedHeap::gc_epilogue(bool full /* Ignored */) { |
ysr@777 | 2569 | // FIXME: what is this about? |
ysr@777 | 2570 | // I'm ignoring the "fill_newgen()" call if "alloc_event_enabled" |
ysr@777 | 2571 | // is set. |
ysr@777 | 2572 | COMPILER2_PRESENT(assert(DerivedPointerTable::is_empty(), |
ysr@777 | 2573 | "derived pointer present")); |
ysr@1680 | 2574 | // always_do_update_barrier = true; |
ysr@777 | 2575 | } |
ysr@777 | 2576 | |
ysr@777 | 2577 | void G1CollectedHeap::do_collection_pause() { |
tonyp@2011 | 2578 | assert(Heap_lock->owned_by_self(), "we assume we'reholding the Heap_lock"); |
tonyp@2011 | 2579 | |
ysr@777 | 2580 | // Read the GC count while holding the Heap_lock |
ysr@777 | 2581 | // we need to do this _before_ wait_for_cleanup_complete(), to |
ysr@777 | 2582 | // ensure that we do not give up the heap lock and potentially |
ysr@777 | 2583 | // pick up the wrong count |
tonyp@2011 | 2584 | unsigned int gc_count_before = SharedHeap::heap()->total_collections(); |
ysr@777 | 2585 | |
ysr@777 | 2586 | // Don't want to do a GC pause while cleanup is being completed! |
ysr@777 | 2587 | wait_for_cleanup_complete(); |
ysr@777 | 2588 | |
ysr@777 | 2589 | g1_policy()->record_stop_world_start(); |
ysr@777 | 2590 | { |
ysr@777 | 2591 | MutexUnlocker mu(Heap_lock); // give up heap lock, execute gets it back |
tonyp@2011 | 2592 | VM_G1IncCollectionPause op(gc_count_before, |
tonyp@2011 | 2593 | false, /* should_initiate_conc_mark */ |
tonyp@2011 | 2594 | g1_policy()->max_pause_time_ms(), |
tonyp@2011 | 2595 | GCCause::_g1_inc_collection_pause); |
ysr@777 | 2596 | VMThread::execute(&op); |
ysr@777 | 2597 | } |
ysr@777 | 2598 | } |
ysr@777 | 2599 | |
ysr@777 | 2600 | void |
ysr@777 | 2601 | G1CollectedHeap::doConcurrentMark() { |
ysr@1280 | 2602 | MutexLockerEx x(CGC_lock, Mutex::_no_safepoint_check_flag); |
ysr@1280 | 2603 | if (!_cmThread->in_progress()) { |
ysr@1280 | 2604 | _cmThread->set_started(); |
ysr@1280 | 2605 | CGC_lock->notify(); |
ysr@777 | 2606 | } |
ysr@777 | 2607 | } |
ysr@777 | 2608 | |
ysr@777 | 2609 | class VerifyMarkedObjsClosure: public ObjectClosure { |
ysr@777 | 2610 | G1CollectedHeap* _g1h; |
ysr@777 | 2611 | public: |
ysr@777 | 2612 | VerifyMarkedObjsClosure(G1CollectedHeap* g1h) : _g1h(g1h) {} |
ysr@777 | 2613 | void do_object(oop obj) { |
ysr@777 | 2614 | assert(obj->mark()->is_marked() ? !_g1h->is_obj_dead(obj) : true, |
ysr@777 | 2615 | "markandsweep mark should agree with concurrent deadness"); |
ysr@777 | 2616 | } |
ysr@777 | 2617 | }; |
ysr@777 | 2618 | |
ysr@777 | 2619 | void |
ysr@777 | 2620 | G1CollectedHeap::checkConcurrentMark() { |
ysr@777 | 2621 | VerifyMarkedObjsClosure verifycl(this); |
ysr@777 | 2622 | // MutexLockerEx x(getMarkBitMapLock(), |
ysr@777 | 2623 | // Mutex::_no_safepoint_check_flag); |
iveresov@1113 | 2624 | object_iterate(&verifycl, false); |
ysr@777 | 2625 | } |
ysr@777 | 2626 | |
ysr@777 | 2627 | void G1CollectedHeap::do_sync_mark() { |
ysr@777 | 2628 | _cm->checkpointRootsInitial(); |
ysr@777 | 2629 | _cm->markFromRoots(); |
ysr@777 | 2630 | _cm->checkpointRootsFinal(false); |
ysr@777 | 2631 | } |
ysr@777 | 2632 | |
ysr@777 | 2633 | // <NEW PREDICTION> |
ysr@777 | 2634 | |
ysr@777 | 2635 | double G1CollectedHeap::predict_region_elapsed_time_ms(HeapRegion *hr, |
ysr@777 | 2636 | bool young) { |
ysr@777 | 2637 | return _g1_policy->predict_region_elapsed_time_ms(hr, young); |
ysr@777 | 2638 | } |
ysr@777 | 2639 | |
ysr@777 | 2640 | void G1CollectedHeap::check_if_region_is_too_expensive(double |
ysr@777 | 2641 | predicted_time_ms) { |
ysr@777 | 2642 | _g1_policy->check_if_region_is_too_expensive(predicted_time_ms); |
ysr@777 | 2643 | } |
ysr@777 | 2644 | |
ysr@777 | 2645 | size_t G1CollectedHeap::pending_card_num() { |
ysr@777 | 2646 | size_t extra_cards = 0; |
ysr@777 | 2647 | JavaThread *curr = Threads::first(); |
ysr@777 | 2648 | while (curr != NULL) { |
ysr@777 | 2649 | DirtyCardQueue& dcq = curr->dirty_card_queue(); |
ysr@777 | 2650 | extra_cards += dcq.size(); |
ysr@777 | 2651 | curr = curr->next(); |
ysr@777 | 2652 | } |
ysr@777 | 2653 | DirtyCardQueueSet& dcqs = JavaThread::dirty_card_queue_set(); |
ysr@777 | 2654 | size_t buffer_size = dcqs.buffer_size(); |
ysr@777 | 2655 | size_t buffer_num = dcqs.completed_buffers_num(); |
ysr@777 | 2656 | return buffer_size * buffer_num + extra_cards; |
ysr@777 | 2657 | } |
ysr@777 | 2658 | |
ysr@777 | 2659 | size_t G1CollectedHeap::max_pending_card_num() { |
ysr@777 | 2660 | DirtyCardQueueSet& dcqs = JavaThread::dirty_card_queue_set(); |
ysr@777 | 2661 | size_t buffer_size = dcqs.buffer_size(); |
ysr@777 | 2662 | size_t buffer_num = dcqs.completed_buffers_num(); |
ysr@777 | 2663 | int thread_num = Threads::number_of_threads(); |
ysr@777 | 2664 | return (buffer_num + thread_num) * buffer_size; |
ysr@777 | 2665 | } |
ysr@777 | 2666 | |
ysr@777 | 2667 | size_t G1CollectedHeap::cards_scanned() { |
ysr@777 | 2668 | HRInto_G1RemSet* g1_rset = (HRInto_G1RemSet*) g1_rem_set(); |
ysr@777 | 2669 | return g1_rset->cardsScanned(); |
ysr@777 | 2670 | } |
ysr@777 | 2671 | |
ysr@777 | 2672 | void |
ysr@777 | 2673 | G1CollectedHeap::setup_surviving_young_words() { |
ysr@777 | 2674 | guarantee( _surviving_young_words == NULL, "pre-condition" ); |
ysr@777 | 2675 | size_t array_length = g1_policy()->young_cset_length(); |
ysr@777 | 2676 | _surviving_young_words = NEW_C_HEAP_ARRAY(size_t, array_length); |
ysr@777 | 2677 | if (_surviving_young_words == NULL) { |
ysr@777 | 2678 | vm_exit_out_of_memory(sizeof(size_t) * array_length, |
ysr@777 | 2679 | "Not enough space for young surv words summary."); |
ysr@777 | 2680 | } |
ysr@777 | 2681 | memset(_surviving_young_words, 0, array_length * sizeof(size_t)); |
ysr@1280 | 2682 | #ifdef ASSERT |
ysr@777 | 2683 | for (size_t i = 0; i < array_length; ++i) { |
ysr@1280 | 2684 | assert( _surviving_young_words[i] == 0, "memset above" ); |
ysr@1280 | 2685 | } |
ysr@1280 | 2686 | #endif // !ASSERT |
ysr@777 | 2687 | } |
ysr@777 | 2688 | |
ysr@777 | 2689 | void |
ysr@777 | 2690 | G1CollectedHeap::update_surviving_young_words(size_t* surv_young_words) { |
ysr@777 | 2691 | MutexLockerEx x(ParGCRareEvent_lock, Mutex::_no_safepoint_check_flag); |
ysr@777 | 2692 | size_t array_length = g1_policy()->young_cset_length(); |
ysr@777 | 2693 | for (size_t i = 0; i < array_length; ++i) |
ysr@777 | 2694 | _surviving_young_words[i] += surv_young_words[i]; |
ysr@777 | 2695 | } |
ysr@777 | 2696 | |
ysr@777 | 2697 | void |
ysr@777 | 2698 | G1CollectedHeap::cleanup_surviving_young_words() { |
ysr@777 | 2699 | guarantee( _surviving_young_words != NULL, "pre-condition" ); |
ysr@777 | 2700 | FREE_C_HEAP_ARRAY(size_t, _surviving_young_words); |
ysr@777 | 2701 | _surviving_young_words = NULL; |
ysr@777 | 2702 | } |
ysr@777 | 2703 | |
ysr@777 | 2704 | // </NEW PREDICTION> |
ysr@777 | 2705 | |
iveresov@1696 | 2706 | struct PrepareForRSScanningClosure : public HeapRegionClosure { |
iveresov@1696 | 2707 | bool doHeapRegion(HeapRegion *r) { |
iveresov@1696 | 2708 | r->rem_set()->set_iter_claimed(0); |
iveresov@1696 | 2709 | return false; |
iveresov@1696 | 2710 | } |
iveresov@1696 | 2711 | }; |
iveresov@1696 | 2712 | |
jcoomes@2064 | 2713 | #if TASKQUEUE_STATS |
jcoomes@2064 | 2714 | void G1CollectedHeap::print_taskqueue_stats_hdr(outputStream* const st) { |
jcoomes@2064 | 2715 | st->print_raw_cr("GC Task Stats"); |
jcoomes@2064 | 2716 | st->print_raw("thr "); TaskQueueStats::print_header(1, st); st->cr(); |
jcoomes@2064 | 2717 | st->print_raw("--- "); TaskQueueStats::print_header(2, st); st->cr(); |
jcoomes@2064 | 2718 | } |
jcoomes@2064 | 2719 | |
jcoomes@2064 | 2720 | void G1CollectedHeap::print_taskqueue_stats(outputStream* const st) const { |
jcoomes@2064 | 2721 | print_taskqueue_stats_hdr(st); |
jcoomes@2064 | 2722 | |
jcoomes@2064 | 2723 | TaskQueueStats totals; |
jcoomes@2064 | 2724 | const int n = MAX2(workers()->total_workers(), 1); |
jcoomes@2064 | 2725 | for (int i = 0; i < n; ++i) { |
jcoomes@2064 | 2726 | st->print("%3d ", i); task_queue(i)->stats.print(st); st->cr(); |
jcoomes@2064 | 2727 | totals += task_queue(i)->stats; |
jcoomes@2064 | 2728 | } |
jcoomes@2064 | 2729 | st->print_raw("tot "); totals.print(st); st->cr(); |
jcoomes@2064 | 2730 | |
jcoomes@2064 | 2731 | DEBUG_ONLY(totals.verify()); |
jcoomes@2064 | 2732 | } |
jcoomes@2064 | 2733 | |
jcoomes@2064 | 2734 | void G1CollectedHeap::reset_taskqueue_stats() { |
jcoomes@2064 | 2735 | const int n = MAX2(workers()->total_workers(), 1); |
jcoomes@2064 | 2736 | for (int i = 0; i < n; ++i) { |
jcoomes@2064 | 2737 | task_queue(i)->stats.reset(); |
jcoomes@2064 | 2738 | } |
jcoomes@2064 | 2739 | } |
jcoomes@2064 | 2740 | #endif // TASKQUEUE_STATS |
jcoomes@2064 | 2741 | |
ysr@777 | 2742 | void |
tonyp@2011 | 2743 | G1CollectedHeap::do_collection_pause_at_safepoint(double target_pause_time_ms) { |
tonyp@1794 | 2744 | if (GC_locker::check_active_before_gc()) { |
tonyp@1794 | 2745 | return; // GC is disabled (e.g. JNI GetXXXCritical operation) |
tonyp@1794 | 2746 | } |
tonyp@1794 | 2747 | |
tonyp@1273 | 2748 | if (PrintHeapAtGC) { |
tonyp@1273 | 2749 | Universe::print_heap_before_gc(); |
tonyp@1273 | 2750 | } |
tonyp@1273 | 2751 | |
tonyp@1273 | 2752 | { |
tonyp@1524 | 2753 | ResourceMark rm; |
tonyp@1524 | 2754 | |
tonyp@1794 | 2755 | // This call will decide whether this pause is an initial-mark |
tonyp@1794 | 2756 | // pause. If it is, during_initial_mark_pause() will return true |
tonyp@1794 | 2757 | // for the duration of this pause. |
tonyp@1794 | 2758 | g1_policy()->decide_on_conc_mark_initiation(); |
tonyp@1794 | 2759 | |
tonyp@1273 | 2760 | char verbose_str[128]; |
tonyp@1273 | 2761 | sprintf(verbose_str, "GC pause "); |
tonyp@1273 | 2762 | if (g1_policy()->in_young_gc_mode()) { |
tonyp@1273 | 2763 | if (g1_policy()->full_young_gcs()) |
tonyp@1273 | 2764 | strcat(verbose_str, "(young)"); |
tonyp@1273 | 2765 | else |
tonyp@1273 | 2766 | strcat(verbose_str, "(partial)"); |
tonyp@1273 | 2767 | } |
tonyp@2011 | 2768 | if (g1_policy()->during_initial_mark_pause()) { |
tonyp@1273 | 2769 | strcat(verbose_str, " (initial-mark)"); |
tonyp@2011 | 2770 | // We are about to start a marking cycle, so we increment the |
tonyp@2011 | 2771 | // full collection counter. |
tonyp@2011 | 2772 | increment_total_full_collections(); |
tonyp@2011 | 2773 | } |
tonyp@1273 | 2774 | |
tonyp@1273 | 2775 | // if PrintGCDetails is on, we'll print long statistics information |
tonyp@1273 | 2776 | // in the collector policy code, so let's not print this as the output |
tonyp@1273 | 2777 | // is messy if we do. |
tonyp@1273 | 2778 | gclog_or_tty->date_stamp(PrintGC && PrintGCDateStamps); |
tonyp@1273 | 2779 | TraceCPUTime tcpu(PrintGCDetails, true, gclog_or_tty); |
tonyp@1273 | 2780 | TraceTime t(verbose_str, PrintGC && !PrintGCDetails, true, gclog_or_tty); |
tonyp@1273 | 2781 | |
tonyp@1524 | 2782 | TraceMemoryManagerStats tms(false /* fullGC */); |
tonyp@1524 | 2783 | |
tonyp@1273 | 2784 | assert(SafepointSynchronize::is_at_safepoint(), "should be at safepoint"); |
tonyp@1273 | 2785 | assert(Thread::current() == VMThread::vm_thread(), "should be in vm thread"); |
tonyp@1273 | 2786 | guarantee(!is_gc_active(), "collection is not reentrant"); |
tonyp@1273 | 2787 | assert(regions_accounted_for(), "Region leakage!"); |
tonyp@1273 | 2788 | |
tonyp@1273 | 2789 | increment_gc_time_stamp(); |
tonyp@1273 | 2790 | |
tonyp@1273 | 2791 | if (g1_policy()->in_young_gc_mode()) { |
tonyp@1273 | 2792 | assert(check_young_list_well_formed(), |
tonyp@1273 | 2793 | "young list should be well formed"); |
tonyp@1273 | 2794 | } |
tonyp@1273 | 2795 | |
tonyp@1273 | 2796 | { // Call to jvmpi::post_class_unload_events must occur outside of active GC |
tonyp@1273 | 2797 | IsGCActiveMark x; |
tonyp@1273 | 2798 | |
tonyp@1273 | 2799 | gc_prologue(false); |
tonyp@1273 | 2800 | increment_total_collections(false /* full gc */); |
ysr@777 | 2801 | |
ysr@777 | 2802 | #if G1_REM_SET_LOGGING |
tonyp@1273 | 2803 | gclog_or_tty->print_cr("\nJust chose CS, heap:"); |
ysr@777 | 2804 | print(); |
ysr@777 | 2805 | #endif |
ysr@777 | 2806 | |
tonyp@1273 | 2807 | if (VerifyBeforeGC && total_collections() >= VerifyGCStartAt) { |
tonyp@1273 | 2808 | HandleMark hm; // Discard invalid handles created during verification |
tonyp@1273 | 2809 | prepare_for_verify(); |
tonyp@1273 | 2810 | gclog_or_tty->print(" VerifyBeforeGC:"); |
tonyp@1273 | 2811 | Universe::verify(false); |
tonyp@1273 | 2812 | } |
tonyp@1273 | 2813 | |
tonyp@1273 | 2814 | COMPILER2_PRESENT(DerivedPointerTable::clear()); |
tonyp@1273 | 2815 | |
tonyp@1273 | 2816 | // We want to turn off ref discovery, if necessary, and turn it back on |
ysr@1280 | 2817 | // on again later if we do. XXX Dubious: why is discovery disabled? |
tonyp@1273 | 2818 | bool was_enabled = ref_processor()->discovery_enabled(); |
tonyp@1273 | 2819 | if (was_enabled) ref_processor()->disable_discovery(); |
tonyp@1273 | 2820 | |
tonyp@1273 | 2821 | // Forget the current alloc region (we might even choose it to be part |
tonyp@1273 | 2822 | // of the collection set!). |
tonyp@1273 | 2823 | abandon_cur_alloc_region(); |
tonyp@1273 | 2824 | |
tonyp@1273 | 2825 | // The elapsed time induced by the start time below deliberately elides |
tonyp@1273 | 2826 | // the possible verification above. |
tonyp@1273 | 2827 | double start_time_sec = os::elapsedTime(); |
tonyp@1273 | 2828 | size_t start_used_bytes = used(); |
tonyp@1273 | 2829 | |
johnc@1829 | 2830 | #if YOUNG_LIST_VERBOSE |
johnc@1829 | 2831 | gclog_or_tty->print_cr("\nBefore recording pause start.\nYoung_list:"); |
johnc@1829 | 2832 | _young_list->print(); |
johnc@1829 | 2833 | g1_policy()->print_collection_set(g1_policy()->inc_cset_head(), gclog_or_tty); |
johnc@1829 | 2834 | #endif // YOUNG_LIST_VERBOSE |
johnc@1829 | 2835 | |
tonyp@1273 | 2836 | g1_policy()->record_collection_pause_start(start_time_sec, |
tonyp@1273 | 2837 | start_used_bytes); |
tonyp@1273 | 2838 | |
johnc@1829 | 2839 | #if YOUNG_LIST_VERBOSE |
johnc@1829 | 2840 | gclog_or_tty->print_cr("\nAfter recording pause start.\nYoung_list:"); |
tonyp@1273 | 2841 | _young_list->print(); |
johnc@1829 | 2842 | #endif // YOUNG_LIST_VERBOSE |
ysr@777 | 2843 | |
tonyp@1794 | 2844 | if (g1_policy()->during_initial_mark_pause()) { |
tonyp@1273 | 2845 | concurrent_mark()->checkpointRootsInitialPre(); |
ysr@777 | 2846 | } |
tonyp@1273 | 2847 | save_marks(); |
tonyp@1273 | 2848 | |
tonyp@1273 | 2849 | // We must do this before any possible evacuation that should propagate |
tonyp@1273 | 2850 | // marks. |
tonyp@1273 | 2851 | if (mark_in_progress()) { |
tonyp@1273 | 2852 | double start_time_sec = os::elapsedTime(); |
tonyp@1273 | 2853 | |
tonyp@1273 | 2854 | _cm->drainAllSATBBuffers(); |
tonyp@1273 | 2855 | double finish_mark_ms = (os::elapsedTime() - start_time_sec) * 1000.0; |
tonyp@1273 | 2856 | g1_policy()->record_satb_drain_time(finish_mark_ms); |
tonyp@1273 | 2857 | } |
tonyp@1273 | 2858 | // Record the number of elements currently on the mark stack, so we |
tonyp@1273 | 2859 | // only iterate over these. (Since evacuation may add to the mark |
tonyp@1273 | 2860 | // stack, doing more exposes race conditions.) If no mark is in |
tonyp@1273 | 2861 | // progress, this will be zero. |
tonyp@1273 | 2862 | _cm->set_oops_do_bound(); |
tonyp@1273 | 2863 | |
tonyp@1273 | 2864 | assert(regions_accounted_for(), "Region leakage."); |
tonyp@1273 | 2865 | |
tonyp@1273 | 2866 | if (mark_in_progress()) |
tonyp@1273 | 2867 | concurrent_mark()->newCSet(); |
tonyp@1273 | 2868 | |
johnc@1829 | 2869 | #if YOUNG_LIST_VERBOSE |
johnc@1829 | 2870 | gclog_or_tty->print_cr("\nBefore choosing collection set.\nYoung_list:"); |
johnc@1829 | 2871 | _young_list->print(); |
johnc@1829 | 2872 | g1_policy()->print_collection_set(g1_policy()->inc_cset_head(), gclog_or_tty); |
johnc@1829 | 2873 | #endif // YOUNG_LIST_VERBOSE |
johnc@1829 | 2874 | |
tonyp@2062 | 2875 | g1_policy()->choose_collection_set(target_pause_time_ms); |
tonyp@1273 | 2876 | |
tonyp@1273 | 2877 | // Nothing to do if we were unable to choose a collection set. |
tonyp@1273 | 2878 | #if G1_REM_SET_LOGGING |
tonyp@2062 | 2879 | gclog_or_tty->print_cr("\nAfter pause, heap:"); |
tonyp@2062 | 2880 | print(); |
tonyp@1273 | 2881 | #endif |
tonyp@2062 | 2882 | PrepareForRSScanningClosure prepare_for_rs_scan; |
tonyp@2062 | 2883 | collection_set_iterate(&prepare_for_rs_scan); |
tonyp@2062 | 2884 | |
tonyp@2062 | 2885 | setup_surviving_young_words(); |
tonyp@2062 | 2886 | |
tonyp@2062 | 2887 | // Set up the gc allocation regions. |
tonyp@2062 | 2888 | get_gc_alloc_regions(); |
tonyp@2062 | 2889 | |
tonyp@2062 | 2890 | // Actually do the work... |
tonyp@2062 | 2891 | evacuate_collection_set(); |
tonyp@2062 | 2892 | |
tonyp@2062 | 2893 | free_collection_set(g1_policy()->collection_set()); |
tonyp@2062 | 2894 | g1_policy()->clear_collection_set(); |
tonyp@2062 | 2895 | |
tonyp@2062 | 2896 | cleanup_surviving_young_words(); |
tonyp@2062 | 2897 | |
tonyp@2062 | 2898 | // Start a new incremental collection set for the next pause. |
tonyp@2062 | 2899 | g1_policy()->start_incremental_cset_building(); |
tonyp@2062 | 2900 | |
tonyp@2062 | 2901 | // Clear the _cset_fast_test bitmap in anticipation of adding |
tonyp@2062 | 2902 | // regions to the incremental collection set for the next |
tonyp@2062 | 2903 | // evacuation pause. |
tonyp@2062 | 2904 | clear_cset_fast_test(); |
tonyp@2062 | 2905 | |
tonyp@2062 | 2906 | if (g1_policy()->in_young_gc_mode()) { |
tonyp@2062 | 2907 | _young_list->reset_sampled_info(); |
tonyp@2062 | 2908 | |
tonyp@2062 | 2909 | // Don't check the whole heap at this point as the |
tonyp@2062 | 2910 | // GC alloc regions from this pause have been tagged |
tonyp@2062 | 2911 | // as survivors and moved on to the survivor list. |
tonyp@2062 | 2912 | // Survivor regions will fail the !is_young() check. |
tonyp@2062 | 2913 | assert(check_young_list_empty(false /* check_heap */), |
tonyp@2062 | 2914 | "young list should be empty"); |
johnc@1829 | 2915 | |
johnc@1829 | 2916 | #if YOUNG_LIST_VERBOSE |
tonyp@2062 | 2917 | gclog_or_tty->print_cr("Before recording survivors.\nYoung List:"); |
tonyp@2062 | 2918 | _young_list->print(); |
johnc@1829 | 2919 | #endif // YOUNG_LIST_VERBOSE |
tonyp@1273 | 2920 | |
tonyp@2062 | 2921 | g1_policy()->record_survivor_regions(_young_list->survivor_length(), |
tonyp@1273 | 2922 | _young_list->first_survivor_region(), |
tonyp@1273 | 2923 | _young_list->last_survivor_region()); |
johnc@1829 | 2924 | |
tonyp@2062 | 2925 | _young_list->reset_auxilary_lists(); |
tonyp@1273 | 2926 | } |
tonyp@1273 | 2927 | |
tonyp@1273 | 2928 | if (evacuation_failed()) { |
tonyp@1273 | 2929 | _summary_bytes_used = recalculate_used(); |
tonyp@1273 | 2930 | } else { |
tonyp@1273 | 2931 | // The "used" of the the collection set have already been subtracted |
tonyp@1273 | 2932 | // when they were freed. Add in the bytes evacuated. |
tonyp@1273 | 2933 | _summary_bytes_used += g1_policy()->bytes_in_to_space(); |
tonyp@1273 | 2934 | } |
tonyp@1273 | 2935 | |
tonyp@1273 | 2936 | if (g1_policy()->in_young_gc_mode() && |
tonyp@1794 | 2937 | g1_policy()->during_initial_mark_pause()) { |
tonyp@1273 | 2938 | concurrent_mark()->checkpointRootsInitialPost(); |
tonyp@1273 | 2939 | set_marking_started(); |
ysr@1280 | 2940 | // CAUTION: after the doConcurrentMark() call below, |
ysr@1280 | 2941 | // the concurrent marking thread(s) could be running |
ysr@1280 | 2942 | // concurrently with us. Make sure that anything after |
ysr@1280 | 2943 | // this point does not assume that we are the only GC thread |
ysr@1280 | 2944 | // running. Note: of course, the actual marking work will |
ysr@1280 | 2945 | // not start until the safepoint itself is released in |
ysr@1280 | 2946 | // ConcurrentGCThread::safepoint_desynchronize(). |
tonyp@1273 | 2947 | doConcurrentMark(); |
tonyp@1273 | 2948 | } |
tonyp@1273 | 2949 | |
johnc@1829 | 2950 | #if YOUNG_LIST_VERBOSE |
johnc@1829 | 2951 | gclog_or_tty->print_cr("\nEnd of the pause.\nYoung_list:"); |
tonyp@1273 | 2952 | _young_list->print(); |
johnc@1829 | 2953 | g1_policy()->print_collection_set(g1_policy()->inc_cset_head(), gclog_or_tty); |
johnc@1829 | 2954 | #endif // YOUNG_LIST_VERBOSE |
tonyp@1273 | 2955 | |
tonyp@1273 | 2956 | double end_time_sec = os::elapsedTime(); |
tonyp@1273 | 2957 | double pause_time_ms = (end_time_sec - start_time_sec) * MILLIUNITS; |
tonyp@1273 | 2958 | g1_policy()->record_pause_time_ms(pause_time_ms); |
tonyp@2062 | 2959 | g1_policy()->record_collection_pause_end(); |
tonyp@1273 | 2960 | |
tonyp@1273 | 2961 | assert(regions_accounted_for(), "Region leakage."); |
tonyp@1273 | 2962 | |
tonyp@1524 | 2963 | MemoryService::track_memory_usage(); |
tonyp@1524 | 2964 | |
tonyp@1273 | 2965 | if (VerifyAfterGC && total_collections() >= VerifyGCStartAt) { |
tonyp@1273 | 2966 | HandleMark hm; // Discard invalid handles created during verification |
tonyp@1273 | 2967 | gclog_or_tty->print(" VerifyAfterGC:"); |
tonyp@1273 | 2968 | prepare_for_verify(); |
tonyp@1273 | 2969 | Universe::verify(false); |
tonyp@1273 | 2970 | } |
tonyp@1273 | 2971 | |
tonyp@1273 | 2972 | if (was_enabled) ref_processor()->enable_discovery(); |
tonyp@1273 | 2973 | |
tonyp@1273 | 2974 | { |
tonyp@1273 | 2975 | size_t expand_bytes = g1_policy()->expansion_amount(); |
tonyp@1273 | 2976 | if (expand_bytes > 0) { |
tonyp@1273 | 2977 | size_t bytes_before = capacity(); |
tonyp@1273 | 2978 | expand(expand_bytes); |
tonyp@1273 | 2979 | } |
tonyp@1273 | 2980 | } |
tonyp@1273 | 2981 | |
tonyp@1273 | 2982 | if (mark_in_progress()) { |
tonyp@1273 | 2983 | concurrent_mark()->update_g1_committed(); |
tonyp@1273 | 2984 | } |
tonyp@1273 | 2985 | |
tonyp@1273 | 2986 | #ifdef TRACESPINNING |
tonyp@1273 | 2987 | ParallelTaskTerminator::print_termination_counts(); |
tonyp@1273 | 2988 | #endif |
tonyp@1273 | 2989 | |
tonyp@1273 | 2990 | gc_epilogue(false); |
ysr@777 | 2991 | } |
ysr@777 | 2992 | |
tonyp@1273 | 2993 | assert(verify_region_lists(), "Bad region lists."); |
tonyp@1273 | 2994 | |
tonyp@1273 | 2995 | if (ExitAfterGCNum > 0 && total_collections() == ExitAfterGCNum) { |
tonyp@1273 | 2996 | gclog_or_tty->print_cr("Stopping after GC #%d", ExitAfterGCNum); |
tonyp@1273 | 2997 | print_tracing_info(); |
tonyp@1273 | 2998 | vm_exit(-1); |
ysr@777 | 2999 | } |
tonyp@1273 | 3000 | } |
tonyp@1273 | 3001 | |
jcoomes@2064 | 3002 | TASKQUEUE_STATS_ONLY(if (ParallelGCVerbose) print_taskqueue_stats()); |
jcoomes@2064 | 3003 | TASKQUEUE_STATS_ONLY(reset_taskqueue_stats()); |
jcoomes@2064 | 3004 | |
tonyp@1273 | 3005 | if (PrintHeapAtGC) { |
tonyp@1273 | 3006 | Universe::print_heap_after_gc(); |
ysr@777 | 3007 | } |
tonyp@1319 | 3008 | if (G1SummarizeRSetStats && |
tonyp@1319 | 3009 | (G1SummarizeRSetStatsPeriod > 0) && |
tonyp@1319 | 3010 | (total_collections() % G1SummarizeRSetStatsPeriod == 0)) { |
tonyp@1319 | 3011 | g1_rem_set()->print_summary_info(); |
tonyp@1319 | 3012 | } |
ysr@777 | 3013 | } |
ysr@777 | 3014 | |
apetrusenko@1826 | 3015 | size_t G1CollectedHeap::desired_plab_sz(GCAllocPurpose purpose) |
apetrusenko@1826 | 3016 | { |
apetrusenko@1826 | 3017 | size_t gclab_word_size; |
apetrusenko@1826 | 3018 | switch (purpose) { |
apetrusenko@1826 | 3019 | case GCAllocForSurvived: |
apetrusenko@1826 | 3020 | gclab_word_size = YoungPLABSize; |
apetrusenko@1826 | 3021 | break; |
apetrusenko@1826 | 3022 | case GCAllocForTenured: |
apetrusenko@1826 | 3023 | gclab_word_size = OldPLABSize; |
apetrusenko@1826 | 3024 | break; |
apetrusenko@1826 | 3025 | default: |
apetrusenko@1826 | 3026 | assert(false, "unknown GCAllocPurpose"); |
apetrusenko@1826 | 3027 | gclab_word_size = OldPLABSize; |
apetrusenko@1826 | 3028 | break; |
apetrusenko@1826 | 3029 | } |
apetrusenko@1826 | 3030 | return gclab_word_size; |
apetrusenko@1826 | 3031 | } |
apetrusenko@1826 | 3032 | |
apetrusenko@1826 | 3033 | |
ysr@777 | 3034 | void G1CollectedHeap::set_gc_alloc_region(int purpose, HeapRegion* r) { |
ysr@777 | 3035 | assert(purpose >= 0 && purpose < GCAllocPurposeCount, "invalid purpose"); |
tonyp@1071 | 3036 | // make sure we don't call set_gc_alloc_region() multiple times on |
tonyp@1071 | 3037 | // the same region |
tonyp@1071 | 3038 | assert(r == NULL || !r->is_gc_alloc_region(), |
tonyp@1071 | 3039 | "shouldn't already be a GC alloc region"); |
johnc@1795 | 3040 | assert(r == NULL || !r->isHumongous(), |
johnc@1795 | 3041 | "humongous regions shouldn't be used as GC alloc regions"); |
johnc@1795 | 3042 | |
ysr@777 | 3043 | HeapWord* original_top = NULL; |
ysr@777 | 3044 | if (r != NULL) |
ysr@777 | 3045 | original_top = r->top(); |
ysr@777 | 3046 | |
ysr@777 | 3047 | // We will want to record the used space in r as being there before gc. |
ysr@777 | 3048 | // One we install it as a GC alloc region it's eligible for allocation. |
ysr@777 | 3049 | // So record it now and use it later. |
ysr@777 | 3050 | size_t r_used = 0; |
ysr@777 | 3051 | if (r != NULL) { |
ysr@777 | 3052 | r_used = r->used(); |
ysr@777 | 3053 | |
ysr@777 | 3054 | if (ParallelGCThreads > 0) { |
ysr@777 | 3055 | // need to take the lock to guard against two threads calling |
ysr@777 | 3056 | // get_gc_alloc_region concurrently (very unlikely but...) |
ysr@777 | 3057 | MutexLockerEx x(ParGCRareEvent_lock, Mutex::_no_safepoint_check_flag); |
ysr@777 | 3058 | r->save_marks(); |
ysr@777 | 3059 | } |
ysr@777 | 3060 | } |
ysr@777 | 3061 | HeapRegion* old_alloc_region = _gc_alloc_regions[purpose]; |
ysr@777 | 3062 | _gc_alloc_regions[purpose] = r; |
ysr@777 | 3063 | if (old_alloc_region != NULL) { |
ysr@777 | 3064 | // Replace aliases too. |
ysr@777 | 3065 | for (int ap = 0; ap < GCAllocPurposeCount; ++ap) { |
ysr@777 | 3066 | if (_gc_alloc_regions[ap] == old_alloc_region) { |
ysr@777 | 3067 | _gc_alloc_regions[ap] = r; |
ysr@777 | 3068 | } |
ysr@777 | 3069 | } |
ysr@777 | 3070 | } |
ysr@777 | 3071 | if (r != NULL) { |
ysr@777 | 3072 | push_gc_alloc_region(r); |
ysr@777 | 3073 | if (mark_in_progress() && original_top != r->next_top_at_mark_start()) { |
ysr@777 | 3074 | // We are using a region as a GC alloc region after it has been used |
ysr@777 | 3075 | // as a mutator allocation region during the current marking cycle. |
ysr@777 | 3076 | // The mutator-allocated objects are currently implicitly marked, but |
ysr@777 | 3077 | // when we move hr->next_top_at_mark_start() forward at the the end |
ysr@777 | 3078 | // of the GC pause, they won't be. We therefore mark all objects in |
ysr@777 | 3079 | // the "gap". We do this object-by-object, since marking densely |
ysr@777 | 3080 | // does not currently work right with marking bitmap iteration. This |
ysr@777 | 3081 | // means we rely on TLAB filling at the start of pauses, and no |
ysr@777 | 3082 | // "resuscitation" of filled TLAB's. If we want to do this, we need |
ysr@777 | 3083 | // to fix the marking bitmap iteration. |
ysr@777 | 3084 | HeapWord* curhw = r->next_top_at_mark_start(); |
ysr@777 | 3085 | HeapWord* t = original_top; |
ysr@777 | 3086 | |
ysr@777 | 3087 | while (curhw < t) { |
ysr@777 | 3088 | oop cur = (oop)curhw; |
ysr@777 | 3089 | // We'll assume parallel for generality. This is rare code. |
ysr@777 | 3090 | concurrent_mark()->markAndGrayObjectIfNecessary(cur); // can't we just mark them? |
ysr@777 | 3091 | curhw = curhw + cur->size(); |
ysr@777 | 3092 | } |
ysr@777 | 3093 | assert(curhw == t, "Should have parsed correctly."); |
ysr@777 | 3094 | } |
ysr@777 | 3095 | if (G1PolicyVerbose > 1) { |
ysr@777 | 3096 | gclog_or_tty->print("New alloc region ["PTR_FORMAT", "PTR_FORMAT", " PTR_FORMAT") " |
ysr@777 | 3097 | "for survivors:", r->bottom(), original_top, r->end()); |
ysr@777 | 3098 | r->print(); |
ysr@777 | 3099 | } |
ysr@777 | 3100 | g1_policy()->record_before_bytes(r_used); |
ysr@777 | 3101 | } |
ysr@777 | 3102 | } |
ysr@777 | 3103 | |
ysr@777 | 3104 | void G1CollectedHeap::push_gc_alloc_region(HeapRegion* hr) { |
ysr@777 | 3105 | assert(Thread::current()->is_VM_thread() || |
ysr@777 | 3106 | par_alloc_during_gc_lock()->owned_by_self(), "Precondition"); |
ysr@777 | 3107 | assert(!hr->is_gc_alloc_region() && !hr->in_collection_set(), |
ysr@777 | 3108 | "Precondition."); |
ysr@777 | 3109 | hr->set_is_gc_alloc_region(true); |
ysr@777 | 3110 | hr->set_next_gc_alloc_region(_gc_alloc_region_list); |
ysr@777 | 3111 | _gc_alloc_region_list = hr; |
ysr@777 | 3112 | } |
ysr@777 | 3113 | |
ysr@777 | 3114 | #ifdef G1_DEBUG |
ysr@777 | 3115 | class FindGCAllocRegion: public HeapRegionClosure { |
ysr@777 | 3116 | public: |
ysr@777 | 3117 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 3118 | if (r->is_gc_alloc_region()) { |
ysr@777 | 3119 | gclog_or_tty->print_cr("Region %d ["PTR_FORMAT"...] is still a gc_alloc_region.", |
ysr@777 | 3120 | r->hrs_index(), r->bottom()); |
ysr@777 | 3121 | } |
ysr@777 | 3122 | return false; |
ysr@777 | 3123 | } |
ysr@777 | 3124 | }; |
ysr@777 | 3125 | #endif // G1_DEBUG |
ysr@777 | 3126 | |
ysr@777 | 3127 | void G1CollectedHeap::forget_alloc_region_list() { |
ysr@777 | 3128 | assert(Thread::current()->is_VM_thread(), "Precondition"); |
ysr@777 | 3129 | while (_gc_alloc_region_list != NULL) { |
ysr@777 | 3130 | HeapRegion* r = _gc_alloc_region_list; |
ysr@777 | 3131 | assert(r->is_gc_alloc_region(), "Invariant."); |
iveresov@1072 | 3132 | // We need HeapRegion::oops_on_card_seq_iterate_careful() to work on |
iveresov@1072 | 3133 | // newly allocated data in order to be able to apply deferred updates |
iveresov@1072 | 3134 | // before the GC is done for verification purposes (i.e to allow |
iveresov@1072 | 3135 | // G1HRRSFlushLogBuffersOnVerify). It's safe thing to do after the |
iveresov@1072 | 3136 | // collection. |
iveresov@1072 | 3137 | r->ContiguousSpace::set_saved_mark(); |
ysr@777 | 3138 | _gc_alloc_region_list = r->next_gc_alloc_region(); |
ysr@777 | 3139 | r->set_next_gc_alloc_region(NULL); |
ysr@777 | 3140 | r->set_is_gc_alloc_region(false); |
apetrusenko@980 | 3141 | if (r->is_survivor()) { |
apetrusenko@980 | 3142 | if (r->is_empty()) { |
apetrusenko@980 | 3143 | r->set_not_young(); |
apetrusenko@980 | 3144 | } else { |
apetrusenko@980 | 3145 | _young_list->add_survivor_region(r); |
apetrusenko@980 | 3146 | } |
apetrusenko@980 | 3147 | } |
ysr@777 | 3148 | if (r->is_empty()) { |
ysr@777 | 3149 | ++_free_regions; |
ysr@777 | 3150 | } |
ysr@777 | 3151 | } |
ysr@777 | 3152 | #ifdef G1_DEBUG |
ysr@777 | 3153 | FindGCAllocRegion fa; |
ysr@777 | 3154 | heap_region_iterate(&fa); |
ysr@777 | 3155 | #endif // G1_DEBUG |
ysr@777 | 3156 | } |
ysr@777 | 3157 | |
ysr@777 | 3158 | |
ysr@777 | 3159 | bool G1CollectedHeap::check_gc_alloc_regions() { |
ysr@777 | 3160 | // TODO: allocation regions check |
ysr@777 | 3161 | return true; |
ysr@777 | 3162 | } |
ysr@777 | 3163 | |
ysr@777 | 3164 | void G1CollectedHeap::get_gc_alloc_regions() { |
tonyp@1071 | 3165 | // First, let's check that the GC alloc region list is empty (it should) |
tonyp@1071 | 3166 | assert(_gc_alloc_region_list == NULL, "invariant"); |
tonyp@1071 | 3167 | |
ysr@777 | 3168 | for (int ap = 0; ap < GCAllocPurposeCount; ++ap) { |
tonyp@1071 | 3169 | assert(_gc_alloc_regions[ap] == NULL, "invariant"); |
apetrusenko@1296 | 3170 | assert(_gc_alloc_region_counts[ap] == 0, "invariant"); |
tonyp@1071 | 3171 | |
ysr@777 | 3172 | // Create new GC alloc regions. |
tonyp@1071 | 3173 | HeapRegion* alloc_region = _retained_gc_alloc_regions[ap]; |
tonyp@1071 | 3174 | _retained_gc_alloc_regions[ap] = NULL; |
tonyp@1071 | 3175 | |
tonyp@1071 | 3176 | if (alloc_region != NULL) { |
tonyp@1071 | 3177 | assert(_retain_gc_alloc_region[ap], "only way to retain a GC region"); |
tonyp@1071 | 3178 | |
tonyp@1071 | 3179 | // let's make sure that the GC alloc region is not tagged as such |
tonyp@1071 | 3180 | // outside a GC operation |
tonyp@1071 | 3181 | assert(!alloc_region->is_gc_alloc_region(), "sanity"); |
tonyp@1071 | 3182 | |
tonyp@1071 | 3183 | if (alloc_region->in_collection_set() || |
tonyp@1071 | 3184 | alloc_region->top() == alloc_region->end() || |
johnc@1795 | 3185 | alloc_region->top() == alloc_region->bottom() || |
johnc@1795 | 3186 | alloc_region->isHumongous()) { |
johnc@1795 | 3187 | // we will discard the current GC alloc region if |
johnc@1795 | 3188 | // * it's in the collection set (it can happen!), |
johnc@1795 | 3189 | // * it's already full (no point in using it), |
johnc@1795 | 3190 | // * it's empty (this means that it was emptied during |
johnc@1795 | 3191 | // a cleanup and it should be on the free list now), or |
johnc@1795 | 3192 | // * it's humongous (this means that it was emptied |
johnc@1795 | 3193 | // during a cleanup and was added to the free list, but |
johnc@1795 | 3194 | // has been subseqently used to allocate a humongous |
johnc@1795 | 3195 | // object that may be less than the region size). |
tonyp@1071 | 3196 | |
tonyp@1071 | 3197 | alloc_region = NULL; |
tonyp@1071 | 3198 | } |
tonyp@1071 | 3199 | } |
tonyp@1071 | 3200 | |
tonyp@1071 | 3201 | if (alloc_region == NULL) { |
tonyp@1071 | 3202 | // we will get a new GC alloc region |
ysr@777 | 3203 | alloc_region = newAllocRegionWithExpansion(ap, 0); |
apetrusenko@1296 | 3204 | } else { |
apetrusenko@1296 | 3205 | // the region was retained from the last collection |
apetrusenko@1296 | 3206 | ++_gc_alloc_region_counts[ap]; |
tonyp@1823 | 3207 | if (G1PrintHeapRegions) { |
tonyp@1823 | 3208 | gclog_or_tty->print_cr("new alloc region %d:["PTR_FORMAT", "PTR_FORMAT"], " |
tonyp@1823 | 3209 | "top "PTR_FORMAT, |
tonyp@1823 | 3210 | alloc_region->hrs_index(), alloc_region->bottom(), alloc_region->end(), alloc_region->top()); |
tonyp@1823 | 3211 | } |
ysr@777 | 3212 | } |
tonyp@1071 | 3213 | |
ysr@777 | 3214 | if (alloc_region != NULL) { |
tonyp@1071 | 3215 | assert(_gc_alloc_regions[ap] == NULL, "pre-condition"); |
ysr@777 | 3216 | set_gc_alloc_region(ap, alloc_region); |
ysr@777 | 3217 | } |
tonyp@1071 | 3218 | |
tonyp@1071 | 3219 | assert(_gc_alloc_regions[ap] == NULL || |
tonyp@1071 | 3220 | _gc_alloc_regions[ap]->is_gc_alloc_region(), |
tonyp@1071 | 3221 | "the GC alloc region should be tagged as such"); |
tonyp@1071 | 3222 | assert(_gc_alloc_regions[ap] == NULL || |
tonyp@1071 | 3223 | _gc_alloc_regions[ap] == _gc_alloc_region_list, |
tonyp@1071 | 3224 | "the GC alloc region should be the same as the GC alloc list head"); |
ysr@777 | 3225 | } |
ysr@777 | 3226 | // Set alternative regions for allocation purposes that have reached |
tonyp@1071 | 3227 | // their limit. |
ysr@777 | 3228 | for (int ap = 0; ap < GCAllocPurposeCount; ++ap) { |
ysr@777 | 3229 | GCAllocPurpose alt_purpose = g1_policy()->alternative_purpose(ap); |
ysr@777 | 3230 | if (_gc_alloc_regions[ap] == NULL && alt_purpose != ap) { |
ysr@777 | 3231 | _gc_alloc_regions[ap] = _gc_alloc_regions[alt_purpose]; |
ysr@777 | 3232 | } |
ysr@777 | 3233 | } |
ysr@777 | 3234 | assert(check_gc_alloc_regions(), "alloc regions messed up"); |
ysr@777 | 3235 | } |
ysr@777 | 3236 | |
tonyp@1071 | 3237 | void G1CollectedHeap::release_gc_alloc_regions(bool totally) { |
ysr@777 | 3238 | // We keep a separate list of all regions that have been alloc regions in |
tonyp@1071 | 3239 | // the current collection pause. Forget that now. This method will |
tonyp@1071 | 3240 | // untag the GC alloc regions and tear down the GC alloc region |
tonyp@1071 | 3241 | // list. It's desirable that no regions are tagged as GC alloc |
tonyp@1071 | 3242 | // outside GCs. |
ysr@777 | 3243 | forget_alloc_region_list(); |
ysr@777 | 3244 | |
ysr@777 | 3245 | // The current alloc regions contain objs that have survived |
ysr@777 | 3246 | // collection. Make them no longer GC alloc regions. |
ysr@777 | 3247 | for (int ap = 0; ap < GCAllocPurposeCount; ++ap) { |
ysr@777 | 3248 | HeapRegion* r = _gc_alloc_regions[ap]; |
tonyp@1071 | 3249 | _retained_gc_alloc_regions[ap] = NULL; |
apetrusenko@1296 | 3250 | _gc_alloc_region_counts[ap] = 0; |
tonyp@1071 | 3251 | |
tonyp@1071 | 3252 | if (r != NULL) { |
tonyp@1071 | 3253 | // we retain nothing on _gc_alloc_regions between GCs |
tonyp@1071 | 3254 | set_gc_alloc_region(ap, NULL); |
tonyp@1071 | 3255 | |
tonyp@1071 | 3256 | if (r->is_empty()) { |
tonyp@1071 | 3257 | // we didn't actually allocate anything in it; let's just put |
tonyp@1071 | 3258 | // it on the free list |
ysr@777 | 3259 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 3260 | r->set_zero_fill_complete(); |
ysr@777 | 3261 | put_free_region_on_list_locked(r); |
tonyp@1071 | 3262 | } else if (_retain_gc_alloc_region[ap] && !totally) { |
tonyp@1071 | 3263 | // retain it so that we can use it at the beginning of the next GC |
tonyp@1071 | 3264 | _retained_gc_alloc_regions[ap] = r; |
ysr@777 | 3265 | } |
ysr@777 | 3266 | } |
tonyp@1071 | 3267 | } |
tonyp@1071 | 3268 | } |
tonyp@1071 | 3269 | |
tonyp@1071 | 3270 | #ifndef PRODUCT |
tonyp@1071 | 3271 | // Useful for debugging |
tonyp@1071 | 3272 | |
tonyp@1071 | 3273 | void G1CollectedHeap::print_gc_alloc_regions() { |
tonyp@1071 | 3274 | gclog_or_tty->print_cr("GC alloc regions"); |
tonyp@1071 | 3275 | for (int ap = 0; ap < GCAllocPurposeCount; ++ap) { |
tonyp@1071 | 3276 | HeapRegion* r = _gc_alloc_regions[ap]; |
tonyp@1071 | 3277 | if (r == NULL) { |
tonyp@1071 | 3278 | gclog_or_tty->print_cr(" %2d : "PTR_FORMAT, ap, NULL); |
tonyp@1071 | 3279 | } else { |
tonyp@1071 | 3280 | gclog_or_tty->print_cr(" %2d : "PTR_FORMAT" "SIZE_FORMAT, |
tonyp@1071 | 3281 | ap, r->bottom(), r->used()); |
tonyp@1071 | 3282 | } |
tonyp@1071 | 3283 | } |
tonyp@1071 | 3284 | } |
tonyp@1071 | 3285 | #endif // PRODUCT |
ysr@777 | 3286 | |
ysr@777 | 3287 | void G1CollectedHeap::init_for_evac_failure(OopsInHeapRegionClosure* cl) { |
ysr@777 | 3288 | _drain_in_progress = false; |
ysr@777 | 3289 | set_evac_failure_closure(cl); |
ysr@777 | 3290 | _evac_failure_scan_stack = new (ResourceObj::C_HEAP) GrowableArray<oop>(40, true); |
ysr@777 | 3291 | } |
ysr@777 | 3292 | |
ysr@777 | 3293 | void G1CollectedHeap::finalize_for_evac_failure() { |
ysr@777 | 3294 | assert(_evac_failure_scan_stack != NULL && |
ysr@777 | 3295 | _evac_failure_scan_stack->length() == 0, |
ysr@777 | 3296 | "Postcondition"); |
ysr@777 | 3297 | assert(!_drain_in_progress, "Postcondition"); |
apetrusenko@1480 | 3298 | delete _evac_failure_scan_stack; |
ysr@777 | 3299 | _evac_failure_scan_stack = NULL; |
ysr@777 | 3300 | } |
ysr@777 | 3301 | |
ysr@777 | 3302 | |
ysr@777 | 3303 | |
ysr@777 | 3304 | // *** Sequential G1 Evacuation |
ysr@777 | 3305 | |
ysr@777 | 3306 | HeapWord* G1CollectedHeap::allocate_during_gc(GCAllocPurpose purpose, size_t word_size) { |
ysr@777 | 3307 | HeapRegion* alloc_region = _gc_alloc_regions[purpose]; |
ysr@777 | 3308 | // let the caller handle alloc failure |
ysr@777 | 3309 | if (alloc_region == NULL) return NULL; |
ysr@777 | 3310 | assert(isHumongous(word_size) || !alloc_region->isHumongous(), |
ysr@777 | 3311 | "Either the object is humongous or the region isn't"); |
ysr@777 | 3312 | HeapWord* block = alloc_region->allocate(word_size); |
ysr@777 | 3313 | if (block == NULL) { |
ysr@777 | 3314 | block = allocate_during_gc_slow(purpose, alloc_region, false, word_size); |
ysr@777 | 3315 | } |
ysr@777 | 3316 | return block; |
ysr@777 | 3317 | } |
ysr@777 | 3318 | |
ysr@777 | 3319 | class G1IsAliveClosure: public BoolObjectClosure { |
ysr@777 | 3320 | G1CollectedHeap* _g1; |
ysr@777 | 3321 | public: |
ysr@777 | 3322 | G1IsAliveClosure(G1CollectedHeap* g1) : _g1(g1) {} |
ysr@777 | 3323 | void do_object(oop p) { assert(false, "Do not call."); } |
ysr@777 | 3324 | bool do_object_b(oop p) { |
ysr@777 | 3325 | // It is reachable if it is outside the collection set, or is inside |
ysr@777 | 3326 | // and forwarded. |
ysr@777 | 3327 | |
ysr@777 | 3328 | #ifdef G1_DEBUG |
ysr@777 | 3329 | gclog_or_tty->print_cr("is alive "PTR_FORMAT" in CS %d forwarded %d overall %d", |
ysr@777 | 3330 | (void*) p, _g1->obj_in_cs(p), p->is_forwarded(), |
ysr@777 | 3331 | !_g1->obj_in_cs(p) || p->is_forwarded()); |
ysr@777 | 3332 | #endif // G1_DEBUG |
ysr@777 | 3333 | |
ysr@777 | 3334 | return !_g1->obj_in_cs(p) || p->is_forwarded(); |
ysr@777 | 3335 | } |
ysr@777 | 3336 | }; |
ysr@777 | 3337 | |
ysr@777 | 3338 | class G1KeepAliveClosure: public OopClosure { |
ysr@777 | 3339 | G1CollectedHeap* _g1; |
ysr@777 | 3340 | public: |
ysr@777 | 3341 | G1KeepAliveClosure(G1CollectedHeap* g1) : _g1(g1) {} |
ysr@1280 | 3342 | void do_oop(narrowOop* p) { guarantee(false, "Not needed"); } |
ysr@1280 | 3343 | void do_oop( oop* p) { |
ysr@777 | 3344 | oop obj = *p; |
ysr@777 | 3345 | #ifdef G1_DEBUG |
ysr@777 | 3346 | if (PrintGC && Verbose) { |
ysr@777 | 3347 | gclog_or_tty->print_cr("keep alive *"PTR_FORMAT" = "PTR_FORMAT" "PTR_FORMAT, |
ysr@777 | 3348 | p, (void*) obj, (void*) *p); |
ysr@777 | 3349 | } |
ysr@777 | 3350 | #endif // G1_DEBUG |
ysr@777 | 3351 | |
ysr@777 | 3352 | if (_g1->obj_in_cs(obj)) { |
ysr@777 | 3353 | assert( obj->is_forwarded(), "invariant" ); |
ysr@777 | 3354 | *p = obj->forwardee(); |
ysr@777 | 3355 | #ifdef G1_DEBUG |
ysr@777 | 3356 | gclog_or_tty->print_cr(" in CSet: moved "PTR_FORMAT" -> "PTR_FORMAT, |
ysr@777 | 3357 | (void*) obj, (void*) *p); |
ysr@777 | 3358 | #endif // G1_DEBUG |
ysr@777 | 3359 | } |
ysr@777 | 3360 | } |
ysr@777 | 3361 | }; |
ysr@777 | 3362 | |
iveresov@1051 | 3363 | class UpdateRSetDeferred : public OopsInHeapRegionClosure { |
iveresov@1051 | 3364 | private: |
iveresov@1051 | 3365 | G1CollectedHeap* _g1; |
iveresov@1051 | 3366 | DirtyCardQueue *_dcq; |
iveresov@1051 | 3367 | CardTableModRefBS* _ct_bs; |
iveresov@1051 | 3368 | |
iveresov@1051 | 3369 | public: |
iveresov@1051 | 3370 | UpdateRSetDeferred(G1CollectedHeap* g1, DirtyCardQueue* dcq) : |
iveresov@1051 | 3371 | _g1(g1), _ct_bs((CardTableModRefBS*)_g1->barrier_set()), _dcq(dcq) {} |
iveresov@1051 | 3372 | |
ysr@1280 | 3373 | virtual void do_oop(narrowOop* p) { do_oop_work(p); } |
ysr@1280 | 3374 | virtual void do_oop( oop* p) { do_oop_work(p); } |
ysr@1280 | 3375 | template <class T> void do_oop_work(T* p) { |
iveresov@1051 | 3376 | assert(_from->is_in_reserved(p), "paranoia"); |
ysr@1280 | 3377 | if (!_from->is_in_reserved(oopDesc::load_decode_heap_oop(p)) && |
ysr@1280 | 3378 | !_from->is_survivor()) { |
iveresov@1051 | 3379 | size_t card_index = _ct_bs->index_for(p); |
iveresov@1051 | 3380 | if (_ct_bs->mark_card_deferred(card_index)) { |
iveresov@1051 | 3381 | _dcq->enqueue((jbyte*)_ct_bs->byte_for_index(card_index)); |
iveresov@1051 | 3382 | } |
iveresov@1051 | 3383 | } |
iveresov@1051 | 3384 | } |
iveresov@1051 | 3385 | }; |
iveresov@1051 | 3386 | |
ysr@777 | 3387 | class RemoveSelfPointerClosure: public ObjectClosure { |
ysr@777 | 3388 | private: |
ysr@777 | 3389 | G1CollectedHeap* _g1; |
ysr@777 | 3390 | ConcurrentMark* _cm; |
ysr@777 | 3391 | HeapRegion* _hr; |
ysr@777 | 3392 | size_t _prev_marked_bytes; |
ysr@777 | 3393 | size_t _next_marked_bytes; |
iveresov@1051 | 3394 | OopsInHeapRegionClosure *_cl; |
ysr@777 | 3395 | public: |
iveresov@1051 | 3396 | RemoveSelfPointerClosure(G1CollectedHeap* g1, OopsInHeapRegionClosure* cl) : |
iveresov@1051 | 3397 | _g1(g1), _cm(_g1->concurrent_mark()), _prev_marked_bytes(0), |
iveresov@1051 | 3398 | _next_marked_bytes(0), _cl(cl) {} |
ysr@777 | 3399 | |
ysr@777 | 3400 | size_t prev_marked_bytes() { return _prev_marked_bytes; } |
ysr@777 | 3401 | size_t next_marked_bytes() { return _next_marked_bytes; } |
ysr@777 | 3402 | |
iveresov@787 | 3403 | // The original idea here was to coalesce evacuated and dead objects. |
iveresov@787 | 3404 | // However that caused complications with the block offset table (BOT). |
iveresov@787 | 3405 | // In particular if there were two TLABs, one of them partially refined. |
iveresov@787 | 3406 | // |----- TLAB_1--------|----TLAB_2-~~~(partially refined part)~~~| |
iveresov@787 | 3407 | // The BOT entries of the unrefined part of TLAB_2 point to the start |
iveresov@787 | 3408 | // of TLAB_2. If the last object of the TLAB_1 and the first object |
iveresov@787 | 3409 | // of TLAB_2 are coalesced, then the cards of the unrefined part |
iveresov@787 | 3410 | // would point into middle of the filler object. |
iveresov@787 | 3411 | // |
iveresov@787 | 3412 | // The current approach is to not coalesce and leave the BOT contents intact. |
iveresov@787 | 3413 | void do_object(oop obj) { |
iveresov@787 | 3414 | if (obj->is_forwarded() && obj->forwardee() == obj) { |
iveresov@787 | 3415 | // The object failed to move. |
iveresov@787 | 3416 | assert(!_g1->is_obj_dead(obj), "We should not be preserving dead objs."); |
iveresov@787 | 3417 | _cm->markPrev(obj); |
iveresov@787 | 3418 | assert(_cm->isPrevMarked(obj), "Should be marked!"); |
iveresov@787 | 3419 | _prev_marked_bytes += (obj->size() * HeapWordSize); |
iveresov@787 | 3420 | if (_g1->mark_in_progress() && !_g1->is_obj_ill(obj)) { |
iveresov@787 | 3421 | _cm->markAndGrayObjectIfNecessary(obj); |
iveresov@787 | 3422 | } |
iveresov@787 | 3423 | obj->set_mark(markOopDesc::prototype()); |
iveresov@787 | 3424 | // While we were processing RSet buffers during the |
iveresov@787 | 3425 | // collection, we actually didn't scan any cards on the |
iveresov@787 | 3426 | // collection set, since we didn't want to update remebered |
iveresov@787 | 3427 | // sets with entries that point into the collection set, given |
iveresov@787 | 3428 | // that live objects fromthe collection set are about to move |
iveresov@787 | 3429 | // and such entries will be stale very soon. This change also |
iveresov@787 | 3430 | // dealt with a reliability issue which involved scanning a |
iveresov@787 | 3431 | // card in the collection set and coming across an array that |
iveresov@787 | 3432 | // was being chunked and looking malformed. The problem is |
iveresov@787 | 3433 | // that, if evacuation fails, we might have remembered set |
iveresov@787 | 3434 | // entries missing given that we skipped cards on the |
iveresov@787 | 3435 | // collection set. So, we'll recreate such entries now. |
iveresov@1051 | 3436 | obj->oop_iterate(_cl); |
iveresov@787 | 3437 | assert(_cm->isPrevMarked(obj), "Should be marked!"); |
iveresov@787 | 3438 | } else { |
iveresov@787 | 3439 | // The object has been either evacuated or is dead. Fill it with a |
iveresov@787 | 3440 | // dummy object. |
iveresov@787 | 3441 | MemRegion mr((HeapWord*)obj, obj->size()); |
jcoomes@916 | 3442 | CollectedHeap::fill_with_object(mr); |
ysr@777 | 3443 | _cm->clearRangeBothMaps(mr); |
ysr@777 | 3444 | } |
ysr@777 | 3445 | } |
ysr@777 | 3446 | }; |
ysr@777 | 3447 | |
ysr@777 | 3448 | void G1CollectedHeap::remove_self_forwarding_pointers() { |
johnc@2060 | 3449 | UpdateRSetImmediate immediate_update(_g1h->g1_rem_set()); |
iveresov@1051 | 3450 | DirtyCardQueue dcq(&_g1h->dirty_card_queue_set()); |
iveresov@1051 | 3451 | UpdateRSetDeferred deferred_update(_g1h, &dcq); |
iveresov@1051 | 3452 | OopsInHeapRegionClosure *cl; |
iveresov@1051 | 3453 | if (G1DeferredRSUpdate) { |
iveresov@1051 | 3454 | cl = &deferred_update; |
iveresov@1051 | 3455 | } else { |
iveresov@1051 | 3456 | cl = &immediate_update; |
iveresov@1051 | 3457 | } |
ysr@777 | 3458 | HeapRegion* cur = g1_policy()->collection_set(); |
ysr@777 | 3459 | while (cur != NULL) { |
ysr@777 | 3460 | assert(g1_policy()->assertMarkedBytesDataOK(), "Should be!"); |
ysr@777 | 3461 | |
iveresov@1051 | 3462 | RemoveSelfPointerClosure rspc(_g1h, cl); |
ysr@777 | 3463 | if (cur->evacuation_failed()) { |
ysr@777 | 3464 | assert(cur->in_collection_set(), "bad CS"); |
iveresov@1051 | 3465 | cl->set_region(cur); |
ysr@777 | 3466 | cur->object_iterate(&rspc); |
ysr@777 | 3467 | |
ysr@777 | 3468 | // A number of manipulations to make the TAMS be the current top, |
ysr@777 | 3469 | // and the marked bytes be the ones observed in the iteration. |
ysr@777 | 3470 | if (_g1h->concurrent_mark()->at_least_one_mark_complete()) { |
ysr@777 | 3471 | // The comments below are the postconditions achieved by the |
ysr@777 | 3472 | // calls. Note especially the last such condition, which says that |
ysr@777 | 3473 | // the count of marked bytes has been properly restored. |
ysr@777 | 3474 | cur->note_start_of_marking(false); |
ysr@777 | 3475 | // _next_top_at_mark_start == top, _next_marked_bytes == 0 |
ysr@777 | 3476 | cur->add_to_marked_bytes(rspc.prev_marked_bytes()); |
ysr@777 | 3477 | // _next_marked_bytes == prev_marked_bytes. |
ysr@777 | 3478 | cur->note_end_of_marking(); |
ysr@777 | 3479 | // _prev_top_at_mark_start == top(), |
ysr@777 | 3480 | // _prev_marked_bytes == prev_marked_bytes |
ysr@777 | 3481 | } |
ysr@777 | 3482 | // If there is no mark in progress, we modified the _next variables |
ysr@777 | 3483 | // above needlessly, but harmlessly. |
ysr@777 | 3484 | if (_g1h->mark_in_progress()) { |
ysr@777 | 3485 | cur->note_start_of_marking(false); |
ysr@777 | 3486 | // _next_top_at_mark_start == top, _next_marked_bytes == 0 |
ysr@777 | 3487 | // _next_marked_bytes == next_marked_bytes. |
ysr@777 | 3488 | } |
ysr@777 | 3489 | |
ysr@777 | 3490 | // Now make sure the region has the right index in the sorted array. |
ysr@777 | 3491 | g1_policy()->note_change_in_marked_bytes(cur); |
ysr@777 | 3492 | } |
ysr@777 | 3493 | cur = cur->next_in_collection_set(); |
ysr@777 | 3494 | } |
ysr@777 | 3495 | assert(g1_policy()->assertMarkedBytesDataOK(), "Should be!"); |
ysr@777 | 3496 | |
ysr@777 | 3497 | // Now restore saved marks, if any. |
ysr@777 | 3498 | if (_objs_with_preserved_marks != NULL) { |
ysr@777 | 3499 | assert(_preserved_marks_of_objs != NULL, "Both or none."); |
ysr@777 | 3500 | assert(_objs_with_preserved_marks->length() == |
ysr@777 | 3501 | _preserved_marks_of_objs->length(), "Both or none."); |
ysr@777 | 3502 | guarantee(_objs_with_preserved_marks->length() == |
ysr@777 | 3503 | _preserved_marks_of_objs->length(), "Both or none."); |
ysr@777 | 3504 | for (int i = 0; i < _objs_with_preserved_marks->length(); i++) { |
ysr@777 | 3505 | oop obj = _objs_with_preserved_marks->at(i); |
ysr@777 | 3506 | markOop m = _preserved_marks_of_objs->at(i); |
ysr@777 | 3507 | obj->set_mark(m); |
ysr@777 | 3508 | } |
ysr@777 | 3509 | // Delete the preserved marks growable arrays (allocated on the C heap). |
ysr@777 | 3510 | delete _objs_with_preserved_marks; |
ysr@777 | 3511 | delete _preserved_marks_of_objs; |
ysr@777 | 3512 | _objs_with_preserved_marks = NULL; |
ysr@777 | 3513 | _preserved_marks_of_objs = NULL; |
ysr@777 | 3514 | } |
ysr@777 | 3515 | } |
ysr@777 | 3516 | |
ysr@777 | 3517 | void G1CollectedHeap::push_on_evac_failure_scan_stack(oop obj) { |
ysr@777 | 3518 | _evac_failure_scan_stack->push(obj); |
ysr@777 | 3519 | } |
ysr@777 | 3520 | |
ysr@777 | 3521 | void G1CollectedHeap::drain_evac_failure_scan_stack() { |
ysr@777 | 3522 | assert(_evac_failure_scan_stack != NULL, "precondition"); |
ysr@777 | 3523 | |
ysr@777 | 3524 | while (_evac_failure_scan_stack->length() > 0) { |
ysr@777 | 3525 | oop obj = _evac_failure_scan_stack->pop(); |
ysr@777 | 3526 | _evac_failure_closure->set_region(heap_region_containing(obj)); |
ysr@777 | 3527 | obj->oop_iterate_backwards(_evac_failure_closure); |
ysr@777 | 3528 | } |
ysr@777 | 3529 | } |
ysr@777 | 3530 | |
ysr@777 | 3531 | void G1CollectedHeap::handle_evacuation_failure(oop old) { |
ysr@777 | 3532 | markOop m = old->mark(); |
ysr@777 | 3533 | // forward to self |
ysr@777 | 3534 | assert(!old->is_forwarded(), "precondition"); |
ysr@777 | 3535 | |
ysr@777 | 3536 | old->forward_to(old); |
ysr@777 | 3537 | handle_evacuation_failure_common(old, m); |
ysr@777 | 3538 | } |
ysr@777 | 3539 | |
ysr@777 | 3540 | oop |
ysr@777 | 3541 | G1CollectedHeap::handle_evacuation_failure_par(OopsInHeapRegionClosure* cl, |
ysr@777 | 3542 | oop old) { |
ysr@777 | 3543 | markOop m = old->mark(); |
ysr@777 | 3544 | oop forward_ptr = old->forward_to_atomic(old); |
ysr@777 | 3545 | if (forward_ptr == NULL) { |
ysr@777 | 3546 | // Forward-to-self succeeded. |
ysr@777 | 3547 | if (_evac_failure_closure != cl) { |
ysr@777 | 3548 | MutexLockerEx x(EvacFailureStack_lock, Mutex::_no_safepoint_check_flag); |
ysr@777 | 3549 | assert(!_drain_in_progress, |
ysr@777 | 3550 | "Should only be true while someone holds the lock."); |
ysr@777 | 3551 | // Set the global evac-failure closure to the current thread's. |
ysr@777 | 3552 | assert(_evac_failure_closure == NULL, "Or locking has failed."); |
ysr@777 | 3553 | set_evac_failure_closure(cl); |
ysr@777 | 3554 | // Now do the common part. |
ysr@777 | 3555 | handle_evacuation_failure_common(old, m); |
ysr@777 | 3556 | // Reset to NULL. |
ysr@777 | 3557 | set_evac_failure_closure(NULL); |
ysr@777 | 3558 | } else { |
ysr@777 | 3559 | // The lock is already held, and this is recursive. |
ysr@777 | 3560 | assert(_drain_in_progress, "This should only be the recursive case."); |
ysr@777 | 3561 | handle_evacuation_failure_common(old, m); |
ysr@777 | 3562 | } |
ysr@777 | 3563 | return old; |
ysr@777 | 3564 | } else { |
ysr@777 | 3565 | // Someone else had a place to copy it. |
ysr@777 | 3566 | return forward_ptr; |
ysr@777 | 3567 | } |
ysr@777 | 3568 | } |
ysr@777 | 3569 | |
ysr@777 | 3570 | void G1CollectedHeap::handle_evacuation_failure_common(oop old, markOop m) { |
ysr@777 | 3571 | set_evacuation_failed(true); |
ysr@777 | 3572 | |
ysr@777 | 3573 | preserve_mark_if_necessary(old, m); |
ysr@777 | 3574 | |
ysr@777 | 3575 | HeapRegion* r = heap_region_containing(old); |
ysr@777 | 3576 | if (!r->evacuation_failed()) { |
ysr@777 | 3577 | r->set_evacuation_failed(true); |
tonyp@1717 | 3578 | if (G1PrintHeapRegions) { |
ysr@777 | 3579 | gclog_or_tty->print("evacuation failed in heap region "PTR_FORMAT" " |
ysr@777 | 3580 | "["PTR_FORMAT","PTR_FORMAT")\n", |
ysr@777 | 3581 | r, r->bottom(), r->end()); |
ysr@777 | 3582 | } |
ysr@777 | 3583 | } |
ysr@777 | 3584 | |
ysr@777 | 3585 | push_on_evac_failure_scan_stack(old); |
ysr@777 | 3586 | |
ysr@777 | 3587 | if (!_drain_in_progress) { |
ysr@777 | 3588 | // prevent recursion in copy_to_survivor_space() |
ysr@777 | 3589 | _drain_in_progress = true; |
ysr@777 | 3590 | drain_evac_failure_scan_stack(); |
ysr@777 | 3591 | _drain_in_progress = false; |
ysr@777 | 3592 | } |
ysr@777 | 3593 | } |
ysr@777 | 3594 | |
ysr@777 | 3595 | void G1CollectedHeap::preserve_mark_if_necessary(oop obj, markOop m) { |
ysr@777 | 3596 | if (m != markOopDesc::prototype()) { |
ysr@777 | 3597 | if (_objs_with_preserved_marks == NULL) { |
ysr@777 | 3598 | assert(_preserved_marks_of_objs == NULL, "Both or none."); |
ysr@777 | 3599 | _objs_with_preserved_marks = |
ysr@777 | 3600 | new (ResourceObj::C_HEAP) GrowableArray<oop>(40, true); |
ysr@777 | 3601 | _preserved_marks_of_objs = |
ysr@777 | 3602 | new (ResourceObj::C_HEAP) GrowableArray<markOop>(40, true); |
ysr@777 | 3603 | } |
ysr@777 | 3604 | _objs_with_preserved_marks->push(obj); |
ysr@777 | 3605 | _preserved_marks_of_objs->push(m); |
ysr@777 | 3606 | } |
ysr@777 | 3607 | } |
ysr@777 | 3608 | |
ysr@777 | 3609 | // *** Parallel G1 Evacuation |
ysr@777 | 3610 | |
ysr@777 | 3611 | HeapWord* G1CollectedHeap::par_allocate_during_gc(GCAllocPurpose purpose, |
ysr@777 | 3612 | size_t word_size) { |
ysr@777 | 3613 | HeapRegion* alloc_region = _gc_alloc_regions[purpose]; |
ysr@777 | 3614 | // let the caller handle alloc failure |
ysr@777 | 3615 | if (alloc_region == NULL) return NULL; |
ysr@777 | 3616 | |
ysr@777 | 3617 | HeapWord* block = alloc_region->par_allocate(word_size); |
ysr@777 | 3618 | if (block == NULL) { |
ysr@777 | 3619 | MutexLockerEx x(par_alloc_during_gc_lock(), |
ysr@777 | 3620 | Mutex::_no_safepoint_check_flag); |
ysr@777 | 3621 | block = allocate_during_gc_slow(purpose, alloc_region, true, word_size); |
ysr@777 | 3622 | } |
ysr@777 | 3623 | return block; |
ysr@777 | 3624 | } |
ysr@777 | 3625 | |
apetrusenko@980 | 3626 | void G1CollectedHeap::retire_alloc_region(HeapRegion* alloc_region, |
apetrusenko@980 | 3627 | bool par) { |
apetrusenko@980 | 3628 | // Another thread might have obtained alloc_region for the given |
apetrusenko@980 | 3629 | // purpose, and might be attempting to allocate in it, and might |
apetrusenko@980 | 3630 | // succeed. Therefore, we can't do the "finalization" stuff on the |
apetrusenko@980 | 3631 | // region below until we're sure the last allocation has happened. |
apetrusenko@980 | 3632 | // We ensure this by allocating the remaining space with a garbage |
apetrusenko@980 | 3633 | // object. |
apetrusenko@980 | 3634 | if (par) par_allocate_remaining_space(alloc_region); |
apetrusenko@980 | 3635 | // Now we can do the post-GC stuff on the region. |
apetrusenko@980 | 3636 | alloc_region->note_end_of_copying(); |
apetrusenko@980 | 3637 | g1_policy()->record_after_bytes(alloc_region->used()); |
apetrusenko@980 | 3638 | } |
apetrusenko@980 | 3639 | |
ysr@777 | 3640 | HeapWord* |
ysr@777 | 3641 | G1CollectedHeap::allocate_during_gc_slow(GCAllocPurpose purpose, |
ysr@777 | 3642 | HeapRegion* alloc_region, |
ysr@777 | 3643 | bool par, |
ysr@777 | 3644 | size_t word_size) { |
ysr@777 | 3645 | HeapWord* block = NULL; |
ysr@777 | 3646 | // In the parallel case, a previous thread to obtain the lock may have |
ysr@777 | 3647 | // already assigned a new gc_alloc_region. |
ysr@777 | 3648 | if (alloc_region != _gc_alloc_regions[purpose]) { |
ysr@777 | 3649 | assert(par, "But should only happen in parallel case."); |
ysr@777 | 3650 | alloc_region = _gc_alloc_regions[purpose]; |
ysr@777 | 3651 | if (alloc_region == NULL) return NULL; |
ysr@777 | 3652 | block = alloc_region->par_allocate(word_size); |
ysr@777 | 3653 | if (block != NULL) return block; |
ysr@777 | 3654 | // Otherwise, continue; this new region is empty, too. |
ysr@777 | 3655 | } |
ysr@777 | 3656 | assert(alloc_region != NULL, "We better have an allocation region"); |
apetrusenko@980 | 3657 | retire_alloc_region(alloc_region, par); |
ysr@777 | 3658 | |
ysr@777 | 3659 | if (_gc_alloc_region_counts[purpose] >= g1_policy()->max_regions(purpose)) { |
ysr@777 | 3660 | // Cannot allocate more regions for the given purpose. |
ysr@777 | 3661 | GCAllocPurpose alt_purpose = g1_policy()->alternative_purpose(purpose); |
ysr@777 | 3662 | // Is there an alternative? |
ysr@777 | 3663 | if (purpose != alt_purpose) { |
ysr@777 | 3664 | HeapRegion* alt_region = _gc_alloc_regions[alt_purpose]; |
ysr@777 | 3665 | // Has not the alternative region been aliased? |
apetrusenko@980 | 3666 | if (alloc_region != alt_region && alt_region != NULL) { |
ysr@777 | 3667 | // Try to allocate in the alternative region. |
ysr@777 | 3668 | if (par) { |
ysr@777 | 3669 | block = alt_region->par_allocate(word_size); |
ysr@777 | 3670 | } else { |
ysr@777 | 3671 | block = alt_region->allocate(word_size); |
ysr@777 | 3672 | } |
ysr@777 | 3673 | // Make an alias. |
ysr@777 | 3674 | _gc_alloc_regions[purpose] = _gc_alloc_regions[alt_purpose]; |
apetrusenko@980 | 3675 | if (block != NULL) { |
apetrusenko@980 | 3676 | return block; |
apetrusenko@980 | 3677 | } |
apetrusenko@980 | 3678 | retire_alloc_region(alt_region, par); |
ysr@777 | 3679 | } |
ysr@777 | 3680 | // Both the allocation region and the alternative one are full |
ysr@777 | 3681 | // and aliased, replace them with a new allocation region. |
ysr@777 | 3682 | purpose = alt_purpose; |
ysr@777 | 3683 | } else { |
ysr@777 | 3684 | set_gc_alloc_region(purpose, NULL); |
ysr@777 | 3685 | return NULL; |
ysr@777 | 3686 | } |
ysr@777 | 3687 | } |
ysr@777 | 3688 | |
ysr@777 | 3689 | // Now allocate a new region for allocation. |
ysr@777 | 3690 | alloc_region = newAllocRegionWithExpansion(purpose, word_size, false /*zero_filled*/); |
ysr@777 | 3691 | |
ysr@777 | 3692 | // let the caller handle alloc failure |
ysr@777 | 3693 | if (alloc_region != NULL) { |
ysr@777 | 3694 | |
ysr@777 | 3695 | assert(check_gc_alloc_regions(), "alloc regions messed up"); |
ysr@777 | 3696 | assert(alloc_region->saved_mark_at_top(), |
ysr@777 | 3697 | "Mark should have been saved already."); |
ysr@777 | 3698 | // We used to assert that the region was zero-filled here, but no |
ysr@777 | 3699 | // longer. |
ysr@777 | 3700 | |
ysr@777 | 3701 | // This must be done last: once it's installed, other regions may |
ysr@777 | 3702 | // allocate in it (without holding the lock.) |
ysr@777 | 3703 | set_gc_alloc_region(purpose, alloc_region); |
ysr@777 | 3704 | |
ysr@777 | 3705 | if (par) { |
ysr@777 | 3706 | block = alloc_region->par_allocate(word_size); |
ysr@777 | 3707 | } else { |
ysr@777 | 3708 | block = alloc_region->allocate(word_size); |
ysr@777 | 3709 | } |
ysr@777 | 3710 | // Caller handles alloc failure. |
ysr@777 | 3711 | } else { |
ysr@777 | 3712 | // This sets other apis using the same old alloc region to NULL, also. |
ysr@777 | 3713 | set_gc_alloc_region(purpose, NULL); |
ysr@777 | 3714 | } |
ysr@777 | 3715 | return block; // May be NULL. |
ysr@777 | 3716 | } |
ysr@777 | 3717 | |
ysr@777 | 3718 | void G1CollectedHeap::par_allocate_remaining_space(HeapRegion* r) { |
ysr@777 | 3719 | HeapWord* block = NULL; |
ysr@777 | 3720 | size_t free_words; |
ysr@777 | 3721 | do { |
ysr@777 | 3722 | free_words = r->free()/HeapWordSize; |
ysr@777 | 3723 | // If there's too little space, no one can allocate, so we're done. |
kvn@1926 | 3724 | if (free_words < CollectedHeap::min_fill_size()) return; |
ysr@777 | 3725 | // Otherwise, try to claim it. |
ysr@777 | 3726 | block = r->par_allocate(free_words); |
ysr@777 | 3727 | } while (block == NULL); |
jcoomes@916 | 3728 | fill_with_object(block, free_words); |
ysr@777 | 3729 | } |
ysr@777 | 3730 | |
ysr@777 | 3731 | #ifndef PRODUCT |
ysr@777 | 3732 | bool GCLabBitMapClosure::do_bit(size_t offset) { |
ysr@777 | 3733 | HeapWord* addr = _bitmap->offsetToHeapWord(offset); |
ysr@777 | 3734 | guarantee(_cm->isMarked(oop(addr)), "it should be!"); |
ysr@777 | 3735 | return true; |
ysr@777 | 3736 | } |
ysr@777 | 3737 | #endif // PRODUCT |
ysr@777 | 3738 | |
ysr@1280 | 3739 | G1ParScanThreadState::G1ParScanThreadState(G1CollectedHeap* g1h, int queue_num) |
ysr@1280 | 3740 | : _g1h(g1h), |
ysr@1280 | 3741 | _refs(g1h->task_queue(queue_num)), |
ysr@1280 | 3742 | _dcq(&g1h->dirty_card_queue_set()), |
ysr@1280 | 3743 | _ct_bs((CardTableModRefBS*)_g1h->barrier_set()), |
ysr@1280 | 3744 | _g1_rem(g1h->g1_rem_set()), |
ysr@1280 | 3745 | _hash_seed(17), _queue_num(queue_num), |
ysr@1280 | 3746 | _term_attempts(0), |
apetrusenko@1826 | 3747 | _surviving_alloc_buffer(g1h->desired_plab_sz(GCAllocForSurvived)), |
apetrusenko@1826 | 3748 | _tenured_alloc_buffer(g1h->desired_plab_sz(GCAllocForTenured)), |
ysr@1280 | 3749 | _age_table(false), |
ysr@1280 | 3750 | _strong_roots_time(0), _term_time(0), |
ysr@1280 | 3751 | _alloc_buffer_waste(0), _undo_waste(0) |
ysr@1280 | 3752 | { |
ysr@1280 | 3753 | // we allocate G1YoungSurvRateNumRegions plus one entries, since |
ysr@1280 | 3754 | // we "sacrifice" entry 0 to keep track of surviving bytes for |
ysr@1280 | 3755 | // non-young regions (where the age is -1) |
ysr@1280 | 3756 | // We also add a few elements at the beginning and at the end in |
ysr@1280 | 3757 | // an attempt to eliminate cache contention |
ysr@1280 | 3758 | size_t real_length = 1 + _g1h->g1_policy()->young_cset_length(); |
ysr@1280 | 3759 | size_t array_length = PADDING_ELEM_NUM + |
ysr@1280 | 3760 | real_length + |
ysr@1280 | 3761 | PADDING_ELEM_NUM; |
ysr@1280 | 3762 | _surviving_young_words_base = NEW_C_HEAP_ARRAY(size_t, array_length); |
ysr@1280 | 3763 | if (_surviving_young_words_base == NULL) |
ysr@1280 | 3764 | vm_exit_out_of_memory(array_length * sizeof(size_t), |
ysr@1280 | 3765 | "Not enough space for young surv histo."); |
ysr@1280 | 3766 | _surviving_young_words = _surviving_young_words_base + PADDING_ELEM_NUM; |
ysr@1280 | 3767 | memset(_surviving_young_words, 0, real_length * sizeof(size_t)); |
ysr@1280 | 3768 | |
apetrusenko@1826 | 3769 | _alloc_buffers[GCAllocForSurvived] = &_surviving_alloc_buffer; |
apetrusenko@1826 | 3770 | _alloc_buffers[GCAllocForTenured] = &_tenured_alloc_buffer; |
apetrusenko@1826 | 3771 | |
ysr@1280 | 3772 | _start = os::elapsedTime(); |
ysr@1280 | 3773 | } |
ysr@777 | 3774 | |
jcoomes@2064 | 3775 | void |
jcoomes@2064 | 3776 | G1ParScanThreadState::print_termination_stats_hdr(outputStream* const st) |
jcoomes@2064 | 3777 | { |
jcoomes@2064 | 3778 | st->print_raw_cr("GC Termination Stats"); |
jcoomes@2064 | 3779 | st->print_raw_cr(" elapsed --strong roots-- -------termination-------" |
jcoomes@2064 | 3780 | " ------waste (KiB)------"); |
jcoomes@2064 | 3781 | st->print_raw_cr("thr ms ms % ms % attempts" |
jcoomes@2064 | 3782 | " total alloc undo"); |
jcoomes@2064 | 3783 | st->print_raw_cr("--- --------- --------- ------ --------- ------ --------" |
jcoomes@2064 | 3784 | " ------- ------- -------"); |
jcoomes@2064 | 3785 | } |
jcoomes@2064 | 3786 | |
jcoomes@2064 | 3787 | void |
jcoomes@2064 | 3788 | G1ParScanThreadState::print_termination_stats(int i, |
jcoomes@2064 | 3789 | outputStream* const st) const |
jcoomes@2064 | 3790 | { |
jcoomes@2064 | 3791 | const double elapsed_ms = elapsed_time() * 1000.0; |
jcoomes@2064 | 3792 | const double s_roots_ms = strong_roots_time() * 1000.0; |
jcoomes@2064 | 3793 | const double term_ms = term_time() * 1000.0; |
jcoomes@2064 | 3794 | st->print_cr("%3d %9.2f %9.2f %6.2f " |
jcoomes@2064 | 3795 | "%9.2f %6.2f " SIZE_FORMAT_W(8) " " |
jcoomes@2064 | 3796 | SIZE_FORMAT_W(7) " " SIZE_FORMAT_W(7) " " SIZE_FORMAT_W(7), |
jcoomes@2064 | 3797 | i, elapsed_ms, s_roots_ms, s_roots_ms * 100 / elapsed_ms, |
jcoomes@2064 | 3798 | term_ms, term_ms * 100 / elapsed_ms, term_attempts(), |
jcoomes@2064 | 3799 | (alloc_buffer_waste() + undo_waste()) * HeapWordSize / K, |
jcoomes@2064 | 3800 | alloc_buffer_waste() * HeapWordSize / K, |
jcoomes@2064 | 3801 | undo_waste() * HeapWordSize / K); |
jcoomes@2064 | 3802 | } |
jcoomes@2064 | 3803 | |
ysr@777 | 3804 | G1ParClosureSuper::G1ParClosureSuper(G1CollectedHeap* g1, G1ParScanThreadState* par_scan_state) : |
ysr@777 | 3805 | _g1(g1), _g1_rem(_g1->g1_rem_set()), _cm(_g1->concurrent_mark()), |
ysr@777 | 3806 | _par_scan_state(par_scan_state) { } |
ysr@777 | 3807 | |
ysr@1280 | 3808 | template <class T> void G1ParCopyHelper::mark_forwardee(T* p) { |
ysr@777 | 3809 | // This is called _after_ do_oop_work has been called, hence after |
ysr@777 | 3810 | // the object has been relocated to its new location and *p points |
ysr@777 | 3811 | // to its new location. |
ysr@777 | 3812 | |
ysr@1280 | 3813 | T heap_oop = oopDesc::load_heap_oop(p); |
ysr@1280 | 3814 | if (!oopDesc::is_null(heap_oop)) { |
ysr@1280 | 3815 | oop obj = oopDesc::decode_heap_oop(heap_oop); |
ysr@1280 | 3816 | assert((_g1->evacuation_failed()) || (!_g1->obj_in_cs(obj)), |
ysr@777 | 3817 | "shouldn't still be in the CSet if evacuation didn't fail."); |
ysr@1280 | 3818 | HeapWord* addr = (HeapWord*)obj; |
ysr@777 | 3819 | if (_g1->is_in_g1_reserved(addr)) |
ysr@777 | 3820 | _cm->grayRoot(oop(addr)); |
ysr@777 | 3821 | } |
ysr@777 | 3822 | } |
ysr@777 | 3823 | |
ysr@777 | 3824 | oop G1ParCopyHelper::copy_to_survivor_space(oop old) { |
ysr@777 | 3825 | size_t word_sz = old->size(); |
ysr@777 | 3826 | HeapRegion* from_region = _g1->heap_region_containing_raw(old); |
ysr@777 | 3827 | // +1 to make the -1 indexes valid... |
ysr@777 | 3828 | int young_index = from_region->young_index_in_cset()+1; |
ysr@777 | 3829 | assert( (from_region->is_young() && young_index > 0) || |
ysr@777 | 3830 | (!from_region->is_young() && young_index == 0), "invariant" ); |
ysr@777 | 3831 | G1CollectorPolicy* g1p = _g1->g1_policy(); |
ysr@777 | 3832 | markOop m = old->mark(); |
apetrusenko@980 | 3833 | int age = m->has_displaced_mark_helper() ? m->displaced_mark_helper()->age() |
apetrusenko@980 | 3834 | : m->age(); |
apetrusenko@980 | 3835 | GCAllocPurpose alloc_purpose = g1p->evacuation_destination(from_region, age, |
ysr@777 | 3836 | word_sz); |
ysr@777 | 3837 | HeapWord* obj_ptr = _par_scan_state->allocate(alloc_purpose, word_sz); |
ysr@777 | 3838 | oop obj = oop(obj_ptr); |
ysr@777 | 3839 | |
ysr@777 | 3840 | if (obj_ptr == NULL) { |
ysr@777 | 3841 | // This will either forward-to-self, or detect that someone else has |
ysr@777 | 3842 | // installed a forwarding pointer. |
ysr@777 | 3843 | OopsInHeapRegionClosure* cl = _par_scan_state->evac_failure_closure(); |
ysr@777 | 3844 | return _g1->handle_evacuation_failure_par(cl, old); |
ysr@777 | 3845 | } |
ysr@777 | 3846 | |
tonyp@961 | 3847 | // We're going to allocate linearly, so might as well prefetch ahead. |
tonyp@961 | 3848 | Prefetch::write(obj_ptr, PrefetchCopyIntervalInBytes); |
tonyp@961 | 3849 | |
ysr@777 | 3850 | oop forward_ptr = old->forward_to_atomic(obj); |
ysr@777 | 3851 | if (forward_ptr == NULL) { |
ysr@777 | 3852 | Copy::aligned_disjoint_words((HeapWord*) old, obj_ptr, word_sz); |
tonyp@961 | 3853 | if (g1p->track_object_age(alloc_purpose)) { |
tonyp@961 | 3854 | // We could simply do obj->incr_age(). However, this causes a |
tonyp@961 | 3855 | // performance issue. obj->incr_age() will first check whether |
tonyp@961 | 3856 | // the object has a displaced mark by checking its mark word; |
tonyp@961 | 3857 | // getting the mark word from the new location of the object |
tonyp@961 | 3858 | // stalls. So, given that we already have the mark word and we |
tonyp@961 | 3859 | // are about to install it anyway, it's better to increase the |
tonyp@961 | 3860 | // age on the mark word, when the object does not have a |
tonyp@961 | 3861 | // displaced mark word. We're not expecting many objects to have |
tonyp@961 | 3862 | // a displaced marked word, so that case is not optimized |
tonyp@961 | 3863 | // further (it could be...) and we simply call obj->incr_age(). |
tonyp@961 | 3864 | |
tonyp@961 | 3865 | if (m->has_displaced_mark_helper()) { |
tonyp@961 | 3866 | // in this case, we have to install the mark word first, |
tonyp@961 | 3867 | // otherwise obj looks to be forwarded (the old mark word, |
tonyp@961 | 3868 | // which contains the forward pointer, was copied) |
tonyp@961 | 3869 | obj->set_mark(m); |
tonyp@961 | 3870 | obj->incr_age(); |
tonyp@961 | 3871 | } else { |
tonyp@961 | 3872 | m = m->incr_age(); |
apetrusenko@980 | 3873 | obj->set_mark(m); |
tonyp@961 | 3874 | } |
apetrusenko@980 | 3875 | _par_scan_state->age_table()->add(obj, word_sz); |
apetrusenko@980 | 3876 | } else { |
apetrusenko@980 | 3877 | obj->set_mark(m); |
tonyp@961 | 3878 | } |
tonyp@961 | 3879 | |
ysr@777 | 3880 | // preserve "next" mark bit |
ysr@777 | 3881 | if (_g1->mark_in_progress() && !_g1->is_obj_ill(old)) { |
ysr@777 | 3882 | if (!use_local_bitmaps || |
ysr@777 | 3883 | !_par_scan_state->alloc_buffer(alloc_purpose)->mark(obj_ptr)) { |
ysr@777 | 3884 | // if we couldn't mark it on the local bitmap (this happens when |
ysr@777 | 3885 | // the object was not allocated in the GCLab), we have to bite |
ysr@777 | 3886 | // the bullet and do the standard parallel mark |
ysr@777 | 3887 | _cm->markAndGrayObjectIfNecessary(obj); |
ysr@777 | 3888 | } |
ysr@777 | 3889 | #if 1 |
ysr@777 | 3890 | if (_g1->isMarkedNext(old)) { |
ysr@777 | 3891 | _cm->nextMarkBitMap()->parClear((HeapWord*)old); |
ysr@777 | 3892 | } |
ysr@777 | 3893 | #endif |
ysr@777 | 3894 | } |
ysr@777 | 3895 | |
ysr@777 | 3896 | size_t* surv_young_words = _par_scan_state->surviving_young_words(); |
ysr@777 | 3897 | surv_young_words[young_index] += word_sz; |
ysr@777 | 3898 | |
ysr@777 | 3899 | if (obj->is_objArray() && arrayOop(obj)->length() >= ParGCArrayScanChunk) { |
ysr@777 | 3900 | arrayOop(old)->set_length(0); |
ysr@1280 | 3901 | oop* old_p = set_partial_array_mask(old); |
ysr@1280 | 3902 | _par_scan_state->push_on_queue(old_p); |
ysr@777 | 3903 | } else { |
tonyp@961 | 3904 | // No point in using the slower heap_region_containing() method, |
tonyp@961 | 3905 | // given that we know obj is in the heap. |
tonyp@961 | 3906 | _scanner->set_region(_g1->heap_region_containing_raw(obj)); |
ysr@777 | 3907 | obj->oop_iterate_backwards(_scanner); |
ysr@777 | 3908 | } |
ysr@777 | 3909 | } else { |
ysr@777 | 3910 | _par_scan_state->undo_allocation(alloc_purpose, obj_ptr, word_sz); |
ysr@777 | 3911 | obj = forward_ptr; |
ysr@777 | 3912 | } |
ysr@777 | 3913 | return obj; |
ysr@777 | 3914 | } |
ysr@777 | 3915 | |
iveresov@1696 | 3916 | template <bool do_gen_barrier, G1Barrier barrier, bool do_mark_forwardee> |
ysr@1280 | 3917 | template <class T> |
iveresov@1696 | 3918 | void G1ParCopyClosure <do_gen_barrier, barrier, do_mark_forwardee> |
ysr@1280 | 3919 | ::do_oop_work(T* p) { |
ysr@1280 | 3920 | oop obj = oopDesc::load_decode_heap_oop(p); |
ysr@777 | 3921 | assert(barrier != G1BarrierRS || obj != NULL, |
ysr@777 | 3922 | "Precondition: G1BarrierRS implies obj is nonNull"); |
ysr@777 | 3923 | |
tonyp@961 | 3924 | // here the null check is implicit in the cset_fast_test() test |
iveresov@1696 | 3925 | if (_g1->in_cset_fast_test(obj)) { |
ysr@777 | 3926 | #if G1_REM_SET_LOGGING |
tonyp@961 | 3927 | gclog_or_tty->print_cr("Loc "PTR_FORMAT" contains pointer "PTR_FORMAT" " |
tonyp@961 | 3928 | "into CS.", p, (void*) obj); |
ysr@777 | 3929 | #endif |
tonyp@961 | 3930 | if (obj->is_forwarded()) { |
ysr@1280 | 3931 | oopDesc::encode_store_heap_oop(p, obj->forwardee()); |
tonyp@961 | 3932 | } else { |
ysr@1280 | 3933 | oop copy_oop = copy_to_survivor_space(obj); |
ysr@1280 | 3934 | oopDesc::encode_store_heap_oop(p, copy_oop); |
ysr@777 | 3935 | } |
tonyp@961 | 3936 | // When scanning the RS, we only care about objs in CS. |
tonyp@961 | 3937 | if (barrier == G1BarrierRS) { |
iveresov@1051 | 3938 | _par_scan_state->update_rs(_from, p, _par_scan_state->queue_num()); |
ysr@777 | 3939 | } |
tonyp@961 | 3940 | } |
tonyp@961 | 3941 | |
tonyp@961 | 3942 | if (barrier == G1BarrierEvac && obj != NULL) { |
iveresov@1051 | 3943 | _par_scan_state->update_rs(_from, p, _par_scan_state->queue_num()); |
tonyp@961 | 3944 | } |
tonyp@961 | 3945 | |
tonyp@961 | 3946 | if (do_gen_barrier && obj != NULL) { |
tonyp@961 | 3947 | par_do_barrier(p); |
tonyp@961 | 3948 | } |
tonyp@961 | 3949 | } |
tonyp@961 | 3950 | |
iveresov@1696 | 3951 | template void G1ParCopyClosure<false, G1BarrierEvac, false>::do_oop_work(oop* p); |
iveresov@1696 | 3952 | template void G1ParCopyClosure<false, G1BarrierEvac, false>::do_oop_work(narrowOop* p); |
ysr@1280 | 3953 | |
ysr@1280 | 3954 | template <class T> void G1ParScanPartialArrayClosure::do_oop_nv(T* p) { |
tonyp@961 | 3955 | assert(has_partial_array_mask(p), "invariant"); |
tonyp@961 | 3956 | oop old = clear_partial_array_mask(p); |
ysr@777 | 3957 | assert(old->is_objArray(), "must be obj array"); |
ysr@777 | 3958 | assert(old->is_forwarded(), "must be forwarded"); |
ysr@777 | 3959 | assert(Universe::heap()->is_in_reserved(old), "must be in heap."); |
ysr@777 | 3960 | |
ysr@777 | 3961 | objArrayOop obj = objArrayOop(old->forwardee()); |
ysr@777 | 3962 | assert((void*)old != (void*)old->forwardee(), "self forwarding here?"); |
ysr@777 | 3963 | // Process ParGCArrayScanChunk elements now |
ysr@777 | 3964 | // and push the remainder back onto queue |
ysr@777 | 3965 | int start = arrayOop(old)->length(); |
ysr@777 | 3966 | int end = obj->length(); |
ysr@777 | 3967 | int remainder = end - start; |
ysr@777 | 3968 | assert(start <= end, "just checking"); |
ysr@777 | 3969 | if (remainder > 2 * ParGCArrayScanChunk) { |
ysr@777 | 3970 | // Test above combines last partial chunk with a full chunk |
ysr@777 | 3971 | end = start + ParGCArrayScanChunk; |
ysr@777 | 3972 | arrayOop(old)->set_length(end); |
ysr@777 | 3973 | // Push remainder. |
ysr@1280 | 3974 | oop* old_p = set_partial_array_mask(old); |
ysr@1280 | 3975 | assert(arrayOop(old)->length() < obj->length(), "Empty push?"); |
ysr@1280 | 3976 | _par_scan_state->push_on_queue(old_p); |
ysr@777 | 3977 | } else { |
ysr@777 | 3978 | // Restore length so that the heap remains parsable in |
ysr@777 | 3979 | // case of evacuation failure. |
ysr@777 | 3980 | arrayOop(old)->set_length(end); |
ysr@777 | 3981 | } |
ysr@1280 | 3982 | _scanner.set_region(_g1->heap_region_containing_raw(obj)); |
ysr@777 | 3983 | // process our set of indices (include header in first chunk) |
ysr@1280 | 3984 | obj->oop_iterate_range(&_scanner, start, end); |
ysr@777 | 3985 | } |
ysr@777 | 3986 | |
ysr@777 | 3987 | class G1ParEvacuateFollowersClosure : public VoidClosure { |
ysr@777 | 3988 | protected: |
ysr@777 | 3989 | G1CollectedHeap* _g1h; |
ysr@777 | 3990 | G1ParScanThreadState* _par_scan_state; |
ysr@777 | 3991 | RefToScanQueueSet* _queues; |
ysr@777 | 3992 | ParallelTaskTerminator* _terminator; |
ysr@777 | 3993 | |
ysr@777 | 3994 | G1ParScanThreadState* par_scan_state() { return _par_scan_state; } |
ysr@777 | 3995 | RefToScanQueueSet* queues() { return _queues; } |
ysr@777 | 3996 | ParallelTaskTerminator* terminator() { return _terminator; } |
ysr@777 | 3997 | |
ysr@777 | 3998 | public: |
ysr@777 | 3999 | G1ParEvacuateFollowersClosure(G1CollectedHeap* g1h, |
ysr@777 | 4000 | G1ParScanThreadState* par_scan_state, |
ysr@777 | 4001 | RefToScanQueueSet* queues, |
ysr@777 | 4002 | ParallelTaskTerminator* terminator) |
ysr@777 | 4003 | : _g1h(g1h), _par_scan_state(par_scan_state), |
ysr@777 | 4004 | _queues(queues), _terminator(terminator) {} |
ysr@777 | 4005 | |
ysr@777 | 4006 | void do_void() { |
ysr@777 | 4007 | G1ParScanThreadState* pss = par_scan_state(); |
ysr@777 | 4008 | while (true) { |
ysr@777 | 4009 | pss->trim_queue(); |
ysr@1280 | 4010 | |
ysr@1280 | 4011 | StarTask stolen_task; |
ysr@1280 | 4012 | if (queues()->steal(pss->queue_num(), pss->hash_seed(), stolen_task)) { |
tonyp@961 | 4013 | // slightly paranoid tests; I'm trying to catch potential |
tonyp@961 | 4014 | // problems before we go into push_on_queue to know where the |
tonyp@961 | 4015 | // problem is coming from |
ysr@1280 | 4016 | assert((oop*)stolen_task != NULL, "Error"); |
ysr@1280 | 4017 | if (stolen_task.is_narrow()) { |
ysr@1280 | 4018 | assert(UseCompressedOops, "Error"); |
ysr@1280 | 4019 | narrowOop* p = (narrowOop*) stolen_task; |
ysr@1280 | 4020 | assert(has_partial_array_mask(p) || |
iveresov@1696 | 4021 | _g1h->is_in_g1_reserved(oopDesc::load_decode_heap_oop(p)), "Error"); |
ysr@1280 | 4022 | pss->push_on_queue(p); |
ysr@1280 | 4023 | } else { |
ysr@1280 | 4024 | oop* p = (oop*) stolen_task; |
iveresov@1696 | 4025 | assert(has_partial_array_mask(p) || _g1h->is_in_g1_reserved(*p), "Error"); |
ysr@1280 | 4026 | pss->push_on_queue(p); |
ysr@1280 | 4027 | } |
ysr@777 | 4028 | continue; |
ysr@777 | 4029 | } |
ysr@777 | 4030 | pss->start_term_time(); |
ysr@777 | 4031 | if (terminator()->offer_termination()) break; |
ysr@777 | 4032 | pss->end_term_time(); |
ysr@777 | 4033 | } |
ysr@777 | 4034 | pss->end_term_time(); |
ysr@777 | 4035 | pss->retire_alloc_buffers(); |
ysr@777 | 4036 | } |
ysr@777 | 4037 | }; |
ysr@777 | 4038 | |
ysr@777 | 4039 | class G1ParTask : public AbstractGangTask { |
ysr@777 | 4040 | protected: |
ysr@777 | 4041 | G1CollectedHeap* _g1h; |
ysr@777 | 4042 | RefToScanQueueSet *_queues; |
ysr@777 | 4043 | ParallelTaskTerminator _terminator; |
ysr@1280 | 4044 | int _n_workers; |
ysr@777 | 4045 | |
ysr@777 | 4046 | Mutex _stats_lock; |
ysr@777 | 4047 | Mutex* stats_lock() { return &_stats_lock; } |
ysr@777 | 4048 | |
ysr@777 | 4049 | size_t getNCards() { |
ysr@777 | 4050 | return (_g1h->capacity() + G1BlockOffsetSharedArray::N_bytes - 1) |
ysr@777 | 4051 | / G1BlockOffsetSharedArray::N_bytes; |
ysr@777 | 4052 | } |
ysr@777 | 4053 | |
ysr@777 | 4054 | public: |
ysr@777 | 4055 | G1ParTask(G1CollectedHeap* g1h, int workers, RefToScanQueueSet *task_queues) |
ysr@777 | 4056 | : AbstractGangTask("G1 collection"), |
ysr@777 | 4057 | _g1h(g1h), |
ysr@777 | 4058 | _queues(task_queues), |
ysr@777 | 4059 | _terminator(workers, _queues), |
ysr@1280 | 4060 | _stats_lock(Mutex::leaf, "parallel G1 stats lock", true), |
ysr@1280 | 4061 | _n_workers(workers) |
ysr@777 | 4062 | {} |
ysr@777 | 4063 | |
ysr@777 | 4064 | RefToScanQueueSet* queues() { return _queues; } |
ysr@777 | 4065 | |
ysr@777 | 4066 | RefToScanQueue *work_queue(int i) { |
ysr@777 | 4067 | return queues()->queue(i); |
ysr@777 | 4068 | } |
ysr@777 | 4069 | |
ysr@777 | 4070 | void work(int i) { |
ysr@1280 | 4071 | if (i >= _n_workers) return; // no work needed this round |
tonyp@1966 | 4072 | |
tonyp@1966 | 4073 | double start_time_ms = os::elapsedTime() * 1000.0; |
tonyp@1966 | 4074 | _g1h->g1_policy()->record_gc_worker_start_time(i, start_time_ms); |
tonyp@1966 | 4075 | |
ysr@777 | 4076 | ResourceMark rm; |
ysr@777 | 4077 | HandleMark hm; |
ysr@777 | 4078 | |
tonyp@961 | 4079 | G1ParScanThreadState pss(_g1h, i); |
tonyp@961 | 4080 | G1ParScanHeapEvacClosure scan_evac_cl(_g1h, &pss); |
tonyp@961 | 4081 | G1ParScanHeapEvacFailureClosure evac_failure_cl(_g1h, &pss); |
tonyp@961 | 4082 | G1ParScanPartialArrayClosure partial_scan_cl(_g1h, &pss); |
ysr@777 | 4083 | |
ysr@777 | 4084 | pss.set_evac_closure(&scan_evac_cl); |
ysr@777 | 4085 | pss.set_evac_failure_closure(&evac_failure_cl); |
ysr@777 | 4086 | pss.set_partial_scan_closure(&partial_scan_cl); |
ysr@777 | 4087 | |
ysr@777 | 4088 | G1ParScanExtRootClosure only_scan_root_cl(_g1h, &pss); |
ysr@777 | 4089 | G1ParScanPermClosure only_scan_perm_cl(_g1h, &pss); |
ysr@777 | 4090 | G1ParScanHeapRSClosure only_scan_heap_rs_cl(_g1h, &pss); |
iveresov@1696 | 4091 | G1ParPushHeapRSClosure push_heap_rs_cl(_g1h, &pss); |
iveresov@1051 | 4092 | |
ysr@777 | 4093 | G1ParScanAndMarkExtRootClosure scan_mark_root_cl(_g1h, &pss); |
ysr@777 | 4094 | G1ParScanAndMarkPermClosure scan_mark_perm_cl(_g1h, &pss); |
ysr@777 | 4095 | G1ParScanAndMarkHeapRSClosure scan_mark_heap_rs_cl(_g1h, &pss); |
ysr@777 | 4096 | |
ysr@777 | 4097 | OopsInHeapRegionClosure *scan_root_cl; |
ysr@777 | 4098 | OopsInHeapRegionClosure *scan_perm_cl; |
ysr@777 | 4099 | |
tonyp@1794 | 4100 | if (_g1h->g1_policy()->during_initial_mark_pause()) { |
ysr@777 | 4101 | scan_root_cl = &scan_mark_root_cl; |
ysr@777 | 4102 | scan_perm_cl = &scan_mark_perm_cl; |
ysr@777 | 4103 | } else { |
ysr@777 | 4104 | scan_root_cl = &only_scan_root_cl; |
ysr@777 | 4105 | scan_perm_cl = &only_scan_perm_cl; |
ysr@777 | 4106 | } |
ysr@777 | 4107 | |
ysr@777 | 4108 | pss.start_strong_roots(); |
ysr@777 | 4109 | _g1h->g1_process_strong_roots(/* not collecting perm */ false, |
ysr@777 | 4110 | SharedHeap::SO_AllClasses, |
ysr@777 | 4111 | scan_root_cl, |
iveresov@1696 | 4112 | &push_heap_rs_cl, |
ysr@777 | 4113 | scan_perm_cl, |
ysr@777 | 4114 | i); |
ysr@777 | 4115 | pss.end_strong_roots(); |
ysr@777 | 4116 | { |
ysr@777 | 4117 | double start = os::elapsedTime(); |
ysr@777 | 4118 | G1ParEvacuateFollowersClosure evac(_g1h, &pss, _queues, &_terminator); |
ysr@777 | 4119 | evac.do_void(); |
ysr@777 | 4120 | double elapsed_ms = (os::elapsedTime()-start)*1000.0; |
ysr@777 | 4121 | double term_ms = pss.term_time()*1000.0; |
ysr@777 | 4122 | _g1h->g1_policy()->record_obj_copy_time(i, elapsed_ms-term_ms); |
tonyp@1966 | 4123 | _g1h->g1_policy()->record_termination(i, term_ms, pss.term_attempts()); |
ysr@777 | 4124 | } |
tonyp@1717 | 4125 | _g1h->g1_policy()->record_thread_age_table(pss.age_table()); |
ysr@777 | 4126 | _g1h->update_surviving_young_words(pss.surviving_young_words()+1); |
ysr@777 | 4127 | |
ysr@777 | 4128 | // Clean up any par-expanded rem sets. |
ysr@777 | 4129 | HeapRegionRemSet::par_cleanup(); |
ysr@777 | 4130 | |
ysr@777 | 4131 | if (ParallelGCVerbose) { |
jcoomes@2064 | 4132 | MutexLocker x(stats_lock()); |
jcoomes@2064 | 4133 | pss.print_termination_stats(i); |
ysr@777 | 4134 | } |
ysr@777 | 4135 | |
ysr@777 | 4136 | assert(pss.refs_to_scan() == 0, "Task queue should be empty"); |
ysr@777 | 4137 | assert(pss.overflowed_refs_to_scan() == 0, "Overflow queue should be empty"); |
tonyp@1966 | 4138 | double end_time_ms = os::elapsedTime() * 1000.0; |
tonyp@1966 | 4139 | _g1h->g1_policy()->record_gc_worker_end_time(i, end_time_ms); |
ysr@777 | 4140 | } |
ysr@777 | 4141 | }; |
ysr@777 | 4142 | |
ysr@777 | 4143 | // *** Common G1 Evacuation Stuff |
ysr@777 | 4144 | |
ysr@777 | 4145 | void |
ysr@777 | 4146 | G1CollectedHeap:: |
ysr@777 | 4147 | g1_process_strong_roots(bool collecting_perm_gen, |
ysr@777 | 4148 | SharedHeap::ScanningOption so, |
ysr@777 | 4149 | OopClosure* scan_non_heap_roots, |
ysr@777 | 4150 | OopsInHeapRegionClosure* scan_rs, |
ysr@777 | 4151 | OopsInGenClosure* scan_perm, |
ysr@777 | 4152 | int worker_i) { |
ysr@777 | 4153 | // First scan the strong roots, including the perm gen. |
ysr@777 | 4154 | double ext_roots_start = os::elapsedTime(); |
ysr@777 | 4155 | double closure_app_time_sec = 0.0; |
ysr@777 | 4156 | |
ysr@777 | 4157 | BufferingOopClosure buf_scan_non_heap_roots(scan_non_heap_roots); |
ysr@777 | 4158 | BufferingOopsInGenClosure buf_scan_perm(scan_perm); |
ysr@777 | 4159 | buf_scan_perm.set_generation(perm_gen()); |
ysr@777 | 4160 | |
jrose@1424 | 4161 | // Walk the code cache w/o buffering, because StarTask cannot handle |
jrose@1424 | 4162 | // unaligned oop locations. |
jrose@1424 | 4163 | CodeBlobToOopClosure eager_scan_code_roots(scan_non_heap_roots, /*do_marking=*/ true); |
jrose@1424 | 4164 | |
jrose@1424 | 4165 | process_strong_roots(false, // no scoping; this is parallel code |
jrose@1424 | 4166 | collecting_perm_gen, so, |
ysr@777 | 4167 | &buf_scan_non_heap_roots, |
jrose@1424 | 4168 | &eager_scan_code_roots, |
ysr@777 | 4169 | &buf_scan_perm); |
johnc@1829 | 4170 | |
ysr@777 | 4171 | // Finish up any enqueued closure apps. |
ysr@777 | 4172 | buf_scan_non_heap_roots.done(); |
ysr@777 | 4173 | buf_scan_perm.done(); |
ysr@777 | 4174 | double ext_roots_end = os::elapsedTime(); |
ysr@777 | 4175 | g1_policy()->reset_obj_copy_time(worker_i); |
ysr@777 | 4176 | double obj_copy_time_sec = |
ysr@777 | 4177 | buf_scan_non_heap_roots.closure_app_seconds() + |
ysr@777 | 4178 | buf_scan_perm.closure_app_seconds(); |
ysr@777 | 4179 | g1_policy()->record_obj_copy_time(worker_i, obj_copy_time_sec * 1000.0); |
ysr@777 | 4180 | double ext_root_time_ms = |
ysr@777 | 4181 | ((ext_roots_end - ext_roots_start) - obj_copy_time_sec) * 1000.0; |
ysr@777 | 4182 | g1_policy()->record_ext_root_scan_time(worker_i, ext_root_time_ms); |
ysr@777 | 4183 | |
ysr@777 | 4184 | // Scan strong roots in mark stack. |
ysr@777 | 4185 | if (!_process_strong_tasks->is_task_claimed(G1H_PS_mark_stack_oops_do)) { |
ysr@777 | 4186 | concurrent_mark()->oops_do(scan_non_heap_roots); |
ysr@777 | 4187 | } |
ysr@777 | 4188 | double mark_stack_scan_ms = (os::elapsedTime() - ext_roots_end) * 1000.0; |
ysr@777 | 4189 | g1_policy()->record_mark_stack_scan_time(worker_i, mark_stack_scan_ms); |
ysr@777 | 4190 | |
ysr@777 | 4191 | // XXX What should this be doing in the parallel case? |
ysr@777 | 4192 | g1_policy()->record_collection_pause_end_CH_strong_roots(); |
ysr@777 | 4193 | // Now scan the complement of the collection set. |
ysr@777 | 4194 | if (scan_rs != NULL) { |
ysr@777 | 4195 | g1_rem_set()->oops_into_collection_set_do(scan_rs, worker_i); |
ysr@777 | 4196 | } |
ysr@777 | 4197 | // Finish with the ref_processor roots. |
ysr@777 | 4198 | if (!_process_strong_tasks->is_task_claimed(G1H_PS_refProcessor_oops_do)) { |
ysr@777 | 4199 | ref_processor()->oops_do(scan_non_heap_roots); |
ysr@777 | 4200 | } |
ysr@777 | 4201 | g1_policy()->record_collection_pause_end_G1_strong_roots(); |
ysr@777 | 4202 | _process_strong_tasks->all_tasks_completed(); |
ysr@777 | 4203 | } |
ysr@777 | 4204 | |
ysr@777 | 4205 | void |
ysr@777 | 4206 | G1CollectedHeap::g1_process_weak_roots(OopClosure* root_closure, |
ysr@777 | 4207 | OopClosure* non_root_closure) { |
jrose@1424 | 4208 | CodeBlobToOopClosure roots_in_blobs(root_closure, /*do_marking=*/ false); |
jrose@1424 | 4209 | SharedHeap::process_weak_roots(root_closure, &roots_in_blobs, non_root_closure); |
ysr@777 | 4210 | } |
ysr@777 | 4211 | |
ysr@777 | 4212 | |
ysr@777 | 4213 | class SaveMarksClosure: public HeapRegionClosure { |
ysr@777 | 4214 | public: |
ysr@777 | 4215 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 4216 | r->save_marks(); |
ysr@777 | 4217 | return false; |
ysr@777 | 4218 | } |
ysr@777 | 4219 | }; |
ysr@777 | 4220 | |
ysr@777 | 4221 | void G1CollectedHeap::save_marks() { |
ysr@777 | 4222 | if (ParallelGCThreads == 0) { |
ysr@777 | 4223 | SaveMarksClosure sm; |
ysr@777 | 4224 | heap_region_iterate(&sm); |
ysr@777 | 4225 | } |
ysr@777 | 4226 | // We do this even in the parallel case |
ysr@777 | 4227 | perm_gen()->save_marks(); |
ysr@777 | 4228 | } |
ysr@777 | 4229 | |
ysr@777 | 4230 | void G1CollectedHeap::evacuate_collection_set() { |
ysr@777 | 4231 | set_evacuation_failed(false); |
ysr@777 | 4232 | |
ysr@777 | 4233 | g1_rem_set()->prepare_for_oops_into_collection_set_do(); |
ysr@777 | 4234 | concurrent_g1_refine()->set_use_cache(false); |
johnc@1324 | 4235 | concurrent_g1_refine()->clear_hot_cache_claimed_index(); |
johnc@1324 | 4236 | |
ysr@777 | 4237 | int n_workers = (ParallelGCThreads > 0 ? workers()->total_workers() : 1); |
ysr@777 | 4238 | set_par_threads(n_workers); |
ysr@777 | 4239 | G1ParTask g1_par_task(this, n_workers, _task_queues); |
ysr@777 | 4240 | |
ysr@777 | 4241 | init_for_evac_failure(NULL); |
ysr@777 | 4242 | |
ysr@777 | 4243 | rem_set()->prepare_for_younger_refs_iterate(true); |
iveresov@1051 | 4244 | |
iveresov@1051 | 4245 | assert(dirty_card_queue_set().completed_buffers_num() == 0, "Should be empty"); |
ysr@777 | 4246 | double start_par = os::elapsedTime(); |
ysr@777 | 4247 | if (ParallelGCThreads > 0) { |
ysr@777 | 4248 | // The individual threads will set their evac-failure closures. |
jrose@1424 | 4249 | StrongRootsScope srs(this); |
jcoomes@2064 | 4250 | if (ParallelGCVerbose) G1ParScanThreadState::print_termination_stats_hdr(); |
ysr@777 | 4251 | workers()->run_task(&g1_par_task); |
ysr@777 | 4252 | } else { |
jrose@1424 | 4253 | StrongRootsScope srs(this); |
ysr@777 | 4254 | g1_par_task.work(0); |
ysr@777 | 4255 | } |
ysr@777 | 4256 | |
ysr@777 | 4257 | double par_time = (os::elapsedTime() - start_par) * 1000.0; |
ysr@777 | 4258 | g1_policy()->record_par_time(par_time); |
ysr@777 | 4259 | set_par_threads(0); |
ysr@777 | 4260 | // Is this the right thing to do here? We don't save marks |
ysr@777 | 4261 | // on individual heap regions when we allocate from |
ysr@777 | 4262 | // them in parallel, so this seems like the correct place for this. |
apetrusenko@980 | 4263 | retire_all_alloc_regions(); |
ysr@777 | 4264 | { |
ysr@777 | 4265 | G1IsAliveClosure is_alive(this); |
ysr@777 | 4266 | G1KeepAliveClosure keep_alive(this); |
ysr@777 | 4267 | JNIHandles::weak_oops_do(&is_alive, &keep_alive); |
ysr@777 | 4268 | } |
apetrusenko@1375 | 4269 | release_gc_alloc_regions(false /* totally */); |
ysr@777 | 4270 | g1_rem_set()->cleanup_after_oops_into_collection_set_do(); |
iveresov@1051 | 4271 | |
johnc@1324 | 4272 | concurrent_g1_refine()->clear_hot_cache(); |
ysr@777 | 4273 | concurrent_g1_refine()->set_use_cache(true); |
ysr@777 | 4274 | |
ysr@777 | 4275 | finalize_for_evac_failure(); |
ysr@777 | 4276 | |
ysr@777 | 4277 | // Must do this before removing self-forwarding pointers, which clears |
ysr@777 | 4278 | // the per-region evac-failure flags. |
ysr@777 | 4279 | concurrent_mark()->complete_marking_in_collection_set(); |
ysr@777 | 4280 | |
ysr@777 | 4281 | if (evacuation_failed()) { |
ysr@777 | 4282 | remove_self_forwarding_pointers(); |
ysr@777 | 4283 | if (PrintGCDetails) { |
ysr@777 | 4284 | gclog_or_tty->print(" (evacuation failed)"); |
ysr@777 | 4285 | } else if (PrintGC) { |
ysr@777 | 4286 | gclog_or_tty->print("--"); |
ysr@777 | 4287 | } |
ysr@777 | 4288 | } |
ysr@777 | 4289 | |
iveresov@1051 | 4290 | if (G1DeferredRSUpdate) { |
iveresov@1051 | 4291 | RedirtyLoggedCardTableEntryFastClosure redirty; |
iveresov@1051 | 4292 | dirty_card_queue_set().set_closure(&redirty); |
iveresov@1051 | 4293 | dirty_card_queue_set().apply_closure_to_all_completed_buffers(); |
iveresov@1546 | 4294 | |
iveresov@1546 | 4295 | DirtyCardQueueSet& dcq = JavaThread::dirty_card_queue_set(); |
iveresov@1546 | 4296 | dcq.merge_bufferlists(&dirty_card_queue_set()); |
iveresov@1051 | 4297 | assert(dirty_card_queue_set().completed_buffers_num() == 0, "All should be consumed"); |
iveresov@1051 | 4298 | } |
ysr@777 | 4299 | COMPILER2_PRESENT(DerivedPointerTable::update_pointers()); |
ysr@777 | 4300 | } |
ysr@777 | 4301 | |
ysr@777 | 4302 | void G1CollectedHeap::free_region(HeapRegion* hr) { |
ysr@777 | 4303 | size_t pre_used = 0; |
ysr@777 | 4304 | size_t cleared_h_regions = 0; |
ysr@777 | 4305 | size_t freed_regions = 0; |
ysr@777 | 4306 | UncleanRegionList local_list; |
ysr@777 | 4307 | |
ysr@777 | 4308 | HeapWord* start = hr->bottom(); |
ysr@777 | 4309 | HeapWord* end = hr->prev_top_at_mark_start(); |
ysr@777 | 4310 | size_t used_bytes = hr->used(); |
ysr@777 | 4311 | size_t live_bytes = hr->max_live_bytes(); |
ysr@777 | 4312 | if (used_bytes > 0) { |
ysr@777 | 4313 | guarantee( live_bytes <= used_bytes, "invariant" ); |
ysr@777 | 4314 | } else { |
ysr@777 | 4315 | guarantee( live_bytes == 0, "invariant" ); |
ysr@777 | 4316 | } |
ysr@777 | 4317 | |
ysr@777 | 4318 | size_t garbage_bytes = used_bytes - live_bytes; |
ysr@777 | 4319 | if (garbage_bytes > 0) |
ysr@777 | 4320 | g1_policy()->decrease_known_garbage_bytes(garbage_bytes); |
ysr@777 | 4321 | |
ysr@777 | 4322 | free_region_work(hr, pre_used, cleared_h_regions, freed_regions, |
ysr@777 | 4323 | &local_list); |
ysr@777 | 4324 | finish_free_region_work(pre_used, cleared_h_regions, freed_regions, |
ysr@777 | 4325 | &local_list); |
ysr@777 | 4326 | } |
ysr@777 | 4327 | |
ysr@777 | 4328 | void |
ysr@777 | 4329 | G1CollectedHeap::free_region_work(HeapRegion* hr, |
ysr@777 | 4330 | size_t& pre_used, |
ysr@777 | 4331 | size_t& cleared_h_regions, |
ysr@777 | 4332 | size_t& freed_regions, |
ysr@777 | 4333 | UncleanRegionList* list, |
ysr@777 | 4334 | bool par) { |
ysr@777 | 4335 | pre_used += hr->used(); |
ysr@777 | 4336 | if (hr->isHumongous()) { |
ysr@777 | 4337 | assert(hr->startsHumongous(), |
ysr@777 | 4338 | "Only the start of a humongous region should be freed."); |
ysr@777 | 4339 | int ind = _hrs->find(hr); |
ysr@777 | 4340 | assert(ind != -1, "Should have an index."); |
ysr@777 | 4341 | // Clear the start region. |
ysr@777 | 4342 | hr->hr_clear(par, true /*clear_space*/); |
ysr@777 | 4343 | list->insert_before_head(hr); |
ysr@777 | 4344 | cleared_h_regions++; |
ysr@777 | 4345 | freed_regions++; |
ysr@777 | 4346 | // Clear any continued regions. |
ysr@777 | 4347 | ind++; |
ysr@777 | 4348 | while ((size_t)ind < n_regions()) { |
ysr@777 | 4349 | HeapRegion* hrc = _hrs->at(ind); |
ysr@777 | 4350 | if (!hrc->continuesHumongous()) break; |
ysr@777 | 4351 | // Otherwise, does continue the H region. |
ysr@777 | 4352 | assert(hrc->humongous_start_region() == hr, "Huh?"); |
ysr@777 | 4353 | hrc->hr_clear(par, true /*clear_space*/); |
ysr@777 | 4354 | cleared_h_regions++; |
ysr@777 | 4355 | freed_regions++; |
ysr@777 | 4356 | list->insert_before_head(hrc); |
ysr@777 | 4357 | ind++; |
ysr@777 | 4358 | } |
ysr@777 | 4359 | } else { |
ysr@777 | 4360 | hr->hr_clear(par, true /*clear_space*/); |
ysr@777 | 4361 | list->insert_before_head(hr); |
ysr@777 | 4362 | freed_regions++; |
ysr@777 | 4363 | // If we're using clear2, this should not be enabled. |
ysr@777 | 4364 | // assert(!hr->in_cohort(), "Can't be both free and in a cohort."); |
ysr@777 | 4365 | } |
ysr@777 | 4366 | } |
ysr@777 | 4367 | |
ysr@777 | 4368 | void G1CollectedHeap::finish_free_region_work(size_t pre_used, |
ysr@777 | 4369 | size_t cleared_h_regions, |
ysr@777 | 4370 | size_t freed_regions, |
ysr@777 | 4371 | UncleanRegionList* list) { |
ysr@777 | 4372 | if (list != NULL && list->sz() > 0) { |
ysr@777 | 4373 | prepend_region_list_on_unclean_list(list); |
ysr@777 | 4374 | } |
ysr@777 | 4375 | // Acquire a lock, if we're parallel, to update possibly-shared |
ysr@777 | 4376 | // variables. |
ysr@777 | 4377 | Mutex* lock = (n_par_threads() > 0) ? ParGCRareEvent_lock : NULL; |
ysr@777 | 4378 | { |
ysr@777 | 4379 | MutexLockerEx x(lock, Mutex::_no_safepoint_check_flag); |
ysr@777 | 4380 | _summary_bytes_used -= pre_used; |
ysr@777 | 4381 | _num_humongous_regions -= (int) cleared_h_regions; |
ysr@777 | 4382 | _free_regions += freed_regions; |
ysr@777 | 4383 | } |
ysr@777 | 4384 | } |
ysr@777 | 4385 | |
ysr@777 | 4386 | |
ysr@777 | 4387 | void G1CollectedHeap::dirtyCardsForYoungRegions(CardTableModRefBS* ct_bs, HeapRegion* list) { |
ysr@777 | 4388 | while (list != NULL) { |
ysr@777 | 4389 | guarantee( list->is_young(), "invariant" ); |
ysr@777 | 4390 | |
ysr@777 | 4391 | HeapWord* bottom = list->bottom(); |
ysr@777 | 4392 | HeapWord* end = list->end(); |
ysr@777 | 4393 | MemRegion mr(bottom, end); |
ysr@777 | 4394 | ct_bs->dirty(mr); |
ysr@777 | 4395 | |
ysr@777 | 4396 | list = list->get_next_young_region(); |
ysr@777 | 4397 | } |
ysr@777 | 4398 | } |
ysr@777 | 4399 | |
apetrusenko@1231 | 4400 | |
apetrusenko@1231 | 4401 | class G1ParCleanupCTTask : public AbstractGangTask { |
apetrusenko@1231 | 4402 | CardTableModRefBS* _ct_bs; |
apetrusenko@1231 | 4403 | G1CollectedHeap* _g1h; |
apetrusenko@1375 | 4404 | HeapRegion* volatile _su_head; |
apetrusenko@1231 | 4405 | public: |
apetrusenko@1231 | 4406 | G1ParCleanupCTTask(CardTableModRefBS* ct_bs, |
apetrusenko@1375 | 4407 | G1CollectedHeap* g1h, |
apetrusenko@1375 | 4408 | HeapRegion* survivor_list) : |
apetrusenko@1231 | 4409 | AbstractGangTask("G1 Par Cleanup CT Task"), |
apetrusenko@1231 | 4410 | _ct_bs(ct_bs), |
apetrusenko@1375 | 4411 | _g1h(g1h), |
apetrusenko@1375 | 4412 | _su_head(survivor_list) |
apetrusenko@1231 | 4413 | { } |
apetrusenko@1231 | 4414 | |
apetrusenko@1231 | 4415 | void work(int i) { |
apetrusenko@1231 | 4416 | HeapRegion* r; |
apetrusenko@1231 | 4417 | while (r = _g1h->pop_dirty_cards_region()) { |
apetrusenko@1231 | 4418 | clear_cards(r); |
apetrusenko@1231 | 4419 | } |
johnc@1829 | 4420 | // Redirty the cards of the survivor regions. |
apetrusenko@1375 | 4421 | dirty_list(&this->_su_head); |
apetrusenko@1375 | 4422 | } |
apetrusenko@1375 | 4423 | |
apetrusenko@1231 | 4424 | void clear_cards(HeapRegion* r) { |
johnc@1829 | 4425 | // Cards for Survivor regions will be dirtied later. |
johnc@1829 | 4426 | if (!r->is_survivor()) { |
apetrusenko@1231 | 4427 | _ct_bs->clear(MemRegion(r->bottom(), r->end())); |
apetrusenko@1231 | 4428 | } |
apetrusenko@1231 | 4429 | } |
apetrusenko@1375 | 4430 | |
apetrusenko@1375 | 4431 | void dirty_list(HeapRegion* volatile * head_ptr) { |
apetrusenko@1375 | 4432 | HeapRegion* head; |
apetrusenko@1375 | 4433 | do { |
apetrusenko@1375 | 4434 | // Pop region off the list. |
apetrusenko@1375 | 4435 | head = *head_ptr; |
apetrusenko@1375 | 4436 | if (head != NULL) { |
apetrusenko@1375 | 4437 | HeapRegion* r = (HeapRegion*) |
apetrusenko@1375 | 4438 | Atomic::cmpxchg_ptr(head->get_next_young_region(), head_ptr, head); |
apetrusenko@1375 | 4439 | if (r == head) { |
apetrusenko@1375 | 4440 | assert(!r->isHumongous(), "Humongous regions shouldn't be on survivor list"); |
apetrusenko@1375 | 4441 | _ct_bs->dirty(MemRegion(r->bottom(), r->end())); |
apetrusenko@1375 | 4442 | } |
apetrusenko@1375 | 4443 | } |
apetrusenko@1375 | 4444 | } while (*head_ptr != NULL); |
apetrusenko@1375 | 4445 | } |
apetrusenko@1231 | 4446 | }; |
apetrusenko@1231 | 4447 | |
apetrusenko@1231 | 4448 | |
apetrusenko@1375 | 4449 | #ifndef PRODUCT |
apetrusenko@1375 | 4450 | class G1VerifyCardTableCleanup: public HeapRegionClosure { |
apetrusenko@1375 | 4451 | CardTableModRefBS* _ct_bs; |
apetrusenko@1375 | 4452 | public: |
apetrusenko@1375 | 4453 | G1VerifyCardTableCleanup(CardTableModRefBS* ct_bs) |
apetrusenko@1375 | 4454 | : _ct_bs(ct_bs) |
apetrusenko@1375 | 4455 | { } |
apetrusenko@1375 | 4456 | virtual bool doHeapRegion(HeapRegion* r) |
apetrusenko@1375 | 4457 | { |
apetrusenko@1375 | 4458 | MemRegion mr(r->bottom(), r->end()); |
johnc@1829 | 4459 | if (r->is_survivor()) { |
apetrusenko@1375 | 4460 | _ct_bs->verify_dirty_region(mr); |
apetrusenko@1375 | 4461 | } else { |
apetrusenko@1375 | 4462 | _ct_bs->verify_clean_region(mr); |
apetrusenko@1375 | 4463 | } |
apetrusenko@1375 | 4464 | return false; |
apetrusenko@1375 | 4465 | } |
apetrusenko@1375 | 4466 | }; |
apetrusenko@1375 | 4467 | #endif |
apetrusenko@1375 | 4468 | |
ysr@777 | 4469 | void G1CollectedHeap::cleanUpCardTable() { |
ysr@777 | 4470 | CardTableModRefBS* ct_bs = (CardTableModRefBS*) (barrier_set()); |
ysr@777 | 4471 | double start = os::elapsedTime(); |
ysr@777 | 4472 | |
apetrusenko@1231 | 4473 | // Iterate over the dirty cards region list. |
apetrusenko@1375 | 4474 | G1ParCleanupCTTask cleanup_task(ct_bs, this, |
apetrusenko@1375 | 4475 | _young_list->first_survivor_region()); |
johnc@1829 | 4476 | |
apetrusenko@1231 | 4477 | if (ParallelGCThreads > 0) { |
apetrusenko@1231 | 4478 | set_par_threads(workers()->total_workers()); |
apetrusenko@1231 | 4479 | workers()->run_task(&cleanup_task); |
apetrusenko@1231 | 4480 | set_par_threads(0); |
apetrusenko@1231 | 4481 | } else { |
apetrusenko@1231 | 4482 | while (_dirty_cards_region_list) { |
apetrusenko@1231 | 4483 | HeapRegion* r = _dirty_cards_region_list; |
apetrusenko@1231 | 4484 | cleanup_task.clear_cards(r); |
apetrusenko@1231 | 4485 | _dirty_cards_region_list = r->get_next_dirty_cards_region(); |
apetrusenko@1231 | 4486 | if (_dirty_cards_region_list == r) { |
apetrusenko@1231 | 4487 | // The last region. |
apetrusenko@1231 | 4488 | _dirty_cards_region_list = NULL; |
apetrusenko@1231 | 4489 | } |
apetrusenko@1231 | 4490 | r->set_next_dirty_cards_region(NULL); |
apetrusenko@1231 | 4491 | } |
johnc@1829 | 4492 | // now, redirty the cards of the survivor regions |
apetrusenko@1375 | 4493 | // (it seemed faster to do it this way, instead of iterating over |
apetrusenko@1375 | 4494 | // all regions and then clearing / dirtying as appropriate) |
apetrusenko@1375 | 4495 | dirtyCardsForYoungRegions(ct_bs, _young_list->first_survivor_region()); |
apetrusenko@1375 | 4496 | } |
johnc@1829 | 4497 | |
ysr@777 | 4498 | double elapsed = os::elapsedTime() - start; |
ysr@777 | 4499 | g1_policy()->record_clear_ct_time( elapsed * 1000.0); |
apetrusenko@1375 | 4500 | #ifndef PRODUCT |
apetrusenko@1375 | 4501 | if (G1VerifyCTCleanup || VerifyAfterGC) { |
apetrusenko@1375 | 4502 | G1VerifyCardTableCleanup cleanup_verifier(ct_bs); |
apetrusenko@1375 | 4503 | heap_region_iterate(&cleanup_verifier); |
apetrusenko@1375 | 4504 | } |
apetrusenko@1375 | 4505 | #endif |
ysr@777 | 4506 | } |
ysr@777 | 4507 | |
ysr@777 | 4508 | void G1CollectedHeap::do_collection_pause_if_appropriate(size_t word_size) { |
ysr@777 | 4509 | if (g1_policy()->should_do_collection_pause(word_size)) { |
ysr@777 | 4510 | do_collection_pause(); |
ysr@777 | 4511 | } |
ysr@777 | 4512 | } |
ysr@777 | 4513 | |
ysr@777 | 4514 | void G1CollectedHeap::free_collection_set(HeapRegion* cs_head) { |
ysr@777 | 4515 | double young_time_ms = 0.0; |
ysr@777 | 4516 | double non_young_time_ms = 0.0; |
ysr@777 | 4517 | |
johnc@1829 | 4518 | // Since the collection set is a superset of the the young list, |
johnc@1829 | 4519 | // all we need to do to clear the young list is clear its |
johnc@1829 | 4520 | // head and length, and unlink any young regions in the code below |
johnc@1829 | 4521 | _young_list->clear(); |
johnc@1829 | 4522 | |
ysr@777 | 4523 | G1CollectorPolicy* policy = g1_policy(); |
ysr@777 | 4524 | |
ysr@777 | 4525 | double start_sec = os::elapsedTime(); |
ysr@777 | 4526 | bool non_young = true; |
ysr@777 | 4527 | |
ysr@777 | 4528 | HeapRegion* cur = cs_head; |
ysr@777 | 4529 | int age_bound = -1; |
ysr@777 | 4530 | size_t rs_lengths = 0; |
ysr@777 | 4531 | |
ysr@777 | 4532 | while (cur != NULL) { |
ysr@777 | 4533 | if (non_young) { |
ysr@777 | 4534 | if (cur->is_young()) { |
ysr@777 | 4535 | double end_sec = os::elapsedTime(); |
ysr@777 | 4536 | double elapsed_ms = (end_sec - start_sec) * 1000.0; |
ysr@777 | 4537 | non_young_time_ms += elapsed_ms; |
ysr@777 | 4538 | |
ysr@777 | 4539 | start_sec = os::elapsedTime(); |
ysr@777 | 4540 | non_young = false; |
ysr@777 | 4541 | } |
ysr@777 | 4542 | } else { |
ysr@777 | 4543 | if (!cur->is_on_free_list()) { |
ysr@777 | 4544 | double end_sec = os::elapsedTime(); |
ysr@777 | 4545 | double elapsed_ms = (end_sec - start_sec) * 1000.0; |
ysr@777 | 4546 | young_time_ms += elapsed_ms; |
ysr@777 | 4547 | |
ysr@777 | 4548 | start_sec = os::elapsedTime(); |
ysr@777 | 4549 | non_young = true; |
ysr@777 | 4550 | } |
ysr@777 | 4551 | } |
ysr@777 | 4552 | |
ysr@777 | 4553 | rs_lengths += cur->rem_set()->occupied(); |
ysr@777 | 4554 | |
ysr@777 | 4555 | HeapRegion* next = cur->next_in_collection_set(); |
ysr@777 | 4556 | assert(cur->in_collection_set(), "bad CS"); |
ysr@777 | 4557 | cur->set_next_in_collection_set(NULL); |
ysr@777 | 4558 | cur->set_in_collection_set(false); |
ysr@777 | 4559 | |
ysr@777 | 4560 | if (cur->is_young()) { |
ysr@777 | 4561 | int index = cur->young_index_in_cset(); |
ysr@777 | 4562 | guarantee( index != -1, "invariant" ); |
ysr@777 | 4563 | guarantee( (size_t)index < policy->young_cset_length(), "invariant" ); |
ysr@777 | 4564 | size_t words_survived = _surviving_young_words[index]; |
ysr@777 | 4565 | cur->record_surv_words_in_group(words_survived); |
johnc@1829 | 4566 | |
johnc@1829 | 4567 | // At this point the we have 'popped' cur from the collection set |
johnc@1829 | 4568 | // (linked via next_in_collection_set()) but it is still in the |
johnc@1829 | 4569 | // young list (linked via next_young_region()). Clear the |
johnc@1829 | 4570 | // _next_young_region field. |
johnc@1829 | 4571 | cur->set_next_young_region(NULL); |
ysr@777 | 4572 | } else { |
ysr@777 | 4573 | int index = cur->young_index_in_cset(); |
ysr@777 | 4574 | guarantee( index == -1, "invariant" ); |
ysr@777 | 4575 | } |
ysr@777 | 4576 | |
ysr@777 | 4577 | assert( (cur->is_young() && cur->young_index_in_cset() > -1) || |
ysr@777 | 4578 | (!cur->is_young() && cur->young_index_in_cset() == -1), |
ysr@777 | 4579 | "invariant" ); |
ysr@777 | 4580 | |
ysr@777 | 4581 | if (!cur->evacuation_failed()) { |
ysr@777 | 4582 | // And the region is empty. |
ysr@777 | 4583 | assert(!cur->is_empty(), |
ysr@777 | 4584 | "Should not have empty regions in a CS."); |
ysr@777 | 4585 | free_region(cur); |
ysr@777 | 4586 | } else { |
ysr@777 | 4587 | cur->uninstall_surv_rate_group(); |
ysr@777 | 4588 | if (cur->is_young()) |
ysr@777 | 4589 | cur->set_young_index_in_cset(-1); |
ysr@777 | 4590 | cur->set_not_young(); |
ysr@777 | 4591 | cur->set_evacuation_failed(false); |
ysr@777 | 4592 | } |
ysr@777 | 4593 | cur = next; |
ysr@777 | 4594 | } |
ysr@777 | 4595 | |
ysr@777 | 4596 | policy->record_max_rs_lengths(rs_lengths); |
ysr@777 | 4597 | policy->cset_regions_freed(); |
ysr@777 | 4598 | |
ysr@777 | 4599 | double end_sec = os::elapsedTime(); |
ysr@777 | 4600 | double elapsed_ms = (end_sec - start_sec) * 1000.0; |
ysr@777 | 4601 | if (non_young) |
ysr@777 | 4602 | non_young_time_ms += elapsed_ms; |
ysr@777 | 4603 | else |
ysr@777 | 4604 | young_time_ms += elapsed_ms; |
ysr@777 | 4605 | |
ysr@777 | 4606 | policy->record_young_free_cset_time_ms(young_time_ms); |
ysr@777 | 4607 | policy->record_non_young_free_cset_time_ms(non_young_time_ms); |
ysr@777 | 4608 | } |
ysr@777 | 4609 | |
johnc@1829 | 4610 | // This routine is similar to the above but does not record |
johnc@1829 | 4611 | // any policy statistics or update free lists; we are abandoning |
johnc@1829 | 4612 | // the current incremental collection set in preparation of a |
johnc@1829 | 4613 | // full collection. After the full GC we will start to build up |
johnc@1829 | 4614 | // the incremental collection set again. |
johnc@1829 | 4615 | // This is only called when we're doing a full collection |
johnc@1829 | 4616 | // and is immediately followed by the tearing down of the young list. |
johnc@1829 | 4617 | |
johnc@1829 | 4618 | void G1CollectedHeap::abandon_collection_set(HeapRegion* cs_head) { |
johnc@1829 | 4619 | HeapRegion* cur = cs_head; |
johnc@1829 | 4620 | |
johnc@1829 | 4621 | while (cur != NULL) { |
johnc@1829 | 4622 | HeapRegion* next = cur->next_in_collection_set(); |
johnc@1829 | 4623 | assert(cur->in_collection_set(), "bad CS"); |
johnc@1829 | 4624 | cur->set_next_in_collection_set(NULL); |
johnc@1829 | 4625 | cur->set_in_collection_set(false); |
johnc@1829 | 4626 | cur->set_young_index_in_cset(-1); |
johnc@1829 | 4627 | cur = next; |
johnc@1829 | 4628 | } |
johnc@1829 | 4629 | } |
johnc@1829 | 4630 | |
ysr@777 | 4631 | HeapRegion* |
ysr@777 | 4632 | G1CollectedHeap::alloc_region_from_unclean_list_locked(bool zero_filled) { |
ysr@777 | 4633 | assert(ZF_mon->owned_by_self(), "Precondition"); |
ysr@777 | 4634 | HeapRegion* res = pop_unclean_region_list_locked(); |
ysr@777 | 4635 | if (res != NULL) { |
ysr@777 | 4636 | assert(!res->continuesHumongous() && |
ysr@777 | 4637 | res->zero_fill_state() != HeapRegion::Allocated, |
ysr@777 | 4638 | "Only free regions on unclean list."); |
ysr@777 | 4639 | if (zero_filled) { |
ysr@777 | 4640 | res->ensure_zero_filled_locked(); |
ysr@777 | 4641 | res->set_zero_fill_allocated(); |
ysr@777 | 4642 | } |
ysr@777 | 4643 | } |
ysr@777 | 4644 | return res; |
ysr@777 | 4645 | } |
ysr@777 | 4646 | |
ysr@777 | 4647 | HeapRegion* G1CollectedHeap::alloc_region_from_unclean_list(bool zero_filled) { |
ysr@777 | 4648 | MutexLockerEx zx(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 4649 | return alloc_region_from_unclean_list_locked(zero_filled); |
ysr@777 | 4650 | } |
ysr@777 | 4651 | |
ysr@777 | 4652 | void G1CollectedHeap::put_region_on_unclean_list(HeapRegion* r) { |
ysr@777 | 4653 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 4654 | put_region_on_unclean_list_locked(r); |
ysr@777 | 4655 | if (should_zf()) ZF_mon->notify_all(); // Wake up ZF thread. |
ysr@777 | 4656 | } |
ysr@777 | 4657 | |
ysr@777 | 4658 | void G1CollectedHeap::set_unclean_regions_coming(bool b) { |
ysr@777 | 4659 | MutexLockerEx x(Cleanup_mon); |
ysr@777 | 4660 | set_unclean_regions_coming_locked(b); |
ysr@777 | 4661 | } |
ysr@777 | 4662 | |
ysr@777 | 4663 | void G1CollectedHeap::set_unclean_regions_coming_locked(bool b) { |
ysr@777 | 4664 | assert(Cleanup_mon->owned_by_self(), "Precondition"); |
ysr@777 | 4665 | _unclean_regions_coming = b; |
ysr@777 | 4666 | // Wake up mutator threads that might be waiting for completeCleanup to |
ysr@777 | 4667 | // finish. |
ysr@777 | 4668 | if (!b) Cleanup_mon->notify_all(); |
ysr@777 | 4669 | } |
ysr@777 | 4670 | |
ysr@777 | 4671 | void G1CollectedHeap::wait_for_cleanup_complete() { |
ysr@777 | 4672 | MutexLockerEx x(Cleanup_mon); |
ysr@777 | 4673 | wait_for_cleanup_complete_locked(); |
ysr@777 | 4674 | } |
ysr@777 | 4675 | |
ysr@777 | 4676 | void G1CollectedHeap::wait_for_cleanup_complete_locked() { |
ysr@777 | 4677 | assert(Cleanup_mon->owned_by_self(), "precondition"); |
ysr@777 | 4678 | while (_unclean_regions_coming) { |
ysr@777 | 4679 | Cleanup_mon->wait(); |
ysr@777 | 4680 | } |
ysr@777 | 4681 | } |
ysr@777 | 4682 | |
ysr@777 | 4683 | void |
ysr@777 | 4684 | G1CollectedHeap::put_region_on_unclean_list_locked(HeapRegion* r) { |
ysr@777 | 4685 | assert(ZF_mon->owned_by_self(), "precondition."); |
apetrusenko@1900 | 4686 | #ifdef ASSERT |
apetrusenko@1900 | 4687 | if (r->is_gc_alloc_region()) { |
apetrusenko@1900 | 4688 | ResourceMark rm; |
apetrusenko@1900 | 4689 | stringStream region_str; |
apetrusenko@1900 | 4690 | print_on(®ion_str); |
apetrusenko@1900 | 4691 | assert(!r->is_gc_alloc_region(), err_msg("Unexpected GC allocation region: %s", |
apetrusenko@1900 | 4692 | region_str.as_string())); |
apetrusenko@1900 | 4693 | } |
apetrusenko@1900 | 4694 | #endif |
ysr@777 | 4695 | _unclean_region_list.insert_before_head(r); |
ysr@777 | 4696 | } |
ysr@777 | 4697 | |
ysr@777 | 4698 | void |
ysr@777 | 4699 | G1CollectedHeap::prepend_region_list_on_unclean_list(UncleanRegionList* list) { |
ysr@777 | 4700 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 4701 | prepend_region_list_on_unclean_list_locked(list); |
ysr@777 | 4702 | if (should_zf()) ZF_mon->notify_all(); // Wake up ZF thread. |
ysr@777 | 4703 | } |
ysr@777 | 4704 | |
ysr@777 | 4705 | void |
ysr@777 | 4706 | G1CollectedHeap:: |
ysr@777 | 4707 | prepend_region_list_on_unclean_list_locked(UncleanRegionList* list) { |
ysr@777 | 4708 | assert(ZF_mon->owned_by_self(), "precondition."); |
ysr@777 | 4709 | _unclean_region_list.prepend_list(list); |
ysr@777 | 4710 | } |
ysr@777 | 4711 | |
ysr@777 | 4712 | HeapRegion* G1CollectedHeap::pop_unclean_region_list_locked() { |
ysr@777 | 4713 | assert(ZF_mon->owned_by_self(), "precondition."); |
ysr@777 | 4714 | HeapRegion* res = _unclean_region_list.pop(); |
ysr@777 | 4715 | if (res != NULL) { |
ysr@777 | 4716 | // Inform ZF thread that there's a new unclean head. |
ysr@777 | 4717 | if (_unclean_region_list.hd() != NULL && should_zf()) |
ysr@777 | 4718 | ZF_mon->notify_all(); |
ysr@777 | 4719 | } |
ysr@777 | 4720 | return res; |
ysr@777 | 4721 | } |
ysr@777 | 4722 | |
ysr@777 | 4723 | HeapRegion* G1CollectedHeap::peek_unclean_region_list_locked() { |
ysr@777 | 4724 | assert(ZF_mon->owned_by_self(), "precondition."); |
ysr@777 | 4725 | return _unclean_region_list.hd(); |
ysr@777 | 4726 | } |
ysr@777 | 4727 | |
ysr@777 | 4728 | |
ysr@777 | 4729 | bool G1CollectedHeap::move_cleaned_region_to_free_list_locked() { |
ysr@777 | 4730 | assert(ZF_mon->owned_by_self(), "Precondition"); |
ysr@777 | 4731 | HeapRegion* r = peek_unclean_region_list_locked(); |
ysr@777 | 4732 | if (r != NULL && r->zero_fill_state() == HeapRegion::ZeroFilled) { |
ysr@777 | 4733 | // Result of below must be equal to "r", since we hold the lock. |
ysr@777 | 4734 | (void)pop_unclean_region_list_locked(); |
ysr@777 | 4735 | put_free_region_on_list_locked(r); |
ysr@777 | 4736 | return true; |
ysr@777 | 4737 | } else { |
ysr@777 | 4738 | return false; |
ysr@777 | 4739 | } |
ysr@777 | 4740 | } |
ysr@777 | 4741 | |
ysr@777 | 4742 | bool G1CollectedHeap::move_cleaned_region_to_free_list() { |
ysr@777 | 4743 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 4744 | return move_cleaned_region_to_free_list_locked(); |
ysr@777 | 4745 | } |
ysr@777 | 4746 | |
ysr@777 | 4747 | |
ysr@777 | 4748 | void G1CollectedHeap::put_free_region_on_list_locked(HeapRegion* r) { |
ysr@777 | 4749 | assert(ZF_mon->owned_by_self(), "precondition."); |
ysr@777 | 4750 | assert(_free_region_list_size == free_region_list_length(), "Inv"); |
ysr@777 | 4751 | assert(r->zero_fill_state() == HeapRegion::ZeroFilled, |
ysr@777 | 4752 | "Regions on free list must be zero filled"); |
ysr@777 | 4753 | assert(!r->isHumongous(), "Must not be humongous."); |
ysr@777 | 4754 | assert(r->is_empty(), "Better be empty"); |
ysr@777 | 4755 | assert(!r->is_on_free_list(), |
ysr@777 | 4756 | "Better not already be on free list"); |
ysr@777 | 4757 | assert(!r->is_on_unclean_list(), |
ysr@777 | 4758 | "Better not already be on unclean list"); |
ysr@777 | 4759 | r->set_on_free_list(true); |
ysr@777 | 4760 | r->set_next_on_free_list(_free_region_list); |
ysr@777 | 4761 | _free_region_list = r; |
ysr@777 | 4762 | _free_region_list_size++; |
ysr@777 | 4763 | assert(_free_region_list_size == free_region_list_length(), "Inv"); |
ysr@777 | 4764 | } |
ysr@777 | 4765 | |
ysr@777 | 4766 | void G1CollectedHeap::put_free_region_on_list(HeapRegion* r) { |
ysr@777 | 4767 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 4768 | put_free_region_on_list_locked(r); |
ysr@777 | 4769 | } |
ysr@777 | 4770 | |
ysr@777 | 4771 | HeapRegion* G1CollectedHeap::pop_free_region_list_locked() { |
ysr@777 | 4772 | assert(ZF_mon->owned_by_self(), "precondition."); |
ysr@777 | 4773 | assert(_free_region_list_size == free_region_list_length(), "Inv"); |
ysr@777 | 4774 | HeapRegion* res = _free_region_list; |
ysr@777 | 4775 | if (res != NULL) { |
ysr@777 | 4776 | _free_region_list = res->next_from_free_list(); |
ysr@777 | 4777 | _free_region_list_size--; |
ysr@777 | 4778 | res->set_on_free_list(false); |
ysr@777 | 4779 | res->set_next_on_free_list(NULL); |
ysr@777 | 4780 | assert(_free_region_list_size == free_region_list_length(), "Inv"); |
ysr@777 | 4781 | } |
ysr@777 | 4782 | return res; |
ysr@777 | 4783 | } |
ysr@777 | 4784 | |
ysr@777 | 4785 | |
ysr@777 | 4786 | HeapRegion* G1CollectedHeap::alloc_free_region_from_lists(bool zero_filled) { |
ysr@777 | 4787 | // By self, or on behalf of self. |
ysr@777 | 4788 | assert(Heap_lock->is_locked(), "Precondition"); |
ysr@777 | 4789 | HeapRegion* res = NULL; |
ysr@777 | 4790 | bool first = true; |
ysr@777 | 4791 | while (res == NULL) { |
ysr@777 | 4792 | if (zero_filled || !first) { |
ysr@777 | 4793 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 4794 | res = pop_free_region_list_locked(); |
ysr@777 | 4795 | if (res != NULL) { |
ysr@777 | 4796 | assert(!res->zero_fill_is_allocated(), |
ysr@777 | 4797 | "No allocated regions on free list."); |
ysr@777 | 4798 | res->set_zero_fill_allocated(); |
ysr@777 | 4799 | } else if (!first) { |
ysr@777 | 4800 | break; // We tried both, time to return NULL. |
ysr@777 | 4801 | } |
ysr@777 | 4802 | } |
ysr@777 | 4803 | |
ysr@777 | 4804 | if (res == NULL) { |
ysr@777 | 4805 | res = alloc_region_from_unclean_list(zero_filled); |
ysr@777 | 4806 | } |
ysr@777 | 4807 | assert(res == NULL || |
ysr@777 | 4808 | !zero_filled || |
ysr@777 | 4809 | res->zero_fill_is_allocated(), |
ysr@777 | 4810 | "We must have allocated the region we're returning"); |
ysr@777 | 4811 | first = false; |
ysr@777 | 4812 | } |
ysr@777 | 4813 | return res; |
ysr@777 | 4814 | } |
ysr@777 | 4815 | |
ysr@777 | 4816 | void G1CollectedHeap::remove_allocated_regions_from_lists() { |
ysr@777 | 4817 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 4818 | { |
ysr@777 | 4819 | HeapRegion* prev = NULL; |
ysr@777 | 4820 | HeapRegion* cur = _unclean_region_list.hd(); |
ysr@777 | 4821 | while (cur != NULL) { |
ysr@777 | 4822 | HeapRegion* next = cur->next_from_unclean_list(); |
ysr@777 | 4823 | if (cur->zero_fill_is_allocated()) { |
ysr@777 | 4824 | // Remove from the list. |
ysr@777 | 4825 | if (prev == NULL) { |
ysr@777 | 4826 | (void)_unclean_region_list.pop(); |
ysr@777 | 4827 | } else { |
ysr@777 | 4828 | _unclean_region_list.delete_after(prev); |
ysr@777 | 4829 | } |
ysr@777 | 4830 | cur->set_on_unclean_list(false); |
ysr@777 | 4831 | cur->set_next_on_unclean_list(NULL); |
ysr@777 | 4832 | } else { |
ysr@777 | 4833 | prev = cur; |
ysr@777 | 4834 | } |
ysr@777 | 4835 | cur = next; |
ysr@777 | 4836 | } |
ysr@777 | 4837 | assert(_unclean_region_list.sz() == unclean_region_list_length(), |
ysr@777 | 4838 | "Inv"); |
ysr@777 | 4839 | } |
ysr@777 | 4840 | |
ysr@777 | 4841 | { |
ysr@777 | 4842 | HeapRegion* prev = NULL; |
ysr@777 | 4843 | HeapRegion* cur = _free_region_list; |
ysr@777 | 4844 | while (cur != NULL) { |
ysr@777 | 4845 | HeapRegion* next = cur->next_from_free_list(); |
ysr@777 | 4846 | if (cur->zero_fill_is_allocated()) { |
ysr@777 | 4847 | // Remove from the list. |
ysr@777 | 4848 | if (prev == NULL) { |
ysr@777 | 4849 | _free_region_list = cur->next_from_free_list(); |
ysr@777 | 4850 | } else { |
ysr@777 | 4851 | prev->set_next_on_free_list(cur->next_from_free_list()); |
ysr@777 | 4852 | } |
ysr@777 | 4853 | cur->set_on_free_list(false); |
ysr@777 | 4854 | cur->set_next_on_free_list(NULL); |
ysr@777 | 4855 | _free_region_list_size--; |
ysr@777 | 4856 | } else { |
ysr@777 | 4857 | prev = cur; |
ysr@777 | 4858 | } |
ysr@777 | 4859 | cur = next; |
ysr@777 | 4860 | } |
ysr@777 | 4861 | assert(_free_region_list_size == free_region_list_length(), "Inv"); |
ysr@777 | 4862 | } |
ysr@777 | 4863 | } |
ysr@777 | 4864 | |
ysr@777 | 4865 | bool G1CollectedHeap::verify_region_lists() { |
ysr@777 | 4866 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 4867 | return verify_region_lists_locked(); |
ysr@777 | 4868 | } |
ysr@777 | 4869 | |
ysr@777 | 4870 | bool G1CollectedHeap::verify_region_lists_locked() { |
ysr@777 | 4871 | HeapRegion* unclean = _unclean_region_list.hd(); |
ysr@777 | 4872 | while (unclean != NULL) { |
ysr@777 | 4873 | guarantee(unclean->is_on_unclean_list(), "Well, it is!"); |
ysr@777 | 4874 | guarantee(!unclean->is_on_free_list(), "Well, it shouldn't be!"); |
ysr@777 | 4875 | guarantee(unclean->zero_fill_state() != HeapRegion::Allocated, |
ysr@777 | 4876 | "Everything else is possible."); |
ysr@777 | 4877 | unclean = unclean->next_from_unclean_list(); |
ysr@777 | 4878 | } |
ysr@777 | 4879 | guarantee(_unclean_region_list.sz() == unclean_region_list_length(), "Inv"); |
ysr@777 | 4880 | |
ysr@777 | 4881 | HeapRegion* free_r = _free_region_list; |
ysr@777 | 4882 | while (free_r != NULL) { |
ysr@777 | 4883 | assert(free_r->is_on_free_list(), "Well, it is!"); |
ysr@777 | 4884 | assert(!free_r->is_on_unclean_list(), "Well, it shouldn't be!"); |
ysr@777 | 4885 | switch (free_r->zero_fill_state()) { |
ysr@777 | 4886 | case HeapRegion::NotZeroFilled: |
ysr@777 | 4887 | case HeapRegion::ZeroFilling: |
ysr@777 | 4888 | guarantee(false, "Should not be on free list."); |
ysr@777 | 4889 | break; |
ysr@777 | 4890 | default: |
ysr@777 | 4891 | // Everything else is possible. |
ysr@777 | 4892 | break; |
ysr@777 | 4893 | } |
ysr@777 | 4894 | free_r = free_r->next_from_free_list(); |
ysr@777 | 4895 | } |
ysr@777 | 4896 | guarantee(_free_region_list_size == free_region_list_length(), "Inv"); |
ysr@777 | 4897 | // If we didn't do an assertion... |
ysr@777 | 4898 | return true; |
ysr@777 | 4899 | } |
ysr@777 | 4900 | |
ysr@777 | 4901 | size_t G1CollectedHeap::free_region_list_length() { |
ysr@777 | 4902 | assert(ZF_mon->owned_by_self(), "precondition."); |
ysr@777 | 4903 | size_t len = 0; |
ysr@777 | 4904 | HeapRegion* cur = _free_region_list; |
ysr@777 | 4905 | while (cur != NULL) { |
ysr@777 | 4906 | len++; |
ysr@777 | 4907 | cur = cur->next_from_free_list(); |
ysr@777 | 4908 | } |
ysr@777 | 4909 | return len; |
ysr@777 | 4910 | } |
ysr@777 | 4911 | |
ysr@777 | 4912 | size_t G1CollectedHeap::unclean_region_list_length() { |
ysr@777 | 4913 | assert(ZF_mon->owned_by_self(), "precondition."); |
ysr@777 | 4914 | return _unclean_region_list.length(); |
ysr@777 | 4915 | } |
ysr@777 | 4916 | |
ysr@777 | 4917 | size_t G1CollectedHeap::n_regions() { |
ysr@777 | 4918 | return _hrs->length(); |
ysr@777 | 4919 | } |
ysr@777 | 4920 | |
ysr@777 | 4921 | size_t G1CollectedHeap::max_regions() { |
ysr@777 | 4922 | return |
ysr@777 | 4923 | (size_t)align_size_up(g1_reserved_obj_bytes(), HeapRegion::GrainBytes) / |
ysr@777 | 4924 | HeapRegion::GrainBytes; |
ysr@777 | 4925 | } |
ysr@777 | 4926 | |
ysr@777 | 4927 | size_t G1CollectedHeap::free_regions() { |
ysr@777 | 4928 | /* Possibly-expensive assert. |
ysr@777 | 4929 | assert(_free_regions == count_free_regions(), |
ysr@777 | 4930 | "_free_regions is off."); |
ysr@777 | 4931 | */ |
ysr@777 | 4932 | return _free_regions; |
ysr@777 | 4933 | } |
ysr@777 | 4934 | |
ysr@777 | 4935 | bool G1CollectedHeap::should_zf() { |
ysr@777 | 4936 | return _free_region_list_size < (size_t) G1ConcZFMaxRegions; |
ysr@777 | 4937 | } |
ysr@777 | 4938 | |
ysr@777 | 4939 | class RegionCounter: public HeapRegionClosure { |
ysr@777 | 4940 | size_t _n; |
ysr@777 | 4941 | public: |
ysr@777 | 4942 | RegionCounter() : _n(0) {} |
ysr@777 | 4943 | bool doHeapRegion(HeapRegion* r) { |
apetrusenko@1112 | 4944 | if (r->is_empty()) { |
ysr@777 | 4945 | assert(!r->isHumongous(), "H regions should not be empty."); |
ysr@777 | 4946 | _n++; |
ysr@777 | 4947 | } |
ysr@777 | 4948 | return false; |
ysr@777 | 4949 | } |
ysr@777 | 4950 | int res() { return (int) _n; } |
ysr@777 | 4951 | }; |
ysr@777 | 4952 | |
ysr@777 | 4953 | size_t G1CollectedHeap::count_free_regions() { |
ysr@777 | 4954 | RegionCounter rc; |
ysr@777 | 4955 | heap_region_iterate(&rc); |
ysr@777 | 4956 | size_t n = rc.res(); |
ysr@777 | 4957 | if (_cur_alloc_region != NULL && _cur_alloc_region->is_empty()) |
ysr@777 | 4958 | n--; |
ysr@777 | 4959 | return n; |
ysr@777 | 4960 | } |
ysr@777 | 4961 | |
ysr@777 | 4962 | size_t G1CollectedHeap::count_free_regions_list() { |
ysr@777 | 4963 | size_t n = 0; |
ysr@777 | 4964 | size_t o = 0; |
ysr@777 | 4965 | ZF_mon->lock_without_safepoint_check(); |
ysr@777 | 4966 | HeapRegion* cur = _free_region_list; |
ysr@777 | 4967 | while (cur != NULL) { |
ysr@777 | 4968 | cur = cur->next_from_free_list(); |
ysr@777 | 4969 | n++; |
ysr@777 | 4970 | } |
ysr@777 | 4971 | size_t m = unclean_region_list_length(); |
ysr@777 | 4972 | ZF_mon->unlock(); |
ysr@777 | 4973 | return n + m; |
ysr@777 | 4974 | } |
ysr@777 | 4975 | |
ysr@777 | 4976 | bool G1CollectedHeap::should_set_young_locked() { |
ysr@777 | 4977 | assert(heap_lock_held_for_gc(), |
ysr@777 | 4978 | "the heap lock should already be held by or for this thread"); |
ysr@777 | 4979 | return (g1_policy()->in_young_gc_mode() && |
ysr@777 | 4980 | g1_policy()->should_add_next_region_to_young_list()); |
ysr@777 | 4981 | } |
ysr@777 | 4982 | |
ysr@777 | 4983 | void G1CollectedHeap::set_region_short_lived_locked(HeapRegion* hr) { |
ysr@777 | 4984 | assert(heap_lock_held_for_gc(), |
ysr@777 | 4985 | "the heap lock should already be held by or for this thread"); |
ysr@777 | 4986 | _young_list->push_region(hr); |
ysr@777 | 4987 | g1_policy()->set_region_short_lived(hr); |
ysr@777 | 4988 | } |
ysr@777 | 4989 | |
ysr@777 | 4990 | class NoYoungRegionsClosure: public HeapRegionClosure { |
ysr@777 | 4991 | private: |
ysr@777 | 4992 | bool _success; |
ysr@777 | 4993 | public: |
ysr@777 | 4994 | NoYoungRegionsClosure() : _success(true) { } |
ysr@777 | 4995 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 4996 | if (r->is_young()) { |
ysr@777 | 4997 | gclog_or_tty->print_cr("Region ["PTR_FORMAT", "PTR_FORMAT") tagged as young", |
ysr@777 | 4998 | r->bottom(), r->end()); |
ysr@777 | 4999 | _success = false; |
ysr@777 | 5000 | } |
ysr@777 | 5001 | return false; |
ysr@777 | 5002 | } |
ysr@777 | 5003 | bool success() { return _success; } |
ysr@777 | 5004 | }; |
ysr@777 | 5005 | |
johnc@1829 | 5006 | bool G1CollectedHeap::check_young_list_empty(bool check_heap, bool check_sample) { |
johnc@1829 | 5007 | bool ret = _young_list->check_list_empty(check_sample); |
johnc@1829 | 5008 | |
johnc@1829 | 5009 | if (check_heap) { |
ysr@777 | 5010 | NoYoungRegionsClosure closure; |
ysr@777 | 5011 | heap_region_iterate(&closure); |
ysr@777 | 5012 | ret = ret && closure.success(); |
ysr@777 | 5013 | } |
ysr@777 | 5014 | |
ysr@777 | 5015 | return ret; |
ysr@777 | 5016 | } |
ysr@777 | 5017 | |
ysr@777 | 5018 | void G1CollectedHeap::empty_young_list() { |
ysr@777 | 5019 | assert(heap_lock_held_for_gc(), |
ysr@777 | 5020 | "the heap lock should already be held by or for this thread"); |
ysr@777 | 5021 | assert(g1_policy()->in_young_gc_mode(), "should be in young GC mode"); |
ysr@777 | 5022 | |
ysr@777 | 5023 | _young_list->empty_list(); |
ysr@777 | 5024 | } |
ysr@777 | 5025 | |
ysr@777 | 5026 | bool G1CollectedHeap::all_alloc_regions_no_allocs_since_save_marks() { |
ysr@777 | 5027 | bool no_allocs = true; |
ysr@777 | 5028 | for (int ap = 0; ap < GCAllocPurposeCount && no_allocs; ++ap) { |
ysr@777 | 5029 | HeapRegion* r = _gc_alloc_regions[ap]; |
ysr@777 | 5030 | no_allocs = r == NULL || r->saved_mark_at_top(); |
ysr@777 | 5031 | } |
ysr@777 | 5032 | return no_allocs; |
ysr@777 | 5033 | } |
ysr@777 | 5034 | |
apetrusenko@980 | 5035 | void G1CollectedHeap::retire_all_alloc_regions() { |
ysr@777 | 5036 | for (int ap = 0; ap < GCAllocPurposeCount; ++ap) { |
ysr@777 | 5037 | HeapRegion* r = _gc_alloc_regions[ap]; |
ysr@777 | 5038 | if (r != NULL) { |
ysr@777 | 5039 | // Check for aliases. |
ysr@777 | 5040 | bool has_processed_alias = false; |
ysr@777 | 5041 | for (int i = 0; i < ap; ++i) { |
ysr@777 | 5042 | if (_gc_alloc_regions[i] == r) { |
ysr@777 | 5043 | has_processed_alias = true; |
ysr@777 | 5044 | break; |
ysr@777 | 5045 | } |
ysr@777 | 5046 | } |
ysr@777 | 5047 | if (!has_processed_alias) { |
apetrusenko@980 | 5048 | retire_alloc_region(r, false /* par */); |
ysr@777 | 5049 | } |
ysr@777 | 5050 | } |
ysr@777 | 5051 | } |
ysr@777 | 5052 | } |
ysr@777 | 5053 | |
ysr@777 | 5054 | |
ysr@777 | 5055 | // Done at the start of full GC. |
ysr@777 | 5056 | void G1CollectedHeap::tear_down_region_lists() { |
ysr@777 | 5057 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 5058 | while (pop_unclean_region_list_locked() != NULL) ; |
ysr@777 | 5059 | assert(_unclean_region_list.hd() == NULL && _unclean_region_list.sz() == 0, |
jcoomes@1844 | 5060 | "Postconditions of loop."); |
ysr@777 | 5061 | while (pop_free_region_list_locked() != NULL) ; |
ysr@777 | 5062 | assert(_free_region_list == NULL, "Postcondition of loop."); |
ysr@777 | 5063 | if (_free_region_list_size != 0) { |
ysr@777 | 5064 | gclog_or_tty->print_cr("Size is %d.", _free_region_list_size); |
tonyp@1273 | 5065 | print_on(gclog_or_tty, true /* extended */); |
ysr@777 | 5066 | } |
ysr@777 | 5067 | assert(_free_region_list_size == 0, "Postconditions of loop."); |
ysr@777 | 5068 | } |
ysr@777 | 5069 | |
ysr@777 | 5070 | |
ysr@777 | 5071 | class RegionResetter: public HeapRegionClosure { |
ysr@777 | 5072 | G1CollectedHeap* _g1; |
ysr@777 | 5073 | int _n; |
ysr@777 | 5074 | public: |
ysr@777 | 5075 | RegionResetter() : _g1(G1CollectedHeap::heap()), _n(0) {} |
ysr@777 | 5076 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 5077 | if (r->continuesHumongous()) return false; |
ysr@777 | 5078 | if (r->top() > r->bottom()) { |
ysr@777 | 5079 | if (r->top() < r->end()) { |
ysr@777 | 5080 | Copy::fill_to_words(r->top(), |
ysr@777 | 5081 | pointer_delta(r->end(), r->top())); |
ysr@777 | 5082 | } |
ysr@777 | 5083 | r->set_zero_fill_allocated(); |
ysr@777 | 5084 | } else { |
ysr@777 | 5085 | assert(r->is_empty(), "tautology"); |
apetrusenko@1112 | 5086 | _n++; |
apetrusenko@1112 | 5087 | switch (r->zero_fill_state()) { |
ysr@777 | 5088 | case HeapRegion::NotZeroFilled: |
ysr@777 | 5089 | case HeapRegion::ZeroFilling: |
ysr@777 | 5090 | _g1->put_region_on_unclean_list_locked(r); |
ysr@777 | 5091 | break; |
ysr@777 | 5092 | case HeapRegion::Allocated: |
ysr@777 | 5093 | r->set_zero_fill_complete(); |
ysr@777 | 5094 | // no break; go on to put on free list. |
ysr@777 | 5095 | case HeapRegion::ZeroFilled: |
ysr@777 | 5096 | _g1->put_free_region_on_list_locked(r); |
ysr@777 | 5097 | break; |
ysr@777 | 5098 | } |
ysr@777 | 5099 | } |
ysr@777 | 5100 | return false; |
ysr@777 | 5101 | } |
ysr@777 | 5102 | |
ysr@777 | 5103 | int getFreeRegionCount() {return _n;} |
ysr@777 | 5104 | }; |
ysr@777 | 5105 | |
ysr@777 | 5106 | // Done at the end of full GC. |
ysr@777 | 5107 | void G1CollectedHeap::rebuild_region_lists() { |
ysr@777 | 5108 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 5109 | // This needs to go at the end of the full GC. |
ysr@777 | 5110 | RegionResetter rs; |
ysr@777 | 5111 | heap_region_iterate(&rs); |
ysr@777 | 5112 | _free_regions = rs.getFreeRegionCount(); |
ysr@777 | 5113 | // Tell the ZF thread it may have work to do. |
ysr@777 | 5114 | if (should_zf()) ZF_mon->notify_all(); |
ysr@777 | 5115 | } |
ysr@777 | 5116 | |
ysr@777 | 5117 | class UsedRegionsNeedZeroFillSetter: public HeapRegionClosure { |
ysr@777 | 5118 | G1CollectedHeap* _g1; |
ysr@777 | 5119 | int _n; |
ysr@777 | 5120 | public: |
ysr@777 | 5121 | UsedRegionsNeedZeroFillSetter() : _g1(G1CollectedHeap::heap()), _n(0) {} |
ysr@777 | 5122 | bool doHeapRegion(HeapRegion* r) { |
ysr@777 | 5123 | if (r->continuesHumongous()) return false; |
ysr@777 | 5124 | if (r->top() > r->bottom()) { |
ysr@777 | 5125 | // There are assertions in "set_zero_fill_needed()" below that |
ysr@777 | 5126 | // require top() == bottom(), so this is technically illegal. |
ysr@777 | 5127 | // We'll skirt the law here, by making that true temporarily. |
ysr@777 | 5128 | DEBUG_ONLY(HeapWord* save_top = r->top(); |
ysr@777 | 5129 | r->set_top(r->bottom())); |
ysr@777 | 5130 | r->set_zero_fill_needed(); |
ysr@777 | 5131 | DEBUG_ONLY(r->set_top(save_top)); |
ysr@777 | 5132 | } |
ysr@777 | 5133 | return false; |
ysr@777 | 5134 | } |
ysr@777 | 5135 | }; |
ysr@777 | 5136 | |
ysr@777 | 5137 | // Done at the start of full GC. |
ysr@777 | 5138 | void G1CollectedHeap::set_used_regions_to_need_zero_fill() { |
ysr@777 | 5139 | MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); |
ysr@777 | 5140 | // This needs to go at the end of the full GC. |
ysr@777 | 5141 | UsedRegionsNeedZeroFillSetter rs; |
ysr@777 | 5142 | heap_region_iterate(&rs); |
ysr@777 | 5143 | } |
ysr@777 | 5144 | |
ysr@777 | 5145 | void G1CollectedHeap::set_refine_cte_cl_concurrency(bool concurrent) { |
ysr@777 | 5146 | _refine_cte_cl->set_concurrent(concurrent); |
ysr@777 | 5147 | } |
ysr@777 | 5148 | |
ysr@777 | 5149 | #ifndef PRODUCT |
ysr@777 | 5150 | |
ysr@777 | 5151 | class PrintHeapRegionClosure: public HeapRegionClosure { |
ysr@777 | 5152 | public: |
ysr@777 | 5153 | bool doHeapRegion(HeapRegion *r) { |
ysr@777 | 5154 | gclog_or_tty->print("Region: "PTR_FORMAT":", r); |
ysr@777 | 5155 | if (r != NULL) { |
ysr@777 | 5156 | if (r->is_on_free_list()) |
ysr@777 | 5157 | gclog_or_tty->print("Free "); |
ysr@777 | 5158 | if (r->is_young()) |
ysr@777 | 5159 | gclog_or_tty->print("Young "); |
ysr@777 | 5160 | if (r->isHumongous()) |
ysr@777 | 5161 | gclog_or_tty->print("Is Humongous "); |
ysr@777 | 5162 | r->print(); |
ysr@777 | 5163 | } |
ysr@777 | 5164 | return false; |
ysr@777 | 5165 | } |
ysr@777 | 5166 | }; |
ysr@777 | 5167 | |
ysr@777 | 5168 | class SortHeapRegionClosure : public HeapRegionClosure { |
ysr@777 | 5169 | size_t young_regions,free_regions, unclean_regions; |
ysr@777 | 5170 | size_t hum_regions, count; |
ysr@777 | 5171 | size_t unaccounted, cur_unclean, cur_alloc; |
ysr@777 | 5172 | size_t total_free; |
ysr@777 | 5173 | HeapRegion* cur; |
ysr@777 | 5174 | public: |
ysr@777 | 5175 | SortHeapRegionClosure(HeapRegion *_cur) : cur(_cur), young_regions(0), |
ysr@777 | 5176 | free_regions(0), unclean_regions(0), |
ysr@777 | 5177 | hum_regions(0), |
ysr@777 | 5178 | count(0), unaccounted(0), |
ysr@777 | 5179 | cur_alloc(0), total_free(0) |
ysr@777 | 5180 | {} |
ysr@777 | 5181 | bool doHeapRegion(HeapRegion *r) { |
ysr@777 | 5182 | count++; |
ysr@777 | 5183 | if (r->is_on_free_list()) free_regions++; |
ysr@777 | 5184 | else if (r->is_on_unclean_list()) unclean_regions++; |
ysr@777 | 5185 | else if (r->isHumongous()) hum_regions++; |
ysr@777 | 5186 | else if (r->is_young()) young_regions++; |
ysr@777 | 5187 | else if (r == cur) cur_alloc++; |
ysr@777 | 5188 | else unaccounted++; |
ysr@777 | 5189 | return false; |
ysr@777 | 5190 | } |
ysr@777 | 5191 | void print() { |
ysr@777 | 5192 | total_free = free_regions + unclean_regions; |
ysr@777 | 5193 | gclog_or_tty->print("%d regions\n", count); |
ysr@777 | 5194 | gclog_or_tty->print("%d free: free_list = %d unclean = %d\n", |
ysr@777 | 5195 | total_free, free_regions, unclean_regions); |
ysr@777 | 5196 | gclog_or_tty->print("%d humongous %d young\n", |
ysr@777 | 5197 | hum_regions, young_regions); |
ysr@777 | 5198 | gclog_or_tty->print("%d cur_alloc\n", cur_alloc); |
ysr@777 | 5199 | gclog_or_tty->print("UHOH unaccounted = %d\n", unaccounted); |
ysr@777 | 5200 | } |
ysr@777 | 5201 | }; |
ysr@777 | 5202 | |
ysr@777 | 5203 | void G1CollectedHeap::print_region_counts() { |
ysr@777 | 5204 | SortHeapRegionClosure sc(_cur_alloc_region); |
ysr@777 | 5205 | PrintHeapRegionClosure cl; |
ysr@777 | 5206 | heap_region_iterate(&cl); |
ysr@777 | 5207 | heap_region_iterate(&sc); |
ysr@777 | 5208 | sc.print(); |
ysr@777 | 5209 | print_region_accounting_info(); |
ysr@777 | 5210 | }; |
ysr@777 | 5211 | |
ysr@777 | 5212 | bool G1CollectedHeap::regions_accounted_for() { |
ysr@777 | 5213 | // TODO: regions accounting for young/survivor/tenured |
ysr@777 | 5214 | return true; |
ysr@777 | 5215 | } |
ysr@777 | 5216 | |
ysr@777 | 5217 | bool G1CollectedHeap::print_region_accounting_info() { |
ysr@777 | 5218 | gclog_or_tty->print_cr("Free regions: %d (count: %d count list %d) (clean: %d unclean: %d).", |
ysr@777 | 5219 | free_regions(), |
ysr@777 | 5220 | count_free_regions(), count_free_regions_list(), |
ysr@777 | 5221 | _free_region_list_size, _unclean_region_list.sz()); |
ysr@777 | 5222 | gclog_or_tty->print_cr("cur_alloc: %d.", |
ysr@777 | 5223 | (_cur_alloc_region == NULL ? 0 : 1)); |
ysr@777 | 5224 | gclog_or_tty->print_cr("H regions: %d.", _num_humongous_regions); |
ysr@777 | 5225 | |
ysr@777 | 5226 | // TODO: check regions accounting for young/survivor/tenured |
ysr@777 | 5227 | return true; |
ysr@777 | 5228 | } |
ysr@777 | 5229 | |
ysr@777 | 5230 | bool G1CollectedHeap::is_in_closed_subset(const void* p) const { |
ysr@777 | 5231 | HeapRegion* hr = heap_region_containing(p); |
ysr@777 | 5232 | if (hr == NULL) { |
ysr@777 | 5233 | return is_in_permanent(p); |
ysr@777 | 5234 | } else { |
ysr@777 | 5235 | return hr->is_in(p); |
ysr@777 | 5236 | } |
ysr@777 | 5237 | } |
ysr@1376 | 5238 | #endif // !PRODUCT |
ysr@777 | 5239 | |
ysr@777 | 5240 | void G1CollectedHeap::g1_unimplemented() { |
ysr@777 | 5241 | // Unimplemented(); |
ysr@777 | 5242 | } |