Mercurial > hg > graal-compiler
view src/cpu/ppc/vm/frame_ppc.inline.hpp @ 19171:5adc03d22312
Merge.
author | Thomas Wuerthinger <thomas.wuerthinger@oracle.com> |
---|---|
date | Fri, 06 Feb 2015 03:25:19 +0100 |
parents | 63c5920a038d |
children |
line wrap: on
line source
/* * Copyright (c) 2000, 2013, Oracle and/or its affiliates. All rights reserved. * Copyright 2012, 2014 SAP AG. All rights reserved. * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. * * This code is free software; you can redistribute it and/or modify it * under the terms of the GNU General Public License version 2 only, as * published by the Free Software Foundation. * * This code is distributed in the hope that it will be useful, but WITHOUT * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License * version 2 for more details (a copy is included in the LICENSE file that * accompanied this code). * * You should have received a copy of the GNU General Public License version * 2 along with this work; if not, write to the Free Software Foundation, * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. * * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA * or visit www.oracle.com if you need additional information or have any * questions. * */ #ifndef CPU_PPC_VM_FRAME_PPC_INLINE_HPP #define CPU_PPC_VM_FRAME_PPC_INLINE_HPP #include "code/codeCache.hpp" // Inline functions for ppc64 frames: // Find codeblob and set deopt_state. inline void frame::find_codeblob_and_set_pc_and_deopt_state(address pc) { assert(pc != NULL, "precondition: must have PC"); _cb = CodeCache::find_blob(pc); _pc = pc; // Must be set for get_deopt_original_pc() _fp = (intptr_t*)own_abi()->callers_sp; // Use _fp - frame_size, needs to be done between _cb and _pc initialization // and get_deopt_original_pc. adjust_unextended_sp(); address original_pc = nmethod::get_deopt_original_pc(this); if (original_pc != NULL) { _pc = original_pc; _deopt_state = is_deoptimized; } else { _deopt_state = not_deoptimized; } assert(((uint64_t)_sp & 0xf) == 0, "SP must be 16-byte aligned"); } // Constructors // Initialize all fields, _unextended_sp will be adjusted in find_codeblob_and_set_pc_and_deopt_state. inline frame::frame() : _sp(NULL), _unextended_sp(NULL), _fp(NULL), _cb(NULL), _pc(NULL), _deopt_state(unknown) {} inline frame::frame(intptr_t* sp) : _sp(sp), _unextended_sp(sp) { find_codeblob_and_set_pc_and_deopt_state((address)own_abi()->lr); // also sets _fp and adjusts _unextended_sp } inline frame::frame(intptr_t* sp, address pc) : _sp(sp), _unextended_sp(sp) { find_codeblob_and_set_pc_and_deopt_state(pc); // also sets _fp and adjusts _unextended_sp } inline frame::frame(intptr_t* sp, address pc, intptr_t* unextended_sp) : _sp(sp), _unextended_sp(unextended_sp) { find_codeblob_and_set_pc_and_deopt_state(pc); // also sets _fp and adjusts _unextended_sp } // Accessors // Return unique id for this frame. The id must have a value where we // can distinguish identity and younger/older relationship. NULL // represents an invalid (incomparable) frame. inline intptr_t* frame::id(void) const { // Use _fp. _sp or _unextended_sp wouldn't be correct due to resizing. return _fp; } // Return true if this frame is older (less recent activation) than // the frame represented by id. inline bool frame::is_older(intptr_t* id) const { assert(this->id() != NULL && id != NULL, "NULL frame id"); // Stack grows towards smaller addresses on ppc64. return this->id() > id; } inline int frame::frame_size(RegisterMap* map) const { // Stack grows towards smaller addresses on PPC64: sender is at a higher address. return sender_sp() - sp(); } // Return the frame's stack pointer before it has been extended by a // c2i adapter. This is needed by deoptimization for ignoring c2i adapter // frames. inline intptr_t* frame::unextended_sp() const { return _unextended_sp; } // All frames have this field. inline address frame::sender_pc() const { return (address)callers_abi()->lr; } inline address* frame::sender_pc_addr() const { return (address*)&(callers_abi()->lr); } // All frames have this field. inline intptr_t* frame::sender_sp() const { return (intptr_t*)callers_abi(); } // All frames have this field. inline intptr_t* frame::link() const { return (intptr_t*)callers_abi()->callers_sp; } inline intptr_t* frame::real_fp() const { return fp(); } #ifdef CC_INTERP inline interpreterState frame::get_interpreterState() const { return (interpreterState)(((address)callers_abi()) - frame::interpreter_frame_cinterpreterstate_size_in_bytes()); } inline intptr_t** frame::interpreter_frame_locals_addr() const { interpreterState istate = get_interpreterState(); return (intptr_t**)&istate->_locals; } inline intptr_t* frame::interpreter_frame_bcx_addr() const { interpreterState istate = get_interpreterState(); return (intptr_t*)&istate->_bcp; } inline intptr_t* frame::interpreter_frame_mdx_addr() const { interpreterState istate = get_interpreterState(); return (intptr_t*)&istate->_mdx; } inline intptr_t* frame::interpreter_frame_expression_stack() const { return (intptr_t*)interpreter_frame_monitor_end() - 1; } inline jint frame::interpreter_frame_expression_stack_direction() { return -1; } // top of expression stack inline intptr_t* frame::interpreter_frame_tos_address() const { interpreterState istate = get_interpreterState(); return istate->_stack + 1; } inline intptr_t* frame::interpreter_frame_tos_at(jint offset) const { return &interpreter_frame_tos_address()[offset]; } // monitor elements // in keeping with Intel side: end is lower in memory than begin; // and beginning element is oldest element // Also begin is one past last monitor. inline BasicObjectLock* frame::interpreter_frame_monitor_begin() const { return get_interpreterState()->monitor_base(); } inline BasicObjectLock* frame::interpreter_frame_monitor_end() const { return (BasicObjectLock*)get_interpreterState()->stack_base(); } inline int frame::interpreter_frame_cinterpreterstate_size_in_bytes() { // Size of an interpreter object. Not aligned with frame size. return round_to(sizeof(BytecodeInterpreter), 8); } inline Method** frame::interpreter_frame_method_addr() const { interpreterState istate = get_interpreterState(); return &istate->_method; } // Constant pool cache inline ConstantPoolCache** frame::interpreter_frame_cpoolcache_addr() const { interpreterState istate = get_interpreterState(); return &istate->_constants; // should really use accessor } inline ConstantPoolCache** frame::interpreter_frame_cache_addr() const { interpreterState istate = get_interpreterState(); return &istate->_constants; } #else // !CC_INTERP // Template Interpreter frame value accessors. inline frame::ijava_state* frame::get_ijava_state() const { return (ijava_state*) ((uintptr_t)fp() - ijava_state_size); } inline intptr_t** frame::interpreter_frame_locals_addr() const { return (intptr_t**) &(get_ijava_state()->locals); } inline intptr_t* frame::interpreter_frame_bcx_addr() const { return (intptr_t*) &(get_ijava_state()->bcp); } inline intptr_t* frame::interpreter_frame_mdx_addr() const { return (intptr_t*) &(get_ijava_state()->mdx); } // Pointer beyond the "oldest/deepest" BasicObjectLock on stack. inline BasicObjectLock* frame::interpreter_frame_monitor_end() const { return (BasicObjectLock *) get_ijava_state()->monitors; } inline BasicObjectLock* frame::interpreter_frame_monitor_begin() const { return (BasicObjectLock *) get_ijava_state(); } // SAPJVM ASc 2012-11-21. Return register stack slot addr at which currently interpreted method is found inline Method** frame::interpreter_frame_method_addr() const { return (Method**) &(get_ijava_state()->method); } inline ConstantPoolCache** frame::interpreter_frame_cpoolcache_addr() const { return (ConstantPoolCache**) &(get_ijava_state()->cpoolCache); } inline ConstantPoolCache** frame::interpreter_frame_cache_addr() const { return (ConstantPoolCache**) &(get_ijava_state()->cpoolCache); } inline oop* frame::interpreter_frame_temp_oop_addr() const { return (oop *) &(get_ijava_state()->oop_tmp); } inline intptr_t* frame::interpreter_frame_esp() const { return (intptr_t*) get_ijava_state()->esp; } // Convenient setters inline void frame::interpreter_frame_set_monitor_end(BasicObjectLock* end) { get_ijava_state()->monitors = (intptr_t) end;} inline void frame::interpreter_frame_set_cpcache(ConstantPoolCache* cp) { *frame::interpreter_frame_cpoolcache_addr() = cp; } inline void frame::interpreter_frame_set_esp(intptr_t* esp) { get_ijava_state()->esp = (intptr_t) esp; } 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; } inline void frame::interpreter_frame_set_sender_sp(intptr_t* sender_sp) { get_ijava_state()->sender_sp = (intptr_t) sender_sp; } inline intptr_t* frame::interpreter_frame_expression_stack() const { return (intptr_t*)interpreter_frame_monitor_end() - 1; } inline jint frame::interpreter_frame_expression_stack_direction() { return -1; } // top of expression stack inline intptr_t* frame::interpreter_frame_tos_address() const { return ((intptr_t*) get_ijava_state()->esp) + Interpreter::stackElementWords; } inline intptr_t* frame::interpreter_frame_tos_at(jint offset) const { return &interpreter_frame_tos_address()[offset]; } #endif // CC_INTERP inline int frame::interpreter_frame_monitor_size() { // Number of stack slots for a monitor. return round_to(BasicObjectLock::size(), // number of stack slots WordsPerLong); // number of stack slots for a Java long } inline int frame::interpreter_frame_monitor_size_in_bytes() { return frame::interpreter_frame_monitor_size() * wordSize; } // entry frames inline intptr_t* frame::entry_frame_argument_at(int offset) const { // Since an entry frame always calls the interpreter first, the // parameters are on the stack and relative to known register in the // entry frame. intptr_t* tos = (intptr_t*)get_entry_frame_locals()->arguments_tos_address; return &tos[offset + 1]; // prepushed tos } inline JavaCallWrapper** frame::entry_frame_call_wrapper_addr() const { return (JavaCallWrapper**)&get_entry_frame_locals()->call_wrapper_address; } inline oop frame::saved_oop_result(RegisterMap* map) const { return *((oop*)map->location(R3->as_VMReg())); } inline void frame::set_saved_oop_result(RegisterMap* map, oop obj) { *((oop*)map->location(R3->as_VMReg())) = obj; } #endif // CPU_PPC_VM_FRAME_PPC_INLINE_HPP