/*
 *  IXWebSocketMessageQTest.cpp
 *  Author: Korchynskyi Dmytro
 *  Copyright (c) 2019 Machine Zone. All rights reserved.
 */

#include "IXTest.h"
#include "catch.hpp"
#include <ixwebsocket/IXWebSocket.h>
#include <ixwebsocket/IXWebSocketMessageQueue.h>
#include <ixwebsocket/IXWebSocketServer.h>
#include <thread>

using namespace ix;

namespace
{
    bool startServer(ix::WebSocketServer& server)
    {
        server.setOnConnectionCallback([&server](std::shared_ptr<ix::WebSocket> webSocket,
                                                 std::shared_ptr<ConnectionState> connectionState) {
            webSocket->setOnMessageCallback(
                [connectionState, &server](const WebSocketMessagePtr& msg) {
                    if (msg->type == ix::WebSocketMessageType::Open)
                    {
                        TLogger() << "New connection";
                        connectionState->computeId();
                        TLogger() << "id: " << connectionState->getId();
                        TLogger() << "Uri: " << msg->openInfo.uri;
                        TLogger() << "Headers:";
                        for (auto&& it : msg->openInfo.headers)
                        {
                            TLogger() << it.first << ": " << it.second;
                        }
                    }
                    else if (msg->type == ix::WebSocketMessageType::Close)
                    {
                        TLogger() << "Closed connection";
                    }
                    else if (msg->type == ix::WebSocketMessageType::Message)
                    {
                        TLogger() << "Message received: " << msg->str;

                        for (auto&& client : server.getClients())
                        {
                            client->send(msg->str);
                        }
                    }
                });
        });

        auto res = server.listen();
        if (!res.first)
        {
            TLogger() << res.second;
            return false;
        }

        server.start();
        return true;
    }

    class MsgQTestClient
    {
    public:
        MsgQTestClient()
        {
            msgQ.bindWebsocket(&ws);

            msgQ.setOnMessageCallback([this](const WebSocketMessagePtr& msg) {
                REQUIRE(mainThreadId == std::this_thread::get_id());

                std::stringstream ss;
                if (msg->type == WebSocketMessageType::Open)
                {
                    log("client connected");
                    sendNextMessage();
                }
                else if (msg->type == WebSocketMessageType::Close)
                {
                    log("client disconnected");
                }
                else if (msg->type == WebSocketMessageType::Error)
                {
                    ss << "Error ! " << msg->errorInfo.reason;
                    log(ss.str());
                    testDone = true;
                }
                else if (msg->type == WebSocketMessageType::Pong)
                {
                    ss << "Received pong message " << msg->str;
                    log(ss.str());
                }
                else if (msg->type == WebSocketMessageType::Ping)
                {
                    ss << "Received ping message " << msg->str;
                    log(ss.str());
                }
                else if (msg->type == WebSocketMessageType::Message)
                {
                    REQUIRE(msg->str.compare("Hey dude!") == 0);
                    ++receivedCount;
                    ss << "Received message " << msg->str;
                    log(ss.str());
                    sendNextMessage();
                }
                else
                {
                    ss << "Invalid WebSocketMessageType";
                    log(ss.str());
                    testDone = true;
                }
            });
        }

        void sendNextMessage()
        {
            if (receivedCount >= 3)
            {
                testDone = true;
                succeeded = true;
            }
            else
            {
                auto info = ws.sendText("Hey dude!");
                if (info.success)
                    log("sent message");
                else
                    log("send failed");
            }
        }

        void run(const std::string& url)
        {
            mainThreadId = std::this_thread::get_id();
            testDone = false;
            receivedCount = 0;

            ws.setUrl(url);
            ws.start();

            while (!testDone)
            {
                msgQ.poll();
                msleep(50);
            }
        }

        bool isSucceeded() const
        {
            return succeeded;
        }

    private:
        WebSocket ws;
        WebSocketMessageQueue msgQ;
        bool testDone = false;
        uint32_t receivedCount = 0;
        std::thread::id mainThreadId;
        bool succeeded = false;
    };
} // namespace

TEST_CASE("Websocket_message_queue", "[websocket_message_q]")
{
    SECTION("Send several messages")
    {
        int port = getFreePort();
        WebSocketServer server(port);
        REQUIRE(startServer(server));

        MsgQTestClient testClient;
        testClient.run("ws://127.0.0.1:" + std::to_string(port));
        REQUIRE(testClient.isSucceeded());

        server.stop();
    }
}