duke@435: /* duke@435: * Copyright 2004-2006 Sun Microsystems, Inc. All Rights Reserved. duke@435: * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. duke@435: * duke@435: * This code is free software; you can redistribute it and/or modify it duke@435: * under the terms of the GNU General Public License version 2 only, as duke@435: * published by the Free Software Foundation. duke@435: * duke@435: * This code is distributed in the hope that it will be useful, but WITHOUT duke@435: * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or duke@435: * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License duke@435: * version 2 for more details (a copy is included in the LICENSE file that duke@435: * accompanied this code). duke@435: * duke@435: * You should have received a copy of the GNU General Public License version duke@435: * 2 along with this work; if not, write to the Free Software Foundation, duke@435: * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. duke@435: * duke@435: * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, duke@435: * CA 95054 USA or visit www.sun.com if you need additional information or duke@435: * have any questions. duke@435: * duke@435: */ duke@435: duke@435: # include "incls/_precompiled.incl" duke@435: # include "incls/_jniFastGetField_x86_64.cpp.incl" duke@435: duke@435: #define __ masm-> duke@435: duke@435: #define BUFFER_SIZE 30*wordSize duke@435: duke@435: // Instead of issuing lfence for LoadLoad barrier, we create data dependency duke@435: // between loads, which is more efficient than lfence. duke@435: duke@435: // Common register usage: duke@435: // rax/xmm0: result duke@435: // c_rarg0: jni env duke@435: // c_rarg1: obj duke@435: // c_rarg2: jfield id duke@435: duke@435: static const Register robj = r9; duke@435: static const Register rcounter = r10; duke@435: static const Register roffset = r11; duke@435: static const Register rcounter_addr = r11; duke@435: duke@435: // Warning: do not use rip relative addressing after the first counter load duke@435: // since that may scratch r10! duke@435: duke@435: address JNI_FastGetField::generate_fast_get_int_field0(BasicType type) { duke@435: const char *name; duke@435: switch (type) { duke@435: case T_BOOLEAN: name = "jni_fast_GetBooleanField"; break; duke@435: case T_BYTE: name = "jni_fast_GetByteField"; break; duke@435: case T_CHAR: name = "jni_fast_GetCharField"; break; duke@435: case T_SHORT: name = "jni_fast_GetShortField"; break; duke@435: case T_INT: name = "jni_fast_GetIntField"; break; duke@435: case T_LONG: name = "jni_fast_GetLongField"; break; duke@435: default: ShouldNotReachHere(); duke@435: } duke@435: ResourceMark rm; duke@435: BufferBlob* b = BufferBlob::create(name, BUFFER_SIZE); duke@435: address fast_entry = b->instructions_begin(); duke@435: CodeBuffer cbuf(fast_entry, b->instructions_size()); duke@435: MacroAssembler* masm = new MacroAssembler(&cbuf); duke@435: duke@435: Label slow; duke@435: duke@435: ExternalAddress counter(SafepointSynchronize::safepoint_counter_addr()); duke@435: __ mov32 (rcounter, counter); duke@435: __ movq (robj, c_rarg1); duke@435: __ testb (rcounter, 1); duke@435: __ jcc (Assembler::notZero, slow); duke@435: if (os::is_MP()) { duke@435: __ xorq (robj, rcounter); duke@435: __ xorq (robj, rcounter); // obj, since duke@435: // robj ^ rcounter ^ rcounter == robj duke@435: // robj is data dependent on rcounter. duke@435: } duke@435: __ movq (robj, Address(robj, 0)); // *obj duke@435: __ movq (roffset, c_rarg2); duke@435: __ shrq (roffset, 2); // offset duke@435: duke@435: assert(count < LIST_CAPACITY, "LIST_CAPACITY too small"); duke@435: speculative_load_pclist[count] = __ pc(); duke@435: switch (type) { duke@435: case T_BOOLEAN: __ movzbl (rax, Address(robj, roffset, Address::times_1)); break; duke@435: case T_BYTE: __ movsbl (rax, Address(robj, roffset, Address::times_1)); break; duke@435: case T_CHAR: __ movzwl (rax, Address(robj, roffset, Address::times_1)); break; duke@435: case T_SHORT: __ movswl (rax, Address(robj, roffset, Address::times_1)); break; duke@435: case T_INT: __ movl (rax, Address(robj, roffset, Address::times_1)); break; duke@435: case T_LONG: __ movq (rax, Address(robj, roffset, Address::times_1)); break; duke@435: default: ShouldNotReachHere(); duke@435: } duke@435: duke@435: if (os::is_MP()) { duke@435: __ lea(rcounter_addr, counter); duke@435: // ca is data dependent on rax. duke@435: __ xorq (rcounter_addr, rax); duke@435: __ xorq (rcounter_addr, rax); duke@435: __ cmpl (rcounter, Address(rcounter_addr, 0)); duke@435: } else { duke@435: __ cmp32 (rcounter, counter); duke@435: } duke@435: __ jcc (Assembler::notEqual, slow); duke@435: duke@435: __ ret (0); duke@435: duke@435: slowcase_entry_pclist[count++] = __ pc(); duke@435: __ bind (slow); duke@435: address slow_case_addr; duke@435: switch (type) { duke@435: case T_BOOLEAN: slow_case_addr = jni_GetBooleanField_addr(); break; duke@435: case T_BYTE: slow_case_addr = jni_GetByteField_addr(); break; duke@435: case T_CHAR: slow_case_addr = jni_GetCharField_addr(); break; duke@435: case T_SHORT: slow_case_addr = jni_GetShortField_addr(); break; duke@435: case T_INT: slow_case_addr = jni_GetIntField_addr(); break; duke@435: case T_LONG: slow_case_addr = jni_GetLongField_addr(); duke@435: } duke@435: // tail call duke@435: __ jump (ExternalAddress(slow_case_addr)); duke@435: duke@435: __ flush (); duke@435: duke@435: return fast_entry; duke@435: } duke@435: duke@435: address JNI_FastGetField::generate_fast_get_boolean_field() { duke@435: return generate_fast_get_int_field0(T_BOOLEAN); duke@435: } duke@435: duke@435: address JNI_FastGetField::generate_fast_get_byte_field() { duke@435: return generate_fast_get_int_field0(T_BYTE); duke@435: } duke@435: duke@435: address JNI_FastGetField::generate_fast_get_char_field() { duke@435: return generate_fast_get_int_field0(T_CHAR); duke@435: } duke@435: duke@435: address JNI_FastGetField::generate_fast_get_short_field() { duke@435: return generate_fast_get_int_field0(T_SHORT); duke@435: } duke@435: duke@435: address JNI_FastGetField::generate_fast_get_int_field() { duke@435: return generate_fast_get_int_field0(T_INT); duke@435: } duke@435: duke@435: address JNI_FastGetField::generate_fast_get_long_field() { duke@435: return generate_fast_get_int_field0(T_LONG); duke@435: } duke@435: duke@435: address JNI_FastGetField::generate_fast_get_float_field0(BasicType type) { duke@435: const char *name; duke@435: switch (type) { duke@435: case T_FLOAT: name = "jni_fast_GetFloatField"; break; duke@435: case T_DOUBLE: name = "jni_fast_GetDoubleField"; break; duke@435: default: ShouldNotReachHere(); duke@435: } duke@435: ResourceMark rm; duke@435: BufferBlob* b = BufferBlob::create(name, BUFFER_SIZE); duke@435: address fast_entry = b->instructions_begin(); duke@435: CodeBuffer cbuf(fast_entry, b->instructions_size()); duke@435: MacroAssembler* masm = new MacroAssembler(&cbuf); duke@435: duke@435: Label slow; duke@435: duke@435: ExternalAddress counter(SafepointSynchronize::safepoint_counter_addr()); duke@435: __ mov32 (rcounter, counter); duke@435: __ movq (robj, c_rarg1); duke@435: __ testb (rcounter, 1); duke@435: __ jcc (Assembler::notZero, slow); duke@435: if (os::is_MP()) { duke@435: __ xorq (robj, rcounter); duke@435: __ xorq (robj, rcounter); // obj, since duke@435: // robj ^ rcounter ^ rcounter == robj duke@435: // robj is data dependent on rcounter. duke@435: } duke@435: __ movq (robj, Address(robj, 0)); // *obj duke@435: __ movq (roffset, c_rarg2); duke@435: __ shrq (roffset, 2); // offset duke@435: duke@435: assert(count < LIST_CAPACITY, "LIST_CAPACITY too small"); duke@435: speculative_load_pclist[count] = __ pc(); duke@435: switch (type) { duke@435: case T_FLOAT: __ movflt (xmm0, Address(robj, roffset, Address::times_1)); break; duke@435: case T_DOUBLE: __ movdbl (xmm0, Address(robj, roffset, Address::times_1)); break; duke@435: default: ShouldNotReachHere(); duke@435: } duke@435: duke@435: if (os::is_MP()) { duke@435: __ lea(rcounter_addr, counter); duke@435: __ movdq (rax, xmm0); duke@435: // counter address is data dependent on xmm0. duke@435: __ xorq (rcounter_addr, rax); duke@435: __ xorq (rcounter_addr, rax); duke@435: __ cmpl (rcounter, Address(rcounter_addr, 0)); duke@435: } else { duke@435: __ cmp32 (rcounter, counter); duke@435: } duke@435: __ jcc (Assembler::notEqual, slow); duke@435: duke@435: __ ret (0); duke@435: duke@435: slowcase_entry_pclist[count++] = __ pc(); duke@435: __ bind (slow); duke@435: address slow_case_addr; duke@435: switch (type) { duke@435: case T_FLOAT: slow_case_addr = jni_GetFloatField_addr(); break; duke@435: case T_DOUBLE: slow_case_addr = jni_GetDoubleField_addr(); duke@435: } duke@435: // tail call duke@435: __ jump (ExternalAddress(slow_case_addr)); duke@435: duke@435: __ flush (); duke@435: duke@435: return fast_entry; duke@435: } duke@435: duke@435: address JNI_FastGetField::generate_fast_get_float_field() { duke@435: return generate_fast_get_float_field0(T_FLOAT); duke@435: } duke@435: duke@435: address JNI_FastGetField::generate_fast_get_double_field() { duke@435: return generate_fast_get_float_field0(T_DOUBLE); duke@435: }