#pragma once

#include <memory>

#include <brynet/base/NonCopyable.hpp>
#include <brynet/base/Any.hpp>
#include <brynet/net/TcpService.hpp>
#include <brynet/net/http/HttpParser.hpp>
#include <brynet/net/http/WebSocketFormat.hpp>

namespace brynet { namespace net { namespace http {

    class HttpService;
    class HttpSessionHandlers;

    class HttpSession : public brynet::base::NonCopyable
    {
    public:
        using Ptr = std::shared_ptr<HttpSession>;

        using EnterCallback = std::function <void(const HttpSession::Ptr&, HttpSessionHandlers&)>;
        using HttpParserCallback = std::function <void(const HTTPParser&, const HttpSession::Ptr&)>;
        using WsCallback =  std::function < void(   const HttpSession::Ptr&,
                                                    WebSocketFormat::WebSocketFrameType opcode,
                                                    const std::string& payload)>;

        using ClosedCallback = std::function <void(const HttpSession::Ptr&)>;
        using WsConnectedCallback = std::function <void(const HttpSession::Ptr&, const HTTPParser&)>;

    public:
        template<typename PacketType>
        void                        send(PacketType&& packet,
            TcpConnection::PacketSendedCallback&& callback = nullptr)
        {
            mSession->send(std::forward<PacketType&&>(packet),
                std::move(callback));
        }
        void                        send(const char* packet,
            size_t len,
            TcpConnection::PacketSendedCallback&& callback = nullptr)
        {
            mSession->send(packet, len, std::move(callback));
        }

        void                        postShutdown() const
        {
            mSession->postShutdown();
        }

        void                        postClose() const
        {
            mSession->postDisConnect();
        }

    protected:
        explicit HttpSession(TcpConnection::Ptr session)
        {
            mSession = std::move(session);
        }

        virtual ~HttpSession() = default;

        static  Ptr                 Create(TcpConnection::Ptr session)
        {
            class make_shared_enabler : public HttpSession
            {
            public:
                explicit make_shared_enabler(TcpConnection::Ptr session)
                    :
                    HttpSession(std::move(session))
                    {}
            };
            return std::make_shared<make_shared_enabler>(std::move(session));
        }

        const TcpConnection::Ptr& getSession() const
        {
            return mSession;
        }

        const HttpParserCallback& getHttpCallback() const
        {
            return mHttpRequestCallback;
        }

        const ClosedCallback& getCloseCallback() const
        {
            return mCloseCallback;
        }

        const WsCallback& getWSCallback() const
        {
            return mWSCallback;
        }

        const WsConnectedCallback& getWSConnectedCallback() const
        {
            return mWSConnectedCallback;
        }

    private:
        void                        setHttpCallback(HttpParserCallback&& callback)
        {
            mHttpRequestCallback = std::move(callback);
        }

        void                        setClosedCallback(ClosedCallback&& callback)
        {
            mCloseCallback = std::move(callback);
        }

        void                        setWSCallback(WsCallback&& callback)
        {
            mWSCallback = std::move(callback);
        }

        void                        setWSConnected(WsConnectedCallback&& callback)
        {
            mWSConnectedCallback = std::move(callback);
        }

    private:
        TcpConnection::Ptr          mSession;
        HttpParserCallback          mHttpRequestCallback;
        WsCallback                  mWSCallback;
        ClosedCallback              mCloseCallback;
        WsConnectedCallback         mWSConnectedCallback;

        friend class HttpService;
    };

    class HttpSessionHandlers
    {
    public:
        void                        setHttpCallback(HttpSession::HttpParserCallback&& callback)
        {
            mHttpRequestCallback = std::move(callback);
        }

        void                        setClosedCallback(HttpSession::ClosedCallback&& callback)
        {
            mCloseCallback = std::move(callback);
        }

        void                        setWSCallback(HttpSession::WsCallback&& callback)
        {
            mWSCallback = std::move(callback);
        }

        void                        setWSConnected(HttpSession::WsConnectedCallback&& callback)
        {
            mWSConnectedCallback = std::move(callback);
        }

    private:
        HttpSession::HttpParserCallback          mHttpRequestCallback;
        HttpSession::WsCallback                  mWSCallback;
        HttpSession::ClosedCallback              mCloseCallback;
        HttpSession::WsConnectedCallback         mWSConnectedCallback;

        friend class HttpService;
    };

    class HttpService
    {
    public:
        static void setup(const TcpConnection::Ptr& session, 
            const HttpSession::EnterCallback& enterCallback)
        {
            auto httpSession = HttpSession::Create(session);
            if (enterCallback != nullptr)
            {
                HttpSessionHandlers handlers;
                enterCallback(httpSession, handlers);
                httpSession->setHttpCallback(std::move(handlers.mHttpRequestCallback));
                httpSession->setClosedCallback(std::move(handlers.mCloseCallback));
                httpSession->setWSCallback(std::move(handlers.mWSCallback));
                httpSession->setWSConnected(std::move(handlers.mWSConnectedCallback));
            }
            HttpService::handle(httpSession);
        }

