diff --git a/src/helper/command.c b/src/helper/command.c index f2a5f56ba6c5851a1c6818db33cea52a748ecb42..ca8a1c1b67c7f83088a894afc7c6c4ee1be95f63 100644 --- a/src/helper/command.c +++ b/src/helper/command.c @@ -61,6 +61,23 @@ static void tcl_output(void *privData, const char *file, int line, const char *f extern command_context_t *global_cmd_ctx; +void script_debug(Jim_Interp *interp, const char *name, int argc, Jim_Obj *const *argv) +{ + int i; + + LOG_DEBUG("command - %s", name); + for (i = 0; i < argc; i++) { + int len; + const char *w = Jim_GetString(argv[i], &len); + + /* end of line comment? */ + if (*w == '#') + break; + + LOG_DEBUG("%s - argv[%d]=%s", name, i, w); + } +} + static int script_command(Jim_Interp *interp, int argc, Jim_Obj *const *argv) { /* the private data is stashed in the interp structure */ @@ -85,7 +102,7 @@ static int script_command(Jim_Interp *interp, int argc, Jim_Obj *const *argv) target_call_timer_callbacks_now(); LOG_USER_N("%s", ""); /* Keep GDB connection alive*/ - LOG_DEBUG("script_command - %s", c->name); + script_debug(interp, c->name, argc, argv); words = malloc(sizeof(char *) * argc); for (i = 0; i < argc; i++) @@ -102,7 +119,6 @@ static int script_command(Jim_Interp *interp, int argc, Jim_Obj *const *argv) { return JIM_ERR; } - LOG_DEBUG("script_command - %s, argv[%u]=%s", c->name, i, words[i]); } nwords = i; diff --git a/src/helper/command.h b/src/helper/command.h index d5b87641c24a5d82ab28de099fe43cbbfe7c3729..293eb1414b941dda96c642f8d2bc181d81ad3d94 100644 --- a/src/helper/command.h +++ b/src/helper/command.h @@ -123,4 +123,6 @@ DEFINE_PARSE_ULONG(u32, uint32_t, UINT32_MAX) DEFINE_PARSE_ULONG(u16, uint16_t, UINT16_MAX) DEFINE_PARSE_ULONG(u8, uint8_t, UINT8_MAX) +void script_debug(Jim_Interp *interp, const char *cmd, int argc, Jim_Obj *const *argv); + #endif /* COMMAND_H */ diff --git a/src/jtag/tcl.c b/src/jtag/tcl.c index abc100622586b3fa3cfba425ace8396947ef9bdf..3586a2f6c949d5d9c19d3e9e3f2ecc7adbb4d7c8 100644 --- a/src/jtag/tcl.c +++ b/src/jtag/tcl.c @@ -1248,6 +1248,8 @@ static int Jim_Command_drscan(Jim_Interp *interp, int argc, Jim_Obj *const *args endstate = TAP_IDLE; + script_debug(interp, "drscan", argc, args); + /* validate arguments as numbers */ e = JIM_OK; for (i = 2; i < argc; i+=2) @@ -1369,6 +1371,8 @@ static int Jim_Command_pathmove(Jim_Interp *interp, int argc, Jim_Obj *const *ar return JIM_ERR; } + script_debug(interp, "pathmove", argc, args); + int i; for (i=0; i<argc-1; i++) { @@ -1403,6 +1407,8 @@ static int Jim_Command_pathmove(Jim_Interp *interp, int argc, Jim_Obj *const *ar static int Jim_Command_flush_count(Jim_Interp *interp, int argc, Jim_Obj *const *args) { + script_debug(interp, "flush_count", argc, args); + Jim_SetResult(interp, Jim_NewIntObj(interp, jtag_get_flush_queue_count())); return JIM_OK;