1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/src/cpu/sparc/vm/jniFastGetField_sparc.cpp Sat Dec 01 00:00:00 2007 +0000
1.3 @@ -0,0 +1,261 @@
1.4 +/*
1.5 + * Copyright 2004-2006 Sun Microsystems, Inc. All Rights Reserved.
1.6 + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
1.7 + *
1.8 + * This code is free software; you can redistribute it and/or modify it
1.9 + * under the terms of the GNU General Public License version 2 only, as
1.10 + * published by the Free Software Foundation.
1.11 + *
1.12 + * This code is distributed in the hope that it will be useful, but WITHOUT
1.13 + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
1.14 + * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
1.15 + * version 2 for more details (a copy is included in the LICENSE file that
1.16 + * accompanied this code).
1.17 + *
1.18 + * You should have received a copy of the GNU General Public License version
1.19 + * 2 along with this work; if not, write to the Free Software Foundation,
1.20 + * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
1.21 + *
1.22 + * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
1.23 + * CA 95054 USA or visit www.sun.com if you need additional information or
1.24 + * have any questions.
1.25 + *
1.26 + */
1.27 +
1.28 +# include "incls/_precompiled.incl"
1.29 +# include "incls/_jniFastGetField_sparc.cpp.incl"
1.30 +
1.31 +// TSO ensures that loads are blocking and ordered with respect to
1.32 +// to earlier loads, so we don't need LoadLoad membars.
1.33 +
1.34 +#define __ masm->
1.35 +
1.36 +#define BUFFER_SIZE 30*sizeof(jint)
1.37 +
1.38 +// Common register usage:
1.39 +// O0: env
1.40 +// O1: obj
1.41 +// O2: jfieldID
1.42 +// O4: offset (O2 >> 2)
1.43 +// G4: old safepoint counter
1.44 +
1.45 +address JNI_FastGetField::generate_fast_get_int_field0(BasicType type) {
1.46 + const char *name;
1.47 + switch (type) {
1.48 + case T_BOOLEAN: name = "jni_fast_GetBooleanField"; break;
1.49 + case T_BYTE: name = "jni_fast_GetByteField"; break;
1.50 + case T_CHAR: name = "jni_fast_GetCharField"; break;
1.51 + case T_SHORT: name = "jni_fast_GetShortField"; break;
1.52 + case T_INT: name = "jni_fast_GetIntField"; break;
1.53 + default: ShouldNotReachHere();
1.54 + }
1.55 + ResourceMark rm;
1.56 + BufferBlob* b = BufferBlob::create(name, BUFFER_SIZE*wordSize);
1.57 + address fast_entry = b->instructions_begin();
1.58 + CodeBuffer cbuf(fast_entry, b->instructions_size());
1.59 + MacroAssembler* masm = new MacroAssembler(&cbuf);
1.60 +
1.61 + Label label1, label2;
1.62 +
1.63 + address cnt_addr = SafepointSynchronize::safepoint_counter_addr();
1.64 + Address ca(O3, cnt_addr);
1.65 + __ sethi (ca);
1.66 + __ ld (ca, G4);
1.67 + __ andcc (G4, 1, G0);
1.68 + __ br (Assembler::notZero, false, Assembler::pn, label1);
1.69 + __ delayed()->srl (O2, 2, O4);
1.70 + __ ld_ptr (O1, 0, O5);
1.71 +
1.72 + assert(count < LIST_CAPACITY, "LIST_CAPACITY too small");
1.73 + speculative_load_pclist[count] = __ pc();
1.74 + switch (type) {
1.75 + case T_BOOLEAN: __ ldub (O5, O4, G3); break;
1.76 + case T_BYTE: __ ldsb (O5, O4, G3); break;
1.77 + case T_CHAR: __ lduh (O5, O4, G3); break;
1.78 + case T_SHORT: __ ldsh (O5, O4, G3); break;
1.79 + case T_INT: __ ld (O5, O4, G3); break;
1.80 + default: ShouldNotReachHere();
1.81 + }
1.82 +
1.83 + __ ld (ca, O5);
1.84 + __ cmp (O5, G4);
1.85 + __ br (Assembler::notEqual, false, Assembler::pn, label2);
1.86 + __ delayed()->mov (O7, G1);
1.87 + __ retl ();
1.88 + __ delayed()->mov (G3, O0);
1.89 +
1.90 + slowcase_entry_pclist[count++] = __ pc();
1.91 + __ bind (label1);
1.92 + __ mov (O7, G1);
1.93 +
1.94 + address slow_case_addr;
1.95 + switch (type) {
1.96 + case T_BOOLEAN: slow_case_addr = jni_GetBooleanField_addr(); break;
1.97 + case T_BYTE: slow_case_addr = jni_GetByteField_addr(); break;
1.98 + case T_CHAR: slow_case_addr = jni_GetCharField_addr(); break;
1.99 + case T_SHORT: slow_case_addr = jni_GetShortField_addr(); break;
1.100 + case T_INT: slow_case_addr = jni_GetIntField_addr(); break;
1.101 + default: ShouldNotReachHere();
1.102 + }
1.103 + __ bind (label2);
1.104 + __ call (slow_case_addr, relocInfo::none);
1.105 + __ delayed()->mov (G1, O7);
1.106 +
1.107 + __ flush ();
1.108 +
1.109 + return fast_entry;
1.110 +}
1.111 +
1.112 +address JNI_FastGetField::generate_fast_get_boolean_field() {
1.113 + return generate_fast_get_int_field0(T_BOOLEAN);
1.114 +}
1.115 +
1.116 +address JNI_FastGetField::generate_fast_get_byte_field() {
1.117 + return generate_fast_get_int_field0(T_BYTE);
1.118 +}
1.119 +
1.120 +address JNI_FastGetField::generate_fast_get_char_field() {
1.121 + return generate_fast_get_int_field0(T_CHAR);
1.122 +}
1.123 +
1.124 +address JNI_FastGetField::generate_fast_get_short_field() {
1.125 + return generate_fast_get_int_field0(T_SHORT);
1.126 +}
1.127 +
1.128 +address JNI_FastGetField::generate_fast_get_int_field() {
1.129 + return generate_fast_get_int_field0(T_INT);
1.130 +}
1.131 +
1.132 +address JNI_FastGetField::generate_fast_get_long_field() {
1.133 + const char *name = "jni_fast_GetLongField";
1.134 + ResourceMark rm;
1.135 + BufferBlob* b = BufferBlob::create(name, BUFFER_SIZE*wordSize);
1.136 + address fast_entry = b->instructions_begin();
1.137 + CodeBuffer cbuf(fast_entry, b->instructions_size());
1.138 + MacroAssembler* masm = new MacroAssembler(&cbuf);
1.139 +
1.140 + Label label1, label2;
1.141 +
1.142 + address cnt_addr = SafepointSynchronize::safepoint_counter_addr();
1.143 + Address ca(G3, cnt_addr);
1.144 + __ sethi (ca);
1.145 + __ ld (ca, G4);
1.146 + __ andcc (G4, 1, G0);
1.147 + __ br (Assembler::notZero, false, Assembler::pn, label1);
1.148 + __ delayed()->srl (O2, 2, O4);
1.149 + __ ld_ptr (O1, 0, O5);
1.150 + __ add (O5, O4, O5);
1.151 +
1.152 +#ifndef _LP64
1.153 + assert(count < LIST_CAPACITY-1, "LIST_CAPACITY too small");
1.154 + speculative_load_pclist[count++] = __ pc();
1.155 + __ ld (O5, 0, G2);
1.156 +
1.157 + speculative_load_pclist[count] = __ pc();
1.158 + __ ld (O5, 4, O3);
1.159 +#else
1.160 + assert(count < LIST_CAPACITY, "LIST_CAPACITY too small");
1.161 + speculative_load_pclist[count] = __ pc();
1.162 + __ ldx (O5, 0, O3);
1.163 +#endif
1.164 +
1.165 + __ ld (ca, G1);
1.166 + __ cmp (G1, G4);
1.167 + __ br (Assembler::notEqual, false, Assembler::pn, label2);
1.168 + __ delayed()->mov (O7, G1);
1.169 +
1.170 +#ifndef _LP64
1.171 + __ mov (G2, O0);
1.172 + __ retl ();
1.173 + __ delayed()->mov (O3, O1);
1.174 +#else
1.175 + __ retl ();
1.176 + __ delayed()->mov (O3, O0);
1.177 +#endif
1.178 +
1.179 +#ifndef _LP64
1.180 + slowcase_entry_pclist[count-1] = __ pc();
1.181 + slowcase_entry_pclist[count++] = __ pc() ;
1.182 +#else
1.183 + slowcase_entry_pclist[count++] = __ pc();
1.184 +#endif
1.185 +
1.186 + __ bind (label1);
1.187 + __ mov (O7, G1);
1.188 +
1.189 + address slow_case_addr = jni_GetLongField_addr();
1.190 + __ bind (label2);
1.191 + __ call (slow_case_addr, relocInfo::none);
1.192 + __ delayed()->mov (G1, O7);
1.193 +
1.194 + __ flush ();
1.195 +
1.196 + return fast_entry;
1.197 +}
1.198 +
1.199 +address JNI_FastGetField::generate_fast_get_float_field0(BasicType type) {
1.200 + const char *name;
1.201 + switch (type) {
1.202 + case T_FLOAT: name = "jni_fast_GetFloatField"; break;
1.203 + case T_DOUBLE: name = "jni_fast_GetDoubleField"; break;
1.204 + default: ShouldNotReachHere();
1.205 + }
1.206 + ResourceMark rm;
1.207 + BufferBlob* b = BufferBlob::create(name, BUFFER_SIZE*wordSize);
1.208 + address fast_entry = b->instructions_begin();
1.209 + CodeBuffer cbuf(fast_entry, b->instructions_size());
1.210 + MacroAssembler* masm = new MacroAssembler(&cbuf);
1.211 +
1.212 + Label label1, label2;
1.213 +
1.214 + address cnt_addr = SafepointSynchronize::safepoint_counter_addr();
1.215 + Address ca(O3, cnt_addr);
1.216 + __ sethi (ca);
1.217 + __ ld (ca, G4);
1.218 + __ andcc (G4, 1, G0);
1.219 + __ br (Assembler::notZero, false, Assembler::pn, label1);
1.220 + __ delayed()->srl (O2, 2, O4);
1.221 + __ ld_ptr (O1, 0, O5);
1.222 +
1.223 + assert(count < LIST_CAPACITY, "LIST_CAPACITY too small");
1.224 + speculative_load_pclist[count] = __ pc();
1.225 + switch (type) {
1.226 + case T_FLOAT: __ ldf (FloatRegisterImpl::S, O5, O4, F0); break;
1.227 + case T_DOUBLE: __ ldf (FloatRegisterImpl::D, O5, O4, F0); break;
1.228 + default: ShouldNotReachHere();
1.229 + }
1.230 +
1.231 + __ ld (ca, O5);
1.232 + __ cmp (O5, G4);
1.233 + __ br (Assembler::notEqual, false, Assembler::pn, label2);
1.234 + __ delayed()->mov (O7, G1);
1.235 +
1.236 + __ retl ();
1.237 + __ delayed()-> nop ();
1.238 +
1.239 + slowcase_entry_pclist[count++] = __ pc();
1.240 + __ bind (label1);
1.241 + __ mov (O7, G1);
1.242 +
1.243 + address slow_case_addr;
1.244 + switch (type) {
1.245 + case T_FLOAT: slow_case_addr = jni_GetFloatField_addr(); break;
1.246 + case T_DOUBLE: slow_case_addr = jni_GetDoubleField_addr(); break;
1.247 + default: ShouldNotReachHere();
1.248 + }
1.249 + __ bind (label2);
1.250 + __ call (slow_case_addr, relocInfo::none);
1.251 + __ delayed()->mov (G1, O7);
1.252 +
1.253 + __ flush ();
1.254 +
1.255 + return fast_entry;
1.256 +}
1.257 +
1.258 +address JNI_FastGetField::generate_fast_get_float_field() {
1.259 + return generate_fast_get_float_field0(T_FLOAT);
1.260 +}
1.261 +
1.262 +address JNI_FastGetField::generate_fast_get_double_field() {
1.263 + return generate_fast_get_float_field0(T_DOUBLE);
1.264 +}
