rust/src/libcore/stackwalk.rs

83 lines
1.6 KiB
Rust

// NB: Don't rely on other core mods here as this has to move into the rt
import unsafe::reinterpret_cast;
import ptr::offset;
import sys::size_of;
type word = uint;
class frame {
let fp: *word;
new(fp: *word) {
self.fp = fp;
}
}
fn walk_stack(visit: fn(frame) -> bool) {
#debug("beginning stack walk");
do frame_address |frame_pointer| {
let mut frame_address: *word = unsafe {
reinterpret_cast(frame_pointer)
};
loop {
let fr = frame(frame_address);
#debug("frame: %x", unsafe { reinterpret_cast(fr.fp) });
visit(fr);
unsafe {
let next_fp: **word = reinterpret_cast(frame_address);
frame_address = *next_fp;
if *frame_address == 0u {
#debug("encountered task_start_wrapper. ending walk");
// This is the task_start_wrapper_frame. There is
// no stack beneath it and it is a foreign frame.
break;
}
}
}
}
}
#[test]
fn test_simple() {
for walk_stack |_frame| {
}
}
#[test]
fn test_simple_deep() {
fn run(i: int) {
if i == 0 { ret }
for walk_stack |_frame| {
unsafe {
breakpoint();
}
}
run(i - 1);
}
run(10);
}
fn breakpoint() {
rustrt::rust_dbg_breakpoint()
}
fn frame_address(f: fn(*u8)) {
rusti::frame_address(f)
}
extern mod rustrt {
fn rust_dbg_breakpoint();
}
#[abi = "rust-intrinsic"]
extern mod rusti {
fn frame_address(f: fn(*u8));
}