Wed, 17 Mar 2010 11:01:05 +0100
6935224: Adding new DTrace probes to work with Palantir
Summary: Adding probes related to thread scheduling and class initialization
Reviewed-by: kamg, never
duke@435 | 1 | /* |
jrose@1100 | 2 | * Copyright 1997-2009 Sun Microsystems, Inc. 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 | * |
duke@435 | 19 | * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, |
duke@435 | 20 | * CA 95054 USA or visit www.sun.com if you need additional information or |
duke@435 | 21 | * have any questions. |
duke@435 | 22 | * |
duke@435 | 23 | */ |
duke@435 | 24 | |
duke@435 | 25 | # include "incls/_precompiled.incl" |
duke@435 | 26 | # include "incls/_oop.cpp.incl" |
duke@435 | 27 | |
duke@435 | 28 | bool always_do_update_barrier = false; |
duke@435 | 29 | |
duke@435 | 30 | BarrierSet* oopDesc::_bs = NULL; |
duke@435 | 31 | |
duke@435 | 32 | #ifdef PRODUCT |
duke@435 | 33 | void oopDesc::print_on(outputStream* st) const {} |
duke@435 | 34 | void oopDesc::print_address_on(outputStream* st) const {} |
duke@435 | 35 | char* oopDesc::print_string() { return NULL; } |
duke@435 | 36 | void oopDesc::print() {} |
duke@435 | 37 | void oopDesc::print_address() {} |
jrose@1590 | 38 | |
jrose@1590 | 39 | #else //PRODUCT |
jrose@1590 | 40 | |
duke@435 | 41 | void oopDesc::print_on(outputStream* st) const { |
duke@435 | 42 | if (this == NULL) { |
duke@435 | 43 | st->print_cr("NULL"); |
duke@435 | 44 | } else { |
duke@435 | 45 | blueprint()->oop_print_on(oop(this), st); |
duke@435 | 46 | } |
duke@435 | 47 | } |
duke@435 | 48 | |
duke@435 | 49 | void oopDesc::print_address_on(outputStream* st) const { |
duke@435 | 50 | if (PrintOopAddress) { |
jrose@1100 | 51 | st->print("{"INTPTR_FORMAT"}", this); |
duke@435 | 52 | } |
duke@435 | 53 | } |
duke@435 | 54 | |
duke@435 | 55 | void oopDesc::print() { print_on(tty); } |
duke@435 | 56 | |
duke@435 | 57 | void oopDesc::print_address() { print_address_on(tty); } |
duke@435 | 58 | |
duke@435 | 59 | char* oopDesc::print_string() { |
jrose@1590 | 60 | stringStream st; |
jrose@1590 | 61 | print_on(&st); |
jrose@1590 | 62 | return st.as_string(); |
jrose@1590 | 63 | } |
jrose@1590 | 64 | |
jrose@1590 | 65 | #endif // PRODUCT |
jrose@1590 | 66 | |
jrose@1590 | 67 | // The print_value functions are present in all builds, to support the disassembler. |
jrose@1590 | 68 | |
jrose@1590 | 69 | void oopDesc::print_value() { |
jrose@1590 | 70 | print_value_on(tty); |
duke@435 | 71 | } |
duke@435 | 72 | |
duke@435 | 73 | char* oopDesc::print_value_string() { |
jrose@1590 | 74 | char buf[100]; |
jrose@1590 | 75 | stringStream st(buf, sizeof(buf)); |
jrose@1590 | 76 | print_value_on(&st); |
jrose@1590 | 77 | return st.as_string(); |
duke@435 | 78 | } |
duke@435 | 79 | |
jrose@1590 | 80 | void oopDesc::print_value_on(outputStream* st) const { |
jrose@1590 | 81 | oop obj = oop(this); |
jrose@1590 | 82 | if (this == NULL) { |
jrose@1590 | 83 | st->print("NULL"); |
jrose@1590 | 84 | } else if (java_lang_String::is_instance(obj)) { |
jrose@1590 | 85 | java_lang_String::print(obj, st); |
jrose@1590 | 86 | #ifndef PRODUCT |
jrose@1590 | 87 | if (PrintOopAddress) print_address_on(st); |
jrose@1590 | 88 | #endif //PRODUCT |
jrose@1590 | 89 | #ifdef ASSERT |
jrose@1590 | 90 | } else if (!Universe::heap()->is_in(obj) || !Universe::heap()->is_in(klass())) { |
jrose@1590 | 91 | st->print("### BAD OOP %p ###", (address)obj); |
jrose@1590 | 92 | #endif //ASSERT |
jrose@1590 | 93 | } else { |
jrose@1590 | 94 | blueprint()->oop_print_value_on(obj, st); |
jrose@1590 | 95 | } |
jrose@1590 | 96 | } |
jrose@1590 | 97 | |
duke@435 | 98 | |
duke@435 | 99 | void oopDesc::verify_on(outputStream* st) { |
duke@435 | 100 | if (this != NULL) { |
duke@435 | 101 | blueprint()->oop_verify_on(this, st); |
duke@435 | 102 | } |
duke@435 | 103 | } |
duke@435 | 104 | |
duke@435 | 105 | |
duke@435 | 106 | void oopDesc::verify() { |
duke@435 | 107 | verify_on(tty); |
duke@435 | 108 | } |
duke@435 | 109 | |
duke@435 | 110 | |
coleenp@548 | 111 | // XXX verify_old_oop doesn't do anything (should we remove?) |
duke@435 | 112 | void oopDesc::verify_old_oop(oop* p, bool allow_dirty) { |
duke@435 | 113 | blueprint()->oop_verify_old_oop(this, p, allow_dirty); |
duke@435 | 114 | } |
duke@435 | 115 | |
coleenp@548 | 116 | void oopDesc::verify_old_oop(narrowOop* p, bool allow_dirty) { |
coleenp@548 | 117 | blueprint()->oop_verify_old_oop(this, p, allow_dirty); |
coleenp@548 | 118 | } |
duke@435 | 119 | |
duke@435 | 120 | bool oopDesc::partially_loaded() { |
duke@435 | 121 | return blueprint()->oop_partially_loaded(this); |
duke@435 | 122 | } |
duke@435 | 123 | |
duke@435 | 124 | |
duke@435 | 125 | void oopDesc::set_partially_loaded() { |
duke@435 | 126 | blueprint()->oop_set_partially_loaded(this); |
duke@435 | 127 | } |
duke@435 | 128 | |
duke@435 | 129 | |
duke@435 | 130 | intptr_t oopDesc::slow_identity_hash() { |
duke@435 | 131 | // slow case; we have to acquire the micro lock in order to locate the header |
duke@435 | 132 | ResetNoHandleMark rnm; // Might be called from LEAF/QUICK ENTRY |
duke@435 | 133 | HandleMark hm; |
duke@435 | 134 | Handle object((oop)this); |
duke@435 | 135 | assert(!is_shared_readonly(), "using identity hash on readonly object?"); |
duke@435 | 136 | return ObjectSynchronizer::identity_hash_value_for(object); |
duke@435 | 137 | } |
duke@435 | 138 | |
duke@435 | 139 | VerifyOopClosure VerifyOopClosure::verify_oop; |
coleenp@548 | 140 | |
coleenp@548 | 141 | void VerifyOopClosure::do_oop(oop* p) { VerifyOopClosure::do_oop_work(p); } |
coleenp@548 | 142 | void VerifyOopClosure::do_oop(narrowOop* p) { VerifyOopClosure::do_oop_work(p); } |