2014-02-10 01:10:30 +00:00
/*************************************************************************/
/* script_debugger_local.cpp */
/*************************************************************************/
/* This file is part of: */
/* GODOT ENGINE */
/* http://www.godotengine.org */
/*************************************************************************/
2015-04-18 17:38:54 +00:00
/* Copyright (c) 2007-2015 Juan Linietsky, Ariel Manzur. */
2014-02-10 01:10:30 +00:00
/* */
/* Permission is hereby granted, free of charge, to any person obtaining */
/* a copy of this software and associated documentation files (the */
/* "Software"), to deal in the Software without restriction, including */
/* without limitation the rights to use, copy, modify, merge, publish, */
/* distribute, sublicense, and/or sell copies of the Software, and to */
/* permit persons to whom the Software is furnished to do so, subject to */
/* the following conditions: */
/* */
/* The above copyright notice and this permission notice shall be */
/* included in all copies or substantial portions of the Software. */
/* */
/* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, */
/* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF */
/* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.*/
/* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY */
/* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, */
/* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE */
/* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */
/*************************************************************************/
# include "script_debugger_local.h"
# include "os/os.h"
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 {
2015-06-29 03:29:49 +00:00
int frame = line . get_slicec ( ' ' , 1 ) . to_int ( ) ;
2014-02-10 01:10:30 +00:00
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 {
2015-06-29 03:29:49 +00:00
String expr = line . get_slicec ( ' ' , 2 ) ;
2014-02-10 01:10:30 +00:00
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 {
2015-06-29 03:29:49 +00:00
String bppos = line . get_slicec ( ' ' , 1 ) ;
String source = bppos . get_slicec ( ' : ' , 0 ) . strip_edges ( ) ;
int line = bppos . get_slicec ( ' : ' , 1 ) . strip_edges ( ) . to_int ( ) ;
2014-02-10 01:10:30 +00:00
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 {
2015-06-29 03:29:49 +00:00
String bppos = line . get_slicec ( ' ' , 1 ) ;
String source = bppos . get_slicec ( ' : ' , 0 ) . strip_edges ( ) ;
int line = bppos . get_slicec ( ' : ' , 1 ) . strip_edges ( ) . to_int ( ) ;
2014-02-10 01:10:30 +00:00
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 ( " \t c,continue : \t \t Continue execution. " ) ;
print_line ( " \t bt,backtrace : \t \t Show stack trace (frames). " ) ;
print_line ( " \t fr,frame <frame>: \t Change current frame. " ) ;
print_line ( " \t lv,locals : \t \t Show local variables for current frame. " ) ;
print_line ( " \t mv,members : \t \t Show member variables for \" this \" in frame. " ) ;
print_line ( " \t gv,globals : \t \t Show global variables. " ) ;
print_line ( " \t p,print <expr> : \t Execute and print variable in expression. " ) ;
print_line ( " \t s,step : \t \t Step to next line. " ) ;
print_line ( " \t n,next : \t \t Next line. " ) ;
print_line ( " \t br,break source:line : \t Place a breakpoint. " ) ;
print_line ( " \t delete [source:line]: \t \t Delete one/all breakpoints. " ) ;
} else {
print_line ( " Error: Invalid command, enter \" help \" for assistance. " ) ;
}
}
}
void ScriptDebuggerLocal : : send_message ( const String & p_message , const Array & p_args ) {
print_line ( " MESSAGE: ' " + p_message + " ' - " + String ( Variant ( p_args ) ) ) ;
}
ScriptDebuggerLocal : : ScriptDebuggerLocal ( ) {
}