1 /* 2 * Copyright (c) 2000, 2014, Oracle and/or its affiliates. All rights reserved. 3 * Copyright 2012, 2014 SAP AG. 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 32 // Inline functions for ppc64 frames: 33 34 // Find codeblob and set deopt_state. 35 inline void frame::find_codeblob_and_set_pc_and_deopt_state(address pc) { 36 assert(pc != NULL, "precondition: must have PC"); 37 38 _cb = CodeCache::find_blob(pc); 39 _pc = pc; // Must be set for get_deopt_original_pc() 40 41 _fp = (intptr_t*)own_abi()->callers_sp; 42 // Use _fp - frame_size, needs to be done between _cb and _pc initialization 43 // and get_deopt_original_pc. 44 adjust_unextended_sp(); 45 46 address original_pc = nmethod::get_deopt_original_pc(this); 47 if (original_pc != NULL) { 48 _pc = original_pc; 49 _deopt_state = is_deoptimized; 50 } else { 51 _deopt_state = not_deoptimized; 52 } 53 54 assert(((uint64_t)_sp & 0xf) == 0, "SP must be 16-byte aligned"); 55 } 56 57 // Constructors 58 59 // Initialize all fields, _unextended_sp will be adjusted in find_codeblob_and_set_pc_and_deopt_state. 60 inline frame::frame() : _sp(NULL), _unextended_sp(NULL), _fp(NULL), _cb(NULL), _pc(NULL), _deopt_state(unknown) {} 61 62 inline frame::frame(intptr_t* sp) : _sp(sp), _unextended_sp(sp) { 63 find_codeblob_and_set_pc_and_deopt_state((address)own_abi()->lr); // also sets _fp and adjusts _unextended_sp 64 } 65 66 inline frame::frame(intptr_t* sp, address pc) : _sp(sp), _unextended_sp(sp) { 67 find_codeblob_and_set_pc_and_deopt_state(pc); // also sets _fp and adjusts _unextended_sp 68 } 69 70 inline frame::frame(intptr_t* sp, address pc, intptr_t* unextended_sp) : _sp(sp), _unextended_sp(unextended_sp) { 71 find_codeblob_and_set_pc_and_deopt_state(pc); // also sets _fp and adjusts _unextended_sp 72 } 73 74 // Accessors 75 76 // Return unique id for this frame. The id must have a value where we 77 // can distinguish identity and younger/older relationship. NULL 78 // represents an invalid (incomparable) frame. 79 inline intptr_t* frame::id(void) const { 80 // Use _fp. _sp or _unextended_sp wouldn't be correct due to resizing. 81 return _fp; 82 } 83 84 // Return true if this frame is older (less recent activation) than 85 // the frame represented by id. 86 inline bool frame::is_older(intptr_t* id) const { 87 assert(this->id() != NULL && id != NULL, "NULL frame id"); 88 // Stack grows towards smaller addresses on ppc64. 89 return this->id() > id; 90 } 91 92 inline int frame::frame_size(RegisterMap* map) const { 93 // Stack grows towards smaller addresses on PPC64: sender is at a higher address. 94 return sender_sp() - sp(); 95 } 96 97 // Return the frame's stack pointer before it has been extended by a 98 // c2i adapter. This is needed by deoptimization for ignoring c2i adapter 99 // frames. 100 inline intptr_t* frame::unextended_sp() const { 101 return _unextended_sp; 102 } 103 104 // All frames have this field. 105 inline address frame::sender_pc() const { 106 return (address)callers_abi()->lr; 107 } 108 inline address* frame::sender_pc_addr() const { 109 return (address*)&(callers_abi()->lr); 110 } 111 112 // All frames have this field. 113 inline intptr_t* frame::sender_sp() const { 114 return (intptr_t*)callers_abi(); 115 } 116 117 // All frames have this field. 118 inline intptr_t* frame::link() const { 119 return (intptr_t*)callers_abi()->callers_sp; 120 } 121 122 inline intptr_t* frame::real_fp() const { 123 return fp(); 124 } 125 126 #ifdef CC_INTERP 127 128 inline interpreterState frame::get_interpreterState() const { 129 return (interpreterState)(((address)callers_abi()) 130 - frame::interpreter_frame_cinterpreterstate_size_in_bytes()); 131 } 132 133 inline intptr_t** frame::interpreter_frame_locals_addr() const { 134 interpreterState istate = get_interpreterState(); 135 return (intptr_t**)&istate->_locals; 136 } 137 138 inline intptr_t* frame::interpreter_frame_bcp_addr() const { 139 interpreterState istate = get_interpreterState(); 140 return (intptr_t*)&istate->_bcp; 141 } 142 143 inline intptr_t* frame::interpreter_frame_mdp_addr() const { 144 interpreterState istate = get_interpreterState(); 145 return (intptr_t*)&istate->_mdx; 146 } 147 148 inline intptr_t* frame::interpreter_frame_expression_stack() const { 149 return (intptr_t*)interpreter_frame_monitor_end() - 1; 150 } 151 152 inline jint frame::interpreter_frame_expression_stack_direction() { 153 return -1; 154 } 155 156 // top of expression stack 157 inline intptr_t* frame::interpreter_frame_tos_address() const { 158 interpreterState istate = get_interpreterState(); 159 return istate->_stack + 1; 160 } 161 162 inline intptr_t* frame::interpreter_frame_tos_at(jint offset) const { 163 return &interpreter_frame_tos_address()[offset]; 164 } 165 166 // monitor elements 167 168 // in keeping with Intel side: end is lower in memory than begin; 169 // and beginning element is oldest element 170 // Also begin is one past last monitor. 171 172 inline BasicObjectLock* frame::interpreter_frame_monitor_begin() const { 173 return get_interpreterState()->monitor_base(); 174 } 175 176 inline BasicObjectLock* frame::interpreter_frame_monitor_end() const { 177 return (BasicObjectLock*)get_interpreterState()->stack_base(); 178 } 179 180 inline int frame::interpreter_frame_cinterpreterstate_size_in_bytes() { 181 // Size of an interpreter object. Not aligned with frame size. 182 return round_to(sizeof(BytecodeInterpreter), 8); 183 } 184 185 inline Method** frame::interpreter_frame_method_addr() const { 186 interpreterState istate = get_interpreterState(); 187 return &istate->_method; 188 } 189 190 // Constant pool cache 191 192 inline ConstantPoolCache** frame::interpreter_frame_cpoolcache_addr() const { 193 interpreterState istate = get_interpreterState(); 194 return &istate->_constants; // should really use accessor 195 } 196 197 inline ConstantPoolCache** frame::interpreter_frame_cache_addr() const { 198 interpreterState istate = get_interpreterState(); 199 return &istate->_constants; 200 } 201 202 #else // !CC_INTERP 203 204 // Template Interpreter frame value accessors. 205 206 inline frame::ijava_state* frame::get_ijava_state() const { 207 return (ijava_state*) ((uintptr_t)fp() - ijava_state_size); 208 } 209 210 inline intptr_t** frame::interpreter_frame_locals_addr() const { 211 return (intptr_t**) &(get_ijava_state()->locals); 212 } 213 inline intptr_t* frame::interpreter_frame_bcp_addr() const { 214 return (intptr_t*) &(get_ijava_state()->bcp); 215 } 216 inline intptr_t* frame::interpreter_frame_mdp_addr() const { 217 return (intptr_t*) &(get_ijava_state()->mdx); 218 } 219 // Pointer beyond the "oldest/deepest" BasicObjectLock on stack. 220 inline BasicObjectLock* frame::interpreter_frame_monitor_end() const { 221 return (BasicObjectLock *) get_ijava_state()->monitors; 222 } 223 224 inline BasicObjectLock* frame::interpreter_frame_monitor_begin() const { 225 return (BasicObjectLock *) get_ijava_state(); 226 } 227 228 // SAPJVM ASc 2012-11-21. Return register stack slot addr at which currently interpreted method is found 229 inline Method** frame::interpreter_frame_method_addr() const { 230 return (Method**) &(get_ijava_state()->method); 231 } 232 inline ConstantPoolCache** frame::interpreter_frame_cpoolcache_addr() const { 233 return (ConstantPoolCache**) &(get_ijava_state()->cpoolCache); 234 } 235 inline ConstantPoolCache** frame::interpreter_frame_cache_addr() const { 236 return (ConstantPoolCache**) &(get_ijava_state()->cpoolCache); 237 } 238 239 inline oop* frame::interpreter_frame_temp_oop_addr() const { 240 return (oop *) &(get_ijava_state()->oop_tmp); 241 } 242 inline intptr_t* frame::interpreter_frame_esp() const { 243 return (intptr_t*) get_ijava_state()->esp; 244 } 245 246 // Convenient setters 247 inline void frame::interpreter_frame_set_monitor_end(BasicObjectLock* end) { get_ijava_state()->monitors = (intptr_t) end;} 248 inline void frame::interpreter_frame_set_cpcache(ConstantPoolCache* cp) { *frame::interpreter_frame_cpoolcache_addr() = cp; } 249 inline void frame::interpreter_frame_set_esp(intptr_t* esp) { get_ijava_state()->esp = (intptr_t) esp; } 250 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; } 251 inline void frame::interpreter_frame_set_sender_sp(intptr_t* sender_sp) { get_ijava_state()->sender_sp = (intptr_t) sender_sp; } 252 253 inline intptr_t* frame::interpreter_frame_expression_stack() const { 254 return (intptr_t*)interpreter_frame_monitor_end() - 1; 255 } 256 257 inline jint frame::interpreter_frame_expression_stack_direction() { 258 return -1; 259 } 260 261 // top of expression stack 262 inline intptr_t* frame::interpreter_frame_tos_address() const { 263 return ((intptr_t*) get_ijava_state()->esp) + Interpreter::stackElementWords; 264 } 265 266 inline intptr_t* frame::interpreter_frame_tos_at(jint offset) const { 267 return &interpreter_frame_tos_address()[offset]; 268 } 269 270 #endif // CC_INTERP 271 272 inline int frame::interpreter_frame_monitor_size() { 273 // Number of stack slots for a monitor. 274 return round_to(BasicObjectLock::size(), // number of stack slots 275 WordsPerLong); // number of stack slots for a Java long 276 } 277 278 inline int frame::interpreter_frame_monitor_size_in_bytes() { 279 return frame::interpreter_frame_monitor_size() * wordSize; 280 } 281 282 // entry frames 283 284 inline intptr_t* frame::entry_frame_argument_at(int offset) const { 285 // Since an entry frame always calls the interpreter first, the 286 // parameters are on the stack and relative to known register in the 287 // entry frame. 288 intptr_t* tos = (intptr_t*)get_entry_frame_locals()->arguments_tos_address; 289 return &tos[offset + 1]; // prepushed tos 290 } 291 292 inline JavaCallWrapper** frame::entry_frame_call_wrapper_addr() const { 293 return (JavaCallWrapper**)&get_entry_frame_locals()->call_wrapper_address; 294 } 295 296 inline oop frame::saved_oop_result(RegisterMap* map) const { 297 return *((oop*)map->location(R3->as_VMReg())); 298 } 299 300 inline void frame::set_saved_oop_result(RegisterMap* map, oop obj) { 301 *((oop*)map->location(R3->as_VMReg())) = obj; 302 } 303 304 #endif // CPU_PPC_VM_FRAME_PPC_INLINE_HPP