1 /*
   2  * Copyright (c) 2001, 2015, Oracle and/or its affiliates. All rights reserved.
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * This code is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 only, as
   7  * published by the Free Software Foundation.
   8  *
   9  * This code is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12  * version 2 for more details (a copy is included in the LICENSE file that
  13  * accompanied this code).
  14  *
  15  * You should have received a copy of the GNU General Public License version
  16  * 2 along with this work; if not, write to the Free Software Foundation,
  17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  18  *
  19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  20  * or visit www.oracle.com if you need additional information or have any
  21  * questions.
  22  *
  23  */
  24 
  25 #include "precompiled.hpp"
  26 #include "gc/g1/collectionSetChooser.hpp"
  27 #include "gc/g1/g1CollectedHeap.inline.hpp"
  28 #include "gc/g1/g1CollectorPolicy.hpp"
  29 #include "gc/g1/g1ErgoVerbose.hpp"
  30 #include "gc/shared/space.inline.hpp"
  31 #include "runtime/atomic.inline.hpp"
  32 
  33 // Even though we don't use the GC efficiency in our heuristics as
  34 // much as we used to, we still order according to GC efficiency. This
  35 // will cause regions with a lot of live objects and large RSets to
  36 // end up at the end of the array. Given that we might skip collecting
  37 // the last few old regions, if after a few mixed GCs the remaining
  38 // have reclaimable bytes under a certain threshold, the hope is that
  39 // the ones we'll skip are ones with both large RSets and a lot of
  40 // live objects, not the ones with just a lot of live objects if we
  41 // ordered according to the amount of reclaimable bytes per region.
  42 static int order_regions(HeapRegion* hr1, HeapRegion* hr2) {
  43   if (hr1 == NULL) {
  44     if (hr2 == NULL) {
  45       return 0;
  46     } else {
  47       return 1;
  48     }
  49   } else if (hr2 == NULL) {
  50     return -1;
  51   }
  52 
  53   double gc_eff1 = hr1->gc_efficiency();
  54   double gc_eff2 = hr2->gc_efficiency();
  55   if (gc_eff1 > gc_eff2) {
  56     return -1;
  57   } if (gc_eff1 < gc_eff2) {
  58     return 1;
  59   } else {
  60     return 0;
  61   }
  62 }
  63 
  64 static int order_regions(HeapRegion** hr1p, HeapRegion** hr2p) {
  65   return order_regions(*hr1p, *hr2p);
  66 }
  67 
  68 CollectionSetChooser::CollectionSetChooser() :
  69   // The line below is the worst bit of C++ hackery I've ever written
  70   // (Detlefs, 11/23).  You should think of it as equivalent to
  71   // "_regions(100, true)": initialize the growable array and inform it
  72   // that it should allocate its elem array(s) on the C heap.
  73   //
  74   // The first argument, however, is actually a comma expression
  75   // (set_allocation_type(this, C_HEAP), 100). The purpose of the
  76   // set_allocation_type() call is to replace the default allocation
  77   // type for embedded objects STACK_OR_EMBEDDED with C_HEAP. It will
  78   // allow to pass the assert in GenericGrowableArray() which checks
  79   // that a growable array object must be on C heap if elements are.
  80   //
  81   // Note: containing object is allocated on C heap since it is CHeapObj.
  82   //
  83   _regions((ResourceObj::set_allocation_type((address) &_regions,
  84                                              ResourceObj::C_HEAP),
  85                   100), true /* C_Heap */),
  86     _front(0), _end(0), _first_par_unreserved_idx(0),
  87     _region_live_threshold_bytes(0), _remaining_reclaimable_bytes(0) {
  88   _region_live_threshold_bytes =
  89     HeapRegion::GrainBytes * (size_t) G1MixedGCLiveThresholdPercent / 100;
  90 }
  91 
  92 #ifndef PRODUCT
  93 void CollectionSetChooser::verify() {
  94   guarantee(_end <= regions_length(), "_end: %u regions length: %u", _end, regions_length());
  95   guarantee(_front <= _end, "_front: %u _end: %u", _front, _end);
  96   uint index = 0;
  97   size_t sum_of_reclaimable_bytes = 0;
  98   while (index < _front) {
  99     guarantee(regions_at(index) == NULL,
 100               "all entries before _front should be NULL");
 101     index += 1;
 102   }
 103   HeapRegion *prev = NULL;
 104   while (index < _end) {
 105     HeapRegion *curr = regions_at(index++);
 106     guarantee(curr != NULL, "Regions in _regions array cannot be NULL");
 107     guarantee(!curr->is_young(), "should not be young!");
 108     guarantee(!curr->is_pinned(),
 109               "Pinned region should not be in collection set (index %u)", curr->hrm_index());
 110     if (prev != NULL) {
 111       guarantee(order_regions(prev, curr) != 1,
 112                 "GC eff prev: %1.4f GC eff curr: %1.4f",
 113                 prev->gc_efficiency(), curr->gc_efficiency());
 114     }
 115     sum_of_reclaimable_bytes += curr->reclaimable_bytes();
 116     prev = curr;
 117   }
 118   guarantee(sum_of_reclaimable_bytes == _remaining_reclaimable_bytes,
 119             "reclaimable bytes inconsistent, "
 120             "remaining: " SIZE_FORMAT " sum: " SIZE_FORMAT,
 121             _remaining_reclaimable_bytes, sum_of_reclaimable_bytes);
 122 }
 123 #endif // !PRODUCT
 124 
 125 void CollectionSetChooser::sort_regions() {
 126   // First trim any unused portion of the top in the parallel case.
 127   if (_first_par_unreserved_idx > 0) {
 128     assert(_first_par_unreserved_idx <= regions_length(),
 129            "Or we didn't reserved enough length");
 130     regions_trunc_to(_first_par_unreserved_idx);
 131   }
 132   _regions.sort(order_regions);
 133   assert(_end <= regions_length(), "Requirement");
 134 #ifdef ASSERT
 135   for (uint i = 0; i < _end; i++) {
 136     assert(regions_at(i) != NULL, "Should be true by sorting!");
 137   }
 138 #endif // ASSERT
 139   if (G1PrintRegionLivenessInfo) {
 140     G1PrintRegionLivenessInfoClosure cl(gclog_or_tty, "Post-Sorting");
 141     for (uint i = 0; i < _end; ++i) {
 142       HeapRegion* r = regions_at(i);
 143       cl.doHeapRegion(r);
 144     }
 145   }
 146   verify();
 147 }
 148 
 149 
 150 void CollectionSetChooser::add_region(HeapRegion* hr) {
 151   assert(!hr->is_pinned(),
 152          "Pinned region shouldn't be added to the collection set (index %u)", hr->hrm_index());
 153   assert(!hr->is_young(), "should not be young!");
 154   _regions.append(hr);
 155   _end++;
 156   _remaining_reclaimable_bytes += hr->reclaimable_bytes();
 157   hr->calc_gc_efficiency();
 158 }
 159 
 160 void CollectionSetChooser::push(HeapRegion* hr) {
 161   assert(hr != NULL, "Can't put back a NULL region");
 162   assert(_front >= 1, "Too many regions have been put back");
 163   _front--;
 164   regions_at_put(_front, hr);
 165   _remaining_reclaimable_bytes += hr->reclaimable_bytes();
 166 }
 167 
 168 void CollectionSetChooser::prepare_for_par_region_addition(uint n_threads,
 169                                                            uint n_regions,
 170                                                            uint chunk_size) {
 171   _first_par_unreserved_idx = 0;
 172   uint max_waste = n_threads * chunk_size;
 173   // it should be aligned with respect to chunk_size
 174   uint aligned_n_regions = (n_regions + chunk_size - 1) / chunk_size * chunk_size;
 175   assert(aligned_n_regions % chunk_size == 0, "should be aligned");
 176   regions_at_put_grow(aligned_n_regions + max_waste - 1, NULL);
 177 }
 178 
 179 uint CollectionSetChooser::claim_array_chunk(uint chunk_size) {
 180   uint res = (uint) Atomic::add((jint) chunk_size,
 181                                 (volatile jint*) &_first_par_unreserved_idx);
 182   assert(regions_length() > res + chunk_size - 1,
 183          "Should already have been expanded");
 184   return res - chunk_size;
 185 }
 186 
 187 void CollectionSetChooser::set_region(uint index, HeapRegion* hr) {
 188   assert(regions_at(index) == NULL, "precondition");
 189   assert(!hr->is_young(), "should not be young!");
 190   regions_at_put(index, hr);
 191   hr->calc_gc_efficiency();
 192 }
 193 
 194 void CollectionSetChooser::update_totals(uint region_num,
 195                                          size_t reclaimable_bytes) {
 196   // Only take the lock if we actually need to update the totals.
 197   if (region_num > 0) {
 198     assert(reclaimable_bytes > 0, "invariant");
 199     // We could have just used atomics instead of taking the
 200     // lock. However, we currently don't have an atomic add for size_t.
 201     MutexLockerEx x(ParGCRareEvent_lock, Mutex::_no_safepoint_check_flag);
 202     _end += region_num;
 203     _remaining_reclaimable_bytes += reclaimable_bytes;
 204   } else {
 205     assert(reclaimable_bytes == 0, "invariant");
 206   }
 207 }
 208 
 209 void CollectionSetChooser::clear() {
 210   _regions.clear();
 211   _front = 0;
 212   _end = 0;
 213   _remaining_reclaimable_bytes = 0;
 214 };