Mon, 18 Mar 2013 13:19:06 +0100
8008555: Debugging code in compiled method sometimes leaks memory
Summary: support for strings that have same life-time as code that uses them.
Reviewed-by: kvn, twisti
duke@435 | 1 | /* |
mikael@4153 | 2 | * Copyright (c) 1997, 2012, Oracle and/or its affiliates. All rights reserved. |
duke@435 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
duke@435 | 4 | * |
duke@435 | 5 | * This code is free software; you can redistribute it and/or modify it |
duke@435 | 6 | * under the terms of the GNU General Public License version 2 only, as |
duke@435 | 7 | * published by the Free Software Foundation. |
duke@435 | 8 | * |
duke@435 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
duke@435 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
duke@435 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
duke@435 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
duke@435 | 13 | * accompanied this code). |
duke@435 | 14 | * |
duke@435 | 15 | * You should have received a copy of the GNU General Public License version |
duke@435 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
duke@435 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
duke@435 | 18 | * |
trims@1907 | 19 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
trims@1907 | 20 | * or visit www.oracle.com if you need additional information or have any |
trims@1907 | 21 | * questions. |
duke@435 | 22 | * |
duke@435 | 23 | */ |
duke@435 | 24 | |
stefank@2314 | 25 | #include "precompiled.hpp" |
stefank@2314 | 26 | #include "oops/oop.inline.hpp" |
stefank@2314 | 27 | #include "runtime/timer.hpp" |
stefank@2314 | 28 | #include "utilities/ostream.hpp" |
stefank@2314 | 29 | #ifdef TARGET_OS_FAMILY_linux |
stefank@2314 | 30 | # include "os_linux.inline.hpp" |
stefank@2314 | 31 | #endif |
stefank@2314 | 32 | #ifdef TARGET_OS_FAMILY_solaris |
stefank@2314 | 33 | # include "os_solaris.inline.hpp" |
stefank@2314 | 34 | #endif |
stefank@2314 | 35 | #ifdef TARGET_OS_FAMILY_windows |
stefank@2314 | 36 | # include "os_windows.inline.hpp" |
stefank@2314 | 37 | #endif |
never@3156 | 38 | #ifdef TARGET_OS_FAMILY_bsd |
never@3156 | 39 | # include "os_bsd.inline.hpp" |
never@3156 | 40 | #endif |
duke@435 | 41 | |
duke@435 | 42 | |
duke@435 | 43 | void elapsedTimer::add(elapsedTimer t) { |
duke@435 | 44 | _counter += t._counter; |
duke@435 | 45 | } |
duke@435 | 46 | |
duke@435 | 47 | void elapsedTimer::start() { |
duke@435 | 48 | if (!_active) { |
duke@435 | 49 | _active = true; |
duke@435 | 50 | _start_counter = os::elapsed_counter(); |
duke@435 | 51 | } |
duke@435 | 52 | } |
duke@435 | 53 | |
duke@435 | 54 | void elapsedTimer::stop() { |
duke@435 | 55 | if (_active) { |
duke@435 | 56 | _counter += os::elapsed_counter() - _start_counter; |
duke@435 | 57 | _active = false; |
duke@435 | 58 | } |
duke@435 | 59 | } |
duke@435 | 60 | |
duke@435 | 61 | double elapsedTimer::seconds() const { |
duke@435 | 62 | double count = (double) _counter; |
duke@435 | 63 | double freq = (double) os::elapsed_frequency(); |
duke@435 | 64 | return count/freq; |
duke@435 | 65 | } |
duke@435 | 66 | |
duke@435 | 67 | jlong elapsedTimer::milliseconds() const { |
duke@435 | 68 | jlong ticks_per_ms = os::elapsed_frequency() / 1000; |
duke@435 | 69 | return _counter / ticks_per_ms; |
duke@435 | 70 | } |
duke@435 | 71 | |
duke@435 | 72 | jlong elapsedTimer::active_ticks() const { |
duke@435 | 73 | if (!_active) { |
duke@435 | 74 | return ticks(); |
duke@435 | 75 | } |
duke@435 | 76 | jlong counter = _counter + os::elapsed_counter() - _start_counter; |
duke@435 | 77 | return counter; |
duke@435 | 78 | } |
duke@435 | 79 | |
duke@435 | 80 | void TimeStamp::update_to(jlong ticks) { |
duke@435 | 81 | _counter = ticks; |
duke@435 | 82 | if (_counter == 0) _counter = 1; |
duke@435 | 83 | assert(is_updated(), "must not look clear"); |
duke@435 | 84 | } |
duke@435 | 85 | |
duke@435 | 86 | void TimeStamp::update() { |
duke@435 | 87 | update_to(os::elapsed_counter()); |
duke@435 | 88 | } |
duke@435 | 89 | |
duke@435 | 90 | double TimeStamp::seconds() const { |
duke@435 | 91 | assert(is_updated(), "must not be clear"); |
duke@435 | 92 | jlong new_count = os::elapsed_counter(); |
duke@435 | 93 | double count = (double) new_count - _counter; |
duke@435 | 94 | double freq = (double) os::elapsed_frequency(); |
duke@435 | 95 | return count/freq; |
duke@435 | 96 | } |
duke@435 | 97 | |
duke@435 | 98 | jlong TimeStamp::milliseconds() const { |
duke@435 | 99 | assert(is_updated(), "must not be clear"); |
duke@435 | 100 | |
duke@435 | 101 | jlong new_count = os::elapsed_counter(); |
duke@435 | 102 | jlong count = new_count - _counter; |
duke@435 | 103 | jlong ticks_per_ms = os::elapsed_frequency() / 1000; |
duke@435 | 104 | return count / ticks_per_ms; |
duke@435 | 105 | } |
duke@435 | 106 | |
duke@435 | 107 | jlong TimeStamp::ticks_since_update() const { |
duke@435 | 108 | assert(is_updated(), "must not be clear"); |
duke@435 | 109 | return os::elapsed_counter() - _counter; |
duke@435 | 110 | } |
duke@435 | 111 | |
duke@435 | 112 | TraceTime::TraceTime(const char* title, |
duke@435 | 113 | bool doit, |
duke@435 | 114 | bool print_cr, |
duke@435 | 115 | outputStream* logfile) { |
duke@435 | 116 | _active = doit; |
duke@435 | 117 | _verbose = true; |
duke@435 | 118 | _print_cr = print_cr; |
duke@435 | 119 | _logfile = (logfile != NULL) ? logfile : tty; |
duke@435 | 120 | |
duke@435 | 121 | if (_active) { |
duke@435 | 122 | _accum = NULL; |
brutisso@4063 | 123 | _logfile->stamp(PrintGCTimeStamps); |
duke@435 | 124 | _logfile->print("[%s", title); |
duke@435 | 125 | _logfile->flush(); |
duke@435 | 126 | _t.start(); |
duke@435 | 127 | } |
duke@435 | 128 | } |
duke@435 | 129 | |
duke@435 | 130 | TraceTime::TraceTime(const char* title, |
duke@435 | 131 | elapsedTimer* accumulator, |
duke@435 | 132 | bool doit, |
duke@435 | 133 | bool verbose, |
duke@435 | 134 | outputStream* logfile) { |
duke@435 | 135 | _active = doit; |
duke@435 | 136 | _verbose = verbose; |
duke@435 | 137 | _print_cr = true; |
duke@435 | 138 | _logfile = (logfile != NULL) ? logfile : tty; |
duke@435 | 139 | if (_active) { |
duke@435 | 140 | if (_verbose) { |
brutisso@4063 | 141 | _logfile->stamp(PrintGCTimeStamps); |
duke@435 | 142 | _logfile->print("[%s", title); |
duke@435 | 143 | _logfile->flush(); |
duke@435 | 144 | } |
duke@435 | 145 | _accum = accumulator; |
duke@435 | 146 | _t.start(); |
duke@435 | 147 | } |
duke@435 | 148 | } |
duke@435 | 149 | |
duke@435 | 150 | TraceTime::~TraceTime() { |
duke@435 | 151 | if (_active) { |
duke@435 | 152 | _t.stop(); |
duke@435 | 153 | if (_accum!=NULL) _accum->add(_t); |
duke@435 | 154 | if (_verbose) { |
duke@435 | 155 | if (_print_cr) { |
duke@435 | 156 | _logfile->print_cr(", %3.7f secs]", _t.seconds()); |
duke@435 | 157 | } else { |
duke@435 | 158 | _logfile->print(", %3.7f secs]", _t.seconds()); |
duke@435 | 159 | } |
duke@435 | 160 | _logfile->flush(); |
duke@435 | 161 | } |
duke@435 | 162 | } |
duke@435 | 163 | } |
duke@435 | 164 | |
duke@435 | 165 | TraceCPUTime::TraceCPUTime(bool doit, |
duke@435 | 166 | bool print_cr, |
duke@435 | 167 | outputStream *logfile) : |
duke@435 | 168 | _active(doit), |
duke@435 | 169 | _print_cr(print_cr), |
duke@435 | 170 | _starting_user_time(0.0), |
duke@435 | 171 | _starting_system_time(0.0), |
duke@435 | 172 | _starting_real_time(0.0), |
duke@435 | 173 | _logfile(logfile), |
duke@435 | 174 | _error(false) { |
duke@435 | 175 | if (_active) { |
duke@435 | 176 | if (logfile != NULL) { |
duke@435 | 177 | _logfile = logfile; |
duke@435 | 178 | } else { |
duke@435 | 179 | _logfile = tty; |
duke@435 | 180 | } |
duke@435 | 181 | |
duke@435 | 182 | _error = !os::getTimesSecs(&_starting_real_time, |
duke@435 | 183 | &_starting_user_time, |
duke@435 | 184 | &_starting_system_time); |
duke@435 | 185 | } |
duke@435 | 186 | } |
duke@435 | 187 | |
duke@435 | 188 | TraceCPUTime::~TraceCPUTime() { |
duke@435 | 189 | if (_active) { |
duke@435 | 190 | bool valid = false; |
duke@435 | 191 | if (!_error) { |
duke@435 | 192 | double real_secs; // walk clock time |
duke@435 | 193 | double system_secs; // system time |
duke@435 | 194 | double user_secs; // user time for all threads |
duke@435 | 195 | |
duke@435 | 196 | double real_time, user_time, system_time; |
duke@435 | 197 | valid = os::getTimesSecs(&real_time, &user_time, &system_time); |
duke@435 | 198 | if (valid) { |
duke@435 | 199 | |
duke@435 | 200 | user_secs = user_time - _starting_user_time; |
duke@435 | 201 | system_secs = system_time - _starting_system_time; |
duke@435 | 202 | real_secs = real_time - _starting_real_time; |
duke@435 | 203 | |
duke@435 | 204 | _logfile->print(" [Times: user=%3.2f sys=%3.2f, real=%3.2f secs] ", |
duke@435 | 205 | user_secs, system_secs, real_secs); |
duke@435 | 206 | |
duke@435 | 207 | } else { |
duke@435 | 208 | _logfile->print("[Invalid result in TraceCPUTime]"); |
duke@435 | 209 | } |
duke@435 | 210 | } else { |
duke@435 | 211 | _logfile->print("[Error in TraceCPUTime]"); |
duke@435 | 212 | } |
johnc@4326 | 213 | if (_print_cr) { |
duke@435 | 214 | _logfile->print_cr(""); |
duke@435 | 215 | } |
johnc@4326 | 216 | _logfile->flush(); |
duke@435 | 217 | } |
duke@435 | 218 | } |