1 /*
  2  * Copyright Amazon.com Inc. 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 #include "precompiled.hpp"
 25 
 26 #include "gc/shenandoah/shenandoahAgeCensus.hpp"
 27 #include "gc/shenandoah/shenandoahHeap.inline.hpp"
 28 #include "gc/shenandoah/shenandoahEvacTracker.hpp"
 29 #include "gc/shenandoah/shenandoahThreadLocalData.hpp"
 30 #include "runtime/threadSMR.inline.hpp"
 31 #include "runtime/thread.hpp"
 32 
 33 ShenandoahEvacuationStats::ShenandoahEvacuationStats()
 34   : _evacuations_completed(0), _bytes_completed(0),
 35     _evacuations_attempted(0), _bytes_attempted(0),
 36     _use_age_table(ShenandoahGenerationalCensusAtEvac || !ShenandoahGenerationalAdaptiveTenuring),
 37     _age_table(nullptr) {
 38   if (_use_age_table) {
 39     _age_table = new AgeTable(false);
 40   }
 41 }
 42 
 43 AgeTable* ShenandoahEvacuationStats::age_table() const {
 44   assert(_use_age_table, "Don't call");
 45   return _age_table;
 46 }
 47 
 48 void ShenandoahEvacuationStats::begin_evacuation(size_t bytes) {
 49   ++_evacuations_attempted;
 50   _bytes_attempted += bytes;
 51 }
 52 
 53 void ShenandoahEvacuationStats::end_evacuation(size_t bytes) {
 54   ++_evacuations_completed;
 55   _bytes_completed += bytes;
 56 }
 57 
 58 void ShenandoahEvacuationStats::record_age(size_t bytes, uint age) {
 59   assert(_use_age_table, "Don't call!");
 60   if (age <= markWord::max_age) { // Filter age sentinel.
 61     _age_table->add(age, bytes >> LogBytesPerWord);
 62   }
 63 }
 64 
 65 void ShenandoahEvacuationStats::accumulate(const ShenandoahEvacuationStats* other) {
 66   _evacuations_completed += other->_evacuations_completed;
 67   _bytes_completed += other->_bytes_completed;
 68   _evacuations_attempted += other->_evacuations_attempted;
 69   _bytes_attempted += other->_bytes_attempted;
 70   if (_use_age_table) {
 71     _age_table->merge(other->age_table());
 72   }
 73 }
 74 
 75 void ShenandoahEvacuationStats::reset() {
 76   _evacuations_completed = _evacuations_attempted = 0;
 77   _bytes_completed = _bytes_attempted = 0;
 78   if (_use_age_table) {
 79     _age_table->clear();
 80   }
 81 }
 82 
 83 void ShenandoahEvacuationStats::print_on(outputStream* st) {
 84 #ifndef PRODUCT
 85   size_t abandoned_size = _bytes_attempted - _bytes_completed;
 86   size_t abandoned_count = _evacuations_attempted - _evacuations_completed;
 87   st->print_cr("Evacuated " SIZE_FORMAT "%s across " SIZE_FORMAT " objects, "
 88             "abandoned " SIZE_FORMAT "%s across " SIZE_FORMAT " objects.",
 89             byte_size_in_proper_unit(_bytes_completed), proper_unit_for_byte_size(_bytes_completed),
 90             _evacuations_completed,
 91             byte_size_in_proper_unit(abandoned_size),   proper_unit_for_byte_size(abandoned_size),
 92             abandoned_count);
 93 #endif
 94   if (_use_age_table) {
 95     _age_table->print_on(st);
 96   }
 97 }
 98 
 99 void ShenandoahEvacuationTracker::print_global_on(outputStream* st) {
100   print_evacuations_on(st, &_workers_global, &_mutators_global);
101 }
102 
103 void ShenandoahEvacuationTracker::print_evacuations_on(outputStream* st,
104                                                        ShenandoahEvacuationStats* workers,
105                                                        ShenandoahEvacuationStats* mutators) {
106   st->print("Workers: ");
107   workers->print_on(st);
108   st->cr();
109   st->print("Mutators: ");
110   mutators->print_on(st);
111   st->cr();
112 
113   ShenandoahHeap* heap = ShenandoahHeap::heap();
114 
115   AgeTable young_region_ages(false);
116   for (uint i = 0; i < heap->num_regions(); ++i) {
117     ShenandoahHeapRegion* r = heap->get_region(i);
118     if (r->is_young()) {
119       young_region_ages.add(r->age(), r->get_live_data_words());
120     }
121   }
122   st->print("Young regions: ");
123   young_region_ages.print_on(st);
124   st->cr();
125 }
126 
127 class ShenandoahStatAggregator : public ThreadClosure {
128 public:
129   ShenandoahEvacuationStats* _target;
130   explicit ShenandoahStatAggregator(ShenandoahEvacuationStats* target) : _target(target) {}
131   void do_thread(Thread* thread) override {
132     ShenandoahEvacuationStats* local = ShenandoahThreadLocalData::evacuation_stats(thread);
133     _target->accumulate(local);
134     local->reset();
135   }
136 };
137 
138 ShenandoahCycleStats ShenandoahEvacuationTracker::flush_cycle_to_global() {
139   ShenandoahEvacuationStats mutators, workers;
140 
141   ThreadsListHandle java_threads_iterator;
142   ShenandoahStatAggregator aggregate_mutators(&mutators);
143   java_threads_iterator.list()->threads_do(&aggregate_mutators);
144 
145   ShenandoahStatAggregator aggregate_workers(&workers);
146   ShenandoahHeap::heap()->gc_threads_do(&aggregate_workers);
147 
148   _mutators_global.accumulate(&mutators);
149   _workers_global.accumulate(&workers);
150 
151   if (ShenandoahGenerationalCensusAtEvac || !ShenandoahGenerationalAdaptiveTenuring) {
152     // Ingest mutator & worker collected population vectors into the heap's
153     // global census data, and use it to compute an appropriate tenuring threshold
154     // for use in the next cycle.
155     // The first argument is used for any age 0 cohort population that we may otherwise have
156     // missed during the census. This is non-zero only when census happens at marking.
157     ShenandoahGenerationalHeap::heap()->age_census()->update_census(0, _mutators_global.age_table(), _workers_global.age_table());
158   }
159 
160   return {workers, mutators};
161 }
162 
163 void ShenandoahEvacuationTracker::begin_evacuation(Thread* thread, size_t bytes) {
164   ShenandoahThreadLocalData::begin_evacuation(thread, bytes);
165 }
166 
167 void ShenandoahEvacuationTracker::end_evacuation(Thread* thread, size_t bytes) {
168   ShenandoahThreadLocalData::end_evacuation(thread, bytes);
169 }
170 
171 void ShenandoahEvacuationTracker::record_age(Thread* thread, size_t bytes, uint age) {
172   ShenandoahThreadLocalData::record_age(thread, bytes, age);
173 }