package com.xcong.excoin.modules.gateApi;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.JSONArray;
import com.alibaba.fastjson.JSONObject;
import com.xcong.excoin.modules.blackchain.service.DateUtil;
import com.xcong.excoin.modules.okxNewPrice.celue.CaoZuoService;
import com.xcong.excoin.modules.okxNewPrice.okxWs.wanggeList.WangGeListService;
import com.xcong.excoin.modules.okxNewPrice.utils.SSLConfig;
import lombok.extern.slf4j.Slf4j;
import org.java_websocket.client.WebSocketClient;
import org.java_websocket.handshake.ServerHandshake;

import javax.crypto.Mac;
import javax.crypto.spec.SecretKeySpec;
import java.math.BigDecimal;
import java.net.URI;
import java.net.URISyntaxException;
import java.util.concurrent.*;
import java.util.concurrent.atomic.AtomicBoolean;
import java.util.concurrent.atomic.AtomicReference;

/**
 * Gate K线 WebSocket 客户端类，用于连接 Gate 的 WebSocket 接口，
 * 实时获取并处理 K线（candlestick）数据。
 * 同时支持心跳检测、自动重连以及异常恢复机制。
 * @author Administrator
 */
@Slf4j
public class GateKlineWebSocketClient {
    private final CaoZuoService caoZuoService;
    private final GateWebSocketClientManager clientManager;
    private final WangGeListService wangGeListService;

    private WebSocketClient webSocketClient;
    private ScheduledExecutorService heartbeatExecutor;
    private volatile ScheduledFuture<?> pongTimeoutFuture;
    private final AtomicReference<Long> lastMessageTime = new AtomicReference<>(System.currentTimeMillis());

    // 连接状态标志
    private final AtomicBoolean isConnected = new AtomicBoolean(false);
    private final AtomicBoolean isConnecting = new AtomicBoolean(false);
    private final AtomicBoolean isInitialized = new AtomicBoolean(false);

    private static final String CHANNEL = "futures.candlesticks";
    private static final String POSITIONS_CHANNEL = "futures.positions";
    private static final String FUTURES_PING = "futures.ping";
    private static final String FUTURES_PONG = "futures.pong";
    private static final String GATE_INTERVAL = "1m";
    private static final String GATE_CONTRACT = "XAUT_USDT";

    private GateGridTradeService gridTradeService;

    private final String apiKey;
    private final String apiSecret;

    private static final char[] HEX_ARRAY = "0123456789abcdef".toCharArray();

    // 心跳超时时间(秒)，小于30秒
    private static final int HEARTBEAT_TIMEOUT = 10;

    // 共享线程池用于重连等异步任务
    private final ExecutorService sharedExecutor = Executors.newCachedThreadPool(r -> {
        Thread t = new Thread(r, "gate-kline-worker");
        t.setDaemon(true);
        return t;
    });

    public GateKlineWebSocketClient(CaoZuoService caoZuoService,
                                    GateWebSocketClientManager clientManager,
                                    WangGeListService wangGeListService,
                                    GateGridTradeService gridTradeService,
                                    String apiKey, String apiSecret
    ) {
        this.caoZuoService = caoZuoService;
        this.clientManager = clientManager;
        this.wangGeListService = wangGeListService;
        this.gridTradeService = gridTradeService;
        this.apiKey = apiKey;
        this.apiSecret = apiSecret;
    }

    /**
     * 初始化方法，创建并初始化WebSocket客户端实例
     */
    public void init() {
        if (!isInitialized.compareAndSet(false, true)) {
            log.warn("GateKlineWebSocketClient 已经初始化过，跳过重复初始化");
            return;
        }
        connect();
        startHeartbeat();
    }

