package garbage

import (
    "errors"
    "log"
    "net/http"
    "sync"
    "time"

    "github.com/gorilla/websocket"
)

const (
    // 允许等待的写入时间
    writeWait = 10 * time.Second

    // Time allowed to read the next pong message from the peer.
    pongWait = 60 * time.Second

    // Send pings to peer with this period. Must be less than pongWait.
    pingPeriod = (pongWait * 9) / 10

    // Maximum message size allowed from peer.
    maxMessageSize = 512
)

// 最大的连接ID，每次连接都加1 处理
var maxConnId int64

// 客户端读写消息
type wsMessage struct {
    // websocket.TextMessage 消息类型
    messageType int
    data        []byte
}

// ws 的所有连接
// 用于广播
var wsConnAll map[int64]*wsConnection

var upgrader = websocket.Upgrader{
    ReadBufferSize:  1024,
    WriteBufferSize: 1024,
    // 允许所有的CORS 跨域请求，正式环境可以关闭
    CheckOrigin: func(r *http.Request) bool {
        return true
    },
}

// 客户端连接
type wsConnection struct {
    wsSocket *websocket.Conn // 底层websocket
    inChan   chan *wsMessage // 读队列
    outChan  chan *wsMessage // 写队列

    mutex     sync.Mutex // 避免重复关闭管道,加锁处理
    isClosed  bool
    closeChan chan byte // 关闭通知
    id        int64
}

func wsHandler(resp http.ResponseWriter, req *http.Request) {
    // 应答客户端告知升级连接为websocket
    wsSocket, err := upgrader.Upgrade(resp, req, nil)
    if err != nil {
        log.Println("升级为websocket失败", err.Error())
        return
    }
    maxConnId++
    // TODO 如果要控制连接数可以计算，wsConnAll长度
    // 连接数保持一定数量，超过的部分不提供服务
    wsConn := &wsConnection{
        wsSocket:  wsSocket,
        inChan:    make(chan *wsMessage, 1000),
        outChan:   make(chan *wsMessage, 1000),
        closeChan: make(chan byte),
        isClosed:  false,
        id:        maxConnId,
    }
    wsConnAll[maxConnId] = wsConn
    log.Println("当前在线人数", len(wsConnAll))

    // 处理器,发送定时信息，避免意外关闭
    go wsConn.processLoop()
    // 读协程
    go wsConn.wsReadLoop()
    // 写协程
    go wsConn.wsWriteLoop()
}

// 处理队列中的消息
func (wsConn *wsConnection) processLoop() {
    // 处理消息队列中的消息
    // 获取到消息队列中的消息，处理完成后，发送消息给客户端
    for {
        msg, err := wsConn.wsRead()
        if err != nil {
            log.Println("获取消息出现错误", err.Error())
            break
        }
        log.Println("接收到消息", string(msg.data))
        // 修改以下内容把客户端传递的消息传递给处理程序
        err = wsConn.wsWrite(msg.messageType, msg.data)
        if err != nil {
            log.Println("发送消息给客户端出现错误", err.Error())
            break
        }
    }
}

// 处理消息队列中的消息
func (wsConn *wsConnection) wsReadLoop() {
    // 设置消息的最大长度
    wsConn.wsSocket.SetReadLimit(maxMessageSize)
    wsConn.wsSocket.SetReadDeadline(time.Now().Add(pongWait))
    for {
        // 读一个message
        msgType, data, err := wsConn.wsSocket.ReadMessage()
        if err != nil {
            websocket.IsUnexpectedCloseError(err, websocket.CloseGoingAway, websocket.CloseAbnormalClosure)
            log.Println("消息读取出现错误", err.Error())
            wsConn.close()
            return
        }
        req := &wsMessage{
            msgType,
            data,
        }
        // 放入请求队列,消息入栈
        select {
        case wsConn.inChan <- req:
        case <-wsConn.closeChan:
            return
        }
    }
}

// 发送消息给客户端
func (wsConn *wsConnection) wsWriteLoop() {
    ticker := time.NewTicker(pingPeriod)
    defer func() {
        ticker.Stop()
    }()
    for {
        select {
        // 取一个应答
        case msg := <-wsConn.outChan:
            // 写给websocket
            if err := wsConn.wsSocket.WriteMessage(msg.messageType, msg.data); err != nil {
                log.Println("发送消息给客户端发生错误", err.Error())
                // 切断服务
                wsConn.close()
                return
            }
        case <-wsConn.closeChan:
            // 获取到关闭通知
            return
        case <-ticker.C:
            // 出现超时情况
            wsConn.wsSocket.SetWriteDeadline(time.Now().Add(writeWait))
            if err := wsConn.wsSocket.WriteMessage(websocket.PingMessage, nil); err != nil {
                return
            }
        }
    }
}

// 写入消息到队列中
func (wsConn *wsConnection) wsWrite(messageType int, data []byte) error {
    select {
    case wsConn.outChan <- &wsMessage{messageType, data}:
    case <-wsConn.closeChan:
        return errors.New("连接已经关闭")
    }
    return nil
}

// 读取消息队列中的消息
func (wsConn *wsConnection) wsRead() (*wsMessage, error) {
    select {
    case msg := <-wsConn.inChan:
        // 获取到消息队列中的消息
        return msg, nil
    case <-wsConn.closeChan:

    }
    return nil, errors.New("连接已经关闭")
}

// 关闭连接
func (wsConn *wsConnection) close() {
    log.Println("关闭连接被调用了")
    wsConn.wsSocket.Close()
    wsConn.mutex.Lock()
    defer wsConn.mutex.Unlock()
    if wsConn.isClosed == false {
        wsConn.isClosed = true
        // 删除这个连接的变量
        delete(wsConnAll, wsConn.id)
        close(wsConn.closeChan)
    }
}

// 启动程序
func StartWebsocket(addrPort string) {
    wsConnAll = make(map[int64]*wsConnection)
    http.HandleFunc("/ws", wsHandler)
    http.ListenAndServe(addrPort, nil)
}