stacktrace.cc (2665:a124942bacb8) stacktrace.cc (2680:246e7104f744)
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;

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

31#include <string>
32
33#include "arch/alpha/isa_traits.hh"
34#include "arch/alpha/stacktrace.hh"
35#include "arch/alpha/vtophys.hh"
36#include "base/bitfield.hh"
37#include "base/trace.hh"
38#include "cpu/base.hh"
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;

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

31#include <string>
32
33#include "arch/alpha/isa_traits.hh"
34#include "arch/alpha/stacktrace.hh"
35#include "arch/alpha/vtophys.hh"
36#include "base/bitfield.hh"
37#include "base/trace.hh"
38#include "cpu/base.hh"
39#include "cpu/exec_context.hh"
39#include "cpu/thread_context.hh"
40#include "sim/system.hh"
41
42using namespace std;
43using namespace AlphaISA;
44
40#include "sim/system.hh"
41
42using namespace std;
43using namespace AlphaISA;
44
45ProcessInfo::ProcessInfo(ExecContext *_xc)
46 : xc(_xc)
45ProcessInfo::ProcessInfo(ThreadContext *_tc)
46 : tc(_tc)
47{
48 Addr addr = 0;
49
47{
48 Addr addr = 0;
49
50 if (!xc->getSystemPtr()->kernelSymtab->findAddress("thread_info_size", addr))
50 if (!tc->getSystemPtr()->kernelSymtab->findAddress("thread_info_size", addr))
51 panic("thread info not compiled into kernel\n");
51 panic("thread info not compiled into kernel\n");
52 thread_info_size = gtoh(xc->getVirtPort()->read<int32_t>(addr));
52 thread_info_size = gtoh(tc->getVirtPort()->read<int32_t>(addr));
53
53
54 if (!xc->getSystemPtr()->kernelSymtab->findAddress("task_struct_size", addr))
54 if (!tc->getSystemPtr()->kernelSymtab->findAddress("task_struct_size", addr))
55 panic("thread info not compiled into kernel\n");
55 panic("thread info not compiled into kernel\n");
56 task_struct_size = gtoh(xc->getVirtPort()->read<int32_t>(addr));
56 task_struct_size = gtoh(tc->getVirtPort()->read<int32_t>(addr));
57
57
58 if (!xc->getSystemPtr()->kernelSymtab->findAddress("thread_info_task", addr))
58 if (!tc->getSystemPtr()->kernelSymtab->findAddress("thread_info_task", addr))
59 panic("thread info not compiled into kernel\n");
59 panic("thread info not compiled into kernel\n");
60 task_off = gtoh(xc->getVirtPort()->read<int32_t>(addr));
60 task_off = gtoh(tc->getVirtPort()->read<int32_t>(addr));
61
61
62 if (!xc->getSystemPtr()->kernelSymtab->findAddress("task_struct_pid", addr))
62 if (!tc->getSystemPtr()->kernelSymtab->findAddress("task_struct_pid", addr))
63 panic("thread info not compiled into kernel\n");
63 panic("thread info not compiled into kernel\n");
64 pid_off = gtoh(xc->getVirtPort()->read<int32_t>(addr));
64 pid_off = gtoh(tc->getVirtPort()->read<int32_t>(addr));
65
65
66 if (!xc->getSystemPtr()->kernelSymtab->findAddress("task_struct_comm", addr))
66 if (!tc->getSystemPtr()->kernelSymtab->findAddress("task_struct_comm", addr))
67 panic("thread info not compiled into kernel\n");
67 panic("thread info not compiled into kernel\n");
68 name_off = gtoh(xc->getVirtPort()->read<int32_t>(addr));
68 name_off = gtoh(tc->getVirtPort()->read<int32_t>(addr));
69}
70
71Addr
72ProcessInfo::task(Addr ksp) const
73{
74 Addr base = ksp & ~0x3fff;
75 if (base == ULL(0xfffffc0000000000))
76 return 0;
77
69}
70
71Addr
72ProcessInfo::task(Addr ksp) const
73{
74 Addr base = ksp & ~0x3fff;
75 if (base == ULL(0xfffffc0000000000))
76 return 0;
77
78 return gtoh(xc->getVirtPort()->read<Addr>(base + task_off));
78 return gtoh(tc->getVirtPort()->read<Addr>(base + task_off));
79}
80
81int
82ProcessInfo::pid(Addr ksp) const
83{
84 Addr task = this->task(ksp);
85 if (!task)
86 return -1;
87
79}
80
81int
82ProcessInfo::pid(Addr ksp) const
83{
84 Addr task = this->task(ksp);
85 if (!task)
86 return -1;
87
88 return gtoh(xc->getVirtPort()->read<uint16_t>(task + pid_off));
88 return gtoh(tc->getVirtPort()->read<uint16_t>(task + pid_off));
89}
90
91string
92ProcessInfo::name(Addr ksp) const
93{
94 Addr task = this->task(ksp);
95 if (!task)
96 return "console";
97
98 char comm[256];
89}
90
91string
92ProcessInfo::name(Addr ksp) const
93{
94 Addr task = this->task(ksp);
95 if (!task)
96 return "console";
97
98 char comm[256];
99 CopyStringOut(xc, comm, task + name_off, sizeof(comm));
99 CopyStringOut(tc, comm, task + name_off, sizeof(comm));
100 if (!comm[0])
101 return "startup";
102
103 return comm;
104}
105
106StackTrace::StackTrace()
100 if (!comm[0])
101 return "startup";
102
103 return comm;
104}
105
106StackTrace::StackTrace()
107 : xc(0), stack(64)
107 : tc(0), stack(64)
108{
109}
110
108{
109}
110
111StackTrace::StackTrace(ExecContext *_xc, StaticInstPtr inst)
112 : xc(0), stack(64)
111StackTrace::StackTrace(ThreadContext *_tc, StaticInstPtr inst)
112 : tc(0), stack(64)
113{
113{
114 trace(_xc, inst);
114 trace(_tc, inst);
115}
116
117StackTrace::~StackTrace()
118{
119}
120
121void
115}
116
117StackTrace::~StackTrace()
118{
119}
120
121void
122StackTrace::trace(ExecContext *_xc, bool is_call)
122StackTrace::trace(ThreadContext *_tc, bool is_call)
123{
123{
124 xc = _xc;
124 tc = _tc;
125
125
126 bool usermode = (xc->readMiscReg(AlphaISA::IPR_DTB_CM) & 0x18) != 0;
126 bool usermode = (tc->readMiscReg(AlphaISA::IPR_DTB_CM) & 0x18) != 0;
127
127
128 Addr pc = xc->readNextPC();
129 bool kernel = xc->getSystemPtr()->kernelStart <= pc &&
130 pc <= xc->getSystemPtr()->kernelEnd;
128 Addr pc = tc->readNextPC();
129 bool kernel = tc->getSystemPtr()->kernelStart <= pc &&
130 pc <= tc->getSystemPtr()->kernelEnd;
131
132 if (usermode) {
133 stack.push_back(user);
134 return;
135 }
136
137 if (!kernel) {
138 stack.push_back(console);
139 return;
140 }
141
131
132 if (usermode) {
133 stack.push_back(user);
134 return;
135 }
136
137 if (!kernel) {
138 stack.push_back(console);
139 return;
140 }
141
142 SymbolTable *symtab = xc->getSystemPtr()->kernelSymtab;
143 Addr ksp = xc->readIntReg(TheISA::StackPointerReg);
142 SymbolTable *symtab = tc->getSystemPtr()->kernelSymtab;
143 Addr ksp = tc->readIntReg(TheISA::StackPointerReg);
144 Addr bottom = ksp & ~0x3fff;
145 Addr addr;
146
147 if (is_call) {
148 if (!symtab->findNearestAddr(pc, addr))
149 panic("could not find address %#x", pc);
150
151 stack.push_back(addr);
144 Addr bottom = ksp & ~0x3fff;
145 Addr addr;
146
147 if (is_call) {
148 if (!symtab->findNearestAddr(pc, addr))
149 panic("could not find address %#x", pc);
150
151 stack.push_back(addr);
152 pc = xc->readPC();
152 pc = tc->readPC();
153 }
154
155 Addr ra;
156 int size;
157
158 while (ksp > bottom) {
159 if (!symtab->findNearestAddr(pc, addr))
160 panic("could not find symbol for pc=%#x", pc);

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

176
177 pc = ra;
178 ksp += size;
179 } else {
180 stack.push_back(unknown);
181 return;
182 }
183
153 }
154
155 Addr ra;
156 int size;
157
158 while (ksp > bottom) {
159 if (!symtab->findNearestAddr(pc, addr))
160 panic("could not find symbol for pc=%#x", pc);

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

176
177 pc = ra;
178 ksp += size;
179 } else {
180 stack.push_back(unknown);
181 return;
182 }
183
184 bool kernel = xc->getSystemPtr()->kernelStart <= pc &&
185 pc <= xc->getSystemPtr()->kernelEnd;
184 bool kernel = tc->getSystemPtr()->kernelStart <= pc &&
185 pc <= tc->getSystemPtr()->kernelEnd;
186 if (!kernel)
187 return;
188
189 if (stack.size() >= 1000)
190 panic("unwinding too far");
191 }
192
193 panic("unwinding too far");
194}
195
196bool
197StackTrace::isEntry(Addr addr)
198{
186 if (!kernel)
187 return;
188
189 if (stack.size() >= 1000)
190 panic("unwinding too far");
191 }
192
193 panic("unwinding too far");
194}
195
196bool
197StackTrace::isEntry(Addr addr)
198{
199 if (addr == xc->readMiscReg(AlphaISA::IPR_PALtemp12))
199 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp12))
200 return true;
201
200 return true;
201
202 if (addr == xc->readMiscReg(AlphaISA::IPR_PALtemp7))
202 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp7))
203 return true;
204
203 return true;
204
205 if (addr == xc->readMiscReg(AlphaISA::IPR_PALtemp11))
205 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp11))
206 return true;
207
206 return true;
207
208 if (addr == xc->readMiscReg(AlphaISA::IPR_PALtemp21))
208 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp21))
209 return true;
210
209 return true;
210
211 if (addr == xc->readMiscReg(AlphaISA::IPR_PALtemp9))
211 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp9))
212 return true;
213
212 return true;
213
214 if (addr == xc->readMiscReg(AlphaISA::IPR_PALtemp2))
214 if (addr == tc->readMiscReg(AlphaISA::IPR_PALtemp2))
215 return true;
216
217 return false;
218}
219
220bool
221StackTrace::decodeStack(MachInst inst, int &disp)
222{

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

291StackTrace::decodePrologue(Addr sp, Addr callpc, Addr func,
292 int &size, Addr &ra)
293{
294 size = 0;
295 ra = 0;
296
297 for (Addr pc = func; pc < callpc; pc += sizeof(MachInst)) {
298 MachInst inst;
215 return true;
216
217 return false;
218}
219
220bool
221StackTrace::decodeStack(MachInst inst, int &disp)
222{

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

291StackTrace::decodePrologue(Addr sp, Addr callpc, Addr func,
292 int &size, Addr &ra)
293{
294 size = 0;
295 ra = 0;
296
297 for (Addr pc = func; pc < callpc; pc += sizeof(MachInst)) {
298 MachInst inst;
299 CopyOut(xc, (uint8_t *)&inst, pc, sizeof(MachInst));
299 CopyOut(tc, (uint8_t *)&inst, pc, sizeof(MachInst));
300
301 int reg, disp;
302 if (decodeStack(inst, disp)) {
303 if (size) {
304 // panic("decoding frame size again");
305 return true;
306 }
307 size += disp;
308 } else if (decodeSave(inst, reg, disp)) {
309 if (!ra && reg == ReturnAddressReg) {
300
301 int reg, disp;
302 if (decodeStack(inst, disp)) {
303 if (size) {
304 // panic("decoding frame size again");
305 return true;
306 }
307 size += disp;
308 } else if (decodeSave(inst, reg, disp)) {
309 if (!ra && reg == ReturnAddressReg) {
310 CopyOut(xc, (uint8_t *)&ra, sp + disp, sizeof(Addr));
310 CopyOut(tc, (uint8_t *)&ra, sp + disp, sizeof(Addr));
311 if (!ra) {
312 // panic("no return address value pc=%#x\n", pc);
313 return false;
314 }
315 }
316 }
317 }
318
319 return true;
320}
321
322#if TRACING_ON
323void
324StackTrace::dump()
325{
311 if (!ra) {
312 // panic("no return address value pc=%#x\n", pc);
313 return false;
314 }
315 }
316 }
317 }
318
319 return true;
320}
321
322#if TRACING_ON
323void
324StackTrace::dump()
325{
326 StringWrap name(xc->getCpuPtr()->name());
327 SymbolTable *symtab = xc->getSystemPtr()->kernelSymtab;
326 StringWrap name(tc->getCpuPtr()->name());
327 SymbolTable *symtab = tc->getSystemPtr()->kernelSymtab;
328
329 DPRINTFN("------ Stack ------\n");
330
331 string symbol;
332 for (int i = 0, size = stack.size(); i < size; ++i) {
333 Addr addr = stack[size - i - 1];
334 if (addr == user)
335 symbol = "user";
336 else if (addr == console)
337 symbol = "console";
338 else if (addr == unknown)
339 symbol = "unknown";
340 else
341 symtab->findSymbol(addr, symbol);
342
343 DPRINTFN("%#x: %s\n", addr, symbol);
344 }
345}
346#endif
328
329 DPRINTFN("------ Stack ------\n");
330
331 string symbol;
332 for (int i = 0, size = stack.size(); i < size; ++i) {
333 Addr addr = stack[size - i - 1];
334 if (addr == user)
335 symbol = "user";
336 else if (addr == console)
337 symbol = "console";
338 else if (addr == unknown)
339 symbol = "unknown";
340 else
341 symtab->findSymbol(addr, symbol);
342
343 DPRINTFN("%#x: %s\n", addr, symbol);
344 }
345}
346#endif