    /**
     * 销毁方法，关闭WebSocket连接和相关资源
     */
    public void destroy() {
        log.info("开始销毁GateKlineWebSocketClient");

        if (webSocketClient != null && webSocketClient.isOpen()) {
            unsubscribeKlineChannels();
            unsubscribePositionsChannels();
            try {
                Thread.sleep(500);
            } catch (InterruptedException e) {
                Thread.currentThread().interrupt();
                log.warn("取消订阅等待被中断");
            }
        }

        if (sharedExecutor != null && !sharedExecutor.isShutdown()) {
            sharedExecutor.shutdown();
        }

        if (webSocketClient != null && webSocketClient.isOpen()) {
            try {
                webSocketClient.closeBlocking();
            } catch (InterruptedException e) {
                Thread.currentThread().interrupt();
                log.warn("关闭WebSocket连接时被中断");
            }
        }

        shutdownExecutorGracefully(heartbeatExecutor);
        if (pongTimeoutFuture != null) {
            pongTimeoutFuture.cancel(true);
        }
        shutdownExecutorGracefully(sharedExecutor);

        log.info("GateKlineWebSocketClient销毁完成");
    }

    private static final String WS_URL_MONIPAN = "wss://ws-testnet.gate.com/v4/ws/futures/usdt";
    private static final String WS_URL_SHIPAN = "wss://fx-ws.gateio.ws/v4/ws/usdt";
    private static final boolean isAccountType = false;

    /**
     * 建立与 Gate WebSocket 服务器的连接。
     * 设置回调函数以监听连接打开、接收消息、关闭和错误事件。
     */
    private void connect() {
        // 避免重复连接
        if (isConnecting.get()) {
            log.info("连接已在进行中，跳过重复连接请求");
            return;
        }
        
        if (!isConnecting.compareAndSet(false, true)) {
            log.info("连接已在进行中，跳过重复连接请求");
            return;
        }
        
        try {
            SSLConfig.configureSSL();
            System.setProperty("https.protocols", "TLSv1.2,TLSv1.3");
            String WS_URL = WS_URL_MONIPAN;
            if (isAccountType){
                WS_URL = WS_URL_SHIPAN;
            }
            URI uri = new URI(WS_URL);
            
            // 关闭之前的连接（如果存在）
            if (webSocketClient != null) {
                try {
                    webSocketClient.closeBlocking();
                } catch (InterruptedException e) {
                    Thread.currentThread().interrupt();
                    log.warn("关闭之前连接时被中断");
                }
            }
            
            webSocketClient = new WebSocketClient(uri) {
                @Override
                public void onOpen(ServerHandshake handshake) {
                    log.info("Gate Kline WebSocket连接成功");
                    isConnected.set(true);
                    isConnecting.set(false);
                    
                    // 检查应用是否正在关闭
                    if (sharedExecutor != null && !sharedExecutor.isShutdown()) {
                        resetHeartbeatTimer();
                        subscribeKlineChannels();
                        subscribePositionsChannels();
                        subscribePingChannels();
                    } else {
                        log.warn("应用正在关闭，忽略WebSocket连接成功回调");
                    }
                }

                @Override
                public void onMessage(String message) {
                    lastMessageTime.set(System.currentTimeMillis());
                    handleWebSocketMessage(message);
                    resetHeartbeatTimer();
                }

                @Override
                public void onClose(int code, String reason, boolean remote) {
                    log.warn("Gate Kline WebSocket连接关闭: code={}, reason={}", code, reason);
                    isConnected.set(false);
                    isConnecting.set(false);
                    cancelPongTimeout();

                    if (sharedExecutor != null && !sharedExecutor.isShutdown() && !sharedExecutor.isTerminated()) {
                        sharedExecutor.execute(() -> {
                            try {
                                reconnectWithBackoff();
                            } catch (InterruptedException e) {
                                Thread.currentThread().interrupt();
                                log.error("重连线程被中断", e);
                            } catch (Exception e) {
                                log.error("重连失败", e);
                            }
                        });
                    } else {
                        log.warn("共享线程池已关闭，无法执行重连任务");
                    }
                }

                @Override
                public void onError(Exception ex) {
                    log.error("Gate Kline WebSocket发生错误", ex);
                    isConnected.set(false);
                }
            };

            webSocketClient.connect();
        } catch (URISyntaxException e) {
            log.error("WebSocket URI格式错误", e);
            isConnecting.set(false);
        }
    }

