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 
pd_last_frame()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 
pd_get_top_frame_for_profiling(frame * fr_addr,void * ucontext,bool isInJava)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         return false;
68       }
69       const Method *m = (const Method*)(istate->method);
70       if (!Method::is_valid_method(m)) return false;
71       if (!Metaspace::contains((const void*)m->constMethod())) return false;
72 
73       uint64_t reg_bcp = uc->uc_mcontext.gregs[13/*Z_BCP*/];
74       uint64_t istate_bcp = istate->bcp;
75       uint64_t code_start = (uint64_t)(m->code_base());
76       uint64_t code_end = (uint64_t)(m->code_base() + m->code_size());
77       if (istate_bcp >= code_start && istate_bcp < code_end) {
78         // we have a valid bcp, don't touch it, do nothing
79       } else if (reg_bcp >= code_start && reg_bcp < code_end) {
80         istate->bcp = reg_bcp;
81       } else {
82         return false;
83       }
84     }
85     if (!ret_frame.safe_for_sender(this)) {
86       // nothing else to try if the frame isn't good
87       return false;
88     }
89     *fr_addr = ret_frame;
90     return true;
91   }
92   // nothing else to try
93   return false;
94 }
95 
96 // Forte Analyzer AsyncGetCallTrace profiling support.
pd_get_top_frame_for_signal_handler(frame * fr_addr,void * ucontext,bool isInJava)97 bool JavaThread::pd_get_top_frame_for_signal_handler(frame* fr_addr, void* ucontext, bool isInJava) {
98   return pd_get_top_frame_for_profiling(fr_addr, ucontext, isInJava);
99 }
100 
cache_global_variables()101 void JavaThread::cache_global_variables() { }
102