//------------------------------------------------------------------------------
// Name: kill
// Desc:
//------------------------------------------------------------------------------
void DebuggerCore::kill() {
if(attached()) {
clear_breakpoints();
ptrace(PT_KILL, pid(), 0, 0);
native::waitpid(pid(), 0, WAIT_ANY);
pid_ = 0;
threads_.clear();
}
}
//------------------------------------------------------------------------------
// Name: detach
// Desc:
//------------------------------------------------------------------------------
void DebuggerCore::detach() {
if(attached()) {
// TODO: do i need to stop each thread first, and wait for them?
clear_breakpoints();
for(auto it = threads_.begin(); it != threads_.end(); ++it) {
ptrace(PT_DETACH, it.key(), 0, 0);
}
pid_ = 0;
threads_.clear();
}
}
//------------------------------------------------------------------------------
// Name: kill
// Desc:
//------------------------------------------------------------------------------
void DebuggerCore::kill() {
if(attached()) {
clear_breakpoints();
ptrace(PTRACE_KILL, pid(), 0, 0);
// TODO: do i need to actually do this wait?
native::waitpid(pid(), 0, __WALL);
delete process_;
process_ = 0;
reset();
}
}
//------------------------------------------------------------------------------
// Name: detach
// Desc:
//------------------------------------------------------------------------------
void DebuggerCore::detach() {
if(process_) {
stop_threads();
clear_breakpoints();
for(auto thread: process_->threads()) {
ptrace(PTRACE_DETACH, thread->tid(), 0, 0);
}
delete process_;
process_ = nullptr;
reset();
}
}
//------------------------------------------------------------------------------
// Name: detach
// Desc:
//------------------------------------------------------------------------------
void DebuggerCore::detach() {
if(attached()) {
stop_threads();
clear_breakpoints();
for(edb::tid_t thread: thread_ids()) {
if(ptrace(PTRACE_DETACH, thread, 0, 0) == 0) {
native::waitpid(thread, 0, __WALL);
}
}
delete process_;
process_ = 0;
reset();
}
}
void ScriptDebuggerLocal::debug(ScriptLanguage *p_script, bool p_can_continue) {
print_line("Debugger Break, Reason: '" + p_script->debug_get_error() + "'");
print_line("*Frame " + itos(0) + " - " + p_script->debug_get_stack_level_source(0) + ":" + itos(p_script->debug_get_stack_level_line(0)) + " in function '" + p_script->debug_get_stack_level_function(0) + "'");
print_line("Enter \"help\" for assistance.");
int current_frame = 0;
int total_frames = p_script->debug_get_stack_level_count();
while (true) {
OS::get_singleton()->print("debug> ");
String line = OS::get_singleton()->get_stdin_string().strip_edges();
if (line == "") {
print_line("Debugger Break, Reason: '" + p_script->debug_get_error() + "'");
print_line("*Frame " + itos(current_frame) + " - " + p_script->debug_get_stack_level_source(current_frame) + ":" + itos(p_script->debug_get_stack_level_line(current_frame)) + " in function '" + p_script->debug_get_stack_level_function(current_frame) + "'");
print_line("Enter \"help\" for assistance.");
} else if (line == "c" || line == "continue")
break;
else if (line == "bt" || line == "breakpoint") {
for (int i = 0; i < total_frames; i++) {
String cfi = (current_frame == i) ? "*" : " "; //current frame indicator
print_line(cfi + "Frame " + itos(i) + " - " + p_script->debug_get_stack_level_source(i) + ":" + itos(p_script->debug_get_stack_level_line(i)) + " in function '" + p_script->debug_get_stack_level_function(i) + "'");
}
} else if (line.begins_with("fr") || line.begins_with("frame")) {
if (line.get_slice_count(" ") == 1) {
print_line("*Frame " + itos(current_frame) + " - " + p_script->debug_get_stack_level_source(current_frame) + ":" + itos(p_script->debug_get_stack_level_line(current_frame)) + " in function '" + p_script->debug_get_stack_level_function(current_frame) + "'");
} else {
int frame = line.get_slicec(' ', 1).to_int();
if (frame < 0 || frame >= total_frames) {
print_line("Error: Invalid frame.");
} else {
current_frame = frame;
print_line("*Frame " + itos(frame) + " - " + p_script->debug_get_stack_level_source(frame) + ":" + itos(p_script->debug_get_stack_level_line(frame)) + " in function '" + p_script->debug_get_stack_level_function(frame) + "'");
}
}
} else if (line == "lv" || line == "locals") {
List<String> locals;
List<Variant> values;
p_script->debug_get_stack_level_locals(current_frame, &locals, &values);
List<Variant>::Element *V = values.front();
for (List<String>::Element *E = locals.front(); E; E = E->next()) {
print_line(E->get() + ": " + String(V->get()));
V = V->next();
}
} else if (line == "gv" || line == "globals") {
List<String> locals;
List<Variant> values;
p_script->debug_get_globals(&locals, &values);
List<Variant>::Element *V = values.front();
for (List<String>::Element *E = locals.front(); E; E = E->next()) {
print_line(E->get() + ": " + String(V->get()));
V = V->next();
}
} else if (line == "mv" || line == "members") {
List<String> locals;
List<Variant> values;
p_script->debug_get_stack_level_members(current_frame, &locals, &values);
List<Variant>::Element *V = values.front();
for (List<String>::Element *E = locals.front(); E; E = E->next()) {
print_line(E->get() + ": " + String(V->get()));
V = V->next();
}
} else if (line.begins_with("p") || line.begins_with("print")) {
if (line.get_slice_count(" ") <= 1) {
print_line("Usage: print <expre>");
} else {
String expr = line.get_slicec(' ', 2);
String res = p_script->debug_parse_stack_level_expression(current_frame, expr);
print_line(res);
}
} else if (line == "s" || line == "step") {
set_depth(-1);
set_lines_left(1);
break;
} else if (line.begins_with("n") || line.begins_with("next")) {
set_depth(0);
set_lines_left(1);
break;
} else if (line.begins_with("br") || line.begins_with("break")) {
if (line.get_slice_count(" ") <= 1) {
//show breakpoints
} else {
String bppos = line.get_slicec(' ', 1);
String source = bppos.get_slicec(':', 0).strip_edges();
int line = bppos.get_slicec(':', 1).strip_edges().to_int();
source = breakpoint_find_source(source);
insert_breakpoint(line, source);
print_line("BreakPoint at " + source + ":" + itos(line));
}
} else if (line.begins_with("delete")) {
if (line.get_slice_count(" ") <= 1) {
clear_breakpoints();
} else {
String bppos = line.get_slicec(' ', 1);
String source = bppos.get_slicec(':', 0).strip_edges();
int line = bppos.get_slicec(':', 1).strip_edges().to_int();
source = breakpoint_find_source(source);
remove_breakpoint(line, source);
print_line("Removed BreakPoint at " + source + ":" + itos(line));
}
} else if (line == "h" || line == "help") {
print_line("Built-In Debugger command list:\n");
print_line("\tc,continue :\t\t Continue execution.");
print_line("\tbt,backtrace :\t\t Show stack trace (frames).");
print_line("\tfr,frame <frame>:\t Change current frame.");
print_line("\tlv,locals :\t\t Show local variables for current frame.");
print_line("\tmv,members :\t\t Show member variables for \"this\" in frame.");
print_line("\tgv,globals :\t\t Show global variables.");
print_line("\tp,print <expr> :\t Execute and print variable in expression.");
print_line("\ts,step :\t\t Step to next line.");
print_line("\tn,next :\t\t Next line.");
print_line("\tbr,break source:line :\t Place a breakpoint.");
print_line("\tdelete [source:line]:\t\t Delete one/all breakpoints.");
} else {
print_line("Error: Invalid command, enter \"help\" for assistance.");
}
}
}
