1 /*
2 * Copyright (c) 2003, 2018, Oracle and/or its affiliates. All rights reserved.
3 * Copyright (c) 2014, 2015, Red Hat Inc. All rights reserved.
4 * Copyright (c) 2015, Linaro Ltd. All rights reserved.
5 * Copyright (c) 2015-2018, Azul Systems, Inc. All rights reserved.
6 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
7 *
8 * This code is free software; you can redistribute it and/or modify it
9 * under the terms of the GNU General Public License version 2 only, as
10 * published by the Free Software Foundation.
11 *
12 * This code is distributed in the hope that it will be useful, but WITHOUT
13 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15 * version 2 for more details (a copy is included in the LICENSE file that
16 * accompanied this code).
17 *
18 * You should have received a copy of the GNU General Public License version
19 * 2 along with this work; if not, write to the Free Software Foundation,
20 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
21 *
22 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
23 * or visit www.oracle.com if you need additional information or have any
24 * questions.
25 *
26 */
27
28 #ifndef CPU_AARCH32_VM_INTERP_MASM_AARCH32_64_HPP
29 #define CPU_AARCH32_VM_INTERP_MASM_AARCH32_64_HPP
30
31 #include "asm/macroAssembler.hpp"
32 #include "interpreter/invocationCounter.hpp"
33 #include "runtime/frame.hpp"
34
35 // This file specializes the assember with interpreter-specific macros
36
37 typedef ByteSize (*OffsetFunction)(uint);
38
39 class InterpreterMacroAssembler: public MacroAssembler {
40 protected:
41 // Interpreter specific version of call_VM_base
42 using MacroAssembler::call_VM_leaf_base;
43
44 public:
45 virtual void call_VM_leaf_base(address entry_point,
46 int number_of_arguments,
47 Label *retaddr = NULL);
48 protected:
49 virtual void call_VM_base(Register oop_result,
50 Register java_thread,
51 Register last_java_sp,
52 address entry_point,
53 int number_of_arguments,
54 bool check_exceptions);
55
56 // base routine for all dispatches
57 void dispatch_base(TosState state, address* table,
58 bool verifyoop = true, bool generate_poll = false);
59
60 public:
61 InterpreterMacroAssembler(CodeBuffer* code) : MacroAssembler(code) {}
62
63 void load_earlyret_value(TosState state);
64
65 void jump_to_entry(address entry);
66
67 virtual void check_and_handle_popframe(Register java_thread);
68 virtual void check_and_handle_earlyret(Register java_thread);
69
70 // Interpreter-specific registers
71 void save_bcp() {
72 str(rbcp, Address(rfp, frame::get_interpreter_frame_bcp_offset() * wordSize));
73 }
74
75 void restore_bcp() {
76 ldr(rbcp, Address(rfp, frame::get_interpreter_frame_bcp_offset() * wordSize));
77 }
78
79 void restore_locals() {
80 ldr(rlocals, Address(rfp, frame::get_interpreter_frame_locals_offset() * wordSize));
81 }
82
83 void restore_constant_pool_cache() {
84 ldr(rcpool, Address(rfp, frame::get_interpreter_frame_cache_offset() * wordSize));
85 }
86
87 void get_dispatch();
88
89 // Helpers for runtime call arguments/results
90
91 void get_method(Register reg) {
92 ldr(reg, Address(rfp, frame::get_interpreter_frame_method_offset() * wordSize));
93 }
94
95 void get_const(Register reg) {
96 get_method(reg);
97 ldr(reg, Address(reg, in_bytes(Method::const_offset())));
98 }
99
100 void get_constant_pool(Register reg) {
101 get_const(reg);
102 ldr(reg, Address(reg, in_bytes(ConstMethod::constants_offset())));
103 }
104
105 void get_constant_pool_cache(Register reg) {
106 get_constant_pool(reg);
107 ldr(reg, Address(reg, ConstantPool::cache_offset_in_bytes()));
108 }
109
110 void get_cpool_and_tags(Register cpool, Register tags) {
111 get_constant_pool(cpool);
112 ldr(tags, Address(cpool, ConstantPool::tags_offset_in_bytes()));
113 }
114
115 void get_unsigned_2_byte_index_at_bcp(Register reg, int bcp_offset);
116 void get_cache_and_index_at_bcp(Register cache, Register index, int bcp_offset, size_t index_size = sizeof(u2));
117 void get_cache_and_index_and_bytecode_at_bcp(Register cache, Register index, Register bytecode, int byte_no, int bcp_offset, size_t index_size = sizeof(u2));
118 void get_cache_entry_pointer_at_bcp(Register cache, Register tmp, int bcp_offset, size_t index_size = sizeof(u2));
119 void get_cache_index_at_bcp(Register index, int bcp_offset, size_t index_size = sizeof(u2));
120 void get_method_counters(Register method, Register mcs, Label& skip);
121
122 // load cpool->resolved_references(index);
123 void load_resolved_reference_at_index(Register result, Register index, Register tmp = r5);
124
125 // load cpool->resolved_klass_at(index);
126 void load_resolved_klass_at_offset(Register cpool, Register index, Register klass, Register temp);
127
128 void pop_ptr(Register r = r0);
129 void pop_i(Register r = r0);
130 void pop_l(Register rLo = r0, Register rHi = r1);
131 void push_ptr(Register r = r0);
132 void push_i(Register r = r0);
133 void push_l(Register rLo = r0, Register rHi = r1);
134
135 void push_f(FloatRegister r = d0);
136 void push_d(FloatRegister r = d0);
137 void pop_f(FloatRegister r = d0);
138 void pop_d(FloatRegister r = d0);
139
140
141 void pop(Register r ) { ((MacroAssembler*)this)->pop(r); }
142
143 void push(Register r ) { ((MacroAssembler*)this)->push(r); }
144
145 void pop(TosState state); // transition vtos -> state
146 void push(TosState state); // transition state -> vtos
147
148 void pop(RegSet regs, Register stack) { ((MacroAssembler*)this)->pop(regs, stack); }
149 void push(RegSet regs, Register stack) { ((MacroAssembler*)this)->push(regs, stack); }
150
151 void empty_expression_stack() {
152 ldr(sp, Address(rfp, frame::get_interpreter_frame_monitor_block_top_offset() * wordSize));
153 // NULL last_sp until next java call
154 mov(rscratch1, 0);
155 str(rscratch1, Address(rfp, frame::get_interpreter_frame_last_sp_offset() * wordSize));
156 }
157
158 // Helpers for swap and dup
159 void load_ptr(int n, Register val);
160 void store_ptr(int n, Register val);
161
162 // Load ftos/dtos from given address
163 void load_float(Address src);
164 void load_double(Address src);
165
166 // Generate a subtype check: branch to ok_is_subtype if sub_klass is
167 // a subtype of super_klass.
168 void gen_subtype_check( Register sub_klass, Label &ok_is_subtype );
169
170 // Dispatching
171 void dispatch_prolog(TosState state, int step = 0);
172 void dispatch_epilog(TosState state, int step = 0);
173 // dispatch via rscratch1
174 void dispatch_only(TosState state, bool generate_poll = false);
175 // dispatch normal table via rscratch1 (assume rscratch1 is loaded already)
176 void dispatch_only_normal(TosState state);
177 void dispatch_only_noverify(TosState state);
178 // load rscratch1 from [rbcp + step] and dispatch via rscratch1
179 void dispatch_next(TosState state, int step = 0, bool generate_poll = false);
180 // load rscratch1 from [esi] and dispatch via rscratch1 and table
181 void dispatch_via (TosState state, address* table);
182
183 // jump to an invoked target
184 void prepare_to_jump_from_interpreted();
185 void jump_from_interpreted(Register method, Register temp);
186
187
188 // Returning from interpreted functions
189 //
190 // Removes the current activation (incl. unlocking of monitors)
191 // and sets up the return address. This code is also used for
192 // exception unwindwing. In that case, we do not want to throw
193 // IllegalMonitorStateExceptions, since that might get us into an
194 // infinite rethrow exception loop.
195 // Additionally this code is used for popFrame and earlyReturn.
196 // In popFrame case we want to skip throwing an exception,
197 // installing an exception, and notifying jvmdi.
198 // In earlyReturn case we only want to skip throwing an exception
199 // and installing an exception.
200 void remove_activation(TosState state,
201 bool throw_monitor_exception = true,
202 bool install_monitor_exception = true,
203 bool notify_jvmdi = true);
204
205 // FIXME: Give us a valid frame at a null check.
206 virtual void null_check(Register reg, int offset = -1) {
207 // #ifdef ASSERT
208 // save_bcp();
209 // set_last_Java_frame(sp, rfp, (address) pc());
210 // #endif
211 MacroAssembler::null_check(reg, offset);
212 // #ifdef ASSERT
213 // reset_last_Java_frame(true);
214 // #endif
215 }
216
217 // Object locking
218 void lock_object (Register lock_reg);
219 void unlock_object(Register lock_reg);
220
221 // Interpreter profiling operations
222 void set_method_data_pointer_for_bcp();
223 void test_method_data_pointer(Register mdp, Label& zero_continue);
224 void verify_method_data_pointer();
225
226 void set_mdp_data_at(Register mdp_in, int constant, Register value);
227 void increment_mdp_data_at(Address data, bool decrement = false);
228 void increment_mdp_data_at(Register mdp_in, int constant,
229 bool decrement = false);
230 void increment_mdp_data_at(Register mdp_in, Register reg, int constant,
231 bool decrement = false);
232 void increment_mask_and_jump(Address counter_addr,
233 int increment, Address mask,
234 Register scratch, Register scratch2,
235 bool preloaded, Condition cond,
236 Label* where);
237 void set_mdp_flag_at(Register mdp_in, int flag_constant);
238 void test_mdp_data_at(Register mdp_in, int offset, Register value,
239 Register test_value_out,
240 Label& not_equal_continue);
241
242 void record_klass_in_profile(Register receiver, Register mdp,
243 Register reg2, bool is_virtual_call);
244 void record_klass_in_profile_helper(Register receiver, Register mdp,
245 Register reg2, int start_row,
246 Label& done, bool is_virtual_call);
247 void record_item_in_profile_helper(Register item, Register mdp,
248 Register reg2, int start_row, Label& done, int total_rows,
249 OffsetFunction item_offset_fn, OffsetFunction item_count_offset_fn,
250 int non_profiled_offset);
251
252 void update_mdp_by_offset(Register mdp_in, int offset_of_offset);
253 void update_mdp_by_offset(Register mdp_in, Register reg, int offset_of_disp);
254 void update_mdp_by_constant(Register mdp_in, int constant);
255 void update_mdp_for_ret(Register return_bci);
256
257 // narrow int return value
258 void narrow(Register result);
259
260 void profile_taken_branch(Register mdp, Register bumped_count);
261 void profile_not_taken_branch(Register mdp);
262 void profile_call(Register mdp);
263 void profile_final_call(Register mdp);
264 void profile_virtual_call(Register receiver, Register mdp,
265 Register scratch2,
266 bool receiver_can_be_null = false);
267 void profile_called_method(Register method, Register mdp, Register reg2) NOT_JVMCI_RETURN;
268 void profile_ret(Register return_bci, Register mdp);
269 void profile_null_seen(Register mdp);
270 void profile_typecheck(Register mdp, Register klass, Register scratch);
271 void profile_typecheck_failed(Register mdp);
272 void profile_switch_default(Register mdp);
273 void profile_switch_case(Register index_in_scratch, Register mdp,
274 Register scratch2);
275
276 void profile_obj_type(Register obj, const Address& mdo_addr);
277 void profile_arguments_type(Register mdp, Register callee, Register tmp, bool is_virtual);
278 void profile_return_type(Register mdp, Register ret, Register tmp);
279 void profile_parameters_type(Register mdp, Register tmp1, Register tmp2);
280
281 // Debugging
282 // only if +VerifyOops && state == atos
283 void verify_oop(Register reg, TosState state = atos);
284 // only if +VerifyFPU && (state == ftos || state == dtos)
285 void verify_FPU(int stack_depth, TosState state = ftos);
286
287 typedef enum { NotifyJVMTI, SkipNotifyJVMTI } NotifyMethodExitMode;
288
289 // support for jvmti/dtrace
290 void notify_method_entry();
291 void notify_method_exit(TosState state, NotifyMethodExitMode mode);
292
293 virtual void _call_Unimplemented(address call_site) {
294 save_bcp();
295 set_last_Java_frame(sp, rfp, (address) pc(), rscratch1);
296 MacroAssembler::_call_Unimplemented(call_site);
297 }
298 };
299
300 #endif // CPU_AARCH32_VM_INTERP_MASM_AARCH32_64_HPP