/**
 * Copyright (c) 2015-2022, Michael Yang 杨福海 (fuhai999@gmail.com).
 * <p>
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 * <p>
 * http://www.apache.org/licenses/LICENSE-2.0
 * <p>
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
package io.jboot.support.redis.jedis;

import com.jfinal.log.Log;
import io.jboot.exception.JbootException;
import io.jboot.support.redis.JbootRedisBase;
import io.jboot.support.redis.JbootRedisConfig;
import io.jboot.support.redis.RedisScanResult;
import io.jboot.utils.QuietlyUtil;
import io.jboot.utils.StrUtil;
import org.apache.commons.pool2.impl.GenericObjectPoolConfig;
import redis.clients.jedis.*;
import redis.clients.jedis.exceptions.JedisConnectionException;
import redis.clients.jedis.params.ScanParams;
import redis.clients.jedis.resps.ScanResult;

import java.util.*;
import java.util.Map.Entry;
import java.util.stream.Collectors;

/**
 * 参考： com.jfinal.plugin.redis
 * JbootRedis 命令文档: http://redisdoc.com/
 */
public class JbootJedisClusterImpl extends JbootRedisBase {

    protected JedisCluster jedisCluster;
    private int timeout = 2000;
    private int maxAttempts = 5;

    static final Log LOG = Log.getLog(JbootJedisClusterImpl.class);


    public JbootJedisClusterImpl(JbootRedisConfig config) {

        super(config);

        Integer timeout = config.getTimeout();
        String password = config.getPassword();
        Integer maxAttempts = config.getMaxAttempts();

        if (timeout != null) {
            this.timeout = timeout;
        }
        if (maxAttempts == null) {
            maxAttempts = this.maxAttempts;
        }

        GenericObjectPoolConfig poolConfig = new GenericObjectPoolConfig();

        if (StrUtil.isNotBlank(config.getTestWhileIdle())) {
            poolConfig.setTestWhileIdle(config.getTestWhileIdle());
        }

        if (StrUtil.isNotBlank(config.getTestOnBorrow())) {
            poolConfig.setTestOnBorrow(config.getTestOnBorrow());
        }

        if (StrUtil.isNotBlank(config.getTestOnCreate())) {
            poolConfig.setTestOnCreate(config.getTestOnCreate());
        }

        if (StrUtil.isNotBlank(config.getTestOnReturn())) {
            poolConfig.setTestOnReturn(config.getTestOnReturn());
        }

        if (StrUtil.isNotBlank(config.getMinEvictableIdleTimeMillis())) {
            poolConfig.setMinEvictableIdleTimeMillis(config.getMinEvictableIdleTimeMillis());
        }

        if (StrUtil.isNotBlank(config.getTimeBetweenEvictionRunsMillis())) {
            poolConfig.setTimeBetweenEvictionRunsMillis(config.getTimeBetweenEvictionRunsMillis());
        }

        if (StrUtil.isNotBlank(config.getNumTestsPerEvictionRun())) {
            poolConfig.setNumTestsPerEvictionRun(config.getNumTestsPerEvictionRun());
        }

        if (StrUtil.isNotBlank(config.getMaxTotal())) {
            poolConfig.setMaxTotal(config.getMaxTotal());
        }

        if (StrUtil.isNotBlank(config.getMaxIdle())) {
            poolConfig.setMaxIdle(config.getMaxIdle());
        }

        if (StrUtil.isNotBlank(config.getMinIdle())) {
            poolConfig.setMinIdle(config.getMinIdle());
        }

        if (StrUtil.isNotBlank(config.getMaxWaitMillis())) {
            poolConfig.setMaxWaitMillis(config.getMaxWaitMillis());
        }
        this.jedisCluster = newJedisCluster(config.getHostAndPorts(), timeout, maxAttempts, password, poolConfig);
    }

    public static JedisCluster newJedisCluster(Set<HostAndPort> haps, Integer timeout,
                                               Integer maxAttempts, String password, GenericObjectPoolConfig poolConfig) {
        JedisCluster jedisCluster;

        if (timeout != null && maxAttempts != null && password != null && poolConfig != null) {
            jedisCluster = new JedisCluster(haps, timeout, timeout, maxAttempts, password, poolConfig);
        } else if (timeout != null && maxAttempts != null && poolConfig != null) {
            jedisCluster = new JedisCluster(haps, timeout, maxAttempts, poolConfig);
        } else if (timeout != null && maxAttempts != null) {
            jedisCluster = new JedisCluster(haps, timeout, maxAttempts);
        } else if (timeout != null && poolConfig != null) {
            jedisCluster = new JedisCluster(haps, timeout, poolConfig);
        } else if (timeout != null) {
            jedisCluster = new JedisCluster(haps, timeout);
        } else {
            jedisCluster = new JedisCluster(haps);
        }
        return jedisCluster;
    }

    public JbootJedisClusterImpl(JedisCluster jedisCluster) {
        super(null);
        this.jedisCluster = jedisCluster;
    }

    /**
     * 存放 key value 对到 redis
     * 如果 key 已经持有其他值， SET 就覆写旧值，无视类型。
     * 对于某个原本带有生存时间（TTL）的键来说， 当 SET 命令成功在这个键上执行时， 这个键原有的 TTL 将被清除。
     */
    @Override
    public String set(Object key, Object value) {
        return jedisCluster.set(keyToBytes(key), valueToBytes(value));
    }

    @Override
    public Long setnx(Object key, Object value) {
        return jedisCluster.setnx(keyToBytes(key), valueToBytes(value));
    }

    /**
     * 存放 key value 对到 redis
     * 如果 key 已经持有其他值， SET 就覆写旧值，无视类型。
     * 此方法用了修改 incr 等的值
     */
    @Override
    public String setWithoutSerialize(Object key, Object value) {
        return jedisCluster.set(keyToBytes(key), value.toString().getBytes());
    }


