oop.cpp revision 1472:c18cbe5936b8
1179189Sjb/*
2179189Sjb * Copyright (c) 1997, 2009, Oracle and/or its affiliates. All rights reserved.
3179189Sjb * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4179189Sjb *
5179189Sjb * This code is free software; you can redistribute it and/or modify it
6179189Sjb * under the terms of the GNU General Public License version 2 only, as
7179189Sjb * published by the Free Software Foundation.
8179189Sjb *
9179189Sjb * This code is distributed in the hope that it will be useful, but WITHOUT
10179189Sjb * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11179189Sjb * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
12179189Sjb * version 2 for more details (a copy is included in the LICENSE file that
13179189Sjb * accompanied this code).
14179189Sjb *
15179189Sjb * You should have received a copy of the GNU General Public License version
16179189Sjb * 2 along with this work; if not, write to the Free Software Foundation,
17179189Sjb * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18179189Sjb *
19179189Sjb * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20179189Sjb * or visit www.oracle.com if you need additional information or have any
21179189Sjb * questions.
22179189Sjb *
23179189Sjb */
24179189Sjb
25179189Sjb# include "incls/_precompiled.incl"
26179189Sjb# include "incls/_oop.cpp.incl"
27179189Sjb
28179189Sjbbool always_do_update_barrier = false;
29179189Sjb
30179189SjbBarrierSet* oopDesc::_bs = NULL;
31179189Sjb
32179189Sjb#ifdef PRODUCT
33179189Sjbvoid oopDesc::print_on(outputStream* st) const {}
34179189Sjbvoid oopDesc::print_address_on(outputStream* st) const {}
35179189Sjbchar* oopDesc::print_string() { return NULL; }
36179189Sjbvoid oopDesc::print()         {}
37179189Sjbvoid oopDesc::print_address() {}
38179189Sjb
39179189Sjb#else //PRODUCT
40179189Sjb
41179189Sjbvoid oopDesc::print_on(outputStream* st) const {
42179189Sjb  if (this == NULL) {
43179189Sjb    st->print_cr("NULL");
44179189Sjb  } else {
45179189Sjb    blueprint()->oop_print_on(oop(this), st);
46179189Sjb  }
47179189Sjb}
48179189Sjb
49179189Sjbvoid oopDesc::print_address_on(outputStream* st) const {
50179189Sjb  if (PrintOopAddress) {
51179189Sjb    st->print("{"INTPTR_FORMAT"}", this);
52179189Sjb  }
53179189Sjb}
54179189Sjb
55179189Sjbvoid oopDesc::print()         { print_on(tty);         }
56179189Sjb
57void oopDesc::print_address() { print_address_on(tty); }
58
59char* oopDesc::print_string() {
60  stringStream st;
61  print_on(&st);
62  return st.as_string();
63}
64
65#endif // PRODUCT
66
67// The print_value functions are present in all builds, to support the disassembler.
68
69void oopDesc::print_value() {
70  print_value_on(tty);
71}
72
73char* 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}
79
80void 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}
97
98
99void oopDesc::verify_on(outputStream* st) {
100  if (this != NULL) {
101    blueprint()->oop_verify_on(this, st);
102  }
103}
104
105
106void oopDesc::verify() {
107  verify_on(tty);
108}
109
110
111// XXX verify_old_oop doesn't do anything (should we remove?)
112void oopDesc::verify_old_oop(oop* p, bool allow_dirty) {
113  blueprint()->oop_verify_old_oop(this, p, allow_dirty);
114}
115
116void oopDesc::verify_old_oop(narrowOop* p, bool allow_dirty) {
117  blueprint()->oop_verify_old_oop(this, p, allow_dirty);
118}
119
120bool oopDesc::partially_loaded() {
121  return blueprint()->oop_partially_loaded(this);
122}
123
124
125void oopDesc::set_partially_loaded() {
126  blueprint()->oop_set_partially_loaded(this);
127}
128
129
130intptr_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}
138
139VerifyOopClosure VerifyOopClosure::verify_oop;
140
141void VerifyOopClosure::do_oop(oop* p)       { VerifyOopClosure::do_oop_work(p); }
142void VerifyOopClosure::do_oop(narrowOop* p) { VerifyOopClosure::do_oop_work(p); }
143