/* -*- Mode: C32++; c-file-style: "gnu"; indent-tabs-mode:nil -*- */
/*
 * Copyright (c) 2012 University of California, Los Angeles
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation;
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 * Author: Yingdi Yu <yingdi@cs.ucla.edu>
 */

#include "sync-socket.h"
#include "sync-logging.h"

#include <ndn-cpp/security/identity/basic-identity-storage.hpp>
#include <ndn-cpp/security/identity/osx-private-key-storage.hpp>

using namespace std;
using namespace ndn;
using namespace ndn::ptr_lib;

INIT_LOGGER ("SyncSocket");

namespace Sync {

SyncSocket::SyncSocket (const string &syncPrefix, 
                        shared_ptr<SyncPolicyManager> syncPolicyManager, 
                        NewDataCallback dataCallback, 
                        RemoveCallback rmCallback )
  : m_newDataCallback(dataCallback)
  , m_syncPolicyManager(syncPolicyManager)
  , m_syncLogic (syncPrefix,
                 syncPolicyManager,
                 bind(&SyncSocket::passCallback, this, _1),
                 rmCallback)
{
  m_transport = make_shared<TcpTransport>();
  m_face = make_shared<Face>(m_transport, make_shared<TcpTransport::ConnectionInfo>("localhost"));

  connectToDaemon();

  shared_ptr<BasicIdentityStorage> publicStorage = make_shared<BasicIdentityStorage>();
  shared_ptr<OSXPrivateKeyStorage> privateStorage = make_shared<OSXPrivateKeyStorage>();
  m_identityManager = make_shared<IdentityManager>(publicStorage, privateStorage);
}

SyncSocket::~SyncSocket()
{
  m_face->shutdown();
}

void
SyncSocket::connectToDaemon()
{
  //Hack! transport does not connect to daemon unless an interest is expressed.
  Name name("/ndn");
  shared_ptr<ndn::Interest> interest = make_shared<ndn::Interest>(name);
  m_face->expressInterest(*interest, 
                          bind(&SyncSocket::onConnectionData, this, _1, _2),
                          bind(&SyncSocket::onConnectionDataTimeout, this, _1));
}

void
SyncSocket::onConnectionData(const shared_ptr<const ndn::Interest>& interest,
                             const shared_ptr<Data>& data)
{
  _LOG_DEBUG("onConnectionData");
}

void
SyncSocket::onConnectionDataTimeout(const shared_ptr<const ndn::Interest>& interest)
{
  _LOG_DEBUG("onConnectionDataTimeout");
}

bool 
SyncSocket::publishData(const std::string &prefix, uint32_t session, const char *buf, size_t len, int freshness)
{
  uint32_t sequence = getNextSeq(prefix, session);
  ostringstream contentNameWithSeqno;
  contentNameWithSeqno << prefix << "/" << session << "/" << sequence;
  
  Name dataName(contentNameWithSeqno.str ());
  Blob blob((const uint8_t*)buf, len);
  Name signingIdentity = m_syncPolicyManager->inferSigningIdentity(dataName);

  shared_ptr<Data> data = make_shared<Data>(dataName);
  data->setContent(blob.buf(), blob.size());
  data->getMetaInfo().setTimestampMilliseconds(time(NULL) * 1000.0);

  Name certificateName = m_identityManager->getDefaultCertificateNameForIdentity(signingIdentity);
  m_identityManager->signByCertificate(*data, certificateName);
  
  m_transport->send(*data->wireEncode());
  
  SeqNo s(session, sequence + 1);
  m_sequenceLog[prefix] = s;
  m_syncLogic.addLocalNames (prefix, session, sequence);
  return true;
}

void 
SyncSocket::fetchData(const string &prefix, const SeqNo &seq, const OnVerified& onVerified, int retry)
{
  ostringstream interestName;
  interestName << prefix << "/" << seq.getSession() << "/" << seq.getSeq();
  //std::cout << "Socket " << this << " Send Interest <" << interestName.str() << "> for raw data " << endl;

  const OnVerifyFailed& onVerifyFailed = bind(&SyncSocket::onChatDataVerifyFailed, this, _1);
  
  
  shared_ptr<ndn::Interest> interest = make_shared<ndn::Interest>(interestName.str());
  m_face->expressInterest(*interest, 
                          bind(&SyncSocket::onChatData, this, _1, _2, onVerified, onVerifyFailed), 
                          bind(&SyncSocket::onChatDataTimeout, this, _1, retry, onVerified, onVerifyFailed));

}

void
SyncSocket::onChatCert(const shared_ptr<const ndn::Interest>& interest,
                       const shared_ptr<Data>& cert,
                       shared_ptr<ValidationRequest> previousStep)
{
  shared_ptr<ValidationRequest> nextStep = m_syncPolicyManager->checkVerificationPolicy(cert, 
                                                                                        previousStep->stepCount_, 
                                                                                        previousStep->onVerified_, 
                                                                                        previousStep->onVerifyFailed_);
  
  if (nextStep)
    m_face->expressInterest
      (*nextStep->interest_, 
       bind(&SyncSocket::onChatCert, this, _1, _2, nextStep), 
       bind(&SyncSocket::onChatCertTimeout, this, _1, previousStep->onVerifyFailed_, cert, nextStep));
}

void
SyncSocket::onChatCertTimeout(const shared_ptr<const ndn::Interest>& interest,
                              const OnVerifyFailed& onVerifyFailed,
                              const shared_ptr<Data>& data,
                              shared_ptr<ValidationRequest> nextStep)
{
  if(nextStep->retry_ > 0)
    m_face->expressInterest(*interest, 
                            bind(&SyncSocket::onChatCert,
                                 this,
                                 _1,
                                 _2,
                                 nextStep),
                            bind(&SyncSocket::onChatCertTimeout,
                                 this,
                                 _1,
                                 onVerifyFailed,
                                 data,
                                 nextStep));
  else
    onVerifyFailed(data);
}

void
SyncSocket::onChatData(const shared_ptr<const ndn::Interest>& interest, 
                       const shared_ptr<Data>& data,
                       const OnVerified& onVerified,
                       const OnVerifyFailed& onVerifyFailed)
{
  shared_ptr<ValidationRequest> nextStep = m_syncPolicyManager->checkVerificationPolicy(data, 0, onVerified, onVerifyFailed);

  if (nextStep)
    m_face->expressInterest
      (*nextStep->interest_, 
       bind(&SyncSocket::onChatCert, this, _1, _2, nextStep), 
       bind(&SyncSocket::onChatCertTimeout, this, _1, onVerifyFailed, data, nextStep));
}

void
SyncSocket::onChatDataTimeout(const shared_ptr<const ndn::Interest>& interest, 
                              int retry,
                              const OnVerified& onVerified,
                              const OnVerifyFailed& onVerifyFailed)
{
  if(retry > 0)
    {
      m_face->expressInterest(*interest,
                              bind(&SyncSocket::onChatData,
                                   this,
                                   _1,
                                   _2,
                                   onVerified,
                                   onVerifyFailed),
                              bind(&SyncSocket::onChatDataTimeout, 
                                   this,
                                   _1,
                                   retry - 1,
                                   onVerified,
                                   onVerifyFailed));
                              
    }
  else
    _LOG_DEBUG("Chat interest eventually time out!");
}

void
SyncSocket::onChatDataVerifyFailed(const shared_ptr<Data>& data)
{
  _LOG_DEBUG("Chat data cannot be verified!");
}


uint32_t
SyncSocket::getNextSeq (const string &prefix, uint32_t session)
{
  SequenceLog::iterator i = m_sequenceLog.find (prefix);

  if (i != m_sequenceLog.end ())
    {
      SeqNo s = i->second;
      if (s.getSession() == session)
        return s.getSeq();
    }
  return 0;
}

}//Sync