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