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