fluencelabs/redis
1
0
Fork 0
mirror of https://github.com/fluencelabs/redis synced 2025-03-19 09:00:51 +00:00
Code Issues Projects Releases Wiki Activity

Lua debugger: redis-cli can restart Lua debugging sessions.

Browse Source
This commit is contained in:
antirez 2015-11-17 12:11:13 +01:00
parent 0cc19174f9
commit 58573f1dd2
1 changed files with 75 additions and 45 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

120
src/redis-cli.c
View File

@ -1106,6 +1106,12 @@ static void repl(void) {
strcasecmp(argv[0],"exit") == 0) strcasecmp(argv[0],"exit") == 0)
{ {
exit(0); exit(0);
} else if (strcasecmp(argv[0],"restart") == 0) {
if (config.eval_ldb) {
return; /* Return to evalMode to restart the session. */
} else {
printf("Use 'restart' only in Lua debugging mode.");
}
} else if (argc == 3 && !strcasecmp(argv[0],"connect")) { } else if (argc == 3 && !strcasecmp(argv[0],"connect")) {
sdsfree(config.hostip); sdsfree(config.hostip);
config.hostip = sdsnew(argv[1]); config.hostip = sdsnew(argv[1]);
@ -1169,59 +1175,83 @@ static int noninteractive(int argc, char **argv) {
*--------------------------------------------------------------------------- */ *--------------------------------------------------------------------------- */
static int evalMode(int argc, char **argv) { static int evalMode(int argc, char **argv) {
sds script = sdsempty(); sds script = NULL;
FILE *fp; FILE *fp;
char buf[1024]; char buf[1024];
size_t nread; size_t nread;
char **argv2; char **argv2;
int j, got_comma = 0, keys = 0; int j, got_comma, keys;
int retval = REDIS_OK;
/* Load the script from the file, as an sds string. */ while(1) {
fp = fopen(config.eval,"r"); if (config.eval_ldb) {
if (!fp) { printf(
fprintf(stderr, "Lua debugging session started, please use:\n"
"Can't open file '%s': %s\n", config.eval, strerror(errno)); "quit -- End the session.\n"
exit(1); "restart -- Restart the script in debug mode again.\n"
} "help -- Show Lua script debugging commands.\n\n"
while((nread = fread(buf,1,sizeof(buf),fp)) != 0) { );
script = sdscatlen(script,buf,nread);
}
fclose(fp);
/* If we are debugging a script, enable the Lua debugger. */
if (config.eval_ldb) {
redisReply *reply = redisCommand(context,
config.eval_ldb_sync ? "SCRIPT DEBUG sync": "SCRIPT DEBUG yes");
if (reply) freeReplyObject(reply);
}
/* Create our argument vector */
argv2 = zmalloc(sizeof(sds)*(argc+3));
argv2[0] = sdsnew("EVAL");
argv2[1] = script;
for (j = 0; j < argc; j++) {
if (!got_comma && argv[j][0] == ',' && argv[j][1] == 0) {
got_comma = 1;
continue;
} }
argv2[j+3-got_comma] = sdsnew(argv[j]);
if (!got_comma) keys++;
}
argv2[2] = sdscatprintf(sdsempty(),"%d",keys);
/* Call it */ sdsfree(script);
int eval_ldb = config.eval_ldb; /* Save it, may be reverteed. */ script = sdsempty();
int retval = issueCommand(argc+3-got_comma, argv2); got_comma = 0;
if (eval_ldb) { keys = 0;
if (!config.eval_ldb) {
/* If the debugging session ended immediately, there was an /* Load the script from the file, as an sds string. */
* error compiling the script. Show it and don't enter fp = fopen(config.eval,"r");
* the REPL at all. */ if (!fp) {
printf("Eval debugging session can't start:\n"); fprintf(stderr,
cliReadReply(0); "Can't open file '%s': %s\n", config.eval, strerror(errno));
exit(1);
}
while((nread = fread(buf,1,sizeof(buf),fp)) != 0) {
script = sdscatlen(script,buf,nread);
}
fclose(fp);
/* If we are debugging a script, enable the Lua debugger. */
if (config.eval_ldb) {
redisReply *reply = redisCommand(context,
config.eval_ldb_sync ?
"SCRIPT DEBUG sync": "SCRIPT DEBUG yes");
if (reply) freeReplyObject(reply);
}
/* Create our argument vector */
argv2 = zmalloc(sizeof(sds)*(argc+3));
argv2[0] = sdsnew("EVAL");
argv2[1] = script;
for (j = 0; j < argc; j++) {
if (!got_comma && argv[j][0] == ',' && argv[j][1] == 0) {
got_comma = 1;
continue;
}
argv2[j+3-got_comma] = sdsnew(argv[j]);
if (!got_comma) keys++;
}
argv2[2] = sdscatprintf(sdsempty(),"%d",keys);
/* Call it */
int eval_ldb = config.eval_ldb; /* Save it, may be reverteed. */
retval = issueCommand(argc+3-got_comma, argv2);
if (eval_ldb) {
if (!config.eval_ldb) {
/* If the debugging session ended immediately, there was an
* error compiling the script. Show it and don't enter
* the REPL at all. */
printf("Eval debugging session can't start:\n");
cliReadReply(0);
break; /* Return to the caller. */
} else {
strncpy(config.prompt,"lua debugger> ",sizeof(config.prompt));
repl();
/* Restart the session if repl() returned. */
cliConnect(1);
printf("\n");
}
} else { } else {
strncpy(config.prompt,"lua debugger> ",sizeof(config.prompt)); break; /* Return to the caller. */
repl();
} }
} }
return retval; return retval;