    /**
     * 存放 key value 对到 redis，并将 key 的生存时间设为 seconds (以秒为单位)。
     * 如果 key 已经存在， SETEX 命令将覆写旧值。
     */
    @Override
    public String setex(Object key, int seconds, Object value) {

        return jedisCluster.setex(keyToBytes(key), seconds, valueToBytes(value));

    }

    /**
     * 返回 key 所关联的 value 值
     * 如果 key 不存在那么返回特殊值 nil 。
     */
    @Override
    @SuppressWarnings("unchecked")
    public <T> T get(Object key) {

        return (T) valueFromBytes(jedisCluster.get(keyToBytes(key)));

    }

    @Override
    public String getWithoutSerialize(Object key) {
        byte[] bytes = jedisCluster.get(keyToBytes(key));
        if (bytes == null || bytes.length == 0) {
            return null;
        }
        return new String(jedisCluster.get(keyToBytes(key)));
    }

    /**
     * 删除给定的一个 key
     * 不存在的 key 会被忽略。
     */
    @Override
    public Long del(Object key) {
        return jedisCluster.del(keyToBytes(key));
    }

    /**
     * 删除给定的多个 key
     * 不存在的 key 会被忽略。
     */
    @Override
    public Long del(Object... keys) {

        return jedisCluster.del(keysToBytesArray(keys));

    }

    /**
     * 查找所有符合给定模式 pattern 的 key 。
     * KEYS * 匹配数据库中所有 key 。
     * KEYS h?llo 匹配 hello ， hallo 和 hxllo 等。
     * KEYS h*llo 匹配 hllo 和 heeeeello 等。
     * KEYS h[ae]llo 匹配 hello 和 hallo ，但不匹配 hillo 。
     * 特殊符号用 \ 隔开
     */
    @Override
    public Set<String> keys(String pattern) {
        HashSet<String> keys = new HashSet<>();
        Map<String, ConnectionPool> clusterNodes = jedisCluster.getClusterNodes();
        for (String k : clusterNodes.keySet()) {
            ConnectionPool cp = clusterNodes.get(k);
            Connection conn = cp.getResource();
            try {
                keys.addAll(conn.executeCommand(new ClusterCommandObjects().keys(pattern)));
            } catch (Exception e) {
                LOG.error(e.toString(), e);
            } finally {
                conn.close();
                cp.close(); //用完一定要close这个链接！！！
            }
        }
        return keys;
    }


    /**
     * 同时设置一个或多个 key-value 对。
     * 如果某个给定 key 已经存在，那么 MSET 会用新值覆盖原来的旧值，如果这不是你所希望的效果，请考虑使用 MSETNX 命令：它只会在所有给定 key 都不存在的情况下进行设置操作。
     * MSET 是一个原子性(atomic)操作，所有给定 key 都会在同一时间内被设置，某些给定 key 被更新而另一些给定 key 没有改变的情况，不可能发生。
     * <pre>
     * 例子：
     * Cache cache = RedisKit.use();                    // 使用 JbootRedis 的 cache
     * cache.mset("k1", "v1", "k2", "v2");              // 放入多个 key value 键值对
     * List list = cache.mget("k1", "k2");              // 利用多个键值得到上面代码放入的值
     * </pre>
     */
    @Override
    public String mset(Object... keysValues) {
        if (keysValues.length % 2 != 0)
            throw new IllegalArgumentException("wrong number of arguments for met, keysValues length can not be odd");

        byte[][] kv = new byte[keysValues.length][];
        for (int i = 0; i < keysValues.length; i++) {
            if (i % 2 == 0)
                kv[i] = keyToBytes(keysValues[i]);
            else
                kv[i] = valueToBytes(keysValues[i]);
        }
        return jedisCluster.mset(kv);

    }

    /**
     * 返回所有(一个或多个)给定 key 的值。
     * 如果给定的 key 里面，有某个 key 不存在，那么这个 key 返回特殊值 nil 。因此，该命令永不失败。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List mget(Object... keys) {

        byte[][] keysBytesArray = keysToBytesArray(keys);
        List<byte[]> data = jedisCluster.mget(keysBytesArray);
        return valueListFromBytesList(data);

    }

    /**
     * 将 key 中储存的数字值减一。
     * 如果 key 不存在，那么 key 的值会先被初始化为 0 ，然后再执行 DECR 操作。
     * 如果值包含错误的类型，或字符串类型的值不能表示为数字，那么返回一个错误。
     * 本操作的值限制在 64 位(bit)有符号数字表示之内。
     * 关于递增(increment) / 递减(decrement)操作的更多信息，请参见 INCR 命令。
     */
    @Override
    public Long decr(Object key) {

        return jedisCluster.decr(keyToBytes(key));

    }

    /**
     * 将 key 所储存的值减去减量 decrement 。
     * 如果 key 不存在，那么 key 的值会先被初始化为 0 ，然后再执行 DECRBY 操作。
     * 如果值包含错误的类型，或字符串类型的值不能表示为数字，那么返回一个错误。
     * 本操作的值限制在 64 位(bit)有符号数字表示之内。
     * 关于更多递增(increment) / 递减(decrement)操作的更多信息，请参见 INCR 命令。
     */
    @Override
    public Long decrBy(Object key, long longValue) {

        return jedisCluster.decrBy(keyToBytes(key), longValue);

    }

    /**
     * 将 key 中储存的数字值增一。
     * 如果 key 不存在，那么 key 的值会先被初始化为 0 ，然后再执行 INCR 操作。
     * 如果值包含错误的类型，或字符串类型的值不能表示为数字，那么返回一个错误。
     * 本操作的值限制在 64 位(bit)有符号数字表示之内。
     */
    @Override
    public Long incr(Object key) {

        return jedisCluster.incr(keyToBytes(key));

    }

