// SPDX-License-Identifier: MIT
/**
   Copyright (c) 2015 - 2022 Beckhoff Automation GmbH & Co. KG
 */

#pragma once

#include "AmsPort.h"
#include "Sockets.h"
#include "Router.h"

#include <atomic>
#include <chrono>
#include <condition_variable>
#include <thread>
#include <iostream>

namespace Beckhoff
{
namespace Ads
{
using Timepoint = std::chrono::steady_clock::time_point;
#define WAITING_FOR_RESPONSE ((uint32_t)0xFFFFFFFF)

struct AmsRequest {
    Frame frame;
    const AmsAddr& destAddr;
    uint16_t srcPort;
    uint16_t cmdId;
    uint32_t bufferLength;
    void* buffer;
    uint32_t* bytesRead;
    Timepoint deadline;

    AmsRequest(const AmsAddr& ams,
               uint16_t       __port,
               uint16_t       __cmdId,
               uint32_t       __bufferLength = 0,
               void*          __buffer = nullptr,
               uint32_t*      __bytesRead = nullptr,
               size_t         payloadLength = 0)
        : frame(sizeof(AmsTcpHeader) + sizeof(AoEHeader) + payloadLength),
        destAddr(ams),
        srcPort(__port),
        cmdId(__cmdId),
        bufferLength(__bufferLength),
        buffer(__buffer),
        bytesRead(__bytesRead)
    {}

    void SetDeadline(uint32_t tmms)
    {
        deadline = std::chrono::steady_clock::now();
        deadline += std::chrono::milliseconds(tmms);
    }
};

struct AmsResponse {
    std::atomic<AmsRequest*> request;
    std::atomic<uint32_t> invokeId;

    AmsResponse();
    void Notify(uint32_t error);
    void Release();

    // wait for response or timeout and return received errorCode or ADSERR_CLIENT_SYNCTIMEOUT
    uint32_t Wait();

private:
    std::mutex mutex;
    std::condition_variable cv;
    uint32_t errorCode;
};

struct AmsConnection {
    AmsConnection(Router& __router, const struct addrinfo* const destination = nullptr);
    ~AmsConnection();

    SharedDispatcher CreateNotifyMapping(uint32_t hNotify, std::shared_ptr<Notification> notification);
    long DeleteNotification(const AmsAddr& amsAddr, uint32_t hNotify, uint32_t tmms, uint16_t port);
    long SendRequest(AmsRequest& request, uint32_t timeout);

    /**
     * Confirm if this AmsConnection is connected to one of the target addresses.
     * @param[in] destAddrs pointer to a previously allocated list of
     *           "struct addrinfo" returned by getaddrinfo(3).
     * @return true, this connection can be used to reach one of the targetAddresses.
     */
    bool IsConnectedTo(const struct addrinfo* destAddrs) const;

    bool IsConnected() const;

private:
    friend struct AmsRouter;
    Router& router;
    uint32_t localIp;
    uint32_t remoteIp;
    TcpSocket socket;
    std::thread receiver;
    std::atomic<size_t> refCount;
    std::atomic<uint32_t> invokeId;
    std::array<AmsResponse, Router::NUM_PORTS_MAX> queue;

    template<class T> void ReceiveFrame(AmsResponse* response, size_t length, uint32_t aoeError);
    bool ReceiveNotification(const AoEHeader& header);
    void ReceiveJunk(size_t bytesToRead);
    void Receive(void* buffer, size_t bytesToRead, timeval* timeout = nullptr);
    void Receive(void* buffer, size_t bytesToRead, const Timepoint& deadline);
    template<class T> void Receive(T& buffer) { Receive(&buffer, sizeof(T)); }
    AmsResponse* Write(AmsRequest& request, const AmsAddr srcAddr);
    void Recv();
    void TryRecv();
    uint32_t GetInvokeId();
    AmsResponse* Reserve(AmsRequest* request, uint16_t port);
    AmsResponse* GetPending(uint32_t id, uint16_t port);

    std::map<VirtualConnection, SharedDispatcher> dispatcherList;
    std::recursive_mutex dispatcherListMutex;
    SharedDispatcher DispatcherListAdd(const VirtualConnection& connection);
    SharedDispatcher DispatcherListGet(const VirtualConnection& connection);
};
}
}