    /**
     * 订阅K线频道。
     * 构造 Gate 格式的订阅请求并发送给服务端。
     * payload: ["1m", "BTC_USDT"] (间隔, 合约名)
     */
    private void subscribeKlineChannels() {
        JSONObject subscribeMsg = new JSONObject();
        subscribeMsg.put("time", System.currentTimeMillis() / 1000);
        subscribeMsg.put("channel", CHANNEL);
        subscribeMsg.put("event", "subscribe");

        JSONArray payload = new JSONArray();
        payload.add(GATE_INTERVAL);
        payload.add(GATE_CONTRACT);
        subscribeMsg.put("payload", payload);

        webSocketClient.send(subscribeMsg.toJSONString());
        log.info("已发送 K线频道订阅请求，合约: {}, 周期: {}", GATE_CONTRACT, GATE_INTERVAL);
    }
    private void subscribePingChannels() {
        JSONObject subscribeMsg = new JSONObject();
        subscribeMsg.put("time", System.currentTimeMillis() / 1000);
        subscribeMsg.put("channel", FUTURES_PING);
        webSocketClient.send(subscribeMsg.toJSONString());
        log.info("已发送 futures.ping");
    }

    private void subscribePositionsChannels() {
        JSONObject subscribeMsg = new JSONObject();
        long timeSec = System.currentTimeMillis() / 1000;
        subscribeMsg.put("time", timeSec);
        subscribeMsg.put("channel", POSITIONS_CHANNEL);
        subscribeMsg.put("event", "subscribe");
        JSONArray payload = new JSONArray();
        payload.add("user_id");
        payload.add(GATE_CONTRACT);
        subscribeMsg.put("payload", payload);

        JSONObject auth = new JSONObject();
        auth.put("method", "api_key");
        auth.put("KEY", apiKey);
        auth.put("SIGN", hs512Sign(POSITIONS_CHANNEL, "subscribe", timeSec));
        subscribeMsg.put("auth", auth);

        webSocketClient.send(subscribeMsg.toJSONString());
        log.info("已发送仓位频道订阅请求（含认证），合约: {}", GATE_CONTRACT);
    }

    private String hs512Sign(String channel, String event, long timeSec) {
        try {
            String message = "channel=" + channel + "&event=" + event + "&time=" + timeSec;
            Mac mac = Mac.getInstance("HmacSHA512");
            SecretKeySpec spec = new SecretKeySpec(apiSecret.getBytes(), "HmacSHA512");
            mac.init(spec);
            byte[] hash = mac.doFinal(message.getBytes());
            StringBuilder hex = new StringBuilder(hash.length * 2);
            for (byte b : hash) {
                hex.append(HEX_ARRAY[(b >> 4) & 0xF]);
                hex.append(HEX_ARRAY[b & 0xF]);
            }
            return hex.toString();
        } catch (Exception e) {
            log.error("签名计算失败", e);
            return "";
        }
    }

    private void unsubscribeKlineChannels() {
        JSONObject unsubscribeMsg = new JSONObject();
        unsubscribeMsg.put("time", System.currentTimeMillis() / 1000);
        unsubscribeMsg.put("channel", CHANNEL);
        unsubscribeMsg.put("event", "unsubscribe");
        JSONArray payload = new JSONArray();
        payload.add(GATE_INTERVAL);
        payload.add(GATE_CONTRACT);
        unsubscribeMsg.put("payload", payload);
        webSocketClient.send(unsubscribeMsg.toJSONString());
        log.info("已发送 K线频道取消订阅请求，合约: {}, 周期: {}", GATE_CONTRACT, GATE_INTERVAL);
    }

    private void unsubscribePositionsChannels() {
        JSONObject unsubscribeMsg = new JSONObject();
        unsubscribeMsg.put("time", System.currentTimeMillis() / 1000);
        unsubscribeMsg.put("channel", POSITIONS_CHANNEL);
        unsubscribeMsg.put("event", "unsubscribe");
        JSONArray payload = new JSONArray();
        payload.add(GATE_CONTRACT);
        unsubscribeMsg.put("payload", payload);
        webSocketClient.send(unsubscribeMsg.toJSONString());
        log.info("已发送仓位频道取消订阅请求，合约: {}", GATE_CONTRACT);
    }