    /**
     * 将 key 所储存的值加上增量 increment 。
     * 如果 key 不存在，那么 key 的值会先被初始化为 0 ，然后再执行 INCRBY 命令。
     * 如果值包含错误的类型，或字符串类型的值不能表示为数字，那么返回一个错误。
     * 本操作的值限制在 64 位(bit)有符号数字表示之内。
     * 关于递增(increment) / 递减(decrement)操作的更多信息，参见 INCR 命令。
     */
    @Override
    public Long incrBy(Object key, long longValue) {
        return jedisCluster.incrBy(keyToBytes(key), longValue);

    }

    /**
     * 检查给定 key 是否存在。
     */
    @Override
    public boolean exists(Object key) {

        return jedisCluster.exists(keyToBytes(key));

    }

    /**
     * 从当前数据库中随机返回(不删除)一个 key 。
     */
    @Override
    public String randomKey() {

        throw new JbootException("not support randomKey commmand in redis cluster.");

    }

    /**
     * 将 key 改名为 newkey 。
     * 当 key 和 newkey 相同，或者 key 不存在时，返回一个错误。
     * 当 newkey 已经存在时， RENAME 命令将覆盖旧值。
     */
    @Override
    public String rename(Object oldkey, Object newkey) {

        return jedisCluster.rename(keyToBytes(oldkey), keyToBytes(newkey));

    }

    /**
     * 将当前数据库的 key 移动到给定的数据库 db 当中。
     * 如果当前数据库(源数据库)和给定数据库(目标数据库)有相同名字的给定 key ，或者 key 不存在于当前数据库，那么 MOVE 没有任何效果。
     * 因此，也可以利用这一特性，将 MOVE 当作锁(locking)原语(primitive)。
     */
    @Override
    public Long move(Object key, int dbIndex) {

//        return jedisCluster.move(keyToBytes(key), dbIndex);
        throw new JbootException("not support move commmand in redis cluster.");

    }

    /**
     * 将 key 原子性地从当前实例传送到目标实例的指定数据库上，一旦传送成功， key 保证会出现在目标实例上，而当前实例上的 key 会被删除。
     */
    @Override
    public String migrate(String host, int port, Object key, int destinationDb, int timeout) {

        throw new JbootException("not support migrate commmand in redis cluster.");

    }

    /**
     * 切换到指定的数据库，数据库索引号 index 用数字值指定，以 0 作为起始索引值。
     * 默认使用 0 号数据库。
     * 注意：在 Jedis 对象被关闭时，数据库又会重新被设置为初始值，所以本方法 select(...)
     * 正常工作需要使用如下方式之一：
     * 1：使用 RedisInterceptor，在本线程内共享同一个 Jedis 对象
     * 2：使用 JbootRedis.call(ICallback) 进行操作
     * 3：自行获取 Jedis 对象进行操作
     */
    @Override
    public String select(int databaseIndex) {

//        return jedisCluster.select(databaseIndex);
        throw new IllegalStateException("Redis Cluster does not support multiple databases like the stand alone version of Redis, " +
                "there is just database 0, and SELECT is not allowed.");
    }

    /**
     * 为给定 key 设置生存时间，当 key 过期时(生存时间为 0 )，它会被自动删除。
     * 在 JbootRedis 中，带有生存时间的 key 被称为『易失的』(volatile)。
     */
    @Override
    public Long expire(Object key, int seconds) {

        return jedisCluster.expire(keyToBytes(key), seconds);

    }

    /**
     * EXPIREAT 的作用和 EXPIRE 类似，都用于为 key 设置生存时间。不同在于 EXPIREAT 命令接受的时间参数是 UNIX 时间戳(unix timestamp)。
     */
    @Override
    public Long expireAt(Object key, long unixTime) {

        return jedisCluster.expireAt(keyToBytes(key), unixTime);

    }

    /**
     * 这个命令和 EXPIRE 命令的作用类似，但是它以毫秒为单位设置 key 的生存时间，而不像 EXPIRE 命令那样，以秒为单位。
     */
    @Override
    public Long pexpire(Object key, long milliseconds) {

        return jedisCluster.pexpire(keyToBytes(key), milliseconds);

    }

    /**
     * 这个命令和 EXPIREAT 命令类似，但它以毫秒为单位设置 key 的过期 unix 时间戳，而不是像 EXPIREAT 那样，以秒为单位。
     */
    @Override
    public Long pexpireAt(Object key, long millisecondsTimestamp) {

        return jedisCluster.pexpireAt(keyToBytes(key), millisecondsTimestamp);

    }

    /**
     * 将给定 key 的值设为 value ，并返回 key 的旧值(old value)。
     * 当 key 存在但不是字符串类型时，返回一个错误。
     */
    @Override
    @SuppressWarnings("unchecked")
    public <T> T getSet(Object key, Object value) {

        return (T) valueFromBytes(jedisCluster.getSet(keyToBytes(key), valueToBytes(value)));

    }

    /**
     * 移除给定 key 的生存时间，将这个 key 从『易失的』(带生存时间 key )转换成『持久的』(一个不带生存时间、永不过期的 key )。
     */
    @Override
    public Long persist(Object key) {

        return jedisCluster.persist(keyToBytes(key));

    }

    /**
     * 返回 key 所储存的值的类型。
     */
    @Override
    public String type(Object key) {

        return jedisCluster.type(keyToBytes(key));

    }

    /**
     * 以秒为单位，返回给定 key 的剩余生存时间(TTL, time to live)。
     */
    @Override
    public Long ttl(Object key) {

        return jedisCluster.ttl(keyToBytes(key));

    }

