Function db_table_to_json

lua/sp.c:4127–4164

static cson_value *table_to_cson(Lua, int, json_conv *);
static int db_table_to_json(Lua L)
{
    luaL_checkudata(L, 1, dbtypes.db);
    luaL_checktype(L, 2, LUA_TTABLE);
    json_conv conv = {0};
    if (lua_gettop(L) == 3) {
        luaL_checktype(L, 3, LUA_TTABLE);
        lua_pushnil(L);
        int processed = 0;
        while (lua_next(L, -2)) {
            if (process_json_conv(L, &conv) != 0) {
            out:
                return luaL_error(L, "bad argument #2 to 'table_to_json'");
            }
            processed = 1;
            lua_pop(L, 1);
        }
        if (processed == 0) goto out;
        lua_pop(L, 1);
    }
    if ((conv.flag & CONV_FLAG_UTF8_MASK) == 0)
        conv.flag |= CONV_FLAG_UTF8_FATAL;
    cson_value *cson = table_to_cson(L, 0, &conv);
    if (cson == NULL) {
        if (conv.reason & (CONV_REASON_UTF8_FATAL | CONV_REASON_ARGS_FATAL)) {
            return luaL_error(L, conv.error);
        }
        lua_pushnil(L); // CONV_REASON_UTF8_NIL
    } else {
        cson_buffer buf;
        cson_output_buffer(cson, &buf);
        lua_pushlstring(L, (char *)buf.mem, buf.used);
        cson_free_value(cson);
    }
    // non-zero rc if nil'd, truncated or hexified cstring
    lua_pushinteger(L, conv.reason);
    return 2;
}

static int db_emit_int(Lua L)
{