1 /*
2 * Copyright (c) 2003, 2009, 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/_interpreter_x86_64.cpp.incl"
27
28 #define __ _masm->
29
30
31 #ifdef _WIN64
32 address AbstractInterpreterGenerator::generate_slow_signature_handler() {
33 address entry = __ pc();
34
35 // rbx: method
36 // r14: pointer to locals
37 // c_rarg3: first stack arg - wordSize
38 __ mov(c_rarg3, rsp);
39 // adjust rsp
40 __ subptr(rsp, 4 * wordSize);
41 __ call_VM(noreg,
42 CAST_FROM_FN_PTR(address,
43 InterpreterRuntime::slow_signature_handler),
44 rbx, r14, c_rarg3);
45
46 // rax: result handler
47
48 // Stack layout:
49 // rsp: 3 integer or float args (if static first is unused)
50 // 1 float/double identifiers
51 // return address
52 // stack args
53 // garbage
54 // expression stack bottom
55 // bcp (NULL)
56 // ...
57
58 // Do FP first so we can use c_rarg3 as temp
59 __ movl(c_rarg3, Address(rsp, 3 * wordSize)); // float/double identifiers
60
61 for ( int i= 0; i < Argument::n_int_register_parameters_c-1; i++ ) {
62 XMMRegister floatreg = as_XMMRegister(i+1);
63 Label isfloatordouble, isdouble, next;
64
65 __ testl(c_rarg3, 1 << (i*2)); // Float or Double?
66 __ jcc(Assembler::notZero, isfloatordouble);
67
68 // Do Int register here
69 switch ( i ) {
70 case 0:
71 __ movl(rscratch1, Address(rbx, methodOopDesc::access_flags_offset()));
72 __ testl(rscratch1, JVM_ACC_STATIC);
73 __ cmovptr(Assembler::zero, c_rarg1, Address(rsp, 0));
74 break;
75 case 1:
76 __ movptr(c_rarg2, Address(rsp, wordSize));
77 break;
78 case 2:
79 __ movptr(c_rarg3, Address(rsp, 2 * wordSize));
80 break;
81 default:
82 break;
83 }
84
85 __ jmp (next);
86
87 __ bind(isfloatordouble);
88 __ testl(c_rarg3, 1 << ((i*2)+1)); // Double?
89 __ jcc(Assembler::notZero, isdouble);
90
91 // Do Float Here
92 __ movflt(floatreg, Address(rsp, i * wordSize));
93 __ jmp(next);
94
95 // Do Double here
96 __ bind(isdouble);
97 __ movdbl(floatreg, Address(rsp, i * wordSize));
98
99 __ bind(next);
100 }
101
102
103 // restore rsp
104 __ addptr(rsp, 4 * wordSize);
105
106 __ ret(0);
107
108 return entry;
109 }
110 #else
111 address AbstractInterpreterGenerator::generate_slow_signature_handler() {
112 address entry = __ pc();
113
114 // rbx: method
115 // r14: pointer to locals
116 // c_rarg3: first stack arg - wordSize
117 __ mov(c_rarg3, rsp);
118 // adjust rsp
119 __ subptr(rsp, 14 * wordSize);
120 __ call_VM(noreg,
121 CAST_FROM_FN_PTR(address,
122 InterpreterRuntime::slow_signature_handler),
123 rbx, r14, c_rarg3);
124
125 // rax: result handler
126
127 // Stack layout:
128 // rsp: 5 integer args (if static first is unused)
129 // 1 float/double identifiers
130 // 8 double args
131 // return address
132 // stack args
133 // garbage
134 // expression stack bottom
135 // bcp (NULL)
136 // ...
137
138 // Do FP first so we can use c_rarg3 as temp
139 __ movl(c_rarg3, Address(rsp, 5 * wordSize)); // float/double identifiers
140
141 for (int i = 0; i < Argument::n_float_register_parameters_c; i++) {
142 const XMMRegister r = as_XMMRegister(i);
143
144 Label d, done;
145
146 __ testl(c_rarg3, 1 << i);
147 __ jcc(Assembler::notZero, d);
148 __ movflt(r, Address(rsp, (6 + i) * wordSize));
149 __ jmp(done);
150 __ bind(d);
151 __ movdbl(r, Address(rsp, (6 + i) * wordSize));
152 __ bind(done);
153 }
154
155 // Now handle integrals. Only do c_rarg1 if not static.
156 __ movl(c_rarg3, Address(rbx, methodOopDesc::access_flags_offset()));
157 __ testl(c_rarg3, JVM_ACC_STATIC);
158 __ cmovptr(Assembler::zero, c_rarg1, Address(rsp, 0));
159
160 __ movptr(c_rarg2, Address(rsp, wordSize));
161 __ movptr(c_rarg3, Address(rsp, 2 * wordSize));
162 __ movptr(c_rarg4, Address(rsp, 3 * wordSize));
163 __ movptr(c_rarg5, Address(rsp, 4 * wordSize));
164
165 // restore rsp
166 __ addptr(rsp, 14 * wordSize);
167
168 __ ret(0);
169
170 return entry;
171 }
172 #endif
173
174
175 //
176 // Various method entries
177 //
178
179 address InterpreterGenerator::generate_math_entry(AbstractInterpreter::MethodKind kind) {
180
181 // rbx,: methodOop
182 // rcx: scratrch
183 // r13: sender sp
184
185 if (!InlineIntrinsics) return NULL; // Generate a vanilla entry
186
187 address entry_point = __ pc();
188
189 // These don't need a safepoint check because they aren't virtually
190 // callable. We won't enter these intrinsics from compiled code.
191 // If in the future we added an intrinsic which was virtually callable
192 // we'd have to worry about how to safepoint so that this code is used.
193
194 // mathematical functions inlined by compiler
195 // (interpreter must provide identical implementation
196 // in order to avoid monotonicity bugs when switching
197 // from interpreter to compiler in the middle of some
198 // computation)
199 //
200 // stack: [ ret adr ] <-- rsp
201 // [ lo(arg) ]
202 // [ hi(arg) ]
203 //
204
205 // Note: For JDK 1.2 StrictMath doesn't exist and Math.sin/cos/sqrt are
206 // native methods. Interpreter::method_kind(...) does a check for
207 // native methods first before checking for intrinsic methods and
208 // thus will never select this entry point. Make sure it is not
209 // called accidentally since the SharedRuntime entry points will
210 // not work for JDK 1.2.
211 //
212 // We no longer need to check for JDK 1.2 since it's EOL'ed.
213 // The following check existed in pre 1.6 implementation,
214 // if (Universe::is_jdk12x_version()) {
215 // __ should_not_reach_here();
216 // }
217 // Universe::is_jdk12x_version() always returns false since
218 // the JDK version is not yet determined when this method is called.
219 // This method is called during interpreter_init() whereas
220 // JDK version is only determined when universe2_init() is called.
221
222 // Note: For JDK 1.3 StrictMath exists and Math.sin/cos/sqrt are
223 // java methods. Interpreter::method_kind(...) will select
224 // this entry point for the corresponding methods in JDK 1.3.
225 // get argument
226
227 if (kind == Interpreter::java_lang_math_sqrt) {
228 __ sqrtsd(xmm0, Address(rsp, wordSize));
229 } else {
230 __ fld_d(Address(rsp, wordSize));
231 switch (kind) {
232 case Interpreter::java_lang_math_sin :
233 __ trigfunc('s');
234 break;
235 case Interpreter::java_lang_math_cos :
236 __ trigfunc('c');
237 break;
238 case Interpreter::java_lang_math_tan :
239 __ trigfunc('t');
240 break;
241 case Interpreter::java_lang_math_abs:
242 __ fabs();
243 break;
244 case Interpreter::java_lang_math_log:
245 __ flog();
246 break;
247 case Interpreter::java_lang_math_log10:
248 __ flog10();
249 break;
250 default :
251 ShouldNotReachHere();
252 }
253
254 // return double result in xmm0 for interpreter and compilers.
255 __ subptr(rsp, 2*wordSize);
256 // Round to 64bit precision
257 __ fstp_d(Address(rsp, 0));
258 __ movdbl(xmm0, Address(rsp, 0));
259 __ addptr(rsp, 2*wordSize);
260 }
261
262
263 __ pop(rax);
264 __ mov(rsp, r13);
265 __ jmp(rax);
266
267 return entry_point;
268 }
269
270
271 // Abstract method entry
272 // Attempt to execute abstract method. Throw exception
273 address InterpreterGenerator::generate_abstract_entry(void) {
274 // rbx: methodOop
275 // r13: sender SP
276
277 address entry_point = __ pc();
278
279 // abstract method entry
280
281 // pop return address, reset last_sp to NULL
282 __ empty_expression_stack();
283 __ restore_bcp(); // rsi must be correct for exception handler (was destroyed)
284 __ restore_locals(); // make sure locals pointer is correct as well (was destroyed)
285
286 // throw exception
287 __ call_VM(noreg, CAST_FROM_FN_PTR(address,
288 InterpreterRuntime::throw_AbstractMethodError));
289 // the call_VM checks for exception, so we should never return here.
290 __ should_not_reach_here();
291
292 return entry_point;
293 }
294
295
296 // Method handle invoker
297 // Dispatch a method of the form java.dyn.MethodHandles::invoke(...)
298 address InterpreterGenerator::generate_method_handle_entry(void) {
299 if (!EnableMethodHandles) {
300 return generate_abstract_entry();
301 }
302
303 address entry_point = MethodHandles::generate_method_handle_interpreter_entry(_masm);
304
305 return entry_point;
306 }
307
308
309 // Empty method, generate a very fast return.
310
311 address InterpreterGenerator::generate_empty_entry(void) {
312 // rbx: methodOop
313 // r13: sender sp must set sp to this value on return
314
315 if (!UseFastEmptyMethods) {
316 return NULL;
317 }
318
319 address entry_point = __ pc();
320
321 // If we need a safepoint check, generate full interpreter entry.
322 Label slow_path;
323 __ cmp32(ExternalAddress(SafepointSynchronize::address_of_state()),
324 SafepointSynchronize::_not_synchronized);
325 __ jcc(Assembler::notEqual, slow_path);
326
327 // do nothing for empty methods (do not even increment invocation counter)
328 // Code: _return
329 // _return
330 // return w/o popping parameters
331 __ pop(rax);
332 __ mov(rsp, r13);
333 __ jmp(rax);
334
335 __ bind(slow_path);
336 (void) generate_normal_entry(false);
337 return entry_point;
338
339 }
340
341 // This method tells the deoptimizer how big an interpreted frame must be:
342 int AbstractInterpreter::size_activation(methodOop method,
343 int tempcount,
344 int popframe_extra_args,
345 int moncount,
346 int callee_param_count,
347 int callee_locals,
348 bool is_top_frame) {
349 return layout_activation(method,
350 tempcount, popframe_extra_args, moncount,
351 callee_param_count, callee_locals,
352 (frame*) NULL, (frame*) NULL, is_top_frame);
353 }
354
355 void Deoptimization::unwind_callee_save_values(frame* f, vframeArray* vframe_array) {
356
357 // This code is sort of the equivalent of C2IAdapter::setup_stack_frame back in
358 // the days we had adapter frames. When we deoptimize a situation where a
359 // compiled caller calls a compiled caller will have registers it expects
360 // to survive the call to the callee. If we deoptimize the callee the only
361 // way we can restore these registers is to have the oldest interpreter
362 // frame that we create restore these values. That is what this routine
363 // will accomplish.
364
365 // At the moment we have modified c2 to not have any callee save registers
366 // so this problem does not exist and this routine is just a place holder.
367
368 assert(f->is_interpreted_frame(), "must be interpreted");
369 }