1 /*
   2  * Copyright (c) 2016, 2019, Oracle and/or its affiliates. All rights reserved.
   3  * Copyright (c) 2016, 2019 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 #include "precompiled.hpp"
  27 #include "runtime/frame.inline.hpp"
  28 #include "runtime/thread.hpp"
  29 
  30 frame JavaThread::pd_last_frame() {
  31   assert(has_last_Java_frame(), "must have last_Java_sp() when suspended");
  32 
  33   intptr_t* sp = last_Java_sp();
  34   address pc = _anchor.last_Java_pc();
  35 
  36   // Last_Java_pc ist not set if we come here from compiled code.
  37   if (pc == NULL) {
  38     pc = (address) *(sp + 14);
  39   }
  40 
  41   return frame(sp, pc);
  42 }
  43 
  44 bool JavaThread::pd_get_top_frame_for_profiling(frame* fr_addr, void* ucontext, bool isInJava) {
  45   assert(this->is_Java_thread(), "must be JavaThread");
  46 
  47   // If we have a last_Java_frame, then we should use it even if
  48   // isInJava == true.  It should be more reliable than ucontext info.
  49   if (has_last_Java_frame() && frame_anchor()->walkable()) {
  50     *fr_addr = pd_last_frame();
  51     return true;
  52   }
  53 
  54   if (isInJava) {
  55     ucontext_t* uc = (ucontext_t*) ucontext;
  56     frame ret_frame((intptr_t*)uc->uc_mcontext.gregs[15/*Z_SP*/],
  57                    (address)uc->uc_mcontext.psw.addr);
  58 
  59     if (ret_frame.pc() == NULL) {
  60       // ucontext wasn't useful
  61       return false;
  62     }
  63 
  64     if (ret_frame.is_interpreted_frame()) {
  65       frame::z_ijava_state* istate = ret_frame.ijava_state_unchecked();
  66        if ((stack_base() >= (address)istate && (address)istate > stack_end()) ||
  67            MetaspaceObj::is_valid((Method*)(istate->method)) == false) {
  68          return false;
  69        }
  70        uint64_t reg_bcp = uc->uc_mcontext.gregs[13/*Z_BCP*/];
  71        uint64_t istate_bcp = istate->bcp;
  72        uint64_t code_start = (uint64_t)(((Method*)(istate->method))->code_base());
  73        uint64_t code_end = (uint64_t)(((Method*)istate->method)->code_base() + ((Method*)istate->method)->code_size());
  74        if (istate_bcp >= code_start && istate_bcp < code_end) {
  75          // we have a valid bcp, don't touch it, do nothing
  76        } else if (reg_bcp >= code_start && reg_bcp < code_end) {
  77          istate->bcp = reg_bcp;
  78        } else {
  79          return false;
  80        }
  81     }
  82     if (!ret_frame.safe_for_sender(this)) {
  83       // nothing else to try if the frame isn't good
  84       return false;
  85     }
  86     *fr_addr = ret_frame;
  87     return true;
  88   }
  89   // nothing else to try
  90   return false;
  91 }
  92 
  93 // Forte Analyzer AsyncGetCallTrace profiling support.
  94 bool JavaThread::pd_get_top_frame_for_signal_handler(frame* fr_addr, void* ucontext, bool isInJava) {
  95   return pd_get_top_frame_for_profiling(fr_addr, ucontext, isInJava);

  96 }
  97 
  98 void JavaThread::cache_global_variables() { }
--- EOF ---