Function run_sp_int

lua/sp.c:6435–6470

}

static int run_sp_int(struct sqlclntstate *clnt, int argcnt, char **err)
{
    int rc;
    SP sp = clnt->sp;
    Lua lua = sp->lua;

    if ((rc = lua_pcall(lua, argcnt, LUA_MULTRET, 0)) != 0) {
        if (lua_gettop(lua) > 0 && !lua_isnil(lua, -1)) {
            *err = strdup(luabb_tostring(lua, -1));
        } else {
            *err = strdup("");
        }
        rc = -1;
        int tmp;
        /* Don't make new parent transaction on this rollback. */
        sp->make_parent_trans = 0;

        db_rollback_int(lua, &tmp);

        if (in_client_trans(clnt)) {
            /* We have rolled back the transaction before having seen a commit
             * or rollback from the client. Let's fix the transaction state.
             */
            assert(clnt->ctrl_sqlengine == SQLENG_NORMAL_PROCESS);
            sql_set_sqlengine_state(clnt, __FILE__, __LINE__, SQLENG_FNSH_ABORTED_STATE);
        }
    }

    if (gbl_break_lua && pthread_equal(gbl_break_lua, pthread_self())) {
        gbl_lua_version++;
        gbl_break_lua = 0;
        gbl_break_all_lua = 0;
    }

    return rc;
}

static int run_sp(struct sqlclntstate *clnt, int argcnt, char **err)
{