1 /*
2 * Copyright (c) 2004, 2010, Oracle and/or its affiliates. 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
24
25 # include "incls/_precompiled.incl"
26 # include "incls/_jniFastGetField_x86_64.cpp.incl"
27
28 #define __ masm->
29
30 #define BUFFER_SIZE 30*wordSize
31
32 // Instead of issuing lfence for LoadLoad barrier, we create data dependency
33 // between loads, which is more efficient than lfence.
34
35 // Common register usage:
36 // rax/xmm0: result
37 // c_rarg0: jni env
38 // c_rarg1: obj
39 // c_rarg2: jfield id
40
41 static const Register robj = r9;
42 static const Register rcounter = r10;
43 static const Register roffset = r11;
44 static const Register rcounter_addr = r11;
45
46 // Warning: do not use rip relative addressing after the first counter load
47 // since that may scratch r10!
48
49 address JNI_FastGetField::generate_fast_get_int_field0(BasicType type) {
50 const char *name;
51 switch (type) {
52 case T_BOOLEAN: name = "jni_fast_GetBooleanField"; break;
53 case T_BYTE: name = "jni_fast_GetByteField"; break;
54 case T_CHAR: name = "jni_fast_GetCharField"; break;
55 case T_SHORT: name = "jni_fast_GetShortField"; break;
56 case T_INT: name = "jni_fast_GetIntField"; break;
57 case T_LONG: name = "jni_fast_GetLongField"; break;
58 default: ShouldNotReachHere();
59 }
60 ResourceMark rm;
61 BufferBlob* blob = BufferBlob::create(name, BUFFER_SIZE);
62 CodeBuffer cbuf(blob);
63 MacroAssembler* masm = new MacroAssembler(&cbuf);
64 address fast_entry = __ pc();
65
66 Label slow;
67
68 ExternalAddress counter(SafepointSynchronize::safepoint_counter_addr());
69 __ mov32 (rcounter, counter);
70 __ mov (robj, c_rarg1);
71 __ testb (rcounter, 1);
72 __ jcc (Assembler::notZero, slow);
73 if (os::is_MP()) {
74 __ xorptr(robj, rcounter);
75 __ xorptr(robj, rcounter); // obj, since
76 // robj ^ rcounter ^ rcounter == robj
77 // robj is data dependent on rcounter.
78 }
79 __ movptr(robj, Address(robj, 0)); // *obj
80 __ mov (roffset, c_rarg2);
81 __ shrptr(roffset, 2); // offset
82
83 assert(count < LIST_CAPACITY, "LIST_CAPACITY too small");
84 speculative_load_pclist[count] = __ pc();
85 switch (type) {
86 case T_BOOLEAN: __ movzbl (rax, Address(robj, roffset, Address::times_1)); break;
87 case T_BYTE: __ movsbl (rax, Address(robj, roffset, Address::times_1)); break;
88 case T_CHAR: __ movzwl (rax, Address(robj, roffset, Address::times_1)); break;
89 case T_SHORT: __ movswl (rax, Address(robj, roffset, Address::times_1)); break;
90 case T_INT: __ movl (rax, Address(robj, roffset, Address::times_1)); break;
91 case T_LONG: __ movq (rax, Address(robj, roffset, Address::times_1)); break;
92 default: ShouldNotReachHere();
93 }
94
95 if (os::is_MP()) {
96 __ lea(rcounter_addr, counter);
97 // ca is data dependent on rax.
98 __ xorptr(rcounter_addr, rax);
99 __ xorptr(rcounter_addr, rax);
100 __ cmpl (rcounter, Address(rcounter_addr, 0));
101 } else {
102 __ cmp32 (rcounter, counter);
103 }
104 __ jcc (Assembler::notEqual, slow);
105
106 __ ret (0);
107
108 slowcase_entry_pclist[count++] = __ pc();
109 __ bind (slow);
110 address slow_case_addr;
111 switch (type) {
112 case T_BOOLEAN: slow_case_addr = jni_GetBooleanField_addr(); break;
113 case T_BYTE: slow_case_addr = jni_GetByteField_addr(); break;
114 case T_CHAR: slow_case_addr = jni_GetCharField_addr(); break;
115 case T_SHORT: slow_case_addr = jni_GetShortField_addr(); break;
116 case T_INT: slow_case_addr = jni_GetIntField_addr(); break;
117 case T_LONG: slow_case_addr = jni_GetLongField_addr();
118 }
119 // tail call
120 __ jump (ExternalAddress(slow_case_addr));
121
122 __ flush ();
123
124 return fast_entry;
125 }
126
127 address JNI_FastGetField::generate_fast_get_boolean_field() {
128 return generate_fast_get_int_field0(T_BOOLEAN);
129 }
130
131 address JNI_FastGetField::generate_fast_get_byte_field() {
132 return generate_fast_get_int_field0(T_BYTE);
133 }
134
135 address JNI_FastGetField::generate_fast_get_char_field() {
136 return generate_fast_get_int_field0(T_CHAR);
137 }
138
139 address JNI_FastGetField::generate_fast_get_short_field() {
140 return generate_fast_get_int_field0(T_SHORT);
141 }
142
143 address JNI_FastGetField::generate_fast_get_int_field() {
144 return generate_fast_get_int_field0(T_INT);
145 }
146
147 address JNI_FastGetField::generate_fast_get_long_field() {
148 return generate_fast_get_int_field0(T_LONG);
149 }
150
151 address JNI_FastGetField::generate_fast_get_float_field0(BasicType type) {
152 const char *name;
153 switch (type) {
154 case T_FLOAT: name = "jni_fast_GetFloatField"; break;
155 case T_DOUBLE: name = "jni_fast_GetDoubleField"; break;
156 default: ShouldNotReachHere();
157 }
158 ResourceMark rm;
159 BufferBlob* blob = BufferBlob::create(name, BUFFER_SIZE);
160 CodeBuffer cbuf(blob);
161 MacroAssembler* masm = new MacroAssembler(&cbuf);
162 address fast_entry = __ pc();
163
164 Label slow;
165
166 ExternalAddress counter(SafepointSynchronize::safepoint_counter_addr());
167 __ mov32 (rcounter, counter);
168 __ mov (robj, c_rarg1);
169 __ testb (rcounter, 1);
170 __ jcc (Assembler::notZero, slow);
171 if (os::is_MP()) {
172 __ xorptr(robj, rcounter);
173 __ xorptr(robj, rcounter); // obj, since
174 // robj ^ rcounter ^ rcounter == robj
175 // robj is data dependent on rcounter.
176 }
177 __ movptr(robj, Address(robj, 0)); // *obj
178 __ mov (roffset, c_rarg2);
179 __ shrptr(roffset, 2); // offset
180
181 assert(count < LIST_CAPACITY, "LIST_CAPACITY too small");
182 speculative_load_pclist[count] = __ pc();
183 switch (type) {
184 case T_FLOAT: __ movflt (xmm0, Address(robj, roffset, Address::times_1)); break;
185 case T_DOUBLE: __ movdbl (xmm0, Address(robj, roffset, Address::times_1)); break;
186 default: ShouldNotReachHere();
187 }
188
189 if (os::is_MP()) {
190 __ lea(rcounter_addr, counter);
191 __ movdq (rax, xmm0);
192 // counter address is data dependent on xmm0.
193 __ xorptr(rcounter_addr, rax);
194 __ xorptr(rcounter_addr, rax);
195 __ cmpl (rcounter, Address(rcounter_addr, 0));
196 } else {
197 __ cmp32 (rcounter, counter);
198 }
199 __ jcc (Assembler::notEqual, slow);
200
201 __ ret (0);
202
203 slowcase_entry_pclist[count++] = __ pc();
204 __ bind (slow);
205 address slow_case_addr;
206 switch (type) {
207 case T_FLOAT: slow_case_addr = jni_GetFloatField_addr(); break;
208 case T_DOUBLE: slow_case_addr = jni_GetDoubleField_addr();
209 }
210 // tail call
211 __ jump (ExternalAddress(slow_case_addr));
212
213 __ flush ();
214
215 return fast_entry;
216 }
217
218 address JNI_FastGetField::generate_fast_get_float_field() {
219 return generate_fast_get_float_field0(T_FLOAT);
220 }
221
222 address JNI_FastGetField::generate_fast_get_double_field() {
223 return generate_fast_get_float_field0(T_DOUBLE);
224 }