Initial commit of StackwalkerAPI
[dyninst.git] / stackwalk / src / x86-swk.C
1 /*
2  * Copyright (c) 1996-2007 Barton P. Miller
3  * 
4  * We provide the Paradyn Parallel Performance Tools (below
5  * described as "Paradyn") on an AS IS basis, and do not warrant its
6  * validity or performance.  We reserve the right to update, modify,
7  * or discontinue this software at any time.  We shall have no
8  * obligation to supply such updates or modifications or any other
9  * form of support to you.
10  * 
11  * By your use of Paradyn, you understand and agree that we (or any
12  * other person or entity with proprietary rights in Paradyn) are
13  * under no obligation to provide either maintenance services,
14  * update services, notices of latent defects, or correction of
15  * defects for Paradyn.
16  * 
17  * This library is free software; you can redistribute it and/or
18  * modify it under the terms of the GNU Lesser General Public
19  * License as published by the Free Software Foundation; either
20  * version 2.1 of the License, or (at your option) any later version.
21  * 
22  * This library is distributed in the hope that it will be useful,
23  * but WITHOUT ANY WARRANTY; without even the implied warranty of
24  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
25  * Lesser General Public License for more details.
26  * 
27  * You should have received a copy of the GNU Lesser General Public
28  * License along with this library; if not, write to the Free Software
29  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
30  */
31
32 #include "stackwalk/h/basetypes.h"
33 #include "stackwalk/h/swk_errors.h"
34 #include "stackwalk/h/procstate.h"
35 #include "stackwalk/h/framestepper.h"
36 #include "stackwalk/h/frame.h"
37
38 using namespace Dyninst;
39 using namespace Dyninst::Stackwalker;
40
41 bool ProcSelf::getRegValue(reg_t reg, THR_ID, regval_t &val)
42 {
43   unsigned long *frame_pointer;
44
45 #if defined(arch_x86_64)
46   __asm__("mov %%rbp, %0\n"
47           : "=r"(frame_pointer));
48 #else
49   __asm__("movl %%ebp, %0\n"
50           : "=r"(frame_pointer));
51 #endif
52
53   frame_pointer = (unsigned long *) *frame_pointer;
54   
55   switch(reg)
56   {
57     case REG_PC:
58       val = (regval_t) frame_pointer[1];
59       break;
60     case REG_FP:
61       val = (regval_t) frame_pointer[0];
62       break;      
63     case REG_SP:
64       val = (regval_t) (frame_pointer - 1);
65       break;      
66     default:
67        sw_printf("[%s:%u] - Request for unsupported register %d\n",
68                  __FILE__, __LINE__, reg);
69        setLastError(err_badparam, "Unknown register passed in reg field");
70   }
71
72   return true;
73 }
74
75 FrameFuncStepper::FrameFuncStepper(Walker *w) :
76   FrameStepper(w)
77 {
78 }
79
80 gcframe_ret_t FrameFuncStepper::getCallerFrame(const Frame &in, Frame &out)
81 {
82   Address in_fp, out_sp;
83   bool result;
84   unsigned addr_width = getProcessState()->getAddressWidth();
85
86   struct {
87     Address out_fp;
88     Address out_ra;
89   } ra_fp_pair;
90
91 #if defined(arch_x86_64)
92   struct {
93      unsigned out_fp;
94      unsigned out_ra;
95   } ra_fp_pair32;
96 #endif
97
98   if (!in.getFP())
99     return gcf_stackbottom;
100
101   in_fp = in.getFP();
102   out_sp = in_fp + addr_width;
103 #if defined(arch_x86_64)
104   /**
105    * On AMD64 we may be reading from a process with a different
106    * address width than the current one.  We'll do the read at
107    * the correct size, then convert the addresses into the 
108    * local size
109    **/
110   if (addr_width != sizeof(Address))
111   {
112      result = getProcessState()->readMem(&ra_fp_pair32, in_fp, 
113                                          sizeof(ra_fp_pair32));
114      ra_fp_pair.out_fp = (Address) ra_fp_pair32.out_fp;
115      ra_fp_pair.out_ra = (Address) ra_fp_pair32.out_ra;
116   }
117   else
118 #endif
119      result = getProcessState()->readMem(&ra_fp_pair, in_fp, 
120                                          sizeof(ra_fp_pair));
121   if (!result) {
122     sw_printf("[%s:%u] - Couldn't read from %x\n", __FILE__, __LINE__, out_sp);
123     return gcf_error;
124   }
125   
126   if (!ra_fp_pair.out_ra) {
127     return gcf_stackbottom;
128   }
129
130   out.setFP(ra_fp_pair.out_fp);
131   out.setRA(ra_fp_pair.out_ra);
132   out.setSP(out_sp);
133
134   return gcf_success;
135 }
136  
137 unsigned FrameFuncStepper::getPriority()
138 {
139   return 0x11000;
140 }
141