1 /*
   2  * Copyright (c) 2003, 2013, Oracle and/or its affiliates. All rights reserved.
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * This code is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 only, as
   7  * published by the Free Software Foundation.
   8  *
   9  * This code is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12  * version 2 for more details (a copy is included in the LICENSE file that
  13  * accompanied this code).
  14  *
  15  * You should have received a copy of the GNU General Public License version
  16  * 2 along with this work; if not, write to the Free Software Foundation,
  17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  18  *
  19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  20  * or visit www.oracle.com if you need additional information or have any
  21  * questions.
  22  *
  23  */
  24 
  25 #include "precompiled.hpp"
  26 #include "memory/metaspaceShared.hpp"
  27 #include "runtime/frame.inline.hpp"
  28 #include "runtime/thread.inline.hpp"
  29 
  30 // For Forte Analyzer AsyncGetCallTrace profiling support - thread is
  31 // currently interrupted by SIGPROF
  32 bool JavaThread::pd_get_top_frame_for_signal_handler(frame* fr_addr,
  33   void* ucontext, bool isInJava) {
  34   assert(Thread::current() == this, "caller must be current thread");
  35   return pd_get_top_frame(fr_addr, ucontext, isInJava);
  36 }
  37 
  38 bool JavaThread::pd_get_top_frame_for_profiling(frame* fr_addr,
  39   void* ucontext, bool isInJava) {
  40   return pd_get_top_frame(fr_addr, ucontext, isInJava);
  41 }
  42 
  43 bool JavaThread::pd_get_top_frame(frame* fr_addr,
  44   void* ucontext, bool isInJava) {
  45   assert(this->is_Java_thread(), "must be JavaThread");
  46   JavaThread* jt = (JavaThread *)this;
  47 
  48   // There is small window where last_Java_frame is not walkable or safe
  49   if (jt->has_last_Java_frame() && jt->frame_anchor()->walkable()) {
  50     *fr_addr = jt->pd_last_frame();
  51     return true;
  52   }
  53 
  54   ucontext_t* uc = (ucontext_t*) ucontext;
  55 
  56   // We always want to use the initial frame we create from the ucontext as
  57   // it certainly signals where we currently are. However that frame may not
  58   // be safe for calling sender. In that case if we have a last_Java_frame
  59   // then the forte walker will switch to that frame as the virtual sender
  60   // for the frame we create here which is not sender safe.
  61 
  62   intptr_t* ret_fp;
  63   intptr_t* ret_sp;
  64   ExtendedPC addr = os::Solaris::fetch_frame_from_ucontext(this, uc, &ret_sp, &ret_fp);
  65 
  66   // Something would really have to be screwed up to get a NULL pc
  67 
  68   if (addr.pc() == NULL) {
  69     assert(false, "NULL pc from signal handler!");
  70     return false;
  71   }
  72 
  73 #if INCLUDE_CDS
  74   if (UseSharedSpaces && MetaspaceShared::is_in_shared_region(addr.pc(), MetaspaceShared::md)) {
  75     // In the middle of a trampoline call. Bail out for safety.
  76     // This happens rarely so shouldn't affect profiling.
  77     return false;
  78   }
  79 #endif
  80 
  81   // If sp and fp are nonsense just leave them out
  82 
  83   if (!jt->on_local_stack((address)ret_sp)) {
  84     ret_sp = NULL;
  85     ret_fp = NULL;
  86   } else {
  87     // sp is reasonable is fp reasonable?
  88     if ((address)ret_fp >= jt->stack_base() || ret_fp < ret_sp) {
  89       ret_fp = NULL;
  90     }
  91   }
  92 
  93   frame ret_frame(ret_sp, ret_fp, addr.pc());
  94 
  95   *fr_addr = ret_frame;
  96   return true;
  97 
  98 }
  99 
 100 void JavaThread::cache_global_variables() { }
 101