连接到R中的Redis集群

时间:2018-11-01 12:19:22

标签: r redis

假设redis服务器有多个主机和端口,例如

10.0.1.1:6381

10.0.1.1:6382

10.0.1.2:6381

10.0.1.2:6382

如何配置redux::hiredis()

我周围有Google,但找不到解决方案。而且我注意到db函数的redis_config参数上有一个注释,上面写着“不要在redis集群上下文中使用。”,所以我想知道这是连接集群的一种方法。此外,我还尝试将redis://10.0.1.1:6381,10.0.1.1:6382,10.0.1.2:6381,10.0.1.2:6382传递给url参数,但仍然失败。

有什么建议吗?还是有其他建议?

1 个答案:

答案 0 :(得分:0)

我最初的解决方案是根据错误消息编写指向正确节点的函数。

check_redis <- function(key = "P10000", host = "10.0.1.1", port = 6381) {
  r <- redux::hiredis(host = host, port = port)
  status <- tryCatch(
    {
      r$EXISTS(key = key)
    },
    error = function(e){
      address <- str_match(e$message, 
                           "[0-9]+.[0-9]+.[0-9]+.[0-9]+:[0-9]+")
      host <- str_split(address, ":", simplify = T)[1]
      port <- str_split(address, ":", simplify = T)[2]
      return(list(host = host, port = port))
    }
  )
  if (is.list(status)) {
    r <- redux::hiredis(host = status$host, port = status$port)
  } 
  return(r)
}

它可以帮助定向到正确的节点,但是这种解决方案既不优雅也不高效。所以请提出建议。