gh0s7/mckernel
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

eclair-dump-backtrace.exp: handle user space threads

Browse Source
This commit is contained in:
Balazs Gerofi
2017-01-24 14:47:10 +09:00
parent ad214c8206
commit b812848a0e
1 changed files with 33 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

39
arch/x86/tools/eclair-dump-backtrace.exp.in
View File

@@ -8,19 +8,36 @@ set state "init"
set thread_id 0 set thread_id 0
expect { expect {
"in ?? ()" {
switch -- $state {
"thread_chosen" {
set state "thread_skip"
}
"thread_bt" {
set state "thread_skip"
}
}
exp_continue
}
"(eclair) " { "(eclair) " {
switch -- $state { switch -- $state {
"init" { "init" {
set state "threads" set state "threads_list"
send "info threads\r" send "info threads\r"
} }
"threads" { "threads_list" {
incr thread_id incr thread_id
set state "thread_bt" set state "thread_chosen"
send "thread $thread_id\r" send "thread $thread_id\r"
} }
"thread_bt" { "thread_skip" {
set state "threads" incr thread_id
set state "thread_chosen"
send "thread $thread_id\r"
}
"thread_chosen" {
set state "thread_bt"
send "bt\r" send "bt\r"
} }
} }
@@ -28,7 +45,17 @@ expect {
exp_continue exp_continue
} }
"Type <return> to continue, or q <return> to quit" { "Type <return> to continue, or q <return> to quit" {
send "\r" switch -- $state {
"threads_list" {
send "\r"
}
"thread_bt" {
send "\r"
}
"thread_skip" {
send "q\r"
}
}
exp_continue exp_continue
} }
" not known." { " not known." {