    /**
     * 处理从 WebSocket 收到的消息。
     * 包括订阅确认、错误响应、心跳响应以及实际的数据推送。
     *
     * @param message 来自 WebSocket 的原始字符串消息
     */
    private void handleWebSocketMessage(String message) {
        try {
            JSONObject response = JSON.parseObject(message);
            String channel = response.getString("channel");
            String event = response.getString("event");

            if (FUTURES_PONG.equals(channel)) {
                log.debug("收到futures.pong响应");
                cancelPongTimeout();
            } else if ("subscribe".equals(event)) {
                log.info("{} 频道订阅成功: {}", channel, response.getJSONObject("result"));
            } else if ("unsubscribe".equals(event)) {
                log.info("{} 频道取消订阅成功", channel);
            } else if ("error".equals(event)) {
                JSONObject error = response.getJSONObject("error");
                log.error("{} 频道错误: code={}, msg={}",
                        channel,
                        error != null ? error.getInteger("code") : "N/A",
                        error != null ? error.getString("message") : response.getString("msg"));
            } else if ("update".equals(event) || "all".equals(event)) {
                if (POSITIONS_CHANNEL.equals(channel)) {
                    processPositionData(response);
                } else if (CHANNEL.equals(channel)) {
                    processPushDataV2(response);
                }
            }
        } catch (Exception e) {
            log.error("处理WebSocket消息失败: {}", message, e);
        }
    }

    /**
     * 解析并处理K线推送数据。
     * 控制台输出K线数据，并在K线完结时触发策略和量化操作。
     *
     * @param response 包含K线数据的 JSON 对象
     */
    private void processPushDataV2(JSONObject response) {
        try {
            /**
             * Gate K线推送格式：
             * {
             *   "time": 1542162490,
             *   "time_ms": 1542162490123,
             *   "channel": "futures.candlesticks",
             *   "event": "update",
             *   "result": [
             *     {
             *       "t": 1545129300,
             *       "v": "27525555",
             *       "c": "95.4",
             *       "h": "96.9",
             *       "l": "89.5",
             *       "o": "94.3",
             *       "n": "1m_BTC_USD",
             *       "a": "314732.87412",
             *       "w": false
             *     }
             *   ]
             * }
             */
            String channel = response.getString("channel");
            if (!CHANNEL.equals(channel)) {
                return;
            }

            JSONArray resultArray = response.getJSONArray("result");
            if (resultArray == null || resultArray.isEmpty()) {
                log.warn("K线频道数据为空");
                return;
            }

            JSONObject data = resultArray.getJSONObject(0);
            BigDecimal openPx = new BigDecimal(data.getString("o"));
            BigDecimal highPx = new BigDecimal(data.getString("h"));
            BigDecimal lowPx = new BigDecimal(data.getString("l"));
            BigDecimal closePx = new BigDecimal(data.getString("c"));
            BigDecimal vol = new BigDecimal(data.getString("v"));
            BigDecimal baseVol = new BigDecimal(data.getString("a"));
            String name = data.getString("n");
            long t = data.getLong("t");
            boolean windowClosed = data.getBooleanValue("w");
            String time = DateUtil.TimeStampToDateTime(t);

            log.info("========== Gate K线数据 ==========");
            log.info("名称(n): " + name);
            log.info("时间  : " + time);
            log.info("开盘(o): " + openPx);
            log.info("最高(h): " + highPx);
            log.info("最低(l): " + lowPx);
            log.info("收盘(c): " + closePx);
            log.info("成交量(v): " + vol);
            log.info("成交额(a): " + baseVol);
            log.info("K线完结(w): " + windowClosed);
            log.info("==================================");

            if (gridTradeService != null) {
                gridTradeService.onKline(closePx);
            }
        } catch (Exception e) {
            log.error("处理 K线频道推送数据失败", e);
        }
    }

    private void processPositionData(JSONObject response) {
        try {
            JSONArray resultArray = response.getJSONArray("result");
            if (resultArray == null || resultArray.isEmpty()) {
                return;
            }
            for (int i = 0; i < resultArray.size(); i++) {
                JSONObject pos = resultArray.getJSONObject(i);
                String contract = pos.getString("contract");
                if (!GATE_CONTRACT.equals(contract)) {
                    continue;
                }
                String mode = pos.getString("mode");
                BigDecimal size = new BigDecimal(pos.getString("size"));
                BigDecimal entryPrice = new BigDecimal(pos.getString("entry_price"));
                BigDecimal historyPnl = new BigDecimal(pos.getString("history_pnl"));
                BigDecimal realisedPnl = new BigDecimal(pos.getString("realised_pnl"));

                log.info("仓位推送: contract={}, mode={}, size={}, entry_price={}, history_pnl={}, realised_pnl={}",
                        contract, mode, size, entryPrice, historyPnl, realisedPnl);

                if (gridTradeService != null) {
                    gridTradeService.onPositionUpdate(contract, mode, size, entryPrice, historyPnl, realisedPnl);
                }
            }
        } catch (Exception e) {
            log.error("处理仓位推送数据失败", e);
        }
    }

