Mercurial > hg > graal-compiler
annotate src/share/vm/gc_implementation/g1/heapRegionSeq.cpp @ 1688:2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
Summary: Pass the check in ResourceObj() if _allocation value is already set and object is allocated on stack.
Reviewed-by: dholmes, johnc
| author | kvn |
|---|---|
| date | Mon, 09 Aug 2010 15:17:05 -0700 |
| parents | c18cbe5936b8 |
| children | 72a161e62cc4 |
| rev | line source |
|---|---|
| 342 | 1 /* |
|
1552
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
960
diff
changeset
|
2 * Copyright (c) 2001, 2009, Oracle and/or its affiliates. All rights reserved. |
| 342 | 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
| 4 * | |
| 5 * This code is free software; you can redistribute it and/or modify it | |
| 6 * under the terms of the GNU General Public License version 2 only, as | |
| 7 * published by the Free Software Foundation. | |
| 8 * | |
| 9 * This code is distributed in the hope that it will be useful, but WITHOUT | |
| 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 12 * version 2 for more details (a copy is included in the LICENSE file that | |
| 13 * accompanied this code). | |
| 14 * | |
| 15 * You should have received a copy of the GNU General Public License version | |
| 16 * 2 along with this work; if not, write to the Free Software Foundation, | |
| 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. | |
| 18 * | |
|
1552
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
960
diff
changeset
|
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
|
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
960
diff
changeset
|
20 * or visit www.oracle.com if you need additional information or have any |
|
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
960
diff
changeset
|
21 * questions. |
| 342 | 22 * |
| 23 */ | |
| 24 | |
| 25 #include "incls/_precompiled.incl" | |
| 26 #include "incls/_heapRegionSeq.cpp.incl" | |
| 27 | |
| 28 // Local to this file. | |
| 29 | |
| 30 static int orderRegions(HeapRegion** hr1p, HeapRegion** hr2p) { | |
| 31 if ((*hr1p)->end() <= (*hr2p)->bottom()) return -1; | |
| 32 else if ((*hr2p)->end() <= (*hr1p)->bottom()) return 1; | |
| 33 else if (*hr1p == *hr2p) return 0; | |
| 34 else { | |
| 35 assert(false, "We should never compare distinct overlapping regions."); | |
| 36 } | |
| 37 return 0; | |
| 38 } | |
| 39 | |
| 393 | 40 HeapRegionSeq::HeapRegionSeq(const size_t max_size) : |
| 342 | 41 _alloc_search_start(0), |
| 42 // The line below is the worst bit of C++ hackery I've ever written | |
| 43 // (Detlefs, 11/23). You should think of it as equivalent to | |
| 44 // "_regions(100, true)": initialize the growable array and inform it | |
|
1688
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
45 // that it should allocate its elem array(s) on the C heap. |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
46 // |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
47 // The first argument, however, is actually a comma expression |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
48 // (set_allocation_type(this, C_HEAP), 100). The purpose of the |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
49 // set_allocation_type() call is to replace the default allocation |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
50 // type for embedded objects STACK_OR_EMBEDDED with C_HEAP. It will |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
51 // allow to pass the assert in GenericGrowableArray() which checks |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
52 // that a growable array object must be on C heap if elements are. |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
53 // |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
54 // Note: containing object is allocated on C heap since it is CHeapObj. |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
55 // |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
56 _regions((ResourceObj::set_allocation_type((address)&_regions, |
|
2dfd013a7465
6975078: assert(allocated_on_res_area() || allocated_on_C_heap() || allocated_on_arena()
kvn
parents:
1552
diff
changeset
|
57 ResourceObj::C_HEAP), |
| 393 | 58 (int)max_size), |
| 342 | 59 true), |
| 60 _next_rr_candidate(0), | |
| 61 _seq_bottom(NULL) | |
| 62 {} | |
| 63 | |
| 64 // Private methods. | |
| 65 | |
| 66 HeapWord* | |
| 67 HeapRegionSeq::alloc_obj_from_region_index(int ind, size_t word_size) { | |
| 68 assert(G1CollectedHeap::isHumongous(word_size), | |
| 69 "Allocation size should be humongous"); | |
| 70 int cur = ind; | |
| 71 int first = cur; | |
| 72 size_t sumSizes = 0; | |
| 73 while (cur < _regions.length() && sumSizes < word_size) { | |
| 74 // Loop invariant: | |
| 75 // For all i in [first, cur): | |
| 76 // _regions.at(i)->is_empty() | |
| 77 // && _regions.at(i) is contiguous with its predecessor, if any | |
| 78 // && sumSizes is the sum of the sizes of the regions in the interval | |
| 79 // [first, cur) | |
| 80 HeapRegion* curhr = _regions.at(cur); | |
| 81 if (curhr->is_empty() | |
| 82 && (first == cur | |
| 83 || (_regions.at(cur-1)->end() == | |
| 84 curhr->bottom()))) { | |
| 85 sumSizes += curhr->capacity() / HeapWordSize; | |
| 86 } else { | |
| 87 first = cur + 1; | |
| 88 sumSizes = 0; | |
| 89 } | |
| 90 cur++; | |
| 91 } | |
| 92 if (sumSizes >= word_size) { | |
| 93 _alloc_search_start = cur; | |
| 94 // Mark the allocated regions as allocated. | |
| 95 bool zf = G1CollectedHeap::heap()->allocs_are_zero_filled(); | |
| 96 HeapRegion* first_hr = _regions.at(first); | |
| 97 for (int i = first; i < cur; i++) { | |
| 98 HeapRegion* hr = _regions.at(i); | |
| 99 if (zf) | |
| 100 hr->ensure_zero_filled(); | |
| 101 { | |
| 102 MutexLockerEx x(ZF_mon, Mutex::_no_safepoint_check_flag); | |
| 103 hr->set_zero_fill_allocated(); | |
| 104 } | |
| 105 size_t sz = hr->capacity() / HeapWordSize; | |
| 106 HeapWord* tmp = hr->allocate(sz); | |
| 107 assert(tmp != NULL, "Humongous allocation failure"); | |
| 108 MemRegion mr = MemRegion(tmp, sz); | |
|
481
7d7a7c599c17
6578152: fill_region_with_object has usability and safety issues
jcoomes
parents:
393
diff
changeset
|
109 CollectedHeap::fill_with_object(mr); |
| 342 | 110 hr->declare_filled_region_to_BOT(mr); |
| 111 if (i == first) { | |
| 112 first_hr->set_startsHumongous(); | |
| 113 } else { | |
| 114 assert(i > first, "sanity"); | |
| 115 hr->set_continuesHumongous(first_hr); | |
| 116 } | |
| 117 } | |
| 118 HeapWord* first_hr_bot = first_hr->bottom(); | |
| 119 HeapWord* obj_end = first_hr_bot + word_size; | |
| 120 first_hr->set_top(obj_end); | |
| 121 return first_hr_bot; | |
| 122 } else { | |
| 123 // If we started from the beginning, we want to know why we can't alloc. | |
| 124 return NULL; | |
| 125 } | |
| 126 } | |
| 127 | |
| 677 | 128 void HeapRegionSeq::print_empty_runs() { |
| 342 | 129 int empty_run = 0; |
| 130 int n_empty = 0; | |
| 131 int empty_run_start; | |
| 132 for (int i = 0; i < _regions.length(); i++) { | |
| 133 HeapRegion* r = _regions.at(i); | |
| 134 if (r->continuesHumongous()) continue; | |
| 677 | 135 if (r->is_empty()) { |
| 342 | 136 assert(!r->isHumongous(), "H regions should not be empty."); |
| 137 if (empty_run == 0) empty_run_start = i; | |
| 138 empty_run++; | |
| 139 n_empty++; | |
| 140 } else { | |
| 141 if (empty_run > 0) { | |
| 142 gclog_or_tty->print(" %d:%d", empty_run_start, empty_run); | |
| 143 empty_run = 0; | |
| 144 } | |
| 145 } | |
| 146 } | |
| 147 if (empty_run > 0) { | |
| 148 gclog_or_tty->print(" %d:%d", empty_run_start, empty_run); | |
| 149 } | |
| 150 gclog_or_tty->print_cr(" [tot = %d]", n_empty); | |
| 151 } | |
| 152 | |
| 153 int HeapRegionSeq::find(HeapRegion* hr) { | |
| 154 // FIXME: optimized for adjacent regions of fixed size. | |
| 155 int ind = hr->hrs_index(); | |
| 156 if (ind != -1) { | |
| 157 assert(_regions.at(ind) == hr, "Mismatch"); | |
| 158 } | |
| 159 return ind; | |
| 160 } | |
| 161 | |
| 162 | |
| 163 // Public methods. | |
| 164 | |
| 165 void HeapRegionSeq::insert(HeapRegion* hr) { | |
| 393 | 166 assert(!_regions.is_full(), "Too many elements in HeapRegionSeq"); |
| 342 | 167 if (_regions.length() == 0 |
| 168 || _regions.top()->end() <= hr->bottom()) { | |
| 169 hr->set_hrs_index(_regions.length()); | |
| 170 _regions.append(hr); | |
| 171 } else { | |
| 172 _regions.append(hr); | |
| 173 _regions.sort(orderRegions); | |
| 174 for (int i = 0; i < _regions.length(); i++) { | |
| 175 _regions.at(i)->set_hrs_index(i); | |
| 176 } | |
| 177 } | |
| 178 char* bot = (char*)_regions.at(0)->bottom(); | |
| 179 if (_seq_bottom == NULL || bot < _seq_bottom) _seq_bottom = bot; | |
| 180 } | |
| 181 | |
| 182 size_t HeapRegionSeq::length() { | |
| 183 return _regions.length(); | |
| 184 } | |
| 185 | |
| 186 size_t HeapRegionSeq::free_suffix() { | |
| 187 size_t res = 0; | |
| 188 int first = _regions.length() - 1; | |
| 189 int cur = first; | |
| 190 while (cur >= 0 && | |
| 191 (_regions.at(cur)->is_empty() | |
| 192 && (first == cur | |
| 193 || (_regions.at(cur+1)->bottom() == | |
| 194 _regions.at(cur)->end())))) { | |
| 195 res++; | |
| 196 cur--; | |
| 197 } | |
| 198 return res; | |
| 199 } | |
| 200 | |
| 201 HeapWord* HeapRegionSeq::obj_allocate(size_t word_size) { | |
| 202 int cur = _alloc_search_start; | |
| 203 // Make sure "cur" is a valid index. | |
| 204 assert(cur >= 0, "Invariant."); | |
| 205 HeapWord* res = alloc_obj_from_region_index(cur, word_size); | |
| 206 if (res == NULL) | |
| 207 res = alloc_obj_from_region_index(0, word_size); | |
| 208 return res; | |
| 209 } | |
| 210 | |
| 211 void HeapRegionSeq::iterate(HeapRegionClosure* blk) { | |
| 212 iterate_from((HeapRegion*)NULL, blk); | |
| 213 } | |
| 214 | |
| 215 // The first argument r is the heap region at which iteration begins. | |
| 216 // This operation runs fastest when r is NULL, or the heap region for | |
| 217 // which a HeapRegionClosure most recently returned true, or the | |
| 218 // heap region immediately to its right in the sequence. In all | |
| 219 // other cases a linear search is required to find the index of r. | |
| 220 | |
| 221 void HeapRegionSeq::iterate_from(HeapRegion* r, HeapRegionClosure* blk) { | |
| 222 | |
| 223 // :::: FIXME :::: | |
| 224 // Static cache value is bad, especially when we start doing parallel | |
| 225 // remembered set update. For now just don't cache anything (the | |
| 226 // code in the def'd out blocks). | |
| 227 | |
| 228 #if 0 | |
| 229 static int cached_j = 0; | |
| 230 #endif | |
| 231 int len = _regions.length(); | |
| 232 int j = 0; | |
| 233 // Find the index of r. | |
| 234 if (r != NULL) { | |
| 235 #if 0 | |
| 236 assert(cached_j >= 0, "Invariant."); | |
| 237 if ((cached_j < len) && (r == _regions.at(cached_j))) { | |
| 238 j = cached_j; | |
| 239 } else if ((cached_j + 1 < len) && (r == _regions.at(cached_j + 1))) { | |
| 240 j = cached_j + 1; | |
| 241 } else { | |
| 242 j = find(r); | |
| 243 #endif | |
| 244 if (j < 0) { | |
| 245 j = 0; | |
| 246 } | |
| 247 #if 0 | |
| 248 } | |
| 249 #endif | |
| 250 } | |
| 251 int i; | |
| 252 for (i = j; i < len; i += 1) { | |
| 253 int res = blk->doHeapRegion(_regions.at(i)); | |
| 254 if (res) { | |
| 255 #if 0 | |
| 256 cached_j = i; | |
| 257 #endif | |
| 258 blk->incomplete(); | |
| 259 return; | |
| 260 } | |
| 261 } | |
| 262 for (i = 0; i < j; i += 1) { | |
| 263 int res = blk->doHeapRegion(_regions.at(i)); | |
| 264 if (res) { | |
| 265 #if 0 | |
| 266 cached_j = i; | |
| 267 #endif | |
| 268 blk->incomplete(); | |
| 269 return; | |
| 270 } | |
| 271 } | |
| 272 } | |
| 273 | |
| 274 void HeapRegionSeq::iterate_from(int idx, HeapRegionClosure* blk) { | |
| 275 int len = _regions.length(); | |
| 276 int i; | |
| 277 for (i = idx; i < len; i++) { | |
| 278 if (blk->doHeapRegion(_regions.at(i))) { | |
| 279 blk->incomplete(); | |
| 280 return; | |
| 281 } | |
| 282 } | |
| 283 for (i = 0; i < idx; i++) { | |
| 284 if (blk->doHeapRegion(_regions.at(i))) { | |
| 285 blk->incomplete(); | |
| 286 return; | |
| 287 } | |
| 288 } | |
| 289 } | |
| 290 | |
| 291 MemRegion HeapRegionSeq::shrink_by(size_t shrink_bytes, | |
| 292 size_t& num_regions_deleted) { | |
| 293 assert(shrink_bytes % os::vm_page_size() == 0, "unaligned"); | |
| 294 assert(shrink_bytes % HeapRegion::GrainBytes == 0, "unaligned"); | |
| 295 | |
| 296 if (_regions.length() == 0) { | |
| 297 num_regions_deleted = 0; | |
| 298 return MemRegion(); | |
| 299 } | |
| 300 int j = _regions.length() - 1; | |
| 301 HeapWord* end = _regions.at(j)->end(); | |
| 302 HeapWord* last_start = end; | |
| 303 while (j >= 0 && shrink_bytes > 0) { | |
| 304 HeapRegion* cur = _regions.at(j); | |
| 305 // We have to leave humongous regions where they are, | |
| 306 // and work around them. | |
| 307 if (cur->isHumongous()) { | |
| 308 return MemRegion(last_start, end); | |
| 309 } | |
| 310 assert(cur == _regions.top(), "Should be top"); | |
| 311 if (!cur->is_empty()) break; | |
|
960
eb058abd0562
6861557: G1: assert(top() == bottom() || zfs == Allocated,"Region must be empty, or ...")
ysr
parents:
677
diff
changeset
|
312 cur->reset_zero_fill(); |
| 342 | 313 shrink_bytes -= cur->capacity(); |
| 314 num_regions_deleted++; | |
| 315 _regions.pop(); | |
| 316 last_start = cur->bottom(); | |
| 317 // We need to delete these somehow, but can't currently do so here: if | |
| 318 // we do, the ZF thread may still access the deleted region. We'll | |
| 319 // leave this here as a reminder that we have to do something about | |
| 320 // this. | |
| 321 // delete cur; | |
| 322 j--; | |
| 323 } | |
| 324 return MemRegion(last_start, end); | |
| 325 } | |
| 326 | |
| 327 | |
| 328 class PrintHeapRegionClosure : public HeapRegionClosure { | |
| 329 public: | |
| 330 bool doHeapRegion(HeapRegion* r) { | |
| 331 gclog_or_tty->print(PTR_FORMAT ":", r); | |
| 332 r->print(); | |
| 333 return false; | |
| 334 } | |
| 335 }; | |
| 336 | |
| 337 void HeapRegionSeq::print() { | |
| 338 PrintHeapRegionClosure cl; | |
| 339 iterate(&cl); | |
| 340 } |