Wed, 25 Aug 2010 05:27:54 -0700
6978355: renaming for 6961697
Summary: This is the renaming part of 6961697 to keep the actual changes small for review.
Reviewed-by: kvn, never
duke@435 | 1 | /* |
never@1999 | 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/_vtableStubs.cpp.incl" |
duke@435 | 27 | |
duke@435 | 28 | // ----------------------------------------------------------------------------------------- |
duke@435 | 29 | // Implementation of VtableStub |
duke@435 | 30 | |
duke@435 | 31 | address VtableStub::_chunk = NULL; |
duke@435 | 32 | address VtableStub::_chunk_end = NULL; |
duke@435 | 33 | VMReg VtableStub::_receiver_location = VMRegImpl::Bad(); |
duke@435 | 34 | |
duke@435 | 35 | static int num_vtable_chunks = 0; |
duke@435 | 36 | |
duke@435 | 37 | |
duke@435 | 38 | void* VtableStub::operator new(size_t size, int code_size) { |
duke@435 | 39 | assert(size == sizeof(VtableStub), "mismatched size"); |
duke@435 | 40 | num_vtable_chunks++; |
duke@435 | 41 | // compute real VtableStub size (rounded to nearest word) |
duke@435 | 42 | const int real_size = round_to(code_size + sizeof(VtableStub), wordSize); |
duke@435 | 43 | // malloc them in chunks to minimize header overhead |
duke@435 | 44 | const int chunk_factor = 32; |
duke@435 | 45 | if (_chunk == NULL || _chunk + real_size > _chunk_end) { |
duke@435 | 46 | const int bytes = chunk_factor * real_size + pd_code_alignment(); |
duke@435 | 47 | BufferBlob* blob = BufferBlob::create("vtable chunks", bytes); |
jcoomes@1845 | 48 | if (blob == NULL) { |
jcoomes@1845 | 49 | vm_exit_out_of_memory(bytes, "CodeCache: no room for vtable chunks"); |
jcoomes@1845 | 50 | } |
twisti@2103 | 51 | _chunk = blob->content_begin(); |
duke@435 | 52 | _chunk_end = _chunk + bytes; |
duke@435 | 53 | Forte::register_stub("vtable stub", _chunk, _chunk_end); |
duke@435 | 54 | // Notify JVMTI about this stub. The event will be recorded by the enclosing |
duke@435 | 55 | // JvmtiDynamicCodeEventCollector and posted when this thread has released |
duke@435 | 56 | // all locks. |
duke@435 | 57 | if (JvmtiExport::should_post_dynamic_code_generated()) { |
duke@435 | 58 | JvmtiExport::post_dynamic_code_generated_while_holding_locks("vtable stub", _chunk, _chunk_end); |
duke@435 | 59 | } |
duke@435 | 60 | align_chunk(); |
duke@435 | 61 | } |
duke@435 | 62 | assert(_chunk + real_size <= _chunk_end, "bad allocation"); |
duke@435 | 63 | void* res = _chunk; |
duke@435 | 64 | _chunk += real_size; |
duke@435 | 65 | align_chunk(); |
duke@435 | 66 | return res; |
duke@435 | 67 | } |
duke@435 | 68 | |
duke@435 | 69 | |
bobv@2036 | 70 | void VtableStub::print_on(outputStream* st) const { |
bobv@2036 | 71 | st->print("vtable stub (index = %d, receiver_location = %d, code = [" INTPTR_FORMAT ", " INTPTR_FORMAT "[)", |
duke@435 | 72 | index(), receiver_location(), code_begin(), code_end()); |
duke@435 | 73 | } |
duke@435 | 74 | |
duke@435 | 75 | |
duke@435 | 76 | // ----------------------------------------------------------------------------------------- |
duke@435 | 77 | // Implementation of VtableStubs |
duke@435 | 78 | // |
duke@435 | 79 | // For each hash value there's a linked list of vtable stubs (with that |
duke@435 | 80 | // hash value). Each list is anchored in a little hash _table, indexed |
duke@435 | 81 | // by that hash value. |
duke@435 | 82 | |
duke@435 | 83 | VtableStub* VtableStubs::_table[VtableStubs::N]; |
duke@435 | 84 | int VtableStubs::_number_of_vtable_stubs = 0; |
duke@435 | 85 | |
duke@435 | 86 | |
duke@435 | 87 | void VtableStubs::initialize() { |
duke@435 | 88 | VtableStub::_receiver_location = SharedRuntime::name_for_receiver(); |
duke@435 | 89 | { |
duke@435 | 90 | MutexLocker ml(VtableStubs_lock); |
duke@435 | 91 | assert(_number_of_vtable_stubs == 0, "potential performance bug: VtableStubs initialized more than once"); |
duke@435 | 92 | assert(is_power_of_2(N), "N must be a power of 2"); |
duke@435 | 93 | for (int i = 0; i < N; i++) { |
duke@435 | 94 | _table[i] = NULL; |
duke@435 | 95 | } |
duke@435 | 96 | } |
duke@435 | 97 | } |
duke@435 | 98 | |
duke@435 | 99 | |
duke@435 | 100 | address VtableStubs::create_stub(bool is_vtable_stub, int vtable_index, methodOop method) { |
duke@435 | 101 | assert(vtable_index >= 0, "must be positive"); |
duke@435 | 102 | |
duke@435 | 103 | VtableStub* s = ShareVtableStubs ? lookup(is_vtable_stub, vtable_index) : NULL; |
duke@435 | 104 | if (s == NULL) { |
duke@435 | 105 | if (is_vtable_stub) { |
duke@435 | 106 | s = create_vtable_stub(vtable_index); |
duke@435 | 107 | } else { |
duke@435 | 108 | s = create_itable_stub(vtable_index); |
duke@435 | 109 | } |
duke@435 | 110 | enter(is_vtable_stub, vtable_index, s); |
duke@435 | 111 | if (PrintAdapterHandlers) { |
duke@435 | 112 | tty->print_cr("Decoding VtableStub %s[%d]@%d", |
duke@435 | 113 | is_vtable_stub? "vtbl": "itbl", vtable_index, VtableStub::receiver_location()); |
duke@435 | 114 | Disassembler::decode(s->code_begin(), s->code_end()); |
duke@435 | 115 | } |
duke@435 | 116 | } |
duke@435 | 117 | return s->entry_point(); |
duke@435 | 118 | } |
duke@435 | 119 | |
duke@435 | 120 | |
duke@435 | 121 | inline uint VtableStubs::hash(bool is_vtable_stub, int vtable_index){ |
duke@435 | 122 | // Assumption: receiver_location < 4 in most cases. |
duke@435 | 123 | int hash = ((vtable_index << 2) ^ VtableStub::receiver_location()->value()) + vtable_index; |
duke@435 | 124 | return (is_vtable_stub ? ~hash : hash) & mask; |
duke@435 | 125 | } |
duke@435 | 126 | |
duke@435 | 127 | |
duke@435 | 128 | VtableStub* VtableStubs::lookup(bool is_vtable_stub, int vtable_index) { |
duke@435 | 129 | MutexLocker ml(VtableStubs_lock); |
duke@435 | 130 | unsigned hash = VtableStubs::hash(is_vtable_stub, vtable_index); |
duke@435 | 131 | VtableStub* s = _table[hash]; |
duke@435 | 132 | while( s && !s->matches(is_vtable_stub, vtable_index)) s = s->next(); |
duke@435 | 133 | return s; |
duke@435 | 134 | } |
duke@435 | 135 | |
duke@435 | 136 | |
duke@435 | 137 | void VtableStubs::enter(bool is_vtable_stub, int vtable_index, VtableStub* s) { |
duke@435 | 138 | MutexLocker ml(VtableStubs_lock); |
duke@435 | 139 | assert(s->matches(is_vtable_stub, vtable_index), "bad vtable stub"); |
duke@435 | 140 | unsigned int h = VtableStubs::hash(is_vtable_stub, vtable_index); |
duke@435 | 141 | // enter s at the beginning of the corresponding list |
duke@435 | 142 | s->set_next(_table[h]); |
duke@435 | 143 | _table[h] = s; |
duke@435 | 144 | _number_of_vtable_stubs++; |
duke@435 | 145 | } |
duke@435 | 146 | |
duke@435 | 147 | |
duke@435 | 148 | bool VtableStubs::is_entry_point(address pc) { |
duke@435 | 149 | MutexLocker ml(VtableStubs_lock); |
duke@435 | 150 | VtableStub* stub = (VtableStub*)(pc - VtableStub::entry_offset()); |
duke@435 | 151 | uint hash = VtableStubs::hash(stub->is_vtable_stub(), stub->index()); |
duke@435 | 152 | VtableStub* s; |
duke@435 | 153 | for (s = _table[hash]; s != NULL && s != stub; s = s->next()) {} |
duke@435 | 154 | return s == stub; |
duke@435 | 155 | } |
duke@435 | 156 | |
duke@435 | 157 | |
duke@435 | 158 | bool VtableStubs::contains(address pc) { |
duke@435 | 159 | // simple solution for now - we may want to use |
duke@435 | 160 | // a faster way if this function is called often |
duke@435 | 161 | return stub_containing(pc) != NULL; |
duke@435 | 162 | } |
duke@435 | 163 | |
duke@435 | 164 | |
duke@435 | 165 | VtableStub* VtableStubs::stub_containing(address pc) { |
duke@435 | 166 | // Note: No locking needed since any change to the data structure |
duke@435 | 167 | // happens with an atomic store into it (we don't care about |
duke@435 | 168 | // consistency with the _number_of_vtable_stubs counter). |
duke@435 | 169 | for (int i = 0; i < N; i++) { |
duke@435 | 170 | for (VtableStub* s = _table[i]; s != NULL; s = s->next()) { |
duke@435 | 171 | if (s->contains(pc)) return s; |
duke@435 | 172 | } |
duke@435 | 173 | } |
duke@435 | 174 | return NULL; |
duke@435 | 175 | } |
duke@435 | 176 | |
duke@435 | 177 | void vtableStubs_init() { |
duke@435 | 178 | VtableStubs::initialize(); |
duke@435 | 179 | } |
duke@435 | 180 | |
duke@435 | 181 | |
duke@435 | 182 | //----------------------------------------------------------------------------------------------------- |
duke@435 | 183 | // Non-product code |
duke@435 | 184 | #ifndef PRODUCT |
duke@435 | 185 | |
duke@435 | 186 | extern "C" void bad_compiled_vtable_index(JavaThread* thread, oop receiver, int index) { |
duke@435 | 187 | ResourceMark rm; |
duke@435 | 188 | HandleMark hm; |
duke@435 | 189 | klassOop klass = receiver->klass(); |
duke@435 | 190 | instanceKlass* ik = instanceKlass::cast(klass); |
duke@435 | 191 | klassVtable* vt = ik->vtable(); |
duke@435 | 192 | klass->print(); |
jcoomes@1845 | 193 | fatal(err_msg("bad compiled vtable dispatch: receiver " INTPTR_FORMAT ", " |
jcoomes@1845 | 194 | "index %d (vtable length %d)", |
jcoomes@1845 | 195 | (address)receiver, index, vt->length())); |
duke@435 | 196 | } |
duke@435 | 197 | |
duke@435 | 198 | #endif // Product |