    /**
     * 这个命令类似于 TTL 命令，但它以毫秒为单位返回 key 的剩余生存时间，而不是像 TTL 命令那样，以秒为单位。
     */
    @Override
    public Long pttl(Object key) {

        return jedisCluster.pttl(key.toString());

    }

    /**
     * 对象被引用的数量
     */
    @Override
    public Long objectRefcount(Object key) {

//        return jedisCluster.objectRefcount(keyToBytes(key));
        throw new JbootException("not support move objectRefcount in redis cluster.");
    }

    /**
     * 对象没有被访问的空闲时间
     */
    @Override
    public Long objectIdletime(Object key) {

//        return jedisCluster.objectIdletime(keyToBytes(key));
        throw new JbootException("not support move objectIdletime in redis cluster.");

    }

    /**
     * 将哈希表 key 中的域 field 的值设为 value 。
     * 如果 key 不存在，一个新的哈希表被创建并进行 HSET 操作。
     * 如果域 field 已经存在于哈希表中，旧值将被覆盖。
     */
    @Override
    public Long hset(Object key, Object field, Object value) {

        return jedisCluster.hset(keyToBytes(key), valueToBytes(field), valueToBytes(value));

    }

    /**
     * 同时将多个 field-value (域-值)对设置到哈希表 key 中。
     * 此命令会覆盖哈希表中已存在的域。
     * 如果 key 不存在，一个空哈希表被创建并执行 HMSET 操作。
     */
    @Override
    public String hmset(Object key, Map<Object, Object> hash) {

        Map<byte[], byte[]> para = new HashMap<byte[], byte[]>();
        for (Entry<Object, Object> e : hash.entrySet())
            para.put(valueToBytes(e.getKey()), valueToBytes(e.getValue()));
        return jedisCluster.hmset(keyToBytes(key), para);

    }

    /**
     * 返回哈希表 key 中给定域 field 的值。
     */
    @Override
    @SuppressWarnings("unchecked")
    public <T> T hget(Object key, Object field) {

        return (T) valueFromBytes(jedisCluster.hget(keyToBytes(key), valueToBytes(field)));

    }

    /**
     * 返回哈希表 key 中，一个或多个给定域的值。
     * 如果给定的域不存在于哈希表，那么返回一个 nil 值。
     * 因为不存在的 key 被当作一个空哈希表来处理，所以对一个不存在的 key 进行 HMGET 操作将返回一个只带有 nil 值的表。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List hmget(Object key, Object... fields) {

        List<byte[]> data = jedisCluster.hmget(keyToBytes(key), valuesToBytesArray(fields));
        return valueListFromBytesList(data);

    }

    /**
     * 删除哈希表 key 中的一个或多个指定域，不存在的域将被忽略。
     */
    @Override
    public Long hdel(Object key, Object... fields) {

        return jedisCluster.hdel(keyToBytes(key), valuesToBytesArray(fields));

    }

    /**
     * 查看哈希表 key 中，给定域 field 是否存在。
     */
    @Override
    public boolean hexists(Object key, Object field) {

        return jedisCluster.hexists(keyToBytes(key), valueToBytes(field));

    }

    /**
     * 返回哈希表 key 中，所有的域和值。
     * 在返回值里，紧跟每个域名(field name)之后是域的值(value)，所以返回值的长度是哈希表大小的两倍。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public Map hgetAll(Object key) {

        Map<byte[], byte[]> data = jedisCluster.hgetAll(keyToBytes(key));
        Map<Object, Object> result = new HashMap<Object, Object>();
        for (Entry<byte[], byte[]> e : data.entrySet())
            result.put(valueFromBytes(e.getKey()), valueFromBytes(e.getValue()));
        return result;

    }

    /**
     * 返回哈希表 key 中所有域的值。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List hvals(Object key) {

        Collection<byte[]> data = jedisCluster.hvals(keyToBytes(key));
        return valueListFromBytesList(data);

    }

    /**
     * 返回哈希表 key 中的所有域。
     * 底层实现此方法取名为 hfields 更为合适，在此仅为与底层保持一致
     */
    @Override
    public Set<Object> hkeys(Object key) {

        Set<byte[]> fieldSet = jedisCluster.hkeys(keyToBytes(key));
        Set<Object> result = new HashSet<Object>();
        fieldSetFromBytesSet(fieldSet, result);
        return result;

    }

    /**
     * 返回哈希表 key 中域的数量。
     */
    @Override
    public Long hlen(Object key) {

        return jedisCluster.hlen(keyToBytes(key));

    }

    /**
     * 为哈希表 key 中的域 field 的值加上增量 increment 。
     * 增量也可以为负数，相当于对给定域进行减法操作。
     * 如果 key 不存在，一个新的哈希表被创建并执行 HINCRBY 命令。
     * 如果域 field 不存在，那么在执行命令前，域的值被初始化为 0 。
     * 对一个储存字符串值的域 field 执行 HINCRBY 命令将造成一个错误。
     * 本操作的值被限制在 64 位(bit)有符号数字表示之内。
     */
    @Override
    public Long hincrBy(Object key, Object field, long value) {

        return jedisCluster.hincrBy(keyToBytes(key), valueToBytes(field), value);

    }

    /**
     * 为哈希表 key 中的域 field 加上浮点数增量 increment 。
     * 如果哈希表中没有域 field ，那么 HINCRBYFLOAT 会先将域 field 的值设为 0 ，然后再执行加法操作。
     * 如果键 key 不存在，那么 HINCRBYFLOAT 会先创建一个哈希表，再创建域 field ，最后再执行加法操作。
     * 当以下任意一个条件发生时，返回一个错误：
     * 1:域 field 的值不是字符串类型(因为 redis 中的数字和浮点数都以字符串的形式保存，所以它们都属于字符串类型）
     * 2:域 field 当前的值或给定的增量 increment 不能解释(parse)为双精度浮点数(double precision floating point number)
     * HINCRBYFLOAT 命令的详细功能和 INCRBYFLOAT 命令类似，请查看 INCRBYFLOAT 命令获取更多相关信息。
     */
    @Override
    public Double hincrByFloat(Object key, Object field, double value) {

        return jedisCluster.hincrByFloat(keyToBytes(key), valueToBytes(field), value);

    }

