Fix DwarfFrameParser, decodeDwarfExpression and DwarfResult
[dyninst.git] / stackwalk / src / linux-aarch64-swk.C
1 /*
2  * See the dyninst/COPYRIGHT file for copyright information.
3  *
4  * We provide the Paradyn Tools (below described as "Paradyn")
5  * on an AS IS basis, and do not warrant its validity or performance.
6  * We reserve the right to update, modify, or discontinue this
7  * software at any time.  We shall have no obligation to supply such
8  * updates or modifications or any other form of support to you.
9  *
10  * By your use of Paradyn, you understand and agree that we (or any
11  * other person or entity with proprietary rights in Paradyn) are
12  * under no obligation to provide either maintenance services,
13  * update services, notices of latent defects, or correction of
14  * defects for Paradyn.
15  *
16  * This library is free software; you can redistribute it and/or
17  * modify it under the terms of the GNU Lesser General Public
18  * License as published by the Free Software Foundation; either
19  * version 2.1 of the License, or (at your option) any later version.
20  *
21  * This library is distributed in the hope that it will be useful,
22  * but WITHOUT ANY WARRANTY; without even the implied warranty of
23  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
24  * Lesser General Public License for more details.
25  *
26  * You should have received a copy of the GNU Lesser General Public
27  * License along with this library; if not, write to the Free Software
28  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
29  */
30
31 #include "stackwalk/h/swk_errors.h"
32 #include "stackwalk/h/walker.h"
33 #include "stackwalk/h/basetypes.h"
34 #include "stackwalk/h/procstate.h"
35 #include "stackwalk/h/framestepper.h"
36 #include "stackwalk/h/frame.h"
37
38 #include "stackwalk/src/linuxbsd-swk.h"
39 #include "stackwalk/src/dbgstepper-impl.h"
40
41 #include "common/h/dyn_regs.h"
42 #include "frame.h"
43
44 #include <sys/user.h>
45 #include <sys/ptrace.h>
46 #include <assert.h>
47 #include <errno.h>
48 #include <string.h>
49 #include <sys/ucontext.h>
50
51
52
53 using namespace Dyninst;
54 using namespace Dyninst::Stackwalker;
55
56 bool Walker::createDefaultSteppers()
57 {
58     FrameStepper *stepper;
59     bool result;
60
61     stepper = new FrameFuncStepper(this);
62     result = addStepper(stepper);
63     if (!result) {
64         sw_printf("[%s:%u] - Error adding stepper %p\n", FILE__, __LINE__,
65                   stepper);
66         return false;
67     } else {
68         sw_printf("[%s:%u] - Stepper %p is FrameFuncStepper\n",
69                   FILE__, __LINE__, stepper);
70     }
71
72     stepper = new DebugStepper(this);
73     result = addStepper(stepper);
74     if (!result){
75         sw_printf("[%s:%u] - Error adding stepper %p\n", FILE__, __LINE__,
76                   stepper);
77         return false;
78     } else{
79         sw_printf("[%s:%u] - Stepper %p is DebugStepper\n",
80                   FILE__, __LINE__, stepper);
81     }
82
83     stepper = new SigHandlerStepper(this);
84     result = addStepper(stepper);
85     if (!result) {
86         sw_printf("[%s:%u] - Error adding stepper %p\n", FILE__, __LINE__,
87                   stepper);
88         return false;
89     }else {
90         sw_printf("[%s:%u] - Stepper %p is SigHandlerStepper\n",
91                   FILE__, __LINE__, stepper);
92     }
93
94     stepper = new BottomOfStackStepper(this);
95     result = addStepper(stepper);
96     if (!result){
97         sw_printf("[%s:%u] - Error adding stepper %p\n", FILE__, __LINE__,
98                   stepper);
99         return false;
100     }else{
101         sw_printf("[%s:%u] - Stepper %p is BottomOfStackStepper\n",
102                   FILE__, __LINE__, stepper);
103     }
104
105     return true;
106 }
107
108 bool DebugStepperImpl::isFrameRegister(MachRegister reg)
109 {
110    if (getProcessState()->getAddressWidth() == 4){
111        assert(0);
112       return (reg == aarch64::x29);
113    }
114    else
115       return (reg == aarch64::x29);
116 }
117
118 bool DebugStepperImpl::isStackRegister(MachRegister reg)
119 {
120    if (getProcessState()->getAddressWidth() == 4){
121        assert(0);
122       return (reg == aarch64::sp);
123    }
124    else
125       return (reg == aarch64::sp);
126 }
127
128 static     ucontext_t dummy_context;
129 static int sp_offset = (char*)&(dummy_context.uc_mcontext.sp)       - (char*)&dummy_context;
130 static int fp_offset = (char*)&(dummy_context.uc_mcontext.regs[29]) - (char*)&dummy_context;
131 static int pc_offset = (char*)&(dummy_context.uc_mcontext.pc)       - (char*)&dummy_context;
132
133 gcframe_ret_t SigHandlerStepperImpl::getCallerFrame(const Frame & in,
134                                                     Frame & out)
135 {
136     // This function assumes there is FP in "Frame in"
137     // And assumes that ucontext is the first object on the stack frame
138     bool result;
139
140     Address last_read_sp_addr = 0;
141     Address last_read_sp_val = 0;
142     int addr_size = 8;
143     location_t sp_loc;
144     sp_loc.location = loc_address;
145     sp_loc.val.addr = in.getFP() + sp_offset - sizeof(dummy_context);
146
147     Address sp = 0;
148     sw_printf("In frame sp %lx, fp %lx, pc %lx\n", in.getSP(), in.getFP(), in.getRA());
149     if (last_read_sp_addr != sp_loc.val.addr)
150     {
151         result = getProcessState()->readMem(&sp, sp_loc.val.addr, addr_size);
152         if (!result) {
153             sw_printf("[%s:%u] Unexpected error reading from stack memory 0x%lx for signal frame\n",
154                       FILE__, __LINE__);
155             return gcf_error;
156         }
157         last_read_sp_addr = sp_loc.val.addr;
158         last_read_sp_val = sp;
159     }
160     else {
161         sp = last_read_sp_val;
162     }
163
164
165     location_t fp_loc;
166     Address fp = 0x0;
167     fp_loc.location = loc_address;
168     fp_loc.val.addr = in.getFP() + fp_offset - sizeof(dummy_context);
169     sw_printf("[%s:%u] - SigHandler Reading FP from %lx\n",
170               FILE__, __LINE__, fp_loc.val.addr);
171     result = getProcessState()->readMem(&fp, fp_loc.val.addr, addr_size);
172     if (!result) {
173         sw_printf("[%s:%u] Unexpected error reading from stack memory 0x%lx for signal frame\n",
174                   FILE__, __LINE__);
175         return gcf_error;
176     }
177
178     location_t pc_loc;
179     Address pc = 0x0;
180     pc_loc.location = loc_address;
181     pc_loc.val.addr = in.getFP() + pc_offset - sizeof(dummy_context);
182     sw_printf("[%s:%u] - SigHandler Reading PC from %lx\n",
183               FILE__, __LINE__, pc_loc.val.addr);
184     result = getProcessState()->readMem(&pc, pc_loc.val.addr, addr_size);
185     if (!result) {
186         sw_printf("[%s:%u] Unexpected error reading from stack memory 0x%lx for signal frame\n",
187                   FILE__, __LINE__);
188         return gcf_error;
189     }
190
191     out.setRA((Dyninst::MachRegisterVal) pc);
192     out.setFP((Dyninst::MachRegisterVal) fp);
193     out.setSP((Dyninst::MachRegisterVal) sp);
194     out.setRALocation(pc_loc);
195     out.setFPLocation(fp_loc);
196     out.setSPLocation(sp_loc);
197     out.setNonCall();
198     return gcf_success;
199
200 }