Function FunctionListLib

src/storage/scripting.cc:551–586

extension to Redis Function list detailed informantion of a specific library NOTE: it is required to load the library to lua runtime before listing (calling this function) i.e. it will output nothing if the library is only in storage but not loaded

// NOTE: it is required to load the library to lua runtime before listing (calling this function)
// i.e. it will output nothing if the library is only in storage but not loaded
Status FunctionListLib(redis::Connection *conn, const std::string &libname, std::string *output) {
  auto lua = conn->Owner()->Lua();

  lua_getglobal(lua, REDIS_FUNCTION_LIBRARIES);
  if (lua_isnil(lua, -1)) {
    lua_pop(lua, 1);
    lua_newtable(lua);
  }

  lua_getfield(lua, -1, libname.c_str());
  if (lua_isnil(lua, -1)) {
    lua_pop(lua, 2);

    return {Status::NotOK, "The library is not found or not loaded from storage"};
  }

  output->append(conn->HeaderOfMap(3));
  output->append(redis::BulkString("library_name"));
  output->append(redis::BulkString(libname));
  output->append(redis::BulkString("engine"));
  output->append(redis::BulkString("lua"));

  auto count = lua_objlen(lua, -1);
  output->append(redis::SimpleString("functions"));
  output->append(redis::MultiLen(count));

  for (size_t i = 1; i <= count; ++i) {
    lua_rawgeti(lua, -1, static_cast<int>(i));
    auto func = lua_tostring(lua, -1);
    output->append(redis::BulkString(func));
    lua_pop(lua, 1);
  }

  lua_pop(lua, 2);
  return Status::OK();
}

Status FunctionDelete(engine::Context &ctx, redis::Connection *conn, const std::string &name) {
  auto lua = conn->Owner()->Lua();