various fixes made when working with older gcc 3.2.3
[dyninst.git] / symtabAPI / src / addrtranslate-linux.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 "symtabAPI/src/addrtranslate.h"
33 #include "symtabAPI/src/addrtranslate-sysv.h"
34 #include "common/h/linuxKludges.h"
35
36 #include <linux/limits.h>
37
38 #include <sys/ptrace.h>
39 #include <sys/types.h>
40 #include <sys/wait.h>
41 #include <errno.h>
42 #include <unistd.h> // for getpid()
43
44
45 using namespace Dyninst;
46 using namespace SymtabAPI;
47
48 class ProcessReaderPtrace : public ProcessReader {
49 public:
50    ProcessReaderPtrace(int pid_);
51    bool start();
52    bool readAddressSpace(Address inTraced, unsigned amount,
53                          void *inSelf);
54    bool done();
55
56    virtual ~ProcessReaderPtrace();
57 };
58
59 bool ProcessReaderPtrace::start()
60 {
61    long result;
62    bool is_attached = false;
63
64    result = ptrace(PTRACE_ATTACH, pid, NULL, NULL);
65    if (result == -1)
66       goto done;
67    is_attached = true;
68    
69    int status;
70    for (;;) {
71       result = (long) waitpid(pid, &status, 0);
72       if (result == -1 && errno == EINTR)
73          continue;
74       else if (result == -1)
75          goto done;
76       else if (WIFEXITED(status) || WIFSIGNALED(status))
77          goto done;
78       else if (WIFSTOPPED(status) && WSTOPSIG(status) == SIGSTOP)
79          break;
80       else if (WIFSTOPPED(status) && WSTOPSIG(status) != SIGSTOP) {
81          result = ptrace(PTRACE_CONT, pid, NULL, (void *) (long) WSTOPSIG(status));
82          if (result == -1)
83             goto done;
84       }
85    }
86
87    result = true;
88 done:
89    if (!result && is_attached)
90       done();
91    return result;
92 }
93
94 bool ProcessReaderPtrace::done()
95 {
96    long result;
97    result = ptrace(PTRACE_DETACH, pid, NULL, NULL);
98    if (result == -1)
99       return false;
100    return true;
101 }
102
103 ProcessReaderPtrace::ProcessReaderPtrace(int pid_) :
104    ProcessReader(pid_)
105 {
106 }
107
108 ProcessReaderPtrace::~ProcessReaderPtrace() 
109 {
110 }
111
112 bool ProcessReaderPtrace::readAddressSpace(Address inTraced, unsigned amount,
113                                            void *inSelf)
114 {
115    bool result;
116    result = PtraceBulkRead(inTraced, amount, inSelf, pid);
117    return result;
118 }
119
120 ProcessReader *AddressTranslateSysV::createDefaultDebugger(int pid)
121 {
122   return new ProcessReaderPtrace(pid);
123 }
124
125 bool AddressTranslateSysV::setInterpreter()
126 {
127    bool result;
128
129    if (interpreter)
130       return true;
131
132    char name[64];
133    sprintf(name, "/proc/%d/exe", pid);
134    string sname(name);
135    string interp_name;
136
137    FCNode *exe = files.getNode(sname);
138    if (!exe) {
139       result = false;
140       goto done;
141    }
142
143    interp_name = exe->getInterpreter();
144    interpreter = files.getNode(interp_name);
145
146    result = true;
147
148  done:
149    if (exe)
150       delete exe;
151    return result;
152 }
153
154 bool AddressTranslateSysV::setAddressSize() 
155 {
156    bool result;
157    if (address_size)
158       return true;
159
160    result = setInterpreter();
161    if (!result)
162       return false;
163
164    if (interpreter)
165       address_size = interpreter->getAddrSize();
166    else if (pid == getpid()) {
167       return sizeof(void *);
168    }
169    else {
170       char name[64];
171       sprintf(name, "/proc/%d/exe", pid);
172       string sname(name);
173       FCNode *exe = files.getNode(sname);
174       if (!exe) 
175          return false;
176       return exe->getAddrSize();
177    }
178       
179    return true;
180 }
181
182 static char *deref_link(const char *path)
183 {
184    static char buffer[PATH_MAX], *p;
185    buffer[PATH_MAX-1] = '\0';
186    p = realpath(path, buffer);
187    return p;
188 }
189
190 LoadedLib *AddressTranslateSysV::getAOut()
191 {
192   char name[64];
193   snprintf(name, 64, "/proc/%d/exe", pid);
194   LoadedLib *ll = new LoadedLib(deref_link(name), 0);
195   return ll;
196 }
197
198