Function db_exec

lua/sp.c:3728–3782

}

static int db_exec(Lua lua)
{
    luaL_checkudata(lua, 1, dbtypes.db);
    lua_remove(lua, 1);

    SP sp = getsp(lua);

    const char *sql = lua_tostring(lua, -1);
    if (sql == NULL) {
        luabb_error(lua, sp, "expected sql string");
        return 2;
    }

    while (isspace(*sql))
        ++sql;

    sqlite3_stmt *stmt = NULL;
    int rc = lua_prepare_sql(sp, sql, &stmt);
    if (rc != 0) {
        lua_pushnil(lua);
        lua_pushinteger(lua, rc);
        return 2;
    }
    dbstmt_t *dbstmt = new_dbstmt(lua, sp, stmt);
    if (dbstmt->readonly) {
        // dbstmt:fetch() will run it
        lua_pushinteger(lua, 0);
        return 2;
    }

    // a write stmt - run it now
    setup_first_sqlite_step(sp, dbstmt, 0);
    sqlite3 *sqldb = getdb(sp);
    lua_begin_step(sp->clnt, sp, stmt);
    while ((rc = sqlite3_maybe_step(sp->clnt, stmt)) == SQLITE_ROW) {
        lua_another_step(sp->clnt, stmt, rc);
    }
    lua_end_step(sp->clnt, sp, stmt);
    if (rc == SQLITE_DONE) {
        dbstmt->rows_changed = sqlite3_changes(sqldb);
        sp->rc = 0;
    } else {
        const char *err;
        sp->rc = lua_check_errors(sp->clnt, sqldb, stmt, &err);
        sp->error = strdup(err);
    }

    if (sp->rc) {
        lua_pushnil(lua);
        lua_pushinteger(lua, sp->rc);
    } else {
        lua_pushinteger(lua, 0); /* Success return code */
    }
    return 2;
}

static int db_prepare(Lua L)
{