From 6cc9fc32d65c7fc57eac59c0129097a44a0a6b6e Mon Sep 17 00:00:00 2001 From: Paul Kulchenko Date: Fri, 20 Oct 2023 22:31:47 -0700 Subject: [PATCH] Add statement readonly check to redbean sqlite --- tool/net/lsqlite3.c | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/tool/net/lsqlite3.c b/tool/net/lsqlite3.c index a7136a196..5bf636c53 100644 --- a/tool/net/lsqlite3.c +++ b/tool/net/lsqlite3.c @@ -234,6 +234,12 @@ static int dbvm_isopen(lua_State *L) { return 1; } +static int dbvm_readonly(lua_State *L) { + sdb_vm *svm = lsqlite_checkvm(L, 1); + lua_pushboolean(L, sqlite3_stmt_readonly(svm->vm)); + return 1; +} + static int dbvm_tostring(lua_State *L) { char buff[40]; sdb_vm *svm = lsqlite_getvm(L, 1); @@ -2660,6 +2666,7 @@ static const luaL_Reg dblib[] = { static const luaL_Reg vmlib[] = { {"isopen", dbvm_isopen }, + {"readonly", dbvm_readonly }, {"step", dbvm_step }, {"reset", dbvm_reset },