//
// Created by stephane bourque on 2021-09-07.
//
#include <thread>

#include "Poco/JSON/Array.h"
#include "Poco/Net/HTTPHeaderStream.h"
#include "Poco/URI.h"

#include "RESTAPI/RESTAPI_telemetryWebSocket.h"
#include "TelemetryStream.h"

#include "framework/MicroServiceFuncs.h"

namespace OpenWifi {

	int TelemetryStream::Start() {
		Running_ = true;
		ReactorThr_.start(Reactor_);
		Utils::SetThreadName(ReactorThr_, "tel:reactor");
		NotificationMgr_.start(*this);
		return 0;
	}

	void TelemetryStream::Stop() {
		poco_information(Logger(), "Stopping...");
		Running_ = false;
		Reactor_.stop();
		ReactorThr_.join();
		MsgQueue_.wakeUpAll();
		NotificationMgr_.wakeUp();
		NotificationMgr_.join();
		poco_information(Logger(), "Stopped...");
	}

	bool TelemetryStream::IsValidEndPoint(uint64_t SerialNumber, const std::string &UUID) {
		std::lock_guard G(Mutex_);

		auto U = Clients_.find(UUID);
		if (U == Clients_.end())
			return false;

		auto N = SerialNumbers_.find(SerialNumber);
		if (N == SerialNumbers_.end())
			return false;

		return (N->second.find(UUID) != N->second.end());
	}

	bool TelemetryStream::CreateEndpoint(uint64_t SerialNumber, std::string &EndPoint,
										 const std::string &UUID) {
		std::lock_guard G(Mutex_);

		Poco::URI Public(MicroServiceConfigGetString("openwifi.system.uri.public", ""));
		Poco::URI U;
		U.setScheme("wss");
		U.setHost(Public.getHost());
		U.setPort(Public.getPort());
		auto RESTAPI_Path = std::string(*(RESTAPI_telemetryWebSocket::PathName().begin()));
		U.setPath(RESTAPI_Path);
		U.addQueryParameter("uuid", UUID);
		U.addQueryParameter("serialNumber", Utils::IntToSerialNumber(SerialNumber));
		EndPoint = U.toString();
		auto S = SerialNumbers_[SerialNumber];
		S.insert(UUID);
		SerialNumbers_[SerialNumber] = S;
		Clients_[UUID] = nullptr;
		return true;
	}

	void TelemetryStream::run() {
		Utils::SetThreadName("tel:notifier");
		Poco::AutoPtr<Poco::Notification> NextNotification(MsgQueue_.waitDequeueNotification());
		while (NextNotification && Running_) {
			auto Notification = dynamic_cast<TelemetryNotification *>(NextNotification.get());
			if (Notification != nullptr) {
				std::lock_guard Lock(Mutex_);
				switch (Notification->Type_) {
				case TelemetryNotification::NotificationType::data: {
					auto SerialNumberSetOfUUIDs = SerialNumbers_.find(Notification->SerialNumber_);
					if (SerialNumberSetOfUUIDs != SerialNumbers_.end()) {
						for (auto &uuid : SerialNumberSetOfUUIDs->second) {
							auto Client = Clients_.find(uuid);
							if (Client != Clients_.end() && Client->second != nullptr) {
								try {
									// std::cout << "Sent WS telemetry notification" << std::endl;
									Client->second->Send(Notification->Data_);
								} catch (const Poco::Exception &E) {
									Logger().log(E);
								} catch (std::exception &E) {
									poco_warning(
										Logger(),
										fmt::format(
											"Std:Ex Cannot send WS telemetry notification: {} for "
											"SerialNumber: {}",
											E.what(),
											Utils::IntToSerialNumber(Notification->SerialNumber_)));
								}
							} else {
								poco_warning(Logger(),
											 fmt::format("Cannot send WS telemetry notification "
														 "for SerialNumber: {}",
														 Utils::IntToSerialNumber(
															 Notification->SerialNumber_)));
							}
						}
					} else {
						poco_warning(Logger(), fmt::format("Cannot find serial: {}",
														   Utils::IntToSerialNumber(
															   Notification->SerialNumber_)));
					}
				} break;
				case TelemetryNotification::NotificationType::unregister: {

					auto client = Clients_.find(Notification->Data_);
					if (client != Clients_.end()) {
						for (auto i = SerialNumbers_.begin(); i != SerialNumbers_.end();) {
							i->second.erase(Notification->Data_);
							if (i->second.empty()) {
								i = SerialNumbers_.erase(i);
							} else {
								++i;
							}
						}
						Clients_.erase(client);
					} else {
						poco_warning(Logger(),
									 fmt::format("Unknown connection: {}", Notification->Data_));
					}
				} break;

				default: {

				} break;
				}
			}
			NextNotification = MsgQueue_.waitDequeueNotification();
		}
	}

	bool TelemetryStream::NewClient(const std::string &UUID, uint64_t SerialNumber,
									std::unique_ptr<Poco::Net::WebSocket> Client) {
		std::lock_guard G(Mutex_);
		try {
			Clients_[UUID] = std::make_unique<TelemetryClient>(
				UUID, SerialNumber, std::move(Client), NextReactor(), Logger());
			auto set = SerialNumbers_[SerialNumber];
			set.insert(UUID);
			SerialNumbers_[SerialNumber] = set;
			return true;
		} catch (const Poco::Exception &E) {
			Logger().log(E);
		} catch (...) {
			poco_warning(
				Logger(),
				fmt::format(
					"Could not create a telemetry client for session {} and serial number {}", UUID,
					SerialNumber));
		}
		return false;
	}
} // namespace OpenWifi