    /**
     * 返回列表 key 中，下标为 index 的元素。
     * 下标(index)参数 start 和 stop 都以 0 为底，也就是说，以 0 表示列表的第一个元素，以 1 表示列表的第二个元素，以此类推。
     * 你也可以使用负数下标，以 -1 表示列表的最后一个元素， -2 表示列表的倒数第二个元素，以此类推。
     * 如果 key 不是列表类型，返回一个错误。
     */
    @Override
    @SuppressWarnings("unchecked")

    /**
     * 返回列表 key 中，下标为 index 的元素。
     * 下标(index)参数 start 和 stop 都以 0 为底，也就是说，以 0 表示列表的第一个元素，
     * 以 1 表示列表的第二个元素，以此类推。
     * 你也可以使用负数下标，以 -1 表示列表的最后一个元素， -2 表示列表的倒数第二个元素，以此类推。
     * 如果 key 不是列表类型，返回一个错误。
     */
    public <T> T lindex(Object key, long index) {

        return (T) valueFromBytes(jedisCluster.lindex(keyToBytes(key), index));

    }


    /**
     * 返回列表 key 的长度。
     * 如果 key 不存在，则 key 被解释为一个空列表，返回 0 .
     * 如果 key 不是列表类型，返回一个错误。
     */
    @Override
    public Long llen(Object key) {

        return jedisCluster.llen(keyToBytes(key));

    }

    /**
     * 移除并返回列表 key 的头元素。
     */
    @Override
    @SuppressWarnings("unchecked")
    public <T> T lpop(Object key) {

        return (T) valueFromBytes(jedisCluster.lpop(keyToBytes(key)));

    }

    /**
     * 将一个或多个值 value 插入到列表 key 的表头
     * 如果有多个 value 值，那么各个 value 值按从左到右的顺序依次插入到表头： 比如说，
     * 对空列表 mylist 执行命令 LPUSH mylist a b c ，列表的值将是 c b a ，
     * 这等同于原子性地执行 LPUSH mylist a 、 LPUSH mylist b 和 LPUSH mylist c 三个命令。
     * 如果 key 不存在，一个空列表会被创建并执行 LPUSH 操作。
     * 当 key 存在但不是列表类型时，返回一个错误。
     */
    @Override
    public Long lpush(Object key, Object... values) {

        return jedisCluster.lpush(keyToBytes(key), valuesToBytesArray(values));

    }

    /**
     * 将列表 key 下标为 index 的元素的值设置为 value 。
     * 当 index 参数超出范围，或对一个空列表( key 不存在)进行 LSET 时，返回一个错误。
     * 关于列表下标的更多信息，请参考 LINDEX 命令。
     */
    @Override
    public String lset(Object key, long index, Object value) {

        return jedisCluster.lset(keyToBytes(key), index, valueToBytes(value));

    }

    /**
     * 根据参数 count 的值，移除列表中与参数 value 相等的元素。
     * count 的值可以是以下几种：
     * count 大于 0 : 从表头开始向表尾搜索，移除与 value 相等的元素，数量为 count 。
     * count 小于 0 : 从表尾开始向表头搜索，移除与 value 相等的元素，数量为 count 的绝对值。
     * count 等于 0 : 移除表中所有与 value 相等的值。
     */
    @Override
    public Long lrem(Object key, long count, Object value) {

        return jedisCluster.lrem(keyToBytes(key), count, valueToBytes(value));

    }

    /**
     * 返回列表 key 中指定区间内的元素，区间以偏移量 start 和 stop 指定。
     * 下标(index)参数 start 和 stop 都以 0 为底，也就是说，以 0 表示列表的第一个元素，以 1 表示列表的第二个元素，以此类推。
     * 你也可以使用负数下标，以 -1 表示列表的最后一个元素， -2 表示列表的倒数第二个元素，以此类推。
     * <pre>
     * 例子：
     * 获取 list 中所有数据：cache.lrange(listKey, 0, -1);
     * 获取 list 中下标 1 到 3 的数据： cache.lrange(listKey, 1, 3);
     * </pre>
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List lrange(Object key, long start, long end) {

        List<byte[]> data = jedisCluster.lrange(keyToBytes(key), start, end);
        if (data != null) {
            return valueListFromBytesList(data);
        } else {
            return new ArrayList<byte[]>(0);
        }

    }

    /**
     * 对一个列表进行修剪(trim)，就是说，让列表只保留指定区间内的元素，不在指定区间之内的元素都将被删除。
     * 举个例子，执行命令 LTRIM list 0 2 ，表示只保留列表 list 的前三个元素，其余元素全部删除。
     * 下标(index)参数 start 和 stop 都以 0 为底，也就是说，以 0 表示列表的第一个元素，以 1 表示列表的第二个元素，以此类推。
     * 你也可以使用负数下标，以 -1 表示列表的最后一个元素， -2 表示列表的倒数第二个元素，以此类推。
     * 当 key 不是列表类型时，返回一个错误。
     */
    @Override
    public String ltrim(Object key, long start, long end) {

        return jedisCluster.ltrim(keyToBytes(key), start, end);

    }

    /**
     * 移除并返回列表 key 的尾元素。
     */
    @Override
    @SuppressWarnings("unchecked")
    public <T> T rpop(Object key) {

        return (T) valueFromBytes(jedisCluster.rpop(keyToBytes(key)));

    }

