#include "TCPSession.h"
#include "TCPServer.h"
#include "Log.h"

namespace core {

   TCPSession::TCPSession(EPoll &ePoll, TCPServer &server, std::string text) : TCPSocket(ePoll, text), server(server) {}

   TCPSession::~TCPSession() {
      server.removeFromSessionList(this);
   }

   void TCPSession::output(std::stringstream &data) {
      data << "|" << ipAddress.getClientAddressAndPort();
   }

   void TCPSession::protocol(coreutils::ZString data) {
      if(!server.commands.processRequest(data, *this))
      	if(data.getLength() != 0)
	         server.sessionErrorHandler("Invalid data received.", out);
   }

   void TCPSession::onRegistered() {
      onConnected();
      protocol(coreutils::ZString(""));
      send();
      if(term)
     	  shutdown("termination requested");
   }

   void TCPSession::onConnected() {}

   void TCPSession::onDataReceived(coreutils::ZString data) {
      if(data.getLength() > 0) {
	 lineBuffer = (char *)realloc(lineBuffer, lineBufferSize + data.getLength());
	 memcpy(lineBuffer + lineBufferSize, data.getData(), data.getLength());
	 lineBufferSize += data.getLength();
	 while(lineBufferSize > 0) {
	    if(blockSize == 0) {
	       lineLength = strcspn(lineBuffer, "\r\n");
	       if(lineLength == lineBufferSize)
     		 break;
	       onLineReceived(coreutils::ZString(lineBuffer, lineLength));
	       if(lineBuffer[lineLength] == '\r')
		 ++lineLength;
	       if(lineBuffer[lineLength] == '\n')
		 ++lineLength;
	       lineBufferSize -= lineLength;
	       if(lineBufferSize > 0)
		 memmove(lineBuffer, lineBuffer + lineLength, lineBufferSize);
	       lineBuffer = (char *)realloc(lineBuffer, lineBufferSize);
            } else {
	       if(lineBufferSize >= blockLength) {
		  onBlockReceived(coreutils::ZString(lineBuffer, blockLength));
		  lineBufferSize -= blockLength;
		  if(lineBufferSize > 0)
		    memmove(lineBuffer, lineBuffer + blockLength, lineBufferSize);
		  lineBuffer = (char *)realloc(lineBuffer, lineBufferSize);
	       }
	    }
	 }
      }
   }
   
   void TCPSession::setBlockSize(int blockSize) {
      this->blockSize = blockSize;
   }
   
   void TCPSession::onLineReceived(coreutils::ZString line) {
      protocol(line);
      send();
      if(term)
        shutdown("termination requested");
   }
   
   void TCPSession::onBlockReceived(coreutils::ZString block) {
      coreutils::Log(coreutils::LOG_DEBUG_3) << "[" << block.getLength() << "]";
      if(term)
        shutdown("termination requested");
   }
   
   void TCPSession::send() {
      if(out.tellp() > 0)
	      write(out.str());
      out.str("");
   }

   void TCPSession::terminate() {
      term = true;
   }

}