Tue, 12 Oct 2010 10:57:33 -0400
6392697: Additional flag needed to supress Hotspot warning messages
Summary: Apply PrintJvmWarnings flag to all warnings
Reviewed-by: coleenp, phh
duke@435 | 1 | /* |
bobv@2036 | 2 | * Copyright (c) 1997, 2010, 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 | |
duke@435 | 25 | # include "incls/_precompiled.incl" |
duke@435 | 26 | # include "incls/_debug.cpp.incl" |
duke@435 | 27 | |
duke@435 | 28 | #ifndef ASSERT |
duke@435 | 29 | # ifdef _DEBUG |
duke@435 | 30 | // NOTE: don't turn the lines below into a comment -- if you're getting |
duke@435 | 31 | // a compile error here, change the settings to define ASSERT |
duke@435 | 32 | ASSERT should be defined when _DEBUG is defined. It is not intended to be used for debugging |
duke@435 | 33 | functions that do not slow down the system too much and thus can be left in optimized code. |
duke@435 | 34 | On the other hand, the code should not be included in a production version. |
duke@435 | 35 | # endif // _DEBUG |
duke@435 | 36 | #endif // ASSERT |
duke@435 | 37 | |
duke@435 | 38 | |
duke@435 | 39 | #ifdef _DEBUG |
duke@435 | 40 | # ifndef ASSERT |
duke@435 | 41 | configuration error: ASSERT must be defined in debug version |
duke@435 | 42 | # endif // ASSERT |
duke@435 | 43 | #endif // _DEBUG |
duke@435 | 44 | |
duke@435 | 45 | |
duke@435 | 46 | #ifdef PRODUCT |
duke@435 | 47 | # if -defined _DEBUG || -defined ASSERT |
duke@435 | 48 | configuration error: ASSERT et al. must not be defined in PRODUCT version |
duke@435 | 49 | # endif |
duke@435 | 50 | #endif // PRODUCT |
duke@435 | 51 | |
duke@435 | 52 | |
duke@435 | 53 | void warning(const char* format, ...) { |
kamg@2225 | 54 | if (PrintWarnings) { |
kamg@2225 | 55 | // In case error happens before init or during shutdown |
kamg@2225 | 56 | if (tty == NULL) ostream_init(); |
duke@435 | 57 | |
kamg@2225 | 58 | tty->print("%s warning: ", VM_Version::vm_name()); |
kamg@2225 | 59 | va_list ap; |
kamg@2225 | 60 | va_start(ap, format); |
kamg@2225 | 61 | tty->vprint_cr(format, ap); |
kamg@2225 | 62 | va_end(ap); |
kamg@2225 | 63 | } |
duke@435 | 64 | if (BreakAtWarning) BREAKPOINT; |
duke@435 | 65 | } |
duke@435 | 66 | |
duke@435 | 67 | #ifndef PRODUCT |
duke@435 | 68 | |
duke@435 | 69 | #define is_token_break(ch) (isspace(ch) || (ch) == ',') |
duke@435 | 70 | |
duke@435 | 71 | static const char* last_file_name = NULL; |
duke@435 | 72 | static int last_line_no = -1; |
duke@435 | 73 | |
duke@435 | 74 | // assert/guarantee/... may happen very early during VM initialization. |
duke@435 | 75 | // Don't rely on anything that is initialized by Threads::create_vm(). For |
duke@435 | 76 | // example, don't use tty. |
jcoomes@1845 | 77 | bool error_is_suppressed(const char* file_name, int line_no) { |
duke@435 | 78 | // The following 1-element cache requires that passed-in |
duke@435 | 79 | // file names are always only constant literals. |
duke@435 | 80 | if (file_name == last_file_name && line_no == last_line_no) return true; |
duke@435 | 81 | |
duke@435 | 82 | int file_name_len = (int)strlen(file_name); |
duke@435 | 83 | char separator = os::file_separator()[0]; |
duke@435 | 84 | const char* base_name = strrchr(file_name, separator); |
duke@435 | 85 | if (base_name == NULL) |
duke@435 | 86 | base_name = file_name; |
duke@435 | 87 | |
duke@435 | 88 | // scan the SuppressErrorAt option |
duke@435 | 89 | const char* cp = SuppressErrorAt; |
duke@435 | 90 | for (;;) { |
duke@435 | 91 | const char* sfile; |
duke@435 | 92 | int sfile_len; |
duke@435 | 93 | int sline; |
duke@435 | 94 | bool noisy; |
duke@435 | 95 | while ((*cp) != '\0' && is_token_break(*cp)) cp++; |
duke@435 | 96 | if ((*cp) == '\0') break; |
duke@435 | 97 | sfile = cp; |
duke@435 | 98 | while ((*cp) != '\0' && !is_token_break(*cp) && (*cp) != ':') cp++; |
duke@435 | 99 | sfile_len = cp - sfile; |
duke@435 | 100 | if ((*cp) == ':') cp++; |
duke@435 | 101 | sline = 0; |
duke@435 | 102 | while ((*cp) != '\0' && isdigit(*cp)) { |
duke@435 | 103 | sline *= 10; |
duke@435 | 104 | sline += (*cp) - '0'; |
duke@435 | 105 | cp++; |
duke@435 | 106 | } |
duke@435 | 107 | // "file:line!" means the assert suppression is not silent |
duke@435 | 108 | noisy = ((*cp) == '!'); |
duke@435 | 109 | while ((*cp) != '\0' && !is_token_break(*cp)) cp++; |
duke@435 | 110 | // match the line |
duke@435 | 111 | if (sline != 0) { |
duke@435 | 112 | if (sline != line_no) continue; |
duke@435 | 113 | } |
duke@435 | 114 | // match the file |
duke@435 | 115 | if (sfile_len > 0) { |
duke@435 | 116 | const char* look = file_name; |
duke@435 | 117 | const char* look_max = file_name + file_name_len - sfile_len; |
duke@435 | 118 | const char* foundp; |
duke@435 | 119 | bool match = false; |
duke@435 | 120 | while (!match |
duke@435 | 121 | && (foundp = strchr(look, sfile[0])) != NULL |
duke@435 | 122 | && foundp <= look_max) { |
duke@435 | 123 | match = true; |
duke@435 | 124 | for (int i = 1; i < sfile_len; i++) { |
duke@435 | 125 | if (sfile[i] != foundp[i]) { |
duke@435 | 126 | match = false; |
duke@435 | 127 | break; |
duke@435 | 128 | } |
duke@435 | 129 | } |
duke@435 | 130 | look = foundp + 1; |
duke@435 | 131 | } |
duke@435 | 132 | if (!match) continue; |
duke@435 | 133 | } |
duke@435 | 134 | // got a match! |
duke@435 | 135 | if (noisy) { |
duke@435 | 136 | fdStream out(defaultStream::output_fd()); |
duke@435 | 137 | out.print_raw("[error suppressed at "); |
duke@435 | 138 | out.print_raw(base_name); |
duke@435 | 139 | char buf[16]; |
duke@435 | 140 | jio_snprintf(buf, sizeof(buf), ":%d]", line_no); |
duke@435 | 141 | out.print_raw_cr(buf); |
duke@435 | 142 | } else { |
duke@435 | 143 | // update 1-element cache for fast silent matches |
duke@435 | 144 | last_file_name = file_name; |
duke@435 | 145 | last_line_no = line_no; |
duke@435 | 146 | } |
duke@435 | 147 | return true; |
duke@435 | 148 | } |
duke@435 | 149 | |
duke@435 | 150 | if (!is_error_reported()) { |
duke@435 | 151 | // print a friendly hint: |
duke@435 | 152 | fdStream out(defaultStream::output_fd()); |
duke@435 | 153 | out.print_raw_cr("# To suppress the following error report, specify this argument"); |
duke@435 | 154 | out.print_raw ("# after -XX: or in .hotspotrc: SuppressErrorAt="); |
duke@435 | 155 | out.print_raw (base_name); |
duke@435 | 156 | char buf[16]; |
duke@435 | 157 | jio_snprintf(buf, sizeof(buf), ":%d", line_no); |
duke@435 | 158 | out.print_raw_cr(buf); |
duke@435 | 159 | } |
duke@435 | 160 | return false; |
duke@435 | 161 | } |
duke@435 | 162 | |
duke@435 | 163 | #undef is_token_break |
duke@435 | 164 | |
duke@435 | 165 | #else |
duke@435 | 166 | |
duke@435 | 167 | // Place-holder for non-existent suppression check: |
jcoomes@1845 | 168 | #define error_is_suppressed(file_name, line_no) (false) |
duke@435 | 169 | |
duke@435 | 170 | #endif //PRODUCT |
duke@435 | 171 | |
jcoomes@1845 | 172 | void report_vm_error(const char* file, int line, const char* error_msg, |
jcoomes@1845 | 173 | const char* detail_msg) |
jcoomes@1845 | 174 | { |
jcoomes@1845 | 175 | if (Debugging || error_is_suppressed(file, line)) return; |
jcoomes@1845 | 176 | Thread* const thread = ThreadLocalStorage::get_thread_slow(); |
jcoomes@1845 | 177 | VMError err(thread, file, line, error_msg, detail_msg); |
duke@435 | 178 | err.report_and_die(); |
duke@435 | 179 | } |
duke@435 | 180 | |
jcoomes@1845 | 181 | void report_fatal(const char* file, int line, const char* message) |
jcoomes@1845 | 182 | { |
jcoomes@1845 | 183 | report_vm_error(file, line, "fatal error", message); |
duke@435 | 184 | } |
duke@435 | 185 | |
duke@435 | 186 | // Used by report_vm_out_of_memory to detect recursion. |
duke@435 | 187 | static jint _exiting_out_of_mem = 0; |
duke@435 | 188 | |
jcoomes@1845 | 189 | void report_vm_out_of_memory(const char* file, int line, size_t size, |
jcoomes@1845 | 190 | const char* message) { |
jcoomes@1845 | 191 | if (Debugging || error_is_suppressed(file, line)) return; |
duke@435 | 192 | |
duke@435 | 193 | // We try to gather additional information for the first out of memory |
duke@435 | 194 | // error only; gathering additional data might cause an allocation and a |
duke@435 | 195 | // recursive out_of_memory condition. |
duke@435 | 196 | |
duke@435 | 197 | const jint exiting = 1; |
duke@435 | 198 | // If we succeed in changing the value, we're the first one in. |
duke@435 | 199 | bool first_time_here = Atomic::xchg(exiting, &_exiting_out_of_mem) != exiting; |
duke@435 | 200 | |
duke@435 | 201 | if (first_time_here) { |
duke@435 | 202 | Thread* thread = ThreadLocalStorage::get_thread_slow(); |
jcoomes@1845 | 203 | VMError(thread, file, line, size, message).report_and_die(); |
duke@435 | 204 | } |
poonam@662 | 205 | |
poonam@662 | 206 | // Dump core and abort |
poonam@662 | 207 | vm_abort(true); |
duke@435 | 208 | } |
duke@435 | 209 | |
jcoomes@1845 | 210 | void report_should_not_call(const char* file, int line) { |
jcoomes@1845 | 211 | report_vm_error(file, line, "ShouldNotCall()"); |
duke@435 | 212 | } |
duke@435 | 213 | |
jcoomes@1845 | 214 | void report_should_not_reach_here(const char* file, int line) { |
jcoomes@1845 | 215 | report_vm_error(file, line, "ShouldNotReachHere()"); |
duke@435 | 216 | } |
duke@435 | 217 | |
jcoomes@1845 | 218 | void report_unimplemented(const char* file, int line) { |
jcoomes@1845 | 219 | report_vm_error(file, line, "Unimplemented()"); |
duke@435 | 220 | } |
duke@435 | 221 | |
jcoomes@1845 | 222 | void report_untested(const char* file, int line, const char* message) { |
duke@435 | 223 | #ifndef PRODUCT |
jcoomes@1845 | 224 | warning("Untested: %s in %s: %d\n", message, file, line); |
duke@435 | 225 | #endif // PRODUCT |
duke@435 | 226 | } |
duke@435 | 227 | |
duke@435 | 228 | void report_java_out_of_memory(const char* message) { |
duke@435 | 229 | static jint out_of_memory_reported = 0; |
duke@435 | 230 | |
duke@435 | 231 | // A number of threads may attempt to report OutOfMemoryError at around the |
duke@435 | 232 | // same time. To avoid dumping the heap or executing the data collection |
duke@435 | 233 | // commands multiple times we just do it once when the first threads reports |
duke@435 | 234 | // the error. |
duke@435 | 235 | if (Atomic::cmpxchg(1, &out_of_memory_reported, 0) == 0) { |
duke@435 | 236 | // create heap dump before OnOutOfMemoryError commands are executed |
duke@435 | 237 | if (HeapDumpOnOutOfMemoryError) { |
duke@435 | 238 | tty->print_cr("java.lang.OutOfMemoryError: %s", message); |
thurka@2130 | 239 | HeapDumper::dump_heap_from_oome(); |
duke@435 | 240 | } |
duke@435 | 241 | |
duke@435 | 242 | if (OnOutOfMemoryError && OnOutOfMemoryError[0]) { |
duke@435 | 243 | VMError err(message); |
duke@435 | 244 | err.report_java_out_of_memory(); |
duke@435 | 245 | } |
duke@435 | 246 | } |
duke@435 | 247 | } |
duke@435 | 248 | |
duke@435 | 249 | |
duke@435 | 250 | extern "C" void ps(); |
duke@435 | 251 | |
duke@435 | 252 | static bool error_reported = false; |
duke@435 | 253 | |
duke@435 | 254 | // call this when the VM is dying--it might loosen some asserts |
duke@435 | 255 | void set_error_reported() { |
duke@435 | 256 | error_reported = true; |
duke@435 | 257 | } |
duke@435 | 258 | |
duke@435 | 259 | bool is_error_reported() { |
duke@435 | 260 | return error_reported; |
duke@435 | 261 | } |
duke@435 | 262 | |
jcoomes@1845 | 263 | #ifndef PRODUCT |
jcoomes@1845 | 264 | #include <signal.h> |
jcoomes@1845 | 265 | |
jcoomes@1845 | 266 | void test_error_handler(size_t test_num) |
jcoomes@1845 | 267 | { |
jcoomes@1845 | 268 | if (test_num == 0) return; |
jcoomes@1845 | 269 | |
jcoomes@1845 | 270 | // If asserts are disabled, use the corresponding guarantee instead. |
jcoomes@1845 | 271 | size_t n = test_num; |
jcoomes@1845 | 272 | NOT_DEBUG(if (n <= 2) n += 2); |
jcoomes@1845 | 273 | |
jcoomes@1845 | 274 | const char* const str = "hello"; |
jcoomes@1845 | 275 | const size_t num = (size_t)os::vm_page_size(); |
jcoomes@1845 | 276 | |
jcoomes@1845 | 277 | const char* const eol = os::line_separator(); |
jcoomes@1845 | 278 | const char* const msg = "this message should be truncated during formatting"; |
jcoomes@1845 | 279 | |
jcoomes@1845 | 280 | // Keep this in sync with test/runtime/6888954/vmerrors.sh. |
jcoomes@1845 | 281 | switch (n) { |
jcoomes@1845 | 282 | case 1: assert(str == NULL, "expected null"); |
jcoomes@1845 | 283 | case 2: assert(num == 1023 && *str == 'X', |
jcoomes@1845 | 284 | err_msg("num=" SIZE_FORMAT " str=\"%s\"", num, str)); |
jcoomes@1845 | 285 | case 3: guarantee(str == NULL, "expected null"); |
jcoomes@1845 | 286 | case 4: guarantee(num == 1023 && *str == 'X', |
jcoomes@1845 | 287 | err_msg("num=" SIZE_FORMAT " str=\"%s\"", num, str)); |
jcoomes@1845 | 288 | case 5: fatal("expected null"); |
jcoomes@1845 | 289 | case 6: fatal(err_msg("num=" SIZE_FORMAT " str=\"%s\"", num, str)); |
jcoomes@1845 | 290 | case 7: fatal(err_msg("%s%s# %s%s# %s%s# %s%s# %s%s# " |
jcoomes@1845 | 291 | "%s%s# %s%s# %s%s# %s%s# %s%s# " |
jcoomes@1845 | 292 | "%s%s# %s%s# %s%s# %s%s# %s", |
jcoomes@1845 | 293 | msg, eol, msg, eol, msg, eol, msg, eol, msg, eol, |
jcoomes@1845 | 294 | msg, eol, msg, eol, msg, eol, msg, eol, msg, eol, |
jcoomes@1845 | 295 | msg, eol, msg, eol, msg, eol, msg, eol, msg)); |
jcoomes@1845 | 296 | case 8: vm_exit_out_of_memory(num, "ChunkPool::allocate"); |
jcoomes@1845 | 297 | case 9: ShouldNotCallThis(); |
jcoomes@1845 | 298 | case 10: ShouldNotReachHere(); |
jcoomes@1845 | 299 | case 11: Unimplemented(); |
jcoomes@1845 | 300 | // This is last because it does not generate an hs_err* file on Windows. |
jcoomes@1845 | 301 | case 12: os::signal_raise(SIGSEGV); |
jcoomes@1845 | 302 | |
jcoomes@1845 | 303 | default: ShouldNotReachHere(); |
jcoomes@1845 | 304 | } |
jcoomes@1845 | 305 | } |
jcoomes@1845 | 306 | #endif // #ifndef PRODUCT |
jcoomes@1845 | 307 | |
duke@435 | 308 | // ------ helper functions for debugging go here ------------ |
duke@435 | 309 | |
duke@435 | 310 | #ifndef PRODUCT |
duke@435 | 311 | // All debug entries should be wrapped with a stack allocated |
duke@435 | 312 | // Command object. It makes sure a resource mark is set and |
duke@435 | 313 | // flushes the logfile to prevent file sharing problems. |
duke@435 | 314 | |
duke@435 | 315 | class Command : public StackObj { |
duke@435 | 316 | private: |
duke@435 | 317 | ResourceMark rm; |
duke@435 | 318 | ResetNoHandleMark rnhm; |
duke@435 | 319 | HandleMark hm; |
duke@435 | 320 | bool debug_save; |
duke@435 | 321 | public: |
duke@435 | 322 | static int level; |
duke@435 | 323 | Command(const char* str) { |
duke@435 | 324 | debug_save = Debugging; |
duke@435 | 325 | Debugging = true; |
duke@435 | 326 | if (level++ > 0) return; |
duke@435 | 327 | tty->cr(); |
duke@435 | 328 | tty->print_cr("\"Executing %s\"", str); |
duke@435 | 329 | } |
duke@435 | 330 | |
duke@435 | 331 | ~Command() { tty->flush(); Debugging = debug_save; level--; } |
duke@435 | 332 | }; |
duke@435 | 333 | |
duke@435 | 334 | int Command::level = 0; |
duke@435 | 335 | |
duke@435 | 336 | extern "C" void blob(CodeBlob* cb) { |
duke@435 | 337 | Command c("blob"); |
duke@435 | 338 | cb->print(); |
duke@435 | 339 | } |
duke@435 | 340 | |
duke@435 | 341 | |
duke@435 | 342 | extern "C" void dump_vtable(address p) { |
duke@435 | 343 | Command c("dump_vtable"); |
duke@435 | 344 | klassOop k = (klassOop)p; |
duke@435 | 345 | instanceKlass::cast(k)->vtable()->print(); |
duke@435 | 346 | } |
duke@435 | 347 | |
duke@435 | 348 | |
duke@435 | 349 | extern "C" void nm(intptr_t p) { |
duke@435 | 350 | // Actually we look through all CodeBlobs (the nm name has been kept for backwards compatability) |
duke@435 | 351 | Command c("nm"); |
duke@435 | 352 | CodeBlob* cb = CodeCache::find_blob((address)p); |
duke@435 | 353 | if (cb == NULL) { |
duke@435 | 354 | tty->print_cr("NULL"); |
duke@435 | 355 | } else { |
duke@435 | 356 | cb->print(); |
duke@435 | 357 | } |
duke@435 | 358 | } |
duke@435 | 359 | |
duke@435 | 360 | |
duke@435 | 361 | extern "C" void disnm(intptr_t p) { |
duke@435 | 362 | Command c("disnm"); |
duke@435 | 363 | CodeBlob* cb = CodeCache::find_blob((address) p); |
duke@435 | 364 | cb->print(); |
duke@435 | 365 | Disassembler::decode(cb); |
duke@435 | 366 | } |
duke@435 | 367 | |
duke@435 | 368 | |
duke@435 | 369 | extern "C" void printnm(intptr_t p) { |
duke@435 | 370 | char buffer[256]; |
duke@435 | 371 | sprintf(buffer, "printnm: " INTPTR_FORMAT, p); |
duke@435 | 372 | Command c(buffer); |
duke@435 | 373 | CodeBlob* cb = CodeCache::find_blob((address) p); |
duke@435 | 374 | if (cb->is_nmethod()) { |
duke@435 | 375 | nmethod* nm = (nmethod*)cb; |
duke@435 | 376 | nm->print_nmethod(true); |
duke@435 | 377 | } |
duke@435 | 378 | } |
duke@435 | 379 | |
duke@435 | 380 | |
duke@435 | 381 | extern "C" void universe() { |
duke@435 | 382 | Command c("universe"); |
duke@435 | 383 | Universe::print(); |
duke@435 | 384 | } |
duke@435 | 385 | |
duke@435 | 386 | |
duke@435 | 387 | extern "C" void verify() { |
duke@435 | 388 | // try to run a verify on the entire system |
duke@435 | 389 | // note: this may not be safe if we're not at a safepoint; for debugging, |
duke@435 | 390 | // this manipulates the safepoint settings to avoid assertion failures |
duke@435 | 391 | Command c("universe verify"); |
duke@435 | 392 | bool safe = SafepointSynchronize::is_at_safepoint(); |
duke@435 | 393 | if (!safe) { |
duke@435 | 394 | tty->print_cr("warning: not at safepoint -- verify may fail"); |
duke@435 | 395 | SafepointSynchronize::set_is_at_safepoint(); |
duke@435 | 396 | } |
duke@435 | 397 | // Ensure Eden top is correct before verification |
duke@435 | 398 | Universe::heap()->prepare_for_verify(); |
duke@435 | 399 | Universe::verify(true); |
duke@435 | 400 | if (!safe) SafepointSynchronize::set_is_not_at_safepoint(); |
duke@435 | 401 | } |
duke@435 | 402 | |
duke@435 | 403 | |
duke@435 | 404 | extern "C" void pp(void* p) { |
duke@435 | 405 | Command c("pp"); |
duke@435 | 406 | FlagSetting fl(PrintVMMessages, true); |
duke@435 | 407 | if (Universe::heap()->is_in(p)) { |
duke@435 | 408 | oop obj = oop(p); |
duke@435 | 409 | obj->print(); |
duke@435 | 410 | } else { |
duke@435 | 411 | tty->print("%#p", p); |
duke@435 | 412 | } |
duke@435 | 413 | } |
duke@435 | 414 | |
duke@435 | 415 | |
duke@435 | 416 | // pv: print vm-printable object |
duke@435 | 417 | extern "C" void pa(intptr_t p) { ((AllocatedObj*) p)->print(); } |
duke@435 | 418 | extern "C" void findpc(intptr_t x); |
duke@435 | 419 | |
duke@435 | 420 | extern "C" void ps() { // print stack |
duke@435 | 421 | Command c("ps"); |
duke@435 | 422 | |
duke@435 | 423 | |
duke@435 | 424 | // Prints the stack of the current Java thread |
duke@435 | 425 | JavaThread* p = JavaThread::active(); |
duke@435 | 426 | tty->print(" for thread: "); |
duke@435 | 427 | p->print(); |
duke@435 | 428 | tty->cr(); |
duke@435 | 429 | |
duke@435 | 430 | if (p->has_last_Java_frame()) { |
duke@435 | 431 | // If the last_Java_fp is set we are in C land and |
duke@435 | 432 | // can call the standard stack_trace function. |
duke@435 | 433 | p->trace_stack(); |
duke@435 | 434 | } else { |
duke@435 | 435 | frame f = os::current_frame(); |
duke@435 | 436 | RegisterMap reg_map(p); |
duke@435 | 437 | f = f.sender(®_map); |
duke@435 | 438 | tty->print("(guessing starting frame id=%#p based on current fp)\n", f.id()); |
duke@435 | 439 | p->trace_stack_from(vframe::new_vframe(&f, ®_map, p)); |
duke@435 | 440 | pd_ps(f); |
duke@435 | 441 | } |
duke@435 | 442 | |
duke@435 | 443 | } |
duke@435 | 444 | |
duke@435 | 445 | |
duke@435 | 446 | extern "C" void psf() { // print stack frames |
duke@435 | 447 | { |
duke@435 | 448 | Command c("psf"); |
duke@435 | 449 | JavaThread* p = JavaThread::active(); |
duke@435 | 450 | tty->print(" for thread: "); |
duke@435 | 451 | p->print(); |
duke@435 | 452 | tty->cr(); |
duke@435 | 453 | if (p->has_last_Java_frame()) { |
duke@435 | 454 | p->trace_frames(); |
duke@435 | 455 | } |
duke@435 | 456 | } |
duke@435 | 457 | } |
duke@435 | 458 | |
duke@435 | 459 | |
duke@435 | 460 | extern "C" void threads() { |
duke@435 | 461 | Command c("threads"); |
duke@435 | 462 | Threads::print(false, true); |
duke@435 | 463 | } |
duke@435 | 464 | |
duke@435 | 465 | |
duke@435 | 466 | extern "C" void psd() { |
duke@435 | 467 | Command c("psd"); |
duke@435 | 468 | SystemDictionary::print(); |
duke@435 | 469 | } |
duke@435 | 470 | |
duke@435 | 471 | |
duke@435 | 472 | extern "C" void safepoints() { |
duke@435 | 473 | Command c("safepoints"); |
duke@435 | 474 | SafepointSynchronize::print_state(); |
duke@435 | 475 | } |
duke@435 | 476 | |
duke@435 | 477 | |
duke@435 | 478 | extern "C" void pss() { // print all stacks |
duke@435 | 479 | Command c("pss"); |
duke@435 | 480 | Threads::print(true, true); |
duke@435 | 481 | } |
duke@435 | 482 | |
duke@435 | 483 | |
duke@435 | 484 | extern "C" void debug() { // to set things up for compiler debugging |
duke@435 | 485 | Command c("debug"); |
duke@435 | 486 | WizardMode = true; |
duke@435 | 487 | PrintVMMessages = PrintCompilation = true; |
duke@435 | 488 | PrintInlining = PrintAssembly = true; |
duke@435 | 489 | tty->flush(); |
duke@435 | 490 | } |
duke@435 | 491 | |
duke@435 | 492 | |
duke@435 | 493 | extern "C" void ndebug() { // undo debug() |
duke@435 | 494 | Command c("ndebug"); |
duke@435 | 495 | PrintCompilation = false; |
duke@435 | 496 | PrintInlining = PrintAssembly = false; |
duke@435 | 497 | tty->flush(); |
duke@435 | 498 | } |
duke@435 | 499 | |
duke@435 | 500 | |
duke@435 | 501 | extern "C" void flush() { |
duke@435 | 502 | Command c("flush"); |
duke@435 | 503 | tty->flush(); |
duke@435 | 504 | } |
duke@435 | 505 | |
duke@435 | 506 | |
duke@435 | 507 | extern "C" void events() { |
duke@435 | 508 | Command c("events"); |
duke@435 | 509 | Events::print_last(tty, 50); |
duke@435 | 510 | } |
duke@435 | 511 | |
duke@435 | 512 | |
duke@435 | 513 | extern "C" void nevents(int n) { |
duke@435 | 514 | Command c("events"); |
duke@435 | 515 | Events::print_last(tty, n); |
duke@435 | 516 | } |
duke@435 | 517 | |
duke@435 | 518 | |
duke@435 | 519 | // Given a heap address that was valid before the most recent GC, if |
duke@435 | 520 | // the oop that used to contain it is still live, prints the new |
duke@435 | 521 | // location of the oop and the address. Useful for tracking down |
duke@435 | 522 | // certain kinds of naked oop and oop map bugs. |
duke@435 | 523 | extern "C" void pnl(intptr_t old_heap_addr) { |
duke@435 | 524 | // Print New Location of old heap address |
duke@435 | 525 | Command c("pnl"); |
duke@435 | 526 | #ifndef VALIDATE_MARK_SWEEP |
duke@435 | 527 | tty->print_cr("Requires build with VALIDATE_MARK_SWEEP defined (debug build) and RecordMarkSweepCompaction enabled"); |
duke@435 | 528 | #else |
duke@435 | 529 | MarkSweep::print_new_location_of_heap_address((HeapWord*) old_heap_addr); |
duke@435 | 530 | #endif |
duke@435 | 531 | } |
duke@435 | 532 | |
duke@435 | 533 | |
duke@435 | 534 | extern "C" methodOop findm(intptr_t pc) { |
duke@435 | 535 | Command c("findm"); |
duke@435 | 536 | nmethod* nm = CodeCache::find_nmethod((address)pc); |
duke@435 | 537 | return (nm == NULL) ? (methodOop)NULL : nm->method(); |
duke@435 | 538 | } |
duke@435 | 539 | |
duke@435 | 540 | |
duke@435 | 541 | extern "C" nmethod* findnm(intptr_t addr) { |
duke@435 | 542 | Command c("findnm"); |
duke@435 | 543 | return CodeCache::find_nmethod((address)addr); |
duke@435 | 544 | } |
duke@435 | 545 | |
duke@435 | 546 | static address same_page(address x, address y) { |
duke@435 | 547 | intptr_t page_bits = -os::vm_page_size(); |
duke@435 | 548 | if ((intptr_t(x) & page_bits) == (intptr_t(y) & page_bits)) { |
duke@435 | 549 | return x; |
duke@435 | 550 | } else if (x > y) { |
duke@435 | 551 | return (address)(intptr_t(y) | ~page_bits) + 1; |
duke@435 | 552 | } else { |
duke@435 | 553 | return (address)(intptr_t(y) & page_bits); |
duke@435 | 554 | } |
duke@435 | 555 | } |
duke@435 | 556 | |
duke@435 | 557 | class LookForRefInGenClosure : public OopsInGenClosure { |
duke@435 | 558 | public: |
duke@435 | 559 | oop target; |
duke@435 | 560 | void do_oop(oop* o) { |
duke@435 | 561 | if (o != NULL && *o == target) { |
ysr@777 | 562 | tty->print_cr(INTPTR_FORMAT, o); |
duke@435 | 563 | } |
duke@435 | 564 | } |
coleenp@548 | 565 | void do_oop(narrowOop* o) { ShouldNotReachHere(); } |
duke@435 | 566 | }; |
duke@435 | 567 | |
duke@435 | 568 | |
duke@435 | 569 | class LookForRefInObjectClosure : public ObjectClosure { |
duke@435 | 570 | private: |
duke@435 | 571 | LookForRefInGenClosure look_in_object; |
duke@435 | 572 | public: |
duke@435 | 573 | LookForRefInObjectClosure(oop target) { look_in_object.target = target; } |
duke@435 | 574 | void do_object(oop obj) { |
duke@435 | 575 | obj->oop_iterate(&look_in_object); |
duke@435 | 576 | } |
duke@435 | 577 | }; |
duke@435 | 578 | |
duke@435 | 579 | |
duke@435 | 580 | static void findref(intptr_t x) { |
ysr@777 | 581 | CollectedHeap *ch = Universe::heap(); |
duke@435 | 582 | LookForRefInGenClosure lookFor; |
duke@435 | 583 | lookFor.target = (oop) x; |
duke@435 | 584 | LookForRefInObjectClosure look_in_object((oop) x); |
duke@435 | 585 | |
duke@435 | 586 | tty->print_cr("Searching heap:"); |
ysr@777 | 587 | ch->object_iterate(&look_in_object); |
duke@435 | 588 | |
duke@435 | 589 | tty->print_cr("Searching strong roots:"); |
duke@435 | 590 | Universe::oops_do(&lookFor, false); |
duke@435 | 591 | JNIHandles::oops_do(&lookFor); // Global (strong) JNI handles |
jrose@1424 | 592 | Threads::oops_do(&lookFor, NULL); |
duke@435 | 593 | ObjectSynchronizer::oops_do(&lookFor); |
duke@435 | 594 | //FlatProfiler::oops_do(&lookFor); |
duke@435 | 595 | SystemDictionary::oops_do(&lookFor); |
duke@435 | 596 | |
jrose@1424 | 597 | tty->print_cr("Searching code cache:"); |
jrose@1424 | 598 | CodeCache::oops_do(&lookFor); |
jrose@1424 | 599 | |
duke@435 | 600 | tty->print_cr("Done."); |
duke@435 | 601 | } |
duke@435 | 602 | |
duke@435 | 603 | class FindClassObjectClosure: public ObjectClosure { |
duke@435 | 604 | private: |
duke@435 | 605 | const char* _target; |
duke@435 | 606 | public: |
duke@435 | 607 | FindClassObjectClosure(const char name[]) { _target = name; } |
duke@435 | 608 | |
duke@435 | 609 | virtual void do_object(oop obj) { |
duke@435 | 610 | if (obj->is_klass()) { |
duke@435 | 611 | Klass* k = klassOop(obj)->klass_part(); |
duke@435 | 612 | if (k->name() != NULL) { |
duke@435 | 613 | ResourceMark rm; |
duke@435 | 614 | const char* ext = k->external_name(); |
duke@435 | 615 | if ( strcmp(_target, ext) == 0 ) { |
duke@435 | 616 | tty->print_cr("Found " INTPTR_FORMAT, obj); |
duke@435 | 617 | obj->print(); |
duke@435 | 618 | } |
duke@435 | 619 | } |
duke@435 | 620 | } |
duke@435 | 621 | } |
duke@435 | 622 | }; |
duke@435 | 623 | |
duke@435 | 624 | // |
duke@435 | 625 | extern "C" void findclass(const char name[]) { |
duke@435 | 626 | Command c("findclass"); |
duke@435 | 627 | if (name != NULL) { |
duke@435 | 628 | tty->print_cr("Finding class %s -> ", name); |
duke@435 | 629 | FindClassObjectClosure srch(name); |
duke@435 | 630 | Universe::heap()->permanent_object_iterate(&srch); |
duke@435 | 631 | } |
duke@435 | 632 | } |
duke@435 | 633 | |
duke@435 | 634 | // Another interface that isn't ambiguous in dbx. |
duke@435 | 635 | // Can we someday rename the other find to hsfind? |
duke@435 | 636 | extern "C" void hsfind(intptr_t x) { |
duke@435 | 637 | Command c("hsfind"); |
bobv@2036 | 638 | os::print_location(tty, x, false); |
duke@435 | 639 | } |
duke@435 | 640 | |
duke@435 | 641 | |
duke@435 | 642 | extern "C" void hsfindref(intptr_t x) { |
duke@435 | 643 | Command c("hsfindref"); |
duke@435 | 644 | findref(x); |
duke@435 | 645 | } |
duke@435 | 646 | |
duke@435 | 647 | extern "C" void find(intptr_t x) { |
duke@435 | 648 | Command c("find"); |
bobv@2036 | 649 | os::print_location(tty, x, false); |
duke@435 | 650 | } |
duke@435 | 651 | |
duke@435 | 652 | |
duke@435 | 653 | extern "C" void findpc(intptr_t x) { |
duke@435 | 654 | Command c("findpc"); |
bobv@2036 | 655 | os::print_location(tty, x, true); |
duke@435 | 656 | } |
duke@435 | 657 | |
duke@435 | 658 | |
duke@435 | 659 | // int versions of all methods to avoid having to type type casts in the debugger |
duke@435 | 660 | |
duke@435 | 661 | void pp(intptr_t p) { pp((void*)p); } |
duke@435 | 662 | void pp(oop p) { pp((void*)p); } |
duke@435 | 663 | |
duke@435 | 664 | void help() { |
duke@435 | 665 | Command c("help"); |
duke@435 | 666 | tty->print_cr("basic"); |
duke@435 | 667 | tty->print_cr(" pp(void* p) - try to make sense of p"); |
duke@435 | 668 | tty->print_cr(" pv(intptr_t p)- ((PrintableResourceObj*) p)->print()"); |
duke@435 | 669 | tty->print_cr(" ps() - print current thread stack"); |
duke@435 | 670 | tty->print_cr(" pss() - print all thread stacks"); |
duke@435 | 671 | tty->print_cr(" pm(int pc) - print methodOop given compiled PC"); |
duke@435 | 672 | tty->print_cr(" findm(intptr_t pc) - finds methodOop"); |
duke@435 | 673 | tty->print_cr(" find(intptr_t x) - finds & prints nmethod/stub/bytecode/oop based on pointer into it"); |
duke@435 | 674 | |
duke@435 | 675 | tty->print_cr("misc."); |
duke@435 | 676 | tty->print_cr(" flush() - flushes the log file"); |
duke@435 | 677 | tty->print_cr(" events() - dump last 50 events"); |
duke@435 | 678 | |
duke@435 | 679 | |
duke@435 | 680 | tty->print_cr("compiler debugging"); |
duke@435 | 681 | tty->print_cr(" debug() - to set things up for compiler debugging"); |
duke@435 | 682 | tty->print_cr(" ndebug() - undo debug"); |
duke@435 | 683 | } |
duke@435 | 684 | |
duke@435 | 685 | #if 0 |
duke@435 | 686 | |
duke@435 | 687 | // BobV's command parser for debugging on windows when nothing else works. |
duke@435 | 688 | |
duke@435 | 689 | enum CommandID { |
duke@435 | 690 | CMDID_HELP, |
duke@435 | 691 | CMDID_QUIT, |
duke@435 | 692 | CMDID_HSFIND, |
duke@435 | 693 | CMDID_PSS, |
duke@435 | 694 | CMDID_PS, |
duke@435 | 695 | CMDID_PSF, |
duke@435 | 696 | CMDID_FINDM, |
duke@435 | 697 | CMDID_FINDNM, |
duke@435 | 698 | CMDID_PP, |
duke@435 | 699 | CMDID_BPT, |
duke@435 | 700 | CMDID_EXIT, |
duke@435 | 701 | CMDID_VERIFY, |
duke@435 | 702 | CMDID_THREADS, |
duke@435 | 703 | CMDID_ILLEGAL = 99 |
duke@435 | 704 | }; |
duke@435 | 705 | |
duke@435 | 706 | struct CommandParser { |
duke@435 | 707 | char *name; |
duke@435 | 708 | CommandID code; |
duke@435 | 709 | char *description; |
duke@435 | 710 | }; |
duke@435 | 711 | |
duke@435 | 712 | struct CommandParser CommandList[] = { |
duke@435 | 713 | (char *)"help", CMDID_HELP, " Dump this list", |
duke@435 | 714 | (char *)"quit", CMDID_QUIT, " Return from this routine", |
duke@435 | 715 | (char *)"hsfind", CMDID_HSFIND, "Perform an hsfind on an address", |
duke@435 | 716 | (char *)"ps", CMDID_PS, " Print Current Thread Stack Trace", |
duke@435 | 717 | (char *)"pss", CMDID_PSS, " Print All Thread Stack Trace", |
duke@435 | 718 | (char *)"psf", CMDID_PSF, " Print All Stack Frames", |
duke@435 | 719 | (char *)"findm", CMDID_FINDM, " Find a methodOop from a PC", |
duke@435 | 720 | (char *)"findnm", CMDID_FINDNM, "Find an nmethod from a PC", |
duke@435 | 721 | (char *)"pp", CMDID_PP, " Find out something about a pointer", |
duke@435 | 722 | (char *)"break", CMDID_BPT, " Execute a breakpoint", |
duke@435 | 723 | (char *)"exitvm", CMDID_EXIT, "Exit the VM", |
duke@435 | 724 | (char *)"verify", CMDID_VERIFY, "Perform a Heap Verify", |
duke@435 | 725 | (char *)"thread", CMDID_THREADS, "Dump Info on all Threads", |
duke@435 | 726 | (char *)0, CMDID_ILLEGAL |
duke@435 | 727 | }; |
duke@435 | 728 | |
duke@435 | 729 | |
duke@435 | 730 | // get_debug_command() |
duke@435 | 731 | // |
duke@435 | 732 | // Read a command from standard input. |
duke@435 | 733 | // This is useful when you have a debugger |
duke@435 | 734 | // which doesn't support calling into functions. |
duke@435 | 735 | // |
duke@435 | 736 | void get_debug_command() |
duke@435 | 737 | { |
duke@435 | 738 | ssize_t count; |
duke@435 | 739 | int i,j; |
duke@435 | 740 | bool gotcommand; |
duke@435 | 741 | intptr_t addr; |
duke@435 | 742 | char buffer[256]; |
duke@435 | 743 | nmethod *nm; |
duke@435 | 744 | methodOop m; |
duke@435 | 745 | |
duke@435 | 746 | tty->print_cr("You have entered the diagnostic command interpreter"); |
duke@435 | 747 | tty->print("The supported commands are:\n"); |
duke@435 | 748 | for ( i=0; ; i++ ) { |
duke@435 | 749 | if ( CommandList[i].code == CMDID_ILLEGAL ) |
duke@435 | 750 | break; |
duke@435 | 751 | tty->print_cr(" %s \n", CommandList[i].name ); |
duke@435 | 752 | } |
duke@435 | 753 | |
duke@435 | 754 | while ( 1 ) { |
duke@435 | 755 | gotcommand = false; |
duke@435 | 756 | tty->print("Please enter a command: "); |
duke@435 | 757 | count = scanf("%s", buffer) ; |
duke@435 | 758 | if ( count >=0 ) { |
duke@435 | 759 | for ( i=0; ; i++ ) { |
duke@435 | 760 | if ( CommandList[i].code == CMDID_ILLEGAL ) { |
duke@435 | 761 | if (!gotcommand) tty->print("Invalid command, please try again\n"); |
duke@435 | 762 | break; |
duke@435 | 763 | } |
duke@435 | 764 | if ( strcmp(buffer, CommandList[i].name) == 0 ) { |
duke@435 | 765 | gotcommand = true; |
duke@435 | 766 | switch ( CommandList[i].code ) { |
duke@435 | 767 | case CMDID_PS: |
duke@435 | 768 | ps(); |
duke@435 | 769 | break; |
duke@435 | 770 | case CMDID_PSS: |
duke@435 | 771 | pss(); |
duke@435 | 772 | break; |
duke@435 | 773 | case CMDID_PSF: |
duke@435 | 774 | psf(); |
duke@435 | 775 | break; |
duke@435 | 776 | case CMDID_FINDM: |
duke@435 | 777 | tty->print("Please enter the hex addr to pass to findm: "); |
duke@435 | 778 | scanf("%I64X", &addr); |
duke@435 | 779 | m = (methodOop)findm(addr); |
duke@435 | 780 | tty->print("findm(0x%I64X) returned 0x%I64X\n", addr, m); |
duke@435 | 781 | break; |
duke@435 | 782 | case CMDID_FINDNM: |
duke@435 | 783 | tty->print("Please enter the hex addr to pass to findnm: "); |
duke@435 | 784 | scanf("%I64X", &addr); |
duke@435 | 785 | nm = (nmethod*)findnm(addr); |
duke@435 | 786 | tty->print("findnm(0x%I64X) returned 0x%I64X\n", addr, nm); |
duke@435 | 787 | break; |
duke@435 | 788 | case CMDID_PP: |
duke@435 | 789 | tty->print("Please enter the hex addr to pass to pp: "); |
duke@435 | 790 | scanf("%I64X", &addr); |
duke@435 | 791 | pp((void*)addr); |
duke@435 | 792 | break; |
duke@435 | 793 | case CMDID_EXIT: |
duke@435 | 794 | exit(0); |
duke@435 | 795 | case CMDID_HELP: |
duke@435 | 796 | tty->print("Here are the supported commands: "); |
duke@435 | 797 | for ( j=0; ; j++ ) { |
duke@435 | 798 | if ( CommandList[j].code == CMDID_ILLEGAL ) |
duke@435 | 799 | break; |
duke@435 | 800 | tty->print_cr(" %s -- %s\n", CommandList[j].name, |
duke@435 | 801 | CommandList[j].description ); |
duke@435 | 802 | } |
duke@435 | 803 | break; |
duke@435 | 804 | case CMDID_QUIT: |
duke@435 | 805 | return; |
duke@435 | 806 | break; |
duke@435 | 807 | case CMDID_BPT: |
duke@435 | 808 | BREAKPOINT; |
duke@435 | 809 | break; |
duke@435 | 810 | case CMDID_VERIFY: |
duke@435 | 811 | verify();; |
duke@435 | 812 | break; |
duke@435 | 813 | case CMDID_THREADS: |
duke@435 | 814 | threads();; |
duke@435 | 815 | break; |
duke@435 | 816 | case CMDID_HSFIND: |
duke@435 | 817 | tty->print("Please enter the hex addr to pass to hsfind: "); |
duke@435 | 818 | scanf("%I64X", &addr); |
duke@435 | 819 | tty->print("Calling hsfind(0x%I64X)\n", addr); |
duke@435 | 820 | hsfind(addr); |
duke@435 | 821 | break; |
duke@435 | 822 | default: |
duke@435 | 823 | case CMDID_ILLEGAL: |
duke@435 | 824 | break; |
duke@435 | 825 | } |
duke@435 | 826 | } |
duke@435 | 827 | } |
duke@435 | 828 | } |
duke@435 | 829 | } |
duke@435 | 830 | } |
duke@435 | 831 | #endif |
duke@435 | 832 | |
duke@435 | 833 | #endif // PRODUCT |