    /**
     * 命令 RPOPLPUSH 在一个原子时间内，执行以下两个动作：
     * 将列表 source 中的最后一个元素(尾元素)弹出，并返回给客户端。
     * 将 source 弹出的元素插入到列表 destination ，作为 destination 列表的的头元素。
     */
    @Override
    @SuppressWarnings("unchecked")
    public <T> T rpoplpush(Object srcKey, Object dstKey) {

        return (T) valueFromBytes(jedisCluster.rpoplpush(keyToBytes(srcKey), keyToBytes(dstKey)));

    }

    /**
     * 将一个或多个值 value 插入到列表 key 的表尾(最右边)。
     * 如果有多个 value 值，那么各个 value 值按从左到右的顺序依次插入到表尾：比如
     * 对一个空列表 mylist 执行 RPUSH mylist a b c ，得出的结果列表为 a b c ，
     * 等同于执行命令 RPUSH mylist a 、 RPUSH mylist b 、 RPUSH mylist c 。
     * 如果 key 不存在，一个空列表会被创建并执行 RPUSH 操作。
     * 当 key 存在但不是列表类型时，返回一个错误。
     */
    @Override
    public Long rpush(Object key, Object... values) {

        return jedisCluster.rpush(keyToBytes(key), valuesToBytesArray(values));

    }

    /**
     * BLPOP 是列表的阻塞式(blocking)弹出原语。
     * 它是 LPOP 命令的阻塞版本，当给定列表内没有任何元素可供弹出的时候，连接将被 BLPOP 命令阻塞，直到等待超时或发现可弹出元素为止。
     * 当给定多个 key 参数时，按参数 key 的先后顺序依次检查各个列表，弹出第一个非空列表的头元素。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List blpop(Object... keys) {
//        String[] keysStrings = new String[keys.length];
//        for (int i = 0; i < keys.length; i++) {
//            keysStrings[i] = keys[i].toString();
//        }

        List<byte[]> data = jedisCluster.blpop(timeout, keysToBytesArray(keys));
        return keyValueListFromBytesList(data);

    }

    /**
     * BLPOP 是列表的阻塞式(blocking)弹出原语。
     * 它是 LPOP 命令的阻塞版本，当给定列表内没有任何元素可供弹出的时候，连接将被 BLPOP 命令阻塞，直到等待超时或发现可弹出元素为止。
     * 当给定多个 key 参数时，按参数 key 的先后顺序依次检查各个列表，弹出第一个非空列表的头元素。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List blpop(Integer timeout, Object... keys) {

        List<byte[]> data = jedisCluster.blpop(timeout, keysToBytesArray(keys));
        return keyValueListFromBytesList(data);

    }

    /**
     * BRPOP 是列表的阻塞式(blocking)弹出原语。
     * 它是 RPOP 命令的阻塞版本，当给定列表内没有任何元素可供弹出的时候，连接将被 BRPOP 命令阻塞，直到等待超时或发现可弹出元素为止。
     * 当给定多个 key 参数时，按参数 key 的先后顺序依次检查各个列表，弹出第一个非空列表的尾部元素。
     * 关于阻塞操作的更多信息，请查看 BLPOP 命令， BRPOP 除了弹出元素的位置和 BLPOP 不同之外，其他表现一致。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List brpop(Object... keys) {

        List<byte[]> data = jedisCluster.brpop(timeout, keysToBytesArray(keys));
        return keyValueListFromBytesList(data);

    }

    /**
     * BRPOP 是列表的阻塞式(blocking)弹出原语。
     * 它是 RPOP 命令的阻塞版本，当给定列表内没有任何元素可供弹出的时候，连接将被 BRPOP 命令阻塞，直到等待超时或发现可弹出元素为止。
     * 当给定多个 key 参数时，按参数 key 的先后顺序依次检查各个列表，弹出第一个非空列表的尾部元素。
     * 关于阻塞操作的更多信息，请查看 BLPOP 命令， BRPOP 除了弹出元素的位置和 BLPOP 不同之外，其他表现一致。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List brpop(Integer timeout, Object... keys) {

        List<byte[]> data = jedisCluster.brpop(timeout, keysToBytesArray(keys));
        return keyValueListFromBytesList(data);

    }

    /**
     * 使用客户端向 JbootRedis 服务器发送一个 PING ，如果服务器运作正常的话，会返回一个 PONG 。
     * 通常用于测试与服务器的连接是否仍然生效，或者用于测量延迟值。
     */
    @Override
    public String ping() {
//        jedisCluster.getClusterNodes().get("aa").getResource().ping
//        return jedisCluster..ping();

        Map<String, ConnectionPool> nodes = jedisCluster.getClusterNodes();
        if (nodes != null) {
            for (ConnectionPool pool : nodes.values()) {
                try (Connection node = pool.getResource()) {
                    if (node.ping()) {
                        return "PONG";
                    }
                }
            }
        }
        return null;
    }

    /**
     * 将一个或多个 member 元素加入到集合 key 当中，已经存在于集合的 member 元素将被忽略。
     * 假如 key 不存在，则创建一个只包含 member 元素作成员的集合。
     * 当 key 不是集合类型时，返回一个错误。
     */
    @Override
    public Long sadd(Object key, Object... members) {

        return jedisCluster.sadd(keyToBytes(key), valuesToBytesArray(members));

    }

    /**
     * 返回集合 key 的基数(集合中元素的数量)。
     */
    @Override
    public Long scard(Object key) {

        return jedisCluster.scard(keyToBytes(key));

    }

