Function db_db_debug

lua/sp.c:1566–1637

}

static int db_db_debug(Lua lua)
{
    char *replace_from = NULL;
    int finish_execute = 0;
    for (;;) {
        char buffer[250] = {0};
        int n = get_remote_input(lua, buffer, sizeof(buffer));
        if (strncmp(buffer, "cont", 4) == 0) {
            Pthread_cond_broadcast(&lua_debug_cond);
            sprintf(buffer, " %s", "_SP.do_next = false \n if (db.emit) then "
                                   "\n db_emit = db.emit \n end");
            finish_execute = 1;
        } else if (strncmp(buffer, "help", 4) == 0) {
            sprintf(buffer, " %s()", "_SP.help");
        } else if (strncmp(buffer, "next", 4) == 0) {
            sprintf(buffer, " %s()", "_SP.debug_next");
            finish_execute = 1;
        } else if (strncmp(buffer, "breakpoints", 11) == 0) {
            sprintf(buffer, " %s()", "_SP.bkps");
        } else if (strncmp(buffer, "stop at", 7) == 0) {
            int i = atoi(&buffer[7]);
            sprintf(buffer, " %s(%d)", "_SP.set_breakpoint", i);
        } else if (strncmp(buffer, "list", 4) == 0) {
            int i = atoi(&buffer[4]);
            sprintf(buffer, " %s(%d)", "_SP.list_code", i);
        } else if (strncmp(buffer, "delete at", 9) == 0) {
            int i = atoi(&buffer[9]);
            sprintf(buffer, " %s(%d)", "_SP.delete_breakpoint", i);
        } else if (strncmp(buffer, "print ", 6) == 0) {
            char old_buffer[sizeof(buffer)];
            sprintf(old_buffer, "%s", buffer);
            int len = strlen(&old_buffer[6]);
            old_buffer[6 + len - 1] = '\0';
            sprintf(buffer, "eval('%s')", old_buffer + 6);
        } else if (strncmp(buffer, "getinfo", 7) == 0) {
            sprintf(buffer, " %s", "_SP.getinfo(5)");
        } else if (strncmp(buffer, "HALT", 4) == 0) {
            logmsg(LOGMSG_USER, "Halt should not be coming here...\n");
            continue;
        } else if (strncmp(buffer, "where", 5) == 0) {
            sprintf(buffer, " %s", "_SP.where()");
        } else if ((replace_from = strstr(buffer, "getvariable")) != 0) {
            char *arguments = replace_from + strlen("getvariable");
            snprintf0(buffer, sizeof(buffer), "_SP.get_var%s", arguments);
            replace_from = NULL;
        } else if ((replace_from = strstr(buffer, "setvariable")) != 0) {
            char *arguments = replace_from + strlen("setvariable");
            snprintf0(buffer, sizeof(buffer), "_SP.set_var%s", arguments);
            replace_from = NULL;
        } else if (n == 0) {
            /* Debugging socket is closed, let the program continue. */
            Pthread_cond_broadcast(&lua_debug_cond);
            sprintf(buffer, " %s", "db_emit = db.emit");
            finish_execute = 1;
        } else if (buffer[0] == '\0') {
            /* Debugging socket is closed, let the program continue. */
            sprintf(buffer, " %s()", "_SP.debug_next");
        }