1 /*
   2  * Copyright (c) 2013, 2014 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 
  26 #include "precompiled.hpp"
  27 #include "gc_implementation/g1/g1CollectedHeap.inline.hpp"
  28 #include "gc_implementation/g1/g1GCPhaseTimes.hpp"
  29 #include "gc_implementation/g1/g1Log.hpp"
  30 #include "gc_implementation/g1/g1StringDedup.hpp"
  31 
  32 // Helper class for avoiding interleaved logging
  33 class LineBuffer: public StackObj {
  34 
  35 private:
  36   static const int BUFFER_LEN = 1024;
  37   static const int INDENT_CHARS = 3;
  38   char _buffer[BUFFER_LEN];
  39   int _indent_level;
  40   int _cur;
  41 
  42   void vappend(const char* format, va_list ap) {
  43     int res = vsnprintf(&_buffer[_cur], BUFFER_LEN - _cur, format, ap);
  44     if (res != -1) {
  45       _cur += res;
  46     } else {
  47       DEBUG_ONLY(warning("buffer too small in LineBuffer");)
  48       _buffer[BUFFER_LEN -1] = 0;
  49       _cur = BUFFER_LEN; // vsnprintf above should not add to _buffer if we are called again
  50     }
  51   }
  52 
  53 public:
  54   explicit LineBuffer(int indent_level): _indent_level(indent_level), _cur(0) {
  55     for (; (_cur < BUFFER_LEN && _cur < (_indent_level * INDENT_CHARS)); _cur++) {
  56       _buffer[_cur] = ' ';
  57     }
  58   }
  59 
  60 #ifndef PRODUCT
  61   ~LineBuffer() {
  62     assert(_cur == _indent_level * INDENT_CHARS, "pending data in buffer - append_and_print_cr() not called?");
  63   }
  64 #endif
  65 
  66   void append(const char* format, ...) {
  67     va_list ap;
  68     va_start(ap, format);
  69     vappend(format, ap);
  70     va_end(ap);
  71   }
  72 
  73   void append_and_print_cr(const char* format, ...) {
  74     va_list ap;
  75     va_start(ap, format);
  76     vappend(format, ap);
  77     va_end(ap);
  78     gclog_or_tty->print_cr("%s", _buffer);
  79     _cur = _indent_level * INDENT_CHARS;
  80   }
  81 };
  82 
  83 template <class T>
  84 void WorkerDataArray<T>::print(int level, const char* title) {
  85   if (_length == 1) {
  86     // No need for min, max, average and sum for only one worker
  87     LineBuffer buf(level);
  88     buf.append("[%s:  ", title);
  89     buf.append(_print_format, _data[0]);
  90     buf.append_and_print_cr("]");
  91     return;
  92   }
  93 
  94   T min = _data[0];
  95   T max = _data[0];
  96   T sum = 0;
  97 
  98   LineBuffer buf(level);
  99   buf.append("[%s:", title);
 100   for (uint i = 0; i < _length; ++i) {
 101     T val = _data[i];
 102     min = MIN2(val, min);
 103     max = MAX2(val, max);
 104     sum += val;
 105     if (G1Log::finest()) {
 106       buf.append("  ");
 107       buf.append(_print_format, val);
 108     }
 109   }
 110 
 111   if (G1Log::finest()) {
 112     buf.append_and_print_cr("");
 113   }
 114 
 115   double avg = (double)sum / (double)_length;
 116   buf.append(" Min: ");
 117   buf.append(_print_format, min);
 118   buf.append(", Avg: ");
 119   buf.append("%.1lf", avg); // Always print average as a double
 120   buf.append(", Max: ");
 121   buf.append(_print_format, max);
 122   buf.append(", Diff: ");
 123   buf.append(_print_format, max - min);
 124   if (_print_sum) {
 125     // for things like the start and end times the sum is not
 126     // that relevant
 127     buf.append(", Sum: ");
 128     buf.append(_print_format, sum);
 129   }
 130   buf.append_and_print_cr("]");
 131 }
 132 
 133 #ifndef PRODUCT
 134 
 135 template <> const int WorkerDataArray<int>::_uninitialized = -1;
 136 template <> const double WorkerDataArray<double>::_uninitialized = -1.0;
 137 template <> const size_t WorkerDataArray<size_t>::_uninitialized = (size_t)-1;
 138 
 139 template <class T>
 140 void WorkerDataArray<T>::reset() {
 141   for (uint i = 0; i < _length; i++) {
 142     _data[i] = (T)_uninitialized;
 143   }
 144 }
 145 
 146 template <class T>
 147 void WorkerDataArray<T>::verify() {
 148   for (uint i = 0; i < _length; i++) {
 149     assert(_data[i] != _uninitialized,
 150         err_msg("Invalid data for worker %u, data: %lf, uninitialized: %lf",
 151             i, (double)_data[i], (double)_uninitialized));
 152   }
 153 }
 154 
 155 #endif
 156 
 157 G1GCPhaseTimes::G1GCPhaseTimes(uint max_gc_threads) :
 158   _max_gc_threads(max_gc_threads),
 159   _last_gc_worker_start_times_ms(_max_gc_threads, "%.1lf", false),
 160   _last_ext_root_scan_times_ms(_max_gc_threads, "%.1lf"),
 161   _last_satb_filtering_times_ms(_max_gc_threads, "%.1lf"),
 162   _last_update_rs_times_ms(_max_gc_threads, "%.1lf"),
 163   _last_update_rs_processed_buffers(_max_gc_threads, "%d"),
 164   _last_scan_rs_times_ms(_max_gc_threads, "%.1lf"),
 165   _last_strong_code_root_scan_times_ms(_max_gc_threads, "%.1lf"),
 166   _last_strong_code_root_mark_times_ms(_max_gc_threads, "%.1lf"),
 167   _last_obj_copy_times_ms(_max_gc_threads, "%.1lf"),
 168   _last_termination_times_ms(_max_gc_threads, "%.1lf"),
 169   _last_termination_attempts(_max_gc_threads, SIZE_FORMAT),
 170   _last_gc_worker_end_times_ms(_max_gc_threads, "%.1lf", false),
 171   _last_gc_worker_times_ms(_max_gc_threads, "%.1lf"),
 172   _last_gc_worker_other_times_ms(_max_gc_threads, "%.1lf"),
 173   _last_redirty_logged_cards_time_ms(_max_gc_threads, "%.1lf"),
 174   _last_redirty_logged_cards_processed_cards(_max_gc_threads, SIZE_FORMAT),
 175   _cur_string_dedup_queue_fixup_worker_times_ms(_max_gc_threads, "%.1lf"),
 176   _cur_string_dedup_table_fixup_worker_times_ms(_max_gc_threads, "%.1lf")
 177 {
 178   assert(max_gc_threads > 0, "Must have some GC threads");
 179 }
 180 
 181 void G1GCPhaseTimes::note_gc_start(uint active_gc_threads) {
 182   assert(active_gc_threads > 0, "The number of threads must be > 0");
 183   assert(active_gc_threads <= _max_gc_threads, "The number of active threads must be <= the max nubmer of threads");
 184   _active_gc_threads = active_gc_threads;
 185 
 186   _last_gc_worker_start_times_ms.reset();
 187   _last_ext_root_scan_times_ms.reset();
 188   _last_satb_filtering_times_ms.reset();
 189   _last_update_rs_times_ms.reset();
 190   _last_update_rs_processed_buffers.reset();
 191   _last_scan_rs_times_ms.reset();
 192   _last_strong_code_root_scan_times_ms.reset();
 193   _last_strong_code_root_mark_times_ms.reset();
 194   _last_obj_copy_times_ms.reset();
 195   _last_termination_times_ms.reset();
 196   _last_termination_attempts.reset();
 197   _last_gc_worker_end_times_ms.reset();
 198   _last_gc_worker_times_ms.reset();
 199   _last_gc_worker_other_times_ms.reset();
 200 
 201   _last_redirty_logged_cards_time_ms.reset();
 202   _last_redirty_logged_cards_processed_cards.reset();
 203 
 204 }
 205 
 206 void G1GCPhaseTimes::note_gc_end() {
 207   _last_gc_worker_start_times_ms.verify();
 208   _last_ext_root_scan_times_ms.verify();
 209   _last_satb_filtering_times_ms.verify();
 210   _last_update_rs_times_ms.verify();
 211   _last_update_rs_processed_buffers.verify();
 212   _last_scan_rs_times_ms.verify();
 213   _last_strong_code_root_scan_times_ms.verify();
 214   _last_strong_code_root_mark_times_ms.verify();
 215   _last_obj_copy_times_ms.verify();
 216   _last_termination_times_ms.verify();
 217   _last_termination_attempts.verify();
 218   _last_gc_worker_end_times_ms.verify();
 219 
 220   for (uint i = 0; i < _active_gc_threads; i++) {
 221     double worker_time = _last_gc_worker_end_times_ms.get(i) - _last_gc_worker_start_times_ms.get(i);
 222     _last_gc_worker_times_ms.set(i, worker_time);
 223 
 224     double worker_known_time = _last_ext_root_scan_times_ms.get(i) +
 225                                _last_satb_filtering_times_ms.get(i) +
 226                                _last_update_rs_times_ms.get(i) +
 227                                _last_scan_rs_times_ms.get(i) +
 228                                _last_strong_code_root_scan_times_ms.get(i) +
 229                                _last_strong_code_root_mark_times_ms.get(i) +
 230                                _last_obj_copy_times_ms.get(i) +
 231                                _last_termination_times_ms.get(i);
 232 
 233     double worker_other_time = worker_time - worker_known_time;
 234     _last_gc_worker_other_times_ms.set(i, worker_other_time);
 235   }
 236 
 237   _last_gc_worker_times_ms.verify();
 238   _last_gc_worker_other_times_ms.verify();
 239 
 240   _last_redirty_logged_cards_time_ms.verify();
 241   _last_redirty_logged_cards_processed_cards.verify();
 242 }
 243 
 244 void G1GCPhaseTimes::note_string_dedup_fixup_start() {
 245   _cur_string_dedup_queue_fixup_worker_times_ms.reset();
 246   _cur_string_dedup_table_fixup_worker_times_ms.reset();
 247 }
 248 
 249 void G1GCPhaseTimes::note_string_dedup_fixup_end() {
 250   _cur_string_dedup_queue_fixup_worker_times_ms.verify();
 251   _cur_string_dedup_table_fixup_worker_times_ms.verify();
 252 }
 253 
 254 void G1GCPhaseTimes::print_stats(int level, const char* str, double value) {
 255   LineBuffer(level).append_and_print_cr("[%s: %.1lf ms]", str, value);
 256 }
 257 
 258 void G1GCPhaseTimes::print_stats(int level, const char* str, double value, uint workers) {
 259   LineBuffer(level).append_and_print_cr("[%s: %.1lf ms, GC Workers: %u]", str, value, workers);
 260 }
 261 
 262 double G1GCPhaseTimes::accounted_time_ms() {
 263     // Subtract the root region scanning wait time. It's initialized to
 264     // zero at the start of the pause.
 265     double misc_time_ms = _root_region_scan_wait_time_ms;
 266 
 267     misc_time_ms += _cur_collection_par_time_ms;
 268 
 269     // Now subtract the time taken to fix up roots in generated code
 270     misc_time_ms += _cur_collection_code_root_fixup_time_ms;
 271 
 272     // Strong code root migration time
 273     misc_time_ms += _cur_strong_code_root_migration_time_ms;
 274 
 275     // Strong code root purge time
 276     misc_time_ms += _cur_strong_code_root_purge_time_ms;
 277 
 278     if (G1StringDedup::is_enabled()) {
 279       // String dedup fixup time
 280       misc_time_ms += _cur_string_dedup_fixup_time_ms;
 281     }
 282 
 283     // Subtract the time taken to clean the card table from the
 284     // current value of "other time"
 285     misc_time_ms += _cur_clear_ct_time_ms;
 286 
 287     return misc_time_ms;
 288 }
 289 
 290 void G1GCPhaseTimes::print(double pause_time_sec) {
 291   if (_root_region_scan_wait_time_ms > 0.0) {
 292     print_stats(1, "Root Region Scan Waiting", _root_region_scan_wait_time_ms);
 293   }
 294   if (G1CollectedHeap::use_parallel_gc_threads()) {
 295     print_stats(1, "Parallel Time", _cur_collection_par_time_ms, _active_gc_threads);
 296     _last_gc_worker_start_times_ms.print(2, "GC Worker Start (ms)");
 297     _last_ext_root_scan_times_ms.print(2, "Ext Root Scanning (ms)");
 298     if (_last_satb_filtering_times_ms.sum() > 0.0) {
 299       _last_satb_filtering_times_ms.print(2, "SATB Filtering (ms)");
 300     }
 301     if (_last_strong_code_root_mark_times_ms.sum() > 0.0) {
 302      _last_strong_code_root_mark_times_ms.print(2, "Code Root Marking (ms)");
 303     }
 304     _last_update_rs_times_ms.print(2, "Update RS (ms)");
 305       _last_update_rs_processed_buffers.print(3, "Processed Buffers");
 306     _last_scan_rs_times_ms.print(2, "Scan RS (ms)");
 307     _last_strong_code_root_scan_times_ms.print(2, "Code Root Scanning (ms)");
 308     _last_obj_copy_times_ms.print(2, "Object Copy (ms)");
 309     _last_termination_times_ms.print(2, "Termination (ms)");
 310     if (G1Log::finest()) {
 311       _last_termination_attempts.print(3, "Termination Attempts");
 312     }
 313     _last_gc_worker_other_times_ms.print(2, "GC Worker Other (ms)");
 314     _last_gc_worker_times_ms.print(2, "GC Worker Total (ms)");
 315     _last_gc_worker_end_times_ms.print(2, "GC Worker End (ms)");
 316   } else {
 317     _last_ext_root_scan_times_ms.print(1, "Ext Root Scanning (ms)");
 318     if (_last_satb_filtering_times_ms.sum() > 0.0) {
 319       _last_satb_filtering_times_ms.print(1, "SATB Filtering (ms)");
 320     }
 321     if (_last_strong_code_root_mark_times_ms.sum() > 0.0) {
 322       _last_strong_code_root_mark_times_ms.print(1, "Code Root Marking (ms)");
 323     }
 324     _last_update_rs_times_ms.print(1, "Update RS (ms)");
 325       _last_update_rs_processed_buffers.print(2, "Processed Buffers");
 326     _last_scan_rs_times_ms.print(1, "Scan RS (ms)");
 327     _last_strong_code_root_scan_times_ms.print(1, "Code Root Scanning (ms)");
 328     _last_obj_copy_times_ms.print(1, "Object Copy (ms)");
 329   }
 330   print_stats(1, "Code Root Fixup", _cur_collection_code_root_fixup_time_ms);
 331   print_stats(1, "Code Root Migration", _cur_strong_code_root_migration_time_ms);
 332   print_stats(1, "Code Root Purge", _cur_strong_code_root_purge_time_ms);
 333   if (G1StringDedup::is_enabled()) {
 334     print_stats(1, "String Dedup Fixup", _cur_string_dedup_fixup_time_ms, _active_gc_threads);
 335     _cur_string_dedup_queue_fixup_worker_times_ms.print(2, "Queue Fixup (ms)");
 336     _cur_string_dedup_table_fixup_worker_times_ms.print(2, "Table Fixup (ms)");
 337   }
 338   print_stats(1, "Clear CT", _cur_clear_ct_time_ms);
 339   double misc_time_ms = pause_time_sec * MILLIUNITS - accounted_time_ms();
 340   print_stats(1, "Other", misc_time_ms);
 341   if (_cur_verify_before_time_ms > 0.0) {
 342     print_stats(2, "Verify Before", _cur_verify_before_time_ms);
 343   }
 344   if (G1CollectedHeap::heap()->evacuation_failed()) {
 345     double evac_fail_handling = _cur_evac_fail_recalc_used + _cur_evac_fail_remove_self_forwards +
 346       _cur_evac_fail_restore_remsets;
 347     print_stats(2, "Evacuation Failure", evac_fail_handling);
 348     if (G1Log::finest()) {
 349       print_stats(3, "Recalculate Used", _cur_evac_fail_recalc_used);
 350       print_stats(3, "Remove Self Forwards", _cur_evac_fail_remove_self_forwards);
 351       print_stats(3, "Restore RemSet", _cur_evac_fail_restore_remsets);
 352     }
 353   }
 354   print_stats(2, "Choose CSet",
 355     (_recorded_young_cset_choice_time_ms +
 356     _recorded_non_young_cset_choice_time_ms));
 357   print_stats(2, "Ref Proc", _cur_ref_proc_time_ms);
 358   print_stats(2, "Ref Enq", _cur_ref_enq_time_ms);
 359   if (G1DeferredRSUpdate) {
 360     print_stats(2, "Redirty Cards", _recorded_redirty_logged_cards_time_ms);
 361     if (G1Log::finest()) {
 362       _last_redirty_logged_cards_time_ms.print(3, "Parallel Redirty");
 363       _last_redirty_logged_cards_processed_cards.print(3, "Redirtied Cards");
 364     }
 365   }
 366   print_stats(2, "Free CSet",
 367     (_recorded_young_free_cset_time_ms +
 368     _recorded_non_young_free_cset_time_ms));
 369   if (G1Log::finest()) {
 370     print_stats(3, "Young Free CSet", _recorded_young_free_cset_time_ms);
 371     print_stats(3, "Non-Young Free CSet", _recorded_non_young_free_cset_time_ms);
 372   }
 373   if (_cur_verify_after_time_ms > 0.0) {
 374     print_stats(2, "Verify After", _cur_verify_after_time_ms);
 375   }
 376 }