    /**
     * 移除并返回集合中的一个随机元素。
     * 如果只想获取一个随机元素，但不想该元素从集合中被移除的话，可以使用 SRANDMEMBER 命令。
     */
    @Override
    @SuppressWarnings("unchecked")
    public <T> T spop(Object key) {

        return (T) valueFromBytes(jedisCluster.spop(keyToBytes(key)));

    }

    /**
     * 返回集合 key 中的所有成员。
     * 不存在的 key 被视为空集合。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public Set smembers(Object key) {

        Set<byte[]> data = jedisCluster.smembers(keyToBytes(key));
        Set<Object> result = new HashSet<Object>();
        valueSetFromBytesSet(data, result);
        return result;

    }

    /**
     * 判断 member 元素是否集合 key 的成员。
     */
    @Override
    public boolean sismember(Object key, Object member) {

        return jedisCluster.sismember(keyToBytes(key), valueToBytes(member));

    }

    /**
     * 返回多个集合的交集，多个集合由 keys 指定
     */
    @Override
    @SuppressWarnings("rawtypes")
    public Set sinter(Object... keys) {

        Set<byte[]> data = jedisCluster.sinter(keysToBytesArray(keys));
        Set<Object> result = new HashSet<Object>();
        valueSetFromBytesSet(data, result);
        return result;

    }

    /**
     * 返回集合中的一个随机元素。
     */
    @Override
    @SuppressWarnings("unchecked")
    public <T> T srandmember(Object key) {

        return (T) valueFromBytes(jedisCluster.srandmember(keyToBytes(key)));

    }

    /**
     * 返回集合中的 count 个随机元素。
     * 从 JbootRedis 2.6 版本开始， SRANDMEMBER 命令接受可选的 count 参数：
     * 如果 count 为正数，且小于集合基数，那么命令返回一个包含 count 个元素的数组，数组中的元素各不相同。
     * 如果 count 大于等于集合基数，那么返回整个集合。
     * 如果 count 为负数，那么命令返回一个数组，数组中的元素可能会重复出现多次，而数组的长度为 count 的绝对值。
     * 该操作和 SPOP 相似，但 SPOP 将随机元素从集合中移除并返回，而 SRANDMEMBER 则仅仅返回随机元素，而不对集合进行任何改动。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List srandmember(Object key, int count) {

        List<byte[]> data = jedisCluster.srandmember(keyToBytes(key), count);
        return valueListFromBytesList(data);

    }

    /**
     * 移除集合 key 中的一个或多个 member 元素，不存在的 member 元素会被忽略。
     */
    @Override
    public Long srem(Object key, Object... members) {

        return jedisCluster.srem(keyToBytes(key), valuesToBytesArray(members));

    }

    /**
     * 返回多个集合的并集，多个集合由 keys 指定
     * 不存在的 key 被视为空集。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public Set sunion(Object... keys) {

        Set<byte[]> data = jedisCluster.sunion(keysToBytesArray(keys));
        Set<Object> result = new HashSet<Object>();
        valueSetFromBytesSet(data, result);
        return result;

    }

    /**
     * 返回一个集合的全部成员，该集合是所有给定集合之间的差集。
     * 不存在的 key 被视为空集。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public Set sdiff(Object... keys) {

        Set<byte[]> data = jedisCluster.sdiff(keysToBytesArray(keys));
        Set<Object> result = new HashSet<Object>();
        valueSetFromBytesSet(data, result);
        return result;

    }

    /**
     * 将一个或多个 member 元素及其 score 值加入到有序集 key 当中。
     * 如果某个 member 已经是有序集的成员，那么更新这个 member 的 score 值，
     * 并通过重新插入这个 member 元素，来保证该 member 在正确的位置上。
     */
    @Override
    public Long zadd(Object key, double score, Object member) {

        return jedisCluster.zadd(keyToBytes(key), score, valueToBytes(member));

    }

    @Override
    public Long zadd(Object key, Map<Object, Double> scoreMembers) {

        Map<byte[], Double> para = new HashMap<byte[], Double>();
        for (Entry<Object, Double> e : scoreMembers.entrySet())
            para.put(valueToBytes(e.getKey()), e.getValue());    // valueToBytes is important
        return jedisCluster.zadd(keyToBytes(key), para);

    }

    /**
     * 返回有序集 key 的基数。
     */
    @Override
    public Long zcard(Object key) {

        return jedisCluster.zcard(keyToBytes(key));

    }

    /**
     * 返回有序集 key 中， score 值在 min 和 max 之间(默认包括 score 值等于 min 或 max )的成员的数量。
     * 关于参数 min 和 max 的详细使用方法，请参考 ZRANGEBYSCORE 命令。
     */
    @Override
    public Long zcount(Object key, double min, double max) {

        return jedisCluster.zcount(keyToBytes(key), min, max);

    }

    /**
     * 为有序集 key 的成员 member 的 score 值加上增量 increment 。
     */
    @Override
    public Double zincrby(Object key, double score, Object member) {

        return jedisCluster.zincrby(keyToBytes(key), score, valueToBytes(member));

    }

