
#pragma once

#include "mplexer.hh"
#include "tcpiohandler.hh"

#if 0
#define DEBUGLOG_ENABLED
#define DEBUGLOG(x) cerr<<x<<endl;
#else
#define DEBUGLOG(x)
#endif

class IOStateHandler
{
public:
  IOStateHandler(FDMultiplexer& mplexer, const int fd): d_mplexer(mplexer), d_fd(fd)
  {
  }

  IOStateHandler(FDMultiplexer& mplexer): d_mplexer(mplexer), d_fd(-1)
  {
  }

  ~IOStateHandler()
  {
    /* be careful that this won't save us if the callback is still registered to the multiplexer,
       because in that case the shared pointer count will never reach zero so this destructor won't
       be called */
    try {
      reset();
    }
    catch (const FDMultiplexerException& e) {
      /* that should not happen, but an exception raised from a destructor would be bad so better
         safe than sorry */
    }
  }

  bool isWaitingForRead() const
  {
    return d_isWaitingForRead;
  }

  bool isWaitingForWrite() const
  {
    return d_isWaitingForWrite;
  }

  void setSocket(int fd)
  {
    if (d_fd != -1) {
      throw std::runtime_error("Trying to set the socket descriptor on an already initialized IOStateHandler");
    }
    d_fd = fd;
  }

  void reset()
  {
    update(IOState::Done);
  }

  std::string getState() const
  {
    std::string result("--");
    result.reserve(2);
    if (isWaitingForRead()) {
      result.at(0) = 'R';
    }
    if (isWaitingForWrite()) {
      result.at(1) = 'W';
    }
    return result;
  }

  void add(IOState iostate, FDMultiplexer::callbackfunc_t callback, FDMultiplexer::funcparam_t callbackData, boost::optional<struct timeval> ttd)
  {
    DEBUGLOG("in "<<__PRETTY_FUNCTION__<<" for fd "<<d_fd<<", last state was "<<getState()<<", adding "<<(int)iostate);
    if (iostate == IOState::NeedRead) {
      if (isWaitingForRead()) {
        if (ttd) {
          /* let's update the TTD ! */
          d_mplexer.setReadTTD(d_fd, *ttd, /* we pass 0 here because we already have a TTD */0);
        }
        return;
      }

      d_mplexer.addReadFD(d_fd, callback, callbackData, ttd ? &*ttd : nullptr);
      DEBUGLOG(__PRETTY_FUNCTION__<<": add read FD "<<d_fd);
      d_isWaitingForRead = true;
    }
    else if (iostate == IOState::NeedWrite) {
      if (isWaitingForWrite()) {
        if (ttd) {
          /* let's update the TTD ! */
          d_mplexer.setWriteTTD(d_fd, *ttd, /* we pass 0 here because we already have a TTD */0);
        }
        return;
      }

      d_mplexer.addWriteFD(d_fd, callback, callbackData, ttd ? &*ttd : nullptr);
      DEBUGLOG(__PRETTY_FUNCTION__<<": add write FD "<<d_fd);
      d_isWaitingForWrite = true;
    }
  }

  void update(IOState iostate, FDMultiplexer::callbackfunc_t callback = FDMultiplexer::callbackfunc_t(), FDMultiplexer::funcparam_t callbackData = boost::any(), boost::optional<struct timeval> ttd = boost::none)
  {
    DEBUGLOG("in "<<__PRETTY_FUNCTION__<<" for fd "<<d_fd<<", last state was "<<getState()<<" , new state is "<<(int)iostate);
    if (isWaitingForRead() && iostate == IOState::Done) {
      DEBUGLOG(__PRETTY_FUNCTION__<<": remove read FD "<<d_fd);
      d_mplexer.removeReadFD(d_fd);
      d_isWaitingForRead = false;
    }
    if (isWaitingForWrite() && iostate == IOState::Done) {
      DEBUGLOG(__PRETTY_FUNCTION__<<": remove write FD "<<d_fd);
      d_mplexer.removeWriteFD(d_fd);
      d_isWaitingForWrite = false;
    }

    if (iostate == IOState::NeedRead) {
      if (isWaitingForRead()) {
        if (ttd) {
          /* let's update the TTD ! */
          d_mplexer.setReadTTD(d_fd, *ttd, /* we pass 0 here because we already have a TTD */0);
        }
        return;
      }

      if (isWaitingForWrite()) {
        d_isWaitingForWrite = false;
        d_mplexer.alterFDToRead(d_fd, callback, callbackData, ttd ? &*ttd : nullptr);
        DEBUGLOG(__PRETTY_FUNCTION__<<": alter from write to read FD "<<d_fd);
      }
      else {
        d_mplexer.addReadFD(d_fd, callback, callbackData, ttd ? &*ttd : nullptr);
        DEBUGLOG(__PRETTY_FUNCTION__<<": add read FD "<<d_fd);
      }

      d_isWaitingForRead = true;
    }
    else if (iostate == IOState::NeedWrite) {
      if (isWaitingForWrite()) {
        if (ttd) {
          /* let's update the TTD ! */
          d_mplexer.setWriteTTD(d_fd, *ttd, /* we pass 0 here because we already have a TTD */0);
        }
        return;
      }

      if (isWaitingForRead()) {
        d_isWaitingForRead = false;
        d_mplexer.alterFDToWrite(d_fd, callback, callbackData, ttd ? &*ttd : nullptr);
        DEBUGLOG(__PRETTY_FUNCTION__<<": alter from read to write FD "<<d_fd);
      }
      else {
        d_mplexer.addWriteFD(d_fd, callback, callbackData, ttd ? &*ttd : nullptr);
        DEBUGLOG(__PRETTY_FUNCTION__<<": add write FD "<<d_fd);
      }

      d_isWaitingForWrite = true;
    }
    else if (iostate == IOState::Done) {
      DEBUGLOG(__PRETTY_FUNCTION__<<": done");
    }
  }

private:
  FDMultiplexer& d_mplexer;
  int d_fd;
  bool d_isWaitingForRead{false};
  bool d_isWaitingForWrite{false};
};

class IOStateGuard
{
public:
  /* this class is using RAII to make sure we don't forget to release an IOStateHandler
     from the IO multiplexer in case of exception / error handling */
  IOStateGuard(std::unique_ptr<IOStateHandler>& handler): d_handler(handler), d_enabled(true)
  {
  }

  ~IOStateGuard()
  {
    /* if we are still owning the state when we go out of scope,
       let's reset the state so it's not registered to the IO multiplexer anymore
       and its reference count goes to zero */
    if (d_enabled && d_handler) {
      DEBUGLOG("IOStateGuard destroyed while holding a state, let's reset it");
      try {
        d_handler->reset();
      }
      catch (const FDMultiplexerException& e) {
        /* that should not happen, but an exception raised from a destructor would be bad so better
           safe than sorry */
      }
      d_enabled = false;
    }
  }

  void release()
  {
    d_enabled = false;
  }

private:
  std::unique_ptr<IOStateHandler>& d_handler;
  bool d_enabled;
};
