1 /*
2 * Copyright (c) 2000, 2018, Oracle and/or its affiliates. All rights reserved.
3 * Copyright (c) 2012, 2015 SAP SE. All rights reserved.
4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5 *
6 * This code is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License version 2 only, as
8 * published by the Free Software Foundation.
9 *
10 * This code is distributed in the hope that it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13 * version 2 for more details (a copy is included in the LICENSE file that
14 * accompanied this code).
15 *
16 * You should have received a copy of the GNU General Public License version
17 * 2 along with this work; if not, write to the Free Software Foundation,
18 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
19 *
20 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
21 * or visit www.oracle.com if you need additional information or have any
22 * questions.
23 *
24 */
25
26 #ifndef CPU_PPC_VM_FRAME_PPC_INLINE_HPP
27 #define CPU_PPC_VM_FRAME_PPC_INLINE_HPP
28
29 #include "code/codeCache.hpp"
30 #include "code/vmreg.inline.hpp"
31 #include "utilities/align.hpp"
32
33 // Inline functions for ppc64 frames:
34
35 // Find codeblob and set deopt_state.
find_codeblob_and_set_pc_and_deopt_state(address pc)36 inline void frame::find_codeblob_and_set_pc_and_deopt_state(address pc) {
37 assert(pc != NULL, "precondition: must have PC");
38
39 _cb = CodeCache::find_blob(pc);
40 _pc = pc; // Must be set for get_deopt_original_pc()
41
42 _fp = (intptr_t*)own_abi()->callers_sp;
43
44 address original_pc = CompiledMethod::get_deopt_original_pc(this);
45 if (original_pc != NULL) {
46 _pc = original_pc;
47 _deopt_state = is_deoptimized;
48 } else {
49 _deopt_state = not_deoptimized;
50 }
51
52 assert(((uint64_t)_sp & 0xf) == 0, "SP must be 16-byte aligned");
53 }
54
55 // Constructors
56
57 // Initialize all fields, _unextended_sp will be adjusted in find_codeblob_and_set_pc_and_deopt_state.
frame()58 inline frame::frame() : _sp(NULL), _pc(NULL), _cb(NULL), _deopt_state(unknown), _unextended_sp(NULL), _fp(NULL) {}
59
frame(intptr_t * sp)60 inline frame::frame(intptr_t* sp) : _sp(sp), _unextended_sp(sp) {
61 find_codeblob_and_set_pc_and_deopt_state((address)own_abi()->lr); // also sets _fp and adjusts _unextended_sp
62 }
63
frame(intptr_t * sp,address pc)64 inline frame::frame(intptr_t* sp, address pc) : _sp(sp), _unextended_sp(sp) {
65 find_codeblob_and_set_pc_and_deopt_state(pc); // also sets _fp and adjusts _unextended_sp
66 }
67
frame(intptr_t * sp,address pc,intptr_t * unextended_sp)68 inline frame::frame(intptr_t* sp, address pc, intptr_t* unextended_sp) : _sp(sp), _unextended_sp(unextended_sp) {
69 find_codeblob_and_set_pc_and_deopt_state(pc); // also sets _fp and adjusts _unextended_sp
70 }
71
72 // Accessors
73
74 // Return unique id for this frame. The id must have a value where we
75 // can distinguish identity and younger/older relationship. NULL
76 // represents an invalid (incomparable) frame.
id(void) const77 inline intptr_t* frame::id(void) const {
78 // Use _fp. _sp or _unextended_sp wouldn't be correct due to resizing.
79 return _fp;
80 }
81
82 // Return true if this frame is older (less recent activation) than
83 // the frame represented by id.
is_older(intptr_t * id) const84 inline bool frame::is_older(intptr_t* id) const {
85 assert(this->id() != NULL && id != NULL, "NULL frame id");
86 // Stack grows towards smaller addresses on ppc64.
87 return this->id() > id;
88 }
89
frame_size(RegisterMap * map) const90 inline int frame::frame_size(RegisterMap* map) const {
91 // Stack grows towards smaller addresses on PPC64: sender is at a higher address.
92 return sender_sp() - sp();
93 }
94
95 // Return the frame's stack pointer before it has been extended by a
96 // c2i adapter. This is needed by deoptimization for ignoring c2i adapter
97 // frames.
unextended_sp() const98 inline intptr_t* frame::unextended_sp() const {
99 return _unextended_sp;
100 }
101
102 // All frames have this field.
sender_pc() const103 inline address frame::sender_pc() const {
104 return (address)callers_abi()->lr;
105 }
sender_pc_addr() const106 inline address* frame::sender_pc_addr() const {
107 return (address*)&(callers_abi()->lr);
108 }
109
110 // All frames have this field.
sender_sp() const111 inline intptr_t* frame::sender_sp() const {
112 return (intptr_t*)callers_abi();
113 }
114
115 // All frames have this field.
link() const116 inline intptr_t* frame::link() const {
117 return (intptr_t*)callers_abi()->callers_sp;
118 }
119
real_fp() const120 inline intptr_t* frame::real_fp() const {
121 return fp();
122 }
123
124 // Template Interpreter frame value accessors.
125
get_ijava_state() const126 inline frame::ijava_state* frame::get_ijava_state() const {
127 return (ijava_state*) ((uintptr_t)fp() - ijava_state_size);
128 }
129
interpreter_frame_locals_addr() const130 inline intptr_t** frame::interpreter_frame_locals_addr() const {
131 return (intptr_t**) &(get_ijava_state()->locals);
132 }
133
interpreter_frame_bcp_addr() const134 inline intptr_t* frame::interpreter_frame_bcp_addr() const {
135 return (intptr_t*) &(get_ijava_state()->bcp);
136 }
137
interpreter_frame_mdp_addr() const138 inline intptr_t* frame::interpreter_frame_mdp_addr() const {
139 return (intptr_t*) &(get_ijava_state()->mdx);
140 }
141
142 // Pointer beyond the "oldest/deepest" BasicObjectLock on stack.
interpreter_frame_monitor_end() const143 inline BasicObjectLock* frame::interpreter_frame_monitor_end() const {
144 return (BasicObjectLock*) get_ijava_state()->monitors;
145 }
146
interpreter_frame_monitor_begin() const147 inline BasicObjectLock* frame::interpreter_frame_monitor_begin() const {
148 return (BasicObjectLock*) get_ijava_state();
149 }
150
151 // Return register stack slot addr at which currently interpreted method is found.
interpreter_frame_method_addr() const152 inline Method** frame::interpreter_frame_method_addr() const {
153 return (Method**) &(get_ijava_state()->method);
154 }
155
interpreter_frame_mirror_addr() const156 inline oop* frame::interpreter_frame_mirror_addr() const {
157 return (oop*) &(get_ijava_state()->mirror);
158 }
159
interpreter_frame_cache_addr() const160 inline ConstantPoolCache** frame::interpreter_frame_cache_addr() const {
161 return (ConstantPoolCache**) &(get_ijava_state()->cpoolCache);
162 }
163
interpreter_frame_temp_oop_addr() const164 inline oop* frame::interpreter_frame_temp_oop_addr() const {
165 return (oop*) &(get_ijava_state()->oop_tmp);
166 }
167
interpreter_frame_esp() const168 inline intptr_t* frame::interpreter_frame_esp() const {
169 return (intptr_t*) get_ijava_state()->esp;
170 }
171
172 // Convenient setters
interpreter_frame_set_monitor_end(BasicObjectLock * end)173 inline void frame::interpreter_frame_set_monitor_end(BasicObjectLock* end) { get_ijava_state()->monitors = (intptr_t) end;}
interpreter_frame_set_cpcache(ConstantPoolCache * cp)174 inline void frame::interpreter_frame_set_cpcache(ConstantPoolCache* cp) { *interpreter_frame_cache_addr() = cp; }
interpreter_frame_set_esp(intptr_t * esp)175 inline void frame::interpreter_frame_set_esp(intptr_t* esp) { get_ijava_state()->esp = (intptr_t) esp; }
interpreter_frame_set_top_frame_sp(intptr_t * top_frame_sp)176 inline void frame::interpreter_frame_set_top_frame_sp(intptr_t* top_frame_sp) { get_ijava_state()->top_frame_sp = (intptr_t) top_frame_sp; }
interpreter_frame_set_sender_sp(intptr_t * sender_sp)177 inline void frame::interpreter_frame_set_sender_sp(intptr_t* sender_sp) { get_ijava_state()->sender_sp = (intptr_t) sender_sp; }
178
interpreter_frame_expression_stack() const179 inline intptr_t* frame::interpreter_frame_expression_stack() const {
180 return (intptr_t*)interpreter_frame_monitor_end() - 1;
181 }
182
183 // top of expression stack
interpreter_frame_tos_address() const184 inline intptr_t* frame::interpreter_frame_tos_address() const {
185 return ((intptr_t*) get_ijava_state()->esp) + Interpreter::stackElementWords;
186 }
187
interpreter_frame_tos_at(jint offset) const188 inline intptr_t* frame::interpreter_frame_tos_at(jint offset) const {
189 return &interpreter_frame_tos_address()[offset];
190 }
191
interpreter_frame_monitor_size()192 inline int frame::interpreter_frame_monitor_size() {
193 // Number of stack slots for a monitor.
194 return align_up(BasicObjectLock::size(), // number of stack slots
195 WordsPerLong); // number of stack slots for a Java long
196 }
197
interpreter_frame_monitor_size_in_bytes()198 inline int frame::interpreter_frame_monitor_size_in_bytes() {
199 return frame::interpreter_frame_monitor_size() * wordSize;
200 }
201
202 // entry frames
203
entry_frame_argument_at(int offset) const204 inline intptr_t* frame::entry_frame_argument_at(int offset) const {
205 // Since an entry frame always calls the interpreter first, the
206 // parameters are on the stack and relative to known register in the
207 // entry frame.
208 intptr_t* tos = (intptr_t*)get_entry_frame_locals()->arguments_tos_address;
209 return &tos[offset + 1]; // prepushed tos
210 }
211
entry_frame_call_wrapper_addr() const212 inline JavaCallWrapper** frame::entry_frame_call_wrapper_addr() const {
213 return (JavaCallWrapper**)&get_entry_frame_locals()->call_wrapper_address;
214 }
215
saved_oop_result(RegisterMap * map) const216 inline oop frame::saved_oop_result(RegisterMap* map) const {
217 return *((oop*)map->location(R3->as_VMReg()));
218 }
219
set_saved_oop_result(RegisterMap * map,oop obj)220 inline void frame::set_saved_oop_result(RegisterMap* map, oop obj) {
221 *((oop*)map->location(R3->as_VMReg())) = obj;
222 }
223
224 #endif // CPU_PPC_VM_FRAME_PPC_INLINE_HPP
225