    /**
     * 返回有序集 key 中，指定区间内的成员。
     * 其中成员的位置按 score 值递增(从小到大)来排序。
     * 具有相同 score 值的成员按字典序(lexicographical order )来排列。
     * 如果你需要成员按 score 值递减(从大到小)来排列，请使用 ZREVRANGE 命令。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List zrange(Object key, long start, long end) {

        List<byte[]> data = jedisCluster.zrange(keyToBytes(key), start, end);
        List<Object> result = data.stream().map(d->valueFromBytes(d)).collect(Collectors.toList());    // 有序集合必须 LinkedHashSet
        return result;

    }

    /**
     * 返回有序集 key 中，指定区间内的成员。
     * 其中成员的位置按 score 值递减(从大到小)来排列。
     * 具有相同 score 值的成员按字典序的逆序(reverse lexicographical order)排列。
     * 除了成员按 score 值递减的次序排列这一点外， ZREVRANGE 命令的其他方面和 ZRANGE 命令一样。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List zrevrange(Object key, long start, long end) {

        List<byte[]> data = jedisCluster.zrevrange(keyToBytes(key), start, end);
        List<Object> result = data.stream().map(d->valueFromBytes(d)).collect(Collectors.toList());    // 有序集合必须 LinkedHashSet
        return result;

    }

    /**
     * 返回有序集 key 中，所有 score 值介于 min 和 max 之间(包括等于 min 或 max )的成员。
     * 有序集成员按 score 值递增(从小到大)次序排列。
     */
    @Override
    @SuppressWarnings("rawtypes")
    public List zrangeByScore(Object key, double min, double max) {

        List<byte[]> data = jedisCluster.zrangeByScore(keyToBytes(key), min, max);
        List<Object> result = data.stream().map(d->valueFromBytes(d)).collect(Collectors.toList());    // 有序集合必须 LinkedHashSet
        return result;

    }

    /**
     * 返回有序集 key 中成员 member 的排名。其中有序集成员按 score 值递增(从小到大)顺序排列。
     * 排名以 0 为底，也就是说， score 值最小的成员排名为 0 。
     * 使用 ZREVRANK 命令可以获得成员按 score 值递减(从大到小)排列的排名。
     */
    @Override
    public Long zrank(Object key, Object member) {

        return jedisCluster.zrank(keyToBytes(key), valueToBytes(member));

    }

    /**
     * 返回有序集 key 中成员 member 的排名。其中有序集成员按 score 值递减(从大到小)排序。
     * 排名以 0 为底，也就是说， score 值最大的成员排名为 0 。
     * 使用 ZRANK 命令可以获得成员按 score 值递增(从小到大)排列的排名。
     */
    @Override
    public Long zrevrank(Object key, Object member) {

        return jedisCluster.zrevrank(keyToBytes(key), valueToBytes(member));

    }

    /**
     * 移除有序集 key 中的一个或多个成员，不存在的成员将被忽略。
     * 当 key 存在但不是有序集类型时，返回一个错误。
     */
    @Override
    public Long zrem(Object key, Object... members) {

        return jedisCluster.zrem(keyToBytes(key), valuesToBytesArray(members));

    }

    /**
     * 返回有序集 key 中，成员 member 的 score 值。
     * 如果 member 元素不是有序集 key 的成员，或 key 不存在，返回 nil 。
     */
    @Override
    public Double zscore(Object key, Object member) {

        return jedisCluster.zscore(keyToBytes(key), valueToBytes(member));

    }

    /**
     * 发布
     *
     * @param channel
     * @param message
     */
    @Override
    public void publish(String channel, String message) {

        jedisCluster.publish(channel, message);

    }

    /**
     * 发布
     *
     * @param channel
     * @param message
     */
    @Override
    public void publish(byte[] channel, byte[] message) {
        jedisCluster.publish(channel, message);
    }


    /**
     * 订阅
     *
     * @param listener
     * @param channels
     */
    @Override
    public void subscribe(JedisPubSub listener, final String... channels) {
        /**
         * https://github.com/xetorthio/jedis/wiki/AdvancedUsage
         * Note that subscribe is a blocking operation because it will poll JbootRedis for responses on the thread that calls subscribe.
         * A single JedisPubSub instance can be used to subscribe to multiple channels.
         * You can call subscribe or psubscribe on an existing JedisPubSub instance to change your subscriptions.
         */
        new Thread("jboot-redisCluster-subscribe-JedisPubSub") {
            @Override
            public void run() {
                while (true) {
                    //订阅线程断开连接，需要进行重连
                    try {
                        jedisCluster.subscribe(listener, channels);
                        LOG.warn("Disconnect to redis channel in subscribe JedisPubSub!");
                        break;
                    } catch (JedisConnectionException e) {
                        LOG.error("failed connect to redis, reconnect it.", e);
                        QuietlyUtil.sleepQuietly(1000);
                    }
                }
            }
        }.start();
    }

    /**
     * 订阅
     *
     * @param binaryListener
     * @param channels
     */
    @Override
    public void subscribe(BinaryJedisPubSub binaryListener, final byte[]... channels) {
        /**
         * https://github.com/xetorthio/jedis/wiki/AdvancedUsage
         * Note that subscribe is a blocking operation because it will poll JbootRedis for responses on the thread that calls subscribe.
         * A single JedisPubSub instance can be used to subscribe to multiple channels.
         * You can call subscribe or psubscribe on an existing JedisPubSub instance to change your subscriptions.
         */
        new Thread("jboot-redisCluster-subscribe-BinaryJedisPubSub") {
            @Override
            public void run() {
                while (!isClose()) {
                    //订阅线程断开连接，需要进行重连
                    try {
                        jedisCluster.subscribe(binaryListener, channels);
                        LOG.warn("Disconnect to redis channel in subscribe BinaryJedisPubSub!");
                        break;
                    } catch (Throwable e) {
                        LOG.error("failed connect to redis, reconnect it.", e);
                        QuietlyUtil.sleepQuietly(1000);
                    }
                }
            }
        }.start();
    }


    @Override
    public RedisScanResult<String> scan(String pattern, String cursor, int scanCount) {
        ScanParams params = new ScanParams();
        params.match(pattern).count(scanCount);
        ScanResult<String> scanResult = jedisCluster.scan(cursor, params);
        return new RedisScanResult<>(scanResult.getCursor(), scanResult.getResult());
    }

    @Override
    public Object eval(String script, int keyCount, String... params) {
        return jedisCluster.eval(script, keyCount, params);
    }

    public JedisCluster getJedisCluster() {
        return jedisCluster;
    }

}