Method luaRedisGenericCommand

src/tendisplus/script/lua_state.cpp:316–497

redis.call() redis.pcall()*/

/* redis.call() redis.pcall()*/
int LuaState::luaRedisGenericCommand(lua_State* lua, int raise_error) {
  LuaState* ls = getLuaStateFromLua(lua);
  int j, argc = lua_gettop(lua);

  ls->updateFakeClient();

  // TODO(takenliu): fix MULTI loggical.
  if (ls->_sess->getCtx()->isInMulti()) {
    ls->_fakeSess->getSession()->getCtx()->setMulti();
  } else {
    ls->_fakeSess->getSession()->getCtx()->resetMulti();
  }

  /* By using Lua debug hooks it is possible to trigger a recursive call
   * to luaRedisGenericCommand(), which normally should never happen.
   * To make this function reentrant is futile and makes it slower, but
   * we should at least detect such a misuse, and abort. */
  if (ls->inuse) {
    const char* recursion_warning =
      "luaRedisGenericCommand() recursive call detected. "
      "Are you doing funny stuff with Lua debug hooks?";
    LOG(WARNING) << recursion_warning;
    luaPushError(lua, recursion_warning);
    return 1;
  }
  ls->inuse++;

  /* Require at least one argument */
  if (argc == 0) {
    luaPushError(lua, "Please specify at least one argument for redis.call()");
    ls->inuse--;
    DLOG(INFO) << "Please specify at least one argument for redis.call()";
    return raise_error ? luaRaiseError(lua) : 1;
  }
  std::vector<std::string> args;

  for (j = 0; j < argc; j++) {
    char* obj_s;
    size_t obj_len;
    char dbuf[64];

    if (lua_type(lua, j + 1) == LUA_TNUMBER) {
      /* We can't use lua_tolstring() for number -> string conversion
       * since Lua uses a format specifier that loses precision. */
      lua_Number num = lua_tonumber(lua, j + 1);

      obj_len = snprintf(dbuf, sizeof(dbuf), "%.17g", static_cast<double>(num));
      obj_s = dbuf;
    } else {
      obj_s = const_cast<char*>(lua_tolstring(lua, j + 1, &obj_len));
      if (obj_s == nullptr)
        break; /* Not a string. */
    }

    args.emplace_back(obj_s, obj_len);
  }

  /* Check if one of the arguments passed by the Lua script