    /**
     * 启动心跳检测任务。
     * 使用 ScheduledExecutorService 定期检查是否需要发送 ping 请求来维持连接。
     */
    private void startHeartbeat() {
        if (heartbeatExecutor != null && !heartbeatExecutor.isTerminated()) {
            heartbeatExecutor.shutdownNow();
        }

        heartbeatExecutor = Executors.newSingleThreadScheduledExecutor(r -> {
            Thread t = new Thread(r, "gate-kline-heartbeat");
            t.setDaemon(true);
            return t;
        });

        heartbeatExecutor.scheduleWithFixedDelay(this::checkHeartbeatTimeout, 25, 25, TimeUnit.SECONDS);
    }

    /**
     * 重置心跳计时器。
     * 当收到新消息或发送 ping 后取消当前超时任务并重新安排下一次超时检查。
     */
    private synchronized void resetHeartbeatTimer() {
        cancelPongTimeout();

        if (heartbeatExecutor != null && !heartbeatExecutor.isShutdown()) {
            pongTimeoutFuture = heartbeatExecutor.schedule(this::checkHeartbeatTimeout,
                    HEARTBEAT_TIMEOUT, TimeUnit.SECONDS);
        }
    }

    /**
     * 检查心跳超时情况。
     * 若长时间未收到任何消息则主动发送 ping 请求保持连接活跃。
     */
    private void checkHeartbeatTimeout() {
        // 只有在连接状态下才检查心跳
        if (!isConnected.get()) {
            return;
        }
        
        long currentTime = System.currentTimeMillis();
        long lastTime = lastMessageTime.get();

        if (currentTime - lastTime >= HEARTBEAT_TIMEOUT * 1000L) {
            sendPing();
        }
    }

    /**
     * 发送 ping 请求至 WebSocket 服务端。
     * 用于维持长连接有效性。
     */
    private void sendPing() {
        try {
            if (webSocketClient != null && webSocketClient.isOpen()) {
                JSONObject pingMsg = new JSONObject();
                pingMsg.put("time", System.currentTimeMillis() / 1000);
                pingMsg.put("channel", FUTURES_PING);
                webSocketClient.send(pingMsg.toJSONString());
                log.debug("发送futures.ping请求");
            }
        } catch (Exception e) {
            log.warn("发送ping失败", e);
        }
    }

    /**
     * 取消当前的心跳超时任务。
     * 在收到 pong 或其他有效消息时调用此方法避免不必要的断开重连。
     */
    private synchronized void cancelPongTimeout() {
        if (pongTimeoutFuture != null && !pongTimeoutFuture.isDone()) {
            pongTimeoutFuture.cancel(true);
        }
    }

    /**
     * 执行 WebSocket 重连操作。
     * 在连接意外中断后尝试重新建立连接。
     */
    private void reconnectWithBackoff() throws InterruptedException {
        int attempt = 0;
        int maxAttempts = 3;
        long delayMs = 5000;

        while (attempt < maxAttempts) {
            try {
                Thread.sleep(delayMs);
                connect();
                return;
            } catch (Exception e) {
                log.warn("第{}次重连失败", attempt + 1, e);
                delayMs *= 2;
                attempt++;
            }
        }

        log.error("超过最大重试次数({})仍未连接成功", maxAttempts);
    }

    /**
     * 优雅关闭线程池
     */
    private void shutdownExecutorGracefully(ExecutorService executor) {
        if (executor == null || executor.isTerminated()) {
            return;
        }
        try {
            executor.shutdown();
            if (!executor.awaitTermination(5, TimeUnit.SECONDS)) {
                executor.shutdownNow();
            }
        } catch (InterruptedException e) {
            Thread.currentThread().interrupt();
            executor.shutdownNow();
        }
    }
}