jniFastGetField_x86_64.cpp revision 0:a61af66fc99e 
1/*
2 * Copyright 2004-2006 Sun Microsystems, Inc.  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 Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
20 * CA 95054 USA or visit www.sun.com if you need additional information or
21 * have any 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
41static const Register robj          = r9;
42static const Register rcounter      = r10;
43static const Register roffset       = r11;
44static 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
49address 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* b = BufferBlob::create(name, BUFFER_SIZE);
62  address fast_entry = b->instructions_begin();
63  CodeBuffer cbuf(fast_entry, b->instructions_size());
64  MacroAssembler* masm = new MacroAssembler(&cbuf);
65
66  Label slow;
67
68  ExternalAddress counter(SafepointSynchronize::safepoint_counter_addr());
69  __ mov32 (rcounter, counter);
70  __ movq (robj, c_rarg1);
71  __ testb (rcounter, 1);
72  __ jcc (Assembler::notZero, slow);
73  if (os::is_MP()) {
74    __ xorq (robj, rcounter);
75    __ xorq (robj, rcounter);                   // obj, since
76                                                // robj ^ rcounter ^ rcounter == robj
77                                                // robj is data dependent on rcounter.
78  }
79  __ movq (robj, Address(robj, 0));             // *obj
80  __ movq (roffset, c_rarg2);
81  __ shrq (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    __ xorq (rcounter_addr, rax);
99    __ xorq (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
127address JNI_FastGetField::generate_fast_get_boolean_field() {
128  return generate_fast_get_int_field0(T_BOOLEAN);
129}
130
131address JNI_FastGetField::generate_fast_get_byte_field() {
132  return generate_fast_get_int_field0(T_BYTE);
133}
134
135address JNI_FastGetField::generate_fast_get_char_field() {
136  return generate_fast_get_int_field0(T_CHAR);
137}
138
139address JNI_FastGetField::generate_fast_get_short_field() {
140  return generate_fast_get_int_field0(T_SHORT);
141}
142
143address JNI_FastGetField::generate_fast_get_int_field() {
144  return generate_fast_get_int_field0(T_INT);
145}
146
147address JNI_FastGetField::generate_fast_get_long_field() {
148  return generate_fast_get_int_field0(T_LONG);
149}
150
151address 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* b = BufferBlob::create(name, BUFFER_SIZE);
160  address fast_entry = b->instructions_begin();
161  CodeBuffer cbuf(fast_entry, b->instructions_size());
162  MacroAssembler* masm = new MacroAssembler(&cbuf);
163
164  Label slow;
165
166  ExternalAddress counter(SafepointSynchronize::safepoint_counter_addr());
167  __ mov32 (rcounter, counter);
168  __ movq (robj, c_rarg1);
169  __ testb (rcounter, 1);
170  __ jcc (Assembler::notZero, slow);
171  if (os::is_MP()) {
172    __ xorq (robj, rcounter);
173    __ xorq (robj, rcounter);                   // obj, since
174                                                // robj ^ rcounter ^ rcounter == robj
175                                                // robj is data dependent on rcounter.
176  }
177  __ movq (robj, Address(robj, 0));             // *obj
178  __ movq (roffset, c_rarg2);
179  __ shrq (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    __ xorq (rcounter_addr, rax);
194    __ xorq (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
218address JNI_FastGetField::generate_fast_get_float_field() {
219  return generate_fast_get_float_field0(T_FLOAT);
220}
221
222address JNI_FastGetField::generate_fast_get_double_field() {
223  return generate_fast_get_float_field0(T_DOUBLE);
224}
225