2007-12-01 00:00:00 +00:00
|
|
|
/*
|
2009-04-08 10:56:49 -07:00
|
|
|
* Copyright 2003-2009 Sun Microsystems, Inc. All Rights Reserved.
|
2007-12-01 00:00:00 +00:00
|
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
|
|
*
|
|
|
|
* This code is free software; you can redistribute it and/or modify it
|
|
|
|
* under the terms of the GNU General Public License version 2 only, as
|
|
|
|
* published by the Free Software Foundation.
|
|
|
|
*
|
|
|
|
* This code is distributed in the hope that it will be useful, but WITHOUT
|
|
|
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
|
|
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
|
|
* version 2 for more details (a copy is included in the LICENSE file that
|
|
|
|
* accompanied this code).
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU General Public License version
|
|
|
|
* 2 along with this work; if not, write to the Free Software Foundation,
|
|
|
|
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
|
|
*
|
|
|
|
* Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
|
|
|
|
* CA 95054 USA or visit www.sun.com if you need additional information or
|
|
|
|
* have any questions.
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "incls/_precompiled.incl"
|
|
|
|
#include "incls/_interpreter_x86_64.cpp.incl"
|
|
|
|
|
|
|
|
#define __ _masm->
|
|
|
|
|
|
|
|
|
|
|
|
#ifdef _WIN64
|
|
|
|
address AbstractInterpreterGenerator::generate_slow_signature_handler() {
|
|
|
|
address entry = __ pc();
|
|
|
|
|
|
|
|
// rbx: method
|
|
|
|
// r14: pointer to locals
|
|
|
|
// c_rarg3: first stack arg - wordSize
|
2008-08-27 00:21:55 -07:00
|
|
|
__ mov(c_rarg3, rsp);
|
2007-12-01 00:00:00 +00:00
|
|
|
// adjust rsp
|
2008-08-27 00:21:55 -07:00
|
|
|
__ subptr(rsp, 4 * wordSize);
|
2007-12-01 00:00:00 +00:00
|
|
|
__ call_VM(noreg,
|
|
|
|
CAST_FROM_FN_PTR(address,
|
|
|
|
InterpreterRuntime::slow_signature_handler),
|
|
|
|
rbx, r14, c_rarg3);
|
|
|
|
|
|
|
|
// rax: result handler
|
|
|
|
|
|
|
|
// Stack layout:
|
|
|
|
// rsp: 3 integer or float args (if static first is unused)
|
|
|
|
// 1 float/double identifiers
|
|
|
|
// return address
|
|
|
|
// stack args
|
|
|
|
// garbage
|
|
|
|
// expression stack bottom
|
|
|
|
// bcp (NULL)
|
|
|
|
// ...
|
|
|
|
|
|
|
|
// Do FP first so we can use c_rarg3 as temp
|
|
|
|
__ movl(c_rarg3, Address(rsp, 3 * wordSize)); // float/double identifiers
|
|
|
|
|
|
|
|
for ( int i= 0; i < Argument::n_int_register_parameters_c-1; i++ ) {
|
|
|
|
XMMRegister floatreg = as_XMMRegister(i+1);
|
|
|
|
Label isfloatordouble, isdouble, next;
|
|
|
|
|
|
|
|
__ testl(c_rarg3, 1 << (i*2)); // Float or Double?
|
|
|
|
__ jcc(Assembler::notZero, isfloatordouble);
|
|
|
|
|
|
|
|
// Do Int register here
|
|
|
|
switch ( i ) {
|
|
|
|
case 0:
|
|
|
|
__ movl(rscratch1, Address(rbx, methodOopDesc::access_flags_offset()));
|
|
|
|
__ testl(rscratch1, JVM_ACC_STATIC);
|
2008-08-27 00:21:55 -07:00
|
|
|
__ cmovptr(Assembler::zero, c_rarg1, Address(rsp, 0));
|
2007-12-01 00:00:00 +00:00
|
|
|
break;
|
|
|
|
case 1:
|
2008-08-27 00:21:55 -07:00
|
|
|
__ movptr(c_rarg2, Address(rsp, wordSize));
|
2007-12-01 00:00:00 +00:00
|
|
|
break;
|
|
|
|
case 2:
|
2008-08-27 00:21:55 -07:00
|
|
|
__ movptr(c_rarg3, Address(rsp, 2 * wordSize));
|
2007-12-01 00:00:00 +00:00
|
|
|
break;
|
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
__ jmp (next);
|
|
|
|
|
|
|
|
__ bind(isfloatordouble);
|
|
|
|
__ testl(c_rarg3, 1 << ((i*2)+1)); // Double?
|
|
|
|
__ jcc(Assembler::notZero, isdouble);
|
|
|
|
|
|
|
|
// Do Float Here
|
|
|
|
__ movflt(floatreg, Address(rsp, i * wordSize));
|
|
|
|
__ jmp(next);
|
|
|
|
|
|
|
|
// Do Double here
|
|
|
|
__ bind(isdouble);
|
|
|
|
__ movdbl(floatreg, Address(rsp, i * wordSize));
|
|
|
|
|
|
|
|
__ bind(next);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
// restore rsp
|
2008-08-27 00:21:55 -07:00
|
|
|
__ addptr(rsp, 4 * wordSize);
|
2007-12-01 00:00:00 +00:00
|
|
|
|
|
|
|
__ ret(0);
|
|
|
|
|
|
|
|
return entry;
|
|
|
|
}
|
|
|
|
#else
|
|
|
|
address AbstractInterpreterGenerator::generate_slow_signature_handler() {
|
|
|
|
address entry = __ pc();
|
|
|
|
|
|
|
|
// rbx: method
|
|
|
|
// r14: pointer to locals
|
|
|
|
// c_rarg3: first stack arg - wordSize
|
2008-08-27 00:21:55 -07:00
|
|
|
__ mov(c_rarg3, rsp);
|
2007-12-01 00:00:00 +00:00
|
|
|
// adjust rsp
|
2008-08-27 00:21:55 -07:00
|
|
|
__ subptr(rsp, 14 * wordSize);
|
2007-12-01 00:00:00 +00:00
|
|
|
__ call_VM(noreg,
|
|
|
|
CAST_FROM_FN_PTR(address,
|
|
|
|
InterpreterRuntime::slow_signature_handler),
|
|
|
|
rbx, r14, c_rarg3);
|
|
|
|
|
|
|
|
// rax: result handler
|
|
|
|
|
|
|
|
// Stack layout:
|
|
|
|
// rsp: 5 integer args (if static first is unused)
|
|
|
|
// 1 float/double identifiers
|
|
|
|
// 8 double args
|
|
|
|
// return address
|
|
|
|
// stack args
|
|
|
|
// garbage
|
|
|
|
// expression stack bottom
|
|
|
|
// bcp (NULL)
|
|
|
|
// ...
|
|
|
|
|
|
|
|
// Do FP first so we can use c_rarg3 as temp
|
|
|
|
__ movl(c_rarg3, Address(rsp, 5 * wordSize)); // float/double identifiers
|
|
|
|
|
|
|
|
for (int i = 0; i < Argument::n_float_register_parameters_c; i++) {
|
|
|
|
const XMMRegister r = as_XMMRegister(i);
|
|
|
|
|
|
|
|
Label d, done;
|
|
|
|
|
|
|
|
__ testl(c_rarg3, 1 << i);
|
|
|
|
__ jcc(Assembler::notZero, d);
|
|
|
|
__ movflt(r, Address(rsp, (6 + i) * wordSize));
|
|
|
|
__ jmp(done);
|
|
|
|
__ bind(d);
|
|
|
|
__ movdbl(r, Address(rsp, (6 + i) * wordSize));
|
|
|
|
__ bind(done);
|
|
|
|
}
|
|
|
|
|
|
|
|
// Now handle integrals. Only do c_rarg1 if not static.
|
|
|
|
__ movl(c_rarg3, Address(rbx, methodOopDesc::access_flags_offset()));
|
|
|
|
__ testl(c_rarg3, JVM_ACC_STATIC);
|
2008-08-27 00:21:55 -07:00
|
|
|
__ cmovptr(Assembler::zero, c_rarg1, Address(rsp, 0));
|
2007-12-01 00:00:00 +00:00
|
|
|
|
2008-08-27 00:21:55 -07:00
|
|
|
__ movptr(c_rarg2, Address(rsp, wordSize));
|
|
|
|
__ movptr(c_rarg3, Address(rsp, 2 * wordSize));
|
|
|
|
__ movptr(c_rarg4, Address(rsp, 3 * wordSize));
|
|
|
|
__ movptr(c_rarg5, Address(rsp, 4 * wordSize));
|
2007-12-01 00:00:00 +00:00
|
|
|
|
|
|
|
// restore rsp
|
2008-08-27 00:21:55 -07:00
|
|
|
__ addptr(rsp, 14 * wordSize);
|
2007-12-01 00:00:00 +00:00
|
|
|
|
|
|
|
__ ret(0);
|
|
|
|
|
|
|
|
return entry;
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
//
|
|
|
|
// Various method entries
|
|
|
|
//
|
|
|
|
|
2008-08-27 00:21:55 -07:00
|
|
|
address InterpreterGenerator::generate_math_entry(AbstractInterpreter::MethodKind kind) {
|
2007-12-01 00:00:00 +00:00
|
|
|
|
2008-08-27 00:21:55 -07:00
|
|
|
// rbx,: methodOop
|
|
|
|
// rcx: scratrch
|
|
|
|
// r13: sender sp
|
2007-12-01 00:00:00 +00:00
|
|
|
|
2008-08-27 00:21:55 -07:00
|
|
|
if (!InlineIntrinsics) return NULL; // Generate a vanilla entry
|
2007-12-01 00:00:00 +00:00
|
|
|
|
|
|
|
address entry_point = __ pc();
|
|
|
|
|
|
|
|
// These don't need a safepoint check because they aren't virtually
|
|
|
|
// callable. We won't enter these intrinsics from compiled code.
|
|
|
|
// If in the future we added an intrinsic which was virtually callable
|
|
|
|
// we'd have to worry about how to safepoint so that this code is used.
|
|
|
|
|
|
|
|
// mathematical functions inlined by compiler
|
|
|
|
// (interpreter must provide identical implementation
|
|
|
|
// in order to avoid monotonicity bugs when switching
|
|
|
|
// from interpreter to compiler in the middle of some
|
|
|
|
// computation)
|
2008-08-27 00:21:55 -07:00
|
|
|
//
|
|
|
|
// stack: [ ret adr ] <-- rsp
|
|
|
|
// [ lo(arg) ]
|
|
|
|
// [ hi(arg) ]
|
|
|
|
//
|
2007-12-01 00:00:00 +00:00
|
|
|
|
|
|
|
// Note: For JDK 1.2 StrictMath doesn't exist and Math.sin/cos/sqrt are
|
|
|
|
// native methods. Interpreter::method_kind(...) does a check for
|
|
|
|
// native methods first before checking for intrinsic methods and
|
|
|
|
// thus will never select this entry point. Make sure it is not
|
|
|
|
// called accidentally since the SharedRuntime entry points will
|
|
|
|
// not work for JDK 1.2.
|
|
|
|
//
|
|
|
|
// We no longer need to check for JDK 1.2 since it's EOL'ed.
|
|
|
|
// The following check existed in pre 1.6 implementation,
|
|
|
|
// if (Universe::is_jdk12x_version()) {
|
|
|
|
// __ should_not_reach_here();
|
|
|
|
// }
|
|
|
|
// Universe::is_jdk12x_version() always returns false since
|
|
|
|
// the JDK version is not yet determined when this method is called.
|
|
|
|
// This method is called during interpreter_init() whereas
|
|
|
|
// JDK version is only determined when universe2_init() is called.
|
|
|
|
|
|
|
|
// Note: For JDK 1.3 StrictMath exists and Math.sin/cos/sqrt are
|
|
|
|
// java methods. Interpreter::method_kind(...) will select
|
|
|
|
// this entry point for the corresponding methods in JDK 1.3.
|
2008-08-27 00:21:55 -07:00
|
|
|
// get argument
|
2007-12-01 00:00:00 +00:00
|
|
|
|
2008-08-27 00:21:55 -07:00
|
|
|
if (kind == Interpreter::java_lang_math_sqrt) {
|
|
|
|
__ sqrtsd(xmm0, Address(rsp, wordSize));
|
|
|
|
} else {
|
|
|
|
__ fld_d(Address(rsp, wordSize));
|
|
|
|
switch (kind) {
|
|
|
|
case Interpreter::java_lang_math_sin :
|
|
|
|
__ trigfunc('s');
|
|
|
|
break;
|
|
|
|
case Interpreter::java_lang_math_cos :
|
|
|
|
__ trigfunc('c');
|
|
|
|
break;
|
|
|
|
case Interpreter::java_lang_math_tan :
|
|
|
|
__ trigfunc('t');
|
|
|
|
break;
|
|
|
|
case Interpreter::java_lang_math_abs:
|
|
|
|
__ fabs();
|
|
|
|
break;
|
|
|
|
case Interpreter::java_lang_math_log:
|
|
|
|
__ flog();
|
|
|
|
break;
|
|
|
|
case Interpreter::java_lang_math_log10:
|
|
|
|
__ flog10();
|
|
|
|
break;
|
|
|
|
default :
|
|
|
|
ShouldNotReachHere();
|
|
|
|
}
|
|
|
|
|
|
|
|
// return double result in xmm0 for interpreter and compilers.
|
|
|
|
__ subptr(rsp, 2*wordSize);
|
|
|
|
// Round to 64bit precision
|
|
|
|
__ fstp_d(Address(rsp, 0));
|
|
|
|
__ movdbl(xmm0, Address(rsp, 0));
|
|
|
|
__ addptr(rsp, 2*wordSize);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
__ pop(rax);
|
|
|
|
__ mov(rsp, r13);
|
2007-12-01 00:00:00 +00:00
|
|
|
__ jmp(rax);
|
|
|
|
|
|
|
|
return entry_point;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
// Abstract method entry
|
|
|
|
// Attempt to execute abstract method. Throw exception
|
|
|
|
address InterpreterGenerator::generate_abstract_entry(void) {
|
|
|
|
// rbx: methodOop
|
|
|
|
// r13: sender SP
|
|
|
|
|
|
|
|
address entry_point = __ pc();
|
|
|
|
|
|
|
|
// abstract method entry
|
|
|
|
|
2009-12-16 12:48:04 +01:00
|
|
|
// pop return address, reset last_sp to NULL
|
|
|
|
__ empty_expression_stack();
|
|
|
|
__ restore_bcp(); // rsi must be correct for exception handler (was destroyed)
|
|
|
|
__ restore_locals(); // make sure locals pointer is correct as well (was destroyed)
|
2007-12-01 00:00:00 +00:00
|
|
|
|
|
|
|
// throw exception
|
|
|
|
__ call_VM(noreg, CAST_FROM_FN_PTR(address,
|
|
|
|
InterpreterRuntime::throw_AbstractMethodError));
|
|
|
|
// the call_VM checks for exception, so we should never return here.
|
|
|
|
__ should_not_reach_here();
|
|
|
|
|
|
|
|
return entry_point;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2009-04-08 10:56:49 -07:00
|
|
|
// Method handle invoker
|
|
|
|
// Dispatch a method of the form java.dyn.MethodHandles::invoke(...)
|
|
|
|
address InterpreterGenerator::generate_method_handle_entry(void) {
|
|
|
|
if (!EnableMethodHandles) {
|
|
|
|
return generate_abstract_entry();
|
|
|
|
}
|
2009-12-16 12:48:04 +01:00
|
|
|
|
|
|
|
address entry_point = MethodHandles::generate_method_handle_interpreter_entry(_masm);
|
|
|
|
|
|
|
|
return entry_point;
|
2009-04-08 10:56:49 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2007-12-01 00:00:00 +00:00
|
|
|
// Empty method, generate a very fast return.
|
|
|
|
|
|
|
|
address InterpreterGenerator::generate_empty_entry(void) {
|
|
|
|
// rbx: methodOop
|
|
|
|
// r13: sender sp must set sp to this value on return
|
|
|
|
|
|
|
|
if (!UseFastEmptyMethods) {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
address entry_point = __ pc();
|
|
|
|
|
|
|
|
// If we need a safepoint check, generate full interpreter entry.
|
|
|
|
Label slow_path;
|
|
|
|
__ cmp32(ExternalAddress(SafepointSynchronize::address_of_state()),
|
|
|
|
SafepointSynchronize::_not_synchronized);
|
|
|
|
__ jcc(Assembler::notEqual, slow_path);
|
|
|
|
|
|
|
|
// do nothing for empty methods (do not even increment invocation counter)
|
|
|
|
// Code: _return
|
|
|
|
// _return
|
|
|
|
// return w/o popping parameters
|
2008-08-27 00:21:55 -07:00
|
|
|
__ pop(rax);
|
|
|
|
__ mov(rsp, r13);
|
2007-12-01 00:00:00 +00:00
|
|
|
__ jmp(rax);
|
|
|
|
|
|
|
|
__ bind(slow_path);
|
|
|
|
(void) generate_normal_entry(false);
|
|
|
|
return entry_point;
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
// This method tells the deoptimizer how big an interpreted frame must be:
|
|
|
|
int AbstractInterpreter::size_activation(methodOop method,
|
|
|
|
int tempcount,
|
|
|
|
int popframe_extra_args,
|
|
|
|
int moncount,
|
|
|
|
int callee_param_count,
|
|
|
|
int callee_locals,
|
|
|
|
bool is_top_frame) {
|
|
|
|
return layout_activation(method,
|
|
|
|
tempcount, popframe_extra_args, moncount,
|
|
|
|
callee_param_count, callee_locals,
|
|
|
|
(frame*) NULL, (frame*) NULL, is_top_frame);
|
|
|
|
}
|
|
|
|
|
|
|
|
void Deoptimization::unwind_callee_save_values(frame* f, vframeArray* vframe_array) {
|
|
|
|
|
|
|
|
// This code is sort of the equivalent of C2IAdapter::setup_stack_frame back in
|
|
|
|
// the days we had adapter frames. When we deoptimize a situation where a
|
|
|
|
// compiled caller calls a compiled caller will have registers it expects
|
|
|
|
// to survive the call to the callee. If we deoptimize the callee the only
|
|
|
|
// way we can restore these registers is to have the oldest interpreter
|
|
|
|
// frame that we create restore these values. That is what this routine
|
|
|
|
// will accomplish.
|
|
|
|
|
|
|
|
// At the moment we have modified c2 to not have any callee save registers
|
|
|
|
// so this problem does not exist and this routine is just a place holder.
|
|
|
|
|
|
|
|
assert(f->is_interpreted_frame(), "must be interpreted");
|
|
|
|
}
|