    private:
        static void handle(const HttpSession::Ptr& httpSession)
        {
            /*TODO::keep alive and timeout close */
            auto& session = httpSession->getSession();

            session->setDisConnectCallback([httpSession](const TcpConnection::Ptr&) {
                const auto& tmp = httpSession->getCloseCallback();
                if (tmp != nullptr)
                {
                    tmp(httpSession);
                }
                });

            auto httpParser = std::make_shared<HTTPParser>(HTTP_BOTH);
            session->setDataCallback([httpSession, httpParser](
                brynet::base::BasePacketReader& reader) {
                    size_t retLen = 0;

                    if (httpParser->isWebSocket())
                    {
                        retLen = HttpService::ProcessWebSocket( reader.begin(),
                                                                reader.size(),
                                                                httpParser,
                                                                httpSession);
                    }
                    else
                    {
                        retLen = HttpService::ProcessHttp(  reader.begin(),
                                                            reader.size(),
                                                            httpParser,
                                                            httpSession);
                    }

                    reader.addPos(retLen);
                    reader.savePos();
                });
        }

        static size_t ProcessWebSocket(const char* buffer,
            size_t len,
            const HTTPParser::Ptr& httpParser,
            const HttpSession::Ptr& httpSession)
        {
            size_t leftLen = len;

            const auto& wsCallback = httpSession->getWSCallback();
            auto& cacheFrame = httpParser->getWSCacheFrame();
            auto& parseString = httpParser->getWSParseString();

            while (leftLen > 0)
            {
                parseString.clear();

                auto opcode = WebSocketFormat::WebSocketFrameType::ERROR_FRAME;
                size_t frameSize = 0;
                bool isFin = false;

                if (!WebSocketFormat::wsFrameExtractBuffer(buffer, 
                    leftLen, 
                    parseString, 
                    opcode, 
                    frameSize, 
                    isFin))
                {
                    // 如果没有解析出完整的ws frame则退出函数
                    break;
                }

                // 如果当前fram的fin为false或者opcode为延续包
                // 则将当前frame的payload添加到cache
                if (!isFin || 
                    opcode == WebSocketFormat::WebSocketFrameType::CONTINUATION_FRAME)
                {
                    cacheFrame += parseString;
                    parseString.clear();
                }
                // 如果当前fram的fin为false，并且opcode不为延续包
                // 则表示收到分段payload的第一个段(frame)，需要缓存当前frame的opcode
                if (!isFin && 
                    opcode != WebSocketFormat::WebSocketFrameType::CONTINUATION_FRAME)
                {
                    httpParser->cacheWSFrameType(opcode);
                }

                leftLen -= frameSize;
                buffer += frameSize;

                if (!isFin)
                {
                    continue;
                }

                // 如果fin为true，并且opcode为延续包
                // 则表示分段payload全部接受完毕
                // 因此需要获取之前第一次收到分段frame的opcode作为整个payload的类型
                if (opcode == WebSocketFormat::WebSocketFrameType::CONTINUATION_FRAME)
                {
                    if (!cacheFrame.empty())
                    {
                        parseString = std::move(cacheFrame);
                        cacheFrame.clear();
                    }
                    opcode = httpParser->getWSFrameType();
                }

                if (wsCallback != nullptr)
                {
                    wsCallback(httpSession, opcode, parseString);
                }
            }

            return (len - leftLen);
        }

        static size_t ProcessHttp(const char* buffer,
            size_t len,
            const HTTPParser::Ptr& httpParser,
            const HttpSession::Ptr& httpSession)
        {
            size_t retlen = len;
            if (!httpParser->isCompleted())
            {
                retlen = httpParser->tryParse(buffer, len);
                if (!httpParser->isCompleted())
                {
                    return retlen;
                }
            }

            if (httpParser->isWebSocket())
            {
                if (httpParser->hasKey("Sec-WebSocket-Key"))
                {
                    auto response = WebSocketFormat::wsHandshake(
                        httpParser->getValue("Sec-WebSocket-Key"));
                    httpSession->send(response.c_str(), 
                        response.size());
                }

                const auto& wsConnectedCallback = httpSession->getWSConnectedCallback();
                if (wsConnectedCallback != nullptr)
                {
                    wsConnectedCallback(httpSession, *httpParser);
                }
            }
            else
            {
                const auto& httpCallback = httpSession->getHttpCallback();
                if (httpCallback != nullptr)
                {
                    httpCallback(*httpParser, httpSession);
                }
            }

            return retlen;
        }
    };

} } }