1 /* 2 * Copyright (c) 2003, 2010, Oracle and/or its affiliates. All rights reserved. 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4 * 5 * This code is free software; you can redistribute it and/or modify it 6 * under the terms of the GNU General Public License version 2 only, as 7 * published by the Free Software Foundation. 8 * 9 * This code is distributed in the hope that it will be useful, but WITHOUT 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 12 * version 2 for more details (a copy is included in the LICENSE file that 13 * accompanied this code). 14 * 15 * You should have received a copy of the GNU General Public License version 16 * 2 along with this work; if not, write to the Free Software Foundation, 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 18 * 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 20 * or visit www.oracle.com if you need additional information or have any 21 * questions. 22 * 23 */ 24 25 // This file specializes the assember with interpreter-specific macros 26 27 28 class InterpreterMacroAssembler: public MacroAssembler { 29 #ifndef CC_INTERP 30 protected: 31 // Interpreter specific version of call_VM_base 32 virtual void call_VM_leaf_base(address entry_point, 33 int number_of_arguments); 34 35 virtual void call_VM_base(Register oop_result, 36 Register java_thread, 37 Register last_java_sp, 38 address entry_point, 39 int number_of_arguments, 40 bool check_exceptions); 41 42 virtual void check_and_handle_popframe(Register java_thread); 43 virtual void check_and_handle_earlyret(Register java_thread); 44 45 // base routine for all dispatches 46 void dispatch_base(TosState state, address* table, bool verifyoop = true); 47 #endif // CC_INTERP 48 49 public: 50 InterpreterMacroAssembler(CodeBuffer* code) : MacroAssembler(code) {} 51 52 void load_earlyret_value(TosState state); 53 54 #ifdef CC_INTERP 55 void save_bcp() { /* not needed in c++ interpreter and harmless */ } 56 void restore_bcp() { /* not needed in c++ interpreter and harmless */ } 57 58 // Helpers for runtime call arguments/results 59 void get_method(Register reg); 60 61 #else 62 63 // Interpreter-specific registers 64 void save_bcp() { 65 movptr(Address(rbp, frame::interpreter_frame_bcx_offset * wordSize), r13); 66 } 67 68 void restore_bcp() { 69 movptr(r13, Address(rbp, frame::interpreter_frame_bcx_offset * wordSize)); 70 } 71 72 void restore_locals() { 73 movptr(r14, Address(rbp, frame::interpreter_frame_locals_offset * wordSize)); 74 } 75 76 // Helpers for runtime call arguments/results 77 void get_method(Register reg) { 78 movptr(reg, Address(rbp, frame::interpreter_frame_method_offset * wordSize)); 79 } 80 81 void get_constant_pool(Register reg) { 82 get_method(reg); 83 movptr(reg, Address(reg, methodOopDesc::constants_offset())); 84 } 85 86 void get_constant_pool_cache(Register reg) { 87 get_constant_pool(reg); 88 movptr(reg, Address(reg, constantPoolOopDesc::cache_offset_in_bytes())); 89 } 90 91 void get_cpool_and_tags(Register cpool, Register tags) { 92 get_constant_pool(cpool); 93 movptr(tags, Address(cpool, constantPoolOopDesc::tags_offset_in_bytes())); 94 } 95 96 void get_unsigned_2_byte_index_at_bcp(Register reg, int bcp_offset); 97 void get_cache_and_index_at_bcp(Register cache, Register index, 98 int bcp_offset, size_t index_size = sizeof(u2)); 99 void get_cache_entry_pointer_at_bcp(Register cache, Register tmp, 100 int bcp_offset, size_t index_size = sizeof(u2)); 101 void get_cache_index_at_bcp(Register index, int bcp_offset, size_t index_size = sizeof(u2)); 102 103 104 void pop_ptr(Register r = rax); 105 void pop_i(Register r = rax); 106 void pop_l(Register r = rax); 107 void pop_f(XMMRegister r = xmm0); 108 void pop_d(XMMRegister r = xmm0); 109 void push_ptr(Register r = rax); 110 void push_i(Register r = rax); 111 void push_l(Register r = rax); 112 void push_f(XMMRegister r = xmm0); 113 void push_d(XMMRegister r = xmm0); 114 115 void pop(Register r ) { ((MacroAssembler*)this)->pop(r); } 116 117 void push(Register r ) { ((MacroAssembler*)this)->push(r); } 118 void push(int32_t imm ) { ((MacroAssembler*)this)->push(imm); } 119 120 void pop(TosState state); // transition vtos -> state 121 void push(TosState state); // transition state -> vtos 122 123 void empty_expression_stack() { 124 movptr(rsp, Address(rbp, frame::interpreter_frame_monitor_block_top_offset * wordSize)); 125 // NULL last_sp until next java call 126 movptr(Address(rbp, frame::interpreter_frame_last_sp_offset * wordSize), (int32_t)NULL_WORD); 127 } 128 129 // Helpers for swap and dup 130 void load_ptr(int n, Register val); 131 void store_ptr(int n, Register val); 132 133 // Super call_VM calls - correspond to MacroAssembler::call_VM(_leaf) calls 134 void super_call_VM_leaf(address entry_point); 135 void super_call_VM_leaf(address entry_point, Register arg_1); 136 void super_call_VM_leaf(address entry_point, Register arg_1, Register arg_2); 137 void super_call_VM_leaf(address entry_point, 138 Register arg_1, Register arg_2, Register arg_3); 139 140 // Generate a subtype check: branch to ok_is_subtype if sub_klass is 141 // a subtype of super_klass. 142 void gen_subtype_check( Register sub_klass, Label &ok_is_subtype ); 143 144 // Dispatching 145 void dispatch_prolog(TosState state, int step = 0); 146 void dispatch_epilog(TosState state, int step = 0); 147 // dispatch via ebx (assume ebx is loaded already) 148 void dispatch_only(TosState state); 149 // dispatch normal table via ebx (assume ebx is loaded already) 150 void dispatch_only_normal(TosState state); 151 void dispatch_only_noverify(TosState state); 152 // load ebx from [esi + step] and dispatch via ebx 153 void dispatch_next(TosState state, int step = 0); 154 // load ebx from [esi] and dispatch via ebx and table 155 void dispatch_via (TosState state, address* table); 156 157 // jump to an invoked target 158 void prepare_to_jump_from_interpreted(); 159 void jump_from_interpreted(Register method, Register temp); 160 161 162 // Returning from interpreted functions 163 // 164 // Removes the current activation (incl. unlocking of monitors) 165 // and sets up the return address. This code is also used for 166 // exception unwindwing. In that case, we do not want to throw 167 // IllegalMonitorStateExceptions, since that might get us into an 168 // infinite rethrow exception loop. 169 // Additionally this code is used for popFrame and earlyReturn. 170 // In popFrame case we want to skip throwing an exception, 171 // installing an exception, and notifying jvmdi. 172 // In earlyReturn case we only want to skip throwing an exception 173 // and installing an exception. 174 void remove_activation(TosState state, Register ret_addr, 175 bool throw_monitor_exception = true, 176 bool install_monitor_exception = true, 177 bool notify_jvmdi = true); 178 #endif // CC_INTERP 179 180 // Object locking 181 void lock_object (Register lock_reg); 182 void unlock_object(Register lock_reg); 183 184 #ifndef CC_INTERP 185 186 // Interpreter profiling operations 187 void set_method_data_pointer_for_bcp(); 188 void test_method_data_pointer(Register mdp, Label& zero_continue); 189 void verify_method_data_pointer(); 190 191 void set_mdp_data_at(Register mdp_in, int constant, Register value); 192 void increment_mdp_data_at(Address data, bool decrement = false); 193 void increment_mdp_data_at(Register mdp_in, int constant, 194 bool decrement = false); 195 void increment_mdp_data_at(Register mdp_in, Register reg, int constant, 196 bool decrement = false); 197 void increment_mask_and_jump(Address counter_addr, 198 int increment, int mask, 199 Register scratch, bool preloaded, 200 Condition cond, Label* where); 201 void set_mdp_flag_at(Register mdp_in, int flag_constant); 202 void test_mdp_data_at(Register mdp_in, int offset, Register value, 203 Register test_value_out, 204 Label& not_equal_continue); 205 206 void record_klass_in_profile(Register receiver, Register mdp, 207 Register reg2, bool is_virtual_call); 208 void record_klass_in_profile_helper(Register receiver, Register mdp, 209 Register reg2, int start_row, 210 Label& done, bool is_virtual_call); 211 212 void update_mdp_by_offset(Register mdp_in, int offset_of_offset); 213 void update_mdp_by_offset(Register mdp_in, Register reg, int offset_of_disp); 214 void update_mdp_by_constant(Register mdp_in, int constant); 215 void update_mdp_for_ret(Register return_bci); 216 217 void profile_taken_branch(Register mdp, Register bumped_count); 218 void profile_not_taken_branch(Register mdp); 219 void profile_call(Register mdp); 220 void profile_final_call(Register mdp); 221 void profile_virtual_call(Register receiver, Register mdp, 222 Register scratch2, 223 bool receiver_can_be_null = false); 224 void profile_ret(Register return_bci, Register mdp); 225 void profile_null_seen(Register mdp); 226 void profile_typecheck(Register mdp, Register klass, Register scratch); 227 void profile_typecheck_failed(Register mdp); 228 void profile_switch_default(Register mdp); 229 void profile_switch_case(Register index_in_scratch, Register mdp, 230 Register scratch2); 231 232 // Debugging 233 // only if +VerifyOops && state == atos 234 void verify_oop(Register reg, TosState state = atos); 235 // only if +VerifyFPU && (state == ftos || state == dtos) 236 void verify_FPU(int stack_depth, TosState state = ftos); 237 238 #endif // !CC_INTERP 239 240 typedef enum { NotifyJVMTI, SkipNotifyJVMTI } NotifyMethodExitMode; 241 242 // support for jvmti/dtrace 243 void notify_method_entry(); 244 void notify_method_exit(TosState state, NotifyMethodExitMode mode); 245 };