1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/src/cpu/sparc/vm/interp_masm_sparc.hpp Wed Apr 27 01:25:04 2016 +0800 1.3 @@ -0,0 +1,348 @@ 1.4 +/* 1.5 + * Copyright (c) 1997, 2013, Oracle and/or its affiliates. All rights reserved. 1.6 + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 1.7 + * 1.8 + * This code is free software; you can redistribute it and/or modify it 1.9 + * under the terms of the GNU General Public License version 2 only, as 1.10 + * published by the Free Software Foundation. 1.11 + * 1.12 + * This code is distributed in the hope that it will be useful, but WITHOUT 1.13 + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 1.14 + * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 1.15 + * version 2 for more details (a copy is included in the LICENSE file that 1.16 + * accompanied this code). 1.17 + * 1.18 + * You should have received a copy of the GNU General Public License version 1.19 + * 2 along with this work; if not, write to the Free Software Foundation, 1.20 + * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 1.21 + * 1.22 + * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 1.23 + * or visit www.oracle.com if you need additional information or have any 1.24 + * questions. 1.25 + * 1.26 + */ 1.27 + 1.28 +#ifndef CPU_SPARC_VM_INTERP_MASM_SPARC_HPP 1.29 +#define CPU_SPARC_VM_INTERP_MASM_SPARC_HPP 1.30 + 1.31 +#include "asm/macroAssembler.inline.hpp" 1.32 +#include "interpreter/invocationCounter.hpp" 1.33 + 1.34 +// This file specializes the assember with interpreter-specific macros 1.35 + 1.36 +REGISTER_DECLARATION( Register, Otos_i , O0); // tos for ints, etc 1.37 +REGISTER_DECLARATION( Register, Otos_l , O0); // for longs 1.38 +REGISTER_DECLARATION( Register, Otos_l1, O0); // for 1st part of longs 1.39 +REGISTER_DECLARATION( Register, Otos_l2, O1); // for 2nd part of longs 1.40 +REGISTER_DECLARATION(FloatRegister, Ftos_f , F0); // for floats 1.41 +REGISTER_DECLARATION(FloatRegister, Ftos_d , F0); // for doubles 1.42 +REGISTER_DECLARATION(FloatRegister, Ftos_d1, F0); // for 1st part of double 1.43 +REGISTER_DECLARATION(FloatRegister, Ftos_d2, F1); // for 2nd part of double 1.44 + 1.45 +#ifndef DONT_USE_REGISTER_DEFINES 1.46 +#define Otos_i O0 1.47 +#define Otos_l O0 1.48 +#define Otos_l1 O0 1.49 +#define Otos_l2 O1 1.50 +#define Ftos_f F0 1.51 +#define Ftos_d F0 1.52 +#define Ftos_d1 F0 1.53 +#define Ftos_d2 F1 1.54 +#endif // DONT_USE_REGISTER_DEFINES 1.55 + 1.56 +class InterpreterMacroAssembler: public MacroAssembler { 1.57 + protected: 1.58 +#ifndef CC_INTERP 1.59 + // Interpreter specific version of call_VM_base 1.60 + virtual void call_VM_leaf_base( 1.61 + Register java_thread, 1.62 + address entry_point, 1.63 + int number_of_arguments 1.64 + ); 1.65 + 1.66 + virtual void call_VM_base( 1.67 + Register oop_result, 1.68 + Register java_thread, 1.69 + Register last_java_sp, 1.70 + address entry_point, 1.71 + int number_of_arguments, 1.72 + bool check_exception=true 1.73 + ); 1.74 + 1.75 + virtual void check_and_handle_popframe(Register java_thread); 1.76 + virtual void check_and_handle_earlyret(Register java_thread); 1.77 + 1.78 + // base routine for all dispatches 1.79 + void dispatch_base(TosState state, address* table); 1.80 +#endif /* CC_INTERP */ 1.81 + 1.82 + public: 1.83 + InterpreterMacroAssembler(CodeBuffer* c) 1.84 + : MacroAssembler(c) {} 1.85 + 1.86 +#ifndef CC_INTERP 1.87 + virtual void load_earlyret_value(TosState state); 1.88 + 1.89 + static const Address l_tmp ; 1.90 + static const Address d_tmp ; 1.91 +#endif /* CC_INTERP */ 1.92 + 1.93 + // helper routine for frame allocation/deallocation 1.94 + // compute the delta by which the caller's SP has to 1.95 + // be adjusted to accomodate for the non-argument 1.96 + // locals 1.97 + void compute_extra_locals_size_in_bytes(Register args_size, Register locals_size, Register delta); 1.98 + 1.99 +#ifndef CC_INTERP 1.100 + 1.101 + // dispatch routines 1.102 + void dispatch_prolog(TosState state, int step = 0); 1.103 + void dispatch_epilog(TosState state, int step = 0); 1.104 + void dispatch_only(TosState state); 1.105 + void dispatch_normal(TosState state); 1.106 + void dispatch_next(TosState state, int step = 0); 1.107 + void dispatch_next_noverify_oop(TosState state, int step = 0); 1.108 + void dispatch_via (TosState state, address* table); 1.109 + 1.110 + 1.111 + // Removes the current activation (incl. unlocking of monitors). 1.112 + // Additionally this code is used for earlyReturn in which case we 1.113 + // want to skip throwing an exception and installing an exception. 1.114 + void remove_activation(TosState state, 1.115 + bool throw_monitor_exception = true, 1.116 + bool install_monitor_exception = true); 1.117 + 1.118 + protected: 1.119 + void dispatch_Lbyte_code(TosState state, address* table, int bcp_incr = 0, bool verify = true); 1.120 +#endif /* CC_INTERP */ 1.121 + 1.122 + public: 1.123 + // Super call_VM calls - correspond to MacroAssembler::call_VM(_leaf) calls 1.124 + void super_call_VM(Register thread_cache, 1.125 + Register oop_result, 1.126 + Register last_java_sp, 1.127 + address entry_point, 1.128 + Register arg_1, 1.129 + Register arg_2, 1.130 + bool check_exception = true); 1.131 + 1.132 +#ifndef CC_INTERP 1.133 + void super_call_VM_leaf(Register thread_cache, address entry_point, Register arg_1, Register arg_2); 1.134 + 1.135 + // Generate a subtype check: branch to ok_is_subtype if sub_klass is 1.136 + // a subtype of super_klass. Blows registers tmp1, tmp2 and tmp3. 1.137 + void gen_subtype_check( Register sub_klass, Register super_klass, Register tmp1, Register tmp2, Register tmp3, Label &ok_is_subtype ); 1.138 + 1.139 + // helpers for tossing exceptions 1.140 + void throw_if_not_1_icc( Condition ok_condition, Label& ok ); 1.141 + void throw_if_not_1_xcc( Condition ok_condition, Label& ok ); 1.142 + void throw_if_not_1_x ( Condition ok_condition, Label& ok ); // chooses icc or xcc based on _LP64 1.143 + 1.144 + void throw_if_not_2( address throw_entry_point, Register Rscratch, Label& ok); 1.145 + 1.146 + void throw_if_not_icc( Condition ok_condition, address throw_entry_point, Register Rscratch ); 1.147 + void throw_if_not_xcc( Condition ok_condition, address throw_entry_point, Register Rscratch ); 1.148 + void throw_if_not_x ( Condition ok_condition, address throw_entry_point, Register Rscratch ); 1.149 + 1.150 + // helpers for expression stack 1.151 + 1.152 + void pop_i( Register r = Otos_i); 1.153 + void pop_ptr( Register r = Otos_i, Register scratch = O4); 1.154 + void pop_l( Register r = Otos_l1); 1.155 + // G4_scratch and Lscratch are used at call sites!! 1.156 + void pop_f(FloatRegister f = Ftos_f, Register scratch = G1_scratch); 1.157 + void pop_d(FloatRegister f = Ftos_d1, Register scratch = G1_scratch); 1.158 + 1.159 + void push_i( Register r = Otos_i); 1.160 + void push_ptr( Register r = Otos_i); 1.161 + void push_l( Register r = Otos_l1); 1.162 + void push_f(FloatRegister f = Ftos_f); 1.163 + void push_d(FloatRegister f = Ftos_d1); 1.164 + 1.165 + 1.166 + void pop (TosState state); // transition vtos -> state 1.167 + void push(TosState state); // transition state -> vtos 1.168 + void empty_expression_stack(); // resets both Lesp and SP 1.169 + 1.170 +#ifdef ASSERT 1.171 + void verify_sp(Register Rsp, Register Rtemp); 1.172 + void verify_esp(Register Resp); // verify that Lesp points to a word in the temp stack 1.173 +#endif // ASSERT 1.174 + 1.175 + public: 1.176 + void if_cmp(Condition cc, bool ptr_compare); 1.177 + 1.178 + // Load values from bytecode stream: 1.179 + 1.180 + enum signedOrNot { Signed, Unsigned }; 1.181 + enum setCCOrNot { set_CC, dont_set_CC }; 1.182 + 1.183 + void get_2_byte_integer_at_bcp( int bcp_offset, 1.184 + Register Rtmp, 1.185 + Register Rdst, 1.186 + signedOrNot is_signed, 1.187 + setCCOrNot should_set_CC = dont_set_CC ); 1.188 + 1.189 + void get_4_byte_integer_at_bcp( int bcp_offset, 1.190 + Register Rtmp, 1.191 + Register Rdst, 1.192 + setCCOrNot should_set_CC = dont_set_CC ); 1.193 + 1.194 + // Note: "get_cache_and_index" really means "get the index, use it to get the cache entry, and throw away the index". 1.195 + void get_cache_and_index_at_bcp(Register cache, Register tmp, int bcp_offset, size_t index_size = sizeof(u2)); 1.196 + void get_cache_and_index_and_bytecode_at_bcp(Register cache, Register temp, Register bytecode, int byte_no, int bcp_offset, size_t index_size = sizeof(u2)); 1.197 + void get_cache_entry_pointer_at_bcp(Register cache, Register tmp, int bcp_offset, size_t index_size = sizeof(u2)); 1.198 + // Note: This one does not fetch the cache. The first argument is a temp which may be killed. 1.199 + void get_cache_index_at_bcp(Register temp, Register index, int bcp_offset, size_t index_size = sizeof(u2)); 1.200 + 1.201 + // load cpool->resolved_references(index); 1.202 + void load_resolved_reference_at_index(Register result, Register index); 1.203 + 1.204 + // common code 1.205 + 1.206 + void field_offset_at(int n, Register tmp, Register dest, Register base); 1.207 + int field_offset_at(Register object, address bcp, int offset); 1.208 + void fast_iaaccess(int n, address bcp); 1.209 + void fast_iagetfield(address bcp); 1.210 + void fast_iaputfield(address bcp, bool do_store_check ); 1.211 + 1.212 + void index_check(Register array, Register index, int index_shift, Register tmp, Register res); 1.213 + void index_check_without_pop(Register array, Register index, int index_shift, Register tmp, Register res); 1.214 + 1.215 + void get_const(Register Rdst); 1.216 + void get_constant_pool(Register Rdst); 1.217 + void get_constant_pool_cache(Register Rdst); 1.218 + void get_cpool_and_tags(Register Rcpool, Register Rtags); 1.219 + void is_a(Label& L); 1.220 + 1.221 + // Load compiled (i2c) or interpreter entry and call from interpreted 1.222 + void call_from_interpreter(Register target, Register scratch, Register Rret); 1.223 + 1.224 + // -------------------------------------------------- 1.225 + 1.226 + void unlock_if_synchronized_method(TosState state, bool throw_monitor_exception = true, bool install_monitor_exception = true); 1.227 + 1.228 + void add_monitor_to_stack( bool stack_is_empty, 1.229 + Register Rtemp, 1.230 + Register Rtemp2 ); 1.231 + 1.232 + // Load/store aligned in _LP64 but unaligned otherwise 1.233 + // These only apply to the Interpreter expression stack and locals! 1.234 + void load_unaligned_double(Register r1, int offset, FloatRegister d); 1.235 + void store_unaligned_double(FloatRegister d, Register r1, int offset ); 1.236 + 1.237 + // Load/store aligned in _LP64 but unaligned otherwise 1.238 + void load_unaligned_long(Register r1, int offset, Register d); 1.239 + void store_unaligned_long(Register d, Register r1, int offset ); 1.240 + 1.241 + void access_local_int( Register index, Register dst ); 1.242 + void access_local_ptr( Register index, Register dst ); 1.243 + void access_local_returnAddress( Register index, Register dst ); 1.244 + void access_local_long( Register index, Register dst ); 1.245 + void access_local_float( Register index, FloatRegister dst ); 1.246 + void access_local_double( Register index, FloatRegister dst ); 1.247 +#ifdef ASSERT 1.248 + void check_for_regarea_stomp( Register Rindex, int offset, Register Rlimit, Register Rscratch, Register Rscratch1); 1.249 +#endif // ASSERT 1.250 + void store_local_int( Register index, Register src ); 1.251 + void store_local_ptr( Register index, Register src ); 1.252 + void store_local_ptr( int n, Register src ); 1.253 + void store_local_long( Register index, Register src ); 1.254 + void store_local_float( Register index, FloatRegister src ); 1.255 + void store_local_double( Register index, FloatRegister src ); 1.256 + 1.257 + // Helpers for swap and dup 1.258 + void load_ptr(int n, Register val); 1.259 + void store_ptr(int n, Register val); 1.260 + 1.261 + // Helper for getting receiver in register. 1.262 + void load_receiver(Register param_count, Register recv); 1.263 + 1.264 + static int top_most_monitor_byte_offset(); // offset in bytes to top of monitor block 1.265 + Address top_most_monitor(); 1.266 + void compute_stack_base( Register Rdest ); 1.267 + 1.268 +#endif /* CC_INTERP */ 1.269 + void get_method_counters(Register method, Register Rcounters, Label& skip); 1.270 + void increment_invocation_counter( Register Rcounters, Register Rtmp, Register Rtmp2 ); 1.271 + void increment_backedge_counter( Register Rcounters, Register Rtmp, Register Rtmp2 ); 1.272 +#ifndef CC_INTERP 1.273 + void test_backedge_count_for_osr( Register backedge_count, Register branch_bcp, Register Rtmp ); 1.274 + 1.275 +#endif /* CC_INTERP */ 1.276 + // Object locking 1.277 + void lock_object (Register lock_reg, Register obj_reg); 1.278 + void unlock_object(Register lock_reg); 1.279 + 1.280 +#ifndef CC_INTERP 1.281 + // Interpreter profiling operations 1.282 + void set_method_data_pointer(); 1.283 + void set_method_data_pointer_for_bcp(); 1.284 + void test_method_data_pointer(Label& zero_continue); 1.285 + void verify_method_data_pointer(); 1.286 + void test_invocation_counter_for_mdp(Register invocation_count, Register Rtmp, Label &profile_continue); 1.287 + 1.288 + void set_mdp_data_at(int constant, Register value); 1.289 + void increment_mdp_data_at(Address counter, Register bumped_count, 1.290 + bool decrement = false); 1.291 + void increment_mdp_data_at(int constant, Register bumped_count, 1.292 + bool decrement = false); 1.293 + void increment_mdp_data_at(Register reg, int constant, 1.294 + Register bumped_count, Register scratch2, 1.295 + bool decrement = false); 1.296 + void increment_mask_and_jump(Address counter_addr, 1.297 + int increment, int mask, 1.298 + Register scratch1, Register scratch2, 1.299 + Condition cond, Label *where); 1.300 + void set_mdp_flag_at(int flag_constant, Register scratch); 1.301 + void test_mdp_data_at(int offset, Register value, Label& not_equal_continue, 1.302 + Register scratch); 1.303 + 1.304 + void record_klass_in_profile(Register receiver, Register scratch, bool is_virtual_call); 1.305 + void record_klass_in_profile_helper(Register receiver, Register scratch, 1.306 + int start_row, Label& done, bool is_virtual_call); 1.307 + 1.308 + void update_mdp_by_offset(int offset_of_disp, Register scratch); 1.309 + void update_mdp_by_offset(Register reg, int offset_of_disp, 1.310 + Register scratch); 1.311 + void update_mdp_by_constant(int constant); 1.312 + void update_mdp_for_ret(TosState state, Register return_bci); 1.313 + 1.314 + void profile_taken_branch(Register scratch, Register bumped_count); 1.315 + void profile_not_taken_branch(Register scratch); 1.316 + void profile_call(Register scratch); 1.317 + void profile_final_call(Register scratch); 1.318 + void profile_virtual_call(Register receiver, Register scratch, bool receiver_can_be_null = false); 1.319 + void profile_ret(TosState state, Register return_bci, Register scratch); 1.320 + void profile_null_seen(Register scratch); 1.321 + void profile_typecheck(Register klass, Register scratch); 1.322 + void profile_typecheck_failed(Register scratch); 1.323 + void profile_switch_default(Register scratch); 1.324 + void profile_switch_case(Register index, 1.325 + Register scratch1, 1.326 + Register scratch2, 1.327 + Register scratch3); 1.328 + 1.329 + void profile_obj_type(Register obj, const Address& mdo_addr, Register tmp); 1.330 + void profile_arguments_type(Register callee, Register tmp1, Register tmp2, bool is_virtual); 1.331 + void profile_return_type(Register ret, Register tmp1, Register tmp2); 1.332 + void profile_parameters_type(Register tmp1, Register tmp2, Register tmp3, Register tmp4); 1.333 + 1.334 + // Debugging 1.335 + void interp_verify_oop(Register reg, TosState state, const char * file, int line); // only if +VerifyOops && state == atos 1.336 + void verify_oop_or_return_address(Register reg, Register rtmp); // for astore 1.337 + void verify_FPU(int stack_depth, TosState state = ftos); // only if +VerifyFPU && (state == ftos || state == dtos) 1.338 + 1.339 +#endif /* CC_INTERP */ 1.340 + // support for JVMTI/Dtrace 1.341 + typedef enum { NotifyJVMTI, SkipNotifyJVMTI } NotifyMethodExitMode; 1.342 + void notify_method_entry(); 1.343 + void notify_method_exit( 1.344 + bool save_result, TosState state, NotifyMethodExitMode mode); 1.345 + 1.346 + void save_return_value(TosState state, bool is_native_call); 1.347 + void restore_return_value(TosState state, bool is_native_call); 1.348 + 1.349 +}; 1.350 + 1.351 +#endif // CPU_SPARC_VM_INTERP_MASM_SPARC_HPP