Update copyright to LGPL on all files
[dyninst.git] / dyninstAPI / src / dyn_thread.C
1 /*
2  * Copyright (c) 1996-2009 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 "dyninstAPI/src/dyn_thread.h"
33 #include "dyninstAPI/src/dyn_lwp.h"
34 #include "dyninstAPI/src/rpcMgr.h"
35 #include "dyninstAPI/src/process.h"
36
37
38 dyn_thread::dyn_thread(process *pproc) : 
39    tid(0), 
40    index(0), 
41    stack_addr(0),
42    start_pc(0), 
43    start_func(NULL),
44    pending_tramp_addr(ADDR_NULL),
45    indirect_start_func(0)
46
47    assert(pproc);
48    proc = pproc; 
49    lwp  = pproc->getRepresentativeLWP();
50    proc->addThread(this);
51 }
52
53 dyn_thread::dyn_thread(process *proc_, unsigned index_, dyn_lwp *lwp_) :
54     tid(0),
55     index(index_),
56     lwp(lwp_),
57     stack_addr(0),
58     start_pc(0),
59     start_func(NULL),
60     pending_tramp_addr( ADDR_NULL ),
61     indirect_start_func(0)
62 {
63    assert(proc_);
64    proc = proc_;
65    proc->addThread(this);
66 }
67
68 dyn_thread::dyn_thread(dyn_thread *src, process *child, dyn_lwp *lwp_)
69 {
70    assert(src && child);
71    tid = src->tid;
72    index = src->index;
73    if(lwp_ == NULL)
74       lwp = child->getRepresentativeLWP();
75    else
76       lwp = lwp_;
77    stack_addr = src->stack_addr;
78    start_pc = src->start_pc;
79    resumestate_p = src->resumestate_p;
80    start_func = src->start_func;
81    indirect_start_func = src->indirect_start_func;
82    proc = child;
83    pending_tramp_addr = ADDR_NULL;
84    proc->addThread(this);
85 }
86
87 // This will need to be filled in if we (ever) handle migrating threads
88 bool dyn_thread::updateLWP()
89 {
90   return true;
91 }
92
93   
94 // MT version lives in the <os>MT.C files, and can do things like
95 // get info for threads not currently scheduled on an LWP
96 Frame dyn_thread::getActiveFrame()
97 {
98    updateLWP();
99
100    if(! get_proc()->multithread_capable(true)) {
101       Frame lwpFrame = lwp->getActiveFrame();  
102       lwpFrame.thread_ = this;
103       return lwpFrame;
104    } else
105       return getActiveFrameMT();
106 }
107
108 // stackWalk: return parameter.
109 bool dyn_thread::walkStack(pdvector<Frame> &stackWalk)
110 {
111    bool continueWhenDone = false;
112    if (get_lwp()->status() == running) {
113        continueWhenDone = true;
114        get_lwp()->pauseLWP(true);
115    }
116
117    if (!process::IndependentLwpControl()) {
118      if (proc->status() == running) {
119        continueWhenDone = true;
120        proc->pause();
121      }
122    }
123
124    if (get_lwp()->cached_stackwalk.isValid()) {
125       stackWalk = get_lwp()->cached_stackwalk.getStackwalk();
126       for (unsigned i=0; i<stackWalk.size(); i++) {
127          stackWalk[i].thread_ = this;
128       }
129       return true;
130    }
131
132    stackwalk_printf("%s[%d]: beginning stack walk on thread %ld\n",
133                     FILE__, __LINE__, get_tid());
134    
135
136    Frame active = getActiveFrame();
137    active.thread_ = this;
138    bool retval = proc->walkStackFromFrame(active, stackWalk);
139
140    stackwalk_printf("%s[%d]: ending stack walk on thread %ld\n",
141                     FILE__, __LINE__, get_tid());
142  
143
144    if (continueWhenDone) {
145       get_lwp()->continueLWP();
146    }
147    
148    return retval;
149 }
150
151 dyn_lwp *dyn_thread::get_lwp()
152 {
153   if (proc->multithread_ready(true))
154     updateLWP();
155    return lwp;
156 }
157
158 dyn_thread::~dyn_thread() 
159 {
160 }
161   
162 void dyn_thread::update_index(unsigned index_)
163 {
164     index = index_;
165 }
166
167 void dyn_thread::update_stack_addr(Address stack_addr_) 
168 {
169    stack_addr=stack_addr_; 
170 }
171
172 Address dyn_thread::get_stack_addr() const 
173
174    return(stack_addr); 
175 }