1 /*
   2  * Copyright (c) 1997, 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 "oops/oop.inline.hpp"
  27 #include "runtime/timer.hpp"
  28 #include "utilities/ostream.hpp"
  29 
  30 double TimeHelper::counter_to_seconds(jlong counter) {
  31   double freq  = (double) os::elapsed_frequency();
  32   return counter / freq;
  33 }
  34 
  35 double TimeHelper::counter_to_millis(jlong counter) {
  36   return counter_to_seconds(counter) * 1000.0;
  37 }
  38 
  39 elapsedTimer::elapsedTimer(jlong time, jlong timeUnitsPerSecond) {
  40   _active = false;
  41   jlong osTimeUnitsPerSecond = os::elapsed_frequency();
  42   assert(osTimeUnitsPerSecond % 1000 == 0, "must be");
  43   assert(timeUnitsPerSecond % 1000 == 0, "must be");
  44   while (osTimeUnitsPerSecond < timeUnitsPerSecond) {
  45     timeUnitsPerSecond /= 1000;
  46     time *= 1000;
  47   }
  48   while (osTimeUnitsPerSecond > timeUnitsPerSecond) {
  49     timeUnitsPerSecond *= 1000;
  50     time /= 1000;
  51   }
  52   _counter = time;
  53 }
  54 
  55 void elapsedTimer::add(elapsedTimer t) {
  56   _counter += t._counter;
  57 }
  58 
  59 void elapsedTimer::start() {
  60   if (!_active) {
  61     _active = true;
  62     _start_counter = os::elapsed_counter();
  63   }
  64 }
  65 
  66 void elapsedTimer::stop() {
  67   if (_active) {
  68     _counter += os::elapsed_counter() - _start_counter;
  69     _active = false;
  70   }
  71 }
  72 
  73 double elapsedTimer::seconds() const {
  74  return TimeHelper::counter_to_seconds(_counter);
  75 }
  76 
  77 jlong elapsedTimer::milliseconds() const {
  78   return (jlong)TimeHelper::counter_to_millis(_counter);
  79 }
  80 
  81 jlong elapsedTimer::active_ticks() const {
  82   if (!_active) {
  83     return ticks();
  84   }
  85   jlong counter = _counter + os::elapsed_counter() - _start_counter;
  86   return counter;
  87 }
  88 
  89 void TimeStamp::update_to(jlong ticks) {
  90   _counter = ticks;
  91   if (_counter == 0)  _counter = 1;
  92   assert(is_updated(), "must not look clear");
  93 }
  94 
  95 void TimeStamp::update() {
  96   update_to(os::elapsed_counter());
  97 }
  98 
  99 double TimeStamp::seconds() const {
 100   assert(is_updated(), "must not be clear");
 101   jlong new_count = os::elapsed_counter();
 102   return TimeHelper::counter_to_seconds(new_count - _counter);
 103 }
 104 
 105 jlong TimeStamp::milliseconds() const {
 106   assert(is_updated(), "must not be clear");
 107   jlong new_count = os::elapsed_counter();
 108   return (jlong)TimeHelper::counter_to_millis(new_count - _counter);
 109 }
 110 
 111 jlong TimeStamp::ticks_since_update() const {
 112   assert(is_updated(), "must not be clear");
 113   return os::elapsed_counter() - _counter;
 114 }
 115 
 116 TraceTime::TraceTime(const char* title,
 117                      bool doit) {
 118   _active   = doit;
 119   _verbose  = true;
 120 
 121   if (_active) {
 122     _accum = NULL;
 123     tty->print("[%s", title);
 124     tty->flush();
 125     _t.start();
 126   }
 127 }
 128 
 129 TraceTime::TraceTime(const char* title,
 130                      elapsedTimer* accumulator,
 131                      bool doit,
 132                      bool verbose) {
 133   _active = doit;
 134   _verbose = verbose;
 135   if (_active) {
 136     if (_verbose) {
 137       tty->print("[%s", title);
 138       tty->flush();
 139     }
 140     _accum = accumulator;
 141     _t.start();
 142   }
 143 }
 144 
 145 TraceTime::~TraceTime() {
 146   if (_active) {
 147     _t.stop();
 148     if (_accum!=NULL) _accum->add(_t);
 149     if (_verbose) {
 150       tty->print_cr(", %3.7f secs]", _t.seconds());
 151       tty->flush();
 152     }
 153   }
 154 }
 155 
 156 TraceCPUTime::TraceCPUTime(bool doit,
 157                bool print_cr,
 158                outputStream *logfile) :
 159   _active(doit),
 160   _print_cr(print_cr),
 161   _starting_user_time(0.0),
 162   _starting_system_time(0.0),
 163   _starting_real_time(0.0),
 164   _logfile(logfile),
 165   _error(false) {
 166   if (_active) {
 167     if (logfile != NULL) {
 168       _logfile = logfile;
 169     } else {
 170       _logfile = tty;
 171     }
 172 
 173     _error = !os::getTimesSecs(&_starting_real_time,
 174                                &_starting_user_time,
 175                                &_starting_system_time);
 176   }
 177 }
 178 
 179 TraceCPUTime::~TraceCPUTime() {
 180   if (_active) {
 181     bool valid = false;
 182     if (!_error) {
 183       double real_secs;                 // walk clock time
 184       double system_secs;               // system time
 185       double user_secs;                 // user time for all threads
 186 
 187       double real_time, user_time, system_time;
 188       valid = os::getTimesSecs(&real_time, &user_time, &system_time);
 189       if (valid) {
 190 
 191         user_secs = user_time - _starting_user_time;
 192         system_secs = system_time - _starting_system_time;
 193         real_secs = real_time - _starting_real_time;
 194 
 195         _logfile->print(" [Times: user=%3.2f sys=%3.2f real=%3.2f secs] ",
 196           user_secs, system_secs, real_secs);
 197 
 198       } else {
 199         _logfile->print("[Invalid result in TraceCPUTime]");
 200       }
 201     } else {
 202       _logfile->print("[Error in TraceCPUTime]");
 203     }
 204     if (_print_cr) {
 205       _logfile->cr();
 206     }
 207     _logfile->flush();
 208   }
 209 }