stacktrace.cc (2684:71f3cabf891f) stacktrace.cc (3570:aacc19068f25)
1/*
2 * Copyright (c) 2005 The Regents of The University of Michigan
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are
7 * met: redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer;

--- 26 unchanged lines hidden (view full) ---

35#include "arch/alpha/vtophys.hh"
36#include "base/bitfield.hh"
37#include "base/trace.hh"
38#include "cpu/base.hh"
39#include "cpu/thread_context.hh"
40#include "sim/system.hh"
41
42using namespace std;
1/*
2 * Copyright (c) 2005 The Regents of The University of Michigan
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are
7 * met: redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer;

--- 26 unchanged lines hidden (view full) ---

35#include "arch/alpha/vtophys.hh"
36#include "base/bitfield.hh"
37#include "base/trace.hh"
38#include "cpu/base.hh"
39#include "cpu/thread_context.hh"
40#include "sim/system.hh"
41
42using namespace std;
43using namespace AlphaISA;
44
43
45ProcessInfo::ProcessInfo(ThreadContext *_tc)
46 : tc(_tc)
44namespace AlphaISA
47{
45{
48 Addr addr = 0;
46 ProcessInfo::ProcessInfo(ThreadContext *_tc)
47 : tc(_tc)
48 {
49 Addr addr = 0;
49
50
50 VirtualPort *vp;
51 VirtualPort *vp;
51
52
52 vp = tc->getVirtPort();
53 vp = tc->getVirtPort();
53
54
54 if (!tc->getSystemPtr()->kernelSymtab->findAddress("thread_info_size", addr))
55 panic("thread info not compiled into kernel\n");
56 thread_info_size = vp->readGtoH(addr);
55 if (!tc->getSystemPtr()->kernelSymtab->findAddress("thread_info_size", addr))
56 panic("thread info not compiled into kernel\n");
57 thread_info_size = vp->readGtoH<int32_t>(addr);
57
58
58 if (!tc->getSystemPtr()->kernelSymtab->findAddress("task_struct_size", addr))
59 panic("thread info not compiled into kernel\n");
60 task_struct_size = vp->readGtoH(addr);
59 if (!tc->getSystemPtr()->kernelSymtab->findAddress("task_struct_size", addr))
60 panic("thread info not compiled into kernel\n");
61 task_struct_size = vp->readGtoH<int32_t>(addr);
61
62
62 if (!tc->getSystemPtr()->kernelSymtab->findAddress("thread_info_task", addr))
63 panic("thread info not compiled into kernel\n");
64 task_off = vp->readGtoH(addr);
63 if (!tc->getSystemPtr()->kernelSymtab->findAddress("thread_info_task", addr))
64 panic("thread info not compiled into kernel\n");
65 task_off = vp->readGtoH<int32_t>(addr);
65
66
66 if (!tc->getSystemPtr()->kernelSymtab->findAddress("task_struct_pid", addr))
67 panic("thread info not compiled into kernel\n");
68 pid_off = vp->readGtoH(addr);
67 if (!tc->getSystemPtr()->kernelSymtab->findAddress("task_struct_pid", addr))
68 panic("thread info not compiled into kernel\n");
69 pid_off = vp->readGtoH<int32_t>(addr);
69
70
70 if (!tc->getSystemPtr()->kernelSymtab->findAddress("task_struct_comm", addr))
71 panic("thread info not compiled into kernel\n");
72 name_off = vp->readGtoH(addr);
71 if (!tc->getSystemPtr()->kernelSymtab->findAddress("task_struct_comm", addr))
72 panic("thread info not compiled into kernel\n");
73 name_off = vp->readGtoH<int32_t>(addr);
73
74
74 tc->delVirtPort(vp);
75}
75 tc->delVirtPort(vp);
76 }
76
77
77Addr
78ProcessInfo::task(Addr ksp) const
79{
80 Addr base = ksp & ~0x3fff;
81 if (base == ULL(0xfffffc0000000000))
82 return 0;
78 Addr
79 ProcessInfo::task(Addr ksp) const
80 {
81 Addr base = ksp & ~0x3fff;
82 if (base == ULL(0xfffffc0000000000))
83 return 0;
83
84
84 Addr tsk;
85 Addr tsk;
85
86
86 VirtualPort *vp;
87 VirtualPort *vp;
87
88
88 vp = tc->getVirtPort();
89 tsk = vp->readGtoH(base + task_off);
90 tc->delVirtPort(vp);
89 vp = tc->getVirtPort();
90 tsk = vp->readGtoH<Addr>(base + task_off);
91 tc->delVirtPort(vp);
91
92
92 return tsk;
93}
93 return tsk;
94 }
94
95
95int
96ProcessInfo::pid(Addr ksp) const
97{
98 Addr task = this->task(ksp);
99 if (!task)
100 return -1;
96 int
97 ProcessInfo::pid(Addr ksp) const
98 {
99 Addr task = this->task(ksp);
100 if (!task)
101 return -1;
101
102
102 uint16_t pd;
103 uint16_t pd;
103
104
104 VirtualPort *vp;
105 VirtualPort *vp;
105
106
106 vp = tc->getVirtPort();
107 pd = vp->readGtoH(task + pid_off);
108 tc->delVirtPort(vp);
107 vp = tc->getVirtPort();
108 pd = vp->readGtoH<uint16_t>(task + pid_off);
109 tc->delVirtPort(vp);
109
110
110 return pd;
111}
111 return pd;
112 }
112
113
113string
114ProcessInfo::name(Addr ksp) const
115{
116 Addr task = this->task(ksp);
117 if (!task)
118 return "console";
114 string
115 ProcessInfo::name(Addr ksp) const
116 {
117 Addr task = this->task(ksp);
118 if (!task)
119 return "console";
119
120
120 char comm[256];
121 CopyStringOut(tc, comm, task + name_off, sizeof(comm));
122 if (!comm[0])
123 return "startup";
121 char comm[256];
122 CopyStringOut(tc, comm, task + name_off, sizeof(comm));
123 if (!comm[0])
124 return "startup";
124
125
125 return comm;
126}
126 return comm;
127 }
127
128
128StackTrace::StackTrace()
129 : tc(0), stack(64)
130{
131}
129 StackTrace::StackTrace()
130 : tc(0), stack(64)
131 {
132 }
132
133
133StackTrace::StackTrace(ThreadContext *_tc, StaticInstPtr inst)
134 : tc(0), stack(64)
135{
136 trace(_tc, inst);
137}
134 StackTrace::StackTrace(ThreadContext *_tc, StaticInstPtr inst)
135 : tc(0), stack(64)
136 {
137 trace(_tc, inst);
138 }
138
139
139StackTrace::~StackTrace()
140{
141}
140 StackTrace::~StackTrace()
141 {
142 }
142
143
143void
144StackTrace::trace(ThreadContext *_tc, bool is_call)
145{
146 tc = _tc;
144 void
145 StackTrace::trace(ThreadContext *_tc, bool is_call)
146 {
147 tc = _tc;
147
148
148 bool usermode = (tc->readMiscReg(AlphaISA::IPR_DTB_CM) & 0x18) != 0;
149 bool usermode = (tc->readMiscReg(AlphaISA::IPR_DTB_CM) & 0x18) != 0;
149
150
150 Addr pc = tc->readNextPC();
151 bool kernel = tc->getSystemPtr()->kernelStart <= pc &&
152 pc <= tc->getSystemPtr()->kernelEnd;
151 Addr pc = tc->readNextPC();
152 bool kernel = tc->getSystemPtr()->kernelStart <= pc &&
153 pc <= tc->getSystemPtr()->kernelEnd;
153
154
154 if (usermode) {
155 stack.push_back(user);
156 return;
157 }
155 if (usermode) {
156 stack.push_back(user);
157 return;
158 }
158
159
159 if (!kernel) {
160 stack.push_back(console);
161 return;
162 }
160 if (!kernel) {
161 stack.push_back(console);
162 return;
163 }
163
164
164 SymbolTable *symtab = tc->getSystemPtr()->kernelSymtab;
165 Addr ksp = tc->readIntReg(TheISA::StackPointerReg);
166 Addr bottom = ksp & ~0x3fff;
167 Addr addr;
165 SymbolTable *symtab = tc->getSystemPtr()->kernelSymtab;
166 Addr ksp = tc->readIntReg(TheISA::StackPointerReg);
167 Addr bottom = ksp & ~0x3fff;
168 Addr addr;
168
169
169 if (is_call) {
170 if (!symtab->findNearestAddr(pc, addr))
171 panic("could not find address %#x", pc);
170 if (is_call) {
171 if (!symtab->findNearestAddr(pc, addr))
172 panic("could not find address %#x", pc);
172
173
173 stack.push_back(addr);
174 pc = tc->readPC();
175 }
174 stack.push_back(addr);
175 pc = tc->readPC();
176 }
176
177
177 Addr ra;
178 int size;
178 Addr ra;
179 int size;
179
180
180 while (ksp > bottom) {
181 if (!symtab->findNearestAddr(pc, addr))
182 panic("could not find symbol for pc=%#x", pc);
183 assert(pc >= addr && "symbol botch: callpc < func");
181 while (ksp > bottom) {
182 if (!symtab->findNearestAddr(pc, addr))
183 panic("could not find symbol for pc=%#x", pc);
184 assert(pc >= addr && "symbol botch: callpc < func");
184
185
185 stack.push_back(addr);
186 stack.push_back(addr);
186
187
187 if (isEntry(addr))
188 return;
189
190 if (decodePrologue(ksp, pc, addr, size, ra)) {
191 if (!ra)
188 if (isEntry(addr))
192 return;
193
189 return;
190
194 if (size <= 0) {
191 if (decodePrologue(ksp, pc, addr, size, ra)) {
192 if (!ra)
193 return;
194
195 if (size <= 0) {
196 stack.push_back(unknown);
197 return;
198 }
199
200 pc = ra;
201 ksp += size;
202 } else {
195 stack.push_back(unknown);
196 return;
197 }
198
203 stack.push_back(unknown);
204 return;
205 }
206
199 pc = ra;
200 ksp += size;
201 } else {
202 stack.push_back(unknown);
203 return;
207 bool kernel = tc->getSystemPtr()->kernelStart <= pc &&
208 pc <= tc->getSystemPtr()->kernelEnd;
209 if (!kernel)
210 return;
211
212 if (stack.size() >= 1000)
213 panic("unwinding too far");
204 }
205
214 }
215
206 bool kernel = tc->getSystemPtr()->kernelStart <= pc &&
207 pc <= tc->getSystemPtr()->kernelEnd;
208 if (!kernel)
209 return;
210
211 if (stack.size() >= 1000)
212 panic("unwinding too far");
216 panic("unwinding too far");
213 }
214
217 }
218
215 panic("unwinding too far");
216}
219 bool
220 StackTrace::isEntry(Addr addr)
221 {
222 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp12))
223 return true;
217
224
218bool
219StackTrace::isEntry(Addr addr)
220{
221 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp12))
222 return true;
225 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp7))
226 return true;
223
227
224 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp7))
225 return true;
228 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp11))
229 return true;
226
230
227 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp11))
228 return true;
231 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp21))
232 return true;
229
233
230 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp21))
231 return true;
234 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp9))
235 return true;
232
236
233 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp9))
234 return true;
237 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp2))
238 return true;
235
239
236 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp2))
237 return true;
240 return false;
241 }
238
242
239 return false;
240}
243 bool
244 StackTrace::decodeStack(MachInst inst, int &disp)
245 {
246 // lda $sp, -disp($sp)
247 //
248 // Opcode<31:26> == 0x08
249 // RA<25:21> == 30
250 // RB<20:16> == 30
251 // Disp<15:0>
252 const MachInst mem_mask = 0xffff0000;
253 const MachInst lda_pattern = 0x23de0000;
254 const MachInst lda_disp_mask = 0x0000ffff;
241
255
242bool
243StackTrace::decodeStack(MachInst inst, int &disp)
244{
245 // lda $sp, -disp($sp)
246 //
247 // Opcode<31:26> == 0x08
248 // RA<25:21> == 30
249 // RB<20:16> == 30
250 // Disp<15:0>
251 const MachInst mem_mask = 0xffff0000;
252 const MachInst lda_pattern = 0x23de0000;
253 const MachInst lda_disp_mask = 0x0000ffff;
256 // subq $sp, disp, $sp
257 // addq $sp, disp, $sp
258 //
259 // Opcode<31:26> == 0x10
260 // RA<25:21> == 30
261 // Lit<20:13>
262 // One<12> = 1
263 // Func<11:5> == 0x20 (addq)
264 // Func<11:5> == 0x29 (subq)
265 // RC<4:0> == 30
266 const MachInst intop_mask = 0xffe01fff;
267 const MachInst addq_pattern = 0x43c0141e;
268 const MachInst subq_pattern = 0x43c0153e;
269 const MachInst intop_disp_mask = 0x001fe000;
270 const int intop_disp_shift = 13;
254
271
255 // subq $sp, disp, $sp
256 // addq $sp, disp, $sp
257 //
258 // Opcode<31:26> == 0x10
259 // RA<25:21> == 30
260 // Lit<20:13>
261 // One<12> = 1
262 // Func<11:5> == 0x20 (addq)
263 // Func<11:5> == 0x29 (subq)
264 // RC<4:0> == 30
265 const MachInst intop_mask = 0xffe01fff;
266 const MachInst addq_pattern = 0x43c0141e;
267 const MachInst subq_pattern = 0x43c0153e;
268 const MachInst intop_disp_mask = 0x001fe000;
269 const int intop_disp_shift = 13;
272 if ((inst & mem_mask) == lda_pattern)
273 disp = -sext<16>(inst & lda_disp_mask);
274 else if ((inst & intop_mask) == addq_pattern)
275 disp = -int((inst & intop_disp_mask) >> intop_disp_shift);
276 else if ((inst & intop_mask) == subq_pattern)
277 disp = int((inst & intop_disp_mask) >> intop_disp_shift);
278 else
279 return false;
270
280
271 if ((inst & mem_mask) == lda_pattern)
272 disp = -sext<16>(inst & lda_disp_mask);
273 else if ((inst & intop_mask) == addq_pattern)
274 disp = -int((inst & intop_disp_mask) >> intop_disp_shift);
275 else if ((inst & intop_mask) == subq_pattern)
276 disp = int((inst & intop_disp_mask) >> intop_disp_shift);
277 else
278 return false;
281 return true;
282 }
279
283
280 return true;
281}
284 bool
285 StackTrace::decodeSave(MachInst inst, int &reg, int &disp)
286 {
287 // lda $stq, disp($sp)
288 //
289 // Opcode<31:26> == 0x08
290 // RA<25:21> == ?
291 // RB<20:16> == 30
292 // Disp<15:0>
293 const MachInst stq_mask = 0xfc1f0000;
294 const MachInst stq_pattern = 0xb41e0000;
295 const MachInst stq_disp_mask = 0x0000ffff;
296 const MachInst reg_mask = 0x03e00000;
297 const int reg_shift = 21;
282
298
283bool
284StackTrace::decodeSave(MachInst inst, int &reg, int &disp)
285{
286 // lda $stq, disp($sp)
287 //
288 // Opcode<31:26> == 0x08
289 // RA<25:21> == ?
290 // RB<20:16> == 30
291 // Disp<15:0>
292 const MachInst stq_mask = 0xfc1f0000;
293 const MachInst stq_pattern = 0xb41e0000;
294 const MachInst stq_disp_mask = 0x0000ffff;
295 const MachInst reg_mask = 0x03e00000;
296 const int reg_shift = 21;
299 if ((inst & stq_mask) == stq_pattern) {
300 reg = (inst & reg_mask) >> reg_shift;
301 disp = sext<16>(inst & stq_disp_mask);
302 } else {
303 return false;
304 }
297
305
298 if ((inst & stq_mask) == stq_pattern) {
299 reg = (inst & reg_mask) >> reg_shift;
300 disp = sext<16>(inst & stq_disp_mask);
301 } else {
302 return false;
306 return true;
303 }
304
307 }
308
305 return true;
306}
309 /*
310 * Decode the function prologue for the function we're in, and note
311 * which registers are stored where, and how large the stack frame is.
312 */
313 bool
314 StackTrace::decodePrologue(Addr sp, Addr callpc, Addr func,
315 int &size, Addr &ra)
316 {
317 size = 0;
318 ra = 0;
307
319
308/*
309 * Decode the function prologue for the function we're in, and note
310 * which registers are stored where, and how large the stack frame is.
311 */
312bool
313StackTrace::decodePrologue(Addr sp, Addr callpc, Addr func,
314 int &size, Addr &ra)
315{
316 size = 0;
317 ra = 0;
320 for (Addr pc = func; pc < callpc; pc += sizeof(MachInst)) {
321 MachInst inst;
322 CopyOut(tc, (uint8_t *)&inst, pc, sizeof(MachInst));
318
323
319 for (Addr pc = func; pc < callpc; pc += sizeof(MachInst)) {
320 MachInst inst;
321 CopyOut(tc, (uint8_t *)&inst, pc, sizeof(MachInst));
322
323 int reg, disp;
324 if (decodeStack(inst, disp)) {
325 if (size) {
326 // panic("decoding frame size again");
327 return true;
328 }
329 size += disp;
330 } else if (decodeSave(inst, reg, disp)) {
331 if (!ra && reg == ReturnAddressReg) {
332 CopyOut(tc, (uint8_t *)&ra, sp + disp, sizeof(Addr));
333 if (!ra) {
334 // panic("no return address value pc=%#x\n", pc);
335 return false;
324 int reg, disp;
325 if (decodeStack(inst, disp)) {
326 if (size) {
327 // panic("decoding frame size again");
328 return true;
336 }
329 }
330 size += disp;
331 } else if (decodeSave(inst, reg, disp)) {
332 if (!ra && reg == ReturnAddressReg) {
333 CopyOut(tc, (uint8_t *)&ra, sp + disp, sizeof(Addr));
334 if (!ra) {
335 // panic("no return address value pc=%#x\n", pc);
336 return false;
337 }
338 }
337 }
338 }
339 }
340 }
341
342 return true;
339 }
340
343 }
344
341 return true;
342}
343
344#if TRACING_ON
345#if TRACING_ON
345void
346StackTrace::dump()
347{
348 StringWrap name(tc->getCpuPtr()->name());
349 SymbolTable *symtab = tc->getSystemPtr()->kernelSymtab;
346 void
347 StackTrace::dump()
348 {
349 StringWrap name(tc->getCpuPtr()->name());
350 SymbolTable *symtab = tc->getSystemPtr()->kernelSymtab;
350
351
351 DPRINTFN("------ Stack ------\n");
352 DPRINTFN("------ Stack ------\n");
352
353
353 string symbol;
354 for (int i = 0, size = stack.size(); i < size; ++i) {
355 Addr addr = stack[size - i - 1];
356 if (addr == user)
357 symbol = "user";
358 else if (addr == console)
359 symbol = "console";
360 else if (addr == unknown)
361 symbol = "unknown";
362 else
363 symtab->findSymbol(addr, symbol);
354 string symbol;
355 for (int i = 0, size = stack.size(); i < size; ++i) {
356 Addr addr = stack[size - i - 1];
357 if (addr == user)
358 symbol = "user";
359 else if (addr == console)
360 symbol = "console";
361 else if (addr == unknown)
362 symbol = "unknown";
363 else
364 symtab->findSymbol(addr, symbol);
364
365
365 DPRINTFN("%#x: %s\n", addr, symbol);
366 DPRINTFN("%#x: %s\n", addr, symbol);
367 }
366 }
368 }
367}
368#endif
369#endif
370}