src/cpu/mips/vm/templateInterpreter_mips_64.cpp

Tue, 16 May 2017 11:53:48 -0400

author
fujie
date
Tue, 16 May 2017 11:53:48 -0400
changeset 407
16eef9733183
parent 189
60510c4e1f11
child 6880
52ea28d233d2
permissions
-rw-r--r--

#5401 Fix compiler/7116216/StackOverflow.java for MIPS.

aoqi@1 1 /*
aoqi@1 2 * Copyright (c) 2003, 2013, Oracle and/or its affiliates. All rights reserved.
aoqi@1 3 * Copyright (c) 2015, 2016, Loongson Technology. All rights reserved.
aoqi@1 4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
aoqi@1 5 *
aoqi@1 6 * This code is free software; you can redistribute it and/or modify it
aoqi@1 7 * under the terms of the GNU General Public License version 2 only, as
aoqi@1 8 * published by the Free Software Foundation.
aoqi@1 9 *
aoqi@1 10 * This code is distributed in the hope that it will be useful, but WITHOUT
aoqi@1 11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
aoqi@1 12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
aoqi@1 13 * version 2 for more details (a copy is included in the LICENSE file that
aoqi@1 14 * accompanied this code).
aoqi@1 15 *
aoqi@1 16 * You should have received a copy of the GNU General Public License version
aoqi@1 17 * 2 along with this work; if not, write to the Free Software Foundation,
aoqi@1 18 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
aoqi@1 19 *
aoqi@1 20 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
aoqi@1 21 * or visit www.oracle.com if you need additional information or have any
aoqi@1 22 * questions.
aoqi@1 23 *
aoqi@1 24 */
aoqi@1 25
aoqi@1 26 #include "precompiled.hpp"
aoqi@1 27 #include "asm/macroAssembler.hpp"
aoqi@1 28 #include "interpreter/bytecodeHistogram.hpp"
aoqi@1 29 #include "interpreter/interpreter.hpp"
aoqi@1 30 #include "interpreter/interpreterGenerator.hpp"
aoqi@1 31 #include "interpreter/interpreterRuntime.hpp"
aoqi@1 32 #include "interpreter/templateTable.hpp"
aoqi@1 33 #include "oops/arrayOop.hpp"
aoqi@1 34 #include "oops/methodData.hpp"
aoqi@1 35 #include "oops/method.hpp"
aoqi@1 36 #include "oops/oop.inline.hpp"
aoqi@1 37 #include "prims/jvmtiExport.hpp"
aoqi@1 38 #include "prims/jvmtiThreadState.hpp"
aoqi@1 39 #include "runtime/arguments.hpp"
aoqi@1 40 #include "runtime/deoptimization.hpp"
aoqi@1 41 #include "runtime/frame.inline.hpp"
aoqi@1 42 #include "runtime/sharedRuntime.hpp"
aoqi@1 43 #include "runtime/stubRoutines.hpp"
aoqi@1 44 #include "runtime/synchronizer.hpp"
aoqi@1 45 #include "runtime/timer.hpp"
aoqi@1 46 #include "runtime/vframeArray.hpp"
aoqi@1 47 #include "utilities/debug.hpp"
aoqi@1 48
aoqi@1 49 #define __ _masm->
aoqi@1 50
aoqi@1 51 #ifndef CC_INTERP
aoqi@1 52
aoqi@1 53 // asm based interpreter deoptimization helpers
aoqi@1 54 int AbstractInterpreter::size_activation(int max_stack,
aoqi@1 55 int temps,
aoqi@1 56 int extra_args,
aoqi@1 57 int monitors,
aoqi@1 58 int callee_params,
aoqi@1 59 int callee_locals,
aoqi@1 60 bool is_top_frame) {
aoqi@1 61 // Note: This calculation must exactly parallel the frame setup
aoqi@1 62 // in AbstractInterpreterGenerator::generate_method_entry.
aoqi@1 63
aoqi@1 64 // fixed size of an interpreter frame:
aoqi@1 65 int overhead = frame::sender_sp_offset -
aoqi@1 66 frame::interpreter_frame_initial_sp_offset;
aoqi@1 67 // Our locals were accounted for by the caller (or last_frame_adjust
aoqi@1 68 // on the transistion) Since the callee parameters already account
aoqi@1 69 // for the callee's params we only need to account for the extra
aoqi@1 70 // locals.
aoqi@1 71 int size = overhead +
aoqi@1 72 (callee_locals - callee_params)*Interpreter::stackElementWords +
aoqi@1 73 monitors * frame::interpreter_frame_monitor_size() +
aoqi@1 74 temps* Interpreter::stackElementWords + extra_args;
aoqi@1 75
aoqi@1 76 return size;
aoqi@1 77 }
aoqi@1 78
aoqi@1 79
aoqi@1 80 const int Interpreter::return_sentinel = 0xfeedbeed;
aoqi@1 81 const int method_offset = frame::interpreter_frame_method_offset * wordSize;
aoqi@1 82 const int bci_offset = frame::interpreter_frame_bcx_offset * wordSize;
aoqi@1 83 const int locals_offset = frame::interpreter_frame_locals_offset * wordSize;
aoqi@1 84
aoqi@1 85 //-----------------------------------------------------------------------------
aoqi@1 86
aoqi@1 87 address TemplateInterpreterGenerator::generate_StackOverflowError_handler() {
aoqi@1 88 address entry = __ pc();
aoqi@1 89
aoqi@1 90 #ifdef ASSERT
aoqi@1 91 {
aoqi@1 92 Label L;
aoqi@1 93 __ addi(T1, FP, frame::interpreter_frame_monitor_block_top_offset * wordSize);
aoqi@1 94 __ sub(T1, T1, SP); // T1 = maximal sp for current fp
aoqi@1 95 __ bgez(T1, L); // check if frame is complete
aoqi@1 96 __ delayed()->nop();
aoqi@1 97 __ stop("interpreter frame not set up");
aoqi@1 98 __ bind(L);
aoqi@1 99 }
aoqi@1 100 #endif // ASSERT
aoqi@1 101 // Restore bcp under the assumption that the current frame is still
aoqi@1 102 // interpreted
aoqi@1 103 // FIXME: please change the func restore_bcp
aoqi@1 104 // S0 is the conventional register for bcp
aoqi@1 105 __ restore_bcp();
aoqi@1 106
aoqi@1 107 // expression stack must be empty before entering the VM if an
aoqi@1 108 // exception happened
aoqi@1 109 __ empty_expression_stack();
aoqi@1 110 // throw exception
aoqi@1 111 //__ call_VM(noreg,
aoqi@1 112 // CAST_FROM_FN_PTR(address,
aoqi@1 113 // InterpreterRuntime::throw_StackOverflowError));
aoqi@1 114 // FIXME: why do not pass parameter thread ?
aoqi@1 115 __ call_VM(NOREG, CAST_FROM_FN_PTR(address, InterpreterRuntime::throw_StackOverflowError));
aoqi@1 116 return entry;
aoqi@1 117 }
aoqi@1 118
aoqi@1 119 address TemplateInterpreterGenerator::generate_ArrayIndexOutOfBounds_handler(
aoqi@1 120 const char* name) {
aoqi@1 121 address entry = __ pc();
aoqi@1 122 // expression stack must be empty before entering the VM if an
aoqi@1 123 // exception happened
aoqi@1 124 __ empty_expression_stack();
aoqi@1 125 __ li(A1, (long)name);
aoqi@1 126 __ call_VM(noreg, CAST_FROM_FN_PTR(address,
aoqi@1 127 InterpreterRuntime::throw_ArrayIndexOutOfBoundsException), A1, A2);
aoqi@1 128 return entry;
aoqi@1 129 }
aoqi@1 130
aoqi@1 131 address TemplateInterpreterGenerator::generate_ClassCastException_handler() {
aoqi@1 132 address entry = __ pc();
aoqi@1 133
aoqi@1 134 // object is at TOS
aoqi@1 135 //FIXME, I am not sure if the object is at TOS as x86 do now @jerome, 04/20,2007
aoqi@1 136 //__ pop(c_rarg1);
aoqi@1 137
aoqi@1 138 // expression stack must be empty before entering the VM if an
aoqi@1 139 // exception happened
aoqi@1 140 __ empty_expression_stack();
aoqi@1 141 __ empty_FPU_stack();
aoqi@1 142 __ call_VM(noreg, CAST_FROM_FN_PTR(address, InterpreterRuntime::throw_ClassCastException), FSR);
aoqi@1 143 return entry;
aoqi@1 144 }
aoqi@1 145
aoqi@1 146 address TemplateInterpreterGenerator::generate_exception_handler_common(
aoqi@1 147 const char* name, const char* message, bool pass_oop) {
aoqi@1 148 assert(!pass_oop || message == NULL, "either oop or message but not both");
aoqi@1 149 address entry = __ pc();
aoqi@1 150
aoqi@1 151 // expression stack must be empty before entering the VM if an exception happened
aoqi@1 152 __ empty_expression_stack();
aoqi@1 153 // setup parameters
aoqi@1 154 __ li(A1, (long)name);
aoqi@1 155 if (pass_oop) {
aoqi@1 156 __ call_VM(V0,
aoqi@1 157 CAST_FROM_FN_PTR(address, InterpreterRuntime::create_klass_exception), A1, FSR);
aoqi@1 158 } else {
aoqi@1 159 __ li(A2, (long)message);
aoqi@1 160 __ call_VM(V0,
aoqi@1 161 CAST_FROM_FN_PTR(address, InterpreterRuntime::create_exception), A1, A2);
aoqi@1 162 }
aoqi@1 163 // throw exception
aoqi@1 164 __ jmp(Interpreter::throw_exception_entry(), relocInfo::none);
aoqi@1 165 __ delayed()->nop();
aoqi@1 166 return entry;
aoqi@1 167 }
aoqi@1 168
aoqi@1 169
aoqi@1 170 address TemplateInterpreterGenerator::generate_continuation_for(TosState state) {
aoqi@1 171 address entry = __ pc();
aoqi@1 172 // NULL last_sp until next java call
aoqi@1 173 __ sd(R0,Address(FP, frame::interpreter_frame_last_sp_offset * wordSize));
aoqi@1 174 __ dispatch_next(state);
aoqi@1 175 return entry;
aoqi@1 176 }
aoqi@1 177
aoqi@1 178
aoqi@1 179 address TemplateInterpreterGenerator::generate_return_entry_for(TosState state, int step, size_t index_size) {
aoqi@1 180
aoqi@1 181 address entry = __ pc();
aoqi@1 182
aoqi@1 183 // Restore stack bottom in case i2c adjusted stack
aoqi@1 184 // __ movptr(rsp, Address(rbp, frame::interpreter_frame_last_sp_offset * wordSize));
aoqi@1 185 __ ld(SP, Address(FP, frame::interpreter_frame_last_sp_offset * wordSize));
aoqi@1 186 // and NULL it as marker that esp is now tos until next java call
aoqi@1 187 // __ movptr(Address(rbp, frame::interpreter_frame_last_sp_offset * wordSize), (int32_t)NULL_WORD);
aoqi@1 188 __ sd(R0, FP, frame::interpreter_frame_last_sp_offset * wordSize);
aoqi@1 189
aoqi@1 190 __ restore_bcp();
aoqi@1 191 __ restore_locals();
aoqi@1 192
aoqi@1 193 // 2014/11/24 Fu
aoqi@1 194 // mdp: T8
aoqi@1 195 // ret: FSR
aoqi@1 196 // tmp: T9
aoqi@1 197 if (state == atos) {
aoqi@1 198 Register mdp = T8;
aoqi@1 199 Register tmp = T9;
aoqi@1 200 __ profile_return_type(mdp, FSR, tmp);
aoqi@1 201 }
aoqi@1 202
aoqi@1 203
aoqi@1 204 const Register cache = T9;
aoqi@1 205 const Register index = T3;
aoqi@1 206 __ get_cache_and_index_at_bcp(cache, index, 1, index_size);
aoqi@1 207
aoqi@1 208 const Register flags = cache;
aoqi@1 209 // __ movl(flags, Address(cache, index, Address::times_ptr, ConstantPoolCache::base_offset() + ConstantPoolCacheEntry::flags_offset()));
aoqi@1 210 __ dsll(AT, index, Address::times_ptr);
aoqi@1 211 __ daddu(AT, cache, AT);
aoqi@1 212 __ lw(flags, AT, in_bytes(ConstantPoolCache::base_offset() + ConstantPoolCacheEntry::flags_offset()));
aoqi@1 213 // __ andl(flags, ConstantPoolCacheEntry::parameter_size_mask);
aoqi@1 214 __ andi(flags, flags, ConstantPoolCacheEntry::parameter_size_mask);
aoqi@1 215 // __ lea(rsp, Address(rsp, flags, Interpreter::stackElementScale()));
aoqi@1 216 __ dsll(AT, flags, Interpreter::stackElementScale());
aoqi@1 217 __ daddu(SP, SP, AT);
aoqi@1 218
aoqi@1 219 __ dispatch_next(state, step);
aoqi@1 220
aoqi@1 221 return entry;
aoqi@1 222 }
aoqi@1 223
aoqi@1 224
aoqi@1 225 address TemplateInterpreterGenerator::generate_deopt_entry_for(TosState state,
aoqi@1 226 int step) {
aoqi@1 227 address entry = __ pc();
aoqi@1 228 // NULL last_sp until next java call
aoqi@1 229 //__ movptr(Address(rbp, frame::interpreter_frame_last_sp_offset * wordSize), (int32_t)NULL_WORD);
aoqi@1 230 __ sd(R0, FP, frame::interpreter_frame_last_sp_offset * wordSize);
aoqi@1 231 __ restore_bcp();
aoqi@1 232 __ restore_locals();
aoqi@1 233 // handle exceptions
aoqi@1 234 {
aoqi@1 235 Label L;
aoqi@1 236 const Register thread = TREG;
aoqi@1 237 #ifndef OPT_THREAD
aoqi@1 238 __ get_thread(thread);
aoqi@1 239 #endif
aoqi@1 240 __ lw(AT, thread, in_bytes(Thread::pending_exception_offset()));
aoqi@1 241 __ beq(AT, R0, L);
aoqi@1 242 __ delayed()->nop();
aoqi@1 243 __ call_VM(noreg, CAST_FROM_FN_PTR(address, InterpreterRuntime::throw_pending_exception));
aoqi@1 244 __ should_not_reach_here();
aoqi@1 245 __ bind(L);
aoqi@1 246 }
aoqi@1 247 __ dispatch_next(state, step);
aoqi@1 248 return entry;
aoqi@1 249 }
aoqi@1 250
aoqi@1 251 int AbstractInterpreter::BasicType_as_index(BasicType type) {
aoqi@1 252 int i = 0;
aoqi@1 253 /*
aoqi@1 254 switch (type) {
aoqi@1 255 case T_BOOLEAN: i = 0; break;
aoqi@1 256 case T_CHAR : i = 1; break;
aoqi@1 257 case T_BYTE : i = 2; break;
aoqi@1 258 case T_SHORT : i = 3; break;
aoqi@1 259 case T_INT : i = 4; break;
aoqi@1 260 case T_LONG : i = 5; break;
aoqi@1 261 case T_VOID : i = 6; break;
aoqi@1 262 case T_FLOAT : i = 7; break;
aoqi@1 263 case T_DOUBLE : i = 8; break;
aoqi@1 264 case T_OBJECT : i = 9; break;
aoqi@1 265 case T_ARRAY : i = 9; break;
aoqi@1 266 default : ShouldNotReachHere();
aoqi@1 267 }
aoqi@1 268 */
aoqi@1 269 switch (type) {
aoqi@1 270 case T_BOOLEAN: i = 0; break;
aoqi@1 271 case T_CHAR : i = 1; break;
aoqi@1 272 case T_BYTE : i = 2; break;
aoqi@1 273 case T_SHORT : i = 3; break;
aoqi@1 274 case T_INT : // fall through
aoqi@1 275 case T_LONG : // fall through
aoqi@1 276 case T_VOID : i = 4; break;
aoqi@1 277 case T_FLOAT : i = 5; break;
aoqi@1 278 case T_DOUBLE : i = 6; break;
aoqi@1 279 case T_OBJECT : // fall through
aoqi@1 280 case T_ARRAY : i = 7; break;
aoqi@1 281 default : ShouldNotReachHere();
aoqi@1 282 }
aoqi@1 283 assert(0 <= i && i < AbstractInterpreter::number_of_result_handlers,
aoqi@1 284 "index out of bounds");
aoqi@1 285 return i;
aoqi@1 286 }
aoqi@1 287
aoqi@1 288
aoqi@1 289 // why do not consider float and double , @jerome, 12/27,06, @jerome
aoqi@1 290 //FIXME, aoqi
aoqi@1 291 address TemplateInterpreterGenerator::generate_result_handler_for(
aoqi@1 292 BasicType type) {
aoqi@1 293 address entry = __ pc();
aoqi@1 294 switch (type) {
aoqi@1 295 case T_BOOLEAN: __ c2bool(V0); break;
aoqi@1 296 case T_CHAR : __ andi(V0, V0, 0xFFFF); break;
aoqi@1 297 case T_BYTE : __ sign_extend_byte (V0); break;
aoqi@1 298 case T_SHORT : __ sign_extend_short(V0); break;
aoqi@1 299 case T_INT : /* nothing to do */ break;
aoqi@1 300 case T_FLOAT : /* nothing to do */ break;
aoqi@1 301 case T_DOUBLE : /* nothing to do */ break;
aoqi@1 302 case T_OBJECT :
aoqi@1 303 {
aoqi@1 304 // __ beq(V0, R0, L); // test if NULL handle
aoqi@1 305 // __ delayed()->nop(); // if not then
aoqi@1 306 // __ lw(V0, V0, 0); // unbox result
aoqi@1 307 __ ld(V0, FP, frame::interpreter_frame_oop_temp_offset * wordSize);
aoqi@1 308 __ verify_oop(V0); // and verify it
aoqi@1 309 }
aoqi@1 310 break;
aoqi@1 311 default : ShouldNotReachHere();
aoqi@1 312 }
aoqi@1 313 __ jr(RA); // return from result handler
aoqi@1 314 __ delayed()->nop();
aoqi@1 315 return entry;
aoqi@1 316 }
aoqi@1 317
aoqi@1 318 address TemplateInterpreterGenerator::generate_safept_entry_for(
aoqi@1 319 TosState state,
aoqi@1 320 address runtime_entry) {
aoqi@1 321 address entry = __ pc();
aoqi@1 322 __ push(state);
aoqi@1 323 __ call_VM(noreg, runtime_entry);
aoqi@1 324 __ dispatch_via(vtos, Interpreter::_normal_table.table_for(vtos));
aoqi@1 325 return entry;
aoqi@1 326 }
aoqi@1 327
aoqi@1 328
aoqi@1 329
aoqi@1 330 // Helpers for commoning out cases in the various type of method entries.
aoqi@1 331 //
aoqi@1 332
aoqi@1 333
aoqi@1 334 // increment invocation count & check for overflow
aoqi@1 335 //
aoqi@1 336 // Note: checking for negative value instead of overflow
aoqi@1 337 // so we have a 'sticky' overflow test
aoqi@1 338 //
aoqi@1 339 // prerequisites : method in T0, invocation counter in T3
aoqi@1 340 void InterpreterGenerator::generate_counter_incr(
aoqi@1 341 Label* overflow,
aoqi@1 342 Label* profile_method,
aoqi@1 343 Label* profile_method_continue) {
aoqi@1 344 Label done;
aoqi@1 345 const Address invocation_counter(FSR, in_bytes(MethodCounters::invocation_counter_offset()) //Fu:20130814 Wang:Rmethod --> FSR
aoqi@1 346 + in_bytes(InvocationCounter::counter_offset()));
aoqi@1 347 const Address backedge_counter (FSR, in_bytes(MethodCounters::backedge_counter_offset())
aoqi@1 348 + in_bytes(InvocationCounter::counter_offset()));
aoqi@1 349
aoqi@1 350 __ get_method_counters(Rmethod, FSR, done);
aoqi@1 351
aoqi@1 352 if (ProfileInterpreter) { // %%% Merge this into methodDataOop
aoqi@1 353 __ lw(T9, FSR, in_bytes(MethodCounters::interpreter_invocation_counter_offset()));
aoqi@1 354 __ incrementl(T9, 1);
aoqi@1 355 __ sw(T9, FSR, in_bytes(MethodCounters::interpreter_invocation_counter_offset()));
aoqi@1 356 }
aoqi@1 357 // Update standard invocation counters
aoqi@1 358 __ lw(T3, invocation_counter);
aoqi@1 359 __ increment(T3, InvocationCounter::count_increment);
aoqi@1 360 __ sw(T3, invocation_counter); // save invocation count
aoqi@1 361
aoqi@1 362 __ lw(FSR, backedge_counter); // load backedge counter
aoqi@1 363 __ li(AT, InvocationCounter::count_mask_value); // mask out the status bits
aoqi@1 364 __ andr(FSR, FSR, AT);
aoqi@1 365
aoqi@1 366 __ dadd(T3, T3, FSR); // add both counters
aoqi@1 367
aoqi@1 368 // profile_method is non-null only for interpreted method so
aoqi@1 369 // profile_method != NULL == !native_call
aoqi@1 370
aoqi@1 371 if (ProfileInterpreter && profile_method != NULL) {
aoqi@1 372 // Test to see if we should create a method data oop
aoqi@1 373 /*
aoqi@1 374 __ lui(AT, Assembler::split_high(
aoqi@1 375 int(&InvocationCounter::InterpreterProfileLimit)));
aoqi@1 376 __ ld(AT, AT, Assembler::split_low(
aoqi@1 377 int(&InvocationCounter::InterpreterProfileLimit)));
aoqi@1 378 */
aoqi@1 379 __ li(AT, (long)&InvocationCounter::InterpreterProfileLimit);
aoqi@1 380 __ lw(AT, AT, 0);
aoqi@1 381 __ slt(AT, T3, AT);
aoqi@1 382 __ bne_far(AT, R0, *profile_method_continue);
aoqi@1 383 __ delayed()->nop();
aoqi@1 384
aoqi@1 385 // if no method data exists, go to profile_method
aoqi@1 386 __ test_method_data_pointer(FSR, *profile_method);
aoqi@1 387 }
aoqi@1 388
aoqi@1 389 //__ lui(AT, Assembler::split_high(intptr_t(&InvocationCounter::InterpreterInvocationLimit)));
aoqi@1 390 //__ ld(AT, AT, Assembler::split_low(intptr_t(&InvocationCounter::InterpreterInvocationLimit)));
aoqi@1 391 __ li(AT, (long)&InvocationCounter::InterpreterInvocationLimit);
aoqi@1 392 __ lw(AT, AT, 0);
aoqi@1 393 __ slt(AT, T3, AT);
aoqi@1 394 __ beq_far(AT, R0, *overflow);
aoqi@1 395 __ delayed()->nop();
aoqi@1 396 __ bind(done);
aoqi@1 397 }
aoqi@1 398
aoqi@1 399 void InterpreterGenerator::generate_counter_overflow(Label* do_continue) {
aoqi@1 400
aoqi@1 401 // Asm interpreter on entry
aoqi@1 402 // S7 - locals
aoqi@1 403 // S0 - bcp
aoqi@1 404 // Rmethod - method
aoqi@1 405 // FP - interpreter frame
aoqi@1 406
aoqi@1 407 // On return (i.e. jump to entry_point)
aoqi@1 408 // Rmethod - method
aoqi@1 409 // RA - return address of interpreter caller
aoqi@1 410 // tos - the last parameter to Java method
aoqi@1 411 // SP - sender_sp
aoqi@1 412
aoqi@1 413 //const Address size_of_parameters(Rmethod,in_bytes( Method::size_of_parameters_offset()));
aoqi@1 414
aoqi@1 415 // the bcp is valid if and only if it's not null
aoqi@1 416 __ call_VM(NOREG, CAST_FROM_FN_PTR(address,
aoqi@1 417 InterpreterRuntime::frequency_counter_overflow), R0);
aoqi@1 418 __ ld(Rmethod, FP, method_offset);
aoqi@1 419 /*
aoqi@1 420 // method has been compiled - remove activation frame
aoqi@1 421 // (leave return address on stack) and continue at
aoqi@1 422 // verified entry point (eax). (eax in some past life maybe, seems to use methodoop these days)
aoqi@1 423 //
aoqi@1 424 // Note: continuation at verified entry point works if the method that has been
aoqi@1 425 // compiled is the right one (in case of virtual calls); i.e., the inline
aoqi@1 426 // cache check must have happened before the invocation counter overflow
aoqi@1 427 // check.
aoqi@1 428 __ lhu(V0, size_of_parameters);
aoqi@1 429 __ move(SP, FP);
aoqi@1 430 __ lw(FP, SP, frame::interpreter_frame_sender_fp_offset * wordSize);
aoqi@1 431 __ lw(RA, SP, frame::interpreter_frame_return_addr_offset * wordSize);
aoqi@1 432 __ sll(V0, V0, 2);
aoqi@1 433 __ addi(V0, V0, - 1 * wordSize);
aoqi@1 434 __ sub(SP, LVP, V0);
aoqi@1 435 // __ lw(T0, LVP, 0);
aoqi@1 436 */
aoqi@1 437 // Preserve invariant that esi/edi contain bcp/locals of sender frame
aoqi@1 438 __ b_far(*do_continue);
aoqi@1 439 __ delayed()->nop();
aoqi@1 440 }
aoqi@1 441
aoqi@1 442 // See if we've got enough room on the stack for locals plus overhead.
aoqi@1 443 // The expression stack grows down incrementally, so the normal guard
aoqi@1 444 // page mechanism will work for that.
aoqi@1 445 //
aoqi@1 446 // NOTE: Since the additional locals are also always pushed (wasn't
aoqi@1 447 // obvious in generate_method_entry) so the guard should work for them
aoqi@1 448 // too.
aoqi@1 449 //
aoqi@1 450 // Args:
aoqi@1 451 // rdx: number of additional locals this frame needs (what we must check)
aoqi@1 452 // rbx: Method*
aoqi@1 453 //
aoqi@1 454 // Kills:
aoqi@1 455 // rax
aoqi@1 456 void InterpreterGenerator::generate_stack_overflow_check(void) {
aoqi@1 457 // see if we've got enough room on the stack for locals plus overhead.
aoqi@1 458 // the expression stack grows down incrementally, so the normal guard
aoqi@1 459 // page mechanism will work for that.
aoqi@1 460 //
aoqi@1 461 // Registers live on entry:
aoqi@1 462 //
aoqi@1 463 // T0: Method*
aoqi@1 464 // T2: number of additional locals this frame needs (what we must check)
aoqi@1 465
aoqi@1 466 // NOTE: since the additional locals are also always pushed (wasn't obvious in
aoqi@1 467 // generate_method_entry) so the guard should work for them too.
aoqi@1 468 //
aoqi@1 469
aoqi@1 470 // monitor entry size: see picture of stack set (generate_method_entry) and frame_i486.hpp
aoqi@1 471 const int entry_size = frame::interpreter_frame_monitor_size() * wordSize;
aoqi@1 472
aoqi@1 473 // total overhead size: entry_size + (saved ebp thru expr stack bottom).
aoqi@1 474 // be sure to change this if you add/subtract anything to/from the overhead area
aoqi@1 475 const int overhead_size = -(frame::interpreter_frame_initial_sp_offset*wordSize)
aoqi@1 476 + entry_size;
aoqi@1 477
aoqi@1 478 const int page_size = os::vm_page_size();
aoqi@1 479
aoqi@1 480 Label after_frame_check;
aoqi@1 481
aoqi@1 482 // see if the frame is greater than one page in size. If so,
aoqi@1 483 // then we need to verify there is enough stack space remaining
aoqi@1 484 // for the additional locals.
aoqi@1 485 __ move(AT, (page_size - overhead_size) / Interpreter::stackElementSize);
aoqi@1 486 __ slt(AT, AT, T2);
aoqi@1 487 __ beq(AT, R0, after_frame_check);
aoqi@1 488 __ delayed()->nop();
aoqi@1 489
aoqi@1 490 // compute sp as if this were going to be the last frame on
aoqi@1 491 // the stack before the red zone
aoqi@1 492 #ifndef OPT_THREAD
aoqi@1 493 Register thread = T1;
aoqi@1 494 __ get_thread(thread);
aoqi@1 495 #else
aoqi@1 496 Register thread = TREG;
aoqi@1 497 #endif
aoqi@1 498
aoqi@1 499 // locals + overhead, in bytes
aoqi@1 500 //FIXME aoqi
aoqi@1 501 __ dsll(T3, T2, Interpreter::stackElementScale());
aoqi@1 502 //__ dsll(T9, T9, Address::times_8);
aoqi@1 503 __ daddiu(T3, T3, overhead_size); // locals * 4 + overhead_size --> T3
aoqi@1 504
aoqi@1 505 #ifdef ASSERT
aoqi@1 506 Label stack_base_okay, stack_size_okay;
aoqi@1 507 // verify that thread stack base is non-zero
aoqi@1 508 __ ld(AT, thread, in_bytes(Thread::stack_base_offset()));
aoqi@1 509 __ bne(AT, R0, stack_base_okay);
aoqi@1 510 __ delayed()->nop();
aoqi@1 511 __ stop("stack base is zero");
aoqi@1 512 __ bind(stack_base_okay);
aoqi@1 513 // verify that thread stack size is non-zero
aoqi@1 514 __ ld(AT, thread, in_bytes(Thread::stack_size_offset()));
aoqi@1 515 __ bne(AT, R0, stack_size_okay);
aoqi@1 516 __ delayed()->nop();
aoqi@1 517 __ stop("stack size is zero");
aoqi@1 518 __ bind(stack_size_okay);
aoqi@1 519 #endif
aoqi@1 520
aoqi@1 521 // Add stack base to locals and subtract stack size
aoqi@1 522 __ ld(AT, thread, in_bytes(Thread::stack_base_offset())); // stack_base --> AT
aoqi@1 523 __ dadd(T3, T3, AT); // locals * 4 + overhead_size + stack_base--> T3
aoqi@1 524 __ ld(AT, thread, in_bytes(Thread::stack_size_offset())); // stack_size --> AT
aoqi@1 525 __ dsub(T3, T3, AT); // locals * 4 + overhead_size + stack_base - stack_size --> T3
aoqi@1 526
aoqi@1 527
aoqi@1 528 // add in the redzone and yellow size
aoqi@1 529 __ move(AT, (StackRedPages+StackYellowPages) * page_size);
aoqi@1 530 __ add(T3, T3, AT);
aoqi@1 531
aoqi@1 532 // check against the current stack bottom
aoqi@1 533 __ slt(AT, T3, SP);
aoqi@1 534 __ bne(AT, R0, after_frame_check);
aoqi@1 535 __ delayed()->nop();
fujie@407 536
fujie@407 537 // Note: the restored frame is not necessarily interpreted.
fujie@407 538 // Use the shared runtime version of the StackOverflowError.
fujie@407 539 __ move(SP, Rsender);
fujie@407 540 assert(StubRoutines::throw_StackOverflowError_entry() != NULL, "stub not yet generated");
fujie@407 541 __ jmp(StubRoutines::throw_StackOverflowError_entry(), relocInfo::runtime_call_type);
aoqi@1 542 __ delayed()->nop();
aoqi@1 543
aoqi@1 544 // all done with frame size check
aoqi@1 545 __ bind(after_frame_check);
aoqi@1 546 }
aoqi@1 547
aoqi@1 548 // Allocate monitor and lock method (asm interpreter)
aoqi@1 549 // Rmethod - Method*
aoqi@1 550 void InterpreterGenerator::lock_method(void) {
aoqi@1 551 // synchronize method
aoqi@1 552 const int entry_size = frame::interpreter_frame_monitor_size() * wordSize;
aoqi@1 553
aoqi@1 554 #ifdef ASSERT
aoqi@1 555 { Label L;
aoqi@1 556 __ lw(T0, Rmethod, in_bytes(Method::access_flags_offset()));
aoqi@1 557 __ andi(T0, T0, JVM_ACC_SYNCHRONIZED);
aoqi@1 558 __ bne(T0, R0, L);
aoqi@1 559 __ delayed()->nop();
aoqi@1 560 __ stop("method doesn't need synchronization");
aoqi@1 561 __ bind(L);
aoqi@1 562 }
aoqi@1 563 #endif // ASSERT
aoqi@1 564 // get synchronization object
aoqi@1 565 { Label done;
aoqi@1 566 const int mirror_offset = in_bytes(Klass::java_mirror_offset());
aoqi@1 567 __ lw(T0, Rmethod, in_bytes(Method::access_flags_offset()));
aoqi@1 568 __ andi(T2, T0, JVM_ACC_STATIC);
aoqi@1 569 __ ld(T0, LVP, Interpreter::local_offset_in_bytes(0));
aoqi@1 570 __ beq(T2, R0, done);
aoqi@1 571 __ delayed()->nop();
aoqi@1 572 __ ld(T0, Rmethod, in_bytes(Method::const_offset()));
aoqi@1 573 __ ld(T0, T0, in_bytes(ConstMethod::constants_offset()));
aoqi@1 574 __ ld(T0, T0, ConstantPool::pool_holder_offset_in_bytes());
aoqi@1 575 __ ld(T0, T0, mirror_offset);
aoqi@1 576 __ bind(done);
aoqi@1 577 }
aoqi@1 578 // add space for monitor & lock
aoqi@1 579 __ daddi(SP, SP, (-1) * entry_size); // add space for a monitor entry
aoqi@1 580 __ sd(SP, FP, frame::interpreter_frame_monitor_block_top_offset * wordSize);
aoqi@1 581 // set new monitor block top
aoqi@1 582 __ sd(T0, SP, BasicObjectLock::obj_offset_in_bytes()); // store object
aoqi@1 583 // FIXME: I do not know what lock_object will do and what it will need
aoqi@1 584 __ move(c_rarg0, SP); // object address
aoqi@1 585 __ lock_object(c_rarg0);
aoqi@1 586 }
aoqi@1 587
aoqi@1 588 // Generate a fixed interpreter frame. This is identical setup for
aoqi@1 589 // interpreted methods and for native methods hence the shared code.
aoqi@1 590 void TemplateInterpreterGenerator::generate_fixed_frame(bool native_call) {
aoqi@1 591
aoqi@1 592 // [ local var m-1 ] <--- sp
aoqi@1 593 // ...
aoqi@1 594 // [ local var 0 ]
aoqi@1 595 // [ argumnet word n-1 ] <--- T0(sender's sp)
aoqi@1 596 // ...
aoqi@1 597 // [ argument word 0 ] <--- S7
aoqi@1 598
aoqi@1 599 // initialize fixed part of activation frame
aoqi@1 600 // sender's sp in Rsender
aoqi@1 601 int i = 0;
aoqi@1 602 __ sd(RA, SP, (-1) * wordSize); // save return address
aoqi@1 603 __ sd(FP, SP, (-2) * wordSize); // save sender's fp
aoqi@1 604 __ daddiu(FP, SP, (-2) * wordSize);
aoqi@1 605 __ sd(Rsender, FP, (-++i) * wordSize); // save sender's sp
aoqi@1 606 __ sd(R0, FP,(-++i)*wordSize); //save last_sp as null, FIXME aoqi
aoqi@1 607 __ sd(LVP, FP, (-++i) * wordSize); // save locals offset
aoqi@1 608 __ ld(BCP, Rmethod, in_bytes(Method::const_offset())); // get constMethodOop
aoqi@1 609 __ daddiu(BCP, BCP, in_bytes(ConstMethod::codes_offset())); // get codebase
aoqi@1 610 __ sd(Rmethod, FP, (-++i) * wordSize); // save Method*
aoqi@1 611 #ifndef CORE
aoqi@1 612 if (ProfileInterpreter) {
aoqi@1 613 Label method_data_continue;
aoqi@1 614 __ ld(AT, Rmethod, in_bytes(Method::method_data_offset()));
aoqi@1 615 __ beq(AT, R0, method_data_continue);
aoqi@1 616 __ delayed()->nop();
aoqi@1 617 __ daddi(AT, AT, in_bytes(MethodData::data_offset()));
aoqi@1 618 __ bind(method_data_continue);
aoqi@1 619 __ sd(AT, FP, (-++i) * wordSize);
aoqi@1 620 } else {
aoqi@1 621 __ sd(R0, FP, (-++i) * wordSize);
aoqi@1 622 }
aoqi@1 623 #endif // !CORE
aoqi@1 624
aoqi@1 625 __ ld(T2, Rmethod, in_bytes(Method::const_offset()));
aoqi@1 626 __ ld(T2, T2, in_bytes(ConstMethod::constants_offset()));
aoqi@1 627 __ ld(T2, T2, ConstantPool::cache_offset_in_bytes());
aoqi@1 628 __ sd(T2, FP, (-++i) * wordSize); // set constant pool cache
aoqi@1 629 if (native_call) {
aoqi@1 630 __ sd(R0, FP, (-++i) * wordSize); // no bcp
aoqi@1 631 } else {
aoqi@1 632 __ sd(BCP, FP, (-++i) * wordSize); // set bcp
aoqi@1 633 }
aoqi@1 634 __ daddiu(SP, FP, (-++i) * wordSize);
aoqi@1 635 __ sd(SP, FP, (-i) * wordSize); // reserve word for pointer to expression stack bottom
aoqi@1 636 }
aoqi@1 637
aoqi@1 638 // End of helpers
aoqi@1 639
aoqi@1 640 // Various method entries
aoqi@1 641 //------------------------------------------------------------------------------------------------------------------------
aoqi@1 642 //
aoqi@1 643 //
aoqi@1 644
aoqi@1 645 // Call an accessor method (assuming it is resolved, otherwise drop
aoqi@1 646 // into vanilla (slow path) entry
aoqi@1 647 address InterpreterGenerator::generate_accessor_entry(void) {
aoqi@1 648
aoqi@1 649 // Rmethod: Method*
aoqi@1 650 // V0: receiver (preserve for slow entry into asm interpreter)
aoqi@1 651 // Rsender: senderSP must preserved for slow path, set SP to it on fast path
aoqi@1 652
aoqi@1 653 address entry_point = __ pc();
aoqi@1 654 Label xreturn_path;
aoqi@1 655 // do fastpath for resolved accessor methods
aoqi@1 656 if (UseFastAccessorMethods) {
aoqi@1 657 Label slow_path;
aoqi@1 658 __ li(T2, SafepointSynchronize::address_of_state());
aoqi@1 659 __ lw(AT, T2, 0);
aoqi@1 660 __ daddi(AT, AT, -(SafepointSynchronize::_not_synchronized));
aoqi@1 661 __ bne(AT, R0, slow_path);
aoqi@1 662 __ delayed()->nop();
aoqi@1 663 // Code: _aload_0, _(i|a)getfield, _(i|a)return or any rewrites thereof;
aoqi@1 664 // parameter size = 1
aoqi@1 665 // Note: We can only use this code if the getfield has been resolved
aoqi@1 666 // and if we don't have a null-pointer exception => check for
aoqi@1 667 // these conditions first and use slow path if necessary.
aoqi@1 668 // Rmethod: method
aoqi@1 669 // V0: receiver
aoqi@1 670
aoqi@1 671 // [ receiver ] <-- sp
aoqi@1 672 __ ld(T0, SP, 0);
aoqi@1 673
aoqi@1 674 // check if local 0 != NULL and read field
aoqi@1 675 __ beq(T0, R0, slow_path);
aoqi@1 676 __ delayed()->nop();
aoqi@1 677 __ ld(T2, Rmethod, in_bytes(Method::const_offset()));
aoqi@1 678 // __ movptr(rdi, Address(rdx, ConstMethod::constants_offset()));
aoqi@1 679 __ ld(T2, T2, in_bytes(ConstMethod::constants_offset()));
aoqi@1 680 // read first instruction word and extract bytecode @ 1 and index @ 2
aoqi@1 681 __ ld(T3, Rmethod, in_bytes(Method::const_offset()));
aoqi@1 682 __ lw(T3, T3, in_bytes(ConstMethod::codes_offset()));
aoqi@1 683 // Shift codes right to get the index on the right.
aoqi@1 684 // The bytecode fetched looks like <index><0xb4><0x2a>
aoqi@1 685 __ dsrl(T3, T3, 2 * BitsPerByte);
aoqi@1 686 // FIXME: maybe it's wrong
aoqi@1 687 __ dsll(T3, T3, exact_log2(in_words(ConstantPoolCacheEntry::size())));
aoqi@1 688 __ ld(T2, T2, ConstantPool::cache_offset_in_bytes());
aoqi@1 689
aoqi@1 690 // T0: local 0 eax
aoqi@1 691 // Rmethod: method ebx
aoqi@1 692 // V0: receiver - do not destroy since it is needed for slow path! ecx
aoqi@1 693 // ecx: scratch use which register instead ?
aoqi@1 694 // T1: scratch use which register instead ?
aoqi@1 695 // T3: constant pool cache index edx
aoqi@1 696 // T2: constant pool cache edi
aoqi@1 697 // esi: send's sp
aoqi@1 698 // Rsender: send's sp
aoqi@1 699 // check if getfield has been resolved and read constant pool cache entry
aoqi@1 700 // check the validity of the cache entry by testing whether _indices field
aoqi@1 701 // contains Bytecode::_getfield in b1 byte.
aoqi@1 702 assert(in_words(ConstantPoolCacheEntry::size()) == 4, "adjust shift below");
aoqi@1 703 // __ movl(esi,
aoqi@1 704 // Address(edi,
aoqi@1 705 // edx,
aoqi@1 706 // Address::times_4, ConstantPoolCache::base_offset()
aoqi@1 707 // + ConstantPoolCacheEntry::indices_offset()));
aoqi@1 708
aoqi@1 709
aoqi@1 710 __ dsll(T8, T3, Address::times_8);
aoqi@1 711 __ move(T1, in_bytes(ConstantPoolCache::base_offset()
aoqi@1 712 + ConstantPoolCacheEntry::indices_offset()));
aoqi@1 713 __ dadd(T1, T8, T1);
aoqi@1 714 __ dadd(T1, T1, T2);
aoqi@1 715 __ lw(T1, T1, 0);
aoqi@1 716 __ dsrl(T1, T1, 2 * BitsPerByte);
aoqi@1 717 __ andi(T1, T1, 0xFF);
aoqi@1 718 __ daddi(T1, T1, (-1) * Bytecodes::_getfield);
aoqi@1 719 __ bne(T1, R0, slow_path);
aoqi@1 720 __ delayed()->nop();
aoqi@1 721
aoqi@1 722 // __ shrl(esi, 2*BitsPerByte);
aoqi@1 723 // __ andl(esi, 0xFF);
aoqi@1 724 // __ cmpl(esi, Bytecodes::_getfield);
aoqi@1 725 // __ jcc(Assembler::notEqual, slow_path);
aoqi@1 726
aoqi@1 727 // Note: constant pool entry is not valid before bytecode is resolved
aoqi@1 728
aoqi@1 729 // __ movl(esi,
aoqi@1 730 // Address(edi,
aoqi@1 731 // edx,
aoqi@1 732 // Address::times_4, ConstantPoolCache::base_offset()
aoqi@1 733 // + ConstantPoolCacheEntry::f2_offset()));
aoqi@1 734 __ move(T1, in_bytes(ConstantPoolCache::base_offset()
aoqi@1 735 + ConstantPoolCacheEntry::f2_offset()));
aoqi@1 736 __ dadd(T1, T1, T8);
aoqi@1 737 __ dadd(T1, T1, T2);
aoqi@1 738 __ lw(AT, T1, 0);
aoqi@1 739 // __ movl(edx,
aoqi@1 740 // Address(edi,
aoqi@1 741 // edx,
aoqi@1 742 // Address::times_4, ConstantPoolCache::base_offset()
aoqi@1 743 // + ConstantPoolCacheEntry::flags_offset()));
aoqi@1 744
aoqi@1 745
aoqi@1 746 __ move(T1, in_bytes(ConstantPoolCache::base_offset()
aoqi@1 747 + ConstantPoolCacheEntry::flags_offset()));
aoqi@1 748 __ dadd(T1, T1, T8);
aoqi@1 749 __ dadd(T1, T1, T2);
aoqi@1 750 __ lw(T3, T1, 0);
aoqi@1 751
aoqi@1 752 Label notByte, notShort, notChar, notObj;
aoqi@1 753 // const Address field_address (eax, esi, Address::times_1);
aoqi@1 754
aoqi@1 755 // Need to differentiate between igetfield, agetfield, bgetfield etc.
aoqi@1 756 // because they are different sizes.
aoqi@1 757 // Use the type from the constant pool cache
aoqi@1 758 __ dsrl(T3, T3, ConstantPoolCacheEntry::tos_state_shift);
aoqi@1 759 // Make sure we don't need to mask edx for tosBits after the above shift
aoqi@1 760 ConstantPoolCacheEntry::verify_tos_state_shift();
aoqi@1 761 // btos = 0
aoqi@1 762 __ bne(T3, R0, notByte);
aoqi@1 763 __ delayed()->dadd(T0, T0, AT);
aoqi@1 764
aoqi@1 765 __ lb(V0, T0, 0);
aoqi@1 766 __ b(xreturn_path);
aoqi@1 767 __ delayed()->nop();
aoqi@1 768
aoqi@1 769 //stos
aoqi@1 770 __ bind(notByte);
aoqi@1 771 __ daddi(T1, T3, (-1) * stos);
aoqi@1 772 __ bne(T1, R0, notShort);
aoqi@1 773 __ delayed()->nop();
aoqi@1 774 __ lh(V0, T0, 0);
aoqi@1 775 __ b(xreturn_path);
aoqi@1 776 __ delayed()->nop();
aoqi@1 777
aoqi@1 778 //ctos
aoqi@1 779 __ bind(notShort);
aoqi@1 780 __ daddi(T1, T3, (-1) * ctos);
aoqi@1 781 __ bne(T1, R0, notChar);
aoqi@1 782 __ delayed()->nop();
aoqi@1 783 __ lhu(V0, T0, 0);
aoqi@1 784 __ b(xreturn_path);
aoqi@1 785 __ delayed()->nop();
aoqi@1 786
aoqi@1 787 //atos
aoqi@1 788 __ bind(notChar);
aoqi@1 789 __ daddi(T1, T3, (-1) * atos);
aoqi@1 790 __ bne(T1, R0, notObj);
aoqi@1 791 __ delayed()->nop();
aoqi@1 792 //add for compressedoops
aoqi@1 793 __ load_heap_oop(V0, Address(T0, 0));
aoqi@1 794 __ b(xreturn_path);
aoqi@1 795 __ delayed()->nop();
aoqi@1 796
aoqi@1 797 //itos
aoqi@1 798 __ bind(notObj);
aoqi@1 799 #ifdef ASSERT
aoqi@1 800 Label okay;
aoqi@1 801 __ daddi(T1, T3, (-1) * itos);
aoqi@1 802 __ beq(T1, R0, okay);
aoqi@1 803 __ delayed()->nop();
aoqi@1 804 __ stop("what type is this?");
aoqi@1 805 __ bind(okay);
aoqi@1 806 #endif // ASSERT
aoqi@1 807 __ lw(V0, T0, 0);
aoqi@1 808
aoqi@1 809 __ bind(xreturn_path);
aoqi@1 810
aoqi@1 811 // _ireturn/_areturn
aoqi@1 812 //FIXME
aoqi@1 813 __ move(SP, Rsender);//FIXME, set sender's fp to SP
aoqi@1 814 __ jr(RA);
aoqi@1 815 __ delayed()->nop();
aoqi@1 816
aoqi@1 817 // generate a vanilla interpreter entry as the slow path
aoqi@1 818 __ bind(slow_path);
aoqi@1 819 (void) generate_normal_entry(false);
aoqi@1 820 } else {
aoqi@1 821 (void) generate_normal_entry(false);
aoqi@1 822 }
aoqi@1 823
aoqi@1 824 return entry_point;
aoqi@1 825 }
aoqi@1 826
aoqi@1 827 // Method entry for java.lang.ref.Reference.get.
aoqi@1 828 address InterpreterGenerator::generate_Reference_get_entry(void) {
aoqi@1 829 #ifndef SERIALGC
aoqi@1 830 // Code: _aload_0, _getfield, _areturn
aoqi@1 831 // parameter size = 1
aoqi@1 832 //
aoqi@1 833 // The code that gets generated by this routine is split into 2 parts:
aoqi@1 834 // 1. The "intrinsified" code for G1 (or any SATB based GC),
aoqi@1 835 // 2. The slow path - which is an expansion of the regular method entry.
aoqi@1 836 //
aoqi@1 837 // Notes:-
aoqi@1 838 // * In the G1 code we do not check whether we need to block for
aoqi@1 839 // a safepoint. If G1 is enabled then we must execute the specialized
aoqi@1 840 // code for Reference.get (except when the Reference object is null)
aoqi@1 841 // so that we can log the value in the referent field with an SATB
aoqi@1 842 // update buffer.
aoqi@1 843 // If the code for the getfield template is modified so that the
aoqi@1 844 // G1 pre-barrier code is executed when the current method is
aoqi@1 845 // Reference.get() then going through the normal method entry
aoqi@1 846 // will be fine.
aoqi@1 847 // * The G1 code can, however, check the receiver object (the instance
aoqi@1 848 // of java.lang.Reference) and jump to the slow path if null. If the
aoqi@1 849 // Reference object is null then we obviously cannot fetch the referent
aoqi@1 850 // and so we don't need to call the G1 pre-barrier. Thus we can use the
aoqi@1 851 // regular method entry code to generate the NPE.
aoqi@1 852 //
aoqi@1 853 // This code is based on generate_accessor_enty.
aoqi@1 854 //
aoqi@1 855 // rbx: Method*
aoqi@1 856
aoqi@1 857 // r13: senderSP must preserve for slow path, set SP to it on fast path
aoqi@1 858
aoqi@1 859 address entry = __ pc();
aoqi@1 860
aoqi@1 861 const int referent_offset = java_lang_ref_Reference::referent_offset;
aoqi@1 862 guarantee(referent_offset > 0, "referent offset not initialized");
aoqi@1 863
aoqi@1 864 if (UseG1GC) {
aoqi@1 865 Label slow_path;
aoqi@1 866 // rbx: method
aoqi@1 867
aoqi@1 868 // Check if local 0 != NULL
aoqi@1 869 // If the receiver is null then it is OK to jump to the slow path.
aoqi@1 870 /* __ movptr(rax, Address(rsp, wordSize));
aoqi@1 871
aoqi@1 872 __ testptr(rax, rax);
aoqi@1 873 __ jcc(Assembler::zero, slow_path);*/
aoqi@1 874
aoqi@1 875 // rax: local 0
aoqi@1 876 // rbx: method (but can be used as scratch now)
aoqi@1 877 // rdx: scratch
aoqi@1 878 // rdi: scratch
aoqi@1 879
aoqi@1 880 // Generate the G1 pre-barrier code to log the value of
aoqi@1 881 // the referent field in an SATB buffer.
aoqi@1 882
aoqi@1 883 // Load the value of the referent field.
aoqi@1 884 //const Address field_address(rax, referent_offset);
aoqi@1 885 // __ load_heap_oop(rax, field_address);
aoqi@1 886
aoqi@1 887 // Generate the G1 pre-barrier code to log the value of
aoqi@1 888 // the referent field in an SATB buffer.
aoqi@1 889 // __ g1_write_barrier_pre(noreg /* obj */,
aoqi@1 890 // rax /* pre_val */,
aoqi@1 891 // r15_thread /* thread */,
aoqi@1 892 // rbx /* tmp */,
aoqi@1 893 // true /* tosca_live */,
aoqi@1 894 // true /* expand_call */);
aoqi@1 895
aoqi@1 896 // _areturn
aoqi@1 897 /* __ pop(rdi); // get return address
aoqi@1 898 __ mov(rsp, r13); // set sp to sender sp
aoqi@1 899 __ jmp(rdi);
aoqi@1 900 __ ret(0);
aoqi@1 901
aoqi@1 902 // generate a vanilla interpreter entry as the slow path
aoqi@1 903 __ bind(slow_path);
aoqi@1 904 (void) generate_normal_entry(false);
aoqi@1 905 */
aoqi@1 906 return entry;
aoqi@1 907 }
aoqi@1 908 #endif // SERIALGC
aoqi@1 909
aoqi@1 910 // If G1 is not enabled then attempt to go through the accessor entry point
aoqi@1 911 // Reference.get is an accessor
aoqi@1 912 return generate_accessor_entry();
aoqi@1 913 }
aoqi@1 914 // Interpreter stub for calling a native method. (asm interpreter)
aoqi@1 915 // This sets up a somewhat different looking stack for calling the
aoqi@1 916 // native method than the typical interpreter frame setup.
aoqi@1 917 address InterpreterGenerator::generate_native_entry(bool synchronized) {
aoqi@1 918 // determine code generation flags
aoqi@1 919 bool inc_counter = UseCompiler || CountCompiledCalls;
aoqi@1 920 // Rsender: sender's sp
aoqi@1 921 // Rmethod: Method*
aoqi@1 922 address entry_point = __ pc();
aoqi@1 923
aoqi@1 924 #ifndef CORE
aoqi@1 925 const Address invocation_counter(Rmethod,in_bytes(MethodCounters::invocation_counter_offset() + // Fu: 20130814
aoqi@1 926 InvocationCounter::counter_offset()));
aoqi@1 927 #endif
aoqi@1 928
aoqi@1 929 // get parameter size (always needed)
aoqi@1 930 // the size in the java stack
aoqi@1 931 //__ lhu(V0, Rmethod, in_bytes(Method::size_of_parameters_offset()));
aoqi@1 932 __ ld(V0, Rmethod, in_bytes(Method::const_offset()));
aoqi@1 933 __ lhu(V0, V0, in_bytes(ConstMethod::size_of_parameters_offset())); // Fu: 20130814
aoqi@1 934
aoqi@1 935 // native calls don't need the stack size check since they have no expression stack
aoqi@1 936 // and the arguments are already on the stack and we only add a handful of words
aoqi@1 937 // to the stack
aoqi@1 938
aoqi@1 939 // Rmethod: Method*
aoqi@1 940 // V0: size of parameters
aoqi@1 941 // Layout of frame at this point
aoqi@1 942 //
aoqi@1 943 // [ argument word n-1 ] <--- sp
aoqi@1 944 // ...
aoqi@1 945 // [ argument word 0 ]
aoqi@1 946
aoqi@1 947 // for natives the size of locals is zero
aoqi@1 948
aoqi@1 949 // compute beginning of parameters (S7)
aoqi@1 950 __ dsll(LVP, V0, Address::times_8);
aoqi@1 951 __ daddiu(LVP, LVP, (-1) * wordSize);
aoqi@1 952 __ dadd(LVP, LVP, SP);
aoqi@1 953
aoqi@1 954 //__ move(T0, SP); // remember sender sp for generate_fixed_frame
aoqi@1 955
aoqi@1 956
aoqi@1 957 // add 2 zero-initialized slots for native calls
aoqi@1 958 __ daddi(SP, SP, (-2) * wordSize);
aoqi@1 959 __ sd(R0, SP, 1 * wordSize); // slot for native oop temp offset (setup via runtime)
aoqi@1 960 __ sd(R0, SP, 0 * wordSize); // slot for static native result handler3 (setup via runtime)
aoqi@1 961
aoqi@1 962 // Layout of frame at this point
aoqi@1 963 // [ method holder mirror ] <--- sp
aoqi@1 964 // [ result type info ]
aoqi@1 965 // [ argument word n-1 ] <--- T0
aoqi@1 966 // ...
aoqi@1 967 // [ argument word 0 ] <--- LVP
aoqi@1 968
aoqi@1 969
aoqi@1 970 #ifndef CORE
aoqi@1 971 if (inc_counter) __ lw(T3, invocation_counter); // (pre-)fetch invocation count
aoqi@1 972 #endif
aoqi@1 973
aoqi@1 974 // initialize fixed part of activation frame
aoqi@1 975 generate_fixed_frame(true);
aoqi@1 976 // after this function, the layout of frame is as following
aoqi@1 977 //
aoqi@1 978 // [ monitor block top ] <--- sp ( the top monitor entry )
aoqi@1 979 // [ byte code pointer (0) ] (if native, bcp = 0)
aoqi@1 980 // [ constant pool cache ]
aoqi@1 981 // [ Method* ]
aoqi@1 982 // [ locals offset ]
aoqi@1 983 // [ sender's sp ]
aoqi@1 984 // [ sender's fp ]
aoqi@1 985 // [ return address ] <--- fp
aoqi@1 986 // [ method holder mirror ]
aoqi@1 987 // [ result type info ]
aoqi@1 988 // [ argumnet word n-1 ] <--- sender's sp
aoqi@1 989 // ...
aoqi@1 990 // [ argument word 0 ] <--- S7
aoqi@1 991
aoqi@1 992
aoqi@1 993 // make sure method is native & not abstract
aoqi@1 994 #ifdef ASSERT
aoqi@1 995 __ lw(T0, Rmethod, in_bytes(Method::access_flags_offset()));
aoqi@1 996 {
aoqi@1 997 Label L;
aoqi@1 998 __ andi(AT, T0, JVM_ACC_NATIVE);
aoqi@1 999 __ bne(AT, R0, L);
aoqi@1 1000 __ delayed()->nop();
aoqi@1 1001 __ stop("tried to execute native method as non-native");
aoqi@1 1002 __ bind(L);
aoqi@1 1003 }
aoqi@1 1004 { Label L;
aoqi@1 1005 __ andi(AT, T0, JVM_ACC_ABSTRACT);
aoqi@1 1006 __ beq(AT, R0, L);
aoqi@1 1007 __ delayed()->nop();
aoqi@1 1008 __ stop("tried to execute abstract method in interpreter");
aoqi@1 1009 __ bind(L);
aoqi@1 1010 }
aoqi@1 1011 #endif
aoqi@1 1012
aoqi@1 1013 // Since at this point in the method invocation the exception handler
aoqi@1 1014 // would try to exit the monitor of synchronized methods which hasn't
aoqi@1 1015 // been entered yet, we set the thread local variable
aoqi@1 1016 // _do_not_unlock_if_synchronized to true. The remove_activation will
aoqi@1 1017 // check this flag.
aoqi@1 1018 Register thread = TREG;
aoqi@1 1019 #ifndef OPT_THREAD
aoqi@1 1020 __ get_thread(thread);
aoqi@1 1021 #endif
aoqi@1 1022 __ move(AT, (int)true);
aoqi@1 1023 __ sb(AT, thread, in_bytes(JavaThread::do_not_unlock_if_synchronized_offset()));
aoqi@1 1024
aoqi@1 1025 #ifndef CORE
aoqi@1 1026 // increment invocation count & check for overflow
aoqi@1 1027 Label invocation_counter_overflow;
aoqi@1 1028 if (inc_counter) {
aoqi@1 1029 generate_counter_incr(&invocation_counter_overflow, NULL, NULL);
aoqi@1 1030 }
aoqi@1 1031 Label continue_after_compile;
aoqi@1 1032 __ bind(continue_after_compile);
aoqi@1 1033 #endif // CORE
aoqi@1 1034
aoqi@1 1035 bang_stack_shadow_pages(true);
aoqi@1 1036
aoqi@1 1037 // reset the _do_not_unlock_if_synchronized flag
aoqi@1 1038 #ifndef OPT_THREAD
aoqi@1 1039 __ get_thread(thread);
aoqi@1 1040 #endif
aoqi@1 1041 __ sb(R0, thread, in_bytes(JavaThread::do_not_unlock_if_synchronized_offset()));
aoqi@1 1042
aoqi@1 1043 // check for synchronized methods
aoqi@1 1044 // Must happen AFTER invocation_counter check and stack overflow check,
aoqi@1 1045 // so method is not locked if overflows.
aoqi@1 1046 if (synchronized) {
aoqi@1 1047 lock_method();
aoqi@1 1048 } else {
aoqi@1 1049 // no synchronization necessary
aoqi@1 1050 #ifdef ASSERT
aoqi@1 1051 {
aoqi@1 1052 Label L;
aoqi@1 1053 __ lw(T0, Rmethod, in_bytes(Method::access_flags_offset()));
aoqi@1 1054 __ andi(AT, T0, JVM_ACC_SYNCHRONIZED);
aoqi@1 1055 __ beq(AT, R0, L);
aoqi@1 1056 __ delayed()->nop();
aoqi@1 1057 __ stop("method needs synchronization");
aoqi@1 1058 __ bind(L);
aoqi@1 1059 }
aoqi@1 1060 #endif
aoqi@1 1061 }
aoqi@1 1062
aoqi@1 1063 // after method_lock, the layout of frame is as following
aoqi@1 1064 //
aoqi@1 1065 // [ monitor entry ] <--- sp
aoqi@1 1066 // ...
aoqi@1 1067 // [ monitor entry ]
aoqi@1 1068 // [ monitor block top ] ( the top monitor entry )
aoqi@1 1069 // [ byte code pointer (0) ] (if native, bcp = 0)
aoqi@1 1070 // [ constant pool cache ]
aoqi@1 1071 // [ Method* ]
aoqi@1 1072 // [ locals offset ]
aoqi@1 1073 // [ sender's sp ]
aoqi@1 1074 // [ sender's fp ]
aoqi@1 1075 // [ return address ] <--- fp
aoqi@1 1076 // [ method holder mirror ]
aoqi@1 1077 // [ result type info ]
aoqi@1 1078 // [ argumnet word n-1 ] <--- ( sender's sp )
aoqi@1 1079 // ...
aoqi@1 1080 // [ argument word 0 ] <--- S7
aoqi@1 1081
aoqi@1 1082 // start execution
aoqi@1 1083 #ifdef ASSERT
aoqi@1 1084 { Label L;
aoqi@1 1085 __ ld(AT, FP, frame::interpreter_frame_monitor_block_top_offset * wordSize);
aoqi@1 1086 __ beq(AT, SP, L);
aoqi@1 1087 __ delayed()->nop();
aoqi@1 1088 __ stop("broken stack frame setup in interpreter in asm");
aoqi@1 1089 __ bind(L);
aoqi@1 1090 }
aoqi@1 1091 #endif
aoqi@1 1092
aoqi@1 1093 // jvmti/jvmpi support
aoqi@1 1094 __ notify_method_entry();
aoqi@1 1095
aoqi@1 1096 // work registers
aoqi@1 1097 const Register method = Rmethod;
aoqi@1 1098 //const Register thread = T2;
aoqi@1 1099 const Register t = RT4;
aoqi@1 1100
aoqi@1 1101 __ get_method(method);
aoqi@1 1102 __ verify_oop(method);
aoqi@1 1103 { Label L, Lstatic;
aoqi@1 1104 __ ld(t,method,in_bytes(Method::const_offset()));
aoqi@1 1105 __ lhu(t, t, in_bytes(ConstMethod::size_of_parameters_offset())); // Fu: 20130814
aoqi@1 1106 {//aoqi_test
aoqi@1 1107 Label L;
aoqi@1 1108 __ daddi(AT, t, -8);
aoqi@1 1109 __ blez(AT, L);
aoqi@1 1110 __ delayed()->nop();
aoqi@1 1111 __ bind(L);
aoqi@1 1112 }
aoqi@1 1113 // MIPS n64 ABI: caller does not reserve space for the register auguments.
aoqi@1 1114 //FIXME, aoqi: A1?
aoqi@1 1115 // A0 and A1(if needed)
aoqi@1 1116 __ lw(AT, Rmethod, in_bytes(Method::access_flags_offset()));
aoqi@1 1117 __ andi(AT, AT, JVM_ACC_STATIC);
aoqi@1 1118 __ beq(AT, R0, Lstatic);
aoqi@1 1119 __ delayed()->nop();
aoqi@1 1120 __ daddiu(t, t, 1);
aoqi@1 1121 __ bind(Lstatic);
aoqi@1 1122 __ daddiu(t, t, -7);
aoqi@1 1123 __ blez(t, L);
aoqi@1 1124 __ delayed()->nop();
aoqi@1 1125 __ dsll(t, t, Address::times_8);
aoqi@1 1126 __ dsub(SP, SP, t);
aoqi@1 1127 __ bind(L);
aoqi@1 1128 }
aoqi@1 1129 __ move(AT, -(StackAlignmentInBytes));
aoqi@1 1130 __ andr(SP, SP, AT);
aoqi@1 1131 __ move(AT, SP);
aoqi@1 1132 // [ ] <--- sp
aoqi@1 1133 // ... (size of parameters - 8 )
aoqi@1 1134 // [ monitor entry ]
aoqi@1 1135 // ...
aoqi@1 1136 // [ monitor entry ]
aoqi@1 1137 // [ monitor block top ] ( the top monitor entry )
aoqi@1 1138 // [ byte code pointer (0) ] (if native, bcp = 0)
aoqi@1 1139 // [ constant pool cache ]
aoqi@1 1140 // [ Method* ]
aoqi@1 1141 // [ locals offset ]
aoqi@1 1142 // [ sender's sp ]
aoqi@1 1143 // [ sender's fp ]
aoqi@1 1144 // [ return address ] <--- fp
aoqi@1 1145 // [ method holder mirror ]
aoqi@1 1146 // [ result type info ]
aoqi@1 1147 // [ argumnet word n-1 ] <--- ( sender's sp )
aoqi@1 1148 // ...
aoqi@1 1149 // [ argument word 0 ] <--- LVP
aoqi@1 1150
aoqi@1 1151 // get signature handler
aoqi@1 1152 {
aoqi@1 1153 Label L;
aoqi@1 1154 __ ld(T9, method, in_bytes(Method::signature_handler_offset()));
aoqi@1 1155 __ bne(T9, R0, L);
aoqi@1 1156 __ delayed()->nop();
aoqi@1 1157 __ call_VM(NOREG, CAST_FROM_FN_PTR(address,
aoqi@1 1158 InterpreterRuntime::prepare_native_call), method);
aoqi@1 1159 __ get_method(method);
aoqi@1 1160 __ ld(T9, method, in_bytes(Method::signature_handler_offset()));
aoqi@1 1161 __ bind(L);
aoqi@1 1162 }
aoqi@1 1163
aoqi@1 1164 // call signature handler
aoqi@1 1165 // FIXME: when change codes in InterpreterRuntime, note this point
aoqi@1 1166 // from: begin of parameters
aoqi@1 1167 assert(InterpreterRuntime::SignatureHandlerGenerator::from() == LVP, "adjust this code");
aoqi@1 1168 // to: current sp
aoqi@1 1169 assert(InterpreterRuntime::SignatureHandlerGenerator::to () == SP, "adjust this code");
aoqi@1 1170 // temp: T3
aoqi@1 1171 assert(InterpreterRuntime::SignatureHandlerGenerator::temp() == t , "adjust this code");
aoqi@1 1172
aoqi@1 1173 __ jalr(T9);
aoqi@1 1174 __ delayed()->nop();
aoqi@1 1175 __ get_method(method); // slow path call blows EBX on DevStudio 5.0
aoqi@1 1176
aoqi@1 1177 /*
aoqi@1 1178 if native function is static, and its second parameter has type length of double word,
aoqi@1 1179 and first parameter has type length of word, we have to reserve one word
aoqi@1 1180 for the first parameter, according to mips o32 abi.
aoqi@1 1181 if native function is not static, and its third parameter has type length of double word,
aoqi@1 1182 and second parameter has type length of word, we have to reserve one word for the second
aoqi@1 1183 parameter.
aoqi@1 1184 */
aoqi@1 1185
aoqi@1 1186
aoqi@1 1187 // result handler is in V0
aoqi@1 1188 // set result handler
aoqi@1 1189 __ sd(V0, FP, (frame::interpreter_frame_result_handler_offset)*wordSize);
aoqi@1 1190
aoqi@1 1191 #define FIRSTPARA_SHIFT_COUNT 5
aoqi@1 1192 #define SECONDPARA_SHIFT_COUNT 9
aoqi@1 1193 #define THIRDPARA_SHIFT_COUNT 13
aoqi@1 1194 #define PARA_MASK 0xf
aoqi@1 1195
aoqi@1 1196 // pass mirror handle if static call
aoqi@1 1197 {
aoqi@1 1198 Label L;
aoqi@1 1199 const int mirror_offset = in_bytes(Klass::java_mirror_offset());
aoqi@1 1200 __ lw(t, method, in_bytes(Method::access_flags_offset()));
aoqi@1 1201 __ andi(AT, t, JVM_ACC_STATIC);
aoqi@1 1202 __ beq(AT, R0, L);
aoqi@1 1203 __ delayed()->nop();
aoqi@1 1204
aoqi@1 1205 // get mirror
aoqi@1 1206 __ ld(t, method, in_bytes(Method:: const_offset()));
aoqi@1 1207 __ ld(t, t, in_bytes(ConstMethod::constants_offset())); //??
aoqi@1 1208 __ ld(t, t, ConstantPool::pool_holder_offset_in_bytes());
aoqi@1 1209 __ ld(t, t, mirror_offset);
aoqi@1 1210 // copy mirror into activation frame
aoqi@1 1211 //__ sw(t, FP, frame::interpreter_frame_oop_temp_offset * wordSize);
aoqi@1 1212 // pass handle to mirror
aoqi@1 1213 __ sd(t, FP, frame::interpreter_frame_oop_temp_offset * wordSize);
aoqi@1 1214 __ daddi(t, FP, frame::interpreter_frame_oop_temp_offset * wordSize);
aoqi@1 1215 // __ ld_ptr(t,Address(SP ,wordSize));
aoqi@1 1216 //FIXME, aoqi
aoqi@1 1217 //__ st_ptr(t, Address(SP, wordSize));
aoqi@1 1218 __ move(A1, t);
aoqi@1 1219 __ bind(L);
aoqi@1 1220 }
aoqi@1 1221
aoqi@1 1222 // [ mthd holder mirror ptr ] <--- sp --------------------| (only for static method)
aoqi@1 1223 // [ ] |
aoqi@1 1224 // ... size of parameters(or +1) |
aoqi@1 1225 // [ monitor entry ] |
aoqi@1 1226 // ... |
aoqi@1 1227 // [ monitor entry ] |
aoqi@1 1228 // [ monitor block top ] ( the top monitor entry ) |
aoqi@1 1229 // [ byte code pointer (0) ] (if native, bcp = 0) |
aoqi@1 1230 // [ constant pool cache ] |
aoqi@1 1231 // [ Method* ] |
aoqi@1 1232 // [ locals offset ] |
aoqi@1 1233 // [ sender's sp ] |
aoqi@1 1234 // [ sender's fp ] |
aoqi@1 1235 // [ return address ] <--- fp |
aoqi@1 1236 // [ method holder mirror ] <----------------------------|
aoqi@1 1237 // [ result type info ]
aoqi@1 1238 // [ argumnet word n-1 ] <--- ( sender's sp )
aoqi@1 1239 // ...
aoqi@1 1240 // [ argument word 0 ] <--- S7
aoqi@1 1241
aoqi@1 1242 // get native function entry point
aoqi@1 1243 { Label L;
aoqi@1 1244 __ ld(T9, method, in_bytes(Method::native_function_offset()));
aoqi@1 1245 __ li(V1, SharedRuntime::native_method_throw_unsatisfied_link_error_entry());
aoqi@1 1246 __ bne(V1, T9, L);
aoqi@1 1247 __ delayed()->nop();
aoqi@1 1248 __ call_VM(noreg, CAST_FROM_FN_PTR(address, InterpreterRuntime::prepare_native_call), method);
aoqi@1 1249 __ get_method(method);
aoqi@1 1250 __ verify_oop(method);
aoqi@1 1251 __ ld(T9, method, in_bytes(Method::native_function_offset()));
aoqi@1 1252 __ bind(L);
aoqi@1 1253 }
aoqi@1 1254 /*
aoqi@1 1255 __ pushad();
aoqi@1 1256 __ move(A0, T9);
aoqi@1 1257 __ call(CAST_FROM_FN_PTR(address, SharedRuntime::func_debug),relocInfo::runtime_call_type);
aoqi@1 1258 __ popad();
aoqi@1 1259 */
aoqi@1 1260
aoqi@1 1261 // pass JNIEnv
aoqi@1 1262 // native function in T9
aoqi@1 1263 #ifndef OPT_THREAD
aoqi@1 1264 __ get_thread(thread);
aoqi@1 1265 #endif
aoqi@1 1266 __ daddi(t, thread, in_bytes(JavaThread::jni_environment_offset()));
aoqi@1 1267 //__ addi(SP, SP, (-1) * wordSize);
aoqi@1 1268 //__ sw(t, SP, 0);
aoqi@1 1269 // stack,but I think it won't work when pass float,double etc @jerome,10/17,2006
aoqi@1 1270 __ move(A0, t);
aoqi@1 1271 // [ jni environment ] <--- sp
aoqi@1 1272 // [ mthd holder mirror ptr ] ---------------------------->| (only for static method)
aoqi@1 1273 // [ ] |
aoqi@1 1274 // ... size of parameters |
aoqi@1 1275 // [ monitor entry ] |
aoqi@1 1276 // ... |
aoqi@1 1277 // [ monitor entry ] |
aoqi@1 1278 // [ monitor block top ] ( the top monitor entry ) |
aoqi@1 1279 // [ byte code pointer (0) ] (if native, bcp = 0) |
aoqi@1 1280 // [ constant pool cache ] |
aoqi@1 1281 // [ Method* ] |
aoqi@1 1282 // [ locals offset ] |
aoqi@1 1283 // [ sender's sp ] |
aoqi@1 1284 // [ sender's fp ] |
aoqi@1 1285 // [ return address ] <--- fp |
aoqi@1 1286 // [ method holder mirror ] <----------------------------|
aoqi@1 1287 // [ result type info ]
aoqi@1 1288 // [ argumnet word n-1 ] <--- ( sender's sp )
aoqi@1 1289 // ...
aoqi@1 1290 // [ argument word 0 ] <--- S7
aoqi@1 1291
aoqi@1 1292 /*
aoqi@1 1293 // reset handle block
aoqi@1 1294 __ lw(t, thread, in_bytes(JavaThread::active_handles_offset()));
aoqi@1 1295 __ sw(R0, t, JNIHandleBlock::top_offset_in_bytes());
aoqi@1 1296
aoqi@1 1297 */
aoqi@1 1298 // set_last_Java_frame_before_call
aoqi@1 1299 __ sd(FP, thread, in_bytes(JavaThread::last_Java_fp_offset()));
aoqi@1 1300 // Change state to native (we save the return address in the thread, since it might not
aoqi@1 1301 // be pushed on the stack when we do a a stack traversal). It is enough that the pc()
aoqi@1 1302 // points into the right code segment. It does not have to be the correct return pc.
aoqi@1 1303 __ li(t, __ pc());
aoqi@1 1304 // __ sw(t, thread, in_bytes(JavaThread::frame_anchor_offset()
aoqi@1 1305 // + JavaFrameAnchor::last_Java_pc_offset()));
aoqi@1 1306 __ sd(t, thread, in_bytes(JavaThread::last_Java_pc_offset()));
aoqi@1 1307 __ sd(SP, thread, in_bytes(JavaThread::last_Java_sp_offset()));
aoqi@1 1308
aoqi@1 1309 // change thread state
aoqi@1 1310 #ifdef ASSERT
aoqi@1 1311 { Label L;
aoqi@1 1312 __ lw(t, thread, in_bytes(JavaThread::thread_state_offset()));
aoqi@1 1313 __ daddi(t, t, (-1) * _thread_in_Java);
aoqi@1 1314 __ beq(t, R0, L);
aoqi@1 1315 __ delayed()->nop();
aoqi@1 1316 __ stop("Wrong thread state in native stub");
aoqi@1 1317 __ bind(L);
aoqi@1 1318 }
aoqi@1 1319 #endif
aoqi@1 1320
aoqi@1 1321 __ move(t, _thread_in_native);
aoqi@1 1322 __ sw(t, thread, in_bytes(JavaThread::thread_state_offset()));
aoqi@1 1323
aoqi@1 1324 // call native method
aoqi@1 1325 __ jalr(T9);
aoqi@1 1326 __ delayed()->nop();
aoqi@1 1327 // result potentially in V2:V1 or F0:F1
aoqi@1 1328
aoqi@1 1329
aoqi@1 1330 if (CheckJNICalls) {
aoqi@1 1331 //FIXME
aoqi@1 1332 // __ call(StubRoutines::gs2::verify_fpu_cntrl_wrd_entry(),
aoqi@1 1333 // relocInfo::runtime_call_type);
aoqi@1 1334 }
aoqi@1 1335
aoqi@1 1336 // restore S0 to have legal interpreter frame, i.e., bci == 0 <=> S0 == code_base()
aoqi@1 1337 //__ lw(BCP, method, in_bytes(Method::const_offset())); // get constMethodOop
aoqi@1 1338 //__ addi(BCP, BCP, in_bytes(ConstMethod::codes_offset())); // get codebase
aoqi@1 1339
aoqi@1 1340 // via _last_native_pc and not via _last_jave_sp
aoqi@1 1341 // NOTE: the order of theses push(es) is known to frame::interpreter_frame_result.
aoqi@1 1342 // If the order changes or anything else is added to the stack the code in
aoqi@1 1343 // interpreter_frame_result will have to be changed.
aoqi@1 1344 //FIXME, should modify here
aoqi@1 1345 // save return value to keep the value from being destroyed by other calls
aoqi@1 1346 //__ addi(SP, SP, (-4) * wordSize);
aoqi@1 1347 //__ sw(V0, SP, 3 * wordSize);
aoqi@1 1348 //__ sw(V1, SP, 2 * wordSize);
aoqi@1 1349 //__ swc1(F0, SP, 1 * wordSize);
aoqi@1 1350 //__ swc1(F1, SP, 0 * wordSize);
aoqi@1 1351 __ move(S1, V0);
aoqi@1 1352 __ move(S3, V1);
aoqi@1 1353 __ dmfc1(S4, F0);
aoqi@1 1354 __ dmfc1(S2, F1);
aoqi@1 1355
aoqi@1 1356 // change thread state
aoqi@1 1357 __ get_thread(thread);
aoqi@1 1358 __ move(t, _thread_in_native_trans);
aoqi@1 1359 __ sw(t, thread, in_bytes(JavaThread::thread_state_offset()));
aoqi@1 1360
aoqi@1 1361 if( os::is_MP() ) __ sync(); // Force this write out before the read below
aoqi@1 1362
aoqi@1 1363 // check for safepoint operation in progress and/or pending suspend requests
aoqi@1 1364 { Label Continue;
aoqi@1 1365
aoqi@1 1366 // Don't use call_VM as it will see a possible pending exception and forward it
aoqi@1 1367 // and never return here preventing us from clearing _last_native_pc down below.
aoqi@1 1368 // Also can't use call_VM_leaf either as it will check to see if esi & edi are
aoqi@1 1369 // preserved and correspond to the bcp/locals pointers. So we do a runtime call
aoqi@1 1370 // by hand.
aoqi@1 1371 //
aoqi@1 1372 Label L;
aoqi@1 1373 __ li(AT, SafepointSynchronize::address_of_state());
aoqi@1 1374 __ lw(AT, AT, 0);
aoqi@1 1375 __ bne(AT, R0, L);
aoqi@1 1376 __ delayed()->nop();
aoqi@1 1377 __ lw(AT, thread, in_bytes(JavaThread::suspend_flags_offset()));
aoqi@1 1378 __ beq(AT, R0, Continue);
aoqi@1 1379 __ delayed()->nop();
aoqi@1 1380 __ bind(L);
aoqi@1 1381 // __ addi(SP, SP, (-1) * wordSize);
aoqi@1 1382 __ move(A0, thread);
aoqi@1 1383 __ call(CAST_FROM_FN_PTR(address,
aoqi@1 1384 JavaThread::check_special_condition_for_native_trans),
aoqi@1 1385 relocInfo::runtime_call_type);
aoqi@1 1386 __ delayed()->nop();
aoqi@1 1387 // __ addi(SP, SP, wordSize);
aoqi@1 1388
aoqi@1 1389 // __ get_method(method);
aoqi@1 1390 #ifndef OPT_THREAD
aoqi@1 1391 __ get_thread(thread);
aoqi@1 1392 #endif
aoqi@1 1393 //add for compressedoops
aoqi@1 1394 __ reinit_heapbase();
aoqi@1 1395 __ bind(Continue);
aoqi@1 1396 }
aoqi@1 1397
aoqi@1 1398 // change thread state
aoqi@1 1399 __ move(t, _thread_in_Java);
aoqi@1 1400 __ sw(t, thread, in_bytes(JavaThread::thread_state_offset()));
aoqi@1 1401 __ reset_last_Java_frame(thread, true, true);
aoqi@1 1402
aoqi@1 1403 // reset handle block
aoqi@1 1404 __ ld(t, thread, in_bytes(JavaThread::active_handles_offset()));
aoqi@1 1405 __ sw(R0, t, JNIHandleBlock::top_offset_in_bytes());
aoqi@1 1406
aoqi@1 1407 // If result was an oop then unbox and save it in the frame
aoqi@1 1408 { Label L;
aoqi@1 1409 Label no_oop, store_result;
aoqi@1 1410 //FIXME, addi only support 16-bit imeditate
aoqi@1 1411 __ ld(AT, FP, frame::interpreter_frame_result_handler_offset*wordSize);
aoqi@1 1412 // __ addi(AT,AT,-(int)AbstractInterpreter::result_handler(T_OBJECT));
aoqi@1 1413 __ li(T0, AbstractInterpreter::result_handler(T_OBJECT));
aoqi@1 1414 __ bne(AT, T0, no_oop);
aoqi@1 1415 __ delayed()->nop();
aoqi@1 1416 //__ cmpl(Address(esp), NULL_WORD);
aoqi@1 1417 //FIXME, do we need pop here ? @jerome
aoqi@1 1418 //__ pop(ltos);
aoqi@1 1419 //__ testl(eax, eax);
aoqi@1 1420 //__ jcc(Assembler::zero, store_result);
aoqi@1 1421 __ move(V0, S1);
aoqi@1 1422 __ beq(V0, R0, store_result);
aoqi@1 1423 __ delayed()->nop();
aoqi@1 1424 // unbox
aoqi@1 1425 __ ld(V0, V0, 0);
aoqi@1 1426 __ bind(store_result);
aoqi@1 1427 __ sd(V0, FP, (frame::interpreter_frame_oop_temp_offset)*wordSize);
aoqi@1 1428 // keep stack depth as expected by pushing oop which will eventually be discarded
aoqi@1 1429 __ bind(no_oop);
aoqi@1 1430 }
aoqi@1 1431 {
aoqi@1 1432 Label no_reguard;
aoqi@1 1433 __ lw(t, thread, in_bytes(JavaThread::stack_guard_state_offset()));
aoqi@1 1434 //__ bne(t, JavaThread::stack_guard_yellow_disabled, no_reguard);
aoqi@1 1435 __ move(AT,(int) JavaThread::stack_guard_yellow_disabled);
aoqi@1 1436 __ bne(t, AT, no_reguard);
aoqi@1 1437 __ delayed()->nop();
aoqi@1 1438 __ pushad();
aoqi@1 1439 __ call(CAST_FROM_FN_PTR(address, SharedRuntime::reguard_yellow_pages),
aoqi@1 1440 relocInfo::runtime_call_type);
aoqi@1 1441 __ delayed()->nop();
aoqi@1 1442 __ popad();
aoqi@1 1443 //add for compressedoops
aoqi@1 1444 __ reinit_heapbase();
aoqi@1 1445 __ bind(no_reguard);
aoqi@1 1446 }
aoqi@1 1447 // restore esi to have legal interpreter frame,
aoqi@1 1448 // i.e., bci == 0 <=> esi == code_base()
aoqi@1 1449 // Can't call_VM until bcp is within reasonable.
aoqi@1 1450 __ get_method(method); // method is junk from thread_in_native to now.
aoqi@1 1451 __ verify_oop(method);
aoqi@1 1452 // __ movl(esi, Address(method,Method::const_offset())); // get constMethodOop
aoqi@1 1453 __ ld(BCP, method, in_bytes(Method::const_offset()));
aoqi@1 1454 // __ leal(esi, Address(esi,ConstMethod::codes_offset())); // get codebase
aoqi@1 1455 __ lea(BCP, Address(BCP, in_bytes(ConstMethod::codes_offset())));
aoqi@1 1456 // handle exceptions (exception handling will handle unlocking!)
aoqi@1 1457 {
aoqi@1 1458 Label L;
aoqi@1 1459 __ lw(t, thread, in_bytes(Thread::pending_exception_offset()));
aoqi@1 1460 __ beq(t, R0, L);
aoqi@1 1461 __ delayed()->nop();
aoqi@1 1462 // Note: At some point we may want to unify this with the code used in
aoqi@1 1463 // call_VM_base();
aoqi@1 1464 // i.e., we should use the StubRoutines::forward_exception code. For now this
aoqi@1 1465 // doesn't work here because the esp is not correctly set at this point.
aoqi@1 1466 __ MacroAssembler::call_VM(noreg, CAST_FROM_FN_PTR(address,
aoqi@1 1467 InterpreterRuntime::throw_pending_exception));
aoqi@1 1468 __ should_not_reach_here();
aoqi@1 1469 __ bind(L);
aoqi@1 1470 }
aoqi@1 1471
aoqi@1 1472 // do unlocking if necessary
aoqi@1 1473 { Label L;
aoqi@1 1474 __ lw(t, method, in_bytes(Method::access_flags_offset()));
aoqi@1 1475 __ andi(t, t, JVM_ACC_SYNCHRONIZED);
aoqi@1 1476 __ beq(t, R0, L);
aoqi@1 1477 // the code below should be shared with interpreter macro assembler implementation
aoqi@1 1478 { Label unlock;
aoqi@1 1479 // BasicObjectLock will be first in list,
aoqi@1 1480 // since this is a synchronized method. However, need
aoqi@1 1481 // to check that the object has not been unlocked by
aoqi@1 1482 // an explicit monitorexit bytecode.
aoqi@1 1483 __ delayed()->daddi(c_rarg0, FP, frame::interpreter_frame_initial_sp_offset
aoqi@1 1484 * wordSize - (int)sizeof(BasicObjectLock));
aoqi@1 1485 // address of first monitor
aoqi@1 1486
aoqi@1 1487 __ ld(t, c_rarg0, BasicObjectLock::obj_offset_in_bytes());
aoqi@1 1488 __ bne(t, R0, unlock);
aoqi@1 1489 __ delayed()->nop();
aoqi@1 1490
aoqi@1 1491 // Entry already unlocked, need to throw exception
aoqi@1 1492 __ MacroAssembler::call_VM(NOREG, CAST_FROM_FN_PTR(address,
aoqi@1 1493 InterpreterRuntime::throw_illegal_monitor_state_exception));
aoqi@1 1494 __ should_not_reach_here();
aoqi@1 1495
aoqi@1 1496 __ bind(unlock);
aoqi@1 1497 __ unlock_object(c_rarg0);
aoqi@1 1498 }
aoqi@1 1499 __ bind(L);
aoqi@1 1500 }
aoqi@1 1501
aoqi@1 1502 // jvmti/jvmpi support
aoqi@1 1503 // Note: This must happen _after_ handling/throwing any exceptions since
aoqi@1 1504 // the exception handler code notifies the runtime of method exits
aoqi@1 1505 // too. If this happens before, method entry/exit notifications are
aoqi@1 1506 // not properly paired (was bug - gri 11/22/99).
aoqi@1 1507 __ notify_method_exit(false, vtos, InterpreterMacroAssembler::NotifyJVMTI );
aoqi@1 1508
aoqi@1 1509 // restore potential result in V0:V1,
aoqi@1 1510 // call result handler to restore potential result in ST0 & handle result
aoqi@1 1511 //__ lw(V0, SP, 3 * wordSize);
aoqi@1 1512 //__ lw(V1, SP, 2 * wordSize);
aoqi@1 1513 //__ lwc1(F0, SP, 1 * wordSize);
aoqi@1 1514 //__ lwc1(F1, SP, 0 * wordSize);
aoqi@1 1515 //__ addi(SP, SP, 4 * wordSize);
aoqi@1 1516 __ move(V0, S1);
aoqi@1 1517 __ move(V1, S3);
aoqi@1 1518 __ dmtc1(S4, F0);
aoqi@1 1519 __ dmtc1(S2, F1);
aoqi@1 1520 __ ld(t, FP, (frame::interpreter_frame_result_handler_offset) * wordSize);
aoqi@1 1521 __ jalr(t);
aoqi@1 1522 __ delayed()->nop();
aoqi@1 1523 //jerome_for_debug
aoqi@1 1524 //__ move(AT, (int)(&jerome4));
aoqi@1 1525 //__ sw(FP, AT, 0);
aoqi@1 1526
aoqi@1 1527
aoqi@1 1528 // remove activation
aoqi@1 1529 __ ld(SP, FP, frame::interpreter_frame_sender_sp_offset * wordSize); // get sender sp
aoqi@1 1530 __ ld(RA, FP, frame::interpreter_frame_return_addr_offset * wordSize); // get return address
aoqi@1 1531 __ ld(FP, FP, frame::interpreter_frame_sender_fp_offset * wordSize); // restore sender's fp
aoqi@1 1532 __ jr(RA);
aoqi@1 1533 __ delayed()->nop();
aoqi@1 1534
aoqi@1 1535 #ifndef CORE
aoqi@1 1536 if (inc_counter) {
aoqi@1 1537 // Handle overflow of counter and compile method
aoqi@1 1538 __ bind(invocation_counter_overflow);
aoqi@1 1539 generate_counter_overflow(&continue_after_compile);
aoqi@1 1540 // entry_point is the beginning of this
aoqi@1 1541 // function and checks again for compiled code
aoqi@1 1542 }
aoqi@1 1543 #endif
aoqi@1 1544 return entry_point;
aoqi@1 1545 }
aoqi@1 1546
aoqi@1 1547 //
aoqi@1 1548 // Generic interpreted method entry to (asm) interpreter
aoqi@1 1549 //
aoqi@1 1550 // Layout of frame just at the entry
aoqi@1 1551 //
aoqi@1 1552 // [ argument word n-1 ] <--- sp
aoqi@1 1553 // ...
aoqi@1 1554 // [ argument word 0 ]
aoqi@1 1555 // assume Method* in Rmethod before call this method.
aoqi@1 1556 // prerequisites to the generated stub : the callee Method* in Rmethod
aoqi@1 1557 // note you must save the caller bcp before call the generated stub
aoqi@1 1558 //
aoqi@1 1559 address InterpreterGenerator::generate_normal_entry(bool synchronized) {
aoqi@1 1560 // determine code generation flags
aoqi@1 1561 bool inc_counter = UseCompiler || CountCompiledCalls;
aoqi@1 1562
aoqi@1 1563 // Rmethod: Method*
aoqi@1 1564 // Rsender: sender 's sp
aoqi@1 1565 address entry_point = __ pc();
aoqi@1 1566 /*
aoqi@1 1567 #ifndef CORE
aoqi@1 1568 // check if compiled code exists
aoqi@1 1569 Label run_compiled_code;
aoqi@1 1570 if (!CompileTheWorld) {
aoqi@1 1571 check_for_compiled_code(run_compiled_code);
aoqi@1 1572 }
aoqi@1 1573 #endif
aoqi@1 1574 */
aoqi@1 1575 #ifndef CORE
aoqi@1 1576 const Address invocation_counter(Rmethod,
aoqi@1 1577 in_bytes(MethodCounters::invocation_counter_offset() + InvocationCounter::counter_offset()));
aoqi@1 1578 #endif
aoqi@1 1579
aoqi@1 1580 // get parameter size (always needed)
aoqi@1 1581 __ ld(T3, Rmethod, in_bytes(Method::const_offset())); //T3 --> Rmethod._constMethod
aoqi@1 1582 __ lhu(V0, T3, in_bytes(ConstMethod::size_of_parameters_offset()));
aoqi@1 1583
aoqi@1 1584 // Rmethod: Method*
aoqi@1 1585 // V0: size of parameters
aoqi@1 1586 // Rsender: sender 's sp ,could be different frome sp+ wordSize if we call via c2i
aoqi@1 1587 // get size of locals in words to T2
aoqi@1 1588 __ lhu(T2, T3, in_bytes(ConstMethod::size_of_locals_offset()));
aoqi@1 1589 // T2 = no. of additional locals, locals include parameters
aoqi@1 1590 __ dsub(T2, T2, V0);
aoqi@1 1591
aoqi@1 1592 // see if we've got enough room on the stack for locals plus overhead.
aoqi@1 1593 // Layout of frame at this point
aoqi@1 1594 //
aoqi@1 1595 // [ argument word n-1 ] <--- sp
aoqi@1 1596 // ...
aoqi@1 1597 // [ argument word 0 ]
aoqi@1 1598 generate_stack_overflow_check();
aoqi@1 1599 // after this function, the layout of frame does not change
aoqi@1 1600
aoqi@1 1601 // compute beginning of parameters (LVP)
aoqi@1 1602 __ dsll(LVP, V0, LogBytesPerWord);
aoqi@1 1603 __ daddiu(LVP, LVP, (-1) * wordSize);
aoqi@1 1604 __ dadd(LVP, LVP, SP);
aoqi@1 1605
aoqi@1 1606 // T2 - # of additional locals
aoqi@1 1607 // allocate space for locals
aoqi@1 1608 // explicitly initialize locals
aoqi@1 1609 {
aoqi@1 1610 Label exit, loop;
aoqi@1 1611 // for test
aoqi@1 1612 // __ slt(AT, R0, T2);
aoqi@1 1613 // __ beq(AT, R0, exit);
aoqi@1 1614 __ beq(T2, R0, exit);
aoqi@1 1615 __ delayed()->nop();
aoqi@1 1616 __ bind(loop);
aoqi@1 1617 // if(TaggedStackInterpreter)__ daddi(SP, SP, -1 * wordSize);
aoqi@1 1618 __ sd(R0, SP, -1 * wordSize); // initialize local variables
aoqi@1 1619 __ daddiu(T2, T2, -1); // until everything initialized
aoqi@1 1620 __ bne(T2, R0, loop);
aoqi@1 1621 // __ slt(AT, R0, T2);
aoqi@1 1622 // __ bne(AT, R0, loop);
aoqi@1 1623 __ delayed();
aoqi@1 1624 __ daddiu(SP, SP, (-1) * wordSize); //fill delay slot
aoqi@1 1625 __ bind(exit);
aoqi@1 1626 }
aoqi@1 1627
aoqi@1 1628 #ifndef CORE
aoqi@1 1629 if (inc_counter) __ lw(T3, invocation_counter); // (pre-)fetch invocation count
aoqi@1 1630 #endif
aoqi@1 1631 //
aoqi@1 1632 // [ local var m-1 ] <--- sp
aoqi@1 1633 // ...
aoqi@1 1634 // [ local var 0 ]
aoqi@1 1635 // [ argument word n-1 ] <--- T0?
aoqi@1 1636 // ...
aoqi@1 1637 // [ argument word 0 ] <--- LVP
aoqi@1 1638
aoqi@1 1639 // initialize fixed part of activation frame
aoqi@1 1640
aoqi@1 1641 generate_fixed_frame(false);
aoqi@1 1642
aoqi@1 1643
aoqi@1 1644 // after this function, the layout of frame is as following
aoqi@1 1645 //
aoqi@1 1646 // [ monitor block top ] <--- sp ( the top monitor entry )
aoqi@1 1647 // [ byte code pointer ] (if native, bcp = 0)
aoqi@1 1648 // [ constant pool cache ]
aoqi@1 1649 // [ Method* ]
aoqi@1 1650 // [ locals offset ]
aoqi@1 1651 // [ sender's sp ]
aoqi@1 1652 // [ sender's fp ] <--- fp
aoqi@1 1653 // [ return address ]
aoqi@1 1654 // [ local var m-1 ]
aoqi@1 1655 // ...
aoqi@1 1656 // [ local var 0 ]
aoqi@1 1657 // [ argumnet word n-1 ] <--- ( sender's sp )
aoqi@1 1658 // ...
aoqi@1 1659 // [ argument word 0 ] <--- LVP
aoqi@1 1660
aoqi@1 1661
aoqi@1 1662 // make sure method is not native & not abstract
aoqi@1 1663 #ifdef ASSERT
aoqi@1 1664 __ ld(AT, Rmethod, in_bytes(Method::access_flags_offset()));
aoqi@1 1665 {
aoqi@1 1666 Label L;
aoqi@1 1667 __ andi(T2, AT, JVM_ACC_NATIVE);
aoqi@1 1668 __ beq(T2, R0, L);
aoqi@1 1669 __ delayed()->nop();
aoqi@1 1670 __ stop("tried to execute native method as non-native");
aoqi@1 1671 __ bind(L);
aoqi@1 1672 }
aoqi@1 1673 { Label L;
aoqi@1 1674 __ andi(T2, AT, JVM_ACC_ABSTRACT);
aoqi@1 1675 __ beq(T2, R0, L);
aoqi@1 1676 __ delayed()->nop();
aoqi@1 1677 __ stop("tried to execute abstract method in interpreter");
aoqi@1 1678 __ bind(L);
aoqi@1 1679 }
aoqi@1 1680 #endif
aoqi@1 1681
aoqi@1 1682 // Since at this point in the method invocation the exception handler
aoqi@1 1683 // would try to exit the monitor of synchronized methods which hasn't
aoqi@1 1684 // been entered yet, we set the thread local variable
aoqi@1 1685 // _do_not_unlock_if_synchronized to true. The remove_activation will
aoqi@1 1686 // check this flag.
aoqi@1 1687
aoqi@1 1688 #ifndef OPT_THREAD
aoqi@1 1689 Register thread = T8;
aoqi@1 1690 __ get_thread(thread);
aoqi@1 1691 #else
aoqi@1 1692 Register thread = TREG;
aoqi@1 1693 #endif
aoqi@1 1694 __ move(AT, (int)true);
aoqi@1 1695 __ sb(AT, thread, in_bytes(JavaThread::do_not_unlock_if_synchronized_offset()));
aoqi@1 1696
aoqi@1 1697 #ifndef CORE
aoqi@1 1698
aoqi@1 1699 // 2014/11/24 Fu
aoqi@1 1700 // mdp : T8
aoqi@1 1701 // tmp1: T9
aoqi@1 1702 // tmp2: T2
aoqi@1 1703 __ profile_parameters_type(T8, T9, T2);
aoqi@1 1704
aoqi@1 1705 // increment invocation count & check for overflow
aoqi@1 1706 Label invocation_counter_overflow;
aoqi@1 1707 Label profile_method;
aoqi@1 1708 Label profile_method_continue;
aoqi@1 1709 if (inc_counter) {
aoqi@1 1710 generate_counter_incr(&invocation_counter_overflow, &profile_method,
aoqi@1 1711 &profile_method_continue);
aoqi@1 1712 if (ProfileInterpreter) {
aoqi@1 1713 __ bind(profile_method_continue);
aoqi@1 1714 }
aoqi@1 1715 }
aoqi@1 1716
aoqi@1 1717 Label continue_after_compile;
aoqi@1 1718 __ bind(continue_after_compile);
aoqi@1 1719
aoqi@1 1720 #endif // CORE
aoqi@1 1721
aoqi@1 1722 bang_stack_shadow_pages(false);
aoqi@1 1723
aoqi@1 1724 // reset the _do_not_unlock_if_synchronized flag
aoqi@1 1725 #ifndef OPT_THREAD
aoqi@1 1726 __ get_thread(thread);
aoqi@1 1727 #endif
aoqi@1 1728 __ sb(R0, thread, in_bytes(JavaThread::do_not_unlock_if_synchronized_offset()));
aoqi@1 1729
aoqi@1 1730 // check for synchronized methods
aoqi@1 1731 // Must happen AFTER invocation_counter check and stack overflow check,
aoqi@1 1732 // so method is not locked if overflows.
aoqi@1 1733 //
aoqi@1 1734 if (synchronized) {
aoqi@1 1735 // Allocate monitor and lock method
aoqi@1 1736 lock_method();
aoqi@1 1737 } else {
aoqi@1 1738 // no synchronization necessary
aoqi@1 1739 #ifdef ASSERT
aoqi@1 1740 { Label L;
aoqi@1 1741 __ lw(AT, Rmethod, in_bytes(Method::access_flags_offset()));
aoqi@1 1742 __ andi(T2, AT, JVM_ACC_SYNCHRONIZED);
aoqi@1 1743 __ beq(T2, R0, L);
aoqi@1 1744 __ delayed()->nop();
aoqi@1 1745 __ stop("method needs synchronization");
aoqi@1 1746 __ bind(L);
aoqi@1 1747 }
aoqi@1 1748 #endif
aoqi@1 1749 }
aoqi@1 1750
aoqi@1 1751 // layout of frame after lock_method
aoqi@1 1752 // [ monitor entry ] <--- sp
aoqi@1 1753 // ...
aoqi@1 1754 // [ monitor entry ]
aoqi@1 1755 // [ monitor block top ] ( the top monitor entry )
aoqi@1 1756 // [ byte code pointer ] (if native, bcp = 0)
aoqi@1 1757 // [ constant pool cache ]
aoqi@1 1758 // [ Method* ]
aoqi@1 1759 // [ locals offset ]
aoqi@1 1760 // [ sender's sp ]
aoqi@1 1761 // [ sender's fp ]
aoqi@1 1762 // [ return address ] <--- fp
aoqi@1 1763 // [ local var m-1 ]
aoqi@1 1764 // ...
aoqi@1 1765 // [ local var 0 ]
aoqi@1 1766 // [ argumnet word n-1 ] <--- ( sender's sp )
aoqi@1 1767 // ...
aoqi@1 1768 // [ argument word 0 ] <--- LVP
aoqi@1 1769
aoqi@1 1770
aoqi@1 1771 // start execution
aoqi@1 1772 #ifdef ASSERT
aoqi@1 1773 { Label L;
aoqi@1 1774 __ ld(AT, FP, frame::interpreter_frame_monitor_block_top_offset * wordSize);
aoqi@1 1775 __ beq(AT, SP, L);
aoqi@1 1776 __ delayed()->nop();
aoqi@1 1777 __ stop("broken stack frame setup in interpreter in native");
aoqi@1 1778 __ bind(L);
aoqi@1 1779 }
aoqi@1 1780 #endif
aoqi@1 1781
aoqi@1 1782 // jvmti/jvmpi support
aoqi@1 1783 __ notify_method_entry();
aoqi@1 1784
aoqi@1 1785 __ dispatch_next(vtos);
aoqi@1 1786
aoqi@1 1787 #ifndef CORE
aoqi@1 1788 // invocation counter overflow
aoqi@1 1789 if (inc_counter) {
aoqi@1 1790 if (ProfileInterpreter) {
aoqi@1 1791 // We have decided to profile this method in the interpreter
aoqi@1 1792 __ bind(profile_method);
aoqi@1 1793 __ call_VM(noreg, CAST_FROM_FN_PTR(address,
aoqi@1 1794 InterpreterRuntime::profile_method));
aoqi@1 1795 __ set_method_data_pointer_for_bcp();
aoqi@1 1796 __ get_method(Rmethod);
aoqi@1 1797 __ b(profile_method_continue);
aoqi@1 1798 __ delayed()->nop();
aoqi@1 1799 }
aoqi@1 1800 // Handle overflow of counter and compile method
aoqi@1 1801 __ bind(invocation_counter_overflow);
aoqi@1 1802 generate_counter_overflow(&continue_after_compile);
aoqi@1 1803 }
aoqi@1 1804
aoqi@1 1805 #endif
aoqi@1 1806 return entry_point;
aoqi@1 1807 }
aoqi@1 1808
aoqi@1 1809 // Entry points
aoqi@1 1810 //
aoqi@1 1811 // Here we generate the various kind of entries into the interpreter.
aoqi@1 1812 // The two main entry type are generic bytecode methods and native
aoqi@1 1813 // call method. These both come in synchronized and non-synchronized
aoqi@1 1814 // versions but the frame layout they create is very similar. The
aoqi@1 1815 // other method entry types are really just special purpose entries
aoqi@1 1816 // that are really entry and interpretation all in one. These are for
aoqi@1 1817 // trivial methods like accessor, empty, or special math methods.
aoqi@1 1818 //
aoqi@1 1819 // When control flow reaches any of the entry types for the interpreter
aoqi@1 1820 // the following holds ->
aoqi@1 1821 //
aoqi@1 1822 // Arguments:
aoqi@1 1823 //
aoqi@1 1824 // Rmethod: Method*
aoqi@1 1825 // V0: receiver
aoqi@1 1826 //
aoqi@1 1827 //
aoqi@1 1828 // Stack layout immediately at entry
aoqi@1 1829 //
aoqi@1 1830 // [ parameter n-1 ] <--- sp
aoqi@1 1831 // ...
aoqi@1 1832 // [ parameter 0 ]
aoqi@1 1833 // [ expression stack ] (caller's java expression stack)
aoqi@1 1834
aoqi@1 1835 // Assuming that we don't go to one of the trivial specialized entries
aoqi@1 1836 // the stack will look like below when we are ready to execute the
aoqi@1 1837 // first bytecode (or call the native routine). The register usage
aoqi@1 1838 // will be as the template based interpreter expects (see
aoqi@1 1839 // interpreter_amd64.hpp).
aoqi@1 1840 //
aoqi@1 1841 // local variables follow incoming parameters immediately; i.e.
aoqi@1 1842 // the return address is moved to the end of the locals).
aoqi@1 1843 //
aoqi@1 1844 // [ monitor entry ] <--- sp
aoqi@1 1845 // ...
aoqi@1 1846 // [ monitor entry ]
aoqi@1 1847 // [ monitor block top ] ( the top monitor entry )
aoqi@1 1848 // [ byte code pointer ] (if native, bcp = 0)
aoqi@1 1849 // [ constant pool cache ]
aoqi@1 1850 // [ Method* ]
aoqi@1 1851 // [ locals offset ]
aoqi@1 1852 // [ sender's sp ]
aoqi@1 1853 // [ sender's fp ]
aoqi@1 1854 // [ return address ] <--- fp
aoqi@1 1855 // [ local var m-1 ]
aoqi@1 1856 // ...
aoqi@1 1857 // [ local var 0 ]
aoqi@1 1858 // [ argumnet word n-1 ] <--- ( sender's sp )
aoqi@1 1859 // ...
aoqi@1 1860 // [ argument word 0 ] <--- S7
aoqi@1 1861
aoqi@1 1862 address AbstractInterpreterGenerator::generate_method_entry(
aoqi@1 1863 AbstractInterpreter::MethodKind kind) {
aoqi@1 1864 // determine code generation flags
aoqi@1 1865 bool synchronized = false;
aoqi@1 1866 address entry_point = NULL;
aoqi@1 1867 switch (kind) {
aoqi@1 1868 case Interpreter::zerolocals : break;
aoqi@1 1869 case Interpreter::zerolocals_synchronized: synchronized = true; break;
aoqi@1 1870 case Interpreter::native :
aoqi@1 1871 entry_point = ((InterpreterGenerator*)this)->generate_native_entry(false);
aoqi@1 1872 break;
aoqi@1 1873 case Interpreter::native_synchronized :
aoqi@1 1874 entry_point = ((InterpreterGenerator*)this)->generate_native_entry(true);
aoqi@1 1875 break;
aoqi@1 1876 case Interpreter::empty :
aoqi@1 1877 entry_point = ((InterpreterGenerator*)this)->generate_empty_entry();
aoqi@1 1878 break;
aoqi@1 1879 case Interpreter::accessor :
aoqi@1 1880 entry_point = ((InterpreterGenerator*)this)->generate_accessor_entry();
aoqi@1 1881 break;
aoqi@1 1882 case Interpreter::abstract :
aoqi@1 1883 entry_point = ((InterpreterGenerator*)this)->generate_abstract_entry();
aoqi@1 1884 break;
aoqi@1 1885
aoqi@1 1886 case Interpreter::java_lang_math_sin : // fall thru
aoqi@1 1887 case Interpreter::java_lang_math_cos : // fall thru
aoqi@1 1888 case Interpreter::java_lang_math_tan : // fall thru
aoqi@1 1889 case Interpreter::java_lang_math_log : // fall thru
aoqi@1 1890 case Interpreter::java_lang_math_log10 : // fall thru
aoqi@1 1891 case Interpreter::java_lang_math_pow : // fall thru
aoqi@1 1892 case Interpreter::java_lang_math_exp : break;
aoqi@1 1893 case Interpreter::java_lang_math_abs : // fall thru
aoqi@1 1894 case Interpreter::java_lang_math_sqrt :
aoqi@1 1895 entry_point = ((InterpreterGenerator*)this)->generate_math_entry(kind); break;
aoqi@1 1896 case Interpreter::java_lang_ref_reference_get:
aoqi@1 1897 entry_point = ((InterpreterGenerator*)this)->generate_Reference_get_entry(); break;
aoqi@1 1898 default:
aoqi@1 1899 fatal(err_msg("unexpected method kind: %d", kind));
aoqi@1 1900 break;
aoqi@1 1901 }
aoqi@1 1902 if (entry_point) return entry_point;
aoqi@1 1903
aoqi@1 1904 return ((InterpreterGenerator*)this)->generate_normal_entry(synchronized);
aoqi@1 1905 }
aoqi@1 1906
aoqi@1 1907 // These should never be compiled since the interpreter will prefer
aoqi@1 1908 // // the compiled version to the intrinsic version.
aoqi@1 1909 bool AbstractInterpreter::can_be_compiled(methodHandle m) {
aoqi@1 1910 switch (method_kind(m)) {
aoqi@1 1911 case Interpreter::java_lang_math_sin : // fall thru
aoqi@1 1912 case Interpreter::java_lang_math_cos : // fall thru
aoqi@1 1913 case Interpreter::java_lang_math_tan : // fall thru
aoqi@1 1914 case Interpreter::java_lang_math_abs : // fall thru
aoqi@1 1915 case Interpreter::java_lang_math_log : // fall thru
aoqi@1 1916 case Interpreter::java_lang_math_log10 : // fall thru
aoqi@1 1917 case Interpreter::java_lang_math_sqrt : // fall thru
aoqi@1 1918 case Interpreter::java_lang_math_pow : // fall thru
aoqi@1 1919 case Interpreter::java_lang_math_exp :
aoqi@1 1920 return false;
aoqi@1 1921 default:
aoqi@1 1922 return true;
aoqi@1 1923 }
aoqi@1 1924 }
aoqi@1 1925
aoqi@1 1926 // How much stack a method activation needs in words.
aoqi@1 1927 int AbstractInterpreter::size_top_interpreter_activation(Method* method) {
aoqi@1 1928
aoqi@1 1929 const int entry_size = frame::interpreter_frame_monitor_size();
aoqi@1 1930
aoqi@1 1931 // total overhead size: entry_size + (saved ebp thru expr stack bottom).
aoqi@1 1932 // be sure to change this if you add/subtract anything to/from the overhead area
aoqi@1 1933 const int overhead_size = -(frame::interpreter_frame_initial_sp_offset) + entry_size;
aoqi@1 1934
aoqi@1 1935 const int stub_code = 6; // see generate_call_stub
aoqi@1 1936 // return overhead_size + method->max_locals() + method->max_stack() + stub_code;
aoqi@1 1937 const int method_stack = (method->max_locals() + method->max_stack()) *
aoqi@1 1938 Interpreter::stackElementWords;
aoqi@1 1939 return overhead_size + method_stack + stub_code;
aoqi@1 1940 }
aoqi@1 1941
aoqi@1 1942 void AbstractInterpreter::layout_activation(Method* method,
aoqi@1 1943 int tempcount,
aoqi@1 1944 int popframe_extra_args,
aoqi@1 1945 int moncount,
aoqi@1 1946 int caller_actual_parameters,
aoqi@1 1947 int callee_param_count,
aoqi@1 1948 int callee_locals,
aoqi@1 1949 frame* caller,
aoqi@1 1950 frame* interpreter_frame,
aoqi@1 1951 bool is_top_frame,
aoqi@1 1952 bool is_bottom_frame) {
aoqi@1 1953 // Note: This calculation must exactly parallel the frame setup
aoqi@1 1954 // in AbstractInterpreterGenerator::generate_method_entry.
aoqi@1 1955 // If interpreter_frame!=NULL, set up the method, locals, and monitors.
aoqi@1 1956 // The frame interpreter_frame, if not NULL, is guaranteed to be the
aoqi@1 1957 // right size, as determined by a previous call to this method.
aoqi@1 1958 // It is also guaranteed to be walkable even though it is in a skeletal state
aoqi@1 1959
aoqi@1 1960 // fixed size of an interpreter frame:
aoqi@1 1961 // int max_locals = method->max_locals();
aoqi@1 1962
aoqi@1 1963 int max_locals = method->max_locals() * Interpreter::stackElementWords;
aoqi@1 1964 int extra_locals = (method->max_locals() - method->size_of_parameters()) * Interpreter::stackElementWords;
aoqi@1 1965
aoqi@1 1966 #ifdef ASSERT
aoqi@1 1967 if (!EnableInvokeDynamic) {
aoqi@1 1968 // @@@ FIXME: Should we correct interpreter_frame_sender_sp in the calling sequences?
aoqi@1 1969 // Probably, since deoptimization doesn't work yet.
aoqi@1 1970 assert(caller->unextended_sp() == interpreter_frame->interpreter_frame_sender_sp(), "Frame not properly walkable");
aoqi@1 1971 }
aoqi@1 1972 assert(caller->sp() == interpreter_frame->interpreter_frame_sender_sp(), "Frame not properly walkable(2)");
aoqi@1 1973 #endif
aoqi@1 1974
aoqi@1 1975 interpreter_frame->interpreter_frame_set_method(method);
aoqi@1 1976 // NOTE the difference in using sender_sp and interpreter_frame_sender_sp
aoqi@1 1977 // interpreter_frame_sender_sp is the original sp of the caller (the unextended_sp)
aoqi@1 1978 // and sender_sp is fp+8
aoqi@1 1979 intptr_t* locals = interpreter_frame->sender_sp() + max_locals - 1;
aoqi@1 1980
aoqi@1 1981 #ifdef ASSERT
aoqi@1 1982 if (caller->is_interpreted_frame()) {
aoqi@1 1983 assert(locals < caller->fp() + frame::interpreter_frame_initial_sp_offset, "bad placement");
aoqi@1 1984 }
aoqi@1 1985 #endif
aoqi@1 1986
aoqi@1 1987 interpreter_frame->interpreter_frame_set_locals(locals);
aoqi@1 1988 BasicObjectLock* montop = interpreter_frame->interpreter_frame_monitor_begin();
aoqi@1 1989 BasicObjectLock* monbot = montop - moncount;
aoqi@1 1990 interpreter_frame->interpreter_frame_set_monitor_end(montop - moncount);
aoqi@1 1991
aoqi@1 1992 //set last sp;
aoqi@1 1993 intptr_t* esp = (intptr_t*) monbot - tempcount*Interpreter::stackElementWords -
aoqi@1 1994 popframe_extra_args;
aoqi@1 1995 interpreter_frame->interpreter_frame_set_last_sp(esp);
aoqi@1 1996 // All frames but the initial interpreter frame we fill in have a
aoqi@1 1997 // value for sender_sp that allows walking the stack but isn't
aoqi@1 1998 // truly correct. Correct the value here.
aoqi@1 1999 //
aoqi@1 2000 // int extra_locals = method->max_locals() - method->size_of_parameters();
aoqi@1 2001 if (extra_locals != 0 &&
aoqi@1 2002 interpreter_frame->sender_sp() == interpreter_frame->interpreter_frame_sender_sp() ) {
aoqi@1 2003 interpreter_frame->set_interpreter_frame_sender_sp(caller->sp() + extra_locals);
aoqi@1 2004 }
aoqi@1 2005 *interpreter_frame->interpreter_frame_cache_addr() =
aoqi@1 2006 method->constants()->cache();
aoqi@1 2007 }
aoqi@1 2008
aoqi@1 2009 //-----------------------------------------------------------------------------
aoqi@1 2010 // Exceptions
aoqi@1 2011
aoqi@1 2012 void TemplateInterpreterGenerator::generate_throw_exception() {
aoqi@1 2013 // Entry point in previous activation (i.e., if the caller was
aoqi@1 2014 // interpreted)
aoqi@1 2015 Interpreter::_rethrow_exception_entry = __ pc();
aoqi@1 2016
aoqi@1 2017 // Restore sp to interpreter_frame_last_sp even though we are going
aoqi@1 2018 // to empty the expression stack for the exception processing.
aoqi@1 2019 __ sd(R0,FP, frame::interpreter_frame_last_sp_offset * wordSize);
aoqi@1 2020
aoqi@1 2021 // V0: exception
aoqi@1 2022 // V1: return address/pc that threw exception
aoqi@1 2023 __ restore_bcp(); // esi points to call/send
aoqi@1 2024 __ restore_locals();
aoqi@1 2025
aoqi@1 2026 //add for compressedoops
aoqi@1 2027 __ reinit_heapbase();
aoqi@1 2028 // Entry point for exceptions thrown within interpreter code
aoqi@1 2029 Interpreter::_throw_exception_entry = __ pc();
aoqi@1 2030 // expression stack is undefined here
aoqi@1 2031 // V0: exception
aoqi@1 2032 // BCP: exception bcp
aoqi@1 2033 __ verify_oop(V0);
aoqi@1 2034
aoqi@1 2035 // expression stack must be empty before entering the VM in case of an exception
aoqi@1 2036 __ empty_expression_stack();
aoqi@1 2037 // find exception handler address and preserve exception oop
aoqi@1 2038 __ move(A1, V0);
aoqi@1 2039 __ call_VM(V1, CAST_FROM_FN_PTR(address, InterpreterRuntime::exception_handler_for_exception), A1);
aoqi@1 2040 // V0: exception handler entry point
aoqi@1 2041 // V1: preserved exception oop
aoqi@1 2042 // S0: bcp for exception handler
aoqi@1 2043 __ daddi(SP, SP, (-1) * wordSize);
aoqi@1 2044 __ sd(V1, SP, 0); // push exception which is now the only value on the stack
aoqi@1 2045 __ jr(V0); // jump to exception handler (may be _remove_activation_entry!)
aoqi@1 2046 __ delayed()->nop();
aoqi@1 2047
aoqi@1 2048 // If the exception is not handled in the current frame the frame is removed and
aoqi@1 2049 // the exception is rethrown (i.e. exception continuation is _rethrow_exception).
aoqi@1 2050 //
aoqi@1 2051 // Note: At this point the bci is still the bxi for the instruction which caused
aoqi@1 2052 // the exception and the expression stack is empty. Thus, for any VM calls
aoqi@1 2053 // at this point, GC will find a legal oop map (with empty expression stack).
aoqi@1 2054
aoqi@1 2055 // In current activation
aoqi@1 2056 // V0: exception
aoqi@1 2057 // BCP: exception bcp
aoqi@1 2058
aoqi@1 2059 //
aoqi@1 2060 // JVMTI PopFrame support
aoqi@1 2061 //
aoqi@1 2062
aoqi@1 2063 Interpreter::_remove_activation_preserving_args_entry = __ pc();
aoqi@1 2064 __ empty_expression_stack();
aoqi@1 2065 // Set the popframe_processing bit in pending_popframe_condition indicating that we are
aoqi@1 2066 // currently handling popframe, so that call_VMs that may happen later do not trigger new
aoqi@1 2067 // popframe handling cycles.
aoqi@1 2068 #ifndef OPT_THREAD
aoqi@1 2069 Register thread = T2;
aoqi@1 2070 __ get_thread(T2);
aoqi@1 2071 #else
aoqi@1 2072 Register thread = TREG;
aoqi@1 2073 #endif
aoqi@1 2074 __ lw(T3, thread, in_bytes(JavaThread::popframe_condition_offset()));
aoqi@1 2075 __ ori(T3, T3, JavaThread::popframe_processing_bit);
aoqi@1 2076 __ sw(T3, thread, in_bytes(JavaThread::popframe_condition_offset()));
aoqi@1 2077
aoqi@1 2078 #ifndef CORE
aoqi@1 2079 {
aoqi@1 2080 // Check to see whether we are returning to a deoptimized frame.
aoqi@1 2081 // (The PopFrame call ensures that the caller of the popped frame is
aoqi@1 2082 // either interpreted or compiled and deoptimizes it if compiled.)
aoqi@1 2083 // In this case, we can't call dispatch_next() after the frame is
aoqi@1 2084 // popped, but instead must save the incoming arguments and restore
aoqi@1 2085 // them after deoptimization has occurred.
aoqi@1 2086 //
aoqi@1 2087 // Note that we don't compare the return PC against the
aoqi@1 2088 // deoptimization blob's unpack entry because of the presence of
aoqi@1 2089 // adapter frames in C2.
aoqi@1 2090 Label caller_not_deoptimized;
aoqi@1 2091 __ ld(A0, FP, frame::return_addr_offset * wordSize);
aoqi@1 2092 __ super_call_VM_leaf(CAST_FROM_FN_PTR(address, InterpreterRuntime::interpreter_contains), A0);
aoqi@1 2093 __ bne(V0, R0, caller_not_deoptimized);
aoqi@1 2094 __ delayed()->nop();
aoqi@1 2095
aoqi@1 2096 // Compute size of arguments for saving when returning to deoptimized caller
aoqi@1 2097 __ get_method(A1);
aoqi@1 2098 __ verify_oop(A1);
aoqi@1 2099 __ ld(A1,A1,in_bytes(Method::const_offset()));
aoqi@1 2100 __ lhu(A1, A1, in_bytes(ConstMethod::size_of_parameters_offset()));
aoqi@1 2101 __ shl(A1, Interpreter::logStackElementSize);
aoqi@1 2102 __ restore_locals();
aoqi@1 2103 __ dsub(A2, LVP, T0);
aoqi@1 2104 __ daddiu(A2, A2, wordSize);
aoqi@1 2105 // Save these arguments
aoqi@1 2106 #ifndef OPT_THREAD
aoqi@1 2107 __ get_thread(A0);
aoqi@1 2108 #else
aoqi@1 2109 __ move(A0, TREG);
aoqi@1 2110 #endif
aoqi@1 2111 __ super_call_VM_leaf(CAST_FROM_FN_PTR(address, Deoptimization::popframe_preserve_args), A0, A1, A2);
aoqi@1 2112
aoqi@1 2113
aoqi@1 2114
aoqi@1 2115 __ remove_activation(vtos, T9, false, false, false);
aoqi@1 2116
aoqi@1 2117 // Inform deoptimization that it is responsible for restoring these arguments
aoqi@1 2118 #ifndef OPT_THREAD
aoqi@1 2119 __ get_thread(thread);
aoqi@1 2120 #endif
aoqi@1 2121 __ move(AT, JavaThread::popframe_force_deopt_reexecution_bit);
aoqi@1 2122 __ sw(AT, thread, in_bytes(JavaThread::popframe_condition_offset()));
aoqi@1 2123 // Continue in deoptimization handler
aoqi@1 2124 ///__ jmp(edx);
aoqi@1 2125 __ jr(T9);
aoqi@1 2126 __ delayed()->nop();
aoqi@1 2127
aoqi@1 2128 __ bind(caller_not_deoptimized);
aoqi@1 2129 }
aoqi@1 2130 #endif /* !CORE */
aoqi@1 2131
aoqi@1 2132
aoqi@1 2133 __ remove_activation(vtos, T3,
aoqi@1 2134 /* throw_monitor_exception */ false,
aoqi@1 2135 /* install_monitor_exception */ false,
aoqi@1 2136 /* notify_jvmdi */ false);
aoqi@1 2137
aoqi@1 2138 // Clear the popframe condition flag
aoqi@1 2139 // Finish with popframe handling
aoqi@1 2140 // A previous I2C followed by a deoptimization might have moved the
aoqi@1 2141 // outgoing arguments further up the stack. PopFrame expects the
aoqi@1 2142 // mutations to those outgoing arguments to be preserved and other
aoqi@1 2143 // constraints basically require this frame to look exactly as
aoqi@1 2144 // though it had previously invoked an interpreted activation with
aoqi@1 2145 // no space between the top of the expression stack (current
aoqi@1 2146 // last_sp) and the top of stack. Rather than force deopt to
aoqi@1 2147 // maintain this kind of invariant all the time we call a small
aoqi@1 2148 // fixup routine to move the mutated arguments onto the top of our
aoqi@1 2149 // expression stack if necessary.
aoqi@1 2150 //why x86 write this , i think it is no use ,@jerome
aoqi@1 2151 //__ movl(eax, esp);
aoqi@1 2152 //__ movl(ebx, Address(ebp, frame::interpreter_frame_last_sp_offset * wordSize));
aoqi@1 2153 __ move(T8, SP);
aoqi@1 2154 __ ld(A2, FP, frame::interpreter_frame_last_sp_offset * wordSize);
aoqi@1 2155 #ifndef OPT_THREAD
aoqi@1 2156 __ get_thread(thread);
aoqi@1 2157 #endif
aoqi@1 2158 // PC must point into interpreter here
aoqi@1 2159 //__ set_last_Java_frame(ecx, noreg, ebp, __ pc());
aoqi@1 2160 __ set_last_Java_frame(thread, noreg, FP, __ pc());
aoqi@1 2161 // __ super_call_VM_leaf(CAST_FROM_FN_PTR(address, InterpreterRuntime::popframe_move_outgoing_args), ecx, eax, ebx);
aoqi@1 2162 __ super_call_VM_leaf(CAST_FROM_FN_PTR(address, InterpreterRuntime::popframe_move_outgoing_args), thread, T8, A2);
aoqi@1 2163 __ reset_last_Java_frame(thread, true, true);
aoqi@1 2164 // Restore the last_sp and null it out
aoqi@1 2165 __ ld(SP, FP, frame::interpreter_frame_last_sp_offset * wordSize);
aoqi@1 2166 __ sd(R0, FP, frame::interpreter_frame_last_sp_offset * wordSize);
aoqi@1 2167
aoqi@1 2168
aoqi@1 2169
aoqi@1 2170 __ move(AT, JavaThread::popframe_inactive);
aoqi@1 2171 __ sw(AT, thread, in_bytes(JavaThread::popframe_condition_offset()));
aoqi@1 2172
aoqi@1 2173 // Finish with popframe handling
aoqi@1 2174 __ restore_bcp();
aoqi@1 2175 __ restore_locals();
aoqi@1 2176 #ifndef CORE
aoqi@1 2177 // The method data pointer was incremented already during
aoqi@1 2178 // call profiling. We have to restore the mdp for the current bcp.
aoqi@1 2179 if (ProfileInterpreter) {
aoqi@1 2180 __ set_method_data_pointer_for_bcp();
aoqi@1 2181 }
aoqi@1 2182 #endif // !CORE
aoqi@1 2183 // Clear the popframe condition flag
aoqi@1 2184 // __ get_thread(ecx);
aoqi@1 2185 // __ movl(Address(ecx, JavaThread::popframe_condition_offset()), JavaThread::popframe_inactive);
aoqi@1 2186 #ifndef OPT_THREAD
aoqi@1 2187 __ get_thread(thread);
aoqi@1 2188 #endif
aoqi@1 2189 __ move(AT, JavaThread::popframe_inactive);
aoqi@1 2190 __ sw(AT, thread, in_bytes(JavaThread::popframe_condition_offset()));
aoqi@1 2191 __ dispatch_next(vtos);
aoqi@1 2192 // end of PopFrame support
aoqi@1 2193
aoqi@1 2194 Interpreter::_remove_activation_entry = __ pc();
aoqi@1 2195
aoqi@1 2196 // preserve exception over this code sequence
aoqi@1 2197 __ ld(T0, SP, 0);
aoqi@1 2198 __ daddi(SP, SP, wordSize);
aoqi@1 2199 #ifndef OPT_THREAD
aoqi@1 2200 __ get_thread(thread);
aoqi@1 2201 #endif
aoqi@1 2202 __ sd(T0, thread, in_bytes(JavaThread::vm_result_offset()));
aoqi@1 2203 // remove the activation (without doing throws on illegalMonitorExceptions)
aoqi@1 2204 __ remove_activation(vtos, T3, false, true, false);
aoqi@1 2205 // restore exception
aoqi@1 2206 __ get_vm_result(T0, thread);
aoqi@1 2207 __ verify_oop(T0);
aoqi@1 2208
aoqi@1 2209 // Inbetween activations - previous activation type unknown yet
aoqi@1 2210 // compute continuation point - the continuation point expects
aoqi@1 2211 // the following registers set up:
aoqi@1 2212 //
aoqi@1 2213 // T0: exception eax
aoqi@1 2214 // T1: return address/pc that threw exception edx
aoqi@1 2215 // SP: expression stack of caller esp
aoqi@1 2216 // FP: ebp of caller ebp
aoqi@1 2217 __ daddi(SP, SP, (-2) * wordSize);
aoqi@1 2218 __ sd(T0, SP, wordSize); // save exception
aoqi@1 2219 __ sd(T3, SP, 0); // save return address
aoqi@1 2220 __ move(A1, T3);
aoqi@1 2221 __ super_call_VM_leaf(CAST_FROM_FN_PTR(address, SharedRuntime::exception_handler_for_return_address), thread, A1);
aoqi@1 2222 __ move(T9, V0); // save exception handler
aoqi@1 2223 __ ld(V0, SP, wordSize); // restore exception
aoqi@1 2224 __ ld(V1, SP, 0); // restore return address
aoqi@1 2225 __ daddi(SP, SP, 2 * wordSize);
aoqi@1 2226
aoqi@1 2227 // Note that an "issuing PC" is actually the next PC after the call
aoqi@1 2228 __ jr(T9); // jump to exception handler of caller
aoqi@1 2229 __ delayed()->nop();
aoqi@1 2230 }
aoqi@1 2231
aoqi@1 2232
aoqi@1 2233 //
aoqi@1 2234 // JVMTI ForceEarlyReturn support
aoqi@1 2235 //
aoqi@1 2236 address TemplateInterpreterGenerator::generate_earlyret_entry_for(TosState state) {
aoqi@1 2237 address entry = __ pc();
aoqi@1 2238 __ restore_bcp();
aoqi@1 2239 __ restore_locals();
aoqi@1 2240 __ empty_expression_stack();
aoqi@1 2241 __ empty_FPU_stack();
aoqi@1 2242 __ load_earlyret_value(state);
aoqi@1 2243
aoqi@1 2244 //__ get_thread(ecx);
aoqi@1 2245 #ifndef OPT_THREAD
aoqi@1 2246 __ get_thread(TREG);
aoqi@1 2247 #endif
aoqi@1 2248 // __ movl(TREG, Address(TREG, JavaThread::jvmti_thread_state_offset()));
aoqi@1 2249 __ ld_ptr(T9, TREG, in_bytes(JavaThread::jvmti_thread_state_offset()));
aoqi@1 2250 //const Address cond_addr(ecx, JvmtiThreadState::earlyret_state_offset());
aoqi@1 2251 const Address cond_addr(T9, in_bytes(JvmtiThreadState::earlyret_state_offset()));
aoqi@1 2252 // Clear the earlyret state
aoqi@1 2253 // __ movl(cond_addr, JvmtiThreadState::earlyret_inactive);
aoqi@1 2254 __ move(AT,JvmtiThreadState::earlyret_inactive);
aoqi@1 2255 __ sw(AT,cond_addr);
fujie@33 2256 __ sync();
aoqi@1 2257 //__ remove_activation(state, esi,
aoqi@1 2258
aoqi@1 2259
aoqi@1 2260
aoqi@1 2261 __ remove_activation(state, T0,
aoqi@1 2262 false, /* throw_monitor_exception */
aoqi@1 2263 false, /* install_monitor_exception */
aoqi@1 2264 true); /* notify_jvmdi */
fujie@32 2265 __ sync();
aoqi@1 2266 // __ jmp(esi);
aoqi@1 2267 //__ jmp(T0);
aoqi@1 2268 __ jr(T0);
aoqi@1 2269 __ delayed()->nop();
aoqi@1 2270 return entry;
aoqi@1 2271 } // end of ForceEarlyReturn support
aoqi@1 2272
aoqi@1 2273
aoqi@1 2274 //-----------------------------------------------------------------------------
aoqi@1 2275 // Helper for vtos entry point generation
aoqi@1 2276
aoqi@1 2277 void TemplateInterpreterGenerator::set_vtos_entry_points(Template* t,
aoqi@1 2278 address& bep,
aoqi@1 2279 address& cep,
aoqi@1 2280 address& sep,
aoqi@1 2281 address& aep,
aoqi@1 2282 address& iep,
aoqi@1 2283 address& lep,
aoqi@1 2284 address& fep,
aoqi@1 2285 address& dep,
aoqi@1 2286 address& vep) {
aoqi@1 2287 assert(t->is_valid() && t->tos_in() == vtos, "illegal template");
aoqi@1 2288 Label L;
aoqi@1 2289 fep = __ pc(); __ push(ftos); __ b(L); __ delayed()->nop();
aoqi@1 2290 dep = __ pc(); __ push(dtos); __ b(L); __ delayed()->nop();
aoqi@1 2291 lep = __ pc(); __ push(ltos); __ b(L); __ delayed()->nop();
aoqi@1 2292 aep =__ pc(); __ push(atos); __ b(L); __ delayed()->nop();
aoqi@1 2293 bep = cep = sep = iep = __ pc(); __ push(itos);
aoqi@1 2294 vep = __ pc(); __ bind(L); // fall through
aoqi@1 2295 generate_and_dispatch(t);
aoqi@1 2296 }
aoqi@1 2297
aoqi@1 2298
aoqi@1 2299 //-----------------------------------------------------------------------------
aoqi@1 2300 // Generation of individual instructions
aoqi@1 2301
aoqi@1 2302 // helpers for generate_and_dispatch
aoqi@1 2303
aoqi@1 2304
aoqi@1 2305 InterpreterGenerator::InterpreterGenerator(StubQueue* code)
aoqi@1 2306 : TemplateInterpreterGenerator(code) {
aoqi@1 2307 generate_all(); // down here so it can be "virtual"
aoqi@1 2308 }
aoqi@1 2309
aoqi@1 2310 //-----------------------------------------------------------------------------
aoqi@1 2311
aoqi@1 2312 // Non-product code
aoqi@1 2313 #ifndef PRODUCT
aoqi@1 2314 address TemplateInterpreterGenerator::generate_trace_code(TosState state) {
aoqi@1 2315 address entry = __ pc();
aoqi@1 2316
aoqi@1 2317 // prepare expression stack
aoqi@1 2318 __ push(state); // save tosca
aoqi@1 2319
aoqi@1 2320 // tos & tos2, added by yjl 7/15/2005
aoqi@1 2321 // trace_bytecode need actually 4 args, the last two is tos&tos2
aoqi@1 2322 // this work fine for x86. but mips o32 call convention will store A2-A3
aoqi@1 2323 // to the stack position it think is the tos&tos2
aoqi@1 2324 // when the expression stack have no more than 2 data, error occur.
aoqi@1 2325 __ ld(A2, SP, 0);
aoqi@1 2326 __ ld(A3, SP, 1 * wordSize);
aoqi@1 2327 {
aoqi@1 2328 //aoqi_test
aoqi@1 2329 /*
aoqi@1 2330 __ pushad();
aoqi@1 2331 __ li(A0, (long)0);
aoqi@1 2332 __ call(CAST_FROM_FN_PTR(address, SharedRuntime::func_debug),relocInfo::runtime_call_type);
aoqi@1 2333 __ popad();
aoqi@1 2334 */
aoqi@1 2335 }
aoqi@1 2336
aoqi@1 2337 // pass arguments & call tracer
aoqi@1 2338 __ call_VM(noreg, CAST_FROM_FN_PTR(address, SharedRuntime::trace_bytecode), RA, A2, A3);
aoqi@1 2339 __ move(RA, V0); // make sure return address is not destroyed by pop(state)
aoqi@1 2340
aoqi@1 2341 // restore expression stack
aoqi@1 2342 __ pop(state); // restore tosca
aoqi@1 2343
aoqi@1 2344 // return
aoqi@1 2345 __ jr(RA);
aoqi@1 2346 __ delayed()->nop();
aoqi@1 2347
aoqi@1 2348 return entry;
aoqi@1 2349 }
aoqi@1 2350
aoqi@1 2351 void TemplateInterpreterGenerator::count_bytecode() {
aoqi@1 2352 __ li(T8, (long)&BytecodeCounter::_counter_value);
aoqi@1 2353 __ lw(AT, T8, 0);
aoqi@1 2354 __ daddi(AT, AT, 1);
aoqi@1 2355 __ sw(AT, T8, 0);
aoqi@1 2356 }
aoqi@1 2357
aoqi@1 2358 void TemplateInterpreterGenerator::histogram_bytecode(Template* t) {
aoqi@1 2359 __ li(T8, (long)&BytecodeHistogram::_counters[t->bytecode()]);
aoqi@1 2360 __ lw(AT, T8, 0);
aoqi@1 2361 __ daddi(AT, AT, 1);
aoqi@1 2362 __ sw(AT, T8, 0);
aoqi@1 2363 }
aoqi@1 2364
aoqi@1 2365 void TemplateInterpreterGenerator::histogram_bytecode_pair(Template* t) {
aoqi@1 2366 __ li(T8, (long)&BytecodePairHistogram::_index);
aoqi@1 2367 __ lw(T9, T8, 0);
aoqi@1 2368 __ dsrl(T9, T9, BytecodePairHistogram::log2_number_of_codes);
aoqi@1 2369 __ li(T8, ((long)t->bytecode()) << BytecodePairHistogram::log2_number_of_codes);
aoqi@1 2370 __ orr(T9, T9, T8);
aoqi@1 2371 __ li(T8, (long)&BytecodePairHistogram::_index);
aoqi@1 2372 __ sw(T9, T8, 0);
aoqi@1 2373 __ dsll(T9, T9, 2);
aoqi@1 2374 __ li(T8, (long)BytecodePairHistogram::_counters);
aoqi@1 2375 __ dadd(T8, T8, T9);
aoqi@1 2376 __ lw(AT, T8, 0);
aoqi@1 2377 __ daddi(AT, AT, 1);
aoqi@1 2378 __ sw(AT, T8, 0);
aoqi@1 2379 }
aoqi@1 2380
aoqi@1 2381
aoqi@1 2382 void TemplateInterpreterGenerator::trace_bytecode(Template* t) {
aoqi@1 2383 // Call a little run-time stub to avoid blow-up for each bytecode.
aoqi@1 2384 // The run-time runtime saves the right registers, depending on
aoqi@1 2385 // the tosca in-state for the given template.
aoqi@1 2386
aoqi@1 2387 address entry = Interpreter::trace_code(t->tos_in());
aoqi@1 2388 assert(entry != NULL, "entry must have been generated");
aoqi@1 2389 __ call(entry, relocInfo::none);
aoqi@1 2390 __ delayed()->nop();
aoqi@1 2391 //add for compressedoops
aoqi@1 2392 __ reinit_heapbase();
aoqi@1 2393 }
aoqi@1 2394
aoqi@1 2395
aoqi@1 2396 void TemplateInterpreterGenerator::stop_interpreter_at() {
aoqi@1 2397 Label L;
aoqi@1 2398 __ li(T8, long(&BytecodeCounter::_counter_value));
aoqi@1 2399 __ lw(T8, T8, 0);
aoqi@1 2400 __ move(AT, StopInterpreterAt);
aoqi@1 2401 __ bne(T8, AT, L);
aoqi@1 2402 __ delayed()->nop();
aoqi@1 2403 __ call(CAST_FROM_FN_PTR(address, os::breakpoint), relocInfo::runtime_call_type);
aoqi@1 2404 __ delayed()->nop();
aoqi@1 2405 __ bind(L);
aoqi@1 2406 }
aoqi@1 2407 #endif // !PRODUCT
aoqi@1 2408 #endif // ! CC_INTERP

mercurial